1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
|
/*****************************************************************************/
/* pemagination: a (virtual) tour into portable bits and executable bytes */
/* Copyright (C) 2013--2020 SysDeer Technologies, LLC */
/* Released under GPLv2 and GPLv3; see COPYING.PEMAGINE. */
/*****************************************************************************/
#include <psxtypes/psxtypes.h>
#include <pemagine/pe_consts.h>
#include <pemagine/pe_structs.h>
#include <pemagine/pemagine.h>
int pe_enum_image_exports(
const void * base,
pe_enum_image_exports_callback * callback,
struct pe_export_sym * sym,
void * ctx)
{
int ret;
uint32_t idx;
uint32_t * offset;
struct pe_raw_export_hdr * exp_hdr;
uint32_t * count;
uint32_t * fn_addr;
uint32_t * fn_names;
uint16_t * fn_ordinals;
if (!(exp_hdr = pe_get_image_export_hdr_addr(base,0))) {
callback(base,0,0,PE_CALLBACK_REASON_ERROR,ctx);
return -1;
}
offset = (uint32_t *)(exp_hdr->eh_export_addr_tbl_rva);
fn_addr = (uint32_t *)pe_va_from_rva(base,*offset);
offset = (uint32_t *)(exp_hdr->eh_name_ptr_rva);
fn_names = (uint32_t *)pe_va_from_rva(base,*offset);
offset = (uint32_t *)(exp_hdr->eh_ordinal_tbl_rva);
fn_ordinals = (uint16_t *)pe_va_from_rva(base,*offset);
if ((ret = callback(base,exp_hdr,0,PE_CALLBACK_REASON_INIT,ctx)) <= 0)
return ret;
count = (uint32_t *)exp_hdr->eh_num_of_name_ptrs;
sym->ordinal_base = (uint32_t *)exp_hdr->eh_ordinal_base;
for (idx=0; idx<*count; idx++) {
offset = (uint32_t *)pe_va_from_rva(fn_names,idx*sizeof(uint32_t));
sym->name = (char *)pe_va_from_rva(base,*offset);
sym->ordinal = (uint16_t *)pe_va_from_rva(fn_ordinals,idx*sizeof(uint16_t));
offset = (uint32_t *)pe_va_from_rva(fn_addr,(*sym->ordinal)*sizeof(uint32_t));
sym->addr = pe_va_from_rva(base,*offset);
if ((ret = callback(base,exp_hdr,sym,PE_CALLBACK_REASON_ITEM,ctx)) <= 0)
return ret;
}
return callback(base,exp_hdr,sym,PE_CALLBACK_REASON_DONE,ctx);
}
|