def bf.fill_s.go

bend-osdev-legacy-ciphers@0.1.0.0 · blowfish.bend:317

import Base
import bend-osdev-legacy-ciphers@0.1.0.0/legacy_ciphers.bend as L

317def bf.fill_s.go(n: Nat, +k: Nat, +j: U32, +ps: List<&2, U32>, +t: LcBfTabs, c: L.LcBlock64) -> LcBfSt:
318  match n:
319    case 0n:
320      match c:
321        case L.LcBlock64{+h, +l}:
322          LcBfSt{ps, bf.set_s(bf.set_s(t, k, j, h), k, U32.add(j, 1), l), L.LcBlock64{h, l}}
323    case 1n+m:
324      match c:
325        case L.LcBlock64{+h, +l}:
326          +t1 = bf.set_s(bf.set_s(t, k, j, h), k, U32.add(j, 1), l)
327          bf.fill_s.go(m, k, U32.add(j, 2), ps, t1, bf.run(bf.ops(16n, ps, t1), L.LcBlock64{h, l}))