1999-04-16 09:35:26 +08:00
|
|
|
|
/* Read coff symbol tables and convert to internal format, for GDB.
|
2001-03-06 16:22:02 +08:00
|
|
|
|
Copyright 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996,
|
2004-02-07 Elena Zannoni <ezannoni@redhat.com>
* buildsym.c (free_pending_blocks, finish_block)
(record_pending_block, make_blockvector, end_symtab): Replace
symbol_obstack with objfile_obstack.
* coffread.c (process_coff_symbol, coff_read_struct_type)
(coff_read_enum_type): Ditto.
* cp-namespace.c (initialize_namespace_symtab)
(check_one_possible_namespace_symbol): Ditto.
* dwarf2read.c (new_symbol, dwarf2_const_value, macro_start_file)
(dwarf2_symbol_mark_computed): Ditto.
* dwarfread.c (enum_type, new_symbol, synthesize_typedef): Ditto.
* elfread.c (elf_symtab_read): Ditto.
* hpread.c (hpread_symfile_init, hpread_symfile_init)
(hpread_read_enum_type, hpread_read_function_type)
(hpread_read_doc_function_type, hpread_process_one_debug_symbol):
Ditto.
* jv-lang.c (get_java_class_symtab, add_class_symbol)
(java_link_class_type): Ditto.
* mdebugread.c (parse_symbol, psymtab_to_symtab_1, new_symtab)
(new_symbol): Ditto.
* minsyms.c (install_minimal_symbols): Ditto.
* objfiles.c (allocate_objfile): Remove init of symbol_obstack.
(terminate_minimal_symbol_table): Replace symbol_obstack with
objfile_obstack.
(free_objfile): Remove freeing of symbol_obstack.
* objfiles.h: Remove symbol_obstack field.
* pa64solib.c (add_to_solist): Replace symbol_obstack with
objfile_obstack.
* solib-sunos.c (allocate_rt_common_objfile): Remove init of
symbol_obstack.
(solib_add_common_symbols): Replace symbol_obstack with
objfile_obstack.
* somsolib.c (som_solib_add): Ditto.
* stabsread.c (patch_block_stabs, define_symbol, read_enum_type)
(common_block_start, common_block_end): Ditto.
* symfile.c (reread_symbols): Remove freeing and init of
symbol_obstack.
(allocate_symtab): Rename symbol_obstack to objfile_obstack.
* symfile.h: Update comment.
* symmisc.c (print_objfile_statistics): Remove symbol_obstack
stats printing.
* symtab.c (symbol_set_names): Replace symbol_obstack with
objfile_obstack.
* symtab.h (struct general_symbol_info, struct minimal_symbol):
Update comments.
* xcoffread.c (read_xcoff_symtab, SYMBOL_DUP, SYMNAME_ALLOC)
(init_stringtab, xcoff_initial_scan): Replace symbol_obstack with
objfile_obstack.
2004-02-08 07:13:47 +08:00
|
|
|
|
1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004
|
1999-07-08 04:19:36 +08:00
|
|
|
|
Free Software Foundation, Inc.
|
1999-04-16 09:35:26 +08:00
|
|
|
|
Contributed by David D. Johnson, Brown University (ddj@cs.brown.edu).
|
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
This file is part of GDB.
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
|
|
|
it under the terms of the GNU General Public License as published by
|
|
|
|
|
the Free Software Foundation; either version 2 of the License, or
|
|
|
|
|
(at your option) any later version.
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
|
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
|
GNU General Public License for more details.
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
|
|
|
along with this program; if not, write to the Free Software
|
|
|
|
|
Foundation, Inc., 59 Temple Place - Suite 330,
|
|
|
|
|
Boston, MA 02111-1307, USA. */
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
#include "defs.h"
|
|
|
|
|
#include "symtab.h"
|
|
|
|
|
#include "gdbtypes.h"
|
|
|
|
|
#include "demangle.h"
|
|
|
|
|
#include "breakpoint.h"
|
|
|
|
|
|
|
|
|
|
#include "bfd.h"
|
2002-07-29 Andrew Cagney <ac131313@redhat.com>
* gdb_obstack.h: New file.
* symtab.h: Include "gdb_obstack.h" instead of "obstack.h".
(obstack_chunk_alloc, obstack_chunk_free): Delete macros.
* objfiles.h: Include "gdb_obstack.h".
* Makefile.in (gdb_obstack_h): Define.
(symtab_h): Add $(gdb_obstack_h).
(objfiles_h): Add $(gdb_obstack_h).
* objfiles.c: Include "gdb_obstack.h" instead of "obstack.h".
* macrotab.c, cp-valprint.c, dbxread.c: Ditto.
* ch-typeprint.c, ch-valprint.c, dstread.c: Ditto.
* macroexp.c, p-typeprint.c, stabsread.c: Ditto.
* symtab.c, f-typeprint.c, mdebugread.c: Ditto.
* p-valprint.c, symmisc.c, typeprint.c: Ditto.
* symfile.c, coffread.c, c-typeprint.c: Ditto.
* buildsym.c, bcache.c, ada-typeprint.c: Ditto.
* Makefile.in (bcache.o): Update dependencies.
(buildsym.o, c-typeprint.o, ch-typeprint.o): Ditto.
(ch-valprint.o, coffread.o, cp-valprint.o): Ditto.
(dbxread.o, dstread.o, f-typeprint.o): Ditto.
(objfiles.o, p-typeprint.o, p-valprint.o): Ditto.
(stabsread.o, symfile.o, symmisc.o): Ditto.
(symtab.o, typeprint.o, macroexp.o): Ditto.
(macrotab.o, mdebugread.o): Ditto.
(f_lang_h, coff_sym_h, coff_symconst_h): Define.
(coff_ecoff_h, aout_aout64_h): Define.
(aout_stabs_gnu_h, libaout_h): Define.
2002-07-30 06:55:26 +08:00
|
|
|
|
#include "gdb_obstack.h"
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
#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 */
|
|
|
|
|
#include "objfiles.h"
|
|
|
|
|
#include "buildsym.h"
|
|
|
|
|
#include "gdb-stabs.h"
|
|
|
|
|
#include "stabsread.h"
|
|
|
|
|
#include "complaints.h"
|
|
|
|
|
#include "target.h"
|
2001-03-26 10:50:46 +08:00
|
|
|
|
#include "gdb_assert.h"
|
2003-02-19 David Carlton <carlton@math.stanford.edu>
* Makefile.in (SFILES): Add block.c.
(block_h): New.
(COMMON_OBS): Add block.o.
(block.o): New.
(x86-64-tdep.o): Add $(block_h).
(values.o, valops.o, tracepoint.o, symtab.o, symmisc.o, symfile.o)
(stack.o, printcmd.o, p-exp.tab.o, parse.o, objfiles.o)
(objc-exp.tab.o, objc-lang.o, nlmread.o, mips-tdep.o, mdebugread.o)
(m2-exp.tab.o, linespec.o, jv-lang.o, jv-exp.tab.o, infcmd.o)
(f-valprint.o, findvar.o, f-exp.tab.o, expprint.o, coffread.o)
(c-exp.tab.o, buildsym.o, breakpoint.o, blockframe.o, ax-gdb.o)
(alpha-tdep.o, ada-lang.o, ada-exp.tab.o, mi-cmd-stack.o): Ditto.
* value.h: Add opaque declaration for struct block.
* parser-defs.h, objc-lang.h, buildsym.h, breakpoint.h: Ditto.
* ada-lang.h: Ditto.
* x86-64-tdep.c: #include "block.h"
* values.c, valops.c, tracepoint.c, symtab.c, symmisc.c: Ditto.
* symfile.c, stack.c, printcmd.c, p-exp.y, parse.c: Ditto.
* objfiles.c, objc-exp.y, objc-lang.c, nlmread.c: Ditto.
* mips-tdep.c, mdebugread.c, m2-exp.y, linespec.c: Ditto.
* jv-lang.c, jv-exp.y, infcmd.c, f-valprint.c: Ditto.
* findvar.c, f-exp.y, expprint.c, coffread.c, c-exp.y: Ditto.
* buildsym.c, breakpoint.c, blockframe.c, ax-gdb.c: Ditto.
* alpha-tdep.c, ada-lang.c, ada-exp.y: Ditto.
* blockframe.c (blockvector_for_pc_sect): Move to "block.c".
(blockvector_for_pc, block_for_pc_sect, block_for_pc): Ditto.
* symtab.c (block_function): Ditto.
(contained_in): Ditto.
* frame.h: Move block_for_pc and block_for_pc_sect declarations to
block.h. Add opaque declaration for struct block.
* symtab.h: Move block_function and contained_in declarations to
block.h. Add opaque declarations for struct block, struct
blockvector.
(struct block): Move to block.h.
(struct blockvector): Ditto.
(BLOCK_START, BLOCK_END, BLOCK_FUNCTION, BLOCK_SUPERBLOCK)
(BLOCK_GCC_COMPILED, BLOCK_HASHTABLE, BLOCK_NSYMS, BLOCK_SYM)
(BLOCK_BUCKETS, BLOCK_BUCKET, BLOCK_HASHTABLE_SIZE)
(ALL_BLOCK_SYMBOLS, BLOCK_SHOULD_SORT, BLOCKVECTOR_NBLOCKS)
(BLOCKVECTOR_BLOCK, GLOBAL_BLOCK, STATIC_BLOCK, FIRST_LOCAL_BLOCK):
Ditto.
* block.c: New file.
* block.h: New file.
2003-02-19 David Carlton <carlton@math.stanford.edu>
* mi-cmd-stack.c: #include "block.h"
2003-02-20 08:01:07 +08:00
|
|
|
|
#include "block.h"
|
2003-06-11 David Carlton <carlton@bactrian.org>
* dictionary.h: New.
* dictionary.c: New.
* block.h: Add opaque declaration for struct dictionary.
(struct block): Add 'dict' member; delete 'hashtable', 'nsyms',
'sym' members.
(BLOCK_DICT): New macro.
Delete macros BLOCK_HASHTABLE, BLOCK_NSYMS, BLOCK_SYM,
BLOCK_BUCKETS, BLOCK_BUCKET, BLOCK_HASHTABLE_SIZE,
BLOCK_SHOULD_SORT.
(ALL_BLOCK_SYMBOLS): Update definition.
* Makefile.in (SFILES): Add dictionary.c.
(dictionary_h): New.
(COMMON_OBS): Add dictionary.o.
(dictionary.o): New.
(ada-lang.o): Depend on dictionary_h.
(buildsym.o, coffread.o, jv-lang.o, mdebugread.o, objfiles.o)
(stack.o, symmisc.o, symtab.o, tracepoint.o, valops.o)
(mi-cmd-stack.o): Ditto.
(gdbtk-cmds.o): Update dependencies.
(gdbtk-stack.o): Ditto.
* ada-lang.c: Include dictionary.h.
(symtab_for_sym): Update uses of ALL_BLOCK_SYMBOLS.
(fill_in_ada_prototype, debug_print_block): Ditto.
(ada_add_block_symbols): Update uses of ALL_BLOCK_SYMBOLS; replace
explicit iteration by use of ALL_BLOCK_SYMBOLS. Delete variable
'is_sorted'.
* mdebugread.c: Include dictionary.h.
(struct parse_stack): Delete 'maxsyms' member.
(parse_symbol): Update calls to new_block. Delete calls to
shrink_block. Use dictionary methods.
(psymtab_to_symtab_1): Delete calls to sort_symtab_syms.
Update calls to new_symtab. Don't maintain maxsyms data.
(mylookup_symbol): Update use of ALL_BLOCK_SYMBOLS.
(add_symbol): Just call dict_add_symbol.
(new_symtab): Delete 'maxsyms' argument.
(new_symtab): Update calls to new_block.
(new_block): Delete 'maxsyms' argument; add 'function' argument.
(shrink_block): Delete function.
(fixup_sigtramp): Update call to new_block. Add symbol via
dict_add_symbol.
* jv-lang.c: Include dictionary.h.
(get_java_class_symtab): Set the BLOCK_DICT of the blocks
appropriately. Set class_symtab->free_func. Make sure the
blockvector is big enough to hold two blocks.
(add_class_symtab_symbol): Use dictionary methods.
(free_class_block): New function.
(type_from_class): Replace explicit iteration by
ALL_BLOCK_SYMBOLS.
* symtab.h (struct symtab): Replace 'free_ptr' method by
'free_func'.
* dwarf2read.c (psymtab_to_symtab_1): Delete call to
sort_symtab_syms.
* dwarfread.c (psymtab_to_symtab_1): Delete call to
sort_symtab_syms.
* coffread.c (coff_symfile_read): Delete call to sort_symtab_syms.
Include dictionary.h.
(patch_opaque_types): Update use of ALL_BLOCK_SYMBOLS.
* dbxread.c (dbx_psymtab_to_symtab_1): Delete call to
sort_symtab_syms.
* objfiles.c: Include dictionary.h.
(objfile_relocate): Update use of ALL_BLOCK_SYMBOLS.
* buildsym.c: Include dictionary.h.
(finish_block): Use dictionary methods.
(end_symtab): Set free_func to NULL, not free_ptr.
* tracepoint.c: Include dictionary.h.
(add_local_symbols): Update use of ALL_BLOCK_SYMBOLS.
(scope_info): Ditto.
* stack.c: Include dictionary.h.
(print_block_frame_locals): Update use of ALL_BLOCK_SYMBOLS.
(print_block_frame_labels, print_frame_arg_vars)
(print_frame_args): Ditto.
* symmisc.c (free_symtab_block): Use dictionary methods.
(dump_symtab): Ditto.
(free_symtab): Replace use of 'free_ptr' by 'free_func'.
Include dictionary.h.
* symfile.h: Delete declarations of sort_block_syms,
sort_symtab_syms.
* symfile.c (sort_block_syms): Delete.
(sort_symtab_syms): Delete.
* symtab.c: Include dictionary.h.
(lookup_block_symbol): Use dictionary iterators.
(find_pc_sect_symtab): Update use of ALL_BLOCK_SYMBOLS.
(search_symbols, make_symbol_completion_list): Ditto.
(make_symbol_overload_list): Ditto.
* valops.c (value_of_local): Use dict_empty.
Include dictionary.h.
2003-06-11 David Carlton <carlton@bactrian.org>
* generic/gdbtk-stack.c: Include dictionary.h.
(gdb_block_vars): Update use of ALL_BLOCK_SYMBOLS.
(gdb_get_blocks, gdb_get_vars_command): Ditto.
* generic/gdbtk-cmds.c: Include dictionary.h.
(gdb_listfuncs): Update use of ALL_BLOCK_SYMBOLS.
2003-06-11 David Carlton <carlton@bactrian.org>
* mi-cmd-stack.c: Include dictionary.h.
(list_args_or_locals): Update use of ALL_BLOCK_SYMBOLS.
2003-06-12 07:29:49 +08:00
|
|
|
|
#include "dictionary.h"
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
2003-02-20 11:12:46 +08:00
|
|
|
|
#include "coff-pe-read.h"
|
|
|
|
|
|
2000-05-28 09:12:42 +08:00
|
|
|
|
extern void _initialize_coffread (void);
|
1999-05-26 02:09:09 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
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 */
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
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 */
|
|
|
|
|
char *stabstrdata;
|
|
|
|
|
};
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
/* Translate an external name string into a user-visible name. */
|
|
|
|
|
#define EXTERNAL_NAME(string, abfd) \
|
|
|
|
|
(string[0] == bfd_get_symbol_leading_char(abfd)? string+1: string)
|
|
|
|
|
|
|
|
|
|
/* To be an sdb debug type, type must have at least a basic or primary
|
|
|
|
|
derived type. Using this rather than checking against T_NULL is
|
|
|
|
|
said to prevent core dumps if we try to operate on Michael Bloom
|
|
|
|
|
dbx-in-coff file. */
|
|
|
|
|
|
|
|
|
|
#define SDB_TYPE(type) (BTYPE(type) | (type & N_TMASK))
|
|
|
|
|
|
|
|
|
|
/* Core address of start and end of text of current source file.
|
|
|
|
|
This comes from a ".text" symbol where x_nlinno > 0. */
|
|
|
|
|
|
|
|
|
|
static CORE_ADDR current_source_start_addr;
|
|
|
|
|
static CORE_ADDR current_source_end_addr;
|
|
|
|
|
|
|
|
|
|
/* The addresses of the symbol table stream and number of symbols
|
|
|
|
|
of the object file we are reading (as copied into core). */
|
|
|
|
|
|
|
|
|
|
static bfd *nlist_bfd_global;
|
|
|
|
|
static int nlist_nsyms_global;
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* Pointers to scratch storage, used for reading raw symbols and auxents. */
|
|
|
|
|
|
|
|
|
|
static char *temp_sym;
|
|
|
|
|
static char *temp_aux;
|
|
|
|
|
|
|
|
|
|
/* Local variables that hold the shift and mask values for the
|
|
|
|
|
COFF file that we are currently reading. These come back to us
|
|
|
|
|
from BFD, and are referenced by their macro names, as well as
|
|
|
|
|
internally to the BTYPE, ISPTR, ISFCN, ISARY, ISTAG, and DECREF
|
|
|
|
|
macros from include/coff/internal.h . */
|
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
static unsigned local_n_btmask;
|
|
|
|
|
static unsigned local_n_btshft;
|
|
|
|
|
static unsigned local_n_tmask;
|
|
|
|
|
static unsigned local_n_tshift;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
#define N_BTMASK local_n_btmask
|
|
|
|
|
#define N_BTSHFT local_n_btshft
|
|
|
|
|
#define N_TMASK local_n_tmask
|
|
|
|
|
#define N_TSHIFT local_n_tshift
|
1999-07-08 04:19:36 +08:00
|
|
|
|
|
1999-04-16 09:35:26 +08:00
|
|
|
|
/* Local variables that hold the sizes in the file of various COFF structures.
|
|
|
|
|
(We only need to know this to read them from the file -- BFD will then
|
|
|
|
|
translate the data in them, into `internal_xxx' structs in the right
|
|
|
|
|
byte order, alignment, etc.) */
|
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
static unsigned local_linesz;
|
|
|
|
|
static unsigned local_symesz;
|
|
|
|
|
static unsigned local_auxesz;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
/* This is set if this is a PE format file. */
|
|
|
|
|
|
|
|
|
|
static int pe_file;
|
|
|
|
|
|
|
|
|
|
/* Chain of typedefs of pointers to empty struct/union types.
|
|
|
|
|
They are chained thru the SYMBOL_VALUE_CHAIN. */
|
|
|
|
|
|
|
|
|
|
static struct symbol *opaque_type_chain[HASHSIZE];
|
|
|
|
|
|
|
|
|
|
/* Simplified internal version of coff symbol table information */
|
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
struct coff_symbol
|
|
|
|
|
{
|
|
|
|
|
char *c_name;
|
|
|
|
|
int c_symnum; /* symbol number of this entry */
|
|
|
|
|
int c_naux; /* 0 if syment only, 1 if syment + auxent, etc */
|
|
|
|
|
long c_value;
|
|
|
|
|
int c_sclass;
|
|
|
|
|
int c_secnum;
|
|
|
|
|
unsigned int c_type;
|
|
|
|
|
};
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
2000-05-28 09:12:42 +08:00
|
|
|
|
extern void stabsread_clear_cache (void);
|
1999-08-17 03:57:19 +08:00
|
|
|
|
|
2000-05-28 09:12:42 +08:00
|
|
|
|
static struct type *coff_read_struct_type (int, int, int);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
2000-05-28 09:12:42 +08:00
|
|
|
|
static struct type *decode_base_type (struct coff_symbol *,
|
|
|
|
|
unsigned int, union internal_auxent *);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
2000-05-28 09:12:42 +08:00
|
|
|
|
static struct type *decode_type (struct coff_symbol *, unsigned int,
|
|
|
|
|
union internal_auxent *);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
2000-05-28 09:12:42 +08:00
|
|
|
|
static struct type *decode_function_type (struct coff_symbol *,
|
|
|
|
|
unsigned int,
|
|
|
|
|
union internal_auxent *);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
2000-05-28 09:12:42 +08:00
|
|
|
|
static struct type *coff_read_enum_type (int, int, int);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
2000-05-28 09:12:42 +08:00
|
|
|
|
static struct symbol *process_coff_symbol (struct coff_symbol *,
|
|
|
|
|
union internal_auxent *,
|
|
|
|
|
struct objfile *);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
2000-05-28 09:12:42 +08:00
|
|
|
|
static void patch_opaque_types (struct symtab *);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
2000-05-28 09:12:42 +08:00
|
|
|
|
static void enter_linenos (long, int, int, struct objfile *);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
2000-05-28 09:12:42 +08:00
|
|
|
|
static void free_linetab (void);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
2000-05-22 17:02:23 +08:00
|
|
|
|
static void free_linetab_cleanup (void *ignore);
|
|
|
|
|
|
2000-05-28 09:12:42 +08:00
|
|
|
|
static int init_lineno (bfd *, long, int);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
2000-05-28 09:12:42 +08:00
|
|
|
|
static char *getsymname (struct internal_syment *);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
2000-05-28 09:12:42 +08:00
|
|
|
|
static char *coff_getfilename (union internal_auxent *);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
2000-05-28 09:12:42 +08:00
|
|
|
|
static void free_stringtab (void);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
2000-05-22 17:02:23 +08:00
|
|
|
|
static void free_stringtab_cleanup (void *ignore);
|
|
|
|
|
|
2000-05-28 09:12:42 +08:00
|
|
|
|
static int init_stringtab (bfd *, long);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
2000-05-28 09:12:42 +08:00
|
|
|
|
static void read_one_sym (struct coff_symbol *,
|
|
|
|
|
struct internal_syment *, union internal_auxent *);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
2000-05-28 09:12:42 +08:00
|
|
|
|
static void coff_symtab_read (long, unsigned int, struct objfile *);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
/* We are called once per section from coff_symfile_read. We
|
|
|
|
|
need to examine each section we are passed, check to see
|
|
|
|
|
if it is something we are interested in processing, and
|
|
|
|
|
if so, stash away some access information for the section.
|
|
|
|
|
|
|
|
|
|
FIXME: The section names should not be hardwired strings (what
|
|
|
|
|
should they be? I don't think most object file formats have enough
|
|
|
|
|
section flags to specify what kind of debug section it is
|
|
|
|
|
-kingdon). */
|
|
|
|
|
|
|
|
|
|
static void
|
2002-03-20 03:00:04 +08:00
|
|
|
|
coff_locate_sections (bfd *abfd, asection *sectp, void *csip)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
2003-09-14 Andrew Cagney <cagney@redhat.com>
* alpha-nat.c: Remove some occurances of "register".
* alpha-tdep.c, arm-tdep.c, blockframe.c, breakpoint.c: Ditto.
* buildsym.c, c-typeprint.c, c-valprint.c, coffread.c: Ditto.
* corefile.c, cp-support.c, cp-valprint.c, cris-tdep.c: Ditto.
* dbxread.c, dcache.c, dwarf2read.c, elfread.c: Ditto.
* environ.c, eval.c, event-top.c, f-typeprint.c: Ditto.
* f-valprint.c, findvar.c, frame.c, gdbtypes.c: Ditto.
* h8300-tdep.c, hppa-tdep.c, hppab-nat.c, hppah-nat.c: Ditto.
* hppam3-nat.c, hpread.c, ia64-aix-nat.c, ia64-linux-nat.c: Ditto.
* infcall.c, infcmd.c, inflow.c, infptrace.c, infrun.c: Ditto.
* infttrace.c, irix5-nat.c, jv-typeprint.c: Ditto.
* jv-valprint.c, m68k-tdep.c, m68klinux-nat.c, main.c: Ditto.
* mdebugread.c, minsyms.c, mips-linux-tdep.c: Ditto.
* mips-nat.c, mips-tdep.c, mipsread.c, mipsv4-nat.c: Ditto.
* ns32k-tdep.c, objfiles.c, p-typeprint.c: Ditto.
* p-valprint.c, ppc-linux-nat.c, printcmd.c: Ditto.
* remote-mips.c, remote-vx.c, rs6000-nat.c: Ditto.
* rs6000-tdep.c, scm-exp.c, sh-tdep.c, sh64-tdep.c: Ditto.
* solib.c, somread.c, source.c, sparc-tdep.c: Ditto.
* stabsread.c, stack.c, standalone.c, symfile.c: Ditto.
* symmisc.c, symtab.c, top.c, tracepoint.c: Ditto.
* typeprint.c, utils.c, valarith.c, valops.c: Ditto.
* values.c, vax-tdep.c, xcoffread.c: Ditto.
2003-09-15 00:32:14 +08:00
|
|
|
|
struct coff_symfile_info *csi;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
const char *name;
|
|
|
|
|
|
|
|
|
|
csi = (struct coff_symfile_info *) csip;
|
|
|
|
|
name = bfd_get_section_name (abfd, sectp);
|
2003-11-23 Andrew Cagney <cagney@redhat.com>
* symfile.c (symbol_file_command): Replace STREQ with strcmp.
* defs.h (DEPRECATED_STREQN): Rename STREQN.
(DEPRECATED_STREQ): Rename STREQ.
* ada-exp.y, ada-lang.c, ada-lex.l, coffread.c: Update.
* config/mips/tm-irix5.h, config/mips/tm-irix6.h: Update.
* config/mips/tm-mipsv4.h, config/sparc/tm-sun4sol2.h: Update.
* dbxread.c, dwarf2read.c, dwarfread.c, environ.c: Update.
* eval.c, exec.c, f-lang.c, hppa-tdep.c, hpread.c: Update.
* jv-exp.y, language.c, m2-exp.y, mcore-rom.c: Update.
* mdebugread.c, mipsread.c, objc-exp.y, objfiles.c: Update.
* p-exp.y, p-typeprint.c, p-valprint.c, rs6000-nat.c: Update.
* source.c, sparc-tdep.c, stack.c, target.c: Update.
2003-11-24 04:41:17 +08:00
|
|
|
|
if (DEPRECATED_STREQ (name, ".text"))
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
csi->textaddr = bfd_section_vma (abfd, sectp);
|
|
|
|
|
csi->textsize += bfd_section_size (abfd, sectp);
|
|
|
|
|
}
|
|
|
|
|
else if (strncmp (name, ".text", sizeof ".text" - 1) == 0)
|
|
|
|
|
{
|
|
|
|
|
csi->textsize += bfd_section_size (abfd, sectp);
|
|
|
|
|
}
|
2003-11-23 Andrew Cagney <cagney@redhat.com>
* symfile.c (symbol_file_command): Replace STREQ with strcmp.
* defs.h (DEPRECATED_STREQN): Rename STREQN.
(DEPRECATED_STREQ): Rename STREQ.
* ada-exp.y, ada-lang.c, ada-lex.l, coffread.c: Update.
* config/mips/tm-irix5.h, config/mips/tm-irix6.h: Update.
* config/mips/tm-mipsv4.h, config/sparc/tm-sun4sol2.h: Update.
* dbxread.c, dwarf2read.c, dwarfread.c, environ.c: Update.
* eval.c, exec.c, f-lang.c, hppa-tdep.c, hpread.c: Update.
* jv-exp.y, language.c, m2-exp.y, mcore-rom.c: Update.
* mdebugread.c, mipsread.c, objc-exp.y, objfiles.c: Update.
* p-exp.y, p-typeprint.c, p-valprint.c, rs6000-nat.c: Update.
* source.c, sparc-tdep.c, stack.c, target.c: Update.
2003-11-24 04:41:17 +08:00
|
|
|
|
else if (DEPRECATED_STREQ (name, ".stabstr"))
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
csi->stabstrsect = sectp;
|
|
|
|
|
}
|
|
|
|
|
else if (strncmp (name, ".stab", sizeof ".stab" - 1) == 0)
|
|
|
|
|
{
|
|
|
|
|
const char *s;
|
|
|
|
|
|
|
|
|
|
/* We can have multiple .stab sections if linked with
|
|
|
|
|
--split-by-reloc. */
|
|
|
|
|
for (s = name + sizeof ".stab" - 1; *s != '\0'; s++)
|
1999-07-08 04:19:36 +08:00
|
|
|
|
if (!isdigit (*s))
|
1999-04-16 09:35:26 +08:00
|
|
|
|
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
|
1999-07-08 04:19:36 +08:00
|
|
|
|
in coff_symfile_read, at which point we no longer need
|
|
|
|
|
the information. */
|
2000-12-15 09:01:51 +08:00
|
|
|
|
make_cleanup (xfree, n);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Return the section_offsets* that CS points to. */
|
2000-05-28 09:12:42 +08:00
|
|
|
|
static int cs_to_section (struct coff_symbol *, struct objfile *);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
struct find_targ_sec_arg
|
|
|
|
|
{
|
|
|
|
|
int targ_index;
|
|
|
|
|
asection **resultp;
|
|
|
|
|
};
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
static void
|
2002-03-20 03:00:04 +08:00
|
|
|
|
find_targ_sec (bfd *abfd, asection *sect, void *obj)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
1999-07-08 04:19:36 +08:00
|
|
|
|
struct find_targ_sec_arg *args = (struct find_targ_sec_arg *) obj;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
if (sect->target_index == args->targ_index)
|
|
|
|
|
*args->resultp = sect;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Return the section number (SECT_OFF_*) that CS points to. */
|
|
|
|
|
static int
|
2000-07-30 09:48:28 +08:00
|
|
|
|
cs_to_section (struct coff_symbol *cs, struct objfile *objfile)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
asection *sect = NULL;
|
|
|
|
|
struct find_targ_sec_arg args;
|
Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* objfiles.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Define as functions of OBJFILE. Add
sect_index_text, sect_index_data, sect_index_rodata,
sect_index_bss to objfile structure.
* gdb-stabs.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Remove.
* objfiles.c (allocate_objfile): Initialize
sect_index_{text,data,bss,rodata} to -1, for error detection.
* symfile.c (default_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata} from bfd information.
* xcoffread.c (xcoff_symfile_offsets): Ditto.
* somread.c (som_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata}.
* coffread.c, dbxread.c, elfread.c, hp-psymtab-read.c,
hp-symtab-read.c, hpread.c, mdebugread.c, minsyms.c,
mipsread.c, objfiles.c, os9kread.c, pa64solib.c, partial-stab.h,
remote-os9k.c, remote-vx.c, remote.c, rs6000-nat.c, somsolib.c,
stabsread.c, symfile.c, xcoffread.c:
Update use of SECT_OFF_{TEXT,DATA,BSS,RODATA} to depend on the
current objfile.
* xcoffread.c: Add new field objfile to find_targ_sec_arg.
2000-05-05 00:52:34 +08:00
|
|
|
|
int off = SECT_OFF_TEXT (objfile);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
args.targ_index = cs->c_secnum;
|
|
|
|
|
args.resultp = §
|
|
|
|
|
bfd_map_over_sections (objfile->obfd, find_targ_sec, &args);
|
|
|
|
|
if (sect != NULL)
|
|
|
|
|
{
|
|
|
|
|
/* This is the section. Figure out what SECT_OFF_* code it is. */
|
|
|
|
|
if (bfd_get_section_flags (abfd, sect) & SEC_CODE)
|
Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* objfiles.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Define as functions of OBJFILE. Add
sect_index_text, sect_index_data, sect_index_rodata,
sect_index_bss to objfile structure.
* gdb-stabs.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Remove.
* objfiles.c (allocate_objfile): Initialize
sect_index_{text,data,bss,rodata} to -1, for error detection.
* symfile.c (default_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata} from bfd information.
* xcoffread.c (xcoff_symfile_offsets): Ditto.
* somread.c (som_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata}.
* coffread.c, dbxread.c, elfread.c, hp-psymtab-read.c,
hp-symtab-read.c, hpread.c, mdebugread.c, minsyms.c,
mipsread.c, objfiles.c, os9kread.c, pa64solib.c, partial-stab.h,
remote-os9k.c, remote-vx.c, remote.c, rs6000-nat.c, somsolib.c,
stabsread.c, symfile.c, xcoffread.c:
Update use of SECT_OFF_{TEXT,DATA,BSS,RODATA} to depend on the
current objfile.
* xcoffread.c: Add new field objfile to find_targ_sec_arg.
2000-05-05 00:52:34 +08:00
|
|
|
|
off = SECT_OFF_TEXT (objfile);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
else if (bfd_get_section_flags (abfd, sect) & SEC_LOAD)
|
Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* objfiles.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Define as functions of OBJFILE. Add
sect_index_text, sect_index_data, sect_index_rodata,
sect_index_bss to objfile structure.
* gdb-stabs.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Remove.
* objfiles.c (allocate_objfile): Initialize
sect_index_{text,data,bss,rodata} to -1, for error detection.
* symfile.c (default_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata} from bfd information.
* xcoffread.c (xcoff_symfile_offsets): Ditto.
* somread.c (som_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata}.
* coffread.c, dbxread.c, elfread.c, hp-psymtab-read.c,
hp-symtab-read.c, hpread.c, mdebugread.c, minsyms.c,
mipsread.c, objfiles.c, os9kread.c, pa64solib.c, partial-stab.h,
remote-os9k.c, remote-vx.c, remote.c, rs6000-nat.c, somsolib.c,
stabsread.c, symfile.c, xcoffread.c:
Update use of SECT_OFF_{TEXT,DATA,BSS,RODATA} to depend on the
current objfile.
* xcoffread.c: Add new field objfile to find_targ_sec_arg.
2000-05-05 00:52:34 +08:00
|
|
|
|
off = SECT_OFF_DATA (objfile);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
else
|
2000-08-07 23:02:48 +08:00
|
|
|
|
/* Just return the bfd section index. */
|
|
|
|
|
off = sect->index;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
}
|
|
|
|
|
return off;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Return the address of the section of a COFF symbol. */
|
|
|
|
|
|
2000-05-28 09:12:42 +08:00
|
|
|
|
static CORE_ADDR cs_section_address (struct coff_symbol *, bfd *);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
static CORE_ADDR
|
2000-07-30 09:48:28 +08:00
|
|
|
|
cs_section_address (struct coff_symbol *cs, bfd *abfd)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
asection *sect = NULL;
|
|
|
|
|
struct find_targ_sec_arg args;
|
|
|
|
|
CORE_ADDR addr = 0;
|
|
|
|
|
|
|
|
|
|
args.targ_index = cs->c_secnum;
|
|
|
|
|
args.resultp = §
|
|
|
|
|
bfd_map_over_sections (abfd, find_targ_sec, &args);
|
|
|
|
|
if (sect != NULL)
|
|
|
|
|
addr = bfd_get_section_vma (objfile->obfd, sect);
|
|
|
|
|
return addr;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Look up a coff type-number index. Return the address of the slot
|
|
|
|
|
where the type for that index is stored.
|
|
|
|
|
The type-number is in INDEX.
|
|
|
|
|
|
|
|
|
|
This can be used for finding the type associated with that index
|
|
|
|
|
or for associating a new type with the index. */
|
|
|
|
|
|
|
|
|
|
static struct type **
|
2003-09-16 Andrew Cagney <cagney@redhat.com>
* buildsym.c: Remove more occurances of "register".
* coffread.c, dbxread.c, dcache.c, dwarf2read.c: Ditto.
* environ.c, eval.c, f-valprint.c, findvar.c: Ditto.
* gdbtypes.c, gnu-v2-abi.c, h8300-tdep.c, hppa-tdep.c: Ditto.
* infcmd.c, mdebugread.c, minsyms.c, mips-tdep.c: Ditto.
* printcmd.c, remote-vx.c, sh-stub.c, sh-tdep.c: Ditto.
* sh64-tdep.c, source.c, stabsread.c, stack.c: Ditto.
* standalone.c, symfile.c, symmisc.c, symtab.c: Ditto.
* utils.c, valops.c, values.c, xcoffread.c: Ditto.
2003-09-17 02:56:35 +08:00
|
|
|
|
coff_lookup_type (int index)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
if (index >= type_vector_length)
|
|
|
|
|
{
|
|
|
|
|
int old_vector_length = type_vector_length;
|
|
|
|
|
|
|
|
|
|
type_vector_length *= 2;
|
1999-07-08 04:19:36 +08:00
|
|
|
|
if (index /* is still */ >= type_vector_length)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
type_vector_length = index * 2;
|
|
|
|
|
|
|
|
|
|
type_vector = (struct type **)
|
|
|
|
|
xrealloc ((char *) type_vector,
|
|
|
|
|
type_vector_length * sizeof (struct type *));
|
|
|
|
|
memset (&type_vector[old_vector_length], 0,
|
1999-07-08 04:19:36 +08:00
|
|
|
|
(type_vector_length - old_vector_length) * sizeof (struct type *));
|
1999-04-16 09:35:26 +08:00
|
|
|
|
}
|
|
|
|
|
return &type_vector[index];
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Make sure there is a type allocated for type number index
|
|
|
|
|
and return the type object.
|
|
|
|
|
This can create an empty (zeroed) type object. */
|
|
|
|
|
|
|
|
|
|
static struct type *
|
2000-07-30 09:48:28 +08:00
|
|
|
|
coff_alloc_type (int index)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
2003-09-14 Andrew Cagney <cagney@redhat.com>
* alpha-nat.c: Remove some occurances of "register".
* alpha-tdep.c, arm-tdep.c, blockframe.c, breakpoint.c: Ditto.
* buildsym.c, c-typeprint.c, c-valprint.c, coffread.c: Ditto.
* corefile.c, cp-support.c, cp-valprint.c, cris-tdep.c: Ditto.
* dbxread.c, dcache.c, dwarf2read.c, elfread.c: Ditto.
* environ.c, eval.c, event-top.c, f-typeprint.c: Ditto.
* f-valprint.c, findvar.c, frame.c, gdbtypes.c: Ditto.
* h8300-tdep.c, hppa-tdep.c, hppab-nat.c, hppah-nat.c: Ditto.
* hppam3-nat.c, hpread.c, ia64-aix-nat.c, ia64-linux-nat.c: Ditto.
* infcall.c, infcmd.c, inflow.c, infptrace.c, infrun.c: Ditto.
* infttrace.c, irix5-nat.c, jv-typeprint.c: Ditto.
* jv-valprint.c, m68k-tdep.c, m68klinux-nat.c, main.c: Ditto.
* mdebugread.c, minsyms.c, mips-linux-tdep.c: Ditto.
* mips-nat.c, mips-tdep.c, mipsread.c, mipsv4-nat.c: Ditto.
* ns32k-tdep.c, objfiles.c, p-typeprint.c: Ditto.
* p-valprint.c, ppc-linux-nat.c, printcmd.c: Ditto.
* remote-mips.c, remote-vx.c, rs6000-nat.c: Ditto.
* rs6000-tdep.c, scm-exp.c, sh-tdep.c, sh64-tdep.c: Ditto.
* solib.c, somread.c, source.c, sparc-tdep.c: Ditto.
* stabsread.c, stack.c, standalone.c, symfile.c: Ditto.
* symmisc.c, symtab.c, top.c, tracepoint.c: Ditto.
* typeprint.c, utils.c, valarith.c, valops.c: Ditto.
* values.c, vax-tdep.c, xcoffread.c: Ditto.
2003-09-15 00:32:14 +08:00
|
|
|
|
struct type **type_addr = coff_lookup_type (index);
|
|
|
|
|
struct type *type = *type_addr;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
/* If we are referring to a type not known at all yet,
|
|
|
|
|
allocate an empty type for it.
|
|
|
|
|
We will fill it in later if we find out how. */
|
|
|
|
|
if (type == NULL)
|
|
|
|
|
{
|
|
|
|
|
type = alloc_type (current_objfile);
|
|
|
|
|
*type_addr = type;
|
|
|
|
|
}
|
|
|
|
|
return type;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Start a new symtab for a new source file.
|
|
|
|
|
This is called when a COFF ".file" symbol is seen;
|
|
|
|
|
it indicates the start of data for one original source file. */
|
|
|
|
|
|
|
|
|
|
static void
|
2000-07-30 09:48:28 +08:00
|
|
|
|
coff_start_symtab (char *name)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
start_symtab (
|
1999-07-08 04:19:36 +08:00
|
|
|
|
/* We fill in the filename later. start_symtab puts
|
|
|
|
|
this pointer into last_source_file and we put it in
|
|
|
|
|
subfiles->name, which end_symtab frees; that's why
|
|
|
|
|
it must be malloc'd. */
|
|
|
|
|
savestring (name, strlen (name)),
|
|
|
|
|
/* We never know the directory name for COFF. */
|
|
|
|
|
NULL,
|
|
|
|
|
/* The start address is irrelevant, since we set
|
|
|
|
|
last_source_start_addr in coff_end_symtab. */
|
|
|
|
|
0);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
record_debugformat ("COFF");
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Save the vital information from when starting to read a file,
|
|
|
|
|
for use when closing off the current file.
|
|
|
|
|
NAME is the file name the symbols came from, START_ADDR is the first
|
|
|
|
|
text address for the file, and SIZE is the number of bytes of text. */
|
|
|
|
|
|
|
|
|
|
static void
|
2000-07-30 09:48:28 +08:00
|
|
|
|
complete_symtab (char *name, CORE_ADDR start_addr, unsigned int size)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
if (last_source_file != NULL)
|
2000-12-15 09:01:51 +08:00
|
|
|
|
xfree (last_source_file);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
last_source_file = savestring (name, strlen (name));
|
|
|
|
|
current_source_start_addr = start_addr;
|
|
|
|
|
current_source_end_addr = start_addr + size;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Finish the symbol definitions for one main source file,
|
|
|
|
|
close off all the lexical contexts for that file
|
|
|
|
|
(creating struct block's for them), then make the
|
|
|
|
|
struct symtab for that file and put it in the list of all such. */
|
|
|
|
|
|
|
|
|
|
static void
|
2000-07-30 09:48:28 +08:00
|
|
|
|
coff_end_symtab (struct objfile *objfile)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
struct symtab *symtab;
|
|
|
|
|
|
|
|
|
|
last_source_start_addr = current_source_start_addr;
|
|
|
|
|
|
2000-10-25 05:13:08 +08:00
|
|
|
|
symtab = end_symtab (current_source_end_addr, objfile, SECT_OFF_TEXT (objfile));
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
if (symtab != NULL)
|
|
|
|
|
free_named_symtabs (symtab->filename);
|
|
|
|
|
|
|
|
|
|
/* Reinitialize for beginning of new file. */
|
|
|
|
|
last_source_file = NULL;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void
|
2000-07-30 09:48:28 +08:00
|
|
|
|
record_minimal_symbol (char *name, CORE_ADDR address,
|
|
|
|
|
enum minimal_symbol_type type, struct objfile *objfile)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
/* We don't want TDESC entry points in the minimal symbol table */
|
1999-07-08 04:19:36 +08:00
|
|
|
|
if (name[0] == '@')
|
|
|
|
|
return;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
prim_record_minimal_symbol (name, address, type, objfile);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* coff_symfile_init ()
|
|
|
|
|
is the coff-specific initialization routine for reading symbols.
|
|
|
|
|
It is passed a struct objfile which contains, among other things,
|
|
|
|
|
the BFD for the file whose symbols are being read, and a slot for
|
|
|
|
|
a pointer to "private data" which we fill with cookies and other
|
|
|
|
|
treats for coff_symfile_read ().
|
|
|
|
|
|
|
|
|
|
We will only be called if this is a COFF or COFF-like file.
|
|
|
|
|
BFD handles figuring out the format of the file, and code in symtab.c
|
|
|
|
|
uses BFD's determination to vector to us.
|
|
|
|
|
|
|
|
|
|
The ultimate result is a new symtab (or, FIXME, eventually a psymtab). */
|
|
|
|
|
|
|
|
|
|
static void
|
2000-07-30 09:48:28 +08:00
|
|
|
|
coff_symfile_init (struct objfile *objfile)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
/* Allocate struct to keep track of stab reading. */
|
|
|
|
|
objfile->sym_stab_info = (struct dbx_symfile_info *)
|
2004-08-11 03:37:47 +08:00
|
|
|
|
xmalloc (sizeof (struct dbx_symfile_info));
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
2002-03-20 03:00:04 +08:00
|
|
|
|
memset (objfile->sym_stab_info, 0,
|
|
|
|
|
sizeof (struct dbx_symfile_info));
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
/* Allocate struct to keep track of the symfile */
|
2004-08-11 03:37:47 +08:00
|
|
|
|
objfile->sym_private = xmalloc (sizeof (struct coff_symfile_info));
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
memset (objfile->sym_private, 0, sizeof (struct coff_symfile_info));
|
|
|
|
|
|
|
|
|
|
/* COFF objects may be reordered, so set OBJF_REORDERED. If we
|
|
|
|
|
find this causes a significant slowdown in gdb then we could
|
|
|
|
|
set it in the debug symbol readers only when necessary. */
|
|
|
|
|
objfile->flags |= OBJF_REORDERED;
|
|
|
|
|
|
|
|
|
|
init_entry_point_info (objfile);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* This function is called for every section; it finds the outer limits
|
|
|
|
|
of the line table (minimum and maximum file offset) so that the
|
|
|
|
|
mainline code can read the whole thing for efficiency. */
|
|
|
|
|
|
|
|
|
|
static void
|
2003-11-06 10:52:28 +08:00
|
|
|
|
find_linenos (bfd *abfd, struct bfd_section *asect, void *vpinfo)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
struct coff_symfile_info *info;
|
|
|
|
|
int size, count;
|
|
|
|
|
file_ptr offset, maxoff;
|
|
|
|
|
|
|
|
|
|
/* WARNING WILL ROBINSON! ACCESSING BFD-PRIVATE DATA HERE! FIXME! */
|
|
|
|
|
count = asect->lineno_count;
|
|
|
|
|
/* End of warning */
|
|
|
|
|
|
|
|
|
|
if (count == 0)
|
|
|
|
|
return;
|
|
|
|
|
size = count * local_linesz;
|
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
info = (struct coff_symfile_info *) vpinfo;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
/* WARNING WILL ROBINSON! ACCESSING BFD-PRIVATE DATA HERE! FIXME! */
|
|
|
|
|
offset = asect->line_filepos;
|
|
|
|
|
/* End of warning */
|
|
|
|
|
|
|
|
|
|
if (offset < info->min_lineno_offset || info->min_lineno_offset == 0)
|
|
|
|
|
info->min_lineno_offset = offset;
|
|
|
|
|
|
|
|
|
|
maxoff = offset + size;
|
|
|
|
|
if (maxoff > info->max_lineno_offset)
|
|
|
|
|
info->max_lineno_offset = maxoff;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* The BFD for this file -- only good while we're actively reading
|
|
|
|
|
symbols into a psymtab or a symtab. */
|
|
|
|
|
|
|
|
|
|
static bfd *symfile_bfd;
|
|
|
|
|
|
|
|
|
|
/* Read a symbol file, after initialization by coff_symfile_init. */
|
|
|
|
|
|
|
|
|
|
static void
|
2000-07-30 09:48:28 +08:00
|
|
|
|
coff_symfile_read (struct objfile *objfile, int mainline)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
struct coff_symfile_info *info;
|
|
|
|
|
struct dbx_symfile_info *dbxinfo;
|
|
|
|
|
bfd *abfd = objfile->obfd;
|
|
|
|
|
coff_data_type *cdata = coff_data (abfd);
|
|
|
|
|
char *name = bfd_get_filename (abfd);
|
2003-09-14 Andrew Cagney <cagney@redhat.com>
* alpha-nat.c: Remove some occurances of "register".
* alpha-tdep.c, arm-tdep.c, blockframe.c, breakpoint.c: Ditto.
* buildsym.c, c-typeprint.c, c-valprint.c, coffread.c: Ditto.
* corefile.c, cp-support.c, cp-valprint.c, cris-tdep.c: Ditto.
* dbxread.c, dcache.c, dwarf2read.c, elfread.c: Ditto.
* environ.c, eval.c, event-top.c, f-typeprint.c: Ditto.
* f-valprint.c, findvar.c, frame.c, gdbtypes.c: Ditto.
* h8300-tdep.c, hppa-tdep.c, hppab-nat.c, hppah-nat.c: Ditto.
* hppam3-nat.c, hpread.c, ia64-aix-nat.c, ia64-linux-nat.c: Ditto.
* infcall.c, infcmd.c, inflow.c, infptrace.c, infrun.c: Ditto.
* infttrace.c, irix5-nat.c, jv-typeprint.c: Ditto.
* jv-valprint.c, m68k-tdep.c, m68klinux-nat.c, main.c: Ditto.
* mdebugread.c, minsyms.c, mips-linux-tdep.c: Ditto.
* mips-nat.c, mips-tdep.c, mipsread.c, mipsv4-nat.c: Ditto.
* ns32k-tdep.c, objfiles.c, p-typeprint.c: Ditto.
* p-valprint.c, ppc-linux-nat.c, printcmd.c: Ditto.
* remote-mips.c, remote-vx.c, rs6000-nat.c: Ditto.
* rs6000-tdep.c, scm-exp.c, sh-tdep.c, sh64-tdep.c: Ditto.
* solib.c, somread.c, source.c, sparc-tdep.c: Ditto.
* stabsread.c, stack.c, standalone.c, symfile.c: Ditto.
* symmisc.c, symtab.c, top.c, tracepoint.c: Ditto.
* typeprint.c, utils.c, valarith.c, valops.c: Ditto.
* values.c, vax-tdep.c, xcoffread.c: Ditto.
2003-09-15 00:32:14 +08:00
|
|
|
|
int val;
|
2000-02-08 12:39:02 +08:00
|
|
|
|
unsigned int num_symbols;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
int symtab_offset;
|
|
|
|
|
int stringtab_offset;
|
2003-02-21 02:31:14 +08:00
|
|
|
|
struct cleanup *back_to, *cleanup_minimal_symbols;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
int stabstrsize;
|
1999-12-07 11:56:43 +08:00
|
|
|
|
int len;
|
|
|
|
|
char * target;
|
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
info = (struct coff_symfile_info *) objfile->sym_private;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
dbxinfo = objfile->sym_stab_info;
|
1999-07-08 04:19:36 +08:00
|
|
|
|
symfile_bfd = abfd; /* Kludge for swap routines */
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
/* WARNING WILL ROBINSON! ACCESSING BFD-PRIVATE DATA HERE! FIXME! */
|
1999-07-08 04:19:36 +08:00
|
|
|
|
num_symbols = bfd_get_symcount (abfd); /* How many syms */
|
|
|
|
|
symtab_offset = cdata->sym_filepos; /* Symbol table file offset */
|
|
|
|
|
stringtab_offset = symtab_offset + /* String table file offset */
|
|
|
|
|
num_symbols * cdata->local_symesz;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
/* Set a few file-statics that give us specific information about
|
|
|
|
|
the particular COFF file format we're reading. */
|
|
|
|
|
local_n_btmask = cdata->local_n_btmask;
|
|
|
|
|
local_n_btshft = cdata->local_n_btshft;
|
1999-07-08 04:19:36 +08:00
|
|
|
|
local_n_tmask = cdata->local_n_tmask;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
local_n_tshift = cdata->local_n_tshift;
|
1999-07-08 04:19:36 +08:00
|
|
|
|
local_linesz = cdata->local_linesz;
|
|
|
|
|
local_symesz = cdata->local_symesz;
|
|
|
|
|
local_auxesz = cdata->local_auxesz;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
/* Allocate space for raw symbol and aux entries, based on their
|
|
|
|
|
space requirements as reported by BFD. */
|
|
|
|
|
temp_sym = (char *) xmalloc
|
1999-07-08 04:19:36 +08:00
|
|
|
|
(cdata->local_symesz + cdata->local_auxesz);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
temp_aux = temp_sym + cdata->local_symesz;
|
2000-04-26 20:41:48 +08:00
|
|
|
|
back_to = make_cleanup (free_current_contents, &temp_sym);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
/* We need to know whether this is a PE file, because in PE files,
|
|
|
|
|
unlike standard COFF files, symbol values are stored as offsets
|
|
|
|
|
from the section address, rather than as absolute addresses.
|
|
|
|
|
FIXME: We should use BFD to read the symbol table, and thus avoid
|
|
|
|
|
this problem. */
|
2000-01-11 11:07:37 +08:00
|
|
|
|
pe_file =
|
|
|
|
|
strncmp (bfd_get_target (objfile->obfd), "pe", 2) == 0
|
|
|
|
|
|| strncmp (bfd_get_target (objfile->obfd), "epoc-pe", 7) == 0;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
/* End of warning */
|
|
|
|
|
|
|
|
|
|
info->min_lineno_offset = 0;
|
|
|
|
|
info->max_lineno_offset = 0;
|
|
|
|
|
|
2002-08-22 13:50:11 +08:00
|
|
|
|
/* Only read line number information if we have symbols.
|
|
|
|
|
|
|
|
|
|
On Windows NT, some of the system's DLL's have sections with
|
|
|
|
|
PointerToLinenumbers fields that are non-zero, but point at
|
|
|
|
|
random places within the image file. (In the case I found,
|
|
|
|
|
KERNEL32.DLL's .text section has a line number info pointer that
|
|
|
|
|
points into the middle of the string `lib\\i386\kernel32.dll'.)
|
|
|
|
|
|
|
|
|
|
However, these DLL's also have no symbols. The line number
|
|
|
|
|
tables are meaningless without symbols. And in fact, GDB never
|
|
|
|
|
uses the line number information unless there are symbols. So we
|
|
|
|
|
can avoid spurious error messages (and maybe run a little
|
|
|
|
|
faster!) by not even reading the line number table unless we have
|
|
|
|
|
symbols. */
|
|
|
|
|
if (num_symbols > 0)
|
|
|
|
|
{
|
|
|
|
|
/* Read the line number table, all at once. */
|
|
|
|
|
bfd_map_over_sections (abfd, find_linenos, (void *) info);
|
|
|
|
|
|
|
|
|
|
make_cleanup (free_linetab_cleanup, 0 /*ignore*/);
|
|
|
|
|
val = init_lineno (abfd, info->min_lineno_offset,
|
|
|
|
|
info->max_lineno_offset - info->min_lineno_offset);
|
|
|
|
|
if (val < 0)
|
|
|
|
|
error ("\"%s\": error reading line numbers\n", name);
|
|
|
|
|
}
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
/* Now read the string table, all at once. */
|
|
|
|
|
|
2000-05-22 17:02:23 +08:00
|
|
|
|
make_cleanup (free_stringtab_cleanup, 0 /*ignore*/);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
val = init_stringtab (abfd, stringtab_offset);
|
|
|
|
|
if (val < 0)
|
|
|
|
|
error ("\"%s\": can't get string table", name);
|
|
|
|
|
|
|
|
|
|
init_minimal_symbol_collection ();
|
2003-02-21 02:31:14 +08:00
|
|
|
|
cleanup_minimal_symbols = make_cleanup_discard_minimal_symbols ();
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
/* Now that the executable file is positioned at symbol table,
|
|
|
|
|
process it and define symbols accordingly. */
|
|
|
|
|
|
1999-08-10 05:36:23 +08:00
|
|
|
|
coff_symtab_read ((long) symtab_offset, num_symbols, objfile);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
/* Install any minimal symbols that have been collected as the current
|
|
|
|
|
minimal symbols for this objfile. */
|
|
|
|
|
|
|
|
|
|
install_minimal_symbols (objfile);
|
|
|
|
|
|
2003-02-21 02:31:14 +08:00
|
|
|
|
/* Free the installed minimal symbol data. */
|
|
|
|
|
do_cleanups (cleanup_minimal_symbols);
|
|
|
|
|
|
2004-06-10 23:52:04 +08:00
|
|
|
|
/* If we are reinitializing, or if we have not loaded syms yet,
|
|
|
|
|
empty the psymtab. "mainline" is cleared so the *_read_psymtab
|
|
|
|
|
functions do not all re-initialize it. */
|
|
|
|
|
if (mainline)
|
|
|
|
|
{
|
|
|
|
|
init_psymbol_list (objfile, 0);
|
|
|
|
|
mainline = 0;
|
|
|
|
|
}
|
|
|
|
|
|
2002-03-20 03:00:04 +08:00
|
|
|
|
bfd_map_over_sections (abfd, coff_locate_sections, (void *) info);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
if (info->stabsects)
|
|
|
|
|
{
|
1999-07-08 04:19:36 +08:00
|
|
|
|
if (!info->stabstrsect)
|
1999-05-05 22:45:51 +08:00
|
|
|
|
{
|
2002-02-02 11:42:59 +08:00
|
|
|
|
error (("The debugging information in `%s' is corrupted.\n"
|
|
|
|
|
"The file has a `.stabs' section, but no `.stabstr' "
|
|
|
|
|
"section."),
|
|
|
|
|
name);
|
1999-05-05 22:45:51 +08:00
|
|
|
|
}
|
|
|
|
|
|
1999-04-16 09:35:26 +08:00
|
|
|
|
/* FIXME: dubious. Why can't we use something normal like
|
1999-07-08 04:19:36 +08:00
|
|
|
|
bfd_get_section_contents? */
|
1999-04-16 09:35:26 +08:00
|
|
|
|
bfd_seek (abfd, abfd->where, 0);
|
|
|
|
|
|
|
|
|
|
stabstrsize = bfd_section_size (abfd, info->stabstrsect);
|
|
|
|
|
|
|
|
|
|
coffstab_build_psymtabs (objfile,
|
|
|
|
|
mainline,
|
|
|
|
|
info->textaddr, info->textsize,
|
|
|
|
|
info->stabsects,
|
|
|
|
|
info->stabstrsect->filepos, stabstrsize);
|
|
|
|
|
}
|
* dwarf2read.c (dwarf2_objfile_data_key): New.
(struct dwarf2_per_objfile, dwarf2_per_objfile): New.
(dwarf_info_size, dwarf_abbrev_size, dwarf_line_size)
(dwarf_pubnames_size, dwarf_aranges_size, dwarf_loc_size)
(dwarf_macinfo_size, dwarf_str_size, dwarf_ranges_size)
(dwarf_frame_size, dwarf_eh_frame_size, dwarf_info_buffer)
(dwarf_abbrev_buffer, dwarf_line_buffer, dwarf_str_buffer)
(dwarf_macinfo_buffer, dwarf_ranges_buffer, dwarf_loc_buffer):
Remove variables.
(struct dwarf2_pinfo): Remove per-objfile members. Update comments.
(DWARF_ABBREV_SIZE, DWARF_LINE_SIZE)
(DWARF_LOC_SIZE, DWARF_MACINFO_SIZE, DWARF_STR_SIZE)
(DWARF_RANGES_SIZE, DWARF_INFO_BUFFER)
(DWARF_ABBREV_BUFFER, DWARF_LINE_BUFFER, DWARF_STR_BUFFER)
(DWARF_MACINFO_BUFFER, DWARF_RANGES_BUFFER, DWARF_LOC_BUFFER):
Remove macros.
(dwarf2_has_info): Take an objfile argument. Allocate per-objfile
data.
(dwarf2_locate_sections, dwarf2_build_psymtabs)
(dwarf2_build_psymtabs_easy, dwarf2_build_psymtabs_hard)
(skip_one_die, dwarf2_get_pc_bounds, dwarf2_read_abbrevs)
(read_partial_die, read_full_die, read_indirect_string)
(dwarf_decode_line_header, dwarf_decode_macros)
(dwarf2_symbol_mark_computed): Remove use of removed macros.
Update uses of removed variables.
(psymtab_to_symtab_1): Restore per-objfile data pointer. Remove use
of removed macros.
(_initialize_dwarf2_read): New function.
* symfile.h (dwarf2_has_info): Update prototype.
* coffread.c (coff_symfile_read): Update call to dwarf2_has_info.
* elfread.c (elf_symfile_read): Likewise.
2004-04-03 03:23:05 +08:00
|
|
|
|
if (dwarf2_has_info (objfile))
|
2001-07-01 18:04:58 +08:00
|
|
|
|
{
|
|
|
|
|
/* DWARF2 sections. */
|
|
|
|
|
dwarf2_build_psymtabs (objfile, mainline);
|
|
|
|
|
}
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
2004-06-10 23:52:04 +08:00
|
|
|
|
dwarf2_build_frame_info (objfile);
|
|
|
|
|
|
1999-04-16 09:35:26 +08:00
|
|
|
|
do_cleanups (back_to);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void
|
2000-07-30 09:48:28 +08:00
|
|
|
|
coff_new_init (struct objfile *ignore)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Perform any local cleanups required when we are done with a particular
|
|
|
|
|
objfile. I.E, we are in the process of discarding all symbol information
|
|
|
|
|
for an objfile, freeing up all memory held for it, and unlinking the
|
|
|
|
|
objfile struct from the global list of known objfiles. */
|
|
|
|
|
|
|
|
|
|
static void
|
2000-07-30 09:48:28 +08:00
|
|
|
|
coff_symfile_finish (struct objfile *objfile)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
1999-07-08 04:19:36 +08:00
|
|
|
|
if (objfile->sym_private != NULL)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
2004-08-11 05:52:05 +08:00
|
|
|
|
xfree (objfile->sym_private);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
}
|
1999-08-17 03:57:19 +08:00
|
|
|
|
|
|
|
|
|
/* Let stabs reader clean up */
|
|
|
|
|
stabsread_clear_cache ();
|
1999-04-16 09:35:26 +08:00
|
|
|
|
}
|
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
|
1999-04-16 09:35:26 +08:00
|
|
|
|
/* Given pointers to a symbol table in coff style exec file,
|
|
|
|
|
analyze them and create struct symtab's describing the symbols.
|
|
|
|
|
NSYMS is the number of symbols in the symbol table.
|
|
|
|
|
We read them one at a time using read_one_sym (). */
|
|
|
|
|
|
|
|
|
|
static void
|
2000-07-30 09:48:28 +08:00
|
|
|
|
coff_symtab_read (long symtab_offset, unsigned int nsyms,
|
|
|
|
|
struct objfile *objfile)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
2003-09-14 Andrew Cagney <cagney@redhat.com>
* alpha-nat.c: Remove some occurances of "register".
* alpha-tdep.c, arm-tdep.c, blockframe.c, breakpoint.c: Ditto.
* buildsym.c, c-typeprint.c, c-valprint.c, coffread.c: Ditto.
* corefile.c, cp-support.c, cp-valprint.c, cris-tdep.c: Ditto.
* dbxread.c, dcache.c, dwarf2read.c, elfread.c: Ditto.
* environ.c, eval.c, event-top.c, f-typeprint.c: Ditto.
* f-valprint.c, findvar.c, frame.c, gdbtypes.c: Ditto.
* h8300-tdep.c, hppa-tdep.c, hppab-nat.c, hppah-nat.c: Ditto.
* hppam3-nat.c, hpread.c, ia64-aix-nat.c, ia64-linux-nat.c: Ditto.
* infcall.c, infcmd.c, inflow.c, infptrace.c, infrun.c: Ditto.
* infttrace.c, irix5-nat.c, jv-typeprint.c: Ditto.
* jv-valprint.c, m68k-tdep.c, m68klinux-nat.c, main.c: Ditto.
* mdebugread.c, minsyms.c, mips-linux-tdep.c: Ditto.
* mips-nat.c, mips-tdep.c, mipsread.c, mipsv4-nat.c: Ditto.
* ns32k-tdep.c, objfiles.c, p-typeprint.c: Ditto.
* p-valprint.c, ppc-linux-nat.c, printcmd.c: Ditto.
* remote-mips.c, remote-vx.c, rs6000-nat.c: Ditto.
* rs6000-tdep.c, scm-exp.c, sh-tdep.c, sh64-tdep.c: Ditto.
* solib.c, somread.c, source.c, sparc-tdep.c: Ditto.
* stabsread.c, stack.c, standalone.c, symfile.c: Ditto.
* symmisc.c, symtab.c, top.c, tracepoint.c: Ditto.
* typeprint.c, utils.c, valarith.c, valops.c: Ditto.
* values.c, vax-tdep.c, xcoffread.c: Ditto.
2003-09-15 00:32:14 +08:00
|
|
|
|
struct context_stack *new;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
struct coff_symbol coff_symbol;
|
2003-09-14 Andrew Cagney <cagney@redhat.com>
* alpha-nat.c: Remove some occurances of "register".
* alpha-tdep.c, arm-tdep.c, blockframe.c, breakpoint.c: Ditto.
* buildsym.c, c-typeprint.c, c-valprint.c, coffread.c: Ditto.
* corefile.c, cp-support.c, cp-valprint.c, cris-tdep.c: Ditto.
* dbxread.c, dcache.c, dwarf2read.c, elfread.c: Ditto.
* environ.c, eval.c, event-top.c, f-typeprint.c: Ditto.
* f-valprint.c, findvar.c, frame.c, gdbtypes.c: Ditto.
* h8300-tdep.c, hppa-tdep.c, hppab-nat.c, hppah-nat.c: Ditto.
* hppam3-nat.c, hpread.c, ia64-aix-nat.c, ia64-linux-nat.c: Ditto.
* infcall.c, infcmd.c, inflow.c, infptrace.c, infrun.c: Ditto.
* infttrace.c, irix5-nat.c, jv-typeprint.c: Ditto.
* jv-valprint.c, m68k-tdep.c, m68klinux-nat.c, main.c: Ditto.
* mdebugread.c, minsyms.c, mips-linux-tdep.c: Ditto.
* mips-nat.c, mips-tdep.c, mipsread.c, mipsv4-nat.c: Ditto.
* ns32k-tdep.c, objfiles.c, p-typeprint.c: Ditto.
* p-valprint.c, ppc-linux-nat.c, printcmd.c: Ditto.
* remote-mips.c, remote-vx.c, rs6000-nat.c: Ditto.
* rs6000-tdep.c, scm-exp.c, sh-tdep.c, sh64-tdep.c: Ditto.
* solib.c, somread.c, source.c, sparc-tdep.c: Ditto.
* stabsread.c, stack.c, standalone.c, symfile.c: Ditto.
* symmisc.c, symtab.c, top.c, tracepoint.c: Ditto.
* typeprint.c, utils.c, valarith.c, valops.c: Ditto.
* values.c, vax-tdep.c, xcoffread.c: Ditto.
2003-09-15 00:32:14 +08:00
|
|
|
|
struct coff_symbol *cs = &coff_symbol;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
static struct internal_syment main_sym;
|
|
|
|
|
static union internal_auxent main_aux;
|
|
|
|
|
struct coff_symbol fcn_cs_saved;
|
|
|
|
|
static struct internal_syment fcn_sym_saved;
|
|
|
|
|
static union internal_auxent fcn_aux_saved;
|
|
|
|
|
struct symtab *s;
|
|
|
|
|
/* A .file is open. */
|
|
|
|
|
int in_source_file = 0;
|
|
|
|
|
int next_file_symnum = -1;
|
|
|
|
|
/* Name of the current file. */
|
|
|
|
|
char *filestring = "";
|
|
|
|
|
int depth = 0;
|
|
|
|
|
int fcn_first_line = 0;
|
2001-03-26 10:48:23 +08:00
|
|
|
|
CORE_ADDR fcn_first_line_addr = 0;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
int fcn_last_line = 0;
|
|
|
|
|
int fcn_start_addr = 0;
|
|
|
|
|
long fcn_line_ptr = 0;
|
|
|
|
|
int val;
|
|
|
|
|
CORE_ADDR tmpaddr;
|
|
|
|
|
|
|
|
|
|
/* Work around a stdio bug in SunOS4.1.1 (this makes me nervous....
|
|
|
|
|
it's hard to know I've really worked around it. The fix should be
|
|
|
|
|
harmless, anyway). The symptom of the bug is that the first
|
|
|
|
|
fread (in read_one_sym), will (in my example) actually get data
|
|
|
|
|
from file offset 268, when the fseek was to 264 (and ftell shows
|
|
|
|
|
264). This causes all hell to break loose. I was unable to
|
|
|
|
|
reproduce this on a short test program which operated on the same
|
|
|
|
|
file, performing (I think) the same sequence of operations.
|
|
|
|
|
|
|
|
|
|
It stopped happening when I put in this (former) rewind().
|
|
|
|
|
|
|
|
|
|
FIXME: Find out if this has been reported to Sun, whether it has
|
|
|
|
|
been fixed in a later release, etc. */
|
|
|
|
|
|
|
|
|
|
bfd_seek (objfile->obfd, 0, 0);
|
|
|
|
|
|
|
|
|
|
/* Position to read the symbol table. */
|
|
|
|
|
val = bfd_seek (objfile->obfd, (long) symtab_offset, 0);
|
|
|
|
|
if (val < 0)
|
|
|
|
|
perror_with_name (objfile->name);
|
|
|
|
|
|
|
|
|
|
current_objfile = objfile;
|
|
|
|
|
nlist_bfd_global = objfile->obfd;
|
|
|
|
|
nlist_nsyms_global = nsyms;
|
|
|
|
|
last_source_file = NULL;
|
|
|
|
|
memset (opaque_type_chain, 0, sizeof opaque_type_chain);
|
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
if (type_vector) /* Get rid of previous one */
|
2000-12-15 09:01:51 +08:00
|
|
|
|
xfree (type_vector);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
type_vector_length = 160;
|
|
|
|
|
type_vector = (struct type **)
|
|
|
|
|
xmalloc (type_vector_length * sizeof (struct type *));
|
|
|
|
|
memset (type_vector, 0, type_vector_length * sizeof (struct type *));
|
|
|
|
|
|
|
|
|
|
coff_start_symtab ("");
|
|
|
|
|
|
|
|
|
|
symnum = 0;
|
|
|
|
|
while (symnum < nsyms)
|
|
|
|
|
{
|
|
|
|
|
QUIT; /* Make this command interruptable. */
|
|
|
|
|
|
|
|
|
|
read_one_sym (cs, &main_sym, &main_aux);
|
|
|
|
|
|
|
|
|
|
if (cs->c_symnum == next_file_symnum && cs->c_sclass != C_FILE)
|
|
|
|
|
{
|
|
|
|
|
if (last_source_file)
|
|
|
|
|
coff_end_symtab (objfile);
|
|
|
|
|
|
|
|
|
|
coff_start_symtab ("_globals_");
|
|
|
|
|
complete_symtab ("_globals_", 0, 0);
|
|
|
|
|
/* done with all files, everything from here on out is globals */
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Special case for file with type declarations only, no text. */
|
|
|
|
|
if (!last_source_file && SDB_TYPE (cs->c_type)
|
|
|
|
|
&& cs->c_secnum == N_DEBUG)
|
|
|
|
|
complete_symtab (filestring, 0, 0);
|
|
|
|
|
|
|
|
|
|
/* Typedefs should not be treated as symbol definitions. */
|
|
|
|
|
if (ISFCN (cs->c_type) && cs->c_sclass != C_TPDEF)
|
|
|
|
|
{
|
|
|
|
|
/* Record all functions -- external and static -- in minsyms. */
|
Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* objfiles.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Define as functions of OBJFILE. Add
sect_index_text, sect_index_data, sect_index_rodata,
sect_index_bss to objfile structure.
* gdb-stabs.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Remove.
* objfiles.c (allocate_objfile): Initialize
sect_index_{text,data,bss,rodata} to -1, for error detection.
* symfile.c (default_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata} from bfd information.
* xcoffread.c (xcoff_symfile_offsets): Ditto.
* somread.c (som_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata}.
* coffread.c, dbxread.c, elfread.c, hp-psymtab-read.c,
hp-symtab-read.c, hpread.c, mdebugread.c, minsyms.c,
mipsread.c, objfiles.c, os9kread.c, pa64solib.c, partial-stab.h,
remote-os9k.c, remote-vx.c, remote.c, rs6000-nat.c, somsolib.c,
stabsread.c, symfile.c, xcoffread.c:
Update use of SECT_OFF_{TEXT,DATA,BSS,RODATA} to depend on the
current objfile.
* xcoffread.c: Add new field objfile to find_targ_sec_arg.
2000-05-05 00:52:34 +08:00
|
|
|
|
tmpaddr = cs->c_value + ANOFFSET (objfile->section_offsets, SECT_OFF_TEXT (objfile));
|
1999-04-16 09:35:26 +08:00
|
|
|
|
record_minimal_symbol (cs->c_name, tmpaddr, mst_text, objfile);
|
|
|
|
|
|
|
|
|
|
fcn_line_ptr = main_aux.x_sym.x_fcnary.x_fcn.x_lnnoptr;
|
|
|
|
|
fcn_start_addr = tmpaddr;
|
|
|
|
|
fcn_cs_saved = *cs;
|
|
|
|
|
fcn_sym_saved = main_sym;
|
|
|
|
|
fcn_aux_saved = main_aux;
|
|
|
|
|
continue;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
switch (cs->c_sclass)
|
|
|
|
|
{
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case C_EFCN:
|
|
|
|
|
case C_EXTDEF:
|
|
|
|
|
case C_ULABEL:
|
|
|
|
|
case C_USTATIC:
|
|
|
|
|
case C_LINE:
|
|
|
|
|
case C_ALIAS:
|
|
|
|
|
case C_HIDDEN:
|
2002-12-17 08:39:08 +08:00
|
|
|
|
complaint (&symfile_complaints, "Bad n_sclass for symbol %s",
|
|
|
|
|
cs->c_name);
|
1999-07-08 04:19:36 +08:00
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case C_FILE:
|
|
|
|
|
/* c_value field contains symnum of next .file entry in table
|
|
|
|
|
or symnum of first global after last .file. */
|
|
|
|
|
next_file_symnum = cs->c_value;
|
|
|
|
|
if (cs->c_naux > 0)
|
|
|
|
|
filestring = coff_getfilename (&main_aux);
|
|
|
|
|
else
|
|
|
|
|
filestring = "";
|
|
|
|
|
|
|
|
|
|
/* Complete symbol table for last object file
|
|
|
|
|
containing debugging information. */
|
|
|
|
|
if (last_source_file)
|
|
|
|
|
{
|
|
|
|
|
coff_end_symtab (objfile);
|
|
|
|
|
coff_start_symtab (filestring);
|
|
|
|
|
}
|
|
|
|
|
in_source_file = 1;
|
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
/* C_LABEL is used for labels and static functions. Including
|
|
|
|
|
it here allows gdb to see static functions when no debug
|
|
|
|
|
info is available. */
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case C_LABEL:
|
|
|
|
|
/* However, labels within a function can make weird backtraces,
|
|
|
|
|
so filter them out (from phdm@macqel.be). */
|
|
|
|
|
if (within_function)
|
|
|
|
|
break;
|
|
|
|
|
case C_STAT:
|
|
|
|
|
case C_THUMBLABEL:
|
|
|
|
|
case C_THUMBSTAT:
|
|
|
|
|
case C_THUMBSTATFUNC:
|
|
|
|
|
if (cs->c_name[0] == '.')
|
|
|
|
|
{
|
2003-11-23 Andrew Cagney <cagney@redhat.com>
* symfile.c (symbol_file_command): Replace STREQ with strcmp.
* defs.h (DEPRECATED_STREQN): Rename STREQN.
(DEPRECATED_STREQ): Rename STREQ.
* ada-exp.y, ada-lang.c, ada-lex.l, coffread.c: Update.
* config/mips/tm-irix5.h, config/mips/tm-irix6.h: Update.
* config/mips/tm-mipsv4.h, config/sparc/tm-sun4sol2.h: Update.
* dbxread.c, dwarf2read.c, dwarfread.c, environ.c: Update.
* eval.c, exec.c, f-lang.c, hppa-tdep.c, hpread.c: Update.
* jv-exp.y, language.c, m2-exp.y, mcore-rom.c: Update.
* mdebugread.c, mipsread.c, objc-exp.y, objfiles.c: Update.
* p-exp.y, p-typeprint.c, p-valprint.c, rs6000-nat.c: Update.
* source.c, sparc-tdep.c, stack.c, target.c: Update.
2003-11-24 04:41:17 +08:00
|
|
|
|
if (DEPRECATED_STREQ (cs->c_name, ".text"))
|
1999-07-08 04:19:36 +08:00
|
|
|
|
{
|
1999-04-16 09:35:26 +08:00
|
|
|
|
/* FIXME: don't wire in ".text" as section name
|
|
|
|
|
or symbol name! */
|
|
|
|
|
/* Check for in_source_file deals with case of
|
|
|
|
|
a file with debugging symbols
|
|
|
|
|
followed by a later file with no symbols. */
|
|
|
|
|
if (in_source_file)
|
|
|
|
|
complete_symtab (filestring,
|
Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* objfiles.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Define as functions of OBJFILE. Add
sect_index_text, sect_index_data, sect_index_rodata,
sect_index_bss to objfile structure.
* gdb-stabs.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Remove.
* objfiles.c (allocate_objfile): Initialize
sect_index_{text,data,bss,rodata} to -1, for error detection.
* symfile.c (default_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata} from bfd information.
* xcoffread.c (xcoff_symfile_offsets): Ditto.
* somread.c (som_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata}.
* coffread.c, dbxread.c, elfread.c, hp-psymtab-read.c,
hp-symtab-read.c, hpread.c, mdebugread.c, minsyms.c,
mipsread.c, objfiles.c, os9kread.c, pa64solib.c, partial-stab.h,
remote-os9k.c, remote-vx.c, remote.c, rs6000-nat.c, somsolib.c,
stabsread.c, symfile.c, xcoffread.c:
Update use of SECT_OFF_{TEXT,DATA,BSS,RODATA} to depend on the
current objfile.
* xcoffread.c: Add new field objfile to find_targ_sec_arg.
2000-05-05 00:52:34 +08:00
|
|
|
|
cs->c_value + ANOFFSET (objfile->section_offsets, SECT_OFF_TEXT (objfile)),
|
1999-04-16 09:35:26 +08:00
|
|
|
|
main_aux.x_scn.x_scnlen);
|
|
|
|
|
in_source_file = 0;
|
|
|
|
|
}
|
1999-07-08 04:19:36 +08:00
|
|
|
|
/* flush rest of '.' symbols */
|
1999-04-16 09:35:26 +08:00
|
|
|
|
break;
|
1999-07-08 04:19:36 +08:00
|
|
|
|
}
|
|
|
|
|
else if (!SDB_TYPE (cs->c_type)
|
|
|
|
|
&& cs->c_name[0] == 'L'
|
|
|
|
|
&& (strncmp (cs->c_name, "LI%", 3) == 0
|
|
|
|
|
|| strncmp (cs->c_name, "LF%", 3) == 0
|
|
|
|
|
|| strncmp (cs->c_name, "LC%", 3) == 0
|
|
|
|
|
|| strncmp (cs->c_name, "LP%", 3) == 0
|
|
|
|
|
|| strncmp (cs->c_name, "LPB%", 4) == 0
|
|
|
|
|
|| strncmp (cs->c_name, "LBB%", 4) == 0
|
|
|
|
|
|| strncmp (cs->c_name, "LBE%", 4) == 0
|
|
|
|
|
|| strncmp (cs->c_name, "LPBX%", 5) == 0))
|
|
|
|
|
/* At least on a 3b1, gcc generates swbeg and string labels
|
|
|
|
|
that look like this. Ignore them. */
|
|
|
|
|
break;
|
|
|
|
|
/* fall in for static symbols that don't start with '.' */
|
|
|
|
|
case C_THUMBEXT:
|
|
|
|
|
case C_THUMBEXTFUNC:
|
|
|
|
|
case C_EXT:
|
|
|
|
|
{
|
|
|
|
|
/* Record it in the minimal symbols regardless of
|
|
|
|
|
SDB_TYPE. This parallels what we do for other debug
|
|
|
|
|
formats, and probably is needed to make
|
|
|
|
|
print_address_symbolic work right without the (now
|
|
|
|
|
gone) "set fast-symbolic-addr off" kludge. */
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
enum minimal_symbol_type ms_type;
|
|
|
|
|
int sec;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
if (cs->c_secnum == N_UNDEF)
|
|
|
|
|
{
|
|
|
|
|
/* This is a common symbol. See if the target
|
|
|
|
|
environment knows where it has been relocated to. */
|
|
|
|
|
CORE_ADDR reladdr;
|
|
|
|
|
if (target_lookup_symbol (cs->c_name, &reladdr))
|
|
|
|
|
{
|
|
|
|
|
/* Error in lookup; ignore symbol. */
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
tmpaddr = reladdr;
|
|
|
|
|
/* The address has already been relocated; make sure that
|
|
|
|
|
objfile_relocate doesn't relocate it again. */
|
|
|
|
|
sec = -2;
|
|
|
|
|
ms_type = cs->c_sclass == C_EXT
|
|
|
|
|
|| cs->c_sclass == C_THUMBEXT ?
|
|
|
|
|
mst_bss : mst_file_bss;
|
|
|
|
|
}
|
2003-05-24 00:16:00 +08:00
|
|
|
|
else if (cs->c_secnum == N_ABS)
|
|
|
|
|
{
|
|
|
|
|
/* Use the correct minimal symbol type (and don't
|
|
|
|
|
relocate) for absolute values. */
|
|
|
|
|
ms_type = mst_abs;
|
|
|
|
|
sec = cs_to_section (cs, objfile);
|
|
|
|
|
tmpaddr = cs->c_value;
|
|
|
|
|
}
|
1999-07-08 04:19:36 +08:00
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
sec = cs_to_section (cs, objfile);
|
|
|
|
|
tmpaddr = cs->c_value;
|
2003-05-24 00:16:00 +08:00
|
|
|
|
/* Statics in a PE file also get relocated */
|
|
|
|
|
if (cs->c_sclass == C_EXT
|
|
|
|
|
|| cs->c_sclass == C_THUMBEXTFUNC
|
|
|
|
|
|| cs->c_sclass == C_THUMBEXT
|
|
|
|
|
|| (pe_file && (cs->c_sclass == C_STAT)))
|
1999-08-10 05:36:23 +08:00
|
|
|
|
tmpaddr += ANOFFSET (objfile->section_offsets, sec);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
2000-05-12 04:39:58 +08:00
|
|
|
|
if (sec == SECT_OFF_TEXT (objfile))
|
1999-07-08 04:19:36 +08:00
|
|
|
|
{
|
|
|
|
|
ms_type =
|
|
|
|
|
cs->c_sclass == C_EXT || cs->c_sclass == C_THUMBEXTFUNC
|
|
|
|
|
|| cs->c_sclass == C_THUMBEXT ?
|
|
|
|
|
mst_text : mst_file_text;
|
2002-02-04 19:55:36 +08:00
|
|
|
|
tmpaddr = SMASH_TEXT_ADDRESS (tmpaddr);
|
Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* objfiles.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Define as functions of OBJFILE. Add
sect_index_text, sect_index_data, sect_index_rodata,
sect_index_bss to objfile structure.
* gdb-stabs.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Remove.
* objfiles.c (allocate_objfile): Initialize
sect_index_{text,data,bss,rodata} to -1, for error detection.
* symfile.c (default_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata} from bfd information.
* xcoffread.c (xcoff_symfile_offsets): Ditto.
* somread.c (som_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata}.
* coffread.c, dbxread.c, elfread.c, hp-psymtab-read.c,
hp-symtab-read.c, hpread.c, mdebugread.c, minsyms.c,
mipsread.c, objfiles.c, os9kread.c, pa64solib.c, partial-stab.h,
remote-os9k.c, remote-vx.c, remote.c, rs6000-nat.c, somsolib.c,
stabsread.c, symfile.c, xcoffread.c:
Update use of SECT_OFF_{TEXT,DATA,BSS,RODATA} to depend on the
current objfile.
* xcoffread.c: Add new field objfile to find_targ_sec_arg.
2000-05-05 00:52:34 +08:00
|
|
|
|
}
|
2000-06-12 22:05:44 +08:00
|
|
|
|
else if (sec == SECT_OFF_DATA (objfile))
|
|
|
|
|
{
|
1999-07-08 04:19:36 +08:00
|
|
|
|
ms_type =
|
|
|
|
|
cs->c_sclass == C_EXT || cs->c_sclass == C_THUMBEXT ?
|
|
|
|
|
mst_data : mst_file_data;
|
2000-06-12 22:05:44 +08:00
|
|
|
|
}
|
|
|
|
|
else if (sec == SECT_OFF_BSS (objfile))
|
|
|
|
|
{
|
1999-07-08 04:19:36 +08:00
|
|
|
|
ms_type =
|
|
|
|
|
cs->c_sclass == C_EXT || cs->c_sclass == C_THUMBEXT ?
|
|
|
|
|
mst_data : mst_file_data;
|
2000-06-12 22:05:44 +08:00
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
ms_type = mst_unknown;
|
1999-07-08 04:19:36 +08:00
|
|
|
|
}
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
if (cs->c_name[0] != '@' /* Skip tdesc symbols */ )
|
|
|
|
|
{
|
|
|
|
|
struct minimal_symbol *msym;
|
|
|
|
|
msym = prim_record_minimal_symbol_and_info
|
2003-11-05 23:30:35 +08:00
|
|
|
|
(cs->c_name, tmpaddr, ms_type, NULL,
|
2001-03-26 10:50:46 +08:00
|
|
|
|
sec, NULL, objfile);
|
1999-07-08 04:19:36 +08:00
|
|
|
|
if (msym)
|
|
|
|
|
COFF_MAKE_MSYMBOL_SPECIAL (cs->c_sclass, msym);
|
|
|
|
|
}
|
|
|
|
|
if (SDB_TYPE (cs->c_type))
|
|
|
|
|
{
|
|
|
|
|
struct symbol *sym;
|
|
|
|
|
sym = process_coff_symbol
|
1999-08-10 05:36:23 +08:00
|
|
|
|
(cs, &main_aux, objfile);
|
1999-07-08 04:19:36 +08:00
|
|
|
|
SYMBOL_VALUE (sym) = tmpaddr;
|
|
|
|
|
SYMBOL_SECTION (sym) = sec;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case C_FCN:
|
2003-11-23 Andrew Cagney <cagney@redhat.com>
* symfile.c (symbol_file_command): Replace STREQ with strcmp.
* defs.h (DEPRECATED_STREQN): Rename STREQN.
(DEPRECATED_STREQ): Rename STREQ.
* ada-exp.y, ada-lang.c, ada-lex.l, coffread.c: Update.
* config/mips/tm-irix5.h, config/mips/tm-irix6.h: Update.
* config/mips/tm-mipsv4.h, config/sparc/tm-sun4sol2.h: Update.
* dbxread.c, dwarf2read.c, dwarfread.c, environ.c: Update.
* eval.c, exec.c, f-lang.c, hppa-tdep.c, hpread.c: Update.
* jv-exp.y, language.c, m2-exp.y, mcore-rom.c: Update.
* mdebugread.c, mipsread.c, objc-exp.y, objfiles.c: Update.
* p-exp.y, p-typeprint.c, p-valprint.c, rs6000-nat.c: Update.
* source.c, sparc-tdep.c, stack.c, target.c: Update.
2003-11-24 04:41:17 +08:00
|
|
|
|
if (DEPRECATED_STREQ (cs->c_name, ".bf"))
|
1999-07-08 04:19:36 +08:00
|
|
|
|
{
|
|
|
|
|
within_function = 1;
|
|
|
|
|
|
|
|
|
|
/* value contains address of first non-init type code */
|
|
|
|
|
/* main_aux.x_sym.x_misc.x_lnsz.x_lnno
|
|
|
|
|
contains line number of '{' } */
|
|
|
|
|
if (cs->c_naux != 1)
|
2002-12-17 08:39:08 +08:00
|
|
|
|
complaint (&symfile_complaints,
|
|
|
|
|
"`.bf' symbol %d has no aux entry", cs->c_symnum);
|
1999-07-08 04:19:36 +08:00
|
|
|
|
fcn_first_line = main_aux.x_sym.x_misc.x_lnsz.x_lnno;
|
|
|
|
|
fcn_first_line_addr = cs->c_value;
|
|
|
|
|
|
|
|
|
|
/* Might want to check that locals are 0 and
|
|
|
|
|
context_stack_depth is zero, and complain if not. */
|
|
|
|
|
|
|
|
|
|
depth = 0;
|
|
|
|
|
new = push_context (depth, fcn_start_addr);
|
|
|
|
|
fcn_cs_saved.c_name = getsymname (&fcn_sym_saved);
|
|
|
|
|
new->name =
|
1999-08-10 05:36:23 +08:00
|
|
|
|
process_coff_symbol (&fcn_cs_saved, &fcn_aux_saved, objfile);
|
1999-07-08 04:19:36 +08:00
|
|
|
|
}
|
2003-11-23 Andrew Cagney <cagney@redhat.com>
* symfile.c (symbol_file_command): Replace STREQ with strcmp.
* defs.h (DEPRECATED_STREQN): Rename STREQN.
(DEPRECATED_STREQ): Rename STREQ.
* ada-exp.y, ada-lang.c, ada-lex.l, coffread.c: Update.
* config/mips/tm-irix5.h, config/mips/tm-irix6.h: Update.
* config/mips/tm-mipsv4.h, config/sparc/tm-sun4sol2.h: Update.
* dbxread.c, dwarf2read.c, dwarfread.c, environ.c: Update.
* eval.c, exec.c, f-lang.c, hppa-tdep.c, hpread.c: Update.
* jv-exp.y, language.c, m2-exp.y, mcore-rom.c: Update.
* mdebugread.c, mipsread.c, objc-exp.y, objfiles.c: Update.
* p-exp.y, p-typeprint.c, p-valprint.c, rs6000-nat.c: Update.
* source.c, sparc-tdep.c, stack.c, target.c: Update.
2003-11-24 04:41:17 +08:00
|
|
|
|
else if (DEPRECATED_STREQ (cs->c_name, ".ef"))
|
1999-07-08 04:19:36 +08:00
|
|
|
|
{
|
2001-03-26 10:48:23 +08:00
|
|
|
|
if (!within_function)
|
|
|
|
|
error ("Bad coff function information\n");
|
1999-07-08 04:19:36 +08:00
|
|
|
|
/* the value of .ef is the address of epilogue code;
|
|
|
|
|
not useful for gdb. */
|
|
|
|
|
/* { main_aux.x_sym.x_misc.x_lnsz.x_lnno
|
|
|
|
|
contains number of lines to '}' */
|
|
|
|
|
|
|
|
|
|
if (context_stack_depth <= 0)
|
|
|
|
|
{ /* We attempted to pop an empty context stack */
|
2002-12-17 08:39:08 +08:00
|
|
|
|
complaint (&symfile_complaints,
|
|
|
|
|
"`.ef' symbol without matching `.bf' symbol ignored starting at symnum %d",
|
|
|
|
|
cs->c_symnum);
|
1999-07-08 04:19:36 +08:00
|
|
|
|
within_function = 0;
|
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
}
|
1999-07-08 04:19:36 +08:00
|
|
|
|
|
|
|
|
|
new = pop_context ();
|
|
|
|
|
/* Stack must be empty now. */
|
|
|
|
|
if (context_stack_depth > 0 || new == NULL)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
2002-12-17 08:39:08 +08:00
|
|
|
|
complaint (&symfile_complaints,
|
|
|
|
|
"Unmatched .ef symbol(s) ignored starting at symnum %d",
|
|
|
|
|
cs->c_symnum);
|
1999-07-08 04:19:36 +08:00
|
|
|
|
within_function = 0;
|
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
}
|
1999-07-08 04:19:36 +08:00
|
|
|
|
if (cs->c_naux != 1)
|
|
|
|
|
{
|
2002-12-17 08:39:08 +08:00
|
|
|
|
complaint (&symfile_complaints,
|
|
|
|
|
"`.ef' symbol %d has no aux entry", cs->c_symnum);
|
1999-07-08 04:19:36 +08:00
|
|
|
|
fcn_last_line = 0x7FFFFFFF;
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
fcn_last_line = main_aux.x_sym.x_misc.x_lnsz.x_lnno;
|
|
|
|
|
}
|
|
|
|
|
/* fcn_first_line is the line number of the opening '{'.
|
|
|
|
|
Do not record it - because it would affect gdb's idea
|
|
|
|
|
of the line number of the first statement of the function -
|
|
|
|
|
except for one-line functions, for which it is also the line
|
|
|
|
|
number of all the statements and of the closing '}', and
|
|
|
|
|
for which we do not have any other statement-line-number. */
|
|
|
|
|
if (fcn_last_line == 1)
|
|
|
|
|
record_line (current_subfile, fcn_first_line,
|
|
|
|
|
fcn_first_line_addr);
|
|
|
|
|
else
|
|
|
|
|
enter_linenos (fcn_line_ptr, fcn_first_line, fcn_last_line,
|
1999-09-09 08:02:17 +08:00
|
|
|
|
objfile);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
finish_block (new->name, &local_symbols, new->old_blocks,
|
|
|
|
|
new->start_addr,
|
1999-04-16 09:35:26 +08:00
|
|
|
|
#if defined (FUNCTION_EPILOGUE_SIZE)
|
1999-07-08 04:19:36 +08:00
|
|
|
|
/* This macro should be defined only on
|
|
|
|
|
machines where the
|
|
|
|
|
fcn_aux_saved.x_sym.x_misc.x_fsize
|
|
|
|
|
field is always zero.
|
|
|
|
|
So use the .bf record information that
|
|
|
|
|
points to the epilogue and add the size
|
|
|
|
|
of the epilogue. */
|
|
|
|
|
cs->c_value
|
|
|
|
|
+ FUNCTION_EPILOGUE_SIZE
|
Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* objfiles.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Define as functions of OBJFILE. Add
sect_index_text, sect_index_data, sect_index_rodata,
sect_index_bss to objfile structure.
* gdb-stabs.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Remove.
* objfiles.c (allocate_objfile): Initialize
sect_index_{text,data,bss,rodata} to -1, for error detection.
* symfile.c (default_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata} from bfd information.
* xcoffread.c (xcoff_symfile_offsets): Ditto.
* somread.c (som_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata}.
* coffread.c, dbxread.c, elfread.c, hp-psymtab-read.c,
hp-symtab-read.c, hpread.c, mdebugread.c, minsyms.c,
mipsread.c, objfiles.c, os9kread.c, pa64solib.c, partial-stab.h,
remote-os9k.c, remote-vx.c, remote.c, rs6000-nat.c, somsolib.c,
stabsread.c, symfile.c, xcoffread.c:
Update use of SECT_OFF_{TEXT,DATA,BSS,RODATA} to depend on the
current objfile.
* xcoffread.c: Add new field objfile to find_targ_sec_arg.
2000-05-05 00:52:34 +08:00
|
|
|
|
+ ANOFFSET (objfile->section_offsets, SECT_OFF_TEXT (objfile)),
|
1999-04-16 09:35:26 +08:00
|
|
|
|
#else
|
1999-07-08 04:19:36 +08:00
|
|
|
|
fcn_cs_saved.c_value
|
|
|
|
|
+ fcn_aux_saved.x_sym.x_misc.x_fsize
|
Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* objfiles.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Define as functions of OBJFILE. Add
sect_index_text, sect_index_data, sect_index_rodata,
sect_index_bss to objfile structure.
* gdb-stabs.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Remove.
* objfiles.c (allocate_objfile): Initialize
sect_index_{text,data,bss,rodata} to -1, for error detection.
* symfile.c (default_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata} from bfd information.
* xcoffread.c (xcoff_symfile_offsets): Ditto.
* somread.c (som_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata}.
* coffread.c, dbxread.c, elfread.c, hp-psymtab-read.c,
hp-symtab-read.c, hpread.c, mdebugread.c, minsyms.c,
mipsread.c, objfiles.c, os9kread.c, pa64solib.c, partial-stab.h,
remote-os9k.c, remote-vx.c, remote.c, rs6000-nat.c, somsolib.c,
stabsread.c, symfile.c, xcoffread.c:
Update use of SECT_OFF_{TEXT,DATA,BSS,RODATA} to depend on the
current objfile.
* xcoffread.c: Add new field objfile to find_targ_sec_arg.
2000-05-05 00:52:34 +08:00
|
|
|
|
+ ANOFFSET (objfile->section_offsets, SECT_OFF_TEXT (objfile)),
|
1999-04-16 09:35:26 +08:00
|
|
|
|
#endif
|
1999-07-08 04:19:36 +08:00
|
|
|
|
objfile
|
|
|
|
|
);
|
|
|
|
|
within_function = 0;
|
|
|
|
|
}
|
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case C_BLOCK:
|
2003-11-23 Andrew Cagney <cagney@redhat.com>
* symfile.c (symbol_file_command): Replace STREQ with strcmp.
* defs.h (DEPRECATED_STREQN): Rename STREQN.
(DEPRECATED_STREQ): Rename STREQ.
* ada-exp.y, ada-lang.c, ada-lex.l, coffread.c: Update.
* config/mips/tm-irix5.h, config/mips/tm-irix6.h: Update.
* config/mips/tm-mipsv4.h, config/sparc/tm-sun4sol2.h: Update.
* dbxread.c, dwarf2read.c, dwarfread.c, environ.c: Update.
* eval.c, exec.c, f-lang.c, hppa-tdep.c, hpread.c: Update.
* jv-exp.y, language.c, m2-exp.y, mcore-rom.c: Update.
* mdebugread.c, mipsread.c, objc-exp.y, objfiles.c: Update.
* p-exp.y, p-typeprint.c, p-valprint.c, rs6000-nat.c: Update.
* source.c, sparc-tdep.c, stack.c, target.c: Update.
2003-11-24 04:41:17 +08:00
|
|
|
|
if (DEPRECATED_STREQ (cs->c_name, ".bb"))
|
1999-07-08 04:19:36 +08:00
|
|
|
|
{
|
|
|
|
|
tmpaddr = cs->c_value;
|
Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* objfiles.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Define as functions of OBJFILE. Add
sect_index_text, sect_index_data, sect_index_rodata,
sect_index_bss to objfile structure.
* gdb-stabs.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Remove.
* objfiles.c (allocate_objfile): Initialize
sect_index_{text,data,bss,rodata} to -1, for error detection.
* symfile.c (default_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata} from bfd information.
* xcoffread.c (xcoff_symfile_offsets): Ditto.
* somread.c (som_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata}.
* coffread.c, dbxread.c, elfread.c, hp-psymtab-read.c,
hp-symtab-read.c, hpread.c, mdebugread.c, minsyms.c,
mipsread.c, objfiles.c, os9kread.c, pa64solib.c, partial-stab.h,
remote-os9k.c, remote-vx.c, remote.c, rs6000-nat.c, somsolib.c,
stabsread.c, symfile.c, xcoffread.c:
Update use of SECT_OFF_{TEXT,DATA,BSS,RODATA} to depend on the
current objfile.
* xcoffread.c: Add new field objfile to find_targ_sec_arg.
2000-05-05 00:52:34 +08:00
|
|
|
|
tmpaddr += ANOFFSET (objfile->section_offsets, SECT_OFF_TEXT (objfile));
|
1999-07-08 04:19:36 +08:00
|
|
|
|
push_context (++depth, tmpaddr);
|
|
|
|
|
}
|
2003-11-23 Andrew Cagney <cagney@redhat.com>
* symfile.c (symbol_file_command): Replace STREQ with strcmp.
* defs.h (DEPRECATED_STREQN): Rename STREQN.
(DEPRECATED_STREQ): Rename STREQ.
* ada-exp.y, ada-lang.c, ada-lex.l, coffread.c: Update.
* config/mips/tm-irix5.h, config/mips/tm-irix6.h: Update.
* config/mips/tm-mipsv4.h, config/sparc/tm-sun4sol2.h: Update.
* dbxread.c, dwarf2read.c, dwarfread.c, environ.c: Update.
* eval.c, exec.c, f-lang.c, hppa-tdep.c, hpread.c: Update.
* jv-exp.y, language.c, m2-exp.y, mcore-rom.c: Update.
* mdebugread.c, mipsread.c, objc-exp.y, objfiles.c: Update.
* p-exp.y, p-typeprint.c, p-valprint.c, rs6000-nat.c: Update.
* source.c, sparc-tdep.c, stack.c, target.c: Update.
2003-11-24 04:41:17 +08:00
|
|
|
|
else if (DEPRECATED_STREQ (cs->c_name, ".eb"))
|
1999-07-08 04:19:36 +08:00
|
|
|
|
{
|
|
|
|
|
if (context_stack_depth <= 0)
|
|
|
|
|
{ /* We attempted to pop an empty context stack */
|
2002-12-17 08:39:08 +08:00
|
|
|
|
complaint (&symfile_complaints,
|
|
|
|
|
"`.eb' symbol without matching `.bb' symbol ignored starting at symnum %d",
|
|
|
|
|
cs->c_symnum);
|
1999-07-08 04:19:36 +08:00
|
|
|
|
break;
|
|
|
|
|
}
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
new = pop_context ();
|
|
|
|
|
if (depth-- != new->depth)
|
|
|
|
|
{
|
2002-12-17 08:39:08 +08:00
|
|
|
|
complaint (&symfile_complaints,
|
|
|
|
|
"Mismatched .eb symbol ignored starting at symnum %d",
|
|
|
|
|
symnum);
|
1999-07-08 04:19:36 +08:00
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
if (local_symbols && context_stack_depth > 0)
|
|
|
|
|
{
|
|
|
|
|
tmpaddr =
|
Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* objfiles.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Define as functions of OBJFILE. Add
sect_index_text, sect_index_data, sect_index_rodata,
sect_index_bss to objfile structure.
* gdb-stabs.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Remove.
* objfiles.c (allocate_objfile): Initialize
sect_index_{text,data,bss,rodata} to -1, for error detection.
* symfile.c (default_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata} from bfd information.
* xcoffread.c (xcoff_symfile_offsets): Ditto.
* somread.c (som_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata}.
* coffread.c, dbxread.c, elfread.c, hp-psymtab-read.c,
hp-symtab-read.c, hpread.c, mdebugread.c, minsyms.c,
mipsread.c, objfiles.c, os9kread.c, pa64solib.c, partial-stab.h,
remote-os9k.c, remote-vx.c, remote.c, rs6000-nat.c, somsolib.c,
stabsread.c, symfile.c, xcoffread.c:
Update use of SECT_OFF_{TEXT,DATA,BSS,RODATA} to depend on the
current objfile.
* xcoffread.c: Add new field objfile to find_targ_sec_arg.
2000-05-05 00:52:34 +08:00
|
|
|
|
cs->c_value + ANOFFSET (objfile->section_offsets, SECT_OFF_TEXT (objfile));
|
1999-07-08 04:19:36 +08:00
|
|
|
|
/* Make a block for the local symbols within. */
|
|
|
|
|
finish_block (0, &local_symbols, new->old_blocks,
|
|
|
|
|
new->start_addr, tmpaddr, objfile);
|
|
|
|
|
}
|
|
|
|
|
/* Now pop locals of block just finished. */
|
|
|
|
|
local_symbols = new->locals;
|
|
|
|
|
}
|
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
default:
|
1999-08-10 05:36:23 +08:00
|
|
|
|
process_coff_symbol (cs, &main_aux, objfile);
|
1999-07-08 04:19:36 +08:00
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
2003-02-20 11:12:46 +08:00
|
|
|
|
if ((nsyms == 0) && (pe_file))
|
|
|
|
|
{
|
|
|
|
|
/* We've got no debugging symbols, but it's is a portable
|
|
|
|
|
executable, so try to read the export table */
|
|
|
|
|
read_pe_exported_syms (objfile);
|
|
|
|
|
}
|
|
|
|
|
|
1999-04-16 09:35:26 +08:00
|
|
|
|
if (last_source_file)
|
|
|
|
|
coff_end_symtab (objfile);
|
|
|
|
|
|
|
|
|
|
/* Patch up any opaque types (references to types that are not defined
|
|
|
|
|
in the file where they are referenced, e.g. "struct foo *bar"). */
|
|
|
|
|
ALL_OBJFILE_SYMTABS (objfile, s)
|
|
|
|
|
patch_opaque_types (s);
|
|
|
|
|
|
|
|
|
|
current_objfile = NULL;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Routines for reading headers and symbols from executable. */
|
|
|
|
|
|
|
|
|
|
/* Read the next symbol, swap it, and return it in both internal_syment
|
|
|
|
|
form, and coff_symbol form. Also return its first auxent, if any,
|
|
|
|
|
in internal_auxent form, and skip any other auxents. */
|
|
|
|
|
|
|
|
|
|
static void
|
2003-09-16 Andrew Cagney <cagney@redhat.com>
* buildsym.c: Remove more occurances of "register".
* coffread.c, dbxread.c, dcache.c, dwarf2read.c: Ditto.
* environ.c, eval.c, f-valprint.c, findvar.c: Ditto.
* gdbtypes.c, gnu-v2-abi.c, h8300-tdep.c, hppa-tdep.c: Ditto.
* infcmd.c, mdebugread.c, minsyms.c, mips-tdep.c: Ditto.
* printcmd.c, remote-vx.c, sh-stub.c, sh-tdep.c: Ditto.
* sh64-tdep.c, source.c, stabsread.c, stack.c: Ditto.
* standalone.c, symfile.c, symmisc.c, symtab.c: Ditto.
* utils.c, valops.c, values.c, xcoffread.c: Ditto.
2003-09-17 02:56:35 +08:00
|
|
|
|
read_one_sym (struct coff_symbol *cs,
|
|
|
|
|
struct internal_syment *sym,
|
|
|
|
|
union internal_auxent *aux)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
int i;
|
|
|
|
|
|
|
|
|
|
cs->c_symnum = symnum;
|
2001-09-20 11:03:40 +08:00
|
|
|
|
bfd_bread (temp_sym, local_symesz, nlist_bfd_global);
|
1999-07-08 04:19:36 +08:00
|
|
|
|
bfd_coff_swap_sym_in (symfile_bfd, temp_sym, (char *) sym);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
cs->c_naux = sym->n_numaux & 0xff;
|
|
|
|
|
if (cs->c_naux >= 1)
|
|
|
|
|
{
|
2001-09-20 11:03:40 +08:00
|
|
|
|
bfd_bread (temp_aux, local_auxesz, nlist_bfd_global);
|
1999-07-08 04:19:36 +08:00
|
|
|
|
bfd_coff_swap_aux_in (symfile_bfd, temp_aux, sym->n_type, sym->n_sclass,
|
|
|
|
|
0, cs->c_naux, (char *) aux);
|
|
|
|
|
/* If more than one aux entry, read past it (only the first aux
|
|
|
|
|
is important). */
|
|
|
|
|
for (i = 1; i < cs->c_naux; i++)
|
2001-09-20 11:03:40 +08:00
|
|
|
|
bfd_bread (temp_aux, local_auxesz, nlist_bfd_global);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
}
|
|
|
|
|
cs->c_name = getsymname (sym);
|
|
|
|
|
cs->c_value = sym->n_value;
|
|
|
|
|
cs->c_sclass = (sym->n_sclass & 0xff);
|
|
|
|
|
cs->c_secnum = sym->n_scnum;
|
|
|
|
|
cs->c_type = (unsigned) sym->n_type;
|
|
|
|
|
if (!SDB_TYPE (cs->c_type))
|
|
|
|
|
cs->c_type = 0;
|
|
|
|
|
|
|
|
|
|
#if 0
|
|
|
|
|
if (cs->c_sclass & 128)
|
1999-07-08 04:19:36 +08:00
|
|
|
|
printf ("thumb symbol %s, class 0x%x\n", cs->c_name, cs->c_sclass);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
symnum += 1 + cs->c_naux;
|
|
|
|
|
|
|
|
|
|
/* The PE file format stores symbol values as offsets within the
|
|
|
|
|
section, rather than as absolute addresses. We correct that
|
|
|
|
|
here, if the symbol has an appropriate storage class. FIXME: We
|
|
|
|
|
should use BFD to read the symbols, rather than duplicating the
|
|
|
|
|
work here. */
|
|
|
|
|
if (pe_file)
|
|
|
|
|
{
|
|
|
|
|
switch (cs->c_sclass)
|
|
|
|
|
{
|
|
|
|
|
case C_EXT:
|
|
|
|
|
case C_THUMBEXT:
|
|
|
|
|
case C_THUMBEXTFUNC:
|
|
|
|
|
case C_SECTION:
|
|
|
|
|
case C_NT_WEAK:
|
|
|
|
|
case C_STAT:
|
|
|
|
|
case C_THUMBSTAT:
|
|
|
|
|
case C_THUMBSTATFUNC:
|
|
|
|
|
case C_LABEL:
|
|
|
|
|
case C_THUMBLABEL:
|
|
|
|
|
case C_BLOCK:
|
|
|
|
|
case C_FCN:
|
|
|
|
|
case C_EFCN:
|
|
|
|
|
if (cs->c_secnum != 0)
|
|
|
|
|
cs->c_value += cs_section_address (cs, symfile_bfd);
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Support for string table handling */
|
|
|
|
|
|
|
|
|
|
static char *stringtab = NULL;
|
|
|
|
|
|
|
|
|
|
static int
|
2000-07-30 09:48:28 +08:00
|
|
|
|
init_stringtab (bfd *abfd, long offset)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
long length;
|
|
|
|
|
int val;
|
|
|
|
|
unsigned char lengthbuf[4];
|
|
|
|
|
|
|
|
|
|
free_stringtab ();
|
|
|
|
|
|
|
|
|
|
/* If the file is stripped, the offset might be zero, indicating no
|
|
|
|
|
string table. Just return with `stringtab' set to null. */
|
|
|
|
|
if (offset == 0)
|
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
|
|
if (bfd_seek (abfd, offset, 0) < 0)
|
|
|
|
|
return -1;
|
|
|
|
|
|
2001-09-20 11:03:40 +08:00
|
|
|
|
val = bfd_bread ((char *) lengthbuf, sizeof lengthbuf, abfd);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
length = bfd_h_get_32 (symfile_bfd, lengthbuf);
|
1999-07-08 04:19:36 +08:00
|
|
|
|
|
1999-04-16 09:35:26 +08:00
|
|
|
|
/* If no string table is needed, then the file may end immediately
|
|
|
|
|
after the symbols. Just return with `stringtab' set to null. */
|
|
|
|
|
if (val != sizeof lengthbuf || length < sizeof lengthbuf)
|
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
|
|
stringtab = (char *) xmalloc (length);
|
|
|
|
|
/* This is in target format (probably not very useful, and not currently
|
|
|
|
|
used), not host format. */
|
|
|
|
|
memcpy (stringtab, lengthbuf, sizeof lengthbuf);
|
1999-07-08 04:19:36 +08:00
|
|
|
|
if (length == sizeof length) /* Empty table -- just the count */
|
1999-04-16 09:35:26 +08:00
|
|
|
|
return 0;
|
|
|
|
|
|
2001-09-20 11:03:40 +08:00
|
|
|
|
val = bfd_bread (stringtab + sizeof lengthbuf, length - sizeof lengthbuf,
|
|
|
|
|
abfd);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
if (val != length - sizeof lengthbuf || stringtab[length - 1] != '\0')
|
|
|
|
|
return -1;
|
|
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void
|
2000-07-30 09:48:28 +08:00
|
|
|
|
free_stringtab (void)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
if (stringtab)
|
2000-12-15 09:01:51 +08:00
|
|
|
|
xfree (stringtab);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
stringtab = NULL;
|
|
|
|
|
}
|
|
|
|
|
|
2000-05-22 17:02:23 +08:00
|
|
|
|
static void
|
|
|
|
|
free_stringtab_cleanup (void *ignore)
|
|
|
|
|
{
|
|
|
|
|
free_stringtab ();
|
|
|
|
|
}
|
|
|
|
|
|
1999-04-16 09:35:26 +08:00
|
|
|
|
static char *
|
2000-07-30 09:48:28 +08:00
|
|
|
|
getsymname (struct internal_syment *symbol_entry)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
1999-07-08 04:19:36 +08:00
|
|
|
|
static char buffer[SYMNMLEN + 1];
|
1999-04-16 09:35:26 +08:00
|
|
|
|
char *result;
|
|
|
|
|
|
|
|
|
|
if (symbol_entry->_n._n_n._n_zeroes == 0)
|
|
|
|
|
{
|
|
|
|
|
/* FIXME: Probably should be detecting corrupt symbol files by
|
1999-07-08 04:19:36 +08:00
|
|
|
|
seeing whether offset points to within the stringtab. */
|
1999-04-16 09:35:26 +08:00
|
|
|
|
result = stringtab + symbol_entry->_n._n_n._n_offset;
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
strncpy (buffer, symbol_entry->_n._n_name, SYMNMLEN);
|
|
|
|
|
buffer[SYMNMLEN] = '\0';
|
|
|
|
|
result = buffer;
|
|
|
|
|
}
|
|
|
|
|
return result;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Extract the file name from the aux entry of a C_FILE symbol. Return
|
|
|
|
|
only the last component of the name. Result is in static storage and
|
|
|
|
|
is only good for temporary use. */
|
|
|
|
|
|
|
|
|
|
static char *
|
2000-07-30 09:48:28 +08:00
|
|
|
|
coff_getfilename (union internal_auxent *aux_entry)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
static char buffer[BUFSIZ];
|
2003-09-14 Andrew Cagney <cagney@redhat.com>
* alpha-nat.c: Remove some occurances of "register".
* alpha-tdep.c, arm-tdep.c, blockframe.c, breakpoint.c: Ditto.
* buildsym.c, c-typeprint.c, c-valprint.c, coffread.c: Ditto.
* corefile.c, cp-support.c, cp-valprint.c, cris-tdep.c: Ditto.
* dbxread.c, dcache.c, dwarf2read.c, elfread.c: Ditto.
* environ.c, eval.c, event-top.c, f-typeprint.c: Ditto.
* f-valprint.c, findvar.c, frame.c, gdbtypes.c: Ditto.
* h8300-tdep.c, hppa-tdep.c, hppab-nat.c, hppah-nat.c: Ditto.
* hppam3-nat.c, hpread.c, ia64-aix-nat.c, ia64-linux-nat.c: Ditto.
* infcall.c, infcmd.c, inflow.c, infptrace.c, infrun.c: Ditto.
* infttrace.c, irix5-nat.c, jv-typeprint.c: Ditto.
* jv-valprint.c, m68k-tdep.c, m68klinux-nat.c, main.c: Ditto.
* mdebugread.c, minsyms.c, mips-linux-tdep.c: Ditto.
* mips-nat.c, mips-tdep.c, mipsread.c, mipsv4-nat.c: Ditto.
* ns32k-tdep.c, objfiles.c, p-typeprint.c: Ditto.
* p-valprint.c, ppc-linux-nat.c, printcmd.c: Ditto.
* remote-mips.c, remote-vx.c, rs6000-nat.c: Ditto.
* rs6000-tdep.c, scm-exp.c, sh-tdep.c, sh64-tdep.c: Ditto.
* solib.c, somread.c, source.c, sparc-tdep.c: Ditto.
* stabsread.c, stack.c, standalone.c, symfile.c: Ditto.
* symmisc.c, symtab.c, top.c, tracepoint.c: Ditto.
* typeprint.c, utils.c, valarith.c, valops.c: Ditto.
* values.c, vax-tdep.c, xcoffread.c: Ditto.
2003-09-15 00:32:14 +08:00
|
|
|
|
char *temp;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
char *result;
|
|
|
|
|
|
|
|
|
|
if (aux_entry->x_file.x_n.x_zeroes == 0)
|
|
|
|
|
strcpy (buffer, stringtab + aux_entry->x_file.x_n.x_offset);
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
strncpy (buffer, aux_entry->x_file.x_fname, FILNMLEN);
|
|
|
|
|
buffer[FILNMLEN] = '\0';
|
|
|
|
|
}
|
|
|
|
|
result = buffer;
|
|
|
|
|
|
|
|
|
|
/* FIXME: We should not be throwing away the information about what
|
|
|
|
|
directory. It should go into dirname of the symtab, or some such
|
|
|
|
|
place. */
|
|
|
|
|
if ((temp = strrchr (result, '/')) != NULL)
|
|
|
|
|
result = temp + 1;
|
|
|
|
|
return (result);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Support for line number handling. */
|
|
|
|
|
|
|
|
|
|
static char *linetab = NULL;
|
|
|
|
|
static long linetab_offset;
|
|
|
|
|
static unsigned long linetab_size;
|
|
|
|
|
|
|
|
|
|
/* Read in all the line numbers for fast lookups later. Leave them in
|
|
|
|
|
external (unswapped) format in memory; we'll swap them as we enter
|
|
|
|
|
them into GDB's data structures. */
|
1999-07-08 04:19:36 +08:00
|
|
|
|
|
1999-04-16 09:35:26 +08:00
|
|
|
|
static int
|
2000-07-30 09:48:28 +08:00
|
|
|
|
init_lineno (bfd *abfd, long offset, int size)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
int val;
|
|
|
|
|
|
|
|
|
|
linetab_offset = offset;
|
|
|
|
|
linetab_size = size;
|
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
free_linetab ();
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
if (size == 0)
|
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
|
|
if (bfd_seek (abfd, offset, 0) < 0)
|
|
|
|
|
return -1;
|
1999-07-08 04:19:36 +08:00
|
|
|
|
|
1999-04-16 09:35:26 +08:00
|
|
|
|
/* Allocate the desired table, plus a sentinel */
|
|
|
|
|
linetab = (char *) xmalloc (size + local_linesz);
|
|
|
|
|
|
2001-09-20 11:03:40 +08:00
|
|
|
|
val = bfd_bread (linetab, size, abfd);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
if (val != size)
|
|
|
|
|
return -1;
|
|
|
|
|
|
|
|
|
|
/* Terminate it with an all-zero sentinel record */
|
|
|
|
|
memset (linetab + size, 0, local_linesz);
|
|
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void
|
2000-07-30 09:48:28 +08:00
|
|
|
|
free_linetab (void)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
if (linetab)
|
2000-12-15 09:01:51 +08:00
|
|
|
|
xfree (linetab);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
linetab = NULL;
|
|
|
|
|
}
|
|
|
|
|
|
2000-05-22 17:02:23 +08:00
|
|
|
|
static void
|
|
|
|
|
free_linetab_cleanup (void *ignore)
|
|
|
|
|
{
|
|
|
|
|
free_linetab ();
|
|
|
|
|
}
|
|
|
|
|
|
1999-04-16 09:35:26 +08:00
|
|
|
|
#if !defined (L_LNNO32)
|
|
|
|
|
#define L_LNNO32(lp) ((lp)->l_lnno)
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
static void
|
2003-09-16 Andrew Cagney <cagney@redhat.com>
* buildsym.c: Remove more occurances of "register".
* coffread.c, dbxread.c, dcache.c, dwarf2read.c: Ditto.
* environ.c, eval.c, f-valprint.c, findvar.c: Ditto.
* gdbtypes.c, gnu-v2-abi.c, h8300-tdep.c, hppa-tdep.c: Ditto.
* infcmd.c, mdebugread.c, minsyms.c, mips-tdep.c: Ditto.
* printcmd.c, remote-vx.c, sh-stub.c, sh-tdep.c: Ditto.
* sh64-tdep.c, source.c, stabsread.c, stack.c: Ditto.
* standalone.c, symfile.c, symmisc.c, symtab.c: Ditto.
* utils.c, valops.c, values.c, xcoffread.c: Ditto.
2003-09-17 02:56:35 +08:00
|
|
|
|
enter_linenos (long file_offset, int first_line,
|
|
|
|
|
int last_line, struct objfile *objfile)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
2003-09-14 Andrew Cagney <cagney@redhat.com>
* alpha-nat.c: Remove some occurances of "register".
* alpha-tdep.c, arm-tdep.c, blockframe.c, breakpoint.c: Ditto.
* buildsym.c, c-typeprint.c, c-valprint.c, coffread.c: Ditto.
* corefile.c, cp-support.c, cp-valprint.c, cris-tdep.c: Ditto.
* dbxread.c, dcache.c, dwarf2read.c, elfread.c: Ditto.
* environ.c, eval.c, event-top.c, f-typeprint.c: Ditto.
* f-valprint.c, findvar.c, frame.c, gdbtypes.c: Ditto.
* h8300-tdep.c, hppa-tdep.c, hppab-nat.c, hppah-nat.c: Ditto.
* hppam3-nat.c, hpread.c, ia64-aix-nat.c, ia64-linux-nat.c: Ditto.
* infcall.c, infcmd.c, inflow.c, infptrace.c, infrun.c: Ditto.
* infttrace.c, irix5-nat.c, jv-typeprint.c: Ditto.
* jv-valprint.c, m68k-tdep.c, m68klinux-nat.c, main.c: Ditto.
* mdebugread.c, minsyms.c, mips-linux-tdep.c: Ditto.
* mips-nat.c, mips-tdep.c, mipsread.c, mipsv4-nat.c: Ditto.
* ns32k-tdep.c, objfiles.c, p-typeprint.c: Ditto.
* p-valprint.c, ppc-linux-nat.c, printcmd.c: Ditto.
* remote-mips.c, remote-vx.c, rs6000-nat.c: Ditto.
* rs6000-tdep.c, scm-exp.c, sh-tdep.c, sh64-tdep.c: Ditto.
* solib.c, somread.c, source.c, sparc-tdep.c: Ditto.
* stabsread.c, stack.c, standalone.c, symfile.c: Ditto.
* symmisc.c, symtab.c, top.c, tracepoint.c: Ditto.
* typeprint.c, utils.c, valarith.c, valops.c: Ditto.
* values.c, vax-tdep.c, xcoffread.c: Ditto.
2003-09-15 00:32:14 +08:00
|
|
|
|
char *rawptr;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
struct internal_lineno lptr;
|
|
|
|
|
|
|
|
|
|
if (!linetab)
|
1999-07-08 04:19:36 +08:00
|
|
|
|
return;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
if (file_offset < linetab_offset)
|
|
|
|
|
{
|
2002-12-17 08:39:08 +08:00
|
|
|
|
complaint (&symfile_complaints,
|
|
|
|
|
"Line number pointer %ld lower than start of line numbers",
|
|
|
|
|
file_offset);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
if (file_offset > linetab_size) /* Too big to be an offset? */
|
|
|
|
|
return;
|
1999-07-08 04:19:36 +08:00
|
|
|
|
file_offset += linetab_offset; /* Try reading at that linetab offset */
|
1999-04-16 09:35:26 +08:00
|
|
|
|
}
|
1999-07-08 04:19:36 +08:00
|
|
|
|
|
1999-04-16 09:35:26 +08:00
|
|
|
|
rawptr = &linetab[file_offset - linetab_offset];
|
|
|
|
|
|
|
|
|
|
/* skip first line entry for each function */
|
|
|
|
|
rawptr += local_linesz;
|
|
|
|
|
/* line numbers start at one for the first line of the function */
|
|
|
|
|
first_line--;
|
|
|
|
|
|
2004-02-28 01:46:11 +08:00
|
|
|
|
/* If the line number table is full (e.g. 64K lines in COFF debug
|
|
|
|
|
info), the next function's L_LNNO32 might not be zero, so don't
|
|
|
|
|
overstep the table's end in any case. */
|
|
|
|
|
while (rawptr <= &linetab[0] + linetab_size)
|
1999-07-08 04:19:36 +08:00
|
|
|
|
{
|
|
|
|
|
bfd_coff_swap_lineno_in (symfile_bfd, rawptr, &lptr);
|
|
|
|
|
rawptr += local_linesz;
|
2004-02-28 01:46:11 +08:00
|
|
|
|
/* The next function, or the sentinel, will have L_LNNO32 zero;
|
|
|
|
|
we exit. */
|
1999-07-08 04:19:36 +08:00
|
|
|
|
if (L_LNNO32 (&lptr) && L_LNNO32 (&lptr) <= last_line)
|
|
|
|
|
record_line (current_subfile, first_line + L_LNNO32 (&lptr),
|
|
|
|
|
lptr.l_addr.l_paddr
|
Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* objfiles.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Define as functions of OBJFILE. Add
sect_index_text, sect_index_data, sect_index_rodata,
sect_index_bss to objfile structure.
* gdb-stabs.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Remove.
* objfiles.c (allocate_objfile): Initialize
sect_index_{text,data,bss,rodata} to -1, for error detection.
* symfile.c (default_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata} from bfd information.
* xcoffread.c (xcoff_symfile_offsets): Ditto.
* somread.c (som_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata}.
* coffread.c, dbxread.c, elfread.c, hp-psymtab-read.c,
hp-symtab-read.c, hpread.c, mdebugread.c, minsyms.c,
mipsread.c, objfiles.c, os9kread.c, pa64solib.c, partial-stab.h,
remote-os9k.c, remote-vx.c, remote.c, rs6000-nat.c, somsolib.c,
stabsread.c, symfile.c, xcoffread.c:
Update use of SECT_OFF_{TEXT,DATA,BSS,RODATA} to depend on the
current objfile.
* xcoffread.c: Add new field objfile to find_targ_sec_arg.
2000-05-05 00:52:34 +08:00
|
|
|
|
+ ANOFFSET (objfile->section_offsets, SECT_OFF_TEXT (objfile)));
|
1999-07-08 04:19:36 +08:00
|
|
|
|
else
|
|
|
|
|
break;
|
|
|
|
|
}
|
1999-04-16 09:35:26 +08:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void
|
2000-07-30 09:48:28 +08:00
|
|
|
|
patch_type (struct type *type, struct type *real_type)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
2003-09-14 Andrew Cagney <cagney@redhat.com>
* alpha-nat.c: Remove some occurances of "register".
* alpha-tdep.c, arm-tdep.c, blockframe.c, breakpoint.c: Ditto.
* buildsym.c, c-typeprint.c, c-valprint.c, coffread.c: Ditto.
* corefile.c, cp-support.c, cp-valprint.c, cris-tdep.c: Ditto.
* dbxread.c, dcache.c, dwarf2read.c, elfread.c: Ditto.
* environ.c, eval.c, event-top.c, f-typeprint.c: Ditto.
* f-valprint.c, findvar.c, frame.c, gdbtypes.c: Ditto.
* h8300-tdep.c, hppa-tdep.c, hppab-nat.c, hppah-nat.c: Ditto.
* hppam3-nat.c, hpread.c, ia64-aix-nat.c, ia64-linux-nat.c: Ditto.
* infcall.c, infcmd.c, inflow.c, infptrace.c, infrun.c: Ditto.
* infttrace.c, irix5-nat.c, jv-typeprint.c: Ditto.
* jv-valprint.c, m68k-tdep.c, m68klinux-nat.c, main.c: Ditto.
* mdebugread.c, minsyms.c, mips-linux-tdep.c: Ditto.
* mips-nat.c, mips-tdep.c, mipsread.c, mipsv4-nat.c: Ditto.
* ns32k-tdep.c, objfiles.c, p-typeprint.c: Ditto.
* p-valprint.c, ppc-linux-nat.c, printcmd.c: Ditto.
* remote-mips.c, remote-vx.c, rs6000-nat.c: Ditto.
* rs6000-tdep.c, scm-exp.c, sh-tdep.c, sh64-tdep.c: Ditto.
* solib.c, somread.c, source.c, sparc-tdep.c: Ditto.
* stabsread.c, stack.c, standalone.c, symfile.c: Ditto.
* symmisc.c, symtab.c, top.c, tracepoint.c: Ditto.
* typeprint.c, utils.c, valarith.c, valops.c: Ditto.
* values.c, vax-tdep.c, xcoffread.c: Ditto.
2003-09-15 00:32:14 +08:00
|
|
|
|
struct type *target = TYPE_TARGET_TYPE (type);
|
|
|
|
|
struct type *real_target = TYPE_TARGET_TYPE (real_type);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
int field_size = TYPE_NFIELDS (real_target) * sizeof (struct field);
|
|
|
|
|
|
|
|
|
|
TYPE_LENGTH (target) = TYPE_LENGTH (real_target);
|
|
|
|
|
TYPE_NFIELDS (target) = TYPE_NFIELDS (real_target);
|
|
|
|
|
TYPE_FIELDS (target) = (struct field *) TYPE_ALLOC (target, field_size);
|
|
|
|
|
|
|
|
|
|
memcpy (TYPE_FIELDS (target), TYPE_FIELDS (real_target), field_size);
|
|
|
|
|
|
|
|
|
|
if (TYPE_NAME (real_target))
|
|
|
|
|
{
|
|
|
|
|
if (TYPE_NAME (target))
|
2000-12-15 09:01:51 +08:00
|
|
|
|
xfree (TYPE_NAME (target));
|
1999-04-16 09:35:26 +08:00
|
|
|
|
TYPE_NAME (target) = concat (TYPE_NAME (real_target), NULL);
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Patch up all appropriate typedef symbols in the opaque_type_chains
|
|
|
|
|
so that they can be used to print out opaque data structures properly. */
|
|
|
|
|
|
|
|
|
|
static void
|
2000-07-30 09:48:28 +08:00
|
|
|
|
patch_opaque_types (struct symtab *s)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
2003-09-14 Andrew Cagney <cagney@redhat.com>
* alpha-nat.c: Remove some occurances of "register".
* alpha-tdep.c, arm-tdep.c, blockframe.c, breakpoint.c: Ditto.
* buildsym.c, c-typeprint.c, c-valprint.c, coffread.c: Ditto.
* corefile.c, cp-support.c, cp-valprint.c, cris-tdep.c: Ditto.
* dbxread.c, dcache.c, dwarf2read.c, elfread.c: Ditto.
* environ.c, eval.c, event-top.c, f-typeprint.c: Ditto.
* f-valprint.c, findvar.c, frame.c, gdbtypes.c: Ditto.
* h8300-tdep.c, hppa-tdep.c, hppab-nat.c, hppah-nat.c: Ditto.
* hppam3-nat.c, hpread.c, ia64-aix-nat.c, ia64-linux-nat.c: Ditto.
* infcall.c, infcmd.c, inflow.c, infptrace.c, infrun.c: Ditto.
* infttrace.c, irix5-nat.c, jv-typeprint.c: Ditto.
* jv-valprint.c, m68k-tdep.c, m68klinux-nat.c, main.c: Ditto.
* mdebugread.c, minsyms.c, mips-linux-tdep.c: Ditto.
* mips-nat.c, mips-tdep.c, mipsread.c, mipsv4-nat.c: Ditto.
* ns32k-tdep.c, objfiles.c, p-typeprint.c: Ditto.
* p-valprint.c, ppc-linux-nat.c, printcmd.c: Ditto.
* remote-mips.c, remote-vx.c, rs6000-nat.c: Ditto.
* rs6000-tdep.c, scm-exp.c, sh-tdep.c, sh64-tdep.c: Ditto.
* solib.c, somread.c, source.c, sparc-tdep.c: Ditto.
* stabsread.c, stack.c, standalone.c, symfile.c: Ditto.
* symmisc.c, symtab.c, top.c, tracepoint.c: Ditto.
* typeprint.c, utils.c, valarith.c, valops.c: Ditto.
* values.c, vax-tdep.c, xcoffread.c: Ditto.
2003-09-15 00:32:14 +08:00
|
|
|
|
struct block *b;
|
2003-06-11 David Carlton <carlton@bactrian.org>
* dictionary.h: New.
* dictionary.c: New.
* block.h: Add opaque declaration for struct dictionary.
(struct block): Add 'dict' member; delete 'hashtable', 'nsyms',
'sym' members.
(BLOCK_DICT): New macro.
Delete macros BLOCK_HASHTABLE, BLOCK_NSYMS, BLOCK_SYM,
BLOCK_BUCKETS, BLOCK_BUCKET, BLOCK_HASHTABLE_SIZE,
BLOCK_SHOULD_SORT.
(ALL_BLOCK_SYMBOLS): Update definition.
* Makefile.in (SFILES): Add dictionary.c.
(dictionary_h): New.
(COMMON_OBS): Add dictionary.o.
(dictionary.o): New.
(ada-lang.o): Depend on dictionary_h.
(buildsym.o, coffread.o, jv-lang.o, mdebugread.o, objfiles.o)
(stack.o, symmisc.o, symtab.o, tracepoint.o, valops.o)
(mi-cmd-stack.o): Ditto.
(gdbtk-cmds.o): Update dependencies.
(gdbtk-stack.o): Ditto.
* ada-lang.c: Include dictionary.h.
(symtab_for_sym): Update uses of ALL_BLOCK_SYMBOLS.
(fill_in_ada_prototype, debug_print_block): Ditto.
(ada_add_block_symbols): Update uses of ALL_BLOCK_SYMBOLS; replace
explicit iteration by use of ALL_BLOCK_SYMBOLS. Delete variable
'is_sorted'.
* mdebugread.c: Include dictionary.h.
(struct parse_stack): Delete 'maxsyms' member.
(parse_symbol): Update calls to new_block. Delete calls to
shrink_block. Use dictionary methods.
(psymtab_to_symtab_1): Delete calls to sort_symtab_syms.
Update calls to new_symtab. Don't maintain maxsyms data.
(mylookup_symbol): Update use of ALL_BLOCK_SYMBOLS.
(add_symbol): Just call dict_add_symbol.
(new_symtab): Delete 'maxsyms' argument.
(new_symtab): Update calls to new_block.
(new_block): Delete 'maxsyms' argument; add 'function' argument.
(shrink_block): Delete function.
(fixup_sigtramp): Update call to new_block. Add symbol via
dict_add_symbol.
* jv-lang.c: Include dictionary.h.
(get_java_class_symtab): Set the BLOCK_DICT of the blocks
appropriately. Set class_symtab->free_func. Make sure the
blockvector is big enough to hold two blocks.
(add_class_symtab_symbol): Use dictionary methods.
(free_class_block): New function.
(type_from_class): Replace explicit iteration by
ALL_BLOCK_SYMBOLS.
* symtab.h (struct symtab): Replace 'free_ptr' method by
'free_func'.
* dwarf2read.c (psymtab_to_symtab_1): Delete call to
sort_symtab_syms.
* dwarfread.c (psymtab_to_symtab_1): Delete call to
sort_symtab_syms.
* coffread.c (coff_symfile_read): Delete call to sort_symtab_syms.
Include dictionary.h.
(patch_opaque_types): Update use of ALL_BLOCK_SYMBOLS.
* dbxread.c (dbx_psymtab_to_symtab_1): Delete call to
sort_symtab_syms.
* objfiles.c: Include dictionary.h.
(objfile_relocate): Update use of ALL_BLOCK_SYMBOLS.
* buildsym.c: Include dictionary.h.
(finish_block): Use dictionary methods.
(end_symtab): Set free_func to NULL, not free_ptr.
* tracepoint.c: Include dictionary.h.
(add_local_symbols): Update use of ALL_BLOCK_SYMBOLS.
(scope_info): Ditto.
* stack.c: Include dictionary.h.
(print_block_frame_locals): Update use of ALL_BLOCK_SYMBOLS.
(print_block_frame_labels, print_frame_arg_vars)
(print_frame_args): Ditto.
* symmisc.c (free_symtab_block): Use dictionary methods.
(dump_symtab): Ditto.
(free_symtab): Replace use of 'free_ptr' by 'free_func'.
Include dictionary.h.
* symfile.h: Delete declarations of sort_block_syms,
sort_symtab_syms.
* symfile.c (sort_block_syms): Delete.
(sort_symtab_syms): Delete.
* symtab.c: Include dictionary.h.
(lookup_block_symbol): Use dictionary iterators.
(find_pc_sect_symtab): Update use of ALL_BLOCK_SYMBOLS.
(search_symbols, make_symbol_completion_list): Ditto.
(make_symbol_overload_list): Ditto.
* valops.c (value_of_local): Use dict_empty.
Include dictionary.h.
2003-06-11 David Carlton <carlton@bactrian.org>
* generic/gdbtk-stack.c: Include dictionary.h.
(gdb_block_vars): Update use of ALL_BLOCK_SYMBOLS.
(gdb_get_blocks, gdb_get_vars_command): Ditto.
* generic/gdbtk-cmds.c: Include dictionary.h.
(gdb_listfuncs): Update use of ALL_BLOCK_SYMBOLS.
2003-06-11 David Carlton <carlton@bactrian.org>
* mi-cmd-stack.c: Include dictionary.h.
(list_args_or_locals): Update use of ALL_BLOCK_SYMBOLS.
2003-06-12 07:29:49 +08:00
|
|
|
|
struct dict_iterator iter;
|
2003-09-14 Andrew Cagney <cagney@redhat.com>
* alpha-nat.c: Remove some occurances of "register".
* alpha-tdep.c, arm-tdep.c, blockframe.c, breakpoint.c: Ditto.
* buildsym.c, c-typeprint.c, c-valprint.c, coffread.c: Ditto.
* corefile.c, cp-support.c, cp-valprint.c, cris-tdep.c: Ditto.
* dbxread.c, dcache.c, dwarf2read.c, elfread.c: Ditto.
* environ.c, eval.c, event-top.c, f-typeprint.c: Ditto.
* f-valprint.c, findvar.c, frame.c, gdbtypes.c: Ditto.
* h8300-tdep.c, hppa-tdep.c, hppab-nat.c, hppah-nat.c: Ditto.
* hppam3-nat.c, hpread.c, ia64-aix-nat.c, ia64-linux-nat.c: Ditto.
* infcall.c, infcmd.c, inflow.c, infptrace.c, infrun.c: Ditto.
* infttrace.c, irix5-nat.c, jv-typeprint.c: Ditto.
* jv-valprint.c, m68k-tdep.c, m68klinux-nat.c, main.c: Ditto.
* mdebugread.c, minsyms.c, mips-linux-tdep.c: Ditto.
* mips-nat.c, mips-tdep.c, mipsread.c, mipsv4-nat.c: Ditto.
* ns32k-tdep.c, objfiles.c, p-typeprint.c: Ditto.
* p-valprint.c, ppc-linux-nat.c, printcmd.c: Ditto.
* remote-mips.c, remote-vx.c, rs6000-nat.c: Ditto.
* rs6000-tdep.c, scm-exp.c, sh-tdep.c, sh64-tdep.c: Ditto.
* solib.c, somread.c, source.c, sparc-tdep.c: Ditto.
* stabsread.c, stack.c, standalone.c, symfile.c: Ditto.
* symmisc.c, symtab.c, top.c, tracepoint.c: Ditto.
* typeprint.c, utils.c, valarith.c, valops.c: Ditto.
* values.c, vax-tdep.c, xcoffread.c: Ditto.
2003-09-15 00:32:14 +08:00
|
|
|
|
struct symbol *real_sym;
|
1999-07-08 04:19:36 +08:00
|
|
|
|
|
1999-04-16 09:35:26 +08:00
|
|
|
|
/* Go through the per-file symbols only */
|
|
|
|
|
b = BLOCKVECTOR_BLOCK (BLOCKVECTOR (s), STATIC_BLOCK);
|
2003-06-11 David Carlton <carlton@bactrian.org>
* dictionary.h: New.
* dictionary.c: New.
* block.h: Add opaque declaration for struct dictionary.
(struct block): Add 'dict' member; delete 'hashtable', 'nsyms',
'sym' members.
(BLOCK_DICT): New macro.
Delete macros BLOCK_HASHTABLE, BLOCK_NSYMS, BLOCK_SYM,
BLOCK_BUCKETS, BLOCK_BUCKET, BLOCK_HASHTABLE_SIZE,
BLOCK_SHOULD_SORT.
(ALL_BLOCK_SYMBOLS): Update definition.
* Makefile.in (SFILES): Add dictionary.c.
(dictionary_h): New.
(COMMON_OBS): Add dictionary.o.
(dictionary.o): New.
(ada-lang.o): Depend on dictionary_h.
(buildsym.o, coffread.o, jv-lang.o, mdebugread.o, objfiles.o)
(stack.o, symmisc.o, symtab.o, tracepoint.o, valops.o)
(mi-cmd-stack.o): Ditto.
(gdbtk-cmds.o): Update dependencies.
(gdbtk-stack.o): Ditto.
* ada-lang.c: Include dictionary.h.
(symtab_for_sym): Update uses of ALL_BLOCK_SYMBOLS.
(fill_in_ada_prototype, debug_print_block): Ditto.
(ada_add_block_symbols): Update uses of ALL_BLOCK_SYMBOLS; replace
explicit iteration by use of ALL_BLOCK_SYMBOLS. Delete variable
'is_sorted'.
* mdebugread.c: Include dictionary.h.
(struct parse_stack): Delete 'maxsyms' member.
(parse_symbol): Update calls to new_block. Delete calls to
shrink_block. Use dictionary methods.
(psymtab_to_symtab_1): Delete calls to sort_symtab_syms.
Update calls to new_symtab. Don't maintain maxsyms data.
(mylookup_symbol): Update use of ALL_BLOCK_SYMBOLS.
(add_symbol): Just call dict_add_symbol.
(new_symtab): Delete 'maxsyms' argument.
(new_symtab): Update calls to new_block.
(new_block): Delete 'maxsyms' argument; add 'function' argument.
(shrink_block): Delete function.
(fixup_sigtramp): Update call to new_block. Add symbol via
dict_add_symbol.
* jv-lang.c: Include dictionary.h.
(get_java_class_symtab): Set the BLOCK_DICT of the blocks
appropriately. Set class_symtab->free_func. Make sure the
blockvector is big enough to hold two blocks.
(add_class_symtab_symbol): Use dictionary methods.
(free_class_block): New function.
(type_from_class): Replace explicit iteration by
ALL_BLOCK_SYMBOLS.
* symtab.h (struct symtab): Replace 'free_ptr' method by
'free_func'.
* dwarf2read.c (psymtab_to_symtab_1): Delete call to
sort_symtab_syms.
* dwarfread.c (psymtab_to_symtab_1): Delete call to
sort_symtab_syms.
* coffread.c (coff_symfile_read): Delete call to sort_symtab_syms.
Include dictionary.h.
(patch_opaque_types): Update use of ALL_BLOCK_SYMBOLS.
* dbxread.c (dbx_psymtab_to_symtab_1): Delete call to
sort_symtab_syms.
* objfiles.c: Include dictionary.h.
(objfile_relocate): Update use of ALL_BLOCK_SYMBOLS.
* buildsym.c: Include dictionary.h.
(finish_block): Use dictionary methods.
(end_symtab): Set free_func to NULL, not free_ptr.
* tracepoint.c: Include dictionary.h.
(add_local_symbols): Update use of ALL_BLOCK_SYMBOLS.
(scope_info): Ditto.
* stack.c: Include dictionary.h.
(print_block_frame_locals): Update use of ALL_BLOCK_SYMBOLS.
(print_block_frame_labels, print_frame_arg_vars)
(print_frame_args): Ditto.
* symmisc.c (free_symtab_block): Use dictionary methods.
(dump_symtab): Ditto.
(free_symtab): Replace use of 'free_ptr' by 'free_func'.
Include dictionary.h.
* symfile.h: Delete declarations of sort_block_syms,
sort_symtab_syms.
* symfile.c (sort_block_syms): Delete.
(sort_symtab_syms): Delete.
* symtab.c: Include dictionary.h.
(lookup_block_symbol): Use dictionary iterators.
(find_pc_sect_symtab): Update use of ALL_BLOCK_SYMBOLS.
(search_symbols, make_symbol_completion_list): Ditto.
(make_symbol_overload_list): Ditto.
* valops.c (value_of_local): Use dict_empty.
Include dictionary.h.
2003-06-11 David Carlton <carlton@bactrian.org>
* generic/gdbtk-stack.c: Include dictionary.h.
(gdb_block_vars): Update use of ALL_BLOCK_SYMBOLS.
(gdb_get_blocks, gdb_get_vars_command): Ditto.
* generic/gdbtk-cmds.c: Include dictionary.h.
(gdb_listfuncs): Update use of ALL_BLOCK_SYMBOLS.
2003-06-11 David Carlton <carlton@bactrian.org>
* mi-cmd-stack.c: Include dictionary.h.
(list_args_or_locals): Update use of ALL_BLOCK_SYMBOLS.
2003-06-12 07:29:49 +08:00
|
|
|
|
ALL_BLOCK_SYMBOLS (b, iter, real_sym)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
/* Find completed typedefs to use to fix opaque ones.
|
1999-07-08 04:19:36 +08:00
|
|
|
|
Remove syms from the chain when their types are stored,
|
|
|
|
|
but search the whole chain, as there may be several syms
|
|
|
|
|
from different files with the same name. */
|
1999-04-16 09:35:26 +08:00
|
|
|
|
if (SYMBOL_CLASS (real_sym) == LOC_TYPEDEF &&
|
2003-05-14 Elena Zannoni <ezannoni@redhat.com>
* symtab.h (enum domain_enum): Rename from namespace_enum.
(UNDEF_DOMAIN, VAR_DOMAIN, STRUCT_DOMAIN, LABEL_DOMAIN,
VARIABLES_DOMAIN, FUNCTIONS_DOMAIN, TYPES_DOMAIN, METHODS_DOMAIN):
Rename from UNDEF_NAMESPACE, VAR_NAMESPACE, STRUCT_NAMESPACE,
LABEL_NAMESPACE, VARIABLES_NAMESPACE, FUNCTIONS_NAMESPACE,
TYPES_NAMESPACE, METHODS_NAMESPACE.
(SYMBOL_NAMESPACE): Rename to SYMBOL_DOMAIN.
(struct symbol, struct partial_symbol): Rename field
'namespace_enum namespace' to 'domain_enum domain'.
(PSYMBOL_NAMESPACE): Rename to PSYMBOL_DOMAIN.
Delete old define kludge for namespace.
* ada-exp.y, ada-lang.c, ada-lang.h, alpha-tdep.c, arm-tdep.c,
blockframe.c, c-exp.y, c-valprint.c, coffread.c, dbxread.c,
dwarf2read.c, dwarfread.c, f-exp.y, gdbtypes.c, gdbtypes.h,
gnu-v3-abi.c, hppa-tdep.c, hpread.c, jv-exp.y, jv-lang.c,
language.c, linespec.c, m2-exp.y, m3-nat.c, mdebugread.c,
mips-tdep.c, nlmread.c, objc-exp.y, objc-lang.c, objfiles.c,
p-exp.y, p-valprint.c, parse.c, printcmd.c, scm-lang.c, source.c,
stabsread.c, stack.c, symfile.c, symfile.h, symmisc.c, symtab.c,
valops.c, values.c, xcoffread.c, xstormy16-tdep.c: Replace all
occurrences of the above.
2003-05-12 Elena Zannoni <ezannoni@redhat.com>
* mi-mi-cmd-stack.c (list_args_or_locals): Rename VAR_NAMESPACE to
VAR_DOMAIN.
2003-05-15 01:43:20 +08:00
|
|
|
|
SYMBOL_DOMAIN (real_sym) == VAR_DOMAIN &&
|
1999-04-16 09:35:26 +08:00
|
|
|
|
TYPE_CODE (SYMBOL_TYPE (real_sym)) == TYPE_CODE_PTR &&
|
|
|
|
|
TYPE_LENGTH (TYPE_TARGET_TYPE (SYMBOL_TYPE (real_sym))) != 0)
|
|
|
|
|
{
|
2003-09-16 Andrew Cagney <cagney@redhat.com>
* buildsym.c: Remove more occurances of "register".
* coffread.c, dbxread.c, dcache.c, dwarf2read.c: Ditto.
* environ.c, eval.c, f-valprint.c, findvar.c: Ditto.
* gdbtypes.c, gnu-v2-abi.c, h8300-tdep.c, hppa-tdep.c: Ditto.
* infcmd.c, mdebugread.c, minsyms.c, mips-tdep.c: Ditto.
* printcmd.c, remote-vx.c, sh-stub.c, sh-tdep.c: Ditto.
* sh64-tdep.c, source.c, stabsread.c, stack.c: Ditto.
* standalone.c, symfile.c, symmisc.c, symtab.c: Ditto.
* utils.c, valops.c, values.c, xcoffread.c: Ditto.
2003-09-17 02:56:35 +08:00
|
|
|
|
char *name = DEPRECATED_SYMBOL_NAME (real_sym);
|
|
|
|
|
int hash = hashname (name);
|
|
|
|
|
struct symbol *sym, *prev;
|
1999-07-08 04:19:36 +08:00
|
|
|
|
|
1999-04-16 09:35:26 +08:00
|
|
|
|
prev = 0;
|
|
|
|
|
for (sym = opaque_type_chain[hash]; sym;)
|
|
|
|
|
{
|
2003-02-25 David Carlton <carlton@math.stanford.edu>
* symtab.h (SYMBOL_NATURAL_NAME): New macro.
(SYMBOL_LINKAGE_NAME): Ditto.
(SYMBOL_PRINT_NAME): Use SYMBOL_NATURAL_NAME and
SYMBOL_LINKAGE_NAME.
(struct general_symbol_info): Expand comment.
(DEPRECATED_SYMBOL_NAME): Rename from SYMBOL_NAME.
(SYMBOL_MATCHES_NAME): Use DEPRECATED_SYMBOL_NAME.
(SYMBOL_MATCHES_REGEXP): Ditto.
* symtab.c (symbol_natural_name): New function.
* objfiles.h: Replace all uses of SYMBOL_NAME by
DEPRECATED_SYMBOL_NAME.
* xcoffread.c, valops.c, typeprint.c, tracepoint.c: Ditto.
* symtab.c, symmisc.c, symfile.c, stack.c, stabsread.c: Ditto.
* somsolib.c, sol-thread.c, rs6000-tdep.c, p-valprint.c: Ditto.
* printcmd.c, objfiles.c, objc-lang.c, mipsread.c: Ditto.
* minsyms.c, mdebugread.c, linespec.c, jv-lang.c: Ditto.
* i386-tdep.c, i386-linux-tdep.c, hpread.c, hppa-tdep.c: Ditto.
* gnu-v2-abi.c, f-valprint.c, findvar.c, expprint.c: Ditto.
* dwarfread.c, dwarf2read.c, dbxread.c, c-valprint.c: Ditto.
* cp-valprint.c, coffread.c, buildsym.c, breakpoint.c: Ditto.
* blockframe.c, ax-gdb.c, arm-linux-tdep.c, ada-lang.c: Ditto.
* ada-exp.y: Ditto.
* ada-exp.y: Update copyright.
* sol-thread.c, mipsread.c, jv-lang.c, f-valprint.c: Ditto.
* cp-valprint.c: Ditto.
2003-02-25 David Carlton <carlton@math.stanford.edu>
* generic/gdbtk.h: Replace all instances of SYMBOL_NAME by
DEPRECATED_SYMBOL_NAME.
* generic/gdbtk-stack.c, generic/gdbtk-cmds.c: Ditto.
* generic/gdbtk-stack.c, generic/gdbtk-cmds.c: Update copyright.
2003-02-25 David Carlton <carlton@math.stanford.edu>
* mi-cmd-stack.c: Replace all instances of SYMBOL_NAME with
DEPRECATED_SYMBOL_NAME. Update copyright.
2003-02-26 05:36:23 +08:00
|
|
|
|
if (name[0] == DEPRECATED_SYMBOL_NAME (sym)[0] &&
|
2003-11-08 08:13:03 +08:00
|
|
|
|
strcmp (name + 1, DEPRECATED_SYMBOL_NAME (sym) + 1) == 0)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
if (prev)
|
|
|
|
|
{
|
|
|
|
|
SYMBOL_VALUE_CHAIN (prev) = SYMBOL_VALUE_CHAIN (sym);
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
opaque_type_chain[hash] = SYMBOL_VALUE_CHAIN (sym);
|
|
|
|
|
}
|
1999-07-08 04:19:36 +08:00
|
|
|
|
|
1999-04-16 09:35:26 +08:00
|
|
|
|
patch_type (SYMBOL_TYPE (sym), SYMBOL_TYPE (real_sym));
|
1999-07-08 04:19:36 +08:00
|
|
|
|
|
1999-04-16 09:35:26 +08:00
|
|
|
|
if (prev)
|
|
|
|
|
{
|
|
|
|
|
sym = SYMBOL_VALUE_CHAIN (prev);
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
sym = opaque_type_chain[hash];
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
prev = sym;
|
|
|
|
|
sym = SYMBOL_VALUE_CHAIN (sym);
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static struct symbol *
|
2003-09-16 Andrew Cagney <cagney@redhat.com>
* buildsym.c: Remove more occurances of "register".
* coffread.c, dbxread.c, dcache.c, dwarf2read.c: Ditto.
* environ.c, eval.c, f-valprint.c, findvar.c: Ditto.
* gdbtypes.c, gnu-v2-abi.c, h8300-tdep.c, hppa-tdep.c: Ditto.
* infcmd.c, mdebugread.c, minsyms.c, mips-tdep.c: Ditto.
* printcmd.c, remote-vx.c, sh-stub.c, sh-tdep.c: Ditto.
* sh64-tdep.c, source.c, stabsread.c, stack.c: Ditto.
* standalone.c, symfile.c, symmisc.c, symtab.c: Ditto.
* utils.c, valops.c, values.c, xcoffread.c: Ditto.
2003-09-17 02:56:35 +08:00
|
|
|
|
process_coff_symbol (struct coff_symbol *cs,
|
|
|
|
|
union internal_auxent *aux,
|
2000-07-30 09:48:28 +08:00
|
|
|
|
struct objfile *objfile)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
2003-09-14 Andrew Cagney <cagney@redhat.com>
* alpha-nat.c: Remove some occurances of "register".
* alpha-tdep.c, arm-tdep.c, blockframe.c, breakpoint.c: Ditto.
* buildsym.c, c-typeprint.c, c-valprint.c, coffread.c: Ditto.
* corefile.c, cp-support.c, cp-valprint.c, cris-tdep.c: Ditto.
* dbxread.c, dcache.c, dwarf2read.c, elfread.c: Ditto.
* environ.c, eval.c, event-top.c, f-typeprint.c: Ditto.
* f-valprint.c, findvar.c, frame.c, gdbtypes.c: Ditto.
* h8300-tdep.c, hppa-tdep.c, hppab-nat.c, hppah-nat.c: Ditto.
* hppam3-nat.c, hpread.c, ia64-aix-nat.c, ia64-linux-nat.c: Ditto.
* infcall.c, infcmd.c, inflow.c, infptrace.c, infrun.c: Ditto.
* infttrace.c, irix5-nat.c, jv-typeprint.c: Ditto.
* jv-valprint.c, m68k-tdep.c, m68klinux-nat.c, main.c: Ditto.
* mdebugread.c, minsyms.c, mips-linux-tdep.c: Ditto.
* mips-nat.c, mips-tdep.c, mipsread.c, mipsv4-nat.c: Ditto.
* ns32k-tdep.c, objfiles.c, p-typeprint.c: Ditto.
* p-valprint.c, ppc-linux-nat.c, printcmd.c: Ditto.
* remote-mips.c, remote-vx.c, rs6000-nat.c: Ditto.
* rs6000-tdep.c, scm-exp.c, sh-tdep.c, sh64-tdep.c: Ditto.
* solib.c, somread.c, source.c, sparc-tdep.c: Ditto.
* stabsread.c, stack.c, standalone.c, symfile.c: Ditto.
* symmisc.c, symtab.c, top.c, tracepoint.c: Ditto.
* typeprint.c, utils.c, valarith.c, valops.c: Ditto.
* values.c, vax-tdep.c, xcoffread.c: Ditto.
2003-09-15 00:32:14 +08:00
|
|
|
|
struct symbol *sym
|
2004-02-07 Elena Zannoni <ezannoni@redhat.com>
* buildsym.c (free_pending_blocks, finish_block)
(record_pending_block, make_blockvector, end_symtab): Replace
symbol_obstack with objfile_obstack.
* coffread.c (process_coff_symbol, coff_read_struct_type)
(coff_read_enum_type): Ditto.
* cp-namespace.c (initialize_namespace_symtab)
(check_one_possible_namespace_symbol): Ditto.
* dwarf2read.c (new_symbol, dwarf2_const_value, macro_start_file)
(dwarf2_symbol_mark_computed): Ditto.
* dwarfread.c (enum_type, new_symbol, synthesize_typedef): Ditto.
* elfread.c (elf_symtab_read): Ditto.
* hpread.c (hpread_symfile_init, hpread_symfile_init)
(hpread_read_enum_type, hpread_read_function_type)
(hpread_read_doc_function_type, hpread_process_one_debug_symbol):
Ditto.
* jv-lang.c (get_java_class_symtab, add_class_symbol)
(java_link_class_type): Ditto.
* mdebugread.c (parse_symbol, psymtab_to_symtab_1, new_symtab)
(new_symbol): Ditto.
* minsyms.c (install_minimal_symbols): Ditto.
* objfiles.c (allocate_objfile): Remove init of symbol_obstack.
(terminate_minimal_symbol_table): Replace symbol_obstack with
objfile_obstack.
(free_objfile): Remove freeing of symbol_obstack.
* objfiles.h: Remove symbol_obstack field.
* pa64solib.c (add_to_solist): Replace symbol_obstack with
objfile_obstack.
* solib-sunos.c (allocate_rt_common_objfile): Remove init of
symbol_obstack.
(solib_add_common_symbols): Replace symbol_obstack with
objfile_obstack.
* somsolib.c (som_solib_add): Ditto.
* stabsread.c (patch_block_stabs, define_symbol, read_enum_type)
(common_block_start, common_block_end): Ditto.
* symfile.c (reread_symbols): Remove freeing and init of
symbol_obstack.
(allocate_symtab): Rename symbol_obstack to objfile_obstack.
* symfile.h: Update comment.
* symmisc.c (print_objfile_statistics): Remove symbol_obstack
stats printing.
* symtab.c (symbol_set_names): Replace symbol_obstack with
objfile_obstack.
* symtab.h (struct general_symbol_info, struct minimal_symbol):
Update comments.
* xcoffread.c (read_xcoff_symtab, SYMBOL_DUP, SYMNAME_ALLOC)
(init_stringtab, xcoff_initial_scan): Replace symbol_obstack with
objfile_obstack.
2004-02-08 07:13:47 +08:00
|
|
|
|
= (struct symbol *) obstack_alloc (&objfile->objfile_obstack,
|
1999-07-08 04:19:36 +08:00
|
|
|
|
sizeof (struct symbol));
|
1999-04-16 09:35:26 +08:00
|
|
|
|
char *name;
|
|
|
|
|
|
|
|
|
|
memset (sym, 0, sizeof (struct symbol));
|
|
|
|
|
name = cs->c_name;
|
|
|
|
|
name = EXTERNAL_NAME (name, objfile->obfd);
|
|
|
|
|
SYMBOL_LANGUAGE (sym) = language_auto;
|
2003-02-05 02:07:01 +08:00
|
|
|
|
SYMBOL_SET_NAMES (sym, name, strlen (name), objfile);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
/* default assumptions */
|
|
|
|
|
SYMBOL_VALUE (sym) = cs->c_value;
|
2003-05-14 Elena Zannoni <ezannoni@redhat.com>
* symtab.h (enum domain_enum): Rename from namespace_enum.
(UNDEF_DOMAIN, VAR_DOMAIN, STRUCT_DOMAIN, LABEL_DOMAIN,
VARIABLES_DOMAIN, FUNCTIONS_DOMAIN, TYPES_DOMAIN, METHODS_DOMAIN):
Rename from UNDEF_NAMESPACE, VAR_NAMESPACE, STRUCT_NAMESPACE,
LABEL_NAMESPACE, VARIABLES_NAMESPACE, FUNCTIONS_NAMESPACE,
TYPES_NAMESPACE, METHODS_NAMESPACE.
(SYMBOL_NAMESPACE): Rename to SYMBOL_DOMAIN.
(struct symbol, struct partial_symbol): Rename field
'namespace_enum namespace' to 'domain_enum domain'.
(PSYMBOL_NAMESPACE): Rename to PSYMBOL_DOMAIN.
Delete old define kludge for namespace.
* ada-exp.y, ada-lang.c, ada-lang.h, alpha-tdep.c, arm-tdep.c,
blockframe.c, c-exp.y, c-valprint.c, coffread.c, dbxread.c,
dwarf2read.c, dwarfread.c, f-exp.y, gdbtypes.c, gdbtypes.h,
gnu-v3-abi.c, hppa-tdep.c, hpread.c, jv-exp.y, jv-lang.c,
language.c, linespec.c, m2-exp.y, m3-nat.c, mdebugread.c,
mips-tdep.c, nlmread.c, objc-exp.y, objc-lang.c, objfiles.c,
p-exp.y, p-valprint.c, parse.c, printcmd.c, scm-lang.c, source.c,
stabsread.c, stack.c, symfile.c, symfile.h, symmisc.c, symtab.c,
valops.c, values.c, xcoffread.c, xstormy16-tdep.c: Replace all
occurrences of the above.
2003-05-12 Elena Zannoni <ezannoni@redhat.com>
* mi-mi-cmd-stack.c (list_args_or_locals): Rename VAR_NAMESPACE to
VAR_DOMAIN.
2003-05-15 01:43:20 +08:00
|
|
|
|
SYMBOL_DOMAIN (sym) = VAR_DOMAIN;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
SYMBOL_SECTION (sym) = cs_to_section (cs, objfile);
|
|
|
|
|
|
|
|
|
|
if (ISFCN (cs->c_type))
|
|
|
|
|
{
|
Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* objfiles.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Define as functions of OBJFILE. Add
sect_index_text, sect_index_data, sect_index_rodata,
sect_index_bss to objfile structure.
* gdb-stabs.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Remove.
* objfiles.c (allocate_objfile): Initialize
sect_index_{text,data,bss,rodata} to -1, for error detection.
* symfile.c (default_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata} from bfd information.
* xcoffread.c (xcoff_symfile_offsets): Ditto.
* somread.c (som_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata}.
* coffread.c, dbxread.c, elfread.c, hp-psymtab-read.c,
hp-symtab-read.c, hpread.c, mdebugread.c, minsyms.c,
mipsread.c, objfiles.c, os9kread.c, pa64solib.c, partial-stab.h,
remote-os9k.c, remote-vx.c, remote.c, rs6000-nat.c, somsolib.c,
stabsread.c, symfile.c, xcoffread.c:
Update use of SECT_OFF_{TEXT,DATA,BSS,RODATA} to depend on the
current objfile.
* xcoffread.c: Add new field objfile to find_targ_sec_arg.
2000-05-05 00:52:34 +08:00
|
|
|
|
SYMBOL_VALUE (sym) += ANOFFSET (objfile->section_offsets, SECT_OFF_TEXT (objfile));
|
1999-07-08 04:19:36 +08:00
|
|
|
|
SYMBOL_TYPE (sym) =
|
|
|
|
|
lookup_function_type (decode_function_type (cs, cs->c_type, aux));
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
SYMBOL_CLASS (sym) = LOC_BLOCK;
|
|
|
|
|
if (cs->c_sclass == C_STAT || cs->c_sclass == C_THUMBSTAT
|
|
|
|
|
|| cs->c_sclass == C_THUMBSTATFUNC)
|
|
|
|
|
add_symbol_to_list (sym, &file_symbols);
|
|
|
|
|
else if (cs->c_sclass == C_EXT || cs->c_sclass == C_THUMBEXT
|
|
|
|
|
|| cs->c_sclass == C_THUMBEXTFUNC)
|
|
|
|
|
add_symbol_to_list (sym, &global_symbols);
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
SYMBOL_TYPE (sym) = decode_type (cs, cs->c_type, aux);
|
|
|
|
|
switch (cs->c_sclass)
|
|
|
|
|
{
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case C_NULL:
|
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case C_AUTO:
|
|
|
|
|
SYMBOL_CLASS (sym) = LOC_LOCAL;
|
|
|
|
|
add_symbol_to_list (sym, &local_symbols);
|
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case C_THUMBEXT:
|
|
|
|
|
case C_THUMBEXTFUNC:
|
|
|
|
|
case C_EXT:
|
|
|
|
|
SYMBOL_CLASS (sym) = LOC_STATIC;
|
|
|
|
|
SYMBOL_VALUE_ADDRESS (sym) = (CORE_ADDR) cs->c_value;
|
Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* objfiles.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Define as functions of OBJFILE. Add
sect_index_text, sect_index_data, sect_index_rodata,
sect_index_bss to objfile structure.
* gdb-stabs.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Remove.
* objfiles.c (allocate_objfile): Initialize
sect_index_{text,data,bss,rodata} to -1, for error detection.
* symfile.c (default_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata} from bfd information.
* xcoffread.c (xcoff_symfile_offsets): Ditto.
* somread.c (som_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata}.
* coffread.c, dbxread.c, elfread.c, hp-psymtab-read.c,
hp-symtab-read.c, hpread.c, mdebugread.c, minsyms.c,
mipsread.c, objfiles.c, os9kread.c, pa64solib.c, partial-stab.h,
remote-os9k.c, remote-vx.c, remote.c, rs6000-nat.c, somsolib.c,
stabsread.c, symfile.c, xcoffread.c:
Update use of SECT_OFF_{TEXT,DATA,BSS,RODATA} to depend on the
current objfile.
* xcoffread.c: Add new field objfile to find_targ_sec_arg.
2000-05-05 00:52:34 +08:00
|
|
|
|
SYMBOL_VALUE_ADDRESS (sym) += ANOFFSET (objfile->section_offsets, SECT_OFF_TEXT (objfile));
|
1999-07-08 04:19:36 +08:00
|
|
|
|
add_symbol_to_list (sym, &global_symbols);
|
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case C_THUMBSTAT:
|
|
|
|
|
case C_THUMBSTATFUNC:
|
|
|
|
|
case C_STAT:
|
|
|
|
|
SYMBOL_CLASS (sym) = LOC_STATIC;
|
|
|
|
|
SYMBOL_VALUE_ADDRESS (sym) = (CORE_ADDR) cs->c_value;
|
Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* objfiles.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Define as functions of OBJFILE. Add
sect_index_text, sect_index_data, sect_index_rodata,
sect_index_bss to objfile structure.
* gdb-stabs.h (SECT_OFF_DATA, SECT_OFF_TEXT, SECT_OFF_BSS,
SECT_OFF_RODATA): Remove.
* objfiles.c (allocate_objfile): Initialize
sect_index_{text,data,bss,rodata} to -1, for error detection.
* symfile.c (default_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata} from bfd information.
* xcoffread.c (xcoff_symfile_offsets): Ditto.
* somread.c (som_symfile_offsets): Initialize
sect_index_{text,data,bss,rodata}.
* coffread.c, dbxread.c, elfread.c, hp-psymtab-read.c,
hp-symtab-read.c, hpread.c, mdebugread.c, minsyms.c,
mipsread.c, objfiles.c, os9kread.c, pa64solib.c, partial-stab.h,
remote-os9k.c, remote-vx.c, remote.c, rs6000-nat.c, somsolib.c,
stabsread.c, symfile.c, xcoffread.c:
Update use of SECT_OFF_{TEXT,DATA,BSS,RODATA} to depend on the
current objfile.
* xcoffread.c: Add new field objfile to find_targ_sec_arg.
2000-05-05 00:52:34 +08:00
|
|
|
|
SYMBOL_VALUE_ADDRESS (sym) += ANOFFSET (objfile->section_offsets, SECT_OFF_TEXT (objfile));
|
1999-07-08 04:19:36 +08:00
|
|
|
|
if (within_function)
|
|
|
|
|
{
|
1999-04-16 09:35:26 +08:00
|
|
|
|
/* Static symbol of local scope */
|
|
|
|
|
add_symbol_to_list (sym, &local_symbols);
|
|
|
|
|
}
|
1999-07-08 04:19:36 +08:00
|
|
|
|
else
|
|
|
|
|
{
|
1999-04-16 09:35:26 +08:00
|
|
|
|
/* Static symbol at top level of file */
|
|
|
|
|
add_symbol_to_list (sym, &file_symbols);
|
|
|
|
|
}
|
1999-07-08 04:19:36 +08:00
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
#ifdef C_GLBLREG /* AMD coff */
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case C_GLBLREG:
|
1999-04-16 09:35:26 +08:00
|
|
|
|
#endif
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case C_REG:
|
|
|
|
|
SYMBOL_CLASS (sym) = LOC_REGISTER;
|
|
|
|
|
SYMBOL_VALUE (sym) = SDB_REG_TO_REGNUM (cs->c_value);
|
|
|
|
|
add_symbol_to_list (sym, &local_symbols);
|
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case C_THUMBLABEL:
|
|
|
|
|
case C_LABEL:
|
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case C_ARG:
|
|
|
|
|
SYMBOL_CLASS (sym) = LOC_ARG;
|
|
|
|
|
add_symbol_to_list (sym, &local_symbols);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
#if !defined (BELIEVE_PCC_PROMOTION)
|
2002-01-05 12:30:46 +08:00
|
|
|
|
if (TARGET_BYTE_ORDER == BFD_ENDIAN_BIG)
|
1999-07-08 04:19:36 +08:00
|
|
|
|
{
|
|
|
|
|
/* If PCC says a parameter is a short or a char,
|
|
|
|
|
aligned on an int boundary, realign it to the
|
|
|
|
|
"little end" of the int. */
|
|
|
|
|
struct type *temptype;
|
|
|
|
|
temptype = lookup_fundamental_type (current_objfile,
|
|
|
|
|
FT_INTEGER);
|
|
|
|
|
if (TYPE_LENGTH (SYMBOL_TYPE (sym)) < TYPE_LENGTH (temptype)
|
|
|
|
|
&& TYPE_CODE (SYMBOL_TYPE (sym)) == TYPE_CODE_INT
|
|
|
|
|
&& 0 == SYMBOL_VALUE (sym) % TYPE_LENGTH (temptype))
|
|
|
|
|
{
|
|
|
|
|
SYMBOL_VALUE (sym) +=
|
|
|
|
|
TYPE_LENGTH (temptype)
|
|
|
|
|
- TYPE_LENGTH (SYMBOL_TYPE (sym));
|
|
|
|
|
}
|
|
|
|
|
}
|
1999-04-16 09:35:26 +08:00
|
|
|
|
#endif
|
1999-07-08 04:19:36 +08:00
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case C_REGPARM:
|
|
|
|
|
SYMBOL_CLASS (sym) = LOC_REGPARM;
|
|
|
|
|
SYMBOL_VALUE (sym) = SDB_REG_TO_REGNUM (cs->c_value);
|
|
|
|
|
add_symbol_to_list (sym, &local_symbols);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
#if !defined (BELIEVE_PCC_PROMOTION)
|
1999-07-08 04:19:36 +08:00
|
|
|
|
/* FIXME: This should retain the current type, since it's just
|
|
|
|
|
a register value. gnu@adobe, 26Feb93 */
|
|
|
|
|
{
|
|
|
|
|
/* If PCC says a parameter is a short or a char,
|
|
|
|
|
it is really an int. */
|
|
|
|
|
struct type *temptype;
|
|
|
|
|
temptype =
|
|
|
|
|
lookup_fundamental_type (current_objfile, FT_INTEGER);
|
|
|
|
|
if (TYPE_LENGTH (SYMBOL_TYPE (sym)) < TYPE_LENGTH (temptype)
|
|
|
|
|
&& TYPE_CODE (SYMBOL_TYPE (sym)) == TYPE_CODE_INT)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
1999-07-08 04:19:36 +08:00
|
|
|
|
SYMBOL_TYPE (sym) =
|
|
|
|
|
(TYPE_UNSIGNED (SYMBOL_TYPE (sym))
|
|
|
|
|
? lookup_fundamental_type (current_objfile,
|
|
|
|
|
FT_UNSIGNED_INTEGER)
|
|
|
|
|
: temptype);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
}
|
1999-07-08 04:19:36 +08:00
|
|
|
|
}
|
1999-04-16 09:35:26 +08:00
|
|
|
|
#endif
|
1999-07-08 04:19:36 +08:00
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case C_TPDEF:
|
|
|
|
|
SYMBOL_CLASS (sym) = LOC_TYPEDEF;
|
2003-05-14 Elena Zannoni <ezannoni@redhat.com>
* symtab.h (enum domain_enum): Rename from namespace_enum.
(UNDEF_DOMAIN, VAR_DOMAIN, STRUCT_DOMAIN, LABEL_DOMAIN,
VARIABLES_DOMAIN, FUNCTIONS_DOMAIN, TYPES_DOMAIN, METHODS_DOMAIN):
Rename from UNDEF_NAMESPACE, VAR_NAMESPACE, STRUCT_NAMESPACE,
LABEL_NAMESPACE, VARIABLES_NAMESPACE, FUNCTIONS_NAMESPACE,
TYPES_NAMESPACE, METHODS_NAMESPACE.
(SYMBOL_NAMESPACE): Rename to SYMBOL_DOMAIN.
(struct symbol, struct partial_symbol): Rename field
'namespace_enum namespace' to 'domain_enum domain'.
(PSYMBOL_NAMESPACE): Rename to PSYMBOL_DOMAIN.
Delete old define kludge for namespace.
* ada-exp.y, ada-lang.c, ada-lang.h, alpha-tdep.c, arm-tdep.c,
blockframe.c, c-exp.y, c-valprint.c, coffread.c, dbxread.c,
dwarf2read.c, dwarfread.c, f-exp.y, gdbtypes.c, gdbtypes.h,
gnu-v3-abi.c, hppa-tdep.c, hpread.c, jv-exp.y, jv-lang.c,
language.c, linespec.c, m2-exp.y, m3-nat.c, mdebugread.c,
mips-tdep.c, nlmread.c, objc-exp.y, objc-lang.c, objfiles.c,
p-exp.y, p-valprint.c, parse.c, printcmd.c, scm-lang.c, source.c,
stabsread.c, stack.c, symfile.c, symfile.h, symmisc.c, symtab.c,
valops.c, values.c, xcoffread.c, xstormy16-tdep.c: Replace all
occurrences of the above.
2003-05-12 Elena Zannoni <ezannoni@redhat.com>
* mi-mi-cmd-stack.c (list_args_or_locals): Rename VAR_NAMESPACE to
VAR_DOMAIN.
2003-05-15 01:43:20 +08:00
|
|
|
|
SYMBOL_DOMAIN (sym) = VAR_DOMAIN;
|
1999-07-08 04:19:36 +08:00
|
|
|
|
|
|
|
|
|
/* If type has no name, give it one */
|
|
|
|
|
if (TYPE_NAME (SYMBOL_TYPE (sym)) == 0)
|
|
|
|
|
{
|
|
|
|
|
if (TYPE_CODE (SYMBOL_TYPE (sym)) == TYPE_CODE_PTR
|
|
|
|
|
|| TYPE_CODE (SYMBOL_TYPE (sym)) == TYPE_CODE_FUNC)
|
|
|
|
|
{
|
|
|
|
|
/* If we are giving a name to a type such as "pointer to
|
|
|
|
|
foo" or "function returning foo", we better not set
|
|
|
|
|
the TYPE_NAME. If the program contains "typedef char
|
|
|
|
|
*caddr_t;", we don't want all variables of type char
|
|
|
|
|
* to print as caddr_t. This is not just a
|
|
|
|
|
consequence of GDB's type management; CC and GCC (at
|
|
|
|
|
least through version 2.4) both output variables of
|
|
|
|
|
either type char * or caddr_t with the type
|
|
|
|
|
refering to the C_TPDEF symbol for caddr_t. If a future
|
|
|
|
|
compiler cleans this up it GDB is not ready for it
|
|
|
|
|
yet, but if it becomes ready we somehow need to
|
|
|
|
|
disable this check (without breaking the PCC/GCC2.4
|
|
|
|
|
case).
|
|
|
|
|
|
|
|
|
|
Sigh.
|
|
|
|
|
|
|
|
|
|
Fortunately, this check seems not to be necessary
|
|
|
|
|
for anything except pointers or functions. */
|
|
|
|
|
;
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
TYPE_NAME (SYMBOL_TYPE (sym)) =
|
2003-02-25 David Carlton <carlton@math.stanford.edu>
* symtab.h (SYMBOL_NATURAL_NAME): New macro.
(SYMBOL_LINKAGE_NAME): Ditto.
(SYMBOL_PRINT_NAME): Use SYMBOL_NATURAL_NAME and
SYMBOL_LINKAGE_NAME.
(struct general_symbol_info): Expand comment.
(DEPRECATED_SYMBOL_NAME): Rename from SYMBOL_NAME.
(SYMBOL_MATCHES_NAME): Use DEPRECATED_SYMBOL_NAME.
(SYMBOL_MATCHES_REGEXP): Ditto.
* symtab.c (symbol_natural_name): New function.
* objfiles.h: Replace all uses of SYMBOL_NAME by
DEPRECATED_SYMBOL_NAME.
* xcoffread.c, valops.c, typeprint.c, tracepoint.c: Ditto.
* symtab.c, symmisc.c, symfile.c, stack.c, stabsread.c: Ditto.
* somsolib.c, sol-thread.c, rs6000-tdep.c, p-valprint.c: Ditto.
* printcmd.c, objfiles.c, objc-lang.c, mipsread.c: Ditto.
* minsyms.c, mdebugread.c, linespec.c, jv-lang.c: Ditto.
* i386-tdep.c, i386-linux-tdep.c, hpread.c, hppa-tdep.c: Ditto.
* gnu-v2-abi.c, f-valprint.c, findvar.c, expprint.c: Ditto.
* dwarfread.c, dwarf2read.c, dbxread.c, c-valprint.c: Ditto.
* cp-valprint.c, coffread.c, buildsym.c, breakpoint.c: Ditto.
* blockframe.c, ax-gdb.c, arm-linux-tdep.c, ada-lang.c: Ditto.
* ada-exp.y: Ditto.
* ada-exp.y: Update copyright.
* sol-thread.c, mipsread.c, jv-lang.c, f-valprint.c: Ditto.
* cp-valprint.c: Ditto.
2003-02-25 David Carlton <carlton@math.stanford.edu>
* generic/gdbtk.h: Replace all instances of SYMBOL_NAME by
DEPRECATED_SYMBOL_NAME.
* generic/gdbtk-stack.c, generic/gdbtk-cmds.c: Ditto.
* generic/gdbtk-stack.c, generic/gdbtk-cmds.c: Update copyright.
2003-02-25 David Carlton <carlton@math.stanford.edu>
* mi-cmd-stack.c: Replace all instances of SYMBOL_NAME with
DEPRECATED_SYMBOL_NAME. Update copyright.
2003-02-26 05:36:23 +08:00
|
|
|
|
concat (DEPRECATED_SYMBOL_NAME (sym), NULL);
|
1999-07-08 04:19:36 +08:00
|
|
|
|
}
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
/* Keep track of any type which points to empty structured type,
|
|
|
|
|
so it can be filled from a definition from another file. A
|
|
|
|
|
simple forward reference (TYPE_CODE_UNDEF) is not an
|
|
|
|
|
empty structured type, though; the forward references
|
|
|
|
|
work themselves out via the magic of coff_lookup_type. */
|
|
|
|
|
if (TYPE_CODE (SYMBOL_TYPE (sym)) == TYPE_CODE_PTR &&
|
|
|
|
|
TYPE_LENGTH (TYPE_TARGET_TYPE (SYMBOL_TYPE (sym))) == 0 &&
|
|
|
|
|
TYPE_CODE (TYPE_TARGET_TYPE (SYMBOL_TYPE (sym))) !=
|
|
|
|
|
TYPE_CODE_UNDEF)
|
|
|
|
|
{
|
2003-09-16 Andrew Cagney <cagney@redhat.com>
* buildsym.c: Remove more occurances of "register".
* coffread.c, dbxread.c, dcache.c, dwarf2read.c: Ditto.
* environ.c, eval.c, f-valprint.c, findvar.c: Ditto.
* gdbtypes.c, gnu-v2-abi.c, h8300-tdep.c, hppa-tdep.c: Ditto.
* infcmd.c, mdebugread.c, minsyms.c, mips-tdep.c: Ditto.
* printcmd.c, remote-vx.c, sh-stub.c, sh-tdep.c: Ditto.
* sh64-tdep.c, source.c, stabsread.c, stack.c: Ditto.
* standalone.c, symfile.c, symmisc.c, symtab.c: Ditto.
* utils.c, valops.c, values.c, xcoffread.c: Ditto.
2003-09-17 02:56:35 +08:00
|
|
|
|
int i = hashname (DEPRECATED_SYMBOL_NAME (sym));
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
SYMBOL_VALUE_CHAIN (sym) = opaque_type_chain[i];
|
|
|
|
|
opaque_type_chain[i] = sym;
|
|
|
|
|
}
|
|
|
|
|
add_symbol_to_list (sym, &file_symbols);
|
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case C_STRTAG:
|
|
|
|
|
case C_UNTAG:
|
|
|
|
|
case C_ENTAG:
|
|
|
|
|
SYMBOL_CLASS (sym) = LOC_TYPEDEF;
|
2003-05-14 Elena Zannoni <ezannoni@redhat.com>
* symtab.h (enum domain_enum): Rename from namespace_enum.
(UNDEF_DOMAIN, VAR_DOMAIN, STRUCT_DOMAIN, LABEL_DOMAIN,
VARIABLES_DOMAIN, FUNCTIONS_DOMAIN, TYPES_DOMAIN, METHODS_DOMAIN):
Rename from UNDEF_NAMESPACE, VAR_NAMESPACE, STRUCT_NAMESPACE,
LABEL_NAMESPACE, VARIABLES_NAMESPACE, FUNCTIONS_NAMESPACE,
TYPES_NAMESPACE, METHODS_NAMESPACE.
(SYMBOL_NAMESPACE): Rename to SYMBOL_DOMAIN.
(struct symbol, struct partial_symbol): Rename field
'namespace_enum namespace' to 'domain_enum domain'.
(PSYMBOL_NAMESPACE): Rename to PSYMBOL_DOMAIN.
Delete old define kludge for namespace.
* ada-exp.y, ada-lang.c, ada-lang.h, alpha-tdep.c, arm-tdep.c,
blockframe.c, c-exp.y, c-valprint.c, coffread.c, dbxread.c,
dwarf2read.c, dwarfread.c, f-exp.y, gdbtypes.c, gdbtypes.h,
gnu-v3-abi.c, hppa-tdep.c, hpread.c, jv-exp.y, jv-lang.c,
language.c, linespec.c, m2-exp.y, m3-nat.c, mdebugread.c,
mips-tdep.c, nlmread.c, objc-exp.y, objc-lang.c, objfiles.c,
p-exp.y, p-valprint.c, parse.c, printcmd.c, scm-lang.c, source.c,
stabsread.c, stack.c, symfile.c, symfile.h, symmisc.c, symtab.c,
valops.c, values.c, xcoffread.c, xstormy16-tdep.c: Replace all
occurrences of the above.
2003-05-12 Elena Zannoni <ezannoni@redhat.com>
* mi-mi-cmd-stack.c (list_args_or_locals): Rename VAR_NAMESPACE to
VAR_DOMAIN.
2003-05-15 01:43:20 +08:00
|
|
|
|
SYMBOL_DOMAIN (sym) = STRUCT_DOMAIN;
|
1999-07-08 04:19:36 +08:00
|
|
|
|
|
|
|
|
|
/* Some compilers try to be helpful by inventing "fake"
|
|
|
|
|
names for anonymous enums, structures, and unions, like
|
|
|
|
|
"~0fake" or ".0fake". Thanks, but no thanks... */
|
|
|
|
|
if (TYPE_TAG_NAME (SYMBOL_TYPE (sym)) == 0)
|
2003-02-25 David Carlton <carlton@math.stanford.edu>
* symtab.h (SYMBOL_NATURAL_NAME): New macro.
(SYMBOL_LINKAGE_NAME): Ditto.
(SYMBOL_PRINT_NAME): Use SYMBOL_NATURAL_NAME and
SYMBOL_LINKAGE_NAME.
(struct general_symbol_info): Expand comment.
(DEPRECATED_SYMBOL_NAME): Rename from SYMBOL_NAME.
(SYMBOL_MATCHES_NAME): Use DEPRECATED_SYMBOL_NAME.
(SYMBOL_MATCHES_REGEXP): Ditto.
* symtab.c (symbol_natural_name): New function.
* objfiles.h: Replace all uses of SYMBOL_NAME by
DEPRECATED_SYMBOL_NAME.
* xcoffread.c, valops.c, typeprint.c, tracepoint.c: Ditto.
* symtab.c, symmisc.c, symfile.c, stack.c, stabsread.c: Ditto.
* somsolib.c, sol-thread.c, rs6000-tdep.c, p-valprint.c: Ditto.
* printcmd.c, objfiles.c, objc-lang.c, mipsread.c: Ditto.
* minsyms.c, mdebugread.c, linespec.c, jv-lang.c: Ditto.
* i386-tdep.c, i386-linux-tdep.c, hpread.c, hppa-tdep.c: Ditto.
* gnu-v2-abi.c, f-valprint.c, findvar.c, expprint.c: Ditto.
* dwarfread.c, dwarf2read.c, dbxread.c, c-valprint.c: Ditto.
* cp-valprint.c, coffread.c, buildsym.c, breakpoint.c: Ditto.
* blockframe.c, ax-gdb.c, arm-linux-tdep.c, ada-lang.c: Ditto.
* ada-exp.y: Ditto.
* ada-exp.y: Update copyright.
* sol-thread.c, mipsread.c, jv-lang.c, f-valprint.c: Ditto.
* cp-valprint.c: Ditto.
2003-02-25 David Carlton <carlton@math.stanford.edu>
* generic/gdbtk.h: Replace all instances of SYMBOL_NAME by
DEPRECATED_SYMBOL_NAME.
* generic/gdbtk-stack.c, generic/gdbtk-cmds.c: Ditto.
* generic/gdbtk-stack.c, generic/gdbtk-cmds.c: Update copyright.
2003-02-25 David Carlton <carlton@math.stanford.edu>
* mi-cmd-stack.c: Replace all instances of SYMBOL_NAME with
DEPRECATED_SYMBOL_NAME. Update copyright.
2003-02-26 05:36:23 +08:00
|
|
|
|
if (DEPRECATED_SYMBOL_NAME (sym) != NULL
|
|
|
|
|
&& *DEPRECATED_SYMBOL_NAME (sym) != '~'
|
|
|
|
|
&& *DEPRECATED_SYMBOL_NAME (sym) != '.')
|
1999-07-08 04:19:36 +08:00
|
|
|
|
TYPE_TAG_NAME (SYMBOL_TYPE (sym)) =
|
2003-02-25 David Carlton <carlton@math.stanford.edu>
* symtab.h (SYMBOL_NATURAL_NAME): New macro.
(SYMBOL_LINKAGE_NAME): Ditto.
(SYMBOL_PRINT_NAME): Use SYMBOL_NATURAL_NAME and
SYMBOL_LINKAGE_NAME.
(struct general_symbol_info): Expand comment.
(DEPRECATED_SYMBOL_NAME): Rename from SYMBOL_NAME.
(SYMBOL_MATCHES_NAME): Use DEPRECATED_SYMBOL_NAME.
(SYMBOL_MATCHES_REGEXP): Ditto.
* symtab.c (symbol_natural_name): New function.
* objfiles.h: Replace all uses of SYMBOL_NAME by
DEPRECATED_SYMBOL_NAME.
* xcoffread.c, valops.c, typeprint.c, tracepoint.c: Ditto.
* symtab.c, symmisc.c, symfile.c, stack.c, stabsread.c: Ditto.
* somsolib.c, sol-thread.c, rs6000-tdep.c, p-valprint.c: Ditto.
* printcmd.c, objfiles.c, objc-lang.c, mipsread.c: Ditto.
* minsyms.c, mdebugread.c, linespec.c, jv-lang.c: Ditto.
* i386-tdep.c, i386-linux-tdep.c, hpread.c, hppa-tdep.c: Ditto.
* gnu-v2-abi.c, f-valprint.c, findvar.c, expprint.c: Ditto.
* dwarfread.c, dwarf2read.c, dbxread.c, c-valprint.c: Ditto.
* cp-valprint.c, coffread.c, buildsym.c, breakpoint.c: Ditto.
* blockframe.c, ax-gdb.c, arm-linux-tdep.c, ada-lang.c: Ditto.
* ada-exp.y: Ditto.
* ada-exp.y: Update copyright.
* sol-thread.c, mipsread.c, jv-lang.c, f-valprint.c: Ditto.
* cp-valprint.c: Ditto.
2003-02-25 David Carlton <carlton@math.stanford.edu>
* generic/gdbtk.h: Replace all instances of SYMBOL_NAME by
DEPRECATED_SYMBOL_NAME.
* generic/gdbtk-stack.c, generic/gdbtk-cmds.c: Ditto.
* generic/gdbtk-stack.c, generic/gdbtk-cmds.c: Update copyright.
2003-02-25 David Carlton <carlton@math.stanford.edu>
* mi-cmd-stack.c: Replace all instances of SYMBOL_NAME with
DEPRECATED_SYMBOL_NAME. Update copyright.
2003-02-26 05:36:23 +08:00
|
|
|
|
concat (DEPRECATED_SYMBOL_NAME (sym), NULL);
|
1999-07-08 04:19:36 +08:00
|
|
|
|
|
|
|
|
|
add_symbol_to_list (sym, &file_symbols);
|
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
default:
|
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
return sym;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Decode a coff type specifier; return the type that is meant. */
|
|
|
|
|
|
|
|
|
|
static struct type *
|
2003-09-16 Andrew Cagney <cagney@redhat.com>
* buildsym.c: Remove more occurances of "register".
* coffread.c, dbxread.c, dcache.c, dwarf2read.c: Ditto.
* environ.c, eval.c, f-valprint.c, findvar.c: Ditto.
* gdbtypes.c, gnu-v2-abi.c, h8300-tdep.c, hppa-tdep.c: Ditto.
* infcmd.c, mdebugread.c, minsyms.c, mips-tdep.c: Ditto.
* printcmd.c, remote-vx.c, sh-stub.c, sh-tdep.c: Ditto.
* sh64-tdep.c, source.c, stabsread.c, stack.c: Ditto.
* standalone.c, symfile.c, symmisc.c, symtab.c: Ditto.
* utils.c, valops.c, values.c, xcoffread.c: Ditto.
2003-09-17 02:56:35 +08:00
|
|
|
|
decode_type (struct coff_symbol *cs, unsigned int c_type,
|
|
|
|
|
union internal_auxent *aux)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
2003-09-14 Andrew Cagney <cagney@redhat.com>
* alpha-nat.c: Remove some occurances of "register".
* alpha-tdep.c, arm-tdep.c, blockframe.c, breakpoint.c: Ditto.
* buildsym.c, c-typeprint.c, c-valprint.c, coffread.c: Ditto.
* corefile.c, cp-support.c, cp-valprint.c, cris-tdep.c: Ditto.
* dbxread.c, dcache.c, dwarf2read.c, elfread.c: Ditto.
* environ.c, eval.c, event-top.c, f-typeprint.c: Ditto.
* f-valprint.c, findvar.c, frame.c, gdbtypes.c: Ditto.
* h8300-tdep.c, hppa-tdep.c, hppab-nat.c, hppah-nat.c: Ditto.
* hppam3-nat.c, hpread.c, ia64-aix-nat.c, ia64-linux-nat.c: Ditto.
* infcall.c, infcmd.c, inflow.c, infptrace.c, infrun.c: Ditto.
* infttrace.c, irix5-nat.c, jv-typeprint.c: Ditto.
* jv-valprint.c, m68k-tdep.c, m68klinux-nat.c, main.c: Ditto.
* mdebugread.c, minsyms.c, mips-linux-tdep.c: Ditto.
* mips-nat.c, mips-tdep.c, mipsread.c, mipsv4-nat.c: Ditto.
* ns32k-tdep.c, objfiles.c, p-typeprint.c: Ditto.
* p-valprint.c, ppc-linux-nat.c, printcmd.c: Ditto.
* remote-mips.c, remote-vx.c, rs6000-nat.c: Ditto.
* rs6000-tdep.c, scm-exp.c, sh-tdep.c, sh64-tdep.c: Ditto.
* solib.c, somread.c, source.c, sparc-tdep.c: Ditto.
* stabsread.c, stack.c, standalone.c, symfile.c: Ditto.
* symmisc.c, symtab.c, top.c, tracepoint.c: Ditto.
* typeprint.c, utils.c, valarith.c, valops.c: Ditto.
* values.c, vax-tdep.c, xcoffread.c: Ditto.
2003-09-15 00:32:14 +08:00
|
|
|
|
struct type *type = 0;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
unsigned int new_c_type;
|
|
|
|
|
|
|
|
|
|
if (c_type & ~N_BTMASK)
|
|
|
|
|
{
|
|
|
|
|
new_c_type = DECREF (c_type);
|
|
|
|
|
if (ISPTR (c_type))
|
|
|
|
|
{
|
|
|
|
|
type = decode_type (cs, new_c_type, aux);
|
|
|
|
|
type = lookup_pointer_type (type);
|
|
|
|
|
}
|
|
|
|
|
else if (ISFCN (c_type))
|
|
|
|
|
{
|
|
|
|
|
type = decode_type (cs, new_c_type, aux);
|
|
|
|
|
type = lookup_function_type (type);
|
|
|
|
|
}
|
|
|
|
|
else if (ISARY (c_type))
|
|
|
|
|
{
|
|
|
|
|
int i, n;
|
2003-09-16 Andrew Cagney <cagney@redhat.com>
* buildsym.c: Remove more occurances of "register".
* coffread.c, dbxread.c, dcache.c, dwarf2read.c: Ditto.
* environ.c, eval.c, f-valprint.c, findvar.c: Ditto.
* gdbtypes.c, gnu-v2-abi.c, h8300-tdep.c, hppa-tdep.c: Ditto.
* infcmd.c, mdebugread.c, minsyms.c, mips-tdep.c: Ditto.
* printcmd.c, remote-vx.c, sh-stub.c, sh-tdep.c: Ditto.
* sh64-tdep.c, source.c, stabsread.c, stack.c: Ditto.
* standalone.c, symfile.c, symmisc.c, symtab.c: Ditto.
* utils.c, valops.c, values.c, xcoffread.c: Ditto.
2003-09-17 02:56:35 +08:00
|
|
|
|
unsigned short *dim;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
struct type *base_type, *index_type, *range_type;
|
|
|
|
|
|
|
|
|
|
/* Define an array type. */
|
|
|
|
|
/* auxent refers to array, not base type */
|
|
|
|
|
if (aux->x_sym.x_tagndx.l == 0)
|
|
|
|
|
cs->c_naux = 0;
|
|
|
|
|
|
|
|
|
|
/* shift the indices down */
|
|
|
|
|
dim = &aux->x_sym.x_fcnary.x_ary.x_dimen[0];
|
|
|
|
|
i = 1;
|
|
|
|
|
n = dim[0];
|
|
|
|
|
for (i = 0; *dim && i < DIMNUM - 1; i++, dim++)
|
|
|
|
|
*dim = *(dim + 1);
|
|
|
|
|
*dim = 0;
|
|
|
|
|
|
|
|
|
|
base_type = decode_type (cs, new_c_type, aux);
|
|
|
|
|
index_type = lookup_fundamental_type (current_objfile, FT_INTEGER);
|
|
|
|
|
range_type =
|
|
|
|
|
create_range_type ((struct type *) NULL, index_type, 0, n - 1);
|
|
|
|
|
type =
|
|
|
|
|
create_array_type ((struct type *) NULL, base_type, range_type);
|
|
|
|
|
}
|
|
|
|
|
return type;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Reference to existing type. This only occurs with the
|
|
|
|
|
struct, union, and enum types. EPI a29k coff
|
|
|
|
|
fakes us out by producing aux entries with a nonzero
|
|
|
|
|
x_tagndx for definitions of structs, unions, and enums, so we
|
|
|
|
|
have to check the c_sclass field. SCO 3.2v4 cc gets confused
|
|
|
|
|
with pointers to pointers to defined structs, and generates
|
|
|
|
|
negative x_tagndx fields. */
|
|
|
|
|
if (cs->c_naux > 0 && aux->x_sym.x_tagndx.l != 0)
|
|
|
|
|
{
|
|
|
|
|
if (cs->c_sclass != C_STRTAG
|
|
|
|
|
&& cs->c_sclass != C_UNTAG
|
|
|
|
|
&& cs->c_sclass != C_ENTAG
|
|
|
|
|
&& aux->x_sym.x_tagndx.l >= 0)
|
|
|
|
|
{
|
|
|
|
|
type = coff_alloc_type (aux->x_sym.x_tagndx.l);
|
|
|
|
|
return type;
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
2002-12-17 08:39:08 +08:00
|
|
|
|
complaint (&symfile_complaints,
|
|
|
|
|
"Symbol table entry for %s has bad tagndx value",
|
|
|
|
|
cs->c_name);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
/* And fall through to decode_base_type... */
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
return decode_base_type (cs, BTYPE (c_type), aux);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Decode a coff type specifier for function definition;
|
|
|
|
|
return the type that the function returns. */
|
|
|
|
|
|
|
|
|
|
static struct type *
|
2003-09-16 Andrew Cagney <cagney@redhat.com>
* buildsym.c: Remove more occurances of "register".
* coffread.c, dbxread.c, dcache.c, dwarf2read.c: Ditto.
* environ.c, eval.c, f-valprint.c, findvar.c: Ditto.
* gdbtypes.c, gnu-v2-abi.c, h8300-tdep.c, hppa-tdep.c: Ditto.
* infcmd.c, mdebugread.c, minsyms.c, mips-tdep.c: Ditto.
* printcmd.c, remote-vx.c, sh-stub.c, sh-tdep.c: Ditto.
* sh64-tdep.c, source.c, stabsread.c, stack.c: Ditto.
* standalone.c, symfile.c, symmisc.c, symtab.c: Ditto.
* utils.c, valops.c, values.c, xcoffread.c: Ditto.
2003-09-17 02:56:35 +08:00
|
|
|
|
decode_function_type (struct coff_symbol *cs, unsigned int c_type,
|
|
|
|
|
union internal_auxent *aux)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
if (aux->x_sym.x_tagndx.l == 0)
|
1999-07-08 04:19:36 +08:00
|
|
|
|
cs->c_naux = 0; /* auxent refers to function, not base type */
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
return decode_type (cs, DECREF (c_type), aux);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* basic C types */
|
|
|
|
|
|
|
|
|
|
static struct type *
|
2003-09-16 Andrew Cagney <cagney@redhat.com>
* buildsym.c: Remove more occurances of "register".
* coffread.c, dbxread.c, dcache.c, dwarf2read.c: Ditto.
* environ.c, eval.c, f-valprint.c, findvar.c: Ditto.
* gdbtypes.c, gnu-v2-abi.c, h8300-tdep.c, hppa-tdep.c: Ditto.
* infcmd.c, mdebugread.c, minsyms.c, mips-tdep.c: Ditto.
* printcmd.c, remote-vx.c, sh-stub.c, sh-tdep.c: Ditto.
* sh64-tdep.c, source.c, stabsread.c, stack.c: Ditto.
* standalone.c, symfile.c, symmisc.c, symtab.c: Ditto.
* utils.c, valops.c, values.c, xcoffread.c: Ditto.
2003-09-17 02:56:35 +08:00
|
|
|
|
decode_base_type (struct coff_symbol *cs, unsigned int c_type,
|
|
|
|
|
union internal_auxent *aux)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
struct type *type;
|
|
|
|
|
|
|
|
|
|
switch (c_type)
|
|
|
|
|
{
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case T_NULL:
|
|
|
|
|
/* shows up with "void (*foo)();" structure members */
|
|
|
|
|
return lookup_fundamental_type (current_objfile, FT_VOID);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
|
|
|
|
#ifdef T_VOID
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case T_VOID:
|
|
|
|
|
/* Intel 960 COFF has this symbol and meaning. */
|
|
|
|
|
return lookup_fundamental_type (current_objfile, FT_VOID);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
#endif
|
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case T_CHAR:
|
|
|
|
|
return lookup_fundamental_type (current_objfile, FT_CHAR);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case T_SHORT:
|
|
|
|
|
return lookup_fundamental_type (current_objfile, FT_SHORT);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case T_INT:
|
|
|
|
|
return lookup_fundamental_type (current_objfile, FT_INTEGER);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case T_LONG:
|
|
|
|
|
if (cs->c_sclass == C_FIELD
|
|
|
|
|
&& aux->x_sym.x_misc.x_lnsz.x_size > TARGET_LONG_BIT)
|
|
|
|
|
return lookup_fundamental_type (current_objfile, FT_LONG_LONG);
|
|
|
|
|
else
|
|
|
|
|
return lookup_fundamental_type (current_objfile, FT_LONG);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case T_FLOAT:
|
|
|
|
|
return lookup_fundamental_type (current_objfile, FT_FLOAT);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case T_DOUBLE:
|
|
|
|
|
return lookup_fundamental_type (current_objfile, FT_DBL_PREC_FLOAT);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case T_LNGDBL:
|
|
|
|
|
return lookup_fundamental_type (current_objfile, FT_EXT_PREC_FLOAT);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case T_STRUCT:
|
|
|
|
|
if (cs->c_naux != 1)
|
|
|
|
|
{
|
|
|
|
|
/* anonymous structure type */
|
|
|
|
|
type = coff_alloc_type (cs->c_symnum);
|
|
|
|
|
TYPE_CODE (type) = TYPE_CODE_STRUCT;
|
|
|
|
|
TYPE_NAME (type) = NULL;
|
|
|
|
|
/* This used to set the tag to "<opaque>". But I think setting it
|
|
|
|
|
to NULL is right, and the printing code can print it as
|
|
|
|
|
"struct {...}". */
|
|
|
|
|
TYPE_TAG_NAME (type) = NULL;
|
|
|
|
|
INIT_CPLUS_SPECIFIC (type);
|
|
|
|
|
TYPE_LENGTH (type) = 0;
|
|
|
|
|
TYPE_FIELDS (type) = 0;
|
|
|
|
|
TYPE_NFIELDS (type) = 0;
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
type = coff_read_struct_type (cs->c_symnum,
|
|
|
|
|
aux->x_sym.x_misc.x_lnsz.x_size,
|
|
|
|
|
aux->x_sym.x_fcnary.x_fcn.x_endndx.l);
|
|
|
|
|
}
|
|
|
|
|
return type;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case T_UNION:
|
|
|
|
|
if (cs->c_naux != 1)
|
|
|
|
|
{
|
|
|
|
|
/* anonymous union type */
|
|
|
|
|
type = coff_alloc_type (cs->c_symnum);
|
|
|
|
|
TYPE_NAME (type) = NULL;
|
|
|
|
|
/* This used to set the tag to "<opaque>". But I think setting it
|
|
|
|
|
to NULL is right, and the printing code can print it as
|
|
|
|
|
"union {...}". */
|
|
|
|
|
TYPE_TAG_NAME (type) = NULL;
|
|
|
|
|
INIT_CPLUS_SPECIFIC (type);
|
|
|
|
|
TYPE_LENGTH (type) = 0;
|
|
|
|
|
TYPE_FIELDS (type) = 0;
|
|
|
|
|
TYPE_NFIELDS (type) = 0;
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
type = coff_read_struct_type (cs->c_symnum,
|
1999-04-16 09:35:26 +08:00
|
|
|
|
aux->x_sym.x_misc.x_lnsz.x_size,
|
1999-07-08 04:19:36 +08:00
|
|
|
|
aux->x_sym.x_fcnary.x_fcn.x_endndx.l);
|
|
|
|
|
}
|
|
|
|
|
TYPE_CODE (type) = TYPE_CODE_UNION;
|
|
|
|
|
return type;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case T_ENUM:
|
|
|
|
|
if (cs->c_naux != 1)
|
|
|
|
|
{
|
|
|
|
|
/* anonymous enum type */
|
|
|
|
|
type = coff_alloc_type (cs->c_symnum);
|
|
|
|
|
TYPE_CODE (type) = TYPE_CODE_ENUM;
|
|
|
|
|
TYPE_NAME (type) = NULL;
|
|
|
|
|
/* This used to set the tag to "<opaque>". But I think setting it
|
|
|
|
|
to NULL is right, and the printing code can print it as
|
|
|
|
|
"enum {...}". */
|
|
|
|
|
TYPE_TAG_NAME (type) = NULL;
|
|
|
|
|
TYPE_LENGTH (type) = 0;
|
|
|
|
|
TYPE_FIELDS (type) = 0;
|
|
|
|
|
TYPE_NFIELDS (type) = 0;
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
type = coff_read_enum_type (cs->c_symnum,
|
|
|
|
|
aux->x_sym.x_misc.x_lnsz.x_size,
|
|
|
|
|
aux->x_sym.x_fcnary.x_fcn.x_endndx.l);
|
|
|
|
|
}
|
|
|
|
|
return type;
|
|
|
|
|
|
|
|
|
|
case T_MOE:
|
|
|
|
|
/* shouldn't show up here */
|
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case T_UCHAR:
|
|
|
|
|
return lookup_fundamental_type (current_objfile, FT_UNSIGNED_CHAR);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case T_USHORT:
|
|
|
|
|
return lookup_fundamental_type (current_objfile, FT_UNSIGNED_SHORT);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case T_UINT:
|
|
|
|
|
return lookup_fundamental_type (current_objfile, FT_UNSIGNED_INTEGER);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case T_ULONG:
|
|
|
|
|
if (cs->c_sclass == C_FIELD
|
|
|
|
|
&& aux->x_sym.x_misc.x_lnsz.x_size > TARGET_LONG_BIT)
|
|
|
|
|
return lookup_fundamental_type (current_objfile, FT_UNSIGNED_LONG_LONG);
|
|
|
|
|
else
|
|
|
|
|
return lookup_fundamental_type (current_objfile, FT_UNSIGNED_LONG);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
}
|
2002-12-17 08:39:08 +08:00
|
|
|
|
complaint (&symfile_complaints, "Unexpected type for symbol %s", cs->c_name);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
return lookup_fundamental_type (current_objfile, FT_VOID);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* This page contains subroutines of read_type. */
|
|
|
|
|
|
|
|
|
|
/* Read the description of a structure (or union type) and return an
|
|
|
|
|
object describing the type. */
|
|
|
|
|
|
|
|
|
|
static struct type *
|
2000-07-30 09:48:28 +08:00
|
|
|
|
coff_read_struct_type (int index, int length, int lastsym)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
struct nextfield
|
|
|
|
|
{
|
|
|
|
|
struct nextfield *next;
|
|
|
|
|
struct field field;
|
|
|
|
|
};
|
|
|
|
|
|
2003-09-14 Andrew Cagney <cagney@redhat.com>
* alpha-nat.c: Remove some occurances of "register".
* alpha-tdep.c, arm-tdep.c, blockframe.c, breakpoint.c: Ditto.
* buildsym.c, c-typeprint.c, c-valprint.c, coffread.c: Ditto.
* corefile.c, cp-support.c, cp-valprint.c, cris-tdep.c: Ditto.
* dbxread.c, dcache.c, dwarf2read.c, elfread.c: Ditto.
* environ.c, eval.c, event-top.c, f-typeprint.c: Ditto.
* f-valprint.c, findvar.c, frame.c, gdbtypes.c: Ditto.
* h8300-tdep.c, hppa-tdep.c, hppab-nat.c, hppah-nat.c: Ditto.
* hppam3-nat.c, hpread.c, ia64-aix-nat.c, ia64-linux-nat.c: Ditto.
* infcall.c, infcmd.c, inflow.c, infptrace.c, infrun.c: Ditto.
* infttrace.c, irix5-nat.c, jv-typeprint.c: Ditto.
* jv-valprint.c, m68k-tdep.c, m68klinux-nat.c, main.c: Ditto.
* mdebugread.c, minsyms.c, mips-linux-tdep.c: Ditto.
* mips-nat.c, mips-tdep.c, mipsread.c, mipsv4-nat.c: Ditto.
* ns32k-tdep.c, objfiles.c, p-typeprint.c: Ditto.
* p-valprint.c, ppc-linux-nat.c, printcmd.c: Ditto.
* remote-mips.c, remote-vx.c, rs6000-nat.c: Ditto.
* rs6000-tdep.c, scm-exp.c, sh-tdep.c, sh64-tdep.c: Ditto.
* solib.c, somread.c, source.c, sparc-tdep.c: Ditto.
* stabsread.c, stack.c, standalone.c, symfile.c: Ditto.
* symmisc.c, symtab.c, top.c, tracepoint.c: Ditto.
* typeprint.c, utils.c, valarith.c, valops.c: Ditto.
* values.c, vax-tdep.c, xcoffread.c: Ditto.
2003-09-15 00:32:14 +08:00
|
|
|
|
struct type *type;
|
|
|
|
|
struct nextfield *list = 0;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
struct nextfield *new;
|
|
|
|
|
int nfields = 0;
|
2003-09-14 Andrew Cagney <cagney@redhat.com>
* alpha-nat.c: Remove some occurances of "register".
* alpha-tdep.c, arm-tdep.c, blockframe.c, breakpoint.c: Ditto.
* buildsym.c, c-typeprint.c, c-valprint.c, coffread.c: Ditto.
* corefile.c, cp-support.c, cp-valprint.c, cris-tdep.c: Ditto.
* dbxread.c, dcache.c, dwarf2read.c, elfread.c: Ditto.
* environ.c, eval.c, event-top.c, f-typeprint.c: Ditto.
* f-valprint.c, findvar.c, frame.c, gdbtypes.c: Ditto.
* h8300-tdep.c, hppa-tdep.c, hppab-nat.c, hppah-nat.c: Ditto.
* hppam3-nat.c, hpread.c, ia64-aix-nat.c, ia64-linux-nat.c: Ditto.
* infcall.c, infcmd.c, inflow.c, infptrace.c, infrun.c: Ditto.
* infttrace.c, irix5-nat.c, jv-typeprint.c: Ditto.
* jv-valprint.c, m68k-tdep.c, m68klinux-nat.c, main.c: Ditto.
* mdebugread.c, minsyms.c, mips-linux-tdep.c: Ditto.
* mips-nat.c, mips-tdep.c, mipsread.c, mipsv4-nat.c: Ditto.
* ns32k-tdep.c, objfiles.c, p-typeprint.c: Ditto.
* p-valprint.c, ppc-linux-nat.c, printcmd.c: Ditto.
* remote-mips.c, remote-vx.c, rs6000-nat.c: Ditto.
* rs6000-tdep.c, scm-exp.c, sh-tdep.c, sh64-tdep.c: Ditto.
* solib.c, somread.c, source.c, sparc-tdep.c: Ditto.
* stabsread.c, stack.c, standalone.c, symfile.c: Ditto.
* symmisc.c, symtab.c, top.c, tracepoint.c: Ditto.
* typeprint.c, utils.c, valarith.c, valops.c: Ditto.
* values.c, vax-tdep.c, xcoffread.c: Ditto.
2003-09-15 00:32:14 +08:00
|
|
|
|
int n;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
char *name;
|
|
|
|
|
struct coff_symbol member_sym;
|
2003-09-14 Andrew Cagney <cagney@redhat.com>
* alpha-nat.c: Remove some occurances of "register".
* alpha-tdep.c, arm-tdep.c, blockframe.c, breakpoint.c: Ditto.
* buildsym.c, c-typeprint.c, c-valprint.c, coffread.c: Ditto.
* corefile.c, cp-support.c, cp-valprint.c, cris-tdep.c: Ditto.
* dbxread.c, dcache.c, dwarf2read.c, elfread.c: Ditto.
* environ.c, eval.c, event-top.c, f-typeprint.c: Ditto.
* f-valprint.c, findvar.c, frame.c, gdbtypes.c: Ditto.
* h8300-tdep.c, hppa-tdep.c, hppab-nat.c, hppah-nat.c: Ditto.
* hppam3-nat.c, hpread.c, ia64-aix-nat.c, ia64-linux-nat.c: Ditto.
* infcall.c, infcmd.c, inflow.c, infptrace.c, infrun.c: Ditto.
* infttrace.c, irix5-nat.c, jv-typeprint.c: Ditto.
* jv-valprint.c, m68k-tdep.c, m68klinux-nat.c, main.c: Ditto.
* mdebugread.c, minsyms.c, mips-linux-tdep.c: Ditto.
* mips-nat.c, mips-tdep.c, mipsread.c, mipsv4-nat.c: Ditto.
* ns32k-tdep.c, objfiles.c, p-typeprint.c: Ditto.
* p-valprint.c, ppc-linux-nat.c, printcmd.c: Ditto.
* remote-mips.c, remote-vx.c, rs6000-nat.c: Ditto.
* rs6000-tdep.c, scm-exp.c, sh-tdep.c, sh64-tdep.c: Ditto.
* solib.c, somread.c, source.c, sparc-tdep.c: Ditto.
* stabsread.c, stack.c, standalone.c, symfile.c: Ditto.
* symmisc.c, symtab.c, top.c, tracepoint.c: Ditto.
* typeprint.c, utils.c, valarith.c, valops.c: Ditto.
* values.c, vax-tdep.c, xcoffread.c: Ditto.
2003-09-15 00:32:14 +08:00
|
|
|
|
struct coff_symbol *ms = &member_sym;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
struct internal_syment sub_sym;
|
|
|
|
|
union internal_auxent sub_aux;
|
|
|
|
|
int done = 0;
|
|
|
|
|
|
|
|
|
|
type = coff_alloc_type (index);
|
|
|
|
|
TYPE_CODE (type) = TYPE_CODE_STRUCT;
|
1999-07-08 04:19:36 +08:00
|
|
|
|
INIT_CPLUS_SPECIFIC (type);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
TYPE_LENGTH (type) = length;
|
|
|
|
|
|
|
|
|
|
while (!done && symnum < lastsym && symnum < nlist_nsyms_global)
|
|
|
|
|
{
|
|
|
|
|
read_one_sym (ms, &sub_sym, &sub_aux);
|
|
|
|
|
name = ms->c_name;
|
|
|
|
|
name = EXTERNAL_NAME (name, current_objfile->obfd);
|
|
|
|
|
|
|
|
|
|
switch (ms->c_sclass)
|
|
|
|
|
{
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case C_MOS:
|
|
|
|
|
case C_MOU:
|
|
|
|
|
|
|
|
|
|
/* Get space to record the next field's data. */
|
|
|
|
|
new = (struct nextfield *) alloca (sizeof (struct nextfield));
|
|
|
|
|
new->next = list;
|
|
|
|
|
list = new;
|
|
|
|
|
|
|
|
|
|
/* Save the data. */
|
|
|
|
|
list->field.name =
|
|
|
|
|
obsavestring (name,
|
|
|
|
|
strlen (name),
|
2004-02-07 Elena Zannoni <ezannoni@redhat.com>
* buildsym.c (free_pending_blocks, finish_block)
(record_pending_block, make_blockvector, end_symtab): Replace
symbol_obstack with objfile_obstack.
* coffread.c (process_coff_symbol, coff_read_struct_type)
(coff_read_enum_type): Ditto.
* cp-namespace.c (initialize_namespace_symtab)
(check_one_possible_namespace_symbol): Ditto.
* dwarf2read.c (new_symbol, dwarf2_const_value, macro_start_file)
(dwarf2_symbol_mark_computed): Ditto.
* dwarfread.c (enum_type, new_symbol, synthesize_typedef): Ditto.
* elfread.c (elf_symtab_read): Ditto.
* hpread.c (hpread_symfile_init, hpread_symfile_init)
(hpread_read_enum_type, hpread_read_function_type)
(hpread_read_doc_function_type, hpread_process_one_debug_symbol):
Ditto.
* jv-lang.c (get_java_class_symtab, add_class_symbol)
(java_link_class_type): Ditto.
* mdebugread.c (parse_symbol, psymtab_to_symtab_1, new_symtab)
(new_symbol): Ditto.
* minsyms.c (install_minimal_symbols): Ditto.
* objfiles.c (allocate_objfile): Remove init of symbol_obstack.
(terminate_minimal_symbol_table): Replace symbol_obstack with
objfile_obstack.
(free_objfile): Remove freeing of symbol_obstack.
* objfiles.h: Remove symbol_obstack field.
* pa64solib.c (add_to_solist): Replace symbol_obstack with
objfile_obstack.
* solib-sunos.c (allocate_rt_common_objfile): Remove init of
symbol_obstack.
(solib_add_common_symbols): Replace symbol_obstack with
objfile_obstack.
* somsolib.c (som_solib_add): Ditto.
* stabsread.c (patch_block_stabs, define_symbol, read_enum_type)
(common_block_start, common_block_end): Ditto.
* symfile.c (reread_symbols): Remove freeing and init of
symbol_obstack.
(allocate_symtab): Rename symbol_obstack to objfile_obstack.
* symfile.h: Update comment.
* symmisc.c (print_objfile_statistics): Remove symbol_obstack
stats printing.
* symtab.c (symbol_set_names): Replace symbol_obstack with
objfile_obstack.
* symtab.h (struct general_symbol_info, struct minimal_symbol):
Update comments.
* xcoffread.c (read_xcoff_symtab, SYMBOL_DUP, SYMNAME_ALLOC)
(init_stringtab, xcoff_initial_scan): Replace symbol_obstack with
objfile_obstack.
2004-02-08 07:13:47 +08:00
|
|
|
|
¤t_objfile->objfile_obstack);
|
1999-07-08 04:19:36 +08:00
|
|
|
|
FIELD_TYPE (list->field) = decode_type (ms, ms->c_type, &sub_aux);
|
|
|
|
|
FIELD_BITPOS (list->field) = 8 * ms->c_value;
|
|
|
|
|
FIELD_BITSIZE (list->field) = 0;
|
2002-11-11 08:55:34 +08:00
|
|
|
|
FIELD_STATIC_KIND (list->field) = 0;
|
1999-07-08 04:19:36 +08:00
|
|
|
|
nfields++;
|
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case C_FIELD:
|
|
|
|
|
|
|
|
|
|
/* Get space to record the next field's data. */
|
|
|
|
|
new = (struct nextfield *) alloca (sizeof (struct nextfield));
|
|
|
|
|
new->next = list;
|
|
|
|
|
list = new;
|
|
|
|
|
|
|
|
|
|
/* Save the data. */
|
|
|
|
|
list->field.name =
|
|
|
|
|
obsavestring (name,
|
|
|
|
|
strlen (name),
|
2004-02-07 Elena Zannoni <ezannoni@redhat.com>
* buildsym.c (free_pending_blocks, finish_block)
(record_pending_block, make_blockvector, end_symtab): Replace
symbol_obstack with objfile_obstack.
* coffread.c (process_coff_symbol, coff_read_struct_type)
(coff_read_enum_type): Ditto.
* cp-namespace.c (initialize_namespace_symtab)
(check_one_possible_namespace_symbol): Ditto.
* dwarf2read.c (new_symbol, dwarf2_const_value, macro_start_file)
(dwarf2_symbol_mark_computed): Ditto.
* dwarfread.c (enum_type, new_symbol, synthesize_typedef): Ditto.
* elfread.c (elf_symtab_read): Ditto.
* hpread.c (hpread_symfile_init, hpread_symfile_init)
(hpread_read_enum_type, hpread_read_function_type)
(hpread_read_doc_function_type, hpread_process_one_debug_symbol):
Ditto.
* jv-lang.c (get_java_class_symtab, add_class_symbol)
(java_link_class_type): Ditto.
* mdebugread.c (parse_symbol, psymtab_to_symtab_1, new_symtab)
(new_symbol): Ditto.
* minsyms.c (install_minimal_symbols): Ditto.
* objfiles.c (allocate_objfile): Remove init of symbol_obstack.
(terminate_minimal_symbol_table): Replace symbol_obstack with
objfile_obstack.
(free_objfile): Remove freeing of symbol_obstack.
* objfiles.h: Remove symbol_obstack field.
* pa64solib.c (add_to_solist): Replace symbol_obstack with
objfile_obstack.
* solib-sunos.c (allocate_rt_common_objfile): Remove init of
symbol_obstack.
(solib_add_common_symbols): Replace symbol_obstack with
objfile_obstack.
* somsolib.c (som_solib_add): Ditto.
* stabsread.c (patch_block_stabs, define_symbol, read_enum_type)
(common_block_start, common_block_end): Ditto.
* symfile.c (reread_symbols): Remove freeing and init of
symbol_obstack.
(allocate_symtab): Rename symbol_obstack to objfile_obstack.
* symfile.h: Update comment.
* symmisc.c (print_objfile_statistics): Remove symbol_obstack
stats printing.
* symtab.c (symbol_set_names): Replace symbol_obstack with
objfile_obstack.
* symtab.h (struct general_symbol_info, struct minimal_symbol):
Update comments.
* xcoffread.c (read_xcoff_symtab, SYMBOL_DUP, SYMNAME_ALLOC)
(init_stringtab, xcoff_initial_scan): Replace symbol_obstack with
objfile_obstack.
2004-02-08 07:13:47 +08:00
|
|
|
|
¤t_objfile->objfile_obstack);
|
1999-07-08 04:19:36 +08:00
|
|
|
|
FIELD_TYPE (list->field) = decode_type (ms, ms->c_type, &sub_aux);
|
|
|
|
|
FIELD_BITPOS (list->field) = ms->c_value;
|
|
|
|
|
FIELD_BITSIZE (list->field) = sub_aux.x_sym.x_misc.x_lnsz.x_size;
|
2002-11-11 08:55:34 +08:00
|
|
|
|
FIELD_STATIC_KIND (list->field) = 0;
|
1999-07-08 04:19:36 +08:00
|
|
|
|
nfields++;
|
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case C_EOS:
|
|
|
|
|
done = 1;
|
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
/* Now create the vector of fields, and record how big it is. */
|
|
|
|
|
|
|
|
|
|
TYPE_NFIELDS (type) = nfields;
|
|
|
|
|
TYPE_FIELDS (type) = (struct field *)
|
|
|
|
|
TYPE_ALLOC (type, sizeof (struct field) * nfields);
|
|
|
|
|
|
|
|
|
|
/* Copy the saved-up fields into the field vector. */
|
|
|
|
|
|
|
|
|
|
for (n = nfields; list; list = list->next)
|
|
|
|
|
TYPE_FIELD (type, --n) = list->field;
|
|
|
|
|
|
|
|
|
|
return type;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Read a definition of an enumeration type,
|
|
|
|
|
and create and return a suitable type object.
|
|
|
|
|
Also defines the symbols that represent the values of the type. */
|
|
|
|
|
|
|
|
|
|
static struct type *
|
2000-07-30 09:48:28 +08:00
|
|
|
|
coff_read_enum_type (int index, int length, int lastsym)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
2003-09-14 Andrew Cagney <cagney@redhat.com>
* alpha-nat.c: Remove some occurances of "register".
* alpha-tdep.c, arm-tdep.c, blockframe.c, breakpoint.c: Ditto.
* buildsym.c, c-typeprint.c, c-valprint.c, coffread.c: Ditto.
* corefile.c, cp-support.c, cp-valprint.c, cris-tdep.c: Ditto.
* dbxread.c, dcache.c, dwarf2read.c, elfread.c: Ditto.
* environ.c, eval.c, event-top.c, f-typeprint.c: Ditto.
* f-valprint.c, findvar.c, frame.c, gdbtypes.c: Ditto.
* h8300-tdep.c, hppa-tdep.c, hppab-nat.c, hppah-nat.c: Ditto.
* hppam3-nat.c, hpread.c, ia64-aix-nat.c, ia64-linux-nat.c: Ditto.
* infcall.c, infcmd.c, inflow.c, infptrace.c, infrun.c: Ditto.
* infttrace.c, irix5-nat.c, jv-typeprint.c: Ditto.
* jv-valprint.c, m68k-tdep.c, m68klinux-nat.c, main.c: Ditto.
* mdebugread.c, minsyms.c, mips-linux-tdep.c: Ditto.
* mips-nat.c, mips-tdep.c, mipsread.c, mipsv4-nat.c: Ditto.
* ns32k-tdep.c, objfiles.c, p-typeprint.c: Ditto.
* p-valprint.c, ppc-linux-nat.c, printcmd.c: Ditto.
* remote-mips.c, remote-vx.c, rs6000-nat.c: Ditto.
* rs6000-tdep.c, scm-exp.c, sh-tdep.c, sh64-tdep.c: Ditto.
* solib.c, somread.c, source.c, sparc-tdep.c: Ditto.
* stabsread.c, stack.c, standalone.c, symfile.c: Ditto.
* symmisc.c, symtab.c, top.c, tracepoint.c: Ditto.
* typeprint.c, utils.c, valarith.c, valops.c: Ditto.
* values.c, vax-tdep.c, xcoffread.c: Ditto.
2003-09-15 00:32:14 +08:00
|
|
|
|
struct symbol *sym;
|
|
|
|
|
struct type *type;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
int nsyms = 0;
|
|
|
|
|
int done = 0;
|
|
|
|
|
struct pending **symlist;
|
|
|
|
|
struct coff_symbol member_sym;
|
2003-09-14 Andrew Cagney <cagney@redhat.com>
* alpha-nat.c: Remove some occurances of "register".
* alpha-tdep.c, arm-tdep.c, blockframe.c, breakpoint.c: Ditto.
* buildsym.c, c-typeprint.c, c-valprint.c, coffread.c: Ditto.
* corefile.c, cp-support.c, cp-valprint.c, cris-tdep.c: Ditto.
* dbxread.c, dcache.c, dwarf2read.c, elfread.c: Ditto.
* environ.c, eval.c, event-top.c, f-typeprint.c: Ditto.
* f-valprint.c, findvar.c, frame.c, gdbtypes.c: Ditto.
* h8300-tdep.c, hppa-tdep.c, hppab-nat.c, hppah-nat.c: Ditto.
* hppam3-nat.c, hpread.c, ia64-aix-nat.c, ia64-linux-nat.c: Ditto.
* infcall.c, infcmd.c, inflow.c, infptrace.c, infrun.c: Ditto.
* infttrace.c, irix5-nat.c, jv-typeprint.c: Ditto.
* jv-valprint.c, m68k-tdep.c, m68klinux-nat.c, main.c: Ditto.
* mdebugread.c, minsyms.c, mips-linux-tdep.c: Ditto.
* mips-nat.c, mips-tdep.c, mipsread.c, mipsv4-nat.c: Ditto.
* ns32k-tdep.c, objfiles.c, p-typeprint.c: Ditto.
* p-valprint.c, ppc-linux-nat.c, printcmd.c: Ditto.
* remote-mips.c, remote-vx.c, rs6000-nat.c: Ditto.
* rs6000-tdep.c, scm-exp.c, sh-tdep.c, sh64-tdep.c: Ditto.
* solib.c, somread.c, source.c, sparc-tdep.c: Ditto.
* stabsread.c, stack.c, standalone.c, symfile.c: Ditto.
* symmisc.c, symtab.c, top.c, tracepoint.c: Ditto.
* typeprint.c, utils.c, valarith.c, valops.c: Ditto.
* values.c, vax-tdep.c, xcoffread.c: Ditto.
2003-09-15 00:32:14 +08:00
|
|
|
|
struct coff_symbol *ms = &member_sym;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
struct internal_syment sub_sym;
|
|
|
|
|
union internal_auxent sub_aux;
|
|
|
|
|
struct pending *osyms, *syms;
|
|
|
|
|
int o_nsyms;
|
2003-09-14 Andrew Cagney <cagney@redhat.com>
* alpha-nat.c: Remove some occurances of "register".
* alpha-tdep.c, arm-tdep.c, blockframe.c, breakpoint.c: Ditto.
* buildsym.c, c-typeprint.c, c-valprint.c, coffread.c: Ditto.
* corefile.c, cp-support.c, cp-valprint.c, cris-tdep.c: Ditto.
* dbxread.c, dcache.c, dwarf2read.c, elfread.c: Ditto.
* environ.c, eval.c, event-top.c, f-typeprint.c: Ditto.
* f-valprint.c, findvar.c, frame.c, gdbtypes.c: Ditto.
* h8300-tdep.c, hppa-tdep.c, hppab-nat.c, hppah-nat.c: Ditto.
* hppam3-nat.c, hpread.c, ia64-aix-nat.c, ia64-linux-nat.c: Ditto.
* infcall.c, infcmd.c, inflow.c, infptrace.c, infrun.c: Ditto.
* infttrace.c, irix5-nat.c, jv-typeprint.c: Ditto.
* jv-valprint.c, m68k-tdep.c, m68klinux-nat.c, main.c: Ditto.
* mdebugread.c, minsyms.c, mips-linux-tdep.c: Ditto.
* mips-nat.c, mips-tdep.c, mipsread.c, mipsv4-nat.c: Ditto.
* ns32k-tdep.c, objfiles.c, p-typeprint.c: Ditto.
* p-valprint.c, ppc-linux-nat.c, printcmd.c: Ditto.
* remote-mips.c, remote-vx.c, rs6000-nat.c: Ditto.
* rs6000-tdep.c, scm-exp.c, sh-tdep.c, sh64-tdep.c: Ditto.
* solib.c, somread.c, source.c, sparc-tdep.c: Ditto.
* stabsread.c, stack.c, standalone.c, symfile.c: Ditto.
* symmisc.c, symtab.c, top.c, tracepoint.c: Ditto.
* typeprint.c, utils.c, valarith.c, valops.c: Ditto.
* values.c, vax-tdep.c, xcoffread.c: Ditto.
2003-09-15 00:32:14 +08:00
|
|
|
|
int n;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
char *name;
|
|
|
|
|
int unsigned_enum = 1;
|
|
|
|
|
|
|
|
|
|
type = coff_alloc_type (index);
|
|
|
|
|
if (within_function)
|
|
|
|
|
symlist = &local_symbols;
|
|
|
|
|
else
|
|
|
|
|
symlist = &file_symbols;
|
|
|
|
|
osyms = *symlist;
|
|
|
|
|
o_nsyms = osyms ? osyms->nsyms : 0;
|
|
|
|
|
|
|
|
|
|
while (!done && symnum < lastsym && symnum < nlist_nsyms_global)
|
|
|
|
|
{
|
|
|
|
|
read_one_sym (ms, &sub_sym, &sub_aux);
|
|
|
|
|
name = ms->c_name;
|
|
|
|
|
name = EXTERNAL_NAME (name, current_objfile->obfd);
|
|
|
|
|
|
|
|
|
|
switch (ms->c_sclass)
|
|
|
|
|
{
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case C_MOE:
|
|
|
|
|
sym = (struct symbol *) obstack_alloc
|
2004-02-07 Elena Zannoni <ezannoni@redhat.com>
* buildsym.c (free_pending_blocks, finish_block)
(record_pending_block, make_blockvector, end_symtab): Replace
symbol_obstack with objfile_obstack.
* coffread.c (process_coff_symbol, coff_read_struct_type)
(coff_read_enum_type): Ditto.
* cp-namespace.c (initialize_namespace_symtab)
(check_one_possible_namespace_symbol): Ditto.
* dwarf2read.c (new_symbol, dwarf2_const_value, macro_start_file)
(dwarf2_symbol_mark_computed): Ditto.
* dwarfread.c (enum_type, new_symbol, synthesize_typedef): Ditto.
* elfread.c (elf_symtab_read): Ditto.
* hpread.c (hpread_symfile_init, hpread_symfile_init)
(hpread_read_enum_type, hpread_read_function_type)
(hpread_read_doc_function_type, hpread_process_one_debug_symbol):
Ditto.
* jv-lang.c (get_java_class_symtab, add_class_symbol)
(java_link_class_type): Ditto.
* mdebugread.c (parse_symbol, psymtab_to_symtab_1, new_symtab)
(new_symbol): Ditto.
* minsyms.c (install_minimal_symbols): Ditto.
* objfiles.c (allocate_objfile): Remove init of symbol_obstack.
(terminate_minimal_symbol_table): Replace symbol_obstack with
objfile_obstack.
(free_objfile): Remove freeing of symbol_obstack.
* objfiles.h: Remove symbol_obstack field.
* pa64solib.c (add_to_solist): Replace symbol_obstack with
objfile_obstack.
* solib-sunos.c (allocate_rt_common_objfile): Remove init of
symbol_obstack.
(solib_add_common_symbols): Replace symbol_obstack with
objfile_obstack.
* somsolib.c (som_solib_add): Ditto.
* stabsread.c (patch_block_stabs, define_symbol, read_enum_type)
(common_block_start, common_block_end): Ditto.
* symfile.c (reread_symbols): Remove freeing and init of
symbol_obstack.
(allocate_symtab): Rename symbol_obstack to objfile_obstack.
* symfile.h: Update comment.
* symmisc.c (print_objfile_statistics): Remove symbol_obstack
stats printing.
* symtab.c (symbol_set_names): Replace symbol_obstack with
objfile_obstack.
* symtab.h (struct general_symbol_info, struct minimal_symbol):
Update comments.
* xcoffread.c (read_xcoff_symtab, SYMBOL_DUP, SYMNAME_ALLOC)
(init_stringtab, xcoff_initial_scan): Replace symbol_obstack with
objfile_obstack.
2004-02-08 07:13:47 +08:00
|
|
|
|
(¤t_objfile->objfile_obstack,
|
1999-07-08 04:19:36 +08:00
|
|
|
|
sizeof (struct symbol));
|
|
|
|
|
memset (sym, 0, sizeof (struct symbol));
|
|
|
|
|
|
2003-02-25 David Carlton <carlton@math.stanford.edu>
* symtab.h (SYMBOL_NATURAL_NAME): New macro.
(SYMBOL_LINKAGE_NAME): Ditto.
(SYMBOL_PRINT_NAME): Use SYMBOL_NATURAL_NAME and
SYMBOL_LINKAGE_NAME.
(struct general_symbol_info): Expand comment.
(DEPRECATED_SYMBOL_NAME): Rename from SYMBOL_NAME.
(SYMBOL_MATCHES_NAME): Use DEPRECATED_SYMBOL_NAME.
(SYMBOL_MATCHES_REGEXP): Ditto.
* symtab.c (symbol_natural_name): New function.
* objfiles.h: Replace all uses of SYMBOL_NAME by
DEPRECATED_SYMBOL_NAME.
* xcoffread.c, valops.c, typeprint.c, tracepoint.c: Ditto.
* symtab.c, symmisc.c, symfile.c, stack.c, stabsread.c: Ditto.
* somsolib.c, sol-thread.c, rs6000-tdep.c, p-valprint.c: Ditto.
* printcmd.c, objfiles.c, objc-lang.c, mipsread.c: Ditto.
* minsyms.c, mdebugread.c, linespec.c, jv-lang.c: Ditto.
* i386-tdep.c, i386-linux-tdep.c, hpread.c, hppa-tdep.c: Ditto.
* gnu-v2-abi.c, f-valprint.c, findvar.c, expprint.c: Ditto.
* dwarfread.c, dwarf2read.c, dbxread.c, c-valprint.c: Ditto.
* cp-valprint.c, coffread.c, buildsym.c, breakpoint.c: Ditto.
* blockframe.c, ax-gdb.c, arm-linux-tdep.c, ada-lang.c: Ditto.
* ada-exp.y: Ditto.
* ada-exp.y: Update copyright.
* sol-thread.c, mipsread.c, jv-lang.c, f-valprint.c: Ditto.
* cp-valprint.c: Ditto.
2003-02-25 David Carlton <carlton@math.stanford.edu>
* generic/gdbtk.h: Replace all instances of SYMBOL_NAME by
DEPRECATED_SYMBOL_NAME.
* generic/gdbtk-stack.c, generic/gdbtk-cmds.c: Ditto.
* generic/gdbtk-stack.c, generic/gdbtk-cmds.c: Update copyright.
2003-02-25 David Carlton <carlton@math.stanford.edu>
* mi-cmd-stack.c: Replace all instances of SYMBOL_NAME with
DEPRECATED_SYMBOL_NAME. Update copyright.
2003-02-26 05:36:23 +08:00
|
|
|
|
DEPRECATED_SYMBOL_NAME (sym) =
|
1999-07-08 04:19:36 +08:00
|
|
|
|
obsavestring (name, strlen (name),
|
2004-02-07 Elena Zannoni <ezannoni@redhat.com>
* buildsym.c (free_pending_blocks, finish_block)
(record_pending_block, make_blockvector, end_symtab): Replace
symbol_obstack with objfile_obstack.
* coffread.c (process_coff_symbol, coff_read_struct_type)
(coff_read_enum_type): Ditto.
* cp-namespace.c (initialize_namespace_symtab)
(check_one_possible_namespace_symbol): Ditto.
* dwarf2read.c (new_symbol, dwarf2_const_value, macro_start_file)
(dwarf2_symbol_mark_computed): Ditto.
* dwarfread.c (enum_type, new_symbol, synthesize_typedef): Ditto.
* elfread.c (elf_symtab_read): Ditto.
* hpread.c (hpread_symfile_init, hpread_symfile_init)
(hpread_read_enum_type, hpread_read_function_type)
(hpread_read_doc_function_type, hpread_process_one_debug_symbol):
Ditto.
* jv-lang.c (get_java_class_symtab, add_class_symbol)
(java_link_class_type): Ditto.
* mdebugread.c (parse_symbol, psymtab_to_symtab_1, new_symtab)
(new_symbol): Ditto.
* minsyms.c (install_minimal_symbols): Ditto.
* objfiles.c (allocate_objfile): Remove init of symbol_obstack.
(terminate_minimal_symbol_table): Replace symbol_obstack with
objfile_obstack.
(free_objfile): Remove freeing of symbol_obstack.
* objfiles.h: Remove symbol_obstack field.
* pa64solib.c (add_to_solist): Replace symbol_obstack with
objfile_obstack.
* solib-sunos.c (allocate_rt_common_objfile): Remove init of
symbol_obstack.
(solib_add_common_symbols): Replace symbol_obstack with
objfile_obstack.
* somsolib.c (som_solib_add): Ditto.
* stabsread.c (patch_block_stabs, define_symbol, read_enum_type)
(common_block_start, common_block_end): Ditto.
* symfile.c (reread_symbols): Remove freeing and init of
symbol_obstack.
(allocate_symtab): Rename symbol_obstack to objfile_obstack.
* symfile.h: Update comment.
* symmisc.c (print_objfile_statistics): Remove symbol_obstack
stats printing.
* symtab.c (symbol_set_names): Replace symbol_obstack with
objfile_obstack.
* symtab.h (struct general_symbol_info, struct minimal_symbol):
Update comments.
* xcoffread.c (read_xcoff_symtab, SYMBOL_DUP, SYMNAME_ALLOC)
(init_stringtab, xcoff_initial_scan): Replace symbol_obstack with
objfile_obstack.
2004-02-08 07:13:47 +08:00
|
|
|
|
¤t_objfile->objfile_obstack);
|
1999-07-08 04:19:36 +08:00
|
|
|
|
SYMBOL_CLASS (sym) = LOC_CONST;
|
2003-05-14 Elena Zannoni <ezannoni@redhat.com>
* symtab.h (enum domain_enum): Rename from namespace_enum.
(UNDEF_DOMAIN, VAR_DOMAIN, STRUCT_DOMAIN, LABEL_DOMAIN,
VARIABLES_DOMAIN, FUNCTIONS_DOMAIN, TYPES_DOMAIN, METHODS_DOMAIN):
Rename from UNDEF_NAMESPACE, VAR_NAMESPACE, STRUCT_NAMESPACE,
LABEL_NAMESPACE, VARIABLES_NAMESPACE, FUNCTIONS_NAMESPACE,
TYPES_NAMESPACE, METHODS_NAMESPACE.
(SYMBOL_NAMESPACE): Rename to SYMBOL_DOMAIN.
(struct symbol, struct partial_symbol): Rename field
'namespace_enum namespace' to 'domain_enum domain'.
(PSYMBOL_NAMESPACE): Rename to PSYMBOL_DOMAIN.
Delete old define kludge for namespace.
* ada-exp.y, ada-lang.c, ada-lang.h, alpha-tdep.c, arm-tdep.c,
blockframe.c, c-exp.y, c-valprint.c, coffread.c, dbxread.c,
dwarf2read.c, dwarfread.c, f-exp.y, gdbtypes.c, gdbtypes.h,
gnu-v3-abi.c, hppa-tdep.c, hpread.c, jv-exp.y, jv-lang.c,
language.c, linespec.c, m2-exp.y, m3-nat.c, mdebugread.c,
mips-tdep.c, nlmread.c, objc-exp.y, objc-lang.c, objfiles.c,
p-exp.y, p-valprint.c, parse.c, printcmd.c, scm-lang.c, source.c,
stabsread.c, stack.c, symfile.c, symfile.h, symmisc.c, symtab.c,
valops.c, values.c, xcoffread.c, xstormy16-tdep.c: Replace all
occurrences of the above.
2003-05-12 Elena Zannoni <ezannoni@redhat.com>
* mi-mi-cmd-stack.c (list_args_or_locals): Rename VAR_NAMESPACE to
VAR_DOMAIN.
2003-05-15 01:43:20 +08:00
|
|
|
|
SYMBOL_DOMAIN (sym) = VAR_DOMAIN;
|
1999-07-08 04:19:36 +08:00
|
|
|
|
SYMBOL_VALUE (sym) = ms->c_value;
|
|
|
|
|
add_symbol_to_list (sym, symlist);
|
|
|
|
|
nsyms++;
|
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
|
1999-07-08 04:19:36 +08:00
|
|
|
|
case C_EOS:
|
|
|
|
|
/* Sometimes the linker (on 386/ix 2.0.2 at least) screws
|
|
|
|
|
up the count of how many symbols to read. So stop
|
|
|
|
|
on .eos. */
|
|
|
|
|
done = 1;
|
|
|
|
|
break;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Now fill in the fields of the type-structure. */
|
|
|
|
|
|
|
|
|
|
if (length > 0)
|
|
|
|
|
TYPE_LENGTH (type) = length;
|
|
|
|
|
else
|
1999-07-08 04:19:36 +08:00
|
|
|
|
TYPE_LENGTH (type) = TARGET_INT_BIT / TARGET_CHAR_BIT; /* Assume ints */
|
1999-04-16 09:35:26 +08:00
|
|
|
|
TYPE_CODE (type) = TYPE_CODE_ENUM;
|
|
|
|
|
TYPE_NFIELDS (type) = nsyms;
|
|
|
|
|
TYPE_FIELDS (type) = (struct field *)
|
|
|
|
|
TYPE_ALLOC (type, sizeof (struct field) * nsyms);
|
|
|
|
|
|
|
|
|
|
/* Find the symbols for the values and put them into the type.
|
|
|
|
|
The symbols can be found in the symlist that we put them on
|
|
|
|
|
to cause them to be defined. osyms contains the old value
|
|
|
|
|
of that symlist; everything up to there was defined by us. */
|
|
|
|
|
/* Note that we preserve the order of the enum constants, so
|
|
|
|
|
that in something like "enum {FOO, LAST_THING=FOO}" we print
|
|
|
|
|
FOO, not LAST_THING. */
|
|
|
|
|
|
|
|
|
|
for (syms = *symlist, n = 0; syms; syms = syms->next)
|
|
|
|
|
{
|
|
|
|
|
int j = 0;
|
|
|
|
|
|
|
|
|
|
if (syms == osyms)
|
|
|
|
|
j = o_nsyms;
|
1999-07-08 04:19:36 +08:00
|
|
|
|
for (; j < syms->nsyms; j++, n++)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
struct symbol *xsym = syms->symbol[j];
|
|
|
|
|
SYMBOL_TYPE (xsym) = type;
|
2003-02-25 David Carlton <carlton@math.stanford.edu>
* symtab.h (SYMBOL_NATURAL_NAME): New macro.
(SYMBOL_LINKAGE_NAME): Ditto.
(SYMBOL_PRINT_NAME): Use SYMBOL_NATURAL_NAME and
SYMBOL_LINKAGE_NAME.
(struct general_symbol_info): Expand comment.
(DEPRECATED_SYMBOL_NAME): Rename from SYMBOL_NAME.
(SYMBOL_MATCHES_NAME): Use DEPRECATED_SYMBOL_NAME.
(SYMBOL_MATCHES_REGEXP): Ditto.
* symtab.c (symbol_natural_name): New function.
* objfiles.h: Replace all uses of SYMBOL_NAME by
DEPRECATED_SYMBOL_NAME.
* xcoffread.c, valops.c, typeprint.c, tracepoint.c: Ditto.
* symtab.c, symmisc.c, symfile.c, stack.c, stabsread.c: Ditto.
* somsolib.c, sol-thread.c, rs6000-tdep.c, p-valprint.c: Ditto.
* printcmd.c, objfiles.c, objc-lang.c, mipsread.c: Ditto.
* minsyms.c, mdebugread.c, linespec.c, jv-lang.c: Ditto.
* i386-tdep.c, i386-linux-tdep.c, hpread.c, hppa-tdep.c: Ditto.
* gnu-v2-abi.c, f-valprint.c, findvar.c, expprint.c: Ditto.
* dwarfread.c, dwarf2read.c, dbxread.c, c-valprint.c: Ditto.
* cp-valprint.c, coffread.c, buildsym.c, breakpoint.c: Ditto.
* blockframe.c, ax-gdb.c, arm-linux-tdep.c, ada-lang.c: Ditto.
* ada-exp.y: Ditto.
* ada-exp.y: Update copyright.
* sol-thread.c, mipsread.c, jv-lang.c, f-valprint.c: Ditto.
* cp-valprint.c: Ditto.
2003-02-25 David Carlton <carlton@math.stanford.edu>
* generic/gdbtk.h: Replace all instances of SYMBOL_NAME by
DEPRECATED_SYMBOL_NAME.
* generic/gdbtk-stack.c, generic/gdbtk-cmds.c: Ditto.
* generic/gdbtk-stack.c, generic/gdbtk-cmds.c: Update copyright.
2003-02-25 David Carlton <carlton@math.stanford.edu>
* mi-cmd-stack.c: Replace all instances of SYMBOL_NAME with
DEPRECATED_SYMBOL_NAME. Update copyright.
2003-02-26 05:36:23 +08:00
|
|
|
|
TYPE_FIELD_NAME (type, n) = DEPRECATED_SYMBOL_NAME (xsym);
|
1999-04-16 09:35:26 +08:00
|
|
|
|
TYPE_FIELD_BITPOS (type, n) = SYMBOL_VALUE (xsym);
|
|
|
|
|
if (SYMBOL_VALUE (xsym) < 0)
|
|
|
|
|
unsigned_enum = 0;
|
|
|
|
|
TYPE_FIELD_BITSIZE (type, n) = 0;
|
2002-11-11 08:55:34 +08:00
|
|
|
|
TYPE_FIELD_STATIC_KIND (type, n) = 0;
|
1999-04-16 09:35:26 +08:00
|
|
|
|
}
|
|
|
|
|
if (syms == osyms)
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (unsigned_enum)
|
|
|
|
|
TYPE_FLAGS (type) |= TYPE_FLAG_UNSIGNED;
|
|
|
|
|
|
|
|
|
|
return type;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Register our ability to parse symbols for coff BFD files. */
|
|
|
|
|
|
|
|
|
|
static struct sym_fns coff_sym_fns =
|
|
|
|
|
{
|
|
|
|
|
bfd_target_coff_flavour,
|
1999-07-08 04:19:36 +08:00
|
|
|
|
coff_new_init, /* sym_new_init: init anything gbl to entire symtab */
|
|
|
|
|
coff_symfile_init, /* sym_init: read initial info, setup for sym_read() */
|
|
|
|
|
coff_symfile_read, /* sym_read: read a symbol file into symtab */
|
|
|
|
|
coff_symfile_finish, /* sym_finish: finished with file, cleanup */
|
1999-08-10 05:36:23 +08:00
|
|
|
|
default_symfile_offsets, /* sym_offsets: xlate external to internal form */
|
1999-07-08 04:19:36 +08:00
|
|
|
|
NULL /* next: pointer to next struct sym_fns */
|
1999-04-16 09:35:26 +08:00
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
void
|
2000-07-30 09:48:28 +08:00
|
|
|
|
_initialize_coffread (void)
|
1999-04-16 09:35:26 +08:00
|
|
|
|
{
|
|
|
|
|
add_symtab_fns (&coff_sym_fns);
|
|
|
|
|
}
|