Added some new video helper scripts
[videoscripts/.git] / merge_videos_by_day
index 6e7998cd147db91ea96fefffe6a84716193b1365..27f2e2bbd7fed6673ae9f2e441ac85f9fe79eca6 100755 (executable)
@@ -94,7 +94,7 @@ foreach $file (sort `$find_cmd`) {
     $date_taken = ctime(stat("$srcdir/$srcfile")->mtime);
 
     # Get the date taken from the filename
-    if($srcfile =~ /^(\d+)-(\d+)-(\d+)/) {
+    if(!$merge_by_modification_date && $srcfile =~ /^(\d+)-(\d+)-(\d+)/) {
        $year = $1;
        $month = $2;
        $day = sprintf("%02d",$3);
@@ -163,7 +163,7 @@ foreach $ext (sort keys %videos) {
 foreach $ext (sort keys %videos) {
     foreach $video (sort keys %{$videos{$ext}}) {
        foreach $srcfile (@{$videos{$ext}{$video}}) { 
-           print "   merging \"$srcfile\" into \"$video\"\n";
+           print "   merging $srcfile into \"$video\"\n";
        }
     }
 }
@@ -194,7 +194,13 @@ foreach $ext (sort keys %videos) {
            print "$cmd\n";
            if(!defined $opt_k) { 
                foreach $video (@{$videos{$ext}{$video}}) {
-                   print("rm -f $video\n");
+                   if(($save_originals) && ($video =~ /\.$originals_file_ext/)) {
+                       print "-> Saving the original video $video\n";
+                       print("mv $video \"$origpathname/".basename(dirname($video))."_".basename($video)."\n");
+                   } else {
+                       print "-> Removing the original video $video\n";
+                       print("/bin/bash -c '[[ -e $video ]] && rm -f $video'\n");
+                   }
                }
            }
        } else {
@@ -210,7 +216,13 @@ foreach $ext (sort keys %videos) {
            # Remove the individual video files
            if(!defined $opt_k) { 
                foreach $srcvideo (@{$videos{$ext}{$video}}) {
-                   system("rm -f $srcvideo");
+                   if(($save_originals) && ($srcvideo =~ /\.$originals_file_ext/)) {
+                       print "-> Saving the original video $srcvideo to $origpathname\n";
+                       system("mv $srcvideo \"$origpathname/".basename(dirname($srcvideo))."_".basename($srcvideo));
+                   } else {
+                       print "-> Removing the original video $srcvideo\n";
+                       system("/bin/bash -c '[[ -e $srcvideo ]] && rm -f $srcvideo'");
+                   }
                }
            }
        }