diff options
Diffstat (limited to 'regress/usr.sbin/syslogd/Server.pm')
| -rw-r--r-- | regress/usr.sbin/syslogd/Server.pm | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/regress/usr.sbin/syslogd/Server.pm b/regress/usr.sbin/syslogd/Server.pm index a044bb691e1..1aaf236d125 100644 --- a/regress/usr.sbin/syslogd/Server.pm +++ b/regress/usr.sbin/syslogd/Server.pm @@ -1,4 +1,4 @@ -# $OpenBSD: Server.pm,v 1.9 2016/09/21 12:01:17 bluhm Exp $ +# $OpenBSD: Server.pm,v 1.10 2016/09/23 14:35:15 bluhm Exp $ # Copyright (c) 2010-2015 Alexander Bluhm <bluhm@openbsd.org> # @@ -61,6 +61,16 @@ sub listen { $self->{sslversion} ? (SSL_version => $self->{sslversion}) : (), $self->{sslciphers} ? (SSL_cipher_list => $self->{sslciphers}) : (), ) or die ref($self), " $iosocket socket failed: $!,$SSL_ERROR"; + if ($self->{sndbuf}) { + setsockopt($ls, SOL_SOCKET, SO_SNDBUF, + pack('i', $self->{sndbuf})) + or die ref($self), " set SO_SNDBUF failed: $!"; + } + if ($self->{rcvbuf}) { + setsockopt($ls, SOL_SOCKET, SO_RCVBUF, + pack('i', $self->{rcvbuf})) + or die ref($self), " set SO_RCVBUF failed: $!"; + } if ($self->{listenproto} ne "udp") { listen($ls, 1) or die ref($self), " socket listen failed: $!"; |