Changeset ca37e8 for upstream_keepalive/t/memcached-keepalive.t

Timestamp:

01/16/09 19:58:58 (3 years ago)

Author:

George Potapov <nephrite@…>

Branches:

master-v0.7, upstream_count_limit

Children:

cd26d0

Parents:

3f2f24

git-author:

George Potapov <nephrite@…> (01/16/09 19:58:58)

git-committer:

George Potapov <nephrite@…> (01/16/09 19:58:58)

Message:

updated to latest upstream_keepalive (ngx_http_upstream_keepalive-067ddc059ee0.tar.gz) from Maxim Dounin

File:

• upstream_keepalive/t/memcached-keepalive.t (modified) (4 diffs)

upstream_keepalive/t/memcached-keepalive.t

@@ -21 +21 @@
 plain(skip_all => 'Cache::Memcached not installed') if $@;
 
-my $t = Test::Nginx->new()->has('rewrite')->has_daemon('memcached')->plan(10)
+my $t = Test::Nginx->new()->has('rewrite')->has_daemon('memcached')->plan(16)
     ->write_file_expand('nginx.conf', <<'EOF');
 
@@ -95 +95 @@
 EOF
 
-$t->run_daemon('memcached', '-l', '127.0.0.1', '-p', '8081');
-$t->run_daemon('memcached', '-l', '127.0.0.1', '-p', '8082');
+if (`memcached -h` =~ /repcached/) {
+    # repcached patches adds additional listen socket memcached
+    # that should be different too
+
+    $t->run_daemon('memcached', '-l', '127.0.0.1', '-p', '8081',
+        '-X', '8091');
+    $t->run_daemon('memcached', '-l', '127.0.0.1', '-p', '8082',
+        '-X', '8092');
+
+} else {
+    $t->run_daemon('memcached', '-l', '127.0.0.1', '-p', '8081');
+    $t->run_daemon('memcached', '-l', '127.0.0.1', '-p', '8082');
+}
+
 $t->run();
+
+$t->waitforsocket('127.0.0.1:8081')
+    or die "Unable to start memcached";
+$t->waitforsocket('127.0.0.1:8082')
+    or die "Unable to start second memcached";
 
 ###############################################################################
@@ -106 +123 @@
 $memd1->set('/', 'SEE-THIS');
 $memd2->set('/', 'SEE-THIS');
+$memd1->set('/big', 'X' x 1000000);
 
 my $total = $memd1->stats()->{total}->{total_connections};
@@ -120 +138 @@
     'only one connection used');
 
+# Since nginx doesn't read all data from connection in some situations (head
+# requests, post_action, errors writing to client) we have to close such
+# connections.  Check if we really do close them.
+
+$total = $memd1->stats()->{total}->{total_connections};
+
+unlike(http_head('/'), qr/SEE-THIS/, 'head request');
+like(http_get('/'), qr/SEE-THIS/, 'get after head');
+
+is($memd1->stats()->{total}->{total_connections}, $total + 1,
+    'head request closes connection');
+
+$total = $memd1->stats()->{total}->{total_connections};
+
+unlike(http_head('/big'), qr/XXX/, 'big head');
+like(http_get('/'), qr/SEE-THIS/, 'get after big head');
+
+is($memd1->stats()->{total}->{total_connections}, $total + 1,
+    'big head request closes connection');
+
 # two backends with 'single' option - should establish only one connection