MD5 Hash einer Datei ermitteln

[Z4ppy]

Ich habe diesen Eintrag in der Code Library schon gesehen, allerdings gehts da um Delphi .NET ;)

Ich möchte mir ein Programm schreiben, das möglichst schnell den MD5 Hash einer Datei berechnen kann. Die 25 Sekunden für 700 MB scheinen mir da schon relativ schnell. Wie kann man das in Delphi am besten umsetzen?

MfG Z4ppy

[omata]

Hast du das hier mal ausprobiert?

[Z4ppy]

Hab ich jetzt nicht ausprobiert, aber im oben verlinkten Thread steht ja auch:

Zitat:

Nachtrag: Test mit 700MB grosser File durchgeführt, Resultat ist das man übers FCL sehr schnell Hashen kann, beim Test bin ich auf 25sek gekommen. Für die gleiche File brauchte DAMN_Hash_Calculator_v1_5_1.exe bei mir knappe 60sek. Die selbe File noch mit md5.pas unter Delphi6 hat mehrere Minuten gedauert.

Das wird wohl diese md5.pas sein, daher.....

MfG Z4ppy

[omata]

Ups, wer lesen kann ist klar im Vorteil, sorry.

[Dax]

Muss es unbedingt eine Delphi-Implementation von MD5 sein? Wenn nicht, könntest du einfach voroptimierte Objektdateien linken.

[Hawkeye219]

Hallo,

die verlinkte Unit MD5.pas bietet noch einige Optimierungsmöglichkeiten:

1. Die Aufrufe der Funktionen F, G, H und I durch die jeweils einzige Anweisung ersetzen.
2. Die Aufrufe der Funktion rot durch die jeweils einzige Anweisung ersetzen.
3. Die jeweils letzte Inc-Anweisung in FF, GG, HH und II in den vorangehenden Ausdruck einbauen.
4. Die Funktion Encode durch Move ersetzen.

Zusammen mit einer eingeschalteten Optimierung sollte sich eine deutliche Reduzierung der Laufzeit ergeben.

Gruß Hawkeye

[Z4ppy]

@Dax: Es soll einfach so schnell wie möglich sein, ich möchte daher eigentlich mehrere Sachen ausprobieren und dann das schnellste nehmen. Aber wenn du mir so eine voroptimierte Objektdatei geben kannst, dann nur her damit...

@Hawkeye: Danke, ich werde morgen mal probieren, da ein wenig zu schrauben...

MfG Z4ppy

[BUG]

Wäre nicht überrascht, wenn das DEC im Vergleich auch nicht schlecht abschneidet
(in irgendeinem Beitrag* hat Hagen auch noch eine schnellere inoffizielle Version erwähnt).

Es gibt auch Md5-Funktionen in der Windows-"Cryptdll.dll", keine Ahnung ob die schnell oder langsam sind.

MfG,
Bug

* Man muss sich nur die richtigen Schlüsselwörter für die Suche merken: Russen Md5 :-D

[himitsu]

Zitat:

Zitat von Hawkeye219

Hallo,

die verlinkte Unit MD5.pas bietet noch einige Optimierungsmöglichkeiten:

1. Die Aufrufe der Funktionen F, G, H und I durch die jeweils einzige Anweisung ersetzen.
2. Die Aufrufe der Funktion rot durch die jeweils einzige Anweisung ersetzen.
3. Die jeweils letzte Inc-Anweisung in FF, GG, HH und II in den vorangehenden Ausdruck einbauen.
4. Die Funktion Encode durch Move ersetzen.

Zusammen mit einer eingeschalteten Optimierung sollte sich eine deutliche Reduzierung der Laufzeit ergeben.

Gruß Hawkeye

deine Optimierungen sind da schon alle lange drin, ^^
und dann wurde alles noch nach ASM gewwandelt
http://www.delphipraxis.net/internal...t.php?t=135239 siehe FHash.pas
die entsprehenden Pascal-Befehle stehen aber immernoch als Kommentar im Assemblercode drin.
und irgendwo geister noch 'ne Single-Version der FHash rum (also nur die Hashfunktionen in einer einzelnen Datei)

[Z4ppy]

Ich werde heute mehrere Sachen ausprobieren und dann hier Bericht erstatten.
Danke vorerst :thumb:

MfG Z4ppy

€dit: OK, ich habs völlig vergessen das zu machen, weil ich so viel anderes zu tun hatte... Aber morgen kommts dran ;)