bitcoin-libs: added more jet hints

This commit is contained in:
Logan Allen 2021-06-23 16:28:28 -05:00
parent 67092addc5
commit 19352d9b34
3 changed files with 15 additions and 7 deletions

View File

@ -189,21 +189,21 @@
::
++ on-arvo
~/ %on-arvo
|= [=wire =sign-arvo]
|= [wir=wire =sign-arvo]
|^
^- (quip card _this)
:: check for connectivity every 30 seconds
::
?: ?=([%ping-timer *] wire)
?: ?=([%ping-timer *] wir)
:_ this
:~ do-ping:hc
(start-ping-timer:hc ~s30)
==
=^ cards state
?+ +<.sign-arvo (on-arvo:def wire sign-arvo)
%http-response
(handle-rpc-response wire client-response.sign-arvo)
==
?+ +<.sign-arvo (on-arvo:def wir sign-arvo)
%http-response
(handle-rpc-response wir client-response.sign-arvo)
==
[cards this]
::
:: Handles HTTP responses from RPC servers. Parses for errors,

View File

@ -3,6 +3,7 @@
::
/- sur=bitcoin
=, sur
~% %bitcoin-utils-lib ..part ~
|%
::
:: TODO: move this bit/byt stuff to zuse
@ -12,6 +13,7 @@
:: +blop: munge bit and byt sequences (cat, flip, take, drop)
::
++ blop
~/ %blop
|_ =bloq
+$ biyts [wid=@ud dat=@]
++ cat
@ -48,6 +50,7 @@
++ byt ~(. blop 3)
::
++ bit
~/ %bit
=/ bl ~(. blop 0)
|%
++ cat cat:bl:bit
@ -100,6 +103,7 @@
:: hxb: hex parsing utilities
::
++ hxb
~/ %hxb
|%
++ from-cord
|= h=@t
@ -113,6 +117,7 @@
=+ (rsh [3 2] -)
:: Parse hex to atom
::
:: TODO: replace with (met 3 h)
:- (div (lent (trip h)) 2)
`@ux`(rash - hex)
::
@ -128,6 +133,7 @@
:: - decode: little endian to big endian
::
++ csiz
~/ %csiz
|%
++ en
|= a=@
@ -162,5 +168,4 @@
=> (de h)
[dat.n rest]
--
::
--

View File

@ -6,6 +6,7 @@
/+ bech32=bip-b173, pbt=bip-b174, bcu=bitcoin-utils, bip-b158
=, sur
=, bcu
~% %bitcoin-lib ..part ~
|%
++ overhead-weight ^-(vbytes 11)
++ input-weight
@ -40,6 +41,7 @@
:: adr: address manipulation
::
++ adr
~/ %adr
|%
++ get-bipt
|= a=address
@ -155,6 +157,7 @@
:: - ignores signatures in inputs
::
++ txu
~/ %txu
|%
++ en
|%