radare2/libr/debug/arg.c
2016-07-27 13:50:14 +02:00

52 lines
1.4 KiB
C

/* radare - LGPL - Copyright 2010-2015 pancake */
#include <r_debug.h>
R_API ut64 r_debug_arg_get (RDebug *dbg, int cctype, int num) {
ut32 n32;
ut64 n64, sp;
char reg[32];
//TODO replace the hardcoded implementation with the sdb
switch (cctype) {
case R_ANAL_CC_TYPE_SYSV:
case R_ANAL_CC_TYPE_FASTCALL:
snprintf (reg, sizeof (reg)-1, "A%d", num);
return r_debug_reg_get (dbg, reg);
case R_ANAL_CC_TYPE_STDCALL:
case R_ANAL_CC_TYPE_PASCAL:
sp = r_debug_reg_get (dbg, "SP");
if (dbg->bits == 64) {
sp += 8; // skip return address, asume we are inside the call
sp += 8 * num;
dbg->iob.read_at (dbg->iob.io, sp, (ut8*)&n64, sizeof(ut64));
// TODO: honor endianness of platform
return (ut64)n64;
} else {
sp += 4; // skip return address, asume we are inside the call
sp += 4 * num;
dbg->iob.read_at (dbg->iob.io, sp, (ut8*)&n32, sizeof(ut32));
// TODO: honor endianness of platform
return (ut64)n32;
}
break;
}
snprintf (reg, sizeof (reg)-1, "A%d", num);
return r_debug_reg_get (dbg, reg);
}
R_API bool r_debug_arg_set (RDebug *dbg, int cctype, int num, ut64 val) {
// TODO replace the hardcoded implementation with the sdb
char reg[32];
switch (cctype) {
case R_ANAL_CC_TYPE_SYSV:
case R_ANAL_CC_TYPE_FASTCALL:
snprintf (reg, 30, "A%d", num);
return r_debug_reg_set (dbg, reg, val);
case R_ANAL_CC_TYPE_STDCALL:
case R_ANAL_CC_TYPE_PASCAL:
/* TODO: get from stack */
break;
}
return false;
}