def fin38

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

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

1837# Apply SHA-256 round 38 to the compression state.
1838def fin38(
1839  +t0: U32,
1840  +t1: U32,
1841  +t2: U32,
1842  +t3: U32,
1843  +t4: U32,
1844  +t5: U32,
1845  +t6: U32,
1846  +t7: U32,
1847  +t8: U32,
1848  +t9: U32,
1849  +t10: U32,
1850  +t11: U32,
1851  +t12: U32,
1852  +t13: U32,
1853  +t14: U32,
1854  +t15: U32,
1855  +t16: U32,
1856  +t17: U32,
1857  +t18: U32,
1858  +t19: U32,
1859  +t20: U32,
1860  +t21: U32,
1861  +t22: U32,
1862  +t23: U32,
1863  +t24: U32,
1864  +t25: U32,
1865  +t26: U32,
1866  +t27: U32,
1867  +t28: U32,
1868  +t29: U32,
1869  +t30: U32,
1870  +t31: U32,
1871  +t32: U32,
1872  +t33: U32,
1873  +t34: U32,
1874  +t35: U32,
1875  +t36: U32,
1876  +t37: U32,
1877  +byte_length: Nat,
1878  +extra: Nat,
1879  state: S.State
1880) -> S.State:
1881  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, t31), pack(t32, t33, t34, t35), pack(t36, t37, 128, 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),
1882    extra, state)

Uses (7)

Used by (1)