AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

SHA! Unit gesucht

Ein Thema von Luckie · begonnen am 25. Mai 2012 · letzter Beitrag vom 29. Mai 2012
Antwort Antwort
Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.531 Beiträge
 
Delphi 12 Athens
 
#1

AW: SHA! Unit gesucht

  Alt 25. Mai 2012, 22:46
http://www.delphipraxis.net/155688-mini-sha1.html


@Horst0815: Sicher daß dein Code noch in XE (2009+) läuft? (speziell der Selbsttest )
Ein Therapeut entspricht 1024 Gigapeut.
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#2

AW: SHA! Unit gesucht

  Alt 25. Mai 2012, 22:51
Also ich habe die:
Delphi-Quellcode:
{******************************************************************}
{          MD5 Hashsum Evaluation Unit For Borland Delphi          }
{                                                                  }
{          Copyright © 2002 by Dimka Maslov                        }
{          E-mail:   mail@endimus.com,                             }
{          Web-site: http://www.endimus.com                        }
{                                                                  }
{         Derived from the RSA Data Security, Inc.                 }
{         MD5 Message-Digest Algorithm described in RFC 1321       }
{         http://www.faqs.org/rfcs/rfc1321.html                    }
{******************************************************************}
Der kann ich eine Datei über geben und bekomme eine Digest zurück den ich mit einer Funktion aus der Unit in einen String umwandeln kann. Und so was suche ich auch für SHA1 bzw. der Unit von Horst übergebe ich wohl den Dateiinhalt als Buffer, aber wie wandele ich den Digest in einen String um?
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Benutzerbild von Aphton
Aphton

Registriert seit: 31. Mai 2009
1.198 Beiträge
 
Turbo Delphi für Win32
 
#3

AW: SHA! Unit gesucht

  Alt 25. Mai 2012, 22:58
Ich dachte mir, du redest hiervon
http://www.michael-puff.de/Programmi...mporte/Aphton/
das Erkennen beginnt, wenn der Erkennende vom zu Erkennenden Abstand nimmt
MfG
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#4

AW: SHA! Unit gesucht

  Alt 25. Mai 2012, 23:08
Verdammt. Ich kenne mich auf meinen eigenen Webspace nicht mehr aus. Aber da ist SHA1 auch nicht dabei.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Benutzerbild von Aphton
Aphton

Registriert seit: 31. Mai 2009
1.198 Beiträge
 
Turbo Delphi für Win32
 
#5

AW: SHA! Unit gesucht

  Alt 25. Mai 2012, 23:10
Mich wundert aber das hier viel mehr
Zitat von Luckie:
(...) aber wie wandele ich den Digest in einen String um?
das Erkennen beginnt, wenn der Erkennende vom zu Erkennenden Abstand nimmt
MfG
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#6

AW: SHA! Unit gesucht

  Alt 25. Mai 2012, 23:15
Ich meinte die Unit von Horst. Oder habe ich da eine entsprechende Funktion übersehen? Arhg. Ich habe sie übersehen.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
gammatester

Registriert seit: 6. Dez 2005
999 Beiträge
 
#7

AW: SHA! Unit gesucht

  Alt 26. Mai 2012, 11:04
Ich weiß zwar nicht wo Horst0815 seine erste Unit her hat, aber der Selbsttest funktioniert ab D12 so nicht mehr! In meiner Unit steht
Delphi-Quellcode:
function SHA1SelfTest: boolean;
  {-self test SHA1: compare with known value}
const
  s1: string[3] = 'abc';
  D1: TSHA1Digest= ($a9,$99,$3e,$36,$47,$06,$81,$6a,$ba,$3e,$25,$71,$78,$50,$c2,$6c,$9c,$d0,$d8,$9d);
Sein s: string= 'abc'; ist ab D12 Unicode und SHA1SelfTest liefert false! Selbst wenn das falsche SHA1Update(Context,@s[1],length(s)); durch SHA1Update(Context,@s[1],length(s)*sizeof(char)); ersetzt würde, käme selbstverständlich ein anderer Testwert heraus!
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 23:32 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz