Commit | Line | Data |
---|---|---|
c611e285 | 1 | /* A YACC grammer to parse a superset of the AT&T linker scripting languaue. |
4a6afc88 | 2 | Copyright (C) 1991, 1993 Free Software Foundation, Inc. |
c611e285 | 3 | Written by Steve Chamberlain of Cygnus Support (steve@cygnus.com). |
2fa0b342 | 4 | |
c611e285 | 5 | This file is part of GNU ld. |
2fa0b342 | 6 | |
c611e285 SC |
7 | This program is free software; you can redistribute it and/or modify |
8 | it under the terms of the GNU General Public License as published by | |
9 | the Free Software Foundation; either version 2 of the License, or | |
10 | (at your option) any later version. | |
2fa0b342 | 11 | |
c611e285 SC |
12 | This program is distributed in the hope that it will be useful, |
13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
14 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
15 | GNU General Public License for more details. | |
2fa0b342 | 16 | |
c611e285 SC |
17 | You should have received a copy of the GNU General Public License |
18 | along with this program; if not, write to the Free Software | |
19 | Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ | |
20 | ||
21 | %{ | |
22 | /* | |
2e2bf962 | 23 | |
c611e285 | 24 | */ |
2fa0b342 | 25 | |
f177a611 | 26 | #define DONTDECLARE_MALLOC |
2fa0b342 | 27 | |
2fa0b342 | 28 | #include "bfd.h" |
f177a611 | 29 | #include "sysdep.h" |
4a6afc88 | 30 | #include "bfdlink.h" |
2fa0b342 DHW |
31 | #include "ld.h" |
32 | #include "ldexp.h" | |
7cb9aa50 | 33 | #include "ldver.h" |
2fa0b342 | 34 | #include "ldlang.h" |
f177a611 | 35 | #include "ldemul.h" |
2fa0b342 DHW |
36 | #include "ldfile.h" |
37 | #include "ldmisc.h" | |
fcf276c4 | 38 | #include "ldmain.h" |
3d2b83ea | 39 | #include "mri.h" |
6232b6c4 | 40 | #include "ldlex.h" |
f177a611 | 41 | |
2fa0b342 DHW |
42 | #define YYDEBUG 1 |
43 | ||
dadd414a | 44 | static int typebits; |
2fa0b342 | 45 | |
2fa0b342 DHW |
46 | lang_memory_region_type *region; |
47 | ||
48 | ||
2fa0b342 DHW |
49 | char *current_file; |
50 | boolean ldgram_want_filename = true; | |
51 | boolean had_script = false; | |
52 | boolean force_make_executable = false; | |
1d45ccb3 | 53 | |
1418c83b | 54 | boolean ldgram_in_script = false; |
1d45ccb3 | 55 | boolean ldgram_had_equals = false; |
2fa0b342 DHW |
56 | |
57 | ||
3d2b83ea SC |
58 | #define ERROR_NAME_MAX 20 |
59 | static char *error_names[ERROR_NAME_MAX]; | |
60 | static int error_index; | |
61 | #define PUSH_ERROR(x) if (error_index < ERROR_NAME_MAX) error_names[error_index] = x; error_index++; | |
62 | #define POP_ERROR() error_index--; | |
2fa0b342 DHW |
63 | %} |
64 | %union { | |
65 | bfd_vma integer; | |
2fa0b342 DHW |
66 | char *name; |
67 | int token; | |
68 | union etree_union *etree; | |
2fa0b342 DHW |
69 | } |
70 | ||
9fce28ed | 71 | %type <etree> exp opt_exp_with_type mustbe_exp opt_at |
dadd414a | 72 | %type <integer> fill_opt |
2fa0b342 | 73 | %type <name> memspec_opt |
6812f0e8 | 74 | %token <integer> INT |
2fa0b342 DHW |
75 | %token <name> NAME |
76 | %type <integer> length | |
77 | ||
a37cc0c0 | 78 | %right <token> PLUSEQ MINUSEQ MULTEQ DIVEQ '=' LSHIFTEQ RSHIFTEQ ANDEQ OREQ |
2fa0b342 DHW |
79 | %right <token> '?' ':' |
80 | %left <token> OROR | |
81 | %left <token> ANDAND | |
82 | %left <token> '|' | |
83 | %left <token> '^' | |
84 | %left <token> '&' | |
85 | %left <token> EQ NE | |
86 | %left <token> '<' '>' LE GE | |
87 | %left <token> LSHIFT RSHIFT | |
6812f0e8 | 88 | |
2fa0b342 DHW |
89 | %left <token> '+' '-' |
90 | %left <token> '*' '/' '%' | |
6812f0e8 | 91 | |
2fa0b342 | 92 | %right UNARY |
2e38b71d | 93 | %token END |
2fa0b342 | 94 | %left <token> '(' |
c477527c | 95 | %token <token> ALIGN_K BLOCK QUAD LONG SHORT BYTE |
d4e5e3c3 | 96 | %token SECTIONS |
2fa0b342 | 97 | %token '{' '}' |
6812f0e8 SC |
98 | %token SIZEOF_HEADERS OUTPUT_FORMAT FORCE_COMMON_ALLOCATION OUTPUT_ARCH |
99 | %token SIZEOF_HEADERS | |
dadd414a | 100 | %token INCLUDE |
d4e5e3c3 | 101 | %token MEMORY DEFSYMEND |
f177a611 | 102 | %token NOLOAD DSECT COPY INFO OVERLAY |
d4e5e3c3 DM |
103 | %token NAME DEFINED TARGET_K SEARCH_DIR MAP ENTRY |
104 | %token <integer> SIZEOF NEXT ADDR | |
105 | %token STARTUP HLL SYSLIB FLOAT NOFLOAT | |
106 | %token ORIGIN FILL | |
107 | %token LENGTH CREATE_OBJECT_SYMBOLS INPUT OUTPUT CONSTRUCTORS | |
108 | %token ALIGNMOD AT | |
6812f0e8 | 109 | %type <token> assign_op |
2fa0b342 | 110 | %type <name> filename |
e14a43bf | 111 | %token CHIP LIST SECT ABSOLUTE LOAD NEWLINE ENDWORD ORDER NAMEWORD |
4a6afc88 | 112 | %token FORMAT PUBLIC DEFSYMEND BASE ALIAS TRUNCATE REL |
d4e5e3c3 | 113 | %token INPUT_SCRIPT INPUT_MRI_SCRIPT INPUT_DEFSYM |
3d2b83ea | 114 | |
2fa0b342 DHW |
115 | %% |
116 | ||
d4e5e3c3 DM |
117 | file: |
118 | INPUT_SCRIPT script_file | |
119 | | INPUT_MRI_SCRIPT mri_script_file | |
120 | | INPUT_DEFSYM defsym_expr | |
2fa0b342 DHW |
121 | ; |
122 | ||
2fa0b342 | 123 | |
d4e5e3c3 | 124 | filename: NAME; |
2fa0b342 | 125 | |
e14a43bf | 126 | |
d4e5e3c3 DM |
127 | defsym_expr: |
128 | { ldlex_defsym(); } | |
129 | NAME '=' exp | |
8ddef552 | 130 | { |
d4e5e3c3 DM |
131 | ldlex_popstate(); |
132 | lang_add_assignment(exp_assop($3,$2,$4)); | |
8ddef552 | 133 | } |
2fa0b342 | 134 | |
3d2b83ea SC |
135 | /* SYNTAX WITHIN AN MRI SCRIPT FILE */ |
136 | mri_script_file: | |
137 | { ldlex_mri_script(); | |
138 | PUSH_ERROR("MRI style script"); | |
139 | } | |
140 | mri_script_lines | |
141 | { ldlex_popstate(); | |
142 | POP_ERROR(); | |
143 | } | |
144 | ; | |
2fa0b342 | 145 | |
3d2b83ea | 146 | mri_script_lines: |
2e38b71d SC |
147 | mri_script_lines mri_script_command NEWLINE |
148 | | | |
3d2b83ea | 149 | ; |
2fa0b342 | 150 | |
2e38b71d | 151 | mri_script_command: |
3d2b83ea SC |
152 | CHIP exp |
153 | | CHIP exp ',' exp | |
154 | | NAME { | |
2e38b71d | 155 | einfo("%P%F: unrecognised keyword in MRI style script '%s'\n",$1); |
3d2b83ea SC |
156 | } |
157 | | LIST { | |
3d2b83ea SC |
158 | config.map_filename = "-"; |
159 | } | |
2e38b71d SC |
160 | | ORDER ordernamelist |
161 | | ENDWORD | |
e14a43bf SC |
162 | | PUBLIC NAME '=' exp |
163 | { mri_public($2, $4); } | |
164 | | PUBLIC NAME ',' exp | |
165 | { mri_public($2, $4); } | |
166 | | PUBLIC NAME exp | |
167 | { mri_public($2, $3); } | |
2e38b71d SC |
168 | | FORMAT NAME |
169 | { mri_format($2); } | |
170 | | SECT NAME ',' exp | |
3d2b83ea SC |
171 | { mri_output_section($2, $4);} |
172 | | SECT NAME exp | |
173 | { mri_output_section($2, $3);} | |
174 | | SECT NAME '=' exp | |
175 | { mri_output_section($2, $4);} | |
dadd414a SC |
176 | | ALIGN_K NAME '=' exp |
177 | { mri_align($2,$4); } | |
178 | | ALIGNMOD NAME '=' exp | |
179 | { mri_alignmod($2,$4); } | |
3d2b83ea SC |
180 | | ABSOLUTE mri_abs_name_list |
181 | | LOAD mri_load_name_list | |
2e38b71d SC |
182 | | NAMEWORD NAME |
183 | { mri_name($2); } | |
e14a43bf SC |
184 | | ALIAS NAME ',' NAME |
185 | { mri_alias($2,$4,0);} | |
186 | | ALIAS NAME ',' INT | |
4a6afc88 | 187 | { mri_alias($2,0,(int) $4);} |
e14a43bf SC |
188 | | BASE exp |
189 | { mri_base($2); } | |
dadd414a | 190 | | TRUNCATE INT |
4a6afc88 | 191 | { mri_truncate((unsigned int) $2); } |
2e38b71d SC |
192 | | |
193 | ; | |
194 | ||
195 | ordernamelist: | |
196 | ordernamelist ',' NAME { mri_order($3); } | |
197 | | ordernamelist NAME { mri_order($2); } | |
198 | | | |
3d2b83ea | 199 | ; |
2fa0b342 | 200 | |
3d2b83ea SC |
201 | mri_load_name_list: |
202 | NAME | |
203 | { mri_load($1); } | |
204 | | mri_load_name_list ',' NAME { mri_load($3); } | |
205 | ; | |
1418c83b | 206 | |
3d2b83ea SC |
207 | mri_abs_name_list: |
208 | NAME | |
209 | { mri_only_load($1); } | |
210 | | mri_abs_name_list ',' NAME | |
211 | { mri_only_load($3); } | |
212 | ; | |
1418c83b | 213 | |
3d2b83ea | 214 | script_file: |
9d1fe8a4 SC |
215 | { |
216 | ldlex_both(); | |
217 | } | |
3d2b83ea | 218 | ifile_list |
9d1fe8a4 SC |
219 | { |
220 | ldlex_popstate(); | |
221 | } | |
1418c83b SC |
222 | ; |
223 | ||
224 | ||
225 | ifile_list: | |
3d2b83ea | 226 | ifile_list ifile_p1 |
13a0e8d7 | 227 | | |
2fa0b342 DHW |
228 | ; |
229 | ||
230 | ||
231 | ||
232 | ifile_p1: | |
233 | memory | |
234 | | sections | |
235 | | startup | |
236 | | high_level_library | |
237 | | low_level_library | |
238 | | floating_point_support | |
ac004870 | 239 | | statement_anywhere |
9d1fe8a4 | 240 | | ';' |
2fa0b342 DHW |
241 | | TARGET_K '(' NAME ')' |
242 | { lang_add_target($3); } | |
243 | | SEARCH_DIR '(' filename ')' | |
0cd82d00 | 244 | { ldfile_add_library_path ($3, false); } |
2fa0b342 | 245 | | OUTPUT '(' filename ')' |
f651733a ILT |
246 | { lang_add_output($3, 1); } |
247 | | OUTPUT_FORMAT '(' NAME ')' | |
de87cdb4 | 248 | { lang_add_output_format($3, 1); } |
f651733a | 249 | | OUTPUT_ARCH '(' NAME ')' |
a37cc0c0 | 250 | { ldfile_set_output_arch($3); } |
13a0e8d7 SC |
251 | | FORCE_COMMON_ALLOCATION |
252 | { command_line.force_common_definition = true ; } | |
2fa0b342 DHW |
253 | | INPUT '(' input_list ')' |
254 | | MAP '(' filename ')' | |
255 | { lang_add_map($3); } | |
dadd414a SC |
256 | | INCLUDE filename |
257 | { ldfile_open_command_file($2); } ifile_list END | |
2fa0b342 DHW |
258 | ; |
259 | ||
260 | input_list: | |
261 | NAME | |
f651733a | 262 | { lang_add_input_file($1,lang_input_file_is_search_file_enum, |
2fa0b342 DHW |
263 | (char *)NULL); } |
264 | | input_list ',' NAME | |
f651733a | 265 | { lang_add_input_file($3,lang_input_file_is_search_file_enum, |
2fa0b342 | 266 | (char *)NULL); } |
3d2b83ea | 267 | | input_list NAME |
f651733a | 268 | { lang_add_input_file($2,lang_input_file_is_search_file_enum, |
2fa0b342 DHW |
269 | (char *)NULL); } |
270 | ; | |
271 | ||
272 | sections: | |
3d2b83ea | 273 | SECTIONS '{' sec_or_group_p1 '}' |
2fa0b342 DHW |
274 | ; |
275 | ||
276 | sec_or_group_p1: | |
277 | sec_or_group_p1 section | |
278 | | sec_or_group_p1 statement_anywhere | |
279 | | | |
280 | ; | |
281 | ||
282 | statement_anywhere: | |
283 | ENTRY '(' NAME ')' | |
60e8a534 | 284 | { lang_add_entry ($3, 0); } |
2fa0b342 DHW |
285 | | assignment end |
286 | ; | |
287 | ||
1418c83b SC |
288 | file_NAME_list: |
289 | NAME | |
290 | { lang_add_wild($1, current_file); } | |
3d2b83ea | 291 | | file_NAME_list opt_comma NAME |
1418c83b SC |
292 | { lang_add_wild($3, current_file); } |
293 | ; | |
294 | ||
295 | input_section_spec: | |
296 | NAME | |
297 | { | |
298 | lang_add_wild((char *)NULL, $1); | |
299 | } | |
3d2b83ea | 300 | | '[' |
1418c83b SC |
301 | { |
302 | current_file = (char *)NULL; | |
303 | } | |
3d2b83ea SC |
304 | file_NAME_list |
305 | ']' | |
1418c83b SC |
306 | | NAME |
307 | { | |
3d2b83ea SC |
308 | current_file =$1; |
309 | } | |
1418c83b | 310 | '(' file_NAME_list ')' |
3d2b83ea SC |
311 | | '*' |
312 | { | |
1418c83b | 313 | current_file = (char *)NULL; |
3d2b83ea | 314 | } |
1418c83b SC |
315 | '(' file_NAME_list ')' |
316 | ; | |
317 | ||
2fa0b342 | 318 | statement: |
9fce28ed SC |
319 | assignment end |
320 | | CREATE_OBJECT_SYMBOLS | |
13a0e8d7 | 321 | { |
9fce28ed SC |
322 | lang_add_attribute(lang_object_symbols_statement_enum); |
323 | } | |
324 | | ';' | |
325 | | CONSTRUCTORS | |
f177a611 | 326 | { |
3d2b83ea | 327 | |
9fce28ed SC |
328 | lang_add_attribute(lang_constructors_statement_enum); |
329 | } | |
330 | | input_section_spec | |
331 | | length '(' exp ')' | |
2fa0b342 | 332 | { |
4a6afc88 | 333 | lang_add_data((int) $1,$3); |
2fa0b342 DHW |
334 | } |
335 | ||
9fce28ed | 336 | | FILL '(' exp ')' |
2fa0b342 DHW |
337 | { |
338 | lang_add_fill | |
9fce28ed | 339 | (exp_get_value_int($3, |
2fa0b342 DHW |
340 | 0, |
341 | "fill value", | |
9fce28ed | 342 | lang_first_phase_enum)); |
2fa0b342 | 343 | } |
2fa0b342 DHW |
344 | ; |
345 | ||
9fce28ed SC |
346 | statement_list: |
347 | statement_list statement | |
348 | | statement | |
349 | ; | |
350 | ||
8ddef552 DM |
351 | statement_list_opt: |
352 | /* empty */ | |
353 | | statement_list | |
354 | ; | |
355 | ||
2fa0b342 | 356 | length: |
c477527c ILT |
357 | QUAD |
358 | { $$ = $1; } | |
359 | | LONG | |
2fa0b342 | 360 | { $$ = $1; } |
3d2b83ea | 361 | | SHORT |
2fa0b342 | 362 | { $$ = $1; } |
3d2b83ea | 363 | | BYTE |
2fa0b342 DHW |
364 | { $$ = $1; } |
365 | ; | |
366 | ||
367 | fill_opt: | |
9d1fe8a4 | 368 | '=' mustbe_exp |
2fa0b342 DHW |
369 | { |
370 | $$ = exp_get_value_int($2, | |
371 | 0, | |
372 | "fill value", | |
3d2b83ea | 373 | lang_first_phase_enum); |
2fa0b342 | 374 | } |
3d2b83ea | 375 | | { $$ = 0; } |
2fa0b342 DHW |
376 | ; |
377 | ||
378 | ||
379 | ||
380 | assign_op: | |
381 | PLUSEQ | |
382 | { $$ = '+'; } | |
3d2b83ea | 383 | | MINUSEQ |
2fa0b342 DHW |
384 | { $$ = '-'; } |
385 | | MULTEQ | |
386 | { $$ = '*'; } | |
387 | | DIVEQ | |
388 | { $$ = '/'; } | |
389 | | LSHIFTEQ | |
390 | { $$ = LSHIFT; } | |
391 | | RSHIFTEQ | |
392 | { $$ = RSHIFT; } | |
393 | | ANDEQ | |
394 | { $$ = '&'; } | |
395 | | OREQ | |
396 | { $$ = '|'; } | |
397 | ||
398 | ; | |
399 | ||
9d1fe8a4 | 400 | end: ';' | ',' |
2fa0b342 DHW |
401 | ; |
402 | ||
2fa0b342 DHW |
403 | |
404 | assignment: | |
3d2b83ea | 405 | NAME '=' mustbe_exp |
2fa0b342 DHW |
406 | { |
407 | lang_add_assignment(exp_assop($2,$1,$3)); | |
408 | } | |
3d2b83ea | 409 | | NAME assign_op mustbe_exp |
2fa0b342 | 410 | { |
3d2b83ea SC |
411 | |
412 | lang_add_assignment(exp_assop('=',$1,exp_binop($2,exp_nameop(NAME,$1),$3))); | |
2fa0b342 DHW |
413 | } |
414 | ||
415 | ; | |
416 | ||
417 | ||
418 | opt_comma: | |
419 | ',' | ; | |
420 | ||
421 | ||
422 | memory: | |
3d2b83ea | 423 | MEMORY '{' memory_spec memory_spec_list '}' |
2fa0b342 DHW |
424 | ; |
425 | ||
426 | memory_spec_list: | |
3d2b83ea | 427 | memory_spec_list memory_spec |
2fa0b342 DHW |
428 | | memory_spec_list ',' memory_spec |
429 | | | |
430 | ; | |
431 | ||
432 | ||
3d2b83ea | 433 | memory_spec: NAME |
2fa0b342 | 434 | { region = lang_memory_region_lookup($1); } |
3d2b83ea | 435 | attributes_opt ':' |
9d1fe8a4 | 436 | origin_spec opt_comma length_spec |
2fa0b342 | 437 | |
3d2b83ea | 438 | ; origin_spec: |
9d1fe8a4 | 439 | ORIGIN '=' mustbe_exp |
2fa0b342 DHW |
440 | { region->current = |
441 | region->origin = | |
3d2b83ea SC |
442 | exp_get_vma($3, 0L,"origin", lang_first_phase_enum); |
443 | } | |
444 | ; length_spec: | |
445 | LENGTH '=' mustbe_exp | |
446 | { region->length = exp_get_vma($3, | |
2fa0b342 DHW |
447 | ~((bfd_vma)0), |
448 | "length", | |
449 | lang_first_phase_enum); | |
450 | } | |
451 | ||
452 | ||
453 | attributes_opt: | |
454 | '(' NAME ')' | |
455 | { | |
456 | lang_set_flags(®ion->flags, $2); | |
457 | } | |
458 | | | |
459 | ||
460 | ; | |
461 | ||
462 | startup: | |
463 | STARTUP '(' filename ')' | |
464 | { lang_startup($3); } | |
465 | ; | |
466 | ||
467 | high_level_library: | |
3d2b83ea SC |
468 | HLL '(' high_level_library_NAME_list ')' |
469 | | HLL '(' ')' | |
2fa0b342 DHW |
470 | { ldemul_hll((char *)NULL); } |
471 | ; | |
472 | ||
473 | high_level_library_NAME_list: | |
3d2b83ea | 474 | high_level_library_NAME_list opt_comma filename |
2fa0b342 DHW |
475 | { ldemul_hll($3); } |
476 | | filename | |
477 | { ldemul_hll($1); } | |
478 | ||
479 | ; | |
480 | ||
481 | low_level_library: | |
482 | SYSLIB '(' low_level_library_NAME_list ')' | |
3d2b83ea | 483 | ; low_level_library_NAME_list: |
2fa0b342 | 484 | low_level_library_NAME_list opt_comma filename |
3d2b83ea | 485 | { ldemul_syslib($3); } |
2fa0b342 DHW |
486 | | |
487 | ; | |
488 | ||
489 | floating_point_support: | |
490 | FLOAT | |
491 | { lang_float(true); } | |
492 | | NOFLOAT | |
3d2b83ea | 493 | { lang_float(false); } |
2fa0b342 DHW |
494 | ; |
495 | ||
496 | ||
3d2b83ea | 497 | mustbe_exp: { ldlex_expression(); } |
9d1fe8a4 SC |
498 | exp |
499 | { ldlex_popstate(); $$=$2;} | |
500 | ; | |
2fa0b342 DHW |
501 | |
502 | exp : | |
3d2b83ea | 503 | '-' exp %prec UNARY |
2fa0b342 | 504 | { $$ = exp_unop('-', $2); } |
9d1fe8a4 | 505 | | '(' exp ')' |
2fa0b342 DHW |
506 | { $$ = $2; } |
507 | | NEXT '(' exp ')' %prec UNARY | |
4a6afc88 | 508 | { $$ = exp_unop((int) $1,$3); } |
3d2b83ea | 509 | | '!' exp %prec UNARY |
2fa0b342 | 510 | { $$ = exp_unop('!', $2); } |
3d2b83ea | 511 | | '+' exp %prec UNARY |
2fa0b342 | 512 | { $$ = $2; } |
3d2b83ea | 513 | | '~' exp %prec UNARY |
2fa0b342 DHW |
514 | { $$ = exp_unop('~', $2);} |
515 | ||
516 | | exp '*' exp | |
517 | { $$ = exp_binop('*', $1, $3); } | |
518 | | exp '/' exp | |
519 | { $$ = exp_binop('/', $1, $3); } | |
520 | | exp '%' exp | |
521 | { $$ = exp_binop('%', $1, $3); } | |
522 | | exp '+' exp | |
523 | { $$ = exp_binop('+', $1, $3); } | |
524 | | exp '-' exp | |
3d2b83ea | 525 | { $$ = exp_binop('-' , $1, $3); } |
2fa0b342 DHW |
526 | | exp LSHIFT exp |
527 | { $$ = exp_binop(LSHIFT , $1, $3); } | |
528 | | exp RSHIFT exp | |
529 | { $$ = exp_binop(RSHIFT , $1, $3); } | |
530 | | exp EQ exp | |
531 | { $$ = exp_binop(EQ , $1, $3); } | |
532 | | exp NE exp | |
533 | { $$ = exp_binop(NE , $1, $3); } | |
534 | | exp LE exp | |
535 | { $$ = exp_binop(LE , $1, $3); } | |
3d2b83ea | 536 | | exp GE exp |
2fa0b342 DHW |
537 | { $$ = exp_binop(GE , $1, $3); } |
538 | | exp '<' exp | |
539 | { $$ = exp_binop('<' , $1, $3); } | |
540 | | exp '>' exp | |
541 | { $$ = exp_binop('>' , $1, $3); } | |
542 | | exp '&' exp | |
543 | { $$ = exp_binop('&' , $1, $3); } | |
544 | | exp '^' exp | |
545 | { $$ = exp_binop('^' , $1, $3); } | |
546 | | exp '|' exp | |
547 | { $$ = exp_binop('|' , $1, $3); } | |
548 | | exp '?' exp ':' exp | |
549 | { $$ = exp_trinop('?' , $1, $3, $5); } | |
550 | | exp ANDAND exp | |
551 | { $$ = exp_binop(ANDAND , $1, $3); } | |
552 | | exp OROR exp | |
553 | { $$ = exp_binop(OROR , $1, $3); } | |
554 | | DEFINED '(' NAME ')' | |
555 | { $$ = exp_nameop(DEFINED, $3); } | |
556 | | INT | |
557 | { $$ = exp_intop($1); } | |
3d2b83ea | 558 | | SIZEOF_HEADERS |
65c552e3 | 559 | { $$ = exp_nameop(SIZEOF_HEADERS,0); } |
2fa0b342 | 560 | |
3d2b83ea | 561 | | SIZEOF '(' NAME ')' |
f177a611 | 562 | { $$ = exp_nameop(SIZEOF,$3); } |
2fa0b342 | 563 | | ADDR '(' NAME ')' |
f177a611 | 564 | { $$ = exp_nameop(ADDR,$3); } |
ae475b39 SC |
565 | | ABSOLUTE '(' exp ')' |
566 | { $$ = exp_unop(ABSOLUTE, $3); } | |
2fa0b342 | 567 | | ALIGN_K '(' exp ')' |
f177a611 | 568 | { $$ = exp_unop(ALIGN_K,$3); } |
2fa0b342 DHW |
569 | | NAME |
570 | { $$ = exp_nameop(NAME,$1); } | |
571 | ; | |
572 | ||
573 | ||
9fce28ed SC |
574 | opt_at: |
575 | AT '(' exp ')' { $$ = $3; } | |
576 | | { $$ = 0; } | |
577 | ; | |
2fa0b342 | 578 | |
3d2b83ea | 579 | section: NAME { ldlex_expression(); } |
9fce28ed SC |
580 | opt_exp_with_type |
581 | opt_at { ldlex_popstate(); } | |
dadd414a | 582 | '{' |
9fce28ed SC |
583 | { |
584 | lang_enter_output_section_statement($1,$3,typebits,0,0,0,$4); | |
585 | } | |
8ddef552 | 586 | statement_list_opt |
27baca71 | 587 | '}' {ldlex_expression();} memspec_opt fill_opt |
2fa0b342 | 588 | { |
e14a43bf | 589 | ldlex_popstate(); |
27baca71 | 590 | lang_leave_output_section_statement($12, $11); |
2fa0b342 | 591 | } |
e14a43bf | 592 | opt_comma |
2fa0b342 DHW |
593 | |
594 | ; | |
595 | ||
dadd414a SC |
596 | type: |
597 | NOLOAD { typebits = SEC_NEVER_LOAD; } | |
598 | | DSECT { typebits = 0; } | |
599 | | COPY { typebits = 0; } | |
600 | | INFO { typebits = 0; } | |
601 | | OVERLAY { typebits = 0; } | |
602 | | { typebits = SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS; } | |
f177a611 JG |
603 | ; |
604 | ||
6812f0e8 | 605 | |
dadd414a | 606 | opt_exp_with_type: |
9fce28ed SC |
607 | exp ':' { $$ = $1; typebits =0;} |
608 | | exp '(' type ')' ':' { $$ = $1; } | |
609 | | ':' { $$= (etree_type *)NULL; typebits = 0; } | |
610 | | '(' type ')' ':' { $$= (etree_type *)NULL; } | |
2fa0b342 DHW |
611 | ; |
612 | ||
2fa0b342 | 613 | memspec_opt: |
9d1fe8a4 | 614 | '>' NAME |
2fa0b342 DHW |
615 | { $$ = $2; } |
616 | | { $$ = "*default*"; } | |
617 | ; | |
3d2b83ea SC |
618 | %% |
619 | void | |
620 | yyerror(arg) | |
c477527c | 621 | const char *arg; |
3d2b83ea | 622 | { |
c477527c ILT |
623 | if (error_index > 0 && error_index < ERROR_NAME_MAX) |
624 | einfo("%P%F: %S %s in %s\n", arg, error_names[error_index-1]); | |
3d2b83ea | 625 | else |
c477527c | 626 | einfo("%P%F: %S %s\n", arg); |
3d2b83ea | 627 | } |