externs1.h revision 1.204 
1/*	$NetBSD: externs1.h,v 1.204 2023/08/01 16:08:58 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(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;
182
183void	msglist(void);
184void	error_at(int, const pos_t *, ...);
185void	warning_at(int, const pos_t *, ...);
186void	message_at(int, const pos_t *, ...);
187void	error(int, ...);
188void	warning(int, ...);
189bool	gnuism(int, ...);
190void	c99ism(int, ...);
191void	c11ism(int, ...);
192void	c23ism(int, ...);
193void	assert_failed(const char *, int, const char *, const char *) __dead;
194void	update_location(const char *, int, bool, bool);
195void	suppress_messages(const char *);
196
197void	query_message(int, ...);
198void	enable_queries(const char *);
199
200/*
201 * decl.c
202 */
203extern	decl_level *dcs;
204extern	const char unnamed[];
205extern	int	enumval;
206
207void	initdecl(void);
208type_t	*gettyp(tspec_t);
209type_t	*block_dup_type(const type_t *);
210type_t	*expr_dup_type(const type_t *);
211type_t	*expr_unqualified_type(const type_t *);
212bool	is_incomplete(const type_t *);
213void	dcs_add_function_specifier(function_specifier);
214void	dcs_add_storage_class(scl_t);
215void	dcs_add_type(type_t *);
216void	dcs_add_qualifiers(type_qualifiers);
217void	dcs_add_packed(void);
218void	dcs_set_used(void);
219void	begin_declaration_level(decl_level_kind);
220void	end_declaration_level(void);
221void	dcs_set_asm(void);
222void	dcs_begin_type(void);
223void	dcs_end_type(void);
224int	length_in_bits(const type_t *, const char *);
225unsigned int alignment_in_bits(const type_t *);
226sym_t	*concat_symbols(sym_t *, sym_t *);
227void	check_type(sym_t *);
228sym_t	*declare_unnamed_member(void);
229sym_t	*declare_member(sym_t *);
230sym_t	*set_bit_field_width(sym_t *, int);
231void	add_type_qualifiers(type_qualifiers *, type_qualifiers);
232qual_ptr *append_qualified_pointer(qual_ptr *, qual_ptr *);
233sym_t	*add_pointer(sym_t *, qual_ptr *);
234sym_t	*add_array(sym_t *, bool, int);
235sym_t	*add_function(sym_t *, struct parameter_list);
236void	check_extern_declaration(const sym_t *);
237void	check_function_definition(sym_t *, bool);
238sym_t	*declarator_name(sym_t *);
239sym_t	*old_style_function_parameter_name(sym_t *);
240type_t	*make_tag_type(sym_t *, tspec_t, bool, bool);
241const	char *storage_class_name(scl_t);
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_argument(sym_t *, bool);
252void	check_func_lint_directives(void);
253void	check_func_old_style_arguments(void);
254
255void	declare_local(sym_t *, bool);
256sym_t	*abstract_name(void);
257void	global_clean_up(void);
258sym_t	*declare_abstract_type(sym_t *);
259void	check_size(const sym_t *);
260void	mark_as_set(sym_t *);
261void	mark_as_used(sym_t *, bool, bool);
262void	check_usage(const decl_level *);
263void	check_usage_sym(bool, const sym_t *);
264void	end_translation_unit(void);
265void	print_previous_declaration(const sym_t *);
266int	to_int_constant(tnode_t *, bool);
267
268/*
269 * tree.c
270 */
271const tnode_t *before_conversion(const tnode_t *);
272type_t	*block_derive_type(type_t *, tspec_t);
273type_t	*expr_derive_type(type_t *, tspec_t);
274bool	is_compiler_builtin(const char *);
275tnode_t	*build_constant(type_t *, val_t *);
276tnode_t	*build_name(sym_t *, bool);
277tnode_t	*build_string(strg_t *);
278tnode_t	*build_generic_selection(const tnode_t *,
279		    struct generic_association *);
280
281tnode_t	*build_binary(tnode_t *, op_t, bool, tnode_t *);
282tnode_t	*build_unary(op_t, bool, tnode_t *);
283tnode_t	*build_member_access(tnode_t *, op_t, bool, sbuf_t *);
284tnode_t	*cconv(tnode_t *);
285bool	is_typeok_bool_compares_with_zero(const tnode_t *);
286bool	typeok(op_t, int, const tnode_t *, const tnode_t *);
287tnode_t	*promote(op_t, bool, tnode_t *);
288tnode_t	*convert(op_t, int, type_t *, tnode_t *);
289void	convert_constant(op_t, int, const type_t *, val_t *, val_t *);
290tnode_t	*build_sizeof(const type_t *);
291tnode_t	*build_offsetof(const type_t *, const sym_t *);
292tnode_t	*build_alignof(const type_t *);
293tnode_t	*cast(tnode_t *, type_t *);
294tnode_t	*build_function_argument(tnode_t *, tnode_t *);
295tnode_t	*build_function_call(tnode_t *, bool, tnode_t *);
296val_t	*integer_constant(tnode_t *, bool);
297void	expr(tnode_t *, bool, bool, bool, bool);
298void	check_expr_misc(const tnode_t *, bool, bool, bool, bool, bool, bool);
299bool	constant_addr(const tnode_t *, const sym_t **, ptrdiff_t *);
300strg_t	*cat_strings(strg_t *, strg_t *);
301unsigned int type_size_in_bits(const type_t *);
302sym_t	*find_member(const struct_or_union *, const char *);
303
304void begin_statement_expr(void);
305void do_statement_expr(tnode_t *);
306tnode_t *end_statement_expr(void);
307bool in_statement_expr(void);
308
309/*
310 * func.c
311 */
312extern	sym_t	*funcsym;
313extern	bool	reached;
314extern	bool	warn_about_unreachable;
315extern	bool	suppress_fallthrough;
316extern	int	nargusg;
317extern	pos_t	argsused_pos;
318extern	int	nvararg;
319extern	pos_t	vapos;
320extern	int	printflike_argnum;
321extern	pos_t	printflike_pos;
322extern	int	scanflike_argnum;
323extern	pos_t	scanflike_pos;
324extern	bool	suppress_constcond;
325extern	bool	llibflg;
326extern	int	lwarn;
327extern	bool	suppress_bitfieldtype;
328extern	bool	plibflg;
329extern	bool	suppress_longlong;
330
331void	begin_control_statement(control_statement_kind);
332void	end_control_statement(control_statement_kind);
333void	check_statement_reachable(void);
334void	begin_function(sym_t *);
335void	end_function(void);
336void	named_label(sym_t *);
337void	case_label(tnode_t *);
338void	default_label(void);
339void	stmt_if_expr(tnode_t *);
340void	stmt_if_then_stmt(void);
341void	stmt_if_else_stmt(bool);
342void	stmt_switch_expr(tnode_t *);
343void	stmt_switch_expr_stmt(void);
344void	stmt_while_expr(tnode_t *);
345void	stmt_while_expr_stmt(void);
346void	stmt_do(void);
347void	stmt_do_while_expr(tnode_t *);
348void	stmt_for_exprs(tnode_t *, tnode_t *, tnode_t *);
349void	stmt_for_exprs_stmt(void);
350void	stmt_goto(sym_t *);
351void	stmt_continue(void);
352void	stmt_break(void);
353void	stmt_return(bool, tnode_t *);
354void	global_clean_up_decl(bool);
355void	handle_lint_comment(lint_comment, int);
356
357/*
358 * init.c
359 */
360void	begin_initialization(sym_t *);
361void	end_initialization(void);
362sym_t	*current_initsym(void);
363
364void	init_rbrace(void);
365void	init_lbrace(void);
366void	init_expr(tnode_t *);
367void	begin_designation(void);
368void	add_designator_member(sbuf_t *);
369void	add_designator_subscript(range_t);
370
371/*
372 * emit.c
373 */
374void	outtype(const type_t *);
375void	outsym(const sym_t *, scl_t, def_t);
376void	outfdef(const sym_t *, const pos_t *, bool, bool, const sym_t *);
377void	outcall(const tnode_t *, bool, bool);
378void	outusg(const sym_t *);
379
380/*
381 * lex.c
382 */
383int	lex_name(const char *, size_t);
384int	lex_integer_constant(const char *, size_t, int);
385int	lex_floating_constant(const char *, size_t);
386int	lex_operator(int, op_t);
387int	lex_string(void);
388int	lex_wide_string(void);
389int	lex_character_constant(void);
390int	lex_wide_character_constant(void);
391void	lex_directive(const char *);
392void	lex_next_line(void);
393void	lex_comment(void);
394void	lex_slash_slash_comment(void);
395void	lex_unknown_character(int);
396int	lex_input(void);
397
398/*
399 * ckbool.c
400 */
401bool	typeok_scalar_strict_bool(op_t, const mod_t *, int,
402		    const tnode_t *, const tnode_t *);
403bool	fallback_symbol_strict_bool(sym_t *);
404
405/*
406 * ckctype.c
407 */
408void	check_ctype_function_call(const tnode_t *, const tnode_t *);
409void	check_ctype_macro_invocation(const tnode_t *, const tnode_t *);
410
411/*
412 * ckgetopt.c
413 */
414void	check_getopt_begin_while(const tnode_t *);
415void	check_getopt_begin_switch(void);
416void	check_getopt_case_label(int64_t);
417void	check_getopt_end_switch(void);
418void	check_getopt_end_while(void);
419