bfvm.c File Reference

#include "bfvm.h"

Go to the source code of this file.

Macros
#define	T   if (c->trace)

Functions
static ut8	bfvm_op (BfvmCPU *c)
RZ_API int	bfvm_in_trap (BfvmCPU *c)
RZ_API void	bfvm_reset (BfvmCPU *c)
RZ_API int	bfvm_init (BfvmCPU *c, ut32 size, int circular)
RZ_API BfvmCPU *	bfvm_new (RzIOBind *iob)
RZ_API BfvmCPU *	bfvm_free (BfvmCPU *c)
RZ_API ut8 *	bfvm_get_ptr_at (BfvmCPU *c, ut64 at)
RZ_API ut8 *	bfvm_get_ptr (BfvmCPU *c)
RZ_API ut8	bfvm_get (BfvmCPU *c)
RZ_API void	bfvm_inc (BfvmCPU *c)
RZ_API void	bfvm_dec (BfvmCPU *c)
RZ_API int	bfvm_reg_set (BfvmCPU *c, const char *str)
RZ_API void	bfvm_peek (BfvmCPU *c)
RZ_API void	bfvm_poke (BfvmCPU *c)
RZ_API int	bfvm_trace_op (BfvmCPU *c, ut8 op)
RZ_API int	bfvm_step (BfvmCPU *c, int over)
RZ_API int	bfvm_contsc (BfvmCPU *c)
RZ_API int	bfvm_cont (BfvmCPU *c, ut64 until)
RZ_API int	bfvm_trace (BfvmCPU *c, ut64 until)
RZ_API void	bfvm_show_regs (BfvmCPU *c, int rad)
RZ_API void	bfvm_maps (BfvmCPU *c, int rad)

Macro Definition Documentation

T

#define T   if (c->trace)

Definition at line 178 of file bfvm.c.

Function Documentation

bfvm_cont()

RZ_API int bfvm_cont	(	BfvmCPU *	c,
		ut64	until
	)

Definition at line 255 of file bfvm.c.

                                             {
    c->breaked = 0;
    while (!c->breaked && c->eip != until) {
        bfvm_step(c, 0);
        if (bfvm_in_trap(c)) {
            eprintf("Trap instruction at 0x%" PFMT64x "\n", c->eip);
            break;
        }
    }
    return 0;
}

References bfvm_in_trap(), bfvm_step(), c, eprintf, and PFMT64x.

Referenced by bfvm_trace(), and rz_debug_bf_continue().

bfvm_contsc()

RZ_API int bfvm_contsc

(

BfvmCPU *

c

)

Definition at line 233 of file bfvm.c.

                                   {
    c->breaked = 0;
    while (!c->breaked) {
        bfvm_step(c, 0);
        if (bfvm_in_trap(c)) {
            eprintf("Trap instruction at 0x%08" PFMT64x "\n", c->eip);
            break;
        }
        switch (bfvm_op(c)) {
        case ',':
            eprintf("contsc: read from input trap\n");
            c->breaked = 1;
            continue;
        case '.':
            eprintf("contsc: print to screen trap\n");
            c->breaked = 1;
            continue;
        }
    }
    return 0;
}

References bfvm_in_trap(), bfvm_op(), bfvm_step(), c, eprintf, and PFMT64x.

Referenced by rz_debug_bf_continue_syscall().

bfvm_dec()

RZ_API void bfvm_dec

(

BfvmCPU *

c

)

Definition at line 109 of file bfvm.c.

                                 {
    ut8 *mem = bfvm_get_ptr(c);
    if (mem != NULL) {
        mem[0]--;
    }
}

References bfvm_get_ptr(), c, mem, and NULL.

Referenced by bfvm_step().

bfvm_free()

RZ_API BfvmCPU* bfvm_free

(

BfvmCPU *

c

)

Definition at line 74 of file bfvm.c.

                                      {
    free(c->mem);
    c->mem = 0;
    free(c->screen_buf);
    c->screen_buf = 0;
    free(c);
    return NULL;
}

References c, free(), and NULL.

Referenced by __close().

bfvm_get()

RZ_API ut8 bfvm_get

(

BfvmCPU *

c

)

Definition at line 97 of file bfvm.c.

                                {
    ut8 *ptr = bfvm_get_ptr(c);
    return ptr ? *ptr : 0;
}

