X-Git-Url: http://git.pippins.net/embedvideo/.git/static/%7Bg-%3Eurl%20arg1=?a=blobdiff_plain;f=merge_videos_by_day;h=0737ee128484420b439dd46474701685923ce639;hb=eb8eb0bd100a288298370362135991ad4710cc59;hp=cda301dae72bcf37e2d184d0e017b9196f7557b0;hpb=5084e6bde7b0e10b98c08badc2759bff76c74f26;p=videoscripts%2F.git diff --git a/merge_videos_by_day b/merge_videos_by_day index cda301d..0737ee1 100755 --- a/merge_videos_by_day +++ b/merge_videos_by_day @@ -41,6 +41,7 @@ $SIG{'INT'} = sub {die "-E- Killed by CTRL-C\n"}; if((defined $opt_q || defined $opt_z) && !$use_compute_host && ! -x "$handbrake") { die "-E- Unable to find required program: handbrake\n"; } if(! -d $srcpathname) { &usage; print "-E- Can't find srcpath: $srcpathname\n"; exit 1; } if(defined $opt_h) { $compute_host = $opt_h; } +if(! -x $ffmpeg) { die "-E- Missing required executable for ffmpeg: $ffmpeg\n"; } my %monthname2month = ( "Jan" => "01", @@ -100,7 +101,7 @@ foreach $file (sort `$find_cmd`) { $date_taken = ctime(stat("$srcdir/$srcfile")->mtime); # Get the date taken from the filename - if(!$merge_by_modification_date && $srcfile =~ /^(\d+)-(\d+)-(\d+)/) { + if(!$merge_by_modification_date && $srcfile =~ /^(\d\d\d\d)-(\d\d)-(\d\d)/) { $year = $1; $month = $2; $day = sprintf("%02d",$3); @@ -115,7 +116,7 @@ foreach $file (sort `$find_cmd`) { $monthname = lc($month2monthname{$month}); } # Get the date taken from the srcdir - elsif(!$merge_by_modification_date && $srcdir =~ /(\d+)-(\d+)-(\d+)/) { + elsif(!$merge_by_modification_date && $srcdir =~ /(\d\d\d\d)-(\d\d)-(\d\d)/) { $year = $1; $month = $2; $day = sprintf("%02d",$3); @@ -175,7 +176,9 @@ foreach $dstfile (sort keys %videos) { print "$cmd\n"; if(!defined $opt_k) { foreach $video (@{$videos{$dstfile}}) { - if(($save_originals) && ($video =~ /\.$originals_file_ext/)) { + if($opt_v) { print " $ffmpeg -i \"$video\" 2>&1 | grep \"compatible_brands\" | tail -n 1\n"; } + my $brands=`$ffmpeg -i "$video" 2>&1 | grep "compatible_brands" | tail -n 1`; chomp($brands); + if(($save_originals) && ($video =~ /\.$originals_file_ext/) && (!$brands || $brands !~ /$originals_no_copy_brands/)) { print "-> Saving the original video $video\n"; if(index($video, basename(dirname($video))) == -1) { print("mv $video \"$origpathname/".basename(dirname($video))."_".basename($video)."\n"); @@ -204,7 +207,9 @@ foreach $dstfile (sort keys %videos) { # Remove the individual video files if(!defined $opt_k) { foreach $srcvideo (@{$videos{$dstfile}}) { - if(($save_originals) && ($srcvideo =~ /\.$originals_file_ext/)) { + if($opt_v) { print " $ffmpeg -i \"$srcvideo\" 2>&1 | grep \"compatible_brands\" | tail -n 1\n"; } + my $brands=`$ffmpeg -i "$srcvideo" 2>&1 | grep "compatible_brands" | tail -n 1`; chomp($brands); + if(($save_originals) && ($srcvideo =~ /\.$originals_file_ext/) && (!$brands || $brands !~ /$originals_no_copy_brands/)) { print "-> Saving the original video $srcvideo to $origpathname\n"; if(index($srcvideo, basename(dirname($srcvideo))) == -1) { system("mv $srcvideo \"$origpathname/".basename(dirname($srcvideo))."_".basename($srcvideo));