sysdeps/s390/dl-irel.h

   1 /* Machine-dependent ELF indirect relocation inline functions.
   2    Version for S/390 32 and 64 bit.
   3    Copyright (C) 2012-2021 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
  29 static inline ElfW(Addr)
  30 __attribute ((always_inline))
  31 elf_ifunc_invoke (ElfW(Addr) addr)
  32 {
  33   return ((ElfW(Addr) (*) (unsigned long int)) (addr)) (GLRO(dl_hwcap));
  34 }
  35
  36 static inline void
  37 __attribute ((always_inline))
  38 elf_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 */