Add memcached_result_st.pod to EXTRA_DIST so it gets included in releases
[m6w6/libmemcached] / lib / memcached_delete.c
1 #include "common.h"
2
3 memcached_return memcached_delete(memcached_st *ptr, char *key, size_t key_length,
4 time_t expiration)
5 {
6 return memcached_delete_by_key(ptr, key, key_length,
7 key, key_length, expiration);
8 }
9
10 memcached_return memcached_delete_by_key(memcached_st *ptr,
11 char *master_key, size_t master_key_length,
12 char *key, size_t key_length,
13 time_t expiration)
14 {
15 char to_write= (ptr->flags & MEM_BUFFER_REQUESTS) ? 0 : 1;
16 size_t send_length;
17 char buffer[MEMCACHED_DEFAULT_COMMAND_SIZE];
18 unsigned int server_key;
19 uint8_t replicas= 0;
20 memcached_return rc[MEMCACHED_MAX_REPLICAS];
21
22 unlikely (key_length == 0)
23 return MEMCACHED_NO_KEY_PROVIDED;
24
25 unlikely (ptr->hosts == NULL || ptr->number_of_hosts == 0)
26 return MEMCACHED_NO_SERVERS;
27
28 server_key= memcached_generate_hash(ptr, master_key, master_key_length);
29
30 if (expiration)
31 send_length= snprintf(buffer, MEMCACHED_DEFAULT_COMMAND_SIZE,
32 "delete %.*s %llu\r\n", (int)key_length, key,
33 (unsigned long long)expiration);
34 else
35 send_length= snprintf(buffer, MEMCACHED_DEFAULT_COMMAND_SIZE,
36 "delete %.*s\r\n", (int)key_length, key);
37
38 if (send_length >= MEMCACHED_DEFAULT_COMMAND_SIZE)
39 {
40 rc[replicas]= MEMCACHED_WRITE_FAILURE;
41 goto error;
42 }
43
44 do
45 {
46 rc[replicas]= memcached_do(&ptr->hosts[server_key], buffer, send_length, to_write);
47 if (rc[replicas] != MEMCACHED_SUCCESS)
48 goto error;
49
50 if ((ptr->flags & MEM_BUFFER_REQUESTS))
51 {
52 rc[replicas]= MEMCACHED_BUFFERED;
53 }
54 else
55 {
56 rc[replicas]= memcached_response(&ptr->hosts[server_key], buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, NULL);
57 if (rc[replicas] == MEMCACHED_DELETED)
58 rc[replicas]= MEMCACHED_SUCCESS;
59 }
60
61 /* On error we just jump to the next potential server */
62 error:
63 if (ptr->number_of_replicas > 1)
64 {
65 if (server_key == (ptr->number_of_hosts - 1))
66 server_key= 0;
67 else
68 server_key++;
69 }
70 } while ((++replicas) < ptr->number_of_replicas);
71
72 /* As long as one object gets stored, we count this as a success */
73 while (replicas--)
74 {
75 if (rc[replicas] == MEMCACHED_DELETED)
76 return MEMCACHED_SUCCESS;
77 else if (rc[replicas] == MEMCACHED_DELETED)
78 rc[replicas]= MEMCACHED_BUFFERED;
79 }
80
81 return rc[0];
82 }