IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Changeset 26548


Ignore:
Timestamp:
Jan 8, 2010, 3:59:22 PM (16 years ago)
Author:
watersc1
Message:

support for tracking down stacks.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/tools/gpc1_find_images.pl

    r26383 r26548  
    33use DBI;
    44use Getopt::Std;
    5 getopts('hFARCPp:BLMDWIYvx:n:c:w:s:O:S:N:',\%opt);
     5getopts('hFARCPp:BLMDWIYTvx:n:c:w:s:O:S:N:',\%opt);
    66#getopt('xncwOS:hARCW',\%opt);
    77unless (exists($opt{O})) {
     
    4646    print "          -M              Include masks in results.\n";
    4747    print "          -D              Return only pre-destreaked images.\n";
     48    print "          -Y              Yes, I want the raw, even if it's not been processed.\n";
     49    print "          -T              Get the sTacks for a given input.\n";
    4850    print "          -v              Be verbose on output.\n";
    4951    print " \n";
     
    9496    push @sth_adds, "warpRun.warp_id = $opt{w}";
    9597}
    96 if (exists($opt{s})) {
    97     if ($opt{s} != 0) {
     98if (exists($opt{s})||exists($opt{T})) {
     99#    print "$opt{s}!\n";
     100    if (exists($opt{s})&&($opt{s} != 0)) {
    98101        push @sth_adds, "stackRun.stack_id = $opt{s}";
    99102    }
    100     $sth_base =~ s/0,"nostack"/stack_id,stackSumSkyfile.uri/;
     103    $sth_base =~ s/0,'nostack'/stack_id,stackSumSkyfile.uri/;
     104    if (exists($opt{T})) {
     105        $sth_base .= ' RIGHT OUTER ';
     106    }
    101107    $sth_base .= ' JOIN stackInputSkyfile USING (warp_id) JOIN stackSumSkyfile USING (stack_id) JOIN stackRun USING (stack_id)';
     108#    print "$sth_base\n";
    102109}
    103110if ($#sth_adds != -1) {
     
    121128        $stack_sumfile_uri = '';
    122129    }
    123 #    print (join "\t", @{ $rr }) . "\n";
     130#    print (join "\t", @{ $rr }) . "\n" . "\n";
    124131#    $exp_pontime = 0; # To stop warnings, but I want this around.
    125132    if (exists($opt{I})) {
     
    234241        }
    235242    }
    236     if (exists($opt{s})) {
    237         push @scan, $stack_sumfile_uri;
    238         $found++;
     243    if (exists($opt{s})||exists($opt{T})) {
     244        if (defined($stack_sumfile_uri)) {
     245            push @scan, $stack_sumfile_uri;
     246            $found++;
     247        }
    239248    }
    240249
Note: See TracChangeset for help on using the changeset viewer.