Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
potraje ali bruteforceovanje je bas takvo, ipak postoji “samo” 244,140,625kombinacija koje treba proveriti.Algoritam:Dim table(1 To 26) As StringFor i = 65 To 90table(i - 64) = Chr(i)Next iLabel3.Caption = "Time St<strong>art</strong>: " & Time$Me.RefreshFor i1 = 1 To 26For i2 = 1 To 26For i3 = 1 To 26For i4 = 1 To 26For i5 = 1 To 26For i6 = 1 To 26sm = Asc(table(i1)) Xor Asc(table(i2)) Xor Asc(table(i3)) Xor Asc(table(i4)) XorAsc(table(i5)) Xor Asc(table(i6))my = (Val(Text1.Text) Xor sm Xor Asc(table(i1)))If my = 77 <strong>The</strong>nmy = (Val(Text2.Text) Xor sm Xor Asc(table(i2)))If my = 90 <strong>The</strong>nmy = (Val(Text3.Text) Xor sm Xor Asc(table(i3)))If my = 144 <strong>The</strong>nmy = (Val(Text4.Text) Xor sm Xor Asc(table(i4)))If my = 0 <strong>The</strong>nmy = (Val(Text5.Text) Xor sm Xor Asc(table(i5)))If my = 3 <strong>The</strong>nmy = (Val(Text6.Text) Xor sm Xor Asc(table(i6)))If my = 0 <strong>The</strong>nList1.AddItem table(i1) & table(i2) & table(i3) & table(i4) & table(i5) & table(i6)GoTo 2End IfEnd IfEnd IfEnd IfEnd IfEnd IfLabel2.Caption = table(i1) & table(i2) & table(i3) & table(i4) & table(i5) & table(i6)Form1.Caption = "BruteForcer - " & Label2.CaptionNext i6Next i5Next i4Next i3Next i2Next i12Form1.Caption = "BruteForcer"Label3.Caption = Label3.Caption & " - End: " & Time$Objasnjenje:Tekstualna polja od 1 do 6 sekoriste za unosenje prvih sestbajtova iz enkriptovanog fajla.Ako koristite HEX vrednosti nezaboravite da uh unosite kao &Hpa tek onda HEX vrednost bajta.Pritiskom na dugme BruteForcealgoritam od gore se izvrsava ikrece se sa razbijanjempassworda. Source se nalazi ufolderu ...\ Cas9\Source2\bforce<strong>The</strong> Art <strong>of</strong> Cracking by Ap0x Page 106 <strong>of</strong> 165