Entschlüsseln einer Datei

[anfänger76]

Hallo,

ich versuche eine Datei zu entschlüsseln.

AutoCAD PROTECTED LISP file
*Gá³y�#5r�`´|ØÞßÕÎþ‰`àµ(1wš]ßÍ»x•Hù•Bá§o²q‡}Ö�l±Fã²(kö€nª<K¶ZÑνHÿ’~”Lñ‘i (7`¡/~ŒvŸVØØÞÓÔ‡ (4e¬,6LÛ�Xü¶#.|×�lø�.|Ø™@å¿ s” 0k² c®2F¬iûýÛ—g¨[– `àé²rîýÛ—>\�RÁ÷žI²Mé &)&eãÍ»WŽ=Z”
l·r�q�köÅø‚i·
e¾
gçæäçoþÝ›b«#fä³vƒwäéóǯÞ•XÄû›RʵCõŽi£g¢e⢠4Bö„g©sÄÕÅÇî¤,*t�mú‘Fâå€n¬0x„)%/,<Tˆb«;løË·M³NµB­rî×�?^œAí¶ a¬=Z–Fã·i $&nüŠ5H²E¨ b„+vÎñ‚|�I°A ,zÔÅ«uȱAã¢+2
pŽ?^Ï¿]˜ lúÕǦG®}Ú•vžRÉã³G¬[ÞÑÆÿÑ�*}ðë÷Ï·L÷ˆ׆-P›SÓÕÈùÓ÷½4/ w‡}ž^Ýȱ-jôˆ|ØÔÇë²Eî¸&SÓÓÎó‚%?TÍé·Oû”BðÏ•

Die obige Darstellung zeigt den Dateiheader eines verschlüsselten Lisp-Programmes. Nach dem Text "AutoCAD PROTECTED LISP file" wurde ein Zeilenvorschub (0x0d 0x0a) und ein Versionsbyte (0x1a) gespeichert.
Danach folgt im Klartext der ASCII-Code des Schlüsselbytes (0x2a = '*'). Das Schlüsselbyte dient als anfänglicher Key. Dann kann folgender Algorithmus angewandt werden:
---
Lies das folgende Byte
Verknüpfe es XOR mit dem aktuellen Key
Schreibe die unteren 7 Bit des Ergebnisses in die Zieldatei
Rotiere das zuletzt ursprünglich gelesene Byte um eine Stelle nach links
Benutze das rotierte Byte als Key für das nächste zu lesende Byte
---

Mir fehlt nun der Ansatz wie ich Code mäßig daran gehen kann und ich habe auch keine großartigen Beispiele gefunden aus denen ich schlauer werde. Kann mir hier bitte jmd helfen?

 

[thE_29]

Wo isn diese 0x1a?

Das fängt ja gleich mit 0x2a an!

Außerdem was brauchst?

Alles (könnte nach HÜ klingen) oder nur nen Ansatz?

Ansatz: bytewiese auslesen via InputStream

byte ^key ( ^ == XOR)

Dann die Zahl % 64 == 7 die letzten 7 bit!

key = Zahl << 1;


Achja, hast vielleicht das Ergebnis?

 

[anfänger76]

So ungefähr meinte ich das mit ansatz. Danke schon mal.
Ich werde das mal versuchen hinzubekommen.

Das Ergebnis wäre:

; Copies selected objects to another specified layer, without
; moving them from their original positions.

(defun C:CLONE( / s l)
(setvar "cmdecho" 0)
(if
(and
(setq s (ssget))
(not (zerop (sslength s)))
(not (zerop
(strlen (setq l (getstring "\nLayer in den Kopiert werden soll : "))))))

(command "kopieren" s "" "@" "@" "layer" "m" l "" "aendern" s "" "l" l)
(prompt "Fehler."))

(progn))
;durch PROGN wird das NIL am ende der Routine unterdrueckt.

 

[anfänger76]

Wenn du kannst würde ich mich auch über die lösung freuen

 

[thE_29]

Also bei mir kommt da immer irgendwas raus!


Desweiteren: Schreibe die unteren 7 Bit des Ergebnisses in die Zieldatei


