| #! /bin/sh -x |
| # |
| # sample script on using the ingress capabilities |
| # This script fwmark tags(IPchains) based on metering on the ingress |
| # interface the result is used for fast classification and re-marking |
| # on the egress interface |
| # This is an example of a color blind mode marker with no PIR configured |
| # based on draft-wahjak-mcm-00.txt (section 3.1) |
| # |
| #path to various utilities; |
| #change to reflect yours. |
| # |
| IPROUTE=/root/DS-6-beta/iproute2-990530-dsing |
| TC=$IPROUTE/tc/tc |
| IP=$IPROUTE/ip/ip |
| IPCHAINS=/root/DS-6-beta/ipchains-1.3.9/ipchains |
| INDEV=eth2 |
| EGDEV="dev eth1" |
| CIR1=1500kbit |
| CIR2=1000kbit |
| |
| #The CBS is about 60 MTU sized packets |
| CBS1=90k |
| CBS2=90k |
| |
| meter1="police rate $CIR1 burst $CBS1 " |
| meter2="police rate $CIR1 burst $CBS2 " |
| meter3="police rate $CIR2 burst $CBS1 " |
| meter4="police rate $CIR2 burst $CBS2 " |
| meter5="police rate $CIR2 burst $CBS2 " |
| # |
| # tag the rest of incoming packets from subnet 10.2.0.0/24 to fw value 1 |
| # tag all incoming packets from any other subnet to fw tag 2 |
| ############################################################ |
| $IPCHAINS -A input -i $INDEV -s 0/0 -m 2 |
| $IPCHAINS -A input -i $INDEV -s 10.2.0.0/24 -m 1 |
| # |
| ############################################################ |
| # install the ingress qdisc on the ingress interface |
| $TC qdisc add dev $INDEV handle ffff: ingress |
| # |
| ############################################################ |
| |
| # All packets are marked with a tcindex value which is used on the egress |
| # tcindex 1 maps to AF41, 2->AF42, 3->AF43, 4->BE |
| # |
| ############################################################ |
| # |
| # anything with fw tag of 1 is passed on with a tcindex value 1 |
| #if it doesnt exceed its allocated rate (CIR/CBS) |
| # |
| $TC filter add dev $INDEV parent ffff: protocol ip prio 4 handle 1 fw \ |
| $meter1 \ |
| continue flowid 4:1 |
| # |
| # if it exceeds the above but not the extra rate/burst below, it gets a |
| #tcindex value of 2 |
| # |
| $TC filter add dev $INDEV parent ffff: protocol ip prio 5 handle 1 fw \ |
| $meter2 \ |
| continue flowid 4:2 |
| # |
| # if it exceeds the above but not the rule below, it gets a tcindex value |
| # of 3 |
| # |
| $TC filter add dev $INDEV parent ffff: protocol ip prio 6 handle 1 fw \ |
| $meter3 \ |
| drop flowid 4:3 |
| # |
| # Anything else (not from the subnet 10.2.0.24/24) gets discarded if it |
| # exceeds 1Mbps and by default goes to BE if it doesnt |
| # |
| $TC filter add dev $INDEV parent ffff: protocol ip prio 6 handle 2 fw \ |
| $meter5 \ |
| drop flowid 4:4 |
| |
| |
| ######################## Egress side ######################## |
| |
| |
| # attach a dsmarker |
| # |
| $TC qdisc add $EGDEV handle 1:0 root dsmark indices 64 |
| # |
| # values of the DSCP to change depending on the class |
| #note that the ECN bits are masked out |
| # |
| #AF41 (0x88 is 0x22 shifted to the right by two bits) |
| # |
| $TC class change $EGDEV classid 1:1 dsmark mask 0x3 \ |
| value 0x88 |
| #AF42 |
| $TC class change $EGDEV classid 1:2 dsmark mask 0x3 \ |
| value 0x90 |
| #AF43 |
| $TC class change $EGDEV classid 1:3 dsmark mask 0x3 \ |
| value 0x98 |
| #BE |
| $TC class change $EGDEV classid 1:4 dsmark mask 0x3 \ |
| value 0x0 |
| # |
| # |
| # The class mapping (using tcindex; could easily have |
| # replaced it with the fw classifier instead) |
| # |
| $TC filter add $EGDEV parent 1:0 protocol ip prio 1 \ |
| handle 1 tcindex classid 1:1 |
| $TC filter add $EGDEV parent 1:0 protocol ip prio 1 \ |
| handle 2 tcindex classid 1:2 |
| $TC filter add $EGDEV parent 1:0 protocol ip prio 1 \ |
| handle 3 tcindex classid 1:3 |
| $TC filter add $EGDEV parent 1:0 protocol ip prio 1 \ |
| handle 4 tcindex classid 1:4 |
| # |
| |
| # |
| echo "---- qdisc parameters Ingress ----------" |
| $TC qdisc ls dev $INDEV |
| echo "---- Class parameters Ingress ----------" |
| $TC class ls dev $INDEV |
| echo "---- filter parameters Ingress ----------" |
| $TC filter ls dev $INDEV parent ffff: |
| |
| echo "---- qdisc parameters Egress ----------" |
| $TC qdisc ls $EGDEV |
| echo "---- Class parameters Egress ----------" |
| $TC class ls $EGDEV |
| echo "---- filter parameters Egress ----------" |
| $TC filter ls $EGDEV parent 1:0 |
| # |
| #deleting the ingress qdisc |
| #$TC qdisc del $INDEV ingress |