Index: server/fedora/config/etc/syslog-ng/d_zroot.pl
===================================================================
--- server/fedora/config/etc/syslog-ng/d_zroot.pl	(revision 645)
+++ server/fedora/config/etc/syslog-ng/d_zroot.pl	(revision 645)
@@ -0,0 +1,27 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+use Sys::Hostname;
+
+sub sendmsg {
+    my ($message) = @_;
+    open(ZWRITE, "|-", qw|/usr/bin/zwrite -d -c scripts -i root -s|, hostname) or die "Couldn't open zwrite";
+    print ZWRITE $message;
+    close(ZWRITE);
+}
+
+my $last;
+
+while (my $message = <>) {
+    chomp $message;
+    $message =~ s/^(.*?): //;
+    if ($message =~ m|Accepted (\S+) for root|) {
+	my $send = $message;
+	if ($1 eq "gssapi-with-mic") {
+	    $send = $last."\n".$send;
+	}
+	sendmsg($send);
+    }
+    $last = $message;
+}
Index: server/fedora/config/etc/syslog-ng/syslog-ng.conf
===================================================================
--- server/fedora/config/etc/syslog-ng/syslog-ng.conf	(revision 645)
+++ server/fedora/config/etc/syslog-ng/syslog-ng.conf	(revision 645)
@@ -0,0 +1,93 @@
+# syslog-ng configuration file.
+#
+# This should behave pretty much like the original syslog on RedHat. But
+# it could be configured a lot smarter.
+#
+# See syslog-ng(8) and syslog-ng.conf(5) for more information.
+#
+# 20000925 gb@sysfive.com
+#
+# Updated by Frank Crawford (<Frank.Crawford@ac3.com.au>) - 10 Aug 2002
+#   - for Red Hat 7.3
+#   - totally do away with klogd
+#   - add message "kernel:" as is done with klogd.
+#
+# Updated by Frank Crawford (<Frank.Crawford@ac3.com.au>) - 22 Aug 2002
+#   - use the log_prefix option as per Balazs Scheidler's email
+#
+# Updated by Jose Pedro Oliveira (<jpo at di.uminho.pt>) - 05 Apr 2003
+#   - corrected filters 'f_filter2' and 'f_filter6'
+#     these filters were only allowing messages of one specific
+#     priority level; they should be allowing messages from that
+#     priority and upper levels.
+#
+# Updated by Jose Pedro Oliveira (<jpo at di.uminho.pt>) - 25 Jan 2005
+#   - Don't sync the d_mail destination
+#
+# Updated by Jose Pedro Oliveira (<jpo at di.uminho.pt>) - 01 Feb 2005
+#   - /proc/kmsg is a file not a pipe.
+#     (https://lists.balabit.hu/pipermail/syslog-ng/2005-February/006963.html)
+#
+# Updated by Jose Pedro Oliveira (<jpo at di.uminho.pt>) - 31 May 2007
+#   - increase the number of unix-stream max-connections (syslog-ng 2.0.4)
+#
+# Updated by Jose Pedro Oliveira (<jpo at di.uminho.pt>) - 26 July 2007
+#   - revert previous unix-stream max-connections change
+#     (the new unix-stream max-connections default in syslog-ng 2.0.5 is 256)
+#
+
+options {
+    sync (0);
+    time_reopen (10);
+    log_fifo_size (1000);
+    long_hostnames (off);
+    use_dns (no);
+    use_fqdn (no);
+    create_dirs (no);
+    keep_hostname (yes);
+};
+
+source s_sys {
+    file ("/proc/kmsg" log_prefix("kernel: "));
+    unix-stream ("/dev/log");
+    internal();
+    # udp(ip(0.0.0.0) port(514));
+    # tcp(ip(0.0.0.0) port(514));
+};
+
+destination d_cons { file("/dev/console"); };
+destination d_mesg { file("/var/log/messages"); };
+destination d_auth { file("/var/log/secure"); };
+destination d_mail { file("/var/log/maillog" sync(10)); };
+destination d_spol { file("/var/log/spooler"); };
+destination d_boot { file("/var/log/boot.log"); };
+destination d_cron { file("/var/log/cron"); };
+destination d_mlal { usertty("*"); };
+
+destination d_zroot { program("/etc/syslog-ng/d_zroot.pl"); };
+
+#filter f_filter1   { facility(kern); };
+filter f_filter2   { level(info..emerg) and
+                     not facility(mail,authpriv,cron); };
+filter f_filter3   { facility(authpriv); };
+filter f_filter4   { facility(mail); };
+filter f_filter5   { level(emerg); };
+filter f_filter6   { facility(uucp) or
+                     (facility(news) and level(crit..emerg)); };
+filter f_filter7   { facility(local7); };
+filter f_filter8   { facility(cron); };
+
+filter f_zroot	   { facility(authpriv); };
+
+#log { source(s_sys); filter(f_filter1); destination(d_cons); };
+log { source(s_sys); filter(f_filter2); destination(d_mesg); };
+log { source(s_sys); filter(f_filter3); destination(d_auth); };
+log { source(s_sys); filter(f_filter4); destination(d_mail); };
+log { source(s_sys); filter(f_filter5); destination(d_mlal); };
+log { source(s_sys); filter(f_filter6); destination(d_spol); };
+log { source(s_sys); filter(f_filter7); destination(d_boot); };
+log { source(s_sys); filter(f_filter8); destination(d_cron); };
+
+log { source(s_sys); filter(f_zroot); destination(d_zroot); };
+
+# vim:set ai ts=4 sw=4 sts=4 et: