Changeset 35467 for trunk/PS-IPP-PStamp
- Timestamp:
- May 1, 2013, 3:50:22 PM (13 years ago)
- File:
-
- 1 edited
-
trunk/PS-IPP-PStamp/lib/PS/IPP/PStamp/Job.pm (modified) (20 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/PS-IPP-PStamp/lib/PS/IPP/PStamp/Job.pm
r35433 r35467 51 51 52 52 my $default_data_groups = ""; 53 54 # old locate_images() function. Still used by dqueryparse 55 # Postage stamp server now uses locate_images_for_row() 53 56 54 57 sub locate_images { … … 172 175 my $results = lookup($ipprc, $rowList, $imagedb, $req_type, $stage, $id, $tess_id, $component, 173 176 $need_magic, $dateobs_begin, $dateobs_end, $filter, $data_group, $option_mask, $mjd_min, $mjd_max, 177 0, 0, # fwhm cuts are not applied here 174 178 undef, undef, undef, $verbose); 175 179 … … 250 254 } 251 255 252 my ($release_name, $survey) = get_release_info($row); 256 my ($release_name, $survey, $default_tess_id) = get_release_info($row); 257 if (!$tess_id and $default_tess_id) { 258 $tess_id = $default_tess_id; 259 } 253 260 254 261 if ($req_type eq "bydiff") { … … 304 311 my $results = lookup($ipprc, $rowList, $imagedb, $req_type, $stage, $id, $tess_id, $component, 305 312 0, $dateobs_begin, $dateobs_end, $filter, $data_group, $option_mask, $mjd_min, $mjd_max, 313 getValOrZero($row->{FWHM_MIN}), getValOrZero($row->{FWHM_MAX}), 306 314 undef, $release_name, $survey, 307 315 $verbose); … … 330 338 my $mjd_min = shift; 331 339 my $mjd_max = shift; 340 my $fwhm_min = shift; 341 my $fwhm_max = shift; 332 342 my $selectedAstrom = shift; 333 343 my $release_name = shift; … … 365 375 my $release_args; 366 376 if (($req_type eq 'byexp' and $stage ne 'raw') or ($req_type eq 'byskycell' and $stage ne 'diff')) { 367 unless (isnull($release_name) and isnull($survey)) {377 if ($release_name or $survey) { 368 378 $use_releasetool = 1; 369 $release_args = " -release_name $release_name" if $release_name; 379 if ($release_name) { 380 $release_args = " -release_name $release_name"; 381 } else { 382 $release_args = " -priority_order"; 383 } 370 384 $release_args .= " -surveyName $survey" if $survey; 371 385 } … … 402 416 # choose the chips containing the center pixel by calling selectComponets() below 403 417 if ($use_releasetool) { 404 $command = "$releasetool -dbname $imagedb - priority_order -listrelexp $release_args";418 $command = "$releasetool -dbname $imagedb -listrelexp $release_args"; 405 419 $choose_components = 1; 406 420 } else { … … 433 447 } elsif ($stage eq 'warp') { 434 448 if ($use_releasetool) { 435 $command = "$releasetool -dbname $imagedb - priority_order -listrelexp $release_args";449 $command = "$releasetool -dbname $imagedb -listrelexp $release_args"; 436 450 $skycell_id = $component; 437 451 $choose_components = 1; … … 481 495 $command = "$releasetool -listrelstack -dbname $imagedb $release_args"; 482 496 $base_name = 'stack_path_base'; 497 my $stack_type = $row->{RUN_TYPE}; 498 if (!isnull($stack_type)) { 499 $command .= " -stack_type $stack_type"; 500 } 483 501 } else { 484 502 $command = "$stacktool -sumskyfile -dbname $imagedb"; … … 540 558 $command .= " -dateobs_end $dateobs_end" if $dateobs_end; 541 559 } elsif ($req_type ne "byid") { 542 $command .= " -mjd_ obs_begin $mjd_min" if $mjd_min;543 $command .= " -mjd_ obs_end$mjd_max" if $mjd_max;560 $command .= " -mjd_min $mjd_min" if $mjd_min; 561 $command .= " -mjd_max $mjd_max" if $mjd_max; 544 562 } 545 563 … … 551 569 # XXX: Why am I using default data_groups only for byskycell requests? 552 570 $command .= $default_data_groups; 571 } 572 573 if ($use_releasetool) { 574 # fwhm arguments are currently only supported when using releasetool for lookups 575 $command .= " -fwhm_min $fwhm_min" if $fwhm_min; 576 $command .= " -fwhm_max $fwhm_max" if $fwhm_max; 553 577 } 554 578 … … 752 776 } 753 777 778 # XXX: The logic below is somewhat messed up. See XXX: ... below 779 # 754 780 # The standard way to do a diff is warp - stack 755 781 # so we interpret the requested image in that way … … 766 792 } 767 793 my $stack_id; 794 if ($image->{diff_mode} == 2) { 795 # XXX: .. stack_id wasn't getting set 796 $stack_id = $stack2; 797 $image->{stack_id} = $stack_id; 798 } 768 799 if ($stack1 and $stack2) { 769 800 # we have a stack - stack diff (well it might be stack - warp....) … … 860 891 my $ra = shift; 861 892 my $dec = shift; 862 my $dateobs_begin = shift; 893 my $dateobs_begin = shift; # these are used for single frame lookups 863 894 my $dateobs_end = shift; 864 895 my $filter = shift; 865 896 my $data_group = shift; 866 897 my $option_mask = shift; 867 my $mjd_min = shift; 868 my $mjd_max = shift; 869 my $astrom = shift; 898 my $mjd_min = shift; # these are used for stack lookups 899 my $mjd_max = shift; # these are used for stack lookups 870 900 my $verbose = shift; 871 901 872 my ($release_name, $survey) = get_release_info($row); 902 my $fwhm_min = getValOrZero($row->{FWHM_MIN}); 903 my $fwhm_max = getValOrZero($row->{FWHM_MAX}); 904 905 906 my ($release_name, $survey, $default_tess_id) = get_release_info($row); 907 if (!$tess_id and $default_tess_id) { 908 $tess_id = $default_tess_id; 909 } 873 910 874 911 my $rowList = [$row]; … … 878 915 879 916 my $chips = lookup_by_cam_id_and_coords($ipprc, $imagedb, $stage, 880 $ra, $dec, $need_magic, $dateobs_begin, $dateobs_end, $filter, $data_group, $verbose, $release_name, $survey, $row->{FWHM_MIN}, $row->{FWHM_MAX}); 917 $ra, $dec, $need_magic, $dateobs_begin, $dateobs_end, $filter, $data_group, $verbose, 918 $release_name, $survey, $fwhm_min, $fwhm_max); 881 919 882 920 if (!$chips or scalar @$chips == 0) { … … 888 926 $tess_id, $chip->{component}, $need_magic, 889 927 $dateobs_begin, $dateobs_end, $filter, $data_group, $option_mask, $mjd_min, $mjd_max, 928 $fwhm_min, $fwhm_max, 890 929 $chip->{astrom}, undef, undef, 891 930 $verbose); … … 906 945 setErrorCodes($rowList, $PSTAMP_NO_IMAGE_MATCH); 907 946 } else { 947 # XXX: We are not applying the fwhm cuts 908 948 foreach my $skycell (@$skycells) { 909 949 my $these_results = lookup($ipprc, $rowList, $imagedb, "byskycell", $stage, undef, 910 950 $skycell->{tess_id}, $skycell->{component}, $need_magic, 911 951 $dateobs_begin, $dateobs_end, $filter, $data_group, $option_mask, $mjd_min, $mjd_max, 952 $fwhm_min, $fwhm_max, 912 953 undef, $release_name, $survey, 913 954 $verbose); … … 949 990 if ($release_name or $survey) { 950 991 $command = "$releasetool -dbname $imagedb -listrelexp"; 951 if ( !isnull($survey)) {952 $command .= " -survey _name $survey";953 } 954 if ( !isnull($release_name)) {992 if ($survey) { 993 $command .= " -surveyName $survey"; 994 } 995 if ($release_name) { 955 996 $command .= " -release_name $release_name"; 956 997 } else { … … 1302 1343 my $val = shift; 1303 1344 return (!defined($val) or ($val == 0)); 1345 } 1346 1347 sub getValOrZero { 1348 my $val = shift; 1349 return iszero($val) ? 0.0 : $val; 1304 1350 } 1305 1351 … … 1768 1814 $release_name = ""; 1769 1815 # no release check for survey 1770 $survey = $row->{SURVEY_NAME};1816 $survey = isnull($row->{SURVEY_NAME}) ? "" : $row->{SURVEY_NAME}; 1771 1817 } else { 1818 # if release is given leave survey empty 1772 1819 $survey = ""; 1773 1820 } 1774 1821 1775 return ($release_name, $survey); 1822 my $tess_id; 1823 if ($release_name) { 1824 # hack to optimize bycoord and byskycell lookups for well known releases 1825 # XXX: todo query database and return a list for the survey or release 1826 if ($release_name eq '3PI.PV1') { 1827 $tess_id = 'RINGS.V3'; 1828 } 1829 } 1830 1831 return ($release_name, $survey, $tess_id); 1776 1832 } 1777 1833
Note:
See TracChangeset
for help on using the changeset viewer.
