Crash_Override/routeros-scripts
1
0
Fork 0
mirror of https://github.com/eworm-de/routeros-scripts synced 2024-05-14 10:04:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

global-functions: $LogPrintOnce: drop support for exit

Browse source 
This is not widely adopted or used, so let's just drop it - no
compatibility.
This commit is contained in:
Christian Hesse 2024-03-08 11:09:22 +01:00
parent 76f65c13d7
commit 19802c0b69
4 changed files with 9 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
dhcp-to-dns.rsc
View file

@ -61,7 +61,7 @@
:do { :do {
:set LeaseVal [ /ip/dhcp-server/lease/get $Lease ]; :set LeaseVal [ /ip/dhcp-server/lease/get $Lease ];
:if ([ :len [ /ip/dhcp-server/lease/find where active-mac-address=($LeaseVal->"active-mac-address") status=bound ] ] > 1) do={ :if ([ :len [ /ip/dhcp-server/lease/find where active-mac-address=($LeaseVal->"active-mac-address") status=bound ] ] > 1) do={
$LogPrintOnce info $ScriptName ("Multiple bound leases found for mac-address " . ($LeaseVal->"active-mac-address") . "!") false; $LogPrintOnce info $ScriptName ("Multiple bound leases found for mac-address " . ($LeaseVal->"active-mac-address") . "!");
} }
} on-error={ } on-error={
$LogPrintExit2 debug $ScriptName ("A lease just vanished, ignoring.") false; $LogPrintExit2 debug $ScriptName ("A lease just vanished, ignoring.") false;
@ -117,7 +117,7 @@
} }
:if ([ :len [ /ip/dns/static/find where name=$FullA (!type or type=A) ] ] > 1) do={ :if ([ :len [ /ip/dns/static/find where name=$FullA (!type or type=A) ] ] > 1) do={
$LogPrintOnce warning $ScriptName ("The name '" . $FullA . "' appeared in more than one A record!") false; $LogPrintOnce warning $ScriptName ("The name '" . $FullA . "' appeared in more than one A record!");
} }
} else={ } else={
$LogPrintExit2 debug $ScriptName ("No address available... Ignoring.") false; $LogPrintExit2 debug $ScriptName ("No address available... Ignoring.") false;

2
fw-addr-lists.rsc
View file

@ -82,7 +82,7 @@
} }
:if ([ :len $Data ] > 63000) do={ :if ([ :len $Data ] > 63000) do={
$LogPrintOnce warning $ScriptName ("The list is huge and may be truncated: " . $List->"url") false; $LogPrintOnce warning $ScriptName ("The list is huge and may be truncated: " . $List->"url");
} }
:while ([ :len $Data ] != 0) do={ :while ([ :len $Data ] != 0) do={

9
global-functions.rsc
View file

@ -703,7 +703,6 @@
:local Severity [ :tostr $1 ]; :local Severity [ :tostr $1 ];
:local Name [ :tostr $2 ]; :local Name [ :tostr $2 ];
:local Message [ :tostr $3 ]; :local Message [ :tostr $3 ];
:local Exit [ :tostr $4 ];
:global LogPrintExit2; :global LogPrintExit2;
@ -718,7 +717,7 @@
} }
:set ($LogPrintOnceMessages->$Message) 1; :set ($LogPrintOnceMessages->$Message) 1;
$LogPrintExit2 $Severity $Name $Message $Exit; $LogPrintExit2 $Severity $Name $Message false;
} }
# get max value # get max value
@ -1048,7 +1047,7 @@
} }
} else={ } else={
$LogPrintOnce warning $0 ("The script '" . $ScriptVal->"name" . "' requires RouterOS " . \ $LogPrintOnce warning $0 ("The script '" . $ScriptVal->"name" . "' requires RouterOS " . \
$Required . ", which is not met by your installation. Ignoring!") false; $Required . ", which is not met by your installation. Ignoring!");
} }
} else={ } else={
$LogPrintExit2 warning $0 ("Looks like new script '" . $ScriptVal->"name" . \ $LogPrintExit2 warning $0 ("Looks like new script '" . $ScriptVal->"name" . \
@ -1359,7 +1358,7 @@
} }
:if ([ :len ($Symbols->$Name) ] = 0) do={ :if ([ :len ($Symbols->$Name) ] = 0) do={
$LogPrintOnce warning $0 ("No symbol available for name '" . $Name . "'!") false; $LogPrintOnce warning $0 ("No symbol available for name '" . $Name . "'!");
:return ""; :return "";
} }
@ -1540,7 +1539,7 @@
# Log success # Log success
:local Resource [ /system/resource/get ]; :local Resource [ /system/resource/get ];
$LogPrintOnce info $ScriptName ("Loaded on " . $Resource->"board-name" . \ $LogPrintOnce info $ScriptName ("Loaded on " . $Resource->"board-name" . \
" with RouterOS " . $Resource->"version" . ".") false; " with RouterOS " . $Resource->"version" . ".");
# signal we are ready # signal we are ready
:set GlobalFunctionsReady true; :set GlobalFunctionsReady true;

3
sms-forward.rsc
View file

@ -32,7 +32,8 @@
} }
:if ([ /tool/sms/get receive-enabled ] = false) do={ :if ([ /tool/sms/get receive-enabled ] = false) do={
$LogPrintOnce warning $ScriptName ("Receiving of SMS is not enabled.") true; $LogPrintOnce warning $ScriptName ("Receiving of SMS is not enabled.");
:error false;
} }
$WaitFullyConnected; $WaitFullyConnected;