Home | History | Annotate | Line # | Download | only in misc 
      1 /*-
      2  * Copyright (c) 2013 The NetBSD Foundation, Inc.
      3  * All rights reserved.
      4  *
      5  * This code is derived from software contributed to The NetBSD Foundation
      6  * by Matt Thomas of 3am Software Foundry.
      7  *
      8  * Redistribution and use in source and binary forms, with or without
      9  * modification, are permitted provided that the following conditions
     10  * are met:
     11  * 1. Redistributions of source code must retain the above copyright
     12  *    notice, this list of conditions and the following disclaimer.
     13  * 2. Redistributions in binary form must reproduce the above copyright
     14  *    notice, this list of conditions and the following disclaimer in the
     15  *    documentation and/or other materials provided with the distribution.
     16  *
     17  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     18  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     19  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     20  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     21  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     22  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     23  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     24  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     25  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     26  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     27  * POSSIBILITY OF SUCH DAMAGE.
     28  */
     29 
     30 #include <sys/cdefs.h>
     31 
     32 __RCSID("$NetBSD: arm_initfini.c,v 1.10 2025/03/03 17:00:22 christos Exp $");
     33 
     34 #include "namespace.h"
     35 
     36 /*
     37  * To properly implement setjmp/longjmp for the ARM AAPCS ABI, it has to be
     38  * aware of whether there is a FPU is present or not.  Regardless of whether
     39  * the hard-float ABI is being used, setjmp needs to save D8-D15.  But it can
     40  * only do this if those instructions won't cause an exception.
     41  */
     42 
     43 #include <sys/param.h>
     44 #include <sys/sysctl.h>
     45 
     46 #include <stdbool.h>
     47 #include <string.h>
     48 #include <stddef.h>
     49 #include <stdlib.h>
     50 
     51 __dso_hidden int _libc_arm_fpu_present;
     52 #ifndef __ARM_ARCH_EXT_IDIV__
     53 __dso_hidden int _libc_arm_hwdiv_present;
     54 # define NENTRIES 2
     55 #else
     56 # define NENTRIES 1
     57 #endif
     58 
     59 static bool _libc_aapcs_initialized;
     60 
     61 void	_libc_aapcs_init(void) __attribute__((__constructor__, __used__));
     62 
     63 void __section(".text.startup")
     64 _libc_aapcs_init(void)
     65 {
     66 	if (_libc_aapcs_initialized)
     67 		return;
     68 
     69 	struct sysctlnode query, md[64];
     70 	int mib[2];
     71 	size_t len, mlen = sizeof(_libc_arm_fpu_present), nentries = 0;
     72 
     73 	_libc_aapcs_initialized = true;
     74 	mib[0] = CTL_MACHDEP;
     75 	mib[1] = CTL_QUERY;
     76 	memset(&query, 0, sizeof(query));
     77 	query.sysctl_flags = SYSCTL_VERSION;
     78 	len = sizeof(md);
     79 	if (sysctl(mib, 2, md, &len, &query, sizeof(query)) == -1)
     80 		return;
     81 
     82 	for (size_t i = 0; i < len / sizeof(md[0]); i++) {
     83 		if (strcmp(md[i].sysctl_name, "fpu_present") == 0) {
     84 			mib[1] = md[i].sysctl_num;
     85 			(void)sysctl(mib, 2, &_libc_arm_fpu_present, &mlen,
     86 			    NULL, 0);
     87 			nentries++;
     88 
     89 		}
     90 #ifndef __ARM_ARCH_EXT_IDIV__
     91 		else if (strcmp(md[i].sysctl_name, "hwdiv_present") == 0) {
     92 			mib[1] = md[i].sysctl_num;
     93 			(void)sysctl(mib, 2, &_libc_arm_hwdiv_present, &mlen,
     94 			    NULL, 0);
     95 			nentries++;
     96 		}
     97 #endif
     98 		if (nentries >= NENTRIES)
     99 			return;
    100 	}
    101 }
    102