Changeset 36639 for trunk/pstamp/scripts/pstamp_server_status

Timestamp:

Apr 2, 2014, 2:04:21 PM (12 years ago)

Author:

bills

Message:

integrate current version from operational tag

File:

• trunk/pstamp/scripts/pstamp_server_status (modified) (2 diffs)

trunk/pstamp/scripts/pstamp_server_status

@@ -15 +15 @@
 
 
-my ($rundir, $verbose, $save_temps);
+my ($rundir, $workdir, $verbose, $save_temps);
 my $br = '<br />';
 
 GetOptions(
     'rundir=s'      => \$rundir,
+    'workdir=s'     => \$workdir,
     'verbose'       => \$verbose,
     'save-temps'    => \$save_temps,
@@ -155 +156 @@
     }
 }
+if ($workdir) {
+    # get the space available in the working directory file system
+    my $df_output = `df -h $workdir`;
+    my @lines = split "\n", $df_output;
+    foreach my $line (@lines) {
+        next unless $line =~ /data/;
+        my ($total, $used, $free, $percent, $part) = split " ", $line;
+        print "<br><b>Server Working Directory:</b>&nbsp;&nbsp;$percent full. $free free out of $total total.<br>\n";
+    }
+
+}
 
 # now run the script psstatus to check the status of running requests and finished requests