1 /* A YACC grammar to parse a superset of the AT&T linker scripting language.
2 Copyright (C) 1991-2021 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
49 static enum section_type sectype;
50 static lang_memory_region_type *region;
52 static bfd_boolean ldgram_had_keep = FALSE;
53 static char *ldgram_vers_current_lang = NULL;
55 #define ERROR_NAME_MAX 20
56 static char *error_names[ERROR_NAME_MAX];
57 static int error_index;
58 #define PUSH_ERROR(x) if (error_index < ERROR_NAME_MAX) error_names[error_index] = x; error_index++;
59 #define POP_ERROR() error_index--;
71 struct wildcard_spec wildcard;
72 struct wildcard_list *wildcard_list;
73 struct name_list *name_list;
74 struct flag_info_list *flag_info_list;
75 struct flag_info *flag_info;
77 union etree_union *etree;
82 union etree_union *at;
83 union etree_union *flags;
85 struct lang_nocrossref *nocrossref;
86 struct lang_output_section_phdr_list *section_phdr;
87 struct bfd_elf_version_deps *deflist;
88 struct bfd_elf_version_expr *versyms;
89 struct bfd_elf_version_tree *versnode;
92 %type <etree> exp opt_exp_with_type mustbe_exp opt_at phdr_type phdr_val
93 %type <etree> opt_exp_without_type opt_subalign opt_align
94 %type <fill> fill_opt fill_exp
95 %type <name_list> exclude_name_list
96 %type <wildcard_list> section_name_list
97 %type <flag_info_list> sect_flag_list
98 %type <flag_info> sect_flags
99 %type <name> memspec_opt casesymlist
100 %type <name> memspec_at_opt
101 %type <cname> wildcard_name
102 %type <wildcard> section_name_spec filename_spec wildcard_maybe_exclude
104 %token <name> NAME LNAME
105 %type <integer> length
106 %type <phdr> phdr_qualifiers
107 %type <nocrossref> nocrossref_list
108 %type <section_phdr> phdr_opt
109 %type <integer> opt_nocrossrefs
111 %right <token> PLUSEQ MINUSEQ MULTEQ DIVEQ '=' LSHIFTEQ RSHIFTEQ ANDEQ OREQ
112 %right <token> '?' ':'
119 %left <token> '<' '>' LE GE
120 %left <token> LSHIFT RSHIFT
122 %left <token> '+' '-'
123 %left <token> '*' '/' '%'
128 %token <token> ALIGN_K BLOCK BIND QUAD SQUAD LONG SHORT BYTE
129 %token SECTIONS PHDRS INSERT_K AFTER BEFORE
130 %token DATA_SEGMENT_ALIGN DATA_SEGMENT_RELRO_END DATA_SEGMENT_END
131 %token SORT_BY_NAME SORT_BY_ALIGNMENT SORT_NONE
132 %token SORT_BY_INIT_PRIORITY
134 %token SIZEOF_HEADERS OUTPUT_FORMAT FORCE_COMMON_ALLOCATION OUTPUT_ARCH
135 %token INHIBIT_COMMON_ALLOCATION FORCE_GROUP_ALLOCATION
141 %token NOLOAD DSECT COPY INFO OVERLAY
142 %token DEFINED TARGET_K SEARCH_DIR MAP ENTRY
143 %token <integer> NEXT
144 %token SIZEOF ALIGNOF ADDR LOADADDR MAX_K MIN_K
145 %token STARTUP HLL SYSLIB FLOAT NOFLOAT NOCROSSREFS NOCROSSREFS_TO
147 %token LENGTH CREATE_OBJECT_SYMBOLS INPUT GROUP OUTPUT CONSTRUCTORS
148 %token ALIGNMOD AT SUBALIGN HIDDEN PROVIDE PROVIDE_HIDDEN AS_NEEDED
149 %type <token> assign_op atype attributes_opt sect_constraint opt_align_with_input
150 %type <name> filename
151 %token CHIP LIST SECT ABSOLUTE LOAD NEWLINE ENDWORD ORDER NAMEWORD ASSERT_K
152 %token LOG2CEIL FORMAT PUBLIC DEFSYMEND BASE ALIAS TRUNCATE REL
153 %token INPUT_SCRIPT INPUT_MRI_SCRIPT INPUT_DEFSYM CASE EXTERN START
154 %token <name> VERS_TAG VERS_IDENTIFIER
155 %token GLOBAL LOCAL VERSIONK INPUT_VERSION_SCRIPT
156 %token KEEP ONLY_IF_RO ONLY_IF_RW SPECIAL INPUT_SECTION_FLAGS ALIGN_WITH_INPUT
159 %type <versyms> vers_defns
160 %type <versnode> vers_tag
161 %type <deflist> verdep
162 %token INPUT_DYNAMIC_LIST
167 INPUT_SCRIPT script_file
168 | INPUT_MRI_SCRIPT mri_script_file
169 | INPUT_VERSION_SCRIPT version_script_file
170 | INPUT_DYNAMIC_LIST dynamic_list_file
171 | INPUT_DEFSYM defsym_expr
179 { ldlex_expression(); }
181 { ldlex_popstate(); }
184 /* SYNTAX WITHIN AN MRI SCRIPT FILE */
188 PUSH_ERROR (_("MRI style script"));
199 mri_script_lines mri_script_command NEWLINE
207 einfo(_("%F%P: unrecognised keyword in MRI style script '%s'\n"),$1);
210 config.map_filename = "-";
212 | ORDER ordernamelist
214 | PUBLIC NAME '=' exp
215 { mri_public($2, $4); }
216 | PUBLIC NAME ',' exp
217 { mri_public($2, $4); }
219 { mri_public($2, $3); }
223 { mri_output_section($2, $4);}
225 { mri_output_section($2, $3);}
227 { mri_output_section($2, $4);}
228 | ALIGN_K NAME '=' exp
229 { mri_align($2,$4); }
230 | ALIGN_K NAME ',' exp
231 { mri_align($2,$4); }
232 | ALIGNMOD NAME '=' exp
233 { mri_alignmod($2,$4); }
234 | ALIGNMOD NAME ',' exp
235 { mri_alignmod($2,$4); }
236 | ABSOLUTE mri_abs_name_list
237 | LOAD mri_load_name_list
240 | ALIAS NAME ',' NAME
241 { mri_alias($2,$4,0);}
243 { mri_alias ($2, 0, (int) $4.integer); }
247 { mri_truncate ((unsigned int) $2.integer); }
249 | EXTERN extern_name_list
251 { ldlex_script (); ldfile_open_command_file($2); }
253 { ldlex_popstate (); }
255 { lang_add_entry ($2, FALSE); }
260 ordernamelist ',' NAME { mri_order($3); }
261 | ordernamelist NAME { mri_order($2); }
268 | mri_load_name_list ',' NAME { mri_load($3); }
273 { mri_only_load($1); }
274 | mri_abs_name_list ',' NAME
275 { mri_only_load($3); }
279 /* empty */ { $$ = NULL; }
281 | casesymlist ',' NAME
284 /* Parsed as expressions so that commas separate entries */
286 { ldlex_expression (); }
287 extern_name_list_body
288 { ldlex_popstate (); }
290 extern_name_list_body:
292 { ldlang_add_undef ($1, FALSE); }
293 | extern_name_list_body NAME
294 { ldlang_add_undef ($2, FALSE); }
295 | extern_name_list_body ',' NAME
296 { ldlang_add_undef ($3, FALSE); }
302 { ldlex_popstate(); }
318 | floating_point_support
322 | TARGET_K '(' NAME ')'
323 { lang_add_target($3); }
324 | SEARCH_DIR '(' filename ')'
325 { ldfile_add_library_path ($3, FALSE); }
326 | OUTPUT '(' filename ')'
327 { lang_add_output($3, 1); }
328 | OUTPUT_FORMAT '(' NAME ')'
329 { lang_add_output_format ($3, (char *) NULL,
331 | OUTPUT_FORMAT '(' NAME ',' NAME ',' NAME ')'
332 { lang_add_output_format ($3, $5, $7, 1); }
333 | OUTPUT_ARCH '(' NAME ')'
334 { ldfile_set_output_arch ($3, bfd_arch_unknown); }
335 | FORCE_COMMON_ALLOCATION
336 { command_line.force_common_definition = TRUE ; }
337 | FORCE_GROUP_ALLOCATION
338 { command_line.force_group_allocation = TRUE ; }
339 | INHIBIT_COMMON_ALLOCATION
340 { link_info.inhibit_common_definition = TRUE ; }
341 | INPUT '(' input_list ')'
343 { lang_enter_group (); }
345 { lang_leave_group (); }
346 | MAP '(' filename ')'
347 { lang_add_map($3); }
349 { ldlex_script (); ldfile_open_command_file($2); }
351 { ldlex_popstate (); }
352 | NOCROSSREFS '(' nocrossref_list ')'
354 lang_add_nocrossref ($3);
356 | NOCROSSREFS_TO '(' nocrossref_list ')'
358 lang_add_nocrossref_to ($3);
360 | EXTERN '(' extern_name_list ')'
361 | INSERT_K AFTER NAME
362 { lang_add_insert ($3, 0); }
363 | INSERT_K BEFORE NAME
364 { lang_add_insert ($3, 1); }
365 | REGION_ALIAS '(' NAME ',' NAME ')'
366 { lang_memory_region_alias ($3, $5); }
367 | LD_FEATURE '(' NAME ')'
368 { lang_ld_feature ($3); }
372 { ldlex_inputlist(); }
374 { ldlex_popstate(); }
378 { lang_add_input_file($1,lang_input_file_is_search_file_enum,
380 | input_list1 ',' NAME
381 { lang_add_input_file($3,lang_input_file_is_search_file_enum,
384 { lang_add_input_file($2,lang_input_file_is_search_file_enum,
387 { lang_add_input_file($1,lang_input_file_is_l_enum,
389 | input_list1 ',' LNAME
390 { lang_add_input_file($3,lang_input_file_is_l_enum,
393 { lang_add_input_file($2,lang_input_file_is_l_enum,
396 { $<integer>$ = input_flags.add_DT_NEEDED_for_regular;
397 input_flags.add_DT_NEEDED_for_regular = TRUE; }
399 { input_flags.add_DT_NEEDED_for_regular = $<integer>3; }
400 | input_list1 ',' AS_NEEDED '('
401 { $<integer>$ = input_flags.add_DT_NEEDED_for_regular;
402 input_flags.add_DT_NEEDED_for_regular = TRUE; }
404 { input_flags.add_DT_NEEDED_for_regular = $<integer>5; }
405 | input_list1 AS_NEEDED '('
406 { $<integer>$ = input_flags.add_DT_NEEDED_for_regular;
407 input_flags.add_DT_NEEDED_for_regular = TRUE; }
409 { input_flags.add_DT_NEEDED_for_regular = $<integer>4; }
413 SECTIONS '{' sec_or_group_p1 '}'
417 sec_or_group_p1 section
418 | sec_or_group_p1 statement_anywhere
424 { lang_add_entry ($3, FALSE); }
426 | ASSERT_K {ldlex_expression ();} '(' exp ',' NAME ')'
428 lang_add_assignment (exp_assert ($4, $6)); }
431 /* The '*' and '?' cases are there because the lexer returns them as
432 separate tokens rather than as NAME. */
448 wildcard_maybe_exclude:
453 $$.exclude_name_list = NULL;
454 $$.section_flag_list = NULL;
456 | EXCLUDE_FILE '(' exclude_name_list ')' wildcard_name
460 $$.exclude_name_list = $3;
461 $$.section_flag_list = NULL;
466 wildcard_maybe_exclude
467 | SORT_BY_NAME '(' wildcard_maybe_exclude ')'
472 | SORT_NONE '(' wildcard_maybe_exclude ')'
480 wildcard_maybe_exclude
481 | SORT_BY_NAME '(' wildcard_maybe_exclude ')'
486 | SORT_BY_ALIGNMENT '(' wildcard_maybe_exclude ')'
489 $$.sorted = by_alignment;
491 | SORT_NONE '(' wildcard_maybe_exclude ')'
496 | SORT_BY_NAME '(' SORT_BY_ALIGNMENT '(' wildcard_maybe_exclude ')' ')'
499 $$.sorted = by_name_alignment;
501 | SORT_BY_NAME '(' SORT_BY_NAME '(' wildcard_maybe_exclude ')' ')'
506 | SORT_BY_ALIGNMENT '(' SORT_BY_NAME '(' wildcard_maybe_exclude ')' ')'
509 $$.sorted = by_alignment_name;
511 | SORT_BY_ALIGNMENT '(' SORT_BY_ALIGNMENT '(' wildcard_maybe_exclude ')' ')'
514 $$.sorted = by_alignment;
516 | SORT_BY_INIT_PRIORITY '(' wildcard_maybe_exclude ')'
519 $$.sorted = by_init_priority;
525 struct flag_info_list *n;
526 n = ((struct flag_info_list *) xmalloc (sizeof *n));
529 n->with = without_flags;
534 n->with = with_flags;
541 | sect_flag_list '&' NAME
543 struct flag_info_list *n;
544 n = ((struct flag_info_list *) xmalloc (sizeof *n));
547 n->with = without_flags;
552 n->with = with_flags;
562 INPUT_SECTION_FLAGS '(' sect_flag_list ')'
565 n = ((struct flag_info *) xmalloc (sizeof *n));
567 n->flags_initialized = FALSE;
568 n->not_with_flags = 0;
569 n->only_with_flags = 0;
575 exclude_name_list wildcard_name
577 struct name_list *tmp;
578 tmp = (struct name_list *) xmalloc (sizeof *tmp);
586 struct name_list *tmp;
587 tmp = (struct name_list *) xmalloc (sizeof *tmp);
595 section_name_list opt_comma section_name_spec
597 struct wildcard_list *tmp;
598 tmp = (struct wildcard_list *) xmalloc (sizeof *tmp);
606 struct wildcard_list *tmp;
607 tmp = (struct wildcard_list *) xmalloc (sizeof *tmp);
614 input_section_spec_no_keep:
617 struct wildcard_spec tmp;
619 tmp.exclude_name_list = NULL;
621 tmp.section_flag_list = NULL;
622 lang_add_wild (&tmp, NULL, ldgram_had_keep);
626 struct wildcard_spec tmp;
628 tmp.exclude_name_list = NULL;
630 tmp.section_flag_list = $1;
631 lang_add_wild (&tmp, NULL, ldgram_had_keep);
633 | '[' section_name_list ']'
635 lang_add_wild (NULL, $2, ldgram_had_keep);
637 | sect_flags '[' section_name_list ']'
639 struct wildcard_spec tmp;
641 tmp.exclude_name_list = NULL;
643 tmp.section_flag_list = $1;
644 lang_add_wild (&tmp, $3, ldgram_had_keep);
646 | filename_spec '(' section_name_list ')'
648 lang_add_wild (&$1, $3, ldgram_had_keep);
650 | sect_flags filename_spec '(' section_name_list ')'
652 $2.section_flag_list = $1;
653 lang_add_wild (&$2, $4, ldgram_had_keep);
658 input_section_spec_no_keep
660 { ldgram_had_keep = TRUE; }
661 input_section_spec_no_keep ')'
662 { ldgram_had_keep = FALSE; }
667 | CREATE_OBJECT_SYMBOLS
669 lang_add_attribute(lang_object_symbols_statement_enum);
675 lang_add_attribute(lang_constructors_statement_enum);
677 | SORT_BY_NAME '(' CONSTRUCTORS ')'
679 constructors_sorted = TRUE;
680 lang_add_attribute (lang_constructors_statement_enum);
683 | length '(' mustbe_exp ')'
685 lang_add_data ((int) $1, $3);
688 | FILL '(' fill_exp ')'
692 | ASSERT_K {ldlex_expression ();} '(' exp ',' NAME ')' end
694 lang_add_assignment (exp_assert ($4, $6)); }
696 { ldlex_script (); ldfile_open_command_file($2); }
697 statement_list_opt END
698 { ldlex_popstate (); }
702 statement_list statement
727 $$ = exp_get_fill ($1, 0, "fill value");
734 | { $$ = (fill_type *) 0; }
764 lang_add_assignment (exp_assign ($1, $3, FALSE));
766 | NAME assign_op mustbe_exp
768 lang_add_assignment (exp_assign ($1,
774 | HIDDEN '(' NAME '=' mustbe_exp ')'
776 lang_add_assignment (exp_assign ($3, $5, TRUE));
778 | PROVIDE '(' NAME '=' mustbe_exp ')'
780 lang_add_assignment (exp_provide ($3, $5, FALSE));
782 | PROVIDE_HIDDEN '(' NAME '=' mustbe_exp ')'
784 lang_add_assignment (exp_provide ($3, $5, TRUE));
794 MEMORY '{' memory_spec_list_opt '}'
797 memory_spec_list_opt: memory_spec_list | ;
800 memory_spec_list opt_comma memory_spec
806 { region = lang_memory_region_lookup ($1, TRUE); }
808 origin_spec opt_comma length_spec
811 { ldlex_script (); ldfile_open_command_file($2); }
812 memory_spec_list_opt END
813 { ldlex_popstate (); }
817 ORIGIN '=' mustbe_exp
819 region->origin_exp = $3;
824 LENGTH '=' mustbe_exp
826 region->length_exp = $3;
832 { /* dummy action to avoid bison 1.25 error message */ }
833 | '(' attributes_list ')'
838 | attributes_list attributes_string
843 { lang_set_flags (region, $1, 0); }
845 { lang_set_flags (region, $2, 1); }
849 STARTUP '(' filename ')'
850 { lang_startup($3); }
854 HLL '(' high_level_library_NAME_list ')'
856 { ldemul_hll((char *)NULL); }
859 high_level_library_NAME_list:
860 high_level_library_NAME_list opt_comma filename
867 SYSLIB '(' low_level_library_NAME_list ')'
870 low_level_library_NAME_list:
871 low_level_library_NAME_list opt_comma filename
872 { ldemul_syslib($3); }
876 floating_point_support:
878 { lang_float(TRUE); }
880 { lang_float(FALSE); }
888 | NAME nocrossref_list
890 struct lang_nocrossref *n;
892 n = (struct lang_nocrossref *) xmalloc (sizeof *n);
897 | NAME ',' nocrossref_list
899 struct lang_nocrossref *n;
901 n = (struct lang_nocrossref *) xmalloc (sizeof *n);
908 mustbe_exp: { ldlex_expression (); }
910 { ldlex_popstate (); $$=$2;}
915 { $$ = exp_unop ('-', $2); }
918 | NEXT '(' exp ')' %prec UNARY
919 { $$ = exp_unop ((int) $1,$3); }
920 | '!' exp %prec UNARY
921 { $$ = exp_unop ('!', $2); }
922 | '+' exp %prec UNARY
924 | '~' exp %prec UNARY
925 { $$ = exp_unop ('~', $2);}
928 { $$ = exp_binop ('*', $1, $3); }
930 { $$ = exp_binop ('/', $1, $3); }
932 { $$ = exp_binop ('%', $1, $3); }
934 { $$ = exp_binop ('+', $1, $3); }
936 { $$ = exp_binop ('-' , $1, $3); }
938 { $$ = exp_binop (LSHIFT , $1, $3); }
940 { $$ = exp_binop (RSHIFT , $1, $3); }
942 { $$ = exp_binop (EQ , $1, $3); }
944 { $$ = exp_binop (NE , $1, $3); }
946 { $$ = exp_binop (LE , $1, $3); }
948 { $$ = exp_binop (GE , $1, $3); }
950 { $$ = exp_binop ('<' , $1, $3); }
952 { $$ = exp_binop ('>' , $1, $3); }
954 { $$ = exp_binop ('&' , $1, $3); }
956 { $$ = exp_binop ('^' , $1, $3); }
958 { $$ = exp_binop ('|' , $1, $3); }
959 | exp '?' exp ':' exp
960 { $$ = exp_trinop ('?' , $1, $3, $5); }
962 { $$ = exp_binop (ANDAND , $1, $3); }
964 { $$ = exp_binop (OROR , $1, $3); }
965 | DEFINED '(' NAME ')'
966 { $$ = exp_nameop (DEFINED, $3); }
968 { $$ = exp_bigintop ($1.integer, $1.str); }
970 { $$ = exp_nameop (SIZEOF_HEADERS,0); }
972 | ALIGNOF '(' NAME ')'
973 { $$ = exp_nameop (ALIGNOF,$3); }
974 | SIZEOF '(' NAME ')'
975 { $$ = exp_nameop (SIZEOF,$3); }
977 { $$ = exp_nameop (ADDR,$3); }
978 | LOADADDR '(' NAME ')'
979 { $$ = exp_nameop (LOADADDR,$3); }
980 | CONSTANT '(' NAME ')'
981 { $$ = exp_nameop (CONSTANT,$3); }
982 | ABSOLUTE '(' exp ')'
983 { $$ = exp_unop (ABSOLUTE, $3); }
984 | ALIGN_K '(' exp ')'
985 { $$ = exp_unop (ALIGN_K,$3); }
986 | ALIGN_K '(' exp ',' exp ')'
987 { $$ = exp_binop (ALIGN_K,$3,$5); }
988 | DATA_SEGMENT_ALIGN '(' exp ',' exp ')'
989 { $$ = exp_binop (DATA_SEGMENT_ALIGN, $3, $5); }
990 | DATA_SEGMENT_RELRO_END '(' exp ',' exp ')'
991 { $$ = exp_binop (DATA_SEGMENT_RELRO_END, $5, $3); }
992 | DATA_SEGMENT_END '(' exp ')'
993 { $$ = exp_unop (DATA_SEGMENT_END, $3); }
994 | SEGMENT_START '(' NAME ',' exp ')'
995 { /* The operands to the expression node are
996 placed in the opposite order from the way
997 in which they appear in the script as
998 that allows us to reuse more code in
1000 $$ = exp_binop (SEGMENT_START,
1002 exp_nameop (NAME, $3)); }
1004 { $$ = exp_unop (ALIGN_K,$3); }
1006 { $$ = exp_nameop (NAME,$1); }
1007 | MAX_K '(' exp ',' exp ')'
1008 { $$ = exp_binop (MAX_K, $3, $5 ); }
1009 | MIN_K '(' exp ',' exp ')'
1010 { $$ = exp_binop (MIN_K, $3, $5 ); }
1011 | ASSERT_K '(' exp ',' NAME ')'
1012 { $$ = exp_assert ($3, $5); }
1013 | ORIGIN '(' NAME ')'
1014 { $$ = exp_nameop (ORIGIN, $3); }
1015 | LENGTH '(' NAME ')'
1016 { $$ = exp_nameop (LENGTH, $3); }
1017 | LOG2CEIL '(' exp ')'
1018 { $$ = exp_unop (LOG2CEIL, $3); }
1023 AT '>' NAME { $$ = $3; }
1028 AT '(' exp ')' { $$ = $3; }
1033 ALIGN_K '(' exp ')' { $$ = $3; }
1037 opt_align_with_input:
1038 ALIGN_WITH_INPUT { $$ = ALIGN_WITH_INPUT; }
1043 SUBALIGN '(' exp ')' { $$ = $3; }
1048 ONLY_IF_RO { $$ = ONLY_IF_RO; }
1049 | ONLY_IF_RW { $$ = ONLY_IF_RW; }
1050 | SPECIAL { $$ = SPECIAL; }
1054 section: NAME { ldlex_expression(); }
1058 opt_align_with_input
1059 opt_subalign { ldlex_popstate (); ldlex_script (); }
1063 lang_enter_output_section_statement($1, $3,
1065 $5, $7, $4, $9, $6);
1068 '}' { ldlex_popstate (); ldlex_expression (); }
1069 memspec_opt memspec_at_opt phdr_opt fill_opt
1077 lang_leave_output_section_statement ($18, $15, $17, $16);
1081 { ldlex_expression (); }
1082 opt_exp_without_type opt_nocrossrefs opt_at opt_subalign
1083 { ldlex_popstate (); ldlex_script (); }
1086 lang_enter_overlay ($3, $6);
1090 { ldlex_popstate (); ldlex_expression (); }
1091 memspec_opt memspec_at_opt phdr_opt fill_opt
1099 lang_leave_overlay ($5, (int) $4,
1100 $16, $13, $15, $14);
1103 | /* The GROUP case is just enough to support the gcc
1104 svr3.ifile script. It is not intended to be full
1105 support. I'm not even sure what GROUP is supposed
1107 GROUP { ldlex_expression (); }
1111 lang_add_assignment (exp_assign (".", $3, FALSE));
1113 '{' sec_or_group_p1 '}'
1115 { ldlex_script (); ldfile_open_command_file($2); }
1117 { ldlex_popstate (); }
1121 NOLOAD { sectype = noload_section; }
1122 | DSECT { sectype = noalloc_section; }
1123 | COPY { sectype = noalloc_section; }
1124 | INFO { sectype = noalloc_section; }
1125 | OVERLAY { sectype = noalloc_section; }
1130 | /* EMPTY */ { sectype = normal_section; }
1131 | '(' ')' { sectype = normal_section; }
1135 exp atype ':' { $$ = $1; }
1136 | atype ':' { $$ = (etree_type *)NULL; }
1137 | /* The BIND cases are to support the gcc svr3.ifile
1138 script. They aren't intended to implement full
1139 support for the BIND keyword. I'm not even sure
1140 what BIND is supposed to mean. */
1141 BIND '(' exp ')' atype ':' { $$ = $3; }
1142 | BIND '(' exp ')' BLOCK '(' exp ')' atype ':'
1146 opt_exp_without_type:
1147 exp ':' { $$ = $1; }
1148 | ':' { $$ = (etree_type *) NULL; }
1161 | { $$ = DEFAULT_MEMORY_REGION; }
1171 struct lang_output_section_phdr_list *n;
1173 n = ((struct lang_output_section_phdr_list *)
1174 xmalloc (sizeof *n));
1188 lang_enter_overlay_section ($2);
1190 '{' statement_list_opt '}'
1191 { ldlex_popstate (); ldlex_expression (); }
1195 lang_leave_overlay_section ($9, $8);
1201 PHDRS '{' phdr_list '}'
1210 NAME { ldlex_expression (); }
1211 phdr_type phdr_qualifiers { ldlex_popstate (); }
1214 lang_new_phdr ($1, $3, $4.filehdr, $4.phdrs, $4.at,
1224 if ($1->type.node_class == etree_name
1225 && $1->type.node_code == NAME)
1229 static const char * const phdr_types[] =
1231 "PT_NULL", "PT_LOAD", "PT_DYNAMIC",
1232 "PT_INTERP", "PT_NOTE", "PT_SHLIB",
1238 i < sizeof phdr_types / sizeof phdr_types[0];
1240 if (strcmp (s, phdr_types[i]) == 0)
1245 if (i == sizeof phdr_types / sizeof phdr_types[0])
1247 if (strcmp (s, "PT_GNU_EH_FRAME") == 0)
1248 $$ = exp_intop (0x6474e550);
1249 else if (strcmp (s, "PT_GNU_STACK") == 0)
1250 $$ = exp_intop (0x6474e551);
1254 %X%P:%pS: unknown phdr type `%s' (try integer literal)\n"),
1266 memset (&$$, 0, sizeof (struct phdr_info));
1268 | NAME phdr_val phdr_qualifiers
1271 if (strcmp ($1, "FILEHDR") == 0 && $2 == NULL)
1273 else if (strcmp ($1, "PHDRS") == 0 && $2 == NULL)
1275 else if (strcmp ($1, "FLAGS") == 0 && $2 != NULL)
1278 einfo (_("%X%P:%pS: PHDRS syntax error at `%s'\n"),
1281 | AT '(' exp ')' phdr_qualifiers
1301 ldlex_version_file ();
1302 PUSH_ERROR (_("dynamic list"));
1313 | dynamic_list_nodes dynamic_list_node
1317 '{' dynamic_list_tag '}' ';'
1323 lang_append_dynamic_list (current_dynamic_list_p, $1);
1327 /* This syntax is used within an external version script file. */
1329 version_script_file:
1331 ldlex_version_file ();
1332 PUSH_ERROR (_("VERSION script"));
1341 /* This is used within a normal linker script file. */
1345 ldlex_version_script ();
1347 VERSIONK '{' vers_nodes '}'
1355 | vers_nodes vers_node
1359 '{' vers_tag '}' ';'
1361 lang_register_vers_node (NULL, $2, NULL);
1363 | VERS_TAG '{' vers_tag '}' ';'
1365 lang_register_vers_node ($1, $3, NULL);
1367 | VERS_TAG '{' vers_tag '}' verdep ';'
1369 lang_register_vers_node ($1, $3, $5);
1376 $$ = lang_add_vers_depend (NULL, $1);
1380 $$ = lang_add_vers_depend ($1, $2);
1387 $$ = lang_new_vers_node (NULL, NULL);
1391 $$ = lang_new_vers_node ($1, NULL);
1393 | GLOBAL ':' vers_defns ';'
1395 $$ = lang_new_vers_node ($3, NULL);
1397 | LOCAL ':' vers_defns ';'
1399 $$ = lang_new_vers_node (NULL, $3);
1401 | GLOBAL ':' vers_defns ';' LOCAL ':' vers_defns ';'
1403 $$ = lang_new_vers_node ($3, $7);
1410 $$ = lang_new_vers_pattern (NULL, $1, ldgram_vers_current_lang, FALSE);
1414 $$ = lang_new_vers_pattern (NULL, $1, ldgram_vers_current_lang, TRUE);
1416 | vers_defns ';' VERS_IDENTIFIER
1418 $$ = lang_new_vers_pattern ($1, $3, ldgram_vers_current_lang, FALSE);
1420 | vers_defns ';' NAME
1422 $$ = lang_new_vers_pattern ($1, $3, ldgram_vers_current_lang, TRUE);
1424 | vers_defns ';' EXTERN NAME '{'
1426 $<name>$ = ldgram_vers_current_lang;
1427 ldgram_vers_current_lang = $4;
1429 vers_defns opt_semicolon '}'
1431 struct bfd_elf_version_expr *pat;
1432 for (pat = $7; pat->next != NULL; pat = pat->next);
1435 ldgram_vers_current_lang = $<name>6;
1439 $<name>$ = ldgram_vers_current_lang;
1440 ldgram_vers_current_lang = $2;
1442 vers_defns opt_semicolon '}'
1445 ldgram_vers_current_lang = $<name>4;
1449 $$ = lang_new_vers_pattern (NULL, "global", ldgram_vers_current_lang, FALSE);
1451 | vers_defns ';' GLOBAL
1453 $$ = lang_new_vers_pattern ($1, "global", ldgram_vers_current_lang, FALSE);
1457 $$ = lang_new_vers_pattern (NULL, "local", ldgram_vers_current_lang, FALSE);
1459 | vers_defns ';' LOCAL
1461 $$ = lang_new_vers_pattern ($1, "local", ldgram_vers_current_lang, FALSE);
1465 $$ = lang_new_vers_pattern (NULL, "extern", ldgram_vers_current_lang, FALSE);
1467 | vers_defns ';' EXTERN
1469 $$ = lang_new_vers_pattern ($1, "extern", ldgram_vers_current_lang, FALSE);
1483 if (ldfile_assumed_script)
1484 einfo (_("%P:%s: file format not recognized; treating as linker script\n"),
1486 if (error_index > 0 && error_index < ERROR_NAME_MAX)
1487 einfo ("%F%P:%pS: %s in %s\n", NULL, arg, error_names[error_index - 1]);
1489 einfo ("%F%P:%pS: %s\n", NULL, arg);