urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-11-24 13:06:09 +03:00
Code Issues Packages Projects Releases Wiki Activity

bip32: adds network type option for xpub/priv

Browse Source
This commit is contained in:
yosoyubik 2020-06-07 15:03:46 +02:00
parent ba51599e15
commit 319a940c88
1 changed files with 23 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

29
pkg/arvo/lib/bip32.hoon
View File

@ -67,9 +67,9 @@
?> =(0 x) :: sanity check ?> =(0 x) :: sanity check
%. [d i p] %. [d i p]
=< set-metadata =< set-metadata
=+ v=(scag 4 t) =+ v=(swag [1 3] t)
?: =("xprv" v) (from-private k c) ?: =("prv" v) (from-private k c)
?: =("xpub" v) (from-public k c) ?: =("pub" v) (from-public k c)
!! !!
:: ::
++ set-metadata ++ set-metadata
@ -169,11 +169,13 @@
++ fingerprint (cut 3 [16 4] identity) ++ fingerprint (cut 3 [16 4] identity)
:: ::
++ prv-extended ++ prv-extended
%+ en-b58c-bip32 0x488.ade4 |= network=?(%main %regtest %testnet)
%+ en-b58c-bip32 (version-bytes network %prv %.y)
(build-extended private-key) (build-extended private-key)
:: ::
++ pub-extended ++ pub-extended
%+ en-b58c-bip32 0x488.b21e |= network=?(%main %regtest %testnet)
%+ en-b58c-bip32 (version-bytes network %pub %.y)
(build-extended public-key) (build-extended public-key)
:: ::
++ build-extended ++ build-extended
@ -188,6 +190,7 @@
:: ::
++ en-b58c-bip32 ++ en-b58c-bip32
|= [v=@ k=@] |= [v=@ k=@]
%- en-base58:mimes:html
(en-base58check [4 v] [74 k]) (en-base58check [4 v] [74 k])
:: ::
:: base58check :: base58check
@ -196,7 +199,6 @@
:: v: version bytes :: v: version bytes
:: d: data :: d: data
|= [v=byts d=byts] |= [v=byts d=byts]
%- en-base58:mimes:html
=+ p=[(add wid.v wid.d) (can 3 ~[d v])] =+ p=[(add wid.v wid.d) (can 3 ~[d v])]
=- (can 3 ~[4^- p]) =- (can 3 ~[4^- p])
%^ rsh 3 28 %^ rsh 3 28
@ -213,4 +215,19 @@
++ hash160 ++ hash160
|= d=@ |= d=@
(ripemd-160:ripemd:crypto 32 (sha-256:sha d)) (ripemd-160:ripemd:crypto 32 (sha-256:sha d))
::
++ version-bytes
|= [network=?(%main %regtest %testnet) type=?(%pub %prv) bip32=?]
^- @ux
|^
?- type
%pub ?:(bip32 xpub-key pay-to-pubkey)
%prv ?:(bip32 xprv-key private-key)
==
::
++ pay-to-pubkey ?:(=(network %main) 0x0 0x6f)
++ private-key ?:(=(network %main) 0x80 0xef)
++ xpub-key ?:(=(network %main) 0x488.b21e 0x435.87cf)
++ xprv-key ?:(=(network %main) 0x488.ade4 0x435.8394)
--
-- --