~/jendhub

def CrXcbc.mac

bend-osdev-crypto@0.1.0.0 · xcbc.bend:68

import bend-osdev-crypto@0.1.0.0/xcbc.bend as Xcbc
import Base
import bend-osdev-bytes@0.1.0.0/bytes.bend as B
import bend-osdev-crypto@0.1.0.0/octets.bend as O

68# The tag of m (one block)
69def CrXcbc.mac(~K: Data, ~Blk: Data, ~bsize: Nat, ~enc: K -> Blk -> Blk, ~blk_of: B.Octets -> Maybe<&2, Blk>, ~blk_to: Blk -> B.Octets, kk: CrXcbcKey<K>, m: B.Octets) -> B.Octets:
70  match kk:
71    case CrXcbcKey{+k1, +k2, +k3}:
72      cr.xcbc.go(~K, ~Blk, ~bsize, ~enc, ~blk_of, ~blk_to, k1, k2, k3, O.CrOct.pieces(bsize, B.Octets.to_list(m)), B.Octets.zeros(bsize))

Uses (8)

Used by (4)