|
@@ -0,0 +1,127 @@
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+DEV=eth0
|
|
|
+BOX_IP=42.42.42.42
|
|
|
+TOR_IP=43.43.43.43
|
|
|
+
|
|
|
+
|
|
|
+RTT_LATENCY=40
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+RATE_UP=5000
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+RATE_UP_TOR=1500
|
|
|
+
|
|
|
+
|
|
|
+RATE_UP_TOR_CEIL=5000
|
|
|
+
|
|
|
+CHAIN=OUTPUT
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+MTU=1500
|
|
|
+AVG_PKT=900
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+BDP=$(expr $RTT_LATENCY \* $RATE_UP / $AVG_PKT)
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+BDP=$(expr $BDP / 4)
|
|
|
+
|
|
|
+if [ "$1" = "status" ]
|
|
|
+then
|
|
|
+ echo "[qdisc]"
|
|
|
+ tc -s qdisc show dev $DEV
|
|
|
+ tc -s qdisc show dev imq0
|
|
|
+ echo "[class]"
|
|
|
+ tc -s class show dev $DEV
|
|
|
+ tc -s class show dev imq0
|
|
|
+ echo "[filter]"
|
|
|
+ tc -s filter show dev $DEV
|
|
|
+ tc -s filter show dev imq0
|
|
|
+ echo "[iptables]"
|
|
|
+ iptables -t mangle -L TORSHAPER-OUT -v -x 2> /dev/null
|
|
|
+ exit
|
|
|
+fi
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+tc qdisc del dev $DEV root 2> /dev/null > /dev/null
|
|
|
+tc qdisc del dev imq0 root 2> /dev/null > /dev/null
|
|
|
+iptables -t mangle -D POSTROUTING -o $DEV -j TORSHAPER-OUT 2> /dev/null > /dev/null
|
|
|
+iptables -t mangle -D PREROUTING -o $DEV -j TORSHAPER-OUT 2> /dev/null > /dev/null
|
|
|
+iptables -t mangle -D OUTPUT -o $DEV -j TORSHAPER-OUT 2> /dev/null > /dev/null
|
|
|
+iptables -t mangle -F TORSHAPER-OUT 2> /dev/null > /dev/null
|
|
|
+iptables -t mangle -X TORSHAPER-OUT 2> /dev/null > /dev/null
|
|
|
+ip link set imq0 down 2> /dev/null > /dev/null
|
|
|
+rmmod imq 2> /dev/null > /dev/null
|
|
|
+
|
|
|
+if [ "$1" = "stop" ]
|
|
|
+then
|
|
|
+ echo "Shaping removed on $DEV."
|
|
|
+ exit
|
|
|
+fi
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+ip link set dev $DEV qlen $BDP
|
|
|
+
|
|
|
+
|
|
|
+tc qdisc add dev $DEV root handle 1: htb default 20
|
|
|
+
|
|
|
+
|
|
|
+tc class add dev $DEV parent 1: classid 1:1 htb rate ${RATE_UP}kbit
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+tc class add dev $DEV parent 1:1 classid 1:20 htb rate $(expr $RATE_UP - $RATE_UP_TOR)kbit ceil ${RATE_UP}kbit prio 0
|
|
|
+tc class add dev $DEV parent 1:1 classid 1:21 htb rate $[$RATE_UP_TOR]kbit ceil ${RATE_UP_TOR_CEIL}kbit prio 10
|
|
|
+
|
|
|
+
|
|
|
+tc qdisc add dev $DEV parent 1:20 handle 20: pfifo limit $BDP
|
|
|
+tc qdisc add dev $DEV parent 1:21 handle 21: pfifo limit $BDP
|
|
|
+
|
|
|
+
|
|
|
+tc filter add dev $DEV parent 1:0 prio 0 protocol ip handle 20 fw flowid 1:20
|
|
|
+tc filter add dev $DEV parent 1:0 prio 0 protocol ip handle 21 fw flowid 1:21
|
|
|
+
|
|
|
+
|
|
|
+iptables -t mangle -N TORSHAPER-OUT
|
|
|
+iptables -t mangle -I $CHAIN -o $DEV -j TORSHAPER-OUT
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+iptables -t mangle -A TORSHAPER-OUT -s $TOR_IP -j MARK --set-mark 21
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+iptables -t mangle -A TORSHAPER-OUT -m mark --mark 0 -j MARK --set-mark 20
|
|
|
+
|
|
|
+echo "Outbound shaping added to $DEV. Rate for Tor upload at least: ${RATE_UP_TOR}Kbyte/sec."
|