OpenCores
URL https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [trunk/] [gnu-src/] [gdb-6.8/] [bfd/] [mach-o.c] - Diff between revs 157 and 225

Go to most recent revision | Show entire file | Details | Blame | View Log

Rev 157 Rev 225
Line 1... Line 1...
/* Mach-O support for BFD.
/* Mach-O support for BFD.
   Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008
   Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009
   Free Software Foundation, Inc.
   Free Software Foundation, Inc.
 
 
   This file is part of BFD, the Binary File Descriptor library.
   This file is part of BFD, the Binary File Descriptor library.
 
 
   This program is free software; you can redistribute it and/or modify
   This program is free software; you can redistribute it and/or modify
Line 22... Line 22...
#include "sysdep.h"
#include "sysdep.h"
#include "mach-o.h"
#include "mach-o.h"
#include "bfd.h"
#include "bfd.h"
#include "libbfd.h"
#include "libbfd.h"
#include "libiberty.h"
#include "libiberty.h"
 
#include "aout/stab_gnu.h"
#include <ctype.h>
#include <ctype.h>
 
 
#ifndef BFD_IO_FUNCS
#define bfd_mach_o_object_p bfd_mach_o_gen_object_p
#define BFD_IO_FUNCS 0
#define bfd_mach_o_core_p bfd_mach_o_gen_core_p
#endif
#define bfd_mach_o_mkobject bfd_false
 
 
#define bfd_mach_o_mkarchive                          _bfd_noarchive_mkarchive
#define FILE_ALIGN(off, algn) \
#define bfd_mach_o_read_ar_hdr                        _bfd_noarchive_read_ar_hdr
  (((off) + ((file_ptr) 1 << (algn)) - 1) & ((file_ptr) -1 << (algn)))
#define bfd_mach_o_slurp_armap                        _bfd_noarchive_slurp_armap
 
#define bfd_mach_o_slurp_extended_name_table          _bfd_noarchive_slurp_extended_name_table
static int bfd_mach_o_scan_read_symtab_symbols (bfd *);
#define bfd_mach_o_construct_extended_name_table      _bfd_noarchive_construct_extended_name_table
 
#define bfd_mach_o_truncate_arname                    _bfd_noarchive_truncate_arname
unsigned int
#define bfd_mach_o_write_armap                        _bfd_noarchive_write_armap
bfd_mach_o_version (bfd *abfd)
#define bfd_mach_o_get_elt_at_index                   _bfd_noarchive_get_elt_at_index
{
#define bfd_mach_o_generic_stat_arch_elt              _bfd_noarchive_generic_stat_arch_elt
  bfd_mach_o_data_struct *mdata = NULL;
#define bfd_mach_o_update_armap_timestamp             _bfd_noarchive_update_armap_timestamp
 
#define bfd_mach_o_close_and_cleanup                  _bfd_generic_close_and_cleanup
  BFD_ASSERT (bfd_mach_o_valid (abfd));
#define bfd_mach_o_bfd_free_cached_info               _bfd_generic_bfd_free_cached_info
  mdata = bfd_mach_o_get_data (abfd);
#define bfd_mach_o_new_section_hook                   _bfd_generic_new_section_hook
 
#define bfd_mach_o_get_section_contents_in_window     _bfd_generic_get_section_contents_in_window
  return mdata->header.version;
#define bfd_mach_o_bfd_is_local_label_name            _bfd_nosymbols_bfd_is_local_label_name
}
#define bfd_mach_o_bfd_is_target_special_symbol       ((bfd_boolean (*) (bfd *, asymbol *)) bfd_false)
 
#define bfd_mach_o_bfd_is_local_label_name            _bfd_nosymbols_bfd_is_local_label_name
 
#define bfd_mach_o_get_lineno                         _bfd_nosymbols_get_lineno
 
#define bfd_mach_o_find_nearest_line                  _bfd_nosymbols_find_nearest_line
 
#define bfd_mach_o_find_inliner_info                  _bfd_nosymbols_find_inliner_info
 
#define bfd_mach_o_bfd_make_debug_symbol              _bfd_nosymbols_bfd_make_debug_symbol
 
#define bfd_mach_o_read_minisymbols                   _bfd_generic_read_minisymbols
 
#define bfd_mach_o_minisymbol_to_symbol               _bfd_generic_minisymbol_to_symbol
 
#define bfd_mach_o_bfd_get_relocated_section_contents bfd_generic_get_relocated_section_contents
 
#define bfd_mach_o_bfd_relax_section                  bfd_generic_relax_section
 
#define bfd_mach_o_bfd_link_hash_table_create         _bfd_generic_link_hash_table_create
 
#define bfd_mach_o_bfd_link_hash_table_free           _bfd_generic_link_hash_table_free
 
#define bfd_mach_o_bfd_link_add_symbols               _bfd_generic_link_add_symbols
 
#define bfd_mach_o_bfd_link_just_syms                 _bfd_generic_link_just_syms
 
#define bfd_mach_o_bfd_final_link                     _bfd_generic_final_link
 
#define bfd_mach_o_bfd_link_split_section             _bfd_generic_link_split_section
 
#define bfd_mach_o_set_arch_mach                      bfd_default_set_arch_mach
 
#define bfd_mach_o_bfd_merge_private_bfd_data         _bfd_generic_bfd_merge_private_bfd_data
 
#define bfd_mach_o_bfd_set_private_flags              _bfd_generic_bfd_set_private_flags
 
#define bfd_mach_o_bfd_print_private_bfd_data         _bfd_generic_bfd_print_private_bfd_data
 
#define bfd_mach_o_get_section_contents               _bfd_generic_get_section_contents
 
#define bfd_mach_o_set_section_contents               _bfd_generic_set_section_contents
 
#define bfd_mach_o_bfd_gc_sections                    bfd_generic_gc_sections
 
#define bfd_mach_o_bfd_merge_sections                 bfd_generic_merge_sections
 
#define bfd_mach_o_bfd_is_group_section               bfd_generic_is_group_section
 
#define bfd_mach_o_bfd_discard_group                  bfd_generic_discard_group
 
#define bfd_mach_o_section_already_linked             _bfd_generic_section_already_linked
 
#define bfd_mach_o_bfd_copy_private_header_data       _bfd_generic_bfd_copy_private_header_data
 
#define bfd_mach_o_core_file_matches_executable_p     generic_core_file_matches_executable_p
 
 
 
 
 
/* The flags field of a section structure is separated into two parts a section
 
   type and section attributes.  The section types are mutually exclusive (it
 
   can only have one type) but the section attributes are not (it may have more
 
   than one attribute).  */
 
 
 
#define SECTION_TYPE             0x000000ff     /* 256 section types.  */
 
#define SECTION_ATTRIBUTES       0xffffff00     /*  24 section attributes.  */
 
 
 
/* Constants for the section attributes part of the flags field of a section
 
   structure.  */
 
 
 
#define SECTION_ATTRIBUTES_USR   0xff000000     /* User-settable attributes.  */
 
#define S_ATTR_PURE_INSTRUCTIONS 0x80000000     /* Section contains only true machine instructions.  */
 
#define SECTION_ATTRIBUTES_SYS   0x00ffff00     /* System setable attributes.  */
 
#define S_ATTR_SOME_INSTRUCTIONS 0x00000400     /* Section contains some machine instructions.  */
 
#define S_ATTR_EXT_RELOC         0x00000200     /* Section has external relocation entries.  */
 
#define S_ATTR_LOC_RELOC         0x00000100     /* Section has local relocation entries.  */
 
 
 
#define N_STAB 0xe0
 
#define N_TYPE 0x1e
 
#define N_EXT  0x01
 
#define N_UNDF 0x0
 
#define N_ABS  0x2
 
#define N_SECT 0xe
 
#define N_INDR 0xa
 
 
 
bfd_boolean
bfd_boolean
bfd_mach_o_valid (bfd *abfd)
bfd_mach_o_valid (bfd *abfd)
{
{
  if (abfd == NULL || abfd->xvec == NULL)
  if (abfd == NULL || abfd->xvec == NULL)
    return 0;
    return FALSE;
 
 
  if (! ((abfd->xvec == &mach_o_be_vec)
  if (abfd->xvec->flavour != bfd_target_mach_o_flavour)
         || (abfd->xvec == &mach_o_le_vec)
    return FALSE;
         || (abfd->xvec == &mach_o_fat_vec)))
 
    return 0;
 
 
 
  if (abfd->tdata.mach_o_data == NULL)
  if (bfd_mach_o_get_data (abfd) == NULL)
    return 0;
    return FALSE;
  return 1;
  return TRUE;
 
}
 
 
 
static INLINE bfd_boolean
 
mach_o_wide_p (bfd_mach_o_header *header)
 
{
 
  switch (header->version)
 
    {
 
    case 1:
 
      return FALSE;
 
    case 2:
 
      return TRUE;
 
    default:
 
      BFD_FAIL ();
 
      return FALSE;
 
    }
 
}
 
 
 
static INLINE bfd_boolean
 
bfd_mach_o_wide_p (bfd *abfd)
 
{
 
  return mach_o_wide_p (&bfd_mach_o_get_data (abfd)->header);
 
}
 
 
 
/* Tables to translate well known Mach-O segment/section names to bfd
 
   names.  Use of canonical names (such as .text or .debug_frame) is required
 
   by gdb.  */
 
 
 
struct mach_o_section_name_xlat
 
{
 
  const char *bfd_name;
 
  const char *mach_o_name;
 
};
 
 
 
static const struct mach_o_section_name_xlat dwarf_section_names_xlat[] =
 
  {
 
    { ".debug_frame", "__debug_frame" },
 
    { ".debug_info", "__debug_info" },
 
    { ".debug_abbrev", "__debug_abbrev" },
 
    { ".debug_aranges", "__debug_aranges" },
 
    { ".debug_macinfo", "__debug_macinfo" },
 
    { ".debug_line", "__debug_line" },
 
    { ".debug_loc", "__debug_loc" },
 
    { ".debug_pubnames", "__debug_pubnames" },
 
    { ".debug_pubtypes", "__debug_pubtypes" },
 
    { ".debug_str", "__debug_str" },
 
    { ".debug_ranges", "__debug_ranges" },
 
    { NULL, NULL}
 
  };
 
 
 
static const struct mach_o_section_name_xlat text_section_names_xlat[] =
 
  {
 
    { ".text", "__text" },
 
    { ".const", "__const" },
 
    { ".cstring", "__cstring" },
 
    { ".eh_frame", "__eh_frame" },
 
    { NULL, NULL}
 
  };
 
 
 
static const struct mach_o_section_name_xlat data_section_names_xlat[] =
 
  {
 
    { ".data", "__data" },
 
    { ".bss", "__bss" },
 
    { NULL, NULL}
 
  };
 
 
 
struct mach_o_segment_name_xlat
 
{
 
  const char *segname;
 
  const struct mach_o_section_name_xlat *sections;
 
};
 
 
 
static const struct mach_o_segment_name_xlat segsec_names_xlat[] =
 
  {
 
    { "__DWARF", dwarf_section_names_xlat },
 
    { "__TEXT", text_section_names_xlat },
 
    { "__DATA", data_section_names_xlat },
 
    { NULL, NULL }
 
  };
 
 
 
 
 
/* Mach-O to bfd names.  */
 
 
 
static char *
 
bfd_mach_o_convert_section_name_to_bfd (bfd *abfd, bfd_mach_o_section *section)
 
{
 
  const struct mach_o_segment_name_xlat *seg;
 
  char *res;
 
  unsigned int len;
 
  const char *pfx = "";
 
 
 
  for (seg = segsec_names_xlat; seg->segname; seg++)
 
    {
 
      if (strcmp (seg->segname, section->segname) == 0)
 
        {
 
          const struct mach_o_section_name_xlat *sec;
 
 
 
          for (sec = seg->sections; sec->mach_o_name; sec++)
 
            {
 
              if (strcmp (sec->mach_o_name, section->sectname) == 0)
 
                {
 
                  len = strlen (sec->bfd_name);
 
                  res = bfd_alloc (abfd, len + 1);
 
 
 
                  if (res == NULL)
 
                    return NULL;
 
                  strcpy (res, sec->bfd_name);
 
                  return res;
 
                }
 
            }
 
        }
 
    }
 
 
 
  len = strlen (section->segname) + 1
 
    + strlen (section->sectname) + 1;
 
 
 
  /* Put "LC_SEGMENT." prefix if the segment name is weird (ie doesn't start
 
     with an underscore.  */
 
  if (section->segname[0] != '_')
 
    {
 
      static const char seg_pfx[] = "LC_SEGMENT.";
 
 
 
      pfx = seg_pfx;
 
      len += sizeof (seg_pfx) - 1;
 
    }
 
 
 
  res = bfd_alloc (abfd, len);
 
  if (res == NULL)
 
    return NULL;
 
  snprintf (res, len, "%s%s.%s", pfx, section->segname, section->sectname);
 
  return res;
 
}
 
 
 
/* Convert a bfd section name to a Mach-O segment + section name.  */
 
 
 
static void
 
bfd_mach_o_convert_section_name_to_mach_o (bfd *abfd ATTRIBUTE_UNUSED,
 
                                           asection *sect,
 
                                           bfd_mach_o_section *section)
 
{
 
  const struct mach_o_segment_name_xlat *seg;
 
  const char *name = bfd_get_section_name (abfd, sect);
 
  const char *dot;
 
  unsigned int len;
 
  unsigned int seglen;
 
  unsigned int seclen;
 
 
 
  /* List of well known names.  They all start with a dot.  */
 
  if (name[0] == '.')
 
    for (seg = segsec_names_xlat; seg->segname; seg++)
 
      {
 
        const struct mach_o_section_name_xlat *sec;
 
 
 
        for (sec = seg->sections; sec->mach_o_name; sec++)
 
          {
 
            if (strcmp (sec->bfd_name, name) == 0)
 
              {
 
                strcpy (section->segname, seg->segname);
 
                strcpy (section->sectname, sec->mach_o_name);
 
                return;
 
              }
 
          }
 
      }
 
 
 
  /* Strip LC_SEGMENT. prefix.  */
 
  if (strncmp (name, "LC_SEGMENT.", 11) == 0)
 
    name += 11;
 
 
 
  /* Find a dot.  */
 
  dot = strchr (name, '.');
 
  len = strlen (name);
 
 
 
  /* Try to split name into segment and section names.  */
 
  if (dot && dot != name)
 
    {
 
      seglen = dot - name;
 
      seclen = len - (dot + 1 - name);
 
 
 
      if (seglen < 16 && seclen < 16)
 
        {
 
          memcpy (section->segname, name, seglen);
 
          section->segname[seglen] = 0;
 
          memcpy (section->sectname, dot + 1, seclen);
 
          section->sectname[seclen] = 0;
 
          return;
 
        }
 
    }
 
 
 
  if (len > 16)
 
    len = 16;
 
  memcpy (section->segname, name, len);
 
  section->segname[len] = 0;
 
  memcpy (section->sectname, name, len);
 
  section->sectname[len] = 0;
}
}
 
 
/* Copy any private info we understand from the input symbol
/* Copy any private info we understand from the input symbol
   to the output symbol.  */
   to the output symbol.  */
 
 
static bfd_boolean
bfd_boolean
bfd_mach_o_bfd_copy_private_symbol_data (bfd *ibfd ATTRIBUTE_UNUSED,
bfd_mach_o_bfd_copy_private_symbol_data (bfd *ibfd ATTRIBUTE_UNUSED,
                                         asymbol *isymbol ATTRIBUTE_UNUSED,
                                         asymbol *isymbol ATTRIBUTE_UNUSED,
                                         bfd *obfd ATTRIBUTE_UNUSED,
                                         bfd *obfd ATTRIBUTE_UNUSED,
                                         asymbol *osymbol ATTRIBUTE_UNUSED)
                                         asymbol *osymbol ATTRIBUTE_UNUSED)
{
{
Line 131... Line 267...
}
}
 
 
/* Copy any private info we understand from the input section
/* Copy any private info we understand from the input section
   to the output section.  */
   to the output section.  */
 
 
static bfd_boolean
bfd_boolean
bfd_mach_o_bfd_copy_private_section_data (bfd *ibfd ATTRIBUTE_UNUSED,
bfd_mach_o_bfd_copy_private_section_data (bfd *ibfd ATTRIBUTE_UNUSED,
                                          asection *isection ATTRIBUTE_UNUSED,
                                          asection *isection ATTRIBUTE_UNUSED,
                                          bfd *obfd ATTRIBUTE_UNUSED,
                                          bfd *obfd ATTRIBUTE_UNUSED,
                                          asection *osection ATTRIBUTE_UNUSED)
                                          asection *osection ATTRIBUTE_UNUSED)
{
{
Line 143... Line 279...
}
}
 
 
/* Copy any private info we understand from the input bfd
/* Copy any private info we understand from the input bfd
   to the output bfd.  */
   to the output bfd.  */
 
 
static bfd_boolean
bfd_boolean
bfd_mach_o_bfd_copy_private_bfd_data (bfd *ibfd, bfd *obfd)
bfd_mach_o_bfd_copy_private_bfd_data (bfd *ibfd, bfd *obfd)
{
{
 
  if (bfd_get_flavour (ibfd) != bfd_target_mach_o_flavour
 
      || bfd_get_flavour (obfd) != bfd_target_mach_o_flavour)
 
    return TRUE;
 
 
  BFD_ASSERT (bfd_mach_o_valid (ibfd));
  BFD_ASSERT (bfd_mach_o_valid (ibfd));
  BFD_ASSERT (bfd_mach_o_valid (obfd));
  BFD_ASSERT (bfd_mach_o_valid (obfd));
 
 
  obfd->tdata.mach_o_data = ibfd->tdata.mach_o_data;
  /* FIXME: copy commands.  */
  obfd->tdata.mach_o_data->ibfd = ibfd;
 
  return TRUE;
  return TRUE;
}
}
 
 
 
/* Count the total number of symbols.  */
 
 
static long
static long
bfd_mach_o_count_symbols (bfd *abfd)
bfd_mach_o_count_symbols (bfd *abfd)
{
{
  bfd_mach_o_data_struct *mdata = NULL;
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
  long nsyms = 0;
 
  unsigned long i;
 
 
 
  BFD_ASSERT (bfd_mach_o_valid (abfd));
  if (mdata->symtab == NULL)
  mdata = abfd->tdata.mach_o_data;
    return 0;
 
  return mdata->symtab->nsyms;
  for (i = 0; i < mdata->header.ncmds; i++)
 
    if (mdata->commands[i].type == BFD_MACH_O_LC_SYMTAB)
 
      {
 
        bfd_mach_o_symtab_command *sym = &mdata->commands[i].command.symtab;
 
        nsyms += sym->nsyms;
 
      }
 
 
 
  return nsyms;
 
}
}
 
 
static long
long
bfd_mach_o_get_symtab_upper_bound (bfd *abfd)
bfd_mach_o_get_symtab_upper_bound (bfd *abfd)
{
{
  long nsyms = bfd_mach_o_count_symbols (abfd);
  long nsyms = bfd_mach_o_count_symbols (abfd);
 
 
  if (nsyms < 0)
 
    return nsyms;
 
 
 
  return ((nsyms + 1) * sizeof (asymbol *));
  return ((nsyms + 1) * sizeof (asymbol *));
}
}
 
 
static long
long
bfd_mach_o_canonicalize_symtab (bfd *abfd, asymbol **alocation)
bfd_mach_o_canonicalize_symtab (bfd *abfd, asymbol **alocation)
{
{
  bfd_mach_o_data_struct *mdata = abfd->tdata.mach_o_data;
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
  long nsyms = bfd_mach_o_count_symbols (abfd);
  long nsyms = bfd_mach_o_count_symbols (abfd);
  asymbol **csym = alocation;
  bfd_mach_o_symtab_command *sym = mdata->symtab;
  unsigned long i, j;
  unsigned long j;
 
 
  if (nsyms < 0)
  if (nsyms < 0)
    return nsyms;
    return nsyms;
 
 
  for (i = 0; i < mdata->header.ncmds; i++)
  if (bfd_mach_o_scan_read_symtab_symbols (abfd) != 0)
    {
    {
      if (mdata->commands[i].type == BFD_MACH_O_LC_SYMTAB)
      fprintf (stderr,
        {
               "bfd_mach_o_canonicalize_symtab: unable to load symbols\n");
          bfd_mach_o_symtab_command *sym = &mdata->commands[i].command.symtab;
 
 
 
          if (bfd_mach_o_scan_read_symtab_symbols (abfd, &mdata->commands[i].command.symtab) != 0)
 
            {
 
              fprintf (stderr, "bfd_mach_o_canonicalize_symtab: unable to load symbols for section %lu\n", i);
 
              return 0;
              return 0;
            }
            }
 
 
          BFD_ASSERT (sym->symbols != NULL);
          BFD_ASSERT (sym->symbols != NULL);
 
 
          for (j = 0; j < sym->nsyms; j++)
          for (j = 0; j < sym->nsyms; j++)
            {
    alocation[j] = &sym->symbols[j].symbol;
              BFD_ASSERT (csym < (alocation + nsyms));
 
              *csym++ = &sym->symbols[j];
 
            }
 
        }
 
    }
 
 
 
  *csym++ = NULL;
  alocation[j] = NULL;
 
 
  return nsyms;
  return nsyms;
}
}
 
 
static void
void
bfd_mach_o_get_symbol_info (bfd *abfd ATTRIBUTE_UNUSED,
bfd_mach_o_get_symbol_info (bfd *abfd ATTRIBUTE_UNUSED,
                            asymbol *symbol,
                            asymbol *symbol,
                            symbol_info *ret)
                            symbol_info *ret)
{
{
  bfd_symbol_info (symbol, ret);
  bfd_symbol_info (symbol, ret);
}
}
 
 
static void
void
bfd_mach_o_print_symbol (bfd *abfd,
bfd_mach_o_print_symbol (bfd *abfd,
                         PTR afile,
                         PTR afile,
                         asymbol *symbol,
                         asymbol *symbol,
                         bfd_print_symbol_type how)
                         bfd_print_symbol_type how)
{
{
  FILE *file = (FILE *) afile;
  FILE *file = (FILE *) afile;
 
  const char *name;
 
  bfd_mach_o_asymbol *asym = (bfd_mach_o_asymbol *)symbol;
 
 
  switch (how)
  switch (how)
    {
    {
    case bfd_print_symbol_name:
    case bfd_print_symbol_name:
      fprintf (file, "%s", symbol->name);
      fprintf (file, "%s", symbol->name);
      break;
      break;
    default:
    default:
      bfd_print_symbol_vandf (abfd, (PTR) file, symbol);
      bfd_print_symbol_vandf (abfd, (PTR) file, symbol);
      fprintf (file, " %-5s %s", symbol->section->name, symbol->name);
      if (asym->n_type & BFD_MACH_O_N_STAB)
 
        name = bfd_get_stab_name (asym->n_type);
 
      else
 
        switch (asym->n_type & BFD_MACH_O_N_TYPE)
 
          {
 
          case BFD_MACH_O_N_UNDF:
 
            name = "UND";
 
            break;
 
          case BFD_MACH_O_N_ABS:
 
            name = "ABS";
 
            break;
 
          case BFD_MACH_O_N_INDR:
 
            name = "INDR";
 
            break;
 
          case BFD_MACH_O_N_PBUD:
 
            name = "PBUD";
 
            break;
 
          case BFD_MACH_O_N_SECT:
 
            name = "SECT";
 
            break;
 
          default:
 
            name = "???";
 
            break;
 
          }
 
      if (name == NULL)
 
        name = "";
 
      fprintf (file, " %02x %-6s %02x %04x",
 
               asym->n_type, name, asym->n_sect, asym->n_desc);
 
      if ((asym->n_type & BFD_MACH_O_N_STAB) == 0
 
          && (asym->n_type & BFD_MACH_O_N_TYPE) == BFD_MACH_O_N_SECT)
 
        fprintf (file, " %-5s", symbol->section->name);
 
      fprintf (file, " %s", symbol->name);
    }
    }
}
}
 
 
static void
static void
bfd_mach_o_convert_architecture (bfd_mach_o_cpu_type mtype,
bfd_mach_o_convert_architecture (bfd_mach_o_cpu_type mtype,
Line 262... Line 414...
 
 
  switch (mtype)
  switch (mtype)
    {
    {
    case BFD_MACH_O_CPU_TYPE_VAX: *type = bfd_arch_vax; break;
    case BFD_MACH_O_CPU_TYPE_VAX: *type = bfd_arch_vax; break;
    case BFD_MACH_O_CPU_TYPE_MC680x0: *type = bfd_arch_m68k; break;
    case BFD_MACH_O_CPU_TYPE_MC680x0: *type = bfd_arch_m68k; break;
    case BFD_MACH_O_CPU_TYPE_I386: *type = bfd_arch_i386; break;
    case BFD_MACH_O_CPU_TYPE_I386:
 
      *type = bfd_arch_i386;
 
      *subtype = bfd_mach_i386_i386;
 
      break;
 
    case BFD_MACH_O_CPU_TYPE_X86_64:
 
      *type = bfd_arch_i386;
 
      *subtype = bfd_mach_x86_64;
 
      break;
    case BFD_MACH_O_CPU_TYPE_MIPS: *type = bfd_arch_mips; break;
    case BFD_MACH_O_CPU_TYPE_MIPS: *type = bfd_arch_mips; break;
    case BFD_MACH_O_CPU_TYPE_MC98000: *type = bfd_arch_m98k; break;
    case BFD_MACH_O_CPU_TYPE_MC98000: *type = bfd_arch_m98k; break;
    case BFD_MACH_O_CPU_TYPE_HPPA: *type = bfd_arch_hppa; break;
    case BFD_MACH_O_CPU_TYPE_HPPA: *type = bfd_arch_hppa; break;
    case BFD_MACH_O_CPU_TYPE_ARM: *type = bfd_arch_arm; break;
    case BFD_MACH_O_CPU_TYPE_ARM: *type = bfd_arch_arm; break;
    case BFD_MACH_O_CPU_TYPE_MC88000: *type = bfd_arch_m88k; break;
    case BFD_MACH_O_CPU_TYPE_MC88000: *type = bfd_arch_m88k; break;
    case BFD_MACH_O_CPU_TYPE_SPARC: *type = bfd_arch_sparc; break;
    case BFD_MACH_O_CPU_TYPE_SPARC:
 
      *type = bfd_arch_sparc;
 
      *subtype = bfd_mach_sparc;
 
      break;
    case BFD_MACH_O_CPU_TYPE_I860: *type = bfd_arch_i860; break;
    case BFD_MACH_O_CPU_TYPE_I860: *type = bfd_arch_i860; break;
    case BFD_MACH_O_CPU_TYPE_ALPHA: *type = bfd_arch_alpha; break;
    case BFD_MACH_O_CPU_TYPE_ALPHA: *type = bfd_arch_alpha; break;
    case BFD_MACH_O_CPU_TYPE_POWERPC: *type = bfd_arch_powerpc; break;
    case BFD_MACH_O_CPU_TYPE_POWERPC:
    default: *type = bfd_arch_unknown; break;
      *type = bfd_arch_powerpc;
    }
      *subtype = bfd_mach_ppc;
 
      break;
  switch (*type)
    case BFD_MACH_O_CPU_TYPE_POWERPC_64:
    {
      *type = bfd_arch_powerpc;
    case bfd_arch_i386: *subtype = bfd_mach_i386_i386; break;
      *subtype = bfd_mach_ppc64;
    case bfd_arch_sparc: *subtype = bfd_mach_sparc; break;
      break;
    default:
    default:
      *subtype = bfd_arch_unknown;
      *type = bfd_arch_unknown;
 
      break;
    }
    }
}
}
 
 
static int
static bfd_boolean
bfd_mach_o_write_header (bfd *abfd, bfd_mach_o_header *header)
bfd_mach_o_write_header (bfd *abfd, bfd_mach_o_header *header)
{
{
  unsigned char buf[28];
  unsigned char buf[32];
 
  unsigned int size;
 
 
 
  size = mach_o_wide_p (header) ?
 
    BFD_MACH_O_HEADER_64_SIZE : BFD_MACH_O_HEADER_SIZE;
 
 
  bfd_h_put_32 (abfd, header->magic, buf + 0);
  bfd_h_put_32 (abfd, header->magic, buf + 0);
  bfd_h_put_32 (abfd, header->cputype, buf + 4);
  bfd_h_put_32 (abfd, header->cputype, buf + 4);
  bfd_h_put_32 (abfd, header->cpusubtype, buf + 8);
  bfd_h_put_32 (abfd, header->cpusubtype, buf + 8);
  bfd_h_put_32 (abfd, header->filetype, buf + 12);
  bfd_h_put_32 (abfd, header->filetype, buf + 12);
  bfd_h_put_32 (abfd, header->ncmds, buf + 16);
  bfd_h_put_32 (abfd, header->ncmds, buf + 16);
  bfd_h_put_32 (abfd, header->sizeofcmds, buf + 20);
  bfd_h_put_32 (abfd, header->sizeofcmds, buf + 20);
  bfd_h_put_32 (abfd, header->flags, buf + 24);
  bfd_h_put_32 (abfd, header->flags, buf + 24);
 
 
  bfd_seek (abfd, 0, SEEK_SET);
  if (mach_o_wide_p (header))
  if (bfd_bwrite ((PTR) buf, 28, abfd) != 28)
    bfd_h_put_32 (abfd, header->reserved, buf + 28);
    return -1;
 
 
 
  return 0;
  if (bfd_seek (abfd, 0, SEEK_SET) != 0
 
      || bfd_bwrite ((PTR) buf, size, abfd) != size)
 
    return FALSE;
 
 
 
  return TRUE;
}
}
 
 
static int
static int
bfd_mach_o_scan_write_thread (bfd *abfd,
bfd_mach_o_scan_write_thread (bfd *abfd, bfd_mach_o_load_command *command)
                              bfd_mach_o_load_command *command)
 
