mirror of
https://github.com/eworm-de/routeros-scripts.git
synced 2026-03-04 21:19:36 +00:00
global-functions: introduce $FileExists
This commit is contained in:
parent
117abedc0c
commit
c1bb4f095e
1 changed files with 24 additions and 0 deletions
|
|
@ -38,6 +38,7 @@
|
|||
:global ExitError;
|
||||
:global FetchHuge;
|
||||
:global FetchUserAgentStr;
|
||||
:global FileExists;
|
||||
:global FormatLine;
|
||||
:global FormatMultiLines;
|
||||
:global GetMacVendor;
|
||||
|
|
@ -529,6 +530,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 ];
|
||||
|
||||
:local FileVal;
|
||||
:do {
|
||||
:set FileVal [ /file/get $FileName ];
|
||||
} on-error={
|
||||
:return false;
|
||||
}
|
||||
|
||||
:if ([ :len ($FileVal->"size") ] = 0) do={
|
||||
:return false;
|
||||
}
|
||||
|
||||
:if ([ :len $Type ] = 0 || $FileVal->"type" = $Type) do={
|
||||
:return true;
|
||||
}
|
||||
|
||||
:return false;
|
||||
}
|
||||
|
||||
# format a line for output
|
||||
:set FormatLine do={
|
||||
:local Key [ :tostr $1 ];
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue