From 21a416dd1677eb679dcdbec81893d60a6c44a2dd Mon Sep 17 00:00:00 2001
From: Marcel Poul <marcel.poul@cern.ch>
Date: Wed, 22 Feb 2012 12:42:24 +0000
Subject: [PATCH] CANL server <-> openssl client

---
 .../CANL-C/tests/canl-test-cs-openssl.sh                | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

diff --git a/org.glite.testsuites.ctb/CANL-C/tests/canl-test-cs-openssl.sh b/org.glite.testsuites.ctb/CANL-C/tests/canl-test-cs-openssl.sh
index 85ff07c..71ffc85 100755
--- a/org.glite.testsuites.ctb/CANL-C/tests/canl-test-cs-openssl.sh
+++ b/org.glite.testsuites.ctb/CANL-C/tests/canl-test-cs-openssl.sh
@@ -144,6 +144,23 @@ fi
 
 kill ${last_pid} &> /dev/null
 
+printf "Starting canl sample server \n"
+${EMI_CANL_SERVER} -k /etc/grid-security/hostkey.pem \
+	-c /etc/grid-security/hostcert.pem -p "${lsn_port}" & 
+last_pid=$!
+lp_running=`${SYS_PS} | ${SYS_GREP} -E "${last_pid}" 2> /dev/null`
+if [ -n "$lp_running" ]; then
+	test_done
+else
+	test_failed
+	test_end
+	exit 2
+fi
+printf "Openssl client: connect to CANL sample server \n"
+${SYS_OPENSSL} s_client -quiet -connect "localhost:${lsn_port}"
+
+#kill ${last_pid} &> /dev/null
+
 test_end
 }
 #} &> $logfile
-- 
1.8.2.3