diff options
author | Petter Reinholdtsen <pere@hungry.com> | 2008-05-31 23:22:05 +0000 |
---|---|---|
committer | Petter Reinholdtsen <pere@hungry.com> | 2008-05-31 23:22:05 +0000 |
commit | 5db80a24a94e4361f80d591db2bb4a2e74c8d4cf (patch) | |
tree | 280f53ca8cf62afdfa588c927a3677169016cf6c /SiteSummary.pm | |
parent | 179067aa60b11af15adb43a12b88fb7150d5d01b (diff) | |
download | sitesummary-5db80a24a94e4361f80d591db2bb4a2e74c8d4cf.tar.gz sitesummary-5db80a24a94e4361f80d591db2bb4a2e74c8d4cf.tar.bz2 sitesummary-5db80a24a94e4361f80d591db2bb4a2e74c8d4cf.tar.xz |
[ Petter Reinholdtsen ]
* Updated sitesummary-nodes:
- Use IP address as hostname if the provided hostname is bogus
or missing in DNS.
- Ignore filesystem types autofs, binfmt_misc, iso9660, nfsd and usbfs
when generating nagios checks.
Diffstat (limited to 'SiteSummary.pm')
-rw-r--r-- | SiteSummary.pm | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/SiteSummary.pm b/SiteSummary.pm index b6b449a..c37871a 100644 --- a/SiteSummary.pm +++ b/SiteSummary.pm @@ -83,6 +83,29 @@ sub get_hostname { } # +# Return the IP address on the primary network interface +# +sub get_primary_ip_address { + my $hostid = shift; + my $path = get_filepath_current($hostid, "/system/ifconfig-a"); + # XXX Not implemented + my $ip; + if (open (FILE, $path)) { + while(<FILE>) { + chomp; + if (m/inet addr:(\S+)\s+/) { + $ip = $1; + last; + } + } + close(FILE); + return $ip; + } else { + return undef; + } +} + +# # Return Linux kernel version for the machines using Linux. # sub get_linux_kernel_ver { |