The Art of Reversing by Ap0x - Tutoriali.org

00407165 U EAX se stavljaju sva slova iz imena pocevsi od drugog
00407167 Porede se EAX i ECX, to jest prvo slovo i slovo iz prolaza
00407169 Ako je ECX manje od EAX onda:
00407172 EAX = EAX - ECX
00407174 EAX = EAX - 2
00407177 EAX = EAX xor 404358
0040717D
Snimi AL na EDI pointer
Kao sto vidimo algoritam je krajnje jednostavan i zasniva se na ponavljanju
ove petlje onoliko puta koliko ima slova. Ne dajte da vas zbuni XOR sa
brojem 404358, ovaj XOR je ekvivalentan XORu sa brojem 58. Zapamtite da
se na adresu 00403B30 snima AL deo EAX registra. Ali bitno je da shvatite da
se racuna i deo kada je EAX veci od 00404300. Evo kako bi keygenerator
izgledao u Delphiju:
procedure ...
var
eax,i,ecx:integer;
name,tmp:string;
begin
eax := 0;
tmp := '';
name := Edit1.Text;
for i := 2 to 5 do begin
if eax > $404300 then eax := eax + Ord(name[1]) else eax := Ord(name[1]);
ecx := eax;
eax := Ord(name[i]);
if ecx < eax then begin
eax := eax - ecx;
eax := eax - 2;
eax := eax xor $404358;
eax := eax - $404300;
tmp := tmp + Chr(eax);
eax := eax + $404300;
end
else tmp := tmp + name[i];
end;
Edit2.Text := tmp[1] + tmp[2] + tmp[3] + tmp[4];
end;
i u C++:
unsigned int eax,ecx,i;
eax = 0;
for (i=1;i 0x00404300){
eax = eax + name[0];
}else{
eax = name[0];
}
ecx = eax;
eax = name[i];
if (ecx < eax){
eax = eax - ecx;
eax = eax - 0x02;
eax = eax ^ 0x00404358;
eax = eax - 0x00404300;
wsprintf(buffer,"%c",eax);
strcat(serial,buffer);
eax = eax + 0x00404300;
}else{
wsprintf(buffer,"%c",name[i]);
strcat(serial,buffer);
}
}
The Art of Reversing by Ap0x Page 101 of 293