1 /* vim:expandtab:shiftwidth=2:tabstop=2:smarttab:
5 * Copyright (C) 2011 Data Differential, http://datadifferential.com/
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions are
12 * * Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
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
20 * * The names of its contributors may not be used to endorse or
21 * promote products derived from this software without specific prior
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.
38 #include <libmemcached/common.h>
40 #define MAX_ERROR_LENGTH 2048
41 struct memcached_error_t
45 struct memcached_error_t
*next
;
46 memcached_return_t rc
;
49 char message
[MAX_ERROR_LENGTH
];
52 static void _set(memcached_server_st
& server
, memcached_st
& memc
)
54 if (server
.error_messages
&& server
.error_messages
->query_id
!= server
.root
->query_id
)
56 memcached_error_free(server
);
59 if (memc
.error_messages
== NULL
)
62 memcached_error_t
*error
= (struct memcached_error_t
*)libmemcached_malloc(&memc
, sizeof(struct memcached_error_t
));
63 if (not error
) // Bad business if this happens
66 memcpy(error
, memc
.error_messages
, sizeof(memcached_error_t
));
67 error
->next
= server
.error_messages
;
68 server
.error_messages
= error
;
71 static void _set(memcached_st
& memc
, memcached_string_t
*str
, memcached_return_t
&rc
, const char *at
, int local_errno
= 0)
74 if (memc
.error_messages
&& memc
.error_messages
->query_id
!= memc
.query_id
)
76 memcached_error_free(memc
);
79 // For memory allocation we use our error since it is a bit more specific
80 if (local_errno
== ENOMEM
and rc
== MEMCACHED_ERRNO
)
82 rc
= MEMCACHED_MEMORY_ALLOCATION_FAILURE
;
85 if (rc
== MEMCACHED_MEMORY_ALLOCATION_FAILURE
)
90 if (rc
== MEMCACHED_ERRNO
and not local_errno
)
96 if (rc
== MEMCACHED_ERRNO
and local_errno
== ENOTCONN
)
98 rc
= MEMCACHED_CONNECTION_FAILURE
;
101 if (local_errno
== EINVAL
)
103 rc
= MEMCACHED_INVALID_ARGUMENTS
;
106 if (local_errno
== ECONNREFUSED
)
108 rc
= MEMCACHED_CONNECTION_FAILURE
;
111 memcached_error_t
*error
= (struct memcached_error_t
*)libmemcached_malloc(&memc
, sizeof(struct memcached_error_t
));
112 if (not error
) // Bad business if this happens
116 error
->query_id
= memc
.query_id
;
118 error
->local_errno
= local_errno
;
120 const char *errmsg_ptr
;
121 char errmsg
[MAX_ERROR_LENGTH
];
127 #ifdef STRERROR_R_CHAR_P
128 errmsg_ptr
= strerror_r(local_errno
, errmsg
, sizeof(errmsg
));
130 strerror_r(local_errno
, errmsg
, sizeof(errmsg
));
136 if (str
and str
->size
and local_errno
)
138 error
->size
= (int)snprintf(error
->message
, MAX_ERROR_LENGTH
, "%s(%s), %.*s -> %s",
139 memcached_strerror(&memc
, rc
),
141 memcached_string_printf(*str
), at
);
143 else if (local_errno
)
145 error
->size
= (int)snprintf(error
->message
, MAX_ERROR_LENGTH
, "%s(%s) -> %s",
146 memcached_strerror(&memc
, rc
),
150 else if (str
and str
->size
)
152 error
->size
= (int)snprintf(error
->message
, MAX_ERROR_LENGTH
, "%s, %.*s -> %s",
153 memcached_strerror(&memc
, rc
),
154 int(str
->size
), str
->c_str
, at
);
158 error
->size
= (int)snprintf(error
->message
, MAX_ERROR_LENGTH
, "%s -> %s",
159 memcached_strerror(&memc
, rc
), at
);
162 error
->next
= memc
.error_messages
;
163 memc
.error_messages
= error
;
166 memcached_return_t
memcached_set_error(memcached_st
& memc
, memcached_return_t rc
, const char *at
, const char *str
, size_t length
)
168 assert_msg(rc
!= MEMCACHED_ERRNO
, "Programmer error, MEMCACHED_ERRNO was set to be returned to client");
169 memcached_string_t tmp
= { str
, length
};
170 return memcached_set_error(memc
, rc
, at
, tmp
);
173 memcached_return_t
memcached_set_error(memcached_server_st
& self
, memcached_return_t rc
, const char *at
, const char *str
, size_t length
)
175 assert_msg(rc
!= MEMCACHED_ERRNO
, "Programmer error, MEMCACHED_ERRNO was set to be returned to client");
176 assert_msg(rc
!= MEMCACHED_SOME_ERRORS
, "Programmer error, MEMCACHED_SOME_ERRORS was about to be set on a memcached_server_st");
177 memcached_string_t tmp
= { str
, length
};
178 return memcached_set_error(self
, rc
, at
, tmp
);
181 memcached_return_t
memcached_set_error(memcached_st
& memc
, memcached_return_t rc
, const char *at
, memcached_string_t
& str
)
183 assert_msg(rc
!= MEMCACHED_ERRNO
, "Programmer error, MEMCACHED_ERRNO was set to be returned to client");
184 if (memcached_success(rc
))
185 return MEMCACHED_SUCCESS
;
187 _set(memc
, &str
, rc
, at
);
192 memcached_return_t
memcached_set_error(memcached_server_st
& self
, memcached_return_t rc
, const char *at
, memcached_string_t
& str
)
194 assert_msg(rc
!= MEMCACHED_ERRNO
, "Programmer error, MEMCACHED_ERRNO was set to be returned to client");
195 assert_msg(rc
!= MEMCACHED_SOME_ERRORS
, "Programmer error, MEMCACHED_SOME_ERRORS was about to be set on a memcached_server_st");
196 if (memcached_success(rc
))
197 return MEMCACHED_SUCCESS
;
199 char hostname_port_message
[MAX_ERROR_LENGTH
];
203 size
= snprintf(hostname_port_message
, sizeof(hostname_port_message
), "%.*s, host: %s:%d",
204 memcached_string_printf(str
),
205 self
.hostname
, int(self
.port
));
209 size
= snprintf(hostname_port_message
, sizeof(hostname_port_message
), "host: %s:%d",
210 self
.hostname
, int(self
.port
));
213 memcached_string_t error_host
= { hostname_port_message
, size
};
218 _set(*self
.root
, &error_host
, rc
, at
);
219 _set(self
, (*self
.root
));
224 memcached_return_t
memcached_set_error(memcached_server_st
& self
, memcached_return_t rc
, const char *at
)
226 assert_msg(rc
!= MEMCACHED_ERRNO
, "Programmer error, MEMCACHED_ERRNO was set to be returned to client");
227 assert_msg(rc
!= MEMCACHED_SOME_ERRORS
, "Programmer error, MEMCACHED_SOME_ERRORS was about to be set on a memcached_server_st");
228 if (memcached_success(rc
))
229 return MEMCACHED_SUCCESS
;
231 char hostname_port
[NI_MAXHOST
+NI_MAXSERV
+ sizeof("host : ")];
232 int size
= snprintf(hostname_port
, sizeof(hostname_port
), "host: %s:%d", self
.hostname
, int(self
.port
));
234 memcached_string_t error_host
= { hostname_port
, size
};
239 _set(*self
.root
, &error_host
, rc
, at
);
240 _set(self
, *self
.root
);
245 memcached_return_t
memcached_set_error(memcached_st
& self
, memcached_return_t rc
, const char *at
)
247 assert_msg(rc
!= MEMCACHED_ERRNO
, "Programmer error, MEMCACHED_ERRNO was set to be returned to client");
248 if (memcached_success(rc
))
249 return MEMCACHED_SUCCESS
;
251 _set(self
, NULL
, rc
, at
);
256 memcached_return_t
memcached_set_errno(memcached_st
& self
, int local_errno
, const char *at
, const char *str
, size_t length
)
258 memcached_string_t tmp
= { str
, length
};
259 return memcached_set_errno(self
, local_errno
, at
, tmp
);
262 memcached_return_t
memcached_set_errno(memcached_server_st
& self
, int local_errno
, const char *at
, const char *str
, size_t length
)
264 memcached_string_t tmp
= { str
, length
};
265 return memcached_set_errno(self
, local_errno
, at
, tmp
);
268 memcached_return_t
memcached_set_errno(memcached_st
& self
, int local_errno
, const char *at
)
271 return MEMCACHED_SUCCESS
;
273 memcached_return_t rc
= MEMCACHED_ERRNO
;
274 _set(self
, NULL
, rc
, at
, local_errno
);
279 memcached_return_t
memcached_set_errno(memcached_st
& memc
, int local_errno
, const char *at
, memcached_string_t
& str
)
282 return MEMCACHED_SUCCESS
;
284 memcached_return_t rc
= MEMCACHED_ERRNO
;
285 _set(memc
, &str
, rc
, at
, local_errno
);
290 memcached_return_t
memcached_set_errno(memcached_server_st
& self
, int local_errno
, const char *at
, memcached_string_t
& str
)
293 return MEMCACHED_SUCCESS
;
295 char hostname_port_message
[MAX_ERROR_LENGTH
];
299 size
= snprintf(hostname_port_message
, sizeof(hostname_port_message
), "%.*s, host: %s:%d",
300 memcached_string_printf(str
),
301 self
.hostname
, int(self
.port
));
305 size
= snprintf(hostname_port_message
, sizeof(hostname_port_message
), "host: %s:%d",
306 self
.hostname
, int(self
.port
));
309 memcached_string_t error_host
= { hostname_port_message
, size
};
311 memcached_return_t rc
= MEMCACHED_ERRNO
;
315 _set(*self
.root
, &error_host
, rc
, at
, local_errno
);
316 _set(self
, (*self
.root
));
321 memcached_return_t
memcached_set_errno(memcached_server_st
& self
, int local_errno
, const char *at
)
324 return MEMCACHED_SUCCESS
;
326 char hostname_port_message
[MAX_ERROR_LENGTH
];
327 int size
= snprintf(hostname_port_message
, sizeof(hostname_port_message
), "host: %s:%d",
328 self
.hostname
, int(self
.port
));
330 memcached_string_t error_host
= { hostname_port_message
, size
};
332 memcached_return_t rc
= MEMCACHED_ERRNO
;
336 _set(*self
.root
, &error_host
, rc
, at
, local_errno
);
337 _set(self
, (*self
.root
));
342 static void _error_print(const memcached_error_t
*error
)
349 fprintf(stderr
, "%s\n", memcached_strerror(NULL
, error
->rc
) );
353 fprintf(stderr
, "%s %s\n", memcached_strerror(NULL
, error
->rc
), error
->message
);
356 _error_print(error
->next
);
359 void memcached_error_print(const memcached_st
*self
)
364 _error_print(self
->error_messages
);
367 static void _error_free(memcached_error_t
*error
)
372 _error_free(error
->next
);
374 if (error
&& error
->root
)
376 libmemcached_free(error
->root
, error
);
384 void memcached_error_free(memcached_st
& self
)
386 _error_free(self
.error_messages
);
387 self
.error_messages
= NULL
;
390 void memcached_error_free(memcached_server_st
& self
)
392 _error_free(self
.error_messages
);
393 self
.error_messages
= NULL
;
396 const char *memcached_last_error_message(memcached_st
*memc
)
399 return memcached_strerror(memc
, MEMCACHED_INVALID_ARGUMENTS
);
401 if (not memc
->error_messages
)
402 return memcached_strerror(memc
, MEMCACHED_SUCCESS
);
404 if (not memc
->error_messages
->size
)
405 return memcached_strerror(memc
, memc
->error_messages
->rc
);
407 return memc
->error_messages
->message
;
411 bool memcached_has_current_error(memcached_st
&memc
)
413 if (memc
.error_messages
414 and memc
.error_messages
->query_id
== memc
.query_id
415 and memcached_failed(memc
.error_messages
->rc
))
423 memcached_return_t
memcached_last_error(memcached_st
*memc
)
426 return MEMCACHED_INVALID_ARGUMENTS
;
428 if (not memc
->error_messages
)
429 return MEMCACHED_SUCCESS
;
431 return memc
->error_messages
->rc
;
434 int memcached_last_error_errno(memcached_st
*memc
)
439 if (not memc
->error_messages
)
442 return memc
->error_messages
->local_errno
;
445 const char *memcached_server_error(memcached_server_instance_st server
)
448 return memcached_strerror(server
->root
, MEMCACHED_INVALID_ARGUMENTS
);
450 if (not server
->error_messages
)
451 return memcached_strerror(server
->root
, MEMCACHED_SUCCESS
);
453 if (not server
->error_messages
->size
)
454 return memcached_strerror(server
->root
, server
->error_messages
->rc
);
456 return server
->error_messages
->message
;
460 memcached_error_t
*memcached_error_copy(const memcached_server_st
& server
)
462 if (not server
.error_messages
)
465 memcached_error_t
*error
= (memcached_error_t
*)libmemcached_malloc(server
.root
, sizeof(memcached_error_t
));
466 memcpy(error
, server
.error_messages
, sizeof(memcached_error_t
));
472 memcached_return_t
memcached_server_error_return(memcached_server_instance_st ptr
)
474 if (ptr
and ptr
->error_messages
)
476 return ptr
->error_messages
->rc
;
479 return MEMCACHED_FAILURE
;