임의 디렉테리에서 xx일 보다 오래된 모든 파일을 삭제, 백업하기
게시일: 2002/01/05 | 글쓴이: doa | 4738 번 | 프린트 | 메일
DELOLD는 xx일 보다 오래된 파일을 삭제할 수 있지만 이들을 백업하거나 하위 디렉토리를 검색하지는 못한다.
따라서 필자는 DoAOLD.BAT을 작성했다. 사용법은
DoAOLD "" [""] [Age] [/s]
이다. 여기서 각 매개변수의 의미는 다음과 같다.
매개변수
설명
""
검색할 디렉토리
""
백업할 경로(옵션)
Age
일수. 생략하면 60일(기본값).
/s
하위 디렉토리까지 검색(옵션)
주의: 이 스크립트는 윤년을 인식한다.
<STRONG>DoAOLD.BAT</STRONG><br>
<br>
@echo off
set /a agen=60
set subd=
set suby=
if not exist %1\*.* goto notx
if "%4"=="" goto p4n
if /i "%4"=="/s" goto p4s
goto syntax<br>
<br>
:p4s
set suby=/s
set agea=%3
set /a agen=%agea%
if "%agea%"=="%agen%" goto p2y
goto syntax<br>
<br>
:p4n
if "%3"=="" goto p2
if /i "%3"=="/s" goto p3s
set agea=%3
set /a agen=%agea%
if "%agea%"=="%agen%" goto p2y<br>
<br>
:syntax
@echo Syntax error: DoAOLD "" [""] [Age] [/s]<br>
<br>
:endc
set agen=
set agea=
set subd=
set suby=
set cnt=
set TDDD=
set TDMM=
set TDYY=
set FDD=
set FMM=
set FYY=
set FYMD=
set TYMD=
set TDDAY=
set WKYY=
goto end<br>
<br>
:ape
@echo Path %1 equals Archive %2
goto syntax<br>
<br>
:nota
@echo Archive %2 not found.
goto syntax<br>
<br>
:notx
@echo Directory %1 not found.
goto syntax<br>
<br>
:p2
if "%2"=="" goto today
if /i "%2"=="/s" goto lists
set agea=%2
set /a agen=%agea%
if "%agea%"=="%agen%" goto today<br>
<br>
:p2y
if not exist %2\*.* goto nota
set subd=%2
if /i %1==%2 goto ape
goto today<br>
<br>
:lists
set suby=/s
goto today<br>
<br>
:p3s
set agea=%2
set /a agen=%agea%
if "%agea%"=="%agen%" goto today
if not exist %2\*.* goto syntax
set suby=/s
set subd=%2
if /i %1==%2 goto ape<br>
<br>
:today
for /f "tokens=1,2,3,4* delims=/ " %%i in ('date /t') do set TDDAY=%%i&set TDMM=!%%j&set TDDD=!%%k&set TDYY=%%l
set TDMM=%TDMM:!0=!%
set TDMM=%TDMM:!=%
set TDDD=%TDDD:!0=!%
set TDDD=%TDDD:!=%
set /a TDDD=%TDDD%
set /a TDMM=%TDMM%
set /a TDYY=%TDYY%
set /a TDDD=%TDDD% - %agen%<br>
<br>
:aday
if %TDDD% GEQ 1 goto dir
set /a TDMM=%TDMM% -1
if %TDMM% GEQ 1 goto aday%TDMM%
set /a TDYY=%TDYY% - 1
set /a TDMM=%TDMM% + 12
goto aday%TDMM%<br>
<br>
:aday1
set /a TDDD=%TDDD% + 31
goto aday<br>
<br>
:aday2
set /a TDDD=%TDDD% + 28
set /a WKYY=%TDYY% / 4
set /a WKYY=%WKYY% * 4
If %WKYY% NEQ %TDYY% goto aday
set /a TDDD=%TDDD% + 1
goto aday<br>
<br>
:aday3
set /a TDDD=%TDDD% + 31
goto aday<br>
<br>
:aday4
set /a TDDD=%TDDD% + 30
goto aday<br>
<br>
:aday5
set /a TDDD=%TDDD% + 31
goto aday<br>
<br>
:aday6
set /a TDDD=%TDDD% + 30
goto aday<br>
<br>
:aday7
set /a TDDD=%TDDD% + 31
goto aday<br>
<br>
:aday8
set /a TDDD=%TDDD% + 31
goto aday<br>
<br>
:aday9
set /a TDDD=%TDDD% + 30
goto aday<br>
<br>
:aday10
set /a TDDD=%TDDD% + 31
goto aday<br>
<br>
:aday11
set /a TDDD=%TDDD% + 30
goto aday<br>
<br>
:aday12
set /a TDDD=%TDDD% + 31
goto aday<br>
<br>
:dir
if %TDDD% GTR 9 goto dirdd
set TDDD=0%TDDD%
goto dirm<br>
<br>
:dirdd
set TDDD=%TDDD%<br>
<br>
:dirm
if %TDMM% GTR 9 goto dirmm
set TDMM=0%TDMM%
goto diryy<br>
<br>
:dirmm
set TDMM=%TDMM%<br>
<br>
:diryy
set TYMD=%TDYY%%TDMM%%TDDD%
echo %TYMD%
for /f "Tokens=*" %%i in ('dir %1\*.* /B') do call :DoAoldc %1"%%i"
if "%suby%"=="" goto endc
for /f "Tokens=*" %%i in ('dir %1\*.* /B /AD /S') do call :DoAoldcd "%%i"
goto endc<br>
<br>
:DoAoldcd
for /f "Tokens=*" %%z in ('dir %1\*.* /B') do call :DoAoldc %1"%%z"
goto end<br>
<br>
:DoAoldc
set /a cnt=0
for /f "Tokens=1-4* Delims=/ " %%a in ('dir %1 /N') do call :DoAoldd %1 %%a %%b %%c %%d %%e
goto end<br>
<br>
:DoAoldd
set /a cnt=%cnt% + 1
if not %cnt% EQU 4 goto end
if "%6"=="" goto end
set FMM=%2
set FDD=%3
set FYY=20%4
<STRONG>REM</STRONG> <STRONG>DIR</STRONG>을 2자리의 년도를 리턴하기 때문에, 50년 마다 <STRONG>69</STRONG>를 변경해야 한다.
if "%4" GTR "69" set FYY=19%4
for /f %%s in ("%FYY%") do set Variable=%%s
set FYMD=%FYY%%FMM%%FDD%
if %FYMD% GEQ %TYMD% goto end
echo %FYMD% %1 %subd% DEL
if %subd%=="" goto DoAolddd
copy %1 %subd%\*.*<br>
<br>
:DoAolddd
del /q /f %1<br>
<br>
:end
(