rev |
line source |
pankso@157
|
1 #!/bin/sh
|
pankso@157
|
2 #*/5 * * * * /var/www/mirror-info/bin/makegraphs >/dev/null
|
pankso@157
|
3
|
pankso@157
|
4 # RRD database directory
|
pankso@157
|
5 rrdlog="/var/spool/rrd"
|
pankso@157
|
6
|
pankso@157
|
7 # Images directory
|
pankso@184
|
8 rrdgraph="/var/www/mirror-info/images/rrd"
|
pankso@157
|
9
|
pankso@157
|
10 # Colors
|
pankso@157
|
11 #rrdcolors="--color SHADEA#EAE9EE --color SHADEB#EAE9EE --color BACK#EAE9EE"
|
pankso@157
|
12 rrdcolors="--color SHADEA#FFFFFF --color SHADEB#FFFFFF --color BACK#FFFFFF"
|
pankso@157
|
13 rrdgraphargs="-aPNG -i -z --alt-y-grid -w 600 -h 100 -r $rrdcolors"
|
pankso@157
|
14
|
pankso@157
|
15 [ -d $rrdlog ] || mkdir -p $rrdlog
|
pankso@157
|
16 [ -d $rrdgraph ] || mkdir -p $rrdgraph
|
pankso@157
|
17
|
pankso@157
|
18 updatecpudata() {
|
pankso@157
|
19 [ -e "$rrdlog/cpu.rrd" ] || rrdtool create $rrdlog/cpu.rrd --step=300 \
|
pankso@157
|
20 DS:user:COUNTER:600:0:500000000 \
|
pankso@157
|
21 DS:system:COUNTER:600:0:500000000 \
|
pankso@157
|
22 DS:idle:COUNTER:600:0:500000000 \
|
pankso@157
|
23 RRA:AVERAGE:0.5:1:576 RRA:AVERAGE:0.5:6:672 \
|
pankso@157
|
24 RRA:AVERAGE:0.5:24:732 RRA:AVERAGE:0.5:144:1460
|
pankso@157
|
25 grep '^cpu' /proc/stat | while read cpu user nice system idle misc; do
|
pankso@157
|
26 rrdtool update $rrdlog/cpu.rrd -t user:system:idle \
|
pankso@157
|
27 N:$(( $user + $nice )):$system:$idle
|
pankso@157
|
28 break
|
pankso@157
|
29 done
|
pankso@157
|
30
|
pankso@157
|
31 [ -e "$rrdlog/cpu2.rrd" ] &&
|
pankso@157
|
32 grep '^cpu' /proc/stat | while read cpu user nice system idle misc; do
|
pankso@157
|
33 rrdtool update $rrdlog/cpu2.rrd -t nice:user:system:idle \
|
pankso@157
|
34 N:$nice:$user:$system:$idle
|
pankso@157
|
35 break
|
pankso@157
|
36 done
|
pankso@157
|
37 }
|
pankso@157
|
38
|
pankso@157
|
39 updatecpugraph() {
|
pankso@157
|
40 period=$1
|
pascal@361
|
41 info="$(sed '/cpuinfo=/!d;s/.*cpuinfo=\([^ ]*\).*/: \1/;s/_/ /g' /proc/cmdline)"
|
pascal@361
|
42 [ -n "$info" ] || info="$(grep '^model name' /proc/cpuinfo)"
|
pascal@361
|
43 info="$(echo "$info" | cut -d: -f2 | sed 's/ * / /g' | head -1)"
|
pankso@157
|
44 rrdtool graph "$rrdgraph/cpu-$period.png" --start -1$period \
|
pankso@157
|
45 $rrdgraphargs -l 0 -u 100 -t "cpu usage per $period [$info ]" \
|
pankso@157
|
46 DEF:user=$rrdlog/cpu.rrd:user:AVERAGE \
|
pankso@157
|
47 DEF:system=$rrdlog/cpu.rrd:system:AVERAGE \
|
pankso@157
|
48 DEF:idle=$rrdlog/cpu.rrd:idle:AVERAGE \
|
pankso@157
|
49 'CDEF:total=user,system,idle,+,+' \
|
pankso@157
|
50 'CDEF:userpct=100,user,total,/,*' \
|
pankso@157
|
51 'CDEF:systempct=100,system,total,/,*' \
|
pankso@157
|
52 'CDEF:idlepct=100,idle,total,/,*' \
|
pankso@157
|
53 'AREA:userpct#0000FF:user cpu usage' \
|
pankso@157
|
54 'STACK:systempct#FF0000:system cpu usage' \
|
pankso@157
|
55 'STACK:idlepct#00FF00:idle cpu usage\j'
|
pankso@157
|
56 }
|
pankso@157
|
57
|
pankso@157
|
58
|
pankso@157
|
59 updatememgraph() {
|
pankso@157
|
60 period=$1
|
pankso@157
|
61 info="$(free | awk '\
|
pankso@157
|
62 { \
|
pankso@157
|
63 if (/Mem:/) { \
|
pankso@157
|
64 if ($2 < 10000) printf "%d KB",$2; \
|
pankso@157
|
65 else if ($2 < 10000000) printf "%d MB",$2/1024; \
|
pankso@157
|
66 else printf "%d GB",$2/1024/1024; \
|
pankso@157
|
67 } \
|
pankso@157
|
68 }')"
|
pankso@157
|
69 info2="$(free | awk '\
|
pankso@157
|
70 { \
|
pankso@157
|
71 if (/Swap:/) { \
|
pankso@157
|
72 if ($2 < 10000) printf "%d KB",$2; \
|
pankso@157
|
73 else if ($2 < 10000000) printf "%d MB",$2/1024; \
|
pankso@157
|
74 else printf "%d GB",$2/1024/1024; \
|
pankso@157
|
75 } \
|
pankso@157
|
76 }')"
|
pankso@157
|
77 rrdtool graph "$rrdgraph/memory-$period.png" --start -1$period \
|
pankso@157
|
78 $rrdgraphargs -l 0 -u 100 \
|
pankso@157
|
79 -t "memory usage per $period [ $info + $info2 swap ]" \
|
pankso@157
|
80 DEF:used=$rrdlog/mem.rrd:memused:AVERAGE \
|
pankso@157
|
81 DEF:free=$rrdlog/mem.rrd:memfree:AVERAGE \
|
pankso@157
|
82 DEF:shared=$rrdlog/mem.rrd:memshared:AVERAGE \
|
pankso@157
|
83 DEF:buffer=$rrdlog/mem.rrd:membuffers:AVERAGE \
|
pankso@157
|
84 DEF:cache=$rrdlog/mem.rrd:memcache:AVERAGE \
|
pankso@157
|
85 DEF:swused=$rrdlog/mem.rrd:swapused:AVERAGE \
|
pankso@157
|
86 DEF:swfree=$rrdlog/mem.rrd:swapfree:AVERAGE \
|
pankso@157
|
87 'CDEF:total=used,free,+' \
|
pankso@157
|
88 'CDEF:used2=used,buffer,cache,shared,+,+,-' \
|
pankso@157
|
89 'CDEF:usedpct=100,used2,total,/,*' \
|
pankso@157
|
90 'CDEF:sharedpct=100,shared,total,/,*' \
|
pankso@157
|
91 'CDEF:bufferpct=100,buffer,total,/,*' \
|
pankso@157
|
92 'CDEF:cachepct=100,cache,total,/,*' \
|
pankso@157
|
93 'CDEF:freepct=100,free,total,/,*' \
|
pankso@157
|
94 'CDEF:swtotal=swused,swfree,+' \
|
pankso@157
|
95 'CDEF:swusedpct=100,swused,swtotal,/,*' \
|
pankso@157
|
96 'AREA:usedpct#0000FF:used memory' \
|
pankso@157
|
97 'STACK:sharedpct#FF7F00:shared memory' \
|
pankso@157
|
98 'STACK:bufferpct#FF00FF:buffered memory' \
|
pankso@157
|
99 'STACK:cachepct#FFFF00:cached memory' \
|
pankso@157
|
100 'STACK:freepct#00FF00:free memory' \
|
pankso@157
|
101 'LINE2:swusedpct#FF0000:used swap\j'
|
pankso@157
|
102 }
|
pankso@157
|
103
|
pankso@157
|
104 updatememdata () {
|
pankso@157
|
105 [ -e "$rrdlog/mem.rrd" ] ||
|
pankso@157
|
106 rrdtool create "$rrdlog/mem.rrd" --step=300 \
|
pankso@157
|
107 DS:memused:ABSOLUTE:600:0:5000000000 \
|
pankso@157
|
108 DS:memfree:ABSOLUTE:600:0:5000000000 \
|
pankso@157
|
109 DS:memshared:ABSOLUTE:600:0:5000000000 \
|
pankso@157
|
110 DS:membuffers:ABSOLUTE:600:0:5000000000 \
|
pankso@157
|
111 DS:memcache:ABSOLUTE:600:0:5000000000 \
|
pankso@157
|
112 DS:swapused:ABSOLUTE:600:0:5000000000 \
|
pankso@157
|
113 DS:swapfree:ABSOLUTE:600:0:5000000000 \
|
pankso@157
|
114 RRA:AVERAGE:0.5:1:576 RRA:AVERAGE:0.5:6:672 \
|
pankso@157
|
115 RRA:AVERAGE:0.5:24:732 RRA:AVERAGE:0.5:144:1460
|
pankso@157
|
116
|
pankso@157
|
117 while read tag count unit; do
|
pankso@157
|
118 case "$tag" in
|
pankso@157
|
119 MemTotal:) memtotal=$(($count * 1024));;
|
pankso@157
|
120 MemFree:) memfree=$(($count * 1024))
|
pankso@157
|
121 memused=$(($memtotal - $memfree))
|
pankso@157
|
122 memshared=0;;
|
pankso@157
|
123 MemShared:) memshared=$(($count * 1024));;
|
pankso@157
|
124 Buffers:) membuffers=$(($count * 1024));;
|
pankso@157
|
125 Cached:) memcache=$(($count * 1024));;
|
pankso@157
|
126 SwapTotal:) swaptotal=$(($count * 1024));;
|
pankso@157
|
127 SwapFree:) swapfree=$(($count * 1024))
|
pankso@157
|
128 swapused=$(( $swaptotal - $swapfree));;
|
pankso@157
|
129 esac
|
pankso@157
|
130 done < /proc/meminfo
|
pankso@157
|
131
|
pankso@157
|
132 rrdtool update "$rrdlog/mem.rrd" \
|
pankso@157
|
133 -t memused:memfree:memshared:membuffers:memcache:swapused:swapfree \
|
pankso@157
|
134 "N:$memused:$memfree:$memshared:$membuffers:$memcache:$swapused:$swapfree"
|
pankso@157
|
135 }
|
pankso@157
|
136
|
pankso@157
|
137 getmax() {
|
pankso@157
|
138 rrdtool fetch $rrdlog/$1.rrd AVERAGE | awk '\
|
pankso@157
|
139 BEGIN {max=0} \
|
pankso@157
|
140 /^[0-9]/ { \
|
pankso@157
|
141 if ($2 != "nan" && $2 > max) max=$2; \
|
pankso@157
|
142 if ($3 != "nan" && $3 > max) max=$3; \
|
pankso@157
|
143 } \
|
pankso@157
|
144 END { print max }' | sed 's/,/./'
|
pankso@157
|
145 }
|
pankso@157
|
146
|
pankso@157
|
147 updatediskgraph() {
|
pankso@157
|
148 period=$1
|
pascal@361
|
149 extra="--logarithmic --lower-limit 1"
|
pascal@361
|
150 [ "$period" == "day" ] && maxdisk="$(getmax disk)" && extra=""
|
pankso@157
|
151 info=""
|
pankso@157
|
152 [ -r $2 ] &&
|
pankso@157
|
153 info="[ $(fdisk -l 2> /dev/null | grep "^Disk $2:" | \
|
pankso@157
|
154 sed "s|Disk $2: \(.*\), .*|\1|") ]"
|
pankso@157
|
155 if [ -e /sys/block/${2#/dev/}/device/iodone_cnt ]; then
|
pankso@157
|
156 # --right-axis-label "I/O state %"
|
pankso@157
|
157 rrdtool graph "$rrdgraph/disk-$period.png" --start -1$period \
|
pankso@157
|
158 $rrdgraphargs -t "disk access per $period $info" \
|
pascal@361
|
159 $extra -v "Sectors/second" --units=si \
|
pankso@157
|
160 DEF:read=$rrdlog/disk.rrd:readsect:AVERAGE \
|
pankso@157
|
161 DEF:write=$rrdlog/disk.rrd:writesect:AVERAGE \
|
pankso@157
|
162 DEF:req=$rrdlog/iodisk.rrd:req:AVERAGE \
|
pankso@157
|
163 DEF:done=$rrdlog/iodisk.rrd:done:AVERAGE \
|
pankso@157
|
164 DEF:err=$rrdlog/iodisk.rrd:err:AVERAGE \
|
pankso@157
|
165 "CDEF:readpct=100,read,$maxdisk,/,*" \
|
pankso@157
|
166 "CDEF:writepct=100,write,$maxdisk,/,*" \
|
pankso@157
|
167 "CDEF:errpct=100,err,req,/,*" \
|
pankso@157
|
168 "CDEF:donepct=100,done,req,/,*" \
|
pascal@334
|
169 'AREA:readpct#0000FF:sectors written from disk' \
|
pascal@334
|
170 'STACK:writepct#00FF00:sectors read to disk' \
|
pankso@157
|
171 'LINE2:donepct#FFFF00:I/O complete' \
|
pankso@157
|
172 'LINE2:errpct#FF0000:I/O error\j'
|
pankso@157
|
173 else
|
pankso@157
|
174 rrdtool graph "$rrdgraph/disk-$period.png" --start -1$period \
|
pankso@157
|
175 $rrdgraphargs -t "disk access per $period $info" \
|
pascal@361
|
176 $extra -v "Sectors/second" --units=si \
|
pankso@157
|
177 DEF:read=$rrdlog/disk.rrd:readsect:AVERAGE \
|
pankso@157
|
178 DEF:write=$rrdlog/disk.rrd:writesect:AVERAGE \
|
pascal@361
|
179 DEF:blk=$rrdlog/usagedisk.rrd:broot:AVERAGE \
|
pascal@361
|
180 DEF:ino=$rrdlog/usagedisk.rrd:iroot:AVERAGE \
|
pankso@157
|
181 "CDEF:readpct=100,read,$maxdisk,/,*" \
|
pankso@157
|
182 "CDEF:writepct=100,write,$maxdisk,/,*" \
|
pascal@334
|
183 'AREA:readpct#0000FF:sectors written from disk' \
|
pascal@361
|
184 'STACK:writepct#00FF00:sectors read to disk' \
|
pascal@361
|
185 'LINE1:ino#FF00FF:% inodes used' \
|
pascal@361
|
186 'LINE1:blk#FF0000:% blocks used\j'
|
pankso@157
|
187 fi
|
pankso@157
|
188 }
|
pankso@157
|
189
|
pankso@157
|
190 updatediskdata() {
|
pankso@157
|
191 dev=$1
|
pankso@157
|
192 [ -e "$rrdlog/disk.rrd" ] ||
|
pankso@157
|
193 rrdtool create "$rrdlog/disk.rrd" --step=300 \
|
pankso@157
|
194 DS:readsect:COUNTER:600:0:5000000000 \
|
pankso@157
|
195 DS:writesect:COUNTER:600:0:5000000000 \
|
pankso@157
|
196 RRA:AVERAGE:0.5:1:576 RRA:AVERAGE:0.5:6:672 \
|
pankso@157
|
197 RRA:AVERAGE:0.5:24:732 RRA:AVERAGE:0.5:144:1460
|
pankso@157
|
198 [ -e "$rrdlog/iodisk.rrd" ] ||
|
pankso@157
|
199 rrdtool create "$rrdlog/iodisk.rrd" --step=300 \
|
pankso@157
|
200 DS:done:GAUGE:600:0:U DS:err:GAUGE:600:0:U \
|
pankso@157
|
201 DS:req:GAUGE:600:0:U \
|
pankso@157
|
202 RRA:AVERAGE:0.5:1:576 RRA:AVERAGE:0.5:6:672 \
|
pankso@157
|
203 RRA:AVERAGE:0.5:24:732 RRA:AVERAGE:0.5:144:1460
|
pascal@361
|
204 [ -e "$rrdlog/usagedisk.rrd" ] ||
|
pascal@361
|
205 rrdtool create "$rrdlog/usagedisk.rrd" --step=300 \
|
pascal@361
|
206 DS:broot:GAUGE:600:0:U DS:iroot:GAUGE:600:0:U \
|
pascal@361
|
207 RRA:AVERAGE:0.5:1:576 RRA:AVERAGE:0.5:6:672 \
|
pascal@361
|
208 RRA:AVERAGE:0.5:24:732 RRA:AVERAGE:0.5:144:1460
|
pankso@157
|
209
|
pankso@157
|
210 while read major minor name readreq readsect writereq writesect misc; do
|
pankso@157
|
211 [ $major = $(( 0x$(stat -c %t $dev) )) ] || continue
|
pankso@157
|
212 [ $minor = $(( 0x$(stat -c %T $dev) )) ] || continue
|
pankso@157
|
213 rrdtool update "$rrdlog/disk.rrd" -t readsect:writesect \
|
pankso@157
|
214 N:$readsect:$writesect
|
pankso@157
|
215 done < /proc/diskstats
|
pankso@157
|
216 disk=${dev:0:8}
|
pankso@157
|
217 dir=/sys/block/${disk#/dev/}/device
|
pascal@361
|
218 iroot=$(df -i / | sed '$!d;s/.* \([0-9]*\)% \/.*/\1/')
|
pascal@361
|
219 broot=$(df / | sed '$!d;s/.* \([0-9]*\)% \/.*/\1/')
|
pascal@361
|
220 rrdtool update "$rrdlog/usagedisk.rrd" -t broot:iroot N:$broot:$iroot
|
pascal@361
|
221 [ -e $dir/iorequest_cnt ] || return
|
pankso@157
|
222 done=$(printf "%d\n" $(cat $dir/iodone_cnt 2> /dev/null) )
|
pankso@157
|
223 err=$(printf "%d\n" $(cat $dir/ioerr_cnt 2> /dev/null) )
|
pankso@157
|
224 req=$(printf "%d\n" $(cat $dir/iorequest_cnt 2> /dev/null) )
|
pankso@157
|
225 rrdtool update "$rrdlog/iodisk.rrd" -t done:err:req N:$done:$err:$req
|
pankso@157
|
226 }
|
pankso@157
|
227
|
pankso@157
|
228 updateifgraph() {
|
pankso@157
|
229 interface=$1
|
pankso@157
|
230 period=$2
|
pankso@157
|
231 rrdtool graph "$rrdgraph/$interface-$period.png" --start -1$period \
|
pankso@157
|
232 $rrdgraphargs -t "traffic on $interface graph per $period" \
|
pankso@157
|
233 --logarithmic -A -v "Bytes/second" --units=si \
|
pankso@157
|
234 DEF:incoming=$rrdlog/$interface.rrd:incoming:AVERAGE \
|
pankso@157
|
235 DEF:outgoing=$rrdlog/$interface.rrd:outgoing:AVERAGE \
|
pascal@361
|
236 DEF:tcp=$rrdlog/proto-$interface.rrd:tcp:AVERAGE \
|
pankso@157
|
237 'AREA:incoming#00FF00:incoming traffic' \
|
pascal@361
|
238 'GPRINT:outgoing:MAX:max output%8.3lf %sBps' \
|
pascal@361
|
239 'LINE1:outgoing#0000FF:outgoing traffic' \
|
pascal@361
|
240 'LINE1:tcp#000000:connections\j'
|
pankso@157
|
241 }
|
pankso@157
|
242
|
pankso@157
|
243 netframes() {
|
pankso@157
|
244 ifconfig $1 | grep "$2 packets" | sed -re "s/.*$3:([0-9]+).*/\1/g"
|
pankso@157
|
245 }
|
pankso@157
|
246
|
pankso@157
|
247 netstats() {
|
pankso@157
|
248 ifconfig $1 | grep bytes | sed -re "s/.*$2 bytes:([0-9]+).*/\1/g"
|
pankso@157
|
249 }
|
pankso@157
|
250
|
pascal@361
|
251 netproto()
|
pascal@361
|
252 {
|
pascal@361
|
253 proto=${1:-tcp}
|
pascal@361
|
254 if [ -n "$2" ]; then
|
pascal@361
|
255 netstat -an 2> /dev/null | grep -v '0.0.0.0:*' | grep "^$proto" | grep ":$2 " | wc -l
|
pascal@361
|
256 else
|
pascal@361
|
257 netstat -an 2> /dev/null | grep -v '0.0.0.0:*' | grep "^$proto" | wc -l
|
pascal@361
|
258 fi
|
pascal@361
|
259 }
|
pascal@361
|
260
|
pankso@157
|
261 updateifdata() {
|
pankso@157
|
262 interface=$1
|
pankso@157
|
263 [ -e "$rrdlog/$interface.rrd" ] ||
|
pankso@157
|
264 rrdtool create "$rrdlog/$interface.rrd" --step=300 \
|
pankso@157
|
265 DS:incoming:COUNTER:600:0:U \
|
pankso@157
|
266 DS:outgoing:COUNTER:600:0:U \
|
pankso@157
|
267 RRA:AVERAGE:0.5:1:576 RRA:AVERAGE:0.5:6:672 \
|
pankso@157
|
268 RRA:AVERAGE:0.5:24:732 RRA:AVERAGE:0.5:144:1460
|
pankso@157
|
269 [ -e "$rrdlog/packets-$interface.rrd" ] ||
|
pankso@157
|
270 rrdtool create "$rrdlog/packets-$interface.rrd" --step=300 \
|
pankso@157
|
271 DS:in:COUNTER:600:0:U DS:out:COUNTER:600:0:U \
|
pankso@157
|
272 DS:inerr:COUNTER:600:0:U DS:outerr:COUNTER:600:0:U \
|
pankso@157
|
273 DS:indrop:COUNTER:600:0:U DS:outdrop:COUNTER:600:0:U \
|
pankso@157
|
274 DS:inov:COUNTER:600:0:U DS:outov:COUNTER:600:0:U \
|
pankso@157
|
275 DS:frame:COUNTER:600:0:U DS:carrier:COUNTER:600:0:U \
|
pankso@157
|
276 RRA:AVERAGE:0.5:1:576 RRA:AVERAGE:0.5:6:672 \
|
pankso@157
|
277 RRA:AVERAGE:0.5:24:732 RRA:AVERAGE:0.5:144:1460
|
pascal@361
|
278 [ -e "$rrdlog/proto-$interface.rrd" ] ||
|
pascal@361
|
279 rrdtool create "$rrdlog/proto-$interface.rrd" --step=300 \
|
pascal@361
|
280 DS:tcp:GAUGE:600:0:U DS:udp:GAUGE:600:0:U \
|
pascal@361
|
281 DS:rsync:GAUGE:600:0:U DS:www:GAUGE:600:0:U \
|
pascal@361
|
282 DS:ssh:GAUGE:600:0:U \
|
pascal@361
|
283 RRA:AVERAGE:0.5:1:576 RRA:AVERAGE:0.5:6:672 \
|
pascal@361
|
284 RRA:AVERAGE:0.5:24:732 RRA:AVERAGE:0.5:144:1460
|
pankso@157
|
285 rx=$(netstats $interface RX)
|
pankso@157
|
286 tx=$(netstats $interface TX)
|
pankso@157
|
287 rrdtool update "$rrdlog/$interface.rrd" -t incoming:outgoing \
|
pankso@157
|
288 N:${rx:-U}:${tx:-U}
|
pankso@157
|
289 rx=$(netframes $interface RX packets)
|
pankso@157
|
290 tx=$(netframes $interface TX packets)
|
pankso@157
|
291 rxerr=$(netframes $interface RX errors)
|
pankso@157
|
292 txerr=$(netframes $interface TX errors)
|
pankso@157
|
293 rxdrop=$(netframes $interface RX dropped)
|
pankso@157
|
294 txdrop=$(netframes $interface TX dropped)
|
pankso@157
|
295 rxov=$(netframes $interface RX overruns)
|
pankso@157
|
296 txov=$(netframes $interface TX overruns)
|
pankso@157
|
297 frame=$(netframes $interface RX frame)
|
pankso@157
|
298 carrier=$(netframes $interface TX carrier)
|
pankso@157
|
299 rrdtool update "$rrdlog/packets-$interface.rrd" \
|
pankso@157
|
300 -t in:out:inerr:outerr:indrop:outdrop:inov:outov:frame:carrier \
|
pankso@157
|
301 N:${rx:-U}:${tx:-U}:${rxerr:-U}:${txerr:-U}:${rxdrop:-U}:${txdrop:-U}:${rxov:-U}:${txov:-U}:${frame:-U}:${carrier:-U}
|
pascal@361
|
302 rsync=$(netproto tcp 873)
|
pascal@361
|
303 www=$(netproto tcp 80)
|
pascal@361
|
304 ssh=$(netproto tcp 22)
|
pascal@361
|
305 tcp=$(netproto tcp)
|
pascal@361
|
306 udp=$(netproto udp)
|
pascal@361
|
307 rrdtool update "$rrdlog/proto-$interface.rrd" \
|
pascal@361
|
308 -t tcp:udp:rsync:www:ssh \
|
pascal@361
|
309 N:${tcp:-U}:${udp:-U}:${rsync:-U}:${www:-U}:${ssh:-U}
|
pankso@157
|
310 }
|
pankso@157
|
311
|
pankso@157
|
312 getdisk()
|
pankso@157
|
313 {
|
pankso@157
|
314 local d
|
pankso@157
|
315 local i
|
pankso@157
|
316 d=$(stat -c %04D $1)
|
pankso@157
|
317 for i in /dev/* ; do
|
pankso@157
|
318 [ $(stat -c "%02t%02T" $i) == $d ] || continue
|
pankso@157
|
319 echo $i
|
pankso@157
|
320 break
|
pankso@157
|
321 done
|
pankso@157
|
322 }
|
pankso@157
|
323
|
pankso@157
|
324 ###
|
pankso@157
|
325 ### System graphs
|
pankso@157
|
326 ###
|
pankso@157
|
327
|
pankso@157
|
328 updatecpudata
|
pankso@157
|
329 updatecpugraph day
|
pankso@157
|
330 updatecpugraph week
|
pankso@157
|
331 updatecpugraph month
|
pankso@157
|
332 updatecpugraph year
|
pankso@157
|
333
|
pankso@157
|
334 updatememdata
|
pankso@157
|
335 updatememgraph day
|
pankso@157
|
336 updatememgraph week
|
pankso@157
|
337 updatememgraph month
|
pankso@157
|
338 updatememgraph year
|
pankso@157
|
339
|
pankso@157
|
340 if [ -e /proc/diskstats ]; then
|
pankso@157
|
341 disk=$(getdisk $0)
|
pankso@157
|
342 updatediskdata $disk
|
pankso@157
|
343 updatediskgraph day ${disk:0:8}
|
pankso@157
|
344 updatediskgraph week ${disk:0:8}
|
pankso@157
|
345 updatediskgraph month ${disk:0:8}
|
pankso@157
|
346 updatediskgraph year ${disk:0:8}
|
pankso@157
|
347 fi
|
pankso@157
|
348
|
pankso@157
|
349 iface=$(/sbin/route -n | awk '{ if (/^0.0.0.0/) print $8 }')
|
pankso@157
|
350 updateifdata $iface
|
pankso@157
|
351 updateifgraph $iface day
|
pankso@157
|
352 updateifgraph $iface week
|
pankso@157
|
353 updateifgraph $iface month
|
pankso@157
|
354 updateifgraph $iface year
|
pascal@361
|
355
|
pascal@361
|
356 [ ! -s $rrdgraph/boot.html -o /var/log/boot.log -nt $rrdgraph/boot.html ] &&
|
pascal@361
|
357 cat > $rrdgraph/boot.html <<EOT
|
pascal@361
|
358 <html>
|
pascal@361
|
359 <body>
|
pascal@361
|
360 <pre>
|
pascal@361
|
361 $(cat /var/log/dmesg.log /var/log/boot.log | \
|
pascal@361
|
362 sed -e 's/</\</g;s/>/\>/g' -e 's/.*\]R//' -e 's/.*\[?8h//' \
|
pascal@361
|
363 -e 's|.\[1m|<b>|' -e 's|.\[0m|</b>|' -e 's|.\[[0-9][0-9Gm;]*||g' \
|
pascal@361
|
364 -e ':a;s/^\(.\{1,68\}\)\(\[ [A-Za-z]* \]\)/\1 \2/;ta' \
|
pascal@361
|
365 -e 's#\[ OK \]#[ <span style="color: green">OK</span> ]#' \
|
pascal@361
|
366 -e 's#\[ Failed \]#[ <span style="color: red">Failed</span> ]#' \
|
pascal@361
|
367 -e 's|No such .*|<span style="color: red">&</span>|' \
|
pascal@361
|
368 -e 's|ERROR .*|<span style="color: red">&</span>|' \
|
pascal@361
|
369 -e 's|command line: \(.*\)|command line: <span style="color: blue">\1</span>|' \
|
pascal@361
|
370 )
|
pascal@361
|
371 </pre>
|
pascal@361
|
372 </body>
|
pascal@361
|
373 </html>
|
pascal@361
|
374 EOT
|