def mac

bend-kit-sigv4@0.11.0.1 · sigv4.bend:295

import Base
import bend-kit-bytes@0.3.3.0/bytes.bend as Bytes

295# HMAC-SHA256 of msg under the key k holds, or k's failure.
296def mac(k: Result<&1, &1, U32 & String, U32 & Array<U32>>, +msg: String) -> IO(Result<&1, &1, U32 & String, U32 & Array<U32>>):
297  match k:
298    case Fail{e}:
299      IO.pure(Result<&1, &1, U32 & String, U32 & Array<U32>>, Fail{e})
300    case Done{(kn, kb)}:
301      mac.words(kn, kb, Bytes.from_string(msg))