pcc多线PPPOE拔号，灰太狼版主帮我修改的自动寻找默认端口5.X的DDNS

kzyfl

原来在3.30下十分好用，就是在5.12版下不能用了，升级到5.12和以前的3.30版的ros的设置都完全一样，就是DDNS用不了，以下是灰太狼版主帮我修改后的5.12版的DDNS脚本。个人感觉灰太狼版主改的也没错，就是在5.12下用不了，不知道为什么，希望高手能给指点指点。

:global ddnsuser "用户名"
:global ddnspass "密码"
:global ddnshost "二级域名"
:global ddnsinterface [/ip route get [/ip route find static=yes active=yes] gateway]
:set ddnsinterface [/ip address get [/ip address find network=$ddnsinterface dynamic=yes] interface]
:global ddnslastip
:put $ddnsinterface
:global ddnsip [ /ip address get [/ip address find dynamic=yes  interface=$ddnsinterface ] address ]

:if ( [:typeof $ddnslastip]="nothing" ) do={ :global ddnslastip  0.0.0.0/0 }
:if ( [:typeof $ddnsip]="nothing" ) do={
  :log info ("DDNS: No ip address present on " . $ddnsinterface . ",  please check.")
} else={
  :if ($ddnsip != $ddnslastip) do={
    :log info "DDNS: Sending UPDATE!"
    :log info [ /tool dns-update name=$ddnshost address=[:pick $ddnsip  0 [:find $ddnsip "/"] ] key-name=$ddnsuser key=$ddnspass ]
    :global ddnslastip $ddnsip
  }
}



以下是以前论坛上可用的3.30脚本。
:global ddnsuser "用户名"
:global ddnspass "密码"
:global ddnshost "二级域名"
:global ddnsinterface [/ip route get [/ip route find dynamic=yes static=yes active=yes ] interface]
:global ddnslastip

:global ddnsip [ /ip address get [/ip address find dynamic=yes interface=$ddnsinterface ] address ]
:if ( [:typeof $ddnslastip]="nothing" ) do={ :global ddnslastip 0.0.0.0/0 }
:if ( [:typeof $ddnsip]="nothing" ) do={
  :log info ("DDNS: No ip address present on " . $ddnsinterface . ", please check.")
} else={
  :if ($ddnsip != $ddnslastip) do={
    :log info "DDNS: Sending UPDATE!"
    :log info [ /tool dns-update name=$ddnshost address=[:pick $ddnsip 0 [:find $ddnsip "/"] ] key-name=$ddnsuser key=$ddnspass ]
    :global ddnslastip $ddnsip
  }
}

host2318

v5.x
:global ddnsinterface [/ip route get [/ip route find static=yes active=yes] gateway]
:set ddnsinterface [/ip address get [/ip address find network=$ddnsinterface dynamic=yes] interface]
v3.x
:global ddnsinterface [/ip route get [/ip route find dynamic=yes static=yes active=yes ] interface]



3.30下ip route菜单内有 interface 列
5.X取消了那一列内容。所以获取不到interface这个参数，而版主改为获取网关地址，再通过网关地址拿到ip address菜单内的interface

思路灵活，运用巧妙。之前折腾过，也没弄出来自动的

适用于所有环境，实在是方便！

kzyfl

host2318 发表于 2012-3-1 14:38

                               
登录/注册后可看大图

v5.x
:global ddnsinterface [/ip route get [/ip route find static=yes active=yes] gateway]
:set ddn ...

适应所有环境，就是不适应我这边环境，我这边是很多PPPOE拔号的IP地址的网关地址一样。

kzyfl

host2318 发表于 2012-3-1 14:38

                               
登录/注册后可看大图

v5.x
:global ddnsinterface [/ip route get [/ip route find static=yes active=yes] gateway]
:set ddn ...

我试过了，多IP，网关不重的话，可以正常DDNS，如果多IP，网关重复的话，总是DDNS不成功。

host2318

kzyfl 发表于 2012-3-2 00:16

                               
登录/注册后可看大图

我试过了，多IP，网关不重的话，可以正常DDNS，如果多IP，网关重复的话，总是DDNS不成功。

那就试试changeip给的脚本吧。也是全自动，也不用你选择什么的。工作原理不同了
http://www.changeip.com/mikrotik/

1. 
   
2. # HomingBeacon Main Dynamic DNS Update Script
   
3. # Written by Sam Norris, ChangeIP.com
   
4. # 20100728 Tested on RouterOS 4.9
   
5. # 20110511 Tested on RouterOS 5.2
   
6. 
   
7. # Set your specific ChangeIP.com preferences here.
   
8. :global ddnsuser "user"
   
9. :global ddnspass "password"
   
10. :global ddnshost "MyRouterHostname.example.org"
    
11. # Change ddnsport to 8245 to bypass proxy.
    
12. :local ddnsport 80
    
13. 
    
14. # Do not edit anything below this line.  You have been warned.
    
15. # Abusive updates to the system will cause firewall blocks.
    
16. 
    
17. # Please be considerate and
    
18. # do not let this script run more than once per 3-5 minutes.
    
19. 
    
20. :log info "DDNS: Starting."
    
21. 
    
22. # Initialize checkpoint
    
23. :global ddnscheckpoint
    
24. :if ([:typeof $ddnscheckpoint] = "time") do={
    
25.         :log info ("DDNS: Last check was " . ([/system clock get time] - $ddnscheckpoint))
    
26. } else={
    
27.         :log info "DDNS: Cannot determine checkpoint, set now."
    
28.         :global ddnscheckpoint ( [/system clock get time] - 1d )
    
29. }
    
30. 
    
31. # Get the current IP
    
32. :if ([/system clock get time] - $ddnscheckpoint > [:totime 180s] || [/system clock get time] - $ddnscheckpoint < [:totime 0s]) do={
    
33.    :log info "DDNS: Performing remote IP detection."
    
34.    /tool fetch address="ip.changeip.com" host="ip.changeip.com" src-path=("/?" . [/int eth get 0 mac-address ]) dst-path="ip.changeip.com.txt" mode=http port=$ddnsport
    
35.    :global ddnscheckpoint [/system clock get time]
    
36. } else={
    
37.    :log info "DDNS: Please be considerate and wait a few seconds longer."
    
38.    :break
    
39. }
    
40. 
    
41. # Parse the IP address received from fetch script.
    
42.         :global ddnslastip
    
43.         :local html [/file get "ip.changeip.com.txt" contents]
    
44.         :local ddnsip [:pick $html ([:find $html "<!--IPADDR="] + 11) [:find $html "-->"] ]
    
45. 
    
46. # Is it a valid IP and is it different than the last one?
    
47.         :if ([:typeof [:toip $ddnsip]] = "ip" AND $ddnsip != $ddnslastip ) do={
    
48.                 :log info "DDNS: Sending UPDATE with $ddnsip"
    
49.                 :log info [/tool dns-update name=$ddnshost address=$ddnsip key-name=$ddnsuser key=$ddnspass ]
    
50.                 :global ddnslastip $ddnsip
    
51.         } else={
    
52.                 :log info "DDNS: No update required."
    
53.         }
    
54. }
    
55. 
    

复制代码

kzyfl

host2318 发表于 2012-3-2 09:52

                               
登录/注册后可看大图

那就试试changeip给的脚本吧。也是全自动，也不用你选择什么的。工作原理不同了
http://www.changeip. ...

这个脚本很不错，问题解决。

samboy

不错 解决5x的 ddns！