dgit-repos-server: fix dm parsing, more tests

[dgit.git] / tests / tests / drs-push-rejects

diff --git a/tests/tests/drs-push-rejects b/tests/tests/drs-push-rejects
index 6098da79a0cd0da4a685dc1210d0fdeed5af5116..e3b5c7d603255b13fdd0c2f5b14775b25a0e4acb 100755 (executable)
--- a/tests/tests/drs-push-rejects
+++ b/tests/tests/drs-push-rejects
@@ -32,7 +32,7 @@ prep () {
        cp $tmp/masters/* $tmp/.
        tag_signer='-u Senatus'
        tag_message="$p release $version for $suite ($csuite) [dgit]"
-       tag_name=debian/3-2_dummy1
+       tag_name=debian/$version
        push_spec1="HEAD:refs/dgit/$csuite"
        push_spec2="refs/tags/$tag_name"
        push_spec="$push_spec1 $push_spec2"
@@ -58,16 +58,43 @@ mustfail 'tag message not in expected format' $push_spec
 
 prep unstable sid
 mktag
-
 mustfail 'sid != sponge' HEAD:refs/dgit/sponge $push_spec2
 
 # fixme test --sig-policy-url string
 # fixme cannot test   reject "signature is not of type 00!";
 
-git push origin $push_spec
-
+prep unstable sid
 mktag
+cp $tmp/dm.gpg $tmp/dd.gpg
+mustfail 'key not found in keyrings'
 
+prep unstable sid
+git push origin $push_spec # succeeds
+mktag
 mustfail 'not replacing previously-pushed version' $push_spec
 
+prep_dm_mangle () {
+       prep unstable sid
+       perl -i.bak -pe '
+               next unless m/^fingerprint: 3A82860837A0CD32/i../^$/;
+       ' -e "$1" $tmp/dm.txt
+       tag_signer='-u Populus'
+       mktag
+}
+
+git checkout v2
+version=3-2_dummy2
+
+prep_dm_mangle 's/allow:/asponge:/i'
+mustfail 'missing Allow section in permission' $push_spec
+
+prep_dm_mangle 's/\bpari-extra\b/sponge/i'
+mustfail "package $p not allowed for key" $push_spec
+
+prep_dm_mangle 'y/0-9/5-90-4/ if m/^fingerprint:/i'
+mustfail "not in permissions list although in keyring" $push_spec
+
+prep_dm_mangle ''
+git push origin $push_spec # succeeds
+
 echo ok.