* jit.c (jit_object_close_impl): Don't malloc the objfile
[platform/upstream/binutils.git] / gdb / objfiles.h
1 /* Definitions for symbol file management in GDB.
2
3    Copyright (C) 1992-2004, 2007-2012 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 "gdb_obstack.h"        /* For obstack internals.  */
24 #include "symfile.h"            /* For struct psymbol_allocation_list.  */
25 #include "progspace.h"
26 #include "registry.h"
27
28 struct bcache;
29 struct htab;
30 struct symtab;
31 struct objfile_data;
32
33 /* This structure maintains information on a per-objfile basis about the
34    "entry point" of the objfile, and the scope within which the entry point
35    exists.  It is possible that gdb will see more than one objfile that is
36    executable, each with its own entry point.
37
38    For example, for dynamically linked executables in SVR4, the dynamic linker
39    code is contained within the shared C library, which is actually executable
40    and is run by the kernel first when an exec is done of a user executable
41    that is dynamically linked.  The dynamic linker within the shared C library
42    then maps in the various program segments in the user executable and jumps
43    to the user executable's recorded entry point, as if the call had been made
44    directly by the kernel.
45
46    The traditional gdb method of using this info was to use the
47    recorded entry point to set the entry-file's lowpc and highpc from
48    the debugging information, where these values are the starting
49    address (inclusive) and ending address (exclusive) of the
50    instruction space in the executable which correspond to the
51    "startup file", i.e. crt0.o in most cases.  This file is assumed to
52    be a startup file and frames with pc's inside it are treated as
53    nonexistent.  Setting these variables is necessary so that
54    backtraces do not fly off the bottom of the stack.
55
56    NOTE: cagney/2003-09-09: It turns out that this "traditional"
57    method doesn't work.  Corinna writes: ``It turns out that the call
58    to test for "inside entry file" destroys a meaningful backtrace
59    under some conditions.  E.g. the backtrace tests in the asm-source
60    testcase are broken for some targets.  In this test the functions
61    are all implemented as part of one file and the testcase is not
62    necessarily linked with a start file (depending on the target).
63    What happens is, that the first frame is printed normaly and
64    following frames are treated as being inside the enttry file then.
65    This way, only the #0 frame is printed in the backtrace output.''
66    Ref "frame.c" "NOTE: vinschen/2003-04-01".
67
68    Gdb also supports an alternate method to avoid running off the bottom
69    of the stack.
70
71    There are two frames that are "special", the frame for the function
72    containing the process entry point, since it has no predecessor frame,
73    and the frame for the function containing the user code entry point
74    (the main() function), since all the predecessor frames are for the
75    process startup code.  Since we have no guarantee that the linked
76    in startup modules have any debugging information that gdb can use,
77    we need to avoid following frame pointers back into frames that might
78    have been built in the startup code, as we might get hopelessly 
79    confused.  However, we almost always have debugging information
80    available for main().
81
82    These variables are used to save the range of PC values which are
83    valid within the main() function and within the function containing
84    the process entry point.  If we always consider the frame for
85    main() as the outermost frame when debugging user code, and the
86    frame for the process entry point function as the outermost frame
87    when debugging startup code, then all we have to do is have
88    DEPRECATED_FRAME_CHAIN_VALID return false whenever a frame's
89    current PC is within the range specified by these variables.  In
90    essence, we set "ceilings" in the frame chain beyond which we will
91    not proceed when following the frame chain back up the stack.
92
93    A nice side effect is that we can still debug startup code without
94    running off the end of the frame chain, assuming that we have usable
95    debugging information in the startup modules, and if we choose to not
96    use the block at main, or can't find it for some reason, everything
97    still works as before.  And if we have no startup code debugging
98    information but we do have usable information for main(), backtraces
99    from user code don't go wandering off into the startup code.  */
100
101 struct entry_info
102   {
103     /* The relocated value we should use for this objfile entry point.  */
104     CORE_ADDR entry_point;
105
106     /* Set to 1 iff ENTRY_POINT contains a valid value.  */
107     unsigned entry_point_p : 1;
108   };
109
110 /* Sections in an objfile.  The section offsets are stored in the
111    OBJFILE.  */
112
113 struct obj_section
114   {
115     struct bfd_section *the_bfd_section;        /* BFD section pointer */
116
117     /* Objfile this section is part of.  */
118     struct objfile *objfile;
119
120     /* True if this "overlay section" is mapped into an "overlay region".  */
121     int ovly_mapped;
122   };
123
124 /* Relocation offset applied to S.  */
125 #define obj_section_offset(s)                                           \
126   (((s)->objfile->section_offsets)->offsets[(s)->the_bfd_section->index])
127
128 /* The memory address of section S (vma + offset).  */
129 #define obj_section_addr(s)                                             \
130   (bfd_get_section_vma ((s)->objfile->obfd, s->the_bfd_section)         \
131    + obj_section_offset (s))
132
133 /* The one-passed-the-end memory address of section S
134    (vma + size + offset).  */
135 #define obj_section_endaddr(s)                                          \
136   (bfd_get_section_vma ((s)->objfile->obfd, s->the_bfd_section)         \
137    + bfd_get_section_size ((s)->the_bfd_section)                        \
138    + obj_section_offset (s))
139
140 /* The "objstats" structure provides a place for gdb to record some
141    interesting information about its internal state at runtime, on a
142    per objfile basis, such as information about the number of symbols
143    read, size of string table (if any), etc.  */
144
145 struct objstats
146   {
147     int n_minsyms;              /* Number of minimal symbols read */
148     int n_psyms;                /* Number of partial symbols read */
149     int n_syms;                 /* Number of full symbols read */
150     int n_stabs;                /* Number of ".stabs" read (if applicable) */
151     int n_types;                /* Number of types */
152     int sz_strtab;              /* Size of stringtable, (if applicable) */
153   };
154
155 #define OBJSTAT(objfile, expr) (objfile -> stats.expr)
156 #define OBJSTATS struct objstats stats
157 extern void print_objfile_statistics (void);
158 extern void print_symbol_bcache_statistics (void);
159
160 /* Number of entries in the minimal symbol hash table.  */
161 #define MINIMAL_SYMBOL_HASH_SIZE 2039
162
163 /* Some objfile data is hung off the BFD.  This enables sharing of the
164    data across all objfiles using the BFD.  The data is stored in an
165    instance of this structure, and associated with the BFD using the
166    registry system.  */
167
168 struct objfile_per_bfd_storage
169 {
170   /* The storage has an obstack of its own.  */
171
172   struct obstack storage_obstack;
173   
174   /* Byte cache for file names.  */
175
176   struct bcache *filename_cache;
177
178   /* Byte cache for macros.  */
179   struct bcache *macro_cache;
180 };
181
182 /* Master structure for keeping track of each file from which
183    gdb reads symbols.  There are several ways these get allocated: 1.
184    The main symbol file, symfile_objfile, set by the symbol-file command,
185    2.  Additional symbol files added by the add-symbol-file command,
186    3.  Shared library objfiles, added by ADD_SOLIB,  4.  symbol files
187    for modules that were loaded when GDB attached to a remote system
188    (see remote-vx.c).  */
189
190 struct objfile
191   {
192
193     /* All struct objfile's are chained together by their next pointers.
194        The program space field "objfiles"  (frequently referenced via
195        the macro "object_files") points to the first link in this
196        chain.  */
197
198     struct objfile *next;
199
200     /* The object file's name, tilde-expanded and absolute.  This
201        pointer is never NULL.  This does not have to be freed; it is
202        guaranteed to have a lifetime at least as long as the objfile.  */
203
204     char *name;
205
206     CORE_ADDR addr_low;
207
208     /* Some flag bits for this objfile.
209        The values are defined by OBJF_*.  */
210
211     unsigned short flags;
212
213     /* The program space associated with this objfile.  */
214
215     struct program_space *pspace;
216
217     /* Each objfile points to a linked list of symtabs derived from this file,
218        one symtab structure for each compilation unit (source file).  Each link
219        in the symtab list contains a backpointer to this objfile.  */
220
221     struct symtab *symtabs;
222
223     /* Each objfile points to a linked list of partial symtabs derived from
224        this file, one partial symtab structure for each compilation unit
225        (source file).  */
226
227     struct partial_symtab *psymtabs;
228
229     /* Map addresses to the entries of PSYMTABS.  It would be more efficient to
230        have a map per the whole process but ADDRMAP cannot selectively remove
231        its items during FREE_OBJFILE.  This mapping is already present even for
232        PARTIAL_SYMTABs which still have no corresponding full SYMTABs read.  */
233
234     struct addrmap *psymtabs_addrmap;
235
236     /* List of freed partial symtabs, available for re-use.  */
237
238     struct partial_symtab *free_psymtabs;
239
240     /* The object file's BFD.  Can be null if the objfile contains only
241        minimal symbols, e.g. the run time common symbols for SunOS4.  */
242
243     bfd *obfd;
244
245     /* The per-BFD data.  Note that this is treated specially if OBFD
246        is NULL.  */
247
248     struct objfile_per_bfd_storage *per_bfd;
249
250     /* The gdbarch associated with the BFD.  Note that this gdbarch is
251        determined solely from BFD information, without looking at target
252        information.  The gdbarch determined from a running target may
253        differ from this e.g. with respect to register types and names.  */
254
255     struct gdbarch *gdbarch;
256
257     /* The modification timestamp of the object file, as of the last time
258        we read its symbols.  */
259
260     long mtime;
261
262     /* Cached 32-bit CRC as computed by gnu_debuglink_crc32.  CRC32 is valid
263        iff CRC32_P.  */
264     unsigned long crc32;
265     int crc32_p;
266
267     /* Obstack to hold objects that should be freed when we load a new symbol
268        table from this object file.  */
269
270     struct obstack objfile_obstack; 
271
272     /* A byte cache where we can stash arbitrary "chunks" of bytes that
273        will not change.  */
274
275     struct psymbol_bcache *psymbol_cache; /* Byte cache for partial syms.  */
276
277     /* Hash table for mapping symbol names to demangled names.  Each
278        entry in the hash table is actually two consecutive strings,
279        both null-terminated; the first one is a mangled or linkage
280        name, and the second is the demangled name or just a zero byte
281        if the name doesn't demangle.  */
282     struct htab *demangled_names_hash;
283
284     /* Vectors of all partial symbols read in from file.  The actual data
285        is stored in the objfile_obstack.  */
286
287     struct psymbol_allocation_list global_psymbols;
288     struct psymbol_allocation_list static_psymbols;
289
290     /* Each file contains a pointer to an array of minimal symbols for all
291        global symbols that are defined within the file.  The array is
292        terminated by a "null symbol", one that has a NULL pointer for the
293        name and a zero value for the address.  This makes it easy to walk
294        through the array when passed a pointer to somewhere in the middle
295        of it.  There is also a count of the number of symbols, which does
296        not include the terminating null symbol.  The array itself, as well
297        as all the data that it points to, should be allocated on the
298        objfile_obstack for this file.  */
299
300     struct minimal_symbol *msymbols;
301     int minimal_symbol_count;
302
303     /* This is a hash table used to index the minimal symbols by name.  */
304
305     struct minimal_symbol *msymbol_hash[MINIMAL_SYMBOL_HASH_SIZE];
306
307     /* This hash table is used to index the minimal symbols by their
308        demangled names.  */
309
310     struct minimal_symbol *msymbol_demangled_hash[MINIMAL_SYMBOL_HASH_SIZE];
311
312     /* Structure which keeps track of functions that manipulate objfile's
313        of the same type as this objfile.  I.e. the function to read partial
314        symbols for example.  Note that this structure is in statically
315        allocated memory, and is shared by all objfiles that use the
316        object module reader of this type.  */
317
318     const struct sym_fns *sf;
319
320     /* The per-objfile information about the entry point, the scope (file/func)
321        containing the entry point, and the scope of the user's main() func.  */
322
323     struct entry_info ei;
324
325     /* Information about stabs.  Will be filled in with a dbx_symfile_info
326        struct by those readers that need it.  */
327     /* NOTE: cagney/2004-10-23: This has been replaced by per-objfile
328        data points implemented using "data" and "num_data" below.  For
329        an example of how to use this replacement, see "objfile_data"
330        in "mips-tdep.c".  */
331
332     struct dbx_symfile_info *deprecated_sym_stab_info;
333
334     /* Hook for information for use by the symbol reader (currently used
335        for information shared by sym_init and sym_read).  It is
336        typically a pointer to malloc'd memory.  The symbol reader's finish
337        function is responsible for freeing the memory thusly allocated.  */
338     /* NOTE: cagney/2004-10-23: This has been replaced by per-objfile
339        data points implemented using "data" and "num_data" below.  For
340        an example of how to use this replacement, see "objfile_data"
341        in "mips-tdep.c".  */
342
343     void *deprecated_sym_private;
344
345     /* Per objfile data-pointers required by other GDB modules.  */
346     /* FIXME: kettenis/20030711: This mechanism could replace
347        deprecated_sym_stab_info and deprecated_sym_private
348        entirely.  */
349
350     REGISTRY_FIELDS;
351
352     /* Set of relocation offsets to apply to each section.
353        The table is indexed by the_bfd_section->index, thus it is generally
354        as large as the number of sections in the binary.
355        The table is stored on the objfile_obstack.
356
357        These offsets indicate that all symbols (including partial and
358        minimal symbols) which have been read have been relocated by this
359        much.  Symbols which are yet to be read need to be relocated by it.  */
360
361     struct section_offsets *section_offsets;
362     int num_sections;
363
364     /* Indexes in the section_offsets array.  These are initialized by the
365        *_symfile_offsets() family of functions (som_symfile_offsets,
366        xcoff_symfile_offsets, default_symfile_offsets).  In theory they
367        should correspond to the section indexes used by bfd for the
368        current objfile.  The exception to this for the time being is the
369        SOM version.  */
370
371     int sect_index_text;
372     int sect_index_data;
373     int sect_index_bss;
374     int sect_index_rodata;
375
376     /* These pointers are used to locate the section table, which
377        among other things, is used to map pc addresses into sections.
378        SECTIONS points to the first entry in the table, and
379        SECTIONS_END points to the first location past the last entry
380        in the table.  The table is stored on the objfile_obstack.
381        There is no particular order to the sections in this table, and it
382        only contains sections we care about (e.g. non-empty, SEC_ALLOC).  */
383
384     struct obj_section *sections, *sections_end;
385
386     /* GDB allows to have debug symbols in separate object files.  This is
387        used by .gnu_debuglink, ELF build id note and Mach-O OSO.
388        Although this is a tree structure, GDB only support one level
389        (ie a separate debug for a separate debug is not supported).  Note that
390        separate debug object are in the main chain and therefore will be
391        visited by ALL_OBJFILES & co iterators.  Separate debug objfile always
392        has a non-nul separate_debug_objfile_backlink.  */
393
394     /* Link to the first separate debug object, if any.  */
395     struct objfile *separate_debug_objfile;
396
397     /* If this is a separate debug object, this is used as a link to the
398        actual executable objfile.  */
399     struct objfile *separate_debug_objfile_backlink;
400
401     /* If this is a separate debug object, this is a link to the next one
402        for the same executable objfile.  */
403     struct objfile *separate_debug_objfile_link;
404
405     /* Place to stash various statistics about this objfile.  */
406     OBJSTATS;
407
408     /* A linked list of symbols created when reading template types or
409        function templates.  These symbols are not stored in any symbol
410        table, so we have to keep them here to relocate them
411        properly.  */
412     struct symbol *template_symbols;
413   };
414
415 /* Defines for the objfile flag word.  */
416
417 /* When an object file has its functions reordered (currently Irix-5.2
418    shared libraries exhibit this behaviour), we will need an expensive
419    algorithm to locate a partial symtab or symtab via an address.
420    To avoid this penalty for normal object files, we use this flag,
421    whose setting is determined upon symbol table read in.  */
422
423 #define OBJF_REORDERED  (1 << 0)        /* Functions are reordered */
424
425 /* Distinguish between an objfile for a shared library and a "vanilla"
426    objfile.  (If not set, the objfile may still actually be a solib.
427    This can happen if the user created the objfile by using the
428    add-symbol-file command.  GDB doesn't in that situation actually
429    check whether the file is a solib.  Rather, the target's
430    implementation of the solib interface is responsible for setting
431    this flag when noticing solibs used by an inferior.)  */
432
433 #define OBJF_SHARED     (1 << 1)        /* From a shared library */
434
435 /* User requested that this objfile be read in it's entirety.  */
436
437 #define OBJF_READNOW    (1 << 2)        /* Immediate full read */
438
439 /* This objfile was created because the user explicitly caused it
440    (e.g., used the add-symbol-file command).  This bit offers a way
441    for run_command to remove old objfile entries which are no longer
442    valid (i.e., are associated with an old inferior), but to preserve
443    ones that the user explicitly loaded via the add-symbol-file
444    command.  */
445
446 #define OBJF_USERLOADED (1 << 3)        /* User loaded */
447
448 /* Set if we have tried to read partial symtabs for this objfile.
449    This is used to allow lazy reading of partial symtabs.  */
450
451 #define OBJF_PSYMTABS_READ (1 << 4)
452
453 /* Set if this is the main symbol file
454    (as opposed to symbol file for dynamically loaded code).  */
455
456 #define OBJF_MAINLINE (1 << 5)
457
458 /* The object file that contains the runtime common minimal symbols
459    for SunOS4.  Note that this objfile has no associated BFD.  */
460
461 extern struct objfile *rt_common_objfile;
462
463 /* Declarations for functions defined in objfiles.c */
464
465 extern struct objfile *allocate_objfile (bfd *, int);
466
467 extern struct gdbarch *get_objfile_arch (struct objfile *);
468
469 extern void init_entry_point_info (struct objfile *);
470
471 extern int entry_point_address_query (CORE_ADDR *entry_p);
472
473 extern CORE_ADDR entry_point_address (void);
474
475 extern void build_objfile_section_table (struct objfile *);
476
477 extern void terminate_minimal_symbol_table (struct objfile *objfile);
478
479 extern struct objfile *objfile_separate_debug_iterate (const struct objfile *,
480                                                        const struct objfile *);
481
482 extern void put_objfile_before (struct objfile *, struct objfile *);
483
484 extern void objfile_to_front (struct objfile *);
485
486 extern void add_separate_debug_objfile (struct objfile *, struct objfile *);
487
488 extern void unlink_objfile (struct objfile *);
489
490 extern void free_objfile (struct objfile *);
491
492 extern void free_objfile_separate_debug (struct objfile *);
493
494 extern struct cleanup *make_cleanup_free_objfile (struct objfile *);
495
496 extern void free_all_objfiles (void);
497
498 extern void objfile_relocate (struct objfile *, struct section_offsets *);
499
500 extern int objfile_has_partial_symbols (struct objfile *objfile);
501
502 extern int objfile_has_full_symbols (struct objfile *objfile);
503
504 extern int objfile_has_symbols (struct objfile *objfile);
505
506 extern int have_partial_symbols (void);
507
508 extern int have_full_symbols (void);
509
510 extern void objfiles_changed (void);
511
512 /* This operation deletes all objfile entries that represent solibs that
513    weren't explicitly loaded by the user, via e.g., the add-symbol-file
514    command.  */
515
516 extern void objfile_purge_solibs (void);
517
518 /* Functions for dealing with the minimal symbol table, really a misc
519    address<->symbol mapping for things we don't have debug symbols for.  */
520
521 extern int have_minimal_symbols (void);
522
523 extern struct obj_section *find_pc_section (CORE_ADDR pc);
524
525 extern int in_plt_section (CORE_ADDR, char *);
526
527 /* Keep a registry of per-objfile data-pointers required by other GDB
528    modules.  */
529 DECLARE_REGISTRY(objfile);
530
531 extern void default_iterate_over_objfiles_in_search_order
532   (struct gdbarch *gdbarch,
533    iterate_over_objfiles_in_search_order_cb_ftype *cb,
534    void *cb_data, struct objfile *current_objfile);
535 \f
536
537 /* Traverse all object files in the current program space.
538    ALL_OBJFILES_SAFE works even if you delete the objfile during the
539    traversal.  */
540
541 /* Traverse all object files in program space SS.  */
542
543 #define ALL_PSPACE_OBJFILES(ss, obj)                                    \
544   for ((obj) = ss->objfiles; (obj) != NULL; (obj) = (obj)->next)        \
545
546 #define ALL_PSPACE_OBJFILES_SAFE(ss, obj, nxt)          \
547   for ((obj) = ss->objfiles;                    \
548        (obj) != NULL? ((nxt)=(obj)->next,1) :0; \
549        (obj) = (nxt))
550
551 #define ALL_OBJFILES(obj)                           \
552   for ((obj) = current_program_space->objfiles; \
553        (obj) != NULL;                               \
554        (obj) = (obj)->next)
555
556 #define ALL_OBJFILES_SAFE(obj,nxt)                      \
557   for ((obj) = current_program_space->objfiles; \
558        (obj) != NULL? ((nxt)=(obj)->next,1) :0; \
559        (obj) = (nxt))
560
561 /* Traverse all symtabs in one objfile.  */
562
563 #define ALL_OBJFILE_SYMTABS(objfile, s) \
564     for ((s) = (objfile) -> symtabs; (s) != NULL; (s) = (s) -> next)
565
566 /* Traverse all primary symtabs in one objfile.  */
567
568 #define ALL_OBJFILE_PRIMARY_SYMTABS(objfile, s) \
569   ALL_OBJFILE_SYMTABS ((objfile), (s)) \
570     if ((s)->primary)
571
572 /* Traverse all minimal symbols in one objfile.  */
573
574 #define ALL_OBJFILE_MSYMBOLS(objfile, m) \
575     for ((m) = (objfile) -> msymbols; SYMBOL_LINKAGE_NAME(m) != NULL; (m)++)
576
577 /* Traverse all symtabs in all objfiles in the current symbol
578    space.  */
579
580 #define ALL_SYMTABS(objfile, s) \
581   ALL_OBJFILES (objfile)         \
582     ALL_OBJFILE_SYMTABS (objfile, s)
583
584 #define ALL_PSPACE_SYMTABS(ss, objfile, s)              \
585   ALL_PSPACE_OBJFILES (ss, objfile)                     \
586     ALL_OBJFILE_SYMTABS (objfile, s)
587
588 /* Traverse all symtabs in all objfiles in the current program space,
589    skipping included files (which share a blockvector with their
590    primary symtab).  */
591
592 #define ALL_PRIMARY_SYMTABS(objfile, s) \
593   ALL_OBJFILES (objfile)                \
594     ALL_OBJFILE_PRIMARY_SYMTABS (objfile, s)
595
596 #define ALL_PSPACE_PRIMARY_SYMTABS(pspace, objfile, s)  \
597   ALL_PSPACE_OBJFILES (ss, objfile)                     \
598     ALL_OBJFILE_PRIMARY_SYMTABS (objfile, s)
599
600 /* Traverse all minimal symbols in all objfiles in the current symbol
601    space.  */
602
603 #define ALL_MSYMBOLS(objfile, m) \
604   ALL_OBJFILES (objfile)         \
605     ALL_OBJFILE_MSYMBOLS (objfile, m)
606
607 #define ALL_OBJFILE_OSECTIONS(objfile, osect)   \
608   for (osect = objfile->sections; osect < objfile->sections_end; osect++)
609
610 /* Traverse all obj_sections in all objfiles in the current program
611    space.
612
613    Note that this detects a "break" in the inner loop, and exits
614    immediately from the outer loop as well, thus, client code doesn't
615    need to know that this is implemented with a double for.  The extra
616    hair is to make sure that a "break;" stops the outer loop iterating
617    as well, and both OBJFILE and OSECT are left unmodified:
618
619     - The outer loop learns about the inner loop's end condition, and
620       stops iterating if it detects the inner loop didn't reach its
621       end.  In other words, the outer loop keeps going only if the
622       inner loop reached its end cleanly [(osect) ==
623       (objfile)->sections_end].
624
625     - OSECT is initialized in the outer loop initialization
626       expressions, such as if the inner loop has reached its end, so
627       the check mentioned above succeeds the first time.
628
629     - The trick to not clearing OBJFILE on a "break;" is, in the outer
630       loop's loop expression, advance OBJFILE, but iff the inner loop
631       reached its end.  If not, there was a "break;", so leave OBJFILE
632       as is; the outer loop's conditional will break immediately as
633       well (as OSECT will be different from OBJFILE->sections_end).  */
634
635 #define ALL_OBJSECTIONS(objfile, osect)                                 \
636   for ((objfile) = current_program_space->objfiles,                     \
637          (objfile) != NULL ? ((osect) = (objfile)->sections_end) : 0;   \
638        (objfile) != NULL                                                \
639          && (osect) == (objfile)->sections_end;                         \
640        ((osect) == (objfile)->sections_end                              \
641         ? ((objfile) = (objfile)->next,                                 \
642            (objfile) != NULL ? (osect) = (objfile)->sections_end : 0)   \
643         : 0))                                                           \
644     for ((osect) = (objfile)->sections;                                 \
645          (osect) < (objfile)->sections_end;                             \
646          (osect)++)
647
648 #define SECT_OFF_DATA(objfile) \
649      ((objfile->sect_index_data == -1) \
650       ? (internal_error (__FILE__, __LINE__, \
651                          _("sect_index_data not initialized")), -1)     \
652       : objfile->sect_index_data)
653
654 #define SECT_OFF_RODATA(objfile) \
655      ((objfile->sect_index_rodata == -1) \
656       ? (internal_error (__FILE__, __LINE__, \
657                          _("sect_index_rodata not initialized")), -1)   \
658       : objfile->sect_index_rodata)
659
660 #define SECT_OFF_TEXT(objfile) \
661      ((objfile->sect_index_text == -1) \
662       ? (internal_error (__FILE__, __LINE__, \
663                          _("sect_index_text not initialized")), -1)     \
664       : objfile->sect_index_text)
665
666 /* Sometimes the .bss section is missing from the objfile, so we don't
667    want to die here.  Let the users of SECT_OFF_BSS deal with an
668    uninitialized section index.  */
669 #define SECT_OFF_BSS(objfile) (objfile)->sect_index_bss
670
671 /* Answer whether there is more than one object file loaded.  */
672
673 #define MULTI_OBJFILE_P() (object_files && object_files->next)
674
675 /* Reset the per-BFD storage area on OBJ.  */
676
677 void set_objfile_per_bfd (struct objfile *obj);
678
679 #endif /* !defined (OBJFILES_H) */