law michael_accepts

bend-osdev-crypto@0.1.0.0 · LAWS.bend:478

import Base
import bend-osdev-bytes@0.1.0.0/bytes.bend as B
import bend-osdev-hashes@0.1.0.0/hashes.bend as Hs
import bend-osdev-hashes@0.1.0.0/michael.bend as HMI
import bend-osdev-crypto@0.1.0.0/inst_michael.bend as MIC

478# Michael as a MAC (inst_michael.bend): it accepts what it computes, for
479# every key and message (it uses the named default verify); a key of
480# another length than 8 bytes is refused; the sixth test vector recalled as
481# IEEE 802.11i's, through the MAC interface (not checked against a published
482# copy: hashes/README.md)
483law michael_accepts:
484  for +k: Hs.HsW2
485  for +m: B.Octets
486  {MIC.CrMichael.verify(k, m, HMI.HsMichael.mic(k, m)) == True{} : Bool}