feat(log): get the least severe level of handlers as the primary level

apps/emqx_machine/src/emqx_machine_schema.erl

@@ -244,8 +244,14 @@ tr_cluster__discovery(Conf) ->
     {Strategy, filter(options(Strategy, Conf))}.
 
 tr_logger_level(Conf) ->
-    io:format(standard_error, "TODO: use the lowest level of all the handlers as primary level~n", []),
+    ConsoleLevel = conf_get("log.console_handler.level", Conf, undefined),
-    conf_get("log.console_handler.level", Conf).
+    FileLevels = [conf_get("level", SubConf) || {_, SubConf}
+                    <- maps:to_list(conf_get("log.file_handlers", Conf, #{}))],
+    case FileLevels ++ [ConsoleLevel || ConsoleLevel =/= undefined] of
+        [] -> warning; %% warning is the default level we should use
+        Levels ->
+            least_severe_log_level(Levels)
+    end.
 
 tr_logger(Conf) ->
     %% For the default logger that outputs to console
@@ -365,6 +371,17 @@ log_filter(Conf) ->
         progress -> []
     end.
 
+least_severe_log_level(Levels) ->
+    hd(sort_log_levels(Levels)).
+
+sort_log_levels(Levels) ->
+    lists:sort(fun(A, B) ->
+            case logger:compare_levels(A, B) of
+                R when R == lt; R == eq -> true;
+                gt -> false
+            end
+        end, Levels).
+
 %% utils
 -spec(conf_get(string() | [string()], hocon:config()) -> term()).
 conf_get(Key, Conf) ->