2020-11-09 15:29:30 +03:00
|
|
|
/- *btc, bws=btc-wallet-store, bp=btc-provider
|
2020-10-24 19:13:36 +03:00
|
|
|
|%
|
2020-11-28 10:25:32 +03:00
|
|
|
:: btc-state: state from the provider; t is last update time
|
2020-11-04 16:55:47 +03:00
|
|
|
:: req-id: hash of [xpub chyg idx]
|
2020-11-28 10:25:32 +03:00
|
|
|
:: reqs: lookup of req-id -> requests from wallet-store+blockcount
|
|
|
|
:: blockcount included so that we only request address info when
|
|
|
|
:: there's a newer block, in the case of addresses we are cooking
|
2020-11-17 11:25:50 +03:00
|
|
|
::
|
2020-11-30 11:27:49 +03:00
|
|
|
:: payment: a payment expected from another ship
|
2020-11-17 11:25:50 +03:00
|
|
|
:: - address: address generated for this payment
|
2020-11-20 14:58:27 +03:00
|
|
|
:: piym: incoming payments. Stores all ship moons under their planet.
|
2020-11-16 20:47:00 +03:00
|
|
|
:: piym-watch/poym-watch:
|
2020-11-19 18:54:01 +03:00
|
|
|
:: let us link an address back to its incoming/outgoing payment
|
2020-12-03 12:47:54 +03:00
|
|
|
:: checked when address updates come from btc-wallet-store
|
2020-11-04 16:55:47 +03:00
|
|
|
::
|
2020-12-03 12:47:54 +03:00
|
|
|
+$ btc-state [block=@ud fee=sats t=@da]
|
|
|
|
+$ reqs (map req-id:bp req=request:bws)
|
2020-11-17 11:25:50 +03:00
|
|
|
::
|
|
|
|
+$ payment [=address payer=ship value=sats]
|
2020-11-16 20:47:00 +03:00
|
|
|
::
|
|
|
|
+$ piym (jar ship payment)
|
|
|
|
+$ piym-watch (map address ship)
|
|
|
|
+$ poym-watch (map address ship)
|
2020-11-26 12:38:30 +03:00
|
|
|
:: req-pay-address: request a payment address from another ship
|
|
|
|
:: gen-pay-address: generate a payment address from our ship to another
|
2020-11-16 20:47:00 +03:00
|
|
|
::
|
2020-10-24 19:13:36 +03:00
|
|
|
+$ action
|
2020-11-04 16:55:47 +03:00
|
|
|
$% [%set-provider provider=ship]
|
2020-11-17 11:25:50 +03:00
|
|
|
[%set-default-wallet ~]
|
2020-11-26 12:38:30 +03:00
|
|
|
[%req-pay-address payee=ship value=sats feyb=(unit sats)]
|
|
|
|
[%gen-pay-address value=sats]
|
2020-11-19 18:21:32 +03:00
|
|
|
[%ret-pay-address =address payer=ship value=sats]
|
2020-11-26 12:38:30 +03:00
|
|
|
[%clear-poym ~]
|
2020-11-09 18:34:29 +03:00
|
|
|
[%force-retry ~]
|
2020-10-24 19:13:36 +03:00
|
|
|
==
|
2020-11-20 18:57:19 +03:00
|
|
|
+$ request
|
2020-11-22 15:57:25 +03:00
|
|
|
$% [%sign-tx txbu:bws]
|
2020-11-20 18:57:19 +03:00
|
|
|
==
|
2020-10-24 19:13:36 +03:00
|
|
|
--
|