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

fine: set and handle the response bit correctly

Browse Source
This commit is contained in:
fang 2022-01-24 23:06:06 +01:00
parent 176aa3a45e
commit 03b73b85bf
No known key found for this signature in database
GPG Key ID: EB035760C1BBA972
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
pkg/arvo/sys/vane/fine.hoon
View File

@ -102,8 +102,9 @@
|= [=path num=@ud]
^- hoot ^- @
=+ bod=(request-body path num)
=+ con=(can 3 64^(sign:keys dat.bod) bod ~)
(encode-packet [our ~zod] (mod life:keys 16) 0b0 ~ con)
=+ syn=(can 3 64^(sign:keys dat.bod) bod ~)
%+ con 0b100 ::NOTE request bit
(encode-packet [our ~zod] (mod life:keys 16) 0b0 ~ syn)
::
++ encode-response
|= [=path data=(unit (cask))]
@ -338,8 +339,8 @@
%purr
^- (quip move _state)
=/ =packet:ames (decode-packet `@ux`purr.task)
=/ req=? =(& (cut 0 [2 1] purr.task))
?: req
=/ resp=? =(& (cut 0 [2 1] purr.task))
?. resp
::TODO crash instead, scry/peek should be used for this
=/ =twit (decode-request `@ux`content.packet)
::TODO verify request signature