重複フォルダの整理AwkScript

ZIPファイルを解凍すると、ファイル名と同じ名前のフォルダが作成され、その中にまた同じ名前のフォルダが作成される。
本スクリプトは、カレントフォルダを基点にして、同一名のサブフォルダを統合する動作を行う。

つまり
c:\aaa\bbb\bbb\ccc
c:\aaa\ddd\eee\eee\fff
のフォルダがあるとき、a:\aaaをカレントパスとしてCMDを開き、

allfresh.batを実行すると
c:\aaa\bbb\ccc
c:\aaa\ddd\eee\fff
のフォルダ構成に変更してくれる訳だ。
ただし、同一名の親フォルダ配下に同一名フォルダ以外がある場合、統合しない

注意点：カレントドライブの\tempフォルダをワークフォルダとして使うのでカレントのルートが書込み禁止だと動かない。そのときは、バッチを修正してくれ。

AWKのつぼ

AWKはフォルダ内に".","..",同名フォルダの3フォルダのみが存在してるって確認の為だけに使ってる。
後は、その名前を書いたテンポラリファイルと親フォルダ名を書いたテンポラリファイルをFCコマンドでコンペアして、リネーム用動的バッチファイル(temp\fresh3.bat)をキックする。
動的バッチはfresh.batの2行目で動的バッチ作成用バッチ(fresh1.bat)で作成している。
allfresh.batは基点フォルダから再起呼び出しで、全フォルダ毎にfresh.batを呼び出すだけだね。

allfresh.bat

@for /D /R %1 %%x in (*) do @call :l1 "%%x" @exit /b :l1 @pushd . @echo %1 @cd %1 @call fresh @popd

fresh.bat

@md \temp 2>nul @call fresh1.bat . >\temp\fresh.1 @dir |gawk -f fresh.awk >\temp\fresh.2 @fc /b \temp\fresh.1 \temp\fresh.2 >nul @if %ERRORLEVEL% EQU 0 goto l1 @exit /b :l1 @call \temp\fresh.3.bat

fresh1.bat

@echo %~n1 @echo @move "%~n1" ..\"%~n1_" >\temp\fresh.3.bat @echo @cd ..>>\temp\fresh.3.bat @echo @rd "%~n1">>\temp\fresh.3.bat @echo @move "%~n1_" "%~n1" >>\temp\fresh.3.bat

fresh.awk

BEGIN{ } { if (match($0,/^[ ]+0[ ]個のファイル[ ]+0[ ]バイト$/)){ ok++; } else if (match($0,/^[ ]+3[ ]個のディレクトリ[ ]+[0-9\,]+[ ]バイトの空き領域$/)){ ok++; } else if (match($0,/^[0-9]+\/[0-9]+\/[0-9]+ [0-9\:]+[ ]+<dir>[ ](.*)$/)){ s=gensub(/^[0-9]+\/[0-9]+\/[0-9]+ [0-9\:]+[ ]+<dir>[ ]+(.*)$/,"\\1","1",$0); } } END{ if (ok==2){ print s } else { print " " } }