Changeset 38734
- Timestamp:
- Sep 15, 2015, 12:54:53 PM (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
tags/ipp-20141024/ippScripts/scripts/diff_skycell.pl
- Property svn:mergeinfo set to
r35325 r38734 78 78 # XXX camera is not known here; cannot use filerules... 79 79 my $logDest = "$outroot.log"; 80 my $updateMode = 0; 80 81 if ($run_state eq 'update') { 81 82 $logDest .= '.update'; 83 $updateMode = 1; 82 84 } 83 85 $ipprc->redirect_to_logfile($logDest) or my_die( "Unable to redirect output", $diff_id, $skycell_id, $PS_EXIT_SYS_ERROR ) if $redirect; … … 128 130 # $use_convolved = 1; ## This is a hack to do a test for mops, and should not be committed. 129 131 # } 132 133 # Re-implement prescan to decide if this is a warp-stack or warp-warp. Or stack-stack, but that's what we don't care about now. 134 my $diff_type = ''; 135 136 if ((${ $files }[0]->{warp_id} != 0)&&(${ $files }[1]->{warp_id} != 0)) { 137 $diff_type = "WW"; 138 } 139 elsif ((${ $files }[0]->{stack_id} != 0)&&(${ $files }[1]->{stack_id} != 0)) { 140 $diff_type = "SS"; 141 } 142 elsif (((${ $files }[0]->{warp_id} != 0)&&(${ $files }[1]->{stack_id} != 0))) { 143 $diff_type = "WS"; 144 } 145 else { # Something has gone horribly wrong. 146 $diff_type = "WW"; # just pretend it never happened, and let it fail elsewhere. 147 } 130 148 131 149 # ppSub does (input) - (template) after PSF-match convolution. … … 254 272 &my_die("Couldn't find input: $templateMask", $diff_id, $skycell_id, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists($templateMask); 255 273 &my_die("Couldn't find input: $templateVariance", $diff_id, $skycell_id, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists($templateVariance); 256 &my_die("Couldn't find input: $templateSources", $diff_id, $skycell_id, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists($templateSources); 274 #&my_die("Couldn't find input: $templateSources", $diff_id, $skycell_id, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists($templateSources); 275 276 if ($diff_type eq 'WS') { 277 # LANL processed stack images do not have a set of sources transferred back, so we need to choose a different source list. 278 unless($ipprc->file_exists($templateSources)) { 279 if ($ipprc->file_exists($inputSources)) { 280 $templateSources = $inputSources; 281 print "CHANGED:templateSources: $templateSources\n"; 282 } 283 } 284 &my_die("Couldn't find input: $templateSources", $diff_id, $skycell_id, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists($templateSources); 285 } 286 else { 287 &my_die("Couldn't find input: $templateSources", $diff_id, $skycell_id, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists($templateSources); 288 } 257 289 &my_die("Couldn't find input: $input", $diff_id, $skycell_id, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists($input); 258 290 &my_die("Couldn't find input: $inputMask", $diff_id, $skycell_id, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists($inputMask); … … 292 324 } 293 325 294 # use WARPSTATS if we're updating, as we don't care about the new stuff from the STACK and DIFF STATS recipes 326 # use WARPSTATS if we're updating, as we don't care about the new stuff from the STACK and DIFF STATS recipes. 327 # The only value that we use is -quality 295 328 $recipe_ppstats = 'WARPSTATS'; 296 329 } … … 321 354 { 322 355 my $command = "$ppSub $outroot"; 356 $command .= " -updatemode" if $updateMode; 323 357 $command .= " -inimage $input"; 324 358 $command .= " -refimage $template";
Note:
See TracChangeset
for help on using the changeset viewer.
