sd.c revision 1.192 1 1.192 fvdl /* $NetBSD: sd.c,v 1.192 2002/12/15 01:55:44 fvdl Exp $ */
2 1.33 cgd
3 1.134 mycroft /*-
4 1.134 mycroft * Copyright (c) 1998 The NetBSD Foundation, Inc.
5 1.134 mycroft * All rights reserved.
6 1.134 mycroft *
7 1.134 mycroft * This code is derived from software contributed to The NetBSD Foundation
8 1.134 mycroft * by Charles M. Hannum.
9 1.25 mycroft *
10 1.25 mycroft * Redistribution and use in source and binary forms, with or without
11 1.25 mycroft * modification, are permitted provided that the following conditions
12 1.25 mycroft * are met:
13 1.25 mycroft * 1. Redistributions of source code must retain the above copyright
14 1.25 mycroft * notice, this list of conditions and the following disclaimer.
15 1.25 mycroft * 2. Redistributions in binary form must reproduce the above copyright
16 1.25 mycroft * notice, this list of conditions and the following disclaimer in the
17 1.25 mycroft * documentation and/or other materials provided with the distribution.
18 1.25 mycroft * 3. All advertising materials mentioning features or use of this software
19 1.25 mycroft * must display the following acknowledgement:
20 1.134 mycroft * This product includes software developed by the NetBSD
21 1.134 mycroft * Foundation, Inc. and its contributors.
22 1.134 mycroft * 4. Neither the name of The NetBSD Foundation nor the names of its
23 1.134 mycroft * contributors may be used to endorse or promote products derived
24 1.134 mycroft * from this software without specific prior written permission.
25 1.25 mycroft *
26 1.134 mycroft * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 1.134 mycroft * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 1.134 mycroft * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 1.134 mycroft * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 1.134 mycroft * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 1.134 mycroft * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 1.134 mycroft * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 1.134 mycroft * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 1.134 mycroft * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 1.134 mycroft * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 1.134 mycroft * POSSIBILITY OF SUCH DAMAGE.
37 1.25 mycroft */
38 1.25 mycroft
39 1.75 mycroft /*
40 1.25 mycroft * Originally written by Julian Elischer (julian (at) dialix.oz.au)
41 1.8 deraadt * for TRW Financial Systems for use under the MACH(2.5) operating system.
42 1.1 cgd *
43 1.1 cgd * TRW Financial Systems, in accordance with their agreement with Carnegie
44 1.1 cgd * Mellon University, makes this software available to CMU to distribute
45 1.1 cgd * or use in any manner that they see fit as long as this message is kept with
46 1.1 cgd * the software. For this reason TFS also grants any other persons or
47 1.1 cgd * organisations permission to use or modify this software.
48 1.1 cgd *
49 1.1 cgd * TFS supplies this software to be publicly redistributed
50 1.1 cgd * on the understanding that TFS is not responsible for the correct
51 1.1 cgd * functioning of this software in any circumstances.
52 1.9 cgd *
53 1.25 mycroft * Ported to run under 386BSD by Julian Elischer (julian (at) dialix.oz.au) Sept 1992
54 1.1 cgd */
55 1.179 lukem
56 1.179 lukem #include <sys/cdefs.h>
57 1.192 fvdl __KERNEL_RCSID(0, "$NetBSD: sd.c,v 1.192 2002/12/15 01:55:44 fvdl Exp $");
58 1.1 cgd
59 1.128 mjacob #include "opt_scsi.h"
60 1.189 junyoung #include "opt_bufq.h"
61 1.121 explorer #include "rnd.h"
62 1.121 explorer
63 1.19 mycroft #include <sys/param.h>
64 1.19 mycroft #include <sys/systm.h>
65 1.54 mycroft #include <sys/kernel.h>
66 1.19 mycroft #include <sys/file.h>
67 1.19 mycroft #include <sys/stat.h>
68 1.19 mycroft #include <sys/ioctl.h>
69 1.140 bouyer #include <sys/scsiio.h>
70 1.19 mycroft #include <sys/buf.h>
71 1.19 mycroft #include <sys/uio.h>
72 1.19 mycroft #include <sys/malloc.h>
73 1.19 mycroft #include <sys/errno.h>
74 1.25 mycroft #include <sys/device.h>
75 1.19 mycroft #include <sys/disklabel.h>
76 1.25 mycroft #include <sys/disk.h>
77 1.87 christos #include <sys/proc.h>
78 1.95 christos #include <sys/conf.h>
79 1.147 thorpej #include <sys/vnode.h>
80 1.121 explorer #if NRND > 0
81 1.120 explorer #include <sys/rnd.h>
82 1.121 explorer #endif
83 1.19 mycroft
84 1.116 bouyer #include <dev/scsipi/scsipi_all.h>
85 1.116 bouyer #include <dev/scsipi/scsi_all.h>
86 1.124 cgd #include <dev/scsipi/scsipi_disk.h>
87 1.116 bouyer #include <dev/scsipi/scsi_disk.h>
88 1.116 bouyer #include <dev/scsipi/scsiconf.h>
89 1.124 cgd #include <dev/scsipi/sdvar.h>
90 1.124 cgd
91 1.124 cgd #include "sd.h" /* NSD_SCSIBUS and NSD_ATAPIBUS come from here */
92 1.1 cgd
93 1.36 cgd #define SDUNIT(dev) DISKUNIT(dev)
94 1.36 cgd #define SDPART(dev) DISKPART(dev)
95 1.148 enami #define SDMINOR(unit, part) DISKMINOR(unit, part)
96 1.36 cgd #define MAKESDDEV(maj, unit, part) MAKEDISKDEV(maj, unit, part)
97 1.36 cgd
98 1.36 cgd #define SDLABELDEV(dev) (MAKESDDEV(major(dev), SDUNIT(dev), RAW_PART))
99 1.1 cgd
100 1.87 christos int sdlock __P((struct sd_softc *));
101 1.87 christos void sdunlock __P((struct sd_softc *));
102 1.87 christos void sdminphys __P((struct buf *));
103 1.119 thorpej void sdgetdefaultlabel __P((struct sd_softc *, struct disklabel *));
104 1.87 christos void sdgetdisklabel __P((struct sd_softc *));
105 1.171 bouyer void sdstart __P((struct scsipi_periph *));
106 1.116 bouyer void sddone __P((struct scsipi_xfer *));
107 1.132 thorpej void sd_shutdown __P((void *));
108 1.87 christos int sd_reassign_blocks __P((struct sd_softc *, u_long));
109 1.127 mjacob int sd_interpret_sense __P((struct scsipi_xfer *));
110 1.89 thorpej
111 1.123 thorpej extern struct cfdriver sd_cd;
112 1.25 mycroft
113 1.187 gehenna dev_type_open(sdopen);
114 1.187 gehenna dev_type_close(sdclose);
115 1.187 gehenna dev_type_read(sdread);
116 1.187 gehenna dev_type_write(sdwrite);
117 1.187 gehenna dev_type_ioctl(sdioctl);
118 1.187 gehenna dev_type_strategy(sdstrategy);
119 1.187 gehenna dev_type_dump(sddump);
120 1.187 gehenna dev_type_size(sdsize);
121 1.187 gehenna
122 1.187 gehenna const struct bdevsw sd_bdevsw = {
123 1.187 gehenna sdopen, sdclose, sdstrategy, sdioctl, sddump, sdsize, D_DISK
124 1.187 gehenna };
125 1.187 gehenna
126 1.187 gehenna const struct cdevsw sd_cdevsw = {
127 1.187 gehenna sdopen, sdclose, sdread, sdwrite, sdioctl,
128 1.190 jdolecek nostop, notty, nopoll, nommap, nokqfilter, D_DISK
129 1.187 gehenna };
130 1.187 gehenna
131 1.25 mycroft struct dkdriver sddkdriver = { sdstrategy };
132 1.25 mycroft
133 1.171 bouyer const struct scsipi_periphsw sd_switch = {
134 1.127 mjacob sd_interpret_sense, /* check our error handler first */
135 1.25 mycroft sdstart, /* have a queue, served by this */
136 1.25 mycroft NULL, /* have no async handler */
137 1.84 thorpej sddone, /* deal with stats at interrupt time */
138 1.25 mycroft };
139 1.1 cgd
140 1.3 deraadt /*
141 1.171 bouyer * Attach routine common to atapi & scsi.
142 1.3 deraadt */
143 1.25 mycroft void
144 1.171 bouyer sdattach(parent, sd, periph, ops)
145 1.124 cgd struct device *parent;
146 1.124 cgd struct sd_softc *sd;
147 1.171 bouyer struct scsipi_periph *periph;
148 1.124 cgd const struct sd_ops *ops;
149 1.1 cgd {
150 1.124 cgd int error, result;
151 1.25 mycroft struct disk_parms *dp = &sd->params;
152 1.145 lukem char pbuf[9];
153 1.25 mycroft
154 1.171 bouyer SC_DEBUG(periph, SCSIPI_DB2, ("sdattach: "));
155 1.25 mycroft
156 1.189 junyoung #ifdef NEW_BUFQ_STRATEGY
157 1.189 junyoung bufq_alloc(&sd->buf_queue, BUFQ_READ_PRIO|BUFQ_SORT_RAWBLOCK);
158 1.189 junyoung #else
159 1.185 hannken bufq_alloc(&sd->buf_queue, BUFQ_DISKSORT|BUFQ_SORT_RAWBLOCK);
160 1.189 junyoung #endif
161 1.155 thorpej
162 1.25 mycroft /*
163 1.25 mycroft * Store information needed to contact our base driver
164 1.25 mycroft */
165 1.171 bouyer sd->sc_periph = periph;
166 1.124 cgd sd->sc_ops = ops;
167 1.171 bouyer
168 1.171 bouyer periph->periph_dev = &sd->sc_dev;
169 1.171 bouyer periph->periph_switch = &sd_switch;
170 1.171 bouyer
171 1.171 bouyer /*
172 1.171 bouyer * Increase our openings to the maximum-per-periph
173 1.171 bouyer * supported by the adapter. This will either be
174 1.171 bouyer * clamped down or grown by the adapter if necessary.
175 1.171 bouyer */
176 1.171 bouyer periph->periph_openings =
177 1.171 bouyer SCSIPI_CHAN_MAX_PERIPH(periph->periph_channel);
178 1.171 bouyer periph->periph_flags |= PERIPH_GROW_OPENINGS;
179 1.3 deraadt
180 1.81 thorpej /*
181 1.84 thorpej * Initialize and attach the disk structure.
182 1.81 thorpej */
183 1.84 thorpej sd->sc_dk.dk_driver = &sddkdriver;
184 1.84 thorpej sd->sc_dk.dk_name = sd->sc_dev.dv_xname;
185 1.84 thorpej disk_attach(&sd->sc_dk);
186 1.81 thorpej
187 1.3 deraadt /*
188 1.165 soren * Use the subdriver to request information regarding the drive.
189 1.3 deraadt */
190 1.104 christos printf("\n");
191 1.105 matthias
192 1.171 bouyer error = scsipi_start(periph, SSS_START,
193 1.149 thorpej XS_CTL_DISCOVERY | XS_CTL_IGNORE_ILLEGAL_REQUEST |
194 1.149 thorpej XS_CTL_IGNORE_MEDIA_CHANGE | XS_CTL_SILENT);
195 1.105 matthias
196 1.124 cgd if (error)
197 1.124 cgd result = SDGP_RESULT_OFFLINE;
198 1.51 mycroft else
199 1.124 cgd result = (*sd->sc_ops->sdo_get_parms)(sd, &sd->params,
200 1.149 thorpej XS_CTL_DISCOVERY);
201 1.124 cgd printf("%s: ", sd->sc_dev.dv_xname);
202 1.124 cgd switch (result) {
203 1.124 cgd case SDGP_RESULT_OK:
204 1.145 lukem format_bytes(pbuf, sizeof(pbuf),
205 1.145 lukem (u_int64_t)dp->disksize * dp->blksize);
206 1.145 lukem printf(
207 1.183 bouyer "%s, %ld cyl, %ld head, %ld sec, %ld bytes/sect x %lu sectors",
208 1.145 lukem pbuf, dp->cyls, dp->heads, dp->sectors, dp->blksize,
209 1.145 lukem dp->disksize);
210 1.124 cgd break;
211 1.124 cgd
212 1.124 cgd case SDGP_RESULT_OFFLINE:
213 1.124 cgd printf("drive offline");
214 1.124 cgd break;
215 1.124 cgd
216 1.124 cgd case SDGP_RESULT_UNFORMATTED:
217 1.124 cgd printf("unformatted media");
218 1.124 cgd break;
219 1.124 cgd
220 1.124 cgd #ifdef DIAGNOSTIC
221 1.124 cgd default:
222 1.124 cgd panic("sdattach: unknown result from get_parms");
223 1.124 cgd break;
224 1.124 cgd #endif
225 1.124 cgd }
226 1.124 cgd printf("\n");
227 1.120 explorer
228 1.132 thorpej /*
229 1.132 thorpej * Establish a shutdown hook so that we can ensure that
230 1.132 thorpej * our data has actually made it onto the platter at
231 1.132 thorpej * shutdown time. Note that this relies on the fact
232 1.132 thorpej * that the shutdown hook code puts us at the head of
233 1.132 thorpej * the list (thus guaranteeing that our hook runs before
234 1.132 thorpej * our ancestors').
235 1.132 thorpej */
236 1.132 thorpej if ((sd->sc_sdhook =
237 1.132 thorpej shutdownhook_establish(sd_shutdown, sd)) == NULL)
238 1.132 thorpej printf("%s: WARNING: unable to establish shutdown hook\n",
239 1.132 thorpej sd->sc_dev.dv_xname);
240 1.132 thorpej
241 1.121 explorer #if NRND > 0
242 1.120 explorer /*
243 1.120 explorer * attach the device into the random source list
244 1.120 explorer */
245 1.144 explorer rnd_attach_source(&sd->rnd_source, sd->sc_dev.dv_xname,
246 1.144 explorer RND_TYPE_DISK, 0);
247 1.121 explorer #endif
248 1.1 cgd }
249 1.1 cgd
250 1.147 thorpej int
251 1.147 thorpej sdactivate(self, act)
252 1.147 thorpej struct device *self;
253 1.147 thorpej enum devact act;
254 1.147 thorpej {
255 1.147 thorpej int rv = 0;
256 1.147 thorpej
257 1.147 thorpej switch (act) {
258 1.147 thorpej case DVACT_ACTIVATE:
259 1.147 thorpej rv = EOPNOTSUPP;
260 1.147 thorpej break;
261 1.147 thorpej
262 1.147 thorpej case DVACT_DEACTIVATE:
263 1.147 thorpej /*
264 1.147 thorpej * Nothing to do; we key off the device's DVF_ACTIVE.
265 1.147 thorpej */
266 1.147 thorpej break;
267 1.147 thorpej }
268 1.147 thorpej return (rv);
269 1.147 thorpej }
270 1.147 thorpej
271 1.147 thorpej int
272 1.147 thorpej sddetach(self, flags)
273 1.147 thorpej struct device *self;
274 1.147 thorpej int flags;
275 1.147 thorpej {
276 1.147 thorpej struct sd_softc *sd = (struct sd_softc *) self;
277 1.147 thorpej struct buf *bp;
278 1.174 drochner int s, bmaj, cmaj, i, mn;
279 1.147 thorpej
280 1.147 thorpej /* locate the major number */
281 1.187 gehenna bmaj = bdevsw_lookup_major(&sd_bdevsw);
282 1.187 gehenna cmaj = cdevsw_lookup_major(&sd_cdevsw);
283 1.147 thorpej
284 1.147 thorpej s = splbio();
285 1.147 thorpej
286 1.147 thorpej /* Kill off any queued buffers. */
287 1.184 hannken while ((bp = BUFQ_GET(&sd->buf_queue)) != NULL) {
288 1.147 thorpej bp->b_error = EIO;
289 1.147 thorpej bp->b_flags |= B_ERROR;
290 1.147 thorpej bp->b_resid = bp->b_bcount;
291 1.147 thorpej biodone(bp);
292 1.147 thorpej }
293 1.185 hannken
294 1.185 hannken bufq_free(&sd->buf_queue);
295 1.147 thorpej
296 1.147 thorpej /* Kill off any pending commands. */
297 1.171 bouyer scsipi_kill_pending(sd->sc_periph);
298 1.147 thorpej
299 1.147 thorpej splx(s);
300 1.147 thorpej
301 1.158 soren /* Nuke the vnodes for any open instances */
302 1.174 drochner for (i = 0; i < MAXPARTITIONS; i++) {
303 1.174 drochner mn = SDMINOR(self->dv_unit, i);
304 1.174 drochner vdevgone(bmaj, mn, mn, VBLK);
305 1.174 drochner vdevgone(cmaj, mn, mn, VCHR);
306 1.174 drochner }
307 1.147 thorpej
308 1.147 thorpej /* Detach from the disk list. */
309 1.147 thorpej disk_detach(&sd->sc_dk);
310 1.147 thorpej
311 1.147 thorpej /* Get rid of the shutdown hook. */
312 1.147 thorpej shutdownhook_disestablish(sd->sc_sdhook);
313 1.147 thorpej
314 1.147 thorpej #if NRND > 0
315 1.147 thorpej /* Unhook the entropy source. */
316 1.147 thorpej rnd_detach_source(&sd->rnd_source);
317 1.147 thorpej #endif
318 1.147 thorpej
319 1.147 thorpej return (0);
320 1.147 thorpej }
321 1.147 thorpej
322 1.65 mycroft /*
323 1.65 mycroft * Wait interruptibly for an exclusive lock.
324 1.65 mycroft *
325 1.65 mycroft * XXX
326 1.65 mycroft * Several drivers do this; it should be abstracted and made MP-safe.
327 1.65 mycroft */
328 1.61 mycroft int
329 1.65 mycroft sdlock(sd)
330 1.61 mycroft struct sd_softc *sd;
331 1.61 mycroft {
332 1.61 mycroft int error;
333 1.61 mycroft
334 1.61 mycroft while ((sd->flags & SDF_LOCKED) != 0) {
335 1.61 mycroft sd->flags |= SDF_WANTED;
336 1.61 mycroft if ((error = tsleep(sd, PRIBIO | PCATCH, "sdlck", 0)) != 0)
337 1.118 enami return (error);
338 1.61 mycroft }
339 1.65 mycroft sd->flags |= SDF_LOCKED;
340 1.118 enami return (0);
341 1.61 mycroft }
342 1.61 mycroft
343 1.65 mycroft /*
344 1.65 mycroft * Unlock and wake up any waiters.
345 1.65 mycroft */
346 1.61 mycroft void
347 1.61 mycroft sdunlock(sd)
348 1.61 mycroft struct sd_softc *sd;
349 1.61 mycroft {
350 1.61 mycroft
351 1.61 mycroft sd->flags &= ~SDF_LOCKED;
352 1.61 mycroft if ((sd->flags & SDF_WANTED) != 0) {
353 1.61 mycroft sd->flags &= ~SDF_WANTED;
354 1.61 mycroft wakeup(sd);
355 1.61 mycroft }
356 1.61 mycroft }
357 1.61 mycroft
358 1.3 deraadt /*
359 1.25 mycroft * open the device. Make sure the partition info is a up-to-date as can be.
360 1.3 deraadt */
361 1.3 deraadt int
362 1.87 christos sdopen(dev, flag, fmt, p)
363 1.25 mycroft dev_t dev;
364 1.37 mycroft int flag, fmt;
365 1.87 christos struct proc *p;
366 1.1 cgd {
367 1.51 mycroft struct sd_softc *sd;
368 1.171 bouyer struct scsipi_periph *periph;
369 1.171 bouyer struct scsipi_adapter *adapt;
370 1.65 mycroft int unit, part;
371 1.65 mycroft int error;
372 1.1 cgd
373 1.25 mycroft unit = SDUNIT(dev);
374 1.89 thorpej if (unit >= sd_cd.cd_ndevs)
375 1.118 enami return (ENXIO);
376 1.89 thorpej sd = sd_cd.cd_devs[unit];
377 1.112 pk if (sd == NULL)
378 1.118 enami return (ENXIO);
379 1.3 deraadt
380 1.147 thorpej if ((sd->sc_dev.dv_flags & DVF_ACTIVE) == 0)
381 1.147 thorpej return (ENODEV);
382 1.147 thorpej
383 1.171 bouyer periph = sd->sc_periph;
384 1.171 bouyer adapt = periph->periph_channel->chan_adapter;
385 1.140 bouyer part = SDPART(dev);
386 1.25 mycroft
387 1.171 bouyer SC_DEBUG(periph, SCSIPI_DB1,
388 1.98 christos ("sdopen: dev=0x%x (unit %d (of %d), partition %d)\n", dev, unit,
389 1.140 bouyer sd_cd.cd_ndevs, part));
390 1.3 deraadt
391 1.137 thorpej /*
392 1.137 thorpej * If this is the first open of this device, add a reference
393 1.137 thorpej * to the adapter.
394 1.137 thorpej */
395 1.137 thorpej if (sd->sc_dk.dk_openmask == 0 &&
396 1.171 bouyer (error = scsipi_adapter_addref(adapt)) != 0)
397 1.137 thorpej return (error);
398 1.137 thorpej
399 1.87 christos if ((error = sdlock(sd)) != 0)
400 1.137 thorpej goto bad4;
401 1.45 mycroft
402 1.171 bouyer if ((periph->periph_flags & PERIPH_OPEN) != 0) {
403 1.47 mycroft /*
404 1.47 mycroft * If any partition is open, but the disk has been invalidated,
405 1.140 bouyer * disallow further opens of non-raw partition
406 1.47 mycroft */
407 1.171 bouyer if ((periph->periph_flags & PERIPH_MEDIA_LOADED) == 0 &&
408 1.141 bouyer (part != RAW_PART || fmt != S_IFCHR)) {
409 1.66 mycroft error = EIO;
410 1.66 mycroft goto bad3;
411 1.66 mycroft }
412 1.47 mycroft } else {
413 1.55 mycroft /* Check that it is still responding and ok. */
414 1.171 bouyer error = scsipi_test_unit_ready(periph,
415 1.149 thorpej XS_CTL_IGNORE_ILLEGAL_REQUEST | XS_CTL_IGNORE_MEDIA_CHANGE |
416 1.149 thorpej XS_CTL_IGNORE_NOT_READY);
417 1.87 christos if (error)
418 1.57 mycroft goto bad3;
419 1.57 mycroft
420 1.140 bouyer /*
421 1.140 bouyer * Start the pack spinning if necessary. Always allow the
422 1.140 bouyer * raw parition to be opened, for raw IOCTLs. Data transfers
423 1.140 bouyer * will check for SDEV_MEDIA_LOADED.
424 1.140 bouyer */
425 1.171 bouyer error = scsipi_start(periph, SSS_START,
426 1.149 thorpej XS_CTL_IGNORE_ILLEGAL_REQUEST |
427 1.149 thorpej XS_CTL_IGNORE_MEDIA_CHANGE | XS_CTL_SILENT);
428 1.140 bouyer if (error) {
429 1.141 bouyer if (part != RAW_PART || fmt != S_IFCHR)
430 1.140 bouyer goto bad3;
431 1.140 bouyer else
432 1.140 bouyer goto out;
433 1.140 bouyer }
434 1.57 mycroft
435 1.171 bouyer periph->periph_flags |= PERIPH_OPEN;
436 1.48 mycroft
437 1.171 bouyer if (periph->periph_flags & PERIPH_REMOVABLE) {
438 1.170 explorer /* Lock the pack in. */
439 1.171 bouyer error = scsipi_prevent(periph, PR_PREVENT,
440 1.171 bouyer XS_CTL_IGNORE_ILLEGAL_REQUEST |
441 1.171 bouyer XS_CTL_IGNORE_MEDIA_CHANGE);
442 1.170 explorer if (error)
443 1.170 explorer goto bad;
444 1.170 explorer }
445 1.54 mycroft
446 1.171 bouyer if ((periph->periph_flags & PERIPH_MEDIA_LOADED) == 0) {
447 1.171 bouyer periph->periph_flags |= PERIPH_MEDIA_LOADED;
448 1.3 deraadt
449 1.124 cgd /*
450 1.124 cgd * Load the physical device parameters.
451 1.124 cgd *
452 1.124 cgd * Note that if media is present but unformatted,
453 1.124 cgd * we allow the open (so that it can be formatted!).
454 1.124 cgd * The drive should refuse real I/O, if the media is
455 1.124 cgd * unformatted.
456 1.124 cgd */
457 1.124 cgd if ((*sd->sc_ops->sdo_get_parms)(sd, &sd->params,
458 1.124 cgd 0) == SDGP_RESULT_OFFLINE) {
459 1.45 mycroft error = ENXIO;
460 1.45 mycroft goto bad2;
461 1.45 mycroft }
462 1.171 bouyer SC_DEBUG(periph, SCSIPI_DB3, ("Params loaded "));
463 1.45 mycroft
464 1.45 mycroft /* Load the partition info if not already loaded. */
465 1.45 mycroft sdgetdisklabel(sd);
466 1.171 bouyer SC_DEBUG(periph, SCSIPI_DB3, ("Disklabel loaded "));
467 1.45 mycroft }
468 1.65 mycroft }
469 1.25 mycroft
470 1.47 mycroft /* Check that the partition exists. */
471 1.37 mycroft if (part != RAW_PART &&
472 1.84 thorpej (part >= sd->sc_dk.dk_label->d_npartitions ||
473 1.84 thorpej sd->sc_dk.dk_label->d_partitions[part].p_fstype == FS_UNUSED)) {
474 1.25 mycroft error = ENXIO;
475 1.25 mycroft goto bad;
476 1.1 cgd }
477 1.3 deraadt
478 1.140 bouyer out: /* Insure only one open at a time. */
479 1.37 mycroft switch (fmt) {
480 1.37 mycroft case S_IFCHR:
481 1.40 mycroft sd->sc_dk.dk_copenmask |= (1 << part);
482 1.37 mycroft break;
483 1.37 mycroft case S_IFBLK:
484 1.40 mycroft sd->sc_dk.dk_bopenmask |= (1 << part);
485 1.37 mycroft break;
486 1.1 cgd }
487 1.118 enami sd->sc_dk.dk_openmask =
488 1.118 enami sd->sc_dk.dk_copenmask | sd->sc_dk.dk_bopenmask;
489 1.37 mycroft
490 1.171 bouyer SC_DEBUG(periph, SCSIPI_DB3, ("open complete\n"));
491 1.65 mycroft sdunlock(sd);
492 1.118 enami return (0);
493 1.1 cgd
494 1.45 mycroft bad2:
495 1.171 bouyer periph->periph_flags &= ~PERIPH_MEDIA_LOADED;
496 1.45 mycroft
497 1.25 mycroft bad:
498 1.40 mycroft if (sd->sc_dk.dk_openmask == 0) {
499 1.171 bouyer scsipi_prevent(periph, PR_ALLOW,
500 1.149 thorpej XS_CTL_IGNORE_ILLEGAL_REQUEST | XS_CTL_IGNORE_MEDIA_CHANGE);
501 1.171 bouyer periph->periph_flags &= ~PERIPH_OPEN;
502 1.65 mycroft }
503 1.45 mycroft
504 1.57 mycroft bad3:
505 1.65 mycroft sdunlock(sd);
506 1.137 thorpej bad4:
507 1.137 thorpej if (sd->sc_dk.dk_openmask == 0)
508 1.171 bouyer scsipi_adapter_delref(adapt);
509 1.118 enami return (error);
510 1.1 cgd }
511 1.1 cgd
512 1.3 deraadt /*
513 1.25 mycroft * close the device.. only called if we are the LAST occurence of an open
514 1.25 mycroft * device. Convenient now but usually a pain.
515 1.3 deraadt */
516 1.87 christos int
517 1.87 christos sdclose(dev, flag, fmt, p)
518 1.25 mycroft dev_t dev;
519 1.37 mycroft int flag, fmt;
520 1.87 christos struct proc *p;
521 1.1 cgd {
522 1.89 thorpej struct sd_softc *sd = sd_cd.cd_devs[SDUNIT(dev)];
523 1.171 bouyer struct scsipi_periph *periph = sd->sc_periph;
524 1.171 bouyer struct scsipi_adapter *adapt = periph->periph_channel->chan_adapter;
525 1.37 mycroft int part = SDPART(dev);
526 1.65 mycroft int error;
527 1.65 mycroft
528 1.87 christos if ((error = sdlock(sd)) != 0)
529 1.118 enami return (error);
530 1.37 mycroft
531 1.37 mycroft switch (fmt) {
532 1.37 mycroft case S_IFCHR:
533 1.40 mycroft sd->sc_dk.dk_copenmask &= ~(1 << part);
534 1.37 mycroft break;
535 1.37 mycroft case S_IFBLK:
536 1.40 mycroft sd->sc_dk.dk_bopenmask &= ~(1 << part);
537 1.37 mycroft break;
538 1.37 mycroft }
539 1.118 enami sd->sc_dk.dk_openmask =
540 1.118 enami sd->sc_dk.dk_copenmask | sd->sc_dk.dk_bopenmask;
541 1.25 mycroft
542 1.40 mycroft if (sd->sc_dk.dk_openmask == 0) {
543 1.132 thorpej /*
544 1.132 thorpej * If the disk cache needs flushing, and the disk supports
545 1.132 thorpej * it, do it now.
546 1.132 thorpej */
547 1.132 thorpej if ((sd->flags & SDF_DIRTY) != 0 &&
548 1.146 hannken sd->sc_ops->sdo_flush != NULL) {
549 1.146 hannken if ((*sd->sc_ops->sdo_flush)(sd, 0)) {
550 1.146 hannken printf("%s: cache synchronization failed\n",
551 1.146 hannken sd->sc_dev.dv_xname);
552 1.146 hannken sd->flags &= ~SDF_FLUSHING;
553 1.146 hannken } else
554 1.146 hannken sd->flags &= ~(SDF_FLUSHING|SDF_DIRTY);
555 1.146 hannken }
556 1.132 thorpej
557 1.171 bouyer if (! (periph->periph_flags & PERIPH_KEEP_LABEL))
558 1.171 bouyer periph->periph_flags &= ~PERIPH_MEDIA_LOADED;
559 1.171 bouyer
560 1.171 bouyer scsipi_wait_drain(periph);
561 1.47 mycroft
562 1.171 bouyer if (periph->periph_flags & PERIPH_REMOVABLE) {
563 1.171 bouyer scsipi_prevent(periph, PR_ALLOW,
564 1.171 bouyer XS_CTL_IGNORE_ILLEGAL_REQUEST |
565 1.171 bouyer XS_CTL_IGNORE_NOT_READY);
566 1.170 explorer }
567 1.171 bouyer periph->periph_flags &= ~PERIPH_OPEN;
568 1.170 explorer
569 1.171 bouyer scsipi_wait_drain(periph);
570 1.138 thorpej
571 1.171 bouyer scsipi_adapter_delref(adapt);
572 1.1 cgd }
573 1.47 mycroft
574 1.65 mycroft sdunlock(sd);
575 1.118 enami return (0);
576 1.1 cgd }
577 1.1 cgd
578 1.3 deraadt /*
579 1.25 mycroft * Actually translate the requested transfer into one the physical driver
580 1.25 mycroft * can understand. The transfer is described by a buf and will include
581 1.3 deraadt * only one physical transfer.
582 1.3 deraadt */
583 1.75 mycroft void
584 1.25 mycroft sdstrategy(bp)
585 1.25 mycroft struct buf *bp;
586 1.1 cgd {
587 1.89 thorpej struct sd_softc *sd = sd_cd.cd_devs[SDUNIT(bp->b_dev)];
588 1.171 bouyer struct scsipi_periph *periph = sd->sc_periph;
589 1.157 thorpej struct disklabel *lp;
590 1.157 thorpej daddr_t blkno;
591 1.77 mycroft int s;
592 1.166 chs boolean_t sector_aligned;
593 1.1 cgd
594 1.171 bouyer SC_DEBUG(sd->sc_periph, SCSIPI_DB2, ("sdstrategy "));
595 1.171 bouyer SC_DEBUG(sd->sc_periph, SCSIPI_DB1,
596 1.97 christos ("%ld bytes @ blk %d\n", bp->b_bcount, bp->b_blkno));
597 1.80 mycroft /*
598 1.140 bouyer * If the device has been made invalid, error out
599 1.80 mycroft */
600 1.171 bouyer if ((periph->periph_flags & PERIPH_MEDIA_LOADED) == 0 ||
601 1.147 thorpej (sd->sc_dev.dv_flags & DVF_ACTIVE) == 0) {
602 1.171 bouyer if (periph->periph_flags & PERIPH_OPEN)
603 1.141 bouyer bp->b_error = EIO;
604 1.141 bouyer else
605 1.141 bouyer bp->b_error = ENODEV;
606 1.80 mycroft goto bad;
607 1.80 mycroft }
608 1.157 thorpej
609 1.157 thorpej lp = sd->sc_dk.dk_label;
610 1.157 thorpej
611 1.25 mycroft /*
612 1.143 bouyer * The transfer must be a whole number of blocks, offset must not be
613 1.143 bouyer * negative.
614 1.25 mycroft */
615 1.166 chs if (lp->d_secsize == DEV_BSIZE) {
616 1.166 chs sector_aligned = (bp->b_bcount & (DEV_BSIZE - 1)) == 0;
617 1.166 chs } else {
618 1.166 chs sector_aligned = (bp->b_bcount % lp->d_secsize) == 0;
619 1.166 chs }
620 1.166 chs if (!sector_aligned || bp->b_blkno < 0) {
621 1.140 bouyer bp->b_error = EINVAL;
622 1.1 cgd goto bad;
623 1.1 cgd }
624 1.25 mycroft /*
625 1.25 mycroft * If it's a null transfer, return immediatly
626 1.25 mycroft */
627 1.1 cgd if (bp->b_bcount == 0)
628 1.1 cgd goto done;
629 1.52 mycroft
630 1.3 deraadt /*
631 1.52 mycroft * Do bounds checking, adjust transfer. if error, process.
632 1.52 mycroft * If end of partition, just return.
633 1.3 deraadt */
634 1.68 mycroft if (SDPART(bp->b_dev) != RAW_PART &&
635 1.157 thorpej bounds_check_with_label(bp, lp,
636 1.61 mycroft (sd->flags & (SDF_WLABEL|SDF_LABELLING)) != 0) <= 0)
637 1.52 mycroft goto done;
638 1.37 mycroft
639 1.157 thorpej /*
640 1.157 thorpej * Now convert the block number to absolute and put it in
641 1.157 thorpej * terms of the device's logical block size.
642 1.157 thorpej */
643 1.166 chs if (lp->d_secsize == DEV_BSIZE)
644 1.166 chs blkno = bp->b_blkno;
645 1.166 chs else if (lp->d_secsize > DEV_BSIZE)
646 1.157 thorpej blkno = bp->b_blkno / (lp->d_secsize / DEV_BSIZE);
647 1.157 thorpej else
648 1.157 thorpej blkno = bp->b_blkno * (DEV_BSIZE / lp->d_secsize);
649 1.171 bouyer
650 1.157 thorpej if (SDPART(bp->b_dev) != RAW_PART)
651 1.157 thorpej blkno += lp->d_partitions[SDPART(bp->b_dev)].p_offset;
652 1.171 bouyer
653 1.157 thorpej bp->b_rawblkno = blkno;
654 1.157 thorpej
655 1.77 mycroft s = splbio();
656 1.1 cgd
657 1.25 mycroft /*
658 1.171 bouyer * Place it in the queue of disk activities for this disk.
659 1.171 bouyer *
660 1.171 bouyer * XXX Only do disksort() if the current operating mode does not
661 1.171 bouyer * XXX include tagged queueing.
662 1.25 mycroft */
663 1.184 hannken BUFQ_PUT(&sd->buf_queue, bp);
664 1.1 cgd
665 1.3 deraadt /*
666 1.3 deraadt * Tell the device to get going on the transfer if it's
667 1.3 deraadt * not doing anything, otherwise just wait for completion
668 1.3 deraadt */
669 1.171 bouyer sdstart(sd->sc_periph);
670 1.1 cgd
671 1.77 mycroft splx(s);
672 1.1 cgd return;
673 1.25 mycroft
674 1.1 cgd bad:
675 1.1 cgd bp->b_flags |= B_ERROR;
676 1.1 cgd done:
677 1.25 mycroft /*
678 1.25 mycroft * Correctly set the buf to indicate a completed xfer
679 1.25 mycroft */
680 1.25 mycroft bp->b_resid = bp->b_bcount;
681 1.1 cgd biodone(bp);
682 1.1 cgd }
683 1.1 cgd
684 1.3 deraadt /*
685 1.3 deraadt * sdstart looks to see if there is a buf waiting for the device
686 1.3 deraadt * and that the device is not already busy. If both are true,
687 1.25 mycroft * It dequeues the buf and creates a scsi command to perform the
688 1.116 bouyer * transfer in the buf. The transfer request will call scsipi_done
689 1.3 deraadt * on completion, which will in turn call this routine again
690 1.3 deraadt * so that the next queued transfer is performed.
691 1.3 deraadt * The bufs are queued by the strategy routine (sdstrategy)
692 1.25 mycroft *
693 1.3 deraadt * This routine is also called after other non-queued requests
694 1.3 deraadt * have been made of the scsi driver, to ensure that the queue
695 1.3 deraadt * continues to be drained.
696 1.25 mycroft *
697 1.3 deraadt * must be called at the correct (highish) spl level
698 1.116 bouyer * sdstart() is called at splbio from sdstrategy and scsipi_done
699 1.3 deraadt */
700 1.87 christos void
701 1.171 bouyer sdstart(periph)
702 1.171 bouyer struct scsipi_periph *periph;
703 1.3 deraadt {
704 1.171 bouyer struct sd_softc *sd = (void *)periph->periph_dev;
705 1.118 enami struct disklabel *lp = sd->sc_dk.dk_label;
706 1.25 mycroft struct buf *bp = 0;
707 1.116 bouyer struct scsipi_rw_big cmd_big;
708 1.124 cgd #if NSD_SCSIBUS > 0
709 1.81 thorpej struct scsi_rw cmd_small;
710 1.124 cgd #endif
711 1.116 bouyer struct scsipi_generic *cmdp;
712 1.171 bouyer int nblks, cmdlen, error, flags;
713 1.3 deraadt
714 1.171 bouyer SC_DEBUG(periph, SCSIPI_DB2, ("sdstart "));
715 1.3 deraadt /*
716 1.25 mycroft * Check if the device has room for another command
717 1.3 deraadt */
718 1.171 bouyer while (periph->periph_active < periph->periph_openings) {
719 1.25 mycroft /*
720 1.75 mycroft * there is excess capacity, but a special waits
721 1.25 mycroft * It'll need the adapter as soon as we clear out of the
722 1.25 mycroft * way and let it run (user level wait).
723 1.25 mycroft */
724 1.171 bouyer if (periph->periph_flags & PERIPH_WAITING) {
725 1.171 bouyer periph->periph_flags &= ~PERIPH_WAITING;
726 1.171 bouyer wakeup((caddr_t)periph);
727 1.25 mycroft return;
728 1.25 mycroft }
729 1.1 cgd
730 1.25 mycroft /*
731 1.25 mycroft * See if there is a buf with work for us to do..
732 1.25 mycroft */
733 1.184 hannken if ((bp = BUFQ_GET(&sd->buf_queue)) == NULL)
734 1.25 mycroft return;
735 1.3 deraadt
736 1.25 mycroft /*
737 1.25 mycroft * If the device has become invalid, abort all the
738 1.25 mycroft * reads and writes until all files have been closed and
739 1.51 mycroft * re-opened
740 1.25 mycroft */
741 1.171 bouyer if ((periph->periph_flags & PERIPH_MEDIA_LOADED) == 0) {
742 1.32 chopps bp->b_error = EIO;
743 1.32 chopps bp->b_flags |= B_ERROR;
744 1.109 thorpej bp->b_resid = bp->b_bcount;
745 1.32 chopps biodone(bp);
746 1.32 chopps continue;
747 1.25 mycroft }
748 1.1 cgd
749 1.25 mycroft /*
750 1.157 thorpej * We have a buf, now we should make a command.
751 1.25 mycroft */
752 1.157 thorpej
753 1.166 chs if (lp->d_secsize == DEV_BSIZE)
754 1.166 chs nblks = bp->b_bcount >> DEV_BSHIFT;
755 1.166 chs else
756 1.166 chs nblks = howmany(bp->b_bcount, lp->d_secsize);
757 1.3 deraadt
758 1.124 cgd #if NSD_SCSIBUS > 0
759 1.25 mycroft /*
760 1.81 thorpej * Fill out the scsi command. If the transfer will
761 1.81 thorpej * fit in a "small" cdb, use it.
762 1.25 mycroft */
763 1.157 thorpej if (((bp->b_rawblkno & 0x1fffff) == bp->b_rawblkno) &&
764 1.171 bouyer ((nblks & 0xff) == nblks) &&
765 1.171 bouyer !(periph->periph_quirks & PQUIRK_ONLYBIG) &&
766 1.171 bouyer scsipi_periph_bustype(periph) == SCSIPI_BUSTYPE_SCSI) {
767 1.81 thorpej /*
768 1.81 thorpej * We can fit in a small cdb.
769 1.81 thorpej */
770 1.178 thorpej memset(&cmd_small, 0, sizeof(cmd_small));
771 1.81 thorpej cmd_small.opcode = (bp->b_flags & B_READ) ?
772 1.116 bouyer SCSI_READ_COMMAND : SCSI_WRITE_COMMAND;
773 1.157 thorpej _lto3b(bp->b_rawblkno, cmd_small.addr);
774 1.81 thorpej cmd_small.length = nblks & 0xff;
775 1.81 thorpej cmdlen = sizeof(cmd_small);
776 1.116 bouyer cmdp = (struct scsipi_generic *)&cmd_small;
777 1.124 cgd } else
778 1.181 thorpej #endif /* NSD_SCSIBUS > 0 */
779 1.124 cgd {
780 1.81 thorpej /*
781 1.81 thorpej * Need a large cdb.
782 1.81 thorpej */
783 1.178 thorpej memset(&cmd_big, 0, sizeof(cmd_big));
784 1.81 thorpej cmd_big.opcode = (bp->b_flags & B_READ) ?
785 1.81 thorpej READ_BIG : WRITE_BIG;
786 1.157 thorpej _lto4b(bp->b_rawblkno, cmd_big.addr);
787 1.91 mycroft _lto2b(nblks, cmd_big.length);
788 1.81 thorpej cmdlen = sizeof(cmd_big);
789 1.116 bouyer cmdp = (struct scsipi_generic *)&cmd_big;
790 1.81 thorpej }
791 1.1 cgd
792 1.84 thorpej /* Instrumentation. */
793 1.84 thorpej disk_busy(&sd->sc_dk);
794 1.84 thorpej
795 1.25 mycroft /*
796 1.132 thorpej * Mark the disk dirty so that the cache will be
797 1.132 thorpej * flushed on close.
798 1.132 thorpej */
799 1.135 thorpej if ((bp->b_flags & B_READ) == 0)
800 1.135 thorpej sd->flags |= SDF_DIRTY;
801 1.132 thorpej
802 1.132 thorpej /*
803 1.171 bouyer * Figure out what flags to use.
804 1.171 bouyer */
805 1.186 hannken flags = XS_CTL_NOSLEEP|XS_CTL_ASYNC|XS_CTL_SIMPLE_TAG;
806 1.171 bouyer if (bp->b_flags & B_READ)
807 1.172 thorpej flags |= XS_CTL_DATA_IN;
808 1.173 tsutsui else
809 1.173 tsutsui flags |= XS_CTL_DATA_OUT;
810 1.171 bouyer
811 1.171 bouyer /*
812 1.25 mycroft * Call the routine that chats with the adapter.
813 1.25 mycroft * Note: we cannot sleep as we may be an interrupt
814 1.25 mycroft */
815 1.171 bouyer error = scsipi_command(periph, cmdp, cmdlen,
816 1.81 thorpej (u_char *)bp->b_data, bp->b_bcount,
817 1.175 mjacob SDRETRIES, SD_IO_TIMEOUT, bp, flags);
818 1.129 thorpej if (error) {
819 1.191 mrg disk_unbusy(&sd->sc_dk, 0, 0);
820 1.104 christos printf("%s: not queued, error %d\n",
821 1.99 thorpej sd->sc_dev.dv_xname, error);
822 1.129 thorpej }
823 1.25 mycroft }
824 1.72 mycroft }
825 1.72 mycroft
826 1.111 mycroft void
827 1.111 mycroft sddone(xs)
828 1.116 bouyer struct scsipi_xfer *xs;
829 1.84 thorpej {
830 1.171 bouyer struct sd_softc *sd = (void *)xs->xs_periph->periph_dev;
831 1.84 thorpej
832 1.132 thorpej if (sd->flags & SDF_FLUSHING) {
833 1.132 thorpej /* Flush completed, no longer dirty. */
834 1.132 thorpej sd->flags &= ~(SDF_FLUSHING|SDF_DIRTY);
835 1.132 thorpej }
836 1.132 thorpej
837 1.120 explorer if (xs->bp != NULL) {
838 1.191 mrg disk_unbusy(&sd->sc_dk, xs->bp->b_bcount - xs->bp->b_resid,
839 1.191 mrg (xs->bp->b_flags & B_READ));
840 1.121 explorer #if NRND > 0
841 1.157 thorpej rnd_add_uint32(&sd->rnd_source, xs->bp->b_rawblkno);
842 1.121 explorer #endif
843 1.120 explorer }
844 1.84 thorpej }
845 1.84 thorpej
846 1.81 thorpej void
847 1.81 thorpej sdminphys(bp)
848 1.81 thorpej struct buf *bp;
849 1.81 thorpej {
850 1.89 thorpej struct sd_softc *sd = sd_cd.cd_devs[SDUNIT(bp->b_dev)];
851 1.81 thorpej long max;
852 1.81 thorpej
853 1.81 thorpej /*
854 1.81 thorpej * If the device is ancient, we want to make sure that
855 1.81 thorpej * the transfer fits into a 6-byte cdb.
856 1.82 thorpej *
857 1.82 thorpej * XXX Note that the SCSI-I spec says that 256-block transfers
858 1.82 thorpej * are allowed in a 6-byte read/write, and are specified
859 1.82 thorpej * by settng the "length" to 0. However, we're conservative
860 1.82 thorpej * here, allowing only 255-block transfers in case an
861 1.82 thorpej * ancient device gets confused by length == 0. A length of 0
862 1.82 thorpej * in a 10-byte read/write actually means 0 blocks.
863 1.81 thorpej */
864 1.167 augustss if ((sd->flags & SDF_ANCIENT) &&
865 1.171 bouyer ((sd->sc_periph->periph_flags &
866 1.171 bouyer (PERIPH_REMOVABLE | PERIPH_MEDIA_LOADED)) != PERIPH_REMOVABLE)) {
867 1.84 thorpej max = sd->sc_dk.dk_label->d_secsize * 0xff;
868 1.81 thorpej
869 1.81 thorpej if (bp->b_bcount > max)
870 1.81 thorpej bp->b_bcount = max;
871 1.81 thorpej }
872 1.81 thorpej
873 1.171 bouyer (*sd->sc_periph->periph_channel->chan_adapter->adapt_minphys)(bp);
874 1.81 thorpej }
875 1.81 thorpej
876 1.72 mycroft int
877 1.87 christos sdread(dev, uio, ioflag)
878 1.72 mycroft dev_t dev;
879 1.72 mycroft struct uio *uio;
880 1.87 christos int ioflag;
881 1.72 mycroft {
882 1.72 mycroft
883 1.81 thorpej return (physio(sdstrategy, NULL, dev, B_READ, sdminphys, uio));
884 1.72 mycroft }
885 1.72 mycroft
886 1.72 mycroft int
887 1.87 christos sdwrite(dev, uio, ioflag)
888 1.72 mycroft dev_t dev;
889 1.72 mycroft struct uio *uio;
890 1.87 christos int ioflag;
891 1.72 mycroft {
892 1.72 mycroft
893 1.81 thorpej return (physio(sdstrategy, NULL, dev, B_WRITE, sdminphys, uio));
894 1.1 cgd }
895 1.3 deraadt
896 1.3 deraadt /*
897 1.3 deraadt * Perform special action on behalf of the user
898 1.3 deraadt * Knows about the internals of this device
899 1.3 deraadt */
900 1.75 mycroft int
901 1.51 mycroft sdioctl(dev, cmd, addr, flag, p)
902 1.25 mycroft dev_t dev;
903 1.43 cgd u_long cmd;
904 1.25 mycroft caddr_t addr;
905 1.25 mycroft int flag;
906 1.51 mycroft struct proc *p;
907 1.1 cgd {
908 1.89 thorpej struct sd_softc *sd = sd_cd.cd_devs[SDUNIT(dev)];
909 1.171 bouyer struct scsipi_periph *periph = sd->sc_periph;
910 1.142 bouyer int part = SDPART(dev);
911 1.192 fvdl int error = 0;
912 1.168 fvdl #ifdef __HAVE_OLD_DISKLABEL
913 1.192 fvdl struct disklabel *newlabel = NULL;
914 1.168 fvdl #endif
915 1.1 cgd
916 1.171 bouyer SC_DEBUG(sd->sc_periph, SCSIPI_DB2, ("sdioctl 0x%lx ", cmd));
917 1.147 thorpej
918 1.25 mycroft /*
919 1.140 bouyer * If the device is not valid, some IOCTLs can still be
920 1.140 bouyer * handled on the raw partition. Check this here.
921 1.25 mycroft */
922 1.171 bouyer if ((periph->periph_flags & PERIPH_MEDIA_LOADED) == 0) {
923 1.140 bouyer switch (cmd) {
924 1.154 leo case DIOCKLABEL:
925 1.140 bouyer case DIOCWLABEL:
926 1.140 bouyer case DIOCLOCK:
927 1.140 bouyer case DIOCEJECT:
928 1.142 bouyer case ODIOCEJECT:
929 1.181 thorpej case DIOCGCACHE:
930 1.181 thorpej case DIOCSCACHE:
931 1.140 bouyer case SCIOCIDENTIFY:
932 1.140 bouyer case OSCIOCIDENTIFY:
933 1.140 bouyer case SCIOCCOMMAND:
934 1.140 bouyer case SCIOCDEBUG:
935 1.142 bouyer if (part == RAW_PART)
936 1.140 bouyer break;
937 1.140 bouyer /* FALLTHROUGH */
938 1.140 bouyer default:
939 1.171 bouyer if ((periph->periph_flags & PERIPH_OPEN) == 0)
940 1.141 bouyer return (ENODEV);
941 1.141 bouyer else
942 1.141 bouyer return (EIO);
943 1.140 bouyer }
944 1.140 bouyer }
945 1.45 mycroft
946 1.25 mycroft switch (cmd) {
947 1.1 cgd case DIOCGDINFO:
948 1.84 thorpej *(struct disklabel *)addr = *(sd->sc_dk.dk_label);
949 1.118 enami return (0);
950 1.25 mycroft
951 1.168 fvdl #ifdef __HAVE_OLD_DISKLABEL
952 1.168 fvdl case ODIOCGDINFO:
953 1.192 fvdl newlabel = malloc(sizeof *newlabel, M_TEMP, M_WAITOK);
954 1.192 fvdl if (newlabel == NULL)
955 1.192 fvdl return EIO;
956 1.192 fvdl memcpy(newlabel, sd->sc_dk.dk_label, sizeof (*newlabel));
957 1.192 fvdl if (newlabel->d_npartitions <= OLDMAXPARTITIONS)
958 1.192 fvdl memcpy(addr, newlabel, sizeof (struct olddisklabel));
959 1.192 fvdl else
960 1.192 fvdl error = ENOTTY;
961 1.192 fvdl free(newlabel, M_TEMP);
962 1.192 fvdl return error;
963 1.168 fvdl #endif
964 1.168 fvdl
965 1.3 deraadt case DIOCGPART:
966 1.84 thorpej ((struct partinfo *)addr)->disklab = sd->sc_dk.dk_label;
967 1.37 mycroft ((struct partinfo *)addr)->part =
968 1.142 bouyer &sd->sc_dk.dk_label->d_partitions[part];
969 1.118 enami return (0);
970 1.25 mycroft
971 1.61 mycroft case DIOCWDINFO:
972 1.3 deraadt case DIOCSDINFO:
973 1.168 fvdl #ifdef __HAVE_OLD_DISKLABEL
974 1.168 fvdl case ODIOCWDINFO:
975 1.168 fvdl case ODIOCSDINFO:
976 1.168 fvdl #endif
977 1.168 fvdl {
978 1.168 fvdl struct disklabel *lp;
979 1.168 fvdl
980 1.192 fvdl if ((flag & FWRITE) == 0)
981 1.192 fvdl return (EBADF);
982 1.192 fvdl
983 1.168 fvdl #ifdef __HAVE_OLD_DISKLABEL
984 1.168 fvdl if (cmd == ODIOCSDINFO || cmd == ODIOCWDINFO) {
985 1.192 fvdl newlabel = malloc(sizeof *newlabel, M_TEMP, M_WAITOK);
986 1.192 fvdl if (newlabel == NULL)
987 1.192 fvdl return EIO;
988 1.192 fvdl memset(newlabel, 0, sizeof newlabel);
989 1.192 fvdl memcpy(newlabel, addr, sizeof (struct olddisklabel));
990 1.192 fvdl lp = newlabel;
991 1.168 fvdl } else
992 1.168 fvdl #endif
993 1.168 fvdl lp = (struct disklabel *)addr;
994 1.168 fvdl
995 1.87 christos if ((error = sdlock(sd)) != 0)
996 1.192 fvdl goto bad;
997 1.65 mycroft sd->flags |= SDF_LABELLING;
998 1.61 mycroft
999 1.84 thorpej error = setdisklabel(sd->sc_dk.dk_label,
1000 1.168 fvdl lp, /*sd->sc_dk.dk_openmask : */0,
1001 1.84 thorpej sd->sc_dk.dk_cpulabel);
1002 1.62 mycroft if (error == 0) {
1003 1.168 fvdl if (cmd == DIOCWDINFO
1004 1.168 fvdl #ifdef __HAVE_OLD_DISKLABEL
1005 1.168 fvdl || cmd == ODIOCWDINFO
1006 1.168 fvdl #endif
1007 1.168 fvdl )
1008 1.62 mycroft error = writedisklabel(SDLABELDEV(dev),
1009 1.84 thorpej sdstrategy, sd->sc_dk.dk_label,
1010 1.84 thorpej sd->sc_dk.dk_cpulabel);
1011 1.62 mycroft }
1012 1.61 mycroft
1013 1.61 mycroft sd->flags &= ~SDF_LABELLING;
1014 1.61 mycroft sdunlock(sd);
1015 1.192 fvdl bad:
1016 1.192 fvdl #ifdef __HAVE_OLD_DISKLABEL
1017 1.192 fvdl if (newlabel != NULL)
1018 1.192 fvdl free(newlabel, M_TEMP);
1019 1.192 fvdl #endif
1020 1.118 enami return (error);
1021 1.168 fvdl }
1022 1.154 leo
1023 1.154 leo case DIOCKLABEL:
1024 1.154 leo if (*(int *)addr)
1025 1.171 bouyer periph->periph_flags |= PERIPH_KEEP_LABEL;
1026 1.154 leo else
1027 1.171 bouyer periph->periph_flags &= ~PERIPH_KEEP_LABEL;
1028 1.154 leo return (0);
1029 1.25 mycroft
1030 1.3 deraadt case DIOCWLABEL:
1031 1.3 deraadt if ((flag & FWRITE) == 0)
1032 1.118 enami return (EBADF);
1033 1.37 mycroft if (*(int *)addr)
1034 1.37 mycroft sd->flags |= SDF_WLABEL;
1035 1.37 mycroft else
1036 1.37 mycroft sd->flags &= ~SDF_WLABEL;
1037 1.118 enami return (0);
1038 1.86 thorpej
1039 1.86 thorpej case DIOCLOCK:
1040 1.171 bouyer return (scsipi_prevent(periph,
1041 1.118 enami (*(int *)addr) ? PR_PREVENT : PR_ALLOW, 0));
1042 1.142 bouyer
1043 1.86 thorpej case DIOCEJECT:
1044 1.171 bouyer if ((periph->periph_flags & PERIPH_REMOVABLE) == 0)
1045 1.142 bouyer return (ENOTTY);
1046 1.142 bouyer if (*(int *)addr == 0) {
1047 1.142 bouyer /*
1048 1.142 bouyer * Don't force eject: check that we are the only
1049 1.142 bouyer * partition open. If so, unlock it.
1050 1.142 bouyer */
1051 1.142 bouyer if ((sd->sc_dk.dk_openmask & ~(1 << part)) == 0 &&
1052 1.142 bouyer sd->sc_dk.dk_bopenmask + sd->sc_dk.dk_copenmask ==
1053 1.142 bouyer sd->sc_dk.dk_openmask) {
1054 1.171 bouyer error = scsipi_prevent(periph, PR_ALLOW,
1055 1.149 thorpej XS_CTL_IGNORE_NOT_READY);
1056 1.142 bouyer if (error)
1057 1.142 bouyer return (error);
1058 1.142 bouyer } else {
1059 1.142 bouyer return (EBUSY);
1060 1.142 bouyer }
1061 1.142 bouyer }
1062 1.142 bouyer /* FALLTHROUGH */
1063 1.142 bouyer case ODIOCEJECT:
1064 1.171 bouyer return ((periph->periph_flags & PERIPH_REMOVABLE) == 0 ?
1065 1.171 bouyer ENOTTY : scsipi_start(periph, SSS_STOP|SSS_LOEJ, 0));
1066 1.25 mycroft
1067 1.119 thorpej case DIOCGDEFLABEL:
1068 1.119 thorpej sdgetdefaultlabel(sd, (struct disklabel *)addr);
1069 1.119 thorpej return (0);
1070 1.168 fvdl
1071 1.168 fvdl #ifdef __HAVE_OLD_DISKLABEL
1072 1.168 fvdl case ODIOCGDEFLABEL:
1073 1.192 fvdl newlabel = malloc(sizeof *newlabel, M_TEMP, M_WAITOK);
1074 1.192 fvdl if (newlabel == NULL)
1075 1.192 fvdl return EIO;
1076 1.192 fvdl sdgetdefaultlabel(sd, newlabel);
1077 1.192 fvdl if (newlabel->d_npartitions <= OLDMAXPARTITIONS)
1078 1.192 fvdl memcpy(addr, newlabel, sizeof (struct olddisklabel));
1079 1.192 fvdl else
1080 1.192 fvdl error = ENOTTY;
1081 1.192 fvdl free(newlabel, M_TEMP);
1082 1.192 fvdl return error;
1083 1.168 fvdl #endif
1084 1.181 thorpej
1085 1.181 thorpej case DIOCGCACHE:
1086 1.181 thorpej if (sd->sc_ops->sdo_getcache != NULL)
1087 1.181 thorpej return ((*sd->sc_ops->sdo_getcache)(sd, (int *) addr));
1088 1.181 thorpej
1089 1.181 thorpej /* Not supported on this device. */
1090 1.181 thorpej *(int *) addr = 0;
1091 1.181 thorpej return (0);
1092 1.181 thorpej
1093 1.181 thorpej case DIOCSCACHE:
1094 1.181 thorpej if ((flag & FWRITE) == 0)
1095 1.181 thorpej return (EBADF);
1096 1.181 thorpej if (sd->sc_ops->sdo_setcache != NULL)
1097 1.181 thorpej return ((*sd->sc_ops->sdo_setcache)(sd, *(int *) addr));
1098 1.181 thorpej
1099 1.181 thorpej /* Not supported on this device. */
1100 1.181 thorpej return (EOPNOTSUPP);
1101 1.181 thorpej
1102 1.181 thorpej case DIOCCACHESYNC:
1103 1.181 thorpej /*
1104 1.181 thorpej * XXX Do we really need to care about having a writeable
1105 1.181 thorpej * file descriptor here?
1106 1.181 thorpej */
1107 1.181 thorpej if ((flag & FWRITE) == 0)
1108 1.181 thorpej return (EBADF);
1109 1.181 thorpej if (((sd->flags & SDF_DIRTY) != 0 || *(int *)addr != 0) &&
1110 1.181 thorpej sd->sc_ops->sdo_flush != NULL) {
1111 1.181 thorpej error = (*sd->sc_ops->sdo_flush)(sd, 0);
1112 1.181 thorpej if (error)
1113 1.181 thorpej sd->flags &= ~SDF_FLUSHING;
1114 1.181 thorpej else
1115 1.181 thorpej sd->flags &= ~(SDF_FLUSHING|SDF_DIRTY);
1116 1.181 thorpej } else
1117 1.181 thorpej error = 0;
1118 1.181 thorpej return (error);
1119 1.119 thorpej
1120 1.1 cgd default:
1121 1.142 bouyer if (part != RAW_PART)
1122 1.118 enami return (ENOTTY);
1123 1.171 bouyer return (scsipi_do_ioctl(periph, dev, cmd, addr, flag, p));
1124 1.25 mycroft }
1125 1.45 mycroft
1126 1.25 mycroft #ifdef DIAGNOSTIC
1127 1.25 mycroft panic("sdioctl: impossible");
1128 1.25 mycroft #endif
1129 1.1 cgd }
1130 1.1 cgd
1131 1.75 mycroft void
1132 1.119 thorpej sdgetdefaultlabel(sd, lp)
1133 1.51 mycroft struct sd_softc *sd;
1134 1.119 thorpej struct disklabel *lp;
1135 1.1 cgd {
1136 1.1 cgd
1137 1.178 thorpej memset(lp, 0, sizeof(struct disklabel));
1138 1.25 mycroft
1139 1.74 mycroft lp->d_secsize = sd->params.blksize;
1140 1.74 mycroft lp->d_ntracks = sd->params.heads;
1141 1.74 mycroft lp->d_nsectors = sd->params.sectors;
1142 1.74 mycroft lp->d_ncylinders = sd->params.cyls;
1143 1.74 mycroft lp->d_secpercyl = lp->d_ntracks * lp->d_nsectors;
1144 1.1 cgd
1145 1.171 bouyer switch (scsipi_periph_bustype(sd->sc_periph)) {
1146 1.131 drochner #if NSD_SCSIBUS > 0
1147 1.171 bouyer case SCSIPI_BUSTYPE_SCSI:
1148 1.131 drochner lp->d_type = DTYPE_SCSI;
1149 1.131 drochner break;
1150 1.131 drochner #endif
1151 1.131 drochner #if NSD_ATAPIBUS > 0
1152 1.171 bouyer case SCSIPI_BUSTYPE_ATAPI:
1153 1.131 drochner lp->d_type = DTYPE_ATAPI;
1154 1.131 drochner break;
1155 1.131 drochner #endif
1156 1.131 drochner }
1157 1.131 drochner strncpy(lp->d_typename, sd->name, 16);
1158 1.74 mycroft strncpy(lp->d_packname, "fictitious", 16);
1159 1.74 mycroft lp->d_secperunit = sd->params.disksize;
1160 1.124 cgd lp->d_rpm = sd->params.rot_rate;
1161 1.74 mycroft lp->d_interleave = 1;
1162 1.74 mycroft lp->d_flags = 0;
1163 1.74 mycroft
1164 1.74 mycroft lp->d_partitions[RAW_PART].p_offset = 0;
1165 1.74 mycroft lp->d_partitions[RAW_PART].p_size =
1166 1.74 mycroft lp->d_secperunit * (lp->d_secsize / DEV_BSIZE);
1167 1.74 mycroft lp->d_partitions[RAW_PART].p_fstype = FS_UNUSED;
1168 1.74 mycroft lp->d_npartitions = RAW_PART + 1;
1169 1.74 mycroft
1170 1.74 mycroft lp->d_magic = DISKMAGIC;
1171 1.74 mycroft lp->d_magic2 = DISKMAGIC;
1172 1.74 mycroft lp->d_checksum = dkcksum(lp);
1173 1.119 thorpej }
1174 1.119 thorpej
1175 1.119 thorpej
1176 1.119 thorpej /*
1177 1.119 thorpej * Load the label information on the named device
1178 1.119 thorpej */
1179 1.119 thorpej void
1180 1.119 thorpej sdgetdisklabel(sd)
1181 1.119 thorpej struct sd_softc *sd;
1182 1.119 thorpej {
1183 1.119 thorpej struct disklabel *lp = sd->sc_dk.dk_label;
1184 1.119 thorpej char *errstring;
1185 1.119 thorpej
1186 1.178 thorpej memset(sd->sc_dk.dk_cpulabel, 0, sizeof(struct cpu_disklabel));
1187 1.119 thorpej
1188 1.119 thorpej sdgetdefaultlabel(sd, lp);
1189 1.119 thorpej
1190 1.119 thorpej if (lp->d_secpercyl == 0) {
1191 1.119 thorpej lp->d_secpercyl = 100;
1192 1.119 thorpej /* as long as it's not 0 - readdisklabel divides by it (?) */
1193 1.119 thorpej }
1194 1.45 mycroft
1195 1.25 mycroft /*
1196 1.25 mycroft * Call the generic disklabel extraction routine
1197 1.25 mycroft */
1198 1.87 christos errstring = readdisklabel(MAKESDDEV(0, sd->sc_dev.dv_unit, RAW_PART),
1199 1.118 enami sdstrategy, lp, sd->sc_dk.dk_cpulabel);
1200 1.87 christos if (errstring) {
1201 1.104 christos printf("%s: %s\n", sd->sc_dev.dv_xname, errstring);
1202 1.45 mycroft return;
1203 1.1 cgd }
1204 1.132 thorpej }
1205 1.132 thorpej
1206 1.132 thorpej void
1207 1.132 thorpej sd_shutdown(arg)
1208 1.132 thorpej void *arg;
1209 1.132 thorpej {
1210 1.132 thorpej struct sd_softc *sd = arg;
1211 1.132 thorpej
1212 1.132 thorpej /*
1213 1.132 thorpej * If the disk cache needs to be flushed, and the disk supports
1214 1.132 thorpej * it, flush it. We're cold at this point, so we poll for
1215 1.132 thorpej * completion.
1216 1.132 thorpej */
1217 1.146 hannken if ((sd->flags & SDF_DIRTY) != 0 && sd->sc_ops->sdo_flush != NULL) {
1218 1.149 thorpej if ((*sd->sc_ops->sdo_flush)(sd, XS_CTL_NOSLEEP|XS_CTL_POLL)) {
1219 1.146 hannken printf("%s: cache synchronization failed\n",
1220 1.146 hannken sd->sc_dev.dv_xname);
1221 1.146 hannken sd->flags &= ~SDF_FLUSHING;
1222 1.146 hannken } else
1223 1.146 hannken sd->flags &= ~(SDF_FLUSHING|SDF_DIRTY);
1224 1.146 hannken }
1225 1.1 cgd }
1226 1.1 cgd
1227 1.3 deraadt /*
1228 1.3 deraadt * Tell the device to map out a defective block
1229 1.3 deraadt */
1230 1.75 mycroft int
1231 1.91 mycroft sd_reassign_blocks(sd, blkno)
1232 1.51 mycroft struct sd_softc *sd;
1233 1.91 mycroft u_long blkno;
1234 1.1 cgd {
1235 1.116 bouyer struct scsi_reassign_blocks scsipi_cmd;
1236 1.3 deraadt struct scsi_reassign_blocks_data rbdata;
1237 1.1 cgd
1238 1.178 thorpej memset(&scsipi_cmd, 0, sizeof(scsipi_cmd));
1239 1.178 thorpej memset(&rbdata, 0, sizeof(rbdata));
1240 1.116 bouyer scsipi_cmd.opcode = SCSI_REASSIGN_BLOCKS;
1241 1.1 cgd
1242 1.91 mycroft _lto2b(sizeof(rbdata.defect_descriptor[0]), rbdata.length);
1243 1.91 mycroft _lto4b(blkno, rbdata.defect_descriptor[0].dlbaddr);
1244 1.1 cgd
1245 1.171 bouyer return (scsipi_command(sd->sc_periph,
1246 1.118 enami (struct scsipi_generic *)&scsipi_cmd, sizeof(scsipi_cmd),
1247 1.118 enami (u_char *)&rbdata, sizeof(rbdata), SDRETRIES, 5000, NULL,
1248 1.163 enami XS_CTL_DATA_OUT | XS_CTL_DATA_ONSTACK));
1249 1.1 cgd }
1250 1.127 mjacob
1251 1.127 mjacob /*
1252 1.127 mjacob * Check Errors
1253 1.127 mjacob */
1254 1.127 mjacob int
1255 1.127 mjacob sd_interpret_sense(xs)
1256 1.127 mjacob struct scsipi_xfer *xs;
1257 1.127 mjacob {
1258 1.171 bouyer struct scsipi_periph *periph = xs->xs_periph;
1259 1.127 mjacob struct scsipi_sense_data *sense = &xs->sense.scsi_sense;
1260 1.171 bouyer struct sd_softc *sd = (void *)periph->periph_dev;
1261 1.171 bouyer int s, error, retval = EJUSTRETURN;
1262 1.171 bouyer
1263 1.171 bouyer /*
1264 1.171 bouyer * If the periph is already recovering, just do the normal
1265 1.171 bouyer * error processing.
1266 1.171 bouyer */
1267 1.171 bouyer if (periph->periph_flags & PERIPH_RECOVERING)
1268 1.171 bouyer return (retval);
1269 1.127 mjacob
1270 1.127 mjacob /*
1271 1.127 mjacob * If the device is not open yet, let the generic code handle it.
1272 1.127 mjacob */
1273 1.171 bouyer if ((periph->periph_flags & PERIPH_MEDIA_LOADED) == 0)
1274 1.127 mjacob return (retval);
1275 1.127 mjacob
1276 1.127 mjacob /*
1277 1.127 mjacob * If it isn't a extended or extended/deferred error, let
1278 1.127 mjacob * the generic code handle it.
1279 1.127 mjacob */
1280 1.127 mjacob if ((sense->error_code & SSD_ERRCODE) != 0x70 &&
1281 1.171 bouyer (sense->error_code & SSD_ERRCODE) != 0x71)
1282 1.127 mjacob return (retval);
1283 1.127 mjacob
1284 1.127 mjacob if ((sense->flags & SSD_KEY) == SKEY_NOT_READY &&
1285 1.127 mjacob sense->add_sense_code == 0x4) {
1286 1.127 mjacob if (sense->add_sense_code_qual == 0x01) {
1287 1.127 mjacob /*
1288 1.171 bouyer * Unit In The Process Of Becoming Ready.
1289 1.127 mjacob */
1290 1.171 bouyer printf("%s: waiting for pack to spin up...\n",
1291 1.171 bouyer sd->sc_dev.dv_xname);
1292 1.182 bouyer if (!callout_active(&periph->periph_callout))
1293 1.182 bouyer scsipi_periph_freeze(periph, 1);
1294 1.171 bouyer callout_reset(&periph->periph_callout,
1295 1.171 bouyer 5 * hz, scsipi_periph_timed_thaw, periph);
1296 1.171 bouyer retval = ERESTART;
1297 1.127 mjacob } else if ((sense->add_sense_code_qual == 0x2) &&
1298 1.171 bouyer (periph->periph_quirks & PQUIRK_NOSTARTUNIT) == 0) {
1299 1.171 bouyer printf("%s: pack is stopped, restarting...\n",
1300 1.171 bouyer sd->sc_dev.dv_xname);
1301 1.171 bouyer s = splbio();
1302 1.171 bouyer periph->periph_flags |= PERIPH_RECOVERING;
1303 1.171 bouyer splx(s);
1304 1.171 bouyer error = scsipi_start(periph, SSS_START,
1305 1.171 bouyer XS_CTL_URGENT|XS_CTL_HEAD_TAG|
1306 1.171 bouyer XS_CTL_THAW_PERIPH|XS_CTL_FREEZE_PERIPH);
1307 1.171 bouyer if (error) {
1308 1.171 bouyer printf("%s: unable to restart pack\n",
1309 1.145 lukem sd->sc_dev.dv_xname);
1310 1.171 bouyer retval = error;
1311 1.171 bouyer } else
1312 1.171 bouyer retval = ERESTART;
1313 1.171 bouyer s = splbio();
1314 1.171 bouyer periph->periph_flags &= ~PERIPH_RECOVERING;
1315 1.171 bouyer splx(s);
1316 1.127 mjacob }
1317 1.127 mjacob }
1318 1.127 mjacob return (retval);
1319 1.127 mjacob }
1320 1.127 mjacob
1321 1.1 cgd
1322 1.3 deraadt int
1323 1.45 mycroft sdsize(dev)
1324 1.45 mycroft dev_t dev;
1325 1.1 cgd {
1326 1.51 mycroft struct sd_softc *sd;
1327 1.112 pk int part, unit, omask;
1328 1.45 mycroft int size;
1329 1.1 cgd
1330 1.112 pk unit = SDUNIT(dev);
1331 1.112 pk if (unit >= sd_cd.cd_ndevs)
1332 1.112 pk return (-1);
1333 1.112 pk sd = sd_cd.cd_devs[unit];
1334 1.112 pk if (sd == NULL)
1335 1.112 pk return (-1);
1336 1.112 pk
1337 1.147 thorpej if ((sd->sc_dev.dv_flags & DVF_ACTIVE) == 0)
1338 1.147 thorpej return (-1);
1339 1.147 thorpej
1340 1.45 mycroft part = SDPART(dev);
1341 1.112 pk omask = sd->sc_dk.dk_openmask & (1 << part);
1342 1.112 pk
1343 1.112 pk if (omask == 0 && sdopen(dev, 0, S_IFBLK, NULL) != 0)
1344 1.112 pk return (-1);
1345 1.171 bouyer if ((sd->sc_periph->periph_flags & PERIPH_MEDIA_LOADED) == 0)
1346 1.140 bouyer size = -1;
1347 1.140 bouyer else if (sd->sc_dk.dk_label->d_partitions[part].p_fstype != FS_SWAP)
1348 1.45 mycroft size = -1;
1349 1.45 mycroft else
1350 1.113 thorpej size = sd->sc_dk.dk_label->d_partitions[part].p_size *
1351 1.113 thorpej (sd->sc_dk.dk_label->d_secsize / DEV_BSIZE);
1352 1.112 pk if (omask == 0 && sdclose(dev, 0, S_IFBLK, NULL) != 0)
1353 1.112 pk return (-1);
1354 1.112 pk return (size);
1355 1.3 deraadt }
1356 1.3 deraadt
1357 1.71 cgd /* #define SD_DUMP_NOT_TRUSTED if you just want to watch */
1358 1.116 bouyer static struct scsipi_xfer sx;
1359 1.71 cgd static int sddoingadump;
1360 1.3 deraadt
1361 1.3 deraadt /*
1362 1.25 mycroft * dump all of physical memory into the partition specified, starting
1363 1.25 mycroft * at offset 'dumplo' into the partition.
1364 1.3 deraadt */
1365 1.3 deraadt int
1366 1.71 cgd sddump(dev, blkno, va, size)
1367 1.71 cgd dev_t dev;
1368 1.71 cgd daddr_t blkno;
1369 1.71 cgd caddr_t va;
1370 1.71 cgd size_t size;
1371 1.71 cgd {
1372 1.71 cgd struct sd_softc *sd; /* disk unit to do the I/O */
1373 1.71 cgd struct disklabel *lp; /* disk's disklabel */
1374 1.71 cgd int unit, part;
1375 1.71 cgd int sectorsize; /* size of a disk sector */
1376 1.71 cgd int nsects; /* number of sectors in partition */
1377 1.71 cgd int sectoff; /* sector offset of partition */
1378 1.71 cgd int totwrt; /* total number of sectors left to write */
1379 1.71 cgd int nwrt; /* current number of sectors to write */
1380 1.116 bouyer struct scsipi_rw_big cmd; /* write command */
1381 1.116 bouyer struct scsipi_xfer *xs; /* ... convenience */
1382 1.176 chs struct scsipi_periph *periph;
1383 1.176 chs struct scsipi_channel *chan;
1384 1.147 thorpej
1385 1.71 cgd /* Check if recursive dump; if so, punt. */
1386 1.71 cgd if (sddoingadump)
1387 1.118 enami return (EFAULT);
1388 1.71 cgd
1389 1.71 cgd /* Mark as active early. */
1390 1.71 cgd sddoingadump = 1;
1391 1.1 cgd
1392 1.71 cgd unit = SDUNIT(dev); /* Decompose unit & partition. */
1393 1.71 cgd part = SDPART(dev);
1394 1.1 cgd
1395 1.71 cgd /* Check for acceptable drive number. */
1396 1.89 thorpej if (unit >= sd_cd.cd_ndevs || (sd = sd_cd.cd_devs[unit]) == NULL)
1397 1.118 enami return (ENXIO);
1398 1.152 bouyer
1399 1.152 bouyer if ((sd->sc_dev.dv_flags & DVF_ACTIVE) == 0)
1400 1.152 bouyer return (ENODEV);
1401 1.176 chs
1402 1.176 chs periph = sd->sc_periph;
1403 1.176 chs chan = periph->periph_channel;
1404 1.3 deraadt
1405 1.71 cgd /* Make sure it was initialized. */
1406 1.177 bouyer if ((periph->periph_flags & PERIPH_MEDIA_LOADED) == 0)
1407 1.118 enami return (ENXIO);
1408 1.25 mycroft
1409 1.71 cgd /* Convert to disk sectors. Request must be a multiple of size. */
1410 1.84 thorpej lp = sd->sc_dk.dk_label;
1411 1.71 cgd sectorsize = lp->d_secsize;
1412 1.71 cgd if ((size % sectorsize) != 0)
1413 1.118 enami return (EFAULT);
1414 1.71 cgd totwrt = size / sectorsize;
1415 1.71 cgd blkno = dbtob(blkno) / sectorsize; /* blkno in DEV_BSIZE units */
1416 1.25 mycroft
1417 1.71 cgd nsects = lp->d_partitions[part].p_size;
1418 1.71 cgd sectoff = lp->d_partitions[part].p_offset;
1419 1.25 mycroft
1420 1.71 cgd /* Check transfer bounds against partition size. */
1421 1.71 cgd if ((blkno < 0) || ((blkno + totwrt) > nsects))
1422 1.118 enami return (EINVAL);
1423 1.25 mycroft
1424 1.71 cgd /* Offset block number to start of partition. */
1425 1.71 cgd blkno += sectoff;
1426 1.71 cgd
1427 1.71 cgd xs = &sx;
1428 1.3 deraadt
1429 1.71 cgd while (totwrt > 0) {
1430 1.71 cgd nwrt = totwrt; /* XXX */
1431 1.71 cgd #ifndef SD_DUMP_NOT_TRUSTED
1432 1.25 mycroft /*
1433 1.25 mycroft * Fill out the scsi command
1434 1.25 mycroft */
1435 1.178 thorpej memset(&cmd, 0, sizeof(cmd));
1436 1.51 mycroft cmd.opcode = WRITE_BIG;
1437 1.91 mycroft _lto4b(blkno, cmd.addr);
1438 1.91 mycroft _lto2b(nwrt, cmd.length);
1439 1.25 mycroft /*
1440 1.116 bouyer * Fill out the scsipi_xfer structure
1441 1.25 mycroft * Note: we cannot sleep as we may be an interrupt
1442 1.122 thorpej * don't use scsipi_command() as it may want to wait
1443 1.122 thorpej * for an xs.
1444 1.25 mycroft */
1445 1.178 thorpej memset(xs, 0, sizeof(sx));
1446 1.149 thorpej xs->xs_control |= XS_CTL_NOSLEEP | XS_CTL_POLL |
1447 1.149 thorpej XS_CTL_DATA_OUT;
1448 1.149 thorpej xs->xs_status = 0;
1449 1.171 bouyer xs->xs_periph = periph;
1450 1.171 bouyer xs->xs_retries = SDRETRIES;
1451 1.25 mycroft xs->timeout = 10000; /* 10000 millisecs for a disk ! */
1452 1.116 bouyer xs->cmd = (struct scsipi_generic *)&cmd;
1453 1.25 mycroft xs->cmdlen = sizeof(cmd);
1454 1.71 cgd xs->resid = nwrt * sectorsize;
1455 1.25 mycroft xs->error = XS_NOERROR;
1456 1.25 mycroft xs->bp = 0;
1457 1.71 cgd xs->data = va;
1458 1.71 cgd xs->datalen = nwrt * sectorsize;
1459 1.1 cgd
1460 1.25 mycroft /*
1461 1.25 mycroft * Pass all this info to the scsi driver.
1462 1.25 mycroft */
1463 1.171 bouyer scsipi_adapter_request(chan, ADAPTER_REQ_RUN_XFER, xs);
1464 1.171 bouyer if ((xs->xs_status & XS_STS_DONE) == 0 ||
1465 1.171 bouyer xs->error != XS_NOERROR)
1466 1.171 bouyer return (EIO);
1467 1.71 cgd #else /* SD_DUMP_NOT_TRUSTED */
1468 1.71 cgd /* Let's just talk about this first... */
1469 1.104 christos printf("sd%d: dump addr 0x%x, blk %d\n", unit, va, blkno);
1470 1.71 cgd delay(500 * 1000); /* half a second */
1471 1.71 cgd #endif /* SD_DUMP_NOT_TRUSTED */
1472 1.25 mycroft
1473 1.25 mycroft /* update block count */
1474 1.71 cgd totwrt -= nwrt;
1475 1.71 cgd blkno += nwrt;
1476 1.71 cgd va += sectorsize * nwrt;
1477 1.25 mycroft }
1478 1.71 cgd sddoingadump = 0;
1479 1.118 enami return (0);
1480 1.1 cgd }
1481