{
{
  bfd_mach_o_thread_command *cmd = &command->command.thread;
  bfd_mach_o_thread_command *cmd = &command->command.thread;
  unsigned int i;
  unsigned int i;
  unsigned char buf[8];
  unsigned char buf[8];
  bfd_vma offset;
  unsigned int offset;
  unsigned int nflavours;
  unsigned int nflavours;
 
 
  BFD_ASSERT ((command->type == BFD_MACH_O_LC_THREAD)
  BFD_ASSERT ((command->type == BFD_MACH_O_LC_THREAD)
              || (command->type == BFD_MACH_O_LC_UNIXTHREAD));
              || (command->type == BFD_MACH_O_LC_UNIXTHREAD));
 
 
Line 327... Line 496...
      BFD_ASSERT (cmd->flavours[i].offset == (command->offset + offset + 8));
      BFD_ASSERT (cmd->flavours[i].offset == (command->offset + offset + 8));
 
 
      bfd_h_put_32 (abfd, cmd->flavours[i].flavour, buf);
      bfd_h_put_32 (abfd, cmd->flavours[i].flavour, buf);
      bfd_h_put_32 (abfd, (cmd->flavours[i].size / 4), buf + 4);
      bfd_h_put_32 (abfd, (cmd->flavours[i].size / 4), buf + 4);
 
 
      bfd_seek (abfd, command->offset + offset, SEEK_SET);
      if (bfd_seek (abfd, command->offset + offset, SEEK_SET) != 0
      if (bfd_bwrite ((PTR) buf, 8, abfd) != 8)
          || bfd_bwrite ((PTR) buf, 8, abfd) != 8)
        return -1;
        return -1;
 
 
 
      offset += cmd->flavours[i].size + 8;
 
    }
 
 
 
  return 0;
 
}
 
 
 
long
 
bfd_mach_o_get_reloc_upper_bound (bfd *abfd ATTRIBUTE_UNUSED,
 
                                  asection *asect)
 
{
 
  return (asect->reloc_count + 1) * sizeof (arelent *);
 
}
 
 
 
static int
 
bfd_mach_o_canonicalize_one_reloc (bfd *abfd, char *buf,
 
                                   arelent *res, asymbol **syms)
 
{
 
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
 
  bfd_mach_o_backend_data *bed = bfd_mach_o_get_backend_data (abfd);
 
  bfd_mach_o_reloc_info reloc;
 
  bfd_vma addr;
 
  bfd_vma symnum;
 
  asymbol **sym;
 
 
 
  addr = bfd_get_32 (abfd, buf + 0);
 
  symnum = bfd_get_32 (abfd, buf + 4);
 
 
 
  if (addr & BFD_MACH_O_SR_SCATTERED)
 
    {
 
      unsigned int j;
 
 
 
      /* Scattered relocation.
 
         Extract section and offset from r_value.  */
 
      res->sym_ptr_ptr = NULL;
 
      res->addend = 0;
 
      for (j = 0; j < mdata->nsects; j++)
 
        {
 
          bfd_mach_o_section *sect = mdata->sections[j];
 
          if (symnum >= sect->addr && symnum < sect->addr + sect->size)
 
            {
 
              res->sym_ptr_ptr = sect->bfdsection->symbol_ptr_ptr;
 
              res->addend = symnum - sect->addr;
 
              break;
 
            }
 
        }
 
      res->address = BFD_MACH_O_GET_SR_ADDRESS (addr);
 
      reloc.r_type = BFD_MACH_O_GET_SR_TYPE (addr);
 
      reloc.r_length = BFD_MACH_O_GET_SR_LENGTH (addr);
 
      reloc.r_pcrel = addr & BFD_MACH_O_SR_PCREL;
 
      reloc.r_scattered = 1;
 
    }
 
  else
 
    {
 
      unsigned int num = BFD_MACH_O_GET_R_SYMBOLNUM (symnum);
 
      res->addend = 0;
 
      res->address = addr;
 
      if (symnum & BFD_MACH_O_R_EXTERN)
 
        sym = syms + num;
 
      else
 
        {
 
          BFD_ASSERT (num != 0);
 
          BFD_ASSERT (num <= mdata->nsects);
 
          sym = mdata->sections[num - 1]->bfdsection->symbol_ptr_ptr;
 
        }
 
      res->sym_ptr_ptr = sym;
 
      reloc.r_type = BFD_MACH_O_GET_R_TYPE (symnum);
 
      reloc.r_length = BFD_MACH_O_GET_R_LENGTH (symnum);
 
      reloc.r_pcrel = (symnum & BFD_MACH_O_R_PCREL) ? 1 : 0;
 
      reloc.r_scattered = 0;
 
    }
 
 
 
  if (!(*bed->_bfd_mach_o_swap_reloc_in)(res, &reloc))
 
    return -1;
 
  return 0;
 
}
 
 
 
static int
 
bfd_mach_o_canonicalize_relocs (bfd *abfd, unsigned long filepos,
 
                                unsigned long count,
 
                                arelent *res, asymbol **syms)
 
{
 
  unsigned long i;
 
  char *native_relocs;
 
  bfd_size_type native_size;
 
 
 
  /* Allocate and read relocs.  */
 
  native_size = count * BFD_MACH_O_RELENT_SIZE;
 
  native_relocs = bfd_malloc (native_size);
 
  if (native_relocs == NULL)
 
    return -1;
 
 
 
  if (bfd_seek (abfd, filepos, SEEK_SET) != 0
 
      || bfd_bread (native_relocs, native_size, abfd) != native_size)
 
    goto err;
 
 
 
  for (i = 0; i < count; i++)
 
    {
 
      char *buf = native_relocs + BFD_MACH_O_RELENT_SIZE * i;
 
 
 
      if (bfd_mach_o_canonicalize_one_reloc (abfd, buf, &res[i], syms) < 0)
 
        goto err;
 
    }
 
  free (native_relocs);
 
  return i;
 
 err:
 
  free (native_relocs);
 
  return -1;
 
}
 
 
 
long
 
bfd_mach_o_canonicalize_reloc (bfd *abfd, asection *asect,
 
                               arelent **rels, asymbol **syms)
 
{
 
  bfd_mach_o_backend_data *bed = bfd_mach_o_get_backend_data (abfd);
 
  unsigned long i;
 
  arelent *res;
 
 
 
  if (asect->reloc_count == 0)
 
    return 0;
 
 
 
  /* No need to go further if we don't know how to read relocs.  */
 
  if (bed->_bfd_mach_o_swap_reloc_in == NULL)
 
    return 0;
 
 
 
  res = bfd_malloc (asect->reloc_count * sizeof (arelent));
 
  if (res == NULL)
 
    return -1;
 
 
 
  if (bfd_mach_o_canonicalize_relocs (abfd, asect->rel_filepos,
 
                                      asect->reloc_count, res, syms) < 0)
 
    {
 
      free (res);
 
      return -1;
 
    }
 
 
 
  for (i = 0; i < asect->reloc_count; i++)
 
    rels[i] = &res[i];
 
  rels[i] = NULL;
 
  asect->relocation = res;
 
 
 
  return i;
 
}
 
 
 
long
 
bfd_mach_o_get_dynamic_reloc_upper_bound (bfd *abfd)
 
{
 
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
 
 
 
  if (mdata->dysymtab == NULL)
 
    return 1;
 
  return (mdata->dysymtab->nextrel + mdata->dysymtab->nlocrel)
 
    * sizeof (arelent *);
 
}
 
 
 
long
 
bfd_mach_o_canonicalize_dynamic_reloc (bfd *abfd, arelent **rels,
 
                                       struct bfd_symbol **syms)
 
{
 
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
 
  bfd_mach_o_dysymtab_command *dysymtab = mdata->dysymtab;
 
  bfd_mach_o_backend_data *bed = bfd_mach_o_get_backend_data (abfd);
 
  unsigned long i;
 
  arelent *res;
 
 
 
  if (dysymtab == NULL)
 
    return 0;
 
  if (dysymtab->nextrel == 0 && dysymtab->nlocrel == 0)
 
    return 0;
 
 
 
  /* No need to go further if we don't know how to read relocs.  */
 
  if (bed->_bfd_mach_o_swap_reloc_in == NULL)
 
    return 0;
 
 
 
  res = bfd_malloc ((dysymtab->nextrel + dysymtab->nlocrel) * sizeof (arelent));
 
  if (res == NULL)
 
    return -1;
 
 
 
  if (bfd_mach_o_canonicalize_relocs (abfd, dysymtab->extreloff,
 
                                      dysymtab->nextrel, res, syms) < 0)
 
    {
 
      free (res);
 
      return -1;
 
    }
 
 
 
  if (bfd_mach_o_canonicalize_relocs (abfd, dysymtab->locreloff,
 
                                      dysymtab->nlocrel,
 
                                      res + dysymtab->nextrel, syms) < 0)
 
    {
 
      free (res);
 
      return -1;
 
    }
 
 
 
  for (i = 0; i < dysymtab->nextrel + dysymtab->nlocrel; i++)
 
    rels[i] = &res[i];
 
  rels[i] = NULL;
 
  return i;
 
}
 
 
 
static bfd_boolean
 
bfd_mach_o_scan_write_relocs (bfd *abfd, bfd_mach_o_section *section)
 
{
 
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
 
  unsigned int i;
 
  arelent **entries;
 
  asection *sec;
 
  bfd_mach_o_backend_data *bed = bfd_mach_o_get_backend_data (abfd);
 
 
 
  sec = section->bfdsection;
 
  if (sec->reloc_count == 0)
 
    return TRUE;
 
 
 
  if (bed->_bfd_mach_o_swap_reloc_out == NULL)
 
    return TRUE;
 
 
 
  /* Allocate relocation room.  */
 
  mdata->filelen = FILE_ALIGN(mdata->filelen, 2);
 
  section->nreloc = sec->reloc_count;
 
  sec->rel_filepos = mdata->filelen;
 
  section->reloff = sec->rel_filepos;
 
  mdata->filelen += sec->reloc_count * BFD_MACH_O_RELENT_SIZE;
 
 
 
  if (bfd_seek (abfd, section->reloff, SEEK_SET) != 0)
 
    return FALSE;
 
 
 
  /* Convert and write.  */
 
  entries = section->bfdsection->orelocation;
 
  for (i = 0; i < section->nreloc; i++)
 
    {
 
      arelent *rel = entries[i];
 
      char buf[8];
 
      bfd_mach_o_reloc_info info, *pinfo = &info;
 
 
 
      /* Convert relocation to an intermediate representation.  */
 
      if (!(*bed->_bfd_mach_o_swap_reloc_out) (rel, pinfo))
 
        return FALSE;
 
 
 
      /* Lower the relocation info.  */
 
      if (pinfo->r_scattered)
 
        {
 
          unsigned long v;
 
 
 
          v = BFD_MACH_O_SR_SCATTERED
 
            | (pinfo->r_pcrel ? BFD_MACH_O_SR_PCREL : 0)
 
            | BFD_MACH_O_SET_SR_LENGTH(pinfo->r_length)
 
            | BFD_MACH_O_SET_SR_TYPE(pinfo->r_type)
 
            | BFD_MACH_O_SET_SR_ADDRESS(pinfo->r_address);
 
          bfd_put_32 (abfd, v, buf);
 
          bfd_put_32 (abfd, pinfo->r_value, buf + 4);
 
        }
 
      else
 
        {
 
          unsigned long v;
 
 
      offset += cmd->flavours[i].size + 8;
          bfd_put_32 (abfd, pinfo->r_address, buf);
 
          v = BFD_MACH_O_SET_R_SYMBOLNUM (pinfo->r_value)
 
            | (pinfo->r_pcrel ? BFD_MACH_O_R_PCREL : 0)
 
            | BFD_MACH_O_SET_R_LENGTH (pinfo->r_length)
 
            | (pinfo->r_extern ? BFD_MACH_O_R_EXTERN : 0)
 
            | BFD_MACH_O_SET_R_TYPE (pinfo->r_type);
 
          bfd_put_32 (abfd, v, buf + 4);
    }
    }
 
 
  return 0;
      if (bfd_bwrite ((PTR) buf, BFD_MACH_O_RELENT_SIZE, abfd)
 
          != BFD_MACH_O_RELENT_SIZE)
 
        return FALSE;
 
    }
 
  return TRUE;
}
}
 
 
static int
static int
bfd_mach_o_scan_write_section (bfd *abfd,
bfd_mach_o_scan_write_section_32 (bfd *abfd, bfd_mach_o_section *section)
                               bfd_mach_o_section *section,
 
                               bfd_vma offset)
 
{
{
  unsigned char buf[68];
  unsigned char buf[BFD_MACH_O_SECTION_SIZE];
 
 
  memcpy (buf, section->sectname, 16);
  memcpy (buf, section->sectname, 16);
  memcpy (buf + 16, section->segname, 16);
  memcpy (buf + 16, section->segname, 16);
  bfd_h_put_32 (abfd, section->addr, buf + 32);
  bfd_h_put_32 (abfd, section->addr, buf + 32);
  bfd_h_put_32 (abfd, section->size, buf + 36);
  bfd_h_put_32 (abfd, section->size, buf + 36);
  bfd_h_put_32 (abfd, section->offset, buf + 40);
  bfd_h_put_32 (abfd, section->offset, buf + 40);
  bfd_h_put_32 (abfd, section->align, buf + 44);
  bfd_h_put_32 (abfd, section->align, buf + 44);
  bfd_h_put_32 (abfd, section->reloff, buf + 48);
  bfd_h_put_32 (abfd, section->reloff, buf + 48);
  bfd_h_put_32 (abfd, section->nreloc, buf + 52);
  bfd_h_put_32 (abfd, section->nreloc, buf + 52);
  bfd_h_put_32 (abfd, section->flags, buf + 56);
  bfd_h_put_32 (abfd, section->flags, buf + 56);
  /* bfd_h_put_32 (abfd, section->reserved1, buf + 60); */
  bfd_h_put_32 (abfd, section->reserved1, buf + 60);
  /* bfd_h_put_32 (abfd, section->reserved2, buf + 64); */
  bfd_h_put_32 (abfd, section->reserved2, buf + 64);
 
 
 
  if (bfd_bwrite ((PTR) buf, BFD_MACH_O_SECTION_SIZE, abfd)
 
      != BFD_MACH_O_SECTION_SIZE)
 
    return -1;
 
 
 
  return 0;
 
}
 
 
 
static int
 
bfd_mach_o_scan_write_section_64 (bfd *abfd, bfd_mach_o_section *section)
 
{
 
  unsigned char buf[BFD_MACH_O_SECTION_64_SIZE];
 
 
 
  memcpy (buf, section->sectname, 16);
 
  memcpy (buf + 16, section->segname, 16);
 
  bfd_h_put_64 (abfd, section->addr, buf + 32);
 
  bfd_h_put_64 (abfd, section->size, buf + 40);
 
  bfd_h_put_32 (abfd, section->offset, buf + 48);
 
  bfd_h_put_32 (abfd, section->align, buf + 52);
 
  bfd_h_put_32 (abfd, section->reloff, buf + 56);
 
  bfd_h_put_32 (abfd, section->nreloc, buf + 60);
 
  bfd_h_put_32 (abfd, section->flags, buf + 64);
 
  bfd_h_put_32 (abfd, section->reserved1, buf + 68);
 
  bfd_h_put_32 (abfd, section->reserved2, buf + 72);
 
  bfd_h_put_32 (abfd, section->reserved3, buf + 76);
 
 
  bfd_seek (abfd, offset, SEEK_SET);
  if (bfd_bwrite ((PTR) buf, BFD_MACH_O_SECTION_64_SIZE, abfd)
  if (bfd_bwrite ((PTR) buf, 68, abfd) != 68)
      != BFD_MACH_O_SECTION_64_SIZE)
    return -1;
    return -1;
 
 
  return 0;
  return 0;
}
}
 
 
static int
static int
bfd_mach_o_scan_write_segment (bfd *abfd, bfd_mach_o_load_command *command)
bfd_mach_o_scan_write_segment_32 (bfd *abfd, bfd_mach_o_load_command *command)
{
{
  unsigned char buf[48];
  unsigned char buf[BFD_MACH_O_LC_SEGMENT_SIZE];
  bfd_mach_o_segment_command *seg = &command->command.segment;
  bfd_mach_o_segment_command *seg = &command->command.segment;
  unsigned long i;
  unsigned long i;
 
 
  BFD_ASSERT (command->type == BFD_MACH_O_LC_SEGMENT);
  BFD_ASSERT (command->type == BFD_MACH_O_LC_SEGMENT);
 
 
 
  for (i = 0; i < seg->nsects; i++)
 
    if (!bfd_mach_o_scan_write_relocs (abfd, &seg->sections[i]))
 
      return -1;
 
 
  memcpy (buf, seg->segname, 16);
  memcpy (buf, seg->segname, 16);
  bfd_h_put_32 (abfd, seg->vmaddr, buf + 16);
  bfd_h_put_32 (abfd, seg->vmaddr, buf + 16);
  bfd_h_put_32 (abfd, seg->vmsize, buf + 20);
  bfd_h_put_32 (abfd, seg->vmsize, buf + 20);
  bfd_h_put_32 (abfd, seg->fileoff, buf + 24);
  bfd_h_put_32 (abfd, seg->fileoff, buf + 24);
  bfd_h_put_32 (abfd, seg->filesize, buf + 28);
  bfd_h_put_32 (abfd, seg->filesize, buf + 28);
  bfd_h_put_32 (abfd, 0 /* seg->maxprot */, buf + 32);
  bfd_h_put_32 (abfd, seg->maxprot, buf + 32);
  bfd_h_put_32 (abfd, 0 /* seg->initprot */, buf + 36);
  bfd_h_put_32 (abfd, seg->initprot, buf + 36);
  bfd_h_put_32 (abfd, seg->nsects, buf + 40);
  bfd_h_put_32 (abfd, seg->nsects, buf + 40);
  bfd_h_put_32 (abfd, seg->flags, buf + 44);
  bfd_h_put_32 (abfd, seg->flags, buf + 44);
 
 
  bfd_seek (abfd, command->offset + 8, SEEK_SET);
  if (bfd_seek (abfd, command->offset + 8, SEEK_SET) != 0
  if (bfd_bwrite ((PTR) buf, 48, abfd) != 48)
      || (bfd_bwrite ((PTR) buf, BFD_MACH_O_LC_SEGMENT_SIZE - 8, abfd)
 
          != BFD_MACH_O_LC_SEGMENT_SIZE - 8))
    return -1;
    return -1;
 
 
  {
  for (i = 0; i < seg->nsects; i++)
    char buf[1024];
    if (bfd_mach_o_scan_write_section_32 (abfd, &seg->sections[i]))
    bfd_vma nbytes = seg->filesize;
      return -1;
    bfd_vma curoff = seg->fileoff;
 
 
  return 0;
 
}
 
 
    while (nbytes > 0)
static int
 
bfd_mach_o_scan_write_segment_64 (bfd *abfd, bfd_mach_o_load_command *command)
      {
      {
        bfd_vma thisread = nbytes;
  unsigned char buf[BFD_MACH_O_LC_SEGMENT_64_SIZE];
 
  bfd_mach_o_segment_command *seg = &command->command.segment;
 
  unsigned long i;
 
 
        if (thisread > 1024)
  BFD_ASSERT (command->type == BFD_MACH_O_LC_SEGMENT_64);
          thisread = 1024;
 
 
 
        bfd_seek (abfd, curoff, SEEK_SET);
  for (i = 0; i < seg->nsects; i++)
        if (bfd_bread ((PTR) buf, thisread, abfd) != thisread)
    if (!bfd_mach_o_scan_write_relocs (abfd, &seg->sections[i]))
          return -1;
          return -1;
 
 
        bfd_seek (abfd, curoff, SEEK_SET);
  memcpy (buf, seg->segname, 16);
        if (bfd_bwrite ((PTR) buf, thisread, abfd) != thisread)
  bfd_h_put_64 (abfd, seg->vmaddr, buf + 16);
 
  bfd_h_put_64 (abfd, seg->vmsize, buf + 24);
 
  bfd_h_put_64 (abfd, seg->fileoff, buf + 32);
 
  bfd_h_put_64 (abfd, seg->filesize, buf + 40);
 
  bfd_h_put_32 (abfd, seg->maxprot, buf + 48);
 
  bfd_h_put_32 (abfd, seg->initprot, buf + 52);
 
  bfd_h_put_32 (abfd, seg->nsects, buf + 56);
 
  bfd_h_put_32 (abfd, seg->flags, buf + 60);
 
 
 
  if (bfd_seek (abfd, command->offset + 8, SEEK_SET) != 0
 
      || (bfd_bwrite ((PTR) buf, BFD_MACH_O_LC_SEGMENT_64_SIZE - 8, abfd)
 
          != BFD_MACH_O_LC_SEGMENT_64_SIZE - 8))
          return -1;
          return -1;
 
 
        nbytes -= thisread;
 
        curoff += thisread;
 
      }
 
  }
 
 
 
  for (i = 0; i < seg->nsects; i++)
  for (i = 0; i < seg->nsects; i++)
    {
    if (bfd_mach_o_scan_write_section_64 (abfd, &seg->sections[i]))
      bfd_vma segoff = command->offset + 48 + 8 + (i * 68);
 
 
 
      if (bfd_mach_o_scan_write_section (abfd, &seg->sections[i], segoff) != 0)
 
        return -1;
        return -1;
    }
 
 
 
  return 0;
  return 0;
}
}
 
 
static int
static bfd_boolean
bfd_mach_o_scan_write_symtab_symbols (bfd *abfd,
bfd_mach_o_scan_write_symtab (bfd *abfd, bfd_mach_o_load_command *command)
                                      bfd_mach_o_load_command *command)
 
