dksubr.c revision 1.69 1 1.69 mlelstv /* $NetBSD: dksubr.c,v 1.69 2015/08/16 17:26:16 mlelstv Exp $ */
2 1.1 elric
3 1.1 elric /*-
4 1.34 ad * Copyright (c) 1996, 1997, 1998, 1999, 2002, 2008 The NetBSD Foundation, Inc.
5 1.1 elric * All rights reserved.
6 1.1 elric *
7 1.1 elric * This code is derived from software contributed to The NetBSD Foundation
8 1.1 elric * by Jason R. Thorpe and Roland C. Dowdeswell.
9 1.1 elric *
10 1.1 elric * Redistribution and use in source and binary forms, with or without
11 1.1 elric * modification, are permitted provided that the following conditions
12 1.1 elric * are met:
13 1.1 elric * 1. Redistributions of source code must retain the above copyright
14 1.1 elric * notice, this list of conditions and the following disclaimer.
15 1.1 elric * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 elric * notice, this list of conditions and the following disclaimer in the
17 1.1 elric * documentation and/or other materials provided with the distribution.
18 1.1 elric *
19 1.1 elric * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 1.1 elric * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 1.1 elric * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 1.1 elric * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 1.1 elric * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 1.1 elric * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 1.1 elric * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 1.1 elric * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 1.1 elric * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 1.1 elric * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 1.1 elric * POSSIBILITY OF SUCH DAMAGE.
30 1.1 elric */
31 1.10 lukem
32 1.10 lukem #include <sys/cdefs.h>
33 1.69 mlelstv __KERNEL_RCSID(0, "$NetBSD: dksubr.c,v 1.69 2015/08/16 17:26:16 mlelstv Exp $");
34 1.1 elric
35 1.1 elric #include <sys/param.h>
36 1.1 elric #include <sys/systm.h>
37 1.1 elric #include <sys/stat.h>
38 1.1 elric #include <sys/proc.h>
39 1.1 elric #include <sys/ioctl.h>
40 1.1 elric #include <sys/device.h>
41 1.1 elric #include <sys/disk.h>
42 1.1 elric #include <sys/disklabel.h>
43 1.14 yamt #include <sys/buf.h>
44 1.14 yamt #include <sys/bufq.h>
45 1.1 elric #include <sys/vnode.h>
46 1.1 elric #include <sys/fcntl.h>
47 1.1 elric #include <sys/namei.h>
48 1.49 pgoyette #include <sys/module.h>
49 1.60 mlelstv #include <sys/syslog.h>
50 1.1 elric
51 1.1 elric #include <dev/dkvar.h>
52 1.51 hannken #include <miscfs/specfs/specdev.h> /* for v_rdev */
53 1.1 elric
54 1.44 elric int dkdebug = 0;
55 1.1 elric
56 1.1 elric #ifdef DEBUG
57 1.1 elric #define DKDB_FOLLOW 0x1
58 1.1 elric #define DKDB_INIT 0x2
59 1.1 elric #define DKDB_VNODE 0x4
60 1.1 elric
61 1.1 elric #define IFDEBUG(x,y) if (dkdebug & (x)) y
62 1.1 elric #define DPRINTF(x,y) IFDEBUG(x, printf y)
63 1.1 elric #define DPRINTF_FOLLOW(y) DPRINTF(DKDB_FOLLOW, y)
64 1.1 elric #else
65 1.1 elric #define IFDEBUG(x,y)
66 1.1 elric #define DPRINTF(x,y)
67 1.1 elric #define DPRINTF_FOLLOW(y)
68 1.1 elric #endif
69 1.1 elric
70 1.49 pgoyette static int dk_subr_modcmd(modcmd_t, void *);
71 1.49 pgoyette
72 1.1 elric #define DKLABELDEV(dev) \
73 1.1 elric (MAKEDISKDEV(major((dev)), DISKUNIT((dev)), RAW_PART))
74 1.1 elric
75 1.60 mlelstv static void dk_makedisklabel(struct dk_softc *);
76 1.1 elric
77 1.1 elric void
78 1.60 mlelstv dk_init(struct dk_softc *dksc, device_t dev, int dtype)
79 1.1 elric {
80 1.1 elric
81 1.1 elric memset(dksc, 0x0, sizeof(*dksc));
82 1.60 mlelstv dksc->sc_dtype = dtype;
83 1.60 mlelstv dksc->sc_dev = dev;
84 1.60 mlelstv
85 1.62 mlelstv strlcpy(dksc->sc_xname, device_xname(dev), DK_XNAME_SIZE);
86 1.1 elric dksc->sc_dkdev.dk_name = dksc->sc_xname;
87 1.1 elric }
88 1.1 elric
89 1.60 mlelstv void
90 1.60 mlelstv dk_attach(struct dk_softc *dksc)
91 1.60 mlelstv {
92 1.61 mlelstv dksc->sc_flags |= DKF_INITED;
93 1.61 mlelstv #ifdef DIAGNOSTIC
94 1.61 mlelstv dksc->sc_flags |= DKF_WARNLABEL | DKF_LABELSANITY;
95 1.61 mlelstv #endif
96 1.60 mlelstv }
97 1.60 mlelstv
98 1.60 mlelstv void
99 1.60 mlelstv dk_detach(struct dk_softc *dksc)
100 1.60 mlelstv {
101 1.60 mlelstv dksc->sc_flags &= ~DKF_INITED;
102 1.60 mlelstv }
103 1.60 mlelstv
104 1.1 elric /* ARGSUSED */
105 1.1 elric int
106 1.60 mlelstv dk_open(struct dk_softc *dksc, dev_t dev,
107 1.27 christos int flags, int fmt, struct lwp *l)
108 1.1 elric {
109 1.1 elric struct disklabel *lp = dksc->sc_dkdev.dk_label;
110 1.1 elric int part = DISKPART(dev);
111 1.1 elric int pmask = 1 << part;
112 1.1 elric int ret = 0;
113 1.16 yamt struct disk *dk = &dksc->sc_dkdev;
114 1.1 elric
115 1.39 cegger DPRINTF_FOLLOW(("dk_open(%s, %p, 0x%"PRIx64", 0x%x)\n",
116 1.60 mlelstv dksc->sc_xname, dksc, dev, flags));
117 1.1 elric
118 1.30 ad mutex_enter(&dk->dk_openlock);
119 1.16 yamt
120 1.16 yamt /*
121 1.16 yamt * If there are wedges, and this is not RAW_PART, then we
122 1.16 yamt * need to fail.
123 1.16 yamt */
124 1.16 yamt if (dk->dk_nwedges != 0 && part != RAW_PART) {
125 1.16 yamt ret = EBUSY;
126 1.16 yamt goto done;
127 1.16 yamt }
128 1.16 yamt
129 1.1 elric /*
130 1.1 elric * If we're init'ed and there are no other open partitions then
131 1.1 elric * update the in-core disklabel.
132 1.1 elric */
133 1.16 yamt if ((dksc->sc_flags & DKF_INITED)) {
134 1.60 mlelstv if ((dksc->sc_flags & DKF_VLABEL) == 0) {
135 1.60 mlelstv dksc->sc_flags |= DKF_VLABEL;
136 1.60 mlelstv dk_getdisklabel(dksc, dev);
137 1.16 yamt }
138 1.16 yamt }
139 1.1 elric
140 1.1 elric /* Fail if we can't find the partition. */
141 1.60 mlelstv if (part != RAW_PART &&
142 1.60 mlelstv ((dksc->sc_flags & DKF_VLABEL) == 0 ||
143 1.60 mlelstv part >= lp->d_npartitions ||
144 1.60 mlelstv lp->d_partitions[part].p_fstype == FS_UNUSED)) {
145 1.1 elric ret = ENXIO;
146 1.1 elric goto done;
147 1.1 elric }
148 1.1 elric
149 1.1 elric /* Mark our unit as open. */
150 1.1 elric switch (fmt) {
151 1.1 elric case S_IFCHR:
152 1.16 yamt dk->dk_copenmask |= pmask;
153 1.1 elric break;
154 1.1 elric case S_IFBLK:
155 1.16 yamt dk->dk_bopenmask |= pmask;
156 1.1 elric break;
157 1.1 elric }
158 1.1 elric
159 1.16 yamt dk->dk_openmask = dk->dk_copenmask | dk->dk_bopenmask;
160 1.1 elric
161 1.1 elric done:
162 1.30 ad mutex_exit(&dk->dk_openlock);
163 1.1 elric return ret;
164 1.1 elric }
165 1.1 elric
166 1.1 elric /* ARGSUSED */
167 1.1 elric int
168 1.60 mlelstv dk_close(struct dk_softc *dksc, dev_t dev,
169 1.27 christos int flags, int fmt, struct lwp *l)
170 1.1 elric {
171 1.60 mlelstv const struct dkdriver *dkd = dksc->sc_dkdev.dk_driver;
172 1.1 elric int part = DISKPART(dev);
173 1.1 elric int pmask = 1 << part;
174 1.16 yamt struct disk *dk = &dksc->sc_dkdev;
175 1.1 elric
176 1.39 cegger DPRINTF_FOLLOW(("dk_close(%s, %p, 0x%"PRIx64", 0x%x)\n",
177 1.60 mlelstv dksc->sc_xname, dksc, dev, flags));
178 1.1 elric
179 1.30 ad mutex_enter(&dk->dk_openlock);
180 1.1 elric
181 1.1 elric switch (fmt) {
182 1.1 elric case S_IFCHR:
183 1.16 yamt dk->dk_copenmask &= ~pmask;
184 1.1 elric break;
185 1.1 elric case S_IFBLK:
186 1.16 yamt dk->dk_bopenmask &= ~pmask;
187 1.1 elric break;
188 1.1 elric }
189 1.16 yamt dk->dk_openmask = dk->dk_copenmask | dk->dk_bopenmask;
190 1.1 elric
191 1.60 mlelstv if (dk->dk_openmask == 0) {
192 1.60 mlelstv if (dkd->d_lastclose != NULL)
193 1.60 mlelstv (*dkd->d_lastclose)(dksc->sc_dev);
194 1.64 mlelstv if ((dksc->sc_flags & DKF_KLABEL) == 0)
195 1.64 mlelstv dksc->sc_flags &= ~DKF_VLABEL;
196 1.60 mlelstv }
197 1.60 mlelstv
198 1.30 ad mutex_exit(&dk->dk_openlock);
199 1.1 elric return 0;
200 1.1 elric }
201 1.1 elric
202 1.1 elric void
203 1.60 mlelstv dk_strategy(struct dk_softc *dksc, struct buf *bp)
204 1.1 elric {
205 1.60 mlelstv const struct dkdriver *dkd = dksc->sc_dkdev.dk_driver;
206 1.55 mlelstv int s, part;
207 1.1 elric int wlabel;
208 1.18 yamt daddr_t blkno;
209 1.55 mlelstv struct disklabel *lp;
210 1.55 mlelstv struct disk *dk;
211 1.55 mlelstv uint64_t numsecs;
212 1.55 mlelstv unsigned secsize;
213 1.1 elric
214 1.1 elric DPRINTF_FOLLOW(("dk_strategy(%s, %p, %p)\n",
215 1.60 mlelstv dksc->sc_xname, dksc, bp));
216 1.1 elric
217 1.1 elric if (!(dksc->sc_flags & DKF_INITED)) {
218 1.25 dan DPRINTF_FOLLOW(("dk_strategy: not inited\n"));
219 1.1 elric bp->b_error = ENXIO;
220 1.2 elric biodone(bp);
221 1.1 elric return;
222 1.1 elric }
223 1.1 elric
224 1.55 mlelstv lp = dksc->sc_dkdev.dk_label;
225 1.55 mlelstv dk = &dksc->sc_dkdev;
226 1.55 mlelstv
227 1.55 mlelstv part = DISKPART(bp->b_dev);
228 1.55 mlelstv numsecs = dk->dk_geom.dg_secperunit;
229 1.55 mlelstv secsize = dk->dk_geom.dg_secsize;
230 1.1 elric
231 1.1 elric bp->b_resid = bp->b_bcount;
232 1.1 elric
233 1.55 mlelstv /*
234 1.55 mlelstv * The transfer must be a whole number of blocks and the offset must
235 1.55 mlelstv * not be negative.
236 1.67 skrll */
237 1.55 mlelstv if ((bp->b_bcount % secsize) != 0 || bp->b_blkno < 0) {
238 1.55 mlelstv bp->b_error = EINVAL;
239 1.55 mlelstv biodone(bp);
240 1.55 mlelstv return;
241 1.67 skrll }
242 1.55 mlelstv
243 1.1 elric /* If there is nothing to do, then we are done */
244 1.1 elric if (bp->b_bcount == 0) {
245 1.1 elric biodone(bp);
246 1.1 elric return;
247 1.1 elric }
248 1.1 elric
249 1.1 elric wlabel = dksc->sc_flags & (DKF_WLABEL|DKF_LABELLING);
250 1.55 mlelstv if (part == RAW_PART) {
251 1.55 mlelstv if (bounds_check_with_mediasize(bp, DEV_BSIZE, numsecs) <= 0) {
252 1.55 mlelstv biodone(bp);
253 1.55 mlelstv return;
254 1.55 mlelstv }
255 1.55 mlelstv } else {
256 1.55 mlelstv if (bounds_check_with_label(&dksc->sc_dkdev, bp, wlabel) <= 0) {
257 1.55 mlelstv biodone(bp);
258 1.55 mlelstv return;
259 1.55 mlelstv }
260 1.1 elric }
261 1.1 elric
262 1.67 skrll /*
263 1.66 mlelstv * Convert the block number to absolute and put it in terms
264 1.66 mlelstv * of the device's logical block size.
265 1.66 mlelstv */
266 1.66 mlelstv if (secsize >= DEV_BSIZE)
267 1.66 mlelstv blkno = bp->b_blkno / (secsize / DEV_BSIZE);
268 1.66 mlelstv else
269 1.66 mlelstv blkno = bp->b_blkno * (DEV_BSIZE / secsize);
270 1.66 mlelstv
271 1.55 mlelstv if (part != RAW_PART)
272 1.55 mlelstv blkno += lp->d_partitions[DISKPART(bp->b_dev)].p_offset;
273 1.18 yamt bp->b_rawblkno = blkno;
274 1.18 yamt
275 1.1 elric /*
276 1.1 elric * Start the unit by calling the start routine
277 1.1 elric * provided by the individual driver.
278 1.1 elric */
279 1.1 elric s = splbio();
280 1.40 yamt bufq_put(dksc->sc_bufq, bp);
281 1.60 mlelstv dkd->d_diskstart(dksc->sc_dev);
282 1.1 elric splx(s);
283 1.1 elric return;
284 1.1 elric }
285 1.1 elric
286 1.60 mlelstv void
287 1.60 mlelstv dk_done(struct dk_softc *dksc, struct buf *bp)
288 1.60 mlelstv {
289 1.60 mlelstv struct disk *dk = &dksc->sc_dkdev;
290 1.60 mlelstv
291 1.60 mlelstv if (bp->b_error != 0) {
292 1.68 mlelstv struct cfdriver *cd = device_cfdriver(dksc->sc_dev);
293 1.68 mlelstv
294 1.68 mlelstv diskerr(bp, cd->cd_name, "error", LOG_PRINTF, 0,
295 1.60 mlelstv dk->dk_label);
296 1.60 mlelstv printf("\n");
297 1.60 mlelstv }
298 1.60 mlelstv
299 1.60 mlelstv disk_unbusy(dk, bp->b_bcount - bp->b_resid, (bp->b_flags & B_READ));
300 1.60 mlelstv #ifdef notyet
301 1.60 mlelstv rnd_add_uint(&dksc->sc_rnd_source, bp->b_rawblkno);
302 1.60 mlelstv #endif
303 1.60 mlelstv biodone(bp);
304 1.60 mlelstv }
305 1.60 mlelstv
306 1.1 elric int
307 1.60 mlelstv dk_size(struct dk_softc *dksc, dev_t dev)
308 1.1 elric {
309 1.60 mlelstv const struct dkdriver *dkd = dksc->sc_dkdev.dk_driver;
310 1.1 elric struct disklabel *lp;
311 1.1 elric int is_open;
312 1.1 elric int part;
313 1.1 elric int size;
314 1.1 elric
315 1.1 elric if ((dksc->sc_flags & DKF_INITED) == 0)
316 1.1 elric return -1;
317 1.1 elric
318 1.1 elric part = DISKPART(dev);
319 1.1 elric is_open = dksc->sc_dkdev.dk_openmask & (1 << part);
320 1.1 elric
321 1.60 mlelstv if (!is_open && dkd->d_open(dev, 0, S_IFBLK, curlwp))
322 1.1 elric return -1;
323 1.1 elric
324 1.1 elric lp = dksc->sc_dkdev.dk_label;
325 1.1 elric if (lp->d_partitions[part].p_fstype != FS_SWAP)
326 1.1 elric size = -1;
327 1.1 elric else
328 1.1 elric size = lp->d_partitions[part].p_size *
329 1.1 elric (lp->d_secsize / DEV_BSIZE);
330 1.1 elric
331 1.60 mlelstv if (!is_open && dkd->d_close(dev, 0, S_IFBLK, curlwp))
332 1.59 mlelstv return -1;
333 1.1 elric
334 1.1 elric return size;
335 1.1 elric }
336 1.1 elric
337 1.1 elric int
338 1.60 mlelstv dk_ioctl(struct dk_softc *dksc, dev_t dev,
339 1.28 christos u_long cmd, void *data, int flag, struct lwp *l)
340 1.1 elric {
341 1.60 mlelstv const struct dkdriver *dkd = dksc->sc_dkdev.dk_driver;
342 1.1 elric struct disklabel *lp;
343 1.57 christos struct disk *dk = &dksc->sc_dkdev;
344 1.1 elric #ifdef __HAVE_OLD_DISKLABEL
345 1.1 elric struct disklabel newlabel;
346 1.1 elric #endif
347 1.57 christos int error;
348 1.1 elric
349 1.39 cegger DPRINTF_FOLLOW(("dk_ioctl(%s, %p, 0x%"PRIx64", 0x%lx)\n",
350 1.60 mlelstv dksc->sc_xname, dksc, dev, cmd));
351 1.1 elric
352 1.1 elric /* ensure that the pseudo disk is open for writes for these commands */
353 1.1 elric switch (cmd) {
354 1.1 elric case DIOCSDINFO:
355 1.1 elric case DIOCWDINFO:
356 1.1 elric #ifdef __HAVE_OLD_DISKLABEL
357 1.1 elric case ODIOCSDINFO:
358 1.1 elric case ODIOCWDINFO:
359 1.1 elric #endif
360 1.69 mlelstv case DIOCKLABEL:
361 1.1 elric case DIOCWLABEL:
362 1.43 elric case DIOCAWEDGE:
363 1.69 mlelstv case DIOCSSTRATEGY:
364 1.1 elric if ((flag & FWRITE) == 0)
365 1.1 elric return EBADF;
366 1.1 elric }
367 1.1 elric
368 1.1 elric /* ensure that the pseudo-disk is initialized for these */
369 1.1 elric switch (cmd) {
370 1.1 elric case DIOCGDINFO:
371 1.1 elric case DIOCSDINFO:
372 1.1 elric case DIOCWDINFO:
373 1.1 elric case DIOCGPART:
374 1.60 mlelstv case DIOCKLABEL:
375 1.1 elric case DIOCWLABEL:
376 1.1 elric case DIOCGDEFLABEL:
377 1.43 elric case DIOCAWEDGE:
378 1.43 elric case DIOCDWEDGE:
379 1.43 elric case DIOCLWEDGES:
380 1.54 mlelstv case DIOCMWEDGES:
381 1.43 elric case DIOCCACHESYNC:
382 1.1 elric #ifdef __HAVE_OLD_DISKLABEL
383 1.1 elric case ODIOCGDINFO:
384 1.1 elric case ODIOCSDINFO:
385 1.1 elric case ODIOCWDINFO:
386 1.1 elric case ODIOCGDEFLABEL:
387 1.1 elric #endif
388 1.1 elric if ((dksc->sc_flags & DKF_INITED) == 0)
389 1.1 elric return ENXIO;
390 1.1 elric }
391 1.1 elric
392 1.58 christos error = disk_ioctl(dk, dev, cmd, data, flag, l);
393 1.57 christos if (error != EPASSTHROUGH)
394 1.57 christos return error;
395 1.57 christos else
396 1.57 christos error = 0;
397 1.57 christos
398 1.1 elric switch (cmd) {
399 1.1 elric case DIOCWDINFO:
400 1.1 elric case DIOCSDINFO:
401 1.1 elric #ifdef __HAVE_OLD_DISKLABEL
402 1.1 elric case ODIOCWDINFO:
403 1.1 elric case ODIOCSDINFO:
404 1.1 elric #endif
405 1.1 elric #ifdef __HAVE_OLD_DISKLABEL
406 1.1 elric if (cmd == ODIOCSDINFO || cmd == ODIOCWDINFO) {
407 1.1 elric memset(&newlabel, 0, sizeof newlabel);
408 1.1 elric memcpy(&newlabel, data, sizeof (struct olddisklabel));
409 1.1 elric lp = &newlabel;
410 1.1 elric } else
411 1.1 elric #endif
412 1.1 elric lp = (struct disklabel *)data;
413 1.1 elric
414 1.30 ad mutex_enter(&dk->dk_openlock);
415 1.1 elric dksc->sc_flags |= DKF_LABELLING;
416 1.1 elric
417 1.1 elric error = setdisklabel(dksc->sc_dkdev.dk_label,
418 1.1 elric lp, 0, dksc->sc_dkdev.dk_cpulabel);
419 1.1 elric if (error == 0) {
420 1.1 elric if (cmd == DIOCWDINFO
421 1.1 elric #ifdef __HAVE_OLD_DISKLABEL
422 1.1 elric || cmd == ODIOCWDINFO
423 1.1 elric #endif
424 1.1 elric )
425 1.1 elric error = writedisklabel(DKLABELDEV(dev),
426 1.60 mlelstv dkd->d_strategy, dksc->sc_dkdev.dk_label,
427 1.1 elric dksc->sc_dkdev.dk_cpulabel);
428 1.1 elric }
429 1.1 elric
430 1.1 elric dksc->sc_flags &= ~DKF_LABELLING;
431 1.30 ad mutex_exit(&dk->dk_openlock);
432 1.1 elric break;
433 1.1 elric
434 1.60 mlelstv case DIOCKLABEL:
435 1.60 mlelstv if (*(int *)data != 0)
436 1.60 mlelstv dksc->sc_flags |= DKF_KLABEL;
437 1.60 mlelstv else
438 1.60 mlelstv dksc->sc_flags &= ~DKF_KLABEL;
439 1.60 mlelstv break;
440 1.60 mlelstv
441 1.1 elric case DIOCWLABEL:
442 1.1 elric if (*(int *)data != 0)
443 1.1 elric dksc->sc_flags |= DKF_WLABEL;
444 1.1 elric else
445 1.1 elric dksc->sc_flags &= ~DKF_WLABEL;
446 1.1 elric break;
447 1.1 elric
448 1.1 elric case DIOCGDEFLABEL:
449 1.60 mlelstv dk_getdefaultlabel(dksc, (struct disklabel *)data);
450 1.1 elric break;
451 1.1 elric
452 1.1 elric #ifdef __HAVE_OLD_DISKLABEL
453 1.1 elric case ODIOCGDEFLABEL:
454 1.60 mlelstv dk_getdefaultlabel(dksc, &newlabel);
455 1.1 elric if (newlabel.d_npartitions > OLDMAXPARTITIONS)
456 1.1 elric return ENOTTY;
457 1.1 elric memcpy(data, &newlabel, sizeof (struct olddisklabel));
458 1.1 elric break;
459 1.1 elric #endif
460 1.1 elric
461 1.21 yamt case DIOCGSTRATEGY:
462 1.21 yamt {
463 1.21 yamt struct disk_strategy *dks = (void *)data;
464 1.21 yamt int s;
465 1.21 yamt
466 1.21 yamt s = splbio();
467 1.21 yamt strlcpy(dks->dks_name, bufq_getstrategyname(dksc->sc_bufq),
468 1.21 yamt sizeof(dks->dks_name));
469 1.21 yamt splx(s);
470 1.21 yamt dks->dks_paramlen = 0;
471 1.21 yamt
472 1.21 yamt return 0;
473 1.21 yamt }
474 1.67 skrll
475 1.21 yamt case DIOCSSTRATEGY:
476 1.21 yamt {
477 1.21 yamt struct disk_strategy *dks = (void *)data;
478 1.21 yamt struct bufq_state *new;
479 1.21 yamt struct bufq_state *old;
480 1.21 yamt int s;
481 1.21 yamt
482 1.21 yamt if (dks->dks_param != NULL) {
483 1.21 yamt return EINVAL;
484 1.21 yamt }
485 1.21 yamt dks->dks_name[sizeof(dks->dks_name) - 1] = 0; /* ensure term */
486 1.21 yamt error = bufq_alloc(&new, dks->dks_name,
487 1.21 yamt BUFQ_EXACT|BUFQ_SORT_RAWBLOCK);
488 1.21 yamt if (error) {
489 1.21 yamt return error;
490 1.21 yamt }
491 1.21 yamt s = splbio();
492 1.21 yamt old = dksc->sc_bufq;
493 1.21 yamt bufq_move(new, old);
494 1.21 yamt dksc->sc_bufq = new;
495 1.21 yamt splx(s);
496 1.21 yamt bufq_free(old);
497 1.21 yamt
498 1.21 yamt return 0;
499 1.21 yamt }
500 1.21 yamt
501 1.1 elric default:
502 1.1 elric error = ENOTTY;
503 1.1 elric }
504 1.1 elric
505 1.1 elric return error;
506 1.1 elric }
507 1.1 elric
508 1.1 elric /*
509 1.1 elric * dk_dump dumps all of physical memory into the partition specified.
510 1.1 elric * This requires substantially more framework than {s,w}ddump, and hence
511 1.1 elric * is probably much more fragile.
512 1.1 elric *
513 1.1 elric */
514 1.1 elric
515 1.1 elric #define DKF_READYFORDUMP (DKF_INITED|DKF_TAKEDUMP)
516 1.1 elric #define DKFF_READYFORDUMP(x) (((x) & DKF_READYFORDUMP) == DKF_READYFORDUMP)
517 1.1 elric static volatile int dk_dumping = 0;
518 1.1 elric
519 1.1 elric /* ARGSUSED */
520 1.1 elric int
521 1.60 mlelstv dk_dump(struct dk_softc *dksc, dev_t dev,
522 1.60 mlelstv daddr_t blkno, void *vav, size_t size)
523 1.1 elric {
524 1.60 mlelstv const struct dkdriver *dkd = dksc->sc_dkdev.dk_driver;
525 1.60 mlelstv char *va = vav;
526 1.60 mlelstv struct disklabel *lp;
527 1.60 mlelstv int part, towrt, nsects, sectoff, maxblkcnt, nblk;
528 1.60 mlelstv int maxxfer, rv = 0;
529 1.1 elric
530 1.1 elric /*
531 1.1 elric * ensure that we consider this device to be safe for dumping,
532 1.1 elric * and that the device is configured.
533 1.1 elric */
534 1.1 elric if (!DKFF_READYFORDUMP(dksc->sc_flags))
535 1.1 elric return ENXIO;
536 1.1 elric
537 1.1 elric /* ensure that we are not already dumping */
538 1.1 elric if (dk_dumping)
539 1.1 elric return EFAULT;
540 1.1 elric dk_dumping = 1;
541 1.1 elric
542 1.60 mlelstv if (dkd->d_dumpblocks == NULL)
543 1.60 mlelstv return ENXIO;
544 1.60 mlelstv
545 1.60 mlelstv /* device specific max transfer size */
546 1.60 mlelstv maxxfer = MAXPHYS;
547 1.60 mlelstv if (dkd->d_iosize != NULL)
548 1.60 mlelstv (*dkd->d_iosize)(dksc->sc_dev, &maxxfer);
549 1.60 mlelstv
550 1.60 mlelstv /* Convert to disk sectors. Request must be a multiple of size. */
551 1.60 mlelstv part = DISKPART(dev);
552 1.60 mlelstv lp = dksc->sc_dkdev.dk_label;
553 1.60 mlelstv if ((size % lp->d_secsize) != 0)
554 1.60 mlelstv return (EFAULT);
555 1.60 mlelstv towrt = size / lp->d_secsize;
556 1.60 mlelstv blkno = dbtob(blkno) / lp->d_secsize; /* blkno in secsize units */
557 1.60 mlelstv
558 1.60 mlelstv nsects = lp->d_partitions[part].p_size;
559 1.60 mlelstv sectoff = lp->d_partitions[part].p_offset;
560 1.60 mlelstv
561 1.60 mlelstv /* Check transfer bounds against partition size. */
562 1.60 mlelstv if ((blkno < 0) || ((blkno + towrt) > nsects))
563 1.60 mlelstv return (EINVAL);
564 1.60 mlelstv
565 1.60 mlelstv /* Offset block number to start of partition. */
566 1.60 mlelstv blkno += sectoff;
567 1.60 mlelstv
568 1.60 mlelstv /* Start dumping and return when done. */
569 1.60 mlelstv maxblkcnt = howmany(maxxfer, lp->d_secsize);
570 1.60 mlelstv while (towrt > 0) {
571 1.60 mlelstv nblk = min(maxblkcnt, towrt);
572 1.60 mlelstv
573 1.60 mlelstv if ((rv = (*dkd->d_dumpblocks)(dksc->sc_dev, va, blkno, nblk)) != 0)
574 1.60 mlelstv return (rv);
575 1.60 mlelstv
576 1.60 mlelstv towrt -= nblk;
577 1.60 mlelstv blkno += nblk;
578 1.60 mlelstv va += nblk * lp->d_secsize;
579 1.60 mlelstv }
580 1.1 elric
581 1.1 elric dk_dumping = 0;
582 1.1 elric
583 1.60 mlelstv return 0;
584 1.1 elric }
585 1.1 elric
586 1.1 elric /* ARGSUSED */
587 1.1 elric void
588 1.63 christos dk_getdefaultlabel(struct dk_softc *dksc, struct disklabel *lp)
589 1.1 elric {
590 1.47 christos struct disk_geom *dg = &dksc->sc_dkdev.dk_geom;
591 1.4 elric
592 1.4 elric memset(lp, 0, sizeof(*lp));
593 1.1 elric
594 1.52 mlelstv if (dg->dg_secperunit > UINT32_MAX)
595 1.52 mlelstv lp->d_secperunit = UINT32_MAX;
596 1.52 mlelstv else
597 1.52 mlelstv lp->d_secperunit = dg->dg_secperunit;
598 1.47 christos lp->d_secsize = dg->dg_secsize;
599 1.47 christos lp->d_nsectors = dg->dg_nsectors;
600 1.47 christos lp->d_ntracks = dg->dg_ntracks;
601 1.47 christos lp->d_ncylinders = dg->dg_ncylinders;
602 1.1 elric lp->d_secpercyl = lp->d_ntracks * lp->d_nsectors;
603 1.1 elric
604 1.63 christos strlcpy(lp->d_typename, dksc->sc_xname, sizeof(lp->d_typename));
605 1.60 mlelstv lp->d_type = dksc->sc_dtype;
606 1.63 christos strlcpy(lp->d_packname, "fictitious", sizeof(lp->d_packname));
607 1.1 elric lp->d_rpm = 3600;
608 1.1 elric lp->d_interleave = 1;
609 1.1 elric lp->d_flags = 0;
610 1.1 elric
611 1.1 elric lp->d_partitions[RAW_PART].p_offset = 0;
612 1.52 mlelstv lp->d_partitions[RAW_PART].p_size = lp->d_secperunit;
613 1.1 elric lp->d_partitions[RAW_PART].p_fstype = FS_UNUSED;
614 1.1 elric lp->d_npartitions = RAW_PART + 1;
615 1.1 elric
616 1.1 elric lp->d_magic = DISKMAGIC;
617 1.1 elric lp->d_magic2 = DISKMAGIC;
618 1.1 elric lp->d_checksum = dkcksum(dksc->sc_dkdev.dk_label);
619 1.1 elric }
620 1.1 elric
621 1.1 elric /* ARGSUSED */
622 1.1 elric void
623 1.60 mlelstv dk_getdisklabel(struct dk_softc *dksc, dev_t dev)
624 1.1 elric {
625 1.60 mlelstv const struct dkdriver *dkd = dksc->sc_dkdev.dk_driver;
626 1.1 elric struct disklabel *lp = dksc->sc_dkdev.dk_label;
627 1.1 elric struct cpu_disklabel *clp = dksc->sc_dkdev.dk_cpulabel;
628 1.60 mlelstv struct disk_geom *dg = &dksc->sc_dkdev.dk_geom;
629 1.1 elric struct partition *pp;
630 1.1 elric int i;
631 1.5 dsl const char *errstring;
632 1.1 elric
633 1.1 elric memset(clp, 0x0, sizeof(*clp));
634 1.60 mlelstv dk_getdefaultlabel(dksc, lp);
635 1.60 mlelstv errstring = readdisklabel(DKLABELDEV(dev), dkd->d_strategy,
636 1.1 elric dksc->sc_dkdev.dk_label, dksc->sc_dkdev.dk_cpulabel);
637 1.1 elric if (errstring) {
638 1.60 mlelstv dk_makedisklabel(dksc);
639 1.1 elric if (dksc->sc_flags & DKF_WARNLABEL)
640 1.1 elric printf("%s: %s\n", dksc->sc_xname, errstring);
641 1.1 elric return;
642 1.1 elric }
643 1.1 elric
644 1.1 elric if ((dksc->sc_flags & DKF_LABELSANITY) == 0)
645 1.1 elric return;
646 1.1 elric
647 1.1 elric /* Sanity check */
648 1.53 mlelstv if (lp->d_secperunit < UINT32_MAX ?
649 1.53 mlelstv lp->d_secperunit != dg->dg_secperunit :
650 1.53 mlelstv lp->d_secperunit > dg->dg_secperunit)
651 1.53 mlelstv printf("WARNING: %s: total sector size in disklabel (%ju) "
652 1.53 mlelstv "!= the size of %s (%ju)\n", dksc->sc_xname,
653 1.60 mlelstv (uintmax_t)lp->d_secperunit, dksc->sc_xname,
654 1.53 mlelstv (uintmax_t)dg->dg_secperunit);
655 1.1 elric
656 1.1 elric for (i=0; i < lp->d_npartitions; i++) {
657 1.1 elric pp = &lp->d_partitions[i];
658 1.48 christos if (pp->p_offset + pp->p_size > dg->dg_secperunit)
659 1.1 elric printf("WARNING: %s: end of partition `%c' exceeds "
660 1.53 mlelstv "the size of %s (%ju)\n", dksc->sc_xname,
661 1.60 mlelstv 'a' + i, dksc->sc_xname,
662 1.53 mlelstv (uintmax_t)dg->dg_secperunit);
663 1.1 elric }
664 1.1 elric }
665 1.1 elric
666 1.1 elric /* ARGSUSED */
667 1.13 thorpej static void
668 1.60 mlelstv dk_makedisklabel(struct dk_softc *dksc)
669 1.1 elric {
670 1.1 elric struct disklabel *lp = dksc->sc_dkdev.dk_label;
671 1.1 elric
672 1.1 elric lp->d_partitions[RAW_PART].p_fstype = FS_BSDFFS;
673 1.63 christos strlcpy(lp->d_packname, "default label", sizeof(lp->d_packname));
674 1.1 elric lp->d_checksum = dkcksum(lp);
675 1.1 elric }
676 1.1 elric
677 1.1 elric /* This function is taken from ccd.c:1.76 --rcd */
678 1.1 elric
679 1.1 elric /*
680 1.1 elric * XXX this function looks too generic for dksubr.c, shouldn't we
681 1.1 elric * put it somewhere better?
682 1.1 elric */
683 1.1 elric
684 1.1 elric /*
685 1.1 elric * Lookup the provided name in the filesystem. If the file exists,
686 1.1 elric * is a valid block device, and isn't being used by anyone else,
687 1.1 elric * set *vpp to the file's vnode.
688 1.1 elric */
689 1.1 elric int
690 1.42 dholland dk_lookup(struct pathbuf *pb, struct lwp *l, struct vnode **vpp)
691 1.1 elric {
692 1.1 elric struct nameidata nd;
693 1.1 elric struct vnode *vp;
694 1.24 christos int error;
695 1.1 elric
696 1.24 christos if (l == NULL)
697 1.24 christos return ESRCH; /* Is ESRCH the best choice? */
698 1.24 christos
699 1.42 dholland NDINIT(&nd, LOOKUP, FOLLOW, pb);
700 1.24 christos if ((error = vn_open(&nd, FREAD | FWRITE, 0)) != 0) {
701 1.1 elric DPRINTF((DKDB_FOLLOW|DKDB_INIT),
702 1.1 elric ("dk_lookup: vn_open error = %d\n", error));
703 1.24 christos return error;
704 1.1 elric }
705 1.24 christos
706 1.1 elric vp = nd.ni_vp;
707 1.51 hannken if (vp->v_type != VBLK) {
708 1.51 hannken error = ENOTBLK;
709 1.24 christos goto out;
710 1.1 elric }
711 1.1 elric
712 1.51 hannken /* Reopen as anonymous vnode to protect against forced unmount. */
713 1.51 hannken if ((error = bdevvp(vp->v_rdev, vpp)) != 0)
714 1.24 christos goto out;
715 1.51 hannken VOP_UNLOCK(vp);
716 1.51 hannken if ((error = vn_close(vp, FREAD | FWRITE, l->l_cred)) != 0) {
717 1.51 hannken vrele(*vpp);
718 1.51 hannken return error;
719 1.51 hannken }
720 1.51 hannken if ((error = VOP_OPEN(*vpp, FREAD | FWRITE, l->l_cred)) != 0) {
721 1.51 hannken vrele(*vpp);
722 1.51 hannken return error;
723 1.24 christos }
724 1.51 hannken mutex_enter((*vpp)->v_interlock);
725 1.51 hannken (*vpp)->v_writecount++;
726 1.51 hannken mutex_exit((*vpp)->v_interlock);
727 1.24 christos
728 1.51 hannken IFDEBUG(DKDB_VNODE, vprint("dk_lookup: vnode info", *vpp));
729 1.1 elric
730 1.24 christos return 0;
731 1.24 christos out:
732 1.41 hannken VOP_UNLOCK(vp);
733 1.35 ad (void) vn_close(vp, FREAD | FWRITE, l->l_cred);
734 1.24 christos return error;
735 1.1 elric }
736 1.49 pgoyette
737 1.49 pgoyette MODULE(MODULE_CLASS_MISC, dk_subr, NULL);
738 1.49 pgoyette
739 1.49 pgoyette static int
740 1.49 pgoyette dk_subr_modcmd(modcmd_t cmd, void *arg)
741 1.49 pgoyette {
742 1.49 pgoyette switch (cmd) {
743 1.49 pgoyette case MODULE_CMD_INIT:
744 1.49 pgoyette case MODULE_CMD_FINI:
745 1.49 pgoyette return 0;
746 1.49 pgoyette case MODULE_CMD_STAT:
747 1.49 pgoyette case MODULE_CMD_AUTOUNLOAD:
748 1.49 pgoyette default:
749 1.49 pgoyette return ENOTTY;
750 1.49 pgoyette }
751 1.49 pgoyette }
752