Match on more messages, verup dependencies/

src/gajumine.erl

@@ -3,7 +3,7 @@
 %%% @end
 
 -module(gajumine).
--vsn("0.3.0").
+-vsn("0.3.1").
 -behavior(application).
 -author("Craig Everett <craigeverett@qpq.swiss>").
 -copyright("QPQ AG <craigeverett@qpq.swiss>").

src/gmc_con.erl

@@ -3,7 +3,7 @@
 %%% @end
 
 -module(gmc_con).
--vsn("0.3.0").
+-vsn("0.3.1").
 -author("Craig Everett <craigeverett@qpq.swiss>").
 -copyright("QPQ AG <craigeverett@qpq.swiss>").
 -license("GPL-3.0-or-later").

src/gmc_conf.erl

@@ -3,7 +3,7 @@
 %%% @end
 
 -module(gmc_conf).
--vsn("0.3.0").
+-vsn("0.3.1").
 -author("Craig Everett <craigeverett@qpq.swiss>").
 -copyright("QPQ AG <craigeverett@qpq.swiss>").
 -license("GPL-3.0-or-later").

src/gmc_gui.erl

@@ -3,7 +3,7 @@
 %%% @end
 
 -module(gmc_gui).
--vsn("0.3.0").
+-vsn("0.3.1").
 -author("Craig Everett <craigeverett@qpq.swiss>").
 -copyright("QPQ AG <craigeverett@qpq.swiss>").
 -license("GPL-3.0-or-later").
@@ -296,6 +296,28 @@ do_message({connected, _}, State) ->
 do_message({disconnected, _}, State) ->
     Entry = "\nDisconnected!",
     do_message2(Entry, State);
+do_message({error, #{info := #{info := #{error := get_failed, data := {error, #{code := 404}}, url := URL}}}}, State) ->
+    ID =
+        case uri_string:parse(URL) of
+            #{path := Path} ->
+                lists:last(string:split(Path, "/", trailing));
+            {error, Reason, Info} ->
+                ok = log(warning, "uri_string:parse/1 failed with: ~p: ~p", [Reason, Info]),
+                "UNKNOWN"
+        end,
+    Format =
+        "\nLookup for mining ID ~s failed."
+        "\nCheck that you have joined the hive and have your account ID configured correctly.",
+    Entry = io_lib:format(Format, [ID]),
+    do_message2(Entry, State);
+do_message({error, #{info := #{info := #{error := get_failed, data := {error, #{code := 443}}}}}}, State) ->
+    Entry =
+        "\nThis system is not providing the needed TLS CA Certificate."
+        "\nlease contact the support community and let them know you have a 443 error with GajuMine.",
+    do_message2(Entry, State);
+do_message({error, #{info := #{info := #{error := connect_failure, data := {error, failed}}, module := gmhc_eureka}}}, State) ->
+    Entry = "\nConnection terminated. Retrying.",
+    do_message2(Entry, State);
 do_message(Terms, State) ->
     tell(info, "~p", [Terms]),
     Entry = io_lib:format("~n~tp", [Terms]),

src/gmc_sup.erl

@@ -12,7 +12,7 @@
 %%% @end
 
 -module(gmc_sup).
--vsn("0.3.0").
+-vsn("0.3.1").
 -behaviour(supervisor).
 -author("Craig Everett <craigeverett@qpq.swiss>").
 -copyright("QPQ AG <craigeverett@qpq.swiss>").