References bfvm_get_ptr(), and c.

Referenced by bfvm_poke(), bfvm_show_regs(), bfvm_step(), and bfvm_trace_op().

bfvm_get_ptr()

RZ_API ut8* bfvm_get_ptr

(

BfvmCPU *

c

)

Definition at line 92 of file bfvm.c.

                                     {
    // return bfvm_cpu.mem;
    return bfvm_get_ptr_at(c, c->ptr);
}

References bfvm_get_ptr_at(), and c.

Referenced by bfvm_dec(), bfvm_get(), bfvm_inc(), and bfvm_peek().

bfvm_get_ptr_at()

RZ_API ut8* bfvm_get_ptr_at	(	BfvmCPU *	c,
		ut64	at
	)

Definition at line 83 of file bfvm.c.

                                                 {
    if (at >= c->base) {
        at -= c->base;
    } else if (at >= c->size) {
        at = c->circular ? 0 : c->size - 1;
    }
    return c->mem + at;
}

References c.

Referenced by bfvm_get_ptr().

bfvm_in_trap()

RZ_API int bfvm_in_trap

(

BfvmCPU *

c

)

Definition at line 15 of file bfvm.c.

                                    {
    switch (bfvm_op(c)) {
    case 0x00:
    case 0xcc:
    case 0xff:
        return 1;
    }
    return 0;
}

References bfvm_op(), and c.

Referenced by bfvm_cont(), bfvm_contsc(), and rz_debug_bf_step_over().

bfvm_inc()

RZ_API void bfvm_inc

(

BfvmCPU *

c

)

Definition at line 102 of file bfvm.c.

                                 {
    ut8 *mem = bfvm_get_ptr(c);
    if (mem != NULL) {
        mem[0]++;
    }
}

References bfvm_get_ptr(), c, mem, and NULL.

Referenced by bfvm_step().

bfvm_init()

RZ_API int bfvm_init	(	BfvmCPU *	c,
		ut32	size,
		int	circular
	)

Definition at line 39 of file bfvm.c.

                                                          {
    memset(c, '\0', sizeof(BfvmCPU));
 
    /* data */
    c->mem = (ut8 *)malloc(size);
    if (!c->mem) {
        return 0;
    }
    memset(c->mem, '\0', size);
 
    /* setup */
    c->circular = circular;
    c->size = size;
 
    // TODO: use RzBuffer or so here.. this is spagueti
    /* screen */
    c->screen = BFVM_SCREEN_ADDR;
    c->screen_size = BFVM_SCREEN_SIZE;
    c->screen_buf = (ut8 *)malloc(c->screen_size);
    memset(c->screen_buf, '\0', c->screen_size);
 
    /* input */
    c->input_size = BFVM_INPUT_SIZE;
    c->input_buf = (ut8 *)malloc(c->input_size);
    bfvm_reset(c);
    return 1;
}

References BFVM_INPUT_SIZE, bfvm_reset(), BFVM_SCREEN_ADDR, BFVM_SCREEN_SIZE, c, malloc(), and memset().

Referenced by bfvm_new().

bfvm_maps()

RZ_API void bfvm_maps	(	BfvmCPU *	c,
		int	rad
	)

