mirror of
https://git.eworm.de/cgit/routeros-scripts
synced 2025-07-10 10:04:28 +02:00
global-functions: move $IPCalc to optional module
This commit is contained in:
parent
5391045bd5
commit
8b05d25487
2 changed files with 35 additions and 30 deletions
|
@ -32,7 +32,6 @@
|
||||||
:global GetRandomNumber;
|
:global GetRandomNumber;
|
||||||
:global HexToNum;
|
:global HexToNum;
|
||||||
:global IfThenElse;
|
:global IfThenElse;
|
||||||
:global IPCalc;
|
|
||||||
:global LogPrintExit;
|
:global LogPrintExit;
|
||||||
:global LogPrintExit2;
|
:global LogPrintExit2;
|
||||||
:global MkDir;
|
:global MkDir;
|
||||||
|
@ -440,35 +439,6 @@
|
||||||
:return $3;
|
:return $3;
|
||||||
}
|
}
|
||||||
|
|
||||||
# calculate and print netmask, network, min host, max host and broadcast
|
|
||||||
:set IPCalc do={
|
|
||||||
:local Input [ :tostr $1 ];
|
|
||||||
:local Address [ :toip [ :pick $Input 0 [ :find $Input "/" ] ] ];
|
|
||||||
:local Bits [ :tonum [ :pick $Input ([ :find $Input "/" ] + 1) [ :len $Input ] ] ];
|
|
||||||
:local Mask ((255.255.255.255 << (32 - $Bits)) & 255.255.255.255);
|
|
||||||
|
|
||||||
:local Return {
|
|
||||||
"address"=$Address;
|
|
||||||
"netmask"=$Mask;
|
|
||||||
"networkaddress"=($Address & $Mask);
|
|
||||||
"networkbits"=$Bits;
|
|
||||||
"network"=(($Address & $Mask) . "/" . $Bits);
|
|
||||||
"hostmin"=(($Address & $Mask) | 0.0.0.1);
|
|
||||||
"hostmax"=(($Address | ~$Mask) ^ 0.0.0.1);
|
|
||||||
"broadcast"=($Address | ~$Mask);
|
|
||||||
}
|
|
||||||
|
|
||||||
:put ( \
|
|
||||||
"Address: " . $Return->"address" . "\n\r" . \
|
|
||||||
"Netmask: " . $Return->"netmask" . "\n\r" . \
|
|
||||||
"Network: " . $Return->"network" . "\n\r" . \
|
|
||||||
"HostMin: " . $Return->"hostmin" . "\n\r" . \
|
|
||||||
"HostMax: " . $Return->"hostmax" . "\n\r" . \
|
|
||||||
"Broadcast: " . $Return->"broadcast");
|
|
||||||
|
|
||||||
:return $Return;
|
|
||||||
}
|
|
||||||
|
|
||||||
# deprecated compatibility wrapper
|
# deprecated compatibility wrapper
|
||||||
:set LogPrintExit do={
|
:set LogPrintExit do={
|
||||||
:global LogPrintExit2;
|
:global LogPrintExit2;
|
||||||
|
|
35
global-functions.d/ipcalc
Normal file
35
global-functions.d/ipcalc
Normal file
|
@ -0,0 +1,35 @@
|
||||||
|
#!rsc by RouterOS
|
||||||
|
# RouterOS script: global-functions.d/ipcalc
|
||||||
|
# Copyright (c) 2020-2021 Christian Hesse <mail@eworm.de>
|
||||||
|
# https://git.eworm.de/cgit/routeros-scripts/about/COPYING.md
|
||||||
|
|
||||||
|
:global IPCalc;
|
||||||
|
|
||||||
|
# calculate and print netmask, network, min host, max host and broadcast
|
||||||
|
:set IPCalc do={
|
||||||
|
:local Input [ :tostr $1 ];
|
||||||
|
:local Address [ :toip [ :pick $Input 0 [ :find $Input "/" ] ] ];
|
||||||
|
:local Bits [ :tonum [ :pick $Input ([ :find $Input "/" ] + 1) [ :len $Input ] ] ];
|
||||||
|
:local Mask ((255.255.255.255 << (32 - $Bits)) & 255.255.255.255);
|
||||||
|
|
||||||
|
:local Return {
|
||||||
|
"address"=$Address;
|
||||||
|
"netmask"=$Mask;
|
||||||
|
"networkaddress"=($Address & $Mask);
|
||||||
|
"networkbits"=$Bits;
|
||||||
|
"network"=(($Address & $Mask) . "/" . $Bits);
|
||||||
|
"hostmin"=(($Address & $Mask) | 0.0.0.1);
|
||||||
|
"hostmax"=(($Address | ~$Mask) ^ 0.0.0.1);
|
||||||
|
"broadcast"=($Address | ~$Mask);
|
||||||
|
}
|
||||||
|
|
||||||
|
:put ( \
|
||||||
|
"Address: " . $Return->"address" . "\n\r" . \
|
||||||
|
"Netmask: " . $Return->"netmask" . "\n\r" . \
|
||||||
|
"Network: " . $Return->"network" . "\n\r" . \
|
||||||
|
"HostMin: " . $Return->"hostmin" . "\n\r" . \
|
||||||
|
"HostMax: " . $Return->"hostmax" . "\n\r" . \
|
||||||
|
"Broadcast: " . $Return->"broadcast");
|
||||||
|
|
||||||
|
:return $Return;
|
||||||
|
}
|
Loading…
Add table
Add a link
Reference in a new issue