+ ### SETTING TOS BITS
+END
+;
+ foreach $classentry (sort @classes)
+ {
+ @classline = split( /\;/, $classentry );
+ $qossettings{'CLASS'} = $classline[1];
+ $qossettings{'TOS'} = abs $classline[7] * 2;
+ if ($qossettings{'TOS'} ne "0") {
+ print "\tiptables -t mangle -A QOS-TOS -m mark --mark $qossettings{'CLASS'} -j TOS --set-tos $qossettings{'TOS'}\n";
+ print "\tiptables -t mangle -A QOS-TOS -m mark --mark $qossettings{'CLASS'} -j RETURN\n";
+ }
+ }
+ foreach $subclassentry (sort @subclasses)
+ {
+ @subclassline = split( /\;/, $subclassentry );
+ $qossettings{'SUBCLASS'} = $subclassline[1];
+ $qossettings{'TOS'} = $subclassline[8];
+ $qossettings{'TOS'} = abs $qossettings{'TOS'} * 2;
+ if ($qossettings{'TOS'} ne "0") {
+ print "\tiptables -t mangle -A QOS-TOS -m mark --mark $qossettings{'SUBCLASS'} -j TOS --set-tos $qossettings{'TOS'}\n";
+ print "\tiptables -t mangle -A QOS-TOS -m mark --mark $qossettings{'SUBCLASS'} -j RETURN\n";
+ }
+ }
+
+print <<END
+
+ ## STARTING COLLECTOR
+ /usr/local/bin/qosd $qossettings{'RED_DEV'} >/dev/null 2>&1
+ /usr/local/bin/qosd $qossettings{'IMQ_DEV'} >/dev/null 2>&1
+