forked from KolibriOS/kolibrios
899 lines
26 KiB
C
899 lines
26 KiB
C
// Dependencies:
|
|
// <assert.h> or any another source of assert()
|
|
// <stdint.h> or any another source of uint64_t, uint32_t, uint16_t, uint8_t, size_t
|
|
|
|
#ifndef EPEP_ASSERT
|
|
#include <assert.h>
|
|
#define EPEP_ASSERT(x) assert(x)
|
|
#endif
|
|
|
|
#ifndef EPEP_READER
|
|
#include <stdio.h>
|
|
#define EPEP_READER FILE *
|
|
#define EPEP_READER_GET(preader) getc(*preader)
|
|
#define EPEP_READER_SEEK(preader, offset) fseek(*preader, offset, SEEK_SET)
|
|
#define EPEP_READER_TELL(preader) ftell(*preader)
|
|
#define EPEP_READER_GET_BLOCK(preader, size, buf) fread(buf, 1, size, *preader);
|
|
#endif
|
|
|
|
//
|
|
// Constants
|
|
//
|
|
|
|
typedef enum {
|
|
EPEP_INVALID,
|
|
EPEP_IMAGE,
|
|
EPEP_OBJECT,
|
|
} EpepKind;
|
|
|
|
typedef enum {
|
|
EPEP_ERR_SUCCESS,
|
|
EPEP_ERR_DATA_DIRECTORY_INDEX_IS_INVALID,
|
|
EPEP_ERR_SECTION_HEADER_INDEX_IS_INVALID,
|
|
EPEP_ERR_SYMBOL_INDEX_IS_INVALID,
|
|
EPEP_ERR_NOT_AN_OBJECT,
|
|
EPEP_ERR_ADDRESS_IS_OUT_OF_SECTION_RAW_DATA,
|
|
EPEP_ERR_OUTPUT_CAPACITY_IS_ZERO,
|
|
EPEP_ERR_OUTPUT_IS_NULL,
|
|
EPEP_ERR_ADDRESS_IS_OUT_OF_ANY_SECTION,
|
|
EPEP_ERR_EXPORT_ADDRESS_TABLE_ENTRY_NAME_NOT_FOUND,
|
|
EPEP_ERR_NO_BASE_RELOCATION_TABLE,
|
|
EPEP_ERR_BASE_RELOCATION_IS_ALREADY_END,
|
|
} EpepError;
|
|
|
|
//
|
|
// Generic
|
|
//
|
|
|
|
typedef struct {
|
|
EPEP_READER reader;
|
|
EpepKind kind;
|
|
EpepError error_code;
|
|
size_t signature_offset_offset;
|
|
size_t signature_offset;
|
|
size_t first_data_directory_offset;
|
|
size_t first_section_header_offset;
|
|
size_t export_table_offset;
|
|
size_t import_table_offset;
|
|
size_t base_relocation_table_offset;
|
|
size_t base_relocation_table_end_offset;
|
|
struct {
|
|
uint16_t Machine;
|
|
uint16_t NumberOfSections;
|
|
uint32_t TimeDateStamp;
|
|
uint32_t PointerToSymbolTable;
|
|
uint32_t NumberOfSymbols;
|
|
uint16_t SizeOfOptionalHeader;
|
|
uint16_t Characteristics;
|
|
} coffFileHeader;
|
|
struct {
|
|
// Standard fields
|
|
uint16_t Magic;
|
|
uint8_t MajorLinkerVersion;
|
|
uint8_t MinorLinkerVersion;
|
|
uint32_t SizeOfCode;
|
|
uint32_t SizeOfInitializedData;
|
|
uint32_t SizeOfUninitializedData;
|
|
uint32_t AddressOfEntryPoint;
|
|
uint32_t BaseOfCode;
|
|
uint32_t BaseOfData; // PE32-only
|
|
// Windows-specific fields
|
|
uint64_t ImageBase;
|
|
uint32_t SectionAlignment;
|
|
uint32_t FileAlignment;
|
|
uint16_t MajorOperatingSystemVersion;
|
|
uint16_t MinorOperatingSystemVersion;
|
|
uint16_t MajorImageVersion;
|
|
uint16_t MinorImageVersion;
|
|
uint16_t MajorSubsystemVersion;
|
|
uint16_t MinorSubsystemVersion;
|
|
uint32_t Win32VersionValue;
|
|
uint32_t SizeOfImage;
|
|
uint32_t SizeOfHeaders;
|
|
uint32_t CheckSum;
|
|
uint16_t Subsystem;
|
|
uint16_t DllCharacteristics;
|
|
uint64_t SizeOfStackReserve;
|
|
uint64_t SizeOfStackCommit;
|
|
uint64_t SizeOfHeapReserve;
|
|
uint64_t SizeOfHeapCommit;
|
|
uint32_t LoaderFlags;
|
|
uint32_t NumberOfRvaAndSizes;
|
|
} optionalHeader;
|
|
struct {
|
|
uint32_t ExportFlags;
|
|
uint32_t TimeDateStamp;
|
|
uint16_t MajorVersion;
|
|
uint16_t MinorVersion;
|
|
uint32_t NameRva;
|
|
uint32_t OrdinalBase;
|
|
uint32_t AddressTableEntries;
|
|
uint32_t NumberOfNamePointers;
|
|
uint32_t ExportAddressTableRva;
|
|
uint32_t NamePointerRva;
|
|
uint32_t OrdinalTableRva;
|
|
} export_directory;
|
|
} Epep;
|
|
|
|
/// Constructor of the general information container
|
|
int epep_init(Epep *epep, EPEP_READER reader);
|
|
|
|
/// Gives file offset corresponding to RVA is any, returns 0 othervice
|
|
int epep_get_file_offset_by_rva(Epep *epep, size_t *offset, size_t addr);
|
|
|
|
//
|
|
// Data Directories
|
|
//
|
|
|
|
typedef struct {
|
|
uint32_t VirtualAddress;
|
|
uint32_t Size;
|
|
} EpepImageDataDirectory;
|
|
|
|
/// Gives Data Directiry by its index
|
|
int epep_get_data_directory_by_index(Epep *epep, EpepImageDataDirectory *idd, size_t index);
|
|
|
|
//
|
|
// Sections
|
|
//
|
|
|
|
typedef struct {
|
|
char Name[8];
|
|
uint32_t VirtualSize;
|
|
uint32_t VirtualAddress;
|
|
uint32_t SizeOfRawData;
|
|
uint32_t PointerToRawData;
|
|
uint32_t PointerToRelocations;
|
|
uint32_t PointerToLinenumbers;
|
|
uint16_t NumberOfRelocations;
|
|
uint16_t NumberOfLinenumbers;
|
|
uint32_t Characteristics;
|
|
} EpepSectionHeader;
|
|
|
|
/// Gives Section Header by its index
|
|
int epep_get_section_header_by_index(Epep *epep, EpepSectionHeader *sh, size_t index);
|
|
|
|
/// Gives section header by RVA
|
|
int epep_get_section_header_by_rva(Epep *epep, EpepSectionHeader *sh, size_t addr);
|
|
|
|
/// Gives section contents by Section Header
|
|
int epep_get_section_contents(Epep *epep, EpepSectionHeader *sh, void *buf);
|
|
|
|
//
|
|
// COFF Symbols (object file symbols)
|
|
//
|
|
|
|
typedef union {
|
|
struct {
|
|
union {
|
|
char ShortName[8];
|
|
struct {
|
|
uint32_t Zeroes;
|
|
uint32_t Offset;
|
|
};
|
|
};
|
|
uint32_t Value;
|
|
uint16_t SectionNumber;
|
|
uint16_t Type;
|
|
uint8_t StorageClass;
|
|
uint8_t NumberOfAuxSymbols;
|
|
} symbol;
|
|
struct {
|
|
uint32_t TagIndex;
|
|
uint32_t TotalSize;
|
|
uint32_t PointerToLinenumber;
|
|
uint32_t PointerToNextFunction;
|
|
uint16_t Unused;
|
|
} auxFunctionDefinition;
|
|
struct {
|
|
uint8_t Unused0[4];
|
|
uint16_t Linenumber;
|
|
uint8_t Unused1[6];
|
|
uint32_t PointerToNextFunction;
|
|
uint8_t Unused2[2];
|
|
} auxBfOrEfSymbol;
|
|
struct {
|
|
uint32_t TagIndex;
|
|
uint32_t Characteristics;
|
|
uint8_t Unused[10];
|
|
} auxWeakExternal;
|
|
struct {
|
|
char FileName[18];
|
|
} auxFile;
|
|
struct {
|
|
uint32_t Length;
|
|
uint16_t NumberOfRelocations;
|
|
uint16_t NumberOfLinenumbers;
|
|
uint32_t CheckSum;
|
|
uint16_t Number;
|
|
uint8_t Selection;
|
|
uint8_t Unused[3];
|
|
} auxSectionDefinition;
|
|
} EpepCoffSymbol;
|
|
|
|
/// Gives COFF string table size
|
|
int epep_get_string_table_size(Epep *epep, size_t *size);
|
|
|
|
/// Gives COFF string table
|
|
int epep_get_string_table(Epep *epep, char *string_table);
|
|
|
|
/// Gives COFF Symbol by its index
|
|
int epep_get_symbol_by_index(Epep *epep, EpepCoffSymbol *sym, size_t index);
|
|
|
|
//
|
|
// Imports
|
|
//
|
|
|
|
typedef struct {
|
|
uint32_t ImportLookupTableRva;
|
|
uint32_t TimeDateStamp;
|
|
uint32_t ForwarderChain;
|
|
uint32_t NameRva;
|
|
uint32_t ImportAddressTableRva;
|
|
} EpepImportDirectory;
|
|
|
|
/// Returns non-zero if import table exists in the file
|
|
int epep_has_import_table(Epep *epep);
|
|
|
|
/// Places offset of import table into epep structure
|
|
int epep_read_import_table_offset(Epep *epep);
|
|
|
|
/// Gives Import Directory by index
|
|
int epep_get_import_directory_by_index(Epep *epep, EpepImportDirectory *import_directory, size_t index);
|
|
|
|
/// Gives name of Import Directory (library)
|
|
int epep_get_import_directory_name_s(Epep *epep, EpepImportDirectory *import_directory, char *name, size_t name_max);
|
|
|
|
/// Gives Import Lookup (imported symbol) by import directory and index
|
|
int epep_get_import_directory_lookup_by_index(Epep *epep, EpepImportDirectory *import_directory, size_t *lookup, size_t index);
|
|
|
|
/// Gives name of Import Directory Lookup (imported symbol) or nothing if imported by ordinal
|
|
int epep_get_lookup_name_s(Epep *epep, size_t lookup, char *name, size_t name_max);
|
|
|
|
//
|
|
// Exports
|
|
//
|
|
|
|
typedef union {
|
|
uint32_t ExportRva;
|
|
uint32_t ForwarderRva;
|
|
} EpepExportAddress;
|
|
|
|
/// Returns non-zero if export table exists in the file
|
|
int epep_has_export_table(Epep *epep);
|
|
|
|
/// Palces offset of export table into epep structrue
|
|
int epep_read_export_table_offset(Epep *epep);
|
|
|
|
/// Palces export table into epep structrue
|
|
//! Needs to be called before next export functions
|
|
int epep_read_export_directory(Epep *epep);
|
|
|
|
/// Gives name of the DLL
|
|
//! epep_read_export_directory needs to be called before
|
|
int epep_get_dll_name_s(Epep *epep, char *name, size_t name_max);
|
|
|
|
/// Gives entry from Export Name Pointer Table by its index
|
|
//! epep_read_export_directory needs to be called before
|
|
int epep_get_export_name_pointer_by_index(Epep *epep, size_t *name_rva, size_t index);
|
|
|
|
/// Gives export name by its index in Export Address Table (receives name buffer length)
|
|
//! epep_read_export_directory needs to be called before
|
|
int epep_get_export_name_s_by_index(Epep *epep, char *name, size_t name_max, size_t index);
|
|
|
|
/// Gives export address by its index in Export Address Table
|
|
//! epep_read_export_directory needs to be called before
|
|
int epep_get_export_address_by_index(Epep *epep, EpepExportAddress *export_address, size_t index);
|
|
|
|
/// Gives forwarder string of Export Address
|
|
//! epep_read_export_directory needs to be called before
|
|
int epep_get_export_address_forwarder_s(Epep *epep, EpepExportAddress *export_address, char *forwarder, size_t forwarder_max);
|
|
|
|
/// Returns non-zero if the export address specifies forwarder string
|
|
//! epep_read_export_directory needs to be called before
|
|
int epep_export_address_is_forwarder(Epep *epep, EpepExportAddress *export_address);
|
|
|
|
//
|
|
// DLL Base Relocations
|
|
//
|
|
|
|
typedef struct {
|
|
size_t offset;
|
|
uint32_t PageRva;
|
|
uint32_t BlockSize;
|
|
uint16_t BaseRelocation[0];
|
|
} EpepBaseRelocationBlock;
|
|
|
|
typedef union {
|
|
struct {
|
|
uint16_t Offset: 12,
|
|
Type: 4;
|
|
};
|
|
uint16_t u16;
|
|
} EpepBaseRelocation;
|
|
|
|
/// Returns non-zero if the file contains Base Relocations
|
|
int epep_has_base_relocation_table(Epep *epep);
|
|
|
|
/// Places offset to Base Relocation Table into epep structure
|
|
int epep_read_base_relocation_table_offset(Epep *epep);
|
|
|
|
/// Gives first Base Relocation Block
|
|
int epep_get_first_base_relocation_block(Epep *epep, EpepBaseRelocationBlock *brb);
|
|
|
|
/// Gives next Base Relocation Block (replaces contents of the given block)
|
|
int epep_get_next_base_relocation_block(Epep *epep, EpepBaseRelocationBlock *it);
|
|
|
|
/// Gives Base Relocation by its index in Base Relocation Block
|
|
int epep_get_base_relocation_block_base_relocation_by_index(Epep *epep, EpepBaseRelocationBlock *brb, EpepBaseRelocation *br, size_t index);
|
|
|
|
//
|
|
// COFF Relocations
|
|
//
|
|
|
|
typedef struct {
|
|
uint32_t VirtualAddress;
|
|
uint32_t SymbolTableIndex;
|
|
uint16_t Type;
|
|
} EpepCoffRelocation;
|
|
|
|
int epep_get_section_relocation_by_index(Epep *epep, EpepSectionHeader *sh, EpepCoffRelocation *rel, size_t index);
|
|
|
|
//
|
|
// COFF Line Numbers
|
|
//
|
|
|
|
typedef struct {
|
|
union {
|
|
uint32_t SymbolTableIndex;
|
|
uint32_t VirtualAddress;
|
|
} Type;
|
|
uint16_t Linenumber;
|
|
} EpepCoffLinenumber;
|
|
|
|
int epep_get_section_line_number_by_index(Epep *epep, EpepSectionHeader *sh, EpepCoffLinenumber *ln, size_t index);
|
|
|
|
#ifdef EPEP_INST
|
|
|
|
//
|
|
// Private functions
|
|
//
|
|
|
|
static int epep_seek(Epep *epep, size_t offset) {
|
|
EPEP_READER_SEEK(&epep->reader, offset);
|
|
return 1;
|
|
}
|
|
|
|
static int epep_read_block(Epep *epep, size_t size, void *block) {
|
|
EPEP_READER_GET_BLOCK(&epep->reader, size, block);
|
|
return 1;
|
|
}
|
|
|
|
static int is_pe32(Epep *epep) {
|
|
return epep->optionalHeader.Magic == 0x10b;
|
|
}
|
|
|
|
static int is_pe32p(Epep *epep) {
|
|
return epep->optionalHeader.Magic == 0x20b;
|
|
}
|
|
|
|
static uint8_t epep_read_u8(Epep *epep) {
|
|
return EPEP_READER_GET(&epep->reader);
|
|
}
|
|
|
|
static uint16_t epep_read_u16(Epep *epep) {
|
|
unsigned l = epep_read_u8(epep);
|
|
unsigned h = epep_read_u8(epep);
|
|
return l | (h << 8);
|
|
}
|
|
|
|
static uint32_t epep_read_u32(Epep *epep) {
|
|
unsigned b0 = epep_read_u8(epep);
|
|
unsigned b1 = epep_read_u8(epep);
|
|
unsigned b2 = epep_read_u8(epep);
|
|
unsigned b3 = epep_read_u8(epep);
|
|
return b0 | (b1 << 8) | (b2 << 16) | (b3 << 24);
|
|
}
|
|
|
|
static uint64_t epep_read_u64(Epep *epep) {
|
|
uint64_t res = 0;
|
|
for (unsigned i = 0; i < 64; i += 8) {
|
|
res |= epep_read_u8(epep) << i;
|
|
}
|
|
return res;
|
|
}
|
|
|
|
static uint64_t epep_read_ptr(Epep *epep) {
|
|
return is_pe32(epep) ? epep_read_u32(epep) : epep_read_u64(epep);
|
|
}
|
|
|
|
//
|
|
// Generic
|
|
//
|
|
|
|
int epep_init(Epep *epep, EPEP_READER reader) {
|
|
*epep = (Epep){ 0 };
|
|
epep->kind = EPEP_IMAGE;
|
|
epep->reader = reader;
|
|
epep->error_code = EPEP_ERR_SUCCESS;
|
|
epep->signature_offset_offset = 0x3c;
|
|
epep_seek(epep, epep->signature_offset_offset);
|
|
epep->signature_offset = 0;
|
|
epep->signature_offset |= epep_read_u8(epep);
|
|
epep->signature_offset |= epep_read_u8(epep) << 8;
|
|
epep->signature_offset |= epep_read_u8(epep) << 16;
|
|
epep->signature_offset |= epep_read_u8(epep) << 24;
|
|
epep_seek(epep, epep->signature_offset);
|
|
char signature_buf[4];
|
|
signature_buf[0] = epep_read_u8(epep);
|
|
signature_buf[1] = epep_read_u8(epep);
|
|
signature_buf[2] = epep_read_u8(epep);
|
|
signature_buf[3] = epep_read_u8(epep);
|
|
if (signature_buf[0] != 'P' || signature_buf[1] != 'E' ||
|
|
signature_buf[2] != '\0' || signature_buf[3] != '\0') {
|
|
epep->kind = EPEP_OBJECT;
|
|
epep_seek(epep, 0);
|
|
}
|
|
epep->coffFileHeader.Machine = epep_read_u16(epep);
|
|
epep->coffFileHeader.NumberOfSections = epep_read_u16(epep);
|
|
epep->coffFileHeader.TimeDateStamp = epep_read_u32(epep);
|
|
epep->coffFileHeader.PointerToSymbolTable = epep_read_u32(epep);
|
|
epep->coffFileHeader.NumberOfSymbols = epep_read_u32(epep);
|
|
epep->coffFileHeader.SizeOfOptionalHeader = epep_read_u16(epep);
|
|
epep->coffFileHeader.Characteristics = epep_read_u16(epep);
|
|
if (epep->coffFileHeader.SizeOfOptionalHeader != 0) {
|
|
// Standard fields
|
|
epep->optionalHeader.Magic = epep_read_u16(epep);
|
|
epep->optionalHeader.MajorLinkerVersion = epep_read_u8(epep);
|
|
epep->optionalHeader.MinorLinkerVersion = epep_read_u8(epep);
|
|
epep->optionalHeader.SizeOfCode = epep_read_u32(epep);
|
|
epep->optionalHeader.SizeOfInitializedData = epep_read_u32(epep);
|
|
epep->optionalHeader.SizeOfUninitializedData = epep_read_u32(epep);
|
|
epep->optionalHeader.AddressOfEntryPoint = epep_read_u32(epep);
|
|
epep->optionalHeader.BaseOfCode = epep_read_u32(epep);
|
|
if (is_pe32(epep)) {
|
|
epep->optionalHeader.BaseOfData = epep_read_u32(epep);
|
|
}
|
|
// Windows-specific fields
|
|
epep->optionalHeader.ImageBase = epep_read_ptr(epep);
|
|
epep->optionalHeader.SectionAlignment = epep_read_u32(epep);
|
|
epep->optionalHeader.FileAlignment = epep_read_u32(epep);
|
|
epep->optionalHeader.MajorOperatingSystemVersion = epep_read_u16(epep);
|
|
epep->optionalHeader.MinorOperatingSystemVersion = epep_read_u16(epep);
|
|
epep->optionalHeader.MajorImageVersion = epep_read_u16(epep);
|
|
epep->optionalHeader.MinorImageVersion = epep_read_u16(epep);
|
|
epep->optionalHeader.MajorSubsystemVersion = epep_read_u16(epep);
|
|
epep->optionalHeader.Win32VersionValue = epep_read_u32(epep);
|
|
epep->optionalHeader.MinorSubsystemVersion = epep_read_u16(epep);
|
|
epep->optionalHeader.SizeOfImage = epep_read_u32(epep);
|
|
epep->optionalHeader.SizeOfHeaders = epep_read_u32(epep);
|
|
epep->optionalHeader.CheckSum = epep_read_u32(epep);
|
|
epep->optionalHeader.Subsystem = epep_read_u16(epep);
|
|
epep->optionalHeader.DllCharacteristics = epep_read_u16(epep);
|
|
epep->optionalHeader.SizeOfStackReserve = epep_read_ptr(epep);
|
|
epep->optionalHeader.SizeOfStackCommit = epep_read_ptr(epep);
|
|
epep->optionalHeader.SizeOfHeapReserve = epep_read_ptr(epep);
|
|
epep->optionalHeader.SizeOfHeapCommit = epep_read_ptr(epep);
|
|
epep->optionalHeader.LoaderFlags = epep_read_u32(epep);
|
|
epep->optionalHeader.NumberOfRvaAndSizes = epep_read_u32(epep);
|
|
epep->first_data_directory_offset = EPEP_READER_TELL(&epep->reader);
|
|
}
|
|
epep->first_section_header_offset = EPEP_READER_TELL(&epep->reader);
|
|
if (epep->coffFileHeader.SizeOfOptionalHeader != 0) {
|
|
epep->first_section_header_offset += epep->optionalHeader.NumberOfRvaAndSizes * sizeof(EpepImageDataDirectory);
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
int epep_get_file_offset_by_rva(Epep *epep, size_t *offset, size_t addr) {
|
|
EpepSectionHeader sh = { 0 };
|
|
if (!epep_get_section_header_by_rva(epep, &sh, addr)) {
|
|
return 0;
|
|
}
|
|
size_t diff = addr - sh.VirtualAddress;
|
|
if (diff >= sh.SizeOfRawData) {
|
|
epep->error_code = EPEP_ERR_ADDRESS_IS_OUT_OF_SECTION_RAW_DATA;
|
|
return 0;
|
|
}
|
|
*offset = sh.PointerToRawData + diff;
|
|
return 1;
|
|
}
|
|
|
|
//
|
|
// Data Directories
|
|
//
|
|
|
|
int epep_get_data_directory_by_index(Epep *epep, EpepImageDataDirectory *idd, size_t index) {
|
|
if (index >= epep->optionalHeader.NumberOfRvaAndSizes) {
|
|
epep->error_code = EPEP_ERR_DATA_DIRECTORY_INDEX_IS_INVALID;
|
|
return 0;
|
|
}
|
|
epep_seek(epep, epep->first_data_directory_offset + sizeof(EpepImageDataDirectory) * index);
|
|
idd->VirtualAddress = epep_read_u32(epep);
|
|
idd->Size = epep_read_u32(epep);
|
|
return 1;
|
|
}
|
|
|
|
//
|
|
// Sections
|
|
//
|
|
|
|
int epep_get_section_header_by_index(Epep *epep, EpepSectionHeader *sh, size_t index) {
|
|
if (index >= epep->coffFileHeader.NumberOfSections) {
|
|
epep->error_code = EPEP_ERR_SECTION_HEADER_INDEX_IS_INVALID;
|
|
return 0;
|
|
}
|
|
epep_seek(epep, epep->first_section_header_offset + sizeof(EpepSectionHeader) * index);
|
|
for (int i = 0; i < 8; i++) {
|
|
sh->Name[i] = epep_read_u8(epep);
|
|
}
|
|
sh->VirtualSize = epep_read_u32(epep);
|
|
sh->VirtualAddress = epep_read_u32(epep);
|
|
sh->SizeOfRawData = epep_read_u32(epep);
|
|
sh->PointerToRawData = epep_read_u32(epep);
|
|
sh->PointerToRelocations = epep_read_u32(epep);
|
|
sh->PointerToLinenumbers = epep_read_u32(epep);
|
|
sh->NumberOfRelocations = epep_read_u16(epep);
|
|
sh->NumberOfLinenumbers = epep_read_u16(epep);
|
|
sh->Characteristics = epep_read_u32(epep);
|
|
return 1;
|
|
}
|
|
|
|
int epep_get_section_header_by_rva(Epep *epep, EpepSectionHeader *sh, size_t addr) {
|
|
EpepSectionHeader sh0 = { 0 };
|
|
for (size_t i = 0; i < epep->coffFileHeader.NumberOfSections; i++) {
|
|
epep_get_section_header_by_index(epep, &sh0, i);
|
|
if (addr >= sh0.VirtualAddress && addr < (sh0.VirtualAddress + sh0.VirtualSize)) {
|
|
*sh = sh0;
|
|
return 1;
|
|
}
|
|
}
|
|
epep->error_code = EPEP_ERR_ADDRESS_IS_OUT_OF_ANY_SECTION;
|
|
return 0;
|
|
}
|
|
|
|
int epep_get_section_contents(Epep *epep, EpepSectionHeader *sh, void *buf) {
|
|
size_t size_of_raw_data = sh->SizeOfRawData;
|
|
epep_seek(epep, sh->PointerToRawData);
|
|
epep_read_block(epep, size_of_raw_data, buf);
|
|
return 1;
|
|
}
|
|
|
|
//
|
|
// COFF Symbols
|
|
//
|
|
|
|
int epep_get_string_table_size(Epep *epep, size_t *size) {
|
|
epep_seek(epep, epep->coffFileHeader.PointerToSymbolTable + 18 * epep->coffFileHeader.NumberOfSymbols);
|
|
*size = epep_read_u32(epep);
|
|
return 1;
|
|
}
|
|
|
|
int epep_get_string_table(Epep *epep, char *string_table) {
|
|
size_t size = 0;
|
|
if (!epep_get_string_table_size(epep, &size)) {
|
|
return 0;
|
|
}
|
|
// A COFF strings table starts with its size
|
|
*string_table++ = (size & 0x000000ff) >> 0;
|
|
*string_table++ = (size & 0x0000ff00) >> 8;
|
|
*string_table++ = (size & 0x00ff0000) >> 16;
|
|
*string_table++ = (size & 0xff000000) >> 24;
|
|
epep_read_block(epep, size - 4, string_table);
|
|
return 1;
|
|
}
|
|
|
|
int epep_get_symbol_by_index(Epep *epep, EpepCoffSymbol *sym, size_t index) {
|
|
if (epep->kind != EPEP_OBJECT) {
|
|
epep->error_code = EPEP_ERR_NOT_AN_OBJECT;
|
|
return 0;
|
|
}
|
|
if (index >= epep->coffFileHeader.NumberOfSymbols) {
|
|
epep->error_code = EPEP_ERR_SYMBOL_INDEX_IS_INVALID;
|
|
return 0;
|
|
}
|
|
epep_seek(epep, epep->coffFileHeader.PointerToSymbolTable + 18 * index);
|
|
for (size_t i = 0; i < 18; i++) {
|
|
sym->auxFile.FileName[i] = epep_read_u8(epep);
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
//
|
|
// Imports
|
|
//
|
|
|
|
int epep_has_import_table(Epep *epep) {
|
|
if (epep->kind != EPEP_IMAGE) {
|
|
return 0;
|
|
}
|
|
EpepImageDataDirectory idd = { 0 };
|
|
if (!epep_get_data_directory_by_index(epep, &idd, 1)) {
|
|
return 0;
|
|
}
|
|
return idd.VirtualAddress;
|
|
}
|
|
|
|
int epep_read_import_table_offset(Epep *epep) {
|
|
EpepImageDataDirectory import_table_dd = { 0 };
|
|
if (!epep_get_data_directory_by_index(epep, &import_table_dd, 1)) {
|
|
return 0;
|
|
}
|
|
if (!epep_get_file_offset_by_rva(epep, &epep->import_table_offset, import_table_dd.VirtualAddress)) {
|
|
return 0;
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
int epep_get_import_directory_by_index(Epep *epep, EpepImportDirectory *import_directory, size_t index) {
|
|
if (epep->import_table_offset == 0) {
|
|
if (!epep_read_import_table_offset(epep)) {
|
|
return 0;
|
|
}
|
|
}
|
|
epep_seek(epep, epep->import_table_offset + index * sizeof(*import_directory));
|
|
epep_read_block(epep, sizeof(*import_directory), import_directory);
|
|
return 1;
|
|
}
|
|
|
|
int epep_get_import_directory_name_s(Epep *epep, EpepImportDirectory *import_directory, char *name, size_t name_max) {
|
|
size_t name_rva = import_directory->NameRva;
|
|
size_t name_offset = 0;
|
|
if (!epep_get_file_offset_by_rva(epep, &name_offset, name_rva)) {
|
|
return 0;
|
|
}
|
|
epep_seek(epep, name_offset);
|
|
epep_read_block(epep, name_max, name);
|
|
return 1;
|
|
}
|
|
|
|
int epep_get_import_directory_lookup_by_index(Epep *epep, EpepImportDirectory *import_directory, size_t *lookup, size_t index) {
|
|
size_t first_lookup_offset = 0;
|
|
if (!epep_get_file_offset_by_rva(epep, &first_lookup_offset, import_directory->ImportLookupTableRva)) {
|
|
return 0;
|
|
}
|
|
size_t size_of_lookup = is_pe32(epep) ? 4 : 8;
|
|
size_t lookup_offset = first_lookup_offset + size_of_lookup * index;
|
|
epep_seek(epep, lookup_offset);
|
|
epep_read_block(epep, size_of_lookup, lookup);
|
|
return 1;
|
|
}
|
|
|
|
int epep_get_lookup_name_s(Epep *epep, size_t lookup, char *name, size_t name_max) {
|
|
if (name_max == 0) {
|
|
epep->error_code = EPEP_ERR_OUTPUT_CAPACITY_IS_ZERO;
|
|
return 0;
|
|
}
|
|
if (name == NULL) {
|
|
epep->error_code = EPEP_ERR_OUTPUT_IS_NULL;
|
|
return 0;
|
|
}
|
|
uint64_t mask = is_pe32(epep) ? 0x80000000 : 0x8000000000000000;
|
|
if (lookup & mask) {
|
|
name[0] = '\0';
|
|
return 1;
|
|
}
|
|
size_t name_rva = lookup;
|
|
size_t name_offset = 0;
|
|
if (!epep_get_file_offset_by_rva(epep, &name_offset, name_rva)) {
|
|
return 0;
|
|
}
|
|
// skip 2 bytes (Name Table :: Hint)
|
|
name_offset += 2;
|
|
epep_seek(epep, name_offset);
|
|
epep_read_block(epep, name_max, name);
|
|
return 1;
|
|
}
|
|
|
|
//
|
|
// Exports
|
|
//
|
|
|
|
int epep_has_export_table(Epep *epep) {
|
|
if (epep->kind != EPEP_IMAGE) {
|
|
return 0;
|
|
}
|
|
EpepImageDataDirectory idd = { 0 };
|
|
if (!epep_get_data_directory_by_index(epep, &idd, 0)) {
|
|
return 0;
|
|
}
|
|
return idd.VirtualAddress;
|
|
}
|
|
|
|
int epep_read_export_table_offset(Epep *epep) {
|
|
EpepImageDataDirectory export_table_dd = { 0 };
|
|
if (!epep_get_data_directory_by_index(epep, &export_table_dd, 0)) {
|
|
return 0;
|
|
}
|
|
if (!epep_get_file_offset_by_rva(epep, &epep->export_table_offset, export_table_dd.VirtualAddress)) {
|
|
return 0;
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
int epep_read_export_directory(Epep *epep) {
|
|
if (epep->export_table_offset == 0) {
|
|
if (!epep_read_export_table_offset(epep)) {
|
|
return 0;
|
|
}
|
|
}
|
|
epep_seek(epep, epep->export_table_offset);
|
|
epep_read_block(epep, sizeof(epep->export_directory), &epep->export_directory);
|
|
return 1;
|
|
}
|
|
|
|
int epep_get_dll_name_s(Epep *epep, char *name, size_t name_max) {
|
|
size_t offset = 0;
|
|
if (!epep_get_file_offset_by_rva(epep, &offset, epep->export_directory.NameRva)) {
|
|
return 0;
|
|
}
|
|
epep_seek(epep, offset);
|
|
epep_read_block(epep, name_max, name);
|
|
return 1;
|
|
}
|
|
|
|
int epep_get_export_name_pointer_by_index(Epep *epep, size_t *name_rva, size_t index) {
|
|
size_t name_pointer_table_rva = epep->export_directory.NamePointerRva;
|
|
size_t name_pointer_table_offset = 0;
|
|
if (!epep_get_file_offset_by_rva(epep, &name_pointer_table_offset, name_pointer_table_rva)) {
|
|
return 0;
|
|
}
|
|
epep_seek(epep, name_pointer_table_offset + sizeof(uint32_t) * index);
|
|
*name_rva = epep_read_u32(epep);
|
|
return 1;
|
|
}
|
|
|
|
int epep_get_export_name_s_by_index(Epep *epep, char *name, size_t name_max, size_t index) {
|
|
size_t ordinal_table_offset = 0;
|
|
if (!epep_get_file_offset_by_rva(epep, &ordinal_table_offset, epep->export_directory.OrdinalTableRva)) {
|
|
return 0;
|
|
}
|
|
epep_seek(epep, ordinal_table_offset);
|
|
for (size_t i = 0; i < epep->export_directory.NumberOfNamePointers; i++) {
|
|
uint16_t ordinal = epep_read_u16(epep);
|
|
if (ordinal == index) { // SPEC_VIOL: Why should not epep->export_directory.OrdinalBase be substracted?
|
|
size_t name_rva = 0;
|
|
if (!epep_get_export_name_pointer_by_index(epep, &name_rva, i)) {
|
|
return 0;
|
|
}
|
|
size_t name_offset = 0;
|
|
if (!epep_get_file_offset_by_rva(epep, &name_offset, name_rva)) {
|
|
return 0;
|
|
}
|
|
epep_seek(epep, name_offset);
|
|
epep_read_block(epep, name_max, name);
|
|
return 1;
|
|
}
|
|
}
|
|
epep->error_code = EPEP_ERR_EXPORT_ADDRESS_TABLE_ENTRY_NAME_NOT_FOUND;
|
|
return 0;
|
|
}
|
|
|
|
int epep_get_export_address_by_index(Epep *epep, EpepExportAddress *export_address, size_t index) {
|
|
size_t export_address_table_offset = 0;
|
|
if (!epep_get_file_offset_by_rva(epep, &export_address_table_offset, epep->export_directory.ExportAddressTableRva)) {
|
|
return 0;
|
|
}
|
|
EPEP_ASSERT(sizeof(EpepExportAddress) == sizeof(uint32_t));
|
|
epep_seek(epep, export_address_table_offset + sizeof(EpepExportAddress) * index);
|
|
epep_read_block(epep, sizeof(*export_address), export_address);
|
|
return 1;
|
|
}
|
|
|
|
int epep_get_export_address_forwarder_s(Epep *epep, EpepExportAddress *export_address, char *forwarder, size_t forwarder_max) {
|
|
size_t forwarder_offset = 0;
|
|
if (!epep_get_file_offset_by_rva(epep, &forwarder_offset, export_address->ForwarderRva)) {
|
|
return 0;
|
|
}
|
|
epep_seek(epep, forwarder_offset);
|
|
epep_read_block(epep, forwarder_max, forwarder);
|
|
return 1;
|
|
}
|
|
|
|
int epep_export_address_is_forwarder(Epep *epep, EpepExportAddress *export_address) {
|
|
EpepImageDataDirectory edd = { 0 };
|
|
if (!epep_get_data_directory_by_index(epep, &edd, 0)) {
|
|
return 0;
|
|
}
|
|
if (export_address->ForwarderRva >= edd.VirtualAddress && export_address->ForwarderRva < edd.VirtualAddress + edd.Size) {
|
|
return 1;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
//
|
|
// DLL Base Relocaions
|
|
//
|
|
|
|
int epep_has_base_relocation_table(Epep *epep) {
|
|
EpepImageDataDirectory brtdd = { 0 };
|
|
if (!epep_get_data_directory_by_index(epep, &brtdd, 5)) {
|
|
return 0;
|
|
}
|
|
if (brtdd.VirtualAddress == 0) {
|
|
return 0;
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
int epep_read_base_relocation_table_offset(Epep *epep) {
|
|
EpepImageDataDirectory brtdd = { 0 };
|
|
if (!epep_get_data_directory_by_index(epep, &brtdd, 5)) {
|
|
return 0;
|
|
}
|
|
if (!epep_get_file_offset_by_rva(epep, &epep->base_relocation_table_offset, brtdd.VirtualAddress)) {
|
|
return 0;
|
|
}
|
|
epep->base_relocation_table_end_offset = epep->base_relocation_table_offset + brtdd.Size;
|
|
return 1;
|
|
}
|
|
|
|
int epep_get_first_base_relocation_block(Epep *epep, EpepBaseRelocationBlock *brb) {
|
|
if (epep->base_relocation_table_offset == 0) {
|
|
if (!epep_read_base_relocation_table_offset(epep)) {
|
|
return 0;
|
|
}
|
|
}
|
|
if (epep->base_relocation_table_offset == 0) {
|
|
epep->error_code = EPEP_ERR_NO_BASE_RELOCATION_TABLE;
|
|
return 0;
|
|
}
|
|
if (!epep_seek(epep, epep->base_relocation_table_offset)) {
|
|
return 0;
|
|
}
|
|
brb->offset = epep->base_relocation_table_offset;
|
|
brb->PageRva = epep_read_u32(epep);
|
|
brb->BlockSize = epep_read_u32(epep);
|
|
return 1;
|
|
}
|
|
|
|
int epep_get_next_base_relocation_block(Epep *epep, EpepBaseRelocationBlock *it) {
|
|
if (it->offset == 0) {
|
|
epep->error_code = EPEP_ERR_BASE_RELOCATION_IS_ALREADY_END;
|
|
return 0;
|
|
}
|
|
it->offset = it->offset + it->BlockSize;
|
|
if (it->offset >= epep->base_relocation_table_end_offset) {
|
|
*it = (EpepBaseRelocationBlock){ 0 };
|
|
return 1;
|
|
}
|
|
if (!epep_seek(epep, it->offset)) {
|
|
return 0;
|
|
}
|
|
it->PageRva = epep_read_u32(epep);
|
|
it->BlockSize = epep_read_u32(epep);
|
|
return 1;
|
|
}
|
|
|
|
int epep_get_base_relocation_block_base_relocation_by_index(Epep *epep, EpepBaseRelocationBlock *brb, EpepBaseRelocation *br, size_t index) {
|
|
if (!epep_seek(epep, brb->offset + 8 + sizeof(EpepBaseRelocation) * index)) {
|
|
return 0;
|
|
}
|
|
br->u16 = epep_read_u16(epep);
|
|
return 1;
|
|
}
|
|
|
|
//
|
|
// COFF Relocations
|
|
//
|
|
|
|
int epep_get_section_relocation_by_index(Epep *epep, EpepSectionHeader *sh, EpepCoffRelocation *rel, size_t index) {
|
|
size_t relocationsOffset = sh->PointerToRelocations;
|
|
epep_seek(epep, relocationsOffset + 10 * index);
|
|
epep_read_block(epep, 10, rel);
|
|
return 1;
|
|
}
|
|
|
|
//
|
|
// COFF Line Numbers
|
|
//
|
|
|
|
int epep_get_section_line_number_by_index(Epep *epep, EpepSectionHeader *sh, EpepCoffLinenumber *ln, size_t index) {
|
|
size_t LinenumbersOffset = sh->PointerToLinenumbers;
|
|
epep_seek(epep, LinenumbersOffset + 6 * index);
|
|
epep_read_block(epep, 6, ln);
|
|
return 1;
|
|
}
|
|
|
|
#endif // EPEP_INST
|