scsictl.c revision 1.22 1 1.22 mycroft /* $NetBSD: scsictl.c,v 1.22 2003/09/01 04:34:16 mycroft Exp $ */
2 1.1 thorpej
3 1.1 thorpej /*-
4 1.18 thorpej * Copyright (c) 1998, 2002 The NetBSD Foundation, Inc.
5 1.1 thorpej * All rights reserved.
6 1.1 thorpej *
7 1.1 thorpej * This code is derived from software contributed to The NetBSD Foundation
8 1.1 thorpej * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility,
9 1.1 thorpej * NASA Ames Research Center.
10 1.1 thorpej *
11 1.1 thorpej * Redistribution and use in source and binary forms, with or without
12 1.1 thorpej * modification, are permitted provided that the following conditions
13 1.1 thorpej * are met:
14 1.1 thorpej * 1. Redistributions of source code must retain the above copyright
15 1.1 thorpej * notice, this list of conditions and the following disclaimer.
16 1.1 thorpej * 2. Redistributions in binary form must reproduce the above copyright
17 1.1 thorpej * notice, this list of conditions and the following disclaimer in the
18 1.1 thorpej * documentation and/or other materials provided with the distribution.
19 1.1 thorpej * 3. All advertising materials mentioning features or use of this software
20 1.1 thorpej * must display the following acknowledgement:
21 1.1 thorpej * This product includes software developed by the NetBSD
22 1.1 thorpej * Foundation, Inc. and its contributors.
23 1.1 thorpej * 4. Neither the name of The NetBSD Foundation nor the names of its
24 1.1 thorpej * contributors may be used to endorse or promote products derived
25 1.1 thorpej * from this software without specific prior written permission.
26 1.1 thorpej *
27 1.1 thorpej * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
28 1.1 thorpej * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
29 1.1 thorpej * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
30 1.1 thorpej * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
31 1.1 thorpej * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
32 1.1 thorpej * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
33 1.1 thorpej * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
34 1.1 thorpej * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
35 1.1 thorpej * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
36 1.1 thorpej * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
37 1.1 thorpej * POSSIBILITY OF SUCH DAMAGE.
38 1.1 thorpej */
39 1.1 thorpej
40 1.1 thorpej /*
41 1.1 thorpej * scsictl(8) - a program to manipulate SCSI devices and busses.
42 1.1 thorpej */
43 1.20 agc #include <sys/cdefs.h>
44 1.20 agc
45 1.20 agc #ifndef lint
46 1.22 mycroft __RCSID("$NetBSD: scsictl.c,v 1.22 2003/09/01 04:34:16 mycroft Exp $");
47 1.20 agc #endif
48 1.20 agc
49 1.1 thorpej
50 1.1 thorpej #include <sys/param.h>
51 1.1 thorpej #include <sys/ioctl.h>
52 1.1 thorpej #include <sys/scsiio.h>
53 1.1 thorpej #include <err.h>
54 1.1 thorpej #include <errno.h>
55 1.1 thorpej #include <fcntl.h>
56 1.1 thorpej #include <stdio.h>
57 1.1 thorpej #include <stdlib.h>
58 1.1 thorpej #include <string.h>
59 1.1 thorpej #include <unistd.h>
60 1.1 thorpej #include <util.h>
61 1.1 thorpej
62 1.1 thorpej #include <dev/scsipi/scsipi_all.h>
63 1.4 thorpej #include <dev/scsipi/scsi_all.h>
64 1.1 thorpej #include <dev/scsipi/scsi_disk.h>
65 1.1 thorpej #include <dev/scsipi/scsipiconf.h>
66 1.1 thorpej
67 1.1 thorpej #include "extern.h"
68 1.1 thorpej
69 1.1 thorpej struct command {
70 1.1 thorpej const char *cmd_name;
71 1.6 hubertf const char *arg_names;
72 1.1 thorpej void (*cmd_func) __P((int, char *[]));
73 1.1 thorpej };
74 1.1 thorpej
75 1.1 thorpej int main __P((int, char *[]));
76 1.1 thorpej void usage __P((void));
77 1.1 thorpej
78 1.1 thorpej int fd; /* file descriptor for device */
79 1.1 thorpej const char *dvname; /* device name */
80 1.1 thorpej char dvname_store[MAXPATHLEN]; /* for opendisk(3) */
81 1.1 thorpej const char *cmdname; /* command user issued */
82 1.6 hubertf const char *argnames; /* helpstring: expected arguments */
83 1.1 thorpej struct scsi_addr dvaddr; /* SCSI device's address */
84 1.1 thorpej
85 1.4 thorpej void device_format __P((int, char *[]));
86 1.1 thorpej void device_identify __P((int, char *[]));
87 1.1 thorpej void device_reassign __P((int, char *[]));
88 1.16 mjacob void device_release __P((int, char *[]));
89 1.16 mjacob void device_reserve __P((int, char *[]));
90 1.1 thorpej void device_reset __P((int, char *[]));
91 1.19 petrov void device_debug __P((int, char *[]));
92 1.22 mycroft void device_prevent __P((int, char *[]));
93 1.22 mycroft void device_allow __P((int, char *[]));
94 1.16 mjacob void device_start __P((int, char *[]));
95 1.16 mjacob void device_stop __P((int, char *[]));
96 1.16 mjacob void device_tur __P((int, char *[]));
97 1.18 thorpej void device_getcache __P((int, char *[]));
98 1.18 thorpej void device_setcache __P((int, char *[]));
99 1.21 mycroft void device_flushcache __P((int, char *[]));
100 1.1 thorpej
101 1.1 thorpej struct command device_commands[] = {
102 1.16 mjacob { "format", "[blocksize [immediate]]", device_format },
103 1.7 mjl { "identify", "", device_identify },
104 1.7 mjl { "reassign", "blkno [blkno [...]]", device_reassign },
105 1.16 mjacob { "release", "", device_release },
106 1.16 mjacob { "reserve", "", device_reserve },
107 1.7 mjl { "reset", "", device_reset },
108 1.19 petrov { "debug", "level", device_debug },
109 1.22 mycroft { "prevent", "", device_prevent },
110 1.22 mycroft { "allow", "", device_allow },
111 1.16 mjacob { "start", "", device_start },
112 1.16 mjacob { "stop", "", device_stop },
113 1.16 mjacob { "tur", "", device_tur },
114 1.18 thorpej { "getcache", "", device_getcache },
115 1.18 thorpej { "setcache", "none|r|w|rw [save]", device_setcache },
116 1.21 mycroft { "flushcache", "", device_flushcache },
117 1.7 mjl { NULL, NULL, NULL },
118 1.1 thorpej };
119 1.1 thorpej
120 1.1 thorpej void bus_reset __P((int, char *[]));
121 1.1 thorpej void bus_scan __P((int, char *[]));
122 1.14 bouyer void bus_detach __P((int, char *[]));
123 1.1 thorpej
124 1.1 thorpej struct command bus_commands[] = {
125 1.7 mjl { "reset", "", bus_reset },
126 1.7 mjl { "scan", "target lun", bus_scan },
127 1.14 bouyer { "detach", "target lun", bus_detach },
128 1.6 hubertf { NULL, NULL, NULL },
129 1.1 thorpej };
130 1.1 thorpej
131 1.1 thorpej int
132 1.1 thorpej main(argc, argv)
133 1.1 thorpej int argc;
134 1.1 thorpej char *argv[];
135 1.1 thorpej {
136 1.1 thorpej struct command *commands;
137 1.1 thorpej int i;
138 1.1 thorpej
139 1.1 thorpej /* Must have at least: device command */
140 1.1 thorpej if (argc < 3)
141 1.1 thorpej usage();
142 1.1 thorpej
143 1.1 thorpej /* Skip program name, get and skip device name and command. */
144 1.1 thorpej dvname = argv[1];
145 1.1 thorpej cmdname = argv[2];
146 1.1 thorpej argv += 3;
147 1.1 thorpej argc -= 3;
148 1.1 thorpej
149 1.1 thorpej /*
150 1.1 thorpej * Open the device and determine if it's a scsibus or an actual
151 1.1 thorpej * device. Devices respond to the SCIOCIDENTIFY ioctl.
152 1.1 thorpej */
153 1.1 thorpej fd = opendisk(dvname, O_RDWR, dvname_store, sizeof(dvname_store), 0);
154 1.1 thorpej if (fd == -1) {
155 1.1 thorpej if (errno == ENOENT) {
156 1.1 thorpej /*
157 1.1 thorpej * Device doesn't exist. Probably trying to open
158 1.1 thorpej * a device which doesn't use disk semantics for
159 1.3 thorpej * device name. Try again, specifying "cooked",
160 1.3 thorpej * which leaves off the "r" in front of the device's
161 1.3 thorpej * name.
162 1.1 thorpej */
163 1.3 thorpej fd = opendisk(dvname, O_RDWR, dvname_store,
164 1.3 thorpej sizeof(dvname_store), 1);
165 1.1 thorpej if (fd == -1)
166 1.1 thorpej err(1, "%s", dvname);
167 1.5 jwise } else
168 1.5 jwise err(1, "%s", dvname);
169 1.1 thorpej }
170 1.3 thorpej
171 1.3 thorpej /*
172 1.3 thorpej * Point the dvname at the actual device name that opendisk() opened.
173 1.3 thorpej */
174 1.3 thorpej dvname = dvname_store;
175 1.1 thorpej
176 1.1 thorpej if (ioctl(fd, SCIOCIDENTIFY, &dvaddr) < 0)
177 1.1 thorpej commands = bus_commands;
178 1.1 thorpej else
179 1.1 thorpej commands = device_commands;
180 1.1 thorpej
181 1.1 thorpej /* Look up and call the command. */
182 1.1 thorpej for (i = 0; commands[i].cmd_name != NULL; i++)
183 1.1 thorpej if (strcmp(cmdname, commands[i].cmd_name) == 0)
184 1.1 thorpej break;
185 1.1 thorpej if (commands[i].cmd_name == NULL)
186 1.12 ad errx(1, "unknown %s command: %s",
187 1.1 thorpej commands == bus_commands ? "bus" : "device", cmdname);
188 1.1 thorpej
189 1.6 hubertf argnames = commands[i].arg_names;
190 1.6 hubertf
191 1.1 thorpej (*commands[i].cmd_func)(argc, argv);
192 1.1 thorpej exit(0);
193 1.1 thorpej }
194 1.1 thorpej
195 1.1 thorpej void
196 1.1 thorpej usage()
197 1.1 thorpej {
198 1.6 hubertf int i;
199 1.1 thorpej
200 1.6 hubertf fprintf(stderr, "Usage: %s device command [arg [...]]\n",
201 1.11 cgd getprogname());
202 1.7 mjl
203 1.7 mjl fprintf(stderr, " Commands pertaining to scsi devices:\n");
204 1.6 hubertf for (i=0; device_commands[i].cmd_name != NULL; i++)
205 1.7 mjl fprintf(stderr, "\t%s %s\n", device_commands[i].cmd_name,
206 1.6 hubertf device_commands[i].arg_names);
207 1.7 mjl fprintf(stderr, " Commands pertaining to scsi busses:\n");
208 1.6 hubertf for (i=0; bus_commands[i].cmd_name != NULL; i++)
209 1.7 mjl fprintf(stderr, "\t%s %s\n", bus_commands[i].cmd_name,
210 1.6 hubertf bus_commands[i].arg_names);
211 1.8 ad fprintf(stderr, " Use `any' or `all' to wildcard target or lun\n");
212 1.6 hubertf
213 1.1 thorpej exit(1);
214 1.1 thorpej }
215 1.1 thorpej
216 1.1 thorpej /*
217 1.1 thorpej * DEVICE COMMANDS
218 1.1 thorpej */
219 1.4 thorpej
220 1.4 thorpej /*
221 1.4 thorpej * device_format:
222 1.4 thorpej *
223 1.4 thorpej * Format a direct access device.
224 1.4 thorpej */
225 1.4 thorpej void
226 1.4 thorpej device_format(argc, argv)
227 1.4 thorpej int argc;
228 1.4 thorpej char *argv[];
229 1.4 thorpej {
230 1.16 mjacob u_int32_t blksize;
231 1.16 mjacob int i, j, immediate;
232 1.16 mjacob #define PC (65536/10)
233 1.16 mjacob static int complete[] = {
234 1.16 mjacob PC*1, PC*2, PC*3, PC*4, PC*5, PC*6, PC*7, PC*8, PC*9, 65536
235 1.16 mjacob };
236 1.16 mjacob char *cp, buffer[64];
237 1.16 mjacob struct scsipi_sense_data sense;
238 1.4 thorpej struct scsi_format_unit cmd;
239 1.4 thorpej struct {
240 1.16 mjacob struct scsi_format_unit_defect_list_header header;
241 1.16 mjacob /* optional initialization pattern */
242 1.16 mjacob /* optional defect list */
243 1.16 mjacob } dfl;
244 1.16 mjacob struct {
245 1.13 bouyer struct scsipi_mode_header header;
246 1.4 thorpej struct scsi_blk_desc blk_desc;
247 1.4 thorpej struct page_disk_format format_page;
248 1.16 mjacob } mode_page;
249 1.16 mjacob struct {
250 1.16 mjacob struct scsipi_mode_header header;
251 1.16 mjacob struct scsi_blk_desc blk_desc;
252 1.16 mjacob } data_select;
253 1.16 mjacob
254 1.4 thorpej
255 1.16 mjacob /* Blocksize is an optional argument. */
256 1.16 mjacob if (argc > 2)
257 1.6 hubertf usage();
258 1.4 thorpej
259 1.4 thorpej /*
260 1.16 mjacob * Loop doing Request Sense to clear any pending Unit Attention.
261 1.16 mjacob *
262 1.16 mjacob * Multiple conditions may exist on the drive which are returned
263 1.16 mjacob * in priority order.
264 1.16 mjacob */
265 1.16 mjacob for (i = 0; i < 8; i++) {
266 1.16 mjacob scsi_request_sense(fd, &sense, sizeof (sense));
267 1.16 mjacob if ((j = sense.flags & SSD_KEY) == SKEY_NO_SENSE)
268 1.16 mjacob break;
269 1.16 mjacob }
270 1.16 mjacob /*
271 1.16 mjacob * Make sure we cleared any pending Unit Attention
272 1.16 mjacob */
273 1.16 mjacob if (j != SKEY_NO_SENSE) {
274 1.16 mjacob cp = scsi_decode_sense((const unsigned char *) &sense, 2,
275 1.16 mjacob buffer, sizeof (buffer));
276 1.17 grant errx(1, "failed to clean Unit Attention: %s", cp);
277 1.16 mjacob }
278 1.16 mjacob
279 1.16 mjacob /*
280 1.4 thorpej * Get the DISK FORMAT mode page. SCSI-2 recommends specifying the
281 1.4 thorpej * interleave read from this page in the FORMAT UNIT command.
282 1.4 thorpej */
283 1.16 mjacob scsi_mode_sense(fd, 0x03, 0x00, &mode_page, sizeof(mode_page));
284 1.16 mjacob
285 1.16 mjacob j = (mode_page.format_page.bytes_s[0] << 8) |
286 1.16 mjacob (mode_page.format_page.bytes_s[1]);
287 1.16 mjacob
288 1.16 mjacob if (j != DEV_BSIZE)
289 1.16 mjacob printf("current disk sector size: %hd\n", j);
290 1.4 thorpej
291 1.4 thorpej memset(&cmd, 0, sizeof(cmd));
292 1.4 thorpej
293 1.4 thorpej cmd.opcode = SCSI_FORMAT_UNIT;
294 1.16 mjacob memcpy(cmd.interleave, mode_page.format_page.interleave,
295 1.4 thorpej sizeof(cmd.interleave));
296 1.4 thorpej
297 1.16 mjacob /*
298 1.16 mjacob * The blocksize on the device is only changed if the user
299 1.16 mjacob * specified a new blocksize. If not specified the blocksize
300 1.16 mjacob * used for the device will be the Default value in the device.
301 1.16 mjacob * We don't specify the number of blocks since the format
302 1.16 mjacob * command will always reformat the entire drive. Also by
303 1.16 mjacob * not specifying a block count the drive will reset the
304 1.16 mjacob * block count to the maximum available after the format
305 1.16 mjacob * completes if the blocksize was changed in the format.
306 1.16 mjacob * Finally, the new disk geometry will not but updated on
307 1.16 mjacob * the drive in permanent storage until _AFTER_ the format
308 1.16 mjacob * completes successfully.
309 1.16 mjacob */
310 1.16 mjacob if (argc > 0) {
311 1.16 mjacob blksize = strtoul(argv[0], &cp, 10);
312 1.16 mjacob if (*cp != '\0')
313 1.17 grant errx(1, "invalid block size: %s", argv[0]);
314 1.16 mjacob
315 1.16 mjacob memset(&data_select, 0, sizeof(data_select));
316 1.16 mjacob
317 1.16 mjacob data_select.header.blk_desc_len = sizeof(struct scsi_blk_desc);
318 1.16 mjacob /*
319 1.16 mjacob * blklen in desc is 3 bytes with a leading reserved byte
320 1.16 mjacob */
321 1.16 mjacob _lto4b(blksize, &data_select.blk_desc.reserved);
322 1.16 mjacob
323 1.16 mjacob /*
324 1.16 mjacob * Issue Mode Select to modify the device blocksize to be
325 1.16 mjacob * used on the Format. The modified device geometry will
326 1.16 mjacob * be stored as Current and Saved Page 3 parameters when
327 1.16 mjacob * the Format completes.
328 1.16 mjacob */
329 1.16 mjacob scsi_mode_select(fd, 0, &data_select, sizeof(data_select));
330 1.16 mjacob
331 1.16 mjacob /*
332 1.16 mjacob * Since user specified a specific block size make sure it
333 1.16 mjacob * gets stored in the device when the format completes.
334 1.16 mjacob *
335 1.16 mjacob * Also scrub the defect list back to the manufacturers
336 1.16 mjacob * original.
337 1.16 mjacob */
338 1.16 mjacob cmd.flags = SFU_CMPLST | SFU_FMTDATA;
339 1.16 mjacob }
340 1.16 mjacob
341 1.16 mjacob memset(&dfl, 0, sizeof(dfl));
342 1.4 thorpej
343 1.16 mjacob if (argc > 1 && strncmp(argv[1], "imm", 3) == 0) {
344 1.16 mjacob /*
345 1.16 mjacob * Signal target for an immediate return from Format.
346 1.16 mjacob *
347 1.16 mjacob * We'll poll for completion status.
348 1.16 mjacob */
349 1.16 mjacob dfl.header.flags = DLH_IMMED;
350 1.16 mjacob immediate = 1;
351 1.16 mjacob } else {
352 1.16 mjacob immediate = 0;
353 1.16 mjacob }
354 1.16 mjacob
355 1.16 mjacob scsi_command(fd, &cmd, sizeof(cmd), &dfl, sizeof(dfl),
356 1.16 mjacob 8 * 60 * 60 * 1000, 0);
357 1.16 mjacob
358 1.16 mjacob /*
359 1.16 mjacob * Poll device for completion of Format
360 1.16 mjacob */
361 1.16 mjacob if (immediate) {
362 1.16 mjacob i = 0;
363 1.16 mjacob printf("formatting.");
364 1.16 mjacob fflush(stdout);
365 1.16 mjacob do {
366 1.16 mjacob scsireq_t req;
367 1.16 mjacob struct scsipi_test_unit_ready tcmd;
368 1.16 mjacob
369 1.16 mjacob memset(&tcmd, 0, sizeof(cmd));
370 1.16 mjacob tcmd.opcode = TEST_UNIT_READY;
371 1.16 mjacob
372 1.16 mjacob memset(&req, 0, sizeof(req));
373 1.16 mjacob memcpy(req.cmd, &tcmd, 6);
374 1.16 mjacob req.cmdlen = 6;
375 1.16 mjacob req.timeout = 10000;
376 1.16 mjacob req.senselen = SENSEBUFLEN;
377 1.16 mjacob
378 1.16 mjacob if (ioctl(fd, SCIOCCOMMAND, &req) == -1) {
379 1.16 mjacob err(1, "SCIOCCOMMAND");
380 1.16 mjacob }
381 1.16 mjacob
382 1.16 mjacob if (req.retsts == SCCMD_OK) {
383 1.16 mjacob break;
384 1.16 mjacob } else if (req.retsts == SCCMD_TIMEOUT) {
385 1.16 mjacob fprintf(stderr, "%s: SCSI command timed out",
386 1.16 mjacob dvname);
387 1.16 mjacob break;
388 1.16 mjacob } else if (req.retsts == SCCMD_BUSY) {
389 1.16 mjacob fprintf(stderr, "%s: device is busy",
390 1.16 mjacob dvname);
391 1.16 mjacob break;
392 1.16 mjacob } else if (req.retsts != SCCMD_SENSE) {
393 1.16 mjacob fprintf(stderr,
394 1.16 mjacob "%s: device had unknown status %x", dvname,
395 1.16 mjacob req.retsts);
396 1.16 mjacob break;
397 1.16 mjacob }
398 1.16 mjacob memcpy(&sense, req.sense, SENSEBUFLEN);
399 1.16 mjacob if (sense.sense_key_spec_1 == SSD_SCS_VALID) {
400 1.16 mjacob j = (sense.sense_key_spec_2 << 8) |
401 1.16 mjacob (sense.sense_key_spec_3);
402 1.16 mjacob if (j >= complete[i]) {
403 1.16 mjacob printf(".%d0%%.", ++i);
404 1.16 mjacob fflush(stdout);
405 1.16 mjacob }
406 1.16 mjacob }
407 1.16 mjacob sleep(10);
408 1.16 mjacob } while ((sense.flags & SSD_KEY) == SKEY_NOT_READY);
409 1.16 mjacob printf(".100%%..done.\n");
410 1.16 mjacob }
411 1.4 thorpej return;
412 1.4 thorpej }
413 1.1 thorpej
414 1.1 thorpej /*
415 1.1 thorpej * device_identify:
416 1.1 thorpej *
417 1.1 thorpej * Display the identity of the device, including it's SCSI bus,
418 1.1 thorpej * target, lun, and it's vendor/product/revision information.
419 1.1 thorpej */
420 1.1 thorpej void
421 1.1 thorpej device_identify(argc, argv)
422 1.1 thorpej int argc;
423 1.1 thorpej char *argv[];
424 1.1 thorpej {
425 1.1 thorpej struct scsipi_inquiry_data inqbuf;
426 1.1 thorpej struct scsipi_inquiry cmd;
427 1.1 thorpej
428 1.1 thorpej /* x4 in case every character is escaped, +1 for NUL. */
429 1.1 thorpej char vendor[(sizeof(inqbuf.vendor) * 4) + 1],
430 1.1 thorpej product[(sizeof(inqbuf.product) * 4) + 1],
431 1.1 thorpej revision[(sizeof(inqbuf.revision) * 4) + 1];
432 1.1 thorpej
433 1.1 thorpej /* No arguments. */
434 1.1 thorpej if (argc != 0)
435 1.6 hubertf usage();
436 1.1 thorpej
437 1.1 thorpej memset(&cmd, 0, sizeof(cmd));
438 1.1 thorpej memset(&inqbuf, 0, sizeof(inqbuf));
439 1.1 thorpej
440 1.1 thorpej cmd.opcode = INQUIRY;
441 1.1 thorpej cmd.length = sizeof(inqbuf);
442 1.1 thorpej
443 1.1 thorpej scsi_command(fd, &cmd, sizeof(cmd), &inqbuf, sizeof(inqbuf),
444 1.1 thorpej 10000, SCCMD_READ);
445 1.1 thorpej
446 1.1 thorpej scsi_strvis(vendor, sizeof(vendor), inqbuf.vendor,
447 1.1 thorpej sizeof(inqbuf.vendor));
448 1.1 thorpej scsi_strvis(product, sizeof(product), inqbuf.product,
449 1.1 thorpej sizeof(inqbuf.product));
450 1.1 thorpej scsi_strvis(revision, sizeof(revision), inqbuf.revision,
451 1.1 thorpej sizeof(inqbuf.revision));
452 1.1 thorpej
453 1.1 thorpej printf("%s: scsibus%d target %d lun %d <%s, %s, %s>\n",
454 1.1 thorpej dvname, dvaddr.addr.scsi.scbus, dvaddr.addr.scsi.target,
455 1.1 thorpej dvaddr.addr.scsi.lun, vendor, product, revision);
456 1.1 thorpej
457 1.1 thorpej return;
458 1.1 thorpej }
459 1.1 thorpej
460 1.1 thorpej /*
461 1.1 thorpej * device_reassign:
462 1.1 thorpej *
463 1.1 thorpej * Reassign bad blocks on a direct access device.
464 1.1 thorpej */
465 1.1 thorpej void
466 1.1 thorpej device_reassign(argc, argv)
467 1.1 thorpej int argc;
468 1.1 thorpej char *argv[];
469 1.1 thorpej {
470 1.1 thorpej struct scsi_reassign_blocks cmd;
471 1.1 thorpej struct scsi_reassign_blocks_data *data;
472 1.1 thorpej size_t dlen;
473 1.1 thorpej u_int32_t blkno;
474 1.1 thorpej int i;
475 1.1 thorpej char *cp;
476 1.1 thorpej
477 1.1 thorpej /* We get a list of block numbers. */
478 1.1 thorpej if (argc < 1)
479 1.6 hubertf usage();
480 1.1 thorpej
481 1.1 thorpej /*
482 1.1 thorpej * Allocate the reassign blocks descriptor. The 4 comes from the
483 1.1 thorpej * size of the block address in the defect descriptor.
484 1.1 thorpej */
485 1.1 thorpej dlen = sizeof(struct scsi_reassign_blocks_data) + ((argc - 1) * 4);
486 1.1 thorpej data = malloc(dlen);
487 1.1 thorpej if (data == NULL)
488 1.1 thorpej errx(1, "unable to allocate defect descriptor");
489 1.1 thorpej memset(data, 0, dlen);
490 1.1 thorpej
491 1.1 thorpej cmd.opcode = SCSI_REASSIGN_BLOCKS;
492 1.9 mycroft cmd.byte2 = 0;
493 1.9 mycroft cmd.unused[0] = 0;
494 1.9 mycroft cmd.unused[1] = 0;
495 1.9 mycroft cmd.unused[2] = 0;
496 1.9 mycroft cmd.control = 0;
497 1.1 thorpej
498 1.1 thorpej /* Defect descriptor length. */
499 1.9 mycroft _lto2b(argc * 4, data->length);
500 1.1 thorpej
501 1.1 thorpej /* Build the defect descriptor list. */
502 1.1 thorpej for (i = 0; i < argc; i++) {
503 1.1 thorpej blkno = strtoul(argv[i], &cp, 10);
504 1.1 thorpej if (*cp != '\0')
505 1.12 ad errx(1, "invalid block number: %s", argv[i]);
506 1.9 mycroft _lto4b(blkno, data->defect_descriptor[i].dlbaddr);
507 1.1 thorpej }
508 1.1 thorpej
509 1.1 thorpej scsi_command(fd, &cmd, sizeof(cmd), data, dlen, 30000, SCCMD_WRITE);
510 1.1 thorpej
511 1.1 thorpej free(data);
512 1.1 thorpej return;
513 1.1 thorpej }
514 1.1 thorpej
515 1.1 thorpej /*
516 1.16 mjacob * device_release:
517 1.16 mjacob *
518 1.16 mjacob * Issue a RELEASE command to a SCSI drevice
519 1.16 mjacob */
520 1.16 mjacob #ifndef SCSI_RELEASE
521 1.16 mjacob #define SCSI_RELEASE 0x17
522 1.16 mjacob #endif
523 1.16 mjacob void
524 1.16 mjacob device_release(argc, argv)
525 1.16 mjacob int argc;
526 1.16 mjacob char *argv[];
527 1.16 mjacob {
528 1.16 mjacob struct scsipi_test_unit_ready cmd; /* close enough */
529 1.16 mjacob
530 1.16 mjacob /* No arguments. */
531 1.16 mjacob if (argc != 0)
532 1.16 mjacob usage();
533 1.16 mjacob
534 1.16 mjacob memset(&cmd, 0, sizeof(cmd));
535 1.16 mjacob
536 1.16 mjacob cmd.opcode = SCSI_RELEASE;
537 1.16 mjacob
538 1.16 mjacob scsi_command(fd, &cmd, sizeof(cmd), NULL, 0, 10000, 0);
539 1.16 mjacob
540 1.16 mjacob return;
541 1.16 mjacob }
542 1.16 mjacob
543 1.16 mjacob
544 1.16 mjacob
545 1.16 mjacob /*
546 1.16 mjacob * device_reserve:
547 1.16 mjacob *
548 1.16 mjacob * Issue a RESERVE command to a SCSI drevice
549 1.16 mjacob */
550 1.16 mjacob #ifndef SCSI_RESERVE
551 1.16 mjacob #define SCSI_RESERVE 0x16
552 1.16 mjacob #endif
553 1.16 mjacob void
554 1.16 mjacob device_reserve(argc, argv)
555 1.16 mjacob int argc;
556 1.16 mjacob char *argv[];
557 1.16 mjacob {
558 1.16 mjacob struct scsipi_test_unit_ready cmd; /* close enough */
559 1.16 mjacob
560 1.16 mjacob /* No arguments. */
561 1.16 mjacob if (argc != 0)
562 1.16 mjacob usage();
563 1.16 mjacob
564 1.16 mjacob memset(&cmd, 0, sizeof(cmd));
565 1.16 mjacob
566 1.16 mjacob cmd.opcode = SCSI_RESERVE;
567 1.16 mjacob
568 1.16 mjacob scsi_command(fd, &cmd, sizeof(cmd), NULL, 0, 10000, 0);
569 1.16 mjacob
570 1.16 mjacob return;
571 1.16 mjacob }
572 1.16 mjacob
573 1.16 mjacob /*
574 1.1 thorpej * device_reset:
575 1.1 thorpej *
576 1.1 thorpej * Issue a reset to a SCSI device.
577 1.1 thorpej */
578 1.1 thorpej void
579 1.1 thorpej device_reset(argc, argv)
580 1.1 thorpej int argc;
581 1.1 thorpej char *argv[];
582 1.1 thorpej {
583 1.1 thorpej
584 1.1 thorpej /* No arguments. */
585 1.1 thorpej if (argc != 0)
586 1.6 hubertf usage();
587 1.1 thorpej
588 1.1 thorpej if (ioctl(fd, SCIOCRESET, NULL) != 0)
589 1.1 thorpej err(1, "SCIOCRESET");
590 1.19 petrov
591 1.19 petrov return;
592 1.19 petrov }
593 1.19 petrov
594 1.19 petrov /*
595 1.19 petrov * device_debug:
596 1.19 petrov *
597 1.19 petrov * Set debug level to a SCSI device.
598 1.19 petrov * scsipi will print anything iff SCSIPI_DEBUG set in config.
599 1.19 petrov */
600 1.19 petrov void
601 1.19 petrov device_debug(argc, argv)
602 1.19 petrov int argc;
603 1.19 petrov char *argv[];
604 1.19 petrov {
605 1.19 petrov int lvl;
606 1.19 petrov
607 1.19 petrov if (argc < 1)
608 1.19 petrov usage();
609 1.19 petrov
610 1.19 petrov lvl = atoi(argv[0]);
611 1.19 petrov
612 1.19 petrov if (ioctl(fd, SCIOCDEBUG, &lvl) != 0)
613 1.19 petrov err(1, "SCIOCDEBUG");
614 1.1 thorpej
615 1.1 thorpej return;
616 1.1 thorpej }
617 1.1 thorpej
618 1.1 thorpej /*
619 1.18 thorpej * device_getcache:
620 1.18 thorpej *
621 1.18 thorpej * Get the caching parameters for a SCSI disk.
622 1.1 thorpej */
623 1.18 thorpej void
624 1.18 thorpej device_getcache(argc, argv)
625 1.18 thorpej int argc;
626 1.18 thorpej char *argv[];
627 1.18 thorpej {
628 1.18 thorpej struct {
629 1.18 thorpej struct scsipi_mode_header header;
630 1.18 thorpej struct scsi_blk_desc blk_desc;
631 1.18 thorpej struct page_caching caching_params;
632 1.18 thorpej } data;
633 1.18 thorpej
634 1.18 thorpej /* No arguments. */
635 1.18 thorpej if (argc != 0)
636 1.18 thorpej usage();
637 1.18 thorpej
638 1.18 thorpej scsi_mode_sense(fd, 0x08, 0x00, &data, sizeof(data));
639 1.18 thorpej
640 1.18 thorpej if ((data.caching_params.flags & (CACHING_RCD|CACHING_WCE)) ==
641 1.18 thorpej CACHING_RCD)
642 1.18 thorpej printf("%s: no caches enabled\n", dvname);
643 1.18 thorpej else {
644 1.18 thorpej printf("%s: read cache %senabled\n", dvname,
645 1.18 thorpej (data.caching_params.flags & CACHING_RCD) ? "not " : "");
646 1.18 thorpej printf("%s: write-back cache %senabled\n", dvname,
647 1.18 thorpej (data.caching_params.flags & CACHING_WCE) ? "" : "not ");
648 1.18 thorpej }
649 1.18 thorpej printf("%s: caching parameters are %ssavable\n", dvname,
650 1.18 thorpej (data.caching_params.pg_code & PGCODE_PS) ? "" : "not ");
651 1.18 thorpej }
652 1.1 thorpej
653 1.1 thorpej /*
654 1.18 thorpej * device_setcache:
655 1.1 thorpej *
656 1.18 thorpej * Set cache enables for a SCSI disk.
657 1.1 thorpej */
658 1.1 thorpej void
659 1.18 thorpej device_setcache(argc, argv)
660 1.1 thorpej int argc;
661 1.1 thorpej char *argv[];
662 1.1 thorpej {
663 1.18 thorpej struct {
664 1.18 thorpej struct scsipi_mode_header header;
665 1.18 thorpej struct scsi_blk_desc blk_desc;
666 1.18 thorpej struct page_caching caching_params;
667 1.18 thorpej } data;
668 1.18 thorpej int dlen;
669 1.18 thorpej u_int8_t flags, byte2;
670 1.18 thorpej
671 1.18 thorpej if (argc > 2 || argc == 0)
672 1.18 thorpej usage();
673 1.18 thorpej
674 1.18 thorpej if (strcmp(argv[0], "none") == 0)
675 1.18 thorpej flags = CACHING_RCD;
676 1.18 thorpej else if (strcmp(argv[0], "r") == 0)
677 1.18 thorpej flags = 0;
678 1.18 thorpej else if (strcmp(argv[0], "w") == 0)
679 1.18 thorpej flags = CACHING_RCD|CACHING_WCE;
680 1.18 thorpej else if (strcmp(argv[0], "rw") == 0)
681 1.18 thorpej flags = CACHING_WCE;
682 1.18 thorpej else
683 1.18 thorpej usage();
684 1.18 thorpej
685 1.18 thorpej if (argc == 2) {
686 1.18 thorpej if (strcmp(argv[1], "save") == 0)
687 1.18 thorpej byte2 = SMS_SP;
688 1.18 thorpej else
689 1.18 thorpej usage();
690 1.18 thorpej }
691 1.18 thorpej
692 1.18 thorpej scsi_mode_sense(fd, 0x08, 0x00, &data, sizeof(data));
693 1.18 thorpej
694 1.18 thorpej data.caching_params.pg_code &= PGCODE_MASK;
695 1.18 thorpej data.caching_params.flags =
696 1.18 thorpej (data.caching_params.flags & ~(CACHING_RCD|CACHING_WCE)) | flags;
697 1.1 thorpej
698 1.18 thorpej data.caching_params.cache_segment_size[0] = 0;
699 1.18 thorpej data.caching_params.cache_segment_size[1] = 0;
700 1.18 thorpej
701 1.18 thorpej data.header.data_length = 0;
702 1.1 thorpej
703 1.18 thorpej dlen = sizeof(data.header) + sizeof(data.blk_desc) + 2 +
704 1.18 thorpej data.caching_params.pg_length;
705 1.1 thorpej
706 1.18 thorpej scsi_mode_select(fd, byte2, &data, dlen);
707 1.21 mycroft }
708 1.21 mycroft
709 1.21 mycroft /*
710 1.21 mycroft * device_flushcache:
711 1.21 mycroft *
712 1.21 mycroft * Issue a FLUSH CACHE command to a SCSI drevice
713 1.21 mycroft */
714 1.21 mycroft #ifndef SCSI_FLUSHCACHE
715 1.21 mycroft #define SCSI_FLUSHCACHE 0x35
716 1.21 mycroft #endif
717 1.21 mycroft void
718 1.21 mycroft device_flushcache(argc, argv)
719 1.21 mycroft int argc;
720 1.21 mycroft char *argv[];
721 1.21 mycroft {
722 1.21 mycroft struct scsipi_test_unit_ready cmd; /* close enough */
723 1.21 mycroft
724 1.21 mycroft /* No arguments. */
725 1.21 mycroft if (argc != 0)
726 1.21 mycroft usage();
727 1.21 mycroft
728 1.21 mycroft memset(&cmd, 0, sizeof(cmd));
729 1.21 mycroft
730 1.21 mycroft cmd.opcode = SCSI_FLUSHCACHE;
731 1.22 mycroft
732 1.22 mycroft scsi_command(fd, &cmd, sizeof(cmd), NULL, 0, 10000, 0);
733 1.22 mycroft
734 1.22 mycroft return;
735 1.22 mycroft }
736 1.22 mycroft
737 1.22 mycroft /*
738 1.22 mycroft * device_prevent:
739 1.22 mycroft *
740 1.22 mycroft * Issue a prevent to a SCSI device.
741 1.22 mycroft */
742 1.22 mycroft void
743 1.22 mycroft device_prevent(argc, argv)
744 1.22 mycroft int argc;
745 1.22 mycroft char *argv[];
746 1.22 mycroft {
747 1.22 mycroft struct scsipi_prevent cmd;
748 1.22 mycroft
749 1.22 mycroft /* No arguments. */
750 1.22 mycroft if (argc != 0)
751 1.22 mycroft usage();
752 1.22 mycroft
753 1.22 mycroft memset(&cmd, 0, sizeof(cmd));
754 1.22 mycroft
755 1.22 mycroft cmd.opcode = PREVENT_ALLOW;
756 1.22 mycroft cmd.how = PR_PREVENT;
757 1.22 mycroft
758 1.22 mycroft scsi_command(fd, &cmd, sizeof(cmd), NULL, 0, 10000, 0);
759 1.22 mycroft
760 1.22 mycroft return;
761 1.22 mycroft }
762 1.22 mycroft
763 1.22 mycroft /*
764 1.22 mycroft * device_allow:
765 1.22 mycroft *
766 1.22 mycroft * Issue a stop to a SCSI device.
767 1.22 mycroft */
768 1.22 mycroft void
769 1.22 mycroft device_allow(argc, argv)
770 1.22 mycroft int argc;
771 1.22 mycroft char *argv[];
772 1.22 mycroft {
773 1.22 mycroft struct scsipi_prevent cmd;
774 1.22 mycroft
775 1.22 mycroft /* No arguments. */
776 1.22 mycroft if (argc != 0)
777 1.22 mycroft usage();
778 1.22 mycroft
779 1.22 mycroft memset(&cmd, 0, sizeof(cmd));
780 1.22 mycroft
781 1.22 mycroft cmd.opcode = PREVENT_ALLOW;
782 1.22 mycroft cmd.how = PR_ALLOW;
783 1.21 mycroft
784 1.21 mycroft scsi_command(fd, &cmd, sizeof(cmd), NULL, 0, 10000, 0);
785 1.21 mycroft
786 1.21 mycroft return;
787 1.1 thorpej }
788 1.16 mjacob
789 1.16 mjacob /*
790 1.16 mjacob * device_start:
791 1.16 mjacob *
792 1.16 mjacob * Issue a start to a SCSI device.
793 1.16 mjacob */
794 1.16 mjacob void
795 1.16 mjacob device_start(argc, argv)
796 1.16 mjacob int argc;
797 1.16 mjacob char *argv[];
798 1.16 mjacob {
799 1.16 mjacob struct scsipi_start_stop cmd;
800 1.16 mjacob
801 1.16 mjacob /* No arguments. */
802 1.16 mjacob if (argc != 0)
803 1.16 mjacob usage();
804 1.16 mjacob
805 1.16 mjacob memset(&cmd, 0, sizeof(cmd));
806 1.16 mjacob
807 1.16 mjacob cmd.opcode = START_STOP;
808 1.16 mjacob cmd.how = SSS_START;
809 1.16 mjacob
810 1.16 mjacob scsi_command(fd, &cmd, sizeof(cmd), NULL, 0, 10000, 0);
811 1.16 mjacob
812 1.16 mjacob return;
813 1.16 mjacob }
814 1.16 mjacob
815 1.16 mjacob /*
816 1.16 mjacob * device_stop:
817 1.16 mjacob *
818 1.16 mjacob * Issue a stop to a SCSI device.
819 1.16 mjacob */
820 1.16 mjacob void
821 1.16 mjacob device_stop(argc, argv)
822 1.16 mjacob int argc;
823 1.16 mjacob char *argv[];
824 1.16 mjacob {
825 1.16 mjacob struct scsipi_start_stop cmd;
826 1.16 mjacob
827 1.16 mjacob /* No arguments. */
828 1.16 mjacob if (argc != 0)
829 1.16 mjacob usage();
830 1.16 mjacob
831 1.16 mjacob memset(&cmd, 0, sizeof(cmd));
832 1.16 mjacob
833 1.16 mjacob cmd.opcode = START_STOP;
834 1.16 mjacob cmd.how = SSS_STOP;
835 1.16 mjacob
836 1.16 mjacob scsi_command(fd, &cmd, sizeof(cmd), NULL, 0, 10000, 0);
837 1.16 mjacob
838 1.16 mjacob return;
839 1.16 mjacob }
840 1.16 mjacob
841 1.16 mjacob /*
842 1.16 mjacob * device_tur:
843 1.16 mjacob *
844 1.16 mjacob * Issue a TEST UNIT READY to a SCSI drevice
845 1.16 mjacob */
846 1.16 mjacob void
847 1.16 mjacob device_tur(argc, argv)
848 1.16 mjacob int argc;
849 1.16 mjacob char *argv[];
850 1.16 mjacob {
851 1.16 mjacob struct scsipi_test_unit_ready cmd;
852 1.16 mjacob
853 1.16 mjacob /* No arguments. */
854 1.16 mjacob if (argc != 0)
855 1.16 mjacob usage();
856 1.16 mjacob
857 1.16 mjacob memset(&cmd, 0, sizeof(cmd));
858 1.16 mjacob
859 1.16 mjacob cmd.opcode = TEST_UNIT_READY;
860 1.16 mjacob
861 1.16 mjacob scsi_command(fd, &cmd, sizeof(cmd), NULL, 0, 10000, 0);
862 1.16 mjacob
863 1.16 mjacob return;
864 1.16 mjacob }
865 1.16 mjacob
866 1.18 thorpej /*
867 1.18 thorpej * BUS COMMANDS
868 1.18 thorpej */
869 1.18 thorpej
870 1.18 thorpej /*
871 1.18 thorpej * bus_reset:
872 1.18 thorpej *
873 1.18 thorpej * Issue a reset to a SCSI bus.
874 1.18 thorpej */
875 1.18 thorpej void
876 1.18 thorpej bus_reset(argc, argv)
877 1.18 thorpej int argc;
878 1.18 thorpej char *argv[];
879 1.18 thorpej {
880 1.18 thorpej
881 1.18 thorpej /* No arguments. */
882 1.18 thorpej if (argc != 0)
883 1.18 thorpej usage();
884 1.16 mjacob
885 1.18 thorpej if (ioctl(fd, SCBUSIORESET, NULL) != 0)
886 1.18 thorpej err(1, "SCBUSIORESET");
887 1.18 thorpej
888 1.18 thorpej return;
889 1.18 thorpej }
890 1.1 thorpej
891 1.1 thorpej /*
892 1.1 thorpej * bus_scan:
893 1.1 thorpej *
894 1.1 thorpej * Rescan a SCSI bus for new devices.
895 1.1 thorpej */
896 1.1 thorpej void
897 1.1 thorpej bus_scan(argc, argv)
898 1.1 thorpej int argc;
899 1.1 thorpej char *argv[];
900 1.1 thorpej {
901 1.1 thorpej struct scbusioscan_args args;
902 1.1 thorpej char *cp;
903 1.1 thorpej
904 1.1 thorpej /* Must have two args: target lun */
905 1.1 thorpej if (argc != 2)
906 1.6 hubertf usage();
907 1.1 thorpej
908 1.8 ad if (strcmp(argv[0], "any") == 0 || strcmp(argv[0], "all") == 0)
909 1.1 thorpej args.sa_target = -1;
910 1.1 thorpej else {
911 1.1 thorpej args.sa_target = strtol(argv[0], &cp, 10);
912 1.1 thorpej if (*cp != '\0' || args.sa_target < 0)
913 1.12 ad errx(1, "invalid target: %s", argv[0]);
914 1.1 thorpej }
915 1.1 thorpej
916 1.8 ad if (strcmp(argv[1], "any") == 0 || strcmp(argv[1], "all") == 0)
917 1.1 thorpej args.sa_lun = -1;
918 1.1 thorpej else {
919 1.1 thorpej args.sa_lun = strtol(argv[1], &cp, 10);
920 1.1 thorpej if (*cp != '\0' || args.sa_lun < 0)
921 1.12 ad errx(1, "invalid lun: %s", argv[1]);
922 1.1 thorpej }
923 1.1 thorpej
924 1.1 thorpej if (ioctl(fd, SCBUSIOSCAN, &args) != 0)
925 1.1 thorpej err(1, "SCBUSIOSCAN");
926 1.14 bouyer
927 1.14 bouyer return;
928 1.14 bouyer }
929 1.14 bouyer
930 1.14 bouyer /*
931 1.14 bouyer * bus_detach:
932 1.14 bouyer *
933 1.14 bouyer * detach SCSI devices from a bus.
934 1.14 bouyer */
935 1.14 bouyer void
936 1.14 bouyer bus_detach(argc, argv)
937 1.14 bouyer int argc;
938 1.14 bouyer char *argv[];
939 1.14 bouyer {
940 1.14 bouyer struct scbusiodetach_args args;
941 1.14 bouyer char *cp;
942 1.14 bouyer
943 1.14 bouyer /* Must have two args: target lun */
944 1.14 bouyer if (argc != 2)
945 1.14 bouyer usage();
946 1.14 bouyer
947 1.14 bouyer if (strcmp(argv[0], "any") == 0 || strcmp(argv[0], "all") == 0)
948 1.14 bouyer args.sa_target = -1;
949 1.14 bouyer else {
950 1.14 bouyer args.sa_target = strtol(argv[0], &cp, 10);
951 1.14 bouyer if (*cp != '\0' || args.sa_target < 0)
952 1.17 grant errx(1, "invalid target: %s", argv[0]);
953 1.14 bouyer }
954 1.14 bouyer
955 1.14 bouyer if (strcmp(argv[1], "any") == 0 || strcmp(argv[1], "all") == 0)
956 1.14 bouyer args.sa_lun = -1;
957 1.14 bouyer else {
958 1.14 bouyer args.sa_lun = strtol(argv[1], &cp, 10);
959 1.14 bouyer if (*cp != '\0' || args.sa_lun < 0)
960 1.17 grant errx(1, "invalid lun: %s", argv[1]);
961 1.14 bouyer }
962 1.14 bouyer
963 1.14 bouyer if (ioctl(fd, SCBUSIODETACH, &args) != 0)
964 1.14 bouyer err(1, "SCBUSIODETACH");
965 1.1 thorpej
966 1.1 thorpej return;
967 1.1 thorpej }
968