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/cdefs.h> 25__FBSDID("$FreeBSD$"); 26 27#include <sys/param.h> 28 29#include "crt.h" 30 31typedef void (*crt_func)(void); 32 33extern void *__dso_handle __hidden; 34 35#ifndef SHARED 36void *__dso_handle = 0; 37#else 38void *__dso_handle = &__dso_handle; 39void __cxa_finalize(void *) __weak_symbol; 40 41/* 42 * Call __cxa_finalize with the dso handle in shared objects. 43 * When we have ctors/dtors call from the dtor handler before calling 44 * any dtors, otherwise use a destructor. 45 */ 46#ifndef HAVE_CTORS 47__attribute__((destructor)) 48#endif 49static void 50run_cxa_finalize(void) 51{ 52 53 if (__cxa_finalize != NULL) 54 __cxa_finalize(__dso_handle); 55} 56#endif 57 58/* 59 * On some architectures and toolchains we may need to call the .dtors. 60 * These are called in the order they are in the ELF file. 61 */ 62#ifdef HAVE_CTORS 63static void __do_global_dtors_aux(void) __used; 64 65static crt_func __CTOR_LIST__[] __section(".ctors") __used = { 66 (crt_func)-1 67}; 68static crt_func __DTOR_LIST__[] __section(".dtors") __used = { 69 (crt_func)-1 70}; 71 72static void 73__do_global_dtors_aux(void) 74{ 75 crt_func fn; 76 int n; 77 78#ifdef SHARED 79 run_cxa_finalize(); 80#endif 81 82 for (n = 1;; n++) { 83 fn = __DTOR_LIST__[n]; 84 if (fn == (crt_func)0 || fn == (crt_func)-1) 85 break; 86 fn(); 87 } 88} 89 90asm ( 91 ".pushsection .fini \n" 92 "\t" INIT_CALL_SEQ(__do_global_dtors_aux) "\n" 93 ".popsection \n" 94); 95#endif 96 97/* 98 * Handler for gcj. These provide a _Jv_RegisterClasses function and fill 99 * out the .jcr section. We just need to call this function with a pointer 100 * to the appropriate section. 101 */ 102extern void _Jv_RegisterClasses(void *) __weak_symbol; 103static void register_classes(void) __used; 104 105static crt_func __JCR_LIST__[] __section(".jcr") __used = { }; 106 107#ifndef CTORS_CONSTRUCTORS 108__attribute__((constructor)) 109#endif 110static void 111register_classes(void) 112{ 113 114 if (_Jv_RegisterClasses != NULL && __JCR_LIST__[0] != 0) 115 _Jv_RegisterClasses(__JCR_LIST__); 116} 117 118/* 119 * We can't use constructors when they use the .ctors section as they may be 120 * placed before __CTOR_LIST__. 121 */ 122#ifdef CTORS_CONSTRUCTORS 123asm ( 124 ".pushsection .init \n" 125 "\t" INIT_CALL_SEQ(register_classes) "\n" 126 ".popsection \n" 127); 128#endif 129