1# The client writes a message in TCP stream to ::1.
2# The syslogd writes into multiple files depending on IPv6-Adress.
3# The syslogd writes it into a file and through a pipe.
4# The syslogd passes it via UDP to the loghost.
5# The server receives the message on its UDP socket.
6# Find the message in client, file, pipe, syslogd, server log.
7# Check that the message appears in the correct log files.
8
9use strict;
10use warnings;
11use Socket;
12
13our %args = (
14    client => {
15	connect => { domain => AF_INET6, proto => "tcp", addr => "::1",
16	    port => 514 },
17    },
18    syslogd => {
19	options => ["-n", "-T", "[::1]:514"],
20	conf => <<'EOF',
21+localhost
22*.*	$objdir/file-0.log
23+127.0.0.1
24*.*	$objdir/file-1.log
25+::1
26*.*	$objdir/file-2.log
27+$host
28*.*	$objdir/file-3.log
29+*
30*.*	$objdir/file-4.log
31EOF
32    },
33    multifile => [
34	{ loggrep => { get_testgrep() => 0 } },
35	{ loggrep => { get_testgrep() => 0 } },
36	{ loggrep => { get_testgrep() => 1 } },
37	{ loggrep => { get_testgrep() => 0 } },
38	{ loggrep => { get_testgrep() => 1 } },
39    ],
40);
41
421;
43