aboutsummaryrefslogtreecommitdiff
path: root/gdb
diff options
context:
space:
mode:
Diffstat (limited to 'gdb')
-rw-r--r--gdb/ChangeLog7
-rw-r--r--gdb/dwarf2read.c54
-rw-r--r--gdb/gdbtypes.c2
-rw-r--r--gdb/psymtab.c18
-rw-r--r--gdb/symfile.h27
-rw-r--r--gdb/symtab.c167
-rw-r--r--gdb/symtab.h4
7 files changed, 59 insertions, 220 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index da61ab7..aa8b2b0 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,10 @@
+2010-09-08 Tom Tromey <tromey@redhat.com>
+
+ Revert:
+ 2010-09-01 Tom Tromey <tromey@redhat.com>
+ * dwarf2read.c, gdbtypes.c, psymtab.c, symfile.h, symtab.c,
+ symtab.h: Revert earlier change.
+
2010-09-09 Sami Wagiaalla <swagiaal@redhat.com>
* psymtab.c (add_psymbol_to_bcache): Initialize
diff --git a/gdb/dwarf2read.c b/gdb/dwarf2read.c
index 5b58a5b..3720891 100644
--- a/gdb/dwarf2read.c
+++ b/gdb/dwarf2read.c
@@ -2198,7 +2198,7 @@ static struct symtab *
dw2_lookup_symbol (struct objfile *objfile, int block_index,
const char *name, domain_enum domain)
{
- /* We do all the work in the expand_one_symtab_matching hook
+ /* We do all the work in the pre_expand_symtabs_matching hook
instead. */
return NULL;
}
@@ -2229,46 +2229,12 @@ dw2_do_expand_symtabs_matching (struct objfile *objfile, const char *name)
}
}
-static struct symbol *
-dw2_expand_one_symtab_matching (struct objfile *objfile,
- int kind, const char *name,
- domain_enum domain,
- struct symbol *(*matcher) (struct symtab *,
- int,
- const char *,
- domain_enum,
- void *),
- void *data)
+static void
+dw2_pre_expand_symtabs_matching (struct objfile *objfile,
+ int kind, const char *name,
+ domain_enum domain)
{
- dw2_setup (objfile);
-
- if (dwarf2_per_objfile->index_table)
- {
- offset_type *vec;
-
- if (find_slot_in_mapped_hash (dwarf2_per_objfile->index_table,
- name, &vec))
- {
- offset_type i, len = MAYBE_SWAP (*vec);
- for (i = 0; i < len; ++i)
- {
- offset_type cu_index = MAYBE_SWAP (vec[i + 1]);
- struct dwarf2_per_cu_data *cu = dw2_get_cu (cu_index);
- struct symtab *symtab;
- struct symbol *sym;
-
- if (cu->v.quick->symtab)
- continue;
-
- symtab = dw2_instantiate_symtab (objfile, cu);
- sym = matcher (symtab, kind, name, domain, data);
- if (sym)
- return sym;
- }
- }
- }
-
- return NULL;
+ dw2_do_expand_symtabs_matching (objfile, name);
}
static void
@@ -2572,7 +2538,7 @@ const struct quick_symbol_functions dwarf2_gdb_index_functions =
dw2_forget_cached_source_info,
dw2_lookup_symtab,
dw2_lookup_symbol,
- dw2_expand_one_symtab_matching,
+ dw2_pre_expand_symtabs_matching,
dw2_print_stats,
dw2_dump,
dw2_relocate,
@@ -6305,9 +6271,9 @@ dwarf2_attach_fields_to_type (struct field_info *fip, struct type *type,
(B_TYPE *) TYPE_ALLOC (type, B_BYTES (nfields));
B_CLRALL (TYPE_FIELD_PROTECTED_BITS (type), nfields);
- /* We don't set TYPE_FIELD_IGNORE_BITS here. The DWARF reader
- never sets any bits in that array, so leaving it NULL lets us
- save a little memory. */
+ TYPE_FIELD_IGNORE_BITS (type) =
+ (B_TYPE *) TYPE_ALLOC (type, B_BYTES (nfields));
+ B_CLRALL (TYPE_FIELD_IGNORE_BITS (type), nfields);
}
/* If the type has baseclasses, allocate and clear a bit vector for
diff --git a/gdb/gdbtypes.c b/gdb/gdbtypes.c
index 38eb031..c35adbb 100644
--- a/gdb/gdbtypes.c
+++ b/gdb/gdbtypes.c
@@ -1051,7 +1051,7 @@ lookup_typename (const struct language_defn *language,
struct symbol *sym;
struct type *tmp;
- sym = lookup_type_symbol (name, block, VAR_DOMAIN, language->la_language);
+ sym = lookup_symbol (name, block, VAR_DOMAIN, 0);
if (sym == NULL || SYMBOL_CLASS (sym) != LOC_TYPEDEF)
{
tmp = language_lookup_primitive_type_by_name (language, gdbarch, name);
diff --git a/gdb/psymtab.c b/gdb/psymtab.c
index f805d6f..2f1bfc6 100644
--- a/gdb/psymtab.c
+++ b/gdb/psymtab.c
@@ -426,18 +426,12 @@ lookup_symbol_aux_psymtabs (struct objfile *objfile,
return NULL;
}
-static struct symbol *
-expand_one_symtab_matching_psymtabs (struct objfile *objfile,
- int kind, const char *name,
- domain_enum domain,
- struct symbol *(*matcher) (struct symtab *,
- int,
- const char *,
- domain_enum,
- void *),
- void *data)
+static void
+pre_expand_symtabs_matching_psymtabs (struct objfile *objfile,
+ int kind, const char *name,
+ domain_enum domain)
{
- return NULL;
+ /* Nothing. */
}
/* Look, in partial_symtab PST, for symbol whose natural name is NAME.
@@ -1218,7 +1212,7 @@ const struct quick_symbol_functions psym_functions =
forget_cached_source_info_partial,
lookup_symtab_via_partial_symtab,
lookup_symbol_aux_psymtabs,
- expand_one_symtab_matching_psymtabs,
+ pre_expand_symtabs_matching_psymtabs,
print_psymtab_stats_for_objfile,
dump_psymtabs_for_objfile,
relocate_psymtabs,
diff --git a/gdb/symfile.h b/gdb/symfile.h
index 84b770d..5815354 100644
--- a/gdb/symfile.h
+++ b/gdb/symfile.h
@@ -171,25 +171,14 @@ struct quick_symbol_functions
int kind, const char *name,
domain_enum domain);
- /* Expand each symbol table in OBJFILE that may have items matching
- KIND, NAME, and DOMAIN -- these arguments are as for
- `lookup_symbol'. For each such symbol table, call MATCHER with
- the symbol table and DATA arguments. If MATCHER returns NULL,
- keep going. Otherwise, return the result of MATCHER. If MATCHER
- never returns non-NULL, return NULL. A backend can choose to
- implement this and then have its `lookup_symbol' hook always
- return NULL, or the reverse. (It doesn't make sense to implement
- both.) */
- struct symbol *(*expand_one_symtab_matching)
- (struct objfile *objfile,
- int kind, const char *name,
- domain_enum domain,
- struct symbol *(*matcher) (struct symtab *symtab,
- int kind,
- const char *name,
- domain_enum domain,
- void *data),
- void *data);
+ /* This is called to expand symbol tables before looking up a
+ symbol. A backend can choose to implement this and then have its
+ `lookup_symbol' hook always return NULL, or the reverse. (It
+ doesn't make sense to implement both.) The arguments are as for
+ `lookup_symbol'. */
+ void (*pre_expand_symtabs_matching) (struct objfile *objfile,
+ int kind, const char *name,
+ domain_enum domain);
/* Print statistics about any indices loaded for OBJFILE. The
statistics should be printed to gdb_stdout. This is used for
diff --git a/gdb/symtab.c b/gdb/symtab.c
index e645567..baf6d94 100644
--- a/gdb/symtab.c
+++ b/gdb/symtab.c
@@ -91,8 +91,7 @@ static struct symbol *lookup_symbol_aux (const char *name,
const struct block *block,
const domain_enum domain,
enum language language,
- int *is_a_field_of_this,
- int for_type);
+ int *is_a_field_of_this);
static
struct symbol *lookup_symbol_aux_local (const char *name,
@@ -995,8 +994,6 @@ fixup_symbol_section (struct symbol *sym, struct objfile *objfile)
C++: if IS_A_FIELD_OF_THIS is nonzero on entry, check to see if
NAME is a field of the current implied argument `this'. If so set
*IS_A_FIELD_OF_THIS to 1, otherwise set it to zero.
- FOR_TYPE is non-zero if searching specifically for a type; zero
- otherwise.
BLOCK_FOUND is set to the block in which NAME is found (in the case of
a field of `this', value_of_this sets BLOCK_FOUND to the proper value.) */
@@ -1010,10 +1007,10 @@ fixup_symbol_section (struct symbol *sym, struct objfile *objfile)
variable and thus can probably assume it will never hit the C++
code). */
-static struct symbol *
-lookup_symbol_in_language_full (const char *name, const struct block *block,
- const domain_enum domain, enum language lang,
- int *is_a_field_of_this, int for_type)
+struct symbol *
+lookup_symbol_in_language (const char *name, const struct block *block,
+ const domain_enum domain, enum language lang,
+ int *is_a_field_of_this)
{
char *demangled_name = NULL;
const char *modified_name = NULL;
@@ -1078,41 +1075,12 @@ lookup_symbol_in_language_full (const char *name, const struct block *block,
}
returnval = lookup_symbol_aux (modified_name, block, domain, lang,
- is_a_field_of_this, for_type);
+ is_a_field_of_this);
do_cleanups (cleanup);
return returnval;
}
-/* Find the definition for a specified symbol name NAME
- in domain DOMAIN, visible from lexical block BLOCK.
- Returns the struct symbol pointer, or zero if no symbol is found.
- C++: if IS_A_FIELD_OF_THIS is nonzero on entry, check to see if
- NAME is a field of the current implied argument `this'. If so set
- *IS_A_FIELD_OF_THIS to 1, otherwise set it to zero.
- BLOCK_FOUND is set to the block in which NAME is found (in the case of
- a field of `this', value_of_this sets BLOCK_FOUND to the proper value.) */
-
-struct symbol *
-lookup_symbol_in_language (const char *name, const struct block *block,
- const domain_enum domain, enum language lang,
- int *is_a_field_of_this)
-{
- return lookup_symbol_in_language_full (name, block, domain, lang,
- is_a_field_of_this, 0);
-}
-
-/* Like lookup_symbol_in_language, but search specifically for a
- type. */
-
-struct symbol *
-lookup_type_symbol (const char *name, const struct block *block,
- const domain_enum domain, enum language lang)
-{
- return lookup_symbol_in_language_full (name, block, domain, lang,
- NULL, 1);
-}
-
/* Behave like lookup_symbol_in_language, but performed with the
current language. */
@@ -1133,8 +1101,7 @@ lookup_symbol (const char *name, const struct block *block,
static struct symbol *
lookup_symbol_aux (const char *name, const struct block *block,
const domain_enum domain, enum language language,
- int *is_a_field_of_this,
- int for_type)
+ int *is_a_field_of_this)
{
struct symbol *sym;
const struct language_defn *langdef;
@@ -1198,20 +1165,14 @@ lookup_symbol_aux (const char *name, const struct block *block,
}
/* Now do whatever is appropriate for LANGUAGE to look
- up static and global variables. If we are searching for a type,
- we bypass this lookup, because types aren't global. */
+ up static and global variables. */
- if (!for_type)
- {
- sym = langdef->la_lookup_symbol_nonlocal (name, block, domain);
- if (sym != NULL)
- return sym;
- }
+ sym = langdef->la_lookup_symbol_nonlocal (name, block, domain);
+ if (sym != NULL)
+ return sym;
- /* Now search all static file-level symbols. When searching for a
- type, this is what we generally want, because types are put into
- the file scope. For other objects, not strictly correct, but
- more useful than an error. */
+ /* Now search all static file-level symbols. Not strictly correct,
+ but more useful than an error. */
return lookup_static_symbol_aux (name, domain);
}
@@ -1366,35 +1327,6 @@ lookup_global_symbol_from_objfile (const struct objfile *main_objfile,
return NULL;
}
-/* A helper for lookup_symbol_aux_symtabs that is passed as a callback
- to the expand_one_symtab_matching quick function. */
-
-static struct symbol *
-match_symbol_aux (struct symtab *symtab,
- int kind, const char *name, domain_enum domain,
- void *arg)
-{
- struct objfile *objfile = arg;
-
- if (symtab->primary)
- {
- struct symbol *sym;
- struct blockvector *bv;
- const struct block *block;
-
- bv = BLOCKVECTOR (symtab);
- block = BLOCKVECTOR_BLOCK (bv, kind);
- sym = lookup_block_symbol (block, name, domain);
- if (sym)
- {
- block_found = block;
- return fixup_symbol_section (sym, objfile);
- }
- }
-
- return NULL;
-}
-
/* Check to see if the symbol is defined in one of the symtabs.
BLOCK_INDEX should be either GLOBAL_BLOCK or STATIC_BLOCK,
depending on whether or not we want to search global symbols or
@@ -1412,6 +1344,11 @@ lookup_symbol_aux_symtabs (int block_index, const char *name,
ALL_OBJFILES (objfile)
{
+ if (objfile->sf)
+ objfile->sf->qf->pre_expand_symtabs_matching (objfile,
+ block_index,
+ name, domain);
+
ALL_OBJFILE_SYMTABS (objfile, s)
if (s->primary)
{
@@ -1424,17 +1361,6 @@ lookup_symbol_aux_symtabs (int block_index, const char *name,
return fixup_symbol_section (sym, objfile);
}
}
-
- if (objfile->sf)
- {
- sym = objfile->sf->qf->expand_one_symtab_matching (objfile,
- block_index,
- name, domain,
- match_symbol_aux,
- objfile);
- if (sym)
- return sym;
- }
}
return NULL;
@@ -1656,30 +1582,6 @@ basic_lookup_transparent_type_quick (struct objfile *objfile, int kind,
return NULL;
}
-/* A helper function for basic_lookup_transparent_type that is passed
- to the expand_one_symtab_matching quick function. */
-
-static struct symbol *
-match_transparent_type (struct symtab *symtab,
- int kind, const char *name, domain_enum domain,
- void *data)
-{
- if (symtab->primary)
- {
- struct blockvector *bv;
- struct block *block;
- struct symbol *sym;
-
- bv = BLOCKVECTOR (symtab);
- block = BLOCKVECTOR_BLOCK (bv, GLOBAL_BLOCK);
- sym = lookup_block_symbol (block, name, STRUCT_DOMAIN);
- if (sym && !TYPE_IS_OPAQUE (SYMBOL_TYPE (sym)))
- return sym;
- }
-
- return NULL;
-}
-
/* The standard implementation of lookup_transparent_type. This code
was modeled on lookup_symbol -- the parts not relevant to looking
up types were just left out. In particular it's assumed here that
@@ -1703,6 +1605,11 @@ basic_lookup_transparent_type (const char *name)
ALL_OBJFILES (objfile)
{
+ if (objfile->sf)
+ objfile->sf->qf->pre_expand_symtabs_matching (objfile,
+ GLOBAL_BLOCK,
+ name, STRUCT_DOMAIN);
+
ALL_OBJFILE_SYMTABS (objfile, s)
if (s->primary)
{
@@ -1714,18 +1621,6 @@ basic_lookup_transparent_type (const char *name)
return SYMBOL_TYPE (sym);
}
}
-
- if (objfile->sf)
- {
- sym
- = objfile->sf->qf->expand_one_symtab_matching (objfile,
- GLOBAL_BLOCK, name,
- STRUCT_DOMAIN,
- match_transparent_type,
- NULL);
- if (sym)
- return SYMBOL_TYPE (sym);
- }
}
ALL_OBJFILES (objfile)
@@ -1745,6 +1640,10 @@ basic_lookup_transparent_type (const char *name)
ALL_OBJFILES (objfile)
{
+ if (objfile->sf)
+ objfile->sf->qf->pre_expand_symtabs_matching (objfile, STATIC_BLOCK,
+ name, STRUCT_DOMAIN);
+
ALL_OBJFILE_SYMTABS (objfile, s)
{
bv = BLOCKVECTOR (s);
@@ -1755,18 +1654,6 @@ basic_lookup_transparent_type (const char *name)
return SYMBOL_TYPE (sym);
}
}
-
- if (objfile->sf)
- {
- sym
- = objfile->sf->qf->expand_one_symtab_matching (objfile,
- STATIC_BLOCK, name,
- STRUCT_DOMAIN,
- match_transparent_type,
- NULL);
- if (sym)
- return SYMBOL_TYPE (sym);
- }
}
ALL_OBJFILES (objfile)
diff --git a/gdb/symtab.h b/gdb/symtab.h
index f96c3f4..04cb443 100644
--- a/gdb/symtab.h
+++ b/gdb/symtab.h
@@ -977,10 +977,6 @@ extern int find_pc_line_pc_range (CORE_ADDR, CORE_ADDR *, CORE_ADDR *);
extern void reread_symbols (void);
-extern struct symbol *lookup_type_symbol (const char* name,
- const struct block *block,
- const domain_enum domain,
- enum language lang);
extern struct type *lookup_transparent_type (const char *);
extern struct type *basic_lookup_transparent_type (const char *);