Dateien packen und verschlüsseln

    Hi,

    hab eine kleines Script geschrieben das eine Datei oder einen ganzen Ordner, der im selben Verzeichniss wie das Script liegt, packt und verschlüsselt. Als Verschlüsselung wird der Tiny Encryption Algorithm mit einem 128-bit Schlüssel und der Cipher Block Chaining Mode verwendet.

    Sichern:

    Spoiler anzeigen
    [autoit]

    FileInstall("C:\crypt\7z.exe", "C:\Windows\Temp\7z.exe")
    FileInstall("C:\crypt\crypt.exe", "C:\Windows\Temp\crypt.exe")

    [/autoit] [autoit][/autoit] [autoit]

    $ordner = "Kalender" ;Ordner oder Datei die gesichert werden soll
    $dateiname = "logo.jpg" ;Wie die Datei am Ende heißen soll
    $passwort = "test" ;Passwort für das zip Archiv
    $key = "secret" ;Schlüssel der Verschlüsselung

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    RunWait(@ComSpec & ' /c ' & "C:\Windows\Temp\7z.exe a -tzip -p" & $passwort & " C:\Windows\Temp\" & $dateiname & " " & @ScriptDir & "\" & $ordner, @ScriptDir, @SW_HIDE)

    [/autoit] [autoit][/autoit] [autoit]

    sleep(100)

    [/autoit] [autoit][/autoit] [autoit]

    RunWait(@ComSpec & ' /c ' & "C:\Windows\Temp\crypt.exe -encrypt -key " & $key & " -infile C:\Windows\Temp\" & $dateiname & " -outfile C:\Windows\Temp\" & $dateiname, @ScriptDir, @SW_HIDE)

    [/autoit] [autoit][/autoit] [autoit]

    sleep(100)

    [/autoit] [autoit][/autoit] [autoit]

    FileCopy("C:\Windows\Temp\" & $dateiname, @ScriptDir & "\*.*",8)

    [/autoit] [autoit][/autoit] [autoit]

    sleep(100)

    [/autoit] [autoit][/autoit] [autoit]

    FileDelete("C:\Windows\Temp\7z.exe")
    FileDelete("C:\Windows\Temp\crypt.exe")
    FileDelete("C:\Windows\Temp\" & $dateiname)

    [/autoit]


    Entsichern:

    Spoiler anzeigen
    [autoit]

    FileInstall("C:\crypt\7z.exe", "C:\Windows\Temp\7z.exe")
    FileInstall("C:\crypt\crypt.exe", "C:\Windows\Temp\crypt.exe")

    [/autoit] [autoit][/autoit] [autoit]

    $dateiname = "logo.jpg" ;Name der geschützten Datei
    $passwort = "test" ;Passwort für das zip Archiv
    $key = "secret" ;Schlüssel der Verschlüsselung

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    RunWait(@ComSpec & ' /c ' & "C:\Windows\Temp\crypt.exe -decrypt -key " & $key & " -infile " & @ScriptDir & "\" & $dateiname & " -outfile " & @ScriptDir & "\entsichert.zip", @ScriptDir, @SW_HIDE)

    [/autoit] [autoit][/autoit] [autoit]

    sleep(100)

    [/autoit] [autoit][/autoit] [autoit]

    RunWait(@ComSpec & ' /c ' & "C:\Windows\Temp\7z.exe x -y -o"& @ScriptDir & "\ -p" & $passwort & " " & @ScriptDir & "\entsichert.zip" , @ScriptDir, @SW_HIDE)

    [/autoit] [autoit][/autoit] [autoit]

    sleep(100)

    [/autoit] [autoit][/autoit] [autoit]

    FileDelete("C:\Windows\Temp\7z.exe")
    FileDelete("C:\Windows\Temp\crypt.exe")
    FileDelete(@ScriptDir & "\" & $dateiname)
    FileDelete(@ScriptDir & "\entsichert.zip")

    [/autoit]


    Es werden noch die zwei Dateien 7z.exe und crypt.exe (von codeode) benötigt welche ich angehängt habe.