{
{
 
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
  bfd_mach_o_symtab_command *sym = &command->command.symtab;
  bfd_mach_o_symtab_command *sym = &command->command.symtab;
  asymbol *s = NULL;
  unsigned char buf[16];
  unsigned long i;
  unsigned long i;
 
  unsigned int wide = bfd_mach_o_wide_p (abfd);
 
  unsigned int symlen = wide ? BFD_MACH_O_NLIST_64_SIZE : BFD_MACH_O_NLIST_SIZE;
 
  struct bfd_strtab_hash *strtab;
 
  asymbol **symbols = bfd_get_outsymbols (abfd);
 
 
 
  BFD_ASSERT (command->type == BFD_MACH_O_LC_SYMTAB);
 
 
 
  /* Write the symbols first.  */
 
  mdata->filelen = FILE_ALIGN(mdata->filelen, wide ? 3 : 2);
 
  sym->symoff = mdata->filelen;
 
  if (bfd_seek (abfd, sym->symoff, SEEK_SET) != 0)
 
    return FALSE;
 
 
 
  sym->nsyms = bfd_get_symcount (abfd);
 
  mdata->filelen += sym->nsyms * symlen;
 
 
 
  strtab = _bfd_stringtab_init ();
 
  if (strtab == NULL)
 
    return FALSE;
 
 
  for (i = 0; i < sym->nsyms; i++)
  for (i = 0; i < sym->nsyms; i++)
    {
    {
      unsigned char buf[12];
      unsigned char buf[16];
      bfd_vma symoff = sym->symoff + (i * 12);
      bfd_size_type index;
      unsigned char ntype = 0;
      bfd_mach_o_asymbol *s = (bfd_mach_o_asymbol *)symbols[i];
      unsigned char nsect = 0;
 
      short ndesc = 0;
 
 
 
      s = &sym->symbols[i];
 
 
 
      /* Instead just set from the stored values.  */
 
      ntype = (s->udata.i >> 24) & 0xff;
 
      nsect = (s->udata.i >> 16) & 0xff;
 
      ndesc = s->udata.i & 0xffff;
 
 
 
      bfd_h_put_32 (abfd, s->name - sym->strtab, buf);
 
      bfd_h_put_8 (abfd, ntype, buf + 4);
 
      bfd_h_put_8 (abfd, nsect, buf + 5);
 
      bfd_h_put_16 (abfd, ndesc, buf + 6);
 
      bfd_h_put_32 (abfd, s->section->vma + s->value, buf + 8);
 
 
 
      bfd_seek (abfd, symoff, SEEK_SET);
      /* Compute name index.  */
      if (bfd_bwrite ((PTR) buf, 12, abfd) != 12)
      /* An index of 0 always means the empty string.  */
 
      if (s->symbol.name == 0 || s->symbol.name[0] == '\0')
 
        index = 0;
 
      else
        {
        {
          fprintf (stderr, "bfd_mach_o_scan_write_symtab_symbols: unable to write %d bytes at %lu\n",
          index = _bfd_stringtab_add (strtab, s->symbol.name, TRUE, FALSE);
                   12, (unsigned long) symoff);
          if (index == (bfd_size_type) -1)
          return -1;
            goto err;
        }
        }
 
      bfd_h_put_32 (abfd, index, buf);
 
      bfd_h_put_8 (abfd, s->n_type, buf + 4);
 
      bfd_h_put_8 (abfd, s->n_sect, buf + 5);
 
      bfd_h_put_16 (abfd, s->n_desc, buf + 6);
 
      if (wide)
 
        bfd_h_put_64 (abfd, s->symbol.section->vma + s->symbol.value, buf + 8);
 
      else
 
        bfd_h_put_32 (abfd, s->symbol.section->vma + s->symbol.value, buf + 8);
 
 
 
      if (bfd_bwrite ((PTR) buf, symlen, abfd) != symlen)
 
        goto err;
    }
    }
 
  sym->strsize = _bfd_stringtab_size (strtab);
 
  sym->stroff = mdata->filelen;
 
  mdata->filelen += sym->strsize;
 
 
 
  if (_bfd_stringtab_emit (abfd, strtab) != TRUE)
 
    goto err;
 
  _bfd_stringtab_free (strtab);
 
 
 
  /* The command.  */
 
  bfd_h_put_32 (abfd, sym->symoff, buf);
 
  bfd_h_put_32 (abfd, sym->nsyms, buf + 4);
 
  bfd_h_put_32 (abfd, sym->stroff, buf + 8);
 
  bfd_h_put_32 (abfd, sym->strsize, buf + 12);
 
 
  return 0;
  if (bfd_seek (abfd, command->offset + 8, SEEK_SET) != 0
 
      || bfd_bwrite ((PTR) buf, 16, abfd) != 16)
 
    return FALSE;
 
 
 
  return TRUE;
 
 
 
 err:
 
  _bfd_stringtab_free (strtab);
 
  return FALSE;
}
}
 
 
static int
/* Process the symbols and generate Mach-O specific fields.
bfd_mach_o_scan_write_symtab (bfd *abfd, bfd_mach_o_load_command *command)
   Number them.  */
 
 
 
static bfd_boolean
 
bfd_mach_o_mangle_symbols (bfd *abfd)
{
{
  bfd_mach_o_symtab_command *seg = &command->command.symtab;
  unsigned long i;
  unsigned char buf[16];
  asymbol **symbols = bfd_get_outsymbols (abfd);
 
 
  BFD_ASSERT (command->type == BFD_MACH_O_LC_SYMTAB);
  for (i = 0; i < bfd_get_symcount (abfd); i++)
 
    {
 
      bfd_mach_o_asymbol *s = (bfd_mach_o_asymbol *)symbols[i];
 
 
  bfd_h_put_32 (abfd, seg->symoff, buf);
      if (s->n_type == BFD_MACH_O_N_UNDF && !(s->symbol.flags & BSF_DEBUGGING))
  bfd_h_put_32 (abfd, seg->nsyms, buf + 4);
        {
  bfd_h_put_32 (abfd, seg->stroff, buf + 8);
          /* As genuine Mach-O symbols type shouldn't be N_UNDF (undefined
  bfd_h_put_32 (abfd, seg->strsize, buf + 12);
             symbols should be N_UNDEF | N_EXT), we suppose the back-end
 
             values haven't been set.  */
 
          if (s->symbol.section == bfd_abs_section_ptr)
 
            s->n_type = BFD_MACH_O_N_ABS;
 
          else if (s->symbol.section == bfd_und_section_ptr)
 
            {
 
              s->n_type = BFD_MACH_O_N_UNDF;
 
              if (s->symbol.flags & BSF_WEAK)
 
                s->n_desc |= BFD_MACH_O_N_WEAK_REF;
 
            }
 
          else if (s->symbol.section == bfd_com_section_ptr)
 
            s->n_type = BFD_MACH_O_N_UNDF | BFD_MACH_O_N_EXT;
 
          else
 
            s->n_type = BFD_MACH_O_N_SECT;
 
 
  bfd_seek (abfd, command->offset + 8, SEEK_SET);
          if (s->symbol.flags & BSF_GLOBAL)
  if (bfd_bwrite ((PTR) buf, 16, abfd) != 16)
            s->n_type |= BFD_MACH_O_N_EXT;
    return -1;
        }
 
 
  if (bfd_mach_o_scan_write_symtab_symbols (abfd, command) != 0)
      /* Compute section index.  */
    return -1;
      if (s->symbol.section != bfd_abs_section_ptr
 
          && s->symbol.section != bfd_und_section_ptr
 
          && s->symbol.section != bfd_com_section_ptr)
 
        s->n_sect = s->symbol.section->target_index;
 
 
  return 0;
      /* Number symbols.  */
 
      s->symbol.udata.i = i;
 
    }
 
  return TRUE;
}
}
 
 
static bfd_boolean
bfd_boolean
bfd_mach_o_write_contents (bfd *abfd)
bfd_mach_o_write_contents (bfd *abfd)
{
{
  unsigned int i;
  unsigned int i;
  asection *s;
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
 
 
  bfd_mach_o_data_struct *mdata = abfd->tdata.mach_o_data;
 
 
 
  /* Write data sections first in case they overlap header data to be
  if (mdata->header.ncmds == 0)
     written later.  */
    if (!bfd_mach_o_build_commands (abfd))
 
      return FALSE;
  for (s = abfd->sections; s != (asection *) NULL; s = s->next)
 
    ;
 
 
 
  /* Now write header information.  */
  /* Now write header information.  */
  if (bfd_mach_o_write_header (abfd, &mdata->header) != 0)
  if (mdata->header.filetype == 0)
 
    {
 
      if (abfd->flags & EXEC_P)
 
        mdata->header.filetype = BFD_MACH_O_MH_EXECUTE;
 
      else if (abfd->flags & DYNAMIC)
 
        mdata->header.filetype = BFD_MACH_O_MH_DYLIB;
 
      else
 
        mdata->header.filetype = BFD_MACH_O_MH_OBJECT;
 
    }
 
  if (!bfd_mach_o_write_header (abfd, &mdata->header))
 
    return FALSE;
 
 
 
  /* Assign a number to each symbols.  */
 
  if (!bfd_mach_o_mangle_symbols (abfd))
    return FALSE;
    return FALSE;
 
 
  for (i = 0; i < mdata->header.ncmds; i++)
  for (i = 0; i < mdata->header.ncmds; i++)
    {
    {
      unsigned char buf[8];
      unsigned char buf[8];
      bfd_mach_o_load_command *cur = &mdata->commands[i];
      bfd_mach_o_load_command *cur = &mdata->commands[i];
      unsigned long typeflag;
      unsigned long typeflag;
 
 
      typeflag = cur->type_required ? cur->type & BFD_MACH_O_LC_REQ_DYLD : cur->type;
      typeflag = cur->type | (cur->type_required ? BFD_MACH_O_LC_REQ_DYLD : 0);
 
 
      bfd_h_put_32 (abfd, typeflag, buf);
      bfd_h_put_32 (abfd, typeflag, buf);
      bfd_h_put_32 (abfd, cur->len, buf + 4);
      bfd_h_put_32 (abfd, cur->len, buf + 4);
 
 
      bfd_seek (abfd, cur->offset, SEEK_SET);
      if (bfd_seek (abfd, cur->offset, SEEK_SET) != 0
      if (bfd_bwrite ((PTR) buf, 8, abfd) != 8)
          || bfd_bwrite ((PTR) buf, 8, abfd) != 8)
        return FALSE;
        return FALSE;
 
 
      switch (cur->type)
      switch (cur->type)
        {
        {
        case BFD_MACH_O_LC_SEGMENT:
        case BFD_MACH_O_LC_SEGMENT:
          if (bfd_mach_o_scan_write_segment (abfd, cur) != 0)
          if (bfd_mach_o_scan_write_segment_32 (abfd, cur) != 0)
 
            return FALSE;
 
          break;
 
        case BFD_MACH_O_LC_SEGMENT_64:
 
          if (bfd_mach_o_scan_write_segment_64 (abfd, cur) != 0)
            return FALSE;
            return FALSE;
          break;
          break;
        case BFD_MACH_O_LC_SYMTAB:
        case BFD_MACH_O_LC_SYMTAB:
          if (bfd_mach_o_scan_write_symtab (abfd, cur) != 0)
          if (!bfd_mach_o_scan_write_symtab (abfd, cur))
            return FALSE;
            return FALSE;
          break;
          break;
        case BFD_MACH_O_LC_SYMSEG:
        case BFD_MACH_O_LC_SYMSEG:
          break;
          break;
        case BFD_MACH_O_LC_THREAD:
        case BFD_MACH_O_LC_THREAD:
Line 545... Line 1087...
        case BFD_MACH_O_LC_PREPAGE:
        case BFD_MACH_O_LC_PREPAGE:
        case BFD_MACH_O_LC_DYSYMTAB:
        case BFD_MACH_O_LC_DYSYMTAB:
        case BFD_MACH_O_LC_LOAD_DYLIB:
        case BFD_MACH_O_LC_LOAD_DYLIB:
        case BFD_MACH_O_LC_LOAD_WEAK_DYLIB:
        case BFD_MACH_O_LC_LOAD_WEAK_DYLIB:
        case BFD_MACH_O_LC_ID_DYLIB:
        case BFD_MACH_O_LC_ID_DYLIB:
 
        case BFD_MACH_O_LC_REEXPORT_DYLIB:
        case BFD_MACH_O_LC_LOAD_DYLINKER:
        case BFD_MACH_O_LC_LOAD_DYLINKER:
        case BFD_MACH_O_LC_ID_DYLINKER:
        case BFD_MACH_O_LC_ID_DYLINKER:
        case BFD_MACH_O_LC_PREBOUND_DYLIB:
        case BFD_MACH_O_LC_PREBOUND_DYLIB:
        case BFD_MACH_O_LC_ROUTINES:
        case BFD_MACH_O_LC_ROUTINES:
        case BFD_MACH_O_LC_SUB_FRAMEWORK:
        case BFD_MACH_O_LC_SUB_FRAMEWORK:
          break;
          break;
        default:
        default:
          fprintf (stderr,
          fprintf (stderr,
                   "unable to write unknown load command 0x%lx\n",
                   "unable to write unknown load command 0x%lx\n",
                   (long) cur->type);
                   (unsigned long) cur->type);
          return FALSE;
          return FALSE;
        }
        }
    }
    }
 
 
  return TRUE;
  return TRUE;
}
}
 
 
static int
/* Build Mach-O load commands from the sections.  */
 
 
 
bfd_boolean
 
bfd_mach_o_build_commands (bfd *abfd)
 
{
 
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
 
  unsigned int wide = mach_o_wide_p (&mdata->header);
 
  bfd_mach_o_segment_command *seg;
 
  bfd_mach_o_section *sections;
 
  asection *sec;
 
  bfd_mach_o_load_command *cmd;
 
  bfd_mach_o_load_command *symtab_cmd;
 
  int target_index;
 
 
 
  /* Return now if commands are already built.  */
 
  if (mdata->header.ncmds)
 
    return FALSE;
 
 
 
  /* Very simple version: 1 command (segment) containing all sections.  */
 
  mdata->header.ncmds = 2;
 
  mdata->commands = bfd_alloc (abfd, mdata->header.ncmds
 
                               * sizeof (bfd_mach_o_load_command));
 
  if (mdata->commands == NULL)
 
    return FALSE;
 
  cmd = &mdata->commands[0];
 
  seg = &cmd->command.segment;
 
 
 
  seg->nsects = bfd_count_sections (abfd);
 
  sections = bfd_alloc (abfd, seg->nsects * sizeof (bfd_mach_o_section));
 
  if (sections == NULL)
 
    return FALSE;
 
  seg->sections = sections;
 
 
 
  /* Set segment command.  */
 
  if (wide)
 
    {
 
      cmd->type = BFD_MACH_O_LC_SEGMENT_64;
 
      cmd->offset = BFD_MACH_O_HEADER_64_SIZE;
 
      cmd->len = BFD_MACH_O_LC_SEGMENT_64_SIZE
 
        + BFD_MACH_O_SECTION_64_SIZE * seg->nsects;
 
    }
 
  else
 
    {
 
      cmd->type = BFD_MACH_O_LC_SEGMENT;
 
      cmd->offset = BFD_MACH_O_HEADER_SIZE;
 
      cmd->len = BFD_MACH_O_LC_SEGMENT_SIZE
 
        + BFD_MACH_O_SECTION_SIZE * seg->nsects;
 
    }
 
  cmd->type_required = FALSE;
 
  mdata->header.sizeofcmds = cmd->len;
 
  mdata->filelen = cmd->offset + cmd->len;
 
 
 
  /* Set symtab command.  */
 
  symtab_cmd = &mdata->commands[1];
 
 
 
  symtab_cmd->type = BFD_MACH_O_LC_SYMTAB;
 
  symtab_cmd->offset = cmd->offset + cmd->len;
 
  symtab_cmd->len = 6 * 4;
 
  symtab_cmd->type_required = FALSE;
 
 
 
  mdata->header.sizeofcmds += symtab_cmd->len;
 
  mdata->filelen += symtab_cmd->len;
 
 
 
  /* Fill segment command.  */
 
  memset (seg->segname, 0, sizeof (seg->segname));
 
  seg->vmaddr = 0;
 
  seg->fileoff = mdata->filelen;
 
  seg->filesize = 0;
 
  seg->maxprot = BFD_MACH_O_PROT_READ | BFD_MACH_O_PROT_WRITE
 
    | BFD_MACH_O_PROT_EXECUTE;
 
  seg->initprot = seg->maxprot;
 
  seg->flags = 0;
 
 
 
  /* Create Mach-O sections.  */
 
  target_index = 0;
 
  for (sec = abfd->sections; sec; sec = sec->next)
 
    {
 
      sections->bfdsection = sec;
 
      bfd_mach_o_convert_section_name_to_mach_o (abfd, sec, sections);
 
      sections->addr = bfd_get_section_vma (abfd, sec);
 
      sections->size = bfd_get_section_size (sec);
 
      sections->align = bfd_get_section_alignment (abfd, sec);
 
 
 
      if (sections->size != 0)
 
        {
 
          mdata->filelen = FILE_ALIGN (mdata->filelen, sections->align);
 
          sections->offset = mdata->filelen;
 
        }
 
      else
 
        sections->offset = 0;
 
      sections->reloff = 0;
 
      sections->nreloc = 0;
 
      sections->reserved1 = 0;
 
      sections->reserved2 = 0;
 
      sections->reserved3 = 0;
 
 
 
      sec->filepos = sections->offset;
 
      sec->target_index = ++target_index;
 
 
 
      mdata->filelen += sections->size;
 
      sections++;
 
    }
 
  seg->filesize = mdata->filelen - seg->fileoff;
 
  seg->vmsize = seg->filesize;
 
 
 
  return TRUE;
 
}
 
 
 
/* Set the contents of a section.  */
 
 
 
bfd_boolean
 
bfd_mach_o_set_section_contents (bfd *abfd,
 
                                 asection *section,
 
                                 const void * location,
 
                                 file_ptr offset,
 
                                 bfd_size_type count)
 
{
 
  file_ptr pos;
 
 
 
  /* This must be done first, because bfd_set_section_contents is
 
     going to set output_has_begun to TRUE.  */
 
  if (! abfd->output_has_begun && ! bfd_mach_o_build_commands (abfd))
 
    return FALSE;
 
 
 
  if (count == 0)
 
    return TRUE;
 
 
 
  pos = section->filepos + offset;
 
  if (bfd_seek (abfd, pos, SEEK_SET) != 0
 
      || bfd_bwrite (location, count, abfd) != count)
 
    return FALSE;
 
 
 
  return TRUE;
 
}
 
 
 
int
bfd_mach_o_sizeof_headers (bfd *a ATTRIBUTE_UNUSED,
bfd_mach_o_sizeof_headers (bfd *a ATTRIBUTE_UNUSED,
                           struct bfd_link_info *info ATTRIBUTE_UNUSED)
                           struct bfd_link_info *info ATTRIBUTE_UNUSED)
{
{
  return 0;
  return 0;
}
}
 
 
/* Make an empty symbol.  This is required only because
/* Make an empty symbol.  This is required only because
   bfd_make_section_anyway wants to create a symbol for the section.  */
   bfd_make_section_anyway wants to create a symbol for the section.  */
 
 
static asymbol *
asymbol *
bfd_mach_o_make_empty_symbol (bfd *abfd)
bfd_mach_o_make_empty_symbol (bfd *abfd)
{
{
  asymbol *new;
  asymbol *new_symbol;
 
 
  new = bfd_zalloc (abfd, sizeof (* new));
  new_symbol = bfd_zalloc (abfd, sizeof (bfd_mach_o_asymbol));
  if (new == NULL)
  if (new_symbol == NULL)
    return new;
    return new_symbol;
  new->the_bfd = abfd;
  new_symbol->the_bfd = abfd;
  return new;
  new_symbol->udata.i = 0;
 
  return new_symbol;
}
}
 
 
static int
static bfd_boolean
bfd_mach_o_read_header (bfd *abfd, bfd_mach_o_header *header)
bfd_mach_o_read_header (bfd *abfd, bfd_mach_o_header *header)
{
{
  unsigned char buf[28];
  unsigned char buf[32];
 
  unsigned int size;
  bfd_vma (*get32) (const void *) = NULL;
  bfd_vma (*get32) (const void *) = NULL;
 
 
  bfd_seek (abfd, 0, SEEK_SET);
  /* Just read the magic number.  */
 
  if (bfd_seek (abfd, 0, SEEK_SET) != 0
  if (bfd_bread ((PTR) buf, 28, abfd) != 28)
      || bfd_bread ((PTR) buf, 4, abfd) != 4)
    return -1;
    return FALSE;
 
 
  if (bfd_getb32 (buf) == 0xfeedface)
  if (bfd_getb32 (buf) == BFD_MACH_O_MH_MAGIC)
 
    {
 
      header->byteorder = BFD_ENDIAN_BIG;
 
      header->magic = BFD_MACH_O_MH_MAGIC;
 
      header->version = 1;
 
      get32 = bfd_getb32;
 
    }
 
  else if (bfd_getl32 (buf) == BFD_MACH_O_MH_MAGIC)
 
    {
 
      header->byteorder = BFD_ENDIAN_LITTLE;
 
      header->magic = BFD_MACH_O_MH_MAGIC;
 
      header->version = 1;
 
      get32 = bfd_getl32;
 
    }
 
  else if (bfd_getb32 (buf) == BFD_MACH_O_MH_MAGIC_64)
    {
    {
      header->byteorder = BFD_ENDIAN_BIG;
      header->byteorder = BFD_ENDIAN_BIG;
      header->magic = 0xfeedface;
      header->magic = BFD_MACH_O_MH_MAGIC_64;
 
      header->version = 2;
      get32 = bfd_getb32;
      get32 = bfd_getb32;
    }
    }
  else if (bfd_getl32 (buf) == 0xfeedface)
  else if (bfd_getl32 (buf) == BFD_MACH_O_MH_MAGIC_64)
    {
    {
      header->byteorder = BFD_ENDIAN_LITTLE;
      header->byteorder = BFD_ENDIAN_LITTLE;
      header->magic = 0xfeedface;
      header->magic = BFD_MACH_O_MH_MAGIC_64;
 
      header->version = 2;
      get32 = bfd_getl32;
      get32 = bfd_getl32;
    }
    }
  else
  else
    {
    {
      header->byteorder = BFD_ENDIAN_UNKNOWN;
      header->byteorder = BFD_ENDIAN_UNKNOWN;
      return -1;
      return FALSE;
    }
    }
 
 
 
  /* Once the size of the header is known, read the full header.  */
 
  size = mach_o_wide_p (header) ?
 
    BFD_MACH_O_HEADER_64_SIZE : BFD_MACH_O_HEADER_SIZE;
 
 
 
  if (bfd_seek (abfd, 0, SEEK_SET) != 0
 
      || bfd_bread ((PTR) buf, size, abfd) != size)
 
    return FALSE;
 
 
  header->cputype = (*get32) (buf + 4);
  header->cputype = (*get32) (buf + 4);
  header->cpusubtype = (*get32) (buf + 8);
  header->cpusubtype = (*get32) (buf + 8);
  header->filetype = (*get32) (buf + 12);
  header->filetype = (*get32) (buf + 12);
  header->ncmds = (*get32) (buf + 16);
  header->ncmds = (*get32) (buf + 16);
  header->sizeofcmds = (*get32) (buf + 20);
  header->sizeofcmds = (*get32) (buf + 20);
  header->flags = (*get32) (buf + 24);
  header->flags = (*get32) (buf + 24);
 
 
  return 0;
  if (mach_o_wide_p (header))
 
    header->reserved = (*get32) (buf + 28);
 
 
 
  return TRUE;
}
}
 
 
static asection *
static asection *
bfd_mach_o_make_bfd_section (bfd *abfd, bfd_mach_o_section *section)
bfd_mach_o_make_bfd_section (bfd *abfd, bfd_mach_o_section *section,
 
                             unsigned long prot)
{
{
  asection *bfdsec;
  asection *bfdsec;
  char *sname;
  char *sname;
  const char *prefix = "LC_SEGMENT";
 
  unsigned int snamelen;
 
  flagword flags;
  flagword flags;
 
 
  snamelen = strlen (prefix) + 1
  sname = bfd_mach_o_convert_section_name_to_bfd (abfd, section);
    + strlen (section->segname) + 1
 
    + strlen (section->sectname) + 1;
 
 
 
  sname = bfd_alloc (abfd, snamelen);
 
  if (sname == NULL)
  if (sname == NULL)
    return NULL;
    return NULL;
  sprintf (sname, "%s.%s.%s", prefix, section->segname, section->sectname);
 
 
 
 
  if (section->flags & BFD_MACH_O_S_ATTR_DEBUG)
 
    flags = SEC_HAS_CONTENTS | SEC_DEBUGGING;
 
  else
 
    {
  flags = SEC_ALLOC;
  flags = SEC_ALLOC;
  if ((section->flags & SECTION_TYPE) != BFD_MACH_O_S_ZEROFILL)
      if ((section->flags & BFD_MACH_O_SECTION_TYPE_MASK)
    flags = SEC_HAS_CONTENTS | SEC_LOAD | SEC_ALLOC | SEC_CODE;
          != BFD_MACH_O_S_ZEROFILL)
 
        {
 
          flags |= SEC_HAS_CONTENTS | SEC_LOAD;
 
          if (prot & BFD_MACH_O_PROT_EXECUTE)
 
            flags |= SEC_CODE;
 
          if (prot & BFD_MACH_O_PROT_WRITE)
 
            flags |= SEC_DATA;
 
          else if (prot & BFD_MACH_O_PROT_READ)
 
            flags |= SEC_READONLY;
 
        }
 
    }
 
  if (section->nreloc != 0)
 
    flags |= SEC_RELOC;
 
 
  bfdsec = bfd_make_section_anyway_with_flags (abfd, sname, flags);
  bfdsec = bfd_make_section_anyway_with_flags (abfd, sname, flags);
  if (bfdsec == NULL)
  if (bfdsec == NULL)
    return NULL;
    return NULL;
 
 
  bfdsec->vma = section->addr;
  bfdsec->vma = section->addr;
  bfdsec->lma = section->addr;
  bfdsec->lma = section->addr;
  bfdsec->size = section->size;
  bfdsec->size = section->size;
  bfdsec->filepos = section->offset;
  bfdsec->filepos = section->offset;
  bfdsec->alignment_power = section->align;
  bfdsec->alignment_power = section->align;
 
  bfdsec->segment_mark = 0;
 
  bfdsec->reloc_count = section->nreloc;
 
  bfdsec->rel_filepos = section->reloff;
 
 
  return bfdsec;
  return bfdsec;
}
}
 
 
static int
static int
bfd_mach_o_scan_read_section (bfd *abfd,
bfd_mach_o_scan_read_section_32 (bfd *abfd,
                              bfd_mach_o_section *section,
                              bfd_mach_o_section *section,
                              bfd_vma offset)
                                 unsigned int offset,
 
                                 unsigned long prot)
{
{
  unsigned char buf[68];
  unsigned char buf[BFD_MACH_O_SECTION_SIZE];
 
 
  bfd_seek (abfd, offset, SEEK_SET);
  if (bfd_seek (abfd, offset, SEEK_SET) != 0
  if (bfd_bread ((PTR) buf, 68, abfd) != 68)
      || (bfd_bread ((PTR) buf, BFD_MACH_O_SECTION_SIZE, abfd)
 
          != BFD_MACH_O_SECTION_SIZE))
    return -1;
    return -1;
 
 
  memcpy (section->sectname, buf, 16);
  memcpy (section->sectname, buf, 16);
  section->sectname[16] = '\0';
  section->sectname[16] = '\0';
  memcpy (section->segname, buf + 16, 16);
  memcpy (section->segname, buf + 16, 16);
Line 681... Line 1404...
  section->reloff = bfd_h_get_32 (abfd, buf + 48);
  section->reloff = bfd_h_get_32 (abfd, buf + 48);
  section->nreloc = bfd_h_get_32 (abfd, buf + 52);
  section->nreloc = bfd_h_get_32 (abfd, buf + 52);
  section->flags = bfd_h_get_32 (abfd, buf + 56);
  section->flags = bfd_h_get_32 (abfd, buf + 56);
  section->reserved1 = bfd_h_get_32 (abfd, buf + 60);
  section->reserved1 = bfd_h_get_32 (abfd, buf + 60);
  section->reserved2 = bfd_h_get_32 (abfd, buf + 64);
  section->reserved2 = bfd_h_get_32 (abfd, buf + 64);
  section->bfdsection = bfd_mach_o_make_bfd_section (abfd, section);
  section->reserved3 = 0;
 
  section->bfdsection = bfd_mach_o_make_bfd_section (abfd, section, prot);
 
 
  if (section->bfdsection == NULL)
  if (section->bfdsection == NULL)
    return -1;
    return -1;
 
 
  return 0;
  return 0;
}
}
 
 
int
static int
 
