IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Changeset 36952


Ignore:
Timestamp:
Jul 1, 2014, 2:23:27 PM (12 years ago)
Author:
watersc1
Message:

Merge of final scripts from trunk.

Location:
tags/ipp-pv3-20140616/ippScripts
Files:
7 edited

Legend:

Unmodified
Added
Removed
  • tags/ipp-pv3-20140616/ippScripts

  • tags/ipp-pv3-20140616/ippScripts/Build.PL

    r36810 r36952  
    135135        scripts/psphot_fullforce_warp.pl
    136136        scripts/psphot_fullforce_summary.pl
    137         scripts/stack_bkg_mk_mdc.pl
     137        scripts/sc_mk_stack_mdc.pl
     138        scripts/sc_prepare_camera.pl
     139        scripts/sc_prepare_chip.pl
     140        scripts/sc_prepare_stack.pl
     141        scripts/sc_prepare_warp.pl
     142        scripts/sc_remote_exec.pl
     143        scripts/sc_transfer_tool.pl
     144        scripts/sc_validate_files.pl
     145        scripts/sc_validate_processing.pl
    138146    )],
    139147    dist_abstract => 'Scripts for running the Pan-STARRS IPP',
  • tags/ipp-pv3-20140616/ippScripts/MANIFEST

    r36704 r36952  
    4949scripts/lap_science.pl
    5050scripts/regenerate_background.pl
     51scripts/sc_mk_stack_mdc.pl
     52scripts/sc_prepare_camera.pl
     53scripts/sc_prepare_chip.pl
     54scripts/sc_prepare_stack.pl
     55scripts/sc_prepare_warp.pl
     56scripts/sc_remote_exec.pl
     57scripts/sc_transfer_tool.pl
     58scripts/sc_validate_files.pl
     59scripts/sc_validate_processing.pl
    5160t/00_distribution.t
  • tags/ipp-pv3-20140616/ippScripts/scripts/sc_prepare_camera.pl

    • Property svn:mergeinfo deleted
  • tags/ipp-pv3-20140616/ippScripts/scripts/sc_prepare_stack.pl

    r36851 r36952  
    168168        my $remote_path_base = uri_local_to_remote($warp_path_base);
    169169        $warp_path_base_string .= " $remote_path_base ";
     170
     171        # Append file names to transfer lists so we can recover if warps are deleted.
     172        uri_to_outputs($warp_path_base . ".fits");
     173        uri_to_outputs($warp_path_base . ".wt.fits");
     174        uri_to_outputs($warp_path_base . ".mask.fits");
     175        uri_to_outputs($warp_path_base . ".cmf");
     176#       uri_to_outputs($warp_path_base . ".psf");
    170177    }
    171178    my $mk_mdc_command = "mkdir -p $remote_outdir && sc_mk_stack_mdc.pl $warp_path_base_string > ${remote_outroot}.in.mdc";
     
    182189    $ppstack_command    .= " -R PPSTACK.UNCONV.VARIANCE FITS.TYPE COMP_STACK";
    183190    $ppstack_command    .= " -tracedest ${remote_outroot}.trace -log ${remote_outroot}.log ";
    184     $ppstack_command    .= " -threads 10 ";
     191    $ppstack_command    .= " -threads 4 ";
    185192    $ppstack_command    .= " -dumpconfig ${remote_outroot}.mdc ";
    186193    $ppstack_command    .= " -stack_id $stack_id -skycell_id $skycell_id -tess_id $tess_id ";
  • tags/ipp-pv3-20140616/ippScripts/scripts/sc_prepare_warp.pl

    r36854 r36952  
    2727my $max_time      = 8;                      # longest allocation to ask for
    2828my $remote_hostname= "LANL/Mustang";         # Name of the remote node.
    29 my @return_component_list = ("DBINFO.EXP", "PSWARP.CONFIG", "PSWARP.OUTPUT", "PSWARP.OUTPUT.MASK", "PSWARP.OUTPUT.VARIANCE", "PSWARP.OUTPUT.SOURCES","LOG.EXP","TRACE.EXP");
     29my @return_component_list = ("DBINFO.EXP", "PSWARP.CONFIG", "PSWARP.OUTPUT", "PSWARP.OUTPUT.MASK", "PSWARP.OUTPUT.VARIANCE", "PSWARP.OUTPUT.SOURCES","PSPHOT.PSF.SAVE","LOG.EXP","TRACE.EXP");
    3030# Look for programs we need
    3131my $missing_tools;
  • tags/ipp-pv3-20140616/ippScripts/scripts/sc_transfer_tool.pl

    r36844 r36952  
    5151while(<I>) {
    5252    chomp;
     53    $i = int(rand($#filehandles));
     54
    5355    my $fline;
    5456    if ($fetch) {
     
    5759    if (($fetch)&&(!(-e $_))) {  # We are fetching, and do not already have this file.
    5860        print { $filehandles[$i] } $fline;
    59         $i++;
     61#       $i++;
    6062    }
    6163    elsif (!($fetch)) { # We are pushing
    6264#       if (-e "${local_tmp}/$_") {
    6365            print { $filehandles[$i] } "${local_tmp}/$_" . "\n";
    64             $i++;
     66#           $i++;
    6567#       }
    6668#       else { # But somehow couldn't find the file we expected
     
    6971#       }
    7072    }
    71     if ($i >= $threads) { $i = 0; }
     73#    if ($i >= $threads) { $i = 0; }
    7274}
    7375close(I);
Note: See TracChangeset for help on using the changeset viewer.