def fin24

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

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

1284# Apply SHA-256 round 24 to the compression state.
1285def fin24(
1286  +t0: U32,
1287  +t1: U32,
1288  +t2: U32,
1289  +t3: U32,
1290  +t4: U32,
1291  +t5: U32,
1292  +t6: U32,
1293  +t7: U32,
1294  +t8: U32,
1295  +t9: U32,
1296  +t10: U32,
1297  +t11: U32,
1298  +t12: U32,
1299  +t13: U32,
1300  +t14: U32,
1301  +t15: U32,
1302  +t16: U32,
1303  +t17: U32,
1304  +t18: U32,
1305  +t19: U32,
1306  +t20: U32,
1307  +t21: U32,
1308  +t22: U32,
1309  +t23: U32,
1310  +byte_length: Nat,
1311  +extra: Nat,
1312  state: S.State
1313) -> S.State:
1314  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(128, 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), pack(0, 0, 0, 0), pack(0, 0, 0, 0), len_hi(byte_length), len_lo(byte_length),
1315    extra, state)