added profiling mode

git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@193 9efc2488-bf62-4759-914b-345cdb29e865

diff --git a/bin/opensrf_ctl b/bin/opensrf_ctl
index 00739dd..98ac929 100755 (executable)
--- a/bin/opensrf_ctl
+++ b/bin/opensrf_ctl
@@ -21,6 +21,16 @@ case $1 in
                $0 status;
                echo;
                ;;
+       "startprofile")
+               if [ -z $2 ]; then
+                       usage;
+                       exit;
+               fi              
+               OPENSRF_PROFILE=1 perl -MOpenSRF::System="$2" -e 'OpenSRF::System->bootstrap()' & 
+               sleep 2;
+               $0 status;
+               echo;
+               ;;
        "stop")
                PID=$(ps ax | grep "[0-9] System$" | awk '{print $1}');
                if [ -z $PID ]; then