IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Changeset 11455


Ignore:
Timestamp:
Jan 30, 2007, 3:42:50 PM (19 years ago)
Author:
Paul Price
Message:

Core dumps weren't being caught as errors. Now they are identified as programming errors.

Location:
trunk/ippScripts/scripts
Files:
12 edited

Legend:

Unmodified
Added
Removed

  • trunk/ippScripts/scripts/detrend_norm_apply.pl

    r11394 r11455  
    100100        run(command => $command, verbose => 1);
    101101    unless ($success) {
    102         $error_code = $error_code >> 8;
     102        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    103103        &my_die("Unable to perform ppImage: $error_code", $det_id, $iter, $class_id, $error_code);
    104104    }
    … …  
    145145        run(command => $command, verbose => 1);
    146146    unless ($success) {
    147         $error_code = $error_code >> 8;
     147        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    148148        warn("Unable to perform dettool -addnormalizedimfile: $error_code\n");
    149149        exit($error_code);

  • trunk/ippScripts/scripts/detrend_norm_exp.pl

    r11394 r11455  
    7272        run(command => $command, verbose => 1);
    7373    unless ($success) {
    74         $error_code = $error_code >> 8;
     74        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    7575        &my_die("Unable to perform ppImage: $error_code", $det_id, $iter, $error_code);
    7676    }
    … …  
    168168        run(command => $command, verbose => 1);
    169169    unless ($success) {
    170         $error_code = $error_code >> 8;
     170        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    171171        &my_die("Unable to perform dettool -addnormalizedexp: $error_code", $det_id, $iter, $error_code);
    172172    }

  • trunk/ippScripts/scripts/detrend_process_exp.pl

    r11394 r11455  
    7070        run(command => $command, verbose => 1);
    7171    unless ($success) {
    72         $error_code = $error_code >> 8;
     72        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    7373        &my_die("Unable to perform dettool -processedimfile: $error_code", $det_id, $exp_tag, $error_code);
    7474    }
    … …  
    143143        run(command => $command, verbose => 1);
    144144    unless ($success) {
    145         $error_code = $error_code >> 8;
     145        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    146146        &my_die("Unable to perform ppImage: $error_code", $det_id, $exp_tag, $error_code);
    147147    }
    … …  
    155155        run(command => $command, verbose => 1);
    156156    unless ($success) {
    157         $error_code = $error_code >> 8;
     157        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    158158        &my_die("Unable to perform ppImage: $error_code", $det_id, $exp_tag, $error_code);
    159159    }
    … …  
    174174        run(command => $command, verbose => 1);
    175175    unless ($success) {
    176         $error_code = $error_code >> 8;
     176        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    177177        warn("Unable to perform dettool -addprocessedexp: $error_code");
    178178        exit($error_code);

  • trunk/ippScripts/scripts/detrend_process_imfile.pl

    r11442 r11455  
    105105        run(command => $command, verbose => 1);
    106106    unless ($success) {
    107         $error_code = $error_code >> 8;
     107        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    108108        &my_die("Unable to perform ppImage: $error_code", $det_id, $exp_tag, $class_id, $error_code);
    109109    }
    … …  
    150150        run(command => $command, verbose => 1);
    151151    unless ($success) {
    152         $error_code = $error_code >> 8;
     152        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    153153        warn("Unable to perform dettool -addprocessedimfile: $error_code\n");
    154154        exit($error_code);

  • trunk/ippScripts/scripts/detrend_reject_exp.pl

    r11321 r11455  
    6666        run(command => $command, verbose => 1);
    6767    unless ($success) {
    68         $error_code = $error_code >> 8;
     68        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    6969        &my_die("Unable to perform dettool -residexp: $error_code", $det_id, $iter, $error_code);
    7070    }
    … …  
    189189            run(command => $command, verbose => 1);
    190190        unless ($success) {
    191             $error_code = $error_code >> 8;
     191            $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    192192            &my_die("Unable to perform dettool -updateresidexp: $error_code", $det_id, $iter, $error_code);
    193193        }
    … …  
    227227        run(command => $command, verbose => 1);
    228228    unless ($success) {
    229         $error_code = $error_code >> 8;
     229        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    230230        warn("Unable to perform dettool -adddetrunsummary: $error_code");
    231231        exit($error_code);
    … …  
    247247        run(command => $command, verbose => 1);
    248248    unless ($success) {
    249         $error_code = $error_code >> 8;
     249        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    250250        warn("Unable to perform dettool -updatedetrun: $error_code");
    251251        exit($error_code);

  • trunk/ippScripts/scripts/detrend_reject_imfile.pl

    r11394 r11455  
    7575        run(command => $command, verbose => 1);
    7676    unless ($success) {
    77         $error_code = $error_code >> 8;
     77        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    7878        warn("Unable to perform dettool -residimfile: $error_code\n");
    7979        exit($error_code);
    … …  
    129129        run(command => $command, verbose => 1);
    130130    unless ($success) {
    131         $error_code = $error_code >> 8;
     131        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    132132        &my_die("Unable to run ppImage: $error_code", $det_id, $iter, $exp_tag, $error_code);
    133133    }
    … …  
    141141        run(command => $command, verbose => 1);
    142142    unless ($success) {
    143         $error_code = $error_code >> 8;
     143        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    144144        &my_die("Unable to run ppImage: $error_code", $det_id, $iter, $exp_tag, $error_code);
    145145    }
    … …  
    278278        run(command => $command, verbose => 1);
    279279    unless ($success) {
    280         $error_code = $error_code >> 8;
     280        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    281281        warn("Unable to perform dettool -addresidexp: $error_code\n");
    282282        exit($error_code);

  • trunk/ippScripts/scripts/detrend_resid.pl

    r11442 r11455  
    146146        run(command => $command, verbose => 1);
    147147    unless ($success) {
    148         $error_code = $error_code >> 8;
     148        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    149149        &my_die("Unable to perform ppImage: $error_code", $det_id, $iter, $exp_tag, $class_id, $error_code);
    150150    }
    … …  
    191191        run(command => $command, verbose => 1);
    192192    unless ($success) {
    193         $error_code = $error_code >> 8;
     193        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    194194        warn("Unable to perform dettool -addresidimfile: $error_code\n");
    195195        exit($error_code);

  • trunk/ippScripts/scripts/detrend_stack.pl

    r11442 r11455  
    8282        run(command => $command, verbose => 1);
    8383    unless ($success) {
    84         $error_code = $error_code >> 8;
     84        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    8585        &my_die("Unable to perform dettool -processedimfile: $error_code", $det_id, $iter, $class_id, $error_code);
    8686    }
    … …  
    120120        run(command => $command, verbose => 1);
    121121    unless ($success) {
    122         $error_code = $error_code >> 8;
     122        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    123123        &my_die("Unable to perform ppMerge: $error_code", $det_id, $iter, $class_id, $error_code);
    124124    }
    … …  
    160160        run(command => $command, verbose => 1);
    161161    unless ($success) {
    162         $error_code = $error_code >> 8;
     162        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    163163        warn("Unable to perform dettool -addstacked: $error_code\n");
    164164        exit($error_code);

  • trunk/ippScripts/scripts/phase0_exp.pl

    r11321 r11455  
    102102        cache_run(command => $command, verbose => 1);
    103103    unless ($success) {
    104         $error_code = $error_code >> 8;
     104        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    105105        warn ("Unable to perform p0tool on exposure id $exptag: $error_code");
    106106        exit ($error_code);
    … …  
    207207        cache_run(command => \@command, verbose => 1);
    208208    unless ($success) {
    209         $error_code = $error_code >> 8;
     209        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    210210        warn ("Unable to run phase0 update for $exptag: $error_code");
    211211        exit($error_code);

  • trunk/ippScripts/scripts/phase0_imfile.pl

    r11297 r11455  
    114114        cache_run(command => $command, verbose => 1);
    115115    unless ($success) {
    116         $error_code = $error_code >> 8;
     116        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    117117        warn ("Unable to perform ppStats on exposure id $exp_tag: $error_code");
    118118        &my_die ($exp_tag, $class_id, $error_code);
    … …  
    192192
    193193    unless ($success) {
    194         $error_code = $error_code >> 8;
     194        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    195195        # XXX if we can't run -addprocessedimfile, we can't actually set the
    196196        # error code.

  • trunk/ippScripts/scripts/phase2.pl

    r11442 r11455  
    9393        run(command => $command, verbose => 1);
    9494    unless ($success) {
    95         $error_code = $error_code >> 8;
     95        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    9696        &my_die("Unable to perform ppImage: $error_code", $exp_tag, $class_id, $error_code);
    9797    }
    … …  
    137137        run(command => $command, verbose => 1);
    138138    unless ($success) {
    139         $error_code = $error_code >> 8;
     139        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    140140        warn("Unable to perform p2tool -addprocessedimfile: $error_code\n");
    141141        exit($error_code);

  • trunk/ippScripts/scripts/phase3.pl

    r11394 r11455  
    7373        run(command => $command, verbose => 1);
    7474    unless ($success) {
    75         $error_code = $error_code >> 8;
     75        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    7676        &my_die("Unable to perform p3tool: $error_code", $exp_tag, $error_code);
    7777    }
    … …  
    171171        run(command => $command, verbose => 1);
    172172    unless ($success) {
    173         $error_code = $error_code >> 8;
     173        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    174174        &my_die("Unable to perform ppImage: $error_code", $exp_tag, $error_code);
    175175    }
    … …  
    183183        run(command => $command, verbose => 1);
    184184    unless ($success) {
    185         $error_code = $error_code >> 8;
     185        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    186186        &my_die("Unable to perform ppImage: $error_code", $exp_tag, $error_code);
    187187    }
    … …  
    203203        run(command => $command, verbose => 1);
    204204    unless ($success) {
    205         $error_code = $error_code >> 8;
     205        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
    206206        warn("Unable to perform dettool -addprocessedexp: $error_code\n");
    207207        exit($error_code);
Note: See TracChangeset for help on using the changeset viewer.