Changeset 1257 for trunk/lang/tcl

Timestamp:

Dec 10, 2008 7:57:25 AM (15 years ago)

Author:

mmc

Message:

Added a new Rappture::sysinfo command for querying system load
information. Updated the p2p software to use that command to
gauge the load of workers and execute a "perftest" executable
from time to time to measure worker output.

Location:

trunk/lang/tcl

Files:

• src/Makefile.in (modified) (1 diff)
• src/Rappture_Init.c (modified) (2 diffs)
• src/RpSysinfo.c (added)
• tests/sysinfo.test (added)

trunk/lang/tcl/src/Makefile.in

@@ -55 +55 @@
                 RpRusage.o \
                 RpSignal.o  \
+                RpSysinfo.o  \
                 RpUnitsTclInterface.o \
                 RpUtilsTclInterface.o 

trunk/lang/tcl/src/Rappture_Init.c

@@ -25 +25 @@
 extern Tcl_AppInitProc RpRusage_Init;
 extern Tcl_AppInitProc RpSignal_Init;
+extern Tcl_AppInitProc RpSysinfo_Init;
 extern Tcl_AppInitProc RpDaemon_Init;
 
@@ -72 +73 @@
         return TCL_ERROR;
     }
+    if (RpSysinfo_Init(interp) != TCL_OK) {
+        return TCL_ERROR;
+    }
     if (RpDaemon_Init(interp) != TCL_OK) {
         return TCL_ERROR;