.net filesystem_type: 9x faster

.net disk_capacity: faster

.net disk_avail: faster

.NET: filter exceptions

Author: scivision

+stdlib/+dotnet/create_symlink.m

@@ -13,9 +13,11 @@
 end
 
 % https://learn.microsoft.com/en-us/dotnet/api/system.io.file.createsymboliclink
-try %#ok<TRYNC>
+try
   System.IO.File.CreateSymbolicLink(link, target);
   ok = true;
+catch e
+  dotnetException(e)
 end
 
 end

+stdlib/+dotnet/disk_available.m

@@ -1,14 +1,20 @@
 %% DOTNET.DISK_AVAILABLE find the disk space available to the user
 
-function f = disk_available(file)
-arguments
-  file (1,1) string
+function i = disk_available(file)
+
+i = uint64([]);
+if ~stdlib.exists(file)
+  return
 end
 
-f = uint64([]);
+try
+% absolutizing is necessary for Windows especially
+  i = System.IO.DriveInfo(System.IO.Path.GetFullPath(file)).AvailableFreeSpace();
+% https://learn.microsoft.com/en-us/dotnet/api/system.io.driveinfo.availablefreespace
+catch e
+  dotnetException(e)
+end
 
-if ~stdlib.exists(file), return, end
+i = uint64(i);
 
-f = uint64(System.IO.DriveInfo(stdlib.absolute(file)).AvailableFreeSpace());
-% https://learn.microsoft.com/en-us/dotnet/api/system.io.driveinfo.availablefreespace
 end

+stdlib/+dotnet/disk_capacity.m

@@ -1,15 +1,20 @@
 %% DOTNET.DISK_CAPACITY find the overall disk capacity visible to user
 
-function f = disk_capacity(file)
-arguments
-  file (1,1) string
-end
-
-f = uint64([]);
+function i = disk_capacity(file)
 
-if ~stdlib.exists(file), return, end
+i = uint64([]);
+if ~stdlib.exists(file)
+  return
+end
 
-f = uint64(System.IO.DriveInfo(stdlib.absolute(file)).TotalSize());
+try
+% absolutizing is necessary for Windows especially
+  i = System.IO.DriveInfo(System.IO.Path.GetFullPath(file)).TotalSize();
 % https://learn.microsoft.com/en-us/dotnet/api/system.io.driveinfo.totalsize
+catch e
+  dotnetException(e)
+end
+
+i = uint64(i);
 
 end

+stdlib/+dotnet/filesystem_type.m

@@ -1,15 +1,19 @@
 %% DOTNET.FILESYSTEM_TYPE type of the partition e.g. NTFS, ext4, ...
 
 function t = filesystem_type(file)
-arguments
-  file (1,1) string
+
+
+t = '';
+if ~stdlib.exists(file)
+  return
 end
 
-if stdlib.exists(file)
-  t = char(System.IO.DriveInfo(stdlib.absolute(file)).DriveFormat);
-  % https://learn.microsoft.com/en-us/dotnet/api/system.io.driveinfo.driveformat
-else
-  t = '';
+% https://learn.microsoft.com/en-us/dotnet/api/system.io.driveinfo.driveformat
+
+try
+  t = char(System.IO.DriveInfo(System.IO.Path.GetFullPath(file)).DriveFormat);
+catch e
+  dotnetException(e)
 end
 
 end

+stdlib/+dotnet/get_owner.m

@@ -1,9 +1,6 @@
 %% DOTNET.GET_OWNER get the owner of a filepath
 
 function o = get_owner(file)
-arguments
-  file (1,1) string
-end
 
 % This is not yet possible with .NET on Unix, even with .NET 10.
 % It would require Pinvoke or external Mono.Unix

+stdlib/+dotnet/is_removable.m

@@ -3,15 +3,13 @@
 % Ref: https://learn.microsoft.com/en-us/dotnet/api/system.io.drivetype
 
 function y = is_removable(filepath)
-arguments
-  filepath (1,1) string
-end
 
-if stdlib.exists(filepath)
-  fmt = System.IO.DriveInfo(stdlib.absolute(filepath)).DriveType;
+try
+  fmt = System.IO.DriveInfo(filepath).DriveType;
   y = any(isequal(fmt, {System.IO.DriveType.Removable, ...
                         System.IO.DriveType.CDRom}));
-else
+catch e
+  dotnetException(e)
   y = false;
 end
 

+stdlib/+dotnet/is_symlink.m

@@ -15,11 +15,8 @@
     y = contains(attr, 'ReparsePoint');
   end
 catch e
-  switch e.identifier
-    case {'MATLAB:NET:CLRException:CreateObject', 'MATLAB:NET:CLRException:MethodInvoke'}
-      y = false;
-    otherwise, rethrow(e)
-  end
+  dotnetException(e)
+  y = false;
 end
 
 end

+stdlib/+dotnet/private/dotnetException.m

@@ -0,0 +1,16 @@
+function dotnetException(e)
+
+switch class(e)
+  case 'MException'
+    switch e.identifier
+      case {'MATLAB:NET:NetConversion:StringConversion'}
+      otherwise, rethrow(e)
+    end
+  case 'NET.NetException'
+    switch class(e.ExceptionObject)
+      case {'System.IO.DriveNotFoundException', 'System.IO.FileNotFoundException', 'System.ArgumentException'}
+      otherwise, rethrow(e)
+    end
+end
+
+end

+stdlib/+dotnet/read_symlink.m

@@ -1,9 +1,8 @@
 %% DOTNET.READ_SYMLINK resolve the symbolic links of a filepath
 
 function r = read_symlink(file)
-arguments
-  file (1,1) string
-end
+
+r = "";
 
 try
   h = System.IO.FileInfo(file);
@@ -12,8 +11,8 @@
   if isempty(r)
     r = "";
   end
-catch
-  r = "";
+catch e
+  dotnetException(e)
 end
 
 end