Code: Select all
:local array1 [:toarray " 02:C5:E1:7D:A1:09,DC:F0:50:E2:84:F7,1E:3D:59:2E:38:13,E2:B5:FA:8B:6F:B2"]
:local array2 [ :toarray "" ];
:local SendTo "mikrotik@gmail.com"
:local SendFrom "mikrotik@gmail.com";
:local PasswordMail "2374u5i6rew#^$&*";
:local SmtpServer [:resolve "smtp.gmail.com"];
:local UserName "mikrotik@gmail.com";
:local SmtpPort 465;
:local UseTLS "tls-only";
:local Subject "WARNING: Unauthorised host connected";
:foreach mac in=[/ip arp print as-value where interface="bridge3"] do={:set array2 ( $array2, $mac->"mac-address")}
:foreach mac in=$array2 do={:if ([:find $array1 $mac] >= 0) do={} else={/tool e-mail send to=$SendTo server=$SmtpServer port=$SmtpPort start-tls=$UseTLS user=$SendFrom password=$PasswordMail from=$SendFrom subject=$Subject body="Unauthorised host was connected: $mac"}}