Passwortqualität prüfen

[Kinimod8]

Hallo,

wie kann ich die Passwortqualität z.B. mit der Brute-Force-Attack prüfen? Also, wenn ein Benutzer sein Passwort eingibt, ausgeben wie viele Jahre es dauert das Passwort zu cracken?

[sakura]

Zitat von Kinimod8:

ausgeben wie viele Jahre es dauert das Passwort zu cracken?

Nein, da es verschiedene Ansätze gibt, kann man auch nicht sagen wie schwer es wird, aber eine Wahrscheinlichkeit lässt sich ermitteln Schau mal hier: Passwort

......

[Luckie]

Was die Suche password quality so alles zu Tage fördert: http://www.delphipraxis.net/internal...ssword+quality

[Kinimod8]

Danke für die schnelle Hilfe!

Leider funzt das bei mir nicht so richtig.

Bei mir wird immer der gleiche Wert angezeigt.

[sakura]

Zitat von Kinimod8:

Bei mir wird immer der gleiche Wert angezeigt.

Wenn Du immer das gleiche Passwort angibst Im Ernst, der Link, den Luckie gepostet hat führt zu einer recht einfachen und guten PLösung, welche ohne weitere Umstände funktioniert.

......

[Kinimod8]

Warum glaubt mir denn keiner

Egal ob ich nun "1234" oder "QMAAX!gu*v" eingebe, es kommt das gleiche Ergebnis

[Stanlay Hanks]

Wer hat denn gesagt, dass dir keiner glaubt?
Aber um es besser nachvollziehen zu können, könntest du uns deinen Code ja mal posten.

Man liest sich, Stanlay

[sakura]

Keiner Ich spreche nicht für alle, nur für mich. Aber auch ich glaube Dir Unabhängig davon.

Ich habe als einfach mal Delphi 3 Professional gestartet, welches ja auch Deine Version ist, zumindest lt. Deinem Profil, Hagens Code hineinkopiert und kompiliert.

Es gab einen Fehler, da Delphi 3 den Typen LongWord nicht kennt, diesen kann man aber mit DWORD ersetzen und los gehts.

Code:

Ergebnis für "1234":         0                      (absolut unbrauchbares Passwort"
Ergebnis für "QMAAX!gu*v":   0,309258685021519      (schon besser)
Ergebnis für "üE2.=m>KJh°^": 0,418247909543705      (recht gut)

Anbei das D3P Beispiel als Download. Und: der Code geht

......

[Kinimod8]

Ich habe meinen Fehler gefunden.

Ich habe folgenden Code benutzt:
 ProgressBar1.Position := Round(100 * PassphraseQuality('Passwort')); Deswegen hat Delphi immer nur "Passwort" bewertet und nicht Edit1.Text!

[moritz]

Hallo

Dan ist recht klar das immer das gleiche rauskommt. Nimm mal FloatToStr

Gruß