[GR-48281] InternalResource lookup fails on platform where ProcessProperties#getExecutableName is not available.

PullRequest: graal/15370

Author: tzezula

substratevm/src/com.oracle.svm.truffle/src/com/oracle/svm/truffle/TruffleBaseFeature.java

@@ -1374,6 +1374,21 @@ final class Target_com_oracle_truffle_polyglot_InternalResourceCache {
      */
     @Alias @RecomputeFieldValue(kind = Kind.Reset) //
     private static volatile Pair<Path, Boolean> cacheRoot;
+
+    @Alias @RecomputeFieldValue(kind = Kind.Custom, declClass = UseInternalResourcesComputer.class, isFinal = true) //
+    private static boolean useInternalResources;
+
+    private static final class UseInternalResourcesComputer implements FieldValueTransformerWithAvailability {
+        @Override
+        public ValueAvailability valueAvailability() {
+            return ValueAvailability.BeforeAnalysis;
+        }
+
+        @Override
+        public Object transform(Object receiver, Object originalValue) {
+            return TruffleBaseFeature.Options.CopyLanguageResources.getValue();
+        }
+    }
 }
 
 @TargetClass(className = "com.oracle.truffle.polyglot.InternalResourceCache$ResettableCachedRoot", onlyWith = TruffleBaseFeature.IsEnabled.class)

truffle/src/com.oracle.truffle.polyglot/src/com/oracle/truffle/polyglot/InternalResourceCache.java

@@ -302,18 +302,31 @@ private static Path findCacheRootOnNativeImage() {
         Pair<Path, Boolean> res = cacheRoot;
         if (res == null) {
             assert ImageInfo.inImageRuntimeCode() : "Can be called only in the native-image execution time.";
-            Path executable = Path.of(ProcessProperties.getExecutableName());
-            Path parent = executable.getParent();
-            if (parent == null) {
-                throw new IllegalStateException("Could not locate native-image resources.");
-            }
-            Path cache = parent.resolve("resources");
+            Path executable = getExecutablePath();
+            Path cache = executable.resolveSibling("resources");
             res = Pair.create(cache, false);
             cacheRoot = res;
         }
         return res.getLeft();
     }
 
+    private static Path getExecutablePath() {
+        assert ImageInfo.inImageRuntimeCode();
+        if (useInternalResources) {
+            return Path.of(ProcessProperties.getExecutableName());
+        } else {
+            throw new IllegalArgumentException("Lookup an executable name is restricted. " +
+                            "To enable it, use '-H:+CopyLanguageResources' during the native image build.");
+        }
+    }
+
+    /**
+     * Recomputed before the analyses by a substitution in the {@code TruffleBaseFeature} based on
+     * the {@code CopyLanguageResources} option value. The field must not be declared as
+     * {@code final} to make the substitution function correctly.
+     */
+    private static boolean useInternalResources = true;
+
     /**
      * Collects optional internal resources for native-image build. This method is called
      * reflectively by the {@code TruffleBaseFeature#initializeTruffleReflectively}.