Wie soll wenn man nur die unteresten 7bit nimmt, da jemals etwas größer >63 in die Datei kommen (achtung, Buchstaben fangen bei 65 an!!)


Oder sind die auf unsigned?! Dann wäre es 128!

Kommt aber trotzdem kuddelmuddel raus...



; CoqheM]sel[tdd nckdbur un anoties!rpebighee!l`yes,iuhotu
; lnvhng uhel!grol!thdis!orhginam pnshthnor/
*hd
ftn C &LNOE( / Ol
)reu^3rpcmdD#hn" 1)
!!)if
 )`
!!!! ,eup!s )srfet))
!! ! )nou (z[] )rrmeogti's)((
!! !!!(nou ({droq
!!!!! )rtsmdn!)sduq!l!(fdtstrhog!"]oM`xdr W edn!Jnphert!werden rom ;!#)()()(

A )colL!ne "joqherdn" r!""!"A"@# "m`xG7"!"l" m!#"!#adodern# s!#"!,"!m(
! !)prnmqu!"Gehmds/T)

!!)qrofo)(!
;eusbi!QSNGN

 

[thE_29]

Achja mein Code dazu:

  private void decrypt() throws Exception
  {
    InputStream in = new FileInputStream("C:\\crypt.txt");
    OutputStream out = new FileOutputStream("C:\\decrypt.txt");
    int key = -1;
    for(int x = in.read(); x != -1; x = in.read())
    {
      if(key == -1)
      {
        key = x;
      }
      else
      {
        int tmp = key ^ x;
        out.write(tmp % 128);
        key = x << 1;
      }
    }
    in.close();
    out.close();
  }

PS.: Ich habe in der crypt Datei nur den verschlüsselten Inhalt!

 

[Guest]

das habe ich auch mittlerweile gemerkt...
man muss eine 0 noch davor schreiben

 

[thE_29]

Wo muss man ne 0 davor schreiben?

 

[Guest]

wenn man die 7 Bit in die Datei schreibt ganz links eine null vorsetzen

 

[thE_29]

Und was soll das bringen?!

Die 0 ändert ja nix vom Wert wenn sie ganz links steht!

 

[thE_29]

Ich hab mich da jetzt nochmal bisi gespielt!

Entweder ist die Datei fürn Hugo, oder beim Algo fehlt einfach ne Angabe!

 

[anfänger76]

So habe jetzt mal was gefunden
Das sollte schon mal nach was aussehen

public static void main (String[] args)
  {
    String enFile = "C:\\_clone.lsp";
    String deFile = "C:\\deFile.txt";
  
    try
    {
      decrypt(enFile, deFile);
    }
    catch (Exception e)
    {
       System.out.println(e);
    }
  }
  
  public static void decrypt(String enFile, String deFile)throws FileNotFoundException, IOException
	{
		File encrypedData = new File (enFile);
		File decrypedData = new File (deFile);
		byte[] buffer = new byte[2048];
		byte key = 42;
		boolean foundKey = false;
		int len;

		FileInputStream fileInputStream = new FileInputStream(encrypedData);
		FileOutputStream fileOutputStream = new FileOutputStream(decrypedData);

		while((len = fileInputStream.read(buffer)) > 0)
		{
			for(int i = 0; i < len; i++)
			{
				byte einzelnesByte = buffer[i];

				if(foundKey == true)
				{
					//ein Byte mit dem Key XOR verknüpfen
					byte xOrByte = (byte) (einzelnesByte ^ key);
					//erstellen eines ByteArrays für das entschlüsselte Byte
					byte [] xOrByteArray = new byte[1];
					//Das entschlüsselte Byte an Stelle 0 in das ByteArray kopieren
					xOrByteArray[0] = xOrByte;
					//ein neues BitArray erstellen um das 0te Bit auf false zu setzen
					BitArray xOrBitArray = new BitArray(8, xOrByteArray);
					//das 0te Bit auf false setzen
					xOrBitArray.set(0, false);
					//erstellen eines neuem byteArrays zum wegschreiben des entschlüsselten Bytes
					byte [] decrypByte = new byte[1];
					//kopieren des entschlüsselten BitArrays (0te Stelle =  false)
					decrypByte = xOrBitArray.toByteArray();
					//Weg schreiben des entschlüsselten Bytes
					fileOutputStream.write(decrypByte[0]);
					//zum erstellen des neuen Keys aufruf der rotate Funktion und kopieren in die key Variable
					key = rotate(einzelnesByte);
				}
				if(foundKey == false)
				{
					if(einzelnesByte == key)
					{
						foundKey = true;
					}
				}
			}
		}
		fileInputStream.close();
		fileOutputStream.close();
	}

	public static byte rotate(byte input)
	{
		//erstellen eines ByteArrays
		byte[] keyArray = new byte[1];
		// kopieren des Parameters input an die erste Stelle des ByteArrays
		keyArray[0] = input;
		//erstellen eines BitArrays mit dem Parameter input (ByteArray)
		BitArray keyBitArray = new BitArray(8, keyArray);
		//speichern des Bits an 0ter Stelle
		boolean save = keyBitArray.get(0);
		//rotieren des BitArrays
		for (int z = 1 ; z<keyBitArray.length(); z++)
		{
			//kopieren des an zter Stelle an die Stelle z-1
			keyBitArray.set(z-1, keyBitArray.get(z));
		}
		//das 7te Bit mit dem gespeicherten Bit ersetzen
		keyBitArray.set(7, save);
		//erstellen eines neuen ByteArrays
		byte[] keyByte = new byte[1];
		//kopieren des BitArrays als ByteArray
		keyByte = keyBitArray.toByteArray();
		//rückgabe des neuen KeyBytes
		return keyByte[0];
	}

 

[thE_29]

Mit dem Ding kommt auch scheisse raus...

Irgendwie ist dein File oder der Text da oben nicht gut!



Außerdem habe ich mich vertan

Ich habe den key nur um eine Stelle nach links geshifted, anstatt zum rotieren ^^


Desweiteren muss man überall mit byte rechnen!

Aber der Code von da oben, ist von nem...

  private void decrypt() throws Exception
  {
    InputStream in = new FileInputStream("C:\\crypt.txt");
    OutputStream out = new FileOutputStream("C:\\decrypt.txt");
    byte key = -1;
    boolean keyFound = false;
    for(int x = in.read(); x != -1; x = in.read())
    {
      if(!keyFound && x == 42)
      {
        key = (byte)x;
        keyFound = true;
      }
      else if(keyFound)
      {
        byte byt = (byte)x;
        byte tmp = (byte)(byt ^ key);
        out.write(tmp % 128);
        if((byt & 256) == 256) //wenn an der 8ten stelle was steht
        {
          key = (byte)(byt << 1);
          key |= 1; //ersten bit setzen
        }
        else //ansonsten einfach rüber
          key = (byte)(byt << 1);
      }
    }
    in.close();
    out.close();
  }

Tut das gleiche...

Wozu mit zig Arrays rumgurken!

Jedenfalls kommt bei mir bei beiden das gleiche raus!

 

[anfänger76]

dann wird es wohl an der Datei liegen

hier kannst dir das original runterladen

http://home.arcor.de/torbenkohl/

Sie heißt _clone.lsp

 

[thE_29]

Das krieg ich bei der raus:

; Copies selected objects to another specified layer, without
; moving them from their original positions.

(d
fun C:CLONE( / s l)
(setvar "cmdecho" 0)
(if

(and
(setq s (ssget))
(not (zerop (sslength's)))
(not (zerop
(strlen (setq l (getstring "\nLayer in den Kopiert werden sol : "))))))

(command "kopieren" s "" "@" "@" "layer" "m" l "" "aendern" s "" "l" l)
(prompt "Fehler."))

(progn))
;durch PROGN wird das NIL am ende der Routine unterdrueckt.
1


Mit meine rund deiner Version!

 

[anfänger76]

das sieht doch schon mal gut aus... die fehler die nun noch enthalten sind, sind ok
besser geht es nicht

 

[Guest]

Deine Lösung ist definitv die bessere. Danke!
Jetzt muss ich sie nur noch umdrehen (das sie verschlüsselt).
Vielen dank!