|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?注册
×
要禁QQ,所以找了个脚本来收集QQ的IP,发现刚开始还蛮正常的,后面好多的IP都无法收集了- #自动获取QQ服务器IP地址
- #QQ服务器域名关键字,多个关键字之间用逗号分隔
- :set QQ-STR "tencent,qq"
- #QQ地址列表名
- :set QQ-LST "qq"
- #取得DNS缓存的A记录
- :set id [/ip dns cache all find type=A]
- #对记录进行分析
- :foreach i in=$id do={
- #取得域名
- :set dom [/ip dns cache all get $i name]
- :set fond "no"
- #判断域名中是否有指定的关键字
- :foreach k in=$QQ-STR do={
- :if([:find $dom $k]!=[:nothing]) do={:set fond "yes"}
- }
- #找到关键字的话,就把IP地址保存在指定地址列表中
- :if($fond="yes") do={
- /ip firewall address-list add list=$QQ-LST disabled=no address=[/ip dns cache all get $i data]
- }
- }
- #清除缓存,以便寻找新的IP
- /ip dns cache flush
复制代码 |
|