Hmily 发表于 2009-5-7 17:39

.bat文件加密解密脚本

加密脚本(保存为.BAT文件)

@ECHO off
cls
color 0A
ECHO                BAT 加 密 器
ECHO ==========================================================
echo.
echo.
echo 说明: 在下面输入需要加密的批处理文件名
echo.
echo       若在此文件的同目录下直接输入“文件名.bat”即可
echo.
echo       也可以带路径指定任意BAT
echo.
echo       加密完成后会在同目录下生成“加密成品.bat”文件
echo.
echo.
echo.
set /p file=请输入需要加密的批处理后按回车键(q=退出):
if "%file%"=="q" goto quit
echo %file%|findstr /i "\.bat$">nul && goto go
echo %file%|findstr /i "\.cmd$">nul && goto go
cls
echo ==============
echo 请正确输入!
echo ==============
echo.
echo.
echo 按任意键重新输入......
pause>nul
goto start
:go
if not exist "%file%" goto newly
if exist encrypt.bat copy encrypt.bat encryptbak.bat
echo %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a %%%%a >"%tmp%\encrypt.tmp"
echo cls>>"%tmp%\encrypt.tmp"
type "%file%">>"%tmp%\encrypt.tmp"
setlocal enabledelayedexpansion
for %%i in ("%tmp%\encrypt.tmp") do (
   echo %%~zi >nul 2>nul
   set size=%%~zi
   set num=!size:~-1!
   set /a mod=!num!%%2
   if !mod! equ 0 (goto even) else (goto odd)
)
:even
copy "%tmp%\encrypt.tmp"
del "%tmp%\encrypt.tmp"
cls
echo ==========================
echo 恭喜你, 批处理加密成功^^!
echo ==========================
echo.
echo.
echo 按任意键退出......
pause>nul
goto quit
:odd
echo. >>"%tmp%\encrypt.tmp"
copy "%tmp%\encrypt.tmp" 加密成品.bat
del "%tmp%\encrypt.tmp"
cls
echo ==========================
echo 恭喜你, 批处理加密成功^^!
echo ==========================
echo.
echo.
echo 按任意键退出......
pause>nul
goto quit
:newly
cls
echo ================================
echo 找不到批处理文件, 请重新输入!
echo ================================
echo.
echo.
echo 按任意键开始......
pause>nul
goto start
:quit
exit

Hmily 发表于 2009-5-7 17:40

解密脚本(保存为.BAT文件)


echo   BAT 解密器
@echo off
mode con: cols=80 lines=25
:index
color 27
cls
echo                        ╭───────────────╮
echo                        │                               │
echo      ╭─────────┤      BAT 解 密 工 具         ├─────────╮
echo      │                   │                               │                   │
echo      │                   ╰───────────────╯                   │
echo      │                                                                     │
echo      │                                                                     │
echo      │      本工具用来对混淆文本编码类型的加密批处理进行解密!               │
echo      │                                                                     │
echo      │      在下面填入需要解密的批处理按回车键即可.                           │
echo      │                                                                     │
echo      │      建议直接把待解密的批处理文件拖曳至本窗口释放.                     │
echo      │                                                                     │
echo      │      解密成功后会在本程序目录下生成"new_待解密文件名.文件后缀名"       │
echo      │      格式的文件.                                                       │
echo      │                                                                     │
echo      │      注意: 如果本目录下存在"new_待解密文件名.文件后缀名"的文件,      │
echo      │      将会被替换.                                                       │
echo      │                                                                     │
echo      │                                                                     │
echo      ╰───────────────────────────────────╯
echo.
set route=%cd%
set ravel=
set /p ravel=      请输入要解密的批处理:
set "ravel=%ravel:"=%"
if /i "%ravel:~-4%"==".bat" if exist "%ravel%" goto go
if /i "%ravel:~-4%"==".cmd" if exist "%ravel%" goto go
cls
echo                              ╭──────────╮
echo          ╭─────────┤      文 件 错 误   ├────────╮
echo          │                   ╰──────────╯               │
echo          │                                                         │
echo          │      指定文件不存在或文件不是批处理类型!                   │
echo          │                                                         │
echo          │      按任意键重新输入...                                 │
echo          │                                                         │
echo          ╰─────────────────────────────╯
echo.
echo.
echo 按任意键重新输入...
pause >nul
goto index

:go
for /f "tokens=*" %%c in ("%ravel%") do (
   cd /d "%%~dpc"
   if exist "%route%\new_%%~nxc" attrib -s -h -r -a "%route%\new_%%~nxc"
   echo author:pengfei@www.cn-dos.net>"%route%\new_%%~nxc"
   for /f "tokens=*" %%i in (%%~nxc) do (
       echo %%i>>"%route%\new_%%~nxc"
   )
)
cls
echo                              ╭──────────╮
echo          ╭─────────┤      解 密 成 功   ├────────╮
echo          │                   ╰──────────╯               │
echo          │                                                         │
echo          │      恭喜, 批处理解密成功!                                 │
echo          │                                                         │
echo          ╰─────────────────────────────╯
echo.
echo.
echo 按任意键退出...
pause >nul
exit

Hmily 发表于 2009-5-7 17:40

木马里经常用到被加密的bat文件,可以试试用这个来解密~

wellen 发表于 2009-5-7 17:46

加密的倒是没碰到过 保存下来先

frozenrain 发表于 2009-5-7 17:49

如果出个修改版呢 介绍下怎么对付带密钥的:lol

jacklymin 发表于 2009-8-18 11:03

这个有意思!!!

玩的就是技术 发表于 2009-10-14 22:54

这个有意思!!!

geyibing 发表于 2010-5-31 14:05

没用过感觉很厉害

akarus 发表于 2010-5-31 16:01

非常之好,有了这个工具保护代码就方便多了

baijiaheide 发表于 2010-5-31 23:15

用word打开就能看到原代码了。。。。
页: [1] 2 3 4 5 6
查看完整版本: .bat文件加密解密脚本