AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Algorithmen, Datenstrukturen und Klassendesign DEC-Blowfish-kodierte Strings in .NET entschlüsseln
Thema durchsuchen
Ansicht
Themen-Optionen

DEC-Blowfish-kodierte Strings in .NET entschlüsseln

Ein Thema von Udontknow · begonnen am 21. Jan 2015 · letzter Beitrag vom 19. Feb 2015
 
Udontknow

Registriert seit: 17. Jun 2002
223 Beiträge
 
#1

DEC-Blowfish-kodierte Strings in .NET entschlüsseln

  Alt 21. Jan 2015, 09:07
Hallo zusammen,

ich habe folgendes Problem, an dem ich mir die Zähne ausbeisse:

Ich habe diverse Strings (Win1252, unsere Default-Page bei allen Rechnern) vorliegen, die durch Delphi-Programme unter Zuhilfenahme der Cipher_Blowfish-Klasse aus dem DEC 5.2 von Hagen Reddmann verschlüsselt wurden.

Hier der Code für die Verschlüsselung (bin mir ehrlich gesagt noch nicht mal sicher, ob der so vollständig richtig ist, da Init nicht aufgerufen wird, aber zumindest lassen sich diese Strings in Delphi auch wieder entschlüsseln). PW ist ein bekannter interner String, der immer gleich bleibt.

Delphi-Quellcode:
function BlowFishEncode(DecodedStr:String):String;
var Cipher:TCipher_Blowfish;
begin
  Cipher:=TCipher_Blowfish.Create(PW,NIL);
  try
     Result:=Cipher.CodeString(DecodedStr,paEncode,fmtHEX);
  finally
     Cipher.Free;
  end;
end;
Nun zu meinem Problem: Ich muss in .NET (genauer: in C#) diese Strings wieder entschlüsseln können.

Ich habe hier eine Blowfish-Implementation heruntergeladen, scheitere aber bei der Ausführung.

Folgender Code für die Nutzung (String2Hex wandelt meinen regulären Ansistring PW in Hex um,denn der Konstruktorparameter fordert eine Hex-Repräsentation):

Code:
public static string String2Hex(string stringToConvert)
      {
         var sb = new StringBuilder();
         foreach (char t in stringToConvert)
         {
            sb.Append(Convert.ToInt32(t).ToString("x"));
         }
         return sb.ToString();
      }
     
     
      public string Decrypt(string encryptedText)
      {
         var array = Encoding.Default.GetBytes(encryptedText);
         var fish = new BlowFish(String2Hex(PW));
         
         var decrypted = fish.Decrypt_CBC(array);
         return Encoding.Default.GetString(decrypted);
      }
Bei Ausführung von Decrypt_CBC kommt die Exception "System.Exception: IV not set.".

Hier bin ich nun schon ein wenig verwirrt. Dieser "Initialization Vector" wurde in Delphi nicht direkt gesetzt. Was müsste ich hier angeben?

Wenn ich mir den DEC-Code so grob ansehe, wird offensichtlich im DEC auch ein RipeMD256-Hash vom beim Constructor übergebenen Key (bei mir PW) errechnet, der dann irgendwie in die Verschlüsselung einfliesst. Müsste dann nun nicht auch die C#-Variante RipeMD256 an irgendeiner Stelle verwenden?

Vielen Dank im voraus

Andreas

Geändert von Udontknow (21. Jan 2015 um 14:55 Uhr) Grund: DEC-Versionsangabe korrigiert
  Mit Zitat antworten Zitat
 

 

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 01:42 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 by Thomas Breitkreuz