Definition at line 290 of file bfvm.c.

                                           {
    if (rad) {
        eprintf("fs sections\n");
        eprintf("e cmd.vprompt=px@screen\n");
        eprintf("f section_code @ 0x%08" PFMT64x "\n", (ut64)BFVM_CODE_ADDR);
        eprintf("f section_code_end @ 0x%08" PFMT64x "\n", (ut64)BFVM_CODE_ADDR + BFVM_CODE_SIZE);
        eprintf("f section_data @ 0x%08" PFMT64x "\n", (ut64)c->base);
        eprintf("f section_data_end @ 0x%08" PFMT64x "\n", (ut64)c->base + c->size);
        eprintf("f screen @ 0x%08" PFMT64x "\n", (ut64)c->screen);
        eprintf("f section_screen @ 0x%08" PFMT64x "\n", (ut64)c->screen);
        eprintf("f section_screen_end @ 0x%08" PFMT64x "\n", (ut64)c->screen + c->screen_size);
        eprintf("f input @ 0x%08" PFMT64x "\n", (ut64)c->input);
        eprintf("f section_input @ 0x%08" PFMT64x "\n", (ut64)c->input);
        eprintf("f section_input_end @ 0x%08" PFMT64x "\n", (ut64)c->input + c->input_size);
        eprintf("fs *\n");
    } else {
        eprintf("0x%08" PFMT64x " - 0x%08" PFMT64x " rwxu 0x%08" PFMT64x " .code\n",
            (ut64)0, (ut64)c->size, (ut64)c->size);
        eprintf("0x%08" PFMT64x " - 0x%08" PFMT64x " rw-- 0x%08" PFMT64x " .data\n",
            (ut64)c->base, (ut64)(c->base + c->size), (ut64)c->size);
        eprintf("0x%08" PFMT64x " - 0x%08" PFMT64x " rw-- 0x%08" PFMT64x " .screen\n",
            (ut64)c->screen, (ut64)(c->screen + c->screen_size), (ut64)c->screen_size);
        eprintf("0x%08" PFMT64x " - 0x%08" PFMT64x " rw-- 0x%08" PFMT64x " .input\n",
            (ut64)c->input, (ut64)(c->input + c->input_size), (ut64)c->input_size);
    }
}

References BFVM_CODE_ADDR, BFVM_CODE_SIZE, c, eprintf, PFMT64x, and ut64().

bfvm_new()

RZ_API BfvmCPU* bfvm_new

(

RzIOBind *

iob

)

Definition at line 67 of file bfvm.c.

                                        {
    BfvmCPU *c = RZ_NEW0(BfvmCPU);
    bfvm_init(c, 4096, 1);
    memcpy(&c->iob, iob, sizeof(c->iob));
    return c;
}

References bfvm_init(), c, memcpy(), and RZ_NEW0.

Referenced by __open().

bfvm_op()

static ut8 bfvm_op ( BfvmCPU *  c )

static

Definition at line 6 of file bfvm.c.

                               {
    // XXX: this is slow :(
    ut8 buf[4] = { 0 };
    if (c && c->iob.read_at && !c->iob.read_at(c->iob.io, c->eip, buf, 4)) {
        return 0xff;
    }
    return buf[0];
}

References c.

Referenced by bfvm_contsc(), bfvm_in_trap(), bfvm_step(), and rz_debug_bf_step_over().

bfvm_peek()

RZ_API void bfvm_peek

(

BfvmCPU *

c

)

Definition at line 132 of file bfvm.c.

                                  {
    int idx = c->input_idx;
    ut8 *ptr = bfvm_get_ptr(c);
 
    if (idx >= c->input_size) {
        idx = 0;
    }
 
    if (ptr) {
        *ptr = c->input_buf[idx];
        c->input_idx = idx + 1;
    }
}

References bfvm_get_ptr(), c, and setup::idx.

Referenced by bfvm_step().

bfvm_poke()

RZ_API void bfvm_poke

(

BfvmCPU *

c

)

Definition at line 146 of file bfvm.c.

                                  {
    int idx = c->screen_idx;
    c->screen_buf[idx] = bfvm_get(c);
    c->screen_idx = idx + 1;
}

References bfvm_get(), c, and setup::idx.

Referenced by bfvm_step().

bfvm_reg_set()

RZ_API int bfvm_reg_set	(	BfvmCPU *	c,
		const char *	str
	)

Definition at line 116 of file bfvm.c.

                                                     {
    char *ptr = strchr(str, ' ');
    if (!ptr) {
        return 0;
    }
    if (strstr(str, "eip")) {
        c->eip = rz_num_math(NULL, ptr + 1);
    } else if (strstr(str, "esp")) {
        c->esp = rz_num_math(NULL, ptr + 1);
    } else if (strstr(str, "ptr")) {
        c->ptr = rz_num_math(NULL, ptr + 1);
    }
    return 1;
}

References c, NULL, rz_num_math(), and cmd_descs_generate::str.

bfvm_reset()

RZ_API void bfvm_reset

(

BfvmCPU *

c

)

