1 |
734 |
jeremybenn |
/* Specialized bits of code needed to support construction and
|
2 |
|
|
destruction of file-scope objects in C++ code.
|
3 |
|
|
Copyright (C) 1991, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001
|
4 |
|
|
2002, 2003, 2004, 2005, 2006, 2007, 2009, 2010, 2011
|
5 |
|
|
Free Software Foundation, Inc.
|
6 |
|
|
Contributed by Ron Guilmette (rfg@monkeys.com).
|
7 |
|
|
|
8 |
|
|
This file is part of GCC.
|
9 |
|
|
|
10 |
|
|
GCC is free software; you can redistribute it and/or modify it under
|
11 |
|
|
the terms of the GNU General Public License as published by the Free
|
12 |
|
|
Software Foundation; either version 3, or (at your option) any later
|
13 |
|
|
version.
|
14 |
|
|
|
15 |
|
|
GCC is distributed in the hope that it will be useful, but WITHOUT ANY
|
16 |
|
|
WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
17 |
|
|
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
18 |
|
|
for more details.
|
19 |
|
|
|
20 |
|
|
Under Section 7 of GPL version 3, you are granted additional
|
21 |
|
|
permissions described in the GCC Runtime Library Exception, version
|
22 |
|
|
3.1, as published by the Free Software Foundation.
|
23 |
|
|
|
24 |
|
|
You should have received a copy of the GNU General Public License and
|
25 |
|
|
a copy of the GCC Runtime Library Exception along with this program;
|
26 |
|
|
see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
|
27 |
|
|
<http://www.gnu.org/licenses/>. */
|
28 |
|
|
|
29 |
|
|
/* This file is a bit like libgcc2.c in that it is compiled
|
30 |
|
|
multiple times and yields multiple .o files.
|
31 |
|
|
|
32 |
|
|
This file is useful on target machines where the object file format
|
33 |
|
|
supports multiple "user-defined" sections (e.g. COFF, ELF, ROSE). On
|
34 |
|
|
such systems, this file allows us to avoid running collect (or any
|
35 |
|
|
other such slow and painful kludge). Additionally, if the target
|
36 |
|
|
system supports a .init section, this file allows us to support the
|
37 |
|
|
linking of C++ code with a non-C++ main program.
|
38 |
|
|
|
39 |
|
|
Note that if INIT_SECTION_ASM_OP is defined in the tm.h file, then
|
40 |
|
|
this file *will* make use of the .init section. If that symbol is
|
41 |
|
|
not defined however, then the .init section will not be used.
|
42 |
|
|
|
43 |
|
|
Currently, only ELF and COFF are supported. It is likely however that
|
44 |
|
|
ROSE could also be supported, if someone was willing to do the work to
|
45 |
|
|
make whatever (small?) adaptations are needed. (Some work may be
|
46 |
|
|
needed on the ROSE assembler and linker also.)
|
47 |
|
|
|
48 |
|
|
This file must be compiled with gcc. */
|
49 |
|
|
|
50 |
|
|
/* Target machine header files require this define. */
|
51 |
|
|
#define IN_LIBGCC2
|
52 |
|
|
|
53 |
|
|
/* FIXME: Including auto-host is incorrect, but until we have
|
54 |
|
|
identified the set of defines that need to go into auto-target.h,
|
55 |
|
|
this will have to do. */
|
56 |
|
|
#include "auto-host.h"
|
57 |
|
|
#undef pid_t
|
58 |
|
|
#undef rlim_t
|
59 |
|
|
#undef ssize_t
|
60 |
|
|
#undef vfork
|
61 |
|
|
#include "tconfig.h"
|
62 |
|
|
#include "tsystem.h"
|
63 |
|
|
#include "coretypes.h"
|
64 |
|
|
#include "tm.h"
|
65 |
|
|
#include "libgcc_tm.h"
|
66 |
|
|
#include "unwind-dw2-fde.h"
|
67 |
|
|
|
68 |
|
|
#ifndef FORCE_CODE_SECTION_ALIGN
|
69 |
|
|
# define FORCE_CODE_SECTION_ALIGN
|
70 |
|
|
#endif
|
71 |
|
|
|
72 |
|
|
#ifndef CRT_CALL_STATIC_FUNCTION
|
73 |
|
|
# define CRT_CALL_STATIC_FUNCTION(SECTION_OP, FUNC) \
|
74 |
|
|
static void __attribute__((__used__)) \
|
75 |
|
|
call_ ## FUNC (void) \
|
76 |
|
|
{ \
|
77 |
|
|
asm (SECTION_OP); \
|
78 |
|
|
FUNC (); \
|
79 |
|
|
FORCE_CODE_SECTION_ALIGN \
|
80 |
|
|
asm (TEXT_SECTION_ASM_OP); \
|
81 |
|
|
}
|
82 |
|
|
#endif
|
83 |
|
|
|
84 |
|
|
#if defined(OBJECT_FORMAT_ELF) \
|
85 |
|
|
&& !defined(OBJECT_FORMAT_FLAT) \
|
86 |
|
|
&& defined(HAVE_LD_EH_FRAME_HDR) \
|
87 |
|
|
&& !defined(inhibit_libc) && !defined(CRTSTUFFT_O) \
|
88 |
|
|
&& defined(__FreeBSD__) && __FreeBSD__ >= 7
|
89 |
|
|
#include <link.h>
|
90 |
|
|
# define USE_PT_GNU_EH_FRAME
|
91 |
|
|
#endif
|
92 |
|
|
|
93 |
|
|
#if defined(OBJECT_FORMAT_ELF) \
|
94 |
|
|
&& !defined(OBJECT_FORMAT_FLAT) \
|
95 |
|
|
&& defined(HAVE_LD_EH_FRAME_HDR) && defined(TARGET_DL_ITERATE_PHDR) \
|
96 |
|
|
&& !defined(inhibit_libc) && !defined(CRTSTUFFT_O) \
|
97 |
|
|
&& defined(__sun__) && defined(__svr4__)
|
98 |
|
|
#include <link.h>
|
99 |
|
|
# define USE_PT_GNU_EH_FRAME
|
100 |
|
|
#endif
|
101 |
|
|
|
102 |
|
|
#if defined(OBJECT_FORMAT_ELF) \
|
103 |
|
|
&& !defined(OBJECT_FORMAT_FLAT) \
|
104 |
|
|
&& defined(HAVE_LD_EH_FRAME_HDR) \
|
105 |
|
|
&& !defined(inhibit_libc) && !defined(CRTSTUFFT_O) \
|
106 |
|
|
&& defined(__GLIBC__) && __GLIBC__ >= 2
|
107 |
|
|
#include <link.h>
|
108 |
|
|
/* uClibc pretends to be glibc 2.2 and DT_CONFIG is defined in its link.h.
|
109 |
|
|
But it doesn't use PT_GNU_EH_FRAME ELF segment currently. */
|
110 |
|
|
# if !defined(__UCLIBC__) \
|
111 |
|
|
&& (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ > 2) \
|
112 |
|
|
|| (__GLIBC__ == 2 && __GLIBC_MINOR__ == 2 && defined(DT_CONFIG)))
|
113 |
|
|
# define USE_PT_GNU_EH_FRAME
|
114 |
|
|
# endif
|
115 |
|
|
#endif
|
116 |
|
|
#if defined(EH_FRAME_SECTION_NAME) && !defined(USE_PT_GNU_EH_FRAME)
|
117 |
|
|
# define USE_EH_FRAME_REGISTRY
|
118 |
|
|
#endif
|
119 |
|
|
#if defined(EH_FRAME_SECTION_NAME) && EH_TABLES_CAN_BE_READ_ONLY
|
120 |
|
|
# define EH_FRAME_SECTION_CONST const
|
121 |
|
|
#else
|
122 |
|
|
# define EH_FRAME_SECTION_CONST
|
123 |
|
|
#endif
|
124 |
|
|
|
125 |
|
|
#if !defined(DTOR_LIST_END) && defined(OBJECT_FORMAT_ELF) \
|
126 |
|
|
&& defined(HAVE_GAS_HIDDEN) && !defined(FINI_ARRAY_SECTION_ASM_OP)
|
127 |
|
|
# define HIDDEN_DTOR_LIST_END
|
128 |
|
|
#endif
|
129 |
|
|
|
130 |
|
|
#if !defined(USE_TM_CLONE_REGISTRY) && defined(OBJECT_FORMAT_ELF)
|
131 |
|
|
# define USE_TM_CLONE_REGISTRY 1
|
132 |
|
|
#endif
|
133 |
|
|
|
134 |
|
|
/* We do not want to add the weak attribute to the declarations of these
|
135 |
|
|
routines in unwind-dw2-fde.h because that will cause the definition of
|
136 |
|
|
these symbols to be weak as well.
|
137 |
|
|
|
138 |
|
|
This exposes a core issue, how to handle creating weak references vs
|
139 |
|
|
how to create weak definitions. Either we have to have the definition
|
140 |
|
|
of TARGET_WEAK_ATTRIBUTE be conditional in the shared header files or
|
141 |
|
|
have a second declaration if we want a function's references to be weak,
|
142 |
|
|
but not its definition.
|
143 |
|
|
|
144 |
|
|
Making TARGET_WEAK_ATTRIBUTE conditional seems like a good solution until
|
145 |
|
|
one thinks about scaling to larger problems -- i.e., the condition under
|
146 |
|
|
which TARGET_WEAK_ATTRIBUTE is active will eventually get far too
|
147 |
|
|
complicated.
|
148 |
|
|
|
149 |
|
|
So, we take an approach similar to #pragma weak -- we have a second
|
150 |
|
|
declaration for functions that we want to have weak references.
|
151 |
|
|
|
152 |
|
|
Neither way is particularly good. */
|
153 |
|
|
|
154 |
|
|
/* References to __register_frame_info and __deregister_frame_info should
|
155 |
|
|
be weak in this file if at all possible. */
|
156 |
|
|
extern void __register_frame_info (const void *, struct object *)
|
157 |
|
|
TARGET_ATTRIBUTE_WEAK;
|
158 |
|
|
extern void __register_frame_info_bases (const void *, struct object *,
|
159 |
|
|
void *, void *)
|
160 |
|
|
TARGET_ATTRIBUTE_WEAK;
|
161 |
|
|
extern void *__deregister_frame_info (const void *)
|
162 |
|
|
TARGET_ATTRIBUTE_WEAK;
|
163 |
|
|
extern void *__deregister_frame_info_bases (const void *)
|
164 |
|
|
TARGET_ATTRIBUTE_WEAK;
|
165 |
|
|
extern void __do_global_ctors_1 (void);
|
166 |
|
|
|
167 |
|
|
/* Likewise for _Jv_RegisterClasses. */
|
168 |
|
|
extern void _Jv_RegisterClasses (void *) TARGET_ATTRIBUTE_WEAK;
|
169 |
|
|
|
170 |
|
|
/* Likewise for transactional memory clone tables. */
|
171 |
|
|
extern void _ITM_registerTMCloneTable (void *, size_t) TARGET_ATTRIBUTE_WEAK;
|
172 |
|
|
extern void _ITM_deregisterTMCloneTable (void *) TARGET_ATTRIBUTE_WEAK;
|
173 |
|
|
|
174 |
|
|
#ifdef OBJECT_FORMAT_ELF
|
175 |
|
|
|
176 |
|
|
/* Declare a pointer to void function type. */
|
177 |
|
|
typedef void (*func_ptr) (void);
|
178 |
|
|
#define STATIC static
|
179 |
|
|
|
180 |
|
|
#else /* OBJECT_FORMAT_ELF */
|
181 |
|
|
|
182 |
|
|
#include "gbl-ctors.h"
|
183 |
|
|
|
184 |
|
|
#define STATIC
|
185 |
|
|
|
186 |
|
|
#endif /* OBJECT_FORMAT_ELF */
|
187 |
|
|
|
188 |
|
|
#ifdef CRT_BEGIN
|
189 |
|
|
|
190 |
|
|
/* NOTE: In order to be able to support SVR4 shared libraries, we arrange
|
191 |
|
|
to have one set of symbols { __CTOR_LIST__, __DTOR_LIST__, __CTOR_END__,
|
192 |
|
|
__DTOR_END__ } per root executable and also one set of these symbols
|
193 |
|
|
per shared library. So in any given whole process image, we may have
|
194 |
|
|
multiple definitions of each of these symbols. In order to prevent
|
195 |
|
|
these definitions from conflicting with one another, and in order to
|
196 |
|
|
ensure that the proper lists are used for the initialization/finalization
|
197 |
|
|
of each individual shared library (respectively), we give these symbols
|
198 |
|
|
only internal (i.e. `static') linkage, and we also make it a point to
|
199 |
|
|
refer to only the __CTOR_END__ symbol in crtend.o and the __DTOR_LIST__
|
200 |
|
|
symbol in crtbegin.o, where they are defined. */
|
201 |
|
|
|
202 |
|
|
/* No need for .ctors/.dtors section if linker can place them in
|
203 |
|
|
.init_array/.fini_array section. */
|
204 |
|
|
#ifndef USE_INITFINI_ARRAY
|
205 |
|
|
/* The -1 is a flag to __do_global_[cd]tors indicating that this table
|
206 |
|
|
does not start with a count of elements. */
|
207 |
|
|
#ifdef CTOR_LIST_BEGIN
|
208 |
|
|
CTOR_LIST_BEGIN;
|
209 |
|
|
#elif defined(CTORS_SECTION_ASM_OP)
|
210 |
|
|
/* Hack: force cc1 to switch to .data section early, so that assembling
|
211 |
|
|
__CTOR_LIST__ does not undo our behind-the-back change to .ctors. */
|
212 |
|
|
static func_ptr force_to_data[1] __attribute__ ((__used__)) = { };
|
213 |
|
|
asm (CTORS_SECTION_ASM_OP);
|
214 |
|
|
STATIC func_ptr __CTOR_LIST__[1]
|
215 |
|
|
__attribute__ ((__used__, aligned(sizeof(func_ptr))))
|
216 |
|
|
= { (func_ptr) (-1) };
|
217 |
|
|
#else
|
218 |
|
|
STATIC func_ptr __CTOR_LIST__[1]
|
219 |
|
|
__attribute__ ((__used__, section(".ctors"), aligned(sizeof(func_ptr))))
|
220 |
|
|
= { (func_ptr) (-1) };
|
221 |
|
|
#endif /* __CTOR_LIST__ alternatives */
|
222 |
|
|
|
223 |
|
|
#ifdef DTOR_LIST_BEGIN
|
224 |
|
|
DTOR_LIST_BEGIN;
|
225 |
|
|
#elif defined(DTORS_SECTION_ASM_OP)
|
226 |
|
|
asm (DTORS_SECTION_ASM_OP);
|
227 |
|
|
STATIC func_ptr __DTOR_LIST__[1]
|
228 |
|
|
__attribute__ ((aligned(sizeof(func_ptr))))
|
229 |
|
|
= { (func_ptr) (-1) };
|
230 |
|
|
#else
|
231 |
|
|
STATIC func_ptr __DTOR_LIST__[1]
|
232 |
|
|
__attribute__((section(".dtors"), aligned(sizeof(func_ptr))))
|
233 |
|
|
= { (func_ptr) (-1) };
|
234 |
|
|
#endif /* __DTOR_LIST__ alternatives */
|
235 |
|
|
#endif /* USE_INITFINI_ARRAY */
|
236 |
|
|
|
237 |
|
|
#ifdef USE_EH_FRAME_REGISTRY
|
238 |
|
|
/* Stick a label at the beginning of the frame unwind info so we can register
|
239 |
|
|
and deregister it with the exception handling library code. */
|
240 |
|
|
STATIC EH_FRAME_SECTION_CONST char __EH_FRAME_BEGIN__[]
|
241 |
|
|
__attribute__((section(EH_FRAME_SECTION_NAME), aligned(4)))
|
242 |
|
|
= { };
|
243 |
|
|
#endif /* USE_EH_FRAME_REGISTRY */
|
244 |
|
|
|
245 |
|
|
#ifdef JCR_SECTION_NAME
|
246 |
|
|
/* Stick a label at the beginning of the java class registration info
|
247 |
|
|
so we can register them properly. */
|
248 |
|
|
STATIC void *__JCR_LIST__[]
|
249 |
|
|
__attribute__ ((used, section(JCR_SECTION_NAME), aligned(sizeof(void*))))
|
250 |
|
|
= { };
|
251 |
|
|
#endif /* JCR_SECTION_NAME */
|
252 |
|
|
|
253 |
|
|
#if USE_TM_CLONE_REGISTRY
|
254 |
|
|
STATIC func_ptr __TMC_LIST__[]
|
255 |
|
|
__attribute__((used, section(".tm_clone_table"), aligned(sizeof(void*))))
|
256 |
|
|
= { };
|
257 |
|
|
# ifdef HAVE_GAS_HIDDEN
|
258 |
|
|
extern func_ptr __TMC_END__[] __attribute__((__visibility__ ("hidden")));
|
259 |
|
|
# endif
|
260 |
|
|
|
261 |
|
|
static inline void
|
262 |
|
|
deregister_tm_clones (void)
|
263 |
|
|
{
|
264 |
|
|
void (*fn) (void *);
|
265 |
|
|
|
266 |
|
|
#ifdef HAVE_GAS_HIDDEN
|
267 |
|
|
if (__TMC_END__ - __TMC_LIST__ == 0)
|
268 |
|
|
return;
|
269 |
|
|
#else
|
270 |
|
|
if (__TMC_LIST__[0] == NULL)
|
271 |
|
|
return;
|
272 |
|
|
#endif
|
273 |
|
|
|
274 |
|
|
fn = _ITM_deregisterTMCloneTable;
|
275 |
|
|
__asm ("" : "+r" (fn));
|
276 |
|
|
if (fn)
|
277 |
|
|
fn (__TMC_LIST__);
|
278 |
|
|
}
|
279 |
|
|
|
280 |
|
|
static inline void
|
281 |
|
|
register_tm_clones (void)
|
282 |
|
|
{
|
283 |
|
|
void (*fn) (void *, size_t);
|
284 |
|
|
size_t size;
|
285 |
|
|
|
286 |
|
|
#ifdef HAVE_GAS_HIDDEN
|
287 |
|
|
size = (__TMC_END__ - __TMC_LIST__) / 2;
|
288 |
|
|
#else
|
289 |
|
|
for (size = 0; __TMC_LIST__[size * 2] != NULL; size++)
|
290 |
|
|
continue;
|
291 |
|
|
#endif
|
292 |
|
|
if (size == 0)
|
293 |
|
|
return;
|
294 |
|
|
|
295 |
|
|
fn = _ITM_registerTMCloneTable;
|
296 |
|
|
__asm ("" : "+r" (fn));
|
297 |
|
|
if (fn)
|
298 |
|
|
fn (__TMC_LIST__, size);
|
299 |
|
|
}
|
300 |
|
|
#endif /* USE_TM_CLONE_REGISTRY */
|
301 |
|
|
|
302 |
|
|
#if defined(INIT_SECTION_ASM_OP) || defined(INIT_ARRAY_SECTION_ASM_OP)
|
303 |
|
|
|
304 |
|
|
#ifdef OBJECT_FORMAT_ELF
|
305 |
|
|
|
306 |
|
|
/* Declare the __dso_handle variable. It should have a unique value
|
307 |
|
|
in every shared-object; in a main program its value is zero. The
|
308 |
|
|
object should in any case be protected. This means the instance
|
309 |
|
|
in one DSO or the main program is not used in another object. The
|
310 |
|
|
dynamic linker takes care of this. */
|
311 |
|
|
|
312 |
|
|
#ifdef TARGET_LIBGCC_SDATA_SECTION
|
313 |
|
|
extern void *__dso_handle __attribute__ ((__section__ (TARGET_LIBGCC_SDATA_SECTION)));
|
314 |
|
|
#endif
|
315 |
|
|
#ifdef HAVE_GAS_HIDDEN
|
316 |
|
|
extern void *__dso_handle __attribute__ ((__visibility__ ("hidden")));
|
317 |
|
|
#endif
|
318 |
|
|
#ifdef CRTSTUFFS_O
|
319 |
|
|
void *__dso_handle = &__dso_handle;
|
320 |
|
|
#else
|
321 |
|
|
void *__dso_handle = 0;
|
322 |
|
|
#endif
|
323 |
|
|
|
324 |
|
|
/* The __cxa_finalize function may not be available so we use only a
|
325 |
|
|
weak declaration. */
|
326 |
|
|
extern void __cxa_finalize (void *) TARGET_ATTRIBUTE_WEAK;
|
327 |
|
|
|
328 |
|
|
/* Run all the global destructors on exit from the program. */
|
329 |
|
|
|
330 |
|
|
/* Some systems place the number of pointers in the first word of the
|
331 |
|
|
table. On SVR4 however, that word is -1. In all cases, the table is
|
332 |
|
|
null-terminated. On SVR4, we start from the beginning of the list and
|
333 |
|
|
invoke each per-compilation-unit destructor routine in order
|
334 |
|
|
until we find that null.
|
335 |
|
|
|
336 |
|
|
Note that this function MUST be static. There will be one of these
|
337 |
|
|
functions in each root executable and one in each shared library, but
|
338 |
|
|
although they all have the same code, each one is unique in that it
|
339 |
|
|
refers to one particular associated `__DTOR_LIST__' which belongs to the
|
340 |
|
|
same particular root executable or shared library file.
|
341 |
|
|
|
342 |
|
|
On some systems, this routine is run more than once from the .fini,
|
343 |
|
|
when exit is called recursively, so we arrange to remember where in
|
344 |
|
|
the list we left off processing, and we resume at that point,
|
345 |
|
|
should we be re-invoked. */
|
346 |
|
|
|
347 |
|
|
static void __attribute__((used))
|
348 |
|
|
__do_global_dtors_aux (void)
|
349 |
|
|
{
|
350 |
|
|
static _Bool completed;
|
351 |
|
|
|
352 |
|
|
if (__builtin_expect (completed, 0))
|
353 |
|
|
return;
|
354 |
|
|
|
355 |
|
|
#ifdef CRTSTUFFS_O
|
356 |
|
|
if (__cxa_finalize)
|
357 |
|
|
__cxa_finalize (__dso_handle);
|
358 |
|
|
#endif
|
359 |
|
|
|
360 |
|
|
#ifdef FINI_ARRAY_SECTION_ASM_OP
|
361 |
|
|
/* If we are using .fini_array then destructors will be run via that
|
362 |
|
|
mechanism. */
|
363 |
|
|
#elif defined(HIDDEN_DTOR_LIST_END)
|
364 |
|
|
{
|
365 |
|
|
/* Safer version that makes sure only .dtors function pointers are
|
366 |
|
|
called even if the static variable is maliciously changed. */
|
367 |
|
|
extern func_ptr __DTOR_END__[] __attribute__((visibility ("hidden")));
|
368 |
|
|
static size_t dtor_idx;
|
369 |
|
|
const size_t max_idx = __DTOR_END__ - __DTOR_LIST__ - 1;
|
370 |
|
|
func_ptr f;
|
371 |
|
|
|
372 |
|
|
while (dtor_idx < max_idx)
|
373 |
|
|
{
|
374 |
|
|
f = __DTOR_LIST__[++dtor_idx];
|
375 |
|
|
f ();
|
376 |
|
|
}
|
377 |
|
|
}
|
378 |
|
|
#else /* !defined (FINI_ARRAY_SECTION_ASM_OP) */
|
379 |
|
|
{
|
380 |
|
|
static func_ptr *p = __DTOR_LIST__ + 1;
|
381 |
|
|
func_ptr f;
|
382 |
|
|
|
383 |
|
|
while ((f = *p))
|
384 |
|
|
{
|
385 |
|
|
p++;
|
386 |
|
|
f ();
|
387 |
|
|
}
|
388 |
|
|
}
|
389 |
|
|
#endif /* !defined(FINI_ARRAY_SECTION_ASM_OP) */
|
390 |
|
|
|
391 |
|
|
#if USE_TM_CLONE_REGISTRY
|
392 |
|
|
deregister_tm_clones ();
|
393 |
|
|
#endif /* USE_TM_CLONE_REGISTRY */
|
394 |
|
|
|
395 |
|
|
#ifdef USE_EH_FRAME_REGISTRY
|
396 |
|
|
#ifdef CRT_GET_RFIB_DATA
|
397 |
|
|
/* If we used the new __register_frame_info_bases interface,
|
398 |
|
|
make sure that we deregister from the same place. */
|
399 |
|
|
if (__deregister_frame_info_bases)
|
400 |
|
|
__deregister_frame_info_bases (__EH_FRAME_BEGIN__);
|
401 |
|
|
#else
|
402 |
|
|
if (__deregister_frame_info)
|
403 |
|
|
__deregister_frame_info (__EH_FRAME_BEGIN__);
|
404 |
|
|
#endif
|
405 |
|
|
#endif
|
406 |
|
|
|
407 |
|
|
completed = 1;
|
408 |
|
|
}
|
409 |
|
|
|
410 |
|
|
/* Stick a call to __do_global_dtors_aux into the .fini section. */
|
411 |
|
|
#ifdef FINI_SECTION_ASM_OP
|
412 |
|
|
CRT_CALL_STATIC_FUNCTION (FINI_SECTION_ASM_OP, __do_global_dtors_aux)
|
413 |
|
|
#elif defined (FINI_ARRAY_SECTION_ASM_OP)
|
414 |
|
|
static func_ptr __do_global_dtors_aux_fini_array_entry[]
|
415 |
|
|
__attribute__ ((__used__, section(".fini_array"), aligned(sizeof(func_ptr))))
|
416 |
|
|
= { __do_global_dtors_aux };
|
417 |
|
|
#else /* !FINI_SECTION_ASM_OP && !FINI_ARRAY_SECTION_ASM_OP */
|
418 |
|
|
static void __attribute__((used))
|
419 |
|
|
__do_global_dtors_aux_1 (void)
|
420 |
|
|
{
|
421 |
|
|
atexit (__do_global_dtors_aux);
|
422 |
|
|
}
|
423 |
|
|
CRT_CALL_STATIC_FUNCTION (INIT_SECTION_ASM_OP, __do_global_dtors_aux_1)
|
424 |
|
|
#endif
|
425 |
|
|
|
426 |
|
|
#if defined(USE_EH_FRAME_REGISTRY) \
|
427 |
|
|
|| defined(JCR_SECTION_NAME) \
|
428 |
|
|
|| defined(USE_TM_CLONE_REGISTRY)
|
429 |
|
|
/* Stick a call to __register_frame_info into the .init section. For some
|
430 |
|
|
reason calls with no arguments work more reliably in .init, so stick the
|
431 |
|
|
call in another function. */
|
432 |
|
|
|
433 |
|
|
static void __attribute__((used))
|
434 |
|
|
frame_dummy (void)
|
435 |
|
|
{
|
436 |
|
|
#ifdef USE_EH_FRAME_REGISTRY
|
437 |
|
|
static struct object object;
|
438 |
|
|
#ifdef CRT_GET_RFIB_DATA
|
439 |
|
|
void *tbase, *dbase;
|
440 |
|
|
tbase = 0;
|
441 |
|
|
CRT_GET_RFIB_DATA (dbase);
|
442 |
|
|
if (__register_frame_info_bases)
|
443 |
|
|
__register_frame_info_bases (__EH_FRAME_BEGIN__, &object, tbase, dbase);
|
444 |
|
|
#else
|
445 |
|
|
if (__register_frame_info)
|
446 |
|
|
__register_frame_info (__EH_FRAME_BEGIN__, &object);
|
447 |
|
|
#endif /* CRT_GET_RFIB_DATA */
|
448 |
|
|
#endif /* USE_EH_FRAME_REGISTRY */
|
449 |
|
|
|
450 |
|
|
#ifdef JCR_SECTION_NAME
|
451 |
|
|
if (__JCR_LIST__[0])
|
452 |
|
|
{
|
453 |
|
|
void (*register_classes) (void *) = _Jv_RegisterClasses;
|
454 |
|
|
__asm ("" : "+r" (register_classes));
|
455 |
|
|
if (register_classes)
|
456 |
|
|
register_classes (__JCR_LIST__);
|
457 |
|
|
}
|
458 |
|
|
#endif /* JCR_SECTION_NAME */
|
459 |
|
|
|
460 |
|
|
#if USE_TM_CLONE_REGISTRY
|
461 |
|
|
register_tm_clones ();
|
462 |
|
|
#endif /* USE_TM_CLONE_REGISTRY */
|
463 |
|
|
}
|
464 |
|
|
|
465 |
|
|
#ifdef INIT_SECTION_ASM_OP
|
466 |
|
|
CRT_CALL_STATIC_FUNCTION (INIT_SECTION_ASM_OP, frame_dummy)
|
467 |
|
|
#else /* defined(INIT_SECTION_ASM_OP) */
|
468 |
|
|
static func_ptr __frame_dummy_init_array_entry[]
|
469 |
|
|
__attribute__ ((__used__, section(".init_array"), aligned(sizeof(func_ptr))))
|
470 |
|
|
= { frame_dummy };
|
471 |
|
|
#endif /* !defined(INIT_SECTION_ASM_OP) */
|
472 |
|
|
#endif /* USE_EH_FRAME_REGISTRY || JCR_SECTION_NAME || USE_TM_CLONE_REGISTRY */
|
473 |
|
|
|
474 |
|
|
#else /* OBJECT_FORMAT_ELF */
|
475 |
|
|
|
476 |
|
|
/* The function __do_global_ctors_aux is compiled twice (once in crtbegin.o
|
477 |
|
|
and once in crtend.o). It must be declared static to avoid a link
|
478 |
|
|
error. Here, we define __do_global_ctors as an externally callable
|
479 |
|
|
function. It is externally callable so that __main can invoke it when
|
480 |
|
|
INVOKE__main is defined. This has the additional effect of forcing cc1
|
481 |
|
|
to switch to the .text section. */
|
482 |
|
|
|
483 |
|
|
static void __do_global_ctors_aux (void);
|
484 |
|
|
void
|
485 |
|
|
__do_global_ctors (void)
|
486 |
|
|
{
|
487 |
|
|
#ifdef INVOKE__main
|
488 |
|
|
/* If __main won't actually call __do_global_ctors then it doesn't matter
|
489 |
|
|
what's inside the function. The inside of __do_global_ctors_aux is
|
490 |
|
|
called automatically in that case. And the Alliant fx2800 linker
|
491 |
|
|
crashes on this reference. So prevent the crash. */
|
492 |
|
|
__do_global_ctors_aux ();
|
493 |
|
|
#endif
|
494 |
|
|
}
|
495 |
|
|
|
496 |
|
|
asm (INIT_SECTION_ASM_OP); /* cc1 doesn't know that we are switching! */
|
497 |
|
|
|
498 |
|
|
/* A routine to invoke all of the global constructors upon entry to the
|
499 |
|
|
program. We put this into the .init section (for systems that have
|
500 |
|
|
such a thing) so that we can properly perform the construction of
|
501 |
|
|
file-scope static-storage C++ objects within shared libraries. */
|
502 |
|
|
|
503 |
|
|
static void __attribute__((used))
|
504 |
|
|
__do_global_ctors_aux (void) /* prologue goes in .init section */
|
505 |
|
|
{
|
506 |
|
|
FORCE_CODE_SECTION_ALIGN /* explicit align before switch to .text */
|
507 |
|
|
asm (TEXT_SECTION_ASM_OP); /* don't put epilogue and body in .init */
|
508 |
|
|
DO_GLOBAL_CTORS_BODY;
|
509 |
|
|
atexit (__do_global_dtors);
|
510 |
|
|
}
|
511 |
|
|
|
512 |
|
|
#endif /* OBJECT_FORMAT_ELF */
|
513 |
|
|
|
514 |
|
|
#elif defined(HAS_INIT_SECTION) /* ! INIT_SECTION_ASM_OP */
|
515 |
|
|
|
516 |
|
|
extern void __do_global_dtors (void);
|
517 |
|
|
|
518 |
|
|
/* This case is used by the Irix 6 port, which supports named sections but
|
519 |
|
|
not an SVR4-style .fini section. __do_global_dtors can be non-static
|
520 |
|
|
in this case because we protect it with -hidden_symbol. */
|
521 |
|
|
|
522 |
|
|
void
|
523 |
|
|
__do_global_dtors (void)
|
524 |
|
|
{
|
525 |
|
|
func_ptr *p, f;
|
526 |
|
|
for (p = __DTOR_LIST__ + 1; (f = *p); p++)
|
527 |
|
|
f ();
|
528 |
|
|
|
529 |
|
|
#if USE_TM_CLONE_REGISTRY
|
530 |
|
|
deregister_tm_clones ();
|
531 |
|
|
#endif /* USE_TM_CLONE_REGISTRY */
|
532 |
|
|
|
533 |
|
|
#ifdef USE_EH_FRAME_REGISTRY
|
534 |
|
|
if (__deregister_frame_info)
|
535 |
|
|
__deregister_frame_info (__EH_FRAME_BEGIN__);
|
536 |
|
|
#endif
|
537 |
|
|
}
|
538 |
|
|
|
539 |
|
|
#if defined(USE_EH_FRAME_REGISTRY) \
|
540 |
|
|
|| defined(JCR_SECTION_NAME) \
|
541 |
|
|
|| defined(USE_TM_CLONE_REGISTRY)
|
542 |
|
|
/* A helper function for __do_global_ctors, which is in crtend.o. Here
|
543 |
|
|
in crtbegin.o, we can reference a couple of symbols not visible there.
|
544 |
|
|
Plus, since we're before libgcc.a, we have no problems referencing
|
545 |
|
|
functions from there. */
|
546 |
|
|
void
|
547 |
|
|
__do_global_ctors_1(void)
|
548 |
|
|
{
|
549 |
|
|
#ifdef USE_EH_FRAME_REGISTRY
|
550 |
|
|
static struct object object;
|
551 |
|
|
if (__register_frame_info)
|
552 |
|
|
__register_frame_info (__EH_FRAME_BEGIN__, &object);
|
553 |
|
|
#endif
|
554 |
|
|
|
555 |
|
|
#ifdef JCR_SECTION_NAME
|
556 |
|
|
if (__JCR_LIST__[0])
|
557 |
|
|
{
|
558 |
|
|
void (*register_classes) (void *) = _Jv_RegisterClasses;
|
559 |
|
|
__asm ("" : "+r" (register_classes));
|
560 |
|
|
if (register_classes)
|
561 |
|
|
register_classes (__JCR_LIST__);
|
562 |
|
|
}
|
563 |
|
|
#endif
|
564 |
|
|
|
565 |
|
|
#if USE_TM_CLONE_REGISTRY
|
566 |
|
|
register_tm_clones ();
|
567 |
|
|
#endif /* USE_TM_CLONE_REGISTRY */
|
568 |
|
|
}
|
569 |
|
|
#endif /* USE_EH_FRAME_REGISTRY || JCR_SECTION_NAME || USE_TM_CLONE_REGISTRY */
|
570 |
|
|
|
571 |
|
|
#else /* ! INIT_SECTION_ASM_OP && ! HAS_INIT_SECTION */
|
572 |
|
|
#error "What are you doing with crtstuff.c, then?"
|
573 |
|
|
#endif
|
574 |
|
|
|
575 |
|
|
#elif defined(CRT_END) /* ! CRT_BEGIN */
|
576 |
|
|
|
577 |
|
|
/* No need for .ctors/.dtors section if linker can place them in
|
578 |
|
|
.init_array/.fini_array section. */
|
579 |
|
|
#ifndef USE_INITFINI_ARRAY
|
580 |
|
|
/* Put a word containing zero at the end of each of our two lists of function
|
581 |
|
|
addresses. Note that the words defined here go into the .ctors and .dtors
|
582 |
|
|
sections of the crtend.o file, and since that file is always linked in
|
583 |
|
|
last, these words naturally end up at the very ends of the two lists
|
584 |
|
|
contained in these two sections. */
|
585 |
|
|
|
586 |
|
|
#ifdef CTOR_LIST_END
|
587 |
|
|
CTOR_LIST_END;
|
588 |
|
|
#elif defined(CTORS_SECTION_ASM_OP)
|
589 |
|
|
/* Hack: force cc1 to switch to .data section early, so that assembling
|
590 |
|
|
__CTOR_LIST__ does not undo our behind-the-back change to .ctors. */
|
591 |
|
|
static func_ptr force_to_data[1] __attribute__ ((__used__)) = { };
|
592 |
|
|
asm (CTORS_SECTION_ASM_OP);
|
593 |
|
|
STATIC func_ptr __CTOR_END__[1]
|
594 |
|
|
__attribute__((aligned(sizeof(func_ptr))))
|
595 |
|
|
= { (func_ptr) 0 };
|
596 |
|
|
#else
|
597 |
|
|
STATIC func_ptr __CTOR_END__[1]
|
598 |
|
|
__attribute__((section(".ctors"), aligned(sizeof(func_ptr))))
|
599 |
|
|
= { (func_ptr) 0 };
|
600 |
|
|
#endif
|
601 |
|
|
|
602 |
|
|
#ifdef DTOR_LIST_END
|
603 |
|
|
DTOR_LIST_END;
|
604 |
|
|
#elif defined(HIDDEN_DTOR_LIST_END)
|
605 |
|
|
#ifdef DTORS_SECTION_ASM_OP
|
606 |
|
|
asm (DTORS_SECTION_ASM_OP);
|
607 |
|
|
#endif
|
608 |
|
|
func_ptr __DTOR_END__[1]
|
609 |
|
|
__attribute__ ((used,
|
610 |
|
|
#ifndef DTORS_SECTION_ASM_OP
|
611 |
|
|
section(".dtors"),
|
612 |
|
|
#endif
|
613 |
|
|
aligned(sizeof(func_ptr)), visibility ("hidden")))
|
614 |
|
|
= { (func_ptr) 0 };
|
615 |
|
|
#elif defined(DTORS_SECTION_ASM_OP)
|
616 |
|
|
asm (DTORS_SECTION_ASM_OP);
|
617 |
|
|
STATIC func_ptr __DTOR_END__[1]
|
618 |
|
|
__attribute__ ((used, aligned(sizeof(func_ptr))))
|
619 |
|
|
= { (func_ptr) 0 };
|
620 |
|
|
#else
|
621 |
|
|
STATIC func_ptr __DTOR_END__[1]
|
622 |
|
|
__attribute__((used, section(".dtors"), aligned(sizeof(func_ptr))))
|
623 |
|
|
= { (func_ptr) 0 };
|
624 |
|
|
#endif
|
625 |
|
|
#endif /* USE_INITFINI_ARRAY */
|
626 |
|
|
|
627 |
|
|
#ifdef EH_FRAME_SECTION_NAME
|
628 |
|
|
/* Terminate the frame unwind info section with a 4byte 0 as a sentinel;
|
629 |
|
|
this would be the 'length' field in a real FDE. */
|
630 |
|
|
# if __INT_MAX__ == 2147483647
|
631 |
|
|
typedef int int32;
|
632 |
|
|
# elif __LONG_MAX__ == 2147483647
|
633 |
|
|
typedef long int32;
|
634 |
|
|
# elif __SHRT_MAX__ == 2147483647
|
635 |
|
|
typedef short int32;
|
636 |
|
|
# else
|
637 |
|
|
# error "Missing a 4 byte integer"
|
638 |
|
|
# endif
|
639 |
|
|
STATIC EH_FRAME_SECTION_CONST int32 __FRAME_END__[]
|
640 |
|
|
__attribute__ ((used, section(EH_FRAME_SECTION_NAME),
|
641 |
|
|
aligned(sizeof(int32))))
|
642 |
|
|
= { 0 };
|
643 |
|
|
#endif /* EH_FRAME_SECTION_NAME */
|
644 |
|
|
|
645 |
|
|
#ifdef JCR_SECTION_NAME
|
646 |
|
|
/* Null terminate the .jcr section array. */
|
647 |
|
|
STATIC void *__JCR_END__[1]
|
648 |
|
|
__attribute__ ((used, section(JCR_SECTION_NAME),
|
649 |
|
|
aligned(sizeof(void *))))
|
650 |
|
|
= { 0 };
|
651 |
|
|
#endif /* JCR_SECTION_NAME */
|
652 |
|
|
|
653 |
|
|
#if USE_TM_CLONE_REGISTRY
|
654 |
|
|
# ifndef HAVE_GAS_HIDDEN
|
655 |
|
|
static
|
656 |
|
|
# endif
|
657 |
|
|
func_ptr __TMC_END__[]
|
658 |
|
|
__attribute__((used, section(".tm_clone_table"), aligned(sizeof(void *))))
|
659 |
|
|
# ifdef HAVE_GAS_HIDDEN
|
660 |
|
|
__attribute__((__visibility__ ("hidden"))) = { };
|
661 |
|
|
# else
|
662 |
|
|
= { 0, 0 };
|
663 |
|
|
# endif
|
664 |
|
|
#endif /* USE_TM_CLONE_REGISTRY */
|
665 |
|
|
|
666 |
|
|
#ifdef INIT_ARRAY_SECTION_ASM_OP
|
667 |
|
|
|
668 |
|
|
/* If we are using .init_array, there is nothing to do. */
|
669 |
|
|
|
670 |
|
|
#elif defined(INIT_SECTION_ASM_OP)
|
671 |
|
|
|
672 |
|
|
#ifdef OBJECT_FORMAT_ELF
|
673 |
|
|
static void __attribute__((used))
|
674 |
|
|
__do_global_ctors_aux (void)
|
675 |
|
|
{
|
676 |
|
|
func_ptr *p;
|
677 |
|
|
for (p = __CTOR_END__ - 1; *p != (func_ptr) -1; p--)
|
678 |
|
|
(*p) ();
|
679 |
|
|
}
|
680 |
|
|
|
681 |
|
|
/* Stick a call to __do_global_ctors_aux into the .init section. */
|
682 |
|
|
CRT_CALL_STATIC_FUNCTION (INIT_SECTION_ASM_OP, __do_global_ctors_aux)
|
683 |
|
|
#else /* OBJECT_FORMAT_ELF */
|
684 |
|
|
|
685 |
|
|
/* Stick the real initialization code, followed by a normal sort of
|
686 |
|
|
function epilogue at the very end of the .init section for this
|
687 |
|
|
entire root executable file or for this entire shared library file.
|
688 |
|
|
|
689 |
|
|
Note that we use some tricks here to get *just* the body and just
|
690 |
|
|
a function epilogue (but no function prologue) into the .init
|
691 |
|
|
section of the crtend.o file. Specifically, we switch to the .text
|
692 |
|
|
section, start to define a function, and then we switch to the .init
|
693 |
|
|
section just before the body code.
|
694 |
|
|
|
695 |
|
|
Earlier on, we put the corresponding function prologue into the .init
|
696 |
|
|
section of the crtbegin.o file (which will be linked in first).
|
697 |
|
|
|
698 |
|
|
Note that we want to invoke all constructors for C++ file-scope static-
|
699 |
|
|
storage objects AFTER any other possible initialization actions which
|
700 |
|
|
may be performed by the code in the .init section contributions made by
|
701 |
|
|
other libraries, etc. That's because those other initializations may
|
702 |
|
|
include setup operations for very primitive things (e.g. initializing
|
703 |
|
|
the state of the floating-point coprocessor, etc.) which should be done
|
704 |
|
|
before we start to execute any of the user's code. */
|
705 |
|
|
|
706 |
|
|
static void
|
707 |
|
|
__do_global_ctors_aux (void) /* prologue goes in .text section */
|
708 |
|
|
{
|
709 |
|
|
asm (INIT_SECTION_ASM_OP);
|
710 |
|
|
DO_GLOBAL_CTORS_BODY;
|
711 |
|
|
atexit (__do_global_dtors);
|
712 |
|
|
} /* epilogue and body go in .init section */
|
713 |
|
|
|
714 |
|
|
FORCE_CODE_SECTION_ALIGN
|
715 |
|
|
asm (TEXT_SECTION_ASM_OP);
|
716 |
|
|
|
717 |
|
|
#endif /* OBJECT_FORMAT_ELF */
|
718 |
|
|
|
719 |
|
|
#elif defined(HAS_INIT_SECTION) /* ! INIT_SECTION_ASM_OP */
|
720 |
|
|
|
721 |
|
|
extern void __do_global_ctors (void);
|
722 |
|
|
|
723 |
|
|
/* This case is used by the Irix 6 port, which supports named sections but
|
724 |
|
|
not an SVR4-style .init section. __do_global_ctors can be non-static
|
725 |
|
|
in this case because we protect it with -hidden_symbol. */
|
726 |
|
|
void
|
727 |
|
|
__do_global_ctors (void)
|
728 |
|
|
{
|
729 |
|
|
func_ptr *p;
|
730 |
|
|
#if defined(USE_EH_FRAME_REGISTRY) \
|
731 |
|
|
|| defined(JCR_SECTION_NAME) \
|
732 |
|
|
|| defined(USE_TM_CLONE_REGISTRY)
|
733 |
|
|
__do_global_ctors_1();
|
734 |
|
|
#endif
|
735 |
|
|
for (p = __CTOR_END__ - 1; *p != (func_ptr) -1; p--)
|
736 |
|
|
(*p) ();
|
737 |
|
|
}
|
738 |
|
|
|
739 |
|
|
#else /* ! INIT_SECTION_ASM_OP && ! HAS_INIT_SECTION */
|
740 |
|
|
#error "What are you doing with crtstuff.c, then?"
|
741 |
|
|
#endif
|
742 |
|
|
|
743 |
|
|
#else /* ! CRT_BEGIN && ! CRT_END */
|
744 |
|
|
#error "One of CRT_BEGIN or CRT_END must be defined."
|
745 |
|
|
#endif
|