diff -r 000000000000 -r 83f4b4db085c toolsandutils/e32tools/elfdump/elfdump.cpp --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/toolsandutils/e32tools/elfdump/elfdump.cpp Tue Feb 02 01:39:43 2010 +0200 @@ -0,0 +1,479 @@ +// Copyright (c) 2002-2009 Nokia Corporation and/or its subsidiary(-ies). +// All rights reserved. +// This component and the accompanying materials are made available +// under the terms of "Eclipse Public License v1.0" +// which accompanies this distribution, and is available +// at the URL "http://www.eclipse.org/legal/epl-v10.html". +// +// Initial Contributors: +// Nokia Corporation - initial contribution. +// +// Contributors: +// +// Description: +// + +#include +#include +#include +#include +#include + +#if defined(__MSVCDOTNET__) || defined(__TOOLS2__) +#include +#include +using namespace std; +#else //(!__MSVCDOTNET__ && !__TOOLS2__) +#include +#include +#endif //__MSVCDOTNET__ + +#define ADDR(rtype, p, o) (rtype *)(((char *)p) + o) + +bool ignoreSomeSections; + +void hexdump(unsigned char* data, int aSize, int offset) + // print hex dump of relevant sections + { + int i=0; + int p=0; + while (i32 && *data <127) //characters converted to dots + { + printf("%1c",*data); + } + else + { + printf("."); + } + data++; + } + p=0; + printf(" \n "); + } + } + printf(" \n\n "); + } + +void print_directive(unsigned char* data, int size) + // print formatted text of directive section + { + printf ("\t"); + + for (int i=0; i31 && (char)data[i]<127) + { + printf ("%c", (char)data[i]); + } + + if ((char)data[i]=='\n') + { + printf ("\n\t"); + } + } + + printf ("\n"); + } + +void print_reloc(Elf32_Ehdr* eh, Elf32_Sym* symT, unsigned char* strtab) + // print relocation section + { + Elf32_Shdr* shdr = ADDR(Elf32_Shdr, eh, eh->e_shoff); + for (int j=0;j< eh->e_shnum;j++) + { + char* sname = ADDR(char, eh, shdr[eh->e_shstrndx].sh_offset); + if ( (shdr[j].sh_type==9) && + ( (!ignoreSomeSections) || + (strncmp(".rel.debug_", &sname[shdr[j].sh_name], 11)) + ) + ) + { + unsigned char* data = ADDR(unsigned char, eh, shdr[j].sh_offset); + int noOfReloc=shdr[j].sh_size / shdr[j].sh_entsize; + printf("\n\n\n\t\t\t%s\n", &sname[shdr[j].sh_name]); + Elf32_Rel* rl=(Elf32_Rel*)data; // pointer to relocation section + for (int i=0;ir_info); // symbol Tableindex + sym=sym+symTIndx; + symbolName=symbolName+sym->st_name; // index into string table section + // with symbol names + printf("\t0x%08x \t", rl->r_offset); // prints offset into relocation section + printf("%d", symTIndx); // symbol table index + printf("\t%s\n",symbolName); // symbol name + rl++; + } + } + } + } + +void print_GlSymbols(Elf32_Ehdr* eh, Elf32_Sym* symT, unsigned char* strtab) + // print global symbols from Symbol Table + { + Elf32_Shdr* shdr = ADDR(Elf32_Shdr, eh, eh->e_shoff); + char* sname = ADDR(char, eh, shdr[eh->e_shstrndx].sh_offset); + for (int i=0;i< eh->e_shnum;i++) + { + if (!strcmp(".symtab", &sname[shdr[i].sh_name])) + { + int noOfSym=shdr[i].sh_size / shdr[i].sh_entsize; // number of symbols + const char *symName =(const char *)strtab; + int count = 1; + printf("Global symbols:\n"); + printf("=================\n\n"); + for (int l=0;l< noOfSym ;l++) + { + symT=symT+1; + if( ELF32_ST_BIND(symT->st_info) == 1) // searching for global symbols + { + symName = symName + symT->st_name; // index into string table section + printf("%d ",count); + printf(symName); + printf("\n"); + symName = symName - symT->st_name; // back to pointing to first byte of string table + count++; + } + + } + } + } + } + +void print_elf_header(Elf32_Ehdr* eh) + { + // print elf header + if (eh->e_version==1) + printf("\tHeader version: EV_CURRENT (Current version)\n"); + else + printf("\tInvalid version: EV_NONE (Invalid version)\n"); + + if (eh->e_type==0) + printf("\tFile Type: ET_NONE (No file type) (0)\n"); + else if (eh->e_type==1) + printf("\tFile Type: ET_REL (Relocatable object) (1)\n"); + else if (eh->e_type==2) + printf("\tFile Type: ET_EXEC (Executable file) (2)\n"); + else if (eh->e_type==3) + printf("\tFile Type: ET_DYN (Shared object file) (3)\n"); + else if (eh->e_type==4) + printf("\tFile Type: ET_CORE (Core File) (4)\n"); + else if (eh->e_type==65280) + printf("\tFile Type: ET_LOPROC (Precessor Specific) (ff00)\n"); + else + printf("\tFile Type: ET_HIPROC (Precessor Specific) (ffff)\n"); + if (eh->e_machine==40) + printf("\tMachine: EM_ARM (ARM)\n"); + else + printf("\tERROR:\tUnexpected machine\n"); + + printf("\tEntry offset (in SHF_ENTRYSECT section):0x%08x \n",eh->e_entry); + printf("\tProgram header entries : %d\n",eh->e_phnum); + printf("\tSection header entries : %d\n",eh->e_shnum); + + printf("\tProgram header offset : %d",eh->e_phoff); + printf(" bytes (0x%08X",eh->e_phoff); + printf(")\n"); + printf("\tSection header offset : %d",eh->e_shoff); + printf(" bytes (0x%08X",eh->e_shoff); + printf(")\n"); + + printf("\tProgram header entry size : %d",eh->e_phentsize); + printf(" bytes (0x%02X",eh->e_phentsize); + printf(")\n"); + printf("\tSection header entry size : %d",eh->e_shentsize); + printf(" bytes (0x%02X",eh->e_shentsize); + printf(")\n"); + printf("\tSection header string table index: %d \n", eh->e_shstrndx); + printf("\tHeader size: %d", eh->e_ehsize); + printf(" bytes (0x%02X",eh->e_ehsize); + printf(")\n"); + } + +void print_sect_header(char* sname, Elf32_Shdr* shdr, int count) + // print section header names + { + static const char* KtypeName[]={"0","SHT_PROGBITS (1)","SHT_SYMTAB (2)","SHT_STRTAB (3)", + "SHT_RELA (4)","5", "SHT_DINAMIC (6)","7","8","SHT_REL (9)", + "10","SHT_DINSYM (11)"}; + + printf("\n\n\tName\t\t:%1s\n ",&sname[shdr[count].sh_name]); + printf("\tType\t\t: %s\n", KtypeName[shdr[count].sh_type]); + printf("\tAddr\t\t: 0x%08X\n",shdr[count].sh_addr); + printf("\tSize\t\t: %1d", shdr[count].sh_size); + printf(" bytes (0x%X",shdr[count].sh_size); + printf(")\n"); + printf("\tEntry Size\t: %1d\n",shdr[count].sh_entsize); + printf("\tAligment\t: %1d\n\n\n",shdr[count].sh_addralign); + } + +unsigned char* findSymbolStringT(Elf32_Ehdr* eh) + //calculate and return pointer to the first byte of string table(the one with symbol names) + { + Elf32_Shdr* shdr = ADDR(Elf32_Shdr, eh, eh->e_shoff); + char* sname = ADDR(char, eh, shdr[eh->e_shstrndx].sh_offset); + for (int i=0;i < eh->e_shnum; i++) + { + if (!strcmp(".strtab", &sname[shdr[i].sh_name])) + { + unsigned char* data = ADDR(unsigned char, eh, shdr[i].sh_offset); + return data; //pointer to the first byte of string table section + } + } + return NULL; //if not found + } + +Elf32_Sym* findSymbolT(Elf32_Ehdr* eh) + //calculate and return pointer to the first element of symbol table + { + Elf32_Shdr* shdr = ADDR(Elf32_Shdr, eh, eh->e_shoff); + for (int i=0;i < eh->e_shnum;i++) + { + if (shdr[i].sh_type==2) + { + unsigned char* data = ADDR(unsigned char, eh, shdr[i].sh_offset); + Elf32_Sym* sym=(Elf32_Sym*)data; + return sym; //pointer to the first element of symbol table. + } + } + return NULL; // if not found + } + +void print_Summary(Elf32_Ehdr* eh) + { + //print section names + Elf32_Shdr* shdr = ADDR(Elf32_Shdr, eh, eh->e_shoff); + char* sname = ADDR(char, eh, shdr[eh->e_shstrndx].sh_offset); + printf("\nSummary: \n"); + printf("==========\n"); + for (int i=0;i< eh->e_shnum;i++) + { + printf(&sname[shdr[i].sh_name]); + printf("\n"); + } + } + +bool printAll; + +int do_elf_file(char* buffer, char* name) + { + Elf32_Ehdr* eh=(Elf32_Ehdr *)buffer; //elf header + if (eh->e_ident[EI_MAG0] !=0x7f || eh->e_ident[EI_MAG1] != 0x45 || eh->e_ident[EI_MAG2] !=0x4c || eh->e_ident[EI_MAG3] != 0x46) + { + // EI_MAG0 to EI_MAG3 - A files' first 4 bytes hold a 'magic number', identifying the file as an ELF object file. + cout << "Error: " << name << " is not a valid ELF file"; + return 1; + } + if (eh->e_ident[EI_DATA] == 2) + { + // ELF Header size should be 52 bytes or converted into Big-Endian system 13312 + if (eh->e_ehsize != 13312) + { + printf("\tERROR:\tELF Header contains invalid file type\n"); + exit(1); + } + // e_ident[EI_DATA] specifies the data encoding of the processor-specific data in the object file. + printf("\tERROR:\tData encoding ELFDATA2MSB (Big-Endian) not supported\n"); + exit(1); + } + if (eh->e_ehsize != 52) + { + // ELF Header size should be 52 bytes + printf("\tERROR:\tELF Header contains invalid file type\n"); + exit(1); + } + int shoff = eh->e_shoff; // offset of section header table + Elf32_Shdr* shdr = ADDR(Elf32_Shdr, eh, shoff); // calculating pointer to Secton Header Table + // Elf32_Shdr * shdr = (Elf32_Shdr *)(buffer+shoff); + int shnum = eh->e_shnum; // number of section headers + int shstrndx = eh->e_shstrndx; + int snameoffset = shdr[shstrndx].sh_offset; // offset in file of sections' names + char* sname = ADDR(char, eh, snameoffset); // pointer to String Table which holds section names + // char * sname = (char *)(buffer+snameoffset); + print_elf_header(eh); // print Elf Header + + Elf32_Sym* symT= findSymbolT(eh); // pointer to Symbol table + if (symT==NULL) + { + printf("\nSymbol table not found\n"); + } + unsigned char* strtab=findSymbolStringT(eh); // pointer to String table which holds symbol names + if (strtab==NULL) + { + printf("\nString (the one which holds symbol names) table not found\n"); + } + print_reloc(eh,symT, strtab); // print relocation info showing symbol names and + // and the name of section in which the relocaton occurs. + for(int i = 0; i < shnum; i++) + { + unsigned char* data = ADDR(unsigned char, eh, shdr[i].sh_offset); //pointer to the first byte in the section + //unsigned char * data = (unsigned char * )(buffer+shdr[i].sh_offset); + int size = shdr[i].sh_size; // section size in bytes + + //print directive section + if (!strcmp(".directive", &sname[shdr[i].sh_name])) + { + print_sect_header(sname, shdr, i); + print_directive(data,size); + } + + if (!strcmp(".symtab", &sname[shdr[i].sh_name])) + { + print_sect_header(sname, shdr, i); + // print global symbols + print_GlSymbols(eh,symT, strtab); + } + + //print relevant section header names + //print hex dump of relevant sections + if (shdr[i].sh_type==1 || shdr[i].sh_type==4 || shdr[i].sh_type==6 || + shdr[i].sh_type==9 || shdr[i].sh_type==11) + { + if (strcmp(".comment", &sname[shdr[i].sh_name])&& + strcmp(".line", &sname[shdr[i].sh_name]) && + strcmp(".hash", &sname[shdr[i].sh_name]) && + strcmp(".note", &sname[shdr[i].sh_name]) && + strcmp(".directive", &sname[shdr[i].sh_name]) && + strncmp(".debug",&sname[shdr[i].sh_name] ,6)) + { + if ( ! ( (ignoreSomeSections) && + (strncmp(".rel.debug_", &sname[shdr[i].sh_name], 11)==0) + ) + ) + { + print_sect_header(sname, shdr, i); + hexdump(data,size,i); + } + } + } + if (printAll) // displays extra information + { + if(i!=0) + { + print_sect_header(sname, shdr, i); + hexdump(data,size,i); + } + } + } + print_Summary(eh); // print section names + return 0; +} + +int read_ar_element_header(char* ptr) + { + int length = strtol(ptr+48,0,10); + + if (strncmp(ptr+58, "\x60\x0A", 2) != 0) + { + return -1; + } + return length; + } + +int main(int argc, char* argv[]) + { + char* arg; + int numberOfOptions=2; + printAll=0; + ignoreSomeSections=0; + if (argc<2) + { + cout << "File not specified"; + exit(1); + } + else if (argc>numberOfOptions+2) + { + cout << "Too many arguments"; + exit(1); + } + else + { + for (int i=1;i<=argc-2;i++) + { + if ( strcmp("-i", argv[i]) ==0 ) + { + ignoreSomeSections=1; + } + else if ( strcmp("-a", argv[i]) ==0 ) + { + printAll=1; + } + } + arg=argv[argc-1]; + } + + struct stat results; + stat(arg, &results); + FILE *elffile; + if((elffile = fopen(arg, "rb" )) == NULL) + { + cout << "Error opening file " << arg; + exit (1); + } + char* buffer=new char [results.st_size];//allocating enough memory + fread( buffer, sizeof( char ), results.st_size, elffile); + fclose(elffile); + + if (strncmp(buffer, "!\x0A", 8) != 0) + { + // plain ELF file + if (do_elf_file(buffer, arg) != 0) + { + return 1; + } + return 0; + } + + // library file + char* nextfile = buffer; + int remainder = results.st_size; + +#define ADVANCE(n) nextfile+=(n); remainder-=(n); + + ADVANCE(8); + + while (remainder > 0) + { + int element_length = read_ar_element_header(nextfile); + ADVANCE(60); + + if (element_length < 0 || element_length > remainder) + { + cout << "Error: archive file corrupt"; + return 1; + } + + if (strncmp(nextfile, "\x7F\x45\x4C\x46",4) == 0) + { + if (do_elf_file(nextfile, "archive_element") != 0) + { + return 1; + } + } + element_length += element_length&1; // round up to a multiple of 2 + ADVANCE(element_length); + } + + return 0; + }