5e04ce0d4ca84a3c503e576b960defa9d4e121bf
[bbaumbach/samba-autobuild/.git] / source4 / lib / socket / socket_unix.c
1 /* 
2    Unix SMB/CIFS implementation.
3
4    unix domain socket functions
5
6    Copyright (C) Stefan Metzmacher 2004
7    Copyright (C) Andrew Tridgell 2004-2005
8    
9    This program is free software; you can redistribute it and/or modify
10    it under the terms of the GNU General Public License as published by
11    the Free Software Foundation; either version 2 of the License, or
12    (at your option) any later version.
13    
14    This program is distributed in the hope that it will be useful,
15    but WITHOUT ANY WARRANTY; without even the implied warranty of
16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17    GNU General Public License for more details.
18    
19    You should have received a copy of the GNU General Public License
20    along with this program; if not, write to the Free Software
21    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22 */
23
24 #include "includes.h"
25 #include "lib/socket/socket.h"
26 #include "system/network.h"
27 #include "system/filesys.h"
28
29
30
31 /*
32   approximate errno mapping
33 */
34 static NTSTATUS unixdom_error(int ernum)
35 {
36         return map_nt_error_from_unix(ernum);
37 }
38
39 static NTSTATUS unixdom_init(struct socket_context *sock)
40 {
41         int type;
42
43         switch (sock->type) {
44         case SOCKET_TYPE_STREAM:
45                 type = SOCK_STREAM;
46                 break;
47         case SOCKET_TYPE_DGRAM:
48                 type = SOCK_DGRAM;
49                 break;
50         default:
51                 return NT_STATUS_INVALID_PARAMETER;
52         }
53
54         sock->fd = socket(PF_UNIX, type, 0);
55         if (sock->fd == -1) {
56                 return map_nt_error_from_unix(errno);
57         }
58         sock->private_data = NULL;
59
60         sock->backend_name = "unix";
61
62         return NT_STATUS_OK;
63 }
64
65 static void unixdom_close(struct socket_context *sock)
66 {
67         close(sock->fd);
68 }
69
70 static NTSTATUS unixdom_connect_complete(struct socket_context *sock, uint32_t flags)
71 {
72         int error=0, ret;
73         socklen_t len = sizeof(error);
74
75         /* check for any errors that may have occurred - this is needed
76            for non-blocking connect */
77         ret = getsockopt(sock->fd, SOL_SOCKET, SO_ERROR, &error, &len);
78         if (ret == -1) {
79                 return map_nt_error_from_unix(errno);
80         }
81         if (error != 0) {
82                 return map_nt_error_from_unix(error);
83         }
84
85         if (!(flags & SOCKET_FLAG_BLOCK)) {
86                 ret = set_blocking(sock->fd, False);
87                 if (ret == -1) {
88                         return map_nt_error_from_unix(errno);
89                 }
90         }
91
92         sock->state = SOCKET_STATE_CLIENT_CONNECTED;
93
94         return NT_STATUS_OK;
95 }
96
97 static NTSTATUS unixdom_connect(struct socket_context *sock,
98                                 const struct socket_address *my_address, 
99                                 const struct socket_address *srv_address, 
100                                 uint32_t flags)
101 {
102         int ret;
103
104         if (srv_address->sockaddr) {
105                 ret = connect(sock->fd, srv_address->sockaddr, srv_address->sockaddrlen);
106         } else {
107                 struct sockaddr_un srv_addr;
108                 if (strlen(srv_address->addr)+1 > sizeof(srv_addr.sun_path)) {
109                         return NT_STATUS_OBJECT_PATH_INVALID;
110                 }
111                 
112                 ZERO_STRUCT(srv_addr);
113                 srv_addr.sun_family = AF_UNIX;
114                 strncpy(srv_addr.sun_path, srv_address->addr, sizeof(srv_addr.sun_path));
115
116                 ret = connect(sock->fd, (const struct sockaddr *)&srv_addr, sizeof(srv_addr));
117         }
118         if (ret == -1) {
119                 return unixdom_error(errno);
120         }
121
122         return unixdom_connect_complete(sock, flags);
123 }
124
125 static NTSTATUS unixdom_listen(struct socket_context *sock,
126                                const struct socket_address *my_address, 
127                                int queue_size, uint32_t flags)
128 {
129         struct sockaddr_un my_addr;
130         int ret;
131
132         /* delete if it already exists */
133         if (my_address->addr) {
134                 unlink(my_address->addr);
135         }
136
137         if (my_address && my_address->sockaddr) {
138                 ret = bind(sock->fd, (struct sockaddr *)&my_addr, sizeof(my_addr));
139         } else {
140                 
141                 if (strlen(my_address->addr)+1 > sizeof(my_addr.sun_path)) {
142                         return NT_STATUS_OBJECT_PATH_INVALID;
143                 }
144                 
145                 
146                 ZERO_STRUCT(my_addr);
147                 my_addr.sun_family = AF_UNIX;
148                 strncpy(my_addr.sun_path, my_address->addr, sizeof(my_addr.sun_path));
149                 
150                 ret = bind(sock->fd, (struct sockaddr *)&my_addr, sizeof(my_addr));
151         }
152         if (ret == -1) {
153                 return unixdom_error(errno);
154         }
155
156         if (sock->type == SOCKET_TYPE_STREAM) {
157                 ret = listen(sock->fd, queue_size);
158                 if (ret == -1) {
159                         return unixdom_error(errno);
160                 }
161         }
162
163         if (!(flags & SOCKET_FLAG_BLOCK)) {
164                 ret = set_blocking(sock->fd, False);
165                 if (ret == -1) {
166                         return unixdom_error(errno);
167                 }
168         }
169
170         sock->state = SOCKET_STATE_SERVER_LISTEN;
171         sock->private_data = (void *)talloc_strdup(sock, my_address->addr);
172
173         return NT_STATUS_OK;
174 }
175
176 static NTSTATUS unixdom_accept(struct socket_context *sock, 
177                                struct socket_context **new_sock)
178 {
179         struct sockaddr_un cli_addr;
180         socklen_t cli_addr_len = sizeof(cli_addr);
181         int new_fd;
182
183         if (sock->type != SOCKET_TYPE_STREAM) {
184                 return NT_STATUS_INVALID_PARAMETER;
185         }
186
187         new_fd = accept(sock->fd, (struct sockaddr *)&cli_addr, &cli_addr_len);
188         if (new_fd == -1) {
189                 return unixdom_error(errno);
190         }
191
192         if (!(sock->flags & SOCKET_FLAG_BLOCK)) {
193                 int ret = set_blocking(new_fd, False);
194                 if (ret == -1) {
195                         close(new_fd);
196                         return map_nt_error_from_unix(errno);
197                 }
198         }
199
200         (*new_sock) = talloc(NULL, struct socket_context);
201         if (!(*new_sock)) {
202                 close(new_fd);
203                 return NT_STATUS_NO_MEMORY;
204         }
205
206         /* copy the socket_context */
207         (*new_sock)->type               = sock->type;
208         (*new_sock)->state              = SOCKET_STATE_SERVER_CONNECTED;
209         (*new_sock)->flags              = sock->flags;
210
211         (*new_sock)->fd                 = new_fd;
212
213         (*new_sock)->private_data       = NULL;
214         (*new_sock)->ops                = sock->ops;
215         (*new_sock)->backend_name       = sock->backend_name;
216
217         return NT_STATUS_OK;
218 }
219
220 static NTSTATUS unixdom_recv(struct socket_context *sock, void *buf, 
221                              size_t wantlen, size_t *nread, uint32_t flags)
222 {
223         ssize_t gotlen;
224         int flgs = 0;
225
226         /* TODO: we need to map all flags here */
227         if (flags & SOCKET_FLAG_PEEK) {
228                 flgs |= MSG_PEEK;
229         }
230
231         if (flags & SOCKET_FLAG_BLOCK) {
232                 flgs |= MSG_WAITALL;
233         }
234
235         *nread = 0;
236
237         gotlen = recv(sock->fd, buf, wantlen, flgs);
238         if (gotlen == 0) {
239                 return NT_STATUS_END_OF_FILE;
240         } else if (gotlen == -1) {
241                 return unixdom_error(errno);
242         }
243
244         *nread = gotlen;
245
246         return NT_STATUS_OK;
247 }
248
249 static NTSTATUS unixdom_send(struct socket_context *sock,
250                              const DATA_BLOB *blob, size_t *sendlen, uint32_t flags)
251 {
252         ssize_t len;
253         int flgs = 0;
254
255         *sendlen = 0;
256
257         len = send(sock->fd, blob->data, blob->length, flgs);
258         if (len == -1) {
259                 return unixdom_error(errno);
260         }       
261
262         *sendlen = len;
263
264         return NT_STATUS_OK;
265 }
266
267
268 static NTSTATUS unixdom_sendto(struct socket_context *sock, 
269                                const DATA_BLOB *blob, size_t *sendlen, uint32_t flags,
270                                const struct socket_address *dest)
271 {
272         ssize_t len;
273         int flgs = 0;
274         *sendlen = 0;
275                 
276         if (dest->sockaddr) {
277                 len = sendto(sock->fd, blob->data, blob->length, flgs, 
278                              dest->sockaddr, dest->sockaddrlen);
279         } else {
280                 struct sockaddr_un srv_addr;
281                 
282                 if (strlen(dest->addr)+1 > sizeof(srv_addr.sun_path)) {
283                         return NT_STATUS_OBJECT_PATH_INVALID;
284                 }
285                 
286                 ZERO_STRUCT(srv_addr);
287                 srv_addr.sun_family = AF_UNIX;
288                 strncpy(srv_addr.sun_path, dest->addr, sizeof(srv_addr.sun_path));
289                 
290                 len = sendto(sock->fd, blob->data, blob->length, flgs, 
291                              (struct sockaddr *)&srv_addr, sizeof(srv_addr));
292         }
293         if (len == -1) {
294                 return map_nt_error_from_unix(errno);
295         }       
296
297         *sendlen = len;
298
299         return NT_STATUS_OK;
300 }
301
302
303 static NTSTATUS unixdom_set_option(struct socket_context *sock, 
304                                    const char *option, const char *val)
305 {
306         return NT_STATUS_OK;
307 }
308
309 static char *unixdom_get_peer_name(struct socket_context *sock, TALLOC_CTX *mem_ctx)
310 {
311         return talloc_strdup(mem_ctx, "LOCAL/unixdom");
312 }
313
314 static struct socket_address *unixdom_get_peer_addr(struct socket_context *sock, TALLOC_CTX *mem_ctx)
315 {
316         struct sockaddr_in *peer_addr;
317         socklen_t len = sizeof(*peer_addr);
318         struct socket_address *peer;
319         int ret;
320
321         peer = talloc(mem_ctx, struct socket_address);
322         if (!peer) {
323                 return NULL;
324         }
325         
326         peer->family = sock->backend_name;
327         peer_addr = talloc(peer, struct sockaddr_in);
328         if (!peer_addr) {
329                 talloc_free(peer);
330                 return NULL;
331         }
332
333         peer->sockaddr = (struct sockaddr *)peer_addr;
334
335         ret = getpeername(sock->fd, peer->sockaddr, &len);
336         if (ret == -1) {
337                 talloc_free(peer);
338                 return NULL;
339         }
340
341         peer->sockaddrlen = len;
342
343         peer->port = 0;
344         peer->addr = talloc_strdup(peer, "LOCAL/unixdom");
345         if (!peer->addr) {
346                 talloc_free(peer);
347                 return NULL;
348         }
349
350         return peer;
351 }
352
353 static struct socket_address *unixdom_get_my_addr(struct socket_context *sock, TALLOC_CTX *mem_ctx)
354 {
355         struct sockaddr_in *local_addr;
356         socklen_t len = sizeof(*local_addr);
357         struct socket_address *local;
358         int ret;
359         
360         local = talloc(mem_ctx, struct socket_address);
361         if (!local) {
362                 return NULL;
363         }
364         
365         local->family = sock->backend_name;
366         local_addr = talloc(local, struct sockaddr_in);
367         if (!local_addr) {
368                 talloc_free(local);
369                 return NULL;
370         }
371
372         local->sockaddr = (struct sockaddr *)local_addr;
373
374         ret = getsockname(sock->fd, local->sockaddr, &len);
375         if (ret == -1) {
376                 talloc_free(local);
377                 return NULL;
378         }
379
380         local->sockaddrlen = len;
381
382         local->port = 0;
383         local->addr = talloc_strdup(local, "LOCAL/unixdom");
384         if (!local->addr) {
385                 talloc_free(local);
386                 return NULL;
387         }
388
389         return local;
390 }
391
392 static int unixdom_get_fd(struct socket_context *sock)
393 {
394         return sock->fd;
395 }
396
397 static NTSTATUS unixdom_pending(struct socket_context *sock, size_t *npending)
398 {
399         int value = 0;
400         if (ioctl(sock->fd, FIONREAD, &value) == 0) {
401                 *npending = value;
402                 return NT_STATUS_OK;
403         }
404         return map_nt_error_from_unix(errno);
405 }
406
407 static const struct socket_ops unixdom_ops = {
408         .name                   = "unix",
409         .fn_init                = unixdom_init,
410         .fn_connect             = unixdom_connect,
411         .fn_connect_complete    = unixdom_connect_complete,
412         .fn_listen              = unixdom_listen,
413         .fn_accept              = unixdom_accept,
414         .fn_recv                = unixdom_recv,
415         .fn_send                = unixdom_send,
416         .fn_sendto              = unixdom_sendto,
417         .fn_close               = unixdom_close,
418         .fn_pending             = unixdom_pending,
419
420         .fn_set_option          = unixdom_set_option,
421
422         .fn_get_peer_name       = unixdom_get_peer_name,
423         .fn_get_peer_addr       = unixdom_get_peer_addr,
424         .fn_get_my_addr         = unixdom_get_my_addr,
425
426         .fn_get_fd              = unixdom_get_fd
427 };
428
429 const struct socket_ops *socket_unixdom_ops(enum socket_type type)
430 {
431         return &unixdom_ops;
432 }