xref: /freebsd/lib/libc/csu/powerpc64/reloc.c (revision 2a58b312)
1 /*-
2  * Copyright (c) 2019 Leandro Lupori
3  *
4  * Redistribution and use in source and binary forms, with or without
5  * modification, are permitted provided that the following conditions
6  * are met:
7  * 1. Redistributions of source code must retain the above copyright
8  *    notice, this list of conditions and the following disclaimer.
9  *
10  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
11  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
12  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
13  * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
14  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
15  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
16  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
17  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
18  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
19  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
20  * SUCH DAMAGE.
21  */
22 
23 #include <sys/cdefs.h>
24 __FBSDID("$FreeBSD$");
25 
26 static uint32_t cpu_features;
27 static uint32_t cpu_features2;
28 
29 static void
30 init_cpu_features(char **env)
31 {
32 	const Elf_Auxinfo *aux;
33 
34 	/* Find the auxiliary vector on the stack. */
35 	while (*env++ != 0)	/* Skip over environment, and NULL terminator */
36 		;
37 	aux = (const Elf_Auxinfo *)env;
38 
39 	/* Digest the auxiliary vector. */
40 	for (;  aux->a_type != AT_NULL; aux++) {
41 		switch (aux->a_type) {
42 		case AT_HWCAP:
43 			cpu_features = (uint32_t)aux->a_un.a_val;
44 			break;
45 		case AT_HWCAP2:
46 			cpu_features2 = (uint32_t)aux->a_un.a_val;
47 			break;
48 		}
49 	}
50 }
51 
52 static void
53 crt1_handle_rela(const Elf_Rela *r)
54 {
55 	typedef Elf_Addr (*ifunc_resolver_t)(
56 	    uint32_t, uint32_t, uint64_t, uint64_t,
57 	    uint64_t, uint64_t, uint64_t, uint64_t);
58 	Elf_Addr *ptr, *where, target;
59 
60 	switch (ELF_R_TYPE(r->r_info)) {
61 	case R_PPC_IRELATIVE:
62 		ptr = (Elf_Addr *)r->r_addend;
63 		where = (Elf_Addr *)r->r_offset;
64 		target = ((ifunc_resolver_t)ptr)(cpu_features, cpu_features2,
65 		    0, 0, 0, 0, 0, 0);
66 		*where = target;
67 		break;
68 	}
69 }
70