xref: /freebsd/sys/kern/uipc_accf.c (revision 195ebc7e9e4b129de810833791a19dfb4349d6a9)
1 /*-
2  * Copyright (c) 2000 Paycounter, Inc.
3  * Copyright (c) 2005 Robert N. M. Watson
4  * Author: Alfred Perlstein <alfred@paycounter.com>, <alfred@FreeBSD.org>
5  * 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  *
16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26  * SUCH DAMAGE.
27  */
28 
29 #include <sys/cdefs.h>
30 __FBSDID("$FreeBSD$");
31 
32 #define ACCEPT_FILTER_MOD
33 
34 #include "opt_param.h"
35 #include <sys/param.h>
36 #include <sys/systm.h>
37 #include <sys/domain.h>
38 #include <sys/kernel.h>
39 #include <sys/lock.h>
40 #include <sys/malloc.h>
41 #include <sys/mbuf.h>
42 #include <sys/module.h>
43 #include <sys/mutex.h>
44 #include <sys/protosw.h>
45 #include <sys/sysctl.h>
46 #include <sys/socket.h>
47 #include <sys/socketvar.h>
48 #include <sys/queue.h>
49 
50 static struct mtx accept_filter_mtx;
51 MTX_SYSINIT(accept_filter, &accept_filter_mtx, "accept_filter_mtx",
52 	MTX_DEF);
53 #define	ACCEPT_FILTER_LOCK()	mtx_lock(&accept_filter_mtx)
54 #define	ACCEPT_FILTER_UNLOCK()	mtx_unlock(&accept_filter_mtx)
55 
56 static SLIST_HEAD(, accept_filter) accept_filtlsthd =
57 	SLIST_HEAD_INITIALIZER(&accept_filtlsthd);
58 
59 MALLOC_DEFINE(M_ACCF, "accf", "accept filter data");
60 
61 static int unloadable = 0;
62 
63 SYSCTL_DECL(_net_inet);	/* XXX: some header should do this for me */
64 SYSCTL_NODE(_net_inet, OID_AUTO, accf, CTLFLAG_RW, 0, "Accept filters");
65 SYSCTL_INT(_net_inet_accf, OID_AUTO, unloadable, CTLFLAG_RW, &unloadable, 0,
66 	"Allow unload of accept filters (not recommended)");
67 
68 /*
69  * Must be passed a malloc'd structure so we don't explode if the kld is
70  * unloaded, we leak the struct on deallocation to deal with this, but if a
71  * filter is loaded with the same name as a leaked one we re-use the entry.
72  */
73 int
74 accept_filt_add(struct accept_filter *filt)
75 {
76 	struct accept_filter *p;
77 
78 	ACCEPT_FILTER_LOCK();
79 	SLIST_FOREACH(p, &accept_filtlsthd, accf_next)
80 		if (strcmp(p->accf_name, filt->accf_name) == 0)  {
81 			if (p->accf_callback != NULL) {
82 				ACCEPT_FILTER_UNLOCK();
83 				return (EEXIST);
84 			} else {
85 				p->accf_callback = filt->accf_callback;
86 				ACCEPT_FILTER_UNLOCK();
87 				free(filt, M_ACCF);
88 				return (0);
89 			}
90 		}
91 
92 	if (p == NULL)
93 		SLIST_INSERT_HEAD(&accept_filtlsthd, filt, accf_next);
94 	ACCEPT_FILTER_UNLOCK();
95 	return (0);
96 }
97 
98 int
99 accept_filt_del(char *name)
100 {
101 	struct accept_filter *p;
102 
103 	p = accept_filt_get(name);
104 	if (p == NULL)
105 		return (ENOENT);
106 
107 	p->accf_callback = NULL;
108 	return (0);
109 }
110 
111 struct accept_filter *
112 accept_filt_get(char *name)
113 {
114 	struct accept_filter *p;
115 
116 	ACCEPT_FILTER_LOCK();
117 	SLIST_FOREACH(p, &accept_filtlsthd, accf_next)
118 		if (strcmp(p->accf_name, name) == 0)
119 			break;
120 	ACCEPT_FILTER_UNLOCK();
121 
122 	return (p);
123 }
124 
125 int
126 accept_filt_generic_mod_event(module_t mod, int event, void *data)
127 {
128 	struct accept_filter *p;
129 	struct accept_filter *accfp = (struct accept_filter *) data;
130 	int error;
131 
132 	switch (event) {
133 	case MOD_LOAD:
134 		p = malloc(sizeof(*p), M_ACCF,
135 		    M_WAITOK);
136 		bcopy(accfp, p, sizeof(*p));
137 		error = accept_filt_add(p);
138 		break;
139 
140 	case MOD_UNLOAD:
141 		/*
142 		 * Do not support unloading yet. we don't keep track of
143 		 * refcounts and unloading an accept filter callback and then
144 		 * having it called is a bad thing.  A simple fix would be to
145 		 * track the refcount in the struct accept_filter.
146 		 */
147 		if (unloadable != 0) {
148 			error = accept_filt_del(accfp->accf_name);
149 		} else
150 			error = EOPNOTSUPP;
151 		break;
152 
153 	case MOD_SHUTDOWN:
154 		error = 0;
155 		break;
156 
157 	default:
158 		error = EOPNOTSUPP;
159 		break;
160 	}
161 
162 	return (error);
163 }
164 
165 int
166 do_getopt_accept_filter(struct socket *so, struct sockopt *sopt)
167 {
168 	struct accept_filter_arg *afap;
169 	int error;
170 
171 	error = 0;
172 	afap = malloc(sizeof(*afap), M_TEMP,
173 	    M_WAITOK | M_ZERO);
174 	SOCK_LOCK(so);
175 	if ((so->so_options & SO_ACCEPTCONN) == 0) {
176 		error = EINVAL;
177 		goto out;
178 	}
179 	if ((so->so_options & SO_ACCEPTFILTER) == 0) {
180 		error = EINVAL;
181 		goto out;
182 	}
183 	strcpy(afap->af_name, so->so_accf->so_accept_filter->accf_name);
184 	if (so->so_accf->so_accept_filter_str != NULL)
185 		strcpy(afap->af_arg, so->so_accf->so_accept_filter_str);
186 out:
187 	SOCK_UNLOCK(so);
188 	if (error == 0)
189 		error = sooptcopyout(sopt, afap, sizeof(*afap));
190 	free(afap, M_TEMP);
191 	return (error);
192 }
193 
194 int
195 do_setopt_accept_filter(struct socket *so, struct sockopt *sopt)
196 {
197 	struct accept_filter_arg *afap;
198 	struct accept_filter *afp;
199 	struct so_accf *newaf;
200 	int error = 0;
201 
202 	/*
203 	 * Handle the simple delete case first.
204 	 */
205 	if (sopt == NULL || sopt->sopt_val == NULL) {
206 		SOCK_LOCK(so);
207 		if ((so->so_options & SO_ACCEPTCONN) == 0) {
208 			SOCK_UNLOCK(so);
209 			return (EINVAL);
210 		}
211 		if (so->so_accf != NULL) {
212 			struct so_accf *af = so->so_accf;
213 			if (af->so_accept_filter != NULL &&
214 				af->so_accept_filter->accf_destroy != NULL) {
215 				af->so_accept_filter->accf_destroy(so);
216 			}
217 			if (af->so_accept_filter_str != NULL)
218 				free(af->so_accept_filter_str, M_ACCF);
219 			free(af, M_ACCF);
220 			so->so_accf = NULL;
221 		}
222 		so->so_options &= ~SO_ACCEPTFILTER;
223 		SOCK_UNLOCK(so);
224 		return (0);
225 	}
226 
227 	/*
228 	 * Pre-allocate any memory we may need later to avoid blocking at
229 	 * untimely moments.  This does not optimize for invalid arguments.
230 	 */
231 	afap = malloc(sizeof(*afap), M_TEMP,
232 	    M_WAITOK);
233 	error = sooptcopyin(sopt, afap, sizeof *afap, sizeof *afap);
234 	afap->af_name[sizeof(afap->af_name)-1] = '\0';
235 	afap->af_arg[sizeof(afap->af_arg)-1] = '\0';
236 	if (error) {
237 		free(afap, M_TEMP);
238 		return (error);
239 	}
240 	afp = accept_filt_get(afap->af_name);
241 	if (afp == NULL) {
242 		free(afap, M_TEMP);
243 		return (ENOENT);
244 	}
245 	/*
246 	 * Allocate the new accept filter instance storage.  We may
247 	 * have to free it again later if we fail to attach it.  If
248 	 * attached properly, 'newaf' is NULLed to avoid a free()
249 	 * while in use.
250 	 */
251 	newaf = malloc(sizeof(*newaf), M_ACCF, M_WAITOK |
252 	    M_ZERO);
253 	if (afp->accf_create != NULL && afap->af_name[0] != '\0') {
254 		int len = strlen(afap->af_name) + 1;
255 		newaf->so_accept_filter_str = malloc(len, M_ACCF,
256 		    M_WAITOK);
257 		strcpy(newaf->so_accept_filter_str, afap->af_name);
258 	}
259 
260 	/*
261 	 * Require a listen socket; don't try to replace an existing filter
262 	 * without first removing it.
263 	 */
264 	SOCK_LOCK(so);
265 	if (((so->so_options & SO_ACCEPTCONN) == 0) ||
266 	    (so->so_accf != NULL)) {
267 		error = EINVAL;
268 		goto out;
269 	}
270 
271 	/*
272 	 * Invoke the accf_create() method of the filter if required.  The
273 	 * socket mutex is held over this call, so create methods for filters
274 	 * can't block.
275 	 */
276 	if (afp->accf_create != NULL) {
277 		newaf->so_accept_filter_arg =
278 		    afp->accf_create(so, afap->af_arg);
279 		if (newaf->so_accept_filter_arg == NULL) {
280 			error = EINVAL;
281 			goto out;
282 		}
283 	}
284 	newaf->so_accept_filter = afp;
285 	so->so_accf = newaf;
286 	so->so_options |= SO_ACCEPTFILTER;
287 	newaf = NULL;
288 out:
289 	SOCK_UNLOCK(so);
290 	if (newaf != NULL) {
291 		if (newaf->so_accept_filter_str != NULL)
292 			free(newaf->so_accept_filter_str, M_ACCF);
293 		free(newaf, M_ACCF);
294 	}
295 	if (afap != NULL)
296 		free(afap, M_TEMP);
297 	return (error);
298 }
299