mirror of
https://github.com/radareorg/radare2.git
synced 2024-12-15 01:10:01 +00:00
54bdfb22bd
- Fixes ruby warnings
- Follow java syntax conventions
- Helped to identify and fix bugs in many vapis
- Sync swig examples
- Add test-r_core.rb (ruby test for RCore)
* Some work in r_cons, some refactoring and cleanup
- scr.html is now working again
- w32 cons support should work now
- Rename r_cons_get_columns -> r_cons_get_size()
- But it needs more work
* Typedef all r_range, r_parse and r_anal structs
- Add missing r_lib.pc in configure.acr
* 'make' clean now removes the libr* in swig/${LANG}/
96 lines
2.6 KiB
C
96 lines
2.6 KiB
C
/* radare - LGPL - Copyright 2009-2010 pancake<nopcode.org> */
|
|
|
|
#include <r_bp.h>
|
|
#include "../config.h"
|
|
|
|
// TODO: rename from r_debug_ ...
|
|
#if 0
|
|
R_API int r_debug_bp_enable(struct r_debug_t *dbg, ut64 addr, int set)
|
|
{
|
|
struct r_bp_item_t *bp = r_bp_enable(dbg->bp, addr, set);
|
|
struct r_io_bind_t *iob;
|
|
if (bp) {
|
|
iob = &dbg->bp->iob;
|
|
iob->set_fd(iob->io, dbg->pid); // HUH?
|
|
if (set) iob->write_at(iob->io, addr, bp->bbytes, bp->size);
|
|
else iob->write_at(iob->io, addr, bp->obytes, bp->size);
|
|
}
|
|
return (bp!=NULL)?R_TRUE:R_FALSE;
|
|
}
|
|
|
|
// XXX this must be implemented in r_bp.. not here!!1
|
|
R_API int r_debug_bp_add(struct r_debug_t *dbg, ut64 addr, int size, int hw, int rwx)
|
|
{
|
|
ut8 *buf;
|
|
int ret = R_FALSE;
|
|
struct r_bp_item_t *bp;
|
|
struct r_io_bind_t *iob;
|
|
if (dbg->bp->iob.init == R_FALSE) {
|
|
eprintf("No dbg->read callback defined\n");
|
|
return -1; // return -1?
|
|
}
|
|
iob = &dbg->bp->iob;
|
|
/* read bytes affected */
|
|
buf = (ut8 *)malloc(size);
|
|
if (buf == NULL)
|
|
return -1;
|
|
iob->set_fd(iob->io, dbg->pid);
|
|
iob->read_at(iob->io, addr, buf, size);
|
|
/* register breakpoint in r_bp */
|
|
// XXX. bpadd here?!?
|
|
if (hw) bp = r_bp_add_sw(&dbg->bp, buf, addr, size, 0, R_BP_EXEC);
|
|
else bp = r_bp_add_sw(&dbg->bp, buf, addr, size, 0, R_BP_EXEC);
|
|
if (bp) {
|
|
if (dbg->h && (!dbg->h->bp_write || !dbg->h->bp_write(dbg->pid, addr, size, hw, rwx )))
|
|
iob->write_at(iob->io, addr, bp->bbytes, size);
|
|
/* if already set, r_bp should return false */
|
|
ret = R_TRUE;
|
|
}
|
|
free(buf);
|
|
return ret;
|
|
}
|
|
#endif
|
|
|
|
/**
|
|
* reflect all r_bp stuff in the process using dbg->bp_write
|
|
*/
|
|
// XXX remove
|
|
R_API int r_bp_restore(struct r_bp_t *bp, int set)
|
|
{
|
|
struct list_head *pos;
|
|
struct r_bp_item_t *b;
|
|
|
|
/* write obytes from every breakpoint in r_bp */
|
|
if (set) {
|
|
list_for_each(pos, &bp->bps) {
|
|
b = list_entry(pos, struct r_bp_item_t, list);
|
|
if (b->hw || !b->obytes)
|
|
eprintf ("hw breakpoints not supported yet\n");
|
|
else bp->iob.write_at (bp->iob.io, b->addr, b->obytes, b->size);
|
|
// TODO: CALL TO bp->breakpoint()
|
|
}
|
|
} else {
|
|
list_for_each(pos, &bp->bps) {
|
|
b = list_entry(pos, struct r_bp_item_t, list);
|
|
if (b->hw || !b->bbytes)
|
|
eprintf ("hw breakpoints not supported yet\n");
|
|
else bp->iob.write_at (bp->iob.io, b->addr, b->bbytes, b->size);
|
|
// TODO: CALL TO bp->breakpoint()
|
|
}
|
|
}
|
|
return R_TRUE;
|
|
}
|
|
|
|
R_API int r_bp_recoil(RBreakpoint *bp, ut64 addr)
|
|
{
|
|
RBreakpointItem *b = r_bp_at_addr (bp, addr, 0xFFFFFF);
|
|
if (b) {
|
|
eprintf("HIT AT ADDR 0x%llx\n", addr);
|
|
eprintf(" recoil = %d\n", b->recoil);
|
|
eprintf(" size = %d\n", b->size);
|
|
}
|
|
if (b) if (!b->hw && ((b->addr + b->size) == addr))
|
|
return b->recoil;
|
|
return 0;
|
|
}
|