Mercurial > hg > nginx-tests

comparison ssl_proxy_upgrade.t @ 925:6bb1f2ccd386

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: removed unused variables.
author Andrey Zelenkov <zelenkov@nginx.com>
date Fri, 13 May 2016 14:46:07 +0300
parents 3a8dc14b98ba
children e9064d691790
comparison
equal deleted inserted replaced
924:54680c434afa 925:6bb1f2ccd386
217 return $s; 217 return $s;
218 } 218 }
219 219
220 sub upgrade_getline { 220 sub upgrade_getline {
221 my ($s) = @_; 221 my ($s) = @_;
222 my ($h, $buf, $line); 222 my ($h, $buf);
223 223
224 ${*$s}->{_upgrade_private} ||= { b => '', r => 0 }; 224 ${*$s}->{_upgrade_private} ||= { b => '', r => 0 };
225 $h = ${*$s}->{_upgrade_private}; 225 $h = ${*$s}->{_upgrade_private};
226 226
227 if ($h->{b} =~ /^(.*?\x0a)(.*)/ms) { 227 if ($h->{b} =~ /^(.*?\x0a)(.*)/ms) {
312 while (1) { 312 while (1) {
313 $poll->mask($client => ($buffer ? POLLIN|POLLOUT : POLLIN)); 313 $poll->mask($client => ($buffer ? POLLIN|POLLOUT : POLLIN));
314 my $p = $poll->poll(0.5); 314 my $p = $poll->poll(0.5);
315 log2c("(poll $p)"); 315 log2c("(poll $p)");
316 316
317 foreach my $reader ($poll->handles(POLLIN)) { 317 foreach ($poll->handles(POLLIN)) {
318 $n = $client->sysread(my $chunk, 65536); 318 $n = $client->sysread(my $chunk, 65536);
319 return unless $n; 319 return unless $n;
320 320
321 log2i($chunk); 321 log2i($chunk);
322 322