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