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