mirror.MikroTik/eworm-de.routeros-scripts
1
0
Fork 0
mirror of https://github.com/eworm-de/routeros-scripts.git synced 2025-06-21 01:25:52 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

global-functions: introduce $FileExists

Browse source
This commit is contained in:
Christian Hesse 2025-05-30 20:34:07 +02:00
parent 0e00a228d6
commit cb984a5e52
1 changed files with 24 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

24
global-functions.rsc
View file

@ -38,6 +38,7 @@
:global ExitError;
:global FetchHuge;
:global FetchUserAgentStr;
:global FileExists;
:global FileGet;
:global FormatLine;
:global FormatMultiLines;
@ -530,6 +531,29 @@
$Resource->"architecture-name" . " " . $Caller . "/Fetch (https://rsc.eworm.de/)");
}
# check for existence of file, optionally with type
:set FileExists do={
:local FileName [ :tostr $1 ];
:local Type [ :tostr $2 ];
:global FileGet;
:local FileVal [ $FileGet $FileName ];
:if ($FileVal = false) do={
:return false;
}
:if ([ :len ($FileVal->"size") ] = 0) do={
:return false;
}
:if ([ :len $Type ] = 0 || $FileVal->"type" = $Type) do={
:return true;
}
:return false;
}
# get file properties in array, or false on error
:set FileGet do={
:local FileName [ :tostr $1 ];