parent: java, python, native options

Author: scivision

+stdlib/+java/parent.m

@@ -0,0 +1,15 @@
+function p = parent(pth)
+
+p = javaObject("java.io.File", pth).getParent();
+if isempty(p)
+  rn = stdlib.root_name(pth);
+  if ispc() && ~stdlib.strempty(pth) && ~stdlib.strempty(rn) && startsWith(pth, rn)
+    p = strcat(rn, filesep);
+  else
+    p = ".";
+  end
+else
+  p = string(p);
+end
+
+end

+stdlib/+native/parent.m

@@ -0,0 +1,20 @@
+function p = parent(pth)
+
+f = fullfile(char(pth));
+if endsWith(f, {'/', filesep}) && ~strcmp(f, stdlib.root(f))
+  f = f(1:end-1);
+end
+
+p = fileparts(f);
+
+if stdlib.strempty(p)
+  p = '.';
+elseif ispc() && strcmp(p, stdlib.root_name(pth))
+  p = strcat(p, filesep);
+end
+
+if isstring(pth)
+  p = string(p);
+end
+
+end

+stdlib/+python/parent.m

@@ -0,0 +1,13 @@
+function p = parent(pth)
+
+try
+  p = string(py.str(py.pathlib.Path(pth).parent));
+  if ispc() && strcmp(p, stdlib.root_name(pth))
+    p = strcat(p, filesep);
+  end
+catch e
+  p = "";
+  warning(e.identifier, "%s", e.message)
+end
+
+end

+stdlib/parent.m

@@ -11,21 +11,12 @@
   pth {mustBeTextScalar}
 end
 
-f = fullfile(char(pth));
-if endsWith(f, {'/', filesep}) && ~strcmp(f, stdlib.root(f))
-  f = f(1:end-1);
-end
-
-p = fileparts(f);
-
-if stdlib.strempty(p)
-  p = '.';
-elseif ispc() && strcmp(p, stdlib.root_name(pth))
-  p = strcat(p, filesep);
-end
-
-if isstring(pth)
-  p = string(p);
+if stdlib.has_java()
+  p = stdlib.java.parent(pth);
+elseif stdlib.has_python()
+  p = stdlib.python.parent(pth);
+else
+  p = stdlib.native.normalize(pth);
 end
 
 end

test/TestParent.m

@@ -2,6 +2,7 @@
 
 properties (TestParameter)
 p = init_parent()
+fun = {@stdlib.parent, @stdlib.java.parent, @stdlib.python.parent}
 end
 
 methods(TestClassSetup)
@@ -13,10 +14,10 @@ function pkg_path(tc)
 
 methods (Test, TestTags="pure")
 
-function test_parent(tc, p)
-  r = p{2};
+function test_parent(tc, p, fun)
+is_capable(tc, fun)
 
-  tc.verifyEqual(stdlib.parent(p{1}), r, sprintf("mex: %d", stdlib.is_mex_fun("stdlib.parent")))
+tc.verifyEqual(fun(p{1}), p{2}, sprintf("parent(%s)", p{1}))
 end
 
 end
@@ -46,7 +47,7 @@ function test_parent(tc, p)
 p{end+1} = {"c:", "c:\"};
 end
 
-p{end+1} = {'a/b/', 'a'};
-p{end+1} = {'a//b', 'a'};
+p{end+1} = {'a/b/', "a"};
+p{end+1} = {'a//b', "a"};
 
 end