More on clone/cleanup callbacks
[awesomized/libmemcached] / lib / memcached.c
1 /*
2 Memcached library
3 */
4 #include "common.h"
5
6 memcached_st *memcached_create(memcached_st *ptr)
7 {
8 memcached_result_st *result_ptr;
9 if (!ptr)
10 {
11 ptr= (memcached_st *)malloc(sizeof(memcached_st));
12
13 if (!ptr)
14 return NULL; /* MEMCACHED_MEMORY_ALLOCATION_FAILURE */
15
16 memset(ptr, 0, sizeof(memcached_st));
17 ptr->is_allocated= MEMCACHED_ALLOCATED;
18 }
19 else
20 {
21 memset(ptr, 0, sizeof(memcached_st));
22 }
23 result_ptr= memcached_result_create(ptr, &ptr->result);
24 WATCHPOINT_ASSERT(result_ptr);
25 ptr->poll_timeout= MEMCACHED_DEFAULT_TIMEOUT;
26 ptr->distribution= MEMCACHED_DISTRIBUTION_MODULA;
27
28 return ptr;
29 }
30
31 void memcached_free(memcached_st *ptr)
32 {
33 /* If we have anything open, lets close it now */
34 memcached_quit(ptr);
35 memcached_server_list_free(ptr->hosts);
36 memcached_result_free(&ptr->result);
37
38 if (ptr->on_cleanup)
39 ptr->on_cleanup(ptr);
40
41 if (ptr->is_allocated == MEMCACHED_ALLOCATED)
42 free(ptr);
43 else
44 ptr->is_allocated= MEMCACHED_USED;
45 }
46
47 /*
48 clone is the destination, while ptr is the structure to clone.
49 If ptr is NULL the call is the same as if a memcached_create() was
50 called.
51 */
52 memcached_st *memcached_clone(memcached_st *clone, memcached_st *ptr)
53 {
54 memcached_return rc= MEMCACHED_SUCCESS;
55 memcached_st *new_clone;
56
57 if (ptr == NULL)
58 {
59 new_clone= memcached_create(clone);
60
61 if (ptr->on_clone)
62 ptr->on_clone(NULL, new_clone);
63
64 return new_clone;
65 }
66
67 if (ptr->is_allocated == MEMCACHED_USED)
68 {
69 WATCHPOINT_ASSERT(0);
70 return NULL;
71 }
72
73 new_clone= memcached_create(clone);
74
75 if (new_clone == NULL)
76 return NULL;
77
78 if (ptr->hosts)
79 rc= memcached_server_push(new_clone, ptr->hosts);
80
81 if (rc != MEMCACHED_SUCCESS)
82 {
83 memcached_free(new_clone);
84
85 return NULL;
86 }
87
88
89 new_clone->flags= ptr->flags;
90 new_clone->send_size= ptr->send_size;
91 new_clone->recv_size= ptr->recv_size;
92 new_clone->poll_timeout= ptr->poll_timeout;
93 new_clone->distribution= ptr->distribution;
94 new_clone->hash= ptr->hash;
95 new_clone->user_data= ptr->user_data;
96
97 if (ptr->on_clone)
98 ptr->on_clone(ptr, new_clone);
99
100 return new_clone;
101 }