The art of cracking - Tutoriali

KeyGens & Smart CheckDo sada smo obradili keygenovanje programa preko Olly-a, a sada jena redu Smart Check. Za potrebe ovog dela skinuo sam primer sa interneta,on se nalazi ovde …\Casovi\Cas3\abexcrackme2.exe, slobodno ga ucitajte u SC ipokrenite sa F5, kada se pojavi Abexov crackme unesite kao ime cracker akao seriski 111111, pritisnite [ Check ] i izacice MessageBox 'Nope, the serialis wrong!'Sada se u SCu pojavio [+]Click kao oznaka da smo mi kliknuli na dugme,duplim klikom na [+]Click pojavljuje se ovo:Len(VARIANT:String:"cracker") returns LONG:1242252Len(VARIANT:String:"cracker") returns LONG:1242252Integer (1) --> Long (1)Mid(VARIANT:String:"cracker",long:1,VARIANT:Integer:1)Asc(String:"c") returns Integer: 99Hex(VARIANT:Integer:199)Integer (2) --> Long (2)Mid(VARIANT:String:"cracker",long:1,VARIANT:Integer:1)Asc(String:"r") returns Integer: 114Hex(VARIANT:Integer:214)Integer (3) --> Long (3)Mid(VARIANT:String:"cracker",long:1,VARIANT:Integer:1)Asc(String:"a") returns Integer: 97Hex(VARIANT:Integer:197)Integer (4) --> Long (4)Mid(VARIANT:String:"cracker",long:1,VARIANT:Integer:1)Asc(String:"c") returns Integer: 99Hex(VARIANT:Integer :199)Na osnovu ovoga zakljucujemo da se seriski broj generise od prva 4 slovaimena. Za svako slovo se izvaja ASCII broj od koga se racuna Hex broj :) Alise za racunanje Hex broja dodaje josh 100 na ASCI vrednost svakog slova.To izgleda ovako:serial = ..... Hex(Asc(Mid$(name,1,1)) + 100)Ali sta se dalje radi sa seriskim??? Da li se Hex brojevi sabiraju, mnoze,dele, dodaju????Obelezimo MsgBox i idemo na View -> Show All Events da bi smo imalidetaljniji uvid u ono sto se desava. Sada vidimo ovo par redova iznadMsgBox-a:_VbaVarMove(VARIANT:String:"111111",.....) returns ....