read_symlink: prefer native

Author: scivision

+stdlib/+native/read_symlink.m

@@ -111,8 +111,6 @@
           if stdlib.matlabOlderThan('R2024b') || ispc()
             continue
           end
-        case {'is_symlink', 'read_symlink'}
-          if stdlib.matlabOlderThan('R2024b'), continue, end
         case {'get_permissions', 'set_permissions'}
           if stdlib.matlabOlderThan('R2025a'), continue, end
       end

+stdlib/Backend.m

@@ -16,15 +16,22 @@
   backend (1,:) string = ["native", "java", "dotnet", "python", "sys"]
 end
 
-o = stdlib.Backend(mfilename(), backend);
 
-if isscalar(file)
-  r = o.func(file);
-else
-  r = arrayfun(o.func, file);
+if ismember('native', backend) || stdlib.strempty(backend)
+  try
+    [ok, r] = isSymbolicLink(file);
+    r(~ok) = "";
+    b = "native";
+    return
+  catch e
+    if e.identifier ~= "MATLAB:UndefinedFunction"
+      rethrow(e)
+    end
+  end
 end
 
+o = stdlib.Backend(mfilename(), backend);
 b = o.backend;
-
+r = o.func(file);
 
 end

+stdlib/read_symlink.m

@@ -15,7 +15,7 @@
 methods (TestParameterDefinition, Static)
 function [is_backend, rs_backend] = setupBackend()
   is_backend = cellstr(["native", init_backend('is_symlink')]);
-  rs_backend = init_backend('read_symlink');
+  rs_backend = cellstr(["native", init_backend('read_symlink')]);
 end
 end
 

example/BenchmarkSymlink.m

@@ -64,14 +64,6 @@ function test_read_symlink(tc, B_read_symlink)
 end
 
 
-function test_read_symlink_array(tc, B_read_symlink)
-r = stdlib.read_symlink([tc.link, mfilename() + ".m"], B_read_symlink);
-exp = [tc.target, ""];
-tc.verifyClass(r, 'string')
-tc.verifyEqual(r, exp, "failed to detect own link")
-end
-
-
 function test_create_symlink(tc, B_create_symlink)
 tc.applyFixture(matlab.unittest.fixtures.SuppressedWarningsFixture(["MATLAB:io:filesystem:symlink:TargetNotFound","MATLAB:io:filesystem:symlink:FileExists"]))