David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 1 | /* |
| 2 | * (C) Copyright David Gibson <dwg@au1.ibm.com>, IBM Corporation. 2005. |
| 3 | * |
David Gibson | 63dc9c7 | 2007-09-18 11:44:04 +1000 | [diff] [blame] | 4 | * |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 5 | * This program is free software; you can redistribute it and/or |
| 6 | * modify it under the terms of the GNU General Public License as |
| 7 | * published by the Free Software Foundation; either version 2 of the |
| 8 | * License, or (at your option) any later version. |
| 9 | * |
| 10 | * This program is distributed in the hope that it will be useful, |
| 11 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
| 12 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
| 13 | * General Public License for more details. |
David Gibson | 63dc9c7 | 2007-09-18 11:44:04 +1000 | [diff] [blame] | 14 | * |
| 15 | * You should have received a copy of the GNU General Public License |
| 16 | * along with this program; if not, write to the Free Software |
| 17 | * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 |
| 18 | * USA |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 19 | */ |
| 20 | |
David Gibson | 86dbcbd | 2005-10-19 16:00:31 +1000 | [diff] [blame] | 21 | %locations |
| 22 | |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 23 | %{ |
| 24 | #include "dtc.h" |
Jon Loeliger | e45e6fd | 2007-03-23 15:18:41 -0500 | [diff] [blame] | 25 | #include "srcpos.h" |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 26 | |
Jon Loeliger | 3948849 | 2007-02-16 09:33:54 -0600 | [diff] [blame] | 27 | int yylex(void); |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 28 | unsigned long long eval_literal(const char *s, int base, int bits); |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 29 | |
David Gibson | f0517db | 2005-07-15 17:14:24 +1000 | [diff] [blame] | 30 | extern struct boot_info *the_boot_info; |
Scott Wood | ad4f54a | 2008-01-03 17:43:33 -0600 | [diff] [blame] | 31 | extern int treesource_error; |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 32 | |
| 33 | %} |
| 34 | |
| 35 | %union { |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 36 | char *propnodename; |
| 37 | char *literal; |
| 38 | char *labelref; |
Jon Loeliger | af0278a | 2007-02-15 10:59:27 -0600 | [diff] [blame] | 39 | unsigned int cbase; |
David Gibson | 03a9b9d | 2005-07-11 16:49:52 +1000 | [diff] [blame] | 40 | u8 byte; |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 41 | struct data data; |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 42 | |
| 43 | u64 addr; |
| 44 | cell_t cell; |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 45 | struct property *prop; |
| 46 | struct property *proplist; |
| 47 | struct node *node; |
| 48 | struct node *nodelist; |
David Gibson | f040d95 | 2005-10-24 18:18:38 +1000 | [diff] [blame] | 49 | struct reserve_info *re; |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 50 | } |
| 51 | |
David Gibson | 9138db5 | 2007-11-07 11:17:17 +1100 | [diff] [blame] | 52 | %token DT_V1 |
David Gibson | f0517db | 2005-07-15 17:14:24 +1000 | [diff] [blame] | 53 | %token DT_MEMRESERVE |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 54 | %token <propnodename> DT_PROPNODENAME |
| 55 | %token <literal> DT_LITERAL |
David Gibson | 9138db5 | 2007-11-07 11:17:17 +1100 | [diff] [blame] | 56 | %token <literal> DT_LEGACYLITERAL |
Jon Loeliger | af0278a | 2007-02-15 10:59:27 -0600 | [diff] [blame] | 57 | %token <cbase> DT_BASE |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 58 | %token <byte> DT_BYTE |
| 59 | %token <data> DT_STRING |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 60 | %token <labelref> DT_LABEL |
| 61 | %token <labelref> DT_REF |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 62 | |
| 63 | %type <data> propdata |
David Gibson | 32da475 | 2007-02-07 16:37:50 +1100 | [diff] [blame] | 64 | %type <data> propdataprefix |
David Gibson | f0517db | 2005-07-15 17:14:24 +1000 | [diff] [blame] | 65 | %type <re> memreserve |
David Gibson | f040d95 | 2005-10-24 18:18:38 +1000 | [diff] [blame] | 66 | %type <re> memreserves |
David Gibson | 9138db5 | 2007-11-07 11:17:17 +1100 | [diff] [blame] | 67 | %type <re> v0_memreserve |
| 68 | %type <re> v0_memreserves |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 69 | %type <addr> addr |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 70 | %type <data> celllist |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 71 | %type <cbase> cellbase |
| 72 | %type <cell> cellval |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 73 | %type <data> bytestring |
| 74 | %type <prop> propdef |
| 75 | %type <proplist> proplist |
| 76 | |
David Gibson | f0517db | 2005-07-15 17:14:24 +1000 | [diff] [blame] | 77 | %type <node> devicetree |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 78 | %type <node> nodedef |
| 79 | %type <node> subnode |
| 80 | %type <nodelist> subnodes |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 81 | %type <labelref> label |
David Gibson | 4102d84 | 2005-06-16 14:36:37 +1000 | [diff] [blame] | 82 | |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 83 | %% |
| 84 | |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 85 | sourcefile: |
David Gibson | 9138db5 | 2007-11-07 11:17:17 +1100 | [diff] [blame] | 86 | DT_V1 ';' memreserves devicetree |
| 87 | { |
| 88 | the_boot_info = build_boot_info($3, $4); |
| 89 | } |
| 90 | | v0_memreserves devicetree |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 91 | { |
David Gibson | f0517db | 2005-07-15 17:14:24 +1000 | [diff] [blame] | 92 | the_boot_info = build_boot_info($1, $2); |
| 93 | } |
| 94 | ; |
| 95 | |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 96 | memreserves: |
Jon Loeliger | 5641289 | 2007-10-23 09:28:54 -0500 | [diff] [blame] | 97 | /* empty */ |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 98 | { |
David Gibson | f040d95 | 2005-10-24 18:18:38 +1000 | [diff] [blame] | 99 | $$ = NULL; |
David Gibson | f0517db | 2005-07-15 17:14:24 +1000 | [diff] [blame] | 100 | } |
Jon Loeliger | 5641289 | 2007-10-23 09:28:54 -0500 | [diff] [blame] | 101 | | memreserve memreserves |
| 102 | { |
| 103 | $$ = chain_reserve_entry($1, $2); |
| 104 | } |
David Gibson | f0517db | 2005-07-15 17:14:24 +1000 | [diff] [blame] | 105 | ; |
| 106 | |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 107 | memreserve: |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 108 | label DT_MEMRESERVE addr addr ';' |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 109 | { |
Milton Miller | d429033 | 2007-07-07 01:18:49 -0500 | [diff] [blame] | 110 | $$ = build_reserve_entry($3, $4, $1); |
David Gibson | f0517db | 2005-07-15 17:14:24 +1000 | [diff] [blame] | 111 | } |
David Gibson | 9138db5 | 2007-11-07 11:17:17 +1100 | [diff] [blame] | 112 | ; |
| 113 | |
| 114 | v0_memreserves: |
| 115 | /* empty */ |
| 116 | { |
| 117 | $$ = NULL; |
| 118 | } |
| 119 | | v0_memreserve v0_memreserves |
| 120 | { |
| 121 | $$ = chain_reserve_entry($1, $2); |
| 122 | }; |
| 123 | ; |
| 124 | |
| 125 | v0_memreserve: |
| 126 | memreserve |
| 127 | { |
| 128 | $$ = $1; |
| 129 | } |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 130 | | label DT_MEMRESERVE addr '-' addr ';' |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 131 | { |
Milton Miller | d429033 | 2007-07-07 01:18:49 -0500 | [diff] [blame] | 132 | $$ = build_reserve_entry($3, $5 - $3 + 1, $1); |
David Gibson | f0517db | 2005-07-15 17:14:24 +1000 | [diff] [blame] | 133 | } |
| 134 | ; |
| 135 | |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 136 | addr: |
| 137 | DT_LITERAL |
| 138 | { |
David Gibson | 9138db5 | 2007-11-07 11:17:17 +1100 | [diff] [blame] | 139 | $$ = eval_literal($1, 0, 64); |
| 140 | } |
| 141 | | DT_LEGACYLITERAL |
| 142 | { |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 143 | $$ = eval_literal($1, 16, 64); |
| 144 | } |
| 145 | ; |
| 146 | |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 147 | devicetree: |
| 148 | '/' nodedef |
| 149 | { |
David Gibson | f0517db | 2005-07-15 17:14:24 +1000 | [diff] [blame] | 150 | $$ = name_node($2, "", NULL); |
| 151 | } |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 152 | ; |
| 153 | |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 154 | nodedef: |
| 155 | '{' proplist subnodes '}' ';' |
| 156 | { |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 157 | $$ = build_node($2, $3); |
| 158 | } |
| 159 | ; |
| 160 | |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 161 | proplist: |
Jon Loeliger | 5641289 | 2007-10-23 09:28:54 -0500 | [diff] [blame] | 162 | /* empty */ |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 163 | { |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 164 | $$ = NULL; |
| 165 | } |
Jon Loeliger | 7b3fb78 | 2007-10-22 16:09:56 -0500 | [diff] [blame] | 166 | | proplist propdef |
Jon Loeliger | 5641289 | 2007-10-23 09:28:54 -0500 | [diff] [blame] | 167 | { |
Jon Loeliger | 7b3fb78 | 2007-10-22 16:09:56 -0500 | [diff] [blame] | 168 | $$ = chain_property($2, $1); |
Jon Loeliger | 5641289 | 2007-10-23 09:28:54 -0500 | [diff] [blame] | 169 | } |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 170 | ; |
| 171 | |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 172 | propdef: |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 173 | label DT_PROPNODENAME '=' propdata ';' |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 174 | { |
David Gibson | 4102d84 | 2005-06-16 14:36:37 +1000 | [diff] [blame] | 175 | $$ = build_property($2, $4, $1); |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 176 | } |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 177 | | label DT_PROPNODENAME ';' |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 178 | { |
David Gibson | 9ad4587 | 2005-06-17 14:32:32 +1000 | [diff] [blame] | 179 | $$ = build_property($2, empty_data, $1); |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 180 | } |
| 181 | ; |
| 182 | |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 183 | propdata: |
| 184 | propdataprefix DT_STRING |
| 185 | { |
| 186 | $$ = data_merge($1, $2); |
David Gibson | 32da475 | 2007-02-07 16:37:50 +1100 | [diff] [blame] | 187 | } |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 188 | | propdataprefix '<' celllist '>' |
| 189 | { |
David Gibson | f7497dc | 2007-11-02 16:54:26 +1100 | [diff] [blame] | 190 | $$ = data_merge($1, $3); |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 191 | } |
| 192 | | propdataprefix '[' bytestring ']' |
| 193 | { |
| 194 | $$ = data_merge($1, $3); |
| 195 | } |
David Gibson | efbbef8 | 2007-12-05 10:43:50 +1100 | [diff] [blame] | 196 | | propdataprefix DT_REF |
| 197 | { |
| 198 | $$ = data_add_marker($1, REF_PATH, $2); |
| 199 | } |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 200 | | propdata DT_LABEL |
| 201 | { |
David Gibson | dc94177 | 2007-11-22 14:39:23 +1100 | [diff] [blame] | 202 | $$ = data_add_marker($1, LABEL, $2); |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 203 | } |
David Gibson | 32da475 | 2007-02-07 16:37:50 +1100 | [diff] [blame] | 204 | ; |
| 205 | |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 206 | propdataprefix: |
Jon Loeliger | 5641289 | 2007-10-23 09:28:54 -0500 | [diff] [blame] | 207 | /* empty */ |
| 208 | { |
| 209 | $$ = empty_data; |
| 210 | } |
| 211 | | propdata ',' |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 212 | { |
| 213 | $$ = $1; |
| 214 | } |
| 215 | | propdataprefix DT_LABEL |
| 216 | { |
David Gibson | dc94177 | 2007-11-22 14:39:23 +1100 | [diff] [blame] | 217 | $$ = data_add_marker($1, LABEL, $2); |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 218 | } |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 219 | ; |
| 220 | |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 221 | celllist: |
Jon Loeliger | 5641289 | 2007-10-23 09:28:54 -0500 | [diff] [blame] | 222 | /* empty */ |
| 223 | { |
| 224 | $$ = empty_data; |
| 225 | } |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 226 | | celllist cellval |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 227 | { |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 228 | $$ = data_append_cell($1, $2); |
Jon Loeliger | af0278a | 2007-02-15 10:59:27 -0600 | [diff] [blame] | 229 | } |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 230 | | celllist DT_REF |
| 231 | { |
David Gibson | dc94177 | 2007-11-22 14:39:23 +1100 | [diff] [blame] | 232 | $$ = data_append_cell(data_add_marker($1, REF_PHANDLE, |
| 233 | $2), -1); |
David Gibson | 81f2e89 | 2005-06-16 17:04:00 +1000 | [diff] [blame] | 234 | } |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 235 | | celllist DT_LABEL |
| 236 | { |
David Gibson | dc94177 | 2007-11-22 14:39:23 +1100 | [diff] [blame] | 237 | $$ = data_add_marker($1, LABEL, $2); |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 238 | } |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 239 | ; |
| 240 | |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 241 | cellbase: |
| 242 | /* empty */ |
| 243 | { |
| 244 | $$ = 16; |
| 245 | } |
| 246 | | DT_BASE |
| 247 | ; |
| 248 | |
| 249 | cellval: |
David Gibson | 9138db5 | 2007-11-07 11:17:17 +1100 | [diff] [blame] | 250 | DT_LITERAL |
| 251 | { |
| 252 | $$ = eval_literal($1, 0, 32); |
| 253 | } |
| 254 | | cellbase DT_LEGACYLITERAL |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 255 | { |
| 256 | $$ = eval_literal($2, $1, 32); |
| 257 | } |
| 258 | ; |
| 259 | |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 260 | bytestring: |
Jon Loeliger | 5641289 | 2007-10-23 09:28:54 -0500 | [diff] [blame] | 261 | /* empty */ |
| 262 | { |
| 263 | $$ = empty_data; |
| 264 | } |
| 265 | | bytestring DT_BYTE |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 266 | { |
| 267 | $$ = data_append_byte($1, $2); |
| 268 | } |
| 269 | | bytestring DT_LABEL |
| 270 | { |
David Gibson | dc94177 | 2007-11-22 14:39:23 +1100 | [diff] [blame] | 271 | $$ = data_add_marker($1, LABEL, $2); |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 272 | } |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 273 | ; |
| 274 | |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 275 | subnodes: |
Jon Loeliger | 5641289 | 2007-10-23 09:28:54 -0500 | [diff] [blame] | 276 | /* empty */ |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 277 | { |
| 278 | $$ = NULL; |
| 279 | } |
Jon Loeliger | 5641289 | 2007-10-23 09:28:54 -0500 | [diff] [blame] | 280 | | subnode subnodes |
| 281 | { |
| 282 | $$ = chain_node($1, $2); |
| 283 | } |
David Gibson | c048102 | 2007-12-05 10:27:04 +1100 | [diff] [blame] | 284 | | subnode propdef |
| 285 | { |
Scott Wood | 3c3ecaa | 2008-01-04 15:10:47 -0600 | [diff] [blame^] | 286 | yyerror("syntax error: properties must precede subnodes"); |
David Gibson | c048102 | 2007-12-05 10:27:04 +1100 | [diff] [blame] | 287 | YYERROR; |
| 288 | } |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 289 | ; |
| 290 | |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 291 | subnode: |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 292 | label DT_PROPNODENAME nodedef |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 293 | { |
| 294 | $$ = name_node($3, $2, $1); |
| 295 | } |
David Gibson | 4102d84 | 2005-06-16 14:36:37 +1000 | [diff] [blame] | 296 | ; |
| 297 | |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 298 | label: |
Jon Loeliger | 5641289 | 2007-10-23 09:28:54 -0500 | [diff] [blame] | 299 | /* empty */ |
Jon Loeliger | 30807ca | 2007-10-18 09:42:16 -0500 | [diff] [blame] | 300 | { |
| 301 | $$ = NULL; |
| 302 | } |
Jon Loeliger | 5641289 | 2007-10-23 09:28:54 -0500 | [diff] [blame] | 303 | | DT_LABEL |
| 304 | { |
| 305 | $$ = $1; |
| 306 | } |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 307 | ; |
| 308 | |
| 309 | %% |
| 310 | |
Scott Wood | f77fe6a | 2008-01-03 17:43:29 -0600 | [diff] [blame] | 311 | void yyerrorf(char const *s, ...) |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 312 | { |
Scott Wood | 910efac | 2008-01-03 17:43:31 -0600 | [diff] [blame] | 313 | const char *fname = srcpos_file ? srcpos_file->name : "<no-file>"; |
Scott Wood | f77fe6a | 2008-01-03 17:43:29 -0600 | [diff] [blame] | 314 | va_list va; |
| 315 | va_start(va, s); |
Jon Loeliger | e45e6fd | 2007-03-23 15:18:41 -0500 | [diff] [blame] | 316 | |
| 317 | if (strcmp(fname, "-") == 0) |
| 318 | fname = "stdin"; |
| 319 | |
Scott Wood | f77fe6a | 2008-01-03 17:43:29 -0600 | [diff] [blame] | 320 | fprintf(stderr, "%s:%d ", fname, yylloc.first_line); |
| 321 | vfprintf(stderr, s, va); |
| 322 | fprintf(stderr, "\n"); |
| 323 | |
Scott Wood | ad4f54a | 2008-01-03 17:43:33 -0600 | [diff] [blame] | 324 | treesource_error = 1; |
Scott Wood | f77fe6a | 2008-01-03 17:43:29 -0600 | [diff] [blame] | 325 | va_end(va); |
| 326 | } |
| 327 | |
| 328 | void yyerror (char const *s) |
| 329 | { |
| 330 | yyerrorf("%s", s); |
David Gibson | fc14dad | 2005-06-08 17:18:34 +1000 | [diff] [blame] | 331 | } |
Jon Loeliger | 3948849 | 2007-02-16 09:33:54 -0600 | [diff] [blame] | 332 | |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 333 | unsigned long long eval_literal(const char *s, int base, int bits) |
Jon Loeliger | 3948849 | 2007-02-16 09:33:54 -0600 | [diff] [blame] | 334 | { |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 335 | unsigned long long val; |
Milton Miller | 85ab5cc | 2007-07-07 01:18:48 -0500 | [diff] [blame] | 336 | char *e; |
Jon Loeliger | 3948849 | 2007-02-16 09:33:54 -0600 | [diff] [blame] | 337 | |
David Gibson | 9ed27a2 | 2007-11-07 11:16:19 +1100 | [diff] [blame] | 338 | errno = 0; |
| 339 | val = strtoull(s, &e, base); |
| 340 | if (*e) |
| 341 | yyerror("bad characters in literal"); |
| 342 | else if ((errno == ERANGE) |
| 343 | || ((bits < 64) && (val >= (1ULL << bits)))) |
| 344 | yyerror("literal out of range"); |
| 345 | else if (errno != 0) |
| 346 | yyerror("bad literal"); |
| 347 | return val; |
Jon Loeliger | 3948849 | 2007-02-16 09:33:54 -0600 | [diff] [blame] | 348 | } |