static int config_analplugin_callback(void *user, void *data) {
RCore *core = (RCore*) user;
RConfigNode *node = (RConfigNode*) data;
if (*node->value == '?') {
r_anal_list (core->anal);
return R_FALSE;
} else if (!r_anal_use (core->anal, node->value)) {
const char *aa = r_config_get (core->config, "asm.arch");
if (!aa || strcmp (aa, node->value))
eprintf ("anal.plugin: cannot find '%s'\n", node->value);
return R_FALSE;
}
return R_TRUE;
}
int main(int argc, char **argv) {
RLib *lib;
RAnal *anal = r_anal_new ();
RAnalOp *op = r_anal_op_new ();
ut8 *ptr, *buf = NULL, *data = NULL;
ut64 offset = 0x8048000LL;
char *arch = NULL;
int bin = false, len = 0, bits = 32;
int c, idx, ret, tlen, word;
lib = r_lib_new ("radare_plugin");
r_lib_add_handler (lib, R_LIB_TYPE_ANAL, "analysis plugins",
&__lib_anal_cb, &__lib_anal_dt, anal);
r_lib_opendir (lib, r_sys_getenv ("LIBR_PLUGINS"));
while ((c = getopt (argc, argv, "a:b:Bhl:Lo:")) != -1) {
switch (c) {
case 'a':
arch = optarg;
break;
case 'b':
bits = r_num_math (NULL, optarg);
break;
case 'B':
bin = true;
break;
case 'h':
return usage ();
case 'l':
len = r_num_math (NULL, optarg);
break;
case 'L':
return r_anal_list (anal);
case 'o':
offset = r_num_math (NULL, optarg);
break;
}
}
if (!argv[optind] || (bin && !len))
return usage ();
/* Set default options */
if (arch) {
if (!r_anal_use (anal, arch)) {
eprintf ("Invalid plugin\n");
return 1;
}
} else r_anal_use (anal, "x86");
if (!r_anal_set_bits (anal, bits))
r_anal_set_bits (anal, 32);
/* Get input & convert to bin if necessary */
if (argv[optind][0] == '-') {
idx = 0;
while (true) {
if (!(buf = realloc (buf, idx+1024)))
return 1;
fgets ((char*)buf+idx, 1024, stdin);
if ((!bin && feof (stdin)) ||(len && idx >= len))
break;
idx += 1023;
}
} else {
if (!(buf = (ut8 *)strdup (argv[optind])))
return 1;
}
if (bin) {
data = (ut8*)buf;
} else {
ptr = buf, word = tlen = 0;
while (ptr[0]) {
int p = *ptr;
if (p!= ' ' && p!= '\n' && p!= '\r')
if (0==(++word%2)) tlen++;
ptr += 1;
}
data = malloc (tlen+1);
if (!data) {
r_anal_free (anal);
r_anal_op_free (op);
return 1;
}
r_hex_str2bin ((char *)buf, data);
if (!len || len > tlen) len = tlen;
free (buf);
}
/* Analyze */
for (idx=ret=0; idx<len; idx+=ret) {
if (!(ret = analyze (anal, op, offset+idx, data+idx, len-idx))) {
eprintf ("Ooops\n");
free (data);
r_anal_free (anal);
r_anal_op_free (op);
return 1;
}
}
free (data);
r_anal_free (anal);
r_anal_op_free (op);
return 0;
}
