1 /*- 2 * Copyright (c) 2018 The FreeBSD Foundation 3 * 4 * This software was developed by Konstantin Belousov <kib@FreeBSD.org> 5 * under sponsorship from the FreeBSD Foundation. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 13 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 14 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 15 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 16 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 17 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 18 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 19 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 20 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 21 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 22 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 23 * SUCH DAMAGE. 24 */ 25 26 #include <sys/cdefs.h> 27 #include <machine/specialreg.h> 28 #include <machine/cpufunc.h> 29 30 static uint32_t cpu_feature, cpu_feature2; 31 static uint32_t cpu_stdext_feature, cpu_stdext_feature2; 32 33 static void 34 init_cpu_features(void) 35 { 36 u_int cpuid_supported, p[4]; 37 38 __asm __volatile( 39 " pushfl\n" 40 " popl %%eax\n" 41 " movl %%eax,%%ecx\n" 42 " xorl $0x200000,%%eax\n" 43 " pushl %%eax\n" 44 " popfl\n" 45 " pushfl\n" 46 " popl %%eax\n" 47 " xorl %%eax,%%ecx\n" 48 " je 1f\n" 49 " movl $1,%0\n" 50 " jmp 2f\n" 51 "1: movl $0,%0\n" 52 "2:\n" 53 : "=r" (cpuid_supported) : : "eax", "ecx", "cc"); 54 if (cpuid_supported) { 55 do_cpuid(1, p); 56 cpu_feature = p[3]; 57 cpu_feature2 = p[2]; 58 do_cpuid(0, p); 59 if (p[0] >= 7) { 60 cpuid_count(7, 0, p); 61 cpu_stdext_feature = p[1]; 62 cpu_stdext_feature2 = p[2]; 63 } else { 64 cpu_stdext_feature = 0; 65 cpu_stdext_feature2 = 0; 66 } 67 } else { 68 cpu_feature = 0; 69 cpu_feature2 = 0; 70 cpu_stdext_feature = 0; 71 cpu_stdext_feature2 = 0; 72 } 73 } 74 75 static void 76 crt1_handle_rel(const Elf_Rel *r) 77 { 78 Elf_Addr *where, target; 79 80 switch (ELF_R_TYPE(r->r_info)) { 81 case R_386_IRELATIVE: 82 where = (Elf_Addr *)r->r_offset; 83 target = ((Elf_Addr (*)(uint32_t, uint32_t, uint32_t, 84 uint32_t))*where)(cpu_feature, cpu_feature2, 85 cpu_stdext_feature, cpu_stdext_feature2); 86 *where = target; 87 break; 88 } 89 } 90