1 /* Darwin support for GDB, the GNU debugger.
2 Copyright (C) 2008-2016 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"
38 /* If non-zero displays debugging message. */
39 static unsigned int mach_o_debug_level = 0;
41 /* Dwarf debugging information are never in the final executable. They stay
42 in object files and the executable contains the list of object files read
44 Each time an oso (other source) is found in the executable, the reader
45 creates such a structure. They are read after the processing of the
50 /* Object file name. Can also be a member name. */
53 /* Associated time stamp. */
56 /* Stab symbols range for this OSO. */
60 /* Number of interesting stabs in the range. */
61 unsigned int nbr_syms;
65 /* Vector of object files to be read after the executable. */
69 macho_new_init (struct objfile *objfile)
74 macho_symfile_init (struct objfile *objfile)
76 objfile->flags |= OBJF_REORDERED;
79 /* Add a new OSO to the vector of OSO to load. */
82 macho_register_oso (VEC (oso_el) **oso_vector_ptr,
83 struct objfile *objfile,
84 asymbol **oso_sym, asymbol **end_sym,
85 unsigned int nbr_syms)
89 el.name = (*oso_sym)->name;
90 el.mtime = (*oso_sym)->value;
93 el.nbr_syms = nbr_syms;
94 VEC_safe_push (oso_el, *oso_vector_ptr, &el);
97 /* Add symbol SYM to the minimal symbol table of OBJFILE. */
100 macho_symtab_add_minsym (struct objfile *objfile, const asymbol *sym)
102 if (sym->name == NULL || *sym->name == '\0')
104 /* Skip names that don't exist (shouldn't happen), or names
105 that are null strings (may happen). */
109 if (sym->flags & (BSF_GLOBAL | BSF_LOCAL | BSF_WEAK))
112 enum minimal_symbol_type ms_type;
114 /* Bfd symbols are section relative. */
115 symaddr = sym->value + sym->section->vma;
117 if (sym->section == bfd_abs_section_ptr)
119 else if (sym->section->flags & SEC_CODE)
121 if (sym->flags & (BSF_GLOBAL | BSF_WEAK))
124 ms_type = mst_file_text;
126 else if (sym->section->flags & SEC_ALLOC)
128 if (sym->flags & (BSF_GLOBAL | BSF_WEAK))
130 if (sym->section->flags & SEC_LOAD)
135 else if (sym->flags & BSF_LOCAL)
137 /* Not a special stabs-in-elf symbol, do regular
138 symbol processing. */
139 if (sym->section->flags & SEC_LOAD)
140 ms_type = mst_file_data;
142 ms_type = mst_file_bss;
145 ms_type = mst_unknown;
148 return; /* Skip this symbol. */
150 prim_record_minimal_symbol_and_info
151 (sym->name, symaddr, ms_type,
152 gdb_bfd_section_index (objfile->obfd, sym->section),
157 /* Build the minimal symbol table from SYMBOL_TABLE of length
158 NUMBER_OF_SYMBOLS for OBJFILE. Registers OSO filenames found. */
161 macho_symtab_read (struct objfile *objfile,
162 long number_of_symbols, asymbol **symbol_table,
163 VEC (oso_el) **oso_vector_ptr)
166 const asymbol *file_so = NULL;
167 asymbol **oso_file = NULL;
168 unsigned int nbr_syms = 0;
170 /* Current state while reading stabs. */
173 /* Not within an SO part. Only non-debugging symbols should be present,
174 and will be added to the minimal symbols table. */
177 /* First SO read. Introduce an SO section, and may be followed by a second
178 SO. The SO section should contain onl debugging symbols. */
181 /* Second non-null SO found, just after the first one. Means that the first
182 is in fact a directory name. */
185 /* Non-null OSO found. Debugging info are DWARF in this OSO file. */
191 for (i = 0; i < number_of_symbols; i++)
193 const asymbol *sym = symbol_table[i];
194 bfd_mach_o_asymbol *mach_o_sym = (bfd_mach_o_asymbol *)sym;
199 if (mach_o_sym->n_type == N_SO)
201 /* Start of object stab. */
202 if (sym->name == NULL || sym->name[0] == 0)
204 /* Unexpected empty N_SO. */
205 complaint (&symfile_complaints,
206 _("Unexpected empty N_SO stab"));
214 else if (sym->flags & BSF_DEBUGGING)
216 if (mach_o_sym->n_type == N_OPT)
218 /* No complaint for OPT. */
222 /* Debugging symbols are not expected here. */
223 complaint (&symfile_complaints,
224 _("%s: Unexpected debug stab outside SO markers"),
225 objfile_name (objfile));
229 /* Non-debugging symbols go to the minimal symbol table. */
230 macho_symtab_add_minsym (objfile, sym);
236 if (mach_o_sym->n_type == N_SO)
238 if (sym->name == NULL || sym->name[0] == 0)
240 /* Unexpected empty N_SO. */
241 complaint (&symfile_complaints, _("Empty SO section"));
244 else if (state == S_FIRST_SO)
246 /* Second SO stab for the file name. */
251 complaint (&symfile_complaints, _("Three SO in a raw"));
253 else if (mach_o_sym->n_type == N_OSO)
255 if (sym->name == NULL || sym->name[0] == 0)
257 /* Empty OSO. Means that this file was compiled with
260 warning (_("stabs debugging not supported for %s"),
265 /* Non-empty OSO for a Dwarf file. */
266 oso_file = symbol_table + i;
268 state = S_DWARF_FILE;
272 complaint (&symfile_complaints,
273 _("Unexpected stab after SO"));
278 if (mach_o_sym->n_type == N_SO)
280 if (sym->name == NULL || sym->name[0] == 0)
283 if (state == S_DWARF_FILE)
284 macho_register_oso (oso_vector_ptr, objfile,
285 oso_file, symbol_table + i,
291 complaint (&symfile_complaints, _("Missing nul SO"));
296 else if (sym->flags & BSF_DEBUGGING)
298 if (state == S_STAB_FILE)
300 /* FIXME: to be implemented. */
304 switch (mach_o_sym->n_type)
307 if (sym->name == NULL || sym->name[0] == 0)
311 /* Interesting symbol. */
319 complaint (&symfile_complaints,
320 _("unhandled stab for dwarf OSO file"));
326 complaint (&symfile_complaints,
327 _("non-debugging symbol within SO"));
332 if (state != S_NO_SO)
333 complaint (&symfile_complaints, _("missing nul SO"));
336 /* If NAME describes an archive member (ie: ARCHIVE '(' MEMBER ')'),
337 returns the length of the archive name.
338 Returns -1 otherwise. */
341 get_archive_prefix_len (const char *name)
344 int name_len = strlen (name);
346 if (name_len == 0 || name[name_len - 1] != ')')
349 lparen = strrchr (name, '(');
350 if (lparen == NULL || lparen == name)
352 return lparen - name;
355 /* Compare function to qsort OSOs, so that members of a library are
359 oso_el_compare_name (const void *vl, const void *vr)
361 const oso_el *l = (const oso_el *)vl;
362 const oso_el *r = (const oso_el *)vr;
364 return strcmp (l->name, r->name);
367 /* Hash table entry structure for the stabs symbols in the main object file.
368 This is used to speed up lookup for symbols in the OSO. */
370 struct macho_sym_hash_entry
372 struct bfd_hash_entry base;
376 /* Routine to create an entry in the hash table. */
378 static struct bfd_hash_entry *
379 macho_sym_hash_newfunc (struct bfd_hash_entry *entry,
380 struct bfd_hash_table *table,
383 struct macho_sym_hash_entry *ret = (struct macho_sym_hash_entry *) entry;
385 /* Allocate the structure if it has not already been allocated by a
388 ret = (struct macho_sym_hash_entry *) bfd_hash_allocate (table,
393 /* Call the allocation method of the superclass. */
394 ret = (struct macho_sym_hash_entry *)
395 bfd_hash_newfunc ((struct bfd_hash_entry *) ret, table, string);
399 /* Initialize the local fields. */
403 return (struct bfd_hash_entry *) ret;
406 /* Get the value of SYM from the minimal symtab of MAIN_OBJFILE. This is used
407 to get the value of global and common symbols. */
410 macho_resolve_oso_sym_with_minsym (struct objfile *main_objfile, asymbol *sym)
412 /* For common symbol and global symbols, use the min symtab. */
413 struct bound_minimal_symbol msym;
414 const char *name = sym->name;
416 if (name[0] == bfd_get_symbol_leading_char (main_objfile->obfd))
418 msym = lookup_minimal_symbol (name, NULL, main_objfile);
419 if (msym.minsym == NULL)
421 warning (_("can't find symbol '%s' in minsymtab"), name);
425 return BMSYMBOL_VALUE_ADDRESS (msym);
428 /* Add oso file OSO/ABFD as a symbol file. */
431 macho_add_oso_symfile (oso_el *oso, bfd *abfd, const char *name,
432 struct objfile *main_objfile, int symfile_flags)
436 asymbol **symbol_table;
438 struct bfd_hash_table table;
440 struct cleanup *cleanup;
442 /* Per section flag to mark which section have been rebased. */
443 unsigned char *sections_rebased;
445 if (mach_o_debug_level > 0)
447 (_("Loading debugging symbols from oso: %s\n"), oso->name);
449 if (!bfd_check_format (abfd, bfd_object))
451 warning (_("`%s': can't read symbols: %s."), oso->name,
452 bfd_errmsg (bfd_get_error ()));
453 gdb_bfd_unref (abfd);
457 if (abfd->my_archive == NULL && oso->mtime != bfd_get_mtime (abfd))
459 warning (_("`%s': file time stamp mismatch."), oso->name);
460 gdb_bfd_unref (abfd);
464 if (!bfd_hash_table_init_n (&table, macho_sym_hash_newfunc,
465 sizeof (struct macho_sym_hash_entry),
468 warning (_("`%s': can't create hash table"), oso->name);
469 gdb_bfd_unref (abfd);
473 bfd_set_cacheable (abfd, 1);
475 /* Read symbols table. */
476 storage = bfd_get_symtab_upper_bound (abfd);
477 symbol_table = (asymbol **) xmalloc (storage);
478 bfd_canonicalize_symtab (abfd, symbol_table);
480 /* Init section flags. */
481 nbr_sections = bfd_count_sections (abfd);
482 sections_rebased = (unsigned char *) alloca (nbr_sections);
483 for (i = 0; i < nbr_sections; i++)
484 sections_rebased[i] = 0;
486 /* Put symbols for the OSO file in the hash table. */
487 for (symp = oso->oso_sym; symp != oso->end_sym; symp++)
489 const asymbol *sym = *symp;
490 bfd_mach_o_asymbol *mach_o_sym = (bfd_mach_o_asymbol *)sym;
492 switch (mach_o_sym->n_type)
500 if (sym->name == NULL || sym->name[0] == 0)
511 struct macho_sym_hash_entry *ent;
513 ent = (struct macho_sym_hash_entry *)
514 bfd_hash_lookup (&table, sym->name, TRUE, FALSE);
515 if (ent->sym != NULL)
516 complaint (&symfile_complaints,
517 _("Duplicated symbol %s in symbol table"), sym->name);
520 if (mach_o_debug_level > 4)
522 struct gdbarch *arch = get_objfile_arch (main_objfile);
524 (_("Adding symbol %s (addr: %s)\n"),
525 sym->name, paddress (arch, sym->value));
532 /* Relocate symbols of the OSO. */
533 for (i = 0; symbol_table[i]; i++)
535 asymbol *sym = symbol_table[i];
536 bfd_mach_o_asymbol *mach_o_sym = (bfd_mach_o_asymbol *)sym;
538 if (mach_o_sym->n_type & BFD_MACH_O_N_STAB)
540 if ((mach_o_sym->n_type & BFD_MACH_O_N_TYPE) == BFD_MACH_O_N_UNDF
543 /* For common symbol use the min symtab and modify the OSO
547 res = macho_resolve_oso_sym_with_minsym (main_objfile, sym);
550 sym->section = bfd_com_section_ptr;
554 else if ((mach_o_sym->n_type & BFD_MACH_O_N_TYPE) == BFD_MACH_O_N_SECT)
557 asection *sec = sym->section;
558 bfd_mach_o_section *msec;
559 unsigned int sec_type;
561 /* Skip buggy ones. */
562 if (sec == NULL || sections_rebased[sec->index] != 0)
565 /* Only consider regular, non-debugging sections. */
566 msec = bfd_mach_o_get_mach_o_section (sec);
567 sec_type = msec->flags & BFD_MACH_O_SECTION_TYPE_MASK;
568 if ((sec_type == BFD_MACH_O_S_REGULAR
569 || sec_type == BFD_MACH_O_S_ZEROFILL)
570 && (msec->flags & BFD_MACH_O_S_ATTR_DEBUG) == 0)
574 if ((mach_o_sym->n_type & BFD_MACH_O_N_EXT) != 0)
576 /* Use the min symtab for global symbols. */
577 addr = macho_resolve_oso_sym_with_minsym (main_objfile, sym);
581 struct macho_sym_hash_entry *ent;
583 ent = (struct macho_sym_hash_entry *)
584 bfd_hash_lookup (&table, sym->name, FALSE, FALSE);
586 addr = bfd_asymbol_value (ent->sym);
589 /* Adjust the section. */
592 CORE_ADDR res = addr - sym->value;
594 if (mach_o_debug_level > 3)
596 struct gdbarch *arch = get_objfile_arch (main_objfile);
598 (_("resolve sect %s with %s (set to %s)\n"),
599 sec->name, sym->name,
600 paddress (arch, res));
602 bfd_set_section_vma (abfd, sec, res);
603 sections_rebased[sec->index] = 1;
608 /* Mark the section as never rebased. */
609 sections_rebased[sec->index] = 2;
614 bfd_hash_table_free (&table);
616 /* We need to clear SYMFILE_MAINLINE to avoid interractive question
617 from symfile.c:symbol_file_add_with_addrs_or_offsets. */
618 cleanup = make_cleanup_bfd_unref (abfd);
619 symbol_file_add_from_bfd
620 (abfd, name, symfile_flags & ~(SYMFILE_MAINLINE | SYMFILE_VERBOSE), NULL,
621 main_objfile->flags & (OBJF_REORDERED | OBJF_SHARED
622 | OBJF_READNOW | OBJF_USERLOADED),
624 do_cleanups (cleanup);
627 /* Read symbols from the vector of oso files.
629 Note that this function sorts OSO_VECTOR_PTR. */
632 macho_symfile_read_all_oso (VEC (oso_el) **oso_vector_ptr,
633 struct objfile *main_objfile,
637 VEC (oso_el) *vec = *oso_vector_ptr;
640 /* Sort oso by name so that files from libraries are gathered. */
641 qsort (VEC_address (oso_el, vec), VEC_length (oso_el, vec),
642 sizeof (oso_el), oso_el_compare_name);
644 for (ix = 0; VEC_iterate (oso_el, vec, ix, oso);)
648 /* Check if this is a library name. */
649 pfx_len = get_archive_prefix_len (oso->name);
658 std::string archive_name (oso->name, pfx_len);
660 /* Compute number of oso for this archive. */
662 VEC_iterate (oso_el, vec, last_ix, oso2); last_ix++)
664 if (strncmp (oso2->name, archive_name.c_str (), pfx_len) != 0)
668 /* Open the archive and check the format. */
669 archive_bfd = gdb_bfd_open (archive_name.c_str (), gnutarget, -1);
670 if (archive_bfd == NULL)
672 warning (_("Could not open OSO archive file \"%s\""),
673 archive_name.c_str ());
677 if (!bfd_check_format (archive_bfd, bfd_archive))
679 warning (_("OSO archive file \"%s\" not an archive."),
680 archive_name.c_str ());
681 gdb_bfd_unref (archive_bfd);
686 member_bfd = gdb_bfd_openr_next_archived_file (archive_bfd, NULL);
688 if (member_bfd == NULL)
690 warning (_("Could not read archive members out of "
691 "OSO archive \"%s\""), archive_name.c_str ());
692 gdb_bfd_unref (archive_bfd);
697 /* Load all oso in this library. */
698 while (member_bfd != NULL)
701 const char *member_name = member_bfd->filename;
702 int member_len = strlen (member_name);
704 /* If this member is referenced, add it as a symfile. */
705 for (ix2 = ix; ix2 < last_ix; ix2++)
707 oso2 = VEC_index (oso_el, vec, ix2);
710 && strlen (oso2->name) == pfx_len + member_len + 2
711 && !memcmp (member_name, oso2->name + pfx_len + 1,
714 macho_add_oso_symfile (oso2, member_bfd,
715 bfd_get_filename (member_bfd),
716 main_objfile, symfile_flags);
723 member_bfd = gdb_bfd_openr_next_archived_file (archive_bfd,
726 /* Free previous member if not referenced by an oso. */
728 gdb_bfd_unref (prev);
730 for (ix2 = ix; ix2 < last_ix; ix2++)
732 oso_el *oso2 = VEC_index (oso_el, vec, ix2);
734 if (oso2->name != NULL)
735 warning (_("Could not find specified archive member "
736 "for OSO name \"%s\""), oso->name);
744 abfd = gdb_bfd_open (oso->name, gnutarget, -1);
746 warning (_("`%s': can't open to read symbols: %s."), oso->name,
747 bfd_errmsg (bfd_get_error ()));
749 macho_add_oso_symfile (oso, abfd, oso->name, main_objfile,
757 /* DSYM (debug symbols) files contain the debug info of an executable.
758 This is a separate file created by dsymutil(1) and is similar to debug
760 DSYM files are located in a subdirectory. Append DSYM_SUFFIX to the
761 executable name and the executable base name to get the DSYM file name. */
762 #define DSYM_SUFFIX ".dSYM/Contents/Resources/DWARF/"
764 /* Check if a dsym file exists for OBJFILE. If so, returns a bfd for it
765 and return *FILENAMEP with its original xmalloc-ated filename.
766 Return NULL if no valid dsym file is found (FILENAMEP is not used in
770 macho_check_dsym (struct objfile *objfile, char **filenamep)
772 size_t name_len = strlen (objfile_name (objfile));
773 size_t dsym_len = strlen (DSYM_SUFFIX);
774 const char *base_name = lbasename (objfile_name (objfile));
775 size_t base_len = strlen (base_name);
776 char *dsym_filename = (char *) alloca (name_len + dsym_len + base_len + 1);
778 bfd_mach_o_load_command *main_uuid;
779 bfd_mach_o_load_command *dsym_uuid;
781 strcpy (dsym_filename, objfile_name (objfile));
782 strcpy (dsym_filename + name_len, DSYM_SUFFIX);
783 strcpy (dsym_filename + name_len + dsym_len, base_name);
785 if (access (dsym_filename, R_OK) != 0)
788 if (bfd_mach_o_lookup_command (objfile->obfd,
789 BFD_MACH_O_LC_UUID, &main_uuid) == 0)
791 warning (_("can't find UUID in %s"), objfile_name (objfile));
794 dsym_bfd = gdb_bfd_openr (dsym_filename, gnutarget);
795 if (dsym_bfd == NULL)
797 warning (_("can't open dsym file %s"), dsym_filename);
801 if (!bfd_check_format (dsym_bfd, bfd_object))
803 gdb_bfd_unref (dsym_bfd);
804 warning (_("bad dsym file format: %s"), bfd_errmsg (bfd_get_error ()));
808 if (bfd_mach_o_lookup_command (dsym_bfd,
809 BFD_MACH_O_LC_UUID, &dsym_uuid) == 0)
811 warning (_("can't find UUID in %s"), dsym_filename);
812 gdb_bfd_unref (dsym_bfd);
815 if (memcmp (dsym_uuid->command.uuid.uuid, main_uuid->command.uuid.uuid,
816 sizeof (main_uuid->command.uuid.uuid)))
818 warning (_("dsym file UUID doesn't match the one in %s"),
819 objfile_name (objfile));
820 gdb_bfd_unref (dsym_bfd);
823 *filenamep = xstrdup (dsym_filename);
828 macho_symfile_read (struct objfile *objfile, int symfile_flags)
830 bfd *abfd = objfile->obfd;
833 VEC (oso_el) *oso_vector = NULL;
834 struct cleanup *old_chain = make_cleanup (VEC_cleanup (oso_el), &oso_vector);
836 /* Get symbols from the symbol table only if the file is an executable.
837 The symbol table of object files is not relocated and is expected to
838 be in the executable. */
839 if (bfd_get_file_flags (abfd) & (EXEC_P | DYNAMIC))
843 /* Process the normal symbol table first. */
844 storage_needed = bfd_get_symtab_upper_bound (objfile->obfd);
845 if (storage_needed < 0)
846 error (_("Can't read symbols from %s: %s"),
847 bfd_get_filename (objfile->obfd),
848 bfd_errmsg (bfd_get_error ()));
850 if (storage_needed > 0)
852 asymbol **symbol_table;
855 symbol_table = (asymbol **) xmalloc (storage_needed);
856 make_cleanup (xfree, symbol_table);
858 minimal_symbol_reader reader (objfile);
860 symcount = bfd_canonicalize_symtab (objfile->obfd, symbol_table);
863 error (_("Can't read symbols from %s: %s"),
864 bfd_get_filename (objfile->obfd),
865 bfd_errmsg (bfd_get_error ()));
867 macho_symtab_read (objfile, symcount, symbol_table, &oso_vector);
872 /* Try to read .eh_frame / .debug_frame. */
873 /* First, locate these sections. We ignore the result status
874 as it only checks for debug info. */
875 dwarf2_has_info (objfile, NULL);
876 dwarf2_build_frame_info (objfile);
878 /* Check for DSYM file. */
879 dsym_bfd = macho_check_dsym (objfile, &dsym_filename);
880 if (dsym_bfd != NULL)
882 struct bfd_section *asect, *dsect;
884 make_cleanup (xfree, dsym_filename);
886 if (mach_o_debug_level > 0)
887 printf_unfiltered (_("dsym file found\n"));
889 /* Set dsym section size. */
890 for (asect = objfile->obfd->sections, dsect = dsym_bfd->sections;
892 asect = asect->next, dsect = dsect->next)
894 if (strcmp (asect->name, dsect->name) != 0)
896 bfd_set_section_size (dsym_bfd, dsect,
897 bfd_get_section_size (asect));
900 /* Add the dsym file as a separate file. */
901 make_cleanup_bfd_unref (dsym_bfd);
902 symbol_file_add_separate (dsym_bfd, dsym_filename, symfile_flags,
905 /* Don't try to read dwarf2 from main file or shared libraries. */
906 do_cleanups (old_chain);
911 if (dwarf2_has_info (objfile, NULL))
913 /* DWARF 2 sections */
914 dwarf2_build_psymtabs (objfile);
918 if (oso_vector != NULL)
919 macho_symfile_read_all_oso (&oso_vector, objfile, symfile_flags);
921 do_cleanups (old_chain);
925 macho_symfile_relocate (struct objfile *objfile, asection *sectp,
928 bfd *abfd = objfile->obfd;
930 /* We're only interested in sections with relocation
932 if ((sectp->flags & SEC_RELOC) == 0)
935 if (mach_o_debug_level > 0)
936 printf_unfiltered (_("Relocate section '%s' of %s\n"),
937 sectp->name, objfile_name (objfile));
939 return bfd_simple_get_relocated_section_contents (abfd, sectp, buf, NULL);
943 macho_symfile_finish (struct objfile *objfile)
948 macho_symfile_offsets (struct objfile *objfile,
949 const struct section_addr_info *addrs)
952 struct obj_section *osect;
954 /* Allocate section_offsets. */
955 objfile->num_sections = bfd_count_sections (objfile->obfd);
956 objfile->section_offsets = (struct section_offsets *)
957 obstack_alloc (&objfile->objfile_obstack,
958 SIZEOF_N_SECTION_OFFSETS (objfile->num_sections));
959 memset (objfile->section_offsets, 0,
960 SIZEOF_N_SECTION_OFFSETS (objfile->num_sections));
962 /* This code is run when we first add the objfile with
963 symfile_add_with_addrs_or_offsets, when "addrs" not "offsets" are
964 passed in. The place in symfile.c where the addrs are applied
965 depends on the addrs having section names. But in the dyld code
966 we build an anonymous array of addrs, so that code is a no-op.
967 Because of that, we have to apply the addrs to the sections here.
968 N.B. if an objfile slides after we've already created it, then it
969 goes through objfile_relocate. */
971 for (i = 0; i < addrs->num_sections; i++)
973 ALL_OBJFILE_OSECTIONS (objfile, osect)
975 const char *bfd_sect_name = osect->the_bfd_section->name;
977 if (strcmp (bfd_sect_name, addrs->other[i].name) == 0)
979 obj_section_offset (osect) = addrs->other[i].addr;
985 objfile->sect_index_text = 0;
987 ALL_OBJFILE_OSECTIONS (objfile, osect)
989 const char *bfd_sect_name = osect->the_bfd_section->name;
990 int sect_index = osect - objfile->sections;;
992 if (startswith (bfd_sect_name, "LC_SEGMENT."))
994 if (strcmp (bfd_sect_name, "__TEXT") == 0
995 || strcmp (bfd_sect_name, "__TEXT.__text") == 0)
996 objfile->sect_index_text = sect_index;
1000 static const struct sym_fns macho_sym_fns = {
1001 macho_new_init, /* init anything gbl to entire symtab */
1002 macho_symfile_init, /* read initial info, setup for sym_read() */
1003 macho_symfile_read, /* read a symbol file into symtab */
1004 NULL, /* sym_read_psymbols */
1005 macho_symfile_finish, /* finished with file, cleanup */
1006 macho_symfile_offsets, /* xlate external to internal form */
1007 default_symfile_segments, /* Get segment information from a file. */
1009 macho_symfile_relocate, /* Relocate a debug section. */
1010 NULL, /* sym_get_probes */
1014 /* -Wmissing-prototypes */
1015 extern initialize_file_ftype _initialize_machoread;
1018 _initialize_machoread (void)
1020 add_symtab_fns (bfd_target_mach_o_flavour, &macho_sym_fns);
1022 add_setshow_zuinteger_cmd ("mach-o", class_obscure,
1023 &mach_o_debug_level,
1024 _("Set if printing Mach-O symbols processing."),
1025 _("Show if printing Mach-O symbols processing."),
1027 &setdebuglist, &showdebuglist);