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  * $DragonFly: src/sys/kern/sys_socket.c,v 1.9 2006/05/06 02:43:12 dillon Exp $
  36  */
  37
  38 #include <sys/param.h>
  39 #include <sys/systm.h>
  40 #include <sys/file.h>
  41 #include <sys/protosw.h>
  42 #include <sys/socket.h>
  43 #include <sys/socketvar.h>
  44 #include <sys/socketops.h>
  45 #include <sys/filio.h>                  /* XXX */
  46 #include <sys/sockio.h>
  47 #include <sys/stat.h>
  48 #include <sys/uio.h>
  49 #include <sys/filedesc.h>
  50 #include <sys/ucred.h>
  51
  52 #include <net/if.h>
  53 #include <net/route.h>
  54
  55 struct  fileops socketops = {
  56         NULL,   /* port */
  57         NULL,   /* clone */
  58         soo_read, soo_write, soo_ioctl, soo_poll, sokqfilter,
  59         soo_stat, soo_close, soo_shutdown
  60 };
  61
  62 /* ARGSUSED */
  63 int
  64 soo_read(struct file *fp, struct uio *uio, struct ucred *cred, int flags)
  65 {
  66         struct socket *so = (struct socket *)fp->f_data;
  67
  68         return (so_pru_soreceive(so, NULL, uio, NULL, NULL, NULL));
  69 }
  70
  71 /* ARGSUSED */
  72 int
  73 soo_write(struct file *fp, struct uio *uio, struct ucred *cred, int flags)
  74 {
  75         struct socket *so = (struct socket *)fp->f_data;
  76
  77         return (so_pru_sosend(so, NULL, uio, NULL, NULL, 0, uio->uio_td));
  78 }
  79
  80 int
  81 soo_ioctl(struct file *fp, u_long cmd, caddr_t data, struct ucred *cred)
  82 {
  83         struct socket *so = (struct socket *)fp->f_data;
  84
  85         switch (cmd) {
  86
  87         case FIONBIO:
  88                 if (*(int *)data)
  89                         so->so_state |= SS_NBIO;
  90                 else
  91                         so->so_state &= ~SS_NBIO;
  92                 return (0);
  93
  94         case FIOASYNC:
  95                 if (*(int *)data) {
  96                         so->so_state |= SS_ASYNC;
  97                         so->so_rcv.sb_flags |= SB_ASYNC;
  98                         so->so_snd.sb_flags |= SB_ASYNC;
  99                 } else {
 100                         so->so_state &= ~SS_ASYNC;
 101                         so->so_rcv.sb_flags &= ~SB_ASYNC;
 102                         so->so_snd.sb_flags &= ~SB_ASYNC;
 103                 }
 104                 return (0);
 105
 106         case FIONREAD:
 107                 *(int *)data = so->so_rcv.sb_cc;
 108                 return (0);
 109
 110         case FIOSETOWN:
 111                 return (fsetown(*(int *)data, &so->so_sigio));
 112
 113         case FIOGETOWN:
 114                 *(int *)data = fgetown(so->so_sigio);
 115                 return (0);
 116
 117         case SIOCSPGRP:
 118                 return (fsetown(-(*(int *)data), &so->so_sigio));
 119
 120         case SIOCGPGRP:
 121                 *(int *)data = -fgetown(so->so_sigio);
 122                 return (0);
 123
 124         case SIOCATMARK:
 125                 *(int *)data = (so->so_state&SS_RCVATMARK) != 0;
 126                 return (0);
 127         }
 128         /*
 129          * Interface/routing/protocol specific ioctls:
 130          * interface and routing ioctls should have a
 131          * different entry since a socket's unnecessary
 132          */
 133         if (IOCGROUP(cmd) == 'i')
 134                 return (ifioctl(so, cmd, data, cred));
 135         if (IOCGROUP(cmd) == 'r')
 136                 return (rtioctl(cmd, data, cred));
 137         return (so_pru_control(so, cmd, data, NULL));
 138 }
 139
 140 int
 141 soo_poll(struct file *fp, int events, struct ucred *cred)
 142 {
 143         struct socket *so = (struct socket *)fp->f_data;
 144         return (so_pru_sopoll(so, events, cred));
 145 }
 146
 147 int
 148 soo_stat(struct file *fp, struct stat *ub, struct ucred *cred)
 149 {
 150         struct socket *so = (struct socket *)fp->f_data;
 151
 152         bzero((caddr_t)ub, sizeof (*ub));
 153         ub->st_mode = S_IFSOCK;
 154         /*
 155          * If SS_CANTRCVMORE is set, but there's still data left in the
 156          * receive buffer, the socket is still readable.
 157          */
 158         if ((so->so_state & SS_CANTRCVMORE) == 0 ||
 159             so->so_rcv.sb_cc != 0)
 160                 ub->st_mode |= S_IRUSR | S_IRGRP | S_IROTH;
 161         if ((so->so_state & SS_CANTSENDMORE) == 0)
 162                 ub->st_mode |= S_IWUSR | S_IWGRP | S_IWOTH;
 163         ub->st_size = so->so_rcv.sb_cc;
 164         ub->st_uid = so->so_cred->cr_uid;
 165         ub->st_gid = so->so_cred->cr_gid;
 166         return (so_pru_sense(so, ub));
 167 }
 168
 169 /* ARGSUSED */
 170 int
 171 soo_close(struct file *fp)
 172 {
 173         int error = 0;
 174
 175         fp->f_ops = &badfileops;
 176         if (fp->f_data)
 177                 error = soclose((struct socket *)fp->f_data);
 178         fp->f_data = 0;
 179         return (error);
 180 }
 181
 182 /* ARGSUSED */
 183 int
 184 soo_shutdown(struct file *fp, int how)
 185 {
 186         int error = 0;
 187
 188         if (fp->f_data)
 189                 error = soshutdown((struct socket *)fp->f_data, how);
 190         return (error);
 191 }
 192