From 4b755330721306ab3d6596b25df448e32ff57b6a Mon Sep 17 00:00:00 2001 From: Cosmin Apreutesei Date: Wed, 6 Nov 2019 16:42:31 +0200 Subject: [PATCH] unimportant --- sha2.lua | 19 +++++++++++- sha2.md | 3 ++ sha2_hmac_test.lua | 76 ++++++++++++++++++++++++++++++++++++++++++++++ 3 files changed, 97 insertions(+), 1 deletion(-) create mode 100644 sha2_hmac_test.lua diff --git a/sha2.lua b/sha2.lua index 3b9dd66..fe7c546 100644 --- a/sha2.lua +++ b/sha2.lua @@ -2,6 +2,12 @@ local ffi = require'ffi' local C = ffi.load'sha2' +if not ... then + require'sha2_test' + require'sha2_hmac_test' + return +end + ffi.cdef[[ enum { SHA256_BLOCK_LENGTH = 64, @@ -67,6 +73,17 @@ M.sha256 = hash_function(M.sha256_digest) M.sha384 = hash_function(M.sha384_digest) M.sha512 = hash_function(M.sha512_digest) -if not ... then require'sha2_test' end +local function mkhmac(SHA, keysize) + local HMAC = SHA..'_hmac' + local SHA = M[SHA] + M[HMAC] = function(message, key) + local hmac = require'hmac' + M[HMAC] = hmac.new(SHA, keysize) + return M[HMAC](message, key) + end +end +mkhmac('sha256', 64) +mkhmac('sha384', 128) +mkhmac('sha512', 128) return M diff --git a/sha2.md b/sha2.md index 4ad700f..f9776f5 100644 --- a/sha2.md +++ b/sha2.md @@ -23,6 +23,9 @@ A ffi binding of Aaron Gifford's [SHA-2 implementation][sha2 lib]. `digest(cdata, size)` \ `digest() -> s` +`sha2.sha256_hmac(s, key) -> s` compute the HMAC-SHA256 of a string. +`sha2.sha384_hmac(s, key) -> s` compute the HMAC-SHA384 of a string. +`sha2.sha512_hmac(s, key) -> s` compute the HMAC-SHA512 of a string. ----------------------------------- ----------------------------------- [glue.tohex]: glue.html#tohex diff --git a/sha2_hmac_test.lua b/sha2_hmac_test.lua new file mode 100644 index 0000000..e83cf1e --- /dev/null +++ b/sha2_hmac_test.lua @@ -0,0 +1,76 @@ +local sha2 = require'sha2' +local hmac256 = sha2.sha256_hmac +local hmac384 = sha2.sha384_hmac +local hmac512 = sha2.sha512_hmac +local glue = require'glue' + +--from http://tools.ietf.org/html/rfc4231 +tests = { + { key = (glue.fromhex'0b'):rep(20), + data = 'Hi There', + hmac256 = glue.fromhex'b0344c61d8db38535ca8afceaf0bf12b881dc200c9833da726e9376c2e32cff7', + hmac384 = glue.fromhex'afd03944d84895626b0825f4ab46907f15f9dadbe4101ec682aa034c7cebc59cfaea9ea9076ede7f4af152e8b2fa9cb6', + hmac512 = glue.fromhex'87aa7cdea5ef619d4ff0b4241a1d6cb02379f4e2ce4ec2787ad0b30545e17cdedaa833b7d6b8a702038b274eaea3f4e4be9d914eeb61f1702e696c203a126854', + }, + { key = 'Jefe', + data = 'what do ya want for nothing?', + hmac256 = glue.fromhex'5bdcc146bf60754e6a042426089575c75a003f089d2739839dec58b964ec3843', + hmac384 = glue.fromhex'af45d2e376484031617f78d2b58a6b1b9c7ef464f5a01b47e42ec3736322445e8e2240ca5e69e2c78b3239ecfab21649', + hmac512 = glue.fromhex'164b7a7bfcf819e2e395fbe73b56e0a387bd64222e831fd610270cd7ea2505549758bf75c05a994a6d034f65f8f0e6fdcaeab1a34d4a6b4b636e070a38bce737', + }, + { key = (glue.fromhex'aa'):rep(20), + data = (glue.fromhex'dd'):rep(50), + hmac256 = glue.fromhex'773ea91e36800e46854db8ebd09181a72959098b3ef8c122d9635514ced565fe', + hmac384 = glue.fromhex'88062608d3e6ad8a0aa2ace014c8a86f0aa635d947ac9febe83ef4e55966144b2a5ab39dc13814b94e3ab6e101a34f27', + hmac512 = glue.fromhex'fa73b0089d56a284efb0f0756c890be9b1b5dbdd8ee81a3655f83e33b2279d39bf3e848279a722c806b485a47e67c807b946a337bee8942674278859e13292fb', + }, + { key = glue.fromhex'0102030405060708090a0b0c0d0e0f10111213141516171819', + data = (glue.fromhex'cd'):rep(50), + hmac256 = glue.fromhex'82558a389a443c0ea4cc819899f2083a85f0faa3e578f8077a2e3ff46729665b', + hmac384 = glue.fromhex'3e8a69b7783c25851933ab6290af6ca77a9981480850009cc5577c6e1f573b4e6801dd23c4a7d679ccf8a386c674cffb', + hmac512 = glue.fromhex'b0ba465637458c6990e5a8c5f61d4af7e576d97ff94b872de76f8050361ee3dba91ca5c11aa25eb4d679275cc5788063a5f19741120c4f2de2adebeb10a298dd', + }, + { key = (glue.fromhex'aa'):rep(131), + data = 'Test Using Larger Than Block-Size Key - Hash Key First', + hmac256 = glue.fromhex'60e431591ee0b67f0d8a26aacbf5b77f8e0bc6213728c5140546040f0ee37f54', + hmac384 = glue.fromhex'4ece084485813e9088d2c63a041bc5b44f9ef1012a2b588f3cd11f05033ac4c60c2ef6ab4030fe8296248df163f44952', + hmac512 = glue.fromhex'80b24263c7c1a3ebb71493c1dd7be8b49b46d1f41b4aeec1121b013783f8f3526b56d037e05f2598bd0fd2215d6a1e5295e64f73f63f0aec8b915a985d786598', + }, + { key = (glue.fromhex'aa'):rep(131), + data = '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.', + hmac256 = glue.fromhex'9b09ffa71b942fcb27635fbcd5b0e944bfdc63644f0713938a7f51535c3a35e2', + hmac384 = glue.fromhex'6617178e941f020d351e2f254e8fd32c602420feb0b8fb9adccebb82461e99c5a678cc31e799176d3860e6110c46523e', + hmac512 = glue.fromhex'e37b6a775dc87dbaa4dfa9f96e5e3ffddebd71f8867289865df5a32d20cdc944b6022cac3c4982b10d5eeb55c3e4de15134676fb6de0446065c97440fa8c6a58', + }, +} + +local function asserteq(test, a,b) + print(test, a == b and 'ok' or glue.tohex(a) .. ' ~= ' .. glue.tohex(b)) +end +for k,test in ipairs(tests) do + print('test '..k) + assert(#test.hmac256 == 32) + asserteq(256, hmac256(test.data, test.key), test.hmac256) + assert(#test.hmac384 == 48) + asserteq(384, hmac384(test.data, test.key), test.hmac384) + assert(#test.hmac512 == 64) + asserteq(512, hmac512(test.data, test.key), test.hmac512) +end + + +local b64 = require'libb64' + +--per amazon aws example +local message = 'GET\nwebservices.amazon.com\n/onca/xml\nAWSAccessKeyId=00000000000000000000&ItemId=0679722769&Operation=ItemLookup&ResponseGroup=ItemAttributes%2COffers%2CImages%2CReviews&Service=AWSECommerceService&Timestamp=2009-01-01T12%3A00%3A00Z&Version=2009-01-06' +local sha = glue.fromhex'b9a1069ad38ebb31d7a6a91b542c511301a082b6f445484c3be1aa8514e1bfef' --per HashCalc +local mac = glue.fromhex'35a71ef94dc0cf83a137bb484aa82cd6f74b0470448a359c05e0aa2f9c4df718' --per HashCalc +local key = '1234567890' --per amazon (their dummy key) +local b64_mac = 'Nace+U3Az4OhN7tISqgs1vdLBHBEijWcBeCqL5xN9xg=' --per amazon + +assert(b64.encode(mac) == b64_mac) --so our base64 encoder is good compared to HashCalc's hmac and sha +assert(b64.decode(b64_mac) == mac) --so our base64 decoder is good compared to HashCalc's hmac and sha +assert(sha2.sha256(message) == sha) --so our sha256 is good + +assert(hmac256(message, key) == mac) --so our hmac is good +assert(b64.encode(hmac256(message, key)) == b64_mac) --so our hmac is good +