anchor.diff:      Host ++ ":" ++ integer_to_list(Port).
   
   
  +-spec list_vbuckets(bucket_name()) ->
  +                           {ok, [{vbucket_id(), vbucket_state()}]} | mc_error().
   list_vbuckets(Bucket) ->
       list_vbuckets(node(), Bucket).
   
   
  +-spec list_vbuckets(node(), bucket_name()) ->
  +                          {ok, [{vbucket_id(), vbucket_state()}]} | mc_error().
   list_vbuckets(Node, Bucket) ->
       gen_server:call({server(Bucket), Node}, list_vbuckets, ?TIMEOUT).
   
   
  +-spec list_vbuckets_multi([node()], bucket_name()) ->
  +                                 {[{node(), {ok, [{vbucket_id(),
  +                                                   vbucket_state()}]}}],
  +                                  [node()]}.
   list_vbuckets_multi(Nodes, Bucket) ->
       UpNodes = [node()|nodes()],
       {LiveNodes, DeadNodes} = lists:partition(
  
positive.code:     {Replies, Zombies ++ DeadNodes}.
  
  
  set_vbucket(Bucket, VBucket, VBState) ->
      gen_server:call(server(Bucket), {set_vbucket, VBucket, VBState}, ?TIMEOUT).
  
  
  set_vbucket(Node, Bucket, VBucket, VBState) ->
      gen_server:call({server(Bucket), Node}, {set_vbucket, VBucket, VBState},
                      ?TIMEOUT).
  
  
  stats(Bucket) ->
      stats(Bucket, <<>>).
  
  
  stats(Bucket, Key) ->
      gen_server:call(server(Bucket), {stats, Key}, ?TIMEOUT).
  
  
  topkeys(Bucket) ->
      gen_server:call(server(Bucket), topkeys, ?TIMEOUT).
  
  sync_bucket_config(Bucket) ->
      gen_server:call(server(Bucket), sync_bucket_config, ?TIMEOUT).
  
  
  %%
  
negative.code: %% API
  %%
  
  -spec active_buckets() ->
                              [bucket_name()].
  active_buckets() ->
      [Bucket || ?MODULE_STRING "-" ++ Bucket <-
                     [atom_to_list(Name) || Name <- registered()]].
  
  -spec connected(node(), bucket_name()) ->
                         boolean().
  connected(Node, Bucket) ->
      try gen_server:call({server(Bucket), Node}, noop) of
          ok ->
  