radare2/libr/core/gdiff.c
2016-09-19 14:44:47 +02:00

137 lines
4.6 KiB
C

/* radare - LGPL - Copyright 2010-2015 - nibble, pancake */
#include <stdio.h>
#include <string.h>
#include <r_anal.h>
#include <r_list.h>
#include <r_util.h>
#include <r_core.h>
R_API int r_core_gdiff_fcn(RCore *c, ut64 addr, ut64 addr2) {
RList *la, *lb;
RAnalFunction *fa = r_anal_get_fcn_at (c->anal, addr, 0);
RAnalFunction *fb = r_anal_get_fcn_at (c->anal, addr2, 0);
la = r_list_new ();
r_list_append (la, fa);
lb = r_list_new ();
r_list_append (lb, fb);
r_anal_diff_fcn (c->anal, la, lb);
r_list_free (la);
r_list_free (lb);
return false;
}
/* Fingerprint functions and blocks, then diff. */
R_API int r_core_gdiff(RCore *c, RCore *c2) {
RCore *cores[2] = {c, c2};
RAnalFunction *fcn;
RAnalBlock *bb;
RListIter *iter, *iter2;
int i;
if (!c || !c2)
return false;
for (i = 0; i < 2; i++) {
/* remove strings */
r_list_foreach_safe (cores[i]->anal->fcns, iter, iter2, fcn) {
if (!strncmp (fcn->name, "str.", 4)) {
r_list_delete (cores[i]->anal->fcns, iter);
}
}
/* Fingerprint fcn bbs (functions basic-blocks) */
r_list_foreach (cores[i]->anal->fcns, iter, fcn) {
r_list_foreach (fcn->bbs, iter2, bb) {
r_anal_diff_fingerprint_bb (cores[i]->anal, bb);
}
}
/* Fingerprint fcn */
r_list_foreach (cores[i]->anal->fcns, iter, fcn) {
int newsize = r_anal_diff_fingerprint_fcn (cores[i]->anal, fcn);
r_anal_fcn_set_size (fcn, newsize);
}
}
/* Diff functions */
r_anal_diff_fcn (cores[0]->anal, cores[0]->anal->fcns, cores[1]->anal->fcns);
return true;
}
/* copypasta from radiff2 */
static void diffrow(ut64 addr, const char *name, ut32 size, int maxnamelen,
int digits, ut64 addr2, const char *name2, ut32 size2,
const char *match, double dist, int bare) {
if (bare) {
if (addr2 == UT64_MAX || !name2)
printf ("0x%016"PFMT64x" |%8s (%f)\n", addr, match, dist);
else printf ("0x%016"PFMT64x" |%8s (%f) | 0x%016"PFMT64x"\n", addr, match, dist, addr2);
return;
}
if (addr2 == UT64_MAX || !name2)
printf ("%*s %*d 0x%"PFMT64x" |%8s (%f)\n",
maxnamelen, name, digits, size, addr, match, dist);
else printf ("%*s %*d 0x%"PFMT64x" |%8s (%f) | 0x%"PFMT64x" %*d %s\n",
maxnamelen, name, digits, size, addr, match, dist, addr2,
digits, size2, name2);
}
R_API void r_core_diff_show(RCore *c, RCore *c2) {
const char *match;
RListIter *iter;
RAnalFunction *f;
RList *fcns = r_anal_get_fcns (c->anal);
int maxnamelen = 0;
int maxsize = 0;
int digits = 1;
int len;
int bare = r_config_get_i (c->config, "diff.bare") || r_config_get_i (c2->config, "diff.bare");
r_list_foreach (fcns, iter, f) {
if (f->name && (len = strlen(f->name)) > maxnamelen)
maxnamelen = len;
if (r_anal_fcn_size (f) > maxsize)
maxsize = r_anal_fcn_size (f);
}
fcns = r_anal_get_fcns (c2->anal);
r_list_foreach (fcns, iter, f) {
if (f->name && (len = strlen(f->name)) > maxnamelen)
maxnamelen = len;
if (r_anal_fcn_size (f) > maxsize)
maxsize = r_anal_fcn_size (f);
}
while (maxsize > 9) {
maxsize /= 10;
digits++;
}
fcns = r_anal_get_fcns (c->anal);
r_list_foreach (fcns, iter, f) {
switch (f->type) {
case R_ANAL_FCN_TYPE_FCN:
case R_ANAL_FCN_TYPE_SYM:
switch (f->diff->type) {
case R_ANAL_DIFF_TYPE_MATCH:
match = "MATCH";
break;
case R_ANAL_DIFF_TYPE_UNMATCH:
match = "UNMATCH";
break;
default:
match = "NEW";
}
diffrow (f->addr, f->name, r_anal_fcn_size (f), maxnamelen,
digits, f->diff->addr, f->diff->name, f->diff->size,
match, f->diff->dist, bare);
break;
}
}
fcns = r_anal_get_fcns (c2->anal);
r_list_foreach (fcns, iter, f) {
switch (f->type) {
case R_ANAL_FCN_TYPE_FCN:
case R_ANAL_FCN_TYPE_SYM:
if (f->diff->type == R_ANAL_DIFF_TYPE_NULL)
diffrow (f->addr, f->name, r_anal_fcn_size (f), maxnamelen,
digits, f->diff->addr, f->diff->name, f->diff->size,
"NEW", f->diff->dist, bare);
}
}
}