aboutsummaryrefslogtreecommitdiffstats
path: root/sitesummary-nodes
diff options
context:
space:
mode:
Diffstat (limited to 'sitesummary-nodes')
-rwxr-xr-xsitesummary-nodes37
1 files changed, 0 insertions, 37 deletions
diff --git a/sitesummary-nodes b/sitesummary-nodes
index 77c0f8b..f05d4f7 100755
--- a/sitesummary-nodes
+++ b/sitesummary-nodes
@@ -54,37 +54,6 @@ sub print_list {
}
}
-sub is_pkg_installed {
- my ($hostid, $pkgname) = @_;
- # Check debian/dpkg-l for 'ii *pkgname '
- my $path = get_filepath_current($hostid, "/debian/dpkg-l");
- if (open (my $fh, $path)) {
- while(<$fh>) {
- if (m/^ii *$pkgname /) {
- close($fh);
- return 1
- }
- }
- close($fh);
- }
- return undef;
-}
-
-sub get_default_route {
- my $hostid = shift;
- my $path = get_filepath_current($hostid, "/system/route-n");
- if (open(my $fh, $path)) {
- while (<$fh>) {
- if (m/^0.0.0.0\s+(\S+)\s+/) {
- close($fh);
- return $1;
- }
- }
- close($fh);
- }
- return undef;
-}
-
# Get an IP address, try to resolve it in DNS , and return the IP
# address if no DNS reverse entry was found.
sub get_dnsnameorip {
@@ -107,12 +76,6 @@ sub is_nagios_client {
is_pkg_installed($hostid, "nagios3");
}
-sub is_laptop {
- my $hostid = shift;
- my $path = get_filepath_current($hostid, "/system/laptop");
- return -e $path;
-}
-
sub print_munin_list {
for my $hostname (sort keys %hostnames) {
next unless (is_munin_client($hostnames{$hostname}));