regress/usr.sbin/relayd/args-timein-http.pl


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29

# test that 3 seconds timeout does not occur within 2 seconds idle in http

use strict;
use warnings;

our %args = (
    client => {
	func => \&http_client,
	len => 5,
	timefile => "",
    },
    relayd => {
	protocol => [ "http" ],
	relay => [ "session timeout 3" ],
    },
    server => {
	func => sub {
	    errignore();
	    http_server(@_);
	    sleep 2;
	    write_char(@_, 4);
	},
	sleep => 1,
	nocheck => 1,
    },
    len => 9,
);

1;