arch_debug.c

newos is new operation system

/*
** Copyright 2001-2002, Travis Geiselbrecht. All rights reserved.
** Distributed under the terms of the NewOS License.
*/
#include <kernel/kernel.h>
#include <kernel/thread.h>
#include <kernel/debug.h>
#include <kernel/elf.h>
#include <kernel/arch/debug.h>
#include <kernel/arch/i386/cpu.h>

static void dbg_stack_trace(int argc, char **argv)
{
	struct thread *t;
	uint32 ebp;
	int i;

	if(argc < 2)
		t = thread_get_current_thread();
	else {
		dprintf("not supported\n");
		return;
	}

	for(i=0; i<t->arch_info.iframe_ptr; i++) {
		char *temp = (char *)t->arch_info.iframes[i];
		dprintf("iframe %p %p %p\n", temp, temp + sizeof(struct iframe), temp + sizeof(struct iframe) - 8);
	}

	dprintf("stack trace for thread 0x%x '%s'\n", t->id, t->name);
	dprintf("frame     \tcaller:<base function+offset>\n");
	dprintf("-------------------------------\n");

	read_ebp(ebp);
	for(;;) {
		bool is_iframe = false;
		// see if the ebp matches the iframe
		for(i=0; i<t->arch_info.iframe_ptr; i++) {
			if(ebp == ((uint32) t->arch_info.iframes[i] - 8)) {
				// it's an iframe
				is_iframe = true;
			}
		}

		if(is_iframe) {
			struct iframe *frame = (struct iframe *)(ebp + 8);
			dprintf("iframe at %p\n", frame);
			dprintf(" eax\t0x%x\tebx\t0x%x\tecx\t0x%x\tedx\t0x%x\n", frame->eax, frame->ebx, frame->ecx, frame->edx);
			dprintf(" esi\t0x%x\tedi\t0x%x\tebp\t0x%x\tesp\t0x%x\n", frame->esi, frame->edi, frame->ebp, frame->esp);
			dprintf(" eip\t0x%x\teflags\t0x%x", frame->eip, frame->flags);
			if((frame->error_code & 0x4) != 0) {
				// from user space
				dprintf("\tuser esp\t0x%x", frame->user_esp);
			}
			dprintf("\n");
			dprintf(" vector\t0x%x\terror code\t0x%x\n", frame->vector, frame->error_code);
 			ebp = frame->ebp;
		} else {
			uint32 eip = *((uint32 *)ebp + 1);
			char symname[256];
			addr_t base_address;

			if(eip == 0 || ebp == 0)
				break;

			if(elf_reverse_lookup_symbol(eip, &base_address, symname, sizeof(symname)) >= 0) {
				dprintf("0x%x\t0x%x:<0x%x+0x%x>\t'%s'\n", ebp, eip, (unsigned int)base_address,
					(unsigned int)(eip - base_address), symname);
			} else {
				dprintf("0x%x\t0x%x\n", ebp, eip);
			}
			ebp = *(uint32 *)ebp;
		}
	}
}

int arch_dbg_init(kernel_args *ka)
{
	return NO_ERROR;
}

int arch_dbg_init2(kernel_args *ka)
{
	// at this stage, the debugger command system is alive

	dbg_add_command(&dbg_stack_trace, "bt", "Stack crawl for current thread");

	return NO_ERROR;
}

void dbg_make_register_file(unsigned int *file, const struct iframe * frame)
{
	file[0] = frame->eax;
	file[1] = frame->ebx;
	file[2] = frame->ecx;
	file[3] = frame->edx;
	file[4] = frame->esp;
	file[5] = frame->ebp;
	file[6] = frame->esi;
	file[7] = frame->edi;
	file[8] = frame->eip;
	file[9] = frame->flags;
	file[10] = frame->cs;
	file[11] = frame->user_ss;
	file[12] = frame->ds;
	file[13] = frame->es;
}