ChangeLogTag: Mon Jan 6 16:56:04 2003 Balachandran Natarajan <bala@isis-server.isis.vanderbilt.edu>

4 files changed, 169 insertions, 0 deletions

diff --git a/ChangeLog b/ChangeLog
index 5d94498b948..e52c9ea8e73 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,16 @@
+Mon Jan  6 16:56:04 2003  Balachandran Natarajan  <bala@isis-server.isis.vanderbilt.edu>
+
+	* bin/topinfo_iorsize_stats.sh: Scripts for capturing the size of
+	  the server and client when shipping large IOR's
+
+	* bin/topinfo_stats.sh: Renamed to topinfo_simple_stats.sh. This
+	  is a better to show that we capture the sizes of a simple server
+	  and client.
+	  
+	* bin/topinfo_simple_stats.sh: New file. We need to do some code
+	  sharing between these two scripts. Just postponing that for the
+	  timebeing. 
+
 Mon Jan  6 11:23:12 UTC 2003  Johnny Willemsen  <jwillemsen@remedy.nl>
 
         * include/makeinclude/platform_gnuwin32_common.GNU:
diff --git a/ChangeLogs/ChangeLog-03a b/ChangeLogs/ChangeLog-03a
index 5d94498b948..e52c9ea8e73 100644
--- a/ChangeLogs/ChangeLog-03a
+++ b/ChangeLogs/ChangeLog-03a
@@ -1,3 +1,16 @@
+Mon Jan  6 16:56:04 2003  Balachandran Natarajan  <bala@isis-server.isis.vanderbilt.edu>
+
+	* bin/topinfo_iorsize_stats.sh: Scripts for capturing the size of
+	  the server and client when shipping large IOR's
+
+	* bin/topinfo_stats.sh: Renamed to topinfo_simple_stats.sh. This
+	  is a better to show that we capture the sizes of a simple server
+	  and client.
+	  
+	* bin/topinfo_simple_stats.sh: New file. We need to do some code
+	  sharing between these two scripts. Just postponing that for the
+	  timebeing. 
+
 Mon Jan  6 11:23:12 UTC 2003  Johnny Willemsen  <jwillemsen@remedy.nl>
 
         * include/makeinclude/platform_gnuwin32_common.GNU:
