| 1 | /* Definitions for symtab.c and callers, part of Bison. |
| 2 | |
| 3 | Copyright (C) 1984, 1989, 1992, 2000-2002, 2004-2007, 2009-2011 Free |
| 4 | Software Foundation, Inc. |
| 5 | |
| 6 | This file is part of Bison, the GNU Compiler Compiler. |
| 7 | |
| 8 | This program is free software: you can redistribute it and/or modify |
| 9 | it under the terms of the GNU General Public License as published by |
| 10 | the Free Software Foundation, either version 3 of the License, or |
| 11 | (at your option) any later version. |
| 12 | |
| 13 | This program is distributed in the hope that it will be useful, |
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| 15 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| 16 | GNU General Public License for more details. |
| 17 | |
| 18 | You should have received a copy of the GNU General Public License |
| 19 | along with this program. If not, see <http://www.gnu.org/licenses/>. */ |
| 20 | |
| 21 | /** |
| 22 | * \file symtab.h |
| 23 | * \brief Manipulating ::symbol. |
| 24 | */ |
| 25 | |
| 26 | #ifndef SYMTAB_H_ |
| 27 | # define SYMTAB_H_ |
| 28 | |
| 29 | # include "assoc.h" |
| 30 | # include "location.h" |
| 31 | # include "scan-code.h" |
| 32 | # include "uniqstr.h" |
| 33 | |
| 34 | /*----------. |
| 35 | | Symbols. | |
| 36 | `----------*/ |
| 37 | |
| 38 | /** Symbol classes. */ |
| 39 | typedef enum |
| 40 | { |
| 41 | unknown_sym, /**< Undefined. */ |
| 42 | token_sym, /**< Terminal. */ |
| 43 | nterm_sym /**< Non-terminal. */ |
| 44 | } symbol_class; |
| 45 | |
| 46 | |
| 47 | /** Internal token numbers. */ |
| 48 | typedef int symbol_number; |
| 49 | #define SYMBOL_NUMBER_MAXIMUM INT_MAX |
| 50 | |
| 51 | |
| 52 | typedef struct symbol symbol; |
| 53 | |
| 54 | /* When extending this structure, be sure to complete |
| 55 | symbol_check_alias_consistency. */ |
| 56 | struct symbol |
| 57 | { |
| 58 | /** The key, name of the symbol. */ |
| 59 | uniqstr tag; |
| 60 | /** The location of its first occurrence. */ |
| 61 | location location; |
| 62 | |
| 63 | /** Its \c \%type. */ |
| 64 | uniqstr type_name; |
| 65 | /** Its \c \%type's location. */ |
| 66 | location type_location; |
| 67 | |
| 68 | /** Any \c \%destructor declared specifically for this symbol. |
| 69 | |
| 70 | Access this field only through <tt>symbol</tt>'s interface functions. For |
| 71 | example, if <tt>symbol::destructor = NULL</tt>, a default \c \%destructor |
| 72 | or a per-type \c \%destructor might be appropriate, and |
| 73 | \c symbol_destructor_get will compute the correct one. */ |
| 74 | code_props destructor; |
| 75 | |
| 76 | /** Any \c \%printer declared specifically for this symbol. |
| 77 | |
| 78 | Access this field only through <tt>symbol</tt>'s interface functions. |
| 79 | \sa symbol::destructor */ |
| 80 | code_props printer; |
| 81 | |
| 82 | symbol_number number; |
| 83 | location prec_location; |
| 84 | int prec; |
| 85 | assoc assoc; |
| 86 | int user_token_number; |
| 87 | |
| 88 | /* Points to the other in the symbol-string pair for an alias. |
| 89 | Special value USER_NUMBER_HAS_STRING_ALIAS in the symbol half of the |
| 90 | symbol-string pair for an alias. */ |
| 91 | symbol *alias; |
| 92 | symbol_class class; |
| 93 | bool declared; |
| 94 | }; |
| 95 | |
| 96 | /** Undefined user number. */ |
| 97 | #define USER_NUMBER_UNDEFINED -1 |
| 98 | |
| 99 | /* `symbol->user_token_number == USER_NUMBER_HAS_STRING_ALIAS' means |
| 100 | this symbol has a literal string alias. For instance, `%token foo |
| 101 | "foo"' has `"foo"' numbered regularly, and `foo' numbered as |
| 102 | USER_NUMBER_HAS_STRING_ALIAS. */ |
| 103 | #define USER_NUMBER_HAS_STRING_ALIAS -9991 |
| 104 | |
| 105 | /* Undefined internal token number. */ |
| 106 | #define NUMBER_UNDEFINED (-1) |
| 107 | |
| 108 | /** Print a symbol (for debugging). */ |
| 109 | void symbol_print (symbol *s, FILE *f); |
| 110 | |
| 111 | /** Fetch (or create) the symbol associated to KEY. */ |
| 112 | symbol *symbol_from_uniqstr (const uniqstr key, location loc); |
| 113 | |
| 114 | /** Fetch (or create) the symbol associated to KEY. */ |
| 115 | symbol *symbol_get (const char *key, location loc); |
| 116 | |
| 117 | /** Generate a dummy nonterminal. |
| 118 | |
| 119 | Its name cannot conflict with the user's names. */ |
| 120 | symbol *dummy_symbol_get (location loc); |
| 121 | |
| 122 | /** Is this a dummy nonterminal? */ |
| 123 | bool symbol_is_dummy (const symbol *sym); |
| 124 | |
| 125 | /** |
| 126 | * Make \c str the literal string alias of \c sym. Copy token number, |
| 127 | * symbol number, and type from \c sym to \c str. |
| 128 | */ |
| 129 | void symbol_make_alias (symbol *sym, symbol *str, location loc); |
| 130 | |
| 131 | /** Set the \c type_name associated with \c sym. |
| 132 | |
| 133 | Do nothing if passed 0 as \c type_name. */ |
| 134 | void symbol_type_set (symbol *sym, uniqstr type_name, location loc); |
| 135 | |
| 136 | /** Set the \c destructor associated with \c sym. */ |
| 137 | void symbol_destructor_set (symbol *sym, code_props const *destructor); |
| 138 | |
| 139 | /** Get the computed \c \%destructor for \c sym, which was initialized with |
| 140 | \c code_props_none_init if there's no \c \%destructor. */ |
| 141 | code_props const *symbol_destructor_get (symbol const *sym); |
| 142 | |
| 143 | /** Set the \c printer associated with \c sym. */ |
| 144 | void symbol_printer_set (symbol *sym, code_props const *printer); |
| 145 | |
| 146 | /** Get the computed \c \%printer for \c sym, which was initialized with |
| 147 | \c code_props_none_init if there's no \c \%printer. */ |
| 148 | code_props const *symbol_printer_get (symbol const *sym); |
| 149 | |
| 150 | /* Set the \c precedence associated with \c sym. |
| 151 | |
| 152 | Ensure that \a symbol is a terminal. |
| 153 | Do nothing if invoked with \c undef_assoc as \c assoc. */ |
| 154 | void symbol_precedence_set (symbol *sym, int prec, assoc a, location loc); |
| 155 | |
| 156 | /** Set the \c class associated with \c sym. */ |
| 157 | void symbol_class_set (symbol *sym, symbol_class class, location loc, |
| 158 | bool declaring); |
| 159 | |
| 160 | /** Set the \c user_token_number associated with \c sym. */ |
| 161 | void symbol_user_token_number_set (symbol *sym, int user_number, location loc); |
| 162 | |
| 163 | |
| 164 | /** The error token. */ |
| 165 | extern symbol *errtoken; |
| 166 | /** The token for unknown tokens. */ |
| 167 | extern symbol *undeftoken; |
| 168 | /** The end of input token. */ |
| 169 | extern symbol *endtoken; |
| 170 | /** The genuine start symbol. |
| 171 | |
| 172 | $accept: start-symbol $end */ |
| 173 | extern symbol *accept; |
| 174 | |
| 175 | /** The user start symbol. */ |
| 176 | extern symbol *startsymbol; |
| 177 | /** The location of the \c \%start declaration. */ |
| 178 | extern location startsymbol_location; |
| 179 | |
| 180 | |
| 181 | /*-----------------. |
| 182 | | Semantic types. | |
| 183 | `-----------------*/ |
| 184 | |
| 185 | /** A semantic type and its associated \c \%destructor and \c \%printer. |
| 186 | |
| 187 | Access the fields of this struct only through the interface functions in |
| 188 | this file. \sa symbol::destructor */ |
| 189 | typedef struct { |
| 190 | /** The key, name of the semantic type. */ |
| 191 | uniqstr tag; |
| 192 | |
| 193 | /** Any \c %destructor declared for this semantic type. */ |
| 194 | code_props destructor; |
| 195 | /** Any \c %printer declared for this semantic type. */ |
| 196 | code_props printer; |
| 197 | } semantic_type; |
| 198 | |
| 199 | /** Fetch (or create) the semantic type associated to KEY. */ |
| 200 | semantic_type *semantic_type_from_uniqstr (const uniqstr key); |
| 201 | |
| 202 | /** Fetch (or create) the semantic type associated to KEY. */ |
| 203 | semantic_type *semantic_type_get (const char *key); |
| 204 | |
| 205 | /** Set the \c destructor associated with \c type. */ |
| 206 | void semantic_type_destructor_set (semantic_type *type, |
| 207 | code_props const *destructor); |
| 208 | |
| 209 | /** Set the \c printer associated with \c type. */ |
| 210 | void semantic_type_printer_set (semantic_type *type, |
| 211 | code_props const *printer); |
| 212 | |
| 213 | /*----------------------------------. |
| 214 | | Symbol and semantic type tables. | |
| 215 | `----------------------------------*/ |
| 216 | |
| 217 | /** Create the symbol and semantic type tables. */ |
| 218 | void symbols_new (void); |
| 219 | |
| 220 | /** Free all the memory allocated for symbols and semantic types. */ |
| 221 | void symbols_free (void); |
| 222 | |
| 223 | /** Check that all the symbols are defined. |
| 224 | |
| 225 | Report any undefined symbols and consider them nonterminals. */ |
| 226 | void symbols_check_defined (void); |
| 227 | |
| 228 | /** Sanity checks and #token_translations construction. |
| 229 | |
| 230 | Perform various sanity checks, assign symbol numbers, and set up |
| 231 | #token_translations. */ |
| 232 | void symbols_pack (void); |
| 233 | |
| 234 | |
| 235 | /*---------------------------------------. |
| 236 | | Default %destructor's and %printer's. | |
| 237 | `---------------------------------------*/ |
| 238 | |
| 239 | /** Set the default \c \%destructor for tagged values. */ |
| 240 | void default_tagged_destructor_set (code_props const *destructor); |
| 241 | /** Set the default \c \%destructor for tagless values. */ |
| 242 | void default_tagless_destructor_set (code_props const *destructor); |
| 243 | |
| 244 | /** Set the default \c \%printer for tagged values. */ |
| 245 | void default_tagged_printer_set (code_props const *printer); |
| 246 | /** Set the default \c \%printer for tagless values. */ |
| 247 | void default_tagless_printer_set (code_props const *printer); |
| 248 | |
| 249 | #endif /* !SYMTAB_H_ */ |