phg/routeros-scripts-custom
0
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

fix SafeResolv function

Browse source
This commit is contained in:
Philip Henning 2025-01-27 22:28:54 +01:00
parent 15120cdd4f
commit f3bae25ff1
1 changed files with 10 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

19
global-functions-custom-phg.rsc
View file

@ -14,26 +14,27 @@
:global GlobalFunctionsCustomPhgReady false;
# global functions
:global SafelyResolve
:global SafeResolve
# Function: safelyResolve
# - Takes a DNS string (e.g. "example.com")
# - Takes an IP type [ipv4, ipv6]
# - Returns a string of and IP address or false if it can't be resolved
:set SafelyResolve do={
:set SafeResolve do={
:do {
:local DomainName [ :tostr $1 ];
:if ( [ :tostr $2 ] = "ipv4" or [ :tostr $2 ] = "ipv6" ) do={
:local IPType [ :tostr $2 ];
:local IPType;
:if ( ([ :tostr $2 ] = "ipv4") or ([ :tostr $2 ] = "ipv6") ) do={
:set IPType [ :tostr $2 ];
} else={
:local IPType "ipv4";
:global ExitError; $ExitError false $0;
}
:local IP [:resolve domain-name="$DomainName" type=$IPType];
:return "$IP";
:local ResolvedIP [:resolve domain-name="$DomainName" type=$IPType];
:return "$ResolvedIP";
} on-error={
return false;
:return false;
}
}
# signal we are ready
:set GlobalFunctionsCustomPhgReady true;
:set GlobalFunctionsCustomPhgReady true;