git.m6w6.name Git - awesomized/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->options.ready= false;
  48   self->_events= 0;
  49   self->_revents= 0;
  50   self->cursor_active_= 0;
  51   self->port_= port;
  52   self->fd= INVALID_SOCKET;
  53   self->io_bytes_sent= 0;
  54   self->request_id= 0;
  55   self->server_failure_counter= 0;
  56   self->server_failure_counter_query_id= 0;
  57   self->weight= weight ? weight : 1; // 1 is the default weight value
  58   self->io_wait_count.read= 0;
  59   self->io_wait_count.write= 0;
  60   self->io_wait_count.timeouts= 0;
  61   self->io_wait_count._bytes_read= 0;
  62   self->major_version= UINT8_MAX;
  63   self->micro_version= UINT8_MAX;
  64   self->minor_version= UINT8_MAX;
  65   self->type= type;
  66   self->error_messages= NULL;
  67   self->read_ptr= self->read_buffer;
  68   self->read_buffer_length= 0;
  69   self->read_data_length= 0;
  70   self->write_buffer_offset= 0;
  71   self->address_info= NULL;
  72   self->address_info_next= NULL;
  73
  74   self->state= MEMCACHED_SERVER_STATE_NEW;
  75   self->next_retry= 0;
  76
  77   self->root= root;
  78   if (root)
  79   {
  80     self->version= ++root->server_info.version;
  81   }
  82   else
  83   {
  84     self->version= UINT_MAX;
  85   }
  86   self->limit_maxbytes= 0;
  87   memcpy(self->hostname, hostname.c_str, hostname.size);
  88   self->hostname[hostname.size]= 0;
  89 }
  90
  91 static org::libmemcached::Instance* _server_create(org::libmemcached::Instance* self, const memcached_st *memc)
  92 {
  93   if (self == NULL)
  94   {
  95    self= libmemcached_xmalloc(memc, org::libmemcached::Instance);
  96
  97     if (self == NULL)
  98     {
  99       return NULL; /*  MEMCACHED_MEMORY_ALLOCATION_FAILURE */
 100     }
 101
 102     self->options.is_allocated= true;
 103   }
 104   else
 105   {
 106     self->options.is_allocated= false;
 107   }
 108
 109   self->options.is_initialized= true;
 110
 111   return self;
 112 }
 113
 114 void org::libmemcached::Instance::events(short arg)
 115 {
 116   if ((_events | arg) == _events)
 117   {
 118     return;
 119   }
 120
 121   _events|= arg;
 122 }
 123
 124 void org::libmemcached::Instance::revents(short arg)
 125 {
 126   if (arg)
 127   {
 128     options.ready= true;
 129   }
 130
 131   _revents= arg;
 132   _events&= short(~arg);
 133 }
 134
 135 org::libmemcached::Instance* __instance_create_with(memcached_st *memc,
 136                                                     org::libmemcached::Instance* self,
 137                                                     const memcached_string_t& hostname,
 138                                                     const in_port_t port,
 139                                                     uint32_t weight,
 140                                                     const memcached_connection_t type)
 141 {
 142   if (memcached_is_valid_servername(hostname) == false)
 143   {
 144     memcached_set_error(*memc, MEMCACHED_INVALID_ARGUMENTS, MEMCACHED_AT, memcached_literal_param("Invalid hostname provided"));
 145     return NULL;
 146   }
 147
 148   self= _server_create(self, memc);
 149
 150   if (self == NULL)
 151   {
 152     return NULL;
 153   }
 154
 155   _server_init(self, const_cast<memcached_st *>(memc), hostname, port, weight, type);
 156
 157   if (memc and memcached_is_udp(memc))
 158   {
 159     self->write_buffer_offset= UDP_DATAGRAM_HEADER_LENGTH;
 160     memcached_io_init_udp_header(self, 0);
 161   }
 162
 163   if (memc)
 164   {
 165     memcached_connect_try(self);
 166   }
 167
 168   return self;
 169 }
 170
 171 void __instance_free(org::libmemcached::Instance* self)
 172 {
 173   memcached_quit_server(self, false);
 174
 175   if (self->address_info)
 176   {
 177     freeaddrinfo(self->address_info);
 178     self->address_info= NULL;
 179     self->address_info_next= NULL;
 180   }
 181   assert(self->address_info_next == NULL);
 182
 183   memcached_error_free(*self);
 184
 185   if (memcached_is_allocated(self))
 186   {
 187     libmemcached_free(self->root, self);
 188   }
 189   else
 190   {
 191     self->options.is_initialized= false;
 192   }
 193 }
 194
 195 void memcached_instance_free(org::libmemcached::Instance* self)
 196 {
 197   if (self)
 198   {
 199     __instance_free(self);
 200   }
 201 }
 202
 203 memcached_return_t memcached_server_cursor(const memcached_st* memc,
 204                                            const memcached_server_fn *callback,
 205                                            void *context,
 206                                            uint32_t number_of_callbacks)
 207 {
 208   memcached_return_t rc;
 209   if (memcached_failed(rc= initialize_const_query(memc)))
 210   {
 211     return rc;
 212   }
 213
 214   size_t errors= 0;
 215   for (uint32_t x= 0; x < memcached_instance_list_count(memc); x++)
 216   {
 217     org::libmemcached::Instance* instance= memcached_instance_by_position(memc, x);
 218
 219     for (uint32_t y= 0; y < number_of_callbacks; y++)
 220     {
 221       memcached_return_t ret= (*callback[y])(memc, instance, context);
 222
 223       if (memcached_failed(ret))
 224       {
 225         errors++;
 226         continue;
 227       }
 228     }
 229   }
 230
 231   return errors ? MEMCACHED_SOME_ERRORS : MEMCACHED_SUCCESS;
 232 }
 233
 234 memcached_return_t memcached_server_execute(memcached_st *memc,
 235                                             memcached_server_execute_fn callback,
 236                                             void *context)
 237 {
 238   if (callback == NULL)
 239   {
 240     return MEMCACHED_INVALID_ARGUMENTS;
 241   }
 242
 243   bool some_errors= false;;
 244   for (uint32_t x= 0; x < memcached_instance_list_count(memc); x++)
 245   {
 246     org::libmemcached::Instance* instance= memcached_instance_fetch(memc, x);
 247
 248     memcached_return_t rc= (*callback)(memc, instance, context);
 249     if (rc == MEMCACHED_INVALID_ARGUMENTS)
 250     {
 251       return rc;
 252     }
 253     else if (memcached_fatal(rc))
 254     {
 255       some_errors= true;
 256     }
 257   }
 258
 259   (void)some_errors;
 260   return MEMCACHED_SUCCESS;
 261 }
 262
 263 memcached_server_instance_st memcached_server_by_key(memcached_st *memc,
 264                                                      const char *key,
 265                                                      size_t key_length,
 266                                                      memcached_return_t *error)
 267 {
 268   memcached_return_t unused;
 269   if (error == NULL)
 270   {
 271     error= &unused;
 272   }
 273
 274
 275   memcached_return_t rc;
 276   if (memcached_failed(rc= initialize_const_query(memc)))
 277   {
 278     *error= rc;
 279     return NULL;
 280   }
 281
 282   if (memcached_failed((memcached_key_test(*memc, (const char **)&key, &key_length, 1))))
 283   {
 284     *error= memcached_last_error(memc);
 285     return NULL;
 286   }
 287
 288   uint32_t server_key= memcached_generate_hash(memc, key, key_length);
 289   return memcached_instance_by_position(memc, server_key);
 290 }
 291
 292 /*
 293   If we do not have a valid object to clone from, we toss an error.
 294 */
 295 static org::libmemcached::Instance* memcached_instance_clone(org::libmemcached::Instance* source)
 296 {
 297   /* We just do a normal create if source is missing */
 298   if (source == NULL)
 299   {
 300     return NULL;
 301   }
 302
 303   memcached_string_t hostname= { memcached_string_make_from_cstr(source->hostname) };
 304   return __instance_create_with(source->root,
 305                                 NULL,
 306                                 hostname,
 307                                 source->port(), source->weight,
 308                                 source->type);
 309 }
 310
 311 void set_last_disconnected_host(org::libmemcached::Instance* self)
 312 {
 313   assert(self->root);
 314   if (self->root)
 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
 327     // We set is_parsing so that no lookup happens
 328     root->state.is_parsing= true;
 329     root->last_disconnected_server= memcached_instance_clone(self);
 330     root->state.is_parsing= false;
 331
 332     ((org::libmemcached::Instance*)memcached_server_get_last_disconnect(root))->version= self->version;
 333   }
 334 }
 335
 336 memcached_server_instance_st memcached_server_get_last_disconnect(const memcached_st *self)
 337 {
 338   WATCHPOINT_ASSERT(self);
 339   if (self == NULL)
 340   {
 341     return 0;
 342   }
 343
 344   return (memcached_server_instance_st)self->last_disconnected_server;
 345 }
 346
 347 void memcached_instance_next_retry(memcached_server_instance_st self, const time_t absolute_time)
 348 {
 349   WATCHPOINT_ASSERT(self);
 350   if (self)
 351   {
 352     ((org::libmemcached::Instance*)self)->next_retry= absolute_time;
 353   }
 354 }