批处理之家 - Powered by Discuz! Board

要获得帮助请输入：md5.exe -h ，其他方式诸如/?、/h、/help等无效
md5 -h
MD5 -- Calculate MD5 signature of file. Call
with md5 [ options ] [file ...]
Options:
-csig Check against sig, set exit status 0 = OK
-dtext Compute signature of text argument
-l Use lower case letters for hexadecimal digits
-n Do not show file name after sum
-ofname Write output to fname (- = stdout)
-u Print this message
-v Print version information
by John Walker -- http://www.fourmilab.ch
Version 2.0 (2003-04-15)
This program is in the public domain.
cn:
- csig 核对文字签名，设置退出状态 0 = OK
-cMD5 fname
if %ERRORLEVEL%==0 OK
if %ERRORLEVEL%==1 error
- dtext 计算字符串参数的文字签名
要验证字符串的 MD5 值，就输入 md5.exe -d123456
-d后面的字符不能带有空格,引号"会被忽略
- l 的十六进制数字使用小写字母
- n 不显示文件名
- ofname 写输出到文件:fname
- u 显示帮助信息
- v 显示版本信息
该程序是在公共领域。
md5 [drive[path]]
[*.ext]
md5<01.txt 等同于 md5 01.txt
md5 -d^
系统就会提示 more? 输入字串就可以计算MD5了
结论：
123456 对应于: md5<01.txt (01.txt只有一行"123456" 无回车换行)
md5.exe -d123456
echo.|set /p=123456|md5 -n
set/p=123456^<nul|md5 -n
set /p=123456<nul|md5 -n
e10adc3949ba59abbe56e057f20f883e
123456空格对应于: md5<01.txt (01.txt只有一行"123456 " 有一个空格)
set /p=123456<nul|md5 -n
7e8feb2276322ecddd4423b649dfd4d9
123456回车对应于： echo 123456| md5.exe
41933e60e9c19b866b3d68864727afe7
123456空格回车对应于： echo 123456 | md5.exe
d170064a1951ad13095734a657c5a30f

复制代码

