From 4ad766b8c224dd08981516964e40b08d26de7be0 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Niels=20M=C3=B6ller?= <nisse@lysator.liu.se>
Date: Mon, 17 Nov 1997 04:43:56 +0100
Subject: [PATCH] Build a testsuite for lobotomized module as well.
Rev: src/modules/_Crypto/.build_lobotomized_crypto:1.3
Rev: src/modules/_Crypto/testsuite.in:1.8
---
src/modules/_Crypto/.build_lobotomized_crypto | 2 +-
src/modules/_Crypto/testsuite.in | 14 ++++++++++----
2 files changed, 11 insertions(+), 5 deletions(-)
diff --git a/src/modules/_Crypto/.build_lobotomized_crypto b/src/modules/_Crypto/.build_lobotomized_crypto
index f790a5c5d4..0e10fbccf8 100755
--- a/src/modules/_Crypto/.build_lobotomized_crypto
+++ b/src/modules/_Crypto/.build_lobotomized_crypto
@@ -21,7 +21,7 @@ for d in . include lib; do
done
echo "Censoring sensitive files"
-for f in crypto.c Makefile.in lib/Makefile.in ; do
+for f in crypto.c Makefile.in lib/Makefile.in testsuite.in ; do
echo $f
sed '/BEGIN NATIONAL SECURITY/,/END NATIONAL SECURITY/d' \
< $f > ../_Lobotomized_Crypto/$f
diff --git a/src/modules/_Crypto/testsuite.in b/src/modules/_Crypto/testsuite.in
index 65917d94d9..78579e7a5a 100644
--- a/src/modules/_Crypto/testsuite.in
+++ b/src/modules/_Crypto/testsuite.in
@@ -4,20 +4,24 @@ test_true([[objectp(Crypto)]])
// C-programs
test_true([[programp(Crypto.cbc)]])
test_true([[programp(Crypto.crypto)]])
-test_true([[programp(Crypto.des)]])
-test_true([[programp(Crypto.idea)]])
-test_true([[programp(Crypto.cast)]])
test_true([[programp(Crypto.invert)]])
test_true([[programp(Crypto.md5)]])
test_true([[programp(Crypto.pipe)]])
-test_true([[programp(Crypto.rc4)]])
test_true([[programp(Crypto.sha)]])
+// BEGIN NATIONAL SECURITY
+test_true([[programp(Crypto.des)]])
+test_true([[programp(Crypto.idea)]])
+test_true([[programp(Crypto.cast)]])
+test_true([[programp(Crypto.rc4)]])
+// END NATIONAL SECURITY
+
// Functions
test_true([[functionp(Crypto.des_parity)]])
test_true([[functionp(Crypto.hex_to_string)]])
test_true([[functionp(Crypto.string_to_hex)]])
+// BEGIN NATIONAL SECURITY
cond( [[ master()->resolv("Gmp")->mpz ]],
[[
@@ -158,6 +162,8 @@ test_eq([[Crypto.rc4()->set_encrypt_key(Crypto.hex_to_string("0123456789abcdef")
"b99fcd8660863a159ad4abe40fa48934163ddde542a6585540fd683cbfd8c00f"
"12129a284deacc4cdefe58be7137541c047126c8d49e2755ab181ab7e940b0c0")]])
]])
+
+// END NATIONAL SECURITY
cond( [[ master()->resolv("Gmp")->mpz ]],
[[
--
GitLab