(Yet Another) Rename Helper script for GBPVR & NPVR

[pvruser]

I'm still using 1.4.7 and experimenting with 2.1.x for an upgrade, so I've written a perl script that I'm using in Postprocessing or whenever something goes wrong and I need to manually update the recording name and DB. You'll obviously need perl on your system and run it with:

perl renamehelper.pl <args>

Features:
* rename a recording using replacement vars similar to WizRenameRecording and works for NPVR (WizRenameRecording doesn't).
* allows moving files to a different drive or network disk (which is one of the main reasons I wrote it).
* updates the metadata.xml with the correct new path for the renamed file.
* uses metadata.xml, if present and the file isn't found in the DB. There's an import feature for files missing from the DB, it will call the command line for *pvr to do the import.
*goes online to TVRage.com and gets some extra data to allow renaming files with the season and episode number (you'll need to create a sqlite DB using the attached sql table structure).

Since this is still somewhat of a work in progress, I STRONGLY suggest you first experiment with it on your dev machine (or copy the DB to another folder and use the DB option) before using it on your actual TV collection!

EDIT: it's been 2 months since the script has been running without intervention and renaming recordings from tvrage so i'd say it's quite stable.

Enjoy!

[pvruser]

Usage in Postprocessing:

if exist "%dvr_dir%" (
perl renamehelper.pl -v 2 -n -s "%%%~n1%%" -x mp4 -p "%dvr_dir%" -o "%oid%"
) else (
perl renamehelper.pl -v 2 -n -s "%%%~n1%%" -x mp4 -o "%oid%"
)

%dvr_dir% is the optional path to the external/network drive. Always a good idea to check whether it's mounted/plugged in before making the rename call.

[pvruser]

Here's the script that I'm using as a scheduled task to move files that couldn't be moved because the network drive was unavailable. This is tweaked for NPVR, but gbpvr will work too as long as you remove the -v 2 argument and update the correct paths.

rem this needs to be a scheduled task
rem it moves files from the internal drive to the network/usb drive
rem this is normally done automagically in post processing
rem but sometimes it can't be done at that time so we use this

set gbpvr_dir=%ProgramFiles%\NPVR
set utils_dir="%gbpvr_dir%\Third Party\utils"

set user_dir=C:\Users\Public\NPVR
set db="%user_dir%\NPVR.DB3"
set logfile="%user_dir%\logs\move.log"

rem internal drive
set source_dir=D:\temp\npvr
rem external drive
set dvr_dir=O:\temp\dvr

if exist "%dvr_dir%" (

pushd %source_dir%

rem get mp4 files but exclude temp files
rem todo also check for date to avoid touching files still in post processing
for /F "tokens=*" %%i in ('dir /a:-d /b /s /o:d "%source_dir%\*.mp4" ^| findstr /v /i /r /c:"temp\.mp4$"') do call :movefiles "%%i"

popd

rem need this for Roku which runs off the remote machine
copy %db% "%dvr_dir%"

) else (
echo %dvr_dir% unavailable, not moving file
echo %dvr_dir% unavailable, not moving file >> %logfile%

)

goto end


:movefiles

pushd "%user_dir%\scripts"
perl renamehelper.pl -v2 -n -s "%%%~n1%%" -x mp4 -m -p "%dvr_dir%" -e >> %logfile% 2>&1
rem perl renamehelper.pl -v2 -n -s "%%%~n1%%" -x mp4 -p "%dvr_dir%" -o "%oid%" -t -e

rem if file still exists then force move it (might have been unlinked in the DB)
if exist %1 (
perl renamehelper.pl -v2 -n -s "%%%~n1%%" -f %1 -x mp4 -m -p "%dvr_dir%" -e >> %logfile% 2>&1
)
popd

goto end

:end