urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-12-20 01:01:37 +03:00
Code Issues Packages Projects Releases Wiki Activity

jets: cache hmac hashing gate

Browse Source
This commit is contained in:
fang 2021-11-23 13:43:41 +01:00 committed by GitHub
parent 28cc660998
commit 0b29377812
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
pkg/urbit/jets/e/hmac.c
View File

@ -17,13 +17,17 @@
{
c3_assert(_(u3a_is_cat(boq)) && _(u3a_is_cat(wik)) && _(u3a_is_cat(wid)));
// prep the hashing gate
u3j_site sit_u;
u3j_gate_prep(&sit_u, u3k(haj));
// ensure key and message fit signaled lengths
key = u3qc_end(3, wik, key);
dat = u3qc_end(3, wid, dat);
// keys longer than block size are shortened by hashing
if (wik > boq) {
key = u3n_slam_on(u3k(haj), u3nc(wik, key));
key = u3j_gate_slam(&sit_u, u3nc(wik, key));
wik = out;
}
@ -47,12 +51,13 @@
// append inner padding to message, then hash
u3_atom innmsg = u3ka_add(u3kc_lsh(3, wid, innkey), dat);
u3_atom innhaj = u3n_slam_on(u3k(haj), u3nc((wid + boq), innmsg));
u3_atom innhaj = u3j_gate_slam(&sit_u, u3nc((wid + boq), innmsg));
// prepend outer padding to result, hash again
u3_atom outmsg = u3ka_add(u3kc_lsh(3, out, outkey), innhaj);
u3_atom outhaj = u3n_slam_on(u3k(haj), u3nc((out + boq), outmsg));
u3_atom outhaj = u3j_gate_slam(&sit_u, u3nc((out + boq), outmsg));
u3j_gate_lose(&sit_u);
return outhaj;
}