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.14 2007/04/22 01:13:10 dillon Exp $ 36 */ 37 38 #include <sys/param.h> 39 #include <sys/systm.h> 40 #include <sys/file.h> 41 #include <sys/lock.h> 42 #include <sys/protosw.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 return (error); 119 } 120 121 /* 122 * MPSAFE 123 */ 124 int 125 soo_ioctl(struct file *fp, u_long cmd, caddr_t data, 126 struct ucred *cred, struct sysmsg *msg) 127 { 128 struct socket *so; 129 int error; 130 131 so = (struct socket *)fp->f_data; 132 133 switch (cmd) { 134 case FIOASYNC: 135 if (*(int *)data) { 136 sosetstate(so, SS_ASYNC); 137 atomic_set_int(&so->so_rcv.ssb_flags, SSB_ASYNC); 138 atomic_set_int(&so->so_snd.ssb_flags, SSB_ASYNC); 139 } else { 140 soclrstate(so, SS_ASYNC); 141 atomic_clear_int(&so->so_rcv.ssb_flags, SSB_ASYNC); 142 atomic_clear_int(&so->so_snd.ssb_flags, SSB_ASYNC); 143 } 144 error = 0; 145 break; 146 case FIONREAD: 147 *(int *)data = so->so_rcv.ssb_cc; 148 error = 0; 149 break; 150 case FIOSETOWN: 151 error = fsetown(*(int *)data, &so->so_sigio); 152 break; 153 case FIOGETOWN: 154 *(int *)data = fgetown(&so->so_sigio); 155 error = 0; 156 break; 157 case SIOCSPGRP: 158 error = fsetown(-(*(int *)data), &so->so_sigio); 159 break; 160 case SIOCGPGRP: 161 *(int *)data = -fgetown(&so->so_sigio); 162 error = 0; 163 break; 164 case SIOCATMARK: 165 *(int *)data = (so->so_state&SS_RCVATMARK) != 0; 166 error = 0; 167 break; 168 default: 169 /* 170 * Interface/routing/protocol specific ioctls: 171 * interface and routing ioctls should have a 172 * different entry since a socket's unnecessary 173 */ 174 if (IOCGROUP(cmd) == 'i') { 175 error = ifioctl(so, cmd, data, cred); 176 } else if (IOCGROUP(cmd) == 'r') { 177 error = rtioctl(cmd, data, cred); 178 } else { 179 error = so_pru_control_direct(so, cmd, data, NULL); 180 } 181 break; 182 } 183 return (error); 184 } 185 186 /* 187 * MPSAFE 188 */ 189 int 190 soo_stat(struct file *fp, struct stat *ub, struct ucred *cred) 191 { 192 struct socket *so; 193 int error; 194 195 bzero((caddr_t)ub, sizeof (*ub)); 196 ub->st_mode = S_IFSOCK; 197 so = (struct socket *)fp->f_data; 198 199 /* 200 * If SS_CANTRCVMORE is set, but there's still data left in the 201 * receive buffer, the socket is still readable. 202 */ 203 if ((so->so_state & SS_CANTRCVMORE) == 0 || 204 so->so_rcv.ssb_cc != 0) 205 ub->st_mode |= S_IRUSR | S_IRGRP | S_IROTH; 206 if ((so->so_state & SS_CANTSENDMORE) == 0) 207 ub->st_mode |= S_IWUSR | S_IWGRP | S_IWOTH; 208 ub->st_size = so->so_rcv.ssb_cc; 209 ub->st_uid = so->so_cred->cr_uid; 210 ub->st_gid = so->so_cred->cr_gid; 211 error = so_pru_sense(so, ub); 212 return (error); 213 } 214 215 /* 216 * MPSAFE 217 */ 218 int 219 soo_close(struct file *fp) 220 { 221 int error; 222 223 fp->f_ops = &badfileops; 224 if (fp->f_data) 225 error = soclose((struct socket *)fp->f_data, fp->f_flag); 226 else 227 error = 0; 228 fp->f_data = NULL; 229 return (error); 230 } 231 232 /* 233 * MPSAFE 234 */ 235 int 236 soo_shutdown(struct file *fp, int how) 237 { 238 int error; 239 240 if (fp->f_data) 241 error = soshutdown((struct socket *)fp->f_data, how); 242 else 243 error = 0; 244 return (error); 245 } 246 247