bfd_mach_o_scan_read_section_64 (bfd *abfd,
 
                                 bfd_mach_o_section *section,
 
                                 unsigned int offset,
 
                                 unsigned long prot)
 
{
 
  unsigned char buf[BFD_MACH_O_SECTION_64_SIZE];
 
 
 
  if (bfd_seek (abfd, offset, SEEK_SET) != 0
 
      || (bfd_bread ((PTR) buf, BFD_MACH_O_SECTION_64_SIZE, abfd)
 
          != BFD_MACH_O_SECTION_64_SIZE))
 
    return -1;
 
 
 
  memcpy (section->sectname, buf, 16);
 
  section->sectname[16] = '\0';
 
  memcpy (section->segname, buf + 16, 16);
 
  section->segname[16] = '\0';
 
  section->addr = bfd_h_get_64 (abfd, buf + 32);
 
  section->size = bfd_h_get_64 (abfd, buf + 40);
 
  section->offset = bfd_h_get_32 (abfd, buf + 48);
 
  section->align = bfd_h_get_32 (abfd, buf + 52);
 
  section->reloff = bfd_h_get_32 (abfd, buf + 56);
 
  section->nreloc = bfd_h_get_32 (abfd, buf + 60);
 
  section->flags = bfd_h_get_32 (abfd, buf + 64);
 
  section->reserved1 = bfd_h_get_32 (abfd, buf + 68);
 
  section->reserved2 = bfd_h_get_32 (abfd, buf + 72);
 
  section->reserved3 = bfd_h_get_32 (abfd, buf + 76);
 
  section->bfdsection = bfd_mach_o_make_bfd_section (abfd, section, prot);
 
 
 
  if (section->bfdsection == NULL)
 
    return -1;
 
 
 
  return 0;
 
}
 
 
 
static int
 
bfd_mach_o_scan_read_section (bfd *abfd,
 
                              bfd_mach_o_section *section,
 
                              unsigned int offset,
 
                              unsigned long prot,
 
                              unsigned int wide)
 
{
 
  if (wide)
 
    return bfd_mach_o_scan_read_section_64 (abfd, section, offset, prot);
 
  else
 
    return bfd_mach_o_scan_read_section_32 (abfd, section, offset, prot);
 
}
 
 
 
static int
bfd_mach_o_scan_read_symtab_symbol (bfd *abfd,
bfd_mach_o_scan_read_symtab_symbol (bfd *abfd,
                                    bfd_mach_o_symtab_command *sym,
                                    bfd_mach_o_symtab_command *sym,
                                    asymbol *s,
                                    bfd_mach_o_asymbol *s,
                                    unsigned long i)
                                    unsigned long i)
{
{
  bfd_mach_o_data_struct *mdata = abfd->tdata.mach_o_data;
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
  bfd_vma symoff = sym->symoff + (i * 12);
  unsigned int wide = mach_o_wide_p (&mdata->header);
  unsigned char buf[12];
  unsigned int symwidth =
 
    wide ? BFD_MACH_O_NLIST_64_SIZE : BFD_MACH_O_NLIST_SIZE;
 
  unsigned int symoff = sym->symoff + (i * symwidth);
 
  unsigned char buf[16];
  unsigned char type = -1;
  unsigned char type = -1;
  unsigned char section = -1;
  unsigned char section = -1;
  short desc = -1;
  short desc = -1;
  unsigned long value = -1;
  symvalue value = -1;
  unsigned long stroff = -1;
  unsigned long stroff = -1;
  unsigned int symtype = -1;
  unsigned int symtype = -1;
 
 
  BFD_ASSERT (sym->strtab != NULL);
  BFD_ASSERT (sym->strtab != NULL);
 
 
  bfd_seek (abfd, symoff, SEEK_SET);
  if (bfd_seek (abfd, symoff, SEEK_SET) != 0
  if (bfd_bread ((PTR) buf, 12, abfd) != 12)
      || bfd_bread ((PTR) buf, symwidth, abfd) != symwidth)
    {
    {
      fprintf (stderr, "bfd_mach_o_scan_read_symtab_symbol: unable to read %d bytes at %lu\n",
      fprintf (stderr, "bfd_mach_o_scan_read_symtab_symbol: unable to read %d bytes at %lu\n",
               12, (unsigned long) symoff);
               symwidth, (unsigned long) symoff);
      return -1;
      return -1;
    }
    }
 
 
  stroff = bfd_h_get_32 (abfd, buf);
  stroff = bfd_h_get_32 (abfd, buf);
  type = bfd_h_get_8 (abfd, buf + 4);
  type = bfd_h_get_8 (abfd, buf + 4);
  symtype = (type & 0x0e);
  symtype = type & BFD_MACH_O_N_TYPE;
  section = bfd_h_get_8 (abfd, buf + 5) - 1;
  section = bfd_h_get_8 (abfd, buf + 5);
  desc = bfd_h_get_16 (abfd, buf + 6);
  desc = bfd_h_get_16 (abfd, buf + 6);
 
  if (wide)
 
    value = bfd_h_get_64 (abfd, buf + 8);
 
  else
  value = bfd_h_get_32 (abfd, buf + 8);
  value = bfd_h_get_32 (abfd, buf + 8);
 
 
  if (stroff >= sym->strsize)
  if (stroff >= sym->strsize)
    {
    {
      fprintf (stderr, "bfd_mach_o_scan_read_symtab_symbol: symbol name out of range (%lu >= %lu)\n",
      fprintf (stderr, "bfd_mach_o_scan_read_symtab_symbol: symbol name out of range (%lu >= %lu)\n",
               (unsigned long) stroff, (unsigned long) sym->strsize);
               (unsigned long) stroff, (unsigned long) sym->strsize);
      return -1;
      return -1;
    }
    }
 
 
  s->the_bfd = abfd;
  s->symbol.the_bfd = abfd;
  s->name = sym->strtab + stroff;
  s->symbol.name = sym->strtab + stroff;
  s->value = value;
  s->symbol.value = value;
  s->udata.i = (type << 24) | (section << 16) | desc;
  s->symbol.flags = 0x0;
  s->flags = 0x0;
  s->symbol.udata.i = 0;
 
  s->n_type = type;
 
  s->n_sect = section;
 
  s->n_desc = desc;
 
 
  if (type & BFD_MACH_O_N_STAB)
  if (type & BFD_MACH_O_N_STAB)
    {
    {
      s->flags |= BSF_DEBUGGING;
      s->symbol.flags |= BSF_DEBUGGING;
      s->section = bfd_und_section_ptr;
      s->symbol.section = bfd_und_section_ptr;
 
      switch (type)
 
        {
 
        case N_FUN:
 
        case N_STSYM:
 
        case N_LCSYM:
 
        case N_BNSYM:
 
        case N_SLINE:
 
        case N_ENSYM:
 
        case N_ECOMM:
 
        case N_ECOML:
 
        case N_GSYM:
 
          if ((section > 0) && (section <= mdata->nsects))
 
            {
 
              s->symbol.section = mdata->sections[section - 1]->bfdsection;
 
              s->symbol.value =
 
                s->symbol.value - mdata->sections[section - 1]->addr;
 
            }
 
          break;
 
        }
    }
    }
  else
  else
    {
    {
      if (type & BFD_MACH_O_N_PEXT)
      if (type & BFD_MACH_O_N_PEXT)
        {
        s->symbol.flags |= BSF_GLOBAL;
          type &= ~BFD_MACH_O_N_PEXT;
 
          s->flags |= BSF_GLOBAL;
 
        }
 
 
 
      if (type & BFD_MACH_O_N_EXT)
      if (type & BFD_MACH_O_N_EXT)
        {
        s->symbol.flags |= BSF_GLOBAL;
          type &= ~BFD_MACH_O_N_EXT;
 
          s->flags |= BSF_GLOBAL;
      if (!(type & (BFD_MACH_O_N_PEXT | BFD_MACH_O_N_EXT)))
        }
        s->symbol.flags |= BSF_LOCAL;
 
 
      switch (symtype)
      switch (symtype)
        {
        {
        case BFD_MACH_O_N_UNDF:
        case BFD_MACH_O_N_UNDF:
          s->section = bfd_und_section_ptr;
          if (type == (BFD_MACH_O_N_UNDF | BFD_MACH_O_N_EXT)
 
              && s->symbol.value != 0)
 
            {
 
              /* A common symbol.  */
 
              s->symbol.section = bfd_com_section_ptr;
 
              s->symbol.flags = BSF_NO_FLAGS;
 
            }
 
          else
 
            {
 
              s->symbol.section = bfd_und_section_ptr;
 
              if (s->n_desc & BFD_MACH_O_N_WEAK_REF)
 
                s->symbol.flags |= BSF_WEAK;
 
            }
          break;
          break;
        case BFD_MACH_O_N_PBUD:
        case BFD_MACH_O_N_PBUD:
          s->section = bfd_und_section_ptr;
          s->symbol.section = bfd_und_section_ptr;
          break;
          break;
        case BFD_MACH_O_N_ABS:
        case BFD_MACH_O_N_ABS:
          s->section = bfd_abs_section_ptr;
          s->symbol.section = bfd_abs_section_ptr;
          break;
          break;
        case BFD_MACH_O_N_SECT:
        case BFD_MACH_O_N_SECT:
          if ((section > 0) && (section <= mdata->nsects))
          if ((section > 0) && (section <= mdata->nsects))
            {
            {
              s->section = mdata->sections[section - 1]->bfdsection;
              s->symbol.section = mdata->sections[section - 1]->bfdsection;
              s->value = s->value - mdata->sections[section - 1]->addr;
              s->symbol.value =
 
                s->symbol.value - mdata->sections[section - 1]->addr;
            }
            }
          else
          else
            {
            {
              /* Mach-O uses 0 to mean "no section"; not an error.  */
              /* Mach-O uses 0 to mean "no section"; not an error.  */
              if (section != 0)
              if (section != 0)
                {
                {
                  fprintf (stderr, "bfd_mach_o_scan_read_symtab_symbol: "
                  fprintf (stderr, "bfd_mach_o_scan_read_symtab_symbol: "
                           "symbol \"%s\" specified invalid section %d (max %lu): setting to undefined\n",
                           "symbol \"%s\" specified invalid section %d (max %lu): setting to undefined\n",
                           s->name, section, mdata->nsects);
                           s->symbol.name, section, mdata->nsects);
                }
                }
              s->section = bfd_und_section_ptr;
              s->symbol.section = bfd_und_section_ptr;
            }
            }
          break;
          break;
        case BFD_MACH_O_N_INDR:
        case BFD_MACH_O_N_INDR:
          fprintf (stderr, "bfd_mach_o_scan_read_symtab_symbol: "
          fprintf (stderr, "bfd_mach_o_scan_read_symtab_symbol: "
                   "symbol \"%s\" is unsupported 'indirect' reference: setting to undefined\n",
                   "symbol \"%s\" is unsupported 'indirect' reference: setting to undefined\n",
                   s->name);
                   s->symbol.name);
          s->section = bfd_und_section_ptr;
          s->symbol.section = bfd_und_section_ptr;
          break;
          break;
        default:
        default:
          fprintf (stderr, "bfd_mach_o_scan_read_symtab_symbol: "
          fprintf (stderr, "bfd_mach_o_scan_read_symtab_symbol: "
                   "symbol \"%s\" specified invalid type field 0x%x: setting to undefined\n",
                   "symbol \"%s\" specified invalid type field 0x%x: setting to undefined\n",
                   s->name, symtype);
                   s->symbol.name, symtype);
          s->section = bfd_und_section_ptr;
          s->symbol.section = bfd_und_section_ptr;
          break;
          break;
        }
        }
    }
    }
 
 
  return 0;
  return 0;
}
}
 
 
int
static int
bfd_mach_o_scan_read_symtab_strtab (bfd *abfd,
bfd_mach_o_scan_read_symtab_strtab (bfd *abfd)
                                    bfd_mach_o_symtab_command *sym)
 
{
{
  BFD_ASSERT (sym->strtab == NULL);
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
 
  bfd_mach_o_symtab_command *sym = mdata->symtab;
 
 
 
  /* Fail if there is no symtab.  */
 
  if (sym == NULL)
 
    return -1;
 
 
 
  /* Success if already loaded.  */
 
  if (sym->strtab)
 
    return 0;
 
 
  if (abfd->flags & BFD_IN_MEMORY)
  if (abfd->flags & BFD_IN_MEMORY)
    {
    {
      struct bfd_in_memory *b;
      struct bfd_in_memory *b;
 
 
Line 819... Line 1637...
        {
        {
          bfd_set_error (bfd_error_file_truncated);
          bfd_set_error (bfd_error_file_truncated);
          return -1;
          return -1;
        }
        }
      sym->strtab = (char *) b->buffer + sym->stroff;
      sym->strtab = (char *) b->buffer + sym->stroff;
      return 0;
 
    }
    }
 
  else
 
    {
  sym->strtab = bfd_alloc (abfd, sym->strsize);
  sym->strtab = bfd_alloc (abfd, sym->strsize);
  if (sym->strtab == NULL)
  if (sym->strtab == NULL)
    return -1;
    return -1;
 
 
  bfd_seek (abfd, sym->stroff, SEEK_SET);
      if (bfd_seek (abfd, sym->stroff, SEEK_SET) != 0
  if (bfd_bread ((PTR) sym->strtab, sym->strsize, abfd) != sym->strsize)
          || bfd_bread ((PTR) sym->strtab, sym->strsize, abfd) != sym->strsize)
    {
    {
      fprintf (stderr, "bfd_mach_o_scan_read_symtab_strtab: unable to read %lu bytes at %lu\n",
          bfd_set_error (bfd_error_file_truncated);
               sym->strsize, sym->stroff);
 
      return -1;
      return -1;
    }
    }
 
    }
 
 
  return 0;
  return 0;
}
}
 
 
int
static int
bfd_mach_o_scan_read_symtab_symbols (bfd *abfd,
bfd_mach_o_scan_read_symtab_symbols (bfd *abfd)
                                     bfd_mach_o_symtab_command *sym)
 
