Changeset 14093
- Timestamp:
- Jul 9, 2007, 4:36:42 PM (19 years ago)
- File:
-
- 1 edited
-
trunk/ippScripts/scripts/chip_imfile.pl (modified) (5 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippScripts/scripts/chip_imfile.pl
r14009 r14093 33 33 34 34 # Parse the command-line arguments 35 my ($exp_id, $chip_id, $class_id, $input_uri, $ camera, $dbname, $workdir, $reduction, $no_update, $no_op);35 my ($exp_id, $chip_id, $class_id, $input_uri, $exp_tag, $camera, $dbname, $workdir, $reduction, $no_update, $no_op); 36 36 GetOptions( 37 37 'exp_id=s' => \$exp_id, # Exposure identifier … … 41 41 'camera|c=s' => \$camera, # Camera 42 42 'dbname|d=s' => \$dbname, # Database name 43 'exp_tag=s' => \$exp_tag, # Exposure identifier 43 44 'workdir|w=s' => \$workdir, # Working directory, for output files 44 45 'reduction=s' => \$reduction, # Reduction class … … 48 49 49 50 pod2usage( -msg => "Unknown option: @ARGV", -exitval => 2 ) if @ARGV; 50 pod2usage( -msg => "Required options: --exp_id --chip_id --class_id --uri --camera", 51 -exitval => 3) 52 unless defined $exp_id 53 and defined $chip_id 54 and defined $class_id 55 and defined $input_uri 56 and defined $camera; 51 pod2usage( -msg => "Required options: --exp_id --exp_tag --chip_id --class_id --uri --camera", 52 -exitval => 3) unless 53 defined $exp_id and 54 defined $chip_id and 55 defined $class_id and 56 defined $input_uri and 57 defined $exp_tag and 58 defined $camera; 57 59 58 60 $ipprc->define_camera($camera); … … 93 95 &my_die("Couldn't find input file: $input_uri\n", $chip_id, $class_id, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists($input_uri); 94 96 95 $workdir = caturi( $workdir, $exp_ id) if defined $workdir;96 97 my $outputRoot = $ipprc->file_prepare( "$exp_ id.chp$chip_id", $workdir, $input_uri );98 99 my $outputImage = $ipprc->filename("PPIMAGE.CHIP", $outputRoot, $class_id) ;100 my $outputMask = $ipprc->filename("PPIMAGE.CHIP.MASK", $outputRoot, $class_id) ;101 my $outputBin1 = $ipprc->filename("PPIMAGE.BIN1", $outputRoot, $class_id) ;102 my $outputBin2 = $ipprc->filename("PPIMAGE.BIN2", $outputRoot, $class_id) ;103 my $outputStats = $ipprc->filename("PPIMAGE.STATS", $outputRoot, $class_id) ;97 $workdir = caturi( $workdir, $exp_tag ) if defined $workdir; 98 99 my $outputRoot = $ipprc->file_prepare( "$exp_tag.ch.$chip_id", $workdir, $input_uri ); 100 101 my $outputImage = $ipprc->filename("PPIMAGE.CHIP", $outputRoot, $class_id) or &my_die("Missing entry from camera config", $chip_id, $class_id, $PS_EXIT_PROG_ERROR); 102 my $outputMask = $ipprc->filename("PPIMAGE.CHIP.MASK", $outputRoot, $class_id) or &my_die("Missing entry from camera config", $chip_id, $class_id, $PS_EXIT_PROG_ERROR); 103 my $outputBin1 = $ipprc->filename("PPIMAGE.BIN1", $outputRoot, $class_id) or &my_die("Missing entry from camera config", $chip_id, $class_id, $PS_EXIT_PROG_ERROR); 104 my $outputBin2 = $ipprc->filename("PPIMAGE.BIN2", $outputRoot, $class_id) or &my_die("Missing entry from camera config", $chip_id, $class_id, $PS_EXIT_PROG_ERROR); 105 my $outputStats = $ipprc->filename("PPIMAGE.STATS", $outputRoot, $class_id) or &my_die("Missing entry from camera config", $chip_id, $class_id, $PS_EXIT_PROG_ERROR); 104 106 105 107 # Run ppImage … … 146 148 # command to update database 147 149 my $command = "$chiptool -addprocessedimfile"; 150 $command .= " -exp_id $exp_id"; 148 151 $command .= " -chip_id $chip_id"; 149 152 $command .= " -class_id $class_id";
Note:
See TracChangeset
for help on using the changeset viewer.
