git.m6w6.name Git - awesomized/libmemcached/blob - libmemcached/delete.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 #include <libmemcached/memcached/protocol_binary.h>
  40
  41 memcached_return_t memcached_delete(memcached_st *memc, const char *key, size_t key_length,
  42                                     time_t expiration)
  43 {
  44   return memcached_delete_by_key(memc, key, key_length, key, key_length, expiration);
  45 }
  46
  47 static inline memcached_return_t ascii_delete(memcached_server_write_instance_st instance,
  48                                               uint32_t ,
  49                                               const char *key,
  50                                               const size_t key_length,
  51                                               const bool reply,
  52                                               const bool is_buffering)
  53 {
  54   libmemcached_io_vector_st vector[]=
  55   {
  56     { NULL, 0 },
  57     { memcached_literal_param("delete ") },
  58     { memcached_array_string(instance->root->_namespace), memcached_array_size(instance->root->_namespace) },
  59     { key, key_length },
  60     { " noreply", reply ? 0 : memcached_literal_param_size(" noreply") },
  61     { memcached_literal_param("\r\n") }
  62   };
  63
  64   /* Send command header, only flush if we are NOT buffering */
  65   return memcached_vdo(instance, vector, 6, is_buffering ? false : true);
  66 }
  67
  68 static inline memcached_return_t binary_delete(memcached_server_write_instance_st instance,
  69                                                uint32_t server_key,
  70                                                const char *key,
  71                                                const size_t key_length,
  72                                                const bool reply,
  73                                                const bool is_buffering)
  74 {
  75   protocol_binary_request_delete request= {};
  76
  77   bool should_flush= is_buffering ? false : true;
  78
  79   request.message.header.request.magic= PROTOCOL_BINARY_REQ;
  80   if (reply)
  81   {
  82     request.message.header.request.opcode= PROTOCOL_BINARY_CMD_DELETE;
  83   }
  84   else
  85   {
  86     request.message.header.request.opcode= PROTOCOL_BINARY_CMD_DELETEQ;
  87   }
  88   request.message.header.request.keylen= htons(uint16_t(key_length + memcached_array_size(instance->root->_namespace)));
  89   request.message.header.request.datatype= PROTOCOL_BINARY_RAW_BYTES;
  90   request.message.header.request.bodylen= htonl(uint32_t(key_length + memcached_array_size(instance->root->_namespace)));
  91
  92   libmemcached_io_vector_st vector[]=
  93   {
  94     { NULL, 0 },
  95     { request.bytes, sizeof(request.bytes) },
  96     { memcached_array_string(instance->root->_namespace), memcached_array_size(instance->root->_namespace) },
  97     { key, key_length }
  98   };
  99
 100   memcached_return_t rc;
 101   if (memcached_fatal(rc= memcached_vdo(instance, vector,  4, should_flush)))
 102   {
 103     memcached_io_reset(instance);
 104   }
 105
 106   if (memcached_has_replicas(instance))
 107   {
 108     request.message.header.request.opcode= PROTOCOL_BINARY_CMD_DELETEQ;
 109
 110     for (uint32_t x= 0; x < memcached_has_replicas(instance); ++x)
 111     {
 112       ++server_key;
 113
 114       if (server_key == memcached_server_count(instance->root))
 115       {
 116         server_key= 0;
 117       }
 118
 119       memcached_server_write_instance_st replica= memcached_server_instance_fetch(instance->root, server_key);
 120
 121       if (memcached_fatal(memcached_vdo(replica, vector, 4, should_flush)))
 122       {
 123         memcached_io_reset(replica);
 124       }
 125       else
 126       {
 127         memcached_server_response_decrement(replica);
 128       }
 129     }
 130   }
 131
 132   return rc;
 133 }
 134
 135 memcached_return_t memcached_delete_by_key(memcached_st *memc,
 136                                            const char *group_key, size_t group_key_length,
 137                                            const char *key, size_t key_length,
 138                                            time_t expiration)
 139 {
 140   LIBMEMCACHED_MEMCACHED_DELETE_START();
 141
 142   memcached_return_t rc;
 143   if (memcached_fatal(rc= initialize_query(memc, true)))
 144   {
 145     return rc;
 146   }
 147
 148   if (memcached_fatal(rc= memcached_key_test(*memc, (const char **)&key, &key_length, 1)))
 149   {
 150     return memcached_last_error(memc);
 151   }
 152
 153   if (expiration)
 154   {
 155     return memcached_set_error(*memc, MEMCACHED_INVALID_ARGUMENTS, MEMCACHED_AT,
 156                                memcached_literal_param("Memcached server version does not allow expiration of deleted items"));
 157   }
 158
 159   uint32_t server_key= memcached_generate_hash_with_redistribution(memc, group_key, group_key_length);
 160   memcached_server_write_instance_st instance= memcached_server_instance_fetch(memc, server_key);
 161
 162   bool is_buffering= memcached_is_buffering(instance->root);
 163   bool is_replying= memcached_is_replying(instance->root);
 164
 165   // If a delete trigger exists, we need a response, so no buffering/noreply
 166   if (memc->delete_trigger)
 167   {
 168     if (is_buffering)
 169     {
 170       return memcached_set_error(*memc, MEMCACHED_INVALID_ARGUMENTS, MEMCACHED_AT,
 171                                  memcached_literal_param("Delete triggers cannot be used if buffering is enabled"));
 172     }
 173
 174     if (is_replying == false)
 175     {
 176       return memcached_set_error(*memc, MEMCACHED_INVALID_ARGUMENTS, MEMCACHED_AT,
 177                                  memcached_literal_param("Delete triggers cannot be used if MEMCACHED_BEHAVIOR_NOREPLY is set"));
 178     }
 179   }
 180
 181   if (memcached_is_binary(memc))
 182   {
 183     rc= binary_delete(instance, server_key, key, key_length, is_replying, is_buffering);
 184   }
 185   else
 186   {
 187     rc= ascii_delete(instance, server_key, key, key_length, is_replying, is_buffering);
 188   }
 189
 190   if (rc == MEMCACHED_SUCCESS)
 191   {
 192     if (is_buffering == true)
 193     {
 194       rc= MEMCACHED_BUFFERED;
 195     }
 196     else if (is_replying == false)
 197     {
 198       rc= MEMCACHED_SUCCESS;
 199     }
 200     else
 201     {
 202       char buffer[MEMCACHED_DEFAULT_COMMAND_SIZE];
 203       rc= memcached_response(instance, buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, NULL);
 204       if (rc == MEMCACHED_DELETED)
 205       {
 206         rc= MEMCACHED_SUCCESS;
 207         if (memc->delete_trigger)
 208         {
 209           memc->delete_trigger(memc, key, key_length);
 210         }
 211       }
 212     }
 213   }
 214
 215   LIBMEMCACHED_MEMCACHED_DELETE_END();
 216   return rc;
 217 }