SysLog Client

[shmia]

Mit der Klasse TSysLogClient ist es möglich Logmeldungen per UDP (Port 514) in das lokale Netzwerk zu senden.
Die Logmeldungen, auf auf verschiedenen Rechnern erzeugt werden, können dann gemeinsam auf einem (oder mehreren) Servern erfasst und angezeigt werden.

Das SysLog-Protokoll, ursprünglich für Unix entwickelt, kann somit auch für Delphiprogramme verwendet werden.

Delphi-Quellcode:

// Beispielcode
const
  SERVERMACHINE = '';  // '' bedeutet Broadcast an alle
var
  syslog : TSysLogClient;
begin
  syslog := TSysLogClient.Create(SERVERMACHINE, {Version=}slvRFC5424);
  syslog.LogError('Fehlermeldung zum Testen von Syslog');

  syslog.Free;

Die Klasse TSysLogClient benötigt die beiliegende Komponente TUdpSockUtil (muss nicht installiert werden) sowie die Unit ISO8601 für die Formatierung von Datum und Zeit.

Zur Zeit wird das ältere BSD-Format (RFC 3164) und das neuere Format aus RFC 5424 unterstützt.

Um die Logmeldungen zu empfangen ist ein SysLog-Server erforderlich.
Empfehlenswert ist z.B. SysLog Watcher 4.
Schon in der Personal-Version (max 5 Quellen) bietet dieser Syslog-Server eine Vielzahl an Funktionen (Filtern, Suchen, EMail-Benachrichtigung, Import, Export,...)