[LockBox3] Komischer Stream bei RSA Keys

**milos**

Hallo,

ich möchte mit LockBox3 testweise ein Private und Public Key Paar generieren und in eine Datei speichern.

Ich folge dabei dieser Anleitung:

http://lockbox.seanbdurkin.id.au/Generate+an+RSA+key

Installiert habe ich LockBox über GetIt in der IDE.

Mein Code ist wie folgt:

zusammenfalten · markieren

Delphi-Quellcode:

			var

  LStream : TFileStream;

begin

  FSig := TSignatory.Create(nil);

  FCryptoLib := TCryptographicLibrary.Create(nil);

  FCodecRSA := TCodec.Create(nil);

  // setup codec

  FCodecRSA.CryptoLibrary := FCryptoLib;

  FCodecRSA.StreamCipherId := 'native.RSA';

  FCodecRSA.ChainModeId:= 'native.CBC';

  FCodecRSA.AsymetricKeySizeInBits := 1024;

  // setup sig

  FSig.Codec := FCodecRSA;

  // generate and save keys

  if FSig.GenerateKeys then

  begin

    LStream := TFileStream.Create('D:/public_key_test.txt', fmOpenReadWrite);

    try

      FSig.StoreKeysToStream(LStream, [partPublic, partPrivate]);

    finally

      LStream.Free;

      ShowMessage('Success');

    end;

  end

  else

    ShowMessage('Failed');

end;

Ich kriege zwar das Dialog "Success" und es knallt nichts, also als ob alles gut gelaufen wäre.

In der Datei "D:\public_key_test.txt" finde ich aber folgenden Inhalt:

Zitat:

N
LockBox3 € ÂB¿,L)¼ofþs@Œ‚¨®Ò’ÙZÊúûRÌ*Ö×°
!®F*°¦n’‡áÇ.3}²BÎ7§Ý¨Igc¢˜GóP¥™2ÌòÈ‚U*Œ.áCCFÀÆ\[Æ!‰F÷2g¼`Ä[½ãŠ2s3\Ïy„AÎºÔ”dpý¬¿co N
LockBox3 € [ÍA^á,7±ì”÷Ý»Pì©{7oÆHñsI*þËê°& b\™"x§¼Ø:%ûdôÒû÷'È\Kï™Å÷š¹Ó”}à+ÁÆâ2<åmûŽ\®@ÿdíòM¢ <c$›7J«áÆñ{bK²·à¾HÌA*Duß¤ìÄºèº¦

Ich habe versucht auch nur den Public bzw. den Private Key zu speichern, aber leider mit selbem ergebniss. Die Dateigrösse ist immer 308bytes, egal wie viele Keys ich speichere und auch egal wie gross ich sie beim generieren angebe.
Mache ich etwas falsch oder habe ich etwas vergessen?

Freundliche Grüsse
Milos

[LockBox3] Komischer Stream bei RSA Keys

[LockBox3] Komischer Stream bei RSA Keys

Forumregeln