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