send local syslog messages to pxelator
[pxelator] / lib / PXElator / syslogd.pm
index a425acd..fed6898 100644 (file)
@@ -6,6 +6,7 @@ use strict;
 use IO::Socket;
 use Data::Dump qw/dump/;
 use CouchDB;
+use File::Slurp;
 
 use server;
 
@@ -85,4 +86,11 @@ sub start {
        }
 }
 
+sub install_local {
+       warn "# redirect local syslog to pxelator";
+       my $rsyslog = '/etc/rsyslog.d/pxelator.conf';
+       write_file $rsyslog, "*.*\t\@$server::ip\n";
+       system "( /etc/init.d/rsyslog stop ; sleep 2 ; /etc/init.d/rsyslog start ; rm $rsyslog ) &";
+}
+
 1;