sys/kern/sys_socket.c

   1 /*
   2  * Copyright (c) 1982, 1986, 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. All advertising materials mentioning features or use of this software
  14  *    must display the following acknowledgement:
  15  *      This product includes software developed by the University of
  16  *      California, Berkeley and its contributors.
  17  * 4. Neither the name of the University nor the names of its contributors
  18  *    may be used to endorse or promote products derived from this software
  19  *    without specific prior written permission.
  20  *
  21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  31  * SUCH DAMAGE.
  32  *
  33  *      @(#)sys_socket.c        8.1 (Berkeley) 6/10/93
  34  * $FreeBSD: src/sys/kern/sys_socket.c,v 1.28.2.2 2001/02/26 04:23:16 jlemon Exp $
  35  */
  36
  37 #include <sys/param.h>
  38 #include <sys/systm.h>
  39 #include <sys/file.h>
  40 #include <sys/lock.h>
  41 #include <sys/protosw.h>
  42 #include <sys/signalvar.h>
  43 #include <sys/socket.h>
  44 #include <sys/socketvar.h>
  45 #include <sys/socketops.h>
  46 #include <sys/filio.h>                  /* XXX */
  47 #include <sys/sockio.h>
  48 #include <sys/vnode.h>
  49 #include <sys/stat.h>
  50 #include <sys/uio.h>
  51 #include <sys/filedesc.h>
  52 #include <sys/ucred.h>
  53
  54 #include <sys/socketvar2.h>
  55
  56 #include <net/if.h>
  57 #include <net/route.h>
  58
  59 struct  fileops socketops = {
  60         .fo_read = soo_read,
  61         .fo_write = soo_write,
  62         .fo_ioctl = soo_ioctl,
  63         .fo_kqfilter = sokqfilter,
  64         .fo_stat = soo_stat,
  65         .fo_close = soo_close,
  66         .fo_shutdown = soo_shutdown
  67 };
  68
  69 /*
  70  * MPSAFE
  71  */
  72 int
  73 soo_read(struct file *fp, struct uio *uio, struct ucred *cred, int fflags)
  74 {
  75         struct socket *so;
  76         int error;
  77         int msgflags;
  78
  79         atomic_set_int(&curthread->td_mpflags, TDF_MP_BATCH_DEMARC);
  80
  81         so = (struct socket *)fp->f_data;
  82
  83         if (fflags & O_FBLOCKING)
  84                 msgflags = 0;
  85         else if (fflags & O_FNONBLOCKING)
  86                 msgflags = MSG_FNONBLOCKING;
  87         else if (fp->f_flag & FNONBLOCK)
  88                 msgflags = MSG_FNONBLOCKING;
  89         else
  90                 msgflags = 0;
  91
  92         error = so_pru_soreceive(so, NULL, uio, NULL, NULL, &msgflags);
  93         return (error);
  94 }
  95
  96 /*
  97  * MPSAFE
  98  */
  99 int
 100 soo_write(struct file *fp, struct uio *uio, struct ucred *cred, int fflags)
 101 {
 102         struct socket *so;
 103         int error;
 104         int msgflags;
 105
 106         so = (struct socket *)fp->f_data;
 107
 108         if (fflags & O_FBLOCKING)
 109                 msgflags = 0;
 110         else if (fflags & O_FNONBLOCKING)
 111                 msgflags = MSG_FNONBLOCKING;
 112         else if (fp->f_flag & FNONBLOCK)
 113                 msgflags = MSG_FNONBLOCKING;
 114         else
 115                 msgflags = 0;
 116
 117         error = so_pru_sosend(so, NULL, uio, NULL, NULL, msgflags, uio->uio_td);
 118         if (error == EPIPE && !(fflags & MSG_NOSIGNAL) &&
 119             !(so->so_options & SO_NOSIGPIPE))
 120                 lwpsignal(uio->uio_td->td_proc, uio->uio_td->td_lwp, SIGPIPE);
 121         return (error);
 122 }
 123
 124 /*
 125  * MPSAFE
 126  */
 127 int
 128 soo_ioctl(struct file *fp, u_long cmd, caddr_t data,
 129           struct ucred *cred, struct sysmsg *msg)
 130 {
 131         struct socket *so;
 132         int error;
 133
 134         so = (struct socket *)fp->f_data;
 135
 136         switch (cmd) {
 137         case FIOASYNC:
 138                 if (*(int *)data) {
 139                         sosetstate(so, SS_ASYNC);
 140                         atomic_set_int(&so->so_rcv.ssb_flags,  SSB_ASYNC);
 141                         atomic_set_int(&so->so_snd.ssb_flags, SSB_ASYNC);
 142                 } else {
 143                         soclrstate(so, SS_ASYNC);
 144                         atomic_clear_int(&so->so_rcv.ssb_flags, SSB_ASYNC);
 145                         atomic_clear_int(&so->so_snd.ssb_flags, SSB_ASYNC);
 146                 }
 147                 error = 0;
 148                 break;
 149         case FIONREAD:
 150                 *(int *)data = so->so_rcv.ssb_cc;
 151                 error = 0;
 152                 break;
 153         case FIOSETOWN:
 154                 error = fsetown(*(int *)data, &so->so_sigio);
 155                 break;
 156         case FIOGETOWN:
 157                 *(int *)data = fgetown(&so->so_sigio);
 158                 error = 0;
 159                 break;
 160         case SIOCSPGRP:
 161                 error = fsetown(-(*(int *)data), &so->so_sigio);
 162                 break;
 163         case SIOCGPGRP:
 164                 *(int *)data = -fgetown(&so->so_sigio);
 165                 error = 0;
 166                 break;
 167         case SIOCATMARK:
 168                 *(int *)data = (so->so_state&SS_RCVATMARK) != 0;
 169                 error = 0;
 170                 break;
 171         default:
 172                 /*
 173                  * Interface/routing/protocol specific ioctls:
 174                  * interface and routing ioctls should have a
 175                  * different entry since a socket's unnecessary
 176                  */
 177                 if (IOCGROUP(cmd) == 'i') {
 178                         error = ifioctl(so, cmd, data, cred);
 179                 } else if (IOCGROUP(cmd) == 'r') {
 180                         error = rtioctl(cmd, data, cred);
 181                 } else {
 182                         error = so_pru_control_direct(so, cmd, data, NULL);
 183                 }
 184                 break;
 185         }
 186         return (error);
 187 }
 188
 189 /*
 190  * MPSAFE
 191  */
 192 int
 193 soo_stat(struct file *fp, struct stat *ub, struct ucred *cred)
 194 {
 195         struct socket *so;
 196         int error;
 197
 198         bzero((caddr_t)ub, sizeof (*ub));
 199         ub->st_mode = S_IFSOCK;
 200         so = (struct socket *)fp->f_data;
 201
 202         /*
 203          * If SS_CANTRCVMORE is set, but there's still data left in the
 204          * receive buffer, the socket is still readable.
 205          */
 206         if ((so->so_state & SS_CANTRCVMORE) == 0 ||
 207             so->so_rcv.ssb_cc != 0)
 208                 ub->st_mode |= S_IRUSR | S_IRGRP | S_IROTH;
 209         if ((so->so_state & SS_CANTSENDMORE) == 0)
 210                 ub->st_mode |= S_IWUSR | S_IWGRP | S_IWOTH;
 211         ub->st_size = so->so_rcv.ssb_cc;
 212         ub->st_uid = so->so_cred->cr_uid;
 213         ub->st_gid = so->so_cred->cr_gid;
 214         error = so_pru_sense(so, ub);
 215         return (error);
 216 }
 217
 218 /*
 219  * MPSAFE
 220  */
 221 int
 222 soo_close(struct file *fp)
 223 {
 224         int error;
 225
 226         fp->f_ops = &badfileops;
 227         if (fp->f_data)
 228                 error = soclose((struct socket *)fp->f_data, fp->f_flag);
 229         else
 230                 error = 0;
 231         fp->f_data = NULL;
 232         return (error);
 233 }
 234
 235 /*
 236  * MPSAFE
 237  */
 238 int
 239 soo_shutdown(struct file *fp, int how)
 240 {
 241         int error;
 242
 243         if (fp->f_data)
 244                 error = soshutdown((struct socket *)fp->f_data, how);
 245         else
 246                 error = 0;
 247         return (error);
 248 }
 249