git.m6w6.name Git - awesomized/libmemcached/blob - libmemcached/string.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
  39 #include <libmemcached/common.h>
  40
  41 inline static memcached_return_t _string_check(memcached_string_st *string, size_t need)
  42 {
  43   if (need && need > (size_t)(string->current_size - (size_t)(string->end - string->string)))
  44   {
  45     size_t current_offset= (size_t) (string->end - string->string);
  46
  47     /* This is the block multiplier. To keep it larger and surive division errors we must round it up */
  48     size_t adjust= (need - (size_t)(string->current_size - (size_t)(string->end - string->string))) / MEMCACHED_BLOCK_SIZE;
  49     adjust++;
  50
  51     size_t new_size= sizeof(char) * (size_t)((adjust * MEMCACHED_BLOCK_SIZE) + string->current_size);
  52     /* Test for overflow */
  53     if (new_size < need)
  54     {
  55       char error_message[1024];
  56       int error_message_length= snprintf(error_message, sizeof(error_message),"Needed %ld, got %ld", (long)need, (long)new_size);
  57       return memcached_set_error(*string->root, MEMCACHED_MEMORY_ALLOCATION_FAILURE, MEMCACHED_AT, error_message, error_message_length);
  58     }
  59
  60     char *new_value= libmemcached_xrealloc(string->root, string->string, new_size, char);
  61
  62     if (new_value == NULL)
  63     {
  64       return memcached_set_error(*string->root, MEMCACHED_MEMORY_ALLOCATION_FAILURE, MEMCACHED_AT);
  65     }
  66
  67     string->string= new_value;
  68     string->end= string->string + current_offset;
  69
  70     string->current_size+= (MEMCACHED_BLOCK_SIZE * adjust);
  71   }
  72
  73   return MEMCACHED_SUCCESS;
  74 }
  75
  76 static inline void _init_string(memcached_string_st *self)
  77 {
  78   self->current_size= 0;
  79   self->end= self->string= NULL;
  80 }
  81
  82 memcached_string_st *memcached_string_create(memcached_st *memc, memcached_string_st *self, size_t initial_size)
  83 {
  84   WATCHPOINT_ASSERT(memc);
  85
  86   /* Saving malloc calls :) */
  87   if (self)
  88   {
  89     WATCHPOINT_ASSERT(self->options.is_initialized == false);
  90
  91     memcached_set_allocated(self, false);
  92   }
  93   else
  94   {
  95     self= libmemcached_xmalloc(memc, memcached_string_st);
  96
  97     if (self == NULL)
  98     {
  99       return NULL;
 100     }
 101
 102     memcached_set_allocated(self, true);
 103   }
 104   self->root= memc;
 105
 106   _init_string(self);
 107
 108   if (memcached_failed(_string_check(self, initial_size)))
 109   {
 110     if (memcached_is_allocated(self))
 111     {
 112       libmemcached_free(memc, self);
 113     }
 114
 115     return NULL;
 116   }
 117
 118   self->options.is_initialized= true;
 119
 120   WATCHPOINT_ASSERT(self->string == self->end);
 121
 122   return self;
 123 }
 124
 125 static memcached_return_t memcached_string_append_null(memcached_string_st& string)
 126 {
 127   if (memcached_failed(_string_check(&string, 1)))
 128   {
 129     return MEMCACHED_MEMORY_ALLOCATION_FAILURE;
 130   }
 131
 132   *string.end= 0;
 133
 134   return MEMCACHED_SUCCESS;
 135 }
 136
 137 static memcached_return_t memcached_string_append_null(memcached_string_st *string)
 138 {
 139   if (memcached_failed(_string_check(string, 1)))
 140   {
 141     return MEMCACHED_MEMORY_ALLOCATION_FAILURE;
 142   }
 143
 144   *string->end= 0;
 145
 146   return MEMCACHED_SUCCESS;
 147 }
 148
 149 memcached_return_t memcached_string_append_character(memcached_string_st *string,
 150                                                      char character)
 151 {
 152   if (memcached_failed(_string_check(string, 1)))
 153   {
 154     return MEMCACHED_MEMORY_ALLOCATION_FAILURE;
 155   }
 156
 157   *string->end= character;
 158   string->end++;
 159
 160   return MEMCACHED_SUCCESS;
 161 }
 162
 163 memcached_return_t memcached_string_append(memcached_string_st *string,
 164                                            const char *value, size_t length)
 165 {
 166   if (memcached_failed(_string_check(string, length)))
 167   {
 168     return MEMCACHED_MEMORY_ALLOCATION_FAILURE;
 169   }
 170
 171   WATCHPOINT_ASSERT(length <= string->current_size);
 172   WATCHPOINT_ASSERT(string->string);
 173   WATCHPOINT_ASSERT(string->end >= string->string);
 174
 175   memcpy(string->end, value, length);
 176   string->end+= length;
 177
 178   return MEMCACHED_SUCCESS;
 179 }
 180
 181 char *memcached_string_c_copy(memcached_string_st *string)
 182 {
 183   if (memcached_string_length(string) == 0)
 184   {
 185     return NULL;
 186   }
 187
 188   char *c_ptr= static_cast<char *>(libmemcached_malloc(string->root, (memcached_string_length(string)+1) * sizeof(char)));
 189
 190   if (c_ptr == NULL)
 191   {
 192     return NULL;
 193   }
 194
 195   memcpy(c_ptr, memcached_string_value(string), memcached_string_length(string));
 196   c_ptr[memcached_string_length(string)]= 0;
 197
 198   return c_ptr;
 199 }
 200
 201 bool memcached_string_set(memcached_string_st& string, const char* value, size_t length)
 202 {
 203   memcached_string_reset(&string);
 204   if (memcached_success(memcached_string_append(&string, value, length)))
 205   {
 206     memcached_string_append_null(string);
 207     return true;
 208   }
 209
 210   return false;
 211 }
 212
 213 void memcached_string_reset(memcached_string_st *string)
 214 {
 215   string->end= string->string;
 216 }
 217
 218 void memcached_string_free(memcached_string_st& ptr)
 219 {
 220   memcached_string_free(&ptr);
 221 }
 222
 223 void memcached_string_free(memcached_string_st *ptr)
 224 {
 225   if (ptr == NULL)
 226   {
 227     return;
 228   }
 229
 230   if (ptr->string)
 231   {
 232     libmemcached_free(ptr->root, ptr->string);
 233   }
 234
 235   if (memcached_is_allocated(ptr))
 236   {
 237     libmemcached_free(ptr->root, ptr);
 238   }
 239   else
 240   {
 241     ptr->options.is_initialized= false;
 242   }
 243 }
 244
 245 memcached_return_t memcached_string_check(memcached_string_st *string, size_t need)
 246 {
 247   return _string_check(string, need);
 248 }
 249
 250 bool memcached_string_resize(memcached_string_st& string, const size_t need)
 251 {
 252   return memcached_success(_string_check(&string, need));
 253 }
 254
 255 size_t memcached_string_length(const memcached_string_st *self)
 256 {
 257   return size_t(self->end -self->string);
 258 }
 259
 260 size_t memcached_string_length(const memcached_string_st& self)
 261 {
 262   return size_t(self.end -self.string);
 263 }
 264
 265 size_t memcached_string_size(const memcached_string_st *self)
 266 {
 267   return self->current_size;
 268 }
 269
 270 const char *memcached_string_value(const memcached_string_st *self)
 271 {
 272   return self->string;
 273 }
 274
 275 const char *memcached_string_value(const memcached_string_st& self)
 276 {
 277   return self.string;
 278 }
 279
 280 char *memcached_string_take_value(memcached_string_st *self)
 281 {
 282   assert_msg(self, "Invalid memcached_string_st");
 283   // If we fail at adding the null, we copy and move on
 284   if (memcached_success(memcached_string_append_null(self)))
 285   {
 286     return memcached_string_c_copy(self);
 287   }
 288
 289   char *value= self->string;
 290
 291   _init_string(self);
 292
 293   return value;
 294 }
 295
 296 char *memcached_string_value_mutable(const memcached_string_st *self)
 297 {
 298   return self->string;
 299 }
 300
 301 char *memcached_string_c_str(memcached_string_st& self)
 302 {
 303   return self.string;
 304 }
 305
 306 void memcached_string_set_length(memcached_string_st *self, size_t length)
 307 {
 308   self->end= self->string +length;
 309 }
 310
 311 void memcached_string_set_length(memcached_string_st& self, const size_t length)
 312 {
 313   assert(self.current_size >= length);
 314   size_t set_length= length;
 315   if (self.current_size > length)
 316   {
 317     if (memcached_failed(_string_check(&self, length)))
 318     {
 319       set_length= self.current_size;
 320     }
 321   }
 322   self.end= self.string +set_length;
 323 }