r3314: added a option "socket:testnonblock" to the generic socket code. If
[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
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
26
27
28 /*
29   approximate errno mapping
30 */
31 static NTSTATUS unixdom_error(int ernum)
32 {
33         return map_nt_error_from_unix(ernum);
34 }
35
36 static NTSTATUS unixdom_init(struct socket_context *sock)
37 {
38         sock->fd = socket(PF_UNIX, SOCK_STREAM, 0);
39         if (sock->fd == -1) {
40                 return NT_STATUS_INSUFFICIENT_RESOURCES;
41         }
42         sock->private_data = NULL;
43
44         return NT_STATUS_OK;
45 }
46
47 static void unixdom_close(struct socket_context *sock)
48 {
49         close(sock->fd);
50 }
51
52 static NTSTATUS unixdom_connect(struct socket_context *sock,
53                                 const char *my_address, int my_port,
54                                 const char *srv_address, int srv_port,
55                                 uint32_t flags)
56 {
57         struct sockaddr_un srv_addr;
58         int ret;
59
60         if (strlen(srv_address)+1 > sizeof(srv_addr.sun_path)) {
61                 return NT_STATUS_INVALID_PARAMETER;
62         }
63
64         ZERO_STRUCT(srv_addr);
65         srv_addr.sun_family = AF_UNIX;
66         strncpy(srv_addr.sun_path, srv_address, sizeof(srv_addr.sun_path));
67
68         if (!(flags & SOCKET_FLAG_BLOCK)) {
69                 ret = set_blocking(sock->fd, False);
70                 if (ret == -1) {
71                         return NT_STATUS_INVALID_PARAMETER;
72                 }
73         }
74
75         ret = connect(sock->fd, (const struct sockaddr *)&srv_addr, sizeof(srv_addr));
76         if (ret == -1) {
77                 return unixdom_error(errno);
78         }
79
80         sock->state = SOCKET_STATE_CLIENT_CONNECTED;
81
82         return NT_STATUS_OK;
83 }
84
85 static NTSTATUS unixdom_listen(struct socket_context *sock,
86                                const char *my_address, int port,
87                                int queue_size, uint32_t flags)
88 {
89         struct sockaddr_un my_addr;
90         int ret;
91
92         if (strlen(my_address)+1 > sizeof(my_addr.sun_path)) {
93                 return NT_STATUS_INVALID_PARAMETER;
94         }
95
96         /* delete if it already exists */
97         unlink(my_address);
98
99         ZERO_STRUCT(my_addr);
100         my_addr.sun_family = AF_UNIX;
101         strncpy(my_addr.sun_path, my_address, sizeof(my_addr.sun_path));
102
103         ret = bind(sock->fd, (struct sockaddr *)&my_addr, sizeof(my_addr));
104         if (ret == -1) {
105                 return unixdom_error(errno);
106         }
107
108         ret = listen(sock->fd, queue_size);
109         if (ret == -1) {
110                 return unixdom_error(errno);
111         }
112
113         if (!(flags & SOCKET_FLAG_BLOCK)) {
114                 ret = set_blocking(sock->fd, False);
115                 if (ret == -1) {
116                         return unixdom_error(errno);
117                 }
118         }
119
120         sock->state = SOCKET_STATE_SERVER_LISTEN;
121         sock->private_data = (void *)talloc_strdup(sock, my_address);
122
123         return NT_STATUS_OK;
124 }
125
126 static NTSTATUS unixdom_accept(struct socket_context *sock, 
127                                struct socket_context **new_sock)
128 {
129         struct sockaddr_un cli_addr;
130         socklen_t cli_addr_len = sizeof(cli_addr);
131         int new_fd;
132
133         new_fd = accept(sock->fd, (struct sockaddr *)&cli_addr, &cli_addr_len);
134         if (new_fd == -1) {
135                 return unixdom_error(errno);
136         }
137
138         if (!(sock->flags & SOCKET_FLAG_BLOCK)) {
139                 int ret = set_blocking(new_fd, False);
140                 if (ret == -1) {
141                         close(new_fd);
142                         return map_nt_error_from_unix(errno);
143                 }
144         }
145
146         (*new_sock) = talloc_p(NULL, struct socket_context);
147         if (!(*new_sock)) {
148                 close(new_fd);
149                 return NT_STATUS_NO_MEMORY;
150         }
151
152         /* copy the socket_context */
153         (*new_sock)->type               = sock->type;
154         (*new_sock)->state              = SOCKET_STATE_SERVER_CONNECTED;
155         (*new_sock)->flags              = sock->flags;
156
157         (*new_sock)->fd                 = new_fd;
158
159         (*new_sock)->private_data       = NULL;
160         (*new_sock)->ops                = sock->ops;
161
162         return NT_STATUS_OK;
163 }
164
165 static NTSTATUS unixdom_recv(struct socket_context *sock, void *buf, 
166                              size_t wantlen, size_t *nread, uint32_t flags)
167 {
168         ssize_t gotlen;
169         int flgs = 0;
170
171         /* TODO: we need to map all flags here */
172         if (flags & SOCKET_FLAG_PEEK) {
173                 flgs |= MSG_PEEK;
174         }
175
176         if (flags & SOCKET_FLAG_BLOCK) {
177                 flgs |= MSG_WAITALL;
178         }
179
180         *nread = 0;
181
182         gotlen = recv(sock->fd, buf, wantlen, flgs);
183         if (gotlen == 0) {
184                 return NT_STATUS_END_OF_FILE;
185         } else if (gotlen == -1) {
186                 return unixdom_error(errno);
187         }
188
189         *nread = gotlen;
190
191         return NT_STATUS_OK;
192 }
193
194 static NTSTATUS unixdom_send(struct socket_context *sock,
195                              const DATA_BLOB *blob, size_t *sendlen, uint32_t flags)
196 {
197         ssize_t len;
198         int flgs = 0;
199
200         *sendlen = 0;
201
202         len = send(sock->fd, blob->data, blob->length, flgs);
203         if (len == -1) {
204                 return unixdom_error(errno);
205         }       
206
207         *sendlen = len;
208
209         return NT_STATUS_OK;
210 }
211
212 static NTSTATUS unixdom_set_option(struct socket_context *sock, 
213                                    const char *option, const char *val)
214 {
215         return NT_STATUS_OK;
216 }
217
218 static char *unixdom_get_peer_name(struct socket_context *sock, TALLOC_CTX *mem_ctx)
219 {
220         return talloc_strdup(mem_ctx, "LOCAL/unixdom");
221 }
222
223 static char *unixdom_get_peer_addr(struct socket_context *sock, TALLOC_CTX *mem_ctx)
224 {
225         return talloc_strdup(mem_ctx, "LOCAL/unixdom");
226 }
227
228 static int unixdom_get_peer_port(struct socket_context *sock)
229 {
230         return 0;
231 }
232
233 static char *unixdom_get_my_addr(struct socket_context *sock, TALLOC_CTX *mem_ctx)
234 {
235         return talloc_strdup(mem_ctx, "LOCAL/unixdom");
236 }
237
238 static int unixdom_get_my_port(struct socket_context *sock)
239 {
240         return 0;
241 }
242
243 static int unixdom_get_fd(struct socket_context *sock)
244 {
245         return sock->fd;
246 }
247
248 static const struct socket_ops unixdom_ops = {
249         .name           = "unix",
250         .type           = SOCKET_TYPE_STREAM,
251
252         .init           = unixdom_init,
253         .connect        = unixdom_connect,
254         .listen         = unixdom_listen,
255         .accept         = unixdom_accept,
256         .recv           = unixdom_recv,
257         .send           = unixdom_send,
258         .close          = unixdom_close,
259
260         .set_option     = unixdom_set_option,
261
262         .get_peer_name  = unixdom_get_peer_name,
263         .get_peer_addr  = unixdom_get_peer_addr,
264         .get_peer_port  = unixdom_get_peer_port,
265         .get_my_addr    = unixdom_get_my_addr,
266         .get_my_port    = unixdom_get_my_port,
267
268         .get_fd         = unixdom_get_fd
269 };
270
271 const struct socket_ops *socket_unixdom_ops(void)
272 {
273         return &unixdom_ops;
274 }
275
276 NTSTATUS socket_unixdom_init(void)
277 {
278         return NT_STATUS_OK;
279 }