Print this page
7127 remove -Wno-missing-braces from Makefile.uts
| Split |
Close |
| Expand all |
| Collapse all |
--- old/usr/src/uts/common/io/scsi/targets/st.c
+++ new/usr/src/uts/common/io/scsi/targets/st.c
1 1 /*
2 2 * CDDL HEADER START
3 3 *
4 4 * The contents of this file are subject to the terms of the
5 5 * Common Development and Distribution License (the "License").
6 6 * You may not use this file except in compliance with the License.
7 7 *
8 8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9 9 * or http://www.opensolaris.org/os/licensing.
10 10 * See the License for the specific language governing permissions
11 11 * and limitations under the License.
12 12 *
13 13 * When distributing Covered Code, include this CDDL HEADER in each
14 14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15 15 * If applicable, add the following below this CDDL HEADER, with the
16 16 * fields enclosed by brackets "[]" replaced with your own identifying
17 17 * information: Portions Copyright [yyyy] [name of copyright owner]
18 18 *
19 19 * CDDL HEADER END
20 20 */
21 21
22 22 /*
23 23 * Copyright (c) 1990, 2010, Oracle and/or its affiliates. All rights reserved.
24 24 * Copyright (c) 2011 Bayard G. Bell. All rights reserved.
25 25 */
26 26
27 27 /*
28 28 * SCSI SCSA-compliant and not-so-DDI-compliant Tape Driver
29 29 */
30 30
31 31 #if defined(lint) && !defined(DEBUG)
32 32 #define DEBUG 1
33 33 #endif
34 34
35 35 #include <sys/modctl.h>
36 36 #include <sys/scsi/scsi.h>
37 37 #include <sys/mtio.h>
38 38 #include <sys/scsi/targets/stdef.h>
39 39 #include <sys/file.h>
40 40 #include <sys/kstat.h>
41 41 #include <sys/ddidmareq.h>
42 42 #include <sys/ddi.h>
43 43 #include <sys/sunddi.h>
44 44 #include <sys/byteorder.h>
45 45
46 46 #define IOSP KSTAT_IO_PTR(un->un_stats)
47 47 /*
48 48 * stats maintained only for reads/writes as commands
49 49 * like rewind etc skew the wait/busy times
50 50 */
51 51 #define IS_RW(bp) ((bp)->b_bcount > 0)
52 52 #define ST_DO_KSTATS(bp, kstat_function) \
53 53 if ((bp != un->un_sbufp) && un->un_stats && IS_RW(bp)) { \
54 54 kstat_function(IOSP); \
55 55 }
56 56
57 57 #define ST_DO_ERRSTATS(un, x) \
58 58 if (un->un_errstats) { \
59 59 struct st_errstats *stp; \
60 60 stp = (struct st_errstats *)un->un_errstats->ks_data; \
61 61 stp->x.value.ul++; \
62 62 }
63 63
64 64 #define FILL_SCSI1_LUN(devp, pkt) \
65 65 if ((devp)->sd_inq->inq_ansi == 0x1) { \
66 66 int _lun; \
67 67 _lun = ddi_prop_get_int(DDI_DEV_T_ANY, (devp)->sd_dev, \
68 68 DDI_PROP_DONTPASS, SCSI_ADDR_PROP_LUN, 0); \
69 69 if (_lun > 0) { \
70 70 ((union scsi_cdb *)(pkt)->pkt_cdbp)->scc_lun = \
71 71 _lun; \
72 72 } \
73 73 }
74 74
75 75 /*
76 76 * get an available contig mem header, cp.
77 77 * when big_enough is true, we will return NULL, if no big enough
78 78 * contig mem is found.
79 79 * when big_enough is false, we will try to find cp containing big
80 80 * enough contig mem. if not found, we will ruturn the last cp available.
81 81 *
82 82 * used by st_get_contig_mem()
83 83 */
84 84 #define ST_GET_CONTIG_MEM_HEAD(un, cp, len, big_enough) { \
85 85 struct contig_mem *tmp_cp = NULL; \
86 86 for ((cp) = (un)->un_contig_mem; \
87 87 (cp) != NULL; \
88 88 tmp_cp = (cp), (cp) = (cp)->cm_next) { \
89 89 if (((cp)->cm_len >= (len)) || \
90 90 (!(big_enough) && ((cp)->cm_next == NULL))) { \
91 91 if (tmp_cp == NULL) { \
92 92 (un)->un_contig_mem = (cp)->cm_next; \
93 93 } else { \
94 94 tmp_cp->cm_next = (cp)->cm_next; \
95 95 } \
96 96 (cp)->cm_next = NULL; \
97 97 (un)->un_contig_mem_available_num--; \
98 98 break; \
99 99 } \
100 100 } \
101 101 }
102 102
103 103 #define ST_NUM_MEMBERS(array) (sizeof (array) / sizeof (array[0]))
104 104 #define COPY_POS(dest, source) bcopy(source, dest, sizeof (tapepos_t))
105 105 #define ISALNUM(byte) \
106 106 (((byte) >= 'a' && (byte) <= 'z') || \
107 107 ((byte) >= 'A' && (byte) <= 'Z') || \
108 108 ((byte) >= '0' && (byte) <= '9'))
109 109
110 110 #define ONE_K 1024
111 111
112 112 #define MAX_SPACE_CNT(cnt) if (cnt >= 0) { \
113 113 if (cnt > MIN(SP_CNT_MASK, INT32_MAX)) \
114 114 return (EINVAL); \
115 115 } else { \
116 116 if (-(cnt) > MIN(SP_CNT_MASK, INT32_MAX)) \
117 117 return (EINVAL); \
118 118 } \
119 119
120 120 /*
121 121 * Global External Data Definitions
122 122 */
123 123 extern struct scsi_key_strings scsi_cmds[];
124 124 extern uchar_t scsi_cdb_size[];
125 125
126 126 /*
127 127 * Local Static Data
128 128 */
129 129 static void *st_state;
130 130 static char *const st_label = "st";
131 131 static volatile int st_recov_sz = sizeof (recov_info);
132 132 static const char mp_misconf[] = {
133 133 "St Tape is misconfigured, MPxIO enabled and "
134 134 "tape-command-recovery-disable set in st.conf\n"
135 135 };
136 136
137 137 #ifdef __x86
138 138 /*
139 139 * We need to use below DMA attr to alloc physically contiguous
140 140 * memory to do I/O in big block size
141 141 */
142 142 static ddi_dma_attr_t st_contig_mem_dma_attr = {
143 143 DMA_ATTR_V0, /* version number */
144 144 0x0, /* lowest usable address */
145 145 0xFFFFFFFFull, /* high DMA address range */
146 146 0xFFFFFFFFull, /* DMA counter register */
147 147 1, /* DMA address alignment */
148 148 1, /* DMA burstsizes */
149 149 1, /* min effective DMA size */
150 150 0xFFFFFFFFull, /* max DMA xfer size */
151 151 0xFFFFFFFFull, /* segment boundary */
152 152 1, /* s/g list length */
153 153 1, /* granularity of device */
154 154 0 /* DMA transfer flags */
155 155 };
156 156
157 157 static ddi_device_acc_attr_t st_acc_attr = {
158 158 DDI_DEVICE_ATTR_V0,
159 159 DDI_NEVERSWAP_ACC,
160 160 DDI_STRICTORDER_ACC
161 161 };
162 162
163 163 /* set limitation for the number of contig_mem */
164 164 static int st_max_contig_mem_num = ST_MAX_CONTIG_MEM_NUM;
165 165 #endif
166 166
167 167 /*
168 168 * Tunable parameters
169 169 *
170 170 * DISCLAIMER
171 171 * ----------
172 172 * These parameters are intended for use only in system testing; if you use
173 173 * them in production systems, you do so at your own risk. Altering any
174 174 * variable not listed below may cause unpredictable system behavior.
175 175 *
176 176 * st_check_media_time
177 177 *
178 178 * Three second state check
179 179 *
180 180 * st_allow_large_xfer
181 181 *
182 182 * Gated with ST_NO_RECSIZE_LIMIT
183 183 *
184 184 * 0 - Transfers larger than 64KB will not be allowed
185 185 * regardless of the setting of ST_NO_RECSIZE_LIMIT
186 186 * 1 - Transfers larger than 64KB will be allowed
187 187 * if ST_NO_RECSIZE_LIMIT is TRUE for the drive
188 188 *
189 189 * st_report_soft_errors_on_close
190 190 *
191 191 * Gated with ST_SOFT_ERROR_REPORTING
192 192 *
193 193 * 0 - Errors will not be reported on close regardless
194 194 * of the setting of ST_SOFT_ERROR_REPORTING
195 195 *
196 196 * 1 - Errors will be reported on close if
197 197 * ST_SOFT_ERROR_REPORTING is TRUE for the drive
198 198 */
199 199 static int st_selection_retry_count = ST_SEL_RETRY_COUNT;
200 200 static int st_retry_count = ST_RETRY_COUNT;
201 201
202 202 static int st_io_time = ST_IO_TIME;
203 203 static int st_long_timeout_x = ST_LONG_TIMEOUT_X;
204 204
205 205 static int st_space_time = ST_SPACE_TIME;
206 206 static int st_long_space_time_x = ST_LONG_SPACE_TIME_X;
207 207
208 208 static int st_error_level = SCSI_ERR_RETRYABLE;
209 209 static int st_check_media_time = 3000000; /* 3 Second State Check */
210 210
211 211 static int st_max_throttle = ST_MAX_THROTTLE;
212 212
213 213 static clock_t st_wait_cmds_complete = ST_WAIT_CMDS_COMPLETE;
214 214
215 215 static int st_allow_large_xfer = 1;
216 216 static int st_report_soft_errors_on_close = 1;
217 217
218 218 /*
219 219 * End of tunable parameters list
220 220 */
221 221
222 222
223 223
224 224 /*
225 225 * Asynchronous I/O and persistent errors, refer to PSARC/1995/228
226 226 *
227 227 * Asynchronous I/O's main offering is that it is a non-blocking way to do
228 228 * reads and writes. The driver will queue up all the requests it gets and
229 229 * have them ready to transport to the HBA. Unfortunately, we cannot always
230 230 * just ship the I/O requests to the HBA, as there errors and exceptions
231 231 * that may happen when we don't want the HBA to continue. Therein comes
232 232 * the flush-on-errors capability. If the HBA supports it, then st will
233 233 * send in st_max_throttle I/O requests at the same time.
234 234 *
235 235 * Persistent errors : This was also reasonably simple. In the interrupt
236 236 * routines, if there was an error or exception (FM, LEOT, media error,
237 237 * transport error), the persistent error bits are set and shuts everything
238 238 * down, but setting the throttle to zero. If we hit and exception in the
239 239 * HBA, and flush-on-errors were set, we wait for all outstanding I/O's to
240 240 * come back (with CMD_ABORTED), then flush all bp's in the wait queue with
241 241 * the appropriate error, and this will preserve order. Of course, depending
242 242 * on the exception we have to show a zero read or write before we show
243 243 * errors back to the application.
244 244 */
245 245
246 246 extern const int st_ndrivetypes; /* defined in st_conf.c */
247 247 extern const struct st_drivetype st_drivetypes[];
248 248 extern const char st_conf_version[];
249 249
250 250 #ifdef STDEBUG
251 251 static int st_soft_error_report_debug = 0;
252 252 volatile int st_debug = 0;
253 253 static volatile dev_info_t *st_lastdev;
254 254 static kmutex_t st_debug_mutex;
255 255 #endif
256 256
257 257 #define ST_MT02_NAME "Emulex MT02 QIC-11/24 "
258 258
259 259 static const struct vid_drivetype {
260 260 char *vid;
261 261 char type;
262 262 } st_vid_dt[] = {
263 263 {"LTO-CVE ", MT_LTO},
264 264 {"QUANTUM ", MT_ISDLT},
265 265 {"SONY ", MT_ISAIT},
266 266 {"STK ", MT_ISSTK9840}
267 267 };
268 268
269 269 static const struct driver_minor_data {
270 270 char *name;
271 271 int minor;
272 272 } st_minor_data[] = {
273 273 /*
274 274 * The top 4 entries are for the default densities,
275 275 * don't alter their position.
276 276 */
277 277 {"", 0},
278 278 {"n", MT_NOREWIND},
279 279 {"b", MT_BSD},
280 280 {"bn", MT_NOREWIND | MT_BSD},
281 281 {"l", MT_DENSITY1},
282 282 {"m", MT_DENSITY2},
283 283 {"h", MT_DENSITY3},
284 284 {"c", MT_DENSITY4},
285 285 {"u", MT_DENSITY4},
286 286 {"ln", MT_DENSITY1 | MT_NOREWIND},
287 287 {"mn", MT_DENSITY2 | MT_NOREWIND},
288 288 {"hn", MT_DENSITY3 | MT_NOREWIND},
289 289 {"cn", MT_DENSITY4 | MT_NOREWIND},
290 290 {"un", MT_DENSITY4 | MT_NOREWIND},
291 291 {"lb", MT_DENSITY1 | MT_BSD},
292 292 {"mb", MT_DENSITY2 | MT_BSD},
293 293 {"hb", MT_DENSITY3 | MT_BSD},
294 294 {"cb", MT_DENSITY4 | MT_BSD},
295 295 {"ub", MT_DENSITY4 | MT_BSD},
296 296 {"lbn", MT_DENSITY1 | MT_NOREWIND | MT_BSD},
297 297 {"mbn", MT_DENSITY2 | MT_NOREWIND | MT_BSD},
298 298 {"hbn", MT_DENSITY3 | MT_NOREWIND | MT_BSD},
299 299 {"cbn", MT_DENSITY4 | MT_NOREWIND | MT_BSD},
300 300 {"ubn", MT_DENSITY4 | MT_NOREWIND | MT_BSD}
301 301 };
302 302
303 303 /* strings used in many debug and warning messages */
304 304 static const char wr_str[] = "write";
305 305 static const char rd_str[] = "read";
306 306 static const char wrg_str[] = "writing";
307 307 static const char rdg_str[] = "reading";
308 308 static const char *space_strs[] = {
309 309 "records",
310 310 "filemarks",
311 311 "sequential filemarks",
312 312 "eod",
313 313 "setmarks",
314 314 "sequential setmarks",
315 315 "Reserved",
316 316 "Reserved"
317 317 };
318 318 static const char *load_strs[] = {
319 319 "unload", /* LD_UNLOAD 0 */
320 320 "load", /* LD_LOAD 1 */
321 321 "retension", /* LD_RETEN 2 */
322 322 "load reten", /* LD_LOAD | LD_RETEN 3 */
323 323 "eod", /* LD_EOT 4 */
324 324 "load EOD", /* LD_LOAD | LD_EOT 5 */
325 325 "reten EOD", /* LD_RETEN | LD_EOT 6 */
326 326 "load reten EOD" /* LD_LOAD|LD_RETEN|LD_EOT 7 */
327 327 "hold", /* LD_HOLD 8 */
328 328 "load and hold" /* LD_LOAD | LD_HOLD 9 */
329 329 };
330 330
331 331 static const char *errstatenames[] = {
332 332 "COMMAND_DONE",
333 333 "COMMAND_DONE_ERROR",
334 334 "COMMAND_DONE_ERROR_RECOVERED",
335 335 "QUE_COMMAND",
336 336 "QUE_BUSY_COMMAND",
337 337 "QUE_SENSE",
338 338 "JUST_RETURN",
339 339 "COMMAND_DONE_EACCES",
340 340 "QUE_LAST_COMMAND",
341 341 "COMMAND_TIMEOUT",
342 342 "PATH_FAILED",
343 343 "DEVICE_RESET",
344 344 "DEVICE_TAMPER",
345 345 "ATTEMPT_RETRY"
346 346 };
347 347
348 348 const char *bogusID = "Unknown Media ID";
349 349
350 350 /* default density offsets in the table above */
351 351 #define DEF_BLANK 0
352 352 #define DEF_NOREWIND 1
353 353 #define DEF_BSD 2
354 354 #define DEF_BSD_NR 3
355 355
356 356 /* Sense Key, ASC/ASCQ for which tape ejection is needed */
357 357
358 358 static struct tape_failure_code {
359 359 uchar_t key;
360 360 uchar_t add_code;
361 361 uchar_t qual_code;
362 362 } st_tape_failure_code[] = {
363 363 { KEY_HARDWARE_ERROR, 0x15, 0x01},
364 364 { KEY_HARDWARE_ERROR, 0x44, 0x00},
365 365 { KEY_HARDWARE_ERROR, 0x53, 0x00},
366 366 { KEY_HARDWARE_ERROR, 0x53, 0x01},
367 367 { KEY_NOT_READY, 0x53, 0x00},
368 368 { 0xff}
369 369 };
370 370
371 371 /* clean bit position and mask */
372 372
373 373 static struct cln_bit_position {
374 374 ushort_t cln_bit_byte;
375 375 uchar_t cln_bit_mask;
376 376 } st_cln_bit_position[] = {
377 377 { 21, 0x08},
378 378 { 70, 0xc0},
379 379 { 18, 0x81} /* 80 bit indicates in bit mode, 1 bit clean light is on */
380 380 };
381 381
382 382 /*
383 383 * architecture dependent allocation restrictions. For x86, we'll set
384 384 * dma_attr_addr_hi to st_max_phys_addr and dma_attr_sgllen to
385 385 * st_sgl_size during _init().
386 386 */
387 387 #if defined(__sparc)
388 388 static ddi_dma_attr_t st_alloc_attr = {
389 389 DMA_ATTR_V0, /* version number */
390 390 0x0, /* lowest usable address */
391 391 0xFFFFFFFFull, /* high DMA address range */
392 392 0xFFFFFFFFull, /* DMA counter register */
393 393 1, /* DMA address alignment */
394 394 1, /* DMA burstsizes */
395 395 1, /* min effective DMA size */
396 396 0xFFFFFFFFull, /* max DMA xfer size */
397 397 0xFFFFFFFFull, /* segment boundary */
398 398 1, /* s/g list length */
399 399 512, /* granularity of device */
400 400 0 /* DMA transfer flags */
401 401 };
402 402 #elif defined(__x86)
403 403 static ddi_dma_attr_t st_alloc_attr = {
404 404 DMA_ATTR_V0, /* version number */
405 405 0x0, /* lowest usable address */
406 406 0x0, /* high DMA address range [set in _init()] */
407 407 0xFFFFull, /* DMA counter register */
408 408 512, /* DMA address alignment */
409 409 1, /* DMA burstsizes */
410 410 1, /* min effective DMA size */
411 411 0xFFFFFFFFull, /* max DMA xfer size */
412 412 0xFFFFFFFFull, /* segment boundary */
413 413 0, /* s/g list length */
414 414 512, /* granularity of device [set in _init()] */
415 415 0 /* DMA transfer flags */
416 416 };
417 417 uint64_t st_max_phys_addr = 0xFFFFFFFFull;
418 418 int st_sgl_size = 0xF;
419 419
420 420 #endif
421 421
422 422 /*
423 423 * Configuration Data:
424 424 *
425 425 * Device driver ops vector
426 426 */
427 427 static int st_aread(dev_t dev, struct aio_req *aio, cred_t *cred_p);
428 428 static int st_awrite(dev_t dev, struct aio_req *aio, cred_t *cred_p);
429 429 static int st_read(dev_t dev, struct uio *uio_p, cred_t *cred_p);
430 430 static int st_write(dev_t dev, struct uio *uio_p, cred_t *cred_p);
431 431 static int st_open(dev_t *devp, int flag, int otyp, cred_t *cred_p);
432 432 static int st_close(dev_t dev, int flag, int otyp, cred_t *cred_p);
433 433 static int st_strategy(struct buf *bp);
434 434 static int st_queued_strategy(buf_t *bp);
435 435 static int st_ioctl(dev_t dev, int cmd, intptr_t arg, int flag,
436 436 cred_t *cred_p, int *rval_p);
437 437 extern int nulldev(), nodev();
438 438
439 439 static struct cb_ops st_cb_ops = {
440 440 st_open, /* open */
441 441 st_close, /* close */
442 442 st_queued_strategy, /* strategy Not Block device but async checks */
443 443 nodev, /* print */
444 444 nodev, /* dump */
445 445 st_read, /* read */
446 446 st_write, /* write */
447 447 st_ioctl, /* ioctl */
448 448 nodev, /* devmap */
449 449 nodev, /* mmap */
450 450 nodev, /* segmap */
451 451 nochpoll, /* poll */
452 452 ddi_prop_op, /* cb_prop_op */
453 453 0, /* streamtab */
454 454 D_64BIT | D_MP | D_NEW | D_HOTPLUG |
455 455 D_OPEN_RETURNS_EINTR, /* cb_flag */
456 456 CB_REV, /* cb_rev */
457 457 st_aread, /* async I/O read entry point */
458 458 st_awrite /* async I/O write entry point */
459 459
460 460 };
461 461
462 462 static int st_info(dev_info_t *dip, ddi_info_cmd_t infocmd, void *arg,
463 463 void **result);
464 464 static int st_probe(dev_info_t *dev);
465 465 static int st_attach(dev_info_t *dev, ddi_attach_cmd_t cmd);
466 466 static int st_detach(dev_info_t *dev, ddi_detach_cmd_t cmd);
467 467
468 468 static struct dev_ops st_ops = {
469 469 DEVO_REV, /* devo_rev, */
470 470 0, /* refcnt */
471 471 st_info, /* info */
472 472 nulldev, /* identify */
473 473 st_probe, /* probe */
474 474 st_attach, /* attach */
475 475 st_detach, /* detach */
476 476 nodev, /* reset */
477 477 &st_cb_ops, /* driver operations */
478 478 (struct bus_ops *)0, /* bus operations */
479 479 nulldev, /* power */
480 480 ddi_quiesce_not_needed, /* devo_quiesce */
481 481 };
482 482
483 483 /*
484 484 * Local Function Declarations
485 485 */
486 486 static char *st_print_scsi_cmd(char cmd);
487 487 static void st_print_cdb(dev_info_t *dip, char *label, uint_t level,
488 488 char *title, char *cdb);
489 489 static void st_clean_print(dev_info_t *dev, char *label, uint_t level,
490 490 char *title, char *data, int len);
491 491 static int st_doattach(struct scsi_device *devp, int (*canwait)());
492 492 static void st_known_tape_type(struct scsi_tape *un);
493 493 static int st_get_conf_from_st_dot_conf(struct scsi_tape *, char *,
494 494 struct st_drivetype *);
495 495 static int st_get_conf_from_st_conf_dot_c(struct scsi_tape *, char *,
496 496 struct st_drivetype *);
497 497 static int st_get_conf_from_tape_drive(struct scsi_tape *, char *,
498 498 struct st_drivetype *);
499 499 static int st_get_densities_from_tape_drive(struct scsi_tape *,
500 500 struct st_drivetype *);
501 501 static int st_get_timeout_values_from_tape_drive(struct scsi_tape *,
502 502 struct st_drivetype *);
503 503 static int st_get_timeouts_value(struct scsi_tape *, uchar_t, ushort_t *,
504 504 ushort_t);
505 505 static int st_get_default_conf(struct scsi_tape *, char *,
506 506 struct st_drivetype *);
507 507 static int st_rw(dev_t dev, struct uio *uio, int flag);
508 508 static int st_arw(dev_t dev, struct aio_req *aio, int flag);
509 509 static int st_find_eod(struct scsi_tape *un);
510 510 static int st_check_density_or_wfm(dev_t dev, int wfm, int mode, int stepflag);
511 511 static int st_uscsi_cmd(struct scsi_tape *un, struct uscsi_cmd *, int flag);
512 512 static int st_mtioctop(struct scsi_tape *un, intptr_t arg, int flag);
513 513 static int st_mtiocltop(struct scsi_tape *un, intptr_t arg, int flag);
514 514 static int st_do_mtioctop(struct scsi_tape *un, struct mtlop *mtop);
515 515 static void st_start(struct scsi_tape *un);
516 516 static int st_handle_start_busy(struct scsi_tape *un, struct buf *bp,
517 517 clock_t timeout_interval, int queued);
518 518 static int st_handle_intr_busy(struct scsi_tape *un, struct buf *bp,
519 519 clock_t timeout_interval);
520 520 static int st_handle_intr_retry_lcmd(struct scsi_tape *un, struct buf *bp);
521 521 static void st_done_and_mutex_exit(struct scsi_tape *un, struct buf *bp);
522 522 static void st_init(struct scsi_tape *un);
523 523 static void st_make_cmd(struct scsi_tape *un, struct buf *bp,
524 524 int (*func)(caddr_t));
525 525 static void st_make_uscsi_cmd(struct scsi_tape *, struct uscsi_cmd *,
526 526 struct buf *bp, int (*func)(caddr_t));
527 527 static void st_intr(struct scsi_pkt *pkt);
528 528 static void st_set_state(struct scsi_tape *un, buf_t *bp);
529 529 static void st_test_append(struct buf *bp);
530 530 static int st_runout(caddr_t);
531 531 static int st_cmd(struct scsi_tape *un, int com, int64_t count, int wait);
532 532 static int st_setup_cmd(struct scsi_tape *un, buf_t *bp, int com,
533 533 int64_t count);
534 534 static int st_set_compression(struct scsi_tape *un);
535 535 static int st_write_fm(dev_t dev, int wfm);
536 536 static int st_determine_generic(struct scsi_tape *un);
537 537 static int st_determine_density(struct scsi_tape *un, int rw);
538 538 static int st_get_density(struct scsi_tape *un);
539 539 static int st_set_density(struct scsi_tape *un);
540 540 static int st_loadtape(struct scsi_tape *un);
541 541 static int st_modesense(struct scsi_tape *un);
542 542 static int st_modeselect(struct scsi_tape *un);
543 543 static errstate st_handle_incomplete(struct scsi_tape *un, struct buf *bp);
544 544 static int st_wrongtapetype(struct scsi_tape *un);
545 545 static errstate st_check_error(struct scsi_tape *un, struct scsi_pkt *pkt);
546 546 static errstate st_handle_sense(struct scsi_tape *un, struct buf *bp,
547 547 tapepos_t *);
548 548 static errstate st_handle_autosense(struct scsi_tape *un, struct buf *bp,
549 549 tapepos_t *);
550 550 static int st_get_error_entry(struct scsi_tape *un, intptr_t arg, int flag);
551 551 static void st_update_error_stack(struct scsi_tape *un, struct scsi_pkt *pkt,
552 552 struct scsi_arq_status *cmd);
553 553 static void st_empty_error_stack(struct scsi_tape *un);
554 554 static errstate st_decode_sense(struct scsi_tape *un, struct buf *bp, int amt,
555 555 struct scsi_arq_status *, tapepos_t *);
556 556 static int st_report_soft_errors(dev_t dev, int flag);
557 557 static void st_delayed_cv_broadcast(void *arg);
558 558 static int st_check_media(dev_t dev, enum mtio_state state);
559 559 static int st_media_watch_cb(caddr_t arg, struct scsi_watch_result *resultp);
560 560 static void st_intr_restart(void *arg);
561 561 static void st_start_restart(void *arg);
562 562 static int st_gen_mode_sense(struct scsi_tape *un, ubufunc_t ubf, int page,
563 563 struct seq_mode *page_data, int page_size);
564 564 static int st_change_block_size(struct scsi_tape *un, uint32_t nblksz);
565 565 static int st_gen_mode_select(struct scsi_tape *un, ubufunc_t ubf,
566 566 struct seq_mode *page_data, int page_size);
567 567 static int st_read_block_limits(struct scsi_tape *un,
568 568 struct read_blklim *read_blk);
569 569 static int st_report_density_support(struct scsi_tape *un,
570 570 uchar_t *density_data, size_t buflen);
571 571 static int st_report_supported_operation(struct scsi_tape *un,
572 572 uchar_t *oper_data, uchar_t option_code, ushort_t service_action);
573 573 static int st_tape_init(struct scsi_tape *un);
574 574 static void st_flush(struct scsi_tape *un);
575 575 static void st_set_pe_errno(struct scsi_tape *un);
576 576 static void st_hba_unflush(struct scsi_tape *un);
577 577 static void st_turn_pe_on(struct scsi_tape *un);
578 578 static void st_turn_pe_off(struct scsi_tape *un);
579 579 static void st_set_pe_flag(struct scsi_tape *un);
580 580 static void st_clear_pe(struct scsi_tape *un);
581 581 static void st_wait_for_io(struct scsi_tape *un);
582 582 static int st_set_devconfig_page(struct scsi_tape *un, int compression_on);
583 583 static int st_set_datacomp_page(struct scsi_tape *un, int compression_on);
584 584 static int st_reserve_release(struct scsi_tape *un, int command, ubufunc_t ubf);
585 585 static int st_check_cdb_for_need_to_reserve(struct scsi_tape *un, uchar_t *cdb);
586 586 static int st_check_cmd_for_need_to_reserve(struct scsi_tape *un, uchar_t cmd,
587 587 int count);
588 588 static int st_take_ownership(struct scsi_tape *un, ubufunc_t ubf);
589 589 static int st_check_asc_ascq(struct scsi_tape *un);
590 590 static int st_check_clean_bit(struct scsi_tape *un);
591 591 static int st_check_alert_flags(struct scsi_tape *un);
592 592 static int st_check_sequential_clean_bit(struct scsi_tape *un);
593 593 static int st_check_sense_clean_bit(struct scsi_tape *un);
594 594 static int st_clear_unit_attentions(dev_t dev_instance, int max_trys);
595 595 static void st_calculate_timeouts(struct scsi_tape *un);
596 596 static writablity st_is_drive_worm(struct scsi_tape *un);
597 597 static int st_read_attributes(struct scsi_tape *un, uint16_t attribute,
598 598 void *buf, size_t size, ubufunc_t bufunc);
599 599 static int st_get_special_inquiry(struct scsi_tape *un, uchar_t size,
600 600 caddr_t dest, uchar_t page);
601 601 static int st_update_block_pos(struct scsi_tape *un, bufunc_t bf,
602 602 int post_space);
603 603 static int st_interpret_read_pos(struct scsi_tape const *un, tapepos_t *dest,
604 604 read_p_types type, size_t data_sz, const caddr_t responce, int post_space);
605 605 static int st_get_read_pos(struct scsi_tape *un, buf_t *bp);
606 606 static int st_logical_block_locate(struct scsi_tape *un, ubufunc_t ubf,
607 607 tapepos_t *pos, uint64_t lblk, uchar_t partition);
608 608 static int st_mtfsf_ioctl(struct scsi_tape *un, int64_t files);
609 609 static int st_mtfsr_ioctl(struct scsi_tape *un, int64_t count);
610 610 static int st_mtbsf_ioctl(struct scsi_tape *un, int64_t files);
611 611 static int st_mtnbsf_ioctl(struct scsi_tape *un, int64_t count);
612 612 static int st_mtbsr_ioctl(struct scsi_tape *un, int64_t num);
613 613 static int st_mtfsfm_ioctl(struct scsi_tape *un, int64_t cnt);
614 614 static int st_mtbsfm_ioctl(struct scsi_tape *un, int64_t cnt);
615 615 static int st_backward_space_files(struct scsi_tape *un, int64_t count,
616 616 int infront);
617 617 static int st_forward_space_files(struct scsi_tape *un, int64_t files);
618 618 static int st_scenic_route_to_begining_of_file(struct scsi_tape *un,
619 619 int32_t fileno);
620 620 static int st_space_to_begining_of_file(struct scsi_tape *un);
621 621 static int st_space_records(struct scsi_tape *un, int64_t records);
622 622 static int st_get_media_identification(struct scsi_tape *un, ubufunc_t bufunc);
623 623 static errstate st_command_recovery(struct scsi_tape *un, struct scsi_pkt *pkt,
624 624 errstate onentry);
625 625 static void st_recover(void *arg);
626 626 static void st_recov_cb(struct scsi_pkt *pkt);
627 627 static int st_rcmd(struct scsi_tape *un, int com, int64_t count, int wait);
628 628 static int st_uscsi_rcmd(struct scsi_tape *un, struct uscsi_cmd *ucmd,
629 629 int flag);
630 630 static void st_add_recovery_info_to_pkt(struct scsi_tape *un, buf_t *bp,
631 631 struct scsi_pkt *cmd);
632 632 static int st_check_mode_for_change(struct scsi_tape *un, ubufunc_t ubf);
633 633 static int st_test_path_to_device(struct scsi_tape *un);
634 634 static int st_recovery_read_pos(struct scsi_tape *un, read_p_types type,
635 635 read_pos_data_t *raw);
636 636 static int st_recovery_get_position(struct scsi_tape *un, tapepos_t *read,
637 637 read_pos_data_t *raw);
638 638 static int st_compare_expected_position(struct scsi_tape *un, st_err_info *ei,
639 639 cmd_attribute const * cmd_att, tapepos_t *read);
640 640 static errstate st_recover_reissue_pkt(struct scsi_tape *us,
641 641 struct scsi_pkt *pkt);
642 642 static int st_transport(struct scsi_tape *un, struct scsi_pkt *pkt);
643 643 static buf_t *st_remove_from_queue(buf_t **head, buf_t **tail, buf_t *bp);
644 644 static void st_add_to_queue(buf_t **head, buf_t **tail, buf_t *end, buf_t *bp);
645 645 static int st_reset(struct scsi_tape *un, int reset_type);
646 646 static void st_reset_notification(caddr_t arg);
647 647 static const cmd_attribute *st_lookup_cmd_attribute(unsigned char cmd);
648 648
649 649 static int st_set_target_TLR_mode(struct scsi_tape *un, ubufunc_t ubf);
650 650 static int st_make_sure_mode_data_is_correct(struct scsi_tape *un,
651 651 ubufunc_t ubf);
652 652
653 653 #ifdef __x86
654 654 /*
655 655 * routines for I/O in big block size
656 656 */
657 657 static void st_release_contig_mem(struct scsi_tape *un, struct contig_mem *cp);
658 658 static struct contig_mem *st_get_contig_mem(struct scsi_tape *un, size_t len,
659 659 int alloc_flags);
660 660 static int st_bigblk_xfer_done(struct buf *bp);
661 661 static struct buf *st_get_bigblk_bp(struct buf *bp);
662 662 #endif
663 663 static void st_print_position(dev_info_t *dev, char *label, uint_t level,
664 664 const char *comment, tapepos_t *pos);
665 665
666 666 /*
667 667 * error statistics create/update functions
668 668 */
669 669 static int st_create_errstats(struct scsi_tape *, int);
670 670 static int st_validate_tapemarks(struct scsi_tape *un, ubufunc_t ubf,
671 671 tapepos_t *pos);
672 672
673 673 #ifdef STDEBUG
674 674 static void st_debug_cmds(struct scsi_tape *un, int com, int count, int wait);
675 675 #endif /* STDEBUG */
676 676 static char *st_dev_name(dev_t dev);
677 677
678 678 #if !defined(lint)
679 679 _NOTE(SCHEME_PROTECTS_DATA("unique per pkt",
680 680 scsi_pkt buf uio scsi_cdb uscsi_cmd))
681 681 _NOTE(SCHEME_PROTECTS_DATA("unique per pkt", scsi_extended_sense scsi_status))
682 682 _NOTE(SCHEME_PROTECTS_DATA("unique per pkt", recov_info))
683 683 _NOTE(SCHEME_PROTECTS_DATA("stable data", scsi_device))
684 684 _NOTE(DATA_READABLE_WITHOUT_LOCK(st_drivetype scsi_address))
685 685 #endif
686 686
687 687 /*
|
↓ open down ↓ |
687 lines elided |
↑ open up ↑ |
688 688 * autoconfiguration routines.
689 689 */
690 690
691 691 static struct modldrv modldrv = {
692 692 &mod_driverops, /* Type of module. This one is a driver */
693 693 "SCSI tape Driver", /* Name of the module. */
694 694 &st_ops /* driver ops */
695 695 };
696 696
697 697 static struct modlinkage modlinkage = {
698 - MODREV_1, &modldrv, NULL
698 + MODREV_1, { &modldrv, NULL }
699 699 };
700 700
701 701 /*
702 702 * Notes on Post Reset Behavior in the tape driver:
703 703 *
704 704 * When the tape drive is opened, the driver attempts to make sure that
705 705 * the tape head is positioned exactly where it was left when it was last
706 706 * closed provided the medium is not changed. If the tape drive is
707 707 * opened in O_NDELAY mode, the repositioning (if necessary for any loss
708 708 * of position due to reset) will happen when the first tape operation or
709 709 * I/O occurs. The repositioning (if required) may not be possible under
710 710 * certain situations such as when the device firmware not able to report
711 711 * the medium change in the REQUEST SENSE data because of a reset or a
712 712 * misbehaving bus not allowing the reposition to happen. In such
713 713 * extraordinary situations, where the driver fails to position the head
714 714 * at its original position, it will fail the open the first time, to
715 715 * save the applications from overwriting the data. All further attempts
716 716 * to open the tape device will result in the driver attempting to load
717 717 * the tape at BOT (beginning of tape). Also a warning message to
718 718 * indicate that further attempts to open the tape device may result in
719 719 * the tape being loaded at BOT will be printed on the console. If the
720 720 * tape device is opened in O_NDELAY mode, failure to restore the
721 721 * original tape head position, will result in the failure of the first
722 722 * tape operation or I/O, Further, the driver will invalidate its
723 723 * internal tape position which will necessitate the applications to
724 724 * validate the position by using either a tape positioning ioctl (such
725 725 * as MTREW) or closing and reopening the tape device.
726 726 *
727 727 */
728 728
729 729 int
730 730 _init(void)
731 731 {
732 732 int e;
733 733
734 734 if (((e = ddi_soft_state_init(&st_state,
735 735 sizeof (struct scsi_tape), ST_MAXUNIT)) != 0)) {
736 736 return (e);
737 737 }
738 738
739 739 if ((e = mod_install(&modlinkage)) != 0) {
740 740 ddi_soft_state_fini(&st_state);
741 741 } else {
742 742 #ifdef STDEBUG
743 743 mutex_init(&st_debug_mutex, NULL, MUTEX_DRIVER, NULL);
744 744 #endif
745 745
746 746 #if defined(__x86)
747 747 /* set the max physical address for iob allocs on x86 */
748 748 st_alloc_attr.dma_attr_addr_hi = st_max_phys_addr;
749 749
750 750 /*
751 751 * set the sgllen for iob allocs on x86. If this is set less
752 752 * than the number of pages the buffer will take
753 753 * (taking into account alignment), it would force the
754 754 * allocator to try and allocate contiguous pages.
755 755 */
756 756 st_alloc_attr.dma_attr_sgllen = st_sgl_size;
757 757 #endif
758 758 }
759 759
760 760 return (e);
761 761 }
762 762
763 763 int
764 764 _fini(void)
765 765 {
766 766 int e;
767 767
768 768 if ((e = mod_remove(&modlinkage)) != 0) {
769 769 return (e);
770 770 }
771 771
772 772 #ifdef STDEBUG
773 773 mutex_destroy(&st_debug_mutex);
774 774 #endif
775 775
776 776 ddi_soft_state_fini(&st_state);
777 777
778 778 return (e);
779 779 }
780 780
781 781 int
782 782 _info(struct modinfo *modinfop)
783 783 {
784 784 return (mod_info(&modlinkage, modinfop));
785 785 }
786 786
787 787
788 788 static int
789 789 st_probe(dev_info_t *devi)
790 790 {
791 791 int instance;
792 792 struct scsi_device *devp;
793 793 int rval;
794 794
795 795 #if !defined(__sparc)
796 796 char *tape_prop;
797 797 int tape_prop_len;
798 798 #endif
799 799
800 800 ST_ENTR(devi, st_probe);
801 801
802 802 /* If self identifying device */
803 803 if (ddi_dev_is_sid(devi) == DDI_SUCCESS) {
804 804 return (DDI_PROBE_DONTCARE);
805 805 }
806 806
807 807 #if !defined(__sparc)
808 808 /*
809 809 * Since some x86 HBAs have devnodes that look like SCSI as
810 810 * far as we can tell but aren't really SCSI (DADK, like mlx)
811 811 * we check for the presence of the "tape" property.
812 812 */
813 813 if (ddi_prop_op(DDI_DEV_T_NONE, devi, PROP_LEN_AND_VAL_ALLOC,
814 814 DDI_PROP_CANSLEEP, "tape",
815 815 (caddr_t)&tape_prop, &tape_prop_len) != DDI_PROP_SUCCESS) {
816 816 return (DDI_PROBE_FAILURE);
817 817 }
818 818 if (strncmp(tape_prop, "sctp", tape_prop_len) != 0) {
819 819 kmem_free(tape_prop, tape_prop_len);
820 820 return (DDI_PROBE_FAILURE);
821 821 }
822 822 kmem_free(tape_prop, tape_prop_len);
823 823 #endif
824 824
825 825 devp = ddi_get_driver_private(devi);
826 826 instance = ddi_get_instance(devi);
827 827
828 828 if (ddi_get_soft_state(st_state, instance) != NULL) {
829 829 return (DDI_PROBE_PARTIAL);
830 830 }
831 831
832 832
833 833 /*
834 834 * Turn around and call probe routine to see whether
835 835 * we actually have a tape at this SCSI nexus.
836 836 */
837 837 if (scsi_probe(devp, NULL_FUNC) == SCSIPROBE_EXISTS) {
838 838
839 839 /*
840 840 * In checking the whole inq_dtype byte we are looking at both
841 841 * the Peripheral Qualifier and the Peripheral Device Type.
842 842 * For this driver we are only interested in sequential devices
843 843 * that are connected or capable if connecting to this logical
844 844 * unit.
845 845 */
846 846 if (devp->sd_inq->inq_dtype ==
847 847 (DTYPE_SEQUENTIAL | DPQ_POSSIBLE)) {
848 848 ST_DEBUG6(devi, st_label, SCSI_DEBUG,
849 849 "probe exists\n");
850 850 rval = DDI_PROBE_SUCCESS;
851 851 } else {
852 852 rval = DDI_PROBE_FAILURE;
853 853 }
854 854 } else {
855 855 ST_DEBUG6(devi, st_label, SCSI_DEBUG,
856 856 "probe failure: nothing there\n");
857 857 rval = DDI_PROBE_FAILURE;
858 858 }
859 859 scsi_unprobe(devp);
860 860 return (rval);
861 861 }
862 862
863 863 static int
864 864 st_attach(dev_info_t *devi, ddi_attach_cmd_t cmd)
865 865 {
866 866 int instance;
867 867 int wide;
868 868 int dev_instance;
869 869 int ret_status;
870 870 struct scsi_device *devp;
871 871 int node_ix;
872 872 struct scsi_tape *un;
873 873
874 874 ST_ENTR(devi, st_attach);
875 875
876 876 devp = ddi_get_driver_private(devi);
877 877 instance = ddi_get_instance(devi);
878 878
879 879 switch (cmd) {
880 880 case DDI_ATTACH:
881 881 if (ddi_getprop(DDI_DEV_T_ANY, devi, DDI_PROP_DONTPASS,
882 882 "tape-command-recovery-disable", 0) != 0) {
883 883 st_recov_sz = sizeof (pkt_info);
884 884 }
885 885 if (st_doattach(devp, SLEEP_FUNC) == DDI_FAILURE) {
886 886 return (DDI_FAILURE);
887 887 }
888 888 break;
889 889 case DDI_RESUME:
890 890 /*
891 891 * Suspend/Resume
892 892 *
893 893 * When the driver suspended, there might be
894 894 * outstanding cmds and therefore we need to
895 895 * reset the suspended flag and resume the scsi
896 896 * watch thread and restart commands and timeouts
897 897 */
898 898
899 899 if (!(un = ddi_get_soft_state(st_state, instance))) {
900 900 return (DDI_FAILURE);
901 901 }
902 902 dev_instance = ((un->un_dev == 0) ? MTMINOR(instance) :
903 903 un->un_dev);
904 904
905 905 mutex_enter(ST_MUTEX);
906 906
907 907 un->un_throttle = un->un_max_throttle;
908 908 un->un_tids_at_suspend = 0;
909 909 un->un_pwr_mgmt = ST_PWR_NORMAL;
910 910
911 911 if (un->un_swr_token) {
912 912 scsi_watch_resume(un->un_swr_token);
913 913 }
914 914
915 915 /*
916 916 * Restart timeouts
917 917 */
918 918 if ((un->un_tids_at_suspend & ST_DELAY_TID) != 0) {
919 919 mutex_exit(ST_MUTEX);
920 920 un->un_delay_tid = timeout(
921 921 st_delayed_cv_broadcast, un,
922 922 drv_usectohz((clock_t)
923 923 MEDIA_ACCESS_DELAY));
924 924 mutex_enter(ST_MUTEX);
925 925 }
926 926
927 927 if (un->un_tids_at_suspend & ST_HIB_TID) {
928 928 mutex_exit(ST_MUTEX);
929 929 un->un_hib_tid = timeout(st_intr_restart, un,
930 930 ST_STATUS_BUSY_TIMEOUT);
931 931 mutex_enter(ST_MUTEX);
932 932 }
933 933
934 934 ret_status = st_clear_unit_attentions(dev_instance, 5);
935 935
936 936 /*
937 937 * now check if we need to restore the tape position
938 938 */
939 939 if ((un->un_suspend_pos.pmode != invalid) &&
940 940 ((un->un_suspend_pos.fileno > 0) ||
941 941 (un->un_suspend_pos.blkno > 0)) ||
942 942 (un->un_suspend_pos.lgclblkno > 0)) {
943 943 if (ret_status != 0) {
944 944 /*
945 945 * tape didn't get good TUR
946 946 * just print out error messages
947 947 */
948 948 scsi_log(ST_DEVINFO, st_label, CE_WARN,
949 949 "st_attach-RESUME: tape failure "
950 950 " tape position will be lost");
951 951 } else {
952 952 /* this prints errors */
953 953 (void) st_validate_tapemarks(un,
954 954 st_uscsi_cmd, &un->un_suspend_pos);
955 955 }
956 956 /*
957 957 * there are no retries, if there is an error
958 958 * we don't know if the tape has changed
959 959 */
960 960 un->un_suspend_pos.pmode = invalid;
961 961 }
962 962
963 963 /* now we are ready to start up any queued I/Os */
964 964 if (un->un_ncmds || un->un_quef) {
965 965 st_start(un);
966 966 }
967 967
968 968 cv_broadcast(&un->un_suspend_cv);
969 969 mutex_exit(ST_MUTEX);
970 970 return (DDI_SUCCESS);
971 971
972 972 default:
973 973 return (DDI_FAILURE);
974 974 }
975 975
976 976 un = ddi_get_soft_state(st_state, instance);
977 977
978 978 ST_DEBUG(devi, st_label, SCSI_DEBUG,
979 979 "st_attach: instance=%x\n", instance);
980 980
981 981 /*
982 982 * Add a zero-length attribute to tell the world we support
983 983 * kernel ioctls (for layered drivers)
984 984 */
985 985 (void) ddi_prop_create(DDI_DEV_T_NONE, devi, DDI_PROP_CANSLEEP,
986 986 DDI_KERNEL_IOCTL, NULL, 0);
987 987
988 988 ddi_report_dev((dev_info_t *)devi);
989 989
990 990 /*
991 991 * If it's a SCSI-2 tape drive which supports wide,
992 992 * tell the host adapter to use wide.
993 993 */
994 994 wide = ((devp->sd_inq->inq_rdf == RDF_SCSI2) &&
995 995 (devp->sd_inq->inq_wbus16 || devp->sd_inq->inq_wbus32)) ? 1 : 0;
996 996
997 997 if (scsi_ifsetcap(ROUTE, "wide-xfer", wide, 1) == 1) {
998 998 ST_DEBUG(devi, st_label, SCSI_DEBUG,
999 999 "Wide Transfer %s\n", wide ? "enabled" : "disabled");
1000 1000 }
1001 1001
1002 1002 /*
1003 1003 * enable autorequest sense; keep the rq packet around in case
1004 1004 * the autorequest sense fails because of a busy condition
1005 1005 * do a getcap first in case the capability is not variable
1006 1006 */
1007 1007 if (scsi_ifgetcap(ROUTE, "auto-rqsense", 1) == 1) {
1008 1008 un->un_arq_enabled = 1;
1009 1009 } else {
1010 1010 un->un_arq_enabled =
1011 1011 ((scsi_ifsetcap(ROUTE, "auto-rqsense", 1, 1) == 1) ? 1 : 0);
1012 1012 }
1013 1013
1014 1014 ST_DEBUG(devi, st_label, SCSI_DEBUG, "auto request sense %s\n",
1015 1015 (un->un_arq_enabled ? "enabled" : "disabled"));
1016 1016
1017 1017 un->un_untagged_qing =
1018 1018 (scsi_ifgetcap(ROUTE, "untagged-qing", 0) == 1);
1019 1019
1020 1020 /*
1021 1021 * XXX - This is just for 2.6. to tell users that write buffering
1022 1022 * has gone away.
1023 1023 */
1024 1024 if (un->un_arq_enabled && un->un_untagged_qing) {
1025 1025 if (ddi_getprop(DDI_DEV_T_ANY, devi, DDI_PROP_DONTPASS,
1026 1026 "tape-driver-buffering", 0) != 0) {
1027 1027 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
1028 1028 "Write Data Buffering has been depricated. Your "
1029 1029 "applications should continue to work normally.\n"
1030 1030 " But, they should ported to use Asynchronous "
1031 1031 " I/O\n"
1032 1032 " For more information, read about "
1033 1033 " tape-driver-buffering "
1034 1034 "property in the st(7d) man page\n");
1035 1035 }
1036 1036 }
1037 1037
1038 1038 un->un_max_throttle = un->un_throttle = un->un_last_throttle = 1;
1039 1039 un->un_flush_on_errors = 0;
1040 1040 un->un_mkr_pkt = (struct scsi_pkt *)NULL;
1041 1041
1042 1042 ST_DEBUG(devi, st_label, SCSI_DEBUG,
1043 1043 "throttle=%x, max_throttle = %x\n",
1044 1044 un->un_throttle, un->un_max_throttle);
1045 1045
1046 1046 /* initialize persistent errors to nil */
1047 1047 un->un_persistence = 0;
1048 1048 un->un_persist_errors = 0;
1049 1049
1050 1050 /*
1051 1051 * Get dma-max from HBA driver. If it is not defined, use 64k
1052 1052 */
1053 1053 un->un_maxdma = scsi_ifgetcap(&devp->sd_address, "dma-max", 1);
1054 1054 if (un->un_maxdma == -1) {
1055 1055 ST_DEBUG(devi, st_label, SCSI_DEBUG,
1056 1056 "Received a value that looked like -1. Using 64k maxdma");
1057 1057 un->un_maxdma = (64 * ONE_K);
1058 1058 }
1059 1059
1060 1060 #ifdef __x86
1061 1061 /*
1062 1062 * for x86, the device may be able to DMA more than the system will
1063 1063 * allow under some circumstances. We need account for both the HBA's
1064 1064 * and system's contraints.
1065 1065 *
1066 1066 * Get the maximum DMA under worse case conditions. e.g. looking at the
1067 1067 * device constraints, the max copy buffer size, and the worse case
1068 1068 * fragmentation. NOTE: this may differ from dma-max since dma-max
1069 1069 * doesn't take the worse case framentation into account.
1070 1070 *
1071 1071 * e.g. a device may be able to DMA 16MBytes, but can only DMA 1MByte
1072 1072 * if none of the pages are contiguous. Keeping track of both of these
1073 1073 * values allows us to support larger tape block sizes on some devices.
1074 1074 */
1075 1075 un->un_maxdma_arch = scsi_ifgetcap(&devp->sd_address, "dma-max-arch",
1076 1076 1);
1077 1077
1078 1078 /*
1079 1079 * If the dma-max-arch capability is not implemented, or the value
1080 1080 * comes back higher than what was reported in dma-max, use dma-max.
1081 1081 */
1082 1082 if ((un->un_maxdma_arch == -1) ||
1083 1083 ((uint_t)un->un_maxdma < (uint_t)un->un_maxdma_arch)) {
1084 1084 un->un_maxdma_arch = un->un_maxdma;
1085 1085 }
1086 1086 #endif
1087 1087
1088 1088 /*
1089 1089 * Get the max allowable cdb size
1090 1090 */
1091 1091 un->un_max_cdb_sz =
1092 1092 scsi_ifgetcap(&devp->sd_address, "max-cdb-length", 1);
1093 1093 if (un->un_max_cdb_sz < CDB_GROUP0) {
1094 1094 ST_DEBUG(devi, st_label, SCSI_DEBUG,
1095 1095 "HBA reported max-cdb-length as %d\n", un->un_max_cdb_sz);
1096 1096 un->un_max_cdb_sz = CDB_GROUP4; /* optimistic default */
1097 1097 }
1098 1098
1099 1099 if (strcmp(ddi_driver_name(ddi_get_parent(ST_DEVINFO)), "scsi_vhci")) {
1100 1100 un->un_multipath = 0;
1101 1101 } else {
1102 1102 un->un_multipath = 1;
1103 1103 }
1104 1104
1105 1105 un->un_maxbsize = MAXBSIZE_UNKNOWN;
1106 1106
1107 1107 un->un_mediastate = MTIO_NONE;
1108 1108 un->un_HeadClean = TAPE_ALERT_SUPPORT_UNKNOWN;
1109 1109
1110 1110 /*
1111 1111 * initialize kstats
1112 1112 */
1113 1113 un->un_stats = kstat_create("st", instance, NULL, "tape",
1114 1114 KSTAT_TYPE_IO, 1, KSTAT_FLAG_PERSISTENT);
1115 1115 if (un->un_stats) {
1116 1116 un->un_stats->ks_lock = ST_MUTEX;
1117 1117 kstat_install(un->un_stats);
1118 1118 }
1119 1119 (void) st_create_errstats(un, instance);
1120 1120
1121 1121 /*
1122 1122 * find the drive type for this target
1123 1123 */
1124 1124 mutex_enter(ST_MUTEX);
1125 1125 un->un_dev = MTMINOR(instance);
1126 1126 st_known_tape_type(un);
1127 1127 un->un_dev = 0;
1128 1128 mutex_exit(ST_MUTEX);
1129 1129
1130 1130 for (node_ix = 0; node_ix < ST_NUM_MEMBERS(st_minor_data); node_ix++) {
1131 1131 int minor;
1132 1132 char *name;
1133 1133
1134 1134 name = st_minor_data[node_ix].name;
1135 1135 minor = st_minor_data[node_ix].minor;
1136 1136
1137 1137 /*
1138 1138 * For default devices set the density to the
1139 1139 * preferred default density for this device.
1140 1140 */
1141 1141 if (node_ix <= DEF_BSD_NR) {
1142 1142 minor |= un->un_dp->default_density;
1143 1143 }
1144 1144 minor |= MTMINOR(instance);
1145 1145
1146 1146 if (ddi_create_minor_node(devi, name, S_IFCHR, minor,
1147 1147 DDI_NT_TAPE, NULL) == DDI_SUCCESS) {
1148 1148 continue;
1149 1149 }
1150 1150
1151 1151 ddi_remove_minor_node(devi, NULL);
1152 1152
1153 1153 (void) scsi_reset_notify(ROUTE, SCSI_RESET_CANCEL,
1154 1154 st_reset_notification, (caddr_t)un);
1155 1155 cv_destroy(&un->un_clscv);
1156 1156 cv_destroy(&un->un_sbuf_cv);
1157 1157 cv_destroy(&un->un_queue_cv);
1158 1158 cv_destroy(&un->un_state_cv);
1159 1159 #ifdef __x86
1160 1160 cv_destroy(&un->un_contig_mem_cv);
1161 1161 #endif
1162 1162 cv_destroy(&un->un_suspend_cv);
1163 1163 cv_destroy(&un->un_tape_busy_cv);
1164 1164 cv_destroy(&un->un_recov_buf_cv);
1165 1165 if (un->un_recov_taskq) {
1166 1166 ddi_taskq_destroy(un->un_recov_taskq);
1167 1167 }
1168 1168 if (un->un_sbufp) {
1169 1169 freerbuf(un->un_sbufp);
1170 1170 }
1171 1171 if (un->un_recov_buf) {
1172 1172 freerbuf(un->un_recov_buf);
1173 1173 }
1174 1174 if (un->un_uscsi_rqs_buf) {
1175 1175 kmem_free(un->un_uscsi_rqs_buf, SENSE_LENGTH);
1176 1176 }
1177 1177 if (un->un_mspl) {
1178 1178 i_ddi_mem_free((caddr_t)un->un_mspl, NULL);
1179 1179 }
1180 1180 if (un->un_dp_size) {
1181 1181 kmem_free(un->un_dp, un->un_dp_size);
1182 1182 }
1183 1183 if (un->un_state) {
1184 1184 kstat_delete(un->un_stats);
1185 1185 }
1186 1186 if (un->un_errstats) {
1187 1187 kstat_delete(un->un_errstats);
1188 1188 }
1189 1189
1190 1190 scsi_destroy_pkt(un->un_rqs);
1191 1191 scsi_free_consistent_buf(un->un_rqs_bp);
1192 1192 ddi_soft_state_free(st_state, instance);
1193 1193 devp->sd_private = NULL;
1194 1194 devp->sd_sense = NULL;
1195 1195
1196 1196 ddi_prop_remove_all(devi);
1197 1197 return (DDI_FAILURE);
1198 1198 }
1199 1199
1200 1200 return (DDI_SUCCESS);
1201 1201 }
1202 1202
1203 1203 /*
1204 1204 * st_detach:
1205 1205 *
1206 1206 * we allow a detach if and only if:
1207 1207 * - no tape is currently inserted
1208 1208 * - tape position is at BOT or unknown
1209 1209 * (if it is not at BOT then a no rewind
1210 1210 * device was opened and we have to preserve state)
1211 1211 * - it must be in a closed state : no timeouts or scsi_watch requests
1212 1212 * will exist if it is closed, so we don't need to check for
1213 1213 * them here.
1214 1214 */
1215 1215 /*ARGSUSED*/
1216 1216 static int
1217 1217 st_detach(dev_info_t *devi, ddi_detach_cmd_t cmd)
1218 1218 {
1219 1219 int instance;
1220 1220 int result;
1221 1221 struct scsi_device *devp;
1222 1222 struct scsi_tape *un;
1223 1223 clock_t wait_cmds_complete;
1224 1224
1225 1225 ST_ENTR(devi, st_detach);
1226 1226
1227 1227 instance = ddi_get_instance(devi);
1228 1228
1229 1229 if (!(un = ddi_get_soft_state(st_state, instance))) {
1230 1230 return (DDI_FAILURE);
1231 1231 }
1232 1232
1233 1233 mutex_enter(ST_MUTEX);
1234 1234
1235 1235 /*
1236 1236 * Clear error entry stack
1237 1237 */
1238 1238 st_empty_error_stack(un);
1239 1239
1240 1240 mutex_exit(ST_MUTEX);
1241 1241
1242 1242 switch (cmd) {
1243 1243
1244 1244 case DDI_DETACH:
1245 1245 /*
1246 1246 * Undo what we did in st_attach & st_doattach,
1247 1247 * freeing resources and removing things we installed.
1248 1248 * The system framework guarantees we are not active
1249 1249 * with this devinfo node in any other entry points at
1250 1250 * this time.
1251 1251 */
1252 1252
1253 1253 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
1254 1254 "st_detach: instance=%x, un=%p\n", instance,
1255 1255 (void *)un);
1256 1256
1257 1257 if (((un->un_dp->options & ST_UNLOADABLE) == 0) ||
1258 1258 ((un->un_rsvd_status & ST_APPLICATION_RESERVATIONS) != 0) ||
1259 1259 (un->un_ncmds != 0) || (un->un_quef != NULL) ||
1260 1260 (un->un_state != ST_STATE_CLOSED)) {
1261 1261 /*
1262 1262 * we cannot unload some targets because the
1263 1263 * inquiry returns junk unless immediately
1264 1264 * after a reset
1265 1265 */
1266 1266 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
1267 1267 "cannot unload instance %x\n", instance);
1268 1268 un->un_unit_attention_flags |= 4;
1269 1269 return (DDI_FAILURE);
1270 1270 }
1271 1271
1272 1272 /*
1273 1273 * if the tape has been removed then we may unload;
1274 1274 * do a test unit ready and if it returns NOT READY
1275 1275 * then we assume that it is safe to unload.
1276 1276 * as a side effect, pmode may be set to invalid if the
1277 1277 * the test unit ready fails;
1278 1278 * also un_state may be set to non-closed, so reset it
1279 1279 */
1280 1280 if ((un->un_dev) && /* Been opened since attach */
1281 1281 ((un->un_pos.pmode == legacy) &&
1282 1282 (un->un_pos.fileno > 0) || /* Known position not rewound */
1283 1283 (un->un_pos.blkno != 0)) || /* Or within first file */
1284 1284 ((un->un_pos.pmode == logical) &&
1285 1285 (un->un_pos.lgclblkno > 0))) {
1286 1286 mutex_enter(ST_MUTEX);
1287 1287 /*
1288 1288 * Send Test Unit Ready in the hopes that if
1289 1289 * the drive is not in the state we think it is.
1290 1290 * And the state will be changed so it can be detached.
1291 1291 * If the command fails to reach the device and
1292 1292 * the drive was not rewound or unloaded we want
1293 1293 * to fail the detach till a user command fails
1294 1294 * where after the detach will succead.
1295 1295 */
1296 1296 result = st_cmd(un, SCMD_TEST_UNIT_READY, 0, SYNC_CMD);
1297 1297 /*
1298 1298 * After TUR un_state may be set to non-closed,
1299 1299 * so reset it back.
1300 1300 */
1301 1301 un->un_state = ST_STATE_CLOSED;
1302 1302 mutex_exit(ST_MUTEX);
1303 1303 }
1304 1304 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
1305 1305 "un_status=%x, fileno=%x, blkno=%x\n",
1306 1306 un->un_status, un->un_pos.fileno, un->un_pos.blkno);
1307 1307
1308 1308 /*
1309 1309 * check again:
1310 1310 * if we are not at BOT then it is not safe to unload
1311 1311 */
1312 1312 if ((un->un_dev) && /* Been opened since attach */
1313 1313 (result != EACCES) && /* drive is use by somebody */
1314 1314 ((((un->un_pos.pmode == legacy) &&
1315 1315 (un->un_pos.fileno > 0) || /* Known position not rewound */
1316 1316 (un->un_pos.blkno != 0)) || /* Or within first file */
1317 1317 ((un->un_pos.pmode == logical) &&
1318 1318 (un->un_pos.lgclblkno > 0))) &&
1319 1319 ((un->un_state == ST_STATE_CLOSED) &&
1320 1320 (un->un_laststate == ST_STATE_CLOSING)))) {
1321 1321
1322 1322 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
1323 1323 "cannot detach: pmode=%d fileno=0x%x, blkno=0x%x"
1324 1324 " lgclblkno=0x%"PRIx64"\n", un->un_pos.pmode,
1325 1325 un->un_pos.fileno, un->un_pos.blkno,
1326 1326 un->un_pos.lgclblkno);
1327 1327 un->un_unit_attention_flags |= 4;
1328 1328 return (DDI_FAILURE);
1329 1329 }
1330 1330
1331 1331 /*
1332 1332 * Just To make sure that we have released the
1333 1333 * tape unit .
1334 1334 */
1335 1335 if (un->un_dev && (un->un_rsvd_status & ST_RESERVE) &&
1336 1336 !DEVI_IS_DEVICE_REMOVED(devi)) {
1337 1337 mutex_enter(ST_MUTEX);
1338 1338 (void) st_reserve_release(un, ST_RELEASE, st_uscsi_cmd);
1339 1339 mutex_exit(ST_MUTEX);
1340 1340 }
1341 1341
1342 1342 /*
1343 1343 * now remove other data structures allocated in st_doattach()
1344 1344 */
1345 1345 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
1346 1346 "destroying/freeing\n");
1347 1347
1348 1348 (void) scsi_reset_notify(ROUTE, SCSI_RESET_CANCEL,
1349 1349 st_reset_notification, (caddr_t)un);
1350 1350 cv_destroy(&un->un_clscv);
1351 1351 cv_destroy(&un->un_sbuf_cv);
1352 1352 cv_destroy(&un->un_queue_cv);
1353 1353 cv_destroy(&un->un_suspend_cv);
1354 1354 cv_destroy(&un->un_tape_busy_cv);
1355 1355 cv_destroy(&un->un_recov_buf_cv);
1356 1356
1357 1357 if (un->un_recov_taskq) {
1358 1358 ddi_taskq_destroy(un->un_recov_taskq);
1359 1359 }
1360 1360
1361 1361 if (un->un_hib_tid) {
1362 1362 (void) untimeout(un->un_hib_tid);
1363 1363 un->un_hib_tid = 0;
1364 1364 }
1365 1365
1366 1366 if (un->un_delay_tid) {
1367 1367 (void) untimeout(un->un_delay_tid);
1368 1368 un->un_delay_tid = 0;
1369 1369 }
1370 1370 cv_destroy(&un->un_state_cv);
1371 1371
1372 1372 #ifdef __x86
1373 1373 cv_destroy(&un->un_contig_mem_cv);
1374 1374
1375 1375 if (un->un_contig_mem_hdl != NULL) {
1376 1376 ddi_dma_free_handle(&un->un_contig_mem_hdl);
1377 1377 }
1378 1378 #endif
1379 1379 if (un->un_sbufp) {
1380 1380 freerbuf(un->un_sbufp);
1381 1381 }
1382 1382 if (un->un_recov_buf) {
1383 1383 freerbuf(un->un_recov_buf);
1384 1384 }
1385 1385 if (un->un_uscsi_rqs_buf) {
1386 1386 kmem_free(un->un_uscsi_rqs_buf, SENSE_LENGTH);
1387 1387 }
1388 1388 if (un->un_mspl) {
1389 1389 i_ddi_mem_free((caddr_t)un->un_mspl, NULL);
1390 1390 }
1391 1391 if (un->un_rqs) {
1392 1392 scsi_destroy_pkt(un->un_rqs);
1393 1393 scsi_free_consistent_buf(un->un_rqs_bp);
1394 1394 }
1395 1395 if (un->un_mkr_pkt) {
1396 1396 scsi_destroy_pkt(un->un_mkr_pkt);
1397 1397 }
1398 1398 if (un->un_arq_enabled) {
1399 1399 (void) scsi_ifsetcap(ROUTE, "auto-rqsense", 0, 1);
1400 1400 }
1401 1401 if (un->un_dp_size) {
1402 1402 kmem_free(un->un_dp, un->un_dp_size);
1403 1403 }
1404 1404 if (un->un_stats) {
1405 1405 kstat_delete(un->un_stats);
1406 1406 un->un_stats = (kstat_t *)0;
1407 1407 }
1408 1408 if (un->un_errstats) {
1409 1409 kstat_delete(un->un_errstats);
1410 1410 un->un_errstats = (kstat_t *)0;
1411 1411 }
1412 1412 if (un->un_media_id_len) {
1413 1413 kmem_free(un->un_media_id, un->un_media_id_len);
1414 1414 }
1415 1415 devp = ST_SCSI_DEVP;
1416 1416 ddi_soft_state_free(st_state, instance);
1417 1417 devp->sd_private = NULL;
1418 1418 devp->sd_sense = NULL;
1419 1419 scsi_unprobe(devp);
1420 1420 ddi_prop_remove_all(devi);
1421 1421 ddi_remove_minor_node(devi, NULL);
1422 1422 ST_DEBUG(0, st_label, SCSI_DEBUG, "st_detach done\n");
1423 1423 return (DDI_SUCCESS);
1424 1424
1425 1425 case DDI_SUSPEND:
1426 1426
1427 1427 /*
1428 1428 * Suspend/Resume
1429 1429 *
1430 1430 * To process DDI_SUSPEND, we must do the following:
1431 1431 *
1432 1432 * - check ddi_removing_power to see if power will be turned
1433 1433 * off. if so, return DDI_FAILURE
1434 1434 * - check if we are already suspended,
1435 1435 * if so, return DDI_FAILURE
1436 1436 * - check if device state is CLOSED,
1437 1437 * if not, return DDI_FAILURE.
1438 1438 * - wait until outstanding operations complete
1439 1439 * - save tape state
1440 1440 * - block new operations
1441 1441 * - cancel pending timeouts
1442 1442 *
1443 1443 */
1444 1444
1445 1445 if (ddi_removing_power(devi)) {
1446 1446 return (DDI_FAILURE);
1447 1447 }
1448 1448
1449 1449 if (un->un_dev == 0)
1450 1450 un->un_dev = MTMINOR(instance);
1451 1451
1452 1452 mutex_enter(ST_MUTEX);
1453 1453
1454 1454 /*
1455 1455 * Shouldn't already be suspended, if so return failure
1456 1456 */
1457 1457 if (un->un_pwr_mgmt == ST_PWR_SUSPENDED) {
1458 1458 mutex_exit(ST_MUTEX);
1459 1459 return (DDI_FAILURE);
1460 1460 }
1461 1461 if (un->un_state != ST_STATE_CLOSED) {
1462 1462 mutex_exit(ST_MUTEX);
1463 1463 return (DDI_FAILURE);
1464 1464 }
1465 1465
1466 1466 /*
1467 1467 * Wait for all outstanding I/O's to complete
1468 1468 *
1469 1469 * we wait on both ncmds and the wait queue for times
1470 1470 * when we are flushing after persistent errors are
1471 1471 * flagged, which is when ncmds can be 0, and the
1472 1472 * queue can still have I/O's. This way we preserve
1473 1473 * order of biodone's.
1474 1474 */
1475 1475 wait_cmds_complete = ddi_get_lbolt();
1476 1476 wait_cmds_complete +=
1477 1477 st_wait_cmds_complete * drv_usectohz(1000000);
1478 1478 while (un->un_ncmds || un->un_quef ||
1479 1479 (un->un_state == ST_STATE_RESOURCE_WAIT)) {
1480 1480
1481 1481 if (cv_timedwait(&un->un_tape_busy_cv, ST_MUTEX,
1482 1482 wait_cmds_complete) == -1) {
1483 1483 /*
1484 1484 * Time expired then cancel the command
1485 1485 */
1486 1486 if (st_reset(un, RESET_LUN) == 0) {
1487 1487 if (un->un_last_throttle) {
1488 1488 un->un_throttle =
1489 1489 un->un_last_throttle;
1490 1490 }
1491 1491 mutex_exit(ST_MUTEX);
1492 1492 return (DDI_FAILURE);
1493 1493 } else {
1494 1494 break;
1495 1495 }
1496 1496 }
1497 1497 }
1498 1498
1499 1499 /*
1500 1500 * DDI_SUSPEND says that the system "may" power down, we
1501 1501 * remember the file and block number before rewinding.
1502 1502 * we also need to save state before issuing
1503 1503 * any WRITE_FILE_MARK command.
1504 1504 */
1505 1505 (void) st_update_block_pos(un, st_cmd, 0);
1506 1506 COPY_POS(&un->un_suspend_pos, &un->un_pos);
1507 1507
1508 1508
1509 1509 /*
1510 1510 * Issue a zero write file fmk command to tell the drive to
1511 1511 * flush any buffered tape marks
1512 1512 */
1513 1513 (void) st_cmd(un, SCMD_WRITE_FILE_MARK, 0, SYNC_CMD);
1514 1514
1515 1515 /*
1516 1516 * Because not all tape drives correctly implement buffer
1517 1517 * flushing with the zero write file fmk command, issue a
1518 1518 * synchronous rewind command to force data flushing.
1519 1519 * st_validate_tapemarks() will do a rewind during DDI_RESUME
1520 1520 * anyway.
1521 1521 */
1522 1522 (void) st_cmd(un, SCMD_REWIND, 0, SYNC_CMD);
1523 1523
1524 1524 /* stop any new operations */
1525 1525 un->un_pwr_mgmt = ST_PWR_SUSPENDED;
1526 1526 un->un_throttle = 0;
1527 1527
1528 1528 /*
1529 1529 * cancel any outstanding timeouts
1530 1530 */
1531 1531 if (un->un_delay_tid) {
1532 1532 timeout_id_t temp_id = un->un_delay_tid;
1533 1533 un->un_delay_tid = 0;
1534 1534 un->un_tids_at_suspend |= ST_DELAY_TID;
1535 1535 mutex_exit(ST_MUTEX);
1536 1536 (void) untimeout(temp_id);
1537 1537 mutex_enter(ST_MUTEX);
1538 1538 }
1539 1539
1540 1540 if (un->un_hib_tid) {
1541 1541 timeout_id_t temp_id = un->un_hib_tid;
1542 1542 un->un_hib_tid = 0;
1543 1543 un->un_tids_at_suspend |= ST_HIB_TID;
1544 1544 mutex_exit(ST_MUTEX);
1545 1545 (void) untimeout(temp_id);
1546 1546 mutex_enter(ST_MUTEX);
1547 1547 }
1548 1548
1549 1549 /*
1550 1550 * Suspend the scsi_watch_thread
1551 1551 */
1552 1552 if (un->un_swr_token) {
1553 1553 opaque_t temp_token = un->un_swr_token;
1554 1554 mutex_exit(ST_MUTEX);
1555 1555 scsi_watch_suspend(temp_token);
1556 1556 } else {
1557 1557 mutex_exit(ST_MUTEX);
1558 1558 }
1559 1559
1560 1560 return (DDI_SUCCESS);
1561 1561
1562 1562 default:
1563 1563 ST_DEBUG(0, st_label, SCSI_DEBUG, "st_detach failed\n");
1564 1564 return (DDI_FAILURE);
1565 1565 }
1566 1566 }
1567 1567
1568 1568
1569 1569 /* ARGSUSED */
1570 1570 static int
1571 1571 st_info(dev_info_t *dip, ddi_info_cmd_t infocmd, void *arg, void **result)
1572 1572 {
1573 1573 dev_t dev;
1574 1574 struct scsi_tape *un;
1575 1575 int instance, error;
1576 1576
1577 1577 ST_ENTR(dip, st_info);
1578 1578
1579 1579 switch (infocmd) {
1580 1580 case DDI_INFO_DEVT2DEVINFO:
1581 1581 dev = (dev_t)arg;
1582 1582 instance = MTUNIT(dev);
1583 1583 if ((un = ddi_get_soft_state(st_state, instance)) == NULL)
1584 1584 return (DDI_FAILURE);
1585 1585 *result = (void *) ST_DEVINFO;
1586 1586 error = DDI_SUCCESS;
1587 1587 break;
1588 1588 case DDI_INFO_DEVT2INSTANCE:
1589 1589 dev = (dev_t)arg;
1590 1590 instance = MTUNIT(dev);
1591 1591 *result = (void *)(uintptr_t)instance;
1592 1592 error = DDI_SUCCESS;
1593 1593 break;
1594 1594 default:
1595 1595 error = DDI_FAILURE;
1596 1596 }
1597 1597 return (error);
1598 1598 }
1599 1599
1600 1600 static int
1601 1601 st_doattach(struct scsi_device *devp, int (*canwait)())
1602 1602 {
1603 1603 struct scsi_tape *un = NULL;
1604 1604 recov_info *ri;
1605 1605 int km_flags = (canwait != NULL_FUNC) ? KM_SLEEP : KM_NOSLEEP;
1606 1606 int instance;
1607 1607 size_t rlen;
1608 1608
1609 1609 ST_FUNC(devp->sd_dev, st_doattach);
1610 1610 /*
1611 1611 * Call the routine scsi_probe to do some of the dirty work.
1612 1612 * If the INQUIRY command succeeds, the field sd_inq in the
1613 1613 * device structure will be filled in.
1614 1614 */
1615 1615 ST_DEBUG(devp->sd_dev, st_label, SCSI_DEBUG,
1616 1616 "st_doattach(): probing\n");
1617 1617
1618 1618 if (scsi_probe(devp, canwait) == SCSIPROBE_EXISTS) {
1619 1619
1620 1620 /*
1621 1621 * In checking the whole inq_dtype byte we are looking at both
1622 1622 * the Peripheral Qualifier and the Peripheral Device Type.
1623 1623 * For this driver we are only interested in sequential devices
1624 1624 * that are connected or capable if connecting to this logical
1625 1625 * unit.
1626 1626 */
1627 1627 if (devp->sd_inq->inq_dtype ==
1628 1628 (DTYPE_SEQUENTIAL | DPQ_POSSIBLE)) {
1629 1629 ST_DEBUG(devp->sd_dev, st_label, SCSI_DEBUG,
1630 1630 "probe exists\n");
1631 1631 } else {
1632 1632 /* Something there but not a tape device */
1633 1633 scsi_unprobe(devp);
1634 1634 return (DDI_FAILURE);
1635 1635 }
1636 1636 } else {
1637 1637 /* Nothing there */
1638 1638 ST_DEBUG(devp->sd_dev, st_label, SCSI_DEBUG,
1639 1639 "probe failure: nothing there\n");
1640 1640 scsi_unprobe(devp);
1641 1641 return (DDI_FAILURE);
1642 1642 }
1643 1643
1644 1644
1645 1645 /*
1646 1646 * The actual unit is present.
1647 1647 * Now is the time to fill in the rest of our info..
1648 1648 */
1649 1649 instance = ddi_get_instance(devp->sd_dev);
1650 1650
1651 1651 if (ddi_soft_state_zalloc(st_state, instance) != DDI_SUCCESS) {
1652 1652 goto error;
1653 1653 }
1654 1654 un = ddi_get_soft_state(st_state, instance);
1655 1655
1656 1656 ASSERT(un != NULL);
1657 1657
1658 1658 un->un_rqs_bp = scsi_alloc_consistent_buf(&devp->sd_address, NULL,
1659 1659 MAX_SENSE_LENGTH, B_READ, canwait, NULL);
1660 1660 if (un->un_rqs_bp == NULL) {
1661 1661 goto error;
1662 1662 }
1663 1663 un->un_rqs = scsi_init_pkt(&devp->sd_address, NULL, un->un_rqs_bp,
1664 1664 CDB_GROUP0, 1, st_recov_sz, PKT_CONSISTENT, canwait, NULL);
1665 1665 if (!un->un_rqs) {
1666 1666 goto error;
1667 1667 }
1668 1668 ASSERT(un->un_rqs->pkt_resid == 0);
1669 1669 devp->sd_sense =
1670 1670 (struct scsi_extended_sense *)un->un_rqs_bp->b_un.b_addr;
1671 1671 ASSERT(geterror(un->un_rqs_bp) == NULL);
1672 1672
1673 1673 (void) scsi_setup_cdb((union scsi_cdb *)un->un_rqs->pkt_cdbp,
1674 1674 SCMD_REQUEST_SENSE, 0, MAX_SENSE_LENGTH, 0);
1675 1675 FILL_SCSI1_LUN(devp, un->un_rqs);
1676 1676 un->un_rqs->pkt_flags |= (FLAG_SENSING | FLAG_HEAD | FLAG_NODISCON);
1677 1677 un->un_rqs->pkt_time = st_io_time;
1678 1678 un->un_rqs->pkt_comp = st_intr;
1679 1679 ri = (recov_info *)un->un_rqs->pkt_private;
1680 1680 if (st_recov_sz == sizeof (recov_info)) {
1681 1681 ri->privatelen = sizeof (recov_info);
1682 1682 } else {
1683 1683 ri->privatelen = sizeof (pkt_info);
1684 1684 }
1685 1685
1686 1686 un->un_sbufp = getrbuf(km_flags);
1687 1687 un->un_recov_buf = getrbuf(km_flags);
1688 1688
1689 1689 un->un_uscsi_rqs_buf = kmem_alloc(SENSE_LENGTH, KM_SLEEP);
1690 1690
1691 1691 /*
1692 1692 * use i_ddi_mem_alloc() for now until we have an interface to allocate
1693 1693 * memory for DMA which doesn't require a DMA handle.
1694 1694 */
1695 1695 (void) i_ddi_mem_alloc(devp->sd_dev, &st_alloc_attr,
1696 1696 sizeof (struct seq_mode), ((km_flags == KM_SLEEP) ? 1 : 0), 0,
1697 1697 NULL, (caddr_t *)&un->un_mspl, &rlen, NULL);
1698 1698
1699 1699 (void) i_ddi_mem_alloc(devp->sd_dev, &st_alloc_attr,
1700 1700 sizeof (read_pos_data_t), ((km_flags == KM_SLEEP) ? 1 : 0), 0,
1701 1701 NULL, (caddr_t *)&un->un_read_pos_data, &rlen, NULL);
1702 1702
1703 1703 if (!un->un_sbufp || !un->un_mspl || !un->un_read_pos_data) {
1704 1704 ST_DEBUG6(devp->sd_dev, st_label, SCSI_DEBUG,
1705 1705 "probe partial failure: no space\n");
1706 1706 goto error;
1707 1707 }
1708 1708
1709 1709 bzero(un->un_mspl, sizeof (struct seq_mode));
1710 1710
1711 1711 cv_init(&un->un_sbuf_cv, NULL, CV_DRIVER, NULL);
1712 1712 cv_init(&un->un_queue_cv, NULL, CV_DRIVER, NULL);
1713 1713 cv_init(&un->un_clscv, NULL, CV_DRIVER, NULL);
1714 1714 cv_init(&un->un_state_cv, NULL, CV_DRIVER, NULL);
1715 1715 #ifdef __x86
1716 1716 cv_init(&un->un_contig_mem_cv, NULL, CV_DRIVER, NULL);
1717 1717 #endif
1718 1718
1719 1719 /* Initialize power managemnet condition variable */
1720 1720 cv_init(&un->un_suspend_cv, NULL, CV_DRIVER, NULL);
1721 1721 cv_init(&un->un_tape_busy_cv, NULL, CV_DRIVER, NULL);
1722 1722 cv_init(&un->un_recov_buf_cv, NULL, CV_DRIVER, NULL);
1723 1723
1724 1724 un->un_recov_taskq = ddi_taskq_create(devp->sd_dev,
1725 1725 "un_recov_taskq", 1, TASKQ_DEFAULTPRI, km_flags);
1726 1726
1727 1727 ASSERT(un->un_recov_taskq != NULL);
1728 1728
1729 1729 un->un_pos.pmode = invalid;
1730 1730 un->un_sd = devp;
1731 1731 un->un_swr_token = (opaque_t)NULL;
1732 1732 un->un_comp_page = ST_DEV_DATACOMP_PAGE | ST_DEV_CONFIG_PAGE;
1733 1733 un->un_wormable = st_is_drive_worm;
1734 1734 un->un_media_id_method = st_get_media_identification;
1735 1735 /*
1736 1736 * setting long a initial as it contains logical file info.
1737 1737 * support for long format is mandatory but many drive don't do it.
1738 1738 */
1739 1739 un->un_read_pos_type = LONG_POS;
1740 1740
1741 1741 un->un_suspend_pos.pmode = invalid;
1742 1742
1743 1743 st_add_recovery_info_to_pkt(un, un->un_rqs_bp, un->un_rqs);
1744 1744
1745 1745 #ifdef __x86
1746 1746 if (ddi_dma_alloc_handle(ST_DEVINFO, &st_contig_mem_dma_attr,
1747 1747 DDI_DMA_SLEEP, NULL, &un->un_contig_mem_hdl) != DDI_SUCCESS) {
1748 1748 ST_DEBUG6(devp->sd_dev, st_label, SCSI_DEBUG,
1749 1749 "allocation of contiguous memory dma handle failed!");
1750 1750 un->un_contig_mem_hdl = NULL;
1751 1751 goto error;
1752 1752 }
1753 1753 #endif
1754 1754
1755 1755 /*
1756 1756 * Since this driver manages devices with "remote" hardware,
1757 1757 * i.e. the devices themselves have no "reg" properties,
1758 1758 * the SUSPEND/RESUME commands in detach/attach will not be
1759 1759 * called by the power management framework unless we request
1760 1760 * it by creating a "pm-hardware-state" property and setting it
1761 1761 * to value "needs-suspend-resume".
1762 1762 */
1763 1763 if (ddi_prop_update_string(DDI_DEV_T_NONE, devp->sd_dev,
1764 1764 "pm-hardware-state", "needs-suspend-resume") !=
1765 1765 DDI_PROP_SUCCESS) {
1766 1766
1767 1767 ST_DEBUG(devp->sd_dev, st_label, SCSI_DEBUG,
1768 1768 "ddi_prop_update(\"pm-hardware-state\") failed\n");
1769 1769 goto error;
1770 1770 }
1771 1771
1772 1772 if (ddi_prop_create(DDI_DEV_T_NONE, devp->sd_dev, DDI_PROP_CANSLEEP,
1773 1773 "no-involuntary-power-cycles", NULL, 0) != DDI_PROP_SUCCESS) {
1774 1774
1775 1775 ST_DEBUG(devp->sd_dev, st_label, SCSI_DEBUG,
1776 1776 "ddi_prop_create(\"no-involuntary-power-cycles\") "
1777 1777 "failed\n");
1778 1778 goto error;
1779 1779 }
1780 1780
1781 1781 (void) scsi_reset_notify(ROUTE, SCSI_RESET_NOTIFY,
1782 1782 st_reset_notification, (caddr_t)un);
1783 1783
1784 1784 ST_DEBUG6(devp->sd_dev, st_label, SCSI_DEBUG, "attach success\n");
1785 1785 return (DDI_SUCCESS);
1786 1786
1787 1787 error:
1788 1788 devp->sd_sense = NULL;
1789 1789
1790 1790 ddi_remove_minor_node(devp->sd_dev, NULL);
1791 1791 if (un) {
1792 1792 if (un->un_mspl) {
1793 1793 i_ddi_mem_free((caddr_t)un->un_mspl, NULL);
1794 1794 }
1795 1795 if (un->un_read_pos_data) {
1796 1796 i_ddi_mem_free((caddr_t)un->un_read_pos_data, 0);
1797 1797 }
1798 1798 if (un->un_sbufp) {
1799 1799 freerbuf(un->un_sbufp);
1800 1800 }
1801 1801 if (un->un_recov_buf) {
1802 1802 freerbuf(un->un_recov_buf);
1803 1803 }
1804 1804 if (un->un_uscsi_rqs_buf) {
1805 1805 kmem_free(un->un_uscsi_rqs_buf, SENSE_LENGTH);
1806 1806 }
1807 1807 #ifdef __x86
1808 1808 if (un->un_contig_mem_hdl != NULL) {
1809 1809 ddi_dma_free_handle(&un->un_contig_mem_hdl);
1810 1810 }
1811 1811 #endif
1812 1812 if (un->un_rqs) {
1813 1813 scsi_destroy_pkt(un->un_rqs);
1814 1814 }
1815 1815
1816 1816 if (un->un_rqs_bp) {
1817 1817 scsi_free_consistent_buf(un->un_rqs_bp);
1818 1818 }
1819 1819
1820 1820 ddi_soft_state_free(st_state, instance);
1821 1821 devp->sd_private = NULL;
1822 1822 }
1823 1823
1824 1824 if (devp->sd_inq) {
1825 1825 scsi_unprobe(devp);
1826 1826 }
1827 1827 return (DDI_FAILURE);
1828 1828 }
1829 1829
1830 1830 typedef int
1831 1831 (*cfg_functp)(struct scsi_tape *, char *vidpid, struct st_drivetype *);
1832 1832
1833 1833 static cfg_functp config_functs[] = {
1834 1834 st_get_conf_from_st_dot_conf,
1835 1835 st_get_conf_from_st_conf_dot_c,
1836 1836 st_get_conf_from_tape_drive,
1837 1837 st_get_default_conf
1838 1838 };
1839 1839
1840 1840
1841 1841 /*
1842 1842 * determine tape type, using tape-config-list or built-in table or
1843 1843 * use a generic tape config entry
1844 1844 */
1845 1845 static void
1846 1846 st_known_tape_type(struct scsi_tape *un)
1847 1847 {
1848 1848 struct st_drivetype *dp;
1849 1849 cfg_functp *config_funct;
1850 1850 uchar_t reserved;
1851 1851
1852 1852 ST_FUNC(ST_DEVINFO, st_known_tape_type);
1853 1853
1854 1854 reserved = (un->un_rsvd_status & ST_RESERVE) ? ST_RESERVE
1855 1855 : ST_RELEASE;
1856 1856
1857 1857 /*
1858 1858 * XXX: Emulex MT-02 (and emulators) predates SCSI-1 and has
1859 1859 * no vid & pid inquiry data. So, we provide one.
1860 1860 */
1861 1861 if (ST_INQUIRY->inq_len == 0 ||
1862 1862 (bcmp("\0\0\0\0\0\0\0\0", ST_INQUIRY->inq_vid, 8) == 0)) {
1863 1863 (void) strcpy((char *)ST_INQUIRY->inq_vid, ST_MT02_NAME);
1864 1864 }
1865 1865
1866 1866 if (un->un_dp_size == 0) {
1867 1867 un->un_dp_size = sizeof (struct st_drivetype);
1868 1868 dp = kmem_zalloc((size_t)un->un_dp_size, KM_SLEEP);
1869 1869 un->un_dp = dp;
1870 1870 } else {
1871 1871 dp = un->un_dp;
1872 1872 }
1873 1873
1874 1874 un->un_dp->non_motion_timeout = st_io_time;
1875 1875 /*
1876 1876 * Loop through the configuration methods till one works.
1877 1877 */
1878 1878 for (config_funct = &config_functs[0]; ; config_funct++) {
1879 1879 if ((*config_funct)(un, ST_INQUIRY->inq_vid, dp)) {
1880 1880 break;
1881 1881 }
1882 1882 }
1883 1883
1884 1884 /*
1885 1885 * If we didn't just make up this configuration and
1886 1886 * all the density codes are the same..
1887 1887 * Set Auto Density over ride.
1888 1888 */
1889 1889 if (*config_funct != st_get_default_conf) {
1890 1890 /*
1891 1891 * If this device is one that is configured and all
1892 1892 * densities are the same, This saves doing gets and set
1893 1893 * that yield nothing.
1894 1894 */
1895 1895 if ((dp->densities[0]) == (dp->densities[1]) &&
1896 1896 (dp->densities[0]) == (dp->densities[2]) &&
1897 1897 (dp->densities[0]) == (dp->densities[3])) {
1898 1898
1899 1899 dp->options |= ST_AUTODEN_OVERRIDE;
1900 1900 }
1901 1901 }
1902 1902
1903 1903
1904 1904 /*
1905 1905 * Store tape drive characteristics.
1906 1906 */
1907 1907 un->un_status = 0;
1908 1908 un->un_attached = 1;
1909 1909 un->un_init_options = dp->options;
1910 1910
1911 1911 /* setup operation time-outs based on options */
1912 1912 st_calculate_timeouts(un);
1913 1913
1914 1914 /* TLR support */
1915 1915 if (un->un_dp->type != ST_TYPE_INVALID) {
1916 1916 int result;
1917 1917
1918 1918 /* try and enable TLR */
1919 1919 un->un_tlr_flag = TLR_SAS_ONE_DEVICE;
1920 1920 result = st_set_target_TLR_mode(un, st_uscsi_cmd);
1921 1921 if (result == EACCES) {
1922 1922 /*
1923 1923 * From attach command failed.
1924 1924 * Set dp type so is run again on open.
1925 1925 */
1926 1926 un->un_dp->type = ST_TYPE_INVALID;
1927 1927 un->un_tlr_flag = TLR_NOT_KNOWN;
1928 1928 } else if (result == 0) {
1929 1929 if (scsi_ifgetcap(&un->un_sd->sd_address,
1930 1930 "tran-layer-retries", 1) == -1) {
1931 1931 un->un_tlr_flag = TLR_NOT_SUPPORTED;
1932 1932 (void) st_set_target_TLR_mode(un, st_uscsi_cmd);
1933 1933 } else {
1934 1934 un->un_tlr_flag = TLR_SAS_ONE_DEVICE;
1935 1935 }
1936 1936 } else {
1937 1937 un->un_tlr_flag = TLR_NOT_SUPPORTED;
1938 1938 }
1939 1939 }
1940 1940
1941 1941 /* make sure if we are supposed to be variable, make it variable */
1942 1942 if (dp->options & ST_VARIABLE) {
1943 1943 dp->bsize = 0;
1944 1944 }
1945 1945
1946 1946 if (reserved != ((un->un_rsvd_status & ST_RESERVE) ? ST_RESERVE
1947 1947 : ST_RELEASE)) {
1948 1948 (void) st_reserve_release(un, reserved, st_uscsi_cmd);
1949 1949 }
1950 1950
1951 1951 un->un_unit_attention_flags |= 1;
1952 1952
1953 1953 scsi_log(ST_DEVINFO, st_label, CE_NOTE, "?<%s>\n", dp->name);
1954 1954
1955 1955 }
1956 1956
|
↓ open down ↓ |
1248 lines elided |
↑ open up ↑ |
1957 1957
1958 1958 typedef struct {
1959 1959 int mask;
1960 1960 int bottom;
1961 1961 int top;
1962 1962 char *name;
1963 1963 } conf_limit;
1964 1964
1965 1965 static const conf_limit conf_limits[] = {
1966 1966
1967 - -1, 1, 2, "conf version",
1968 - -1, MT_ISTS, ST_LAST_TYPE, "drive type",
1969 - -1, 0, 0xffffff, "block size",
1970 - ST_VALID_OPTS, 0, ST_VALID_OPTS, "options",
1971 - -1, 0, 4, "number of densities",
1972 - -1, 0, UINT8_MAX, "density code",
1973 - -1, 0, 3, "default density",
1974 - -1, 0, UINT16_MAX, "non motion timeout",
1975 - -1, 0, UINT16_MAX, "I/O timeout",
1976 - -1, 0, UINT16_MAX, "space timeout",
1977 - -1, 0, UINT16_MAX, "load timeout",
1978 - -1, 0, UINT16_MAX, "unload timeout",
1979 - -1, 0, UINT16_MAX, "erase timeout",
1980 - 0, 0, 0, NULL
1967 + { -1, 1, 2, "conf version" },
1968 + { -1, MT_ISTS, ST_LAST_TYPE, "drive type" },
1969 + { -1, 0, 0xffffff, "block size" },
1970 + { ST_VALID_OPTS, 0, ST_VALID_OPTS, "options" },
1971 + { -1, 0, 4, "number of densities" },
1972 + { -1, 0, UINT8_MAX, "density code" },
1973 + { -1, 0, 3, "default density" },
1974 + { -1, 0, UINT16_MAX, "non motion timeout" },
1975 + { -1, 0, UINT16_MAX, "I/O timeout" },
1976 + { -1, 0, UINT16_MAX, "space timeout" },
1977 + { -1, 0, UINT16_MAX, "load timeout" },
1978 + { -1, 0, UINT16_MAX, "unload timeout" },
1979 + { -1, 0, UINT16_MAX, "erase timeout" },
1980 + { 0, 0, 0, NULL }
1981 1981 };
1982 1982
1983 1983 static int
1984 1984 st_validate_conf_data(struct scsi_tape *un, int *list, int list_len,
1985 1985 const char *conf_name)
1986 1986 {
1987 1987 int dens;
1988 1988 int ndens;
1989 1989 int value;
1990 1990 int type;
1991 1991 int count;
1992 1992 const conf_limit *limit = &conf_limits[0];
1993 1993
1994 1994 ST_FUNC(ST_DEVINFO, st_validate_conf_data);
1995 1995
1996 1996 ST_DEBUG3(ST_DEVINFO, st_label, CE_NOTE,
1997 1997 "Checking %d entrys total with %d densities\n", list_len, list[4]);
1998 1998
1999 1999 count = list_len;
2000 2000 type = *list;
2001 2001 for (; count && limit->name; count--, list++, limit++) {
2002 2002
2003 2003 value = *list;
2004 2004 if (value & ~limit->mask) {
2005 2005 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
2006 2006 "%s %s value invalid bits set: 0x%X\n",
2007 2007 conf_name, limit->name, value & ~limit->mask);
2008 2008 *list &= limit->mask;
2009 2009 } else if (value < limit->bottom) {
2010 2010 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
2011 2011 "%s %s value too low: value = %d limit %d\n",
2012 2012 conf_name, limit->name, value, limit->bottom);
2013 2013 } else if (value > limit->top) {
2014 2014 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
2015 2015 "%s %s value too high: value = %d limit %d\n",
2016 2016 conf_name, limit->name, value, limit->top);
2017 2017 } else {
2018 2018 ST_DEBUG3(ST_DEVINFO, st_label, CE_CONT,
2019 2019 "%s %s value = 0x%X\n",
2020 2020 conf_name, limit->name, value);
2021 2021 }
2022 2022
2023 2023 /* If not the number of densities continue */
2024 2024 if (limit != &conf_limits[4]) {
2025 2025 continue;
2026 2026 }
2027 2027
2028 2028 /* If number of densities is not in range can't use config */
2029 2029 if (value < limit->bottom || value > limit->top) {
2030 2030 return (-1);
2031 2031 }
2032 2032
2033 2033 ndens = min(value, NDENSITIES);
2034 2034 if ((type == 1) && (list_len - ndens) != 6) {
2035 2035 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
2036 2036 "%s conf version 1 with %d densities has %d items"
2037 2037 " should have %d",
2038 2038 conf_name, ndens, list_len, 6 + ndens);
2039 2039 } else if ((type == 2) && (list_len - ndens) != 13) {
2040 2040 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
2041 2041 "%s conf version 2 with %d densities has %d items"
2042 2042 " should have %d",
2043 2043 conf_name, ndens, list_len, 13 + ndens);
2044 2044 }
2045 2045
2046 2046 limit++;
2047 2047 for (dens = 0; dens < ndens && count; dens++) {
2048 2048 count--;
2049 2049 list++;
2050 2050 value = *list;
2051 2051 if (value < limit->bottom) {
2052 2052 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
2053 2053 "%s density[%d] value too low: value ="
2054 2054 " 0x%X limit 0x%X\n",
2055 2055 conf_name, dens, value, limit->bottom);
2056 2056 } else if (value > limit->top) {
2057 2057 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
2058 2058 "%s density[%d] value too high: value ="
2059 2059 " 0x%X limit 0x%X\n",
2060 2060 conf_name, dens, value, limit->top);
2061 2061 } else {
2062 2062 ST_DEBUG3(ST_DEVINFO, st_label, CE_CONT,
2063 2063 "%s density[%d] value = 0x%X\n",
2064 2064 conf_name, dens, value);
2065 2065 }
2066 2066 }
2067 2067 }
2068 2068
2069 2069 return (0);
2070 2070 }
2071 2071
2072 2072 static int
2073 2073 st_get_conf_from_st_dot_conf(struct scsi_tape *un, char *vidpid,
2074 2074 struct st_drivetype *dp)
2075 2075 {
2076 2076 caddr_t config_list = NULL;
2077 2077 caddr_t data_list = NULL;
2078 2078 int *data_ptr;
2079 2079 caddr_t vidptr, prettyptr, datanameptr;
2080 2080 size_t vidlen, prettylen, datanamelen, tripletlen = 0;
2081 2081 int config_list_len, data_list_len, len, i;
2082 2082 int version;
2083 2083 int found = 0;
2084 2084
2085 2085 ST_FUNC(ST_DEVINFO, st_get_conf_from_st_dot_conf);
2086 2086
2087 2087 /*
2088 2088 * Determine type of tape controller. Type is determined by
2089 2089 * checking the vendor ids of the earlier inquiry command and
2090 2090 * comparing those with vids in tape-config-list defined in st.conf
2091 2091 */
2092 2092 if (ddi_getlongprop(DDI_DEV_T_ANY, ST_DEVINFO, DDI_PROP_DONTPASS,
2093 2093 "tape-config-list", (caddr_t)&config_list, &config_list_len)
2094 2094 != DDI_PROP_SUCCESS) {
2095 2095 return (found);
2096 2096 }
2097 2097
2098 2098 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
2099 2099 "st_get_conf_from_st_dot_conf(): st.conf has tape-config-list\n");
2100 2100
2101 2101 /*
2102 2102 * Compare vids in each triplet - if it matches, get value for
2103 2103 * data_name and contruct a st_drivetype struct
2104 2104 * tripletlen is not set yet!
2105 2105 */
2106 2106 for (len = config_list_len, vidptr = config_list;
2107 2107 len > 0;
2108 2108 vidptr += tripletlen, len -= tripletlen) {
2109 2109
2110 2110 vidlen = strlen(vidptr);
2111 2111 prettyptr = vidptr + vidlen + 1;
2112 2112 prettylen = strlen(prettyptr);
2113 2113 datanameptr = prettyptr + prettylen + 1;
2114 2114 datanamelen = strlen(datanameptr);
2115 2115 tripletlen = vidlen + prettylen + datanamelen + 3;
2116 2116
2117 2117 if (vidlen == 0) {
2118 2118 continue;
2119 2119 }
2120 2120
2121 2121 /*
2122 2122 * If inquiry vid dosen't match this triplets vid,
2123 2123 * try the next.
2124 2124 */
2125 2125 if (strncasecmp(vidpid, vidptr, vidlen)) {
2126 2126 continue;
2127 2127 }
2128 2128
2129 2129 /*
2130 2130 * if prettylen is zero then use the vid string
2131 2131 */
2132 2132 if (prettylen == 0) {
2133 2133 prettyptr = vidptr;
2134 2134 prettylen = vidlen;
2135 2135 }
2136 2136
2137 2137 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
2138 2138 "vid = %s, pretty=%s, dataname = %s\n",
2139 2139 vidptr, prettyptr, datanameptr);
2140 2140
2141 2141 /*
2142 2142 * get the data list
2143 2143 */
2144 2144 if (ddi_getlongprop(DDI_DEV_T_ANY, ST_DEVINFO, 0,
2145 2145 datanameptr, (caddr_t)&data_list,
2146 2146 &data_list_len) != DDI_PROP_SUCCESS) {
2147 2147 /*
2148 2148 * Error in getting property value
2149 2149 * print warning!
2150 2150 */
2151 2151 scsi_log(ST_DEVINFO, st_label, CE_WARN,
2152 2152 "data property (%s) has no value\n",
2153 2153 datanameptr);
2154 2154 continue;
2155 2155 }
2156 2156
2157 2157 /*
2158 2158 * now initialize the st_drivetype struct
2159 2159 */
2160 2160 (void) strncpy(dp->name, prettyptr, ST_NAMESIZE - 1);
2161 2161 dp->length = (int)min(vidlen, (VIDPIDLEN - 1));
2162 2162 (void) strncpy(dp->vid, vidptr, dp->length);
2163 2163 data_ptr = (int *)data_list;
2164 2164 /*
2165 2165 * check if data is enough for version, type,
2166 2166 * bsize, options, # of densities, density1,
2167 2167 * density2, ..., default_density
2168 2168 */
2169 2169 if ((data_list_len < 5 * sizeof (int)) ||
2170 2170 (data_list_len < 6 * sizeof (int) +
2171 2171 *(data_ptr + 4) * sizeof (int))) {
2172 2172 /*
2173 2173 * print warning and skip to next triplet.
2174 2174 */
2175 2175 scsi_log(ST_DEVINFO, st_label, CE_WARN,
2176 2176 "data property (%s) incomplete\n",
2177 2177 datanameptr);
2178 2178 kmem_free(data_list, data_list_len);
2179 2179 continue;
2180 2180 }
2181 2181
2182 2182 if (st_validate_conf_data(un, data_ptr,
2183 2183 data_list_len / sizeof (int), datanameptr)) {
2184 2184 kmem_free(data_list, data_list_len);
2185 2185 scsi_log(ST_DEVINFO, st_label, CE_WARN,
2186 2186 "data property (%s) rejected\n",
2187 2187 datanameptr);
2188 2188 continue;
2189 2189 }
2190 2190
2191 2191 /*
2192 2192 * check version
2193 2193 */
2194 2194 version = *data_ptr++;
2195 2195 if (version != 1 && version != 2) {
2196 2196 /* print warning but accept it */
2197 2197 scsi_log(ST_DEVINFO, st_label, CE_WARN,
2198 2198 "Version # for data property (%s) "
2199 2199 "not set to 1 or 2\n", datanameptr);
2200 2200 }
2201 2201
2202 2202 dp->type = *data_ptr++;
2203 2203 dp->bsize = *data_ptr++;
2204 2204 dp->options = *data_ptr++;
2205 2205 dp->options |= ST_DYNAMIC;
2206 2206 len = *data_ptr++;
2207 2207 for (i = 0; i < NDENSITIES; i++) {
2208 2208 if (i < len) {
2209 2209 dp->densities[i] = *data_ptr++;
2210 2210 }
2211 2211 }
2212 2212 dp->default_density = *data_ptr << 3;
2213 2213 if (version == 2 &&
2214 2214 data_list_len >= (13 + len) * sizeof (int)) {
2215 2215 data_ptr++;
2216 2216 dp->non_motion_timeout = *data_ptr++;
2217 2217 dp->io_timeout = *data_ptr++;
2218 2218 dp->rewind_timeout = *data_ptr++;
2219 2219 dp->space_timeout = *data_ptr++;
2220 2220 dp->load_timeout = *data_ptr++;
2221 2221 dp->unload_timeout = *data_ptr++;
2222 2222 dp->erase_timeout = *data_ptr++;
2223 2223 }
2224 2224 kmem_free(data_list, data_list_len);
2225 2225 found = 1;
2226 2226 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
2227 2227 "found in st.conf: vid = %s, pretty=%s\n",
2228 2228 dp->vid, dp->name);
2229 2229 break;
2230 2230 }
2231 2231
2232 2232 /*
2233 2233 * free up the memory allocated by ddi_getlongprop
2234 2234 */
2235 2235 if (config_list) {
2236 2236 kmem_free(config_list, config_list_len);
2237 2237 }
2238 2238 return (found);
2239 2239 }
2240 2240
2241 2241 static int
2242 2242 st_get_conf_from_st_conf_dot_c(struct scsi_tape *un, char *vidpid,
2243 2243 struct st_drivetype *dp)
2244 2244 {
2245 2245 int i;
2246 2246
2247 2247 ST_FUNC(ST_DEVINFO, st_get_conf_from_st_conf_dot_c);
2248 2248 /*
2249 2249 * Determine type of tape controller. Type is determined by
2250 2250 * checking the result of the earlier inquiry command and
2251 2251 * comparing vendor ids with strings in a table declared in st_conf.c.
2252 2252 */
2253 2253 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
2254 2254 "st_get_conf_from_st_conf_dot_c(): looking at st_drivetypes\n");
2255 2255
2256 2256 for (i = 0; i < st_ndrivetypes; i++) {
2257 2257 if (st_drivetypes[i].length == 0) {
2258 2258 continue;
2259 2259 }
2260 2260 if (strncasecmp(vidpid, st_drivetypes[i].vid,
2261 2261 st_drivetypes[i].length)) {
2262 2262 continue;
2263 2263 }
2264 2264 bcopy(&st_drivetypes[i], dp, sizeof (st_drivetypes[i]));
2265 2265 return (1);
2266 2266 }
2267 2267 return (0);
2268 2268 }
2269 2269
2270 2270 static int
2271 2271 st_get_conf_from_tape_drive(struct scsi_tape *un, char *vidpid,
2272 2272 struct st_drivetype *dp)
2273 2273 {
2274 2274 int bsize;
2275 2275 ulong_t maxbsize;
2276 2276 caddr_t buf;
2277 2277 struct st_drivetype *tem_dp;
2278 2278 struct read_blklim *blklim;
2279 2279 int rval;
2280 2280 int i;
2281 2281
2282 2282 ST_FUNC(ST_DEVINFO, st_get_conf_from_tape_drive);
2283 2283
2284 2284 /*
2285 2285 * Determine the type of tape controller. Type is determined by
2286 2286 * sending SCSI commands to tape drive and deriving the type from
2287 2287 * the returned data.
2288 2288 */
2289 2289 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
2290 2290 "st_get_conf_from_tape_drive(): asking tape drive\n");
2291 2291
2292 2292 tem_dp = kmem_zalloc(sizeof (struct st_drivetype), KM_SLEEP);
2293 2293
2294 2294 /*
2295 2295 * Make up a name
2296 2296 */
2297 2297 bcopy(vidpid, tem_dp->name, VIDPIDLEN);
2298 2298 tem_dp->name[VIDPIDLEN] = '\0';
2299 2299 tem_dp->length = min(strlen(ST_INQUIRY->inq_vid), (VIDPIDLEN - 1));
2300 2300 (void) strncpy(tem_dp->vid, ST_INQUIRY->inq_vid, tem_dp->length);
2301 2301 /*
2302 2302 * 'clean' vendor and product strings of non-printing chars
2303 2303 */
2304 2304 for (i = 0; i < VIDPIDLEN - 1; i ++) {
2305 2305 if (tem_dp->name[i] < ' ' || tem_dp->name[i] > '~') {
2306 2306 tem_dp->name[i] = '.';
2307 2307 }
2308 2308 }
2309 2309
2310 2310 /*
2311 2311 * MODE SENSE to determine block size.
2312 2312 */
2313 2313 un->un_dp->options |= ST_MODE_SEL_COMP | ST_UNLOADABLE;
2314 2314 rval = st_modesense(un);
2315 2315 if (rval) {
2316 2316 if (rval == EACCES) {
2317 2317 un->un_dp->type = ST_TYPE_INVALID;
2318 2318 rval = 1;
2319 2319 } else {
2320 2320 un->un_dp->options &= ~ST_MODE_SEL_COMP;
2321 2321 rval = 0;
2322 2322 }
2323 2323 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
2324 2324 "st_get_conf_from_tape_drive(): fail to mode sense\n");
2325 2325 goto exit;
2326 2326 }
2327 2327
2328 2328 /* Can mode sense page 0x10 or 0xf */
2329 2329 tem_dp->options |= ST_MODE_SEL_COMP;
2330 2330 bsize = (un->un_mspl->high_bl << 16) |
2331 2331 (un->un_mspl->mid_bl << 8) |
2332 2332 (un->un_mspl->low_bl);
2333 2333
2334 2334 if (bsize == 0) {
2335 2335 tem_dp->options |= ST_VARIABLE;
2336 2336 tem_dp->bsize = 0;
2337 2337 } else if (bsize > ST_MAXRECSIZE_FIXED) {
2338 2338 rval = st_change_block_size(un, 0);
2339 2339 if (rval) {
2340 2340 if (rval == EACCES) {
2341 2341 un->un_dp->type = ST_TYPE_INVALID;
2342 2342 rval = 1;
2343 2343 } else {
2344 2344 rval = 0;
2345 2345 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
2346 2346 "st_get_conf_from_tape_drive(): "
2347 2347 "Fixed record size is too large and"
2348 2348 "cannot switch to variable record size");
2349 2349 }
2350 2350 goto exit;
2351 2351 }
2352 2352 tem_dp->options |= ST_VARIABLE;
2353 2353 } else {
2354 2354 rval = st_change_block_size(un, 0);
2355 2355 if (rval == 0) {
2356 2356 tem_dp->options |= ST_VARIABLE;
2357 2357 tem_dp->bsize = 0;
2358 2358 } else if (rval != EACCES) {
2359 2359 tem_dp->bsize = bsize;
2360 2360 } else {
2361 2361 un->un_dp->type = ST_TYPE_INVALID;
2362 2362 rval = 1;
2363 2363 goto exit;
2364 2364 }
2365 2365 }
2366 2366
2367 2367 /*
2368 2368 * If READ BLOCk LIMITS works and upper block size limit is
2369 2369 * more than 64K, ST_NO_RECSIZE_LIMIT is supported.
2370 2370 */
2371 2371 blklim = kmem_zalloc(sizeof (struct read_blklim), KM_SLEEP);
2372 2372 rval = st_read_block_limits(un, blklim);
2373 2373 if (rval) {
2374 2374 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
2375 2375 "st_get_conf_from_tape_drive(): "
2376 2376 "fail to read block limits.\n");
2377 2377 rval = 0;
2378 2378 kmem_free(blklim, sizeof (struct read_blklim));
2379 2379 goto exit;
2380 2380 }
2381 2381 maxbsize = (blklim->max_hi << 16) +
2382 2382 (blklim->max_mid << 8) + blklim->max_lo;
2383 2383 if (maxbsize > ST_MAXRECSIZE_VARIABLE) {
2384 2384 tem_dp->options |= ST_NO_RECSIZE_LIMIT;
2385 2385 }
2386 2386 kmem_free(blklim, sizeof (struct read_blklim));
2387 2387
2388 2388 /*
2389 2389 * Inquiry VPD page 0xb0 to see if the tape drive supports WORM
2390 2390 */
2391 2391 buf = kmem_zalloc(6, KM_SLEEP);
2392 2392 rval = st_get_special_inquiry(un, 6, buf, 0xb0);
2393 2393 if (rval) {
2394 2394 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
2395 2395 "st_get_conf_from_tape_drive(): "
2396 2396 "fail to read vitial inquiry.\n");
2397 2397 rval = 0;
2398 2398 kmem_free(buf, 6);
2399 2399 goto exit;
2400 2400 }
2401 2401 if (buf[4] & 1) {
2402 2402 tem_dp->options |= ST_WORMABLE;
2403 2403 }
2404 2404 kmem_free(buf, 6);
2405 2405
2406 2406 /* Assume BSD BSR KNOWS_EOD */
2407 2407 tem_dp->options |= ST_BSF | ST_BSR | ST_KNOWS_EOD | ST_UNLOADABLE;
2408 2408 tem_dp->max_rretries = -1;
2409 2409 tem_dp->max_wretries = -1;
2410 2410
2411 2411 /*
2412 2412 * Decide the densities supported by tape drive by sending
2413 2413 * REPORT DENSITY SUPPORT command.
2414 2414 */
2415 2415 if (st_get_densities_from_tape_drive(un, tem_dp) == 0) {
2416 2416 goto exit;
2417 2417 }
2418 2418
2419 2419 /*
2420 2420 * Decide the timeout values for several commands by sending
2421 2421 * REPORT SUPPORTED OPERATION CODES command.
2422 2422 */
2423 2423 rval = st_get_timeout_values_from_tape_drive(un, tem_dp);
2424 2424 if (rval == 0 || ((rval == 1) && (tem_dp->type == ST_TYPE_INVALID))) {
2425 2425 goto exit;
2426 2426 }
2427 2427
2428 2428 bcopy(tem_dp, dp, sizeof (struct st_drivetype));
2429 2429 rval = 1;
2430 2430
2431 2431 exit:
2432 2432 un->un_status = KEY_NO_SENSE;
2433 2433 kmem_free(tem_dp, sizeof (struct st_drivetype));
2434 2434 return (rval);
2435 2435 }
2436 2436
2437 2437 static int
2438 2438 st_get_densities_from_tape_drive(struct scsi_tape *un,
2439 2439 struct st_drivetype *dp)
2440 2440 {
2441 2441 int i, p;
2442 2442 size_t buflen;
2443 2443 ushort_t des_len;
2444 2444 uchar_t *den_header;
2445 2445 uchar_t num_den;
2446 2446 uchar_t den[NDENSITIES];
2447 2447 uchar_t deflt[NDENSITIES];
2448 2448 struct report_density_desc *den_desc;
2449 2449
2450 2450 ST_FUNC(ST_DEVINFO, st_get_densities_from_type_drive);
2451 2451
2452 2452 /*
2453 2453 * Since we have no idea how many densitiy support entries
2454 2454 * will be returned, we send the command firstly assuming
2455 2455 * there is only one. Then we can decide the number of
2456 2456 * entries by available density support length. If multiple
2457 2457 * entries exist, we will resend the command with enough
2458 2458 * buffer size.
2459 2459 */
2460 2460 buflen = sizeof (struct report_density_header) +
2461 2461 sizeof (struct report_density_desc);
2462 2462 den_header = kmem_zalloc(buflen, KM_SLEEP);
2463 2463 if (st_report_density_support(un, den_header, buflen) != 0) {
2464 2464 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
2465 2465 "st_get_conf_from_tape_drive(): fail to report density.\n");
2466 2466 kmem_free(den_header, buflen);
2467 2467 return (0);
2468 2468 }
2469 2469 des_len =
2470 2470 BE_16(((struct report_density_header *)den_header)->ava_dens_len);
2471 2471 num_den = (des_len - 2) / sizeof (struct report_density_desc);
2472 2472
2473 2473 if (num_den > 1) {
2474 2474 kmem_free(den_header, buflen);
2475 2475 buflen = sizeof (struct report_density_header) +
2476 2476 sizeof (struct report_density_desc) * num_den;
2477 2477 den_header = kmem_zalloc(buflen, KM_SLEEP);
2478 2478 if (st_report_density_support(un, den_header, buflen) != 0) {
2479 2479 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
2480 2480 "st_get_conf_from_tape_drive(): "
2481 2481 "fail to report density.\n");
2482 2482 kmem_free(den_header, buflen);
2483 2483 return (0);
2484 2484 }
2485 2485 }
2486 2486
2487 2487 den_desc = (struct report_density_desc *)(den_header
2488 2488 + sizeof (struct report_density_header));
2489 2489
2490 2490 /*
2491 2491 * Decide the drive type by assigning organization
2492 2492 */
2493 2493 for (i = 0; i < ST_NUM_MEMBERS(st_vid_dt); i ++) {
2494 2494 if (strncmp(st_vid_dt[i].vid, (char *)(den_desc->ass_org),
2495 2495 8) == 0) {
2496 2496 dp->type = st_vid_dt[i].type;
2497 2497 break;
2498 2498 }
2499 2499 }
2500 2500 if (i == ST_NUM_MEMBERS(st_vid_dt)) {
2501 2501 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
2502 2502 "st_get_conf_from_tape_drive(): "
2503 2503 "can't find match of assigned ort.\n");
2504 2504 kmem_free(den_header, buflen);
2505 2505 return (0);
2506 2506 }
2507 2507
2508 2508 /*
2509 2509 * The tape drive may support many tape formats, but the st driver
2510 2510 * supports only the four highest densities. Since density code
2511 2511 * values are returned by ascending sequence, we start from the
2512 2512 * last entry of density support data block descriptor.
2513 2513 */
2514 2514 p = 0;
2515 2515 den_desc += num_den - 1;
2516 2516 for (i = 0; i < num_den && p < NDENSITIES; i ++, den_desc --) {
2517 2517 if ((den_desc->pri_den != 0) && (den_desc->wrtok)) {
2518 2518 if (p != 0) {
2519 2519 if (den_desc->pri_den >= den[p - 1]) {
2520 2520 continue;
2521 2521 }
2522 2522 }
2523 2523 den[p] = den_desc->pri_den;
2524 2524 deflt[p] = den_desc->deflt;
2525 2525 p ++;
2526 2526 }
2527 2527 }
2528 2528
2529 2529 switch (p) {
2530 2530 case 0:
2531 2531 bzero(dp->densities, NDENSITIES);
2532 2532 dp->options |= ST_AUTODEN_OVERRIDE;
2533 2533 dp->default_density = MT_DENSITY4;
2534 2534 break;
2535 2535
2536 2536 case 1:
2537 2537 (void) memset(dp->densities, den[0], NDENSITIES);
2538 2538 dp->options |= ST_AUTODEN_OVERRIDE;
2539 2539 dp->default_density = MT_DENSITY4;
2540 2540 break;
2541 2541
2542 2542 case 2:
2543 2543 dp->densities[0] = den[1];
2544 2544 dp->densities[1] = den[1];
2545 2545 dp->densities[2] = den[0];
2546 2546 dp->densities[3] = den[0];
2547 2547 if (deflt[0]) {
2548 2548 dp->default_density = MT_DENSITY4;
2549 2549 } else {
2550 2550 dp->default_density = MT_DENSITY2;
2551 2551 }
2552 2552 break;
2553 2553
2554 2554 case 3:
2555 2555 dp->densities[0] = den[2];
2556 2556 dp->densities[1] = den[1];
2557 2557 dp->densities[2] = den[0];
2558 2558 dp->densities[3] = den[0];
2559 2559 if (deflt[0]) {
2560 2560 dp->default_density = MT_DENSITY4;
2561 2561 } else if (deflt[1]) {
2562 2562 dp->default_density = MT_DENSITY2;
2563 2563 } else {
2564 2564 dp->default_density = MT_DENSITY1;
2565 2565 }
2566 2566 break;
2567 2567
2568 2568 default:
2569 2569 for (i = p; i > p - NDENSITIES; i --) {
2570 2570 dp->densities[i - 1] = den[p - i];
2571 2571 }
2572 2572 if (deflt[0]) {
2573 2573 dp->default_density = MT_DENSITY4;
2574 2574 } else if (deflt[1]) {
2575 2575 dp->default_density = MT_DENSITY3;
2576 2576 } else if (deflt[2]) {
2577 2577 dp->default_density = MT_DENSITY2;
2578 2578 } else {
2579 2579 dp->default_density = MT_DENSITY1;
2580 2580 }
2581 2581 break;
2582 2582 }
2583 2583
2584 2584 bzero(dp->mediatype, NDENSITIES);
2585 2585
2586 2586 kmem_free(den_header, buflen);
2587 2587 return (1);
2588 2588 }
2589 2589
2590 2590 static int
2591 2591 st_get_timeout_values_from_tape_drive(struct scsi_tape *un,
2592 2592 struct st_drivetype *dp)
2593 2593 {
2594 2594 ushort_t timeout;
2595 2595 int rval;
2596 2596
2597 2597 ST_FUNC(ST_DEVINFO, st_get_timeout_values_from_type_drive);
2598 2598
2599 2599 rval = st_get_timeouts_value(un, SCMD_ERASE, &timeout, 0);
2600 2600 if (rval) {
2601 2601 if (rval == EACCES) {
2602 2602 un->un_dp->type = ST_TYPE_INVALID;
2603 2603 dp->type = ST_TYPE_INVALID;
2604 2604 return (1);
2605 2605 }
2606 2606 return (0);
2607 2607 }
2608 2608 dp->erase_timeout = timeout;
2609 2609
2610 2610 rval = st_get_timeouts_value(un, SCMD_READ, &timeout, 0);
2611 2611 if (rval) {
2612 2612 if (rval == EACCES) {
2613 2613 un->un_dp->type = ST_TYPE_INVALID;
2614 2614 dp->type = ST_TYPE_INVALID;
2615 2615 return (1);
2616 2616 }
2617 2617 return (0);
2618 2618 }
2619 2619 dp->io_timeout = timeout;
2620 2620
2621 2621 rval = st_get_timeouts_value(un, SCMD_WRITE, &timeout, 0);
2622 2622 if (rval) {
2623 2623 if (rval == EACCES) {
2624 2624 un->un_dp->type = ST_TYPE_INVALID;
2625 2625 dp->type = ST_TYPE_INVALID;
2626 2626 return (1);
2627 2627 }
2628 2628 return (0);
2629 2629 }
2630 2630 dp->io_timeout = max(dp->io_timeout, timeout);
2631 2631
2632 2632 rval = st_get_timeouts_value(un, SCMD_SPACE, &timeout, 0);
2633 2633 if (rval) {
2634 2634 if (rval == EACCES) {
2635 2635 un->un_dp->type = ST_TYPE_INVALID;
2636 2636 dp->type = ST_TYPE_INVALID;
2637 2637 return (1);
2638 2638 }
2639 2639 return (0);
2640 2640 }
2641 2641 dp->space_timeout = timeout;
2642 2642
2643 2643 rval = st_get_timeouts_value(un, SCMD_LOAD, &timeout, 0);
2644 2644 if (rval) {
2645 2645 if (rval == EACCES) {
2646 2646 un->un_dp->type = ST_TYPE_INVALID;
2647 2647 dp->type = ST_TYPE_INVALID;
2648 2648 return (1);
2649 2649 }
2650 2650 return (0);
2651 2651 }
2652 2652 dp->load_timeout = timeout;
2653 2653 dp->unload_timeout = timeout;
2654 2654
2655 2655 rval = st_get_timeouts_value(un, SCMD_REWIND, &timeout, 0);
2656 2656 if (rval) {
2657 2657 if (rval == EACCES) {
2658 2658 un->un_dp->type = ST_TYPE_INVALID;
2659 2659 dp->type = ST_TYPE_INVALID;
2660 2660 return (1);
2661 2661 }
2662 2662 return (0);
2663 2663 }
2664 2664 dp->rewind_timeout = timeout;
2665 2665
2666 2666 rval = st_get_timeouts_value(un, SCMD_INQUIRY, &timeout, 0);
2667 2667 if (rval) {
2668 2668 if (rval == EACCES) {
2669 2669 un->un_dp->type = ST_TYPE_INVALID;
2670 2670 dp->type = ST_TYPE_INVALID;
2671 2671 return (1);
2672 2672 }
2673 2673 return (0);
2674 2674 }
2675 2675 dp->non_motion_timeout = timeout;
2676 2676
2677 2677 return (1);
2678 2678 }
2679 2679
2680 2680 static int
2681 2681 st_get_timeouts_value(struct scsi_tape *un, uchar_t option_code,
2682 2682 ushort_t *timeout_value, ushort_t service_action)
2683 2683 {
2684 2684 uchar_t *timeouts;
2685 2685 uchar_t *oper;
2686 2686 uchar_t support;
2687 2687 uchar_t cdbsize;
2688 2688 uchar_t ctdp;
2689 2689 size_t buflen;
2690 2690 int rval;
2691 2691
2692 2692 ST_FUNC(ST_DEVINFO, st_get_timeouts_value);
2693 2693
2694 2694 buflen = sizeof (struct one_com_des) +
2695 2695 sizeof (struct com_timeout_des);
2696 2696 oper = kmem_zalloc(buflen, KM_SLEEP);
2697 2697 rval = st_report_supported_operation(un, oper, option_code,
2698 2698 service_action);
2699 2699
2700 2700 if (rval) {
2701 2701 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
2702 2702 "st_get_timeouts_value(): "
2703 2703 "fail to timeouts value for command %d.\n", option_code);
2704 2704 kmem_free(oper, buflen);
2705 2705 return (rval);
2706 2706 }
2707 2707
2708 2708 support = ((struct one_com_des *)oper)->support;
2709 2709 if ((support != SUPPORT_VALUES_SUPPORT_SCSI) &&
2710 2710 (support != SUPPORT_VALUES_SUPPORT_VENDOR)) {
2711 2711 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
2712 2712 "st_get_timeouts_value(): "
2713 2713 "command %d is not supported.\n", option_code);
2714 2714 kmem_free(oper, buflen);
2715 2715 return (ENOTSUP);
2716 2716 }
2717 2717
2718 2718 ctdp = ((struct one_com_des *)oper)->ctdp;
2719 2719 if (!ctdp) {
2720 2720 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
2721 2721 "st_get_timeouts_value(): "
2722 2722 "command timeout is not included.\n");
2723 2723 kmem_free(oper, buflen);
2724 2724 return (ENOTSUP);
2725 2725 }
2726 2726
2727 2727 cdbsize = BE_16(((struct one_com_des *)oper)->cdb_size);
2728 2728 timeouts = (uchar_t *)(oper + cdbsize + 4);
2729 2729
2730 2730 /*
2731 2731 * Timeout value in seconds is 4 bytes, but we only support the lower 2
2732 2732 * bytes. If the higher 2 bytes are not zero, the timeout value is set
2733 2733 * to 0xFFFF.
2734 2734 */
2735 2735 if (*(timeouts + 8) != 0 || *(timeouts + 9) != 0) {
2736 2736 *timeout_value = USHRT_MAX;
2737 2737 } else {
2738 2738 *timeout_value = ((*(timeouts + 10)) << 8) |
2739 2739 (*(timeouts + 11));
2740 2740 }
2741 2741
2742 2742 kmem_free(oper, buflen);
2743 2743 return (0);
2744 2744 }
2745 2745
2746 2746 static int
2747 2747 st_get_default_conf(struct scsi_tape *un, char *vidpid, struct st_drivetype *dp)
2748 2748 {
2749 2749 int i;
2750 2750
2751 2751 ST_FUNC(ST_DEVINFO, st_get_default_conf);
2752 2752
2753 2753 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
2754 2754 "st_get_default_conf(): making drivetype from INQ cmd\n");
2755 2755
2756 2756 /*
2757 2757 * Make up a name
2758 2758 */
2759 2759 bcopy("Vendor '", dp->name, 8);
2760 2760 bcopy(vidpid, &dp->name[8], VIDLEN);
2761 2761 bcopy("' Product '", &dp->name[16], 11);
2762 2762 bcopy(&vidpid[8], &dp->name[27], PIDLEN);
2763 2763 dp->name[ST_NAMESIZE - 2] = '\'';
2764 2764 dp->name[ST_NAMESIZE - 1] = '\0';
2765 2765 dp->length = min(strlen(ST_INQUIRY->inq_vid), (VIDPIDLEN - 1));
2766 2766 (void) strncpy(dp->vid, ST_INQUIRY->inq_vid, dp->length);
2767 2767 /*
2768 2768 * 'clean' vendor and product strings of non-printing chars
2769 2769 */
2770 2770 for (i = 0; i < ST_NAMESIZE - 2; i++) {
2771 2771 if (dp->name[i] < ' ' || dp->name[i] > '~') {
2772 2772 dp->name[i] = '.';
2773 2773 }
2774 2774 }
2775 2775 dp->type = ST_TYPE_INVALID;
2776 2776 dp->options |= (ST_DYNAMIC | ST_UNLOADABLE | ST_MODE_SEL_COMP);
2777 2777
2778 2778 return (1); /* Can Not Fail */
2779 2779 }
2780 2780
2781 2781 /*
2782 2782 * Regular Unix Entry points
2783 2783 */
2784 2784
2785 2785
2786 2786
2787 2787 /* ARGSUSED */
2788 2788 static int
2789 2789 st_open(dev_t *dev_p, int flag, int otyp, cred_t *cred_p)
2790 2790 {
2791 2791 dev_t dev = *dev_p;
2792 2792 int rval = 0;
2793 2793
2794 2794 GET_SOFT_STATE(dev);
2795 2795
2796 2796 ST_ENTR(ST_DEVINFO, st_open);
2797 2797
2798 2798 /*
2799 2799 * validate that we are addressing a sensible unit
2800 2800 */
2801 2801 mutex_enter(ST_MUTEX);
2802 2802
2803 2803 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
2804 2804 "st_open(node = %s dev = 0x%lx, flag = %d, otyp = %d)\n",
2805 2805 st_dev_name(dev), *dev_p, flag, otyp);
2806 2806
2807 2807 /*
2808 2808 * All device accesss go thru st_strategy() where we check
2809 2809 * suspend status
2810 2810 */
2811 2811
2812 2812 if (!un->un_attached) {
2813 2813 st_known_tape_type(un);
2814 2814 if (!un->un_attached) {
2815 2815 rval = ENXIO;
2816 2816 goto exit;
2817 2817 }
2818 2818
2819 2819 }
2820 2820
2821 2821 /*
2822 2822 * Check for the case of the tape in the middle of closing.
2823 2823 * This isn't simply a check of the current state, because
2824 2824 * we could be in state of sensing with the previous state
2825 2825 * that of closing.
2826 2826 *
2827 2827 * And don't allow multiple opens.
2828 2828 */
2829 2829 if (!(flag & (FNDELAY | FNONBLOCK)) && IS_CLOSING(un)) {
2830 2830 un->un_laststate = un->un_state;
2831 2831 un->un_state = ST_STATE_CLOSE_PENDING_OPEN;
2832 2832 while (IS_CLOSING(un) ||
2833 2833 un->un_state == ST_STATE_CLOSE_PENDING_OPEN) {
2834 2834 if (cv_wait_sig(&un->un_clscv, ST_MUTEX) == 0) {
2835 2835 rval = EINTR;
2836 2836 un->un_state = un->un_laststate;
2837 2837 goto exit;
2838 2838 }
2839 2839 }
2840 2840 } else if (un->un_state != ST_STATE_CLOSED) {
2841 2841 rval = EBUSY;
2842 2842 goto busy;
2843 2843 }
2844 2844
2845 2845 /*
2846 2846 * record current dev
2847 2847 */
2848 2848 un->un_dev = dev;
2849 2849 un->un_oflags = flag; /* save for use in st_tape_init() */
2850 2850 un->un_errno = 0; /* no errors yet */
2851 2851 un->un_restore_pos = 0;
2852 2852 un->un_rqs_state = 0;
2853 2853
2854 2854 /*
2855 2855 * If we are opening O_NDELAY, or O_NONBLOCK, we don't check for
2856 2856 * anything, leave internal states alone, if fileno >= 0
2857 2857 */
2858 2858 if (flag & (FNDELAY | FNONBLOCK)) {
2859 2859 switch (un->un_pos.pmode) {
2860 2860
2861 2861 case invalid:
2862 2862 un->un_state = ST_STATE_OFFLINE;
2863 2863 break;
2864 2864
2865 2865 case legacy:
2866 2866 /*
2867 2867 * If position is anything other than rewound.
2868 2868 */
2869 2869 if (un->un_pos.fileno != 0 || un->un_pos.blkno != 0) {
2870 2870 /*
2871 2871 * set un_read_only/write-protect status.
2872 2872 *
2873 2873 * If the tape is not bot we can assume
2874 2874 * that mspl->wp_status is set properly.
2875 2875 * else
2876 2876 * we need to do a mode sense/Tur once
2877 2877 * again to get the actual tape status.(since
2878 2878 * user might have replaced the tape)
2879 2879 * Hence make the st state OFFLINE so that
2880 2880 * we re-intialize the tape once again.
2881 2881 */
2882 2882 un->un_read_only =
2883 2883 (un->un_oflags & FWRITE) ? RDWR : RDONLY;
2884 2884 un->un_state = ST_STATE_OPEN_PENDING_IO;
2885 2885 } else {
2886 2886 un->un_state = ST_STATE_OFFLINE;
2887 2887 }
2888 2888 break;
2889 2889 case logical:
2890 2890 if (un->un_pos.lgclblkno == 0) {
2891 2891 un->un_state = ST_STATE_OFFLINE;
2892 2892 } else {
2893 2893 un->un_read_only =
2894 2894 (un->un_oflags & FWRITE) ? RDWR : RDONLY;
2895 2895 un->un_state = ST_STATE_OPEN_PENDING_IO;
2896 2896 }
2897 2897 break;
2898 2898 }
2899 2899 rval = 0;
2900 2900 } else {
2901 2901 /*
2902 2902 * Not opening O_NDELAY.
2903 2903 */
2904 2904 un->un_state = ST_STATE_OPENING;
2905 2905
2906 2906 /*
2907 2907 * Clear error entry stack
2908 2908 */
2909 2909 st_empty_error_stack(un);
2910 2910
2911 2911 rval = st_tape_init(un);
2912 2912 if ((rval == EACCES) && (un->un_read_only & WORM)) {
2913 2913 un->un_state = ST_STATE_OPEN_PENDING_IO;
2914 2914 rval = 0; /* so open doesn't fail */
2915 2915 } else if (rval) {
2916 2916 /*
2917 2917 * Release the tape unit, if reserved and not
2918 2918 * preserve reserve.
2919 2919 */
2920 2920 if ((un->un_rsvd_status &
2921 2921 (ST_RESERVE | ST_PRESERVE_RESERVE)) == ST_RESERVE) {
2922 2922 (void) st_reserve_release(un, ST_RELEASE,
2923 2923 st_uscsi_cmd);
2924 2924 }
2925 2925 } else {
2926 2926 un->un_state = ST_STATE_OPEN_PENDING_IO;
2927 2927 }
2928 2928 }
2929 2929
2930 2930 exit:
2931 2931 /*
2932 2932 * we don't want any uninvited guests scrogging our data when we're
2933 2933 * busy with something, so for successful opens or failed opens
2934 2934 * (except for EBUSY), reset these counters and state appropriately.
2935 2935 */
2936 2936 if (rval != EBUSY) {
2937 2937 if (rval) {
2938 2938 un->un_state = ST_STATE_CLOSED;
2939 2939 }
2940 2940 un->un_err_resid = 0;
2941 2941 un->un_retry_ct = 0;
2942 2942 }
2943 2943 busy:
2944 2944 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
2945 2945 "st_open: return val = %x, state = %d\n", rval, un->un_state);
2946 2946 mutex_exit(ST_MUTEX);
2947 2947 return (rval);
2948 2948
2949 2949 }
2950 2950
2951 2951 static int
2952 2952 st_tape_init(struct scsi_tape *un)
2953 2953 {
2954 2954 int err;
2955 2955 int rval = 0;
2956 2956
2957 2957 ST_FUNC(ST_DEVINFO, st_tape_init);
2958 2958
2959 2959 ASSERT(mutex_owned(ST_MUTEX));
2960 2960
2961 2961 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
2962 2962 "st_tape_init(un = 0x%p, oflags = %d)\n", (void*)un, un->un_oflags);
2963 2963
2964 2964 /*
2965 2965 * Clean up after any errors left by 'last' close.
2966 2966 * This also handles the case of the initial open.
2967 2967 */
2968 2968 if (un->un_state != ST_STATE_INITIALIZING) {
2969 2969 un->un_laststate = un->un_state;
2970 2970 un->un_state = ST_STATE_OPENING;
2971 2971 }
2972 2972
2973 2973 un->un_kbytes_xferred = 0;
2974 2974
2975 2975 /*
2976 2976 * do a throw away TUR to clear check condition
2977 2977 */
2978 2978 err = st_cmd(un, SCMD_TEST_UNIT_READY, 0, SYNC_CMD);
2979 2979
2980 2980 /*
2981 2981 * If test unit ready fails because the drive is reserved
2982 2982 * by another host fail the open for no access.
2983 2983 */
2984 2984 if (err) {
2985 2985 if (un->un_rsvd_status & ST_RESERVATION_CONFLICT) {
2986 2986 un->un_state = ST_STATE_CLOSED;
2987 2987 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
2988 2988 "st_tape_init: RESERVATION CONFLICT\n");
2989 2989 rval = EACCES;
2990 2990 goto exit;
2991 2991 } else if ((un->un_rsvd_status &
2992 2992 ST_APPLICATION_RESERVATIONS) != 0) {
2993 2993 if ((ST_RQSENSE != NULL) &&
2994 2994 (ST_RQSENSE->es_add_code == 0x2a &&
2995 2995 ST_RQSENSE->es_qual_code == 0x03)) {
2996 2996 un->un_state = ST_STATE_CLOSED;
2997 2997 rval = EACCES;
2998 2998 goto exit;
2999 2999 }
3000 3000 }
3001 3001 }
3002 3002
3003 3003 /*
3004 3004 * Tape self identification could fail if the tape drive is used by
3005 3005 * another host during attach time. We try to get the tape type
3006 3006 * again. This is also applied to any posponed configuration methods.
3007 3007 */
3008 3008 if (un->un_dp->type == ST_TYPE_INVALID) {
3009 3009 un->un_comp_page = ST_DEV_DATACOMP_PAGE | ST_DEV_CONFIG_PAGE;
3010 3010 st_known_tape_type(un);
3011 3011 }
3012 3012
3013 3013 /*
3014 3014 * If the tape type is still invalid, try to determine the generic
3015 3015 * configuration.
3016 3016 */
3017 3017 if (un->un_dp->type == ST_TYPE_INVALID) {
3018 3018 rval = st_determine_generic(un);
3019 3019 if (rval) {
3020 3020 if (rval != EACCES) {
3021 3021 rval = EIO;
3022 3022 }
3023 3023 un->un_state = ST_STATE_CLOSED;
3024 3024 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
3025 3025 "st_tape_init: %s invalid type\n",
3026 3026 rval == EACCES ? "EACCES" : "EIO");
3027 3027 goto exit;
3028 3028 }
3029 3029 /*
3030 3030 * If this is a Unknown Type drive,
3031 3031 * Use the READ BLOCK LIMITS to determine if
3032 3032 * allow large xfer is approprate if not globally
3033 3033 * disabled with st_allow_large_xfer.
3034 3034 */
3035 3035 un->un_allow_large_xfer = (uchar_t)st_allow_large_xfer;
3036 3036 } else {
3037 3037
3038 3038 /*
3039 3039 * If we allow_large_xfer (ie >64k) and have not yet found out
3040 3040 * the max block size supported by the drive,
3041 3041 * find it by issueing a READ_BLKLIM command.
3042 3042 * if READ_BLKLIM cmd fails, assume drive doesn't
3043 3043 * allow_large_xfer and min/max block sizes as 1 byte and 63k.
3044 3044 */
3045 3045 un->un_allow_large_xfer = st_allow_large_xfer &&
3046 3046 (un->un_dp->options & ST_NO_RECSIZE_LIMIT);
3047 3047 }
3048 3048 /*
3049 3049 * if maxbsize is unknown, set the maximum block size.
3050 3050 */
3051 3051 if (un->un_maxbsize == MAXBSIZE_UNKNOWN) {
3052 3052
3053 3053 /*
3054 3054 * Get the Block limits of the tape drive.
3055 3055 * if un->un_allow_large_xfer = 0 , then make sure
3056 3056 * that maxbsize is <= ST_MAXRECSIZE_FIXED.
3057 3057 */
3058 3058 un->un_rbl = kmem_zalloc(RBLSIZE, KM_SLEEP);
3059 3059
3060 3060 err = st_cmd(un, SCMD_READ_BLKLIM, RBLSIZE, SYNC_CMD);
3061 3061 if (err) {
3062 3062 /* Retry */
3063 3063 err = st_cmd(un, SCMD_READ_BLKLIM, RBLSIZE, SYNC_CMD);
3064 3064 }
3065 3065 if (!err) {
3066 3066
3067 3067 /*
3068 3068 * if cmd successful, use limit returned
3069 3069 */
3070 3070 un->un_maxbsize = (un->un_rbl->max_hi << 16) +
3071 3071 (un->un_rbl->max_mid << 8) +
3072 3072 un->un_rbl->max_lo;
3073 3073 un->un_minbsize = (un->un_rbl->min_hi << 8) +
3074 3074 un->un_rbl->min_lo;
3075 3075 un->un_data_mod = 1 << un->un_rbl->granularity;
3076 3076 if ((un->un_maxbsize == 0) ||
3077 3077 (un->un_allow_large_xfer == 0 &&
3078 3078 un->un_maxbsize > ST_MAXRECSIZE_FIXED)) {
3079 3079 un->un_maxbsize = ST_MAXRECSIZE_FIXED;
3080 3080
3081 3081 } else if (un->un_dp->type == ST_TYPE_DEFAULT) {
3082 3082 /*
3083 3083 * Drive is not one that is configured, But the
3084 3084 * READ BLOCK LIMITS tells us it can do large
3085 3085 * xfers.
3086 3086 */
3087 3087 if (un->un_maxbsize > ST_MAXRECSIZE_FIXED) {
3088 3088 un->un_dp->options |=
3089 3089 ST_NO_RECSIZE_LIMIT;
3090 3090 }
3091 3091 /*
3092 3092 * If max and mimimum block limits are the
3093 3093 * same this is a fixed block size device.
3094 3094 */
3095 3095 if (un->un_maxbsize == un->un_minbsize) {
3096 3096 un->un_dp->options &= ~ST_VARIABLE;
3097 3097 }
3098 3098 }
3099 3099
3100 3100 if (un->un_minbsize == 0) {
3101 3101 un->un_minbsize = 1;
3102 3102 }
3103 3103
3104 3104 } else { /* error on read block limits */
3105 3105
3106 3106 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
3107 3107 "!st_tape_init: Error on READ BLOCK LIMITS,"
3108 3108 " errno = %d un_rsvd_status = 0x%X\n",
3109 3109 err, un->un_rsvd_status);
3110 3110
3111 3111 /*
3112 3112 * since read block limits cmd failed,
3113 3113 * do not allow large xfers.
3114 3114 * use old values in st_minphys
3115 3115 */
3116 3116 if (un->un_rsvd_status & ST_RESERVATION_CONFLICT) {
3117 3117 rval = EACCES;
3118 3118 } else {
3119 3119 un->un_allow_large_xfer = 0;
3120 3120 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
3121 3121 "!Disabling large transfers\n");
3122 3122
3123 3123 /*
3124 3124 * we guess maxbsize and minbsize
3125 3125 */
3126 3126 if (un->un_bsize) {
3127 3127 un->un_maxbsize = un->un_minbsize =
3128 3128 un->un_bsize;
3129 3129 } else {
3130 3130 un->un_maxbsize = ST_MAXRECSIZE_FIXED;
3131 3131 un->un_minbsize = 1;
3132 3132 }
3133 3133 /*
3134 3134 * Data Mod must be set,
3135 3135 * Even if read block limits fails.
3136 3136 * Prevents Divide By Zero in st_rw().
3137 3137 */
3138 3138 un->un_data_mod = 1;
3139 3139 }
3140 3140 }
3141 3141 if (un->un_rbl) {
3142 3142 kmem_free(un->un_rbl, RBLSIZE);
3143 3143 un->un_rbl = NULL;
3144 3144 }
3145 3145
3146 3146 if (rval) {
3147 3147 goto exit;
3148 3148 }
3149 3149 }
3150 3150
3151 3151 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
3152 3152 "maxdma = %d, maxbsize = %d, minbsize = %d, %s large xfer\n",
3153 3153 un->un_maxdma, un->un_maxbsize, un->un_minbsize,
3154 3154 (un->un_allow_large_xfer ? "ALLOW": "DON'T ALLOW"));
3155 3155
3156 3156 err = st_cmd(un, SCMD_TEST_UNIT_READY, 0, SYNC_CMD);
3157 3157
3158 3158 if (err != 0) {
3159 3159 if (err == EINTR) {
3160 3160 un->un_laststate = un->un_state;
3161 3161 un->un_state = ST_STATE_CLOSED;
3162 3162 rval = EINTR;
3163 3163 goto exit;
3164 3164 }
3165 3165 /*
3166 3166 * Make sure the tape is ready
3167 3167 */
3168 3168 un->un_pos.pmode = invalid;
3169 3169 if (un->un_status != KEY_UNIT_ATTENTION) {
3170 3170 /*
3171 3171 * allow open no media. Subsequent MTIOCSTATE
3172 3172 * with media present will complete the open
3173 3173 * logic.
3174 3174 */
3175 3175 un->un_laststate = un->un_state;
3176 3176 if (un->un_oflags & (FNONBLOCK|FNDELAY)) {
3177 3177 un->un_mediastate = MTIO_EJECTED;
3178 3178 un->un_state = ST_STATE_OFFLINE;
3179 3179 rval = 0;
3180 3180 goto exit;
3181 3181 } else {
3182 3182 un->un_state = ST_STATE_CLOSED;
3183 3183 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
3184 3184 "st_tape_init EIO no media, not opened "
3185 3185 "O_NONBLOCK|O_EXCL\n");
3186 3186 rval = EIO;
3187 3187 goto exit;
3188 3188 }
3189 3189 }
3190 3190 }
3191 3191
3192 3192 /*
3193 3193 * On each open, initialize block size from drivetype struct,
3194 3194 * as it could have been changed by MTSRSZ ioctl.
3195 3195 * Now, ST_VARIABLE simply means drive is capable of variable
3196 3196 * mode. All drives are assumed to support fixed records.
3197 3197 * Hence, un_bsize tells what mode the drive is in.
3198 3198 * un_bsize = 0 - variable record length
3199 3199 * = x - fixed record length is x
3200 3200 */
3201 3201 un->un_bsize = un->un_dp->bsize;
3202 3202
3203 3203 /*
3204 3204 * If saved position is valid go there
3205 3205 */
3206 3206 if (un->un_restore_pos) {
3207 3207 un->un_restore_pos = 0;
3208 3208 un->un_pos.fileno = un->un_save_fileno;
3209 3209 un->un_pos.blkno = un->un_save_blkno;
3210 3210 rval = st_validate_tapemarks(un, st_uscsi_cmd, &un->un_pos);
3211 3211 if (rval != 0) {
3212 3212 if (rval != EACCES) {
3213 3213 rval = EIO;
3214 3214 }
3215 3215 un->un_laststate = un->un_state;
3216 3216 un->un_state = ST_STATE_CLOSED;
3217 3217 goto exit;
3218 3218 }
3219 3219 }
3220 3220
3221 3221 if (un->un_pos.pmode == invalid) {
3222 3222 rval = st_loadtape(un);
3223 3223 if (rval) {
3224 3224 if (rval != EACCES) {
3225 3225 rval = EIO;
3226 3226 }
3227 3227 un->un_laststate = un->un_state;
3228 3228 un->un_state = ST_STATE_CLOSED;
3229 3229 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
3230 3230 "st_tape_init: %s can't open tape\n",
3231 3231 rval == EACCES ? "EACCES" : "EIO");
3232 3232 goto exit;
3233 3233 }
3234 3234 }
3235 3235
3236 3236 /*
3237 3237 * do a mode sense to pick up state of current write-protect,
3238 3238 * Could cause reserve and fail due to conflict.
3239 3239 */
3240 3240 if (un->un_unit_attention_flags) {
3241 3241 rval = st_modesense(un);
3242 3242 if (rval == EACCES) {
3243 3243 goto exit;
3244 3244 }
3245 3245 }
3246 3246
3247 3247 /*
3248 3248 * If we are opening the tape for writing, check
3249 3249 * to make sure that the tape can be written.
3250 3250 */
3251 3251 if (un->un_oflags & FWRITE) {
3252 3252 err = 0;
3253 3253 if (un->un_mspl->wp) {
3254 3254 un->un_status = KEY_WRITE_PROTECT;
3255 3255 un->un_laststate = un->un_state;
3256 3256 un->un_state = ST_STATE_CLOSED;
3257 3257 rval = EACCES;
3258 3258 /*
3259 3259 * STK sets the wp bit if volsafe tape is loaded.
3260 3260 */
3261 3261 if ((un->un_dp->type == MT_ISSTK9840) &&
3262 3262 (un->un_dp->options & ST_WORMABLE)) {
3263 3263 un->un_read_only = RDONLY;
3264 3264 } else {
3265 3265 goto exit;
3266 3266 }
3267 3267 } else {
3268 3268 un->un_read_only = RDWR;
3269 3269 }
3270 3270 } else {
3271 3271 un->un_read_only = RDONLY;
3272 3272 }
3273 3273
3274 3274 if (un->un_dp->options & ST_WORMABLE &&
3275 3275 un->un_unit_attention_flags) {
3276 3276 un->un_read_only |= un->un_wormable(un);
3277 3277
3278 3278 if (((un->un_read_only == WORM) ||
3279 3279 (un->un_read_only == RDWORM)) &&
3280 3280 ((un->un_oflags & FWRITE) == FWRITE)) {
3281 3281 un->un_status = KEY_DATA_PROTECT;
3282 3282 rval = EACCES;
3283 3283 ST_DEBUG4(ST_DEVINFO, st_label, CE_NOTE,
3284 3284 "read_only = %d eof = %d oflag = %d\n",
3285 3285 un->un_read_only, un->un_pos.eof, un->un_oflags);
3286 3286 }
3287 3287 }
3288 3288
3289 3289 /*
3290 3290 * If we're opening the tape write-only, we need to
3291 3291 * write 2 filemarks on the HP 1/2 inch drive, to
3292 3292 * create a null file.
3293 3293 */
3294 3294 if ((un->un_read_only == RDWR) ||
3295 3295 (un->un_read_only == WORM) && (un->un_oflags & FWRITE)) {
3296 3296 if (un->un_dp->options & ST_REEL) {
3297 3297 un->un_fmneeded = 2;
3298 3298 } else {
3299 3299 un->un_fmneeded = 1;
3300 3300 }
3301 3301 } else {
3302 3302 un->un_fmneeded = 0;
3303 3303 }
3304 3304
3305 3305 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
3306 3306 "fmneeded = %x\n", un->un_fmneeded);
3307 3307
3308 3308 /*
3309 3309 * Make sure the density can be selected correctly.
3310 3310 * If WORM can only write at the append point which in most cases
3311 3311 * isn't BOP. st_determine_density() with a B_WRITE only attempts
3312 3312 * to set and try densities if a BOP.
3313 3313 */
3314 3314 if (st_determine_density(un,
3315 3315 un->un_read_only == RDWR ? B_WRITE : B_READ)) {
3316 3316 un->un_status = KEY_ILLEGAL_REQUEST;
3317 3317 un->un_laststate = un->un_state;
3318 3318 un->un_state = ST_STATE_CLOSED;
3319 3319 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
3320 3320 "st_tape_init: EIO can't determine density\n");
3321 3321 rval = EIO;
3322 3322 goto exit;
3323 3323 }
3324 3324
3325 3325 /*
3326 3326 * Destroy the knowledge that we have 'determined'
3327 3327 * density so that a later read at BOT comes along
3328 3328 * does the right density determination.
3329 3329 */
3330 3330
3331 3331 un->un_density_known = 0;
3332 3332
3333 3333
3334 3334 /*
3335 3335 * Okay, the tape is loaded and either at BOT or somewhere past.
3336 3336 * Mark the state such that any I/O or tape space operations
3337 3337 * will get/set the right density, etc..
3338 3338 */
3339 3339 un->un_laststate = un->un_state;
3340 3340 un->un_lastop = ST_OP_NIL;
3341 3341 un->un_mediastate = MTIO_INSERTED;
3342 3342 cv_broadcast(&un->un_state_cv);
3343 3343
3344 3344 /*
3345 3345 * Set test append flag if writing.
3346 3346 * First write must check that tape is positioned correctly.
3347 3347 */
3348 3348 un->un_test_append = (un->un_oflags & FWRITE);
3349 3349
3350 3350 /*
3351 3351 * if there are pending unit attention flags.
3352 3352 * Check that the media has not changed.
3353 3353 */
3354 3354 if (un->un_unit_attention_flags) {
3355 3355 rval = st_get_media_identification(un, st_uscsi_cmd);
3356 3356 if (rval != 0 && rval != EACCES) {
3357 3357 rval = EIO;
3358 3358 }
3359 3359 un->un_unit_attention_flags = 0;
3360 3360 }
3361 3361
3362 3362 exit:
3363 3363 un->un_err_resid = 0;
3364 3364 un->un_last_resid = 0;
3365 3365 un->un_last_count = 0;
3366 3366
3367 3367 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
3368 3368 "st_tape_init: return val = %x\n", rval);
3369 3369 return (rval);
3370 3370
3371 3371 }
3372 3372
3373 3373
3374 3374
3375 3375 /* ARGSUSED */
3376 3376 static int
3377 3377 st_close(dev_t dev, int flag, int otyp, cred_t *cred_p)
3378 3378 {
3379 3379 int err = 0;
3380 3380 int count, last_state;
3381 3381 minor_t minor = getminor(dev);
3382 3382 #ifdef __x86
3383 3383 struct contig_mem *cp, *cp_temp;
3384 3384 #endif
3385 3385
3386 3386 GET_SOFT_STATE(dev);
3387 3387
3388 3388 ST_ENTR(ST_DEVINFO, st_close);
3389 3389
3390 3390 /*
3391 3391 * wait till all cmds in the pipeline have been completed
3392 3392 */
3393 3393 mutex_enter(ST_MUTEX);
3394 3394
3395 3395 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
3396 3396 "st_close(dev = 0x%lx, flag = %d, otyp = %d)\n", dev, flag, otyp);
3397 3397
3398 3398 st_wait_for_io(un);
3399 3399
3400 3400 /* turn off persistent errors on close, as we want close to succeed */
3401 3401 st_turn_pe_off(un);
3402 3402
3403 3403 /*
3404 3404 * set state to indicate that we are in process of closing
3405 3405 */
3406 3406 last_state = un->un_laststate = un->un_state;
3407 3407 un->un_state = ST_STATE_CLOSING;
3408 3408
3409 3409 ST_POS(ST_DEVINFO, "st_close1:", &un->un_pos);
3410 3410
3411 3411 /*
3412 3412 * BSD behavior:
3413 3413 * a close always causes a silent span to the next file if we've hit
3414 3414 * an EOF (but not yet read across it).
3415 3415 */
3416 3416 if ((minor & MT_BSD) && (un->un_pos.eof == ST_EOF)) {
3417 3417 if (un->un_pos.pmode != invalid) {
3418 3418 un->un_pos.fileno++;
3419 3419 un->un_pos.blkno = 0;
3420 3420 }
3421 3421 un->un_pos.eof = ST_NO_EOF;
3422 3422 }
3423 3423
3424 3424 /*
3425 3425 * SVR4 behavior for skipping to next file:
3426 3426 *
3427 3427 * If we have not seen a filemark, space to the next file
3428 3428 *
3429 3429 * If we have already seen the filemark we are physically in the next
3430 3430 * file and we only increment the filenumber
3431 3431 */
3432 3432 if (((minor & (MT_BSD | MT_NOREWIND)) == MT_NOREWIND) &&
3433 3433 (flag & FREAD) && /* reading or at least asked to */
3434 3434 (un->un_mediastate == MTIO_INSERTED) && /* tape loaded */
3435 3435 (un->un_pos.pmode != invalid) && /* XXX position known */
3436 3436 ((un->un_pos.blkno != 0) && /* inside a file */
3437 3437 (un->un_lastop != ST_OP_WRITE) && /* Didn't just write */
3438 3438 (un->un_lastop != ST_OP_WEOF))) { /* or write filemarks */
3439 3439 switch (un->un_pos.eof) {
3440 3440 case ST_NO_EOF:
3441 3441 /*
3442 3442 * if we were reading and did not read the complete file
3443 3443 * skip to the next file, leaving the tape correctly
3444 3444 * positioned to read the first record of the next file
3445 3445 * Check first for REEL if we are at EOT by trying to
3446 3446 * read a block
3447 3447 */
3448 3448 if ((un->un_dp->options & ST_REEL) &&
3449 3449 (!(un->un_dp->options & ST_READ_IGNORE_EOFS)) &&
3450 3450 (un->un_pos.blkno == 0)) {
3451 3451 if (st_cmd(un, SCMD_SPACE, Blk(1), SYNC_CMD)) {
3452 3452 ST_DEBUG2(ST_DEVINFO, st_label,
3453 3453 SCSI_DEBUG,
3454 3454 "st_close : EIO can't space\n");
3455 3455 err = EIO;
3456 3456 goto error_out;
3457 3457 }
3458 3458 if (un->un_pos.eof >= ST_EOF_PENDING) {
3459 3459 un->un_pos.eof = ST_EOT_PENDING;
3460 3460 un->un_pos.fileno += 1;
3461 3461 un->un_pos.blkno = 0;
3462 3462 break;
3463 3463 }
3464 3464 }
3465 3465 if (st_cmd(un, SCMD_SPACE, Fmk(1), SYNC_CMD)) {
3466 3466 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
3467 3467 "st_close: EIO can't space #2\n");
3468 3468 err = EIO;
3469 3469 goto error_out;
3470 3470 } else {
3471 3471 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
3472 3472 "st_close2: fileno=%x,blkno=%x,eof=%x\n",
3473 3473 un->un_pos.fileno, un->un_pos.blkno,
3474 3474 un->un_pos.eof);
3475 3475 un->un_pos.eof = ST_NO_EOF;
3476 3476 }
3477 3477 break;
3478 3478
3479 3479 case ST_EOF_PENDING:
3480 3480 case ST_EOF:
3481 3481 un->un_pos.fileno += 1;
3482 3482 un->un_pos.lgclblkno += 1;
3483 3483 un->un_pos.blkno = 0;
3484 3484 un->un_pos.eof = ST_NO_EOF;
3485 3485 break;
3486 3486
3487 3487 case ST_EOT:
3488 3488 case ST_EOT_PENDING:
3489 3489 case ST_EOM:
3490 3490 /* nothing to do */
3491 3491 break;
3492 3492 default:
3493 3493 ST_DEBUG(ST_DEVINFO, st_label, CE_PANIC,
3494 3494 "Undefined state 0x%x", un->un_pos.eof);
3495 3495
3496 3496 }
3497 3497 }
3498 3498
3499 3499
3500 3500 /*
3501 3501 * For performance reasons (HP 88780), the driver should
3502 3502 * postpone writing the second tape mark until just before a file
3503 3503 * positioning ioctl is issued (e.g., rewind). This means that
3504 3504 * the user must not manually rewind the tape because the tape will
3505 3505 * be missing the second tape mark which marks EOM.
3506 3506 * However, this small performance improvement is not worth the risk.
3507 3507 */
3508 3508
3509 3509 /*
3510 3510 * We need to back up over the filemark we inadvertently popped
3511 3511 * over doing a read in between the two filemarks that constitute
3512 3512 * logical eot for 1/2" tapes. Note that ST_EOT_PENDING is only
3513 3513 * set while reading.
3514 3514 *
3515 3515 * If we happen to be at physical eot (ST_EOM) (writing case),
3516 3516 * the writing of filemark(s) will clear the ST_EOM state, which
3517 3517 * we don't want, so we save this state and restore it later.
3518 3518 */
3519 3519
3520 3520 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
3521 3521 "flag=%x, fmneeded=%x, lastop=%x, eof=%x\n",
3522 3522 flag, un->un_fmneeded, un->un_lastop, un->un_pos.eof);
3523 3523
3524 3524 if (un->un_pos.eof == ST_EOT_PENDING) {
3525 3525 if (minor & MT_NOREWIND) {
3526 3526 if (st_cmd(un, SCMD_SPACE, Fmk(-1), SYNC_CMD)) {
3527 3527 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
3528 3528 "st_close: EIO can't space #3\n");
3529 3529 err = EIO;
3530 3530 goto error_out;
3531 3531 } else {
3532 3532 un->un_pos.blkno = 0;
3533 3533 un->un_pos.eof = ST_EOT;
3534 3534 }
3535 3535 } else {
3536 3536 un->un_pos.eof = ST_NO_EOF;
3537 3537 }
3538 3538
3539 3539 /*
3540 3540 * Do we need to write a file mark?
3541 3541 *
3542 3542 * only write filemarks if there are fmks to be written and
3543 3543 * - open for write (possibly read/write)
3544 3544 * - the last operation was a write
3545 3545 * or:
3546 3546 * - opened for wronly
3547 3547 * - no data was written
3548 3548 */
3549 3549 } else if ((un->un_pos.pmode != invalid) &&
3550 3550 (un->un_fmneeded > 0) &&
3551 3551 (((flag & FWRITE) &&
3552 3552 ((un->un_lastop == ST_OP_WRITE)||(un->un_lastop == ST_OP_WEOF))) ||
3553 3553 ((flag == FWRITE) && (un->un_lastop == ST_OP_NIL)))) {
3554 3554
3555 3555 /* save ST_EOM state */
3556 3556 int was_at_eom = (un->un_pos.eof == ST_EOM) ? 1 : 0;
3557 3557
3558 3558 /*
3559 3559 * Note that we will write a filemark if we had opened
3560 3560 * the tape write only and no data was written, thus
3561 3561 * creating a null file.
3562 3562 *
3563 3563 * If the user already wrote one, we only have to write 1 more.
3564 3564 * If they wrote two, we don't have to write any.
3565 3565 */
3566 3566
3567 3567 count = un->un_fmneeded;
3568 3568 if (count > 0) {
3569 3569 if (st_cmd(un, SCMD_WRITE_FILE_MARK, count, SYNC_CMD)) {
3570 3570 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
3571 3571 "st_close : EIO can't wfm\n");
3572 3572 err = EIO;
3573 3573 goto error_out;
3574 3574 }
3575 3575 if ((un->un_dp->options & ST_REEL) &&
3576 3576 (minor & MT_NOREWIND)) {
3577 3577 if (st_cmd(un, SCMD_SPACE, Fmk(-1), SYNC_CMD)) {
3578 3578 ST_DEBUG2(ST_DEVINFO, st_label,
3579 3579 SCSI_DEBUG,
3580 3580 "st_close : EIO space fmk(-1)\n");
3581 3581 err = EIO;
3582 3582 goto error_out;
3583 3583 }
3584 3584 un->un_pos.eof = ST_NO_EOF;
3585 3585 /* fix up block number */
3586 3586 un->un_pos.blkno = 0;
3587 3587 }
3588 3588 }
3589 3589
3590 3590 /*
3591 3591 * If we aren't going to be rewinding, and we were at
3592 3592 * physical eot, restore the state that indicates we
3593 3593 * are at physical eot. Once you have reached physical
3594 3594 * eot, and you close the tape, the only thing you can
3595 3595 * do on the next open is to rewind. Access to trailer
3596 3596 * records is only allowed without closing the device.
3597 3597 */
3598 3598 if ((minor & MT_NOREWIND) == 0 && was_at_eom) {
3599 3599 un->un_pos.eof = ST_EOM;
3600 3600 }
3601 3601 }
3602 3602
3603 3603 /*
3604 3604 * report soft errors if enabled and available, if we never accessed
3605 3605 * the drive, don't get errors. This will prevent some DAT error
3606 3606 * messages upon LOG SENSE.
3607 3607 */
3608 3608 if (st_report_soft_errors_on_close &&
3609 3609 (un->un_dp->options & ST_SOFT_ERROR_REPORTING) &&
3610 3610 (last_state != ST_STATE_OFFLINE)) {
3611 3611 if (st_report_soft_errors(dev, flag)) {
3612 3612 err = EIO;
3613 3613 goto error_out;
3614 3614 }
3615 3615 }
3616 3616
3617 3617
3618 3618 /*
3619 3619 * Do we need to rewind? Can we rewind?
3620 3620 */
3621 3621 if ((minor & MT_NOREWIND) == 0 &&
3622 3622 un->un_pos.pmode != invalid && err == 0) {
3623 3623 /*
3624 3624 * We'd like to rewind with the
3625 3625 * 'immediate' bit set, but this
3626 3626 * causes problems on some drives
3627 3627 * where subsequent opens get a
3628 3628 * 'NOT READY' error condition
3629 3629 * back while the tape is rewinding,
3630 3630 * which is impossible to distinguish
3631 3631 * from the condition of 'no tape loaded'.
3632 3632 *
3633 3633 * Also, for some targets, if you disconnect
3634 3634 * with the 'immediate' bit set, you don't
3635 3635 * actually return right away, i.e., the
3636 3636 * target ignores your request for immediate
3637 3637 * return.
3638 3638 *
3639 3639 * Instead, we'll fire off an async rewind
3640 3640 * command. We'll mark the device as closed,
3641 3641 * and any subsequent open will stall on
3642 3642 * the first TEST_UNIT_READY until the rewind
3643 3643 * completes.
3644 3644 */
3645 3645
3646 3646 /*
3647 3647 * Used to be if reserve was not supported we'd send an
3648 3648 * asynchronious rewind. Comments above may be slightly invalid
3649 3649 * as the immediate bit was never set. Doing an immedate rewind
3650 3650 * makes sense, I think fixes to not ready status might handle
3651 3651 * the problems described above.
3652 3652 */
3653 3653 if (un->un_sd->sd_inq->inq_ansi < 2) {
3654 3654 if (st_cmd(un, SCMD_REWIND, 0, SYNC_CMD)) {
3655 3655 err = EIO;
3656 3656 }
3657 3657 } else {
3658 3658 /* flush data for older drives per scsi spec. */
3659 3659 if (st_cmd(un, SCMD_WRITE_FILE_MARK, 0, SYNC_CMD)) {
3660 3660 err = EIO;
3661 3661 } else {
3662 3662 /* release the drive before rewind immediate */
3663 3663 if ((un->un_rsvd_status &
3664 3664 (ST_RESERVE | ST_PRESERVE_RESERVE)) ==
3665 3665 ST_RESERVE) {
3666 3666 if (st_reserve_release(un, ST_RELEASE,
3667 3667 st_uscsi_cmd)) {
3668 3668 err = EIO;
3669 3669 }
3670 3670 }
3671 3671
3672 3672 /* send rewind with immediate bit set */
3673 3673 if (st_cmd(un, SCMD_REWIND, 1, ASYNC_CMD)) {
3674 3674 err = EIO;
3675 3675 }
3676 3676 }
3677 3677 }
3678 3678 /*
3679 3679 * Setting positions invalid in case the rewind doesn't
3680 3680 * happen. Drives don't like to rewind if resets happen
3681 3681 * they will tend to move back to where the rewind was
3682 3682 * issued if a reset or something happens so that if a
3683 3683 * write happens the data doesn't get clobbered.
3684 3684 *
3685 3685 * Not a big deal if the position is invalid when the
3686 3686 * open occures it will do a read position.
3687 3687 */
3688 3688 un->un_pos.pmode = invalid;
3689 3689 un->un_running.pmode = invalid;
3690 3690
3691 3691 if (err == EIO) {
3692 3692 goto error_out;
3693 3693 }
3694 3694 }
3695 3695
3696 3696 /*
3697 3697 * eject tape if necessary
3698 3698 */
3699 3699 if (un->un_eject_tape_on_failure) {
3700 3700 un->un_eject_tape_on_failure = 0;
3701 3701 if (st_cmd(un, SCMD_LOAD, LD_UNLOAD, SYNC_CMD)) {
3702 3702 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
3703 3703 "st_close : can't unload tape\n");
3704 3704 err = EIO;
3705 3705 goto error_out;
3706 3706 } else {
3707 3707 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
3708 3708 "st_close : tape unloaded \n");
3709 3709 un->un_pos.eof = ST_NO_EOF;
3710 3710 un->un_mediastate = MTIO_EJECTED;
3711 3711 }
3712 3712 }
3713 3713 /*
3714 3714 * Release the tape unit, if default reserve/release
3715 3715 * behaviour.
3716 3716 */
3717 3717 if ((un->un_rsvd_status &
3718 3718 (ST_RESERVE | ST_PRESERVE_RESERVE |
3719 3719 ST_APPLICATION_RESERVATIONS)) == ST_RESERVE) {
3720 3720 (void) st_reserve_release(un, ST_RELEASE, st_uscsi_cmd);
3721 3721 }
3722 3722 error_out:
3723 3723 /*
3724 3724 * clear up state
3725 3725 */
3726 3726 un->un_laststate = un->un_state;
3727 3727 un->un_state = ST_STATE_CLOSED;
3728 3728 un->un_lastop = ST_OP_NIL;
3729 3729 un->un_throttle = 1; /* assume one request at time, for now */
3730 3730 un->un_retry_ct = 0;
3731 3731 un->un_errno = 0;
3732 3732 un->un_swr_token = (opaque_t)NULL;
3733 3733 un->un_rsvd_status &= ~(ST_INIT_RESERVE);
3734 3734
3735 3735 /* Restore the options to the init time settings */
3736 3736 if (un->un_init_options & ST_READ_IGNORE_ILI) {
3737 3737 un->un_dp->options |= ST_READ_IGNORE_ILI;
3738 3738 } else {
3739 3739 un->un_dp->options &= ~ST_READ_IGNORE_ILI;
3740 3740 }
3741 3741
3742 3742 if (un->un_init_options & ST_READ_IGNORE_EOFS) {
3743 3743 un->un_dp->options |= ST_READ_IGNORE_EOFS;
3744 3744 } else {
3745 3745 un->un_dp->options &= ~ST_READ_IGNORE_EOFS;
3746 3746 }
3747 3747
3748 3748 if (un->un_init_options & ST_SHORT_FILEMARKS) {
3749 3749 un->un_dp->options |= ST_SHORT_FILEMARKS;
3750 3750 } else {
3751 3751 un->un_dp->options &= ~ST_SHORT_FILEMARKS;
3752 3752 }
3753 3753
3754 3754 ASSERT(mutex_owned(ST_MUTEX));
3755 3755
3756 3756 /*
3757 3757 * Signal anyone awaiting a close operation to complete.
3758 3758 */
3759 3759 cv_signal(&un->un_clscv);
3760 3760
3761 3761 /*
3762 3762 * any kind of error on closing causes all state to be tossed
3763 3763 */
3764 3764 if (err && un->un_status != KEY_ILLEGAL_REQUEST) {
3765 3765 /*
3766 3766 * note that st_intr has already set
3767 3767 * un_pos.pmode to invalid.
3768 3768 */
3769 3769 un->un_density_known = 0;
3770 3770 }
3771 3771
3772 3772 #ifdef __x86
3773 3773 /*
3774 3774 * free any contiguous mem alloc'ed for big block I/O
3775 3775 */
3776 3776 cp = un->un_contig_mem;
3777 3777 while (cp) {
3778 3778 if (cp->cm_addr) {
3779 3779 ddi_dma_mem_free(&cp->cm_acc_hdl);
3780 3780 }
3781 3781 cp_temp = cp;
3782 3782 cp = cp->cm_next;
3783 3783 kmem_free(cp_temp,
3784 3784 sizeof (struct contig_mem) + biosize());
3785 3785 }
3786 3786 un->un_contig_mem_total_num = 0;
3787 3787 un->un_contig_mem_available_num = 0;
3788 3788 un->un_contig_mem = NULL;
3789 3789 un->un_max_contig_mem_len = 0;
3790 3790 #endif
3791 3791
3792 3792 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
3793 3793 "st_close3: return val = %x, fileno=%x, blkno=%x, eof=%x\n",
3794 3794 err, un->un_pos.fileno, un->un_pos.blkno, un->un_pos.eof);
3795 3795
3796 3796 mutex_exit(ST_MUTEX);
3797 3797 return (err);
3798 3798 }
3799 3799
3800 3800 /*
3801 3801 * These routines perform raw i/o operations.
3802 3802 */
3803 3803
3804 3804 /* ARGSUSED2 */
3805 3805 static int
3806 3806 st_aread(dev_t dev, struct aio_req *aio, cred_t *cred_p)
3807 3807 {
3808 3808 #ifdef STDEBUG
3809 3809 GET_SOFT_STATE(dev);
3810 3810 ST_ENTR(ST_DEVINFO, st_aread);
3811 3811 #endif
3812 3812 return (st_arw(dev, aio, B_READ));
3813 3813 }
3814 3814
3815 3815
3816 3816 /* ARGSUSED2 */
3817 3817 static int
3818 3818 st_awrite(dev_t dev, struct aio_req *aio, cred_t *cred_p)
3819 3819 {
3820 3820 #ifdef STDEBUG
3821 3821 GET_SOFT_STATE(dev);
3822 3822 ST_ENTR(ST_DEVINFO, st_awrite);
3823 3823 #endif
3824 3824 return (st_arw(dev, aio, B_WRITE));
3825 3825 }
3826 3826
3827 3827
3828 3828
3829 3829 /* ARGSUSED */
3830 3830 static int
3831 3831 st_read(dev_t dev, struct uio *uiop, cred_t *cred_p)
3832 3832 {
3833 3833 #ifdef STDEBUG
3834 3834 GET_SOFT_STATE(dev);
3835 3835 ST_ENTR(ST_DEVINFO, st_read);
3836 3836 #endif
3837 3837 return (st_rw(dev, uiop, B_READ));
3838 3838 }
3839 3839
3840 3840 /* ARGSUSED */
3841 3841 static int
3842 3842 st_write(dev_t dev, struct uio *uiop, cred_t *cred_p)
3843 3843 {
3844 3844 #ifdef STDEBUG
3845 3845 GET_SOFT_STATE(dev);
3846 3846 ST_ENTR(ST_DEVINFO, st_write);
3847 3847 #endif
3848 3848 return (st_rw(dev, uiop, B_WRITE));
3849 3849 }
3850 3850
3851 3851 /*
3852 3852 * Due to historical reasons, old limits are: For variable-length devices:
3853 3853 * if greater than 64KB - 1 (ST_MAXRECSIZE_VARIABLE), block into 64 KB - 2
3854 3854 * ST_MAXRECSIZE_VARIABLE_LIMIT) requests; otherwise,
3855 3855 * (let it through unmodified. For fixed-length record devices:
3856 3856 * 63K (ST_MAXRECSIZE_FIXED) is max (default minphys).
3857 3857 *
3858 3858 * The new limits used are un_maxdma (retrieved using scsi_ifgetcap()
3859 3859 * from the HBA) and un_maxbsize (retrieved by sending SCMD_READ_BLKLIM
3860 3860 * command to the drive).
3861 3861 *
3862 3862 */
3863 3863 static void
3864 3864 st_minphys(struct buf *bp)
3865 3865 {
3866 3866 struct scsi_tape *un;
3867 3867
3868 3868 un = ddi_get_soft_state(st_state, MTUNIT(bp->b_edev));
3869 3869
3870 3870 ST_FUNC(ST_DEVINFO, st_minphys);
3871 3871
3872 3872 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
3873 3873 "st_minphys(bp = 0x%p): b_bcount = 0x%lx\n", (void *)bp,
3874 3874 bp->b_bcount);
3875 3875
3876 3876 if (un->un_allow_large_xfer) {
3877 3877
3878 3878 /*
3879 3879 * check un_maxbsize for variable length devices only
3880 3880 */
3881 3881 if (un->un_bsize == 0 && bp->b_bcount > un->un_maxbsize) {
3882 3882 bp->b_bcount = un->un_maxbsize;
3883 3883 }
3884 3884 /*
3885 3885 * can't go more that HBA maxdma limit in either fixed-length
3886 3886 * or variable-length tape drives.
3887 3887 */
3888 3888 if (bp->b_bcount > un->un_maxdma) {
3889 3889 bp->b_bcount = un->un_maxdma;
3890 3890 }
3891 3891 } else {
3892 3892
3893 3893 /*
3894 3894 * use old fixed limits
3895 3895 */
3896 3896 if (un->un_bsize == 0) {
3897 3897 if (bp->b_bcount > ST_MAXRECSIZE_VARIABLE) {
3898 3898 bp->b_bcount = ST_MAXRECSIZE_VARIABLE_LIMIT;
3899 3899 }
3900 3900 } else {
3901 3901 if (bp->b_bcount > ST_MAXRECSIZE_FIXED) {
3902 3902 bp->b_bcount = ST_MAXRECSIZE_FIXED;
3903 3903 }
3904 3904 }
3905 3905 }
3906 3906
3907 3907 /*
3908 3908 * For regular raw I/O and Fixed Block length devices, make sure
3909 3909 * the adjusted block count is a whole multiple of the device
3910 3910 * block size.
3911 3911 */
3912 3912 if (bp != un->un_sbufp && un->un_bsize) {
3913 3913 bp->b_bcount -= (bp->b_bcount % un->un_bsize);
3914 3914 }
3915 3915 }
3916 3916
3917 3917 static int
3918 3918 st_rw(dev_t dev, struct uio *uio, int flag)
3919 3919 {
3920 3920 int rval = 0;
3921 3921 long len;
3922 3922
3923 3923 GET_SOFT_STATE(dev);
3924 3924
3925 3925 ST_FUNC(ST_DEVINFO, st_rw);
3926 3926
3927 3927 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
3928 3928 "st_rw(dev = 0x%lx, flag = %s)\n", dev,
3929 3929 (flag == B_READ ? rd_str: wr_str));
3930 3930
3931 3931 /* get local copy of transfer length */
3932 3932 len = uio->uio_iov->iov_len;
3933 3933
3934 3934 mutex_enter(ST_MUTEX);
3935 3935
3936 3936 /*
3937 3937 * Clear error entry stack
3938 3938 */
3939 3939 st_empty_error_stack(un);
3940 3940
3941 3941 /*
3942 3942 * If in fixed block size mode and requested read or write
3943 3943 * is not an even multiple of that block size.
3944 3944 */
3945 3945 if ((un->un_bsize != 0) && (len % un->un_bsize != 0)) {
3946 3946 scsi_log(ST_DEVINFO, st_label, CE_WARN,
3947 3947 "%s: not modulo %d block size\n",
3948 3948 (flag == B_WRITE) ? wr_str : rd_str, un->un_bsize);
3949 3949 rval = EINVAL;
3950 3950 }
3951 3951
3952 3952 /* If device has set granularity in the READ_BLKLIM we honor it. */
3953 3953 if ((un->un_data_mod != 0) && (len % un->un_data_mod != 0)) {
3954 3954 scsi_log(ST_DEVINFO, st_label, CE_WARN,
3955 3955 "%s: not modulo %d device granularity\n",
3956 3956 (flag == B_WRITE) ? wr_str : rd_str, un->un_data_mod);
3957 3957 rval = EINVAL;
3958 3958 }
3959 3959
3960 3960 if (st_recov_sz != sizeof (recov_info) && un->un_multipath) {
3961 3961 scsi_log(ST_DEVINFO, st_label, CE_WARN, mp_misconf);
3962 3962 rval = EFAULT;
3963 3963 }
3964 3964
3965 3965 if (rval != 0) {
3966 3966 un->un_errno = rval;
3967 3967 mutex_exit(ST_MUTEX);
3968 3968 return (rval);
3969 3969 }
3970 3970
3971 3971 /*
3972 3972 * Reset this so it can be set if Berkeley and read over a filemark.
3973 3973 */
3974 3974 un->un_silent_skip = 0;
3975 3975 mutex_exit(ST_MUTEX);
3976 3976
3977 3977 len = uio->uio_resid;
3978 3978
3979 3979 rval = physio(st_queued_strategy, (struct buf *)NULL,
3980 3980 dev, flag, st_minphys, uio);
3981 3981 /*
3982 3982 * if we have hit logical EOT during this xfer and there is not a
3983 3983 * full residue, then set eof back to ST_EOM to make sure that
3984 3984 * the user will see at least one zero write
3985 3985 * after this short write
3986 3986 */
3987 3987 mutex_enter(ST_MUTEX);
3988 3988 if (un->un_pos.eof > ST_NO_EOF) {
3989 3989 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
3990 3990 "eof=%d resid=%lx\n", un->un_pos.eof, uio->uio_resid);
3991 3991 }
3992 3992 if (un->un_pos.eof >= ST_EOM && (flag == B_WRITE)) {
3993 3993 if ((uio->uio_resid != len) && (uio->uio_resid != 0)) {
3994 3994 un->un_pos.eof = ST_EOM;
3995 3995 } else if (uio->uio_resid == len) {
3996 3996 un->un_pos.eof = ST_NO_EOF;
3997 3997 }
3998 3998 }
3999 3999
4000 4000 if (un->un_silent_skip && uio->uio_resid != len) {
4001 4001 un->un_pos.eof = ST_EOF;
4002 4002 un->un_pos.blkno = un->un_save_blkno;
4003 4003 un->un_pos.fileno--;
4004 4004 }
4005 4005
4006 4006 un->un_errno = rval;
4007 4007
4008 4008 mutex_exit(ST_MUTEX);
4009 4009
4010 4010 return (rval);
4011 4011 }
4012 4012
4013 4013 static int
4014 4014 st_arw(dev_t dev, struct aio_req *aio, int flag)
4015 4015 {
4016 4016 struct uio *uio = aio->aio_uio;
4017 4017 int rval = 0;
4018 4018 long len;
4019 4019
4020 4020 GET_SOFT_STATE(dev);
4021 4021
4022 4022 ST_FUNC(ST_DEVINFO, st_arw);
4023 4023
4024 4024 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
4025 4025 "st_arw(dev = 0x%lx, flag = %s)\n", dev,
4026 4026 (flag == B_READ ? rd_str: wr_str));
4027 4027
4028 4028 /* get local copy of transfer length */
4029 4029 len = uio->uio_iov->iov_len;
4030 4030
4031 4031 mutex_enter(ST_MUTEX);
4032 4032
4033 4033 /*
4034 4034 * If in fixed block size mode and requested read or write
4035 4035 * is not an even multiple of that block size.
4036 4036 */
4037 4037 if ((un->un_bsize != 0) && (len % un->un_bsize != 0)) {
4038 4038 scsi_log(ST_DEVINFO, st_label, CE_WARN,
4039 4039 "%s: not modulo %d block size\n",
4040 4040 (flag == B_WRITE) ? wr_str : rd_str, un->un_bsize);
4041 4041 rval = EINVAL;
4042 4042 }
4043 4043
4044 4044 /* If device has set granularity in the READ_BLKLIM we honor it. */
4045 4045 if ((un->un_data_mod != 0) && (len % un->un_data_mod != 0)) {
4046 4046 scsi_log(ST_DEVINFO, st_label, CE_WARN,
4047 4047 "%s: not modulo %d device granularity\n",
4048 4048 (flag == B_WRITE) ? wr_str : rd_str, un->un_data_mod);
4049 4049 rval = EINVAL;
4050 4050 }
4051 4051
4052 4052 if (st_recov_sz != sizeof (recov_info) && un->un_multipath) {
4053 4053 scsi_log(ST_DEVINFO, st_label, CE_WARN, mp_misconf);
4054 4054 rval = EFAULT;
4055 4055 }
4056 4056
4057 4057 if (rval != 0) {
4058 4058 un->un_errno = rval;
4059 4059 mutex_exit(ST_MUTEX);
4060 4060 return (rval);
4061 4061 }
4062 4062
4063 4063 mutex_exit(ST_MUTEX);
4064 4064
4065 4065 len = uio->uio_resid;
4066 4066
4067 4067 rval =
4068 4068 aphysio(st_queued_strategy, anocancel, dev, flag, st_minphys, aio);
4069 4069
4070 4070 /*
4071 4071 * if we have hit logical EOT during this xfer and there is not a
4072 4072 * full residue, then set eof back to ST_EOM to make sure that
4073 4073 * the user will see at least one zero write
4074 4074 * after this short write
4075 4075 *
4076 4076 * we keep this here just in case the application is not using
4077 4077 * persistent errors
4078 4078 */
4079 4079 mutex_enter(ST_MUTEX);
4080 4080 if (un->un_pos.eof > ST_NO_EOF) {
4081 4081 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
4082 4082 "eof=%d resid=%lx\n", un->un_pos.eof, uio->uio_resid);
4083 4083 }
4084 4084 if (un->un_pos.eof >= ST_EOM && (flag == B_WRITE)) {
4085 4085 if ((uio->uio_resid != len) && (uio->uio_resid != 0)) {
4086 4086 un->un_pos.eof = ST_EOM;
4087 4087 } else if (uio->uio_resid == len &&
4088 4088 !(un->un_persistence && un->un_persist_errors)) {
4089 4089 un->un_pos.eof = ST_NO_EOF;
4090 4090 }
4091 4091 }
4092 4092 un->un_errno = rval;
4093 4093 mutex_exit(ST_MUTEX);
4094 4094
4095 4095 return (rval);
4096 4096 }
4097 4097
4098 4098
4099 4099
4100 4100 static int
4101 4101 st_queued_strategy(buf_t *bp)
4102 4102 {
4103 4103 struct scsi_tape *un;
4104 4104 char reading = bp->b_flags & B_READ;
4105 4105 int wasopening = 0;
4106 4106
4107 4107 /*
4108 4108 * validate arguments
4109 4109 */
4110 4110 un = ddi_get_soft_state(st_state, MTUNIT(bp->b_edev));
4111 4111 if (un == NULL) {
4112 4112 bp->b_resid = bp->b_bcount;
4113 4113 bioerror(bp, ENXIO);
4114 4114 ST_DEBUG6(NULL, st_label, SCSI_DEBUG,
4115 4115 "st_queued_strategy: ENXIO error exit\n");
4116 4116 biodone(bp);
4117 4117 return (0);
4118 4118 }
4119 4119
4120 4120 ST_ENTR(ST_DEVINFO, st_queued_strategy);
4121 4121
4122 4122 mutex_enter(ST_MUTEX);
4123 4123
4124 4124 while (un->un_pwr_mgmt == ST_PWR_SUSPENDED) {
4125 4125 cv_wait(&un->un_suspend_cv, ST_MUTEX);
4126 4126 }
4127 4127
4128 4128 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
4129 4129 "st_queued_strategy(): bcount=0x%lx, fileno=%d, blkno=%x, eof=%d\n",
4130 4130 bp->b_bcount, un->un_pos.fileno, un->un_pos.blkno, un->un_pos.eof);
4131 4131
4132 4132 /*
4133 4133 * If persistent errors have been flagged, just nix this one. We wait
4134 4134 * for any outstanding I/O's below, so we will be in order.
4135 4135 */
4136 4136 if (un->un_persistence && un->un_persist_errors) {
4137 4137 goto exit;
4138 4138 }
4139 4139
4140 4140 /*
4141 4141 * If last command was non queued, wait till it finishes.
4142 4142 */
4143 4143 while (un->un_sbuf_busy) {
4144 4144 cv_wait(&un->un_sbuf_cv, ST_MUTEX);
4145 4145 /* woke up because of an error */
4146 4146 if (un->un_persistence && un->un_persist_errors) {
4147 4147 goto exit;
4148 4148 }
4149 4149 }
4150 4150
4151 4151 /*
4152 4152 * s_buf and recovery commands shouldn't come here.
4153 4153 */
4154 4154 ASSERT(bp != un->un_recov_buf);
4155 4155 ASSERT(bp != un->un_sbufp);
4156 4156
4157 4157 /*
4158 4158 * If we haven't done/checked reservation on the tape unit
4159 4159 * do it now.
4160 4160 */
4161 4161 if ((un->un_rsvd_status &
4162 4162 (ST_RESERVE | ST_APPLICATION_RESERVATIONS)) == 0) {
4163 4163 if ((un->un_dp->options & ST_NO_RESERVE_RELEASE) == 0) {
4164 4164 if (st_reserve_release(un, ST_RESERVE, st_uscsi_cmd)) {
4165 4165 st_bioerror(bp, un->un_errno);
4166 4166 goto exit;
4167 4167 }
4168 4168 } else if (un->un_state == ST_STATE_OPEN_PENDING_IO) {
4169 4169 /*
4170 4170 * Enter here to restore position for possible
4171 4171 * resets when the device was closed and opened
4172 4172 * in O_NDELAY mode subsequently
4173 4173 */
4174 4174 un->un_state = ST_STATE_INITIALIZING;
4175 4175 (void) st_cmd(un, SCMD_TEST_UNIT_READY,
4176 4176 0, SYNC_CMD);
4177 4177 un->un_state = ST_STATE_OPEN_PENDING_IO;
4178 4178 }
4179 4179 un->un_rsvd_status |= ST_INIT_RESERVE;
4180 4180 }
4181 4181
4182 4182 /*
4183 4183 * If we are offline, we have to initialize everything first.
4184 4184 * This is to handle either when opened with O_NDELAY, or
4185 4185 * we just got a new tape in the drive, after an offline.
4186 4186 * We don't observe O_NDELAY past the open,
4187 4187 * as it will not make sense for tapes.
4188 4188 */
4189 4189 if (un->un_state == ST_STATE_OFFLINE || un->un_restore_pos) {
4190 4190 /*
4191 4191 * reset state to avoid recursion
4192 4192 */
4193 4193 un->un_laststate = un->un_state;
4194 4194 un->un_state = ST_STATE_INITIALIZING;
4195 4195 if (st_tape_init(un)) {
4196 4196 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
4197 4197 "stioctl : OFFLINE init failure ");
4198 4198 un->un_state = ST_STATE_OFFLINE;
4199 4199 un->un_pos.pmode = invalid;
4200 4200 goto b_done_err;
4201 4201 }
4202 4202 /* un_restore_pos make invalid */
4203 4203 un->un_state = ST_STATE_OPEN_PENDING_IO;
4204 4204 un->un_restore_pos = 0;
4205 4205 }
4206 4206 /*
4207 4207 * Check for legal operations
4208 4208 */
4209 4209 if (un->un_pos.pmode == invalid) {
4210 4210 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
4211 4211 "strategy with un->un_pos.pmode invalid\n");
4212 4212 goto b_done_err;
4213 4213 }
4214 4214
4215 4215 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
4216 4216 "st_queued_strategy(): regular io\n");
4217 4217
4218 4218 /*
4219 4219 * Process this first. If we were reading, and we're pending
4220 4220 * logical eot, that means we've bumped one file mark too far.
4221 4221 */
4222 4222
4223 4223 /*
4224 4224 * Recursion warning: st_cmd will route back through here.
4225 4225 * Not anymore st_cmd will go through st_strategy()!
4226 4226 */
4227 4227 if (un->un_pos.eof == ST_EOT_PENDING) {
4228 4228 if (st_cmd(un, SCMD_SPACE, Fmk(-1), SYNC_CMD)) {
4229 4229 un->un_pos.pmode = invalid;
4230 4230 un->un_density_known = 0;
4231 4231 goto b_done_err;
4232 4232 }
4233 4233 un->un_pos.blkno = 0; /* fix up block number.. */
4234 4234 un->un_pos.eof = ST_EOT;
4235 4235 }
4236 4236
4237 4237 /*
4238 4238 * If we are in the process of opening, we may have to
4239 4239 * determine/set the correct density. We also may have
4240 4240 * to do a test_append (if QIC) to see whether we are
4241 4241 * in a position to append to the end of the tape.
4242 4242 *
4243 4243 * If we're already at logical eot, we transition
4244 4244 * to ST_NO_EOF. If we're at physical eot, we punt
4245 4245 * to the switch statement below to handle.
4246 4246 */
4247 4247 if ((un->un_state == ST_STATE_OPEN_PENDING_IO) ||
4248 4248 (un->un_test_append && (un->un_dp->options & ST_QIC))) {
4249 4249
4250 4250 if (un->un_state == ST_STATE_OPEN_PENDING_IO) {
4251 4251 if (st_determine_density(un, (int)reading)) {
4252 4252 goto b_done_err;
4253 4253 }
4254 4254 }
4255 4255
4256 4256 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
4257 4257 "pending_io@fileno %d rw %d qic %d eof %d\n",
4258 4258 un->un_pos.fileno, (int)reading,
4259 4259 (un->un_dp->options & ST_QIC) ? 1 : 0,
4260 4260 un->un_pos.eof);
4261 4261
4262 4262 if (!reading && un->un_pos.eof != ST_EOM) {
4263 4263 if (un->un_pos.eof == ST_EOT) {
4264 4264 un->un_pos.eof = ST_NO_EOF;
4265 4265 } else if (un->un_pos.pmode != invalid &&
4266 4266 (un->un_dp->options & ST_QIC)) {
4267 4267 /*
4268 4268 * st_test_append() will do it all
4269 4269 */
4270 4270 st_test_append(bp);
4271 4271 mutex_exit(ST_MUTEX);
4272 4272 return (0);
4273 4273 }
4274 4274 }
4275 4275 if (un->un_state == ST_STATE_OPEN_PENDING_IO) {
4276 4276 wasopening = 1;
4277 4277 }
4278 4278 un->un_laststate = un->un_state;
4279 4279 un->un_state = ST_STATE_OPEN;
4280 4280 }
4281 4281
4282 4282
4283 4283 /*
4284 4284 * Process rest of END OF FILE and END OF TAPE conditions
4285 4285 */
4286 4286
4287 4287 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
4288 4288 "eof=%x, wasopening=%x\n",
4289 4289 un->un_pos.eof, wasopening);
4290 4290
4291 4291 switch (un->un_pos.eof) {
4292 4292 case ST_EOM:
4293 4293 /*
4294 4294 * This allows writes to proceed past physical
4295 4295 * eot. We'll *really* be in trouble if the
4296 4296 * user continues blindly writing data too
4297 4297 * much past this point (unwind the tape).
4298 4298 * Physical eot really means 'early warning
4299 4299 * eot' in this context.
4300 4300 *
4301 4301 * Every other write from now on will succeed
4302 4302 * (if sufficient tape left).
4303 4303 * This write will return with resid == count
4304 4304 * but the next one should be successful
4305 4305 *
4306 4306 * Note that we only transition to logical EOT
4307 4307 * if the last state wasn't the OPENING state.
4308 4308 * We explicitly prohibit running up to physical
4309 4309 * eot, closing the device, and then re-opening
4310 4310 * to proceed. Trailer records may only be gotten
4311 4311 * at by keeping the tape open after hitting eot.
4312 4312 *
4313 4313 * Also note that ST_EOM cannot be set by reading-
4314 4314 * this can only be set during writing. Reading
4315 4315 * up to the end of the tape gets a blank check
4316 4316 * or a double-filemark indication (ST_EOT_PENDING),
4317 4317 * and we prohibit reading after that point.
4318 4318 *
4319 4319 */
4320 4320 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG, "EOM\n");
4321 4321 if (wasopening == 0) {
4322 4322 /*
4323 4323 * this allows st_rw() to reset it back to
4324 4324 * will see a zero write
4325 4325 */
4326 4326 un->un_pos.eof = ST_WRITE_AFTER_EOM;
4327 4327 }
4328 4328 un->un_status = SUN_KEY_EOT;
4329 4329 goto b_done;
4330 4330
4331 4331 case ST_WRITE_AFTER_EOM:
4332 4332 case ST_EOT:
4333 4333 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG, "EOT\n");
4334 4334 un->un_status = SUN_KEY_EOT;
4335 4335 if (SVR4_BEHAVIOR && reading) {
4336 4336 goto b_done_err;
4337 4337 }
4338 4338
4339 4339 if (reading) {
4340 4340 goto b_done;
4341 4341 }
4342 4342 un->un_pos.eof = ST_NO_EOF;
4343 4343 break;
4344 4344
4345 4345 case ST_EOF_PENDING:
4346 4346 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
4347 4347 "EOF PENDING\n");
4348 4348 un->un_status = SUN_KEY_EOF;
4349 4349 if (SVR4_BEHAVIOR) {
4350 4350 un->un_pos.eof = ST_EOF;
4351 4351 goto b_done;
4352 4352 }
4353 4353 /* FALLTHROUGH */
4354 4354 case ST_EOF:
4355 4355 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG, "EOF\n");
4356 4356 un->un_status = SUN_KEY_EOF;
4357 4357 if (SVR4_BEHAVIOR) {
4358 4358 goto b_done_err;
4359 4359 }
4360 4360
4361 4361 if (BSD_BEHAVIOR) {
4362 4362 un->un_pos.eof = ST_NO_EOF;
4363 4363 un->un_pos.fileno += 1;
4364 4364 un->un_pos.blkno = 0;
4365 4365 }
4366 4366
4367 4367 if (reading) {
4368 4368 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
4369 4369 "now file %d (read)\n",
4370 4370 un->un_pos.fileno);
4371 4371 goto b_done;
4372 4372 }
4373 4373 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
4374 4374 "now file %d (write)\n", un->un_pos.fileno);
4375 4375 break;
4376 4376 default:
4377 4377 un->un_status = 0;
4378 4378 break;
4379 4379 }
4380 4380
4381 4381 bp->b_flags &= ~(B_DONE);
4382 4382 st_bioerror(bp, 0);
4383 4383 bp->av_forw = NULL;
4384 4384 bp->b_resid = 0;
4385 4385 SET_BP_PKT(bp, 0);
4386 4386
4387 4387
4388 4388 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
4389 4389 "st_queued_strategy: cmd=0x%p count=%ld resid=%ld flags=0x%x"
4390 4390 " pkt=0x%p\n",
4391 4391 (void *)bp->b_forw, bp->b_bcount,
4392 4392 bp->b_resid, bp->b_flags, (void *)BP_PKT(bp));
4393 4393
4394 4394 #ifdef __x86
4395 4395 /*
4396 4396 * We will replace bp with a new bp that can do big blk xfer
4397 4397 * if the requested xfer size is bigger than un->un_maxdma_arch
4398 4398 *
4399 4399 * Also, we need to make sure that we're handling real I/O
4400 4400 * by checking group 0/1 SCSI I/O commands, if needed
4401 4401 */
4402 4402 if (bp->b_bcount > un->un_maxdma_arch &&
4403 4403 ((uchar_t)(uintptr_t)bp->b_forw == SCMD_READ ||
4404 4404 (uchar_t)(uintptr_t)bp->b_forw == SCMD_READ_G4 ||
4405 4405 (uchar_t)(uintptr_t)bp->b_forw == SCMD_WRITE ||
4406 4406 (uchar_t)(uintptr_t)bp->b_forw == SCMD_WRITE_G4)) {
4407 4407 mutex_exit(ST_MUTEX);
4408 4408 bp = st_get_bigblk_bp(bp);
4409 4409 mutex_enter(ST_MUTEX);
4410 4410 }
4411 4411 #endif
4412 4412
4413 4413 /* put on wait queue */
4414 4414 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
4415 4415 "st_queued_strategy: un->un_quef = 0x%p, bp = 0x%p\n",
4416 4416 (void *)un->un_quef, (void *)bp);
4417 4417
4418 4418 st_add_to_queue(&un->un_quef, &un->un_quel, un->un_quel, bp);
4419 4419
4420 4420 ST_DO_KSTATS(bp, kstat_waitq_enter);
4421 4421
4422 4422 st_start(un);
4423 4423
4424 4424 mutex_exit(ST_MUTEX);
4425 4425 return (0);
4426 4426
4427 4427 b_done_err:
4428 4428 st_bioerror(bp, EIO);
4429 4429 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
4430 4430 "st_queued_strategy : EIO b_done_err\n");
4431 4431
4432 4432 b_done:
4433 4433 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
4434 4434 "st_queued_strategy: b_done\n");
4435 4435
4436 4436 exit:
4437 4437 /*
4438 4438 * make sure no commands are outstanding or waiting before closing,
4439 4439 * so we can guarantee order
4440 4440 */
4441 4441 st_wait_for_io(un);
4442 4442 un->un_err_resid = bp->b_resid = bp->b_bcount;
4443 4443
4444 4444 /* override errno here, if persistent errors were flagged */
4445 4445 if (un->un_persistence && un->un_persist_errors)
4446 4446 bioerror(bp, un->un_errno);
4447 4447
4448 4448 mutex_exit(ST_MUTEX);
4449 4449
4450 4450 biodone(bp);
4451 4451 ASSERT(mutex_owned(ST_MUTEX) == 0);
4452 4452 return (0);
4453 4453 }
4454 4454
4455 4455
4456 4456 static int
4457 4457 st_strategy(struct buf *bp)
4458 4458 {
4459 4459 struct scsi_tape *un;
4460 4460
4461 4461 /*
4462 4462 * validate arguments
4463 4463 */
4464 4464 un = ddi_get_soft_state(st_state, MTUNIT(bp->b_edev));
4465 4465 if (un == NULL) {
4466 4466 bp->b_resid = bp->b_bcount;
4467 4467 bioerror(bp, ENXIO);
4468 4468 ST_DEBUG6(NULL, st_label, SCSI_DEBUG,
4469 4469 "st_strategy: ENXIO error exit\n");
4470 4470
4471 4471 biodone(bp);
4472 4472 return (0);
4473 4473
4474 4474 }
4475 4475
4476 4476 ST_ENTR(ST_DEVINFO, st_strategy);
4477 4477
4478 4478 mutex_enter(ST_MUTEX);
4479 4479
4480 4480 while (un->un_pwr_mgmt == ST_PWR_SUSPENDED) {
4481 4481 cv_wait(&un->un_suspend_cv, ST_MUTEX);
4482 4482 }
4483 4483
4484 4484 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
4485 4485 "st_strategy(): bcount=0x%lx, fileno=%d, blkno=%x, eof=%d\n",
4486 4486 bp->b_bcount, un->un_pos.fileno, un->un_pos.blkno, un->un_pos.eof);
4487 4487
4488 4488 ASSERT((bp == un->un_recov_buf) || (bp == un->un_sbufp));
4489 4489
4490 4490 bp->b_flags &= ~(B_DONE);
4491 4491 st_bioerror(bp, 0);
4492 4492 bp->av_forw = NULL;
4493 4493 bp->b_resid = 0;
4494 4494 SET_BP_PKT(bp, 0);
4495 4495
4496 4496
4497 4497 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
4498 4498 "st_strategy: cmd=0x%x count=%ld resid=%ld flags=0x%x"
4499 4499 " pkt=0x%p\n",
4500 4500 (unsigned char)(uintptr_t)bp->b_forw, bp->b_bcount,
4501 4501 bp->b_resid, bp->b_flags, (void *)BP_PKT(bp));
4502 4502 ST_DO_KSTATS(bp, kstat_waitq_enter);
4503 4503
4504 4504 st_start(un);
4505 4505
4506 4506 mutex_exit(ST_MUTEX);
4507 4507 return (0);
4508 4508 }
4509 4509
4510 4510 /*
4511 4511 * this routine spaces forward over filemarks
4512 4512 */
4513 4513 static int
4514 4514 st_space_fmks(struct scsi_tape *un, int64_t count)
4515 4515 {
4516 4516 int rval = 0;
4517 4517
4518 4518 ST_FUNC(ST_DEVINFO, st_space_fmks);
4519 4519
4520 4520 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
4521 4521 "st_space_fmks(dev = 0x%lx, count = %"PRIx64")\n",
4522 4522 un->un_dev, count);
4523 4523
4524 4524 ASSERT(mutex_owned(ST_MUTEX));
4525 4525
4526 4526 /*
4527 4527 * the risk with doing only one space operation is that we
4528 4528 * may accidentily jump in old data
4529 4529 * the exabyte 8500 reading 8200 tapes cannot use KNOWS_EOD
4530 4530 * because the 8200 does not append a marker; in order not to
4531 4531 * sacrifice the fast file skip, we do a slow skip if the low
4532 4532 * density device has been opened
4533 4533 */
4534 4534
4535 4535 if ((un->un_dp->options & ST_KNOWS_EOD) &&
4536 4536 !((un->un_dp->type == ST_TYPE_EXB8500 &&
4537 4537 MT_DENSITY(un->un_dev) == 0))) {
4538 4538 if (st_cmd(un, SCMD_SPACE, Fmk(count), SYNC_CMD)) {
4539 4539 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
4540 4540 "space_fmks : EIO can't do space cmd #1\n");
4541 4541 rval = EIO;
4542 4542 }
4543 4543 } else {
4544 4544 while (count > 0) {
4545 4545 if (st_cmd(un, SCMD_SPACE, Fmk(1), SYNC_CMD)) {
4546 4546 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
4547 4547 "space_fmks : EIO can't do space cmd #2\n");
4548 4548 rval = EIO;
4549 4549 break;
4550 4550 }
4551 4551 count -= 1;
4552 4552 /*
4553 4553 * read a block to see if we have reached
4554 4554 * end of medium (double filemark for reel or
4555 4555 * medium error for others)
4556 4556 */
4557 4557 if (count > 0) {
4558 4558 if (st_cmd(un, SCMD_SPACE, Blk(1), SYNC_CMD)) {
4559 4559 ST_DEBUG2(ST_DEVINFO, st_label,
4560 4560 SCSI_DEBUG,
4561 4561 "space_fmks : EIO can't do "
4562 4562 "space cmd #3\n");
4563 4563 rval = EIO;
4564 4564 break;
4565 4565 }
4566 4566 if ((un->un_pos.eof >= ST_EOF_PENDING) &&
4567 4567 (un->un_dp->options & ST_REEL)) {
4568 4568 un->un_status = SUN_KEY_EOT;
4569 4569 ST_DEBUG2(ST_DEVINFO, st_label,
4570 4570 SCSI_DEBUG,
4571 4571 "space_fmks : EIO ST_REEL\n");
4572 4572 rval = EIO;
4573 4573 break;
4574 4574 } else if (IN_EOF(un->un_pos)) {
4575 4575 un->un_pos.eof = ST_NO_EOF;
4576 4576 un->un_pos.fileno++;
4577 4577 un->un_pos.blkno = 0;
4578 4578 count--;
4579 4579 } else if (un->un_pos.eof > ST_EOF) {
4580 4580 ST_DEBUG2(ST_DEVINFO, st_label,
4581 4581 SCSI_DEBUG,
4582 4582 "space_fmks, EIO > ST_EOF\n");
4583 4583 rval = EIO;
4584 4584 break;
4585 4585 }
4586 4586
4587 4587 }
4588 4588 }
4589 4589 un->un_err_resid = count;
4590 4590 COPY_POS(&un->un_pos, &un->un_err_pos);
4591 4591 }
4592 4592 ASSERT(mutex_owned(ST_MUTEX));
4593 4593 return (rval);
4594 4594 }
4595 4595
4596 4596 /*
4597 4597 * this routine spaces to EOD
4598 4598 *
4599 4599 * it keeps track of the current filenumber and returns the filenumber after
4600 4600 * the last successful space operation, we keep the number high because as
4601 4601 * tapes are getting larger, the possibility of more and more files exist,
4602 4602 * 0x100000 (1 Meg of files) probably will never have to be changed any time
4603 4603 * soon
4604 4604 */
4605 4605 #define MAX_SKIP 0x100000 /* somewhat arbitrary */
4606 4606
4607 4607 static int
4608 4608 st_find_eod(struct scsi_tape *un)
4609 4609 {
4610 4610 tapepos_t savepos;
4611 4611 int64_t sp_type;
4612 4612 int result;
4613 4613
4614 4614 if (un == NULL) {
4615 4615 return (-1);
4616 4616 }
4617 4617
4618 4618 ST_FUNC(ST_DEVINFO, st_find_eod);
4619 4619
4620 4620 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
4621 4621 "st_find_eod(dev = 0x%lx): fileno = %d\n", un->un_dev,
4622 4622 un->un_pos.fileno);
4623 4623
4624 4624 ASSERT(mutex_owned(ST_MUTEX));
4625 4625
4626 4626 COPY_POS(&savepos, &un->un_pos);
4627 4627
4628 4628 /*
4629 4629 * see if the drive is smart enough to do the skips in
4630 4630 * one operation; 1/2" use two filemarks
4631 4631 * the exabyte 8500 reading 8200 tapes cannot use KNOWS_EOD
4632 4632 * because the 8200 does not append a marker; in order not to
4633 4633 * sacrifice the fast file skip, we do a slow skip if the low
4634 4634 * density device has been opened
4635 4635 */
4636 4636 if ((un->un_dp->options & ST_KNOWS_EOD) != 0) {
4637 4637 if ((un->un_dp->type == ST_TYPE_EXB8500) &&
4638 4638 (MT_DENSITY(un->un_dev) == 0)) {
4639 4639 sp_type = Fmk(1);
4640 4640 } else if (un->un_pos.pmode == logical) {
4641 4641 sp_type = SPACE(SP_EOD, 0);
4642 4642 } else {
4643 4643 sp_type = Fmk(MAX_SKIP);
4644 4644 }
4645 4645 } else {
4646 4646 sp_type = Fmk(1);
4647 4647 }
4648 4648
4649 4649 for (;;) {
4650 4650 result = st_cmd(un, SCMD_SPACE, sp_type, SYNC_CMD);
4651 4651
4652 4652 if (result == 0) {
4653 4653 COPY_POS(&savepos, &un->un_pos);
4654 4654 }
4655 4655
4656 4656 if (sp_type == SPACE(SP_EOD, 0)) {
4657 4657 if (result != 0) {
4658 4658 sp_type = Fmk(MAX_SKIP);
4659 4659 continue;
4660 4660 }
4661 4661
4662 4662 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
4663 4663 "st_find_eod: 0x%"PRIx64"\n",
4664 4664 savepos.lgclblkno);
4665 4665 /*
4666 4666 * What we return will become the current file position.
4667 4667 * After completing the space command with the position
4668 4668 * mode that is not invalid a read position command will
4669 4669 * be automaticly issued. If the drive support the long
4670 4670 * read position format a valid file position can be
4671 4671 * returned.
4672 4672 */
4673 4673 return (un->un_pos.fileno);
4674 4674 }
4675 4675
4676 4676 if (result != 0) {
4677 4677 break;
4678 4678 }
4679 4679
4680 4680 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
4681 4681 "count=%"PRIx64", eof=%x, status=%x\n",
4682 4682 SPACE_CNT(sp_type), un->un_pos.eof, un->un_status);
4683 4683
4684 4684 /*
4685 4685 * If we're not EOM smart, space a record
4686 4686 * to see whether we're now in the slot between
4687 4687 * the two sequential filemarks that logical
4688 4688 * EOM consists of (REEL) or hit nowhere land
4689 4689 * (8mm).
4690 4690 */
4691 4691 if (sp_type == Fmk(1)) {
4692 4692 /*
4693 4693 * no fast skipping, check a record
4694 4694 */
4695 4695 if (st_cmd(un, SCMD_SPACE, Blk((1)), SYNC_CMD)) {
4696 4696 break;
4697 4697 }
4698 4698 if ((un->un_pos.eof >= ST_EOF_PENDING) &&
4699 4699 (un->un_dp->options & ST_REEL)) {
4700 4700 un->un_status = KEY_BLANK_CHECK;
4701 4701 un->un_pos.fileno++;
4702 4702 un->un_pos.blkno = 0;
4703 4703 break;
4704 4704 }
4705 4705 if (IN_EOF(un->un_pos)) {
4706 4706 un->un_pos.eof = ST_NO_EOF;
4707 4707 un->un_pos.fileno++;
4708 4708 un->un_pos.blkno = 0;
4709 4709 }
4710 4710 if (un->un_pos.eof > ST_EOF) {
4711 4711 break;
4712 4712 }
4713 4713 } else {
4714 4714 if (un->un_pos.eof > ST_EOF) {
4715 4715 break;
4716 4716 }
4717 4717 }
4718 4718 }
4719 4719
4720 4720 if (un->un_dp->options & ST_KNOWS_EOD) {
4721 4721 COPY_POS(&savepos, &un->un_pos);
4722 4722 }
4723 4723
4724 4724 ASSERT(mutex_owned(ST_MUTEX));
4725 4725
4726 4726 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
4727 4727 "st_find_eod: %x\n", savepos.fileno);
4728 4728 return (savepos.fileno);
4729 4729 }
4730 4730
4731 4731
4732 4732 /*
4733 4733 * this routine is frequently used in ioctls below;
4734 4734 * it determines whether we know the density and if not will
4735 4735 * determine it
4736 4736 * if we have written the tape before, one or more filemarks are written
4737 4737 *
4738 4738 * depending on the stepflag, the head is repositioned to where it was before
4739 4739 * the filemarks were written in order not to confuse step counts
4740 4740 */
4741 4741 #define STEPBACK 0
4742 4742 #define NO_STEPBACK 1
4743 4743
4744 4744 static int
4745 4745 st_check_density_or_wfm(dev_t dev, int wfm, int mode, int stepflag)
4746 4746 {
4747 4747
4748 4748 GET_SOFT_STATE(dev);
4749 4749
4750 4750 ST_FUNC(ST_DEVINFO, st_check_density_or_wfm);
4751 4751
4752 4752 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
4753 4753 "st_check_density_or_wfm(dev= 0x%lx, wfm= %d, mode= %d, stpflg= %d)"
4754 4754 "\n", dev, wfm, mode, stepflag);
4755 4755
4756 4756 ASSERT(mutex_owned(ST_MUTEX));
4757 4757
4758 4758 /*
4759 4759 * If we don't yet know the density of the tape we have inserted,
4760 4760 * we have to either unconditionally set it (if we're 'writing'),
4761 4761 * or we have to determine it. As side effects, check for any
4762 4762 * write-protect errors, and for the need to put out any file-marks
4763 4763 * before positioning a tape.
4764 4764 *
4765 4765 * If we are going to be spacing forward, and we haven't determined
4766 4766 * the tape density yet, we have to do so now...
4767 4767 */
4768 4768 if (un->un_state == ST_STATE_OPEN_PENDING_IO) {
4769 4769 if (st_determine_density(un, mode)) {
4770 4770 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
4771 4771 "check_density_or_wfm : EIO can't determine "
4772 4772 "density\n");
4773 4773 un->un_errno = EIO;
4774 4774 return (EIO);
4775 4775 }
4776 4776 /*
4777 4777 * Presumably we are at BOT. If we attempt to write, it will
4778 4778 * either work okay, or bomb. We don't do a st_test_append
4779 4779 * unless we're past BOT.
4780 4780 */
4781 4781 un->un_laststate = un->un_state;
4782 4782 un->un_state = ST_STATE_OPEN;
4783 4783
4784 4784 } else if (un->un_pos.pmode != invalid && un->un_fmneeded > 0 &&
4785 4785 ((un->un_lastop == ST_OP_WEOF && wfm) ||
4786 4786 (un->un_lastop == ST_OP_WRITE && wfm))) {
4787 4787
4788 4788 tapepos_t spos;
4789 4789
4790 4790 COPY_POS(&spos, &un->un_pos);
4791 4791
4792 4792 /*
4793 4793 * We need to write one or two filemarks.
4794 4794 * In the case of the HP, we need to
4795 4795 * position the head between the two
4796 4796 * marks.
4797 4797 */
4798 4798 if ((un->un_fmneeded > 0) || (un->un_lastop == ST_OP_WEOF)) {
4799 4799 wfm = un->un_fmneeded;
4800 4800 un->un_fmneeded = 0;
4801 4801 }
4802 4802
4803 4803 if (st_write_fm(dev, wfm)) {
4804 4804 un->un_pos.pmode = invalid;
4805 4805 un->un_density_known = 0;
4806 4806 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
4807 4807 "check_density_or_wfm : EIO can't write fm\n");
4808 4808 un->un_errno = EIO;
4809 4809 return (EIO);
4810 4810 }
4811 4811
4812 4812 if (stepflag == STEPBACK) {
4813 4813 if (st_cmd(un, SCMD_SPACE, Fmk(-wfm), SYNC_CMD)) {
4814 4814 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
4815 4815 "check_density_or_wfm : EIO can't space "
4816 4816 "(-wfm)\n");
4817 4817 un->un_errno = EIO;
4818 4818 return (EIO);
4819 4819 }
4820 4820 COPY_POS(&un->un_pos, &spos);
4821 4821 }
4822 4822 }
4823 4823
4824 4824 /*
4825 4825 * Whatever we do at this point clears the state of the eof flag.
4826 4826 */
4827 4827
4828 4828 un->un_pos.eof = ST_NO_EOF;
4829 4829
4830 4830 /*
4831 4831 * If writing, let's check that we're positioned correctly
4832 4832 * at the end of tape before issuing the next write.
4833 4833 */
4834 4834 if (un->un_read_only == RDWR) {
4835 4835 un->un_test_append = 1;
4836 4836 }
4837 4837
4838 4838 ASSERT(mutex_owned(ST_MUTEX));
4839 4839 return (0);
4840 4840 }
4841 4841
4842 4842
4843 4843 /*
4844 4844 * Wait for all outstaning I/O's to complete
4845 4845 *
4846 4846 * we wait on both ncmds and the wait queue for times when we are flushing
4847 4847 * after persistent errors are flagged, which is when ncmds can be 0, and the
4848 4848 * queue can still have I/O's. This way we preserve order of biodone's.
4849 4849 */
4850 4850 static void
4851 4851 st_wait_for_io(struct scsi_tape *un)
4852 4852 {
4853 4853 ST_FUNC(ST_DEVINFO, st_wait_for_io);
4854 4854 ASSERT(mutex_owned(ST_MUTEX));
4855 4855 while ((un->un_ncmds) || (un->un_quef) || (un->un_runqf)) {
4856 4856 cv_wait(&un->un_queue_cv, ST_MUTEX);
4857 4857 }
4858 4858 }
4859 4859
4860 4860 /*
4861 4861 * This routine implements the ioctl calls. It is called
4862 4862 * from the device switch at normal priority.
4863 4863 */
4864 4864 /*ARGSUSED*/
4865 4865 static int
4866 4866 st_ioctl(dev_t dev, int cmd, intptr_t arg, int flag, cred_t *cred_p,
4867 4867 int *rval_p)
4868 4868 {
4869 4869 int tmp, rval = 0;
4870 4870
4871 4871 GET_SOFT_STATE(dev);
4872 4872
4873 4873 ST_ENTR(ST_DEVINFO, st_ioctl);
4874 4874
4875 4875 mutex_enter(ST_MUTEX);
4876 4876
4877 4877 ASSERT(un->un_recov_buf_busy == 0);
4878 4878
4879 4879 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
4880 4880 "st_ioctl(): fileno=%x, blkno=%x, eof=%x, state = %d, "
4881 4881 "pe_flag = %d\n",
4882 4882 un->un_pos.fileno, un->un_pos.blkno, un->un_pos.eof, un->un_state,
4883 4883 un->un_persistence && un->un_persist_errors);
4884 4884
4885 4885 /*
4886 4886 * We don't want to block on these, so let them through
4887 4887 * and we don't care about setting driver states here.
4888 4888 */
4889 4889 if ((cmd == MTIOCGETDRIVETYPE) ||
4890 4890 (cmd == MTIOCGUARANTEEDORDER) ||
4891 4891 (cmd == MTIOCPERSISTENTSTATUS)) {
4892 4892 goto check_commands;
4893 4893 }
4894 4894
4895 4895 /*
4896 4896 * We clear error entry stack except command
4897 4897 * MTIOCGETERROR and MTIOCGET
4898 4898 */
4899 4899 if ((cmd != MTIOCGETERROR) &&
4900 4900 (cmd != MTIOCGET)) {
4901 4901 st_empty_error_stack(un);
4902 4902 }
4903 4903
4904 4904 /*
4905 4905 * wait for all outstanding commands to complete, or be dequeued.
4906 4906 * And because ioctl's are synchronous commands, any return value
4907 4907 * after this, will be in order
4908 4908 */
4909 4909 st_wait_for_io(un);
4910 4910
4911 4911 /*
4912 4912 * allow only a through clear errors and persistent status, and
4913 4913 * status
4914 4914 */
4915 4915 if (un->un_persistence && un->un_persist_errors) {
4916 4916 if ((cmd == MTIOCLRERR) ||
4917 4917 (cmd == MTIOCPERSISTENT) ||
4918 4918 (cmd == MTIOCGET)) {
4919 4919 goto check_commands;
4920 4920 } else {
4921 4921 rval = un->un_errno;
4922 4922 goto exit;
4923 4923 }
4924 4924 }
4925 4925
4926 4926 ASSERT(un->un_throttle != 0);
4927 4927 un->un_throttle = 1; /* > 1 will never happen here */
4928 4928 un->un_errno = 0; /* start clean from here */
4929 4929
4930 4930 /*
4931 4931 * first and foremost, handle any ST_EOT_PENDING cases.
4932 4932 * That is, if a logical eot is pending notice, notice it.
4933 4933 */
4934 4934 if (un->un_pos.eof == ST_EOT_PENDING) {
4935 4935 int resid = un->un_err_resid;
4936 4936 uchar_t status = un->un_status;
4937 4937 uchar_t lastop = un->un_lastop;
4938 4938
4939 4939 if (st_cmd(un, SCMD_SPACE, Fmk(-1), SYNC_CMD)) {
4940 4940 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
4941 4941 "stioctl : EIO can't space fmk(-1)\n");
4942 4942 rval = EIO;
4943 4943 goto exit;
4944 4944 }
4945 4945 un->un_lastop = lastop; /* restore last operation */
4946 4946 if (status == SUN_KEY_EOF) {
4947 4947 un->un_status = SUN_KEY_EOT;
4948 4948 } else {
4949 4949 un->un_status = status;
4950 4950 }
4951 4951 un->un_err_resid = resid;
4952 4952 /* fix up block number */
4953 4953 un->un_err_pos.blkno = un->un_pos.blkno = 0;
4954 4954 /* now we're at logical eot */
4955 4955 un->un_pos.eof = ST_EOT;
4956 4956 }
4957 4957
4958 4958 /*
4959 4959 * now, handle the rest of the situations
4960 4960 */
4961 4961 check_commands:
4962 4962 switch (cmd) {
4963 4963 case MTIOCGET:
4964 4964 {
4965 4965 #ifdef _MULTI_DATAMODEL
4966 4966 /*
4967 4967 * For use when a 32 bit app makes a call into a
4968 4968 * 64 bit ioctl
4969 4969 */
4970 4970 struct mtget32 mtg_local32;
4971 4971 struct mtget32 *mtget_32 = &mtg_local32;
4972 4972 #endif /* _MULTI_DATAMODEL */
4973 4973
4974 4974 /* Get tape status */
4975 4975 struct mtget mtg_local;
4976 4976 struct mtget *mtget = &mtg_local;
4977 4977 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
4978 4978 "st_ioctl: MTIOCGET\n");
4979 4979
4980 4980 bzero((caddr_t)mtget, sizeof (struct mtget));
4981 4981 mtget->mt_erreg = un->un_status;
4982 4982 mtget->mt_resid = un->un_err_resid;
4983 4983 mtget->mt_dsreg = un->un_retry_ct;
4984 4984 if (un->un_err_pos.pmode == legacy) {
4985 4985 mtget->mt_fileno = un->un_err_pos.fileno;
4986 4986 } else {
4987 4987 mtget->mt_fileno = -1;
4988 4988 }
4989 4989 /*
4990 4990 * If the value is positive fine.
4991 4991 * If its negative we need to return a value based on the
4992 4992 * old way if counting backwards from INF (1,000,000,000).
4993 4993 */
4994 4994 if (un->un_err_pos.blkno >= 0) {
4995 4995 mtget->mt_blkno = un->un_err_pos.blkno;
4996 4996 } else {
4997 4997 mtget->mt_blkno = INF + 1 - (-un->un_err_pos.blkno);
4998 4998 }
4999 4999 mtget->mt_type = un->un_dp->type;
5000 5000 mtget->mt_flags = MTF_SCSI | MTF_ASF;
5001 5001 if (un->un_read_pos_type != NO_POS) {
5002 5002 mtget->mt_flags |= MTF_LOGICAL_BLOCK;
5003 5003 }
5004 5004 if (un->un_dp->options & ST_REEL) {
5005 5005 mtget->mt_flags |= MTF_REEL;
5006 5006 mtget->mt_bf = 20;
5007 5007 } else { /* 1/4" cartridges */
5008 5008 switch (mtget->mt_type) {
5009 5009 /* Emulex cartridge tape */
5010 5010 case MT_ISMT02:
5011 5011 mtget->mt_bf = 40;
5012 5012 break;
5013 5013 default:
5014 5014 mtget->mt_bf = 126;
5015 5015 break;
5016 5016 }
5017 5017 }
5018 5018
5019 5019 /*
5020 5020 * If large transfers are allowed and drive options
5021 5021 * has no record size limit set. Calculate blocking
5022 5022 * factor from the lesser of maxbsize and maxdma.
5023 5023 */
5024 5024 if ((un->un_allow_large_xfer) &&
5025 5025 (un->un_dp->options & ST_NO_RECSIZE_LIMIT)) {
5026 5026 mtget->mt_bf = min(un->un_maxbsize,
5027 5027 un->un_maxdma) / SECSIZE;
5028 5028 }
5029 5029
5030 5030 if (un->un_read_only == WORM ||
5031 5031 un->un_read_only == RDWORM) {
5032 5032 mtget->mt_flags |= MTF_WORM_MEDIA;
5033 5033 }
5034 5034
5035 5035 /*
5036 5036 * In persistent error mode sending a non-queued can hang
5037 5037 * because this ioctl gets to be run without turning off
5038 5038 * persistense. Fake the answer based on previous info.
5039 5039 */
5040 5040 if (un->un_persistence) {
5041 5041 rval = 0;
5042 5042 } else {
5043 5043 rval = st_check_clean_bit(un);
5044 5044 }
5045 5045 if (rval == 0) {
5046 5046 /*
5047 5047 * If zero is returned or in persistent mode,
5048 5048 * use the old data.
5049 5049 */
5050 5050 if ((un->un_HeadClean & (TAPE_ALERT_SUPPORTED |
5051 5051 TAPE_SEQUENTIAL_SUPPORTED|TAPE_ALERT_NOT_SUPPORTED))
5052 5052 != TAPE_ALERT_NOT_SUPPORTED) {
5053 5053 mtget->mt_flags |= MTF_TAPE_CLN_SUPPORTED;
5054 5054 }
5055 5055 if (un->un_HeadClean & (TAPE_PREVIOUSLY_DIRTY |
5056 5056 TAPE_ALERT_STILL_DIRTY)) {
5057 5057 mtget->mt_flags |= MTF_TAPE_HEAD_DIRTY;
5058 5058 }
5059 5059 } else {
5060 5060 mtget->mt_flags |= (ushort_t)rval;
5061 5061 rval = 0;
5062 5062 }
5063 5063
5064 5064 un->un_status = 0; /* Reset status */
5065 5065 un->un_err_resid = 0;
5066 5066 tmp = sizeof (struct mtget);
5067 5067
5068 5068 #ifdef _MULTI_DATAMODEL
5069 5069
5070 5070 switch (ddi_model_convert_from(flag & FMODELS)) {
5071 5071 case DDI_MODEL_ILP32:
5072 5072 /*
5073 5073 * Convert 64 bit back to 32 bit before doing
5074 5074 * copyout. This is what the ILP32 app expects.
5075 5075 */
5076 5076 mtget_32->mt_erreg = mtget->mt_erreg;
5077 5077 mtget_32->mt_resid = mtget->mt_resid;
5078 5078 mtget_32->mt_dsreg = mtget->mt_dsreg;
5079 5079 mtget_32->mt_fileno = (daddr32_t)mtget->mt_fileno;
5080 5080 mtget_32->mt_blkno = (daddr32_t)mtget->mt_blkno;
5081 5081 mtget_32->mt_type = mtget->mt_type;
5082 5082 mtget_32->mt_flags = mtget->mt_flags;
5083 5083 mtget_32->mt_bf = mtget->mt_bf;
5084 5084
5085 5085 if (ddi_copyout(mtget_32, (void *)arg,
5086 5086 sizeof (struct mtget32), flag)) {
5087 5087 rval = EFAULT;
5088 5088 }
5089 5089 break;
5090 5090
5091 5091 case DDI_MODEL_NONE:
5092 5092 if (ddi_copyout(mtget, (void *)arg, tmp, flag)) {
5093 5093 rval = EFAULT;
5094 5094 }
5095 5095 break;
5096 5096 }
5097 5097 #else /* ! _MULTI_DATAMODE */
5098 5098 if (ddi_copyout(mtget, (void *)arg, tmp, flag)) {
5099 5099 rval = EFAULT;
5100 5100 }
5101 5101 #endif /* _MULTI_DATAMODE */
5102 5102
5103 5103 break;
5104 5104 }
5105 5105 case MTIOCGETERROR:
5106 5106 /*
5107 5107 * get error entry from error stack
5108 5108 */
5109 5109 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
5110 5110 "st_ioctl: MTIOCGETERROR\n");
5111 5111
5112 5112 rval = st_get_error_entry(un, arg, flag);
5113 5113
5114 5114 break;
5115 5115
5116 5116 case MTIOCSTATE:
5117 5117 {
5118 5118 /*
5119 5119 * return when media presence matches state
5120 5120 */
5121 5121 enum mtio_state state;
5122 5122
5123 5123 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
5124 5124 "st_ioctl: MTIOCSTATE\n");
5125 5125
5126 5126 if (ddi_copyin((void *)arg, &state, sizeof (int), flag))
5127 5127 rval = EFAULT;
5128 5128
5129 5129 mutex_exit(ST_MUTEX);
5130 5130
5131 5131 rval = st_check_media(dev, state);
5132 5132
5133 5133 mutex_enter(ST_MUTEX);
5134 5134
5135 5135 if (rval != 0) {
5136 5136 break;
5137 5137 }
5138 5138
5139 5139 if (ddi_copyout(&un->un_mediastate, (void *)arg,
5140 5140 sizeof (int), flag))
5141 5141 rval = EFAULT;
5142 5142 break;
5143 5143
5144 5144 }
5145 5145
5146 5146 case MTIOCGETDRIVETYPE:
5147 5147 {
5148 5148 #ifdef _MULTI_DATAMODEL
5149 5149 /*
5150 5150 * For use when a 32 bit app makes a call into a
5151 5151 * 64 bit ioctl
5152 5152 */
5153 5153 struct mtdrivetype_request32 mtdtrq32;
5154 5154 #endif /* _MULTI_DATAMODEL */
5155 5155
5156 5156 /*
5157 5157 * return mtdrivetype
5158 5158 */
5159 5159 struct mtdrivetype_request mtdtrq;
5160 5160 struct mtdrivetype mtdrtyp;
5161 5161 struct mtdrivetype *mtdt = &mtdrtyp;
5162 5162 struct st_drivetype *stdt = un->un_dp;
5163 5163
5164 5164 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
5165 5165 "st_ioctl: MTIOCGETDRIVETYPE\n");
5166 5166
5167 5167 #ifdef _MULTI_DATAMODEL
5168 5168 switch (ddi_model_convert_from(flag & FMODELS)) {
5169 5169 case DDI_MODEL_ILP32:
5170 5170 {
5171 5171 if (ddi_copyin((void *)arg, &mtdtrq32,
5172 5172 sizeof (struct mtdrivetype_request32), flag)) {
5173 5173 rval = EFAULT;
5174 5174 break;
5175 5175 }
5176 5176 mtdtrq.size = mtdtrq32.size;
5177 5177 mtdtrq.mtdtp =
5178 5178 (struct mtdrivetype *)(uintptr_t)mtdtrq32.mtdtp;
5179 5179 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
5180 5180 "st_ioctl: size 0x%x\n", mtdtrq.size);
5181 5181 break;
5182 5182 }
5183 5183 case DDI_MODEL_NONE:
5184 5184 if (ddi_copyin((void *)arg, &mtdtrq,
5185 5185 sizeof (struct mtdrivetype_request), flag)) {
5186 5186 rval = EFAULT;
5187 5187 break;
5188 5188 }
5189 5189 break;
5190 5190 }
5191 5191
5192 5192 #else /* ! _MULTI_DATAMODEL */
5193 5193 if (ddi_copyin((void *)arg, &mtdtrq,
5194 5194 sizeof (struct mtdrivetype_request), flag)) {
5195 5195 rval = EFAULT;
5196 5196 break;
5197 5197 }
5198 5198 #endif /* _MULTI_DATAMODEL */
5199 5199
5200 5200 /*
5201 5201 * if requested size is < 0 then return
5202 5202 * error.
5203 5203 */
5204 5204 if (mtdtrq.size < 0) {
5205 5205 rval = EINVAL;
5206 5206 break;
5207 5207 }
5208 5208 bzero(mtdt, sizeof (struct mtdrivetype));
5209 5209 (void) strncpy(mtdt->name, stdt->name, ST_NAMESIZE);
5210 5210 (void) strncpy(mtdt->vid, stdt->vid, VIDPIDLEN - 1);
5211 5211 mtdt->type = stdt->type;
5212 5212 mtdt->bsize = stdt->bsize;
5213 5213 mtdt->options = stdt->options;
5214 5214 mtdt->max_rretries = stdt->max_rretries;
5215 5215 mtdt->max_wretries = stdt->max_wretries;
5216 5216 for (tmp = 0; tmp < NDENSITIES; tmp++) {
5217 5217 mtdt->densities[tmp] = stdt->densities[tmp];
5218 5218 }
5219 5219 mtdt->default_density = stdt->default_density;
5220 5220 /*
5221 5221 * Speed hasn't been used since the hayday of reel tape.
5222 5222 * For all drives not setting the option ST_KNOWS_MEDIA
5223 5223 * the speed member renamed to mediatype are zeros.
5224 5224 * Those drives that have ST_KNOWS_MEDIA set use the
5225 5225 * new mediatype member which is used to figure the
5226 5226 * type of media loaded.
5227 5227 *
5228 5228 * So as to not break applications speed in the
5229 5229 * mtdrivetype structure is not renamed.
5230 5230 */
5231 5231 for (tmp = 0; tmp < NDENSITIES; tmp++) {
5232 5232 mtdt->speeds[tmp] = stdt->mediatype[tmp];
5233 5233 }
5234 5234 mtdt->non_motion_timeout = stdt->non_motion_timeout;
5235 5235 mtdt->io_timeout = stdt->io_timeout;
5236 5236 mtdt->rewind_timeout = stdt->rewind_timeout;
5237 5237 mtdt->space_timeout = stdt->space_timeout;
5238 5238 mtdt->load_timeout = stdt->load_timeout;
5239 5239 mtdt->unload_timeout = stdt->unload_timeout;
5240 5240 mtdt->erase_timeout = stdt->erase_timeout;
5241 5241
5242 5242 /*
5243 5243 * Limit the maximum length of the result to
5244 5244 * sizeof (struct mtdrivetype).
5245 5245 */
5246 5246 tmp = sizeof (struct mtdrivetype);
5247 5247 if (mtdtrq.size < tmp)
5248 5248 tmp = mtdtrq.size;
5249 5249 if (ddi_copyout(mtdt, mtdtrq.mtdtp, tmp, flag)) {
5250 5250 rval = EFAULT;
5251 5251 }
5252 5252 break;
5253 5253 }
5254 5254 case MTIOCPERSISTENT:
5255 5255
5256 5256 if (ddi_copyin((void *)arg, &tmp, sizeof (tmp), flag)) {
5257 5257 rval = EFAULT;
5258 5258 break;
5259 5259 }
5260 5260
5261 5261 if (tmp) {
5262 5262 st_turn_pe_on(un);
5263 5263 } else {
5264 5264 st_turn_pe_off(un);
5265 5265 }
5266 5266
5267 5267 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
5268 5268 "st_ioctl: MTIOCPERSISTENT : persistence = %d\n",
5269 5269 un->un_persistence);
5270 5270
5271 5271 break;
5272 5272
5273 5273 case MTIOCPERSISTENTSTATUS:
5274 5274 tmp = (int)un->un_persistence;
5275 5275
5276 5276 if (ddi_copyout(&tmp, (void *)arg, sizeof (tmp), flag)) {
5277 5277 rval = EFAULT;
5278 5278 }
5279 5279 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
5280 5280 "st_ioctl: MTIOCPERSISTENTSTATUS:persistence = %d\n",
5281 5281 un->un_persistence);
5282 5282
5283 5283 break;
5284 5284
5285 5285 case MTIOCLRERR:
5286 5286 {
5287 5287 /* clear persistent errors */
5288 5288
5289 5289 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
5290 5290 "st_ioctl: MTIOCLRERR\n");
5291 5291
5292 5292 st_clear_pe(un);
5293 5293
5294 5294 break;
5295 5295 }
5296 5296
5297 5297 case MTIOCGUARANTEEDORDER:
5298 5298 {
5299 5299 /*
5300 5300 * this is just a holder to make a valid ioctl and
5301 5301 * it won't be in any earlier release
5302 5302 */
5303 5303 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
5304 5304 "st_ioctl: MTIOCGUARANTEEDORDER\n");
5305 5305
5306 5306 break;
5307 5307 }
5308 5308
5309 5309 case MTIOCRESERVE:
5310 5310 {
5311 5311 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
5312 5312 "st_ioctl: MTIOCRESERVE\n");
5313 5313
5314 5314 /*
5315 5315 * Check if Reserve/Release is supported.
5316 5316 */
5317 5317 if (un->un_dp->options & ST_NO_RESERVE_RELEASE) {
5318 5318 rval = ENOTTY;
5319 5319 break;
5320 5320 }
5321 5321
5322 5322 rval = st_reserve_release(un, ST_RESERVE, st_uscsi_cmd);
5323 5323
5324 5324 if (rval == 0) {
5325 5325 un->un_rsvd_status |= ST_PRESERVE_RESERVE;
5326 5326 }
5327 5327 break;
5328 5328 }
5329 5329
5330 5330 case MTIOCRELEASE:
5331 5331 {
5332 5332 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
5333 5333 "st_ioctl: MTIOCRELEASE\n");
5334 5334
5335 5335 /*
5336 5336 * Check if Reserve/Release is supported.
5337 5337 */
5338 5338 if (un->un_dp->options & ST_NO_RESERVE_RELEASE) {
5339 5339 rval = ENOTTY;
5340 5340 break;
5341 5341 }
5342 5342
5343 5343 /*
5344 5344 * Used to just clear ST_PRESERVE_RESERVE which
5345 5345 * made the reservation release at next close.
5346 5346 * As the user may have opened and then done a
5347 5347 * persistant reservation we now need to drop
5348 5348 * the reservation without closing if the user
5349 5349 * attempts to do this.
5350 5350 */
5351 5351 rval = st_reserve_release(un, ST_RELEASE, st_uscsi_cmd);
5352 5352
5353 5353 un->un_rsvd_status &= ~ST_PRESERVE_RESERVE;
5354 5354
5355 5355 break;
5356 5356 }
5357 5357
5358 5358 case MTIOCFORCERESERVE:
5359 5359 {
5360 5360 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
5361 5361 "st_ioctl: MTIOCFORCERESERVE\n");
5362 5362
5363 5363 /*
5364 5364 * Check if Reserve/Release is supported.
5365 5365 */
5366 5366 if (un->un_dp->options & ST_NO_RESERVE_RELEASE) {
5367 5367 rval = ENOTTY;
5368 5368 break;
5369 5369 }
5370 5370 /*
5371 5371 * allow only super user to run this.
5372 5372 */
5373 5373 if (drv_priv(cred_p) != 0) {
5374 5374 rval = EPERM;
5375 5375 break;
5376 5376 }
5377 5377 /*
5378 5378 * Throw away reserve,
5379 5379 * not using test-unit-ready
5380 5380 * since reserve can succeed without tape being
5381 5381 * present in the drive.
5382 5382 */
5383 5383 (void) st_reserve_release(un, ST_RESERVE, st_uscsi_cmd);
5384 5384
5385 5385 rval = st_take_ownership(un, st_uscsi_cmd);
5386 5386
5387 5387 break;
5388 5388 }
5389 5389
5390 5390 case USCSICMD:
5391 5391 {
5392 5392 cred_t *cr;
5393 5393
5394 5394 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
5395 5395 "st_ioctl: USCSICMD\n");
5396 5396
5397 5397 cr = ddi_get_cred();
5398 5398 if ((drv_priv(cred_p) != 0) && (drv_priv(cr) != 0)) {
5399 5399 rval = EPERM;
5400 5400 } else {
5401 5401 rval = st_uscsi_cmd(un, (struct uscsi_cmd *)arg, flag);
5402 5402 }
5403 5403 break;
5404 5404 }
5405 5405 case MTIOCTOP:
5406 5406 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
5407 5407 "st_ioctl: MTIOCTOP\n");
5408 5408 rval = st_mtioctop(un, arg, flag);
5409 5409 break;
5410 5410
5411 5411 case MTIOCLTOP:
5412 5412 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
5413 5413 "st_ioctl: MTIOLCTOP\n");
5414 5414 rval = st_mtiocltop(un, arg, flag);
5415 5415 break;
5416 5416
5417 5417 case MTIOCREADIGNOREILI:
5418 5418 {
5419 5419 int set_ili;
5420 5420
5421 5421 if (ddi_copyin((void *)arg, &set_ili,
5422 5422 sizeof (set_ili), flag)) {
5423 5423 rval = EFAULT;
5424 5424 break;
5425 5425 }
5426 5426
5427 5427 if (un->un_bsize) {
5428 5428 rval = ENOTTY;
5429 5429 break;
5430 5430 }
5431 5431
5432 5432 switch (set_ili) {
5433 5433 case 0:
5434 5434 un->un_dp->options &= ~ST_READ_IGNORE_ILI;
5435 5435 break;
5436 5436
5437 5437 case 1:
5438 5438 un->un_dp->options |= ST_READ_IGNORE_ILI;
5439 5439 break;
5440 5440
5441 5441 default:
5442 5442 rval = EINVAL;
5443 5443 break;
5444 5444 }
5445 5445 break;
5446 5446 }
5447 5447
5448 5448 case MTIOCREADIGNOREEOFS:
5449 5449 {
5450 5450 int ignore_eof;
5451 5451
5452 5452 if (ddi_copyin((void *)arg, &ignore_eof,
5453 5453 sizeof (ignore_eof), flag)) {
5454 5454 rval = EFAULT;
5455 5455 break;
5456 5456 }
5457 5457
5458 5458 if (!(un->un_dp->options & ST_REEL)) {
5459 5459 rval = ENOTTY;
5460 5460 break;
5461 5461 }
5462 5462
5463 5463 switch (ignore_eof) {
5464 5464 case 0:
5465 5465 un->un_dp->options &= ~ST_READ_IGNORE_EOFS;
5466 5466 break;
5467 5467
5468 5468 case 1:
5469 5469 un->un_dp->options |= ST_READ_IGNORE_EOFS;
5470 5470 break;
5471 5471
5472 5472 default:
5473 5473 rval = EINVAL;
5474 5474 break;
5475 5475 }
5476 5476 break;
5477 5477 }
5478 5478
5479 5479 case MTIOCSHORTFMK:
5480 5480 {
5481 5481 int short_fmk;
5482 5482
5483 5483 if (ddi_copyin((void *)arg, &short_fmk,
5484 5484 sizeof (short_fmk), flag)) {
5485 5485 rval = EFAULT;
5486 5486 break;
5487 5487 }
5488 5488
5489 5489 switch (un->un_dp->type) {
5490 5490 case ST_TYPE_EXB8500:
5491 5491 case ST_TYPE_EXABYTE:
5492 5492 if (!short_fmk) {
5493 5493 un->un_dp->options &= ~ST_SHORT_FILEMARKS;
5494 5494 } else if (short_fmk == 1) {
5495 5495 un->un_dp->options |= ST_SHORT_FILEMARKS;
5496 5496 } else {
5497 5497 rval = EINVAL;
5498 5498 }
5499 5499 break;
5500 5500
5501 5501 default:
5502 5502 rval = ENOTTY;
5503 5503 break;
5504 5504 }
5505 5505 break;
5506 5506 }
5507 5507
5508 5508 case MTIOCGETPOS:
5509 5509 rval = st_update_block_pos(un, st_cmd, 0);
5510 5510 if (rval == 0) {
5511 5511 if (ddi_copyout((void *)&un->un_pos, (void *)arg,
5512 5512 sizeof (tapepos_t), flag)) {
5513 5513 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
5514 5514 "MTIOCGETPOS copy out failed\n");
5515 5515 rval = EFAULT;
5516 5516 }
5517 5517 }
5518 5518 break;
5519 5519
5520 5520 case MTIOCRESTPOS:
5521 5521 {
5522 5522 tapepos_t dest;
5523 5523
5524 5524 if (ddi_copyin((void *)arg, &dest, sizeof (tapepos_t),
5525 5525 flag) != 0) {
5526 5526 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
5527 5527 "MTIOCRESTPOS copy in failed\n");
5528 5528 rval = EFAULT;
5529 5529 break;
5530 5530 }
5531 5531 rval = st_validate_tapemarks(un, st_uscsi_cmd, &dest);
5532 5532 if (rval != 0) {
5533 5533 rval = EIO;
5534 5534 }
5535 5535 break;
5536 5536 }
5537 5537 default:
5538 5538 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
5539 5539 "st_ioctl: unknown ioctl\n");
5540 5540 rval = ENOTTY;
5541 5541 }
5542 5542
5543 5543 exit:
5544 5544 if (!(un->un_persistence && un->un_persist_errors)) {
5545 5545 un->un_errno = rval;
5546 5546 }
5547 5547
5548 5548 mutex_exit(ST_MUTEX);
5549 5549
5550 5550 return (rval);
5551 5551 }
5552 5552
5553 5553
5554 5554 /*
5555 5555 * do some MTIOCTOP tape operations
5556 5556 */
5557 5557 static int
5558 5558 st_mtioctop(struct scsi_tape *un, intptr_t arg, int flag)
5559 5559 {
5560 5560 #ifdef _MULTI_DATAMODEL
5561 5561 /*
5562 5562 * For use when a 32 bit app makes a call into a
5563 5563 * 64 bit ioctl
5564 5564 */
5565 5565 struct mtop32 mtop_32_for_64;
5566 5566 #endif /* _MULTI_DATAMODEL */
5567 5567 struct mtop passed;
5568 5568 struct mtlop local;
5569 5569 int rval = 0;
5570 5570
5571 5571 ST_FUNC(ST_DEVINFO, st_mtioctop);
5572 5572
5573 5573 ASSERT(mutex_owned(ST_MUTEX));
5574 5574
5575 5575 #ifdef _MULTI_DATAMODEL
5576 5576 switch (ddi_model_convert_from(flag & FMODELS)) {
5577 5577 case DDI_MODEL_ILP32:
5578 5578 if (ddi_copyin((void *)arg, &mtop_32_for_64,
5579 5579 sizeof (struct mtop32), flag)) {
5580 5580 return (EFAULT);
5581 5581 }
5582 5582 local.mt_op = mtop_32_for_64.mt_op;
5583 5583 local.mt_count = (int64_t)mtop_32_for_64.mt_count;
5584 5584 break;
5585 5585
5586 5586 case DDI_MODEL_NONE:
5587 5587 if (ddi_copyin((void *)arg, &passed, sizeof (passed), flag)) {
5588 5588 return (EFAULT);
5589 5589 }
5590 5590 local.mt_op = passed.mt_op;
5591 5591 /* prevent sign extention */
5592 5592 local.mt_count = (UINT32_MAX & passed.mt_count);
5593 5593 break;
5594 5594 }
5595 5595
5596 5596 #else /* ! _MULTI_DATAMODEL */
5597 5597 if (ddi_copyin((void *)arg, &passed, sizeof (passed), flag)) {
5598 5598 return (EFAULT);
5599 5599 }
5600 5600 local.mt_op = passed.mt_op;
5601 5601 /* prevent sign extention */
5602 5602 local.mt_count = (UINT32_MAX & passed.mt_count);
5603 5603 #endif /* _MULTI_DATAMODEL */
5604 5604
5605 5605 rval = st_do_mtioctop(un, &local);
5606 5606
5607 5607 #ifdef _MULTI_DATAMODEL
5608 5608 switch (ddi_model_convert_from(flag & FMODELS)) {
5609 5609 case DDI_MODEL_ILP32:
5610 5610 if (((uint64_t)local.mt_count) > UINT32_MAX) {
5611 5611 rval = ERANGE;
5612 5612 break;
5613 5613 }
5614 5614 /*
5615 5615 * Convert 64 bit back to 32 bit before doing
5616 5616 * copyout. This is what the ILP32 app expects.
5617 5617 */
5618 5618 mtop_32_for_64.mt_op = local.mt_op;
5619 5619 mtop_32_for_64.mt_count = local.mt_count;
5620 5620
5621 5621 if (ddi_copyout(&mtop_32_for_64, (void *)arg,
5622 5622 sizeof (struct mtop32), flag)) {
5623 5623 rval = EFAULT;
5624 5624 }
5625 5625 break;
5626 5626
5627 5627 case DDI_MODEL_NONE:
5628 5628 passed.mt_count = local.mt_count;
5629 5629 passed.mt_op = local.mt_op;
5630 5630 if (ddi_copyout(&passed, (void *)arg, sizeof (passed), flag)) {
5631 5631 rval = EFAULT;
5632 5632 }
5633 5633 break;
5634 5634 }
5635 5635 #else /* ! _MULTI_DATAMODE */
5636 5636 if (((uint64_t)local.mt_count) > UINT32_MAX) {
5637 5637 rval = ERANGE;
5638 5638 } else {
5639 5639 passed.mt_op = local.mt_op;
5640 5640 passed.mt_count = local.mt_count;
5641 5641 if (ddi_copyout(&passed, (void *)arg, sizeof (passed), flag)) {
5642 5642 rval = EFAULT;
5643 5643 }
5644 5644 }
5645 5645 #endif /* _MULTI_DATAMODE */
5646 5646
5647 5647
5648 5648 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
5649 5649 "st_ioctl: fileno=%x, blkno=%x, eof=%x\n", un->un_pos.fileno,
5650 5650 un->un_pos.blkno, un->un_pos.eof);
5651 5651
5652 5652 if (un->un_pos.pmode == invalid) {
5653 5653 un->un_density_known = 0;
5654 5654 }
5655 5655
5656 5656 ASSERT(mutex_owned(ST_MUTEX));
5657 5657 return (rval);
5658 5658 }
5659 5659
5660 5660 static int
5661 5661 st_mtiocltop(struct scsi_tape *un, intptr_t arg, int flag)
5662 5662 {
5663 5663 struct mtlop local;
5664 5664 int rval;
5665 5665
5666 5666 ST_FUNC(ST_DEVINFO, st_mtiocltop);
5667 5667 if (ddi_copyin((void *)arg, &local, sizeof (local), flag)) {
5668 5668 return (EFAULT);
5669 5669 }
5670 5670
5671 5671 rval = st_do_mtioctop(un, &local);
5672 5672
5673 5673 if (ddi_copyout(&local, (void *)arg, sizeof (local), flag)) {
5674 5674 rval = EFAULT;
5675 5675 }
5676 5676 return (rval);
5677 5677 }
5678 5678
5679 5679
5680 5680 static int
5681 5681 st_do_mtioctop(struct scsi_tape *un, struct mtlop *mtop)
5682 5682 {
5683 5683 dev_t dev = un->un_dev;
5684 5684 int savefile;
5685 5685 int rval = 0;
5686 5686
5687 5687 ST_FUNC(ST_DEVINFO, st_do_mtioctop);
5688 5688
5689 5689 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
5690 5690 "st_do_mtioctop(): mt_op=%x\n", mtop->mt_op);
5691 5691 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
5692 5692 "fileno=%x, blkno=%x, eof=%x\n",
5693 5693 un->un_pos.fileno, un->un_pos.blkno, un->un_pos.eof);
5694 5694
5695 5695 un->un_status = 0;
5696 5696
5697 5697 /*
5698 5698 * if we are going to mess with a tape, we have to make sure we have
5699 5699 * one and are not offline (i.e. no tape is initialized). We let
5700 5700 * commands pass here that don't actually touch the tape, except for
5701 5701 * loading and initialization (rewinding).
5702 5702 */
5703 5703 if (un->un_state == ST_STATE_OFFLINE) {
5704 5704 switch (mtop->mt_op) {
5705 5705 case MTLOAD:
5706 5706 case MTNOP:
5707 5707 /*
5708 5708 * We don't want strategy calling st_tape_init here,
5709 5709 * so, change state
5710 5710 */
5711 5711 un->un_state = ST_STATE_INITIALIZING;
5712 5712 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
5713 5713 "st_do_mtioctop : OFFLINE state = %d\n",
5714 5714 un->un_state);
5715 5715 break;
5716 5716 default:
5717 5717 /*
5718 5718 * reinitialize by normal means
5719 5719 */
5720 5720 rval = st_tape_init(un);
5721 5721 if (rval) {
5722 5722 un->un_state = ST_STATE_INITIALIZING;
5723 5723 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
5724 5724 "st_do_mtioctop : OFFLINE init failure ");
5725 5725 un->un_state = ST_STATE_OFFLINE;
5726 5726 un->un_pos.pmode = invalid;
5727 5727 if (rval != EACCES) {
5728 5728 rval = EIO;
5729 5729 }
5730 5730 return (rval);
5731 5731 }
5732 5732 un->un_state = ST_STATE_OPEN_PENDING_IO;
5733 5733 break;
5734 5734 }
5735 5735 }
5736 5736
5737 5737 /*
5738 5738 * If the file position is invalid, allow only those
5739 5739 * commands that properly position the tape and fail
5740 5740 * the rest with EIO
5741 5741 */
5742 5742 if (un->un_pos.pmode == invalid) {
5743 5743 switch (mtop->mt_op) {
5744 5744 case MTWEOF:
5745 5745 case MTRETEN:
5746 5746 case MTERASE:
5747 5747 case MTEOM:
5748 5748 case MTFSF:
5749 5749 case MTFSR:
5750 5750 case MTBSF:
5751 5751 case MTNBSF:
5752 5752 case MTBSR:
5753 5753 case MTSRSZ:
5754 5754 case MTGRSZ:
5755 5755 case MTSEEK:
5756 5756 case MTBSSF:
5757 5757 case MTFSSF:
5758 5758 return (EIO);
5759 5759 /* NOTREACHED */
5760 5760 case MTREW:
5761 5761 case MTLOAD:
5762 5762 case MTOFFL:
5763 5763 case MTNOP:
5764 5764 case MTTELL:
5765 5765 case MTLOCK:
5766 5766 case MTUNLOCK:
5767 5767 break;
5768 5768
5769 5769 default:
5770 5770 return (ENOTTY);
5771 5771 /* NOTREACHED */
5772 5772 }
5773 5773 }
5774 5774
5775 5775 switch (mtop->mt_op) {
5776 5776 case MTERASE:
5777 5777 /*
5778 5778 * MTERASE rewinds the tape, erase it completely, and returns
5779 5779 * to the beginning of the tape
5780 5780 */
5781 5781 if (un->un_mspl->wp || un->un_read_only & WORM) {
5782 5782 un->un_status = KEY_WRITE_PROTECT;
5783 5783 un->un_err_resid = mtop->mt_count;
5784 5784 COPY_POS(&un->un_err_pos, &un->un_pos);
5785 5785 return (EACCES);
5786 5786 }
5787 5787 if (un->un_dp->options & ST_REEL) {
5788 5788 un->un_fmneeded = 2;
5789 5789 } else {
5790 5790 un->un_fmneeded = 1;
5791 5791 }
5792 5792 mtop->mt_count = mtop->mt_count ? 1 : 0;
5793 5793 if (st_check_density_or_wfm(dev, 1, B_WRITE, NO_STEPBACK) ||
5794 5794 st_cmd(un, SCMD_REWIND, 0, SYNC_CMD) ||
5795 5795 st_cmd(un, SCMD_ERASE, mtop->mt_count, SYNC_CMD)) {
5796 5796 un->un_pos.pmode = invalid;
5797 5797 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
5798 5798 "st_do_mtioctop : EIO space or erase or "
5799 5799 "check den)\n");
5800 5800 rval = EIO;
5801 5801 } else {
5802 5802 /* QIC and helical scan rewind after erase */
5803 5803 if (un->un_dp->options & ST_REEL) {
5804 5804 (void) st_cmd(un, SCMD_REWIND, 0, ASYNC_CMD);
5805 5805 }
5806 5806 }
5807 5807 break;
5808 5808
5809 5809 case MTWEOF:
5810 5810 /*
5811 5811 * write an end-of-file record
5812 5812 */
5813 5813 if (un->un_mspl->wp || un->un_read_only & RDONLY) {
5814 5814 un->un_status = KEY_WRITE_PROTECT;
5815 5815 un->un_err_resid = mtop->mt_count;
5816 5816 COPY_POS(&un->un_err_pos, &un->un_pos);
5817 5817 return (EACCES);
5818 5818 }
5819 5819
5820 5820 /*
5821 5821 * zero count means just flush buffers
5822 5822 * negative count is not permitted
5823 5823 */
5824 5824 if (mtop->mt_count < 0) {
5825 5825 return (EINVAL);
5826 5826 }
5827 5827
5828 5828 /* Not on worm */
5829 5829 if (un->un_read_only == RDWR) {
5830 5830 un->un_test_append = 1;
5831 5831 }
5832 5832
5833 5833 if (un->un_state == ST_STATE_OPEN_PENDING_IO) {
5834 5834 if (st_determine_density(un, B_WRITE)) {
5835 5835 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
5836 5836 "st_do_mtioctop : EIO : MTWEOF can't "
5837 5837 "determine density");
5838 5838 return (EIO);
5839 5839 }
5840 5840 }
5841 5841
5842 5842 rval = st_write_fm(dev, (int)mtop->mt_count);
5843 5843 if ((rval != 0) && (rval != EACCES)) {
5844 5844 /*
5845 5845 * Failure due to something other than illegal
5846 5846 * request results in loss of state (st_intr).
5847 5847 */
5848 5848 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
5849 5849 "st_do_mtioctop : EIO : MTWEOF can't write "
5850 5850 "file mark");
5851 5851 rval = EIO;
5852 5852 }
5853 5853 break;
5854 5854
5855 5855 case MTRETEN:
5856 5856 /*
5857 5857 * retension the tape
5858 5858 */
5859 5859 if (st_check_density_or_wfm(dev, 1, 0, NO_STEPBACK) ||
5860 5860 st_cmd(un, SCMD_LOAD, LD_LOAD | LD_RETEN, SYNC_CMD)) {
5861 5861 un->un_pos.pmode = invalid;
5862 5862 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
5863 5863 "st_do_mtioctop : EIO : MTRETEN ");
5864 5864 rval = EIO;
5865 5865 }
5866 5866 break;
5867 5867
5868 5868 case MTREW:
5869 5869 /*
5870 5870 * rewind the tape
5871 5871 */
5872 5872 if (st_check_density_or_wfm(dev, 1, 0, NO_STEPBACK)) {
5873 5873 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
5874 5874 "st_do_mtioctop : EIO:MTREW check "
5875 5875 "density/wfm failed");
5876 5876 return (EIO);
5877 5877 }
5878 5878 if (st_cmd(un, SCMD_REWIND, 0, SYNC_CMD)) {
5879 5879 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
5880 5880 "st_do_mtioctop : EIO : MTREW ");
5881 5881 rval = EIO;
5882 5882 }
5883 5883 break;
5884 5884
5885 5885 case MTOFFL:
5886 5886 /*
5887 5887 * rewinds, and, if appropriate, takes the device offline by
5888 5888 * unloading the tape
5889 5889 */
5890 5890 if (st_check_density_or_wfm(dev, 1, 0, NO_STEPBACK)) {
5891 5891 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
5892 5892 "st_do_mtioctop :EIO:MTOFFL check "
5893 5893 "density/wfm failed");
5894 5894 return (EIO);
5895 5895 }
5896 5896 (void) st_cmd(un, SCMD_REWIND, 0, SYNC_CMD);
5897 5897 if (st_cmd(un, SCMD_LOAD, LD_UNLOAD, SYNC_CMD)) {
5898 5898 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
5899 5899 "st_do_mtioctop : EIO : MTOFFL");
5900 5900 return (EIO);
5901 5901 }
5902 5902 un->un_pos.eof = ST_NO_EOF;
5903 5903 un->un_laststate = un->un_state;
5904 5904 un->un_state = ST_STATE_OFFLINE;
5905 5905 un->un_mediastate = MTIO_EJECTED;
5906 5906 break;
5907 5907
5908 5908 case MTLOAD:
5909 5909 /*
5910 5910 * This is to load a tape into the drive
5911 5911 * Note that if the tape is not loaded, the device will have
5912 5912 * to be opened via O_NDELAY or O_NONBLOCK.
5913 5913 */
5914 5914 /*
5915 5915 * Let's try and clean things up, if we are not
5916 5916 * initializing, and then send in the load command, no
5917 5917 * matter what.
5918 5918 *
5919 5919 * load after a media change by the user.
5920 5920 */
5921 5921
5922 5922 if (un->un_state > ST_STATE_INITIALIZING) {
5923 5923 (void) st_check_density_or_wfm(dev, 1, 0, NO_STEPBACK);
5924 5924 }
5925 5925 rval = st_cmd(un, SCMD_LOAD, LD_LOAD, SYNC_CMD);
5926 5926 /* Load command to a drive that doesn't support load */
5927 5927 if ((rval == EIO) &&
5928 5928 ((un->un_status == KEY_NOT_READY) &&
5929 5929 /* Medium not present */
5930 5930 (un->un_uscsi_rqs_buf->es_add_code == 0x3a) ||
5931 5931 ((un->un_status == KEY_ILLEGAL_REQUEST) &&
5932 5932 (un->un_dp->type == MT_ISSTK9840) &&
5933 5933 /* CSL not present */
5934 5934 (un->un_uscsi_rqs_buf->es_add_code == 0x80)))) {
5935 5935 rval = ENOTTY;
5936 5936 break;
5937 5937 } else if (rval != EACCES && rval != 0) {
5938 5938 rval = EIO;
5939 5939 }
5940 5940 if (rval) {
5941 5941 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
5942 5942 "st_do_mtioctop : %s : MTLOAD\n",
5943 5943 rval == EACCES ? "EACCES" : "EIO");
5944 5944 /*
5945 5945 * If load tape fails, who knows what happened...
5946 5946 */
5947 5947 un->un_pos.pmode = invalid;
5948 5948 break;
5949 5949 }
5950 5950
5951 5951 /*
5952 5952 * reset all counters appropriately using rewind, as if LOAD
5953 5953 * succeeds, we are at BOT
5954 5954 */
5955 5955 un->un_state = ST_STATE_INITIALIZING;
5956 5956
5957 5957 rval = st_tape_init(un);
5958 5958 if ((rval == EACCES) && (un->un_read_only & WORM)) {
5959 5959 rval = 0;
5960 5960 break;
5961 5961 }
5962 5962
5963 5963 if (rval != 0) {
5964 5964 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
5965 5965 "st_do_mtioctop : EIO : MTLOAD calls "
5966 5966 "st_tape_init\n");
5967 5967 rval = EIO;
5968 5968 un->un_state = ST_STATE_OFFLINE;
5969 5969 }
5970 5970
5971 5971 break;
5972 5972
5973 5973 case MTNOP:
5974 5974 un->un_status = 0; /* Reset status */
5975 5975 un->un_err_resid = 0;
5976 5976 mtop->mt_count = MTUNIT(dev);
5977 5977 break;
5978 5978
5979 5979 case MTEOM:
5980 5980 /*
5981 5981 * positions the tape at a location just after the last file
5982 5982 * written on the tape. For cartridge and 8 mm, this after
5983 5983 * the last file mark; for reel, this is inbetween the two
5984 5984 * last 2 file marks
5985 5985 */
5986 5986 if ((un->un_pos.pmode == legacy && un->un_pos.eof >= ST_EOT) ||
5987 5987 (un->un_lastop == ST_OP_WRITE) ||
5988 5988 (un->un_lastop == ST_OP_WEOF)) {
5989 5989 /*
5990 5990 * If the command wants to move to logical end
5991 5991 * of media, and we're already there, we're done.
5992 5992 * If we were at logical eot, we reset the state
5993 5993 * to be *not* at logical eot.
5994 5994 *
5995 5995 * If we're at physical or logical eot, we prohibit
5996 5996 * forward space operations (unconditionally).
5997 5997 *
5998 5998 * Also if the last operation was a write of any
5999 5999 * kind the tape is at EOD.
6000 6000 */
6001 6001 return (0);
6002 6002 }
6003 6003 /*
6004 6004 * physical tape position may not be what we've been
6005 6005 * telling the user; adjust the request accordingly
6006 6006 */
6007 6007 if (IN_EOF(un->un_pos)) {
6008 6008 un->un_pos.fileno++;
6009 6009 un->un_pos.blkno = 0;
6010 6010 }
6011 6011
6012 6012 if (st_check_density_or_wfm(dev, 1, B_READ, NO_STEPBACK)) {
6013 6013 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
6014 6014 "st_do_mtioctop : EIO:MTEOM check density/wfm "
6015 6015 " failed");
6016 6016 return (EIO);
6017 6017 }
6018 6018
6019 6019 /*
6020 6020 * st_find_eod() returns the last fileno we knew about;
6021 6021 */
6022 6022 savefile = st_find_eod(un);
6023 6023
6024 6024 if ((un->un_status != KEY_BLANK_CHECK) &&
6025 6025 (un->un_status != SUN_KEY_EOT)) {
6026 6026 un->un_pos.pmode = invalid;
6027 6027 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
6028 6028 "st_do_mtioctop : EIO : MTEOM status check failed");
6029 6029 rval = EIO;
6030 6030 } else {
6031 6031 /*
6032 6032 * For 1/2" reel tapes assume logical EOT marked
6033 6033 * by two file marks or we don't care that we may
6034 6034 * be extending the last file on the tape.
6035 6035 */
6036 6036 if (un->un_dp->options & ST_REEL) {
6037 6037 if (st_cmd(un, SCMD_SPACE, Fmk(-1), SYNC_CMD)) {
6038 6038 un->un_pos.pmode = invalid;
6039 6039 ST_DEBUG2(ST_DEVINFO, st_label,
6040 6040 SCSI_DEBUG,
6041 6041 "st_do_mtioctop : EIO : MTEOM space"
6042 6042 " cmd failed");
6043 6043 rval = EIO;
6044 6044 break;
6045 6045 }
6046 6046 /*
6047 6047 * Fix up the block number.
6048 6048 */
6049 6049 un->un_pos.blkno = 0;
6050 6050 un->un_err_pos.blkno = 0;
6051 6051 }
6052 6052 un->un_err_resid = 0;
6053 6053 un->un_pos.fileno = savefile;
6054 6054 un->un_pos.eof = ST_EOT;
6055 6055 }
6056 6056 un->un_status = 0;
6057 6057 break;
6058 6058
6059 6059 case MTFSF:
6060 6060 MAX_SPACE_CNT(mtop->mt_count);
6061 6061 rval = st_mtfsf_ioctl(un, mtop->mt_count);
6062 6062 break;
6063 6063
6064 6064 case MTFSR:
6065 6065 MAX_SPACE_CNT(mtop->mt_count);
6066 6066 rval = st_mtfsr_ioctl(un, mtop->mt_count);
6067 6067 break;
6068 6068
6069 6069 case MTBSF:
6070 6070 MAX_SPACE_CNT(mtop->mt_count);
6071 6071 rval = st_mtbsf_ioctl(un, mtop->mt_count);
6072 6072 break;
6073 6073
6074 6074 case MTNBSF:
6075 6075 MAX_SPACE_CNT(mtop->mt_count);
6076 6076 rval = st_mtnbsf_ioctl(un, mtop->mt_count);
6077 6077 break;
6078 6078
6079 6079 case MTBSR:
6080 6080 MAX_SPACE_CNT(mtop->mt_count);
6081 6081 rval = st_mtbsr_ioctl(un, mtop->mt_count);
6082 6082 break;
6083 6083
6084 6084 case MTBSSF:
6085 6085 MAX_SPACE_CNT(mtop->mt_count);
6086 6086 rval = st_mtbsfm_ioctl(un, mtop->mt_count);
6087 6087 break;
6088 6088
6089 6089 case MTFSSF:
6090 6090 MAX_SPACE_CNT(mtop->mt_count);
6091 6091 rval = st_mtfsfm_ioctl(un, mtop->mt_count);
6092 6092 break;
6093 6093
6094 6094 case MTSRSZ:
6095 6095
6096 6096 /*
6097 6097 * Set record-size to that sent by user
6098 6098 * Check to see if there is reason that the requested
6099 6099 * block size should not be set.
6100 6100 */
6101 6101
6102 6102 /* If requesting variable block size is it ok? */
6103 6103 if ((mtop->mt_count == 0) &&
6104 6104 ((un->un_dp->options & ST_VARIABLE) == 0)) {
6105 6105 return (ENOTTY);
6106 6106 }
6107 6107
6108 6108 /*
6109 6109 * If requested block size is not variable "0",
6110 6110 * is it less then minimum.
6111 6111 */
6112 6112 if ((mtop->mt_count != 0) &&
6113 6113 (mtop->mt_count < un->un_minbsize)) {
6114 6114 return (EINVAL);
6115 6115 }
6116 6116
6117 6117 /* Is the requested block size more then maximum */
6118 6118 if ((mtop->mt_count > min(un->un_maxbsize, un->un_maxdma)) &&
6119 6119 (un->un_maxbsize != 0)) {
6120 6120 return (EINVAL);
6121 6121 }
6122 6122
6123 6123 /* Is requested block size a modulus the device likes */
6124 6124 if ((mtop->mt_count % un->un_data_mod) != 0) {
6125 6125 return (EINVAL);
6126 6126 }
6127 6127
6128 6128 if (st_change_block_size(un, (uint32_t)mtop->mt_count) != 0) {
6129 6129 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
6130 6130 "st_ioctl : MTSRSZ : EIO : cant set block size");
6131 6131 return (EIO);
6132 6132 }
6133 6133
6134 6134 return (0);
6135 6135
6136 6136 case MTGRSZ:
6137 6137 /*
6138 6138 * Get record-size to the user
6139 6139 */
6140 6140 mtop->mt_count = un->un_bsize;
6141 6141 rval = 0;
6142 6142 break;
6143 6143
6144 6144 case MTTELL:
6145 6145 rval = st_update_block_pos(un, st_cmd, 0);
6146 6146 mtop->mt_count = un->un_pos.lgclblkno;
6147 6147 break;
6148 6148
6149 6149 case MTSEEK:
6150 6150 rval = st_logical_block_locate(un, st_uscsi_cmd, &un->un_pos,
6151 6151 (uint64_t)mtop->mt_count, un->un_pos.partition);
6152 6152 /*
6153 6153 * This bit of magic make mt print the actual position if
6154 6154 * the resulting position was not what was asked for.
6155 6155 */
6156 6156 if (rval == ESPIPE) {
6157 6157 rval = EIO;
6158 6158 if ((uint64_t)mtop->mt_count != un->un_pos.lgclblkno) {
6159 6159 mtop->mt_op = MTTELL;
6160 6160 mtop->mt_count = un->un_pos.lgclblkno;
6161 6161 }
6162 6162 }
6163 6163 break;
6164 6164
6165 6165 case MTLOCK:
6166 6166 if (st_cmd(un, SCMD_DOORLOCK, MR_LOCK, SYNC_CMD)) {
6167 6167 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
6168 6168 "st_do_mtioctop : EIO : MTLOCK");
6169 6169 rval = EIO;
6170 6170 }
6171 6171 break;
6172 6172
6173 6173 case MTUNLOCK:
6174 6174 if (st_cmd(un, SCMD_DOORLOCK, MR_UNLOCK, SYNC_CMD)) {
6175 6175 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
6176 6176 "st_do_mtioctop : EIO : MTUNLOCK");
6177 6177 rval = EIO;
6178 6178 }
6179 6179 break;
6180 6180
6181 6181 default:
6182 6182 rval = ENOTTY;
6183 6183 }
6184 6184
6185 6185 return (rval);
6186 6186 }
6187 6187
6188 6188
6189 6189 /*
6190 6190 * Run a command for uscsi ioctl.
6191 6191 */
6192 6192 static int
6193 6193 st_uscsi_cmd(struct scsi_tape *un, struct uscsi_cmd *ucmd, int flag)
6194 6194 {
6195 6195 struct uscsi_cmd *uscmd;
6196 6196 struct buf *bp;
6197 6197 enum uio_seg uioseg;
6198 6198 int offline_state = 0;
6199 6199 int err = 0;
6200 6200 dev_t dev = un->un_dev;
6201 6201
6202 6202 ST_FUNC(ST_DEVINFO, st_uscsi_cmd);
6203 6203
6204 6204 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
6205 6205 "st_uscsi_cmd(dev = 0x%lx)\n", un->un_dev);
6206 6206
6207 6207 ASSERT(mutex_owned(ST_MUTEX));
6208 6208
6209 6209 /*
6210 6210 * We really don't know what commands are coming in here and
6211 6211 * we don't want to limit the commands coming in.
6212 6212 *
6213 6213 * If st_tape_init() gets called from st_strategy(), then we
6214 6214 * will hang the process waiting for un->un_sbuf_busy to be cleared,
6215 6215 * which it never will, as we set it below. To prevent
6216 6216 * st_tape_init() from getting called, we have to set state to other
6217 6217 * than ST_STATE_OFFLINE, so we choose ST_STATE_INITIALIZING, which
6218 6218 * achieves this purpose already.
6219 6219 *
6220 6220 * We use offline_state to preserve the OFFLINE state, if it exists,
6221 6221 * so other entry points to the driver might have the chance to call
6222 6222 * st_tape_init().
6223 6223 */
6224 6224 if (un->un_state == ST_STATE_OFFLINE) {
6225 6225 un->un_laststate = ST_STATE_OFFLINE;
6226 6226 un->un_state = ST_STATE_INITIALIZING;
6227 6227 offline_state = 1;
6228 6228 }
6229 6229
6230 6230 mutex_exit(ST_MUTEX);
6231 6231 err = scsi_uscsi_alloc_and_copyin((intptr_t)ucmd, flag, ROUTE, &uscmd);
6232 6232 mutex_enter(ST_MUTEX);
6233 6233 if (err != 0) {
6234 6234 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
6235 6235 "st_uscsi_cmd: scsi_uscsi_alloc_and_copyin failed\n");
6236 6236 goto exit;
6237 6237 }
6238 6238
6239 6239 uioseg = (flag & FKIOCTL) ? UIO_SYSSPACE : UIO_USERSPACE;
6240 6240
6241 6241 /* check to see if this command requires the drive to be reserved */
6242 6242 if (uscmd->uscsi_cdb != NULL) {
6243 6243 err = st_check_cdb_for_need_to_reserve(un,
6244 6244 (uchar_t *)uscmd->uscsi_cdb);
6245 6245 if (err) {
6246 6246 goto exit_free;
6247 6247 }
6248 6248 /*
6249 6249 * If this is a space command we need to save the starting
6250 6250 * point so we can retry from there if the command fails.
6251 6251 */
6252 6252 if ((uscmd->uscsi_cdb[0] == SCMD_SPACE) ||
6253 6253 (uscmd->uscsi_cdb[0] == (char)SCMD_SPACE_G4)) {
6254 6254 (void) st_update_block_pos(un, st_cmd, 0);
6255 6255 }
6256 6256 }
6257 6257
6258 6258 /*
6259 6259 * Forground should not be doing anything while recovery is active.
6260 6260 */
6261 6261 ASSERT(un->un_recov_buf_busy == 0);
6262 6262
6263 6263 /*
6264 6264 * Get buffer resources...
6265 6265 */
6266 6266 while (un->un_sbuf_busy)
6267 6267 cv_wait(&un->un_sbuf_cv, ST_MUTEX);
6268 6268 un->un_sbuf_busy = 1;
6269 6269
6270 6270 #ifdef STDEBUG
6271 6271 if ((uscmd->uscsi_cdb != NULL) && (st_debug & 0x7) > 6) {
6272 6272 int rw = (uscmd->uscsi_flags & USCSI_READ) ? B_READ : B_WRITE;
6273 6273 st_print_cdb(ST_DEVINFO, st_label, SCSI_DEBUG,
6274 6274 "uscsi cdb", uscmd->uscsi_cdb);
6275 6275 if (uscmd->uscsi_buflen) {
6276 6276 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
6277 6277 "uscsi %s of %ld bytes %s %s space\n",
6278 6278 (rw == B_READ) ? rd_str : wr_str,
6279 6279 uscmd->uscsi_buflen,
6280 6280 (rw == B_READ) ? "to" : "from",
6281 6281 (uioseg == UIO_SYSSPACE) ? "system" : "user");
6282 6282 }
6283 6283 }
6284 6284 #endif /* STDEBUG */
6285 6285
6286 6286 /*
6287 6287 * Although st_uscsi_cmd() never makes use of these
6288 6288 * now, we are just being safe and consistent.
6289 6289 */
6290 6290 uscmd->uscsi_flags &= ~(USCSI_NOINTR | USCSI_NOPARITY |
6291 6291 USCSI_OTAG | USCSI_HTAG | USCSI_HEAD);
6292 6292
6293 6293 un->un_srqbufp = uscmd->uscsi_rqbuf;
6294 6294 bp = un->un_sbufp;
6295 6295 bzero(bp, sizeof (buf_t));
6296 6296 if (uscmd->uscsi_cdb != NULL) {
6297 6297 bp->b_forw = (struct buf *)(uintptr_t)uscmd->uscsi_cdb[0];
6298 6298 }
6299 6299 bp->b_back = (struct buf *)uscmd;
6300 6300
6301 6301 mutex_exit(ST_MUTEX);
6302 6302 err = scsi_uscsi_handle_cmd(dev, uioseg, uscmd, st_strategy, bp, NULL);
6303 6303 mutex_enter(ST_MUTEX);
6304 6304
6305 6305 /*
6306 6306 * If scsi reset successful, don't write any filemarks.
6307 6307 */
6308 6308 if ((err == 0) && (uscmd->uscsi_flags &
6309 6309 (USCSI_RESET_LUN | USCSI_RESET_TARGET | USCSI_RESET_ALL))) {
6310 6310 un->un_fmneeded = 0;
6311 6311 }
6312 6312
6313 6313 exit_free:
6314 6314 /*
6315 6315 * Free resources
6316 6316 */
6317 6317 un->un_sbuf_busy = 0;
6318 6318 un->un_srqbufp = NULL;
6319 6319
6320 6320 /*
6321 6321 * If was a space command need to update logical block position.
6322 6322 * If the command failed such that positioning is invalid, Don't
6323 6323 * update the position as the user must do this to validate the
6324 6324 * position for data protection.
6325 6325 */
6326 6326 if ((uscmd->uscsi_cdb != NULL) &&
6327 6327 ((uscmd->uscsi_cdb[0] == SCMD_SPACE) ||
6328 6328 (uscmd->uscsi_cdb[0] == (char)SCMD_SPACE_G4)) &&
6329 6329 (un->un_pos.pmode != invalid)) {
6330 6330 un->un_running.pmode = invalid;
6331 6331 (void) st_update_block_pos(un, st_cmd, 1);
6332 6332 /*
6333 6333 * Set running position to invalid so it updates on the
6334 6334 * next command.
6335 6335 */
6336 6336 un->un_running.pmode = invalid;
6337 6337 }
6338 6338 cv_signal(&un->un_sbuf_cv);
6339 6339 mutex_exit(ST_MUTEX);
6340 6340 (void) scsi_uscsi_copyout_and_free((intptr_t)ucmd, uscmd);
6341 6341 mutex_enter(ST_MUTEX);
6342 6342 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
6343 6343 "st_uscsi_cmd returns 0x%x\n", err);
6344 6344
6345 6345 exit:
6346 6346 /* don't lose offline state */
6347 6347 if (offline_state) {
6348 6348 un->un_state = ST_STATE_OFFLINE;
6349 6349 }
6350 6350
6351 6351 ASSERT(mutex_owned(ST_MUTEX));
6352 6352 return (err);
6353 6353 }
6354 6354
6355 6355 static int
6356 6356 st_write_fm(dev_t dev, int wfm)
6357 6357 {
6358 6358 int i;
6359 6359 int rval;
6360 6360
6361 6361 GET_SOFT_STATE(dev);
6362 6362
6363 6363 ST_FUNC(ST_DEVINFO, st_write_fm);
6364 6364
6365 6365 ASSERT(mutex_owned(ST_MUTEX));
6366 6366
6367 6367 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
6368 6368 "st_write_fm(dev = 0x%lx, wfm = %d)\n", dev, wfm);
6369 6369
6370 6370 /*
6371 6371 * write one filemark at the time after EOT
6372 6372 */
6373 6373 if (un->un_pos.eof >= ST_EOT) {
6374 6374 for (i = 0; i < wfm; i++) {
6375 6375 rval = st_cmd(un, SCMD_WRITE_FILE_MARK, 1, SYNC_CMD);
6376 6376 if (rval == EACCES) {
6377 6377 return (rval);
6378 6378 }
6379 6379 if (rval != 0) {
6380 6380 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
6381 6381 "st_write_fm : EIO : write EOT file mark");
6382 6382 return (EIO);
6383 6383 }
6384 6384 }
6385 6385 } else {
6386 6386 rval = st_cmd(un, SCMD_WRITE_FILE_MARK, wfm, SYNC_CMD);
6387 6387 if (rval == EACCES) {
6388 6388 return (rval);
6389 6389 }
6390 6390 if (rval) {
6391 6391 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
6392 6392 "st_write_fm : EIO : write file mark");
6393 6393 return (EIO);
6394 6394 }
6395 6395 }
6396 6396
6397 6397 ASSERT(mutex_owned(ST_MUTEX));
6398 6398 return (0);
6399 6399 }
6400 6400
6401 6401 #ifdef STDEBUG
6402 6402 static void
6403 6403 st_start_dump(struct scsi_tape *un, struct buf *bp)
6404 6404 {
6405 6405 struct scsi_pkt *pkt = BP_PKT(bp);
6406 6406 uchar_t *cdbp = (uchar_t *)pkt->pkt_cdbp;
6407 6407
6408 6408 ST_FUNC(ST_DEVINFO, st_start_dump);
6409 6409
6410 6410 if ((st_debug & 0x7) < 6)
6411 6411 return;
6412 6412 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
6413 6413 "st_start: cmd=0x%p count=%ld resid=%ld flags=0x%x pkt=0x%p\n",
6414 6414 (void *)bp->b_forw, bp->b_bcount,
6415 6415 bp->b_resid, bp->b_flags, (void *)BP_PKT(bp));
6416 6416 st_print_cdb(ST_DEVINFO, st_label, SCSI_DEBUG,
6417 6417 "st_start: cdb", (caddr_t)cdbp);
6418 6418 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
6419 6419 "st_start: fileno=%d, blk=%d\n",
6420 6420 un->un_pos.fileno, un->un_pos.blkno);
6421 6421 }
6422 6422 #endif
6423 6423
6424 6424
6425 6425 /*
6426 6426 * Command start && done functions
6427 6427 */
6428 6428
6429 6429 /*
6430 6430 * st_start()
6431 6431 *
6432 6432 * Called from:
6433 6433 * st_strategy() to start a command.
6434 6434 * st_runout() to retry when scsi_pkt allocation fails on previous attempt(s).
6435 6435 * st_attach() when resuming from power down state.
6436 6436 * st_start_restart() to retry transport when device was previously busy.
6437 6437 * st_done_and_mutex_exit() to start the next command when previous is done.
6438 6438 *
6439 6439 * On entry:
6440 6440 * scsi_pkt may or may not be allocated.
6441 6441 *
6442 6442 */
6443 6443 static void
6444 6444 st_start(struct scsi_tape *un)
6445 6445 {
6446 6446 struct buf *bp;
6447 6447 int status;
6448 6448 int queued;
6449 6449
6450 6450 ST_FUNC(ST_DEVINFO, st_start);
6451 6451 ASSERT(mutex_owned(ST_MUTEX));
6452 6452
6453 6453 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
6454 6454 "st_start(): dev = 0x%lx\n", un->un_dev);
6455 6455
6456 6456 if (un->un_recov_buf_busy) {
6457 6457 /* recovery commands can happen anytime */
6458 6458 bp = un->un_recov_buf;
6459 6459 queued = 0;
6460 6460 } else if (un->un_sbuf_busy) {
6461 6461 /* sbuf commands should only happen with an empty queue. */
6462 6462 ASSERT(un->un_quef == NULL);
6463 6463 ASSERT(un->un_runqf == NULL);
6464 6464 bp = un->un_sbufp;
6465 6465 queued = 0;
6466 6466 } else if (un->un_quef != NULL) {
6467 6467 if (un->un_persistence && un->un_persist_errors) {
6468 6468 return;
6469 6469 }
6470 6470 bp = un->un_quef;
6471 6471 queued = 1;
6472 6472 } else {
6473 6473 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
6474 6474 "st_start() returning no buf found\n");
6475 6475 return;
6476 6476 }
6477 6477
6478 6478 ASSERT((bp->b_flags & B_DONE) == 0);
6479 6479
6480 6480 /*
6481 6481 * Don't send more than un_throttle commands to the HBA
6482 6482 */
6483 6483 if ((un->un_throttle <= 0) || (un->un_ncmds >= un->un_throttle)) {
6484 6484 /*
6485 6485 * if doing recovery we know there is outstanding commands.
6486 6486 */
6487 6487 if (bp != un->un_recov_buf) {
6488 6488 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
6489 6489 "st_start returning throttle = %d or ncmds = %d\n",
6490 6490 un->un_throttle, un->un_ncmds);
6491 6491 if (un->un_ncmds == 0) {
6492 6492 typedef void (*func)();
6493 6493 func fnc = (func)st_runout;
6494 6494
6495 6495 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
6496 6496 "Sending delayed start to st_runout()\n");
6497 6497 mutex_exit(ST_MUTEX);
6498 6498 (void) timeout(fnc, un, drv_usectohz(1000000));
6499 6499 mutex_enter(ST_MUTEX);
6500 6500 }
6501 6501 return;
6502 6502 }
6503 6503 }
6504 6504
6505 6505 /*
6506 6506 * If the buf has no scsi_pkt call st_make_cmd() to get one and
6507 6507 * build the command.
6508 6508 */
6509 6509 if (BP_PKT(bp) == NULL) {
6510 6510 ASSERT((bp->b_flags & B_DONE) == 0);
6511 6511 st_make_cmd(un, bp, st_runout);
6512 6512 ASSERT((bp->b_flags & B_DONE) == 0);
6513 6513 status = geterror(bp);
6514 6514
6515 6515 /*
6516 6516 * Some HBA's don't call bioerror() to set an error.
6517 6517 * And geterror() returns zero if B_ERROR is not set.
6518 6518 * So if we get zero we must check b_error.
6519 6519 */
6520 6520 if (status == 0 && bp->b_error != 0) {
6521 6521 status = bp->b_error;
6522 6522 bioerror(bp, status);
6523 6523 }
6524 6524
6525 6525 /*
6526 6526 * Some HBA's convert DDI_DMA_NORESOURCES into ENOMEM.
6527 6527 * In tape ENOMEM has special meaning so we'll change it.
6528 6528 */
6529 6529 if (status == ENOMEM) {
6530 6530 status = 0;
6531 6531 bioerror(bp, status);
6532 6532 }
6533 6533
6534 6534 /*
6535 6535 * Did it fail and is it retryable?
6536 6536 * If so return and wait for the callback through st_runout.
6537 6537 * Also looks like scsi_init_pkt() will setup a callback even
6538 6538 * if it isn't retryable.
6539 6539 */
6540 6540 if (BP_PKT(bp) == NULL) {
6541 6541 if (status == 0) {
6542 6542 /*
6543 6543 * If first attempt save state.
6544 6544 */
6545 6545 if (un->un_state != ST_STATE_RESOURCE_WAIT) {
6546 6546 un->un_laststate = un->un_state;
6547 6547 un->un_state = ST_STATE_RESOURCE_WAIT;
6548 6548 }
6549 6549 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
6550 6550 "temp no resources for pkt\n");
6551 6551 } else if (status == EINVAL) {
6552 6552 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
6553 6553 "scsi_init_pkt rejected pkt as too big\n");
6554 6554 if (un->un_persistence) {
6555 6555 st_set_pe_flag(un);
6556 6556 }
6557 6557 } else {
6558 6558 /*
6559 6559 * Unlikely that it would be retryable then not.
6560 6560 */
6561 6561 if (un->un_state == ST_STATE_RESOURCE_WAIT) {
6562 6562 un->un_state = un->un_laststate;
6563 6563 }
6564 6564 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
6565 6565 "perm no resources for pkt errno = 0x%x\n",
6566 6566 status);
6567 6567 }
6568 6568 return;
6569 6569 }
6570 6570 /*
6571 6571 * Worked this time set the state back.
6572 6572 */
6573 6573 if (un->un_state == ST_STATE_RESOURCE_WAIT) {
6574 6574 un->un_state = un->un_laststate;
6575 6575 }
6576 6576 }
6577 6577
6578 6578 if (queued) {
6579 6579 /*
6580 6580 * move from waitq to runq
6581 6581 */
6582 6582 (void) st_remove_from_queue(&un->un_quef, &un->un_quel, bp);
6583 6583 st_add_to_queue(&un->un_runqf, &un->un_runql, un->un_runql, bp);
6584 6584 }
6585 6585
6586 6586
6587 6587 #ifdef STDEBUG
6588 6588 st_start_dump(un, bp);
6589 6589 #endif
6590 6590
6591 6591 /* could not get here if throttle was zero */
6592 6592 un->un_last_throttle = un->un_throttle;
6593 6593 un->un_throttle = 0; /* so nothing else will come in here */
6594 6594 un->un_ncmds++;
6595 6595
6596 6596 ST_DO_KSTATS(bp, kstat_waitq_to_runq);
6597 6597
6598 6598 status = st_transport(un, BP_PKT(bp));
6599 6599
6600 6600 if (un->un_last_throttle) {
6601 6601 un->un_throttle = un->un_last_throttle;
6602 6602 }
6603 6603
6604 6604 if (status != TRAN_ACCEPT) {
6605 6605 ST_DO_KSTATS(bp, kstat_runq_back_to_waitq);
6606 6606 ST_DEBUG(ST_DEVINFO, st_label, CE_WARN,
6607 6607 "Unhappy transport packet status 0x%x\n", status);
6608 6608
6609 6609 if (status == TRAN_BUSY) {
6610 6610 pkt_info *pkti = BP_PKT(bp)->pkt_private;
6611 6611
6612 6612 /*
6613 6613 * If command recovery is enabled and this isn't
6614 6614 * a recovery command try command recovery.
6615 6615 */
6616 6616 if (pkti->privatelen == sizeof (recov_info) &&
6617 6617 bp != un->un_recov_buf) {
6618 6618 ST_RECOV(ST_DEVINFO, st_label, CE_WARN,
6619 6619 "Command Recovery called on busy send\n");
6620 6620 if (st_command_recovery(un, BP_PKT(bp),
6621 6621 ATTEMPT_RETRY) == JUST_RETURN) {
6622 6622 return;
6623 6623 }
6624 6624 } else {
6625 6625 mutex_exit(ST_MUTEX);
6626 6626 if (st_handle_start_busy(un, bp,
6627 6627 ST_TRAN_BUSY_TIMEOUT, queued) == 0) {
6628 6628 mutex_enter(ST_MUTEX);
6629 6629 return;
6630 6630 }
6631 6631 /*
6632 6632 * if too many retries, fail the transport
6633 6633 */
6634 6634 mutex_enter(ST_MUTEX);
6635 6635 }
6636 6636 }
6637 6637 scsi_log(ST_DEVINFO, st_label, CE_WARN,
6638 6638 "transport rejected %d\n", status);
6639 6639 bp->b_resid = bp->b_bcount;
6640 6640
6641 6641 ST_DO_KSTATS(bp, kstat_waitq_exit);
6642 6642 ST_DO_ERRSTATS(un, st_transerrs);
6643 6643 if ((bp == un->un_recov_buf) && (status == TRAN_BUSY)) {
6644 6644 st_bioerror(bp, EBUSY);
6645 6645 } else {
6646 6646 st_bioerror(bp, EIO);
6647 6647 st_set_pe_flag(un);
6648 6648 }
6649 6649 st_done_and_mutex_exit(un, bp);
6650 6650 mutex_enter(ST_MUTEX);
6651 6651 }
6652 6652
6653 6653 ASSERT(mutex_owned(ST_MUTEX));
6654 6654 }
6655 6655
6656 6656 /*
6657 6657 * if the transport is busy, then put this bp back on the waitq
6658 6658 */
6659 6659 static int
6660 6660 st_handle_start_busy(struct scsi_tape *un, struct buf *bp,
6661 6661 clock_t timeout_interval, int queued)
6662 6662 {
6663 6663
6664 6664 pkt_info *pktinfo = BP_PKT(bp)->pkt_private;
6665 6665
6666 6666 ST_FUNC(ST_DEVINFO, st_handle_start_busy);
6667 6667
6668 6668 mutex_enter(ST_MUTEX);
6669 6669
6670 6670 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
6671 6671 "st_handle_start_busy()\n");
6672 6672
6673 6673 /*
6674 6674 * Check to see if we hit the retry timeout and one last check for
6675 6675 * making sure this is the last on the runq, if it is not, we have
6676 6676 * to fail
6677 6677 */
6678 6678 if ((pktinfo->str_retry_cnt++ > st_retry_count) ||
6679 6679 ((queued) && (un->un_runql != bp))) {
6680 6680 mutex_exit(ST_MUTEX);
6681 6681 return (-1);
6682 6682 }
6683 6683
6684 6684 if (queued) {
6685 6685 /* put the bp back on the waitq */
6686 6686 st_add_to_queue(&un->un_quef, &un->un_quel, un->un_quef, bp);
6687 6687 }
6688 6688
6689 6689 /*
6690 6690 * Decrement un_ncmds so that this
6691 6691 * gets thru' st_start() again.
6692 6692 */
6693 6693 un->un_ncmds--;
6694 6694
6695 6695 if (queued) {
6696 6696 /*
6697 6697 * since this is an error case, we won't have to do this list
6698 6698 * walking much. We've already made sure this bp was the
6699 6699 * last on the runq
6700 6700 */
6701 6701 (void) st_remove_from_queue(&un->un_runqf, &un->un_runql, bp);
6702 6702
6703 6703 /*
6704 6704 * send a marker pkt, if appropriate
6705 6705 */
6706 6706 st_hba_unflush(un);
6707 6707
6708 6708 }
6709 6709 /*
6710 6710 * all queues are aligned, we are just waiting to
6711 6711 * transport, don't alloc any more buf p's, when
6712 6712 * st_start is reentered.
6713 6713 */
6714 6714 (void) timeout(st_start_restart, un, timeout_interval);
6715 6715
6716 6716 mutex_exit(ST_MUTEX);
6717 6717 return (0);
6718 6718 }
6719 6719
6720 6720
6721 6721 /*
6722 6722 * st_runout a callback that is called what a resource allocatation failed
6723 6723 */
6724 6724 static int
6725 6725 st_runout(caddr_t arg)
6726 6726 {
6727 6727 struct scsi_tape *un = (struct scsi_tape *)arg;
6728 6728 struct buf *bp;
6729 6729 int queued;
6730 6730
6731 6731 ASSERT(un != NULL);
6732 6732
6733 6733 ST_FUNC(ST_DEVINFO, st_runout);
6734 6734
6735 6735 mutex_enter(ST_MUTEX);
6736 6736
6737 6737 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG, "st_runout()\n");
6738 6738
6739 6739 if (un->un_recov_buf_busy != 0) {
6740 6740 bp = un->un_recov_buf;
6741 6741 queued = 0;
6742 6742 } else if (un->un_sbuf_busy != 0) {
6743 6743 /* sbuf commands should only happen with an empty queue. */
6744 6744 ASSERT(un->un_quef == NULL);
6745 6745 ASSERT(un->un_runqf == NULL);
6746 6746 bp = un->un_sbufp;
6747 6747 queued = 0;
6748 6748 } else if (un->un_quef != NULL) {
6749 6749 bp = un->un_quef;
6750 6750 if (un->un_persistence && un->un_persist_errors) {
6751 6751 mutex_exit(ST_MUTEX);
6752 6752 bp->b_resid = bp->b_bcount;
6753 6753 biodone(bp);
6754 6754 return (1);
6755 6755 }
6756 6756 queued = 1;
6757 6757 } else {
6758 6758 ASSERT(1 == 0);
6759 6759 mutex_exit(ST_MUTEX);
6760 6760 return (1);
6761 6761 }
6762 6762
6763 6763 /*
6764 6764 * failed scsi_init_pkt(). If errno is zero its retryable.
6765 6765 */
6766 6766 if ((bp != NULL) && (geterror(bp) != 0)) {
6767 6767
6768 6768 scsi_log(ST_DEVINFO, st_label, CE_WARN,
6769 6769 "errors after pkt alloc (b_flags=0x%x, b_error=0x%x)\n",
6770 6770 bp->b_flags, geterror(bp));
6771 6771 ASSERT((bp->b_flags & B_DONE) == 0);
6772 6772
6773 6773 if (queued) {
6774 6774 (void) st_remove_from_queue(&un->un_quef, &un->un_quel,
6775 6775 bp);
6776 6776 }
6777 6777 mutex_exit(ST_MUTEX);
6778 6778
6779 6779 ASSERT((bp->b_flags & B_DONE) == 0);
6780 6780
6781 6781 /*
6782 6782 * Set resid, Error already set, then unblock calling thread.
6783 6783 */
6784 6784 bp->b_resid = bp->b_bcount;
6785 6785 biodone(bp);
6786 6786 } else {
6787 6787 /*
6788 6788 * Try Again
6789 6789 */
6790 6790 st_start(un);
6791 6791 mutex_exit(ST_MUTEX);
6792 6792 }
6793 6793
6794 6794 /*
6795 6795 * Comments courtesy of sd.c
6796 6796 * The scsi_init_pkt routine allows for the callback function to
6797 6797 * return a 0 indicating the callback should be rescheduled or a 1
6798 6798 * indicating not to reschedule. This routine always returns 1
6799 6799 * because the driver always provides a callback function to
6800 6800 * scsi_init_pkt. This results in a callback always being scheduled
6801 6801 * (via the scsi_init_pkt callback implementation) if a resource
6802 6802 * failure occurs.
6803 6803 */
6804 6804
6805 6805 return (1);
6806 6806 }
6807 6807
6808 6808 /*
6809 6809 * st_done_and_mutex_exit()
6810 6810 * - remove bp from runq
6811 6811 * - start up the next request
6812 6812 * - if this was an asynch bp, clean up
6813 6813 * - exit with released mutex
6814 6814 */
6815 6815 static void
6816 6816 st_done_and_mutex_exit(struct scsi_tape *un, struct buf *bp)
6817 6817 {
6818 6818 int pe_flagged = 0;
6819 6819 struct scsi_pkt *pkt = BP_PKT(bp);
6820 6820 pkt_info *pktinfo = pkt->pkt_private;
6821 6821
6822 6822 ASSERT(MUTEX_HELD(&un->un_sd->sd_mutex));
6823 6823 #if !defined(lint)
6824 6824 _NOTE(LOCK_RELEASED_AS_SIDE_EFFECT(&un->un_sd->sd_mutex))
6825 6825 #endif
6826 6826
6827 6827 ST_FUNC(ST_DEVINFO, st_done_and_mutex_exit);
6828 6828
6829 6829 ASSERT(mutex_owned(ST_MUTEX));
6830 6830
6831 6831 (void) st_remove_from_queue(&un->un_runqf, &un->un_runql, bp);
6832 6832
6833 6833 un->un_ncmds--;
6834 6834 cv_signal(&un->un_queue_cv);
6835 6835
6836 6836 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
6837 6837 "st_done_and_mutex_exit(): cmd=0x%x count=%ld resid=%ld flags="
6838 6838 "0x%x\n", pkt->pkt_cdbp[0], bp->b_bcount,
6839 6839 bp->b_resid, bp->b_flags);
6840 6840
6841 6841
6842 6842 /*
6843 6843 * update kstats with transfer count info
6844 6844 */
6845 6845 if (un->un_stats && (bp != un->un_sbufp) && IS_RW(bp)) {
6846 6846 uint32_t n_done = bp->b_bcount - bp->b_resid;
6847 6847 if (bp->b_flags & B_READ) {
6848 6848 IOSP->reads++;
6849 6849 IOSP->nread += n_done;
6850 6850 } else {
6851 6851 IOSP->writes++;
6852 6852 IOSP->nwritten += n_done;
6853 6853 }
6854 6854 }
6855 6855
6856 6856 /*
6857 6857 * Start the next one before releasing resources on this one, if
6858 6858 * there is something on the queue and persistent errors has not been
6859 6859 * flagged
6860 6860 */
6861 6861
6862 6862 if ((pe_flagged = (un->un_persistence && un->un_persist_errors)) != 0) {
6863 6863 un->un_last_resid = bp->b_resid;
6864 6864 un->un_last_count = bp->b_bcount;
6865 6865 }
6866 6866
6867 6867 if (un->un_pwr_mgmt == ST_PWR_SUSPENDED) {
6868 6868 cv_broadcast(&un->un_tape_busy_cv);
6869 6869 } else if (un->un_quef && un->un_throttle && !pe_flagged &&
6870 6870 (bp != un->un_recov_buf)) {
6871 6871 st_start(un);
6872 6872 }
6873 6873
6874 6874 un->un_retry_ct = max(pktinfo->pkt_retry_cnt, pktinfo->str_retry_cnt);
6875 6875
6876 6876 if (bp == un->un_sbufp && (bp->b_flags & B_ASYNC)) {
6877 6877 /*
6878 6878 * Since we marked this ourselves as ASYNC,
6879 6879 * there isn't anybody around waiting for
6880 6880 * completion any more.
6881 6881 */
6882 6882 uchar_t *cmd = pkt->pkt_cdbp;
6883 6883 if (*cmd == SCMD_READ || *cmd == SCMD_WRITE) {
6884 6884 bp->b_un.b_addr = (caddr_t)0;
6885 6885 }
6886 6886 ST_DEBUG(ST_DEVINFO, st_label, CE_NOTE,
6887 6887 "st_done_and_mutex_exit(async): freeing pkt\n");
6888 6888 st_print_cdb(ST_DEVINFO, st_label, CE_NOTE,
6889 6889 "CDB sent with B_ASYNC", (caddr_t)cmd);
6890 6890 if (pkt) {
6891 6891 scsi_destroy_pkt(pkt);
6892 6892 }
6893 6893 un->un_sbuf_busy = 0;
6894 6894 cv_signal(&un->un_sbuf_cv);
6895 6895 mutex_exit(ST_MUTEX);
6896 6896 return;
6897 6897 }
6898 6898
6899 6899 if (bp == un->un_sbufp && BP_UCMD(bp)) {
6900 6900 /*
6901 6901 * Copy status from scsi_pkt to uscsi_cmd
6902 6902 * since st_uscsi_cmd needs it
6903 6903 */
6904 6904 BP_UCMD(bp)->uscsi_status = SCBP_C(BP_PKT(bp));
6905 6905 }
6906 6906
6907 6907
6908 6908 #ifdef STDEBUG
6909 6909 if (((st_debug & 0x7) >= 4) &&
6910 6910 (((un->un_pos.blkno % 100) == 0) ||
6911 6911 (un->un_persistence && un->un_persist_errors))) {
6912 6912
6913 6913 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
6914 6914 "st_d_a_m_exit(): ncmds = %d, thr = %d, "
6915 6915 "un_errno = %d, un_pe = %d\n",
6916 6916 un->un_ncmds, un->un_throttle, un->un_errno,
6917 6917 un->un_persist_errors);
6918 6918 }
6919 6919
6920 6920 #endif
6921 6921
6922 6922 mutex_exit(ST_MUTEX);
6923 6923 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
6924 6924 "st_done_and_mutex_exit: freeing pkt\n");
6925 6925
6926 6926 if (pkt) {
6927 6927 scsi_destroy_pkt(pkt);
6928 6928 }
6929 6929
6930 6930 biodone(bp);
6931 6931
6932 6932 /*
6933 6933 * now that we biodoned that command, if persistent errors have been
6934 6934 * flagged, flush the waitq
6935 6935 */
6936 6936 if (pe_flagged)
6937 6937 st_flush(un);
6938 6938 }
6939 6939
6940 6940
6941 6941 /*
6942 6942 * Tape error, flush tape driver queue.
6943 6943 */
6944 6944 static void
6945 6945 st_flush(struct scsi_tape *un)
6946 6946 {
6947 6947 struct buf *bp;
6948 6948
6949 6949 ST_FUNC(ST_DEVINFO, st_flush);
6950 6950
6951 6951 mutex_enter(ST_MUTEX);
6952 6952
6953 6953 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
6954 6954 "st_flush(), ncmds = %d, quef = 0x%p\n",
6955 6955 un->un_ncmds, (void *)un->un_quef);
6956 6956
6957 6957 /*
6958 6958 * if we still have commands outstanding, wait for them to come in
6959 6959 * before flushing the queue, and make sure there is a queue
6960 6960 */
6961 6961 if (un->un_ncmds || !un->un_quef)
6962 6962 goto exit;
6963 6963
6964 6964 /*
6965 6965 * we have no more commands outstanding, so let's deal with special
6966 6966 * cases in the queue for EOM and FM. If we are here, and un_errno
6967 6967 * is 0, then we know there was no error and we return a 0 read or
6968 6968 * write before showing errors
6969 6969 */
6970 6970
6971 6971 /* Flush the wait queue. */
6972 6972 while ((bp = un->un_quef) != NULL) {
6973 6973 un->un_quef = bp->b_actf;
6974 6974
6975 6975 bp->b_resid = bp->b_bcount;
6976 6976
6977 6977 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
6978 6978 "st_flush() : blkno=%d, err=%d, b_bcount=%ld\n",
6979 6979 un->un_pos.blkno, un->un_errno, bp->b_bcount);
6980 6980
6981 6981 st_set_pe_errno(un);
6982 6982
6983 6983 bioerror(bp, un->un_errno);
6984 6984
6985 6985 mutex_exit(ST_MUTEX);
6986 6986 /* it should have one, but check anyway */
6987 6987 if (BP_PKT(bp)) {
6988 6988 scsi_destroy_pkt(BP_PKT(bp));
6989 6989 }
6990 6990 biodone(bp);
6991 6991 mutex_enter(ST_MUTEX);
6992 6992 }
6993 6993
6994 6994 /*
6995 6995 * It's not a bad practice to reset the
6996 6996 * waitq tail pointer to NULL.
6997 6997 */
6998 6998 un->un_quel = NULL;
6999 6999
7000 7000 exit:
7001 7001 /* we mucked with the queue, so let others know about it */
7002 7002 cv_signal(&un->un_queue_cv);
7003 7003 mutex_exit(ST_MUTEX);
7004 7004 }
7005 7005
7006 7006
7007 7007 /*
7008 7008 * Utility functions
7009 7009 */
7010 7010 static int
7011 7011 st_determine_generic(struct scsi_tape *un)
7012 7012 {
7013 7013 int bsize;
7014 7014 static char *cart = "0.25 inch cartridge";
7015 7015 char *sizestr;
7016 7016
7017 7017 ST_FUNC(ST_DEVINFO, st_determine_generic);
7018 7018
7019 7019 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
7020 7020 "st_determine_generic(un = 0x%p)\n", (void*)un);
7021 7021
7022 7022 ASSERT(mutex_owned(ST_MUTEX));
7023 7023
7024 7024 if (st_modesense(un)) {
7025 7025 return (-1);
7026 7026 }
7027 7027
7028 7028 bsize = (un->un_mspl->high_bl << 16) |
7029 7029 (un->un_mspl->mid_bl << 8) |
7030 7030 (un->un_mspl->low_bl);
7031 7031
7032 7032 if (bsize == 0) {
7033 7033 un->un_dp->options |= ST_VARIABLE;
7034 7034 un->un_dp->bsize = 0;
7035 7035 un->un_bsize = 0;
7036 7036 } else if (bsize > ST_MAXRECSIZE_FIXED) {
7037 7037 /*
7038 7038 * record size of this device too big.
7039 7039 * try and convert it to variable record length.
7040 7040 *
7041 7041 */
7042 7042 un->un_dp->options |= ST_VARIABLE;
7043 7043 if (st_change_block_size(un, 0) != 0) {
7044 7044 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
7045 7045 "Fixed Record Size %d is too large\n", bsize);
7046 7046 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
7047 7047 "Cannot switch to variable record size\n");
7048 7048 un->un_dp->options &= ~ST_VARIABLE;
7049 7049 return (-1);
7050 7050 }
7051 7051 } else if (st_change_block_size(un, 0) == 0) {
7052 7052 /*
7053 7053 * If the drive was set to a non zero block size,
7054 7054 * See if it can be set to a zero block size.
7055 7055 * If it works, ST_VARIABLE so user can set it as they want.
7056 7056 */
7057 7057 un->un_dp->options |= ST_VARIABLE;
7058 7058 un->un_dp->bsize = 0;
7059 7059 un->un_bsize = 0;
7060 7060 } else {
7061 7061 un->un_dp->bsize = bsize;
7062 7062 un->un_bsize = bsize;
7063 7063 }
7064 7064
7065 7065
7066 7066 switch (un->un_mspl->density) {
7067 7067 default:
7068 7068 case 0x0:
7069 7069 /*
7070 7070 * default density, cannot determine any other
7071 7071 * information.
7072 7072 */
7073 7073 sizestr = "Unknown type- assuming 0.25 inch cartridge";
7074 7074 un->un_dp->type = ST_TYPE_DEFAULT;
7075 7075 un->un_dp->options |= (ST_AUTODEN_OVERRIDE|ST_QIC);
7076 7076 break;
7077 7077 case 0x1:
7078 7078 case 0x2:
7079 7079 case 0x3:
7080 7080 case 0x6:
7081 7081 /*
7082 7082 * 1/2" reel
7083 7083 */
7084 7084 sizestr = "0.50 inch reel";
7085 7085 un->un_dp->type = ST_TYPE_REEL;
7086 7086 un->un_dp->options |= ST_REEL;
7087 7087 un->un_dp->densities[0] = 0x1;
7088 7088 un->un_dp->densities[1] = 0x2;
7089 7089 un->un_dp->densities[2] = 0x6;
7090 7090 un->un_dp->densities[3] = 0x3;
7091 7091 break;
7092 7092 case 0x4:
7093 7093 case 0x5:
7094 7094 case 0x7:
7095 7095 case 0x0b:
7096 7096
7097 7097 /*
7098 7098 * Quarter inch.
7099 7099 */
7100 7100 sizestr = cart;
7101 7101 un->un_dp->type = ST_TYPE_DEFAULT;
7102 7102 un->un_dp->options |= ST_QIC;
7103 7103
7104 7104 un->un_dp->densities[1] = 0x4;
7105 7105 un->un_dp->densities[2] = 0x5;
7106 7106 un->un_dp->densities[3] = 0x7;
7107 7107 un->un_dp->densities[0] = 0x0b;
7108 7108 break;
7109 7109
7110 7110 case 0x0f:
7111 7111 case 0x10:
7112 7112 case 0x11:
7113 7113 case 0x12:
7114 7114 /*
7115 7115 * QIC-120, QIC-150, QIC-320, QIC-600
7116 7116 */
7117 7117 sizestr = cart;
7118 7118 un->un_dp->type = ST_TYPE_DEFAULT;
7119 7119 un->un_dp->options |= ST_QIC;
7120 7120 un->un_dp->densities[0] = 0x0f;
7121 7121 un->un_dp->densities[1] = 0x10;
7122 7122 un->un_dp->densities[2] = 0x11;
7123 7123 un->un_dp->densities[3] = 0x12;
7124 7124 break;
7125 7125
7126 7126 case 0x09:
7127 7127 case 0x0a:
7128 7128 case 0x0c:
7129 7129 case 0x0d:
7130 7130 /*
7131 7131 * 1/2" cartridge tapes. Include HI-TC.
7132 7132 */
7133 7133 sizestr = cart;
7134 7134 sizestr[2] = '5';
7135 7135 sizestr[3] = '0';
7136 7136 un->un_dp->type = ST_TYPE_HIC;
7137 7137 un->un_dp->densities[0] = 0x09;
7138 7138 un->un_dp->densities[1] = 0x0a;
7139 7139 un->un_dp->densities[2] = 0x0c;
7140 7140 un->un_dp->densities[3] = 0x0d;
7141 7141 break;
7142 7142
7143 7143 case 0x13:
7144 7144 /* DDS-2/DDS-3 scsi spec densities */
7145 7145 case 0x24:
7146 7146 case 0x25:
7147 7147 case 0x26:
7148 7148 sizestr = "DAT Data Storage (DDS)";
7149 7149 un->un_dp->type = ST_TYPE_DAT;
7150 7150 un->un_dp->options |= ST_AUTODEN_OVERRIDE;
7151 7151 break;
7152 7152
7153 7153 case 0x14:
7154 7154 /*
7155 7155 * Helical Scan (Exabyte) devices
7156 7156 */
7157 7157 sizestr = "8mm helical scan cartridge";
7158 7158 un->un_dp->type = ST_TYPE_EXABYTE;
7159 7159 un->un_dp->options |= ST_AUTODEN_OVERRIDE;
7160 7160 break;
7161 7161 }
7162 7162
7163 7163 /*
7164 7164 * Assume LONG ERASE, BSF and BSR
7165 7165 */
7166 7166
7167 7167 un->un_dp->options |=
7168 7168 (ST_LONG_ERASE | ST_UNLOADABLE | ST_BSF | ST_BSR | ST_KNOWS_EOD);
7169 7169
7170 7170 /*
7171 7171 * Only if mode sense data says no buffered write, set NOBUF
7172 7172 */
7173 7173 if (un->un_mspl->bufm == 0)
7174 7174 un->un_dp->options |= ST_NOBUF;
7175 7175
7176 7176 /*
7177 7177 * set up large read and write retry counts
7178 7178 */
7179 7179
7180 7180 un->un_dp->max_rretries = un->un_dp->max_wretries = 1000;
7181 7181
7182 7182 /*
7183 7183 * If this is a 0.50 inch reel tape, and
7184 7184 * it is *not* variable mode, try and
7185 7185 * set it to variable record length
7186 7186 * mode.
7187 7187 */
7188 7188 if ((un->un_dp->options & ST_REEL) && un->un_bsize != 0 &&
7189 7189 (un->un_dp->options & ST_VARIABLE)) {
7190 7190 if (st_change_block_size(un, 0) == 0) {
7191 7191 un->un_dp->bsize = 0;
7192 7192 un->un_mspl->high_bl = un->un_mspl->mid_bl =
7193 7193 un->un_mspl->low_bl = 0;
7194 7194 }
7195 7195 }
7196 7196
7197 7197 /*
7198 7198 * Write to console about type of device found
7199 7199 */
7200 7200 ST_DEBUG6(ST_DEVINFO, st_label, CE_NOTE,
7201 7201 "Generic Drive, Vendor=%s\n\t%s", un->un_dp->name,
7202 7202 sizestr);
7203 7203 if (un->un_dp->options & ST_VARIABLE) {
7204 7204 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
7205 7205 "!Variable record length I/O\n");
7206 7206 } else {
7207 7207 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
7208 7208 "!Fixed record length (%d byte blocks) I/O\n",
7209 7209 un->un_dp->bsize);
7210 7210 }
7211 7211 ASSERT(mutex_owned(ST_MUTEX));
7212 7212 return (0);
7213 7213 }
7214 7214
7215 7215 static int
7216 7216 st_determine_density(struct scsi_tape *un, int rw)
7217 7217 {
7218 7218 int rval = 0;
7219 7219
7220 7220 ST_FUNC(ST_DEVINFO, st_determine_density);
7221 7221
7222 7222 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
7223 7223 "st_determine_density(un = 0x%p, rw = %s)\n",
7224 7224 (void*)un, (rw == B_WRITE ? wr_str: rd_str));
7225 7225
7226 7226 ASSERT(mutex_owned(ST_MUTEX));
7227 7227
7228 7228 /*
7229 7229 * If we're past BOT, density is determined already.
7230 7230 */
7231 7231 if (un->un_pos.pmode == logical) {
7232 7232 if (un->un_pos.lgclblkno != 0) {
7233 7233 goto exit;
7234 7234 }
7235 7235 } else if (un->un_pos.pmode == legacy) {
7236 7236 if ((un->un_pos.fileno != 0) || (un->un_pos.blkno != 0)) {
7237 7237 /*
7238 7238 * XXX: put in a bitch message about attempting to
7239 7239 * XXX: change density past BOT.
7240 7240 */
7241 7241 goto exit;
7242 7242 }
7243 7243 } else {
7244 7244 goto exit;
7245 7245 }
7246 7246 if ((un->un_pos.pmode == logical) &&
7247 7247 (un->un_pos.lgclblkno != 0)) {
7248 7248 goto exit;
7249 7249 }
7250 7250
7251 7251
7252 7252 /*
7253 7253 * If we're going to be writing, we set the density
7254 7254 */
7255 7255 if (rw == 0 || rw == B_WRITE) {
7256 7256 /* un_curdens is used as an index into densities table */
7257 7257 un->un_curdens = MT_DENSITY(un->un_dev);
7258 7258 if (st_set_density(un)) {
7259 7259 rval = -1;
7260 7260 }
7261 7261 goto exit;
7262 7262 }
7263 7263
7264 7264 /*
7265 7265 * If density is known already,
7266 7266 * we don't have to get it again.(?)
7267 7267 */
7268 7268 if (!un->un_density_known) {
7269 7269 if (st_get_density(un)) {
7270 7270 rval = -1;
7271 7271 }
7272 7272 }
7273 7273
7274 7274 exit:
7275 7275 ASSERT(mutex_owned(ST_MUTEX));
7276 7276 return (rval);
7277 7277 }
7278 7278
7279 7279
7280 7280 /*
7281 7281 * Try to determine density. We do this by attempting to read the
7282 7282 * first record off the tape, cycling through the available density
7283 7283 * codes as we go.
7284 7284 */
7285 7285
7286 7286 static int
7287 7287 st_get_density(struct scsi_tape *un)
7288 7288 {
7289 7289 int succes = 0, rval = -1, i;
7290 7290 uint_t size;
7291 7291 uchar_t dens, olddens;
7292 7292
7293 7293 ST_FUNC(ST_DEVINFO, st_get_density);
7294 7294
7295 7295 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
7296 7296 "st_get_density(un = 0x%p)\n", (void*)un);
7297 7297
7298 7298 ASSERT(mutex_owned(ST_MUTEX));
7299 7299
7300 7300 /*
7301 7301 * If Auto Density override is enabled The drive has
7302 7302 * only one density and there is no point in attempting
7303 7303 * find the correct one.
7304 7304 *
7305 7305 * Since most modern drives auto detect the density
7306 7306 * and format of the recorded media before they come
7307 7307 * ready. What this function does is a legacy behavior
7308 7308 * and modern drives not only don't need it, The backup
7309 7309 * utilities that do positioning via uscsi find the un-
7310 7310 * expected rewinds problematic.
7311 7311 *
7312 7312 * The drives that need this are old reel to reel devices.
7313 7313 * I took a swag and said they must be scsi-1 or older.
7314 7314 * I don't beleave there will any of the newer devices
7315 7315 * that need this. There will be some scsi-1 devices that
7316 7316 * don't need this but I don't think they will be using the
7317 7317 * BIG aftermarket backup and restore utilitys.
7318 7318 */
7319 7319 if ((un->un_dp->options & ST_AUTODEN_OVERRIDE) ||
7320 7320 (un->un_sd->sd_inq->inq_ansi > 1)) {
7321 7321 un->un_density_known = 1;
7322 7322 rval = 0;
7323 7323 goto exit;
7324 7324 }
7325 7325
7326 7326 /*
7327 7327 * This will only work on variable record length tapes
7328 7328 * if and only if all variable record length tapes autodensity
7329 7329 * select.
7330 7330 */
7331 7331 size = (unsigned)(un->un_dp->bsize ? un->un_dp->bsize : SECSIZE);
7332 7332 un->un_tmpbuf = kmem_alloc(size, KM_SLEEP);
7333 7333
7334 7334 /*
7335 7335 * Start at the specified density
7336 7336 */
7337 7337
7338 7338 dens = olddens = un->un_curdens = MT_DENSITY(un->un_dev);
7339 7339
7340 7340 for (i = 0; i < NDENSITIES; i++, ((un->un_curdens == NDENSITIES - 1) ?
7341 7341 (un->un_curdens = 0) : (un->un_curdens += 1))) {
7342 7342 /*
7343 7343 * If we've done this density before,
7344 7344 * don't bother to do it again.
7345 7345 */
7346 7346 dens = un->un_dp->densities[un->un_curdens];
7347 7347 if (i > 0 && dens == olddens)
7348 7348 continue;
7349 7349 olddens = dens;
7350 7350 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
7351 7351 "trying density 0x%x\n", dens);
7352 7352 if (st_set_density(un)) {
7353 7353 continue;
7354 7354 }
7355 7355
7356 7356 /*
7357 7357 * XXX - the creates lots of headaches and slowdowns - must
7358 7358 * fix.
7359 7359 */
7360 7360 succes = (st_cmd(un, SCMD_READ, (int)size, SYNC_CMD) == 0);
7361 7361 if (st_cmd(un, SCMD_REWIND, 0, SYNC_CMD)) {
7362 7362 break;
7363 7363 }
7364 7364 if (succes) {
7365 7365 st_init(un);
7366 7366 rval = 0;
7367 7367 un->un_density_known = 1;
7368 7368 break;
7369 7369 }
7370 7370 }
7371 7371 kmem_free(un->un_tmpbuf, size);
7372 7372 un->un_tmpbuf = 0;
7373 7373
7374 7374 exit:
7375 7375 ASSERT(mutex_owned(ST_MUTEX));
7376 7376 return (rval);
7377 7377 }
7378 7378
7379 7379 static int
7380 7380 st_set_density(struct scsi_tape *un)
7381 7381 {
7382 7382 int rval = 0;
7383 7383
7384 7384 ST_FUNC(ST_DEVINFO, st_set_density);
7385 7385
7386 7386 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
7387 7387 "st_set_density(un = 0x%p): density = 0x%x\n", (void*)un,
7388 7388 un->un_dp->densities[un->un_curdens]);
7389 7389
7390 7390 ASSERT(mutex_owned(ST_MUTEX));
7391 7391
7392 7392 un->un_mspl->density = un->un_dp->densities[un->un_curdens];
7393 7393
7394 7394 if ((un->un_dp->options & ST_AUTODEN_OVERRIDE) == 0) {
7395 7395 /*
7396 7396 * If auto density override is not set, Use mode select
7397 7397 * to set density and compression.
7398 7398 */
7399 7399 if (st_modeselect(un)) {
7400 7400 rval = -1;
7401 7401 }
7402 7402 } else if ((un->un_dp->options & ST_MODE_SEL_COMP) != 0) {
7403 7403 /*
7404 7404 * If auto density and mode select compression are set,
7405 7405 * This is a drive with one density code but compression
7406 7406 * can be enabled or disabled.
7407 7407 * Set compression but no need to set density.
7408 7408 */
7409 7409 rval = st_set_compression(un);
7410 7410 if ((rval != 0) && (rval != EALREADY)) {
7411 7411 rval = -1;
7412 7412 } else {
7413 7413 rval = 0;
7414 7414 }
7415 7415 }
7416 7416
7417 7417 /* If sucessful set density and/or compression, mark density known */
7418 7418 if (rval == 0) {
7419 7419 un->un_density_known = 1;
7420 7420 }
7421 7421
7422 7422 ASSERT(mutex_owned(ST_MUTEX));
7423 7423 return (rval);
7424 7424 }
7425 7425
7426 7426 static int
7427 7427 st_loadtape(struct scsi_tape *un)
7428 7428 {
7429 7429 int rval;
7430 7430
7431 7431 ST_FUNC(ST_DEVINFO, st_loadtape);
7432 7432
7433 7433 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
7434 7434 "st_loadtape(un = 0x%p)\n", (void*) un);
7435 7435
7436 7436 ASSERT(mutex_owned(ST_MUTEX));
7437 7437
7438 7438 rval = st_update_block_pos(un, st_cmd, 0);
7439 7439 if (rval == EACCES) {
7440 7440 return (rval);
7441 7441 }
7442 7442
7443 7443 /*
7444 7444 * 'LOAD' the tape to BOT by rewinding
7445 7445 */
7446 7446 rval = st_cmd(un, SCMD_REWIND, 1, SYNC_CMD);
7447 7447 if (rval == 0) {
7448 7448 st_init(un);
7449 7449 un->un_density_known = 0;
7450 7450 }
7451 7451
7452 7452 ASSERT(mutex_owned(ST_MUTEX));
7453 7453 return (rval);
7454 7454 }
7455 7455
7456 7456
7457 7457 /*
7458 7458 * Note: QIC devices aren't so smart. If you try to append
7459 7459 * after EOM, the write can fail because the device doesn't know
7460 7460 * it's at EOM. In that case, issue a read. The read should fail
7461 7461 * because there's no data, but the device knows it's at EOM,
7462 7462 * so a subsequent write should succeed. To further confuse matters,
7463 7463 * the target returns the same error if the tape is positioned
7464 7464 * such that a write would overwrite existing data. That's why
7465 7465 * we have to do the append test. A read in the middle of
7466 7466 * recorded data would succeed, thus indicating we're attempting
7467 7467 * something illegal.
7468 7468 */
7469 7469
7470 7470
7471 7471 static void
7472 7472 st_test_append(struct buf *bp)
7473 7473 {
7474 7474 dev_t dev = bp->b_edev;
7475 7475 struct scsi_tape *un;
7476 7476 uchar_t status;
7477 7477 unsigned bcount;
7478 7478
7479 7479 un = ddi_get_soft_state(st_state, MTUNIT(dev));
7480 7480
7481 7481 ST_FUNC(ST_DEVINFO, st_test_append);
7482 7482
7483 7483 ASSERT(mutex_owned(ST_MUTEX));
7484 7484
7485 7485 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
7486 7486 "st_test_append(): fileno %d\n", un->un_pos.fileno);
7487 7487
7488 7488 un->un_laststate = un->un_state;
7489 7489 un->un_state = ST_STATE_APPEND_TESTING;
7490 7490 un->un_test_append = 0;
7491 7491
7492 7492 /*
7493 7493 * first, map in the buffer, because we're doing a double write --
7494 7494 * first into the kernel, then onto the tape.
7495 7495 */
7496 7496 bp_mapin(bp);
7497 7497
7498 7498 /*
7499 7499 * get a copy of the data....
7500 7500 */
7501 7501 un->un_tmpbuf = kmem_alloc((unsigned)bp->b_bcount, KM_SLEEP);
7502 7502 bcopy(bp->b_un.b_addr, un->un_tmpbuf, (uint_t)bp->b_bcount);
7503 7503
7504 7504 /*
7505 7505 * attempt the write..
7506 7506 */
7507 7507
7508 7508 if (st_cmd(un, (int)SCMD_WRITE, (int)bp->b_bcount, SYNC_CMD) == 0) {
7509 7509 success:
7510 7510 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
7511 7511 "append write succeeded\n");
7512 7512 bp->b_resid = un->un_sbufp->b_resid;
7513 7513 mutex_exit(ST_MUTEX);
7514 7514 bcount = (unsigned)bp->b_bcount;
7515 7515 biodone(bp);
7516 7516 mutex_enter(ST_MUTEX);
7517 7517 un->un_laststate = un->un_state;
7518 7518 un->un_state = ST_STATE_OPEN;
7519 7519 kmem_free(un->un_tmpbuf, bcount);
7520 7520 un->un_tmpbuf = NULL;
7521 7521 return;
7522 7522 }
7523 7523
7524 7524 /*
7525 7525 * The append failed. Do a short read. If that fails, we are at EOM
7526 7526 * so we can retry the write command. If that succeeds, than we're
7527 7527 * all screwed up (the controller reported a real error).
7528 7528 *
7529 7529 * XXX: should the dummy read be > SECSIZE? should it be the device's
7530 7530 * XXX: block size?
7531 7531 *
7532 7532 */
7533 7533 status = un->un_status;
7534 7534 un->un_status = 0;
7535 7535 (void) st_cmd(un, SCMD_READ, SECSIZE, SYNC_CMD);
7536 7536 if (un->un_status == KEY_BLANK_CHECK) {
7537 7537 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
7538 7538 "append at EOM\n");
7539 7539 /*
7540 7540 * Okay- the read failed. We should actually have confused
7541 7541 * the controller enough to allow writing. In any case, the
7542 7542 * i/o is on its own from here on out.
7543 7543 */
7544 7544 un->un_laststate = un->un_state;
7545 7545 un->un_state = ST_STATE_OPEN;
7546 7546 bcopy(bp->b_un.b_addr, un->un_tmpbuf, (uint_t)bp->b_bcount);
7547 7547 if (st_cmd(un, (int)SCMD_WRITE, (int)bp->b_bcount,
7548 7548 SYNC_CMD) == 0) {
7549 7549 goto success;
7550 7550 }
7551 7551 }
7552 7552
7553 7553 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
7554 7554 "append write failed- not at EOM\n");
7555 7555 bp->b_resid = bp->b_bcount;
7556 7556 st_bioerror(bp, EIO);
7557 7557
7558 7558 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
7559 7559 "st_test_append : EIO : append write failed - not at EOM");
7560 7560
7561 7561 /*
7562 7562 * backspace one record to get back to where we were
7563 7563 */
7564 7564 if (st_cmd(un, SCMD_SPACE, Blk(-1), SYNC_CMD)) {
7565 7565 un->un_pos.pmode = invalid;
7566 7566 }
7567 7567
7568 7568 un->un_err_resid = bp->b_resid;
7569 7569 un->un_status = status;
7570 7570
7571 7571 /*
7572 7572 * Note: biodone will do a bp_mapout()
7573 7573 */
7574 7574 mutex_exit(ST_MUTEX);
7575 7575 bcount = (unsigned)bp->b_bcount;
7576 7576 biodone(bp);
7577 7577 mutex_enter(ST_MUTEX);
7578 7578 un->un_laststate = un->un_state;
7579 7579 un->un_state = ST_STATE_OPEN_PENDING_IO;
7580 7580 kmem_free(un->un_tmpbuf, bcount);
7581 7581 un->un_tmpbuf = NULL;
7582 7582 }
7583 7583
7584 7584 /*
7585 7585 * Special command handler
7586 7586 */
7587 7587
7588 7588 /*
7589 7589 * common st_cmd code. The fourth parameter states
7590 7590 * whether the caller wishes to await the results
7591 7591 * Note the release of the mutex during most of the function
7592 7592 */
7593 7593 static int
7594 7594 st_cmd(struct scsi_tape *un, int com, int64_t count, int wait)
7595 7595 {
7596 7596 struct buf *bp;
7597 7597 int err;
7598 7598 uint_t last_err_resid;
7599 7599
7600 7600 ST_FUNC(ST_DEVINFO, st_cmd);
7601 7601
7602 7602 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
7603 7603 "st_cmd(dev = 0x%lx, com = 0x%x, count = %"PRIx64", wait = %d)\n",
7604 7604 un->un_dev, com, count, wait);
7605 7605
7606 7606 ASSERT(MUTEX_HELD(&un->un_sd->sd_mutex));
7607 7607 ASSERT(mutex_owned(ST_MUTEX));
7608 7608
7609 7609 #ifdef STDEBUG
7610 7610 if ((st_debug & 0x7)) {
7611 7611 st_debug_cmds(un, com, count, wait);
7612 7612 }
7613 7613 #endif
7614 7614
7615 7615 st_wait_for_io(un);
7616 7616
7617 7617 /* check to see if this command requires the drive to be reserved */
7618 7618 err = st_check_cmd_for_need_to_reserve(un, com, count);
7619 7619
7620 7620 if (err) {
7621 7621 return (err);
7622 7622 }
7623 7623
7624 7624 /*
7625 7625 * A space command is not recoverable if we don't know were we
7626 7626 * were when it was issued.
7627 7627 */
7628 7628 if ((com == SCMD_SPACE) || (com == SCMD_SPACE_G4)) {
7629 7629 (void) st_update_block_pos(un, st_cmd, 0);
7630 7630 }
7631 7631
7632 7632 /*
7633 7633 * Forground should not be doing anything while recovery is active.
7634 7634 */
7635 7635 ASSERT(un->un_recov_buf_busy == 0);
7636 7636
7637 7637 while (un->un_sbuf_busy)
7638 7638 cv_wait(&un->un_sbuf_cv, ST_MUTEX);
7639 7639 un->un_sbuf_busy = 1;
7640 7640
7641 7641 bp = un->un_sbufp;
7642 7642 bzero(bp, sizeof (buf_t));
7643 7643
7644 7644 bp->b_flags = (wait) ? B_BUSY : B_BUSY|B_ASYNC;
7645 7645
7646 7646 err = st_setup_cmd(un, bp, com, count);
7647 7647
7648 7648 un->un_sbuf_busy = 0;
7649 7649
7650 7650 /*
7651 7651 * If was a space command need to update logical block position.
7652 7652 * Only do this if the command was sucessful or it will mask the fact
7653 7653 * that the space command failed by promoting the pmode to logical.
7654 7654 */
7655 7655 if (((com == SCMD_SPACE) || (com == SCMD_SPACE_G4)) &&
7656 7656 (un->un_pos.pmode != invalid)) {
7657 7657 un->un_running.pmode = invalid;
7658 7658 last_err_resid = un->un_err_resid;
7659 7659 (void) st_update_block_pos(un, st_cmd, 1);
7660 7660 /*
7661 7661 * Set running position to invalid so it updates on the
7662 7662 * next command.
7663 7663 */
7664 7664 un->un_running.pmode = invalid;
7665 7665 un->un_err_resid = last_err_resid;
7666 7666 }
7667 7667
7668 7668 cv_signal(&un->un_sbuf_cv);
7669 7669
7670 7670 return (err);
7671 7671 }
7672 7672
7673 7673 static int
7674 7674 st_setup_cmd(struct scsi_tape *un, buf_t *bp, int com, int64_t count)
7675 7675 {
7676 7676 int err;
7677 7677 dev_t dev = un->un_dev;
7678 7678
7679 7679 ST_FUNC(ST_DEVINFO, st_setup_cmd);
7680 7680 /*
7681 7681 * Set count to the actual size of the data tranfer.
7682 7682 * For commands with no data transfer, set bp->b_bcount
7683 7683 * to the value to be used when constructing the
7684 7684 * cdb in st_make_cmd().
7685 7685 */
7686 7686 switch (com) {
7687 7687 case SCMD_READ:
7688 7688 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
7689 7689 "special read %"PRId64"\n", count);
7690 7690 bp->b_flags |= B_READ;
7691 7691 bp->b_un.b_addr = un->un_tmpbuf;
7692 7692 break;
7693 7693
7694 7694 case SCMD_WRITE:
7695 7695 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
7696 7696 "special write %"PRId64"\n", count);
7697 7697 bp->b_un.b_addr = un->un_tmpbuf;
7698 7698 break;
7699 7699
7700 7700 case SCMD_WRITE_FILE_MARK:
7701 7701 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
7702 7702 "write %"PRId64" file marks\n", count);
7703 7703 bp->b_bcount = count;
7704 7704 count = 0;
7705 7705 break;
7706 7706
7707 7707 case SCMD_REWIND:
7708 7708 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG, "rewind\n");
7709 7709 bp->b_bcount = count;
7710 7710 count = 0;
7711 7711 break;
7712 7712
7713 7713 case SCMD_SPACE:
7714 7714 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG, "space\n");
7715 7715 /*
7716 7716 * If the user could have entered a number that will
7717 7717 * not fit in the 12 bit count field of space(8),
7718 7718 * use space(16).
7719 7719 */
7720 7720 if (((int64_t)SPACE_CNT(count) > 0x7fffff) ||
7721 7721 ((int64_t)SPACE_CNT(count) < -(0x7fffff))) {
7722 7722 com = SCMD_SPACE_G4;
7723 7723 }
7724 7724 bp->b_bcount = count;
7725 7725 count = 0;
7726 7726 break;
7727 7727
7728 7728 case SCMD_RESERVE:
7729 7729 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG, "reserve");
7730 7730 bp->b_bcount = 0;
7731 7731 count = 0;
7732 7732 break;
7733 7733
7734 7734 case SCMD_RELEASE:
7735 7735 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG, "release");
7736 7736 bp->b_bcount = 0;
7737 7737 count = 0;
7738 7738 break;
7739 7739
7740 7740 case SCMD_LOAD:
7741 7741 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
7742 7742 "%s tape\n", (count & LD_LOAD) ? "load" : "unload");
7743 7743 bp->b_bcount = count;
7744 7744 count = 0;
7745 7745 break;
7746 7746
7747 7747 case SCMD_ERASE:
7748 7748 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
7749 7749 "erase tape\n");
7750 7750 bp->b_bcount = count;
7751 7751 count = 0;
7752 7752 break;
7753 7753
7754 7754 case SCMD_MODE_SENSE:
7755 7755 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
7756 7756 "mode sense\n");
7757 7757 bp->b_flags |= B_READ;
7758 7758 bp->b_un.b_addr = (caddr_t)(un->un_mspl);
7759 7759 break;
7760 7760
7761 7761 case SCMD_MODE_SELECT:
7762 7762 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
7763 7763 "mode select\n");
7764 7764 bp->b_un.b_addr = (caddr_t)(un->un_mspl);
7765 7765 break;
7766 7766
7767 7767 case SCMD_READ_BLKLIM:
7768 7768 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
7769 7769 "read block limits\n");
7770 7770 bp->b_bcount = count;
7771 7771 bp->b_flags |= B_READ;
7772 7772 bp->b_un.b_addr = (caddr_t)(un->un_rbl);
7773 7773 break;
7774 7774
7775 7775 case SCMD_TEST_UNIT_READY:
7776 7776 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
7777 7777 "test unit ready\n");
7778 7778 bp->b_bcount = 0;
7779 7779 count = 0;
7780 7780 break;
7781 7781
7782 7782 case SCMD_DOORLOCK:
7783 7783 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
7784 7784 "%s tape\n", (count & MR_LOCK) ? "lock" : "unlock");
7785 7785 bp->b_bcount = count = 0;
7786 7786 break;
7787 7787
7788 7788 case SCMD_READ_POSITION:
7789 7789 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
7790 7790 "read position\n");
7791 7791 switch (un->un_read_pos_type) {
7792 7792 case LONG_POS:
7793 7793 count = sizeof (tape_position_long_t);
7794 7794 break;
7795 7795 case EXT_POS:
7796 7796 count = min(count, sizeof (tape_position_ext_t));
7797 7797 break;
7798 7798 case SHORT_POS:
7799 7799 count = sizeof (tape_position_t);
7800 7800 break;
7801 7801 default:
7802 7802 ST_DEBUG(ST_DEVINFO, st_label, CE_PANIC,
7803 7803 "Unknown read position type 0x%x in "
7804 7804 "st_make_cmd()\n", un->un_read_pos_type);
7805 7805 }
7806 7806 bp->b_bcount = count;
7807 7807 bp->b_flags |= B_READ;
7808 7808 bp->b_un.b_addr = (caddr_t)un->un_read_pos_data;
7809 7809 break;
7810 7810
7811 7811 default:
7812 7812 ST_DEBUG(ST_DEVINFO, st_label, CE_PANIC,
7813 7813 "Unhandled scsi command 0x%x in st_setup_cmd()\n", com);
7814 7814 }
7815 7815
7816 7816 mutex_exit(ST_MUTEX);
7817 7817
7818 7818 if (count > 0) {
7819 7819 int flg = (bp->b_flags & B_READ) ? B_READ : B_WRITE;
7820 7820 /*
7821 7821 * We're going to do actual I/O.
7822 7822 * Set things up for physio.
7823 7823 */
7824 7824 struct iovec aiov;
7825 7825 struct uio auio;
7826 7826 struct uio *uio = &auio;
7827 7827
7828 7828 bzero(&auio, sizeof (struct uio));
7829 7829 bzero(&aiov, sizeof (struct iovec));
7830 7830 aiov.iov_base = bp->b_un.b_addr;
7831 7831 aiov.iov_len = count;
7832 7832
7833 7833 uio->uio_iov = &aiov;
7834 7834 uio->uio_iovcnt = 1;
7835 7835 uio->uio_resid = aiov.iov_len;
7836 7836 uio->uio_segflg = UIO_SYSSPACE;
7837 7837
7838 7838 /*
7839 7839 * Let physio do the rest...
7840 7840 */
7841 7841 bp->b_forw = (struct buf *)(uintptr_t)com;
7842 7842 bp->b_back = NULL;
7843 7843 err = physio(st_strategy, bp, dev, flg, st_minphys, uio);
7844 7844 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
7845 7845 "st_setup_cmd: physio returns %d\n", err);
7846 7846 } else {
7847 7847 /*
7848 7848 * Mimic physio
7849 7849 */
7850 7850 bp->b_forw = (struct buf *)(uintptr_t)com;
7851 7851 bp->b_back = NULL;
7852 7852 bp->b_edev = dev;
7853 7853 bp->b_dev = cmpdev(dev);
7854 7854 bp->b_blkno = 0;
7855 7855 bp->b_resid = 0;
7856 7856 (void) st_strategy(bp);
7857 7857 if (bp->b_flags & B_ASYNC) {
7858 7858 /*
7859 7859 * This is an async command- the caller won't wait
7860 7860 * and doesn't care about errors.
7861 7861 */
7862 7862 mutex_enter(ST_MUTEX);
7863 7863 return (0);
7864 7864 }
7865 7865
7866 7866 /*
7867 7867 * BugTraq #4260046
7868 7868 * ----------------
7869 7869 * Restore Solaris 2.5.1 behavior, namely call biowait
7870 7870 * unconditionally. The old comment said...
7871 7871 *
7872 7872 * "if strategy was flagged with persistent errors, we would
7873 7873 * have an error here, and the bp would never be sent, so we
7874 7874 * don't want to wait on a bp that was never sent...or hang"
7875 7875 *
7876 7876 * The new rationale, courtesy of Chitrank...
7877 7877 *
7878 7878 * "we should unconditionally biowait() here because
7879 7879 * st_strategy() will do a biodone() in the persistent error
7880 7880 * case and the following biowait() will return immediately.
7881 7881 * If not, in the case of "errors after pkt alloc" in
7882 7882 * st_start(), we will not biowait here which will cause the
7883 7883 * next biowait() to return immediately which will cause
7884 7884 * us to send out the next command. In the case where both of
7885 7885 * these use the sbuf, when the first command completes we'll
7886 7886 * free the packet attached to sbuf and the same pkt will
7887 7887 * get freed again when we complete the second command.
7888 7888 * see esc 518987. BTW, it is necessary to do biodone() in
7889 7889 * st_start() for the pkt alloc failure case because physio()
7890 7890 * does biowait() and will hang if we don't do biodone()"
7891 7891 */
7892 7892
7893 7893 err = biowait(bp);
7894 7894 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
7895 7895 "st_setup_cmd: biowait returns %d\n", err);
7896 7896 }
7897 7897
7898 7898 mutex_enter(ST_MUTEX);
7899 7899
7900 7900 return (err);
7901 7901 }
7902 7902
7903 7903 static int
7904 7904 st_set_compression(struct scsi_tape *un)
7905 7905 {
7906 7906 int rval;
7907 7907 int turn_compression_on;
7908 7908 minor_t minor;
7909 7909
7910 7910 ST_FUNC(ST_DEVINFO, st_set_compression);
7911 7911
7912 7912 /*
7913 7913 * Drive either dosn't have compression or it is controlled with
7914 7914 * special density codes. Return ENOTTY so caller
7915 7915 * knows nothing was done.
7916 7916 */
7917 7917 if ((un->un_dp->options & ST_MODE_SEL_COMP) == 0) {
7918 7918 un->un_comp_page = 0;
7919 7919 return (ENOTTY);
7920 7920 }
7921 7921
7922 7922 /* set compression based on minor node opened */
7923 7923 minor = MT_DENSITY(un->un_dev);
7924 7924
7925 7925 /*
7926 7926 * If this the compression density or
7927 7927 * the drive has two densities and uses mode select for
7928 7928 * control of compression turn on compression for MT_DENSITY2
7929 7929 * as well.
7930 7930 */
7931 7931 if ((minor == ST_COMPRESSION_DENSITY) ||
7932 7932 (minor == MT_DENSITY(MT_DENSITY2)) &&
7933 7933 (un->un_dp->densities[0] == un->un_dp->densities[1]) &&
7934 7934 (un->un_dp->densities[2] == un->un_dp->densities[3]) &&
7935 7935 (un->un_dp->densities[0] != un->un_dp->densities[2])) {
7936 7936
7937 7937 turn_compression_on = 1;
7938 7938 } else {
7939 7939 turn_compression_on = 0;
7940 7940 }
7941 7941
7942 7942 un->un_mspl->high_bl = (uchar_t)(un->un_bsize >> 16);
7943 7943 un->un_mspl->mid_bl = (uchar_t)(un->un_bsize >> 8);
7944 7944 un->un_mspl->low_bl = (uchar_t)(un->un_bsize);
7945 7945
7946 7946 /*
7947 7947 * Need to determine which page does the device use for compression.
7948 7948 * First try the data compression page. If this fails try the device
7949 7949 * configuration page
7950 7950 */
7951 7951
7952 7952 if ((un->un_comp_page & ST_DEV_DATACOMP_PAGE) == ST_DEV_DATACOMP_PAGE) {
7953 7953 rval = st_set_datacomp_page(un, turn_compression_on);
7954 7954 if (rval == EALREADY) {
7955 7955 return (rval);
7956 7956 }
7957 7957 if (rval != 0) {
7958 7958 if (un->un_status == KEY_ILLEGAL_REQUEST) {
7959 7959 /*
7960 7960 * This device does not support data
7961 7961 * compression page
7962 7962 */
7963 7963 un->un_comp_page = ST_DEV_CONFIG_PAGE;
7964 7964 } else if (un->un_state >= ST_STATE_OPEN) {
7965 7965 un->un_pos.pmode = invalid;
7966 7966 rval = EIO;
7967 7967 } else {
7968 7968 rval = -1;
7969 7969 }
7970 7970 } else {
7971 7971 un->un_comp_page = ST_DEV_DATACOMP_PAGE;
7972 7972 }
7973 7973 }
7974 7974
7975 7975 if ((un->un_comp_page & ST_DEV_CONFIG_PAGE) == ST_DEV_CONFIG_PAGE) {
7976 7976 rval = st_set_devconfig_page(un, turn_compression_on);
7977 7977 if (rval == EALREADY) {
7978 7978 return (rval);
7979 7979 }
7980 7980 if (rval != 0) {
7981 7981 if (un->un_status == KEY_ILLEGAL_REQUEST) {
7982 7982 /*
7983 7983 * This device does not support
7984 7984 * compression at all advice the
7985 7985 * user and unset ST_MODE_SEL_COMP
7986 7986 */
7987 7987 un->un_dp->options &= ~ST_MODE_SEL_COMP;
7988 7988 un->un_comp_page = 0;
7989 7989 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
7990 7990 "Device Does Not Support Compression\n");
7991 7991 } else if (un->un_state >= ST_STATE_OPEN) {
7992 7992 un->un_pos.pmode = invalid;
7993 7993 rval = EIO;
7994 7994 } else {
7995 7995 rval = -1;
7996 7996 }
7997 7997 }
7998 7998 }
7999 7999
8000 8000 return (rval);
8001 8001 }
8002 8002
8003 8003 /*
8004 8004 * set or unset compression thru device configuration page.
8005 8005 */
8006 8006 static int
8007 8007 st_set_devconfig_page(struct scsi_tape *un, int compression_on)
8008 8008 {
8009 8009 unsigned char cflag;
8010 8010 int rval = 0;
8011 8011
8012 8012
8013 8013 ST_FUNC(ST_DEVINFO, st_set_devconfig_page);
8014 8014
8015 8015 ASSERT(mutex_owned(ST_MUTEX));
8016 8016
8017 8017 /*
8018 8018 * if the mode sense page is not the correct one, load the correct one.
8019 8019 */
8020 8020 if (un->un_mspl->page_code != ST_DEV_CONFIG_PAGE) {
8021 8021 rval = st_gen_mode_sense(un, st_uscsi_cmd, ST_DEV_CONFIG_PAGE,
8022 8022 un->un_mspl, sizeof (struct seq_mode));
8023 8023 if (rval)
8024 8024 return (rval);
8025 8025 }
8026 8026
8027 8027 /*
8028 8028 * Figure what to set compression flag to.
8029 8029 */
8030 8030 if (compression_on) {
8031 8031 /* They have selected a compression node */
8032 8032 if (un->un_dp->type == ST_TYPE_FUJI) {
8033 8033 cflag = 0x84; /* use EDRC */
8034 8034 } else {
8035 8035 cflag = ST_DEV_CONFIG_DEF_COMP;
8036 8036 }
8037 8037 } else {
8038 8038 cflag = ST_DEV_CONFIG_NO_COMP;
8039 8039 }
8040 8040
8041 8041 /*
8042 8042 * If compression is already set the way it was requested.
8043 8043 * And if this not the first time we has tried.
8044 8044 */
8045 8045 if ((cflag == un->un_mspl->page.dev.comp_alg) &&
8046 8046 (un->un_comp_page == ST_DEV_CONFIG_PAGE)) {
8047 8047 return (EALREADY);
8048 8048 }
8049 8049
8050 8050 un->un_mspl->page.dev.comp_alg = cflag;
8051 8051 /*
8052 8052 * need to send mode select even if correct compression is
8053 8053 * already set since need to set density code
8054 8054 */
8055 8055
8056 8056 #ifdef STDEBUG
8057 8057 if ((st_debug & 0x7) >= 6) {
8058 8058 st_clean_print(ST_DEVINFO, st_label, SCSI_DEBUG,
8059 8059 "st_set_devconfig_page: sense data for mode select",
8060 8060 (char *)un->un_mspl, sizeof (struct seq_mode));
8061 8061 }
8062 8062 #endif
8063 8063 rval = st_gen_mode_select(un, st_uscsi_cmd, un->un_mspl,
8064 8064 sizeof (struct seq_mode));
8065 8065
8066 8066 return (rval);
8067 8067 }
8068 8068
8069 8069 /*
8070 8070 * set/reset compression bit thru data compression page
8071 8071 */
8072 8072 static int
8073 8073 st_set_datacomp_page(struct scsi_tape *un, int compression_on)
8074 8074 {
8075 8075 int compression_on_already;
8076 8076 int rval = 0;
8077 8077
8078 8078
8079 8079 ST_FUNC(ST_DEVINFO, st_set_datacomp_page);
8080 8080
8081 8081 ASSERT(mutex_owned(ST_MUTEX));
8082 8082
8083 8083 /*
8084 8084 * if the mode sense page is not the correct one, load the correct one.
8085 8085 */
8086 8086 if (un->un_mspl->page_code != ST_DEV_DATACOMP_PAGE) {
8087 8087 rval = st_gen_mode_sense(un, st_uscsi_cmd, ST_DEV_DATACOMP_PAGE,
8088 8088 un->un_mspl, sizeof (struct seq_mode));
8089 8089 if (rval)
8090 8090 return (rval);
8091 8091 }
8092 8092
8093 8093 /*
8094 8094 * If drive is not capable of compression (at this time)
8095 8095 * return EALREADY so caller doesn't think that this page
8096 8096 * is not supported. This check is for drives that can
8097 8097 * disable compression from the front panel or configuration.
8098 8098 * I doubt that a drive that supports this page is not really
8099 8099 * capable of compression.
8100 8100 */
8101 8101 if (un->un_mspl->page.comp.dcc == 0) {
8102 8102 return (EALREADY);
8103 8103 }
8104 8104
8105 8105 /* See if compression currently turned on */
8106 8106 if (un->un_mspl->page.comp.dce) {
8107 8107 compression_on_already = 1;
8108 8108 } else {
8109 8109 compression_on_already = 0;
8110 8110 }
8111 8111
8112 8112 /*
8113 8113 * If compression is already set the way it was requested.
8114 8114 * And if this not the first time we has tried.
8115 8115 */
8116 8116 if ((compression_on == compression_on_already) &&
8117 8117 (un->un_comp_page == ST_DEV_DATACOMP_PAGE)) {
8118 8118 return (EALREADY);
8119 8119 }
8120 8120
8121 8121 /*
8122 8122 * if we are already set to the appropriate compression
8123 8123 * mode, don't set it again
8124 8124 */
8125 8125 if (compression_on) {
8126 8126 /* compression selected */
8127 8127 un->un_mspl->page.comp.dce = 1;
8128 8128 } else {
8129 8129 un->un_mspl->page.comp.dce = 0;
8130 8130 }
8131 8131
8132 8132
8133 8133 #ifdef STDEBUG
8134 8134 if ((st_debug & 0x7) >= 6) {
8135 8135 st_clean_print(ST_DEVINFO, st_label, SCSI_DEBUG,
8136 8136 "st_set_datacomp_page: sense data for mode select",
8137 8137 (char *)un->un_mspl, sizeof (struct seq_mode));
8138 8138 }
8139 8139 #endif
8140 8140 rval = st_gen_mode_select(un, st_uscsi_cmd, un->un_mspl,
8141 8141 sizeof (struct seq_mode));
8142 8142
8143 8143 return (rval);
8144 8144 }
8145 8145
8146 8146 static int
8147 8147 st_modesense(struct scsi_tape *un)
8148 8148 {
8149 8149 int rval;
8150 8150 uchar_t page;
8151 8151
8152 8152 ST_FUNC(ST_DEVINFO, st_modesense);
8153 8153
8154 8154 page = un->un_comp_page;
8155 8155
8156 8156 switch (page) {
8157 8157 case ST_DEV_DATACOMP_PAGE:
8158 8158 case ST_DEV_CONFIG_PAGE: /* FALLTHROUGH */
8159 8159 rval = st_gen_mode_sense(un, st_uscsi_cmd, page, un->un_mspl,
8160 8160 sizeof (struct seq_mode));
8161 8161 break;
8162 8162
8163 8163 case ST_DEV_DATACOMP_PAGE | ST_DEV_CONFIG_PAGE:
8164 8164 if (un->un_dp->options & ST_MODE_SEL_COMP) {
8165 8165 page = ST_DEV_DATACOMP_PAGE;
8166 8166 rval = st_gen_mode_sense(un, st_uscsi_cmd, page,
8167 8167 un->un_mspl, sizeof (struct seq_mode));
8168 8168 if (rval == 0 && un->un_mspl->page_code == page) {
8169 8169 un->un_comp_page = page;
8170 8170 break;
8171 8171 }
8172 8172 page = ST_DEV_CONFIG_PAGE;
8173 8173 rval = st_gen_mode_sense(un, st_uscsi_cmd, page,
8174 8174 un->un_mspl, sizeof (struct seq_mode));
8175 8175 if (rval == 0 && un->un_mspl->page_code == page) {
8176 8176 un->un_comp_page = page;
8177 8177 break;
8178 8178 }
8179 8179 un->un_dp->options &= ~ST_MODE_SEL_COMP;
8180 8180 un->un_comp_page = 0;
8181 8181 } else {
8182 8182 un->un_comp_page = 0;
8183 8183 }
8184 8184
8185 8185 default: /* FALLTHROUGH */
8186 8186 rval = st_cmd(un, SCMD_MODE_SENSE, MSIZE, SYNC_CMD);
8187 8187 }
8188 8188 return (rval);
8189 8189 }
8190 8190
8191 8191 static int
8192 8192 st_modeselect(struct scsi_tape *un)
8193 8193 {
8194 8194 int rval = 0;
8195 8195 int ix;
8196 8196
8197 8197 ST_FUNC(ST_DEVINFO, st_modeselect);
8198 8198
8199 8199 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
8200 8200 "st_modeselect(dev = 0x%lx): density = 0x%x\n",
8201 8201 un->un_dev, un->un_mspl->density);
8202 8202
8203 8203 ASSERT(mutex_owned(ST_MUTEX));
8204 8204
8205 8205 /*
8206 8206 * The parameter list should be the same for all of the
8207 8207 * cases that follow so set them here
8208 8208 *
8209 8209 * Try mode select first if if fails set fields manually
8210 8210 */
8211 8211 rval = st_modesense(un);
8212 8212 if (rval != 0) {
8213 8213 ST_DEBUG3(ST_DEVINFO, st_label, CE_WARN,
8214 8214 "st_modeselect: First mode sense failed\n");
8215 8215 un->un_mspl->bd_len = 8;
8216 8216 un->un_mspl->high_nb = 0;
8217 8217 un->un_mspl->mid_nb = 0;
8218 8218 un->un_mspl->low_nb = 0;
8219 8219 }
8220 8220 un->un_mspl->high_bl = (uchar_t)(un->un_bsize >> 16);
8221 8221 un->un_mspl->mid_bl = (uchar_t)(un->un_bsize >> 8);
8222 8222 un->un_mspl->low_bl = (uchar_t)(un->un_bsize);
8223 8223
8224 8224
8225 8225 /*
8226 8226 * If configured to use a specific density code for a media type.
8227 8227 * curdens is previously set by the minor node opened.
8228 8228 * If the media type doesn't match the minor node we change it so it
8229 8229 * looks like the correct one was opened.
8230 8230 */
8231 8231 if (un->un_dp->options & ST_KNOWS_MEDIA) {
8232 8232 uchar_t best;
8233 8233
8234 8234 for (best = 0xff, ix = 0; ix < NDENSITIES; ix++) {
8235 8235 if (un->un_mspl->media_type ==
8236 8236 un->un_dp->mediatype[ix]) {
8237 8237 best = ix;
8238 8238 /*
8239 8239 * It matches but it might not be the only one.
8240 8240 * Use the highest matching media type but not
8241 8241 * to exceed the density selected by the open.
8242 8242 */
8243 8243 if (ix < un->un_curdens) {
8244 8244 continue;
8245 8245 }
8246 8246 un->un_curdens = ix;
8247 8247 break;
8248 8248 }
8249 8249 }
8250 8250 /* If a match was found best will not be 0xff any more */
8251 8251 if (best < NDENSITIES) {
8252 8252 ST_DEBUG3(ST_DEVINFO, st_label, CE_WARN,
8253 8253 "found media 0x%X using density 0x%X\n",
8254 8254 un->un_mspl->media_type,
8255 8255 un->un_dp->densities[best]);
8256 8256 un->un_mspl->density = un->un_dp->densities[best];
8257 8257 } else {
8258 8258 /* Otherwise set density based on minor node opened */
8259 8259 un->un_mspl->density =
8260 8260 un->un_dp->densities[un->un_curdens];
8261 8261 }
8262 8262 } else {
8263 8263 un->un_mspl->density = un->un_dp->densities[un->un_curdens];
8264 8264 }
8265 8265
8266 8266 if (un->un_dp->options & ST_NOBUF) {
8267 8267 un->un_mspl->bufm = 0;
8268 8268 } else {
8269 8269 un->un_mspl->bufm = 1;
8270 8270 }
8271 8271
8272 8272 rval = st_set_compression(un);
8273 8273
8274 8274 /*
8275 8275 * If st_set_compression returned invalid or already it
8276 8276 * found no need to do the mode select.
8277 8277 * So do it here.
8278 8278 */
8279 8279 if ((rval == ENOTTY) || (rval == EALREADY)) {
8280 8280
8281 8281 /* Zero non-writeable fields */
8282 8282 un->un_mspl->data_len = 0;
8283 8283 un->un_mspl->media_type = 0;
8284 8284 un->un_mspl->wp = 0;
8285 8285
8286 8286 /* need to set the density code */
8287 8287 rval = st_cmd(un, SCMD_MODE_SELECT, MSIZE, SYNC_CMD);
8288 8288 if (rval != 0) {
8289 8289 if (un->un_state >= ST_STATE_OPEN) {
8290 8290 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
8291 8291 "unable to set tape mode\n");
8292 8292 un->un_pos.pmode = invalid;
8293 8293 rval = EIO;
8294 8294 } else {
8295 8295 rval = -1;
8296 8296 }
8297 8297 }
8298 8298 }
8299 8299
8300 8300 /*
8301 8301 * The spec recommends to send a mode sense after a mode select
8302 8302 */
8303 8303 (void) st_modesense(un);
8304 8304
8305 8305 ASSERT(mutex_owned(ST_MUTEX));
8306 8306
8307 8307 return (rval);
8308 8308 }
8309 8309
8310 8310 /*
8311 8311 * st_gen_mode_sense
8312 8312 *
8313 8313 * generic mode sense.. it allows for any page
8314 8314 */
8315 8315 static int
8316 8316 st_gen_mode_sense(struct scsi_tape *un, ubufunc_t ubf, int page,
8317 8317 struct seq_mode *page_data, int page_size)
8318 8318 {
8319 8319
8320 8320 int r;
8321 8321 char cdb[CDB_GROUP0];
8322 8322 struct uscsi_cmd *com;
8323 8323 struct scsi_arq_status status;
8324 8324
8325 8325 ST_FUNC(ST_DEVINFO, st_gen_mode_sense);
8326 8326
8327 8327 com = kmem_zalloc(sizeof (*com), KM_SLEEP);
8328 8328
8329 8329 bzero(cdb, CDB_GROUP0);
8330 8330 cdb[0] = SCMD_MODE_SENSE;
8331 8331 cdb[2] = (char)page;
8332 8332 cdb[4] = (char)page_size;
8333 8333
8334 8334 com->uscsi_cdb = cdb;
8335 8335 com->uscsi_cdblen = CDB_GROUP0;
8336 8336 com->uscsi_bufaddr = (caddr_t)page_data;
8337 8337 com->uscsi_buflen = page_size;
8338 8338 com->uscsi_rqlen = sizeof (status);
8339 8339 com->uscsi_rqbuf = (caddr_t)&status;
8340 8340 com->uscsi_timeout = un->un_dp->non_motion_timeout;
8341 8341 com->uscsi_flags = USCSI_DIAGNOSE | USCSI_RQENABLE | USCSI_READ;
8342 8342
8343 8343 r = ubf(un, com, FKIOCTL);
8344 8344 kmem_free(com, sizeof (*com));
8345 8345 return (r);
8346 8346 }
8347 8347
8348 8348 /*
8349 8349 * st_gen_mode_select
8350 8350 *
8351 8351 * generic mode select.. it allows for any page
8352 8352 */
8353 8353 static int
8354 8354 st_gen_mode_select(struct scsi_tape *un, ubufunc_t ubf,
8355 8355 struct seq_mode *page_data, int page_size)
8356 8356 {
8357 8357
8358 8358 int r;
8359 8359 char cdb[CDB_GROUP0];
8360 8360 struct uscsi_cmd *com;
8361 8361 struct scsi_arq_status status;
8362 8362
8363 8363 ST_FUNC(ST_DEVINFO, st_gen_mode_select);
8364 8364
8365 8365 /* Zero non-writeable fields */
8366 8366 page_data->data_len = 0;
8367 8367 page_data->media_type = 0;
8368 8368 page_data->wp = 0;
8369 8369
8370 8370 /*
8371 8371 * If mode select has any page data, zero the ps (Page Savable) bit.
8372 8372 */
8373 8373 if (page_size > MSIZE) {
8374 8374 page_data->ps = 0;
8375 8375 }
8376 8376
8377 8377
8378 8378 com = kmem_zalloc(sizeof (*com), KM_SLEEP);
8379 8379
8380 8380 /*
8381 8381 * then, do a mode select to set what ever info
8382 8382 */
8383 8383 bzero(cdb, CDB_GROUP0);
8384 8384 cdb[0] = SCMD_MODE_SELECT;
8385 8385 cdb[1] = 0x10; /* set PF bit for many third party drives */
8386 8386 cdb[4] = (char)page_size;
8387 8387
8388 8388 com->uscsi_cdb = cdb;
8389 8389 com->uscsi_cdblen = CDB_GROUP0;
8390 8390 com->uscsi_bufaddr = (caddr_t)page_data;
8391 8391 com->uscsi_buflen = page_size;
8392 8392 com->uscsi_rqlen = sizeof (status);
8393 8393 com->uscsi_rqbuf = (caddr_t)&status;
8394 8394 com->uscsi_timeout = un->un_dp->non_motion_timeout;
8395 8395 com->uscsi_flags = USCSI_DIAGNOSE | USCSI_RQENABLE | USCSI_WRITE;
8396 8396
8397 8397 r = ubf(un, com, FKIOCTL);
8398 8398
8399 8399 kmem_free(com, sizeof (*com));
8400 8400 return (r);
8401 8401 }
8402 8402
8403 8403 static int
8404 8404 st_read_block_limits(struct scsi_tape *un, struct read_blklim *read_blk)
8405 8405 {
8406 8406 int rval;
8407 8407 char cdb[CDB_GROUP0];
8408 8408 struct uscsi_cmd *com;
8409 8409 struct scsi_arq_status status;
8410 8410
8411 8411 ST_FUNC(ST_DEVINFO, st_read_block_limits);
8412 8412
8413 8413 com = kmem_zalloc(sizeof (*com), KM_SLEEP);
8414 8414
8415 8415 bzero(cdb, CDB_GROUP0);
8416 8416 cdb[0] = SCMD_READ_BLKLIM;
8417 8417
8418 8418 com->uscsi_cdb = cdb;
8419 8419 com->uscsi_cdblen = CDB_GROUP0;
8420 8420 com->uscsi_bufaddr = (caddr_t)read_blk;
8421 8421 com->uscsi_buflen = sizeof (struct read_blklim);
8422 8422 com->uscsi_rqlen = sizeof (status);
8423 8423 com->uscsi_rqbuf = (caddr_t)&status;
8424 8424 com->uscsi_timeout = un->un_dp->non_motion_timeout;
8425 8425 com->uscsi_flags = USCSI_DIAGNOSE | USCSI_RQENABLE | USCSI_READ;
8426 8426
8427 8427 rval = st_uscsi_cmd(un, com, FKIOCTL);
8428 8428 if (com->uscsi_status || com->uscsi_resid) {
8429 8429 rval = -1;
8430 8430 }
8431 8431
8432 8432 kmem_free(com, sizeof (*com));
8433 8433 return (rval);
8434 8434 }
8435 8435
8436 8436 static int
8437 8437 st_report_density_support(struct scsi_tape *un, uchar_t *density_data,
8438 8438 size_t buflen)
8439 8439 {
8440 8440 int rval;
8441 8441 char cdb[CDB_GROUP1];
8442 8442 struct uscsi_cmd *com;
8443 8443 struct scsi_arq_status status;
8444 8444
8445 8445 ST_FUNC(ST_DEVINFO, st_report_density_support);
8446 8446
8447 8447 com = kmem_zalloc(sizeof (*com), KM_SLEEP);
8448 8448
8449 8449 bzero(cdb, CDB_GROUP1);
8450 8450 cdb[0] = SCMD_REPORT_DENSITIES;
8451 8451 cdb[7] = (buflen & 0xff00) >> 8;
8452 8452 cdb[8] = buflen & 0xff;
8453 8453
8454 8454 com->uscsi_cdb = cdb;
8455 8455 com->uscsi_cdblen = CDB_GROUP1;
8456 8456 com->uscsi_bufaddr = (caddr_t)density_data;
8457 8457 com->uscsi_buflen = buflen;
8458 8458 com->uscsi_rqlen = sizeof (status);
8459 8459 com->uscsi_rqbuf = (caddr_t)&status;
8460 8460 com->uscsi_timeout = un->un_dp->non_motion_timeout;
8461 8461 com->uscsi_flags = USCSI_DIAGNOSE | USCSI_RQENABLE | USCSI_READ;
8462 8462
8463 8463 rval = st_uscsi_cmd(un, com, FKIOCTL);
8464 8464 if (com->uscsi_status || com->uscsi_resid) {
8465 8465 rval = -1;
8466 8466 }
8467 8467
8468 8468 kmem_free(com, sizeof (*com));
8469 8469 return (rval);
8470 8470 }
8471 8471
8472 8472 static int
8473 8473 st_report_supported_operation(struct scsi_tape *un, uchar_t *oper_data,
8474 8474 uchar_t option_code, ushort_t service_action)
8475 8475 {
8476 8476 int rval;
8477 8477 char cdb[CDB_GROUP5];
8478 8478 struct uscsi_cmd *com;
8479 8479 struct scsi_arq_status status;
8480 8480 uint32_t allo_length;
8481 8481
8482 8482 ST_FUNC(ST_DEVINFO, st_report_supported_operation);
8483 8483
8484 8484 allo_length = sizeof (struct one_com_des) +
8485 8485 sizeof (struct com_timeout_des);
8486 8486 com = kmem_zalloc(sizeof (*com), KM_SLEEP);
8487 8487
8488 8488 bzero(cdb, CDB_GROUP5);
8489 8489 cdb[0] = (char)SCMD_MAINTENANCE_IN;
8490 8490 cdb[1] = SSVC_ACTION_GET_SUPPORTED_OPERATIONS;
8491 8491 if (service_action) {
8492 8492 cdb[2] = (char)(ONE_COMMAND_DATA_FORMAT | 0x80); /* RCTD */
8493 8493 cdb[4] = (service_action & 0xff00) >> 8;
8494 8494 cdb[5] = service_action & 0xff;
8495 8495 } else {
8496 8496 cdb[2] = (char)(ONE_COMMAND_NO_SERVICE_DATA_FORMAT |
8497 8497 0x80); /* RCTD */
8498 8498 }
8499 8499 cdb[3] = option_code;
8500 8500 cdb[6] = (allo_length & 0xff000000) >> 24;
8501 8501 cdb[7] = (allo_length & 0xff0000) >> 16;
8502 8502 cdb[8] = (allo_length & 0xff00) >> 8;
8503 8503 cdb[9] = allo_length & 0xff;
8504 8504
8505 8505 com->uscsi_cdb = cdb;
8506 8506 com->uscsi_cdblen = CDB_GROUP5;
8507 8507 com->uscsi_bufaddr = (caddr_t)oper_data;
8508 8508 com->uscsi_buflen = allo_length;
8509 8509 com->uscsi_rqlen = sizeof (status);
8510 8510 com->uscsi_rqbuf = (caddr_t)&status;
8511 8511 com->uscsi_timeout = un->un_dp->non_motion_timeout;
8512 8512 com->uscsi_flags = USCSI_DIAGNOSE | USCSI_RQENABLE | USCSI_READ;
8513 8513
8514 8514 rval = st_uscsi_cmd(un, com, FKIOCTL);
8515 8515 if (com->uscsi_status) {
8516 8516 rval = -1;
8517 8517 }
8518 8518
8519 8519 kmem_free(com, sizeof (*com));
8520 8520 return (rval);
8521 8521 }
8522 8522
8523 8523 /*
8524 8524 * Changes devices blocksize and bsize to requested blocksize nblksz.
8525 8525 * Returns returned value from first failed call or zero on success.
8526 8526 */
8527 8527 static int
8528 8528 st_change_block_size(struct scsi_tape *un, uint32_t nblksz)
8529 8529 {
8530 8530 struct seq_mode *current;
8531 8531 int rval;
8532 8532 uint32_t oldblksz;
8533 8533
8534 8534 ST_FUNC(ST_DEVINFO, st_change_block_size);
8535 8535
8536 8536 current = kmem_zalloc(MSIZE, KM_SLEEP);
8537 8537
8538 8538 /*
8539 8539 * If we haven't got the compression page yet, do that first.
8540 8540 */
8541 8541 if (un->un_comp_page == (ST_DEV_DATACOMP_PAGE | ST_DEV_CONFIG_PAGE)) {
8542 8542 (void) st_modesense(un);
8543 8543 }
8544 8544
8545 8545 /* Read current settings */
8546 8546 rval = st_gen_mode_sense(un, st_uscsi_cmd, 0, current, MSIZE);
8547 8547 if (rval != 0) {
8548 8548 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
8549 8549 "mode sense for change block size failed: rval = %d", rval);
8550 8550 goto finish;
8551 8551 }
8552 8552
8553 8553 /* Figure the current block size */
8554 8554 oldblksz =
8555 8555 (current->high_bl << 16) |
8556 8556 (current->mid_bl << 8) |
8557 8557 (current->low_bl);
8558 8558
8559 8559 /* If current block size is the same as requested were done */
8560 8560 if (oldblksz == nblksz) {
8561 8561 un->un_bsize = nblksz;
8562 8562 rval = 0;
8563 8563 goto finish;
8564 8564 }
8565 8565
8566 8566 /* Change to requested block size */
8567 8567 current->high_bl = (uchar_t)(nblksz >> 16);
8568 8568 current->mid_bl = (uchar_t)(nblksz >> 8);
8569 8569 current->low_bl = (uchar_t)(nblksz);
8570 8570
8571 8571 /* Attempt to change block size */
8572 8572 rval = st_gen_mode_select(un, st_uscsi_cmd, current, MSIZE);
8573 8573 if (rval != 0) {
8574 8574 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
8575 8575 "Set new block size failed: rval = %d", rval);
8576 8576 goto finish;
8577 8577 }
8578 8578
8579 8579 /* Read back and verify setting */
8580 8580 rval = st_modesense(un);
8581 8581 if (rval == 0) {
8582 8582 un->un_bsize =
8583 8583 (un->un_mspl->high_bl << 16) |
8584 8584 (un->un_mspl->mid_bl << 8) |
8585 8585 (un->un_mspl->low_bl);
8586 8586
8587 8587 if (un->un_bsize != nblksz) {
8588 8588 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
8589 8589 "Blocksize set does not equal requested blocksize"
8590 8590 "(read: %u requested: %u)\n", nblksz, un->un_bsize);
8591 8591 rval = EIO;
8592 8592 }
8593 8593 }
8594 8594 finish:
8595 8595 kmem_free(current, MSIZE);
8596 8596 return (rval);
8597 8597 }
8598 8598
8599 8599
8600 8600 static void
8601 8601 st_init(struct scsi_tape *un)
8602 8602 {
8603 8603 ST_FUNC(ST_DEVINFO, st_init);
8604 8604
8605 8605 ASSERT(mutex_owned(ST_MUTEX));
8606 8606
8607 8607 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
8608 8608 "st_init(): dev = 0x%lx, will reset fileno, blkno, eof\n",
8609 8609 un->un_dev);
8610 8610
8611 8611 un->un_pos.blkno = 0;
8612 8612 un->un_pos.fileno = 0;
8613 8613 un->un_lastop = ST_OP_NIL;
8614 8614 un->un_pos.eof = ST_NO_EOF;
8615 8615 un->un_pwr_mgmt = ST_PWR_NORMAL;
8616 8616 if (st_error_level != SCSI_ERR_ALL) {
8617 8617 if (DEBUGGING) {
8618 8618 st_error_level = SCSI_ERR_ALL;
8619 8619 } else {
8620 8620 st_error_level = SCSI_ERR_RETRYABLE;
8621 8621 }
8622 8622 }
8623 8623 }
8624 8624
8625 8625
8626 8626 static void
8627 8627 st_make_cmd(struct scsi_tape *un, struct buf *bp, int (*func)(caddr_t))
8628 8628 {
8629 8629 struct scsi_pkt *pkt;
8630 8630 struct uscsi_cmd *ucmd;
8631 8631 recov_info *ri;
8632 8632 int tval = 0;
8633 8633 int64_t count;
8634 8634 uint32_t additional = 0;
8635 8635 uint32_t address = 0;
8636 8636 union scsi_cdb *ucdb;
8637 8637 int flags = 0;
8638 8638 int cdb_len = CDB_GROUP0; /* default */
8639 8639 uchar_t com;
8640 8640 char fixbit;
8641 8641 char short_fm = 0;
8642 8642 optype prev_op = un->un_lastop;
8643 8643 int stat_size =
8644 8644 (un->un_arq_enabled ? sizeof (struct scsi_arq_status) : 1);
8645 8645
8646 8646 ST_FUNC(ST_DEVINFO, st_make_cmd);
8647 8647
8648 8648 ASSERT(mutex_owned(ST_MUTEX));
8649 8649
8650 8650 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
8651 8651 "st_make_cmd(): dev = 0x%lx\n", un->un_dev);
8652 8652
8653 8653
8654 8654 /*
8655 8655 * fixbit is for setting the Fixed Mode and Suppress Incorrect
8656 8656 * Length Indicator bits on read/write commands, for setting
8657 8657 * the Long bit on erase commands, and for setting the Code
8658 8658 * Field bits on space commands.
8659 8659 */
8660 8660
8661 8661 /* regular raw I/O */
8662 8662 if ((bp != un->un_sbufp) && (bp != un->un_recov_buf)) {
8663 8663 pkt = scsi_init_pkt(ROUTE, NULL, bp,
8664 8664 CDB_GROUP0, stat_size, st_recov_sz, 0, func,
8665 8665 (caddr_t)un);
8666 8666 if (pkt == NULL) {
8667 8667 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
8668 8668 "Read Write scsi_init_pkt() failure\n");
8669 8669 goto exit;
8670 8670 }
8671 8671 ASSERT(pkt->pkt_resid == 0);
8672 8672 #ifdef STDEBUG
8673 8673 bzero(pkt->pkt_private, st_recov_sz);
8674 8674 bzero(pkt->pkt_scbp, stat_size);
8675 8675 #endif
8676 8676 ri = (recov_info *)pkt->pkt_private;
8677 8677 ri->privatelen = st_recov_sz;
8678 8678 if (un->un_bsize == 0) {
8679 8679 count = bp->b_bcount;
8680 8680 fixbit = 0;
8681 8681 } else {
8682 8682 count = bp->b_bcount / un->un_bsize;
8683 8683 fixbit = 1;
8684 8684 }
8685 8685 if (bp->b_flags & B_READ) {
8686 8686 com = SCMD_READ;
8687 8687 un->un_lastop = ST_OP_READ;
8688 8688 if ((un->un_bsize == 0) && /* Not Fixed Block */
8689 8689 (un->un_dp->options & ST_READ_IGNORE_ILI)) {
8690 8690 fixbit = 2;
8691 8691 }
8692 8692 } else {
8693 8693 com = SCMD_WRITE;
8694 8694 un->un_lastop = ST_OP_WRITE;
8695 8695 }
8696 8696 tval = un->un_dp->io_timeout;
8697 8697
8698 8698 /*
8699 8699 * For really large xfers, increase timeout
8700 8700 */
8701 8701 if (bp->b_bcount > (10 * ONE_MEG))
8702 8702 tval *= bp->b_bcount/(10 * ONE_MEG);
8703 8703
8704 8704 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
8705 8705 "%s %d amt 0x%lx\n", (com == SCMD_WRITE) ?
8706 8706 wr_str: rd_str, un->un_pos.blkno, bp->b_bcount);
8707 8707
8708 8708 } else if ((ucmd = BP_UCMD(bp)) != NULL) {
8709 8709 /*
8710 8710 * uscsi - build command, allocate scsi resources
8711 8711 */
8712 8712 st_make_uscsi_cmd(un, ucmd, bp, func);
8713 8713 goto exit;
8714 8714
8715 8715 } else { /* special I/O */
8716 8716 struct buf *allocbp = NULL;
8717 8717 com = (uchar_t)(uintptr_t)bp->b_forw;
8718 8718 count = bp->b_bcount;
8719 8719
8720 8720 switch (com) {
8721 8721 case SCMD_READ:
8722 8722 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
8723 8723 "special read %"PRId64"\n", count);
8724 8724 if (un->un_bsize == 0) {
8725 8725 fixbit = 2; /* suppress SILI */
8726 8726 } else {
8727 8727 fixbit = 1; /* Fixed Block Mode */
8728 8728 count /= un->un_bsize;
8729 8729 }
8730 8730 allocbp = bp;
8731 8731 un->un_lastop = ST_OP_READ;
8732 8732 tval = un->un_dp->io_timeout;
8733 8733 break;
8734 8734
8735 8735 case SCMD_WRITE:
8736 8736 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
8737 8737 "special write %"PRId64"\n", count);
8738 8738 if (un->un_bsize != 0) {
8739 8739 fixbit = 1; /* Fixed Block Mode */
8740 8740 count /= un->un_bsize;
8741 8741 } else {
8742 8742 fixbit = 0;
8743 8743 }
8744 8744 allocbp = bp;
8745 8745 un->un_lastop = ST_OP_WRITE;
8746 8746 tval = un->un_dp->io_timeout;
8747 8747 break;
8748 8748
8749 8749 case SCMD_WRITE_FILE_MARK:
8750 8750 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
8751 8751 "write %"PRId64" file marks\n", count);
8752 8752 un->un_lastop = ST_OP_WEOF;
8753 8753 fixbit = 0;
8754 8754 tval = un->un_dp->io_timeout;
8755 8755 /*
8756 8756 * If ST_SHORT_FILEMARKS bit is ON for EXABYTE
8757 8757 * device, set the Vendor Unique bit to
8758 8758 * write Short File Mark.
8759 8759 */
8760 8760 if ((un->un_dp->options & ST_SHORT_FILEMARKS) &&
8761 8761 ((un->un_dp->type == ST_TYPE_EXB8500) ||
8762 8762 (un->un_dp->type == ST_TYPE_EXABYTE))) {
8763 8763 /*
8764 8764 * Now the Vendor Unique bit 7 in Byte 5 of CDB
8765 8765 * is set to to write Short File Mark
8766 8766 */
8767 8767 short_fm = 1;
8768 8768 }
8769 8769 break;
8770 8770
8771 8771 case SCMD_REWIND:
8772 8772 /*
8773 8773 * In the case of rewind we're gona do the rewind with
8774 8774 * the immediate bit set so status will be retured when
8775 8775 * the command is accepted by the device. We clear the
8776 8776 * B_ASYNC flag so we wait for that acceptance.
8777 8777 */
8778 8778 fixbit = 0;
8779 8779 if (bp->b_flags & B_ASYNC) {
8780 8780 allocbp = bp;
8781 8781 if (count) {
8782 8782 fixbit = 1;
8783 8783 bp->b_flags &= ~B_ASYNC;
8784 8784 }
8785 8785 }
8786 8786 count = 0;
8787 8787 bp->b_bcount = 0;
8788 8788 un->un_lastop = ST_OP_CTL;
8789 8789 tval = un->un_dp->rewind_timeout;
8790 8790 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
8791 8791 "rewind\n");
8792 8792 break;
8793 8793
8794 8794 case SCMD_SPACE_G4:
8795 8795 cdb_len = CDB_GROUP4;
8796 8796 fixbit = SPACE_TYPE(bp->b_bcount);
8797 8797 count = SPACE_CNT(bp->b_bcount);
8798 8798 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
8799 8799 " %s space %s %"PRId64" from file %d blk %d\n",
8800 8800 bp->b_bcount & SP_BACKSP ? "backward" : "forward",
8801 8801 space_strs[fixbit & 7], count,
8802 8802 un->un_pos.fileno, un->un_pos.blkno);
8803 8803 address = (count >> 48) & 0x1fff;
8804 8804 additional = (count >> 16) & 0xffffffff;
8805 8805 count &= 0xffff;
8806 8806 count <<= 16;
8807 8807 un->un_lastop = ST_OP_CTL;
8808 8808 tval = un->un_dp->space_timeout;
8809 8809 break;
8810 8810
8811 8811 case SCMD_SPACE:
8812 8812 fixbit = SPACE_TYPE(bp->b_bcount);
8813 8813 count = SPACE_CNT(bp->b_bcount);
8814 8814 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
8815 8815 " %s space %s %"PRId64" from file %d blk %d\n",
8816 8816 bp->b_bcount & SP_BACKSP ? "backward" : "forward",
8817 8817 space_strs[fixbit & 7], count,
8818 8818 un->un_pos.fileno, un->un_pos.blkno);
8819 8819 count &= 0xffffffff;
8820 8820 un->un_lastop = ST_OP_CTL;
8821 8821 tval = un->un_dp->space_timeout;
8822 8822 break;
8823 8823
8824 8824 case SCMD_LOAD:
8825 8825 ASSERT(count < 10);
8826 8826 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
8827 8827 "%s tape\n", load_strs[count]);
8828 8828 fixbit = 0;
8829 8829
8830 8830 /* Loading or Unloading */
8831 8831 if (count & LD_LOAD) {
8832 8832 tval = un->un_dp->load_timeout;
8833 8833 } else {
8834 8834 tval = un->un_dp->unload_timeout;
8835 8835 }
8836 8836 /* Is Retension requested */
8837 8837 if (count & LD_RETEN) {
8838 8838 tval += un->un_dp->rewind_timeout;
8839 8839 }
8840 8840 un->un_lastop = ST_OP_CTL;
8841 8841 break;
8842 8842
8843 8843 case SCMD_ERASE:
8844 8844 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
8845 8845 "erase tape\n");
8846 8846 ASSERT(count == 1); /* mt sets this */
8847 8847 if (count == 1) {
8848 8848 /*
8849 8849 * do long erase
8850 8850 */
8851 8851 fixbit = 1; /* Long */
8852 8852
8853 8853 /* Drive might not honor immidiate bit */
8854 8854 tval = un->un_dp->erase_timeout;
8855 8855 } else {
8856 8856 /* Short Erase */
8857 8857 tval = un->un_dp->erase_timeout;
8858 8858 fixbit = 0;
8859 8859 }
8860 8860 un->un_lastop = ST_OP_CTL;
8861 8861 count = 0;
8862 8862 break;
8863 8863
8864 8864 case SCMD_MODE_SENSE:
8865 8865 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
8866 8866 "mode sense\n");
8867 8867 allocbp = bp;
8868 8868 fixbit = 0;
8869 8869 tval = un->un_dp->non_motion_timeout;
8870 8870 un->un_lastop = ST_OP_CTL;
8871 8871 break;
8872 8872
8873 8873 case SCMD_MODE_SELECT:
8874 8874 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
8875 8875 "mode select\n");
8876 8876 allocbp = bp;
8877 8877 fixbit = 0;
8878 8878 tval = un->un_dp->non_motion_timeout;
8879 8879 un->un_lastop = ST_OP_CTL;
8880 8880 break;
8881 8881
8882 8882 case SCMD_RESERVE:
8883 8883 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
8884 8884 "reserve\n");
8885 8885 fixbit = 0;
8886 8886 tval = un->un_dp->non_motion_timeout;
8887 8887 un->un_lastop = ST_OP_CTL;
8888 8888 break;
8889 8889
8890 8890 case SCMD_RELEASE:
8891 8891 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
8892 8892 "release\n");
8893 8893 fixbit = 0;
8894 8894 tval = un->un_dp->non_motion_timeout;
8895 8895 un->un_lastop = ST_OP_CTL;
8896 8896 break;
8897 8897
8898 8898 case SCMD_READ_BLKLIM:
8899 8899 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
8900 8900 "read block limits\n");
8901 8901 allocbp = bp;
8902 8902 fixbit = count = 0;
8903 8903 tval = un->un_dp->non_motion_timeout;
8904 8904 un->un_lastop = ST_OP_CTL;
8905 8905 break;
8906 8906
8907 8907 case SCMD_TEST_UNIT_READY:
8908 8908 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
8909 8909 "test unit ready\n");
8910 8910 fixbit = 0;
8911 8911 tval = un->un_dp->non_motion_timeout;
8912 8912 un->un_lastop = ST_OP_CTL;
8913 8913 break;
8914 8914
8915 8915 case SCMD_DOORLOCK:
8916 8916 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
8917 8917 "prevent/allow media removal\n");
8918 8918 fixbit = 0;
8919 8919 tval = un->un_dp->non_motion_timeout;
8920 8920 un->un_lastop = ST_OP_CTL;
8921 8921 break;
8922 8922
8923 8923 case SCMD_READ_POSITION:
8924 8924 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
8925 8925 "read position\n");
8926 8926 fixbit = un->un_read_pos_type;
8927 8927 cdb_len = CDB_GROUP1;
8928 8928 tval = un->un_dp->non_motion_timeout;
8929 8929 allocbp = bp;
8930 8930 un->un_lastop = ST_OP_CTL;
8931 8931 switch (un->un_read_pos_type) {
8932 8932 case LONG_POS:
8933 8933 count = 0;
8934 8934 break;
8935 8935 case EXT_POS:
8936 8936 count = sizeof (tape_position_ext_t);
8937 8937 break;
8938 8938 case SHORT_POS:
8939 8939 count = 0;
8940 8940 break;
8941 8941 default:
8942 8942 ST_DEBUG(ST_DEVINFO, st_label, CE_PANIC,
8943 8943 "Unknown read position type 0x%x in "
8944 8944 " st_make_cmd()\n", un->un_read_pos_type);
8945 8945 }
8946 8946 break;
8947 8947
8948 8948 default:
8949 8949 ST_DEBUG(ST_DEVINFO, st_label, CE_PANIC,
8950 8950 "Unhandled scsi command 0x%x in st_make_cmd()\n",
8951 8951 com);
8952 8952 }
8953 8953
8954 8954 pkt = scsi_init_pkt(ROUTE, NULL, allocbp, cdb_len, stat_size,
8955 8955 st_recov_sz, 0, func, (caddr_t)un);
8956 8956 if (pkt == NULL) {
8957 8957 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
8958 8958 "generic command scsi_init_pkt() failure\n");
8959 8959 goto exit;
8960 8960 }
8961 8961
8962 8962 ASSERT(pkt->pkt_resid == 0);
8963 8963 #ifdef STDEBUG
8964 8964 bzero(pkt->pkt_private, st_recov_sz);
8965 8965 bzero(pkt->pkt_scbp, stat_size);
8966 8966 #endif
8967 8967 ri = (recov_info *)pkt->pkt_private;
8968 8968 ri->privatelen = st_recov_sz;
8969 8969 if (allocbp) {
8970 8970 ASSERT(geterror(allocbp) == 0);
8971 8971 }
8972 8972
8973 8973 }
8974 8974
8975 8975 ucdb = (union scsi_cdb *)pkt->pkt_cdbp;
8976 8976
8977 8977 (void) scsi_setup_cdb(ucdb, com, address, (uint_t)count, additional);
8978 8978 FILL_SCSI1_LUN(un->un_sd, pkt);
8979 8979 /*
8980 8980 * Initialize the SILI/Fixed bits of the byte 1 of cdb.
8981 8981 */
8982 8982 ucdb->t_code = fixbit;
8983 8983 ucdb->g0_vu_1 = short_fm;
8984 8984 pkt->pkt_flags = flags;
8985 8985
8986 8986 ASSERT(tval);
8987 8987 pkt->pkt_time = tval;
8988 8988 if (bp == un->un_recov_buf) {
8989 8989 pkt->pkt_comp = st_recov_cb;
8990 8990 } else {
8991 8991 pkt->pkt_comp = st_intr;
8992 8992 }
8993 8993
8994 8994 st_add_recovery_info_to_pkt(un, bp, pkt);
8995 8995
8996 8996 /*
8997 8997 * If we just write data to tape and did a command that doesn't
8998 8998 * change position, we still need to write a filemark.
8999 8999 */
9000 9000 if ((prev_op == ST_OP_WRITE) || (prev_op == ST_OP_WEOF)) {
9001 9001 recov_info *rcvi = pkt->pkt_private;
9002 9002 cmd_attribute const *atrib;
9003 9003
9004 9004 if (rcvi->privatelen == sizeof (recov_info)) {
9005 9005 atrib = rcvi->cmd_attrib;
9006 9006 } else {
9007 9007 atrib = st_lookup_cmd_attribute(com);
9008 9008 }
9009 9009 if (atrib->chg_tape_direction == DIR_NONE) {
9010 9010 un->un_lastop = prev_op;
9011 9011 }
9012 9012 }
9013 9013
9014 9014 exit:
9015 9015 ASSERT(mutex_owned(ST_MUTEX));
9016 9016 }
9017 9017
9018 9018
9019 9019 /*
9020 9020 * Build a command based on a uscsi command;
9021 9021 */
9022 9022 static void
9023 9023 st_make_uscsi_cmd(struct scsi_tape *un, struct uscsi_cmd *ucmd,
9024 9024 struct buf *bp, int (*func)(caddr_t))
9025 9025 {
9026 9026 struct scsi_pkt *pkt;
9027 9027 recov_info *ri;
9028 9028 caddr_t cdb;
9029 9029 int cdblen;
9030 9030 int stat_size = 1;
9031 9031 int flags = 0;
9032 9032
9033 9033 ST_FUNC(ST_DEVINFO, st_make_uscsi_cmd);
9034 9034
9035 9035 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
9036 9036 "st_make_uscsi_cmd(): dev = 0x%lx\n", un->un_dev);
9037 9037
9038 9038 if (ucmd->uscsi_flags & USCSI_RQENABLE) {
9039 9039 if (un->un_arq_enabled) {
9040 9040 if (ucmd->uscsi_rqlen > SENSE_LENGTH) {
9041 9041 stat_size = (int)(ucmd->uscsi_rqlen) +
9042 9042 sizeof (struct scsi_arq_status) -
9043 9043 sizeof (struct scsi_extended_sense);
9044 9044 flags = PKT_XARQ;
9045 9045 } else {
9046 9046 stat_size = sizeof (struct scsi_arq_status);
9047 9047 }
9048 9048 }
9049 9049 }
9050 9050
9051 9051 ASSERT(mutex_owned(ST_MUTEX));
9052 9052
9053 9053 cdb = ucmd->uscsi_cdb;
9054 9054 cdblen = ucmd->uscsi_cdblen;
9055 9055
9056 9056 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
9057 9057 "st_make_uscsi_cmd: buflen=%ld bcount=%ld\n",
9058 9058 ucmd->uscsi_buflen, bp->b_bcount);
9059 9059 pkt = scsi_init_pkt(ROUTE, NULL,
9060 9060 (bp->b_bcount > 0) ? bp : NULL,
9061 9061 cdblen, stat_size, st_recov_sz, flags, func, (caddr_t)un);
9062 9062 if (pkt == NULL) {
9063 9063 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
9064 9064 "uscsi command scsi_init_pkt() failure\n");
9065 9065 goto exit;
9066 9066 }
9067 9067
9068 9068 ASSERT(pkt->pkt_resid == 0);
9069 9069 #ifdef STDEBUG
9070 9070 bzero(pkt->pkt_private, st_recov_sz);
9071 9071 bzero(pkt->pkt_scbp, stat_size);
9072 9072 #endif
9073 9073 ri = (recov_info *)pkt->pkt_private;
9074 9074 ri->privatelen = st_recov_sz;
9075 9075
9076 9076 bcopy(cdb, pkt->pkt_cdbp, (uint_t)cdblen);
9077 9077
9078 9078 #ifdef STDEBUG
9079 9079 if ((st_debug & 0x7) >= 6) {
9080 9080 st_clean_print(ST_DEVINFO, st_label, SCSI_DEBUG,
9081 9081 "pkt_cdbp", (char *)cdb, cdblen);
9082 9082 }
9083 9083 #endif
9084 9084
9085 9085 if (ucmd->uscsi_flags & USCSI_SILENT) {
9086 9086 pkt->pkt_flags |= FLAG_SILENT;
9087 9087 }
9088 9088
9089 9089 (void) scsi_uscsi_pktinit(ucmd, pkt);
9090 9090
9091 9091 pkt->pkt_time = ucmd->uscsi_timeout;
9092 9092 if (bp == un->un_recov_buf) {
9093 9093 pkt->pkt_comp = st_recov_cb;
9094 9094 } else {
9095 9095 pkt->pkt_comp = st_intr;
9096 9096 }
9097 9097
9098 9098 st_add_recovery_info_to_pkt(un, bp, pkt);
9099 9099 exit:
9100 9100 ASSERT(mutex_owned(ST_MUTEX));
9101 9101 }
9102 9102
9103 9103
9104 9104 /*
9105 9105 * restart cmd currently at the head of the runq
9106 9106 *
9107 9107 * If scsi_transport() succeeds or the retries
9108 9108 * count exhausted, restore the throttle that was
9109 9109 * zeroed out in st_handle_intr_busy().
9110 9110 *
9111 9111 */
9112 9112 static void
9113 9113 st_intr_restart(void *arg)
9114 9114 {
9115 9115 struct scsi_tape *un = arg;
9116 9116 struct buf *bp;
9117 9117 int queued;
9118 9118 int status = TRAN_ACCEPT;
9119 9119
9120 9120 mutex_enter(ST_MUTEX);
9121 9121
9122 9122 ST_FUNC(ST_DEVINFO, st_intr_restart);
9123 9123
9124 9124 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
9125 9125 "st_intr_restart(), un = 0x%p\n", (void *)un);
9126 9126
9127 9127 un->un_hib_tid = 0;
9128 9128
9129 9129 if (un->un_recov_buf_busy != 0) {
9130 9130 bp = un->un_recov_buf;
9131 9131 queued = 0;
9132 9132 } else if (un->un_sbuf_busy != 0) {
9133 9133 bp = un->un_sbufp;
9134 9134 queued = 0;
9135 9135 } else if (un->un_quef != NULL) {
9136 9136 bp = un->un_quef;
9137 9137 queued = 1;
9138 9138 } else {
9139 9139 mutex_exit(ST_MUTEX);
9140 9140 return;
9141 9141 }
9142 9142
9143 9143 /*
9144 9144 * Here we know :
9145 9145 * throttle = 0, via st_handle_intr_busy
9146 9146 */
9147 9147
9148 9148 if (queued) {
9149 9149 /*
9150 9150 * move from waitq to runq, if there is anything on the waitq
9151 9151 */
9152 9152 (void) st_remove_from_queue(&un->un_quef, &un->un_quef, bp);
9153 9153
9154 9154 if (un->un_runqf) {
9155 9155 /*
9156 9156 * not good, we don't want to requeue something after
9157 9157 * another.
9158 9158 */
9159 9159 goto done_error;
9160 9160 } else {
9161 9161 un->un_runqf = bp;
9162 9162 un->un_runql = bp;
9163 9163 }
9164 9164 }
9165 9165
9166 9166 ST_CDB(ST_DEVINFO, "Interrupt restart CDB",
9167 9167 (char *)BP_PKT(bp)->pkt_cdbp);
9168 9168
9169 9169 ST_DO_KSTATS(bp, kstat_waitq_to_runq);
9170 9170
9171 9171 status = st_transport(un, BP_PKT(bp));
9172 9172
9173 9173 if (status != TRAN_ACCEPT) {
9174 9174 ST_DO_KSTATS(bp, kstat_runq_back_to_waitq);
9175 9175
9176 9176 if (status == TRAN_BUSY) {
9177 9177 pkt_info *pkti = BP_PKT(bp)->pkt_private;
9178 9178
9179 9179 if (pkti->privatelen == sizeof (recov_info) &&
9180 9180 un->un_unit_attention_flags &&
9181 9181 bp != un->un_recov_buf) {
9182 9182 un->un_unit_attention_flags = 0;
9183 9183 ST_RECOV(ST_DEVINFO, st_label, CE_WARN,
9184 9184 "Command Recovery called on busy resend\n");
9185 9185 if (st_command_recovery(un, BP_PKT(bp),
9186 9186 ATTEMPT_RETRY) == JUST_RETURN) {
9187 9187 mutex_exit(ST_MUTEX);
9188 9188 return;
9189 9189 }
9190 9190 }
9191 9191 mutex_exit(ST_MUTEX);
9192 9192 if (st_handle_intr_busy(un, bp,
9193 9193 ST_TRAN_BUSY_TIMEOUT) == 0)
9194 9194 return; /* timeout is setup again */
9195 9195 mutex_enter(ST_MUTEX);
9196 9196 }
9197 9197
9198 9198 done_error:
9199 9199 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
9200 9200 "restart transport rejected\n");
9201 9201 bp->b_resid = bp->b_bcount;
9202 9202
9203 9203 if (un->un_last_throttle) {
9204 9204 un->un_throttle = un->un_last_throttle;
9205 9205 }
9206 9206 if (status != TRAN_ACCEPT) {
9207 9207 ST_DO_ERRSTATS(un, st_transerrs);
9208 9208 }
9209 9209 ST_DO_KSTATS(bp, kstat_waitq_exit);
9210 9210 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
9211 9211 "busy restart aborted\n");
9212 9212 st_set_pe_flag(un);
9213 9213 st_bioerror(bp, EIO);
9214 9214 st_done_and_mutex_exit(un, bp);
9215 9215 } else {
9216 9216 if (un->un_last_throttle) {
9217 9217 un->un_throttle = un->un_last_throttle;
9218 9218 }
9219 9219 mutex_exit(ST_MUTEX);
9220 9220 }
9221 9221 }
9222 9222
9223 9223 /*
9224 9224 * st_check_media():
9225 9225 * Periodically check the media state using scsi_watch service;
9226 9226 * this service calls back after TUR and possibly request sense
9227 9227 * the callback handler (st_media_watch_cb()) decodes the request sense
9228 9228 * data (if any)
9229 9229 */
9230 9230
9231 9231 static int
9232 9232 st_check_media(dev_t dev, enum mtio_state state)
9233 9233 {
9234 9234 int rval = 0;
9235 9235 enum mtio_state prev_state;
9236 9236 opaque_t token = NULL;
9237 9237
9238 9238 GET_SOFT_STATE(dev);
9239 9239
9240 9240 ST_FUNC(ST_DEVINFO, st_check_media);
9241 9241
9242 9242 mutex_enter(ST_MUTEX);
9243 9243
9244 9244 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
9245 9245 "st_check_media:state=%x, mediastate=%x\n",
9246 9246 state, un->un_mediastate);
9247 9247
9248 9248 prev_state = un->un_mediastate;
9249 9249
9250 9250 /*
9251 9251 * is there anything to do?
9252 9252 */
9253 9253 retry:
9254 9254 if (state == un->un_mediastate || un->un_mediastate == MTIO_NONE) {
9255 9255 /*
9256 9256 * submit the request to the scsi_watch service;
9257 9257 * scsi_media_watch_cb() does the real work
9258 9258 */
9259 9259 mutex_exit(ST_MUTEX);
9260 9260 token = scsi_watch_request_submit(ST_SCSI_DEVP,
9261 9261 st_check_media_time, SENSE_LENGTH,
9262 9262 st_media_watch_cb, (caddr_t)dev);
9263 9263 if (token == NULL) {
9264 9264 rval = EAGAIN;
9265 9265 goto done;
9266 9266 }
9267 9267 mutex_enter(ST_MUTEX);
9268 9268
9269 9269 un->un_swr_token = token;
9270 9270 un->un_specified_mediastate = state;
9271 9271
9272 9272 /*
9273 9273 * now wait for media change
9274 9274 * we will not be signalled unless mediastate == state but it
9275 9275 * still better to test for this condition, since there
9276 9276 * is a 5 sec cv_broadcast delay when
9277 9277 * mediastate == MTIO_INSERTED
9278 9278 */
9279 9279 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
9280 9280 "st_check_media:waiting for media state change\n");
9281 9281 while (un->un_mediastate == state) {
9282 9282 if (cv_wait_sig(&un->un_state_cv, ST_MUTEX) == 0) {
9283 9283 mutex_exit(ST_MUTEX);
9284 9284 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
9285 9285 "st_check_media:waiting for media state "
9286 9286 "was interrupted\n");
9287 9287 rval = EINTR;
9288 9288 goto done;
9289 9289 }
9290 9290 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
9291 9291 "st_check_media:received signal, state=%x\n",
9292 9292 un->un_mediastate);
9293 9293 }
9294 9294 }
9295 9295
9296 9296 /*
9297 9297 * if we transitioned to MTIO_INSERTED, media has really been
9298 9298 * inserted. If TUR fails, it is probably a exabyte slow spin up.
9299 9299 * Reset and retry the state change. If everything is ok, replay
9300 9300 * the open() logic.
9301 9301 */
9302 9302 if ((un->un_mediastate == MTIO_INSERTED) &&
9303 9303 (un->un_state == ST_STATE_OFFLINE)) {
9304 9304 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
9305 9305 "st_check_media: calling st_cmd to confirm inserted\n");
9306 9306
9307 9307 /*
9308 9308 * set this early so that TUR will make it through strategy
9309 9309 * without triggering a st_tape_init(). We needed it set
9310 9310 * before calling st_tape_init() ourselves anyway. If TUR
9311 9311 * fails, set it back
9312 9312 */
9313 9313 un->un_state = ST_STATE_INITIALIZING;
9314 9314
9315 9315 /*
9316 9316 * If not reserved fail as getting reservation conflict
9317 9317 * will make this hang forever.
9318 9318 */
9319 9319 if ((un->un_rsvd_status &
9320 9320 (ST_RESERVE | ST_APPLICATION_RESERVATIONS)) == 0) {
9321 9321 mutex_exit(ST_MUTEX);
9322 9322 rval = EACCES;
9323 9323 goto done;
9324 9324 }
9325 9325 rval = st_cmd(un, SCMD_TEST_UNIT_READY, 0, SYNC_CMD);
9326 9326 if (rval == EACCES) {
9327 9327 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
9328 9328 "st_check_media: TUR got Reservation Conflict\n");
9329 9329 mutex_exit(ST_MUTEX);
9330 9330 goto done;
9331 9331 }
9332 9332 if (rval) {
9333 9333 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
9334 9334 "st_check_media: TUR failed, going to retry\n");
9335 9335 un->un_mediastate = prev_state;
9336 9336 un->un_state = ST_STATE_OFFLINE;
9337 9337 goto retry;
9338 9338 }
9339 9339 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
9340 9340 "st_check_media: media inserted\n");
9341 9341
9342 9342 /* this also rewinds the tape */
9343 9343 rval = st_tape_init(un);
9344 9344 if (rval != 0) {
9345 9345 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
9346 9346 "st_check_media : OFFLINE init failure ");
9347 9347 un->un_state = ST_STATE_OFFLINE;
9348 9348 un->un_pos.pmode = invalid;
9349 9349 } else {
9350 9350 un->un_state = ST_STATE_OPEN_PENDING_IO;
9351 9351 }
9352 9352 } else if ((un->un_mediastate == MTIO_EJECTED) &&
9353 9353 (un->un_state != ST_STATE_OFFLINE)) {
9354 9354 /*
9355 9355 * supported devices must be rewound before ejection
9356 9356 * rewind resets fileno & blkno
9357 9357 */
9358 9358 un->un_laststate = un->un_state;
9359 9359 un->un_state = ST_STATE_OFFLINE;
9360 9360 }
9361 9361 mutex_exit(ST_MUTEX);
9362 9362 done:
9363 9363 if (token) {
9364 9364 (void) scsi_watch_request_terminate(token,
9365 9365 SCSI_WATCH_TERMINATE_WAIT);
9366 9366 mutex_enter(ST_MUTEX);
9367 9367 un->un_swr_token = (opaque_t)NULL;
9368 9368 mutex_exit(ST_MUTEX);
9369 9369 }
9370 9370
9371 9371 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG, "st_check_media: done\n");
9372 9372
9373 9373 return (rval);
9374 9374 }
9375 9375
9376 9376 /*
9377 9377 * st_media_watch_cb() is called by scsi_watch_thread for
9378 9378 * verifying the request sense data (if any)
9379 9379 */
9380 9380 static int
9381 9381 st_media_watch_cb(caddr_t arg, struct scsi_watch_result *resultp)
9382 9382 {
9383 9383 struct scsi_status *statusp = resultp->statusp;
9384 9384 struct scsi_extended_sense *sensep = resultp->sensep;
9385 9385 uchar_t actual_sense_length = resultp->actual_sense_length;
9386 9386 struct scsi_tape *un;
9387 9387 enum mtio_state state = MTIO_NONE;
9388 9388 int instance;
9389 9389 dev_t dev = (dev_t)arg;
9390 9390
9391 9391 instance = MTUNIT(dev);
9392 9392 if ((un = ddi_get_soft_state(st_state, instance)) == NULL) {
9393 9393 return (-1);
9394 9394 }
9395 9395
9396 9396 mutex_enter(ST_MUTEX);
9397 9397 ST_FUNC(ST_DEVINFO, st_media_watch_cb);
9398 9398 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
9399 9399 "st_media_watch_cb: status=%x, sensep=%p, len=%x\n",
9400 9400 *((char *)statusp), (void *)sensep,
9401 9401 actual_sense_length);
9402 9402
9403 9403
9404 9404 /*
9405 9405 * if there was a check condition then sensep points to valid
9406 9406 * sense data
9407 9407 * if status was not a check condition but a reservation or busy
9408 9408 * status then the new state is MTIO_NONE
9409 9409 */
9410 9410 if (sensep) {
9411 9411 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
9412 9412 "st_media_watch_cb: KEY=%x, ASC=%x, ASCQ=%x\n",
9413 9413 sensep->es_key, sensep->es_add_code, sensep->es_qual_code);
9414 9414
9415 9415 switch (un->un_dp->type) {
9416 9416 default:
9417 9417 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
9418 9418 "st_media_watch_cb: unknown drive type %d, "
9419 9419 "default to ST_TYPE_HP\n", un->un_dp->type);
9420 9420 /* FALLTHROUGH */
9421 9421
9422 9422 case ST_TYPE_STC3490: /* STK 4220 1/2" cartridge */
9423 9423 case ST_TYPE_FUJI: /* 1/2" cartridge */
9424 9424 case ST_TYPE_HP: /* HP 88780 1/2" reel */
9425 9425 if (un->un_dp->type == ST_TYPE_FUJI) {
9426 9426 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
9427 9427 "st_media_watch_cb: ST_TYPE_FUJI\n");
9428 9428 } else {
9429 9429 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
9430 9430 "st_media_watch_cb: ST_TYPE_HP\n");
9431 9431 }
9432 9432 switch (sensep->es_key) {
9433 9433 case KEY_UNIT_ATTENTION:
9434 9434 /* not ready to ready transition */
9435 9435 /* hp/es_qual_code == 80 on>off>on */
9436 9436 /* hp/es_qual_code == 0 on>off>unld>ld>on */
9437 9437 if (sensep->es_add_code == 0x28) {
9438 9438 state = MTIO_INSERTED;
9439 9439 }
9440 9440 break;
9441 9441 case KEY_NOT_READY:
9442 9442 /* in process, rewinding or loading */
9443 9443 if ((sensep->es_add_code == 0x04) &&
9444 9444 (sensep->es_qual_code == 0x00)) {
9445 9445 state = MTIO_EJECTED;
9446 9446 }
9447 9447 break;
9448 9448 }
9449 9449 break;
9450 9450
9451 9451 case ST_TYPE_EXB8500: /* Exabyte 8500 */
9452 9452 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
9453 9453 "st_media_watch_cb: ST_TYPE_EXB8500\n");
9454 9454 switch (sensep->es_key) {
9455 9455 case KEY_UNIT_ATTENTION:
9456 9456 /* operator medium removal request */
9457 9457 if ((sensep->es_add_code == 0x5a) &&
9458 9458 (sensep->es_qual_code == 0x01)) {
9459 9459 state = MTIO_EJECTED;
9460 9460 /* not ready to ready transition */
9461 9461 } else if ((sensep->es_add_code == 0x28) &&
9462 9462 (sensep->es_qual_code == 0x00)) {
9463 9463 state = MTIO_INSERTED;
9464 9464 }
9465 9465 break;
9466 9466 case KEY_NOT_READY:
9467 9467 /* medium not present */
9468 9468 if (sensep->es_add_code == 0x3a) {
9469 9469 state = MTIO_EJECTED;
9470 9470 }
9471 9471 break;
9472 9472 }
9473 9473 break;
9474 9474 case ST_TYPE_EXABYTE: /* Exabyte 8200 */
9475 9475 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
9476 9476 "st_media_watch_cb: ST_TYPE_EXABYTE\n");
9477 9477 switch (sensep->es_key) {
9478 9478 case KEY_NOT_READY:
9479 9479 if ((sensep->es_add_code == 0x04) &&
9480 9480 (sensep->es_qual_code == 0x00)) {
9481 9481 /* volume not mounted? */
9482 9482 state = MTIO_EJECTED;
9483 9483 } else if (sensep->es_add_code == 0x3a) {
9484 9484 state = MTIO_EJECTED;
9485 9485 }
9486 9486 break;
9487 9487 case KEY_UNIT_ATTENTION:
9488 9488 state = MTIO_EJECTED;
9489 9489 break;
9490 9490 }
9491 9491 break;
9492 9492
9493 9493 case ST_TYPE_DLT: /* quantum DLT4xxx */
9494 9494 switch (sensep->es_key) {
9495 9495 case KEY_UNIT_ATTENTION:
9496 9496 if (sensep->es_add_code == 0x28) {
9497 9497 state = MTIO_INSERTED;
9498 9498 }
9499 9499 break;
9500 9500 case KEY_NOT_READY:
9501 9501 if (sensep->es_add_code == 0x04) {
9502 9502 /* in transition but could be either */
9503 9503 state = un->un_specified_mediastate;
9504 9504 } else if ((sensep->es_add_code == 0x3a) &&
9505 9505 (sensep->es_qual_code == 0x00)) {
9506 9506 state = MTIO_EJECTED;
9507 9507 }
9508 9508 break;
9509 9509 }
9510 9510 break;
9511 9511 }
9512 9512 } else if (*((char *)statusp) == STATUS_GOOD) {
9513 9513 state = MTIO_INSERTED;
9514 9514 }
9515 9515
9516 9516 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
9517 9517 "st_media_watch_cb:state=%x, specified=%x\n",
9518 9518 state, un->un_specified_mediastate);
9519 9519
9520 9520 /*
9521 9521 * now signal the waiting thread if this is *not* the specified state;
9522 9522 * delay the signal if the state is MTIO_INSERTED
9523 9523 * to allow the target to recover
9524 9524 */
9525 9525 if (state != un->un_specified_mediastate) {
9526 9526 un->un_mediastate = state;
9527 9527 if (state == MTIO_INSERTED) {
9528 9528 /*
9529 9529 * delay the signal to give the drive a chance
9530 9530 * to do what it apparently needs to do
9531 9531 */
9532 9532 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
9533 9533 "st_media_watch_cb:delayed cv_broadcast\n");
9534 9534 un->un_delay_tid = timeout(st_delayed_cv_broadcast,
9535 9535 un, drv_usectohz((clock_t)MEDIA_ACCESS_DELAY));
9536 9536 } else {
9537 9537 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
9538 9538 "st_media_watch_cb:immediate cv_broadcast\n");
9539 9539 cv_broadcast(&un->un_state_cv);
9540 9540 }
9541 9541 }
9542 9542 mutex_exit(ST_MUTEX);
9543 9543 return (0);
9544 9544 }
9545 9545
9546 9546 /*
9547 9547 * delayed cv_broadcast to allow for target to recover
9548 9548 * from media insertion
9549 9549 */
9550 9550 static void
9551 9551 st_delayed_cv_broadcast(void *arg)
9552 9552 {
9553 9553 struct scsi_tape *un = arg;
9554 9554
9555 9555 ST_FUNC(ST_DEVINFO, st_delayed_cv_broadcast);
9556 9556
9557 9557 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
9558 9558 "st_delayed_cv_broadcast:delayed cv_broadcast\n");
9559 9559
9560 9560 mutex_enter(ST_MUTEX);
9561 9561 cv_broadcast(&un->un_state_cv);
9562 9562 mutex_exit(ST_MUTEX);
9563 9563 }
9564 9564
9565 9565 /*
9566 9566 * restart cmd currently at the start of the waitq
9567 9567 */
9568 9568 static void
9569 9569 st_start_restart(void *arg)
9570 9570 {
9571 9571 struct scsi_tape *un = arg;
9572 9572
9573 9573 ST_FUNC(ST_DEVINFO, st_start_restart);
9574 9574
9575 9575 ASSERT(un != NULL);
9576 9576
9577 9577 mutex_enter(ST_MUTEX);
9578 9578
9579 9579 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG, "st_tran_restart()\n");
9580 9580
9581 9581 st_start(un);
9582 9582
9583 9583 mutex_exit(ST_MUTEX);
9584 9584 }
9585 9585
9586 9586
9587 9587 /*
9588 9588 * Command completion processing
9589 9589 *
9590 9590 */
9591 9591 static void
9592 9592 st_intr(struct scsi_pkt *pkt)
9593 9593 {
9594 9594 recov_info *rcv = pkt->pkt_private;
9595 9595 struct buf *bp = rcv->cmd_bp;
9596 9596 struct scsi_tape *un;
9597 9597 errstate action = COMMAND_DONE;
9598 9598 clock_t timout;
9599 9599 int status;
9600 9600
9601 9601 un = ddi_get_soft_state(st_state, MTUNIT(bp->b_edev));
9602 9602
9603 9603 ST_FUNC(ST_DEVINFO, st_intr);
9604 9604
9605 9605 ASSERT(un != NULL);
9606 9606
9607 9607 mutex_enter(ST_MUTEX);
9608 9608
9609 9609 ASSERT(bp != un->un_recov_buf);
9610 9610
9611 9611 un->un_rqs_state &= ~(ST_RQS_ERROR);
9612 9612
9613 9613 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG, "st_intr()\n");
9614 9614
9615 9615 if (pkt->pkt_reason != CMD_CMPLT) {
9616 9616 ST_DEBUG(ST_DEVINFO, st_label, CE_WARN,
9617 9617 "Unhappy packet status reason = %s statistics = 0x%x\n",
9618 9618 scsi_rname(pkt->pkt_reason), pkt->pkt_statistics);
9619 9619
9620 9620 /* If device has gone away not much else to do */
9621 9621 if (pkt->pkt_reason == CMD_DEV_GONE) {
9622 9622 action = COMMAND_DONE_ERROR;
9623 9623 } else if ((pkt == un->un_rqs) ||
9624 9624 (un->un_state == ST_STATE_SENSING)) {
9625 9625 ASSERT(pkt == un->un_rqs);
9626 9626 ASSERT(un->un_state == ST_STATE_SENSING);
9627 9627 un->un_state = un->un_laststate;
9628 9628 rcv->cmd_bp = un->un_rqs_bp;
9629 9629 ST_DO_ERRSTATS(un, st_transerrs);
9630 9630 action = COMMAND_DONE_ERROR;
9631 9631 } else {
9632 9632 action = st_handle_incomplete(un, bp);
9633 9633 }
9634 9634 /*
9635 9635 * At this point we know that the command was successfully
9636 9636 * completed. Now what?
9637 9637 */
9638 9638 } else if ((pkt == un->un_rqs) || (un->un_state == ST_STATE_SENSING)) {
9639 9639 /*
9640 9640 * okay. We were running a REQUEST SENSE. Find
9641 9641 * out what to do next.
9642 9642 */
9643 9643 ASSERT(pkt == un->un_rqs);
9644 9644 ASSERT(un->un_state == ST_STATE_SENSING);
9645 9645 scsi_sync_pkt(pkt);
9646 9646 action = st_handle_sense(un, bp, &un->un_pos);
9647 9647 /*
9648 9648 * Make rqs isn't going to be retied.
9649 9649 */
9650 9650 if (action != QUE_BUSY_COMMAND && action != QUE_COMMAND) {
9651 9651 /*
9652 9652 * set pkt back to original packet in case we will have
9653 9653 * to requeue it
9654 9654 */
9655 9655 pkt = BP_PKT(bp);
9656 9656 rcv->cmd_bp = un->un_rqs_bp;
9657 9657 /*
9658 9658 * some actions are based on un_state, hence
9659 9659 * restore the state st was in before ST_STATE_SENSING.
9660 9660 */
9661 9661 un->un_state = un->un_laststate;
9662 9662 }
9663 9663
9664 9664 } else if (un->un_arq_enabled && (pkt->pkt_state & STATE_ARQ_DONE)) {
9665 9665 /*
9666 9666 * the transport layer successfully completed an autorqsense
9667 9667 */
9668 9668 action = st_handle_autosense(un, bp, &un->un_pos);
9669 9669
9670 9670 } else if ((SCBP(pkt)->sts_busy) ||
9671 9671 (SCBP(pkt)->sts_chk) ||
9672 9672 (SCBP(pkt)->sts_vu7)) {
9673 9673 /*
9674 9674 * Okay, we weren't running a REQUEST SENSE. Call a routine
9675 9675 * to see if the status bits we're okay. If a request sense
9676 9676 * is to be run, that will happen.
9677 9677 */
9678 9678 action = st_check_error(un, pkt);
9679 9679 }
9680 9680
9681 9681 if (un->un_pwr_mgmt == ST_PWR_SUSPENDED) {
9682 9682 switch (action) {
9683 9683 case QUE_COMMAND:
9684 9684 /*
9685 9685 * return cmd to head to the queue
9686 9686 * since we are suspending so that
9687 9687 * it gets restarted during resume
9688 9688 */
9689 9689 st_add_to_queue(&un->un_runqf, &un->un_runql,
9690 9690 un->un_runqf, bp);
9691 9691
9692 9692 action = JUST_RETURN;
9693 9693 break;
9694 9694
9695 9695 case QUE_SENSE:
9696 9696 action = COMMAND_DONE_ERROR;
9697 9697 break;
9698 9698
9699 9699 default:
9700 9700 break;
9701 9701 }
9702 9702 }
9703 9703
9704 9704 /*
9705 9705 * check for undetected path failover.
9706 9706 */
9707 9707 if (un->un_multipath) {
9708 9708
9709 9709 struct uscsi_cmd *ucmd = BP_UCMD(bp);
9710 9710 int pkt_valid = 0;
9711 9711
9712 9712 if (ucmd) {
9713 9713 /*
9714 9714 * Also copies path instance to the uscsi structure.
9715 9715 */
9716 9716 pkt_valid = scsi_uscsi_pktfini(pkt, ucmd);
9717 9717
9718 9718 /*
9719 9719 * scsi_uscsi_pktfini() zeros pkt_path_instance.
9720 9720 */
9721 9721 pkt->pkt_path_instance = ucmd->uscsi_path_instance;
9722 9722 } else {
9723 9723 pkt_valid = scsi_pkt_allocated_correctly(pkt);
9724 9724 }
9725 9725
9726 9726 /*
9727 9727 * If the scsi_pkt was not allocated correctly the
9728 9728 * pkt_path_instance is not even there.
9729 9729 */
9730 9730 if ((pkt_valid != 0) &&
9731 9731 (un->un_last_path_instance != pkt->pkt_path_instance)) {
9732 9732 /*
9733 9733 * Don't recover the path change if it was done
9734 9734 * intentionally or if the device has not completely
9735 9735 * opened yet.
9736 9736 */
9737 9737 if (((pkt->pkt_flags & FLAG_PKT_PATH_INSTANCE) == 0) &&
9738 9738 (un->un_state > ST_STATE_OPENING)) {
9739 9739 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
9740 9740 "Failover detected, action is %s\n",
9741 9741 errstatenames[action]);
9742 9742 if (action == COMMAND_DONE) {
9743 9743 action = PATH_FAILED;
9744 9744 }
9745 9745 }
9746 9746 un->un_last_path_instance = pkt->pkt_path_instance;
9747 9747 }
9748 9748 }
9749 9749
9750 9750 /*
9751 9751 * Restore old state if we were sensing.
9752 9752 */
9753 9753 if (un->un_state == ST_STATE_SENSING && action != QUE_SENSE) {
9754 9754 un->un_state = un->un_laststate;
9755 9755 }
9756 9756
9757 9757 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
9758 9758 "st_intr: pkt=%p, bp=%p, action=%s, status=%x\n",
9759 9759 (void *)pkt, (void *)bp, errstatenames[action], SCBP_C(pkt));
9760 9760
9761 9761 again:
9762 9762 switch (action) {
9763 9763 case COMMAND_DONE_EACCES:
9764 9764 /* this is to report a reservation conflict */
9765 9765 st_bioerror(bp, EACCES);
9766 9766 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
9767 9767 "Reservation Conflict \n");
9768 9768 un->un_pos.pmode = invalid;
9769 9769
9770 9770 /*FALLTHROUGH*/
9771 9771 case COMMAND_DONE_ERROR:
9772 9772 if (un->un_pos.eof < ST_EOT_PENDING &&
9773 9773 un->un_state >= ST_STATE_OPEN) {
9774 9774 /*
9775 9775 * all errors set state of the tape to 'unknown'
9776 9776 * unless we're at EOT or are doing append testing.
9777 9777 * If sense key was illegal request, preserve state.
9778 9778 */
9779 9779 if (un->un_status != KEY_ILLEGAL_REQUEST) {
9780 9780 un->un_pos.pmode = invalid;
9781 9781 }
9782 9782 }
9783 9783
9784 9784 un->un_err_resid = bp->b_resid = bp->b_bcount;
9785 9785 /*
9786 9786 * since we have an error (COMMAND_DONE_ERROR), we want to
9787 9787 * make sure an error ocurrs, so make sure at least EIO is
9788 9788 * returned
9789 9789 */
9790 9790 if (geterror(bp) == 0)
9791 9791 st_bioerror(bp, EIO);
9792 9792
9793 9793 st_set_pe_flag(un);
9794 9794 if (!(un->un_rqs_state & ST_RQS_ERROR) &&
9795 9795 (un->un_errno == EIO)) {
9796 9796 un->un_rqs_state &= ~(ST_RQS_VALID);
9797 9797 }
9798 9798 break;
9799 9799
9800 9800 case COMMAND_DONE_ERROR_RECOVERED:
9801 9801 un->un_err_resid = bp->b_resid = bp->b_bcount;
9802 9802 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
9803 9803 "st_intr(): COMMAND_DONE_ERROR_RECOVERED");
9804 9804 if (geterror(bp) == 0) {
9805 9805 st_bioerror(bp, EIO);
9806 9806 }
9807 9807 st_set_pe_flag(un);
9808 9808 if (!(un->un_rqs_state & ST_RQS_ERROR) &&
9809 9809 (un->un_errno == EIO)) {
9810 9810 un->un_rqs_state &= ~(ST_RQS_VALID);
9811 9811 }
9812 9812 /*FALLTHROUGH*/
9813 9813 case COMMAND_DONE:
9814 9814 st_set_state(un, bp);
9815 9815 break;
9816 9816
9817 9817 case QUE_SENSE:
9818 9818 if ((un->un_ncmds > 1) && !un->un_flush_on_errors)
9819 9819 goto sense_error;
9820 9820
9821 9821 if (un->un_state != ST_STATE_SENSING) {
9822 9822 un->un_laststate = un->un_state;
9823 9823 un->un_state = ST_STATE_SENSING;
9824 9824 }
9825 9825
9826 9826 /*
9827 9827 * zero the sense data.
9828 9828 */
9829 9829 bzero(un->un_rqs->pkt_scbp, SENSE_LENGTH);
9830 9830
9831 9831 /*
9832 9832 * If this is not a retry on QUE_SENSE point to the original
9833 9833 * bp of the command that got us here.
9834 9834 */
9835 9835 if (pkt != un->un_rqs) {
9836 9836 ((recov_info *)un->un_rqs->pkt_private)->cmd_bp = bp;
9837 9837 }
9838 9838
9839 9839 if (un->un_throttle) {
9840 9840 un->un_last_throttle = un->un_throttle;
9841 9841 un->un_throttle = 0;
9842 9842 }
9843 9843
9844 9844 ST_CDB(ST_DEVINFO, "Queue sense CDB",
9845 9845 (char *)BP_PKT(bp)->pkt_cdbp);
9846 9846
9847 9847 /*
9848 9848 * never retry this, some other command will have nuked the
9849 9849 * sense, anyway
9850 9850 */
9851 9851 status = st_transport(un, un->un_rqs);
9852 9852
9853 9853 if (un->un_last_throttle) {
9854 9854 un->un_throttle = un->un_last_throttle;
9855 9855 }
9856 9856
9857 9857 if (status == TRAN_ACCEPT) {
9858 9858 mutex_exit(ST_MUTEX);
9859 9859 return;
9860 9860 }
9861 9861 if (status != TRAN_BUSY)
9862 9862 ST_DO_ERRSTATS(un, st_transerrs);
9863 9863 sense_error:
9864 9864 un->un_pos.pmode = invalid;
9865 9865 st_bioerror(bp, EIO);
9866 9866 st_set_pe_flag(un);
9867 9867 break;
9868 9868
9869 9869 case QUE_BUSY_COMMAND:
9870 9870 /* longish timeout */
9871 9871 timout = ST_STATUS_BUSY_TIMEOUT;
9872 9872 goto que_it_up;
9873 9873
9874 9874 case QUE_COMMAND:
9875 9875 /* short timeout */
9876 9876 timout = ST_TRAN_BUSY_TIMEOUT;
9877 9877 que_it_up:
9878 9878 /*
9879 9879 * let st_handle_intr_busy put this bp back on waitq and make
9880 9880 * checks to see if it is ok to requeue the command.
9881 9881 */
9882 9882 ST_DO_KSTATS(bp, kstat_runq_back_to_waitq);
9883 9883
9884 9884 /*
9885 9885 * Save the throttle before setting up the timeout
9886 9886 */
9887 9887 if (un->un_throttle) {
9888 9888 un->un_last_throttle = un->un_throttle;
9889 9889 }
9890 9890 mutex_exit(ST_MUTEX);
9891 9891 if (st_handle_intr_busy(un, bp, timout) == 0)
9892 9892 return; /* timeout is setup again */
9893 9893
9894 9894 mutex_enter(ST_MUTEX);
9895 9895 un->un_pos.pmode = invalid;
9896 9896 un->un_err_resid = bp->b_resid = bp->b_bcount;
9897 9897 st_bioerror(bp, EIO);
9898 9898 st_set_pe_flag(un);
9899 9899 break;
9900 9900
9901 9901 case QUE_LAST_COMMAND:
9902 9902
9903 9903 if ((un->un_ncmds > 1) && !un->un_flush_on_errors) {
9904 9904 scsi_log(ST_DEVINFO, st_label, CE_CONT,
9905 9905 "un_ncmds: %d can't retry cmd \n", un->un_ncmds);
9906 9906 goto last_command_error;
9907 9907 }
9908 9908 mutex_exit(ST_MUTEX);
9909 9909 if (st_handle_intr_retry_lcmd(un, bp) == 0)
9910 9910 return;
9911 9911 mutex_enter(ST_MUTEX);
9912 9912 last_command_error:
9913 9913 un->un_err_resid = bp->b_resid = bp->b_bcount;
9914 9914 un->un_pos.pmode = invalid;
9915 9915 st_bioerror(bp, EIO);
9916 9916 st_set_pe_flag(un);
9917 9917 break;
9918 9918
9919 9919 case COMMAND_TIMEOUT:
9920 9920 case DEVICE_RESET:
9921 9921 case DEVICE_TAMPER:
9922 9922 case ATTEMPT_RETRY:
9923 9923 case PATH_FAILED:
9924 9924 ST_RECOV(ST_DEVINFO, st_label, CE_WARN,
9925 9925 "Command Recovery called on %s status\n",
9926 9926 errstatenames[action]);
9927 9927 action = st_command_recovery(un, pkt, action);
9928 9928 goto again;
9929 9929
9930 9930 default:
9931 9931 ASSERT(0);
9932 9932 /* FALLTHRU */
9933 9933 case JUST_RETURN:
9934 9934 ST_DO_KSTATS(bp, kstat_runq_back_to_waitq);
9935 9935 mutex_exit(ST_MUTEX);
9936 9936 return;
9937 9937 }
9938 9938
9939 9939 ST_DO_KSTATS(bp, kstat_runq_exit);
9940 9940 st_done_and_mutex_exit(un, bp);
9941 9941 }
9942 9942
9943 9943 static errstate
9944 9944 st_handle_incomplete(struct scsi_tape *un, struct buf *bp)
9945 9945 {
9946 9946 static char *fail = "SCSI transport failed: reason '%s': %s\n";
9947 9947 recov_info *rinfo;
9948 9948 errstate rval = COMMAND_DONE_ERROR;
9949 9949 struct scsi_pkt *pkt = (un->un_state == ST_STATE_SENSING) ?
9950 9950 un->un_rqs : BP_PKT(bp);
9951 9951 int result;
9952 9952
9953 9953 ST_FUNC(ST_DEVINFO, st_handle_incomplete);
9954 9954
9955 9955 rinfo = (recov_info *)pkt->pkt_private;
9956 9956
9957 9957 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
9958 9958 "st_handle_incomplete(): dev = 0x%lx\n", un->un_dev);
9959 9959
9960 9960 ASSERT(mutex_owned(ST_MUTEX));
9961 9961
9962 9962 /* prevent infinite number of retries */
9963 9963 if (rinfo->pkt_retry_cnt++ > st_retry_count) {
9964 9964 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
9965 9965 "Recovery stopped for incomplete %s command, "
9966 9966 "retries exhausted",
9967 9967 st_print_scsi_cmd(pkt->pkt_cdbp[0]));
9968 9968 return (COMMAND_DONE_ERROR);
9969 9969 }
9970 9970
9971 9971 switch (pkt->pkt_reason) {
9972 9972 case CMD_INCOMPLETE: /* tran stopped with not normal state */
9973 9973 /*
9974 9974 * this occurs when accessing a powered down drive, no
9975 9975 * need to complain; just fail the open
9976 9976 */
9977 9977 ST_CDB(ST_DEVINFO, "Incomplete CDB", (char *)pkt->pkt_cdbp);
9978 9978
9979 9979 /*
9980 9980 * if we have commands outstanding in HBA, and a command
9981 9981 * comes back incomplete, we're hosed, so reset target
9982 9982 * If we have the bus, but cmd_incomplete, we probably just
9983 9983 * have a failed selection, so don't reset the target, just
9984 9984 * requeue the command and try again
9985 9985 */
9986 9986 if ((un->un_ncmds > 1) || (pkt->pkt_state != STATE_GOT_BUS)) {
9987 9987 goto reset_target;
9988 9988 }
9989 9989
9990 9990 /*
9991 9991 * Retry selection a couple more times if we're
9992 9992 * open. If opening, we only try just once to
9993 9993 * reduce probe time for nonexistant devices.
9994 9994 */
9995 9995 if ((un->un_laststate > ST_STATE_OPENING) &&
9996 9996 (rinfo->pkt_retry_cnt < st_selection_retry_count)) {
9997 9997 /* XXX check retriable? */
9998 9998 rval = QUE_COMMAND;
9999 9999 }
10000 10000 ST_DO_ERRSTATS(un, st_transerrs);
10001 10001 break;
10002 10002
10003 10003 case CMD_ABORTED:
10004 10004 /*
10005 10005 * most likely this is caused by flush-on-error support. If
10006 10006 * it was not there, the we're in trouble.
10007 10007 */
10008 10008 if (!un->un_flush_on_errors) {
10009 10009 un->un_status = SUN_KEY_FATAL;
10010 10010 goto reset_target;
10011 10011 }
10012 10012
10013 10013 st_set_pe_errno(un);
10014 10014 bioerror(bp, un->un_errno);
10015 10015 if (un->un_errno)
10016 10016 return (COMMAND_DONE_ERROR);
10017 10017 else
10018 10018 return (COMMAND_DONE);
10019 10019
10020 10020 case CMD_TIMEOUT: /* Command timed out */
10021 10021 un->un_status = SUN_KEY_TIMEOUT;
10022 10022 return (COMMAND_TIMEOUT);
10023 10023
10024 10024 case CMD_TRAN_ERR:
10025 10025 case CMD_RESET:
10026 10026 if (pkt->pkt_statistics & (STAT_BUS_RESET | STAT_DEV_RESET)) {
10027 10027 if ((un->un_rsvd_status &
10028 10028 (ST_RESERVE | ST_APPLICATION_RESERVATIONS)) ==
10029 10029 ST_RESERVE) {
10030 10030 un->un_rsvd_status |= ST_LOST_RESERVE;
10031 10031 ST_DEBUG3(ST_DEVINFO, st_label, CE_WARN,
10032 10032 "Lost Reservation\n");
10033 10033 }
10034 10034 rval = DEVICE_RESET;
10035 10035 return (rval);
10036 10036 }
10037 10037 if (pkt->pkt_statistics & (STAT_ABORTED | STAT_TERMINATED)) {
10038 10038 rval = DEVICE_RESET;
10039 10039 return (rval);
10040 10040 }
10041 10041 /*FALLTHROUGH*/
10042 10042 default:
10043 10043 scsi_log(ST_DEVINFO, st_label, CE_WARN,
10044 10044 "Unhandled packet status reason = %s statistics = 0x%x\n",
10045 10045 scsi_rname(pkt->pkt_reason), pkt->pkt_statistics);
10046 10046 reset_target:
10047 10047
10048 10048 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
10049 10049 "transport completed with %s\n",
10050 10050 scsi_rname(pkt->pkt_reason));
10051 10051 ST_DO_ERRSTATS(un, st_transerrs);
10052 10052 if ((pkt->pkt_state & STATE_GOT_TARGET) &&
10053 10053 ((pkt->pkt_statistics & (STAT_BUS_RESET | STAT_DEV_RESET |
10054 10054 STAT_ABORTED)) == 0)) {
10055 10055
10056 10056 /*
10057 10057 * If we haven't reserved the drive don't reset it.
10058 10058 */
10059 10059 if ((un->un_rsvd_status &
10060 10060 (ST_RESERVE | ST_APPLICATION_RESERVATIONS)) == 0) {
10061 10061 return (rval);
10062 10062 }
10063 10063
10064 10064 /*
10065 10065 * if we aren't lost yet we will be soon.
10066 10066 */
10067 10067 un->un_pos.pmode = invalid;
10068 10068
10069 10069 result = st_reset(un, RESET_LUN);
10070 10070
10071 10071 if ((result == 0) && (un->un_state >= ST_STATE_OPEN)) {
10072 10072 /* no hope left to recover */
10073 10073 scsi_log(ST_DEVINFO, st_label, CE_WARN,
10074 10074 "recovery by resets failed\n");
10075 10075 return (rval);
10076 10076 }
10077 10077 }
10078 10078 }
10079 10079
10080 10080
10081 10081 if (un->un_pwr_mgmt == ST_PWR_SUSPENDED) {
10082 10082 rval = QUE_COMMAND;
10083 10083 } else if (bp == un->un_sbufp) {
10084 10084 if (rinfo->privatelen == sizeof (recov_info)) {
10085 10085 if (rinfo->cmd_attrib->retriable) {
10086 10086 /*
10087 10087 * These commands can be rerun
10088 10088 * with impunity
10089 10089 */
10090 10090 rval = QUE_COMMAND;
10091 10091 }
10092 10092 } else {
10093 10093 cmd_attribute const *attrib;
10094 10094 attrib = st_lookup_cmd_attribute(pkt->pkt_cdbp[0]);
10095 10095 if (attrib->retriable) {
10096 10096 rval = QUE_COMMAND;
10097 10097 }
10098 10098 }
10099 10099 }
10100 10100
10101 10101 if (un->un_state >= ST_STATE_OPEN) {
10102 10102 scsi_log(ST_DEVINFO, st_label, CE_WARN,
10103 10103 fail, scsi_rname(pkt->pkt_reason),
10104 10104 (rval == COMMAND_DONE_ERROR)?
10105 10105 "giving up" : "retrying command");
10106 10106 }
10107 10107 return (rval);
10108 10108 }
10109 10109
10110 10110 /*
10111 10111 * if the device is busy, then put this bp back on the waitq, on the
10112 10112 * interrupt thread, where we want the head of the queue and not the
10113 10113 * end
10114 10114 *
10115 10115 * The callers of this routine should take measures to save the
10116 10116 * un_throttle in un_last_throttle which will be restored in
10117 10117 * st_intr_restart(). The only exception should be st_intr_restart()
10118 10118 * calling this routine for which the saving is already done.
10119 10119 */
10120 10120 static int
10121 10121 st_handle_intr_busy(struct scsi_tape *un, struct buf *bp,
10122 10122 clock_t timeout_interval)
10123 10123 {
10124 10124
10125 10125 int queued;
10126 10126 int rval = 0;
10127 10127 pkt_info *pktinfo = BP_PKT(bp)->pkt_private;
10128 10128
10129 10129 mutex_enter(ST_MUTEX);
10130 10130
10131 10131 ST_FUNC(ST_DEVINFO, st_handle_intr_busy);
10132 10132
10133 10133 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
10134 10134 "st_handle_intr_busy(), un = 0x%p\n", (void *)un);
10135 10135
10136 10136 if ((bp != un->un_sbufp) && (bp != un->un_recov_buf)) {
10137 10137 queued = 1;
10138 10138 } else {
10139 10139 queued = 0;
10140 10140 }
10141 10141
10142 10142 /*
10143 10143 * Check to see if we hit the retry timeout. We check to make sure
10144 10144 * this is the first one on the runq and make sure we have not
10145 10145 * queued up any more, so this one has to be the last on the list
10146 10146 * also. If it is not, we have to fail. If it is not the first, but
10147 10147 * is the last we are in trouble anyway, as we are in the interrupt
10148 10148 * context here.
10149 10149 */
10150 10150 if ((pktinfo->str_retry_cnt++ > st_retry_count) ||
10151 10151 ((un->un_runqf != bp) && (un->un_runql != bp) && (queued))) {
10152 10152 rval = -1;
10153 10153 goto exit;
10154 10154 }
10155 10155
10156 10156 /* put the bp back on the waitq */
10157 10157 if (queued) {
10158 10158 (void) st_remove_from_queue(&un->un_runqf, &un->un_runql, bp);
10159 10159 st_add_to_queue(&un->un_quef, &un->un_quel, un->un_quef, bp);
10160 10160 }
10161 10161
10162 10162 /*
10163 10163 * We don't want any other commands being started in the mean time.
10164 10164 * If start had just released mutex after putting something on the
10165 10165 * runq, we won't even get here.
10166 10166 */
10167 10167 un->un_throttle = 0;
10168 10168
10169 10169 /*
10170 10170 * send a marker pkt, if appropriate
10171 10171 */
10172 10172 st_hba_unflush(un);
10173 10173
10174 10174 /*
10175 10175 * all queues are aligned, we are just waiting to
10176 10176 * transport
10177 10177 */
10178 10178 un->un_hib_tid = timeout(st_intr_restart, un, timeout_interval);
10179 10179
10180 10180 exit:
10181 10181 mutex_exit(ST_MUTEX);
10182 10182 return (rval);
10183 10183 }
10184 10184
10185 10185 /*
10186 10186 * To get one error entry from error stack
10187 10187 */
10188 10188 static int
10189 10189 st_get_error_entry(struct scsi_tape *un, intptr_t arg, int flag)
10190 10190 {
10191 10191 #ifdef _MULTI_DATAMODEL
10192 10192 /*
10193 10193 * For use when a 32 bit app makes a call into a
10194 10194 * 64 bit ioctl
10195 10195 */
10196 10196 struct mterror_entry32 err_entry32;
10197 10197 #endif /* _MULTI_DATAMODEL */
10198 10198
10199 10199 int rval = 0;
10200 10200 struct mterror_entry err_entry;
10201 10201 struct mterror_entry_stack *err_link_entry_p;
10202 10202 size_t arq_status_len_in, arq_status_len_kr;
10203 10203
10204 10204 ST_FUNC(ST_DEVINFO, st_get_error_entry);
10205 10205
10206 10206 ASSERT(mutex_owned(ST_MUTEX));
10207 10207
10208 10208 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
10209 10209 "st_get_error_entry()\n");
10210 10210
10211 10211 /*
10212 10212 * if error record stack empty, return ENXIO
10213 10213 */
10214 10214 if (un->un_error_entry_stk == NULL) {
10215 10215 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
10216 10216 "st_get_error_entry: Error Entry Stack Empty!\n");
10217 10217 rval = ENXIO;
10218 10218 goto ret;
10219 10219 }
10220 10220
10221 10221 /*
10222 10222 * get the top entry from stack
10223 10223 */
10224 10224 err_link_entry_p = un->un_error_entry_stk;
10225 10225 arq_status_len_kr =
10226 10226 err_link_entry_p->mtees_entry.mtee_arq_status_len;
10227 10227
10228 10228 #ifdef _MULTI_DATAMODEL
10229 10229 switch (ddi_model_convert_from(flag & FMODELS)) {
10230 10230 case DDI_MODEL_ILP32:
10231 10231 if (ddi_copyin((void *)arg, &err_entry32,
10232 10232 MTERROR_ENTRY_SIZE_32, flag)) {
10233 10233 rval = EFAULT;
10234 10234 goto ret;
10235 10235 }
10236 10236
10237 10237 arq_status_len_in =
10238 10238 (size_t)err_entry32.mtee_arq_status_len;
10239 10239
10240 10240 err_entry32.mtee_cdb_len =
10241 10241 (size32_t)err_link_entry_p->mtees_entry.mtee_cdb_len;
10242 10242
10243 10243 if (arq_status_len_in > arq_status_len_kr)
10244 10244 err_entry32.mtee_arq_status_len =
10245 10245 (size32_t)arq_status_len_kr;
10246 10246
10247 10247 if (ddi_copyout(
10248 10248 err_link_entry_p->mtees_entry.mtee_cdb_buf,
10249 10249 (void *)(uintptr_t)err_entry32.mtee_cdb_buf,
10250 10250 err_entry32.mtee_cdb_len, flag)) {
10251 10251 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
10252 10252 "st_get_error_entry: Copy cdb buffer error!");
10253 10253 rval = EFAULT;
10254 10254 }
10255 10255
10256 10256 if (ddi_copyout(
10257 10257 err_link_entry_p->mtees_entry.mtee_arq_status,
10258 10258 (void *)(uintptr_t)err_entry32.mtee_arq_status,
10259 10259 err_entry32.mtee_arq_status_len, flag)) {
10260 10260 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
10261 10261 "st_get_error_entry: copy arq status error!");
10262 10262 rval = EFAULT;
10263 10263 }
10264 10264
10265 10265 if (ddi_copyout(&err_entry32, (void *)arg,
10266 10266 MTERROR_ENTRY_SIZE_32, flag)) {
10267 10267 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
10268 10268 "st_get_error_entry: copy arq status out error!");
10269 10269 rval = EFAULT;
10270 10270 }
10271 10271 break;
10272 10272
10273 10273 case DDI_MODEL_NONE:
10274 10274 if (ddi_copyin((void *)arg, &err_entry,
10275 10275 MTERROR_ENTRY_SIZE_64, flag)) {
10276 10276 rval = EFAULT;
10277 10277 goto ret;
10278 10278 }
10279 10279 arq_status_len_in = err_entry.mtee_arq_status_len;
10280 10280
10281 10281 err_entry.mtee_cdb_len =
10282 10282 err_link_entry_p->mtees_entry.mtee_cdb_len;
10283 10283
10284 10284 if (arq_status_len_in > arq_status_len_kr)
10285 10285 err_entry.mtee_arq_status_len =
10286 10286 arq_status_len_kr;
10287 10287
10288 10288 if (ddi_copyout(
10289 10289 err_link_entry_p->mtees_entry.mtee_cdb_buf,
10290 10290 err_entry.mtee_cdb_buf,
10291 10291 err_entry.mtee_cdb_len, flag)) {
10292 10292 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
10293 10293 "st_get_error_entry: Copy cdb buffer error!");
10294 10294 rval = EFAULT;
10295 10295 }
10296 10296
10297 10297 if (ddi_copyout(
10298 10298 err_link_entry_p->mtees_entry.mtee_arq_status,
10299 10299 err_entry.mtee_arq_status,
10300 10300 err_entry.mtee_arq_status_len, flag)) {
10301 10301 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
10302 10302 "st_get_error_entry: copy arq status error!");
10303 10303 rval = EFAULT;
10304 10304 }
10305 10305
10306 10306 if (ddi_copyout(&err_entry, (void *)arg,
10307 10307 MTERROR_ENTRY_SIZE_64, flag)) {
10308 10308 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
10309 10309 "st_get_error_entry: copy arq status out error!");
10310 10310 rval = EFAULT;
10311 10311 }
10312 10312 break;
10313 10313 }
10314 10314 #else /* _MULTI_DATAMODEL */
10315 10315 if (ddi_copyin((void *)arg, &err_entry,
10316 10316 MTERROR_ENTRY_SIZE_64, flag)) {
10317 10317 rval = EFAULT;
10318 10318 goto ret;
10319 10319 }
10320 10320 arq_status_len_in = err_entry.mtee_arq_status_len;
10321 10321
10322 10322 err_entry.mtee_cdb_len =
10323 10323 err_link_entry_p->mtees_entry.mtee_cdb_len;
10324 10324
10325 10325 if (arq_status_len_in > arq_status_len_kr)
10326 10326 err_entry.mtee_arq_status_len =
10327 10327 arq_status_len_kr;
10328 10328
10329 10329 if (ddi_copyout(
10330 10330 err_link_entry_p->mtees_entry.mtee_cdb_buf,
10331 10331 err_entry.mtee_cdb_buf,
10332 10332 err_entry.mtee_cdb_len, flag)) {
10333 10333 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
10334 10334 "st_get_error_entry: Copy cdb buffer error!");
10335 10335 rval = EFAULT;
10336 10336 }
10337 10337
10338 10338 if (ddi_copyout(
10339 10339 err_link_entry_p->mtees_entry.mtee_arq_status,
10340 10340 err_entry.mtee_arq_status,
10341 10341 err_entry.mtee_arq_status_len, flag)) {
10342 10342 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
10343 10343 "st_get_error_entry: copy arq status buffer error!");
10344 10344 rval = EFAULT;
10345 10345 }
10346 10346
10347 10347 if (ddi_copyout(&err_entry, (void *)arg,
10348 10348 MTERROR_ENTRY_SIZE_64, flag)) {
10349 10349 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
10350 10350 "st_get_error_entry: copy arq status out error!");
10351 10351 rval = EFAULT;
10352 10352 }
10353 10353 #endif /* _MULTI_DATAMODEL */
10354 10354
10355 10355 /*
10356 10356 * update stack
10357 10357 */
10358 10358 un->un_error_entry_stk = err_link_entry_p->mtees_nextp;
10359 10359
10360 10360 kmem_free(err_link_entry_p->mtees_entry.mtee_cdb_buf,
10361 10361 err_link_entry_p->mtees_entry.mtee_cdb_len);
10362 10362 err_link_entry_p->mtees_entry.mtee_cdb_buf = NULL;
10363 10363
10364 10364 kmem_free(err_link_entry_p->mtees_entry.mtee_arq_status,
10365 10365 SECMDS_STATUS_SIZE);
10366 10366 err_link_entry_p->mtees_entry.mtee_arq_status = NULL;
10367 10367
10368 10368 kmem_free(err_link_entry_p, MTERROR_LINK_ENTRY_SIZE);
10369 10369 err_link_entry_p = NULL;
10370 10370 ret:
10371 10371 return (rval);
10372 10372 }
10373 10373
10374 10374 /*
10375 10375 * MTIOCGETERROR ioctl needs to retrieve the current sense data along with
10376 10376 * the scsi CDB command which causes the error and generates sense data and
10377 10377 * the scsi status.
10378 10378 *
10379 10379 * error-record stack
10380 10380 *
10381 10381 *
10382 10382 * TOP BOTTOM
10383 10383 * ------------------------------------------
10384 10384 * | 0 | 1 | 2 | ... | n |
10385 10385 * ------------------------------------------
10386 10386 * ^
10387 10387 * |
10388 10388 * pointer to error entry
10389 10389 *
10390 10390 * when st driver generates one sense data record, it creates a error-entry
10391 10391 * and pushes it onto the stack.
10392 10392 *
10393 10393 */
10394 10394
10395 10395 static void
10396 10396 st_update_error_stack(struct scsi_tape *un,
10397 10397 struct scsi_pkt *pkt,
10398 10398 struct scsi_arq_status *cmd)
10399 10399 {
10400 10400 struct mterror_entry_stack *err_entry_tmp;
10401 10401 uchar_t *cdbp = (uchar_t *)pkt->pkt_cdbp;
10402 10402 size_t cdblen = scsi_cdb_size[CDB_GROUPID(cdbp[0])];
10403 10403
10404 10404 ST_FUNC(ST_DEVINFO, st_update_error_stack);
10405 10405
10406 10406 ASSERT(mutex_owned(ST_MUTEX));
10407 10407
10408 10408 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
10409 10409 "st_update_error_stack()\n");
10410 10410
10411 10411 ASSERT(cmd);
10412 10412 ASSERT(cdbp);
10413 10413 if (cdblen == 0) {
10414 10414 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
10415 10415 "st_update_error_stack: CDB length error!\n");
10416 10416 return;
10417 10417 }
10418 10418
10419 10419 err_entry_tmp = kmem_alloc(MTERROR_LINK_ENTRY_SIZE, KM_SLEEP);
10420 10420 ASSERT(err_entry_tmp != NULL);
10421 10421
10422 10422 err_entry_tmp->mtees_entry.mtee_cdb_buf =
10423 10423 kmem_alloc(cdblen, KM_SLEEP);
10424 10424 ASSERT(err_entry_tmp->mtees_entry.mtee_cdb_buf != NULL);
10425 10425
10426 10426 err_entry_tmp->mtees_entry.mtee_arq_status =
10427 10427 kmem_alloc(SECMDS_STATUS_SIZE, KM_SLEEP);
10428 10428 ASSERT(err_entry_tmp->mtees_entry.mtee_arq_status != NULL);
10429 10429
10430 10430 /*
10431 10431 * copy cdb command & length to current error entry
10432 10432 */
10433 10433 err_entry_tmp->mtees_entry.mtee_cdb_len = cdblen;
10434 10434 bcopy(cdbp, err_entry_tmp->mtees_entry.mtee_cdb_buf, cdblen);
10435 10435
10436 10436 /*
10437 10437 * copy scsi status length to current error entry
10438 10438 */
10439 10439 err_entry_tmp->mtees_entry.mtee_arq_status_len =
10440 10440 SECMDS_STATUS_SIZE;
10441 10441
10442 10442 /*
10443 10443 * copy sense data and scsi status to current error entry
10444 10444 */
10445 10445 bcopy(cmd, err_entry_tmp->mtees_entry.mtee_arq_status,
10446 10446 SECMDS_STATUS_SIZE);
10447 10447
10448 10448 err_entry_tmp->mtees_nextp = un->un_error_entry_stk;
10449 10449 un->un_error_entry_stk = err_entry_tmp;
10450 10450
10451 10451 }
10452 10452
10453 10453 /*
10454 10454 * Empty all the error entry in stack
10455 10455 */
10456 10456 static void
10457 10457 st_empty_error_stack(struct scsi_tape *un)
10458 10458 {
10459 10459 struct mterror_entry_stack *linkp;
10460 10460
10461 10461 ST_FUNC(ST_DEVINFO, st_empty_error_stack);
10462 10462
10463 10463 ASSERT(mutex_owned(ST_MUTEX));
10464 10464
10465 10465 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
10466 10466 "st_empty_entry_stack()\n");
10467 10467
10468 10468 while (un->un_error_entry_stk != NULL) {
10469 10469 linkp = un->un_error_entry_stk;
10470 10470 un->un_error_entry_stk =
10471 10471 un->un_error_entry_stk->mtees_nextp;
10472 10472
10473 10473 if (linkp->mtees_entry.mtee_cdb_buf != NULL)
10474 10474 kmem_free(linkp->mtees_entry.mtee_cdb_buf,
10475 10475 linkp->mtees_entry.mtee_cdb_len);
10476 10476
10477 10477 if (linkp->mtees_entry.mtee_arq_status != NULL)
10478 10478 kmem_free(linkp->mtees_entry.mtee_arq_status,
10479 10479 linkp->mtees_entry.mtee_arq_status_len);
10480 10480
10481 10481 kmem_free(linkp, MTERROR_LINK_ENTRY_SIZE);
10482 10482 linkp = NULL;
10483 10483 }
10484 10484 }
10485 10485
10486 10486 static errstate
10487 10487 st_handle_sense(struct scsi_tape *un, struct buf *bp, tapepos_t *pos)
10488 10488 {
10489 10489 struct scsi_pkt *pkt = BP_PKT(bp);
10490 10490 struct scsi_pkt *rqpkt = un->un_rqs;
10491 10491 struct scsi_arq_status arqstat;
10492 10492 recov_info *rcif = pkt->pkt_private;
10493 10493
10494 10494 errstate rval = COMMAND_DONE_ERROR;
10495 10495 int amt;
10496 10496
10497 10497 ST_FUNC(ST_DEVINFO, st_handle_sense);
10498 10498
10499 10499 ASSERT(mutex_owned(ST_MUTEX));
10500 10500
10501 10501 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
10502 10502 "st_handle_sense()\n");
10503 10503
10504 10504 if (SCBP(rqpkt)->sts_busy) {
10505 10505 if (rcif->privatelen == sizeof (recov_info)) {
10506 10506 ST_RECOV(ST_DEVINFO, st_label, CE_WARN,
10507 10507 "Attempt recovery of busy unit on request sense\n");
10508 10508 rval = ATTEMPT_RETRY;
10509 10509 } else if (rcif->pkt_retry_cnt++ < st_retry_count) {
10510 10510 ST_DEBUG4(ST_DEVINFO, st_label, CE_WARN,
10511 10511 "Retry busy unit on request sense\n");
10512 10512 rval = QUE_BUSY_COMMAND;
10513 10513 }
10514 10514 return (rval);
10515 10515 } else if (SCBP(rqpkt)->sts_chk) {
10516 10516 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
10517 10517 "Check Condition on REQUEST SENSE\n");
10518 10518 return (rval);
10519 10519 }
10520 10520
10521 10521 /*
10522 10522 * Make sure there is sense data to look at.
10523 10523 */
10524 10524 if ((rqpkt->pkt_state & (STATE_GOT_BUS | STATE_GOT_TARGET |
10525 10525 STATE_SENT_CMD | STATE_GOT_STATUS)) != (STATE_GOT_BUS |
10526 10526 STATE_GOT_TARGET | STATE_SENT_CMD | STATE_GOT_STATUS)) {
10527 10527 return (rval);
10528 10528 }
10529 10529
10530 10530 /* was there enough data? */
10531 10531 amt = (int)MAX_SENSE_LENGTH - rqpkt->pkt_resid;
10532 10532 if ((rqpkt->pkt_state & STATE_XFERRED_DATA) == 0 ||
10533 10533 (amt < SUN_MIN_SENSE_LENGTH)) {
10534 10534 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
10535 10535 "REQUEST SENSE couldn't get sense data\n");
10536 10536 return (rval);
10537 10537 }
10538 10538
10539 10539 bcopy(SCBP(pkt), &arqstat.sts_status,
10540 10540 sizeof (struct scsi_status));
10541 10541 bcopy(SCBP(rqpkt), &arqstat.sts_rqpkt_status,
10542 10542 sizeof (struct scsi_status));
10543 10543 arqstat.sts_rqpkt_reason = rqpkt->pkt_reason;
10544 10544 arqstat.sts_rqpkt_resid = rqpkt->pkt_resid;
10545 10545 arqstat.sts_rqpkt_state = rqpkt->pkt_state;
10546 10546 arqstat.sts_rqpkt_statistics = rqpkt->pkt_statistics;
10547 10547 bcopy(ST_RQSENSE, &arqstat.sts_sensedata, SENSE_LENGTH);
10548 10548
10549 10549 /*
10550 10550 * copy one arqstat entry in the sense data buffer
10551 10551 */
10552 10552 st_update_error_stack(un, pkt, &arqstat);
10553 10553 return (st_decode_sense(un, bp, amt, &arqstat, pos));
10554 10554 }
10555 10555
10556 10556 static errstate
10557 10557 st_handle_autosense(struct scsi_tape *un, struct buf *bp, tapepos_t *pos)
10558 10558 {
10559 10559 struct scsi_pkt *pkt = BP_PKT(bp);
10560 10560 struct scsi_arq_status *arqstat =
10561 10561 (struct scsi_arq_status *)pkt->pkt_scbp;
10562 10562 errstate rval = COMMAND_DONE_ERROR;
10563 10563 int amt;
10564 10564
10565 10565 ST_FUNC(ST_DEVINFO, st_handle_autosense);
10566 10566
10567 10567 ASSERT(mutex_owned(ST_MUTEX));
10568 10568
10569 10569 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
10570 10570 "st_handle_autosense()\n");
10571 10571
10572 10572 if (arqstat->sts_rqpkt_status.sts_busy) {
10573 10573 ST_DEBUG4(ST_DEVINFO, st_label, CE_WARN,
10574 10574 "busy unit on request sense\n");
10575 10575 /*
10576 10576 * we return QUE_SENSE so st_intr will setup the SENSE cmd.
10577 10577 * the disadvantage is that we do not have any delay for the
10578 10578 * second retry of rqsense and we have to keep a packet around
10579 10579 */
10580 10580 return (QUE_SENSE);
10581 10581
10582 10582 } else if (arqstat->sts_rqpkt_reason != CMD_CMPLT) {
10583 10583 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
10584 10584 "transport error on REQUEST SENSE\n");
10585 10585 if ((arqstat->sts_rqpkt_state & STATE_GOT_TARGET) &&
10586 10586 ((arqstat->sts_rqpkt_statistics &
10587 10587 (STAT_BUS_RESET | STAT_DEV_RESET | STAT_ABORTED)) == 0)) {
10588 10588 if (st_reset(un, RESET_LUN) == 0) {
10589 10589 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
10590 10590 "recovery by resets failed\n");
10591 10591 }
10592 10592 }
10593 10593 return (rval);
10594 10594
10595 10595 } else if (arqstat->sts_rqpkt_status.sts_chk) {
10596 10596 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
10597 10597 "Check Condition on REQUEST SENSE\n");
10598 10598 return (rval);
10599 10599 }
10600 10600
10601 10601
10602 10602 /* was there enough data? */
10603 10603 if (pkt->pkt_state & STATE_XARQ_DONE) {
10604 10604 amt = (int)MAX_SENSE_LENGTH - arqstat->sts_rqpkt_resid;
10605 10605 } else {
10606 10606 if (arqstat->sts_rqpkt_resid > SENSE_LENGTH) {
10607 10607 amt = (int)MAX_SENSE_LENGTH - arqstat->sts_rqpkt_resid;
10608 10608 } else {
10609 10609 amt = (int)SENSE_LENGTH - arqstat->sts_rqpkt_resid;
10610 10610 }
10611 10611 }
10612 10612 if ((arqstat->sts_rqpkt_state & STATE_XFERRED_DATA) == 0 ||
10613 10613 (amt < SUN_MIN_SENSE_LENGTH)) {
10614 10614 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
10615 10615 "REQUEST SENSE couldn't get sense data\n");
10616 10616 return (rval);
10617 10617 }
10618 10618
10619 10619 if (pkt->pkt_state & STATE_XARQ_DONE) {
10620 10620 bcopy(&arqstat->sts_sensedata, ST_RQSENSE, MAX_SENSE_LENGTH);
10621 10621 } else {
10622 10622 bcopy(&arqstat->sts_sensedata, ST_RQSENSE, SENSE_LENGTH);
10623 10623 }
10624 10624
10625 10625 /*
10626 10626 * copy one arqstat entry in the sense data buffer
10627 10627 */
10628 10628 st_update_error_stack(un, pkt, arqstat);
10629 10629
10630 10630 return (st_decode_sense(un, bp, amt, arqstat, pos));
10631 10631 }
10632 10632
10633 10633 static errstate
10634 10634 st_decode_sense(struct scsi_tape *un, struct buf *bp, int amt,
10635 10635 struct scsi_arq_status *statusp, tapepos_t *pos)
10636 10636 {
10637 10637 struct scsi_pkt *pkt = BP_PKT(bp);
10638 10638 recov_info *ri = pkt->pkt_private;
10639 10639 errstate rval = COMMAND_DONE_ERROR;
10640 10640 cmd_attribute const *attrib;
10641 10641 long resid;
10642 10642 struct scsi_extended_sense *sensep = ST_RQSENSE;
10643 10643 int severity;
10644 10644 int get_error;
10645 10645
10646 10646 ST_FUNC(ST_DEVINFO, st_decode_sense);
10647 10647
10648 10648 ASSERT(mutex_owned(ST_MUTEX));
10649 10649 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
10650 10650 "st_decode_sense()\n");
10651 10651
10652 10652 /*
10653 10653 * For uscsi commands, squirrel away a copy of the
10654 10654 * results of the Request Sense.
10655 10655 */
10656 10656 if (USCSI_CMD(bp)) {
10657 10657 struct uscsi_cmd *ucmd = BP_UCMD(bp);
10658 10658 ucmd->uscsi_rqstatus = *(uchar_t *)statusp;
10659 10659 if (ucmd->uscsi_rqlen && un->un_srqbufp) {
10660 10660 uchar_t rqlen = min((uchar_t)amt, ucmd->uscsi_rqlen);
10661 10661 ucmd->uscsi_rqresid = ucmd->uscsi_rqlen - rqlen;
10662 10662 bcopy(ST_RQSENSE, un->un_srqbufp, rqlen);
10663 10663 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
10664 10664 "st_decode_sense: stat=0x%x resid=0x%x\n",
10665 10665 ucmd->uscsi_rqstatus, ucmd->uscsi_rqresid);
10666 10666 }
10667 10667 }
10668 10668
10669 10669 if (ri->privatelen == sizeof (recov_info)) {
10670 10670 attrib = ri->cmd_attrib;
10671 10671 } else {
10672 10672 attrib = st_lookup_cmd_attribute(pkt->pkt_cdbp[0]);
10673 10673 }
10674 10674
10675 10675 /*
10676 10676 * If the drive is an MT-02, reposition the
10677 10677 * secondary error code into the proper place.
10678 10678 *
10679 10679 * XXX MT-02 is non-CCS tape, so secondary error code
10680 10680 * is in byte 8. However, in SCSI-2, tape has CCS definition
10681 10681 * so it's in byte 12.
10682 10682 */
10683 10683 if (un->un_dp->type == ST_TYPE_EMULEX) {
10684 10684 sensep->es_code = sensep->es_add_info[0];
10685 10685 }
10686 10686
10687 10687 ST_CDB(ST_DEVINFO, "st_decode_sense failed CDB",
10688 10688 (caddr_t)&CDBP(pkt)->scc_cmd);
10689 10689
10690 10690 ST_SENSE(ST_DEVINFO, "st_decode_sense sense data", (caddr_t)statusp,
10691 10691 sizeof (*statusp));
10692 10692
10693 10693 /* for normal I/O check extract the resid values. */
10694 10694 if (bp != un->un_sbufp && bp != un->un_recov_buf) {
10695 10695 if (sensep->es_valid) {
10696 10696 resid =
10697 10697 (sensep->es_info_1 << 24) |
10698 10698 (sensep->es_info_2 << 16) |
10699 10699 (sensep->es_info_3 << 8) |
10700 10700 (sensep->es_info_4);
10701 10701 /* If fixed block */
10702 10702 if (un->un_bsize) {
10703 10703 resid *= un->un_bsize;
10704 10704 }
10705 10705 } else if (pkt->pkt_state & STATE_XFERRED_DATA) {
10706 10706 resid = pkt->pkt_resid;
10707 10707 } else {
10708 10708 resid = bp->b_bcount;
10709 10709 }
10710 10710 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
10711 10711 "st_decode_sense (rw): xferred bit = %d, resid=%ld (%d), "
10712 10712 "pkt_resid=%ld\n", pkt->pkt_state & STATE_XFERRED_DATA,
10713 10713 resid,
10714 10714 (sensep->es_info_1 << 24) |
10715 10715 (sensep->es_info_2 << 16) |
10716 10716 (sensep->es_info_3 << 8) |
10717 10717 (sensep->es_info_4),
10718 10718 pkt->pkt_resid);
10719 10719 /*
10720 10720 * The problem is, what should we believe?
10721 10721 */
10722 10722 if (resid && (pkt->pkt_resid == 0)) {
10723 10723 pkt->pkt_resid = resid;
10724 10724 }
10725 10725 } else {
10726 10726 /*
10727 10727 * If the command is SCMD_SPACE, we need to get the
10728 10728 * residual as returned in the sense data, to adjust
10729 10729 * our idea of current tape position correctly
10730 10730 */
10731 10731 if ((sensep->es_valid) &&
10732 10732 (CDBP(pkt)->scc_cmd == SCMD_LOCATE) ||
10733 10733 (CDBP(pkt)->scc_cmd == SCMD_LOCATE_G4) ||
10734 10734 (CDBP(pkt)->scc_cmd == SCMD_SPACE) ||
10735 10735 (CDBP(pkt)->scc_cmd == SCMD_SPACE_G4) ||
10736 10736 (CDBP(pkt)->scc_cmd == SCMD_WRITE_FILE_MARK)) {
10737 10737 resid =
10738 10738 (sensep->es_info_1 << 24) |
10739 10739 (sensep->es_info_2 << 16) |
10740 10740 (sensep->es_info_3 << 8) |
10741 10741 (sensep->es_info_4);
10742 10742 bp->b_resid = resid;
10743 10743 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
10744 10744 "st_decode_sense(other): resid=%ld\n", resid);
10745 10745 } else {
10746 10746 /*
10747 10747 * If the special command is SCMD_READ,
10748 10748 * the correct resid will be set later.
10749 10749 */
10750 10750 if (attrib->get_cnt != NULL) {
10751 10751 resid = attrib->get_cnt(pkt->pkt_cdbp);
10752 10752 } else {
10753 10753 resid = bp->b_bcount;
10754 10754 }
10755 10755 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
10756 10756 "st_decode_sense(special read): resid=%ld\n",
10757 10757 resid);
10758 10758 }
10759 10759 }
10760 10760
10761 10761 if ((un->un_state >= ST_STATE_OPEN) &&
10762 10762 (DEBUGGING || st_error_level == SCSI_ERR_ALL)) {
10763 10763 st_print_cdb(ST_DEVINFO, st_label, CE_NOTE,
10764 10764 "Failed CDB", (char *)pkt->pkt_cdbp);
10765 10765 st_clean_print(ST_DEVINFO, st_label, CE_CONT,
10766 10766 "sense data", (char *)sensep, amt);
10767 10767 scsi_log(ST_DEVINFO, st_label, CE_CONT,
10768 10768 "count 0x%lx resid 0x%lx pktresid 0x%lx\n",
10769 10769 bp->b_bcount, resid, pkt->pkt_resid);
10770 10770 }
10771 10771
10772 10772 switch (un->un_status = sensep->es_key) {
10773 10773 case KEY_NO_SENSE:
10774 10774 severity = SCSI_ERR_INFO;
10775 10775
10776 10776 /*
10777 10777 * Erase, locate or rewind operation in progress, retry
10778 10778 * ASC ASCQ
10779 10779 * 00 18 Erase operation in progress
10780 10780 * 00 19 Locate operation in progress
10781 10781 * 00 1A Rewind operation in progress
10782 10782 */
10783 10783 if (sensep->es_add_code == 0 &&
10784 10784 ((sensep->es_qual_code == 0x18) ||
10785 10785 (sensep->es_qual_code == 0x19) ||
10786 10786 (sensep->es_qual_code == 0x1a))) {
10787 10787 rval = QUE_BUSY_COMMAND;
10788 10788 break;
10789 10789 }
10790 10790
10791 10791 goto common;
10792 10792
10793 10793 case KEY_RECOVERABLE_ERROR:
10794 10794 severity = SCSI_ERR_RECOVERED;
10795 10795 if ((sensep->es_class == CLASS_EXTENDED_SENSE) &&
10796 10796 (sensep->es_code == ST_DEFERRED_ERROR)) {
10797 10797 if (un->un_dp->options &
10798 10798 ST_RETRY_ON_RECOVERED_DEFERRED_ERROR) {
10799 10799 rval = QUE_LAST_COMMAND;
10800 10800 scsi_errmsg(ST_SCSI_DEVP, pkt, st_label,
10801 10801 severity, pos->lgclblkno,
10802 10802 un->un_err_pos.lgclblkno, scsi_cmds,
10803 10803 sensep);
10804 10804 scsi_log(ST_DEVINFO, st_label, CE_CONT,
10805 10805 "Command will be retried\n");
10806 10806 } else {
10807 10807 severity = SCSI_ERR_FATAL;
10808 10808 rval = COMMAND_DONE_ERROR_RECOVERED;
10809 10809 ST_DO_ERRSTATS(un, st_softerrs);
10810 10810 scsi_errmsg(ST_SCSI_DEVP, pkt, st_label,
10811 10811 severity, pos->lgclblkno,
10812 10812 un->un_err_pos.lgclblkno, scsi_cmds,
10813 10813 sensep);
10814 10814 }
10815 10815 break;
10816 10816 }
10817 10817 common:
10818 10818 /*
10819 10819 * XXX only want reads to be stopped by filemarks.
10820 10820 * Don't want them to be stopped by EOT. EOT matters
10821 10821 * only on write.
10822 10822 */
10823 10823 if (sensep->es_filmk && !sensep->es_eom) {
10824 10824 rval = COMMAND_DONE;
10825 10825 } else if (sensep->es_eom) {
10826 10826 rval = COMMAND_DONE;
10827 10827 } else if (sensep->es_ili) {
10828 10828 /*
10829 10829 * Fun with variable length record devices:
10830 10830 * for specifying larger blocks sizes than the
10831 10831 * actual physical record size.
10832 10832 */
10833 10833 if (un->un_bsize == 0 && resid > 0) {
10834 10834 /*
10835 10835 * XXX! Ugly.
10836 10836 * The requested blocksize is > tape blocksize,
10837 10837 * so this is ok, so we just return the
10838 10838 * actual size xferred.
10839 10839 */
10840 10840 pkt->pkt_resid = resid;
10841 10841 rval = COMMAND_DONE;
10842 10842 } else if (un->un_bsize == 0 && resid < 0) {
10843 10843 /*
10844 10844 * The requested blocksize is < tape blocksize,
10845 10845 * so this is not ok, so we err with ENOMEM
10846 10846 */
10847 10847 rval = COMMAND_DONE_ERROR_RECOVERED;
10848 10848 st_bioerror(bp, ENOMEM);
10849 10849 } else {
10850 10850 ST_DO_ERRSTATS(un, st_softerrs);
10851 10851 severity = SCSI_ERR_FATAL;
10852 10852 rval = COMMAND_DONE_ERROR;
10853 10853 st_bioerror(bp, EINVAL);
10854 10854 un->un_running.pmode = invalid;
10855 10855 }
10856 10856 } else {
10857 10857 /*
10858 10858 * we hope and pray for this just being
10859 10859 * something we can ignore (ie. a
10860 10860 * truly recoverable soft error)
10861 10861 */
10862 10862 rval = COMMAND_DONE;
10863 10863 }
10864 10864 if (sensep->es_filmk) {
10865 10865 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
10866 10866 "filemark\n");
10867 10867 un->un_status = SUN_KEY_EOF;
10868 10868 pos->eof = ST_EOF_PENDING;
10869 10869 st_set_pe_flag(un);
10870 10870 }
10871 10871
10872 10872 /*
10873 10873 * ignore eom when reading, a fmk should terminate reading
10874 10874 */
10875 10875 if ((sensep->es_eom) &&
10876 10876 (CDBP(pkt)->scc_cmd != SCMD_READ)) {
10877 10877 if ((sensep->es_add_code == 0) &&
10878 10878 (sensep->es_qual_code == 4)) {
10879 10879 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
10880 10880 "bot\n");
10881 10881 un->un_status = SUN_KEY_BOT;
10882 10882 pos->eof = ST_NO_EOF;
10883 10883 pos->lgclblkno = 0;
10884 10884 pos->fileno = 0;
10885 10885 pos->blkno = 0;
10886 10886 if (pos->pmode != legacy)
10887 10887 pos->pmode = legacy;
10888 10888 } else {
10889 10889 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
10890 10890 "eom\n");
10891 10891 un->un_status = SUN_KEY_EOT;
10892 10892 pos->eof = ST_EOM;
10893 10893 }
10894 10894 st_set_pe_flag(un);
10895 10895 }
10896 10896
10897 10897 break;
10898 10898
10899 10899 case KEY_ILLEGAL_REQUEST:
10900 10900
10901 10901 if (un->un_laststate >= ST_STATE_OPEN) {
10902 10902 ST_DO_ERRSTATS(un, st_softerrs);
10903 10903 severity = SCSI_ERR_FATAL;
10904 10904 } else {
10905 10905 severity = SCSI_ERR_INFO;
10906 10906 }
10907 10907 break;
10908 10908
10909 10909 case KEY_MEDIUM_ERROR:
10910 10910 ST_DO_ERRSTATS(un, st_harderrs);
10911 10911 severity = SCSI_ERR_FATAL;
10912 10912 un->un_pos.pmode = invalid;
10913 10913 un->un_running.pmode = invalid;
10914 10914 check_keys:
10915 10915 /*
10916 10916 * attempt to process the keys in the presence of
10917 10917 * other errors
10918 10918 */
10919 10919 if (sensep->es_ili && rval != COMMAND_DONE_ERROR) {
10920 10920 /*
10921 10921 * Fun with variable length record devices:
10922 10922 * for specifying larger blocks sizes than the
10923 10923 * actual physical record size.
10924 10924 */
10925 10925 if (un->un_bsize == 0 && resid > 0) {
10926 10926 /*
10927 10927 * XXX! Ugly
10928 10928 */
10929 10929 pkt->pkt_resid = resid;
10930 10930 } else if (un->un_bsize == 0 && resid < 0) {
10931 10931 st_bioerror(bp, EINVAL);
10932 10932 } else {
10933 10933 severity = SCSI_ERR_FATAL;
10934 10934 rval = COMMAND_DONE_ERROR;
10935 10935 st_bioerror(bp, EINVAL);
10936 10936 }
10937 10937 }
10938 10938 if (sensep->es_filmk) {
10939 10939 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
10940 10940 "filemark\n");
10941 10941 un->un_status = SUN_KEY_EOF;
10942 10942 pos->eof = ST_EOF_PENDING;
10943 10943 st_set_pe_flag(un);
10944 10944 }
10945 10945
10946 10946 /*
10947 10947 * ignore eom when reading, a fmk should terminate reading
10948 10948 */
10949 10949 if ((sensep->es_eom) &&
10950 10950 (CDBP(pkt)->scc_cmd != SCMD_READ)) {
10951 10951 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG, "eom\n");
10952 10952 un->un_status = SUN_KEY_EOT;
10953 10953 pos->eof = ST_EOM;
10954 10954 st_set_pe_flag(un);
10955 10955 }
10956 10956
10957 10957 break;
10958 10958
10959 10959 case KEY_VOLUME_OVERFLOW:
10960 10960 ST_DO_ERRSTATS(un, st_softerrs);
10961 10961 pos->eof = ST_EOM;
10962 10962 severity = SCSI_ERR_FATAL;
10963 10963 rval = COMMAND_DONE_ERROR;
10964 10964 goto check_keys;
10965 10965
10966 10966 case KEY_HARDWARE_ERROR:
10967 10967 ST_DO_ERRSTATS(un, st_harderrs);
10968 10968 severity = SCSI_ERR_FATAL;
10969 10969 rval = COMMAND_DONE_ERROR;
10970 10970 if (un->un_dp->options & ST_EJECT_ON_CHANGER_FAILURE)
10971 10971 un->un_eject_tape_on_failure = st_check_asc_ascq(un);
10972 10972 break;
10973 10973
10974 10974 case KEY_BLANK_CHECK:
10975 10975 ST_DO_ERRSTATS(un, st_softerrs);
10976 10976 severity = SCSI_ERR_INFO;
10977 10977
10978 10978 /*
10979 10979 * if not a special request and some data was xferred then it
10980 10980 * it is not an error yet
10981 10981 */
10982 10982 if (bp != un->un_sbufp && (bp->b_flags & B_READ)) {
10983 10983 /*
10984 10984 * no error for read with or without data xferred
10985 10985 */
10986 10986 un->un_status = SUN_KEY_EOT;
10987 10987 pos->eof = ST_EOT;
10988 10988 rval = COMMAND_DONE_ERROR;
10989 10989 un->un_running.pmode = invalid;
10990 10990 st_set_pe_flag(un);
10991 10991 goto check_keys;
10992 10992 } else if (bp != un->un_sbufp &&
10993 10993 (pkt->pkt_state & STATE_XFERRED_DATA)) {
10994 10994 rval = COMMAND_DONE;
10995 10995 } else {
10996 10996 rval = COMMAND_DONE_ERROR_RECOVERED;
10997 10997 }
10998 10998
10999 10999 if (un->un_laststate >= ST_STATE_OPEN) {
11000 11000 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
11001 11001 "blank check\n");
11002 11002 pos->eof = ST_EOM;
11003 11003 }
11004 11004 if ((CDBP(pkt)->scc_cmd == SCMD_LOCATE) ||
11005 11005 (CDBP(pkt)->scc_cmd == SCMD_LOCATE_G4) ||
11006 11006 (CDBP(pkt)->scc_cmd == SCMD_SPACE) &&
11007 11007 (un->un_dp->options & ST_KNOWS_EOD)) {
11008 11008 /*
11009 11009 * we were doing a fast forward by skipping
11010 11010 * multiple fmk at the time
11011 11011 */
11012 11012 st_bioerror(bp, EIO);
11013 11013 severity = SCSI_ERR_RECOVERED;
11014 11014 rval = COMMAND_DONE;
11015 11015 }
11016 11016 st_set_pe_flag(un);
11017 11017 goto check_keys;
11018 11018
11019 11019 case KEY_WRITE_PROTECT:
11020 11020 if (st_wrongtapetype(un)) {
11021 11021 un->un_status = SUN_KEY_WRONGMEDIA;
11022 11022 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
11023 11023 "wrong tape for writing- use DC6150 tape "
11024 11024 "(or equivalent)\n");
11025 11025 severity = SCSI_ERR_UNKNOWN;
11026 11026 } else {
11027 11027 severity = SCSI_ERR_FATAL;
11028 11028 }
11029 11029 ST_DO_ERRSTATS(un, st_harderrs);
11030 11030 rval = COMMAND_DONE_ERROR;
11031 11031 st_bioerror(bp, EACCES);
11032 11032 break;
11033 11033
11034 11034 case KEY_UNIT_ATTENTION:
11035 11035 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
11036 11036 "KEY_UNIT_ATTENTION : un_state = %d\n", un->un_state);
11037 11037
11038 11038 un->un_unit_attention_flags |= 1;
11039 11039 /*
11040 11040 * If we have detected a Bus Reset and the tape
11041 11041 * drive has been reserved.
11042 11042 */
11043 11043 if (ST_RQSENSE->es_add_code == 0x29) {
11044 11044 rval = DEVICE_RESET;
11045 11045 if ((un->un_rsvd_status &
11046 11046 (ST_RESERVE | ST_APPLICATION_RESERVATIONS)) ==
11047 11047 ST_RESERVE) {
11048 11048 un->un_rsvd_status |= ST_LOST_RESERVE;
11049 11049 ST_DEBUG(ST_DEVINFO, st_label, CE_WARN,
11050 11050 "st_decode_sense: Lost Reservation\n");
11051 11051 }
11052 11052 }
11053 11053
11054 11054 /*
11055 11055 * If this is a recovery command and retrable, retry.
11056 11056 */
11057 11057 if (bp == un->un_recov_buf) {
11058 11058 severity = SCSI_ERR_INFO;
11059 11059 if (attrib->retriable &&
11060 11060 ri->pkt_retry_cnt++ < st_retry_count) {
11061 11061 rval = QUE_COMMAND;
11062 11062 } else {
11063 11063 rval = COMMAND_DONE_ERROR;
11064 11064 }
11065 11065 break; /* Don't set position invalid */
11066 11066 }
11067 11067
11068 11068 /*
11069 11069 * If ST_APPLICATION_RESERVATIONS is set,
11070 11070 * If the asc/ascq indicates that the reservation
11071 11071 * has been cleared just allow the write to continue
11072 11072 * which would force a scsi 2 reserve.
11073 11073 * If preempted that persistent reservation
11074 11074 * the scsi 2 reserve would get a reservation conflict.
11075 11075 */
11076 11076 if ((un->un_rsvd_status &
11077 11077 ST_APPLICATION_RESERVATIONS) != 0) {
11078 11078 /*
11079 11079 * RESERVATIONS PREEMPTED
11080 11080 * With MPxIO this could be a fail over? XXX
11081 11081 */
11082 11082 if (ST_RQSENSE->es_add_code == 0x2a &&
11083 11083 ST_RQSENSE->es_qual_code == 0x03) {
11084 11084 severity = SCSI_ERR_INFO;
11085 11085 rval = COMMAND_DONE_ERROR;
11086 11086 pos->pmode = invalid;
11087 11087 break;
11088 11088 /*
11089 11089 * RESERVATIONS RELEASED
11090 11090 */
11091 11091 } else if (ST_RQSENSE->es_add_code == 0x2a &&
11092 11092 ST_RQSENSE->es_qual_code == 0x04) {
11093 11093 severity = SCSI_ERR_INFO;
11094 11094 rval = COMMAND_DONE;
11095 11095 break;
11096 11096 }
11097 11097 }
11098 11098
11099 11099 if (un->un_state <= ST_STATE_OPENING) {
11100 11100 /*
11101 11101 * Look, the tape isn't open yet, now determine
11102 11102 * if the cause is a BUS RESET, Save the file
11103 11103 * and Block positions for the callers to
11104 11104 * recover from the loss of position.
11105 11105 */
11106 11106 severity = SCSI_ERR_INFO;
11107 11107 if ((pos->pmode != invalid) &&
11108 11108 (rval == DEVICE_RESET) &&
11109 11109 (un->un_restore_pos != 1)) {
11110 11110 un->un_save_fileno = pos->fileno;
11111 11111 un->un_save_blkno = pos->blkno;
11112 11112 un->un_restore_pos = 1;
11113 11113 }
11114 11114
11115 11115 if (attrib->retriable &&
11116 11116 ri->pkt_retry_cnt++ < st_retry_count) {
11117 11117 rval = QUE_COMMAND;
11118 11118 } else if (rval == DEVICE_RESET) {
11119 11119 break;
11120 11120 } else {
11121 11121 rval = COMMAND_DONE_ERROR;
11122 11122 }
11123 11123 /*
11124 11124 * Means it thinks the mode parameters have changed.
11125 11125 * This is the result of a reset clearing settings or
11126 11126 * another initiator changing what we set.
11127 11127 */
11128 11128 }
11129 11129 if (ST_RQSENSE->es_add_code == 0x2a) {
11130 11130 if (ST_RQSENSE->es_qual_code == 0x1) {
11131 11131 /* Error recovery will modeselect and retry. */
11132 11132 rval = DEVICE_TAMPER;
11133 11133 severity = SCSI_ERR_INFO;
11134 11134 break; /* don't set position invalid */
11135 11135 }
11136 11136 if (ST_RQSENSE->es_qual_code == 0x0 ||
11137 11137 ST_RQSENSE->es_qual_code == 0x2 ||
11138 11138 ST_RQSENSE->es_qual_code == 0x3 ||
11139 11139 ST_RQSENSE->es_qual_code == 0x4 ||
11140 11140 ST_RQSENSE->es_qual_code == 0x5 ||
11141 11141 ST_RQSENSE->es_qual_code == 0x6 ||
11142 11142 ST_RQSENSE->es_qual_code == 0x7) {
11143 11143 rval = DEVICE_TAMPER;
11144 11144 severity = SCSI_ERR_INFO;
11145 11145 }
11146 11146 } else if (ST_RQSENSE->es_add_code == 0x28 &&
11147 11147 ((ST_RQSENSE->es_qual_code == 0x0) ||
11148 11148 ST_RQSENSE->es_qual_code == 0x5)) {
11149 11149 /*
11150 11150 * Not Ready to Ready change, Media may have changed.
11151 11151 */
11152 11152 rval = DEVICE_TAMPER;
11153 11153 severity = SCSI_ERR_RETRYABLE;
11154 11154 } else {
11155 11155 if (rval != DEVICE_RESET) {
11156 11156 rval = COMMAND_DONE_ERROR;
11157 11157 } else {
11158 11158 /*
11159 11159 * Returning DEVICE_RESET will call
11160 11160 * error recovery.
11161 11161 */
11162 11162 severity = SCSI_ERR_INFO;
11163 11163 break; /* don't set position invalid */
11164 11164 }
11165 11165 /*
11166 11166 * Check if it is an Unexpected Unit Attention.
11167 11167 * If state is >= ST_STATE_OPEN, we have
11168 11168 * already done the initialization .
11169 11169 * In this case it is Fatal Error
11170 11170 * since no further reading/writing
11171 11171 * can be done with fileno set to < 0.
11172 11172 */
11173 11173 if (un->un_state >= ST_STATE_OPEN) {
11174 11174 ST_DO_ERRSTATS(un, st_harderrs);
11175 11175 severity = SCSI_ERR_FATAL;
11176 11176 } else {
11177 11177 severity = SCSI_ERR_INFO;
11178 11178 }
11179 11179 }
11180 11180
11181 11181 pos->pmode = invalid;
11182 11182
11183 11183 break;
11184 11184
11185 11185 case KEY_NOT_READY:
11186 11186 /*
11187 11187 * If in process of getting ready retry.
11188 11188 */
11189 11189 if (sensep->es_add_code == 0x04) {
11190 11190 switch (sensep->es_qual_code) {
11191 11191 case 0x07:
11192 11192 /*
11193 11193 * We get here when the tape is rewinding.
11194 11194 * QUE_BUSY_COMMAND retries every 10 seconds.
11195 11195 */
11196 11196 if (ri->pkt_retry_cnt++ <
11197 11197 (un->un_dp->rewind_timeout / 10)) {
11198 11198 rval = QUE_BUSY_COMMAND;
11199 11199 severity = SCSI_ERR_INFO;
11200 11200 } else {
11201 11201 /* give up */
11202 11202 rval = COMMAND_DONE_ERROR;
11203 11203 severity = SCSI_ERR_FATAL;
11204 11204 }
11205 11205 break;
11206 11206 case 0x01:
11207 11207 if (ri->pkt_retry_cnt++ < st_retry_count) {
11208 11208 rval = QUE_COMMAND;
11209 11209 severity = SCSI_ERR_INFO;
11210 11210 break;
11211 11211 }
11212 11212 default: /* FALLTHRU */
11213 11213 /* give up */
11214 11214 rval = COMMAND_DONE_ERROR;
11215 11215 severity = SCSI_ERR_FATAL;
11216 11216 }
11217 11217 } else {
11218 11218 /* give up */
11219 11219 rval = COMMAND_DONE_ERROR;
11220 11220 severity = SCSI_ERR_FATAL;
11221 11221 }
11222 11222
11223 11223 /*
11224 11224 * If this was an error and after device opened
11225 11225 * do error stats.
11226 11226 */
11227 11227 if (rval == COMMAND_DONE_ERROR &&
11228 11228 un->un_state > ST_STATE_OPENING) {
11229 11229 ST_DO_ERRSTATS(un, st_harderrs);
11230 11230 }
11231 11231
11232 11232 if (ST_RQSENSE->es_add_code == 0x3a) {
11233 11233 if (st_error_level >= SCSI_ERR_FATAL)
11234 11234 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
11235 11235 "Tape not inserted in drive\n");
11236 11236 un->un_mediastate = MTIO_EJECTED;
11237 11237 cv_broadcast(&un->un_state_cv);
11238 11238 }
11239 11239 if ((un->un_dp->options & ST_EJECT_ON_CHANGER_FAILURE) &&
11240 11240 (rval != QUE_COMMAND))
11241 11241 un->un_eject_tape_on_failure = st_check_asc_ascq(un);
11242 11242 break;
11243 11243
11244 11244 case KEY_ABORTED_COMMAND:
11245 11245 /* XXX Do drives return this when they see a lost light? */
11246 11246 /* Testing would say yes */
11247 11247
11248 11248 if (ri->pkt_retry_cnt++ < st_retry_count) {
11249 11249 rval = ATTEMPT_RETRY;
11250 11250 severity = SCSI_ERR_RETRYABLE;
11251 11251 goto check_keys;
11252 11252 }
11253 11253 /*
11254 11254 * Probably a parity error...
11255 11255 * if we retry here then this may cause data to be
11256 11256 * written twice or data skipped during reading
11257 11257 */
11258 11258 ST_DO_ERRSTATS(un, st_harderrs);
11259 11259 severity = SCSI_ERR_FATAL;
11260 11260 rval = COMMAND_DONE_ERROR;
11261 11261 goto check_keys;
11262 11262
11263 11263 default:
11264 11264 /*
11265 11265 * Undecoded sense key. Try retries and hope
11266 11266 * that will fix the problem. Otherwise, we're
11267 11267 * dead.
11268 11268 */
11269 11269 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
11270 11270 "Unhandled Sense Key '%s'\n",
11271 11271 sense_keys[un->un_status]);
11272 11272 ST_DO_ERRSTATS(un, st_harderrs);
11273 11273 severity = SCSI_ERR_FATAL;
11274 11274 rval = COMMAND_DONE_ERROR;
11275 11275 goto check_keys;
11276 11276 }
11277 11277
11278 11278 if ((!(pkt->pkt_flags & FLAG_SILENT) &&
11279 11279 un->un_state >= ST_STATE_OPEN) && (DEBUGGING ||
11280 11280 (un->un_laststate > ST_STATE_OPENING) &&
11281 11281 (severity >= st_error_level))) {
11282 11282
11283 11283 scsi_errmsg(ST_SCSI_DEVP, pkt, st_label, severity,
11284 11284 pos->lgclblkno, un->un_err_pos.lgclblkno,
11285 11285 scsi_cmds, sensep);
11286 11286 if (sensep->es_filmk) {
11287 11287 scsi_log(ST_DEVINFO, st_label, CE_CONT,
11288 11288 "File Mark Detected\n");
11289 11289 }
11290 11290 if (sensep->es_eom) {
11291 11291 scsi_log(ST_DEVINFO, st_label, CE_CONT,
11292 11292 "End-of-Media Detected\n");
11293 11293 }
11294 11294 if (sensep->es_ili) {
11295 11295 scsi_log(ST_DEVINFO, st_label, CE_CONT,
11296 11296 "Incorrect Length Indicator Set\n");
11297 11297 }
11298 11298 }
11299 11299 get_error = geterror(bp);
11300 11300 if (((rval == COMMAND_DONE_ERROR) ||
11301 11301 (rval == COMMAND_DONE_ERROR_RECOVERED)) &&
11302 11302 ((get_error == EIO) || (get_error == 0))) {
11303 11303 un->un_rqs_state |= (ST_RQS_ERROR | ST_RQS_VALID);
11304 11304 bcopy(ST_RQSENSE, un->un_uscsi_rqs_buf, SENSE_LENGTH);
11305 11305 if (un->un_rqs_state & ST_RQS_READ) {
11306 11306 un->un_rqs_state &= ~(ST_RQS_READ);
11307 11307 } else {
11308 11308 un->un_rqs_state |= ST_RQS_OVR;
11309 11309 }
11310 11310 }
11311 11311
11312 11312 return (rval);
11313 11313 }
11314 11314
11315 11315
11316 11316 static int
11317 11317 st_handle_intr_retry_lcmd(struct scsi_tape *un, struct buf *bp)
11318 11318 {
11319 11319 int status = TRAN_ACCEPT;
11320 11320 pkt_info *pktinfo = BP_PKT(bp)->pkt_private;
11321 11321
11322 11322 mutex_enter(ST_MUTEX);
11323 11323
11324 11324 ST_FUNC(ST_DEVINFO, st_handle_intr_retry_lcmd);
11325 11325
11326 11326 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
11327 11327 "st_handle_intr_rtr_lcmd(), un = 0x%p\n", (void *)un);
11328 11328
11329 11329 /*
11330 11330 * Check to see if we hit the retry timeout. We check to make sure
11331 11331 * this is the first one on the runq and make sure we have not
11332 11332 * queued up any more, so this one has to be the last on the list
11333 11333 * also. If it is not, we have to fail. If it is not the first, but
11334 11334 * is the last we are in trouble anyway, as we are in the interrupt
11335 11335 * context here.
11336 11336 */
11337 11337 if ((pktinfo->pkt_retry_cnt > st_retry_count) ||
11338 11338 ((un->un_runqf != bp) && (un->un_runql != bp))) {
11339 11339 goto exit;
11340 11340 }
11341 11341
11342 11342 if (un->un_throttle) {
11343 11343 un->un_last_throttle = un->un_throttle;
11344 11344 un->un_throttle = 0;
11345 11345 }
11346 11346
11347 11347 /*
11348 11348 * Here we know : bp is the first and last one on the runq
11349 11349 * it is not necessary to put it back on the head of the
11350 11350 * waitq and then move from waitq to runq. Save this queuing
11351 11351 * and call scsi_transport.
11352 11352 */
11353 11353 ST_CDB(ST_DEVINFO, "Retry lcmd CDB", (char *)BP_PKT(bp)->pkt_cdbp);
11354 11354
11355 11355 status = st_transport(un, BP_PKT(bp));
11356 11356
11357 11357 if (status == TRAN_ACCEPT) {
11358 11358 if (un->un_last_throttle) {
11359 11359 un->un_throttle = un->un_last_throttle;
11360 11360 }
11361 11361 mutex_exit(ST_MUTEX);
11362 11362
11363 11363 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
11364 11364 "restart transport \n");
11365 11365 return (0);
11366 11366 }
11367 11367
11368 11368 ST_DO_KSTATS(bp, kstat_runq_back_to_waitq);
11369 11369 mutex_exit(ST_MUTEX);
11370 11370
11371 11371 if (status == TRAN_BUSY) {
11372 11372 if (st_handle_intr_busy(un, bp, ST_TRAN_BUSY_TIMEOUT) == 0) {
11373 11373 return (0);
11374 11374 }
11375 11375 }
11376 11376 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
11377 11377 "restart transport rejected\n");
11378 11378 mutex_enter(ST_MUTEX);
11379 11379 ST_DO_ERRSTATS(un, st_transerrs);
11380 11380 if (un->un_last_throttle) {
11381 11381 un->un_throttle = un->un_last_throttle;
11382 11382 }
11383 11383 exit:
11384 11384 mutex_exit(ST_MUTEX);
11385 11385 return (-1);
11386 11386 }
11387 11387
11388 11388 static int
11389 11389 st_wrongtapetype(struct scsi_tape *un)
11390 11390 {
11391 11391
11392 11392 ST_FUNC(ST_DEVINFO, st_wrongtapetype);
11393 11393
11394 11394 ASSERT(mutex_owned(ST_MUTEX));
11395 11395
11396 11396 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG, "st_wrongtapetype()\n");
11397 11397
11398 11398 /*
11399 11399 * Hack to handle 600A, 600XTD, 6150 && 660 vs. 300XL tapes...
11400 11400 */
11401 11401 if (un->un_dp && (un->un_dp->options & ST_QIC) && un->un_mspl) {
11402 11402 switch (un->un_dp->type) {
11403 11403 case ST_TYPE_WANGTEK:
11404 11404 case ST_TYPE_ARCHIVE:
11405 11405 /*
11406 11406 * If this really worked, we could go off of
11407 11407 * the density codes set in the modesense
11408 11408 * page. For this drive, 0x10 == QIC-120,
11409 11409 * 0xf == QIC-150, and 0x5 should be for
11410 11410 * both QIC-24 and, maybe, QIC-11. However,
11411 11411 * the h/w doesn't do what the manual says
11412 11412 * that it should, so we'll key off of
11413 11413 * getting a WRITE PROTECT error AND wp *not*
11414 11414 * set in the mode sense information.
11415 11415 */
11416 11416 /*
11417 11417 * XXX but we already know that status is
11418 11418 * write protect, so don't check it again.
11419 11419 */
11420 11420
11421 11421 if (un->un_status == KEY_WRITE_PROTECT &&
11422 11422 un->un_mspl->wp == 0) {
11423 11423 return (1);
11424 11424 }
11425 11425 break;
11426 11426 default:
11427 11427 break;
11428 11428 }
11429 11429 }
11430 11430 return (0);
11431 11431 }
11432 11432
11433 11433 static errstate
11434 11434 st_check_error(struct scsi_tape *un, struct scsi_pkt *pkt)
11435 11435 {
11436 11436 errstate action;
11437 11437 recov_info *rcvi = pkt->pkt_private;
11438 11438 buf_t *bp = rcvi->cmd_bp;
11439 11439 struct scsi_arq_status *stat = (struct scsi_arq_status *)pkt->pkt_scbp;
11440 11440
11441 11441 ST_FUNC(ST_DEVINFO, st_check_error);
11442 11442
11443 11443 ASSERT(mutex_owned(ST_MUTEX));
11444 11444
11445 11445 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG, "st_check_error()\n");
11446 11446
11447 11447 switch (SCBP_C(pkt)) {
11448 11448 case STATUS_RESERVATION_CONFLICT:
11449 11449 /*
11450 11450 * Command recovery is enabled, not just opening,
11451 11451 * we had the drive reserved and we thing its ours.
11452 11452 * Call recovery to attempt to take it back.
11453 11453 */
11454 11454 if ((rcvi->privatelen == sizeof (recov_info)) &&
11455 11455 (bp != un->un_recov_buf) &&
11456 11456 (un->un_state > ST_STATE_OPEN_PENDING_IO) &&
11457 11457 ((un->un_rsvd_status & (ST_RESERVE |
11458 11458 ST_APPLICATION_RESERVATIONS)) != 0)) {
11459 11459 action = ATTEMPT_RETRY;
11460 11460 un->un_rsvd_status |= ST_LOST_RESERVE;
11461 11461 } else {
11462 11462 action = COMMAND_DONE_EACCES;
11463 11463 un->un_rsvd_status |= ST_RESERVATION_CONFLICT;
11464 11464 }
11465 11465 break;
11466 11466
11467 11467 case STATUS_BUSY:
11468 11468 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG, "unit busy\n");
11469 11469 if (rcvi->privatelen == sizeof (recov_info) &&
11470 11470 un->un_multipath && (pkt->pkt_state == (STATE_GOT_BUS |
11471 11471 STATE_GOT_TARGET | STATE_SENT_CMD | STATE_GOT_STATUS))) {
11472 11472 /*
11473 11473 * Status returned by scsi_vhci indicating path
11474 11474 * has failed over.
11475 11475 */
11476 11476 action = PATH_FAILED;
11477 11477 break;
11478 11478 }
11479 11479 /* FALLTHRU */
11480 11480 case STATUS_QFULL:
11481 11481 if (rcvi->privatelen == sizeof (recov_info)) {
11482 11482 /*
11483 11483 * If recovery is inabled use it instead of
11484 11484 * blind reties.
11485 11485 */
11486 11486 action = ATTEMPT_RETRY;
11487 11487 } else if (rcvi->pkt_retry_cnt++ < st_retry_count) {
11488 11488 action = QUE_BUSY_COMMAND;
11489 11489 } else if ((un->un_rsvd_status &
11490 11490 (ST_RESERVE | ST_APPLICATION_RESERVATIONS)) == 0) {
11491 11491 /*
11492 11492 * If this is a command done before reserve is done
11493 11493 * don't reset.
11494 11494 */
11495 11495 action = COMMAND_DONE_ERROR;
11496 11496 } else {
11497 11497 ST_DEBUG2(ST_DEVINFO, st_label, CE_WARN,
11498 11498 "unit busy too long\n");
11499 11499 (void) st_reset(un, RESET_ALL);
11500 11500 action = COMMAND_DONE_ERROR;
11501 11501 }
11502 11502 break;
11503 11503
11504 11504 case STATUS_CHECK:
11505 11505 case STATUS_TERMINATED:
11506 11506 /*
11507 11507 * we should only get here if the auto rqsense failed
11508 11508 * thru a uscsi cmd without autorequest sense
11509 11509 * so we just try again
11510 11510 */
11511 11511 if (un->un_arq_enabled &&
11512 11512 stat->sts_rqpkt_reason == CMD_CMPLT &&
11513 11513 (stat->sts_rqpkt_state & (STATE_GOT_BUS |
11514 11514 STATE_GOT_TARGET | STATE_SENT_CMD | STATE_GOT_STATUS)) ==
11515 11515 (STATE_GOT_BUS | STATE_GOT_TARGET | STATE_SENT_CMD |
11516 11516 STATE_GOT_STATUS)) {
11517 11517
11518 11518 ST_DEBUG2(ST_DEVINFO, st_label, CE_WARN,
11519 11519 "Really got sense data\n");
11520 11520 action = st_decode_sense(un, bp, MAX_SENSE_LENGTH -
11521 11521 pkt->pkt_resid, stat, &un->un_pos);
11522 11522 } else {
11523 11523 ST_DEBUG2(ST_DEVINFO, st_label, CE_WARN,
11524 11524 "Trying to queue sense command\n");
11525 11525 action = QUE_SENSE;
11526 11526 }
11527 11527 break;
11528 11528
11529 11529 case STATUS_TASK_ABORT:
11530 11530 /*
11531 11531 * This is an aborted task. This can be a reset on the other
11532 11532 * port of a multiport drive. Lets try and recover it.
11533 11533 */
11534 11534 action = DEVICE_RESET;
11535 11535 break;
11536 11536
11537 11537 default:
11538 11538 action = COMMAND_DONE;
11539 11539 ST_DEBUG(ST_DEVINFO, st_label, CE_PANIC,
11540 11540 "Unexpected scsi status byte 0x%x\n", SCBP_C(pkt));
11541 11541 }
11542 11542 return (action);
11543 11543 }
11544 11544
11545 11545 static void
11546 11546 st_calc_bnum(struct scsi_tape *un, struct buf *bp, struct scsi_pkt *pkt)
11547 11547 {
11548 11548 int nblks;
11549 11549 int nfiles;
11550 11550 long count;
11551 11551 recov_info *ri = pkt->pkt_private;
11552 11552 cmd_attribute const *attrib;
11553 11553
11554 11554 ST_FUNC(ST_DEVINFO, st_calc_bnum);
11555 11555
11556 11556 ASSERT(mutex_owned(ST_MUTEX));
11557 11557
11558 11558 if (ri->privatelen == sizeof (recov_info)) {
11559 11559 attrib = ri->cmd_attrib;
11560 11560 ASSERT(attrib->recov_pos_type == POS_EXPECTED);
11561 11561 ASSERT(attrib->chg_tape_pos);
11562 11562 } else {
11563 11563 ri = NULL;
11564 11564 attrib = st_lookup_cmd_attribute(pkt->pkt_cdbp[0]);
11565 11565 }
11566 11566
11567 11567 count = bp->b_bcount - bp->b_resid;
11568 11568
11569 11569 /* Command reads or writes data */
11570 11570 if (attrib->transfers_data != TRAN_NONE) {
11571 11571 if (count == 0) {
11572 11572 if (attrib->transfers_data == TRAN_WRTE) {
11573 11573 ASSERT(un->un_pos.eof == ST_EOM);
11574 11574 nblks = 0;
11575 11575 nfiles = 0;
11576 11576 } else {
11577 11577 ASSERT(un->un_pos.eof == ST_EOF_PENDING);
11578 11578 nblks = 0;
11579 11579 nfiles = 1;
11580 11580 }
11581 11581 } else if (un->un_bsize == 0) {
11582 11582 /*
11583 11583 * If variable block mode.
11584 11584 * Fixed bit in CBD should be zero.
11585 11585 */
11586 11586 ASSERT((pkt->pkt_cdbp[1] & 1) == 0);
11587 11587 nblks = 1;
11588 11588 un->un_kbytes_xferred += (count / ONE_K);
11589 11589 nfiles = 0;
11590 11590 } else {
11591 11591 /*
11592 11592 * If fixed block mode.
11593 11593 * Fixed bit in CBD should be one.
11594 11594 */
11595 11595 ASSERT((pkt->pkt_cdbp[1] & 1) == 1);
11596 11596 nblks = (count / un->un_bsize);
11597 11597 un->un_kbytes_xferred += (nblks * un->un_bsize) / ONE_K;
11598 11598 nfiles = 0;
11599 11599 }
11600 11600 /*
11601 11601 * So its possable to read some blocks and hit a filemark.
11602 11602 * Example reading in fixed block mode where more then one
11603 11603 * block at a time is requested. In this case because the
11604 11604 * filemark is hit something less then the requesed number
11605 11605 * of blocks is read.
11606 11606 */
11607 11607 if (un->un_pos.eof == ST_EOF_PENDING && bp->b_resid) {
11608 11608 nfiles = 1;
11609 11609 }
11610 11610 } else {
11611 11611 nblks = 0;
11612 11612 nfiles = count;
11613 11613 }
11614 11614
11615 11615 /*
11616 11616 * If some command failed after this one started and it seems
11617 11617 * to have finshed without error count the position.
11618 11618 */
11619 11619 if (un->un_persistence && un->un_persist_errors) {
11620 11620 ASSERT(un->un_pos.pmode != invalid);
11621 11621 }
11622 11622
11623 11623 if (attrib->chg_tape_direction == DIR_FORW) {
11624 11624 un->un_pos.blkno += nblks;
11625 11625 un->un_pos.lgclblkno += nblks;
11626 11626 un->un_pos.lgclblkno += nfiles;
11627 11627 } else if (attrib->chg_tape_direction == DIR_REVC) {
11628 11628 un->un_pos.blkno -= nblks;
11629 11629 un->un_pos.lgclblkno -= nblks;
11630 11630 un->un_pos.lgclblkno -= nfiles;
11631 11631 } else {
11632 11632 ASSERT(0);
11633 11633 }
11634 11634
11635 11635 /* recovery disabled */
11636 11636 if (ri == NULL) {
11637 11637 un->un_running.pmode = invalid;
11638 11638 return;
11639 11639 }
11640 11640
11641 11641 /*
11642 11642 * If we didn't just read a filemark.
11643 11643 */
11644 11644 if (un->un_pos.eof != ST_EOF_PENDING) {
11645 11645 ASSERT(nblks != 0 && nfiles == 0);
11646 11646 /*
11647 11647 * If Previously calulated expected position does not match
11648 11648 * debug the expected position.
11649 11649 */
11650 11650 if ((ri->pos.pmode != invalid) && nblks &&
11651 11651 ((un->un_pos.blkno != ri->pos.blkno) ||
11652 11652 (un->un_pos.lgclblkno != ri->pos.lgclblkno))) {
11653 11653 #ifdef STDEBUG
11654 11654 st_print_position(ST_DEVINFO, st_label, CE_NOTE,
11655 11655 "Expected", &ri->pos);
11656 11656 st_print_position(ST_DEVINFO, st_label, CE_NOTE,
11657 11657 "But Got", &un->un_pos);
11658 11658 #endif
11659 11659 un->un_running.pmode = invalid;
11660 11660 }
11661 11661 } else {
11662 11662 ASSERT(nfiles != 0);
11663 11663 if (un->un_running.pmode != invalid) {
11664 11664 /*
11665 11665 * blkno and lgclblkno already counted in
11666 11666 * st_add_recovery_info_to_pkt(). Since a block was not
11667 11667 * read and a filemark was.
11668 11668 */
11669 11669 if (attrib->chg_tape_direction == DIR_FORW) {
11670 11670 un->un_running.fileno++;
11671 11671 un->un_running.blkno = 0;
11672 11672 } else if (attrib->chg_tape_direction == DIR_REVC) {
11673 11673 un->un_running.fileno--;
11674 11674 un->un_running.blkno = LASTBLK;
11675 11675 }
11676 11676 }
11677 11677 }
11678 11678 }
11679 11679
11680 11680 static void
11681 11681 st_set_state(struct scsi_tape *un, struct buf *bp)
11682 11682 {
11683 11683 struct scsi_pkt *sp = BP_PKT(bp);
11684 11684 struct uscsi_cmd *ucmd;
11685 11685
11686 11686 ST_FUNC(ST_DEVINFO, st_set_state);
11687 11687
11688 11688 ASSERT(mutex_owned(ST_MUTEX));
11689 11689 ASSERT(bp != un->un_recov_buf);
11690 11690
11691 11691 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
11692 11692 "st_set_state(): eof=%x fmneeded=%x pkt_resid=0x%lx (%ld)\n",
11693 11693 un->un_pos.eof, un->un_fmneeded, sp->pkt_resid, sp->pkt_resid);
11694 11694
11695 11695 if (bp != un->un_sbufp) {
11696 11696 #ifdef STDEBUG
11697 11697 if (DEBUGGING && sp->pkt_resid) {
11698 11698 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
11699 11699 "pkt_resid %ld bcount %ld\n",
11700 11700 sp->pkt_resid, bp->b_bcount);
11701 11701 }
11702 11702 #endif
11703 11703 bp->b_resid = sp->pkt_resid;
11704 11704 if (geterror(bp) != EIO) {
11705 11705 st_calc_bnum(un, bp, sp);
11706 11706 }
11707 11707 if (bp->b_flags & B_READ) {
11708 11708 un->un_lastop = ST_OP_READ;
11709 11709 un->un_fmneeded = 0;
11710 11710 } else {
11711 11711 un->un_lastop = ST_OP_WRITE;
11712 11712 if (un->un_dp->options & ST_REEL) {
11713 11713 un->un_fmneeded = 2;
11714 11714 } else {
11715 11715 un->un_fmneeded = 1;
11716 11716 }
11717 11717 }
11718 11718 /*
11719 11719 * all is honky dory at this point, so let's
11720 11720 * readjust the throttle, to increase speed, if we
11721 11721 * have not throttled down.
11722 11722 */
11723 11723 if (un->un_throttle) {
11724 11724 un->un_throttle = un->un_max_throttle;
11725 11725 }
11726 11726 } else {
11727 11727 optype new_lastop = ST_OP_NIL;
11728 11728 uchar_t cmd = (uchar_t)(intptr_t)bp->b_forw;
11729 11729
11730 11730 switch (cmd) {
11731 11731 case SCMD_WRITE:
11732 11732 case SCMD_WRITE_G4:
11733 11733 bp->b_resid = sp->pkt_resid;
11734 11734 new_lastop = ST_OP_WRITE;
11735 11735 if (geterror(bp) == EIO) {
11736 11736 break;
11737 11737 }
11738 11738 st_calc_bnum(un, bp, sp);
11739 11739 if (un->un_dp->options & ST_REEL) {
11740 11740 un->un_fmneeded = 2;
11741 11741 } else {
11742 11742 un->un_fmneeded = 1;
11743 11743 }
11744 11744 break;
11745 11745 case SCMD_READ:
11746 11746 case SCMD_READ_G4:
11747 11747 bp->b_resid = sp->pkt_resid;
11748 11748 new_lastop = ST_OP_READ;
11749 11749 un->un_lastop = ST_OP_READ;
11750 11750 if (geterror(bp) == EIO) {
11751 11751 break;
11752 11752 }
11753 11753 st_calc_bnum(un, bp, sp);
11754 11754 un->un_fmneeded = 0;
11755 11755 break;
11756 11756 case SCMD_WRITE_FILE_MARK_G4:
11757 11757 case SCMD_WRITE_FILE_MARK:
11758 11758 {
11759 11759 int fmdone;
11760 11760
11761 11761 if (un->un_pos.eof != ST_EOM) {
11762 11762 un->un_pos.eof = ST_NO_EOF;
11763 11763 }
11764 11764 fmdone = (bp->b_bcount - bp->b_resid);
11765 11765 if (fmdone > 0) {
11766 11766 un->un_lastop = new_lastop = ST_OP_WEOF;
11767 11767 un->un_pos.lgclblkno += fmdone;
11768 11768 un->un_pos.fileno += fmdone;
11769 11769 un->un_pos.blkno = 0;
11770 11770 } else {
11771 11771 new_lastop = ST_OP_CTL;
11772 11772 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
11773 11773 "Flushed buffer\n");
11774 11774 }
11775 11775 if (fmdone > un->un_fmneeded) {
11776 11776 un->un_fmneeded = 0;
11777 11777 } else {
11778 11778 un->un_fmneeded -= fmdone;
11779 11779 }
11780 11780 break;
11781 11781 }
11782 11782 case SCMD_REWIND:
11783 11783 un->un_pos.eof = ST_NO_EOF;
11784 11784 un->un_pos.fileno = 0;
11785 11785 un->un_pos.blkno = 0;
11786 11786 un->un_pos.lgclblkno = 0;
11787 11787 if (un->un_pos.pmode != legacy)
11788 11788 un->un_pos.pmode = legacy;
11789 11789 new_lastop = ST_OP_CTL;
11790 11790 un->un_restore_pos = 0;
11791 11791 break;
11792 11792
11793 11793 case SCMD_SPACE:
11794 11794 case SCMD_SPACE_G4:
11795 11795 {
11796 11796 int64_t count;
11797 11797 int64_t resid;
11798 11798 int64_t done;
11799 11799 cmd_attribute const *attrib;
11800 11800 recov_info *ri = sp->pkt_private;
11801 11801
11802 11802 if (ri->privatelen == sizeof (recov_info)) {
11803 11803 attrib = ri->cmd_attrib;
11804 11804 } else {
11805 11805 attrib =
11806 11806 st_lookup_cmd_attribute(sp->pkt_cdbp[0]);
11807 11807 }
11808 11808
11809 11809 resid = (int64_t)SPACE_CNT(bp->b_resid);
11810 11810 count = (int64_t)attrib->get_cnt(sp->pkt_cdbp);
11811 11811
11812 11812 if (count >= 0) {
11813 11813 done = (count - resid);
11814 11814 } else {
11815 11815 done = ((-count) - resid);
11816 11816 }
11817 11817 if (done > 0) {
11818 11818 un->un_lastop = new_lastop = ST_OP_CTL;
11819 11819 } else {
11820 11820 new_lastop = ST_OP_CTL;
11821 11821 }
11822 11822
11823 11823 ST_SPAC(ST_DEVINFO, st_label, CE_WARN,
11824 11824 "space cmd: cdb[1] = %s\n"
11825 11825 "space data: = 0x%lx\n"
11826 11826 "space count: = %"PRId64"\n"
11827 11827 "space resid: = %"PRId64"\n"
11828 11828 "spaces done: = %"PRId64"\n"
11829 11829 "fileno before = %d\n"
11830 11830 "blkno before = %d\n",
11831 11831 space_strs[sp->pkt_cdbp[1] & 7],
11832 11832 bp->b_bcount,
11833 11833 count, resid, done,
11834 11834 un->un_pos.fileno, un->un_pos.blkno);
11835 11835
11836 11836 switch (sp->pkt_cdbp[1]) {
11837 11837 case SPACE_TYPE(SP_FLM):
11838 11838 /* Space file forward */
11839 11839 if (count >= 0) {
11840 11840 if (un->un_pos.eof <= ST_EOF) {
11841 11841 un->un_pos.eof = ST_NO_EOF;
11842 11842 }
11843 11843 un->un_pos.fileno += done;
11844 11844 un->un_pos.blkno = 0;
11845 11845 break;
11846 11846 }
11847 11847 /* Space file backward */
11848 11848 if (done > un->un_pos.fileno) {
11849 11849 un->un_pos.fileno = 0;
11850 11850 un->un_pos.blkno = 0;
11851 11851 } else {
11852 11852 un->un_pos.fileno -= done;
11853 11853 un->un_pos.blkno = LASTBLK;
11854 11854 un->un_running.pmode = invalid;
11855 11855 }
11856 11856 break;
11857 11857 case SPACE_TYPE(SP_BLK):
11858 11858 /* Space block forward */
11859 11859 if (count >= 0) {
11860 11860 un->un_pos.blkno += done;
11861 11861 break;
11862 11862 }
11863 11863 /* Space block backward */
11864 11864 if (un->un_pos.eof >= ST_EOF_PENDING) {
11865 11865 /*
11866 11866 * we stepped back into
11867 11867 * a previous file; we are not
11868 11868 * making an effort to pretend that
11869 11869 * we are still in the current file
11870 11870 * ie. logical == physical position
11871 11871 * and leave it to st_ioctl to correct
11872 11872 */
11873 11873 if (done > un->un_pos.blkno) {
11874 11874 un->un_pos.blkno = 0;
11875 11875 } else {
11876 11876 un->un_pos.fileno--;
11877 11877 un->un_pos.blkno = LASTBLK;
11878 11878 un->un_running.pmode = invalid;
11879 11879 }
11880 11880 } else {
11881 11881 un->un_pos.blkno -= done;
11882 11882 }
11883 11883 break;
11884 11884 case SPACE_TYPE(SP_SQFLM):
11885 11885 un->un_pos.pmode = logical;
11886 11886 un->un_pos.blkno = 0;
11887 11887 un->un_lastop = new_lastop = ST_OP_CTL;
11888 11888 break;
11889 11889 case SPACE_TYPE(SP_EOD):
11890 11890 un->un_pos.pmode = logical;
11891 11891 un->un_pos.eof = ST_EOM;
11892 11892 un->un_status = KEY_BLANK_CHECK;
11893 11893 break;
11894 11894 default:
11895 11895 un->un_pos.pmode = invalid;
11896 11896 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
11897 11897 "Unsupported space cmd: %s\n",
11898 11898 space_strs[sp->pkt_cdbp[1] & 7]);
11899 11899
11900 11900 un->un_lastop = new_lastop = ST_OP_CTL;
11901 11901 }
11902 11902
11903 11903 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
11904 11904 "after_space rs %"PRId64" fil %d blk %d\n",
11905 11905 resid, un->un_pos.fileno, un->un_pos.blkno);
11906 11906
11907 11907 break;
11908 11908 }
11909 11909 case SCMD_LOAD:
11910 11910 if ((bp->b_bcount & (LD_LOAD | LD_EOT)) == LD_LOAD) {
11911 11911 un->un_pos.fileno = 0;
11912 11912 if (un->un_pos.pmode != legacy)
11913 11913 un->un_pos.pmode = legacy;
11914 11914 } else {
11915 11915 un->un_state = ST_STATE_OFFLINE;
11916 11916 un->un_pos.pmode = invalid;
11917 11917
11918 11918 }
11919 11919 /*
11920 11920 * If we are loading or unloading we expect the media id
11921 11921 * to change. Lets make it unknown.
11922 11922 */
11923 11923 if (un->un_media_id != bogusID && un->un_media_id_len) {
11924 11924 kmem_free(un->un_media_id, un->un_media_id_len);
11925 11925 un->un_media_id = NULL;
11926 11926 un->un_media_id_len = 0;
11927 11927 }
11928 11928 un->un_density_known = 0;
11929 11929 un->un_pos.eof = ST_NO_EOF;
11930 11930 un->un_pos.blkno = 0;
11931 11931 un->un_lastop = new_lastop = ST_OP_CTL;
11932 11932 break;
11933 11933 case SCMD_ERASE:
11934 11934 un->un_pos.eof = ST_NO_EOF;
11935 11935 un->un_pos.blkno = 0;
11936 11936 un->un_pos.fileno = 0;
11937 11937 un->un_pos.lgclblkno = 0;
11938 11938 if (un->un_pos.pmode != legacy)
11939 11939 un->un_pos.pmode = legacy;
11940 11940 new_lastop = ST_OP_CTL;
11941 11941 break;
11942 11942 case SCMD_RESERVE:
11943 11943 un->un_rsvd_status |= ST_RESERVE;
11944 11944 un->un_rsvd_status &=
11945 11945 ~(ST_RELEASE | ST_LOST_RESERVE |
11946 11946 ST_RESERVATION_CONFLICT | ST_INITIATED_RESET);
11947 11947 new_lastop = ST_OP_CTL;
11948 11948 break;
11949 11949 case SCMD_RELEASE:
11950 11950 un->un_rsvd_status |= ST_RELEASE;
11951 11951 un->un_rsvd_status &=
11952 11952 ~(ST_RESERVE | ST_LOST_RESERVE |
11953 11953 ST_RESERVATION_CONFLICT | ST_INITIATED_RESET);
11954 11954 new_lastop = ST_OP_CTL;
11955 11955 break;
11956 11956 case SCMD_PERSISTENT_RESERVE_IN:
11957 11957 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
11958 11958 "PGR_IN command\n");
11959 11959 new_lastop = ST_OP_CTL;
11960 11960 break;
11961 11961 case SCMD_PERSISTENT_RESERVE_OUT:
11962 11962 switch (sp->pkt_cdbp[1] & ST_SA_MASK) {
11963 11963 case ST_SA_SCSI3_RESERVE:
11964 11964 case ST_SA_SCSI3_PREEMPT:
11965 11965 case ST_SA_SCSI3_PREEMPTANDABORT:
11966 11966 un->un_rsvd_status |=
11967 11967 (ST_APPLICATION_RESERVATIONS | ST_RESERVE);
11968 11968 un->un_rsvd_status &= ~(ST_RELEASE |
11969 11969 ST_LOST_RESERVE | ST_RESERVATION_CONFLICT |
11970 11970 ST_INITIATED_RESET);
11971 11971 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
11972 11972 "PGR Reserve and set: entering"
11973 11973 " ST_APPLICATION_RESERVATIONS mode");
11974 11974 break;
11975 11975 case ST_SA_SCSI3_REGISTER:
11976 11976 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
11977 11977 "PGR Reserve register key");
11978 11978 un->un_rsvd_status |= ST_INIT_RESERVE;
11979 11979 break;
11980 11980 case ST_SA_SCSI3_CLEAR:
11981 11981 un->un_rsvd_status &= ~ST_INIT_RESERVE;
11982 11982 /* FALLTHROUGH */
11983 11983 case ST_SA_SCSI3_RELEASE:
11984 11984 un->un_rsvd_status &=
11985 11985 ~(ST_APPLICATION_RESERVATIONS | ST_RESERVE |
11986 11986 ST_LOST_RESERVE | ST_RESERVATION_CONFLICT |
11987 11987 ST_INITIATED_RESET);
11988 11988 un->un_rsvd_status |= ST_RELEASE;
11989 11989 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
11990 11990 "PGR Release and reset: exiting"
11991 11991 " ST_APPLICATION_RESERVATIONS mode");
11992 11992 break;
11993 11993 }
11994 11994 new_lastop = ST_OP_CTL;
11995 11995 break;
11996 11996 case SCMD_TEST_UNIT_READY:
11997 11997 case SCMD_READ_BLKLIM:
11998 11998 case SCMD_REQUEST_SENSE:
11999 11999 case SCMD_INQUIRY:
12000 12000 case SCMD_RECOVER_BUF:
12001 12001 case SCMD_MODE_SELECT:
12002 12002 case SCMD_MODE_SENSE:
12003 12003 case SCMD_DOORLOCK:
12004 12004 case SCMD_READ_BUFFER:
12005 12005 case SCMD_REPORT_DENSITIES:
12006 12006 case SCMD_LOG_SELECT_G1:
12007 12007 case SCMD_LOG_SENSE_G1:
12008 12008 case SCMD_REPORT_LUNS:
12009 12009 case SCMD_READ_ATTRIBUTE:
12010 12010 case SCMD_WRITE_ATTRIBUTE:
12011 12011 case SCMD_SVC_ACTION_IN_G5:
12012 12012 case SCMD_SECURITY_PROTO_IN:
12013 12013 case SCMD_SECURITY_PROTO_OUT:
12014 12014 new_lastop = ST_OP_CTL;
12015 12015 break;
12016 12016 case SCMD_READ_POSITION:
12017 12017 new_lastop = ST_OP_CTL;
12018 12018 /*
12019 12019 * Only if the buf used was un_sbufp.
12020 12020 * Among other things the prevents read positions used
12021 12021 * as part of error recovery from messing up our
12022 12022 * current position as they will use un_recov_buf.
12023 12023 */
12024 12024 if (USCSI_CMD(bp)) {
12025 12025 (void) st_get_read_pos(un, bp);
12026 12026 }
12027 12027 break;
12028 12028 case SCMD_LOCATE:
12029 12029 case SCMD_LOCATE_G4:
12030 12030 /* Locate makes position mode no longer legacy */
12031 12031 un->un_lastop = new_lastop = ST_OP_CTL;
12032 12032 break;
12033 12033 case SCMD_MAINTENANCE_IN:
12034 12034 switch (sp->pkt_cdbp[1]) {
12035 12035 case SSVC_ACTION_GET_SUPPORTED_OPERATIONS:
12036 12036 case SSVC_ACTION_SET_TARGET_PORT_GROUPS:
12037 12037 new_lastop = ST_OP_CTL;
12038 12038 break;
12039 12039 }
12040 12040 if (new_lastop != ST_OP_NIL) {
12041 12041 break;
12042 12042 }
12043 12043 default:
12044 12044 /*
12045 12045 * Unknown command, If was USCSI and USCSI_SILENT
12046 12046 * flag was not set, set position to unknown.
12047 12047 */
12048 12048 if ((((ucmd = BP_UCMD(bp)) != NULL) &&
12049 12049 (ucmd->uscsi_flags & USCSI_SILENT) == 0)) {
12050 12050 ST_DEBUG2(ST_DEVINFO, st_label, CE_WARN,
12051 12051 "unknown cmd 0x%X caused loss of state\n",
12052 12052 cmd);
12053 12053 } else {
12054 12054 /*
12055 12055 * keep the old agreement to allow unknown
12056 12056 * commands with the USCSI_SILENT set.
12057 12057 * This prevents ASSERT below.
12058 12058 */
12059 12059 new_lastop = ST_OP_CTL;
12060 12060 break;
12061 12061 }
12062 12062 /* FALLTHROUGH */
12063 12063 case SCMD_WRITE_BUFFER: /* Writes new firmware to device */
12064 12064 un->un_pos.pmode = invalid;
12065 12065 un->un_lastop = new_lastop = ST_OP_CTL;
12066 12066 break;
12067 12067 }
12068 12068
12069 12069 /* new_lastop should have been changed */
12070 12070 ASSERT(new_lastop != ST_OP_NIL);
12071 12071
12072 12072 /* If un_lastop should copy new_lastop */
12073 12073 if (((un->un_lastop == ST_OP_WRITE) ||
12074 12074 (un->un_lastop == ST_OP_WEOF)) &&
12075 12075 new_lastop != ST_OP_CTL) {
12076 12076 un->un_lastop = new_lastop;
12077 12077 }
12078 12078 }
12079 12079
12080 12080 /*
12081 12081 * In the st driver we have a logical and physical file position.
12082 12082 * Under BSD behavior, when you get a zero read, the logical position
12083 12083 * is before the filemark but after the last record of the file.
12084 12084 * The physical position is after the filemark. MTIOCGET should always
12085 12085 * return the logical file position.
12086 12086 *
12087 12087 * The next read gives a silent skip to the next file.
12088 12088 * Under SVR4, the logical file position remains before the filemark
12089 12089 * until the file is closed or a space operation is performed.
12090 12090 * Hence set err_resid and err_file before changing fileno if case
12091 12091 * BSD Behaviour.
12092 12092 */
12093 12093 un->un_err_resid = bp->b_resid;
12094 12094 COPY_POS(&un->un_err_pos, &un->un_pos);
12095 12095
12096 12096
12097 12097 /*
12098 12098 * If we've seen a filemark via the last read operation
12099 12099 * advance the file counter, but mark things such that
12100 12100 * the next read operation gets a zero count. We have
12101 12101 * to put this here to handle the case of sitting right
12102 12102 * at the end of a tape file having seen the file mark,
12103 12103 * but the tape is closed and then re-opened without
12104 12104 * any further i/o. That is, the position information
12105 12105 * must be updated before a close.
12106 12106 */
12107 12107
12108 12108 if (un->un_lastop == ST_OP_READ && un->un_pos.eof == ST_EOF_PENDING) {
12109 12109 /*
12110 12110 * If we're a 1/2" tape, and we get a filemark
12111 12111 * right on block 0, *AND* we were not in the
12112 12112 * first file on the tape, and we've hit logical EOM.
12113 12113 * We'll mark the state so that later we do the
12114 12114 * right thing (in st_close(), st_strategy() or
12115 12115 * st_ioctl()).
12116 12116 *
12117 12117 */
12118 12118 if ((un->un_dp->options & ST_REEL) &&
12119 12119 !(un->un_dp->options & ST_READ_IGNORE_EOFS) &&
12120 12120 un->un_pos.blkno == 0 && un->un_pos.fileno > 0) {
12121 12121 un->un_pos.eof = ST_EOT_PENDING;
12122 12122 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
12123 12123 "eot pending\n");
12124 12124 un->un_pos.fileno++;
12125 12125 un->un_pos.blkno = 0;
12126 12126 } else if (BP_UCMD(bp)) {
12127 12127 /*
12128 12128 * Uscsi reads have no concept of Berkley ver System IV.
12129 12129 * Counts here must match raw device.
12130 12130 * A non-full resid implies fix block mode where an
12131 12131 * attempt to read X blocks resulted in less then X.
12132 12132 */
12133 12133 if (bp->b_resid != bp->b_bcount) {
12134 12134 un->un_pos.eof = ST_EOF;
12135 12135 } else {
12136 12136 /* Read over a file mark */
12137 12137 un->un_pos.fileno++;
12138 12138 /* logical block is counted up elsewhere */
12139 12139 /* we're before the first block in next file */
12140 12140 un->un_pos.blkno = 0;
12141 12141 /* EOF is no longer pending */
12142 12142 un->un_pos.eof = ST_NO_EOF;
12143 12143 }
12144 12144 } else if (BSD_BEHAVIOR) {
12145 12145 /*
12146 12146 * If the read of the filemark was a side effect
12147 12147 * of reading some blocks (i.e., data was actually
12148 12148 * read), then the EOF mark is pending and the
12149 12149 * bump into the next file awaits the next read
12150 12150 * operation (which will return a zero count), or
12151 12151 * a close or a space operation, else the bump
12152 12152 * into the next file occurs now.
12153 12153 */
12154 12154 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
12155 12155 "resid=%lx, bcount=%lx\n",
12156 12156 bp->b_resid, bp->b_bcount);
12157 12157
12158 12158 if (bp->b_resid != bp->b_bcount) {
12159 12159 un->un_pos.eof = ST_EOF;
12160 12160 } else {
12161 12161 un->un_silent_skip = 1;
12162 12162 un->un_pos.eof = ST_NO_EOF;
12163 12163 un->un_pos.fileno++;
12164 12164 un->un_pos.lgclblkno++;
12165 12165 un->un_save_blkno = un->un_pos.blkno;
12166 12166 un->un_pos.blkno = 0;
12167 12167 }
12168 12168 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
12169 12169 "eof of file %d, eof=%d\n",
12170 12170 un->un_pos.fileno, un->un_pos.eof);
12171 12171 } else if (SVR4_BEHAVIOR) {
12172 12172 /*
12173 12173 * If the read of the filemark was a side effect
12174 12174 * of reading some blocks (i.e., data was actually
12175 12175 * read), then the next read should return 0
12176 12176 */
12177 12177 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
12178 12178 "resid=%lx, bcount=%lx\n",
12179 12179 bp->b_resid, bp->b_bcount);
12180 12180 if (bp->b_resid == bp->b_bcount) {
12181 12181 un->un_pos.eof = ST_EOF;
12182 12182 }
12183 12183 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
12184 12184 "eof of file=%d, eof=%d\n",
12185 12185 un->un_pos.fileno, un->un_pos.eof);
12186 12186 }
12187 12187 }
12188 12188 }
12189 12189
12190 12190 /*
12191 12191 * set the correct un_errno, to take corner cases into consideration
12192 12192 */
12193 12193 static void
12194 12194 st_set_pe_errno(struct scsi_tape *un)
12195 12195 {
12196 12196 ST_FUNC(ST_DEVINFO, st_set_pe_errno);
12197 12197
12198 12198 ASSERT(mutex_owned(ST_MUTEX));
12199 12199
12200 12200 /* if errno is already set, don't reset it */
12201 12201 if (un->un_errno)
12202 12202 return;
12203 12203
12204 12204 /* here un_errno == 0 */
12205 12205 /*
12206 12206 * if the last transfer before flushing all the
12207 12207 * waiting I/O's, was 0 (resid = count), then we
12208 12208 * want to give the user an error on all the rest,
12209 12209 * so here. If there was a transfer, we set the
12210 12210 * resid and counts to 0, and let it drop through,
12211 12211 * giving a zero return. the next I/O will then
12212 12212 * give an error.
12213 12213 */
12214 12214 if (un->un_last_resid == un->un_last_count) {
12215 12215 switch (un->un_pos.eof) {
12216 12216 case ST_EOM:
12217 12217 un->un_errno = ENOMEM;
12218 12218 break;
12219 12219 case ST_EOT:
12220 12220 case ST_EOF:
12221 12221 un->un_errno = EIO;
12222 12222 break;
12223 12223 }
12224 12224 } else {
12225 12225 /*
12226 12226 * we know they did not have a zero, so make
12227 12227 * sure they get one
12228 12228 */
12229 12229 un->un_last_resid = un->un_last_count = 0;
12230 12230 }
12231 12231 }
12232 12232
12233 12233
12234 12234 /*
12235 12235 * send in a marker pkt to terminate flushing of commands by BBA (via
12236 12236 * flush-on-errors) property. The HBA will always return TRAN_ACCEPT
12237 12237 */
12238 12238 static void
12239 12239 st_hba_unflush(struct scsi_tape *un)
12240 12240 {
12241 12241 ST_FUNC(ST_DEVINFO, st_hba_unflush);
12242 12242
12243 12243 ASSERT(mutex_owned(ST_MUTEX));
12244 12244
12245 12245 if (!un->un_flush_on_errors)
12246 12246 return;
12247 12247
12248 12248 #ifdef FLUSH_ON_ERRORS
12249 12249
12250 12250 if (!un->un_mkr_pkt) {
12251 12251 un->un_mkr_pkt = scsi_init_pkt(ROUTE, NULL, (struct buf *)NULL,
12252 12252 NULL, 0, 0, 0, SLEEP_FUNC, NULL);
12253 12253
12254 12254 /* we slept, so it must be there */
12255 12255 pkt->pkt_flags |= FLAG_FLUSH_MARKER;
12256 12256 }
12257 12257
12258 12258 st_transport(un, un->un_mkr_pkt);
12259 12259 #endif
12260 12260 }
12261 12261
12262 12262 static char *
12263 12263 st_print_scsi_cmd(char cmd)
12264 12264 {
12265 12265 char tmp[64];
12266 12266 char *cpnt;
12267 12267
12268 12268 cpnt = scsi_cmd_name(cmd, scsi_cmds, tmp);
12269 12269 /* tmp goes out of scope on return and caller sees garbage */
12270 12270 if (cpnt == tmp) {
12271 12271 cpnt = "Unknown Command";
12272 12272 }
12273 12273 return (cpnt);
12274 12274 }
12275 12275
12276 12276 static void
12277 12277 st_print_cdb(dev_info_t *dip, char *label, uint_t level,
12278 12278 char *title, char *cdb)
12279 12279 {
12280 12280 int len = scsi_cdb_size[CDB_GROUPID(cdb[0])];
12281 12281 char buf[256];
12282 12282 struct scsi_tape *un;
12283 12283 int instance = ddi_get_instance(dip);
12284 12284
12285 12285 un = ddi_get_soft_state(st_state, instance);
12286 12286
12287 12287 ST_FUNC(dip, st_print_cdb);
12288 12288
12289 12289 /* force one line output so repeated commands are printed once */
12290 12290 if ((st_debug & 0x180) == 0x100) {
12291 12291 scsi_log(dip, label, level, "node %s cmd %s\n",
12292 12292 st_dev_name(un->un_dev), st_print_scsi_cmd(*cdb));
12293 12293 return;
12294 12294 }
12295 12295
12296 12296 /* force one line output so repeated CDB's are printed once */
12297 12297 if ((st_debug & 0x180) == 0x80) {
12298 12298 st_clean_print(dip, label, level, NULL, cdb, len);
12299 12299 } else {
12300 12300 (void) sprintf(buf, "%s for cmd(%s)", title,
12301 12301 st_print_scsi_cmd(*cdb));
12302 12302 st_clean_print(dip, label, level, buf, cdb, len);
12303 12303 }
12304 12304 }
12305 12305
12306 12306 static void
12307 12307 st_clean_print(dev_info_t *dev, char *label, uint_t level,
12308 12308 char *title, char *data, int len)
12309 12309 {
12310 12310 int i;
12311 12311 int c;
12312 12312 char *format;
12313 12313 char buf[256];
12314 12314 uchar_t byte;
12315 12315
12316 12316 ST_FUNC(dev, st_clean_print);
12317 12317
12318 12318
12319 12319 if (title) {
12320 12320 (void) sprintf(buf, "%s:\n", title);
12321 12321 scsi_log(dev, label, level, "%s", buf);
12322 12322 level = CE_CONT;
12323 12323 }
12324 12324
12325 12325 for (i = 0; i < len; ) {
12326 12326 buf[0] = 0;
12327 12327 for (c = 0; c < 8 && i < len; c++, i++) {
12328 12328 byte = (uchar_t)data[i];
12329 12329 if (byte < 0x10)
12330 12330 format = "0x0%x ";
12331 12331 else
12332 12332 format = "0x%x ";
12333 12333 (void) sprintf(&buf[(int)strlen(buf)], format, byte);
12334 12334 }
12335 12335 (void) sprintf(&buf[(int)strlen(buf)], "\n");
12336 12336
12337 12337 scsi_log(dev, label, level, "%s\n", buf);
12338 12338 level = CE_CONT;
12339 12339 }
12340 12340 }
12341 12341
12342 12342 /*
12343 12343 * Conditionally enabled debugging
12344 12344 */
12345 12345 #ifdef STDEBUG
12346 12346 static void
12347 12347 st_debug_cmds(struct scsi_tape *un, int com, int count, int wait)
12348 12348 {
12349 12349 char tmpbuf[64];
12350 12350
12351 12351 ST_FUNC(ST_DEVINFO, st_debug_cmds);
12352 12352
12353 12353 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
12354 12354 "cmd=%s count=0x%x (%d) %ssync\n",
12355 12355 scsi_cmd_name(com, scsi_cmds, tmpbuf),
12356 12356 count, count,
12357 12357 wait == ASYNC_CMD ? "a" : "");
12358 12358 }
12359 12359 #endif /* STDEBUG */
12360 12360
12361 12361 /*
12362 12362 * Returns pointer to name of minor node name of device 'dev'.
12363 12363 */
12364 12364 static char *
12365 12365 st_dev_name(dev_t dev)
12366 12366 {
12367 12367 struct scsi_tape *un;
12368 12368 const char density[] = { 'l', 'm', 'h', 'c' };
12369 12369 static char name[32];
12370 12370 minor_t minor;
12371 12371 int instance;
12372 12372 int nprt = 0;
12373 12373
12374 12374 minor = getminor(dev);
12375 12375 instance = ((minor & 0xff80) >> 5) | (minor & 3);
12376 12376 un = ddi_get_soft_state(st_state, instance);
12377 12377 if (un) {
12378 12378 ST_FUNC(ST_DEVINFO, st_dev_name);
12379 12379 }
12380 12380
12381 12381 name[nprt] = density[(minor & MT_DENSITY_MASK) >> 3];
12382 12382
12383 12383 if (minor & MT_BSD) {
12384 12384 name[++nprt] = 'b';
12385 12385 }
12386 12386
12387 12387 if (minor & MT_NOREWIND) {
12388 12388 name[++nprt] = 'n';
12389 12389 }
12390 12390
12391 12391 /* NULL terminator */
12392 12392 name[++nprt] = 0;
12393 12393
12394 12394 return (name);
12395 12395 }
12396 12396
12397 12397 /*
12398 12398 * Soft error reporting, so far unique to each drive
12399 12399 *
12400 12400 * Currently supported: exabyte and DAT soft error reporting
12401 12401 */
12402 12402 static int
12403 12403 st_report_exabyte_soft_errors(dev_t dev, int flag)
12404 12404 {
12405 12405 uchar_t *sensep;
12406 12406 int amt;
12407 12407 int rval = 0;
12408 12408 char cdb[CDB_GROUP0], *c = cdb;
12409 12409 struct uscsi_cmd *com;
12410 12410
12411 12411 GET_SOFT_STATE(dev);
12412 12412
12413 12413 ST_FUNC(ST_DEVINFO, st_report_exabyte_soft_errors);
12414 12414
12415 12415 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
12416 12416 "st_report_exabyte_soft_errors(dev = 0x%lx, flag = %d)\n",
12417 12417 dev, flag);
12418 12418
12419 12419 ASSERT(mutex_owned(ST_MUTEX));
12420 12420
12421 12421 com = kmem_zalloc(sizeof (*com), KM_SLEEP);
12422 12422 sensep = kmem_zalloc(TAPE_SENSE_LENGTH, KM_SLEEP);
12423 12423
12424 12424 *c++ = SCMD_REQUEST_SENSE;
12425 12425 *c++ = 0;
12426 12426 *c++ = 0;
12427 12427 *c++ = 0;
12428 12428 *c++ = TAPE_SENSE_LENGTH;
12429 12429 /*
12430 12430 * set CLRCNT (byte 5, bit 7 which clears the error counts)
12431 12431 */
12432 12432 *c = (char)0x80;
12433 12433
12434 12434 com->uscsi_cdb = cdb;
12435 12435 com->uscsi_cdblen = CDB_GROUP0;
12436 12436 com->uscsi_bufaddr = (caddr_t)sensep;
12437 12437 com->uscsi_buflen = TAPE_SENSE_LENGTH;
12438 12438 com->uscsi_flags = USCSI_DIAGNOSE | USCSI_SILENT | USCSI_READ;
12439 12439 com->uscsi_timeout = un->un_dp->non_motion_timeout;
12440 12440
12441 12441 rval = st_uscsi_cmd(un, com, FKIOCTL);
12442 12442 if (rval || com->uscsi_status) {
12443 12443 goto done;
12444 12444 }
12445 12445
12446 12446 /*
12447 12447 * was there enough data?
12448 12448 */
12449 12449 amt = (int)TAPE_SENSE_LENGTH - com->uscsi_resid;
12450 12450
12451 12451 if ((amt >= 19) && un->un_kbytes_xferred) {
12452 12452 uint_t count, error_rate;
12453 12453 uint_t rate;
12454 12454
12455 12455 if (sensep[21] & CLN) {
12456 12456 scsi_log(ST_DEVINFO, st_label, CE_WARN,
12457 12457 "Periodic head cleaning required");
12458 12458 }
12459 12459 if (un->un_kbytes_xferred < (EXABYTE_MIN_TRANSFER/ONE_K)) {
12460 12460 goto done;
12461 12461 }
12462 12462 /*
12463 12463 * check if soft error reporting needs to be done.
12464 12464 */
12465 12465 count = sensep[16] << 16 | sensep[17] << 8 | sensep[18];
12466 12466 count &= 0xffffff;
12467 12467 error_rate = (count * 100)/un->un_kbytes_xferred;
12468 12468
12469 12469 #ifdef STDEBUG
12470 12470 if (st_soft_error_report_debug) {
12471 12471 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
12472 12472 "Exabyte Soft Error Report:\n");
12473 12473 scsi_log(ST_DEVINFO, st_label, CE_CONT,
12474 12474 "read/write error counter: %d\n", count);
12475 12475 scsi_log(ST_DEVINFO, st_label, CE_CONT,
12476 12476 "number of bytes transferred: %dK\n",
12477 12477 un->un_kbytes_xferred);
12478 12478 scsi_log(ST_DEVINFO, st_label, CE_CONT,
12479 12479 "error_rate: %d%%\n", error_rate);
12480 12480
12481 12481 if (amt >= 22) {
12482 12482 scsi_log(ST_DEVINFO, st_label, CE_CONT,
12483 12483 "unit sense: 0x%b 0x%b 0x%b\n",
12484 12484 sensep[19], SENSE_19_BITS,
12485 12485 sensep[20], SENSE_20_BITS,
12486 12486 sensep[21], SENSE_21_BITS);
12487 12487 }
12488 12488 if (amt >= 27) {
12489 12489 scsi_log(ST_DEVINFO, st_label, CE_CONT,
12490 12490 "tracking retry counter: %d\n",
12491 12491 sensep[26]);
12492 12492 scsi_log(ST_DEVINFO, st_label, CE_CONT,
12493 12493 "read/write retry counter: %d\n",
12494 12494 sensep[27]);
12495 12495 }
12496 12496 }
12497 12497 #endif
12498 12498
12499 12499 if (flag & FWRITE) {
12500 12500 rate = EXABYTE_WRITE_ERROR_THRESHOLD;
12501 12501 } else {
12502 12502 rate = EXABYTE_READ_ERROR_THRESHOLD;
12503 12503 }
12504 12504 if (error_rate >= rate) {
12505 12505 scsi_log(ST_DEVINFO, st_label, CE_WARN,
12506 12506 "Soft error rate (%d%%) during %s was too high",
12507 12507 error_rate,
12508 12508 ((flag & FWRITE) ? wrg_str : rdg_str));
12509 12509 scsi_log(ST_DEVINFO, st_label, CE_CONT,
12510 12510 "Please, replace tape cartridge\n");
12511 12511 }
12512 12512 }
12513 12513
12514 12514 done:
12515 12515 kmem_free(com, sizeof (*com));
12516 12516 kmem_free(sensep, TAPE_SENSE_LENGTH);
12517 12517
12518 12518 if (rval != 0) {
12519 12519 scsi_log(ST_DEVINFO, st_label, CE_WARN,
12520 12520 "exabyte soft error reporting failed\n");
12521 12521 }
12522 12522 return (rval);
12523 12523 }
12524 12524
12525 12525 /*
12526 12526 * this is very specific to Archive 4mm dat
12527 12527 */
12528 12528 #define ONE_GIG (ONE_K * ONE_K * ONE_K)
12529 12529
12530 12530 static int
12531 12531 st_report_dat_soft_errors(dev_t dev, int flag)
12532 12532 {
12533 12533 uchar_t *sensep;
12534 12534 int amt, i;
12535 12535 int rval = 0;
12536 12536 char cdb[CDB_GROUP1], *c = cdb;
12537 12537 struct uscsi_cmd *com;
12538 12538 struct scsi_arq_status status;
12539 12539
12540 12540 GET_SOFT_STATE(dev);
12541 12541
12542 12542 ST_FUNC(ST_DEVINFO, st_report_dat_soft_errors);
12543 12543
12544 12544 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
12545 12545 "st_report_dat_soft_errors(dev = 0x%lx, flag = %d)\n", dev, flag);
12546 12546
12547 12547 ASSERT(mutex_owned(ST_MUTEX));
12548 12548
12549 12549 com = kmem_zalloc(sizeof (*com), KM_SLEEP);
12550 12550 sensep = kmem_zalloc(LOG_SENSE_LENGTH, KM_SLEEP);
12551 12551
12552 12552 *c++ = SCMD_LOG_SENSE_G1;
12553 12553 *c++ = 0;
12554 12554 *c++ = (flag & FWRITE) ? 0x42 : 0x43;
12555 12555 *c++ = 0;
12556 12556 *c++ = 0;
12557 12557 *c++ = 0;
12558 12558 *c++ = 2;
12559 12559 *c++ = 0;
12560 12560 *c++ = (char)LOG_SENSE_LENGTH;
12561 12561 *c = 0;
12562 12562 com->uscsi_cdb = cdb;
12563 12563 com->uscsi_cdblen = CDB_GROUP1;
12564 12564 com->uscsi_bufaddr = (caddr_t)sensep;
12565 12565 com->uscsi_buflen = LOG_SENSE_LENGTH;
12566 12566 com->uscsi_rqlen = sizeof (status);
12567 12567 com->uscsi_rqbuf = (caddr_t)&status;
12568 12568 com->uscsi_flags = USCSI_DIAGNOSE | USCSI_RQENABLE | USCSI_READ;
12569 12569 com->uscsi_timeout = un->un_dp->non_motion_timeout;
12570 12570 rval = st_uscsi_cmd(un, com, FKIOCTL);
12571 12571 if (rval) {
12572 12572 scsi_log(ST_DEVINFO, st_label, CE_WARN,
12573 12573 "DAT soft error reporting failed\n");
12574 12574 }
12575 12575 if (rval || com->uscsi_status) {
12576 12576 goto done;
12577 12577 }
12578 12578
12579 12579 /*
12580 12580 * was there enough data?
12581 12581 */
12582 12582 amt = (int)LOG_SENSE_LENGTH - com->uscsi_resid;
12583 12583
12584 12584 if ((amt >= MIN_LOG_SENSE_LENGTH) && un->un_kbytes_xferred) {
12585 12585 int total, retries, param_code;
12586 12586
12587 12587 total = -1;
12588 12588 retries = -1;
12589 12589 amt = sensep[3] + 4;
12590 12590
12591 12591
12592 12592 #ifdef STDEBUG
12593 12593 if (st_soft_error_report_debug) {
12594 12594 (void) printf("logsense:");
12595 12595 for (i = 0; i < MIN_LOG_SENSE_LENGTH; i++) {
12596 12596 if (i % 16 == 0) {
12597 12597 (void) printf("\t\n");
12598 12598 }
12599 12599 (void) printf(" %x", sensep[i]);
12600 12600 }
12601 12601 (void) printf("\n");
12602 12602 }
12603 12603 #endif
12604 12604
12605 12605 /*
12606 12606 * parse the param_codes
12607 12607 */
12608 12608 if (sensep[0] == 2 || sensep[0] == 3) {
12609 12609 for (i = 4; i < amt; i++) {
12610 12610 param_code = (sensep[i++] << 8);
12611 12611 param_code += sensep[i++];
12612 12612 i++; /* skip control byte */
12613 12613 if (param_code == 5) {
12614 12614 if (sensep[i++] == 4) {
12615 12615 total = (sensep[i++] << 24);
12616 12616 total += (sensep[i++] << 16);
12617 12617 total += (sensep[i++] << 8);
12618 12618 total += sensep[i];
12619 12619 }
12620 12620 } else if (param_code == 0x8007) {
12621 12621 if (sensep[i++] == 2) {
12622 12622 retries = sensep[i++] << 8;
12623 12623 retries += sensep[i];
12624 12624 }
12625 12625 } else {
12626 12626 i += sensep[i];
12627 12627 }
12628 12628 }
12629 12629 }
12630 12630
12631 12631 /*
12632 12632 * if the log sense returned valid numbers then determine
12633 12633 * the read and write error thresholds based on the amount of
12634 12634 * data transferred
12635 12635 */
12636 12636
12637 12637 if (total > 0 && retries > 0) {
12638 12638 short normal_retries = 0;
12639 12639 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
12640 12640 "total xferred (%s) =%x, retries=%x\n",
12641 12641 ((flag & FWRITE) ? wrg_str : rdg_str),
12642 12642 total, retries);
12643 12643
12644 12644 if (flag & FWRITE) {
12645 12645 if (total <=
12646 12646 WRITE_SOFT_ERROR_WARNING_THRESHOLD) {
12647 12647 normal_retries =
12648 12648 DAT_SMALL_WRITE_ERROR_THRESHOLD;
12649 12649 } else {
12650 12650 normal_retries =
12651 12651 DAT_LARGE_WRITE_ERROR_THRESHOLD;
12652 12652 }
12653 12653 } else {
12654 12654 if (total <=
12655 12655 READ_SOFT_ERROR_WARNING_THRESHOLD) {
12656 12656 normal_retries =
12657 12657 DAT_SMALL_READ_ERROR_THRESHOLD;
12658 12658 } else {
12659 12659 normal_retries =
12660 12660 DAT_LARGE_READ_ERROR_THRESHOLD;
12661 12661 }
12662 12662 }
12663 12663
12664 12664 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
12665 12665 "normal retries=%d\n", normal_retries);
12666 12666
12667 12667 if (retries >= normal_retries) {
12668 12668 scsi_log(ST_DEVINFO, st_label, CE_WARN,
12669 12669 "Soft error rate (retries = %d) during "
12670 12670 "%s was too high", retries,
12671 12671 ((flag & FWRITE) ? wrg_str : rdg_str));
12672 12672 scsi_log(ST_DEVINFO, st_label, CE_CONT,
12673 12673 "Periodic head cleaning required "
12674 12674 "and/or replace tape cartridge\n");
12675 12675 }
12676 12676
12677 12677 } else if (total == -1 || retries == -1) {
12678 12678 scsi_log(ST_DEVINFO, st_label, CE_WARN,
12679 12679 "log sense parameter code does not make sense\n");
12680 12680 }
12681 12681 }
12682 12682
12683 12683 /*
12684 12684 * reset all values
12685 12685 */
12686 12686 c = cdb;
12687 12687 *c++ = SCMD_LOG_SELECT_G1;
12688 12688 *c++ = 2; /* this resets all values */
12689 12689 *c++ = (char)0xc0;
12690 12690 *c++ = 0;
12691 12691 *c++ = 0;
12692 12692 *c++ = 0;
12693 12693 *c++ = 0;
12694 12694 *c++ = 0;
12695 12695 *c++ = 0;
12696 12696 *c = 0;
12697 12697 com->uscsi_bufaddr = NULL;
12698 12698 com->uscsi_buflen = 0;
12699 12699 com->uscsi_flags = USCSI_DIAGNOSE | USCSI_SILENT;
12700 12700 rval = st_uscsi_cmd(un, com, FKIOCTL);
12701 12701 if (rval) {
12702 12702 scsi_log(ST_DEVINFO, st_label, CE_WARN,
12703 12703 "DAT soft error reset failed\n");
12704 12704 }
12705 12705 done:
12706 12706 kmem_free(com, sizeof (*com));
12707 12707 kmem_free(sensep, LOG_SENSE_LENGTH);
12708 12708 return (rval);
12709 12709 }
12710 12710
12711 12711 static int
12712 12712 st_report_soft_errors(dev_t dev, int flag)
12713 12713 {
12714 12714 GET_SOFT_STATE(dev);
12715 12715
12716 12716 ST_FUNC(ST_DEVINFO, st_report_soft_errors);
12717 12717
12718 12718 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
12719 12719 "st_report_soft_errors(dev = 0x%lx, flag = %d)\n", dev, flag);
12720 12720
12721 12721 ASSERT(mutex_owned(ST_MUTEX));
12722 12722
12723 12723 switch (un->un_dp->type) {
12724 12724 case ST_TYPE_EXB8500:
12725 12725 case ST_TYPE_EXABYTE:
12726 12726 return (st_report_exabyte_soft_errors(dev, flag));
12727 12727 /*NOTREACHED*/
12728 12728 case ST_TYPE_PYTHON:
12729 12729 return (st_report_dat_soft_errors(dev, flag));
12730 12730 /*NOTREACHED*/
12731 12731 default:
12732 12732 un->un_dp->options &= ~ST_SOFT_ERROR_REPORTING;
12733 12733 return (-1);
12734 12734 }
12735 12735 }
12736 12736
12737 12737 /*
12738 12738 * persistent error routines
12739 12739 */
12740 12740
12741 12741 /*
12742 12742 * enable persistent errors, and set the throttle appropriately, checking
12743 12743 * for flush-on-errors capability
12744 12744 */
12745 12745 static void
12746 12746 st_turn_pe_on(struct scsi_tape *un)
12747 12747 {
12748 12748 ST_FUNC(ST_DEVINFO, st_turn_pe_on);
12749 12749
12750 12750 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG, "st_pe_on\n");
12751 12751 ASSERT(mutex_owned(ST_MUTEX));
12752 12752
12753 12753 un->un_persistence = 1;
12754 12754
12755 12755 /*
12756 12756 * only use flush-on-errors if auto-request-sense and untagged-qing are
12757 12757 * enabled. This will simplify the error handling for request senses
12758 12758 */
12759 12759
12760 12760 if (un->un_arq_enabled && un->un_untagged_qing) {
12761 12761 uchar_t f_o_e;
12762 12762
12763 12763 mutex_exit(ST_MUTEX);
12764 12764 f_o_e = (scsi_ifsetcap(ROUTE, "flush-on-errors", 1, 1) == 1) ?
12765 12765 1 : 0;
12766 12766 mutex_enter(ST_MUTEX);
12767 12767
12768 12768 un->un_flush_on_errors = f_o_e;
12769 12769 } else {
12770 12770 un->un_flush_on_errors = 0;
12771 12771 }
12772 12772
12773 12773 if (un->un_flush_on_errors)
12774 12774 un->un_max_throttle = (uchar_t)st_max_throttle;
12775 12775 else
12776 12776 un->un_max_throttle = 1;
12777 12777
12778 12778 if (un->un_dp->options & ST_RETRY_ON_RECOVERED_DEFERRED_ERROR)
12779 12779 un->un_max_throttle = 1;
12780 12780
12781 12781 /* this will send a marker pkt */
12782 12782 st_clear_pe(un);
12783 12783 }
12784 12784
12785 12785 /*
12786 12786 * This turns persistent errors permanently off
12787 12787 */
12788 12788 static void
12789 12789 st_turn_pe_off(struct scsi_tape *un)
12790 12790 {
12791 12791 ST_FUNC(ST_DEVINFO, st_turn_pe_off);
12792 12792 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG, "st_pe_off\n");
12793 12793 ASSERT(mutex_owned(ST_MUTEX));
12794 12794
12795 12795 /* turn it off for good */
12796 12796 un->un_persistence = 0;
12797 12797
12798 12798 /* this will send a marker pkt */
12799 12799 st_clear_pe(un);
12800 12800
12801 12801 /* turn off flush on error capability, if enabled */
12802 12802 if (un->un_flush_on_errors) {
12803 12803 mutex_exit(ST_MUTEX);
12804 12804 (void) scsi_ifsetcap(ROUTE, "flush-on-errors", 0, 1);
12805 12805 mutex_enter(ST_MUTEX);
12806 12806 }
12807 12807
12808 12808
12809 12809 un->un_flush_on_errors = 0;
12810 12810 }
12811 12811
12812 12812 /*
12813 12813 * This clear persistent errors, allowing more commands through, and also
12814 12814 * sending a marker packet.
12815 12815 */
12816 12816 static void
12817 12817 st_clear_pe(struct scsi_tape *un)
12818 12818 {
12819 12819 ST_FUNC(ST_DEVINFO, st_clear_pe);
12820 12820 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG, "st_pe_clear\n");
12821 12821 ASSERT(mutex_owned(ST_MUTEX));
12822 12822
12823 12823 un->un_persist_errors = 0;
12824 12824 un->un_throttle = un->un_last_throttle = 1;
12825 12825 un->un_errno = 0;
12826 12826 st_hba_unflush(un);
12827 12827 }
12828 12828
12829 12829 /*
12830 12830 * This will flag persistent errors, shutting everything down, if the
12831 12831 * application had enabled persistent errors via MTIOCPERSISTENT
12832 12832 */
12833 12833 static void
12834 12834 st_set_pe_flag(struct scsi_tape *un)
12835 12835 {
12836 12836 ST_FUNC(ST_DEVINFO, st_set_pe_flag);
12837 12837 ASSERT(mutex_owned(ST_MUTEX));
12838 12838
12839 12839 if (un->un_persistence) {
12840 12840 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG, "st_pe_flag\n");
12841 12841 un->un_persist_errors = 1;
12842 12842 un->un_throttle = un->un_last_throttle = 0;
12843 12843 cv_broadcast(&un->un_sbuf_cv);
12844 12844 }
12845 12845 }
12846 12846
12847 12847 static int
12848 12848 st_do_reserve(struct scsi_tape *un)
12849 12849 {
12850 12850 int rval;
12851 12851 int was_lost = un->un_rsvd_status & ST_LOST_RESERVE;
12852 12852
12853 12853 ST_FUNC(ST_DEVINFO, st_do_reserve);
12854 12854
12855 12855 /*
12856 12856 * Issue a Throw-Away reserve command to clear the
12857 12857 * check condition.
12858 12858 * If the current behaviour of reserve/release is to
12859 12859 * hold reservation across opens , and if a Bus reset
12860 12860 * has been issued between opens then this command
12861 12861 * would set the ST_LOST_RESERVE flags in rsvd_status.
12862 12862 * In this case return an EACCES so that user knows that
12863 12863 * reservation has been lost in between opens.
12864 12864 * If this error is not returned and we continue with
12865 12865 * successful open , then user may think position of the
12866 12866 * tape is still the same but inreality we would rewind the
12867 12867 * tape and continue from BOT.
12868 12868 */
12869 12869 rval = st_reserve_release(un, ST_RESERVE, st_uscsi_cmd);
12870 12870 if (rval) {
12871 12871 if ((un->un_rsvd_status & ST_LOST_RESERVE_BETWEEN_OPENS) ==
12872 12872 ST_LOST_RESERVE_BETWEEN_OPENS) {
12873 12873 un->un_rsvd_status &= ~(ST_LOST_RESERVE | ST_RESERVE);
12874 12874 un->un_errno = EACCES;
12875 12875 return (EACCES);
12876 12876 }
12877 12877 rval = st_reserve_release(un, ST_RESERVE, st_uscsi_cmd);
12878 12878 }
12879 12879 if (rval == 0) {
12880 12880 un->un_rsvd_status |= ST_INIT_RESERVE;
12881 12881 }
12882 12882 if (was_lost) {
12883 12883 un->un_running.pmode = invalid;
12884 12884 }
12885 12885
12886 12886 return (rval);
12887 12887 }
12888 12888
12889 12889 static int
12890 12890 st_check_cdb_for_need_to_reserve(struct scsi_tape *un, uchar_t *cdb)
12891 12891 {
12892 12892 int rval;
12893 12893 cmd_attribute const *attrib;
12894 12894
12895 12895 ST_FUNC(ST_DEVINFO, st_check_cdb_for_need_to_reserve);
12896 12896
12897 12897 /*
12898 12898 * If already reserved no need to do it again.
12899 12899 * Also if Reserve and Release are disabled Just return.
12900 12900 */
12901 12901 if ((un->un_rsvd_status & (ST_APPLICATION_RESERVATIONS)) ||
12902 12902 ((un->un_rsvd_status & (ST_RESERVE | ST_LOST_RESERVE)) ==
12903 12903 ST_RESERVE) || (un->un_dp->options & ST_NO_RESERVE_RELEASE)) {
12904 12904 ST_DEBUG6(ST_DEVINFO, st_label, CE_NOTE,
12905 12905 "st_check_cdb_for_need_to_reserve() reserve unneeded %s",
12906 12906 st_print_scsi_cmd((uchar_t)cdb[0]));
12907 12907 return (0);
12908 12908 }
12909 12909
12910 12910 /* See if command is on the list */
12911 12911 attrib = st_lookup_cmd_attribute(cdb[0]);
12912 12912
12913 12913 if (attrib == NULL) {
12914 12914 rval = 1; /* Not found, when in doubt reserve */
12915 12915 } else if ((attrib->requires_reserve) != 0) {
12916 12916 rval = 1;
12917 12917 } else if ((attrib->reserve_byte) != 0) {
12918 12918 /*
12919 12919 * cmd is on list.
12920 12920 * if byte is zero always allowed.
12921 12921 */
12922 12922 rval = 1;
12923 12923 } else if (((cdb[attrib->reserve_byte]) &
12924 12924 (attrib->reserve_mask)) != 0) {
12925 12925 rval = 1;
12926 12926 } else {
12927 12927 rval = 0;
12928 12928 }
12929 12929
12930 12930 if (rval) {
12931 12931 ST_DEBUG6(ST_DEVINFO, st_label, CE_NOTE,
12932 12932 "Command %s requires reservation",
12933 12933 st_print_scsi_cmd(cdb[0]));
12934 12934
12935 12935 rval = st_do_reserve(un);
12936 12936 }
12937 12937
12938 12938 return (rval);
12939 12939 }
12940 12940
12941 12941 static int
12942 12942 st_check_cmd_for_need_to_reserve(struct scsi_tape *un, uchar_t cmd, int cnt)
12943 12943 {
12944 12944 int rval;
12945 12945 cmd_attribute const *attrib;
12946 12946
12947 12947 ST_FUNC(ST_DEVINFO, st_check_cmd_for_need_to_reserve);
12948 12948
12949 12949 /*
12950 12950 * Do not reserve when already reserved, when not supported or when
12951 12951 * auto-rewinding on device closure.
12952 12952 */
12953 12953 if ((un->un_rsvd_status & (ST_APPLICATION_RESERVATIONS)) ||
12954 12954 ((un->un_rsvd_status & (ST_RESERVE | ST_LOST_RESERVE)) ==
12955 12955 ST_RESERVE) || (un->un_dp->options & ST_NO_RESERVE_RELEASE) ||
12956 12956 ((un->un_state == ST_STATE_CLOSING) && (cmd == SCMD_REWIND))) {
12957 12957 ST_DEBUG6(ST_DEVINFO, st_label, CE_NOTE,
12958 12958 "st_check_cmd_for_need_to_reserve() reserve unneeded %s",
12959 12959 st_print_scsi_cmd(cmd));
12960 12960 return (0);
12961 12961 }
12962 12962
12963 12963 /* search for this command on the list */
12964 12964 attrib = st_lookup_cmd_attribute(cmd);
12965 12965
12966 12966 if (attrib == NULL) {
12967 12967 rval = 1; /* Not found, when in doubt reserve */
12968 12968 } else if ((attrib->requires_reserve) != 0) {
12969 12969 rval = 1;
12970 12970 } else if ((attrib->reserve_byte) != 0) {
12971 12971 /*
12972 12972 * cmd is on list.
12973 12973 * if byte is zero always allowed.
12974 12974 */
12975 12975 rval = 1;
12976 12976 } else if (((attrib->reserve_mask) & cnt) != 0) {
12977 12977 rval = 1;
12978 12978 } else {
12979 12979 rval = 0;
12980 12980 }
12981 12981
12982 12982 if (rval) {
12983 12983 ST_DEBUG6(ST_DEVINFO, st_label, CE_NOTE,
12984 12984 "Cmd %s requires reservation", st_print_scsi_cmd(cmd));
12985 12985
12986 12986 rval = st_do_reserve(un);
12987 12987 }
12988 12988
12989 12989 return (rval);
12990 12990 }
12991 12991
12992 12992 static int
12993 12993 st_reserve_release(struct scsi_tape *un, int cmd, ubufunc_t ubf)
12994 12994 {
12995 12995 struct uscsi_cmd uscsi_cmd;
12996 12996 int rval;
12997 12997 char cdb[CDB_GROUP0];
12998 12998 struct scsi_arq_status stat;
12999 12999
13000 13000
13001 13001
13002 13002 ST_FUNC(ST_DEVINFO, st_reserve_release);
13003 13003
13004 13004 ASSERT(mutex_owned(ST_MUTEX));
13005 13005
13006 13006 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
13007 13007 "st_reserve_release: %s \n",
13008 13008 (cmd == ST_RELEASE)? "Releasing":"Reserving");
13009 13009
13010 13010 bzero(&cdb, CDB_GROUP0);
13011 13011 if (cmd == ST_RELEASE) {
13012 13012 cdb[0] = SCMD_RELEASE;
13013 13013 } else {
13014 13014 cdb[0] = SCMD_RESERVE;
13015 13015 }
13016 13016 bzero(&uscsi_cmd, sizeof (struct uscsi_cmd));
13017 13017 uscsi_cmd.uscsi_flags = USCSI_WRITE | USCSI_RQENABLE;
13018 13018 uscsi_cmd.uscsi_cdb = cdb;
13019 13019 uscsi_cmd.uscsi_cdblen = CDB_GROUP0;
13020 13020 uscsi_cmd.uscsi_timeout = un->un_dp->non_motion_timeout;
13021 13021 uscsi_cmd.uscsi_rqbuf = (caddr_t)&stat;
13022 13022 uscsi_cmd.uscsi_rqlen = sizeof (stat);
13023 13023
13024 13024 rval = ubf(un, &uscsi_cmd, FKIOCTL);
13025 13025
13026 13026 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
13027 13027 "st_reserve_release: rval(1)=%d\n", rval);
13028 13028
13029 13029 if (rval) {
13030 13030 if (uscsi_cmd.uscsi_status == STATUS_RESERVATION_CONFLICT) {
13031 13031 rval = EACCES;
13032 13032 }
13033 13033 /*
13034 13034 * dynamically turn off reserve/release support
13035 13035 * in case of drives which do not support
13036 13036 * reserve/release command(ATAPI drives).
13037 13037 */
13038 13038 if (un->un_status == KEY_ILLEGAL_REQUEST) {
13039 13039 if ((un->un_dp->options & ST_NO_RESERVE_RELEASE) == 0) {
13040 13040 un->un_dp->options |= ST_NO_RESERVE_RELEASE;
13041 13041 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
13042 13042 "Tape unit does not support "
13043 13043 "reserve/release \n");
13044 13044 }
13045 13045 rval = 0;
13046 13046 }
13047 13047 }
13048 13048 return (rval);
13049 13049 }
13050 13050
13051 13051 static int
13052 13052 st_take_ownership(struct scsi_tape *un, ubufunc_t ubf)
13053 13053 {
13054 13054 int rval;
13055 13055
13056 13056 ST_FUNC(ST_DEVINFO, st_take_ownership);
13057 13057
13058 13058 ASSERT(mutex_owned(ST_MUTEX));
13059 13059
13060 13060 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
13061 13061 "st_take_ownership: Entering ...\n");
13062 13062
13063 13063
13064 13064 rval = st_reserve_release(un, ST_RESERVE, ubf);
13065 13065 /*
13066 13066 * XXX -> Should reset be done only if we get EACCES.
13067 13067 * .
13068 13068 */
13069 13069 if (rval) {
13070 13070 if (st_reset(un, RESET_LUN) == 0) {
13071 13071 return (EIO);
13072 13072 }
13073 13073 un->un_rsvd_status &=
13074 13074 ~(ST_LOST_RESERVE | ST_RESERVATION_CONFLICT);
13075 13075
13076 13076 mutex_exit(ST_MUTEX);
13077 13077 delay(drv_usectohz(ST_RESERVATION_DELAY));
13078 13078 mutex_enter(ST_MUTEX);
13079 13079 /*
13080 13080 * remove the check condition.
13081 13081 */
13082 13082 (void) st_reserve_release(un, ST_RESERVE, ubf);
13083 13083 rval = st_reserve_release(un, ST_RESERVE, ubf);
13084 13084 if (rval != 0) {
13085 13085 if ((st_reserve_release(un, ST_RESERVE, ubf))
13086 13086 != 0) {
13087 13087 rval = (un->un_rsvd_status &
13088 13088 ST_RESERVATION_CONFLICT) ? EACCES : EIO;
13089 13089 return (rval);
13090 13090 }
13091 13091 }
13092 13092 /*
13093 13093 * Set tape state to ST_STATE_OFFLINE , in case if
13094 13094 * the user wants to continue and start using
13095 13095 * the tape.
13096 13096 */
13097 13097 un->un_state = ST_STATE_OFFLINE;
13098 13098 un->un_rsvd_status |= ST_INIT_RESERVE;
13099 13099 }
13100 13100 return (rval);
13101 13101 }
13102 13102
13103 13103 static int
13104 13104 st_create_errstats(struct scsi_tape *un, int instance)
13105 13105 {
13106 13106 char kstatname[KSTAT_STRLEN];
13107 13107
13108 13108 ST_FUNC(ST_DEVINFO, st_create_errstats);
13109 13109
13110 13110 /*
13111 13111 * Create device error kstats
13112 13112 */
13113 13113
13114 13114 if (un->un_errstats == (kstat_t *)0) {
13115 13115 (void) sprintf(kstatname, "st%d,err", instance);
13116 13116 un->un_errstats = kstat_create("sterr", instance, kstatname,
13117 13117 "device_error", KSTAT_TYPE_NAMED,
13118 13118 sizeof (struct st_errstats) / sizeof (kstat_named_t),
13119 13119 KSTAT_FLAG_PERSISTENT);
13120 13120
13121 13121 if (un->un_errstats) {
13122 13122 struct st_errstats *stp;
13123 13123
13124 13124 stp = (struct st_errstats *)un->un_errstats->ks_data;
13125 13125 kstat_named_init(&stp->st_softerrs, "Soft Errors",
13126 13126 KSTAT_DATA_ULONG);
13127 13127 kstat_named_init(&stp->st_harderrs, "Hard Errors",
13128 13128 KSTAT_DATA_ULONG);
13129 13129 kstat_named_init(&stp->st_transerrs, "Transport Errors",
13130 13130 KSTAT_DATA_ULONG);
13131 13131 kstat_named_init(&stp->st_vid, "Vendor",
13132 13132 KSTAT_DATA_CHAR);
13133 13133 kstat_named_init(&stp->st_pid, "Product",
13134 13134 KSTAT_DATA_CHAR);
13135 13135 kstat_named_init(&stp->st_revision, "Revision",
13136 13136 KSTAT_DATA_CHAR);
13137 13137 kstat_named_init(&stp->st_serial, "Serial No",
13138 13138 KSTAT_DATA_CHAR);
13139 13139 un->un_errstats->ks_private = un;
13140 13140 un->un_errstats->ks_update = nulldev;
13141 13141 kstat_install(un->un_errstats);
13142 13142 /*
13143 13143 * Fill in the static data
13144 13144 */
13145 13145 (void) strncpy(&stp->st_vid.value.c[0],
13146 13146 ST_INQUIRY->inq_vid, 8);
13147 13147 /*
13148 13148 * XXX: Emulex MT-02 (and emulators) predates
13149 13149 * SCSI-1 and has no vid & pid inquiry data.
13150 13150 */
13151 13151 if (ST_INQUIRY->inq_len != 0) {
13152 13152 (void) strncpy(&stp->st_pid.value.c[0],
13153 13153 ST_INQUIRY->inq_pid, 16);
13154 13154 (void) strncpy(&stp->st_revision.value.c[0],
13155 13155 ST_INQUIRY->inq_revision, 4);
13156 13156 }
13157 13157 }
13158 13158 }
13159 13159 return (0);
13160 13160 }
13161 13161
13162 13162 static int
13163 13163 st_validate_tapemarks(struct scsi_tape *un, ubufunc_t ubf, tapepos_t *pos)
13164 13164 {
13165 13165 int rval;
13166 13166 bufunc_t bf = (ubf == st_uscsi_rcmd) ? st_rcmd : st_cmd;
13167 13167
13168 13168 ST_FUNC(ST_DEVINFO, st_validate_tapemarks);
13169 13169
13170 13170 ASSERT(MUTEX_HELD(&un->un_sd->sd_mutex));
13171 13171 ASSERT(mutex_owned(ST_MUTEX));
13172 13172
13173 13173 /* Can't restore an invalid position */
13174 13174 if (pos->pmode == invalid) {
13175 13175 return (4);
13176 13176 }
13177 13177
13178 13178 /*
13179 13179 * Assumtions:
13180 13180 * If a position was read and is in logical position mode.
13181 13181 * If a drive supports read position it supports locate.
13182 13182 * If the read position type is not NO_POS. even though
13183 13183 * a read position make not have been attemped yet.
13184 13184 *
13185 13185 * The drive can locate to the position.
13186 13186 */
13187 13187 if (pos->pmode == logical || un->un_read_pos_type != NO_POS) {
13188 13188 /*
13189 13189 * If position mode is logical or legacy mode try
13190 13190 * to locate there as it is faster.
13191 13191 * If it fails try the old way.
13192 13192 */
13193 13193 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
13194 13194 "Restoring tape position to lgclblkbo=0x%"PRIx64"....",
13195 13195 pos->lgclblkno);
13196 13196
13197 13197 if (st_logical_block_locate(un, st_uscsi_cmd, &un->un_pos,
13198 13198 pos->lgclblkno, pos->partition) == 0) {
13199 13199 /* Assume we are there copy rest of position back */
13200 13200 if (un->un_pos.lgclblkno == pos->lgclblkno) {
13201 13201 COPY_POS(&un->un_pos, pos);
13202 13202 }
13203 13203 return (0);
13204 13204 }
13205 13205
13206 13206 /*
13207 13207 * If logical block locate failed to restore a logical
13208 13208 * position, can't recover.
13209 13209 */
13210 13210 if (pos->pmode == logical) {
13211 13211 return (-1);
13212 13212 }
13213 13213 }
13214 13214
13215 13215
13216 13216 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
13217 13217 "Restoring tape position at fileno=%x, blkno=%x....",
13218 13218 pos->fileno, pos->blkno);
13219 13219
13220 13220 /*
13221 13221 * Rewind ? Oh yeah, Fidelity has got the STK F/W changed
13222 13222 * so as not to rewind tape on RESETS: Gee, Has life ever
13223 13223 * been simple in tape land ?
13224 13224 */
13225 13225 rval = bf(un, SCMD_REWIND, 0, SYNC_CMD);
13226 13226 if (rval) {
13227 13227 scsi_log(ST_DEVINFO, st_label, CE_WARN,
13228 13228 "Failed to restore the last file and block position: In"
13229 13229 " this state, Tape will be loaded at BOT during next open");
13230 13230 un->un_pos.pmode = invalid;
13231 13231 return (rval);
13232 13232 }
13233 13233
13234 13234 /* If the position was as the result of back space file */
13235 13235 if (pos->blkno > (INF / 2)) {
13236 13236 /* Go one extra file forward */
13237 13237 pos->fileno++;
13238 13238 /* Figure how many blocks to back into the previous file */
13239 13239 pos->blkno = -(INF - pos->blkno);
13240 13240 }
13241 13241
13242 13242 /* Go to requested fileno */
13243 13243 if (pos->fileno) {
13244 13244 rval = st_cmd(un, SCMD_SPACE, Fmk(pos->fileno), SYNC_CMD);
13245 13245 if (rval) {
13246 13246 scsi_log(ST_DEVINFO, st_label, CE_WARN,
13247 13247 "Failed to restore the last file position: In this "
13248 13248 " state, Tape will be loaded at BOT during next"
13249 13249 " open %d", __LINE__);
13250 13250 un->un_pos.pmode = invalid;
13251 13251 pos->pmode = invalid;
13252 13252 return (rval);
13253 13253 }
13254 13254 }
13255 13255
13256 13256 /*
13257 13257 * If backing into a file we already did an extra file forward.
13258 13258 * Now we have to back over the filemark to get to the end of
13259 13259 * the previous file. The blkno has been ajusted to a negative
13260 13260 * value so we will get to the expected location.
13261 13261 */
13262 13262 if (pos->blkno) {
13263 13263 rval = bf(un, SCMD_SPACE, Fmk(-1), SYNC_CMD);
13264 13264 if (rval) {
13265 13265 scsi_log(ST_DEVINFO, st_label, CE_WARN,
13266 13266 "Failed to restore the last file position: In this "
13267 13267 " state, Tape will be loaded at BOT during next"
13268 13268 " open %d", __LINE__);
13269 13269 un->un_pos.pmode = invalid;
13270 13270 pos->pmode = invalid;
13271 13271 return (rval);
13272 13272 }
13273 13273 }
13274 13274
13275 13275 /*
13276 13276 * The position mode, block and fileno should be correct,
13277 13277 * This updates eof and logical position information.
13278 13278 */
13279 13279 un->un_pos.eof = pos->eof;
13280 13280 un->un_pos.lgclblkno = pos->lgclblkno;
13281 13281
13282 13282 return (0);
13283 13283 }
13284 13284
13285 13285 /*
13286 13286 * check sense key, ASC, ASCQ in order to determine if the tape needs
13287 13287 * to be ejected
13288 13288 */
13289 13289
13290 13290 static int
13291 13291 st_check_asc_ascq(struct scsi_tape *un)
13292 13292 {
13293 13293 struct scsi_extended_sense *sensep = ST_RQSENSE;
13294 13294 struct tape_failure_code *code;
13295 13295
13296 13296 ST_FUNC(ST_DEVINFO, st_check_asc_ascq);
13297 13297
13298 13298 for (code = st_tape_failure_code; code->key != 0xff; code++) {
13299 13299 if ((code->key == sensep->es_key) &&
13300 13300 (code->add_code == sensep->es_add_code) &&
13301 13301 (code->qual_code == sensep->es_qual_code))
13302 13302 return (1);
13303 13303 }
13304 13304 return (0);
13305 13305 }
13306 13306
13307 13307 /*
13308 13308 * st_logpage_supported() sends a Log Sense command with
13309 13309 * page code = 0 = Supported Log Pages Page to the device,
13310 13310 * to see whether the page 'page' is supported.
13311 13311 * Return values are:
13312 13312 * -1 if the Log Sense command fails
13313 13313 * 0 if page is not supported
13314 13314 * 1 if page is supported
13315 13315 */
13316 13316
13317 13317 static int
13318 13318 st_logpage_supported(struct scsi_tape *un, uchar_t page)
13319 13319 {
13320 13320 uchar_t *sp, *sensep;
13321 13321 unsigned length;
13322 13322 struct uscsi_cmd *com;
13323 13323 struct scsi_arq_status status;
13324 13324 int rval;
13325 13325 char cdb[CDB_GROUP1] = {
13326 13326 SCMD_LOG_SENSE_G1,
13327 13327 0,
13328 13328 SUPPORTED_LOG_PAGES_PAGE,
13329 13329 0,
13330 13330 0,
13331 13331 0,
13332 13332 0,
13333 13333 0,
13334 13334 (char)LOG_SENSE_LENGTH,
13335 13335 0
13336 13336 };
13337 13337
13338 13338 ST_FUNC(ST_DEVINFO, st_logpage_supported);
13339 13339
13340 13340 ASSERT(mutex_owned(ST_MUTEX));
13341 13341
13342 13342 com = kmem_zalloc(sizeof (struct uscsi_cmd), KM_SLEEP);
13343 13343 sensep = kmem_zalloc(LOG_SENSE_LENGTH, KM_SLEEP);
13344 13344
13345 13345 com->uscsi_cdb = cdb;
13346 13346 com->uscsi_cdblen = CDB_GROUP1;
13347 13347 com->uscsi_bufaddr = (caddr_t)sensep;
13348 13348 com->uscsi_buflen = LOG_SENSE_LENGTH;
13349 13349 com->uscsi_rqlen = sizeof (status);
13350 13350 com->uscsi_rqbuf = (caddr_t)&status;
13351 13351 com->uscsi_flags =
13352 13352 USCSI_DIAGNOSE | USCSI_RQENABLE | USCSI_READ;
13353 13353 com->uscsi_timeout = un->un_dp->non_motion_timeout;
13354 13354 rval = st_uscsi_cmd(un, com, FKIOCTL);
13355 13355 if (rval || com->uscsi_status) {
13356 13356 /* uscsi-command failed */
13357 13357 rval = -1;
13358 13358 } else {
13359 13359
13360 13360 sp = sensep + 3;
13361 13361
13362 13362 for (length = *sp++; length > 0; length--, sp++) {
13363 13363
13364 13364 if (*sp == page) {
13365 13365 rval = 1;
13366 13366 break;
13367 13367 }
13368 13368 }
13369 13369 }
13370 13370 kmem_free(com, sizeof (struct uscsi_cmd));
13371 13371 kmem_free(sensep, LOG_SENSE_LENGTH);
13372 13372 return (rval);
13373 13373 }
13374 13374
13375 13375
13376 13376 /*
13377 13377 * st_check_clean_bit() gets the status of the tape's cleaning bit.
13378 13378 *
13379 13379 * If the device does support the TapeAlert log page, then the cleaning bit
13380 13380 * information will be read from this page. Otherwise we will see if one of
13381 13381 * ST_CLN_TYPE_1, ST_CLN_TYPE_2 or ST_CLN_TYPE_3 is set in the properties of
13382 13382 * the device, which means, that we can get the cleaning bit information via
13383 13383 * a RequestSense command.
13384 13384 * If both methods of getting cleaning bit information are not supported
13385 13385 * st_check_clean_bit() will return with 0. Otherwise st_check_clean_bit()
13386 13386 * returns with
13387 13387 * - MTF_TAPE_CLN_SUPPORTED if cleaning bit is not set or
13388 13388 * - MTF_TAPE_CLN_SUPPORTED | MTF_TAPE_HEAD_DIRTY if cleaning bit is set.
13389 13389 * If the call to st_uscsi_cmd() to do the Log Sense or the Request Sense
13390 13390 * command fails, or if the amount of Request Sense data is not enough, then
13391 13391 * st_check_clean_bit() returns with -1.
13392 13392 */
13393 13393
13394 13394 static int
13395 13395 st_check_clean_bit(struct scsi_tape *un)
13396 13396 {
13397 13397 int rval = 0;
13398 13398
13399 13399 ST_FUNC(ST_DEVINFO, st_check_clean_bit);
13400 13400
13401 13401 ASSERT(mutex_owned(ST_MUTEX));
13402 13402
13403 13403 if (un->un_HeadClean & TAPE_ALERT_NOT_SUPPORTED) {
13404 13404 return (rval);
13405 13405 }
13406 13406
13407 13407 if (un->un_HeadClean == TAPE_ALERT_SUPPORT_UNKNOWN) {
13408 13408
13409 13409 rval = st_logpage_supported(un, TAPE_SEQUENTIAL_PAGE);
13410 13410 if (rval == -1) {
13411 13411 return (0);
13412 13412 }
13413 13413 if (rval == 1) {
13414 13414
13415 13415 un->un_HeadClean |= TAPE_SEQUENTIAL_SUPPORTED;
13416 13416 }
13417 13417
13418 13418 rval = st_logpage_supported(un, TAPE_ALERT_PAGE);
13419 13419 if (rval == -1) {
13420 13420 return (0);
13421 13421 }
13422 13422 if (rval == 1) {
13423 13423
13424 13424 un->un_HeadClean |= TAPE_ALERT_SUPPORTED;
13425 13425 }
13426 13426
13427 13427 if (un->un_HeadClean == TAPE_ALERT_SUPPORT_UNKNOWN) {
13428 13428
13429 13429 un->un_HeadClean = TAPE_ALERT_NOT_SUPPORTED;
13430 13430 }
13431 13431 }
13432 13432
13433 13433 rval = 0;
13434 13434
13435 13435 if (un->un_HeadClean & TAPE_SEQUENTIAL_SUPPORTED) {
13436 13436
13437 13437 rval = st_check_sequential_clean_bit(un);
13438 13438 if (rval == -1) {
13439 13439 return (0);
13440 13440 }
13441 13441 }
13442 13442
13443 13443 if ((rval == 0) && (un->un_HeadClean & TAPE_ALERT_SUPPORTED)) {
13444 13444
13445 13445 rval = st_check_alert_flags(un);
13446 13446 if (rval == -1) {
13447 13447 return (0);
13448 13448 }
13449 13449 }
13450 13450
13451 13451 if ((rval == 0) && (un->un_dp->options & ST_CLN_MASK)) {
13452 13452
13453 13453 rval = st_check_sense_clean_bit(un);
13454 13454 if (rval == -1) {
13455 13455 return (0);
13456 13456 }
13457 13457 }
13458 13458
13459 13459 /*
13460 13460 * If found a supported means to check need to clean.
13461 13461 */
13462 13462 if (rval & MTF_TAPE_CLN_SUPPORTED) {
13463 13463
13464 13464 /*
13465 13465 * head needs to be cleaned.
13466 13466 */
13467 13467 if (rval & MTF_TAPE_HEAD_DIRTY) {
13468 13468
13469 13469 /*
13470 13470 * Print log message only first time
13471 13471 * found needing cleaned.
13472 13472 */
13473 13473 if ((un->un_HeadClean & TAPE_PREVIOUSLY_DIRTY) == 0) {
13474 13474
13475 13475 scsi_log(ST_DEVINFO, st_label, CE_WARN,
13476 13476 "Periodic head cleaning required");
13477 13477
13478 13478 un->un_HeadClean |= TAPE_PREVIOUSLY_DIRTY;
13479 13479 }
13480 13480
13481 13481 } else {
13482 13482
13483 13483 un->un_HeadClean &= ~TAPE_PREVIOUSLY_DIRTY;
13484 13484 }
13485 13485 }
13486 13486
13487 13487 return (rval);
13488 13488 }
13489 13489
13490 13490
13491 13491 static int
13492 13492 st_check_sequential_clean_bit(struct scsi_tape *un)
13493 13493 {
13494 13494 int rval;
13495 13495 int ix;
13496 13496 ushort_t parameter;
13497 13497 struct uscsi_cmd *cmd;
13498 13498 struct log_sequential_page *sp;
13499 13499 struct log_sequential_page_parameter *prm;
13500 13500 struct scsi_arq_status status;
13501 13501 char cdb[CDB_GROUP1] = {
13502 13502 SCMD_LOG_SENSE_G1,
13503 13503 0,
13504 13504 TAPE_SEQUENTIAL_PAGE | CURRENT_CUMULATIVE_VALUES,
13505 13505 0,
13506 13506 0,
13507 13507 0,
13508 13508 0,
13509 13509 (char)(sizeof (struct log_sequential_page) >> 8),
13510 13510 (char)(sizeof (struct log_sequential_page)),
13511 13511 0
13512 13512 };
13513 13513
13514 13514 ST_FUNC(ST_DEVINFO, st_check_sequential_clean_bit);
13515 13515
13516 13516 cmd = kmem_zalloc(sizeof (struct uscsi_cmd), KM_SLEEP);
13517 13517 sp = kmem_zalloc(sizeof (struct log_sequential_page), KM_SLEEP);
13518 13518
13519 13519 cmd->uscsi_flags =
13520 13520 USCSI_DIAGNOSE | USCSI_RQENABLE | USCSI_READ;
13521 13521 cmd->uscsi_timeout = un->un_dp->non_motion_timeout;
13522 13522 cmd->uscsi_cdb = cdb;
13523 13523 cmd->uscsi_cdblen = CDB_GROUP1;
13524 13524 cmd->uscsi_bufaddr = (caddr_t)sp;
13525 13525 cmd->uscsi_buflen = sizeof (struct log_sequential_page);
13526 13526 cmd->uscsi_rqlen = sizeof (status);
13527 13527 cmd->uscsi_rqbuf = (caddr_t)&status;
13528 13528
13529 13529 rval = st_uscsi_cmd(un, cmd, FKIOCTL);
13530 13530
13531 13531 if (rval || cmd->uscsi_status || cmd->uscsi_resid) {
13532 13532
13533 13533 rval = -1;
13534 13534
13535 13535 } else if (sp->log_page.code != TAPE_SEQUENTIAL_PAGE) {
13536 13536
13537 13537 rval = -1;
13538 13538 }
13539 13539
13540 13540 prm = &sp->param[0];
13541 13541
13542 13542 for (ix = 0; rval == 0 && ix < TAPE_SEQUENTIAL_PAGE_PARA; ix++) {
13543 13543
13544 13544 if (prm->log_param.length == 0) {
13545 13545 break;
13546 13546 }
13547 13547
13548 13548 parameter = (((prm->log_param.pc_hi << 8) & 0xff00) +
13549 13549 (prm->log_param.pc_lo & 0xff));
13550 13550
13551 13551 if (parameter == SEQUENTIAL_NEED_CLN) {
13552 13552
13553 13553 rval = MTF_TAPE_CLN_SUPPORTED;
13554 13554 if (prm->param_value[prm->log_param.length - 1]) {
13555 13555
13556 13556 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
13557 13557 "sequential log says head dirty\n");
13558 13558 rval |= MTF_TAPE_HEAD_DIRTY;
13559 13559 }
13560 13560 }
13561 13561 prm = (struct log_sequential_page_parameter *)
13562 13562 &prm->param_value[prm->log_param.length];
13563 13563 }
13564 13564
13565 13565 kmem_free(cmd, sizeof (struct uscsi_cmd));
13566 13566 kmem_free(sp, sizeof (struct log_sequential_page));
13567 13567
13568 13568 return (rval);
13569 13569 }
13570 13570
13571 13571
13572 13572 static int
13573 13573 st_check_alert_flags(struct scsi_tape *un)
13574 13574 {
13575 13575 struct st_tape_alert *ta;
13576 13576 struct uscsi_cmd *com;
13577 13577 struct scsi_arq_status status;
13578 13578 unsigned ix, length;
13579 13579 int rval;
13580 13580 tape_alert_flags flag;
13581 13581 char cdb[CDB_GROUP1] = {
13582 13582 SCMD_LOG_SENSE_G1,
13583 13583 0,
13584 13584 TAPE_ALERT_PAGE | CURRENT_THRESHOLD_VALUES,
13585 13585 0,
13586 13586 0,
13587 13587 0,
13588 13588 0,
13589 13589 (char)(sizeof (struct st_tape_alert) >> 8),
13590 13590 (char)(sizeof (struct st_tape_alert)),
13591 13591 0
13592 13592 };
13593 13593
13594 13594 ST_FUNC(ST_DEVINFO, st_check_alert_clean_bit);
13595 13595
13596 13596 com = kmem_zalloc(sizeof (struct uscsi_cmd), KM_SLEEP);
13597 13597 ta = kmem_zalloc(sizeof (struct st_tape_alert), KM_SLEEP);
13598 13598
13599 13599 com->uscsi_cdb = cdb;
13600 13600 com->uscsi_cdblen = CDB_GROUP1;
13601 13601 com->uscsi_bufaddr = (caddr_t)ta;
13602 13602 com->uscsi_buflen = sizeof (struct st_tape_alert);
13603 13603 com->uscsi_rqlen = sizeof (status);
13604 13604 com->uscsi_rqbuf = (caddr_t)&status;
13605 13605 com->uscsi_flags =
13606 13606 USCSI_DIAGNOSE | USCSI_RQENABLE | USCSI_READ;
13607 13607 com->uscsi_timeout = un->un_dp->non_motion_timeout;
13608 13608
13609 13609 rval = st_uscsi_cmd(un, com, FKIOCTL);
13610 13610
13611 13611 if (rval || com->uscsi_status || com->uscsi_resid) {
13612 13612
13613 13613 rval = -1; /* uscsi-command failed */
13614 13614
13615 13615 } else if (ta->log_page.code != TAPE_ALERT_PAGE) {
13616 13616
13617 13617 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
13618 13618 "Not Alert Log Page returned 0x%X\n", ta->log_page.code);
13619 13619 rval = -1;
13620 13620 }
13621 13621
13622 13622 length = (ta->log_page.length_hi << 8) + ta->log_page.length_lo;
13623 13623
13624 13624
13625 13625 if (length != TAPE_ALERT_PARAMETER_LENGTH) {
13626 13626
13627 13627 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
13628 13628 "TapeAlert length %d\n", length);
13629 13629 }
13630 13630
13631 13631
13632 13632 for (ix = 0; ix < TAPE_ALERT_MAX_PARA; ix++) {
13633 13633
13634 13634 /*
13635 13635 * if rval is bad before the first pass don't bother
13636 13636 */
13637 13637 if (ix == 0 && rval != 0) {
13638 13638
13639 13639 break;
13640 13640 }
13641 13641
13642 13642 flag = ((ta->param[ix].log_param.pc_hi << 8) +
13643 13643 ta->param[ix].log_param.pc_lo);
13644 13644
13645 13645 if ((ta->param[ix].param_value & 1) == 0) {
13646 13646 continue;
13647 13647 }
13648 13648 /*
13649 13649 * check to see if current parameter is of interest.
13650 13650 * CLEAN_FOR_ERRORS is vendor specific to 9840 9940 stk's.
13651 13651 */
13652 13652 if ((flag == TAF_CLEAN_NOW) ||
13653 13653 (flag == TAF_CLEAN_PERIODIC) ||
13654 13654 ((flag == CLEAN_FOR_ERRORS) &&
13655 13655 (un->un_dp->type == ST_TYPE_STK9840))) {
13656 13656
13657 13657 rval = MTF_TAPE_CLN_SUPPORTED;
13658 13658
13659 13659
13660 13660 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
13661 13661 "alert_page drive needs clean %d\n", flag);
13662 13662 un->un_HeadClean |= TAPE_ALERT_STILL_DIRTY;
13663 13663 rval |= MTF_TAPE_HEAD_DIRTY;
13664 13664
13665 13665 } else if (flag == TAF_CLEANING_MEDIA) {
13666 13666
13667 13667 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
13668 13668 "alert_page drive was cleaned\n");
13669 13669 un->un_HeadClean &= ~TAPE_ALERT_STILL_DIRTY;
13670 13670 }
13671 13671
13672 13672 }
13673 13673
13674 13674 /*
13675 13675 * Report it as dirty till we see it cleaned
13676 13676 */
13677 13677 if (un->un_HeadClean & TAPE_ALERT_STILL_DIRTY) {
13678 13678
13679 13679 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
13680 13680 "alert_page still dirty\n");
13681 13681 rval |= MTF_TAPE_HEAD_DIRTY;
13682 13682 }
13683 13683
13684 13684 kmem_free(com, sizeof (struct uscsi_cmd));
13685 13685 kmem_free(ta, sizeof (struct st_tape_alert));
13686 13686
13687 13687 return (rval);
13688 13688 }
13689 13689
13690 13690
13691 13691 static int
13692 13692 st_check_sense_clean_bit(struct scsi_tape *un)
13693 13693 {
13694 13694 uchar_t *sensep;
13695 13695 char cdb[CDB_GROUP0];
13696 13696 struct uscsi_cmd *com;
13697 13697 ushort_t byte_pos;
13698 13698 uchar_t bit_mask;
13699 13699 unsigned length;
13700 13700 int index;
13701 13701 int rval;
13702 13702
13703 13703 ST_FUNC(ST_DEVINFO, st_check_sense_clean_bit);
13704 13704
13705 13705 /*
13706 13706 * Since this tape does not support Tape Alert,
13707 13707 * we now try to get the cleanbit status via
13708 13708 * Request Sense.
13709 13709 */
13710 13710
13711 13711 if ((un->un_dp->options & ST_CLN_MASK) == ST_CLN_TYPE_1) {
13712 13712
13713 13713 index = 0;
13714 13714
13715 13715 } else if ((un->un_dp->options & ST_CLN_MASK) == ST_CLN_TYPE_2) {
13716 13716
13717 13717 index = 1;
13718 13718
13719 13719 } else if ((un->un_dp->options & ST_CLN_MASK) == ST_CLN_TYPE_3) {
13720 13720
13721 13721 index = 2;
13722 13722
13723 13723 } else {
13724 13724
13725 13725 return (-1);
13726 13726 }
13727 13727
13728 13728 byte_pos = st_cln_bit_position[index].cln_bit_byte;
13729 13729 bit_mask = st_cln_bit_position[index].cln_bit_mask;
13730 13730 length = byte_pos + 1;
13731 13731
13732 13732 com = kmem_zalloc(sizeof (struct uscsi_cmd), KM_SLEEP);
13733 13733 sensep = kmem_zalloc(length, KM_SLEEP);
13734 13734
13735 13735 cdb[0] = SCMD_REQUEST_SENSE;
13736 13736 cdb[1] = 0;
13737 13737 cdb[2] = 0;
13738 13738 cdb[3] = 0;
13739 13739 cdb[4] = (char)length;
13740 13740 cdb[5] = 0;
13741 13741
13742 13742 com->uscsi_cdb = cdb;
13743 13743 com->uscsi_cdblen = CDB_GROUP0;
13744 13744 com->uscsi_bufaddr = (caddr_t)sensep;
13745 13745 com->uscsi_buflen = length;
13746 13746 com->uscsi_flags =
13747 13747 USCSI_DIAGNOSE | USCSI_SILENT | USCSI_READ;
13748 13748 com->uscsi_timeout = un->un_dp->non_motion_timeout;
13749 13749
13750 13750 rval = st_uscsi_cmd(un, com, FKIOCTL);
13751 13751
13752 13752 if (rval || com->uscsi_status || com->uscsi_resid) {
13753 13753
13754 13754 rval = -1;
13755 13755
13756 13756 } else {
13757 13757
13758 13758 rval = MTF_TAPE_CLN_SUPPORTED;
13759 13759 if ((sensep[byte_pos] & bit_mask) == bit_mask) {
13760 13760
13761 13761 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
13762 13762 "sense data says head dirty\n");
13763 13763 rval |= MTF_TAPE_HEAD_DIRTY;
13764 13764 }
13765 13765 }
13766 13766
13767 13767 kmem_free(com, sizeof (struct uscsi_cmd));
13768 13768 kmem_free(sensep, length);
13769 13769 return (rval);
13770 13770 }
13771 13771
13772 13772 /*
13773 13773 * st_clear_unit_attention
13774 13774 *
13775 13775 * run test unit ready's to clear out outstanding
13776 13776 * unit attentions.
13777 13777 * returns zero for SUCCESS or the errno from st_cmd call
13778 13778 */
13779 13779 static int
13780 13780 st_clear_unit_attentions(dev_t dev_instance, int max_trys)
13781 13781 {
13782 13782 int i = 0;
13783 13783 int rval;
13784 13784
13785 13785 GET_SOFT_STATE(dev_instance);
13786 13786 ST_FUNC(ST_DEVINFO, st_clear_unit_attentions);
13787 13787
13788 13788 do {
13789 13789 rval = st_cmd(un, SCMD_TEST_UNIT_READY, 0, SYNC_CMD);
13790 13790 } while ((rval != 0) && (rval != ENXIO) && (++i < max_trys));
13791 13791 return (rval);
13792 13792 }
13793 13793
13794 13794 static void
13795 13795 st_calculate_timeouts(struct scsi_tape *un)
13796 13796 {
13797 13797 ST_FUNC(ST_DEVINFO, st_calculate_timeouts);
13798 13798
13799 13799 if (un->un_dp->non_motion_timeout == 0) {
13800 13800 if (un->un_dp->options & ST_LONG_TIMEOUTS) {
13801 13801 un->un_dp->non_motion_timeout =
13802 13802 st_io_time * st_long_timeout_x;
13803 13803 } else {
13804 13804 un->un_dp->non_motion_timeout = (ushort_t)st_io_time;
13805 13805 }
13806 13806 }
13807 13807
13808 13808 if (un->un_dp->io_timeout == 0) {
13809 13809 if (un->un_dp->options & ST_LONG_TIMEOUTS) {
13810 13810 un->un_dp->io_timeout = st_io_time * st_long_timeout_x;
13811 13811 } else {
13812 13812 un->un_dp->io_timeout = (ushort_t)st_io_time;
13813 13813 }
13814 13814 }
13815 13815
13816 13816 if (un->un_dp->rewind_timeout == 0) {
13817 13817 if (un->un_dp->options & ST_LONG_TIMEOUTS) {
13818 13818 un->un_dp->rewind_timeout =
13819 13819 st_space_time * st_long_timeout_x;
13820 13820 } else {
13821 13821 un->un_dp->rewind_timeout = (ushort_t)st_space_time;
13822 13822 }
13823 13823 }
13824 13824
13825 13825 if (un->un_dp->space_timeout == 0) {
13826 13826 if (un->un_dp->options & ST_LONG_TIMEOUTS) {
13827 13827 un->un_dp->space_timeout =
13828 13828 st_space_time * st_long_timeout_x;
13829 13829 } else {
13830 13830 un->un_dp->space_timeout = (ushort_t)st_space_time;
13831 13831 }
13832 13832 }
13833 13833
13834 13834 if (un->un_dp->load_timeout == 0) {
13835 13835 if (un->un_dp->options & ST_LONG_TIMEOUTS) {
13836 13836 un->un_dp->load_timeout =
13837 13837 st_space_time * st_long_timeout_x;
13838 13838 } else {
13839 13839 un->un_dp->load_timeout = (ushort_t)st_space_time;
13840 13840 }
13841 13841 }
13842 13842
13843 13843 if (un->un_dp->unload_timeout == 0) {
13844 13844 if (un->un_dp->options & ST_LONG_TIMEOUTS) {
13845 13845 un->un_dp->unload_timeout =
13846 13846 st_space_time * st_long_timeout_x;
13847 13847 } else {
13848 13848 un->un_dp->unload_timeout = (ushort_t)st_space_time;
13849 13849 }
13850 13850 }
13851 13851
13852 13852 if (un->un_dp->erase_timeout == 0) {
13853 13853 if (un->un_dp->options & ST_LONG_ERASE) {
13854 13854 un->un_dp->erase_timeout =
13855 13855 st_space_time * st_long_space_time_x;
13856 13856 } else {
13857 13857 un->un_dp->erase_timeout = (ushort_t)st_space_time;
13858 13858 }
13859 13859 }
13860 13860 }
13861 13861
13862 13862
13863 13863 static writablity
13864 13864 st_is_not_wormable(struct scsi_tape *un)
13865 13865 {
13866 13866 ST_FUNC(ST_DEVINFO, st_is_not_wormable);
13867 13867 return (RDWR);
13868 13868 }
13869 13869
13870 13870 static writablity
13871 13871 st_is_hp_dat_tape_worm(struct scsi_tape *un)
13872 13872 {
13873 13873 writablity wrt;
13874 13874
13875 13875 ST_FUNC(ST_DEVINFO, st_is_hp_dat_tape_worm);
13876 13876
13877 13877 /* Mode sense should be current */
13878 13878 if (un->un_mspl->media_type == 1) {
13879 13879 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
13880 13880 "Drive has WORM media loaded\n");
13881 13881 wrt = WORM;
13882 13882 } else {
13883 13883 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
13884 13884 "Drive has non WORM media loaded\n");
13885 13885 wrt = RDWR;
13886 13886 }
13887 13887 return (wrt);
13888 13888 }
13889 13889
13890 13890 #define HP_DAT_INQUIRY 0x4A
13891 13891 static writablity
13892 13892 st_is_hp_dat_worm(struct scsi_tape *un)
13893 13893 {
13894 13894 char *buf;
13895 13895 int result;
13896 13896 writablity wrt;
13897 13897
13898 13898 ST_FUNC(ST_DEVINFO, st_is_hp_dat_worm);
13899 13899
13900 13900 buf = kmem_zalloc(HP_DAT_INQUIRY, KM_SLEEP);
13901 13901
13902 13902 result = st_get_special_inquiry(un, HP_DAT_INQUIRY, buf, 0);
13903 13903
13904 13904 if (result != 0) {
13905 13905 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
13906 13906 "Read Standard Inquiry for WORM support failed");
13907 13907 wrt = FAILED;
13908 13908 } else if ((buf[40] & 1) == 0) {
13909 13909 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
13910 13910 "Drive is NOT WORMable\n");
13911 13911 /* This drive doesn't support it so don't check again */
13912 13912 un->un_dp->options &= ~ST_WORMABLE;
13913 13913 wrt = RDWR;
13914 13914 un->un_wormable = st_is_not_wormable;
13915 13915 } else {
13916 13916 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
13917 13917 "Drive supports WORM version %d\n", buf[40] >> 1);
13918 13918 un->un_wormable = st_is_hp_dat_tape_worm;
13919 13919 wrt = un->un_wormable(un);
13920 13920 }
13921 13921
13922 13922 kmem_free(buf, HP_DAT_INQUIRY);
13923 13923
13924 13924 /*
13925 13925 * If drive doesn't support it no point in checking further.
13926 13926 */
13927 13927 return (wrt);
13928 13928 }
13929 13929
13930 13930 static writablity
13931 13931 st_is_hp_lto_tape_worm(struct scsi_tape *un)
13932 13932 {
13933 13933 writablity wrt;
13934 13934
13935 13935 ST_FUNC(ST_DEVINFO, st_is_hp_lto_tape_worm);
13936 13936
13937 13937 /* Mode sense should be current */
13938 13938 switch (un->un_mspl->media_type) {
13939 13939 case 0x00:
13940 13940 switch (un->un_mspl->density) {
13941 13941 case 0x40:
13942 13942 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
13943 13943 "Drive has standard Gen I media loaded\n");
13944 13944 break;
13945 13945 case 0x42:
13946 13946 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
13947 13947 "Drive has standard Gen II media loaded\n");
13948 13948 break;
13949 13949 case 0x44:
13950 13950 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
13951 13951 "Drive has standard Gen III media loaded\n");
13952 13952 break;
13953 13953 case 0x46:
13954 13954 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
13955 13955 "Drive has standard Gen IV media loaded\n");
13956 13956 break;
13957 13957 default:
13958 13958 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
13959 13959 "Drive has standard unknown 0x%X media loaded\n",
13960 13960 un->un_mspl->density);
13961 13961 }
13962 13962 wrt = RDWR;
13963 13963 break;
13964 13964 case 0x01:
13965 13965 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
13966 13966 "Drive has WORM medium loaded\n");
13967 13967 wrt = WORM;
13968 13968 break;
13969 13969 case 0x80:
13970 13970 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
13971 13971 "Drive has CD-ROM emulation medium loaded\n");
13972 13972 wrt = WORM;
13973 13973 break;
13974 13974 default:
13975 13975 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
13976 13976 "Drive has an unexpected medium type 0x%X loaded\n",
13977 13977 un->un_mspl->media_type);
13978 13978 wrt = RDWR;
13979 13979 }
13980 13980
13981 13981 return (wrt);
13982 13982 }
13983 13983
13984 13984 #define LTO_REQ_INQUIRY 44
13985 13985 static writablity
13986 13986 st_is_hp_lto_worm(struct scsi_tape *un)
13987 13987 {
13988 13988 char *buf;
13989 13989 int result;
13990 13990 writablity wrt;
13991 13991
13992 13992 ST_FUNC(ST_DEVINFO, st_is_hp_lto_worm);
13993 13993
13994 13994 buf = kmem_zalloc(LTO_REQ_INQUIRY, KM_SLEEP);
13995 13995
13996 13996 result = st_get_special_inquiry(un, LTO_REQ_INQUIRY, buf, 0);
13997 13997
13998 13998 if (result != 0) {
13999 13999 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14000 14000 "Read Standard Inquiry for WORM support failed");
14001 14001 wrt = FAILED;
14002 14002 } else if ((buf[40] & 1) == 0) {
14003 14003 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14004 14004 "Drive is NOT WORMable\n");
14005 14005 /* This drive doesn't support it so don't check again */
14006 14006 un->un_dp->options &= ~ST_WORMABLE;
14007 14007 wrt = RDWR;
14008 14008 un->un_wormable = st_is_not_wormable;
14009 14009 } else {
14010 14010 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14011 14011 "Drive supports WORM version %d\n", buf[40] >> 1);
14012 14012 un->un_wormable = st_is_hp_lto_tape_worm;
14013 14013 wrt = un->un_wormable(un);
14014 14014 }
14015 14015
14016 14016 kmem_free(buf, LTO_REQ_INQUIRY);
14017 14017
14018 14018 /*
14019 14019 * If drive doesn't support it no point in checking further.
14020 14020 */
14021 14021 return (wrt);
14022 14022 }
14023 14023
14024 14024 static writablity
14025 14025 st_is_t10_worm_device(struct scsi_tape *un)
14026 14026 {
14027 14027 writablity wrt;
14028 14028
14029 14029 ST_FUNC(ST_DEVINFO, st_is_t10_worm_device);
14030 14030
14031 14031 if (un->un_mspl->media_type == 0x3c) {
14032 14032 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14033 14033 "Drive has WORM media loaded\n");
14034 14034 wrt = WORM;
14035 14035 } else {
14036 14036 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14037 14037 "Drive has non WORM media loaded\n");
14038 14038 wrt = RDWR;
14039 14039 }
14040 14040 return (wrt);
14041 14041 }
14042 14042
14043 14043 #define SEQ_CAP_PAGE (char)0xb0
14044 14044 static writablity
14045 14045 st_is_t10_worm(struct scsi_tape *un)
14046 14046 {
14047 14047 char *buf;
14048 14048 int result;
14049 14049 writablity wrt;
14050 14050
14051 14051 ST_FUNC(ST_DEVINFO, st_is_t10_worm);
14052 14052
14053 14053 buf = kmem_zalloc(6, KM_SLEEP);
14054 14054
14055 14055 result = st_get_special_inquiry(un, 6, buf, SEQ_CAP_PAGE);
14056 14056
14057 14057 if (result != 0) {
14058 14058 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14059 14059 "Read Vitial Inquiry for Sequental Capability"
14060 14060 " WORM support failed %x", result);
14061 14061 wrt = FAILED;
14062 14062 } else if ((buf[4] & 1) == 0) {
14063 14063 ASSERT(buf[1] == SEQ_CAP_PAGE);
14064 14064 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14065 14065 "Drive is NOT WORMable\n");
14066 14066 /* This drive doesn't support it so don't check again */
14067 14067 un->un_dp->options &= ~ST_WORMABLE;
14068 14068 wrt = RDWR;
14069 14069 un->un_wormable = st_is_not_wormable;
14070 14070 } else {
14071 14071 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14072 14072 "Drive supports WORM\n");
14073 14073 un->un_wormable = st_is_t10_worm_device;
14074 14074 wrt = un->un_wormable(un);
14075 14075 }
14076 14076
14077 14077 kmem_free(buf, 6);
14078 14078
14079 14079 return (wrt);
14080 14080 }
14081 14081
14082 14082
14083 14083 #define STK_REQ_SENSE 26
14084 14084
14085 14085 static writablity
14086 14086 st_is_stk_worm(struct scsi_tape *un)
14087 14087 {
14088 14088 char cdb[CDB_GROUP0] = {SCMD_REQUEST_SENSE, 0, 0, 0, STK_REQ_SENSE, 0};
14089 14089 struct scsi_extended_sense *sense;
14090 14090 struct uscsi_cmd *cmd;
14091 14091 char *buf;
14092 14092 int result;
14093 14093 writablity wrt;
14094 14094
14095 14095 ST_FUNC(ST_DEVINFO, st_is_stk_worm);
14096 14096
14097 14097 cmd = kmem_zalloc(sizeof (struct uscsi_cmd), KM_SLEEP);
14098 14098 buf = kmem_alloc(STK_REQ_SENSE, KM_SLEEP);
14099 14099 sense = (struct scsi_extended_sense *)buf;
14100 14100
14101 14101 cmd->uscsi_flags = USCSI_READ;
14102 14102 cmd->uscsi_timeout = un->un_dp->non_motion_timeout;
14103 14103 cmd->uscsi_cdb = &cdb[0];
14104 14104 cmd->uscsi_bufaddr = buf;
14105 14105 cmd->uscsi_buflen = STK_REQ_SENSE;
14106 14106 cmd->uscsi_cdblen = CDB_GROUP0;
14107 14107 cmd->uscsi_rqlen = 0;
14108 14108 cmd->uscsi_rqbuf = NULL;
14109 14109
14110 14110 result = st_uscsi_cmd(un, cmd, FKIOCTL);
14111 14111
14112 14112 if (result != 0 || cmd->uscsi_status != 0) {
14113 14113 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14114 14114 "Request Sense for WORM failed");
14115 14115 wrt = RDWR;
14116 14116 } else if (sense->es_add_len + 8 < 24) {
14117 14117 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14118 14118 "Drive didn't send enough sense data for WORM byte %d\n",
14119 14119 sense->es_add_len + 8);
14120 14120 wrt = RDWR;
14121 14121 un->un_wormable = st_is_not_wormable;
14122 14122 } else if ((buf[24]) & 0x02) {
14123 14123 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14124 14124 "Drive has WORM tape loaded\n");
14125 14125 wrt = WORM;
14126 14126 un->un_wormable = st_is_stk_worm;
14127 14127 } else {
14128 14128 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14129 14129 "Drive has normal tape loaded\n");
14130 14130 wrt = RDWR;
14131 14131 un->un_wormable = st_is_stk_worm;
14132 14132 }
14133 14133
14134 14134 kmem_free(buf, STK_REQ_SENSE);
14135 14135 kmem_free(cmd, sizeof (struct uscsi_cmd));
14136 14136 return (wrt);
14137 14137 }
14138 14138
14139 14139 #define DLT_INQ_SZ 44
14140 14140
14141 14141 static writablity
14142 14142 st_is_dlt_tape_worm(struct scsi_tape *un)
14143 14143 {
14144 14144 caddr_t buf;
14145 14145 int result;
14146 14146 writablity wrt;
14147 14147
14148 14148 ST_FUNC(ST_DEVINFO, st_is_dlt_tape_worm);
14149 14149
14150 14150 buf = kmem_alloc(DLT_INQ_SZ, KM_SLEEP);
14151 14151
14152 14152 /* Read Attribute Media Type */
14153 14153
14154 14154 result = st_read_attributes(un, 0x0408, buf, 10, st_uscsi_cmd);
14155 14155
14156 14156 /*
14157 14157 * If this quantum drive is attached via an HBA that cannot
14158 14158 * support thr read attributes command return error in the
14159 14159 * hope that someday they will support the t10 method.
14160 14160 */
14161 14161 if (result == EINVAL && un->un_max_cdb_sz < CDB_GROUP4) {
14162 14162 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
14163 14163 "Read Attribute Command for WORM Media detection is not "
14164 14164 "supported on the HBA that this drive is attached to.");
14165 14165 wrt = RDWR;
14166 14166 un->un_wormable = st_is_not_wormable;
14167 14167 goto out;
14168 14168 }
14169 14169
14170 14170 if (result != 0) {
14171 14171 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14172 14172 "Read Attribute Command for WORM Media returned 0x%x",
14173 14173 result);
14174 14174 wrt = RDWR;
14175 14175 un->un_dp->options &= ~ST_WORMABLE;
14176 14176 goto out;
14177 14177 }
14178 14178
14179 14179 if ((uchar_t)buf[9] == 0x80) {
14180 14180 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14181 14181 "Drive media is WORM\n");
14182 14182 wrt = WORM;
14183 14183 } else {
14184 14184 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14185 14185 "Drive media is not WORM Media 0x%x\n", (uchar_t)buf[9]);
14186 14186 wrt = RDWR;
14187 14187 }
14188 14188
14189 14189 out:
14190 14190 kmem_free(buf, DLT_INQ_SZ);
14191 14191 return (wrt);
14192 14192 }
14193 14193
14194 14194 static writablity
14195 14195 st_is_dlt_worm(struct scsi_tape *un)
14196 14196 {
14197 14197 caddr_t buf;
14198 14198 int result;
14199 14199 writablity wrt;
14200 14200
14201 14201 ST_FUNC(ST_DEVINFO, st_is_dlt_worm);
14202 14202
14203 14203 buf = kmem_alloc(DLT_INQ_SZ, KM_SLEEP);
14204 14204
14205 14205 result = st_get_special_inquiry(un, DLT_INQ_SZ, buf, 0xC0);
14206 14206
14207 14207 if (result != 0) {
14208 14208 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14209 14209 "Read Vendor Specific Inquiry for WORM support failed");
14210 14210 wrt = RDWR;
14211 14211 goto out;
14212 14212 }
14213 14213
14214 14214 if ((buf[2] & 1) == 0) {
14215 14215 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14216 14216 "Drive is not WORMable\n");
14217 14217 wrt = RDWR;
14218 14218 un->un_dp->options &= ~ST_WORMABLE;
14219 14219 un->un_wormable = st_is_not_wormable;
14220 14220 goto out;
14221 14221 } else {
14222 14222 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14223 14223 "Drive is WORMable\n");
14224 14224 un->un_wormable = st_is_dlt_tape_worm;
14225 14225 wrt = un->un_wormable(un);
14226 14226 }
14227 14227 out:
14228 14228 kmem_free(buf, DLT_INQ_SZ);
14229 14229
14230 14230 return (wrt);
14231 14231 }
14232 14232
14233 14233 typedef struct {
14234 14234 struct modeheader_seq header;
14235 14235 #if defined(_BIT_FIELDS_LTOH) /* X86 */
14236 14236 uchar_t pagecode :6,
14237 14237 :2;
14238 14238 uchar_t page_len;
14239 14239 uchar_t syslogalive :2,
14240 14240 device :1,
14241 14241 abs :1,
14242 14242 ulpbot :1,
14243 14243 prth :1,
14244 14244 ponej :1,
14245 14245 ait :1;
14246 14246 uchar_t span;
14247 14247
14248 14248 uchar_t :6,
14249 14249 worm :1,
14250 14250 mic :1;
14251 14251 uchar_t worm_cap :1,
14252 14252 :7;
14253 14253 uint32_t :32;
14254 14254 #else /* SPARC */
14255 14255 uchar_t :2,
14256 14256 pagecode :6;
14257 14257 uchar_t page_len;
14258 14258 uchar_t ait :1,
14259 14259 device :1,
14260 14260 abs :1,
14261 14261 ulpbot :1,
14262 14262 prth :1,
14263 14263 ponej :1,
14264 14264 syslogalive :2;
14265 14265 uchar_t span;
14266 14266 uchar_t mic :1,
14267 14267 worm :1,
14268 14268 :6;
14269 14269 uchar_t :7,
14270 14270 worm_cap :1;
14271 14271 uint32_t :32;
14272 14272 #endif
14273 14273 }ait_dev_con;
14274 14274
14275 14275 #define AIT_DEV_PAGE 0x31
14276 14276 static writablity
14277 14277 st_is_sony_worm(struct scsi_tape *un)
14278 14278 {
14279 14279 int result;
14280 14280 writablity wrt;
14281 14281 ait_dev_con *ait_conf;
14282 14282
14283 14283 ST_FUNC(ST_DEVINFO, st_is_sony_worm);
14284 14284
14285 14285 ait_conf = kmem_zalloc(sizeof (ait_dev_con), KM_SLEEP);
14286 14286
14287 14287 result = st_gen_mode_sense(un, st_uscsi_cmd, AIT_DEV_PAGE,
14288 14288 (struct seq_mode *)ait_conf, sizeof (ait_dev_con));
14289 14289
14290 14290 if (result == 0) {
14291 14291
14292 14292 if (ait_conf->pagecode != AIT_DEV_PAGE) {
14293 14293 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14294 14294 "returned page 0x%x not 0x%x AIT_DEV_PAGE\n",
14295 14295 ait_conf->pagecode, AIT_DEV_PAGE);
14296 14296 wrt = RDWR;
14297 14297 un->un_wormable = st_is_not_wormable;
14298 14298
14299 14299 } else if (ait_conf->worm_cap) {
14300 14300
14301 14301 un->un_wormable = st_is_sony_worm;
14302 14302
14303 14303 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14304 14304 "Drives is WORMable\n");
14305 14305 if (ait_conf->worm) {
14306 14306 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14307 14307 "Media is WORM\n");
14308 14308 wrt = WORM;
14309 14309 } else {
14310 14310 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14311 14311 "Media is not WORM\n");
14312 14312 wrt = RDWR;
14313 14313 }
14314 14314
14315 14315 } else {
14316 14316 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14317 14317 "Drives not is WORMable\n");
14318 14318 wrt = RDWR;
14319 14319 /* No further checking required */
14320 14320 un->un_dp->options &= ~ST_WORMABLE;
14321 14321 }
14322 14322
14323 14323 } else {
14324 14324
14325 14325 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14326 14326 "AIT device config mode sense page read command failed"
14327 14327 " result = %d ", result);
14328 14328 wrt = FAILED;
14329 14329 un->un_wormable = st_is_not_wormable;
14330 14330 }
14331 14331
14332 14332 kmem_free(ait_conf, sizeof (ait_dev_con));
14333 14333 return (wrt);
14334 14334 }
14335 14335
14336 14336 static writablity
14337 14337 st_is_drive_worm(struct scsi_tape *un)
14338 14338 {
14339 14339 writablity wrt;
14340 14340
14341 14341 ST_FUNC(ST_DEVINFO, st_is_sony_worm);
14342 14342
14343 14343 switch (un->un_dp->type) {
14344 14344 case MT_ISDLT:
14345 14345 wrt = st_is_dlt_worm(un);
14346 14346 break;
14347 14347
14348 14348 case MT_ISSTK9840:
14349 14349 wrt = st_is_stk_worm(un);
14350 14350 break;
14351 14351
14352 14352 case MT_IS8MM:
14353 14353 case MT_ISAIT:
14354 14354 wrt = st_is_sony_worm(un);
14355 14355 break;
14356 14356
14357 14357 case MT_LTO:
14358 14358 if (strncmp("HP ", un->un_dp->vid, 3) == 0) {
14359 14359 wrt = st_is_hp_lto_worm(un);
14360 14360 } else {
14361 14361 wrt = st_is_t10_worm(un);
14362 14362 }
14363 14363 break;
14364 14364
14365 14365 case MT_ISDAT:
14366 14366 if (strncmp("HP ", un->un_dp->vid, 3) == 0) {
14367 14367 wrt = st_is_hp_dat_worm(un);
14368 14368 } else {
14369 14369 wrt = st_is_t10_worm(un);
14370 14370 }
14371 14371 break;
14372 14372
14373 14373 default:
14374 14374 wrt = FAILED;
14375 14375 break;
14376 14376 }
14377 14377
14378 14378 /*
14379 14379 * If any of the above failed try the t10 standard method.
14380 14380 */
14381 14381 if (wrt == FAILED) {
14382 14382 wrt = st_is_t10_worm(un);
14383 14383 }
14384 14384
14385 14385 /*
14386 14386 * Unknown method for detecting WORM media.
14387 14387 */
14388 14388 if (wrt == FAILED) {
14389 14389 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14390 14390 "Unknown method for WORM media detection\n");
14391 14391 wrt = RDWR;
14392 14392 un->un_dp->options &= ~ST_WORMABLE;
14393 14393 }
14394 14394
14395 14395 return (wrt);
14396 14396 }
14397 14397
14398 14398 static int
14399 14399 st_read_attributes(struct scsi_tape *un, uint16_t attribute, void *pnt,
14400 14400 size_t size, ubufunc_t bufunc)
14401 14401 {
14402 14402 char cdb[CDB_GROUP4];
14403 14403 int result;
14404 14404 struct uscsi_cmd *cmd;
14405 14405 struct scsi_arq_status status;
14406 14406
14407 14407 caddr_t buf = (caddr_t)pnt;
14408 14408
14409 14409 ST_FUNC(ST_DEVINFO, st_read_attributes);
14410 14410
14411 14411 if (un->un_sd->sd_inq->inq_ansi < 3) {
14412 14412 return (ENOTTY);
14413 14413 }
14414 14414
14415 14415 cmd = kmem_zalloc(sizeof (struct uscsi_cmd), KM_SLEEP);
14416 14416
14417 14417 cdb[0] = (char)SCMD_READ_ATTRIBUTE;
14418 14418 cdb[1] = 0;
14419 14419 cdb[2] = 0;
14420 14420 cdb[3] = 0;
14421 14421 cdb[4] = 0;
14422 14422 cdb[5] = 0;
14423 14423 cdb[6] = 0;
14424 14424 cdb[7] = 0;
14425 14425 cdb[8] = (char)(attribute >> 8);
14426 14426 cdb[9] = (char)(attribute);
14427 14427 cdb[10] = (char)(size >> 24);
14428 14428 cdb[11] = (char)(size >> 16);
14429 14429 cdb[12] = (char)(size >> 8);
14430 14430 cdb[13] = (char)(size);
14431 14431 cdb[14] = 0;
14432 14432 cdb[15] = 0;
14433 14433
14434 14434
14435 14435 cmd->uscsi_flags = USCSI_READ | USCSI_RQENABLE | USCSI_DIAGNOSE;
14436 14436 cmd->uscsi_timeout = un->un_dp->non_motion_timeout;
14437 14437 cmd->uscsi_cdb = &cdb[0];
14438 14438 cmd->uscsi_bufaddr = (caddr_t)buf;
14439 14439 cmd->uscsi_buflen = size;
14440 14440 cmd->uscsi_cdblen = sizeof (cdb);
14441 14441 cmd->uscsi_rqlen = sizeof (status);
14442 14442 cmd->uscsi_rqbuf = (caddr_t)&status;
14443 14443
14444 14444 result = bufunc(un, cmd, FKIOCTL);
14445 14445
14446 14446 if (result != 0 || cmd->uscsi_status != 0) {
14447 14447 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
14448 14448 "st_read_attribute failed: result %d status %d\n",
14449 14449 result, cmd->uscsi_status);
14450 14450 /*
14451 14451 * If this returns invalid operation code don't try again.
14452 14452 */
14453 14453 if (un->un_sd->sd_sense->es_key == KEY_ILLEGAL_REQUEST &&
14454 14454 un->un_sd->sd_sense->es_add_code == 0x20) {
14455 14455 result = ENOTTY;
14456 14456 } else if (result == 0) {
14457 14457 result = EIO;
14458 14458 }
14459 14459
14460 14460 } else {
14461 14461
14462 14462 /*
14463 14463 * The attribute retured should match the attribute requested.
14464 14464 */
14465 14465 if (buf[4] != cdb[8] || buf[5] != cdb[9]) {
14466 14466 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
14467 14467 "st_read_attribute got wrong data back expected "
14468 14468 "0x%x got 0x%x\n", attribute, buf[6] << 8 | buf[7]);
14469 14469 st_clean_print(ST_DEVINFO, st_label, SCSI_DEBUG,
14470 14470 "bad? data", buf, size);
14471 14471 result = EIO;
14472 14472 }
14473 14473 }
14474 14474
14475 14475 kmem_free(cmd, sizeof (struct uscsi_cmd));
14476 14476
14477 14477 return (result);
14478 14478 }
14479 14479
14480 14480 static int
14481 14481 st_get_special_inquiry(struct scsi_tape *un, uchar_t size, caddr_t dest,
14482 14482 uchar_t page)
14483 14483 {
14484 14484 char cdb[CDB_GROUP0];
14485 14485 struct scsi_extended_sense *sense;
14486 14486 struct uscsi_cmd *cmd;
14487 14487 int result;
14488 14488
14489 14489 ST_FUNC(ST_DEVINFO, st_get_special_inquiry);
14490 14490
14491 14491 cdb[0] = SCMD_INQUIRY;
14492 14492 cdb[1] = page ? 1 : 0;
14493 14493 cdb[2] = page;
14494 14494 cdb[3] = 0;
14495 14495 cdb[4] = size;
14496 14496 cdb[5] = 0;
14497 14497
14498 14498 cmd = kmem_zalloc(sizeof (struct uscsi_cmd), KM_SLEEP);
14499 14499 sense = kmem_alloc(sizeof (struct scsi_extended_sense), KM_SLEEP);
14500 14500
14501 14501 cmd->uscsi_flags = USCSI_READ | USCSI_RQENABLE;
14502 14502 cmd->uscsi_timeout = un->un_dp->non_motion_timeout;
14503 14503 cmd->uscsi_cdb = &cdb[0];
14504 14504 cmd->uscsi_bufaddr = dest;
14505 14505 cmd->uscsi_buflen = size;
14506 14506 cmd->uscsi_cdblen = CDB_GROUP0;
14507 14507 cmd->uscsi_rqlen = sizeof (struct scsi_extended_sense);
14508 14508 cmd->uscsi_rqbuf = (caddr_t)sense;
14509 14509
14510 14510 result = st_uscsi_cmd(un, cmd, FKIOCTL);
14511 14511
14512 14512 if (result != 0 || cmd->uscsi_status != 0) {
14513 14513 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
14514 14514 "st_get_special_inquiry() failed for page %x", page);
14515 14515 if (result == 0) {
14516 14516 result = EIO;
14517 14517 }
14518 14518 }
14519 14519
14520 14520 kmem_free(sense, sizeof (struct scsi_extended_sense));
14521 14521 kmem_free(cmd, sizeof (struct uscsi_cmd));
14522 14522
14523 14523 return (result);
14524 14524 }
14525 14525
14526 14526
14527 14527 static int
14528 14528 st_update_block_pos(struct scsi_tape *un, bufunc_t bf, int post_space)
14529 14529 {
14530 14530 int rval = ENOTTY;
14531 14531 uchar_t status = un->un_status;
14532 14532 posmode previous_pmode = un->un_running.pmode;
14533 14533
14534 14534 ST_FUNC(ST_DEVINFO, st_update_block_pos);
14535 14535
14536 14536 while (un->un_read_pos_type != NO_POS) {
14537 14537 rval = bf(un, SCMD_READ_POSITION, 32, SYNC_CMD);
14538 14538
14539 14539 /*
14540 14540 * If read position command returned good status
14541 14541 * Parse the data to see if the position can be interpreted.
14542 14542 */
14543 14543 if ((rval == 0) &&
14544 14544 ((rval = st_interpret_read_pos(un, &un->un_pos,
14545 14545 un->un_read_pos_type, 32, (caddr_t)un->un_read_pos_data,
14546 14546 post_space)) == 0)) {
14547 14547 /*
14548 14548 * Update the running position as well if un_pos was
14549 14549 * ok. But only if recovery is enabled.
14550 14550 */
14551 14551 if (st_recov_sz != sizeof (recov_info)) {
14552 14552 break;
14553 14553 }
14554 14554 rval = st_interpret_read_pos(un, &un->un_running,
14555 14555 un->un_read_pos_type, 32,
14556 14556 (caddr_t)un->un_read_pos_data, post_space);
14557 14557 un->un_status = status;
14558 14558 break;
14559 14559 } else if (un->un_status == KEY_UNIT_ATTENTION) {
14560 14560 un->un_running.pmode = previous_pmode;
14561 14561 continue;
14562 14562 } else if (un->un_status != KEY_ILLEGAL_REQUEST) {
14563 14563 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
14564 14564 "st_update_block_pos() read position cmd 0x%x"
14565 14565 " returned 0x%x un_status = %d",
14566 14566 un->un_read_pos_type, rval, un->un_status);
14567 14567 /* ENOTTY means it read garbage. try something else. */
14568 14568 if (rval == ENOTTY) {
14569 14569 rval = EIO; /* so ENOTTY is not final rval */
14570 14570 } else {
14571 14571 break;
14572 14572 }
14573 14573 } else {
14574 14574 ST_DEBUG4(ST_DEVINFO, st_label, CE_NOTE,
14575 14575 "st_update_block_pos() read position cmd %x"
14576 14576 " returned %x", un->un_read_pos_type, rval);
14577 14577 un->un_running.pmode = previous_pmode;
14578 14578 }
14579 14579
14580 14580 switch (un->un_read_pos_type) {
14581 14581 case SHORT_POS:
14582 14582 un->un_read_pos_type = NO_POS;
14583 14583 break;
14584 14584
14585 14585 case LONG_POS:
14586 14586 un->un_read_pos_type = EXT_POS;
14587 14587 break;
14588 14588
14589 14589 case EXT_POS:
14590 14590 un->un_read_pos_type = SHORT_POS;
14591 14591 break;
14592 14592
14593 14593 default:
14594 14594 ST_DEBUG(ST_DEVINFO, st_label, CE_PANIC,
14595 14595 "Unexpected read position type 0x%x",
14596 14596 un->un_read_pos_type);
14597 14597 }
14598 14598 un->un_status = KEY_NO_SENSE;
14599 14599 }
14600 14600
14601 14601 return (rval);
14602 14602 }
14603 14603
14604 14604 static int
14605 14605 st_get_read_pos(struct scsi_tape *un, buf_t *bp)
14606 14606 {
14607 14607 int result;
14608 14608 size_t d_sz;
14609 14609 caddr_t pos_info;
14610 14610 struct uscsi_cmd *cmd = (struct uscsi_cmd *)bp->b_back;
14611 14611
14612 14612 ST_FUNC(ST_DEVINFO, st_get_read_pos);
14613 14613
14614 14614 if (cmd->uscsi_bufaddr == NULL || cmd->uscsi_buflen <= 0) {
14615 14615 return (0);
14616 14616 }
14617 14617
14618 14618 if (bp_mapin_common(bp, VM_NOSLEEP) == NULL) {
14619 14619
14620 14620 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
14621 14621 "bp_mapin_common() failed");
14622 14622
14623 14623 return (EIO);
14624 14624 }
14625 14625
14626 14626 d_sz = bp->b_bcount - bp->b_resid;
14627 14627 if (d_sz == 0) {
14628 14628 bp_mapout(bp);
14629 14629 return (EIO);
14630 14630 }
14631 14631
14632 14632 /*
14633 14633 * Copy the buf to a double-word aligned memory that can hold the
14634 14634 * tape_position_t data structure.
14635 14635 */
14636 14636 if ((pos_info = kmem_alloc(d_sz, KM_NOSLEEP)) == NULL) {
14637 14637 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
14638 14638 "kmem_alloc() failed");
14639 14639 bp_mapout(bp);
14640 14640 return (EIO);
14641 14641 }
14642 14642 bcopy(bp->b_un.b_addr, pos_info, d_sz);
14643 14643
14644 14644 #ifdef STDEBUG
14645 14645 if ((st_debug & 0x7) > 2) {
14646 14646 st_clean_print(ST_DEVINFO, st_label, SCSI_DEBUG,
14647 14647 "st_get_read_pos() position info",
14648 14648 pos_info, bp->b_bcount);
14649 14649 }
14650 14650 #endif
14651 14651
14652 14652 result = st_interpret_read_pos(un, &un->un_pos, cmd->uscsi_cdb[1],
14653 14653 d_sz, pos_info, 0);
14654 14654
14655 14655 COPY_POS(&un->un_running, &un->un_pos);
14656 14656
14657 14657 kmem_free(pos_info, d_sz);
14658 14658 bp_mapout(bp);
14659 14659
14660 14660 return (result);
14661 14661 }
14662 14662
14663 14663 #if defined(_BIG_ENDIAN)
14664 14664
14665 14665 #define FIX_ENDIAN16(x)
14666 14666 #define FIX_ENDIAN32(x)
14667 14667 #define FIX_ENDIAN64(x)
14668 14668
14669 14669 #elif defined(_LITTLE_ENDIAN)
14670 14670
14671 14671 static void
14672 14672 st_swap16(uint16_t *val)
14673 14673 {
14674 14674 uint16_t tmp;
14675 14675
14676 14676 tmp = (*val >> 8) & 0xff;
14677 14677 tmp |= (*val << 8) & 0xff00;
14678 14678
14679 14679 *val = tmp;
14680 14680 }
14681 14681
14682 14682 static void
14683 14683 st_swap32(uint32_t *val)
14684 14684 {
14685 14685 uint32_t tmp;
14686 14686
14687 14687 tmp = (*val >> 24) & 0xff;
14688 14688 tmp |= (*val >> 8) & 0xff00;
14689 14689 tmp |= (*val << 8) & 0xff0000;
14690 14690 tmp |= (*val << 24) & 0xff000000;
14691 14691
14692 14692 *val = tmp;
14693 14693 }
14694 14694
14695 14695 static void
14696 14696 st_swap64(uint64_t *val)
14697 14697 {
14698 14698 uint32_t low;
14699 14699 uint32_t high;
14700 14700
14701 14701 low = (uint32_t)(*val);
14702 14702 high = (uint32_t)(*val >> 32);
14703 14703
14704 14704 st_swap32(&low);
14705 14705 st_swap32(&high);
14706 14706
14707 14707 *val = high;
14708 14708 *val |= ((uint64_t)low << 32);
14709 14709 }
14710 14710
14711 14711 #define FIX_ENDIAN16(x) st_swap16(x)
14712 14712 #define FIX_ENDIAN32(x) st_swap32(x)
14713 14713 #define FIX_ENDIAN64(x) st_swap64(x)
14714 14714 #endif
14715 14715
14716 14716 /*
14717 14717 * st_interpret_read_pos()
14718 14718 *
14719 14719 * Returns:
14720 14720 * 0 If secsessful.
14721 14721 * EIO If read postion responce data was unuseable or invalid.
14722 14722 * ERANGE If the position of the drive is too large for the read_p_type.
14723 14723 * ENOTTY If the responce data looks invalid for the read position type.
14724 14724 */
14725 14725
14726 14726 static int
14727 14727 st_interpret_read_pos(struct scsi_tape const *un, tapepos_t *dest,
14728 14728 read_p_types type, size_t data_sz, const caddr_t responce, int post_space)
14729 14729 {
14730 14730 int rval = 0;
14731 14731 int flag = 0;
14732 14732 tapepos_t org;
14733 14733
14734 14734 ST_FUNC(ST_DEVINFO, st_interpret_read_pos);
14735 14735
14736 14736 /*
14737 14737 * We expect the position value to change after a space command.
14738 14738 * So if post_space is set we don't print out what has changed.
14739 14739 */
14740 14740 if ((dest != &un->un_pos) && (post_space == 0) &&
14741 14741 (st_recov_sz == sizeof (recov_info))) {
14742 14742 COPY_POS(&org, dest);
14743 14743 flag = 1;
14744 14744 }
14745 14745
14746 14746 /*
14747 14747 * See what kind of read position was requested.
14748 14748 */
14749 14749 switch (type) {
14750 14750
14751 14751 case SHORT_POS: /* Short data format */
14752 14752 {
14753 14753 tape_position_t *pos_info = (tape_position_t *)responce;
14754 14754 uint32_t value;
14755 14755
14756 14756 /* If reserved fields are non zero don't use the data */
14757 14757 if (pos_info->reserved0 || pos_info->reserved1 ||
14758 14758 pos_info->reserved2[0] || pos_info->reserved2[1] ||
14759 14759 pos_info->reserved3) {
14760 14760 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
14761 14761 "Invalid Read Short Position Data returned\n");
14762 14762 rval = EIO;
14763 14763 break;
14764 14764 }
14765 14765 /*
14766 14766 * Position is to large to use this type of read position.
14767 14767 */
14768 14768 if (pos_info->posi_err == 1) {
14769 14769 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
14770 14770 "Drive reported position error\n");
14771 14771 rval = ERANGE;
14772 14772 break;
14773 14773 }
14774 14774 /*
14775 14775 * If your at the begining of partition and end at the same
14776 14776 * time it's very small partition or bad data.
14777 14777 */
14778 14778 if (pos_info->begin_of_part && pos_info->end_of_part) {
14779 14779 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
14780 14780 "SHORT_POS returned begin and end of"
14781 14781 " partition\n");
14782 14782 rval = EIO;
14783 14783 break;
14784 14784 }
14785 14785
14786 14786 if (pos_info->blk_posi_unkwn == 0) {
14787 14787
14788 14788 value = pos_info->host_block;
14789 14789 FIX_ENDIAN32(&value);
14790 14790
14791 14791 /*
14792 14792 * If the tape is rewound the host blcok should be 0.
14793 14793 */
14794 14794 if ((pos_info->begin_of_part == 1) &&
14795 14795 (value != 0)) {
14796 14796 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
14797 14797 "SHORT_POS returned begin of partition"
14798 14798 " but host block was 0x%x\n", value);
14799 14799 rval = EIO;
14800 14800 break;
14801 14801 }
14802 14802
14803 14803 if (dest->lgclblkno != value) {
14804 14804 if (flag)
14805 14805 flag++;
14806 14806 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
14807 14807 "SHORT_POS current logical 0x%"PRIx64" read"
14808 14808 " 0x%x\n", dest->lgclblkno, value);
14809 14809 }
14810 14810
14811 14811 dest->lgclblkno = (uint64_t)value;
14812 14812
14813 14813 /*
14814 14814 * If the begining of partition is true and the
14815 14815 * block number is zero we will beleive that it is
14816 14816 * rewound. Promote the pmode to legacy.
14817 14817 */
14818 14818 if ((pos_info->begin_of_part == 1) &&
14819 14819 (value == 0)) {
14820 14820 dest->blkno = 0;
14821 14821 dest->fileno = 0;
14822 14822 if (dest->pmode != legacy)
14823 14823 dest->pmode = legacy;
14824 14824 /*
14825 14825 * otherwise if the pmode was invalid,
14826 14826 * promote it to logical.
14827 14827 */
14828 14828 } else if (dest->pmode == invalid) {
14829 14829 dest->pmode = logical;
14830 14830 }
14831 14831
14832 14832 if (dest->partition != pos_info->partition_number) {
14833 14833 if (flag)
14834 14834 flag++;
14835 14835 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
14836 14836 "SHORT_POS current partition %d read %d\n",
14837 14837 dest->partition,
14838 14838 pos_info->partition_number);
14839 14839 }
14840 14840
14841 14841 dest->partition = pos_info->partition_number;
14842 14842
14843 14843 } else {
14844 14844 dest->pmode = invalid;
14845 14845 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
14846 14846 "Tape drive reported block position as unknown\n");
14847 14847 }
14848 14848 break;
14849 14849 }
14850 14850
14851 14851 case LONG_POS: /* Long data format */
14852 14852 {
14853 14853 uint64_t value;
14854 14854 tape_position_long_t *long_pos_info =
14855 14855 (tape_position_long_t *)responce;
14856 14856
14857 14857 /* If reserved fields are non zero don't use the data */
14858 14858 if ((long_pos_info->reserved0) ||
14859 14859 (long_pos_info->reserved1) ||
14860 14860 (long_pos_info->reserved2)) {
14861 14861 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
14862 14862 "Invalid Read Long Position Data returned\n");
14863 14863 rval = ENOTTY;
14864 14864 break;
14865 14865 }
14866 14866
14867 14867 /* Is position Valid */
14868 14868 if (long_pos_info->blk_posi_unkwn == 0) {
14869 14869 uint32_t part;
14870 14870
14871 14871 value = long_pos_info->block_number;
14872 14872 FIX_ENDIAN64(&value);
14873 14873
14874 14874 /*
14875 14875 * If it says we are at the begining of partition
14876 14876 * the block value better be 0.
14877 14877 */
14878 14878 if ((long_pos_info->begin_of_part == 1) &&
14879 14879 (value != 0)) {
14880 14880 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
14881 14881 "LONG_POS returned begin of partition but"
14882 14882 " block number was 0x%"PRIx64"\n", value);
14883 14883 rval = ENOTTY;
14884 14884 break;
14885 14885 }
14886 14886 /*
14887 14887 * Can't be at the start and the end of the partition
14888 14888 * at the same time if the partition is larger the 0.
14889 14889 */
14890 14890 if (long_pos_info->begin_of_part &&
14891 14891 long_pos_info->end_of_part) {
14892 14892 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
14893 14893 "LONG_POS returned begin and end of"
14894 14894 " partition\n");
14895 14895 rval = ENOTTY;
14896 14896 break;
14897 14897 }
14898 14898
14899 14899 /*
14900 14900 * If the logical block number is not what we expected.
14901 14901 */
14902 14902 if (dest->lgclblkno != value) {
14903 14903 if (flag)
14904 14904 flag++;
14905 14905 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
14906 14906 "LONG_POS current logical 0x%"PRIx64
14907 14907 " read 0x%"PRIx64"\n",
14908 14908 dest->lgclblkno, value);
14909 14909 }
14910 14910 dest->lgclblkno = value;
14911 14911
14912 14912 /*
14913 14913 * If the begining of partition is true and the
14914 14914 * block number is zero we will beleive that it is
14915 14915 * rewound. Promote the pmode to legacy.
14916 14916 */
14917 14917 if ((long_pos_info->begin_of_part == 1) &&
14918 14918 (long_pos_info->block_number == 0)) {
14919 14919 dest->blkno = 0;
14920 14920 dest->fileno = 0;
14921 14921 if (dest->pmode != legacy)
14922 14922 dest->pmode = legacy;
14923 14923 /*
14924 14924 * otherwise if the pmode was invalid,
14925 14925 * promote it to logical.
14926 14926 */
14927 14927 } else if (dest->pmode == invalid) {
14928 14928 dest->pmode = logical;
14929 14929 }
14930 14930
14931 14931 part = long_pos_info->partition;
14932 14932 FIX_ENDIAN32(&part);
14933 14933 if (dest->partition != part) {
14934 14934 if (flag)
14935 14935 flag++;
14936 14936 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
14937 14937 "LONG_POS current partition %d"
14938 14938 " read %d\n", dest->partition, part);
14939 14939 }
14940 14940 dest->partition = part;
14941 14941 } else {
14942 14942 /*
14943 14943 * If the drive doesn't know location,
14944 14944 * we don't either.
14945 14945 */
14946 14946 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
14947 14947 "Tape drive reported block position as unknown\n");
14948 14948 dest->pmode = invalid;
14949 14949 }
14950 14950
14951 14951 /* Is file position valid */
14952 14952 if (long_pos_info->mrk_posi_unkwn == 0) {
14953 14953 value = long_pos_info->file_number;
14954 14954 FIX_ENDIAN64(&value);
14955 14955 /*
14956 14956 * If it says we are at the begining of partition
14957 14957 * the block value better be 0.
14958 14958 */
14959 14959 if ((long_pos_info->begin_of_part == 1) &&
14960 14960 (value != 0)) {
14961 14961 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
14962 14962 "LONG_POS returned begin of partition but"
14963 14963 " block number was 0x%"PRIx64"\n", value);
14964 14964 rval = ENOTTY;
14965 14965 break;
14966 14966 }
14967 14967 if (((dest->pmode == legacy) ||
14968 14968 (dest->pmode == logical)) &&
14969 14969 (dest->fileno != value)) {
14970 14970 if (flag)
14971 14971 flag++;
14972 14972 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
14973 14973 "LONG_POS fileno 0x%"PRIx64
14974 14974 " not un_pos %x\n", value,
14975 14975 dest->fileno);
14976 14976 } else if (dest->pmode == invalid) {
14977 14977 dest->pmode = logical;
14978 14978 }
14979 14979 dest->fileno = (int32_t)value;
14980 14980 }
14981 14981
14982 14982 if (dest->pmode != invalid && long_pos_info->end_of_part) {
14983 14983 dest->eof = ST_EOT;
14984 14984 }
14985 14985
14986 14986 break;
14987 14987 }
14988 14988
14989 14989 case EXT_POS: /* Extended data format */
14990 14990 {
14991 14991 uint64_t value;
14992 14992 uint16_t len;
14993 14993 tape_position_ext_t *ext_pos_info =
14994 14994 (tape_position_ext_t *)responce;
14995 14995
14996 14996 /* Make sure that there is enough data there */
14997 14997 if (data_sz < 16) {
14998 14998 break;
14999 14999 }
15000 15000
15001 15001 /* If reserved fields are non zero don't use the data */
15002 15002 if (ext_pos_info->reserved0 || ext_pos_info->reserved1) {
15003 15003 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
15004 15004 "EXT_POS reserved fields not zero\n");
15005 15005 rval = ENOTTY;
15006 15006 break;
15007 15007 }
15008 15008
15009 15009 /*
15010 15010 * In the unlikely event of overflowing 64 bits of position.
15011 15011 */
15012 15012 if (ext_pos_info->posi_err != 0) {
15013 15013 rval = ERANGE;
15014 15014 break;
15015 15015 }
15016 15016
15017 15017 len = ext_pos_info->parameter_len;
15018 15018 FIX_ENDIAN16(&len);
15019 15019
15020 15020 if (len != 0x1c) {
15021 15021 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
15022 15022 "EXT_POS parameter_len should be 0x1c was 0x%x\n",
15023 15023 len);
15024 15024 rval = ENOTTY;
15025 15025 break;
15026 15026 }
15027 15027
15028 15028 /* Is block position information valid */
15029 15029 if (ext_pos_info->blk_posi_unkwn == 0) {
15030 15030
15031 15031 value = ext_pos_info->host_block;
15032 15032 FIX_ENDIAN64(&value);
15033 15033 if ((ext_pos_info->begin_of_part == 1) &&
15034 15034 (value != 0)) {
15035 15035 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
15036 15036 "EXT_POS returned begining of partition but"
15037 15037 " the host block was 0x%"PRIx64"\n", value);
15038 15038 rval = ENOTTY;
15039 15039 break;
15040 15040 }
15041 15041
15042 15042 if (dest->lgclblkno != value) {
15043 15043 if (flag)
15044 15044 flag++;
15045 15045 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
15046 15046 "EXT_POS current logical 0x%"PRIx64
15047 15047 " read 0x%"PRIx64"\n",
15048 15048 dest->lgclblkno, value);
15049 15049 }
15050 15050 dest->lgclblkno = value;
15051 15051
15052 15052 /*
15053 15053 * If the begining of partition is true and the
15054 15054 * block number is zero we will beleive that it is
15055 15055 * rewound. Promote the pmode to legacy.
15056 15056 */
15057 15057 if ((ext_pos_info->begin_of_part == 1) &&
15058 15058 (ext_pos_info->host_block == 0)) {
15059 15059 dest->blkno = 0;
15060 15060 dest->fileno = 0;
15061 15061 if (dest->pmode != legacy) {
15062 15062 dest->pmode = legacy;
15063 15063 }
15064 15064 /*
15065 15065 * otherwise if the pmode was invalid,
15066 15066 * promote it to logical.
15067 15067 */
15068 15068 } else if (dest->pmode == invalid) {
15069 15069 dest->pmode = logical;
15070 15070 }
15071 15071
15072 15072 if (dest->partition != ext_pos_info->partition) {
15073 15073 if (flag)
15074 15074 flag++;
15075 15075 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
15076 15076 "EXT_POS current partition %d read %d\n",
15077 15077 dest->partition,
15078 15078 ext_pos_info->partition);
15079 15079 }
15080 15080 dest->partition = ext_pos_info->partition;
15081 15081
15082 15082 } else {
15083 15083 dest->pmode = invalid;
15084 15084 }
15085 15085 break;
15086 15086 }
15087 15087
15088 15088 default:
15089 15089 ST_DEBUG(ST_DEVINFO, st_label, CE_PANIC,
15090 15090 "Got unexpected SCMD_READ_POSITION type %d\n", type);
15091 15091 rval = EIO;
15092 15092 }
15093 15093
15094 15094 if ((flag > 1) && (rval == 0) && (org.pmode != invalid)) {
15095 15095 st_print_position(ST_DEVINFO, st_label, CE_NOTE,
15096 15096 "position read in", &org);
15097 15097 st_print_position(ST_DEVINFO, st_label, CE_NOTE,
15098 15098 "position read out", dest);
15099 15099 }
15100 15100
15101 15101 return (rval);
15102 15102 }
15103 15103
15104 15104 static int
15105 15105 st_logical_block_locate(struct scsi_tape *un, ubufunc_t ubf, tapepos_t *pos,
15106 15106 uint64_t lblk, uchar_t partition)
15107 15107 {
15108 15108 int rval;
15109 15109 char cdb[CDB_GROUP4];
15110 15110 struct uscsi_cmd *cmd;
15111 15111 struct scsi_extended_sense sense;
15112 15112 bufunc_t bf = (ubf == st_uscsi_cmd) ? st_cmd : st_rcmd;
15113 15113
15114 15114 ST_FUNC(ST_DEVINFO, st_logical_block_locate);
15115 15115 /*
15116 15116 * Not sure what to do when doing recovery and not wanting
15117 15117 * to update un_pos
15118 15118 */
15119 15119
15120 15120 cmd = kmem_zalloc(sizeof (struct uscsi_cmd), KM_SLEEP);
15121 15121
15122 15122 if (lblk <= INT32_MAX) {
15123 15123 cmd->uscsi_cdblen = CDB_GROUP1;
15124 15124 cdb[0] = SCMD_LOCATE;
15125 15125 cdb[1] = pos->partition == partition ? 0 : 2;
15126 15126 cdb[2] = 0;
15127 15127 cdb[3] = (char)(lblk >> 24);
15128 15128 cdb[4] = (char)(lblk >> 16);
15129 15129 cdb[5] = (char)(lblk >> 8);
15130 15130 cdb[6] = (char)(lblk);
15131 15131 cdb[7] = 0;
15132 15132 cdb[8] = partition;
15133 15133 cdb[9] = 0;
15134 15134 } else {
15135 15135 /*
15136 15136 * If the drive doesn't give a 64 bit read position data
15137 15137 * it is unlikely it will accept 64 bit locates.
15138 15138 */
15139 15139 if (un->un_read_pos_type != LONG_POS) {
15140 15140 kmem_free(cmd, sizeof (struct uscsi_cmd));
15141 15141 return (ERANGE);
15142 15142 }
15143 15143 cmd->uscsi_cdblen = CDB_GROUP4;
15144 15144 cdb[0] = (char)SCMD_LOCATE_G4;
15145 15145 cdb[1] = pos->partition == partition ? 0 : 2;
15146 15146 cdb[2] = 0;
15147 15147 cdb[3] = partition;
15148 15148 cdb[4] = (char)(lblk >> 56);
15149 15149 cdb[5] = (char)(lblk >> 48);
15150 15150 cdb[6] = (char)(lblk >> 40);
15151 15151 cdb[7] = (char)(lblk >> 32);
15152 15152 cdb[8] = (char)(lblk >> 24);
15153 15153 cdb[9] = (char)(lblk >> 16);
15154 15154 cdb[10] = (char)(lblk >> 8);
15155 15155 cdb[11] = (char)(lblk);
15156 15156 cdb[12] = 0;
15157 15157 cdb[13] = 0;
15158 15158 cdb[14] = 0;
15159 15159 cdb[15] = 0;
15160 15160 }
15161 15161
15162 15162
15163 15163 cmd->uscsi_flags = USCSI_WRITE | USCSI_DIAGNOSE | USCSI_RQENABLE;
15164 15164 cmd->uscsi_rqbuf = (caddr_t)&sense;
15165 15165 cmd->uscsi_rqlen = sizeof (sense);
15166 15166 cmd->uscsi_timeout = un->un_dp->space_timeout;
15167 15167 cmd->uscsi_cdb = cdb;
15168 15168
15169 15169 rval = ubf(un, cmd, FKIOCTL);
15170 15170
15171 15171 pos->pmode = logical;
15172 15172 pos->eof = ST_NO_EOF;
15173 15173
15174 15174 if (lblk > INT32_MAX) {
15175 15175 /*
15176 15176 * XXX This is a work around till we handle Descriptor format
15177 15177 * sense data. Since we are sending a command where the standard
15178 15178 * sense data can not correctly represent a correct residual in
15179 15179 * 4 bytes.
15180 15180 */
15181 15181 if (un->un_status == KEY_ILLEGAL_REQUEST) {
15182 15182 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
15183 15183 "Big LOCATE ILLEGAL_REQUEST: rval = %d\n", rval);
15184 15184 /* Doesn't like big locate command */
15185 15185 un->un_status = 0;
15186 15186 rval = ERANGE;
15187 15187 } else if ((un->un_pos.pmode == invalid) || (rval != 0)) {
15188 15188 /* Aborted big locate command */
15189 15189 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
15190 15190 "Big LOCATE resulted in invalid pos: rval = %d\n",
15191 15191 rval);
15192 15192 un->un_status = 0;
15193 15193 rval = EIO;
15194 15194 } else if (st_update_block_pos(un, bf, 1)) {
15195 15195 /* read position failed */
15196 15196 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
15197 15197 "Big LOCATE and read pos: rval = %d\n", rval);
15198 15198 rval = EIO;
15199 15199 } else if (lblk > un->un_pos.lgclblkno) {
15200 15200 /* read position worked but position was not expected */
15201 15201 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
15202 15202 "Big LOCATE and recover read less then desired 0x%"
15203 15203 PRIx64"\n", un->un_pos.lgclblkno);
15204 15204 un->un_err_resid = lblk - un->un_pos.lgclblkno;
15205 15205 un->un_status = KEY_BLANK_CHECK;
15206 15206 rval = ESPIPE;
15207 15207 } else if (lblk == un->un_pos.lgclblkno) {
15208 15208 /* read position was what was expected */
15209 15209 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
15210 15210 "Big LOCATE and recover seems to have worked\n");
15211 15211 un->un_err_resid = 0;
15212 15212 rval = 0;
15213 15213 } else {
15214 15214 ST_DEBUG(ST_DEVINFO, st_label, CE_PANIC,
15215 15215 "BIGLOCATE end up going backwards");
15216 15216 un->un_err_resid = lblk;
15217 15217 rval = EIO;
15218 15218 }
15219 15219
15220 15220 } else if (rval == 0) {
15221 15221 /* Worked as requested */
15222 15222 pos->lgclblkno = lblk;
15223 15223
15224 15224 } else if (((cmd->uscsi_status & ST_STATUS_MASK) == STATUS_CHECK) &&
15225 15225 (cmd->uscsi_resid != 0)) {
15226 15226 /* Got part way there but wasn't enough blocks on tape */
15227 15227 pos->lgclblkno = lblk - cmd->uscsi_resid;
15228 15228 un->un_err_resid = cmd->uscsi_resid;
15229 15229 un->un_status = KEY_BLANK_CHECK;
15230 15230 rval = ESPIPE;
15231 15231
15232 15232 } else if (st_update_block_pos(un, bf, 1) == 0) {
15233 15233 /* Got part way there but drive didn't tell what we missed by */
15234 15234 un->un_err_resid = lblk - pos->lgclblkno;
15235 15235 un->un_status = KEY_BLANK_CHECK;
15236 15236 rval = ESPIPE;
15237 15237
15238 15238 } else {
15239 15239 scsi_log(ST_DEVINFO, st_label, SCSI_DEBUG,
15240 15240 "Failed LOCATE and recover pos: rval = %d status = %d\n",
15241 15241 rval, cmd->uscsi_status);
15242 15242 un->un_err_resid = lblk;
15243 15243 un->un_status = KEY_ILLEGAL_REQUEST;
15244 15244 pos->pmode = invalid;
15245 15245 rval = EIO;
15246 15246 }
15247 15247
15248 15248 kmem_free(cmd, sizeof (struct uscsi_cmd));
15249 15249
15250 15250 return (rval);
15251 15251 }
15252 15252
15253 15253 static int
15254 15254 st_mtfsf_ioctl(struct scsi_tape *un, int64_t files)
15255 15255 {
15256 15256 int rval;
15257 15257
15258 15258 ST_FUNC(ST_DEVINFO, st_mtfsf_ioctl);
15259 15259
15260 15260
15261 15261 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
15262 15262 "st_mtfsf_ioctl: count=%"PRIx64", eof=%x\n", files, un->un_pos.eof);
15263 15263 #if 0
15264 15264 if ((IN_EOF(un->un_pos)) && (files == 1)) {
15265 15265 un->un_pos.fileno++;
15266 15266 un->un_pos.blkno = 0;
15267 15267 return (0);
15268 15268 }
15269 15269 #endif
15270 15270 /* pmode == invalid already handled */
15271 15271 if (un->un_pos.pmode == legacy) {
15272 15272 /*
15273 15273 * forward space over filemark
15274 15274 *
15275 15275 * For ASF we allow a count of 0 on fsf which means
15276 15276 * we just want to go to beginning of current file.
15277 15277 * Equivalent to "nbsf(0)" or "bsf(1) + fsf".
15278 15278 * Allow stepping over double fmk with reel
15279 15279 */
15280 15280 if ((un->un_pos.eof >= ST_EOT) &&
15281 15281 (files > 0) &&
15282 15282 ((un->un_dp->options & ST_REEL) == 0)) {
15283 15283 /* we're at EOM */
15284 15284 un->un_err_resid = files;
15285 15285 un->un_status = KEY_BLANK_CHECK;
15286 15286 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
15287 15287 "st_mtfsf_ioctl: EIO : MTFSF at EOM");
15288 15288 return (EIO);
15289 15289 }
15290 15290
15291 15291 /*
15292 15292 * physical tape position may not be what we've been
15293 15293 * telling the user; adjust the request accordingly
15294 15294 */
15295 15295 if (IN_EOF(un->un_pos)) {
15296 15296 un->un_pos.fileno++;
15297 15297 un->un_pos.blkno = 0;
15298 15298 /*
15299 15299 * For positive direction case, we're now covered.
15300 15300 * For zero or negative direction, we're covered
15301 15301 * (almost)
15302 15302 */
15303 15303 files--;
15304 15304 }
15305 15305
15306 15306 }
15307 15307
15308 15308 if (st_check_density_or_wfm(un->un_dev, 1, B_READ, STEPBACK)) {
15309 15309 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
15310 15310 "st_mtfsf_ioctl: EIO : MTFSF density/wfm failed");
15311 15311 return (EIO);
15312 15312 }
15313 15313
15314 15314
15315 15315 /*
15316 15316 * Forward space file marks.
15317 15317 * We leave ourselves at block zero
15318 15318 * of the target file number.
15319 15319 */
15320 15320 if (files < 0) {
15321 15321 rval = st_backward_space_files(un, -files, 0);
15322 15322 } else {
15323 15323 rval = st_forward_space_files(un, files);
15324 15324 }
15325 15325
15326 15326 return (rval);
15327 15327 }
15328 15328
15329 15329 static int
15330 15330 st_forward_space_files(struct scsi_tape *un, int64_t count)
15331 15331 {
15332 15332 int rval;
15333 15333
15334 15334 ST_FUNC(ST_DEVINFO, st_forward_space_files);
15335 15335
15336 15336 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
15337 15337 "fspace: count=%"PRIx64", eof=%x\n", count, un->un_pos.eof);
15338 15338
15339 15339 ASSERT(count >= 0);
15340 15340 ASSERT(un->un_pos.pmode != invalid);
15341 15341
15342 15342 /*
15343 15343 * A space with a count of zero means take me to the start of file.
15344 15344 */
15345 15345 if (count == 0) {
15346 15346
15347 15347 /* Hay look were already there */
15348 15348 if (un->un_pos.pmode == legacy && un->un_pos.blkno == 0) {
15349 15349 un->un_err_resid = 0;
15350 15350 COPY_POS(&un->un_err_pos, &un->un_pos);
15351 15351 return (0);
15352 15352 }
15353 15353
15354 15354 /*
15355 15355 * Well we are in the first file.
15356 15356 * A rewind will get to the start.
15357 15357 */
15358 15358 if (un->un_pos.pmode == legacy && un->un_pos.fileno == 0) {
15359 15359 rval = st_cmd(un, SCMD_REWIND, 0, SYNC_CMD);
15360 15360
15361 15361 /*
15362 15362 * Can we backspace to get there?
15363 15363 * This should work in logical mode.
15364 15364 */
15365 15365 } else if (un->un_dp->options & ST_BSF) {
15366 15366 rval = st_space_to_begining_of_file(un);
15367 15367
15368 15368 /*
15369 15369 * Can't back space but current file number is known,
15370 15370 * So rewind and space from the begining of the partition.
15371 15371 */
15372 15372 } else if (un->un_pos.pmode == legacy) {
15373 15373 rval = st_scenic_route_to_begining_of_file(un,
15374 15374 un->un_pos.fileno);
15375 15375
15376 15376 /*
15377 15377 * pmode is logical and ST_BSF is not set.
15378 15378 * The LONG_POS read position contains the fileno.
15379 15379 * If the read position works, rewind and space.
15380 15380 */
15381 15381 } else if (un->un_read_pos_type == LONG_POS) {
15382 15382 rval = st_cmd(un, SCMD_READ_POSITION, 0, SYNC_CMD);
15383 15383 if (rval) {
15384 15384 /*
15385 15385 * We didn't get the file position from the
15386 15386 * read position command.
15387 15387 * We are going to trust the drive to backspace
15388 15388 * and then position after the filemark.
15389 15389 */
15390 15390 rval = st_space_to_begining_of_file(un);
15391 15391 }
15392 15392 rval = st_interpret_read_pos(un, &un->un_pos, LONG_POS,
15393 15393 32, (caddr_t)un->un_read_pos_data, 0);
15394 15394 if ((rval) && (un->un_pos.pmode == invalid)) {
15395 15395 rval = st_space_to_begining_of_file(un);
15396 15396 } else {
15397 15397 rval = st_scenic_route_to_begining_of_file(un,
15398 15398 un->un_pos.fileno);
15399 15399 }
15400 15400 } else {
15401 15401 rval = EIO;
15402 15402 }
15403 15403 /*
15404 15404 * If something didn't work we are lost
15405 15405 */
15406 15406 if (rval != 0) {
15407 15407 un->un_pos.pmode = invalid;
15408 15408 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
15409 15409 "st_mtioctop : EIO : fspace pmode invalid");
15410 15410
15411 15411 rval = EIO;
15412 15412 }
15413 15413
15414 15414 } else {
15415 15415 rval = st_space_fmks(un, count);
15416 15416 }
15417 15417
15418 15418 if (rval != EIO && count < 0) {
15419 15419 /*
15420 15420 * we came here with a count < 0; we now need
15421 15421 * to skip back to end up before the filemark
15422 15422 */
15423 15423 rval = st_backward_space_files(un, 1, 1);
15424 15424 }
15425 15425
15426 15426 return (rval);
15427 15427 }
15428 15428
15429 15429 static int
15430 15430 st_scenic_route_to_begining_of_file(struct scsi_tape *un, int32_t fileno)
15431 15431 {
15432 15432 int rval;
15433 15433
15434 15434 ST_FUNC(ST_DEVINFO, st_scenic_route_to_begining_of_file);
15435 15435
15436 15436 if (st_cmd(un, SCMD_REWIND, 0, SYNC_CMD)) {
15437 15437 rval = EIO;
15438 15438 } else if (st_cmd(un, SCMD_SPACE, Fmk(fileno), SYNC_CMD)) {
15439 15439 rval = EIO;
15440 15440 }
15441 15441
15442 15442 return (rval);
15443 15443 }
15444 15444
15445 15445 static int
15446 15446 st_space_to_begining_of_file(struct scsi_tape *un)
15447 15447 {
15448 15448 int rval;
15449 15449
15450 15450 ST_FUNC(ST_DEVINFO, st_space_to_begining_of_file);
15451 15451
15452 15452 /*
15453 15453 * Back space of the file at the begining of the file.
15454 15454 */
15455 15455 rval = st_cmd(un, SCMD_SPACE, Fmk(-1), SYNC_CMD);
15456 15456 if (rval) {
15457 15457 rval = EIO;
15458 15458 return (rval);
15459 15459 }
15460 15460
15461 15461 /*
15462 15462 * Other interesting answers might be crashed BOT which isn't bad.
15463 15463 */
15464 15464 if (un->un_status == SUN_KEY_BOT) {
15465 15465 return (rval);
15466 15466 }
15467 15467
15468 15468 un->un_running.pmode = invalid;
15469 15469
15470 15470 /*
15471 15471 * Now we are on the BOP side of the filemark. Forward space to
15472 15472 * the EOM side and we are at the begining of the file.
15473 15473 */
15474 15474 rval = st_cmd(un, SCMD_SPACE, Fmk(1), SYNC_CMD);
15475 15475 if (rval) {
15476 15476 rval = EIO;
15477 15477 }
15478 15478
15479 15479 return (rval);
15480 15480 }
15481 15481
15482 15482 static int
15483 15483 st_mtfsr_ioctl(struct scsi_tape *un, int64_t count)
15484 15484 {
15485 15485
15486 15486 ST_FUNC(ST_DEVINFO, st_mtfsr_ioctl);
15487 15487
15488 15488 /*
15489 15489 * forward space to inter-record gap
15490 15490 *
15491 15491 */
15492 15492
15493 15493 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
15494 15494 "st_ioctl_fsr: count=%"PRIx64", eof=%x\n", count, un->un_pos.eof);
15495 15495
15496 15496 if (un->un_pos.pmode == legacy) {
15497 15497 /*
15498 15498 * If were are at end of tape and count is forward.
15499 15499 * Return blank check.
15500 15500 */
15501 15501 if ((un->un_pos.eof >= ST_EOT) && (count > 0)) {
15502 15502 /* we're at EOM */
15503 15503 un->un_err_resid = count;
15504 15504 un->un_status = KEY_BLANK_CHECK;
15505 15505 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
15506 15506 "st_mtfsr_ioctl: EIO : MTFSR eof > ST_EOT");
15507 15507 return (EIO);
15508 15508 }
15509 15509
15510 15510 /*
15511 15511 * If count is zero there is nothing to do.
15512 15512 */
15513 15513 if (count == 0) {
15514 15514 un->un_err_pos.fileno = un->un_pos.fileno;
15515 15515 un->un_err_pos.blkno = un->un_pos.blkno;
15516 15516 un->un_err_resid = 0;
15517 15517 if (IN_EOF(un->un_pos) && SVR4_BEHAVIOR) {
15518 15518 un->un_status = SUN_KEY_EOF;
15519 15519 }
15520 15520 return (0);
15521 15521 }
15522 15522
15523 15523 /*
15524 15524 * physical tape position may not be what we've been
15525 15525 * telling the user; adjust the position accordingly
15526 15526 */
15527 15527 if (IN_EOF(un->un_pos)) {
15528 15528 daddr_t blkno = un->un_pos.blkno;
15529 15529 int fileno = un->un_pos.fileno;
15530 15530
15531 15531 optype lastop = un->un_lastop;
15532 15532 if (st_cmd(un, SCMD_SPACE, Fmk(-1), SYNC_CMD)
15533 15533 == -1) {
15534 15534 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
15535 15535 "st_mtfsr_ioctl:EIO:MTFSR count && IN_EOF");
15536 15536 return (EIO);
15537 15537 }
15538 15538
15539 15539 un->un_pos.blkno = blkno;
15540 15540 un->un_pos.fileno = fileno;
15541 15541 un->un_lastop = lastop;
15542 15542 }
15543 15543 }
15544 15544
15545 15545 if (st_check_density_or_wfm(un->un_dev, 1, B_READ, STEPBACK)) {
15546 15546 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
15547 15547 "st_mtfsr_ioctl: EIO : MTFSR st_check_den");
15548 15548 return (EIO);
15549 15549 }
15550 15550
15551 15551 return (st_space_records(un, count));
15552 15552 }
15553 15553
15554 15554 static int
15555 15555 st_space_records(struct scsi_tape *un, int64_t count)
15556 15556 {
15557 15557 int64_t dblk;
15558 15558 int rval = 0;
15559 15559
15560 15560 ST_FUNC(ST_DEVINFO, st_space_records);
15561 15561
15562 15562 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
15563 15563 "st_space_records: count=%"PRIx64", eof=%x\n",
15564 15564 count, un->un_pos.eof);
15565 15565
15566 15566 if (un->un_pos.pmode == logical) {
15567 15567 rval = st_cmd(un, SCMD_SPACE, Blk(count), SYNC_CMD);
15568 15568 if (rval != 0) {
15569 15569 rval = EIO;
15570 15570 }
15571 15571 return (rval);
15572 15572 }
15573 15573
15574 15574 dblk = count + un->un_pos.blkno;
15575 15575
15576 15576 /* Already there */
15577 15577 if (dblk == un->un_pos.blkno) {
15578 15578 un->un_err_resid = 0;
15579 15579 COPY_POS(&un->un_err_pos, &un->un_pos);
15580 15580 return (0);
15581 15581 }
15582 15582
15583 15583 /*
15584 15584 * If the destination block is forward
15585 15585 * or the drive will backspace records.
15586 15586 */
15587 15587 if (un->un_pos.blkno < dblk || (un->un_dp->options & ST_BSR)) {
15588 15588 /*
15589 15589 * If we're spacing forward, or the device can
15590 15590 * backspace records, we can just use the SPACE
15591 15591 * command.
15592 15592 */
15593 15593 dblk -= un->un_pos.blkno;
15594 15594 if (st_cmd(un, SCMD_SPACE, Blk(dblk), SYNC_CMD)) {
15595 15595 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
15596 15596 "st_space_records:EIO:space_records can't spc");
15597 15597 rval = EIO;
15598 15598 } else if (un->un_pos.eof >= ST_EOF_PENDING) {
15599 15599 /*
15600 15600 * check if we hit BOT/EOT
15601 15601 */
15602 15602 if (dblk < 0 && un->un_pos.eof == ST_EOM) {
15603 15603 un->un_status = SUN_KEY_BOT;
15604 15604 un->un_pos.eof = ST_NO_EOF;
15605 15605 } else if (dblk < 0 &&
15606 15606 un->un_pos.eof == ST_EOF_PENDING) {
15607 15607 int residue = un->un_err_resid;
15608 15608 /*
15609 15609 * we skipped over a filemark
15610 15610 * and need to go forward again
15611 15611 */
15612 15612 if (st_cmd(un, SCMD_SPACE, Fmk(1), SYNC_CMD)) {
15613 15613 ST_DEBUG2(ST_DEVINFO, st_label,
15614 15614 SCSI_DEBUG, "st_space_records: EIO"
15615 15615 " : can't space #2");
15616 15616 rval = EIO;
15617 15617 }
15618 15618 un->un_err_resid = residue;
15619 15619 }
15620 15620 if (rval == 0) {
15621 15621 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
15622 15622 "st_space_records: EIO : space_rec rval"
15623 15623 " == 0");
15624 15624 rval = EIO;
15625 15625 }
15626 15626 }
15627 15627 } else {
15628 15628 /*
15629 15629 * else we rewind, space forward across filemarks to
15630 15630 * the desired file, and then space records to the
15631 15631 * desired block.
15632 15632 */
15633 15633
15634 15634 int dfile = un->un_pos.fileno; /* save current file */
15635 15635
15636 15636 if (dblk < 0) {
15637 15637 /*
15638 15638 * Wups - we're backing up over a filemark
15639 15639 */
15640 15640 if (un->un_pos.blkno != 0 &&
15641 15641 (st_cmd(un, SCMD_REWIND, 0, SYNC_CMD) ||
15642 15642 st_cmd(un, SCMD_SPACE, Fmk(dfile), SYNC_CMD))) {
15643 15643 un->un_pos.pmode = invalid;
15644 15644 }
15645 15645 un->un_err_resid = -dblk;
15646 15646 if (un->un_pos.fileno == 0 && un->un_pos.blkno == 0) {
15647 15647 un->un_status = SUN_KEY_BOT;
15648 15648 un->un_pos.eof = ST_NO_EOF;
15649 15649 } else if (un->un_pos.fileno > 0) {
15650 15650 un->un_status = SUN_KEY_EOF;
15651 15651 un->un_pos.eof = ST_NO_EOF;
15652 15652 }
15653 15653 COPY_POS(&un->un_err_pos, &un->un_pos);
15654 15654 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
15655 15655 "st_space_records:EIO:space_records : dblk < 0");
15656 15656 rval = EIO;
15657 15657 } else if (st_cmd(un, SCMD_REWIND, 0, SYNC_CMD) ||
15658 15658 st_cmd(un, SCMD_SPACE, Fmk(dfile), SYNC_CMD) ||
15659 15659 st_cmd(un, SCMD_SPACE, Blk(dblk), SYNC_CMD)) {
15660 15660 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
15661 15661 "st_space_records: EIO :space_records : rewind "
15662 15662 "and space failed");
15663 15663 un->un_pos.pmode = invalid;
15664 15664 rval = EIO;
15665 15665 }
15666 15666 }
15667 15667
15668 15668 return (rval);
15669 15669 }
15670 15670
15671 15671 static int
15672 15672 st_mtbsf_ioctl(struct scsi_tape *un, int64_t files)
15673 15673 {
15674 15674 ST_FUNC(ST_DEVINFO, st_mtbsf_ioctl);
15675 15675
15676 15676 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
15677 15677 "st_mtbsf_ioctl: count=%"PRIx64", eof=%x\n", files, un->un_pos.eof);
15678 15678 /*
15679 15679 * backward space of file filemark (1/2" and 8mm)
15680 15680 * tape position will end on the beginning of tape side
15681 15681 * of the desired file mark
15682 15682 */
15683 15683 if ((un->un_dp->options & ST_BSF) == 0) {
15684 15684 return (ENOTTY);
15685 15685 }
15686 15686
15687 15687 if (un->un_pos.pmode == legacy) {
15688 15688
15689 15689 /*
15690 15690 * If a negative count (which implies a forward space op)
15691 15691 * is specified, and we're at logical or physical eot,
15692 15692 * bounce the request.
15693 15693 */
15694 15694
15695 15695 if (un->un_pos.eof >= ST_EOT && files < 0) {
15696 15696 un->un_err_resid = files;
15697 15697 un->un_status = SUN_KEY_EOT;
15698 15698 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
15699 15699 "st_ioctl_mt_bsf : EIO : MTBSF : eof > ST_EOF");
15700 15700 return (EIO);
15701 15701 }
15702 15702 /*
15703 15703 * physical tape position may not be what we've been
15704 15704 * telling the user; adjust the request accordingly
15705 15705 */
15706 15706 if (IN_EOF(un->un_pos)) {
15707 15707 un->un_pos.fileno++;
15708 15708 un->un_pos.blkno = 0;
15709 15709 files++;
15710 15710 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
15711 15711 "st_mtbsf_ioctl in eof: count=%"PRIx64", op=%x\n",
15712 15712 files, MTBSF);
15713 15713
15714 15714 }
15715 15715 }
15716 15716
15717 15717 if (st_check_density_or_wfm(un->un_dev, 1, 0, STEPBACK)) {
15718 15718 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
15719 15719 "st_ioctl : EIO : MTBSF : check den wfm");
15720 15720 return (EIO);
15721 15721 }
15722 15722
15723 15723 if (files <= 0) {
15724 15724 /*
15725 15725 * for a negative count, we need to step forward
15726 15726 * first and then step back again
15727 15727 */
15728 15728 files = -files + 1;
15729 15729 return (st_forward_space_files(un, files));
15730 15730 }
15731 15731 return (st_backward_space_files(un, files, 1));
15732 15732 }
15733 15733
15734 15734 static int
15735 15735 st_backward_space_files(struct scsi_tape *un, int64_t count, int infront)
15736 15736 {
15737 15737 int64_t end_fileno;
15738 15738 int64_t skip_cnt;
15739 15739 int rval = 0;
15740 15740
15741 15741 ST_FUNC(ST_DEVINFO, st_backward_space_files);
15742 15742
15743 15743 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
15744 15744 "st_backward_space_files: count=%"PRIx64" eof=%x\n",
15745 15745 count, un->un_pos.eof);
15746 15746 /*
15747 15747 * Backspace files (MTNBSF): infront == 0
15748 15748 *
15749 15749 * For tapes that can backspace, backspace
15750 15750 * count+1 filemarks and then run forward over
15751 15751 * a filemark
15752 15752 *
15753 15753 * For tapes that can't backspace,
15754 15754 * calculate desired filenumber
15755 15755 * (un->un_pos.fileno - count), rewind,
15756 15756 * and then space forward this amount
15757 15757 *
15758 15758 * Backspace filemarks (MTBSF) infront == 1
15759 15759 *
15760 15760 * For tapes that can backspace, backspace count
15761 15761 * filemarks
15762 15762 *
15763 15763 * For tapes that can't backspace, calculate
15764 15764 * desired filenumber (un->un_pos.fileno - count),
15765 15765 * add 1, rewind, space forward this amount,
15766 15766 * and mark state as ST_EOF_PENDING appropriately.
15767 15767 */
15768 15768
15769 15769 if (un->un_pos.pmode == logical) {
15770 15770
15771 15771 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
15772 15772 "st_backward_space_files: mt_op=%x count=%"PRIx64
15773 15773 "lgclblkno=%"PRIx64"\n", infront?MTBSF:MTNBSF, count,
15774 15774 un->un_pos.lgclblkno);
15775 15775
15776 15776
15777 15777 /* In case a drive that won't back space gets in logical mode */
15778 15778 if ((un->un_dp->options & ST_BSF) == 0) {
15779 15779 rval = EIO;
15780 15780 return (rval);
15781 15781 }
15782 15782 if ((infront == 1) &&
15783 15783 (st_cmd(un, SCMD_SPACE, Fmk(-count), SYNC_CMD))) {
15784 15784 rval = EIO;
15785 15785 return (rval);
15786 15786 } else if ((infront == 0) &&
15787 15787 (st_cmd(un, SCMD_SPACE, Fmk((-count)-1), SYNC_CMD)) &&
15788 15788 (st_cmd(un, SCMD_SPACE, Fmk(1), SYNC_CMD))) {
15789 15789 rval = EIO;
15790 15790 return (rval);
15791 15791 }
15792 15792 return (rval);
15793 15793 }
15794 15794
15795 15795 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
15796 15796 "st_backward_space_files: mt_op=%x count=%"PRIx64
15797 15797 "fileno=%x blkno=%x\n",
15798 15798 infront?MTBSF:MTNBSF, count, un->un_pos.fileno, un->un_pos.blkno);
15799 15799
15800 15800
15801 15801
15802 15802 /*
15803 15803 * Handle the simple case of BOT
15804 15804 * playing a role in these cmds.
15805 15805 * We do this by calculating the
15806 15806 * ending file number. If the ending
15807 15807 * file is < BOT, rewind and set an
15808 15808 * error and mark resid appropriately.
15809 15809 * If we're backspacing a file (not a
15810 15810 * filemark) and the target file is
15811 15811 * the first file on the tape, just
15812 15812 * rewind.
15813 15813 */
15814 15814
15815 15815 /* figure expected destination of this SPACE command */
15816 15816 end_fileno = un->un_pos.fileno - count;
15817 15817
15818 15818 /*
15819 15819 * Would the end effect of this SPACE be the same as rewinding?
15820 15820 * If so just rewind instead.
15821 15821 */
15822 15822 if ((infront != 0) && (end_fileno < 0) ||
15823 15823 (infront == 0) && (end_fileno <= 0)) {
15824 15824 if (st_cmd(un, SCMD_REWIND, 0, SYNC_CMD)) {
15825 15825 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
15826 15826 "st_backward_space_files: EIO : "
15827 15827 "rewind in lou of BSF failed\n");
15828 15828 rval = EIO;
15829 15829 }
15830 15830 if (end_fileno < 0) {
15831 15831 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
15832 15832 "st_backward_space_files: EIO : "
15833 15833 "back space file greater then fileno\n");
15834 15834 rval = EIO;
15835 15835 un->un_err_resid = -end_fileno;
15836 15836 un->un_status = SUN_KEY_BOT;
15837 15837 }
15838 15838 return (rval);
15839 15839 }
15840 15840
15841 15841 if (un->un_dp->options & ST_BSF) {
15842 15842 skip_cnt = 1 - infront;
15843 15843 /*
15844 15844 * If we are going to end up at the beginning
15845 15845 * of the file, we have to space one extra file
15846 15846 * first, and then space forward later.
15847 15847 */
15848 15848 end_fileno = -(count + skip_cnt);
15849 15849 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
15850 15850 "skip_cnt=%"PRIx64", tmp=%"PRIx64"\n",
15851 15851 skip_cnt, end_fileno);
15852 15852 if (st_cmd(un, SCMD_SPACE, Fmk(end_fileno), SYNC_CMD)) {
15853 15853 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
15854 15854 "st_backward_space_files:EIO:back space fm failed");
15855 15855 rval = EIO;
15856 15856 }
15857 15857 } else {
15858 15858 if (st_cmd(un, SCMD_REWIND, 0, SYNC_CMD)) {
15859 15859 rval = EIO;
15860 15860 } else {
15861 15861 skip_cnt = end_fileno + infront;
15862 15862 }
15863 15863 }
15864 15864
15865 15865 /*
15866 15866 * If we have to space forward, do so...
15867 15867 */
15868 15868 ST_DEBUG6(ST_DEVINFO, st_label, SCSI_DEBUG,
15869 15869 "space forward skip_cnt=%"PRIx64", rval=%x\n", skip_cnt, rval);
15870 15870
15871 15871 if (rval == 0 && skip_cnt) {
15872 15872 if (st_cmd(un, SCMD_SPACE, Fmk(skip_cnt), SYNC_CMD)) {
15873 15873 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
15874 15874 "st_backward_space_files:EIO:space fm skip count");
15875 15875 rval = EIO;
15876 15876 } else if (infront) {
15877 15877 /*
15878 15878 * If we had to space forward, and we're
15879 15879 * not a tape that can backspace, mark state
15880 15880 * as if we'd just seen a filemark during a
15881 15881 * a read.
15882 15882 */
15883 15883 if ((un->un_dp->options & ST_BSF) == 0) {
15884 15884 un->un_pos.eof = ST_EOF_PENDING;
15885 15885 un->un_pos.fileno -= 1;
15886 15886 un->un_pos.blkno = LASTBLK;
15887 15887 un->un_running.pmode = invalid;
15888 15888 }
15889 15889 }
15890 15890 }
15891 15891
15892 15892 if (rval != 0) {
15893 15893 un->un_pos.pmode = invalid;
15894 15894 }
15895 15895
15896 15896 return (rval);
15897 15897 }
15898 15898
15899 15899 static int
15900 15900 st_mtnbsf_ioctl(struct scsi_tape *un, int64_t count)
15901 15901 {
15902 15902 int rval;
15903 15903
15904 15904 ST_FUNC(ST_DEVINFO, st_mtnbsf_ioctl);
15905 15905
15906 15906 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
15907 15907 "nbsf: count=%"PRIx64", eof=%x\n", count, un->un_pos.eof);
15908 15908
15909 15909 if (un->un_pos.pmode == legacy) {
15910 15910 /*
15911 15911 * backward space file to beginning of file
15912 15912 *
15913 15913 * If a negative count (which implies a forward space op)
15914 15914 * is specified, and we're at logical or physical eot,
15915 15915 * bounce the request.
15916 15916 */
15917 15917
15918 15918 if (un->un_pos.eof >= ST_EOT && count < 0) {
15919 15919 un->un_err_resid = count;
15920 15920 un->un_status = SUN_KEY_EOT;
15921 15921 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
15922 15922 "st_ioctl : EIO : > EOT and count < 0");
15923 15923 return (EIO);
15924 15924 }
15925 15925 /*
15926 15926 * physical tape position may not be what we've been
15927 15927 * telling the user; adjust the request accordingly
15928 15928 */
15929 15929 if (IN_EOF(un->un_pos)) {
15930 15930 un->un_pos.fileno++;
15931 15931 un->un_pos.blkno = 0;
15932 15932 count++;
15933 15933 }
15934 15934 }
15935 15935
15936 15936 if (st_check_density_or_wfm(un->un_dev, 1, 0, STEPBACK)) {
15937 15937 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
15938 15938 "st_ioctl : EIO : MTNBSF check den and wfm");
15939 15939 return (EIO);
15940 15940 }
15941 15941
15942 15942 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
15943 15943 "mtnbsf: count=%"PRIx64", eof=%x\n", count, un->un_pos.eof);
15944 15944
15945 15945 if (count <= 0) {
15946 15946 rval = st_forward_space_files(un, -count);
15947 15947 } else {
15948 15948 rval = st_backward_space_files(un, count, 0);
15949 15949 }
15950 15950 return (rval);
15951 15951 }
15952 15952
15953 15953 static int
15954 15954 st_mtbsr_ioctl(struct scsi_tape *un, int64_t num)
15955 15955 {
15956 15956 ST_FUNC(ST_DEVINFO, st_mtbsr_ioctl);
15957 15957
15958 15958 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
15959 15959 "bsr: count=%"PRIx64", eof=%x\n", num, un->un_pos.eof);
15960 15960
15961 15961 if (un->un_pos.pmode == legacy) {
15962 15962 /*
15963 15963 * backward space into inter-record gap
15964 15964 *
15965 15965 * If a negative count (which implies a forward space op)
15966 15966 * is specified, and we're at logical or physical eot,
15967 15967 * bounce the request.
15968 15968 */
15969 15969 if (un->un_pos.eof >= ST_EOT && num < 0) {
15970 15970 un->un_err_resid = num;
15971 15971 un->un_status = SUN_KEY_EOT;
15972 15972 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
15973 15973 "st_ioctl : EIO : MTBSR > EOT");
15974 15974 return (EIO);
15975 15975 }
15976 15976
15977 15977 if (num == 0) {
15978 15978 COPY_POS(&un->un_err_pos, &un->un_pos);
15979 15979 un->un_err_resid = 0;
15980 15980 if (IN_EOF(un->un_pos) && SVR4_BEHAVIOR) {
15981 15981 un->un_status = SUN_KEY_EOF;
15982 15982 }
15983 15983 return (0);
15984 15984 }
15985 15985
15986 15986 /*
15987 15987 * physical tape position may not be what we've been
15988 15988 * telling the user; adjust the position accordingly.
15989 15989 * bsr can not skip filemarks and continue to skip records
15990 15990 * therefore if we are logically before the filemark but
15991 15991 * physically at the EOT side of the filemark, we need to step
15992 15992 * back; this allows fsr N where N > number of blocks in file
15993 15993 * followed by bsr 1 to position at the beginning of last block
15994 15994 */
15995 15995 if (IN_EOF(un->un_pos)) {
15996 15996 tapepos_t save;
15997 15997 optype lastop = un->un_lastop;
15998 15998
15999 15999 COPY_POS(&save, &un->un_pos);
16000 16000 if (st_cmd(un, SCMD_SPACE, Fmk(-1), SYNC_CMD) == -1) {
16001 16001 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
16002 16002 "st_mtbsr_ioctl: EIO : MTBSR can't space");
16003 16003 return (EIO);
16004 16004 }
16005 16005
16006 16006 COPY_POS(&un->un_pos, &save);
16007 16007 un->un_lastop = lastop;
16008 16008 }
16009 16009 }
16010 16010
16011 16011 un->un_pos.eof = ST_NO_EOF;
16012 16012
16013 16013 if (st_check_density_or_wfm(un->un_dev, 1, 0, STEPBACK)) {
16014 16014 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
16015 16015 "st_ioctl : EIO : MTBSR : can't set density or wfm");
16016 16016 return (EIO);
16017 16017 }
16018 16018
16019 16019 num = -num;
16020 16020 return (st_space_records(un, num));
16021 16021 }
16022 16022
16023 16023 static int
16024 16024 st_mtfsfm_ioctl(struct scsi_tape *un, int64_t cnt)
16025 16025 {
16026 16026 int rval;
16027 16027
16028 16028 ST_FUNC(ST_DEVINFO, st_mtfsfm_ioctl);
16029 16029
16030 16030 rval = st_cmd(un, SCMD_SPACE, SPACE(SP_SQFLM, cnt), SYNC_CMD);
16031 16031 if (rval == 0) {
16032 16032 un->un_pos.pmode = logical;
16033 16033 } else if ((un->un_status == KEY_ILLEGAL_REQUEST) &&
16034 16034 (un->un_sd->sd_sense->es_add_code == 0x24)) {
16035 16035 /*
16036 16036 * Drive says invalid field in cdb.
16037 16037 * Doesn't like space multiple. Position isn't lost.
16038 16038 */
16039 16039 un->un_err_resid = cnt;
16040 16040 un->un_status = 0;
16041 16041 rval = ENOTTY;
16042 16042 } else {
16043 16043 un->un_err_resid = cnt;
16044 16044 un->un_pos.pmode = invalid;
16045 16045 }
16046 16046 return (rval);
16047 16047 }
16048 16048
16049 16049 static int
16050 16050 st_mtbsfm_ioctl(struct scsi_tape *un, int64_t cnt)
16051 16051 {
16052 16052 int rval;
16053 16053
16054 16054 ST_FUNC(ST_DEVINFO, st_mtbsfm_ioctl);
16055 16055
16056 16056 rval = st_cmd(un, SCMD_SPACE, SPACE(SP_SQFLM, -cnt), SYNC_CMD);
16057 16057 if (rval == 0) {
16058 16058 un->un_pos.pmode = logical;
16059 16059 } else if ((un->un_status == KEY_ILLEGAL_REQUEST) &&
16060 16060 (un->un_sd->sd_sense->es_add_code == 0x24)) {
16061 16061 /*
16062 16062 * Drive says invalid field in cdb.
16063 16063 * Doesn't like space multiple. Position isn't lost.
16064 16064 */
16065 16065 un->un_err_resid = cnt;
16066 16066 un->un_status = 0;
16067 16067 rval = ENOTTY;
16068 16068 } else {
16069 16069 un->un_err_resid = cnt;
16070 16070 un->un_pos.pmode = invalid;
16071 16071 }
16072 16072 return (rval);
16073 16073 }
16074 16074
16075 16075 #ifdef __x86
16076 16076
16077 16077 /*
16078 16078 * release contig_mem and wake up waiting thread, if any
16079 16079 */
16080 16080 static void
16081 16081 st_release_contig_mem(struct scsi_tape *un, struct contig_mem *cp)
16082 16082 {
16083 16083 mutex_enter(ST_MUTEX);
16084 16084
16085 16085 ST_FUNC(ST_DEVINFO, st_release_contig_mem);
16086 16086
16087 16087 cp->cm_next = un->un_contig_mem;
16088 16088 un->un_contig_mem = cp;
16089 16089 un->un_contig_mem_available_num++;
16090 16090 cv_broadcast(&un->un_contig_mem_cv);
16091 16091
16092 16092 mutex_exit(ST_MUTEX);
16093 16093 }
16094 16094
16095 16095 /*
16096 16096 * St_get_contig_mem will return a contig_mem if there is one available
16097 16097 * in current system. Otherwise, it will try to alloc one, if the total
16098 16098 * number of contig_mem is within st_max_contig_mem_num.
16099 16099 * It will sleep, if allowed by caller or return NULL, if no contig_mem
16100 16100 * is available for now.
16101 16101 */
16102 16102 static struct contig_mem *
16103 16103 st_get_contig_mem(struct scsi_tape *un, size_t len, int alloc_flags)
16104 16104 {
16105 16105 size_t rlen;
16106 16106 struct contig_mem *cp = NULL;
16107 16107 ddi_acc_handle_t acc_hdl;
16108 16108 caddr_t addr;
16109 16109 int big_enough = 0;
16110 16110 int (*dma_alloc_cb)() = (alloc_flags == KM_SLEEP) ?
16111 16111 DDI_DMA_SLEEP : DDI_DMA_DONTWAIT;
16112 16112
16113 16113 /* Try to get one available contig_mem */
16114 16114 mutex_enter(ST_MUTEX);
16115 16115
16116 16116 ST_FUNC(ST_DEVINFO, st_get_contig_mem);
16117 16117
16118 16118 if (un->un_contig_mem_available_num > 0) {
16119 16119 ST_GET_CONTIG_MEM_HEAD(un, cp, len, big_enough);
16120 16120 } else if (un->un_contig_mem_total_num < st_max_contig_mem_num) {
16121 16121 /*
16122 16122 * we failed to get one. we're going to
16123 16123 * alloc one more contig_mem for this I/O
16124 16124 */
16125 16125 mutex_exit(ST_MUTEX);
16126 16126 cp = (struct contig_mem *)kmem_zalloc(
16127 16127 sizeof (struct contig_mem) + biosize(),
16128 16128 alloc_flags);
16129 16129 if (cp == NULL) {
16130 16130 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
16131 16131 "alloc contig_mem failure\n");
16132 16132 return (NULL); /* cannot get one */
16133 16133 }
16134 16134 cp->cm_bp = (struct buf *)
16135 16135 (((caddr_t)cp) + sizeof (struct contig_mem));
16136 16136 bioinit(cp->cm_bp);
16137 16137 mutex_enter(ST_MUTEX);
16138 16138 un->un_contig_mem_total_num++; /* one more available */
16139 16139 } else {
16140 16140 /*
16141 16141 * we failed to get one and we're NOT allowed to
16142 16142 * alloc more contig_mem
16143 16143 */
16144 16144 if (alloc_flags == KM_SLEEP) {
16145 16145 while (un->un_contig_mem_available_num <= 0) {
16146 16146 cv_wait(&un->un_contig_mem_cv, ST_MUTEX);
16147 16147 }
16148 16148 ST_GET_CONTIG_MEM_HEAD(un, cp, len, big_enough);
16149 16149 } else {
16150 16150 mutex_exit(ST_MUTEX);
16151 16151 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
16152 16152 "alloc contig_mem failure\n");
16153 16153 return (NULL); /* cannot get one */
16154 16154 }
16155 16155 }
16156 16156 mutex_exit(ST_MUTEX);
16157 16157
16158 16158 /* We need to check if this block of mem is big enough for this I/O */
16159 16159 if (cp->cm_len < len) {
16160 16160 /* not big enough, need to alloc a new one */
16161 16161 if (ddi_dma_mem_alloc(un->un_contig_mem_hdl, len, &st_acc_attr,
16162 16162 DDI_DMA_STREAMING, dma_alloc_cb, NULL,
16163 16163 &addr, &rlen, &acc_hdl) != DDI_SUCCESS) {
16164 16164 ST_DEBUG2(ST_DEVINFO, st_label, SCSI_DEBUG,
16165 16165 "alloc contig_mem failure: not enough mem\n");
16166 16166 st_release_contig_mem(un, cp);
16167 16167 cp = NULL;
16168 16168 } else {
16169 16169 if (cp->cm_addr) {
16170 16170 /* release previous one before attach new one */
16171 16171 ddi_dma_mem_free(&cp->cm_acc_hdl);
16172 16172 }
16173 16173 mutex_enter(ST_MUTEX);
16174 16174 un->un_max_contig_mem_len =
16175 16175 un->un_max_contig_mem_len >= len ?
16176 16176 un->un_max_contig_mem_len : len;
16177 16177 mutex_exit(ST_MUTEX);
16178 16178
16179 16179 /* attach new mem to this cp */
16180 16180 cp->cm_addr = addr;
16181 16181 cp->cm_acc_hdl = acc_hdl;
16182 16182 cp->cm_len = len;
16183 16183
16184 16184 goto alloc_ok; /* get one usable cp */
16185 16185 }
16186 16186 } else {
16187 16187 goto alloc_ok; /* get one usable cp */
16188 16188 }
16189 16189
16190 16190 /* cannot find/alloc a usable cp, when we get here */
16191 16191
16192 16192 mutex_enter(ST_MUTEX);
16193 16193 if ((un->un_max_contig_mem_len < len) ||
16194 16194 (alloc_flags != KM_SLEEP)) {
16195 16195 mutex_exit(ST_MUTEX);
16196 16196 return (NULL);
16197 16197 }
16198 16198
16199 16199 /*
16200 16200 * we're allowed to sleep, and there is one big enough
16201 16201 * contig mem in the system, which is currently in use,
16202 16202 * wait for it...
16203 16203 */
16204 16204 big_enough = 1;
16205 16205 do {
16206 16206 cv_wait(&un->un_contig_mem_cv, ST_MUTEX);
16207 16207 ST_GET_CONTIG_MEM_HEAD(un, cp, len, big_enough);
16208 16208 } while (cp == NULL);
16209 16209 mutex_exit(ST_MUTEX);
16210 16210
16211 16211 /* we get the big enough contig mem, finally */
16212 16212
16213 16213 alloc_ok:
16214 16214 /* init bp attached to this cp */
16215 16215 bioreset(cp->cm_bp);
16216 16216 cp->cm_bp->b_un.b_addr = cp->cm_addr;
16217 16217 cp->cm_bp->b_private = (void *)cp;
16218 16218
16219 16219 return (cp);
16220 16220 }
16221 16221
16222 16222 /*
16223 16223 * this is the biodone func for the bp used in big block I/O
16224 16224 */
16225 16225 static int
16226 16226 st_bigblk_xfer_done(struct buf *bp)
16227 16227 {
16228 16228 struct contig_mem *cp;
16229 16229 struct buf *orig_bp;
16230 16230 int ioerr;
16231 16231 struct scsi_tape *un;
16232 16232
16233 16233 /* sanity check */
16234 16234 if (bp == NULL) {
16235 16235 return (DDI_FAILURE);
16236 16236 }
16237 16237
16238 16238 un = ddi_get_soft_state(st_state, MTUNIT(bp->b_edev));
16239 16239 if (un == NULL) {
16240 16240 return (DDI_FAILURE);
16241 16241 }
16242 16242
16243 16243 ST_FUNC(ST_DEVINFO, st_bigblk_xfer_done);
16244 16244
16245 16245 cp = (struct contig_mem *)bp->b_private;
16246 16246 orig_bp = cp->cm_bp; /* get back the bp we have replaced */
16247 16247 cp->cm_bp = bp;
16248 16248
16249 16249 /* special handling for special I/O */
16250 16250 if (cp->cm_use_sbuf) {
16251 16251 #ifndef __lock_lint
16252 16252 ASSERT(un->un_sbuf_busy);
16253 16253 #endif
16254 16254 un->un_sbufp = orig_bp;
16255 16255 cp->cm_use_sbuf = 0;
16256 16256 }
16257 16257
16258 16258 orig_bp->b_resid = bp->b_resid;
16259 16259 ioerr = geterror(bp);
16260 16260 if (ioerr != 0) {
16261 16261 bioerror(orig_bp, ioerr);
16262 16262 } else if (orig_bp->b_flags & B_READ) {
16263 16263 /* copy data back to original bp */
16264 16264 (void) bp_copyout(bp->b_un.b_addr, orig_bp, 0,
16265 16265 bp->b_bcount - bp->b_resid);
16266 16266 }
16267 16267
16268 16268 st_release_contig_mem(un, cp);
16269 16269
16270 16270 biodone(orig_bp);
16271 16271
16272 16272 return (DDI_SUCCESS);
16273 16273 }
16274 16274
16275 16275 /*
16276 16276 * We use this func to replace original bp that may not be able to do I/O
16277 16277 * in big block size with one that can
16278 16278 */
16279 16279 static struct buf *
16280 16280 st_get_bigblk_bp(struct buf *bp)
16281 16281 {
16282 16282 struct contig_mem *cp;
16283 16283 struct scsi_tape *un;
16284 16284 struct buf *cont_bp;
16285 16285
16286 16286 un = ddi_get_soft_state(st_state, MTUNIT(bp->b_edev));
16287 16287 if (un == NULL) {
16288 16288 return (bp);
16289 16289 }
16290 16290
16291 16291 ST_FUNC(ST_DEVINFO, st_get_bigblk_bp);
16292 16292
16293 16293 /* try to get one contig_mem */
16294 16294 cp = st_get_contig_mem(un, bp->b_bcount, KM_SLEEP);
16295 16295 if (!cp) {
16296 16296 scsi_log(ST_DEVINFO, st_label, CE_WARN,
16297 16297 "Cannot alloc contig buf for I/O for %lu blk size",
16298 16298 bp->b_bcount);
16299 16299 return (bp);
16300 16300 }
16301 16301 cont_bp = cp->cm_bp;
16302 16302 cp->cm_bp = bp;
16303 16303
16304 16304 /* make sure that we "are" using un_sbufp for special I/O */
16305 16305 if (bp == un->un_sbufp) {
16306 16306 #ifndef __lock_lint
16307 16307 ASSERT(un->un_sbuf_busy);
16308 16308 #endif
16309 16309 un->un_sbufp = cont_bp;
16310 16310 cp->cm_use_sbuf = 1;
16311 16311 }
16312 16312
16313 16313 /* clone bp */
16314 16314 cont_bp->b_bcount = bp->b_bcount;
16315 16315 cont_bp->b_resid = bp->b_resid;
16316 16316 cont_bp->b_iodone = st_bigblk_xfer_done;
16317 16317 cont_bp->b_file = bp->b_file;
16318 16318 cont_bp->b_offset = bp->b_offset;
16319 16319 cont_bp->b_dip = bp->b_dip;
16320 16320 cont_bp->b_error = 0;
16321 16321 cont_bp->b_proc = NULL;
16322 16322 cont_bp->b_flags = bp->b_flags & ~(B_PAGEIO | B_PHYS | B_SHADOW);
16323 16323 cont_bp->b_shadow = NULL;
16324 16324 cont_bp->b_pages = NULL;
16325 16325 cont_bp->b_edev = bp->b_edev;
16326 16326 cont_bp->b_dev = bp->b_dev;
16327 16327 cont_bp->b_lblkno = bp->b_lblkno;
16328 16328 cont_bp->b_forw = bp->b_forw;
16329 16329 cont_bp->b_back = bp->b_back;
16330 16330 cont_bp->av_forw = bp->av_forw;
16331 16331 cont_bp->av_back = bp->av_back;
16332 16332 cont_bp->b_bufsize = bp->b_bufsize;
16333 16333
16334 16334 /* get data in original bp */
16335 16335 if (bp->b_flags & B_WRITE) {
16336 16336 (void) bp_copyin(bp, cont_bp->b_un.b_addr, 0, bp->b_bcount);
16337 16337 }
16338 16338
16339 16339 return (cont_bp);
16340 16340 }
16341 16341 #else
16342 16342 #ifdef __lock_lint
16343 16343 static int
16344 16344 st_bigblk_xfer_done(struct buf *bp)
16345 16345 {
16346 16346 return (0);
16347 16347 }
16348 16348 #endif
16349 16349 #endif
16350 16350
16351 16351 static const char *eof_status[] =
16352 16352 {
16353 16353 "NO_EOF",
16354 16354 "EOF_PENDING",
16355 16355 "EOF",
16356 16356 "EOT_PENDING",
16357 16357 "EOT",
16358 16358 "EOM",
16359 16359 "AFTER_EOM"
16360 16360 };
16361 16361 static const char *mode[] = {
16362 16362 "invalid",
16363 16363 "legacy",
16364 16364 "logical"
16365 16365 };
16366 16366
16367 16367 static void
16368 16368 st_print_position(dev_info_t *dev, char *label, uint_t level,
16369 16369 const char *comment, tapepos_t *pos)
16370 16370 {
16371 16371 ST_FUNC(dev, st_print_position);
16372 16372
16373 16373 scsi_log(dev, label, level,
16374 16374 "%s Position data:\n", comment);
16375 16375 scsi_log(dev, label, CE_CONT,
16376 16376 "Positioning mode = %s", mode[pos->pmode]);
16377 16377 scsi_log(dev, label, CE_CONT,
16378 16378 "End Of File/Tape = %s", eof_status[pos->eof]);
16379 16379 scsi_log(dev, label, CE_CONT,
16380 16380 "File Number = 0x%x", pos->fileno);
16381 16381 scsi_log(dev, label, CE_CONT,
16382 16382 "Block Number = 0x%x", pos->blkno);
16383 16383 scsi_log(dev, label, CE_CONT,
16384 16384 "Logical Block = 0x%"PRIx64, pos->lgclblkno);
16385 16385 scsi_log(dev, label, CE_CONT,
16386 16386 "Partition Number = 0x%x", pos->partition);
16387 16387 }
16388 16388 static int
16389 16389 st_check_if_media_changed(struct scsi_tape *un, caddr_t data, int size)
16390 16390 {
16391 16391
16392 16392 int result = 0;
16393 16393 int i;
16394 16394 ST_FUNC(ST_DEVINFO, st_check_if_media_changed);
16395 16395
16396 16396 /*
16397 16397 * find non alpha numeric working from the end.
16398 16398 */
16399 16399 for (i = size - 1; i >= 0; i--) {
16400 16400 if (ISALNUM(data[i]) == 0 || data[i] == ' ') {
16401 16401 data[i] = 0;
16402 16402 size = i;
16403 16403 }
16404 16404 }
16405 16405
16406 16406 if (size == 1) {
16407 16407 /*
16408 16408 * Drive seems to think its returning useful data
16409 16409 * but it looks like all junk
16410 16410 */
16411 16411 return (result);
16412 16412 }
16413 16413
16414 16414 size++;
16415 16415
16416 16416 /*
16417 16417 * Actually got a valid serial number.
16418 16418 * If never stored one before alloc space for it.
16419 16419 */
16420 16420 if (un->un_media_id_len == 0) {
16421 16421 un->un_media_id = kmem_zalloc(size, KM_SLEEP);
16422 16422 un->un_media_id_len = size;
16423 16423 (void) strncpy(un->un_media_id, data, min(size, strlen(data)));
16424 16424 un->un_media_id[min(size, strlen(data))] = 0;
16425 16425 ST_DEBUG1(ST_DEVINFO, st_label, SCSI_DEBUG,
16426 16426 "Found Media Id %s length = %d\n", un->un_media_id, size);
16427 16427 } else if (size > un->un_media_id_len) {
16428 16428 if (strncmp(un->un_media_id, data, size) != 0) {
16429 16429 result = ESPIPE;
16430 16430 }
16431 16431 ST_DEBUG1(ST_DEVINFO, st_label, SCSI_DEBUG,
16432 16432 "Longer Media Id old ID:%s new ID:%s\n",
16433 16433 un->un_media_id, data);
16434 16434 kmem_free(un->un_media_id, un->un_media_id_len);
16435 16435 un->un_media_id = kmem_zalloc(size, KM_SLEEP);
16436 16436 un->un_media_id_len = size;
16437 16437 (void) strncpy(un->un_media_id, data, size);
16438 16438 un->un_media_id[size] = 0;
16439 16439 } else if (strncmp(data, un->un_media_id,
16440 16440 min(size, un->un_media_id_len)) != 0) {
16441 16441 ST_DEBUG1(ST_DEVINFO, st_label, SCSI_DEBUG,
16442 16442 "Old Media Id %s length = %d New %s length = %d\n",
16443 16443 un->un_media_id, un->un_media_id_len, data, size);
16444 16444 bzero(un->un_media_id, un->un_media_id_len);
16445 16445 (void) strncpy(un->un_media_id, data, min(size, strlen(data)));
16446 16446 un->un_media_id[min(size, strlen(data))] = 0;
16447 16447 result = ESPIPE;
16448 16448 } else {
16449 16449 ST_DEBUG4(ST_DEVINFO, st_label, SCSI_DEBUG,
16450 16450 "Media Id still %s\n", un->un_media_id);
16451 16451 }
16452 16452
16453 16453 ASSERT(strlen(un->un_media_id) <= size);
16454 16454
16455 16455 return (result);
16456 16456 }
16457 16457 #define ID_SIZE 32
16458 16458 typedef struct
16459 16459 {
16460 16460 uchar_t avilable_data0;
16461 16461 uchar_t avilable_data1;
16462 16462 uchar_t avilable_data2;
16463 16463 uchar_t avilable_data3;
16464 16464 uchar_t attribute_msb;
16465 16465 uchar_t attribute_lsb;
16466 16466 #ifdef _BIT_FIELDS_LTOH
16467 16467 uchar_t format : 2,
16468 16468 : 5,
16469 16469 read_only : 1;
16470 16470 #else
16471 16471 uchar_t read_only : 1,
16472 16472 : 5,
16473 16473 format : 2;
16474 16474 #endif
16475 16475 uchar_t attribute_len_msb;
16476 16476 uchar_t attribute_len_lsb;
16477 16477 }attribute_header;
16478 16478
16479 16479 typedef struct {
16480 16480 attribute_header header;
16481 16481 char data[1];
16482 16482 }mam_attribute;
16483 16483
16484 16484 static int
16485 16485 st_handle_hex_media_id(struct scsi_tape *un, void *pnt, int size)
16486 16486 {
16487 16487 int result;
16488 16488 int newsize = (size << 1) + 3; /* extra for leading 0x and null term */
16489 16489 int i;
16490 16490 uchar_t byte;
16491 16491 char *format;
16492 16492 uchar_t *data = (uchar_t *)pnt;
16493 16493 char *buf = kmem_alloc(newsize, KM_SLEEP);
16494 16494
16495 16495 ST_FUNC(ST_DEVINFO, st_handle_hex_media_id);
16496 16496
16497 16497 (void) sprintf(buf, "0x");
16498 16498 for (i = 0; i < size; i++) {
16499 16499 byte = data[i];
16500 16500 if (byte < 0x10)
16501 16501 format = "0%x";
16502 16502 else
16503 16503 format = "%x";
16504 16504 (void) sprintf(&buf[(int)strlen(buf)], format, byte);
16505 16505 }
16506 16506 result = st_check_if_media_changed(un, buf, newsize);
16507 16507
16508 16508 kmem_free(buf, newsize);
16509 16509
16510 16510 return (result);
16511 16511 }
16512 16512
16513 16513
16514 16514 static int
16515 16515 st_get_media_id_via_read_attribute(struct scsi_tape *un, ubufunc_t bufunc)
16516 16516 {
16517 16517 int result;
16518 16518 mam_attribute *buffer;
16519 16519 int size;
16520 16520 int newsize;
16521 16521
16522 16522 ST_FUNC(ST_DEVINFO, st_get_media_id_via_read_attribute);
16523 16523 size = sizeof (attribute_header) + max(un->un_media_id_len, ID_SIZE);
16524 16524 again:
16525 16525 buffer = kmem_zalloc(size, KM_SLEEP);
16526 16526 result = st_read_attributes(un, 0x0401, buffer, size, bufunc);
16527 16527 if (result == 0) {
16528 16528
16529 16529 newsize = (buffer->header.attribute_len_msb << 8) |
16530 16530 buffer->header.attribute_len_lsb;
16531 16531
16532 16532 if (newsize + sizeof (attribute_header) > size) {
16533 16533 ST_DEBUG(ST_DEVINFO, st_label, SCSI_DEBUG,
16534 16534 "resizing read attribute data from %d to %d format"
16535 16535 " %d\n", size, (int)sizeof (attribute_header) +
16536 16536 newsize, buffer->header.format);
16537 16537 kmem_free(buffer, size);
16538 16538 size = newsize + sizeof (attribute_header);
16539 16539 goto again;
16540 16540 }
16541 16541
16542 16542 un->un_media_id_method = st_get_media_id_via_read_attribute;
16543 16543 if (buffer->header.format == 0) {
16544 16544 result =
16545 16545 st_handle_hex_media_id(un, buffer->data, newsize);
16546 16546 } else {
16547 16547 result = st_check_if_media_changed(un, buffer->data,
16548 16548 newsize);
16549 16549 }
16550 16550 } else if (result == EINVAL && un->un_max_cdb_sz < CDB_GROUP4) {
16551 16551 scsi_log(ST_DEVINFO, st_label, CE_NOTE,
16552 16552 "Read Attribute Command for Media Identification is not "
16553 16553 "supported on the HBA that this drive is attached to.");
16554 16554 result = ENOTTY;
16555 16555 }
16556 16556
16557 16557 kmem_free(buffer, size);
16558 16558 un->un_status = 0;
16559 16559
16560 16560 return (result);
16561 16561 }
16562 16562
16563 16563
16564 16564 static int
16565 16565 st_get_media_id_via_media_serial_cmd(struct scsi_tape *un, ubufunc_t bufunc)
16566 16566 {
16567 16567 char cdb[CDB_GROUP5];
16568 16568 struct uscsi_cmd *ucmd;
16569 16569 struct scsi_extended_sense sense;
16570 16570 int rval;
16571 16571 int size = max(un->un_media_id_len, ID_SIZE);
16572 16572 caddr_t buf;
16573 16573
16574 16574 ST_FUNC(ST_DEVINFO, st_get_media_id_via_media_serial_cmd);
16575 16575
16576 16576 if (un->un_sd->sd_inq->inq_ansi < 3) {
16577 16577 return (ENOTTY);
16578 16578 }
16579 16579
16580 16580 ucmd = kmem_zalloc(sizeof (struct uscsi_cmd), KM_SLEEP);
16581 16581 upsize:
16582 16582 buf = kmem_alloc(size, KM_SLEEP);
16583 16583
16584 16584 cdb[0] = (char)SCMD_SVC_ACTION_IN_G5;
16585 16585 cdb[1] = SSVC_ACTION_READ_MEDIA_SERIAL;
16586 16586 cdb[2] = 0;
16587 16587 cdb[3] = 0;
16588 16588 cdb[4] = 0;
16589 16589 cdb[5] = 0;
16590 16590 cdb[6] = (char)(size >> 24);
16591 16591 cdb[7] = (char)(size >> 16);
16592 16592 cdb[8] = (char)(size >> 8);
16593 16593 cdb[9] = (char)(size);
16594 16594 cdb[10] = 0;
16595 16595 cdb[11] = 0;
16596 16596
16597 16597 ucmd->uscsi_flags = USCSI_READ | USCSI_RQENABLE;
16598 16598 ucmd->uscsi_timeout = un->un_dp->non_motion_timeout;
16599 16599 ucmd->uscsi_cdb = &cdb[0];
16600 16600 ucmd->uscsi_cdblen = sizeof (cdb);
16601 16601 ucmd->uscsi_bufaddr = buf;
16602 16602 ucmd->uscsi_buflen = size;
16603 16603 ucmd->uscsi_rqbuf = (caddr_t)&sense;
16604 16604 ucmd->uscsi_rqlen = sizeof (sense);
16605 16605
16606 16606 rval = bufunc(un, ucmd, FKIOCTL);
16607 16607
16608 16608 if (rval || ucmd->uscsi_status != 0) {
16609 16609 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
16610 16610 "media serial command returned %d scsi_status %d"
16611 16611 " rqstatus %d", rval, ucmd->uscsi_status,
16612 16612 ucmd->uscsi_rqstatus);
16613 16613 /*
16614 16614 * If this returns invalid operation code don't try again.
16615 16615 */
16616 16616 if (sense.es_key == KEY_ILLEGAL_REQUEST &&
16617 16617 sense.es_add_code == 0x20) {
16618 16618 rval = ENOTTY;
16619 16619 } else if (rval == 0) {
16620 16620 rval = EIO;
16621 16621 }
16622 16622 un->un_status = 0;
16623 16623 } else {
16624 16624 int act_size;
16625 16625
16626 16626 /*
16627 16627 * get reported size.
16628 16628 */
16629 16629 act_size = (int)buf[3] | (int)(buf[2] << 8) |
16630 16630 (int)(buf[1] << 16) | (int)(buf[0] << 24);
16631 16631
16632 16632 /* documentation says mod 4. */
16633 16633 while (act_size & 3) {
16634 16634 act_size++;
16635 16635 }
16636 16636
16637 16637 /*
16638 16638 * If reported size is larger that we our buffer.
16639 16639 * Free the old one and allocate one that is larger
16640 16640 * enough and re-issuse the command.
16641 16641 */
16642 16642 if (act_size + 4 > size) {
16643 16643 kmem_free(buf, size);
16644 16644 size = act_size + 4;
16645 16645 goto upsize;
16646 16646 }
16647 16647
16648 16648 if (act_size == 0) {
16649 16649 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
16650 16650 "media serial number is not available");
16651 16651 un->un_status = 0;
16652 16652 rval = 0;
16653 16653 } else {
16654 16654 /*
16655 16655 * set data pointer to point to the start
16656 16656 * of that serial number.
16657 16657 */
16658 16658 un->un_media_id_method =
16659 16659 st_get_media_id_via_media_serial_cmd;
16660 16660 rval =
16661 16661 st_check_if_media_changed(un, &buf[4], act_size);
16662 16662 }
16663 16663 }
16664 16664
16665 16665 kmem_free(ucmd, sizeof (struct uscsi_cmd));
16666 16666 kmem_free(buf, size);
16667 16667
16668 16668 return (rval);
16669 16669 }
16670 16670
16671 16671
16672 16672 /* ARGSUSED */
16673 16673 static int
16674 16674 st_bogus_media_id(struct scsi_tape *un, ubufunc_t bufunc)
16675 16675 {
16676 16676 ST_FUNC(ST_DEVINFO, st_bogus_media_id);
16677 16677
16678 16678 ASSERT(un->un_media_id == NULL || un->un_media_id == bogusID);
16679 16679 ASSERT(un->un_media_id_len == 0);
16680 16680 un->un_media_id = (char *)bogusID;
16681 16681 un->un_media_id_len = 0;
16682 16682 return (0);
16683 16683 }
16684 16684
16685 16685 typedef int (*media_chk_function)(struct scsi_tape *, ubufunc_t bufunc);
16686 16686
16687 16687 media_chk_function media_chk_functions[] = {
16688 16688 st_get_media_id_via_media_serial_cmd,
16689 16689 st_get_media_id_via_read_attribute,
16690 16690 st_bogus_media_id
16691 16691 };
16692 16692
16693 16693 static int
16694 16694 st_get_media_identification(struct scsi_tape *un, ubufunc_t bufunc)
16695 16695 {
16696 16696 int result = 0;
16697 16697 int i;
16698 16698
16699 16699 ST_FUNC(ST_DEVINFO, st_get_media_identification);
16700 16700
16701 16701 for (i = 0; i < ST_NUM_MEMBERS(media_chk_functions); i++) {
16702 16702 if (result == ENOTTY) {
16703 16703 /*
16704 16704 * Last operation type not supported by this device.
16705 16705 * Make so next time it doesn`t do that again.
16706 16706 */
16707 16707 un->un_media_id_method = media_chk_functions[i];
16708 16708 } else if (un->un_media_id_method != media_chk_functions[i] &&
16709 16709 un->un_media_id_method != st_get_media_identification) {
16710 16710 continue;
16711 16711 }
16712 16712 result = media_chk_functions[i](un, bufunc);
16713 16713 /*
16714 16714 * If result indicates the function was successful or
16715 16715 * that the media is not the same as last known, break.
16716 16716 */
16717 16717 if (result == 0 || result == ESPIPE) {
16718 16718 break;
16719 16719 }
16720 16720 }
16721 16721
16722 16722 return (result);
16723 16723 }
16724 16724
16725 16725 static errstate
16726 16726 st_command_recovery(struct scsi_tape *un, struct scsi_pkt *pkt,
16727 16727 errstate onentry)
16728 16728 {
16729 16729
16730 16730 int ret;
16731 16731 st_err_info *errinfo;
16732 16732 recov_info *ri = (recov_info *)pkt->pkt_private;
16733 16733
16734 16734 ST_FUNC(ST_DEVINFO, st_command_recovery);
16735 16735
16736 16736 ASSERT(MUTEX_HELD(&un->un_sd->sd_mutex));
16737 16737
16738 16738 ASSERT(un->un_recov_buf_busy == 0);
16739 16739
16740 16740 /*
16741 16741 * Don't try and recover a reset that this device sent.
16742 16742 */
16743 16743 if (un->un_rsvd_status & ST_INITIATED_RESET &&
16744 16744 onentry == DEVICE_RESET) {
16745 16745 return (COMMAND_DONE_ERROR);
16746 16746 }
16747 16747
16748 16748 /*
16749 16749 * See if expected position was passed with scsi_pkt.
16750 16750 */
16751 16751 if (ri->privatelen == sizeof (recov_info)) {
16752 16752
16753 16753 /*
16754 16754 * Not for this command.
16755 16755 */
16756 16756 if (ri->cmd_attrib->do_not_recover) {
16757 16757 return (COMMAND_DONE_ERROR);
16758 16758 }
16759 16759
16760 16760 /*
16761 16761 * Create structure to hold all error state info.
16762 16762 */
16763 16763 errinfo = kmem_zalloc(ST_ERR_INFO_SIZE, KM_SLEEP);
16764 16764 errinfo->ei_error_type = onentry;
16765 16765 errinfo->ei_failing_bp = ri->cmd_bp;
16766 16766 COPY_POS(&errinfo->ei_expected_pos, &ri->pos);
16767 16767 } else {
16768 16768 /* disabled */
16769 16769 return (COMMAND_DONE_ERROR);
16770 16770 }
16771 16771
16772 16772 bcopy(pkt, &errinfo->ei_failed_pkt, scsi_pkt_size());
16773 16773 bcopy(pkt->pkt_scbp, &errinfo->ei_failing_status, SECMDS_STATUS_SIZE);
16774 16774 ret = ddi_taskq_dispatch(un->un_recov_taskq, st_recover, errinfo,
16775 16775 DDI_NOSLEEP);
16776 16776 ASSERT(ret == DDI_SUCCESS);
16777 16777 if (ret != DDI_SUCCESS) {
16778 16778 kmem_free(errinfo, ST_ERR_INFO_SIZE);
16779 16779 return (COMMAND_DONE_ERROR);
16780 16780 }
16781 16781 return (JUST_RETURN); /* release calling thread */
16782 16782 }
16783 16783
16784 16784
16785 16785 static void
16786 16786 st_recov_ret(struct scsi_tape *un, st_err_info *errinfo, errstate err)
16787 16787 {
16788 16788 int error_number;
16789 16789 buf_t *bp;
16790 16790
16791 16791
16792 16792 ST_FUNC(ST_DEVINFO, st_recov_ret);
16793 16793
16794 16794 ASSERT(MUTEX_HELD(&un->un_sd->sd_mutex));
16795 16795 #if !defined(lint)
16796 16796 _NOTE(LOCK_RELEASED_AS_SIDE_EFFECT(&un->un_sd->sd_mutex))
16797 16797 #endif
16798 16798
16799 16799 bp = errinfo->ei_failing_bp;
16800 16800 kmem_free(errinfo, ST_ERR_INFO_SIZE);
16801 16801
16802 16802 switch (err) {
16803 16803 case JUST_RETURN:
16804 16804 mutex_exit(&un->un_sd->sd_mutex);
16805 16805 return;
16806 16806
16807 16807 case COMMAND_DONE:
16808 16808 case COMMAND_DONE_ERROR_RECOVERED:
16809 16809 ST_DO_KSTATS(bp, kstat_runq_exit);
16810 16810 error_number = 0;
16811 16811 break;
16812 16812
16813 16813 default:
16814 16814 ST_DEBUG(ST_DEVINFO, st_label, CE_PANIC,
16815 16815 "st_recov_ret with unhandled errstat %d\n", err);
16816 16816 /* FALLTHROUGH */
16817 16817 case COMMAND_DONE_ERROR:
16818 16818 un->un_pos.pmode = invalid;
16819 16819 un->un_running.pmode = invalid;
16820 16820 /* FALLTHROUGH */
16821 16821 case COMMAND_DONE_EACCES:
16822 16822 ST_DO_KSTATS(bp, kstat_waitq_exit);
16823 16823 ST_DO_ERRSTATS(un, st_transerrs);
16824 16824 error_number = EIO;
16825 16825 st_set_pe_flag(un);
16826 16826 break;
16827 16827
16828 16828 }
16829 16829
16830 16830 st_bioerror(bp, error_number);
16831 16831 st_done_and_mutex_exit(un, bp);
16832 16832 }
16833 16833
16834 16834
16835 16835 static void
16836 16836 st_recover(void *arg)
16837 16837 {
16838 16838 st_err_info *const errinfo = (st_err_info *)arg;
16839 16839 uchar_t com = errinfo->ei_failed_pkt.pkt_cdbp[0];
16840 16840 struct scsi_tape *un;
16841 16841 tapepos_t cur_pos;
16842 16842 int rval;
16843 16843 errstate status = COMMAND_DONE_ERROR;
16844 16844 recov_info *rcv;
16845 16845 buf_t *bp;
16846 16846
16847 16847
16848 16848 rcv = errinfo->ei_failed_pkt.pkt_private;
16849 16849 ASSERT(rcv->privatelen == sizeof (recov_info));
16850 16850 bp = rcv->cmd_bp;
16851 16851
16852 16852 un = ddi_get_soft_state(st_state, MTUNIT(bp->b_edev));
16853 16853
16854 16854 ASSERT(un != NULL);
16855 16855
16856 16856 mutex_enter(ST_MUTEX);
16857 16857
16858 16858 ST_FUNC(ST_DEVINFO, st_recover);
16859 16859
16860 16860 ST_CDB(ST_DEVINFO, "Recovering command",
16861 16861 (caddr_t)errinfo->ei_failed_pkt.pkt_cdbp);
16862 16862 ST_SENSE(ST_DEVINFO, "sense status for failed command",
16863 16863 (caddr_t)&errinfo->ei_failing_status,
16864 16864 sizeof (struct scsi_arq_status));
16865 16865 ST_POS(ST_DEVINFO, rcv->cmd_attrib->recov_pos_type == POS_STARTING ?
16866 16866 "starting position for recovery command" :
16867 16867 "expected position for recovery command",
16868 16868 &errinfo->ei_expected_pos);
16869 16869
16870 16870 rval = st_test_path_to_device(un);
16871 16871
16872 16872 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
16873 16873 "st_recover called with %s, TUR returned %d\n",
16874 16874 errstatenames[errinfo->ei_error_type], rval);
16875 16875 /*
16876 16876 * If the drive responed to the TUR lets try and get it to sync
16877 16877 * any data it might have in the buffer.
16878 16878 */
16879 16879 if (rval == 0 && rcv->cmd_attrib->chg_tape_data) {
16880 16880 rval = st_rcmd(un, SCMD_WRITE_FILE_MARK, 0, SYNC_CMD);
16881 16881 if (rval) {
16882 16882 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
16883 16883 "st_recover failed to flush, returned %d\n", rval);
16884 16884 st_recov_ret(un, errinfo, COMMAND_DONE_ERROR);
16885 16885 return;
16886 16886 }
16887 16887 }
16888 16888 switch (errinfo->ei_error_type) {
16889 16889 case ATTEMPT_RETRY:
16890 16890 case COMMAND_TIMEOUT:
16891 16891 case DEVICE_RESET:
16892 16892 case PATH_FAILED:
16893 16893 /*
16894 16894 * For now if we can't talk to the device we are done.
16895 16895 * If the drive is reserved we can try to get it back.
16896 16896 */
16897 16897 if (rval != 0 && rval != EACCES) {
16898 16898 st_recov_ret(un, errinfo, COMMAND_DONE_ERROR);
16899 16899 return;
16900 16900 }
16901 16901
16902 16902 /*
16903 16903 * If reservation conflict and do a preempt, fail it.
16904 16904 */
16905 16905 if ((un->un_rsvd_status &
16906 16906 (ST_APPLICATION_RESERVATIONS | ST_RESERVE)) != 0) {
16907 16907 if ((errinfo->ei_failed_pkt.pkt_cdbp[0] ==
16908 16908 SCMD_PERSISTENT_RESERVE_OUT) &&
16909 16909 (errinfo->ei_failed_pkt.pkt_cdbp[1] ==
16910 16910 ST_SA_SCSI3_PREEMPT) &&
16911 16911 (SCBP_C(&errinfo->ei_failed_pkt) ==
16912 16912 STATUS_RESERVATION_CONFLICT)) {
16913 16913 st_recov_ret(un, errinfo, COMMAND_DONE_ERROR);
16914 16914 return;
16915 16915 }
16916 16916 }
16917 16917
16918 16918 /*
16919 16919 * If we have already set a scsi II reserve and get a
16920 16920 * conflict on a scsi III type reserve fail without
16921 16921 * any attempt to recover.
16922 16922 */
16923 16923 if ((un->un_rsvd_status & ST_RESERVE | ST_PRESERVE_RESERVE) &&
16924 16924 (errinfo->ei_failed_pkt.pkt_cdbp[0] ==
16925 16925 SCMD_PERSISTENT_RESERVE_OUT) ||
16926 16926 (errinfo->ei_failed_pkt.pkt_cdbp[0] ==
16927 16927 SCMD_PERSISTENT_RESERVE_IN)) {
16928 16928 st_recov_ret(un, errinfo, COMMAND_DONE_EACCES);
16929 16929 return;
16930 16930 }
16931 16931
16932 16932 /*
16933 16933 * If scsi II lost reserve try and get it back.
16934 16934 */
16935 16935 if ((((un->un_rsvd_status &
16936 16936 (ST_LOST_RESERVE | ST_APPLICATION_RESERVATIONS)) ==
16937 16937 ST_LOST_RESERVE)) &&
16938 16938 (errinfo->ei_failed_pkt.pkt_cdbp[0] != SCMD_RELEASE)) {
16939 16939 rval = st_reserve_release(un, ST_RESERVE,
16940 16940 st_uscsi_rcmd);
16941 16941 if (rval != 0) {
16942 16942 if (st_take_ownership(un, st_uscsi_rcmd) != 0) {
16943 16943 st_recov_ret(un, errinfo,
16944 16944 COMMAND_DONE_EACCES);
16945 16945 return;
16946 16946 }
16947 16947 }
16948 16948 un->un_rsvd_status |= ST_RESERVE;
16949 16949 un->un_rsvd_status &= ~(ST_RELEASE | ST_LOST_RESERVE |
16950 16950 ST_RESERVATION_CONFLICT | ST_INITIATED_RESET);
16951 16951 }
16952 16952 rval = st_make_sure_mode_data_is_correct(un, st_uscsi_rcmd);
16953 16953 if (rval) {
16954 16954 st_recov_ret(un, errinfo, COMMAND_DONE_ERROR);
16955 16955 return;
16956 16956 }
16957 16957 break;
16958 16958 case DEVICE_TAMPER:
16959 16959 /*
16960 16960 * Check if the ASC/ASCQ says mode data has changed.
16961 16961 */
16962 16962 if ((errinfo->ei_failing_status.sts_sensedata.es_add_code ==
16963 16963 0x2a) &&
16964 16964 (errinfo->ei_failing_status.sts_sensedata.es_qual_code ==
16965 16965 0x01)) {
16966 16966 /*
16967 16967 * See if mode sense changed.
16968 16968 */
16969 16969 rval = st_make_sure_mode_data_is_correct(un,
16970 16970 st_uscsi_rcmd);
16971 16971 if (rval) {
16972 16972 st_recov_ret(un, errinfo, COMMAND_DONE_ERROR);
16973 16973 return;
16974 16974 }
16975 16975 }
16976 16976 /*
16977 16977 * if we have a media id and its not bogus.
16978 16978 * Check to see if it the same.
16979 16979 */
16980 16980 if (un->un_media_id != NULL && un->un_media_id != bogusID) {
16981 16981 rval = st_get_media_identification(un, st_uscsi_rcmd);
16982 16982 if (rval == ESPIPE) {
16983 16983 st_recov_ret(un, errinfo, COMMAND_DONE_EACCES);
16984 16984 return;
16985 16985 }
16986 16986 }
16987 16987 break;
16988 16988 default:
16989 16989 ST_DEBUG(ST_DEVINFO, st_label, CE_PANIC,
16990 16990 "Unhandled error type %s in st_recover() 0x%x\n",
16991 16991 errstatenames[errinfo->ei_error_type], com);
16992 16992 }
16993 16993
16994 16994 /*
16995 16995 * if command is retriable retry it.
16996 16996 * Special case here. The command attribute for SCMD_REQUEST_SENSE
16997 16997 * does not say that it is retriable. That because if you reissue a
16998 16998 * request sense and the target responds the sense data will have
16999 16999 * been consumed and no long be valid. If we get a busy status on
17000 17000 * request sense while the state is ST_STATE_SENSING this will
17001 17001 * reissue that pkt.
17002 17002 *
17003 17003 * XXX If this request sense gets sent to a different port then
17004 17004 * the original command that failed was sent on it will not get
17005 17005 * valid sense data for that command.
17006 17006 */
17007 17007 if (rcv->cmd_attrib->retriable || un->un_rqs_bp == bp) {
17008 17008 status = st_recover_reissue_pkt(un, &errinfo->ei_failed_pkt);
17009 17009
17010 17010 /*
17011 17011 * if drive doesn't support read position we are done
17012 17012 */
17013 17013 } else if (un->un_read_pos_type == NO_POS) {
17014 17014 status = COMMAND_DONE_ERROR;
17015 17015 /*
17016 17016 * If this command results in a changed tape position,
17017 17017 * lets see where we are.
17018 17018 */
17019 17019 } else if (rcv->cmd_attrib->chg_tape_pos) {
17020 17020 /*
17021 17021 * XXX May be a reason to choose a different type here.
17022 17022 * Long format has file position information.
17023 17023 * Short and Extended have information about whats
17024 17024 * in the buffer. St's positioning assumes in the buffer
17025 17025 * to be the same as on tape.
17026 17026 */
17027 17027 rval = st_compare_expected_position(un, errinfo,
17028 17028 rcv->cmd_attrib, &cur_pos);
17029 17029 if (rval == 0) {
17030 17030 status = COMMAND_DONE;
17031 17031 } else if (rval == EAGAIN) {
17032 17032 status = st_recover_reissue_pkt(un,
17033 17033 &errinfo->ei_failed_pkt);
17034 17034 } else {
17035 17035 status = COMMAND_DONE_ERROR;
17036 17036 }
17037 17037 } else {
17038 17038 ASSERT(0);
17039 17039 }
17040 17040
17041 17041 st_recov_ret(un, errinfo, status);
17042 17042 }
17043 17043
17044 17044 static void
17045 17045 st_recov_cb(struct scsi_pkt *pkt)
17046 17046 {
17047 17047 struct scsi_tape *un;
17048 17048 struct buf *bp;
17049 17049 recov_info *rcv;
17050 17050 errstate action = COMMAND_DONE_ERROR;
17051 17051 int timout = ST_TRAN_BUSY_TIMEOUT; /* short (default) timeout */
17052 17052
17053 17053 /*
17054 17054 * Get the buf from the packet.
17055 17055 */
17056 17056 rcv = pkt->pkt_private;
17057 17057 ASSERT(rcv->privatelen == sizeof (recov_info));
17058 17058 bp = rcv->cmd_bp;
17059 17059
17060 17060 /*
17061 17061 * get the unit from the buf.
17062 17062 */
17063 17063 un = ddi_get_soft_state(st_state, MTUNIT(bp->b_edev));
17064 17064 ASSERT(un != NULL);
17065 17065
17066 17066 ST_FUNC(ST_DEVINFO, st_recov_cb);
17067 17067
17068 17068 mutex_enter(ST_MUTEX);
17069 17069
17070 17070 ASSERT(bp == un->un_recov_buf);
17071 17071
17072 17072
17073 17073 switch (pkt->pkt_reason) {
17074 17074 case CMD_CMPLT:
17075 17075 if (un->un_arq_enabled && pkt->pkt_state & STATE_ARQ_DONE) {
17076 17076 action = st_handle_autosense(un, bp, &rcv->pos);
17077 17077 } else if ((SCBP(pkt)->sts_busy) ||
17078 17078 (SCBP(pkt)->sts_chk) ||
17079 17079 (SCBP(pkt)->sts_vu7)) {
17080 17080 action = st_check_error(un, pkt);
17081 17081 } else {
17082 17082 action = COMMAND_DONE;
17083 17083 }
17084 17084 break;
17085 17085 case CMD_TIMEOUT:
17086 17086 action = COMMAND_TIMEOUT;
17087 17087 break;
17088 17088 case CMD_TRAN_ERR:
17089 17089 action = QUE_COMMAND;
17090 17090 break;
17091 17091 case CMD_DEV_GONE:
17092 17092 if (un->un_multipath)
17093 17093 action = PATH_FAILED;
17094 17094 else
17095 17095 action = COMMAND_DONE_ERROR;
17096 17096 break;
17097 17097 default:
17098 17098 ST_DEBUG(ST_DEVINFO, st_label, CE_PANIC,
17099 17099 "pkt_reason not handled yet %s",
17100 17100 scsi_rname(pkt->pkt_reason));
17101 17101 action = COMMAND_DONE_ERROR;
17102 17102 }
17103 17103
17104 17104 /*
17105 17105 * check for undetected path failover.
17106 17106 */
17107 17107 if (un->un_multipath) {
17108 17108 if (scsi_pkt_allocated_correctly(pkt) &&
17109 17109 (un->un_last_path_instance != pkt->pkt_path_instance)) {
17110 17110 if (un->un_state > ST_STATE_OPENING) {
17111 17111 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
17112 17112 "Failover detected in recovery, action is "
17113 17113 "%s\n", errstatenames[action]);
17114 17114 }
17115 17115 un->un_last_path_instance = pkt->pkt_path_instance;
17116 17116 }
17117 17117 }
17118 17118
17119 17119 ST_RECOV(ST_DEVINFO, st_label, CE_WARN,
17120 17120 "Recovery call back got %s status on %s\n",
17121 17121 errstatenames[action], st_print_scsi_cmd(pkt->pkt_cdbp[0]));
17122 17122
17123 17123 switch (action) {
17124 17124 case COMMAND_DONE:
17125 17125 break;
17126 17126
17127 17127 case COMMAND_DONE_EACCES:
17128 17128 bioerror(bp, EACCES);
17129 17129 break;
17130 17130
17131 17131 case COMMAND_DONE_ERROR_RECOVERED: /* XXX maybe wrong */
17132 17132 ASSERT(0);
17133 17133 break;
17134 17134
17135 17135 case COMMAND_TIMEOUT:
17136 17136 case COMMAND_DONE_ERROR:
17137 17137 bioerror(bp, EIO);
17138 17138 break;
17139 17139
17140 17140 case DEVICE_RESET:
17141 17141 case QUE_BUSY_COMMAND:
17142 17142 case PATH_FAILED:
17143 17143 /* longish timeout */
17144 17144 timout = ST_STATUS_BUSY_TIMEOUT;
17145 17145 /* FALLTHRU */
17146 17146 case QUE_COMMAND:
17147 17147 case DEVICE_TAMPER:
17148 17148 case ATTEMPT_RETRY:
17149 17149 /*
17150 17150 * let st_handle_intr_busy put this bp back on waitq and make
17151 17151 * checks to see if it is ok to requeue the command.
17152 17152 */
17153 17153 ST_DO_KSTATS(bp, kstat_runq_back_to_waitq);
17154 17154
17155 17155 /*
17156 17156 * Save the throttle before setting up the timeout
17157 17157 */
17158 17158 if (un->un_throttle) {
17159 17159 un->un_last_throttle = un->un_throttle;
17160 17160 }
17161 17161 mutex_exit(ST_MUTEX);
17162 17162 if (st_handle_intr_busy(un, bp, timout) == 0) {
17163 17163 return; /* timeout is setup again */
17164 17164 }
17165 17165 mutex_enter(ST_MUTEX);
17166 17166 un->un_pos.pmode = invalid;
17167 17167 un->un_err_resid = bp->b_resid = bp->b_bcount;
17168 17168 st_bioerror(bp, EIO);
17169 17169 st_set_pe_flag(un);
17170 17170 break;
17171 17171
17172 17172 default:
17173 17173 ST_DEBUG(ST_DEVINFO, st_label, CE_PANIC,
17174 17174 "Unhandled recovery state 0x%x\n", action);
17175 17175 un->un_pos.pmode = invalid;
17176 17176 un->un_err_resid = bp->b_resid = bp->b_bcount;
17177 17177 st_bioerror(bp, EIO);
17178 17178 st_set_pe_flag(un);
17179 17179 break;
17180 17180 }
17181 17181
17182 17182 st_done_and_mutex_exit(un, bp);
17183 17183 }
17184 17184
17185 17185 static int
17186 17186 st_rcmd(struct scsi_tape *un, int com, int64_t count, int wait)
17187 17187 {
17188 17188 struct buf *bp;
17189 17189 int err;
17190 17190
17191 17191 ST_FUNC(ST_DEVINFO, st_rcmd);
17192 17192
17193 17193 ST_DEBUG3(ST_DEVINFO, st_label, SCSI_DEBUG,
17194 17194 "st_rcmd(un = 0x%p, com = 0x%x, count = %"PRIx64", wait = %d)\n",
17195 17195 (void *)un, com, count, wait);
17196 17196
17197 17197 ASSERT(MUTEX_HELD(&un->un_sd->sd_mutex));
17198 17198 ASSERT(mutex_owned(ST_MUTEX));
17199 17199
17200 17200 #ifdef STDEBUG
17201 17201 if ((st_debug & 0x7)) {
17202 17202 st_debug_cmds(un, com, count, wait);
17203 17203 }
17204 17204 #endif
17205 17205
17206 17206 while (un->un_recov_buf_busy)
17207 17207 cv_wait(&un->un_recov_buf_cv, ST_MUTEX);
17208 17208 un->un_recov_buf_busy = 1;
17209 17209
17210 17210 bp = un->un_recov_buf;
17211 17211 bzero(bp, sizeof (buf_t));
17212 17212
17213 17213 bp->b_flags = (wait) ? B_BUSY : B_BUSY|B_ASYNC;
17214 17214
17215 17215 err = st_setup_cmd(un, bp, com, count);
17216 17216
17217 17217 un->un_recov_buf_busy = 0;
17218 17218
17219 17219 cv_signal(&un->un_recov_buf_cv);
17220 17220
17221 17221 return (err);
17222 17222 }
17223 17223
17224 17224 /* args used */
17225 17225 static int
17226 17226 st_uscsi_rcmd(struct scsi_tape *un, struct uscsi_cmd *ucmd, int flag)
17227 17227 {
17228 17228 int rval;
17229 17229 buf_t *bp;
17230 17230
17231 17231 ST_FUNC(ST_DEVINFO, st_uscsi_rcmd);
17232 17232 ASSERT(flag == FKIOCTL);
17233 17233
17234 17234 /*
17235 17235 * Get buffer resources...
17236 17236 */
17237 17237 while (un->un_recov_buf_busy)
17238 17238 cv_wait(&un->un_recov_buf_cv, ST_MUTEX);
17239 17239 un->un_recov_buf_busy = 1;
17240 17240
17241 17241 bp = un->un_recov_buf;
17242 17242 bzero(bp, sizeof (buf_t));
17243 17243
17244 17244 bp->b_forw = (struct buf *)(uintptr_t)ucmd->uscsi_cdb[0];
17245 17245 bp->b_back = (struct buf *)ucmd;
17246 17246
17247 17247 mutex_exit(ST_MUTEX);
17248 17248 rval = scsi_uscsi_handle_cmd(un->un_dev, UIO_SYSSPACE, ucmd,
17249 17249 st_strategy, bp, NULL);
17250 17250 mutex_enter(ST_MUTEX);
17251 17251
17252 17252 ucmd->uscsi_resid = bp->b_resid;
17253 17253
17254 17254 /*
17255 17255 * Free resources
17256 17256 */
17257 17257 un->un_recov_buf_busy = 0;
17258 17258 cv_signal(&un->un_recov_buf_cv);
17259 17259
17260 17260 return (rval);
17261 17261 }
17262 17262
17263 17263 /*
17264 17264 * Add data to scsi_pkt to help know what to do if the command fails.
17265 17265 */
17266 17266 static void
17267 17267 st_add_recovery_info_to_pkt(struct scsi_tape *un, buf_t *bp,
17268 17268 struct scsi_pkt *pkt)
17269 17269 {
17270 17270 uint64_t count;
17271 17271 recov_info *rinfo = (recov_info *)pkt->pkt_private;
17272 17272
17273 17273 ST_FUNC(ST_DEVINFO, st_add_recovery_info_to_pkt);
17274 17274
17275 17275 ASSERT(rinfo->privatelen == sizeof (pkt_info) ||
17276 17276 rinfo->privatelen == sizeof (recov_info));
17277 17277
17278 17278 SET_BP_PKT(bp, pkt);
17279 17279 rinfo->cmd_bp = bp;
17280 17280
17281 17281 if (rinfo->privatelen != sizeof (recov_info)) {
17282 17282 return;
17283 17283 }
17284 17284
17285 17285 rinfo->cmd_bp = bp;
17286 17286
17287 17287 rinfo->cmd_attrib = NULL;
17288 17288
17289 17289 /*
17290 17290 * lookup the command attributes and add them to the recovery info.
17291 17291 */
17292 17292 rinfo->cmd_attrib = st_lookup_cmd_attribute(pkt->pkt_cdbp[0]);
17293 17293
17294 17294 ASSERT(rinfo->cmd_attrib);
17295 17295
17296 17296 /*
17297 17297 * For commands that there is no way to figure the expected position
17298 17298 * once completed, we save the position the command was started from
17299 17299 * so that if they fail we can position back and try again.
17300 17300 * This has already been done in st_cmd() or st_iscsi_cmd().
17301 17301 */
17302 17302 if (rinfo->cmd_attrib->recov_pos_type == POS_STARTING) {
17303 17303 /* save current position as the starting position. */
17304 17304 COPY_POS(&rinfo->pos, &un->un_pos);
17305 17305 un->un_running.pmode = invalid;
17306 17306 return;
17307 17307 }
17308 17308
17309 17309 /*
17310 17310 * Don't want to update the running position for recovery.
17311 17311 */
17312 17312 if (bp == un->un_recov_buf) {
17313 17313 rinfo->pos.pmode = un->un_running.pmode;
17314 17314 return;
17315 17315 }
17316 17316 /*
17317 17317 * If running position is invalid copy the current position.
17318 17318 * Running being set invalid means we are not in a read, write
17319 17319 * or write filemark sequence.
17320 17320 * We'll copy the current position and start from there.
17321 17321 */
17322 17322 if (un->un_running.pmode == invalid) {
17323 17323 COPY_POS(&un->un_running, &un->un_pos);
17324 17324 COPY_POS(&rinfo->pos, &un->un_running);
17325 17325 } else {
17326 17326 COPY_POS(&rinfo->pos, &un->un_running);
17327 17327 if (rinfo->pos.pmode == legacy) {
17328 17328 /*
17329 17329 * Always should be more logical blocks then
17330 17330 * data blocks and files marks.
17331 17331 */
17332 17332 ASSERT((rinfo->pos.blkno >= 0) ?
17333 17333 rinfo->pos.lgclblkno >=
17334 17334 (rinfo->pos.blkno + rinfo->pos.fileno) : 1);
17335 17335 }
17336 17336 }
17337 17337
17338 17338 /*
17339 17339 * If the command is not expected to change the drive position
17340 17340 * then the running position should be the expected position.
17341 17341 */
17342 17342 if (rinfo->cmd_attrib->chg_tape_pos == 0) {
17343 17343 ASSERT(rinfo->cmd_attrib->chg_tape_direction == DIR_NONE);
17344 17344 return;
17345 17345 }
17346 17346
17347 17347 if (rinfo->cmd_attrib->explicit_cmd_set) {
17348 17348 ASSERT(rinfo->pos.pmode != invalid);
17349 17349 ASSERT(rinfo->cmd_attrib->get_cnt);
17350 17350 count = rinfo->cmd_attrib->get_cnt(pkt->pkt_cdbp);
17351 17351 /*
17352 17352 * This is a user generated CDB.
17353 17353 */
17354 17354 if (bp == un->un_sbufp) {
17355 17355 uint64_t lbn;
17356 17356
17357 17357 lbn = rinfo->cmd_attrib->get_lba(pkt->pkt_cdbp);
17358 17358
17359 17359 /*
17360 17360 * See if this CDB will generate a locate or change
17361 17361 * partition.
17362 17362 */
17363 17363 if ((lbn != un->un_running.lgclblkno) ||
17364 17364 (pkt->pkt_cdbp[3] != un->un_running.partition)) {
17365 17365 rinfo->pos.partition = pkt->pkt_cdbp[3];
17366 17366 rinfo->pos.pmode = logical;
17367 17367 rinfo->pos.lgclblkno = lbn;
17368 17368 un->un_running.partition = pkt->pkt_cdbp[3];
17369 17369 un->un_running.pmode = logical;
17370 17370 un->un_running.lgclblkno = lbn;
17371 17371 }
17372 17372 } else {
17373 17373 uint64_t lbn = un->un_running.lgclblkno;
17374 17374
17375 17375 pkt->pkt_cdbp[3] = (uchar_t)un->un_running.partition;
17376 17376
17377 17377 pkt->pkt_cdbp[4] = (uchar_t)(lbn >> 56);
17378 17378 pkt->pkt_cdbp[5] = (uchar_t)(lbn >> 48);
17379 17379 pkt->pkt_cdbp[6] = (uchar_t)(lbn >> 40);
17380 17380 pkt->pkt_cdbp[7] = (uchar_t)(lbn >> 32);
17381 17381 pkt->pkt_cdbp[8] = (uchar_t)(lbn >> 24);
17382 17382 pkt->pkt_cdbp[9] = (uchar_t)(lbn >> 16);
17383 17383 pkt->pkt_cdbp[10] = (uchar_t)(lbn >> 8);
17384 17384 pkt->pkt_cdbp[11] = (uchar_t)(lbn);
17385 17385 }
17386 17386 rinfo->pos.lgclblkno += count;
17387 17387 rinfo->pos.blkno += count;
17388 17388 un->un_running.lgclblkno += count;
17389 17389 return;
17390 17390 }
17391 17391
17392 17392 if (rinfo->cmd_attrib->chg_tape_pos) {
17393 17393
17394 17394 /* should not have got an invalid position from running. */
17395 17395 if (un->un_mediastate == MTIO_INSERTED) {
17396 17396 ASSERT(rinfo->pos.pmode != invalid);
17397 17397 }
17398 17398
17399 17399 /* should have either a get count or or get lba function */
17400 17400 ASSERT(rinfo->cmd_attrib->get_cnt != NULL ||
17401 17401 rinfo->cmd_attrib->get_lba != NULL);
17402 17402
17403 17403 /* only explicit commands have both and they're handled above */
17404 17404 ASSERT(!(rinfo->cmd_attrib->get_cnt != NULL &&
17405 17405 rinfo->cmd_attrib->get_lba != NULL));
17406 17406
17407 17407 /* if it has a get count function */
17408 17408 if (rinfo->cmd_attrib->get_cnt != NULL) {
17409 17409 count = rinfo->cmd_attrib->get_cnt(pkt->pkt_cdbp);
17410 17410 if (count == 0) {
17411 17411 return;
17412 17412 }
17413 17413 /*
17414 17414 * Changes position but doesn't transfer data.
17415 17415 * i.e. rewind, write_file_mark and load.
17416 17416 */
17417 17417 if (rinfo->cmd_attrib->transfers_data == TRAN_NONE) {
17418 17418 switch (rinfo->cmd_attrib->chg_tape_direction) {
17419 17419 case DIR_NONE: /* Erase */
17420 17420 ASSERT(rinfo->cmd_attrib->cmd ==
17421 17421 SCMD_ERASE);
17422 17422 break;
17423 17423 case DIR_FORW: /* write_file_mark */
17424 17424 rinfo->pos.fileno += count;
17425 17425 rinfo->pos.lgclblkno += count;
17426 17426 rinfo->pos.blkno = 0;
17427 17427 un->un_running.fileno += count;
17428 17428 un->un_running.lgclblkno += count;
17429 17429 un->un_running.blkno = 0;
17430 17430 break;
17431 17431 case DIR_REVC: /* rewind */
17432 17432 rinfo->pos.fileno = 0;
17433 17433 rinfo->pos.lgclblkno = 0;
17434 17434 rinfo->pos.blkno = 0;
17435 17435 rinfo->pos.eof = ST_NO_EOF;
17436 17436 rinfo->pos.pmode = legacy;
17437 17437 un->un_running.fileno = 0;
17438 17438 un->un_running.lgclblkno = 0;
17439 17439 un->un_running.blkno = 0;
17440 17440 un->un_running.eof = ST_NO_EOF;
17441 17441 if (un->un_running.pmode != legacy)
17442 17442 un->un_running.pmode = legacy;
17443 17443 break;
17444 17444 case DIR_EITH: /* Load unload */
17445 17445 ASSERT(rinfo->cmd_attrib->cmd ==
17446 17446 SCMD_LOAD);
17447 17447 switch (count & (LD_LOAD | LD_RETEN |
17448 17448 LD_RETEN | LD_HOLD)) {
17449 17449 case LD_UNLOAD:
17450 17450 case LD_RETEN:
17451 17451 case LD_HOLD:
17452 17452 case LD_LOAD | LD_HOLD:
17453 17453 case LD_EOT | LD_HOLD:
17454 17454 case LD_RETEN | LD_HOLD:
17455 17455 rinfo->pos.pmode = invalid;
17456 17456 un->un_running.pmode = invalid;
17457 17457 break;
17458 17458 case LD_EOT:
17459 17459 case LD_LOAD | LD_EOT:
17460 17460 rinfo->pos.eof = ST_EOT;
17461 17461 rinfo->pos.pmode = invalid;
17462 17462 un->un_running.eof = ST_EOT;
17463 17463 un->un_running.pmode = invalid;
17464 17464 break;
17465 17465 case LD_LOAD:
17466 17466 case LD_RETEN | LD_LOAD:
17467 17467 rinfo->pos.fileno = 0;
17468 17468 rinfo->pos.lgclblkno = 0;
17469 17469 rinfo->pos.blkno = 0;
17470 17470 rinfo->pos.eof = ST_NO_EOF;
17471 17471 rinfo->pos.pmode = legacy;
17472 17472 un->un_running.fileno = 0;
17473 17473 un->un_running.lgclblkno = 0;
17474 17474 un->un_running.blkno = 0;
17475 17475 un->un_running.eof = ST_NO_EOF;
17476 17476 break;
17477 17477 default:
17478 17478 ASSERT(0);
17479 17479 }
17480 17480 break;
17481 17481 default:
17482 17482 ASSERT(0);
17483 17483 break;
17484 17484 }
17485 17485 } else {
17486 17486 /*
17487 17487 * Changes position and does transfer data.
17488 17488 * i.e. read or write.
17489 17489 */
17490 17490 switch (rinfo->cmd_attrib->chg_tape_direction) {
17491 17491 case DIR_FORW:
17492 17492 rinfo->pos.lgclblkno += count;
17493 17493 rinfo->pos.blkno += count;
17494 17494 un->un_running.lgclblkno += count;
17495 17495 un->un_running.blkno += count;
17496 17496 break;
17497 17497 case DIR_REVC:
17498 17498 rinfo->pos.lgclblkno -= count;
17499 17499 rinfo->pos.blkno -= count;
17500 17500 un->un_running.lgclblkno -= count;
17501 17501 un->un_running.blkno -= count;
17502 17502 break;
17503 17503 default:
17504 17504 ASSERT(0);
17505 17505 break;
17506 17506 }
17507 17507 }
17508 17508 } else if (rinfo->cmd_attrib->get_lba != NULL) {
17509 17509 /* Have a get LBA fuction. i.e. Locate */
17510 17510 ASSERT(rinfo->cmd_attrib->chg_tape_direction ==
17511 17511 DIR_EITH);
17512 17512 count = rinfo->cmd_attrib->get_lba(pkt->pkt_cdbp);
17513 17513 un->un_running.lgclblkno = count;
17514 17514 un->un_running.blkno = 0;
17515 17515 un->un_running.fileno = 0;
17516 17516 un->un_running.pmode = logical;
17517 17517 rinfo->pos.lgclblkno = count;
17518 17518 rinfo->pos.pmode = invalid;
17519 17519 } else {
17520 17520 ASSERT(0);
17521 17521 }
17522 17522 return;
17523 17523 }
17524 17524
17525 17525 ST_CDB(ST_DEVINFO, "Unhanded CDB for position prediction",
17526 17526 (char *)pkt->pkt_cdbp);
17527 17527
17528 17528 }
17529 17529
17530 17530 static int
17531 17531 st_make_sure_mode_data_is_correct(struct scsi_tape *un, ubufunc_t ubf)
17532 17532 {
17533 17533 int rval;
17534 17534
17535 17535 ST_FUNC(ST_DEVINFO, st_make_sure_mode_data_is_correct);
17536 17536
17537 17537 /*
17538 17538 * check to see if mode data has changed.
17539 17539 */
17540 17540 rval = st_check_mode_for_change(un, ubf);
17541 17541 if (rval) {
17542 17542 rval = st_gen_mode_select(un, ubf, un->un_mspl,
17543 17543 sizeof (struct seq_mode));
17544 17544 }
17545 17545 if (un->un_tlr_flag != TLR_NOT_SUPPORTED) {
17546 17546 rval |= st_set_target_TLR_mode(un, ubf);
17547 17547 }
17548 17548 return (rval);
17549 17549 }
17550 17550
17551 17551 static int
17552 17552 st_check_mode_for_change(struct scsi_tape *un, ubufunc_t ubf)
17553 17553 {
17554 17554 struct seq_mode *current;
17555 17555 int rval;
17556 17556 int i;
17557 17557 caddr_t this;
17558 17558 caddr_t that;
17559 17559
17560 17560 ST_FUNC(ST_DEVINFO, st_check_mode_for_change);
17561 17561
17562 17562 /* recovery called with mode tamper before mode selection */
17563 17563 if (un->un_comp_page == (ST_DEV_DATACOMP_PAGE | ST_DEV_CONFIG_PAGE)) {
17564 17564 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
17565 17565 "Mode Select not done yet");
17566 17566 return (0);
17567 17567 }
17568 17568
17569 17569 current = kmem_zalloc(sizeof (struct seq_mode), KM_SLEEP);
17570 17570
17571 17571 rval = st_gen_mode_sense(un, ubf, un->un_comp_page, current,
17572 17572 sizeof (struct seq_mode));
17573 17573 if (rval != 0) {
17574 17574 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
17575 17575 "Mode Sense for mode verification failed");
17576 17576 kmem_free(current, sizeof (struct seq_mode));
17577 17577 return (rval);
17578 17578 }
17579 17579
17580 17580 this = (caddr_t)current;
17581 17581 that = (caddr_t)un->un_mspl;
17582 17582
17583 17583 rval = bcmp(this, that, sizeof (struct seq_mode));
17584 17584 if (rval == 0) {
17585 17585 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
17586 17586 "Found no changes in mode data");
17587 17587 }
17588 17588 #ifdef STDEBUG
17589 17589 else {
17590 17590 for (i = 1; i < sizeof (struct seq_mode); i++) {
17591 17591 if (this[i] != that[i]) {
17592 17592 ST_RECOV(ST_DEVINFO, st_label, CE_CONT,
17593 17593 "sense data changed at byte %d was "
17594 17594 "0x%x now 0x%x", i,
17595 17595 (uchar_t)that[i], (uchar_t)this[i]);
17596 17596 }
17597 17597 }
17598 17598 }
17599 17599 #endif
17600 17600 kmem_free(current, sizeof (struct seq_mode));
17601 17601
17602 17602 return (rval);
17603 17603 }
17604 17604
17605 17605 static int
17606 17606 st_test_path_to_device(struct scsi_tape *un)
17607 17607 {
17608 17608 int rval = 0;
17609 17609 int limit = st_retry_count;
17610 17610
17611 17611 ST_FUNC(ST_DEVINFO, st_test_path_to_device);
17612 17612
17613 17613 /*
17614 17614 * XXX Newer drives may not RESEVATION CONFLICT a TUR.
17615 17615 */
17616 17616 do {
17617 17617 if (rval != 0) {
17618 17618 mutex_exit(ST_MUTEX);
17619 17619 delay(drv_usectohz(1000000));
17620 17620 mutex_enter(ST_MUTEX);
17621 17621 }
17622 17622 rval = st_rcmd(un, SCMD_TEST_UNIT_READY, 0, SYNC_CMD);
17623 17623 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
17624 17624 "ping TUR returned 0x%x", rval);
17625 17625 limit--;
17626 17626 } while (((rval == EACCES) || (rval == EBUSY)) && limit);
17627 17627
17628 17628 if (un->un_status == KEY_NOT_READY || un->un_mediastate == MTIO_EJECTED)
17629 17629 rval = 0;
17630 17630
17631 17631 return (rval);
17632 17632 }
17633 17633
17634 17634 /*
17635 17635 * Does read position using recov_buf and doesn't update un_pos.
17636 17636 * Does what ever kind of read position you want.
17637 17637 */
17638 17638 static int
17639 17639 st_recovery_read_pos(struct scsi_tape *un, read_p_types type,
17640 17640 read_pos_data_t *raw)
17641 17641 {
17642 17642 int rval;
17643 17643 struct uscsi_cmd cmd;
17644 17644 struct scsi_arq_status status;
17645 17645 char cdb[CDB_GROUP1];
17646 17646
17647 17647 ST_FUNC(ST_DEVINFO, st_recovery_read_pos);
17648 17648 bzero(&cmd, sizeof (cmd));
17649 17649
17650 17650 cdb[0] = SCMD_READ_POSITION;
17651 17651 cdb[1] = type;
17652 17652 cdb[2] = 0;
17653 17653 cdb[3] = 0;
17654 17654 cdb[4] = 0;
17655 17655 cdb[5] = 0;
17656 17656 cdb[6] = 0;
17657 17657 cdb[7] = 0;
17658 17658 cdb[8] = (type == EXT_POS) ? 28 : 0;
17659 17659 cdb[9] = 0;
17660 17660
17661 17661 cmd.uscsi_flags = USCSI_READ | USCSI_RQENABLE;
17662 17662 cmd.uscsi_timeout = un->un_dp->non_motion_timeout;
17663 17663 cmd.uscsi_cdb = cdb;
17664 17664 cmd.uscsi_cdblen = sizeof (cdb);
17665 17665 cmd.uscsi_rqlen = sizeof (status);
17666 17666 cmd.uscsi_rqbuf = (caddr_t)&status;
17667 17667 cmd.uscsi_bufaddr = (caddr_t)raw;
17668 17668 switch (type) {
17669 17669 case SHORT_POS:
17670 17670 cmd.uscsi_buflen = sizeof (tape_position_t);
17671 17671 break;
17672 17672 case LONG_POS:
17673 17673 cmd.uscsi_buflen = sizeof (tape_position_long_t);
17674 17674 break;
17675 17675 case EXT_POS:
17676 17676 cmd.uscsi_buflen = sizeof (tape_position_ext_t);
17677 17677 break;
17678 17678 default:
17679 17679 ASSERT(0);
17680 17680 }
17681 17681
17682 17682 rval = st_uscsi_rcmd(un, &cmd, FKIOCTL);
17683 17683 if (cmd.uscsi_status) {
17684 17684 rval = EIO;
17685 17685 }
17686 17686 return (rval);
17687 17687 }
17688 17688
17689 17689 static int
17690 17690 st_recovery_get_position(struct scsi_tape *un, tapepos_t *read,
17691 17691 read_pos_data_t *raw)
17692 17692 {
17693 17693 int rval;
17694 17694 read_p_types type = un->un_read_pos_type;
17695 17695
17696 17696 ST_FUNC(ST_DEVINFO, st_recovery_get_position);
17697 17697
17698 17698 do {
17699 17699 rval = st_recovery_read_pos(un, type, raw);
17700 17700 if (rval != 0) {
17701 17701 switch (type) {
17702 17702 case SHORT_POS:
17703 17703 type = NO_POS;
17704 17704 break;
17705 17705
17706 17706 case LONG_POS:
17707 17707 type = EXT_POS;
17708 17708 break;
17709 17709
17710 17710 case EXT_POS:
17711 17711 type = SHORT_POS;
17712 17712 break;
17713 17713
17714 17714 default:
17715 17715 type = LONG_POS;
17716 17716 break;
17717 17717
17718 17718 }
17719 17719 } else {
17720 17720 if (type != un->un_read_pos_type) {
17721 17721 un->un_read_pos_type = type;
17722 17722 }
17723 17723 break;
17724 17724 }
17725 17725 } while (type != NO_POS);
17726 17726
17727 17727 if (rval == 0) {
17728 17728 rval = st_interpret_read_pos(un, read, type,
17729 17729 sizeof (read_pos_data_t), (caddr_t)raw, 1);
17730 17730 }
17731 17731 return (rval);
17732 17732 }
17733 17733
17734 17734 /*
17735 17735 * based on the command do we retry, continue or give up?
17736 17736 * possable return values?
17737 17737 * zero do nothing looks fine.
17738 17738 * EAGAIN retry.
17739 17739 * EIO failed makes no sense.
17740 17740 */
17741 17741 static int
17742 17742 st_compare_expected_position(struct scsi_tape *un, st_err_info *ei,
17743 17743 cmd_attribute const * cmd_att, tapepos_t *read)
17744 17744 {
17745 17745 int rval;
17746 17746 read_pos_data_t *readp_datap;
17747 17747
17748 17748 ST_FUNC(ST_DEVINFO, st_compare_expected_position);
17749 17749
17750 17750 ASSERT(un != NULL);
17751 17751 ASSERT(ei != NULL);
17752 17752 ASSERT(read != NULL);
17753 17753 ASSERT(cmd_att->chg_tape_pos);
17754 17754
17755 17755 COPY_POS(read, &ei->ei_expected_pos);
17756 17756
17757 17757 readp_datap = kmem_zalloc(sizeof (read_pos_data_t), KM_SLEEP);
17758 17758
17759 17759 rval = st_recovery_get_position(un, read, readp_datap);
17760 17760
17761 17761 kmem_free(readp_datap, sizeof (read_pos_data_t));
17762 17762
17763 17763 if (rval != 0) {
17764 17764 return (EIO);
17765 17765 }
17766 17766
17767 17767 ST_POS(ST_DEVINFO, "st_compare_expected_position", read);
17768 17768
17769 17769 if ((read->pmode == invalid) ||
17770 17770 (ei->ei_expected_pos.pmode == invalid)) {
17771 17771 return (EIO);
17772 17772 }
17773 17773
17774 17774 /*
17775 17775 * Command that changes tape position and have an expected position
17776 17776 * if it were to chave completed sucessfully.
17777 17777 */
17778 17778 if (cmd_att->recov_pos_type == POS_EXPECTED) {
17779 17779 uint32_t count;
17780 17780 int64_t difference;
17781 17781 uchar_t reposition = 0;
17782 17782
17783 17783 ASSERT(cmd_att->get_cnt);
17784 17784 count = cmd_att->get_cnt(ei->ei_failed_pkt.pkt_cdbp);
17785 17785
17786 17786 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
17787 17787 "Got count from CDB and it was %d\n", count);
17788 17788
17789 17789 /*
17790 17790 * At expected?
17791 17791 */
17792 17792 if (read->lgclblkno == ei->ei_expected_pos.lgclblkno) {
17793 17793 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
17794 17794 "Found drive to be at expected position\n");
17795 17795
17796 17796 /*
17797 17797 * If the command should move tape and it got a busy
17798 17798 * it shouldn't be in the expected position.
17799 17799 */
17800 17800 if (ei->ei_failing_status.sts_status.sts_busy != 0) {
17801 17801 reposition = 1;
17802 17802
17803 17803 /*
17804 17804 * If the command doesn't transfer data should be good.
17805 17805 */
17806 17806 } else if (cmd_att->transfers_data == TRAN_NONE) {
17807 17807 return (0); /* Good */
17808 17808
17809 17809 /*
17810 17810 * Command transfers data, should have done so.
17811 17811 */
17812 17812 } else if (ei->ei_failed_pkt.pkt_state &
17813 17813 STATE_XFERRED_DATA) {
17814 17814 return (0); /* Good */
17815 17815 } else {
17816 17816 reposition = 1;
17817 17817 }
17818 17818 }
17819 17819
17820 17820 if (cmd_att->chg_tape_direction == DIR_FORW) {
17821 17821 difference =
17822 17822 ei->ei_expected_pos.lgclblkno - read->lgclblkno;
17823 17823
17824 17824 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
17825 17825 "difference between expected and actual is %"
17826 17826 PRId64"\n", difference);
17827 17827 if (count == difference && reposition == 0) {
17828 17828 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
17829 17829 "Found failed FORW command, retrying\n");
17830 17830 return (EAGAIN);
17831 17831 }
17832 17832
17833 17833 /*
17834 17834 * If rewound or somewhere between the starting position
17835 17835 * and the expected position (partial read or write).
17836 17836 * Locate to the starting position and try the whole
17837 17837 * thing over again.
17838 17838 */
17839 17839 if ((read->lgclblkno == 0) ||
17840 17840 ((difference > 0) && (difference < count))) {
17841 17841 rval = st_logical_block_locate(un,
17842 17842 st_uscsi_rcmd, read,
17843 17843 ei->ei_expected_pos.lgclblkno - count,
17844 17844 ei->ei_expected_pos.partition);
17845 17845 if (rval == 0) {
17846 17846 ST_RECOV(ST_DEVINFO, st_label,
17847 17847 CE_NOTE, "reestablished FORW"
17848 17848 " command retrying\n");
17849 17849 return (EAGAIN);
17850 17850 }
17851 17851 /*
17852 17852 * This handles flushed read ahead on the drive or
17853 17853 * an aborted read that presents as a busy and advanced
17854 17854 * the tape position.
17855 17855 */
17856 17856 } else if ((cmd_att->transfers_data == TRAN_READ) &&
17857 17857 ((difference < 0) || (reposition == 1))) {
17858 17858 rval = st_logical_block_locate(un,
17859 17859 st_uscsi_rcmd, read,
17860 17860 ei->ei_expected_pos.lgclblkno - count,
17861 17861 ei->ei_expected_pos.partition);
17862 17862 if (rval == 0) {
17863 17863 ST_RECOV(ST_DEVINFO, st_label,
17864 17864 CE_NOTE, "reestablished FORW"
17865 17865 " read command retrying\n");
17866 17866 return (EAGAIN);
17867 17867 }
17868 17868 /*
17869 17869 * XXX swag seeing difference of 2 on write filemark.
17870 17870 * If the space to the starting position works on a
17871 17871 * write that means the previous write made it to tape.
17872 17872 * If not we lost data and have to give up.
17873 17873 *
17874 17874 * The plot thickens. Now I am attempting to cover a
17875 17875 * count of 1 and a differance of 2 on a write.
17876 17876 */
17877 17877 } else if ((difference > count) || (reposition == 1)) {
17878 17878 rval = st_logical_block_locate(un,
17879 17879 st_uscsi_rcmd, read,
17880 17880 ei->ei_expected_pos.lgclblkno - count,
17881 17881 ei->ei_expected_pos.partition);
17882 17882 if (rval == 0) {
17883 17883 ST_RECOV(ST_DEVINFO, st_label,
17884 17884 CE_NOTE, "reestablished FORW"
17885 17885 " write command retrying\n");
17886 17886 return (EAGAIN);
17887 17887 }
17888 17888 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
17889 17889 "Seek to block %"PRId64" returned %d\n",
17890 17890 ei->ei_expected_pos.lgclblkno - count,
17891 17891 rval);
17892 17892 } else {
17893 17893 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
17894 17894 "Not expected transfers_data = %d "
17895 17895 "difference = %"PRId64,
17896 17896 cmd_att->transfers_data, difference);
17897 17897 }
17898 17898
17899 17899 return (EIO);
17900 17900
17901 17901 } else if (cmd_att->chg_tape_direction == DIR_REVC) {
17902 17902 /* Don't think we can write backwards */
17903 17903 ASSERT(cmd_att->transfers_data != TRAN_WRTE);
17904 17904 difference =
17905 17905 read->lgclblkno - ei->ei_expected_pos.lgclblkno;
17906 17906 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
17907 17907 "difference between expected and actual is %"
17908 17908 PRId64"\n", difference);
17909 17909 if (count == difference && reposition == 0) {
17910 17910 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
17911 17911 "Found failed REVC command, retrying\n");
17912 17912 return (EAGAIN);
17913 17913 }
17914 17914 if ((read->lgclblkno == 0) ||
17915 17915 ((difference > 0) && (difference < count))) {
17916 17916 rval = st_logical_block_locate(un,
17917 17917 st_uscsi_rcmd, read,
17918 17918 ei->ei_expected_pos.lgclblkno + count,
17919 17919 ei->ei_expected_pos.partition);
17920 17920 if (rval == 0) {
17921 17921 ST_RECOV(ST_DEVINFO, st_label,
17922 17922 CE_NOTE, "reestablished REVC"
17923 17923 " command retrying\n");
17924 17924 return (EAGAIN);
17925 17925 }
17926 17926 /* This handles read ahead in reverse direction */
17927 17927 } else if ((cmd_att->transfers_data == TRAN_READ) &&
17928 17928 (difference < 0) || (reposition == 1)) {
17929 17929 rval = st_logical_block_locate(un,
17930 17930 st_uscsi_rcmd, read,
17931 17931 ei->ei_expected_pos.lgclblkno - count,
17932 17932 ei->ei_expected_pos.partition);
17933 17933 if (rval == 0) {
17934 17934 ST_RECOV(ST_DEVINFO, st_label,
17935 17935 CE_NOTE, "reestablished REVC"
17936 17936 " read command retrying\n");
17937 17937 return (EAGAIN);
17938 17938 }
17939 17939 } else {
17940 17940 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
17941 17941 "Not expected transfers_data = %d "
17942 17942 "difference = %"PRId64,
17943 17943 cmd_att->transfers_data, difference);
17944 17944 }
17945 17945 return (EIO);
17946 17946
17947 17947 } else {
17948 17948 /*
17949 17949 * Commands that change tape position either
17950 17950 * direction or don't change position should not
17951 17951 * get here.
17952 17952 */
17953 17953 ASSERT(0);
17954 17954 }
17955 17955 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
17956 17956 "Didn't find a recoverable position, Failing\n");
17957 17957
17958 17958 /*
17959 17959 * Command that changes tape position and can only be recovered
17960 17960 * by going back to the point of origin and retrying.
17961 17961 *
17962 17962 * Example SCMD_SPACE.
17963 17963 */
17964 17964 } else if (cmd_att->recov_pos_type == POS_STARTING) {
17965 17965 /*
17966 17966 * This type of command stores the starting position.
17967 17967 * If the read position is the starting position,
17968 17968 * reissue the command.
17969 17969 */
17970 17970 if (ei->ei_expected_pos.lgclblkno == read->lgclblkno) {
17971 17971 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
17972 17972 "Found Space command at starting position, "
17973 17973 "Reissuing\n");
17974 17974 return (EAGAIN);
17975 17975 }
17976 17976 /*
17977 17977 * Not in the position that the command was originally issued,
17978 17978 * Attempt to locate to that position.
17979 17979 */
17980 17980 rval = st_logical_block_locate(un, st_uscsi_rcmd, read,
17981 17981 ei->ei_expected_pos.lgclblkno,
17982 17982 ei->ei_expected_pos.partition);
17983 17983 if (rval) {
17984 17984 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
17985 17985 "Found Space at an unexpected position and locate "
17986 17986 "back to starting position failed\n");
17987 17987 return (EIO);
17988 17988 }
17989 17989 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
17990 17990 "Found Space at an unexpected position and locate "
17991 17991 "back to starting position worked, Reissuing\n");
17992 17992 return (EAGAIN);
17993 17993 }
17994 17994 st_print_position(ST_DEVINFO, st_label, CE_NOTE,
17995 17995 "Unhandled attribute/expected position", &ei->ei_expected_pos);
17996 17996 st_print_position(ST_DEVINFO, st_label, CE_NOTE,
17997 17997 "Read position above did not make sense", read);
17998 17998 ASSERT(0);
17999 17999 return (EIO);
18000 18000 }
18001 18001
18002 18002 static errstate
18003 18003 st_recover_reissue_pkt(struct scsi_tape *un, struct scsi_pkt *oldpkt)
18004 18004 {
18005 18005 buf_t *bp;
18006 18006 buf_t *pkt_bp;
18007 18007 struct scsi_pkt *newpkt;
18008 18008 cmd_attribute const *attrib;
18009 18009 recov_info *rcv = oldpkt->pkt_private;
18010 18010 uint_t cdblen;
18011 18011 int queued = 0;
18012 18012 int rval;
18013 18013 int flags = 0;
18014 18014 int stat_size =
18015 18015 (un->un_arq_enabled ? sizeof (struct scsi_arq_status) : 1);
18016 18016
18017 18017 ST_FUNC(ST_DEVINFO, st_recover_reissue_pkt);
18018 18018
18019 18019 bp = rcv->cmd_bp;
18020 18020
18021 18021 if (rcv->privatelen == sizeof (recov_info)) {
18022 18022 attrib = rcv->cmd_attrib;
18023 18023 } else {
18024 18024 attrib = st_lookup_cmd_attribute(oldpkt->pkt_cdbp[0]);
18025 18025 }
18026 18026
18027 18027 /*
18028 18028 * Some non-uscsi commands use the b_bcount for values that
18029 18029 * have nothing to do with how much data is transfered.
18030 18030 * In those cases we need to hide the buf_t from scsi_init_pkt().
18031 18031 */
18032 18032 if ((BP_UCMD(bp)) && (bp->b_bcount)) {
18033 18033 pkt_bp = bp;
18034 18034 } else if (attrib->transfers_data == TRAN_NONE) {
18035 18035 pkt_bp = NULL;
18036 18036 } else {
18037 18037 pkt_bp = bp;
18038 18038 }
18039 18039
18040 18040 /*
18041 18041 * if this is a queued command make sure it the only one in the
18042 18042 * run queue.
18043 18043 */
18044 18044 if (bp != un->un_sbufp && bp != un->un_recov_buf) {
18045 18045 ASSERT(un->un_runqf == un->un_runql);
18046 18046 ASSERT(un->un_runqf == bp);
18047 18047 queued = 1;
18048 18048 }
18049 18049
18050 18050 cdblen = scsi_cdb_size[CDB_GROUPID(oldpkt->pkt_cdbp[0])];
18051 18051
18052 18052 if (pkt_bp == un->un_rqs_bp) {
18053 18053 flags |= PKT_CONSISTENT;
18054 18054 stat_size = 1;
18055 18055 }
18056 18056
18057 18057 newpkt = scsi_init_pkt(ROUTE, NULL, pkt_bp, cdblen,
18058 18058 stat_size, rcv->privatelen, flags, NULL_FUNC, NULL);
18059 18059 if (newpkt == NULL) {
18060 18060 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
18061 18061 "Reissue pkt scsi_init_pkt() failure\n");
18062 18062 return (COMMAND_DONE_ERROR);
18063 18063 }
18064 18064
18065 18065 ASSERT(newpkt->pkt_resid == 0);
18066 18066 bp->b_flags &= ~(B_DONE);
18067 18067 bp->b_resid = 0;
18068 18068 st_bioerror(bp, 0);
18069 18069
18070 18070 bcopy(oldpkt->pkt_private, newpkt->pkt_private, rcv->privatelen);
18071 18071
18072 18072 newpkt->pkt_comp = oldpkt->pkt_comp;
18073 18073 newpkt->pkt_time = oldpkt->pkt_time;
18074 18074
18075 18075 bzero(newpkt->pkt_scbp, stat_size);
18076 18076 bcopy(oldpkt->pkt_cdbp, newpkt->pkt_cdbp, cdblen);
18077 18077
18078 18078 newpkt->pkt_state = 0;
18079 18079 newpkt->pkt_statistics = 0;
18080 18080
18081 18081 /*
18082 18082 * oldpkt passed in was a copy of the original.
18083 18083 * to distroy we need the address of the original.
18084 18084 */
18085 18085 oldpkt = BP_PKT(bp);
18086 18086
18087 18087 if (oldpkt == un->un_rqs) {
18088 18088 ASSERT(bp == un->un_rqs_bp);
18089 18089 un->un_rqs = newpkt;
18090 18090 }
18091 18091
18092 18092 SET_BP_PKT(bp, newpkt);
18093 18093
18094 18094 scsi_destroy_pkt(oldpkt);
18095 18095
18096 18096 rval = st_transport(un, newpkt);
18097 18097 if (rval == TRAN_ACCEPT) {
18098 18098 return (JUST_RETURN);
18099 18099 }
18100 18100 ST_RECOV(ST_DEVINFO, st_label, CE_NOTE,
18101 18101 "Reissue pkt st_transport(0x%x) failure\n", rval);
18102 18102 if (rval != TRAN_BUSY) {
18103 18103 return (COMMAND_DONE_ERROR);
18104 18104 }
18105 18105 mutex_exit(ST_MUTEX);
18106 18106 rval = st_handle_start_busy(un, bp, ST_TRAN_BUSY_TIMEOUT, queued);
18107 18107 mutex_enter(ST_MUTEX);
18108 18108 if (rval) {
18109 18109 return (COMMAND_DONE_ERROR);
18110 18110 }
18111 18111
18112 18112 return (JUST_RETURN);
18113 18113 }
18114 18114
18115 18115 static int
18116 18116 st_transport(struct scsi_tape *un, struct scsi_pkt *pkt)
18117 18117 {
18118 18118 int status;
18119 18119
18120 18120 ST_FUNC(ST_DEVINFO, st_transport);
18121 18121
18122 18122 ST_CDB(ST_DEVINFO, "transport CDB", (caddr_t)pkt->pkt_cdbp);
18123 18123
18124 18124 mutex_exit(ST_MUTEX);
18125 18125
18126 18126 status = scsi_transport(pkt);
18127 18127
18128 18128 mutex_enter(ST_MUTEX);
18129 18129
18130 18130 return (status);
18131 18131 }
18132 18132
18133 18133 /*
18134 18134 * Removed the buf_t bp from the queue referenced to by head and tail.
18135 18135 * Returns the buf_t pointer if it is found in the queue.
18136 18136 * Returns NULL if it is not found.
18137 18137 */
18138 18138 static buf_t *
18139 18139 st_remove_from_queue(buf_t **head, buf_t **tail, buf_t *bp)
18140 18140 {
18141 18141 buf_t *runqbp;
18142 18142 buf_t *prevbp = NULL;
18143 18143
18144 18144 for (runqbp = *head; runqbp != 0; runqbp = runqbp->av_forw) {
18145 18145 if (runqbp == bp) {
18146 18146 /* found it, is it at the head? */
18147 18147 if (runqbp == *head) {
18148 18148 *head = bp->av_forw;
18149 18149 } else {
18150 18150 prevbp->av_forw = bp->av_forw;
18151 18151 }
18152 18152 if (*tail == bp) {
18153 18153 *tail = prevbp;
18154 18154 }
18155 18155 bp->av_forw = NULL;
18156 18156 return (bp); /* found and removed */
18157 18157 }
18158 18158 prevbp = runqbp;
18159 18159 }
18160 18160 return (NULL);
18161 18161 }
18162 18162
18163 18163 /*
18164 18164 * Adds a buf_t to the queue pointed to by head and tail.
18165 18165 * Adds it either to the head end or the tail end based on which
18166 18166 * the passed variable end (head or tail) points at.
18167 18167 */
18168 18168 static void
18169 18169 st_add_to_queue(buf_t **head, buf_t **tail, buf_t *end, buf_t *bp)
18170 18170 {
18171 18171
18172 18172 bp->av_forw = NULL;
18173 18173 if (*head) {
18174 18174 /* Queue is not empty */
18175 18175 if (end == *head) {
18176 18176 /* Add at front of queue */
18177 18177 bp->av_forw = *head;
18178 18178 *head = bp;
18179 18179 } else if (end == *tail) {
18180 18180 /* Add at end of queue */
18181 18181 (*tail)->av_forw = bp;
18182 18182 *tail = bp;
18183 18183 } else {
18184 18184 ASSERT(0);
18185 18185 }
18186 18186 } else {
18187 18187 /* Queue is empty */
18188 18188 *head = bp;
18189 18189 *tail = bp;
18190 18190 }
18191 18191 }
18192 18192
18193 18193
18194 18194 static uint64_t
18195 18195 st_get_cdb_g0_rw_count(uchar_t *cdb)
18196 18196 {
18197 18197 uint64_t count;
18198 18198
18199 18199 if ((cdb[1]) & 1) {
18200 18200 /* fixed block mode, the count is the number of blocks */
18201 18201 count =
18202 18202 cdb[2] << 16 |
18203 18203 cdb[3] << 8 |
18204 18204 cdb[4];
18205 18205 } else {
18206 18206 /* variable block mode, the count is the block size */
18207 18207 count = 1;
18208 18208 }
18209 18209 return (count);
18210 18210 }
18211 18211
18212 18212 static uint64_t
18213 18213 st_get_cdb_g0_sign_count(uchar_t *cdb)
18214 18214 {
18215 18215 uint64_t count;
18216 18216
18217 18217 count =
18218 18218 cdb[2] << 16 |
18219 18219 cdb[3] << 8 |
18220 18220 cdb[4];
18221 18221 /*
18222 18222 * If the sign bit of the 3 byte value is set, extended it.
18223 18223 */
18224 18224 if (count & 0x800000) {
18225 18225 count |= 0xffffffffff000000;
18226 18226 }
18227 18227 return (count);
18228 18228 }
18229 18229
18230 18230 static uint64_t
18231 18231 st_get_cdb_g0_count(uchar_t *cdb)
18232 18232 {
18233 18233 uint64_t count;
18234 18234
18235 18235 count =
18236 18236 cdb[2] << 16 |
18237 18237 cdb[3] << 8 |
18238 18238 cdb[4];
18239 18239 return (count);
18240 18240 }
18241 18241
18242 18242 static uint64_t
18243 18243 st_get_cdb_g5_rw_cnt(uchar_t *cdb)
18244 18244 {
18245 18245 uint64_t count;
18246 18246
18247 18247 if ((cdb[1]) & 1) {
18248 18248 /* fixed block mode */
18249 18249 count =
18250 18250 cdb[12] << 16 |
18251 18251 cdb[13] << 8 |
18252 18252 cdb[14];
18253 18253 } else {
18254 18254 /* variable block mode */
18255 18255 count = 1;
18256 18256 }
18257 18257 return (count);
18258 18258 }
18259 18259
18260 18260 static uint64_t
18261 18261 st_get_no_count(uchar_t *cdb)
18262 18262 {
18263 18263 ASSERT(cdb[0] == SCMD_REWIND);
18264 18264 return ((uint64_t)cdb[0]);
18265 18265 }
18266 18266
18267 18267 static uint64_t
18268 18268 st_get_load_options(uchar_t *cdb)
18269 18269 {
18270 18270 return ((uint64_t)(cdb[4] | (LD_HOLD << 1)));
18271 18271 }
18272 18272
18273 18273 static uint64_t
18274 18274 st_get_erase_options(uchar_t *cdb)
18275 18275 {
18276 18276 return (cdb[1] | (cdb[0] << 8));
18277 18277 }
18278 18278
18279 18279 static uint64_t
18280 18280 st_get_cdb_g1_lba(uchar_t *cdb)
18281 18281 {
18282 18282 uint64_t lba;
18283 18283
18284 18284 lba =
18285 18285 cdb[3] << 24 |
18286 18286 cdb[4] << 16 |
18287 18287 cdb[5] << 8 |
18288 18288 cdb[6];
18289 18289 return (lba);
18290 18290 }
18291 18291
18292 18292 static uint64_t
18293 18293 st_get_cdb_g5_count(uchar_t *cdb)
18294 18294 {
18295 18295 uint64_t count =
18296 18296 cdb[12] << 16 |
18297 18297 cdb[13] << 8 |
18298 18298 cdb[14];
18299 18299
18300 18300 return (count);
18301 18301 }
18302 18302
18303 18303 static uint64_t
18304 18304 st_get_cdb_g4g5_cnt(uchar_t *cdb)
18305 18305 {
18306 18306 uint64_t lba;
18307 18307
18308 18308 lba =
18309 18309 (uint64_t)cdb[4] << 56 |
18310 18310 (uint64_t)cdb[5] << 48 |
18311 18311 (uint64_t)cdb[6] << 40 |
18312 18312 (uint64_t)cdb[7] << 32 |
18313 18313 (uint64_t)cdb[8] << 24 |
18314 18314 (uint64_t)cdb[9] << 16 |
18315 18315 (uint64_t)cdb[10] << 8 |
18316 18316 (uint64_t)cdb[11];
18317 18317 return (lba);
18318 18318 }
18319 18319
18320 18320 static const cmd_attribute cmd_attributes[] = {
18321 18321 { SCMD_READ,
18322 18322 1, 0, 1, 0, 0, DIR_FORW, TRAN_READ, POS_EXPECTED,
18323 18323 0, 0, 0, st_get_cdb_g0_rw_count },
18324 18324 { SCMD_WRITE,
18325 18325 1, 0, 1, 1, 0, DIR_FORW, TRAN_WRTE, POS_EXPECTED,
18326 18326 0, 0, 0, st_get_cdb_g0_rw_count },
18327 18327 { SCMD_TEST_UNIT_READY,
18328 18328 0, 1, 0, 0, 0, DIR_NONE, TRAN_NONE, POS_EXPECTED,
18329 18329 0, 0, 0 },
18330 18330 { SCMD_REWIND,
18331 18331 1, 1, 1, 0, 0, DIR_REVC, TRAN_NONE, POS_EXPECTED,
18332 18332 0, 0, 0, st_get_no_count },
18333 18333 { SCMD_REQUEST_SENSE,
18334 18334 0, 0, 0, 0, 0, DIR_NONE, TRAN_READ, POS_EXPECTED,
18335 18335 0, 0, 0 },
18336 18336 { SCMD_READ_BLKLIM,
18337 18337 0, 1, 0, 0, 0, DIR_NONE, TRAN_READ, POS_EXPECTED,
18338 18338 0, 0, 0 },
18339 18339 { SCMD_READ_G4,
18340 18340 1, 0, 1, 0, 1, DIR_FORW, TRAN_READ, POS_EXPECTED,
18341 18341 0, 0, 0, st_get_cdb_g5_rw_cnt, st_get_cdb_g4g5_cnt },
18342 18342 { SCMD_WRITE_G4,
18343 18343 1, 0, 1, 1, 1, DIR_FORW, TRAN_WRTE, POS_EXPECTED,
18344 18344 0, 0, 0, st_get_cdb_g5_rw_cnt, st_get_cdb_g4g5_cnt },
18345 18345 { SCMD_READ_REVERSE,
18346 18346 1, 0, 1, 1, 0, DIR_REVC, TRAN_READ, POS_EXPECTED,
18347 18347 0, 0, 0, st_get_cdb_g0_rw_count },
18348 18348 { SCMD_READ_REVERSE_G4,
18349 18349 1, 0, 1, 1, 1, DIR_REVC, TRAN_READ, POS_EXPECTED,
18350 18350 0, 0, 0, st_get_cdb_g5_rw_cnt, st_get_cdb_g4g5_cnt },
18351 18351 { SCMD_WRITE_FILE_MARK,
18352 18352 1, 0, 1, 1, 0, DIR_FORW, TRAN_NONE, POS_EXPECTED,
18353 18353 0, 0, 0, st_get_cdb_g0_count },
18354 18354 { SCMD_WRITE_FILE_MARK_G4,
18355 18355 1, 0, 1, 1, 1, DIR_FORW, TRAN_NONE, POS_EXPECTED,
18356 18356 0, 0, 0, st_get_cdb_g5_count, st_get_cdb_g4g5_cnt },
18357 18357 { SCMD_SPACE,
18358 18358 1, 0, 1, 0, 0, DIR_EITH, TRAN_NONE, POS_STARTING,
18359 18359 0, 0, 0, st_get_cdb_g0_sign_count },
18360 18360 { SCMD_SPACE_G4,
18361 18361 1, 0, 1, 0, 0, DIR_EITH, TRAN_NONE, POS_STARTING,
18362 18362 0, 0, 0, st_get_cdb_g4g5_cnt },
18363 18363 { SCMD_INQUIRY,
18364 18364 0, 1, 0, 0, 0, DIR_NONE, TRAN_READ, POS_EXPECTED,
18365 18365 0, 0, 0 },
18366 18366 { SCMD_VERIFY_G0,
18367 18367 1, 0, 1, 0, 0, DIR_FORW, TRAN_NONE, POS_EXPECTED,
18368 18368 0, 0, 0, st_get_cdb_g0_rw_count },
18369 18369 { SCMD_VERIFY_G4,
18370 18370 1, 0, 1, 0, 1, DIR_FORW, TRAN_NONE, POS_EXPECTED,
18371 18371 0, 0, 0, st_get_cdb_g5_rw_cnt, st_get_cdb_g4g5_cnt },
18372 18372 { SCMD_RECOVER_BUF,
18373 18373 1, 0, 1, 1, 0, DIR_REVC, TRAN_READ, POS_EXPECTED,
18374 18374 0, 0, 0 },
18375 18375 { SCMD_MODE_SELECT,
18376 18376 1, 1, 0, 0, 0, DIR_NONE, TRAN_WRTE, POS_EXPECTED,
18377 18377 0, 0, 0 },
18378 18378 { SCMD_RESERVE,
18379 18379 0, 1, 0, 0, 0, DIR_NONE, TRAN_NONE, POS_EXPECTED,
18380 18380 0, 0, 0 },
18381 18381 { SCMD_RELEASE,
18382 18382 0, 1, 0, 0, 0, DIR_NONE, TRAN_NONE, POS_EXPECTED,
18383 18383 0, 0, 0 },
18384 18384 { SCMD_ERASE,
18385 18385 1, 0, 1, 1, 0, DIR_NONE, TRAN_NONE, POS_EXPECTED,
18386 18386 0, 0, 0, st_get_erase_options },
18387 18387 { SCMD_MODE_SENSE,
18388 18388 1, 1, 0, 0, 0, DIR_NONE, TRAN_READ, POS_EXPECTED,
18389 18389 0, 0, 0 },
18390 18390 { SCMD_LOAD,
18391 18391 1, 1, 1, 0, 0, DIR_EITH, TRAN_NONE, POS_EXPECTED,
18392 18392 0, 0, 0, st_get_load_options },
18393 18393 { SCMD_GDIAG,
18394 18394 1, 1, 0, 0, 0, DIR_NONE, TRAN_READ, POS_EXPECTED,
18395 18395 1, 0, 0 },
18396 18396 { SCMD_SDIAG,
18397 18397 1, 0, 1, 1, 0, DIR_EITH, TRAN_WRTE, POS_EXPECTED,
18398 18398 1, 0, 0 },
18399 18399 { SCMD_DOORLOCK,
18400 18400 0, 1, 0, 0, 0, DIR_NONE, TRAN_NONE, POS_EXPECTED,
18401 18401 0, 4, 3 },
18402 18402 { SCMD_LOCATE,
18403 18403 1, 1, 1, 0, 0, DIR_EITH, TRAN_NONE, POS_EXPECTED,
18404 18404 0, 0, 0, NULL, st_get_cdb_g1_lba },
18405 18405 { SCMD_READ_POSITION,
18406 18406 1, 1, 0, 0, 0, DIR_NONE, TRAN_READ, POS_EXPECTED,
18407 18407 0, 0, 0 },
18408 18408 { SCMD_WRITE_BUFFER,
18409 18409 1, 0, 0, 0, 0, DIR_NONE, TRAN_WRTE, POS_EXPECTED,
18410 18410 1, 0, 0 },
18411 18411 { SCMD_READ_BUFFER,
18412 18412 1, 0, 0, 0, 0, DIR_NONE, TRAN_READ, POS_EXPECTED,
18413 18413 1, 0, 0 },
18414 18414 { SCMD_REPORT_DENSITIES,
18415 18415 0, 1, 0, 0, 0, DIR_NONE, TRAN_READ, POS_EXPECTED,
18416 18416 0, 0, 0 },
18417 18417 { SCMD_LOG_SELECT_G1,
18418 18418 1, 1, 0, 0, 0, DIR_NONE, TRAN_WRTE, POS_EXPECTED,
18419 18419 0, 0, 0 },
18420 18420 { SCMD_LOG_SENSE_G1,
18421 18421 1, 1, 0, 0, 0, DIR_NONE, TRAN_READ, POS_EXPECTED,
18422 18422 0, 0, 0 },
18423 18423 { SCMD_PRIN,
18424 18424 0, 1, 0, 0, 0, DIR_NONE, TRAN_READ, POS_EXPECTED,
18425 18425 0, 0, 0 },
18426 18426 { SCMD_PROUT,
18427 18427 0, 1, 0, 0, 0, DIR_NONE, TRAN_WRTE, POS_EXPECTED,
18428 18428 0, 0, 0 },
18429 18429 { SCMD_READ_ATTRIBUTE,
18430 18430 1, 1, 0, 0, 0, DIR_NONE, TRAN_READ, POS_EXPECTED,
18431 18431 0, 0, 0 },
18432 18432 { SCMD_WRITE_ATTRIBUTE,
18433 18433 1, 1, 0, 0, 0, DIR_NONE, TRAN_WRTE, POS_EXPECTED,
18434 18434 0, 0, 0 },
18435 18435 { SCMD_LOCATE_G4,
18436 18436 1, 1, 1, 0, 0, DIR_EITH, TRAN_NONE, POS_EXPECTED,
18437 18437 0, 0, 0, NULL, st_get_cdb_g4g5_cnt },
18438 18438 { SCMD_REPORT_LUNS,
18439 18439 0, 1, 0, 0, 0, DIR_NONE, TRAN_READ, POS_EXPECTED,
18440 18440 0, 0, 0 },
18441 18441 { SCMD_SVC_ACTION_IN_G5,
18442 18442 1, 1, 0, 0, 0, DIR_NONE, TRAN_READ, POS_EXPECTED,
18443 18443 0, 0, 0 },
18444 18444 { SCMD_MAINTENANCE_IN,
18445 18445 1, 1, 0, 0, 0, DIR_NONE, TRAN_READ, POS_EXPECTED,
18446 18446 0, 0, 0 },
18447 18447 { SCMD_MAINTENANCE_OUT,
18448 18448 1, 1, 0, 0, 0, DIR_NONE, TRAN_WRTE, POS_EXPECTED,
18449 18449 0, 0, 0 },
18450 18450 { 0xff, /* Default attribute for unsupported commands */
18451 18451 1, 0, 0, 0, 0, DIR_NONE, TRAN_NONE, POS_STARTING,
18452 18452 1, 0, 0, NULL, NULL }
18453 18453 };
18454 18454
18455 18455 static const cmd_attribute *
18456 18456 st_lookup_cmd_attribute(unsigned char cmd)
18457 18457 {
18458 18458 int i;
18459 18459 cmd_attribute const *attribute;
18460 18460
18461 18461 for (i = 0; i < ST_NUM_MEMBERS(cmd_attributes); i++) {
18462 18462 attribute = &cmd_attributes[i];
18463 18463 if (attribute->cmd == cmd) {
18464 18464 return (attribute);
18465 18465 }
18466 18466 }
18467 18467 ASSERT(attribute);
18468 18468 return (attribute);
18469 18469 }
18470 18470
18471 18471 static int
18472 18472 st_reset(struct scsi_tape *un, int reset_type)
18473 18473 {
18474 18474 int rval;
18475 18475
18476 18476 ASSERT(MUTEX_HELD(&un->un_sd->sd_mutex));
18477 18477
18478 18478 ST_FUNC(ST_DEVINFO, st_reset);
18479 18479 un->un_rsvd_status |= ST_INITIATED_RESET;
18480 18480 mutex_exit(ST_MUTEX);
18481 18481 do {
18482 18482 rval = scsi_reset(&un->un_sd->sd_address, reset_type);
18483 18483 if (rval == 0) {
18484 18484 switch (reset_type) {
18485 18485 case RESET_LUN:
18486 18486 ST_DEBUG3(ST_DEVINFO, st_label, CE_WARN,
18487 18487 "LUN reset failed trying target reset");
18488 18488 reset_type = RESET_TARGET;
18489 18489 break;
18490 18490 case RESET_TARGET:
18491 18491 ST_DEBUG3(ST_DEVINFO, st_label, CE_WARN,
18492 18492 "target reset failed trying bus reset");
18493 18493 reset_type = RESET_BUS;
18494 18494 break;
18495 18495 case RESET_BUS:
18496 18496 ST_DEBUG3(ST_DEVINFO, st_label, CE_WARN,
18497 18497 "bus reset failed trying all reset");
18498 18498 reset_type = RESET_ALL;
18499 18499 default:
18500 18500 mutex_enter(ST_MUTEX);
18501 18501 return (rval);
18502 18502 }
18503 18503 }
18504 18504 } while (rval == 0);
18505 18505 mutex_enter(ST_MUTEX);
18506 18506 return (rval);
18507 18507 }
18508 18508
18509 18509 #define SAS_TLR_MOD_LEN sizeof (struct seq_mode)
18510 18510 static int
18511 18511 st_set_target_TLR_mode(struct scsi_tape *un, ubufunc_t ubf)
18512 18512 {
18513 18513 int ret;
18514 18514 int amount = SAS_TLR_MOD_LEN;
18515 18515 struct seq_mode *mode_data;
18516 18516
18517 18517 ST_FUNC(ST_DEVINFO, st_set_target_TLR_mode);
18518 18518
18519 18519 mode_data = kmem_zalloc(SAS_TLR_MOD_LEN, KM_SLEEP);
18520 18520 ret = st_gen_mode_sense(un, ubf, 0x18, mode_data, amount);
18521 18521 if (ret != DDI_SUCCESS) {
18522 18522 if (ret != EACCES)
18523 18523 un->un_tlr_flag = TLR_NOT_SUPPORTED;
18524 18524 goto out;
18525 18525 }
18526 18526 if (mode_data->data_len != amount + 1) {
18527 18527 amount = mode_data->data_len + 1;
18528 18528 }
18529 18529 /* Must be SAS protocol */
18530 18530 if (mode_data->page.saslun.protocol_id != 6) {
18531 18531 un->un_tlr_flag = TLR_NOT_SUPPORTED;
18532 18532 ret = ENOTSUP;
18533 18533 goto out;
18534 18534 }
18535 18535 if (un->un_tlr_flag == TLR_SAS_ONE_DEVICE) {
18536 18536 if (mode_data->page.saslun.tran_layer_ret == 1)
18537 18537 goto out;
18538 18538 mode_data->page.saslun.tran_layer_ret = 1;
18539 18539 } else {
18540 18540 if (mode_data->page.saslun.tran_layer_ret == 0)
18541 18541 goto out;
18542 18542 mode_data->page.saslun.tran_layer_ret = 0;
18543 18543 }
18544 18544 ret = st_gen_mode_select(un, ubf, mode_data, amount);
18545 18545 if (ret != DDI_SUCCESS) {
18546 18546 if (ret != EACCES)
18547 18547 un->un_tlr_flag = TLR_NOT_SUPPORTED;
18548 18548 } else {
18549 18549 if (mode_data->page.saslun.tran_layer_ret == 0)
18550 18550 un->un_tlr_flag = TLR_NOT_KNOWN;
18551 18551 else
18552 18552 un->un_tlr_flag = TLR_SAS_ONE_DEVICE;
18553 18553 }
18554 18554 #ifdef STDEBUG
18555 18555 st_clean_print(ST_DEVINFO, st_label, SCSI_DEBUG, "TLR data sent",
18556 18556 (char *)mode_data, amount);
18557 18557 #endif
18558 18558 out:
18559 18559 kmem_free(mode_data, SAS_TLR_MOD_LEN);
18560 18560 return (ret);
18561 18561 }
18562 18562
18563 18563
18564 18564 static void
18565 18565 st_reset_notification(caddr_t arg)
18566 18566 {
18567 18567 struct scsi_tape *un = (struct scsi_tape *)arg;
18568 18568
18569 18569 ST_FUNC(ST_DEVINFO, st_reset_notification);
18570 18570 mutex_enter(ST_MUTEX);
18571 18571
18572 18572 un->un_unit_attention_flags |= 2;
18573 18573 if ((un->un_rsvd_status & (ST_RESERVE | ST_APPLICATION_RESERVATIONS)) ==
18574 18574 ST_RESERVE) {
18575 18575 un->un_rsvd_status |= ST_LOST_RESERVE;
18576 18576 ST_DEBUG2(ST_DEVINFO, st_label, CE_WARN,
18577 18577 "Lost Reservation notification");
18578 18578 } else {
18579 18579 ST_DEBUG2(ST_DEVINFO, st_label, CE_WARN,
18580 18580 "reset notification");
18581 18581 }
18582 18582
18583 18583 if ((un->un_restore_pos == 0) &&
18584 18584 (un->un_state == ST_STATE_CLOSED) ||
18585 18585 (un->un_state == ST_STATE_OPEN_PENDING_IO) ||
18586 18586 (un->un_state == ST_STATE_CLOSING)) {
18587 18587 un->un_restore_pos = 1;
18588 18588 }
18589 18589 ST_DEBUG6(ST_DEVINFO, st_label, CE_WARN,
18590 18590 "reset and state was %d\n", un->un_state);
18591 18591 mutex_exit(ST_MUTEX);
18592 18592 }
|
↓ open down ↓ |
16602 lines elided |
↑ open up ↑ |
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX