git.m6w6.name Git - m6w6/libmemcached/blob - libmemcached/instance.cc

   1 /*  vim:expandtab:shiftwidth=2:tabstop=2:smarttab:
   2  *
   3  *  Libmemcached library
   4  *
   5  *  Copyright (C) 2011 Data Differential, http://datadifferential.com/
   6  *  Copyright (C) 2006-2009 Brian Aker All rights reserved.
   7  *
   8  *  Redistribution and use in source and binary forms, with or without
   9  *  modification, are permitted provided that the following conditions are
  10  *  met:
  11  *
  12  *      * Redistributions of source code must retain the above copyright
  13  *  notice, this list of conditions and the following disclaimer.
  14  *
  15  *      * Redistributions in binary form must reproduce the above
  16  *  copyright notice, this list of conditions and the following disclaimer
  17  *  in the documentation and/or other materials provided with the
  18  *  distribution.
  19  *
  20  *      * The names of its contributors may not be used to endorse or
  21  *  promote products derived from this software without specific prior
  22  *  written permission.
  23  *
  24  *  THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  25  *  "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  26  *  LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
  27  *  A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
  28  *  OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  29  *  SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
  30  *  LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  31  *  DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  32  *  THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  33  *  (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
  34  *  OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  35  *
  36  */
  37
  38 #include <libmemcached/common.h>
  39
  40 static inline void _server_init(org::libmemcached::Instance* self, memcached_st *root,
  41                                 const memcached_string_t& hostname,
  42                                 in_port_t port,
  43                                 uint32_t weight, memcached_connection_t type)
  44 {
  45   self->options.is_shutting_down= false;
  46   self->options.is_dead= false;
  47   self->number_of_hosts= 0;
  48   self->cursor_active_= 0;
  49   self->port_= port;
  50   self->fd= INVALID_SOCKET;
  51   self->io_bytes_sent= 0;
  52   self->request_id= 0;
  53   self->server_failure_counter= 0;
  54   self->server_failure_counter_query_id= 0;
  55   self->weight= weight ? weight : 1; // 1 is the default weight value
  56   self->io_wait_count.read= 0;
  57   self->io_wait_count.write= 0;
  58   self->io_wait_count.timeouts= 0;
  59   self->io_wait_count._bytes_read= 0;
  60   self->major_version= UINT8_MAX;
  61   self->micro_version= UINT8_MAX;
  62   self->minor_version= UINT8_MAX;
  63   self->type= type;
  64   self->error_messages= NULL;
  65   self->read_ptr= self->read_buffer;
  66   self->read_buffer_length= 0;
  67   self->read_data_length= 0;
  68   self->write_buffer_offset= 0;
  69   self->address_info= NULL;
  70   self->address_info_next= NULL;
  71
  72   self->state= MEMCACHED_SERVER_STATE_NEW;
  73   self->next_retry= 0;
  74
  75   self->root= root;
  76   if (root)
  77   {
  78     self->version= ++root->server_info.version;
  79   }
  80   else
  81   {
  82     self->version= UINT_MAX;
  83   }
  84   self->limit_maxbytes= 0;
  85   memcpy(self->hostname, hostname.c_str, hostname.size);
  86   self->hostname[hostname.size]= 0;
  87 }
  88
  89 static org::libmemcached::Instance* _server_create(org::libmemcached::Instance* self, const memcached_st *memc)
  90 {
  91   if (self == NULL)
  92   {
  93    self= libmemcached_xmalloc(memc, org::libmemcached::Instance);
  94
  95     if (self == NULL)
  96     {
  97       return NULL; /*  MEMCACHED_MEMORY_ALLOCATION_FAILURE */
  98     }
  99
 100     self->options.is_allocated= true;
 101   }
 102   else
 103   {
 104     self->options.is_allocated= false;
 105   }
 106
 107   self->options.is_initialized= true;
 108
 109   return self;
 110 }
 111
 112 org::libmemcached::Instance* __instance_create_with(memcached_st *memc,
 113                                                     org::libmemcached::Instance* self,
 114                                                     const memcached_string_t& hostname,
 115                                                     const in_port_t port,
 116                                                     uint32_t weight,
 117                                                     const memcached_connection_t type)
 118 {
 119   if (memcached_is_valid_servername(hostname) == false)
 120   {
 121     memcached_set_error(*memc, MEMCACHED_INVALID_ARGUMENTS, MEMCACHED_AT, memcached_literal_param("Invalid hostname provided"));
 122     return NULL;
 123   }
 124
 125   self= _server_create(self, memc);
 126
 127   if (self == NULL)
 128   {
 129     return NULL;
 130   }
 131
 132   _server_init(self, const_cast<memcached_st *>(memc), hostname, port, weight, type);
 133
 134   if (memc and memcached_is_udp(memc))
 135   {
 136     self->write_buffer_offset= UDP_DATAGRAM_HEADER_LENGTH;
 137     memcached_io_init_udp_header(self, 0);
 138   }
 139
 140   if (memc)
 141   {
 142     memcached_connect_try(self);
 143   }
 144
 145   return self;
 146 }
 147
 148 void __instance_free(org::libmemcached::Instance* self)
 149 {
 150   memcached_quit_server(self, false);
 151
 152   if (self->address_info)
 153   {
 154     freeaddrinfo(self->address_info);
 155     self->address_info= NULL;
 156     self->address_info_next= NULL;
 157   }
 158
 159   memcached_error_free(*self);
 160
 161   if (memcached_is_allocated(self))
 162   {
 163     libmemcached_free(self->root, self);
 164   }
 165   else
 166   {
 167     self->options.is_initialized= false;
 168   }
 169 }
 170
 171 void memcached_instance_free(org::libmemcached::Instance* self)
 172 {
 173   if (self == NULL)
 174   {
 175     return;
 176   }
 177
 178   __instance_free(self);
 179 }
 180
 181 /*
 182   If we do not have a valid object to clone from, we toss an error.
 183 */
 184 memcached_server_st *memcached_instance_2_server(org::libmemcached::Instance* source)
 185 {
 186   /* We just do a normal create if source is missing */
 187   if (source == NULL)
 188   {
 189     return NULL;
 190   }
 191
 192   memcached_string_t hostname= { memcached_string_make_from_cstr(source->hostname) };
 193   return __server_create_with(source->root, NULL,
 194                               hostname,
 195                               source->port(), source->weight,
 196                               source->type);
 197
 198 }
 199
 200 memcached_return_t memcached_server_cursor(const memcached_st *ptr,
 201                                            const memcached_server_fn *callback,
 202                                            void *context,
 203                                            uint32_t number_of_callbacks)
 204 {
 205   memcached_return_t rc;
 206   if (memcached_failed(rc= initialize_const_query(ptr)))
 207   {
 208     return rc;
 209   }
 210
 211   size_t errors= 0;
 212   for (uint32_t x= 0; x < memcached_instance_list_count(ptr); x++)
 213   {
 214     org::libmemcached::Instance* instance= memcached_instance_by_position(ptr, x);
 215
 216     for (uint32_t y= 0; y < number_of_callbacks; y++)
 217     {
 218       memcached_return_t ret= (*callback[y])(ptr, instance, context);
 219
 220       if (memcached_failed(ret))
 221       {
 222         errors++;
 223         continue;
 224       }
 225     }
 226   }
 227
 228   return errors ? MEMCACHED_SOME_ERRORS : MEMCACHED_SUCCESS;
 229 }
 230
 231 memcached_return_t memcached_server_execute(memcached_st *ptr,
 232                                             memcached_server_execute_fn callback,
 233                                             void *context)
 234 {
 235   if (callback == NULL)
 236   {
 237     return MEMCACHED_INVALID_ARGUMENTS;
 238   }
 239
 240   bool some_errors= false;;
 241   for (uint32_t x= 0; x < memcached_instance_list_count(ptr); x++)
 242   {
 243     org::libmemcached::Instance* instance= memcached_instance_fetch(ptr, x);
 244
 245     memcached_return_t rc= (*callback)(ptr, instance, context);
 246     if (rc == MEMCACHED_INVALID_ARGUMENTS)
 247     {
 248       return rc;
 249     }
 250     else if (memcached_fatal(rc))
 251     {
 252       some_errors= true;
 253     }
 254   }
 255
 256   (void)some_errors;
 257   return MEMCACHED_SUCCESS;
 258 }
 259
 260 memcached_server_instance_st memcached_server_by_key(memcached_st *ptr,
 261                                                      const char *key,
 262                                                      size_t key_length,
 263                                                      memcached_return_t *error)
 264 {
 265   memcached_return_t unused;
 266   if (error == NULL)
 267   {
 268     error= &unused;
 269   }
 270
 271
 272   memcached_return_t rc;
 273   if (memcached_failed(rc= initialize_const_query(ptr)))
 274   {
 275     *error= rc;
 276     return NULL;
 277   }
 278
 279   if (memcached_failed((memcached_key_test(*ptr, (const char **)&key, &key_length, 1))))
 280   {
 281     *error= memcached_last_error(ptr);
 282     return NULL;
 283   }
 284
 285   uint32_t server_key= memcached_generate_hash(ptr, key, key_length);
 286   return memcached_instance_by_position(ptr, server_key);
 287 }
 288
 289 /*
 290   If we do not have a valid object to clone from, we toss an error.
 291 */
 292 static org::libmemcached::Instance* memcached_instance_clone(org::libmemcached::Instance* source)
 293 {
 294   /* We just do a normal create if source is missing */
 295   if (source == NULL)
 296   {
 297     return NULL;
 298   }
 299
 300   memcached_string_t hostname= { memcached_string_make_from_cstr(source->hostname) };
 301   return __instance_create_with(source->root,
 302                                 NULL,
 303                                 hostname,
 304                                 source->port(), source->weight,
 305                                 source->type);
 306 }
 307
 308 void set_last_disconnected_host(org::libmemcached::Instance* self)
 309 {
 310   assert(self->root);
 311   if (self->root == NULL)
 312   {
 313     return;
 314   }
 315
 316   if (memcached_server_get_last_disconnect(self->root) and
 317       memcached_server_get_last_disconnect(self->root)->version == self->version)
 318   {
 319     return;
 320   }
 321
 322   // const_cast
 323   memcached_st *root= (memcached_st *)self->root;
 324
 325   memcached_instance_free((org::libmemcached::Instance*)(root->last_disconnected_server));
 326   root->last_disconnected_server= memcached_instance_clone(self);
 327   ((org::libmemcached::Instance*)memcached_server_get_last_disconnect(root))->version= self->version;
 328 }
 329
 330 memcached_server_instance_st memcached_server_get_last_disconnect(const memcached_st *self)
 331 {
 332   WATCHPOINT_ASSERT(self);
 333   if (self == NULL)
 334   {
 335     return 0;
 336   }
 337
 338   return (memcached_server_instance_st)self->last_disconnected_server;
 339 }
 340
 341 uint32_t memcached_instance_set_count(org::libmemcached::Instance* servers, uint32_t count)
 342 {
 343   WATCHPOINT_ASSERT(servers);
 344   if (servers == NULL)
 345   {
 346     return 0;
 347   }
 348
 349   return servers->number_of_hosts= count;
 350 }
 351
 352 const char *memcached_instance_name(const memcached_server_instance_st self)
 353 {
 354   WATCHPOINT_ASSERT(self);
 355   if (self == NULL)
 356     return NULL;
 357
 358   return self->hostname;
 359 }
 360
 361 in_port_t memcached_instance_port(const memcached_server_instance_st self)
 362 {
 363   WATCHPOINT_ASSERT(self);
 364   if (self == NULL)
 365   {
 366     return 0;
 367   }
 368
 369   return self->port();
 370 }
 371
 372 void memcached_instance_next_retry(memcached_server_instance_st self, const time_t absolute_time)
 373 {
 374   WATCHPOINT_ASSERT(self);
 375   if (self)
 376   {
 377     ((org::libmemcached::Instance*)self)->next_retry= absolute_time;
 378   }
 379 }
 380
 381 uint32_t memcached_instance_response_count(const org::libmemcached::Instance* self)
 382 {
 383   WATCHPOINT_ASSERT(self);
 384   if (self == NULL)
 385   {
 386     return 0;
 387   }
 388
 389   return self->cursor_active_;
 390 }