grammar.tab.c revision 1.3
1 /* $NetBSD: grammar.tab.c,v 1.3 2018/12/23 15:38:54 christos Exp $ */ 2 3 /* original parser id follows */ 4 /* yysccsid[] = "@(#)yaccpar 1.9 (Berkeley) 02/21/93" */ 5 /* (use YYMAJOR/YYMINOR for ifdefs dependent on parser version) */ 6 7 #define YYBYACC 1 8 #define YYMAJOR 1 9 #define YYMINOR 9 10 #define YYCHECK "yyyymmdd" 11 12 #define YYEMPTY (-1) 13 #define yyclearin (yychar = YYEMPTY) 14 #define yyerrok (yyerrflag = 0) 15 #define YYRECOVERING() (yyerrflag != 0) 16 #define YYENOMEM (-2) 17 #define YYEOF 0 18 19 #ifndef yyparse 20 #define yyparse grammar_parse 21 #endif /* yyparse */ 22 23 #ifndef yylex 24 #define yylex grammar_lex 25 #endif /* yylex */ 26 27 #ifndef yyerror 28 #define yyerror grammar_error 29 #endif /* yyerror */ 30 31 #ifndef yychar 32 #define yychar grammar_char 33 #endif /* yychar */ 34 35 #ifndef yyval 36 #define yyval grammar_val 37 #endif /* yyval */ 38 39 #ifndef yylval 40 #define yylval grammar_lval 41 #endif /* yylval */ 42 43 #ifndef yydebug 44 #define yydebug grammar_debug 45 #endif /* yydebug */ 46 47 #ifndef yynerrs 48 #define yynerrs grammar_nerrs 49 #endif /* yynerrs */ 50 51 #ifndef yyerrflag 52 #define yyerrflag grammar_errflag 53 #endif /* yyerrflag */ 54 55 #ifndef yylhs 56 #define yylhs grammar_lhs 57 #endif /* yylhs */ 58 59 #ifndef yylen 60 #define yylen grammar_len 61 #endif /* yylen */ 62 63 #ifndef yydefred 64 #define yydefred grammar_defred 65 #endif /* yydefred */ 66 67 #ifndef yydgoto 68 #define yydgoto grammar_dgoto 69 #endif /* yydgoto */ 70 71 #ifndef yysindex 72 #define yysindex grammar_sindex 73 #endif /* yysindex */ 74 75 #ifndef yyrindex 76 #define yyrindex grammar_rindex 77 #endif /* yyrindex */ 78 79 #ifndef yygindex 80 #define yygindex grammar_gindex 81 #endif /* yygindex */ 82 83 #ifndef yytable 84 #define yytable grammar_table 85 #endif /* yytable */ 86 87 #ifndef yycheck 88 #define yycheck grammar_check 89 #endif /* yycheck */ 90 91 #ifndef yyname 92 #define yyname grammar_name 93 #endif /* yyname */ 94 95 #ifndef yyrule 96 #define yyrule grammar_rule 97 #endif /* yyrule */ 98 #define YYPREFIX "grammar_" 99 100 #define YYPURE 0 101 102 #line 9 "grammar.y" 103 #ifdef YYBISON 104 #include <stdlib.h> 105 #define YYSTYPE_IS_DECLARED 106 #define yyerror yaccError 107 #endif 108 109 #if defined(YYBISON) || !defined(YYBYACC) 110 static void yyerror(const char *s); 111 #endif 112 #line 81 "grammar.y" 113 #include <stdio.h> 114 #include <ctype.h> 115 #include <string.h> 116 117 #define OPT_LINTLIBRARY 1 118 119 #ifndef TRUE 120 #define TRUE (1) 121 #endif 122 123 #ifndef FALSE 124 #define FALSE (0) 125 #endif 126 127 /* #include "cproto.h" */ 128 #define MAX_TEXT_SIZE 1024 129 #define TEXT_LEN (MAX_TEXT_SIZE / 2 - 3) 130 131 /* Prototype styles */ 132 #if OPT_LINTLIBRARY 133 #define PROTO_ANSI_LLIB -2 /* form ANSI lint-library source */ 134 #define PROTO_LINTLIBRARY -1 /* form lint-library source */ 135 #endif 136 #define PROTO_NONE 0 /* do not output any prototypes */ 137 #define PROTO_TRADITIONAL 1 /* comment out parameters */ 138 #define PROTO_ABSTRACT 2 /* comment out parameter names */ 139 #define PROTO_ANSI 3 /* ANSI C prototype */ 140 141 typedef int PrototypeStyle; 142 143 typedef char boolean; 144 145 extern boolean types_out; 146 extern PrototypeStyle proto_style; 147 148 #define ansiLintLibrary() (proto_style == PROTO_ANSI_LLIB) 149 #define knrLintLibrary() (proto_style == PROTO_LINTLIBRARY) 150 #define lintLibrary() (knrLintLibrary() || ansiLintLibrary()) 151 152 #if OPT_LINTLIBRARY 153 #define FUNC_UNKNOWN -1 /* unspecified */ 154 #else 155 #define FUNC_UNKNOWN 0 /* unspecified (same as FUNC_NONE) */ 156 #endif 157 #define FUNC_NONE 0 /* not a function definition */ 158 #define FUNC_TRADITIONAL 1 /* traditional style */ 159 #define FUNC_ANSI 2 /* ANSI style */ 160 #define FUNC_BOTH 3 /* both styles */ 161 162 typedef int FuncDefStyle; 163 164 /* Source file text */ 165 typedef struct text { 166 char text[MAX_TEXT_SIZE]; /* source text */ 167 long begin; /* offset in temporary file */ 168 } Text; 169 170 /* Declaration specifier flags */ 171 #define DS_NONE 0 /* default */ 172 #define DS_EXTERN 1 /* contains "extern" specifier */ 173 #define DS_STATIC 2 /* contains "static" specifier */ 174 #define DS_CHAR 4 /* contains "char" type specifier */ 175 #define DS_SHORT 8 /* contains "short" type specifier */ 176 #define DS_FLOAT 16 /* contains "float" type specifier */ 177 #define DS_INLINE 32 /* contains "inline" specifier */ 178 #define DS_JUNK 64 /* we're not interested in this declaration */ 179 180 /* This structure stores information about a declaration specifier. */ 181 typedef struct decl_spec { 182 unsigned short flags; /* flags defined above */ 183 char *text; /* source text */ 184 long begin; /* offset in temporary file */ 185 } DeclSpec; 186 187 /* This is a list of function parameters. */ 188 typedef struct _ParameterList { 189 struct parameter *first; /* pointer to first parameter in list */ 190 struct parameter *last; /* pointer to last parameter in list */ 191 long begin_comment; /* begin offset of comment */ 192 long end_comment; /* end offset of comment */ 193 char *comment; /* comment at start of parameter list */ 194 } ParameterList; 195 196 /* This structure stores information about a declarator. */ 197 typedef struct _Declarator { 198 char *name; /* name of variable or function */ 199 char *text; /* source text */ 200 long begin; /* offset in temporary file */ 201 long begin_comment; /* begin offset of comment */ 202 long end_comment; /* end offset of comment */ 203 FuncDefStyle func_def; /* style of function definition */ 204 ParameterList params; /* function parameters */ 205 boolean pointer; /* TRUE if it declares a pointer */ 206 struct _Declarator *head; /* head function declarator */ 207 struct _Declarator *func_stack; /* stack of function declarators */ 208 struct _Declarator *next; /* next declarator in list */ 209 } Declarator; 210 211 /* This structure stores information about a function parameter. */ 212 typedef struct parameter { 213 struct parameter *next; /* next parameter in list */ 214 DeclSpec decl_spec; 215 Declarator *declarator; 216 char *comment; /* comment following the parameter */ 217 } Parameter; 218 219 /* This is a list of declarators. */ 220 typedef struct declarator_list { 221 Declarator *first; /* pointer to first declarator in list */ 222 Declarator *last; /* pointer to last declarator in list */ 223 } DeclaratorList; 224 225 /* #include "symbol.h" */ 226 typedef struct symbol { 227 struct symbol *next; /* next symbol in list */ 228 char *name; /* name of symbol */ 229 char *value; /* value of symbol (for defines) */ 230 short flags; /* symbol attributes */ 231 } Symbol; 232 233 /* parser stack entry type */ 234 typedef union { 235 Text text; 236 DeclSpec decl_spec; 237 Parameter *parameter; 238 ParameterList param_list; 239 Declarator *declarator; 240 DeclaratorList decl_list; 241 } YYSTYPE; 242 243 /* The hash table length should be a prime number. */ 244 #define SYM_MAX_HASH 251 245 246 typedef struct symbol_table { 247 Symbol *bucket[SYM_MAX_HASH]; /* hash buckets */ 248 } SymbolTable; 249 250 extern SymbolTable *new_symbol_table /* Create symbol table */ 251 (void); 252 extern void free_symbol_table /* Destroy symbol table */ 253 (SymbolTable *s); 254 extern Symbol *find_symbol /* Lookup symbol name */ 255 (SymbolTable *s, const char *n); 256 extern Symbol *new_symbol /* Define new symbol */ 257 (SymbolTable *s, const char *n, const char *v, int f); 258 259 /* #include "semantic.h" */ 260 extern void new_decl_spec (DeclSpec *, const char *, long, int); 261 extern void free_decl_spec (DeclSpec *); 262 extern void join_decl_specs (DeclSpec *, DeclSpec *, DeclSpec *); 263 extern void check_untagged (DeclSpec *); 264 extern Declarator *new_declarator (const char *, const char *, long); 265 extern void free_declarator (Declarator *); 266 extern void new_decl_list (DeclaratorList *, Declarator *); 267 extern void free_decl_list (DeclaratorList *); 268 extern void add_decl_list (DeclaratorList *, DeclaratorList *, Declarator *); 269 extern Parameter *new_parameter (DeclSpec *, Declarator *); 270 extern void free_parameter (Parameter *); 271 extern void new_param_list (ParameterList *, Parameter *); 272 extern void free_param_list (ParameterList *); 273 extern void add_param_list (ParameterList *, ParameterList *, Parameter *); 274 extern void new_ident_list (ParameterList *); 275 extern void add_ident_list (ParameterList *, ParameterList *, const char *); 276 extern void set_param_types (ParameterList *, DeclSpec *, DeclaratorList *); 277 extern void gen_declarations (DeclSpec *, DeclaratorList *); 278 extern void gen_prototype (DeclSpec *, Declarator *); 279 extern void gen_func_declarator (Declarator *); 280 extern void gen_func_definition (DeclSpec *, Declarator *); 281 282 extern void init_parser (void); 283 extern void process_file (FILE *infile, char *name); 284 extern char *cur_text (void); 285 extern char *cur_file_name (void); 286 extern char *implied_typedef (void); 287 extern void include_file (char *name, int convert); 288 extern char *supply_parm (int count); 289 extern char *xstrdup (const char *); 290 extern int already_declared (char *name); 291 extern int is_actual_func (Declarator *d); 292 extern int lint_ellipsis (Parameter *p); 293 extern int want_typedef (void); 294 extern void begin_tracking (void); 295 extern void begin_typedef (void); 296 extern void copy_typedef (char *s); 297 extern void ellipsis_varargs (Declarator *d); 298 extern void end_typedef (void); 299 extern void flush_varargs (void); 300 extern void fmt_library (int code); 301 extern void imply_typedef (const char *s); 302 extern void indent (FILE *outf); 303 extern void put_blankline (FILE *outf); 304 extern void put_body (FILE *outf, DeclSpec *decl_spec, Declarator *declarator); 305 extern void put_char (FILE *outf, int c); 306 extern void put_error (void); 307 extern void put_newline (FILE *outf); 308 extern void put_padded (FILE *outf, const char *s); 309 extern void put_string (FILE *outf, const char *s); 310 extern void track_in (void); 311 312 extern boolean file_comments; 313 extern FuncDefStyle func_style; 314 extern char base_file[]; 315 316 extern int yylex (void); 317 318 /* declaration specifier attributes for the typedef statement currently being 319 * scanned 320 */ 321 static int cur_decl_spec_flags; 322 323 /* pointer to parameter list for the current function definition */ 324 static ParameterList *func_params; 325 326 /* A parser semantic action sets this pointer to the current declarator in 327 * a function parameter declaration in order to catch any comments following 328 * the parameter declaration on the same line. If the lexer scans a comment 329 * and <cur_declarator> is not NULL, then the comment is attached to the 330 * declarator. To ignore subsequent comments, the lexer sets this to NULL 331 * after scanning a comment or end of line. 332 */ 333 static Declarator *cur_declarator; 334 335 /* temporary string buffer */ 336 static char buf[MAX_TEXT_SIZE]; 337 338 /* table of typedef names */ 339 static SymbolTable *typedef_names; 340 341 /* table of define names */ 342 static SymbolTable *define_names; 343 344 /* table of type qualifiers */ 345 static SymbolTable *type_qualifiers; 346 347 /* information about the current input file */ 348 typedef struct { 349 char *base_name; /* base input file name */ 350 char *file_name; /* current file name */ 351 FILE *file; /* input file */ 352 unsigned line_num; /* current line number in input file */ 353 FILE *tmp_file; /* temporary file */ 354 long begin_comment; /* tmp file offset after last written ) or ; */ 355 long end_comment; /* tmp file offset after last comment */ 356 boolean convert; /* if TRUE, convert function definitions */ 357 boolean changed; /* TRUE if conversion done in this file */ 358 } IncludeStack; 359 360 static IncludeStack *cur_file; /* current input file */ 361 362 /* #include "yyerror.c" */ 363 364 static int haveAnsiParam (void); 365 366 367 /* Flags to enable us to find if a procedure returns a value. 368 */ 369 static int return_val; /* nonzero on BRACES iff return-expression found */ 370 371 static const char * 372 dft_decl_spec (void) 373 { 374 return (lintLibrary() && !return_val) ? "void" : "int"; 375 } 376 377 static int 378 haveAnsiParam (void) 379 { 380 Parameter *p; 381 if (func_params != 0) { 382 for (p = func_params->first; p != 0; p = p->next) { 383 if (p->declarator->func_def == FUNC_ANSI) { 384 return TRUE; 385 } 386 } 387 } 388 return FALSE; 389 } 390 #line 389 "grammar.tab.c" 391 392 /* compatibility with bison */ 393 #ifdef YYPARSE_PARAM 394 /* compatibility with FreeBSD */ 395 # ifdef YYPARSE_PARAM_TYPE 396 # define YYPARSE_DECL() yyparse(YYPARSE_PARAM_TYPE YYPARSE_PARAM) 397 # else 398 # define YYPARSE_DECL() yyparse(void *YYPARSE_PARAM) 399 # endif 400 #else 401 # define YYPARSE_DECL() yyparse(void) 402 #endif 403 404 /* Parameters sent to lex. */ 405 #ifdef YYLEX_PARAM 406 # define YYLEX_DECL() yylex(void *YYLEX_PARAM) 407 # define YYLEX yylex(YYLEX_PARAM) 408 #else 409 # define YYLEX_DECL() yylex(void) 410 # define YYLEX yylex() 411 #endif 412 413 /* Parameters sent to yyerror. */ 414 #ifndef YYERROR_DECL 415 #define YYERROR_DECL() yyerror(const char *s) 416 #endif 417 #ifndef YYERROR_CALL 418 #define YYERROR_CALL(msg) yyerror(msg) 419 #endif 420 421 extern int YYPARSE_DECL(); 422 423 #define T_IDENTIFIER 257 424 #define T_TYPEDEF_NAME 258 425 #define T_DEFINE_NAME 259 426 #define T_AUTO 260 427 #define T_EXTERN 261 428 #define T_REGISTER 262 429 #define T_STATIC 263 430 #define T_TYPEDEF 264 431 #define T_INLINE 265 432 #define T_EXTENSION 266 433 #define T_CHAR 267 434 #define T_DOUBLE 268 435 #define T_FLOAT 269 436 #define T_INT 270 437 #define T_VOID 271 438 #define T_LONG 272 439 #define T_SHORT 273 440 #define T_SIGNED 274 441 #define T_UNSIGNED 275 442 #define T_ENUM 276 443 #define T_STRUCT 277 444 #define T_UNION 278 445 #define T_Bool 279 446 #define T_Complex 280 447 #define T_Imaginary 281 448 #define T_TYPE_QUALIFIER 282 449 #define T_BRACKETS 283 450 #define T_LBRACE 284 451 #define T_MATCHRBRACE 285 452 #define T_ELLIPSIS 286 453 #define T_INITIALIZER 287 454 #define T_STRING_LITERAL 288 455 #define T_ASM 289 456 #define T_ASMARG 290 457 #define T_VA_DCL 291 458 #define YYERRCODE 256 459 typedef short YYINT; 460 static const YYINT grammar_lhs[] = { -1, 461 0, 0, 26, 26, 27, 27, 27, 27, 27, 27, 462 27, 31, 30, 30, 28, 28, 34, 28, 32, 32, 463 33, 33, 35, 35, 37, 38, 29, 39, 29, 36, 464 36, 36, 40, 40, 1, 1, 2, 2, 2, 3, 465 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 466 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 467 5, 5, 6, 6, 6, 19, 19, 8, 8, 9, 468 41, 9, 7, 7, 7, 25, 23, 23, 10, 10, 469 11, 11, 11, 11, 11, 20, 20, 21, 21, 22, 470 22, 14, 14, 15, 15, 16, 16, 16, 17, 17, 471 18, 18, 24, 24, 12, 12, 12, 13, 13, 13, 472 13, 13, 13, 13, 473 }; 474 static const YYINT grammar_len[] = { 2, 475 0, 1, 1, 2, 1, 1, 1, 1, 3, 2, 476 2, 2, 3, 3, 2, 3, 0, 5, 2, 1, 477 0, 1, 1, 3, 0, 0, 7, 0, 5, 0, 478 1, 1, 1, 2, 1, 2, 1, 1, 1, 1, 479 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 480 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 481 1, 1, 3, 2, 2, 1, 1, 1, 3, 1, 482 0, 4, 3, 2, 2, 1, 1, 1, 2, 1, 483 1, 3, 2, 4, 4, 2, 3, 0, 1, 1, 484 2, 1, 3, 1, 3, 2, 2, 1, 0, 1, 485 1, 3, 1, 2, 1, 2, 1, 3, 2, 1, 486 4, 3, 3, 2, 487 }; 488 static const YYINT grammar_defred[] = { 0, 489 0, 0, 0, 0, 77, 0, 62, 40, 0, 42, 490 43, 20, 44, 0, 46, 47, 48, 49, 54, 50, 491 51, 52, 53, 76, 66, 67, 55, 56, 57, 61, 492 0, 7, 0, 0, 35, 37, 38, 39, 59, 60, 493 28, 0, 0, 0, 103, 81, 0, 0, 3, 5, 494 6, 8, 0, 10, 11, 78, 0, 90, 0, 0, 495 104, 0, 19, 0, 41, 45, 15, 36, 0, 68, 496 0, 0, 0, 83, 0, 0, 64, 0, 0, 74, 497 4, 58, 0, 82, 87, 91, 0, 14, 13, 9, 498 16, 0, 71, 0, 31, 33, 0, 0, 0, 0, 499 0, 94, 0, 0, 101, 12, 63, 73, 0, 0, 500 69, 0, 0, 0, 34, 0, 110, 96, 97, 0, 501 0, 84, 0, 85, 0, 23, 0, 0, 72, 26, 502 29, 114, 0, 0, 0, 109, 0, 93, 95, 102, 503 18, 0, 0, 108, 113, 112, 0, 24, 27, 111, 504 }; 505 static const YYINT grammar_dgoto[] = { 33, 506 87, 35, 36, 37, 38, 39, 40, 69, 70, 41, 507 42, 119, 120, 100, 101, 102, 103, 104, 43, 44, 508 59, 60, 45, 46, 47, 48, 49, 50, 51, 52, 509 77, 53, 127, 109, 128, 97, 94, 143, 72, 98, 510 112, 511 }; 512 static const YYINT grammar_sindex[] = { -2, 513 -3, 27, -239, -177, 0, 0, 0, 0, -274, 0, 514 0, 0, 0, -246, 0, 0, 0, 0, 0, 0, 515 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 516 -266, 0, 0, 455, 0, 0, 0, 0, 0, 0, 517 0, -35, -245, 128, 0, 0, -245, -2, 0, 0, 518 0, 0, 642, 0, 0, 0, -15, 0, -12, -239, 519 0, 590, 0, -27, 0, 0, 0, 0, -10, 0, 520 -11, 534, -72, 0, -237, -232, 0, -35, -232, 0, 521 0, 0, 642, 0, 0, 0, 455, 0, 0, 0, 522 0, 27, 0, 534, 0, 0, -222, 617, 209, 34, 523 39, 0, 44, 42, 0, 0, 0, 0, 27, -11, 524 0, -200, -196, -195, 0, 174, 0, 0, 0, -33, 525 243, 0, 561, 0, -177, 0, 33, 49, 0, 0, 526 0, 0, 53, 55, 417, 0, -33, 0, 0, 0, 527 0, 27, -188, 0, 0, 0, 57, 0, 0, 0, 528 }; 529 static const YYINT grammar_rindex[] = { 99, 530 0, 0, 275, 0, 0, -38, 0, 0, 481, 0, 531 0, 0, 0, 509, 0, 0, 0, 0, 0, 0, 532 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 533 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 534 0, 30, 0, 0, 0, 0, 0, 101, 0, 0, 535 0, 0, 0, 0, 0, 0, 0, 0, 343, 309, 536 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 537 98, -182, 62, 0, 0, 133, 0, 64, 379, 0, 538 0, 0, -5, 0, 0, 0, 0, 0, 0, 0, 539 0, 0, 0, -182, 0, 0, 0, -180, -19, 0, 540 65, 0, 0, 68, 0, 0, 0, 0, 51, 9, 541 0, 0, 0, 0, 0, 0, 0, 0, 0, -13, 542 19, 0, 0, 0, 0, 0, 0, 52, 0, 0, 543 0, 0, 0, 0, 0, 0, 35, 0, 0, 0, 544 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 545 }; 546 static const YYINT grammar_gindex[] = { 0, 547 11, -17, 0, 0, 13, 0, 0, 0, 20, 8, 548 -43, -1, -8, -89, 0, -9, 0, 0, 0, -44, 549 0, 0, 4, 0, 0, 0, 70, -53, 0, 0, 550 -18, 0, 0, 0, 0, 22, 0, 0, 0, 0, 551 0, 552 }; 553 #define YYTABLESIZE 924 554 static const YYINT grammar_table[] = { 58, 555 78, 58, 58, 58, 73, 58, 135, 61, 88, 57, 556 34, 5, 56, 62, 85, 58, 68, 63, 96, 7, 557 58, 98, 78, 64, 98, 84, 134, 107, 80, 3, 558 107, 90, 17, 92, 17, 4, 17, 2, 75, 3, 559 96, 71, 30, 89, 115, 147, 76, 106, 91, 93, 560 79, 75, 70, 17, 121, 55, 32, 107, 34, 105, 561 108, 114, 105, 83, 4, 68, 2, 70, 3, 68, 562 80, 121, 86, 80, 122, 106, 105, 78, 106, 5, 563 56, 68, 123, 99, 124, 125, 129, 130, 80, 131, 564 80, 141, 142, 144, 110, 145, 149, 150, 1, 110, 565 2, 30, 99, 32, 79, 92, 118, 79, 100, 21, 566 22, 111, 137, 139, 133, 113, 126, 81, 0, 0, 567 0, 0, 79, 57, 79, 0, 99, 0, 140, 0, 568 0, 0, 0, 99, 0, 0, 0, 0, 0, 0, 569 0, 70, 0, 0, 0, 99, 0, 0, 0, 148, 570 0, 0, 0, 0, 0, 0, 70, 0, 0, 0, 571 0, 0, 0, 0, 0, 4, 0, 2, 0, 0, 572 65, 0, 65, 65, 65, 0, 65, 0, 0, 0, 573 0, 0, 0, 0, 5, 6, 7, 8, 65, 10, 574 11, 65, 13, 66, 15, 16, 17, 18, 19, 20, 575 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 576 0, 4, 0, 116, 132, 3, 0, 0, 58, 58, 577 58, 58, 58, 58, 58, 78, 58, 58, 58, 58, 578 58, 58, 58, 58, 58, 58, 58, 58, 58, 58, 579 58, 58, 58, 58, 58, 78, 4, 74, 116, 136, 580 3, 17, 78, 1, 5, 6, 7, 8, 9, 10, 581 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 582 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 583 4, 54, 116, 5, 56, 0, 31, 80, 80, 80, 584 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 585 80, 80, 80, 80, 80, 80, 80, 80, 80, 80, 586 80, 80, 88, 80, 88, 88, 88, 0, 88, 0, 587 80, 79, 79, 79, 79, 79, 79, 79, 79, 79, 588 79, 79, 79, 79, 79, 79, 79, 79, 79, 79, 589 79, 79, 79, 79, 79, 79, 89, 79, 89, 89, 590 89, 0, 89, 0, 79, 25, 25, 25, 25, 25, 591 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 592 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 593 86, 25, 86, 86, 5, 56, 86, 0, 25, 65, 594 65, 65, 65, 65, 65, 65, 0, 65, 65, 65, 595 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 596 65, 65, 65, 65, 65, 65, 75, 0, 75, 75, 597 75, 0, 75, 0, 0, 0, 0, 0, 0, 0, 598 5, 6, 7, 8, 65, 10, 11, 75, 13, 66, 599 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 600 25, 26, 27, 28, 29, 30, 117, 146, 0, 0, 601 0, 0, 0, 0, 0, 5, 6, 7, 8, 65, 602 10, 11, 0, 13, 66, 15, 16, 17, 18, 19, 603 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 604 30, 117, 4, 0, 2, 0, 3, 0, 0, 5, 605 56, 0, 0, 0, 0, 0, 0, 0, 0, 0, 606 0, 0, 0, 67, 0, 0, 0, 0, 41, 0, 607 41, 0, 41, 0, 0, 117, 0, 0, 0, 0, 608 0, 88, 88, 0, 0, 0, 0, 0, 0, 41, 609 0, 0, 0, 0, 0, 0, 45, 0, 45, 0, 610 45, 0, 0, 0, 0, 0, 0, 88, 0, 0, 611 0, 0, 0, 0, 0, 89, 89, 45, 0, 0, 612 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 613 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 614 0, 89, 0, 0, 0, 0, 0, 0, 0, 86, 615 86, 0, 0, 0, 0, 0, 0, 0, 0, 0, 616 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 617 0, 0, 0, 0, 0, 86, 0, 0, 0, 0, 618 0, 0, 0, 0, 0, 75, 75, 75, 75, 75, 619 75, 75, 0, 75, 75, 75, 75, 75, 75, 75, 620 75, 75, 75, 75, 75, 75, 75, 75, 75, 75, 621 75, 75, 0, 0, 0, 0, 0, 0, 0, 0, 622 0, 0, 0, 0, 82, 7, 8, 65, 10, 11, 623 0, 13, 66, 15, 16, 17, 18, 19, 20, 21, 624 22, 23, 24, 25, 26, 27, 28, 29, 30, 0, 625 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 626 0, 5, 6, 7, 8, 65, 10, 11, 0, 13, 627 66, 15, 16, 17, 18, 19, 20, 21, 22, 23, 628 24, 25, 26, 27, 28, 29, 30, 41, 41, 41, 629 41, 41, 41, 41, 0, 41, 41, 41, 41, 41, 630 41, 41, 41, 41, 41, 41, 41, 41, 41, 41, 631 41, 41, 41, 0, 0, 45, 45, 45, 45, 45, 632 45, 45, 0, 45, 45, 45, 45, 45, 45, 45, 633 45, 45, 45, 45, 45, 45, 45, 45, 45, 45, 634 45, 82, 7, 8, 65, 10, 11, 12, 13, 14, 635 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 636 25, 26, 27, 28, 29, 30, 0, 0, 82, 7, 637 8, 65, 10, 11, 95, 13, 66, 15, 16, 17, 638 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 639 28, 29, 30, 0, 0, 0, 138, 82, 7, 8, 640 65, 10, 11, 12, 13, 14, 15, 16, 17, 18, 641 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 642 29, 30, 0, 75, 82, 7, 8, 65, 10, 11, 643 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 644 22, 23, 24, 25, 26, 27, 28, 29, 30, 82, 645 7, 8, 65, 10, 11, 0, 13, 66, 15, 16, 646 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 647 27, 28, 29, 30, 648 }; 649 static const YYINT grammar_check[] = { 38, 650 44, 40, 41, 42, 40, 44, 40, 4, 62, 2, 651 0, 257, 258, 288, 59, 3, 34, 264, 72, 259, 652 59, 41, 61, 290, 44, 41, 116, 41, 47, 42, 653 44, 59, 38, 44, 40, 38, 42, 40, 284, 42, 654 94, 34, 282, 62, 98, 135, 43, 285, 59, 61, 655 47, 284, 44, 59, 99, 59, 59, 76, 48, 41, 656 79, 284, 44, 53, 38, 83, 40, 59, 42, 87, 657 41, 116, 60, 44, 41, 41, 73, 121, 44, 257, 658 258, 99, 44, 73, 41, 44, 287, 284, 59, 285, 659 61, 59, 44, 41, 87, 41, 285, 41, 0, 92, 660 0, 284, 41, 284, 41, 41, 99, 44, 41, 59, 661 59, 92, 121, 123, 116, 94, 109, 48, -1, -1, 662 -1, -1, 59, 116, 61, -1, 116, -1, 125, -1, 663 -1, -1, -1, 123, -1, -1, -1, -1, -1, -1, 664 -1, 44, -1, -1, -1, 135, -1, -1, -1, 142, 665 -1, -1, -1, -1, -1, -1, 59, -1, -1, -1, 666 -1, -1, -1, -1, -1, 38, -1, 40, -1, -1, 667 38, -1, 40, 41, 42, -1, 44, -1, -1, -1, 668 -1, -1, -1, -1, 257, 258, 259, 260, 261, 262, 669 263, 59, 265, 266, 267, 268, 269, 270, 271, 272, 670 273, 274, 275, 276, 277, 278, 279, 280, 281, 282, 671 -1, 38, -1, 40, 41, 42, -1, -1, 257, 258, 672 259, 260, 261, 262, 263, 264, 265, 266, 267, 268, 673 269, 270, 271, 272, 273, 274, 275, 276, 277, 278, 674 279, 280, 281, 282, 283, 284, 38, 283, 40, 283, 675 42, 257, 291, 256, 257, 258, 259, 260, 261, 262, 676 263, 264, 265, 266, 267, 268, 269, 270, 271, 272, 677 273, 274, 275, 276, 277, 278, 279, 280, 281, 282, 678 38, 285, 40, 257, 258, -1, 289, 258, 259, 260, 679 261, 262, 263, 264, 265, 266, 267, 268, 269, 270, 680 271, 272, 273, 274, 275, 276, 277, 278, 279, 280, 681 281, 282, 38, 284, 40, 41, 42, -1, 44, -1, 682 291, 258, 259, 260, 261, 262, 263, 264, 265, 266, 683 267, 268, 269, 270, 271, 272, 273, 274, 275, 276, 684 277, 278, 279, 280, 281, 282, 38, 284, 40, 41, 685 42, -1, 44, -1, 291, 258, 259, 260, 261, 262, 686 263, 264, 265, 266, 267, 268, 269, 270, 271, 272, 687 273, 274, 275, 276, 277, 278, 279, 280, 281, 282, 688 38, 284, 40, 41, 257, 258, 44, -1, 291, 257, 689 258, 259, 260, 261, 262, 263, -1, 265, 266, 267, 690 268, 269, 270, 271, 272, 273, 274, 275, 276, 277, 691 278, 279, 280, 281, 282, 283, 38, -1, 40, 41, 692 42, -1, 44, -1, -1, -1, -1, -1, -1, -1, 693 257, 258, 259, 260, 261, 262, 263, 59, 265, 266, 694 267, 268, 269, 270, 271, 272, 273, 274, 275, 276, 695 277, 278, 279, 280, 281, 282, 283, 41, -1, -1, 696 -1, -1, -1, -1, -1, 257, 258, 259, 260, 261, 697 262, 263, -1, 265, 266, 267, 268, 269, 270, 271, 698 272, 273, 274, 275, 276, 277, 278, 279, 280, 281, 699 282, 283, 38, -1, 40, -1, 42, -1, -1, 257, 700 258, -1, -1, -1, -1, -1, -1, -1, -1, -1, 701 -1, -1, -1, 59, -1, -1, -1, -1, 38, -1, 702 40, -1, 42, -1, -1, 283, -1, -1, -1, -1, 703 -1, 257, 258, -1, -1, -1, -1, -1, -1, 59, 704 -1, -1, -1, -1, -1, -1, 38, -1, 40, -1, 705 42, -1, -1, -1, -1, -1, -1, 283, -1, -1, 706 -1, -1, -1, -1, -1, 257, 258, 59, -1, -1, 707 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 708 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 709 -1, 283, -1, -1, -1, -1, -1, -1, -1, 257, 710 258, -1, -1, -1, -1, -1, -1, -1, -1, -1, 711 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 712 -1, -1, -1, -1, -1, 283, -1, -1, -1, -1, 713 -1, -1, -1, -1, -1, 257, 258, 259, 260, 261, 714 262, 263, -1, 265, 266, 267, 268, 269, 270, 271, 715 272, 273, 274, 275, 276, 277, 278, 279, 280, 281, 716 282, 283, -1, -1, -1, -1, -1, -1, -1, -1, 717 -1, -1, -1, -1, 258, 259, 260, 261, 262, 263, 718 -1, 265, 266, 267, 268, 269, 270, 271, 272, 273, 719 274, 275, 276, 277, 278, 279, 280, 281, 282, -1, 720 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 721 -1, 257, 258, 259, 260, 261, 262, 263, -1, 265, 722 266, 267, 268, 269, 270, 271, 272, 273, 274, 275, 723 276, 277, 278, 279, 280, 281, 282, 257, 258, 259, 724 260, 261, 262, 263, -1, 265, 266, 267, 268, 269, 725 270, 271, 272, 273, 274, 275, 276, 277, 278, 279, 726 280, 281, 282, -1, -1, 257, 258, 259, 260, 261, 727 262, 263, -1, 265, 266, 267, 268, 269, 270, 271, 728 272, 273, 274, 275, 276, 277, 278, 279, 280, 281, 729 282, 258, 259, 260, 261, 262, 263, 264, 265, 266, 730 267, 268, 269, 270, 271, 272, 273, 274, 275, 276, 731 277, 278, 279, 280, 281, 282, -1, -1, 258, 259, 732 260, 261, 262, 263, 291, 265, 266, 267, 268, 269, 733 270, 271, 272, 273, 274, 275, 276, 277, 278, 279, 734 280, 281, 282, -1, -1, -1, 286, 258, 259, 260, 735 261, 262, 263, 264, 265, 266, 267, 268, 269, 270, 736 271, 272, 273, 274, 275, 276, 277, 278, 279, 280, 737 281, 282, -1, 284, 258, 259, 260, 261, 262, 263, 738 264, 265, 266, 267, 268, 269, 270, 271, 272, 273, 739 274, 275, 276, 277, 278, 279, 280, 281, 282, 258, 740 259, 260, 261, 262, 263, -1, 265, 266, 267, 268, 741 269, 270, 271, 272, 273, 274, 275, 276, 277, 278, 742 279, 280, 281, 282, 743 }; 744 #define YYFINAL 33 745 #ifndef YYDEBUG 746 #define YYDEBUG 0 747 #endif 748 #define YYMAXTOKEN 291 749 #define YYUNDFTOKEN 335 750 #define YYTRANSLATE(a) ((a) > YYMAXTOKEN ? YYUNDFTOKEN : (a)) 751 #if YYDEBUG 752 static const char *const grammar_name[] = { 753 754 "end-of-file",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 755 0,0,0,0,"'&'",0,"'('","')'","'*'",0,"','",0,0,0,0,0,0,0,0,0,0,0,0,0,0,"';'",0, 756 "'='",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 757 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 758 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 759 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 760 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 761 "T_IDENTIFIER","T_TYPEDEF_NAME","T_DEFINE_NAME","T_AUTO","T_EXTERN", 762 "T_REGISTER","T_STATIC","T_TYPEDEF","T_INLINE","T_EXTENSION","T_CHAR", 763 "T_DOUBLE","T_FLOAT","T_INT","T_VOID","T_LONG","T_SHORT","T_SIGNED", 764 "T_UNSIGNED","T_ENUM","T_STRUCT","T_UNION","T_Bool","T_Complex","T_Imaginary", 765 "T_TYPE_QUALIFIER","T_BRACKETS","T_LBRACE","T_MATCHRBRACE","T_ELLIPSIS", 766 "T_INITIALIZER","T_STRING_LITERAL","T_ASM","T_ASMARG","T_VA_DCL",0,0,0,0,0,0,0, 767 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 768 "illegal-symbol", 769 }; 770 static const char *const grammar_rule[] = { 771 "$accept : program", 772 "program :", 773 "program : translation_unit", 774 "translation_unit : external_declaration", 775 "translation_unit : translation_unit external_declaration", 776 "external_declaration : declaration", 777 "external_declaration : function_definition", 778 "external_declaration : ';'", 779 "external_declaration : linkage_specification", 780 "external_declaration : T_ASM T_ASMARG ';'", 781 "external_declaration : error T_MATCHRBRACE", 782 "external_declaration : error ';'", 783 "braces : T_LBRACE T_MATCHRBRACE", 784 "linkage_specification : T_EXTERN T_STRING_LITERAL braces", 785 "linkage_specification : T_EXTERN T_STRING_LITERAL declaration", 786 "declaration : decl_specifiers ';'", 787 "declaration : decl_specifiers init_declarator_list ';'", 788 "$$1 :", 789 "declaration : any_typedef decl_specifiers $$1 opt_declarator_list ';'", 790 "any_typedef : T_EXTENSION T_TYPEDEF", 791 "any_typedef : T_TYPEDEF", 792 "opt_declarator_list :", 793 "opt_declarator_list : declarator_list", 794 "declarator_list : declarator", 795 "declarator_list : declarator_list ',' declarator", 796 "$$2 :", 797 "$$3 :", 798 "function_definition : decl_specifiers declarator $$2 opt_declaration_list T_LBRACE $$3 T_MATCHRBRACE", 799 "$$4 :", 800 "function_definition : declarator $$4 opt_declaration_list T_LBRACE T_MATCHRBRACE", 801 "opt_declaration_list :", 802 "opt_declaration_list : T_VA_DCL", 803 "opt_declaration_list : declaration_list", 804 "declaration_list : declaration", 805 "declaration_list : declaration_list declaration", 806 "decl_specifiers : decl_specifier", 807 "decl_specifiers : decl_specifiers decl_specifier", 808 "decl_specifier : storage_class", 809 "decl_specifier : type_specifier", 810 "decl_specifier : type_qualifier", 811 "storage_class : T_AUTO", 812 "storage_class : T_EXTERN", 813 "storage_class : T_REGISTER", 814 "storage_class : T_STATIC", 815 "storage_class : T_INLINE", 816 "storage_class : T_EXTENSION", 817 "type_specifier : T_CHAR", 818 "type_specifier : T_DOUBLE", 819 "type_specifier : T_FLOAT", 820 "type_specifier : T_INT", 821 "type_specifier : T_LONG", 822 "type_specifier : T_SHORT", 823 "type_specifier : T_SIGNED", 824 "type_specifier : T_UNSIGNED", 825 "type_specifier : T_VOID", 826 "type_specifier : T_Bool", 827 "type_specifier : T_Complex", 828 "type_specifier : T_Imaginary", 829 "type_specifier : T_TYPEDEF_NAME", 830 "type_specifier : struct_or_union_specifier", 831 "type_specifier : enum_specifier", 832 "type_qualifier : T_TYPE_QUALIFIER", 833 "type_qualifier : T_DEFINE_NAME", 834 "struct_or_union_specifier : struct_or_union any_id braces", 835 "struct_or_union_specifier : struct_or_union braces", 836 "struct_or_union_specifier : struct_or_union any_id", 837 "struct_or_union : T_STRUCT", 838 "struct_or_union : T_UNION", 839 "init_declarator_list : init_declarator", 840 "init_declarator_list : init_declarator_list ',' init_declarator", 841 "init_declarator : declarator", 842 "$$5 :", 843 "init_declarator : declarator '=' $$5 T_INITIALIZER", 844 "enum_specifier : enumeration any_id braces", 845 "enum_specifier : enumeration braces", 846 "enum_specifier : enumeration any_id", 847 "enumeration : T_ENUM", 848 "any_id : T_IDENTIFIER", 849 "any_id : T_TYPEDEF_NAME", 850 "declarator : pointer direct_declarator", 851 "declarator : direct_declarator", 852 "direct_declarator : identifier_or_ref", 853 "direct_declarator : '(' declarator ')'", 854 "direct_declarator : direct_declarator T_BRACKETS", 855 "direct_declarator : direct_declarator '(' parameter_type_list ')'", 856 "direct_declarator : direct_declarator '(' opt_identifier_list ')'", 857 "pointer : '*' opt_type_qualifiers", 858 "pointer : '*' opt_type_qualifiers pointer", 859 "opt_type_qualifiers :", 860 "opt_type_qualifiers : type_qualifier_list", 861 "type_qualifier_list : type_qualifier", 862 "type_qualifier_list : type_qualifier_list type_qualifier", 863 "parameter_type_list : parameter_list", 864 "parameter_type_list : parameter_list ',' T_ELLIPSIS", 865 "parameter_list : parameter_declaration", 866 "parameter_list : parameter_list ',' parameter_declaration", 867 "parameter_declaration : decl_specifiers declarator", 868 "parameter_declaration : decl_specifiers abs_declarator", 869 "parameter_declaration : decl_specifiers", 870 "opt_identifier_list :", 871 "opt_identifier_list : identifier_list", 872 "identifier_list : any_id", 873 "identifier_list : identifier_list ',' any_id", 874 "identifier_or_ref : any_id", 875 "identifier_or_ref : '&' any_id", 876 "abs_declarator : pointer", 877 "abs_declarator : pointer direct_abs_declarator", 878 "abs_declarator : direct_abs_declarator", 879 "direct_abs_declarator : '(' abs_declarator ')'", 880 "direct_abs_declarator : direct_abs_declarator T_BRACKETS", 881 "direct_abs_declarator : T_BRACKETS", 882 "direct_abs_declarator : direct_abs_declarator '(' parameter_type_list ')'", 883 "direct_abs_declarator : direct_abs_declarator '(' ')'", 884 "direct_abs_declarator : '(' parameter_type_list ')'", 885 "direct_abs_declarator : '(' ')'", 886 887 }; 888 #endif 889 890 #if YYDEBUG 891 int yydebug; 892 #endif 893 894 int yyerrflag; 895 int yychar; 896 YYSTYPE yyval; 897 YYSTYPE yylval; 898 int yynerrs; 899 900 /* define the initial stack-sizes */ 901 #ifdef YYSTACKSIZE 902 #undef YYMAXDEPTH 903 #define YYMAXDEPTH YYSTACKSIZE 904 #else 905 #ifdef YYMAXDEPTH 906 #define YYSTACKSIZE YYMAXDEPTH 907 #else 908 #define YYSTACKSIZE 10000 909 #define YYMAXDEPTH 10000 910 #endif 911 #endif 912 913 #define YYINITSTACKSIZE 200 914 915 typedef struct { 916 unsigned stacksize; 917 YYINT *s_base; 918 YYINT *s_mark; 919 YYINT *s_last; 920 YYSTYPE *l_base; 921 YYSTYPE *l_mark; 922 } YYSTACKDATA; 923 /* variables for the parser stack */ 924 static YYSTACKDATA yystack; 925 #line 1015 "grammar.y" 926 927 /* lex.yy.c */ 928 #define BEGIN yy_start = 1 + 2 * 929 930 #define CPP1 1 931 #define INIT1 2 932 #define INIT2 3 933 #define CURLY 4 934 #define LEXYACC 5 935 #define ASM 6 936 #define CPP_INLINE 7 937 938 extern char *yytext; 939 extern FILE *yyin, *yyout; 940 941 static int curly; /* number of curly brace nesting levels */ 942 static int ly_count; /* number of occurances of %% */ 943 static int inc_depth; /* include nesting level */ 944 static SymbolTable *included_files; /* files already included */ 945 static int yy_start = 0; /* start state number */ 946 947 #define grammar_error(s) yaccError(s) 948 949 static void 950 yaccError (const char *msg) 951 { 952 func_params = NULL; 953 put_error(); /* tell what line we're on, and what file */ 954 fprintf(stderr, "%s at token '%s'\n", msg, yytext); 955 } 956 957 /* Initialize the table of type qualifier keywords recognized by the lexical 958 * analyzer. 959 */ 960 void 961 init_parser (void) 962 { 963 static const char *keywords[] = { 964 "const", 965 "restrict", 966 "volatile", 967 "interrupt", 968 #ifdef vms 969 "noshare", 970 "readonly", 971 #endif 972 #if defined(MSDOS) || defined(OS2) 973 "__cdecl", 974 "__export", 975 "__far", 976 "__fastcall", 977 "__fortran", 978 "__huge", 979 "__inline", 980 "__interrupt", 981 "__loadds", 982 "__near", 983 "__pascal", 984 "__saveregs", 985 "__segment", 986 "__stdcall", 987 "__syscall", 988 "_cdecl", 989 "_cs", 990 "_ds", 991 "_es", 992 "_export", 993 "_far", 994 "_fastcall", 995 "_fortran", 996 "_huge", 997 "_interrupt", 998 "_loadds", 999 "_near", 1000 "_pascal", 1001 "_saveregs", 1002 "_seg", 1003 "_segment", 1004 "_ss", 1005 "cdecl", 1006 "far", 1007 "huge", 1008 "near", 1009 "pascal", 1010 #ifdef OS2 1011 "__far16", 1012 #endif 1013 #endif 1014 #ifdef __GNUC__ 1015 /* gcc aliases */ 1016 "__builtin_va_arg", 1017 "__builtin_va_list", 1018 "__const", 1019 "__const__", 1020 "__inline", 1021 "__inline__", 1022 "__restrict", 1023 "__restrict__", 1024 "__volatile", 1025 "__volatile__", 1026 #endif 1027 }; 1028 unsigned i; 1029 1030 /* Initialize type qualifier table. */ 1031 type_qualifiers = new_symbol_table(); 1032 for (i = 0; i < sizeof(keywords)/sizeof(keywords[0]); ++i) { 1033 new_symbol(type_qualifiers, keywords[i], NULL, DS_NONE); 1034 } 1035 } 1036 1037 /* Process the C source file. Write function prototypes to the standard 1038 * output. Convert function definitions and write the converted source 1039 * code to a temporary file. 1040 */ 1041 void 1042 process_file (FILE *infile, char *name) 1043 { 1044 char *s; 1045 1046 if (strlen(name) > 2) { 1047 s = name + strlen(name) - 2; 1048 if (*s == '.') { 1049 ++s; 1050 if (*s == 'l' || *s == 'y') 1051 BEGIN LEXYACC; 1052 #if defined(MSDOS) || defined(OS2) 1053 if (*s == 'L' || *s == 'Y') 1054 BEGIN LEXYACC; 1055 #endif 1056 } 1057 } 1058 1059 included_files = new_symbol_table(); 1060 typedef_names = new_symbol_table(); 1061 define_names = new_symbol_table(); 1062 inc_depth = -1; 1063 curly = 0; 1064 ly_count = 0; 1065 func_params = NULL; 1066 yyin = infile; 1067 include_file(strcpy(base_file, name), func_style != FUNC_NONE); 1068 if (file_comments) { 1069 #if OPT_LINTLIBRARY 1070 if (lintLibrary()) { 1071 put_blankline(stdout); 1072 begin_tracking(); 1073 } 1074 #endif 1075 put_string(stdout, "/* "); 1076 put_string(stdout, cur_file_name()); 1077 put_string(stdout, " */\n"); 1078 } 1079 yyparse(); 1080 free_symbol_table(define_names); 1081 free_symbol_table(typedef_names); 1082 free_symbol_table(included_files); 1083 } 1084 1085 #ifdef NO_LEAKS 1086 void 1087 free_parser(void) 1088 { 1089 free_symbol_table (type_qualifiers); 1090 #ifdef FLEX_SCANNER 1091 if (yy_current_buffer != 0) 1092 yy_delete_buffer(yy_current_buffer); 1093 #endif 1094 } 1095 #endif 1096 #line 1095 "grammar.tab.c" 1097 1098 #if YYDEBUG 1099 #include <stdio.h> /* needed for printf */ 1100 #endif 1101 1102 #include <stdlib.h> /* needed for malloc, etc */ 1103 #include <string.h> /* needed for memset */ 1104 1105 /* allocate initial stack or double stack size, up to YYMAXDEPTH */ 1106 static int yygrowstack(YYSTACKDATA *data) 1107 { 1108 int i; 1109 unsigned newsize; 1110 YYINT *newss; 1111 YYSTYPE *newvs; 1112 1113 if ((newsize = data->stacksize) == 0) 1114 newsize = YYINITSTACKSIZE; 1115 else if (newsize >= YYMAXDEPTH) 1116 return YYENOMEM; 1117 else if ((newsize *= 2) > YYMAXDEPTH) 1118 newsize = YYMAXDEPTH; 1119 1120 i = (int) (data->s_mark - data->s_base); 1121 newss = (YYINT *)realloc(data->s_base, newsize * sizeof(*newss)); 1122 if (newss == 0) 1123 return YYENOMEM; 1124 1125 data->s_base = newss; 1126 data->s_mark = newss + i; 1127 1128 newvs = (YYSTYPE *)realloc(data->l_base, newsize * sizeof(*newvs)); 1129 if (newvs == 0) 1130 return YYENOMEM; 1131 1132 data->l_base = newvs; 1133 data->l_mark = newvs + i; 1134 1135 data->stacksize = newsize; 1136 data->s_last = data->s_base + newsize - 1; 1137 return 0; 1138 } 1139 1140 #if YYPURE || defined(YY_NO_LEAKS) 1141 static void yyfreestack(YYSTACKDATA *data) 1142 { 1143 free(data->s_base); 1144 free(data->l_base); 1145 memset(data, 0, sizeof(*data)); 1146 } 1147 #else 1148 #define yyfreestack(data) /* nothing */ 1149 #endif 1150 1151 #define YYABORT goto yyabort 1152 #define YYREJECT goto yyabort 1153 #define YYACCEPT goto yyaccept 1154 #define YYERROR goto yyerrlab 1155 1156 int 1157 YYPARSE_DECL() 1158 { 1159 int yym, yyn, yystate; 1160 #if YYDEBUG 1161 const char *yys; 1162 1163 if ((yys = getenv("YYDEBUG")) != 0) 1164 { 1165 yyn = *yys; 1166 if (yyn >= '0' && yyn <= '9') 1167 yydebug = yyn - '0'; 1168 } 1169 #endif 1170 1171 yym = 0; 1172 yyn = 0; 1173 yynerrs = 0; 1174 yyerrflag = 0; 1175 yychar = YYEMPTY; 1176 yystate = 0; 1177 1178 #if YYPURE 1179 memset(&yystack, 0, sizeof(yystack)); 1180 #endif 1181 1182 if (yystack.s_base == NULL && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow; 1183 yystack.s_mark = yystack.s_base; 1184 yystack.l_mark = yystack.l_base; 1185 yystate = 0; 1186 *yystack.s_mark = 0; 1187 1188 yyloop: 1189 if ((yyn = yydefred[yystate]) != 0) goto yyreduce; 1190 if (yychar < 0) 1191 { 1192 yychar = YYLEX; 1193 if (yychar < 0) yychar = YYEOF; 1194 #if YYDEBUG 1195 if (yydebug) 1196 { 1197 if ((yys = yyname[YYTRANSLATE(yychar)]) == NULL) yys = yyname[YYUNDFTOKEN]; 1198 printf("%sdebug: state %d, reading %d (%s)\n", 1199 YYPREFIX, yystate, yychar, yys); 1200 } 1201 #endif 1202 } 1203 if (((yyn = yysindex[yystate]) != 0) && (yyn += yychar) >= 0 && 1204 yyn <= YYTABLESIZE && yycheck[yyn] == (YYINT) yychar) 1205 { 1206 #if YYDEBUG 1207 if (yydebug) 1208 printf("%sdebug: state %d, shifting to state %d\n", 1209 YYPREFIX, yystate, yytable[yyn]); 1210 #endif 1211 if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow; 1212 yystate = yytable[yyn]; 1213 *++yystack.s_mark = yytable[yyn]; 1214 *++yystack.l_mark = yylval; 1215 yychar = YYEMPTY; 1216 if (yyerrflag > 0) --yyerrflag; 1217 goto yyloop; 1218 } 1219 if (((yyn = yyrindex[yystate]) != 0) && (yyn += yychar) >= 0 && 1220 yyn <= YYTABLESIZE && yycheck[yyn] == (YYINT) yychar) 1221 { 1222 yyn = yytable[yyn]; 1223 goto yyreduce; 1224 } 1225 if (yyerrflag != 0) goto yyinrecovery; 1226 1227 YYERROR_CALL("syntax error"); 1228 1229 goto yyerrlab; /* redundant goto avoids 'unused label' warning */ 1230 yyerrlab: 1231 ++yynerrs; 1232 1233 yyinrecovery: 1234 if (yyerrflag < 3) 1235 { 1236 yyerrflag = 3; 1237 for (;;) 1238 { 1239 if (((yyn = yysindex[*yystack.s_mark]) != 0) && (yyn += YYERRCODE) >= 0 && 1240 yyn <= YYTABLESIZE && yycheck[yyn] == (YYINT) YYERRCODE) 1241 { 1242 #if YYDEBUG 1243 if (yydebug) 1244 printf("%sdebug: state %d, error recovery shifting\ 1245 to state %d\n", YYPREFIX, *yystack.s_mark, yytable[yyn]); 1246 #endif 1247 if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow; 1248 yystate = yytable[yyn]; 1249 *++yystack.s_mark = yytable[yyn]; 1250 *++yystack.l_mark = yylval; 1251 goto yyloop; 1252 } 1253 else 1254 { 1255 #if YYDEBUG 1256 if (yydebug) 1257 printf("%sdebug: error recovery discarding state %d\n", 1258 YYPREFIX, *yystack.s_mark); 1259 #endif 1260 if (yystack.s_mark <= yystack.s_base) goto yyabort; 1261 --yystack.s_mark; 1262 --yystack.l_mark; 1263 } 1264 } 1265 } 1266 else 1267 { 1268 if (yychar == YYEOF) goto yyabort; 1269 #if YYDEBUG 1270 if (yydebug) 1271 { 1272 if ((yys = yyname[YYTRANSLATE(yychar)]) == NULL) yys = yyname[YYUNDFTOKEN]; 1273 printf("%sdebug: state %d, error recovery discards token %d (%s)\n", 1274 YYPREFIX, yystate, yychar, yys); 1275 } 1276 #endif 1277 yychar = YYEMPTY; 1278 goto yyloop; 1279 } 1280 1281 yyreduce: 1282 #if YYDEBUG 1283 if (yydebug) 1284 printf("%sdebug: state %d, reducing by rule %d (%s)\n", 1285 YYPREFIX, yystate, yyn, yyrule[yyn]); 1286 #endif 1287 yym = yylen[yyn]; 1288 if (yym > 0) 1289 yyval = yystack.l_mark[1-yym]; 1290 else 1291 memset(&yyval, 0, sizeof yyval); 1292 1293 switch (yyn) 1294 { 1295 case 10: 1296 #line 378 "grammar.y" 1297 { 1298 yyerrok; 1299 } 1300 break; 1301 case 11: 1302 #line 382 "grammar.y" 1303 { 1304 yyerrok; 1305 } 1306 break; 1307 case 13: 1308 #line 393 "grammar.y" 1309 { 1310 /* Provide an empty action here so bison will not complain about 1311 * incompatible types in the default action it normally would 1312 * have generated. 1313 */ 1314 } 1315 break; 1316 case 14: 1317 #line 400 "grammar.y" 1318 { 1319 /* empty */ 1320 } 1321 break; 1322 case 15: 1323 #line 407 "grammar.y" 1324 { 1325 #if OPT_LINTLIBRARY 1326 if (types_out && want_typedef()) { 1327 gen_declarations(&yystack.l_mark[-1].decl_spec, (DeclaratorList *)0); 1328 flush_varargs(); 1329 } 1330 #endif 1331 free_decl_spec(&yystack.l_mark[-1].decl_spec); 1332 end_typedef(); 1333 } 1334 break; 1335 case 16: 1336 #line 418 "grammar.y" 1337 { 1338 if (func_params != NULL) { 1339 set_param_types(func_params, &yystack.l_mark[-2].decl_spec, &yystack.l_mark[-1].decl_list); 1340 } else { 1341 gen_declarations(&yystack.l_mark[-2].decl_spec, &yystack.l_mark[-1].decl_list); 1342 #if OPT_LINTLIBRARY 1343 flush_varargs(); 1344 #endif 1345 free_decl_list(&yystack.l_mark[-1].decl_list); 1346 } 1347 free_decl_spec(&yystack.l_mark[-2].decl_spec); 1348 end_typedef(); 1349 } 1350 break; 1351 case 17: 1352 #line 432 "grammar.y" 1353 { 1354 cur_decl_spec_flags = yystack.l_mark[0].decl_spec.flags; 1355 free_decl_spec(&yystack.l_mark[0].decl_spec); 1356 } 1357 break; 1358 case 18: 1359 #line 437 "grammar.y" 1360 { 1361 end_typedef(); 1362 } 1363 break; 1364 case 19: 1365 #line 444 "grammar.y" 1366 { 1367 begin_typedef(); 1368 } 1369 break; 1370 case 20: 1371 #line 448 "grammar.y" 1372 { 1373 begin_typedef(); 1374 } 1375 break; 1376 case 23: 1377 #line 460 "grammar.y" 1378 { 1379 int flags = cur_decl_spec_flags; 1380 1381 /* If the typedef is a pointer type, then reset the short type 1382 * flags so it does not get promoted. 1383 */ 1384 if (strcmp(yystack.l_mark[0].declarator->text, yystack.l_mark[0].declarator->name) != 0) 1385 flags &= ~(DS_CHAR | DS_SHORT | DS_FLOAT); 1386 new_symbol(typedef_names, yystack.l_mark[0].declarator->name, NULL, flags); 1387 free_declarator(yystack.l_mark[0].declarator); 1388 } 1389 break; 1390 case 24: 1391 #line 472 "grammar.y" 1392 { 1393 int flags = cur_decl_spec_flags; 1394 1395 if (strcmp(yystack.l_mark[0].declarator->text, yystack.l_mark[0].declarator->name) != 0) 1396 flags &= ~(DS_CHAR | DS_SHORT | DS_FLOAT); 1397 new_symbol(typedef_names, yystack.l_mark[0].declarator->name, NULL, flags); 1398 free_declarator(yystack.l_mark[0].declarator); 1399 } 1400 break; 1401 case 25: 1402 #line 484 "grammar.y" 1403 { 1404 check_untagged(&yystack.l_mark[-1].decl_spec); 1405 if (yystack.l_mark[0].declarator->func_def == FUNC_NONE) { 1406 yyerror("syntax error"); 1407 YYERROR; 1408 } 1409 func_params = &(yystack.l_mark[0].declarator->head->params); 1410 func_params->begin_comment = cur_file->begin_comment; 1411 func_params->end_comment = cur_file->end_comment; 1412 } 1413 break; 1414 case 26: 1415 #line 495 "grammar.y" 1416 { 1417 /* If we're converting to K&R and we've got a nominally K&R 1418 * function which has a parameter which is ANSI (i.e., a prototyped 1419 * function pointer), then we must override the deciphered value of 1420 * 'func_def' so that the parameter will be converted. 1421 */ 1422 if (func_style == FUNC_TRADITIONAL 1423 && haveAnsiParam() 1424 && yystack.l_mark[-3].declarator->head->func_def == func_style) { 1425 yystack.l_mark[-3].declarator->head->func_def = FUNC_BOTH; 1426 } 1427 1428 func_params = NULL; 1429 1430 if (cur_file->convert) 1431 gen_func_definition(&yystack.l_mark[-4].decl_spec, yystack.l_mark[-3].declarator); 1432 gen_prototype(&yystack.l_mark[-4].decl_spec, yystack.l_mark[-3].declarator); 1433 #if OPT_LINTLIBRARY 1434 flush_varargs(); 1435 #endif 1436 free_decl_spec(&yystack.l_mark[-4].decl_spec); 1437 free_declarator(yystack.l_mark[-3].declarator); 1438 } 1439 break; 1440 case 28: 1441 #line 520 "grammar.y" 1442 { 1443 if (yystack.l_mark[0].declarator->func_def == FUNC_NONE) { 1444 yyerror("syntax error"); 1445 YYERROR; 1446 } 1447 func_params = &(yystack.l_mark[0].declarator->head->params); 1448 func_params->begin_comment = cur_file->begin_comment; 1449 func_params->end_comment = cur_file->end_comment; 1450 } 1451 break; 1452 case 29: 1453 #line 530 "grammar.y" 1454 { 1455 DeclSpec decl_spec; 1456 1457 func_params = NULL; 1458 1459 new_decl_spec(&decl_spec, dft_decl_spec(), yystack.l_mark[-4].declarator->begin, DS_NONE); 1460 if (cur_file->convert) 1461 gen_func_definition(&decl_spec, yystack.l_mark[-4].declarator); 1462 gen_prototype(&decl_spec, yystack.l_mark[-4].declarator); 1463 #if OPT_LINTLIBRARY 1464 flush_varargs(); 1465 #endif 1466 free_decl_spec(&decl_spec); 1467 free_declarator(yystack.l_mark[-4].declarator); 1468 } 1469 break; 1470 case 36: 1471 #line 561 "grammar.y" 1472 { 1473 join_decl_specs(&yyval.decl_spec, &yystack.l_mark[-1].decl_spec, &yystack.l_mark[0].decl_spec); 1474 free(yystack.l_mark[-1].decl_spec.text); 1475 free(yystack.l_mark[0].decl_spec.text); 1476 } 1477 break; 1478 case 40: 1479 #line 576 "grammar.y" 1480 { 1481 new_decl_spec(&yyval.decl_spec, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin, DS_NONE); 1482 } 1483 break; 1484 case 41: 1485 #line 580 "grammar.y" 1486 { 1487 new_decl_spec(&yyval.decl_spec, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin, DS_EXTERN); 1488 } 1489 break; 1490 case 42: 1491 #line 584 "grammar.y" 1492 { 1493 new_decl_spec(&yyval.decl_spec, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin, DS_NONE); 1494 } 1495 break; 1496 case 43: 1497 #line 588 "grammar.y" 1498 { 1499 new_decl_spec(&yyval.decl_spec, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin, DS_STATIC); 1500 } 1501 break; 1502 case 44: 1503 #line 592 "grammar.y" 1504 { 1505 new_decl_spec(&yyval.decl_spec, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin, DS_INLINE); 1506 } 1507 break; 1508 case 45: 1509 #line 596 "grammar.y" 1510 { 1511 new_decl_spec(&yyval.decl_spec, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin, DS_JUNK); 1512 } 1513 break; 1514 case 46: 1515 #line 603 "grammar.y" 1516 { 1517 new_decl_spec(&yyval.decl_spec, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin, DS_CHAR); 1518 } 1519 break; 1520 case 47: 1521 #line 607 "grammar.y" 1522 { 1523 new_decl_spec(&yyval.decl_spec, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin, DS_NONE); 1524 } 1525 break; 1526 case 48: 1527 #line 611 "grammar.y" 1528 { 1529 new_decl_spec(&yyval.decl_spec, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin, DS_FLOAT); 1530 } 1531 break; 1532 case 49: 1533 #line 615 "grammar.y" 1534 { 1535 new_decl_spec(&yyval.decl_spec, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin, DS_NONE); 1536 } 1537 break; 1538 case 50: 1539 #line 619 "grammar.y" 1540 { 1541 new_decl_spec(&yyval.decl_spec, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin, DS_NONE); 1542 } 1543 break; 1544 case 51: 1545 #line 623 "grammar.y" 1546 { 1547 new_decl_spec(&yyval.decl_spec, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin, DS_SHORT); 1548 } 1549 break; 1550 case 52: 1551 #line 627 "grammar.y" 1552 { 1553 new_decl_spec(&yyval.decl_spec, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin, DS_NONE); 1554 } 1555 break; 1556 case 53: 1557 #line 631 "grammar.y" 1558 { 1559 new_decl_spec(&yyval.decl_spec, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin, DS_NONE); 1560 } 1561 break; 1562 case 54: 1563 #line 635 "grammar.y" 1564 { 1565 new_decl_spec(&yyval.decl_spec, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin, DS_NONE); 1566 } 1567 break; 1568 case 55: 1569 #line 639 "grammar.y" 1570 { 1571 new_decl_spec(&yyval.decl_spec, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin, DS_CHAR); 1572 } 1573 break; 1574 case 56: 1575 #line 643 "grammar.y" 1576 { 1577 new_decl_spec(&yyval.decl_spec, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin, DS_NONE); 1578 } 1579 break; 1580 case 57: 1581 #line 647 "grammar.y" 1582 { 1583 new_decl_spec(&yyval.decl_spec, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin, DS_NONE); 1584 } 1585 break; 1586 case 58: 1587 #line 651 "grammar.y" 1588 { 1589 Symbol *s; 1590 s = find_symbol(typedef_names, yystack.l_mark[0].text.text); 1591 if (s != NULL) 1592 new_decl_spec(&yyval.decl_spec, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin, s->flags); 1593 } 1594 break; 1595 case 61: 1596 #line 663 "grammar.y" 1597 { 1598 new_decl_spec(&yyval.decl_spec, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin, DS_NONE); 1599 } 1600 break; 1601 case 62: 1602 #line 667 "grammar.y" 1603 { 1604 /* This rule allows the <pointer> nonterminal to scan #define 1605 * names as if they were type modifiers. 1606 */ 1607 Symbol *s; 1608 s = find_symbol(define_names, yystack.l_mark[0].text.text); 1609 if (s != NULL) 1610 new_decl_spec(&yyval.decl_spec, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin, s->flags); 1611 } 1612 break; 1613 case 63: 1614 #line 680 "grammar.y" 1615 { 1616 char *s; 1617 if ((s = implied_typedef()) == 0) 1618 (void)sprintf(s = buf, "%.*s %.*s", TEXT_LEN, yystack.l_mark[-2].text.text, TEXT_LEN, yystack.l_mark[-1].text.text); 1619 new_decl_spec(&yyval.decl_spec, s, yystack.l_mark[-2].text.begin, DS_NONE); 1620 } 1621 break; 1622 case 64: 1623 #line 687 "grammar.y" 1624 { 1625 char *s; 1626 if ((s = implied_typedef()) == 0) 1627 (void)sprintf(s = buf, "%.*s {}", TEXT_LEN, yystack.l_mark[-1].text.text); 1628 new_decl_spec(&yyval.decl_spec, s, yystack.l_mark[-1].text.begin, DS_NONE); 1629 } 1630 break; 1631 case 65: 1632 #line 694 "grammar.y" 1633 { 1634 (void)sprintf(buf, "%.*s %.*s", TEXT_LEN, yystack.l_mark[-1].text.text, TEXT_LEN, yystack.l_mark[0].text.text); 1635 new_decl_spec(&yyval.decl_spec, buf, yystack.l_mark[-1].text.begin, DS_NONE); 1636 } 1637 break; 1638 case 66: 1639 #line 702 "grammar.y" 1640 { 1641 imply_typedef(yyval.text.text); 1642 } 1643 break; 1644 case 67: 1645 #line 706 "grammar.y" 1646 { 1647 imply_typedef(yyval.text.text); 1648 } 1649 break; 1650 case 68: 1651 #line 713 "grammar.y" 1652 { 1653 new_decl_list(&yyval.decl_list, yystack.l_mark[0].declarator); 1654 } 1655 break; 1656 case 69: 1657 #line 717 "grammar.y" 1658 { 1659 add_decl_list(&yyval.decl_list, &yystack.l_mark[-2].decl_list, yystack.l_mark[0].declarator); 1660 } 1661 break; 1662 case 70: 1663 #line 724 "grammar.y" 1664 { 1665 if (yystack.l_mark[0].declarator->func_def != FUNC_NONE && func_params == NULL && 1666 func_style == FUNC_TRADITIONAL && cur_file->convert) { 1667 gen_func_declarator(yystack.l_mark[0].declarator); 1668 fputs(cur_text(), cur_file->tmp_file); 1669 } 1670 cur_declarator = yyval.declarator; 1671 } 1672 break; 1673 case 71: 1674 #line 733 "grammar.y" 1675 { 1676 if (yystack.l_mark[-1].declarator->func_def != FUNC_NONE && func_params == NULL && 1677 func_style == FUNC_TRADITIONAL && cur_file->convert) { 1678 gen_func_declarator(yystack.l_mark[-1].declarator); 1679 fputs(" =", cur_file->tmp_file); 1680 } 1681 } 1682 break; 1683 case 73: 1684 #line 745 "grammar.y" 1685 { 1686 char *s; 1687 if ((s = implied_typedef()) == 0) 1688 (void)sprintf(s = buf, "enum %.*s", TEXT_LEN, yystack.l_mark[-1].text.text); 1689 new_decl_spec(&yyval.decl_spec, s, yystack.l_mark[-2].text.begin, DS_NONE); 1690 } 1691 break; 1692 case 74: 1693 #line 752 "grammar.y" 1694 { 1695 char *s; 1696 if ((s = implied_typedef()) == 0) 1697 (void)sprintf(s = buf, "%.*s {}", TEXT_LEN, yystack.l_mark[-1].text.text); 1698 new_decl_spec(&yyval.decl_spec, s, yystack.l_mark[-1].text.begin, DS_NONE); 1699 } 1700 break; 1701 case 75: 1702 #line 759 "grammar.y" 1703 { 1704 (void)sprintf(buf, "enum %.*s", TEXT_LEN, yystack.l_mark[0].text.text); 1705 new_decl_spec(&yyval.decl_spec, buf, yystack.l_mark[-1].text.begin, DS_NONE); 1706 } 1707 break; 1708 case 76: 1709 #line 767 "grammar.y" 1710 { 1711 imply_typedef("enum"); 1712 yyval.text = yystack.l_mark[0].text; 1713 } 1714 break; 1715 case 79: 1716 #line 780 "grammar.y" 1717 { 1718 yyval.declarator = yystack.l_mark[0].declarator; 1719 (void)sprintf(buf, "%.*s%.*s", TEXT_LEN, yystack.l_mark[-1].text.text, TEXT_LEN, yyval.declarator->text); 1720 free(yyval.declarator->text); 1721 yyval.declarator->text = xstrdup(buf); 1722 yyval.declarator->begin = yystack.l_mark[-1].text.begin; 1723 yyval.declarator->pointer = TRUE; 1724 } 1725 break; 1726 case 81: 1727 #line 793 "grammar.y" 1728 { 1729 yyval.declarator = new_declarator(yystack.l_mark[0].text.text, yystack.l_mark[0].text.text, yystack.l_mark[0].text.begin); 1730 } 1731 break; 1732 case 82: 1733 #line 797 "grammar.y" 1734 { 1735 yyval.declarator = yystack.l_mark[-1].declarator; 1736 (void)sprintf(buf, "(%.*s)", TEXT_LEN, yyval.declarator->text); 1737 free(yyval.declarator->text); 1738 yyval.declarator->text = xstrdup(buf); 1739 yyval.declarator->begin = yystack.l_mark[-2].text.begin; 1740 } 1741 break; 1742 case 83: 1743 #line 805 "grammar.y" 1744 { 1745 yyval.declarator = yystack.l_mark[-1].declarator; 1746 (void)sprintf(buf, "%.*s%.*s", TEXT_LEN, yyval.declarator->text, TEXT_LEN, yystack.l_mark[0].text.text); 1747 free(yyval.declarator->text); 1748 yyval.declarator->text = xstrdup(buf); 1749 } 1750 break; 1751 case 84: 1752 #line 812 "grammar.y" 1753 { 1754 yyval.declarator = new_declarator("%s()", yystack.l_mark[-3].declarator->name, yystack.l_mark[-3].declarator->begin); 1755 yyval.declarator->params = yystack.l_mark[-1].param_list; 1756 yyval.declarator->func_stack = yystack.l_mark[-3].declarator; 1757 yyval.declarator->head = (yystack.l_mark[-3].declarator->func_stack == NULL) ? yyval.declarator : yystack.l_mark[-3].declarator->head; 1758 yyval.declarator->func_def = FUNC_ANSI; 1759 } 1760 break; 1761 case 85: 1762 #line 820 "grammar.y" 1763 { 1764 yyval.declarator = new_declarator("%s()", yystack.l_mark[-3].declarator->name, yystack.l_mark[-3].declarator->begin); 1765 yyval.declarator->params = yystack.l_mark[-1].param_list; 1766 yyval.declarator->func_stack = yystack.l_mark[-3].declarator; 1767 yyval.declarator->head = (yystack.l_mark[-3].declarator->func_stack == NULL) ? yyval.declarator : yystack.l_mark[-3].declarator->head; 1768 yyval.declarator->func_def = FUNC_TRADITIONAL; 1769 } 1770 break; 1771 case 86: 1772 #line 831 "grammar.y" 1773 { 1774 (void)sprintf(yyval.text.text, "*%.*s", TEXT_LEN, yystack.l_mark[0].text.text); 1775 yyval.text.begin = yystack.l_mark[-1].text.begin; 1776 } 1777 break; 1778 case 87: 1779 #line 836 "grammar.y" 1780 { 1781 (void)sprintf(yyval.text.text, "*%.*s%.*s", TEXT_LEN, yystack.l_mark[-1].text.text, TEXT_LEN, yystack.l_mark[0].text.text); 1782 yyval.text.begin = yystack.l_mark[-2].text.begin; 1783 } 1784 break; 1785 case 88: 1786 #line 844 "grammar.y" 1787 { 1788 strcpy(yyval.text.text, ""); 1789 yyval.text.begin = 0L; 1790 } 1791 break; 1792 case 90: 1793 #line 853 "grammar.y" 1794 { 1795 (void)sprintf(yyval.text.text, "%s ", yystack.l_mark[0].decl_spec.text); 1796 yyval.text.begin = yystack.l_mark[0].decl_spec.begin; 1797 free(yystack.l_mark[0].decl_spec.text); 1798 } 1799 break; 1800 case 91: 1801 #line 859 "grammar.y" 1802 { 1803 (void)sprintf(yyval.text.text, "%.*s%.*s ", TEXT_LEN, yystack.l_mark[-1].text.text, TEXT_LEN, yystack.l_mark[0].decl_spec.text); 1804 yyval.text.begin = yystack.l_mark[-1].text.begin; 1805 free(yystack.l_mark[0].decl_spec.text); 1806 } 1807 break; 1808 case 93: 1809 #line 869 "grammar.y" 1810 { 1811 add_ident_list(&yyval.param_list, &yystack.l_mark[-2].param_list, "..."); 1812 } 1813 break; 1814 case 94: 1815 #line 876 "grammar.y" 1816 { 1817 new_param_list(&yyval.param_list, yystack.l_mark[0].parameter); 1818 } 1819 break; 1820 case 95: 1821 #line 880 "grammar.y" 1822 { 1823 add_param_list(&yyval.param_list, &yystack.l_mark[-2].param_list, yystack.l_mark[0].parameter); 1824 } 1825 break; 1826 case 96: 1827 #line 887 "grammar.y" 1828 { 1829 check_untagged(&yystack.l_mark[-1].decl_spec); 1830 yyval.parameter = new_parameter(&yystack.l_mark[-1].decl_spec, yystack.l_mark[0].declarator); 1831 } 1832 break; 1833 case 97: 1834 #line 892 "grammar.y" 1835 { 1836 check_untagged(&yystack.l_mark[-1].decl_spec); 1837 yyval.parameter = new_parameter(&yystack.l_mark[-1].decl_spec, yystack.l_mark[0].declarator); 1838 } 1839 break; 1840 case 98: 1841 #line 897 "grammar.y" 1842 { 1843 check_untagged(&yystack.l_mark[0].decl_spec); 1844 yyval.parameter = new_parameter(&yystack.l_mark[0].decl_spec, (Declarator *)0); 1845 } 1846 break; 1847 case 99: 1848 #line 905 "grammar.y" 1849 { 1850 new_ident_list(&yyval.param_list); 1851 } 1852 break; 1853 case 101: 1854 #line 913 "grammar.y" 1855 { 1856 new_ident_list(&yyval.param_list); 1857 add_ident_list(&yyval.param_list, &yyval.param_list, yystack.l_mark[0].text.text); 1858 } 1859 break; 1860 case 102: 1861 #line 918 "grammar.y" 1862 { 1863 add_ident_list(&yyval.param_list, &yystack.l_mark[-2].param_list, yystack.l_mark[0].text.text); 1864 } 1865 break; 1866 case 103: 1867 #line 925 "grammar.y" 1868 { 1869 yyval.text = yystack.l_mark[0].text; 1870 } 1871 break; 1872 case 104: 1873 #line 929 "grammar.y" 1874 { 1875 #if OPT_LINTLIBRARY 1876 if (lintLibrary()) { /* Lint doesn't grok C++ ref variables */ 1877 yyval.text = yystack.l_mark[0].text; 1878 } else 1879 #endif 1880 (void)sprintf(yyval.text.text, "&%.*s", TEXT_LEN, yystack.l_mark[0].text.text); 1881 yyval.text.begin = yystack.l_mark[-1].text.begin; 1882 } 1883 break; 1884 case 105: 1885 #line 942 "grammar.y" 1886 { 1887 yyval.declarator = new_declarator(yystack.l_mark[0].text.text, "", yystack.l_mark[0].text.begin); 1888 } 1889 break; 1890 case 106: 1891 #line 946 "grammar.y" 1892 { 1893 yyval.declarator = yystack.l_mark[0].declarator; 1894 (void)sprintf(buf, "%.*s%.*s", TEXT_LEN, yystack.l_mark[-1].text.text, TEXT_LEN, yyval.declarator->text); 1895 free(yyval.declarator->text); 1896 yyval.declarator->text = xstrdup(buf); 1897 yyval.declarator->begin = yystack.l_mark[-1].text.begin; 1898 } 1899 break; 1900 case 108: 1901 #line 958 "grammar.y" 1902 { 1903 yyval.declarator = yystack.l_mark[-1].declarator; 1904 (void)sprintf(buf, "(%.*s)", TEXT_LEN, yyval.declarator->text); 1905 free(yyval.declarator->text); 1906 yyval.declarator->text = xstrdup(buf); 1907 yyval.declarator->begin = yystack.l_mark[-2].text.begin; 1908 } 1909 break; 1910 case 109: 1911 #line 966 "grammar.y" 1912 { 1913 yyval.declarator = yystack.l_mark[-1].declarator; 1914 (void)sprintf(buf, "%.*s%.*s", TEXT_LEN, yyval.declarator->text, TEXT_LEN, yystack.l_mark[0].text.text); 1915 free(yyval.declarator->text); 1916 yyval.declarator->text = xstrdup(buf); 1917 } 1918 break; 1919 case 110: 1920 #line 973 "grammar.y" 1921 { 1922 yyval.declarator = new_declarator(yystack.l_mark[0].text.text, "", yystack.l_mark[0].text.begin); 1923 } 1924 break; 1925 case 111: 1926 #line 977 "grammar.y" 1927 { 1928 yyval.declarator = new_declarator("%s()", "", yystack.l_mark[-3].declarator->begin); 1929 yyval.declarator->params = yystack.l_mark[-1].param_list; 1930 yyval.declarator->func_stack = yystack.l_mark[-3].declarator; 1931 yyval.declarator->head = (yystack.l_mark[-3].declarator->func_stack == NULL) ? yyval.declarator : yystack.l_mark[-3].declarator->head; 1932 yyval.declarator->func_def = FUNC_ANSI; 1933 } 1934 break; 1935 case 112: 1936 #line 985 "grammar.y" 1937 { 1938 yyval.declarator = new_declarator("%s()", "", yystack.l_mark[-2].declarator->begin); 1939 yyval.declarator->func_stack = yystack.l_mark[-2].declarator; 1940 yyval.declarator->head = (yystack.l_mark[-2].declarator->func_stack == NULL) ? yyval.declarator : yystack.l_mark[-2].declarator->head; 1941 yyval.declarator->func_def = FUNC_ANSI; 1942 } 1943 break; 1944 case 113: 1945 #line 992 "grammar.y" 1946 { 1947 Declarator *d; 1948 1949 d = new_declarator("", "", yystack.l_mark[-2].text.begin); 1950 yyval.declarator = new_declarator("%s()", "", yystack.l_mark[-2].text.begin); 1951 yyval.declarator->params = yystack.l_mark[-1].param_list; 1952 yyval.declarator->func_stack = d; 1953 yyval.declarator->head = yyval.declarator; 1954 yyval.declarator->func_def = FUNC_ANSI; 1955 } 1956 break; 1957 case 114: 1958 #line 1003 "grammar.y" 1959 { 1960 Declarator *d; 1961 1962 d = new_declarator("", "", yystack.l_mark[-1].text.begin); 1963 yyval.declarator = new_declarator("%s()", "", yystack.l_mark[-1].text.begin); 1964 yyval.declarator->func_stack = d; 1965 yyval.declarator->head = yyval.declarator; 1966 yyval.declarator->func_def = FUNC_ANSI; 1967 } 1968 break; 1969 #line 1968 "grammar.tab.c" 1970 } 1971 yystack.s_mark -= yym; 1972 yystate = *yystack.s_mark; 1973 yystack.l_mark -= yym; 1974 yym = yylhs[yyn]; 1975 if (yystate == 0 && yym == 0) 1976 { 1977 #if YYDEBUG 1978 if (yydebug) 1979 printf("%sdebug: after reduction, shifting from state 0 to\ 1980 state %d\n", YYPREFIX, YYFINAL); 1981 #endif 1982 yystate = YYFINAL; 1983 *++yystack.s_mark = YYFINAL; 1984 *++yystack.l_mark = yyval; 1985 if (yychar < 0) 1986 { 1987 yychar = YYLEX; 1988 if (yychar < 0) yychar = YYEOF; 1989 #if YYDEBUG 1990 if (yydebug) 1991 { 1992 if ((yys = yyname[YYTRANSLATE(yychar)]) == NULL) yys = yyname[YYUNDFTOKEN]; 1993 printf("%sdebug: state %d, reading %d (%s)\n", 1994 YYPREFIX, YYFINAL, yychar, yys); 1995 } 1996 #endif 1997 } 1998 if (yychar == YYEOF) goto yyaccept; 1999 goto yyloop; 2000 } 2001 if (((yyn = yygindex[yym]) != 0) && (yyn += yystate) >= 0 && 2002 yyn <= YYTABLESIZE && yycheck[yyn] == (YYINT) yystate) 2003 yystate = yytable[yyn]; 2004 else 2005 yystate = yydgoto[yym]; 2006 #if YYDEBUG 2007 if (yydebug) 2008 printf("%sdebug: after reduction, shifting from state %d \ 2009 to state %d\n", YYPREFIX, *yystack.s_mark, yystate); 2010 #endif 2011 if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow; 2012 *++yystack.s_mark = (YYINT) yystate; 2013 *++yystack.l_mark = yyval; 2014 goto yyloop; 2015 2016 yyoverflow: 2017 YYERROR_CALL("yacc stack overflow"); 2018 2019 yyabort: 2020 yyfreestack(&yystack); 2021 return (1); 2022 2023 yyaccept: 2024 yyfreestack(&yystack); 2025 return (0); 2026 } 2027
Indexes created Sun Mar 22 00:23:16 UTC 2026