src/xelf.h

   1 /* Macros to enable writing native and generic ELF access code.
   2    Copyright (C) 2003 Red Hat, Inc.
   3    This file is part of Red Hat elfutils.
   4    Written by Ulrich Drepper <drepper@redhat.com>, 2003.
   5
   6    Red Hat elfutils is free software; you can redistribute it and/or modify
   7    it under the terms of the GNU General Public License as published by the
   8    Free Software Foundation; version 2 of the License.
   9
  10    Red Hat elfutils is distributed in the hope that it will be useful, but
  11    WITHOUT ANY WARRANTY; without even the implied warranty of
  12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13    General Public License for more details.
  14
  15    You should have received a copy of the GNU General Public License along
  16    with Red Hat elfutils; if not, write to the Free Software Foundation,
  17    Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301 USA.
  18
  19    Red Hat elfutils is an included package of the Open Invention Network.
  20    An included package of the Open Invention Network is a package for which
  21    Open Invention Network licensees cross-license their patents.  No patent
  22    license is granted, either expressly or impliedly, by designation as an
  23    included package.  Should you wish to participate in the Open Invention
  24    Network licensing program, please visit www.openinventionnetwork.com
  25    <http://www.openinventionnetwork.com>.  */
  26
  27 #ifdef HAVE_CONFIG_H
  28 # include <config.h>
  29 #endif
  30
  31 #include <libebl.h>
  32
  33
  34 /* By default the linker is handling all architectures.  But it can
  35    be configured to be a native-only linker.  */
  36 #if NATIVE_ELF == 32
  37 /* 32-bit only.  */
  38 # define XElf_Ehdr Elf32_Ehdr
  39 # define XElf_Shdr Elf32_Shdr
  40 # define XElf_Off Elf32_Off
  41 # define XElf_Addr Elf32_Addr
  42 # define XElf_Half Elf32_Half
  43 # define XElf_Word Elf32_Word
  44 # define XElf_Xword Elf32_Word
  45 # define XElf_Sxword Elf32_Sword
  46 # define XElf_Versym Elf32_Versym
  47 # define XElf_Sym Elf32_Sym
  48 # define XElf_Rel Elf32_Rel
  49 # define XElf_Rela Elf32_Rela
  50
  51 # define XElf_Ehdr_vardef(name) Elf32_Ehdr *name
  52 # define xelf_getehdr(elf, name) name = elf32_getehdr (elf)
  53 # define xelf_getehdr_copy(elf, name, copy) \
  54   (copy) = *(name = elf32_getehdr (elf))
  55 # define xelf_newehdr(elf, klass) elf32_newehdr (elf)
  56 # define xelf_update_ehdr(elf, ehdr) \
  57   /* nothing */ ((void) (elf), (void) (ehdr), 1)
  58
  59 # define xelf_getclass(elf) ELFCLASS32
  60
  61 # define XElf_Phdr_vardef(name) Elf32_Phdr *name
  62 # define xelf_newphdr(elf, n) elf32_newphdr (elf, n)
  63 # define xelf_getphdr(elf, idx, name) name = elf32_getphdr (elf) + idx
  64 # define xelf_getphdr_ptr(elf, idx, name) name = elf32_getphdr (elf) + idx
  65 # define xelf_update_phdr(elf, idx, phdr) \
  66   /* nothing */ ((void) (elf), (void) (idx), (void) (phdr), 1)
  67
  68 # define XElf_Shdr_vardef(name) Elf32_Shdr *name
  69 # define xelf_getshdr(scn, name) name = elf32_getshdr (scn)
  70 # define xelf_getshdr_copy(scn, name, copy) \
  71   (copy) = *(name = elf32_getshdr (scn))
  72 # define xelf_update_shdr(scn, shdr) \
  73   /* nothing */ ((void) (scn), (void) (shdr), 1)
  74
  75 # define XElf_Sym_vardef(name) Elf32_Sym *name
  76 # define xelf_getsym(data, idx, name) \
  77   name = &((Elf32_Sym *) (data)->d_buf)[idx]
  78 # define xelf_getsym_ptr(data, idx, name) \
  79   name = &((Elf32_Sym *) (data)->d_buf)[idx]
  80 # define xelf_getsymshndx(data, ndxdata, idx, name1, name2) \
  81   (name1 = &((Elf32_Sym *) ((data)->d_buf))[idx]);                            \
  82   name2 = (unlikely ((ndxdata) != NULL)                                       \
  83            ? ((Elf32_Word *) ((ndxdata)->d_buf))[idx] : 0)
  84 # define xelf_update_sym(data, idx, sym) \
  85   /* nothing */ ((void) (data), (void) (idx), (void) (sym), 1)
  86 # define xelf_update_symshndx(data, ndxdata, idx, name1, name2, datachanged) \
  87   if (datachanged)                                                            \
  88     ((Elf32_Sym *) ((data)->d_buf))[idx] = *name1;                            \
  89   if (unlikely (ndxdata != NULL))                                             \
  90     ((Elf32_Word *) ((ndxdata)->d_buf))[idx] = name2
  91
  92 # define XElf_Versym_vardef(name) Elf32_Versym name
  93 # define xelf_getversym_copy(data, idx, name) \
  94   (name = ((Elf32_Versym *) ((data)->d_buf))[idx], &name)
  95
  96 # define XElf_Dyn_vardef(name) Elf32_Dyn *name
  97 # define xelf_getdyn(data, idx, name) \
  98   name = &((Elf32_Dyn *) ((data)->d_buf))[idx]
  99 # define xelf_getdyn_ptr(data, idx, name) \
 100   name = &((Elf32_Dyn *) ((data)->d_buf))[idx]
 101 # define xelf_update_dyn(data, idx, name) \
 102   /* nothing */ ((void) (data), (void) (idx), (void) (name), 1)
 103
 104 # define XElf_Rel_vardef(name) Elf32_Rel *name
 105 # define xelf_getrel(data, idx, name) \
 106   name = &((Elf32_Rel *) ((data)->d_buf))[idx]
 107 # define xelf_getrel_ptr(data, idx, name) \
 108   name = &((Elf32_Rel *) ((data)->d_buf))[idx]
 109 # define xelf_update_rel(data, idx, name) \
 110   /* nothing */ ((void) (data), (void) (idx), (void) (name), 1)
 111
 112 # define XElf_Rela_vardef(name) Elf32_Rela *name
 113 # define xelf_getrela(data, idx, name) \
 114   name = &((Elf32_Rela *) ((data)->d_buf))[idx]
 115 # define xelf_getrela_ptr(data, idx, name) \
 116   name = &((Elf32_Rela *) ((data)->d_buf))[idx]
 117 # define xelf_update_rela(data, idx, name) \
 118   /* nothing */ ((void) (data), (void) (idx), (void) (name), 1)
 119
 120 # define XElf_Verdef_vardef(name) Elf32_Verdef *name
 121 # define xelf_getverdef(data, offset, name) \
 122   name = ((Elf32_Verdef *) ((char *) ((data)->d_buf) + (offset)))
 123
 124 # define XElf_Verdaux_vardef(name) Elf32_Verdaux *name
 125 # define xelf_getverdaux(data, offset, name) \
 126   name = ((Elf32_Verdaux *) ((char *) ((data)->d_buf) + (offset)))
 127
 128 # define XELF_ST_TYPE(info) ELF32_ST_TYPE (info)
 129 # define XELF_ST_BIND(info) ELF32_ST_BIND (info)
 130 # define XELF_ST_INFO(bind, type) ELF32_ST_INFO (bind, type)
 131 # define XELF_ST_VISIBILITY(info) ELF32_ST_VISIBILITY (info)
 132
 133 # define XELF_R_SYM(info) ELF32_R_SYM (info)
 134 # define XELF_R_TYPE(info) ELF32_R_TYPE (info)
 135 # define XELF_R_INFO(sym, type) ELF32_R_INFO (sym, type)
 136
 137 # define xelf_fsize(elf, type, cnt) \
 138   (__builtin_constant_p (type)                                                \
 139    ? ({ size_t fsize;                                                         \
 140         switch (type)                                                         \
 141           {                                                                   \
 142           case ELF_T_BYTE: fsize = 1; break;                                  \
 143           case ELF_T_ADDR: fsize = sizeof (Elf32_Addr); break;                \
 144           case ELF_T_DYN: fsize = sizeof (Elf32_Dyn); break;                  \
 145           case ELF_T_EHDR: fsize = sizeof (Elf32_Ehdr); break;                \
 146           case ELF_T_HALF: fsize = sizeof (Elf32_Half); break;                \
 147           case ELF_T_OFF: fsize = sizeof (Elf32_Off); break;                  \
 148           case ELF_T_PHDR: fsize = sizeof (Elf32_Phdr); break;                \
 149           case ELF_T_RELA: fsize = sizeof (Elf32_Rela); break;                \
 150           case ELF_T_REL: fsize = sizeof (Elf32_Rel); break;                  \
 151           case ELF_T_SHDR: fsize = sizeof (Elf32_Shdr); break;                \
 152           case ELF_T_SWORD: fsize = sizeof (Elf32_Sword); break;              \
 153           case ELF_T_SYM: fsize = sizeof (Elf32_Sym); break;                  \
 154           case ELF_T_WORD: fsize = sizeof (Elf32_Word); break;                \
 155           case ELF_T_XWORD: fsize = sizeof (Elf32_Xword); break;              \
 156           case ELF_T_SXWORD: fsize = sizeof (Elf32_Sxword); break;            \
 157           case ELF_T_VDEF: fsize = sizeof (Elf32_Verdef); break;              \
 158           case ELF_T_VDAUX: fsize = sizeof (Elf32_Verdaux); break;            \
 159           case ELF_T_VNEED: fsize = sizeof (Elf32_Verneed); break;            \
 160           case ELF_T_VNAUX: fsize = sizeof (Elf32_Vernaux); break;            \
 161           case ELF_T_NHDR: fsize = sizeof (Elf32_Nhdr); break;                \
 162           case ELF_T_SYMINFO: fsize = sizeof (Elf32_Syminfo); break;          \
 163           case ELF_T_MOVE: fsize = sizeof (Elf32_Move); break;                \
 164           default: fsize = 0; break;                                          \
 165           }                                                                   \
 166         fsize * (cnt); })                                                     \
 167    : gelf_fsize (elf, type, cnt, EV_CURRENT))
 168 #elif NATIVE_ELF == 64
 169 /* 64-bit only.  */
 170 # define XElf_Ehdr Elf64_Ehdr
 171 # define XElf_Shdr Elf64_Shdr
 172 # define XElf_Addr Elf64_Addr
 173 # define XElf_Half Elf64_Half
 174 # define XElf_Off Elf64_Off
 175 # define XElf_Word Elf64_Word
 176 # define XElf_Xword Elf64_Xword
 177 # define XElf_Sxword Elf64_Sxword
 178 # define XElf_Versym Elf64_Versym
 179 # define XElf_Sym Elf64_Sym
 180 # define XElf_Rel Elf64_Rel
 181 # define XElf_Rela Elf64_Rela
 182
 183 # define XElf_Ehdr_vardef(name) Elf64_Ehdr *name
 184 # define xelf_getehdr(elf, name) name = elf64_getehdr (elf)
 185 # define xelf_getehdr_copy(elf, name, copy) \
 186   (copy) = *(name = elf64_getehdr (elf))
 187 # define xelf_newehdr(elf, klass) elf64_newehdr (elf)
 188 # define xelf_update_ehdr(elf, ehdr) \
 189   /* nothing */ ((void) (elf), (void) (ehdr), 1)
 190
 191 # define xelf_getclass(elf) ELFCLASS32
 192
 193 # define XElf_Phdr_vardef(name) Elf64_Phdr *name
 194 # define xelf_newphdr(elf, n) elf64_newphdr (elf, n)
 195 # define xelf_getphdr(elf, idx, name) name = elf64_getphdr (elf) + idx
 196 # define xelf_getphdr_ptr(elf, idx, name) name = elf64_getphdr (elf) + idx
 197 # define xelf_update_phdr(elf, idx, phdr) \
 198   /* nothing */ ((void) (elf), (void) (idx), (void) (phdr), 1)
 199
 200 # define XElf_Shdr_vardef(name) Elf64_Shdr *name
 201 # define xelf_getshdr(scn, name) name = elf64_getshdr (scn)
 202 # define xelf_getshdr_copy(scn, name, copy) \
 203   (copy) = *(name = elf64_getshdr (scn))
 204 # define xelf_update_shdr(scn, shdr) \
 205   /* nothing */ ((void) (scn), (void) (shdr), 1)
 206
 207 # define XElf_Sym_vardef(name) Elf64_Sym *name
 208 # define xelf_getsym(data, idx, name) \
 209   name = &((Elf64_Sym *) (data)->d_buf)[idx]
 210 # define xelf_getsym_ptr(data, idx, name) \
 211   name = &((Elf64_Sym *) (data)->d_buf)[idx]
 212 # define xelf_getsymshndx(data, ndxdata, idx, name1, name2) \
 213   (name1 = &((Elf64_Sym *) ((data)->d_buf))[idx]);                            \
 214   name2 = (unlikely ((ndxdata) != NULL)                                       \
 215            ? ((Elf32_Word *) ((ndxdata)->d_buf))[idx] : 0)
 216 # define xelf_update_sym(data, idx, sym) \
 217   /* nothing */ ((void) (data), (void) (idx), (void) (sym), 1)
 218 # define xelf_update_symshndx(data, ndxdata, idx, name1, name2, datachanged) \
 219   if (datachanged)                                                            \
 220     ((Elf64_Sym *) ((data)->d_buf))[idx] = *name1;                            \
 221   if (ndxdata != NULL)                                                        \
 222     (((Elf32_Word *) ((ndxdata)->d_buf))[idx] = name2)
 223
 224 # define XElf_Versym_vardef(name) Elf64_Versym name
 225 # define xelf_getversym_copy(data, idx, name) \
 226   (name = ((Elf64_Versym *) ((data)->d_buf))[idx], (&name))
 227
 228 # define XElf_Dyn_vardef(name) Elf64_Dyn *name
 229 # define xelf_getdyn(data, idx, name) \
 230   name = &((Elf64_Dyn *) ((data)->d_buf))[idx]
 231 # define xelf_getdyn_ptr(data, idx, name) \
 232   name = &((Elf64_Dyn *) ((data)->d_buf))[idx]
 233 # define xelf_update_dyn(data, idx, name) \
 234   /* nothing */ ((void) (data), (void) (idx), (void) (name), 1)
 235
 236 # define XElf_Rel_vardef(name) Elf64_Rel *name
 237 # define xelf_getrel(data, idx, name) \
 238   name = &((Elf64_Rel *) ((data)->d_buf))[idx]
 239 # define xelf_getrel_ptr(data, idx, name) \
 240   name = &((Elf64_Rel *) ((data)->d_buf))[idx]
 241 # define xelf_update_rel(data, idx, name) \
 242   /* nothing */ ((void) (data), (void) (idx), (void) (name), 1)
 243
 244 # define XElf_Rela_vardef(name) Elf64_Rela *name
 245 # define xelf_getrela(data, idx, name) \
 246   name = &((Elf64_Rela *) ((data)->d_buf))[idx]
 247 # define xelf_getrela_ptr(data, idx, name) \
 248   name = &((Elf64_Rela *) ((data)->d_buf))[idx]
 249 # define xelf_update_rela(data, idx, name) \
 250   /* nothing */ ((void) (data), (void) (idx), (void) (name), 1)
 251
 252 # define XElf_Verdef_vardef(name) Elf64_Verdef *name
 253 # define xelf_getverdef(data, offset, name) \
 254   name = ((Elf64_Verdef *) ((char *) ((data)->d_buf) + (offset)))
 255
 256 # define XElf_Verdaux_vardef(name) Elf64_Verdaux *name
 257 # define xelf_getverdaux(data, offset, name) \
 258   name = ((Elf64_Verdaux *) ((char *) ((data)->d_buf) + (offset)))
 259
 260 # define XELF_ST_TYPE(info) ELF64_ST_TYPE (info)
 261 # define XELF_ST_BIND(info) ELF64_ST_BIND (info)
 262 # define XELF_ST_INFO(bind, type) ELF64_ST_INFO (bind, type)
 263 # define XELF_ST_VISIBILITY(info) ELF64_ST_VISIBILITY (info)
 264
 265 # define XELF_R_SYM(info) ELF64_R_SYM (info)
 266 # define XELF_R_TYPE(info) ELF64_R_TYPE (info)
 267 # define XELF_R_INFO(sym, type) ELF64_R_INFO (sym, type)
 268
 269 # define xelf_fsize(elf, type, cnt) \
 270   (__builtin_constant_p (type)                                                \
 271    ? ({ size_t fsize;                                                         \
 272         switch (type)                                                         \
 273           {                                                                   \
 274           case ELF_T_BYTE: fsize = 1; break;                                  \
 275           case ELF_T_ADDR: fsize = sizeof (Elf64_Addr); break;                \
 276           case ELF_T_DYN: fsize = sizeof (Elf64_Dyn); break;                  \
 277           case ELF_T_EHDR: fsize = sizeof (Elf64_Ehdr); break;                \
 278           case ELF_T_HALF: fsize = sizeof (Elf64_Half); break;                \
 279           case ELF_T_OFF: fsize = sizeof (Elf64_Off); break;                  \
 280           case ELF_T_PHDR: fsize = sizeof (Elf64_Phdr); break;                \
 281           case ELF_T_RELA: fsize = sizeof (Elf64_Rela); break;                \
 282           case ELF_T_REL: fsize = sizeof (Elf64_Rel); break;                  \
 283           case ELF_T_SHDR: fsize = sizeof (Elf64_Shdr); break;                \
 284           case ELF_T_SWORD: fsize = sizeof (Elf64_Sword); break;              \
 285           case ELF_T_SYM: fsize = sizeof (Elf64_Sym); break;                  \
 286           case ELF_T_WORD: fsize = sizeof (Elf64_Word); break;                \
 287           case ELF_T_XWORD: fsize = sizeof (Elf64_Xword); break;              \
 288           case ELF_T_SXWORD: fsize = sizeof (Elf64_Sxword); break;            \
 289           case ELF_T_VDEF: fsize = sizeof (Elf64_Verdef); break;              \
 290           case ELF_T_VDAUX: fsize = sizeof (Elf64_Verdaux); break;            \
 291           case ELF_T_VNEED: fsize = sizeof (Elf64_Verneed); break;            \
 292           case ELF_T_VNAUX: fsize = sizeof (Elf64_Vernaux); break;            \
 293           case ELF_T_NHDR: fsize = sizeof (Elf64_Nhdr); break;                \
 294           case ELF_T_SYMINFO: fsize = sizeof (Elf64_Syminfo); break;          \
 295           case ELF_T_MOVE: fsize = sizeof (Elf64_Move); break;                \
 296           default: fsize = 0; break;                                          \
 297           }                                                                   \
 298         fsize * (cnt); })                                                     \
 299    : gelf_fsize (elf, type, cnt, EV_CURRENT))
 300 #else
 301 # include <gelf.h>
 302
 303 /* Generic linker.  */
 304 # define XElf_Ehdr GElf_Ehdr
 305 # define XElf_Shdr GElf_Shdr
 306 # define XElf_Addr GElf_Addr
 307 # define XElf_Half GElf_Half
 308 # define XElf_Off GElf_Off
 309 # define XElf_Word GElf_Word
 310 # define XElf_Xword GElf_Xword
 311 # define XElf_Sxword GElf_Sxword
 312 # define XElf_Versym GElf_Versym
 313 # define XElf_Sym GElf_Sym
 314 # define XElf_Rel GElf_Rel
 315 # define XElf_Rela GElf_Rela
 316
 317 # define XElf_Ehdr_vardef(name) GElf_Ehdr name##_mem; GElf_Ehdr *name
 318 # define xelf_getehdr(elf, name) name = gelf_getehdr (elf, &name##_mem)
 319 # define xelf_getehdr_copy(elf, name, copy) \
 320   name = gelf_getehdr (elf, &(copy))
 321 # define xelf_newehdr(elf, klass) gelf_newehdr (elf, klass)
 322 # define xelf_update_ehdr(elf, ehdr) gelf_update_ehdr (elf, ehdr)
 323
 324 # define xelf_getclass(elf) gelf_getclass (elf)
 325
 326 # define XElf_Phdr_vardef(name) GElf_Phdr name##_mem; GElf_Phdr *name
 327 # define xelf_newphdr(elf, n) gelf_newphdr (elf, n)
 328 # define xelf_getphdr(elf, idx, name) \
 329   name = gelf_getphdr (elf, idx, &name##_mem)
 330 # define xelf_getphdr_ptr(elf, idx, name) \
 331   name = &name##_mem
 332 # define xelf_update_phdr(elf, idx, phdr) \
 333   gelf_update_phdr (elf, idx, phdr)
 334
 335 # define XElf_Shdr_vardef(name) GElf_Shdr name##_mem; GElf_Shdr *name
 336 # define xelf_getshdr(scn, name) name = gelf_getshdr (scn, &name##_mem)
 337 # define xelf_getshdr_copy(scn, name, copy) \
 338   name = gelf_getshdr (scn, &(copy))
 339 # define xelf_update_shdr(scn, shdr) gelf_update_shdr (scn, shdr)
 340
 341 # define XElf_Sym_vardef(name) GElf_Sym name##_mem; GElf_Sym *name
 342 # define xelf_getsym(data, idx, name) \
 343   name = gelf_getsym (data, idx, &name##_mem)
 344 # define xelf_getsym_ptr(data, idx, name) \
 345   name = &name##_mem
 346 # define xelf_getsymshndx(data, ndxdata, idx, name1, name2) \
 347   name1 = gelf_getsymshndx (data, ndxdata, idx, &name1##_mem, &(name2))
 348 # define xelf_update_sym(data, idx, sym) gelf_update_sym (data, idx, sym)
 349 # define xelf_update_symshndx(data, ndxdata, idx, name1, name2, datachanged) \
 350   gelf_update_symshndx (data, ndxdata, idx, name1, name2)
 351
 352 # define XElf_Versym_vardef(name) GElf_Versym name
 353 # define xelf_getversym_copy(data, idx, name) \
 354   gelf_getversym (data, idx, &name)
 355
 356 # define XElf_Dyn_vardef(name) GElf_Dyn name##_mem; GElf_Dyn *name
 357 # define xelf_getdyn(data, idx, name) \
 358   name = gelf_getdyn (data, idx, &name##_mem)
 359 # define xelf_getdyn_ptr(data, idx, name) \
 360   name = &name##_mem
 361 # define xelf_update_dyn(data, idx, name) \
 362   gelf_update_dyn (data, idx, name)
 363
 364 # define XElf_Rel_vardef(name) GElf_Rel name##_mem; GElf_Rel *name
 365 # define xelf_getrel(data, idx, name) \
 366   name = gelf_getrel (data, idx, &name##_mem)
 367 # define xelf_getrel_ptr(data, idx, name) \
 368   name = &name##_mem
 369 # define xelf_update_rel(data, idx, name) \
 370   gelf_update_rel (data, idx, name)
 371
 372 # define XElf_Rela_vardef(name) GElf_Rela name##_mem; GElf_Rela *name
 373 # define xelf_getrela(data, idx, name) \
 374   name = gelf_getrela (data, idx, &name##_mem)
 375 # define xelf_getrela_ptr(data, idx, name) \
 376   name = &name##_mem
 377 # define xelf_update_rela(data, idx, name) \
 378   gelf_update_rela (data, idx, name)
 379
 380 # define XElf_Verdef_vardef(name) GElf_Verdef name##_mem; GElf_Verdef *name
 381 # define xelf_getverdef(data, offset, name) \
 382   name = gelf_getverdef (data, offset, &name##_mem)
 383
 384 # define XElf_Verdaux_vardef(name) GElf_Verdaux name##_mem; GElf_Verdaux *name
 385 # define xelf_getverdaux(data, offset, name) \
 386   name = gelf_getverdaux (data, offset, &name##_mem)
 387
 388 # define XELF_ST_TYPE(info) GELF_ST_TYPE (info)
 389 # define XELF_ST_BIND(info) GELF_ST_BIND (info)
 390 # define XELF_ST_INFO(bind, type) GELF_ST_INFO (bind, type)
 391 # define XELF_ST_VISIBILITY(info) GELF_ST_VISIBILITY (info)
 392
 393 # define XELF_R_SYM(info) GELF_R_SYM (info)
 394 # define XELF_R_TYPE(info) GELF_R_TYPE (info)
 395 # define XELF_R_INFO(sym, type) GELF_R_INFO (sym, type)
 396
 397 # define xelf_fsize(elf, type, cnt) \
 398   gelf_fsize (elf, type, cnt, EV_CURRENT)
 399 #endif