einfaches Verschlüsseln

[Willie1]

Hallo Delphifreunde*innen,
ich hole etwas aus. Ich benutze den Norton Tresor für meine Passworte, PINs usw. Vor ein paar Jahren ist der Tresor abgestürzt und ließ sich nicht mehr öffnen. Das hat mir als Lehre gedient, ein Backup des Tresors abzuspeichern. Programmieren macht Spaß, deshalb will ich selbst etwas schreiben.
Die Daten zeige ich in einem Memo mit schöner großer Schrift. Den Text speichere ich mit Rar.exe in ein Passwort geschütztes Archiv. Vorher will ich das Memo noch etwas verschlüsseln, doppelt hält besser. Wie soll ich vorgehen? Die Idee mit den Nibbles kann ich nicht realisieren. Wichtig ist mir, dass der Zeilenumbruch nach dem Verschlüsseln nicht mehr sichtbar ist.
Das mit Rar (SheellExecute) habe ich schon fertig und funktioniert.

Gruß Willie.

[himitsu]

DEC (Delphi Encryption Combendium) ... kann sein, dass es erst ab 10.3 oder 10.4 im GetIt zu finden ist (ansonsten siehe Forum und Github)
LockBox ... siehe GetIt
auch TZipFile kann Verschlüsselung


Und weil's hier immer wieder jemand nennt ... mORMot kann wohl auch vershclüsseln.

Ansonsten gibt es hier im Forum viel zum Thema Verschlüsselung zu finden.

[mytbo]

Du hast von mir in einem anderen Thread schon eine komplette Lösung bekommen. Hier. Was gefällt dir den an einer Verschlüsselung mit AES-256 nicht?

Bis bald...
Thomas

[Blup]

Doppelt verschlüsseln ist nicht unbedingt auch sicherer. Wichtig ist eher die Stärke der Verschlüsselung ausreichend auszulegen(Schlüssellänge).
Wenn es nur darum geht den Inhalt vor zufälliger Einsicht zu schützen (Zeilenumbrüche nicht sichtbar), reicht es vieleicht den Inhalt Base64-codiert zu speichern.

[stahli]

Zitat von Blup:

Doppelt verschlüsseln ist nicht unbedingt auch sicherer. Wichtig ist eher die Stärke der Verschlüsselung ausreichend auszulegen(Schlüssellänge).
Wenn es nur darum geht den Inhalt vor zufälliger Einsicht zu schützen (Zeilenumbrüche nicht sichtbar), reicht es vieleicht den Inhalt Base64-codiert zu speichern.

... oder evtl. einfach so etwas wie StringList.SaveToStream

[Sinspin]

Ich habe mir vor Jahren auch ein eigenes Tool gebaut.
Innen drinne ist LZMA, nach dem Verschlüsseln bringt das ja nix mehr. Dann eine OTP Variante drum herum.
Das ist klein und fein. Lediglich der Editor für den Inhalt ist nicht mehr ganz zeitgemäß.

[KodeZwerg]

Ich nutze mal die Gelegenheit um ein paar bekannte Krypto-Quellen zu benennen.

Dies ist keine Rangordnung! Nicht als solches interpretieren. Danke.

DEC Eine Sammlung die von TurboMagic gerade geupdated wird.
mORMot bzw mORMot2 Umfangreiche Sammlung als Framework verpackt, in meinen Augen sehr stabil.
CryptoLib4Pascal Man könnte sagen wie der Zwilling von DEC. (benötigt HashLib4Pascal)
LockBox bzw LockBox3 Eine weitere Krypto-Sammlung.
Gammatester Gedenk-Sammelsurium der verschiedensten Algorithmen die meist schnell und unabhänging arbeiten.
AES was keine zusätzlichen Units/Frameworks braucht (sehr schlanke Version sozusagen, für Kleinstprojekte würde ich das nehmen.)


Hier noch ein paar Kompressions-Möglichkeiten.

