IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Changeset 42419


Ignore:
Timestamp:
Mar 17, 2023, 1:25:50 PM (3 years ago)
Author:
tdeboer
Message:

added more verbose logging to diff generation

File:
1 edited

Legend:

Unmodified
Added
Removed
  • tags/ipp-ops-20220906/ippScripts/scripts/nightly_science.pl

    r42344 r42419  
    15791579            #find exposures for this object that have not been fully processed
    15801580            if (($this_warp_id eq 'NULL') && (($this_quality == 0) || ($this_quality eq 'NULL')) ) {
     1581                print STDERR "diff_queue: exposure with exp_id $this_exp_id for $this_object has warp_id $this_warp_id and quality $this_quality and is therefore not fully processed\n";
    15811582                $Nbad += 1;
    15821583            }
    15831584            if (($chip_state ne 'full') || ($cam_state ne 'full') ) {
     1585                print STDERR "diff_queue: exposure with exp_id $this_exp_id for $this_object has chip state $chip_state and cam state $cam_state and is therefore not fully processed\n";
    15841586                $Nbad += 1;
    15851587            }
     
    16181620            print STDERR "diff_queue: Number of input warps to make diffs is not even for target $target and object $this_object! $#{ $warps } ";
    16191621            if ($#{ $warps} + 1 == 1) {
    1620                 print STDERR ": I can do no diffs with only one exposure.\n";
     1622                print STDERR "diff_queue: I can do no diffs with only one exposure.\n";
    16211623                next;
    16221624            }
     
    16241626                my $rejected_warp = pop @{ $warps };
    16251627                my $rejected_exp_id = ${ $rejected_warp }[0];
    1626                 print STDERR ": Rejecting ${rejected_exp_id} to force visit count.\n";
     1628                print STDERR "diff_queue: Rejecting ${rejected_exp_id} to force visit count.\n";
    16271629            }
    16281630        }
     
    16521654            unless (defined($input_warp_id) && defined($template_warp_id) &&
    16531655                    ($input_warp_state eq 'full')&&($template_warp_state eq 'full')) {
    1654                 print STDERR "Diff for this $date $target $input_exp_id $template_exp_id not fully processed ($input_warp_state $template_warp_state) ($input_warp_camQuality $template_warp_camQuality)\n";
     1656                print STDERR "diff_queue:Diff for this $date $target $input_exp_id $template_exp_id not fully processed ($input_warp_state $template_warp_state) ($input_warp_camQuality $template_warp_camQuality)\n";
    16551657                if (($input_warp_camQuality == 4007)||($template_warp_camQuality == 4007)) {
    16561658                    # This should now never be reached.
    16571659                    # CZW: Trigger backup plan here?  Or simply set up framework?
    1658                     print STDERR "  ...but this is due to a camera stage astrometry quality\n";
     1660                    print STDERR "diff_queue: ...but this is due to a camera stage astrometry quality\n";
    16591661                    $Npotential--;
    16601662                }
     
    16641666            if (verify_uniqueness_diff($input_warp_id,$template_warp_id,$date,$target) != 0) {
    16651667                $Nqueued++;
    1666                 print STDERR "Diffs already queued for this $date $target $input_exp_id $template_exp_id ($input_warp_id $template_warp_id) $this_object $input_comment $template_comment\n";
     1668                print STDERR "diff_queue:Diffs already queued for this $date $target $input_exp_id $template_exp_id ($input_warp_id $template_warp_id) $this_object $input_comment $template_comment\n";
    16671669                next;
    16681670            }
    16691671            else {
    1670                 print STDERR "Preparing to diff $date $target $input_exp_id $template_exp_id ($input_warp_id $template_warp_id) $this_object $input_comment $template_comment\n";
     1672                print STDERR "diff_queue:Preparing to diff $date $target $input_exp_id $template_exp_id ($input_warp_id $template_warp_id) $this_object $input_comment $template_comment\n";
    16711673            }
    16721674           
     
    17931795                #find exposures for this object that have not been fully processed
    17941796                if (($this_warp_id eq 'NULL') && (($this_quality == 0) || ($this_quality eq 'NULL')) ) {
     1797                    print STDERR "desp_diff_singles: exposure with exp_id $this_exp_id for $this_object has warp_id $this_warp_id and quality $this_quality and is therefore not fully processed\n";
    17951798                    $Nbad += 1;
    17961799                }
    17971800                if (($chip_state ne 'full') || ($cam_state ne 'full') ) {
     1801                    print STDERR "desp_diff_singles: exposure with exp_id $this_exp_id for $this_object has chip state $chip_state and cam state $cam_state and is therefore not fully processed\n";
    17981802                    $Nbad += 1;
    17991803                }
     
    18641868                #The conditions are: uneven nr of warps greater than 3, and the most recent observations is more than $desdiffdt hours old
    18651869                if (($nwarps % 2 != 0) && ($nwarps >= 3) && ($timediff < $desdiffdt)) {
    1866                     print STDERR "desp_diff_singles: There are potential desperate diffs to be done, but the time criterium is not met.\n";
     1870                    print STDERR "desp_diff_singles: There are potential desperate diffs to be done (nwarps = $nwarps), but the time criterium is not met ($timediff < $desdiffdt).\n";
    18671871                    next;
    18681872                }
    18691873                if (($nwarps % 2 == 0) || ($nwarps == 1) || ($timediff < $desdiffdt)) {
     1874                    print STDERR "desp_diff_singles: No desperate diffs will be attempted, since the number of warps is less than or equal to two ($nwarps) and/or the time criterium is not met ($timediff < $desdiffdt)\n";
    18701875                    next;
    18711876                }
     
    18811886                    my $rejected_warp = pop @{ $warps };
    18821887                    my $rejected_exp_id = ${ $rejected_warp }[0];
    1883                     print STDERR ": Rejecting ${rejected_exp_id} to force visit count.\n";
     1888                    print STDERR "desp_diff_singles: Rejecting ${rejected_exp_id} to force visit count.\n";
    18841889                }
    18851890       
     
    19081913                    unless (defined($input_warp_id) && defined($template_warp_id) &&
    19091914                        ($input_warp_state eq 'full')&&($template_warp_state eq 'full')) {
    1910                         print STDERR "Desp diff for this $date $target $input_exp_id $template_exp_id not fully processed ($input_warp_state $template_warp_state) ($input_warp_camQuality $template_warp_camQuality)\n";
     1915                        print STDERR "desp_diff_singles: Desp diff for this $date $target $input_exp_id $template_exp_id not fully processed ($input_warp_state $template_warp_state) ($input_warp_camQuality $template_warp_camQuality)\n";
    19111916                        if (($input_warp_camQuality == 4007)||($template_warp_camQuality == 4007)) {
    19121917                            # This should now never be reached.
    19131918                            # CZW: Trigger backup plan here?  Or simply set up framework?
    1914                             print STDERR "  ...but this is due to a camera stage astrometry quality\n";
     1919                            print STDERR "desp_diff_singles: ...but this is due to a camera stage astrometry quality\n";
    19151920                            $Npotential--;
    19161921                        }
     
    19201925                    if (verify_uniqueness_diff($input_warp_id,$template_warp_id,$date,$target) != 0) {
    19211926                        $Nqueued++;
    1922                         print STDERR "Desp diffs already queued for this $date $target $input_exp_id $template_exp_id ($input_warp_id $template_warp_id) $this_object $input_comment $template_comment\n";
     1927                        print STDERR "desp_diff_singles: Desp diffs already queued for this $date $target $input_exp_id $template_exp_id ($input_warp_id $template_warp_id) $this_object $input_comment $template_comment\n";
    19231928                        next;
    19241929                    }
    19251930                    else {
    1926                         print STDERR "Preparing to single desperate diff $date $target $input_exp_id $template_exp_id ($input_warp_id $template_warp_id) $this_object $input_comment $template_comment\n";
     1931                        print STDERR "desp_diff_singles: Preparing to single desperate diff $date $target $input_exp_id $template_exp_id ($input_warp_id $template_warp_id) $this_object $input_comment $template_comment\n";
    19271932                    }
    19281933           
     
    19581963           
    19591964            } else {       
    1960                 print STDERR "desp_diff_singles: There is a possibility for dirty diffs to be made\n";     
     1965                print STDERR "desp_diff_singles: There is a possibility for dirty diffs to be made, but this is not implemeted at the moment\n";           
    19611966                #Consider the case of on-the-fly dirty desperate diffs
    19621967                #The conditions are: uneven nr of bad quality warps greater than 3, and the most recent observations is more than $desdiffdt hours old
     
    21842189                #find exposures for this object that have not been fully processed
    21852190                if (($this_warp_id eq 'NULL') && (($this_quality == 0) || ($this_quality eq 'NULL')) ) {
     2191                    print STDERR "desp_diff_queue: exposure with exp_id $this_exp_id for $this_object has warp_id $this_warp_id and quality $this_quality and is therefore not fully processed\n";
    21862192                    $Nbad += 1;
    21872193                }
    21882194                if (($chip_state ne 'full') || ($cam_state ne 'full') ) {
     2195                    print STDERR "desp_diff_queue: exposure with exp_id $this_exp_id for $this_object has chip state $chip_state and cam state $cam_state and is therefore not fully processed\n";
    21892196                    $Nbad += 1;
    21902197                }
     
    22412248                    print STDERR "desp_diff_queue: Number of input warps to make diffs is not even for target $target and object $this_object! $#{ $warps } ";
    22422249                    if ($#{ $warps} + 1 == 1) {
    2243                         print STDERR ": I can do no diffs with only one exposure.\n";
     2250                        print STDERR "desp_diff_queue: I can do no diffs with only one exposure.\n";
    22442251                        next;
    22452252                    }
     
    22472254                        my $rejected_warp = pop @{ $warps };
    22482255                        my $rejected_exp_id = ${ $rejected_warp }[0];
    2249                         print STDERR ": Rejecting ${rejected_exp_id} to force visit count.\n";
     2256                        print STDERR "desp_diff_queue: Rejecting ${rejected_exp_id} to force visit count.\n";
    22502257                    }
    22512258                }
     
    22752282                    unless (defined($input_warp_id) && defined($template_warp_id) &&
    22762283                        ($input_warp_state eq 'full')&&($template_warp_state eq 'full')) {
    2277                         print STDERR "Desp diff for this $date $target $input_exp_id $template_exp_id not fully processed ($input_warp_state $template_warp_state) ($input_warp_camQuality $template_warp_camQuality)\n";
     2284                        print STDERR "desp_diff_queue: Desp diff for this $date $target $input_exp_id $template_exp_id not fully processed ($input_warp_state $template_warp_state) ($input_warp_camQuality $template_warp_camQuality)\n";
    22782285                        if (($input_warp_camQuality == 4007)||($template_warp_camQuality == 4007)) {
    22792286                            # This should now never be reached.
    22802287                            # CZW: Trigger backup plan here?  Or simply set up framework?
    2281                             print STDERR "  ...but this is due to a camera stage astrometry quality\n";
     2288                            print STDERR "desp_diff_queue: ...but this is due to a camera stage astrometry quality\n";
    22822289                            $Npotential--;
    22832290                        }
     
    22872294                    if (verify_uniqueness_diff($input_warp_id,$template_warp_id,$date,$target) != 0) {
    22882295                        $Nqueued++;
    2289                         print STDERR "Desp diffs already queued for this $date $target $input_exp_id $template_exp_id ($input_warp_id $template_warp_id) $this_object $input_comment $template_comment\n";
     2296                        print STDERR "desp_diff_queue: Desp diffs already queued for this $date $target $input_exp_id $template_exp_id ($input_warp_id $template_warp_id) $this_object $input_comment $template_comment\n";
    22902297                        next;
    22912298                    }
    22922299                    else {
    2293                         print STDERR "Preparing to desperate diff $date $target $input_exp_id $template_exp_id ($input_warp_id $template_warp_id) $this_object $input_comment $template_comment\n";
     2300                        print STDERR "desp_diff_queue: Preparing to desperate diff $date $target $input_exp_id $template_exp_id ($input_warp_id $template_warp_id) $this_object $input_comment $template_comment\n";
    22942301                    }
    22952302           
     
    23252332           
    23262333            } else {       
    2327                 print STDERR "desp_diff_queue: There is a possibility for dirty diffs to be made\n";
     2334                print STDERR "desp_diff_queue: There is a possibility for dirty diffs to be made, but this is currently not implemented\n";
    23282335                #Consider the case of on-the-fly dirty desperate diffs
    23292336                #The conditions are: uneven nr of bad quality warps greater than 3, and the most recent observations is more than $desdiffdt hours old
Note: See TracChangeset for help on using the changeset viewer.