Definition at line 25 of file bfvm.c.

                                   {
    memset(c->mem, '\0', c->size);
    memset(c->input_buf, '\0', c->input_size);
    memset(c->screen_buf, '\0', c->screen_size);
    c->base = BFVM_DATA_ADDR;
    c->input = BFVM_INPUT_ADDR;
    c->input_idx = 0;
    c->screen = BFVM_SCREEN_ADDR;
    c->screen_idx = 0;
    c->eip = 0; // TODO look forward nops
    c->ptr = 0;
    c->esp = c->base;
}

References BFVM_DATA_ADDR, BFVM_INPUT_ADDR, BFVM_SCREEN_ADDR, c, and memset().

Referenced by bfvm_init(), and rz_debug_bf_kill().

bfvm_show_regs()

RZ_API void bfvm_show_regs	(	BfvmCPU *	c,
		int	rad
	)

Definition at line 274 of file bfvm.c.

                                                {
    if (rad) {
        eprintf("fs regs\n");
        eprintf("f eip @ 0x%08" PFMT64x "\n", (ut64)c->eip);
        eprintf("f esp @ 0x%08" PFMT64x "\n", (ut64)c->esp);
        eprintf("f ptr @ 0x%08" PFMT64x "\n", (ut64)c->ptr + c->base);
        eprintf("fs *\n");
    } else {
        ut8 ch = bfvm_get(c);
        eprintf("  eip  0x%08" PFMT64x "     esp  0x%08" PFMT64x "\n",
            (ut64)c->eip, (ut64)c->esp);
        eprintf("  ptr  0x%08x     [ptr]  %d = 0x%02x '%c'\n",
            (ut32)c->ptr, ch, ch, IS_PRINTABLE(ch) ? ch : ' ');
    }
}

References bfvm_get(), c, eprintf, IS_PRINTABLE, PFMT64x, and ut64().

bfvm_step()

RZ_API int bfvm_step	(	BfvmCPU *	c,
		int	over
	)

Definition at line 180 of file bfvm.c.

                                           {
    ut8 op2, op = bfvm_op(c);
 
    do {
        T bfvm_trace_op(c, op);
        switch (op) {
        case '\0':
            /* trap */
            return 1;
        case '.':
            // bfvm_get_ptr (c);
            bfvm_poke(c);
            break;
        case ',':
            bfvm_peek(c);
            /* TODO read */
            break;
        case '+':
            bfvm_inc(c);
            break;
        case '-':
            bfvm_dec(c);
            break;
        case '>':
            c->ptr++;
            break;
        case '<':
            c->ptr--;
            break;
        case '[':
            break;
        case ']':
            if (bfvm_get(c) != 0) {
                do {
                    /* control underflow */
                    if (c->eip < (c->eip - 1)) {
                        c->eip = 0;
                        break;
                    }
                    c->eip--;
                } while (bfvm_op(c) != '[');
            }
            break;
        default:
            break;
        }
        c->eip++;
        op2 = bfvm_op(c);
    } while (over && op == op2);
 
    return 0;
}

References bfvm_dec(), bfvm_get(), bfvm_inc(), bfvm_op(), bfvm_peek(), bfvm_poke(), bfvm_trace_op(), c, and T.

Referenced by bfvm_cont(), bfvm_contsc(), rz_debug_bf_step(), and rz_debug_bf_step_over().

bfvm_trace()

RZ_API int bfvm_trace	(	BfvmCPU *	c,
		ut64	until
	)

Definition at line 267 of file bfvm.c.

                                              {
    c->trace = 1;
    bfvm_cont(c, until);
    c->trace = 0;
    return 0;
}

References bfvm_cont(), and c.

bfvm_trace_op()

RZ_API int bfvm_trace_op	(	BfvmCPU *	c,
		ut8	op
	)

Definition at line 152 of file bfvm.c.

                                             {
    ut8 g;
    switch (op) {
    case '\0':
        eprintf(" ; trap (%02x)\n", op);
        // fallthrough
    case '.':
    case ',':
    case '+':
    case '-':
    case '>':
    case '<':
        eprintf("%c", op);
        break;
    case '[':
    case ']':
        g = bfvm_get(c);
        eprintf("%c  ; [ptr] = %d\n", op, g);
        if (g != 0) {
            eprintf("[");
        }
        break;
    }
    return 0;
}

References bfvm_get(), c, eprintf, and g.

Referenced by bfvm_step().