mrtg/uptime.pl@300d43423c2e (annotated)
mrtg/uptime.pl
Wed, 08 Feb 2012 20:07:00 +0200
- author
- Michael Schloh von Bennewitz <michael@schloh.com>
- date
- Wed, 08 Feb 2012 20:07:00 +0200
- changeset 588
- 300d43423c2e
- parent 160
- 1a36468e720c
- permissions
- -rw-r--r--
Update version, adapt patch, correct PID writing, correct build on newer
FreeBSD releases, and most importantly introduce new patch to try to
avoid segfault caused by multiple network interfaces with the same (or
no) address. This is common when configuring bridges and tunnels.
| michael@176 | 1 | #! @l_prefix@/bin/perl |
| michael@136 | 2 | ## |
| michael@136 | 3 | ## uptime.pl: provide formatted uptime(1) information |
| michael@136 | 4 | ## |
| michael@136 | 5 | |
| michael@138 | 6 | $null = 0; |
| michael@136 | 7 | $uptime = `uptime`; |
| michael@138 | 8 | $hostname = `hostname`; |
| michael@136 | 9 | |
| michael@136 | 10 | $uptime =~ /up (.*?) day/; |
| michael@136 | 11 | $up = int($1); |
| michael@136 | 12 | |
| michael@160 | 13 | # According to http://oss.oetiker.ch/mrtg/doc/mrtg-reference.en.html |
| michael@160 | 14 | # 'the external command must return 4 lines of output.' |
| michael@138 | 15 | print "$up\n"; |
| michael@138 | 16 | print "$up\n"; |
| michael@138 | 17 | print "$null\n"; |
| michael@160 | 18 | print "$null\n"; |
| michael@136 | 19 |
