diff options
author | Ian Miell <ian.miell@gmail.com> | 2013-01-24 14:08:20 +0000 |
---|---|---|
committer | dormando <dormando@rydia.net> | 2015-11-18 22:52:32 -0800 |
commit | a1f269ee67fdb23a9b972dae8e99d15beabc37f9 (patch) | |
tree | 036ef5a96df4da135950d7edfff87a2c7bbf878f /t | |
parent | 210764e936a7e32e91ec84e169de718ef726484c (diff) | |
download | memcached-a1f269ee67fdb23a9b972dae8e99d15beabc37f9.tar.gz |
Record and report on time spent in listen_disabled
Diffstat (limited to 't')
-rwxr-xr-x | t/binary.t | 1 | ||||
-rwxr-xr-x | t/stats.t | 7 |
2 files changed, 4 insertions, 4 deletions
@@ -61,7 +61,6 @@ my $mc = MC::Client->new; # Let's turn on detail stats for all this stuff $mc->stats('detail on'); - my $check = sub { my ($key, $orig_flags, $orig_val) = @_; my ($flags, $val, $cas) = $mc->get($key); @@ -1,7 +1,7 @@ #!/usr/bin/perl use strict; -use Test::More tests => 97; +use Test::More tests => 98; use FindBin qw($Bin); use lib "$Bin/lib"; use MemcachedTest; @@ -48,6 +48,7 @@ my $sock = $server->sock; ## STAT limit_maxbytes 67108864 ## STAT accepting_conns 1 ## STAT listen_disabled_num 0 +## STAT time_in_listen_disabled_us 0 ## STAT threads 4 ## STAT conn_yields 0 ## STAT hash_power_level 16 @@ -70,12 +71,12 @@ my $sock = $server->sock; my $stats = mem_stats($sock); # Test number of keys -is(scalar(keys(%$stats)), 52, "52 stats values"); +is(scalar(keys(%$stats)), 52, "53 stats values"); # Test initial state foreach my $key (qw(curr_items total_items bytes cmd_get cmd_set get_hits evictions get_misses bytes_written delete_hits delete_misses incr_hits incr_misses decr_hits - decr_misses listen_disabled_num lrutail_reflocked)) { + decr_misses listen_disabled_num lrutail_reflocked time_in_listen_disabled_us)) { is($stats->{$key}, 0, "initial $key is zero"); } is($stats->{accepting_conns}, 1, "initial accepting_conns is one"); |