1/*-
2 * Copyright (c) 1982, 1986, 1989, 1990, 1993
3 *	The Regents of the University of California.  All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 *    notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 *    notice, this list of conditions and the following disclaimer in the
12 *    documentation and/or other materials provided with the distribution.
13 * 3. Neither the name of the University nor the names of its contributors
14 *    may be used to endorse or promote products derived from this software
15 *    without specific prior written permission.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 * SUCH DAMAGE.
28 *
29 */
30
31#include <sys/cdefs.h>
32__FBSDID("$FreeBSD$");
33
34#include "opt_capsicum.h"
35#include "opt_sctp.h"
36#include "opt_ktrace.h"
37
38#include <sys/param.h>
39#include <sys/systm.h>
40#include <sys/capsicum.h>
41#include <sys/kernel.h>
42#include <sys/lock.h>
43#include <sys/mutex.h>
44#include <sys/sysproto.h>
45#include <sys/malloc.h>
46#include <sys/filedesc.h>
47#include <sys/event.h>
48#include <sys/proc.h>
49#include <sys/fcntl.h>
50#include <sys/file.h>
51#include <sys/filio.h>
52#include <sys/jail.h>
53#include <sys/mount.h>
54#include <sys/mbuf.h>
55#include <sys/protosw.h>
56#include <sys/sf_buf.h>
57#include <sys/sysent.h>
58#include <sys/socket.h>
59#include <sys/socketvar.h>
60#include <sys/signalvar.h>
61#include <sys/syscall.h>
62#include <sys/syscallsubr.h>
63#include <sys/sysctl.h>
64#include <sys/uio.h>
65#include <sys/vnode.h>
66#ifdef KTRACE
67#include <sys/ktrace.h>
68#endif
69#ifdef COMPAT_FREEBSD32
70#include <compat/freebsd32/freebsd32.h>
71#include <compat/freebsd32/freebsd32_syscall.h>
72#include <compat/freebsd32/freebsd32_util.h>
73#endif
74
75#include <net/vnet.h>
76
77#include <security/audit/audit.h>
78#include <security/mac/mac_framework.h>
79
80#include <netinet/sctp.h>
81#include <netinet/sctp_os_bsd.h>
82#include <netinet/sctp_peeloff.h>
83
84static struct syscall_helper_data sctp_syscalls[] = {
85	SYSCALL_INIT_HELPER_F(sctp_peeloff, SYF_CAPENABLED),
86	SYSCALL_INIT_HELPER_F(sctp_generic_sendmsg, SYF_CAPENABLED),
87	SYSCALL_INIT_HELPER_F(sctp_generic_sendmsg_iov, SYF_CAPENABLED),
88	SYSCALL_INIT_HELPER_F(sctp_generic_recvmsg, SYF_CAPENABLED),
89	SYSCALL_INIT_LAST
90};
91
92#ifdef COMPAT_FREEBSD32
93static struct syscall_helper_data sctp32_syscalls[] = {
94	SYSCALL32_INIT_HELPER_COMPAT(sctp_peeloff),
95	SYSCALL32_INIT_HELPER_COMPAT(sctp_generic_sendmsg),
96	SYSCALL32_INIT_HELPER_COMPAT(sctp_generic_sendmsg_iov),
97	SYSCALL32_INIT_HELPER_COMPAT(sctp_generic_recvmsg),
98	SYSCALL_INIT_LAST
99};
100#endif
101
102int
103sctp_syscalls_init(void)
104{
105	int error;
106
107	error = syscall_helper_register(sctp_syscalls, SY_THR_STATIC_KLD);
108	if (error != 0)
109		return (error);
110#ifdef COMPAT_FREEBSD32
111	error = syscall32_helper_register(sctp32_syscalls, SY_THR_STATIC_KLD);
112	if (error != 0)
113		return (error);
114#endif
115	return (0);
116}
117
118#ifdef SCTP
119SYSINIT(sctp_syscalls, SI_SUB_SYSCALLS, SI_ORDER_ANY, sctp_syscalls_init, NULL);
120#endif
121
122int
123sctp_syscalls_uninit(void)
124{
125	int error;
126
127#ifdef COMPAT_FREEBSD32
128	error = syscall32_helper_unregister(sctp32_syscalls);
129	if (error != 0)
130		return (error);
131#endif
132	error = syscall_helper_unregister(sctp_syscalls);
133	if (error != 0)
134		return (error);
135	return (0);
136}
137
138/*
139 * SCTP syscalls.
140 */
141int
142sys_sctp_peeloff(td, uap)
143	struct thread *td;
144	struct sctp_peeloff_args /* {
145		int	sd;
146		caddr_t	name;
147	} */ *uap;
148{
149	struct file *headfp, *nfp = NULL;
150	struct socket *head, *so;
151	cap_rights_t rights;
152	u_int fflag;
153	int error, fd;
154
155	AUDIT_ARG_FD(uap->sd);
156	error = getsock_cap(td, uap->sd, cap_rights_init_one(&rights, CAP_PEELOFF),
157	    &headfp, &fflag, NULL);
158	if (error != 0)
159		goto done2;
160	head = headfp->f_data;
161	if (head->so_proto->pr_protocol != IPPROTO_SCTP) {
162		error = EOPNOTSUPP;
163		goto done;
164	}
165	error = sctp_can_peel_off(head, (sctp_assoc_t)uap->name);
166	if (error != 0)
167		goto done;
168	/*
169	 * At this point we know we do have a assoc to pull
170	 * we proceed to get the fd setup. This may block
171	 * but that is ok.
172	 */
173
174	error = falloc(td, &nfp, &fd, 0);
175	if (error != 0)
176		goto done;
177	td->td_retval[0] = fd;
178
179	CURVNET_SET(head->so_vnet);
180	so = sopeeloff(head);
181	if (so == NULL) {
182		error = ENOMEM;
183		goto noconnection;
184	}
185	finit(nfp, fflag, DTYPE_SOCKET, so, &socketops);
186	error = sctp_do_peeloff(head, so, (sctp_assoc_t)uap->name);
187	if (error != 0)
188		goto noconnection;
189	if (head->so_sigio != NULL)
190		fsetown(fgetown(&head->so_sigio), &so->so_sigio);
191
192noconnection:
193	/*
194	 * close the new descriptor, assuming someone hasn't ripped it
195	 * out from under us.
196	 */
197	if (error != 0)
198		fdclose(td, nfp, fd);
199
200	/*
201	 * Release explicitly held references before returning.
202	 */
203	CURVNET_RESTORE();
204done:
205	if (nfp != NULL)
206		fdrop(nfp, td);
207	fdrop(headfp, td);
208done2:
209	return (error);
210}
211
212int
213sys_sctp_generic_sendmsg (td, uap)
214	struct thread *td;
215	struct sctp_generic_sendmsg_args /* {
216		int sd,
217		caddr_t msg,
218		int mlen,
219		caddr_t to,
220		__socklen_t tolen,
221		struct sctp_sndrcvinfo *sinfo,
222		int flags
223	} */ *uap;
224{
225	struct sctp_sndrcvinfo sinfo, *u_sinfo = NULL;
226	struct socket *so;
227	struct file *fp = NULL;
228	struct sockaddr *to = NULL;
229#ifdef KTRACE
230	struct uio *ktruio = NULL;
231#endif
232	struct uio auio;
233	struct iovec iov[1];
234	cap_rights_t rights;
235	int error = 0, len;
236
237	if (uap->sinfo != NULL) {
238		error = copyin(uap->sinfo, &sinfo, sizeof (sinfo));
239		if (error != 0)
240			return (error);
241		u_sinfo = &sinfo;
242	}
243
244	cap_rights_init_one(&rights, CAP_SEND);
245	if (uap->tolen != 0) {
246		error = getsockaddr(&to, uap->to, uap->tolen);
247		if (error != 0) {
248			to = NULL;
249			goto sctp_bad2;
250		}
251		cap_rights_set_one(&rights, CAP_CONNECT);
252	}
253
254	AUDIT_ARG_FD(uap->sd);
255	error = getsock_cap(td, uap->sd, &rights, &fp, NULL, NULL);
256	if (error != 0)
257		goto sctp_bad;
258#ifdef KTRACE
259	if (to && (KTRPOINT(td, KTR_STRUCT)))
260		ktrsockaddr(to);
261#endif
262
263	iov[0].iov_base = uap->msg;
264	iov[0].iov_len = uap->mlen;
265
266	so = (struct socket *)fp->f_data;
267	if (so->so_proto->pr_protocol != IPPROTO_SCTP) {
268		error = EOPNOTSUPP;
269		goto sctp_bad;
270	}
271#ifdef MAC
272	error = mac_socket_check_send(td->td_ucred, so);
273	if (error != 0)
274		goto sctp_bad;
275#endif /* MAC */
276
277	auio.uio_iov =  iov;
278	auio.uio_iovcnt = 1;
279	auio.uio_segflg = UIO_USERSPACE;
280	auio.uio_rw = UIO_WRITE;
281	auio.uio_td = td;
282	auio.uio_offset = 0;			/* XXX */
283	auio.uio_resid = 0;
284#ifdef KTRACE
285	if (KTRPOINT(td, KTR_GENIO))
286		ktruio = cloneuio(&auio);
287#endif /* KTRACE */
288	len = auio.uio_resid = uap->mlen;
289	CURVNET_SET(so->so_vnet);
290	error = sctp_lower_sosend(so, to, &auio, (struct mbuf *)NULL,
291	    (struct mbuf *)NULL, uap->flags, u_sinfo, td);
292	CURVNET_RESTORE();
293	if (error != 0) {
294		if (auio.uio_resid != len && (error == ERESTART ||
295		    error == EINTR || error == EWOULDBLOCK))
296			error = 0;
297		/* Generation of SIGPIPE can be controlled per socket. */
298		if (error == EPIPE && !(so->so_options & SO_NOSIGPIPE) &&
299		    !(uap->flags & MSG_NOSIGNAL)) {
300			PROC_LOCK(td->td_proc);
301			tdsignal(td, SIGPIPE);
302			PROC_UNLOCK(td->td_proc);
303		}
304	}
305	if (error == 0)
306		td->td_retval[0] = len - auio.uio_resid;
307#ifdef KTRACE
308	if (ktruio != NULL) {
309		ktruio->uio_resid = td->td_retval[0];
310		ktrgenio(uap->sd, UIO_WRITE, ktruio, error);
311	}
312#endif /* KTRACE */
313sctp_bad:
314	if (fp != NULL)
315		fdrop(fp, td);
316sctp_bad2:
317	free(to, M_SONAME);
318	return (error);
319}
320
321int
322sys_sctp_generic_sendmsg_iov(td, uap)
323	struct thread *td;
324	struct sctp_generic_sendmsg_iov_args /* {
325		int sd,
326		struct iovec *iov,
327		int iovlen,
328		caddr_t to,
329		__socklen_t tolen,
330		struct sctp_sndrcvinfo *sinfo,
331		int flags
332	} */ *uap;
333{
334	struct sctp_sndrcvinfo sinfo, *u_sinfo = NULL;
335	struct socket *so;
336	struct file *fp = NULL;
337	struct sockaddr *to = NULL;
338#ifdef KTRACE
339	struct uio *ktruio = NULL;
340#endif
341	struct uio auio;
342	struct iovec *iov, *tiov;
343	cap_rights_t rights;
344	ssize_t len;
345	int error, i;
346
347	if (uap->sinfo != NULL) {
348		error = copyin(uap->sinfo, &sinfo, sizeof (sinfo));
349		if (error != 0)
350			return (error);
351		u_sinfo = &sinfo;
352	}
353	cap_rights_init_one(&rights, CAP_SEND);
354	if (uap->tolen != 0) {
355		error = getsockaddr(&to, uap->to, uap->tolen);
356		if (error != 0) {
357			to = NULL;
358			goto sctp_bad2;
359		}
360		cap_rights_set_one(&rights, CAP_CONNECT);
361	}
362
363	AUDIT_ARG_FD(uap->sd);
364	error = getsock_cap(td, uap->sd, &rights, &fp, NULL, NULL);
365	if (error != 0)
366		goto sctp_bad1;
367
368#ifdef COMPAT_FREEBSD32
369	if (SV_CURPROC_FLAG(SV_ILP32))
370		error = freebsd32_copyiniov((struct iovec32 *)uap->iov,
371		    uap->iovlen, &iov, EMSGSIZE);
372	else
373#endif
374		error = copyiniov(uap->iov, uap->iovlen, &iov, EMSGSIZE);
375	if (error != 0)
376		goto sctp_bad1;
377#ifdef KTRACE
378	if (to && (KTRPOINT(td, KTR_STRUCT)))
379		ktrsockaddr(to);
380#endif
381
382	so = (struct socket *)fp->f_data;
383	if (so->so_proto->pr_protocol != IPPROTO_SCTP) {
384		error = EOPNOTSUPP;
385		goto sctp_bad;
386	}
387#ifdef MAC
388	error = mac_socket_check_send(td->td_ucred, so);
389	if (error != 0)
390		goto sctp_bad;
391#endif /* MAC */
392
393	auio.uio_iov = iov;
394	auio.uio_iovcnt = uap->iovlen;
395	auio.uio_segflg = UIO_USERSPACE;
396	auio.uio_rw = UIO_WRITE;
397	auio.uio_td = td;
398	auio.uio_offset = 0;			/* XXX */
399	auio.uio_resid = 0;
400	tiov = iov;
401	for (i = 0; i <uap->iovlen; i++, tiov++) {
402		if ((auio.uio_resid += tiov->iov_len) < 0) {
403			error = EINVAL;
404			goto sctp_bad;
405		}
406	}
407#ifdef KTRACE
408	if (KTRPOINT(td, KTR_GENIO))
409		ktruio = cloneuio(&auio);
410#endif /* KTRACE */
411	len = auio.uio_resid;
412	CURVNET_SET(so->so_vnet);
413	error = sctp_lower_sosend(so, to, &auio,
414		    (struct mbuf *)NULL, (struct mbuf *)NULL,
415		    uap->flags, u_sinfo, td);
416	CURVNET_RESTORE();
417	if (error != 0) {
418		if (auio.uio_resid != len && (error == ERESTART ||
419		    error == EINTR || error == EWOULDBLOCK))
420			error = 0;
421		/* Generation of SIGPIPE can be controlled per socket */
422		if (error == EPIPE && !(so->so_options & SO_NOSIGPIPE) &&
423		    !(uap->flags & MSG_NOSIGNAL)) {
424			PROC_LOCK(td->td_proc);
425			tdsignal(td, SIGPIPE);
426			PROC_UNLOCK(td->td_proc);
427		}
428	}
429	if (error == 0)
430		td->td_retval[0] = len - auio.uio_resid;
431#ifdef KTRACE
432	if (ktruio != NULL) {
433		ktruio->uio_resid = td->td_retval[0];
434		ktrgenio(uap->sd, UIO_WRITE, ktruio, error);
435	}
436#endif /* KTRACE */
437sctp_bad:
438	free(iov, M_IOV);
439sctp_bad1:
440	if (fp != NULL)
441		fdrop(fp, td);
442sctp_bad2:
443	free(to, M_SONAME);
444	return (error);
445}
446
447int
448sys_sctp_generic_recvmsg(td, uap)
449	struct thread *td;
450	struct sctp_generic_recvmsg_args /* {
451		int sd,
452		struct iovec *iov,
453		int iovlen,
454		struct sockaddr *from,
455		__socklen_t *fromlenaddr,
456		struct sctp_sndrcvinfo *sinfo,
457		int *msg_flags
458	} */ *uap;
459{
460	uint8_t sockbufstore[256];
461	struct uio auio;
462	struct iovec *iov, *tiov;
463	struct sctp_sndrcvinfo sinfo;
464	struct socket *so;
465	struct file *fp = NULL;
466	struct sockaddr *fromsa;
467	cap_rights_t rights;
468#ifdef KTRACE
469	struct uio *ktruio = NULL;
470#endif
471	ssize_t len;
472	int error, fromlen, i, msg_flags;
473
474	AUDIT_ARG_FD(uap->sd);
475	error = getsock_cap(td, uap->sd, cap_rights_init_one(&rights, CAP_RECV),
476	    &fp, NULL, NULL);
477	if (error != 0)
478		return (error);
479#ifdef COMPAT_FREEBSD32
480	if (SV_CURPROC_FLAG(SV_ILP32))
481		error = freebsd32_copyiniov((struct iovec32 *)uap->iov,
482		    uap->iovlen, &iov, EMSGSIZE);
483	else
484#endif
485		error = copyiniov(uap->iov, uap->iovlen, &iov, EMSGSIZE);
486	if (error != 0)
487		goto out1;
488
489	so = fp->f_data;
490	if (so->so_proto->pr_protocol != IPPROTO_SCTP) {
491		error = EOPNOTSUPP;
492		goto out;
493	}
494#ifdef MAC
495	error = mac_socket_check_receive(td->td_ucred, so);
496	if (error != 0)
497		goto out;
498#endif /* MAC */
499
500	if (uap->fromlenaddr != NULL) {
501		error = copyin(uap->fromlenaddr, &fromlen, sizeof (fromlen));
502		if (error != 0)
503			goto out;
504	} else {
505		fromlen = 0;
506	}
507	if (uap->msg_flags) {
508		error = copyin(uap->msg_flags, &msg_flags, sizeof (int));
509		if (error != 0)
510			goto out;
511	} else {
512		msg_flags = 0;
513	}
514	auio.uio_iov = iov;
515	auio.uio_iovcnt = uap->iovlen;
516	auio.uio_segflg = UIO_USERSPACE;
517	auio.uio_rw = UIO_READ;
518	auio.uio_td = td;
519	auio.uio_offset = 0;			/* XXX */
520	auio.uio_resid = 0;
521	tiov = iov;
522	for (i = 0; i <uap->iovlen; i++, tiov++) {
523		if ((auio.uio_resid += tiov->iov_len) < 0) {
524			error = EINVAL;
525			goto out;
526		}
527	}
528	len = auio.uio_resid;
529	fromsa = (struct sockaddr *)sockbufstore;
530
531#ifdef KTRACE
532	if (KTRPOINT(td, KTR_GENIO))
533		ktruio = cloneuio(&auio);
534#endif /* KTRACE */
535	memset(&sinfo, 0, sizeof(struct sctp_sndrcvinfo));
536	CURVNET_SET(so->so_vnet);
537	error = sctp_sorecvmsg(so, &auio, (struct mbuf **)NULL,
538		    fromsa, fromlen, &msg_flags,
539		    (struct sctp_sndrcvinfo *)&sinfo, 1);
540	CURVNET_RESTORE();
541	if (error != 0) {
542		if (auio.uio_resid != len && (error == ERESTART ||
543		    error == EINTR || error == EWOULDBLOCK))
544			error = 0;
545	} else {
546		if (uap->sinfo)
547			error = copyout(&sinfo, uap->sinfo, sizeof (sinfo));
548	}
549#ifdef KTRACE
550	if (ktruio != NULL) {
551		ktruio->uio_resid = len - auio.uio_resid;
552		ktrgenio(uap->sd, UIO_READ, ktruio, error);
553	}
554#endif /* KTRACE */
555	if (error != 0)
556		goto out;
557	td->td_retval[0] = len - auio.uio_resid;
558
559	if (fromlen && uap->from) {
560		len = fromlen;
561		if (len <= 0 || fromsa == NULL)
562			len = 0;
563		else {
564			len = MIN(len, fromsa->sa_len);
565			error = copyout(fromsa, uap->from, (size_t)len);
566			if (error != 0)
567				goto out;
568		}
569		error = copyout(&len, uap->fromlenaddr, sizeof (socklen_t));
570		if (error != 0)
571			goto out;
572	}
573#ifdef KTRACE
574	if (KTRPOINT(td, KTR_STRUCT))
575		ktrsockaddr(fromsa);
576#endif
577	if (uap->msg_flags) {
578		error = copyout(&msg_flags, uap->msg_flags, sizeof (int));
579		if (error != 0)
580			goto out;
581	}
582out:
583	free(iov, M_IOV);
584out1:
585	if (fp != NULL)
586		fdrop(fp, td);
587
588	return (error);
589}
590