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