X-Git-Url: http://git.pippins.net/embedvideo/.git/?a=blobdiff_plain;ds=sidebyside;f=organize_videos;h=d62af19c673c5f2f518001164ba3d11319d00eb2;hb=cb660ed1efe9806045d753d02e5c0b656919d639;hp=34fd2e6b66cbcc67ac36b0744905bd375fd77a0c;hpb=bfa24cc8c0228028cae669b2fa0adddef10470ae;p=videoscripts%2F.git diff --git a/organize_videos b/organize_videos index 34fd2e6..d62af19 100755 --- a/organize_videos +++ b/organize_videos @@ -67,6 +67,7 @@ sub usage { print " -d directory to recreate the playlists in. Only needed if -p option is given\n"; return 1; } +$SIG{'INT'} = sub {die "-E- Killed by CTRL-C\n"}; sub is_folder_empty { my $dirname = shift; @@ -127,9 +128,10 @@ $video_files_found=`$find_cmd_with_mkv`; if(!$video_files_found) { exit 0; } # Only proceed if no files have changed in the past $cmin minutes -if($opt_f) { $find_changed_cmd =~ s/cmin \S+ /cmin +0 /; } -$changed_files_found=`$find_changed_cmd`; -if($changed_files_found) { exit 0; } +if(! $opt_f) { + $changed_files_found=`$find_changed_cmd`; + if($changed_files_found) { exit 0; } +} # Only one instance of this script running at a time my $pidfile = File::Pid->new({file => "$pid_file", pid => "$$"}); @@ -177,10 +179,13 @@ foreach $file (`$find_mkv`) { print "srcfile: $srcfile\n"; if($srcfile =~ /.hb.mp4/) { next; } - print "Found movie: srcdir: $srcdir srcfile: $srcfile ext: $ext\n" if($opt_v); - - # Make a note of the month, year, and day this video was taken (from the modification time of the file) - $date_taken = ctime(stat("$srcdir/$srcfile")->mtime); + print "Found video: srcdir: $srcdir srcfile: $srcfile ext: $ext\n" if($opt_v); + + # From the modification time of the file since we couldn't find it in the filename + $date_modified = ctime(stat("$srcdir/$srcfile")->mtime); + + # NOTE: This file matching algorithm only applies to videos produced by merge_videos_by_day called by this script earlier + # We just need to take those merged videos, and extract what date to call the video by under HomeVideos # Get the date taken from the filename if($srcfile =~ /^(\d+)-(\d+)-(\d+)/) { @@ -206,7 +211,7 @@ foreach $file (`$find_mkv`) { $monthname = lc($month2monthname{$month}); } # Get the date taken from the modification time - elsif($date_taken =~ /\S+\s+(\S+)\s+(\d+)\s+\S+\s+(\d+)/) { + elsif($date_modified =~ /\S+\s+(\S+)\s+(\d+)\s+\S+\s+(\d+)/) { $year = $3; $month = $1; $day = sprintf("%02d",$2); @@ -233,7 +238,6 @@ foreach $file (`$find_mkv`) { } $dstfile = "$newfile.$ext"; - if(defined $opt_t) { print "-> Moving \"$srcdir/$srcfile\" to \"$dstfile\"\n"; } else {