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