mirror.MikroTik/eworm.routeros-scripts
1
0
Fork 0
mirror of https://git.eworm.de/cgit/routeros-scripts synced 2025-06-28 12:20:07 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

mod/ipcalc: introduce $IPCalcReturn

Browse source
This commit is contained in:
Christian Hesse 2021-12-09 20:55:15 +01:00
parent 004621a327
commit 327740d255
1 changed files with 20 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

29
mod/ipcalc
View file

@ -4,10 +4,28 @@
# https://git.eworm.de/cgit/routeros-scripts/about/COPYING.md # https://git.eworm.de/cgit/routeros-scripts/about/COPYING.md
:global IPCalc; :global IPCalc;
:global IPCalcReturn;
# calculate and print netmask, network, min host, max host and broadcast # print netmask, network, min host, max host and broadcast
:set IPCalc do={ :set IPCalc do={
:local Input [ :tostr $1 ]; :local Input [ :tostr $1 ];
:global IPCalcReturn;
:local Values [ $IPCalcReturn $1 ];
:put ( \
"Address: " . $Values->"address" . "\n\r" . \
"Netmask: " . $Values->"netmask" . "\n\r" . \
"Network: " . $Values->"network" . "\n\r" . \
"HostMin: " . $Values->"hostmin" . "\n\r" . \
"HostMax: " . $Values->"hostmax" . "\n\r" . \
"Broadcast: " . $Values->"broadcast");
}
# calculate and return netmask, network, min host, max host and broadcast
:set IPCalcReturn do={
:local Input [ :tostr $1 ];
:local Address [ :toip [ :pick $Input 0 [ :find $Input "/" ] ] ]; :local Address [ :toip [ :pick $Input 0 [ :find $Input "/" ] ] ];
:local Bits [ :tonum [ :pick $Input ([ :find $Input "/" ] + 1) [ :len $Input ] ] ]; :local Bits [ :tonum [ :pick $Input ([ :find $Input "/" ] + 1) [ :len $Input ] ] ];
:local Mask ((255.255.255.255 << (32 - $Bits)) & 255.255.255.255); :local Mask ((255.255.255.255 << (32 - $Bits)) & 255.255.255.255);
@ -23,13 +41,6 @@
"broadcast"=($Address | ~$Mask); "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; :return $Return;
} }