externs1.h revision 1.215 
1/*	$NetBSD: externs1.h,v 1.215 2024/02/03 19:25:16 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 symbol_kind sym_kind;
84extern FILE *yyin;
85
86void init_lex(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 *symbol_kind_name(symbol_kind);
137const char *type_qualifiers_string(type_qualifiers);
138const char *function_specifier_name(function_specifier);
139void debug_dcs(void);
140void debug_dcs_all(void);
141void debug_node(const tnode_t *);
142void debug_type(const type_t *);
143void debug_sym(const char *, const sym_t *, const char *);
144void debug_symtab(void);
145void debug_printf(const char *fmt, ...) __printflike(1, 2);
146void debug_skip_indent(void);
147void debug_indent_inc(void);
148void debug_indent_dec(void);
149bool debug_push_indented(bool);
150void debug_pop_indented(bool);
151void debug_enter_func(const char *);
152void debug_step(const char *fmt, ...) __printflike(1, 2);
153void debug_leave_func(const char *);
154#define	debug_enter()		debug_enter_func(__func__)
155#define	debug_leave()		debug_leave_func(__func__)
156#else
157#define	debug_noop()		do { } while (false)
158#define	debug_dcs()		debug_noop()
159#define	debug_dcs_all()		debug_noop()
160#define	debug_sym(p, sym, s)	debug_noop()
161#define	debug_symtab()		debug_noop()
162#define	debug_node(tn)		debug_noop()
163#define	debug_type(tp)		debug_noop()
164#define	debug_printf(...)	debug_noop()
165#define	debug_skip_indent()	debug_noop()
166#define	debug_indent_inc()	debug_noop()
167#define	debug_indent_dec()	debug_noop()
168#define debug_push_indented(c)	true
169#define debug_pop_indented(c)	(void)(c)
170#define	debug_enter()		debug_noop()
171#define	debug_step(...)		debug_noop()
172#define	debug_leave()		debug_noop()
173#endif
174
175/*
176 * err.c
177 */
178extern bool seen_error;
179extern bool seen_warning;
180extern int sytxerr;
181extern bool any_query_enabled;
182extern bool is_query_enabled[];
183
184void msglist(void);
185void error_at(int, const pos_t *, ...);
186void warning_at(int, const pos_t *, ...);
187void message_at(int, const pos_t *, ...);
188void error(int, ...);
189void warning(int, ...);
190bool gnuism(int, ...);
191void c99ism(int, ...);
192void c11ism(int, ...);
193void c23ism(int, ...);
194void assert_failed(const char *, int, const char *, const char *) __dead;
195void update_location(const char *, int, bool, bool);
196void suppress_messages(const char *);
197
198void query_message(int, ...);
199void enable_queries(const char *);
200
201/*
202 * decl.c
203 */
204extern decl_level *dcs;
205extern const char unnamed[];
206extern int enumval;
207
208void init_decl(void);
209type_t *gettyp(tspec_t);
210type_t *block_dup_type(const type_t *);
211type_t *expr_dup_type(const type_t *);
212type_t *expr_unqualified_type(const type_t *);
213bool is_incomplete(const type_t *);
214void dcs_add_function_specifier(function_specifier);
215void dcs_add_storage_class(scl_t);
216void dcs_add_type(type_t *);
217void dcs_add_qualifiers(type_qualifiers);
218void dcs_add_packed(void);
219void dcs_set_used(void);
220void begin_declaration_level(decl_level_kind);
221void end_declaration_level(void);
222void dcs_set_asm(void);
223void dcs_begin_type(void);
224void dcs_end_type(void);
225int length_in_bits(const type_t *, const char *);
226unsigned int alignment_in_bits(const type_t *);
227sym_t *concat_symbols(sym_t *, sym_t *);
228void check_type(sym_t *);
229sym_t *declare_unnamed_member(void);
230sym_t *declare_member(sym_t *);
231sym_t *set_bit_field_width(sym_t *, int);
232void add_type_qualifiers(type_qualifiers *, type_qualifiers);
233qual_ptr *append_qualified_pointer(qual_ptr *, qual_ptr *);
234sym_t *add_pointer(sym_t *, qual_ptr *);
235sym_t *add_array(sym_t *, bool, int);
236sym_t *add_function(sym_t *, struct parameter_list);
237void check_extern_declaration(const sym_t *);
238void check_function_definition(sym_t *, bool);
239sym_t *declarator_name(sym_t *);
240sym_t *old_style_function_parameter_name(sym_t *);
241type_t *make_tag_type(sym_t *, tspec_t, bool, bool);
242type_t *complete_struct_or_union(sym_t *);
243type_t *complete_enum(sym_t *);
244sym_t *enumeration_constant(sym_t *, int, bool);
245void declare(sym_t *, bool, sbuf_t *);
246void copy_usage_info(sym_t *, sym_t *);
247bool check_redeclaration(sym_t *, bool *);
248bool pointer_types_are_compatible(const type_t *, const type_t *, bool);
249bool types_compatible(const type_t *, const type_t *, bool, bool, bool *);
250void complete_type(sym_t *, sym_t *);
251sym_t *declare_parameter(sym_t *, bool);
252void check_func_lint_directives(void);
253void check_func_old_style_parameters(void);
254
255void declare_local(sym_t *, bool);
256sym_t *abstract_name(void);
257sym_t *abstract_enclosing_name(void);
258void global_clean_up(void);
259sym_t *declare_abstract_type(sym_t *);
260void check_size(const sym_t *);
261void mark_as_set(sym_t *);
262void mark_as_used(sym_t *, bool, bool);
263void check_usage(const decl_level *);
264void check_usage_sym(bool, const sym_t *);
265void end_translation_unit(void);
266void print_previous_declaration(const sym_t *);
267int to_int_constant(tnode_t *, bool);
268
269/*
270 * tree.c
271 */
272const tnode_t *before_conversion(const tnode_t *);
273type_t *block_derive_type(type_t *, tspec_t);
274type_t *expr_derive_type(type_t *, tspec_t);
275bool is_compiler_builtin(const char *);
276tnode_t *build_constant(type_t *, val_t *);
277tnode_t *build_name(sym_t *, bool);
278tnode_t *build_string(buffer *);
279tnode_t *build_generic_selection(const tnode_t *,
280		    struct generic_association *);
281
282tnode_t *build_binary(tnode_t *, op_t, bool, tnode_t *);
283tnode_t *build_unary(op_t, bool, tnode_t *);
284tnode_t *build_member_access(tnode_t *, op_t, bool, sbuf_t *);
285tnode_t *cconv(tnode_t *);
286bool is_typeok_bool_compares_with_zero(const tnode_t *);
287bool typeok(op_t, int, const tnode_t *, const tnode_t *);
288tnode_t *promote(op_t, bool, tnode_t *);
289tnode_t *convert(op_t, int, type_t *, tnode_t *);
290void convert_constant(op_t, int, const type_t *, val_t *, val_t *);
291tnode_t *build_sizeof(const type_t *);
292tnode_t *build_offsetof(const type_t *, designation);
293tnode_t *build_alignof(const type_t *);
294tnode_t *cast(tnode_t *, bool, type_t *);
295tnode_t *build_function_argument(tnode_t *, tnode_t *);
296tnode_t *build_function_call(tnode_t *, bool, tnode_t *);
297val_t *integer_constant(tnode_t *, bool);
298void expr(tnode_t *, bool, bool, bool, bool);
299void check_expr_misc(const tnode_t *, bool, bool, bool, bool, bool, bool);
300bool constant_addr(const tnode_t *, const sym_t **, ptrdiff_t *);
301buffer *cat_strings(buffer *, buffer *);
302unsigned int type_size_in_bits(const type_t *);
303sym_t *find_member(const struct_or_union *, const char *);
304
305void begin_statement_expr(void);
306void do_statement_expr(tnode_t *);
307tnode_t *end_statement_expr(void);
308bool in_statement_expr(void);
309
310/*
311 * func.c
312 */
313extern sym_t *funcsym;
314extern bool reached;
315extern bool warn_about_unreachable;
316extern bool suppress_fallthrough;
317extern int nargusg;
318extern pos_t argsused_pos;
319extern int nvararg;
320extern pos_t vapos;
321extern int printflike_argnum;
322extern pos_t printflike_pos;
323extern int scanflike_argnum;
324extern pos_t scanflike_pos;
325extern bool suppress_constcond;
326extern bool llibflg;
327extern int lwarn;
328extern bool suppress_bitfieldtype;
329extern bool plibflg;
330extern bool suppress_longlong;
331
332void begin_control_statement(control_statement_kind);
333void end_control_statement(control_statement_kind);
334void check_statement_reachable(void);
335void begin_function(sym_t *);
336void end_function(void);
337void named_label(sym_t *);
338void case_label(tnode_t *);
339void default_label(void);
340void stmt_if_expr(tnode_t *);
341void stmt_if_then_stmt(void);
342void stmt_if_else_stmt(bool);
343void stmt_switch_expr(tnode_t *);
344void stmt_switch_expr_stmt(void);
345void stmt_while_expr(tnode_t *);
346void stmt_while_expr_stmt(void);
347void stmt_do(void);
348void stmt_do_while_expr(tnode_t *);
349void stmt_for_exprs(tnode_t *, tnode_t *, tnode_t *);
350void stmt_for_exprs_stmt(void);
351void stmt_goto(sym_t *);
352void stmt_continue(void);
353void stmt_break(void);
354void stmt_return(bool, tnode_t *);
355void global_clean_up_decl(bool);
356void handle_lint_comment(lint_comment, int);
357
358/*
359 * init.c
360 */
361void begin_initialization(sym_t *);
362void end_initialization(void);
363sym_t *current_initsym(void);
364
365void init_rbrace(void);
366void init_lbrace(void);
367void init_expr(tnode_t *);
368void begin_designation(void);
369void add_designator_member(sbuf_t *);
370void add_designator_subscript(range_t);
371void designation_push(designation *, designator_kind, const sym_t *, size_t);
372
373/*
374 * emit.c
375 */
376void outtype(const type_t *);
377void outsym(const sym_t *, scl_t, def_t);
378void outfdef(const sym_t *, const pos_t *, bool, bool, const sym_t *);
379void outcall(const tnode_t *, bool, bool);
380void outusg(const sym_t *);
381
382/*
383 * lex.c
384 */
385int lex_name(const char *, size_t);
386int lex_integer_constant(const char *, size_t, int);
387int lex_floating_constant(const char *, size_t);
388int lex_operator(int, op_t);
389int lex_string(void);
390int lex_wide_string(void);
391int lex_character_constant(void);
392int lex_wide_character_constant(void);
393void lex_directive(const char *);
394void lex_next_line(void);
395void lex_comment(void);
396void lex_slash_slash_comment(void);
397void lex_unknown_character(int);
398int lex_input(void);
399bool quoted_next(const buffer *, quoted_iterator *);
400
401/*
402 * ckbool.c
403 */
404bool typeok_scalar_strict_bool(op_t, const mod_t *, int,
405		    const tnode_t *, const tnode_t *);
406bool fallback_symbol_strict_bool(sym_t *);
407
408/*
409 * ckctype.c
410 */
411void check_ctype_function_call(const tnode_t *, const tnode_t *);
412void check_ctype_macro_invocation(const tnode_t *, const tnode_t *);
413
414/*
415 * ckgetopt.c
416 */
417void check_getopt_begin_while(const tnode_t *);
418void check_getopt_begin_switch(void);
419void check_getopt_case_label(int64_t);
420void check_getopt_end_switch(void);
421void check_getopt_end_while(void);
422