Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ## first create app password from your google account (gugling o disek)
- /tool e-mail set address=smtp.gmail.com from=mkt750 password=skjflsdjflsdjfl port=587 \
- start-tls=yes user=youremail@gmail.com
- /system script
- add dont-require-permissions=yes name=laporanharian owner=admin policy=\
- ftp,read,write,policy,test source=":global traf;\r\
- \n:global megsu \"0\";\r\
- \n:global megsd \"0\";\r\
- \n:global resulter \" \";\r\
- \n:global logmsg;\r\
- \n:global datum [/system clock get date];\r\
- \n:global vrijeme [/system clock get time];\r\
- \n/queue tree\r\
- \n:local semd [get [find name=\"Download\"] bytes];\r\
- \n:local semu [get [find name=\"Upload\"] bytes];\r\
- \n:local brid [get [find name=\"+Dobridges\"] bytes];\r\
- \n:local briu [get [find name=\"+Upbridges\"] bytes];\r\
- \n:local semuadown (\$semd / 1000000);\r\
- \n:local semuaup (\$semu / 1000000);\r\
- \n:local bridown (\$brid / 1000000);\r\
- \n:local briup (\$briu / 1000000);\r\
- \n:if (\$semuadown > 1000) do={ :set semuadown (\$semuadown / 1000); :set \
- semuadown \"\$semuadown Gb\" } else={ :set semuadown \"\$semuadown Mb\"}\r\
- \n:if (\$semuaup > 1000) do={ :set semuaup (\$semuaup / 1000); :set semuau\
- p \"\$semuaup Gb\" } else={ :set semuaup \"\$semuaup Mb\"}\r\
- \n:if (\$bridown > 1000) do={ :set bridown (\$bridown / 1000); :set bridow\
- n \"\$bridown Gb\" } else={ :set bridown \"\$bridown Mb\"}\r\
- \n:if (\$briup > 1000) do={ :set briup (\$briup / 1000); :set briup \"\$br\
- iup Gb\" } else={ :set briup \"\$briup Mb\"}\r\
- \n\r\
- \n:for i from=2 to=9 do={\r\
- \n :set logmsg \"\";\r\
- \n :set traf [get \"Do_\$i\" bytes];\r\
- \n :set megsd (\$traf / 1000000)\r\
- \n :set traf [get \"Up_\$i\" bytes];\r\
- \n :set megsu (\$traf / 1000000)\r\
- \n :if (\$megsd > 0) do={\r\
- \n :if (\$megsd > 1000) do={ :set megsd (\$megsd / 1000); :\
- set megsd \"\$megsd Gb\" } else={ :set megsd \"\$megsd Mb\"}\r\
- \n :set logmsg (\"Do_\$i: \$megsd\");\r\
- \n :set resulter (\"\$resulter \\n User: 192.168.88.\$i Dow\
- nload: \$megsd\")\r\
- \n }\r\
- \n :if (\$megsu > 0) do={\r\
- \n :if (\$megsu > 1000) do={ :set megsu (\$megsu / 1000); :\
- set megsu \"\$megsu Gb\" } else={ :set megsu \"\$megsu Mb\"}\r\
- \n :set logmsg (\"\$logmsg Up_\$i: \$megsu\");\r\
- \n :if (\$logmsg!=\"\") do={:set resulter (\"\$resulter Upl\
- oad: \$megsu\")} else={:set resulter (\"\$resulter \\n User: 192.168.88.\$\
- i Upload: \$megsu\")}\r\
- \n }\r\
- \n# :if (\$logmsg!=\"\") do={ :log info (\$logmsg) }\r\
- \n }\r\
- \n/tool e-mail send from=RB750 to=email_to_receive@gmail.com subject=\"RB\
- 750 \$datum \$vrijeme\" body=\"\$datum \$vrijeme \\n Total Download Semu\
- anya = \$semuadown \\n Total Upload Semuanya = \$semuaup \\n\\n Bridges Do\
- wnload = \$bridown \\n Bridges Upload = \$briup \\n\\n ===================\
- \_\\nDetail per ip \$resulter\" server=smtp.gmail.com\r\
- \n\r\
- \n:delay 3s\r\
- \n/queue tree reset-counters-all"
- ## last add
- /system scheduler
- add interval=1d name=resetcounterall on-event=\
- "/system script run laporanharian\r\
- \n\r\
- \n" policy=read,write,policy,test,sniff start-date=sep/18/2019 \
- start-time=00:00:00
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement