@@ -68,16 +68,23 @@ export def send-funds [src: record, dest:record, amount: float] {
6868 ]
6969}
7070
71+ def --env set-up-recall-cli [private_key : string ] {
72+ let cfg = ($env .state.config.workdir | path join " networks.toml" )
73+ $env .RECALL_NETWORK_CONFIG_FILE = $cfg
74+ $env .RECALL_NETWORK = $env .state.config.network
75+ $env .RECALL_PRIVATE_KEY = $private_key
76+ }
77+
7178# WARNING: this command invokes `recall` CLI on your PATH!!!
7279export def set-network-admin [] {
73- let cfg = ( $env .state.config.workdir | path join " networks.toml " )
74- recall - c $cfg - n $env .state.config.network subnet config set-admin -- private-key $env .state.validator0.private_key $env .state.network_admin.address
80+ set-up-recall-cli $env .state.validator0.private_key
81+ recall subnet config set-admin $env .state.network_admin.address
7582}
7683
7784# WARNING: this command invokes `recall` CLI on your PATH!!!
7885export def set-network-config [] {
79- let cfg = ( $env .state.config.workdir | path join " networks.toml " )
80- recall - c $cfg - n $env .state.config.network subnet config set -- private-key $env .state.network_admin.private_key ... [
86+ set-up-recall-cli $env .state.validator0.private_key
87+ recall subnet config set ... [
8188 --blob-capacity (10 * 2 ** 40 )
8289 --token-credit-rate (1e36 )
8390 --blob-credit-debit-interval 600
@@ -87,3 +94,14 @@ export def set-network-config [] {
8794 --account-debit-batch-size 1000
8895 ]
8996}
97+
98+ export def run-recall-cli-test [] {
99+ set-up-recall-cli $env .state.faucet_owner.private_key
100+ recall account info
101+ recall account credit stats
102+ recall account credit buy 2
103+ recall account credit stats
104+ let addr = recall bucket create -- alias test1 | tee {print } | from json | get address | inspect
105+ recall bucket add - a $addr -- key a1 ./set-up-nu.sh
106+ recall bucket get - a $addr a1
107+ }
0 commit comments