|
|
楼主 |
发表于 2007-5-8 03:20:01
|
显示全部楼层
又有改动(2007-05-08)
######程序开始######################################################################
# 程序名称:ROS用流量监控动态控制限速点
# 程序版本:测试
# 程 序 员:kuwin Email:kuwin@163.com
# 程序版权:免费软件(本程序可自由传播及修改,不必理会原创作者kuwin)
# Ros版本:Ros2.8.27 Ros2.9.2 Ros2.9.7
# 编写日期:2007-04-29
# 修改日期:2007-05-08
# 测试人员:kuwin
# 程序评级:无
# 测试结果:
# 1.控制效果良好;
# 2.程序消耗一定的cpu资源,K62-300的cpu资源要用3%-7%,建议cpu要P3-500以上;
# (2007-05-05改动后已经大幅降低,2007-05-08改动后影响可以忽略)
# 3.Ros显示的流量要比下载软件(讯雷等)上显示的流量要大,原因未明.
# 4.写硬盘操作过多,有损硬盘!(2007-05-05,2007-05-08两次改有明显改善)
# 简要说明:
# 1."预留带宽"是给网络游戏,浏览网页等一些不会抢带宽的程序突发使用,有趣的是,当这
# 些程序用了"预留带宽",本程序又会从讯雷,BT等带宽大鳄那里抢回一部分带宽作"预留
# 带宽",在恶劣的使用环境下(比如大家都在下载),最后的限制带宽就是"预留带宽".
# 建议"预留带宽"值取256000-512000,太小影响网络游戏,浏览网页的速度,太大又会影
# 响下载的速度;
# 2."最大带宽"取你的路由器出口带宽值;
# 3."步进带宽"是本程序自动设置限制带宽时的加减值,1兆路由器出口带宽设5000,2兆设
# 10000,10兆设50000,其它按此类推.
# 4."免设置范围",当"即时流量"在("最大带宽"减"预留带宽")上下一定范围内,程序不会
# 改变pcq-rate值,可减少写硬盘次数.可取值20000-100000,越大对硬盘越好,太大会影
# 响下载速度.
# 安装方法:
# 1.安装请做备份,winbox,files-backup.
# 1.首先要做好简单的PCQ限速,起名"PCQ-Download".上行PCQ限速不明显,建议不要做.
# 上行要在queue simple里做单机限速.(很多网站介绍,上baidu搜routeros限速);
# 2.winbox,system-scripts,按+,起名SCRIPT_PCQ_SET,source里贴入这里全部内容;
# 3.winbox,system-scheduler,按+,起名"SCH_PCQ_SET",interval填00:00:01(这是秒杀,
# 可设1-3秒),on event填SCRIPT_PCQ_SET;
# 4.程序内字母大小写敏感,请注意;
# 5.请特别注意PCQ名"PCQ-Download".还有网卡的名"public"和"local".
# 更新说明:
# 1.针对PCQ上行限速不明显,已去掉PCQ上行限速,请另作queue simple限速,
# 如:limit-at=0/128000 max-limit=0/256000.(2007-05-05)
# 2.原来是每秒写硬盘一次!现在只有PCQ限速值改变时才会写硬盘.(2007-05-05)
# 3.经过前两点修改,cpu使用率大幅下降.(2007-05-05)
# 4.加入"免设置范围",可大幅减少写硬盘次数.(2007-05-08)
####################################################################################
#定义变量(注意在Ros2.8中可以不要后面的0)
:local RxCurRate 0
:local RxCurSet 0
:local RxResRate 0
:local RxMaxRate 0
:local RxStepRate 0
:local RxRangRate 0
#下行即时流量
#interface monitor public once do={:set RxCurRate $received-bits-per-second}
interface monitor local once do={:set RxCurRate $sent-bits-per-second}
#下行当前设置
:set RxCurSet [/queue type get [/queue type find name="PCQ-Download"] pcq-rate]
#下行预留带宽
:set RxResRate 128000
#下行最大带宽
:set RxMaxRate 1024000
#下行步进带宽
:set RxStepRate 5000
#免设置范围(有助于减少写硬盘次数)
:set RxRangRate 30000
#加大限制带宽
:if($RxCurRate<($RxMaxRate+-$RxResRate+-$RxRangRate)&&$RxCurSet<$RxMaxRate) do={
:set RxCurSet ($RxCurSet+$RxStepRate)
/queue type set "PCQ-Download" kind=pcq pcq-rate=$RxCurSet pcq-classifier=dst-address
}
#减少限制带宽
:if($RxCurRate>($RxMaxRate+-$RxResRate+$RxRangRate)&&$RxCurSet>$RxResRate) do={
:set RxCurSet ($RxCurSet+-$RxStepRate)
/queue type set "PCQ-Download" kind=pcq pcq-rate=$RxCurSet pcq-classifier=dst-address
}
######程序结束###################################################################### |
|
楼主: kuwin
|Archiver|手机版|小黑屋|软路由
( 渝ICP备15001194号-1|
渝公网安备 50011602500124号 )
IP卡
狗仔卡
发表于 2007-5-7 14:32:52
显身卡
