static int ElfReadSecNameTbl(int fd, const Elf32_Ehdr *Ehdr) {
int foffset;
Elf32_Shdr Eshdr;
TRACE;
if(Ehdr->e_shoff == 0 || Tables.secnmtbl_ndx == 0) {
errno = EBADF;
return -1;
}
if(Tables.secnmtbl_ndx > 0)
return 0;
Tables.secnmtbl_ndx = Ehdr->e_shstrndx;
foffset = lseek(fd, 0, SEEK_CUR);
lseek(fd,Ehdr->e_shoff + Ehdr->e_shstrndx * Ehdr->e_shentsize, SEEK_SET);
if(read(fd,&Eshdr, sizeof(Eshdr)) != sizeof(Eshdr)) {
errno = EBADF;
return -1;
}
if (is_host_little() != Is_Elf_Little)
ConvertSecHeader(&Eshdr);
Tables.sec_name_tbl = (char *)malloc(Eshdr.sh_size);
if(Tables.sec_name_tbl == NULL) {
errno = ENOMEM;
return -1;
}
lseek(fd,Eshdr.sh_offset,SEEK_SET);
if(read(fd,Tables.sec_name_tbl,Eshdr.sh_size) != Eshdr.sh_size) {
errno = EBADF;
return -1;
}
lseek(fd, foffset, SEEK_SET);
return 0;
}
void setup_prelink_info(const char *fname, int elf_little, long base)
{
FAILIF(sizeof(prelink_info_t) != 8, "Unexpected sizeof(prelink_info_t) == %d!\n", sizeof(prelink_info_t));
int fd = open(fname, O_WRONLY);
FAILIF(fd < 0,
"open(%s, O_WRONLY): %s (%d)\n" ,
fname, strerror(errno), errno);
prelink_info_t info;
off_t sz = lseek(fd, 0, SEEK_END);
FAILIF(sz == (off_t)-1,
"lseek(%d, 0, SEEK_END): %s (%d)!\n",
fd, strerror(errno), errno);
if (!(elf_little ^ is_host_little())) {
/* Same endianness */
INFO("Host and ELF file [%s] have same endianness.\n", fname);
info.mmap_addr = base;
}
else {
/* Different endianness */
INFO("Host and ELF file [%s] have different endianness.\n", fname);
info.mmap_addr = switch_endianness(base);
}
strncpy(info.tag, "PRE ", 4);
int num_written = write(fd, &info, sizeof(info));
FAILIF(num_written < 0,
"write(%d, &info, sizeof(info)): %s (%d)\n",
fd, strerror(errno), errno);
FAILIF(sizeof(info) != num_written,
"Could not write %d bytes (wrote only %d bytes) as expected!\n",
sizeof(info), num_written);
FAILIF(close(fd) < 0, "close(%d): %s (%d)!\n", fd, strerror(errno), errno);
}
static int ElfReadSecHdrTbl(int fd, const Elf32_Ehdr *Ehdr) {
int32_t i, foffset;
TRACE;
if(Ehdr->e_shoff == 0) {
errno = EBADF;
return -1;
}
foffset = lseek(fd, 0, SEEK_CUR);
lseek(fd, Ehdr->e_shoff,SEEK_SET);
Tables.sechdr_tbl_size = Ehdr->e_shnum;
Tables.sec_header_tbl = (Elf32_Shdr *)malloc(Ehdr->e_shnum * sizeof(Elf32_Shdr));
if(Tables.sec_header_tbl == NULL) {
errno = ENOMEM;
return -1;
}
if(read(fd,Tables.sec_header_tbl,(Ehdr->e_shnum*sizeof(Elf32_Shdr)))
!= (Ehdr->e_shnum*sizeof(Elf32_Shdr))) {
errno = EBADF;
return -1;
}
if (is_host_little() != Is_Elf_Little)
for(i=0;i<Ehdr->e_shnum;++i)
ConvertSecHeader(&Tables.sec_header_tbl[i]);
lseek(fd,foffset,SEEK_SET);
return 0;
}
static int ElfReadHeader(int fd, Elf32_Ehdr *Ehdr){
int foffset;
TRACE;
foffset = lseek(fd, 0, SEEK_CUR);
lseek(fd, 0, SEEK_SET);
if(read(fd, Ehdr, sizeof(Elf32_Ehdr)) != sizeof(Elf32_Ehdr))
return -1;
if(memcmp(Ehdr->e_ident, ELFMAG, 4)) {
errno = EBADF;
return -1;
}
if(Ehdr->e_ident[EI_DATA] == 1)
Is_Elf_Little = 1;
else if(Ehdr->e_ident[EI_DATA] == 2)
Is_Elf_Little = 0;
else {
errno = EBADF;
return -1;
}
if(Ehdr->e_ident[EI_CLASS] == ELFCLASS64) {
errno = EFBIG;
return -1;
}
lseek(fd, foffset, SEEK_SET);
if (is_host_little() != Is_Elf_Little)
ConvertElfHeader(Ehdr);
return 0;
}
static int ElfReadSymTbl(int fd, const Elf32_Ehdr *Ehdr) {
int32_t i, j, foffset;
TRACE;
if(Ehdr->e_shoff == 0) {
errno = EBADF;
return -1;
}
if(Tables.symtbl_ndx == 0) {
errno = EBADF;
return -1;
}
if(Tables.symtbl_ndx > 0)
return 0; /* already done */
foffset = lseek(fd,0,SEEK_CUR);
lseek(fd,Ehdr->e_shoff,SEEK_SET);
for(i=0; i < Ehdr->e_shnum; ++i)
if(Tables.sec_header_tbl[i].sh_type == SHT_SYMTAB)
break;
if(Ehdr->e_shnum == i) {
errno = EBADF;
return -1;
}
Tables.symtbl_ndx = i;
lseek(fd,Tables.sec_header_tbl[i].sh_offset,SEEK_SET);
Tables.sym_tbl = (Elf32_Sym *)malloc(Tables.sec_header_tbl[i].sh_size);
if(Tables.sym_tbl == NULL) {
errno = ENOMEM;
return -1;
}
if(read(fd,Tables.sym_tbl,Tables.sec_header_tbl[i].sh_size)
!= Tables.sec_header_tbl[i].sh_size) {
errno = EBADF;
return -1;
}
if(is_host_little() != Is_Elf_Little)
for(j=0;j<(Tables.sec_header_tbl[i].sh_size/Tables.sec_header_tbl[i].sh_entsize);++j)
ConvertSymTblEnt(&Tables.sym_tbl[j]);
/* Got Symbol table now reading string table for it */
i = Tables.sec_header_tbl[i].sh_link;
Tables.symstr_tbl = (char *)malloc(Tables.sec_header_tbl[i].sh_size);
if(Tables.symstr_tbl == NULL) {
errno = ENOMEM;
return -1;
}
lseek(fd,Tables.sec_header_tbl[i].sh_offset,SEEK_SET);
if(read(fd,(char *)Tables.symstr_tbl,Tables.sec_header_tbl[i].sh_size)
!= Tables.sec_header_tbl[i].sh_size) {
errno = EBADF;
return -1;
}
lseek(fd,foffset,SEEK_SET);
return 0;
}
static inline void set_prelink(long *prelink_addr,
int elf_little,
prelink_info_t *info)
{
FAILIF(sizeof(prelink_info_t) != 8, "Unexpected sizeof(prelink_info_t) == %d!\n", sizeof(prelink_info_t));
if (prelink_addr) {
if (!(elf_little ^ is_host_little())) {
/* Same endianness */
*prelink_addr = info->mmap_addr;
}
else {
/* Different endianness */
*prelink_addr = switch_endianness(info->mmap_addr);
}
}
}
static int ElfReadPgmHdrTbl(int fd,const Elf32_Ehdr *Ehdr) {
int32_t i;
TRACE;
if(Ehdr->e_phoff == 0) {
errno = EBADF;
return -1;
}
lseek(fd, Ehdr->e_phoff,SEEK_SET);
Tables.pgm_hdr_tbl_size = Ehdr->e_phnum;
Tables.pgm_header_tbl = (Elf32_Phdr *)malloc(Ehdr->e_phnum * sizeof(Elf32_Phdr));
if(Tables.pgm_header_tbl == NULL) {
errno = ENOMEM;
return -1;
}
if(read(fd,Tables.pgm_header_tbl,(Ehdr->e_phnum*sizeof(Elf32_Phdr)))
!= (Ehdr->e_phnum*sizeof(Elf32_Phdr))) {
errno = EBADF;
return -1;
}
if (is_host_little() != Is_Elf_Little)
for(i=0; i < Ehdr->e_phnum; ++i)
ConvertPgmHeader(&Tables.pgm_header_tbl[i]);
return 0;
}
