xref: /netbsd/sys/kern/sys_socket.c (revision c4a72b64)
1 /*	$NetBSD: sys_socket.c,v 1.33 2002/10/23 09:14:23 jdolecek Exp $	*/
2 
3 /*
4  * Copyright (c) 1982, 1986, 1990, 1993
5  *	The Regents of the University of California.  All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. All advertising materials mentioning features or use of this software
16  *    must display the following acknowledgement:
17  *	This product includes software developed by the University of
18  *	California, Berkeley and its contributors.
19  * 4. Neither the name of the University nor the names of its contributors
20  *    may be used to endorse or promote products derived from this software
21  *    without specific prior written permission.
22  *
23  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33  * SUCH DAMAGE.
34  *
35  *	@(#)sys_socket.c	8.3 (Berkeley) 2/14/95
36  */
37 
38 #include <sys/cdefs.h>
39 __KERNEL_RCSID(0, "$NetBSD: sys_socket.c,v 1.33 2002/10/23 09:14:23 jdolecek Exp $");
40 
41 #include <sys/param.h>
42 #include <sys/systm.h>
43 #include <sys/file.h>
44 #include <sys/mbuf.h>
45 #include <sys/protosw.h>
46 #include <sys/socket.h>
47 #include <sys/socketvar.h>
48 #include <sys/ioctl.h>
49 #include <sys/stat.h>
50 #include <sys/poll.h>
51 #include <sys/proc.h>
52 
53 #include <net/if.h>
54 #include <net/route.h>
55 
56 struct	fileops socketops = {
57 	soo_read, soo_write, soo_ioctl, soo_fcntl, soo_poll,
58 	soo_stat, soo_close, soo_kqfilter
59 };
60 
61 /* ARGSUSED */
62 int
63 soo_read(fp, offset, uio, cred, flags)
64 	struct file *fp;
65 	off_t *offset;
66 	struct uio *uio;
67 	struct ucred *cred;
68 	int flags;
69 {
70 	struct socket *so = (struct socket *) fp->f_data;
71 	return ((*so->so_receive)(so, (struct mbuf **)0,
72 		uio, (struct mbuf **)0, (struct mbuf **)0, (int *)0));
73 }
74 
75 /* ARGSUSED */
76 int
77 soo_write(fp, offset, uio, cred, flags)
78 	struct file *fp;
79 	off_t *offset;
80 	struct uio *uio;
81 	struct ucred *cred;
82 	int flags;
83 {
84 	struct socket *so = (struct socket *) fp->f_data;
85 	return ((*so->so_send)(so, (struct mbuf *)0,
86 		uio, (struct mbuf *)0, (struct mbuf *)0, 0));
87 }
88 
89 int
90 soo_ioctl(fp, cmd, data, p)
91 	struct file *fp;
92 	u_long cmd;
93 	caddr_t data;
94 	struct proc *p;
95 {
96 	struct socket *so = (struct socket *)fp->f_data;
97 
98 	switch (cmd) {
99 
100 	case FIONBIO:
101 		if (*(int *)data)
102 			so->so_state |= SS_NBIO;
103 		else
104 			so->so_state &= ~SS_NBIO;
105 		return (0);
106 
107 	case FIOASYNC:
108 		if (*(int *)data) {
109 			so->so_state |= SS_ASYNC;
110 			so->so_rcv.sb_flags |= SB_ASYNC;
111 			so->so_snd.sb_flags |= SB_ASYNC;
112 		} else {
113 			so->so_state &= ~SS_ASYNC;
114 			so->so_rcv.sb_flags &= ~SB_ASYNC;
115 			so->so_snd.sb_flags &= ~SB_ASYNC;
116 		}
117 		return (0);
118 
119 	case FIONREAD:
120 		*(int *)data = so->so_rcv.sb_cc;
121 		return (0);
122 
123 	case SIOCSPGRP:
124 		so->so_pgid = *(int *)data;
125 		return (0);
126 
127 	case SIOCGPGRP:
128 		*(int *)data = so->so_pgid;
129 		return (0);
130 
131 	case SIOCATMARK:
132 		*(int *)data = (so->so_state&SS_RCVATMARK) != 0;
133 		return (0);
134 	}
135 	/*
136 	 * Interface/routing/protocol specific ioctls:
137 	 * interface and routing ioctls should have a
138 	 * different entry since a socket's unnecessary
139 	 */
140 	if (IOCGROUP(cmd) == 'i')
141 		return (ifioctl(so, cmd, data, p));
142 	if (IOCGROUP(cmd) == 'r')
143 		return (rtioctl(cmd, data, p));
144 	return ((*so->so_proto->pr_usrreq)(so, PRU_CONTROL,
145 	    (struct mbuf *)cmd, (struct mbuf *)data, (struct mbuf *)0, p));
146 }
147 
148 int
149 soo_fcntl(fp, cmd, data, p)
150 	struct file *fp;
151 	u_int cmd;
152 	caddr_t data;
153 	struct proc *p;
154 {
155 	if (cmd == F_SETFL)
156 		return (0);
157 	else
158 		return (EOPNOTSUPP);
159 }
160 
161 int
162 soo_poll(fp, events, p)
163 	struct file *fp;
164 	int events;
165 	struct proc *p;
166 {
167 	struct socket *so = (struct socket *)fp->f_data;
168 	int revents = 0;
169 	int s = splsoftnet();
170 
171 	if (events & (POLLIN | POLLRDNORM))
172 		if (soreadable(so))
173 			revents |= events & (POLLIN | POLLRDNORM);
174 
175 	if (events & (POLLOUT | POLLWRNORM))
176 		if (sowriteable(so))
177 			revents |= events & (POLLOUT | POLLWRNORM);
178 
179 	if (events & (POLLPRI | POLLRDBAND))
180 		if (so->so_oobmark || (so->so_state & SS_RCVATMARK))
181 			revents |= events & (POLLPRI | POLLRDBAND);
182 
183 	if (revents == 0) {
184 		if (events & (POLLIN | POLLPRI | POLLRDNORM | POLLRDBAND)) {
185 			selrecord(p, &so->so_rcv.sb_sel);
186 			so->so_rcv.sb_flags |= SB_SEL;
187 		}
188 
189 		if (events & (POLLOUT | POLLWRNORM)) {
190 			selrecord(p, &so->so_snd.sb_sel);
191 			so->so_snd.sb_flags |= SB_SEL;
192 		}
193 	}
194 
195 	splx(s);
196 	return (revents);
197 }
198 
199 int
200 soo_stat(fp, ub, p)
201 	struct file *fp;
202 	struct stat *ub;
203 	struct proc *p;
204 {
205 	struct socket *so = (struct socket *)fp->f_data;
206 
207 	memset((caddr_t)ub, 0, sizeof(*ub));
208 	ub->st_mode = S_IFSOCK;
209 	return ((*so->so_proto->pr_usrreq)(so, PRU_SENSE,
210 	    (struct mbuf *)ub, (struct mbuf *)0, (struct mbuf *)0, p));
211 }
212 
213 /* ARGSUSED */
214 int
215 soo_close(fp, p)
216 	struct file *fp;
217 	struct proc *p;
218 {
219 	int error = 0;
220 
221 	if (fp->f_data)
222 		error = soclose((struct socket *)fp->f_data);
223 	fp->f_data = 0;
224 	return (error);
225 }
226