Other JVM logging can be performed from other thread (#14836)

Author: JaroslavTulach

lib/java/jvm-interop/src/main/java/org/enso/jvm/interop/impl/OtherJvmLogger.java

@@ -2,7 +2,10 @@
 
 import com.oracle.truffle.api.interop.InteropLibrary;
 import java.util.ArrayList;
+import java.util.Collections;
+import java.util.EnumMap;
 import java.util.List;
+import java.util.Map;
 import java.util.Queue;
 import java.util.ResourceBundle;
 import java.util.concurrent.ConcurrentLinkedQueue;
@@ -112,6 +115,8 @@ private String formatMsg() {
 
   private final class LoggerImpl implements System.Logger {
     private final String name;
+    private final Map<Level, Boolean> loggable =
+        Collections.synchronizedMap(new EnumMap<>(Level.class));
 
     LoggerImpl(String name) {
       this.name = name;
@@ -127,9 +132,18 @@ public boolean isLoggable(Level level) {
       if ("org.enso.persist".equals(name)) {
         return level.compareTo(Level.INFO) >= 0;
       }
+      var prev = loggable.get(level);
+      if (prev != null) {
+        return prev;
+      }
       var check = new LogCheck(name, level.getSeverity());
-      var b = channel.execute(Boolean.class, check);
-      return b;
+      try {
+        var b = channel.execute(Boolean.class, check);
+        loggable.put(level, b);
+        return b;
+      } catch (WrongThreadException ex) {
+        return true;
+      }
     }
 
     @Override

test/Base_Tests/polyglot-sources/enso-test-java-helpers/src/main/java/org/enso/base_test_helpers/LoggerHelper.java

@@ -0,0 +1,33 @@
+package org.enso.base_test_helpers;
+
+import java.util.concurrent.Callable;
+import java.util.concurrent.ExecutorService;
+import java.util.concurrent.Executors;
+
+public class LoggerHelper {
+  private static final System.Logger LOG = System.getLogger(LoggerHelper.class.getName());
+  private static final ExecutorService EXEC =
+      Executors.newSingleThreadExecutor(
+          (r) -> {
+            var t = new Thread(r, "LoggerHelper");
+            t.setDaemon(true);
+            return t;
+          });
+
+  public static boolean isLoggableAsync(System.Logger.Level level) throws Exception {
+    final Callable<Boolean> action =
+        () -> {
+          return LOG.isLoggable(level);
+        };
+    return EXEC.submit(action).get();
+  }
+
+  public static void logAsync(System.Logger.Level level, String msg) throws Exception {
+    final Callable<Void> action =
+        () -> {
+          LOG.log(level, msg);
+          return null;
+        };
+    EXEC.submit(action).get();
+  }
+}

test/Base_Tests/src/Logging_Spec.enso

@@ -7,6 +7,9 @@ from Standard.Test import all
 
 import project.Enso_Bin_Utils
 
+polyglot java import java.lang.System.Logger.Level
+polyglot java import org.enso.base_test_helpers.LoggerHelper
+
 type Type_In_Private_Module
 
 add_specs suite_builder = suite_builder.group "Logging" group_builder->
@@ -24,6 +27,13 @@ add_specs suite_builder = suite_builder.group "Logging" group_builder->
         Type_In_Private_Module.log_message "Hidden message" Log_Level.Finest
         Type_In_Private_Module.log_message "Less hidden message" Log_Level.Fine
 
+    group_builder.specify "is logging asynchronously" <|
+        LoggerHelper.isLoggableAsync Level.ERROR . should_be_true
+
+    group_builder.specify "log asynchronously" <|
+        LoggerHelper.logAsync Level.TRACE "Not visible"
+        LoggerHelper.logAsync Level.ERROR "Visible somewhere"
+
     enso_logging_prj_lazy = Ref.new lazy=True <|
         prj_dir = tmp_root / "default_logging"
         prj_dir.create_directory