1 /* Mach-O support for BFD.
2 Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009
3 Free Software Foundation, Inc.
5 This file is part of BFD, the Binary File Descriptor library.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
20 MA 02110-1301, USA. */
26 #include "libiberty.h"
27 #include "aout/stab_gnu.h"
30 #define bfd_mach_o_object_p bfd_mach_o_gen_object_p
31 #define bfd_mach_o_core_p bfd_mach_o_gen_core_p
32 #define bfd_mach_o_mkobject bfd_false
34 #define FILE_ALIGN(off, algn) \
35 (((off) + ((file_ptr) 1 << (algn)) - 1) & ((file_ptr) -1 << (algn)))
37 static int bfd_mach_o_scan_read_symtab_symbols (bfd
*);
40 bfd_mach_o_version (bfd
*abfd
)
42 bfd_mach_o_data_struct
*mdata
= NULL
;
44 BFD_ASSERT (bfd_mach_o_valid (abfd
));
45 mdata
= bfd_mach_o_get_data (abfd
);
47 return mdata
->header
.version
;
51 bfd_mach_o_valid (bfd
*abfd
)
53 if (abfd
== NULL
|| abfd
->xvec
== NULL
)
56 if (abfd
->xvec
->flavour
!= bfd_target_mach_o_flavour
)
59 if (bfd_mach_o_get_data (abfd
) == NULL
)
64 static INLINE bfd_boolean
65 mach_o_wide_p (bfd_mach_o_header
*header
)
67 switch (header
->version
)
79 static INLINE bfd_boolean
80 bfd_mach_o_wide_p (bfd
*abfd
)
82 return mach_o_wide_p (&bfd_mach_o_get_data (abfd
)->header
);
85 /* Tables to translate well known Mach-O segment/section names to bfd
86 names. Use of canonical names (such as .text or .debug_frame) is required
89 struct mach_o_section_name_xlat
92 const char *mach_o_name
;
95 static const struct mach_o_section_name_xlat dwarf_section_names_xlat
[] =
97 { ".debug_frame", "__debug_frame" },
98 { ".debug_info", "__debug_info" },
99 { ".debug_abbrev", "__debug_abbrev" },
100 { ".debug_aranges", "__debug_aranges" },
101 { ".debug_macinfo", "__debug_macinfo" },
102 { ".debug_line", "__debug_line" },
103 { ".debug_loc", "__debug_loc" },
104 { ".debug_pubnames", "__debug_pubnames" },
105 { ".debug_pubtypes", "__debug_pubtypes" },
106 { ".debug_str", "__debug_str" },
107 { ".debug_ranges", "__debug_ranges" },
111 static const struct mach_o_section_name_xlat text_section_names_xlat
[] =
113 { ".text", "__text" },
114 { ".cstring", "__cstring" },
115 { ".eh_frame", "__eh_frame" },
119 static const struct mach_o_section_name_xlat data_section_names_xlat
[] =
121 { ".data", "__data" },
126 struct mach_o_segment_name_xlat
129 const struct mach_o_section_name_xlat
*sections
;
132 static const struct mach_o_segment_name_xlat segsec_names_xlat
[] =
134 { "__DWARF", dwarf_section_names_xlat
},
135 { "__TEXT", text_section_names_xlat
},
136 { "__DATA", data_section_names_xlat
},
141 /* Mach-O to bfd names. */
144 bfd_mach_o_convert_section_name_to_bfd (bfd
*abfd
, bfd_mach_o_section
*section
)
146 const struct mach_o_segment_name_xlat
*seg
;
149 const char *pfx
= "";
151 for (seg
= segsec_names_xlat
; seg
->segname
; seg
++)
153 if (strcmp (seg
->segname
, section
->segname
) == 0)
155 const struct mach_o_section_name_xlat
*sec
;
157 for (sec
= seg
->sections
; sec
->mach_o_name
; sec
++)
159 if (strcmp (sec
->mach_o_name
, section
->sectname
) == 0)
161 len
= strlen (sec
->bfd_name
);
162 res
= bfd_alloc (abfd
, len
+ 1);
166 strcpy (res
, sec
->bfd_name
);
173 len
= strlen (section
->segname
) + 1
174 + strlen (section
->sectname
) + 1;
176 /* Put "LC_SEGMENT." prefix if the segment name is weird (ie doesn't start
177 with an underscore. */
178 if (section
->segname
[0] != '_')
180 static const char seg_pfx
[] = "LC_SEGMENT.";
183 len
+= sizeof (seg_pfx
) - 1;
186 res
= bfd_alloc (abfd
, len
);
189 snprintf (res
, len
, "%s%s.%s", pfx
, section
->segname
, section
->sectname
);
193 /* Convert a bfd section name to a Mach-O segment + section name. */
196 bfd_mach_o_convert_section_name_to_mach_o (bfd
*abfd ATTRIBUTE_UNUSED
,
198 bfd_mach_o_section
*section
)
200 const struct mach_o_segment_name_xlat
*seg
;
201 const char *name
= bfd_get_section_name (abfd
, sect
);
207 /* List of well known names. They all start with a dot. */
209 for (seg
= segsec_names_xlat
; seg
->segname
; seg
++)
211 const struct mach_o_section_name_xlat
*sec
;
213 for (sec
= seg
->sections
; sec
->mach_o_name
; sec
++)
215 if (strcmp (sec
->bfd_name
, name
) == 0)
217 strcpy (section
->segname
, seg
->segname
);
218 strcpy (section
->sectname
, sec
->mach_o_name
);
224 /* Strip LC_SEGMENT. prefix. */
225 if (strncmp (name
, "LC_SEGMENT.", 11) == 0)
229 dot
= strchr (name
, '.');
232 /* Try to split name into segment and section names. */
233 if (dot
&& dot
!= name
)
236 seclen
= len
- (dot
+ 1 - name
);
238 if (seglen
< 16 && seclen
< 16)
240 memcpy (section
->segname
, name
, seglen
);
241 section
->segname
[seglen
] = 0;
242 memcpy (section
->sectname
, dot
+ 1, seclen
);
243 section
->sectname
[seclen
] = 0;
250 memcpy (section
->segname
, name
, len
);
251 section
->segname
[len
] = 0;
252 memcpy (section
->sectname
, name
, len
);
253 section
->sectname
[len
] = 0;
256 /* Copy any private info we understand from the input symbol
257 to the output symbol. */
260 bfd_mach_o_bfd_copy_private_symbol_data (bfd
*ibfd ATTRIBUTE_UNUSED
,
261 asymbol
*isymbol ATTRIBUTE_UNUSED
,
262 bfd
*obfd ATTRIBUTE_UNUSED
,
263 asymbol
*osymbol ATTRIBUTE_UNUSED
)
268 /* Copy any private info we understand from the input section
269 to the output section. */
272 bfd_mach_o_bfd_copy_private_section_data (bfd
*ibfd ATTRIBUTE_UNUSED
,
273 asection
*isection ATTRIBUTE_UNUSED
,
274 bfd
*obfd ATTRIBUTE_UNUSED
,
275 asection
*osection ATTRIBUTE_UNUSED
)
280 /* Copy any private info we understand from the input bfd
281 to the output bfd. */
284 bfd_mach_o_bfd_copy_private_bfd_data (bfd
*ibfd
, bfd
*obfd
)
286 if (bfd_get_flavour (ibfd
) != bfd_target_mach_o_flavour
287 || bfd_get_flavour (obfd
) != bfd_target_mach_o_flavour
)
290 BFD_ASSERT (bfd_mach_o_valid (ibfd
));
291 BFD_ASSERT (bfd_mach_o_valid (obfd
));
293 /* FIXME: copy commands. */
298 /* Count the total number of symbols. */
301 bfd_mach_o_count_symbols (bfd
*abfd
)
303 bfd_mach_o_data_struct
*mdata
= bfd_mach_o_get_data (abfd
);
305 if (mdata
->symtab
== NULL
)
307 return mdata
->symtab
->nsyms
;
311 bfd_mach_o_get_symtab_upper_bound (bfd
*abfd
)
313 long nsyms
= bfd_mach_o_count_symbols (abfd
);
315 return ((nsyms
+ 1) * sizeof (asymbol
*));
319 bfd_mach_o_canonicalize_symtab (bfd
*abfd
, asymbol
**alocation
)
321 bfd_mach_o_data_struct
*mdata
= bfd_mach_o_get_data (abfd
);
322 long nsyms
= bfd_mach_o_count_symbols (abfd
);
323 bfd_mach_o_symtab_command
*sym
= mdata
->symtab
;
329 if (bfd_mach_o_scan_read_symtab_symbols (abfd
) != 0)
332 "bfd_mach_o_canonicalize_symtab: unable to load symbols\n");
336 BFD_ASSERT (sym
->symbols
!= NULL
);
338 for (j
= 0; j
< sym
->nsyms
; j
++)
339 alocation
[j
] = &sym
->symbols
[j
].symbol
;
347 bfd_mach_o_get_symbol_info (bfd
*abfd ATTRIBUTE_UNUSED
,
351 bfd_symbol_info (symbol
, ret
);
355 bfd_mach_o_print_symbol (bfd
*abfd
,
358 bfd_print_symbol_type how
)
360 FILE *file
= (FILE *) afile
;
362 bfd_mach_o_asymbol
*asym
= (bfd_mach_o_asymbol
*)symbol
;
366 case bfd_print_symbol_name
:
367 fprintf (file
, "%s", symbol
->name
);
370 bfd_print_symbol_vandf (abfd
, (PTR
) file
, symbol
);
371 if (asym
->n_type
& BFD_MACH_O_N_STAB
)
372 name
= bfd_get_stab_name (asym
->n_type
);
374 switch (asym
->n_type
& BFD_MACH_O_N_TYPE
)
376 case BFD_MACH_O_N_UNDF
:
379 case BFD_MACH_O_N_ABS
:
382 case BFD_MACH_O_N_INDR
:
385 case BFD_MACH_O_N_PBUD
:
388 case BFD_MACH_O_N_SECT
:
397 fprintf (file
, " %02x %-6s %02x %04x",
398 asym
->n_type
, name
, asym
->n_sect
, asym
->n_desc
);
399 if ((asym
->n_type
& BFD_MACH_O_N_STAB
) == 0
400 && (asym
->n_type
& BFD_MACH_O_N_TYPE
) == BFD_MACH_O_N_SECT
)
401 fprintf (file
, " %-5s", symbol
->section
->name
);
402 fprintf (file
, " %s", symbol
->name
);
407 bfd_mach_o_convert_architecture (bfd_mach_o_cpu_type mtype
,
408 bfd_mach_o_cpu_subtype msubtype ATTRIBUTE_UNUSED
,
409 enum bfd_architecture
*type
,
410 unsigned long *subtype
)
412 *subtype
= bfd_arch_unknown
;
416 case BFD_MACH_O_CPU_TYPE_VAX
: *type
= bfd_arch_vax
; break;
417 case BFD_MACH_O_CPU_TYPE_MC680x0
: *type
= bfd_arch_m68k
; break;
418 case BFD_MACH_O_CPU_TYPE_I386
:
419 *type
= bfd_arch_i386
;
420 *subtype
= bfd_mach_i386_i386
;
422 case BFD_MACH_O_CPU_TYPE_X86_64
:
423 *type
= bfd_arch_i386
;
424 *subtype
= bfd_mach_x86_64
;
426 case BFD_MACH_O_CPU_TYPE_MIPS
: *type
= bfd_arch_mips
; break;
427 case BFD_MACH_O_CPU_TYPE_MC98000
: *type
= bfd_arch_m98k
; break;
428 case BFD_MACH_O_CPU_TYPE_HPPA
: *type
= bfd_arch_hppa
; break;
429 case BFD_MACH_O_CPU_TYPE_ARM
: *type
= bfd_arch_arm
; break;
430 case BFD_MACH_O_CPU_TYPE_MC88000
: *type
= bfd_arch_m88k
; break;
431 case BFD_MACH_O_CPU_TYPE_SPARC
:
432 *type
= bfd_arch_sparc
;
433 *subtype
= bfd_mach_sparc
;
435 case BFD_MACH_O_CPU_TYPE_I860
: *type
= bfd_arch_i860
; break;
436 case BFD_MACH_O_CPU_TYPE_ALPHA
: *type
= bfd_arch_alpha
; break;
437 case BFD_MACH_O_CPU_TYPE_POWERPC
:
438 *type
= bfd_arch_powerpc
;
439 *subtype
= bfd_mach_ppc
;
441 case BFD_MACH_O_CPU_TYPE_POWERPC_64
:
442 *type
= bfd_arch_powerpc
;
443 *subtype
= bfd_mach_ppc64
;
446 *type
= bfd_arch_unknown
;
452 bfd_mach_o_write_header (bfd
*abfd
, bfd_mach_o_header
*header
)
454 unsigned char buf
[32];
457 size
= mach_o_wide_p (header
) ?
458 BFD_MACH_O_HEADER_64_SIZE
: BFD_MACH_O_HEADER_SIZE
;
460 bfd_h_put_32 (abfd
, header
->magic
, buf
+ 0);
461 bfd_h_put_32 (abfd
, header
->cputype
, buf
+ 4);
462 bfd_h_put_32 (abfd
, header
->cpusubtype
, buf
+ 8);
463 bfd_h_put_32 (abfd
, header
->filetype
, buf
+ 12);
464 bfd_h_put_32 (abfd
, header
->ncmds
, buf
+ 16);
465 bfd_h_put_32 (abfd
, header
->sizeofcmds
, buf
+ 20);
466 bfd_h_put_32 (abfd
, header
->flags
, buf
+ 24);
468 if (mach_o_wide_p (header
))
469 bfd_h_put_32 (abfd
, header
->reserved
, buf
+ 28);
471 if (bfd_seek (abfd
, 0, SEEK_SET
) != 0
472 || bfd_bwrite ((PTR
) buf
, size
, abfd
) != size
)
479 bfd_mach_o_scan_write_thread (bfd
*abfd
, bfd_mach_o_load_command
*command
)
481 bfd_mach_o_thread_command
*cmd
= &command
->command
.thread
;
483 unsigned char buf
[8];
485 unsigned int nflavours
;
487 BFD_ASSERT ((command
->type
== BFD_MACH_O_LC_THREAD
)
488 || (command
->type
== BFD_MACH_O_LC_UNIXTHREAD
));
492 for (i
= 0; i
< cmd
->nflavours
; i
++)
494 BFD_ASSERT ((cmd
->flavours
[i
].size
% 4) == 0);
495 BFD_ASSERT (cmd
->flavours
[i
].offset
== (command
->offset
+ offset
+ 8));
497 bfd_h_put_32 (abfd
, cmd
->flavours
[i
].flavour
, buf
);
498 bfd_h_put_32 (abfd
, (cmd
->flavours
[i
].size
/ 4), buf
+ 4);
500 if (bfd_seek (abfd
, command
->offset
+ offset
, SEEK_SET
) != 0
501 || bfd_bwrite ((PTR
) buf
, 8, abfd
) != 8)
504 offset
+= cmd
->flavours
[i
].size
+ 8;
511 bfd_mach_o_get_reloc_upper_bound (bfd
*abfd ATTRIBUTE_UNUSED
,
514 return (asect
->reloc_count
+ 1) * sizeof (arelent
*);
518 bfd_mach_o_canonicalize_reloc (bfd
*abfd
, asection
*asect
,
519 arelent
**rels
, asymbol
**syms
)
521 bfd_mach_o_data_struct
*mdata
= bfd_mach_o_get_data (abfd
);
522 bfd_mach_o_backend_data
*bed
= bfd_mach_o_get_backend_data (abfd
);
526 bfd_size_type native_size
;
528 if (asect
->reloc_count
== 0)
531 /* No need to go further if we don't know how to read relocs. */
532 if (bed
->_bfd_mach_o_swap_reloc_in
== NULL
)
535 /* Allocate and read relocs. */
536 native_size
= asect
->reloc_count
* BFD_MACH_O_RELENT_SIZE
;
537 native_relocs
= bfd_malloc (native_size
);
538 if (native_relocs
== NULL
)
541 if (bfd_seek (abfd
, asect
->rel_filepos
, SEEK_SET
) != 0
542 || bfd_bread (native_relocs
, native_size
, abfd
) != native_size
)
544 free (native_relocs
);
548 res
= bfd_malloc (asect
->reloc_count
* sizeof (arelent
));
551 free (native_relocs
);
555 for (i
= 0; i
< asect
->reloc_count
; i
++)
557 char *buf
= native_relocs
+ BFD_MACH_O_RELENT_SIZE
* i
;
558 bfd_mach_o_reloc_info reloc
;
563 addr
= bfd_get_32 (abfd
, buf
+ 0);
564 symnum
= bfd_get_32 (abfd
, buf
+ 4);
566 if (addr
& BFD_MACH_O_SR_SCATTERED
)
570 /* Scattered relocation.
571 Extract section and offset from r_value. */
572 res
[i
].sym_ptr_ptr
= NULL
;
574 for (j
= 0; j
< mdata
->nsects
; j
++)
576 bfd_mach_o_section
*sect
= mdata
->sections
[j
];
577 if (symnum
>= sect
->addr
&& symnum
< sect
->addr
+ sect
->size
)
579 res
[i
].sym_ptr_ptr
= sect
->bfdsection
->symbol_ptr_ptr
;
580 res
[i
].addend
= symnum
- sect
->addr
;
584 res
[i
].address
= BFD_MACH_O_GET_SR_ADDRESS (addr
);
585 reloc
.r_type
= BFD_MACH_O_GET_SR_TYPE (addr
);
586 reloc
.r_length
= BFD_MACH_O_GET_SR_LENGTH (addr
);
587 reloc
.r_pcrel
= addr
& BFD_MACH_O_SR_PCREL
;
588 reloc
.r_scattered
= 1;
592 unsigned int num
= BFD_MACH_O_GET_R_SYMBOLNUM (symnum
);
594 res
[i
].address
= addr
;
595 if (symnum
& BFD_MACH_O_R_EXTERN
)
599 BFD_ASSERT (num
!= 0);
600 BFD_ASSERT (num
<= mdata
->nsects
);
601 sym
= mdata
->sections
[num
- 1]->bfdsection
->symbol_ptr_ptr
;
603 res
[i
].sym_ptr_ptr
= sym
;
604 reloc
.r_type
= BFD_MACH_O_GET_R_TYPE (symnum
);
605 reloc
.r_length
= BFD_MACH_O_GET_R_LENGTH (symnum
);
606 reloc
.r_pcrel
= (symnum
& BFD_MACH_O_R_PCREL
) ? 1 : 0;
607 reloc
.r_scattered
= 0;
610 if (!(*bed
->_bfd_mach_o_swap_reloc_in
)(&res
[i
], &reloc
))
613 free (native_relocs
);
618 rels
[asect
->reloc_count
] = NULL
;
619 asect
->relocation
= res
;
620 free (native_relocs
);
625 bfd_mach_o_scan_write_relocs (bfd
*abfd
, bfd_mach_o_section
*section
)
627 bfd_mach_o_data_struct
*mdata
= bfd_mach_o_get_data (abfd
);
631 bfd_mach_o_backend_data
*bed
= bfd_mach_o_get_backend_data (abfd
);
633 sec
= section
->bfdsection
;
634 if (sec
->reloc_count
== 0)
637 if (bed
->_bfd_mach_o_swap_reloc_out
== NULL
)
640 /* Allocate relocation room. */
641 mdata
->filelen
= FILE_ALIGN(mdata
->filelen
, 2);
642 section
->nreloc
= sec
->reloc_count
;
643 sec
->rel_filepos
= mdata
->filelen
;
644 section
->reloff
= sec
->rel_filepos
;
645 mdata
->filelen
+= sec
->reloc_count
* BFD_MACH_O_RELENT_SIZE
;
647 if (bfd_seek (abfd
, section
->reloff
, SEEK_SET
) != 0)
650 /* Convert and write. */
651 entries
= section
->bfdsection
->orelocation
;
652 for (i
= 0; i
< section
->nreloc
; i
++)
654 arelent
*rel
= entries
[i
];
656 bfd_mach_o_reloc_info info
, *pinfo
= &info
;
658 /* Convert relocation to an intermediate representation. */
659 if (!(*bed
->_bfd_mach_o_swap_reloc_out
) (rel
, pinfo
))
662 /* Lower the relocation info. */
663 if (pinfo
->r_scattered
)
667 v
= BFD_MACH_O_SR_SCATTERED
668 | (pinfo
->r_pcrel
? BFD_MACH_O_SR_PCREL
: 0)
669 | BFD_MACH_O_SET_SR_LENGTH(pinfo
->r_length
)
670 | BFD_MACH_O_SET_SR_TYPE(pinfo
->r_type
)
671 | BFD_MACH_O_SET_SR_ADDRESS(pinfo
->r_address
);
672 bfd_put_32 (abfd
, v
, buf
);
673 bfd_put_32 (abfd
, pinfo
->r_value
, buf
+ 4);
679 bfd_put_32 (abfd
, pinfo
->r_address
, buf
);
680 v
= BFD_MACH_O_SET_R_SYMBOLNUM (pinfo
->r_value
)
681 | (pinfo
->r_pcrel
? BFD_MACH_O_R_PCREL
: 0)
682 | BFD_MACH_O_SET_R_LENGTH (pinfo
->r_length
)
683 | (pinfo
->r_extern
? BFD_MACH_O_R_EXTERN
: 0)
684 | BFD_MACH_O_SET_R_TYPE (pinfo
->r_type
);
685 bfd_put_32 (abfd
, v
, buf
+ 4);
688 if (bfd_bwrite ((PTR
) buf
, BFD_MACH_O_RELENT_SIZE
, abfd
)
689 != BFD_MACH_O_RELENT_SIZE
)
696 bfd_mach_o_scan_write_section_32 (bfd
*abfd
, bfd_mach_o_section
*section
)
698 unsigned char buf
[BFD_MACH_O_SECTION_SIZE
];
700 memcpy (buf
, section
->sectname
, 16);
701 memcpy (buf
+ 16, section
->segname
, 16);
702 bfd_h_put_32 (abfd
, section
->addr
, buf
+ 32);
703 bfd_h_put_32 (abfd
, section
->size
, buf
+ 36);
704 bfd_h_put_32 (abfd
, section
->offset
, buf
+ 40);
705 bfd_h_put_32 (abfd
, section
->align
, buf
+ 44);
706 bfd_h_put_32 (abfd
, section
->reloff
, buf
+ 48);
707 bfd_h_put_32 (abfd
, section
->nreloc
, buf
+ 52);
708 bfd_h_put_32 (abfd
, section
->flags
, buf
+ 56);
709 bfd_h_put_32 (abfd
, section
->reserved1
, buf
+ 60);
710 bfd_h_put_32 (abfd
, section
->reserved2
, buf
+ 64);
712 if (bfd_bwrite ((PTR
) buf
, BFD_MACH_O_SECTION_SIZE
, abfd
)
713 != BFD_MACH_O_SECTION_SIZE
)
720 bfd_mach_o_scan_write_section_64 (bfd
*abfd
, bfd_mach_o_section
*section
)
722 unsigned char buf
[BFD_MACH_O_SECTION_64_SIZE
];
724 memcpy (buf
, section
->sectname
, 16);
725 memcpy (buf
+ 16, section
->segname
, 16);
726 bfd_h_put_64 (abfd
, section
->addr
, buf
+ 32);
727 bfd_h_put_64 (abfd
, section
->size
, buf
+ 40);
728 bfd_h_put_32 (abfd
, section
->offset
, buf
+ 48);
729 bfd_h_put_32 (abfd
, section
->align
, buf
+ 52);
730 bfd_h_put_32 (abfd
, section
->reloff
, buf
+ 56);
731 bfd_h_put_32 (abfd
, section
->nreloc
, buf
+ 60);
732 bfd_h_put_32 (abfd
, section
->flags
, buf
+ 64);
733 bfd_h_put_32 (abfd
, section
->reserved1
, buf
+ 68);
734 bfd_h_put_32 (abfd
, section
->reserved2
, buf
+ 72);
735 bfd_h_put_32 (abfd
, section
->reserved3
, buf
+ 76);
737 if (bfd_bwrite ((PTR
) buf
, BFD_MACH_O_SECTION_64_SIZE
, abfd
)
738 != BFD_MACH_O_SECTION_64_SIZE
)
745 bfd_mach_o_scan_write_segment_32 (bfd
*abfd
, bfd_mach_o_load_command
*command
)
747 unsigned char buf
[BFD_MACH_O_LC_SEGMENT_SIZE
];
748 bfd_mach_o_segment_command
*seg
= &command
->command
.segment
;
751 BFD_ASSERT (command
->type
== BFD_MACH_O_LC_SEGMENT
);
753 for (i
= 0; i
< seg
->nsects
; i
++)
754 if (!bfd_mach_o_scan_write_relocs (abfd
, &seg
->sections
[i
]))
757 memcpy (buf
, seg
->segname
, 16);
758 bfd_h_put_32 (abfd
, seg
->vmaddr
, buf
+ 16);
759 bfd_h_put_32 (abfd
, seg
->vmsize
, buf
+ 20);
760 bfd_h_put_32 (abfd
, seg
->fileoff
, buf
+ 24);
761 bfd_h_put_32 (abfd
, seg
->filesize
, buf
+ 28);
762 bfd_h_put_32 (abfd
, seg
->maxprot
, buf
+ 32);
763 bfd_h_put_32 (abfd
, seg
->initprot
, buf
+ 36);
764 bfd_h_put_32 (abfd
, seg
->nsects
, buf
+ 40);
765 bfd_h_put_32 (abfd
, seg
->flags
, buf
+ 44);
767 if (bfd_seek (abfd
, command
->offset
+ 8, SEEK_SET
) != 0
768 || (bfd_bwrite ((PTR
) buf
, BFD_MACH_O_LC_SEGMENT_SIZE
- 8, abfd
)
769 != BFD_MACH_O_LC_SEGMENT_SIZE
- 8))
772 for (i
= 0; i
< seg
->nsects
; i
++)
773 if (bfd_mach_o_scan_write_section_32 (abfd
, &seg
->sections
[i
]))
780 bfd_mach_o_scan_write_segment_64 (bfd
*abfd
, bfd_mach_o_load_command
*command
)
782 unsigned char buf
[BFD_MACH_O_LC_SEGMENT_64_SIZE
];
783 bfd_mach_o_segment_command
*seg
= &command
->command
.segment
;
786 BFD_ASSERT (command
->type
== BFD_MACH_O_LC_SEGMENT_64
);
788 for (i
= 0; i
< seg
->nsects
; i
++)
789 if (!bfd_mach_o_scan_write_relocs (abfd
, &seg
->sections
[i
]))
792 memcpy (buf
, seg
->segname
, 16);
793 bfd_h_put_64 (abfd
, seg
->vmaddr
, buf
+ 16);
794 bfd_h_put_64 (abfd
, seg
->vmsize
, buf
+ 24);
795 bfd_h_put_64 (abfd
, seg
->fileoff
, buf
+ 32);
796 bfd_h_put_64 (abfd
, seg
->filesize
, buf
+ 40);
797 bfd_h_put_32 (abfd
, seg
->maxprot
, buf
+ 48);
798 bfd_h_put_32 (abfd
, seg
->initprot
, buf
+ 52);
799 bfd_h_put_32 (abfd
, seg
->nsects
, buf
+ 56);
800 bfd_h_put_32 (abfd
, seg
->flags
, buf
+ 60);
802 if (bfd_seek (abfd
, command
->offset
+ 8, SEEK_SET
) != 0
803 || (bfd_bwrite ((PTR
) buf
, BFD_MACH_O_LC_SEGMENT_64_SIZE
- 8, abfd
)
804 != BFD_MACH_O_LC_SEGMENT_64_SIZE
- 8))
807 for (i
= 0; i
< seg
->nsects
; i
++)
808 if (bfd_mach_o_scan_write_section_64 (abfd
, &seg
->sections
[i
]))
815 bfd_mach_o_scan_write_symtab (bfd
*abfd
, bfd_mach_o_load_command
*command
)
817 bfd_mach_o_data_struct
*mdata
= bfd_mach_o_get_data (abfd
);
818 bfd_mach_o_symtab_command
*sym
= &command
->command
.symtab
;
819 unsigned char buf
[16];
821 unsigned int wide
= bfd_mach_o_wide_p (abfd
);
822 unsigned int symlen
= wide
? BFD_MACH_O_NLIST_64_SIZE
: BFD_MACH_O_NLIST_SIZE
;
823 struct bfd_strtab_hash
*strtab
;
824 asymbol
**symbols
= bfd_get_outsymbols (abfd
);
826 BFD_ASSERT (command
->type
== BFD_MACH_O_LC_SYMTAB
);
828 /* Write the symbols first. */
829 mdata
->filelen
= FILE_ALIGN(mdata
->filelen
, wide
? 3 : 2);
830 sym
->symoff
= mdata
->filelen
;
831 if (bfd_seek (abfd
, sym
->symoff
, SEEK_SET
) != 0)
834 sym
->nsyms
= bfd_get_symcount (abfd
);
835 mdata
->filelen
+= sym
->nsyms
* symlen
;
837 strtab
= _bfd_stringtab_init ();
841 for (i
= 0; i
< sym
->nsyms
; i
++)
843 unsigned char buf
[16];
845 bfd_mach_o_asymbol
*s
= (bfd_mach_o_asymbol
*)symbols
[i
];
847 /* Compute name index. */
848 /* An index of 0 always means the empty string. */
849 if (s
->symbol
.name
== 0 || s
->symbol
.name
[0] == '\0')
853 index
= _bfd_stringtab_add (strtab
, s
->symbol
.name
, TRUE
, FALSE
);
854 if (index
== (bfd_size_type
) -1)
857 bfd_h_put_32 (abfd
, index
, buf
);
858 bfd_h_put_8 (abfd
, s
->n_type
, buf
+ 4);
859 bfd_h_put_8 (abfd
, s
->n_sect
, buf
+ 5);
860 bfd_h_put_16 (abfd
, s
->n_desc
, buf
+ 6);
862 bfd_h_put_64 (abfd
, s
->symbol
.section
->vma
+ s
->symbol
.value
, buf
+ 8);
864 bfd_h_put_32 (abfd
, s
->symbol
.section
->vma
+ s
->symbol
.value
, buf
+ 8);
866 if (bfd_bwrite ((PTR
) buf
, symlen
, abfd
) != symlen
)
869 sym
->strsize
= _bfd_stringtab_size (strtab
);
870 sym
->stroff
= mdata
->filelen
;
871 mdata
->filelen
+= sym
->strsize
;
873 if (_bfd_stringtab_emit (abfd
, strtab
) != TRUE
)
875 _bfd_stringtab_free (strtab
);
878 bfd_h_put_32 (abfd
, sym
->symoff
, buf
);
879 bfd_h_put_32 (abfd
, sym
->nsyms
, buf
+ 4);
880 bfd_h_put_32 (abfd
, sym
->stroff
, buf
+ 8);
881 bfd_h_put_32 (abfd
, sym
->strsize
, buf
+ 12);
883 if (bfd_seek (abfd
, command
->offset
+ 8, SEEK_SET
) != 0
884 || bfd_bwrite ((PTR
) buf
, 16, abfd
) != 16)
890 _bfd_stringtab_free (strtab
);
894 /* Process the symbols and generate Mach-O specific fields.
898 bfd_mach_o_mangle_symbols (bfd
*abfd
)
901 asymbol
**symbols
= bfd_get_outsymbols (abfd
);
903 for (i
= 0; i
< bfd_get_symcount (abfd
); i
++)
905 bfd_mach_o_asymbol
*s
= (bfd_mach_o_asymbol
*)symbols
[i
];
907 if (s
->n_type
== BFD_MACH_O_N_UNDF
&& !(s
->symbol
.flags
& BSF_DEBUGGING
))
909 /* As genuine Mach-O symbols type shouldn't be N_UNDF (undefined
910 symbols should be N_UNDEF | N_EXT), we suppose the back-end
911 values haven't been set. */
912 if (s
->symbol
.section
== bfd_abs_section_ptr
)
913 s
->n_type
= BFD_MACH_O_N_ABS
;
914 else if (s
->symbol
.section
== bfd_und_section_ptr
)
916 s
->n_type
= BFD_MACH_O_N_UNDF
;
917 if (s
->symbol
.flags
& BSF_WEAK
)
918 s
->n_desc
|= BFD_MACH_O_N_WEAK_REF
;
920 else if (s
->symbol
.section
== bfd_com_section_ptr
)
921 s
->n_type
= BFD_MACH_O_N_UNDF
| BFD_MACH_O_N_EXT
;
923 s
->n_type
= BFD_MACH_O_N_SECT
;
925 if (s
->symbol
.flags
& BSF_GLOBAL
)
926 s
->n_type
|= BFD_MACH_O_N_EXT
;
929 /* Compute section index. */
930 if (s
->symbol
.section
!= bfd_abs_section_ptr
931 && s
->symbol
.section
!= bfd_und_section_ptr
932 && s
->symbol
.section
!= bfd_com_section_ptr
)
933 s
->n_sect
= s
->symbol
.section
->target_index
;
935 /* Number symbols. */
936 s
->symbol
.udata
.i
= i
;
942 bfd_mach_o_write_contents (bfd
*abfd
)
945 bfd_mach_o_data_struct
*mdata
= bfd_mach_o_get_data (abfd
);
947 if (mdata
->header
.ncmds
== 0)
948 if (!bfd_mach_o_build_commands (abfd
))
951 /* Now write header information. */
952 if (mdata
->header
.filetype
== 0)
954 if (abfd
->flags
& EXEC_P
)
955 mdata
->header
.filetype
= BFD_MACH_O_MH_EXECUTE
;
956 else if (abfd
->flags
& DYNAMIC
)
957 mdata
->header
.filetype
= BFD_MACH_O_MH_DYLIB
;
959 mdata
->header
.filetype
= BFD_MACH_O_MH_OBJECT
;
961 if (!bfd_mach_o_write_header (abfd
, &mdata
->header
))
964 /* Assign a number to each symbols. */
965 if (!bfd_mach_o_mangle_symbols (abfd
))
968 for (i
= 0; i
< mdata
->header
.ncmds
; i
++)
970 unsigned char buf
[8];
971 bfd_mach_o_load_command
*cur
= &mdata
->commands
[i
];
972 unsigned long typeflag
;
974 typeflag
= cur
->type
| (cur
->type_required
? BFD_MACH_O_LC_REQ_DYLD
: 0);
976 bfd_h_put_32 (abfd
, typeflag
, buf
);
977 bfd_h_put_32 (abfd
, cur
->len
, buf
+ 4);
979 if (bfd_seek (abfd
, cur
->offset
, SEEK_SET
) != 0
980 || bfd_bwrite ((PTR
) buf
, 8, abfd
) != 8)
985 case BFD_MACH_O_LC_SEGMENT
:
986 if (bfd_mach_o_scan_write_segment_32 (abfd
, cur
) != 0)
989 case BFD_MACH_O_LC_SEGMENT_64
:
990 if (bfd_mach_o_scan_write_segment_64 (abfd
, cur
) != 0)
993 case BFD_MACH_O_LC_SYMTAB
:
994 if (!bfd_mach_o_scan_write_symtab (abfd
, cur
))
997 case BFD_MACH_O_LC_SYMSEG
:
999 case BFD_MACH_O_LC_THREAD
:
1000 case BFD_MACH_O_LC_UNIXTHREAD
:
1001 if (bfd_mach_o_scan_write_thread (abfd
, cur
) != 0)
1004 case BFD_MACH_O_LC_LOADFVMLIB
:
1005 case BFD_MACH_O_LC_IDFVMLIB
:
1006 case BFD_MACH_O_LC_IDENT
:
1007 case BFD_MACH_O_LC_FVMFILE
:
1008 case BFD_MACH_O_LC_PREPAGE
:
1009 case BFD_MACH_O_LC_DYSYMTAB
:
1010 case BFD_MACH_O_LC_LOAD_DYLIB
:
1011 case BFD_MACH_O_LC_LOAD_WEAK_DYLIB
:
1012 case BFD_MACH_O_LC_ID_DYLIB
:
1013 case BFD_MACH_O_LC_REEXPORT_DYLIB
:
1014 case BFD_MACH_O_LC_LOAD_DYLINKER
:
1015 case BFD_MACH_O_LC_ID_DYLINKER
:
1016 case BFD_MACH_O_LC_PREBOUND_DYLIB
:
1017 case BFD_MACH_O_LC_ROUTINES
:
1018 case BFD_MACH_O_LC_SUB_FRAMEWORK
:
1022 "unable to write unknown load command 0x%lx\n",
1023 (unsigned long) cur
->type
);
1031 /* Build Mach-O load commands from the sections. */
1034 bfd_mach_o_build_commands (bfd
*abfd
)
1036 bfd_mach_o_data_struct
*mdata
= bfd_mach_o_get_data (abfd
);
1037 unsigned int wide
= mach_o_wide_p (&mdata
->header
);
1038 bfd_mach_o_segment_command
*seg
;
1039 bfd_mach_o_section
*sections
;
1041 bfd_mach_o_load_command
*cmd
;
1042 bfd_mach_o_load_command
*symtab_cmd
;
1045 /* Return now if commands are already built. */
1046 if (mdata
->header
.ncmds
)
1049 /* Very simple version: 1 command (segment) containing all sections. */
1050 mdata
->header
.ncmds
= 2;
1051 mdata
->commands
= bfd_alloc (abfd
, mdata
->header
.ncmds
1052 * sizeof (bfd_mach_o_load_command
));
1053 if (mdata
->commands
== NULL
)
1055 cmd
= &mdata
->commands
[0];
1056 seg
= &cmd
->command
.segment
;
1058 seg
->nsects
= bfd_count_sections (abfd
);
1059 sections
= bfd_alloc (abfd
, seg
->nsects
* sizeof (bfd_mach_o_section
));
1060 if (sections
== NULL
)
1062 seg
->sections
= sections
;
1064 /* Set segment command. */
1067 cmd
->type
= BFD_MACH_O_LC_SEGMENT_64
;
1068 cmd
->offset
= BFD_MACH_O_HEADER_64_SIZE
;
1069 cmd
->len
= BFD_MACH_O_LC_SEGMENT_64_SIZE
1070 + BFD_MACH_O_SECTION_64_SIZE
* seg
->nsects
;
1074 cmd
->type
= BFD_MACH_O_LC_SEGMENT
;
1075 cmd
->offset
= BFD_MACH_O_HEADER_SIZE
;
1076 cmd
->len
= BFD_MACH_O_LC_SEGMENT_SIZE
1077 + BFD_MACH_O_SECTION_SIZE
* seg
->nsects
;
1079 cmd
->type_required
= FALSE
;
1080 mdata
->header
.sizeofcmds
= cmd
->len
;
1081 mdata
->filelen
= cmd
->offset
+ cmd
->len
;
1083 /* Set symtab command. */
1084 symtab_cmd
= &mdata
->commands
[1];
1086 symtab_cmd
->type
= BFD_MACH_O_LC_SYMTAB
;
1087 symtab_cmd
->offset
= cmd
->offset
+ cmd
->len
;
1088 symtab_cmd
->len
= 6 * 4;
1089 symtab_cmd
->type_required
= FALSE
;
1091 mdata
->header
.sizeofcmds
+= symtab_cmd
->len
;
1092 mdata
->filelen
+= symtab_cmd
->len
;
1094 /* Fill segment command. */
1095 memset (seg
->segname
, 0, sizeof (seg
->segname
));
1097 seg
->fileoff
= mdata
->filelen
;
1099 seg
->maxprot
= BFD_MACH_O_PROT_READ
| BFD_MACH_O_PROT_WRITE
1100 | BFD_MACH_O_PROT_EXECUTE
;
1101 seg
->initprot
= seg
->maxprot
;
1104 /* Create Mach-O sections. */
1106 for (sec
= abfd
->sections
; sec
; sec
= sec
->next
)
1108 sections
->bfdsection
= sec
;
1109 bfd_mach_o_convert_section_name_to_mach_o (abfd
, sec
, sections
);
1110 sections
->addr
= bfd_get_section_vma (abfd
, sec
);
1111 sections
->size
= bfd_get_section_size (sec
);
1112 sections
->align
= bfd_get_section_alignment (abfd
, sec
);
1114 if (sections
->size
!= 0)
1116 mdata
->filelen
= FILE_ALIGN (mdata
->filelen
, sections
->align
);
1117 sections
->offset
= mdata
->filelen
;
1120 sections
->offset
= 0;
1121 sections
->reloff
= 0;
1122 sections
->nreloc
= 0;
1123 sections
->reserved1
= 0;
1124 sections
->reserved2
= 0;
1125 sections
->reserved3
= 0;
1127 sec
->filepos
= sections
->offset
;
1128 sec
->target_index
= ++target_index
;
1130 mdata
->filelen
+= sections
->size
;
1133 seg
->filesize
= mdata
->filelen
- seg
->fileoff
;
1134 seg
->vmsize
= seg
->filesize
;
1139 /* Set the contents of a section. */
1142 bfd_mach_o_set_section_contents (bfd
*abfd
,
1144 const void * location
,
1146 bfd_size_type count
)
1150 /* This must be done first, because bfd_set_section_contents is
1151 going to set output_has_begun to TRUE. */
1152 if (! abfd
->output_has_begun
&& ! bfd_mach_o_build_commands (abfd
))
1158 pos
= section
->filepos
+ offset
;
1159 if (bfd_seek (abfd
, pos
, SEEK_SET
) != 0
1160 || bfd_bwrite (location
, count
, abfd
) != count
)
1167 bfd_mach_o_sizeof_headers (bfd
*a ATTRIBUTE_UNUSED
,
1168 struct bfd_link_info
*info ATTRIBUTE_UNUSED
)
1173 /* Make an empty symbol. This is required only because
1174 bfd_make_section_anyway wants to create a symbol for the section. */
1177 bfd_mach_o_make_empty_symbol (bfd
*abfd
)
1181 new = bfd_zalloc (abfd
, sizeof (bfd_mach_o_asymbol
));
1184 new->the_bfd
= abfd
;
1190 bfd_mach_o_read_header (bfd
*abfd
, bfd_mach_o_header
*header
)
1192 unsigned char buf
[32];
1194 bfd_vma (*get32
) (const void *) = NULL
;
1196 /* Just read the magic number. */
1197 if (bfd_seek (abfd
, 0, SEEK_SET
) != 0
1198 || bfd_bread ((PTR
) buf
, 4, abfd
) != 4)
1201 if (bfd_getb32 (buf
) == BFD_MACH_O_MH_MAGIC
)
1203 header
->byteorder
= BFD_ENDIAN_BIG
;
1204 header
->magic
= BFD_MACH_O_MH_MAGIC
;
1205 header
->version
= 1;
1208 else if (bfd_getl32 (buf
) == BFD_MACH_O_MH_MAGIC
)
1210 header
->byteorder
= BFD_ENDIAN_LITTLE
;
1211 header
->magic
= BFD_MACH_O_MH_MAGIC
;
1212 header
->version
= 1;
1215 else if (bfd_getb32 (buf
) == BFD_MACH_O_MH_MAGIC_64
)
1217 header
->byteorder
= BFD_ENDIAN_BIG
;
1218 header
->magic
= BFD_MACH_O_MH_MAGIC_64
;
1219 header
->version
= 2;
1222 else if (bfd_getl32 (buf
) == BFD_MACH_O_MH_MAGIC_64
)
1224 header
->byteorder
= BFD_ENDIAN_LITTLE
;
1225 header
->magic
= BFD_MACH_O_MH_MAGIC_64
;
1226 header
->version
= 2;
1231 header
->byteorder
= BFD_ENDIAN_UNKNOWN
;
1235 /* Once the size of the header is known, read the full header. */
1236 size
= mach_o_wide_p (header
) ?
1237 BFD_MACH_O_HEADER_64_SIZE
: BFD_MACH_O_HEADER_SIZE
;
1239 if (bfd_seek (abfd
, 0, SEEK_SET
) != 0
1240 || bfd_bread ((PTR
) buf
, size
, abfd
) != size
)
1243 header
->cputype
= (*get32
) (buf
+ 4);
1244 header
->cpusubtype
= (*get32
) (buf
+ 8);
1245 header
->filetype
= (*get32
) (buf
+ 12);
1246 header
->ncmds
= (*get32
) (buf
+ 16);
1247 header
->sizeofcmds
= (*get32
) (buf
+ 20);
1248 header
->flags
= (*get32
) (buf
+ 24);
1250 if (mach_o_wide_p (header
))
1251 header
->reserved
= (*get32
) (buf
+ 28);
1257 bfd_mach_o_make_bfd_section (bfd
*abfd
, bfd_mach_o_section
*section
,
1264 sname
= bfd_mach_o_convert_section_name_to_bfd (abfd
, section
);
1268 if (section
->flags
& BFD_MACH_O_S_ATTR_DEBUG
)
1269 flags
= SEC_HAS_CONTENTS
| SEC_DEBUGGING
;
1273 if ((section
->flags
& BFD_MACH_O_SECTION_TYPE_MASK
)
1274 != BFD_MACH_O_S_ZEROFILL
)
1276 flags
|= SEC_HAS_CONTENTS
| SEC_LOAD
;
1277 if (prot
& BFD_MACH_O_PROT_EXECUTE
)
1279 if (prot
& BFD_MACH_O_PROT_WRITE
)
1281 else if (prot
& BFD_MACH_O_PROT_READ
)
1282 flags
|= SEC_READONLY
;
1285 if (section
->nreloc
!= 0)
1288 bfdsec
= bfd_make_section_anyway_with_flags (abfd
, sname
, flags
);
1292 bfdsec
->vma
= section
->addr
;
1293 bfdsec
->lma
= section
->addr
;
1294 bfdsec
->size
= section
->size
;
1295 bfdsec
->filepos
= section
->offset
;
1296 bfdsec
->alignment_power
= section
->align
;
1297 bfdsec
->segment_mark
= 0;
1298 bfdsec
->reloc_count
= section
->nreloc
;
1299 bfdsec
->rel_filepos
= section
->reloff
;
1305 bfd_mach_o_scan_read_section_32 (bfd
*abfd
,
1306 bfd_mach_o_section
*section
,
1307 unsigned int offset
,
1310 unsigned char buf
[BFD_MACH_O_SECTION_SIZE
];
1312 if (bfd_seek (abfd
, offset
, SEEK_SET
) != 0
1313 || (bfd_bread ((PTR
) buf
, BFD_MACH_O_SECTION_SIZE
, abfd
)
1314 != BFD_MACH_O_SECTION_SIZE
))
1317 memcpy (section
->sectname
, buf
, 16);
1318 section
->sectname
[16] = '\0';
1319 memcpy (section
->segname
, buf
+ 16, 16);
1320 section
->segname
[16] = '\0';
1321 section
->addr
= bfd_h_get_32 (abfd
, buf
+ 32);
1322 section
->size
= bfd_h_get_32 (abfd
, buf
+ 36);
1323 section
->offset
= bfd_h_get_32 (abfd
, buf
+ 40);
1324 section
->align
= bfd_h_get_32 (abfd
, buf
+ 44);
1325 section
->reloff
= bfd_h_get_32 (abfd
, buf
+ 48);
1326 section
->nreloc
= bfd_h_get_32 (abfd
, buf
+ 52);
1327 section
->flags
= bfd_h_get_32 (abfd
, buf
+ 56);
1328 section
->reserved1
= bfd_h_get_32 (abfd
, buf
+ 60);
1329 section
->reserved2
= bfd_h_get_32 (abfd
, buf
+ 64);
1330 section
->reserved3
= 0;
1331 section
->bfdsection
= bfd_mach_o_make_bfd_section (abfd
, section
, prot
);
1333 if (section
->bfdsection
== NULL
)
1340 bfd_mach_o_scan_read_section_64 (bfd
*abfd
,
1341 bfd_mach_o_section
*section
,
1342 unsigned int offset
,
1345 unsigned char buf
[BFD_MACH_O_SECTION_64_SIZE
];
1347 if (bfd_seek (abfd
, offset
, SEEK_SET
) != 0
1348 || (bfd_bread ((PTR
) buf
, BFD_MACH_O_SECTION_64_SIZE
, abfd
)
1349 != BFD_MACH_O_SECTION_64_SIZE
))
1352 memcpy (section
->sectname
, buf
, 16);
1353 section
->sectname
[16] = '\0';
1354 memcpy (section
->segname
, buf
+ 16, 16);
1355 section
->segname
[16] = '\0';
1356 section
->addr
= bfd_h_get_64 (abfd
, buf
+ 32);
1357 section
->size
= bfd_h_get_64 (abfd
, buf
+ 40);
1358 section
->offset
= bfd_h_get_32 (abfd
, buf
+ 48);
1359 section
->align
= bfd_h_get_32 (abfd
, buf
+ 52);
1360 section
->reloff
= bfd_h_get_32 (abfd
, buf
+ 56);
1361 section
->nreloc
= bfd_h_get_32 (abfd
, buf
+ 60);
1362 section
->flags
= bfd_h_get_32 (abfd
, buf
+ 64);
1363 section
->reserved1
= bfd_h_get_32 (abfd
, buf
+ 68);
1364 section
->reserved2
= bfd_h_get_32 (abfd
, buf
+ 72);
1365 section
->reserved3
= bfd_h_get_32 (abfd
, buf
+ 76);
1366 section
->bfdsection
= bfd_mach_o_make_bfd_section (abfd
, section
, prot
);
1368 if (section
->bfdsection
== NULL
)
1375 bfd_mach_o_scan_read_section (bfd
*abfd
,
1376 bfd_mach_o_section
*section
,
1377 unsigned int offset
,
1382 return bfd_mach_o_scan_read_section_64 (abfd
, section
, offset
, prot
);
1384 return bfd_mach_o_scan_read_section_32 (abfd
, section
, offset
, prot
);
1388 bfd_mach_o_scan_read_symtab_symbol (bfd
*abfd
,
1389 bfd_mach_o_symtab_command
*sym
,
1390 bfd_mach_o_asymbol
*s
,
1393 bfd_mach_o_data_struct
*mdata
= bfd_mach_o_get_data (abfd
);
1394 unsigned int wide
= mach_o_wide_p (&mdata
->header
);
1395 unsigned int symwidth
=
1396 wide
? BFD_MACH_O_NLIST_64_SIZE
: BFD_MACH_O_NLIST_SIZE
;
1397 unsigned int symoff
= sym
->symoff
+ (i
* symwidth
);
1398 unsigned char buf
[16];
1399 unsigned char type
= -1;
1400 unsigned char section
= -1;
1402 symvalue value
= -1;
1403 unsigned long stroff
= -1;
1404 unsigned int symtype
= -1;
1406 BFD_ASSERT (sym
->strtab
!= NULL
);
1408 if (bfd_seek (abfd
, symoff
, SEEK_SET
) != 0
1409 || bfd_bread ((PTR
) buf
, symwidth
, abfd
) != symwidth
)
1411 fprintf (stderr
, "bfd_mach_o_scan_read_symtab_symbol: unable to read %d bytes at %lu\n",
1412 symwidth
, (unsigned long) symoff
);
1416 stroff
= bfd_h_get_32 (abfd
, buf
);
1417 type
= bfd_h_get_8 (abfd
, buf
+ 4);
1418 symtype
= type
& BFD_MACH_O_N_TYPE
;
1419 section
= bfd_h_get_8 (abfd
, buf
+ 5);
1420 desc
= bfd_h_get_16 (abfd
, buf
+ 6);
1422 value
= bfd_h_get_64 (abfd
, buf
+ 8);
1424 value
= bfd_h_get_32 (abfd
, buf
+ 8);
1426 if (stroff
>= sym
->strsize
)
1428 fprintf (stderr
, "bfd_mach_o_scan_read_symtab_symbol: symbol name out of range (%lu >= %lu)\n",
1429 (unsigned long) stroff
, (unsigned long) sym
->strsize
);
1433 s
->symbol
.the_bfd
= abfd
;
1434 s
->symbol
.name
= sym
->strtab
+ stroff
;
1435 s
->symbol
.value
= value
;
1436 s
->symbol
.flags
= 0x0;
1437 s
->symbol
.udata
.i
= 0;
1439 s
->n_sect
= section
;
1442 if (type
& BFD_MACH_O_N_STAB
)
1444 s
->symbol
.flags
|= BSF_DEBUGGING
;
1445 s
->symbol
.section
= bfd_und_section_ptr
;
1457 if ((section
> 0) && (section
<= mdata
->nsects
))
1459 s
->symbol
.section
= mdata
->sections
[section
- 1]->bfdsection
;
1461 s
->symbol
.value
- mdata
->sections
[section
- 1]->addr
;
1468 if (type
& BFD_MACH_O_N_PEXT
)
1469 s
->symbol
.flags
|= BSF_GLOBAL
;
1471 if (type
& BFD_MACH_O_N_EXT
)
1472 s
->symbol
.flags
|= BSF_GLOBAL
;
1474 if (!(type
& (BFD_MACH_O_N_PEXT
| BFD_MACH_O_N_EXT
)))
1475 s
->symbol
.flags
|= BSF_LOCAL
;
1479 case BFD_MACH_O_N_UNDF
:
1480 if (type
== (BFD_MACH_O_N_UNDF
| BFD_MACH_O_N_EXT
)
1481 && s
->symbol
.value
!= 0)
1483 /* A common symbol. */
1484 s
->symbol
.section
= bfd_com_section_ptr
;
1485 s
->symbol
.flags
= BSF_NO_FLAGS
;
1489 s
->symbol
.section
= bfd_und_section_ptr
;
1490 if (s
->n_desc
& BFD_MACH_O_N_WEAK_REF
)
1491 s
->symbol
.flags
|= BSF_WEAK
;
1494 case BFD_MACH_O_N_PBUD
:
1495 s
->symbol
.section
= bfd_und_section_ptr
;
1497 case BFD_MACH_O_N_ABS
:
1498 s
->symbol
.section
= bfd_abs_section_ptr
;
1500 case BFD_MACH_O_N_SECT
:
1501 if ((section
> 0) && (section
<= mdata
->nsects
))
1503 s
->symbol
.section
= mdata
->sections
[section
- 1]->bfdsection
;
1505 s
->symbol
.value
- mdata
->sections
[section
- 1]->addr
;
1509 /* Mach-O uses 0 to mean "no section"; not an error. */
1512 fprintf (stderr
, "bfd_mach_o_scan_read_symtab_symbol: "
1513 "symbol \"%s\" specified invalid section %d (max %lu): setting to undefined\n",
1514 s
->symbol
.name
, section
, mdata
->nsects
);
1516 s
->symbol
.section
= bfd_und_section_ptr
;
1519 case BFD_MACH_O_N_INDR
:
1520 fprintf (stderr
, "bfd_mach_o_scan_read_symtab_symbol: "
1521 "symbol \"%s\" is unsupported 'indirect' reference: setting to undefined\n",
1523 s
->symbol
.section
= bfd_und_section_ptr
;
1526 fprintf (stderr
, "bfd_mach_o_scan_read_symtab_symbol: "
1527 "symbol \"%s\" specified invalid type field 0x%x: setting to undefined\n",
1528 s
->symbol
.name
, symtype
);
1529 s
->symbol
.section
= bfd_und_section_ptr
;
1538 bfd_mach_o_scan_read_symtab_strtab (bfd
*abfd
)
1540 bfd_mach_o_data_struct
*mdata
= bfd_mach_o_get_data (abfd
);
1541 bfd_mach_o_symtab_command
*sym
= mdata
->symtab
;
1543 /* Fail if there is no symtab. */
1547 /* Success if already loaded. */
1551 if (abfd
->flags
& BFD_IN_MEMORY
)
1553 struct bfd_in_memory
*b
;
1555 b
= (struct bfd_in_memory
*) abfd
->iostream
;
1557 if ((sym
->stroff
+ sym
->strsize
) > b
->size
)
1559 bfd_set_error (bfd_error_file_truncated
);
1562 sym
->strtab
= (char *) b
->buffer
+ sym
->stroff
;
1566 sym
->strtab
= bfd_alloc (abfd
, sym
->strsize
);
1567 if (sym
->strtab
== NULL
)
1570 if (bfd_seek (abfd
, sym
->stroff
, SEEK_SET
) != 0
1571 || bfd_bread ((PTR
) sym
->strtab
, sym
->strsize
, abfd
) != sym
->strsize
)
1573 bfd_set_error (bfd_error_file_truncated
);
1582 bfd_mach_o_scan_read_symtab_symbols (bfd
*abfd
)
1584 bfd_mach_o_data_struct
*mdata
= bfd_mach_o_get_data (abfd
);
1585 bfd_mach_o_symtab_command
*sym
= mdata
->symtab
;
1592 sym
->symbols
= bfd_alloc (abfd
, sym
->nsyms
* sizeof (bfd_mach_o_asymbol
));
1594 if (sym
->symbols
== NULL
)
1596 fprintf (stderr
, "bfd_mach_o_scan_read_symtab_symbols: unable to allocate memory for symbols\n");
1600 ret
= bfd_mach_o_scan_read_symtab_strtab (abfd
);
1604 for (i
= 0; i
< sym
->nsyms
; i
++)
1606 ret
= bfd_mach_o_scan_read_symtab_symbol (abfd
, sym
, &sym
->symbols
[i
], i
);
1615 bfd_mach_o_scan_read_dysymtab_symbol (bfd
*abfd
,
1616 bfd_mach_o_dysymtab_command
*dysym
,
1617 bfd_mach_o_symtab_command
*sym
,
1618 bfd_mach_o_asymbol
*s
,
1621 unsigned long isymoff
= dysym
->indirectsymoff
+ (i
* 4);
1622 unsigned long symindex
;
1623 unsigned char buf
[4];
1625 BFD_ASSERT (i
< dysym
->nindirectsyms
);
1627 if (bfd_seek (abfd
, isymoff
, SEEK_SET
) != 0
1628 || bfd_bread ((PTR
) buf
, 4, abfd
) != 4)
1630 fprintf (stderr
, "bfd_mach_o_scan_read_dysymtab_symbol: unable to read %lu bytes at %lu\n",
1631 (unsigned long) 4, isymoff
);
1634 symindex
= bfd_h_get_32 (abfd
, buf
);
1636 return bfd_mach_o_scan_read_symtab_symbol (abfd
, sym
, s
, symindex
);
1640 bfd_mach_o_i386_flavour_string (unsigned int flavour
)
1642 switch ((int) flavour
)
1644 case BFD_MACH_O_x86_THREAD_STATE32
: return "x86_THREAD_STATE32";
1645 case BFD_MACH_O_x86_FLOAT_STATE32
: return "x86_FLOAT_STATE32";
1646 case BFD_MACH_O_x86_EXCEPTION_STATE32
: return "x86_EXCEPTION_STATE32";
1647 case BFD_MACH_O_x86_THREAD_STATE64
: return "x86_THREAD_STATE64";
1648 case BFD_MACH_O_x86_FLOAT_STATE64
: return "x86_FLOAT_STATE64";
1649 case BFD_MACH_O_x86_EXCEPTION_STATE64
: return "x86_EXCEPTION_STATE64";
1650 case BFD_MACH_O_x86_THREAD_STATE
: return "x86_THREAD_STATE";
1651 case BFD_MACH_O_x86_FLOAT_STATE
: return "x86_FLOAT_STATE";
1652 case BFD_MACH_O_x86_EXCEPTION_STATE
: return "x86_EXCEPTION_STATE";
1653 case BFD_MACH_O_x86_DEBUG_STATE32
: return "x86_DEBUG_STATE32";
1654 case BFD_MACH_O_x86_DEBUG_STATE64
: return "x86_DEBUG_STATE64";
1655 case BFD_MACH_O_x86_DEBUG_STATE
: return "x86_DEBUG_STATE";
1656 case BFD_MACH_O_THREAD_STATE_NONE
: return "THREAD_STATE_NONE";
1657 default: return "UNKNOWN";
1662 bfd_mach_o_ppc_flavour_string (unsigned int flavour
)
1664 switch ((int) flavour
)
1666 case BFD_MACH_O_PPC_THREAD_STATE
: return "PPC_THREAD_STATE";
1667 case BFD_MACH_O_PPC_FLOAT_STATE
: return "PPC_FLOAT_STATE";
1668 case BFD_MACH_O_PPC_EXCEPTION_STATE
: return "PPC_EXCEPTION_STATE";
1669 case BFD_MACH_O_PPC_VECTOR_STATE
: return "PPC_VECTOR_STATE";
1670 default: return "UNKNOWN";
1675 bfd_mach_o_scan_read_dylinker (bfd
*abfd
,
1676 bfd_mach_o_load_command
*command
)
1678 bfd_mach_o_dylinker_command
*cmd
= &command
->command
.dylinker
;
1679 unsigned char buf
[4];
1680 unsigned int nameoff
;
1685 BFD_ASSERT ((command
->type
== BFD_MACH_O_LC_ID_DYLINKER
)
1686 || (command
->type
== BFD_MACH_O_LC_LOAD_DYLINKER
));
1688 if (bfd_seek (abfd
, command
->offset
+ 8, SEEK_SET
) != 0
1689 || bfd_bread ((PTR
) buf
, 4, abfd
) != 4)
1692 nameoff
= bfd_h_get_32 (abfd
, buf
+ 0);
1694 cmd
->name_offset
= command
->offset
+ nameoff
;
1695 cmd
->name_len
= command
->len
- nameoff
;
1697 if (command
->type
== BFD_MACH_O_LC_LOAD_DYLINKER
)
1698 prefix
= "LC_LOAD_DYLINKER";
1699 else if (command
->type
== BFD_MACH_O_LC_ID_DYLINKER
)
1700 prefix
= "LC_ID_DYLINKER";
1704 sname
= bfd_alloc (abfd
, strlen (prefix
) + 1);
1707 strcpy (sname
, prefix
);
1709 bfdsec
= bfd_make_section_anyway_with_flags (abfd
, sname
, SEC_HAS_CONTENTS
);
1715 bfdsec
->size
= command
->len
- nameoff
;
1716 bfdsec
->filepos
= command
->offset
+ nameoff
;
1717 bfdsec
->alignment_power
= 0;
1719 cmd
->section
= bfdsec
;
1725 bfd_mach_o_scan_read_dylib (bfd
*abfd
, bfd_mach_o_load_command
*command
)
1727 bfd_mach_o_dylib_command
*cmd
= &command
->command
.dylib
;
1728 unsigned char buf
[16];
1729 unsigned int nameoff
;
1734 switch (command
->type
)
1736 case BFD_MACH_O_LC_LOAD_DYLIB
:
1737 prefix
= "LC_LOAD_DYLIB";
1739 case BFD_MACH_O_LC_LOAD_WEAK_DYLIB
:
1740 prefix
= "LC_LOAD_WEAK_DYLIB";
1742 case BFD_MACH_O_LC_ID_DYLIB
:
1743 prefix
= "LC_ID_DYLIB";
1745 case BFD_MACH_O_LC_REEXPORT_DYLIB
:
1746 prefix
= "LC_REEXPORT_DYLIB";
1752 if (bfd_seek (abfd
, command
->offset
+ 8, SEEK_SET
) != 0
1753 || bfd_bread ((PTR
) buf
, 16, abfd
) != 16)
1756 nameoff
= bfd_h_get_32 (abfd
, buf
+ 0);
1757 cmd
->timestamp
= bfd_h_get_32 (abfd
, buf
+ 4);
1758 cmd
->current_version
= bfd_h_get_32 (abfd
, buf
+ 8);
1759 cmd
->compatibility_version
= bfd_h_get_32 (abfd
, buf
+ 12);
1761 cmd
->name_offset
= command
->offset
+ nameoff
;
1762 cmd
->name_len
= command
->len
- nameoff
;
1764 sname
= bfd_alloc (abfd
, strlen (prefix
) + 1);
1767 strcpy (sname
, prefix
);
1769 bfdsec
= bfd_make_section_anyway_with_flags (abfd
, sname
, SEC_HAS_CONTENTS
);
1775 bfdsec
->size
= command
->len
- 8;
1776 bfdsec
->filepos
= command
->offset
+ 8;
1777 bfdsec
->alignment_power
= 0;
1779 cmd
->section
= bfdsec
;
1785 bfd_mach_o_scan_read_prebound_dylib (bfd
*abfd ATTRIBUTE_UNUSED
,
1786 bfd_mach_o_load_command
*command ATTRIBUTE_UNUSED
)
1788 /* bfd_mach_o_prebound_dylib_command *cmd = &command->command.prebound_dylib; */
1790 BFD_ASSERT (command
->type
== BFD_MACH_O_LC_PREBOUND_DYLIB
);
1795 bfd_mach_o_scan_read_thread (bfd
*abfd
, bfd_mach_o_load_command
*command
)
1797 bfd_mach_o_data_struct
*mdata
= NULL
;
1798 bfd_mach_o_thread_command
*cmd
= &command
->command
.thread
;
1799 unsigned char buf
[8];
1800 unsigned int offset
;
1801 unsigned int nflavours
;
1804 BFD_ASSERT ((command
->type
== BFD_MACH_O_LC_THREAD
)
1805 || (command
->type
== BFD_MACH_O_LC_UNIXTHREAD
));
1807 BFD_ASSERT (bfd_mach_o_valid (abfd
));
1808 mdata
= bfd_mach_o_get_data (abfd
);
1812 while (offset
!= command
->len
)
1814 if (offset
>= command
->len
)
1817 if (bfd_seek (abfd
, command
->offset
+ offset
, SEEK_SET
) != 0
1818 || bfd_bread ((PTR
) buf
, 8, abfd
) != 8)
1821 offset
+= 8 + bfd_h_get_32 (abfd
, buf
+ 4) * 4;
1825 cmd
->flavours
= bfd_alloc (abfd
, nflavours
* sizeof (bfd_mach_o_thread_flavour
));
1826 if (cmd
->flavours
== NULL
)
1828 cmd
->nflavours
= nflavours
;
1832 while (offset
!= command
->len
)
1834 if (offset
>= command
->len
)
1837 if (nflavours
>= cmd
->nflavours
)
1840 if (bfd_seek (abfd
, command
->offset
+ offset
, SEEK_SET
) != 0
1841 || bfd_bread ((PTR
) buf
, 8, abfd
) != 8)
1844 cmd
->flavours
[nflavours
].flavour
= bfd_h_get_32 (abfd
, buf
);
1845 cmd
->flavours
[nflavours
].offset
= command
->offset
+ offset
+ 8;
1846 cmd
->flavours
[nflavours
].size
= bfd_h_get_32 (abfd
, buf
+ 4) * 4;
1847 offset
+= cmd
->flavours
[nflavours
].size
+ 8;
1851 for (i
= 0; i
< nflavours
; i
++)
1854 unsigned int snamelen
;
1856 const char *flavourstr
;
1857 const char *prefix
= "LC_THREAD";
1860 switch (mdata
->header
.cputype
)
1862 case BFD_MACH_O_CPU_TYPE_POWERPC
:
1863 case BFD_MACH_O_CPU_TYPE_POWERPC_64
:
1864 flavourstr
= bfd_mach_o_ppc_flavour_string (cmd
->flavours
[i
].flavour
);
1866 case BFD_MACH_O_CPU_TYPE_I386
:
1867 case BFD_MACH_O_CPU_TYPE_X86_64
:
1868 flavourstr
= bfd_mach_o_i386_flavour_string (cmd
->flavours
[i
].flavour
);
1871 flavourstr
= "UNKNOWN_ARCHITECTURE";
1875 snamelen
= strlen (prefix
) + 1 + 20 + 1 + strlen (flavourstr
) + 1;
1876 sname
= bfd_alloc (abfd
, snamelen
);
1882 sprintf (sname
, "%s.%s.%u", prefix
, flavourstr
, j
);
1883 if (bfd_get_section_by_name (abfd
, sname
) == NULL
)
1888 bfdsec
= bfd_make_section_with_flags (abfd
, sname
, SEC_HAS_CONTENTS
);
1892 bfdsec
->size
= cmd
->flavours
[i
].size
;
1893 bfdsec
->filepos
= cmd
->flavours
[i
].offset
;
1894 bfdsec
->alignment_power
= 0x0;
1896 cmd
->section
= bfdsec
;
1903 bfd_mach_o_scan_read_dysymtab (bfd
*abfd
, bfd_mach_o_load_command
*command
)
1905 bfd_mach_o_dysymtab_command
*cmd
= &command
->command
.dysymtab
;
1906 unsigned char buf
[72];
1908 BFD_ASSERT (command
->type
== BFD_MACH_O_LC_DYSYMTAB
);
1910 if (bfd_seek (abfd
, command
->offset
+ 8, SEEK_SET
) != 0
1911 || bfd_bread ((PTR
) buf
, 72, abfd
) != 72)
1914 cmd
->ilocalsym
= bfd_h_get_32 (abfd
, buf
+ 0);
1915 cmd
->nlocalsym
= bfd_h_get_32 (abfd
, buf
+ 4);
1916 cmd
->iextdefsym
= bfd_h_get_32 (abfd
, buf
+ 8);
1917 cmd
->nextdefsym
= bfd_h_get_32 (abfd
, buf
+ 12);
1918 cmd
->iundefsym
= bfd_h_get_32 (abfd
, buf
+ 16);
1919 cmd
->nundefsym
= bfd_h_get_32 (abfd
, buf
+ 20);
1920 cmd
->tocoff
= bfd_h_get_32 (abfd
, buf
+ 24);
1921 cmd
->ntoc
= bfd_h_get_32 (abfd
, buf
+ 28);
1922 cmd
->modtaboff
= bfd_h_get_32 (abfd
, buf
+ 32);
1923 cmd
->nmodtab
= bfd_h_get_32 (abfd
, buf
+ 36);
1924 cmd
->extrefsymoff
= bfd_h_get_32 (abfd
, buf
+ 40);
1925 cmd
->nextrefsyms
= bfd_h_get_32 (abfd
, buf
+ 44);
1926 cmd
->indirectsymoff
= bfd_h_get_32 (abfd
, buf
+ 48);
1927 cmd
->nindirectsyms
= bfd_h_get_32 (abfd
, buf
+ 52);
1928 cmd
->extreloff
= bfd_h_get_32 (abfd
, buf
+ 56);
1929 cmd
->nextrel
= bfd_h_get_32 (abfd
, buf
+ 60);
1930 cmd
->locreloff
= bfd_h_get_32 (abfd
, buf
+ 64);
1931 cmd
->nlocrel
= bfd_h_get_32 (abfd
, buf
+ 68);
1933 if (cmd
->nmodtab
!= 0)
1937 int wide
= bfd_mach_o_wide_p (abfd
);
1938 unsigned int module_len
= wide
? 56 : 52;
1941 bfd_alloc (abfd
, cmd
->nmodtab
* sizeof (bfd_mach_o_dylib_module
));
1942 if (cmd
->dylib_module
== NULL
)
1945 if (bfd_seek (abfd
, cmd
->modtaboff
, SEEK_SET
) != 0)
1948 for (i
= 0; i
< cmd
->nmodtab
; i
++)
1950 bfd_mach_o_dylib_module
*module
= &cmd
->dylib_module
[i
];
1953 if (bfd_bread ((PTR
) buf
, module_len
, abfd
) != module_len
)
1956 module
->module_name_idx
= bfd_h_get_32 (abfd
, buf
+ 0);
1957 module
->iextdefsym
= bfd_h_get_32 (abfd
, buf
+ 4);
1958 module
->nextdefsym
= bfd_h_get_32 (abfd
, buf
+ 8);
1959 module
->irefsym
= bfd_h_get_32 (abfd
, buf
+ 12);
1960 module
->nrefsym
= bfd_h_get_32 (abfd
, buf
+ 16);
1961 module
->ilocalsym
= bfd_h_get_32 (abfd
, buf
+ 20);
1962 module
->nlocalsym
= bfd_h_get_32 (abfd
, buf
+ 24);
1963 module
->iextrel
= bfd_h_get_32 (abfd
, buf
+ 28);
1964 module
->nextrel
= bfd_h_get_32 (abfd
, buf
+ 32);
1965 v
= bfd_h_get_32 (abfd
, buf
+36);
1966 module
->iinit
= v
& 0xffff;
1967 module
->iterm
= (v
>> 16) & 0xffff;
1968 v
= bfd_h_get_32 (abfd
, buf
+ 40);
1969 module
->ninit
= v
& 0xffff;
1970 module
->nterm
= (v
>> 16) & 0xffff;
1973 module
->objc_module_info_size
= bfd_h_get_32 (abfd
, buf
+ 44);
1974 module
->objc_module_info_addr
= bfd_h_get_64 (abfd
, buf
+ 48);
1978 module
->objc_module_info_addr
= bfd_h_get_32 (abfd
, buf
+ 44);
1979 module
->objc_module_info_size
= bfd_h_get_32 (abfd
, buf
+ 48);
1989 cmd
->dylib_toc
= bfd_alloc
1990 (abfd
, cmd
->ntoc
* sizeof (bfd_mach_o_dylib_table_of_content
));
1991 if (cmd
->dylib_toc
== NULL
)
1994 if (bfd_seek (abfd
, cmd
->tocoff
, SEEK_SET
) != 0)
1997 for (i
= 0; i
< cmd
->ntoc
; i
++)
1999 bfd_mach_o_dylib_table_of_content
*toc
= &cmd
->dylib_toc
[i
];
2001 if (bfd_bread ((PTR
) buf
, 8, abfd
) != 8)
2004 toc
->symbol_index
= bfd_h_get_32 (abfd
, buf
+ 0);
2005 toc
->module_index
= bfd_h_get_32 (abfd
, buf
+ 4);
2009 if (cmd
->nindirectsyms
!= 0)
2014 cmd
->indirect_syms
= bfd_alloc
2015 (abfd
, cmd
->nindirectsyms
* sizeof (unsigned int));
2016 if (cmd
->indirect_syms
== NULL
)
2019 if (bfd_seek (abfd
, cmd
->indirectsymoff
, SEEK_SET
) != 0)
2022 for (i
= 0; i
< cmd
->nindirectsyms
; i
++)
2024 unsigned int *is
= &cmd
->indirect_syms
[i
];
2026 if (bfd_bread ((PTR
) buf
, 4, abfd
) != 4)
2029 *is
= bfd_h_get_32 (abfd
, buf
+ 0);
2033 if (cmd
->nextrefsyms
!= 0)
2039 cmd
->ext_refs
= bfd_alloc
2040 (abfd
, cmd
->nextrefsyms
* sizeof (bfd_mach_o_dylib_reference
));
2041 if (cmd
->ext_refs
== NULL
)
2044 if (bfd_seek (abfd
, cmd
->extrefsymoff
, SEEK_SET
) != 0)
2047 for (i
= 0; i
< cmd
->nextrefsyms
; i
++)
2049 bfd_mach_o_dylib_reference
*ref
= &cmd
->ext_refs
[i
];
2051 if (bfd_bread ((PTR
) buf
, 4, abfd
) != 4)
2054 v
= bfd_h_get_32 (abfd
, buf
+ 0);
2055 ref
->isym
= (v
>> 8) & 0xffffff;
2056 ref
->flags
= v
& 0xff;
2064 bfd_mach_o_scan_read_symtab (bfd
*abfd
, bfd_mach_o_load_command
*command
)
2066 bfd_mach_o_symtab_command
*symtab
= &command
->command
.symtab
;
2067 bfd_mach_o_data_struct
*mdata
= bfd_mach_o_get_data (abfd
);
2068 unsigned char buf
[16];
2070 BFD_ASSERT (command
->type
== BFD_MACH_O_LC_SYMTAB
);
2072 if (bfd_seek (abfd
, command
->offset
+ 8, SEEK_SET
) != 0
2073 || bfd_bread ((PTR
) buf
, 16, abfd
) != 16)
2076 symtab
->symoff
= bfd_h_get_32 (abfd
, buf
);
2077 symtab
->nsyms
= bfd_h_get_32 (abfd
, buf
+ 4);
2078 symtab
->stroff
= bfd_h_get_32 (abfd
, buf
+ 8);
2079 symtab
->strsize
= bfd_h_get_32 (abfd
, buf
+ 12);
2080 symtab
->symbols
= NULL
;
2081 symtab
->strtab
= NULL
;
2083 if (symtab
->nsyms
!= 0)
2084 abfd
->flags
|= HAS_SYMS
;
2088 mdata
->symtab
= symtab
;
2093 bfd_mach_o_scan_read_uuid (bfd
*abfd
, bfd_mach_o_load_command
*command
)
2095 bfd_mach_o_uuid_command
*cmd
= &command
->command
.uuid
;
2098 static const char prefix
[] = "LC_UUID";
2100 BFD_ASSERT (command
->type
== BFD_MACH_O_LC_UUID
);
2102 if (bfd_seek (abfd
, command
->offset
+ 8, SEEK_SET
) != 0
2103 || bfd_bread ((PTR
) cmd
->uuid
, 16, abfd
) != 16)
2106 sname
= bfd_alloc (abfd
, strlen (prefix
) + 1);
2109 strcpy (sname
, prefix
);
2111 bfdsec
= bfd_make_section_anyway_with_flags (abfd
, sname
, SEC_HAS_CONTENTS
);
2117 bfdsec
->size
= command
->len
- 8;
2118 bfdsec
->filepos
= command
->offset
+ 8;
2119 bfdsec
->alignment_power
= 0;
2121 cmd
->section
= bfdsec
;
2127 bfd_mach_o_scan_read_linkedit (bfd
*abfd
, bfd_mach_o_load_command
*command
)
2129 bfd_mach_o_linkedit_command
*cmd
= &command
->command
.linkedit
;
2132 if (bfd_seek (abfd
, command
->offset
+ 8, SEEK_SET
) != 0
2133 || bfd_bread ((PTR
) buf
, 8, abfd
) != 8)
2136 cmd
->dataoff
= bfd_get_32 (abfd
, buf
+ 0);
2137 cmd
->datasize
= bfd_get_32 (abfd
, buf
+ 4);
2142 bfd_mach_o_scan_read_str (bfd
*abfd
, bfd_mach_o_load_command
*command
)
2144 bfd_mach_o_str_command
*cmd
= &command
->command
.str
;
2148 if (bfd_seek (abfd
, command
->offset
+ 8, SEEK_SET
) != 0
2149 || bfd_bread ((PTR
) buf
, 4, abfd
) != 4)
2152 off
= bfd_get_32 (abfd
, buf
+ 0);
2153 cmd
->stroff
= command
->offset
+ off
;
2154 cmd
->str_len
= command
->len
- off
;
2155 cmd
->str
= bfd_alloc (abfd
, cmd
->str_len
);
2156 if (cmd
->str
== NULL
)
2158 if (bfd_seek (abfd
, cmd
->stroff
, SEEK_SET
) != 0
2159 || bfd_bread ((PTR
) cmd
->str
, cmd
->str_len
, abfd
) != cmd
->str_len
)
2165 bfd_mach_o_scan_read_segment (bfd
*abfd
,
2166 bfd_mach_o_load_command
*command
,
2169 unsigned char buf
[64];
2170 bfd_mach_o_segment_command
*seg
= &command
->command
.segment
;
2175 BFD_ASSERT (command
->type
== BFD_MACH_O_LC_SEGMENT_64
);
2177 if (bfd_seek (abfd
, command
->offset
+ 8, SEEK_SET
) != 0
2178 || bfd_bread ((PTR
) buf
, 64, abfd
) != 64)
2181 memcpy (seg
->segname
, buf
, 16);
2182 seg
->segname
[16] = '\0';
2184 seg
->vmaddr
= bfd_h_get_64 (abfd
, buf
+ 16);
2185 seg
->vmsize
= bfd_h_get_64 (abfd
, buf
+ 24);
2186 seg
->fileoff
= bfd_h_get_64 (abfd
, buf
+ 32);
2187 seg
->filesize
= bfd_h_get_64 (abfd
, buf
+ 40);
2188 seg
->maxprot
= bfd_h_get_32 (abfd
, buf
+ 48);
2189 seg
->initprot
= bfd_h_get_32 (abfd
, buf
+ 52);
2190 seg
->nsects
= bfd_h_get_32 (abfd
, buf
+ 56);
2191 seg
->flags
= bfd_h_get_32 (abfd
, buf
+ 60);
2195 BFD_ASSERT (command
->type
== BFD_MACH_O_LC_SEGMENT
);
2197 if (bfd_seek (abfd
, command
->offset
+ 8, SEEK_SET
) != 0
2198 || bfd_bread ((PTR
) buf
, 48, abfd
) != 48)
2201 memcpy (seg
->segname
, buf
, 16);
2202 seg
->segname
[16] = '\0';
2204 seg
->vmaddr
= bfd_h_get_32 (abfd
, buf
+ 16);
2205 seg
->vmsize
= bfd_h_get_32 (abfd
, buf
+ 20);
2206 seg
->fileoff
= bfd_h_get_32 (abfd
, buf
+ 24);
2207 seg
->filesize
= bfd_h_get_32 (abfd
, buf
+ 28);
2208 seg
->maxprot
= bfd_h_get_32 (abfd
, buf
+ 32);
2209 seg
->initprot
= bfd_h_get_32 (abfd
, buf
+ 36);
2210 seg
->nsects
= bfd_h_get_32 (abfd
, buf
+ 40);
2211 seg
->flags
= bfd_h_get_32 (abfd
, buf
+ 44);
2214 if (seg
->nsects
!= 0)
2216 seg
->sections
= bfd_alloc (abfd
, seg
->nsects
2217 * sizeof (bfd_mach_o_section
));
2218 if (seg
->sections
== NULL
)
2221 for (i
= 0; i
< seg
->nsects
; i
++)
2225 segoff
= command
->offset
+ BFD_MACH_O_LC_SEGMENT_64_SIZE
2226 + (i
* BFD_MACH_O_SECTION_64_SIZE
);
2228 segoff
= command
->offset
+ BFD_MACH_O_LC_SEGMENT_SIZE
2229 + (i
* BFD_MACH_O_SECTION_SIZE
);
2231 if (bfd_mach_o_scan_read_section
2232 (abfd
, &seg
->sections
[i
], segoff
, seg
->initprot
, wide
) != 0)
2241 bfd_mach_o_scan_read_segment_32 (bfd
*abfd
, bfd_mach_o_load_command
*command
)
2243 return bfd_mach_o_scan_read_segment (abfd
, command
, 0);
2247 bfd_mach_o_scan_read_segment_64 (bfd
*abfd
, bfd_mach_o_load_command
*command
)
2249 return bfd_mach_o_scan_read_segment (abfd
, command
, 1);
2253 bfd_mach_o_scan_read_command (bfd
*abfd
, bfd_mach_o_load_command
*command
)
2255 unsigned char buf
[8];
2257 /* Read command type and length. */
2258 if (bfd_seek (abfd
, command
->offset
, SEEK_SET
) != 0
2259 || bfd_bread ((PTR
) buf
, 8, abfd
) != 8)
2262 command
->type
= bfd_h_get_32 (abfd
, buf
) & ~BFD_MACH_O_LC_REQ_DYLD
;
2263 command
->type_required
= (bfd_h_get_32 (abfd
, buf
) & BFD_MACH_O_LC_REQ_DYLD
2265 command
->len
= bfd_h_get_32 (abfd
, buf
+ 4);
2267 switch (command
->type
)
2269 case BFD_MACH_O_LC_SEGMENT
:
2270 if (bfd_mach_o_scan_read_segment_32 (abfd
, command
) != 0)
2273 case BFD_MACH_O_LC_SEGMENT_64
:
2274 if (bfd_mach_o_scan_read_segment_64 (abfd
, command
) != 0)
2277 case BFD_MACH_O_LC_SYMTAB
:
2278 if (bfd_mach_o_scan_read_symtab (abfd
, command
) != 0)
2281 case BFD_MACH_O_LC_SYMSEG
:
2283 case BFD_MACH_O_LC_THREAD
:
2284 case BFD_MACH_O_LC_UNIXTHREAD
:
2285 if (bfd_mach_o_scan_read_thread (abfd
, command
) != 0)
2288 case BFD_MACH_O_LC_LOAD_DYLINKER
:
2289 case BFD_MACH_O_LC_ID_DYLINKER
:
2290 if (bfd_mach_o_scan_read_dylinker (abfd
, command
) != 0)
2293 case BFD_MACH_O_LC_LOAD_DYLIB
:
2294 case BFD_MACH_O_LC_ID_DYLIB
:
2295 case BFD_MACH_O_LC_LOAD_WEAK_DYLIB
:
2296 case BFD_MACH_O_LC_REEXPORT_DYLIB
:
2297 if (bfd_mach_o_scan_read_dylib (abfd
, command
) != 0)
2300 case BFD_MACH_O_LC_PREBOUND_DYLIB
:
2301 if (bfd_mach_o_scan_read_prebound_dylib (abfd
, command
) != 0)
2304 case BFD_MACH_O_LC_LOADFVMLIB
:
2305 case BFD_MACH_O_LC_IDFVMLIB
:
2306 case BFD_MACH_O_LC_IDENT
:
2307 case BFD_MACH_O_LC_FVMFILE
:
2308 case BFD_MACH_O_LC_PREPAGE
:
2309 case BFD_MACH_O_LC_ROUTINES
:
2311 case BFD_MACH_O_LC_SUB_FRAMEWORK
:
2312 case BFD_MACH_O_LC_SUB_UMBRELLA
:
2313 case BFD_MACH_O_LC_SUB_LIBRARY
:
2314 case BFD_MACH_O_LC_SUB_CLIENT
:
2315 if (bfd_mach_o_scan_read_str (abfd
, command
) != 0)
2318 case BFD_MACH_O_LC_DYSYMTAB
:
2319 if (bfd_mach_o_scan_read_dysymtab (abfd
, command
) != 0)
2322 case BFD_MACH_O_LC_TWOLEVEL_HINTS
:
2323 case BFD_MACH_O_LC_PREBIND_CKSUM
:
2325 case BFD_MACH_O_LC_UUID
:
2326 if (bfd_mach_o_scan_read_uuid (abfd
, command
) != 0)
2329 case BFD_MACH_O_LC_CODE_SIGNATURE
:
2330 case BFD_MACH_O_LC_SEGMENT_SPLIT_INFO
:
2331 if (bfd_mach_o_scan_read_linkedit (abfd
, command
) != 0)
2335 fprintf (stderr
, "unable to read unknown load command 0x%lx\n",
2336 (unsigned long) command
->type
);
2344 bfd_mach_o_flatten_sections (bfd
*abfd
)
2346 bfd_mach_o_data_struct
*mdata
= bfd_mach_o_get_data (abfd
);
2350 /* Count total number of sections. */
2353 for (i
= 0; i
< mdata
->header
.ncmds
; i
++)
2355 if (mdata
->commands
[i
].type
== BFD_MACH_O_LC_SEGMENT
2356 || mdata
->commands
[i
].type
== BFD_MACH_O_LC_SEGMENT_64
)
2358 bfd_mach_o_segment_command
*seg
;
2360 seg
= &mdata
->commands
[i
].command
.segment
;
2361 mdata
->nsects
+= seg
->nsects
;
2365 /* Allocate sections array. */
2366 mdata
->sections
= bfd_alloc (abfd
,
2367 mdata
->nsects
* sizeof (bfd_mach_o_section
*));
2369 /* Fill the array. */
2372 for (i
= 0; i
< mdata
->header
.ncmds
; i
++)
2374 if (mdata
->commands
[i
].type
== BFD_MACH_O_LC_SEGMENT
2375 || mdata
->commands
[i
].type
== BFD_MACH_O_LC_SEGMENT_64
)
2377 bfd_mach_o_segment_command
*seg
;
2379 seg
= &mdata
->commands
[i
].command
.segment
;
2380 BFD_ASSERT (csect
+ seg
->nsects
<= mdata
->nsects
);
2382 for (j
= 0; j
< seg
->nsects
; j
++)
2383 mdata
->sections
[csect
++] = &seg
->sections
[j
];
2389 bfd_mach_o_scan_start_address (bfd
*abfd
)
2391 bfd_mach_o_data_struct
*mdata
= bfd_mach_o_get_data (abfd
);
2392 bfd_mach_o_thread_command
*cmd
= NULL
;
2395 for (i
= 0; i
< mdata
->header
.ncmds
; i
++)
2397 if ((mdata
->commands
[i
].type
== BFD_MACH_O_LC_THREAD
) ||
2398 (mdata
->commands
[i
].type
== BFD_MACH_O_LC_UNIXTHREAD
))
2401 cmd
= &mdata
->commands
[i
].command
.thread
;
2410 for (i
= 0; i
< cmd
->nflavours
; i
++)
2412 if ((mdata
->header
.cputype
== BFD_MACH_O_CPU_TYPE_I386
)
2413 && (cmd
->flavours
[i
].flavour
2414 == (unsigned long) BFD_MACH_O_x86_THREAD_STATE32
))
2416 unsigned char buf
[4];
2418 if (bfd_seek (abfd
, cmd
->flavours
[i
].offset
+ 40, SEEK_SET
) != 0
2419 || bfd_bread (buf
, 4, abfd
) != 4)
2422 abfd
->start_address
= bfd_h_get_32 (abfd
, buf
);
2424 else if ((mdata
->header
.cputype
== BFD_MACH_O_CPU_TYPE_POWERPC
)
2425 && (cmd
->flavours
[i
].flavour
== BFD_MACH_O_PPC_THREAD_STATE
))
2427 unsigned char buf
[4];
2429 if (bfd_seek (abfd
, cmd
->flavours
[i
].offset
+ 0, SEEK_SET
) != 0
2430 || bfd_bread (buf
, 4, abfd
) != 4)
2433 abfd
->start_address
= bfd_h_get_32 (abfd
, buf
);
2435 else if ((mdata
->header
.cputype
== BFD_MACH_O_CPU_TYPE_POWERPC_64
)
2436 && (cmd
->flavours
[i
].flavour
== BFD_MACH_O_PPC_THREAD_STATE_64
))
2438 unsigned char buf
[8];
2440 if (bfd_seek (abfd
, cmd
->flavours
[i
].offset
+ 0, SEEK_SET
) != 0
2441 || bfd_bread (buf
, 8, abfd
) != 8)
2444 abfd
->start_address
= bfd_h_get_64 (abfd
, buf
);
2446 else if ((mdata
->header
.cputype
== BFD_MACH_O_CPU_TYPE_X86_64
)
2447 && (cmd
->flavours
[i
].flavour
== BFD_MACH_O_x86_THREAD_STATE64
))
2449 unsigned char buf
[8];
2451 if (bfd_seek (abfd
, cmd
->flavours
[i
].offset
+ (16 * 8), SEEK_SET
) != 0
2452 || bfd_bread (buf
, 8, abfd
) != 8)
2455 abfd
->start_address
= bfd_h_get_64 (abfd
, buf
);
2463 bfd_mach_o_scan (bfd
*abfd
,
2464 bfd_mach_o_header
*header
,
2465 bfd_mach_o_data_struct
*mdata
)
2468 enum bfd_architecture cputype
;
2469 unsigned long cpusubtype
;
2470 unsigned int hdrsize
;
2472 hdrsize
= mach_o_wide_p (header
) ?
2473 BFD_MACH_O_HEADER_64_SIZE
: BFD_MACH_O_HEADER_SIZE
;
2475 mdata
->header
= *header
;
2477 abfd
->flags
= abfd
->flags
& BFD_IN_MEMORY
;
2478 switch (header
->filetype
)
2480 case BFD_MACH_O_MH_OBJECT
:
2481 abfd
->flags
|= HAS_RELOC
;
2483 case BFD_MACH_O_MH_EXECUTE
:
2484 abfd
->flags
|= EXEC_P
;
2486 case BFD_MACH_O_MH_DYLIB
:
2487 case BFD_MACH_O_MH_BUNDLE
:
2488 abfd
->flags
|= DYNAMIC
;
2492 abfd
->tdata
.mach_o_data
= mdata
;
2494 bfd_mach_o_convert_architecture (header
->cputype
, header
->cpusubtype
,
2495 &cputype
, &cpusubtype
);
2496 if (cputype
== bfd_arch_unknown
)
2498 fprintf (stderr
, "bfd_mach_o_scan: unknown architecture 0x%lx/0x%lx\n",
2499 header
->cputype
, header
->cpusubtype
);
2503 bfd_set_arch_mach (abfd
, cputype
, cpusubtype
);
2505 if (header
->ncmds
!= 0)
2507 mdata
->commands
= bfd_alloc
2508 (abfd
, header
->ncmds
* sizeof (bfd_mach_o_load_command
));
2509 if (mdata
->commands
== NULL
)
2512 for (i
= 0; i
< header
->ncmds
; i
++)
2514 bfd_mach_o_load_command
*cur
= &mdata
->commands
[i
];
2517 cur
->offset
= hdrsize
;
2520 bfd_mach_o_load_command
*prev
= &mdata
->commands
[i
- 1];
2521 cur
->offset
= prev
->offset
+ prev
->len
;
2524 if (bfd_mach_o_scan_read_command (abfd
, cur
) < 0)
2529 if (bfd_mach_o_scan_start_address (abfd
) < 0)
2532 bfd_mach_o_flatten_sections (abfd
);
2537 bfd_mach_o_mkobject_init (bfd
*abfd
)
2539 bfd_mach_o_data_struct
*mdata
= NULL
;
2541 mdata
= bfd_alloc (abfd
, sizeof (bfd_mach_o_data_struct
));
2544 abfd
->tdata
.mach_o_data
= mdata
;
2546 mdata
->header
.magic
= 0;
2547 mdata
->header
.cputype
= 0;
2548 mdata
->header
.cpusubtype
= 0;
2549 mdata
->header
.filetype
= 0;
2550 mdata
->header
.ncmds
= 0;
2551 mdata
->header
.sizeofcmds
= 0;
2552 mdata
->header
.flags
= 0;
2553 mdata
->header
.byteorder
= BFD_ENDIAN_UNKNOWN
;
2554 mdata
->commands
= NULL
;
2556 mdata
->sections
= NULL
;
2562 bfd_mach_o_header_p (bfd
*abfd
,
2563 bfd_mach_o_filetype filetype
,
2564 bfd_mach_o_cpu_type cputype
)
2566 struct bfd_preserve preserve
;
2567 bfd_mach_o_header header
;
2569 preserve
.marker
= NULL
;
2570 if (!bfd_mach_o_read_header (abfd
, &header
))
2573 if (! (header
.byteorder
== BFD_ENDIAN_BIG
2574 || header
.byteorder
== BFD_ENDIAN_LITTLE
))
2576 fprintf (stderr
, "unknown header byte-order value 0x%lx\n",
2577 (unsigned long) header
.byteorder
);
2581 if (! ((header
.byteorder
== BFD_ENDIAN_BIG
2582 && abfd
->xvec
->byteorder
== BFD_ENDIAN_BIG
2583 && abfd
->xvec
->header_byteorder
== BFD_ENDIAN_BIG
)
2584 || (header
.byteorder
== BFD_ENDIAN_LITTLE
2585 && abfd
->xvec
->byteorder
== BFD_ENDIAN_LITTLE
2586 && abfd
->xvec
->header_byteorder
== BFD_ENDIAN_LITTLE
)))
2589 /* Check cputype and filetype.
2590 In case of wildcard, do not accept magics that are handled by existing
2594 if (header
.cputype
!= cputype
)
2599 switch (header
.cputype
)
2601 case BFD_MACH_O_CPU_TYPE_I386
:
2602 /* Handled by mach-o-i386 */
2610 if (header
.filetype
!= filetype
)
2615 switch (header
.filetype
)
2617 case BFD_MACH_O_MH_CORE
:
2618 /* Handled by core_p */
2625 preserve
.marker
= bfd_zalloc (abfd
, sizeof (bfd_mach_o_data_struct
));
2626 if (preserve
.marker
== NULL
2627 || !bfd_preserve_save (abfd
, &preserve
))
2630 if (bfd_mach_o_scan (abfd
, &header
,
2631 (bfd_mach_o_data_struct
*) preserve
.marker
) != 0)
2634 bfd_preserve_finish (abfd
, &preserve
);
2638 bfd_set_error (bfd_error_wrong_format
);
2641 if (preserve
.marker
!= NULL
)
2642 bfd_preserve_restore (abfd
, &preserve
);
2646 static const bfd_target
*
2647 bfd_mach_o_gen_object_p (bfd
*abfd
)
2649 return bfd_mach_o_header_p (abfd
, 0, 0);
2652 static const bfd_target
*
2653 bfd_mach_o_gen_core_p (bfd
*abfd
)
2655 return bfd_mach_o_header_p (abfd
, BFD_MACH_O_MH_CORE
, 0);
2658 typedef struct mach_o_fat_archentry
2660 unsigned long cputype
;
2661 unsigned long cpusubtype
;
2662 unsigned long offset
;
2664 unsigned long align
;
2665 } mach_o_fat_archentry
;
2667 typedef struct mach_o_fat_data_struct
2669 unsigned long magic
;
2670 unsigned long nfat_arch
;
2671 mach_o_fat_archentry
*archentries
;
2672 } mach_o_fat_data_struct
;
2675 bfd_mach_o_archive_p (bfd
*abfd
)
2677 mach_o_fat_data_struct
*adata
= NULL
;
2678 unsigned char buf
[20];
2681 if (bfd_seek (abfd
, 0, SEEK_SET
) != 0
2682 || bfd_bread ((PTR
) buf
, 8, abfd
) != 8)
2685 adata
= bfd_alloc (abfd
, sizeof (mach_o_fat_data_struct
));
2689 adata
->magic
= bfd_getb32 (buf
);
2690 adata
->nfat_arch
= bfd_getb32 (buf
+ 4);
2691 if (adata
->magic
!= 0xcafebabe)
2693 /* Avoid matching Java bytecode files, which have the same magic number.
2694 In the Java bytecode file format this field contains the JVM version,
2695 which starts at 43.0. */
2696 if (adata
->nfat_arch
> 30)
2699 adata
->archentries
=
2700 bfd_alloc (abfd
, adata
->nfat_arch
* sizeof (mach_o_fat_archentry
));
2701 if (adata
->archentries
== NULL
)
2704 for (i
= 0; i
< adata
->nfat_arch
; i
++)
2706 if (bfd_seek (abfd
, 8 + 20 * i
, SEEK_SET
) != 0
2707 || bfd_bread ((PTR
) buf
, 20, abfd
) != 20)
2709 adata
->archentries
[i
].cputype
= bfd_getb32 (buf
);
2710 adata
->archentries
[i
].cpusubtype
= bfd_getb32 (buf
+ 4);
2711 adata
->archentries
[i
].offset
= bfd_getb32 (buf
+ 8);
2712 adata
->archentries
[i
].size
= bfd_getb32 (buf
+ 12);
2713 adata
->archentries
[i
].align
= bfd_getb32 (buf
+ 16);
2716 abfd
->tdata
.mach_o_fat_data
= adata
;
2721 bfd_release (abfd
, adata
);
2722 bfd_set_error (bfd_error_wrong_format
);
2727 bfd_mach_o_openr_next_archived_file (bfd
*archive
, bfd
*prev
)
2729 mach_o_fat_data_struct
*adata
;
2730 mach_o_fat_archentry
*entry
= NULL
;
2733 enum bfd_architecture arch_type
;
2734 unsigned long arch_subtype
;
2736 adata
= (mach_o_fat_data_struct
*) archive
->tdata
.mach_o_fat_data
;
2737 BFD_ASSERT (adata
!= NULL
);
2739 /* Find index of previous entry. */
2741 i
= 0; /* Start at first one. */
2744 for (i
= 0; i
< adata
->nfat_arch
; i
++)
2746 if (adata
->archentries
[i
].offset
== prev
->origin
)
2750 if (i
== adata
->nfat_arch
)
2753 bfd_set_error (bfd_error_bad_value
);
2756 i
++; /* Get next entry. */
2759 if (i
>= adata
->nfat_arch
)
2761 bfd_set_error (bfd_error_no_more_archived_files
);
2765 entry
= &adata
->archentries
[i
];
2766 nbfd
= _bfd_new_bfd_contained_in (archive
);
2770 nbfd
->origin
= entry
->offset
;
2772 bfd_mach_o_convert_architecture (entry
->cputype
, entry
->cpusubtype
,
2773 &arch_type
, &arch_subtype
);
2774 /* Create the member filename.
2775 Use FILENAME:ARCH_NAME. */
2778 const char *arch_name
;
2779 size_t arch_file_len
= strlen (bfd_get_filename (archive
));
2781 arch_name
= bfd_printable_arch_mach (arch_type
, arch_subtype
);
2782 s
= bfd_malloc (arch_file_len
+ 1 + strlen (arch_name
) + 1);
2785 memcpy (s
, bfd_get_filename (archive
), arch_file_len
);
2786 s
[arch_file_len
] = ':';
2787 strcpy (s
+ arch_file_len
+ 1, arch_name
);
2790 nbfd
->iostream
= NULL
;
2791 bfd_set_arch_mach (nbfd
, arch_type
, arch_subtype
);
2796 /* If ABFD format is FORMAT and architecture is ARCH, return it.
2797 If ABFD is a fat image containing a member that corresponds to FORMAT
2798 and ARCH, returns it.
2799 In other case, returns NULL.
2800 This function allows transparent uses of fat images. */
2802 bfd_mach_o_fat_extract (bfd
*abfd
,
2804 const bfd_arch_info_type
*arch
)
2807 mach_o_fat_data_struct
*adata
;
2810 if (bfd_check_format (abfd
, format
))
2812 if (bfd_get_arch_info (abfd
) == arch
)
2816 if (!bfd_check_format (abfd
, bfd_archive
)
2817 || abfd
->xvec
!= &mach_o_fat_vec
)
2820 /* This is a Mach-O fat image. */
2821 adata
= (mach_o_fat_data_struct
*) abfd
->tdata
.mach_o_fat_data
;
2822 BFD_ASSERT (adata
!= NULL
);
2824 for (i
= 0; i
< adata
->nfat_arch
; i
++)
2826 struct mach_o_fat_archentry
*e
= &adata
->archentries
[i
];
2827 enum bfd_architecture cpu_type
;
2828 unsigned long cpu_subtype
;
2830 bfd_mach_o_convert_architecture (e
->cputype
, e
->cpusubtype
,
2831 &cpu_type
, &cpu_subtype
);
2832 if (cpu_type
!= arch
->arch
|| cpu_subtype
!= arch
->mach
)
2835 /* The architecture is found. */
2836 res
= _bfd_new_bfd_contained_in (abfd
);
2840 res
->origin
= e
->offset
;
2842 res
->filename
= strdup (abfd
->filename
);
2843 res
->iostream
= NULL
;
2845 if (bfd_check_format (res
, format
))
2847 BFD_ASSERT (bfd_get_arch_info (res
) == arch
);
2858 bfd_mach_o_lookup_section (bfd
*abfd
,
2860 bfd_mach_o_load_command
**mcommand
,
2861 bfd_mach_o_section
**msection
)
2863 struct mach_o_data_struct
*md
= bfd_mach_o_get_data (abfd
);
2864 unsigned int i
, j
, num
;
2866 bfd_mach_o_load_command
*ncmd
= NULL
;
2867 bfd_mach_o_section
*nsect
= NULL
;
2869 BFD_ASSERT (mcommand
!= NULL
);
2870 BFD_ASSERT (msection
!= NULL
);
2873 for (i
= 0; i
< md
->header
.ncmds
; i
++)
2875 struct bfd_mach_o_load_command
*cmd
= &md
->commands
[i
];
2876 struct bfd_mach_o_segment_command
*seg
= NULL
;
2878 if (cmd
->type
!= BFD_MACH_O_LC_SEGMENT
2879 || cmd
->type
!= BFD_MACH_O_LC_SEGMENT_64
)
2881 seg
= &cmd
->command
.segment
;
2883 if (seg
->segment
== section
)
2890 for (j
= 0; j
< seg
->nsects
; j
++)
2892 struct bfd_mach_o_section
*sect
= &seg
->sections
[j
];
2894 if (sect
->bfdsection
== section
)
2909 bfd_mach_o_lookup_command (bfd
*abfd
,
2910 bfd_mach_o_load_command_type type
,
2911 bfd_mach_o_load_command
**mcommand
)
2913 struct mach_o_data_struct
*md
= bfd_mach_o_get_data (abfd
);
2914 bfd_mach_o_load_command
*ncmd
= NULL
;
2915 unsigned int i
, num
;
2917 BFD_ASSERT (md
!= NULL
);
2918 BFD_ASSERT (mcommand
!= NULL
);
2921 for (i
= 0; i
< md
->header
.ncmds
; i
++)
2923 struct bfd_mach_o_load_command
*cmd
= &md
->commands
[i
];
2925 if (cmd
->type
!= type
)
2938 bfd_mach_o_stack_addr (enum bfd_mach_o_cpu_type type
)
2942 case BFD_MACH_O_CPU_TYPE_MC680x0
:
2944 case BFD_MACH_O_CPU_TYPE_MC88000
:
2946 case BFD_MACH_O_CPU_TYPE_POWERPC
:
2948 case BFD_MACH_O_CPU_TYPE_I386
:
2950 case BFD_MACH_O_CPU_TYPE_SPARC
:
2952 case BFD_MACH_O_CPU_TYPE_I860
:
2954 case BFD_MACH_O_CPU_TYPE_HPPA
:
2955 return 0xc0000000 - 0x04000000;
2961 typedef struct bfd_mach_o_xlat_name
2966 bfd_mach_o_xlat_name
;
2969 bfd_mach_o_print_flags (const bfd_mach_o_xlat_name
*table
,
2975 for (; table
->name
; table
++)
2977 if (table
->val
& val
)
2980 fprintf (file
, "+");
2981 fprintf (file
, "%s", table
->name
);
2989 fprintf (file
, "+");
2990 fprintf (file
, "0x%lx", val
);
2994 fprintf (file
, "-");
2998 bfd_mach_o_get_name (const bfd_mach_o_xlat_name
*table
, unsigned long val
)
3000 for (; table
->name
; table
++)
3001 if (table
->val
== val
)
3006 static bfd_mach_o_xlat_name bfd_mach_o_cpu_name
[] =
3008 { "vax", BFD_MACH_O_CPU_TYPE_VAX
},
3009 { "mc680x0", BFD_MACH_O_CPU_TYPE_MC680x0
},
3010 { "i386", BFD_MACH_O_CPU_TYPE_I386
},
3011 { "mips", BFD_MACH_O_CPU_TYPE_MIPS
},
3012 { "mc98000", BFD_MACH_O_CPU_TYPE_MC98000
},
3013 { "hppa", BFD_MACH_O_CPU_TYPE_HPPA
},
3014 { "arm", BFD_MACH_O_CPU_TYPE_ARM
},
3015 { "mc88000", BFD_MACH_O_CPU_TYPE_MC88000
},
3016 { "sparc", BFD_MACH_O_CPU_TYPE_SPARC
},
3017 { "i860", BFD_MACH_O_CPU_TYPE_I860
},
3018 { "alpha", BFD_MACH_O_CPU_TYPE_ALPHA
},
3019 { "powerpc", BFD_MACH_O_CPU_TYPE_POWERPC
},
3020 { "powerpc_64", BFD_MACH_O_CPU_TYPE_POWERPC_64
},
3021 { "x86_64", BFD_MACH_O_CPU_TYPE_X86_64
},
3025 static bfd_mach_o_xlat_name bfd_mach_o_filetype_name
[] =
3027 { "object", BFD_MACH_O_MH_OBJECT
},
3028 { "execute", BFD_MACH_O_MH_EXECUTE
},
3029 { "fvmlib", BFD_MACH_O_MH_FVMLIB
},
3030 { "core", BFD_MACH_O_MH_CORE
},
3031 { "preload", BFD_MACH_O_MH_PRELOAD
},
3032 { "dylib", BFD_MACH_O_MH_DYLIB
},
3033 { "dylinker", BFD_MACH_O_MH_DYLINKER
},
3034 { "bundle", BFD_MACH_O_MH_BUNDLE
},
3038 static bfd_mach_o_xlat_name bfd_mach_o_header_flags_name
[] =
3040 { "noundefs", BFD_MACH_O_MH_NOUNDEFS
},
3041 { "incrlink", BFD_MACH_O_MH_INCRLINK
},
3042 { "dyldlink", BFD_MACH_O_MH_DYLDLINK
},
3043 { "bindatload", BFD_MACH_O_MH_BINDATLOAD
},
3044 { "prebound", BFD_MACH_O_MH_PREBOUND
},
3045 { "split_segs", BFD_MACH_O_MH_SPLIT_SEGS
},
3046 { "lazy_init", BFD_MACH_O_MH_LAZY_INIT
},
3047 { "twolevel", BFD_MACH_O_MH_TWOLEVEL
},
3048 { "force_flat", BFD_MACH_O_MH_FORCE_FLAT
},
3049 { "nomultidefs", BFD_MACH_O_MH_NOMULTIDEFS
},
3050 { "nofixprebinding", BFD_MACH_O_MH_NOFIXPREBINDING
},
3051 { "prebindable", BFD_MACH_O_MH_PREBINDABLE
},
3052 { "allmodsbound", BFD_MACH_O_MH_ALLMODSBOUND
},
3053 { "subsections_via_symbols", BFD_MACH_O_MH_SUBSECTIONS_VIA_SYMBOLS
},
3054 { "canonical", BFD_MACH_O_MH_CANONICAL
},
3055 { "weak_defines", BFD_MACH_O_MH_WEAK_DEFINES
},
3056 { "binds_to_weak", BFD_MACH_O_MH_BINDS_TO_WEAK
},
3057 { "allow_stack_execution", BFD_MACH_O_MH_ALLOW_STACK_EXECUTION
},
3058 { "root_safe", BFD_MACH_O_MH_ROOT_SAFE
},
3059 { "setuid_safe", BFD_MACH_O_MH_SETUID_SAFE
},
3060 { "no_reexported_dylibs", BFD_MACH_O_MH_NO_REEXPORTED_DYLIBS
},
3061 { "pie", BFD_MACH_O_MH_PIE
},
3065 static bfd_mach_o_xlat_name bfd_mach_o_section_type_name
[] =
3067 { "regular", BFD_MACH_O_S_REGULAR
},
3068 { "zerofill", BFD_MACH_O_S_ZEROFILL
},
3069 { "cstring_literals", BFD_MACH_O_S_CSTRING_LITERALS
},
3070 { "4byte_literals", BFD_MACH_O_S_4BYTE_LITERALS
},
3071 { "8byte_literals", BFD_MACH_O_S_8BYTE_LITERALS
},
3072 { "literal_pointers", BFD_MACH_O_S_LITERAL_POINTERS
},
3073 { "non_lazy_symbol_pointers", BFD_MACH_O_S_NON_LAZY_SYMBOL_POINTERS
},
3074 { "lazy_symbol_pointers", BFD_MACH_O_S_LAZY_SYMBOL_POINTERS
},
3075 { "symbol_stubs", BFD_MACH_O_S_SYMBOL_STUBS
},
3076 { "mod_init_func_pointers", BFD_MACH_O_S_MOD_INIT_FUNC_POINTERS
},
3077 { "mod_fini_func_pointers", BFD_MACH_O_S_MOD_FINI_FUNC_POINTERS
},
3078 { "coalesced", BFD_MACH_O_S_COALESCED
},
3079 { "gb_zerofill", BFD_MACH_O_S_GB_ZEROFILL
},
3080 { "interposing", BFD_MACH_O_S_INTERPOSING
},
3081 { "16byte_literals", BFD_MACH_O_S_16BYTE_LITERALS
},
3082 { "dtrace_dof", BFD_MACH_O_S_DTRACE_DOF
},
3083 { "lazy_dylib_symbol_pointers", BFD_MACH_O_S_LAZY_DYLIB_SYMBOL_POINTERS
},
3087 static bfd_mach_o_xlat_name bfd_mach_o_section_attribute_name
[] =
3089 { "loc_reloc", BFD_MACH_O_S_ATTR_LOC_RELOC
},
3090 { "ext_reloc", BFD_MACH_O_S_ATTR_EXT_RELOC
},
3091 { "some_instructions", BFD_MACH_O_S_ATTR_SOME_INSTRUCTIONS
},
3092 { "debug", BFD_MACH_O_S_ATTR_DEBUG
},
3093 { "modifying_code", BFD_MACH_O_S_SELF_MODIFYING_CODE
},
3094 { "live_support", BFD_MACH_O_S_ATTR_LIVE_SUPPORT
},
3095 { "no_dead_strip", BFD_MACH_O_S_ATTR_NO_DEAD_STRIP
},
3096 { "strip_static_syms", BFD_MACH_O_S_ATTR_STRIP_STATIC_SYMS
},
3097 { "no_toc", BFD_MACH_O_S_ATTR_NO_TOC
},
3098 { "pure_instructions", BFD_MACH_O_S_ATTR_PURE_INSTRUCTIONS
},
3102 static bfd_mach_o_xlat_name bfd_mach_o_load_command_name
[] =
3104 { "segment", BFD_MACH_O_LC_SEGMENT
},
3105 { "symtab", BFD_MACH_O_LC_SYMTAB
},
3106 { "symseg", BFD_MACH_O_LC_SYMSEG
},
3107 { "thread", BFD_MACH_O_LC_THREAD
},
3108 { "unixthread", BFD_MACH_O_LC_UNIXTHREAD
},
3109 { "loadfvmlib", BFD_MACH_O_LC_LOADFVMLIB
},
3110 { "idfvmlib", BFD_MACH_O_LC_IDFVMLIB
},
3111 { "ident", BFD_MACH_O_LC_IDENT
},
3112 { "fvmfile", BFD_MACH_O_LC_FVMFILE
},
3113 { "prepage", BFD_MACH_O_LC_PREPAGE
},
3114 { "dysymtab", BFD_MACH_O_LC_DYSYMTAB
},
3115 { "load_dylib", BFD_MACH_O_LC_LOAD_DYLIB
},
3116 { "id_dylib", BFD_MACH_O_LC_ID_DYLIB
},
3117 { "load_dylinker", BFD_MACH_O_LC_LOAD_DYLINKER
},
3118 { "id_dylinker", BFD_MACH_O_LC_ID_DYLINKER
},
3119 { "prebound_dylib", BFD_MACH_O_LC_PREBOUND_DYLIB
},
3120 { "routines", BFD_MACH_O_LC_ROUTINES
},
3121 { "sub_framework", BFD_MACH_O_LC_SUB_FRAMEWORK
},
3122 { "sub_umbrella", BFD_MACH_O_LC_SUB_UMBRELLA
},
3123 { "sub_client", BFD_MACH_O_LC_SUB_CLIENT
},
3124 { "sub_library", BFD_MACH_O_LC_SUB_LIBRARY
},
3125 { "twolevel_hints", BFD_MACH_O_LC_TWOLEVEL_HINTS
},
3126 { "prebind_cksum", BFD_MACH_O_LC_PREBIND_CKSUM
},
3127 { "load_weak_dylib", BFD_MACH_O_LC_LOAD_WEAK_DYLIB
},
3128 { "segment_64", BFD_MACH_O_LC_SEGMENT_64
},
3129 { "routines_64", BFD_MACH_O_LC_ROUTINES_64
},
3130 { "uuid", BFD_MACH_O_LC_UUID
},
3131 { "rpath", BFD_MACH_O_LC_RPATH
},
3132 { "code_signature", BFD_MACH_O_LC_CODE_SIGNATURE
},
3133 { "segment_split_info", BFD_MACH_O_LC_SEGMENT_SPLIT_INFO
},
3134 { "reexport_dylib", BFD_MACH_O_LC_REEXPORT_DYLIB
},
3135 { "lazy_load_dylib", BFD_MACH_O_LC_LAZY_LOAD_DYLIB
},
3136 { "encryption_info", BFD_MACH_O_LC_ENCRYPTION_INFO
},
3141 bfd_mach_o_print_private_header (bfd
*abfd
, FILE *file
)
3143 bfd_mach_o_data_struct
*mdata
= bfd_mach_o_get_data (abfd
);
3144 bfd_mach_o_header
*h
= &mdata
->header
;
3146 fprintf (file
, _("Mach-O header:\n"));
3147 fprintf (file
, _(" magic : %08lx\n"), h
->magic
);
3148 fprintf (file
, _(" cputype : %08lx (%s)\n"), h
->cputype
,
3149 bfd_mach_o_get_name (bfd_mach_o_cpu_name
, h
->cputype
));
3150 fprintf (file
, _(" cpusubtype: %08lx\n"), h
->cpusubtype
);
3151 fprintf (file
, _(" filetype : %08lx (%s)\n"),
3153 bfd_mach_o_get_name (bfd_mach_o_filetype_name
, h
->filetype
));
3154 fprintf (file
, _(" ncmds : %08lx\n"), h
->ncmds
);
3155 fprintf (file
, _(" sizeofcmds: %08lx\n"), h
->sizeofcmds
);
3156 fprintf (file
, _(" flags : %08lx ("), h
->flags
);
3157 bfd_mach_o_print_flags (bfd_mach_o_header_flags_name
, h
->flags
, file
);
3158 fprintf (file
, _(")\n"));
3159 fprintf (file
, _(" reserved : %08x\n"), h
->reserved
);
3163 bfd_mach_o_print_section_map (bfd
*abfd
, FILE *file
)
3165 bfd_mach_o_data_struct
*mdata
= bfd_mach_o_get_data (abfd
);
3167 unsigned int sec_nbr
= 0;
3169 fprintf (file
, _("Segments and Sections:\n"));
3170 fprintf (file
, _(" #: Segment name Section name Address\n"));
3172 for (i
= 0; i
< mdata
->header
.ncmds
; i
++)
3174 bfd_mach_o_segment_command
*seg
;
3176 if (mdata
->commands
[i
].type
!= BFD_MACH_O_LC_SEGMENT
3177 && mdata
->commands
[i
].type
!= BFD_MACH_O_LC_SEGMENT_64
)
3180 seg
= &mdata
->commands
[i
].command
.segment
;
3182 fprintf (file
, "[Segment %-16s ", seg
->segname
);
3183 fprintf_vma (file
, seg
->vmaddr
);
3184 fprintf (file
, "-");
3185 fprintf_vma (file
, seg
->vmaddr
+ seg
->vmsize
- 1);
3187 fputc (seg
->initprot
& BFD_MACH_O_PROT_READ
? 'r' : '-', file
);
3188 fputc (seg
->initprot
& BFD_MACH_O_PROT_WRITE
? 'w' : '-', file
);
3189 fputc (seg
->initprot
& BFD_MACH_O_PROT_EXECUTE
? 'x' : '-', file
);
3190 fprintf (file
, "]\n");
3191 for (j
= 0; j
< seg
->nsects
; j
++)
3193 bfd_mach_o_section
*sec
= &seg
->sections
[j
];
3194 fprintf (file
, "%02u: %-16s %-16s ", ++sec_nbr
,
3195 sec
->segname
, sec
->sectname
);
3196 fprintf_vma (file
, sec
->addr
);
3197 fprintf (file
, " ");
3198 fprintf_vma (file
, sec
->size
);
3199 fprintf (file
, " %08lx\n", sec
->flags
);
3204 /* Return the number of indirect symbols for a section.
3205 Must be called only for symbol pointer section and symbol stubs
3209 bfd_mach_o_section_get_nbr_indirect (bfd
*abfd
, bfd_mach_o_section
*sec
)
3213 switch (sec
->flags
& BFD_MACH_O_SECTION_TYPE_MASK
)
3215 case BFD_MACH_O_S_NON_LAZY_SYMBOL_POINTERS
:
3216 case BFD_MACH_O_S_LAZY_SYMBOL_POINTERS
:
3217 elsz
= bfd_mach_o_wide_p (abfd
) ? 8 : 4;
3218 return sec
->size
/ elsz
;
3219 case BFD_MACH_O_S_SYMBOL_STUBS
:
3220 elsz
= sec
->reserved2
;
3222 return sec
->size
/ elsz
;
3232 bfd_mach_o_print_section (bfd
*abfd ATTRIBUTE_UNUSED
,
3233 bfd_mach_o_section
*sec
, FILE *file
)
3235 fprintf (file
, " Section: sectname: %-16s segname: %-16s\n",
3236 sec
->sectname
, sec
->segname
);
3237 fprintf (file
, " addr: ");
3238 fprintf_vma (file
, sec
->addr
);
3239 fprintf (file
, " size: ");
3240 fprintf_vma (file
, sec
->size
);
3241 fprintf (file
, " offset: ");
3242 fprintf_vma (file
, sec
->offset
);
3243 fprintf (file
, "\n");
3244 fprintf (file
, " align: %ld", sec
->align
);
3245 fprintf (file
, " nreloc: %lu reloff: ", sec
->nreloc
);
3246 fprintf_vma (file
, sec
->reloff
);
3247 fprintf (file
, "\n");
3248 fprintf (file
, " flags: %08lx (type: %s", sec
->flags
,
3249 bfd_mach_o_get_name (bfd_mach_o_section_type_name
,
3250 sec
->flags
& BFD_MACH_O_SECTION_TYPE_MASK
));
3251 fprintf (file
, " attr: ");
3252 bfd_mach_o_print_flags (bfd_mach_o_section_attribute_name
,
3253 sec
->flags
& BFD_MACH_O_SECTION_ATTRIBUTES_MASK
,
3255 fprintf (file
, ")\n");
3256 switch (sec
->flags
& BFD_MACH_O_SECTION_TYPE_MASK
)
3258 case BFD_MACH_O_S_NON_LAZY_SYMBOL_POINTERS
:
3259 case BFD_MACH_O_S_LAZY_SYMBOL_POINTERS
:
3260 case BFD_MACH_O_S_SYMBOL_STUBS
:
3261 fprintf (file
, " first indirect sym: %lu", sec
->reserved1
);
3262 fprintf (file
, " (%u entries)",
3263 bfd_mach_o_section_get_nbr_indirect (abfd
, sec
));
3266 fprintf (file
, " reserved1: 0x%lx", sec
->reserved1
);
3269 switch (sec
->flags
& BFD_MACH_O_SECTION_TYPE_MASK
)
3271 case BFD_MACH_O_S_SYMBOL_STUBS
:
3272 fprintf (file
, " stub size: %lu", sec
->reserved2
);
3275 fprintf (file
, " reserved2: 0x%lx", sec
->reserved2
);
3278 fprintf (file
, " reserved3: 0x%lx\n", sec
->reserved3
);
3282 bfd_mach_o_print_segment (bfd
*abfd ATTRIBUTE_UNUSED
,
3283 bfd_mach_o_load_command
*cmd
, FILE *file
)
3285 bfd_mach_o_segment_command
*seg
= &cmd
->command
.segment
;
3288 fprintf (file
, " name: %s\n", seg
->segname
);
3289 fprintf (file
, " vmaddr: ");
3290 fprintf_vma (file
, seg
->vmaddr
);
3291 fprintf (file
, " vmsize: ");
3292 fprintf_vma (file
, seg
->vmsize
);
3293 fprintf (file
, "\n");
3294 fprintf (file
, " fileoff: ");
3295 fprintf_vma (file
, seg
->fileoff
);
3296 fprintf (file
, " filesize: ");
3297 fprintf_vma (file
, (bfd_vma
)seg
->filesize
);
3298 fprintf (file
, " endoff: ");
3299 fprintf_vma (file
, (bfd_vma
)(seg
->fileoff
+ seg
->filesize
));
3300 fprintf (file
, "\n");
3301 fprintf (file
, " nsects: %lu ", seg
->nsects
);
3302 fprintf (file
, " flags: %lx\n", seg
->flags
);
3303 for (i
= 0; i
< seg
->nsects
; i
++)
3304 bfd_mach_o_print_section (abfd
, &seg
->sections
[i
], file
);
3308 bfd_mach_o_print_dysymtab (bfd
*abfd ATTRIBUTE_UNUSED
,
3309 bfd_mach_o_load_command
*cmd
, FILE *file
)
3311 bfd_mach_o_dysymtab_command
*dysymtab
= &cmd
->command
.dysymtab
;
3312 bfd_mach_o_data_struct
*mdata
= bfd_mach_o_get_data (abfd
);
3315 fprintf (file
, " local symbols: idx: %10lu num: %lu\n",
3316 dysymtab
->ilocalsym
, dysymtab
->nlocalsym
);
3317 fprintf (file
, " external symbols: idx: %10lu num: %lu\n",
3318 dysymtab
->iextdefsym
, dysymtab
->nextdefsym
);
3319 fprintf (file
, " undefined symbols: idx: %10lu num: %lu\n",
3320 dysymtab
->iundefsym
, dysymtab
->nundefsym
);
3321 fprintf (file
, " table of content: off: 0x%08lx num: %-8lu",
3322 dysymtab
->tocoff
, dysymtab
->ntoc
);
3323 fprintf (file
, " (endoff: 0x%08lx)\n",
3325 + dysymtab
->ntoc
* BFD_MACH_O_TABLE_OF_CONTENT_SIZE
);
3326 fprintf (file
, " module table: off: 0x%08lx num: %-8lu",
3327 dysymtab
->modtaboff
, dysymtab
->nmodtab
);
3328 fprintf (file
, " (endoff: 0x%08lx)\n",
3329 dysymtab
->modtaboff
+ dysymtab
->nmodtab
3330 * (mach_o_wide_p (&mdata
->header
) ?
3331 BFD_MACH_O_DYLIB_MODULE_64_SIZE
: BFD_MACH_O_DYLIB_MODULE_SIZE
));
3332 fprintf (file
, " external reference table: off: 0x%08lx num: %-8lu",
3333 dysymtab
->extrefsymoff
, dysymtab
->nextrefsyms
);
3334 fprintf (file
, " (endoff: 0x%08lx)\n",
3335 dysymtab
->extrefsymoff
3336 + dysymtab
->nextrefsyms
* BFD_MACH_O_REFERENCE_SIZE
);
3337 fprintf (file
, " indirect symbol table: off: 0x%08lx num: %-8lu",
3338 dysymtab
->indirectsymoff
, dysymtab
->nindirectsyms
);
3339 fprintf (file
, " (endoff: 0x%08lx)\n",
3340 dysymtab
->indirectsymoff
3341 + dysymtab
->nindirectsyms
* BFD_MACH_O_INDIRECT_SYMBOL_SIZE
);
3342 fprintf (file
, " external relocation table: off: 0x%08lx num: %-8lu",
3343 dysymtab
->extreloff
, dysymtab
->nextrel
);
3344 fprintf (file
, " (endoff: 0x%08lx)\n",
3345 dysymtab
->extreloff
+ dysymtab
->nextrel
* BFD_MACH_O_RELENT_SIZE
);
3346 fprintf (file
, " local relocation table: off: 0x%08lx num: %-8lu",
3347 dysymtab
->locreloff
, dysymtab
->nlocrel
);
3348 fprintf (file
, " (endoff: 0x%08lx)\n",
3349 dysymtab
->locreloff
+ dysymtab
->nlocrel
* BFD_MACH_O_RELENT_SIZE
);
3351 if (dysymtab
->ntoc
> 0
3352 || dysymtab
->nindirectsyms
> 0
3353 || dysymtab
->nextrefsyms
> 0)
3355 /* Try to read the symbols to display the toc or indirect symbols. */
3356 bfd_mach_o_scan_read_symtab_symbols (abfd
);
3358 else if (dysymtab
->nmodtab
> 0)
3360 /* Try to read the strtab to display modules name. */
3361 bfd_mach_o_scan_read_symtab_strtab (abfd
);
3364 for (i
= 0; i
< dysymtab
->nmodtab
; i
++)
3366 bfd_mach_o_dylib_module
*module
= &dysymtab
->dylib_module
[i
];
3367 fprintf (file
, " module %u:\n", i
);
3368 fprintf (file
, " name: %lu", module
->module_name_idx
);
3369 if (mdata
->symtab
&& mdata
->symtab
->strtab
)
3370 fprintf (file
, ": %s",
3371 mdata
->symtab
->strtab
+ module
->module_name_idx
);
3372 fprintf (file
, "\n");
3373 fprintf (file
, " extdefsym: idx: %8lu num: %lu\n",
3374 module
->iextdefsym
, module
->nextdefsym
);
3375 fprintf (file
, " refsym: idx: %8lu num: %lu\n",
3376 module
->irefsym
, module
->nrefsym
);
3377 fprintf (file
, " localsym: idx: %8lu num: %lu\n",
3378 module
->ilocalsym
, module
->nlocalsym
);
3379 fprintf (file
, " extrel: idx: %8lu num: %lu\n",
3380 module
->iextrel
, module
->nextrel
);
3381 fprintf (file
, " init: idx: %8u num: %u\n",
3382 module
->iinit
, module
->ninit
);
3383 fprintf (file
, " term: idx: %8u num: %u\n",
3384 module
->iterm
, module
->nterm
);
3385 fprintf (file
, " objc_module_info: addr: ");
3386 fprintf_vma (file
, module
->objc_module_info_addr
);
3387 fprintf (file
, " size: %lu\n", module
->objc_module_info_size
);
3390 if (dysymtab
->ntoc
> 0)
3392 bfd_mach_o_symtab_command
*symtab
= mdata
->symtab
;
3394 fprintf (file
, " table of content: (symbol/module)\n");
3395 for (i
= 0; i
< dysymtab
->ntoc
; i
++)
3397 bfd_mach_o_dylib_table_of_content
*toc
= &dysymtab
->dylib_toc
[i
];
3399 fprintf (file
, " %4u: ", i
);
3400 if (symtab
&& symtab
->symbols
&& toc
->symbol_index
< symtab
->nsyms
)
3402 const char *name
= symtab
->symbols
[toc
->symbol_index
].symbol
.name
;
3403 fprintf (file
, "%s (%lu)", name
? name
: "*invalid*",
3407 fprintf (file
, "%lu", toc
->symbol_index
);
3409 fprintf (file
, " / ");
3410 if (symtab
&& symtab
->strtab
3411 && toc
->module_index
< dysymtab
->nmodtab
)
3413 bfd_mach_o_dylib_module
*mod
;
3414 mod
= &dysymtab
->dylib_module
[toc
->module_index
];
3415 fprintf (file
, "%s (%lu)",
3416 symtab
->strtab
+ mod
->module_name_idx
,
3420 fprintf (file
, "%lu", toc
->module_index
);
3422 fprintf (file
, "\n");
3426 if (dysymtab
->nindirectsyms
!= 0)
3428 fprintf (file
, " indirect symbols:\n");
3430 for (i
= 0; i
< mdata
->nsects
; i
++)
3432 bfd_mach_o_section
*sec
= mdata
->sections
[i
];
3433 unsigned int j
, first
, last
;
3434 bfd_mach_o_symtab_command
*symtab
= mdata
->symtab
;
3436 switch (sec
->flags
& BFD_MACH_O_SECTION_TYPE_MASK
)
3438 case BFD_MACH_O_S_NON_LAZY_SYMBOL_POINTERS
:
3439 case BFD_MACH_O_S_LAZY_SYMBOL_POINTERS
:
3440 case BFD_MACH_O_S_SYMBOL_STUBS
:
3441 first
= sec
->reserved1
;
3442 last
= first
+ bfd_mach_o_section_get_nbr_indirect (abfd
, sec
);
3443 fprintf (file
, " for section %s.%s:\n",
3444 sec
->segname
, sec
->sectname
);
3445 for (j
= first
; j
< last
; j
++)
3447 unsigned int isym
= dysymtab
->indirect_syms
[j
];
3449 fprintf (file
, " %5u: 0x%08x (%u)", j
, isym
, isym
);
3450 if (isym
& BFD_MACH_O_INDIRECT_SYMBOL_LOCAL
)
3451 fprintf (file
, " LOCAL");
3452 if (isym
& BFD_MACH_O_INDIRECT_SYMBOL_ABS
)
3453 fprintf (file
, " ABSOLUTE");
3454 if (symtab
&& symtab
->symbols
3455 && isym
< symtab
->nsyms
3456 && symtab
->symbols
[isym
].symbol
.name
)
3457 fprintf (file
, " %s", symtab
->symbols
[isym
].symbol
.name
);
3458 fprintf (file
, "\n");
3466 if (dysymtab
->nextrefsyms
> 0)
3468 bfd_mach_o_symtab_command
*symtab
= mdata
->symtab
;
3470 fprintf (file
, " external reference table: (symbol flags)\n");
3471 for (i
= 0; i
< dysymtab
->nextrefsyms
; i
++)
3473 bfd_mach_o_dylib_reference
*ref
= &dysymtab
->ext_refs
[i
];
3475 fprintf (file
, " %4u: %5lu 0x%02lx", i
, ref
->isym
, ref
->flags
);
3476 if (symtab
&& symtab
->symbols
3477 && ref
->isym
< symtab
->nsyms
3478 && symtab
->symbols
[ref
->isym
].symbol
.name
)
3479 fprintf (file
, " %s", symtab
->symbols
[ref
->isym
].symbol
.name
);
3480 fprintf (file
, "\n");
3487 bfd_mach_o_bfd_print_private_bfd_data (bfd
*abfd
, PTR ptr
)
3489 bfd_mach_o_data_struct
*mdata
= bfd_mach_o_get_data (abfd
);
3490 FILE *file
= (FILE *) ptr
;
3493 bfd_mach_o_print_private_header (abfd
, file
);
3496 for (i
= 0; i
< mdata
->header
.ncmds
; i
++)
3498 bfd_mach_o_load_command
*cmd
= &mdata
->commands
[i
];
3500 fprintf (file
, "Load command %s:",
3501 bfd_mach_o_get_name (bfd_mach_o_load_command_name
, cmd
->type
));
3504 case BFD_MACH_O_LC_SEGMENT
:
3505 case BFD_MACH_O_LC_SEGMENT_64
:
3506 bfd_mach_o_print_segment (abfd
, cmd
, file
);
3508 case BFD_MACH_O_LC_UUID
:
3510 bfd_mach_o_uuid_command
*uuid
= &cmd
->command
.uuid
;
3513 for (i
= 0; i
< sizeof (uuid
->uuid
); i
++)
3514 fprintf (file
, " %02x", uuid
->uuid
[i
]);
3518 case BFD_MACH_O_LC_LOAD_DYLIB
:
3519 case BFD_MACH_O_LC_LOAD_WEAK_DYLIB
:
3520 case BFD_MACH_O_LC_REEXPORT_DYLIB
:
3521 case BFD_MACH_O_LC_ID_DYLIB
:
3523 bfd_mach_o_dylib_command
*dylib
= &cmd
->command
.dylib
;
3524 bfd_byte
*data
= NULL
;
3526 if (! bfd_malloc_and_get_section (abfd
, dylib
->section
, &data
))
3534 data
+ dylib
->name_offset
- cmd
->offset
- 8);
3535 fprintf (file
, " time stamp: 0x%08lx\n",
3537 fprintf (file
, " current version: 0x%08lx\n",
3538 dylib
->current_version
);
3539 fprintf (file
, " comptibility version: 0x%08lx\n",
3540 dylib
->compatibility_version
);
3544 case BFD_MACH_O_LC_LOAD_DYLINKER
:
3546 bfd_mach_o_dylinker_command
*linker
= &cmd
->command
.dylinker
;
3547 bfd_byte
*data
= NULL
;
3549 if (! bfd_malloc_and_get_section (abfd
, linker
->section
, &data
))
3557 data
+ linker
->name_offset
- cmd
->offset
- 8);
3561 case BFD_MACH_O_LC_SYMTAB
:
3563 bfd_mach_o_symtab_command
*symtab
= &cmd
->command
.symtab
;
3566 " symoff: 0x%08x nsyms: %8u (endoff: 0x%08x)\n",
3567 symtab
->symoff
, symtab
->nsyms
,
3568 symtab
->symoff
+ symtab
->nsyms
3569 * (mach_o_wide_p (&mdata
->header
)
3570 ? BFD_MACH_O_NLIST_64_SIZE
: BFD_MACH_O_NLIST_SIZE
));
3572 " stroff: 0x%08x strsize: %8u (endoff: 0x%08x)\n",
3573 symtab
->stroff
, symtab
->strsize
,
3574 symtab
->stroff
+ symtab
->strsize
);
3577 case BFD_MACH_O_LC_DYSYMTAB
:
3578 fprintf (file
, "\n");
3579 bfd_mach_o_print_dysymtab (abfd
, cmd
, file
);
3581 case BFD_MACH_O_LC_CODE_SIGNATURE
:
3582 case BFD_MACH_O_LC_SEGMENT_SPLIT_INFO
:
3584 bfd_mach_o_linkedit_command
*linkedit
= &cmd
->command
.linkedit
;
3587 " dataoff: 0x%08lx datasize: 0x%08lx (endoff: 0x%08lx)\n",
3588 linkedit
->dataoff
, linkedit
->datasize
,
3589 linkedit
->dataoff
+ linkedit
->datasize
);
3592 case BFD_MACH_O_LC_SUB_FRAMEWORK
:
3593 case BFD_MACH_O_LC_SUB_UMBRELLA
:
3594 case BFD_MACH_O_LC_SUB_LIBRARY
:
3595 case BFD_MACH_O_LC_SUB_CLIENT
:
3597 bfd_mach_o_str_command
*str
= &cmd
->command
.str
;
3598 fprintf (file
, " %s\n", str
->str
);
3602 fprintf (file
, "\n");
3608 bfd_mach_o_print_section_map (abfd
, file
);
3614 bfd_mach_o_core_fetch_environment (bfd
*abfd
,
3615 unsigned char **rbuf
,
3618 bfd_mach_o_data_struct
*mdata
= bfd_mach_o_get_data (abfd
);
3619 unsigned long stackaddr
= bfd_mach_o_stack_addr (mdata
->header
.cputype
);
3622 for (i
= 0; i
< mdata
->header
.ncmds
; i
++)
3624 bfd_mach_o_load_command
*cur
= &mdata
->commands
[i
];
3625 bfd_mach_o_segment_command
*seg
= NULL
;
3627 if (cur
->type
!= BFD_MACH_O_LC_SEGMENT
)
3630 seg
= &cur
->command
.segment
;
3632 if ((seg
->vmaddr
+ seg
->vmsize
) == stackaddr
)
3634 unsigned long start
= seg
->fileoff
;
3635 unsigned long end
= seg
->fileoff
+ seg
->filesize
;
3636 unsigned char *buf
= bfd_malloc (1024);
3637 unsigned long size
= 1024;
3641 bfd_size_type nread
= 0;
3642 unsigned long offset
;
3643 int found_nonnull
= 0;
3645 if (size
> (end
- start
))
3646 size
= (end
- start
);
3648 buf
= bfd_realloc_or_free (buf
, size
);
3652 if (bfd_seek (abfd
, end
- size
, SEEK_SET
) != 0)
3658 nread
= bfd_bread (buf
, size
, abfd
);
3666 for (offset
= 4; offset
<= size
; offset
+= 4)
3670 val
= *((unsigned long *) (buf
+ size
- offset
));
3671 if (! found_nonnull
)
3676 else if (val
== 0x0)
3678 unsigned long bottom
;
3681 bottom
= seg
->fileoff
+ seg
->filesize
- offset
;
3682 top
= seg
->fileoff
+ seg
->filesize
- 4;
3683 *rbuf
= bfd_malloc (top
- bottom
);
3684 *rlen
= top
- bottom
;
3686 memcpy (*rbuf
, buf
+ size
- *rlen
, *rlen
);
3692 if (size
== (end
- start
))
3706 bfd_mach_o_core_file_failing_command (bfd
*abfd
)
3708 unsigned char *buf
= NULL
;
3709 unsigned int len
= 0;
3712 ret
= bfd_mach_o_core_fetch_environment (abfd
, &buf
, &len
);
3716 return (char *) buf
;
3720 bfd_mach_o_core_file_failing_signal (bfd
*abfd ATTRIBUTE_UNUSED
)
3725 #define bfd_mach_o_bfd_reloc_type_lookup _bfd_norelocs_bfd_reloc_type_lookup
3726 #define bfd_mach_o_bfd_reloc_name_lookup _bfd_norelocs_bfd_reloc_name_lookup
3728 #define bfd_mach_o_swap_reloc_in NULL
3729 #define bfd_mach_o_swap_reloc_out NULL
3731 #define TARGET_NAME mach_o_be_vec
3732 #define TARGET_STRING "mach-o-be"
3733 #define TARGET_BIG_ENDIAN 1
3734 #define TARGET_ARCHIVE 0
3735 #include "mach-o-target.c"
3738 #undef TARGET_STRING
3739 #undef TARGET_BIG_ENDIAN
3740 #undef TARGET_ARCHIVE
3742 #define TARGET_NAME mach_o_le_vec
3743 #define TARGET_STRING "mach-o-le"
3744 #define TARGET_BIG_ENDIAN 0
3745 #define TARGET_ARCHIVE 0
3747 #include "mach-o-target.c"
3750 #undef TARGET_STRING
3751 #undef TARGET_BIG_ENDIAN
3752 #undef TARGET_ARCHIVE
3754 #define TARGET_NAME mach_o_fat_vec
3755 #define TARGET_STRING "mach-o-fat"
3756 #define TARGET_BIG_ENDIAN 1
3757 #define TARGET_ARCHIVE 1
3759 #include "mach-o-target.c"
3762 #undef TARGET_STRING
3763 #undef TARGET_BIG_ENDIAN
3764 #undef TARGET_ARCHIVE