mirror of
https://github.com/radareorg/radare2.git
synced 2024-10-11 12:54:45 +00:00
e5b6d1582b
* Fix linking of r_core (r_bin not found) * Lot of fixes for valaswig. libr, r_io and r_debug are now usable from python/perl/ruby - Fix many .vapi files - Enhace the libr.pc - r_hash.deps must be removed - Depends on valaswig-head
123 lines
2.6 KiB
C
123 lines
2.6 KiB
C
/* radare - LGPL - Copyright 2009 pancake<nopcode.org> */
|
|
|
|
#include "r_types.h"
|
|
#include "r_util.h"
|
|
|
|
#if 0
|
|
/* TODO: the basic object lifecycle must be simplified */
|
|
struct r_class_t {
|
|
// new/free are implicit
|
|
.init = &r_buf_init,
|
|
.fini = &r_buf_fini,
|
|
} r_buf_class;
|
|
|
|
#define r_buf_init(x) r_buf_class->init
|
|
#endif
|
|
|
|
R_API struct r_buf_t *r_buf_init(struct r_buf_t *b)
|
|
{
|
|
if (b) {
|
|
b->buf = NULL;
|
|
b->length = 0;
|
|
b->cur = 0;
|
|
b->base = 0LL;
|
|
}
|
|
return b;
|
|
}
|
|
|
|
R_API struct r_buf_t *r_buf_new()
|
|
{
|
|
struct r_buf_t *b = MALLOC_STRUCT(struct r_buf_t);
|
|
return r_buf_init(b);
|
|
}
|
|
|
|
R_API int r_buf_set_bits(struct r_buf_t *b, int bitoff, int bitsize, ut64 value)
|
|
{
|
|
// TODO: implement r_buf_set_bits
|
|
// TODO: get the implementation from reg/value.c ?
|
|
return R_FALSE;
|
|
}
|
|
|
|
R_API int r_buf_set_bytes(struct r_buf_t *b, ut8 *buf, int length)
|
|
{
|
|
if (b->buf)
|
|
free(b->buf);
|
|
if (!(b->buf = malloc(length)))
|
|
return R_FALSE;
|
|
memcpy(b->buf, buf, length);
|
|
b->length = length;
|
|
return R_TRUE;
|
|
}
|
|
|
|
static int r_buf_cpy(struct r_buf_t *b, ut64 addr, ut8 *dst, const ut8 *src, int len)
|
|
{
|
|
int end;
|
|
if (addr == R_BUF_CUR)
|
|
addr = b->cur;
|
|
else addr -= b->base;
|
|
if (addr > b->length)
|
|
return -1;
|
|
end = (int)(addr+len);
|
|
if (end > b->length)
|
|
len -= end-b->length;
|
|
memcpy(dst, src+addr, len);
|
|
b->cur = addr + len;
|
|
return len;
|
|
}
|
|
|
|
R_API int r_buf_read_at(struct r_buf_t *b, ut64 addr, ut8 *buf, int len)
|
|
{
|
|
return r_buf_cpy(b, addr, buf, b->buf, len);
|
|
}
|
|
|
|
R_API int r_buf_fread_at(struct r_buf_t *b, ut64 addr, ut8 *buf, const char *fmt, int n)
|
|
{
|
|
int i, j, k, len, tsize, endian, m = 1;
|
|
|
|
if (addr == R_BUF_CUR)
|
|
addr = b->cur;
|
|
else addr -= b->base;
|
|
if (addr < 0 || addr > b->length)
|
|
return -1;
|
|
for (i = len = 0; i < n; i++)
|
|
for (j = 0; fmt[j]; j++) {
|
|
if (len > b->length)
|
|
return -1;
|
|
switch (fmt[j]) {
|
|
case '0'...'9':
|
|
if (m == 1)
|
|
m = r_num_get(NULL, &fmt[j]);
|
|
continue;
|
|
case 's': tsize = 2; endian = 1; break;
|
|
case 'S': tsize = 2; endian = 0; break;
|
|
case 'i': tsize = 4; endian = 1; break;
|
|
case 'I': tsize = 4; endian = 0; break;
|
|
case 'l': tsize = 8; endian = 1; break;
|
|
case 'L': tsize = 8; endian = 0; break;
|
|
case 'c': tsize = 1; endian = 1; break;
|
|
default: return -1;
|
|
}
|
|
for (k = 0; k < m; k++)
|
|
r_mem_copyendian((ut8*)&buf[len+k*tsize], (ut8*)&b->buf[addr+len+k*tsize], tsize, endian);
|
|
len += m*tsize; m = 1;
|
|
}
|
|
b->cur = addr + len;
|
|
return len;
|
|
}
|
|
|
|
R_API int r_buf_write_at(struct r_buf_t *b, ut64 addr, const ut8 *buf, int len)
|
|
{
|
|
return r_buf_cpy(b, addr, b->buf, buf, len);
|
|
}
|
|
|
|
R_API void r_buf_deinit(struct r_buf_t *b)
|
|
{
|
|
free(b->buf);
|
|
}
|
|
|
|
R_API void r_buf_free(struct r_buf_t *b)
|
|
{
|
|
r_buf_deinit(b);
|
|
free(b);
|
|
}
|