external/bsd/libelf/dist/gelf_shdr.c

   1 /*      $NetBSD: gelf_shdr.c,v 1.2 2009/12/19 06:39:29 thorpej Exp $    */
   2
   3 /*-
   4  * Copyright (c) 2006 Joseph Koshy
   5  * All rights reserved.
   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  * 2. Redistributions in binary form must reproduce the above copyright
  13  *    notice, this list of conditions and the following disclaimer in the
  14  *    documentation and/or other materials provided with the distribution.
  15  *
  16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  19  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  26  * SUCH DAMAGE.
  27  */
  28
  29 #include <sys/cdefs.h>
  30 /* __FBSDID("$FreeBSD: src/lib/libelf/gelf_shdr.c,v 1.1.10.1.2.1 2009/10/25 01:10:29 kensmith Exp $"); */
  31
  32 #include <assert.h>
  33 #include <limits.h>
  34 #include <gelf.h>
  35 #include <libelf.h>
  36
  37 #include "_libelf.h"
  38
  39 Elf32_Shdr *
  40 elf32_getshdr(Elf_Scn *s)
  41 {
  42         return (_libelf_getshdr(s, ELFCLASS32));
  43 }
  44
  45 Elf64_Shdr *
  46 elf64_getshdr(Elf_Scn *s)
  47 {
  48         return (_libelf_getshdr(s, ELFCLASS64));
  49 }
  50
  51 GElf_Shdr *
  52 gelf_getshdr(Elf_Scn *s, GElf_Shdr *d)
  53 {
  54         int ec;
  55         void *sh;
  56         Elf32_Shdr *sh32;
  57         Elf64_Shdr *sh64;
  58
  59         if (d == NULL) {
  60                 LIBELF_SET_ERROR(ARGUMENT, 0);
  61                 return (NULL);
  62         }
  63
  64         if ((sh = _libelf_getshdr(s, ELFCLASSNONE)) == NULL)
  65                 return (NULL);
  66
  67         ec = s->s_elf->e_class;
  68         assert(ec == ELFCLASS32 || ec == ELFCLASS64);
  69
  70         if (ec == ELFCLASS32) {
  71                 sh32 = (Elf32_Shdr *) sh;
  72
  73                 d->sh_name      = sh32->sh_name;
  74                 d->sh_type      = sh32->sh_type;
  75                 d->sh_flags     = (Elf64_Xword) sh32->sh_flags;
  76                 d->sh_addr      = (Elf64_Addr) sh32->sh_addr;
  77                 d->sh_offset    = (Elf64_Off) sh32->sh_offset;
  78                 d->sh_size      = (Elf64_Xword) sh32->sh_size;
  79                 d->sh_link      = sh32->sh_link;
  80                 d->sh_info      = sh32->sh_info;
  81                 d->sh_addralign = (Elf64_Xword) sh32->sh_addralign;
  82                 d->sh_entsize   = (Elf64_Xword) sh32->sh_entsize;
  83         } else {
  84                 sh64 = (Elf64_Shdr *) sh;
  85                 *d = *sh64;
  86         }
  87
  88         return (d);
  89 }
  90
  91 int
  92 gelf_update_shdr(Elf_Scn *scn, GElf_Shdr *s)
  93 {
  94         int ec;
  95         Elf *e;
  96         Elf32_Shdr *sh32;
  97
  98
  99         if (s == NULL || scn == NULL || (e = scn->s_elf) == NULL ||
 100             e->e_kind != ELF_K_ELF ||
 101             ((ec = e->e_class) != ELFCLASS32 && ec != ELFCLASS64)) {
 102                 LIBELF_SET_ERROR(ARGUMENT, 0);
 103                 return (0);
 104         }
 105
 106         if (e->e_cmd == ELF_C_READ) {
 107                 LIBELF_SET_ERROR(MODE, 0);
 108                 return (0);
 109         }
 110
 111         if (ec == ELFCLASS64) {
 112                 scn->s_shdr.s_shdr64 = *s;
 113                 return (1);
 114         }
 115
 116         sh32 = &scn->s_shdr.s_shdr32;
 117
 118         sh32->sh_name    =  s->sh_name;
 119         sh32->sh_type    =  s->sh_type;
 120         LIBELF_COPY_U32(sh32, s, sh_flags);
 121         LIBELF_COPY_U32(sh32, s, sh_addr);
 122         LIBELF_COPY_U32(sh32, s, sh_offset);
 123         LIBELF_COPY_U32(sh32, s, sh_size);
 124         sh32->sh_link    =  s->sh_link;
 125         sh32->sh_info    =  s->sh_info;
 126         LIBELF_COPY_U32(sh32, s, sh_addralign);
 127         LIBELF_COPY_U32(sh32, s, sh_entsize);
 128
 129         (void) elf_flagscn(scn, ELF_C_SET, ELF_F_DIRTY);
 130
 131         return (1);
 132 }