canonical: avoid use of deprecated fileattrib

If modern alternative available

is_*: no fileattrib in R2025a+

f

Author: scivision

+stdlib/canonical.m

@@ -17,18 +17,34 @@
   strict = false;
 end
 
-[s, r] = fileAttribCompatible(file);
+c = '';
 
-if s == 1
-  c = r.Name;
-elseif ~strict && ~stdlib.strempty(r)
-  c = stdlib.normalize(file);
-else
-  c = '';
-end
+try
+  p = filePermissions(file);
+  c = p.AbsolutePath;
+  if ischar(file)
+    c = char(c);
+  end
+catch e
+  switch e.identifier
+    case 'MATLAB:io:filesystem:filePermissions:CannotFindLocation'
+      if ~strict && ~stdlib.strempty(file)
+        c = stdlib.normalize(file);
+      end
+    case {'MATLAB:UndefinedFunction', 'Octave:undefined-function'}
+      [s, r] = fileAttribCompatible(file);
+      if s == 1
+        c = r.Name;
+      elseif ~strict && ~stdlib.strempty(r)
+        c = stdlib.normalize(file);
+      end
+    otherwise
+      rethrow(e)
+  end
 
-if isstring(file)
-  c = string(c);
+  if isstring(file)
+    c = string(c);
+  end
 end
 
 end

+stdlib/is_exe.m

@@ -16,10 +16,26 @@
   return
 end
 
-a = file_attributes(file);
 
-if ~isempty(a)
-  y = ~a.directory && (a.UserExecute || a.GroupExecute || a.OtherExecute);
+try
+  a = filePermissions(file);
+  if a.Type == matlab.io.FileSystemEntryType.File
+    if ispc
+      y = a.Readable;
+    else
+      y = a.UserExecute || a.GroupExecute || a.OtherExecute;
+    end
+  end
+catch e
+  switch e.identifier
+    case 'MATLAB:io:filesystem:filePermissions:CannotFindLocation'
+      y = false;
+    case {'MATLAB:UndefinedFunction', 'Octave:undefined-function'}
+      a = file_attributes(file);
+      y = ~isempty(a) && ~a.directory && (a.UserExecute || a.GroupExecute || a.OtherExecute);
+    otherwise
+      rethrow(e)
+  end
 end
 
 end
@@ -28,4 +44,4 @@
 %! if isunix()
 %! assert(stdlib.is_exe([matlabroot, '/bin/octave']))
 %! end
-%!assert (~stdlib.is_exe('.'))
+%!assert (~stdlib.is_exe('.'))

+stdlib/is_readable.m

@@ -9,14 +9,21 @@
 
 function y = is_readable(file)
 
-a = file_attributes(file);
-
-if isempty(a)
-  y = false;
-else
-  y = a.UserRead || a.GroupRead || a.OtherRead;
+try
+  a = filePermissions(file);
+  y = a.Readable;
+catch e
+  switch e.identifier
+    case 'MATLAB:io:filesystem:filePermissions:CannotFindLocation'
+      y = false;
+    case {'MATLAB:UndefinedFunction', 'Octave:undefined-function'}
+      a = file_attributes(file);
+      y = ~isempty(a) && (a.UserRead || a.GroupRead || a.OtherRead);
+    otherwise
+      rethrow(e)
+  end
 end
 
 end
 
-%!assert (stdlib.is_readable('.'))
+%!assert (stdlib.is_readable('.'))

+stdlib/is_writable.m

@@ -9,14 +9,21 @@
 
 function y = is_writable(file)
 
-a = file_attributes(file);
-
-if isempty(a)
-  y = false;
-else
-  y = a.UserWrite || a.GroupWrite || a.OtherWrite;
+try
+  a = filePermissions(file);
+  y = a.Writable;
+catch e
+  switch e.identifier
+    case 'MATLAB:io:filesystem:filePermissions:CannotFindLocation'
+      y = false;
+    case {'MATLAB:UndefinedFunction', 'Octave:undefined-function'}
+      a = file_attributes(file);
+      y = ~isempty(a) && (a.UserWrite || a.GroupWrite || a.OtherWrite);
+    otherwise
+      rethrow(e)
+  end
 end
 
 end
 
-%!assert (islogical(stdlib.is_writable('.')))
+%!assert (islogical(stdlib.is_writable('.')))