1 /* Darwin support for GDB, the GNU debugger.
2 Copyright (C) 2008-2018 Free Software Foundation, Inc.
4 Contributed by AdaCore.
6 This file is part of GDB.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 3 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program. If not, see <http://www.gnu.org/licenses/>. */
31 #include "aout/stab_gnu.h"
34 #include "complaints.h"
39 /* If non-zero displays debugging message. */
40 static unsigned int mach_o_debug_level
= 0;
42 /* Dwarf debugging information are never in the final executable. They stay
43 in object files and the executable contains the list of object files read
45 Each time an oso (other source) is found in the executable, the reader
46 creates such a structure. They are read after the processing of the
51 oso_el (asymbol
**oso_sym_
, asymbol
**end_sym_
, unsigned int nbr_syms_
)
52 : name((*oso_sym_
)->name
),
53 mtime((*oso_sym_
)->value
),
60 /* Object file name. Can also be a member name. */
63 /* Associated time stamp. */
66 /* Stab symbols range for this OSO. */
70 /* Number of interesting stabs in the range. */
71 unsigned int nbr_syms
;
75 macho_new_init (struct objfile
*objfile
)
80 macho_symfile_init (struct objfile
*objfile
)
82 objfile
->flags
|= OBJF_REORDERED
;
85 /* Add symbol SYM to the minimal symbol table of OBJFILE. */
88 macho_symtab_add_minsym (minimal_symbol_reader
&reader
,
89 struct objfile
*objfile
, const asymbol
*sym
)
91 if (sym
->name
== NULL
|| *sym
->name
== '\0')
93 /* Skip names that don't exist (shouldn't happen), or names
94 that are null strings (may happen). */
98 if (sym
->flags
& (BSF_GLOBAL
| BSF_LOCAL
| BSF_WEAK
))
101 enum minimal_symbol_type ms_type
;
103 /* Bfd symbols are section relative. */
104 symaddr
= sym
->value
+ sym
->section
->vma
;
106 if (sym
->section
== bfd_abs_section_ptr
)
108 else if (sym
->section
->flags
& SEC_CODE
)
110 if (sym
->flags
& (BSF_GLOBAL
| BSF_WEAK
))
113 ms_type
= mst_file_text
;
115 else if (sym
->section
->flags
& SEC_ALLOC
)
117 if (sym
->flags
& (BSF_GLOBAL
| BSF_WEAK
))
119 if (sym
->section
->flags
& SEC_LOAD
)
124 else if (sym
->flags
& BSF_LOCAL
)
126 /* Not a special stabs-in-elf symbol, do regular
127 symbol processing. */
128 if (sym
->section
->flags
& SEC_LOAD
)
129 ms_type
= mst_file_data
;
131 ms_type
= mst_file_bss
;
134 ms_type
= mst_unknown
;
137 return; /* Skip this symbol. */
139 reader
.record_with_info (sym
->name
, symaddr
, ms_type
,
140 gdb_bfd_section_index (objfile
->obfd
,
145 /* Build the minimal symbol table from SYMBOL_TABLE of length
146 NUMBER_OF_SYMBOLS for OBJFILE. Registers OSO filenames found. */
149 macho_symtab_read (minimal_symbol_reader
&reader
,
150 struct objfile
*objfile
,
151 long number_of_symbols
, asymbol
**symbol_table
,
152 std::vector
<oso_el
> *oso_vector_ptr
)
155 const asymbol
*file_so
= NULL
;
156 asymbol
**oso_file
= NULL
;
157 unsigned int nbr_syms
= 0;
159 /* Current state while reading stabs. */
162 /* Not within an SO part. Only non-debugging symbols should be present,
163 and will be added to the minimal symbols table. */
166 /* First SO read. Introduce an SO section, and may be followed by a second
167 SO. The SO section should contain onl debugging symbols. */
170 /* Second non-null SO found, just after the first one. Means that the first
171 is in fact a directory name. */
174 /* Non-null OSO found. Debugging info are DWARF in this OSO file. */
180 for (i
= 0; i
< number_of_symbols
; i
++)
182 const asymbol
*sym
= symbol_table
[i
];
183 bfd_mach_o_asymbol
*mach_o_sym
= (bfd_mach_o_asymbol
*)sym
;
188 if (mach_o_sym
->n_type
== N_SO
)
190 /* Start of object stab. */
191 if (sym
->name
== NULL
|| sym
->name
[0] == 0)
193 /* Unexpected empty N_SO. */
194 complaint (_("Unexpected empty N_SO stab"));
202 else if (sym
->flags
& BSF_DEBUGGING
)
204 if (mach_o_sym
->n_type
== N_OPT
)
206 /* No complaint for OPT. */
210 /* Debugging symbols are not expected here. */
211 complaint (_("%s: Unexpected debug stab outside SO markers"),
212 objfile_name (objfile
));
216 /* Non-debugging symbols go to the minimal symbol table. */
217 macho_symtab_add_minsym (reader
, objfile
, sym
);
223 if (mach_o_sym
->n_type
== N_SO
)
225 if (sym
->name
== NULL
|| sym
->name
[0] == 0)
227 /* Unexpected empty N_SO. */
228 complaint (_("Empty SO section"));
231 else if (state
== S_FIRST_SO
)
233 /* Second SO stab for the file name. */
238 complaint (_("Three SO in a raw"));
240 else if (mach_o_sym
->n_type
== N_OSO
)
242 if (sym
->name
== NULL
|| sym
->name
[0] == 0)
244 /* Empty OSO. Means that this file was compiled with
247 warning (_("stabs debugging not supported for %s"),
252 /* Non-empty OSO for a Dwarf file. */
253 oso_file
= symbol_table
+ i
;
255 state
= S_DWARF_FILE
;
259 complaint (_("Unexpected stab after SO"));
264 if (mach_o_sym
->n_type
== N_SO
)
266 if (sym
->name
== NULL
|| sym
->name
[0] == 0)
269 if (state
== S_DWARF_FILE
)
270 oso_vector_ptr
->emplace_back (oso_file
, symbol_table
+ i
,
276 complaint (_("Missing nul SO"));
281 else if (sym
->flags
& BSF_DEBUGGING
)
283 if (state
== S_STAB_FILE
)
285 /* FIXME: to be implemented. */
289 switch (mach_o_sym
->n_type
)
292 if (sym
->name
== NULL
|| sym
->name
[0] == 0)
296 /* Interesting symbol. */
304 complaint (_("unhandled stab for dwarf OSO file"));
310 complaint (_("non-debugging symbol within SO"));
315 if (state
!= S_NO_SO
)
316 complaint (_("missing nul SO"));
319 /* If NAME describes an archive member (ie: ARCHIVE '(' MEMBER ')'),
320 returns the length of the archive name.
321 Returns -1 otherwise. */
324 get_archive_prefix_len (const char *name
)
327 int name_len
= strlen (name
);
329 if (name_len
== 0 || name
[name_len
- 1] != ')')
332 lparen
= strrchr (name
, '(');
333 if (lparen
== NULL
|| lparen
== name
)
335 return lparen
- name
;
338 /* Compare function to std::sort OSOs, so that members of a library
342 oso_el_compare_name (const oso_el
&l
, const oso_el
&r
)
344 return strcmp (l
.name
, r
.name
) < 0;
347 /* Hash table entry structure for the stabs symbols in the main object file.
348 This is used to speed up lookup for symbols in the OSO. */
350 struct macho_sym_hash_entry
352 struct bfd_hash_entry base
;
356 /* Routine to create an entry in the hash table. */
358 static struct bfd_hash_entry
*
359 macho_sym_hash_newfunc (struct bfd_hash_entry
*entry
,
360 struct bfd_hash_table
*table
,
363 struct macho_sym_hash_entry
*ret
= (struct macho_sym_hash_entry
*) entry
;
365 /* Allocate the structure if it has not already been allocated by a
368 ret
= (struct macho_sym_hash_entry
*) bfd_hash_allocate (table
,
373 /* Call the allocation method of the superclass. */
374 ret
= (struct macho_sym_hash_entry
*)
375 bfd_hash_newfunc ((struct bfd_hash_entry
*) ret
, table
, string
);
379 /* Initialize the local fields. */
383 return (struct bfd_hash_entry
*) ret
;
386 /* Get the value of SYM from the minimal symtab of MAIN_OBJFILE. This is used
387 to get the value of global and common symbols. */
390 macho_resolve_oso_sym_with_minsym (struct objfile
*main_objfile
, asymbol
*sym
)
392 /* For common symbol and global symbols, use the min symtab. */
393 struct bound_minimal_symbol msym
;
394 const char *name
= sym
->name
;
396 if (name
[0] == bfd_get_symbol_leading_char (main_objfile
->obfd
))
398 msym
= lookup_minimal_symbol (name
, NULL
, main_objfile
);
399 if (msym
.minsym
== NULL
)
401 warning (_("can't find symbol '%s' in minsymtab"), name
);
405 return BMSYMBOL_VALUE_ADDRESS (msym
);
408 /* Add oso file OSO/ABFD as a symbol file. */
411 macho_add_oso_symfile (oso_el
*oso
, const gdb_bfd_ref_ptr
&abfd
,
413 struct objfile
*main_objfile
,
414 symfile_add_flags symfile_flags
)
418 asymbol
**symbol_table
;
420 struct bfd_hash_table table
;
423 /* Per section flag to mark which section have been rebased. */
424 unsigned char *sections_rebased
;
426 if (mach_o_debug_level
> 0)
428 (_("Loading debugging symbols from oso: %s\n"), oso
->name
);
430 if (!bfd_check_format (abfd
.get (), bfd_object
))
432 warning (_("`%s': can't read symbols: %s."), oso
->name
,
433 bfd_errmsg (bfd_get_error ()));
437 if (abfd
->my_archive
== NULL
&& oso
->mtime
!= bfd_get_mtime (abfd
.get ()))
439 warning (_("`%s': file time stamp mismatch."), oso
->name
);
443 if (!bfd_hash_table_init_n (&table
, macho_sym_hash_newfunc
,
444 sizeof (struct macho_sym_hash_entry
),
447 warning (_("`%s': can't create hash table"), oso
->name
);
451 bfd_set_cacheable (abfd
.get (), 1);
453 /* Read symbols table. */
454 storage
= bfd_get_symtab_upper_bound (abfd
.get ());
455 symbol_table
= (asymbol
**) xmalloc (storage
);
456 bfd_canonicalize_symtab (abfd
.get (), symbol_table
);
458 /* Init section flags. */
459 nbr_sections
= bfd_count_sections (abfd
.get ());
460 sections_rebased
= (unsigned char *) alloca (nbr_sections
);
461 for (i
= 0; i
< nbr_sections
; i
++)
462 sections_rebased
[i
] = 0;
464 /* Put symbols for the OSO file in the hash table. */
465 for (symp
= oso
->oso_sym
; symp
!= oso
->end_sym
; symp
++)
467 const asymbol
*sym
= *symp
;
468 bfd_mach_o_asymbol
*mach_o_sym
= (bfd_mach_o_asymbol
*)sym
;
470 switch (mach_o_sym
->n_type
)
478 if (sym
->name
== NULL
|| sym
->name
[0] == 0)
489 struct macho_sym_hash_entry
*ent
;
491 ent
= (struct macho_sym_hash_entry
*)
492 bfd_hash_lookup (&table
, sym
->name
, TRUE
, FALSE
);
493 if (ent
->sym
!= NULL
)
494 complaint (_("Duplicated symbol %s in symbol table"), sym
->name
);
497 if (mach_o_debug_level
> 4)
499 struct gdbarch
*arch
= get_objfile_arch (main_objfile
);
501 (_("Adding symbol %s (addr: %s)\n"),
502 sym
->name
, paddress (arch
, sym
->value
));
509 /* Relocate symbols of the OSO. */
510 for (i
= 0; symbol_table
[i
]; i
++)
512 asymbol
*sym
= symbol_table
[i
];
513 bfd_mach_o_asymbol
*mach_o_sym
= (bfd_mach_o_asymbol
*)sym
;
515 if (mach_o_sym
->n_type
& BFD_MACH_O_N_STAB
)
517 if ((mach_o_sym
->n_type
& BFD_MACH_O_N_TYPE
) == BFD_MACH_O_N_UNDF
520 /* For common symbol use the min symtab and modify the OSO
524 res
= macho_resolve_oso_sym_with_minsym (main_objfile
, sym
);
527 sym
->section
= bfd_com_section_ptr
;
531 else if ((mach_o_sym
->n_type
& BFD_MACH_O_N_TYPE
) == BFD_MACH_O_N_SECT
)
534 asection
*sec
= sym
->section
;
535 bfd_mach_o_section
*msec
;
536 unsigned int sec_type
;
538 /* Skip buggy ones. */
539 if (sec
== NULL
|| sections_rebased
[sec
->index
] != 0)
542 /* Only consider regular, non-debugging sections. */
543 msec
= bfd_mach_o_get_mach_o_section (sec
);
544 sec_type
= msec
->flags
& BFD_MACH_O_SECTION_TYPE_MASK
;
545 if ((sec_type
== BFD_MACH_O_S_REGULAR
546 || sec_type
== BFD_MACH_O_S_ZEROFILL
)
547 && (msec
->flags
& BFD_MACH_O_S_ATTR_DEBUG
) == 0)
551 if ((mach_o_sym
->n_type
& BFD_MACH_O_N_EXT
) != 0)
553 /* Use the min symtab for global symbols. */
554 addr
= macho_resolve_oso_sym_with_minsym (main_objfile
, sym
);
558 struct macho_sym_hash_entry
*ent
;
560 ent
= (struct macho_sym_hash_entry
*)
561 bfd_hash_lookup (&table
, sym
->name
, FALSE
, FALSE
);
563 addr
= bfd_asymbol_value (ent
->sym
);
566 /* Adjust the section. */
569 CORE_ADDR res
= addr
- sym
->value
;
571 if (mach_o_debug_level
> 3)
573 struct gdbarch
*arch
= get_objfile_arch (main_objfile
);
575 (_("resolve sect %s with %s (set to %s)\n"),
576 sec
->name
, sym
->name
,
577 paddress (arch
, res
));
579 bfd_set_section_vma (abfd
.get (), sec
, res
);
580 sections_rebased
[sec
->index
] = 1;
585 /* Mark the section as never rebased. */
586 sections_rebased
[sec
->index
] = 2;
591 bfd_hash_table_free (&table
);
593 /* We need to clear SYMFILE_MAINLINE to avoid interractive question
594 from symfile.c:symbol_file_add_with_addrs_or_offsets. */
595 symbol_file_add_from_bfd
596 (abfd
.get (), name
, symfile_flags
& ~(SYMFILE_MAINLINE
| SYMFILE_VERBOSE
),
598 main_objfile
->flags
& (OBJF_REORDERED
| OBJF_SHARED
599 | OBJF_READNOW
| OBJF_USERLOADED
),
603 /* Read symbols from the vector of oso files.
605 Note that this function sorts OSO_VECTOR_PTR. */
608 macho_symfile_read_all_oso (std::vector
<oso_el
> *oso_vector_ptr
,
609 struct objfile
*main_objfile
,
610 symfile_add_flags symfile_flags
)
615 /* Sort oso by name so that files from libraries are gathered. */
616 std::sort (oso_vector_ptr
->begin (), oso_vector_ptr
->end (),
617 oso_el_compare_name
);
619 for (ix
= 0; ix
< oso_vector_ptr
->size (); ++ix
)
623 oso
= &(*oso_vector_ptr
)[ix
];
625 /* Check if this is a library name. */
626 pfx_len
= get_archive_prefix_len (oso
->name
);
633 std::string
archive_name (oso
->name
, pfx_len
);
635 /* Compute number of oso for this archive. */
636 for (last_ix
= ix
; last_ix
< oso_vector_ptr
->size (); last_ix
++)
638 oso2
= &(*oso_vector_ptr
)[last_ix
];
639 if (strncmp (oso2
->name
, archive_name
.c_str (), pfx_len
) != 0)
643 /* Open the archive and check the format. */
644 gdb_bfd_ref_ptr
archive_bfd (gdb_bfd_open (archive_name
.c_str (),
646 if (archive_bfd
== NULL
)
648 warning (_("Could not open OSO archive file \"%s\""),
649 archive_name
.c_str ());
653 if (!bfd_check_format (archive_bfd
.get (), bfd_archive
))
655 warning (_("OSO archive file \"%s\" not an archive."),
656 archive_name
.c_str ());
661 gdb_bfd_ref_ptr member_bfd
662 (gdb_bfd_openr_next_archived_file (archive_bfd
.get (), NULL
));
664 if (member_bfd
== NULL
)
666 warning (_("Could not read archive members out of "
667 "OSO archive \"%s\""), archive_name
.c_str ());
672 /* Load all oso in this library. */
673 while (member_bfd
!= NULL
)
675 const char *member_name
= member_bfd
->filename
;
676 int member_len
= strlen (member_name
);
678 /* If this member is referenced, add it as a symfile. */
679 for (ix2
= ix
; ix2
< last_ix
; ix2
++)
681 oso2
= &(*oso_vector_ptr
)[ix2
];
684 && strlen (oso2
->name
) == pfx_len
+ member_len
+ 2
685 && !memcmp (member_name
, oso2
->name
+ pfx_len
+ 1,
688 macho_add_oso_symfile (oso2
, member_bfd
,
689 bfd_get_filename (member_bfd
),
690 main_objfile
, symfile_flags
);
696 member_bfd
= gdb_bfd_openr_next_archived_file (archive_bfd
.get (),
699 for (ix2
= ix
; ix2
< last_ix
; ix2
++)
701 oso_el
*oso2
= &(*oso_vector_ptr
)[ix2
];
703 if (oso2
->name
!= NULL
)
704 warning (_("Could not find specified archive member "
705 "for OSO name \"%s\""), oso
->name
);
711 gdb_bfd_ref_ptr
abfd (gdb_bfd_open (oso
->name
, gnutarget
, -1));
713 warning (_("`%s': can't open to read symbols: %s."), oso
->name
,
714 bfd_errmsg (bfd_get_error ()));
716 macho_add_oso_symfile (oso
, abfd
, oso
->name
, main_objfile
,
724 /* DSYM (debug symbols) files contain the debug info of an executable.
725 This is a separate file created by dsymutil(1) and is similar to debug
727 DSYM files are located in a subdirectory. Append DSYM_SUFFIX to the
728 executable name and the executable base name to get the DSYM file name. */
729 #define DSYM_SUFFIX ".dSYM/Contents/Resources/DWARF/"
731 /* Check if a dsym file exists for OBJFILE. If so, returns a bfd for it
732 and return *FILENAMEP with its original filename.
733 Return NULL if no valid dsym file is found (FILENAMEP is not used in
736 static gdb_bfd_ref_ptr
737 macho_check_dsym (struct objfile
*objfile
, std::string
*filenamep
)
739 size_t name_len
= strlen (objfile_name (objfile
));
740 size_t dsym_len
= strlen (DSYM_SUFFIX
);
741 const char *base_name
= lbasename (objfile_name (objfile
));
742 size_t base_len
= strlen (base_name
);
743 char *dsym_filename
= (char *) alloca (name_len
+ dsym_len
+ base_len
+ 1);
744 bfd_mach_o_load_command
*main_uuid
;
745 bfd_mach_o_load_command
*dsym_uuid
;
747 strcpy (dsym_filename
, objfile_name (objfile
));
748 strcpy (dsym_filename
+ name_len
, DSYM_SUFFIX
);
749 strcpy (dsym_filename
+ name_len
+ dsym_len
, base_name
);
751 if (access (dsym_filename
, R_OK
) != 0)
754 if (bfd_mach_o_lookup_command (objfile
->obfd
,
755 BFD_MACH_O_LC_UUID
, &main_uuid
) == 0)
757 warning (_("can't find UUID in %s"), objfile_name (objfile
));
760 gdb_bfd_ref_ptr
dsym_bfd (gdb_bfd_openr (dsym_filename
, gnutarget
));
761 if (dsym_bfd
== NULL
)
763 warning (_("can't open dsym file %s"), dsym_filename
);
767 if (!bfd_check_format (dsym_bfd
.get (), bfd_object
))
769 warning (_("bad dsym file format: %s"), bfd_errmsg (bfd_get_error ()));
773 if (bfd_mach_o_lookup_command (dsym_bfd
.get (),
774 BFD_MACH_O_LC_UUID
, &dsym_uuid
) == 0)
776 warning (_("can't find UUID in %s"), dsym_filename
);
779 if (memcmp (dsym_uuid
->command
.uuid
.uuid
, main_uuid
->command
.uuid
.uuid
,
780 sizeof (main_uuid
->command
.uuid
.uuid
)))
782 warning (_("dsym file UUID doesn't match the one in %s"),
783 objfile_name (objfile
));
786 *filenamep
= std::string (dsym_filename
);
791 macho_symfile_read (struct objfile
*objfile
, symfile_add_flags symfile_flags
)
793 bfd
*abfd
= objfile
->obfd
;
795 std::vector
<oso_el
> oso_vector
;
797 /* Get symbols from the symbol table only if the file is an executable.
798 The symbol table of object files is not relocated and is expected to
799 be in the executable. */
800 if (bfd_get_file_flags (abfd
) & (EXEC_P
| DYNAMIC
))
802 std::string dsym_filename
;
804 /* Process the normal symbol table first. */
805 storage_needed
= bfd_get_symtab_upper_bound (objfile
->obfd
);
806 if (storage_needed
< 0)
807 error (_("Can't read symbols from %s: %s"),
808 bfd_get_filename (objfile
->obfd
),
809 bfd_errmsg (bfd_get_error ()));
811 if (storage_needed
> 0)
815 gdb::def_vector
<asymbol
*> symbol_table (storage_needed
816 / sizeof (asymbol
*));
818 minimal_symbol_reader
reader (objfile
);
820 symcount
= bfd_canonicalize_symtab (objfile
->obfd
,
821 symbol_table
.data ());
824 error (_("Can't read symbols from %s: %s"),
825 bfd_get_filename (objfile
->obfd
),
826 bfd_errmsg (bfd_get_error ()));
828 macho_symtab_read (reader
, objfile
, symcount
, symbol_table
.data (),
834 /* Try to read .eh_frame / .debug_frame. */
835 /* First, locate these sections. We ignore the result status
836 as it only checks for debug info. */
837 dwarf2_has_info (objfile
, NULL
);
838 dwarf2_build_frame_info (objfile
);
840 /* Check for DSYM file. */
841 gdb_bfd_ref_ptr
dsym_bfd (macho_check_dsym (objfile
, &dsym_filename
));
842 if (dsym_bfd
!= NULL
)
844 struct bfd_section
*asect
, *dsect
;
846 if (mach_o_debug_level
> 0)
847 printf_unfiltered (_("dsym file found\n"));
849 /* Set dsym section size. */
850 for (asect
= objfile
->obfd
->sections
, dsect
= dsym_bfd
->sections
;
852 asect
= asect
->next
, dsect
= dsect
->next
)
854 if (strcmp (asect
->name
, dsect
->name
) != 0)
856 bfd_set_section_size (dsym_bfd
.get (), dsect
,
857 bfd_get_section_size (asect
));
860 /* Add the dsym file as a separate file. */
861 symbol_file_add_separate (dsym_bfd
.get (), dsym_filename
.c_str (),
862 symfile_flags
, objfile
);
864 /* Don't try to read dwarf2 from main file or shared libraries. */
869 if (dwarf2_has_info (objfile
, NULL
))
871 /* DWARF 2 sections */
872 dwarf2_build_psymtabs (objfile
);
876 if (!oso_vector
.empty ())
877 macho_symfile_read_all_oso (&oso_vector
, objfile
, symfile_flags
);
881 macho_symfile_relocate (struct objfile
*objfile
, asection
*sectp
,
884 bfd
*abfd
= objfile
->obfd
;
886 /* We're only interested in sections with relocation
888 if ((sectp
->flags
& SEC_RELOC
) == 0)
891 if (mach_o_debug_level
> 0)
892 printf_unfiltered (_("Relocate section '%s' of %s\n"),
893 sectp
->name
, objfile_name (objfile
));
895 return bfd_simple_get_relocated_section_contents (abfd
, sectp
, buf
, NULL
);
899 macho_symfile_finish (struct objfile
*objfile
)
904 macho_symfile_offsets (struct objfile
*objfile
,
905 const section_addr_info
&addrs
)
908 struct obj_section
*osect
;
910 /* Allocate section_offsets. */
911 objfile
->num_sections
= bfd_count_sections (objfile
->obfd
);
912 objfile
->section_offsets
= (struct section_offsets
*)
913 obstack_alloc (&objfile
->objfile_obstack
,
914 SIZEOF_N_SECTION_OFFSETS (objfile
->num_sections
));
915 memset (objfile
->section_offsets
, 0,
916 SIZEOF_N_SECTION_OFFSETS (objfile
->num_sections
));
918 /* This code is run when we first add the objfile with
919 symfile_add_with_addrs_or_offsets, when "addrs" not "offsets" are
920 passed in. The place in symfile.c where the addrs are applied
921 depends on the addrs having section names. But in the dyld code
922 we build an anonymous array of addrs, so that code is a no-op.
923 Because of that, we have to apply the addrs to the sections here.
924 N.B. if an objfile slides after we've already created it, then it
925 goes through objfile_relocate. */
927 for (i
= 0; i
< addrs
.size (); i
++)
929 ALL_OBJFILE_OSECTIONS (objfile
, osect
)
931 const char *bfd_sect_name
= osect
->the_bfd_section
->name
;
933 if (bfd_sect_name
== addrs
[i
].name
)
935 obj_section_offset (osect
) = addrs
[i
].addr
;
941 objfile
->sect_index_text
= 0;
943 ALL_OBJFILE_OSECTIONS (objfile
, osect
)
945 const char *bfd_sect_name
= osect
->the_bfd_section
->name
;
946 int sect_index
= osect
- objfile
->sections
;;
948 if (startswith (bfd_sect_name
, "LC_SEGMENT."))
950 if (strcmp (bfd_sect_name
, "__TEXT") == 0
951 || strcmp (bfd_sect_name
, "__TEXT.__text") == 0)
952 objfile
->sect_index_text
= sect_index
;
956 static const struct sym_fns macho_sym_fns
= {
957 macho_new_init
, /* init anything gbl to entire symtab */
958 macho_symfile_init
, /* read initial info, setup for sym_read() */
959 macho_symfile_read
, /* read a symbol file into symtab */
960 NULL
, /* sym_read_psymbols */
961 macho_symfile_finish
, /* finished with file, cleanup */
962 macho_symfile_offsets
, /* xlate external to internal form */
963 default_symfile_segments
, /* Get segment information from a file. */
965 macho_symfile_relocate
, /* Relocate a debug section. */
966 NULL
, /* sym_get_probes */
971 _initialize_machoread (void)
973 add_symtab_fns (bfd_target_mach_o_flavour
, &macho_sym_fns
);
975 add_setshow_zuinteger_cmd ("mach-o", class_obscure
,
977 _("Set if printing Mach-O symbols processing."),
978 _("Show if printing Mach-O symbols processing."),
980 &setdebuglist
, &showdebuglist
);