<?xml version="1.0"?>
<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/ DTD/wml_1.1.xml">

<wml>
<head>
<meta http-equiv="cache-control" content="max-age=180,private" />
</head>
<card title="ROS统计客户机TCP和UDP连接数量">
<p>
作者:<a href="index.php?action=showuser&amp;userid=1&amp;hash=">熊茂祥</a><br />时间:2011-11-02 17:14<br />分类:<a href="index.php?action=list&amp;cid=3&amp;hash=">ROS</a><br />标签:<a href="index.php?action=tags&amp;item=ros&amp;hash=">ros</a>, <a href="index.php?action=tags&amp;item=%E7%BB%9F%E8%AE%A1&amp;hash=">统计</a>, <a href="index.php?action=tags&amp;item=%E5%AE%A2%E6%88%B7%E6%9C%BA&amp;hash=">客户机</a>, <a href="index.php?action=tags&amp;item=%E8%BF%9E%E6%8E%A5%E6%95%B0&amp;hash=">连接数</a><br />内容:
#内网段IP


:global ipnetmask "192.168.0."


#内网IP起止


:for aaa from 1 to 254 do={


:global s 0


:global e 0


:foreach a in=[/ip firewall connection find src-address~($ipnetmask . $aaa)] do={


:if ([/ip firewall connection get $a protocol]="tcp") do={


:set s ($s+1)}


:if ([/ip firewall connection get $a protocol]="udp") do={


:set e ($e+1)}


}


:put ($ipnetmask . $aaa . " tcp-" . $s . " udp-" . $e)}





由于本脚本过于暴力，CPU不够牛的自觉绕路，省得卡掉线还怪我。看不懂也请自觉绕路，看得懂的自行修改下内网IP段就能用了。
</p><p>
<a href="index.php?action=comments&amp;articleid=91&amp;hash=">查看评论</a><br />
<a href="index.php?action=login&amp;hash=">立即登陆发表评论</a><br />
</p>
<p><a href="index.php?action=list&amp;hash=">返回日志列表</a><br /><a href="index.php?action=index&amp;hash=">返回主页</a></p>
</card>
</wml>
