init III

Windows Goldman Sachs Prime PGP decrypt/get_without_log.cmd

@@ -0,0 +1,58 @@
+for /f "usebackq eol=; tokens=1,* delims= " %%i in (`date /t`) do set WD=%%i
+if %WD%==So goto Sonntag
+if %WD%==Mo goto Montag
+
+calc.exe date-1 yyyymmdd DATUM > date.bat
+goto NEXT
+
+:Sonntag
+calc.exe date-2 yyyymmdd DATUM > date.bat
+goto NEXT
+
+:Montag
+calc.exe date-3 yyyymmdd DATUM > date.bat
+
+:NEXT
+call date.bat
+
+:DWNLD
+echo pgp Dateien werden abgeholt
+
+echo open ftpserver.gs.com> answer_pgp.txt
+echo icfkur>> answer_pgp.txt
+echo aewr09u>> answer_pgp.txt
+echo cd outgoing>> answer_pgp.txt
+echo cd %1>> answer_pgp.txt
+echo bin>> answer_pgp.txt
+echo mget *.%DATUM%.pgp>> answer_pgp.txt
+echo bye>> answer_pgp.txt
+
+cd temp
+ftp -i -s:..\answer_pgp.txt
+
+  rem Dateien entschluesseln
+echo Dateien werden entschluesselt
+for %%a in (*.pgp) do pgp --decrypt %%a --passphrase "please let me in"
+
+
+  rem Dateien archivieren
+echo Archiviere Dateien
+
+
+rem verschluesselte daten ins archiv
+mkdir ..\archive\%1\%DATUM%_verschluesselt
+xcopy /Q /Y /I *.%DATUM%.pgp ..\archive\%1\%DATUM%_verschluesselt
+del   /Q       *.%DATUM%.pgp
+
+rem unverschluesselte daten ins archiv
+mkdir ..\archive\%1\%DATUM%
+xcopy /Q /Y /I *.txt ..\archive\%1\%DATUM%
+
+rem unverschluesselte daten kunden bereitstellen
+mkdir ..\encrypted\%1\%DATUM%
+xcopy /Q /Y /I *.txt ..\encrypted\%1\%DATUM%
+
+rem temporaeren ordner leeren
+del   /Q    *.txt
+
+cd ..