Changeset 42050

Timestamp:

Feb 17, 2022, 2:08:38 PM (4 years ago)

Author:

ippitc

Message:

merge show active labels (MEH, IPP-1001)

File:

• tags/ipp-20170121/pstamp/scripts/pstamp_server_status (modified) (3 diffs, 1 prop)

tags/ipp-20170121/pstamp/scripts/pstamp_server_status

@@ -39 +39 @@
 # isn't necessary if the pstamp/web stuff is configured to point at the 
 # ipp build. But currently it's running out of Bill's build
-my $ipphome = "/home/panstarrs/ipp";
+
+# EAM 2017.03.08 : need to point at temporary ITC location:
+# my $ipphome = "/home/panstarrs/ipp";
+my $ipphome = "/data/ippc64.1/ippitc";
 my $status_cmd = "psstatus";
 
@@ -46 +49 @@
 chdir $rundir or die "failed to cd to $rundir";
 
-
+# print "pantasks_client: $pantasks_client\n";
 
 my $now = `date -u`;
 
-print "<b>Status updated: &nbsp;&nbsp;&nbsp;</b> $now<br /><br />\n";
+print "<b>Status updated: &nbsp;&nbsp;&nbsp;</b> $now<br />\n";
 
 my $down = 0;
@@ -118 +121 @@
 
     if ($scheduler_state) {
-        print "Pantasks Scheduler $scheduler_state.\n";
+        print $br . "Pantasks Scheduler $scheduler_state.\n";
         if ($controller_state) {
             print $br . "Pantasks Controller $controller_state.\n";
+            # loading active labels
+            my $runlabels = `echo \"show.labels; quit\" \| pantasks_client -c ~ippitc/pstamp/ptolemy.rc \| tail -n +7`;
+            print $br . "Current Labels: \n" . $runlabels . "\n";
         } else {
             print STDERR "Controller state not found";