Subversion Repositories HelenOS

/*

 * Copyright (c) 2008 Jiri Svoboda

 * All rights reserved.

 *

 * Redistribution and use in source and binary forms, with or without

 * modification, are permitted provided that the following conditions

 * are met:

 *

 * - Redistributions of source code must retain the above copyright

 *   notice, this list of conditions and the following disclaimer.

 * - Redistributions in binary form must reproduce the above copyright

 *   notice, this list of conditions and the following disclaimer in the

 *   documentation and/or other materials provided with the distribution.

 * - The name of the author may not be used to endorse or promote products

 *   derived from this software without specific prior written permission.

 *

 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR

 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES

 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.

 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,

 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT

 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,

 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY

 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT

 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF

 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

 */

/** @addtogroup debug

 * @{

 */

/** @file

 */

#include <stdio.h>

#include <stdlib.h>

#include <string.h>

#include <bool.h>

#include <udebug.h>

#include <sys/types.h>

#include "main.h"

#include "cons.h"

#include "dthread.h"

#include "include/arch.h"

#include "cmd.h"

static void cmd_break(int argc, char *argv[]);

static void cmd_ct(int argc, char *argv[]);

static void cmd_go(int argc, char *argv[]);

static void cmd_istep(int argc, char *argv[]);

void	    cmd_help(int argc, char *argv[]);

static void cmd_memr(int argc, char *argv[]);

static void cmd_pwt(int argc, char *argv[]);

static void cmd_regs(int argc, char *argv[]);

static void cmd_stop(int argc, char *argv[]);

static void cmd_threads(int argc, char *argv[]);

static void cmd_quit(int argc, char *argv[]);

volatile bool quit = false;

cmd_desc_t cmd_table[] = {

	{ 1,	"break",	cmd_break },

	{ 1,	"ct",		cmd_ct },

	{ 0,	"go",		cmd_go },

	{ 0,	"help",		cmd_help },

	{ 2,	"memr",		cmd_memr },

	{ 0,	"pwt",		cmd_pwt },

	{ 0,	"regs",		cmd_regs },

	{ 0 ,	"stop",		cmd_stop },

	{ 0,	"istep",	cmd_istep },

	{ 0,	"threads",	cmd_threads },

	{ 0,	"quit",		cmd_quit },

	{ -1,	NULL,		NULL }

};

static void cmd_break(int argc, char *argv[])

{

	uintptr_t addr;

	(void)argc;

	addr = strtoul(argv[1], NULL, 0);

	cons_printf("You requested a breakpoint at 0x%x\n", addr);

	arch_breakpoint_add(addr);

}

static void cmd_ct(int argc, char *argv[])

{

	int tid;

	link_t *cur;

	dthread_t *dt;

	(void)argc;

	tid = strtoul(argv[1], NULL, 0);

	dt = NULL;

	for (cur = dthreads.next; cur != &dthreads; cur = cur->next) {

		dt = list_get_instance(cur, dthread_t, link);

		if (dt->id == tid) break;

	}

	if (dt->id == tid) {

		cwt = dt;

		cons_printf("changed working thread to: %d [hash 0x%x]\n",

		    cwt->id, cwt->hash);

	} else {

		cons_printf("no such thread\n");

	}

}

void cmd_go(int argc, char *argv[])

{

	link_t *cur;

	dthread_t *dt;

	(void)argc; (void)argv;

	dt = NULL;

	for (cur = dthreads.next; cur != &dthreads; cur = cur->next) {

		dt = list_get_instance(cur, dthread_t, link);

		dthread_resume(dt);

	}	

}

void cmd_help(int argc, char *argv[])

{

	int i;

	(void)argc; (void)argv;

	i = 0;

	while (cmd_table[i].name != NULL) {

		cons_printf("%s\n", cmd_table[i].name);

		++i;

	}

}

void cmd_istep(int argc, char *argv[])

{

	(void)argc; (void)argv;

	/*TODO*/

}

#define BYTES_PER_LINE 16

static void cmd_memr(int argc, char *argv[])

{

	uintptr_t addr;

	size_t length;

	uint8_t buf[BYTES_PER_LINE];

	int to_read, i;

	int rc;

	(void)argc;

	addr = strtoul(argv[1], NULL, 0);

	length = strtoul(argv[2], NULL, 0);

	while (length > 0) {

		to_read = length < BYTES_PER_LINE ? length : BYTES_PER_LINE;

		rc = udebug_mem_read(app_phone, buf, addr, to_read);

		if (rc < 0) {

			cons_printf("error %d\n", rc);

			return;

		}

		cons_printf("0x%x:", addr);

		for (i = 0; i < to_read; ++i) {

			cons_printf(" %02x", buf[i]);

		}

		for (i = to_read; i < BYTES_PER_LINE; ++i) {

			cons_printf("   ");

		}

		putchar ('\t');

		for (i = 0; i < to_read; ++i) {

			if (buf[i] >= 32 && buf[i] < 127)

				putchar(buf[i]);

			else

				putchar('.');

		}

		cons_printf("\n");

		addr += to_read;

		length -= to_read;

	}

}

void cmd_pwt(int argc, char *argv[])

{

	(void)argc; (void)argv;

	cons_printf("working thread: %d [hash 0x%x]\n", cwt->id, cwt->hash);

}

void cmd_regs(int argc, char *argv[])

{

	(void)argc; (void)argv;

	if (cwt) arch_dump_regs(cwt->hash);

}

void cmd_stop(int argc, char *argv[])

{

	link_t *cur;

	dthread_t *dt;

	int rc;

	(void)argc; (void)argv;

	dt = NULL;

	for (cur = dthreads.next; cur != &dthreads; cur = cur->next) {

		dt = list_get_instance(cur, dthread_t, link);

		if (!dt->stopped) {

			rc = udebug_stop(app_phone, dt->hash);

			if (rc < 0) {

				printf("failed halting thread %d\n", dt->id);

			}

		}

	}	

}

void cmd_threads(int argc, char *argv[])

{

	link_t *cur;

	dthread_t *dt;

	(void)argc;

	dt = NULL;

	for (cur = dthreads.next; cur != &dthreads; cur = cur->next) {

		dt = list_get_instance(cur, dthread_t, link);

		cons_printf("%d [hash 0x%x]\n", dt->id, dt->hash);

	}	

}

static void cmd_quit(int argc, char *argv[])

{

	(void)argc; (void)argv;

	quit = true;

}

/** @}

 */