static int set_pe_context(Context * ctx, int frame, ContextAddress ip, HANDLE process, IMAGEHLP_STACK_FRAME * stack_frame) {
if (get_stack_frame(ctx, frame, ip, stack_frame) < 0) return -1;
if (!SymSetContext(process, stack_frame, NULL)) {
DWORD err = GetLastError();
if (err == ERROR_SUCCESS) {
/* Don't know why Windows do that */
}
else if (err == ERROR_MOD_NOT_FOUND && frame != STACK_NO_FRAME) {
/* No local symbols data, search global scope */
if (get_stack_frame(ctx, STACK_NO_FRAME, 0, stack_frame) < 0) return -1;
if (!SymSetContext(process, stack_frame, NULL)) {
err = GetLastError();
if (err != ERROR_SUCCESS) {
set_win32_errno(err);
return -1;
}
}
}
else if (err == ERROR_NOT_SUPPORTED) {
/* Compiled without debug info */
errno = ERR_SYM_NOT_FOUND;
return -1;
}
else {
set_win32_errno(err);
return -1;
}
}
return 0;
}
/*! Captures a stack trace (the return addresses) of the current thread.
\param returnAddresses The array the return address shall be written to.
\param maxCount The maximum number of return addresses to be captured.
\param skipFrames The number of stack frames that shall be skipped.
\param stackBase The base address of the thread stack.
\param stackEnd The first address past the thread stack.
\return The number of return addresses written to the given array.
*/
int32
__arch_get_stack_trace(addr_t* returnAddresses, int32 maxCount,
int32 skipFrames, addr_t stackBase, addr_t stackEnd)
{
int32 count = 0;
addr_t basePointer = (addr_t)get_stack_frame();
while (basePointer != 0 && count < maxCount) {
if (basePointer < stackBase || basePointer >= stackEnd)
break;
struct stack_frame {
addr_t previous;
addr_t return_address;
};
stack_frame* frame = (stack_frame*)basePointer;
if (skipFrames <= 0)
returnAddresses[count++] = frame->return_address;
else
skipFrames--;
basePointer = frame->previous;
}
return count;
}
int enumerate_symbols(Context * ctx, int frame, EnumerateSymbolsCallBack * call_back, void * args) {
ULONG64 buffer[(sizeof(SYMBOL_INFO) + MAX_SYM_NAME * sizeof(TCHAR) + sizeof(ULONG64) - 1) / sizeof(ULONG64)];
SYMBOL_INFO * symbol = (SYMBOL_INFO *)buffer;
IMAGEHLP_STACK_FRAME stack_frame;
EnumerateSymbolsContext enum_context;
HANDLE process = get_context_handle(ctx->parent == NULL ? ctx : ctx->parent);
symbol->SizeOfStruct = sizeof(SYMBOL_INFO);
symbol->MaxNameLen = MAX_SYM_NAME;
if (frame == STACK_TOP_FRAME) frame = get_top_frame(ctx);
if (frame == STACK_TOP_FRAME) return -1;
if (get_stack_frame(ctx, frame, 0, &stack_frame) < 0) return -1;
if (!SymSetContext(process, &stack_frame, NULL)) {
DWORD err = GetLastError();
if (err == ERROR_SUCCESS) {
/* Don't know why Windows does that */
}
else {
set_win32_errno(err);
return -1;
}
}
enum_context.ctx = ctx;
enum_context.frame = frame;
enum_context.call_back = call_back;
enum_context.args = args;
if (!SymEnumSymbols(process, 0, NULL, enumerate_symbols_proc, &enum_context)) {
set_win32_errno(GetLastError());
return -1;
}
return 0;
}
