diff --git a/x05-rq/src/rq.erl b/x05-rq/src/rq.erl index a2900e7..25fd510 100644 --- a/x05-rq/src/rq.erl +++ b/x05-rq/src/rq.erl @@ -40,6 +40,8 @@ help_screen() -> rq my tuples my rbx_tuples rq query ak_... hz:acc("ak_...") rq query ct_... hz:contract("ak_...") + rq lookup NAME + rq register NAME rq src names.aes print contract source rq src rubicon.aes print contract source """. @@ -76,6 +78,8 @@ rq_II(Args) -> ["my", "akstr"] -> rq_my(akstr); ["my", "rbx_tuples"] -> rq_my(rbx_tuples); ["my", "tuples"] -> rq_my(rbx_tuples); + ["lookup", Name] -> rq_lookup(Name); + ["register", Name] -> rq_register(Name); ["query" | Args2] -> rq_query(Args2); ["src" | Args2] -> rq_src(Args2); ["-h" | Args2] -> rq_help(Args2); @@ -172,7 +176,19 @@ dbg_rct() -> io:format(Format, Args). -%du_register( +rq_register(Name) -> + {ok, CallTx} = hz:contract_call(my_akstr(), nct_aaci(), nct_ctstr(), "register", [Name]), + {ok, SignedTx} = hz:sign_tx(CallTx, my_secret_key()), + {ok, Result} = hz:post_tx(SignedTx), + io:format("~tp~n", [Result]). + +rq_lookup(Name) -> + {ok, CallTx} = hz:contract_call(my_akstr(), nct_aaci(), nct_ctstr(), "lookup", {erlang, [Name]}), + SignedTx = hz:sign_tx(CallTx, my_secret_key()), + {ok, Result} = hz:post_tx(SignedTx), + io:format("~tp~n", [Result]). + + %% name contract deployed address nct_ctstr() ->