| @ -0,0 +1,51 @@ | |||
| ### VARIABLES START ### | |||
| :local wfSpeedTestAddress value="192.168.56.1" | |||
| :local wfInterfaceNum value="ether3" | |||
| :local wfGetExternalIPhost value="http://getip.onlinez.net/index.php" | |||
| :local botTelegram value="BOTID" | |||
| :local botMgId value="CHATID" | |||
| ### VARIABLES END ### | |||
| /tool fetch url=$wfGetExternalIPhost dst-path=externalip.txt; delay 1 | |||
| :local getExIP ([/file get externalip.txt contents]) | |||
| :local PortRate ([/interface ethernet monitor $wfInterfaceNum once as-value]->"rate") | |||
| :local getInIP [/ip address get [find interface="$wfInterfaceNum"] address ]; | |||
| :local msgTextline value="---------------------------" | |||
| :local msgGreeting value="Hello! Your internal IP is: $getInIP and external IP is: $getExIP" | |||
| :local msgPortRate value="Link speed is: $PortRate" | |||
| :local msgWait value="Please wait approximately 1 minute for bandwidth test..." | |||
| :log info "$msgTextline" | |||
| :log info "$msgGreeting" | |||
| :log info "$msgPortRate" | |||
| :log info "$msgWait" | |||
| /tool fetch url="https://api.telegram.org/$botTelegram/sendMessage\?chat_id=$botMgId&text=$msgTextline%0A$msgGreeting%0A$msgPortRate%0A$msgWait" keep-result=no | |||
| :local txTest | |||
| :local rxTest | |||
| :tool bandwidth-test address=$wfSpeedTestAddress protocol=tcp direction=transmit duration=10 do={ | |||
| set txTest $("tx-10-second-average") | |||
| } | |||
| :tool bandwidth-test address=$wfSpeedTestAddress protocol=tcp direction=receive duration=10 do={ | |||
| set rxTest $("rx-10-second-average") | |||
| } | |||
| :local uploadSpeed ("Upload: ".($txTest/1024000)." Mbps") | |||
| :local downloadSpeed ("Download: ".($rxTest/1024000)." Mbps") | |||
| :delay 2 | |||
| :local PingResult | |||
| :set PingResult [ping $wfSpeedTestAddress count=200 interval=0.05 size=1024] | |||
| :local PingResultPercent ((200-$PingResult)/10) | |||
| :local msgPacket value="Packet loss $PingResultPercent%" | |||
| :local msgUpload value="$uploadSpeed" | |||
| :local msgDwload value="$downloadSpeed" | |||
| :log info "$msgPacket" | |||
| :log info "$msgUpload" | |||
| :log info "$msgDwload" | |||
| :log info "$msgTextline" | |||
| /tool fetch url="https://api.telegram.org/$botTelegram/sendMessage\?chat_id=$botMgId&text=$msgPacket%0A$msgUpload%0A$msgDwload%0A$msgTextline" keep-result=no | |||