1 /* A YACC grammar to parse a superset of the AT&T linker scripting language.
2 Copyright (C) 1991-2017 Free Software Foundation, Inc.
3 Written by Steve Chamberlain of Cygnus Support (steve@cygnus.com).
5 This file is part of the GNU Binutils.
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 3 of the License, or
10 (at your option) any later version.
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.
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., 51 Franklin Street - Fifth Floor, Boston,
20 MA 02110-1301, USA. */
27 #define DONTDECLARE_MALLOC
48 static enum section_type sectype;
49 static lang_memory_region_type *region;
51 bfd_boolean ldgram_had_keep = FALSE;
52 char *ldgram_vers_current_lang = NULL;
54 #define ERROR_NAME_MAX 20
55 static char *error_names[ERROR_NAME_MAX];
56 static int error_index;
57 #define PUSH_ERROR(x) if (error_index < ERROR_NAME_MAX) error_names[error_index] = x; error_index++;
58 #define POP_ERROR() error_index--;
70 struct wildcard_spec wildcard;
71 struct wildcard_list *wildcard_list;
72 struct name_list *name_list;
73 struct flag_info_list *flag_info_list;
74 struct flag_info *flag_info;
76 union etree_union *etree;
81 union etree_union *at;
82 union etree_union *flags;
84 struct lang_nocrossref *nocrossref;
85 struct lang_output_section_phdr_list *section_phdr;
86 struct bfd_elf_version_deps *deflist;
87 struct bfd_elf_version_expr *versyms;
88 struct bfd_elf_version_tree *versnode;
91 %type <etree> exp opt_exp_with_type mustbe_exp opt_at phdr_type phdr_val
92 %type <etree> opt_exp_without_type opt_subalign opt_align
93 %type <fill> fill_opt fill_exp
94 %type <name_list> exclude_name_list
95 %type <wildcard_list> section_NAME_list
96 %type <flag_info_list> sect_flag_list
97 %type <flag_info> sect_flags
98 %type <name> memspec_opt casesymlist
99 %type <name> memspec_at_opt
100 %type <cname> wildcard_name
101 %type <wildcard> wildcard_spec
103 %token <name> NAME LNAME
104 %type <integer> length
105 %type <phdr> phdr_qualifiers
106 %type <nocrossref> nocrossref_list
107 %type <section_phdr> phdr_opt
108 %type <integer> opt_nocrossrefs
110 %right <token> PLUSEQ MINUSEQ MULTEQ DIVEQ '=' LSHIFTEQ RSHIFTEQ ANDEQ OREQ
111 %right <token> '?' ':'
118 %left <token> '<' '>' LE GE
119 %left <token> LSHIFT RSHIFT
121 %left <token> '+' '-'
122 %left <token> '*' '/' '%'
127 %token <token> ALIGN_K BLOCK BIND QUAD SQUAD LONG SHORT BYTE
128 %token SECTIONS PHDRS INSERT_K AFTER BEFORE
129 %token DATA_SEGMENT_ALIGN DATA_SEGMENT_RELRO_END DATA_SEGMENT_END
130 %token SORT_BY_NAME SORT_BY_ALIGNMENT SORT_NONE
131 %token SORT_BY_INIT_PRIORITY
133 %token SIZEOF_HEADERS OUTPUT_FORMAT FORCE_COMMON_ALLOCATION OUTPUT_ARCH
134 %token INHIBIT_COMMON_ALLOCATION FORCE_GROUP_ALLOCATION
140 %token NOLOAD DSECT COPY INFO OVERLAY
141 %token DEFINED TARGET_K SEARCH_DIR MAP ENTRY
142 %token <integer> NEXT
143 %token SIZEOF ALIGNOF ADDR LOADADDR MAX_K MIN_K
144 %token STARTUP HLL SYSLIB FLOAT NOFLOAT NOCROSSREFS NOCROSSREFS_TO
146 %token LENGTH CREATE_OBJECT_SYMBOLS INPUT GROUP OUTPUT CONSTRUCTORS
147 %token ALIGNMOD AT SUBALIGN HIDDEN PROVIDE PROVIDE_HIDDEN AS_NEEDED
148 %type <token> assign_op atype attributes_opt sect_constraint opt_align_with_input
149 %type <name> filename
150 %token CHIP LIST SECT ABSOLUTE LOAD NEWLINE ENDWORD ORDER NAMEWORD ASSERT_K
151 %token LOG2CEIL FORMAT PUBLIC DEFSYMEND BASE ALIAS TRUNCATE REL
152 %token INPUT_SCRIPT INPUT_MRI_SCRIPT INPUT_DEFSYM CASE EXTERN START
153 %token <name> VERS_TAG VERS_IDENTIFIER
154 %token GLOBAL LOCAL VERSIONK INPUT_VERSION_SCRIPT
155 %token KEEP ONLY_IF_RO ONLY_IF_RW SPECIAL INPUT_SECTION_FLAGS ALIGN_WITH_INPUT
158 %type <versyms> vers_defns
159 %type <versnode> vers_tag
160 %type <deflist> verdep
161 %token INPUT_DYNAMIC_LIST
166 INPUT_SCRIPT script_file
167 | INPUT_MRI_SCRIPT mri_script_file
168 | INPUT_VERSION_SCRIPT version_script_file
169 | INPUT_DYNAMIC_LIST dynamic_list_file
170 | INPUT_DEFSYM defsym_expr
182 lang_add_assignment (exp_defsym ($2, $4));
186 /* SYNTAX WITHIN AN MRI SCRIPT FILE */
190 PUSH_ERROR (_("MRI style script"));
201 mri_script_lines mri_script_command NEWLINE
209 einfo(_("%P%F: unrecognised keyword in MRI style script '%s'\n"),$1);
212 config.map_filename = "-";
214 | ORDER ordernamelist
216 | PUBLIC NAME '=' exp
217 { mri_public($2, $4); }
218 | PUBLIC NAME ',' exp
219 { mri_public($2, $4); }
221 { mri_public($2, $3); }
225 { mri_output_section($2, $4);}
227 { mri_output_section($2, $3);}
229 { mri_output_section($2, $4);}
230 | ALIGN_K NAME '=' exp
231 { mri_align($2,$4); }
232 | ALIGN_K NAME ',' exp
233 { mri_align($2,$4); }
234 | ALIGNMOD NAME '=' exp
235 { mri_alignmod($2,$4); }
236 | ALIGNMOD NAME ',' exp
237 { mri_alignmod($2,$4); }
238 | ABSOLUTE mri_abs_name_list
239 | LOAD mri_load_name_list
242 | ALIAS NAME ',' NAME
243 { mri_alias($2,$4,0);}
245 { mri_alias ($2, 0, (int) $4.integer); }
249 { mri_truncate ((unsigned int) $2.integer); }
251 | EXTERN extern_name_list
253 { ldlex_script (); ldfile_open_command_file($2); }
255 { ldlex_popstate (); }
257 { lang_add_entry ($2, FALSE); }
262 ordernamelist ',' NAME { mri_order($3); }
263 | ordernamelist NAME { mri_order($2); }
270 | mri_load_name_list ',' NAME { mri_load($3); }
275 { mri_only_load($1); }
276 | mri_abs_name_list ',' NAME
277 { mri_only_load($3); }
281 /* empty */ { $$ = NULL; }
283 | casesymlist ',' NAME
286 /* Parsed as expressions so that commas separate entries */
288 { ldlex_expression (); }
289 extern_name_list_body
290 { ldlex_popstate (); }
292 extern_name_list_body:
294 { ldlang_add_undef ($1, FALSE); }
295 | extern_name_list_body NAME
296 { ldlang_add_undef ($2, FALSE); }
297 | extern_name_list_body ',' NAME
298 { ldlang_add_undef ($3, FALSE); }
304 { ldlex_popstate(); }
320 | floating_point_support
324 | TARGET_K '(' NAME ')'
325 { lang_add_target($3); }
326 | SEARCH_DIR '(' filename ')'
327 { ldfile_add_library_path ($3, FALSE); }
328 | OUTPUT '(' filename ')'
329 { lang_add_output($3, 1); }
330 | OUTPUT_FORMAT '(' NAME ')'
331 { lang_add_output_format ($3, (char *) NULL,
333 | OUTPUT_FORMAT '(' NAME ',' NAME ',' NAME ')'
334 { lang_add_output_format ($3, $5, $7, 1); }
335 | OUTPUT_ARCH '(' NAME ')'
336 { ldfile_set_output_arch ($3, bfd_arch_unknown); }
337 | FORCE_COMMON_ALLOCATION
338 { command_line.force_common_definition = TRUE ; }
339 | FORCE_GROUP_ALLOCATION
340 { command_line.force_group_allocation = TRUE ; }
341 | INHIBIT_COMMON_ALLOCATION
342 { command_line.inhibit_common_definition = TRUE ; }
343 | INPUT '(' input_list ')'
345 { lang_enter_group (); }
347 { lang_leave_group (); }
348 | MAP '(' filename ')'
349 { lang_add_map($3); }
351 { ldlex_script (); ldfile_open_command_file($2); }
353 { ldlex_popstate (); }
354 | NOCROSSREFS '(' nocrossref_list ')'
356 lang_add_nocrossref ($3);
358 | NOCROSSREFS_TO '(' nocrossref_list ')'
360 lang_add_nocrossref_to ($3);
362 | EXTERN '(' extern_name_list ')'
363 | INSERT_K AFTER NAME
364 { lang_add_insert ($3, 0); }
365 | INSERT_K BEFORE NAME
366 { lang_add_insert ($3, 1); }
367 | REGION_ALIAS '(' NAME ',' NAME ')'
368 { lang_memory_region_alias ($3, $5); }
369 | LD_FEATURE '(' NAME ')'
370 { lang_ld_feature ($3); }
374 { ldlex_inputlist(); }
376 { ldlex_popstate(); }
380 { lang_add_input_file($1,lang_input_file_is_search_file_enum,
382 | input_list1 ',' NAME
383 { lang_add_input_file($3,lang_input_file_is_search_file_enum,
386 { lang_add_input_file($2,lang_input_file_is_search_file_enum,
389 { lang_add_input_file($1,lang_input_file_is_l_enum,
391 | input_list1 ',' LNAME
392 { lang_add_input_file($3,lang_input_file_is_l_enum,
395 { lang_add_input_file($2,lang_input_file_is_l_enum,
398 { $<integer>$ = input_flags.add_DT_NEEDED_for_regular;
399 input_flags.add_DT_NEEDED_for_regular = TRUE; }
401 { input_flags.add_DT_NEEDED_for_regular = $<integer>3; }
402 | input_list1 ',' AS_NEEDED '('
403 { $<integer>$ = input_flags.add_DT_NEEDED_for_regular;
404 input_flags.add_DT_NEEDED_for_regular = TRUE; }
406 { input_flags.add_DT_NEEDED_for_regular = $<integer>5; }
407 | input_list1 AS_NEEDED '('
408 { $<integer>$ = input_flags.add_DT_NEEDED_for_regular;
409 input_flags.add_DT_NEEDED_for_regular = TRUE; }
411 { input_flags.add_DT_NEEDED_for_regular = $<integer>4; }
415 SECTIONS '{' sec_or_group_p1 '}'
419 sec_or_group_p1 section
420 | sec_or_group_p1 statement_anywhere
426 { lang_add_entry ($3, FALSE); }
428 | ASSERT_K {ldlex_expression ();} '(' exp ',' NAME ')'
430 lang_add_assignment (exp_assert ($4, $6)); }
433 /* The '*' and '?' cases are there because the lexer returns them as
434 separate tokens rather than as NAME. */
455 $$.exclude_name_list = NULL;
456 $$.section_flag_list = NULL;
458 | EXCLUDE_FILE '(' exclude_name_list ')' wildcard_name
462 $$.exclude_name_list = $3;
463 $$.section_flag_list = NULL;
465 | SORT_BY_NAME '(' wildcard_name ')'
469 $$.exclude_name_list = NULL;
470 $$.section_flag_list = NULL;
472 | SORT_BY_ALIGNMENT '(' wildcard_name ')'
475 $$.sorted = by_alignment;
476 $$.exclude_name_list = NULL;
477 $$.section_flag_list = NULL;
479 | SORT_NONE '(' wildcard_name ')'
483 $$.exclude_name_list = NULL;
484 $$.section_flag_list = NULL;
486 | SORT_BY_NAME '(' SORT_BY_ALIGNMENT '(' wildcard_name ')' ')'
489 $$.sorted = by_name_alignment;
490 $$.exclude_name_list = NULL;
491 $$.section_flag_list = NULL;
493 | SORT_BY_NAME '(' SORT_BY_NAME '(' wildcard_name ')' ')'
497 $$.exclude_name_list = NULL;
498 $$.section_flag_list = NULL;
500 | SORT_BY_ALIGNMENT '(' SORT_BY_NAME '(' wildcard_name ')' ')'
503 $$.sorted = by_alignment_name;
504 $$.exclude_name_list = NULL;
505 $$.section_flag_list = NULL;
507 | SORT_BY_ALIGNMENT '(' SORT_BY_ALIGNMENT '(' wildcard_name ')' ')'
510 $$.sorted = by_alignment;
511 $$.exclude_name_list = NULL;
512 $$.section_flag_list = NULL;
514 | SORT_BY_NAME '(' EXCLUDE_FILE '(' exclude_name_list ')' wildcard_name ')'
518 $$.exclude_name_list = $5;
519 $$.section_flag_list = NULL;
521 | SORT_BY_INIT_PRIORITY '(' wildcard_name ')'
524 $$.sorted = by_init_priority;
525 $$.exclude_name_list = NULL;
526 $$.section_flag_list = NULL;
532 struct flag_info_list *n;
533 n = ((struct flag_info_list *) xmalloc (sizeof *n));
536 n->with = without_flags;
541 n->with = with_flags;
548 | sect_flag_list '&' NAME
550 struct flag_info_list *n;
551 n = ((struct flag_info_list *) xmalloc (sizeof *n));
554 n->with = without_flags;
559 n->with = with_flags;
569 INPUT_SECTION_FLAGS '(' sect_flag_list ')'
572 n = ((struct flag_info *) xmalloc (sizeof *n));
574 n->flags_initialized = FALSE;
575 n->not_with_flags = 0;
576 n->only_with_flags = 0;
582 exclude_name_list wildcard_name
584 struct name_list *tmp;
585 tmp = (struct name_list *) xmalloc (sizeof *tmp);
593 struct name_list *tmp;
594 tmp = (struct name_list *) xmalloc (sizeof *tmp);
602 section_NAME_list opt_comma wildcard_spec
604 struct wildcard_list *tmp;
605 tmp = (struct wildcard_list *) xmalloc (sizeof *tmp);
613 struct wildcard_list *tmp;
614 tmp = (struct wildcard_list *) xmalloc (sizeof *tmp);
621 input_section_spec_no_keep:
624 struct wildcard_spec tmp;
626 tmp.exclude_name_list = NULL;
628 tmp.section_flag_list = NULL;
629 lang_add_wild (&tmp, NULL, ldgram_had_keep);
633 struct wildcard_spec tmp;
635 tmp.exclude_name_list = NULL;
637 tmp.section_flag_list = $1;
638 lang_add_wild (&tmp, NULL, ldgram_had_keep);
640 | '[' section_NAME_list ']'
642 lang_add_wild (NULL, $2, ldgram_had_keep);
644 | sect_flags '[' section_NAME_list ']'
646 struct wildcard_spec tmp;
648 tmp.exclude_name_list = NULL;
650 tmp.section_flag_list = $1;
651 lang_add_wild (&tmp, $3, ldgram_had_keep);
653 | wildcard_spec '(' section_NAME_list ')'
655 lang_add_wild (&$1, $3, ldgram_had_keep);
657 | sect_flags wildcard_spec '(' section_NAME_list ')'
659 $2.section_flag_list = $1;
660 lang_add_wild (&$2, $4, ldgram_had_keep);
665 input_section_spec_no_keep
667 { ldgram_had_keep = TRUE; }
668 input_section_spec_no_keep ')'
669 { ldgram_had_keep = FALSE; }
674 | CREATE_OBJECT_SYMBOLS
676 lang_add_attribute(lang_object_symbols_statement_enum);
682 lang_add_attribute(lang_constructors_statement_enum);
684 | SORT_BY_NAME '(' CONSTRUCTORS ')'
686 constructors_sorted = TRUE;
687 lang_add_attribute (lang_constructors_statement_enum);
690 | length '(' mustbe_exp ')'
692 lang_add_data ((int) $1, $3);
695 | FILL '(' fill_exp ')'
699 | ASSERT_K {ldlex_expression ();} '(' exp ',' NAME ')' end
701 lang_add_assignment (exp_assert ($4, $6)); }
703 { ldlex_script (); ldfile_open_command_file($2); }
704 statement_list_opt END
705 { ldlex_popstate (); }
709 statement_list statement
734 $$ = exp_get_fill ($1, 0, "fill value");
741 | { $$ = (fill_type *) 0; }
771 lang_add_assignment (exp_assign ($1, $3, FALSE));
773 | NAME assign_op mustbe_exp
775 lang_add_assignment (exp_assign ($1,
781 | HIDDEN '(' NAME '=' mustbe_exp ')'
783 lang_add_assignment (exp_assign ($3, $5, TRUE));
785 | PROVIDE '(' NAME '=' mustbe_exp ')'
787 lang_add_assignment (exp_provide ($3, $5, FALSE));
789 | PROVIDE_HIDDEN '(' NAME '=' mustbe_exp ')'
791 lang_add_assignment (exp_provide ($3, $5, TRUE));
801 MEMORY '{' memory_spec_list_opt '}'
804 memory_spec_list_opt: memory_spec_list | ;
807 memory_spec_list opt_comma memory_spec
813 { region = lang_memory_region_lookup ($1, TRUE); }
815 origin_spec opt_comma length_spec
818 { ldlex_script (); ldfile_open_command_file($2); }
819 memory_spec_list_opt END
820 { ldlex_popstate (); }
824 ORIGIN '=' mustbe_exp
826 region->origin_exp = $3;
827 region->current = region->origin;
832 LENGTH '=' mustbe_exp
834 region->length_exp = $3;
840 { /* dummy action to avoid bison 1.25 error message */ }
841 | '(' attributes_list ')'
846 | attributes_list attributes_string
851 { lang_set_flags (region, $1, 0); }
853 { lang_set_flags (region, $2, 1); }
857 STARTUP '(' filename ')'
858 { lang_startup($3); }
862 HLL '(' high_level_library_NAME_list ')'
864 { ldemul_hll((char *)NULL); }
867 high_level_library_NAME_list:
868 high_level_library_NAME_list opt_comma filename
876 SYSLIB '(' low_level_library_NAME_list ')'
877 ; low_level_library_NAME_list:
878 low_level_library_NAME_list opt_comma filename
879 { ldemul_syslib($3); }
883 floating_point_support:
885 { lang_float(TRUE); }
887 { lang_float(FALSE); }
895 | NAME nocrossref_list
897 struct lang_nocrossref *n;
899 n = (struct lang_nocrossref *) xmalloc (sizeof *n);
904 | NAME ',' nocrossref_list
906 struct lang_nocrossref *n;
908 n = (struct lang_nocrossref *) xmalloc (sizeof *n);
915 mustbe_exp: { ldlex_expression (); }
917 { ldlex_popstate (); $$=$2;}
922 { $$ = exp_unop ('-', $2); }
925 | NEXT '(' exp ')' %prec UNARY
926 { $$ = exp_unop ((int) $1,$3); }
927 | '!' exp %prec UNARY
928 { $$ = exp_unop ('!', $2); }
929 | '+' exp %prec UNARY
931 | '~' exp %prec UNARY
932 { $$ = exp_unop ('~', $2);}
935 { $$ = exp_binop ('*', $1, $3); }
937 { $$ = exp_binop ('/', $1, $3); }
939 { $$ = exp_binop ('%', $1, $3); }
941 { $$ = exp_binop ('+', $1, $3); }
943 { $$ = exp_binop ('-' , $1, $3); }
945 { $$ = exp_binop (LSHIFT , $1, $3); }
947 { $$ = exp_binop (RSHIFT , $1, $3); }
949 { $$ = exp_binop (EQ , $1, $3); }
951 { $$ = exp_binop (NE , $1, $3); }
953 { $$ = exp_binop (LE , $1, $3); }
955 { $$ = exp_binop (GE , $1, $3); }
957 { $$ = exp_binop ('<' , $1, $3); }
959 { $$ = exp_binop ('>' , $1, $3); }
961 { $$ = exp_binop ('&' , $1, $3); }
963 { $$ = exp_binop ('^' , $1, $3); }
965 { $$ = exp_binop ('|' , $1, $3); }
966 | exp '?' exp ':' exp
967 { $$ = exp_trinop ('?' , $1, $3, $5); }
969 { $$ = exp_binop (ANDAND , $1, $3); }
971 { $$ = exp_binop (OROR , $1, $3); }
972 | DEFINED '(' NAME ')'
973 { $$ = exp_nameop (DEFINED, $3); }
975 { $$ = exp_bigintop ($1.integer, $1.str); }
977 { $$ = exp_nameop (SIZEOF_HEADERS,0); }
979 | ALIGNOF '(' NAME ')'
980 { $$ = exp_nameop (ALIGNOF,$3); }
981 | SIZEOF '(' NAME ')'
982 { $$ = exp_nameop (SIZEOF,$3); }
984 { $$ = exp_nameop (ADDR,$3); }
985 | LOADADDR '(' NAME ')'
986 { $$ = exp_nameop (LOADADDR,$3); }
987 | CONSTANT '(' NAME ')'
988 { $$ = exp_nameop (CONSTANT,$3); }
989 | ABSOLUTE '(' exp ')'
990 { $$ = exp_unop (ABSOLUTE, $3); }
991 | ALIGN_K '(' exp ')'
992 { $$ = exp_unop (ALIGN_K,$3); }
993 | ALIGN_K '(' exp ',' exp ')'
994 { $$ = exp_binop (ALIGN_K,$3,$5); }
995 | DATA_SEGMENT_ALIGN '(' exp ',' exp ')'
996 { $$ = exp_binop (DATA_SEGMENT_ALIGN, $3, $5); }
997 | DATA_SEGMENT_RELRO_END '(' exp ',' exp ')'
998 { $$ = exp_binop (DATA_SEGMENT_RELRO_END, $5, $3); }
999 | DATA_SEGMENT_END '(' exp ')'
1000 { $$ = exp_unop (DATA_SEGMENT_END, $3); }
1001 | SEGMENT_START '(' NAME ',' exp ')'
1002 { /* The operands to the expression node are
1003 placed in the opposite order from the way
1004 in which they appear in the script as
1005 that allows us to reuse more code in
1007 $$ = exp_binop (SEGMENT_START,
1009 exp_nameop (NAME, $3)); }
1011 { $$ = exp_unop (ALIGN_K,$3); }
1013 { $$ = exp_nameop (NAME,$1); }
1014 | MAX_K '(' exp ',' exp ')'
1015 { $$ = exp_binop (MAX_K, $3, $5 ); }
1016 | MIN_K '(' exp ',' exp ')'
1017 { $$ = exp_binop (MIN_K, $3, $5 ); }
1018 | ASSERT_K '(' exp ',' NAME ')'
1019 { $$ = exp_assert ($3, $5); }
1020 | ORIGIN '(' NAME ')'
1021 { $$ = exp_nameop (ORIGIN, $3); }
1022 | LENGTH '(' NAME ')'
1023 { $$ = exp_nameop (LENGTH, $3); }
1024 | LOG2CEIL '(' exp ')'
1025 { $$ = exp_unop (LOG2CEIL, $3); }
1030 AT '>' NAME { $$ = $3; }
1035 AT '(' exp ')' { $$ = $3; }
1040 ALIGN_K '(' exp ')' { $$ = $3; }
1044 opt_align_with_input:
1045 ALIGN_WITH_INPUT { $$ = ALIGN_WITH_INPUT; }
1050 SUBALIGN '(' exp ')' { $$ = $3; }
1055 ONLY_IF_RO { $$ = ONLY_IF_RO; }
1056 | ONLY_IF_RW { $$ = ONLY_IF_RW; }
1057 | SPECIAL { $$ = SPECIAL; }
1061 section: NAME { ldlex_expression(); }
1065 opt_align_with_input
1066 opt_subalign { ldlex_popstate (); ldlex_script (); }
1070 lang_enter_output_section_statement($1, $3,
1072 $5, $7, $4, $9, $6);
1075 '}' { ldlex_popstate (); ldlex_expression (); }
1076 memspec_opt memspec_at_opt phdr_opt fill_opt
1079 lang_leave_output_section_statement ($18, $15, $17, $16);
1084 { ldlex_expression (); }
1085 opt_exp_without_type opt_nocrossrefs opt_at opt_subalign
1086 { ldlex_popstate (); ldlex_script (); }
1089 lang_enter_overlay ($3, $6);
1093 { ldlex_popstate (); ldlex_expression (); }
1094 memspec_opt memspec_at_opt phdr_opt fill_opt
1097 lang_leave_overlay ($5, (int) $4,
1098 $16, $13, $15, $14);
1101 | /* The GROUP case is just enough to support the gcc
1102 svr3.ifile script. It is not intended to be full
1103 support. I'm not even sure what GROUP is supposed
1105 GROUP { ldlex_expression (); }
1109 lang_add_assignment (exp_assign (".", $3, FALSE));
1111 '{' sec_or_group_p1 '}'
1113 { ldlex_script (); ldfile_open_command_file($2); }
1115 { ldlex_popstate (); }
1119 NOLOAD { sectype = noload_section; }
1120 | DSECT { sectype = noalloc_section; }
1121 | COPY { sectype = noalloc_section; }
1122 | INFO { sectype = noalloc_section; }
1123 | OVERLAY { sectype = noalloc_section; }
1128 | /* EMPTY */ { sectype = normal_section; }
1129 | '(' ')' { sectype = normal_section; }
1133 exp atype ':' { $$ = $1; }
1134 | atype ':' { $$ = (etree_type *)NULL; }
1135 | /* The BIND cases are to support the gcc svr3.ifile
1136 script. They aren't intended to implement full
1137 support for the BIND keyword. I'm not even sure
1138 what BIND is supposed to mean. */
1139 BIND '(' exp ')' atype ':' { $$ = $3; }
1140 | BIND '(' exp ')' BLOCK '(' exp ')' atype ':'
1144 opt_exp_without_type:
1145 exp ':' { $$ = $1; }
1146 | ':' { $$ = (etree_type *) NULL; }
1159 | { $$ = DEFAULT_MEMORY_REGION; }
1169 struct lang_output_section_phdr_list *n;
1171 n = ((struct lang_output_section_phdr_list *)
1172 xmalloc (sizeof *n));
1186 lang_enter_overlay_section ($2);
1188 '{' statement_list_opt '}'
1189 { ldlex_popstate (); ldlex_expression (); }
1193 lang_leave_overlay_section ($9, $8);
1199 PHDRS '{' phdr_list '}'
1208 NAME { ldlex_expression (); }
1209 phdr_type phdr_qualifiers { ldlex_popstate (); }
1212 lang_new_phdr ($1, $3, $4.filehdr, $4.phdrs, $4.at,
1222 if ($1->type.node_class == etree_name
1223 && $1->type.node_code == NAME)
1227 static const char * const phdr_types[] =
1229 "PT_NULL", "PT_LOAD", "PT_DYNAMIC",
1230 "PT_INTERP", "PT_NOTE", "PT_SHLIB",
1236 i < sizeof phdr_types / sizeof phdr_types[0];
1238 if (strcmp (s, phdr_types[i]) == 0)
1243 if (i == sizeof phdr_types / sizeof phdr_types[0])
1245 if (strcmp (s, "PT_GNU_EH_FRAME") == 0)
1246 $$ = exp_intop (0x6474e550);
1247 else if (strcmp (s, "PT_GNU_STACK") == 0)
1248 $$ = exp_intop (0x6474e551);
1252 %X%P:%S: unknown phdr type `%s' (try integer literal)\n"),
1264 memset (&$$, 0, sizeof (struct phdr_info));
1266 | NAME phdr_val phdr_qualifiers
1269 if (strcmp ($1, "FILEHDR") == 0 && $2 == NULL)
1271 else if (strcmp ($1, "PHDRS") == 0 && $2 == NULL)
1273 else if (strcmp ($1, "FLAGS") == 0 && $2 != NULL)
1276 einfo (_("%X%P:%S: PHDRS syntax error at `%s'\n"),
1279 | AT '(' exp ')' phdr_qualifiers
1299 ldlex_version_file ();
1300 PUSH_ERROR (_("dynamic list"));
1311 | dynamic_list_nodes dynamic_list_node
1315 '{' dynamic_list_tag '}' ';'
1321 lang_append_dynamic_list ($1);
1325 /* This syntax is used within an external version script file. */
1327 version_script_file:
1329 ldlex_version_file ();
1330 PUSH_ERROR (_("VERSION script"));
1339 /* This is used within a normal linker script file. */
1343 ldlex_version_script ();
1345 VERSIONK '{' vers_nodes '}'
1353 | vers_nodes vers_node
1357 '{' vers_tag '}' ';'
1359 lang_register_vers_node (NULL, $2, NULL);
1361 | VERS_TAG '{' vers_tag '}' ';'
1363 lang_register_vers_node ($1, $3, NULL);
1365 | VERS_TAG '{' vers_tag '}' verdep ';'
1367 lang_register_vers_node ($1, $3, $5);
1374 $$ = lang_add_vers_depend (NULL, $1);
1378 $$ = lang_add_vers_depend ($1, $2);
1385 $$ = lang_new_vers_node (NULL, NULL);
1389 $$ = lang_new_vers_node ($1, NULL);
1391 | GLOBAL ':' vers_defns ';'
1393 $$ = lang_new_vers_node ($3, NULL);
1395 | LOCAL ':' vers_defns ';'
1397 $$ = lang_new_vers_node (NULL, $3);
1399 | GLOBAL ':' vers_defns ';' LOCAL ':' vers_defns ';'
1401 $$ = lang_new_vers_node ($3, $7);
1408 $$ = lang_new_vers_pattern (NULL, $1, ldgram_vers_current_lang, FALSE);
1412 $$ = lang_new_vers_pattern (NULL, $1, ldgram_vers_current_lang, TRUE);
1414 | vers_defns ';' VERS_IDENTIFIER
1416 $$ = lang_new_vers_pattern ($1, $3, ldgram_vers_current_lang, FALSE);
1418 | vers_defns ';' NAME
1420 $$ = lang_new_vers_pattern ($1, $3, ldgram_vers_current_lang, TRUE);
1422 | vers_defns ';' EXTERN NAME '{'
1424 $<name>$ = ldgram_vers_current_lang;
1425 ldgram_vers_current_lang = $4;
1427 vers_defns opt_semicolon '}'
1429 struct bfd_elf_version_expr *pat;
1430 for (pat = $7; pat->next != NULL; pat = pat->next);
1433 ldgram_vers_current_lang = $<name>6;
1437 $<name>$ = ldgram_vers_current_lang;
1438 ldgram_vers_current_lang = $2;
1440 vers_defns opt_semicolon '}'
1443 ldgram_vers_current_lang = $<name>4;
1447 $$ = lang_new_vers_pattern (NULL, "global", ldgram_vers_current_lang, FALSE);
1449 | vers_defns ';' GLOBAL
1451 $$ = lang_new_vers_pattern ($1, "global", ldgram_vers_current_lang, FALSE);
1455 $$ = lang_new_vers_pattern (NULL, "local", ldgram_vers_current_lang, FALSE);
1457 | vers_defns ';' LOCAL
1459 $$ = lang_new_vers_pattern ($1, "local", ldgram_vers_current_lang, FALSE);
1463 $$ = lang_new_vers_pattern (NULL, "extern", ldgram_vers_current_lang, FALSE);
1465 | vers_defns ';' EXTERN
1467 $$ = lang_new_vers_pattern ($1, "extern", ldgram_vers_current_lang, FALSE);
1481 if (ldfile_assumed_script)
1482 einfo (_("%P:%s: file format not recognized; treating as linker script\n"),
1484 if (error_index > 0 && error_index < ERROR_NAME_MAX)
1485 einfo ("%P%F:%S: %s in %s\n", NULL, arg, error_names[error_index - 1]);
1487 einfo ("%P%F:%S: %s\n", NULL, arg);