67d97fe724
Some notable changes: - libdwarf: Fixed DWARF4 line section - elfcopy: Implement --localize-hidden - nm: handle object name referenced by DW_AT_specification - elfcopy: Add --strip-dwo and --extract-dwo options for split DWARF - readelf: add remaining arm64 dynamic relocation names - nm: Avoid integer overflow in value comparison Relnotes: Yes Sponsored by: The FreeBSD Foundation
138 lines
3.5 KiB
C
138 lines
3.5 KiB
C
/*-
|
|
* Copyright (c) 2006,2008 Joseph Koshy
|
|
* All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
|
|
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
|
|
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
|
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
|
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
|
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
|
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
|
* SUCH DAMAGE.
|
|
*/
|
|
|
|
#include <assert.h>
|
|
#include <gelf.h>
|
|
|
|
#include "_libelf.h"
|
|
|
|
ELFTC_VCSID("$Id: gelf_symshndx.c 3174 2015-03-27 17:13:41Z emaste $");
|
|
|
|
GElf_Sym *
|
|
gelf_getsymshndx(Elf_Data *d, Elf_Data *id, int ndx, GElf_Sym *dst,
|
|
Elf32_Word *shindex)
|
|
{
|
|
int ec;
|
|
Elf *e;
|
|
size_t msz;
|
|
Elf_Scn *scn;
|
|
uint32_t sh_type;
|
|
struct _Libelf_Data *ld, *lid;
|
|
|
|
ld = (struct _Libelf_Data *) d;
|
|
lid = (struct _Libelf_Data *) id;
|
|
|
|
if (gelf_getsym(d, ndx, dst) == 0)
|
|
return (NULL);
|
|
|
|
if (lid == NULL || (scn = lid->d_scn) == NULL ||
|
|
(e = scn->s_elf) == NULL || (e != ld->d_scn->s_elf) ||
|
|
shindex == NULL) {
|
|
LIBELF_SET_ERROR(ARGUMENT, 0);
|
|
return (NULL);
|
|
}
|
|
|
|
ec = e->e_class;
|
|
assert(ec == ELFCLASS32 || ec == ELFCLASS64);
|
|
|
|
if (ec == ELFCLASS32)
|
|
sh_type = scn->s_shdr.s_shdr32.sh_type;
|
|
else
|
|
sh_type = scn->s_shdr.s_shdr64.sh_type;
|
|
|
|
if (_libelf_xlate_shtype(sh_type) != ELF_T_WORD ||
|
|
id->d_type != ELF_T_WORD) {
|
|
LIBELF_SET_ERROR(ARGUMENT, 0);
|
|
return (NULL);
|
|
}
|
|
|
|
msz = _libelf_msize(ELF_T_WORD, ec, e->e_version);
|
|
|
|
assert(msz > 0);
|
|
assert(ndx >= 0);
|
|
|
|
if (msz * (size_t) ndx >= id->d_size) {
|
|
LIBELF_SET_ERROR(ARGUMENT, 0);
|
|
return (NULL);
|
|
}
|
|
|
|
*shindex = ((Elf32_Word *) id->d_buf)[ndx];
|
|
|
|
return (dst);
|
|
}
|
|
|
|
int
|
|
gelf_update_symshndx(Elf_Data *d, Elf_Data *id, int ndx, GElf_Sym *gs,
|
|
Elf32_Word xindex)
|
|
{
|
|
int ec;
|
|
Elf *e;
|
|
size_t msz;
|
|
Elf_Scn *scn;
|
|
uint32_t sh_type;
|
|
struct _Libelf_Data *ld, *lid;
|
|
|
|
ld = (struct _Libelf_Data *) d;
|
|
lid = (struct _Libelf_Data *) id;
|
|
|
|
if (gelf_update_sym(d, ndx, gs) == 0)
|
|
return (0);
|
|
|
|
if (lid == NULL || (scn = lid->d_scn) == NULL ||
|
|
(e = scn->s_elf) == NULL || (e != ld->d_scn->s_elf)) {
|
|
LIBELF_SET_ERROR(ARGUMENT, 0);
|
|
return (0);
|
|
}
|
|
|
|
ec = e->e_class;
|
|
assert(ec == ELFCLASS32 || ec == ELFCLASS64);
|
|
|
|
if (ec == ELFCLASS32)
|
|
sh_type = scn->s_shdr.s_shdr32.sh_type;
|
|
else
|
|
sh_type = scn->s_shdr.s_shdr64.sh_type;
|
|
|
|
if (_libelf_xlate_shtype(sh_type) != ELF_T_WORD ||
|
|
d->d_type != ELF_T_WORD) {
|
|
LIBELF_SET_ERROR(ARGUMENT, 0);
|
|
return (0);
|
|
}
|
|
|
|
msz = _libelf_msize(ELF_T_WORD, ec, e->e_version);
|
|
|
|
assert(msz > 0);
|
|
assert(ndx >= 0);
|
|
|
|
if (msz * (size_t) ndx >= id->d_size) {
|
|
LIBELF_SET_ERROR(ARGUMENT, 0);
|
|
return (0);
|
|
}
|
|
|
|
*(((Elf32_Word *) id->d_buf) + ndx) = xindex;
|
|
|
|
return (1);
|
|
}
|