Add support for remapping hostnames for individual client entries,

to make it possible to gather Munin and Nagios status for hosts
behind VPN connections and with non-unique host names.

1 files changed, 26 insertions, 1 deletions

diff --git a/SiteSummary.pm b/SiteSummary.pm
index f2c856f..bc8271f 100644
--- a/SiteSummary.pm
+++ b/SiteSummary.pm
@@ -35,6 +35,26 @@ my $pwd = "/var/lib/sitesummary/entries";  # Path to the entries
 # File for debian-edu configuration
 my $debian_edu_config = "/debian-edu/config";
 
+# Provide mechanism to remap host names for hosts private networks
+# available via tunnels.
+
+my $hostmapfile = "/etc/sitesummary/hostmap";
+my %hostmap;
+
+sub load_hostmap {
+    if (open(my $fh, '<', $hostmapfile)) {
+        %hostmap = (); # Clear hostmap
+        while (<$fh>) {
+            chomp;
+            my ($hostid, $newhostname) = split(/;/);
+            $hostmap{$hostid} = $newhostname;
+        }
+        close $fh;
+    } else {
+        return;
+    }
+}
+
 sub get_filepath_current {
     my ($hostid, $file) = @_;
     return "$pwd/$hostid$file";
@@ -172,7 +192,11 @@ sub get_primary_macaddress {
 #
 sub get_hostname {
     my $hostid = shift;
-    return get_file_string($hostid, "/system/hostname");
+    if (exists $hostmap{$hostid}) {
+        return $hostmap{$hostid};
+    } else {
+        return get_file_string($hostid, "/system/hostname");
+    }
 }
 
 #
@@ -389,6 +413,7 @@ sub get_age_group {
     return $thisgroup;
 }
 
+load_hostmap();
 1;
 
 ########################################################################