@goto start
:help
@echo.===== Ver: 1.1 =========================== 发布日期: 2010-09-24 =======
@echo. BAT_NAME: findDupFile.bat
@echo. 返回值: %ret_filename%
@echo. 作用 : 根据MD5值查找重复文件
@echo. 调用: ①findDupFile.bat [Path [EXT]] [file]
@echo. ②findDupFile.bat [Path [EXT]] [file] [MD5_file1]
@echo. ③findDupFile.bat [MD5_file1] [MD5_file2]
@echo. [Path]: 文件夹路径 (可以是多个)
@echo. [file]: 文件 (可以是多个)
@echo. [EXT] : 文件后缀如:"*.jpg *.bmp",带空格的必须用引号括起来
@echo. [MD5_file] : MD5文件,形如"*_MD5.txt",带空格的必须用引号括起来
@echo.====================== Copyright@ by hf-g ========= [彭城] ============
ping /n 4 127.1>nul
goto:end
:start ============================================================
@echo off&setlocal
path=%path%;%~d0\DOS\command\第三方命令行程序
set "ret_filename=%~dp0.\ret_List.txt"
if /i "%~1"=="" goto help
if /i "%~1"=="-?" goto help
set "ext="&set "pathname="&set "Dir_name="&set "MD5_file1="&set "MD5_file2="&set "p_str="
set /a exit_BL=0,D_count=0,f_count=0
call:get_P %*
if "%exit_BL%"=="1" goto end
::设置临时文件
set "tmpfname=%pathname_0:~-2%"
if "%tmpfname%"==":\" (
set "Dir_name=drive_%pathname_0:~0,1%"
call echo 驱动器名: %%Dir_name%%
) else (
if "%pathname_0:~-1%"=="\" (
call call:extpath "%%pathname_0:~0,-1%%"
call echo 文件夹名: %%Dir_name%%
) else (
if exist "%~1\" (
set "Dir_name=%~nx1"
call echo 文件夹名: %%Dir_name%%
)
)
)
if %f_count% GTR 0 set "Dir_name=list"
if %D_count% GTR 1 set "Dir_name=list"
set "tmpfname=%~dp0.\%Dir_name%_MD5.txt"
cd.>"%ret_filename%"
echo 生成MD5文件: %tmpfname%
echo 相同文件列表: %ret_filename%
echo 删除重复文件BAT: del_list.bat
::========================MAIN============================
::生成MD5文件,可一次处理多个文件夹和文件,只在批处理所在文件夹生成1个MD5文件.
::set "ext=*.jpg *.bmp"
set/a D_count-=1,f_count-=1
if not "%pathname_0%"=="" (
cd.>"%tmpfname%"
for /l %%i in (0,1,%D_count%) do (
call pushd "%%pathname_%%i%%"
(for /f "tokens=* delims=" %%i in ('dir /a-d/b/s %ext%') do (md5 "%%i"))>>"%tmpfname%"
popd
))
if not "%file_0%"=="" (
if "%pathname_0%"=="" cd.>"%tmpfname%"
for /l %%i in (0,1,%f_count%) do (call md5 "%%file_%%i%%")>>"%tmpfname%"
)
::处理MD5文件━━━━━━━━━━━━━━━━━━━━━━━━━━━━
cd.>"%~dp0.\del_list.bat"
if "%MD5_file1%"=="" (
rem =========查找上面"生成MD5文件"中相同的文件,删除重复的====
call:MD5_1file "%tmpfname%"
) else (
if "%MD5_file2%"=="" (
if not exist "%tmpfname%" (
rem =========查找原有的唯一MD5列表文件中相同的文件,删除重复的====
call:MD5_1file "%MD5_file1%"
) else (
rem =========查找上面"生成MD5文件"与原有MD5文件中相同的文件,删除重复的====
call:MD5_2file "%MD5_file1%" "%tmpfname%"
)
) else (
rem =========查找原有MD5_file1与原有MD5_file2文件中相同的文件,删除重复的====
call:MD5_2file "%MD5_file1%" "%MD5_file2%"
)
)
:end ==============================================================
::if exist "%tmpfname%" del "%tmpfname%" "%~dp0.\del_list.bat"
exit /b
::=========查找MD5列表文件中相同的文件,删除重复的====
:MD5_1file MD5_file
for /f "tokens=1* delims= " %%a in ('type "%~1"') do (
set/p =-<nul
if defined _MD5_%%a (
set/p =\<nul
echo @del /f/q "%%b">>"%~dp0.\del_list.bat"
set/p =^|<nul
if not defined _write_%%a (findstr "^%%a" "%~1">>"%ret_filename%"&echo.>>"%ret_filename%"&set "_write_%%a=1")
) else (
set "_MD5_%%a=1"
)
set/p =/<nul
)
goto:eof
::=========查找MD5_file1中与MD5_file2相同的文件,删除MD5_file2中重复的====
:MD5_2file MD5_file1 MD5_file2
(echo MD5_file1=%~1&echo MD5_file2=%~2)>con
(echo MD5_file1=%~1&echo MD5_file2=%~2&echo.)>>"%ret_filename%"
for /f "tokens=1* delims= " %%a in ('type "%~1"') do (set "_MD5_%%a=%%b")
for /f "tokens=1* delims= " %%a in ('type "%~2"') do (
set/p =-<nul
if defined _MD5_%%a (
set/p =\<nul
echo @del /f/q "%%b">>"%~dp0.\del_list.bat"
set/p =^|<nul
(set _MD5_%%a&echo %%a %%b&echo.)>>"%ret_filename%"
set/p =/<nul
)
)
goto:eof
::====================================================
:extpath
set "Dir_name=%~nx1"
goto:eof
::========================参数设置与获得============================
:get_p
::判断%1是_MD5.txt还是文件夹或其他文件或文件后缀
if "%~1"=="" goto:eof
set "p_str=%~1"
if exist "%p_str%" (
if "%p_str:~-8%"=="_MD5.txt" (
if "%MD5_file1%"=="" (
set "MD5_file1=%p_str%"&shift /1&goto get_p
) else (
set "MD5_file2=%p_str%"&shift /1&goto get_p
)
)
if exist "%p_str%.\" (
call set "pathname_%%D_count%%=%p_str%"&set /a D_count+=1&shift /1&goto get_p
)
call set "file_%%f_count%%=%p_str%"&set /a f_count+=1&shift /1&goto get_p
) else (
if "%ext%"=="" (
if "%p_str:~0,2%"=="*." (
set "ext=%p_str%"&shift /1&goto get_p
)
)
echo %p_str% 不是一个正确的文件夹路径或文件^!&set /a exit_BL=1&shift /1&goto end
)
@echo off
:get_p_end
goto:eof

复制代码

@echo off
cd /d "%~dp0"
for /f "delims=" %%i in ('dir /b /a-d /od') do (
for /f %%j in ('certutil -hashfile "%%i" MD5 ^| find /v ":"') do (
if defined _"%%j" (
echo del /f /q "%%i"
) else (
set _"%%j"=1
)
)
)

复制代码

@echo off
cd /d "%~dp0"
for /f "delims=" %%i in ('dir /b /s /a-d /od') do (
for /f %%j in ('certutil -hashfile "%%i" MD5 ^| find /v ":"') do (
if defined _"%%j" (
echo del /f /q "%%i"
) else (
set _"%%j"=1
)
)
)

复制代码