?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
s4/drs: Move schema_prefixMap allocation in separate function
[Samba/cd1.git] / lib / tsocket / tsocket_bsd.c
blob05f5be19cbed225cf66b7d4011772c043479c6c8
1 /*
2 Unix SMB/CIFS implementation.
3
4 Copyright (C) Stefan Metzmacher 2009
5
6 ** NOTE! The following LGPL license applies to the tevent
7 ** library. This does NOT imply that all of Samba is released
8 ** under the LGPL
9
10 This library is free software; you can redistribute it and/or
11 modify it under the terms of the GNU Lesser General Public
12 License as published by the Free Software Foundation; either
13 version 3 of the License, or (at your option) any later version.
14
15 This library is distributed in the hope that it will be useful,
16 but WITHOUT ANY WARRANTY; without even the implied warranty of
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18 Lesser General Public License for more details.
19
20 You should have received a copy of the GNU Lesser General Public
21 License along with this library; if not, see <http://www.gnu.org/licenses/>.
22 */
23
24 #include "replace.h"
25 #include "system/filesys.h"
26 #include "system/network.h"
27 #include "tsocket.h"
28 #include "tsocket_internal.h"
29
30 static int tsocket_bsd_error_from_errno(int ret,
31 int sys_errno,
32 bool *retry)
33 {
34 *retry = false;
35
36 if (ret >= 0) {
37 return 0;
38 }
39
40 if (ret != -1) {
41 return EIO;
42 }
43
44 if (sys_errno == 0) {
45 return EIO;
46 }
47
48 if (sys_errno == EINTR) {
49 *retry = true;
50 return sys_errno;
51 }
52
53 if (sys_errno == EINPROGRESS) {
54 *retry = true;
55 return sys_errno;
56 }
57
58 if (sys_errno == EAGAIN) {
59 *retry = true;
60 return sys_errno;
61 }
62
63 #ifdef EWOULDBLOCK
64 if (sys_errno == EWOULDBLOCK) {
65 *retry = true;
66 return sys_errno;
67 }
68 #endif
69
70 return sys_errno;
71 }
72
73 static int tsocket_bsd_common_prepare_fd(int fd, bool high_fd)
74 {
75 int i;
76 int sys_errno = 0;
77 int fds[3];
78 int num_fds = 0;
79
80 int result, flags;
81
82 if (fd == -1) {
83 return -1;
84 }
85
86 /* first make a fd >= 3 */
87 if (high_fd) {
88 while (fd < 3) {
89 fds[num_fds++] = fd;
90 fd = dup(fd);
91 if (fd == -1) {
92 sys_errno = errno;
93 break;
94 }
95 }
96 for (i=0; i<num_fds; i++) {
97 close(fds[i]);
98 }
99 if (fd == -1) {
100 errno = sys_errno;
101 return fd;
102 }
103 }
104
105 /* fd should be nonblocking. */
106
107 #ifdef O_NONBLOCK
108 #define FLAG_TO_SET O_NONBLOCK
109 #else
110 #ifdef SYSV
111 #define FLAG_TO_SET O_NDELAY
112 #else /* BSD */
113 #define FLAG_TO_SET FNDELAY
114 #endif
115 #endif
116
117 if ((flags = fcntl(fd, F_GETFL)) == -1) {
118 goto fail;
119 }
120
121 flags |= FLAG_TO_SET;
122 if (fcntl(fd, F_SETFL, flags) == -1) {
123 goto fail;
124 }
125
126 #undef FLAG_TO_SET
127
128 /* fd should be closed on exec() */
129 #ifdef FD_CLOEXEC
130 result = flags = fcntl(fd, F_GETFD, 0);
131 if (flags >= 0) {
132 flags |= FD_CLOEXEC;
133 result = fcntl(fd, F_SETFD, flags);
134 }
135 if (result < 0) {
136 goto fail;
137 }
138 #endif
139 return fd;
140
141 fail:
142 if (fd != -1) {
143 sys_errno = errno;
144 close(fd);
145 errno = sys_errno;
146 }
147 return -1;
148 }
149
150 static ssize_t tsocket_bsd_pending(int fd)
151 {
152 int ret, error;
153 int value = 0;
154 socklen_t len;
155
156 ret = ioctl(fd, FIONREAD, &value);
157 if (ret == -1) {
158 return ret;
159 }
160
161 if (ret != 0) {
162 /* this should not be reached */
163 errno = EIO;
164 return -1;
165 }
166
167 if (value != 0) {
168 return value;
169 }
170
171 error = 0;
172 len = sizeof(error);
173
174 /*
175 * if no data is available check if the socket is in error state. For
176 * dgram sockets it's the way to return ICMP error messages of
177 * connected sockets to the caller.
178 */
179 ret = getsockopt(fd, SOL_SOCKET, SO_ERROR, &error, &len);
180 if (ret == -1) {
181 return ret;
182 }
183 if (error != 0) {
184 errno = error;
185 return -1;
186 }
187 return 0;
188 }
189
190 static const struct tsocket_address_ops tsocket_address_bsd_ops;
191
192 struct tsocket_address_bsd {
193 union {
194 struct sockaddr sa;
195 struct sockaddr_in in;
196 #ifdef HAVE_IPV6
197 struct sockaddr_in6 in6;
198 #endif
199 struct sockaddr_un un;
200 struct sockaddr_storage ss;
201 } u;
202 };
203
204 static int _tsocket_address_bsd_from_sockaddr(TALLOC_CTX *mem_ctx,
205 struct sockaddr *sa,
206 socklen_t sa_socklen,
207 struct tsocket_address **_addr,
208 const char *location)
209 {
210 struct tsocket_address *addr;
211 struct tsocket_address_bsd *bsda;
212
213 switch (sa->sa_family) {
214 case AF_UNIX:
215 if (sa_socklen < sizeof(struct sockaddr_un)) {
216 errno = EINVAL;
217 return -1;
218 }
219 break;
220 case AF_INET:
221 if (sa_socklen < sizeof(struct sockaddr_in)) {
222 errno = EINVAL;
223 return -1;
224 }
225 break;
226 #ifdef HAVE_IPV6
227 case AF_INET6:
228 if (sa_socklen < sizeof(struct sockaddr_in6)) {
229 errno = EINVAL;
230 return -1;
231 }
232 break;
233 #endif
234 default:
235 errno = EAFNOSUPPORT;
236 return -1;
237 }
238
239 if (sa_socklen > sizeof(struct sockaddr_storage)) {
240 errno = EINVAL;
241 return -1;
242 }
243
244 addr = tsocket_address_create(mem_ctx,
245 &tsocket_address_bsd_ops,
246 &bsda,
247 struct tsocket_address_bsd,
248 location);
249 if (!addr) {
250 errno = ENOMEM;
251 return -1;
252 }
253
254 ZERO_STRUCTP(bsda);
255
256 memcpy(&bsda->u.ss, sa, sa_socklen);
257
258 *_addr = addr;
259 return 0;
260 }
261
262 int _tsocket_address_inet_from_strings(TALLOC_CTX *mem_ctx,
263 const char *fam,
264 const char *addr,
265 uint16_t port,
266 struct tsocket_address **_addr,
267 const char *location)
268 {
269 struct addrinfo hints;
270 struct addrinfo *result = NULL;
271 char port_str[6];
272 int ret;
273
274 ZERO_STRUCT(hints);
275 /*
276 * we use SOCKET_STREAM here to get just one result
277 * back from getaddrinfo().
278 */
279 hints.ai_socktype = SOCK_STREAM;
280 hints.ai_flags = AI_NUMERICHOST | AI_NUMERICSERV;
281
282 if (strcasecmp(fam, "ip") == 0) {
283 hints.ai_family = AF_UNSPEC;
284 if (!addr) {
285 #ifdef HAVE_IPV6
286 addr = "::";
287 #else
288 addr = "0.0.0.0";
289 #endif
290 }
291 } else if (strcasecmp(fam, "ipv4") == 0) {
292 hints.ai_family = AF_INET;
293 if (!addr) {
294 addr = "0.0.0.0";
295 }
296 #ifdef HAVE_IPV6
297 } else if (strcasecmp(fam, "ipv6") == 0) {
298 hints.ai_family = AF_INET6;
299 if (!addr) {
300 addr = "::";
301 }
302 #endif
303 } else {
304 errno = EAFNOSUPPORT;
305 return -1;
306 }
307
308 snprintf(port_str, sizeof(port_str) - 1, "%u", port);
309
310 ret = getaddrinfo(addr, port_str, &hints, &result);
311 if (ret != 0) {
312 switch (ret) {
313 case EAI_FAIL:
314 errno = EINVAL;
315 break;
316 }
317 ret = -1;
318 goto done;
319 }
320
321 if (result->ai_socktype != SOCK_STREAM) {
322 errno = EINVAL;
323 ret = -1;
324 goto done;
325 }
326
327 ret = _tsocket_address_bsd_from_sockaddr(mem_ctx,
328 result->ai_addr,
329 result->ai_addrlen,
330 _addr,
331 location);
332
333 done:
334 if (result) {
335 freeaddrinfo(result);
336 }
337 return ret;
338 }
339
340 char *tsocket_address_inet_addr_string(const struct tsocket_address *addr,
341 TALLOC_CTX *mem_ctx)
342 {
343 struct tsocket_address_bsd *bsda = talloc_get_type(addr->private_data,
344 struct tsocket_address_bsd);
345 char addr_str[INET6_ADDRSTRLEN+1];
346 const char *str;
347
348 if (!bsda) {
349 errno = EINVAL;
350 return NULL;
351 }
352
353 switch (bsda->u.sa.sa_family) {
354 case AF_INET:
355 str = inet_ntop(bsda->u.in.sin_family,
356 &bsda->u.in.sin_addr,
357 addr_str, sizeof(addr_str));
358 break;
359 #ifdef HAVE_IPV6
360 case AF_INET6:
361 str = inet_ntop(bsda->u.in6.sin6_family,
362 &bsda->u.in6.sin6_addr,
363 addr_str, sizeof(addr_str));
364 break;
365 #endif
366 default:
367 errno = EINVAL;
368 return NULL;
369 }
370
371 if (!str) {
372 return NULL;
373 }
374
375 return talloc_strdup(mem_ctx, str);
376 }
377
378 uint16_t tsocket_address_inet_port(const struct tsocket_address *addr)
379 {
380 struct tsocket_address_bsd *bsda = talloc_get_type(addr->private_data,
381 struct tsocket_address_bsd);
382 uint16_t port = 0;
383
384 if (!bsda) {
385 errno = EINVAL;
386 return 0;
387 }
388
389 switch (bsda->u.sa.sa_family) {
390 case AF_INET:
391 port = ntohs(bsda->u.in.sin_port);
392 break;
393 #ifdef HAVE_IPV6
394 case AF_INET6:
395 port = ntohs(bsda->u.in6.sin6_port);
396 break;
397 #endif
398 default:
399 errno = EINVAL;
400 return 0;
401 }
402
403 return port;
404 }
405
406 int tsocket_address_inet_set_port(struct tsocket_address *addr,
407 uint16_t port)
408 {
409 struct tsocket_address_bsd *bsda = talloc_get_type(addr->private_data,
410 struct tsocket_address_bsd);
411
412 if (!bsda) {
413 errno = EINVAL;
414 return -1;
415 }
416
417 switch (bsda->u.sa.sa_family) {
418 case AF_INET:
419 bsda->u.in.sin_port = htons(port);
420 break;
421 #ifdef HAVE_IPV6
422 case AF_INET6:
423 bsda->u.in6.sin6_port = htons(port);
424 break;
425 #endif
426 default:
427 errno = EINVAL;
428 return -1;
429 }
430
431 return 0;
432 }
433
434 int _tsocket_address_unix_from_path(TALLOC_CTX *mem_ctx,
435 const char *path,
436 struct tsocket_address **_addr,
437 const char *location)
438 {
439 struct sockaddr_un un;
440 void *p = &un;
441 int ret;
442
443 if (!path) {
444 path = "";
445 }
446
447 if (strlen(path) > sizeof(un.sun_path)-1) {
448 errno = ENAMETOOLONG;
449 return -1;
450 }
451
452 ZERO_STRUCT(un);
453 un.sun_family = AF_UNIX;
454 strncpy(un.sun_path, path, sizeof(un.sun_path)-1);
455
456 ret = _tsocket_address_bsd_from_sockaddr(mem_ctx,
457 (struct sockaddr *)p,
458 sizeof(un),
459 _addr,
460 location);
461
462 return ret;
463 }
464
465 char *tsocket_address_unix_path(const struct tsocket_address *addr,
466 TALLOC_CTX *mem_ctx)
467 {
468 struct tsocket_address_bsd *bsda = talloc_get_type(addr->private_data,
469 struct tsocket_address_bsd);
470 const char *str;
471
472 if (!bsda) {
473 errno = EINVAL;
474 return NULL;
475 }
476
477 switch (bsda->u.sa.sa_family) {
478 case AF_UNIX:
479 str = bsda->u.un.sun_path;
480 break;
481 default:
482 errno = EINVAL;
483 return NULL;
484 }
485
486 return talloc_strdup(mem_ctx, str);
487 }
488
489 static char *tsocket_address_bsd_string(const struct tsocket_address *addr,
490 TALLOC_CTX *mem_ctx)
491 {
492 struct tsocket_address_bsd *bsda = talloc_get_type(addr->private_data,
493 struct tsocket_address_bsd);
494 char *str;
495 char *addr_str;
496 const char *prefix = NULL;
497 uint16_t port;
498
499 switch (bsda->u.sa.sa_family) {
500 case AF_UNIX:
501 return talloc_asprintf(mem_ctx, "unix:%s",
502 bsda->u.un.sun_path);
503 case AF_INET:
504 prefix = "ipv4";
505 break;
506 #ifdef HAVE_IPV6
507 case AF_INET6:
508 prefix = "ipv6";
509 break;
510 #endif
511 default:
512 errno = EINVAL;
513 return NULL;
514 }
515
516 addr_str = tsocket_address_inet_addr_string(addr, mem_ctx);
517 if (!addr_str) {
518 return NULL;
519 }
520
521 port = tsocket_address_inet_port(addr);
522
523 str = talloc_asprintf(mem_ctx, "%s:%s:%u",
524 prefix, addr_str, port);
525 talloc_free(addr_str);
526
527 return str;
528 }
529
530 static struct tsocket_address *tsocket_address_bsd_copy(const struct tsocket_address *addr,
531 TALLOC_CTX *mem_ctx,
532 const char *location)
533 {
534 struct tsocket_address_bsd *bsda = talloc_get_type(addr->private_data,
535 struct tsocket_address_bsd);
536 struct tsocket_address *copy;
537 int ret;
538
539 ret = _tsocket_address_bsd_from_sockaddr(mem_ctx,
540 &bsda->u.sa,
541 sizeof(bsda->u.ss),
542 &copy,
543 location);
544 if (ret != 0) {
545 return NULL;
546 }
547
548 return copy;
549 }
550
551 static const struct tsocket_address_ops tsocket_address_bsd_ops = {
552 .name = "bsd",
553 .string = tsocket_address_bsd_string,
554 .copy = tsocket_address_bsd_copy,
555 };
556
557 struct tdgram_bsd {
558 int fd;
559
560 void *event_ptr;
561 struct tevent_fd *fde;
562
563 void *readable_private;
564 void (*readable_handler)(void *private_data);
565 void *writeable_private;
566 void (*writeable_handler)(void *private_data);
567 };
568
569 static void tdgram_bsd_fde_handler(struct tevent_context *ev,
570 struct tevent_fd *fde,
571 uint16_t flags,
572 void *private_data)
573 {
574 struct tdgram_bsd *bsds = talloc_get_type_abort(private_data,
575 struct tdgram_bsd);
576
577 if (flags & TEVENT_FD_WRITE) {
578 bsds->writeable_handler(bsds->writeable_private);
579 return;
580 }
581 if (flags & TEVENT_FD_READ) {
582 if (!bsds->readable_handler) {
583 TEVENT_FD_NOT_READABLE(bsds->fde);
584 return;
585 }
586 bsds->readable_handler(bsds->readable_private);
587 return;
588 }
589 }
590
591 static int tdgram_bsd_set_readable_handler(struct tdgram_bsd *bsds,
592 struct tevent_context *ev,
593 void (*handler)(void *private_data),
594 void *private_data)
595 {
596 if (ev == NULL) {
597 if (handler) {
598 errno = EINVAL;
599 return -1;
600 }
601 if (!bsds->readable_handler) {
602 return 0;
603 }
604 bsds->readable_handler = NULL;
605 bsds->readable_private = NULL;
606
607 return 0;
608 }
609
610 /* read and write must use the same tevent_context */
611 if (bsds->event_ptr != ev) {
612 if (bsds->readable_handler || bsds->writeable_handler) {
613 errno = EINVAL;
614 return -1;
615 }
616 bsds->event_ptr = NULL;
617 TALLOC_FREE(bsds->fde);
618 }
619
620 if (tevent_fd_get_flags(bsds->fde) == 0) {
621 TALLOC_FREE(bsds->fde);
622
623 bsds->fde = tevent_add_fd(ev, bsds,
624 bsds->fd, TEVENT_FD_READ,
625 tdgram_bsd_fde_handler,
626 bsds);
627 if (!bsds->fde) {
628 errno = ENOMEM;
629 return -1;
630 }
631
632 /* cache the event context we're running on */
633 bsds->event_ptr = ev;
634 } else if (!bsds->readable_handler) {
635 TEVENT_FD_READABLE(bsds->fde);
636 }
637
638 bsds->readable_handler = handler;
639 bsds->readable_private = private_data;
640
641 return 0;
642 }
643
644 static int tdgram_bsd_set_writeable_handler(struct tdgram_bsd *bsds,
645 struct tevent_context *ev,
646 void (*handler)(void *private_data),
647 void *private_data)
648 {
649 if (ev == NULL) {
650 if (handler) {
651 errno = EINVAL;
652 return -1;
653 }
654 if (!bsds->writeable_handler) {
655 return 0;
656 }
657 bsds->writeable_handler = NULL;
658 bsds->writeable_private = NULL;
659 TEVENT_FD_NOT_WRITEABLE(bsds->fde);
660
661 return 0;
662 }
663
664 /* read and write must use the same tevent_context */
665 if (bsds->event_ptr != ev) {
666 if (bsds->readable_handler || bsds->writeable_handler) {
667 errno = EINVAL;
668 return -1;
669 }
670 bsds->event_ptr = NULL;
671 TALLOC_FREE(bsds->fde);
672 }
673
674 if (tevent_fd_get_flags(bsds->fde) == 0) {
675 TALLOC_FREE(bsds->fde);
676
677 bsds->fde = tevent_add_fd(ev, bsds,
678 bsds->fd, TEVENT_FD_WRITE,
679 tdgram_bsd_fde_handler,
680 bsds);
681 if (!bsds->fde) {
682 errno = ENOMEM;
683 return -1;
684 }
685
686 /* cache the event context we're running on */
687 bsds->event_ptr = ev;
688 } else if (!bsds->writeable_handler) {
689 TEVENT_FD_WRITEABLE(bsds->fde);
690 }
691
692 bsds->writeable_handler = handler;
693 bsds->writeable_private = private_data;
694
695 return 0;
696 }
697
698 struct tdgram_bsd_recvfrom_state {
699 struct tdgram_context *dgram;
700
701 uint8_t *buf;
702 size_t len;
703 struct tsocket_address *src;
704 };
705
706 static int tdgram_bsd_recvfrom_destructor(struct tdgram_bsd_recvfrom_state *state)
707 {
708 struct tdgram_bsd *bsds = tdgram_context_data(state->dgram,
709 struct tdgram_bsd);
710
711 tdgram_bsd_set_readable_handler(bsds, NULL, NULL, NULL);
712
713 return 0;
714 }
715
716 static void tdgram_bsd_recvfrom_handler(void *private_data);
717
718 static struct tevent_req *tdgram_bsd_recvfrom_send(TALLOC_CTX *mem_ctx,
719 struct tevent_context *ev,
720 struct tdgram_context *dgram)
721 {
722 struct tevent_req *req;
723 struct tdgram_bsd_recvfrom_state *state;
724 struct tdgram_bsd *bsds = tdgram_context_data(dgram, struct tdgram_bsd);
725 int ret;
726
727 req = tevent_req_create(mem_ctx, &state,
728 struct tdgram_bsd_recvfrom_state);
729 if (!req) {
730 return NULL;
731 }
732
733 state->dgram = dgram;
734 state->buf = NULL;
735 state->len = 0;
736 state->src = NULL;
737
738 talloc_set_destructor(state, tdgram_bsd_recvfrom_destructor);
739
740 if (bsds->fd == -1) {
741 tevent_req_error(req, ENOTCONN);
742 goto post;
743 }
744
745 /*
746 * this is a fast path, not waiting for the
747 * socket to become explicit readable gains
748 * about 10%-20% performance in benchmark tests.
749 */
750 tdgram_bsd_recvfrom_handler(req);
751 if (!tevent_req_is_in_progress(req)) {
752 goto post;
753 }
754
755 ret = tdgram_bsd_set_readable_handler(bsds, ev,
756 tdgram_bsd_recvfrom_handler,
757 req);
758 if (ret == -1) {
759 tevent_req_error(req, errno);
760 goto post;
761 }
762
763 return req;
764
765 post:
766 tevent_req_post(req, ev);
767 return req;
768 }
769
770 static void tdgram_bsd_recvfrom_handler(void *private_data)
771 {
772 struct tevent_req *req = talloc_get_type_abort(private_data,
773 struct tevent_req);
774 struct tdgram_bsd_recvfrom_state *state = tevent_req_data(req,
775 struct tdgram_bsd_recvfrom_state);
776 struct tdgram_context *dgram = state->dgram;
777 struct tdgram_bsd *bsds = tdgram_context_data(dgram, struct tdgram_bsd);
778 struct tsocket_address_bsd *bsda;
779 ssize_t ret;
780 struct sockaddr *sa = NULL;
781 socklen_t sa_socklen = 0;
782 int err;
783 bool retry;
784
785 ret = tsocket_bsd_pending(bsds->fd);
786 if (ret == 0) {
787 /* retry later */
788 return;
789 }
790 err = tsocket_bsd_error_from_errno(ret, errno, &retry);
791 if (retry) {
792 /* retry later */
793 return;
794 }
795 if (tevent_req_error(req, err)) {
796 return;
797 }
798
799 state->buf = talloc_array(state, uint8_t, ret);
800 if (tevent_req_nomem(state->buf, req)) {
801 return;
802 }
803 state->len = ret;
804
805 state->src = tsocket_address_create(state,
806 &tsocket_address_bsd_ops,
807 &bsda,
808 struct tsocket_address_bsd,
809 __location__ "bsd_recvfrom");
810 if (tevent_req_nomem(state->src, req)) {
811 return;
812 }
813
814 ZERO_STRUCTP(bsda);
815
816 sa = &bsda->u.sa;
817 sa_socklen = sizeof(bsda->u.ss);
818 /*
819 * for unix sockets we can't use the size of sockaddr_storage
820 * we would get EINVAL
821 */
822 if (bsda->u.sa.sa_family == AF_UNIX) {
823 sa_socklen = sizeof(bsda->u.un);
824 }
825
826 ret = recvfrom(bsds->fd, state->buf, state->len, 0, sa, &sa_socklen);
827 err = tsocket_bsd_error_from_errno(ret, errno, &retry);
828 if (retry) {
829 /* retry later */
830 return;
831 }
832 if (tevent_req_error(req, err)) {
833 return;
834 }
835
836 if (ret != state->len) {
837 tevent_req_error(req, EIO);
838 return;
839 }
840
841 tevent_req_done(req);
842 }
843
844 static ssize_t tdgram_bsd_recvfrom_recv(struct tevent_req *req,
845 int *perrno,
846 TALLOC_CTX *mem_ctx,
847 uint8_t **buf,
848 struct tsocket_address **src)
849 {
850 struct tdgram_bsd_recvfrom_state *state = tevent_req_data(req,
851 struct tdgram_bsd_recvfrom_state);
852 ssize_t ret;
853
854 ret = tsocket_simple_int_recv(req, perrno);
855 if (ret == 0) {
856 *buf = talloc_move(mem_ctx, &state->buf);
857 ret = state->len;
858 if (src) {
859 *src = talloc_move(mem_ctx, &state->src);
860 }
861 }
862
863 tevent_req_received(req);
864 return ret;
865 }
866
867 struct tdgram_bsd_sendto_state {
868 struct tdgram_context *dgram;
869
870 const uint8_t *buf;
871 size_t len;
872 const struct tsocket_address *dst;
873
874 ssize_t ret;
875 };
876
877 static int tdgram_bsd_sendto_destructor(struct tdgram_bsd_sendto_state *state)
878 {
879 struct tdgram_bsd *bsds = tdgram_context_data(state->dgram,
880 struct tdgram_bsd);
881
882 tdgram_bsd_set_writeable_handler(bsds, NULL, NULL, NULL);
883
884 return 0;
885 }
886
887 static void tdgram_bsd_sendto_handler(void *private_data);
888
889 static struct tevent_req *tdgram_bsd_sendto_send(TALLOC_CTX *mem_ctx,
890 struct tevent_context *ev,
891 struct tdgram_context *dgram,
892 const uint8_t *buf,
893 size_t len,
894 const struct tsocket_address *dst)
895 {
896 struct tevent_req *req;
897 struct tdgram_bsd_sendto_state *state;
898 struct tdgram_bsd *bsds = tdgram_context_data(dgram, struct tdgram_bsd);
899 int ret;
900
901 req = tevent_req_create(mem_ctx, &state,
902 struct tdgram_bsd_sendto_state);
903 if (!req) {
904 return NULL;
905 }
906
907 state->dgram = dgram;
908 state->buf = buf;
909 state->len = len;
910 state->dst = dst;
911 state->ret = -1;
912
913 talloc_set_destructor(state, tdgram_bsd_sendto_destructor);
914
915 if (bsds->fd == -1) {
916 tevent_req_error(req, ENOTCONN);
917 goto post;
918 }
919
920 /*
921 * this is a fast path, not waiting for the
922 * socket to become explicit writeable gains
923 * about 10%-20% performance in benchmark tests.
924 */
925 tdgram_bsd_sendto_handler(req);
926 if (!tevent_req_is_in_progress(req)) {
927 goto post;
928 }
929
930 ret = tdgram_bsd_set_writeable_handler(bsds, ev,
931 tdgram_bsd_sendto_handler,
932 req);
933 if (ret == -1) {
934 tevent_req_error(req, errno);
935 goto post;
936 }
937
938 return req;
939
940 post:
941 tevent_req_post(req, ev);
942 return req;
943 }
944
945 static void tdgram_bsd_sendto_handler(void *private_data)
946 {
947 struct tevent_req *req = talloc_get_type_abort(private_data,
948 struct tevent_req);
949 struct tdgram_bsd_sendto_state *state = tevent_req_data(req,
950 struct tdgram_bsd_sendto_state);
951 struct tdgram_context *dgram = state->dgram;
952 struct tdgram_bsd *bsds = tdgram_context_data(dgram, struct tdgram_bsd);
953 struct sockaddr *sa = NULL;
954 socklen_t sa_socklen = 0;
955 ssize_t ret;
956 int err;
957 bool retry;
958
959 if (state->dst) {
960 struct tsocket_address_bsd *bsda =
961 talloc_get_type(state->dst->private_data,
962 struct tsocket_address_bsd);
963
964 sa = &bsda->u.sa;
965 sa_socklen = sizeof(bsda->u.ss);
966 /*
967 * for unix sockets we can't use the size of sockaddr_storage
968 * we would get EINVAL
969 */
970 if (bsda->u.sa.sa_family == AF_UNIX) {
971 sa_socklen = sizeof(bsda->u.un);
972 }
973 }
974
975 ret = sendto(bsds->fd, state->buf, state->len, 0, sa, sa_socklen);
976 err = tsocket_bsd_error_from_errno(ret, errno, &retry);
977 if (retry) {
978 /* retry later */
979 return;
980 }
981 if (tevent_req_error(req, err)) {
982 return;
983 }
984
985 state->ret = ret;
986
987 tevent_req_done(req);
988 }
989
990 static ssize_t tdgram_bsd_sendto_recv(struct tevent_req *req, int *perrno)
991 {
992 struct tdgram_bsd_sendto_state *state = tevent_req_data(req,
993 struct tdgram_bsd_sendto_state);
994 ssize_t ret;
995
996 ret = tsocket_simple_int_recv(req, perrno);
997 if (ret == 0) {
998 ret = state->ret;
999 }
1000
1001 tevent_req_received(req);
1002 return ret;
1003 }
1004
1005 struct tdgram_bsd_disconnect_state {
1006 uint8_t __dummy;
1007 };
1008
1009 static struct tevent_req *tdgram_bsd_disconnect_send(TALLOC_CTX *mem_ctx,
1010 struct tevent_context *ev,
1011 struct tdgram_context *dgram)
1012 {
1013 struct tdgram_bsd *bsds = tdgram_context_data(dgram, struct tdgram_bsd);
1014 struct tevent_req *req;
1015 struct tdgram_bsd_disconnect_state *state;
1016 int ret;
1017 int err;
1018 bool dummy;
1019
1020 req = tevent_req_create(mem_ctx, &state,
1021 struct tdgram_bsd_disconnect_state);
1022 if (req == NULL) {
1023 return NULL;
1024 }
1025
1026 if (bsds->fd == -1) {
1027 tevent_req_error(req, ENOTCONN);
1028 goto post;
1029 }
1030
1031 ret = close(bsds->fd);
1032 bsds->fd = -1;
1033 err = tsocket_bsd_error_from_errno(ret, errno, &dummy);
1034 if (tevent_req_error(req, err)) {
1035 goto post;
1036 }
1037
1038 tevent_req_done(req);
1039 post:
1040 tevent_req_post(req, ev);
1041 return req;
1042 }
1043
1044 static int tdgram_bsd_disconnect_recv(struct tevent_req *req,
1045 int *perrno)
1046 {
1047 int ret;
1048
1049 ret = tsocket_simple_int_recv(req, perrno);
1050
1051 tevent_req_received(req);
1052 return ret;
1053 }
1054
1055 static const struct tdgram_context_ops tdgram_bsd_ops = {
1056 .name = "bsd",
1057
1058 .recvfrom_send = tdgram_bsd_recvfrom_send,
1059 .recvfrom_recv = tdgram_bsd_recvfrom_recv,
1060
1061 .sendto_send = tdgram_bsd_sendto_send,
1062 .sendto_recv = tdgram_bsd_sendto_recv,
1063
1064 .disconnect_send = tdgram_bsd_disconnect_send,
1065 .disconnect_recv = tdgram_bsd_disconnect_recv,
1066 };
1067
1068 static int tdgram_bsd_destructor(struct tdgram_bsd *bsds)
1069 {
1070 TALLOC_FREE(bsds->fde);
1071 if (bsds->fd != -1) {
1072 close(bsds->fd);
1073 bsds->fd = -1;
1074 }
1075 return 0;
1076 }
1077
1078 static int tdgram_bsd_dgram_socket(const struct tsocket_address *local,
1079 const struct tsocket_address *remote,
1080 bool broadcast,
1081 TALLOC_CTX *mem_ctx,
1082 struct tdgram_context **_dgram,
1083 const char *location)
1084 {
1085 struct tsocket_address_bsd *lbsda =
1086 talloc_get_type_abort(local->private_data,
1087 struct tsocket_address_bsd);
1088 struct tsocket_address_bsd *rbsda = NULL;
1089 struct tdgram_context *dgram;
1090 struct tdgram_bsd *bsds;
1091 int fd;
1092 int ret;
1093 bool do_bind = false;
1094 bool do_reuseaddr = false;
1095 socklen_t sa_socklen = sizeof(lbsda->u.ss);
1096
1097 if (remote) {
1098 rbsda = talloc_get_type_abort(remote->private_data,
1099 struct tsocket_address_bsd);
1100 }
1101
1102 switch (lbsda->u.sa.sa_family) {
1103 case AF_UNIX:
1104 if (broadcast) {
1105 errno = EINVAL;
1106 return -1;
1107 }
1108 if (lbsda->u.un.sun_path[0] != 0) {
1109 do_reuseaddr = true;
1110 do_bind = true;
1111 }
1112 /*
1113 * for unix sockets we can't use the size of sockaddr_storage
1114 * we would get EINVAL
1115 */
1116 sa_socklen = sizeof(lbsda->u.un);
1117 break;
1118 case AF_INET:
1119 if (lbsda->u.in.sin_port != 0) {
1120 do_reuseaddr = true;
1121 do_bind = true;
1122 }
1123 if (lbsda->u.in.sin_addr.s_addr == INADDR_ANY) {
1124 do_bind = true;
1125 }
1126 break;
1127 #ifdef HAVE_IPV6
1128 case AF_INET6:
1129 if (lbsda->u.in6.sin6_port != 0) {
1130 do_reuseaddr = true;
1131 do_bind = true;
1132 }
1133 if (memcmp(&in6addr_any,
1134 &lbsda->u.in6.sin6_addr,
1135 sizeof(in6addr_any)) != 0) {
1136 do_bind = true;
1137 }
1138 break;
1139 #endif
1140 default:
1141 errno = EINVAL;
1142 return -1;
1143 }
1144
1145 fd = socket(lbsda->u.sa.sa_family, SOCK_DGRAM, 0);
1146 if (fd < 0) {
1147 return fd;
1148 }
1149
1150 fd = tsocket_bsd_common_prepare_fd(fd, true);
1151 if (fd < 0) {
1152 return fd;
1153 }
1154
1155 dgram = tdgram_context_create(mem_ctx,
1156 &tdgram_bsd_ops,
1157 &bsds,
1158 struct tdgram_bsd,
1159 location);
1160 if (!dgram) {
1161 int saved_errno = errno;
1162 close(fd);
1163 errno = saved_errno;
1164 return -1;
1165 }
1166 ZERO_STRUCTP(bsds);
1167 bsds->fd = fd;
1168 talloc_set_destructor(bsds, tdgram_bsd_destructor);
1169
1170 if (broadcast) {
1171 int val = 1;
1172
1173 ret = setsockopt(fd, SOL_SOCKET, SO_BROADCAST,
1174 (const void *)&val, sizeof(val));
1175 if (ret == -1) {
1176 int saved_errno = errno;
1177 talloc_free(dgram);
1178 errno = saved_errno;
1179 return ret;
1180 }
1181 }
1182
1183 if (do_reuseaddr) {
1184 int val = 1;
1185
1186 ret = setsockopt(fd, SOL_SOCKET, SO_REUSEADDR,
1187 (const void *)&val, sizeof(val));
1188 if (ret == -1) {
1189 int saved_errno = errno;
1190 talloc_free(dgram);
1191 errno = saved_errno;
1192 return ret;
1193 }
1194 }
1195
1196 if (do_bind) {
1197 ret = bind(fd, &lbsda->u.sa, sa_socklen);
1198 if (ret == -1) {
1199 int saved_errno = errno;
1200 talloc_free(dgram);
1201 errno = saved_errno;
1202 return ret;
1203 }
1204 }
1205
1206 if (rbsda) {
1207 ret = connect(fd, &rbsda->u.sa, sa_socklen);
1208 if (ret == -1) {
1209 int saved_errno = errno;
1210 talloc_free(dgram);
1211 errno = saved_errno;
1212 return ret;
1213 }
1214 }
1215
1216 *_dgram = dgram;
1217 return 0;
1218 }
1219
1220 int _tdgram_inet_udp_socket(const struct tsocket_address *local,
1221 const struct tsocket_address *remote,
1222 TALLOC_CTX *mem_ctx,
1223 struct tdgram_context **dgram,
1224 const char *location)
1225 {
1226 struct tsocket_address_bsd *lbsda =
1227 talloc_get_type_abort(local->private_data,
1228 struct tsocket_address_bsd);
1229 int ret;
1230
1231 switch (lbsda->u.sa.sa_family) {
1232 case AF_INET:
1233 break;
1234 #ifdef HAVE_IPV6
1235 case AF_INET6:
1236 break;
1237 #endif
1238 default:
1239 errno = EINVAL;
1240 return -1;
1241 }
1242
1243 ret = tdgram_bsd_dgram_socket(local, remote, false,
1244 mem_ctx, dgram, location);
1245
1246 return ret;
1247 }
1248
1249 int _tdgram_unix_socket(const struct tsocket_address *local,
1250 const struct tsocket_address *remote,
1251 TALLOC_CTX *mem_ctx,
1252 struct tdgram_context **dgram,
1253 const char *location)
1254 {
1255 struct tsocket_address_bsd *lbsda =
1256 talloc_get_type_abort(local->private_data,
1257 struct tsocket_address_bsd);
1258 int ret;
1259
1260 switch (lbsda->u.sa.sa_family) {
1261 case AF_UNIX:
1262 break;
1263 default:
1264 errno = EINVAL;
1265 return -1;
1266 }
1267
1268 ret = tdgram_bsd_dgram_socket(local, remote, false,
1269 mem_ctx, dgram, location);
1270
1271 return ret;
1272 }
1273
1274 struct tstream_bsd {
1275 int fd;
1276
1277 void *event_ptr;
1278 struct tevent_fd *fde;
1279
1280 void *readable_private;
1281 void (*readable_handler)(void *private_data);
1282 void *writeable_private;
1283 void (*writeable_handler)(void *private_data);
1284 };
1285
1286 static void tstream_bsd_fde_handler(struct tevent_context *ev,
1287 struct tevent_fd *fde,
1288 uint16_t flags,
1289 void *private_data)
1290 {
1291 struct tstream_bsd *bsds = talloc_get_type_abort(private_data,
1292 struct tstream_bsd);
1293
1294 if (flags & TEVENT_FD_WRITE) {
1295 bsds->writeable_handler(bsds->writeable_private);
1296 return;
1297 }
1298 if (flags & TEVENT_FD_READ) {
1299 if (!bsds->readable_handler) {
1300 if (bsds->writeable_handler) {
1301 bsds->writeable_handler(bsds->writeable_private);
1302 return;
1303 }
1304 TEVENT_FD_NOT_READABLE(bsds->fde);
1305 return;
1306 }
1307 bsds->readable_handler(bsds->readable_private);
1308 return;
1309 }
1310 }
1311
1312 static int tstream_bsd_set_readable_handler(struct tstream_bsd *bsds,
1313 struct tevent_context *ev,
1314 void (*handler)(void *private_data),
1315 void *private_data)
1316 {
1317 if (ev == NULL) {
1318 if (handler) {
1319 errno = EINVAL;
1320 return -1;
1321 }
1322 if (!bsds->readable_handler) {
1323 return 0;
1324 }
1325 bsds->readable_handler = NULL;
1326 bsds->readable_private = NULL;
1327
1328 return 0;
1329 }
1330
1331 /* read and write must use the same tevent_context */
1332 if (bsds->event_ptr != ev) {
1333 if (bsds->readable_handler || bsds->writeable_handler) {
1334 errno = EINVAL;
1335 return -1;
1336 }
1337 bsds->event_ptr = NULL;
1338 TALLOC_FREE(bsds->fde);
1339 }
1340
1341 if (tevent_fd_get_flags(bsds->fde) == 0) {
1342 TALLOC_FREE(bsds->fde);
1343
1344 bsds->fde = tevent_add_fd(ev, bsds,
1345 bsds->fd, TEVENT_FD_READ,
1346 tstream_bsd_fde_handler,
1347 bsds);
1348 if (!bsds->fde) {
1349 errno = ENOMEM;
1350 return -1;
1351 }
1352
1353 /* cache the event context we're running on */
1354 bsds->event_ptr = ev;
1355 } else if (!bsds->readable_handler) {
1356 TEVENT_FD_READABLE(bsds->fde);
1357 }
1358
1359 bsds->readable_handler = handler;
1360 bsds->readable_private = private_data;
1361
1362 return 0;
1363 }
1364
1365 static int tstream_bsd_set_writeable_handler(struct tstream_bsd *bsds,
1366 struct tevent_context *ev,
1367 void (*handler)(void *private_data),
1368 void *private_data)
1369 {
1370 if (ev == NULL) {
1371 if (handler) {
1372 errno = EINVAL;
1373 return -1;
1374 }
1375 if (!bsds->writeable_handler) {
1376 return 0;
1377 }
1378 bsds->writeable_handler = NULL;
1379 bsds->writeable_private = NULL;
1380 TEVENT_FD_NOT_WRITEABLE(bsds->fde);
1381
1382 return 0;
1383 }
1384
1385 /* read and write must use the same tevent_context */
1386 if (bsds->event_ptr != ev) {
1387 if (bsds->readable_handler || bsds->writeable_handler) {
1388 errno = EINVAL;
1389 return -1;
1390 }
1391 bsds->event_ptr = NULL;
1392 TALLOC_FREE(bsds->fde);
1393 }
1394
1395 if (tevent_fd_get_flags(bsds->fde) == 0) {
1396 TALLOC_FREE(bsds->fde);
1397
1398 bsds->fde = tevent_add_fd(ev, bsds,
1399 bsds->fd,
1400 TEVENT_FD_READ | TEVENT_FD_WRITE,
1401 tstream_bsd_fde_handler,
1402 bsds);
1403 if (!bsds->fde) {
1404 errno = ENOMEM;
1405 return -1;
1406 }
1407
1408 /* cache the event context we're running on */
1409 bsds->event_ptr = ev;
1410 } else if (!bsds->writeable_handler) {
1411 uint16_t flags = tevent_fd_get_flags(bsds->fde);
1412 flags |= TEVENT_FD_READ | TEVENT_FD_WRITE;
1413 tevent_fd_set_flags(bsds->fde, flags);
1414 }
1415
1416 bsds->writeable_handler = handler;
1417 bsds->writeable_private = private_data;
1418
1419 return 0;
1420 }
1421
1422 static ssize_t tstream_bsd_pending_bytes(struct tstream_context *stream)
1423 {
1424 struct tstream_bsd *bsds = tstream_context_data(stream,
1425 struct tstream_bsd);
1426 ssize_t ret;
1427
1428 if (bsds->fd == -1) {
1429 errno = ENOTCONN;
1430 return -1;
1431 }
1432
1433 ret = tsocket_bsd_pending(bsds->fd);
1434
1435 return ret;
1436 }
1437
1438 struct tstream_bsd_readv_state {
1439 struct tstream_context *stream;
1440
1441 struct iovec *vector;
1442 size_t count;
1443
1444 int ret;
1445 };
1446
1447 static int tstream_bsd_readv_destructor(struct tstream_bsd_readv_state *state)
1448 {
1449 struct tstream_bsd *bsds = tstream_context_data(state->stream,
1450 struct tstream_bsd);
1451
1452 tstream_bsd_set_readable_handler(bsds, NULL, NULL, NULL);
1453
1454 return 0;
1455 }
1456
1457 static void tstream_bsd_readv_handler(void *private_data);
1458
1459 static struct tevent_req *tstream_bsd_readv_send(TALLOC_CTX *mem_ctx,
1460 struct tevent_context *ev,
1461 struct tstream_context *stream,
1462 struct iovec *vector,
1463 size_t count)
1464 {
1465 struct tevent_req *req;
1466 struct tstream_bsd_readv_state *state;
1467 struct tstream_bsd *bsds = tstream_context_data(stream, struct tstream_bsd);
1468 int ret;
1469
1470 req = tevent_req_create(mem_ctx, &state,
1471 struct tstream_bsd_readv_state);
1472 if (!req) {
1473 return NULL;
1474 }
1475
1476 state->stream = stream;
1477 /* we make a copy of the vector so that we can modify it */
1478 state->vector = talloc_array(state, struct iovec, count);
1479 if (tevent_req_nomem(state->vector, req)) {
1480 goto post;
1481 }
1482 memcpy(state->vector, vector, sizeof(struct iovec)*count);
1483 state->count = count;
1484 state->ret = 0;
1485
1486 talloc_set_destructor(state, tstream_bsd_readv_destructor);
1487
1488 if (bsds->fd == -1) {
1489 tevent_req_error(req, ENOTCONN);
1490 goto post;
1491 }
1492
1493 /*
1494 * this is a fast path, not waiting for the
1495 * socket to become explicit readable gains
1496 * about 10%-20% performance in benchmark tests.
1497 */
1498 tstream_bsd_readv_handler(req);
1499 if (!tevent_req_is_in_progress(req)) {
1500 goto post;
1501 }
1502
1503 ret = tstream_bsd_set_readable_handler(bsds, ev,
1504 tstream_bsd_readv_handler,
1505 req);
1506 if (ret == -1) {
1507 tevent_req_error(req, errno);
1508 goto post;
1509 }
1510
1511 return req;
1512
1513 post:
1514 tevent_req_post(req, ev);
1515 return req;
1516 }
1517
1518 static void tstream_bsd_readv_handler(void *private_data)
1519 {
1520 struct tevent_req *req = talloc_get_type_abort(private_data,
1521 struct tevent_req);
1522 struct tstream_bsd_readv_state *state = tevent_req_data(req,
1523 struct tstream_bsd_readv_state);
1524 struct tstream_context *stream = state->stream;
1525 struct tstream_bsd *bsds = tstream_context_data(stream, struct tstream_bsd);
1526 int ret;
1527 int err;
1528 bool retry;
1529
1530 ret = readv(bsds->fd, state->vector, state->count);
1531 if (ret == 0) {
1532 /* propagate end of file */
1533 tevent_req_error(req, EPIPE);
1534 return;
1535 }
1536 err = tsocket_bsd_error_from_errno(ret, errno, &retry);
1537 if (retry) {
1538 /* retry later */
1539 return;
1540 }
1541 if (tevent_req_error(req, err)) {
1542 return;
1543 }
1544
1545 state->ret += ret;
1546
1547 while (ret > 0) {
1548 if (ret < state->vector[0].iov_len) {
1549 uint8_t *base;
1550 base = (uint8_t *)state->vector[0].iov_base;
1551 base += ret;
1552 state->vector[0].iov_base = base;
1553 state->vector[0].iov_len -= ret;
1554 break;
1555 }
1556 ret -= state->vector[0].iov_len;
1557 state->vector += 1;
1558 state->count -= 1;
1559 }
1560
1561 /*
1562 * there're maybe some empty vectors at the end
1563 * which we need to skip, otherwise we would get
1564 * ret == 0 from the readv() call and return EPIPE
1565 */
1566 while (state->count > 0) {
1567 if (state->vector[0].iov_len > 0) {
1568 break;
1569 }
1570 state->vector += 1;
1571 state->count -= 1;
1572 }
1573
1574 if (state->count > 0) {
1575 /* we have more to read */
1576 return;
1577 }
1578
1579 tevent_req_done(req);
1580 }
1581
1582 static int tstream_bsd_readv_recv(struct tevent_req *req,
1583 int *perrno)
1584 {
1585 struct tstream_bsd_readv_state *state = tevent_req_data(req,
1586 struct tstream_bsd_readv_state);
1587 int ret;
1588
1589 ret = tsocket_simple_int_recv(req, perrno);
1590 if (ret == 0) {
1591 ret = state->ret;
1592 }
1593
1594 tevent_req_received(req);
1595 return ret;
1596 }
1597
1598 struct tstream_bsd_writev_state {
1599 struct tstream_context *stream;
1600
1601 struct iovec *vector;
1602 size_t count;
1603
1604 int ret;
1605 };
1606
1607 static int tstream_bsd_writev_destructor(struct tstream_bsd_writev_state *state)
1608 {
1609 struct tstream_bsd *bsds = tstream_context_data(state->stream,
1610 struct tstream_bsd);
1611
1612 tstream_bsd_set_writeable_handler(bsds, NULL, NULL, NULL);
1613
1614 return 0;
1615 }
1616
1617 static void tstream_bsd_writev_handler(void *private_data);
1618
1619 static struct tevent_req *tstream_bsd_writev_send(TALLOC_CTX *mem_ctx,
1620 struct tevent_context *ev,
1621 struct tstream_context *stream,
1622 const struct iovec *vector,
1623 size_t count)
1624 {
1625 struct tevent_req *req;
1626 struct tstream_bsd_writev_state *state;
1627 struct tstream_bsd *bsds = tstream_context_data(stream, struct tstream_bsd);
1628 int ret;
1629
1630 req = tevent_req_create(mem_ctx, &state,
1631 struct tstream_bsd_writev_state);
1632 if (!req) {
1633 return NULL;
1634 }
1635
1636 state->stream = stream;
1637 /* we make a copy of the vector so that we can modify it */
1638 state->vector = talloc_array(state, struct iovec, count);
1639 if (tevent_req_nomem(state->vector, req)) {
1640 goto post;
1641 }
1642 memcpy(state->vector, vector, sizeof(struct iovec)*count);
1643 state->count = count;
1644 state->ret = 0;
1645
1646 talloc_set_destructor(state, tstream_bsd_writev_destructor);
1647
1648 if (bsds->fd == -1) {
1649 tevent_req_error(req, ENOTCONN);
1650 goto post;
1651 }
1652
1653 /*
1654 * this is a fast path, not waiting for the
1655 * socket to become explicit writeable gains
1656 * about 10%-20% performance in benchmark tests.
1657 */
1658 tstream_bsd_writev_handler(req);
1659 if (!tevent_req_is_in_progress(req)) {
1660 goto post;
1661 }
1662
1663 ret = tstream_bsd_set_writeable_handler(bsds, ev,
1664 tstream_bsd_writev_handler,
1665 req);
1666 if (ret == -1) {
1667 tevent_req_error(req, errno);
1668 goto post;
1669 }
1670
1671 return req;
1672
1673 post:
1674 tevent_req_post(req, ev);
1675 return req;
1676 }
1677
1678 static void tstream_bsd_writev_handler(void *private_data)
1679 {
1680 struct tevent_req *req = talloc_get_type_abort(private_data,
1681 struct tevent_req);
1682 struct tstream_bsd_writev_state *state = tevent_req_data(req,
1683 struct tstream_bsd_writev_state);
1684 struct tstream_context *stream = state->stream;
1685 struct tstream_bsd *bsds = tstream_context_data(stream, struct tstream_bsd);
1686 ssize_t ret;
1687 int err;
1688 bool retry;
1689
1690 ret = writev(bsds->fd, state->vector, state->count);
1691 if (ret == 0) {
1692 /* propagate end of file */
1693 tevent_req_error(req, EPIPE);
1694 return;
1695 }
1696 err = tsocket_bsd_error_from_errno(ret, errno, &retry);
1697 if (retry) {
1698 /* retry later */
1699 return;
1700 }
1701 if (tevent_req_error(req, err)) {
1702 return;
1703 }
1704
1705 state->ret += ret;
1706
1707 while (ret > 0) {
1708 if (ret < state->vector[0].iov_len) {
1709 uint8_t *base;
1710 base = (uint8_t *)state->vector[0].iov_base;
1711 base += ret;
1712 state->vector[0].iov_base = base;
1713 state->vector[0].iov_len -= ret;
1714 break;
1715 }
1716 ret -= state->vector[0].iov_len;
1717 state->vector += 1;
1718 state->count -= 1;
1719 }
1720
1721 /*
1722 * there're maybe some empty vectors at the end
1723 * which we need to skip, otherwise we would get
1724 * ret == 0 from the writev() call and return EPIPE
1725 */
1726 while (state->count > 0) {
1727 if (state->vector[0].iov_len > 0) {
1728 break;
1729 }
1730 state->vector += 1;
1731 state->count -= 1;
1732 }
1733
1734 if (state->count > 0) {
1735 /* we have more to read */
1736 return;
1737 }
1738
1739 tevent_req_done(req);
1740 }
1741
1742 static int tstream_bsd_writev_recv(struct tevent_req *req, int *perrno)
1743 {
1744 struct tstream_bsd_writev_state *state = tevent_req_data(req,
1745 struct tstream_bsd_writev_state);
1746 int ret;
1747
1748 ret = tsocket_simple_int_recv(req, perrno);
1749 if (ret == 0) {
1750 ret = state->ret;
1751 }
1752
1753 tevent_req_received(req);
1754 return ret;
1755 }
1756
1757 struct tstream_bsd_disconnect_state {
1758 void *__dummy;
1759 };
1760
1761 static struct tevent_req *tstream_bsd_disconnect_send(TALLOC_CTX *mem_ctx,
1762 struct tevent_context *ev,
1763 struct tstream_context *stream)
1764 {
1765 struct tstream_bsd *bsds = tstream_context_data(stream, struct tstream_bsd);
1766 struct tevent_req *req;
1767 struct tstream_bsd_disconnect_state *state;
1768 int ret;
1769 int err;
1770 bool dummy;
1771
1772 req = tevent_req_create(mem_ctx, &state,
1773 struct tstream_bsd_disconnect_state);
1774 if (req == NULL) {
1775 return NULL;
1776 }
1777
1778 if (bsds->fd == -1) {
1779 tevent_req_error(req, ENOTCONN);
1780 goto post;
1781 }
1782
1783 ret = close(bsds->fd);
1784 bsds->fd = -1;
1785 err = tsocket_bsd_error_from_errno(ret, errno, &dummy);
1786 if (tevent_req_error(req, err)) {
1787 goto post;
1788 }
1789
1790 tevent_req_done(req);
1791 post:
1792 tevent_req_post(req, ev);
1793 return req;
1794 }
1795
1796 static int tstream_bsd_disconnect_recv(struct tevent_req *req,
1797 int *perrno)
1798 {
1799 int ret;
1800
1801 ret = tsocket_simple_int_recv(req, perrno);
1802
1803 tevent_req_received(req);
1804 return ret;
1805 }
1806
1807 static const struct tstream_context_ops tstream_bsd_ops = {
1808 .name = "bsd",
1809
1810 .pending_bytes = tstream_bsd_pending_bytes,
1811
1812 .readv_send = tstream_bsd_readv_send,
1813 .readv_recv = tstream_bsd_readv_recv,
1814
1815 .writev_send = tstream_bsd_writev_send,
1816 .writev_recv = tstream_bsd_writev_recv,
1817
1818 .disconnect_send = tstream_bsd_disconnect_send,
1819 .disconnect_recv = tstream_bsd_disconnect_recv,
1820 };
1821
1822 static int tstream_bsd_destructor(struct tstream_bsd *bsds)
1823 {
1824 TALLOC_FREE(bsds->fde);
1825 if (bsds->fd != -1) {
1826 close(bsds->fd);
1827 bsds->fd = -1;
1828 }
1829 return 0;
1830 }
1831
1832 int _tstream_bsd_existing_socket(TALLOC_CTX *mem_ctx,
1833 int fd,
1834 struct tstream_context **_stream,
1835 const char *location)
1836 {
1837 struct tstream_context *stream;
1838 struct tstream_bsd *bsds;
1839
1840 stream = tstream_context_create(mem_ctx,
1841 &tstream_bsd_ops,
1842 &bsds,
1843 struct tstream_bsd,
1844 location);
1845 if (!stream) {
1846 return -1;
1847 }
1848 ZERO_STRUCTP(bsds);
1849 bsds->fd = fd;
1850 talloc_set_destructor(bsds, tstream_bsd_destructor);
1851
1852 *_stream = stream;
1853 return 0;
1854 }
1855
1856 struct tstream_bsd_connect_state {
1857 int fd;
1858 struct tevent_fd *fde;
1859 struct tstream_conext *stream;
1860 };
1861
1862 static int tstream_bsd_connect_destructor(struct tstream_bsd_connect_state *state)
1863 {
1864 TALLOC_FREE(state->fde);
1865 if (state->fd != -1) {
1866 close(state->fd);
1867 state->fd = -1;
1868 }
1869
1870 return 0;
1871 }
1872
1873 static void tstream_bsd_connect_fde_handler(struct tevent_context *ev,
1874 struct tevent_fd *fde,
1875 uint16_t flags,
1876 void *private_data);
1877
1878 static struct tevent_req * tstream_bsd_connect_send(TALLOC_CTX *mem_ctx,
1879 struct tevent_context *ev,
1880 int sys_errno,
1881 const struct tsocket_address *local,
1882 const struct tsocket_address *remote)
1883 {
1884 struct tevent_req *req;
1885 struct tstream_bsd_connect_state *state;
1886 struct tsocket_address_bsd *lbsda =
1887 talloc_get_type_abort(local->private_data,
1888 struct tsocket_address_bsd);
1889 struct tsocket_address_bsd *rbsda =
1890 talloc_get_type_abort(remote->private_data,
1891 struct tsocket_address_bsd);
1892 int ret;
1893 int err;
1894 bool retry;
1895 bool do_bind = false;
1896 bool do_reuseaddr = false;
1897 socklen_t sa_socklen = sizeof(rbsda->u.ss);
1898
1899 req = tevent_req_create(mem_ctx, &state,
1900 struct tstream_bsd_connect_state);
1901 if (!req) {
1902 return NULL;
1903 }
1904 state->fd = -1;
1905 state->fde = NULL;
1906
1907 talloc_set_destructor(state, tstream_bsd_connect_destructor);
1908
1909 /* give the wrappers a chance to report an error */
1910 if (sys_errno != 0) {
1911 tevent_req_error(req, sys_errno);
1912 goto post;
1913 }
1914
1915 switch (lbsda->u.sa.sa_family) {
1916 case AF_UNIX:
1917 if (lbsda->u.un.sun_path[0] != 0) {
1918 do_reuseaddr = true;
1919 do_bind = true;
1920 }
1921 /*
1922 * for unix sockets we can't use the size of sockaddr_storage
1923 * we would get EINVAL
1924 */
1925 sa_socklen = sizeof(rbsda->u.un);
1926 break;
1927 case AF_INET:
1928 if (lbsda->u.in.sin_port != 0) {
1929 do_reuseaddr = true;
1930 do_bind = true;
1931 }
1932 if (lbsda->u.in.sin_addr.s_addr == INADDR_ANY) {
1933 do_bind = true;
1934 }
1935 break;
1936 #ifdef HAVE_IPV6
1937 case AF_INET6:
1938 if (lbsda->u.in6.sin6_port != 0) {
1939 do_reuseaddr = true;
1940 do_bind = true;
1941 }
1942 if (memcmp(&in6addr_any,
1943 &lbsda->u.in6.sin6_addr,
1944 sizeof(in6addr_any)) != 0) {
1945 do_bind = true;
1946 }
1947 break;
1948 #endif
1949 default:
1950 tevent_req_error(req, EINVAL);
1951 goto post;
1952 }
1953
1954 state->fd = socket(lbsda->u.sa.sa_family, SOCK_STREAM, 0);
1955 if (state->fd == -1) {
1956 tevent_req_error(req, errno);
1957 goto post;
1958 }
1959
1960 state->fd = tsocket_bsd_common_prepare_fd(state->fd, true);
1961 if (state->fd == -1) {
1962 tevent_req_error(req, errno);
1963 goto post;
1964 }
1965
1966 if (do_reuseaddr) {
1967 int val = 1;
1968
1969 ret = setsockopt(state->fd, SOL_SOCKET, SO_REUSEADDR,
1970 (const void *)&val, sizeof(val));
1971 if (ret == -1) {
1972 tevent_req_error(req, errno);
1973 goto post;
1974 }
1975 }
1976
1977 if (do_bind) {
1978 ret = bind(state->fd, &lbsda->u.sa, sizeof(lbsda->u.ss));
1979 if (ret == -1) {
1980 tevent_req_error(req, errno);
1981 goto post;
1982 }
1983 }
1984
1985 ret = connect(state->fd, &rbsda->u.sa, sa_socklen);
1986 err = tsocket_bsd_error_from_errno(ret, errno, &retry);
1987 if (retry) {
1988 /* retry later */
1989 goto async;
1990 }
1991 if (tevent_req_error(req, err)) {
1992 goto post;
1993 }
1994
1995 tevent_req_done(req);
1996 goto post;
1997
1998 async:
1999 state->fde = tevent_add_fd(ev, state,
2000 state->fd,
2001 TEVENT_FD_READ | TEVENT_FD_WRITE,
2002 tstream_bsd_connect_fde_handler,
2003 req);
2004 if (tevent_req_nomem(state->fde, req)) {
2005 goto post;
2006 }
2007
2008 return req;
2009
2010 post:
2011 tevent_req_post(req, ev);
2012 return req;
2013 }
2014
2015 static void tstream_bsd_connect_fde_handler(struct tevent_context *ev,
2016 struct tevent_fd *fde,
2017 uint16_t flags,
2018 void *private_data)
2019 {
2020 struct tevent_req *req = talloc_get_type_abort(private_data,
2021 struct tevent_req);
2022 struct tstream_bsd_connect_state *state = tevent_req_data(req,
2023 struct tstream_bsd_connect_state);
2024 int ret;
2025 int error=0;
2026 socklen_t len = sizeof(error);
2027 int err;
2028 bool retry;
2029
2030 ret = getsockopt(state->fd, SOL_SOCKET, SO_ERROR, &error, &len);
2031 if (ret == 0) {
2032 if (error != 0) {
2033 errno = error;
2034 ret = -1;
2035 }
2036 }
2037 err = tsocket_bsd_error_from_errno(ret, errno, &retry);
2038 if (retry) {
2039 /* retry later */
2040 return;
2041 }
2042 if (tevent_req_error(req, err)) {
2043 return;
2044 }
2045
2046 tevent_req_done(req);
2047 }
2048
2049 static int tstream_bsd_connect_recv(struct tevent_req *req,
2050 int *perrno,
2051 TALLOC_CTX *mem_ctx,
2052 struct tstream_context **stream,
2053 const char *location)
2054 {
2055 struct tstream_bsd_connect_state *state = tevent_req_data(req,
2056 struct tstream_bsd_connect_state);
2057 int ret;
2058
2059 ret = tsocket_simple_int_recv(req, perrno);
2060 if (ret == 0) {
2061 ret = _tstream_bsd_existing_socket(mem_ctx,
2062 state->fd,
2063 stream,
2064 location);
2065 if (ret == -1) {
2066 *perrno = errno;
2067 goto done;
2068 }
2069 TALLOC_FREE(state->fde);
2070 state->fd = -1;
2071 }
2072
2073 done:
2074 tevent_req_received(req);
2075 return ret;
2076 }
2077
2078 struct tevent_req * tstream_inet_tcp_connect_send(TALLOC_CTX *mem_ctx,
2079 struct tevent_context *ev,
2080 const struct tsocket_address *local,
2081 const struct tsocket_address *remote)
2082 {
2083 struct tsocket_address_bsd *lbsda =
2084 talloc_get_type_abort(local->private_data,
2085 struct tsocket_address_bsd);
2086 struct tevent_req *req;
2087 int sys_errno = 0;
2088
2089 switch (lbsda->u.sa.sa_family) {
2090 case AF_INET:
2091 break;
2092 #ifdef HAVE_IPV6
2093 case AF_INET6:
2094 break;
2095 #endif
2096 default:
2097 sys_errno = EINVAL;
2098 break;
2099 }
2100
2101 req = tstream_bsd_connect_send(mem_ctx, ev, sys_errno, local, remote);
2102
2103 return req;
2104 }
2105
2106 int _tstream_inet_tcp_connect_recv(struct tevent_req *req,
2107 int *perrno,
2108 TALLOC_CTX *mem_ctx,
2109 struct tstream_context **stream,
2110 const char *location)
2111 {
2112 return tstream_bsd_connect_recv(req, perrno, mem_ctx, stream, location);
2113 }
2114
2115 struct tevent_req * tstream_unix_connect_send(TALLOC_CTX *mem_ctx,
2116 struct tevent_context *ev,
2117 const struct tsocket_address *local,
2118 const struct tsocket_address *remote)
2119 {
2120 struct tsocket_address_bsd *lbsda =
2121 talloc_get_type_abort(local->private_data,
2122 struct tsocket_address_bsd);
2123 struct tevent_req *req;
2124 int sys_errno = 0;
2125
2126 switch (lbsda->u.sa.sa_family) {
2127 case AF_UNIX:
2128 break;
2129 default:
2130 sys_errno = EINVAL;
2131 break;
2132 }
2133
2134 req = tstream_bsd_connect_send(mem_ctx, ev, sys_errno, local, remote);
2135
2136 return req;
2137 }
2138
2139 int _tstream_unix_connect_recv(struct tevent_req *req,
2140 int *perrno,
2141 TALLOC_CTX *mem_ctx,
2142 struct tstream_context **stream,
2143 const char *location)
2144 {
2145 return tstream_bsd_connect_recv(req, perrno, mem_ctx, stream, location);
2146 }
2147
2148 int _tstream_unix_socketpair(TALLOC_CTX *mem_ctx1,
2149 struct tstream_context **_stream1,
2150 TALLOC_CTX *mem_ctx2,
2151 struct tstream_context **_stream2,
2152 const char *location)
2153 {
2154 int ret;
2155 int fds[2];
2156 int fd1;
2157 int fd2;
2158 struct tstream_context *stream1 = NULL;
2159 struct tstream_context *stream2 = NULL;
2160
2161 ret = socketpair(AF_UNIX, SOCK_STREAM, 0, fds);
2162 if (ret == -1) {
2163 return -1;
2164 }
2165 fd1 = fds[0];
2166 fd2 = fds[1];
2167
2168 fd1 = tsocket_bsd_common_prepare_fd(fd1, true);
2169 if (fd1 == -1) {
2170 int sys_errno = errno;
2171 close(fd2);
2172 errno = sys_errno;
2173 return -1;
2174 }
2175
2176 fd2 = tsocket_bsd_common_prepare_fd(fd2, true);
2177 if (fd2 == -1) {
2178 int sys_errno = errno;
2179 close(fd1);
2180 errno = sys_errno;
2181 return -1;
2182 }
2183
2184 ret = _tstream_bsd_existing_socket(mem_ctx1,
2185 fd1,
2186 &stream1,
2187 location);
2188 if (ret == -1) {
2189 int sys_errno = errno;
2190 close(fd1);
2191 close(fd2);
2192 errno = sys_errno;
2193 return -1;
2194 }
2195
2196 ret = _tstream_bsd_existing_socket(mem_ctx2,
2197 fd2,
2198 &stream2,
2199 location);
2200 if (ret == -1) {
2201 int sys_errno = errno;
2202 talloc_free(stream1);
2203 close(fd2);
2204 errno = sys_errno;
2205 return -1;
2206 }
2207
2208 *_stream1 = stream1;
2209 *_stream2 = stream2;
2210 return 0;
2211 }
2212
Crístian's Samba branch