Introduce lookup_name_info and generalize Ada's FULL/WILD name matching
[external/binutils.git] / gdb / objfiles.h
1 /* Definitions for symbol file management in GDB.
2
3    Copyright (C) 1992-2017 Free Software Foundation, Inc.
4
5    This file is part of GDB.
6
7    This program is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 3 of the License, or
10    (at your option) any later version.
11
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16
17    You should have received a copy of the GNU General Public License
18    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
19
20 #if !defined (OBJFILES_H)
21 #define OBJFILES_H
22
23 #include "hashtab.h"
24 #include "gdb_obstack.h"        /* For obstack internals.  */
25 #include "objfile-flags.h"
26 #include "symfile.h"
27 #include "progspace.h"
28 #include "registry.h"
29 #include "gdb_bfd.h"
30 #include <vector>
31
32 struct bcache;
33 struct htab;
34 struct objfile_data;
35 struct partial_symbol;
36
37 /* This structure maintains information on a per-objfile basis about the
38    "entry point" of the objfile, and the scope within which the entry point
39    exists.  It is possible that gdb will see more than one objfile that is
40    executable, each with its own entry point.
41
42    For example, for dynamically linked executables in SVR4, the dynamic linker
43    code is contained within the shared C library, which is actually executable
44    and is run by the kernel first when an exec is done of a user executable
45    that is dynamically linked.  The dynamic linker within the shared C library
46    then maps in the various program segments in the user executable and jumps
47    to the user executable's recorded entry point, as if the call had been made
48    directly by the kernel.
49
50    The traditional gdb method of using this info was to use the
51    recorded entry point to set the entry-file's lowpc and highpc from
52    the debugging information, where these values are the starting
53    address (inclusive) and ending address (exclusive) of the
54    instruction space in the executable which correspond to the
55    "startup file", i.e. crt0.o in most cases.  This file is assumed to
56    be a startup file and frames with pc's inside it are treated as
57    nonexistent.  Setting these variables is necessary so that
58    backtraces do not fly off the bottom of the stack.
59
60    NOTE: cagney/2003-09-09: It turns out that this "traditional"
61    method doesn't work.  Corinna writes: ``It turns out that the call
62    to test for "inside entry file" destroys a meaningful backtrace
63    under some conditions.  E.g. the backtrace tests in the asm-source
64    testcase are broken for some targets.  In this test the functions
65    are all implemented as part of one file and the testcase is not
66    necessarily linked with a start file (depending on the target).
67    What happens is, that the first frame is printed normaly and
68    following frames are treated as being inside the enttry file then.
69    This way, only the #0 frame is printed in the backtrace output.''
70    Ref "frame.c" "NOTE: vinschen/2003-04-01".
71
72    Gdb also supports an alternate method to avoid running off the bottom
73    of the stack.
74
75    There are two frames that are "special", the frame for the function
76    containing the process entry point, since it has no predecessor frame,
77    and the frame for the function containing the user code entry point
78    (the main() function), since all the predecessor frames are for the
79    process startup code.  Since we have no guarantee that the linked
80    in startup modules have any debugging information that gdb can use,
81    we need to avoid following frame pointers back into frames that might
82    have been built in the startup code, as we might get hopelessly
83    confused.  However, we almost always have debugging information
84    available for main().
85
86    These variables are used to save the range of PC values which are
87    valid within the main() function and within the function containing
88    the process entry point.  If we always consider the frame for
89    main() as the outermost frame when debugging user code, and the
90    frame for the process entry point function as the outermost frame
91    when debugging startup code, then all we have to do is have
92    DEPRECATED_FRAME_CHAIN_VALID return false whenever a frame's
93    current PC is within the range specified by these variables.  In
94    essence, we set "ceilings" in the frame chain beyond which we will
95    not proceed when following the frame chain back up the stack.
96
97    A nice side effect is that we can still debug startup code without
98    running off the end of the frame chain, assuming that we have usable
99    debugging information in the startup modules, and if we choose to not
100    use the block at main, or can't find it for some reason, everything
101    still works as before.  And if we have no startup code debugging
102    information but we do have usable information for main(), backtraces
103    from user code don't go wandering off into the startup code.  */
104
105 struct entry_info
106 {
107   /* The unrelocated value we should use for this objfile entry point.  */
108   CORE_ADDR entry_point;
109
110   /* The index of the section in which the entry point appears.  */
111   int the_bfd_section_index;
112
113   /* Set to 1 iff ENTRY_POINT contains a valid value.  */
114   unsigned entry_point_p : 1;
115
116   /* Set to 1 iff this object was initialized.  */
117   unsigned initialized : 1;
118 };
119
120 /* Sections in an objfile.  The section offsets are stored in the
121    OBJFILE.  */
122
123 struct obj_section
124 {
125   /* BFD section pointer */
126   struct bfd_section *the_bfd_section;
127
128   /* Objfile this section is part of.  */
129   struct objfile *objfile;
130
131   /* True if this "overlay section" is mapped into an "overlay region".  */
132   int ovly_mapped;
133 };
134
135 /* Relocation offset applied to S.  */
136 #define obj_section_offset(s)                                           \
137   (((s)->objfile->section_offsets)->offsets[gdb_bfd_section_index ((s)->objfile->obfd, (s)->the_bfd_section)])
138
139 /* The memory address of section S (vma + offset).  */
140 #define obj_section_addr(s)                                             \
141   (bfd_get_section_vma ((s)->objfile->obfd, s->the_bfd_section)         \
142    + obj_section_offset (s))
143
144 /* The one-passed-the-end memory address of section S
145    (vma + size + offset).  */
146 #define obj_section_endaddr(s)                                          \
147   (bfd_get_section_vma ((s)->objfile->obfd, s->the_bfd_section)         \
148    + bfd_get_section_size ((s)->the_bfd_section)                        \
149    + obj_section_offset (s))
150
151 /* The "objstats" structure provides a place for gdb to record some
152    interesting information about its internal state at runtime, on a
153    per objfile basis, such as information about the number of symbols
154    read, size of string table (if any), etc.  */
155
156 struct objstats
157 {
158   /* Number of partial symbols read.  */
159   int n_psyms = 0;
160
161   /* Number of full symbols read.  */
162   int n_syms = 0;
163
164   /* Number of ".stabs" read (if applicable).  */
165   int n_stabs = 0;
166
167   /* Number of types.  */
168   int n_types = 0;
169
170   /* Size of stringtable, (if applicable).  */
171   int sz_strtab = 0;
172 };
173
174 #define OBJSTAT(objfile, expr) (objfile -> stats.expr)
175 #define OBJSTATS struct objstats stats
176 extern void print_objfile_statistics (void);
177 extern void print_symbol_bcache_statistics (void);
178
179 /* Number of entries in the minimal symbol hash table.  */
180 #define MINIMAL_SYMBOL_HASH_SIZE 2039
181
182 /* Some objfile data is hung off the BFD.  This enables sharing of the
183    data across all objfiles using the BFD.  The data is stored in an
184    instance of this structure, and associated with the BFD using the
185    registry system.  */
186
187 struct objfile_per_bfd_storage
188 {
189   objfile_per_bfd_storage ()
190     : minsyms_read (false)
191   {}
192
193   /* The storage has an obstack of its own.  */
194
195   auto_obstack storage_obstack;
196
197   /* Byte cache for file names.  */
198
199   bcache *filename_cache = NULL;
200
201   /* Byte cache for macros.  */
202
203   bcache *macro_cache = NULL;
204
205   /* The gdbarch associated with the BFD.  Note that this gdbarch is
206      determined solely from BFD information, without looking at target
207      information.  The gdbarch determined from a running target may
208      differ from this e.g. with respect to register types and names.  */
209
210   struct gdbarch *gdbarch = NULL;
211
212   /* Hash table for mapping symbol names to demangled names.  Each
213      entry in the hash table is actually two consecutive strings,
214      both null-terminated; the first one is a mangled or linkage
215      name, and the second is the demangled name or just a zero byte
216      if the name doesn't demangle.  */
217
218   htab *demangled_names_hash = NULL;
219
220   /* The per-objfile information about the entry point, the scope (file/func)
221      containing the entry point, and the scope of the user's main() func.  */
222
223   entry_info ei {};
224
225   /* The name and language of any "main" found in this objfile.  The
226      name can be NULL, which means that the information was not
227      recorded.  */
228
229   const char *name_of_main = NULL;
230   enum language language_of_main = language_unknown;
231
232   /* Each file contains a pointer to an array of minimal symbols for all
233      global symbols that are defined within the file.  The array is
234      terminated by a "null symbol", one that has a NULL pointer for the
235      name and a zero value for the address.  This makes it easy to walk
236      through the array when passed a pointer to somewhere in the middle
237      of it.  There is also a count of the number of symbols, which does
238      not include the terminating null symbol.  The array itself, as well
239      as all the data that it points to, should be allocated on the
240      objfile_obstack for this file.  */
241
242   minimal_symbol *msymbols = NULL;
243   int minimal_symbol_count = 0;
244
245   /* The number of minimal symbols read, before any minimal symbol
246      de-duplication is applied.  Note in particular that this has only
247      a passing relationship with the actual size of the table above;
248      use minimal_symbol_count if you need the true size.  */
249
250   int n_minsyms = 0;
251
252   /* This is true if minimal symbols have already been read.  Symbol
253      readers can use this to bypass minimal symbol reading.  Also, the
254      minimal symbol table management code in minsyms.c uses this to
255      suppress new minimal symbols.  You might think that MSYMBOLS or
256      MINIMAL_SYMBOL_COUNT could be used for this, but it is possible
257      for multiple readers to install minimal symbols into a given
258      per-BFD.  */
259
260   bool minsyms_read : 1;
261
262   /* This is a hash table used to index the minimal symbols by name.  */
263
264   minimal_symbol *msymbol_hash[MINIMAL_SYMBOL_HASH_SIZE] {};
265
266   /* This hash table is used to index the minimal symbols by their
267      demangled names.  */
268
269   minimal_symbol *msymbol_demangled_hash[MINIMAL_SYMBOL_HASH_SIZE] {};
270
271   /* All the different languages of symbols found in the demangled
272      hash table.  A flat/vector-based map is more efficient than a map
273      or hash table here, since this will only usually contain zero or
274      one entries.  */
275   std::vector<enum language> demangled_hash_languages;
276 };
277
278 /* Master structure for keeping track of each file from which
279    gdb reads symbols.  There are several ways these get allocated: 1.
280    The main symbol file, symfile_objfile, set by the symbol-file command,
281    2.  Additional symbol files added by the add-symbol-file command,
282    3.  Shared library objfiles, added by ADD_SOLIB,  4.  symbol files
283    for modules that were loaded when GDB attached to a remote system
284    (see remote-vx.c).  */
285
286 struct objfile
287 {
288   objfile (bfd *, const char *, objfile_flags);
289   ~objfile ();
290
291   DISABLE_COPY_AND_ASSIGN (objfile);
292
293   /* All struct objfile's are chained together by their next pointers.
294      The program space field "objfiles"  (frequently referenced via
295      the macro "object_files") points to the first link in this chain.  */
296
297   struct objfile *next = nullptr;
298
299   /* The object file's original name as specified by the user,
300      made absolute, and tilde-expanded.  However, it is not canonicalized
301      (i.e., it has not been passed through gdb_realpath).
302      This pointer is never NULL.  This does not have to be freed; it is
303      guaranteed to have a lifetime at least as long as the objfile.  */
304
305   char *original_name = nullptr;
306
307   CORE_ADDR addr_low = 0;
308
309   /* Some flag bits for this objfile.  */
310
311   objfile_flags flags;
312
313   /* The program space associated with this objfile.  */
314
315   struct program_space *pspace;
316
317   /* List of compunits.
318      These are used to do symbol lookups and file/line-number lookups.  */
319
320   struct compunit_symtab *compunit_symtabs = nullptr;
321
322   /* Each objfile points to a linked list of partial symtabs derived from
323      this file, one partial symtab structure for each compilation unit
324      (source file).  */
325
326   struct partial_symtab *psymtabs = nullptr;
327
328   /* Map addresses to the entries of PSYMTABS.  It would be more efficient to
329      have a map per the whole process but ADDRMAP cannot selectively remove
330      its items during FREE_OBJFILE.  This mapping is already present even for
331      PARTIAL_SYMTABs which still have no corresponding full SYMTABs read.  */
332
333   struct addrmap *psymtabs_addrmap = nullptr;
334
335   /* List of freed partial symtabs, available for re-use.  */
336
337   struct partial_symtab *free_psymtabs = nullptr;
338
339   /* The object file's BFD.  Can be null if the objfile contains only
340      minimal symbols, e.g. the run time common symbols for SunOS4.  */
341
342   bfd *obfd;
343
344   /* The per-BFD data.  Note that this is treated specially if OBFD
345      is NULL.  */
346
347   struct objfile_per_bfd_storage *per_bfd = nullptr;
348
349   /* The modification timestamp of the object file, as of the last time
350      we read its symbols.  */
351
352   long mtime = 0;
353
354   /* Obstack to hold objects that should be freed when we load a new symbol
355      table from this object file.  */
356
357   struct obstack objfile_obstack {};
358
359   /* A byte cache where we can stash arbitrary "chunks" of bytes that
360      will not change.  */
361
362   struct psymbol_bcache *psymbol_cache;
363
364   /* Vectors of all partial symbols read in from file.  The actual data
365      is stored in the objfile_obstack.  */
366
367   std::vector<partial_symbol *> global_psymbols;
368   std::vector<partial_symbol *> static_psymbols;
369
370   /* Structure which keeps track of functions that manipulate objfile's
371      of the same type as this objfile.  I.e. the function to read partial
372      symbols for example.  Note that this structure is in statically
373      allocated memory, and is shared by all objfiles that use the
374      object module reader of this type.  */
375
376   const struct sym_fns *sf = nullptr;
377
378   /* Per objfile data-pointers required by other GDB modules.  */
379
380   REGISTRY_FIELDS {};
381
382   /* Set of relocation offsets to apply to each section.
383      The table is indexed by the_bfd_section->index, thus it is generally
384      as large as the number of sections in the binary.
385      The table is stored on the objfile_obstack.
386
387      These offsets indicate that all symbols (including partial and
388      minimal symbols) which have been read have been relocated by this
389      much.  Symbols which are yet to be read need to be relocated by it.  */
390
391   struct section_offsets *section_offsets = nullptr;
392   int num_sections = 0;
393
394   /* Indexes in the section_offsets array.  These are initialized by the
395      *_symfile_offsets() family of functions (som_symfile_offsets,
396      xcoff_symfile_offsets, default_symfile_offsets).  In theory they
397      should correspond to the section indexes used by bfd for the
398      current objfile.  The exception to this for the time being is the
399      SOM version.
400
401      These are initialized to -1 so that we can later detect if they
402      are used w/o being properly assigned to.  */
403
404   int sect_index_text = -1;
405   int sect_index_data = -1;
406   int sect_index_bss = -1;
407   int sect_index_rodata = -1;
408
409   /* These pointers are used to locate the section table, which
410      among other things, is used to map pc addresses into sections.
411      SECTIONS points to the first entry in the table, and
412      SECTIONS_END points to the first location past the last entry
413      in the table.  The table is stored on the objfile_obstack.  The
414      sections are indexed by the BFD section index; but the
415      structure data is only valid for certain sections
416      (e.g. non-empty, SEC_ALLOC).  */
417
418   struct obj_section *sections = nullptr;
419   struct obj_section *sections_end = nullptr;
420
421   /* GDB allows to have debug symbols in separate object files.  This is
422      used by .gnu_debuglink, ELF build id note and Mach-O OSO.
423      Although this is a tree structure, GDB only support one level
424      (ie a separate debug for a separate debug is not supported).  Note that
425      separate debug object are in the main chain and therefore will be
426      visited by ALL_OBJFILES & co iterators.  Separate debug objfile always
427      has a non-nul separate_debug_objfile_backlink.  */
428
429   /* Link to the first separate debug object, if any.  */
430
431   struct objfile *separate_debug_objfile = nullptr;
432
433   /* If this is a separate debug object, this is used as a link to the
434      actual executable objfile.  */
435
436   struct objfile *separate_debug_objfile_backlink = nullptr;
437
438   /* If this is a separate debug object, this is a link to the next one
439      for the same executable objfile.  */
440
441   struct objfile *separate_debug_objfile_link = nullptr;
442
443   /* Place to stash various statistics about this objfile.  */
444
445   OBJSTATS;
446
447   /* A linked list of symbols created when reading template types or
448      function templates.  These symbols are not stored in any symbol
449      table, so we have to keep them here to relocate them
450      properly.  */
451
452   struct symbol *template_symbols = nullptr;
453
454   /* Associate a static link (struct dynamic_prop *) to all blocks (struct
455      block *) that have one.
456
457      In the context of nested functions (available in Pascal, Ada and GNU C,
458      for instance), a static link (as in DWARF's DW_AT_static_link attribute)
459      for a function is a way to get the frame corresponding to the enclosing
460      function.
461
462      Very few blocks have a static link, so it's more memory efficient to
463      store these here rather than in struct block.  Static links must be
464      allocated on the objfile's obstack.  */
465   htab_t static_links {};
466 };
467
468 /* Declarations for functions defined in objfiles.c */
469
470 extern struct gdbarch *get_objfile_arch (const struct objfile *);
471
472 extern int entry_point_address_query (CORE_ADDR *entry_p);
473
474 extern CORE_ADDR entry_point_address (void);
475
476 extern void build_objfile_section_table (struct objfile *);
477
478 extern struct objfile *objfile_separate_debug_iterate (const struct objfile *,
479                                                        const struct objfile *);
480
481 extern void put_objfile_before (struct objfile *, struct objfile *);
482
483 extern void add_separate_debug_objfile (struct objfile *, struct objfile *);
484
485 extern void unlink_objfile (struct objfile *);
486
487 extern void free_objfile_separate_debug (struct objfile *);
488
489 extern void free_all_objfiles (void);
490
491 extern void objfile_relocate (struct objfile *, const struct section_offsets *);
492 extern void objfile_rebase (struct objfile *, CORE_ADDR);
493
494 extern int objfile_has_partial_symbols (struct objfile *objfile);
495
496 extern int objfile_has_full_symbols (struct objfile *objfile);
497
498 extern int objfile_has_symbols (struct objfile *objfile);
499
500 extern int have_partial_symbols (void);
501
502 extern int have_full_symbols (void);
503
504 extern void objfile_set_sym_fns (struct objfile *objfile,
505                                  const struct sym_fns *sf);
506
507 extern void objfiles_changed (void);
508
509 extern int is_addr_in_objfile (CORE_ADDR addr, const struct objfile *objfile);
510
511 /* Return true if ADDRESS maps into one of the sections of a
512    OBJF_SHARED objfile of PSPACE and false otherwise.  */
513
514 extern int shared_objfile_contains_address_p (struct program_space *pspace,
515                                               CORE_ADDR address);
516
517 /* This operation deletes all objfile entries that represent solibs that
518    weren't explicitly loaded by the user, via e.g., the add-symbol-file
519    command.  */
520
521 extern void objfile_purge_solibs (void);
522
523 /* Functions for dealing with the minimal symbol table, really a misc
524    address<->symbol mapping for things we don't have debug symbols for.  */
525
526 extern int have_minimal_symbols (void);
527
528 extern struct obj_section *find_pc_section (CORE_ADDR pc);
529
530 /* Return non-zero if PC is in a section called NAME.  */
531 extern int pc_in_section (CORE_ADDR, const char *);
532
533 /* Return non-zero if PC is in a SVR4-style procedure linkage table
534    section.  */
535
536 static inline int
537 in_plt_section (CORE_ADDR pc)
538 {
539   return pc_in_section (pc, ".plt");
540 }
541
542 /* Keep a registry of per-objfile data-pointers required by other GDB
543    modules.  */
544 DECLARE_REGISTRY(objfile);
545
546 /* In normal use, the section map will be rebuilt by find_pc_section
547    if objfiles have been added, removed or relocated since it was last
548    called.  Calling inhibit_section_map_updates will inhibit this
549    behavior until resume_section_map_updates is called.  If you call
550    inhibit_section_map_updates you must ensure that every call to
551    find_pc_section in the inhibited region relates to a section that
552    is already in the section map and has not since been removed or
553    relocated.  */
554 extern void inhibit_section_map_updates (struct program_space *pspace);
555
556 /* Resume automatically rebuilding the section map as required.  */
557 extern void resume_section_map_updates (struct program_space *pspace);
558
559 /* Version of the above suitable for use as a cleanup.  */
560 extern void resume_section_map_updates_cleanup (void *arg);
561
562 extern void default_iterate_over_objfiles_in_search_order
563   (struct gdbarch *gdbarch,
564    iterate_over_objfiles_in_search_order_cb_ftype *cb,
565    void *cb_data, struct objfile *current_objfile);
566 \f
567
568 /* Traverse all object files in the current program space.
569    ALL_OBJFILES_SAFE works even if you delete the objfile during the
570    traversal.  */
571
572 /* Traverse all object files in program space SS.  */
573
574 #define ALL_PSPACE_OBJFILES(ss, obj)                                    \
575   for ((obj) = ss->objfiles; (obj) != NULL; (obj) = (obj)->next)
576
577 #define ALL_OBJFILES(obj)                           \
578   for ((obj) = current_program_space->objfiles; \
579        (obj) != NULL;                               \
580        (obj) = (obj)->next)
581
582 #define ALL_OBJFILES_SAFE(obj,nxt)                      \
583   for ((obj) = current_program_space->objfiles; \
584        (obj) != NULL? ((nxt)=(obj)->next,1) :0; \
585        (obj) = (nxt))
586
587 /* Traverse all symtabs in one objfile.  */
588
589 #define ALL_OBJFILE_FILETABS(objfile, cu, s) \
590   ALL_OBJFILE_COMPUNITS (objfile, cu) \
591     ALL_COMPUNIT_FILETABS (cu, s)
592
593 /* Traverse all compunits in one objfile.  */
594
595 #define ALL_OBJFILE_COMPUNITS(objfile, cu) \
596   for ((cu) = (objfile) -> compunit_symtabs; (cu) != NULL; (cu) = (cu) -> next)
597
598 /* Traverse all minimal symbols in one objfile.  */
599
600 #define ALL_OBJFILE_MSYMBOLS(objfile, m)        \
601     for ((m) = (objfile)->per_bfd->msymbols;    \
602          MSYMBOL_LINKAGE_NAME (m) != NULL;      \
603          (m)++)
604
605 /* Traverse all symtabs in all objfiles in the current symbol
606    space.  */
607
608 #define ALL_FILETABS(objfile, ps, s)            \
609   ALL_OBJFILES (objfile)                        \
610     ALL_OBJFILE_FILETABS (objfile, ps, s)
611
612 /* Traverse all compunits in all objfiles in the current program space.  */
613
614 #define ALL_COMPUNITS(objfile, cu)      \
615   ALL_OBJFILES (objfile)                \
616     ALL_OBJFILE_COMPUNITS (objfile, cu)
617
618 /* Traverse all minimal symbols in all objfiles in the current symbol
619    space.  */
620
621 #define ALL_MSYMBOLS(objfile, m) \
622   ALL_OBJFILES (objfile)         \
623     ALL_OBJFILE_MSYMBOLS (objfile, m)
624
625 #define ALL_OBJFILE_OSECTIONS(objfile, osect)   \
626   for (osect = objfile->sections; osect < objfile->sections_end; osect++) \
627     if (osect->the_bfd_section == NULL)                                 \
628       {                                                                 \
629         /* Nothing.  */                                                 \
630       }                                                                 \
631     else
632
633 /* Traverse all obj_sections in all objfiles in the current program
634    space.
635
636    Note that this detects a "break" in the inner loop, and exits
637    immediately from the outer loop as well, thus, client code doesn't
638    need to know that this is implemented with a double for.  The extra
639    hair is to make sure that a "break;" stops the outer loop iterating
640    as well, and both OBJFILE and OSECT are left unmodified:
641
642     - The outer loop learns about the inner loop's end condition, and
643       stops iterating if it detects the inner loop didn't reach its
644       end.  In other words, the outer loop keeps going only if the
645       inner loop reached its end cleanly [(osect) ==
646       (objfile)->sections_end].
647
648     - OSECT is initialized in the outer loop initialization
649       expressions, such as if the inner loop has reached its end, so
650       the check mentioned above succeeds the first time.
651
652     - The trick to not clearing OBJFILE on a "break;" is, in the outer
653       loop's loop expression, advance OBJFILE, but iff the inner loop
654       reached its end.  If not, there was a "break;", so leave OBJFILE
655       as is; the outer loop's conditional will break immediately as
656       well (as OSECT will be different from OBJFILE->sections_end).  */
657
658 #define ALL_OBJSECTIONS(objfile, osect)                                 \
659   for ((objfile) = current_program_space->objfiles,                     \
660          (objfile) != NULL ? ((osect) = (objfile)->sections_end) : 0;   \
661        (objfile) != NULL                                                \
662          && (osect) == (objfile)->sections_end;                         \
663        ((osect) == (objfile)->sections_end                              \
664         ? ((objfile) = (objfile)->next,                                 \
665            (objfile) != NULL ? (osect) = (objfile)->sections_end : 0)   \
666         : 0))                                                           \
667     ALL_OBJFILE_OSECTIONS (objfile, osect)
668
669 #define SECT_OFF_DATA(objfile) \
670      ((objfile->sect_index_data == -1) \
671       ? (internal_error (__FILE__, __LINE__, \
672                          _("sect_index_data not initialized")), -1)     \
673       : objfile->sect_index_data)
674
675 #define SECT_OFF_RODATA(objfile) \
676      ((objfile->sect_index_rodata == -1) \
677       ? (internal_error (__FILE__, __LINE__, \
678                          _("sect_index_rodata not initialized")), -1)   \
679       : objfile->sect_index_rodata)
680
681 #define SECT_OFF_TEXT(objfile) \
682      ((objfile->sect_index_text == -1) \
683       ? (internal_error (__FILE__, __LINE__, \
684                          _("sect_index_text not initialized")), -1)     \
685       : objfile->sect_index_text)
686
687 /* Sometimes the .bss section is missing from the objfile, so we don't
688    want to die here.  Let the users of SECT_OFF_BSS deal with an
689    uninitialized section index.  */
690 #define SECT_OFF_BSS(objfile) (objfile)->sect_index_bss
691
692 /* Answer whether there is more than one object file loaded.  */
693
694 #define MULTI_OBJFILE_P() (object_files && object_files->next)
695
696 /* Reset the per-BFD storage area on OBJ.  */
697
698 void set_objfile_per_bfd (struct objfile *obj);
699
700 /* Return canonical name for OBJFILE.
701    This is the real file name if the file has been opened.
702    Otherwise it is the original name supplied by the user.  */
703
704 const char *objfile_name (const struct objfile *objfile);
705
706 /* Return the (real) file name of OBJFILE if the file has been opened,
707    otherwise return NULL.  */
708
709 const char *objfile_filename (const struct objfile *objfile);
710
711 /* Return the name to print for OBJFILE in debugging messages.  */
712
713 extern const char *objfile_debug_name (const struct objfile *objfile);
714
715 /* Return the name of the file format of OBJFILE if the file has been opened,
716    otherwise return NULL.  */
717
718 const char *objfile_flavour_name (struct objfile *objfile);
719
720 /* Set the objfile's notion of the "main" name and language.  */
721
722 extern void set_objfile_main_name (struct objfile *objfile,
723                                    const char *name, enum language lang);
724
725 extern void objfile_register_static_link
726   (struct objfile *objfile,
727    const struct block *block,
728    const struct dynamic_prop *static_link);
729
730 extern const struct dynamic_prop *objfile_lookup_static_link
731   (struct objfile *objfile, const struct block *block);
732
733 #endif /* !defined (OBJFILES_H) */