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