is_symlink: choose_method

Author: scivision

+stdlib/+native/is_symlink.m

@@ -0,0 +1,5 @@
+function ok = is_symlink(file)
+
+ok = isSymbolicLink(file);
+
+end

+stdlib/is_symlink.m

@@ -1,33 +1,13 @@
 %% IS_SYMLINK is path a symbolic link
 
-function ok = is_symlink(p)
+function ok = is_symlink(file, method)
 arguments
-  p {mustBeTextScalar}
+  file {mustBeTextScalar}
+  method (1,:) string = ["native", "java", "dotnet", "python", "sys"]
 end
 
-if ~isMATLABReleaseOlderThan('R2024b')
-  ok = isSymbolicLink(p);
-elseif stdlib.has_dotnet()
-  ok = stdlib.dotnet.is_symlink(p);
-elseif stdlib.has_java()
-  ok = stdlib.java.is_symlink(p);
-elseif stdlib.has_python()
-  ok = stdlib.python.is_symlink(p);
-elseif stdlib.isoctave()
-  % use lstat() to work with a broken symlink, like Matlab isSymbolicLink
-  [s, err] = lstat(p);
-  ok = err == 0 && S_ISLNK(s.mode);
-else
-  ok = stdlib.sys.is_symlink(p);
-end
-
-end
+fun = choose_method(method, "is_symlink", 'R2024b');
 
+ok = fun(file);
 
-%!test
-%! if !ispc
-%! p = tempname();
-%! assert(create_symlink("is_symlink.m", p))
-%! assert(is_symlink(p), p)
-%! delete(p)
-%! endif
+end

test/TestSymlink.m

@@ -11,7 +11,7 @@
     {mfilename("fullpath") + ".m", false}, ...
     {"", false}};
 create_symlink_fun = {@stdlib.create_symlink, @stdlib.sys.create_symlink, @stdlib.dotnet.create_symlink, @stdlib.python.create_symlink}
-is_symlink_fun   = {@stdlib.is_symlink,   @stdlib.sys.is_symlink,   @stdlib.dotnet.is_symlink,   @stdlib.java.is_symlink,   @stdlib.python.is_symlink}
+is_symlink_fun = {'native', 'sys', 'dotnet', 'java', 'python'}
 read_symlink_fun = {@stdlib.read_symlink, @stdlib.sys.read_symlink, @stdlib.dotnet.read_symlink, @stdlib.java.read_symlink, @stdlib.python.read_symlink}
 end
 
@@ -45,10 +45,13 @@ function setup_symlink(tc)
 methods (Test, TestTags=["impure", "symlink"])
 
 function test_is_symlink(tc, p, is_symlink_fun)
-is_capable(tc, is_symlink_fun)
-
-tc.verifyTrue(is_symlink_fun(tc.link), "failed to detect own link")
-tc.verifyEqual(is_symlink_fun(p{1}), p{2}, p{1})
+tc.assertNotEmpty(which("stdlib." + is_symlink_fun + ".is_symlink"))
+try
+  tc.verifyTrue(stdlib.is_symlink(tc.link, is_symlink_fun), "failed to detect own link")
+  tc.verifyEqual(stdlib.is_symlink(p{1}, is_symlink_fun), p{2}, p{1})
+catch e
+  tc.verifyEqual(e.identifier, 'stdlib:choose_method:NameError', e.message)
+end
 end