radare2/libr/search/bytepat.c

112 lines
2.5 KiB
C

/* radare - LGPL - Copyright 2006-2011 esteve<eslack.org> + pancake<nopcode.org> */
#include "r_search.h"
#include <stdio.h>
#include <unistd.h>
#include <stdlib.h>
#define CTXMINB 5
#define BSIZE (1024*1024)
#define MAX_PATLEN 1024
typedef struct _fnditem {
unsigned char str[MAX_PATLEN];
void* next;
} fnditem;
static fnditem* init_fi() {
fnditem* n;
n = (fnditem*) malloc (sizeof (fnditem));
n->next = NULL;
return n;
}
static void fini_fi(fnditem* fi) {
fnditem *fu;
fu = fi;
while (fi->next) {
fu = fi;
fi = fi->next;
free (fu);
}
free (fu);
}
static void add_fi (fnditem* n, unsigned char* blk, int patlen) {
fnditem* p;
for (p=n; p->next!=NULL; p=p->next);
p->next = (fnditem*) malloc (sizeof (fnditem));
p = p->next;
memcpy (p->str, blk, patlen);
p->next = NULL;
}
static int is_fi_present(fnditem* n, unsigned char* blk , int patlen) {
fnditem* p;
for (p=n;p->next!=NULL; p=p->next)
if (!memcmp (blk, p->str, patlen))
return R_TRUE;
return R_FALSE;
}
R_API int r_search_pattern(RSearch *s, ut64 from, ut64 to) {
ut8 block[BSIZE+MAX_PATLEN], sblk[MAX_PATLEN+1];
int nr,i, moar=0, pcnt, cnt=0, k=0;
int patlen = s->pattern_size;
fnditem* root;
ut64 addr, bact, bytes, intaddr, rb, bproc = 0;
if (patlen < 1 || patlen > MAX_PATLEN) {
eprintf ("Invalid pattern length (must be > 1 and < %d)\n", MAX_PATLEN);
return R_FALSE;
}
bact = from;
bytes = to;
bytes += bact;
root = init_fi ();
pcnt = -1;
while (bact < bytes) {
addr = bact;
bproc = bact + patlen ;
// read ( fd, sblk, patlen );
//XXX bytepattern should be used with a read callback
//XXX radare_read_at(bact, sblk, patlen);
sblk[patlen]=0;
intaddr = bact;
cnt = 0;
while (bproc < bytes) {
nr = ((bytes-bproc) < BSIZE)?(bytes-bproc):BSIZE;
nr += (patlen - (nr % patlen)); // tamany de bloc llegit multiple superior de tamany busqueda
//rb = nr;
rb = s->iob.read_at (s->iob.io, addr, block, nr);
addr += nr;
moar = 0;
for (i=0; i<nr; i++) {
if (!memcmp (&block[i], sblk, patlen) && !is_fi_present (root, sblk, patlen)){
if (cnt == 0) {
add_fi (root, sblk, patlen);
pcnt++;
eprintf ("\nbytes: %d: ", pcnt);
for (k = 0; k<patlen; k++)
eprintf ("%02x", sblk[k]);
eprintf ("\nfound: %d: 0x%08"PFMT64x" ", pcnt, intaddr);
}
moar++;
cnt++;
eprintf ("0x%08"PFMT64x" ", bproc+i);
}
}
if (moar>0)
eprintf ("\ncount: %d: %d\n", pcnt, moar+1);
bproc += rb;
}
bact += (moar>0)?patlen:1;
}
eprintf ("\n");
fini_fi (root);
return 0;
}