ROS自动备份发送到邮箱

xnnew

繁华 发表于 2014-3-4 16:35
学习教程
ROS软路由入门到精通教程

ROS自动备份发送到邮箱

ROSABC.com

繁华 发表于 2014-3-4 16:35
学习教程
ROS软路由入门到精通教程

发QQ群小心被封。

sjirene5

{
#定义全局变量
:local from "**062245@qq.com"
:local user "**3062245@qq.com"  #发件人邮箱帐号
:local password "******"   #发件人邮箱密码
:local to "**3062245@qq.com"
:local smtp "smtp.qq.com"
:local router "1500"  #设置路由器名字，收到邮件时，好区分是哪台路由器。
:local address
:set address [:resolve $smtp]
#ROS 系统备份
/system backup save name=($router."-".[:pick [/system clock get date] 7 11].[:pick [/system clock get date] 0 3].[:pick [/system clock get date] 4 6]);

#导出所有配置
/export             file=($router."-".[:pick [/system clock get date] 7 11].[:pick [/system clock get date] 0 3].[:pick [/system clock get date] 4 6]);

#延迟1秒，目的是文件已经备份好了，然后再执行下面的步骤，否则下面的步骤发现没有备份文件时报错，从而导致你的脚本失效
:delay 3;

#把系统备份发送到邮箱
/tool e-mail send server=($address) port=25 from=($from) user=($user) password=($password) to=($to) subject=($router."-".[:pick [/system clock get date] 7 11].[:pick [/system clock get date] 0 3].[:pick [/system clock get date] 4 6].".backup") file=($router."-".[:pick [/system clock get date] 7 11].[:pick [/system clock get date] 0 3].[:pick [/system clock get date] 4 6].".backup") body=($router."-".[:pick [/system clock get date] 7 11].[:pick [/system clock get date] 0 3].[:pick [/system clock get date] 4 6].".backup");

#把配置文档发送到邮箱
/tool e-mail send server=($address) port=25 from=($from) user=($user) password=($password) to=($to) subject=($router."-".[:pick [/system clock get date] 7 11].[:pick [/system clock get date] 0 3].[:pick [/system clock get date] 4 6].".rsc") file=($router."-".[:pick [/system clock get date] 7 11].[:pick [/system clock get date] 0 3].[:pick [/system clock get date] 4 6].".rsc") body=($router."-".[:pick [/system clock get date] 7 11].[:pick [/system clock get date] 0 3].[:pick [/system clock get date] 4 6].".rsc");

#把用户数据库文档发送到邮箱（Exchange好像不支持接收.umb）
/tool e-mail send server=($address) port=25 from=($from) user=($user) password=($password) to=($to) subject=($router."-".[:pick [/system clock get date] 7 11].[:pick [/system clock get date] 0 3].[:pick [/system clock get date] 4 6].".umb") file=($router."-".[:pick [/system clock get date] 7 11].[:pick [/system clock get date] 0 3].[:pick [/system clock get date] 4 6].".umb") body=($router."-".[:pick [/system clock get date] 7 11].[:pick [/system clock get date] 0 3].[:pick [/system clock get date] 4 6].".umb");

#再次延迟20秒，目的是让上面的步骤即确保备份的文件都发送出去了再执行下面的删除操作
:delay 20;

#删除刚才备份到ROS本地的文件（如果你空间足够、脚本执行每月/年才执行一次，你可以删除下面这三段脚本）
/file remove ($router."-".[:pick [/system clock get date] 7 11].[:pick [/system clock get date] 0 3].[:pick [/system clock get date] 4 6].".backup");
/file remove ($router."-".[:pick [/system clock get date] 7 11].[:pick [/system clock get date] 0 3].[:pick [/system clock get date] 4 6].".rsc");
/file remove ($router."-".[:pick [/system clock get date] 7 11].[:pick [/system clock get date] 0 3].[:pick [/system clock get date] 4 6].".umb");

cspm333

做"信件已成功寄出"的確認，遇失敗則重新補寄直至成功寄出才中止。
避免遇上圖警示的寄件錯誤，而耽誤了任何一天的備份。

1. :local mail "abc1234@mail.com"
   
2. 
   
3. :local Name [/system identity get name]
   
4. :local Date [/system clock get date]
   
5. :local Time
   
6. 
   
7. :local yy [:pick $Date 7 11]
   
8. :local mm [:find 0,jan,feb,mar,apr,may,jun,jul,aug,sep,oct,nov,dec [:pick $Date 0 3]]
   
9. :if ($mm<10) do={:set mm "0$mm"}
   
10. :local dd [:pick $Date 4 6]
    
11. 
    
12. :local title
    
13. :local backup "$Name_Backup_[$yy-$mm-$dd].backup"
    
14. /system backup save name=$backup ; :delay 3s
    
15. 
    
16. :local fin no
    
17. :local send yes
    
18. :do {
    
19. :if ($send) do={
    
20.   :set Time [/system clock get time]
    
21.   :set title "$Name -- RouterOS Backup $yy/$mm/$dd $Time"
    
22.   /tool e-mail send to=$mail subject=$title file=$backup
    
23.   :set send no
    
24. }
    
25. :delay 11s
    
26. :foreach i in=[/log find message~$title] do={
    
27.   :set fin ([/log get $i topics]~"info")
    
28.   :set send ([/log get $i topics]~"error")
    
29. }
    
30. } while=(!$fin)
    
31. 
    
32. :log warning "System Backup emailed at $yy/$mm/$dd $Time (系統備份已由email寄出)"
    
33. /file remove $backup

复制代码