1 /* $NetBSD: externs1.h,v 1.238 2024/12/08 17:12:01 rillig Exp $ */ 2 3 /* 4 * Copyright (c) 1994, 1995 Jochen Pohl 5 * All Rights Reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. All advertising materials mentioning features or use of this software 16 * must display the following acknowledgement: 17 * This product includes software developed by Jochen Pohl for 18 * The NetBSD Project. 19 * 4. The name of the author may not be used to endorse or promote products 20 * derived from this software without specific prior written permission. 21 * 22 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 23 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 24 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 25 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 26 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 27 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 28 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 29 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 30 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 31 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 32 */ 33 34 #include <signal.h> 35 36 /* 37 * main1.c 38 */ 39 extern bool Fflag; 40 extern bool Pflag; 41 extern bool Tflag; 42 extern int aflag; 43 extern bool bflag; 44 extern bool cflag; 45 extern bool eflag; 46 extern bool hflag; 47 extern bool pflag; 48 extern bool rflag; 49 extern bool vflag; 50 extern bool wflag; 51 extern bool yflag; 52 extern bool zflag; 53 54 extern bool allow_trad; 55 extern bool allow_c90; 56 extern bool allow_c99; 57 extern bool allow_c11; 58 extern bool allow_c23; 59 extern bool allow_gcc; 60 61 extern sig_atomic_t fpe; 62 63 void norecover(void); 64 65 /* 66 * cgram.y 67 */ 68 extern int block_level; 69 extern size_t mem_block_level; 70 extern int yydebug; 71 72 int yyerror(const char *); 73 int yyparse(void); 74 extern char *yytext; 75 76 /* 77 * lex.c 78 */ 79 extern bool in_gcc_attribute; 80 extern pos_t curr_pos; 81 extern pos_t csrc_pos; 82 extern bool in_system_header; 83 extern symbol_kind sym_kind; 84 extern FILE *yyin; 85 86 void init_lex(void); 87 int64_t convert_integer(int64_t, tspec_t, unsigned int); 88 void reset_suppressions(void); 89 sym_t *getsym(sbuf_t *); 90 void clean_up_after_error(void); 91 sym_t *pushdown(const sym_t *); 92 sym_t *mktempsym(type_t *); 93 void symtab_remove_forever(sym_t *); 94 void symtab_remove_level(sym_t *); 95 void inssym(int, sym_t *); 96 void freeyyv(void *, int); 97 int yylex(void); 98 99 /* 100 * mem1.c 101 */ 102 const char *record_filename(const char *, size_t); 103 int get_filename_id(const char *); 104 void add_directory_replacement(char *); 105 const char *transform_filename(const char *, size_t); 106 107 #ifdef DEBUG_MEM 108 void *block_zero_alloc(size_t, const char *); 109 void *level_zero_alloc(size_t, size_t, const char *); 110 #else 111 void *block_zero_alloc(size_t); 112 void *level_zero_alloc(size_t, size_t); 113 #define block_zero_alloc(size, descr) (block_zero_alloc)(size) 114 #define level_zero_alloc(level, size, descr) (level_zero_alloc)(level, size) 115 #endif 116 void level_free_all(size_t); 117 118 #ifdef DEBUG_MEM 119 void *expr_zero_alloc(size_t, const char *); 120 #else 121 void *expr_zero_alloc(size_t); 122 #define expr_zero_alloc(size, descr) (expr_zero_alloc)(size) 123 #endif 124 tnode_t *expr_alloc_tnode(void); 125 void expr_free_all(void); 126 memory_pool expr_save_memory(void); 127 void expr_restore_memory(memory_pool); 128 129 /* 130 * debug.c 131 */ 132 133 #ifdef DEBUG 134 extern bool debug_enabled; 135 const char *decl_level_kind_name(decl_level_kind); 136 const char *scl_name(scl_t); 137 const char *symbol_kind_name(symbol_kind); 138 const char *type_qualifiers_string(type_qualifiers); 139 const char *type_attributes_string(type_attributes); 140 const char *function_specifier_name(function_specifier); 141 const char *named_constant_name(named_constant); 142 void debug_dcs(void); 143 void debug_dcs_all(void); 144 void debug_node(const tnode_t *); 145 void debug_type(const type_t *); 146 void debug_sym(const char *, const sym_t *, const char *); 147 void debug_symtab(void); 148 void debug_printf(const char *fmt, ...) __printflike(1, 2); 149 void debug_skip_indent(void); 150 void debug_indent_inc(void); 151 void debug_indent_dec(void); 152 bool debug_push_indented(bool); 153 void debug_pop_indented(bool); 154 void debug_enter_func(const char *); 155 void debug_step(const char *fmt, ...) __printflike(1, 2); 156 void debug_leave_func(const char *); 157 void debug_attribute_list(const attribute_list *); 158 #define debug_enter() debug_enter_func(__func__) 159 #define debug_leave() debug_leave_func(__func__) 160 #else 161 #define debug_noop() do { } while (false) 162 #define debug_dcs() debug_noop() 163 #define debug_dcs_all() debug_noop() 164 #define debug_sym(p, sym, s) debug_noop() 165 #define debug_symtab() debug_noop() 166 #define debug_node(tn) debug_noop() 167 #define debug_type(tp) debug_noop() 168 #define debug_printf(...) debug_noop() 169 #define debug_skip_indent() debug_noop() 170 #define debug_indent_inc() debug_noop() 171 #define debug_indent_dec() debug_noop() 172 #define debug_push_indented(c) true 173 #define debug_pop_indented(c) (void)(c) 174 #define debug_enter() debug_noop() 175 #define debug_step(...) debug_noop() 176 #define debug_leave() debug_noop() 177 #define debug_attribute_list(list) debug_noop() 178 #endif 179 180 /* 181 * err.c 182 */ 183 extern bool seen_error; 184 extern bool seen_warning; 185 extern int sytxerr; 186 extern bool any_query_enabled; 187 extern bool is_query_enabled[]; 188 189 void msglist(void); 190 void error_at(int, const pos_t *, ...); 191 void warning_at(int, const pos_t *, ...); 192 void message_at(int, const pos_t *, ...); 193 void error(int, ...); 194 void warning(int, ...); 195 bool gnuism(int, ...); 196 void c99ism(int, ...); 197 void c11ism(int, ...); 198 void c23ism(int, ...); 199 void assert_failed(const char *, int, const char *, const char *) __dead; 200 void update_location(const char *, int, bool, bool); 201 void suppress_messages(const char *); 202 203 void query_message(int, ...); 204 void enable_queries(const char *); 205 206 /* 207 * decl.c 208 */ 209 extern decl_level *dcs; 210 extern const char unnamed[]; 211 extern int enumval; 212 213 void init_decl(void); 214 type_t *gettyp(tspec_t); 215 type_t *block_dup_type(const type_t *); 216 type_t *expr_dup_type(const type_t *); 217 type_t *expr_unqualified_type(const type_t *); 218 bool is_incomplete(const type_t *); 219 void dcs_add_function_specifier(function_specifier); 220 void dcs_add_storage_class(scl_t); 221 void dcs_add_type(type_t *); 222 void dcs_add_qualifiers(type_qualifiers); 223 void dcs_add_alignas(tnode_t *); 224 void dcs_add_packed(void); 225 void dcs_set_used(void); 226 void begin_declaration_level(decl_level_kind); 227 void end_declaration_level(void); 228 void dcs_set_asm(void); 229 void dcs_begin_type(void); 230 void dcs_end_type(void); 231 int length_in_bits(const type_t *, const char *); 232 unsigned int alignment(const type_t *); 233 sym_t *concat_symbols(sym_t *, sym_t *); 234 void check_type(sym_t *); 235 sym_t *declare_unnamed_member(void); 236 sym_t *declare_member(sym_t *); 237 sym_t *set_bit_field_width(sym_t *, int); 238 void add_type_qualifiers(type_qualifiers *, type_qualifiers); 239 qual_ptr *append_qualified_pointer(qual_ptr *, qual_ptr *); 240 sym_t *add_pointer(sym_t *, qual_ptr *); 241 sym_t *add_array(sym_t *, bool, int); 242 sym_t *add_function(sym_t *, parameter_list); 243 void check_extern_declaration(const sym_t *); 244 void check_function_definition(sym_t *, bool); 245 sym_t *declarator_name(sym_t *); 246 sym_t *old_style_function_parameter_name(sym_t *); 247 type_t *make_tag_type(sym_t *, tspec_t, bool, bool); 248 type_t *complete_struct_or_union(sym_t *); 249 type_t *complete_enum(sym_t *); 250 sym_t *enumeration_constant(sym_t *, int, bool); 251 void declare(sym_t *, bool, sbuf_t *); 252 void copy_usage_info(sym_t *, const sym_t *); 253 bool check_redeclaration(sym_t *, bool *); 254 bool pointer_types_are_compatible(const type_t *, const type_t *, bool); 255 bool types_compatible(const type_t *, const type_t *, bool, bool, bool *); 256 void complete_type(sym_t *, const sym_t *); 257 sym_t *declare_parameter(sym_t *, bool); 258 void check_func_lint_directives(void); 259 void check_func_old_style_parameters(void); 260 261 void declare_local(sym_t *, bool); 262 sym_t *abstract_name(void); 263 sym_t *abstract_enclosing_name(void); 264 void global_clean_up(void); 265 sym_t *declare_abstract_type(sym_t *); 266 void check_size(const sym_t *); 267 void mark_as_set(sym_t *); 268 void mark_as_used(sym_t *, bool, bool); 269 void check_usage(const decl_level *); 270 void check_usage_sym(bool, const sym_t *); 271 void end_translation_unit(void); 272 void print_previous_declaration(const sym_t *); 273 int to_int_constant(tnode_t *, bool); 274 275 /* 276 * tree.c 277 */ 278 const tnode_t *before_conversion(const tnode_t *); 279 type_t *block_derive_type(type_t *, tspec_t); 280 type_t *expr_derive_type(type_t *, tspec_t); 281 bool is_compiler_builtin(const char *); 282 tnode_t *build_constant(type_t *, val_t *); 283 tnode_t *build_name(sym_t *, bool); 284 tnode_t *build_string(buffer *); 285 tnode_t *build_generic_selection(const tnode_t *, 286 struct generic_association *); 287 288 tnode_t *build_binary(tnode_t *, op_t, bool, tnode_t *); 289 tnode_t *build_unary(op_t, bool, tnode_t *); 290 tnode_t *build_member_access(tnode_t *, op_t, bool, sbuf_t *); 291 tnode_t *cconv(tnode_t *); 292 bool is_typeok_bool_compares_with_zero(const tnode_t *, bool); 293 bool typeok(op_t, int, const tnode_t *, const tnode_t *); 294 tnode_t *promote(op_t, bool, tnode_t *); 295 tnode_t *convert(op_t, int, type_t *, tnode_t *); 296 void convert_constant(op_t, int, const type_t *, val_t *, val_t *); 297 tnode_t *build_sizeof(const type_t *); 298 tnode_t *build_offsetof(const type_t *, designation); 299 tnode_t *build_alignof(const type_t *); 300 tnode_t *cast(tnode_t *, bool, type_t *); 301 void add_function_argument(function_call *, tnode_t *); 302 tnode_t *build_function_call(tnode_t *, bool, function_call *); 303 val_t *integer_constant(tnode_t *, bool); 304 void expr(tnode_t *, bool, bool, bool, bool, const char *); 305 void check_expr_misc(const tnode_t *, bool, bool, bool, bool, bool, bool); 306 bool constant_addr(const tnode_t *, const sym_t **, ptrdiff_t *); 307 buffer *cat_strings(buffer *, buffer *); 308 unsigned int type_size_in_bits(const type_t *); 309 sym_t *find_member(const struct_or_union *, const char *); 310 uint64_t possible_bits(const tnode_t *); 311 bool attributes_contain(const attribute_list *, const char *); 312 313 void begin_statement_expr(void); 314 void do_statement_expr(tnode_t *); 315 tnode_t *end_statement_expr(void); 316 bool in_statement_expr(void); 317 318 /* 319 * func.c 320 */ 321 extern sym_t *funcsym; 322 extern bool reached; 323 extern bool warn_about_unreachable; 324 extern bool suppress_fallthrough; 325 extern int nargusg; 326 extern pos_t argsused_pos; 327 extern int nvararg; 328 extern pos_t vapos; 329 extern int printflike_argnum; 330 extern pos_t printflike_pos; 331 extern int scanflike_argnum; 332 extern pos_t scanflike_pos; 333 extern bool suppress_constcond; 334 extern bool llibflg; 335 extern int lwarn; 336 extern bool suppress_bitfieldtype; 337 extern bool plibflg; 338 extern bool suppress_longlong; 339 340 void begin_control_statement(control_statement_kind); 341 void end_control_statement(control_statement_kind); 342 void check_statement_reachable(const char *); 343 void begin_function(sym_t *); 344 void end_function(void); 345 void named_label(sym_t *); 346 void case_label(tnode_t *); 347 void default_label(void); 348 void stmt_if_expr(tnode_t *); 349 void stmt_if_then_stmt(void); 350 void stmt_if_else_stmt(bool); 351 void stmt_switch_expr(tnode_t *); 352 void stmt_switch_expr_stmt(void); 353 void stmt_while_expr(tnode_t *); 354 void stmt_while_expr_stmt(void); 355 void stmt_do(void); 356 void stmt_do_while_expr(tnode_t *); 357 void stmt_for_exprs(tnode_t *, tnode_t *, tnode_t *); 358 void stmt_for_exprs_stmt(void); 359 void stmt_goto(sym_t *); 360 void stmt_continue(void); 361 void stmt_break(void); 362 void stmt_return(bool, tnode_t *); 363 void stmt_call_noreturn(void); 364 void global_clean_up_decl(bool); 365 void handle_lint_comment(lint_comment, int); 366 367 /* 368 * init.c 369 */ 370 void begin_initialization(sym_t *); 371 void end_initialization(void); 372 sym_t *current_initsym(void); 373 374 void init_rbrace(void); 375 void init_lbrace(void); 376 void init_expr(tnode_t *); 377 void begin_designation(void); 378 void add_designator_member(sbuf_t *); 379 void add_designator_subscript(range_t); 380 void designation_push(designation *, designator_kind, const sym_t *, size_t); 381 382 /* 383 * emit.c 384 */ 385 void outtype(const type_t *); 386 void outsym(const sym_t *, scl_t, def_t); 387 void outfdef(const sym_t *, const pos_t *, bool, bool, const sym_t *); 388 void outcall(const tnode_t *, bool, bool); 389 void outusg(const sym_t *); 390 391 /* 392 * lex.c 393 */ 394 void lex_pp_begin(void); 395 void lex_pp_identifier(const char *); 396 void lex_pp_number(const char *); 397 void lex_pp_character_constant(void); 398 void lex_pp_string_literal(void); 399 void lex_pp_punctuator(const char *); 400 void lex_pp_comment(void); 401 void lex_pp_whitespace(void); 402 void lex_pp_end(void); 403 int lex_name(const char *, size_t); 404 int lex_integer_constant(const char *, size_t, int); 405 int lex_floating_constant(const char *, size_t); 406 int lex_operator(int, op_t); 407 int lex_string(void); 408 int lex_wide_string(void); 409 int lex_character_constant(void); 410 int lex_wide_character_constant(void); 411 void lex_next_line(void); 412 void lex_comment(void); 413 void lex_slash_slash_comment(void); 414 void lex_unknown_character(int); 415 int lex_input(void); 416 bool quoted_next(const buffer *, quoted_iterator *); 417 balanced_token_sequence lex_balanced(void); 418 419 /* 420 * ckbool.c 421 */ 422 bool typeok_scalar_strict_bool(op_t, const mod_t *, int, 423 const tnode_t *, const tnode_t *); 424 bool fallback_symbol_strict_bool(sym_t *); 425 426 /* 427 * ckctype.c 428 */ 429 void check_ctype_function_call(const function_call *); 430 void check_ctype_macro_invocation(const tnode_t *, const tnode_t *); 431 432 /* 433 * ckgetopt.c 434 */ 435 void check_getopt_begin_while(const tnode_t *); 436 void check_getopt_begin_switch(void); 437 void check_getopt_case_label(int64_t); 438 void check_getopt_end_switch(void); 439 void check_getopt_end_while(void); 440 441 /* cksnprintb.c */ 442 void check_snprintb(const function_call *); 443