Ede_Vau
/
routeros-scripts
mirror of https://github.com/eworm-de/routeros-scripts
1
0
Fork 0
Code Issues Releases Wiki Activity

lease-script: use $Grep

This commit is contained in:
Christian Hesse 2023-01-20 08:58:46 +01:00
parent b834517baa
commit 9887ab0849
1 changed files with 4 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
lease-script
View File

@ -10,6 +10,7 @@
:global GlobalFunctionsReady; :global GlobalFunctionsReady;
:while ($GlobalFunctionsReady != true) do={ :delay 500ms; } :while ($GlobalFunctionsReady != true) do={ :delay 500ms; }
:global Grep;
:global IfThenElse; :global IfThenElse;
:global LogPrintExit2; :global LogPrintExit2;
:global ParseKeyValueStore; :global ParseKeyValueStore;
@ -34,14 +35,10 @@ $ScriptLock $0 false 10;
:local RunOrder ({}); :local RunOrder ({});
:foreach Script in=[ /system/script/find where source~("\n# provides: lease-script, ") ] do={ :foreach Script in=[ /system/script/find where source~("\n# provides: lease-script, ") ] do={
:local Name [ /system/script/get $Script name ]; :local ScriptVal [ /system/script/get $Script ];
:local Store [ /system/script/get $Script source ]; :local Store [ $ParseKeyValueStore [ $Grep ($ScriptVal->"source") "# provides: lease-script, " ] ];
:set Store [ :pick $Store ([ :find $Store "\n# provides: lease-script, " ] + 27) [ :len $Store ] ]; :set ($RunOrder->($Store->"order")) ($ScriptVal->"name");
:set Store [ :pick $Store 0 [ :find $Store "\n" ] ];
:set Store [ $ParseKeyValueStore $Store ];
:set ($RunOrder->($Store->"order")) $Name;
} }
:foreach Order,Script in=$RunOrder do={ :foreach Order,Script in=$RunOrder do={