def fin31

mylsm-lsm-store@0.6.0.1 · src/hub_sha/core.bend:1536

import Base
import mylsm-lsm-store@0.6.0.1/src/hub_sha/state.bend as S

1536# Apply SHA-256 round 31 to the compression state.
1537def fin31(
1538  +t0: U32,
1539  +t1: U32,
1540  +t2: U32,
1541  +t3: U32,
1542  +t4: U32,
1543  +t5: U32,
1544  +t6: U32,
1545  +t7: U32,
1546  +t8: U32,
1547  +t9: U32,
1548  +t10: U32,
1549  +t11: U32,
1550  +t12: U32,
1551  +t13: U32,
1552  +t14: U32,
1553  +t15: U32,
1554  +t16: U32,
1555  +t17: U32,
1556  +t18: U32,
1557  +t19: U32,
1558  +t20: U32,
1559  +t21: U32,
1560  +t22: U32,
1561  +t23: U32,
1562  +t24: U32,
1563  +t25: U32,
1564  +t26: U32,
1565  +t27: U32,
1566  +t28: U32,
1567  +t29: U32,
1568  +t30: U32,
1569  +byte_length: Nat,
1570  +extra: Nat,
1571  state: S.State
1572) -> S.State:
1573  fips_compress16(pack(t0, t1, t2, t3), pack(t4, t5, t6, t7), pack(t8, t9, t10, t11), pack(t12, t13, t14, t15), pack(t16, t17, t18, t19), pack(t20, t21, t22, t23), pack(t24, t25, t26, t27), pack(t28, t29, t30, 128), pack(0, 0, 0, 0), pack(0, 0, 0, 0), pack(0, 0, 0, 0), pack(0, 0, 0, 0), pack(0, 0, 0, 0), pack(0, 0, 0, 0), len_hi(byte_length), len_lo(byte_length),
1574    extra, state)