- Timestamp:
- Jul 30, 2010, 9:31:50 AM (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/eam_branches/ipp-20100621/ippScripts/scripts/dist_advancerun.pl
r27718 r28794 66 66 my $difftool = can_run('difftool') or (warn "Can't find difftool" and $missing_tools = 1); 67 67 my $stacktool = can_run('stacktool') or (warn "Can't find stacktool" and $missing_tools = 1); 68 my $bgtool = can_run('bgtool') or (warn "Can't find bgtool" and $missing_tools = 1); 68 69 if ($missing_tools) { 69 70 &my_die("Can't find required tools.", $dist_id, $PS_EXIT_CONFIG_ERROR); … … 82 83 $tool_cmd = "$chiptool -chip_id"; 83 84 $list_mode = "-processedimfile"; 85 $component_key = "class_id"; 86 } elsif ($stage eq "chip_bg") { 87 $tool_cmd = "$bgtool -chip_bg_id"; 88 $list_mode = "-chip"; 84 89 $component_key = "class_id"; 85 90 } elsif ($stage eq "camera") { … … 95 100 $list_mode = "-warped"; 96 101 $component_key = "skycell_id"; 102 } elsif ($stage eq "warp_bg") { 103 $tool_cmd = "$bgtool -warp_bg_id"; 104 $list_mode = "-warp"; 105 $component_key = "skycell_id"; 97 106 } elsif ($stage eq "stack") { 98 107 $tool_cmd = "$stacktool -stack_id"; … … 113 122 $tool_cmd .= " $stage_id"; 114 123 124 my $exportarg = '-exportrun'; 125 if ($stage eq 'chip_bg') { 126 $exportarg = '-exportchip'; 127 } elsif ($stage eq 'warp_bg') { 128 $exportarg = '-exportwarp'; 129 } 130 115 131 # XXX should we create a file rule for this? 116 132 my $dbinfo_file = "$outdir/dbinfo.$stage.$stage_id.mdc"; 117 133 118 134 { 119 my $command = "$tool_cmd -exportrun-outfile $dbinfo_file";135 my $command = "$tool_cmd $exportarg -outfile $dbinfo_file"; 120 136 $command .= " -clean" if ((defined $clean) and ($stage ne "raw")); 121 137 $command .= " -dbname $dbname" if defined $dbname;
Note:
See TracChangeset
for help on using the changeset viewer.
