git.m6w6.name Git - m6w6/libmemcached/blob - libmemcached/server.c

   1 /* LibMemcached
   2  * Copyright (C) 2006-2009 Brian Aker
   3  * All rights reserved.
   4  *
   5  * Use and distribution licensed under the BSD license.  See
   6  * the COPYING file in the parent directory for full text.
   7  *
   8  * Summary: String structure used for libmemcached.
   9  *
  10  */
  11
  12 /*
  13   This is a partial implementation for fetching/creating memcached_server_st objects.
  14 */
  15 #include "common.h"
  16
  17 static inline void _server_init(memcached_server_st *self, const memcached_st *root,
  18                                 const char *hostname, in_port_t port,
  19                                 uint32_t weight, memcached_connection_t type)
  20 {
  21   self->options.sockaddr_inited= false;
  22   self->options.is_shutting_down= false;
  23   self->number_of_hosts= 0;
  24   self->cursor_active= 0;
  25   self->port= port;
  26   self->cached_errno= 0;
  27   self->fd= -1;
  28   self->io_bytes_sent= 0;
  29   self->server_failure_counter= 0;
  30   self->weight= weight;
  31   self->state.is_corked= false;
  32   self->major_version= 0;
  33   self->micro_version= 0;
  34   self->minor_version= 0;
  35   self->type= type;
  36   self->read_ptr= self->read_buffer;
  37   self->cached_server_error= NULL;
  38   self->read_buffer_length= 0;
  39   self->read_data_length= 0;
  40   self->write_buffer_offset= 0;
  41   self->address_info= NULL;
  42
  43   if (root)
  44   {
  45     self->next_retry= root->retry_timeout;
  46   }
  47   else
  48   {
  49     self->next_retry= 0;
  50   }
  51
  52   self->root= root;
  53   self->limit_maxbytes= 0;
  54   if (hostname == NULL)
  55     self->hostname[0]= 0;
  56   else
  57     strncpy(self->hostname, hostname, NI_MAXHOST - 1);
  58 }
  59
  60 static memcached_server_st *_server_create(memcached_server_st *self, const memcached_st *memc)
  61 {
  62   if (self == NULL)
  63   {
  64    self= (memcached_server_st *)libmemcached_malloc(memc, sizeof(memcached_server_st));
  65
  66     if (! self)
  67       return NULL; /*  MEMCACHED_MEMORY_ALLOCATION_FAILURE */
  68
  69     self->options.is_allocated= true;
  70   }
  71   else
  72   {
  73     self->options.is_allocated= false;
  74   }
  75
  76   self->options.is_initialized= true;
  77
  78   return self;
  79 }
  80
  81 memcached_server_st *memcached_server_create_with(const memcached_st *memc,
  82                                                   memcached_server_write_instance_st self,
  83                                                   const char *hostname, in_port_t port,
  84                                                   uint32_t weight, memcached_connection_t type)
  85 {
  86   self= _server_create(self, memc);
  87
  88   if (self == NULL)
  89     return NULL;
  90
  91   _server_init(self, memc, hostname, port, weight, type);
  92
  93
  94   if (type == MEMCACHED_CONNECTION_UDP)
  95   {
  96     self->write_buffer_offset= UDP_DATAGRAM_HEADER_LENGTH;
  97     memcached_io_init_udp_header(self, 0);
  98   }
  99
 100   return self;
 101 }
 102
 103 void memcached_server_free(memcached_server_st *self)
 104 {
 105   memcached_quit_server(self, false);
 106
 107   if (self->cached_server_error)
 108     free(self->cached_server_error);
 109
 110   if (self->address_info)
 111     freeaddrinfo(self->address_info);
 112
 113   if (memcached_is_allocated(self))
 114   {
 115     libmemcached_free(self->root, self);
 116   }
 117   else
 118   {
 119     self->options.is_initialized= false;
 120   }
 121 }
 122
 123 /*
 124   If we do not have a valid object to clone from, we toss an error.
 125 */
 126 memcached_server_st *memcached_server_clone(memcached_server_st *destination,
 127                                             const memcached_server_st *source)
 128 {
 129   /* We just do a normal create if source is missing */
 130   if (source == NULL)
 131     return NULL;
 132
 133   destination= memcached_server_create_with(source->root, destination,
 134                                             source->hostname, source->port, source->weight,
 135                                             source->type);
 136   if (destination != NULL)
 137   {
 138     destination->cached_errno= source->cached_errno;
 139
 140     if (source->cached_server_error)
 141       destination->cached_server_error= strdup(source->cached_server_error);
 142   }
 143
 144   return destination;
 145
 146 }
 147
 148 memcached_return_t memcached_server_cursor(const memcached_st *ptr,
 149                                            const memcached_server_fn *callback,
 150                                            void *context,
 151                                            uint32_t number_of_callbacks)
 152 {
 153   for (uint32_t x= 0; x < memcached_server_count(ptr); x++)
 154   {
 155     memcached_server_instance_st instance=
 156       memcached_server_instance_by_position(ptr, x);
 157
 158     for (uint32_t y= 0; y < number_of_callbacks; y++)
 159     {
 160       unsigned int iferror;
 161
 162       iferror= (*callback[y])(ptr, instance, context);
 163
 164       if (iferror)
 165         continue;
 166     }
 167   }
 168
 169   return MEMCACHED_SUCCESS;
 170 }
 171
 172 memcached_server_instance_st memcached_server_by_key(const memcached_st *ptr,
 173                                                      const char *key,
 174                                                      size_t key_length,
 175                                                      memcached_return_t *error)
 176 {
 177   uint32_t server_key;
 178   memcached_server_instance_st instance;
 179
 180   *error= memcached_validate_key_length(key_length,
 181                                         ptr->flags.binary_protocol);
 182   unlikely (*error != MEMCACHED_SUCCESS)
 183     return NULL;
 184
 185   unlikely (memcached_server_count(ptr) == 0)
 186   {
 187     *error= MEMCACHED_NO_SERVERS;
 188     return NULL;
 189   }
 190
 191   if (ptr->flags.verify_key && (memcached_key_test((const char **)&key, &key_length, 1) == MEMCACHED_BAD_KEY_PROVIDED))
 192   {
 193     *error= MEMCACHED_BAD_KEY_PROVIDED;
 194     return NULL;
 195   }
 196
 197   server_key= memcached_generate_hash(ptr, key, key_length);
 198   instance= memcached_server_instance_by_position(ptr, server_key);
 199
 200   return instance;
 201
 202 }
 203
 204 void memcached_server_error_reset(memcached_server_st *ptr)
 205 {
 206   ptr->cached_server_error[0]= 0;
 207 }
 208
 209 memcached_server_instance_st memcached_server_get_last_disconnect(const memcached_st *ptr)
 210 {
 211   return ptr->last_disconnected_server;
 212 }
 213
 214 inline uint32_t memcached_server_list_count(const memcached_server_st *self)
 215 {
 216   return (self == NULL)
 217     ? 0
 218     : self->number_of_hosts;
 219 }
 220
 221 void memcached_server_list_free(memcached_server_st *self)
 222 {
 223   server_list_free(NULL, self);
 224 }
 225
 226 /**
 227   @todo allow lists to query themselves even if they lack a root
 228 */
 229 memcached_return_t memcached_server_remove(memcached_server_st *self)
 230 {
 231   uint32_t host_index= 0;
 232   memcached_st *root= (memcached_st *)self->root;
 233   memcached_server_st *list;
 234
 235   if (root == NULL)
 236     return MEMCACHED_FAILURE;
 237
 238   list= memcached_server_list(root);
 239
 240   /* Until we devise a way to mark servers that are about to be harvested, we need to shutdown before doing the clone. */
 241   memcached_quit(root);
 242
 243   for (uint32_t x= 0; x < memcached_server_count(root); x++)
 244   {
 245     if (strncmp(list[x].hostname, self->hostname, NI_MAXHOST) != 0 || list[x].port != self->port)
 246     {
 247       if (host_index != x)
 248       {
 249         memcached_server_st *check=
 250           memcached_server_clone(list+host_index, list+x);
 251
 252         if (! check) // Now we are in trouble, allocation didn't happen and we are midway through an operation. Bail!
 253         {
 254           return MEMCACHED_FAILURE;
 255         }
 256         memcached_server_free(list+x);
 257       }
 258       host_index++;
 259     }
 260   }
 261   root->number_of_hosts= host_index;
 262
 263   run_distribution(root);
 264
 265   return MEMCACHED_SUCCESS;
 266 }
 267
 268
 269 inline uint32_t memcached_servers_set_count(memcached_server_st *servers, uint32_t count)
 270 {
 271   return servers->number_of_hosts= count;
 272 }
 273
 274 inline uint32_t memcached_server_count(const memcached_st *self)
 275 {
 276   return self->number_of_hosts;
 277 }
 278
 279 inline const char *memcached_server_name(memcached_server_instance_st self)
 280 {
 281   return self->hostname;
 282 }
 283
 284 inline in_port_t memcached_server_port(memcached_server_instance_st self)
 285 {
 286   return self->port;
 287 }
 288
 289 inline memcached_server_st *memcached_server_list(memcached_st *self)
 290 {
 291   return self->servers;
 292 }
 293
 294 inline void memcached_server_list_set(memcached_st *self, memcached_server_st *list)
 295 {
 296   self->servers= list;
 297 }
 298
 299 inline uint32_t memcached_server_response_count(memcached_server_instance_st self)
 300 {
 301   return self->cursor_active;
 302 }
 303
 304 const char *memcached_server_error(memcached_server_instance_st ptr)
 305 {
 306   return ptr
 307     ?  ptr->cached_server_error
 308     : NULL;
 309 }
 310