Changeset 31377 for trunk/ippScripts/scripts/addstar_run.pl
- Timestamp:
- Apr 25, 2011, 3:00:51 PM (15 years ago)
- File:
-
- 1 edited
-
trunk/ippScripts/scripts/addstar_run.pl (modified) (5 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippScripts/scripts/addstar_run.pl
r30326 r31377 37 37 } 38 38 my $minidvodb_path; 39 my ( $ exp_tag, $add_id, $camera, $outroot, $camroot, $dbname, $reduction, $dvodb, $minidvodb, $minidvodb_name, $minidvodb_group, $image_only, $verbose, $no_update,39 my ( $add_id, $camera, $stage, $outroot, $stageroot, $dbname, $reduction, $dvodb, $minidvodb, $minidvodb_name, $minidvodb_group, $image_only, $verbose, $no_update, 40 40 $no_op, $redirect, $save_temps); 41 41 GetOptions( 42 'exp_tag=s' => \$exp_tag, # Exposure identifier43 42 'add_id=s' => \$add_id, # Camtool identifier 44 43 'camera|c=s' => \$camera, # Camera 44 'stage|s=s' => \$stage, # Camera 45 45 46 'dbname|d=s' => \$dbname, # Database name 46 47 'outroot|w=s' => \$outroot, # output file base name 47 ' camroot|w=s' => \$camroot, # camerastage root name.48 'stageroot|w=s' => \$stageroot, # stage root name. 48 49 'reduction=s' => \$reduction, # Reduction class 49 50 'dvodb|w=s' => \$dvodb, # output DVO database … … 61 62 pod2usage( -msg => "Unknown option: @ARGV", -exitval => 2 ) if @ARGV; 62 63 pod2usage( 63 -msg => "Required options: -- exp_tag --add_id --camera --outroot --dvodb --camroot",64 -msg => "Required options: --add_id --camera --outroot --dvodb --stageroot --stage", 64 65 -exitval => 3, 65 66 ) unless 66 defined $ exp_tagand67 defined $stage and 67 68 defined $add_id and 68 69 defined $outroot and 69 defined $ camroot and70 defined $stageroot and 70 71 defined $dvodb and 71 72 defined $camera; … … 86 87 # Recipes to use based on reduction class 87 88 $reduction = 'DEFAULT' unless defined $reduction; 88 89 my $recipe_addstar = $ipprc->reduction($reduction, 'ADDSTAR'); 89 90 # XXX This is now not used: do we still need it? 90 my $recipe_addstar = $ipprc->reduction($reduction, 'ADDSTAR'); # Recipe to use 91 if ($stage =~/cam/) { 92 $recipe_addstar = $ipprc->reduction($reduction, 'ADDSTAR'); # Recipe to use 93 } 94 if ($stage =~/stack/) { 95 $recipe_addstar = $ipprc->reduction($reduction, 'ADDSTAR_STACK'); # Recipe to use 96 } 97 #if ($stage =~/staticsky/) { 98 # $recipe_addstar = $ipprc->reduction($reduction, 'ADDSTAR_STATICSKY'); # Recipe to use 99 #} 91 100 &my_die("Unrecognised ADDSTAR recipe", $add_id, $PS_EXIT_CONFIG_ERROR) unless defined $recipe_addstar; 92 101 … … 97 106 98 107 # the camera configurations should define the psastro output to be a single file (MEF), regardless of the inputs 99 my $fpaObjects = $ipprc->filename("PSASTRO.OUTPUT", $camroot) or &my_die("Missing entry from camera config", $add_id, $PS_EXIT_CONFIG_ERROR); 108 109 # it was PSASTRO.OUTPUT 110 my $fpaObjects = $ipprc->filename("PSASTRO.OUTPUT", $stageroot) or &my_die("Missing entry from camera config", $add_id, $PS_EXIT_CONFIG_ERROR); 111 112 if (($stage =~/staticsky/) || ($stage =~/stack/)) { 113 $fpaObjects =~ s/smf$/cmf/; 114 115 } 100 116 my $traceDest = $ipprc->filename("TRACE.EXP", $outroot) or &my_die("Missing entry from camera config", $add_id, $PS_EXIT_CONFIG_ERROR); 101 117 … … 173 189 $command .= " $realFile"; 174 190 $command .= " -use-name $fpaObjects"; # DVO wants the neb-name as a file reference 175 $command .= " -image" if $image_only; 176 191 $command .= " -image" if $image_only; 192 if ($stage = ~/staticsky/) { 193 $command .= " -accept-astrom "; 194 } 177 195 my $mjd_addstar_start = DateTime->now->mjd; # MJD of starting script 178 196
Note:
See TracChangeset
for help on using the changeset viewer.
