1#!/bin/sh
2# Copyright (C) 2011 OpenWrt.org
3
4. /lib/functions.sh
5
6include /lib/network
7
8get_ifname() {
9	local interface="$1"
10	local cfgt
11
12	scan_interfaces
13	config_get cfgt "$interface" TYPE
14	[ "$cfgt" = "interface" ] && config_get "$interface" ifname
15}
16
17config_cb() {
18	config_get TYPE "$CONFIG_SECTION" TYPE
19	[ "interface" = "$TYPE" ] && {
20		config_get device "$CONFIG_SECTION" ifname
21		[ -z "$device" ] && device="$(get_ifname ${CONFIG_SECTION})"
22		config_set "$CONFIG_SECTION" device "$device"
23	}
24}
25
26config_load qos
27
28print_comments() {
29	echo ''
30	echo '# Interface: '"$1"
31	echo '# Direction: '"$2"
32	echo '# Stats:     '"$3"
33	echo ''
34}	
35
36get_device() {
37	( config_load network; scan_interfaces; config_get "$1" ifname )
38}
39
40interface_stats() {
41	local interface="$1"
42	local device
43
44	device="$(get_device "$interface")"
45	[ -z "$device" ] && config_get device "$interface" device
46	config_get_bool enabled "$interface" enabled 1
47	[ -z "$device" -o 1 -ne "$enabled" ] && {
48		return 1
49	}
50	config_get_bool halfduplex "$interface" halfduplex 0
51
52	if [ 1 -ne "$halfduplex" ]; then
53		unset halfduplex
54		print_comments "$interface" "Egress" "Start"
55		tc -s class show dev "$device"
56		print_comments "$interface" "Egress" "End"
57		id="root"
58	else
59		id=""
60	fi
61
62	print_comments "$interface" "Ingress${halfduplex:+/Egress}" "Start"
63	tc -s class show dev "$(tc filter show dev $device $id | grep mirred | sed -e 's,.*\(ifb.*\)).*,\1,')"
64	print_comments "$interface" "Ingress${halfduplex:+/Egress}" "End"
65}
66
67[ -z "$1" ] && config_foreach interface_stats interface || interface_stats "$1"
68