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 bool 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 memspec_at_opt paren_script_name casesymlist
100 %type <cname> wildcard_name
101 %type <wildcard> section_name_spec filename_spec wildcard_maybe_exclude
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
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); }
425 | assignment separator
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 | assignment separator
668 | CREATE_OBJECT_SYMBOLS
670 lang_add_attribute (lang_object_symbols_statement_enum);
674 lang_add_attribute (lang_constructors_statement_enum);
676 | SORT_BY_NAME '(' CONSTRUCTORS ')'
678 constructors_sorted = true;
679 lang_add_attribute (lang_constructors_statement_enum);
682 | length '(' mustbe_exp ')'
684 lang_add_data ((int) $1, $3);
687 | FILL '(' fill_exp ')'
692 { ldlex_expression (); }
693 '(' exp ',' NAME ')' separator
696 lang_add_assignment (exp_assert ($4, $6));
701 ldfile_open_command_file ($2);
703 statement_list_opt END
704 { ldlex_popstate (); }
708 statement_list statement
733 $$ = exp_get_fill ($1, 0, "fill value");
740 | { $$ = (fill_type *) 0; }
770 lang_add_assignment (exp_assign ($1, $3, false));
772 | NAME assign_op mustbe_exp
774 lang_add_assignment (exp_assign ($1,
780 | HIDDEN '(' NAME '=' mustbe_exp ')'
782 lang_add_assignment (exp_assign ($3, $5, true));
784 | PROVIDE '(' NAME '=' mustbe_exp ')'
786 lang_add_assignment (exp_provide ($3, $5, false));
788 | PROVIDE_HIDDEN '(' NAME '=' mustbe_exp ')'
790 lang_add_assignment (exp_provide ($3, $5, true));
800 MEMORY '{' memory_spec_list_opt '}'
803 memory_spec_list_opt: memory_spec_list | ;
806 memory_spec_list opt_comma memory_spec
812 { region = lang_memory_region_lookup ($1, true); }
814 origin_spec opt_comma length_spec
817 { ldlex_script (); ldfile_open_command_file($2); }
818 memory_spec_list_opt END
819 { ldlex_popstate (); }
823 ORIGIN '=' mustbe_exp
825 region->origin_exp = $3;
830 LENGTH '=' mustbe_exp
832 region->length_exp = $3;
838 { /* dummy action to avoid bison 1.25 error message */ }
839 | '(' attributes_list ')'
844 | attributes_list attributes_string
849 { lang_set_flags (region, $1, 0); }
851 { lang_set_flags (region, $2, 1); }
855 STARTUP '(' filename ')'
856 { lang_startup($3); }
860 HLL '(' high_level_library_NAME_list ')'
862 { ldemul_hll((char *)NULL); }
865 high_level_library_NAME_list:
866 high_level_library_NAME_list opt_comma filename
873 SYSLIB '(' low_level_library_NAME_list ')'
876 low_level_library_NAME_list:
877 low_level_library_NAME_list opt_comma filename
878 { ldemul_syslib($3); }
882 floating_point_support:
884 { lang_float(true); }
886 { lang_float(false); }
894 | NAME nocrossref_list
896 struct lang_nocrossref *n;
898 n = (struct lang_nocrossref *) xmalloc (sizeof *n);
903 | NAME ',' nocrossref_list
905 struct lang_nocrossref *n;
907 n = (struct lang_nocrossref *) xmalloc (sizeof *n);
914 paren_script_name: { ldlex_script (); }
916 { ldlex_popstate (); $$ = $3; }
918 mustbe_exp: { ldlex_expression (); }
920 { ldlex_popstate (); $$ = $2; }
925 { $$ = exp_unop ('-', $2); }
928 | NEXT '(' exp ')' %prec UNARY
929 { $$ = exp_unop ((int) $1,$3); }
930 | '!' exp %prec UNARY
931 { $$ = exp_unop ('!', $2); }
932 | '+' exp %prec UNARY
934 | '~' exp %prec UNARY
935 { $$ = exp_unop ('~', $2);}
938 { $$ = exp_binop ('*', $1, $3); }
940 { $$ = exp_binop ('/', $1, $3); }
942 { $$ = exp_binop ('%', $1, $3); }
944 { $$ = exp_binop ('+', $1, $3); }
946 { $$ = exp_binop ('-' , $1, $3); }
948 { $$ = exp_binop (LSHIFT , $1, $3); }
950 { $$ = exp_binop (RSHIFT , $1, $3); }
952 { $$ = exp_binop (EQ , $1, $3); }
954 { $$ = exp_binop (NE , $1, $3); }
956 { $$ = exp_binop (LE , $1, $3); }
958 { $$ = exp_binop (GE , $1, $3); }
960 { $$ = exp_binop ('<' , $1, $3); }
962 { $$ = exp_binop ('>' , $1, $3); }
964 { $$ = exp_binop ('&' , $1, $3); }
966 { $$ = exp_binop ('^' , $1, $3); }
968 { $$ = exp_binop ('|' , $1, $3); }
969 | exp '?' exp ':' exp
970 { $$ = exp_trinop ('?' , $1, $3, $5); }
972 { $$ = exp_binop (ANDAND , $1, $3); }
974 { $$ = exp_binop (OROR , $1, $3); }
975 | DEFINED '(' NAME ')'
976 { $$ = exp_nameop (DEFINED, $3); }
978 { $$ = exp_bigintop ($1.integer, $1.str); }
980 { $$ = exp_nameop (SIZEOF_HEADERS,0); }
982 | ALIGNOF paren_script_name
983 { $$ = exp_nameop (ALIGNOF, $2); }
984 | SIZEOF paren_script_name
985 { $$ = exp_nameop (SIZEOF, $2); }
986 | ADDR paren_script_name
987 { $$ = exp_nameop (ADDR, $2); }
988 | LOADADDR paren_script_name
989 { $$ = exp_nameop (LOADADDR, $2); }
990 | CONSTANT '(' NAME ')'
991 { $$ = exp_nameop (CONSTANT,$3); }
992 | ABSOLUTE '(' exp ')'
993 { $$ = exp_unop (ABSOLUTE, $3); }
994 | ALIGN_K '(' exp ')'
995 { $$ = exp_unop (ALIGN_K,$3); }
996 | ALIGN_K '(' exp ',' exp ')'
997 { $$ = exp_binop (ALIGN_K,$3,$5); }
998 | DATA_SEGMENT_ALIGN '(' exp ',' exp ')'
999 { $$ = exp_binop (DATA_SEGMENT_ALIGN, $3, $5); }
1000 | DATA_SEGMENT_RELRO_END '(' exp ',' exp ')'
1001 { $$ = exp_binop (DATA_SEGMENT_RELRO_END, $5, $3); }
1002 | DATA_SEGMENT_END '(' exp ')'
1003 { $$ = exp_unop (DATA_SEGMENT_END, $3); }
1004 | SEGMENT_START { ldlex_script (); } '(' NAME
1005 { ldlex_popstate (); } ',' exp ')'
1006 { /* The operands to the expression node are
1007 placed in the opposite order from the way
1008 in which they appear in the script as
1009 that allows us to reuse more code in
1011 $$ = exp_binop (SEGMENT_START,
1013 exp_nameop (NAME, $4)); }
1015 { $$ = exp_unop (ALIGN_K,$3); }
1017 { $$ = exp_nameop (NAME,$1); }
1018 | MAX_K '(' exp ',' exp ')'
1019 { $$ = exp_binop (MAX_K, $3, $5 ); }
1020 | MIN_K '(' exp ',' exp ')'
1021 { $$ = exp_binop (MIN_K, $3, $5 ); }
1022 | ASSERT_K '(' exp ',' NAME ')'
1023 { $$ = exp_assert ($3, $5); }
1024 | ORIGIN '(' NAME ')'
1025 { $$ = exp_nameop (ORIGIN, $3); }
1026 | LENGTH '(' NAME ')'
1027 { $$ = exp_nameop (LENGTH, $3); }
1028 | LOG2CEIL '(' exp ')'
1029 { $$ = exp_unop (LOG2CEIL, $3); }
1034 AT '>' NAME { $$ = $3; }
1039 AT '(' exp ')' { $$ = $3; }
1044 ALIGN_K '(' exp ')' { $$ = $3; }
1048 opt_align_with_input:
1049 ALIGN_WITH_INPUT { $$ = ALIGN_WITH_INPUT; }
1054 SUBALIGN '(' exp ')' { $$ = $3; }
1059 ONLY_IF_RO { $$ = ONLY_IF_RO; }
1060 | ONLY_IF_RW { $$ = ONLY_IF_RW; }
1061 | SPECIAL { $$ = SPECIAL; }
1066 { ldlex_expression(); }
1070 opt_align_with_input
1072 { ldlex_popstate (); ldlex_script (); }
1076 lang_enter_output_section_statement($1, $3, sectype,
1082 { ldlex_popstate (); ldlex_expression (); }
1083 memspec_opt memspec_at_opt phdr_opt fill_opt
1091 lang_leave_output_section_statement ($18, $15,
1096 { ldlex_expression (); }
1097 opt_exp_without_type opt_nocrossrefs opt_at opt_subalign
1098 { ldlex_popstate (); ldlex_script (); }
1101 lang_enter_overlay ($3, $6);
1105 { ldlex_popstate (); ldlex_expression (); }
1106 memspec_opt memspec_at_opt phdr_opt fill_opt
1114 lang_leave_overlay ($5, (int) $4,
1115 $16, $13, $15, $14);
1118 | /* The GROUP case is just enough to support the gcc
1119 svr3.ifile script. It is not intended to be full
1120 support. I'm not even sure what GROUP is supposed
1123 { ldlex_expression (); }
1127 lang_add_assignment (exp_assign (".", $3, false));
1129 '{' sec_or_group_p1 '}'
1133 ldfile_open_command_file ($2);
1136 { ldlex_popstate (); }
1140 NOLOAD { sectype = noload_section; }
1141 | DSECT { sectype = noalloc_section; }
1142 | COPY { sectype = noalloc_section; }
1143 | INFO { sectype = noalloc_section; }
1144 | OVERLAY { sectype = noalloc_section; }
1145 | READONLY { sectype = readonly_section; }
1150 | /* EMPTY */ { sectype = normal_section; }
1151 | '(' ')' { sectype = normal_section; }
1155 exp atype ':' { $$ = $1; }
1156 | atype ':' { $$ = (etree_type *)NULL; }
1157 | /* The BIND cases are to support the gcc svr3.ifile
1158 script. They aren't intended to implement full
1159 support for the BIND keyword. I'm not even sure
1160 what BIND is supposed to mean. */
1161 BIND '(' exp ')' atype ':' { $$ = $3; }
1162 | BIND '(' exp ')' BLOCK '(' exp ')' atype ':'
1166 opt_exp_without_type:
1167 exp ':' { $$ = $1; }
1168 | ':' { $$ = (etree_type *) NULL; }
1181 | { $$ = DEFAULT_MEMORY_REGION; }
1191 struct lang_output_section_phdr_list *n;
1193 n = ((struct lang_output_section_phdr_list *)
1194 xmalloc (sizeof *n));
1207 lang_enter_overlay_section ($2);
1209 '{' statement_list_opt '}'
1210 { ldlex_expression (); }
1219 lang_leave_overlay_section ($9, $8);
1225 PHDRS '{' phdr_list '}'
1234 NAME { ldlex_expression (); }
1235 phdr_type phdr_qualifiers { ldlex_popstate (); }
1238 lang_new_phdr ($1, $3, $4.filehdr, $4.phdrs, $4.at,
1248 if ($1->type.node_class == etree_name
1249 && $1->type.node_code == NAME)
1253 static const char * const phdr_types[] =
1255 "PT_NULL", "PT_LOAD", "PT_DYNAMIC",
1256 "PT_INTERP", "PT_NOTE", "PT_SHLIB",
1262 i < sizeof phdr_types / sizeof phdr_types[0];
1264 if (strcmp (s, phdr_types[i]) == 0)
1269 if (i == sizeof phdr_types / sizeof phdr_types[0])
1271 if (strcmp (s, "PT_GNU_EH_FRAME") == 0)
1272 $$ = exp_intop (0x6474e550);
1273 else if (strcmp (s, "PT_GNU_STACK") == 0)
1274 $$ = exp_intop (0x6474e551);
1278 %X%P:%pS: unknown phdr type `%s' (try integer literal)\n"),
1290 memset (&$$, 0, sizeof (struct phdr_info));
1292 | NAME phdr_val phdr_qualifiers
1295 if (strcmp ($1, "FILEHDR") == 0 && $2 == NULL)
1297 else if (strcmp ($1, "PHDRS") == 0 && $2 == NULL)
1299 else if (strcmp ($1, "FLAGS") == 0 && $2 != NULL)
1302 einfo (_("%X%P:%pS: PHDRS syntax error at `%s'\n"),
1305 | AT '(' exp ')' phdr_qualifiers
1325 ldlex_version_file ();
1326 PUSH_ERROR (_("dynamic list"));
1337 | dynamic_list_nodes dynamic_list_node
1341 '{' dynamic_list_tag '}' ';'
1347 lang_append_dynamic_list (current_dynamic_list_p, $1);
1351 /* This syntax is used within an external version script file. */
1353 version_script_file:
1355 ldlex_version_file ();
1356 PUSH_ERROR (_("VERSION script"));
1365 /* This is used within a normal linker script file. */
1369 ldlex_version_script ();
1371 VERSIONK '{' vers_nodes '}'
1379 | vers_nodes vers_node
1383 '{' vers_tag '}' ';'
1385 lang_register_vers_node (NULL, $2, NULL);
1387 | VERS_TAG '{' vers_tag '}' ';'
1389 lang_register_vers_node ($1, $3, NULL);
1391 | VERS_TAG '{' vers_tag '}' verdep ';'
1393 lang_register_vers_node ($1, $3, $5);
1400 $$ = lang_add_vers_depend (NULL, $1);
1404 $$ = lang_add_vers_depend ($1, $2);
1411 $$ = lang_new_vers_node (NULL, NULL);
1415 $$ = lang_new_vers_node ($1, NULL);
1417 | GLOBAL ':' vers_defns ';'
1419 $$ = lang_new_vers_node ($3, NULL);
1421 | LOCAL ':' vers_defns ';'
1423 $$ = lang_new_vers_node (NULL, $3);
1425 | GLOBAL ':' vers_defns ';' LOCAL ':' vers_defns ';'
1427 $$ = lang_new_vers_node ($3, $7);
1434 $$ = lang_new_vers_pattern (NULL, $1, ldgram_vers_current_lang, false);
1438 $$ = lang_new_vers_pattern (NULL, $1, ldgram_vers_current_lang, true);
1440 | vers_defns ';' VERS_IDENTIFIER
1442 $$ = lang_new_vers_pattern ($1, $3, ldgram_vers_current_lang, false);
1444 | vers_defns ';' NAME
1446 $$ = lang_new_vers_pattern ($1, $3, ldgram_vers_current_lang, true);
1448 | vers_defns ';' EXTERN NAME '{'
1450 $<name>$ = ldgram_vers_current_lang;
1451 ldgram_vers_current_lang = $4;
1453 vers_defns opt_semicolon '}'
1455 struct bfd_elf_version_expr *pat;
1456 for (pat = $7; pat->next != NULL; pat = pat->next);
1459 ldgram_vers_current_lang = $<name>6;
1463 $<name>$ = ldgram_vers_current_lang;
1464 ldgram_vers_current_lang = $2;
1466 vers_defns opt_semicolon '}'
1469 ldgram_vers_current_lang = $<name>4;
1473 $$ = lang_new_vers_pattern (NULL, "global", ldgram_vers_current_lang, false);
1475 | vers_defns ';' GLOBAL
1477 $$ = lang_new_vers_pattern ($1, "global", ldgram_vers_current_lang, false);
1481 $$ = lang_new_vers_pattern (NULL, "local", ldgram_vers_current_lang, false);
1483 | vers_defns ';' LOCAL
1485 $$ = lang_new_vers_pattern ($1, "local", ldgram_vers_current_lang, false);
1489 $$ = lang_new_vers_pattern (NULL, "extern", ldgram_vers_current_lang, false);
1491 | vers_defns ';' EXTERN
1493 $$ = lang_new_vers_pattern ($1, "extern", ldgram_vers_current_lang, false);
1507 if (ldfile_assumed_script)
1508 einfo (_("%P:%s: file format not recognized; treating as linker script\n"),
1510 if (error_index > 0 && error_index < ERROR_NAME_MAX)
1511 einfo ("%F%P:%pS: %s in %s\n", NULL, arg, error_names[error_index - 1]);
1513 einfo ("%F%P:%pS: %s\n", NULL, arg);