changeset 1423:29d0961bc3f7

Tests: aligned generic read timeouts in stream and mail tests.
author Sergey Kandaurov <pluknet@nginx.com>
date Tue, 25 Dec 2018 13:56:49 +0300
parents 2d7fcd713b66
children 5bee71e1548f
files lib/Test/Nginx/IMAP.pm lib/Test/Nginx/POP3.pm lib/Test/Nginx/SMTP.pm lib/Test/Nginx/Stream.pm
diffstat 4 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lib/Test/Nginx/IMAP.pm
+++ b/lib/Test/Nginx/IMAP.pm
@@ -60,7 +60,7 @@ sub read {
 	my $socket = $self->{_socket};
 	eval {
 		local $SIG{ALRM} = sub { die "timeout\n" };
-		alarm(3);
+		alarm(8);
 		while (<$socket>) {
 			log_in($_);
 			# XXX
--- a/lib/Test/Nginx/POP3.pm
+++ b/lib/Test/Nginx/POP3.pm
@@ -60,7 +60,7 @@ sub read {
 	my $socket = $self->{_socket};
 	eval {
 		local $SIG{ALRM} = sub { die "timeout\n" };
-		alarm(3);
+		alarm(8);
 		while (<$socket>) {
 			log_in($_);
 			# XXX
--- a/lib/Test/Nginx/SMTP.pm
+++ b/lib/Test/Nginx/SMTP.pm
@@ -60,7 +60,7 @@ sub read {
 	my $socket = $self->{_socket};
 	eval {
 		local $SIG{ALRM} = sub { die "timeout\n" };
-		alarm(3);
+		alarm(8);
 		while (<$socket>) {
 			log_in($_);
 			next if m/^\d\d\d-/;
--- a/lib/Test/Nginx/Stream.pm
+++ b/lib/Test/Nginx/Stream.pm
@@ -84,7 +84,7 @@ sub read {
 	$s = $self->{_socket};
 
 	$s->blocking(0);
-	if (IO::Select->new($s)->can_read($extra{read_timeout} || 5)) {
+	if (IO::Select->new($s)->can_read($extra{read_timeout} || 8)) {
 		$s->sysread($buf, 1024);
 	};