Mercurial > hg > nginx-tests
comparison memcached.t @ 122:01e86a067f05
Tests: fix tests for repcached and memcached 1.2.7+.
author | Maxim Dounin <mdounin@mdounin.ru> |
---|---|
date | Mon, 28 Dec 2009 14:42:43 +0000 |
parents | 8ac1faaddd2c |
children | c0ae29632905 |
comparison
equal
deleted
inserted
replaced
121:8ac1faaddd2c | 122:01e86a067f05 |
---|---|
56 } | 56 } |
57 } | 57 } |
58 | 58 |
59 EOF | 59 EOF |
60 | 60 |
61 $t->run_daemon('memcached', '-l', '127.0.0.1', '-p', '8081'); | 61 my $memhelp = `memcached -h`; |
62 my @memopts = (); | |
63 | |
64 if ($memhelp =~ /repcached/) { | |
65 # repcached patch adds additional listen socket | |
66 push @memopts, '-X', '8082'; | |
67 } | |
68 if ($memhelp =~ /-U/) { | |
69 # UDP port is on by default in memcached 1.2.7+ | |
70 push @memopts, '-U', '0'; | |
71 } | |
72 | |
73 $t->run_daemon('memcached', '-l', '127.0.0.1', '-p', '8081', @memopts); | |
62 $t->run(); | 74 $t->run(); |
63 | 75 |
64 $t->waitforsocket('127.0.0.1:8081') | 76 $t->waitforsocket('127.0.0.1:8081') |
65 or die "Can't start memcached"; | 77 or die "Can't start memcached"; |
66 | 78 |