svn commit: samba r11548 - in branches/SAMBA_3_0/examples/scripts:
. eventlog
jerry at samba.org
jerry at samba.org
Mon Nov 7 13:43:07 GMT 2005
Author: jerry
Date: 2005-11-07 13:43:06 +0000 (Mon, 07 Nov 2005)
New Revision: 11548
WebSVN: http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=11548
Log:
adding simple script to tail syslog and write to eventlog tdb
Added:
branches/SAMBA_3_0/examples/scripts/eventlog/
branches/SAMBA_3_0/examples/scripts/eventlog/parselog.pl
Changeset:
Added: branches/SAMBA_3_0/examples/scripts/eventlog/parselog.pl
===================================================================
--- branches/SAMBA_3_0/examples/scripts/eventlog/parselog.pl 2005-11-07 13:22:51 UTC (rev 11547)
+++ branches/SAMBA_3_0/examples/scripts/eventlog/parselog.pl 2005-11-07 13:43:06 UTC (rev 11548)
@@ -0,0 +1,8 @@
+while(<>) {
+ chomp();
+ @le = split '\s+',$_,5;
+ $ln = $le[4];
+ $cname = $le[3];
+ $outstr = sprintf "TMG: %d\nTMW: %d\nEID: 1000\nETP: INFO\nECT: 0\nRS2: 0\nCRN: 0\nUSL: 0\nSRC: Syslog\nSRN: $cname\nSTR: $ln\nDAT:\n\n",time(),time();
+ print $outstr;
+}
More information about the samba-cvs
mailing list