diff --git a/bin/topinfo_iorsize_stats.sh b/bin/topinfo_iorsize_stats.sh
new file mode 100755
index 00000000000..cad9195ff31
--- /dev/null
+++ b/bin/topinfo_iorsize_stats.sh
@@ -0,0 +1,65 @@
+#!/bin/sh
+#
+# $Id$
+#
+
+
+if [ $# -lt 3 ]; then
+  echo "Usage: $0 [ROOT] [DEST] [USER]"
+  exit 0
+fi
+
+ROOT=$1
+DEST=$2
+US=$3
+
+DATE=`date +%Y/%m/%d-%H:%M`
+cd $ROOT
+ACE_ROOT=$ROOT
+export ACE_ROOT
+LD_LIBRARY_PATH=$ACE_ROOT/ace
+export LD_LIBRARY_PATH
+PATH=/usr/bin:$PATH
+export PATH
+cd TAO/performance-tests/Memory/IORsize
+# start the server
+./server &
+s_id=$!;
+# Just sleep for 2 seconds.
+sleep 2;
+# Check whether the server has started 
+file="test.ior"
+if test -f $file
+    then
+    # start the client
+    ./client &
+    c_id=$!;
+    # Wait till all the invocations are done
+    sleep 30;
+    # Get the size once the client has made sufficient invocations. 
+    s_invocations=`top -p $s_id -n 1 -b | grep $US| awk '{print $5}'`;
+    
+    echo $DATE $s_invocations >> $DEST/source/server_ior_size.txt
+    
+    # Get teh size of the client after all the invocations
+    c_invocations=`top -p $c_id -n 1 -b | grep $US| awk '{print $5}'`;
+    echo $DATE $c_invocations >> $DEST/source/client_ior_size.txt
+
+    # Kill the server and client. We will look at better ways of doing
+    # this later. 
+    kill -9 $c_id;
+    kill -9 $s_id;
+    rm -f $file
+else
+    echo $file doesnt exist
+fi
+
+
+cd $DEST/source
+
+FILES="server client"
+for i in $FILES ; do
+/usr/bin/tac ${i}_size.txt > $DEST/data/${i}_size.txt
+/usr/bin/tail -5 ${i}_size.txt > $DEST/data/LAST_${i}_size.txt
+$ROOT/bin/generate_topinfo_charts.sh ${i}_size.txt $DEST/images/${i}_size.png st_${i}_size.txt
+done
diff --git a/bin/topinfo_simple_stats.sh b/bin/topinfo_simple_stats.sh
new file mode 100755
index 00000000000..1e5b0bd0868
--- /dev/null
+++ b/bin/topinfo_simple_stats.sh
@@ -0,0 +1,78 @@
+#!/bin/sh
+#
+# $Id$
+#
+
+
+if [ $# -lt 3 ]; then
+  echo "Usage: $0 [ROOT] [DEST] [USER]"
+  exit 0
+fi
+
+ROOT=$1
+DEST=$2
+US=$3
+
+DATE=`date +%Y/%m/%d-%H:%M`
+cd $ROOT
+ACE_ROOT=$ROOT
+export ACE_ROOT
+LD_LIBRARY_PATH=$ACE_ROOT/ace
+export LD_LIBRARY_PATH
+PATH=/usr/bin:$PATH
+export PATH
+cd TAO/performance-tests/Memory/Single_Threaded
+# start the server
+./server &
+s_id=$!;
+# Just sleep for 2 seconds.
+sleep 2;
+# Check whether the server has started 
+file="test.ior"
+if test -f $file
+    then
+    # Just get the size as soon the server is started, ie. the vanilla
+    # server.  
+    s_up=`top -p $s_id -n 1 -b | grep $US| awk '{print $5}'`;
+
+    # Write it a file
+    echo $DATE $s_up >> $DEST/source/st_start_size.txt
+    # start the client
+    ./client &
+    c_id=$!;
+    # Wait till all the invocations are done
+    sleep 10;
+    # Get the size once the client has made sufficient invocations. 
+    s_invocations=`top -p $s_id -n 1 -b | grep $US| awk '{print $5}'`;
+    
+    echo $DATE $s_invocations >> $DEST/source/st_after_invoke_size.txt
+    
+    # Get teh size of the client after all the invocations
+    c_invocations=`top -p $c_id -n 1 -b | grep $US| awk '{print $5}'`;
+    echo $DATE $c_invocations >> $DEST/source/st_client_size.txt
+
+    # Kill the server and client. We will look at better ways of doing
+    # this later. 
+    kill -9 $c_id;
+    
+    # Just sleep for the server to release memory etc.
+    sleep 5;
+
+    # Get the size once the client is killed or crashed
+    s_client_death=`top -p $s_id -n 1 -b | grep $US| awk '{print $5}'`;
+    echo $DATE $s_client_death  >> $DEST/source/st_after_peer_death_size.txt
+    kill -9 $s_id;
+    rm -f $file
+else
+    echo $file doesnt exist
+fi
+
+
+cd $DEST/source
+
+FILES="start after_invoke client after_peer_death"
+for i in $FILES ; do
+/usr/bin/tac st_${i}_size.txt > $DEST/data/st_${i}_size.txt
+/usr/bin/tail -5 st_${i}_size.txt > $DEST/data/LAST_st_${i}_size.txt
+$ROOT/bin/generate_topinfo_charts.sh st_${i}_size.txt $DEST/images/st_${i}_size.png st_${i}_size.txt
+done