[Swift-commit] r4319 - trunk/libexec/log-processing

[wozniak at ci.uchicago.edu]

Author: wozniak
Date: 2011-04-08 14:36:56 -0500 (Fri, 08 Apr 2011)
New Revision: 4319

Added:
   trunk/libexec/log-processing/cpu-job-load.pl
Removed:
   trunk/libexec/log-processing/cpu-job-events.pl
Log:
Rename plot script


Deleted: trunk/libexec/log-processing/cpu-job-events.pl
===================================================================
--- trunk/libexec/log-processing/cpu-job-events.pl	2011-04-08 19:36:07 UTC (rev 4318)
+++ trunk/libexec/log-processing/cpu-job-events.pl	2011-04-08 19:36:56 UTC (rev 4319)
@@ -1,30 +0,0 @@
-#!/usr/bin/perl
-
-# Accumulate the load level at each point in time
-# INPUT:  A Swift log file with Coasters messages:
-#                  timestamp ... Cpu ... submitting ...
-#                  timestamp ... Cpu ... jobTerminated ...
-#         where timestamp is a number
-# OUTPUT: lines formatted as "timestamp load"
-#         where timestamp and load are numbers
-
-$time = 0.0;
-$load = 0;
-
-sub report() {
-    @tokens = split;
-    printf("$tokens[0] $load\n");
-}
-
-while (<STDIN>) {
-    if (/Cpu/) {
-	if (/submitting/) {
-	    $load++;
-	    report;
-	}
-	elsif (/jobTerminated/) {
-	    $load--;
-	    report;
-	}
-    }
-}

Copied: trunk/libexec/log-processing/cpu-job-load.pl (from rev 4317, trunk/libexec/log-processing/cpu-job-events.pl)
===================================================================
--- trunk/libexec/log-processing/cpu-job-load.pl	                        (rev 0)
+++ trunk/libexec/log-processing/cpu-job-load.pl	2011-04-08 19:36:56 UTC (rev 4319)
@@ -0,0 +1,30 @@
+#!/usr/bin/perl
+
+# Accumulate the load level at each point in time
+# INPUT:  A Swift log file with Coasters messages:
+#                  timestamp ... Cpu ... submitting ...
+#                  timestamp ... Cpu ... jobTerminated ...
+#         where timestamp is a number
+# OUTPUT: lines formatted as "timestamp load"
+#         where timestamp and load are numbers
+
+$time = 0.0;
+$load = 0;
+
+sub report() {
+    @tokens = split;
+    printf("$tokens[0] $load\n");
+}
+
+while (<STDIN>) {
+    if (/Cpu/) {
+	if (/submitting/) {
+	    $load++;
+	    report;
+	}
+	elsif (/jobTerminated/) {
+	    $load--;
+	    report;
+	}
+    }
+}