summaryrefslogtreecommitdiffhomepage
path: root/src
diff options
context:
space:
mode:
authormidipix <writeonce@midipix.org>2016-11-15 20:36:39 -0500
committermidipix <writeonce@midipix.org>2016-11-15 21:10:14 -0500
commit67b1e98a64e5f5160dce4535ab38052031cef965 (patch)
tree49a5f4720e663d0dd99c1ccf9b0962c4be7d1378 /src
parent7ec070f975589374d651b391e55e4f073dbe1fab (diff)
downloadperk-67b1e98a64e5f5160dce4535ab38052031cef965.tar.bz2
perk-67b1e98a64e5f5160dce4535ab38052031cef965.tar.xz
pe_get_image_meta(): added coff string table and long section name support.
Diffstat (limited to 'src')
-rw-r--r--src/logic/pe_get_image_meta.c19
1 files changed, 17 insertions, 2 deletions
diff --git a/src/logic/pe_get_image_meta.c b/src/logic/pe_get_image_meta.c
index 5f31a9a..9fcd157 100644
--- a/src/logic/pe_get_image_meta.c
+++ b/src/logic/pe_get_image_meta.c
@@ -165,7 +165,9 @@ int pe_get_image_meta(
struct pe_image_meta ** meta)
{
int i,s,status;
+ long l;
unsigned j;
+ unsigned char * mark;
struct pe_image_meta * m;
char * base = image->addr;
@@ -184,7 +186,14 @@ int pe_get_image_meta(
return pe_free_image_meta_impl(m,
PERK_CUSTOM_ERROR(dctx,status));
- m->aopt = (union pe_opt_hdr *)((char *)m->acoff + sizeof(m->coff));
+ mark = image->addr + m->coff.ptr_to_sym_tbl;
+ mark += m->coff.num_of_syms * sizeof(struct pe_coff_sym_entry);
+
+ m->coff.ptr_to_string_tbl = m->coff.ptr_to_sym_tbl;
+ m->coff.ptr_to_string_tbl += m->coff.num_of_syms * sizeof(struct pe_coff_sym_entry);
+ m->coff.size_of_string_tbl = pe_read_long(mark);
+
+ m->aopt = (union pe_opt_hdr *)((char *)m->acoff + sizeof(*m->acoff));
if ((status = (pe_read_optional_header(m->aopt,&m->opt))))
return pe_free_image_meta_impl(m,
@@ -196,9 +205,15 @@ int pe_get_image_meta(
return pe_free_image_meta_impl(m,
PERK_SYSTEM_ERROR(dctx));
- for (i=0; i<m->coff.num_of_sections; i++)
+ for (i=0; i<m->coff.num_of_sections; i++) {
pe_read_section_header(&m->asectbl[i],&m->sectbl[i]);
+ if (m->sectbl[i].name[0] == '/')
+ if ((l = strtol(&m->sectbl[i].name[1],0,10)) > 0)
+ if (l < m->coff.size_of_string_tbl)
+ m->sectbl[i].long_name = base + m->coff.ptr_to_string_tbl + l;
+ }
+
/* .edata */
i = pe_get_named_section_index(m,".edata");
s = pe_get_block_section_index(m,&m->opt.dirs.export_tbl);