anchor.diff:      {Replies, Zombies ++ DeadNodes}.
   
   
  +-spec set_vbucket(bucket_name(), vbucket_id(), vbucket_state()) ->
  +                         ok | mc_error().
   set_vbucket(Bucket, VBucket, VBState) ->
       gen_server:call(server(Bucket), {set_vbucket, VBucket, VBState}, ?TIMEOUT).
   
   
  +-spec set_vbucket(node(), bucket_name(), vbucket_id(), vbucket_state()) ->
  +                         ok | mc_error().
   set_vbucket(Node, Bucket, VBucket, VBState) ->
       gen_server:call({server(Bucket), Node}, {set_vbucket, VBucket, VBState},
                       ?TIMEOUT).
   
   
  +-spec stats(bucket_name()) ->
  +                   {ok, [{binary(), binary()}]} | mc_error().
   stats(Bucket) ->
       stats(Bucket, <<>>).
   
   
  +-spec stats(bucket_name(), binary()) ->
  +                   {ok, [{binary(), binary()}]} | mc_error().
   stats(Bucket, Key) ->
       gen_server:call(server(Bucket), {stats, Key}, ?TIMEOUT).
   
   
  +sync_bucket_config(Bucket) ->
  +    gen_server:call(server(Bucket), sync_bucket_config, ?TIMEOUT).
  +
  +
  +-spec topkeys(bucket_name()) ->
  +                     {ok, [{nonempty_string(), [{atom(), integer()}]}]} |
  +                     mc_error().
   topkeys(Bucket) ->
       gen_server:call(server(Bucket), topkeys, ?TIMEOUT).
   
  -sync_bucket_config(Bucket) ->
  -    gen_server:call(server(Bucket), sync_bucket_config, ?TIMEOUT).
   
   
   %%
  
positive.code: %% API
  %%
  
  active_buckets() ->
      [Bucket || ?MODULE_STRING "-" ++ Bucket <-
                     [atom_to_list(Name) || Name <- registered()]].
  
  connected(Node, Bucket) ->
      try gen_server:call({server(Bucket), Node}, noop) of
          ok ->
  
negative.code: 
  %% @doc Delete a vbucket. Will set the vbucket to dead state if it
  %% isn't already, blocking until it successfully does so.
  -spec delete_vbucket(bucket_name(), vbucket_id()) ->
                              ok | mc_error().
  delete_vbucket(Bucket, VBucket) ->
      gen_server:call(server(Bucket), {delete_vbucket, VBucket}, ?TIMEOUT).
  
  
  -spec delete_vbucket(node(), bucket_name(), vbucket_id()) ->
                              ok | mc_error().
  delete_vbucket(Node, Bucket, VBucket) ->
      gen_server:call({server(Bucket), Node}, {delete_vbucket, VBucket},
                      ?TIMEOUT).
  
  
  -spec get_vbucket(node(), bucket_name(), vbucket_id()) ->
                           {ok, vbucket_state()} | mc_error().
  get_vbucket(Node, Bucket, VBucket) ->
      gen_server:call({server(Bucket), Node}, {get_vbucket, VBucket}, ?TIMEOUT).
  
  
  -spec host_port_str() ->
                             nonempty_string().
  host_port_str() ->
      host_port_str(node()).
  
  
  -spec host_port_str(node()) ->
                             nonempty_string().
  host_port_str(Node) ->
      Config = ns_config:get(),
      Port = ns_config:search_node_prop(Node, Config, memcached, port),
  