On Mon, 2003-12-01 at 14:15, Jim Elliott wrote:
> > Does anyone knows if there is a SYSLOGD for z/VM available ? Also
> > tools to generate syslog-messages via REXX then ? Further on I am
> > looking for SSH under z/VM.
>
> Martin:
>
> Neale Ferguson ported SYSLOGD to VM several years ago.
> http://vm.marist.edu/~neale/vmoe.html
Getting that all rebuilt in VM Open Extensions is not a trivial thing.
If you would like to capture syslog records from others on VM and are
willing to write your filtering on VM, a simple pipeline can do:
/* SYSLOGD EXEC Simple Syslog Daemon */
/* Author: Rob van der Heij, 30 May 2002 */
'PIPE (end \ name SYSLOGD.EXEC:4)',
'\ udp 514 user tcpipb ', /* Use <myself>.ehone.ibm.com */
'| s: syslogd',
'| cons',
'\ < syslogd table', /* Load the table */
'| s:'
/* SYSLOGD REXX Simple Syslog filter */
/* Author: Rob van der Heij, 30 May 2002 */
/* This is a very simple minded syslogd to run on VM. It does some */
/* work to align the priority and tag in the messages. */
'callpipe (end \ name SYSLOGD.REXX:4)',
'\ *:',
'| hdr: chop 16 ', /* Split UDP header from data */
'| socka2ip ',
'| l: lookup w3 w2 master', /* Lookup IP address */
'| spec w1 1.9',
'| i: faninany',
'| j: juxtapose',
'| *:',
'\ *.input.1:', /* Load the table */
'| l:', /* When no match */
'| spec w3 1.8 ri , , n', /* Part of IP address */
'| i:',
'\ hdr:', /* Data portion of record */
'| deblock linend 0a',
'| xlate from 850 to 1047',
'| pri: if locate 1.1 /</', /* Severity code there? */
'| spec fs > substr 2-* of f1 1.3 ri',
'f2-* nw',
'| pri:',
'| insert , * , before', /* Default severity */
'| pri:',
'| org: if locate substr -1;-1 of w2 /:/',
'| spec 1.4 1 substr 1;-2 of w2 5.16 fs : f2-* 19',
'| org:',
'| spec 1.4 1 ,*, n 5-* 20',
'| org:',
'| j:'
You could even have PROP run secondary console against this receiver and
act on msgs that way.
But from what I guess the question the poster was looking for the other
way around. If you would like your VM system messages to go to some
central syslogd, you could run a simple CMS Pipelines program in your
operator userid to trap the msgs via IUCV and send them through TCP/IP
to the syslogd.
Rob