{
{
 
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
 
  bfd_mach_o_symtab_command *sym = mdata->symtab;
  unsigned long i;
  unsigned long i;
  int ret;
  int ret;
 
 
  BFD_ASSERT (sym->symbols == NULL);
  if (sym->symbols)
  sym->symbols = bfd_alloc (abfd, sym->nsyms * sizeof (asymbol));
    return 0;
 
 
 
  sym->symbols = bfd_alloc (abfd, sym->nsyms * sizeof (bfd_mach_o_asymbol));
 
 
  if (sym->symbols == NULL)
  if (sym->symbols == NULL)
    {
    {
      fprintf (stderr, "bfd_mach_o_scan_read_symtab_symbols: unable to allocate memory for symbols\n");
      fprintf (stderr, "bfd_mach_o_scan_read_symtab_symbols: unable to allocate memory for symbols\n");
      return -1;
      return -1;
    }
    }
 
 
  ret = bfd_mach_o_scan_read_symtab_strtab (abfd, sym);
  ret = bfd_mach_o_scan_read_symtab_strtab (abfd);
  if (ret != 0)
  if (ret != 0)
    return ret;
    return ret;
 
 
  for (i = 0; i < sym->nsyms; i++)
  for (i = 0; i < sym->nsyms; i++)
    {
    {
Line 871... Line 1692...
 
 
int
int
bfd_mach_o_scan_read_dysymtab_symbol (bfd *abfd,
bfd_mach_o_scan_read_dysymtab_symbol (bfd *abfd,
                                      bfd_mach_o_dysymtab_command *dysym,
                                      bfd_mach_o_dysymtab_command *dysym,
                                      bfd_mach_o_symtab_command *sym,
                                      bfd_mach_o_symtab_command *sym,
                                      asymbol *s,
                                      bfd_mach_o_asymbol *s,
                                      unsigned long i)
                                      unsigned long i)
{
{
  unsigned long isymoff = dysym->indirectsymoff + (i * 4);
  unsigned long isymoff = dysym->indirectsymoff + (i * 4);
  unsigned long symindex;
  unsigned long symindex;
  unsigned char buf[4];
  unsigned char buf[4];
 
 
  BFD_ASSERT (i < dysym->nindirectsyms);
  BFD_ASSERT (i < dysym->nindirectsyms);
 
 
  bfd_seek (abfd, isymoff, SEEK_SET);
  if (bfd_seek (abfd, isymoff, SEEK_SET) != 0
  if (bfd_bread ((PTR) buf, 4, abfd) != 4)
      || bfd_bread ((PTR) buf, 4, abfd) != 4)
    {
    {
      fprintf (stderr, "bfd_mach_o_scan_read_dysymtab_symbol: unable to read %lu bytes at %lu\n",
      fprintf (stderr, "bfd_mach_o_scan_read_dysymtab_symbol: unable to read %lu bytes at %lu\n",
               (unsigned long) 4, isymoff);
               (unsigned long) 4, isymoff);
      return -1;
      return -1;
    }
    }
Line 897... Line 1718...
static const char *
static const char *
bfd_mach_o_i386_flavour_string (unsigned int flavour)
bfd_mach_o_i386_flavour_string (unsigned int flavour)
{
{
  switch ((int) flavour)
  switch ((int) flavour)
    {
    {
    case BFD_MACH_O_i386_NEW_THREAD_STATE: return "i386_NEW_THREAD_STATE";
    case BFD_MACH_O_x86_THREAD_STATE32:    return "x86_THREAD_STATE32";
    case BFD_MACH_O_i386_FLOAT_STATE: return "i386_FLOAT_STATE";
    case BFD_MACH_O_x86_FLOAT_STATE32:     return "x86_FLOAT_STATE32";
    case BFD_MACH_O_i386_ISA_PORT_MAP_STATE: return "i386_ISA_PORT_MAP_STATE";
    case BFD_MACH_O_x86_EXCEPTION_STATE32: return "x86_EXCEPTION_STATE32";
    case BFD_MACH_O_i386_V86_ASSIST_STATE: return "i386_V86_ASSIST_STATE";
    case BFD_MACH_O_x86_THREAD_STATE64:    return "x86_THREAD_STATE64";
    case BFD_MACH_O_i386_REGS_SEGS_STATE: return "i386_REGS_SEGS_STATE";
    case BFD_MACH_O_x86_FLOAT_STATE64:     return "x86_FLOAT_STATE64";
    case BFD_MACH_O_i386_THREAD_SYSCALL_STATE: return "i386_THREAD_SYSCALL_STATE";
    case BFD_MACH_O_x86_EXCEPTION_STATE64: return "x86_EXCEPTION_STATE64";
    case BFD_MACH_O_i386_THREAD_STATE_NONE: return "i386_THREAD_STATE_NONE";
    case BFD_MACH_O_x86_THREAD_STATE:      return "x86_THREAD_STATE";
    case BFD_MACH_O_i386_SAVED_STATE: return "i386_SAVED_STATE";
    case BFD_MACH_O_x86_FLOAT_STATE:       return "x86_FLOAT_STATE";
    case BFD_MACH_O_i386_THREAD_STATE: return "i386_THREAD_STATE";
    case BFD_MACH_O_x86_EXCEPTION_STATE:   return "x86_EXCEPTION_STATE";
    case BFD_MACH_O_i386_THREAD_FPSTATE: return "i386_THREAD_FPSTATE";
    case BFD_MACH_O_x86_DEBUG_STATE32:     return "x86_DEBUG_STATE32";
    case BFD_MACH_O_i386_THREAD_EXCEPTSTATE: return "i386_THREAD_EXCEPTSTATE";
    case BFD_MACH_O_x86_DEBUG_STATE64:     return "x86_DEBUG_STATE64";
    case BFD_MACH_O_i386_THREAD_CTHREADSTATE: return "i386_THREAD_CTHREADSTATE";
    case BFD_MACH_O_x86_DEBUG_STATE:       return "x86_DEBUG_STATE";
 
    case BFD_MACH_O_x86_THREAD_STATE_NONE: return "x86_THREAD_STATE_NONE";
    default: return "UNKNOWN";
    default: return "UNKNOWN";
    }
    }
}
}
 
 
static const char *
static const char *
Line 922... Line 1744...
    {
    {
    case BFD_MACH_O_PPC_THREAD_STATE: return "PPC_THREAD_STATE";
    case BFD_MACH_O_PPC_THREAD_STATE: return "PPC_THREAD_STATE";
    case BFD_MACH_O_PPC_FLOAT_STATE: return "PPC_FLOAT_STATE";
    case BFD_MACH_O_PPC_FLOAT_STATE: return "PPC_FLOAT_STATE";
    case BFD_MACH_O_PPC_EXCEPTION_STATE: return "PPC_EXCEPTION_STATE";
    case BFD_MACH_O_PPC_EXCEPTION_STATE: return "PPC_EXCEPTION_STATE";
    case BFD_MACH_O_PPC_VECTOR_STATE: return "PPC_VECTOR_STATE";
    case BFD_MACH_O_PPC_VECTOR_STATE: return "PPC_VECTOR_STATE";
 
    case BFD_MACH_O_PPC_THREAD_STATE64:    return "PPC_THREAD_STATE64";
 
    case BFD_MACH_O_PPC_EXCEPTION_STATE64: return "PPC_EXCEPTION_STATE64";
    default: return "UNKNOWN";
    default: return "UNKNOWN";
    }
    }
}
}
 
 
static int
static int
Line 933... Line 1757...
                               bfd_mach_o_load_command *command)
                               bfd_mach_o_load_command *command)
{
{
  bfd_mach_o_dylinker_command *cmd = &command->command.dylinker;
  bfd_mach_o_dylinker_command *cmd = &command->command.dylinker;
  unsigned char buf[4];
  unsigned char buf[4];
  unsigned int nameoff;
  unsigned int nameoff;
  asection *bfdsec;
 
  char *sname;
 
  const char *prefix;
 
 
 
  BFD_ASSERT ((command->type == BFD_MACH_O_LC_ID_DYLINKER)
  BFD_ASSERT ((command->type == BFD_MACH_O_LC_ID_DYLINKER)
              || (command->type == BFD_MACH_O_LC_LOAD_DYLINKER));
              || (command->type == BFD_MACH_O_LC_LOAD_DYLINKER));
 
 
  bfd_seek (abfd, command->offset + 8, SEEK_SET);
  if (bfd_seek (abfd, command->offset + 8, SEEK_SET) != 0
  if (bfd_bread ((PTR) buf, 4, abfd) != 4)
      || bfd_bread ((PTR) buf, 4, abfd) != 4)
    return -1;
    return -1;
 
 
  nameoff = bfd_h_get_32 (abfd, buf + 0);
  nameoff = bfd_h_get_32 (abfd, buf + 0);
 
 
  cmd->name_offset = command->offset + nameoff;
  cmd->name_offset = command->offset + nameoff;
  cmd->name_len = command->len - nameoff;
  cmd->name_len = command->len - nameoff;
 
  cmd->name_str = bfd_alloc (abfd, cmd->name_len);
  if (command->type == BFD_MACH_O_LC_LOAD_DYLINKER)
  if (cmd->name_str == NULL)
    prefix = "LC_LOAD_DYLINKER";
 
  else if (command->type == BFD_MACH_O_LC_ID_DYLINKER)
 
    prefix = "LC_ID_DYLINKER";
 
  else
 
    abort ();
 
 
 
  sname = bfd_alloc (abfd, strlen (prefix) + 1);
 
  if (sname == NULL)
 
    return -1;
    return -1;
  strcpy (sname, prefix);
  if (bfd_seek (abfd, cmd->name_offset, SEEK_SET) != 0
 
      || bfd_bread (cmd->name_str, cmd->name_len, abfd) != cmd->name_len)
  bfdsec = bfd_make_section_anyway_with_flags (abfd, sname, SEC_HAS_CONTENTS);
 
  if (bfdsec == NULL)
 
    return -1;
    return -1;
 
 
  bfdsec->vma = 0;
 
  bfdsec->lma = 0;
 
  bfdsec->size = command->len - 8;
 
  bfdsec->filepos = command->offset + 8;
 
  bfdsec->alignment_power = 0;
 
 
 
  cmd->section = bfdsec;
 
 
 
  return 0;
  return 0;
}
}
 
 
static int
static int
bfd_mach_o_scan_read_dylib (bfd *abfd, bfd_mach_o_load_command *command)
bfd_mach_o_scan_read_dylib (bfd *abfd, bfd_mach_o_load_command *command)
{
{
  bfd_mach_o_dylib_command *cmd = &command->command.dylib;
  bfd_mach_o_dylib_command *cmd = &command->command.dylib;
  unsigned char buf[16];
  unsigned char buf[16];
  unsigned int nameoff;
  unsigned int nameoff;
  asection *bfdsec;
 
  char *sname;
 
  const char *prefix;
 
 
 
  BFD_ASSERT ((command->type == BFD_MACH_O_LC_ID_DYLIB)
  switch (command->type)
              || (command->type == BFD_MACH_O_LC_LOAD_DYLIB)
    {
              || (command->type == BFD_MACH_O_LC_LOAD_WEAK_DYLIB));
    case BFD_MACH_O_LC_LOAD_DYLIB:
 
    case BFD_MACH_O_LC_LOAD_WEAK_DYLIB:
 
    case BFD_MACH_O_LC_ID_DYLIB:
 
    case BFD_MACH_O_LC_REEXPORT_DYLIB:
 
      break;
 
    default:
 
      BFD_FAIL ();
 
      return -1;
 
    }
 
 
  bfd_seek (abfd, command->offset + 8, SEEK_SET);
  if (bfd_seek (abfd, command->offset + 8, SEEK_SET) != 0
  if (bfd_bread ((PTR) buf, 16, abfd) != 16)
      || bfd_bread ((PTR) buf, 16, abfd) != 16)
    return -1;
    return -1;
 
 
  nameoff = bfd_h_get_32 (abfd, buf + 0);
  nameoff = bfd_h_get_32 (abfd, buf + 0);
  cmd->timestamp = bfd_h_get_32 (abfd, buf + 4);
  cmd->timestamp = bfd_h_get_32 (abfd, buf + 4);
  cmd->current_version = bfd_h_get_32 (abfd, buf + 8);
  cmd->current_version = bfd_h_get_32 (abfd, buf + 8);
  cmd->compatibility_version = bfd_h_get_32 (abfd, buf + 12);
  cmd->compatibility_version = bfd_h_get_32 (abfd, buf + 12);
 
 
  cmd->name_offset = command->offset + nameoff;
  cmd->name_offset = command->offset + nameoff;
  cmd->name_len = command->len - nameoff;
  cmd->name_len = command->len - nameoff;
 
  cmd->name_str = bfd_alloc (abfd, cmd->name_len);
  if (command->type == BFD_MACH_O_LC_LOAD_DYLIB)
  if (cmd->name_str == NULL)
    prefix = "LC_LOAD_DYLIB";
 
  else if (command->type == BFD_MACH_O_LC_LOAD_WEAK_DYLIB)
 
    prefix = "LC_LOAD_WEAK_DYLIB";
 
  else if (command->type == BFD_MACH_O_LC_ID_DYLIB)
 
    prefix = "LC_ID_DYLIB";
 
  else
 
    abort ();
 
 
 
  sname = bfd_alloc (abfd, strlen (prefix) + 1);
 
  if (sname == NULL)
 
    return -1;
    return -1;
  strcpy (sname, prefix);
  if (bfd_seek (abfd, cmd->name_offset, SEEK_SET) != 0
 
      || bfd_bread (cmd->name_str, cmd->name_len, abfd) != cmd->name_len)
  bfdsec = bfd_make_section_anyway_with_flags (abfd, sname, SEC_HAS_CONTENTS);
 
  if (bfdsec == NULL)
 
    return -1;
    return -1;
 
 
  bfdsec->vma = 0;
 
  bfdsec->lma = 0;
 
  bfdsec->size = command->len - 8;
 
  bfdsec->filepos = command->offset + 8;
 
  bfdsec->alignment_power = 0;
 
 
 
  cmd->section = bfdsec;
 
 
 
  return 0;
  return 0;
}
}
 
 
static int
static int
bfd_mach_o_scan_read_prebound_dylib (bfd *abfd ATTRIBUTE_UNUSED,
bfd_mach_o_scan_read_prebound_dylib (bfd *abfd ATTRIBUTE_UNUSED,
Line 1044... Line 1830...
}
}
 
 
static int
static int
bfd_mach_o_scan_read_thread (bfd *abfd, bfd_mach_o_load_command *command)
bfd_mach_o_scan_read_thread (bfd *abfd, bfd_mach_o_load_command *command)
{
{
  bfd_mach_o_data_struct *mdata = NULL;
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
  bfd_mach_o_thread_command *cmd = &command->command.thread;
  bfd_mach_o_thread_command *cmd = &command->command.thread;
  unsigned char buf[8];
  unsigned char buf[8];
  bfd_vma offset;
  unsigned int offset;
  unsigned int nflavours;
  unsigned int nflavours;
  unsigned int i;
  unsigned int i;
 
 
  BFD_ASSERT ((command->type == BFD_MACH_O_LC_THREAD)
  BFD_ASSERT ((command->type == BFD_MACH_O_LC_THREAD)
              || (command->type == BFD_MACH_O_LC_UNIXTHREAD));
              || (command->type == BFD_MACH_O_LC_UNIXTHREAD));
 
 
  BFD_ASSERT (bfd_mach_o_valid (abfd));
  /* Count the number of threads.  */
  mdata = abfd->tdata.mach_o_data;
 
 
 
  offset = 8;
  offset = 8;
  nflavours = 0;
  nflavours = 0;
  while (offset != command->len)
  while (offset != command->len)
    {
    {
      if (offset >= command->len)
      if (offset >= command->len)
        return -1;
        return -1;
 
 
      bfd_seek (abfd, command->offset + offset, SEEK_SET);
      if (bfd_seek (abfd, command->offset + offset, SEEK_SET) != 0
 
          || bfd_bread ((PTR) buf, 8, abfd) != 8)
      if (bfd_bread ((PTR) buf, 8, abfd) != 8)
 
        return -1;
        return -1;
 
 
      offset += 8 + bfd_h_get_32 (abfd, buf + 4) * 4;
      offset += 8 + bfd_h_get_32 (abfd, buf + 4) * 4;
      nflavours++;
      nflavours++;
    }
    }
 
 
  cmd->flavours = bfd_alloc (abfd, nflavours * sizeof (bfd_mach_o_thread_flavour));
  /* Allocate threads.  */
 
  cmd->flavours = bfd_alloc
 
    (abfd, nflavours * sizeof (bfd_mach_o_thread_flavour));
  if (cmd->flavours == NULL)
  if (cmd->flavours == NULL)
    return -1;
    return -1;
  cmd->nflavours = nflavours;
  cmd->nflavours = nflavours;
 
 
  offset = 8;
  offset = 8;
Line 1088... Line 1873...
        return -1;
        return -1;
 
 
      if (nflavours >= cmd->nflavours)
      if (nflavours >= cmd->nflavours)
        return -1;
        return -1;
 
 
      bfd_seek (abfd, command->offset + offset, SEEK_SET);
      if (bfd_seek (abfd, command->offset + offset, SEEK_SET) != 0
 
          || bfd_bread ((PTR) buf, 8, abfd) != 8)
      if (bfd_bread ((PTR) buf, 8, abfd) != 8)
 
        return -1;
        return -1;
 
 
      cmd->flavours[nflavours].flavour = bfd_h_get_32 (abfd, buf);
      cmd->flavours[nflavours].flavour = bfd_h_get_32 (abfd, buf);
      cmd->flavours[nflavours].offset = command->offset + offset + 8;
      cmd->flavours[nflavours].offset = command->offset + offset + 8;
      cmd->flavours[nflavours].size = bfd_h_get_32 (abfd, buf + 4) * 4;
      cmd->flavours[nflavours].size = bfd_h_get_32 (abfd, buf + 4) * 4;
Line 1112... Line 1896...
      unsigned int j = 0;
      unsigned int j = 0;
 
 
      switch (mdata->header.cputype)
      switch (mdata->header.cputype)
        {
        {
        case BFD_MACH_O_CPU_TYPE_POWERPC:
        case BFD_MACH_O_CPU_TYPE_POWERPC:
 
        case BFD_MACH_O_CPU_TYPE_POWERPC_64:
          flavourstr = bfd_mach_o_ppc_flavour_string (cmd->flavours[i].flavour);
          flavourstr = bfd_mach_o_ppc_flavour_string (cmd->flavours[i].flavour);
          break;
          break;
        case BFD_MACH_O_CPU_TYPE_I386:
        case BFD_MACH_O_CPU_TYPE_I386:
 
        case BFD_MACH_O_CPU_TYPE_X86_64:
          flavourstr = bfd_mach_o_i386_flavour_string (cmd->flavours[i].flavour);
          flavourstr = bfd_mach_o_i386_flavour_string (cmd->flavours[i].flavour);
          break;
          break;
        default:
        default:
          flavourstr = "UNKNOWN_ARCHITECTURE";
          flavourstr = "UNKNOWN_ARCHITECTURE";
          break;
          break;
Line 1152... Line 1938...
}
}
 
 
static int
static int
bfd_mach_o_scan_read_dysymtab (bfd *abfd, bfd_mach_o_load_command *command)
bfd_mach_o_scan_read_dysymtab (bfd *abfd, bfd_mach_o_load_command *command)
{
{
  bfd_mach_o_dysymtab_command *seg = &command->command.dysymtab;
  bfd_mach_o_dysymtab_command *cmd = &command->command.dysymtab;
 
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
  unsigned char buf[72];
  unsigned char buf[72];
 
 
  BFD_ASSERT (command->type == BFD_MACH_O_LC_DYSYMTAB);
  BFD_ASSERT (command->type == BFD_MACH_O_LC_DYSYMTAB);
 
 
  bfd_seek (abfd, command->offset + 8, SEEK_SET);
  if (bfd_seek (abfd, command->offset + 8, SEEK_SET) != 0
  if (bfd_bread ((PTR) buf, 72, abfd) != 72)
      || bfd_bread ((PTR) buf, 72, abfd) != 72)
 
    return -1;
 
 
 
  cmd->ilocalsym = bfd_h_get_32 (abfd, buf + 0);
 
  cmd->nlocalsym = bfd_h_get_32 (abfd, buf + 4);
 
  cmd->iextdefsym = bfd_h_get_32 (abfd, buf + 8);
 
  cmd->nextdefsym = bfd_h_get_32 (abfd, buf + 12);
 
  cmd->iundefsym = bfd_h_get_32 (abfd, buf + 16);
 
  cmd->nundefsym = bfd_h_get_32 (abfd, buf + 20);
 
  cmd->tocoff = bfd_h_get_32 (abfd, buf + 24);
 
  cmd->ntoc = bfd_h_get_32 (abfd, buf + 28);
 
  cmd->modtaboff = bfd_h_get_32 (abfd, buf + 32);
 
  cmd->nmodtab = bfd_h_get_32 (abfd, buf + 36);
 
  cmd->extrefsymoff = bfd_h_get_32 (abfd, buf + 40);
 
  cmd->nextrefsyms = bfd_h_get_32 (abfd, buf + 44);
 
  cmd->indirectsymoff = bfd_h_get_32 (abfd, buf + 48);
 
  cmd->nindirectsyms = bfd_h_get_32 (abfd, buf + 52);
 
  cmd->extreloff = bfd_h_get_32 (abfd, buf + 56);
 
  cmd->nextrel = bfd_h_get_32 (abfd, buf + 60);
 
  cmd->locreloff = bfd_h_get_32 (abfd, buf + 64);
 
  cmd->nlocrel = bfd_h_get_32 (abfd, buf + 68);
 
 
 
  if (cmd->nmodtab != 0)
 
    {
 
      char buf[56];
 
      unsigned int i;
 
      int wide = bfd_mach_o_wide_p (abfd);
 
      unsigned int module_len = wide ? 56 : 52;
 
 
 
      cmd->dylib_module =
 
        bfd_alloc (abfd, cmd->nmodtab * sizeof (bfd_mach_o_dylib_module));
 
      if (cmd->dylib_module == NULL)
 
        return -1;
 
 
 
      if (bfd_seek (abfd, cmd->modtaboff, SEEK_SET) != 0)
 
        return -1;
 
 
 
      for (i = 0; i < cmd->nmodtab; i++)
 
        {
 
          bfd_mach_o_dylib_module *module = &cmd->dylib_module[i];
 
          unsigned long v;
 
 
 
          if (bfd_bread ((PTR) buf, module_len, abfd) != module_len)
 
            return -1;
 
 
 
          module->module_name_idx = bfd_h_get_32 (abfd, buf + 0);
 
          module->iextdefsym = bfd_h_get_32 (abfd, buf + 4);
 
          module->nextdefsym = bfd_h_get_32 (abfd, buf + 8);
 
          module->irefsym = bfd_h_get_32 (abfd, buf + 12);
 
          module->nrefsym = bfd_h_get_32 (abfd, buf + 16);
 
          module->ilocalsym = bfd_h_get_32 (abfd, buf + 20);
 
          module->nlocalsym = bfd_h_get_32 (abfd, buf + 24);
 
          module->iextrel = bfd_h_get_32 (abfd, buf + 28);
 
          module->nextrel = bfd_h_get_32 (abfd, buf + 32);
 
          v = bfd_h_get_32 (abfd, buf +36);
 
          module->iinit = v & 0xffff;
 
          module->iterm = (v >> 16) & 0xffff;
 
          v = bfd_h_get_32 (abfd, buf + 40);
 
          module->ninit = v & 0xffff;
 
          module->nterm = (v >> 16) & 0xffff;
 
          if (wide)
 
            {
 
              module->objc_module_info_size = bfd_h_get_32 (abfd, buf + 44);
 
              module->objc_module_info_addr = bfd_h_get_64 (abfd, buf + 48);
 
            }
 
          else
 
            {
 
              module->objc_module_info_addr = bfd_h_get_32 (abfd, buf + 44);
 
              module->objc_module_info_size = bfd_h_get_32 (abfd, buf + 48);
 
            }
 
        }
 
    }
 
 
 
  if (cmd->ntoc != 0)
 
    {
 
      char buf[8];
 
      unsigned int i;
 
 
 
      cmd->dylib_toc = bfd_alloc
 
        (abfd, cmd->ntoc * sizeof (bfd_mach_o_dylib_table_of_content));
 
      if (cmd->dylib_toc == NULL)
 
        return -1;
 
 
 
      if (bfd_seek (abfd, cmd->tocoff, SEEK_SET) != 0)
 
        return -1;
 
 
 
      for (i = 0; i < cmd->ntoc; i++)
 
        {
 
          bfd_mach_o_dylib_table_of_content *toc = &cmd->dylib_toc[i];
 
 
 
          if (bfd_bread ((PTR) buf, 8, abfd) != 8)
 
            return -1;
 
 
 
          toc->symbol_index = bfd_h_get_32 (abfd, buf + 0);
 
          toc->module_index = bfd_h_get_32 (abfd, buf + 4);
 
        }
 
    }
 
 
 
  if (cmd->nindirectsyms != 0)
 
    {
 
      char buf[4];
 
      unsigned int i;
 
 
 
      cmd->indirect_syms = bfd_alloc
 
        (abfd, cmd->nindirectsyms * sizeof (unsigned int));
 
      if (cmd->indirect_syms == NULL)
 
        return -1;
 
 
 
      if (bfd_seek (abfd, cmd->indirectsymoff, SEEK_SET) != 0)
 
        return -1;
 
 
 
      for (i = 0; i < cmd->nindirectsyms; i++)
 
        {
 
          unsigned int *is = &cmd->indirect_syms[i];
 
 
 
          if (bfd_bread ((PTR) buf, 4, abfd) != 4)
 
            return -1;
 
 
 
          *is = bfd_h_get_32 (abfd, buf + 0);
 
        }
 
    }
 
 
 
  if (cmd->nextrefsyms != 0)
 
    {
 
      char buf[4];
 
      unsigned long v;
 
      unsigned int i;
 
 
 
      cmd->ext_refs = bfd_alloc
 
        (abfd, cmd->nextrefsyms * sizeof (bfd_mach_o_dylib_reference));
 
      if (cmd->ext_refs == NULL)
 
        return -1;
 
 
 
      if (bfd_seek (abfd, cmd->extrefsymoff, SEEK_SET) != 0)
 
        return -1;
 
 
 
      for (i = 0; i < cmd->nextrefsyms; i++)
 
        {
 
          bfd_mach_o_dylib_reference *ref = &cmd->ext_refs[i];
 
 
 
          if (bfd_bread ((PTR) buf, 4, abfd) != 4)
    return -1;
    return -1;
 
 
  seg->ilocalsym = bfd_h_get_32 (abfd, buf + 0);
          /* Fields isym and flags are written as bit-fields, thus we need
  seg->nlocalsym = bfd_h_get_32 (abfd, buf + 4);
             a specific processing for endianness.  */
  seg->iextdefsym = bfd_h_get_32 (abfd, buf + 8);
          v = bfd_h_get_32 (abfd, buf + 0);
  seg->nextdefsym = bfd_h_get_32 (abfd, buf + 12);
          if (bfd_big_endian (abfd))
  seg->iundefsym = bfd_h_get_32 (abfd, buf + 16);
            {
  seg->nundefsym = bfd_h_get_32 (abfd, buf + 20);
              ref->isym = (v >> 8) & 0xffffff;
  seg->tocoff = bfd_h_get_32 (abfd, buf + 24);
              ref->flags = v & 0xff;
  seg->ntoc = bfd_h_get_32 (abfd, buf + 28);
            }
  seg->modtaboff = bfd_h_get_32 (abfd, buf + 32);
          else
  seg->nmodtab = bfd_h_get_32 (abfd, buf + 36);
            {
  seg->extrefsymoff = bfd_h_get_32 (abfd, buf + 40);
              ref->isym = v & 0xffffff;
  seg->nextrefsyms = bfd_h_get_32 (abfd, buf + 44);
              ref->flags = (v >> 24) & 0xff;
  seg->indirectsymoff = bfd_h_get_32 (abfd, buf + 48);
            }
  seg->nindirectsyms = bfd_h_get_32 (abfd, buf + 52);
        }
  seg->extreloff = bfd_h_get_32 (abfd, buf + 56);
    }
  seg->nextrel = bfd_h_get_32 (abfd, buf + 60);
 
  seg->locreloff = bfd_h_get_32 (abfd, buf + 64);
  if (mdata->dysymtab)
  seg->nlocrel = bfd_h_get_32 (abfd, buf + 68);
    return -1;
 
  mdata->dysymtab = cmd;
 
 
  return 0;
  return 0;
}
}
 
 
static int
static int
bfd_mach_o_scan_read_symtab (bfd *abfd, bfd_mach_o_load_command *command)
bfd_mach_o_scan_read_symtab (bfd *abfd, bfd_mach_o_load_command *command)
{
{
  bfd_mach_o_symtab_command *seg = &command->command.symtab;
  bfd_mach_o_symtab_command *symtab = &command->command.symtab;
 
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
  unsigned char buf[16];
  unsigned char buf[16];
  asection *bfdsec;
 
  char *sname;
 
  const char *prefix = "LC_SYMTAB.stabs";
 
 
 
  BFD_ASSERT (command->type == BFD_MACH_O_LC_SYMTAB);
  BFD_ASSERT (command->type == BFD_MACH_O_LC_SYMTAB);
 
 
  bfd_seek (abfd, command->offset + 8, SEEK_SET);
  if (bfd_seek (abfd, command->offset + 8, SEEK_SET) != 0
  if (bfd_bread ((PTR) buf, 16, abfd) != 16)
      || bfd_bread ((PTR) buf, 16, abfd) != 16)
    return -1;
    return -1;
 
 
  seg->symoff = bfd_h_get_32 (abfd, buf);
  symtab->symoff = bfd_h_get_32 (abfd, buf);
  seg->nsyms = bfd_h_get_32 (abfd, buf + 4);
  symtab->nsyms = bfd_h_get_32 (abfd, buf + 4);
  seg->stroff = bfd_h_get_32 (abfd, buf + 8);
  symtab->stroff = bfd_h_get_32 (abfd, buf + 8);
  seg->strsize = bfd_h_get_32 (abfd, buf + 12);
  symtab->strsize = bfd_h_get_32 (abfd, buf + 12);
  seg->symbols = NULL;
  symtab->symbols = NULL;
  seg->strtab = NULL;
  symtab->strtab = NULL;
 
 
  sname = bfd_alloc (abfd, strlen (prefix) + 1);
  if (symtab->nsyms != 0)
  if (sname == NULL)
    abfd->flags |= HAS_SYMS;
    return -1;
 
  strcpy (sname, prefix);
 
 
 
  bfdsec = bfd_make_section_anyway_with_flags (abfd, sname, SEC_HAS_CONTENTS);
  if (mdata->symtab)
  if (bfdsec == NULL)
 
    return -1;
    return -1;
 
  mdata->symtab = symtab;
 
  return 0;
 
}
 
 
  bfdsec->vma = 0;
static int
  bfdsec->lma = 0;
bfd_mach_o_scan_read_uuid (bfd *abfd, bfd_mach_o_load_command *command)
  bfdsec->size = seg->nsyms * 12;
{
  bfdsec->filepos = seg->symoff;
  bfd_mach_o_uuid_command *cmd = &command->command.uuid;
  bfdsec->alignment_power = 0;
  asection *bfdsec;
 
  char *sname;
 
  static const char prefix[] = "LC_UUID";
 
 
  seg->stabs_segment = bfdsec;
  BFD_ASSERT (command->type == BFD_MACH_O_LC_UUID);
 
 
 
  if (bfd_seek (abfd, command->offset + 8, SEEK_SET) != 0
 
      || bfd_bread ((PTR) cmd->uuid, 16, abfd) != 16)
 
    return -1;
 
 
  prefix = "LC_SYMTAB.stabstr";
 
  sname = bfd_alloc (abfd, strlen (prefix) + 1);
  sname = bfd_alloc (abfd, strlen (prefix) + 1);
  if (sname == NULL)
  if (sname == NULL)
    return -1;
    return -1;
  strcpy (sname, prefix);
  strcpy (sname, prefix);
 
 
Line 1234... Line 2165...
  if (bfdsec == NULL)
  if (bfdsec == NULL)
    return -1;
    return -1;
 
 
  bfdsec->vma = 0;
  bfdsec->vma = 0;
  bfdsec->lma = 0;
  bfdsec->lma = 0;
  bfdsec->size = seg->strsize;
  bfdsec->size = command->len - 8;
  bfdsec->filepos = seg->stroff;
  bfdsec->filepos = command->offset + 8;
  bfdsec->alignment_power = 0;
  bfdsec->alignment_power = 0;
 
 
  seg->stabstr_segment = bfdsec;
  cmd->section = bfdsec;
 
 
 
  return 0;
 
}
 
 
 
static int
 
bfd_mach_o_scan_read_linkedit (bfd *abfd, bfd_mach_o_load_command *command)
 
{
 
  bfd_mach_o_linkedit_command *cmd = &command->command.linkedit;
 
  char buf[8];
 
 
 
  if (bfd_seek (abfd, command->offset + 8, SEEK_SET) != 0
 
      || bfd_bread ((PTR) buf, 8, abfd) != 8)
 
    return -1;
 
 
 
  cmd->dataoff = bfd_get_32 (abfd, buf + 0);
 
  cmd->datasize = bfd_get_32 (abfd, buf + 4);
 
  return 0;
 
}
 
 
 
static int
 
bfd_mach_o_scan_read_str (bfd *abfd, bfd_mach_o_load_command *command)
 
{
 
  bfd_mach_o_str_command *cmd = &command->command.str;
 
  char buf[8];
 
  unsigned long off;
 
 
 
  if (bfd_seek (abfd, command->offset + 8, SEEK_SET) != 0
 
      || bfd_bread ((PTR) buf, 4, abfd) != 4)
 
    return -1;
 
 
 
  off = bfd_get_32 (abfd, buf + 0);
 
  cmd->stroff = command->offset + off;
 
  cmd->str_len = command->len - off;
 
  cmd->str = bfd_alloc (abfd, cmd->str_len);
 
  if (cmd->str == NULL)
 
    return -1;
 
  if (bfd_seek (abfd, cmd->stroff, SEEK_SET) != 0
 
      || bfd_bread ((PTR) cmd->str, cmd->str_len, abfd) != cmd->str_len)
 
    return -1;
  return 0;
  return 0;
}
}
 
 
static int
static int
bfd_mach_o_scan_read_segment (bfd *abfd, bfd_mach_o_load_command *command)
bfd_mach_o_scan_read_segment (bfd *abfd,
 
                              bfd_mach_o_load_command *command,
 
                              unsigned int wide)
{
{
  unsigned char buf[48];
  unsigned char buf[64];
  bfd_mach_o_segment_command *seg = &command->command.segment;
  bfd_mach_o_segment_command *seg = &command->command.segment;
  unsigned long i;
  unsigned long i;
  asection *bfdsec;
 
  char *sname;
 
  const char *prefix = "LC_SEGMENT";
 
  unsigned int snamelen;
 
  flagword flags;
 
 
 
 
  if (wide)
 
    {
 
      BFD_ASSERT (command->type == BFD_MACH_O_LC_SEGMENT_64);
 
 
 
      if (bfd_seek (abfd, command->offset + 8, SEEK_SET) != 0
 
          || bfd_bread ((PTR) buf, 64, abfd) != 64)
 
        return -1;
 
 
 
      memcpy (seg->segname, buf, 16);
 
      seg->segname[16] = '\0';
 
 
 
      seg->vmaddr = bfd_h_get_64 (abfd, buf + 16);
 
      seg->vmsize = bfd_h_get_64 (abfd, buf + 24);
 
      seg->fileoff = bfd_h_get_64 (abfd, buf + 32);
 
      seg->filesize = bfd_h_get_64 (abfd, buf + 40);
 
      seg->maxprot = bfd_h_get_32 (abfd, buf + 48);
 
      seg->initprot = bfd_h_get_32 (abfd, buf + 52);
 
      seg->nsects = bfd_h_get_32 (abfd, buf + 56);
 
      seg->flags = bfd_h_get_32 (abfd, buf + 60);
 
    }
 
  else
 
    {
  BFD_ASSERT (command->type == BFD_MACH_O_LC_SEGMENT);
  BFD_ASSERT (command->type == BFD_MACH_O_LC_SEGMENT);
 
 
  bfd_seek (abfd, command->offset + 8, SEEK_SET);
      if (bfd_seek (abfd, command->offset + 8, SEEK_SET) != 0
  if (bfd_bread ((PTR) buf, 48, abfd) != 48)
          || bfd_bread ((PTR) buf, 48, abfd) != 48)
    return -1;
    return -1;
 
 
  memcpy (seg->segname, buf, 16);
  memcpy (seg->segname, buf, 16);
 
      seg->segname[16] = '\0';
 
 
  seg->vmaddr = bfd_h_get_32 (abfd, buf + 16);
  seg->vmaddr = bfd_h_get_32 (abfd, buf + 16);
  seg->vmsize = bfd_h_get_32 (abfd, buf + 20);
  seg->vmsize = bfd_h_get_32 (abfd, buf + 20);
  seg->fileoff = bfd_h_get_32 (abfd, buf + 24);
  seg->fileoff = bfd_h_get_32 (abfd, buf + 24);
  seg->filesize = bfd_h_get_32 (abfd, buf +  28);
  seg->filesize = bfd_h_get_32 (abfd, buf +  28);
  /* seg->maxprot = bfd_h_get_32 (abfd, buf + 32); */
      seg->maxprot = bfd_h_get_32 (abfd, buf + 32);
  /* seg->initprot = bfd_h_get_32 (abfd, buf + 36); */
      seg->initprot = bfd_h_get_32 (abfd, buf + 36);
  seg->nsects = bfd_h_get_32 (abfd, buf + 40);
  seg->nsects = bfd_h_get_32 (abfd, buf + 40);
  seg->flags = bfd_h_get_32 (abfd, buf + 44);
  seg->flags = bfd_h_get_32 (abfd, buf + 44);
 
    }
  snamelen = strlen (prefix) + 1 + strlen (seg->segname) + 1;
 
  sname = bfd_alloc (abfd, snamelen);
 
  if (sname == NULL)
 
    return -1;
 
  sprintf (sname, "%s.%s", prefix, seg->segname);
 
 
 
  flags = SEC_HAS_CONTENTS | SEC_LOAD | SEC_ALLOC | SEC_CODE;
 
  bfdsec = bfd_make_section_anyway_with_flags (abfd, sname, flags);
 
  if (bfdsec == NULL)
 
    return -1;
 
 
 
  bfdsec->vma = seg->vmaddr;
 
  bfdsec->lma = seg->vmaddr;
 
  bfdsec->size = seg->filesize;
 
  bfdsec->filepos = seg->fileoff;
 
  bfdsec->alignment_power = 0x0;
 
 
 
  seg->segment = bfdsec;
 
 
 
  if (seg->nsects != 0)
  if (seg->nsects != 0)
    {
    {
      seg->sections = bfd_alloc (abfd, seg->nsects * sizeof (bfd_mach_o_section));
      seg->sections = bfd_alloc (abfd, seg->nsects
 
                                 * sizeof (bfd_mach_o_section));
      if (seg->sections == NULL)
      if (seg->sections == NULL)
        return -1;
        return -1;
 
 
      for (i = 0; i < seg->nsects; i++)
      for (i = 0; i < seg->nsects; i++)
        {
        {
          bfd_vma segoff = command->offset + 48 + 8 + (i * 68);
          bfd_vma segoff;
 
          if (wide)
 
            segoff = command->offset + BFD_MACH_O_LC_SEGMENT_64_SIZE
 
              + (i * BFD_MACH_O_SECTION_64_SIZE);
 
          else
 
            segoff = command->offset + BFD_MACH_O_LC_SEGMENT_SIZE
 
              + (i * BFD_MACH_O_SECTION_SIZE);
 
 
          if (bfd_mach_o_scan_read_section (abfd, &seg->sections[i],
          if (bfd_mach_o_scan_read_section
                                            segoff) != 0)
              (abfd, &seg->sections[i], segoff, seg->initprot, wide) != 0)
            return -1;
            return -1;
        }
        }
    }
    }
 
 
  return 0;
  return 0;
}
}
 
 
static int
static int
 
bfd_mach_o_scan_read_segment_32 (bfd *abfd, bfd_mach_o_load_command *command)
 
{
 
  return bfd_mach_o_scan_read_segment (abfd, command, 0);
 
}
 
 
 
static int
 
bfd_mach_o_scan_read_segment_64 (bfd *abfd, bfd_mach_o_load_command *command)
 
{
 
  return bfd_mach_o_scan_read_segment (abfd, command, 1);
 
}
 
 
 
static int
bfd_mach_o_scan_read_command (bfd *abfd, bfd_mach_o_load_command *command)
bfd_mach_o_scan_read_command (bfd *abfd, bfd_mach_o_load_command *command)
{
{
  unsigned char buf[8];
  unsigned char buf[8];
 
 
  bfd_seek (abfd, command->offset, SEEK_SET);
  /* Read command type and length.  */
  if (bfd_bread ((PTR) buf, 8, abfd) != 8)
  if (bfd_seek (abfd, command->offset, SEEK_SET) != 0
 
      || bfd_bread ((PTR) buf, 8, abfd) != 8)
    return -1;
    return -1;
 
 
  command->type = (bfd_h_get_32 (abfd, buf) & ~BFD_MACH_O_LC_REQ_DYLD);
  command->type = bfd_h_get_32 (abfd, buf) & ~BFD_MACH_O_LC_REQ_DYLD;
  command->type_required = (bfd_h_get_32 (abfd, buf) & BFD_MACH_O_LC_REQ_DYLD
  command->type_required = (bfd_h_get_32 (abfd, buf) & BFD_MACH_O_LC_REQ_DYLD
                            ? 1 : 0);
                            ? TRUE : FALSE);
  command->len = bfd_h_get_32 (abfd, buf + 4);
  command->len = bfd_h_get_32 (abfd, buf + 4);
 
 
  switch (command->type)
  switch (command->type)
    {
    {
    case BFD_MACH_O_LC_SEGMENT:
    case BFD_MACH_O_LC_SEGMENT:
      if (bfd_mach_o_scan_read_segment (abfd, command) != 0)
      if (bfd_mach_o_scan_read_segment_32 (abfd, command) != 0)
 
        return -1;
 
      break;
 
    case BFD_MACH_O_LC_SEGMENT_64:
 
      if (bfd_mach_o_scan_read_segment_64 (abfd, command) != 0)
        return -1;
        return -1;
      break;
      break;
    case BFD_MACH_O_LC_SYMTAB:
    case BFD_MACH_O_LC_SYMTAB:
      if (bfd_mach_o_scan_read_symtab (abfd, command) != 0)
      if (bfd_mach_o_scan_read_symtab (abfd, command) != 0)
        return -1;
        return -1;
Line 1348... Line 2344...
        return -1;
        return -1;
      break;
      break;
    case BFD_MACH_O_LC_LOAD_DYLIB:
    case BFD_MACH_O_LC_LOAD_DYLIB:
    case BFD_MACH_O_LC_ID_DYLIB:
    case BFD_MACH_O_LC_ID_DYLIB:
    case BFD_MACH_O_LC_LOAD_WEAK_DYLIB:
    case BFD_MACH_O_LC_LOAD_WEAK_DYLIB:
 
    case BFD_MACH_O_LC_REEXPORT_DYLIB:
      if (bfd_mach_o_scan_read_dylib (abfd, command) != 0)
      if (bfd_mach_o_scan_read_dylib (abfd, command) != 0)
        return -1;
        return -1;
      break;
      break;
    case BFD_MACH_O_LC_PREBOUND_DYLIB:
    case BFD_MACH_O_LC_PREBOUND_DYLIB:
      if (bfd_mach_o_scan_read_prebound_dylib (abfd, command) != 0)
      if (bfd_mach_o_scan_read_prebound_dylib (abfd, command) != 0)
Line 1361... Line 2358...
    case BFD_MACH_O_LC_IDFVMLIB:
    case BFD_MACH_O_LC_IDFVMLIB:
    case BFD_MACH_O_LC_IDENT:
    case BFD_MACH_O_LC_IDENT:
    case BFD_MACH_O_LC_FVMFILE:
    case BFD_MACH_O_LC_FVMFILE:
    case BFD_MACH_O_LC_PREPAGE:
    case BFD_MACH_O_LC_PREPAGE:
    case BFD_MACH_O_LC_ROUTINES:
    case BFD_MACH_O_LC_ROUTINES:
 
      break;
    case BFD_MACH_O_LC_SUB_FRAMEWORK:
    case BFD_MACH_O_LC_SUB_FRAMEWORK:
 
    case BFD_MACH_O_LC_SUB_UMBRELLA:
 
    case BFD_MACH_O_LC_SUB_LIBRARY:
 
    case BFD_MACH_O_LC_SUB_CLIENT:
 
      if (bfd_mach_o_scan_read_str (abfd, command) != 0)
 
        return -1;
      break;
      break;
    case BFD_MACH_O_LC_DYSYMTAB:
    case BFD_MACH_O_LC_DYSYMTAB:
      if (bfd_mach_o_scan_read_dysymtab (abfd, command) != 0)
      if (bfd_mach_o_scan_read_dysymtab (abfd, command) != 0)
        return -1;
        return -1;
      break;
      break;
    case BFD_MACH_O_LC_SUB_UMBRELLA:
 
    case BFD_MACH_O_LC_SUB_CLIENT:
 
    case BFD_MACH_O_LC_SUB_LIBRARY:
 
    case BFD_MACH_O_LC_TWOLEVEL_HINTS:
    case BFD_MACH_O_LC_TWOLEVEL_HINTS:
    case BFD_MACH_O_LC_PREBIND_CKSUM:
    case BFD_MACH_O_LC_PREBIND_CKSUM:
      break;
      break;
 
    case BFD_MACH_O_LC_UUID:
 
      if (bfd_mach_o_scan_read_uuid (abfd, command) != 0)
 
        return -1;
 
      break;
 
    case BFD_MACH_O_LC_CODE_SIGNATURE:
 
    case BFD_MACH_O_LC_SEGMENT_SPLIT_INFO:
 
      if (bfd_mach_o_scan_read_linkedit (abfd, command) != 0)
 
        return -1;
 
      break;
    default:
    default:
      fprintf (stderr, "unable to read unknown load command 0x%lx\n",
      fprintf (stderr, "unable to read unknown load command 0x%lx\n",
               (unsigned long) command->type);
               (unsigned long) command->type);
      break;
      break;
    }
    }
Line 1385... Line 2394...
}
}
 
 
static void
static void
bfd_mach_o_flatten_sections (bfd *abfd)
bfd_mach_o_flatten_sections (bfd *abfd)
{
{
  bfd_mach_o_data_struct *mdata = abfd->tdata.mach_o_data;
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
  long csect = 0;
  long csect = 0;
  unsigned long i, j;
  unsigned long i, j;
 
 
 
  /* Count total number of sections.  */
  mdata->nsects = 0;
  mdata->nsects = 0;
 
 
  for (i = 0; i < mdata->header.ncmds; i++)
  for (i = 0; i < mdata->header.ncmds; i++)
    {
    {
      if (mdata->commands[i].type == BFD_MACH_O_LC_SEGMENT)
      if (mdata->commands[i].type == BFD_MACH_O_LC_SEGMENT
 
          || mdata->commands[i].type == BFD_MACH_O_LC_SEGMENT_64)
        {
        {
          bfd_mach_o_segment_command *seg;
          bfd_mach_o_segment_command *seg;
 
 
          seg = &mdata->commands[i].command.segment;
          seg = &mdata->commands[i].command.segment;
          mdata->nsects += seg->nsects;
          mdata->nsects += seg->nsects;
        }
        }
    }
    }
 
 
 
  /* Allocate sections array.  */
  mdata->sections = bfd_alloc (abfd,
  mdata->sections = bfd_alloc (abfd,
                               mdata->nsects * sizeof (bfd_mach_o_section *));
                               mdata->nsects * sizeof (bfd_mach_o_section *));
 
 
 
  /* Fill the array.  */
  csect = 0;
  csect = 0;
 
 
  for (i = 0; i < mdata->header.ncmds; i++)
  for (i = 0; i < mdata->header.ncmds; i++)
    {
    {
      if (mdata->commands[i].type == BFD_MACH_O_LC_SEGMENT)
      if (mdata->commands[i].type == BFD_MACH_O_LC_SEGMENT
 
          || mdata->commands[i].type == BFD_MACH_O_LC_SEGMENT_64)
        {
        {
          bfd_mach_o_segment_command *seg;
          bfd_mach_o_segment_command *seg;
 
 
          seg = &mdata->commands[i].command.segment;
          seg = &mdata->commands[i].command.segment;
          BFD_ASSERT (csect + seg->nsects <= mdata->nsects);
          BFD_ASSERT (csect + seg->nsects <= mdata->nsects);
Line 1424... Line 2439...
}
}
 
 
int
int
bfd_mach_o_scan_start_address (bfd *abfd)
bfd_mach_o_scan_start_address (bfd *abfd)
{
{
  bfd_mach_o_data_struct *mdata = abfd->tdata.mach_o_data;
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
  bfd_mach_o_thread_command *cmd = NULL;
  bfd_mach_o_thread_command *cmd = NULL;
  unsigned long i;
  unsigned long i;
 
 
  for (i = 0; i < mdata->header.ncmds; i++)
  for (i = 0; i < mdata->header.ncmds; i++)
    {
    {
Line 1447... Line 2462...
 
 
  for (i = 0; i < cmd->nflavours; i++)
  for (i = 0; i < cmd->nflavours; i++)
    {
    {
      if ((mdata->header.cputype == BFD_MACH_O_CPU_TYPE_I386)
      if ((mdata->header.cputype == BFD_MACH_O_CPU_TYPE_I386)
          && (cmd->flavours[i].flavour
          && (cmd->flavours[i].flavour
              == (unsigned long) BFD_MACH_O_i386_THREAD_STATE))
              == (unsigned long) BFD_MACH_O_x86_THREAD_STATE32))
        {
        {
          unsigned char buf[4];
          unsigned char buf[4];
 
 
          bfd_seek (abfd, cmd->flavours[i].offset + 40, SEEK_SET);
          if (bfd_seek (abfd, cmd->flavours[i].offset + 40, SEEK_SET) != 0
 
              || bfd_bread (buf, 4, abfd) != 4)
          if (bfd_bread (buf, 4, abfd) != 4)
 
            return -1;
            return -1;
 
 
          abfd->start_address = bfd_h_get_32 (abfd, buf);
          abfd->start_address = bfd_h_get_32 (abfd, buf);
        }
        }
      else if ((mdata->header.cputype == BFD_MACH_O_CPU_TYPE_POWERPC)
      else if ((mdata->header.cputype == BFD_MACH_O_CPU_TYPE_POWERPC)
               && (cmd->flavours[i].flavour == BFD_MACH_O_PPC_THREAD_STATE))
               && (cmd->flavours[i].flavour == BFD_MACH_O_PPC_THREAD_STATE))
        {
        {
          unsigned char buf[4];
          unsigned char buf[4];
 
 
          bfd_seek (abfd, cmd->flavours[i].offset + 0, SEEK_SET);
          if (bfd_seek (abfd, cmd->flavours[i].offset + 0, SEEK_SET) != 0
 
              || bfd_bread (buf, 4, abfd) != 4)
          if (bfd_bread (buf, 4, abfd) != 4)
 
            return -1;
            return -1;
 
 
          abfd->start_address = bfd_h_get_32 (abfd, buf);
          abfd->start_address = bfd_h_get_32 (abfd, buf);
        }
        }
 
      else if ((mdata->header.cputype == BFD_MACH_O_CPU_TYPE_POWERPC_64)
 
               && (cmd->flavours[i].flavour == BFD_MACH_O_PPC_THREAD_STATE64))
 
        {
 
          unsigned char buf[8];
 
 
 
          if (bfd_seek (abfd, cmd->flavours[i].offset + 0, SEEK_SET) != 0
 
              || bfd_bread (buf, 8, abfd) != 8)
 
            return -1;
 
 
 
          abfd->start_address = bfd_h_get_64 (abfd, buf);
 
        }
 
      else if ((mdata->header.cputype == BFD_MACH_O_CPU_TYPE_X86_64)
 
               && (cmd->flavours[i].flavour == BFD_MACH_O_x86_THREAD_STATE64))
 
        {
 
          unsigned char buf[8];
 
 
 
          if (bfd_seek (abfd, cmd->flavours[i].offset + (16 * 8), SEEK_SET) != 0
 
              || bfd_bread (buf, 8, abfd) != 8)
 
            return -1;
 
 
 
          abfd->start_address = bfd_h_get_64 (abfd, buf);
 
        }
    }
    }
 
 
  return 0;
  return 0;
}
}
 
 
Line 1483... Line 2518...
                 bfd_mach_o_data_struct *mdata)
                 bfd_mach_o_data_struct *mdata)
{
{
  unsigned int i;
  unsigned int i;
  enum bfd_architecture cputype;
  enum bfd_architecture cputype;
  unsigned long cpusubtype;
  unsigned long cpusubtype;
 
  unsigned int hdrsize;
 
 
 
  hdrsize = mach_o_wide_p (header) ?
 
    BFD_MACH_O_HEADER_64_SIZE : BFD_MACH_O_HEADER_SIZE;
 
 
  mdata->header = *header;
  mdata->header = *header;
  mdata->symbols = NULL;
 
 
 
  abfd->flags = (abfd->xvec->object_flags
  abfd->flags = abfd->flags & BFD_IN_MEMORY;
                 | (abfd->flags & (BFD_IN_MEMORY | BFD_IO_FUNCS)));
  switch (header->filetype)
 
    {
 
    case BFD_MACH_O_MH_OBJECT:
 
      abfd->flags |= HAS_RELOC;
 
      break;
 
    case BFD_MACH_O_MH_EXECUTE:
 
      abfd->flags |= EXEC_P;
 
      break;
 
    case BFD_MACH_O_MH_DYLIB:
 
    case BFD_MACH_O_MH_BUNDLE:
 
      abfd->flags |= DYNAMIC;
 
      break;
 
    }
 
 
  abfd->tdata.mach_o_data = mdata;
  abfd->tdata.mach_o_data = mdata;
 
 
  bfd_mach_o_convert_architecture (header->cputype, header->cpusubtype,
  bfd_mach_o_convert_architecture (header->cputype, header->cpusubtype,
                                   &cputype, &cpusubtype);
                                   &cputype, &cpusubtype);
  if (cputype == bfd_arch_unknown)
  if (cputype == bfd_arch_unknown)
Line 1504... Line 2555...
 
 
  bfd_set_arch_mach (abfd, cputype, cpusubtype);
  bfd_set_arch_mach (abfd, cputype, cpusubtype);
 
 
  if (header->ncmds != 0)
  if (header->ncmds != 0)
    {
    {
      mdata->commands = bfd_alloc (abfd, header->ncmds * sizeof (bfd_mach_o_load_command));
      mdata->commands = bfd_alloc
 
        (abfd, header->ncmds * sizeof (bfd_mach_o_load_command));
      if (mdata->commands == NULL)
      if (mdata->commands == NULL)
        return -1;
        return -1;
 
 
      for (i = 0; i < header->ncmds; i++)
      for (i = 0; i < header->ncmds; i++)
        {
        {
          bfd_mach_o_load_command *cur = &mdata->commands[i];
          bfd_mach_o_load_command *cur = &mdata->commands[i];
 
 
          if (i == 0)
          if (i == 0)
            cur->offset = 28;
            cur->offset = hdrsize;
          else
          else
            {
            {
              bfd_mach_o_load_command *prev = &mdata->commands[i - 1];
              bfd_mach_o_load_command *prev = &mdata->commands[i - 1];
              cur->offset = prev->offset + prev->len;
              cur->offset = prev->offset + prev->len;
            }
            }
Line 1533... Line 2585...
  bfd_mach_o_flatten_sections (abfd);
  bfd_mach_o_flatten_sections (abfd);
  return 0;
  return 0;
}
}
 
 
bfd_boolean
bfd_boolean
bfd_mach_o_mkobject (bfd *abfd)
bfd_mach_o_mkobject_init (bfd *abfd)
{
{
  bfd_mach_o_data_struct *mdata = NULL;
  bfd_mach_o_data_struct *mdata = NULL;
 
 
  mdata = bfd_alloc (abfd, sizeof (bfd_mach_o_data_struct));
  mdata = bfd_alloc (abfd, sizeof (bfd_mach_o_data_struct));
  if (mdata == NULL)
  if (mdata == NULL)
Line 1551... Line 2603...
  mdata->header.ncmds = 0;
  mdata->header.ncmds = 0;
  mdata->header.sizeofcmds = 0;
  mdata->header.sizeofcmds = 0;
  mdata->header.flags = 0;
  mdata->header.flags = 0;
  mdata->header.byteorder = BFD_ENDIAN_UNKNOWN;
  mdata->header.byteorder = BFD_ENDIAN_UNKNOWN;
  mdata->commands = NULL;
  mdata->commands = NULL;
  mdata->nsymbols = 0;
 
  mdata->symbols = NULL;
 
  mdata->nsects = 0;
  mdata->nsects = 0;
  mdata->sections = NULL;
  mdata->sections = NULL;
  mdata->ibfd = NULL;
 
 
 
  return TRUE;
 
}
 
 
 
const bfd_target *
 
bfd_mach_o_object_p (bfd *abfd)
 
{
 
  struct bfd_preserve preserve;
 
  bfd_mach_o_header header;
 
 
 
  preserve.marker = NULL;
 
  if (bfd_mach_o_read_header (abfd, &header) != 0)
 
    goto wrong;
 
 
 
  if (! (header.byteorder == BFD_ENDIAN_BIG
 
         || header.byteorder == BFD_ENDIAN_LITTLE))
 
    {
 
      fprintf (stderr, "unknown header byte-order value 0x%lx\n",
 
               (long) header.byteorder);
 
      goto wrong;
 
    }
 
 
 
  if (! ((header.byteorder == BFD_ENDIAN_BIG
 
          && abfd->xvec->byteorder == BFD_ENDIAN_BIG
 
          && abfd->xvec->header_byteorder == BFD_ENDIAN_BIG)
 
         || (header.byteorder == BFD_ENDIAN_LITTLE
 
             && abfd->xvec->byteorder == BFD_ENDIAN_LITTLE
 
             && abfd->xvec->header_byteorder == BFD_ENDIAN_LITTLE)))
 
    goto wrong;
 
 
 
  preserve.marker = bfd_zalloc (abfd, sizeof (bfd_mach_o_data_struct));
 
  if (preserve.marker == NULL
 
      || !bfd_preserve_save (abfd, &preserve))
 
    goto fail;
 
 
 
  if (bfd_mach_o_scan (abfd, &header,
 
                       (bfd_mach_o_data_struct *) preserve.marker) != 0)
 
    goto wrong;
 
 
 
  bfd_preserve_finish (abfd, &preserve);
 
  return abfd->xvec;
 
 
 
 wrong:
 
  bfd_set_error (bfd_error_wrong_format);
 
 
 
 fail:
  return TRUE;
  if (preserve.marker != NULL)
 
    bfd_preserve_restore (abfd, &preserve);
 
  return NULL;
 
}
}
 
 
const bfd_target *
const bfd_target *
bfd_mach_o_core_p (bfd *abfd)
bfd_mach_o_header_p (bfd *abfd,
 
                     bfd_mach_o_filetype filetype,
 
                     bfd_mach_o_cpu_type cputype)
{
{
  struct bfd_preserve preserve;
  struct bfd_preserve preserve;
  bfd_mach_o_header header;
  bfd_mach_o_header header;
 
 
  preserve.marker = NULL;
  preserve.marker = NULL;
  if (bfd_mach_o_read_header (abfd, &header) != 0)
  if (!bfd_mach_o_read_header (abfd, &header))
    goto wrong;
    goto wrong;
 
 
  if (! (header.byteorder == BFD_ENDIAN_BIG
  if (! (header.byteorder == BFD_ENDIAN_BIG
         || header.byteorder == BFD_ENDIAN_LITTLE))
         || header.byteorder == BFD_ENDIAN_LITTLE))
    {
    {
      fprintf (stderr, "unknown header byte-order value 0x%lx\n",
      fprintf (stderr, "unknown header byte-order value 0x%lx\n",
               (long) header.byteorder);
               (unsigned long) header.byteorder);
      abort ();
      goto wrong;
    }
    }
 
 
  if (! ((header.byteorder == BFD_ENDIAN_BIG
  if (! ((header.byteorder == BFD_ENDIAN_BIG
          && abfd->xvec->byteorder == BFD_ENDIAN_BIG
          && abfd->xvec->byteorder == BFD_ENDIAN_BIG
          && abfd->xvec->header_byteorder == BFD_ENDIAN_BIG)
          && abfd->xvec->header_byteorder == BFD_ENDIAN_BIG)
         || (header.byteorder == BFD_ENDIAN_LITTLE
         || (header.byteorder == BFD_ENDIAN_LITTLE
             && abfd->xvec->byteorder == BFD_ENDIAN_LITTLE
             && abfd->xvec->byteorder == BFD_ENDIAN_LITTLE
             && abfd->xvec->header_byteorder == BFD_ENDIAN_LITTLE)))
             && abfd->xvec->header_byteorder == BFD_ENDIAN_LITTLE)))
    goto wrong;
    goto wrong;
 
 
  if (header.filetype != BFD_MACH_O_MH_CORE)
  /* Check cputype and filetype.
 
     In case of wildcard, do not accept magics that are handled by existing
 
     targets.  */
 
  if (cputype)
 
    {
 
      if (header.cputype != cputype)
 
        goto wrong;
 
    }
 
  else
 
    {
 
      switch (header.cputype)
 
        {
 
        case BFD_MACH_O_CPU_TYPE_I386:
 
          /* Handled by mach-o-i386 */
 
          goto wrong;
 
        default:
 
          break;
 
        }
 
    }
 
  if (filetype)
 
    {
 
      if (header.filetype != filetype)
 
        goto wrong;
 
    }
 
  else
 
    {
 
      switch (header.filetype)
 
        {
 
        case BFD_MACH_O_MH_CORE:
 
          /* Handled by core_p */
    goto wrong;
    goto wrong;
 
        default:
 
          break;
 
        }
 
    }
 
 
  preserve.marker = bfd_zalloc (abfd, sizeof (bfd_mach_o_data_struct));
  preserve.marker = bfd_zalloc (abfd, sizeof (bfd_mach_o_data_struct));
  if (preserve.marker == NULL
  if (preserve.marker == NULL
      || !bfd_preserve_save (abfd, &preserve))
      || !bfd_preserve_save (abfd, &preserve))
    goto fail;
    goto fail;
Line 1657... Line 2694...
  if (preserve.marker != NULL)
  if (preserve.marker != NULL)
    bfd_preserve_restore (abfd, &preserve);
    bfd_preserve_restore (abfd, &preserve);
  return NULL;
  return NULL;
}
}
 
 
 
static const bfd_target *
 
bfd_mach_o_gen_object_p (bfd *abfd)
 
{
 
  return bfd_mach_o_header_p (abfd, 0, 0);
 
}
 
 
 
static const bfd_target *
 
bfd_mach_o_gen_core_p (bfd *abfd)
 
{
 
  return bfd_mach_o_header_p (abfd, BFD_MACH_O_MH_CORE, 0);
 
}
 
 
typedef struct mach_o_fat_archentry
typedef struct mach_o_fat_archentry
{
{
  unsigned long cputype;
  unsigned long cputype;
  unsigned long cpusubtype;
  unsigned long cpusubtype;
  unsigned long offset;
  unsigned long offset;
  unsigned long size;
  unsigned long size;
  unsigned long align;
  unsigned long align;
  bfd *abfd;
 
} mach_o_fat_archentry;
} mach_o_fat_archentry;
 
 
typedef struct mach_o_fat_data_struct
typedef struct mach_o_fat_data_struct
{
{
  unsigned long magic;
  unsigned long magic;
Line 1681... Line 2729...
{
{
  mach_o_fat_data_struct *adata = NULL;
  mach_o_fat_data_struct *adata = NULL;
  unsigned char buf[20];
  unsigned char buf[20];
  unsigned long i;
  unsigned long i;
 
 
  bfd_seek (abfd, 0, SEEK_SET);
  if (bfd_seek (abfd, 0, SEEK_SET) != 0
  if (bfd_bread ((PTR) buf, 8, abfd) != 8)
      || bfd_bread ((PTR) buf, 8, abfd) != 8)
    goto error;
    goto error;
 
 
  adata = bfd_alloc (abfd, sizeof (mach_o_fat_data_struct));
  adata = bfd_alloc (abfd, sizeof (mach_o_fat_data_struct));
  if (adata == NULL)
  if (adata == NULL)
    goto error;
    goto error;
 
 
  adata->magic = bfd_getb32 (buf);
  adata->magic = bfd_getb32 (buf);
  adata->nfat_arch = bfd_getb32 (buf + 4);
  adata->nfat_arch = bfd_getb32 (buf + 4);
  if (adata->magic != 0xcafebabe)
  if (adata->magic != 0xcafebabe)
    goto error;
    goto error;
 
  /* Avoid matching Java bytecode files, which have the same magic number.
 
     In the Java bytecode file format this field contains the JVM version,
 
     which starts at 43.0.  */
 
  if (adata->nfat_arch > 30)
 
    goto error;
 
 
  adata->archentries =
  adata->archentries =
    bfd_alloc (abfd, adata->nfat_arch * sizeof (mach_o_fat_archentry));
    bfd_alloc (abfd, adata->nfat_arch * sizeof (mach_o_fat_archentry));
  if (adata->archentries == NULL)
  if (adata->archentries == NULL)
    goto error;
    goto error;
 
 
  for (i = 0; i < adata->nfat_arch; i++)
  for (i = 0; i < adata->nfat_arch; i++)
    {
    {
      bfd_seek (abfd, 8 + 20 * i, SEEK_SET);
      if (bfd_seek (abfd, 8 + 20 * i, SEEK_SET) != 0
 
          || bfd_bread ((PTR) buf, 20, abfd) != 20)
      if (bfd_bread ((PTR) buf, 20, abfd) != 20)
 
        goto error;
        goto error;
      adata->archentries[i].cputype = bfd_getb32 (buf);
      adata->archentries[i].cputype = bfd_getb32 (buf);
      adata->archentries[i].cpusubtype = bfd_getb32 (buf + 4);
      adata->archentries[i].cpusubtype = bfd_getb32 (buf + 4);
      adata->archentries[i].offset = bfd_getb32 (buf + 8);
      adata->archentries[i].offset = bfd_getb32 (buf + 8);
      adata->archentries[i].size = bfd_getb32 (buf + 12);
      adata->archentries[i].size = bfd_getb32 (buf + 12);
      adata->archentries[i].align = bfd_getb32 (buf + 16);
      adata->archentries[i].align = bfd_getb32 (buf + 16);
      adata->archentries[i].abfd = NULL;
 
    }
    }
 
 
  abfd->tdata.mach_o_fat_data = adata;
  abfd->tdata.mach_o_fat_data = adata;
  return abfd->xvec;
  return abfd->xvec;
 
 
Line 1729... Line 2780...
bfd_mach_o_openr_next_archived_file (bfd *archive, bfd *prev)
bfd_mach_o_openr_next_archived_file (bfd *archive, bfd *prev)
{
{
  mach_o_fat_data_struct *adata;
  mach_o_fat_data_struct *adata;
  mach_o_fat_archentry *entry = NULL;
  mach_o_fat_archentry *entry = NULL;
  unsigned long i;
  unsigned long i;
 
  bfd *nbfd;
 
  enum bfd_architecture arch_type;
 
  unsigned long arch_subtype;
 
 
  adata = (mach_o_fat_data_struct *) archive->tdata.mach_o_fat_data;
  adata = (mach_o_fat_data_struct *) archive->tdata.mach_o_fat_data;
  BFD_ASSERT (adata != NULL);
  BFD_ASSERT (adata != NULL);
 
 
  /* Find index of previous entry.  */
  /* Find index of previous entry.  */
Line 1740... Line 2794...
    i = 0;       /* Start at first one.  */
    i = 0;       /* Start at first one.  */
  else
  else
    {
    {
      for (i = 0; i < adata->nfat_arch; i++)
      for (i = 0; i < adata->nfat_arch; i++)
        {
        {
          if (adata->archentries[i].abfd == prev)
          if (adata->archentries[i].offset == prev->origin)
            break;
            break;
        }
        }
 
 
      if (i == adata->nfat_arch)
      if (i == adata->nfat_arch)
        {
        {
Line 1760... Line 2814...
      bfd_set_error (bfd_error_no_more_archived_files);
      bfd_set_error (bfd_error_no_more_archived_files);
      return NULL;
      return NULL;
    }
    }
 
 
  entry = &adata->archentries[i];
  entry = &adata->archentries[i];
  if (entry->abfd == NULL)
  nbfd = _bfd_new_bfd_contained_in (archive);
    {
 
      bfd *nbfd = _bfd_new_bfd_contained_in (archive);
 
      char *s = NULL;
 
 
 
      if (nbfd == NULL)
      if (nbfd == NULL)
        return NULL;
        return NULL;
 
 
      nbfd->origin = entry->offset;
      nbfd->origin = entry->offset;
      s = bfd_malloc (strlen (archive->filename) + 1);
 
 
  bfd_mach_o_convert_architecture (entry->cputype, entry->cpusubtype,
 
                                   &arch_type, &arch_subtype);
 
  /* Create the member filename.
 
     Use FILENAME:ARCH_NAME.  */
 
  {
 
    char *s = NULL;
 
    const char *arch_name;
 
    size_t arch_file_len = strlen (bfd_get_filename (archive));
 
 
 
    arch_name = bfd_printable_arch_mach (arch_type, arch_subtype);
 
    s = bfd_malloc (arch_file_len + 1 + strlen (arch_name) + 1);
      if (s == NULL)
      if (s == NULL)
        return NULL;
        return NULL;
      strcpy (s, archive->filename);
    memcpy (s, bfd_get_filename (archive), arch_file_len);
 
    s[arch_file_len] = ':';
 
    strcpy (s + arch_file_len + 1, arch_name);
      nbfd->filename = s;
      nbfd->filename = s;
 
  }
      nbfd->iostream = NULL;
      nbfd->iostream = NULL;
      entry->abfd = nbfd;
  bfd_set_arch_mach (nbfd, arch_type, arch_subtype);
 
 
 
  return nbfd;
 
}
 
 
 
/* If ABFD format is FORMAT and architecture is ARCH, return it.
 
   If ABFD is a fat image containing a member that corresponds to FORMAT
 
   and ARCH, returns it.
 
   In other case, returns NULL.
 
   This function allows transparent uses of fat images.  */
 
bfd *
 
bfd_mach_o_fat_extract (bfd *abfd,
 
                        bfd_format format,
 
                        const bfd_arch_info_type *arch)
 
{
 
  bfd *res;
 
  mach_o_fat_data_struct *adata;
 
  unsigned int i;
 
 
 
  if (bfd_check_format (abfd, format))
 
    {
 
      if (bfd_get_arch_info (abfd) == arch)
 
        return abfd;
 
      return NULL;
 
    }
 
  if (!bfd_check_format (abfd, bfd_archive)
 
      || abfd->xvec != &mach_o_fat_vec)
 
    return NULL;
 
 
 
  /* This is a Mach-O fat image.  */
 
  adata = (mach_o_fat_data_struct *) abfd->tdata.mach_o_fat_data;
 
  BFD_ASSERT (adata != NULL);
 
 
 
  for (i = 0; i < adata->nfat_arch; i++)
 
    {
 
      struct mach_o_fat_archentry *e = &adata->archentries[i];
 
      enum bfd_architecture cpu_type;
 
      unsigned long cpu_subtype;
 
 
 
      bfd_mach_o_convert_architecture (e->cputype, e->cpusubtype,
 
                                       &cpu_type, &cpu_subtype);
 
      if (cpu_type != arch->arch || cpu_subtype != arch->mach)
 
        continue;
 
 
 
      /* The architecture is found.  */
 
      res = _bfd_new_bfd_contained_in (abfd);
 
      if (res == NULL)
 
        return NULL;
 
 
 
      res->origin = e->offset;
 
 
 
      res->filename = strdup (abfd->filename);
 
      res->iostream = NULL;
 
 
 
      if (bfd_check_format (res, format))
 
        {
 
          BFD_ASSERT (bfd_get_arch_info (res) == arch);
 
          return res;
 
        }
 
      bfd_close (res);
 
      return NULL;
    }
    }
 
 
  return entry->abfd;
  return NULL;
}
}
 
 
int
int
bfd_mach_o_lookup_section (bfd *abfd,
bfd_mach_o_lookup_section (bfd *abfd,
                           asection *section,
                           asection *section,
                           bfd_mach_o_load_command **mcommand,
                           bfd_mach_o_load_command **mcommand,
                           bfd_mach_o_section **msection)
                           bfd_mach_o_section **msection)
{
{
  struct mach_o_data_struct *md = abfd->tdata.mach_o_data;
  struct mach_o_data_struct *md = bfd_mach_o_get_data (abfd);
  unsigned int i, j, num;
  unsigned int i, j, num;
 
 
  bfd_mach_o_load_command *ncmd = NULL;
  bfd_mach_o_load_command *ncmd = NULL;
  bfd_mach_o_section *nsect = NULL;
  bfd_mach_o_section *nsect = NULL;
 
 
Line 1802... Line 2926...
  for (i = 0; i < md->header.ncmds; i++)
  for (i = 0; i < md->header.ncmds; i++)
    {
    {
      struct bfd_mach_o_load_command *cmd = &md->commands[i];
      struct bfd_mach_o_load_command *cmd = &md->commands[i];
      struct bfd_mach_o_segment_command *seg = NULL;
      struct bfd_mach_o_segment_command *seg = NULL;
 
 
      if (cmd->type != BFD_MACH_O_LC_SEGMENT)
      if (cmd->type != BFD_MACH_O_LC_SEGMENT
 
          || cmd->type != BFD_MACH_O_LC_SEGMENT_64)
        continue;
        continue;
      seg = &cmd->command.segment;
      seg = &cmd->command.segment;
 
 
      if (seg->segment == section)
 
        {
 
          if (num == 0)
 
            ncmd = cmd;
 
          num++;
 
        }
 
 
 
      for (j = 0; j < seg->nsects; j++)
      for (j = 0; j < seg->nsects; j++)
        {
        {
          struct bfd_mach_o_section *sect = &seg->sections[j];
          struct bfd_mach_o_section *sect = &seg->sections[j];
 
 
          if (sect->bfdsection == section)
          if (sect->bfdsection == section)
            {
            {
              if (num == 0)
              if (num == 0)
 
                {
                nsect = sect;
                nsect = sect;
 
                  ncmd = cmd;
 
                }
              num++;
              num++;
            }
            }
        }
        }
    }
    }
 
 
Line 1836... Line 2957...
int
int
bfd_mach_o_lookup_command (bfd *abfd,
bfd_mach_o_lookup_command (bfd *abfd,
                           bfd_mach_o_load_command_type type,
                           bfd_mach_o_load_command_type type,
                           bfd_mach_o_load_command **mcommand)
                           bfd_mach_o_load_command **mcommand)
{
{
  struct mach_o_data_struct *md = NULL;
  struct mach_o_data_struct *md = bfd_mach_o_get_data (abfd);
  bfd_mach_o_load_command *ncmd = NULL;
  bfd_mach_o_load_command *ncmd = NULL;
  unsigned int i, num;
  unsigned int i, num;
 
 
  md = abfd->tdata.mach_o_data;
 
 
 
  BFD_ASSERT (md != NULL);
  BFD_ASSERT (md != NULL);
  BFD_ASSERT (mcommand != NULL);
  BFD_ASSERT (mcommand != NULL);
 
 
  num = 0;
  num = 0;
  for (i = 0; i < md->header.ncmds; i++)
  for (i = 0; i < md->header.ncmds; i++)
Line 1886... Line 3005...
    default:
    default:
      return 0;
      return 0;
    }
    }
}
}
 
 
 
typedef struct bfd_mach_o_xlat_name
 
{
 
  const char *name;
 
  unsigned long val;
 
}
 
bfd_mach_o_xlat_name;
 
 
 
static void
 
bfd_mach_o_print_flags (const bfd_mach_o_xlat_name *table,
 
                        unsigned long val,
 
                        FILE *file)
 
{
 
  int first = 1;
 
 
 
  for (; table->name; table++)
 
    {
 
      if (table->val & val)
 
        {
 
          if (!first)
 
            fprintf (file, "+");
 
          fprintf (file, "%s", table->name);
 
          val &= ~table->val;
 
          first = 0;
 
        }
 
    }
 
  if (val)
 
    {
 
      if (!first)
 
        fprintf (file, "+");
 
      fprintf (file, "0x%lx", val);
 
      return;
 
    }
 
  if (first)
 
    fprintf (file, "-");
 
}
 
 
 
static const char *
 
bfd_mach_o_get_name (const bfd_mach_o_xlat_name *table, unsigned long val)
 
{
 
  for (; table->name; table++)
 
    if (table->val == val)
 
      return table->name;
 
  return "*UNKNOWN*";
 
}
 
 
 
static bfd_mach_o_xlat_name bfd_mach_o_cpu_name[] =
 
{
 
  { "vax", BFD_MACH_O_CPU_TYPE_VAX},
 
  { "mc680x0", BFD_MACH_O_CPU_TYPE_MC680x0},
 
  { "i386", BFD_MACH_O_CPU_TYPE_I386},
 
  { "mips", BFD_MACH_O_CPU_TYPE_MIPS},
 
  { "mc98000", BFD_MACH_O_CPU_TYPE_MC98000},
 
  { "hppa", BFD_MACH_O_CPU_TYPE_HPPA},
 
  { "arm", BFD_MACH_O_CPU_TYPE_ARM},
 
  { "mc88000", BFD_MACH_O_CPU_TYPE_MC88000},
 
  { "sparc", BFD_MACH_O_CPU_TYPE_SPARC},
 
  { "i860", BFD_MACH_O_CPU_TYPE_I860},
 
  { "alpha", BFD_MACH_O_CPU_TYPE_ALPHA},
 
  { "powerpc", BFD_MACH_O_CPU_TYPE_POWERPC},
 
  { "powerpc_64", BFD_MACH_O_CPU_TYPE_POWERPC_64},
 
  { "x86_64", BFD_MACH_O_CPU_TYPE_X86_64},
 
  { NULL, 0}
 
};
 
 
 
static bfd_mach_o_xlat_name bfd_mach_o_filetype_name[] =
 
{
 
  { "object", BFD_MACH_O_MH_OBJECT},
 
  { "execute", BFD_MACH_O_MH_EXECUTE},
 
  { "fvmlib", BFD_MACH_O_MH_FVMLIB},
 
  { "core", BFD_MACH_O_MH_CORE},
 
  { "preload", BFD_MACH_O_MH_PRELOAD},
 
  { "dylib", BFD_MACH_O_MH_DYLIB},
 
  { "dylinker", BFD_MACH_O_MH_DYLINKER},
 
  { "bundle", BFD_MACH_O_MH_BUNDLE},
 
  { NULL, 0}
 
};
 
 
 
static bfd_mach_o_xlat_name bfd_mach_o_header_flags_name[] =
 
{
 
  { "noundefs", BFD_MACH_O_MH_NOUNDEFS },
 
  { "incrlink", BFD_MACH_O_MH_INCRLINK },
 
  { "dyldlink", BFD_MACH_O_MH_DYLDLINK },
 
  { "bindatload", BFD_MACH_O_MH_BINDATLOAD },
 
  { "prebound", BFD_MACH_O_MH_PREBOUND },
 
  { "split_segs", BFD_MACH_O_MH_SPLIT_SEGS },
 
  { "lazy_init", BFD_MACH_O_MH_LAZY_INIT },
 
  { "twolevel", BFD_MACH_O_MH_TWOLEVEL },
 
  { "force_flat", BFD_MACH_O_MH_FORCE_FLAT },
 
  { "nomultidefs", BFD_MACH_O_MH_NOMULTIDEFS },
 
  { "nofixprebinding", BFD_MACH_O_MH_NOFIXPREBINDING },
 
  { "prebindable", BFD_MACH_O_MH_PREBINDABLE },
 
  { "allmodsbound", BFD_MACH_O_MH_ALLMODSBOUND },
 
  { "subsections_via_symbols", BFD_MACH_O_MH_SUBSECTIONS_VIA_SYMBOLS },
 
  { "canonical", BFD_MACH_O_MH_CANONICAL },
 
  { "weak_defines", BFD_MACH_O_MH_WEAK_DEFINES },
 
  { "binds_to_weak", BFD_MACH_O_MH_BINDS_TO_WEAK },
 
  { "allow_stack_execution", BFD_MACH_O_MH_ALLOW_STACK_EXECUTION },
 
  { "root_safe", BFD_MACH_O_MH_ROOT_SAFE },
 
  { "setuid_safe", BFD_MACH_O_MH_SETUID_SAFE },
 
  { "no_reexported_dylibs", BFD_MACH_O_MH_NO_REEXPORTED_DYLIBS },
 
  { "pie", BFD_MACH_O_MH_PIE },
 
  { NULL, 0}
 
};
 
 
 
static bfd_mach_o_xlat_name bfd_mach_o_section_type_name[] =
 
{
 
  { "regular", BFD_MACH_O_S_REGULAR},
 
  { "zerofill", BFD_MACH_O_S_ZEROFILL},
 
  { "cstring_literals", BFD_MACH_O_S_CSTRING_LITERALS},
 
  { "4byte_literals", BFD_MACH_O_S_4BYTE_LITERALS},
 
  { "8byte_literals", BFD_MACH_O_S_8BYTE_LITERALS},
 
  { "literal_pointers", BFD_MACH_O_S_LITERAL_POINTERS},
 
  { "non_lazy_symbol_pointers", BFD_MACH_O_S_NON_LAZY_SYMBOL_POINTERS},
 
  { "lazy_symbol_pointers", BFD_MACH_O_S_LAZY_SYMBOL_POINTERS},
 
  { "symbol_stubs", BFD_MACH_O_S_SYMBOL_STUBS},
 
  { "mod_init_func_pointers", BFD_MACH_O_S_MOD_INIT_FUNC_POINTERS},
 
  { "mod_fini_func_pointers", BFD_MACH_O_S_MOD_FINI_FUNC_POINTERS},
 
  { "coalesced", BFD_MACH_O_S_COALESCED},
 
  { "gb_zerofill", BFD_MACH_O_S_GB_ZEROFILL},
 
  { "interposing", BFD_MACH_O_S_INTERPOSING},
 
  { "16byte_literals", BFD_MACH_O_S_16BYTE_LITERALS},
 
  { "dtrace_dof", BFD_MACH_O_S_DTRACE_DOF},
 
  { "lazy_dylib_symbol_pointers", BFD_MACH_O_S_LAZY_DYLIB_SYMBOL_POINTERS},
 
  { NULL, 0}
 
};
 
 
 
static bfd_mach_o_xlat_name bfd_mach_o_section_attribute_name[] =
 
{
 
  { "loc_reloc", BFD_MACH_O_S_ATTR_LOC_RELOC },
 
  { "ext_reloc", BFD_MACH_O_S_ATTR_EXT_RELOC },
 
  { "some_instructions", BFD_MACH_O_S_ATTR_SOME_INSTRUCTIONS },
 
  { "debug", BFD_MACH_O_S_ATTR_DEBUG },
 
  { "modifying_code", BFD_MACH_O_S_SELF_MODIFYING_CODE },
 
  { "live_support", BFD_MACH_O_S_ATTR_LIVE_SUPPORT },
 
  { "no_dead_strip", BFD_MACH_O_S_ATTR_NO_DEAD_STRIP },
 
  { "strip_static_syms", BFD_MACH_O_S_ATTR_STRIP_STATIC_SYMS },
 
  { "no_toc", BFD_MACH_O_S_ATTR_NO_TOC },
 
  { "pure_instructions", BFD_MACH_O_S_ATTR_PURE_INSTRUCTIONS },
 
  { NULL, 0}
 
};
 
 
 
static bfd_mach_o_xlat_name bfd_mach_o_load_command_name[] =
 
{
 
  { "segment", BFD_MACH_O_LC_SEGMENT},
 
  { "symtab", BFD_MACH_O_LC_SYMTAB},
 
  { "symseg", BFD_MACH_O_LC_SYMSEG},
 
  { "thread", BFD_MACH_O_LC_THREAD},
 
  { "unixthread", BFD_MACH_O_LC_UNIXTHREAD},
 
  { "loadfvmlib", BFD_MACH_O_LC_LOADFVMLIB},
 
  { "idfvmlib", BFD_MACH_O_LC_IDFVMLIB},
 
  { "ident", BFD_MACH_O_LC_IDENT},
 
  { "fvmfile", BFD_MACH_O_LC_FVMFILE},
 
  { "prepage", BFD_MACH_O_LC_PREPAGE},
 
  { "dysymtab", BFD_MACH_O_LC_DYSYMTAB},
 
  { "load_dylib", BFD_MACH_O_LC_LOAD_DYLIB},
 
  { "id_dylib", BFD_MACH_O_LC_ID_DYLIB},
 
  { "load_dylinker", BFD_MACH_O_LC_LOAD_DYLINKER},
 
  { "id_dylinker", BFD_MACH_O_LC_ID_DYLINKER},
 
  { "prebound_dylib", BFD_MACH_O_LC_PREBOUND_DYLIB},
 
  { "routines", BFD_MACH_O_LC_ROUTINES},
 
  { "sub_framework", BFD_MACH_O_LC_SUB_FRAMEWORK},
 
  { "sub_umbrella", BFD_MACH_O_LC_SUB_UMBRELLA},
 
  { "sub_client", BFD_MACH_O_LC_SUB_CLIENT},
 
  { "sub_library", BFD_MACH_O_LC_SUB_LIBRARY},
 
  { "twolevel_hints", BFD_MACH_O_LC_TWOLEVEL_HINTS},
 
  { "prebind_cksum", BFD_MACH_O_LC_PREBIND_CKSUM},
 
  { "load_weak_dylib", BFD_MACH_O_LC_LOAD_WEAK_DYLIB},
 
  { "segment_64", BFD_MACH_O_LC_SEGMENT_64},
 
  { "routines_64", BFD_MACH_O_LC_ROUTINES_64},
 
  { "uuid", BFD_MACH_O_LC_UUID},
 
  { "rpath", BFD_MACH_O_LC_RPATH},
 
  { "code_signature", BFD_MACH_O_LC_CODE_SIGNATURE},
 
  { "segment_split_info", BFD_MACH_O_LC_SEGMENT_SPLIT_INFO},
 
  { "reexport_dylib", BFD_MACH_O_LC_REEXPORT_DYLIB},
 
  { "lazy_load_dylib", BFD_MACH_O_LC_LAZY_LOAD_DYLIB},
 
  { "encryption_info", BFD_MACH_O_LC_ENCRYPTION_INFO},
 
  { NULL, 0}
 
};
 
 
 
static void
 
bfd_mach_o_print_private_header (bfd *abfd, FILE *file)
 
{
 
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
 
  bfd_mach_o_header *h = &mdata->header;
 
 
 
  fprintf (file, _("Mach-O header:\n"));
 
  fprintf (file, _(" magic     : %08lx\n"), h->magic);
 
  fprintf (file, _(" cputype   : %08lx (%s)\n"), h->cputype,
 
           bfd_mach_o_get_name (bfd_mach_o_cpu_name, h->cputype));
 
  fprintf (file, _(" cpusubtype: %08lx\n"), h->cpusubtype);
 
  fprintf (file, _(" filetype  : %08lx (%s)\n"),
 
           h->filetype,
 
           bfd_mach_o_get_name (bfd_mach_o_filetype_name, h->filetype));
 
  fprintf (file, _(" ncmds     : %08lx\n"), h->ncmds);
 
  fprintf (file, _(" sizeofcmds: %08lx\n"), h->sizeofcmds);
 
  fprintf (file, _(" flags     : %08lx ("), h->flags);
 
  bfd_mach_o_print_flags (bfd_mach_o_header_flags_name, h->flags, file);
 
  fprintf (file, _(")\n"));
 
  fprintf (file, _(" reserved  : %08x\n"), h->reserved);
 
}
 
 
 
static void
 
bfd_mach_o_print_section_map (bfd *abfd, FILE *file)
 
{
 
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
 
  unsigned int i, j;
 
  unsigned int sec_nbr = 0;
 
 
 
  fprintf (file, _("Segments and Sections:\n"));
 
  fprintf (file, _(" #: Segment name     Section name     Address\n"));
 
 
 
  for (i = 0; i < mdata->header.ncmds; i++)
 
    {
 
      bfd_mach_o_segment_command *seg;
 
 
 
      if (mdata->commands[i].type != BFD_MACH_O_LC_SEGMENT
 
          && mdata->commands[i].type != BFD_MACH_O_LC_SEGMENT_64)
 
        continue;
 
 
 
      seg = &mdata->commands[i].command.segment;
 
 
 
      fprintf (file, "[Segment %-16s ", seg->segname);
 
      fprintf_vma (file, seg->vmaddr);
 
      fprintf (file, "-");
 
      fprintf_vma  (file, seg->vmaddr + seg->vmsize - 1);
 
      fputc (' ', file);
 
      fputc (seg->initprot & BFD_MACH_O_PROT_READ ? 'r' : '-', file);
 
      fputc (seg->initprot & BFD_MACH_O_PROT_WRITE ? 'w' : '-', file);
 
      fputc (seg->initprot & BFD_MACH_O_PROT_EXECUTE ? 'x' : '-', file);
 
      fprintf (file, "]\n");
 
      for (j = 0; j < seg->nsects; j++)
 
        {
 
          bfd_mach_o_section *sec = &seg->sections[j];
 
          fprintf (file, "%02u: %-16s %-16s ", ++sec_nbr,
 
                   sec->segname, sec->sectname);
 
          fprintf_vma (file, sec->addr);
 
          fprintf (file, " ");
 
          fprintf_vma  (file, sec->size);
 
          fprintf (file, " %08lx\n", sec->flags);
 
        }
 
    }
 
}
 
 
 
/* Return the number of indirect symbols for a section.
 
   Must be called only for symbol pointer section and symbol stubs
 
   sections.  */
 
 
 
static unsigned int
 
bfd_mach_o_section_get_nbr_indirect (bfd *abfd, bfd_mach_o_section *sec)
 
{
 
  unsigned int elsz;
 
 
 
  switch (sec->flags & BFD_MACH_O_SECTION_TYPE_MASK)
 
    {
 
    case BFD_MACH_O_S_NON_LAZY_SYMBOL_POINTERS:
 
    case BFD_MACH_O_S_LAZY_SYMBOL_POINTERS:
 
      elsz = bfd_mach_o_wide_p (abfd) ? 8 : 4;
 
      return sec->size / elsz;
 
    case BFD_MACH_O_S_SYMBOL_STUBS:
 
      elsz = sec->reserved2;
 
      if (elsz)
 
        return sec->size / elsz;
 
      else
 
        return 0;
 
    default:
 
      BFD_FAIL ();
 
      return 0;
 
    }
 
}
 
 
 
static void
 
bfd_mach_o_print_section (bfd *abfd ATTRIBUTE_UNUSED,
 
                          bfd_mach_o_section *sec, FILE *file)
 
{
 
  fprintf (file, " Section: %-16s %-16s (bfdname: %s)\n",
 
           sec->sectname, sec->segname, sec->bfdsection->name);
 
  fprintf (file, "  addr: ");
 
  fprintf_vma (file, sec->addr);
 
  fprintf (file, " size: ");
 
  fprintf_vma  (file, sec->size);
 
  fprintf (file, " offset: ");
 
  fprintf_vma (file, sec->offset);
 
  fprintf (file, "\n");
 
  fprintf (file, "  align: %ld", sec->align);
 
  fprintf (file, "  nreloc: %lu  reloff: ", sec->nreloc);
 
  fprintf_vma (file, sec->reloff);
 
  fprintf (file, "\n");
 
  fprintf (file, "  flags: %08lx (type: %s", sec->flags,
 
           bfd_mach_o_get_name (bfd_mach_o_section_type_name,
 
                                sec->flags & BFD_MACH_O_SECTION_TYPE_MASK));
 
  fprintf (file, " attr: ");
 
  bfd_mach_o_print_flags (bfd_mach_o_section_attribute_name,
 
                          sec->flags & BFD_MACH_O_SECTION_ATTRIBUTES_MASK,
 
                          file);
 
  fprintf (file, ")\n");
 
  switch (sec->flags & BFD_MACH_O_SECTION_TYPE_MASK)
 
    {
 
    case BFD_MACH_O_S_NON_LAZY_SYMBOL_POINTERS:
 
    case BFD_MACH_O_S_LAZY_SYMBOL_POINTERS:
 
    case BFD_MACH_O_S_SYMBOL_STUBS:
 
      fprintf (file, "  first indirect sym: %lu", sec->reserved1);
 
      fprintf (file, " (%u entries)",
 
               bfd_mach_o_section_get_nbr_indirect (abfd, sec));
 
      break;
 
    default:
 
      fprintf (file, "  reserved1: 0x%lx", sec->reserved1);
 
      break;
 
    }
 
  switch (sec->flags & BFD_MACH_O_SECTION_TYPE_MASK)
 
    {
 
    case BFD_MACH_O_S_SYMBOL_STUBS:
 
      fprintf (file, "  stub size: %lu", sec->reserved2);
 
      break;
 
    default:
 
      fprintf (file, "  reserved2: 0x%lx", sec->reserved2);
 
      break;
 
    }
 
  fprintf (file, "  reserved3: 0x%lx\n", sec->reserved3);
 
}
 
 
 
static void
 
bfd_mach_o_print_segment (bfd *abfd ATTRIBUTE_UNUSED,
 
                          bfd_mach_o_load_command *cmd, FILE *file)
 
{
 
  bfd_mach_o_segment_command *seg = &cmd->command.segment;
 
  unsigned int i;
 
 
 
  fprintf (file, " name: %s\n", *seg->segname ? seg->segname : "*none*");
 
  fprintf (file, "    vmaddr: ");
 
  fprintf_vma (file, seg->vmaddr);
 
  fprintf (file, "   vmsize: ");
 
  fprintf_vma  (file, seg->vmsize);
 
  fprintf (file, "\n");
 
  fprintf (file, "   fileoff: ");
 
  fprintf_vma (file, seg->fileoff);
 
  fprintf (file, " filesize: ");
 
  fprintf_vma (file, (bfd_vma)seg->filesize);
 
  fprintf (file, " endoff: ");
 
  fprintf_vma (file, (bfd_vma)(seg->fileoff + seg->filesize));
 
  fprintf (file, "\n");
 
  fprintf (file, "   nsects: %lu  ", seg->nsects);
 
  fprintf (file, " flags: %lx\n", seg->flags);
 
  for (i = 0; i < seg->nsects; i++)
 
    bfd_mach_o_print_section (abfd, &seg->sections[i], file);
 
}
 
 
 
static void
 
bfd_mach_o_print_dysymtab (bfd *abfd ATTRIBUTE_UNUSED,
 
                           bfd_mach_o_load_command *cmd, FILE *file)
 
{
 
  bfd_mach_o_dysymtab_command *dysymtab = &cmd->command.dysymtab;
 
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
 
  unsigned int i;
 
 
 
  fprintf (file, "              local symbols: idx: %10lu  num: %-8lu",
 
           dysymtab->ilocalsym, dysymtab->nlocalsym);
 
  fprintf (file, " (nxtidx: %lu)\n",
 
           dysymtab->ilocalsym + dysymtab->nlocalsym);
 
  fprintf (file, "           external symbols: idx: %10lu  num: %-8lu",
 
           dysymtab->iextdefsym, dysymtab->nextdefsym);
 
  fprintf (file, " (nxtidx: %lu)\n",
 
           dysymtab->iextdefsym + dysymtab->nextdefsym);
 
  fprintf (file, "          undefined symbols: idx: %10lu  num: %-8lu",
 
           dysymtab->iundefsym, dysymtab->nundefsym);
 
  fprintf (file, " (nxtidx: %lu)\n",
 
           dysymtab->iundefsym + dysymtab->nundefsym);
 
  fprintf (file, "           table of content: off: 0x%08lx  num: %-8lu",
 
           dysymtab->tocoff, dysymtab->ntoc);
 
  fprintf (file, " (endoff: 0x%08lx)\n",
 
           dysymtab->tocoff
 
           + dysymtab->ntoc * BFD_MACH_O_TABLE_OF_CONTENT_SIZE);
 
  fprintf (file, "               module table: off: 0x%08lx  num: %-8lu",
 
           dysymtab->modtaboff, dysymtab->nmodtab);
 
  fprintf (file, " (endoff: 0x%08lx)\n",
 
           dysymtab->modtaboff + dysymtab->nmodtab
 
           * (mach_o_wide_p (&mdata->header) ?
 
              BFD_MACH_O_DYLIB_MODULE_64_SIZE : BFD_MACH_O_DYLIB_MODULE_SIZE));
 
  fprintf (file, "   external reference table: off: 0x%08lx  num: %-8lu",
 
           dysymtab->extrefsymoff, dysymtab->nextrefsyms);
 
  fprintf (file, " (endoff: 0x%08lx)\n",
 
           dysymtab->extrefsymoff
 
           + dysymtab->nextrefsyms * BFD_MACH_O_REFERENCE_SIZE);
 
  fprintf (file, "      indirect symbol table: off: 0x%08lx  num: %-8lu",
 
           dysymtab->indirectsymoff, dysymtab->nindirectsyms);
 
  fprintf (file, " (endoff: 0x%08lx)\n",
 
           dysymtab->indirectsymoff
 
           + dysymtab->nindirectsyms * BFD_MACH_O_INDIRECT_SYMBOL_SIZE);
 
  fprintf (file, "  external relocation table: off: 0x%08lx  num: %-8lu",
 
           dysymtab->extreloff, dysymtab->nextrel);
 
  fprintf (file, " (endoff: 0x%08lx)\n",
 
           dysymtab->extreloff + dysymtab->nextrel * BFD_MACH_O_RELENT_SIZE);
 
  fprintf (file, "     local relocation table: off: 0x%08lx  num: %-8lu",
 
           dysymtab->locreloff, dysymtab->nlocrel);
 
  fprintf (file, " (endoff: 0x%08lx)\n",
 
           dysymtab->locreloff + dysymtab->nlocrel * BFD_MACH_O_RELENT_SIZE);
 
 
 
  if (dysymtab->ntoc > 0
 
      || dysymtab->nindirectsyms > 0
 
      || dysymtab->nextrefsyms > 0)
 
    {
 
      /* Try to read the symbols to display the toc or indirect symbols.  */
 
      bfd_mach_o_scan_read_symtab_symbols (abfd);
 
    }
 
  else if (dysymtab->nmodtab > 0)
 
    {
 
      /* Try to read the strtab to display modules name.  */
 
      bfd_mach_o_scan_read_symtab_strtab (abfd);
 
    }
 
 
 
  for (i = 0; i < dysymtab->nmodtab; i++)
 
    {
 
      bfd_mach_o_dylib_module *module = &dysymtab->dylib_module[i];
 
      fprintf (file, "  module %u:\n", i);
 
      fprintf (file, "   name: %lu", module->module_name_idx);
 
      if (mdata->symtab && mdata->symtab->strtab)
 
        fprintf (file, ": %s",
 
                 mdata->symtab->strtab + module->module_name_idx);
 
      fprintf (file, "\n");
 
      fprintf (file, "   extdefsym: idx: %8lu  num: %lu\n",
 
               module->iextdefsym, module->nextdefsym);
 
      fprintf (file, "      refsym: idx: %8lu  num: %lu\n",
 
               module->irefsym, module->nrefsym);
 
      fprintf (file, "    localsym: idx: %8lu  num: %lu\n",
 
               module->ilocalsym, module->nlocalsym);
 
      fprintf (file, "      extrel: idx: %8lu  num: %lu\n",
 
               module->iextrel, module->nextrel);
 
      fprintf (file, "        init: idx: %8u  num: %u\n",
 
               module->iinit, module->ninit);
 
      fprintf (file, "        term: idx: %8u  num: %u\n",
 
               module->iterm, module->nterm);
 
      fprintf (file, "   objc_module_info: addr: ");
 
      fprintf_vma (file, module->objc_module_info_addr);
 
      fprintf (file, "  size: %lu\n", module->objc_module_info_size);
 
    }
 
 
 
  if (dysymtab->ntoc > 0)
 
    {
 
      bfd_mach_o_symtab_command *symtab = mdata->symtab;
 
 
 
      fprintf (file, "  table of content: (symbol/module)\n");
 
      for (i = 0; i < dysymtab->ntoc; i++)
 
        {
 
          bfd_mach_o_dylib_table_of_content *toc = &dysymtab->dylib_toc[i];
 
 
 
          fprintf (file, "   %4u: ", i);
 
          if (symtab && symtab->symbols && toc->symbol_index < symtab->nsyms)
 
            {
 
              const char *name = symtab->symbols[toc->symbol_index].symbol.name;
 
              fprintf (file, "%s (%lu)", name ? name : "*invalid*",
 
                       toc->symbol_index);
 
            }
 
          else
 
            fprintf (file, "%lu", toc->symbol_index);
 
 
 
          fprintf (file, " / ");
 
          if (symtab && symtab->strtab
 
              && toc->module_index < dysymtab->nmodtab)
 
            {
 
              bfd_mach_o_dylib_module *mod;
 
              mod = &dysymtab->dylib_module[toc->module_index];
 
              fprintf (file, "%s (%lu)",
 
                       symtab->strtab + mod->module_name_idx,
 
                       toc->module_index);
 
            }
 
          else
 
            fprintf (file, "%lu", toc->module_index);
 
 
 
          fprintf (file, "\n");
 
        }
 
    }
 
 
 
  if (dysymtab->nindirectsyms != 0)
 
    {
 
      fprintf (file, "  indirect symbols:\n");
 
 
 
      for (i = 0; i < mdata->nsects; i++)
 
        {
 
          bfd_mach_o_section *sec = mdata->sections[i];
 
          unsigned int j, first, last;
 
          bfd_mach_o_symtab_command *symtab = mdata->symtab;
 
 
 
          switch (sec->flags & BFD_MACH_O_SECTION_TYPE_MASK)
 
            {
 
            case BFD_MACH_O_S_NON_LAZY_SYMBOL_POINTERS:
 
            case BFD_MACH_O_S_LAZY_SYMBOL_POINTERS:
 
            case BFD_MACH_O_S_SYMBOL_STUBS:
 
              first = sec->reserved1;
 
              last = first + bfd_mach_o_section_get_nbr_indirect (abfd, sec);
 
              fprintf (file, "  for section %s.%s:\n",
 
                       sec->segname, sec->sectname);
 
              for (j = first; j < last; j++)
 
                {
 
                  unsigned int isym = dysymtab->indirect_syms[j];
 
 
 
                  fprintf (file, "  %5u: 0x%08x (%u)", j, isym, isym);
 
                  if (isym & BFD_MACH_O_INDIRECT_SYMBOL_LOCAL)
 
                    fprintf (file, " LOCAL");
 
                  if (isym & BFD_MACH_O_INDIRECT_SYMBOL_ABS)
 
                    fprintf (file, " ABSOLUTE");
 
                  if (symtab && symtab->symbols
 
                      && isym < symtab->nsyms
 
                      && symtab->symbols[isym].symbol.name)
 
                    fprintf (file, " %s", symtab->symbols[isym].symbol.name);
 
                  fprintf (file, "\n");
 
                }
 
              break;
 
            default:
 
              break;
 
            }
 
        }
 
    }
 
  if (dysymtab->nextrefsyms > 0)
 
    {
 
      bfd_mach_o_symtab_command *symtab = mdata->symtab;
 
 
 
      fprintf (file, "  external reference table: (symbol flags)\n");
 
      for (i = 0; i < dysymtab->nextrefsyms; i++)
 
        {
 
          bfd_mach_o_dylib_reference *ref = &dysymtab->ext_refs[i];
 
 
 
          fprintf (file, "   %4u: %5lu 0x%02lx", i, ref->isym, ref->flags);
 
          if (symtab && symtab->symbols
 
              && ref->isym < symtab->nsyms
 
              && symtab->symbols[ref->isym].symbol.name)
 
            fprintf (file, " %s", symtab->symbols[ref->isym].symbol.name);
 
          fprintf (file, "\n");
 
        }
 
    }
 
 
 
}
 
 
 
bfd_boolean
 
bfd_mach_o_bfd_print_private_bfd_data (bfd *abfd, PTR ptr)
 
{
 
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
 
  FILE *file = (FILE *) ptr;
 
  unsigned int i;
 
 
 
  bfd_mach_o_print_private_header (abfd, file);
 
  fputc ('\n', file);
 
 
 
  for (i = 0; i < mdata->header.ncmds; i++)
 
    {
 
      bfd_mach_o_load_command *cmd = &mdata->commands[i];
 
 
 
      fprintf (file, "Load command %s:",
 
               bfd_mach_o_get_name (bfd_mach_o_load_command_name, cmd->type));
 
      switch (cmd->type)
 
        {
 
        case BFD_MACH_O_LC_SEGMENT:
 
        case BFD_MACH_O_LC_SEGMENT_64:
 
          bfd_mach_o_print_segment (abfd, cmd, file);
 
          break;
 
        case BFD_MACH_O_LC_UUID:
 
          {
 
            bfd_mach_o_uuid_command *uuid = &cmd->command.uuid;
 
            unsigned int i;
 
 
 
            for (i = 0; i < sizeof (uuid->uuid); i++)
 
              fprintf (file, " %02x", uuid->uuid[i]);
 
            fputc ('\n', file);
 
          }
 
          break;
 
        case BFD_MACH_O_LC_LOAD_DYLIB:
 
        case BFD_MACH_O_LC_LOAD_WEAK_DYLIB:
 
        case BFD_MACH_O_LC_REEXPORT_DYLIB:
 
        case BFD_MACH_O_LC_ID_DYLIB:
 
          {
 
            bfd_mach_o_dylib_command *dylib = &cmd->command.dylib;
 
            fprintf (file, " %s\n", dylib->name_str);
 
            fprintf (file, "            time stamp: 0x%08lx\n",
 
                     dylib->timestamp);
 
            fprintf (file, "       current version: 0x%08lx\n",
 
                     dylib->current_version);
 
            fprintf (file, "  comptibility version: 0x%08lx\n",
 
                     dylib->compatibility_version);
 
            break;
 
          }
 
        case BFD_MACH_O_LC_LOAD_DYLINKER:
 
        case BFD_MACH_O_LC_ID_DYLINKER:
 
          fprintf (file, " %s\n", cmd->command.dylinker.name_str);
 
          break;
 
        case BFD_MACH_O_LC_SYMTAB:
 
          {
 
            bfd_mach_o_symtab_command *symtab = &cmd->command.symtab;
 
            fprintf (file,
 
                     "\n"
 
                     "   symoff: 0x%08x    nsyms: %8u  (endoff: 0x%08x)\n",
 
                     symtab->symoff, symtab->nsyms,
 
                     symtab->symoff + symtab->nsyms
 
                     * (mach_o_wide_p (&mdata->header)
 
                        ? BFD_MACH_O_NLIST_64_SIZE : BFD_MACH_O_NLIST_SIZE));
 
            fprintf (file,
 
                     "   stroff: 0x%08x  strsize: %8u  (endoff: 0x%08x)\n",
 
                     symtab->stroff, symtab->strsize,
 
                     symtab->stroff + symtab->strsize);
 
            break;
 
          }
 
        case BFD_MACH_O_LC_DYSYMTAB:
 
          fprintf (file, "\n");
 
          bfd_mach_o_print_dysymtab (abfd, cmd, file);
 
          break;
 
        case BFD_MACH_O_LC_CODE_SIGNATURE:
 
        case BFD_MACH_O_LC_SEGMENT_SPLIT_INFO:
 
          {
 
            bfd_mach_o_linkedit_command *linkedit = &cmd->command.linkedit;
 
            fprintf
 
              (file, "\n"
 
               "  dataoff: 0x%08lx  datasize: 0x%08lx  (endoff: 0x%08lx)\n",
 
               linkedit->dataoff, linkedit->datasize,
 
               linkedit->dataoff + linkedit->datasize);
 
            break;
 
          }
 
        case BFD_MACH_O_LC_SUB_FRAMEWORK:
 
        case BFD_MACH_O_LC_SUB_UMBRELLA:
 
        case BFD_MACH_O_LC_SUB_LIBRARY:
 
        case BFD_MACH_O_LC_SUB_CLIENT:
 
          {
 
            bfd_mach_o_str_command *str = &cmd->command.str;
 
            fprintf (file, " %s\n", str->str);
 
            break;
 
          }
 
        case BFD_MACH_O_LC_THREAD:
 
        case BFD_MACH_O_LC_UNIXTHREAD:
 
          {
 
            bfd_mach_o_thread_command *thread = &cmd->command.thread;
 
            unsigned int j;
 
            bfd_mach_o_backend_data *bed = bfd_mach_o_get_backend_data (abfd);
 
 
 
            fprintf (file, " nflavours: %lu\n", thread->nflavours);
 
            for (j = 0; j < thread->nflavours; j++)
 
              {
 
                bfd_mach_o_thread_flavour *flavour = &thread->flavours[j];
 
 
 
                fprintf (file, "  %2u: flavour: 0x%08lx  offset: 0x%08lx"
 
                         "  size: 0x%08lx\n",
 
                         j, flavour->flavour, flavour->offset,
 
                         flavour->size);
 
                if (bed->_bfd_mach_o_print_thread)
 
                  {
 
                    char *buf = bfd_malloc (flavour->size);
 
 
 
                    if (buf
 
                        && bfd_seek (abfd, flavour->offset, SEEK_SET) == 0
 
                        && (bfd_bread (buf, flavour->size, abfd)
 
                            == flavour->size))
 
                      (*bed->_bfd_mach_o_print_thread)(abfd, flavour,
 
                                                       file, buf);
 
                    free (buf);
 
                  }
 
              }
 
            break;
 
          }
 
        default:
 
          fprintf (file, "\n");
 
          break;
 
        }
 
      fputc ('\n', file);
 
    }
 
 
 
  bfd_mach_o_print_section_map (abfd, file);
 
 
 
  return TRUE;
 
}
 
 
int
int
bfd_mach_o_core_fetch_environment (bfd *abfd,
bfd_mach_o_core_fetch_environment (bfd *abfd,
                                   unsigned char **rbuf,
                                   unsigned char **rbuf,
                                   unsigned int *rlen)
                                   unsigned int *rlen)
{
{
  bfd_mach_o_data_struct *mdata = abfd->tdata.mach_o_data;
  bfd_mach_o_data_struct *mdata = bfd_mach_o_get_data (abfd);
  unsigned long stackaddr = bfd_mach_o_stack_addr (mdata->header.cputype);
  unsigned long stackaddr = bfd_mach_o_stack_addr (mdata->header.cputype);
  unsigned int i = 0;
  unsigned int i = 0;
 
 
  for (i = 0; i < mdata->header.ncmds; i++)
  for (i = 0; i < mdata->header.ncmds; i++)
    {
    {
Line 1925... Line 3709...
 
 
              buf = bfd_realloc_or_free (buf, size);
              buf = bfd_realloc_or_free (buf, size);
              if (buf == NULL)
              if (buf == NULL)
                return -1;
                return -1;
 
 
              bfd_seek (abfd, end - size, SEEK_SET);
              if (bfd_seek (abfd, end - size, SEEK_SET) != 0)
 
                {
 
                  free (buf);
 
                  return -1;
 
                }
 
 
              nread = bfd_bread (buf, size, abfd);
              nread = bfd_bread (buf, size, abfd);
 
 
              if (nread != size)
              if (nread != size)
                {
                {
                  free (buf);
                  free (buf);
Line 1993... Line 3782...
bfd_mach_o_core_file_failing_signal (bfd *abfd ATTRIBUTE_UNUSED)
bfd_mach_o_core_file_failing_signal (bfd *abfd ATTRIBUTE_UNUSED)
{
{
  return 0;
  return 0;
}
}
 
 
 
#define bfd_mach_o_bfd_reloc_type_lookup _bfd_norelocs_bfd_reloc_type_lookup 
 
#define bfd_mach_o_bfd_reloc_name_lookup _bfd_norelocs_bfd_reloc_name_lookup
 
 
 
#define bfd_mach_o_swap_reloc_in NULL
 
#define bfd_mach_o_swap_reloc_out NULL
 
#define bfd_mach_o_print_thread NULL
 
 
#define TARGET_NAME             mach_o_be_vec
#define TARGET_NAME             mach_o_be_vec
#define TARGET_STRING           "mach-o-be"
#define TARGET_STRING           "mach-o-be"
#define TARGET_BIG_ENDIAN       1
#define TARGET_BIG_ENDIAN       1
#define TARGET_ARCHIVE          0
#define TARGET_ARCHIVE          0
 
 
#include "mach-o-target.c"
#include "mach-o-target.c"
 
 
#undef TARGET_NAME
#undef TARGET_NAME
#undef TARGET_STRING
#undef TARGET_STRING
#undef TARGET_BIG_ENDIAN
#undef TARGET_BIG_ENDIAN

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.