From: Jameson Rollins <jrollins@finestructure.net>
Date: Sat, 25 Dec 2010 19:50:37 +0000 (-0500)
Subject: add test for email context
X-Git-Url: http://git.tremily.us/?a=commitdiff_plain;h=f80b7904ee0b347f5d5cd3bfb9b2a8b2c8d5be90;p=monkeysphere-validation-agent.git

add test for email context
---

diff --git a/tests/basic b/tests/basic
index 253a302..371f208 100755
--- a/tests/basic
+++ b/tests/basic
@@ -79,7 +79,8 @@ done
 # and the same for the clients A and B
 for name in a b; do
     uid="${name} <${name}@example.net>"
-    PEM2OPENPGP_USAGE_FLAGS=authenticate pem2openpgp "$uid" < "${WORKDIR}/sec/${name}.key" | gpg --import
+    # make user keys 'a' and 's' capable
+    PEM2OPENPGP_USAGE_FLAGS=authenticate,sign pem2openpgp "$uid" < "${WORKDIR}/sec/${name}.key" | gpg --import
     # export fingerprint for openpgp4fpr
     gpg --with-colons --fingerprint "=${uid}" | grep '^fpr:' | cut -d: -f10 > "${WORKDIR}/pkc/${name}.openpgp4fpr"
 done
@@ -112,6 +113,8 @@ runtests() {
     # X should now validate as X
         "${srcdir}"/test-msva msva-perl "${srcdir}"/test-msva msva-query-agent https x.example.net "${ctype}" < "${WORKDIR}/pkc/x.${ctype}"
         "${srcdir}"/test-msva msva-perl "${srcdir}"/test-msva msva-query-agent https 'a <a@example.net>' "${ctype}" client < "${WORKDIR}/pkc/a.${ctype}"
+	# also test "email" context
+        "${srcdir}"/test-msva msva-perl "${srcdir}"/test-msva msva-query-agent email 'a <a@example.net>' "${ctype}" < "${WORKDIR}/pkc/a.${ctype}"
         
     # but X should not validate as Y or Z:
         for name in x y z; do