/***************************************************************/
/* perk: PE Resource Kit */
/* Copyright (C) 2015--2021 SysDeer Technologies, LLC */
/* Released under GPLv2 and GPLv3; see COPYING.PERK. */
/***************************************************************/
#include <string.h>
#include <perk/perk.h>
#include <perk/perk_consts.h>
#include <perk/perk_structs.h>
#include "perk_endian_impl.h"
#include "perk_reader_impl.h"
int pe_read_import_header(const struct pe_raw_import_hdr * p, struct pe_meta_import_hdr * m)
{
m->ih_import_lookup_tbl_rva = pe_read_long(p->ih_import_lookup_tbl_rva);
m->ih_time_date_stamp = pe_read_long(p->ih_time_date_stamp);
m->ih_forwarder_chain = pe_read_long(p->ih_forwarder_chain);
m->ih_name_rva = pe_read_long(p->ih_name_rva);
m->ih_import_addr_tbl_rva = pe_read_long(p->ih_import_addr_tbl_rva);
m->ih_name = 0;
m->ih_aitems = 0;
return 0;
}
int pe_read_import_lookup(
const unsigned char * p,
struct pe_meta_import_lookup * m,
uint32_t magic)
{
switch (magic) {
case PE_MAGIC_PE32:
m->u.ii_import_lookup_entry_64 = pe_read_long(p);
m->ii_flag = (uint32_t)m->u.ii_import_lookup_entry_64 >> 31;
break;
case PE_MAGIC_PE32_PLUS:
m->u.ii_import_lookup_entry_64 = pe_read_quad(p);
m->ii_flag = m->u.ii_import_lookup_entry_64 >> 63;
break;
default:
return PERK_ERR_BAD_IMAGE_TYPE;
}
if (m->ii_flag) {
m->ii_ordinal = m->u.ii_import_lookup_entry_32 & 0xffff;
m->ii_hint_name_tbl_rva = 0;
} else {
m->ii_ordinal = 0;
m->ii_hint_name_tbl_rva = m->u.ii_import_lookup_entry_32 & 0x7fffffff;
}
m->ii_hint = 0;
m->ii_name = 0;
return 0;
}