bio.c revision 1.10.2.1 1 /* $NetBSD: bio.c,v 1.10.2.1 2014/08/10 06:54:50 tls Exp $ */
2 /* $OpenBSD: bio.c,v 1.9 2007/03/20 02:35:55 marco Exp $ */
3
4 /*
5 * Copyright (c) 2002 Niklas Hallqvist. 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 ``AS IS'' AND ANY EXPRESS OR
17 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
25 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26 */
27
28 /* A device controller ioctl tunnelling device. */
29
30 #include <sys/cdefs.h>
31 __KERNEL_RCSID(0, "$NetBSD: bio.c,v 1.10.2.1 2014/08/10 06:54:50 tls Exp $");
32
33 #include "opt_compat_netbsd.h"
34
35 #include <sys/param.h>
36 #include <sys/conf.h>
37 #include <sys/device.h>
38 #include <sys/event.h>
39 #include <sys/ioctl.h>
40 #include <sys/malloc.h>
41 #include <sys/queue.h>
42 #include <sys/systm.h>
43 #include <sys/mutex.h>
44 #include <sys/proc.h>
45 #include <sys/kauth.h>
46
47 #include <dev/biovar.h>
48
49 struct bio_mapping {
50 LIST_ENTRY(bio_mapping) bm_link;
51 device_t bm_dev;
52 int (*bm_ioctl)(device_t, u_long, void *);
53 };
54
55 static LIST_HEAD(, bio_mapping) bios = LIST_HEAD_INITIALIZER(bios);
56 static kmutex_t bio_lock;
57 static bool bio_lock_initialized = false;
58
59 static void bio_initialize(void);
60 static int bioclose(dev_t, int, int, struct lwp *);
61 static int bioioctl(dev_t, u_long, void *, int, struct lwp *);
62 static int bioopen(dev_t, int, int, struct lwp *);
63
64 static int bio_delegate_ioctl(void *, u_long, void *);
65 static struct bio_mapping *bio_lookup(char *);
66 static int bio_validate(void *);
67
68 void bioattach(int);
69
70 const struct cdevsw bio_cdevsw = {
71 .d_open = bioopen,
72 .d_close = bioclose,
73 .d_read = noread,
74 .d_write = nowrite,
75 .d_ioctl = bioioctl,
76 .d_stop = nostop,
77 .d_tty = notty,
78 .d_poll = nopoll,
79 .d_mmap = nommap,
80 .d_kqfilter = nokqfilter,
81 .d_discard = nodiscard,
82 .d_flag = D_OTHER | D_MPSAFE
83 };
84
85
86 static void
87 bio_initialize(void)
88 {
89 if (bio_lock_initialized)
90 return;
91
92 mutex_init(&bio_lock, MUTEX_DEFAULT, IPL_VM);
93 bio_lock_initialized = true;
94 }
95
96 void
97 bioattach(int nunits)
98 {
99 if (!bio_lock_initialized)
100 bio_initialize();
101 }
102
103 static int
104 bioopen(dev_t dev, int flags, int mode, struct lwp *l)
105 {
106 return 0;
107 }
108
109 static int
110 bioclose(dev_t dev, int flags, int mode, struct lwp *l)
111 {
112 return 0;
113 }
114
115 static int
116 bioioctl(dev_t dev, u_long cmd, void *addr, int flag, struct lwp *l)
117 {
118 struct bio_locate *locate;
119 struct bio_common *common;
120 char name[16];
121 int error;
122
123 switch(cmd) {
124 case BIOCLOCATE:
125 case BIOCINQ:
126 case BIOCDISK:
127 case BIOCDISK_NOVOL:
128 case BIOCVOL:
129 #ifdef COMPAT_30
130 case OBIOCDISK:
131 case OBIOCVOL:
132 #endif
133 error = kauth_authorize_device_passthru(l->l_cred, dev,
134 KAUTH_REQ_DEVICE_RAWIO_PASSTHRU_READCONF, addr);
135 if (error)
136 return error;
137 break;
138 case BIOCBLINK:
139 case BIOCSETSTATE:
140 case BIOCVOLOPS:
141 error = kauth_authorize_device_passthru(l->l_cred, dev,
142 KAUTH_REQ_DEVICE_RAWIO_PASSTHRU_WRITECONF, addr);
143 if (error)
144 return error;
145 break;
146 case BIOCALARM: {
147 struct bioc_alarm *alarm = (struct bioc_alarm *)addr;
148 switch (alarm->ba_opcode) {
149 case BIOC_SADISABLE:
150 case BIOC_SAENABLE:
151 case BIOC_SASILENCE:
152 case BIOC_SATEST:
153 error = kauth_authorize_device_passthru(l->l_cred, dev,
154 KAUTH_REQ_DEVICE_RAWIO_PASSTHRU_WRITECONF, addr);
155 if (error)
156 return error;
157 break;
158 case BIOC_GASTATUS:
159 error = kauth_authorize_device_passthru(l->l_cred, dev,
160 KAUTH_REQ_DEVICE_RAWIO_PASSTHRU_READCONF, addr);
161 if (error)
162 return error;
163 break;
164 default:
165 return EINVAL;
166 }
167 break;
168 }
169 default:
170 return ENOTTY;
171 }
172
173 switch (cmd) {
174 case BIOCLOCATE:
175 locate = addr;
176 error = copyinstr(locate->bl_name, name, sizeof(name), NULL);
177 if (error != 0)
178 return error;
179 locate->bl_cookie = bio_lookup(name);
180 if (locate->bl_cookie == NULL)
181 return ENOENT;
182 break;
183
184 default:
185 common = addr;
186 mutex_enter(&bio_lock);
187 if (!bio_validate(common->bc_cookie)) {
188 mutex_exit(&bio_lock);
189 return ENOENT;
190 }
191 mutex_exit(&bio_lock);
192 #ifdef COMPAT_30
193 switch (cmd) {
194 case OBIOCDISK: {
195 struct bioc_disk *bd =
196 malloc(sizeof(*bd), M_DEVBUF, M_WAITOK|M_ZERO);
197
198 (void)memcpy(bd, addr, sizeof(struct obioc_disk));
199 error = bio_delegate_ioctl(common->bc_cookie,
200 BIOCDISK, bd);
201 if (error) {
202 free(bd, M_DEVBUF);
203 return error;
204 }
205
206 (void)memcpy(addr, bd, sizeof(struct obioc_disk));
207 free(bd, M_DEVBUF);
208 return 0;
209 }
210 case OBIOCVOL: {
211 struct bioc_vol *bv =
212 malloc(sizeof(*bv), M_DEVBUF, M_WAITOK|M_ZERO);
213
214 (void)memcpy(bv, addr, sizeof(struct obioc_vol));
215 error = bio_delegate_ioctl(common->bc_cookie,
216 BIOCVOL, bv);
217 if (error) {
218 free(bv, M_DEVBUF);
219 return error;
220 }
221
222 (void)memcpy(addr, bv, sizeof(struct obioc_vol));
223 free(bv, M_DEVBUF);
224 return 0;
225 }
226 }
227 #endif
228 error = bio_delegate_ioctl(common->bc_cookie, cmd, addr);
229 return error;
230 }
231 return 0;
232 }
233
234 int
235 bio_register(device_t dev, int (*ioctl)(device_t, u_long, void *))
236 {
237 struct bio_mapping *bm;
238
239 if (!bio_lock_initialized)
240 bio_initialize();
241
242 bm = malloc(sizeof(*bm), M_DEVBUF, M_NOWAIT|M_ZERO);
243 if (bm == NULL)
244 return ENOMEM;
245 bm->bm_dev = dev;
246 bm->bm_ioctl = ioctl;
247 mutex_enter(&bio_lock);
248 LIST_INSERT_HEAD(&bios, bm, bm_link);
249 mutex_exit(&bio_lock);
250 return 0;
251 }
252
253 void
254 bio_unregister(device_t dev)
255 {
256 struct bio_mapping *bm, *next;
257
258 mutex_enter(&bio_lock);
259 for (bm = LIST_FIRST(&bios); bm != NULL; bm = next) {
260 next = LIST_NEXT(bm, bm_link);
261
262 if (dev == bm->bm_dev) {
263 LIST_REMOVE(bm, bm_link);
264 free(bm, M_DEVBUF);
265 }
266 }
267 mutex_exit(&bio_lock);
268 }
269
270 static struct bio_mapping *
271 bio_lookup(char *name)
272 {
273 struct bio_mapping *bm;
274
275 mutex_enter(&bio_lock);
276 LIST_FOREACH(bm, &bios, bm_link) {
277 if (strcmp(name, device_xname(bm->bm_dev)) == 0) {
278 mutex_exit(&bio_lock);
279 return bm;
280 }
281 }
282 mutex_exit(&bio_lock);
283 return NULL;
284 }
285
286 static int
287 bio_validate(void *cookie)
288 {
289 struct bio_mapping *bm;
290
291 LIST_FOREACH(bm, &bios, bm_link)
292 if (bm == cookie)
293 return 1;
294
295 return 0;
296 }
297
298 static int
299 bio_delegate_ioctl(void *cookie, u_long cmd, void *addr)
300 {
301 struct bio_mapping *bm = cookie;
302
303 return bm->bm_ioctl(bm->bm_dev, cmd, addr);
304 }
305