Verschlüsselungsalgorithmus unicodefähig machen (kyrillische Buchstaben)

[Bernhard Geyer]

Verschlüsselungen arbeiten auf Byte-Ebene.
Dein Algorithmus geht vermutlich davon aus das 1 Character = 1 Byte ist.
Damit klapptes es bis Delphi 2007, aber nicht mehr danach.

Du musst deinen String in einen Memorystream packen und dann die einzelnen Bytes codieren.

[DieDolly]

Das wird dann vermutlich dieser Abschnitt hier sein

Delphi-Quellcode:

 for i := 1 to Length(Data) do
  begin
   s2 := s2 + ss[Ord(Data[i]) mod 16 + 1];
   ss := Copy(ss, Length(ss), 1) + Copy(ss, 1, Length(ss) - 1);
   s2 := s2 + ss[Ord(Data[i]) div 16 + 1];
   ss := Copy(ss, Length(ss), 1) + Copy(ss, 1, Length(ss) - 1);
  end;

[Michael II]

Nimm wie weiter oben erwähnt eine Bibliothek, welche wirklich verschlüsselt.

Der von dir verwendete Algorithmus wäre bereits in den 40er Jahren des letzten Jahrtausends innert Kürze geknackt worden - der Algo entspricht in etwa Verschlüsselungstechniken wie man sie im 15. Jahrhundert angewendet hat.

[DieDolly]

Kann man mit den Wolfang Erhardt-Codes was anfangen und wenn ja wie, sodass auch in PHP eine Abbildung funktioniert?
Ob das geknackt werden kann oder nicht ist mir egal. Es soll nur nicht auf den ersten Blick lesbar sein.

[DeddyH]

Zitat von DieDolly:

Es soll nur nicht auf den ersten Blick lesbar sein.

Wenn es nicht wirklich sicher sein muss, würde dafür ja schon ein Base64-Encoding genügen.

[DieDolly]

Kleine, neugierige Kinder sollten nicht direkt dahinterkommen

Gibt es denn sonst noch recht einfache Verschlüsselungen, hinter die ein normaler Mensch bzw etwas besserer PC-Nutzer nicht direkt kommt?
Ich rede nicht von Super-Nerds.

[DeddyH]

Was hast Du gegen Base64? Zumindest ich kann das nicht ohne Decoding lesen.