1 # This shell script emits a C file. -*- C -*-
2 # Copyright (C) 2002-2014 Free Software Foundation, Inc.
4 # This file is part of the GNU Binutils.
6 # This program is free software; you can redistribute it and/or modify
7 # it under the terms of the GNU General Public License as published by
8 # the Free Software Foundation; either version 3 of the License, or
9 # (at your option) any later version.
11 # This program is distributed in the hope that it will be useful,
12 # but WITHOUT ANY WARRANTY; without even the implied warranty of
13 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 # GNU General Public License for more details.
16 # You should have received a copy of the GNU General Public License
17 # along with this program; if not, write to the Free Software
18 # Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
22 # This file is sourced from elf32.em, and defines extra powerpc64-elf
30 #include "elf64-ppc.h"
32 #include "elf/ppc64.h"
34 static asection *ppc_add_stub_section (const char *, asection *);
35 static void ppc_layout_sections_again (void);
37 static struct ppc64_elf_params params = { NULL,
38 &ppc_add_stub_section,
39 &ppc_layout_sections_again,
41 ${DEFAULT_PLT_STATIC_CHAIN-0}, -1, 0,
44 /* Fake input file for stubs. */
45 static lang_input_statement_type *stub_file;
47 /* Whether we need to call ppc_layout_sections_again. */
48 static int need_laying_out = 0;
50 /* Whether to add ".foo" entries for each "foo" in a version script. */
51 static int dotsyms = 1;
53 /* Whether to run tls optimization. */
54 static int no_tls_opt = 0;
56 /* Whether to run opd optimization. */
57 static int no_opd_opt = 0;
59 /* Whether to run toc optimization. */
60 static int no_toc_opt = 0;
62 /* Whether to sort input toc and got sections. */
63 static int no_toc_sort = 0;
65 /* Set if individual PLT call stubs should be aligned. */
66 static int plt_stub_align = 0;
68 static asection *toc_section = 0;
70 /* This is called before the input files are opened. We create a new
71 fake input file to hold the stub sections. */
74 ppc_create_output_section_statements (void)
76 if (!(bfd_get_flavour (link_info.output_bfd) == bfd_target_elf_flavour
77 && elf_object_id (link_info.output_bfd) == PPC64_ELF_DATA))
80 link_info.wrap_char = '.';
82 stub_file = lang_add_input_file ("linker stubs",
83 lang_input_file_is_fake_enum,
85 stub_file->the_bfd = bfd_create ("linker stubs", link_info.output_bfd);
86 if (stub_file->the_bfd == NULL
87 || !bfd_set_arch_mach (stub_file->the_bfd,
88 bfd_get_arch (link_info.output_bfd),
89 bfd_get_mach (link_info.output_bfd)))
91 einfo ("%F%P: can not create BFD: %E\n");
95 stub_file->the_bfd->flags |= BFD_LINKER_CREATED;
96 ldlang_add_file (stub_file);
97 params.stub_bfd = stub_file->the_bfd;
98 if (params.save_restore_funcs < 0)
99 params.save_restore_funcs = !link_info.relocatable;
100 if (!ppc64_elf_init_stub_bfd (&link_info, ¶ms))
101 einfo ("%F%P: can not init BFD: %E\n");
104 /* Move the input section statement at *U which happens to be on LIST
105 to be just before *TO. */
108 move_input_section (lang_statement_list_type *list,
109 lang_statement_union_type **u,
110 lang_statement_union_type **to)
112 lang_statement_union_type *s = *u;
113 asection *i = s->input_section.section;
116 /* Snip the input section from the statement list. If it was the
117 last statement, fix the list tail pointer. */
121 /* Add it back in the new position. */
122 s->header.next = *to;
124 if (list->tail == to)
125 list->tail = &s->header.next;
127 /* Trim I off the bfd map_head/map_tail doubly linked lists. */
130 (p != NULL ? p : i->output_section)->map_head.s = n;
131 (n != NULL ? n : i->output_section)->map_tail.s = p;
133 /* Add I back on in its new position. */
134 if (s->header.next->header.type == lang_input_section_enum)
136 n = s->header.next->input_section.section;
141 /* If the next statement is not an input section statement then
142 TO must point at the previous input section statement
143 header.next field. */
144 lang_input_section_type *prev = (lang_input_section_type *)
145 ((char *) to - offsetof (lang_statement_union_type, header.next));
147 ASSERT (prev->header.type == lang_input_section_enum);
153 (p != NULL ? p : i->output_section)->map_head.s = i;
154 (n != NULL ? n : i->output_section)->map_tail.s = i;
157 /* Sort input section statements in the linker script tree rooted at
158 LIST so that those whose owning bfd happens to have a section
159 called .init or .fini are placed first. Place any TOC sections
160 referenced by small TOC relocs next, with TOC sections referenced
161 only by bigtoc relocs last. */
164 sort_toc_sections (lang_statement_list_type *list,
165 lang_statement_union_type **ini,
166 lang_statement_union_type **small)
168 lang_statement_union_type *s, **u;
172 while ((s = *u) != NULL)
174 switch (s->header.type)
176 case lang_wild_statement_enum:
177 sort_toc_sections (&s->wild_statement.children, ini, small);
180 case lang_group_statement_enum:
181 sort_toc_sections (&s->group_statement.children, ini, small);
184 case lang_input_section_enum:
185 i = s->input_section.section;
186 /* Leave the stub_file .got where it is. We put the .got
188 if (i->owner == stub_file->the_bfd)
190 if (bfd_get_section_by_name (i->owner, ".init") != NULL
191 || bfd_get_section_by_name (i->owner, ".fini") != NULL)
193 if (ini != NULL && *ini != s)
195 move_input_section (list, u, ini);
197 small = &s->header.next;
198 ini = &s->header.next;
202 small = &s->header.next;
203 ini = &s->header.next;
206 else if (ini == NULL)
209 if (ppc64_elf_has_small_toc_reloc (i))
211 if (small != NULL && *small != s)
213 move_input_section (list, u, small);
214 small = &s->header.next;
217 small = &s->header.next;
219 else if (small == NULL)
231 prelim_size_sections (void)
233 if (expld.phase != lang_mark_phase_enum)
235 expld.phase = lang_mark_phase_enum;
236 expld.dataseg.phase = exp_dataseg_none;
237 one_lang_size_sections_pass (NULL, FALSE);
238 /* We must not cache anything from the preliminary sizing. */
239 lang_reset_memory_regions ();
244 ppc_before_allocation (void)
246 if (stub_file != NULL)
249 && !ppc64_elf_edit_opd (&link_info))
250 einfo ("%X%P: can not edit %s: %E\n", "opd");
252 if (ppc64_elf_tls_setup (&link_info)
255 /* Size the sections. This is premature, but we want to know the
256 TLS segment layout so that certain optimizations can be done. */
257 prelim_size_sections ();
259 if (!ppc64_elf_tls_optimize (&link_info))
260 einfo ("%X%P: TLS problem %E\n");
264 && !link_info.relocatable)
266 prelim_size_sections ();
268 if (!ppc64_elf_edit_toc (&link_info))
269 einfo ("%X%P: can not edit %s: %E\n", "toc");
274 lang_output_section_statement_type *toc_os;
276 toc_os = lang_output_section_find (".got");
278 sort_toc_sections (&toc_os->children, NULL, NULL);
282 gld${EMULATION_NAME}_before_allocation ();
285 struct hook_stub_info
287 lang_statement_list_type add;
288 asection *input_section;
291 /* Traverse the linker tree to find the spot where the stub goes. */
294 hook_in_stub (struct hook_stub_info *info, lang_statement_union_type **lp)
296 lang_statement_union_type *l;
299 for (; (l = *lp) != NULL; lp = &l->header.next)
301 switch (l->header.type)
303 case lang_constructors_statement_enum:
304 ret = hook_in_stub (info, &constructor_list.head);
309 case lang_output_section_statement_enum:
310 ret = hook_in_stub (info,
311 &l->output_section_statement.children.head);
316 case lang_wild_statement_enum:
317 ret = hook_in_stub (info, &l->wild_statement.children.head);
322 case lang_group_statement_enum:
323 ret = hook_in_stub (info, &l->group_statement.children.head);
328 case lang_input_section_enum:
329 if (l->input_section.section == info->input_section)
331 /* We've found our section. Insert the stub immediately
332 before its associated input section. */
333 *lp = info->add.head;
334 *(info->add.tail) = l;
339 case lang_data_statement_enum:
340 case lang_reloc_statement_enum:
341 case lang_object_symbols_statement_enum:
342 case lang_output_statement_enum:
343 case lang_target_statement_enum:
344 case lang_input_statement_enum:
345 case lang_assignment_statement_enum:
346 case lang_padding_statement_enum:
347 case lang_address_statement_enum:
348 case lang_fill_statement_enum:
360 /* Call-back for ppc64_elf_size_stubs. */
362 /* Create a new stub section, and arrange for it to be linked
363 immediately before INPUT_SECTION. */
366 ppc_add_stub_section (const char *stub_sec_name, asection *input_section)
370 asection *output_section;
371 lang_output_section_statement_type *os;
372 struct hook_stub_info info;
374 flags = (SEC_ALLOC | SEC_LOAD | SEC_READONLY | SEC_CODE
375 | SEC_HAS_CONTENTS | SEC_IN_MEMORY | SEC_KEEP);
376 stub_sec = bfd_make_section_anyway_with_flags (stub_file->the_bfd,
377 stub_sec_name, flags);
379 || !bfd_set_section_alignment (stub_file->the_bfd, stub_sec,
380 plt_stub_align > 5 ? plt_stub_align : 5))
383 output_section = input_section->output_section;
384 os = lang_output_section_get (output_section);
386 info.input_section = input_section;
387 lang_list_init (&info.add);
388 lang_add_section (&info.add, stub_sec, NULL, os);
390 if (info.add.head == NULL)
393 if (hook_in_stub (&info, &os->children.head))
397 einfo ("%X%P: can not make stub section: %E\n");
402 /* Another call-back for ppc64_elf_size_stubs. */
405 ppc_layout_sections_again (void)
407 /* If we have changed sizes of the stub sections, then we need
408 to recalculate all the section offsets. This may mean we need to
409 add even more stubs. */
410 gld${EMULATION_NAME}_map_segments (TRUE);
412 if (!link_info.relocatable)
413 ppc64_elf_set_toc (&link_info, link_info.output_bfd);
415 need_laying_out = -1;
420 build_toc_list (lang_statement_union_type *statement)
422 if (statement->header.type == lang_input_section_enum)
424 asection *i = statement->input_section.section;
426 if (i->sec_info_type != SEC_INFO_TYPE_JUST_SYMS
427 && (i->flags & SEC_EXCLUDE) == 0
428 && i->output_section == toc_section)
430 if (!ppc64_elf_next_toc_section (&link_info, i))
431 einfo ("%X%P: linker script separates .got and .toc\n");
438 build_section_lists (lang_statement_union_type *statement)
440 if (statement->header.type == lang_input_section_enum)
442 asection *i = statement->input_section.section;
444 if (!((lang_input_statement_type *) i->owner->usrdata)->flags.just_syms
445 && (i->flags & SEC_EXCLUDE) == 0
446 && i->output_section != NULL
447 && i->output_section->owner == link_info.output_bfd)
449 if (!ppc64_elf_next_input_section (&link_info, i))
450 einfo ("%X%P: can not size stub section: %E\n");
456 /* Call the back-end function to set TOC base after we have placed all
459 gld${EMULATION_NAME}_after_allocation (void)
463 /* bfd_elf_discard_info just plays with data and debugging sections,
464 ie. doesn't affect code size, so we can delay resizing the
465 sections. It's likely we'll resize everything in the process of
467 ret = bfd_elf_discard_info (link_info.output_bfd, &link_info);
470 einfo ("%X%P: .eh_frame/.stab edit: %E\n");
476 /* If generating a relocatable output file, then we don't have any
478 if (stub_file != NULL && !link_info.relocatable)
480 ret = ppc64_elf_setup_section_lists (&link_info);
482 einfo ("%X%P: can not size stub section: %E\n");
485 ppc64_elf_start_multitoc_partition (&link_info);
487 if (!params.no_multi_toc)
489 toc_section = bfd_get_section_by_name (link_info.output_bfd,
491 if (toc_section != NULL)
492 lang_for_each_statement (build_toc_list);
495 if (ppc64_elf_layout_multitoc (&link_info)
496 && !params.no_multi_toc
497 && toc_section != NULL)
498 lang_for_each_statement (build_toc_list);
500 ppc64_elf_finish_multitoc_partition (&link_info);
502 lang_for_each_statement (build_section_lists);
504 if (!ppc64_elf_check_init_fini (&link_info))
505 einfo ("%P: .init/.fini fragments use differing TOC pointers\n");
507 /* Call into the BFD backend to do the real work. */
508 if (!ppc64_elf_size_stubs (&link_info))
509 einfo ("%X%P: can not size stub section: %E\n");
513 if (need_laying_out != -1)
515 gld${EMULATION_NAME}_map_segments (need_laying_out);
517 if (!link_info.relocatable)
518 ppc64_elf_set_toc (&link_info, link_info.output_bfd);
523 /* Final emulation specific call. */
526 gld${EMULATION_NAME}_finish (void)
529 char *line, *endline;
531 /* e_entry on PowerPC64 points to the function descriptor for
532 _start. If _start is missing, default to the first function
533 descriptor in the .opd section. */
534 if ((elf_elfheader (link_info.output_bfd)->e_flags & EF_PPC64_ABI) == 1)
535 entry_section = ".opd";
537 if (params.emit_stub_syms < 0)
538 params.emit_stub_syms = 1;
539 if (stub_file != NULL
540 && !link_info.relocatable
541 && !ppc64_elf_build_stubs (&link_info, config.stats ? &msg : NULL))
542 einfo ("%X%P: can not build stubs: %E\n");
545 for (line = msg; line != NULL; line = endline)
547 endline = strchr (line, '\n');
550 fprintf (stderr, "%s: %s\n", program_name, line);
556 ppc64_elf_restore_symbols (&link_info);
561 /* Add a pattern matching ".foo" for every "foo" in a version script.
563 The reason for doing this is that many shared library version
564 scripts export a selected set of functions or data symbols, forcing
569 . this; that; some; thing;
574 To make the above work for PowerPC64, we need to export ".this",
575 ".that" and so on, otherwise only the function descriptor syms are
576 exported. Lack of an exported function code sym may cause a
577 definition to be pulled in from a static library. */
579 static struct bfd_elf_version_expr *
580 gld${EMULATION_NAME}_new_vers_pattern (struct bfd_elf_version_expr *entry)
582 struct bfd_elf_version_expr *dot_entry;
587 || entry->pattern[0] == '.'
588 || (!entry->literal && entry->pattern[0] == '*'))
591 dot_entry = xmalloc (sizeof *dot_entry);
593 dot_entry->next = entry;
594 len = strlen (entry->pattern) + 2;
595 dot_pat = xmalloc (len);
597 memcpy (dot_pat + 1, entry->pattern, len - 1);
598 dot_entry->pattern = dot_pat;
599 dot_entry->script = 1;
604 /* Avoid processing the fake stub_file in vercheck, stat_needed and
605 check_needed routines. */
607 static void (*real_func) (lang_input_statement_type *);
609 static void ppc_for_each_input_file_wrapper (lang_input_statement_type *l)
616 ppc_lang_for_each_input_file (void (*func) (lang_input_statement_type *))
619 lang_for_each_input_file (&ppc_for_each_input_file_wrapper);
622 #define lang_for_each_input_file ppc_lang_for_each_input_file
626 if grep -q 'ld_elf32_spu_emulation' ldemul-list.h; then
628 /* Special handling for embedded SPU executables. */
629 extern bfd_boolean embedded_spu_file (lang_input_statement_type *, const char *);
630 static bfd_boolean gld${EMULATION_NAME}_load_symbols (lang_input_statement_type *);
633 ppc64_recognized_file (lang_input_statement_type *entry)
635 if (embedded_spu_file (entry, "-m64"))
638 return gld${EMULATION_NAME}_load_symbols (entry);
641 LDEMUL_RECOGNIZED_FILE=ppc64_recognized_file
644 # Define some shell vars to insert bits of code into the standard elf
645 # parse_args and list_options functions.
647 PARSE_AND_LIST_PROLOGUE=${PARSE_AND_LIST_PROLOGUE}'
648 #define OPTION_STUBGROUP_SIZE 321
649 #define OPTION_PLT_STATIC_CHAIN (OPTION_STUBGROUP_SIZE + 1)
650 #define OPTION_NO_PLT_STATIC_CHAIN (OPTION_PLT_STATIC_CHAIN + 1)
651 #define OPTION_PLT_THREAD_SAFE (OPTION_NO_PLT_STATIC_CHAIN + 1)
652 #define OPTION_NO_PLT_THREAD_SAFE (OPTION_PLT_THREAD_SAFE + 1)
653 #define OPTION_PLT_ALIGN (OPTION_NO_PLT_THREAD_SAFE + 1)
654 #define OPTION_NO_PLT_ALIGN (OPTION_PLT_ALIGN + 1)
655 #define OPTION_STUBSYMS (OPTION_NO_PLT_ALIGN + 1)
656 #define OPTION_NO_STUBSYMS (OPTION_STUBSYMS + 1)
657 #define OPTION_SAVRES (OPTION_NO_STUBSYMS + 1)
658 #define OPTION_NO_SAVRES (OPTION_SAVRES + 1)
659 #define OPTION_DOTSYMS (OPTION_NO_SAVRES + 1)
660 #define OPTION_NO_DOTSYMS (OPTION_DOTSYMS + 1)
661 #define OPTION_NO_TLS_OPT (OPTION_NO_DOTSYMS + 1)
662 #define OPTION_NO_TLS_GET_ADDR_OPT (OPTION_NO_TLS_OPT + 1)
663 #define OPTION_NO_OPD_OPT (OPTION_NO_TLS_GET_ADDR_OPT + 1)
664 #define OPTION_NO_TOC_OPT (OPTION_NO_OPD_OPT + 1)
665 #define OPTION_NO_MULTI_TOC (OPTION_NO_TOC_OPT + 1)
666 #define OPTION_NO_TOC_SORT (OPTION_NO_MULTI_TOC + 1)
667 #define OPTION_NON_OVERLAPPING_OPD (OPTION_NO_TOC_SORT + 1)
670 PARSE_AND_LIST_LONGOPTS=${PARSE_AND_LIST_LONGOPTS}'
671 { "stub-group-size", required_argument, NULL, OPTION_STUBGROUP_SIZE },
672 { "plt-static-chain", no_argument, NULL, OPTION_PLT_STATIC_CHAIN },
673 { "no-plt-static-chain", no_argument, NULL, OPTION_NO_PLT_STATIC_CHAIN },
674 { "plt-thread-safe", no_argument, NULL, OPTION_PLT_THREAD_SAFE },
675 { "no-plt-thread-safe", no_argument, NULL, OPTION_NO_PLT_THREAD_SAFE },
676 { "plt-align", optional_argument, NULL, OPTION_PLT_ALIGN },
677 { "no-plt-align", no_argument, NULL, OPTION_NO_PLT_ALIGN },
678 { "emit-stub-syms", no_argument, NULL, OPTION_STUBSYMS },
679 { "no-emit-stub-syms", no_argument, NULL, OPTION_NO_STUBSYMS },
680 { "dotsyms", no_argument, NULL, OPTION_DOTSYMS },
681 { "no-dotsyms", no_argument, NULL, OPTION_NO_DOTSYMS },
682 { "save-restore-funcs", no_argument, NULL, OPTION_SAVRES },
683 { "no-save-restore-funcs", no_argument, NULL, OPTION_NO_SAVRES },
684 { "no-tls-optimize", no_argument, NULL, OPTION_NO_TLS_OPT },
685 { "no-tls-get-addr-optimize", no_argument, NULL, OPTION_NO_TLS_GET_ADDR_OPT },
686 { "no-opd-optimize", no_argument, NULL, OPTION_NO_OPD_OPT },
687 { "no-toc-optimize", no_argument, NULL, OPTION_NO_TOC_OPT },
688 { "no-multi-toc", no_argument, NULL, OPTION_NO_MULTI_TOC },
689 { "no-toc-sort", no_argument, NULL, OPTION_NO_TOC_SORT },
690 { "non-overlapping-opd", no_argument, NULL, OPTION_NON_OVERLAPPING_OPD },
693 PARSE_AND_LIST_OPTIONS=${PARSE_AND_LIST_OPTIONS}'
695 --stub-group-size=N Maximum size of a group of input sections that\n\
696 can be handled by one stub section. A negative\n\
697 value locates all stubs before their branches\n\
698 (with a group size of -N), while a positive\n\
699 value allows two groups of input sections, one\n\
700 before, and one after each stub section.\n\
701 Values of +/-1 indicate the linker should\n\
702 choose suitable defaults.\n"
705 --plt-static-chain PLT call stubs should load r11.${DEFAULT_PLT_STATIC_CHAIN- (default)}\n"
708 --no-plt-static-chain PLT call stubs should not load r11.${DEFAULT_PLT_STATIC_CHAIN+ (default)}\n"
711 --plt-thread-safe PLT call stubs with load-load barrier.\n"
714 --no-plt-thread-safe PLT call stubs without barrier.\n"
717 --plt-align [=<align>] Align PLT call stubs to fit cache lines.\n"
720 --no-plt-align Dont'\''t align individual PLT call stubs.\n"
723 --emit-stub-syms Label linker stubs with a symbol.\n"
726 --no-emit-stub-syms Don'\''t label linker stubs with a symbol.\n"
729 --dotsyms For every version pattern \"foo\" in a version\n\
730 script, add \".foo\" so that function code\n\
731 symbols are treated the same as function\n\
732 descriptor symbols. Defaults to on.\n"
735 --no-dotsyms Don'\''t do anything special in version scripts.\n"
738 --save-restore-funcs Provide register save and restore routines used\n\
739 by gcc -Os code. Defaults to on for normal\n\
740 final link, off for ld -r.\n"
743 --no-save-restore-funcs Don'\''t provide these routines.\n"
746 --no-tls-optimize Don'\''t try to optimize TLS accesses.\n"
749 --no-tls-get-addr-optimize Don'\''t use a special __tls_get_addr call.\n"
752 --no-opd-optimize Don'\''t optimize the OPD section.\n"
755 --no-toc-optimize Don'\''t optimize the TOC section.\n"
758 --no-multi-toc Disallow automatic multiple toc sections.\n"
761 --no-toc-sort Don'\''t sort TOC and GOT sections.\n"
764 --non-overlapping-opd Canonicalize .opd, so that there are no\n\
765 overlapping .opd entries.\n"
769 PARSE_AND_LIST_ARGS_CASES=${PARSE_AND_LIST_ARGS_CASES}'
770 case OPTION_STUBGROUP_SIZE:
773 params.group_size = bfd_scan_vma (optarg, &end, 0);
775 einfo (_("%P%F: invalid number `%s'\''\n"), optarg);
779 case OPTION_PLT_STATIC_CHAIN:
780 params.plt_static_chain = 1;
783 case OPTION_NO_PLT_STATIC_CHAIN:
784 params.plt_static_chain = 0;
787 case OPTION_PLT_THREAD_SAFE:
788 params.plt_thread_safe = 1;
791 case OPTION_NO_PLT_THREAD_SAFE:
792 params.plt_thread_safe = 0;
795 case OPTION_PLT_ALIGN:
799 unsigned long val = strtoul (optarg, &end, 0);
801 einfo (_("%P%F: invalid --plt-align `%s'\''\n"), optarg);
802 plt_stub_align = val;
808 case OPTION_NO_PLT_ALIGN:
812 case OPTION_STUBSYMS:
813 params.emit_stub_syms = 1;
816 case OPTION_NO_STUBSYMS:
817 params.emit_stub_syms = 0;
824 case OPTION_NO_DOTSYMS:
829 params.save_restore_funcs = 1;
832 case OPTION_NO_SAVRES:
833 params.save_restore_funcs = 0;
836 case OPTION_NO_TLS_OPT:
840 case OPTION_NO_TLS_GET_ADDR_OPT:
841 params.no_tls_get_addr_opt = 1;
844 case OPTION_NO_OPD_OPT:
848 case OPTION_NO_TOC_OPT:
852 case OPTION_NO_MULTI_TOC:
853 params.no_multi_toc = 1;
856 case OPTION_NO_TOC_SORT:
860 case OPTION_NON_OVERLAPPING_OPD:
861 params.non_overlapping_opd = 1;
864 case OPTION_TRADITIONAL_FORMAT:
866 params.no_tls_get_addr_opt = 1;
869 params.no_multi_toc = 1;
871 params.plt_static_chain = 1;
875 # Put these extra ppc64elf routines in ld_${EMULATION_NAME}_emulation
877 LDEMUL_BEFORE_ALLOCATION=ppc_before_allocation
878 LDEMUL_AFTER_ALLOCATION=gld${EMULATION_NAME}_after_allocation
879 LDEMUL_FINISH=gld${EMULATION_NAME}_finish
880 LDEMUL_CREATE_OUTPUT_SECTION_STATEMENTS=ppc_create_output_section_statements
881 LDEMUL_NEW_VERS_PATTERN=gld${EMULATION_NAME}_new_vers_pattern