:global IfThenElse;
:global LogPrint;
:global Grep;
- :local ValidChars "0123456789.:/ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz-";
-
+
:global NetMask4;
:global NetMask6;
:global ScriptLock;
- :local FindDelim;
- :set FindDelim do={
- :local Length [ :tostr $1 ];
- :for I from=0 to=([ :len $Length ] - 1) do={
- :if ([ :typeof [ :find $ValidChars [ :pick $Length $I ] ] ] != "num") do={
+ :local FindDelim do={
+ :local ValidChars "0123456789.:/ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz-";
+ :for I from=0 to=[ :len $1 ] do={
+ :if ([ :typeof [ :find $ValidChars [ :pick ($1 . " ") $I ] ] ] != "num") do={
:return $I;
}
}
:set FwList ($FwList->0);
:local FwListName;
# :local FwListName ($FwListFile->0);
+# :set FwListName [ $Grep $FwListName "[^0-9a-zA-Z\\./:-]" ];
+ :set FwListName ([ :pick $Line 0 [ $FindDelim $FwList ] ] ;
# :set FwListName [ $Grep $FwListName "[^0-9a-zA-Z\\./:-]" ];
:log warning ($ScriptName . " Parsing address-list index entry: " . $FwListName);
:global GlobalFuncReady false;
# Git commit id & info, expected configuration version
-:global CommitId "main/567/f0428e42";
+:global CommitId "main/568/5c207d26";
:global CommitTAG "unknown";
-:global CommitInfo "Autocommit in repo: ros.vados.ru, generated by owner: root, in 14:35:02 04.05.2026.";
+:global CommitInfo "Autocommit in repo: ros.vados.ru, generated by owner: root, in 14:55:02 04.05.2026.";
# The variables are received right here.
:global GlobalConfVersion 140;