1 /* Frv initialization file linked before all user modules
2 Copyright (C) 1999, 2000, 2003 Free Software Foundation, Inc.
3 Contributed by Red Hat, Inc.
5 This file is part of GCC.
7 GCC 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 2, or (at your option)
12 GCC 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.
17 You should have received a copy of the GNU General Public License
18 along with GCC; see the file COPYING. If not, write to
19 the Free Software Foundation, 59 Temple Place - Suite 330,
20 Boston, MA 02111-1307, USA.
22 This file was originally taken from the file crtstuff.c in the
23 main compiler directory, and simplified. */
25 /* As a special exception, if you link this library with other files,
26 some of which are compiled with GCC, to produce an executable,
27 this library does not by itself cause the resulting executable
28 to be covered by the GNU General Public License.
29 This exception does not however invalidate any other reasons why
30 the executable file might be covered by the GNU General Public License. */
34 #include "unwind-dw2-fde.h"
35 #include "gbl-ctors.h"
37 /* Declare a pointer to void function type. */
40 #ifdef __FRV_UNDERSCORE__
41 #define UNDERSCORE "_"
46 #define INIT_SECTION_NEG_ONE(SECTION, FLAGS, NAME) \
47 __asm__ (".section " SECTION "," FLAGS "\n\t" \
48 ".globl " UNDERSCORE NAME "\n\t" \
49 ".type " UNDERSCORE NAME ",@object\n\t" \
51 UNDERSCORE NAME ":\n\t" \
55 #define INIT_SECTION(SECTION, FLAGS, NAME) \
56 __asm__ (".section " SECTION "," FLAGS "\n\t" \
57 ".globl " UNDERSCORE NAME "\n\t" \
58 ".type " UNDERSCORE NAME ",@object\n\t" \
60 UNDERSCORE NAME ":\n\t" \
63 /* Beginning of .ctor/.dtor sections that provides a list of constructors and
64 destructors to run. */
66 INIT_SECTION_NEG_ONE (".ctors", "\"aw\"", "__CTOR_LIST__");
67 INIT_SECTION_NEG_ONE (".dtors", "\"aw\"", "__DTOR_LIST__");
69 /* Beginning of .eh_frame section that provides all of the exception handling
72 INIT_SECTION (".eh_frame", "\"aw\"", "__EH_FRAME_BEGIN__");
74 /* Beginning of .rofixup section that provides a list of pointers that we
77 INIT_SECTION (".rofixup", "\"a\"", "__ROFIXUP_LIST__");
79 extern void __frv_register_eh(void) __attribute__((__constructor__
));
80 extern void __frv_deregister_eh(void) __attribute__((__destructor__
));
82 extern func_ptr __EH_FRAME_BEGIN__
[];
84 /* Register the exception handling table as the first constructor */
86 __frv_register_eh (void)
88 static struct object object
;
89 if (__register_frame_info
)
90 __register_frame_info (__EH_FRAME_BEGIN__
, &object
);
93 /* Note, do not declare __{,de}register_frame_info weak as it seems
94 to interfere with the pic support. */
96 /* Unregister the exception handling table as a deconstructor */
98 __frv_deregister_eh (void)
100 static int completed
= 0;
105 if (__deregister_frame_info
)
106 __deregister_frame_info (__EH_FRAME_BEGIN__
);
111 /* Run the global destructors */
113 __do_global_dtors (void)
115 static func_ptr
*p
= __DTOR_LIST__
+ 1;
123 /* Run the global constructors */
125 __do_global_ctors (void)
127 unsigned long nptrs
= (unsigned long) __CTOR_LIST__
[0];
130 if (nptrs
== (unsigned long)-1)
131 for (nptrs
= 0; __CTOR_LIST__
[nptrs
+ 1] != 0; nptrs
++);
133 for (i
= nptrs
; i
>= 1; i
--)
136 atexit (__do_global_dtors
);
139 /* Subroutine called automatically by `main'.
140 Compiling a global function named `main'
141 produces an automatic call to this function at the beginning.
143 For many systems, this routine calls __do_global_ctors.
144 For systems which support a .init section we use the .init section
145 to run __do_global_ctors, so we need not do anything here. */
150 /* Support recursive calls to `main': run initializers just once. */
151 static int initialized
;
155 __do_global_ctors ();