Delphi-PRAXiS
Seite 1 von 3  1 23      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Brute Force Algorithmus (https://www.delphipraxis.net/14792-brute-force-algorithmus.html)

SleepyMaster 15. Jan 2004 19:56


Brute Force Algorithmus
 
Hi ihrs!

Hab hier mal einen Code von Illuminator umgeschrieben.

Aber vielleicht kennt jemand von euch einen Algorithmus der schneller arbeitet?!?

Delphi-Quellcode:
function BruteForce(Nb: integer): string;
const
  ch = '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz°!"§$%&/()=?`´\}][{^+*~''#_:.,;<>|@';
begin
  result := '';
    while Nb > 0 do begin
      result := ch[Nb mod Length(ch)+1] + result;
      Nb := Nb div Length(ch);
    end;
end;

Jelly 15. Jan 2004 20:35

Re: Brute Force Algorithmus
 
Was ist daran "Brute Force" :?:

Gruss,
Tom

[edit=Sharky]Doppelposting gelöscht. Mfg, Sharky[/edit]

delphi_newbie_123 15. Jan 2004 20:37

Re: Brute Force Algorithmus
 
und weiter ? :angle:

SirThornberry 15. Jan 2004 20:53

Re: Brute Force Algorithmus
 
ich denk mir mal das bruteforce daran ist das man der funktion übergibt die wievielte variante man haben will und die wird dann zurück gegeben. Somit erspart man sich z.B. die Passwortgenerierung...
Schneller sollte es allerdings gehen in dem man sich die letzte variante einfach zwischen speichert und die dann benutzt um das nächste variante zu erstellen. Ansosten dauert die generierung von mal zu mal länger
Bsp.:
Delphi-Quellcode:
var pok: Boolean;
    variante: Integer;
begin
  pok := False;
  variante := 1;
  while not pOK do
  begin
    if enterpasswort(bruteforce(variante)) then pOK := True;
    inc(variante);
  end;

SleepyMaster 16. Jan 2004 11:22

Re: Brute Force Algorithmus
 
@SirThornberry: Genau :thuimb:

Luckie 26. Jul 2005 23:56

Re: Brute Force Algorithmus
 
Ich habe gerade festgestellt, er gibt zwar 'ba' aber nicht 'ab' aus bei iesen Zeichen: 'abcdefghijklmnopqrstuvwxyz'. Ist das ein fehler im Algorithmus oder ist das Absicht?

Eichhoernchen 27. Jul 2005 00:30

Re: Brute Force Algorithmus
 
warum macht ihr das nicht rekursiv, wäre das nicht einfacher? Dauert aber wahrscheinlich länger!

Luckie 27. Jul 2005 10:33

Re: Brute Force Algorithmus
 
Ich habe etwas Probleme mit dieser Zeile:
Delphi-Quellcode:
result := ch[Nb mod Length(ch)+1] + result;
:gruebel:

Phoenix 27. Jul 2005 10:36

Re: Brute Force Algorithmus
 
Zitat:

Zitat von Eichhoernchen
warum macht ihr das nicht rekursiv, wäre das nicht einfacher? Dauert aber wahrscheinlich länger!

Nicht zwingend länger. Das Problem ist das es bei grosser Rekursionstiefe gerne zu Stack-Überläufen kommt, die iterativ 'nur' auf den Speicher gehen, nicht jedoch auf den Stack.

Luckie 1. Aug 2005 11:27

Re: Brute Force Algorithmus
 
Dürfte ich das Thema noch mal nach oben holen? Da ich den Algotrithmus nicht so ganz verstehe, könnte mal bitte jemand versuchen rauszubekommen warum er 'ba' ausspuckt, aber nicht 'ab'? Und den Fehler beheben?


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:01 Uhr.
Seite 1 von 3  1 23      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz