Changeset 29839 for branches/eam_branches/ipp-20101103/ippScripts/scripts/automate_stacks.pl

Timestamp:

Nov 26, 2010, 10:35:03 AM (15 years ago)

Author:

eugene

Message:

merge updates from trunk

Location:

branches/eam_branches/ipp-20101103/ippScripts

Files:

• . (modified) (1 prop)
• scripts/automate_stacks.pl (modified) (2 diffs)

branches/eam_branches/ipp-20101103/ippScripts/scripts/automate_stacks.pl

@@ -79 +79 @@
     'check_dqstats'        => \$check_dqstats,
     'queue_dqstats'        => \$queue_dqstats,
-    'check_diffs'          => \$check_diffs,
-    'queue_diffs'          => \$queue_diffs,
+    'check_diffs'          => \$check_stacks,
+    'queue_diffs'          => \$queue_stacks,
     'clean_old'            => \$clean_old,
     ) or pod2usage ( 2 );
@@ -1203 +1203 @@
         foreach my $filter (@filter_list) {
             if (exists($extra_processing{$target})) {
-                do_extra_processing($date,$target,$filter,$pretend);
+                my ($Nexposures,$NprocChips,$NprocWarps,$Nalready) = pre_stack_queue($date,$target,$filter);
+                if ((!defined($force_stack_count))&&($NprocChips != $NprocWarps)) { # This makes me sad. :(
+                    next;
+                }
+                if ($Nexposures == 0) {
+                    if ($debug == 1) {
+                        print STDERR "execute_stacks: Target $target in filter $filter on $date has no exposures.\n";
+                    }
+                    next;
+                }                   
+                else {
+                    do_extra_processing($date,$target,$filter,$pretend);
+                }
+
             }
             if ($stackable_list{$target} == 1) {