externs1.h revision 1.203
1/* $NetBSD: externs1.h,v 1.203 2023/07/30 22:27:21 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 */ 39extern int aflag; 40extern bool bflag; 41extern bool cflag; 42extern bool eflag; 43extern bool Fflag; 44extern bool hflag; 45extern bool pflag; 46extern bool rflag; 47extern bool uflag; 48extern bool vflag; 49extern bool yflag; 50extern bool wflag; 51extern bool zflag; 52extern bool Tflag; 53extern bool Pflag; 54 55extern bool allow_trad; 56extern bool allow_c90; 57extern bool allow_c99; 58extern bool allow_c11; 59extern bool allow_c23; 60extern bool allow_gcc; 61 62extern sig_atomic_t fpe; 63 64void norecover(void); 65 66/* 67 * cgram.y 68 */ 69extern int block_level; 70extern size_t mem_block_level; 71extern int yydebug; 72 73int yyerror(const char *); 74int yyparse(void); 75 76/* 77 * scan.l 78 */ 79extern bool in_gcc_attribute; 80extern pos_t curr_pos; 81extern pos_t csrc_pos; 82extern bool in_system_header; 83extern symt_t symtyp; 84extern FILE *yyin; 85 86void initscan(void); 87int64_t convert_integer(int64_t, tspec_t, unsigned int); 88void clear_warn_flags(void); 89sym_t *getsym(sbuf_t *); 90void clean_up_after_error(void); 91sym_t *pushdown(const sym_t *); 92sym_t *mktempsym(type_t *); 93void rmsym(sym_t *); 94void symtab_remove_level(sym_t *); 95void inssym(int, sym_t *); 96void freeyyv(void *, int); 97int yylex(void); 98 99/* 100 * mem1.c 101 */ 102const char *record_filename(const char *, size_t); 103int get_filename_id(const char *); 104void add_directory_replacement(char *); 105const char *transform_filename(const char *, size_t); 106 107#ifdef DEBUG_MEM 108void *block_zero_alloc(size_t, const char *); 109void *level_zero_alloc(size_t, size_t, const char *); 110#else 111void *block_zero_alloc(size_t); 112void *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 116void level_free_all(size_t); 117 118#ifdef DEBUG_MEM 119void *expr_zero_alloc(size_t, const char *); 120#else 121void *expr_zero_alloc(size_t); 122#define expr_zero_alloc(size, descr) (expr_zero_alloc)(size) 123#endif 124tnode_t *expr_alloc_tnode(void); 125void expr_free_all(void); 126memory_pool expr_save_memory(void); 127void expr_restore_memory(memory_pool); 128 129/* 130 * debug.c 131 */ 132 133#ifdef DEBUG 134const char *decl_level_kind_name(decl_level_kind); 135const char *scl_name(scl_t); 136const char *symt_name(symt_t); 137const char *type_qualifiers_string(type_qualifiers); 138const char *function_specifier_name(function_specifier); 139void debug_dcs(bool); 140void debug_node(const tnode_t *); 141void debug_type(const type_t *); 142void debug_sym(const char *, const sym_t *, const char *); 143void debug_symtab(void); 144void debug_printf(const char *fmt, ...) __printflike(1, 2); 145void debug_skip_indent(void); 146void debug_indent_inc(void); 147void debug_indent_dec(void); 148void debug_enter_func(const char *); 149void debug_step(const char *fmt, ...) __printflike(1, 2); 150void debug_leave_func(const char *); 151#define debug_enter() debug_enter_func(__func__) 152#define debug_leave() debug_leave_func(__func__) 153#else 154#define debug_noop() do { } while (false) 155#define debug_dcs(all) debug_noop() 156#define debug_sym(p, sym, s) debug_noop() 157#define debug_symtab() debug_noop() 158#define debug_node(tn) debug_noop() 159#define debug_type(tp) debug_noop() 160#define debug_printf(...) debug_noop() 161#define debug_skip_indent() debug_noop() 162#define debug_indent_inc() debug_noop() 163#define debug_indent_dec() debug_noop() 164#define debug_enter() debug_noop() 165#define debug_step(...) debug_noop() 166#define debug_leave() debug_noop() 167#endif 168 169/* 170 * err.c 171 */ 172extern bool seen_error; 173extern bool seen_warning; 174extern int sytxerr; 175extern bool any_query_enabled; 176 177void msglist(void); 178void error_at(int, const pos_t *, ...); 179void warning_at(int, const pos_t *, ...); 180void message_at(int, const pos_t *, ...); 181void error(int, ...); 182void warning(int, ...); 183bool gnuism(int, ...); 184void c99ism(int, ...); 185void c11ism(int, ...); 186void c23ism(int, ...); 187void assert_failed(const char *, int, const char *, const char *) __dead; 188void update_location(const char *, int, bool, bool); 189void suppress_messages(const char *); 190 191void query_message(int, ...); 192void enable_queries(const char *); 193 194/* 195 * decl.c 196 */ 197extern decl_level *dcs; 198extern const char unnamed[]; 199extern int enumval; 200 201void initdecl(void); 202type_t *gettyp(tspec_t); 203type_t *block_dup_type(const type_t *); 204type_t *expr_dup_type(const type_t *); 205type_t *expr_unqualified_type(const type_t *); 206bool is_incomplete(const type_t *); 207void dcs_add_function_specifier(function_specifier); 208void dcs_add_storage_class(scl_t); 209void dcs_add_type(type_t *); 210void dcs_add_qualifiers(type_qualifiers); 211void dcs_add_packed(void); 212void dcs_set_used(void); 213void begin_declaration_level(decl_level_kind); 214void end_declaration_level(void); 215void dcs_set_asm(void); 216void dcs_begin_type(void); 217void dcs_end_type(void); 218int length_in_bits(const type_t *, const char *); 219unsigned int alignment_in_bits(const type_t *); 220sym_t *concat_symbols(sym_t *, sym_t *); 221void check_type(sym_t *); 222sym_t *declare_unnamed_member(void); 223sym_t *declare_member(sym_t *); 224sym_t *set_bit_field_width(sym_t *, int); 225void add_type_qualifiers(type_qualifiers *, type_qualifiers); 226qual_ptr *append_qualified_pointer(qual_ptr *, qual_ptr *); 227sym_t *add_pointer(sym_t *, qual_ptr *); 228sym_t *add_array(sym_t *, bool, int); 229sym_t *add_function(sym_t *, struct parameter_list); 230void check_extern_declaration(const sym_t *); 231void check_function_definition(sym_t *, bool); 232sym_t *declarator_name(sym_t *); 233sym_t *old_style_function_parameter_name(sym_t *); 234type_t *make_tag_type(sym_t *, tspec_t, bool, bool); 235const char *storage_class_name(scl_t); 236type_t *complete_struct_or_union(sym_t *); 237type_t *complete_enum(sym_t *); 238sym_t *enumeration_constant(sym_t *, int, bool); 239void declare(sym_t *, bool, sbuf_t *); 240void copy_usage_info(sym_t *, sym_t *); 241bool check_redeclaration(sym_t *, bool *); 242bool pointer_types_are_compatible(const type_t *, const type_t *, bool); 243bool types_compatible(const type_t *, const type_t *, bool, bool, bool *); 244void complete_type(sym_t *, sym_t *); 245sym_t *declare_argument(sym_t *, bool); 246void check_func_lint_directives(void); 247void check_func_old_style_arguments(void); 248 249void declare_local(sym_t *, bool); 250sym_t *abstract_name(void); 251void global_clean_up(void); 252sym_t *declare_abstract_type(sym_t *); 253void check_size(const sym_t *); 254void mark_as_set(sym_t *); 255void mark_as_used(sym_t *, bool, bool); 256void check_usage(const decl_level *); 257void check_usage_sym(bool, const sym_t *); 258void end_translation_unit(void); 259void print_previous_declaration(const sym_t *); 260int to_int_constant(tnode_t *, bool); 261 262/* 263 * tree.c 264 */ 265const tnode_t *before_conversion(const tnode_t *); 266type_t *block_derive_type(type_t *, tspec_t); 267type_t *expr_derive_type(type_t *, tspec_t); 268bool is_compiler_builtin(const char *); 269tnode_t *build_constant(type_t *, val_t *); 270tnode_t *build_name(sym_t *, bool); 271tnode_t *build_string(strg_t *); 272tnode_t *build_generic_selection(const tnode_t *, 273 struct generic_association *); 274 275tnode_t *build_binary(tnode_t *, op_t, bool, tnode_t *); 276tnode_t *build_unary(op_t, bool, tnode_t *); 277tnode_t *build_member_access(tnode_t *, op_t, bool, sbuf_t *); 278tnode_t *cconv(tnode_t *); 279bool is_typeok_bool_compares_with_zero(const tnode_t *); 280bool typeok(op_t, int, const tnode_t *, const tnode_t *); 281tnode_t *promote(op_t, bool, tnode_t *); 282tnode_t *convert(op_t, int, type_t *, tnode_t *); 283void convert_constant(op_t, int, const type_t *, val_t *, val_t *); 284tnode_t *build_sizeof(const type_t *); 285tnode_t *build_offsetof(const type_t *, const sym_t *); 286tnode_t *build_alignof(const type_t *); 287tnode_t *cast(tnode_t *, type_t *); 288tnode_t *build_function_argument(tnode_t *, tnode_t *); 289tnode_t *build_function_call(tnode_t *, bool, tnode_t *); 290val_t *integer_constant(tnode_t *, bool); 291void expr(tnode_t *, bool, bool, bool, bool); 292void check_expr_misc(const tnode_t *, bool, bool, bool, bool, bool, bool); 293bool constant_addr(const tnode_t *, const sym_t **, ptrdiff_t *); 294strg_t *cat_strings(strg_t *, strg_t *); 295unsigned int type_size_in_bits(const type_t *); 296sym_t *find_member(const struct_or_union *, const char *); 297 298void begin_statement_expr(void); 299void do_statement_expr(tnode_t *); 300tnode_t *end_statement_expr(void); 301bool in_statement_expr(void); 302 303/* 304 * func.c 305 */ 306extern sym_t *funcsym; 307extern bool reached; 308extern bool warn_about_unreachable; 309extern bool suppress_fallthrough; 310extern int nargusg; 311extern pos_t argsused_pos; 312extern int nvararg; 313extern pos_t vapos; 314extern int printflike_argnum; 315extern pos_t printflike_pos; 316extern int scanflike_argnum; 317extern pos_t scanflike_pos; 318extern bool suppress_constcond; 319extern bool llibflg; 320extern int lwarn; 321extern bool suppress_bitfieldtype; 322extern bool plibflg; 323extern bool suppress_longlong; 324 325void begin_control_statement(control_statement_kind); 326void end_control_statement(control_statement_kind); 327void check_statement_reachable(void); 328void begin_function(sym_t *); 329void end_function(void); 330void named_label(sym_t *); 331void case_label(tnode_t *); 332void default_label(void); 333void stmt_if_expr(tnode_t *); 334void stmt_if_then_stmt(void); 335void stmt_if_else_stmt(bool); 336void stmt_switch_expr(tnode_t *); 337void stmt_switch_expr_stmt(void); 338void stmt_while_expr(tnode_t *); 339void stmt_while_expr_stmt(void); 340void stmt_do(void); 341void stmt_do_while_expr(tnode_t *); 342void stmt_for_exprs(tnode_t *, tnode_t *, tnode_t *); 343void stmt_for_exprs_stmt(void); 344void stmt_goto(sym_t *); 345void stmt_continue(void); 346void stmt_break(void); 347void stmt_return(bool, tnode_t *); 348void global_clean_up_decl(bool); 349void handle_lint_comment(lint_comment, int); 350 351/* 352 * init.c 353 */ 354void begin_initialization(sym_t *); 355void end_initialization(void); 356sym_t *current_initsym(void); 357 358void init_rbrace(void); 359void init_lbrace(void); 360void init_expr(tnode_t *); 361void begin_designation(void); 362void add_designator_member(sbuf_t *); 363void add_designator_subscript(range_t); 364 365/* 366 * emit.c 367 */ 368void outtype(const type_t *); 369void outsym(const sym_t *, scl_t, def_t); 370void outfdef(const sym_t *, const pos_t *, bool, bool, const sym_t *); 371void outcall(const tnode_t *, bool, bool); 372void outusg(const sym_t *); 373 374/* 375 * lex.c 376 */ 377int lex_name(const char *, size_t); 378int lex_integer_constant(const char *, size_t, int); 379int lex_floating_constant(const char *, size_t); 380int lex_operator(int, op_t); 381int lex_string(void); 382int lex_wide_string(void); 383int lex_character_constant(void); 384int lex_wide_character_constant(void); 385void lex_directive(const char *); 386void lex_next_line(void); 387void lex_comment(void); 388void lex_slash_slash_comment(void); 389void lex_unknown_character(int); 390int lex_input(void); 391 392/* 393 * ckbool.c 394 */ 395bool typeok_scalar_strict_bool(op_t, const mod_t *, int, 396 const tnode_t *, const tnode_t *); 397bool fallback_symbol_strict_bool(sym_t *); 398 399/* 400 * ckctype.c 401 */ 402void check_ctype_function_call(const tnode_t *, const tnode_t *); 403void check_ctype_macro_invocation(const tnode_t *, const tnode_t *); 404 405/* 406 * ckgetopt.c 407 */ 408void check_getopt_begin_while(const tnode_t *); 409void check_getopt_begin_switch(void); 410void check_getopt_case_label(int64_t); 411void check_getopt_end_switch(void); 412void check_getopt_end_while(void); 413