xref: /freebsd-11-stable/lib/libc/net/sctp_sys_calls.c (revision 6ae3a7e44ba54c793a0279b91fd1c36b4f3dbc11)
1 /*-
2  * Copyright (c) 2001-2007, by Cisco Systems, Inc. All rights reserved.
3  * Copyright (c) 2008-2012, by Randall Stewart. All rights reserved.
4  * Copyright (c) 2008-2012, by Michael Tuexen. All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions are met:
8  *
9  * a) Redistributions of source code must retain the above copyright notice,
10  *    this list of conditions and the following disclaimer.
11  *
12  * b) Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in
14  *    the documentation and/or other materials provided with the distribution.
15  *
16  * c) Neither the name of Cisco Systems, Inc. nor the names of its
17  *    contributors may be used to endorse or promote products derived
18  *    from this software without specific prior written permission.
19  *
20  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
21  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
22  * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
24  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
25  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
26  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
27  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
28  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
29  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
30  * THE POSSIBILITY OF SUCH DAMAGE.
31  */
32 
33 #include <sys/cdefs.h>
34 __FBSDID("$FreeBSD$");
35 
36 #include <stdio.h>
37 #include <string.h>
38 #include <errno.h>
39 #include <stdlib.h>
40 #include <unistd.h>
41 #include <sys/types.h>
42 #include <sys/socket.h>
43 #include <sys/errno.h>
44 #include <sys/syscall.h>
45 #include <sys/uio.h>
46 #include <netinet/in.h>
47 #include <arpa/inet.h>
48 #include <netinet/sctp_uio.h>
49 #include <netinet/sctp.h>
50 
51 #ifndef IN6_IS_ADDR_V4MAPPED
52 #define IN6_IS_ADDR_V4MAPPED(a)		      \
53 	((*(const uint32_t *)(const void *)(&(a)->s6_addr[0]) == 0) &&	\
54 	 (*(const uint32_t *)(const void *)(&(a)->s6_addr[4]) == 0) &&	\
55 	 (*(const uint32_t *)(const void *)(&(a)->s6_addr[8]) == ntohl(0x0000ffff)))
56 #endif
57 
58 #define SCTP_CONTROL_VEC_SIZE_RCV  16384
59 
60 
61 static void
in6_sin6_2_sin(struct sockaddr_in * sin,struct sockaddr_in6 * sin6)62 in6_sin6_2_sin(struct sockaddr_in *sin, struct sockaddr_in6 *sin6)
63 {
64 	bzero(sin, sizeof(*sin));
65 	sin->sin_len = sizeof(struct sockaddr_in);
66 	sin->sin_family = AF_INET;
67 	sin->sin_port = sin6->sin6_port;
68 	sin->sin_addr.s_addr = sin6->sin6_addr.__u6_addr.__u6_addr32[3];
69 }
70 
71 int
sctp_getaddrlen(sa_family_t family)72 sctp_getaddrlen(sa_family_t family)
73 {
74 	int ret, sd;
75 	socklen_t siz;
76 	struct sctp_assoc_value av;
77 
78 	av.assoc_value = family;
79 	siz = sizeof(av);
80 #if defined(AF_INET)
81 	sd = socket(AF_INET, SOCK_SEQPACKET, IPPROTO_SCTP);
82 #elif defined(AF_INET6)
83 	sd = socket(AF_INET6, SOCK_SEQPACKET, IPPROTO_SCTP);
84 #else
85 	sd = -1;
86 #endif
87 	if (sd == -1) {
88 		return (-1);
89 	}
90 	ret = getsockopt(sd, IPPROTO_SCTP, SCTP_GET_ADDR_LEN, &av, &siz);
91 	close(sd);
92 	if (ret == 0) {
93 		return ((int)av.assoc_value);
94 	} else {
95 		return (-1);
96 	}
97 }
98 
99 int
sctp_connectx(int sd,const struct sockaddr * addrs,int addrcnt,sctp_assoc_t * id)100 sctp_connectx(int sd, const struct sockaddr *addrs, int addrcnt,
101     sctp_assoc_t * id)
102 {
103 	char *buf;
104 	int i, ret, *aa;
105 	char *cpto;
106 	const struct sockaddr *at;
107 	size_t len;
108 
109 	/* validate the address count and list */
110 	if ((addrs == NULL) || (addrcnt <= 0)) {
111 		errno = EINVAL;
112 		return (-1);
113 	}
114 	if ((buf = malloc(sizeof(int) + (size_t)addrcnt * sizeof(struct sockaddr_in6))) == NULL) {
115 		errno = E2BIG;
116 		return (-1);
117 	}
118 	len = sizeof(int);
119 	at = addrs;
120 	cpto = buf + sizeof(int);
121 	/* validate all the addresses and get the size */
122 	for (i = 0; i < addrcnt; i++) {
123 		switch (at->sa_family) {
124 		case AF_INET:
125 			if (at->sa_len != sizeof(struct sockaddr_in)) {
126 				free(buf);
127 				errno = EINVAL;
128 				return (-1);
129 			}
130 			memcpy(cpto, at, sizeof(struct sockaddr_in));
131 			cpto = ((caddr_t)cpto + sizeof(struct sockaddr_in));
132 			len += sizeof(struct sockaddr_in);
133 			break;
134 		case AF_INET6:
135 			if (at->sa_len != sizeof(struct sockaddr_in6)) {
136 				free(buf);
137 				errno = EINVAL;
138 				return (-1);
139 			}
140 			if (IN6_IS_ADDR_V4MAPPED(&((struct sockaddr_in6 *)at)->sin6_addr)) {
141 				in6_sin6_2_sin((struct sockaddr_in *)cpto, (struct sockaddr_in6 *)at);
142 				cpto = ((caddr_t)cpto + sizeof(struct sockaddr_in));
143 				len += sizeof(struct sockaddr_in);
144 			} else {
145 				memcpy(cpto, at, sizeof(struct sockaddr_in6));
146 				cpto = ((caddr_t)cpto + sizeof(struct sockaddr_in6));
147 				len += sizeof(struct sockaddr_in6);
148 			}
149 			break;
150 		default:
151 			free(buf);
152 			errno = EINVAL;
153 			return (-1);
154 		}
155 		at = (struct sockaddr *)((caddr_t)at + at->sa_len);
156 	}
157 	aa = (int *)buf;
158 	*aa = addrcnt;
159 	ret = setsockopt(sd, IPPROTO_SCTP, SCTP_CONNECT_X, (void *)buf,
160 	    (socklen_t) len);
161 	if ((ret == 0) && (id != NULL)) {
162 		*id = *(sctp_assoc_t *) buf;
163 	}
164 	free(buf);
165 	return (ret);
166 }
167 
168 int
sctp_bindx(int sd,struct sockaddr * addrs,int addrcnt,int flags)169 sctp_bindx(int sd, struct sockaddr *addrs, int addrcnt, int flags)
170 {
171 	struct sctp_getaddresses *gaddrs;
172 	struct sockaddr *sa;
173 	struct sockaddr_in *sin;
174 	struct sockaddr_in6 *sin6;
175 	int i;
176 	size_t argsz;
177 	uint16_t sport = 0;
178 
179 	/* validate the flags */
180 	if ((flags != SCTP_BINDX_ADD_ADDR) &&
181 	    (flags != SCTP_BINDX_REM_ADDR)) {
182 		errno = EFAULT;
183 		return (-1);
184 	}
185 	/* validate the address count and list */
186 	if ((addrcnt <= 0) || (addrs == NULL)) {
187 		errno = EINVAL;
188 		return (-1);
189 	}
190 	/* First pre-screen the addresses */
191 	sa = addrs;
192 	for (i = 0; i < addrcnt; i++) {
193 		switch (sa->sa_family) {
194 		case AF_INET:
195 			if (sa->sa_len != sizeof(struct sockaddr_in)) {
196 				errno = EINVAL;
197 				return (-1);
198 			}
199 			sin = (struct sockaddr_in *)sa;
200 			if (sin->sin_port) {
201 				/* non-zero port, check or save */
202 				if (sport) {
203 					/* Check against our port */
204 					if (sport != sin->sin_port) {
205 						errno = EINVAL;
206 						return (-1);
207 					}
208 				} else {
209 					/* save off the port */
210 					sport = sin->sin_port;
211 				}
212 			}
213 			break;
214 		case AF_INET6:
215 			if (sa->sa_len != sizeof(struct sockaddr_in6)) {
216 				errno = EINVAL;
217 				return (-1);
218 			}
219 			sin6 = (struct sockaddr_in6 *)sa;
220 			if (sin6->sin6_port) {
221 				/* non-zero port, check or save */
222 				if (sport) {
223 					/* Check against our port */
224 					if (sport != sin6->sin6_port) {
225 						errno = EINVAL;
226 						return (-1);
227 					}
228 				} else {
229 					/* save off the port */
230 					sport = sin6->sin6_port;
231 				}
232 			}
233 			break;
234 		default:
235 			/* Invalid address family specified. */
236 			errno = EAFNOSUPPORT;
237 			return (-1);
238 		}
239 		sa = (struct sockaddr *)((caddr_t)sa + sa->sa_len);
240 	}
241 	argsz = sizeof(struct sctp_getaddresses) +
242 	    sizeof(struct sockaddr_storage);
243 	if ((gaddrs = (struct sctp_getaddresses *)malloc(argsz)) == NULL) {
244 		errno = ENOMEM;
245 		return (-1);
246 	}
247 	sa = addrs;
248 	for (i = 0; i < addrcnt; i++) {
249 		memset(gaddrs, 0, argsz);
250 		gaddrs->sget_assoc_id = 0;
251 		memcpy(gaddrs->addr, sa, sa->sa_len);
252 		/*
253 		 * Now, if there was a port mentioned, assure that the first
254 		 * address has that port to make sure it fails or succeeds
255 		 * correctly.
256 		 */
257 		if ((i == 0) && (sport != 0)) {
258 			switch (gaddrs->addr->sa_family) {
259 			case AF_INET:
260 				sin = (struct sockaddr_in *)gaddrs->addr;
261 				sin->sin_port = sport;
262 				break;
263 			case AF_INET6:
264 				sin6 = (struct sockaddr_in6 *)gaddrs->addr;
265 				sin6->sin6_port = sport;
266 				break;
267 			}
268 		}
269 		if (setsockopt(sd, IPPROTO_SCTP, flags, gaddrs,
270 		    (socklen_t) argsz) != 0) {
271 			free(gaddrs);
272 			return (-1);
273 		}
274 		sa = (struct sockaddr *)((caddr_t)sa + sa->sa_len);
275 	}
276 	free(gaddrs);
277 	return (0);
278 }
279 
280 int
sctp_opt_info(int sd,sctp_assoc_t id,int opt,void * arg,socklen_t * size)281 sctp_opt_info(int sd, sctp_assoc_t id, int opt, void *arg, socklen_t * size)
282 {
283 	if (arg == NULL) {
284 		errno = EINVAL;
285 		return (-1);
286 	}
287 	if ((id == SCTP_CURRENT_ASSOC) ||
288 	    (id == SCTP_ALL_ASSOC)) {
289 		errno = EINVAL;
290 		return (-1);
291 	}
292 	switch (opt) {
293 	case SCTP_RTOINFO:
294 		((struct sctp_rtoinfo *)arg)->srto_assoc_id = id;
295 		break;
296 	case SCTP_ASSOCINFO:
297 		((struct sctp_assocparams *)arg)->sasoc_assoc_id = id;
298 		break;
299 	case SCTP_DEFAULT_SEND_PARAM:
300 		((struct sctp_assocparams *)arg)->sasoc_assoc_id = id;
301 		break;
302 	case SCTP_PRIMARY_ADDR:
303 		((struct sctp_setprim *)arg)->ssp_assoc_id = id;
304 		break;
305 	case SCTP_PEER_ADDR_PARAMS:
306 		((struct sctp_paddrparams *)arg)->spp_assoc_id = id;
307 		break;
308 	case SCTP_MAXSEG:
309 		((struct sctp_assoc_value *)arg)->assoc_id = id;
310 		break;
311 	case SCTP_AUTH_KEY:
312 		((struct sctp_authkey *)arg)->sca_assoc_id = id;
313 		break;
314 	case SCTP_AUTH_ACTIVE_KEY:
315 		((struct sctp_authkeyid *)arg)->scact_assoc_id = id;
316 		break;
317 	case SCTP_DELAYED_SACK:
318 		((struct sctp_sack_info *)arg)->sack_assoc_id = id;
319 		break;
320 	case SCTP_CONTEXT:
321 		((struct sctp_assoc_value *)arg)->assoc_id = id;
322 		break;
323 	case SCTP_STATUS:
324 		((struct sctp_status *)arg)->sstat_assoc_id = id;
325 		break;
326 	case SCTP_GET_PEER_ADDR_INFO:
327 		((struct sctp_paddrinfo *)arg)->spinfo_assoc_id = id;
328 		break;
329 	case SCTP_PEER_AUTH_CHUNKS:
330 		((struct sctp_authchunks *)arg)->gauth_assoc_id = id;
331 		break;
332 	case SCTP_LOCAL_AUTH_CHUNKS:
333 		((struct sctp_authchunks *)arg)->gauth_assoc_id = id;
334 		break;
335 	case SCTP_TIMEOUTS:
336 		((struct sctp_timeouts *)arg)->stimo_assoc_id = id;
337 		break;
338 	case SCTP_EVENT:
339 		((struct sctp_event *)arg)->se_assoc_id = id;
340 		break;
341 	case SCTP_DEFAULT_SNDINFO:
342 		((struct sctp_sndinfo *)arg)->snd_assoc_id = id;
343 		break;
344 	case SCTP_DEFAULT_PRINFO:
345 		((struct sctp_default_prinfo *)arg)->pr_assoc_id = id;
346 		break;
347 	case SCTP_PEER_ADDR_THLDS:
348 		((struct sctp_paddrthlds *)arg)->spt_assoc_id = id;
349 		break;
350 	case SCTP_REMOTE_UDP_ENCAPS_PORT:
351 		((struct sctp_udpencaps *)arg)->sue_assoc_id = id;
352 		break;
353 	case SCTP_ECN_SUPPORTED:
354 		((struct sctp_assoc_value *)arg)->assoc_id = id;
355 		break;
356 	case SCTP_PR_SUPPORTED:
357 		((struct sctp_assoc_value *)arg)->assoc_id = id;
358 		break;
359 	case SCTP_AUTH_SUPPORTED:
360 		((struct sctp_assoc_value *)arg)->assoc_id = id;
361 		break;
362 	case SCTP_ASCONF_SUPPORTED:
363 		((struct sctp_assoc_value *)arg)->assoc_id = id;
364 		break;
365 	case SCTP_RECONFIG_SUPPORTED:
366 		((struct sctp_assoc_value *)arg)->assoc_id = id;
367 		break;
368 	case SCTP_NRSACK_SUPPORTED:
369 		((struct sctp_assoc_value *)arg)->assoc_id = id;
370 		break;
371 	case SCTP_PKTDROP_SUPPORTED:
372 		((struct sctp_assoc_value *)arg)->assoc_id = id;
373 		break;
374 	case SCTP_MAX_BURST:
375 		((struct sctp_assoc_value *)arg)->assoc_id = id;
376 		break;
377 	case SCTP_ENABLE_STREAM_RESET:
378 		((struct sctp_assoc_value *)arg)->assoc_id = id;
379 		break;
380 	case SCTP_PR_STREAM_STATUS:
381 		((struct sctp_prstatus *)arg)->sprstat_assoc_id = id;
382 		break;
383 	case SCTP_PR_ASSOC_STATUS:
384 		((struct sctp_prstatus *)arg)->sprstat_assoc_id = id;
385 		break;
386 	case SCTP_MAX_CWND:
387 		((struct sctp_assoc_value *)arg)->assoc_id = id;
388 		break;
389 	default:
390 		break;
391 	}
392 	return (getsockopt(sd, IPPROTO_SCTP, opt, arg, size));
393 }
394 
395 int
sctp_getpaddrs(int sd,sctp_assoc_t id,struct sockaddr ** raddrs)396 sctp_getpaddrs(int sd, sctp_assoc_t id, struct sockaddr **raddrs)
397 {
398 	struct sctp_getaddresses *addrs;
399 	struct sockaddr *sa;
400 	sctp_assoc_t asoc;
401 	caddr_t lim;
402 	socklen_t opt_len;
403 	int cnt;
404 
405 	if (raddrs == NULL) {
406 		errno = EFAULT;
407 		return (-1);
408 	}
409 	asoc = id;
410 	opt_len = (socklen_t) sizeof(sctp_assoc_t);
411 	if (getsockopt(sd, IPPROTO_SCTP, SCTP_GET_REMOTE_ADDR_SIZE,
412 	    &asoc, &opt_len) != 0) {
413 		return (-1);
414 	}
415 	/* size required is returned in 'asoc' */
416 	opt_len = (socklen_t) ((size_t)asoc + sizeof(sctp_assoc_t));
417 	addrs = calloc(1, (size_t)opt_len);
418 	if (addrs == NULL) {
419 		errno = ENOMEM;
420 		return (-1);
421 	}
422 	addrs->sget_assoc_id = id;
423 	/* Now lets get the array of addresses */
424 	if (getsockopt(sd, IPPROTO_SCTP, SCTP_GET_PEER_ADDRESSES,
425 	    addrs, &opt_len) != 0) {
426 		free(addrs);
427 		return (-1);
428 	}
429 	*raddrs = (struct sockaddr *)&addrs->addr[0];
430 	cnt = 0;
431 	sa = (struct sockaddr *)&addrs->addr[0];
432 	lim = (caddr_t)addrs + opt_len;
433 	while (((caddr_t)sa < lim) && (sa->sa_len > 0)) {
434 		sa = (struct sockaddr *)((caddr_t)sa + sa->sa_len);
435 		cnt++;
436 	}
437 	return (cnt);
438 }
439 
440 void
sctp_freepaddrs(struct sockaddr * addrs)441 sctp_freepaddrs(struct sockaddr *addrs)
442 {
443 	void *fr_addr;
444 
445 	/* Take away the hidden association id */
446 	fr_addr = (void *)((caddr_t)addrs - sizeof(sctp_assoc_t));
447 	/* Now free it */
448 	free(fr_addr);
449 }
450 
451 int
sctp_getladdrs(int sd,sctp_assoc_t id,struct sockaddr ** raddrs)452 sctp_getladdrs(int sd, sctp_assoc_t id, struct sockaddr **raddrs)
453 {
454 	struct sctp_getaddresses *addrs;
455 	caddr_t lim;
456 	struct sockaddr *sa;
457 	size_t size_of_addresses;
458 	socklen_t opt_len;
459 	int cnt;
460 
461 	if (raddrs == NULL) {
462 		errno = EFAULT;
463 		return (-1);
464 	}
465 	size_of_addresses = 0;
466 	opt_len = (socklen_t) sizeof(int);
467 	if (getsockopt(sd, IPPROTO_SCTP, SCTP_GET_LOCAL_ADDR_SIZE,
468 	    &size_of_addresses, &opt_len) != 0) {
469 		errno = ENOMEM;
470 		return (-1);
471 	}
472 	if (size_of_addresses == 0) {
473 		errno = ENOTCONN;
474 		return (-1);
475 	}
476 	opt_len = (socklen_t) (size_of_addresses + sizeof(sctp_assoc_t));
477 	addrs = calloc(1, (size_t)opt_len);
478 	if (addrs == NULL) {
479 		errno = ENOMEM;
480 		return (-1);
481 	}
482 	addrs->sget_assoc_id = id;
483 	/* Now lets get the array of addresses */
484 	if (getsockopt(sd, IPPROTO_SCTP, SCTP_GET_LOCAL_ADDRESSES, addrs,
485 	    &opt_len) != 0) {
486 		free(addrs);
487 		errno = ENOMEM;
488 		return (-1);
489 	}
490 	*raddrs = (struct sockaddr *)&addrs->addr[0];
491 	cnt = 0;
492 	sa = (struct sockaddr *)&addrs->addr[0];
493 	lim = (caddr_t)addrs + opt_len;
494 	while (((caddr_t)sa < lim) && (sa->sa_len > 0)) {
495 		sa = (struct sockaddr *)((caddr_t)sa + sa->sa_len);
496 		cnt++;
497 	}
498 	return (cnt);
499 }
500 
501 void
sctp_freeladdrs(struct sockaddr * addrs)502 sctp_freeladdrs(struct sockaddr *addrs)
503 {
504 	void *fr_addr;
505 
506 	/* Take away the hidden association id */
507 	fr_addr = (void *)((caddr_t)addrs - sizeof(sctp_assoc_t));
508 	/* Now free it */
509 	free(fr_addr);
510 }
511 
512 ssize_t
sctp_sendmsg(int s,const void * data,size_t len,const struct sockaddr * to,socklen_t tolen,uint32_t ppid,uint32_t flags,uint16_t stream_no,uint32_t timetolive,uint32_t context)513 sctp_sendmsg(int s,
514     const void *data,
515     size_t len,
516     const struct sockaddr *to,
517     socklen_t tolen,
518     uint32_t ppid,
519     uint32_t flags,
520     uint16_t stream_no,
521     uint32_t timetolive,
522     uint32_t context)
523 {
524 #ifdef SYS_sctp_generic_sendmsg
525 	struct sctp_sndrcvinfo sinfo;
526 
527 	memset(&sinfo, 0, sizeof(struct sctp_sndrcvinfo));
528 	sinfo.sinfo_ppid = ppid;
529 	sinfo.sinfo_flags = flags;
530 	sinfo.sinfo_stream = stream_no;
531 	sinfo.sinfo_timetolive = timetolive;
532 	sinfo.sinfo_context = context;
533 	sinfo.sinfo_assoc_id = 0;
534 	return (syscall(SYS_sctp_generic_sendmsg, s,
535 	    data, len, to, tolen, &sinfo, 0));
536 #else
537 	struct msghdr msg;
538 	struct sctp_sndrcvinfo *sinfo;
539 	struct iovec iov;
540 	char cmsgbuf[CMSG_SPACE(sizeof(struct sctp_sndrcvinfo))];
541 	struct cmsghdr *cmsg;
542 	struct sockaddr *who = NULL;
543 	union {
544 		struct sockaddr_in in;
545 		struct sockaddr_in6 in6;
546 	}     addr;
547 
548 	if ((tolen > 0) &&
549 	    ((to == NULL) || (tolen < sizeof(struct sockaddr)))) {
550 		errno = EINVAL;
551 		return (-1);
552 	}
553 	if ((to != NULL) && (tolen > 0)) {
554 		switch (to->sa_family) {
555 		case AF_INET:
556 			if (tolen != sizeof(struct sockaddr_in)) {
557 				errno = EINVAL;
558 				return (-1);
559 			}
560 			if ((to->sa_len > 0) &&
561 			    (to->sa_len != sizeof(struct sockaddr_in))) {
562 				errno = EINVAL;
563 				return (-1);
564 			}
565 			memcpy(&addr, to, sizeof(struct sockaddr_in));
566 			addr.in.sin_len = sizeof(struct sockaddr_in);
567 			break;
568 		case AF_INET6:
569 			if (tolen != sizeof(struct sockaddr_in6)) {
570 				errno = EINVAL;
571 				return (-1);
572 			}
573 			if ((to->sa_len > 0) &&
574 			    (to->sa_len != sizeof(struct sockaddr_in6))) {
575 				errno = EINVAL;
576 				return (-1);
577 			}
578 			memcpy(&addr, to, sizeof(struct sockaddr_in6));
579 			addr.in6.sin6_len = sizeof(struct sockaddr_in6);
580 			break;
581 		default:
582 			errno = EAFNOSUPPORT;
583 			return (-1);
584 		}
585 		who = (struct sockaddr *)&addr;
586 	}
587 	iov.iov_base = (char *)data;
588 	iov.iov_len = len;
589 
590 	if (who) {
591 		msg.msg_name = (caddr_t)who;
592 		msg.msg_namelen = who->sa_len;
593 	} else {
594 		msg.msg_name = (caddr_t)NULL;
595 		msg.msg_namelen = 0;
596 	}
597 	msg.msg_iov = &iov;
598 	msg.msg_iovlen = 1;
599 	msg.msg_control = cmsgbuf;
600 	msg.msg_controllen = CMSG_SPACE(sizeof(struct sctp_sndrcvinfo));
601 	msg.msg_flags = 0;
602 	cmsg = (struct cmsghdr *)cmsgbuf;
603 	cmsg->cmsg_level = IPPROTO_SCTP;
604 	cmsg->cmsg_type = SCTP_SNDRCV;
605 	cmsg->cmsg_len = CMSG_LEN(sizeof(struct sctp_sndrcvinfo));
606 	sinfo = (struct sctp_sndrcvinfo *)CMSG_DATA(cmsg);
607 	memset(sinfo, 0, sizeof(struct sctp_sndrcvinfo));
608 	sinfo->sinfo_stream = stream_no;
609 	sinfo->sinfo_ssn = 0;
610 	sinfo->sinfo_flags = flags;
611 	sinfo->sinfo_ppid = ppid;
612 	sinfo->sinfo_context = context;
613 	sinfo->sinfo_assoc_id = 0;
614 	sinfo->sinfo_timetolive = timetolive;
615 	return (sendmsg(s, &msg, 0));
616 #endif
617 }
618 
619 
620 sctp_assoc_t
sctp_getassocid(int sd,struct sockaddr * sa)621 sctp_getassocid(int sd, struct sockaddr *sa)
622 {
623 	struct sctp_paddrinfo sp;
624 	socklen_t siz;
625 
626 	/* First get the assoc id */
627 	siz = sizeof(sp);
628 	memset(&sp, 0, sizeof(sp));
629 	memcpy((caddr_t)&sp.spinfo_address, sa, sa->sa_len);
630 	if (getsockopt(sd, IPPROTO_SCTP,
631 	    SCTP_GET_PEER_ADDR_INFO, &sp, &siz) != 0) {
632 		/* We depend on the fact that 0 can never be returned */
633 		return ((sctp_assoc_t) 0);
634 	}
635 	return (sp.spinfo_assoc_id);
636 }
637 
638 ssize_t
sctp_send(int sd,const void * data,size_t len,const struct sctp_sndrcvinfo * sinfo,int flags)639 sctp_send(int sd, const void *data, size_t len,
640     const struct sctp_sndrcvinfo *sinfo,
641     int flags)
642 {
643 
644 #ifdef SYS_sctp_generic_sendmsg
645 	struct sockaddr *to = NULL;
646 
647 	return (syscall(SYS_sctp_generic_sendmsg, sd,
648 	    data, len, to, 0, sinfo, flags));
649 #else
650 	struct msghdr msg;
651 	struct iovec iov;
652 	char cmsgbuf[CMSG_SPACE(sizeof(struct sctp_sndrcvinfo))];
653 	struct cmsghdr *cmsg;
654 
655 	if (sinfo == NULL) {
656 		errno = EINVAL;
657 		return (-1);
658 	}
659 	iov.iov_base = (char *)data;
660 	iov.iov_len = len;
661 
662 	msg.msg_name = NULL;
663 	msg.msg_namelen = 0;
664 	msg.msg_iov = &iov;
665 	msg.msg_iovlen = 1;
666 	msg.msg_control = cmsgbuf;
667 	msg.msg_controllen = CMSG_SPACE(sizeof(struct sctp_sndrcvinfo));
668 	msg.msg_flags = 0;
669 	cmsg = (struct cmsghdr *)cmsgbuf;
670 	cmsg->cmsg_level = IPPROTO_SCTP;
671 	cmsg->cmsg_type = SCTP_SNDRCV;
672 	cmsg->cmsg_len = CMSG_LEN(sizeof(struct sctp_sndrcvinfo));
673 	memcpy(CMSG_DATA(cmsg), sinfo, sizeof(struct sctp_sndrcvinfo));
674 	return (sendmsg(sd, &msg, flags));
675 #endif
676 }
677 
678 
679 
680 ssize_t
sctp_sendx(int sd,const void * msg,size_t msg_len,struct sockaddr * addrs,int addrcnt,struct sctp_sndrcvinfo * sinfo,int flags)681 sctp_sendx(int sd, const void *msg, size_t msg_len,
682     struct sockaddr *addrs, int addrcnt,
683     struct sctp_sndrcvinfo *sinfo,
684     int flags)
685 {
686 	struct sctp_sndrcvinfo __sinfo;
687 	ssize_t ret;
688 	int i, cnt, *aa, saved_errno;
689 	char *buf;
690 	int no_end_cx = 0;
691 	size_t len, add_len;
692 	struct sockaddr *at;
693 
694 	if (addrs == NULL) {
695 		errno = EINVAL;
696 		return (-1);
697 	}
698 #ifdef SYS_sctp_generic_sendmsg
699 	if (addrcnt == 1) {
700 		socklen_t l;
701 		ssize_t ret;
702 
703 		/*
704 		 * Quick way, we don't need to do a connectx so lets use the
705 		 * syscall directly.
706 		 */
707 		l = addrs->sa_len;
708 		ret = syscall(SYS_sctp_generic_sendmsg, sd,
709 		    msg, msg_len, addrs, l, sinfo, flags);
710 		if ((ret >= 0) && (sinfo != NULL)) {
711 			sinfo->sinfo_assoc_id = sctp_getassocid(sd, addrs);
712 		}
713 		return (ret);
714 	}
715 #endif
716 
717 	len = sizeof(int);
718 	at = addrs;
719 	cnt = 0;
720 	/* validate all the addresses and get the size */
721 	for (i = 0; i < addrcnt; i++) {
722 		if (at->sa_family == AF_INET) {
723 			add_len = sizeof(struct sockaddr_in);
724 		} else if (at->sa_family == AF_INET6) {
725 			add_len = sizeof(struct sockaddr_in6);
726 		} else {
727 			errno = EINVAL;
728 			return (-1);
729 		}
730 		len += add_len;
731 		at = (struct sockaddr *)((caddr_t)at + add_len);
732 		cnt++;
733 	}
734 	/* do we have any? */
735 	if (cnt == 0) {
736 		errno = EINVAL;
737 		return (-1);
738 	}
739 	buf = malloc(len);
740 	if (buf == NULL) {
741 		errno = ENOMEM;
742 		return (-1);
743 	}
744 	aa = (int *)buf;
745 	*aa = cnt;
746 	aa++;
747 	memcpy((caddr_t)aa, addrs, (size_t)(len - sizeof(int)));
748 	ret = setsockopt(sd, IPPROTO_SCTP, SCTP_CONNECT_X_DELAYED, (void *)buf,
749 	    (socklen_t) len);
750 
751 	free(buf);
752 	if (ret != 0) {
753 		if (errno == EALREADY) {
754 			no_end_cx = 1;
755 			goto continue_send;
756 		}
757 		return (ret);
758 	}
759 continue_send:
760 	if (sinfo == NULL) {
761 		sinfo = &__sinfo;
762 		memset(&__sinfo, 0, sizeof(__sinfo));
763 	}
764 	sinfo->sinfo_assoc_id = sctp_getassocid(sd, addrs);
765 	if (sinfo->sinfo_assoc_id == 0) {
766 		(void)setsockopt(sd, IPPROTO_SCTP, SCTP_CONNECT_X_COMPLETE, (void *)addrs,
767 		    (socklen_t) addrs->sa_len);
768 		errno = ENOENT;
769 		return (-1);
770 	}
771 	ret = sctp_send(sd, msg, msg_len, sinfo, flags);
772 	saved_errno = errno;
773 	if (no_end_cx == 0)
774 		(void)setsockopt(sd, IPPROTO_SCTP, SCTP_CONNECT_X_COMPLETE, (void *)addrs,
775 		    (socklen_t) addrs->sa_len);
776 
777 	errno = saved_errno;
778 	return (ret);
779 }
780 
781 ssize_t
sctp_sendmsgx(int sd,const void * msg,size_t len,struct sockaddr * addrs,int addrcnt,uint32_t ppid,uint32_t flags,uint16_t stream_no,uint32_t timetolive,uint32_t context)782 sctp_sendmsgx(int sd,
783     const void *msg,
784     size_t len,
785     struct sockaddr *addrs,
786     int addrcnt,
787     uint32_t ppid,
788     uint32_t flags,
789     uint16_t stream_no,
790     uint32_t timetolive,
791     uint32_t context)
792 {
793 	struct sctp_sndrcvinfo sinfo;
794 
795 	memset((void *)&sinfo, 0, sizeof(struct sctp_sndrcvinfo));
796 	sinfo.sinfo_ppid = ppid;
797 	sinfo.sinfo_flags = flags;
798 	sinfo.sinfo_stream = stream_no;
799 	sinfo.sinfo_timetolive = timetolive;
800 	sinfo.sinfo_context = context;
801 	return (sctp_sendx(sd, msg, len, addrs, addrcnt, &sinfo, 0));
802 }
803 
804 ssize_t
sctp_recvmsg(int s,void * dbuf,size_t len,struct sockaddr * from,socklen_t * fromlen,struct sctp_sndrcvinfo * sinfo,int * msg_flags)805 sctp_recvmsg(int s,
806     void *dbuf,
807     size_t len,
808     struct sockaddr *from,
809     socklen_t * fromlen,
810     struct sctp_sndrcvinfo *sinfo,
811     int *msg_flags)
812 {
813 #ifdef SYS_sctp_generic_recvmsg
814 	struct iovec iov;
815 
816 	iov.iov_base = dbuf;
817 	iov.iov_len = len;
818 	return (syscall(SYS_sctp_generic_recvmsg, s,
819 	    &iov, 1, from, fromlen, sinfo, msg_flags));
820 #else
821 	ssize_t sz;
822 	struct msghdr msg;
823 	struct iovec iov;
824 	char cmsgbuf[SCTP_CONTROL_VEC_SIZE_RCV];
825 	struct cmsghdr *cmsg;
826 
827 	if (msg_flags == NULL) {
828 		errno = EINVAL;
829 		return (-1);
830 	}
831 	iov.iov_base = dbuf;
832 	iov.iov_len = len;
833 	msg.msg_name = (caddr_t)from;
834 	if (fromlen == NULL)
835 		msg.msg_namelen = 0;
836 	else
837 		msg.msg_namelen = *fromlen;
838 	msg.msg_iov = &iov;
839 	msg.msg_iovlen = 1;
840 	msg.msg_control = cmsgbuf;
841 	msg.msg_controllen = sizeof(cmsgbuf);
842 	msg.msg_flags = 0;
843 	sz = recvmsg(s, &msg, *msg_flags);
844 	*msg_flags = msg.msg_flags;
845 	if (sz <= 0) {
846 		return (sz);
847 	}
848 	if (sinfo) {
849 		sinfo->sinfo_assoc_id = 0;
850 	}
851 	if ((msg.msg_controllen > 0) && (sinfo != NULL)) {
852 		/*
853 		 * parse through and see if we find the sctp_sndrcvinfo (if
854 		 * the user wants it).
855 		 */
856 		for (cmsg = CMSG_FIRSTHDR(&msg); cmsg; cmsg = CMSG_NXTHDR(&msg, cmsg)) {
857 			if (cmsg->cmsg_level != IPPROTO_SCTP) {
858 				continue;
859 			}
860 			if (cmsg->cmsg_type == SCTP_SNDRCV) {
861 				memcpy(sinfo, CMSG_DATA(cmsg), sizeof(struct sctp_sndrcvinfo));
862 				break;
863 			}
864 			if (cmsg->cmsg_type == SCTP_EXTRCV) {
865 				/*
866 				 * Let's hope that the user provided enough
867 				 * enough memory. At least he asked for more
868 				 * information.
869 				 */
870 				memcpy(sinfo, CMSG_DATA(cmsg), sizeof(struct sctp_extrcvinfo));
871 				break;
872 			}
873 		}
874 	}
875 	return (sz);
876 #endif
877 }
878 
879 ssize_t
sctp_recvv(int sd,const struct iovec * iov,int iovlen,struct sockaddr * from,socklen_t * fromlen,void * info,socklen_t * infolen,unsigned int * infotype,int * flags)880 sctp_recvv(int sd,
881     const struct iovec *iov,
882     int iovlen,
883     struct sockaddr *from,
884     socklen_t * fromlen,
885     void *info,
886     socklen_t * infolen,
887     unsigned int *infotype,
888     int *flags)
889 {
890 	char cmsgbuf[SCTP_CONTROL_VEC_SIZE_RCV];
891 	struct msghdr msg;
892 	struct cmsghdr *cmsg;
893 	ssize_t ret;
894 	struct sctp_rcvinfo *rcvinfo;
895 	struct sctp_nxtinfo *nxtinfo;
896 
897 	if (((info != NULL) && (infolen == NULL)) ||
898 	    ((info == NULL) && (infolen != NULL) && (*infolen != 0)) ||
899 	    ((info != NULL) && (infotype == NULL))) {
900 		errno = EINVAL;
901 		return (-1);
902 	}
903 	if (infotype) {
904 		*infotype = SCTP_RECVV_NOINFO;
905 	}
906 	msg.msg_name = from;
907 	if (fromlen == NULL) {
908 		msg.msg_namelen = 0;
909 	} else {
910 		msg.msg_namelen = *fromlen;
911 	}
912 	msg.msg_iov = (struct iovec *)iov;
913 	msg.msg_iovlen = iovlen;
914 	msg.msg_control = cmsgbuf;
915 	msg.msg_controllen = sizeof(cmsgbuf);
916 	msg.msg_flags = 0;
917 	ret = recvmsg(sd, &msg, *flags);
918 	*flags = msg.msg_flags;
919 	if ((ret > 0) &&
920 	    (msg.msg_controllen > 0) &&
921 	    (infotype != NULL) &&
922 	    (infolen != NULL) &&
923 	    (*infolen > 0)) {
924 		rcvinfo = NULL;
925 		nxtinfo = NULL;
926 		for (cmsg = CMSG_FIRSTHDR(&msg); cmsg; cmsg = CMSG_NXTHDR(&msg, cmsg)) {
927 			if (cmsg->cmsg_level != IPPROTO_SCTP) {
928 				continue;
929 			}
930 			if (cmsg->cmsg_type == SCTP_RCVINFO) {
931 				rcvinfo = (struct sctp_rcvinfo *)CMSG_DATA(cmsg);
932 				if (nxtinfo != NULL) {
933 					break;
934 				} else {
935 					continue;
936 				}
937 			}
938 			if (cmsg->cmsg_type == SCTP_NXTINFO) {
939 				nxtinfo = (struct sctp_nxtinfo *)CMSG_DATA(cmsg);
940 				if (rcvinfo != NULL) {
941 					break;
942 				} else {
943 					continue;
944 				}
945 			}
946 		}
947 		if (rcvinfo != NULL) {
948 			if ((nxtinfo != NULL) && (*infolen >= sizeof(struct sctp_recvv_rn))) {
949 				struct sctp_recvv_rn *rn_info;
950 
951 				rn_info = (struct sctp_recvv_rn *)info;
952 				rn_info->recvv_rcvinfo = *rcvinfo;
953 				rn_info->recvv_nxtinfo = *nxtinfo;
954 				*infolen = (socklen_t) sizeof(struct sctp_recvv_rn);
955 				*infotype = SCTP_RECVV_RN;
956 			} else if (*infolen >= sizeof(struct sctp_rcvinfo)) {
957 				memcpy(info, rcvinfo, sizeof(struct sctp_rcvinfo));
958 				*infolen = (socklen_t) sizeof(struct sctp_rcvinfo);
959 				*infotype = SCTP_RECVV_RCVINFO;
960 			}
961 		} else if (nxtinfo != NULL) {
962 			if (*infolen >= sizeof(struct sctp_nxtinfo)) {
963 				memcpy(info, nxtinfo, sizeof(struct sctp_nxtinfo));
964 				*infolen = (socklen_t) sizeof(struct sctp_nxtinfo);
965 				*infotype = SCTP_RECVV_NXTINFO;
966 			}
967 		}
968 	}
969 	return (ret);
970 }
971 
972 ssize_t
sctp_sendv(int sd,const struct iovec * iov,int iovcnt,struct sockaddr * addrs,int addrcnt,void * info,socklen_t infolen,unsigned int infotype,int flags)973 sctp_sendv(int sd,
974     const struct iovec *iov, int iovcnt,
975     struct sockaddr *addrs, int addrcnt,
976     void *info, socklen_t infolen, unsigned int infotype,
977     int flags)
978 {
979 	ssize_t ret;
980 	int i;
981 	socklen_t addr_len;
982 	struct msghdr msg;
983 	in_port_t port;
984 	struct sctp_sendv_spa *spa_info;
985 	struct cmsghdr *cmsg;
986 	char *cmsgbuf;
987 	struct sockaddr *addr;
988 	struct sockaddr_in *addr_in;
989 	struct sockaddr_in6 *addr_in6;
990 	sctp_assoc_t *assoc_id;
991 
992 	if ((addrcnt < 0) ||
993 	    (iovcnt < 0) ||
994 	    ((addrs == NULL) && (addrcnt > 0)) ||
995 	    ((addrs != NULL) && (addrcnt == 0)) ||
996 	    ((iov == NULL) && (iovcnt > 0)) ||
997 	    ((iov != NULL) && (iovcnt == 0))) {
998 		errno = EINVAL;
999 		return (-1);
1000 	}
1001 	cmsgbuf = malloc(CMSG_SPACE(sizeof(struct sctp_sndinfo)) +
1002 	    CMSG_SPACE(sizeof(struct sctp_prinfo)) +
1003 	    CMSG_SPACE(sizeof(struct sctp_authinfo)) +
1004 	    (size_t)addrcnt * CMSG_SPACE(sizeof(struct in6_addr)));
1005 	if (cmsgbuf == NULL) {
1006 		errno = ENOMEM;
1007 		return (-1);
1008 	}
1009 	assoc_id = NULL;
1010 	msg.msg_control = cmsgbuf;
1011 	msg.msg_controllen = 0;
1012 	cmsg = (struct cmsghdr *)cmsgbuf;
1013 	switch (infotype) {
1014 	case SCTP_SENDV_NOINFO:
1015 		if ((infolen != 0) || (info != NULL)) {
1016 			free(cmsgbuf);
1017 			errno = EINVAL;
1018 			return (-1);
1019 		}
1020 		break;
1021 	case SCTP_SENDV_SNDINFO:
1022 		if ((info == NULL) || (infolen < sizeof(struct sctp_sndinfo))) {
1023 			free(cmsgbuf);
1024 			errno = EINVAL;
1025 			return (-1);
1026 		}
1027 		cmsg->cmsg_level = IPPROTO_SCTP;
1028 		cmsg->cmsg_type = SCTP_SNDINFO;
1029 		cmsg->cmsg_len = CMSG_LEN(sizeof(struct sctp_sndinfo));
1030 		memcpy(CMSG_DATA(cmsg), info, sizeof(struct sctp_sndinfo));
1031 		msg.msg_controllen += CMSG_SPACE(sizeof(struct sctp_sndinfo));
1032 		cmsg = (struct cmsghdr *)((caddr_t)cmsg + CMSG_SPACE(sizeof(struct sctp_sndinfo)));
1033 		assoc_id = &(((struct sctp_sndinfo *)info)->snd_assoc_id);
1034 		break;
1035 	case SCTP_SENDV_PRINFO:
1036 		if ((info == NULL) || (infolen < sizeof(struct sctp_prinfo))) {
1037 			free(cmsgbuf);
1038 			errno = EINVAL;
1039 			return (-1);
1040 		}
1041 		cmsg->cmsg_level = IPPROTO_SCTP;
1042 		cmsg->cmsg_type = SCTP_PRINFO;
1043 		cmsg->cmsg_len = CMSG_LEN(sizeof(struct sctp_prinfo));
1044 		memcpy(CMSG_DATA(cmsg), info, sizeof(struct sctp_prinfo));
1045 		msg.msg_controllen += CMSG_SPACE(sizeof(struct sctp_prinfo));
1046 		cmsg = (struct cmsghdr *)((caddr_t)cmsg + CMSG_SPACE(sizeof(struct sctp_prinfo)));
1047 		break;
1048 	case SCTP_SENDV_AUTHINFO:
1049 		if ((info == NULL) || (infolen < sizeof(struct sctp_authinfo))) {
1050 			free(cmsgbuf);
1051 			errno = EINVAL;
1052 			return (-1);
1053 		}
1054 		cmsg->cmsg_level = IPPROTO_SCTP;
1055 		cmsg->cmsg_type = SCTP_AUTHINFO;
1056 		cmsg->cmsg_len = CMSG_LEN(sizeof(struct sctp_authinfo));
1057 		memcpy(CMSG_DATA(cmsg), info, sizeof(struct sctp_authinfo));
1058 		msg.msg_controllen += CMSG_SPACE(sizeof(struct sctp_authinfo));
1059 		cmsg = (struct cmsghdr *)((caddr_t)cmsg + CMSG_SPACE(sizeof(struct sctp_authinfo)));
1060 		break;
1061 	case SCTP_SENDV_SPA:
1062 		if ((info == NULL) || (infolen < sizeof(struct sctp_sendv_spa))) {
1063 			free(cmsgbuf);
1064 			errno = EINVAL;
1065 			return (-1);
1066 		}
1067 		spa_info = (struct sctp_sendv_spa *)info;
1068 		if (spa_info->sendv_flags & SCTP_SEND_SNDINFO_VALID) {
1069 			cmsg->cmsg_level = IPPROTO_SCTP;
1070 			cmsg->cmsg_type = SCTP_SNDINFO;
1071 			cmsg->cmsg_len = CMSG_LEN(sizeof(struct sctp_sndinfo));
1072 			memcpy(CMSG_DATA(cmsg), &spa_info->sendv_sndinfo, sizeof(struct sctp_sndinfo));
1073 			msg.msg_controllen += CMSG_SPACE(sizeof(struct sctp_sndinfo));
1074 			cmsg = (struct cmsghdr *)((caddr_t)cmsg + CMSG_SPACE(sizeof(struct sctp_sndinfo)));
1075 			assoc_id = &(spa_info->sendv_sndinfo.snd_assoc_id);
1076 		}
1077 		if (spa_info->sendv_flags & SCTP_SEND_PRINFO_VALID) {
1078 			cmsg->cmsg_level = IPPROTO_SCTP;
1079 			cmsg->cmsg_type = SCTP_PRINFO;
1080 			cmsg->cmsg_len = CMSG_LEN(sizeof(struct sctp_prinfo));
1081 			memcpy(CMSG_DATA(cmsg), &spa_info->sendv_prinfo, sizeof(struct sctp_prinfo));
1082 			msg.msg_controllen += CMSG_SPACE(sizeof(struct sctp_prinfo));
1083 			cmsg = (struct cmsghdr *)((caddr_t)cmsg + CMSG_SPACE(sizeof(struct sctp_prinfo)));
1084 		}
1085 		if (spa_info->sendv_flags & SCTP_SEND_AUTHINFO_VALID) {
1086 			cmsg->cmsg_level = IPPROTO_SCTP;
1087 			cmsg->cmsg_type = SCTP_AUTHINFO;
1088 			cmsg->cmsg_len = CMSG_LEN(sizeof(struct sctp_authinfo));
1089 			memcpy(CMSG_DATA(cmsg), &spa_info->sendv_authinfo, sizeof(struct sctp_authinfo));
1090 			msg.msg_controllen += CMSG_SPACE(sizeof(struct sctp_authinfo));
1091 			cmsg = (struct cmsghdr *)((caddr_t)cmsg + CMSG_SPACE(sizeof(struct sctp_authinfo)));
1092 		}
1093 		break;
1094 	default:
1095 		free(cmsgbuf);
1096 		errno = EINVAL;
1097 		return (-1);
1098 	}
1099 	addr = addrs;
1100 	msg.msg_name = NULL;
1101 	msg.msg_namelen = 0;
1102 
1103 	for (i = 0; i < addrcnt; i++) {
1104 		switch (addr->sa_family) {
1105 		case AF_INET:
1106 			addr_len = (socklen_t) sizeof(struct sockaddr_in);
1107 			addr_in = (struct sockaddr_in *)addr;
1108 			if (addr_in->sin_len != addr_len) {
1109 				free(cmsgbuf);
1110 				errno = EINVAL;
1111 				return (-1);
1112 			}
1113 			if (i == 0) {
1114 				port = addr_in->sin_port;
1115 			} else {
1116 				if (port == addr_in->sin_port) {
1117 					cmsg->cmsg_level = IPPROTO_SCTP;
1118 					cmsg->cmsg_type = SCTP_DSTADDRV4;
1119 					cmsg->cmsg_len = CMSG_LEN(sizeof(struct in_addr));
1120 					memcpy(CMSG_DATA(cmsg), &addr_in->sin_addr, sizeof(struct in_addr));
1121 					msg.msg_controllen += CMSG_SPACE(sizeof(struct in_addr));
1122 					cmsg = (struct cmsghdr *)((caddr_t)cmsg + CMSG_SPACE(sizeof(struct in_addr)));
1123 				} else {
1124 					free(cmsgbuf);
1125 					errno = EINVAL;
1126 					return (-1);
1127 				}
1128 			}
1129 			break;
1130 		case AF_INET6:
1131 			addr_len = (socklen_t) sizeof(struct sockaddr_in6);
1132 			addr_in6 = (struct sockaddr_in6 *)addr;
1133 			if (addr_in6->sin6_len != addr_len) {
1134 				free(cmsgbuf);
1135 				errno = EINVAL;
1136 				return (-1);
1137 			}
1138 			if (i == 0) {
1139 				port = addr_in6->sin6_port;
1140 			} else {
1141 				if (port == addr_in6->sin6_port) {
1142 					cmsg->cmsg_level = IPPROTO_SCTP;
1143 					cmsg->cmsg_type = SCTP_DSTADDRV6;
1144 					cmsg->cmsg_len = CMSG_LEN(sizeof(struct in6_addr));
1145 					memcpy(CMSG_DATA(cmsg), &addr_in6->sin6_addr, sizeof(struct in6_addr));
1146 					msg.msg_controllen += CMSG_SPACE(sizeof(struct in6_addr));
1147 					cmsg = (struct cmsghdr *)((caddr_t)cmsg + CMSG_SPACE(sizeof(struct in6_addr)));
1148 				} else {
1149 					free(cmsgbuf);
1150 					errno = EINVAL;
1151 					return (-1);
1152 				}
1153 			}
1154 			break;
1155 		default:
1156 			free(cmsgbuf);
1157 			errno = EINVAL;
1158 			return (-1);
1159 		}
1160 		if (i == 0) {
1161 			msg.msg_name = addr;
1162 			msg.msg_namelen = addr_len;
1163 		}
1164 		addr = (struct sockaddr *)((caddr_t)addr + addr_len);
1165 	}
1166 	if (msg.msg_controllen == 0) {
1167 		msg.msg_control = NULL;
1168 	}
1169 	msg.msg_iov = (struct iovec *)iov;
1170 	msg.msg_iovlen = iovcnt;
1171 	msg.msg_flags = 0;
1172 	ret = sendmsg(sd, &msg, flags);
1173 	free(cmsgbuf);
1174 	if ((ret >= 0) && (addrs != NULL) && (assoc_id != NULL)) {
1175 		*assoc_id = sctp_getassocid(sd, addrs);
1176 	}
1177 	return (ret);
1178 }
1179 
1180 
1181 #if !defined(SYS_sctp_peeloff) && !defined(HAVE_SCTP_PEELOFF_SOCKOPT)
1182 
1183 int
sctp_peeloff(int sd,sctp_assoc_t assoc_id)1184 sctp_peeloff(int sd, sctp_assoc_t assoc_id)
1185 {
1186 	/* NOT supported, return invalid sd */
1187 	errno = ENOTSUP;
1188 	return (-1);
1189 }
1190 
1191 #endif
1192 #if defined(SYS_sctp_peeloff) && !defined(HAVE_SCTP_PEELOFF_SOCKOPT)
1193 int
sctp_peeloff(int sd,sctp_assoc_t assoc_id)1194 sctp_peeloff(int sd, sctp_assoc_t assoc_id)
1195 {
1196 	return (syscall(SYS_sctp_peeloff, sd, assoc_id));
1197 }
1198 
1199 #endif
1200 
1201 #undef SCTP_CONTROL_VEC_SIZE_RCV
1202