Changeset 33011 for trunk/pstamp/scripts/pstamp_checkdependent.pl
- Timestamp:
- Dec 23, 2011, 10:27:46 AM (14 years ago)
- File:
-
- 1 edited
-
trunk/pstamp/scripts/pstamp_checkdependent.pl (modified) (9 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/pstamp/scripts/pstamp_checkdependent.pl
r32809 r33011 117 117 } 118 118 } 119 120 # magic is no longer rquired 121 $need_magic = 0; 122 $magic_ok = 1; 119 123 my $status = 0; 120 if ((($it->{state} eq 'full') or ($it->{state} eq 'update')) and ($it->{data_state} eq 'full') 121 and (!$need_magic or $magic_ok or $it->{magicked} > 0)) { 124 if ((($it->{state} eq 'full') or ($it->{state} eq 'update')) and ($it->{data_state} eq 'full')) { 122 125 123 126 # This Dependency is satisfied. All done. Release the pstampJobs … … 197 200 } 198 201 202 if (0) { 199 203 if (!$job_fault and ($stage eq 'chip')) { 200 204 # what about "error_cleaned" ? … … 210 214 } 211 215 } 216 } 212 217 213 218 if ($job_fault >= $PSTAMP_FIRST_ERROR_CODE) { … … 255 260 # caller will fault the jobs 256 261 return $error_code; 257 } elsif ($chip->{dsRun_state} =~ /failed_revert/) {258 # XXX: revert failures are rarely fixed. give up but say it's just not available not GONE259 print "magicDSRun.state = $dsRun_state for chipRun $stage_id is in state failed_revert cannot update\n";260 return $PSTAMP_NOT_AVAILABLE;261 262 } elsif (($chip->{data_state} ne 'update') and ($chip->{data_state} ne 'full')) { 262 263 … … 290 291 # fault the dependent 291 292 my_die("chip $chip->{chip_id} $chip->{class_id} faulted: $chip->{fault}", $chip->{fault}); 292 } elsif ($chip->{dsFile_fault} eq $PSTAMP_GONE) { 293 print STDERR "magicDSFile $chip->{magic_ds_id} $chip->{chip_id} $chip->{class_id} is GONE"; 294 return $PSTAMP_GONE; 295 } elsif ($chip->{dsFile_fault} and ($chip->{dsFile_data_state} eq 'update')) { 296 # fault the dependent 297 my_die("magicDSFile $chip->{magic_ds_id} $chip->{chip_id} $chip->{class_id} faulted: $chip->{dsFile_fault}", $chip->{dsFile_fault}); 298 } 299 } 300 301 my $status = 0; 302 if (!$queued_update) { 303 $status = check_states_magicDSRun('chip', $chip_id, \@chips, $rlabel, $need_magic, $raw_all_magicked, $magic_ds_id, $dsRun_state); 304 } 305 306 return $status; 293 } 294 } 295 296 return 0; 307 297 } 308 298 … … 323 313 # The update system currently requires that data that has been magicked be destreaked 324 314 # at chip stage so it needs magic even if the customer doesn't. 315 if (0) { 325 316 if ($metadata->{magicked} != 0) { 326 317 $need_magic = 1; 327 318 } 328 319 } 329 320 if (($state =~ /error/) or ($state =~ /purged/) or ($state =~ /scrubbed/) or ($state eq 'drop') or 330 321 ($data_state =~ /error/) or ($data_state =~ /purged/) or ($data_state =~ /scrubbed/) or ($data_state eq 'drop')) { … … 371 362 # if chip has been magicked before require it to be magicked again 372 363 # because the warp pending query requires it. 364 if (0) { 373 365 if ($chip->{magicked} < 0) { 374 366 print "Input has been destreaked so we must destreak before warping\n"; 375 367 $need_magic = 1 376 368 } 369 } 377 370 378 371 if ($need_magic and ($chip->{magicked} eq 0)) { … … 423 416 my $metadata = shift; 424 417 my $rlabel = shift; # if defined a new label for the chipRun 425 my $need_magic = shift;418 my $need_magic = 0; 426 419 427 420 my $diff_id = $metadata->{diff_id}; … … 429 422 my $skycell = $metadata; 430 423 my $skycell_id = $skycell->{skycell_id}; 431 432 # The update system currently requires that data that has been magicked be destreaked433 # at chip stage so it needs magic even if the customer doesn't.434 if ($metadata->{magicked} != 0) {435 $need_magic = 1;436 }437 424 438 425 if ($diff_mode == $IPP_DIFF_MODE_WARP_STACK ) {
Note:
See TracChangeset
for help on using the changeset viewer.