XZ Kompression könnte man als "Außenhaut" einbinden, dann entfällt externes Rar/Zip/7zip gedöns. (baut auf liblzma.dll auf)
LZMA nativ, benötigt keine weiteren Dlls.
7zip für Delphi 7, benötigt 7zip dll.
7zip etwas moderner gegenüber den Delphi 7 port.
oder ZLib von Delphi...

Wenn es um eigen-Kreationen geht, zeige doch mal was Du getippst hast und wir arbeiten dran.

[TurboMagic]

Zitat von himitsu:

DEC (Delphi Encryption Combendium) ... kann sein, dass es erst ab 10.3 oder 10.4 im GetIt zu finden ist (ansonsten siehe Forum und Github)
LockBox ... siehe GetIt
auch TZipFile kann Verschlüsselung


Und weil's hier immer wieder jemand nennt ... mORMot kann wohl auch vershclüsseln.

Ansonsten gibt es hier im Forum viel zum Thema Verschlüsselung zu finden.

Himitsu meint das hier:
https://github.com/MHumm/DelphiEncryptionCompendium

Ja, es ist eine Variante davon in GetIt zu finden und zwar in jeder Version für die es GetIt gibt aber:
die nützt dir nix. Das ist nämlich eine Lite Variante mit diversen Kryptographischen Algorithmen aber
explizit ohne Verschlüsselungsalgorithmen! Warum? EMBT will keine Probleme mit irgendwelchen US
Exportbeschränkungen die Verschlüsselung betreffen.

=> lieber direkt von der Quelle runterladen, dann hat man alles. Enthält außer ca. 40 Seiten PDF
Doku auch diverse Beispielprogramme.

Grüße
TurboMagic

[Willie1]

Hallo Freunde*innen,
es geht in der Tat darum, zu verhindern, dass jemand ohne Mühe meine Passworte einsehen könnte. Das ist sehr unwahrscheinlich, meine Frau hat ihren eigenen PC und wer sollte an meine Daten kommen. Schließlich sind meine Computer Start-Passwortgeschützt. Aber trotzdem sollen meine "Geheimnisse" nicht offen herumliegen. Ich habe 3 Einbrüche hinter mir, die Einbrecher haben sich zum Glück nicht für die Computer interessiert! Deshalb sind mir eure Hinweise sehr wichtig. Die Banken usw. bombardieren einen mit PINs, aufschreiben darf man sie nicht aber alle im Kopf behalten, geht auch nicht. Ich melde mich.

Zur Zeit bin ich dabei, einen Impftermin zu bekommen, das ist sehr kompliziert und anstrengend für mich.
Bis bald Grüße Willie.

[himitsu]

NTFS bietet eine Verschlüsselung, die ist an den Nutzeraccount deines Windows-Benutzers gebunden.
Wenn man das nutzt, sollte man auf jeden Fall soeine Wiederherstellungsdiskette (oder wie man das jetzt nennt) erstellen, denn falls Windows kaputt ist, wären auch diese Daten futsch.

Bei mir ist es ein verschlüsseltes VBerzeichnis im NAS.

Es gibt auch USB-Sticks mit PIN oder sogar Fingerabdruckscanner.



Selbet ein "einfaches" XOR ist per se sicher.

Ver und entschlüsseln

Delphi-Quellcode:

// S = AnsiString oder UTF8String
RandSeed := .....;  
for i := 1 to Length(S) do
  S[i] := AnsiChar(Ord(S[i]) xor Random(256));  // für UnicodeString 65536 da 2 Byte

Randomize;  // Zufallsgenerator zufällig

Achtung: heoretisch könnte sich der Pseudozufallsgenerator von Delphi mal ändern (hat er zwar seit 20 Jahren nicht, aber könnte.
Aber man kann das "Random" ja durch eine eigene Formel ersetzen. So lange das Programm nich neu kompiliert wird, bleibt es aber auch unverändert.

Und sooo schwer sind die vorher schon genannten Verschlüsselungen auch nicht, als dass man sie nicht nutzen könnte.