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 "breakpoint.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_dbreak(int argc, char *argv[]);
static void cmd_go(int argc, char *argv[]);
static void cmd_istep(int argc, char *argv[]);
static void cmd_lbrk(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 },
    { 1,    "dbreak",   cmd_dbreak },
    { 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,    "lbrk",     cmd_lbrk },
    { 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%lx\n", addr);
//  arch_breakpoint_add(addr);
    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%lx]\n",
            cwt->id, cwt->hash);
    } else {
        cons_printf("no such thread\n");
    }
}

static void cmd_dbreak(int argc, char *argv[])
{
    int bid;

    (void)argc;
    bid = strtoul(argv[1], NULL, 0);

    printf("remove breakpoint %d\n", bid);

//  arch_breakpoint_remove(bid);
    breakpoint_remove(bid);
}


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;

    arch_singlestep(cwt);
}

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

    //arch_breakpoint_list();
    breakpoint_list();
}


#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%lx:", 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%lx]\n", dt->id, dt->hash);
    }   
}


static void cmd_quit(int argc, char *argv[])
{
    (void)argc; (void)argv;
    quit = true;
}

/** @}
 */