root / plugins / virtualization / xen_traffic_all @ e3899a30
Historique | Voir | Annoter | Télécharger (2,09 ko)
| 1 | 7a011dcd | Mario Manno | #!/bin/sh |
|---|---|---|---|
| 2 | # Author: mario manno <projects@manno.name> |
||
| 3 | # Description: measure traffic for all xen hosts |
||
| 4 | # |
||
| 5 | e192d8d9 | ward | # Changelog: |
| 6 | # Also handle domUs with named network interfaces. |
||
| 7 | # Ward Vandewege (ward@gnu.org), 2011-04-20 |
||
| 8 | # |
||
| 9 | 7a011dcd | Mario Manno | #%# family=auto |
| 10 | #%# capabilities=autoconf |
||
| 11 | |||
| 12 | if [ "$1" = "autoconf" ]; then |
||
| 13 | if which xm > /dev/null ; then |
||
| 14 | echo yes |
||
| 15 | else |
||
| 16 | echo "no (xm not found)" |
||
| 17 | exit 1 |
||
| 18 | fi |
||
| 19 | if [ -r /proc/net/dev ]; then |
||
| 20 | echo yes |
||
| 21 | else |
||
| 22 | echo "no (/proc/net/dev not found)" |
||
| 23 | exit 1 |
||
| 24 | fi |
||
| 25 | exit 0 |
||
| 26 | fi |
||
| 27 | |||
| 28 | if [ "$1" = "config" ]; then |
||
| 29 | echo 'graph_title Xen Traffic' |
||
| 30 | echo 'graph_vlabel bits received (-) / sent (+) per ${graph_period}'
|
||
| 31 | echo 'graph_args --base 1024 -l 0' |
||
| 32 | e3899a30 | Gabriele Pohl | echo 'graph_category Virtualization' |
| 33 | 7a011dcd | Mario Manno | DOMAINS=$(xm list | awk '{print $1}' | egrep -v "^(Name|Domain-0)")
|
| 34 | for dom in $DOMAINS; do |
||
| 35 | e192d8d9 | ward | name=$( echo $dom | tr .- __ ) |
| 36 | 7a011dcd | Mario Manno | #echo $name"UP.label $name" |
| 37 | #echo $name"DOWN.label $name" |
||
| 38 | |||
| 39 | echo $name'Down.label received' |
||
| 40 | echo $name'Down.type COUNTER' |
||
| 41 | echo $name'Down.graph no' |
||
| 42 | echo "${name}Down.cdef ${name}Down,8,*"
|
||
| 43 | echo "${name}Up.label ${name}"
|
||
| 44 | echo $name'Up.type COUNTER' |
||
| 45 | echo "${name}Up.negative ${name}Down"
|
||
| 46 | echo "${name}Up.cdef ${name}Up,8,*"
|
||
| 47 | done |
||
| 48 | exit 0 |
||
| 49 | fi |
||
| 50 | |||
| 51 | DOMAINS=$(xm list | awk '{print $1}' | egrep -v "^(Name|Domain-0)")
|
||
| 52 | for dom in $DOMAINS; do |
||
| 53 | e192d8d9 | ward | dev=$( xm list $dom --long | awk '/vifname / { print $2 }' | sed 's/)//' )
|
| 54 | if [ "$dev" == "" ]; then |
||
| 55 | dev=$( xm network-list $dom |\ |
||
| 56 | egrep "^[0-9]+" | sed 's@^.*vif/\([0-9]*\)/\([0-9]*\).*$@vif\1.\2@') |
||
| 57 | fi |
||
| 58 | name=$( echo $dom | tr .- __ ) |
||
| 59 | 7a011dcd | Mario Manno | #awk -v name="$name" -v interface="$dev" -F'[: \t]+' \ |
| 60 | #'{ sub(/^ */,""); if ($1 == interface) \
|
||
| 61 | #print name"DOWN.value "$2"\n"name"UP.value "$10; }' /proc/net/dev |
||
| 62 | awk -v name="$name" -v interface="$dev" \ |
||
| 63 | 'BEGIN { gsub(/\./, "\\.", interface) } \
|
||
| 64 | $1 ~ "^" interface ":" {
|
||
| 65 | split($0, a, /: */); $0 = a[2]; \ |
||
| 66 | print name"Down.value " $1 "\n"name"Up.value " $9 \ |
||
| 67 | }' \ |
||
| 68 | /proc/net/dev |
||
| 69 | done |