summaryrefslogtreecommitdiffstats
path: root/web/server/h2o/libh2o/deps/picotls/deps/cifra/shitlisp/test-sha256.sl
diff options
context:
space:
mode:
Diffstat (limited to 'web/server/h2o/libh2o/deps/picotls/deps/cifra/shitlisp/test-sha256.sl')
-rw-r--r--web/server/h2o/libh2o/deps/picotls/deps/cifra/shitlisp/test-sha256.sl62
1 files changed, 0 insertions, 62 deletions
diff --git a/web/server/h2o/libh2o/deps/picotls/deps/cifra/shitlisp/test-sha256.sl b/web/server/h2o/libh2o/deps/picotls/deps/cifra/shitlisp/test-sha256.sl
deleted file mode 100644
index 83c04573b..000000000
--- a/web/server/h2o/libh2o/deps/picotls/deps/cifra/shitlisp/test-sha256.sl
+++ /dev/null
@@ -1,62 +0,0 @@
-(assert (=
- (sha256 (bytes "abc"))
- [ba7816bf8f01cfea414140de5dae2223b00361a396177a9cb410ff61f20015ad])
-)
-
-(assert (=
- (sha256 (bytes "abcdbcdecdefdefgefghfghighijhijkijkljklmklmnlmnomnopnopq"))
- [248d6a61d20638b8e5c026930c3e6039a33ce45964ff2167f6ecedd419db06c1])
-)
-
-(assert (=
- (sha256 (* (bytes "a") 1000000))
- [cdc76e5c9914fb9281a1c7e284d73e67f1809a48a497200e046d39ccc7112cd0])
-)
-
-(assert (=
- (sha256 (bytes "The quick brown fox jumps over the lazy dog"))
- [d7a8fbb307d7809469ca9abcb0082e4f8d5651e46d3cdb762d02d0bf37c9e592])
-)
-
-(assert (=
- (sha256 (bytes "The quick brown fox jumps over the lazy cog"))
- [e4c4d8f3bf76b692de791a173e05321150f7a345b46484fe427f6acc7ecc81be])
-)
-
-(assert (=
- (sha256 [])
- [e3b0c44298fc1c149afbf4c8996fb92427ae41e4649b934ca495991b7852b855])
-)
-
-(assert (=
- (hmac-sha256 (* [0b] 20) (bytes "Hi There"))
- [b0344c61d8db38535ca8afceaf0bf12b881dc200c9833da726e9376c2e32cff7])
-)
-
-(assert (=
- (hmac-sha256 (bytes "Jefe") (bytes "what do ya want for nothing?"))
- [5bdcc146bf60754e6a042426089575c75a003f089d2739839dec58b964ec3843])
-)
-
-(assert (=
- (hmac-sha256 (* [aa] 20) (* [dd] 50))
- [773ea91e36800e46854db8ebd09181a72959098b3ef8c122d9635514ced565fe])
-)
-
-(assert (=
- (hmac-sha256 [0102030405060708090a0b0c0d0e0f10111213141516171819] (* [cd] 50))
- [82558a389a443c0ea4cc819899f2083a85f0faa3e578f8077a2e3ff46729665b])
-)
-
-(assert (=
- (hmac-sha256 (* [aa] 131) (bytes "Test Using Larger Than Block-Size Key - Hash Key First"))
- [60e431591ee0b67f0d8a26aacbf5b77f8e0bc6213728c5140546040f0ee37f54])
-)
-
-(assert (=
- (hmac-sha256 (* [aa] 131) (bytes "This is a test using a larger than block-size key and a larger than block-size data. The key needs to be hashed before being used by the HMAC algorithm."))
- [9b09ffa71b942fcb27635fbcd5b0e944bfdc63644f0713938a7f51535c3a35e2])
-)
-
-
-(puts success)