diff options
author | J.T. Conklin <jtc@acorntoolworks.com> | 1995-08-01 20:14:27 +0000 |
---|---|---|
committer | J.T. Conklin <jtc@acorntoolworks.com> | 1995-08-01 20:14:27 +0000 |
commit | 2b57629364528ef2fd913154e58f626123d51f1c (patch) | |
tree | 649b55da772d6aa5e9190ebcfa4bee6a5a31f998 /gdb/coffread.c | |
parent | a1bdcf913a6f7ee2bbb715dd48b1a75e10a43414 (diff) | |
download | gdb-2b57629364528ef2fd913154e58f626123d51f1c.zip gdb-2b57629364528ef2fd913154e58f626123d51f1c.tar.gz gdb-2b57629364528ef2fd913154e58f626123d51f1c.tar.bz2 |
* configure.in: Check for working mmap, ansi headers, string.h,
strings.h, and memory.h.
* configure: Regenerated.
* gdb_stat.h: New file, "portable" <sys/stat.h>.
* gdb_string.h: New file, "portable" <string.h>.
* altos-xdep.c, arm-tdep.c, arm-xdep.c, convex-tdep.c,
convex-xdep.c, coredep.c, cxux-nat.c, dbxread.c, exec.c,
gould-xdep.c, hppa-tdep.c, i386aix-nat.c, i386b-nat.c,
i386mach-nat.c, i386v-nat.c, infptrace.c, m88k-nat.c, main.c,
mdebugread.c, objfiles.c, os9kread.c, procfs.c, pyr-xdep.c,
rs6000-nat.c, source.c, standalone.c, stuff.c, sun386-nat.c,
symfile.c, symm-nat.c, symm-tdep.c, symtab.c, top.c, ultra3-nat.c,
ultra3-xdep.c, umax-xdep.c, xcoffread.c: Include "gdb_stat.h"
instead of <sys/stat.h>.
* alpha-tdep.c, breakpoint.c, buildsym.c, c-typeprint.c,
ch-typeprint.c, coffread.c, command.c, core-sol2.c, core-svr4.c,
core.c, corelow.c, cp-valprint.c, dbxread.c, dcache.c, demangle.c,
dpx2-nat.c, dstread.c, dwarfread.c, elfread.c, environ.c, eval.c,
exec.c, f-lang.c, f-typeprint.c, f-valprint.c, findvar.c,
fork-child.c, gdbtypes.c, hpread.c, i386-tdep.c, infcmd.c,
inflow.c, infptrace.c, infrun.c, irix5-nat.c, language.c,
m2-typeprint.c, main.c, mdebugread.c, minsyms.c, mipsread.c,
monitor.c, nlmread.c, objfiles.c, os9kread.c, osfsolib.c, parse.c,
printcmd.c, procfs.c, regex.c, remote-adapt.c, remote-arc.c,
remote-array.c, remote-bug.c, remote-e7000.c, remote-eb.c,
remote-es.c, remote-hms.c, remote-mm.c, remote-os9k.c,
remote-pa.c, remote-sim.c, remote-st.c, remote-udi.c,
remote-utils.c, remote-vx.c, remote-vx29k.c, remote-vx68.c,
remote-vx960.c, remote-vxmips.c, remote-vxsparc.c, remote.c,
solib.c, somread.c, source.c, stabsread.c, stack.c, symfile.c,
symmisc.c, symtab.c, target.c, top.c, typeprint.c, utils.c,
valarith.c, valops.c, valprint.c, values.c, xcoffread.c: Include
"gdb_string.h" instead of <string.h>.
* gdbtk.c: Likewise.
* config/xm-sysv4.h, i386/xm-ptx.h, m68k/xm-sun3os4.h,
sparc/xm-sun4os4.h (HAVE_MMAP): Removed.
* config/xm-lynx.h, config/i386/xm-ptx.h,
config/m68k/nm-apollo68b.h, config/m68k/xm-hp300hpux.h,
config/mips/xm-irix3.h, config/mips/xm-mips.h,
config/mips/xm-news-mips.h, config/mips/xm-riscos.h,
config/pa/hppah.h, config/rs6000/xm-rs6000.h,
config/sparc/xm-sun4os4.h, config/sparc/xm-sun4sol2.h,
config/vax/xm-vaxbsd.h, config/vax/xm-vaxult.h,
config/vax/xm-vaxult2.h (MEM_FNS_DECLARED): Removed.
* config/mips/xm-irix3.h, config/mips/xm-mips.h,
config/pa/xm-hppah.h (memcpy, memset): Removed declarations.
Diffstat (limited to 'gdb/coffread.c')
-rw-r--r-- | gdb/coffread.c | 102 |
1 files changed, 55 insertions, 47 deletions
diff --git a/gdb/coffread.c b/gdb/coffread.c index c4f06e1..ec7aef2 100644 --- a/gdb/coffread.c +++ b/gdb/coffread.c @@ -27,7 +27,8 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ #include "bfd.h" #include <obstack.h> -#include <string.h> +#include "gdb_string.h" +#include <ctype.h> #include "coff/internal.h" /* Internal format of COFF symbols in BFD */ #include "libcoff.h" /* FIXME secret internal data from BFD */ @@ -44,9 +45,10 @@ struct coff_symfile_info { file_ptr min_lineno_offset; /* Where in file lowest line#s are */ file_ptr max_lineno_offset; /* 1+last byte of line#s in file */ - asection *stabsect; /* Section pointer for .stab section */ + CORE_ADDR textaddr; /* Addr of .text section. */ + unsigned int textsize; /* Size of .text section. */ + struct stab_section_list *stabsects; /* .stab sections. */ asection *stabstrsect; /* Section pointer for .stab section */ - asection *stabindexsect; /* Section pointer for .stab.index section */ char *stabstrdata; }; @@ -132,13 +134,6 @@ static unsigned local_auxesz; static struct symbol *opaque_type_chain[HASHSIZE]; -#if 0 -/* The type of the function we are currently reading in. This is - used by define_symbol to record the type of arguments to a function. */ - -struct type *in_function_type; -#endif - /* Complaints about various problems in the file being read */ struct complaint ef_complaint = @@ -212,6 +207,8 @@ static int init_lineno PARAMS ((bfd *, long, int)); static char *getsymname PARAMS ((struct internal_syment *)); +static char *coff_getfilename PARAMS ((union internal_auxent *)); + static void free_stringtab PARAMS ((void)); static int init_stringtab PARAMS ((bfd *, long)); @@ -263,25 +260,55 @@ static void coff_locate_sections PARAMS ((bfd *, asection *, PTR)); -kingdon). */ static void -coff_locate_sections (ignore_abfd, sectp, csip) - bfd *ignore_abfd; +coff_locate_sections (abfd, sectp, csip) + bfd *abfd; asection *sectp; PTR csip; { register struct coff_symfile_info *csi; + const char *name; csi = (struct coff_symfile_info *) csip; - if (STREQ (sectp->name, ".stab")) + name = bfd_get_section_name (abfd, sectp); + if (STREQ (name, ".text")) + { + csi->textaddr = bfd_section_vma (abfd, sectp); + csi->textsize += bfd_section_size (abfd, sectp); + } + else if (strncmp (name, ".text", sizeof ".text" - 1) == 0) { - csi->stabsect = sectp; + csi->textsize += bfd_section_size (abfd, sectp); } - else if (STREQ (sectp->name, ".stabstr")) + else if (STREQ (name, ".stabstr")) { csi->stabstrsect = sectp; } - else if (STREQ (sectp->name, ".stab.index")) + else if (strncmp (name, ".stab", sizeof ".stab" - 1) == 0) { - csi->stabindexsect = sectp; + const char *s; + + /* We can have multiple .stab sections if linked with + --split-by-reloc. */ + for (s = name + sizeof ".stab" - 1; *s != '\0'; s++) + if (! isdigit (*s)) + break; + if (*s == '\0') + { + struct stab_section_list *n, **pn; + + n = ((struct stab_section_list *) + xmalloc (sizeof (struct stab_section_list))); + n->section = sectp; + n->next = NULL; + for (pn = &csi->stabsects; *pn != NULL; pn = &(*pn)->next) + ; + *pn = n; + + /* This will be run after coffstab_build_psymtabs is called + in coff_symfile_read, at which point we no longer need + the information. */ + make_cleanup (free, n); + } } } @@ -529,17 +556,15 @@ static void coff_symfile_init (objfile) struct objfile *objfile; { - bfd *abfd = objfile->obfd; - /* Allocate struct to keep track of stab reading. */ objfile->sym_stab_info = (PTR) - xmmalloc (objfile -> md, sizeof (struct dbx_symfile_info)); + xmmalloc (objfile->md, sizeof (struct dbx_symfile_info)); memset ((PTR) objfile->sym_stab_info, 0, sizeof (struct dbx_symfile_info)); /* Allocate struct to keep track of the symfile */ - objfile -> sym_private = xmmalloc (objfile -> md, - sizeof (struct coff_symfile_info)); + objfile->sym_private = xmmalloc (objfile->md, + sizeof (struct coff_symfile_info)); memset (objfile->sym_private, 0, sizeof (struct coff_symfile_info)); @@ -607,7 +632,7 @@ coff_symfile_read (objfile, section_offsets, mainline) int symtab_offset; int stringtab_offset; struct cleanup *back_to; - int stabsize, stabstrsize; + int stabstrsize; info = (struct coff_symfile_info *) objfile -> sym_private; dbxinfo = (struct dbx_symfile_info *) objfile->sym_stab_info; @@ -681,19 +706,19 @@ coff_symfile_read (objfile, section_offsets, mainline) bfd_map_over_sections (abfd, coff_locate_sections, (PTR) info); - if (info->stabsect) + if (info->stabsects) { /* FIXME: dubious. Why can't we use something normal like bfd_get_section_contents? */ bfd_seek (abfd, abfd->where, 0); - stabsize = bfd_section_size (abfd, info->stabsect); stabstrsize = bfd_section_size (abfd, info->stabstrsect); coffstab_build_psymtabs (objfile, section_offsets, mainline, - info->stabsect->filepos, stabsize, + info->textaddr, info->textsize, + info->stabsects, info->stabstrsect->filepos, stabstrsize); } @@ -1211,7 +1236,7 @@ getsymname (symbol_entry) only the last component of the name. Result is in static storage and is only good for temporary use. */ -char * +static char * coff_getfilename (aux_entry) union internal_auxent *aux_entry; { @@ -1300,6 +1325,8 @@ enter_linenos (file_offset, first_line, last_line, section_offsets) register char *rawptr; struct internal_lineno lptr; + if (!linetab) + return ; if (file_offset < linetab_offset) { complain (&lineno_complaint, file_offset); @@ -1442,22 +1469,8 @@ process_coff_symbol (cs, aux, section_offsets, objfile) if (ISFCN (cs->c_type)) { SYMBOL_VALUE (sym) += ANOFFSET (section_offsets, SECT_OFF_TEXT); -#if 0 - /* FIXME: This has NOT been tested. The DBX version has.. */ - /* Generate a template for the type of this function. The - types of the arguments will be added as we read the symbol - table. */ - struct type *new = (struct type *) - obstack_alloc (&objfile->symbol_obstack, sizeof (struct type)); - - memcpy (new, lookup_function_type (decode_function_type (cs, cs->c_type, aux)), - sizeof(struct type)); - SYMBOL_TYPE (sym) = new; - in_function_type = SYMBOL_TYPE(sym); -#else SYMBOL_TYPE(sym) = lookup_function_type (decode_function_type (cs, cs->c_type, aux)); -#endif SYMBOL_CLASS (sym) = LOC_BLOCK; if (cs->c_sclass == C_STAT) @@ -1513,11 +1526,6 @@ process_coff_symbol (cs, aux, section_offsets, objfile) case C_ARG: SYMBOL_CLASS (sym) = LOC_ARG; -#if 0 - /* FIXME: This has not been tested. */ - /* Add parameter to function. */ - add_param_to_type(&in_function_type,sym); -#endif add_symbol_to_list (sym, &local_symbols); #if !defined (BELIEVE_PCC_PROMOTION) if (TARGET_BYTE_ORDER == BIG_ENDIAN) @@ -2102,7 +2110,7 @@ coff_symfile_offsets (objfile, addr) section_offsets = (struct section_offsets *) obstack_alloc (&objfile -> psymbol_obstack, sizeof (struct section_offsets) - + sizeof (section_offsets->offsets) * (SECT_OFF_MAX-1)); + + sizeof (section_offsets->offsets) * SECT_OFF_MAX); for (i = 0; i < SECT_OFF_MAX; i++) ANOFFSET (section_offsets, i) = addr; |