1 /*-
2 * SPDX-License-Identifier: BSD-1-Clause
3 *
4 * Copyright 2018 Andrew Turner
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 *
12 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
13 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
14 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
15 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
16 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
17 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
18 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
19 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
20 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
21 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
22 */
23
24 #include <sys/param.h>
25
26 #include "crt.h"
27
28 typedef void (*crt_func)(void);
29
30 extern void *__dso_handle __hidden;
31
32 #ifndef SHARED
33 void *__dso_handle = 0;
34 #else
35 void *__dso_handle = &__dso_handle;
36 void __cxa_finalize(void *) __weak_symbol;
37
38 /*
39 * Call __cxa_finalize with the dso handle in shared objects.
40 * When we have ctors/dtors call from the dtor handler before calling
41 * any dtors, otherwise use a destructor.
42 */
43 #ifndef HAVE_CTORS
44 __attribute__((destructor))
45 #endif
46 static void
run_cxa_finalize(void)47 run_cxa_finalize(void)
48 {
49
50 if (__cxa_finalize != NULL)
51 __cxa_finalize(__dso_handle);
52 }
53 #endif
54
55 /*
56 * On some architectures and toolchains we may need to call the .dtors.
57 * These are called in the order they are in the ELF file.
58 */
59 #ifdef HAVE_CTORS
60 static void __do_global_dtors_aux(void) __used;
61
62 static crt_func __CTOR_LIST__[] __section(".ctors") __used = {
63 (crt_func)-1
64 };
65 static crt_func __DTOR_LIST__[] __section(".dtors") __used = {
66 (crt_func)-1
67 };
68
69 static void
__do_global_dtors_aux(void)70 __do_global_dtors_aux(void)
71 {
72 crt_func fn;
73 int n;
74
75 #ifdef SHARED
76 run_cxa_finalize();
77 #endif
78
79 for (n = 1;; n++) {
80 fn = __DTOR_LIST__[n];
81 if (fn == (crt_func)0 || fn == (crt_func)-1)
82 break;
83 fn();
84 }
85 }
86
87 asm (
88 ".pushsection .fini \n"
89 "\t" INIT_CALL_SEQ(__do_global_dtors_aux) "\n"
90 ".popsection \n"
91 );
92 #endif
93
94 /*
95 * Handler for gcj. These provide a _Jv_RegisterClasses function and fill
96 * out the .jcr section. We just need to call this function with a pointer
97 * to the appropriate section.
98 */
99 extern void _Jv_RegisterClasses(void *) __weak_symbol;
100 static void register_classes(void) __used;
101
102 static crt_func __JCR_LIST__[] __section(".jcr") __used = { };
103
104 #ifndef CTORS_CONSTRUCTORS
105 __attribute__((constructor))
106 #endif
107 static void
register_classes(void)108 register_classes(void)
109 {
110
111 if (_Jv_RegisterClasses != NULL && __JCR_LIST__[0] != 0)
112 _Jv_RegisterClasses(__JCR_LIST__);
113 }
114
115 /*
116 * We can't use constructors when they use the .ctors section as they may be
117 * placed before __CTOR_LIST__.
118 */
119 #ifdef CTORS_CONSTRUCTORS
120 asm (
121 ".pushsection .init \n"
122 "\t" INIT_CALL_SEQ(register_classes) "\n"
123 ".popsection \n"
124 );
125 #endif
126