1 /* $Id: defs.h,v 1.37 2012/05/26 15:23:00 tom Exp $ */ 2 3 #ifdef HAVE_CONFIG_H 4 #include <config.h> 5 #endif 6 7 #include <stdlib.h> 8 #include <string.h> 9 #include <errno.h> 10 #include <assert.h> 11 #include <ctype.h> 12 #include <stdio.h> 13 14 #if defined(__cplusplus) /* __cplusplus, etc. */ 15 #define class myClass 16 #endif 17 18 #define YYMAJOR 1 19 #define YYMINOR 9 20 21 #define CONCAT(first,second) first #second 22 #define CONCAT1(string,number) CONCAT(string, number) 23 #define CONCAT2(first,second) #first "." #second 24 25 #ifdef YYPATCH 26 #define VSTRING(a,b) CONCAT2(a,b) CONCAT1(" ",YYPATCH) 27 #else 28 #define VSTRING(a,b) CONCAT2(a,b) 29 #endif 30 31 #define VERSION VSTRING(YYMAJOR, YYMINOR) 32 33 /* machine-dependent definitions */ 34 /* the following definitions are for the Tahoe */ 35 /* they might have to be changed for other machines */ 36 37 /* MAXCHAR is the largest unsigned character value */ 38 /* MAXSHORT is the largest value of a C short */ 39 /* MINSHORT is the most negative value of a C short */ 40 /* MAXTABLE is the maximum table size */ 41 /* BITS_PER_WORD is the number of bits in a C unsigned */ 42 /* WORDSIZE computes the number of words needed to */ 43 /* store n bits */ 44 /* BIT returns the value of the n-th bit starting */ 45 /* from r (0-indexed) */ 46 /* SETBIT sets the n-th bit starting from r */ 47 48 #define MAXCHAR 255 49 #define MAXSHORT 32767 50 #define MINSHORT -32768 51 #define MAXTABLE 32500 52 #define BITS_PER_WORD 32 53 #define WORDSIZE(n) (((n)+(BITS_PER_WORD-1))/BITS_PER_WORD) 54 #define BIT(r, n) ((((r)[(n)>>5])>>((n)&31))&1) 55 #define SETBIT(r, n) ((r)[(n)>>5]|=((unsigned)1<<((n)&31))) 56 57 /* character names */ 58 59 #define NUL '\0' /* the null character */ 60 #define NEWLINE '\n' /* line feed */ 61 #define SP ' ' /* space */ 62 #define BS '\b' /* backspace */ 63 #define HT '\t' /* horizontal tab */ 64 #define VT '\013' /* vertical tab */ 65 #define CR '\r' /* carriage return */ 66 #define FF '\f' /* form feed */ 67 #define QUOTE '\'' /* single quote */ 68 #define DOUBLE_QUOTE '\"' /* double quote */ 69 #define BACKSLASH '\\' /* backslash */ 70 71 #define UCH(c) (unsigned char)(c) 72 73 /* defines for constructing filenames */ 74 75 #if defined(VMS) 76 #define CODE_SUFFIX "_code.c" 77 #define DEFINES_SUFFIX "_tab.h" 78 #define EXTERNS_SUFFIX "_tab.i" 79 #define OUTPUT_SUFFIX "_tab.c" 80 #else 81 #define CODE_SUFFIX ".code.c" 82 #define DEFINES_SUFFIX ".tab.h" 83 #define EXTERNS_SUFFIX ".tab.i" 84 #define OUTPUT_SUFFIX ".tab.c" 85 #endif 86 #define VERBOSE_SUFFIX ".output" 87 #define GRAPH_SUFFIX ".dot" 88 89 /* keyword codes */ 90 91 #define TOKEN 0 92 #define LEFT 1 93 #define RIGHT 2 94 #define NONASSOC 3 95 #define MARK 4 96 #define TEXT 5 97 #define TYPE 6 98 #define START 7 99 #define UNION 8 100 #define IDENT 9 101 #define EXPECT 10 102 #define EXPECT_RR 11 103 #define PURE_PARSER 12 104 #define PARSE_PARAM 13 105 #define LEX_PARAM 14 106 #define POSIX_YACC 15 107 108 /* symbol classes */ 109 110 #define UNKNOWN 0 111 #define TERM 1 112 #define NONTERM 2 113 114 /* the undefined value */ 115 116 #define UNDEFINED (-1) 117 118 /* action codes */ 119 120 #define SHIFT 1 121 #define REDUCE 2 122 123 /* character macros */ 124 125 #define IS_IDENT(c) (isalnum(c) || (c) == '_' || (c) == '.' || (c) == '$') 126 #define IS_OCTAL(c) ((c) >= '0' && (c) <= '7') 127 #define NUMERIC_VALUE(c) ((c) - '0') 128 129 /* symbol macros */ 130 131 #define ISTOKEN(s) ((s) < start_symbol) 132 #define ISVAR(s) ((s) >= start_symbol) 133 134 /* storage allocation macros */ 135 136 #define CALLOC(k,n) (calloc((size_t)(k),(size_t)(n))) 137 #define FREE(x) (free((char*)(x))) 138 #define MALLOC(n) (malloc((size_t)(n))) 139 #define TMALLOC(t,n) ((t*) malloc((size_t)(n) * sizeof(t))) 140 #define NEW(t) ((t*)allocate(sizeof(t))) 141 #define NEW2(n,t) ((t*)allocate(((size_t)(n)*sizeof(t)))) 142 #define REALLOC(p,n) (realloc((char*)(p),(size_t)(n))) 143 #define TREALLOC(t,p,n) ((t*)realloc((char*)(p), (size_t)(n) * sizeof(t))) 144 145 #define DO_FREE(x) if (x) { FREE(x); x = 0; } 146 147 #define NO_SPACE(p) if (p == 0) no_space(); assert(p != 0) 148 149 /* messages */ 150 #define PLURAL(n) ((n) > 1 ? "s" : "") 151 152 typedef char Assoc_t; 153 typedef char Class_t; 154 typedef short Index_t; 155 typedef short Value_t; 156 157 /* the structure of a symbol table entry */ 158 159 typedef struct bucket bucket; 160 struct bucket 161 { 162 struct bucket *link; 163 struct bucket *next; 164 char *name; 165 char *tag; 166 Value_t value; 167 Index_t index; 168 Value_t prec; 169 Class_t class; 170 Assoc_t assoc; 171 }; 172 173 /* the structure of the LR(0) state machine */ 174 175 typedef struct core core; 176 struct core 177 { 178 struct core *next; 179 struct core *link; 180 Value_t number; 181 Value_t accessing_symbol; 182 Value_t nitems; 183 Value_t items[1]; 184 }; 185 186 /* the structure used to record shifts */ 187 188 typedef struct shifts shifts; 189 struct shifts 190 { 191 struct shifts *next; 192 Value_t number; 193 Value_t nshifts; 194 Value_t shift[1]; 195 }; 196 197 /* the structure used to store reductions */ 198 199 typedef struct reductions reductions; 200 struct reductions 201 { 202 struct reductions *next; 203 Value_t number; 204 Value_t nreds; 205 Value_t rules[1]; 206 }; 207 208 /* the structure used to represent parser actions */ 209 210 typedef struct action action; 211 struct action 212 { 213 struct action *next; 214 Value_t symbol; 215 Value_t number; 216 Value_t prec; 217 char action_code; 218 Assoc_t assoc; 219 char suppressed; 220 }; 221 222 /* the structure used to store parse/lex parameters */ 223 typedef struct param param; 224 struct param 225 { 226 struct param *next; 227 char *name; /* parameter name */ 228 char *type; /* everything before parameter name */ 229 char *type2; /* everything after parameter name */ 230 }; 231 232 /* global variables */ 233 234 extern char dflag; 235 extern char gflag; 236 extern char iflag; 237 extern char lflag; 238 extern char rflag; 239 extern char sflag; 240 extern char tflag; 241 extern char vflag; 242 extern const char *symbol_prefix; 243 244 extern const char *myname; 245 extern char *cptr; 246 extern char *line; 247 extern int lineno; 248 extern int outline; 249 extern int exit_code; 250 extern int pure_parser; 251 252 extern const char *const banner[]; 253 extern const char *const xdecls[]; 254 extern const char *const tables[]; 255 extern const char *const global_vars[]; 256 extern const char *const impure_vars[]; 257 extern const char *const hdr_defs[]; 258 extern const char *const hdr_vars[]; 259 extern const char *const body_1[]; 260 extern const char *const body_vars[]; 261 extern const char *const body_2[]; 262 extern const char *const body_3[]; 263 extern const char *const trailer[]; 264 extern const char *const trailer_2[]; 265 266 extern char *code_file_name; 267 extern char *input_file_name; 268 extern char *defines_file_name; 269 extern char *externs_file_name; 270 271 extern FILE *action_file; 272 extern FILE *code_file; 273 extern FILE *defines_file; 274 extern FILE *externs_file; 275 extern FILE *input_file; 276 extern FILE *output_file; 277 extern FILE *text_file; 278 extern FILE *union_file; 279 extern FILE *verbose_file; 280 extern FILE *graph_file; 281 282 extern int nitems; 283 extern int nrules; 284 extern int nsyms; 285 extern int ntokens; 286 extern int nvars; 287 extern int ntags; 288 289 extern char unionized; 290 extern char line_format[]; 291 292 extern Value_t start_symbol; 293 extern char **symbol_name; 294 extern char **symbol_pname; 295 extern Value_t *symbol_value; 296 extern Value_t *symbol_prec; 297 extern char *symbol_assoc; 298 299 extern Value_t *ritem; 300 extern Value_t *rlhs; 301 extern Value_t *rrhs; 302 extern Value_t *rprec; 303 extern Assoc_t *rassoc; 304 305 extern Value_t **derives; 306 extern char *nullable; 307 308 extern bucket *first_symbol; 309 extern bucket *last_symbol; 310 311 extern int nstates; 312 extern core *first_state; 313 extern shifts *first_shift; 314 extern reductions *first_reduction; 315 extern Value_t *accessing_symbol; 316 extern core **state_table; 317 extern shifts **shift_table; 318 extern reductions **reduction_table; 319 extern unsigned *LA; 320 extern Value_t *LAruleno; 321 extern Value_t *lookaheads; 322 extern Value_t *goto_map; 323 extern Value_t *from_state; 324 extern Value_t *to_state; 325 326 extern action **parser; 327 extern int SRexpect; 328 extern int RRexpect; 329 extern int SRtotal; 330 extern int RRtotal; 331 extern Value_t *SRconflicts; 332 extern Value_t *RRconflicts; 333 extern Value_t *defred; 334 extern Value_t *rules_used; 335 extern Value_t nunused; 336 extern Value_t final_state; 337 338 extern Value_t *itemset; 339 extern Value_t *itemsetend; 340 extern unsigned *ruleset; 341 342 extern param *lex_param; 343 extern param *parse_param; 344 345 /* global functions */ 346 347 extern bucket *lookup(const char *); 348 extern bucket *make_bucket(const char *); 349 350 #ifndef GCC_NORETURN 351 #if defined(__dead2) 352 #define GCC_NORETURN __dead2 353 #elif defined(__dead) 354 #define GCC_NORETURN __dead 355 #else 356 #define GCC_NORETURN /* nothing */ 357 #endif 358 #endif 359 360 #ifndef GCC_UNUSED 361 #if defined(__unused) 362 #define GCC_UNUSED __unused 363 #else 364 #define GCC_UNUSED /* nothing */ 365 #endif 366 #endif 367 368 /* closure.c */ 369 extern void closure(Value_t * nucleus, int n); 370 extern void finalize_closure(void); 371 extern void set_first_derives(void); 372 373 /* error.c */ 374 extern void default_action_warning(void); 375 extern void dollar_error(int a_lineno, char *a_line, char *a_cptr) GCC_NORETURN; 376 extern void dollar_warning(int a_lineno, int i); 377 extern void fatal(const char *msg) GCC_NORETURN; 378 extern void illegal_character(char *c_cptr) GCC_NORETURN; 379 extern void illegal_tag(int t_lineno, char *t_line, char *t_cptr) GCC_NORETURN; 380 extern void missing_brace(void) GCC_NORETURN; 381 extern void no_grammar(void) GCC_NORETURN; 382 extern void no_space(void) GCC_NORETURN; 383 extern void open_error(const char *filename) GCC_NORETURN; 384 extern void over_unionized(char *u_cptr) GCC_NORETURN; 385 extern void prec_redeclared(void); 386 extern void reprec_warning(char *s); 387 extern void restarted_warning(void); 388 extern void retyped_warning(char *s); 389 extern void revalued_warning(char *s); 390 extern void syntax_error(int st_lineno, char *st_line, char *st_cptr) GCC_NORETURN; 391 extern void terminal_lhs(int s_lineno) GCC_NORETURN; 392 extern void terminal_start(char *s) GCC_NORETURN; 393 extern void tokenized_start(char *s) GCC_NORETURN; 394 extern void undefined_goal(char *s) GCC_NORETURN; 395 extern void undefined_symbol_warning(char *s); 396 extern void unexpected_EOF(void) GCC_NORETURN; 397 extern void unknown_rhs(int i) GCC_NORETURN; 398 extern void unterminated_action(int a_lineno, char *a_line, char *a_cptr) GCC_NORETURN; 399 extern void unterminated_comment(int c_lineno, char *c_line, char *c_cptr) GCC_NORETURN; 400 extern void unterminated_string(int s_lineno, char *s_line, char *s_cptr) GCC_NORETURN; 401 extern void unterminated_text(int t_lineno, char *t_line, char *t_cptr) GCC_NORETURN; 402 extern void unterminated_union(int u_lineno, char *u_line, char *u_cptr) GCC_NORETURN; 403 extern void untyped_lhs(void) GCC_NORETURN; 404 extern void untyped_rhs(int i, char *s) GCC_NORETURN; 405 extern void used_reserved(char *s) GCC_NORETURN; 406 407 /* graph.c */ 408 extern void graph(void); 409 410 /* lalr.c */ 411 extern void create_symbol_table(void); 412 extern void free_symbol_table(void); 413 extern void free_symbols(void); 414 415 /* lalr.c */ 416 extern void lalr(void); 417 418 /* lr0.c */ 419 extern void lr0(void); 420 extern void show_cores(void); 421 extern void show_ritems(void); 422 extern void show_rrhs(void); 423 extern void show_shifts(void); 424 425 /* main.c */ 426 extern void *allocate(size_t n); 427 extern void done(int k) GCC_NORETURN; 428 429 /* mkpar.c */ 430 extern void free_parser(void); 431 extern void make_parser(void); 432 433 /* output.c */ 434 extern void output(void); 435 436 /* reader.c */ 437 extern void reader(void); 438 439 /* skeleton.c */ 440 extern void write_section(FILE * fp, const char *const section[]); 441 442 /* verbose.c */ 443 extern void verbose(void); 444 445 /* warshall.c */ 446 extern void reflexive_transitive_closure(unsigned *R, int n); 447 448 #ifdef NO_LEAKS 449 extern void lr0_leaks(void); 450 extern void lalr_leaks(void); 451 extern void mkpar_leaks(void); 452 extern void output_leaks(void); 453 extern void reader_leaks(void); 454 #endif 455