auch für BruteForce brauchst du eine Hintertür ... nämlich das Grundprinzip des Algorithmusses, für die Verschlüsselung und/oder die Art der verschlüsselten Daten.
sonst kannste ja gleich Zufallszahlenketten bilden ... irgendwann stimmt eine der zufälligen Ketten mit dem gesuchten Text schon überein
@Bernhard: drum sagte ich ja > 100% ist nicht möglich
@Corpsman: das
DEC ist frei zur Verwendung, also wegen de Rechte mußte dir da keine großen Sorgen machen
mach eh grad mal Pause und hatte 'nen Sekündchen Zeit
Delphi-Quellcode:
Var
m: TMemoryStream;
s: String;
mp, me, sp, se, ss: PByte;
Begin
SendMessage(HWND_BROADCAST, CM_INVALIDATE, 0, 0);
If OpenDialog1.execute Then Begin
m := TMemoryStream.Create;
Try
m.LoadFromFile(Opendialog1.FileName);
mp := m.Memory;
me := mp + m.Size;
s := Edit1.text;
sp := Pointer(s);
se := sp + Length(s);
ss := sp;
While mp < me do Begin
mp^ := mp^ xor sp^;
Inc(mp);
Inc(sp);
If sp = se Then sp := ss;
End;
m.SaveToFile(Opendialog1.FileName + 'C');
Finally
m.Free;
End;
// Ausgabe des Verwendeten Passwortes
Label1.Caption := 'Benutztes Passwort [ Länge : ' + IntToStr(Length(s)) + ' ]';
Edit3.text := s;
End;
End;
und jetzt gibt dem Code mal ein Passowrt von der Selben größe wie deine Testdatei (oder zumindesten 1/4 davon) und laß nochmal dein Tool drüber laufen ...