Changeset 30676 for branches/eam_branches/ipp-20110213/ippScripts/scripts/register_imfile.pl

Timestamp:

Feb 17, 2011, 3:20:07 PM (15 years ago)

Author:

eugene

Message:

merge changes from the trunk

File:

• branches/eam_branches/ipp-20110213/ippScripts/scripts/register_imfile.pl (modified) (2 diffs)

branches/eam_branches/ipp-20110213/ippScripts/scripts/register_imfile.pl

@@ -199 +199 @@
     $command .= " -data_state full";
 }
+elsif (is_ccim($tmp_exp_name,$exp_type)) {
+    printf STDERR "This is a camera commanded detrend exposure that should not cause a burn.\n";
+    $command .= " -data_state full";
+}    
 else {
     printf STDERR "Need to check burntool.\n";
@@ -380 +384 @@
 }
 
+sub is_ccim 
+{
+    my $exp_name = shift;
+    my $exp_type = shift;
+ 
+    # needs to match regtool.c checks for "is_ccim".
+    if ($exp_name =~ /c/) {
+        if (($exp_type eq 'DOMEFLAT')||
+            ($exp_type eq 'DARK')||
+            ($exp_type eq 'BIAS')) {
+            return(1);
+        }
+    }
+    return(0);
+}
+
 sub is_daytime
 {