Merge pull request #43 from plieven/master
[deb_libnfs.git] / lib / init.c
1 /*
2 Copyright (C) 2010 by Ronnie Sahlberg <ronniesahlberg@gmail.com>
3
4
5
6 This program is distributed in the hope that it will be useful,
7 but WITHOUT ANY WARRANTY; without even the implied warranty of
8 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
9 GNU Lesser General Public License for more details.
10
11 You should have received a copy of the GNU Lesser General Public License
12 along with this program; if not, see <http://www.gnu.org/licenses/>.
13 */
14 #ifdef HAVE_CONFIG_H
15 #include "config.h"
16 #endif
17
18 #ifdef AROS
19 #include "aros_compat.h"
20 #endif
21
22 #ifdef WIN32
23 #include "win32_compat.h"
24 #endif
25
26 #define _GNU_SOURCE
27
28 #ifdef HAVE_UNISTD_H
29 #include <unistd.h>
30 #endif
31
32 #ifdef HAVE_STRINGS_H
33 #include <strings.h>
34 #endif
35
36 #include <stdio.h>
37 #include <stdarg.h>
38 #include <string.h>
39 #include <stdlib.h>
40 #include <assert.h>
41 #include <time.h>
42 #include "slist.h"
43 #include "libnfs-zdr.h"
44 #include "libnfs.h"
45 #include "libnfs-raw.h"
46 #include "libnfs-private.h"
47
48 struct rpc_context *rpc_init_context(void)
49 {
50 struct rpc_context *rpc;
51 static uint32_t salt = 0;
52
53 rpc = malloc(sizeof(struct rpc_context));
54 if (rpc == NULL) {
55 return NULL;
56 }
57 memset(rpc, 0, sizeof(struct rpc_context));
58
59 rpc->magic = RPC_CONTEXT_MAGIC;
60
61 /* Allow 1M of data (for writes) and some */
62 rpc->encodebuflen = 1024 * 1024 + 4096;
63 rpc->encodebuf = malloc(rpc->encodebuflen);
64 if (rpc->encodebuf == NULL) {
65 free(rpc);
66 return NULL;
67 }
68
69 rpc->auth = authunix_create_default();
70 if (rpc->auth == NULL) {
71 free(rpc->encodebuf);
72 free(rpc);
73 return NULL;
74 }
75 rpc->xid = salt + time(NULL) + getpid() << 16;
76 salt += 0x01000000;
77 rpc->fd = -1;
78 rpc->tcp_syncnt = RPC_PARAM_UNDEFINED;
79 #ifdef WIN32
80 rpc->uid = 65534;
81 rpc->gid = 65534;
82 #else
83 rpc->uid = getuid();
84 rpc->gid = getgid();
85 #endif
86
87 return rpc;
88 }
89
90
91 struct rpc_context *rpc_init_udp_context(void)
92 {
93 struct rpc_context *rpc;
94
95 rpc = rpc_init_context();
96 if (rpc != NULL) {
97 rpc->is_udp = 1;
98 }
99
100 return rpc;
101 }
102
103 void rpc_set_auth(struct rpc_context *rpc, struct AUTH *auth)
104 {
105 assert(rpc->magic == RPC_CONTEXT_MAGIC);
106
107 if (rpc->auth != NULL) {
108 auth_destroy(rpc->auth);
109 }
110 rpc->auth = auth;
111 }
112
113 static void rpc_set_uid_gid(struct rpc_context *rpc, int uid, int gid) {
114 if (uid != rpc->uid || gid != rpc->gid) {
115 struct AUTH *auth = libnfs_authunix_create("libnfs", uid, gid, 0, NULL);
116 if (auth != NULL) {
117 rpc_set_auth(rpc, auth);
118 rpc->uid = uid;
119 rpc->gid = gid;
120 }
121 }
122 }
123
124 void rpc_set_uid(struct rpc_context *rpc, int uid) {
125 rpc_set_uid_gid(rpc, uid, rpc->gid);
126 }
127
128 void rpc_set_gid(struct rpc_context *rpc, int gid) {
129 rpc_set_uid_gid(rpc, rpc->uid, gid);
130 }
131
132 void rpc_set_error(struct rpc_context *rpc, char *error_string, ...)
133 {
134 va_list ap;
135
136 assert(rpc->magic == RPC_CONTEXT_MAGIC);
137
138 if (rpc->error_string != NULL) {
139 free(rpc->error_string);
140 }
141 va_start(ap, error_string);
142 rpc->error_string = malloc(1024);
143 vsnprintf(rpc->error_string, 1024, error_string, ap);
144 va_end(ap);
145 }
146
147 char *rpc_get_error(struct rpc_context *rpc)
148 {
149 assert(rpc->magic == RPC_CONTEXT_MAGIC);
150
151 return rpc->error_string;
152 }
153
154 void rpc_error_all_pdus(struct rpc_context *rpc, char *error)
155 {
156 struct rpc_pdu *pdu;
157
158 assert(rpc->magic == RPC_CONTEXT_MAGIC);
159
160 while((pdu = rpc->outqueue) != NULL) {
161 pdu->cb(rpc, RPC_STATUS_ERROR, error, pdu->private_data);
162 SLIST_REMOVE(&rpc->outqueue, pdu);
163 rpc_free_pdu(rpc, pdu);
164 }
165 while((pdu = rpc->waitpdu) != NULL) {
166 pdu->cb(rpc, RPC_STATUS_ERROR, error, pdu->private_data);
167 SLIST_REMOVE(&rpc->waitpdu, pdu);
168 rpc_free_pdu(rpc, pdu);
169 }
170 }
171
172 static void rpc_free_fragment(struct rpc_fragment *fragment)
173 {
174 if (fragment->data != NULL) {
175 free(fragment->data);
176 }
177 free(fragment);
178 }
179
180 void rpc_free_all_fragments(struct rpc_context *rpc)
181 {
182 assert(rpc->magic == RPC_CONTEXT_MAGIC);
183
184 while (rpc->fragments != NULL) {
185 struct rpc_fragment *fragment = rpc->fragments;
186
187 SLIST_REMOVE(&rpc->fragments, fragment);
188 rpc_free_fragment(fragment);
189 }
190 }
191
192 int rpc_add_fragment(struct rpc_context *rpc, char *data, uint64_t size)
193 {
194 struct rpc_fragment *fragment;
195
196 assert(rpc->magic == RPC_CONTEXT_MAGIC);
197
198 fragment = malloc(sizeof(struct rpc_fragment));
199 if (fragment == NULL) {
200 return -1;
201 }
202
203 fragment->size = size;
204 fragment->data = malloc(fragment->size);
205 if(fragment->data == NULL) {
206 free(fragment);
207 return -1;
208 }
209
210 memcpy(fragment->data, data, fragment->size);
211 SLIST_ADD_END(&rpc->fragments, fragment);
212 return 0;
213 }
214
215 void rpc_destroy_context(struct rpc_context *rpc)
216 {
217 struct rpc_pdu *pdu;
218
219 assert(rpc->magic == RPC_CONTEXT_MAGIC);
220
221 while((pdu = rpc->outqueue) != NULL) {
222 pdu->cb(rpc, RPC_STATUS_CANCEL, NULL, pdu->private_data);
223 SLIST_REMOVE(&rpc->outqueue, pdu);
224 rpc_free_pdu(rpc, pdu);
225 }
226 while((pdu = rpc->waitpdu) != NULL) {
227 pdu->cb(rpc, RPC_STATUS_CANCEL, NULL, pdu->private_data);
228 SLIST_REMOVE(&rpc->waitpdu, pdu);
229 rpc_free_pdu(rpc, pdu);
230 }
231
232 rpc_free_all_fragments(rpc);
233
234 auth_destroy(rpc->auth);
235 rpc->auth =NULL;
236
237 if (rpc->fd != -1) {
238 close(rpc->fd);
239 }
240
241 if (rpc->encodebuf != NULL) {
242 free(rpc->encodebuf);
243 rpc->encodebuf = NULL;
244 }
245
246 if (rpc->error_string != NULL) {
247 free(rpc->error_string);
248 rpc->error_string = NULL;
249 }
250
251 if (rpc->udp_dest != NULL) {
252 free(rpc->udp_dest);
253 rpc->udp_dest = NULL;
254 }
255
256 rpc->magic = 0;
257 free(rpc);
258 }
259
260