Changeset 1168:8821e405b91e in nginx-tests


Ignore:
Timestamp:
04/20/17 13:29:07 (4 months ago)
Author:
Sergey Kandaurov <pluknet@…>
Branch:
default
Message:

Tests: handled SSL negotiation errors.

Files:
2 edited

Legend:

Unmodified
Added
Removed
  • ssl_proxy_protocol.t

    r1116 r1168  
    154154        my $s = http($proxy, start => 1);
    155155
    156         IO::Socket::SSL->start_SSL($s,
    157                 SSL_verify_mode => IO::Socket::SSL::SSL_VERIFY_NONE(),
    158                 SSL_error_trap => sub { die $_[1] }
    159         );
     156        eval {
     157                local $SIG{ALRM} = sub { die "timeout\n" };
     158                local $SIG{PIPE} = sub { die "sigpipe\n" };
     159                alarm(2);
     160                IO::Socket::SSL->start_SSL($s,
     161                        SSL_verify_mode => IO::Socket::SSL::SSL_VERIFY_NONE(),
     162                        SSL_error_trap => sub { die $_[1] }
     163                );
     164                alarm(0);
     165        };
     166        alarm(0);
     167
     168        if ($@) {
     169                log_in("died: $@");
     170                return undef;
     171        }
    160172
    161173        return http(<<EOF, socket => $s);
  • stream_ssl_realip.t

    r1116 r1168  
    132132        $s->write($proxy);
    133133
    134         IO::Socket::SSL->start_SSL($s->{_socket},
    135                 SSL_verify_mode => IO::Socket::SSL::SSL_VERIFY_NONE(),
    136                 SSL_error_trap => sub { die $_[1] }
    137         );
     134        eval {
     135                local $SIG{ALRM} = sub { die "timeout\n" };
     136                local $SIG{PIPE} = sub { die "sigpipe\n" };
     137                alarm(2);
     138                IO::Socket::SSL->start_SSL($s->{_socket},
     139                        SSL_verify_mode => IO::Socket::SSL::SSL_VERIFY_NONE(),
     140                        SSL_error_trap => sub { die $_[1] }
     141                );
     142                alarm(0);
     143        };
     144        alarm(0);
     145
     146        if ($@) {
     147                log_in("died: $@");
     148                return undef;
     149        }
    138150
    139151        return $s->read();
Note: See TracChangeset for help on using the changeset viewer.