Warning: This file is not a C or C++ file. It does not have highlighting.

1/* Machine-dependent ELF indirect relocation inline functions.
2 Version for S/390 32 and 64 bit.
3 Copyright (C) 2012-2022 Free Software Foundation, Inc.
4 This file is part of the GNU C Library.
5
6 The GNU C Library is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Lesser General Public
8 License as published by the Free Software Foundation; either
9 version 2.1 of the License, or (at your option) any later version.
10
11 The GNU C Library is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Lesser General Public License for more details.
15
16 You should have received a copy of the GNU Lesser General Public
17 License along with the GNU C Library; if not, see
18 <https://www.gnu.org/licenses/>. */
19
20#ifndef _DL_IREL_H
21#define _DL_IREL_H
22
23#include <stdio.h>
24#include <unistd.h>
25#include <ldsodefs.h>
26
27#define ELF_MACHINE_IRELA 1
28
29static inline ElfW(Addr)
30__attribute ((always_inline))
31elf_ifunc_invoke (ElfW(Addr) addr)
32{
33 return ((ElfW(Addr) (*) (unsigned long int)) (addr)) (GLRO(dl_hwcap));
34}
35
36static inline void
37__attribute ((always_inline))
38elf_irela (const ElfW(Rela) *reloc)
39{
40 ElfW(Addr) *const reloc_addr = (void *) reloc->r_offset;
41 const unsigned long int r_type = ELFW(R_TYPE) (reloc->r_info);
42
43 if (__glibc_likely (r_type == R_390_IRELATIVE))
44 {
45 ElfW(Addr) value = elf_ifunc_invoke(reloc->r_addend);
46 *reloc_addr = value;
47 }
48 else
49 __libc_fatal ("Unexpected reloc type in static binary.\n");
50}
51
52#endif /* dl-irel.h */
53

Warning: This file is not a C or C++ file. It does not have highlighting.

source code of glibc/sysdeps/s390/dl-irel.h