深圳捷联讯通科技有限公司

 找回密码
 立即注册
查看: 6407|回复: 0

ADSL多线动态DDNS,判断解析在线ADSL

[复制链接]

25

主题

53

帖子

575

积分

高级会员

小学生

Rank: 4

积分
575

热心会员活跃会员最佳新人

发表于 2014-6-13 09:56:38 | 显示全部楼层 |阅读模式
:global count X
#这里定义的为adsl拨号的数目
:global runid
:global status
:global ddnsinterface "pppoe-out"
#这里定义通用的adsl名次,这里为pppoe-out1这样的形式
:set runid ("a")
:for i from=1 to=$count do={
:set status [/interface get [/interface find name=("pppoe-out" .  $i) ] running ]
:if ($status=true) do={:set runid ($runid . $i )
}
}
:set runid [:pick $runid 1 2]
#获得第一条已经成功连接的ADSL
:set ddnsinterface ($ddnsinterface . $runid)
:global ddnsuser "********"
:global ddnspass "********"
:global ddnshost "******.changeip.net"
:global ddnsip
:global ddnsipfn
:global ddnslastip [:tostr [:resolve $ddnshost] ]
:if ([ :typeof $ddnslastip ] = nil ) do={ :global ddnslastip "0" }
:global ddnssystem ("mt-" . [/system package get system version] )
:local ddnsipfn [ /ip address get [/ip address find interface=$ddnsinterface ] address ]
:global ddnsip [:pick $ddnsipfn 0 [:find $ddnsipfn "/" ] ]
:if ([ :typeof $ddnsip ] = nil ) do={
:log info ("DDNS: No ip address present on " . $ddnsinterface . ", please check.")
} else={
:if ($ddnsip != $ddnslastip) do={
:log warning ("发送DDNS更新!" . "接口为:" . $ddnsinterface)
:log info [ :put [/tool dns-update name=$ddnshost address=$ddnsip key-name=$ddnsuser key=$ddnspass ] ]
:global ddnslastip $ddnsip
} else={
:log info "DDNS: No update required."
}
}
没有谁比谁厉害,只有谁比谁热心!
回复

使用道具 举报

*滑块验证:
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|小黑屋|手机版|Archiver|EDCwifi.BBS ( 粤ICP备17065502号-1 粤公网安备44030702001530号 )

GMT+8, 2024-10-11 16:17 , Processed in 0.145495 second(s), 24 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表