changeip,DDNS更新脚本，涵盖各个版本，没有2.9.x的。我是来炒冷饭的。。。。。

host2318

没在使用2.9.X的了。所以。。。
注意事项：
1.ip dns set里面必须设置DNS服务器IP
2.域名解析需要时间生效，数十秒到几分钟不等
3.域名解析调度时间间隔建议5分钟以上（changeip有设置更新频率过高加入黑名单的，好像是5分钟解析300次的！）
4.start time 是可以设置为开机即启动的。。。。





测试过5.6可用的PPPOE拨号

1. 
   
2. :local ddnsuser "用户"
   
3. :local ddnspass "密码"
   
4. :local theinterface "端口"
   
5. :local ddnshost "域名"
   
6. :local ipddns [:resolve $ddnshost];
   
7. :local ipfresh [ /ip address get [/ip address find interface=$theinterface ] address ]
   
8. :if ([ :typeof $ipfresh ] = nil ) do={
   
9.    :log info ("DynDNS: No ip address on $theinterface .")
   
10. } else={
    
11.    :for i from=( [:len $ipfresh] - 1) to=0 do={
    
12.       :if ( [:pick $ipfresh $i] = "/") do={
    
13.     :set ipfresh [:pick $ipfresh 0 $i];
    
14.       }
    
15. }
    
16. 
    
17. :if ($ipddns != $ipfresh) do={
    
18.     :log info ("DynDNS: IP-DynDNS = $ipddns")
    
19.     :log info ("DynDNS: IP-Fresh = $ipfresh")
    
20.    :log info "DynDNS: Update IP needed, Sending UPDATE...!"
    
21.    :log info [ /tool dns-update name=$ddnshost address=$ipfresh key-name=$ddnsuser key=$ddnspass ]
    
22.     :global ipddns $ipfresh
    
23.   :log info "DynDNS: IP updated to $ipfresh!"
    
24.     } else={
    
25.      :log info "DynDNS: dont need changes";
    
26.     }
    
27. }
    

复制代码

固定IP3.30，自动识别端口，不需要指定.已测试，可用

1. 
   
2. :global ddnsuser "用户"
   
3. :global ddnspass "密码"
   
4. :global ddnshost "域名"
   
5. :global ddnsip
   
6. :global ddnslastip
   
7. :if ([ :typeof $ddnslastip ] = nil ) do={ :global ddnslastip "0" }
   
8. :global ddnsinterface
   
9. :global ddnssystem ("mt-" . [/system package get system version] )
   
10. :local int
    
11. :foreach int in=[/ip route find dst-address=0.0.0.0/0 active=yes ] do={
    
12.   :if ([:typeof [/ip route get $int routing-mark ]] != str ) do={
    
13.      :global ddnsinterface [/ip route get $int interface]
    
14.   }
    
15. }
    
16. :global ddnsip [ /ip address get [/ip address find interface=$ddnsinterface ] address ]
    
17. :if ([ :typeof $ddnsip ] = nil ) do={
    
18.    :log info ("DDNS: No ip address present on " . $ddnsinterface . ", please check.")
    
19. } else={
    
20.   :if ($ddnsip != $ddnslastip) do={
    
21.     :log info ("DDNS: IP-CHANGEIP = $ddnslastip")
    
22.     :log info ("DDNS: IP-Fresh = $ddnsip")
    
23.     :log info "DDNS: Update IP needed, Sending UPDATE...!"
    
24.     :log info [ :put [/tool dns-update name=$ddnshost address=[:pick $ddnsip 0 [:find $ddnsip "/"] ] key-name=$ddnsuser key=$ddnspass ] ]
    
25.     :global ddnslastip $ddnsip
    
26.   } else={
    
27.     :log info "DDNS: dont need changes"
    
28.   }
    
29. }
    
30. #end
    

复制代码

pppoe拨号,自动获取默认路由的端口，版本运行待考证

1. 
   
2. :global ddnsuser "用户名"
   
3. :global ddnspass "密码"
   
4. :global ddnshost "你的域名"
   
5. :global ddnsinterface [/ip route get [/ip route find dynamic=yes static=yes active=yes] interface]
   
6. :global ddnslastip
   
7. 
   
8. :global ddnsip [ /ip address get [/ip address find dynamic=yes interface=$ddnsinterface ] address ]
   
9. :if ( [:typeof $ddnslastip]="nothing" ) do={ :global ddnslastip 0.0.0.0/0 }
   
10. :if ( [:typeof $ddnsip]="nothing" ) do={
    
11.   :log info ("DDNS: No ip address present on " . $ddnsinterface . ", please check.")
    
12. } else={
    
13.   :if ($ddnsip != $ddnslastip) do={
    
14.     :log info "DDNS: Sending UPDATE!"
    
15.     :log info [ /tool dns-update name=$ddnshost address=[:pick $ddnsip 0 [:find $ddnsip "/"] ] key-name=$ddnsuser key=$ddnspass ]
    
16.     :global ddnslastip $ddnsip
    
17.   }
    
18. }
    

复制代码

多线PPPOE更新IP（每条线路都有域名，这样即使不指定哪条线进，哪条线回。也不怕默认路由改变导致不能登录了）
X 的值，就是线路数。域名格式为 name1.3-a.net name2.3-a.net.在域名前缀输入对应的域名前缀，不含数字

1. 
   
2. :local ddnsuser "用户"
   
3. :local ddnspass "密码"
   
4. :local status
   
5. :local x
   
6. :set x 2
   
7. :for i from=1 to=$x do={
   
8. :local status [/interface get [/interface find  name=("pppoe-out" . $i)] running]
   
9. :if ($status!=true) do={
   
10. :set i ($i+1)}
    
11. :local ddnsinterface ("pppoe-out" . $i)
    
12. :local ddnshost ("域名前缀". $i .".3-a.net")
    
13. :local ddnslastip [:resolve $ddnshost]
    
14. :if ([ :typeof $ddnslastip ] = nil ) do={ :local ddnslastip "0" }
    
15. :local ddnsiph [ /ip address get [/ip address find interface=$ddnsinterface ] address ]
    
16. :local ddnsip [:pick $ddnsiph 0 [:find $ddnsiph "/"]]
    
17. :if ($ddnsip != $ddnslastip) do={
    
18. /tool dns-update name=$ddnshost address=$ddnsip key-name=$ddnsuser key=$ddnspass
    
19. :log info ( $ddnshost . "  Sending UPDATE!")
    
20.   }
    
21. }
    
22. 
    

复制代码

b128777

超多範例, 謝謝提供測試中...

zebrawa

感謝 , 多學習