This commit is contained in:
Craig Everett 2025-04-16 15:58:19 +09:00
parent c7fbe0cb41
commit 5c2fa92060
3 changed files with 34 additions and 30 deletions

View File

@ -486,11 +486,15 @@ code_change(_, State, _) ->
{ok, State}. {ok, State}.
terminate(normal, _) -> terminate(Reason, _) ->
zx:stop(); ok = log(info, "Reason: ~p,", [Reason]),
terminate(Reason, State) -> case whereis(gmc_con) of
ok = log(info, "Reason: ~tp, State: ~tp", [Reason, State]), undefined ->
zx:stop(). zx:stop();
PID ->
ok = log(info, "gd_con found at: ~p", [PID]),
application:stop(gajumine)
end.
@ -882,7 +886,7 @@ do_recover_key(Mnemonic, State) ->
do_recover_key2(Seed, State = #s{wallet = Current, wallets = Wallets, pass = Pass}) -> do_recover_key2(Seed, State = #s{wallet = Current, wallets = Wallets, pass = Pass}) ->
#wallet{name = WalletName, keys = Keys, poas = POAs} = Current, #wallet{name = WalletName, keys = Keys, poas = POAs} = Current,
Recovered = #key{id = ID, name = AccName} = hz_key_master:make_key("", Seed), Recovered = #key{id = ID, name = AccName} = hz_key_master:make_key(Seed),
case lists:keymember(ID, #key.id, Keys) of case lists:keymember(ID, #key.id, Keys) of
false -> false ->
NewKeys = [Recovered | Keys], NewKeys = [Recovered | Keys],

View File

@ -32,7 +32,7 @@
{wx = none :: none | wx:wx_object(), {wx = none :: none | wx:wx_object(),
frame = none :: none | wx:wx_object(), frame = none :: none | wx:wx_object(),
sizer = none :: none | wx:wx_object(), sizer = none :: none | wx:wx_object(),
lang = en :: en | jp, lang = en_US :: en_US | ja_JP,
j = none :: none | fun(), j = none :: none | fun(),
prefs = #{} :: #{atom() := term()}, prefs = #{} :: #{atom() := term()},
accounts = [] :: [gajudesk:poa()], accounts = [] :: [gajudesk:poa()],
@ -84,7 +84,7 @@ start_link(Accounts) ->
init(Prefs) -> init(Prefs) ->
ok = log(info, "GUI starting..."), ok = log(info, "GUI starting..."),
Lang = maps:get(lang, Prefs, en_us), Lang = maps:get(lang, Prefs, en_US),
Trans = gd_jt:read_translations(?MODULE), Trans = gd_jt:read_translations(?MODULE),
J = gd_jt:j(Lang, Trans), J = gd_jt:j(Lang, Trans),

View File

@ -1198,22 +1198,22 @@ make_arg_fields(ScrollWin, GridSz, Args, NS, J) ->
% tell(info, "~p Arg: ~p, Type: ~p", [?LINE, AN, T]), % tell(info, "~p Arg: ~p, Type: ~p", [?LINE, AN, T]),
ANT = wxStaticText:new(ScrollWin, ?wxID_ANY, AN), ANT = wxStaticText:new(ScrollWin, ?wxID_ANY, AN),
TCT = wxTextCtrl:new(ScrollWin, ?wxID_ANY), TCT = wxTextCtrl:new(ScrollWin, ?wxID_ANY),
_ = wxFlexGridSizer:add(GridSz, ANT, fill()), _ = wxFlexGridSizer:add(GridSz, ANT, fill()),
_ = wxFlexGridSizer:add(GridSz, TCT, fill()), _ = wxFlexGridSizer:add(GridSz, TCT, fill()),
{T, TCT}; {T, TCT};
({T, already_normalized, T}) -> ({T, already_normalized, T}) ->
% tell(info, "~p Type: ~p", [?LINE, T]), % tell(info, "~p Type: ~p", [?LINE, T]),
ANT = wxStaticText:new(ScrollWin, ?wxID_ANY, atom_to_list(T)), ANT = wxStaticText:new(ScrollWin, ?wxID_ANY, atom_to_list(T)),
TCT = wxTextCtrl:new(ScrollWin, ?wxID_ANY), TCT = wxTextCtrl:new(ScrollWin, ?wxID_ANY),
_ = wxFlexGridSizer:add(GridSz, ANT, fill()), _ = wxFlexGridSizer:add(GridSz, ANT, fill()),
_ = wxFlexGridSizer:add(GridSz, TCT, fill()), _ = wxFlexGridSizer:add(GridSz, TCT, fill()),
{T, TCT}; {T, TCT};
({AN, {_TypeName, T, T}}) -> ({AN, {_TypeName, T, T}}) ->
% tell(info, "~p Arg: ~p, ~p: ~p", [?LINE, AN, TypeName, T]), % tell(info, "~p Arg: ~p, ~p: ~p", [?LINE, AN, TypeName, T]),
ANT = wxStaticText:new(ScrollWin, ?wxID_ANY, AN), ANT = wxStaticText:new(ScrollWin, ?wxID_ANY, AN),
TCT = wxTextCtrl:new(ScrollWin, ?wxID_ANY), TCT = wxTextCtrl:new(ScrollWin, ?wxID_ANY),
_ = wxFlexGridSizer:add(GridSz, ANT, fill()), _ = wxFlexGridSizer:add(GridSz, ANT, fill()),
_ = wxFlexGridSizer:add(GridSz, TCT, fill()), _ = wxFlexGridSizer:add(GridSz, TCT, fill()),
{T, TCT}; {T, TCT};
({AN, {_TypeName, already_normalized, {record, InnerArgs}}}) -> ({AN, {_TypeName, already_normalized, {record, InnerArgs}}}) ->
% tell(info, "~p Arg: ~p, ~p: ~p", [?LINE, AN, TypeName, InnerArgs]), % tell(info, "~p Arg: ~p, ~p: ~p", [?LINE, AN, TypeName, InnerArgs]),
@ -1222,8 +1222,8 @@ make_arg_fields(ScrollWin, GridSz, Args, NS, J) ->
ok = wxFlexGridSizer:setFlexibleDirection(InnerSz, ?wxHORIZONTAL), ok = wxFlexGridSizer:setFlexibleDirection(InnerSz, ?wxHORIZONTAL),
ok = wxFlexGridSizer:addGrowableCol(InnerSz, 1), ok = wxFlexGridSizer:addGrowableCol(InnerSz, 1),
AFs = make_arg_fields(ScrollWin, InnerSz, InnerArgs, NS, J), AFs = make_arg_fields(ScrollWin, InnerSz, InnerArgs, NS, J),
_ = wxFlexGridSizer:add(GridSz, ANT, fill()), _ = wxFlexGridSizer:add(GridSz, ANT, fill()),
_ = wxFlexGridSizer:add(GridSz, InnerSz, fill()), _ = wxFlexGridSizer:add(GridSz, InnerSz, fill()),
{record, AFs}; {record, AFs};
({AN, {_TypeName, already_normalized, {tuple, InnerArgs}}}) -> ({AN, {_TypeName, already_normalized, {tuple, InnerArgs}}}) ->
% tell(info, "~p Arg: ~p, ~p: ~p", [?LINE, AN, TypeName, InnerArgs]), % tell(info, "~p Arg: ~p, ~p: ~p", [?LINE, AN, TypeName, InnerArgs]),
@ -1232,8 +1232,8 @@ make_arg_fields(ScrollWin, GridSz, Args, NS, J) ->
ok = wxFlexGridSizer:setFlexibleDirection(InnerSz, ?wxHORIZONTAL), ok = wxFlexGridSizer:setFlexibleDirection(InnerSz, ?wxHORIZONTAL),
ok = wxFlexGridSizer:addGrowableCol(InnerSz, 1), ok = wxFlexGridSizer:addGrowableCol(InnerSz, 1),
AFs = make_arg_fields(ScrollWin, InnerSz, InnerArgs, NS, J), AFs = make_arg_fields(ScrollWin, InnerSz, InnerArgs, NS, J),
_ = wxFlexGridSizer:add(GridSz, ANT, fill()), _ = wxFlexGridSizer:add(GridSz, ANT, fill()),
_ = wxFlexGridSizer:add(GridSz, InnerSz, fill()), _ = wxFlexGridSizer:add(GridSz, InnerSz, fill()),
{tuple, AFs}; {tuple, AFs};
({AN, {_TypeName, already_normalized, {list, InnerArgs}}}) -> ({AN, {_TypeName, already_normalized, {list, InnerArgs}}}) ->
% tell(info, "~p Arg: ~p, ~p: ~p", [?LINE, AN, TypeName, InnerArgs]), % tell(info, "~p Arg: ~p, ~p: ~p", [?LINE, AN, TypeName, InnerArgs]),
@ -1247,8 +1247,8 @@ make_arg_fields(ScrollWin, GridSz, Args, NS, J) ->
AB = #w{name = {AN, add}, id = wxButton:getId(B), wx = B}, AB = #w{name = {AN, add}, id = wxButton:getId(B), wx = B},
_ = wxBoxSizer:add(ArgSz, InnerSz, fill()), _ = wxBoxSizer:add(ArgSz, InnerSz, fill()),
_ = wxBoxSizer:add(ArgSz, B, fill()), _ = wxBoxSizer:add(ArgSz, B, fill()),
_ = wxFlexGridSizer:add(GridSz, ANT, fill()), _ = wxFlexGridSizer:add(GridSz, ANT, fill()),
_ = wxFlexGridSizer:add(GridSz, ArgSz, fill()), _ = wxFlexGridSizer:add(GridSz, ArgSz, fill()),
{list, AFs, AB}; {list, AFs, AB};
({AN, {_TypeName, already_normalized, T}}) -> ({AN, {_TypeName, already_normalized, T}}) ->
% tell(info, "~p Arg: ~p, ~p: ~p", [?LINE, AN, TypeName, T]), % tell(info, "~p Arg: ~p, ~p: ~p", [?LINE, AN, TypeName, T]),
@ -1257,8 +1257,8 @@ make_arg_fields(ScrollWin, GridSz, Args, NS, J) ->
ok = wxFlexGridSizer:setFlexibleDirection(InnerSz, ?wxHORIZONTAL), ok = wxFlexGridSizer:setFlexibleDirection(InnerSz, ?wxHORIZONTAL),
ok = wxFlexGridSizer:addGrowableCol(InnerSz, 1), ok = wxFlexGridSizer:addGrowableCol(InnerSz, 1),
AFs = make_arg_fields(ScrollWin, InnerSz, T, NS, J), AFs = make_arg_fields(ScrollWin, InnerSz, T, NS, J),
_ = wxFlexGridSizer:add(GridSz, ANT, fill()), _ = wxFlexGridSizer:add(GridSz, ANT, fill()),
_ = wxFlexGridSizer:add(GridSz, InnerSz, fill()), _ = wxFlexGridSizer:add(GridSz, InnerSz, fill()),
{tuple, AFs}; {tuple, AFs};
({AN, {{tuple, _}, already_normalized, {tuple, InnerArgs}}}) -> ({AN, {{tuple, _}, already_normalized, {tuple, InnerArgs}}}) ->
% tell(info, "~p Arg: ~p, Tuple: ~p", [?LINE, AN, InnerArgs]), % tell(info, "~p Arg: ~p, Tuple: ~p", [?LINE, AN, InnerArgs]),
@ -1267,8 +1267,8 @@ make_arg_fields(ScrollWin, GridSz, Args, NS, J) ->
ok = wxFlexGridSizer:setFlexibleDirection(InnerSz, ?wxHORIZONTAL), ok = wxFlexGridSizer:setFlexibleDirection(InnerSz, ?wxHORIZONTAL),
ok = wxFlexGridSizer:addGrowableCol(InnerSz, 1), ok = wxFlexGridSizer:addGrowableCol(InnerSz, 1),
AFs = make_arg_fields(ScrollWin, InnerSz, InnerArgs, NS, J), AFs = make_arg_fields(ScrollWin, InnerSz, InnerArgs, NS, J),
_ = wxFlexGridSizer:add(GridSz, ANT, fill()), _ = wxFlexGridSizer:add(GridSz, ANT, fill()),
_ = wxFlexGridSizer:add(GridSz, InnerSz, fill()), _ = wxFlexGridSizer:add(GridSz, InnerSz, fill()),
{tuple, AFs}; {tuple, AFs};
({AN, {{list, _}, already_normalized, {list, InnerArgs}}}) -> ({AN, {{list, _}, already_normalized, {list, InnerArgs}}}) ->
% tell(info, "~p Arg: ~p, List: ~p", [?LINE, AN, InnerArgs]), % tell(info, "~p Arg: ~p, List: ~p", [?LINE, AN, InnerArgs]),
@ -1282,8 +1282,8 @@ make_arg_fields(ScrollWin, GridSz, Args, NS, J) ->
AB = #w{name = {AN, add}, id = wxButton:getId(B), wx = B}, AB = #w{name = {AN, add}, id = wxButton:getId(B), wx = B},
_ = wxBoxSizer:add(ArgSz, InnerSz, fill()), _ = wxBoxSizer:add(ArgSz, InnerSz, fill()),
_ = wxBoxSizer:add(ArgSz, B, fill()), _ = wxBoxSizer:add(ArgSz, B, fill()),
_ = wxFlexGridSizer:add(GridSz, ANT, fill()), _ = wxFlexGridSizer:add(GridSz, ANT, fill()),
_ = wxFlexGridSizer:add(GridSz, ArgSz, fill()), _ = wxFlexGridSizer:add(GridSz, ArgSz, fill()),
{list, AFs, AB}; {list, AFs, AB};
({{tuple, _}, already_normalized, {tuple, InnerArgs}}) -> ({{tuple, _}, already_normalized, {tuple, InnerArgs}}) ->
% tell(info, "~p Tuple: ~p", [?LINE, InnerArgs]), % tell(info, "~p Tuple: ~p", [?LINE, InnerArgs]),
@ -1292,8 +1292,8 @@ make_arg_fields(ScrollWin, GridSz, Args, NS, J) ->
ok = wxFlexGridSizer:setFlexibleDirection(InnerSz, ?wxHORIZONTAL), ok = wxFlexGridSizer:setFlexibleDirection(InnerSz, ?wxHORIZONTAL),
ok = wxFlexGridSizer:addGrowableCol(InnerSz, 1), ok = wxFlexGridSizer:addGrowableCol(InnerSz, 1),
AFs = make_arg_fields(ScrollWin, InnerSz, InnerArgs, NS, J), AFs = make_arg_fields(ScrollWin, InnerSz, InnerArgs, NS, J),
_ = wxFlexGridSizer:add(GridSz, ANT, fill()), _ = wxFlexGridSizer:add(GridSz, ANT, fill()),
_ = wxFlexGridSizer:add(GridSz, InnerSz, fill()), _ = wxFlexGridSizer:add(GridSz, InnerSz, fill()),
{tuple, AFs}; {tuple, AFs};
({{list, _}, already_normalized, {list, InnerArgs}}) -> ({{list, _}, already_normalized, {list, InnerArgs}}) ->
% tell(info, "~p List: ~p", [?LINE, InnerArgs]), % tell(info, "~p List: ~p", [?LINE, InnerArgs]),
@ -1307,8 +1307,8 @@ make_arg_fields(ScrollWin, GridSz, Args, NS, J) ->
AB = #w{name = {list, add}, id = wxButton:getId(B), wx = B}, AB = #w{name = {list, add}, id = wxButton:getId(B), wx = B},
_ = wxBoxSizer:add(ArgSz, InnerSz, [{proportion, 1}, {flag, ?wxEXPAND}]), _ = wxBoxSizer:add(ArgSz, InnerSz, [{proportion, 1}, {flag, ?wxEXPAND}]),
_ = wxBoxSizer:add(ArgSz, B, fill()), _ = wxBoxSizer:add(ArgSz, B, fill()),
_ = wxFlexGridSizer:add(GridSz, ANT, fill()), _ = wxFlexGridSizer:add(GridSz, ANT, fill()),
_ = wxFlexGridSizer:add(GridSz, ArgSz, fill()), _ = wxFlexGridSizer:add(GridSz, ArgSz, fill()),
{list, AFs, AB} {list, AFs, AB}
end, end,
lists:map(MakeArgField, Args). lists:map(MakeArgField, Args).