Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Algorithmen, Datenstrukturen und Klassendesign (https://www.delphipraxis.net/78-algorithmen-datenstrukturen-und-klassendesign/)
-   -   Delphi Blöde Frage zum Thema ZipCrypto (https://www.delphipraxis.net/213560-bloede-frage-zum-thema-zipcrypto.html)

himitsu 18. Aug 2023 17:47

AW: Blöde Frage zum Thema ZipCrypto
 
Beim Entpacken gibt es ja auch solche Probleme, bzw. auch andere Ver-/Entschlüsselungsstreams ebenfalls.

Oftmals wird dann wieder an den Anfang gesprungen und bis zum neuen Offset alles neu gelesen (entschlüsselt/entpackt/...)
Einige speichern sich zwischendrin auch alle 'nem gewissen Abstand den Status und brauch das dann nicht komplett von Anfang, sondern nur vom letzten Snapshot aus zu machen.

mytbo 18. Aug 2023 19:03

AW: Blöde Frage zum Thema ZipCrypto
 
Zitat:

Zitat von Sherlock (Beitrag 1525802)
...ich hab mich erstmal verbissen.

Wie es mit mORMot (ZIP-Datei mit optional AES verschlüsselten Einträgen) umzusetzen ist, habe ich in diesem Artikel beschrieben. Quelltext im Anhang des Artikels. Umgesetzt in den Funktionen LoadStream/SaveStream.

Bis bald...
Thomas

KodeZwerg 18. Aug 2023 21:28

AW: Blöde Frage zum Thema ZipCrypto
 
Von mORMot kann auch ich die unit SynLZ empfehlen, die stellt Kompressions-Stream methoden zur Verfügung und benötigt keine extras... doch eine include datei soweit ich mich erinnere...
Das habe ich schon des öfteren in Verbindung mit anderen Krypto streams verwendet, die Kompression ist gut.
https://github.com/synopse/mORMot/blob/master/SynLZ.pas

Sherlock 29. Aug 2023 14:56

AW: Blöde Frage zum Thema ZipCrypto
 
So, ich war letzte Woche leider kurzfristig außer Gefecht. Vielen Dank für alle Rückmeldungen. Ich kann zum einen vermelden @Uwe, daß der Weg über Read(Index: Integer; out Bytes: TBytes) wunderbar funktioniert (meine Datei ist entpackt lächerliche 400Bytes groß) und zum anderen, daß ich vermutlich dabei bleiben werde. Da für meine Zwecke eine grobe "Obfuskation" ausreichend sein dürfte. Dazu werde ich vermutlich noch ein bis zwei Schritte durchführen, um die Datei als Zip unkenntlich/unlesbar zu machen (Dateiendung, PK Header, vielleicht auch fehlerhafter CRC) mal sehen, was mir so einfällt, und wofür Zeit bleibt. Ich werde also kein größeres Framework installieren müssen, für diese kleine Aufgabe. Danke nochmals allen, für die Ideen.

Sherlock

Uwe Raabe 29. Aug 2023 15:38

AW: Blöde Frage zum Thema ZipCrypto
 
Zitat:

Zitat von Sherlock (Beitrag 1526223)
daß der Weg über Read(Index: Integer; out Bytes: TBytes) wunderbar funktioniert

Wie ich schon erwähnt hatte, ist es leider so dass der über Read zurückgegeben Stream nicht frei positionierbar ist und vermutlich nur in einem Stück gelesen werden kann und dabei die Größe bekannt sein muss. Das ist im Grunde auch was das Read Overload mit den TBytes macht.

Ich werde da wohl auch nichts mehr dran ändern, da ein möglicher Fix vermutlich auch über ein TBytes gehen würde und dafür lohnt sich der Aufwand einfach nicht.


Alle Zeitangaben in WEZ +1. Es ist jetzt 22:18 Uhr.
Seite 2 von 2     12   

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 by Thomas Breitkreuz