From d461bb4ce8ecb0d35e5c030781d4516d4c75f904 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Love=20H=C3=B6rnquist=20=C3=85strand?= <lha@kth.se>
Date: Sat, 26 Jul 2008 18:31:24 +0000
Subject: [PATCH] test --ok-as-delgate and not

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@23406 ec53bebd-3082-4978-b11e-865c3cabbd6b
---
 tests/gss/check-context.in | 27 ++++++++++++++++++++++++++-
 1 file changed, 26 insertions(+), 1 deletion(-)

diff --git a/tests/gss/check-context.in b/tests/gss/check-context.in
index 9c2304dcb..7ad22d3fd 100644
--- a/tests/gss/check-context.in
+++ b/tests/gss/check-context.in
@@ -114,7 +114,7 @@ trap "kill ${kdcpid}; echo signal killing kdc; exit 1;" EXIT
 exitcode=0
 
 echo "Getting client initial tickets"
-${kinit} --password-file=${objdir}/foopassword user1@${R} || exitcode=1
+${kinit} --password-file=${objdir}/foopassword --forwardable user1@${R} || exitcode=1
 
 echo "======test unreadable/non existant keytab and its error message"
 ${context} --mech-type=krb5 host@lucid.test.h5l.se || \
@@ -243,9 +243,34 @@ ${context} \
 
 trap "" EXIT
 
+echo "Getting client initial tickets"
+${kinit} --forwardable \
+    --password-file=${objdir}/foopassword user1@${R} || exitcode=1
+
+echo "ok-as-delegate not used"
+${context} \
+    --mech-type=krb5 \
+    --delegate \
+    --name-type=hostbased-service host@lucid.test.h5l.se || \
+	{ exitcode=1 ; echo "test failed"; }
+
+echo "Getting client initial tickets with --ok-as-delgate"
+${kinit} --ok-as-delegate  --forwardable \
+    --password-file=${objdir}/foopassword user1@${R} || exitcode=1
+
+echo "ok-as-delegate"
+${context} \
+    --mech-type=krb5 \
+    --delegate \
+    --server-no-delegate \
+    --name-type=hostbased-service host@lucid.test.h5l.se || \
+	{ exitcode=1 ; echo "test failed"; }
+
 echo "killing kdc (${kdcpid})"
 kill ${kdcpid} 2> /dev/null
 
+[ "$exitcode" = 0 ] && echo "all ok"
+
 exit $exitcode