tell application "Finder"
set srcFolder to folder "iTunes" of folder "Music" of home
set destFolder to folder "ITLBak" of folder "iTunes" of folder "Music" of home
duplicate file "iTunes Library.itl" of srcFolder to destFolder with replacing
duplicate file "iTunes Music Library.xml" of srcFolder to destFolder with replacing
set macFolder to srcFolder
set winFolder to folder "iTunes" of folder "MyMusic" of folder "My Documents" of folder "ユーザー名" of folder "Documents and Settings" of disk "C_HD"
set macdate to get modification date of file "iTunes Library.itl" of macFolder
set windate to get modification date of file "iTunes Library.itl" of winFolder
if windate > macdate then
duplicate file "iTunes Library.itl" of winFolder to macFolder with replacing
delete file "iTunes Music Library.xml" of macFolder
tell application "iTunes"
activate
delay 1
quit
end tell
end if
end tell
rem 環境設定、各iTunesフォルダのPATHを定義
set ITDIRWIN=C:\Documents and Settings\winユーザー名\My Documents\My Music\iTunes
set ITDIRMAC=F:\Users\macユーザー名\Music\iTunes
set ITEXEPATH=C:\Program Files\iTunes\iTunes.exe
rem 元のカレントディレクトリを退避
set ORGDIR=%CD%
rem カレントディレクトリをPrevious iTunes Libraries@winに変更
%ITDIRWIN:~0,2%
cd "%ITDIRWIN%\Previous iTunes Libraries"
rem Previous1〜4内ファイルをPrevious2〜5内へ移動処理ループ
set /a SRCNUM=4
:LOOP
set /a DSTNUM=SRCNUM+1
echo Previous%SRCNUM% to Previous%DSTNUM%
move /y "Previous%SRCNUM%\*.*" "Previous%DSTNUM%\" > nul 2>&1
if "%SRCNUM%"=="1" (goto NEXT)
set /a SRCNUM=SRCNUM-1
goto LOOP
rem ループ脱出
:NEXT
rem .itl@iTunes of winと .xml@iTunes of winをPrevious1にコピー
echo Win to Previous1
copy "..\iTunes Library.itl" "Previous1\" /y > nul
copy "..\iTunes Music Library.xml" "Previous1\" /y > nul
rem カレントディレクトリを元値に変更
%ORGDIR:~0,2%
cd %ORGDIR%
rem .itl of WINの更新日を取得
set GETTSTMPPRM=%ITDIRWIN%\iTunes Library.itl
call "C:\Program Files\UserBatFiles\gettstmp" "%GETTSTMPPRM%"
set STMPWIN=%GETTSTMPRTN%
rem .itl of macの更新日を取得
set GETTSTMPPRM=%ITDIRMAC%\iTunes Library.itl
call "C:\Program Files\UserBatFiles\gettstmp" "%GETTSTMPPRM%"
set STMPMAC=%GETTSTMPRTN%
rem .itl of macと.itl of winの更新日を比較
if %STMPMAC% LEQ %STMPWIN% (goto CLRPRM)
rem .itl of macが.itl of winより新しい場合の処理
echo copy Mac to Win
copy "%ITDIRMAC%\iTunes Library.itl" "%ITDIRWIN%\" /y > nul
echo Delete xml
rem del "%ITDIRWIN%\iTunes Music Library.xml" > nul
echo run iTunes
call "%ITEXEPATH%"
rem 環境変数を開放
:CLRPRM
set ITDIRWIN=
set ITDIRMAC=
set ITEXEPATH=
set ORGDIR=
set SRCNUM=
set DSTNUM=
set GETTSTMPPRM=
set GETTSTMPRTN=
set STMPWIN=
set STMPMAC=