externs1.h revision 1.155 1 /* $NetBSD: externs1.h,v 1.155 2022/04/16 13:25:27 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 /*
35 * main.c
36 */
37 extern int aflag;
38 extern bool bflag;
39 extern bool cflag;
40 extern bool eflag;
41 extern bool Fflag;
42 extern bool hflag;
43 extern bool pflag;
44 extern bool rflag;
45 extern bool uflag;
46 extern bool vflag;
47 extern bool yflag;
48 extern bool wflag;
49 extern bool zflag;
50 extern bool Tflag;
51 extern bool Pflag;
52
53 extern bool allow_trad;
54 extern bool allow_c90;
55 extern bool allow_c99;
56 extern bool allow_c11;
57 extern bool allow_gcc;
58
59 /*
60 * TODO: Replace the old flags with the new expressions, checking in each
61 * case whether the specific condition still makes sense. When lint was
62 * invented in 1995, it did not know about C99 mode, which makes all
63 * conditions involving tflag and sflag suspicious.
64 *
65 * In 1995, gflag meant "C90 plus GCC extensions". That definition needs to
66 * be extended to C99 and later as well to properly match "C99 + GCC" or "C11
67 * + GCC".
68 */
69 #define tflag (allow_trad && !allow_c90)
70 #define sflag (!allow_trad && !allow_c99)
71 #define Sflag (!!allow_c99)
72 #define c11flag (!!allow_c11)
73 #define gflag (!!allow_gcc)
74
75 extern void norecover(void);
76
77 /*
78 * cgram.y
79 */
80 extern int block_level;
81 extern size_t mem_block_level;
82 extern int yydebug;
83
84 extern int yyerror(const char *);
85 extern int yyparse(void);
86
87 /*
88 * scan.l
89 */
90 extern bool in_gcc_attribute;
91 extern pos_t curr_pos;
92 extern pos_t csrc_pos;
93 extern bool in_system_header;
94 extern symt_t symtyp;
95 extern FILE *yyin;
96
97 extern void initscan(void);
98 extern int64_t convert_integer(int64_t, tspec_t, unsigned int);
99 extern void clear_warn_flags(void);
100 extern sym_t *getsym(sbuf_t *);
101 extern void clean_up_after_error(void);
102 extern sym_t *pushdown(const sym_t *);
103 extern sym_t *mktempsym(type_t *);
104 extern void rmsym(sym_t *);
105 extern void rmsyms(sym_t *);
106 extern void inssym(int, sym_t *);
107 extern void freeyyv(void *, int);
108 extern int yylex(void);
109
110 /*
111 * mem1.c
112 */
113 extern const char *record_filename(const char *, size_t);
114 extern int get_filename_id(const char *);
115 extern void add_directory_replacement(char *);
116 extern const char *transform_filename(const char *, size_t);
117
118 extern void initmem(void);
119
120 extern void *block_zero_alloc(size_t);
121 extern void *level_zero_alloc(size_t, size_t);
122 extern void level_free_all(size_t);
123
124 extern void *expr_zero_alloc(size_t);
125 extern tnode_t *expr_alloc_tnode(void);
126 extern void expr_free_all(void);
127 extern struct memory_block *expr_save_memory(void);
128 extern void expr_restore_memory(struct memory_block *);
129
130 /*
131 * debug.c
132 */
133
134 #ifdef DEBUG
135 const char *declaration_kind_name(declaration_kind);
136 const char *scl_name(scl_t);
137 const char *symt_name(symt_t);
138 const char *tqual_name(tqual_t);
139 void debug_dinfo(const dinfo_t *);
140 void debug_node(const tnode_t *);
141 void debug_sym(const char *, const sym_t *, const char *);
142 void debug_symtab(void);
143 void debug_printf(const char *fmt, ...) __printflike(1, 2);
144 void debug_print_indent(void);
145 void debug_indent_inc(void);
146 void debug_indent_dec(void);
147 void debug_enter(const char *);
148 void debug_step(const char *fmt, ...) __printflike(1, 2);
149 void debug_leave(const char *);
150 #define debug_enter() (debug_enter)(__func__)
151 #define debug_leave() (debug_leave)(__func__)
152 #else
153 #define debug_noop() do { } while (false)
154 #define debug_dinfo(d) debug_noop()
155 #define debug_sym(p, sym, s) debug_noop()
156 #define debug_symtab() debug_noop()
157 #define debug_node(tn) debug_noop()
158 #define debug_printf(...) debug_noop()
159 #define debug_print_indent() debug_noop()
160 #define debug_indent_inc() debug_noop()
161 #define debug_indent_dec() debug_noop()
162 #define debug_enter() debug_noop()
163 #define debug_step(...) debug_noop()
164 #define debug_leave() debug_noop()
165 #endif
166
167 /*
168 * err.c
169 */
170 extern int nerr;
171 extern int sytxerr;
172 extern const char *const msgs[];
173
174 extern void msglist(void);
175 extern void error_at(int, const pos_t *, ...);
176 extern void warning_at(int, const pos_t *, ...);
177 extern void message_at(int, const pos_t *, ...);
178 extern void error(int, ...);
179 extern void warning(int, ...);
180 extern void gnuism(int, ...);
181 extern void c99ism(int, ...);
182 extern void c11ism(int, ...);
183 extern void internal_error(const char *, int, const char *, ...)
184 __attribute__((__noreturn__,__format__(__printf__, 3, 4)));
185 extern void assert_failed(const char *, int, const char *, const char *)
186 __attribute__((__noreturn__));
187 extern void update_location(const char *, int, bool, bool);
188
189 /*
190 * decl.c
191 */
192 extern dinfo_t *dcs;
193 extern const char *unnamed;
194 extern int enumval;
195
196 extern void initdecl(void);
197 extern type_t *gettyp(tspec_t);
198 extern type_t *block_dup_type(const type_t *);
199 extern type_t *expr_dup_type(const type_t *);
200 extern type_t *expr_unqualified_type(const type_t *);
201 extern bool is_incomplete(const type_t *);
202 extern void add_storage_class(scl_t);
203 extern void add_type(type_t *);
204 extern void add_qualifier(tqual_t);
205 extern void addpacked(void);
206 extern void add_attr_used(void);
207 extern void begin_declaration_level(declaration_kind);
208 extern void end_declaration_level(void);
209 extern void setasm(void);
210 extern void begin_type(void);
211 extern void end_type(void);
212 extern int length_in_bits(const type_t *, const char *);
213 extern unsigned int alignment_in_bits(const type_t *);
214 extern sym_t *lnklst(sym_t *, sym_t *);
215 extern void check_type(sym_t *);
216 extern sym_t *declarator_1_struct_union(sym_t *);
217 extern sym_t *bitfield(sym_t *, int);
218 extern qual_ptr *merge_qualified_pointer(qual_ptr *, qual_ptr *);
219 extern sym_t *add_pointer(sym_t *, qual_ptr *);
220 extern sym_t *add_array(sym_t *, bool, int);
221 extern sym_t *add_function(sym_t *, sym_t *);
222 extern void check_function_definition(sym_t *, bool);
223 extern sym_t *declarator_name(sym_t *);
224 extern sym_t *old_style_function_name(sym_t *);
225 extern type_t *mktag(sym_t *, tspec_t, bool, bool);
226 extern const char *storage_class_name(scl_t);
227 extern type_t *complete_tag_struct_or_union(type_t *, sym_t *);
228 extern type_t *complete_tag_enum(type_t *, sym_t *);
229 extern sym_t *enumeration_constant(sym_t *, int, bool);
230 extern void declare(sym_t *, bool, sbuf_t *);
231 extern void copy_usage_info(sym_t *, sym_t *);
232 extern bool check_redeclaration(sym_t *, bool *);
233 extern bool eqptrtype(const type_t *, const type_t *, bool);
234 extern bool eqtype(const type_t *, const type_t *, bool, bool, bool *);
235 extern void complete_type(sym_t *, sym_t *);
236 extern sym_t *declare_argument(sym_t *, bool);
237 extern void check_func_lint_directives(void);
238 extern void check_func_old_style_arguments(void);
239
240 extern void declare_local(sym_t *, bool);
241 extern sym_t *abstract_name(void);
242 extern void global_clean_up(void);
243 extern sym_t *declare_1_abstract(sym_t *);
244 extern void check_size(sym_t *);
245 extern void mark_as_set(sym_t *);
246 extern void mark_as_used(sym_t *, bool, bool);
247 extern void check_usage(dinfo_t *);
248 extern void check_usage_sym(bool, sym_t *);
249 extern void check_global_symbols(void);
250 extern void print_previous_declaration(int, const sym_t *);
251 extern int to_int_constant(tnode_t *, bool);
252
253 /*
254 * tree.c
255 */
256 extern const tnode_t *before_conversion(const tnode_t *);
257 extern type_t *block_derive_type(type_t *, tspec_t);
258 extern type_t *expr_derive_type(type_t *, tspec_t);
259 extern bool is_compiler_builtin(const char *);
260 extern tnode_t *build_constant(type_t *, val_t *);
261 extern tnode_t *build_name(sym_t *, bool);
262 extern tnode_t *build_string(strg_t *);
263 extern tnode_t *build_generic_selection(const tnode_t *,
264 struct generic_association *);
265
266 extern tnode_t *build_binary(tnode_t *, op_t, bool, tnode_t *);
267 extern tnode_t *build_unary(op_t, bool, tnode_t *);
268 extern tnode_t *build_member_access(tnode_t *, op_t, bool, sbuf_t *);
269 extern tnode_t *cconv(tnode_t *);
270 extern bool is_typeok_bool_operand(const tnode_t *);
271 extern bool typeok(op_t, int, const tnode_t *, const tnode_t *);
272 extern tnode_t *promote(op_t, bool, tnode_t *);
273 extern tnode_t *convert(op_t, int, type_t *, tnode_t *);
274 extern void convert_constant(op_t, int, const type_t *, val_t *, val_t *);
275 extern tnode_t *build_sizeof(const type_t *);
276 extern tnode_t *build_offsetof(const type_t *, const sym_t *);
277 extern tnode_t *build_alignof(const type_t *);
278 extern tnode_t *cast(tnode_t *, type_t *);
279 extern tnode_t *build_function_argument(tnode_t *, tnode_t *);
280 extern tnode_t *build_function_call(tnode_t *, bool, tnode_t *);
281 extern val_t *constant(tnode_t *, bool);
282 extern void expr(tnode_t *, bool, bool, bool, bool);
283 extern void check_expr_misc(const tnode_t *, bool, bool, bool,
284 bool, bool, bool);
285 extern bool constant_addr(const tnode_t *, const sym_t **, ptrdiff_t *);
286 extern strg_t *cat_strings(strg_t *, strg_t *);
287 extern unsigned int type_size_in_bits(const type_t *);
288
289 void begin_statement_expr(void);
290 void do_statement_expr(tnode_t *);
291 tnode_t *end_statement_expr(void);
292
293 /*
294 * func.c
295 */
296 extern sym_t *funcsym;
297 extern bool reached;
298 extern bool warn_about_unreachable;
299 extern bool seen_fallthrough;
300 extern int nargusg;
301 extern pos_t argsused_pos;
302 extern int nvararg;
303 extern pos_t vapos;
304 extern int printflike_argnum;
305 extern pos_t printflike_pos;
306 extern int scanflike_argnum;
307 extern pos_t scanflike_pos;
308 extern bool constcond_flag;
309 extern bool llibflg;
310 extern int lwarn;
311 extern bool bitfieldtype_ok;
312 extern bool plibflg;
313 extern bool quadflg;
314
315 extern void begin_control_statement(control_statement_kind);
316 extern void end_control_statement(control_statement_kind);
317 extern void check_statement_reachable(void);
318 extern void funcdef(sym_t *);
319 extern void funcend(void);
320 extern void named_label(sym_t *);
321 extern void case_label(tnode_t *);
322 extern void default_label(void);
323 extern void if1(tnode_t *);
324 extern void if2(void);
325 extern void if3(bool);
326 extern void switch1(tnode_t *);
327 extern void switch2(void);
328 extern void while1(tnode_t *);
329 extern void while2(void);
330 extern void do1(void);
331 extern void do2(tnode_t *);
332 extern void for1(tnode_t *, tnode_t *, tnode_t *);
333 extern void for2(void);
334 extern void do_goto(sym_t *);
335 extern void do_continue(void);
336 extern void do_break(void);
337 extern void do_return(bool, tnode_t *);
338 extern void global_clean_up_decl(bool);
339 extern void argsused(int);
340 extern void constcond(int);
341 extern void fallthru(int);
342 extern void not_reached(int);
343 extern void lintlib(int);
344 extern void linted(int);
345 extern void varargs(int);
346 extern void printflike(int);
347 extern void scanflike(int);
348 extern void protolib(int);
349 extern void longlong(int);
350 extern void bitfieldtype(int);
351
352 /*
353 * init.c
354 */
355 extern void begin_initialization(sym_t *);
356 extern void end_initialization(void);
357 extern sym_t **current_initsym(void);
358
359 extern void init_rbrace(void);
360 extern void init_lbrace(void);
361 extern void init_expr(tnode_t *);
362 extern void begin_designation(void);
363 extern void add_designator_member(sbuf_t *);
364 extern void add_designator_subscript(range_t);
365
366 /*
367 * emit.c
368 */
369 extern void outtype(const type_t *);
370 extern void outsym(const sym_t *, scl_t, def_t);
371 extern void outfdef(const sym_t *, const pos_t *, bool, bool,
372 const sym_t *);
373 extern void outcall(const tnode_t *, bool, bool);
374 extern void outusg(const sym_t *);
375
376 /*
377 * lex.c
378 */
379 extern int lex_name(const char *, size_t);
380 extern int lex_integer_constant(const char *, size_t, int);
381 extern int lex_floating_constant(const char *, size_t);
382 extern int lex_operator(int, op_t);
383 extern int lex_string(void);
384 extern int lex_wide_string(void);
385 extern int lex_character_constant(void);
386 extern int lex_wide_character_constant(void);
387 extern void lex_directive(const char *);
388 extern void lex_next_line(void);
389 extern void lex_comment(void);
390 extern void lex_slash_slash_comment(void);
391 extern void lex_unknown_character(int);
392 extern int lex_input(void);
393
394 /*
395 * ckbool.c
396 */
397 extern bool typeok_scalar_strict_bool(op_t, const mod_t *, int,
398 const tnode_t *, const tnode_t *);
399 extern bool fallback_symbol_strict_bool(sym_t *);
400
401 /*
402 * ckctype.c
403 */
404 extern void check_ctype_function_call(const tnode_t *, const tnode_t *);
405 extern void check_ctype_macro_invocation(const tnode_t *, const tnode_t *);
406
407 /*
408 * ckgetopt.c
409 */
410 extern void check_getopt_begin_while(const tnode_t *);
411 extern void check_getopt_begin_switch(void);
412 extern void check_getopt_case_label(int64_t);
413 extern void check_getopt_end_switch(void);
414 extern void check_getopt_end_while(void);
415