Merge in new protocol interface bits.
[m6w6/libmemcached] / libmemcached / error.c
1 /* vim:expandtab:shiftwidth=2:tabstop=2:smarttab:
2 *
3 * LibMemcached
4 *
5 * Copyright (C) 2011 Data Differential, http://datadifferential.com/
6 * 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
40 struct memcached_error_st
41 {
42 memcached_st *root;
43 struct memcached_error_st *next;
44 memcached_return_t rc;
45 int local_errno;
46 size_t size;
47 char c_str[];
48 };
49
50 static memcached_error_st *_set(memcached_st *memc, memcached_string_t *str)
51 {
52 if (! memc)
53 return NULL;
54
55 memcached_error_st *error;
56 error= (struct memcached_error_st *)libmemcached_malloc(memc, sizeof(struct memcached_error_st) +(str ? str->size :0) +1);
57
58 if (! error)
59 return NULL;
60
61 error->root= memc;
62
63 if (str)
64 {
65 error->size= str->size;
66 memcpy(error->c_str, str->c_str, str->size);
67 error->c_str[str->size]= 0;
68 }
69 else
70 {
71 error->size= 0;
72 }
73
74 error->next= memc->error_messages;
75 memc->error_messages= error;
76
77 return error;
78 }
79
80 memcached_return_t memcached_set_error_string(memcached_st *memc, memcached_return_t rc, const char *str, size_t length)
81 {
82 memcached_string_t tmp;
83 tmp.c_str= str;
84 tmp.size= length;
85 return memcached_set_error(memc, rc, &tmp);
86 }
87
88 memcached_return_t memcached_set_error(memcached_st *memc, memcached_return_t rc, memcached_string_t *str)
89 {
90 if (rc == MEMCACHED_SUCCESS)
91 return MEMCACHED_SUCCESS;
92
93 memcached_error_st *error= _set(memc, str);
94
95 if (error)
96 {
97 error->local_errno= 0;
98 error->rc= rc;
99 }
100
101 return rc;
102 }
103
104 memcached_return_t memcached_set_errno(memcached_st *memc, int local_errno, memcached_string_t *str)
105 {
106 memcached_error_st *error= _set(memc, str);
107
108 if (error)
109 {
110 error->local_errno= local_errno;
111 error->rc= MEMCACHED_ERRNO;
112 }
113
114 return error->rc;
115 }
116
117 static void _error_print(const memcached_error_st *error)
118 {
119 if (! error)
120 return;
121
122 if (! error->size)
123 {
124 fprintf(stderr, "%s\n", memcached_strerror(NULL, error->rc) );
125 }
126 else
127 {
128 fprintf(stderr, "%s %s\n", memcached_strerror(NULL, error->rc), error->c_str);
129 }
130
131 _error_print(error->next);
132 }
133
134 void memcached_error_print(const memcached_st *self)
135 {
136 if (! self)
137 return;
138
139 _error_print(self->error_messages);
140 }
141
142 static void _error_free(memcached_error_st *error)
143 {
144 if (! error)
145 return;
146
147 _error_free(error->next);
148
149 if (error && error->root)
150 {
151 libmemcached_free(error->root, error);
152 }
153 else if (error)
154 {
155 free(error);
156 }
157 }
158
159 void memcached_error_free(memcached_st *self)
160 {
161 if (! self)
162 return;
163
164 _error_free(self->error_messages);
165 }
166
167 const char *memcached_last_error_message(memcached_st *memc)
168 {
169 if (! memc)
170 return memcached_strerror(memc, MEMCACHED_INVALID_ARGUMENTS);
171
172 if (! memc->error_messages)
173 return memcached_strerror(memc, MEMCACHED_SUCCESS);
174
175 if (! memc->error_messages->size)
176 {
177 return memcached_strerror(memc, memc->error_messages->rc);
178 }
179
180 return memc->error_messages->c_str;
181 }
182
183 memcached_return_t memcached_last_error(memcached_st *memc)
184 {
185 if (! memc)
186 return MEMCACHED_INVALID_ARGUMENTS;
187
188 if (! memc->error_messages)
189 return MEMCACHED_SUCCESS;
190
191 return memc->error_messages->rc;
192 }
193
194 memcached_return_t memcached_last_error_errno(memcached_st *memc)
195 {
196 if (! memc)
197 return MEMCACHED_INVALID_ARGUMENTS;
198
199 if (! memc->error_messages)
200 return MEMCACHED_SUCCESS;
201
202 return memc->error_messages->local_errno;
203 }