Pulling in Mark's fixes for memory leaks in memslap
[m6w6/libmemcached] / libmemcached / memcached_behavior.c
1 #include "common.h"
2 #include <sys/types.h>
3 #include <sys/socket.h>
4 #include <netinet/tcp.h>
5
6 /*
7 This function is used to modify the behabior of running client.
8
9 We quit all connections so we can reset the sockets.
10 */
11
12 void set_behavior_flag(memcached_st *ptr, memcached_flags temp_flag, uint64_t data)
13 {
14 if (data)
15 ptr->flags|= temp_flag;
16 else
17 ptr->flags&= ~temp_flag;
18 }
19
20 memcached_return memcached_behavior_set(memcached_st *ptr,
21 memcached_behavior flag,
22 uint64_t data)
23 {
24 switch (flag)
25 {
26 case MEMCACHED_BEHAVIOR_SUPPORT_CAS:
27 set_behavior_flag(ptr, MEM_SUPPORT_CAS, data);
28 break;
29 case MEMCACHED_BEHAVIOR_NO_BLOCK:
30 set_behavior_flag(ptr, MEM_NO_BLOCK, data);
31 memcached_quit(ptr);
32 case MEMCACHED_BEHAVIOR_BUFFER_REQUESTS:
33 set_behavior_flag(ptr, MEM_BUFFER_REQUESTS, data);
34 memcached_quit(ptr);
35 break;
36 case MEMCACHED_BEHAVIOR_TCP_NODELAY:
37 set_behavior_flag(ptr, MEM_TCP_NODELAY, data);
38 memcached_quit(ptr);
39 break;
40 case MEMCACHED_BEHAVIOR_DISTRIBUTION:
41 {
42 ptr->distribution= (memcached_server_distribution)(data);
43 run_distribution(ptr);
44 break;
45 }
46 case MEMCACHED_BEHAVIOR_HASH:
47 ptr->hash= (memcached_hash)(data);
48 break;
49 case MEMCACHED_BEHAVIOR_CACHE_LOOKUPS:
50 set_behavior_flag(ptr, MEM_USE_CACHE_LOOKUPS, data);
51 memcached_quit(ptr);
52 break;
53 case MEMCACHED_BEHAVIOR_VERIFY_KEY:
54 set_behavior_flag(ptr, MEM_VERIFY_KEY, data);
55 break;
56 case MEMCACHED_BEHAVIOR_KETAMA:
57 set_behavior_flag(ptr, MEM_USE_KETAMA, data);
58 break;
59 case MEMCACHED_BEHAVIOR_SORT_HOSTS:
60 {
61 set_behavior_flag(ptr, MEM_USE_SORT_HOSTS, data);
62 run_distribution(ptr);
63
64 break;
65 }
66 case MEMCACHED_BEHAVIOR_POLL_TIMEOUT:
67 ptr->poll_timeout= (int32_t)data;
68 break;
69 case MEMCACHED_BEHAVIOR_CONNECT_TIMEOUT:
70 ptr->connect_timeout= (int32_t)data;
71 break;
72 case MEMCACHED_BEHAVIOR_RETRY_TIMEOUT:
73 ptr->retry_timeout= (int32_t)data;
74 break;
75 case MEMCACHED_BEHAVIOR_SOCKET_SEND_SIZE:
76 ptr->send_size= (int32_t)data;
77 memcached_quit(ptr);
78 break;
79 case MEMCACHED_BEHAVIOR_SOCKET_RECV_SIZE:
80 ptr->recv_size= (int32_t)data;
81 memcached_quit(ptr);
82 break;
83 case MEMCACHED_BEHAVIOR_USER_DATA:
84 return MEMCACHED_FAILURE;
85 }
86
87 return MEMCACHED_SUCCESS;
88 }
89
90 uint64_t memcached_behavior_get(memcached_st *ptr,
91 memcached_behavior flag)
92 {
93 memcached_flags temp_flag= 0;
94
95 switch (flag)
96 {
97 case MEMCACHED_BEHAVIOR_SUPPORT_CAS:
98 temp_flag= MEM_SUPPORT_CAS;
99 break;
100 case MEMCACHED_BEHAVIOR_CACHE_LOOKUPS:
101 temp_flag= MEM_USE_CACHE_LOOKUPS;
102 break;
103 case MEMCACHED_BEHAVIOR_NO_BLOCK:
104 temp_flag= MEM_NO_BLOCK;
105 break;
106 case MEMCACHED_BEHAVIOR_BUFFER_REQUESTS:
107 temp_flag= MEM_BUFFER_REQUESTS;
108 break;
109 case MEMCACHED_BEHAVIOR_TCP_NODELAY:
110 temp_flag= MEM_TCP_NODELAY;
111 break;
112 case MEMCACHED_BEHAVIOR_VERIFY_KEY:
113 temp_flag= MEM_VERIFY_KEY;
114 break;
115 case MEMCACHED_BEHAVIOR_DISTRIBUTION:
116 return ptr->distribution;
117 case MEMCACHED_BEHAVIOR_HASH:
118 return ptr->hash;
119 case MEMCACHED_BEHAVIOR_KETAMA:
120 temp_flag= MEM_USE_KETAMA;
121 break;
122 case MEMCACHED_BEHAVIOR_SORT_HOSTS:
123 temp_flag= MEM_USE_SORT_HOSTS;
124 break;
125 case MEMCACHED_BEHAVIOR_POLL_TIMEOUT:
126 {
127 return (unsigned long long)ptr->poll_timeout;
128 }
129 case MEMCACHED_BEHAVIOR_CONNECT_TIMEOUT:
130 {
131 return (unsigned long long)ptr->connect_timeout;
132 }
133 case MEMCACHED_BEHAVIOR_RETRY_TIMEOUT:
134 {
135 return (unsigned long long)ptr->retry_timeout;
136 }
137 case MEMCACHED_BEHAVIOR_SOCKET_SEND_SIZE:
138 {
139 int sock_size;
140 socklen_t sock_length= sizeof(int);
141
142 /* REFACTOR */
143 /* We just try the first host, and if it is down we return zero */
144 if ((memcached_connect(&ptr->hosts[0])) != MEMCACHED_SUCCESS)
145 return 0;
146
147 if (getsockopt(ptr->hosts[0].fd, SOL_SOCKET,
148 SO_SNDBUF, &sock_size, &sock_length))
149 return 0; /* Zero means error */
150
151 return sock_size;
152 }
153 case MEMCACHED_BEHAVIOR_SOCKET_RECV_SIZE:
154 {
155 int sock_size;
156 socklen_t sock_length= sizeof(int);
157
158 /* REFACTOR */
159 /* We just try the first host, and if it is down we return zero */
160 if ((memcached_connect(&ptr->hosts[0])) != MEMCACHED_SUCCESS)
161 return 0;
162
163 if (getsockopt(ptr->hosts[0].fd, SOL_SOCKET,
164 SO_RCVBUF, &sock_size, &sock_length))
165 return 0; /* Zero means error */
166
167 return sock_size;
168 }
169 case MEMCACHED_BEHAVIOR_USER_DATA:
170 return MEMCACHED_FAILURE;
171 }
172
173 WATCHPOINT_ASSERT(temp_flag); /* Programming mistake if it gets this far */
174 if (ptr->flags & temp_flag)
175 return 1;
176 else
177 return 0;
178
179 return MEMCACHED_SUCCESS;
180 }