### SET QUEUE LENGTH & MTU - has just to be tested!!! IMPORTANT
ip link set dev $qossettings{'RED_DEV'} qlen $qossettings{'QLENGTH'}
- ip link set dev $qossettings{'RED_DEV'} mtu $qossettings{'MTU'}
+ #ip link set dev $qossettings{'RED_DEV'} mtu $qossettings{'MTU'}
### ADD HTB QDISC FOR $qossettings{'RED_DEV'}
tc qdisc add dev $qossettings{'RED_DEV'} root handle 1: htb default $qossettings{'DEFCLASS_OUT'}
print "-d $qossettings{'DIP'} ";
}
print "-p $qossettings{'PPROT'} ";
- if (($qossettings{'QPORT'} ne '') || ($qossettings{'DPORT'} ne '')){
- print "-m multiport ";
- }
+# if (($qossettings{'QPORT'} ne '') || ($qossettings{'DPORT'} ne '')){
+# print "-m multiport ";
+# }
if ($qossettings{'QPORT'} ne ''){
print "--sport $qossettings{'QPORT'} ";
}
print "-d $qossettings{'DIP'} ";
}
print "-p $qossettings{'PPROT'} ";
- if (($qossettings{'QPORT'} ne '') || ($qossettings{'DPORT'} ne '')){
- print "-m multiport ";
- }
+# if (($qossettings{'QPORT'} ne '') || ($qossettings{'DPORT'} ne '')){
+# print "-m multiport ";
+# }
if ($qossettings{'QPORT'} ne ''){
print "--sport $qossettings{'QPORT'} ";
}
print "-d $qossettings{'DIP'} ";
}
print "-p $qossettings{'PPROT'} ";
- if (($qossettings{'QPORT'} ne '') || ($qossettings{'DPORT'} ne '')){
- print "-m multiport ";
- }
+# if (($qossettings{'QPORT'} ne '') || ($qossettings{'DPORT'} ne '')){
+# print "-m multiport ";
+# }
if ($qossettings{'QPORT'} ne ''){
print "--sport $qossettings{'QPORT'} ";
}
print "-d $qossettings{'DIP'} ";
}
print "-p $qossettings{'PPROT'} ";
- if (($qossettings{'QPORT'} ne '') || ($qossettings{'DPORT'} ne '')){
- print "-m multiport ";
- }
+# if (($qossettings{'QPORT'} ne '') || ($qossettings{'DPORT'} ne '')){
+# print "-m multiport ";
+# }
if ($qossettings{'QPORT'} ne ''){
print "--sport $qossettings{'QPORT'} ";
}