plan9front/sys/src/9/port/rdb.c

110 lines
1.7 KiB
C

#include "u.h"
#include "../port/lib.h"
#include "mem.h"
#include "dat.h"
#include "fns.h"
#include "io.h"
#include "ureg.h"
#define DBG if(0)scrprint
#pragma varargck argpos scrprint 1
static Ureg ureg;
static void
scrprint(char *fmt, ...)
{
char buf[128];
va_list va;
int n;
va_start(va, fmt);
n = vseprint(buf, buf+sizeof buf, fmt, va)-buf;
va_end(va);
putstrn(buf, n);
}
static char*
getline(void)
{
static char buf[128];
int i, c;
for(;;){
for(i=0; i<nelem(buf) && (c=uartgetc()) != '\n'; i++){
DBG("%c...", c);
buf[i] = c;
}
if(i < nelem(buf)){
buf[i] = 0;
return buf;
}
}
}
static void*
addr(char *s, Ureg *ureg, char **p)
{
ulong a;
a = strtoul(s, p, 16);
if(a < sizeof(Ureg))
return ((uchar*)ureg)+a;
return (void*)a;
}
static void
talkrdb(Ureg *ureg)
{
uchar *a;
char *p, *req;
serialoq = nil; /* turn off serial console */
kprintoq = nil; /* turn off /dev/kprint if active */
// scrprint("Plan 9 debugger\n");
iprint("Edebugger reset\n");
for(;;){
req = getline();
switch(*req){
case 'r':
a = addr(req+1, ureg, nil);
DBG("read %p\n", a);
iprint("R%.8lux %.2ux %.2ux %.2ux %.2ux\n",
strtoul(req+1, 0, 16), a[0], a[1], a[2], a[3]);
break;
case 'w':
a = addr(req+1, ureg, &p);
*(ulong*)a = strtoul(p, nil, 16);
iprint("W\n");
break;
/*
* case Tmput:
n = min[4];
if(n > 4){
mesg(Rerr, Ecount);
break;
}
a = addr(min+0);
scrprint("mput %.8lux\n", a);
memmove(a, min+5, n);
mesg(Rmput, mout);
break;
*
*/
default:
DBG("unknown %c\n", *req);
iprint("Eunknown message\n");
break;
}
}
}
void
rdb(void)
{
splhi();
iprint("rdb...");
callwithureg(talkrdb);
}