bfd/pef.c

   1 /* PEF support for BFD.
   2    Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005
   3    Free Software Foundation, Inc.
   4
   5    This file is part of BFD, the Binary File Descriptor library.
   6
   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 2 of the License, or
  10    (at your option) any later version.
  11
  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.
  16
  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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
  20
  21 #include "safe-ctype.h"
  22
  23 #include "pef.h"
  24 #include "pef-traceback.h"
  25
  26 #include "bfd.h"
  27 #include "sysdep.h"
  28 #include "libbfd.h"
  29
  30 #include "libiberty.h"
  31
  32 #ifndef BFD_IO_FUNCS
  33 #define BFD_IO_FUNCS 0
  34 #endif
  35
  36 #define bfd_pef_close_and_cleanup                   _bfd_generic_close_and_cleanup
  37 #define bfd_pef_bfd_free_cached_info                _bfd_generic_bfd_free_cached_info
  38 #define bfd_pef_new_section_hook                    _bfd_generic_new_section_hook
  39 #define bfd_pef_bfd_is_local_label_name             bfd_generic_is_local_label_name
  40 #define bfd_pef_bfd_is_target_special_symbol ((bfd_boolean (*) (bfd *, asymbol *)) bfd_false)
  41 #define bfd_pef_get_lineno                          _bfd_nosymbols_get_lineno
  42 #define bfd_pef_find_nearest_line                   _bfd_nosymbols_find_nearest_line
  43 #define bfd_pef_bfd_make_debug_symbol               _bfd_nosymbols_bfd_make_debug_symbol
  44 #define bfd_pef_read_minisymbols                    _bfd_generic_read_minisymbols
  45 #define bfd_pef_minisymbol_to_symbol                _bfd_generic_minisymbol_to_symbol
  46 #define bfd_pef_get_reloc_upper_bound               _bfd_norelocs_get_reloc_upper_bound
  47 #define bfd_pef_canonicalize_reloc                  _bfd_norelocs_canonicalize_reloc
  48 #define bfd_pef_bfd_reloc_type_lookup               _bfd_norelocs_bfd_reloc_type_lookup
  49 #define bfd_pef_set_arch_mach                       _bfd_generic_set_arch_mach
  50 #define bfd_pef_get_section_contents                _bfd_generic_get_section_contents
  51 #define bfd_pef_set_section_contents                _bfd_generic_set_section_contents
  52 #define bfd_pef_bfd_get_relocated_section_contents  bfd_generic_get_relocated_section_contents
  53 #define bfd_pef_bfd_relax_section                   bfd_generic_relax_section
  54 #define bfd_pef_bfd_gc_sections                     bfd_generic_gc_sections
  55 #define bfd_pef_bfd_merge_sections                  bfd_generic_merge_sections
  56 #define bfd_pef_bfd_is_group_section                bfd_generic_is_group_section
  57 #define bfd_pef_bfd_discard_group                   bfd_generic_discard_group
  58 #define bfd_pef_section_already_linked      _bfd_generic_section_already_linked
  59 #define bfd_pef_bfd_link_hash_table_create          _bfd_generic_link_hash_table_create
  60 #define bfd_pef_bfd_link_hash_table_free            _bfd_generic_link_hash_table_free
  61 #define bfd_pef_bfd_link_add_symbols                _bfd_generic_link_add_symbols
  62 #define bfd_pef_bfd_link_just_syms                  _bfd_generic_link_just_syms
  63 #define bfd_pef_bfd_final_link                      _bfd_generic_final_link
  64 #define bfd_pef_bfd_link_split_section              _bfd_generic_link_split_section
  65 #define bfd_pef_get_section_contents_in_window      _bfd_generic_get_section_contents_in_window
  66
  67 static void bfd_pef_print_symbol               PARAMS ((bfd *, PTR, asymbol *, bfd_print_symbol_type));
  68 static void bfd_pef_convert_architecture       PARAMS ((unsigned long, enum bfd_architecture *, unsigned long *));
  69 static bfd_boolean bfd_pef_mkobject            PARAMS ((bfd *));
  70 static int bfd_pef_parse_traceback_table       PARAMS ((bfd *, asection *, unsigned char *, size_t, size_t, asymbol *, FILE *));
  71 static const char *bfd_pef_section_name        PARAMS ((bfd_pef_section *));
  72 static unsigned long bfd_pef_section_flags     PARAMS ((bfd_pef_section *));
  73 static asection *bfd_pef_make_bfd_section      PARAMS ((bfd *, bfd_pef_section *));
  74 static int bfd_pef_read_header                 PARAMS ((bfd *, bfd_pef_header *));
  75 static const bfd_target *bfd_pef_object_p      PARAMS ((bfd *));
  76 static int bfd_pef_parse_traceback_tables      PARAMS ((bfd *, asection *, unsigned char *, size_t, long *, asymbol **));
  77 static int bfd_pef_parse_function_stub         PARAMS ((bfd *, unsigned char *, size_t, unsigned long *));
  78 static int bfd_pef_parse_function_stubs        PARAMS ((bfd *, asection *, unsigned char *, size_t, unsigned char *, size_t, unsigned long *, asymbol **));
  79 static long bfd_pef_parse_symbols              PARAMS ((bfd *, asymbol **));
  80 static long bfd_pef_count_symbols              PARAMS ((bfd *));
  81 static long bfd_pef_get_symtab_upper_bound     PARAMS ((bfd *));
  82 static long bfd_pef_canonicalize_symtab        PARAMS ((bfd *, asymbol **));
  83 static asymbol *bfd_pef_make_empty_symbol      PARAMS ((bfd *));
  84 static void bfd_pef_get_symbol_info            PARAMS ((bfd *, asymbol *, symbol_info *));
  85 static int bfd_pef_sizeof_headers              PARAMS ((bfd *, bfd_boolean));
  86 static int bfd_pef_xlib_read_header            PARAMS ((bfd *, bfd_pef_xlib_header *));
  87 static int bfd_pef_xlib_scan                   PARAMS ((bfd *, bfd_pef_xlib_header *));
  88 static const bfd_target *bfd_pef_xlib_object_p PARAMS ((bfd *));
  89
  90 static void
  91 bfd_pef_print_symbol (abfd, afile, symbol, how)
  92      bfd *abfd;
  93      PTR afile;
  94      asymbol *symbol;
  95      bfd_print_symbol_type how;
  96 {
  97   FILE *file = (FILE *) afile;
  98
  99   switch (how)
 100     {
 101     case bfd_print_symbol_name:
 102       fprintf (file, "%s", symbol->name);
 103       break;
 104     default:
 105       bfd_print_symbol_vandf (abfd, (PTR) file, symbol);
 106       fprintf (file, " %-5s %s", symbol->section->name, symbol->name);
 107       if (strncmp (symbol->name, "__traceback_", strlen ("__traceback_")) == 0)
 108         {
 109           unsigned char *buf = alloca (symbol->udata.i);
 110           size_t offset = symbol->value + 4;
 111           size_t len = symbol->udata.i;
 112           int ret;
 113
 114           bfd_get_section_contents (abfd, symbol->section, buf, offset, len);
 115           ret = bfd_pef_parse_traceback_table (abfd, symbol->section, buf,
 116                                                len, 0, NULL, file);
 117           if (ret < 0)
 118             fprintf (file, " [ERROR]");
 119         }
 120     }
 121 }
 122
 123 static void
 124 bfd_pef_convert_architecture (architecture, type, subtype)
 125      unsigned long architecture;
 126      enum bfd_architecture *type;
 127      unsigned long *subtype;
 128 {
 129   const unsigned long ARCH_POWERPC = 0x70777063; /* 'pwpc' */
 130   const unsigned long ARCH_M68K = 0x6d36386b; /* 'm68k' */
 131
 132   *subtype = bfd_arch_unknown;
 133   *type = bfd_arch_unknown;
 134
 135   if (architecture == ARCH_POWERPC)
 136     *type = bfd_arch_powerpc;
 137   else if (architecture == ARCH_M68K)
 138     *type = bfd_arch_m68k;
 139 }
 140
 141 static bfd_boolean
 142 bfd_pef_mkobject (abfd)
 143      bfd *abfd ATTRIBUTE_UNUSED;
 144 {
 145   return TRUE;
 146 }
 147
 148 static int
 149 bfd_pef_parse_traceback_table (abfd, section, buf, len, pos, sym, file)
 150      bfd *abfd;
 151      asection *section;
 152      unsigned char *buf;
 153      size_t len;
 154      size_t pos;
 155      asymbol *sym;
 156      FILE *file;
 157 {
 158   struct traceback_table table;
 159   size_t offset;
 160   const char *s;
 161   asymbol tmpsymbol;
 162
 163   if (sym == NULL)
 164     sym = &tmpsymbol;
 165
 166   sym->name = NULL;
 167   sym->value = 0;
 168   sym->the_bfd = abfd;
 169   sym->section = section;
 170   sym->flags = 0;
 171   sym->udata.i = 0;
 172
 173   /* memcpy is fine since all fields are unsigned char.  */
 174
 175   if ((pos + 8) > len)
 176     return -1;
 177   memcpy (&table, buf + pos, 8);
 178
 179   /* Calling code relies on returned symbols having a name and
 180      correct offset.  */
 181
 182   if ((table.lang != TB_C) && (table.lang != TB_CPLUSPLUS))
 183     return -1;
 184
 185   if (! (table.flags2 & TB_NAME_PRESENT))
 186     return -1;
 187
 188   if (! table.flags1 & TB_HAS_TBOFF)
 189     return -1;
 190
 191   offset = 8;
 192
 193   if ((table.flags5 & TB_FLOATPARAMS) || (table.fixedparams))
 194     offset += 4;
 195
 196   if (table.flags1 & TB_HAS_TBOFF)
 197     {
 198       struct traceback_table_tboff off;
 199
 200       if ((pos + offset + 4) > len)
 201         return -1;
 202       off.tb_offset = bfd_getb32 (buf + pos + offset);
 203       offset += 4;
 204
 205       /* Need to subtract 4 because the offset includes the 0x0L
 206          preceding the table.  */
 207
 208       if (file != NULL)
 209         fprintf (file, " [offset = 0x%lx]", off.tb_offset);
 210
 211       if ((file == NULL) && ((off.tb_offset + 4) > (pos + offset)))
 212         return -1;
 213
 214       sym->value = pos - off.tb_offset - 4;
 215     }
 216
 217   if (table.flags2 & TB_INT_HNDL)
 218     offset += 4;
 219
 220   if (table.flags1 & TB_HAS_CTL)
 221     {
 222       struct traceback_table_anchors anchors;
 223
 224       if ((pos + offset + 4) > len)
 225         return -1;
 226       anchors.ctl_info = bfd_getb32 (buf + pos + offset);
 227       offset += 4;
 228
 229       if (anchors.ctl_info > 1024)
 230         return -1;
 231
 232       offset += anchors.ctl_info * 4;
 233     }
 234
 235   if (table.flags2 & TB_NAME_PRESENT)
 236     {
 237       struct traceback_table_routine name;
 238       char *namebuf;
 239
 240       if ((pos + offset + 2) > len)
 241         return -1;
 242       name.name_len = bfd_getb16 (buf + pos + offset);
 243       offset += 2;
 244
 245       if (name.name_len > 4096)
 246         return -1;
 247
 248       if ((pos + offset + name.name_len) > len)
 249         return -1;
 250
 251       namebuf = (char *) bfd_alloc (abfd, name.name_len + 1);
 252       if (namebuf == NULL)
 253         return -1;
 254
 255       memcpy (namebuf, buf + pos + offset, name.name_len);
 256       namebuf[name.name_len] = '\0';
 257
 258       /* Strip leading period inserted by compiler.  */
 259       if (namebuf[0] == '.')
 260         memmove (namebuf, namebuf + 1, name.name_len + 1);
 261
 262       sym->name = namebuf;
 263
 264       for (s = sym->name; (*s != '\0'); s++)
 265         if (! ISPRINT (*s))
 266           return -1;
 267
 268       offset += name.name_len;
 269     }
 270
 271   if (table.flags2 & TB_USES_ALLOCA)
 272     offset += 4;
 273
 274   if (table.flags4 & TB_HAS_VEC_INFO)
 275     offset += 4;
 276
 277   if (file != NULL)
 278     fprintf (file, " [length = 0x%lx]", (long) offset);
 279
 280   return offset;
 281 }
 282
 283 static const char *bfd_pef_section_name (section)
 284      bfd_pef_section *section;
 285 {
 286   switch (section->section_kind)
 287     {
 288     case BFD_PEF_SECTION_CODE: return "code";
 289     case BFD_PEF_SECTION_UNPACKED_DATA: return "unpacked-data";
 290     case BFD_PEF_SECTION_PACKED_DATA: return "packed-data";
 291     case BFD_PEF_SECTION_CONSTANT: return "constant";
 292     case BFD_PEF_SECTION_LOADER: return "loader";
 293     case BFD_PEF_SECTION_DEBUG: return "debug";
 294     case BFD_PEF_SECTION_EXEC_DATA: return "exec-data";
 295     case BFD_PEF_SECTION_EXCEPTION: return "exception";
 296     case BFD_PEF_SECTION_TRACEBACK: return "traceback";
 297     default: return "unknown";
 298     }
 299 }
 300
 301 static unsigned long bfd_pef_section_flags (section)
 302      bfd_pef_section *section;
 303 {
 304   switch (section->section_kind)
 305     {
 306     case BFD_PEF_SECTION_CODE:
 307       return SEC_HAS_CONTENTS | SEC_LOAD | SEC_ALLOC | SEC_CODE;
 308     case BFD_PEF_SECTION_UNPACKED_DATA:
 309     case BFD_PEF_SECTION_PACKED_DATA:
 310     case BFD_PEF_SECTION_CONSTANT:
 311     case BFD_PEF_SECTION_LOADER:
 312     case BFD_PEF_SECTION_DEBUG:
 313     case BFD_PEF_SECTION_EXEC_DATA:
 314     case BFD_PEF_SECTION_EXCEPTION:
 315     case BFD_PEF_SECTION_TRACEBACK:
 316     default:
 317       return SEC_HAS_CONTENTS | SEC_LOAD | SEC_ALLOC;
 318     }
 319 }
 320
 321 static asection *
 322 bfd_pef_make_bfd_section (abfd, section)
 323      bfd *abfd;
 324      bfd_pef_section *section;
 325 {
 326   asection *bfdsec;
 327   const char *name = bfd_pef_section_name (section);
 328
 329   bfdsec = bfd_make_section_anyway (abfd, name);
 330   if (bfdsec == NULL)
 331     return NULL;
 332
 333   bfdsec->vma = section->default_address + section->container_offset;
 334   bfdsec->lma = section->default_address + section->container_offset;
 335   bfdsec->size = section->container_length;
 336   bfdsec->filepos = section->container_offset;
 337   bfdsec->alignment_power = section->alignment;
 338
 339   bfdsec->flags = bfd_pef_section_flags (section);
 340
 341   return bfdsec;
 342 }
 343
 344 int bfd_pef_parse_loader_header (abfd, buf, len, header)
 345      bfd *abfd ATTRIBUTE_UNUSED;
 346      unsigned char *buf;
 347      size_t len;
 348      bfd_pef_loader_header *header;
 349 {
 350   BFD_ASSERT (len == 56);
 351
 352   header->main_section = bfd_getb32 (buf);
 353   header->main_offset = bfd_getb32 (buf + 4);
 354   header->init_section = bfd_getb32 (buf + 8);
 355   header->init_offset = bfd_getb32 (buf + 12);
 356   header->term_section = bfd_getb32 (buf + 16);
 357   header->term_offset = bfd_getb32 (buf + 20);
 358   header->imported_library_count = bfd_getb32 (buf + 24);
 359   header->total_imported_symbol_count = bfd_getb32 (buf + 28);
 360   header->reloc_section_count = bfd_getb32 (buf + 32);
 361   header->reloc_instr_offset = bfd_getb32 (buf + 36);
 362   header->loader_strings_offset = bfd_getb32 (buf + 40);
 363   header->export_hash_offset = bfd_getb32 (buf + 44);
 364   header->export_hash_table_power = bfd_getb32 (buf + 48);
 365   header->exported_symbol_count = bfd_getb32 (buf + 52);
 366
 367   return 0;
 368 }
 369
 370 int bfd_pef_parse_imported_library (abfd, buf, len, header)
 371      bfd *abfd ATTRIBUTE_UNUSED;
 372      unsigned char *buf;
 373      size_t len;
 374      bfd_pef_imported_library *header;
 375 {
 376   BFD_ASSERT (len == 24);
 377
 378   header->name_offset = bfd_getb32 (buf);
 379   header->old_implementation_version = bfd_getb32 (buf + 4);
 380   header->current_version = bfd_getb32 (buf + 8);
 381   header->imported_symbol_count = bfd_getb32 (buf + 12);
 382   header->first_imported_symbol = bfd_getb32 (buf + 16);
 383   header->options = buf[20];
 384   header->reserved_a = buf[21];
 385   header->reserved_b = bfd_getb16 (buf + 22);
 386
 387   return 0;
 388 }
 389
 390 int bfd_pef_parse_imported_symbol (abfd, buf, len, symbol)
 391      bfd *abfd ATTRIBUTE_UNUSED;
 392      unsigned char *buf;
 393      size_t len;
 394      bfd_pef_imported_symbol *symbol;
 395 {
 396   unsigned long value;
 397
 398   BFD_ASSERT (len == 4);
 399
 400   value = bfd_getb32 (buf);
 401   symbol->class = value >> 24;
 402   symbol->name = value & 0x00ffffff;
 403
 404   return 0;
 405 }
 406
 407 int bfd_pef_scan_section (abfd, section)
 408      bfd *abfd;
 409      bfd_pef_section *section;
 410 {
 411   unsigned char buf[28];
 412
 413   bfd_seek (abfd, section->header_offset, SEEK_SET);
 414   if (bfd_bread ((PTR) buf, 28, abfd) != 28)
 415     return -1;
 416
 417   section->name_offset = bfd_h_get_32 (abfd, buf);
 418   section->default_address = bfd_h_get_32 (abfd, buf + 4);
 419   section->total_length = bfd_h_get_32 (abfd, buf + 8);
 420   section->unpacked_length = bfd_h_get_32 (abfd, buf + 12);
 421   section->container_length = bfd_h_get_32 (abfd, buf + 16);
 422   section->container_offset = bfd_h_get_32 (abfd, buf + 20);
 423   section->section_kind = buf[24];
 424   section->share_kind = buf[25];
 425   section->alignment = buf[26];
 426   section->reserved = buf[27];
 427
 428   section->bfd_section = bfd_pef_make_bfd_section (abfd, section);
 429   if (section->bfd_section == NULL)
 430     return -1;
 431
 432   return 0;
 433 }
 434
 435 void
 436 bfd_pef_print_loader_header (abfd, header, file)
 437      bfd *abfd ATTRIBUTE_UNUSED;
 438      bfd_pef_loader_header *header;
 439      FILE *file;
 440 {
 441   fprintf (file, "main_section: %ld\n", header->main_section);
 442   fprintf (file, "main_offset: %lu\n", header->main_offset);
 443   fprintf (file, "init_section: %ld\n", header->init_section);
 444   fprintf (file, "init_offset: %lu\n", header->init_offset);
 445   fprintf (file, "term_section: %ld\n", header->term_section);
 446   fprintf (file, "term_offset: %lu\n", header->term_offset);
 447   fprintf (file, "imported_library_count: %lu\n",
 448            header->imported_library_count);
 449   fprintf (file, "total_imported_symbol_count: %lu\n",
 450            header->total_imported_symbol_count);
 451   fprintf (file, "reloc_section_count: %lu\n", header->reloc_section_count);
 452   fprintf (file, "reloc_instr_offset: %lu\n", header->reloc_instr_offset);
 453   fprintf (file, "loader_strings_offset: %lu\n",
 454            header->loader_strings_offset);
 455   fprintf (file, "export_hash_offset: %lu\n", header->export_hash_offset);
 456   fprintf (file, "export_hash_table_power: %lu\n",
 457            header->export_hash_table_power);
 458   fprintf (file, "exported_symbol_count: %lu\n",
 459            header->exported_symbol_count);
 460 }
 461
 462 int
 463 bfd_pef_print_loader_section (abfd, file)
 464      bfd *abfd;
 465      FILE *file;
 466 {
 467   bfd_pef_loader_header header;
 468   asection *loadersec = NULL;
 469   unsigned char *loaderbuf = NULL;
 470   size_t loaderlen = 0;
 471   int ret;
 472
 473   loadersec = bfd_get_section_by_name (abfd, "loader");
 474   if (loadersec == NULL)
 475     return -1;
 476
 477   loaderlen = loadersec->size;
 478   loaderbuf = (unsigned char *) bfd_malloc (loaderlen);
 479   if (bfd_seek (abfd, loadersec->filepos, SEEK_SET) < 0)
 480     {
 481       free (loaderbuf);
 482       return -1;
 483     }
 484   if (bfd_bread ((PTR) loaderbuf, loaderlen, abfd) != loaderlen)
 485     {
 486       free (loaderbuf);
 487       return -1;
 488     }
 489
 490   if (loaderlen < 56)
 491     {
 492       free (loaderbuf);
 493       return -1;
 494     }
 495   ret = bfd_pef_parse_loader_header (abfd, loaderbuf, 56, &header);
 496   if (ret < 0)
 497     {
 498       free (loaderbuf);
 499       return -1;
 500     }
 501
 502   bfd_pef_print_loader_header (abfd, &header, file);
 503   return 0;
 504 }
 505
 506 int
 507 bfd_pef_scan_start_address (abfd)
 508      bfd *abfd;
 509 {
 510   bfd_pef_loader_header header;
 511   asection *section;
 512
 513   asection *loadersec = NULL;
 514   unsigned char *loaderbuf = NULL;
 515   size_t loaderlen = 0;
 516   int ret;
 517
 518   loadersec = bfd_get_section_by_name (abfd, "loader");
 519   if (loadersec == NULL)
 520     goto end;
 521
 522   loaderlen = loadersec->size;
 523   loaderbuf = (unsigned char *) bfd_malloc (loaderlen);
 524   if (bfd_seek (abfd, loadersec->filepos, SEEK_SET) < 0)
 525     goto error;
 526   if (bfd_bread ((PTR) loaderbuf, loaderlen, abfd) != loaderlen)
 527     goto error;
 528
 529   if (loaderlen < 56)
 530     goto error;
 531   ret = bfd_pef_parse_loader_header (abfd, loaderbuf, 56, &header);
 532   if (ret < 0)
 533     goto error;
 534
 535   if (header.main_section < 0)
 536     goto end;
 537
 538   for (section = abfd->sections; section != NULL; section = section->next)
 539     if ((section->index + 1) == header.main_section)
 540       break;
 541
 542   if (section == NULL)
 543     goto error;
 544
 545   abfd->start_address = section->vma + header.main_offset;
 546
 547  end:
 548   if (loaderbuf != NULL)
 549     free (loaderbuf);
 550   return 0;
 551
 552  error:
 553   if (loaderbuf != NULL)
 554     free (loaderbuf);
 555   return -1;
 556 }
 557
 558 int
 559 bfd_pef_scan (abfd, header, mdata)
 560      bfd *abfd;
 561      bfd_pef_header *header;
 562      bfd_pef_data_struct *mdata;
 563 {
 564   unsigned int i;
 565   enum bfd_architecture cputype;
 566   unsigned long cpusubtype;
 567
 568   mdata->header = *header;
 569
 570   bfd_pef_convert_architecture (header->architecture, &cputype, &cpusubtype);
 571   if (cputype == bfd_arch_unknown)
 572     {
 573       fprintf (stderr, "bfd_pef_scan: unknown architecture 0x%lx\n",
 574                header->architecture);
 575       return -1;
 576     }
 577   bfd_set_arch_mach (abfd, cputype, cpusubtype);
 578
 579   mdata->header = *header;
 580
 581   abfd->flags = (abfd->xvec->object_flags
 582                  | (abfd->flags & (BFD_IN_MEMORY | BFD_IO_FUNCS)));
 583
 584   if (header->section_count != 0)
 585     {
 586       mdata->sections =
 587         ((bfd_pef_section *)
 588          bfd_alloc (abfd, header->section_count * sizeof (bfd_pef_section)));
 589
 590       if (mdata->sections == NULL)
 591         return -1;
 592
 593       for (i = 0; i < header->section_count; i++)
 594         {
 595           bfd_pef_section *cur = &mdata->sections[i];
 596           cur->header_offset = 40 + (i * 28);
 597           if (bfd_pef_scan_section (abfd, cur) < 0)
 598             return -1;
 599         }
 600     }
 601
 602   if (bfd_pef_scan_start_address (abfd) < 0)
 603     return -1;
 604
 605   abfd->tdata.pef_data = mdata;
 606
 607   return 0;
 608 }
 609
 610 static int
 611 bfd_pef_read_header (abfd, header)
 612      bfd *abfd;
 613      bfd_pef_header *header;
 614 {
 615   unsigned char buf[40];
 616
 617   bfd_seek (abfd, 0, SEEK_SET);
 618
 619   if (bfd_bread ((PTR) buf, 40, abfd) != 40)
 620     return -1;
 621
 622   header->tag1 = bfd_getb32 (buf);
 623   header->tag2 = bfd_getb32 (buf + 4);
 624   header->architecture = bfd_getb32 (buf + 8);
 625   header->format_version = bfd_getb32 (buf + 12);
 626   header->timestamp = bfd_getb32 (buf + 16);
 627   header->old_definition_version = bfd_getb32 (buf + 20);
 628   header->old_implementation_version = bfd_getb32 (buf + 24);
 629   header->current_version = bfd_getb32 (buf + 28);
 630   header->section_count = bfd_getb32 (buf + 32) + 1;
 631   header->instantiated_section_count = bfd_getb32 (buf + 34);
 632   header->reserved = bfd_getb32 (buf + 36);
 633
 634   return 0;
 635 }
 636
 637 static const bfd_target *
 638 bfd_pef_object_p (abfd)
 639      bfd *abfd;
 640 {
 641   struct bfd_preserve preserve;
 642   bfd_pef_header header;
 643
 644   preserve.marker = NULL;
 645   if (bfd_pef_read_header (abfd, &header) != 0)
 646     goto wrong;
 647
 648   if (header.tag1 != BFD_PEF_TAG1 || header.tag2 != BFD_PEF_TAG2)
 649     goto wrong;
 650
 651   preserve.marker = bfd_zalloc (abfd, sizeof (bfd_pef_data_struct));
 652   if (preserve.marker == NULL
 653       || !bfd_preserve_save (abfd, &preserve))
 654     goto fail;
 655
 656   if (bfd_pef_scan (abfd, &header,
 657                     (bfd_pef_data_struct *) preserve.marker) != 0)
 658     goto wrong;
 659
 660   bfd_preserve_finish (abfd, &preserve);
 661   return abfd->xvec;
 662
 663  wrong:
 664   bfd_set_error (bfd_error_wrong_format);
 665
 666  fail:
 667   if (preserve.marker != NULL)
 668     bfd_preserve_restore (abfd, &preserve);
 669   return NULL;
 670 }
 671
 672 static int bfd_pef_parse_traceback_tables (abfd, sec, buf, len, nsym, csym)
 673      bfd *abfd;
 674      asection *sec;
 675      unsigned char *buf;
 676      size_t len;
 677      long *nsym;
 678      asymbol **csym;
 679 {
 680   char *name;
 681
 682   asymbol function;
 683   asymbol traceback;
 684
 685   const char *const tbprefix = "__traceback_";
 686   size_t tbnamelen;
 687
 688   size_t pos = 0;
 689   unsigned long count = 0;
 690   int ret;
 691
 692   for (;;)
 693     {
 694       /* We're reading symbols two at a time.  */
 695       if (csym && ((csym[count] == NULL) || (csym[count + 1] == NULL)))
 696         break;
 697
 698       pos += 3;
 699       pos -= (pos % 4);
 700
 701       while ((pos + 4) <= len)
 702         {
 703           if (bfd_getb32 (buf + pos) == 0)
 704             break;
 705           pos += 4;
 706         }
 707
 708       if ((pos + 4) > len)
 709         break;
 710
 711       ret = bfd_pef_parse_traceback_table (abfd, sec, buf, len, pos + 4,
 712                                            &function, 0);
 713       if (ret < 0)
 714         {
 715           /* Skip over 0x0L to advance to next possible traceback table.  */
 716           pos += 4;
 717           continue;
 718         }
 719
 720       BFD_ASSERT (function.name != NULL);
 721
 722       /* Don't bother to compute the name if we are just
 723          counting symbols.  */
 724
 725       if (csym)
 726         {
 727           tbnamelen = strlen (tbprefix) + strlen (function.name);
 728           name = bfd_alloc (abfd, tbnamelen + 1);
 729           if (name == NULL)
 730             {
 731               bfd_release (abfd, (PTR) function.name);
 732               function.name = NULL;
 733               break;
 734             }
 735           snprintf (name, tbnamelen + 1, "%s%s", tbprefix, function.name);
 736           traceback.name = name;
 737           traceback.value = pos;
 738           traceback.the_bfd = abfd;
 739           traceback.section = sec;
 740           traceback.flags = 0;
 741           traceback.udata.i = ret;
 742
 743           *(csym[count]) = function;
 744           *(csym[count + 1]) = traceback;
 745         }
 746
 747       pos += ret;
 748       count += 2;
 749     }
 750
 751   *nsym = count;
 752   return 0;
 753 }
 754
 755 static int bfd_pef_parse_function_stub (abfd, buf, len, offset)
 756      bfd *abfd ATTRIBUTE_UNUSED;
 757      unsigned char *buf;
 758      size_t len;
 759      unsigned long *offset;
 760 {
 761   BFD_ASSERT (len == 24);
 762
 763   if ((bfd_getb32 (buf) & 0xffff0000) != 0x81820000)
 764     return -1;
 765   if (bfd_getb32 (buf + 4) != 0x90410014)
 766     return -1;
 767   if (bfd_getb32 (buf + 8) != 0x800c0000)
 768     return -1;
 769   if (bfd_getb32 (buf + 12) != 0x804c0004)
 770     return -1;
 771   if (bfd_getb32 (buf + 16) != 0x7c0903a6)
 772     return -1;
 773   if (bfd_getb32 (buf + 20) != 0x4e800420)
 774     return -1;
 775
 776   if (offset != NULL)
 777     *offset = (bfd_getb32 (buf) & 0x0000ffff) / 4;
 778
 779   return 0;
 780 }
 781
 782 static int bfd_pef_parse_function_stubs (abfd, codesec, codebuf, codelen,
 783                                          loaderbuf, loaderlen, nsym, csym)
 784      bfd *abfd;
 785      asection *codesec;
 786      unsigned char *codebuf;
 787      size_t codelen;
 788      unsigned char *loaderbuf;
 789      size_t loaderlen;
 790      unsigned long *nsym;
 791      asymbol **csym;
 792 {
 793   const char *const sprefix = "__stub_";
 794
 795   size_t codepos = 0;
 796   unsigned long count = 0;
 797
 798   bfd_pef_loader_header header;
 799   bfd_pef_imported_library *libraries = NULL;
 800   bfd_pef_imported_symbol *imports = NULL;
 801
 802   unsigned long i;
 803   int ret;
 804
 805   if (loaderlen < 56)
 806     goto error;
 807
 808   ret = bfd_pef_parse_loader_header (abfd, loaderbuf, 56, &header);
 809   if (ret < 0)
 810     goto error;
 811
 812   libraries = (bfd_pef_imported_library *) bfd_malloc
 813     (header.imported_library_count * sizeof (bfd_pef_imported_library));
 814   imports = (bfd_pef_imported_symbol *) bfd_malloc
 815     (header.total_imported_symbol_count * sizeof (bfd_pef_imported_symbol));
 816
 817   if (loaderlen < (56 + (header.imported_library_count * 24)))
 818     goto error;
 819   for (i = 0; i < header.imported_library_count; i++)
 820     {
 821       ret = bfd_pef_parse_imported_library
 822         (abfd, loaderbuf + 56 + (i * 24), 24, &libraries[i]);
 823       if (ret < 0)
 824         goto error;
 825     }
 826
 827   if (loaderlen < (56 + (header.imported_library_count * 24)
 828                    + (header.total_imported_symbol_count * 4)))
 829     goto error;
 830   for (i = 0; i < header.total_imported_symbol_count; i++)
 831     {
 832       ret = (bfd_pef_parse_imported_symbol
 833              (abfd,
 834               loaderbuf + 56 + (header.imported_library_count * 24) + (i * 4),
 835               4, &imports[i]));
 836       if (ret < 0)
 837         goto error;
 838     }
 839
 840   codepos = 0;
 841
 842   for (;;)
 843     {
 844       asymbol sym;
 845       const char *symname;
 846       char *name;
 847       unsigned long index;
 848       int ret;
 849
 850       if (csym && (csym[count] == NULL))
 851         break;
 852
 853       codepos += 3;
 854       codepos -= (codepos % 4);
 855
 856       while ((codepos + 4) <= codelen)
 857         {
 858           if ((bfd_getb32 (codebuf + codepos) & 0xffff0000) == 0x81820000)
 859             break;
 860           codepos += 4;
 861         }
 862
 863       if ((codepos + 4) > codelen)
 864         break;
 865
 866       ret = bfd_pef_parse_function_stub (abfd, codebuf + codepos, 24, &index);
 867       if (ret < 0)
 868         {
 869           codepos += 24;
 870           continue;
 871         }
 872
 873       if (index >= header.total_imported_symbol_count)
 874         {
 875           codepos += 24;
 876           continue;
 877         }
 878
 879       {
 880         size_t max, namelen;
 881         const char *s;
 882
 883         if (loaderlen < (header.loader_strings_offset + imports[index].name))
 884           goto error;
 885
 886         max = loaderlen - (header.loader_strings_offset + imports[index].name);
 887         symname = (char *) loaderbuf;
 888         symname += header.loader_strings_offset + imports[index].name;
 889         namelen = 0;
 890         for (s = symname; s < (symname + max); s++)
 891           {
 892             if (*s == '\0')
 893               break;
 894             if (! ISPRINT (*s))
 895               goto error;
 896             namelen++;
 897           }
 898         if (*s != '\0')
 899           goto error;
 900
 901         name = bfd_alloc (abfd, strlen (sprefix) + namelen + 1);
 902         if (name == NULL)
 903           break;
 904
 905         snprintf (name, strlen (sprefix) + namelen + 1, "%s%s",
 906                   sprefix, symname);
 907         sym.name = name;
 908       }
 909
 910       sym.value = codepos;
 911       sym.the_bfd = abfd;
 912       sym.section = codesec;
 913       sym.flags = 0;
 914       sym.udata.i = 0;
 915
 916       codepos += 24;
 917
 918       if (csym != NULL)
 919         *(csym[count]) = sym;
 920
 921       count++;
 922     }
 923
 924   goto end;
 925
 926  end:
 927   if (libraries != NULL)
 928     free (libraries);
 929   if (imports != NULL)
 930     free (imports);
 931   *nsym = count;
 932   return 0;
 933
 934  error:
 935   if (libraries != NULL)
 936     free (libraries);
 937   if (imports != NULL)
 938     free (imports);
 939   *nsym = count;
 940   return -1;
 941 }
 942
 943 static long bfd_pef_parse_symbols (abfd, csym)
 944      bfd *abfd;
 945      asymbol **csym;
 946 {
 947   unsigned long count = 0;
 948
 949   asection *codesec = NULL;
 950   unsigned char *codebuf = NULL;
 951   size_t codelen = 0;
 952
 953   asection *loadersec = NULL;
 954   unsigned char *loaderbuf = NULL;
 955   size_t loaderlen = 0;
 956
 957   codesec = bfd_get_section_by_name (abfd, "code");
 958   if (codesec != NULL)
 959     {
 960       codelen = codesec->size;
 961       codebuf = (unsigned char *) bfd_malloc (codelen);
 962       if (bfd_seek (abfd, codesec->filepos, SEEK_SET) < 0)
 963         goto end;
 964       if (bfd_bread ((PTR) codebuf, codelen, abfd) != codelen)
 965         goto end;
 966     }
 967
 968   loadersec = bfd_get_section_by_name (abfd, "loader");
 969   if (loadersec != NULL)
 970     {
 971       loaderlen = loadersec->size;
 972       loaderbuf = (unsigned char *) bfd_malloc (loaderlen);
 973       if (bfd_seek (abfd, loadersec->filepos, SEEK_SET) < 0)
 974         goto end;
 975       if (bfd_bread ((PTR) loaderbuf, loaderlen, abfd) != loaderlen)
 976         goto end;
 977     }
 978
 979   count = 0;
 980   if (codesec != NULL)
 981     {
 982       long ncount = 0;
 983       bfd_pef_parse_traceback_tables (abfd, codesec, codebuf, codelen,
 984                                       &ncount, csym);
 985       count += ncount;
 986     }
 987
 988   if ((codesec != NULL) && (loadersec != NULL))
 989     {
 990       unsigned long ncount = 0;
 991       bfd_pef_parse_function_stubs
 992         (abfd, codesec, codebuf, codelen, loaderbuf, loaderlen, &ncount,
 993          (csym != NULL) ? (csym + count) : NULL);
 994       count += ncount;
 995     }
 996
 997   if (csym != NULL)
 998     csym[count] = NULL;
 999
1000  end:
1001   if (codebuf != NULL)
1002     free (codebuf);
1003
1004   if (loaderbuf != NULL)
1005     free (loaderbuf);
1006
1007   return count;
1008 }
1009
1010 static long
1011 bfd_pef_count_symbols (abfd)
1012      bfd *abfd;
1013 {
1014   return bfd_pef_parse_symbols (abfd, NULL);
1015 }
1016
1017 static long
1018 bfd_pef_get_symtab_upper_bound (abfd)
1019      bfd *abfd;
1020 {
1021   long nsyms = bfd_pef_count_symbols (abfd);
1022   if (nsyms < 0)
1023     return nsyms;
1024   return ((nsyms + 1) * sizeof (asymbol *));
1025 }
1026
1027 static long
1028 bfd_pef_canonicalize_symtab (abfd, alocation)
1029      bfd *abfd;
1030      asymbol **alocation;
1031 {
1032   long i;
1033   asymbol *syms;
1034   long ret;
1035
1036   long nsyms = bfd_pef_count_symbols (abfd);
1037   if (nsyms < 0)
1038     return nsyms;
1039
1040   syms = bfd_alloc (abfd, nsyms * sizeof (asymbol));
1041   if (syms == NULL)
1042     return -1;
1043
1044   for (i = 0; i < nsyms; i++)
1045     alocation[i] = &syms[i];
1046
1047   alocation[nsyms] = NULL;
1048
1049   ret = bfd_pef_parse_symbols (abfd, alocation);
1050   if (ret != nsyms)
1051     return 0;
1052
1053   return ret;
1054 }
1055
1056 static asymbol *
1057 bfd_pef_make_empty_symbol (abfd)
1058      bfd *abfd;
1059 {
1060   return (asymbol *) bfd_alloc (abfd, sizeof (asymbol));
1061 }
1062
1063 static void
1064 bfd_pef_get_symbol_info (abfd, symbol, ret)
1065      bfd *abfd ATTRIBUTE_UNUSED;
1066      asymbol *symbol;
1067      symbol_info *ret;
1068 {
1069   bfd_symbol_info (symbol, ret);
1070 }
1071
1072 static int
1073 bfd_pef_sizeof_headers (abfd, exec)
1074      bfd *abfd ATTRIBUTE_UNUSED;
1075      bfd_boolean exec ATTRIBUTE_UNUSED;
1076 {
1077   return 0;
1078 }
1079
1080 const bfd_target pef_vec =
1081 {
1082   "pef",                        /* name */
1083   bfd_target_pef_flavour,       /* flavour */
1084   BFD_ENDIAN_BIG,               /* byteorder */
1085   BFD_ENDIAN_BIG,               /* header_byteorder */
1086   (HAS_RELOC | EXEC_P |         /* object flags */
1087    HAS_LINENO | HAS_DEBUG |
1088    HAS_SYMS | HAS_LOCALS | DYNAMIC | WP_TEXT | D_PAGED),
1089   (SEC_ALLOC | SEC_LOAD | SEC_READONLY | SEC_CODE | SEC_DATA
1090    | SEC_ROM | SEC_HAS_CONTENTS), /* section_flags */
1091   0,                            /* symbol_leading_char */
1092   ' ',                          /* ar_pad_char */
1093   16,                           /* ar_max_namelen */
1094   bfd_getb64, bfd_getb_signed_64, bfd_putb64,
1095   bfd_getb32, bfd_getb_signed_32, bfd_putb32,
1096   bfd_getb16, bfd_getb_signed_16, bfd_putb16,   /* data */
1097   bfd_getb64, bfd_getb_signed_64, bfd_putb64,
1098   bfd_getb32, bfd_getb_signed_32, bfd_putb32,
1099   bfd_getb16, bfd_getb_signed_16, bfd_putb16,   /* hdrs */
1100   {                             /* bfd_check_format */
1101     _bfd_dummy_target,
1102     bfd_pef_object_p,           /* bfd_check_format */
1103     _bfd_dummy_target,
1104     _bfd_dummy_target,
1105   },
1106   {                             /* bfd_set_format */
1107     bfd_false,
1108     bfd_pef_mkobject,
1109     bfd_false,
1110     bfd_false,
1111   },
1112   {                             /* bfd_write_contents */
1113     bfd_false,
1114     bfd_true,
1115     bfd_false,
1116     bfd_false,
1117   },
1118
1119   BFD_JUMP_TABLE_GENERIC (bfd_pef),
1120   BFD_JUMP_TABLE_COPY (_bfd_generic),
1121   BFD_JUMP_TABLE_CORE (_bfd_nocore),
1122   BFD_JUMP_TABLE_ARCHIVE (_bfd_noarchive),
1123   BFD_JUMP_TABLE_SYMBOLS (bfd_pef),
1124   BFD_JUMP_TABLE_RELOCS (bfd_pef),
1125   BFD_JUMP_TABLE_WRITE (bfd_pef),
1126   BFD_JUMP_TABLE_LINK (bfd_pef),
1127   BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic),
1128
1129   NULL,
1130
1131   NULL
1132 };
1133
1134 #define bfd_pef_xlib_close_and_cleanup _bfd_generic_close_and_cleanup
1135 #define bfd_pef_xlib_bfd_free_cached_info _bfd_generic_bfd_free_cached_info
1136 #define bfd_pef_xlib_new_section_hook _bfd_generic_new_section_hook
1137 #define bfd_pef_xlib_get_section_contents _bfd_generic_get_section_contents
1138 #define bfd_pef_xlib_set_section_contents _bfd_generic_set_section_contents
1139 #define bfd_pef_xlib_get_section_contents_in_window _bfd_generic_get_section_contents_in_window
1140 #define bfd_pef_xlib_set_section_contents_in_window _bfd_generic_set_section_contents_in_window
1141
1142 static int
1143 bfd_pef_xlib_read_header (abfd, header)
1144      bfd *abfd;
1145      bfd_pef_xlib_header *header;
1146 {
1147   unsigned char buf[76];
1148
1149   bfd_seek (abfd, 0, SEEK_SET);
1150
1151   if (bfd_bread ((PTR) buf, 76, abfd) != 76)
1152     return -1;
1153
1154   header->tag1 = bfd_getb32 (buf);
1155   header->tag2 = bfd_getb32 (buf + 4);
1156   header->current_format = bfd_getb32 (buf + 8);
1157   header->container_strings_offset = bfd_getb32 (buf + 12);
1158   header->export_hash_offset = bfd_getb32 (buf + 16);
1159   header->export_key_offset = bfd_getb32 (buf + 20);
1160   header->export_symbol_offset = bfd_getb32 (buf + 24);
1161   header->export_names_offset = bfd_getb32 (buf + 28);
1162   header->export_hash_table_power = bfd_getb32 (buf + 32);
1163   header->exported_symbol_count = bfd_getb32 (buf + 36);
1164   header->frag_name_offset = bfd_getb32 (buf + 40);
1165   header->frag_name_length = bfd_getb32 (buf + 44);
1166   header->dylib_path_offset = bfd_getb32 (buf + 48);
1167   header->dylib_path_length = bfd_getb32 (buf + 52);
1168   header->cpu_family = bfd_getb32 (buf + 56);
1169   header->cpu_model = bfd_getb32 (buf + 60);
1170   header->date_time_stamp = bfd_getb32 (buf + 64);
1171   header->current_version = bfd_getb32 (buf + 68);
1172   header->old_definition_version = bfd_getb32 (buf + 72);
1173   header->old_implementation_version = bfd_getb32 (buf + 76);
1174
1175   return 0;
1176 }
1177
1178 int
1179 bfd_pef_xlib_scan (abfd, header)
1180      bfd *abfd;
1181      bfd_pef_xlib_header *header;
1182 {
1183   bfd_pef_xlib_data_struct *mdata = NULL;
1184
1185   mdata = ((bfd_pef_xlib_data_struct *)
1186            bfd_alloc (abfd, sizeof (bfd_pef_xlib_data_struct)));
1187   if (mdata == NULL)
1188     return -1;
1189
1190   mdata->header = *header;
1191
1192   abfd->flags = (abfd->xvec->object_flags
1193                  | (abfd->flags & (BFD_IN_MEMORY | BFD_IO_FUNCS)));
1194
1195   abfd->tdata.pef_xlib_data = mdata;
1196
1197   return 0;
1198 }
1199
1200 static const bfd_target *
1201 bfd_pef_xlib_object_p (abfd)
1202      bfd *abfd;
1203 {
1204   struct bfd_preserve preserve;
1205   bfd_pef_xlib_header header;
1206
1207   if (bfd_pef_xlib_read_header (abfd, &header) != 0)
1208     {
1209       bfd_set_error (bfd_error_wrong_format);
1210       return NULL;
1211     }
1212
1213   if ((header.tag1 != BFD_PEF_XLIB_TAG1)
1214       || ((header.tag2 != BFD_PEF_VLIB_TAG2)
1215           && (header.tag2 != BFD_PEF_BLIB_TAG2)))
1216     {
1217       bfd_set_error (bfd_error_wrong_format);
1218       return NULL;
1219     }
1220
1221   if (! bfd_preserve_save (abfd, &preserve))
1222     {
1223       bfd_set_error (bfd_error_wrong_format);
1224       return NULL;
1225     }
1226
1227   if (bfd_pef_xlib_scan (abfd, &header) != 0)
1228     {
1229       bfd_preserve_restore (abfd, &preserve);
1230       bfd_set_error (bfd_error_wrong_format);
1231       return NULL;
1232     }
1233
1234   bfd_preserve_finish (abfd, &preserve);
1235   return abfd->xvec;
1236 }
1237
1238 const bfd_target pef_xlib_vec =
1239 {
1240   "pef-xlib",                   /* name */
1241   bfd_target_pef_xlib_flavour,  /* flavour */
1242   BFD_ENDIAN_BIG,               /* byteorder */
1243   BFD_ENDIAN_BIG,               /* header_byteorder */
1244   (HAS_RELOC | EXEC_P |         /* object flags */
1245    HAS_LINENO | HAS_DEBUG |
1246    HAS_SYMS | HAS_LOCALS | DYNAMIC | WP_TEXT | D_PAGED),
1247   (SEC_ALLOC | SEC_LOAD | SEC_READONLY | SEC_CODE | SEC_DATA
1248    | SEC_ROM | SEC_HAS_CONTENTS), /* section_flags */
1249   0,                            /* symbol_leading_char */
1250   ' ',                          /* ar_pad_char */
1251   16,                           /* ar_max_namelen */
1252   bfd_getb64, bfd_getb_signed_64, bfd_putb64,
1253   bfd_getb32, bfd_getb_signed_32, bfd_putb32,
1254   bfd_getb16, bfd_getb_signed_16, bfd_putb16,   /* data */
1255   bfd_getb64, bfd_getb_signed_64, bfd_putb64,
1256   bfd_getb32, bfd_getb_signed_32, bfd_putb32,
1257   bfd_getb16, bfd_getb_signed_16, bfd_putb16,   /* hdrs */
1258   {                             /* bfd_check_format */
1259     _bfd_dummy_target,
1260     bfd_pef_xlib_object_p,      /* bfd_check_format */
1261     _bfd_dummy_target,
1262     _bfd_dummy_target,
1263   },
1264   {                             /* bfd_set_format */
1265     bfd_false,
1266     bfd_pef_mkobject,
1267     bfd_false,
1268     bfd_false,
1269   },
1270   {                             /* bfd_write_contents */
1271     bfd_false,
1272     bfd_true,
1273     bfd_false,
1274     bfd_false,
1275   },
1276
1277   BFD_JUMP_TABLE_GENERIC (bfd_pef_xlib),
1278   BFD_JUMP_TABLE_COPY (_bfd_generic),
1279   BFD_JUMP_TABLE_CORE (_bfd_nocore),
1280   BFD_JUMP_TABLE_ARCHIVE (_bfd_noarchive),
1281   BFD_JUMP_TABLE_SYMBOLS (_bfd_nosymbols),
1282   BFD_JUMP_TABLE_RELOCS (_bfd_norelocs),
1283   BFD_JUMP_TABLE_WRITE (_bfd_nowrite),
1284   BFD_JUMP_TABLE_LINK (_bfd_nolink),
1285   BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic),
1286
1287   NULL,
1288
1289   NULL
1290 };