is_{readable,writable}: array

Author: scivision

+stdlib/+native/is_readable.m

@@ -1,15 +1,17 @@
 function y = is_readable(file)
 
-y = false;
-
-if ~stdlib.exists(file), return, end
+i = stdlib.exists(file);
+if ~any(i)
+  y = i;
+  return
+end
 
 props = "Readable";
 if isunix
   props = [props, "GroupRead", "OtherRead"];
 end
 
-t = getPermissions(filePermissions(file), props);
-y = any(t{1, :});
+t = getPermissions(filePermissions(file(i)), props);
+y(i) = t.(props).';
 
 end

+stdlib/+native/is_writable.m

@@ -1,15 +1,17 @@
-function y = is_writable(p)
+function y = is_writable(file)
 
-y = false;
-
-if ~stdlib.exists(p), return, end
+i = stdlib.exists(file);
+if ~any(i)
+  y = i;
+  return
+end
 
 props = "Writable";
 if isunix
   props = [props, "GroupWrite", "OtherWrite"];
 end
 
-t = getPermissions(filePermissions(p), props);
-y = any(t{1, :});
+t = getPermissions(filePermissions(file(i)), props);
+y(i) = t.(props).';
 
 end

+stdlib/is_readable.m

@@ -7,12 +7,16 @@
 
 function y = is_readable(file, backend)
 arguments
-  file {mustBeTextScalar}
+  file string
   backend (1,:) string = ["java", "native", "legacy"]
 end
 
-fun = hbackend(backend, "is_readable", 'R2025a');
+[fun, b] = hbackend(backend, "is_readable", 'R2025a');
 
-y = fun(file);
+if isscalar(file) || b == "native"
+  y = fun(file);
+else
+  y = arrayfun(fun, file);
+end
 
 end

+stdlib/is_writable.m

@@ -7,12 +7,16 @@
 
 function y = is_writable(file, backend)
 arguments
-  file {mustBeTextScalar}
+  file string
   backend (1,:) string = ["java", "native", "legacy"]
 end
 
-fun = hbackend(backend, "is_writable", 'R2025a');
+[fun, b] = hbackend(backend, "is_writable", 'R2025a');
 
-y = fun(file);
+if isscalar(file) || b == "native"
+  y = fun(file);
+else
+  y = arrayfun(fun, file);
+end
 
 end

test/TestExists.m

@@ -43,6 +43,17 @@ function test_is_rw(tc, Ps, backend, fname)
 end
 
 
+function test_is_rw_array(tc, backend, fname)
+h = str2func("stdlib." + fname);
+try
+  r = h([".", tempname(), mfilename() + ".m"], backend);
+  tc.verifyEqual(r, [true, false, true])
+catch e
+  tc.verifyEqual(e.identifier, 'stdlib:hbackend:NameError', e.message)
+end
+end
+
+
 function test_is_char_device(tc, icm)
 % /dev/stdin may not be available on CI systems
 if ispc