sys/netinet/sctp_syscalls.c

   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 #include "opt_capsicum.h"
  33 #include "opt_sctp.h"
  34 #include "opt_ktrace.h"
  35
  36 #include <sys/param.h>
  37 #include <sys/systm.h>
  38 #include <sys/capsicum.h>
  39 #include <sys/kernel.h>
  40 #include <sys/lock.h>
  41 #include <sys/mutex.h>
  42 #include <sys/sysproto.h>
  43 #include <sys/malloc.h>
  44 #include <sys/filedesc.h>
  45 #include <sys/event.h>
  46 #include <sys/proc.h>
  47 #include <sys/fcntl.h>
  48 #include <sys/file.h>
  49 #include <sys/filio.h>
  50 #include <sys/jail.h>
  51 #include <sys/mount.h>
  52 #include <sys/mbuf.h>
  53 #include <sys/protosw.h>
  54 #include <sys/sf_buf.h>
  55 #include <sys/sysent.h>
  56 #include <sys/socket.h>
  57 #include <sys/socketvar.h>
  58 #include <sys/signalvar.h>
  59 #include <sys/syscall.h>
  60 #include <sys/syscallsubr.h>
  61 #include <sys/sysctl.h>
  62 #include <sys/uio.h>
  63 #include <sys/vnode.h>
  64 #ifdef KTRACE
  65 #include <sys/ktrace.h>
  66 #endif
  67 #ifdef COMPAT_FREEBSD32
  68 #include <compat/freebsd32/freebsd32.h>
  69 #include <compat/freebsd32/freebsd32_syscall.h>
  70 #include <compat/freebsd32/freebsd32_util.h>
  71 #endif
  72
  73 #include <net/vnet.h>
  74
  75 #include <security/audit/audit.h>
  76 #include <security/mac/mac_framework.h>
  77
  78 #include <netinet/sctp.h>
  79 #include <netinet/sctp_os_bsd.h>
  80 #include <netinet/sctp_peeloff.h>
  81
  82 static struct syscall_helper_data sctp_syscalls[] = {
  83         SYSCALL_INIT_HELPER_F(sctp_peeloff, SYF_CAPENABLED),
  84         SYSCALL_INIT_HELPER_F(sctp_generic_sendmsg, SYF_CAPENABLED),
  85         SYSCALL_INIT_HELPER_F(sctp_generic_sendmsg_iov, SYF_CAPENABLED),
  86         SYSCALL_INIT_HELPER_F(sctp_generic_recvmsg, SYF_CAPENABLED),
  87         SYSCALL_INIT_LAST
  88 };
  89
  90 #ifdef COMPAT_FREEBSD32
  91 static struct syscall_helper_data sctp32_syscalls[] = {
  92         SYSCALL32_INIT_HELPER_COMPAT(sctp_peeloff),
  93         SYSCALL32_INIT_HELPER_COMPAT(sctp_generic_sendmsg),
  94         SYSCALL32_INIT_HELPER_COMPAT(sctp_generic_sendmsg_iov),
  95         SYSCALL32_INIT_HELPER_COMPAT(sctp_generic_recvmsg),
  96         SYSCALL_INIT_LAST
  97 };
  98 #endif
  99
 100 int
 101 sctp_syscalls_init(void)
 102 {
 103         int error;
 104
 105         error = syscall_helper_register(sctp_syscalls, SY_THR_STATIC_KLD);
 106         if (error != 0)
 107                 return (error);
 108 #ifdef COMPAT_FREEBSD32
 109         error = syscall32_helper_register(sctp32_syscalls, SY_THR_STATIC_KLD);
 110         if (error != 0)
 111                 return (error);
 112 #endif
 113         return (0);
 114 }
 115
 116 #ifdef SCTP
 117 SYSINIT(sctp_syscalls, SI_SUB_SYSCALLS, SI_ORDER_ANY, sctp_syscalls_init, NULL);
 118 #endif
 119
 120 int
 121 sctp_syscalls_uninit(void)
 122 {
 123         int error;
 124
 125 #ifdef COMPAT_FREEBSD32
 126         error = syscall32_helper_unregister(sctp32_syscalls);
 127         if (error != 0)
 128                 return (error);
 129 #endif
 130         error = syscall_helper_unregister(sctp_syscalls);
 131         if (error != 0)
 132                 return (error);
 133         return (0);
 134 }
 135
 136 /*
 137  * SCTP syscalls.
 138  */
 139 int
 140 sys_sctp_peeloff(struct thread *td, struct sctp_peeloff_args *uap)
 141 {
 142         struct file *headfp, *nfp = NULL;
 143         struct socket *head, *so;
 144         cap_rights_t rights;
 145         u_int fflag;
 146         int error, fd;
 147
 148         AUDIT_ARG_FD(uap->sd);
 149         error = getsock(td, uap->sd, cap_rights_init_one(&rights, CAP_PEELOFF),
 150             &headfp);
 151         if (error != 0)
 152                 goto done2;
 153         fflag = atomic_load_int(&headfp->f_flag);
 154         head = headfp->f_data;
 155         if (head->so_proto->pr_protocol != IPPROTO_SCTP) {
 156                 error = EOPNOTSUPP;
 157                 goto done;
 158         }
 159         error = sctp_can_peel_off(head, (sctp_assoc_t)uap->name);
 160         if (error != 0)
 161                 goto done;
 162         /*
 163          * At this point we know we do have a assoc to pull
 164          * we proceed to get the fd setup. This may block
 165          * but that is ok.
 166          */
 167
 168         error = falloc(td, &nfp, &fd, 0);
 169         if (error != 0)
 170                 goto done;
 171         td->td_retval[0] = fd;
 172
 173         CURVNET_SET(head->so_vnet);
 174         so = sopeeloff(head);
 175         if (so == NULL) {
 176                 error = ENOMEM;
 177                 goto noconnection;
 178         }
 179         finit(nfp, fflag, DTYPE_SOCKET, so, &socketops);
 180         error = sctp_do_peeloff(head, so, (sctp_assoc_t)uap->name);
 181         if (error != 0)
 182                 goto noconnection;
 183         if (head->so_sigio != NULL)
 184                 fsetown(fgetown(&head->so_sigio), &so->so_sigio);
 185
 186 noconnection:
 187         /*
 188          * close the new descriptor, assuming someone hasn't ripped it
 189          * out from under us.
 190          */
 191         if (error != 0)
 192                 fdclose(td, nfp, fd);
 193
 194         /*
 195          * Release explicitly held references before returning.
 196          */
 197         CURVNET_RESTORE();
 198 done:
 199         if (nfp != NULL)
 200                 fdrop(nfp, td);
 201         fdrop(headfp, td);
 202 done2:
 203         return (error);
 204 }
 205
 206 int
 207 sys_sctp_generic_sendmsg(struct thread *td, struct sctp_generic_sendmsg_args *uap)
 208 {
 209         struct sctp_sndrcvinfo sinfo, *u_sinfo = NULL;
 210         struct socket *so;
 211         struct file *fp = NULL;
 212         struct sockaddr *to = NULL;
 213 #ifdef KTRACE
 214         struct uio *ktruio = NULL;
 215 #endif
 216         struct uio auio;
 217         struct iovec iov[1];
 218         cap_rights_t rights;
 219         int error = 0, len;
 220
 221         if (uap->sinfo != NULL) {
 222                 error = copyin(uap->sinfo, &sinfo, sizeof (sinfo));
 223                 if (error != 0)
 224                         return (error);
 225                 u_sinfo = &sinfo;
 226         }
 227
 228         cap_rights_init_one(&rights, CAP_SEND);
 229         if (uap->tolen != 0) {
 230                 error = getsockaddr(&to, uap->to, uap->tolen);
 231                 if (error != 0) {
 232                         to = NULL;
 233                         goto sctp_bad2;
 234                 }
 235                 cap_rights_set_one(&rights, CAP_CONNECT);
 236         }
 237
 238         AUDIT_ARG_FD(uap->sd);
 239         error = getsock(td, uap->sd, &rights, &fp);
 240         if (error != 0)
 241                 goto sctp_bad;
 242 #ifdef KTRACE
 243         if (to && (KTRPOINT(td, KTR_STRUCT)))
 244                 ktrsockaddr(to);
 245 #endif
 246
 247         iov[0].iov_base = uap->msg;
 248         iov[0].iov_len = uap->mlen;
 249
 250         so = (struct socket *)fp->f_data;
 251         if (so->so_proto->pr_protocol != IPPROTO_SCTP) {
 252                 error = EOPNOTSUPP;
 253                 goto sctp_bad;
 254         }
 255 #ifdef MAC
 256         error = mac_socket_check_send(td->td_ucred, so);
 257         if (error != 0)
 258                 goto sctp_bad;
 259 #endif /* MAC */
 260
 261         auio.uio_iov =  iov;
 262         auio.uio_iovcnt = 1;
 263         auio.uio_segflg = UIO_USERSPACE;
 264         auio.uio_rw = UIO_WRITE;
 265         auio.uio_td = td;
 266         auio.uio_offset = 0;                    /* XXX */
 267         auio.uio_resid = 0;
 268 #ifdef KTRACE
 269         if (KTRPOINT(td, KTR_GENIO))
 270                 ktruio = cloneuio(&auio);
 271 #endif /* KTRACE */
 272         len = auio.uio_resid = uap->mlen;
 273         CURVNET_SET(so->so_vnet);
 274         error = sctp_lower_sosend(so, to, &auio, (struct mbuf *)NULL,
 275             (struct mbuf *)NULL, uap->flags, u_sinfo, td);
 276         CURVNET_RESTORE();
 277         if (error != 0) {
 278                 if (auio.uio_resid != len && (error == ERESTART ||
 279                     error == EINTR || error == EWOULDBLOCK))
 280                         error = 0;
 281                 /* Generation of SIGPIPE can be controlled per socket. */
 282                 if (error == EPIPE && !(so->so_options & SO_NOSIGPIPE) &&
 283                     !(uap->flags & MSG_NOSIGNAL)) {
 284                         PROC_LOCK(td->td_proc);
 285                         tdsignal(td, SIGPIPE);
 286                         PROC_UNLOCK(td->td_proc);
 287                 }
 288         }
 289         if (error == 0)
 290                 td->td_retval[0] = len - auio.uio_resid;
 291 #ifdef KTRACE
 292         if (ktruio != NULL) {
 293                 ktruio->uio_resid = td->td_retval[0];
 294                 ktrgenio(uap->sd, UIO_WRITE, ktruio, error);
 295         }
 296 #endif /* KTRACE */
 297 sctp_bad:
 298         if (fp != NULL)
 299                 fdrop(fp, td);
 300 sctp_bad2:
 301         free(to, M_SONAME);
 302         return (error);
 303 }
 304
 305 int
 306 sys_sctp_generic_sendmsg_iov(struct thread *td, struct sctp_generic_sendmsg_iov_args *uap)
 307 {
 308         struct sctp_sndrcvinfo sinfo, *u_sinfo = NULL;
 309         struct socket *so;
 310         struct file *fp = NULL;
 311         struct sockaddr *to = NULL;
 312 #ifdef KTRACE
 313         struct uio *ktruio = NULL;
 314 #endif
 315         struct uio auio;
 316         struct iovec *iov, *tiov;
 317         cap_rights_t rights;
 318         ssize_t len;
 319         int error, i;
 320
 321         if (uap->sinfo != NULL) {
 322                 error = copyin(uap->sinfo, &sinfo, sizeof (sinfo));
 323                 if (error != 0)
 324                         return (error);
 325                 u_sinfo = &sinfo;
 326         }
 327         cap_rights_init_one(&rights, CAP_SEND);
 328         if (uap->tolen != 0) {
 329                 error = getsockaddr(&to, uap->to, uap->tolen);
 330                 if (error != 0) {
 331                         to = NULL;
 332                         goto sctp_bad2;
 333                 }
 334                 cap_rights_set_one(&rights, CAP_CONNECT);
 335         }
 336
 337         AUDIT_ARG_FD(uap->sd);
 338         error = getsock(td, uap->sd, &rights, &fp);
 339         if (error != 0)
 340                 goto sctp_bad1;
 341
 342 #ifdef COMPAT_FREEBSD32
 343         if (SV_CURPROC_FLAG(SV_ILP32))
 344                 error = freebsd32_copyiniov((struct iovec32 *)uap->iov,
 345                     uap->iovlen, &iov, EMSGSIZE);
 346         else
 347 #endif
 348                 error = copyiniov(uap->iov, uap->iovlen, &iov, EMSGSIZE);
 349         if (error != 0)
 350                 goto sctp_bad1;
 351 #ifdef KTRACE
 352         if (to && (KTRPOINT(td, KTR_STRUCT)))
 353                 ktrsockaddr(to);
 354 #endif
 355
 356         so = (struct socket *)fp->f_data;
 357         if (so->so_proto->pr_protocol != IPPROTO_SCTP) {
 358                 error = EOPNOTSUPP;
 359                 goto sctp_bad;
 360         }
 361 #ifdef MAC
 362         error = mac_socket_check_send(td->td_ucred, so);
 363         if (error != 0)
 364                 goto sctp_bad;
 365 #endif /* MAC */
 366
 367         auio.uio_iov = iov;
 368         auio.uio_iovcnt = uap->iovlen;
 369         auio.uio_segflg = UIO_USERSPACE;
 370         auio.uio_rw = UIO_WRITE;
 371         auio.uio_td = td;
 372         auio.uio_offset = 0;                    /* XXX */
 373         auio.uio_resid = 0;
 374         tiov = iov;
 375         for (i = 0; i <uap->iovlen; i++, tiov++) {
 376                 if ((auio.uio_resid += tiov->iov_len) < 0) {
 377                         error = EINVAL;
 378                         goto sctp_bad;
 379                 }
 380         }
 381 #ifdef KTRACE
 382         if (KTRPOINT(td, KTR_GENIO))
 383                 ktruio = cloneuio(&auio);
 384 #endif /* KTRACE */
 385         len = auio.uio_resid;
 386         CURVNET_SET(so->so_vnet);
 387         error = sctp_lower_sosend(so, to, &auio,
 388                     (struct mbuf *)NULL, (struct mbuf *)NULL,
 389                     uap->flags, u_sinfo, td);
 390         CURVNET_RESTORE();
 391         if (error != 0) {
 392                 if (auio.uio_resid != len && (error == ERESTART ||
 393                     error == EINTR || error == EWOULDBLOCK))
 394                         error = 0;
 395                 /* Generation of SIGPIPE can be controlled per socket */
 396                 if (error == EPIPE && !(so->so_options & SO_NOSIGPIPE) &&
 397                     !(uap->flags & MSG_NOSIGNAL)) {
 398                         PROC_LOCK(td->td_proc);
 399                         tdsignal(td, SIGPIPE);
 400                         PROC_UNLOCK(td->td_proc);
 401                 }
 402         }
 403         if (error == 0)
 404                 td->td_retval[0] = len - auio.uio_resid;
 405 #ifdef KTRACE
 406         if (ktruio != NULL) {
 407                 ktruio->uio_resid = td->td_retval[0];
 408                 ktrgenio(uap->sd, UIO_WRITE, ktruio, error);
 409         }
 410 #endif /* KTRACE */
 411 sctp_bad:
 412         free(iov, M_IOV);
 413 sctp_bad1:
 414         if (fp != NULL)
 415                 fdrop(fp, td);
 416 sctp_bad2:
 417         free(to, M_SONAME);
 418         return (error);
 419 }
 420
 421 int
 422 sys_sctp_generic_recvmsg(struct thread *td, struct sctp_generic_recvmsg_args *uap)
 423 {
 424         uint8_t sockbufstore[256];
 425         struct uio auio;
 426         struct iovec *iov, *tiov;
 427         struct sctp_sndrcvinfo sinfo;
 428         struct socket *so;
 429         struct file *fp = NULL;
 430         struct sockaddr *fromsa;
 431         cap_rights_t rights;
 432 #ifdef KTRACE
 433         struct uio *ktruio = NULL;
 434 #endif
 435         ssize_t len;
 436         int error, fromlen, i, msg_flags;
 437
 438         AUDIT_ARG_FD(uap->sd);
 439         error = getsock(td, uap->sd, cap_rights_init_one(&rights, CAP_RECV),
 440             &fp);
 441         if (error != 0)
 442                 return (error);
 443 #ifdef COMPAT_FREEBSD32
 444         if (SV_CURPROC_FLAG(SV_ILP32))
 445                 error = freebsd32_copyiniov((struct iovec32 *)uap->iov,
 446                     uap->iovlen, &iov, EMSGSIZE);
 447         else
 448 #endif
 449                 error = copyiniov(uap->iov, uap->iovlen, &iov, EMSGSIZE);
 450         if (error != 0)
 451                 goto out1;
 452
 453         so = fp->f_data;
 454         if (so->so_proto->pr_protocol != IPPROTO_SCTP) {
 455                 error = EOPNOTSUPP;
 456                 goto out;
 457         }
 458 #ifdef MAC
 459         error = mac_socket_check_receive(td->td_ucred, so);
 460         if (error != 0)
 461                 goto out;
 462 #endif /* MAC */
 463
 464         if (uap->fromlenaddr != NULL) {
 465                 error = copyin(uap->fromlenaddr, &fromlen, sizeof (fromlen));
 466                 if (error != 0)
 467                         goto out;
 468         } else {
 469                 fromlen = 0;
 470         }
 471         if (uap->msg_flags) {
 472                 error = copyin(uap->msg_flags, &msg_flags, sizeof (int));
 473                 if (error != 0)
 474                         goto out;
 475         } else {
 476                 msg_flags = 0;
 477         }
 478         auio.uio_iov = iov;
 479         auio.uio_iovcnt = uap->iovlen;
 480         auio.uio_segflg = UIO_USERSPACE;
 481         auio.uio_rw = UIO_READ;
 482         auio.uio_td = td;
 483         auio.uio_offset = 0;                    /* XXX */
 484         auio.uio_resid = 0;
 485         tiov = iov;
 486         for (i = 0; i <uap->iovlen; i++, tiov++) {
 487                 if ((auio.uio_resid += tiov->iov_len) < 0) {
 488                         error = EINVAL;
 489                         goto out;
 490                 }
 491         }
 492         len = auio.uio_resid;
 493         fromsa = (struct sockaddr *)sockbufstore;
 494
 495 #ifdef KTRACE
 496         if (KTRPOINT(td, KTR_GENIO))
 497                 ktruio = cloneuio(&auio);
 498 #endif /* KTRACE */
 499         memset(&sinfo, 0, sizeof(struct sctp_sndrcvinfo));
 500         CURVNET_SET(so->so_vnet);
 501         error = sctp_sorecvmsg(so, &auio, (struct mbuf **)NULL,
 502                     fromsa, fromlen, &msg_flags,
 503                     (struct sctp_sndrcvinfo *)&sinfo, 1);
 504         CURVNET_RESTORE();
 505         if (error != 0) {
 506                 if (auio.uio_resid != len && (error == ERESTART ||
 507                     error == EINTR || error == EWOULDBLOCK))
 508                         error = 0;
 509         } else {
 510                 if (uap->sinfo)
 511                         error = copyout(&sinfo, uap->sinfo, sizeof (sinfo));
 512         }
 513 #ifdef KTRACE
 514         if (ktruio != NULL) {
 515                 ktruio->uio_resid = len - auio.uio_resid;
 516                 ktrgenio(uap->sd, UIO_READ, ktruio, error);
 517         }
 518 #endif /* KTRACE */
 519         if (error != 0)
 520                 goto out;
 521         td->td_retval[0] = len - auio.uio_resid;
 522
 523         if (fromlen && uap->from) {
 524                 len = fromlen;
 525                 if (len <= 0 || fromsa == NULL)
 526                         len = 0;
 527                 else {
 528                         len = MIN(len, fromsa->sa_len);
 529                         error = copyout(fromsa, uap->from, (size_t)len);
 530                         if (error != 0)
 531                                 goto out;
 532                 }
 533                 error = copyout(&len, uap->fromlenaddr, sizeof (socklen_t));
 534                 if (error != 0)
 535                         goto out;
 536         }
 537 #ifdef KTRACE
 538         if (KTRPOINT(td, KTR_STRUCT))
 539                 ktrsockaddr(fromsa);
 540 #endif
 541         if (uap->msg_flags) {
 542                 error = copyout(&msg_flags, uap->msg_flags, sizeof (int));
 543                 if (error != 0)
 544                         goto out;
 545         }
 546 out:
 547         free(iov, M_IOV);
 548 out1:
 549         if (fp != NULL)
 550                 fdrop(fp, td);
 551
 552         return (error);
 553 }