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