def CmAes.cmac
bend-osdev-cipher-modes@0.1.0.0 · aes_modes.bend:69
import bend-osdev-cipher-modes@0.1.0.0/aes_modes.bend as AesModes
import Base
import bend-osdev-bytes@0.1.0.0/bytes.bend as B
import bend-osdev-cipher-modes@0.1.0.0/cipher_modes.bend as M
import bend-osdev-cipher-modes@0.1.0.0/aes.bend as X
import bend-osdev-cipher-modes@0.1.0.0/cmac.bend as CM
69
70def CmAes.cmac(key: B.Octets, m: B.Octets) -> Result<&2, &2, M.CmError, B.Octets>:
71 do Result<&2, &2, M.CmError, B.Octets>:
72 k : X.CmAesKey <- X.CmAes.key(key)
73 return CM.Cmac.mac(~X.CmAesKey, ~X.CmAes.encrypt, k, m)