ld/emultempl/armelf.em

   1 # This shell script emits a C file. -*- C -*-
   2 #   Copyright 1991, 1993, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003,
   3 #   2004, 2005, 2007, 2008
   4 #   Free Software Foundation, Inc.
   5 #
   6 # This file is part of the GNU Binutils.
   7 #
   8 # This program is free software; you can redistribute it and/or modify
   9 # it under the terms of the GNU General Public License as published by
  10 # the Free Software Foundation; either version 3 of the License, or
  11 # (at your option) any later version.
  12 #
  13 # This program is distributed in the hope that it will be useful,
  14 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  15 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16 # GNU General Public License for more details.
  17 #
  18 # You should have received a copy of the GNU General Public License
  19 # along with this program; if not, write to the Free Software
  20 # Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
  21 # MA 02110-1301, USA.
  22 #
  23
  24 # This file is sourced from elf32.em, and defines extra arm-elf
  25 # specific routines.
  26 #
  27 test -z "$TARGET2_TYPE" && TARGET2_TYPE="rel"
  28 fragment <<EOF
  29
  30 #include "ldctor.h"
  31 #include "elf/arm.h"
  32
  33 static char *thumb_entry_symbol = NULL;
  34 static int byteswap_code = 0;
  35 static int target1_is_rel = 0${TARGET1_IS_REL};
  36 static char *target2_type = "${TARGET2_TYPE}";
  37 static int fix_v4bx = 0;
  38 static int use_blx = 0;
  39 static bfd_arm_vfp11_fix vfp11_denorm_fix = BFD_ARM_VFP11_FIX_DEFAULT;
  40 static int fix_cortex_a8 = -1;
  41 static int no_enum_size_warning = 0;
  42 static int no_wchar_size_warning = 0;
  43 static int pic_veneer = 0;
  44
  45 static void
  46 gld${EMULATION_NAME}_before_parse (void)
  47 {
  48 #ifndef TARGET_                 /* I.e., if not generic.  */
  49   ldfile_set_output_arch ("`echo ${ARCH}`", bfd_arch_unknown);
  50 #endif /* not TARGET_ */
  51   config.dynamic_link = ${DYNAMIC_LINK-TRUE};
  52   config.has_shared = `if test -n "$GENERATE_SHLIB_SCRIPT" ; then echo TRUE ; else echo FALSE ; fi`;
  53 }
  54
  55 static void
  56 arm_elf_before_allocation (void)
  57 {
  58   bfd_elf32_arm_set_byteswap_code (&link_info, byteswap_code);
  59
  60   /* Choose type of VFP11 erratum fix, or warn if specified fix is unnecessary
  61      due to architecture version.  */
  62   bfd_elf32_arm_set_vfp11_fix (link_info.output_bfd, &link_info);
  63
  64   /* Auto-select Cortex-A8 erratum fix if it wasn't explicitly specified.  */
  65   bfd_elf32_arm_set_cortex_a8_fix (link_info.output_bfd, &link_info);
  66
  67   /* We should be able to set the size of the interworking stub section.  We
  68      can't do it until later if we have dynamic sections, though.  */
  69   if (! elf_hash_table (&link_info)->dynamic_sections_created)
  70     {
  71       /* Here we rummage through the found bfds to collect glue information.  */
  72       LANG_FOR_EACH_INPUT_STATEMENT (is)
  73         {
  74           /* Initialise mapping tables for code/data.  */
  75           bfd_elf32_arm_init_maps (is->the_bfd);
  76
  77           if (!bfd_elf32_arm_process_before_allocation (is->the_bfd,
  78                                                         &link_info)
  79               || !bfd_elf32_arm_vfp11_erratum_scan (is->the_bfd, &link_info))
  80             /* xgettext:c-format */
  81             einfo (_("Errors encountered processing file %s"), is->filename);
  82         }
  83
  84       /* We have seen it all.  Allocate it, and carry on.  */
  85       bfd_elf32_arm_allocate_interworking_sections (& link_info);
  86     }
  87
  88   /* Call the standard elf routine.  */
  89   gld${EMULATION_NAME}_before_allocation ();
  90 }
  91
  92 static void
  93 arm_elf_after_allocation (void)
  94 {
  95   /* Call the standard elf routine.  */
  96   after_allocation_default ();
  97
  98   {
  99     LANG_FOR_EACH_INPUT_STATEMENT (is)
 100       {
 101         /* Figure out where VFP11 erratum veneers (and the labels returning
 102            from same) have been placed.  */
 103         bfd_elf32_arm_vfp11_fix_veneer_locations (is->the_bfd, &link_info);
 104       }
 105   }
 106 }
 107
 108 /* Fake input file for stubs.  */
 109 static lang_input_statement_type *stub_file;
 110
 111 /* Whether we need to call gldarm_layout_sections_again.  */
 112 static int need_laying_out = 0;
 113
 114 /* Maximum size of a group of input sections that can be handled by
 115    one stub section.  A value of +/-1 indicates the bfd back-end
 116    should use a suitable default size.  */
 117 static bfd_signed_vma group_size = 1;
 118
 119 struct hook_stub_info
 120 {
 121   lang_statement_list_type add;
 122   asection *input_section;
 123 };
 124
 125 /* Traverse the linker tree to find the spot where the stub goes.  */
 126
 127 static bfd_boolean
 128 hook_in_stub (struct hook_stub_info *info, lang_statement_union_type **lp)
 129 {
 130   lang_statement_union_type *l;
 131   bfd_boolean ret;
 132
 133   for (; (l = *lp) != NULL; lp = &l->header.next)
 134     {
 135       switch (l->header.type)
 136         {
 137         case lang_constructors_statement_enum:
 138           ret = hook_in_stub (info, &constructor_list.head);
 139           if (ret)
 140             return ret;
 141           break;
 142
 143         case lang_output_section_statement_enum:
 144           ret = hook_in_stub (info,
 145                               &l->output_section_statement.children.head);
 146           if (ret)
 147             return ret;
 148           break;
 149
 150         case lang_wild_statement_enum:
 151           ret = hook_in_stub (info, &l->wild_statement.children.head);
 152           if (ret)
 153             return ret;
 154           break;
 155
 156         case lang_group_statement_enum:
 157           ret = hook_in_stub (info, &l->group_statement.children.head);
 158           if (ret)
 159             return ret;
 160           break;
 161
 162         case lang_input_section_enum:
 163           if (l->input_section.section == info->input_section)
 164             {
 165               /* We've found our section.  Insert the stub immediately
 166                  after its associated input section.  */
 167               *(info->add.tail) = l->header.next;
 168               l->header.next = info->add.head;
 169               return TRUE;
 170             }
 171           break;
 172
 173         case lang_data_statement_enum:
 174         case lang_reloc_statement_enum:
 175         case lang_object_symbols_statement_enum:
 176         case lang_output_statement_enum:
 177         case lang_target_statement_enum:
 178         case lang_input_statement_enum:
 179         case lang_assignment_statement_enum:
 180         case lang_padding_statement_enum:
 181         case lang_address_statement_enum:
 182         case lang_fill_statement_enum:
 183           break;
 184
 185         default:
 186           FAIL ();
 187           break;
 188         }
 189     }
 190   return FALSE;
 191 }
 192
 193
 194 /* Call-back for elf32_arm_size_stubs.  */
 195
 196 /* Create a new stub section, and arrange for it to be linked
 197    immediately after INPUT_SECTION.  */
 198
 199 static asection *
 200 elf32_arm_add_stub_section (const char *stub_sec_name,
 201                             asection *input_section)
 202 {
 203   asection *stub_sec;
 204   flagword flags;
 205   asection *output_section;
 206   const char *secname;
 207   lang_output_section_statement_type *os;
 208   struct hook_stub_info info;
 209
 210   flags = (SEC_ALLOC | SEC_LOAD | SEC_READONLY | SEC_CODE
 211            | SEC_HAS_CONTENTS | SEC_RELOC | SEC_IN_MEMORY | SEC_KEEP);
 212   stub_sec = bfd_make_section_anyway_with_flags (stub_file->the_bfd,
 213                                                  stub_sec_name, flags);
 214   if (stub_sec == NULL)
 215     goto err_ret;
 216
 217   bfd_set_section_alignment (stub_file->the_bfd, stub_sec, 3);
 218
 219   output_section = input_section->output_section;
 220   secname = bfd_get_section_name (output_section->owner, output_section);
 221   os = lang_output_section_find (secname);
 222
 223   info.input_section = input_section;
 224   lang_list_init (&info.add);
 225   lang_add_section (&info.add, stub_sec, os);
 226
 227   if (info.add.head == NULL)
 228     goto err_ret;
 229
 230   if (hook_in_stub (&info, &os->children.head))
 231     return stub_sec;
 232
 233  err_ret:
 234   einfo ("%X%P: can not make stub section: %E\n");
 235   return NULL;
 236 }
 237
 238 /* Another call-back for elf_arm_size_stubs.  */
 239
 240 static void
 241 gldarm_layout_sections_again (void)
 242 {
 243   /* If we have changed sizes of the stub sections, then we need
 244      to recalculate all the section offsets.  This may mean we need to
 245      add even more stubs.  */
 246   gld${EMULATION_NAME}_map_segments (TRUE);
 247   need_laying_out = -1;
 248 }
 249
 250 static void
 251 build_section_lists (lang_statement_union_type *statement)
 252 {
 253   if (statement->header.type == lang_input_section_enum)
 254     {
 255       asection *i = statement->input_section.section;
 256
 257       if (!((lang_input_statement_type *) i->owner->usrdata)->just_syms_flag
 258           && (i->flags & SEC_EXCLUDE) == 0
 259           && i->output_section != NULL
 260           && i->output_section->owner == link_info.output_bfd)
 261         elf32_arm_next_input_section (& link_info, i);
 262     }
 263 }
 264
 265 static int
 266 compare_output_sec_vma (const void *a, const void *b)
 267 {
 268   asection *asec = *(asection **) a, *bsec = *(asection **) b;
 269   asection *aout = asec->output_section, *bout = bsec->output_section;
 270   bfd_vma avma, bvma;
 271
 272   /* If there's no output section for some reason, compare equal.  */
 273   if (!aout || !bout)
 274     return 0;
 275
 276   avma = aout->vma + asec->output_offset;
 277   bvma = bout->vma + bsec->output_offset;
 278
 279   if (avma > bvma)
 280     return 1;
 281   else if (avma < bvma)
 282     return -1;
 283
 284   return 0;
 285 }
 286
 287 static void
 288 gld${EMULATION_NAME}_finish (void)
 289 {
 290   struct bfd_link_hash_entry * h;
 291   unsigned int list_size = 10;
 292   asection **sec_list = xmalloc (list_size * sizeof (asection *));
 293   unsigned int sec_count = 0;
 294
 295   if (!link_info.relocatable)
 296     {
 297       /* Build a sorted list of input text sections, then use that to process
 298          the unwind table index.  */
 299       LANG_FOR_EACH_INPUT_STATEMENT (is)
 300         {
 301           bfd *abfd = is->the_bfd;
 302           asection *sec;
 303
 304           if ((abfd->flags & (EXEC_P | DYNAMIC)) != 0)
 305             continue;
 306
 307           for (sec = abfd->sections; sec != NULL; sec = sec->next)
 308             {
 309               asection *out_sec = sec->output_section;
 310
 311               if (out_sec
 312                   && elf_section_type (sec) == SHT_PROGBITS
 313                   && (elf_section_flags (sec) & SHF_EXECINSTR) != 0
 314                   && (sec->flags & SEC_EXCLUDE) == 0
 315                   && sec->sec_info_type != ELF_INFO_TYPE_JUST_SYMS
 316                   && out_sec != bfd_abs_section_ptr)
 317                 {
 318                   if (sec_count == list_size)
 319                     {
 320                       list_size *= 2;
 321                       sec_list = xrealloc (sec_list,
 322                                            list_size * sizeof (asection *));
 323                     }
 324
 325                   sec_list[sec_count++] = sec;
 326                 }
 327             }
 328         }
 329
 330       qsort (sec_list, sec_count, sizeof (asection *), &compare_output_sec_vma);
 331
 332       if (elf32_arm_fix_exidx_coverage (sec_list, sec_count, &link_info))
 333         need_laying_out = 1;
 334
 335       free (sec_list);
 336     }
 337
 338   /* bfd_elf32_discard_info just plays with debugging sections,
 339      ie. doesn't affect any code, so we can delay resizing the
 340      sections.  It's likely we'll resize everything in the process of
 341      adding stubs.  */
 342   if (bfd_elf_discard_info (link_info.output_bfd, & link_info))
 343     need_laying_out = 1;
 344
 345   /* If generating a relocatable output file, then we don't
 346      have to examine the relocs.  */
 347   if (stub_file != NULL && !link_info.relocatable)
 348     {
 349       int  ret = elf32_arm_setup_section_lists (link_info.output_bfd, & link_info);
 350
 351       if (ret != 0)
 352         {
 353           if (ret < 0)
 354             {
 355               einfo ("%X%P: could not compute sections lists for stub generation: %E\n");
 356               return;
 357             }
 358
 359           lang_for_each_statement (build_section_lists);
 360
 361           /* Call into the BFD backend to do the real work.  */
 362           if (! elf32_arm_size_stubs (link_info.output_bfd,
 363                                       stub_file->the_bfd,
 364                                       & link_info,
 365                                       group_size,
 366                                       & elf32_arm_add_stub_section,
 367                                       & gldarm_layout_sections_again))
 368             {
 369               einfo ("%X%P: cannot size stub section: %E\n");
 370               return;
 371             }
 372         }
 373     }
 374
 375   if (need_laying_out != -1)
 376     gld${EMULATION_NAME}_map_segments (need_laying_out);
 377
 378   if (! link_info.relocatable)
 379     {
 380       /* Now build the linker stubs.  */
 381       if (stub_file->the_bfd->sections != NULL)
 382         {
 383           if (! elf32_arm_build_stubs (& link_info))
 384             einfo ("%X%P: can not build stubs: %E\n");
 385         }
 386     }
 387
 388   finish_default ();
 389
 390   if (thumb_entry_symbol)
 391     {
 392       h = bfd_link_hash_lookup (link_info.hash, thumb_entry_symbol,
 393                                 FALSE, FALSE, TRUE);
 394     }
 395   else
 396     {
 397       struct elf_link_hash_entry * eh;
 398
 399       if (!entry_symbol.name)
 400         return;
 401
 402       h = bfd_link_hash_lookup (link_info.hash, entry_symbol.name,
 403                                 FALSE, FALSE, TRUE);
 404       eh = (struct elf_link_hash_entry *)h;
 405       if (!h || ELF_ST_TYPE(eh->type) != STT_ARM_TFUNC)
 406         return;
 407     }
 408
 409
 410   if (h != (struct bfd_link_hash_entry *) NULL
 411       && (h->type == bfd_link_hash_defined
 412           || h->type == bfd_link_hash_defweak)
 413       && h->u.def.section->output_section != NULL)
 414     {
 415       static char buffer[32];
 416       bfd_vma val;
 417
 418       /* Special procesing is required for a Thumb entry symbol.  The
 419          bottom bit of its address must be set.  */
 420       val = (h->u.def.value
 421              + bfd_get_section_vma (link_info.output_bfd,
 422                                     h->u.def.section->output_section)
 423              + h->u.def.section->output_offset);
 424
 425       val |= 1;
 426
 427       /* Now convert this value into a string and store it in entry_symbol
 428          where the lang_finish() function will pick it up.  */
 429       buffer[0] = '0';
 430       buffer[1] = 'x';
 431
 432       sprintf_vma (buffer + 2, val);
 433
 434       if (thumb_entry_symbol != NULL && entry_symbol.name != NULL
 435           && entry_from_cmdline)
 436         einfo (_("%P: warning: '--thumb-entry %s' is overriding '-e %s'\n"),
 437                thumb_entry_symbol, entry_symbol.name);
 438       entry_symbol.name = buffer;
 439     }
 440   else
 441     einfo (_("%P: warning: cannot find thumb start symbol %s\n"),
 442            thumb_entry_symbol);
 443 }
 444
 445 /* This is a convenient point to tell BFD about target specific flags.
 446    After the output has been created, but before inputs are read.  */
 447 static void
 448 arm_elf_create_output_section_statements (void)
 449 {
 450   if (strstr (bfd_get_target (link_info.output_bfd), "arm") == NULL)
 451     {
 452       /* The arm backend needs special fields in the output hash structure.
 453          These will only be created if the output format is an arm format,
 454          hence we do not support linking and changing output formats at the
 455          same time.  Use a link followed by objcopy to change output formats.  */
 456       einfo ("%F%X%P: error: Cannot change output format whilst linking ARM binaries.\n");
 457       return;
 458     }
 459
 460   bfd_elf32_arm_set_target_relocs (link_info.output_bfd, &link_info,
 461                                    target1_is_rel,
 462                                    target2_type, fix_v4bx, use_blx,
 463                                    vfp11_denorm_fix, no_enum_size_warning,
 464                                    no_wchar_size_warning,
 465                                    pic_veneer, fix_cortex_a8);
 466
 467   stub_file = lang_add_input_file ("linker stubs",
 468                                    lang_input_file_is_fake_enum,
 469                                    NULL);
 470   stub_file->the_bfd = bfd_create ("linker stubs", link_info.output_bfd);
 471   if (stub_file->the_bfd == NULL
 472       || ! bfd_set_arch_mach (stub_file->the_bfd,
 473                               bfd_get_arch (link_info.output_bfd),
 474                               bfd_get_mach (link_info.output_bfd)))
 475     {
 476       einfo ("%X%P: can not create BFD %E\n");
 477       return;
 478     }
 479
 480   stub_file->the_bfd->flags |= BFD_LINKER_CREATED;
 481   ldlang_add_file (stub_file);
 482
 483   /* Also use the stub file for stubs placed in a single output section.  */
 484   bfd_elf32_arm_add_glue_sections_to_bfd (stub_file->the_bfd, &link_info);
 485   bfd_elf32_arm_get_bfd_for_interworking (stub_file->the_bfd, &link_info);
 486 }
 487
 488 /* Avoid processing the fake stub_file in vercheck, stat_needed and
 489    check_needed routines.  */
 490
 491 static void (*real_func) (lang_input_statement_type *);
 492
 493 static void arm_for_each_input_file_wrapper (lang_input_statement_type *l)
 494 {
 495   if (l != stub_file)
 496     (*real_func) (l);
 497 }
 498
 499 static void
 500 arm_lang_for_each_input_file (void (*func) (lang_input_statement_type *))
 501 {
 502   real_func = func;
 503   lang_for_each_input_file (&arm_for_each_input_file_wrapper);
 504 }
 505
 506 #define lang_for_each_input_file arm_lang_for_each_input_file
 507
 508 EOF
 509
 510 # Define some shell vars to insert bits of code into the standard elf
 511 # parse_args and list_options functions.
 512 #
 513 PARSE_AND_LIST_PROLOGUE='
 514 #define OPTION_THUMB_ENTRY              301
 515 #define OPTION_BE8                      302
 516 #define OPTION_TARGET1_REL              303
 517 #define OPTION_TARGET1_ABS              304
 518 #define OPTION_TARGET2                  305
 519 #define OPTION_FIX_V4BX                 306
 520 #define OPTION_USE_BLX                  307
 521 #define OPTION_VFP11_DENORM_FIX         308
 522 #define OPTION_NO_ENUM_SIZE_WARNING     309
 523 #define OPTION_PIC_VENEER               310
 524 #define OPTION_FIX_V4BX_INTERWORKING    311
 525 #define OPTION_STUBGROUP_SIZE           312
 526 #define OPTION_NO_WCHAR_SIZE_WARNING    313
 527 #define OPTION_FIX_CORTEX_A8            314
 528 #define OPTION_NO_FIX_CORTEX_A8         315
 529 '
 530
 531 PARSE_AND_LIST_SHORTOPTS=p
 532
 533 PARSE_AND_LIST_LONGOPTS='
 534   { "no-pipeline-knowledge", no_argument, NULL, '\'p\''},
 535   { "thumb-entry", required_argument, NULL, OPTION_THUMB_ENTRY},
 536   { "be8", no_argument, NULL, OPTION_BE8},
 537   { "target1-rel", no_argument, NULL, OPTION_TARGET1_REL},
 538   { "target1-abs", no_argument, NULL, OPTION_TARGET1_ABS},
 539   { "target2", required_argument, NULL, OPTION_TARGET2},
 540   { "fix-v4bx", no_argument, NULL, OPTION_FIX_V4BX},
 541   { "fix-v4bx-interworking", no_argument, NULL, OPTION_FIX_V4BX_INTERWORKING},
 542   { "use-blx", no_argument, NULL, OPTION_USE_BLX},
 543   { "vfp11-denorm-fix", required_argument, NULL, OPTION_VFP11_DENORM_FIX},
 544   { "no-enum-size-warning", no_argument, NULL, OPTION_NO_ENUM_SIZE_WARNING},
 545   { "pic-veneer", no_argument, NULL, OPTION_PIC_VENEER},
 546   { "stub-group-size", required_argument, NULL, OPTION_STUBGROUP_SIZE },
 547   { "no-wchar-size-warning", no_argument, NULL, OPTION_NO_WCHAR_SIZE_WARNING},
 548   { "fix-cortex-a8", no_argument, NULL, OPTION_FIX_CORTEX_A8 },
 549   { "no-fix-cortex-a8", no_argument, NULL, OPTION_NO_FIX_CORTEX_A8 },
 550 '
 551
 552 PARSE_AND_LIST_OPTIONS='
 553   fprintf (file, _("  --thumb-entry=<sym>         Set the entry point to be Thumb symbol <sym>\n"));
 554   fprintf (file, _("  --be8                       Output BE8 format image\n"));
 555   fprintf (file, _("  --target1=rel               Interpret R_ARM_TARGET1 as R_ARM_REL32\n"));
 556   fprintf (file, _("  --target1=abs               Interpret R_ARM_TARGET1 as R_ARM_ABS32\n"));
 557   fprintf (file, _("  --target2=<type>            Specify definition of R_ARM_TARGET2\n"));
 558   fprintf (file, _("  --fix-v4bx                  Rewrite BX rn as MOV pc, rn for ARMv4\n"));
 559   fprintf (file, _("  --fix-v4bx-interworking     Rewrite BX rn branch to ARMv4 interworking veneer\n"));
 560   fprintf (file, _("  --use-blx                   Enable use of BLX instructions\n"));
 561   fprintf (file, _("  --vfp11-denorm-fix          Specify how to fix VFP11 denorm erratum\n"));
 562   fprintf (file, _("  --no-enum-size-warning      Don'\''t warn about objects with incompatible\n"
 563                    "                                enum sizes\n"));
 564   fprintf (file, _("  --no-wchar-size-warning     Don'\''t warn about objects with incompatible"
 565                    "                                wchar_t sizes\n"));
 566   fprintf (file, _("  --pic-veneer                Always generate PIC interworking veneers\n"));
 567   fprintf (file, _("\
 568    --stub-group-size=N   Maximum size of a group of input sections that can be\n\
 569                            handled by one stub section.  A negative value\n\
 570                            locates all stubs after their branches (with a\n\
 571                            group size of -N), while a positive value allows\n\
 572                            two groups of input sections, one before, and one\n\
 573                            after each stub section.  Values of +/-1 indicate\n\
 574                            the linker should choose suitable defaults.\n"
 575                    ));
 576   fprintf (file, _("  --[no-]fix-cortex-a8        Disable/enable Cortex-A8 Thumb-2 branch erratum fix\n"));
 577 '
 578
 579 PARSE_AND_LIST_ARGS_CASES='
 580     case '\'p\'':
 581       /* Only here for backwards compatibility.  */
 582       break;
 583
 584     case OPTION_THUMB_ENTRY:
 585       thumb_entry_symbol = optarg;
 586       break;
 587
 588     case OPTION_BE8:
 589       byteswap_code = 1;
 590       break;
 591
 592     case OPTION_TARGET1_REL:
 593       target1_is_rel = 1;
 594       break;
 595
 596     case OPTION_TARGET1_ABS:
 597       target1_is_rel = 0;
 598       break;
 599
 600     case OPTION_TARGET2:
 601       target2_type = optarg;
 602       break;
 603
 604     case OPTION_FIX_V4BX:
 605       fix_v4bx = 1;
 606       break;
 607
 608     case OPTION_FIX_V4BX_INTERWORKING:
 609       fix_v4bx = 2;
 610       break;
 611
 612     case OPTION_USE_BLX:
 613       use_blx = 1;
 614       break;
 615
 616     case OPTION_VFP11_DENORM_FIX:
 617       if (strcmp (optarg, "none") == 0)
 618         vfp11_denorm_fix = BFD_ARM_VFP11_FIX_NONE;
 619       else if (strcmp (optarg, "scalar") == 0)
 620         vfp11_denorm_fix = BFD_ARM_VFP11_FIX_SCALAR;
 621       else if (strcmp (optarg, "vector") == 0)
 622         vfp11_denorm_fix = BFD_ARM_VFP11_FIX_VECTOR;
 623       else
 624         einfo (_("Unrecognized VFP11 fix type '\''%s'\''.\n"), optarg);
 625       break;
 626
 627     case OPTION_NO_ENUM_SIZE_WARNING:
 628       no_enum_size_warning = 1;
 629       break;
 630
 631     case OPTION_NO_WCHAR_SIZE_WARNING:
 632       no_wchar_size_warning = 1;
 633       break;
 634
 635     case OPTION_PIC_VENEER:
 636       pic_veneer = 1;
 637       break;
 638
 639     case OPTION_STUBGROUP_SIZE:
 640       {
 641         const char *end;
 642
 643         group_size = bfd_scan_vma (optarg, &end, 0);
 644         if (*end)
 645           einfo (_("%P%F: invalid number `%s'\''\n"), optarg);
 646       }
 647       break;
 648
 649     case OPTION_FIX_CORTEX_A8:
 650       fix_cortex_a8 = 1;
 651       break;
 652
 653     case OPTION_NO_FIX_CORTEX_A8:
 654       fix_cortex_a8 = 0;
 655       break;
 656 '
 657
 658 # We have our own before_allocation etc. functions, but they call
 659 # the standard routines, so give them a different name.
 660 LDEMUL_BEFORE_ALLOCATION=arm_elf_before_allocation
 661 LDEMUL_AFTER_ALLOCATION=arm_elf_after_allocation
 662 LDEMUL_CREATE_OUTPUT_SECTION_STATEMENTS=arm_elf_create_output_section_statements
 663
 664 # Replace the elf before_parse function with our own.
 665 LDEMUL_BEFORE_PARSE=gld"${EMULATION_NAME}"_before_parse
 666
 667 # Call the extra arm-elf function
 668 LDEMUL_FINISH=gld${EMULATION_NAME}_finish