Script:
#DHCP-Server Name
:local DHCPServer "Guest";
#PhallaCCMT.blogspot.com
:foreach i in=[/ip dhcp-server lease find dynamic=yes active-server=$DHCPServer] do={
:local DhcpDynMAC [/ip dhcp-server lease get $i mac-address];
:local DhcpDynCLIENTID [/ip dhcp-server lease get $i active-client-id];
:local DhcpDynHOST [/ip dhcp-server lease get $i host-name];
:local phoneNAME [:pick $DhcpDynHOST 0 4];
#YouCanAddMorePhone
:if ( ($phoneNAME="BLUS") || ($phoneNAME="iPad") || ($phoneNAME="andr") || ($phoneNAME="Andr") || ($phoneNAME="Wind") || ($phoneNAME="iPho") || ($phoneNAME="BLAC") ) do={
/ip dhcp-server lease add block-access=yes mac-address="$DhcpDynMAC" use-src-mac=yes comment="$DhcpDynHOST" server="$DHCPServer" client-id="$DhcpDynCLIENTID";
}
}
/ip dhcp-server lease remove [find host-name~"BLUS*"]
/ip dhcp-server lease remove [find host-name~"android*"]
/ip dhcp-server lease remove [find host-name~"Android*"]
/ip dhcp-server lease remove [find host-name~"Windows*"]
/ip dhcp-server lease remove [find host-name~"iPad*"]
/ip dhcp-server lease remove [find host-name~"iPhone*"]
/ip dhcp-server lease remove [find host-name~"BLACKBERRY*"]
#
3 comments
Write commentsVery usefull your script!! Is it possible to place an exception on the script, for i.e: iPhoneManager to be able to access internet? Thank you!
ReplyI think this is an informative post and it is very useful and knowledgeable. therefore, I would like to thank you for the efforts you have made in writing this article. Blockchain PR
Replyi made some arrangement for don't remove the statics one, so i can release some mobiles
Reply:foreach j in=[/ip dhcp-server lease find dynamic=yes active-server=$DHCPServer] do={
:local DhcpDynHOST [/ip dhcp-server lease get $j host-name];
:local phoneNAME [:pick $DhcpDynHOST 0 4];
:if ( ($phoneNAME="BLUS") || ($phoneNAME="iPad") || ($phoneNAME="andr") || ($phoneNAME="Andr") || ($phoneNAME="Wind") || ($phoneNAME="iPho") || ($phoneNAME="BLAC") || ($phoneNAME="Gala") ) do={
/ip dhcp-server lease remove $j
}
}
EmoticonEmoticon