Commit | Line | Data |
---|---|---|
984263bc MD |
1 | /* |
2 | * $FreeBSD: src/sys/cam/scsi/scsi_sa.c,v 1.45.2.13 2002/12/17 17:08:50 trhodes Exp $ | |
2d19cdd3 | 3 | * $DragonFly: src/sys/bus/cam/scsi/scsi_sa.c,v 1.36 2008/07/18 00:07:23 dillon Exp $ |
984263bc MD |
4 | * |
5 | * Implementation of SCSI Sequential Access Peripheral driver for CAM. | |
6 | * | |
7 | * Copyright (c) 1999, 2000 Matthew Jacob | |
8 | * All rights reserved. | |
9 | * | |
10 | * Redistribution and use in source and binary forms, with or without | |
11 | * modification, are permitted provided that the following conditions | |
12 | * are met: | |
13 | * 1. Redistributions of source code must retain the above copyright | |
14 | * notice, this list of conditions, and the following disclaimer, | |
15 | * without modification, immediately at the beginning of the file. | |
16 | * 2. The name of the author may not be used to endorse or promote products | |
17 | * derived from this software without specific prior written permission. | |
18 | * | |
19 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND | |
20 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | |
21 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | |
22 | * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR | |
23 | * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | |
24 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | |
25 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | |
26 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT | |
27 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY | |
28 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF | |
29 | * SUCH DAMAGE. | |
30 | * | |
31 | */ | |
32 | ||
33 | #include <sys/param.h> | |
34 | #include <sys/queue.h> | |
35 | #ifdef _KERNEL | |
36 | #include <sys/systm.h> | |
37 | #include <sys/kernel.h> | |
38 | #endif | |
39 | #include <sys/types.h> | |
05220613 | 40 | #ifdef _KERNEL |
984263bc MD |
41 | #include <sys/buf.h> |
42 | #include <sys/malloc.h> | |
05220613 | 43 | #endif |
984263bc MD |
44 | #include <sys/mtio.h> |
45 | #include <sys/conf.h> | |
05220613 | 46 | #ifdef _KERNEL |
3020e3be MD |
47 | #include <sys/proc.h> |
48 | #include <sys/buf2.h> | |
4e01b467 | 49 | #include <sys/thread2.h> |
05220613 | 50 | #endif |
35872d89 | 51 | #include <sys/fcntl.h> |
984263bc MD |
52 | #include <sys/devicestat.h> |
53 | #include <machine/limits.h> | |
54 | ||
55 | #ifndef _KERNEL | |
56 | #include <stdio.h> | |
57 | #include <string.h> | |
58 | #endif | |
59 | ||
1f2de5d4 MD |
60 | #include "../cam.h" |
61 | #include "../cam_ccb.h" | |
62 | #include "../cam_extend.h" | |
63 | #include "../cam_periph.h" | |
64 | #include "../cam_xpt_periph.h" | |
65 | #include "../cam_debug.h" | |
984263bc | 66 | |
1f2de5d4 MD |
67 | #include "scsi_all.h" |
68 | #include "scsi_message.h" | |
69 | #include "scsi_sa.h" | |
984263bc MD |
70 | |
71 | #ifdef _KERNEL | |
72 | ||
73 | #include <opt_sa.h> | |
74 | ||
75 | #ifndef SA_IO_TIMEOUT | |
76 | #define SA_IO_TIMEOUT 4 | |
77 | #endif | |
78 | #ifndef SA_SPACE_TIMEOUT | |
79 | #define SA_SPACE_TIMEOUT 1 * 60 | |
80 | #endif | |
81 | #ifndef SA_REWIND_TIMEOUT | |
82 | #define SA_REWIND_TIMEOUT 2 * 60 | |
83 | #endif | |
84 | #ifndef SA_ERASE_TIMEOUT | |
85 | #define SA_ERASE_TIMEOUT 4 * 60 | |
86 | #endif | |
87 | ||
88 | #define SCSIOP_TIMEOUT (60 * 1000) /* not an option */ | |
89 | ||
90 | #define IO_TIMEOUT (SA_IO_TIMEOUT * 60 * 1000) | |
91 | #define REWIND_TIMEOUT (SA_REWIND_TIMEOUT * 60 * 1000) | |
92 | #define ERASE_TIMEOUT (SA_ERASE_TIMEOUT * 60 * 1000) | |
93 | #define SPACE_TIMEOUT (SA_SPACE_TIMEOUT * 60 * 1000) | |
94 | ||
95 | /* | |
96 | * Additional options that can be set for config: SA_1FM_AT_EOT | |
97 | */ | |
98 | ||
99 | #ifndef UNUSED_PARAMETER | |
100 | #define UNUSED_PARAMETER(x) x = x | |
101 | #endif | |
102 | ||
103 | #define QFRLS(ccb) \ | |
104 | if (((ccb)->ccb_h.status & CAM_DEV_QFRZN) != 0) \ | |
105 | cam_release_devq((ccb)->ccb_h.path, 0, 0, 0, FALSE) | |
106 | ||
107 | /* | |
108 | * Driver states | |
109 | */ | |
110 | ||
bc6e3c73 | 111 | MALLOC_DEFINE(M_SCSISA, "SCSI sa", "SCSI sequential access buffers"); |
984263bc MD |
112 | |
113 | typedef enum { | |
114 | SA_STATE_NORMAL, SA_STATE_ABNORMAL | |
115 | } sa_state; | |
116 | ||
117 | #define ccb_pflags ppriv_field0 | |
81b5c339 | 118 | #define ccb_bio ppriv_ptr1 |
984263bc MD |
119 | |
120 | #define SA_CCB_BUFFER_IO 0x0 | |
121 | #define SA_CCB_WAITING 0x1 | |
122 | #define SA_CCB_TYPEMASK 0x1 | |
123 | #define SA_POSITION_UPDATED 0x2 | |
124 | ||
125 | #define Set_CCB_Type(x, type) \ | |
126 | x->ccb_h.ccb_pflags &= ~SA_CCB_TYPEMASK; \ | |
127 | x->ccb_h.ccb_pflags |= type | |
128 | ||
129 | #define CCB_Type(x) (x->ccb_h.ccb_pflags & SA_CCB_TYPEMASK) | |
130 | ||
131 | ||
132 | ||
133 | typedef enum { | |
134 | SA_FLAG_OPEN = 0x0001, | |
135 | SA_FLAG_FIXED = 0x0002, | |
136 | SA_FLAG_TAPE_LOCKED = 0x0004, | |
137 | SA_FLAG_TAPE_MOUNTED = 0x0008, | |
138 | SA_FLAG_TAPE_WP = 0x0010, | |
139 | SA_FLAG_TAPE_WRITTEN = 0x0020, | |
140 | SA_FLAG_EOM_PENDING = 0x0040, | |
141 | SA_FLAG_EIO_PENDING = 0x0080, | |
142 | SA_FLAG_EOF_PENDING = 0x0100, | |
143 | SA_FLAG_ERR_PENDING = (SA_FLAG_EOM_PENDING|SA_FLAG_EIO_PENDING| | |
144 | SA_FLAG_EOF_PENDING), | |
145 | SA_FLAG_INVALID = 0x0200, | |
146 | SA_FLAG_COMP_ENABLED = 0x0400, | |
147 | SA_FLAG_COMP_SUPP = 0x0800, | |
148 | SA_FLAG_COMP_UNSUPP = 0x1000, | |
149 | SA_FLAG_TAPE_FROZEN = 0x2000 | |
150 | } sa_flags; | |
151 | ||
152 | typedef enum { | |
153 | SA_MODE_REWIND = 0x00, | |
154 | SA_MODE_NOREWIND = 0x01, | |
155 | SA_MODE_OFFLINE = 0x02 | |
156 | } sa_mode; | |
157 | ||
158 | typedef enum { | |
159 | SA_PARAM_NONE = 0x00, | |
160 | SA_PARAM_BLOCKSIZE = 0x01, | |
161 | SA_PARAM_DENSITY = 0x02, | |
162 | SA_PARAM_COMPRESSION = 0x04, | |
163 | SA_PARAM_BUFF_MODE = 0x08, | |
164 | SA_PARAM_NUMBLOCKS = 0x10, | |
165 | SA_PARAM_WP = 0x20, | |
166 | SA_PARAM_SPEED = 0x40, | |
167 | SA_PARAM_ALL = 0x7f | |
168 | } sa_params; | |
169 | ||
170 | typedef enum { | |
171 | SA_QUIRK_NONE = 0x00, | |
172 | SA_QUIRK_NOCOMP = 0x01, /* Can't deal with compression at all */ | |
173 | SA_QUIRK_FIXED = 0x02, /* Force fixed mode */ | |
174 | SA_QUIRK_VARIABLE = 0x04, /* Force variable mode */ | |
175 | SA_QUIRK_2FM = 0x08, /* Needs Two File Marks at EOD */ | |
176 | SA_QUIRK_1FM = 0x10, /* No more than 1 File Mark at EOD */ | |
177 | SA_QUIRK_NODREAD = 0x20, /* Don't try and dummy read density */ | |
178 | SA_QUIRK_NO_MODESEL = 0x40, /* Don't do mode select at all */ | |
179 | SA_QUIRK_NO_CPAGE = 0x80 /* Don't use DEVICE COMPRESSION page */ | |
180 | } sa_quirks; | |
181 | ||
182 | /* units are bits 4-7, 16-21 (1024 units) */ | |
183 | #define SAUNIT(DEV) \ | |
184 | (((minor(DEV) & 0xF0) >> 4) | ((minor(DEV) & 0x3f0000) >> 16)) | |
185 | ||
186 | #define SAMODE(z) ((minor(z) & 0x3)) | |
187 | #define SADENSITY(z) (((minor(z) >> 2) & 0x3)) | |
188 | #define SA_IS_CTRL(z) (minor(z) & (1 << 29)) | |
189 | ||
190 | #define SA_NOT_CTLDEV 0 | |
191 | #define SA_CTLDEV 1 | |
192 | ||
193 | #define SA_ATYPE_R 0 | |
194 | #define SA_ATYPE_NR 1 | |
195 | #define SA_ATYPE_ER 2 | |
196 | ||
197 | #define SAMINOR(ctl, unit, mode, access) \ | |
198 | ((ctl << 29) | ((unit & 0x3f0) << 16) | ((unit & 0xf) << 4) | \ | |
199 | (mode << 0x2) | (access & 0x3)) | |
200 | ||
e4c9c0c8 MD |
201 | #define SA_UNITMASK SAMINOR(0, -1, 0, 0) |
202 | #define SA_UNIT(unit) SAMINOR(0, unit, 0, 0) | |
203 | ||
984263bc | 204 | #define SA_NUM_MODES 4 |
984263bc MD |
205 | |
206 | struct sa_softc { | |
207 | sa_state state; | |
208 | sa_flags flags; | |
209 | sa_quirks quirks; | |
81b5c339 | 210 | struct bio_queue_head bio_queue; |
984263bc MD |
211 | int queue_count; |
212 | struct devstat device_stats; | |
984263bc MD |
213 | int blk_gran; |
214 | int blk_mask; | |
215 | int blk_shift; | |
216 | u_int32_t max_blk; | |
217 | u_int32_t min_blk; | |
218 | u_int32_t comp_algorithm; | |
219 | u_int32_t saved_comp_algorithm; | |
220 | u_int32_t media_blksize; | |
221 | u_int32_t last_media_blksize; | |
222 | u_int32_t media_numblks; | |
223 | u_int8_t media_density; | |
224 | u_int8_t speed; | |
225 | u_int8_t scsi_rev; | |
226 | u_int8_t dsreg; /* mtio mt_dsreg, redux */ | |
227 | int buffer_mode; | |
228 | int filemarks; | |
229 | union ccb saved_ccb; | |
230 | int last_resid_was_io; | |
231 | ||
232 | /* | |
233 | * Relative to BOT Location. | |
234 | */ | |
235 | daddr_t fileno; | |
236 | daddr_t blkno; | |
237 | ||
238 | /* | |
239 | * Latched Error Info | |
240 | */ | |
241 | struct { | |
242 | struct scsi_sense_data _last_io_sense; | |
243 | u_int32_t _last_io_resid; | |
244 | u_int8_t _last_io_cdb[CAM_MAX_CDBLEN]; | |
245 | struct scsi_sense_data _last_ctl_sense; | |
246 | u_int32_t _last_ctl_resid; | |
247 | u_int8_t _last_ctl_cdb[CAM_MAX_CDBLEN]; | |
248 | #define last_io_sense errinfo._last_io_sense | |
249 | #define last_io_resid errinfo._last_io_resid | |
250 | #define last_io_cdb errinfo._last_io_cdb | |
251 | #define last_ctl_sense errinfo._last_ctl_sense | |
252 | #define last_ctl_resid errinfo._last_ctl_resid | |
253 | #define last_ctl_cdb errinfo._last_ctl_cdb | |
254 | } errinfo; | |
255 | /* | |
256 | * Misc other flags/state | |
257 | */ | |
258 | u_int32_t | |
35872d89 PA |
259 | : 29, |
260 | open_rdonly : 1, /* open read-only */ | |
261 | open_pending_mount : 1, /* open pending mount */ | |
262 | ctrl_mode : 1; /* control device open */ | |
984263bc MD |
263 | }; |
264 | ||
265 | struct sa_quirk_entry { | |
266 | struct scsi_inquiry_pattern inq_pat; /* matching pattern */ | |
267 | sa_quirks quirks; /* specific quirk type */ | |
268 | u_int32_t prefblk; /* preferred blocksize when in fixed mode */ | |
269 | }; | |
270 | ||
271 | static struct sa_quirk_entry sa_quirk_table[] = | |
272 | { | |
273 | { | |
274 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "OnStream", | |
275 | "ADR*", "*"}, SA_QUIRK_FIXED|SA_QUIRK_NODREAD | | |
276 | SA_QUIRK_1FM|SA_QUIRK_NO_MODESEL, 32768 | |
277 | }, | |
278 | { | |
279 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "ARCHIVE", | |
280 | "Python 06408*", "*"}, SA_QUIRK_NODREAD, 0 | |
281 | }, | |
282 | { | |
283 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "ARCHIVE", | |
284 | "Python 25601*", "*"}, SA_QUIRK_NOCOMP|SA_QUIRK_NODREAD, 0 | |
285 | }, | |
286 | { | |
287 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "ARCHIVE", | |
288 | "Python*", "*"}, SA_QUIRK_NODREAD, 0 | |
289 | }, | |
290 | { | |
291 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "ARCHIVE", | |
292 | "VIPER 150*", "*"}, SA_QUIRK_FIXED|SA_QUIRK_1FM, 512 | |
293 | }, | |
294 | { | |
295 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "ARCHIVE", | |
296 | "VIPER 2525 25462", "-011"}, | |
297 | SA_QUIRK_NOCOMP|SA_QUIRK_1FM|SA_QUIRK_NODREAD, 0 | |
298 | }, | |
299 | { | |
300 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "ARCHIVE", | |
301 | "VIPER 2525*", "*"}, SA_QUIRK_FIXED|SA_QUIRK_1FM, 1024 | |
302 | }, | |
303 | #if 0 | |
304 | { | |
305 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "HP", | |
306 | "C15*", "*"}, SA_QUIRK_VARIABLE|SA_QUIRK_NO_CPAGE, 0, | |
307 | }, | |
308 | #endif | |
d92d7552 PA |
309 | { |
310 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "HP", | |
984263bc MD |
311 | "C56*", "*"}, SA_QUIRK_VARIABLE|SA_QUIRK_2FM, 0 |
312 | }, | |
313 | { | |
314 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "HP", | |
315 | "T20*", "*"}, SA_QUIRK_FIXED|SA_QUIRK_1FM, 512 | |
316 | }, | |
317 | { | |
318 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "HP", | |
319 | "T4000*", "*"}, SA_QUIRK_FIXED|SA_QUIRK_1FM, 512 | |
320 | }, | |
321 | { | |
322 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "HP", | |
323 | "HP-88780*", "*"}, SA_QUIRK_VARIABLE|SA_QUIRK_2FM, 0 | |
324 | }, | |
325 | { | |
326 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "KENNEDY", | |
327 | "*", "*"}, SA_QUIRK_VARIABLE|SA_QUIRK_2FM, 0 | |
328 | }, | |
329 | { | |
330 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "M4 DATA", | |
331 | "123107 SCSI*", "*"}, SA_QUIRK_VARIABLE|SA_QUIRK_2FM, 0 | |
332 | }, | |
333 | { /* jreynold@primenet.com */ | |
334 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "Seagate", | |
335 | "STT8000N*", "*"}, SA_QUIRK_1FM, 0 | |
336 | }, | |
337 | { /* mike@sentex.net */ | |
338 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "Seagate", | |
339 | "STT20000*", "*"}, SA_QUIRK_1FM, 0 | |
340 | }, | |
341 | { | |
342 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "TANDBERG", | |
343 | " TDC 3600", "U07:"}, SA_QUIRK_NOCOMP|SA_QUIRK_1FM, 512 | |
344 | }, | |
345 | { | |
346 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "TANDBERG", | |
347 | " TDC 3800", "*"}, SA_QUIRK_NOCOMP|SA_QUIRK_1FM, 512 | |
348 | }, | |
349 | { | |
350 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "TANDBERG", | |
351 | " TDC 4100", "*"}, SA_QUIRK_NOCOMP|SA_QUIRK_1FM, 512 | |
352 | }, | |
353 | { | |
354 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "TANDBERG", | |
355 | " TDC 4200", "*"}, SA_QUIRK_NOCOMP|SA_QUIRK_1FM, 512 | |
356 | }, | |
357 | { | |
358 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "TANDBERG", | |
359 | " SLR*", "*"}, SA_QUIRK_1FM, 0 | |
360 | }, | |
361 | { | |
362 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "WANGTEK", | |
363 | "5525ES*", "*"}, SA_QUIRK_FIXED|SA_QUIRK_1FM, 512 | |
364 | }, | |
365 | { | |
366 | { T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "WANGTEK", | |
367 | "51000*", "*"}, SA_QUIRK_FIXED|SA_QUIRK_1FM, 1024 | |
368 | } | |
369 | }; | |
370 | ||
371 | static d_open_t saopen; | |
372 | static d_close_t saclose; | |
373 | static d_strategy_t sastrategy; | |
374 | static d_ioctl_t saioctl; | |
375 | static periph_init_t sainit; | |
376 | static periph_ctor_t saregister; | |
377 | static periph_oninv_t saoninvalidate; | |
378 | static periph_dtor_t sacleanup; | |
379 | static periph_start_t sastart; | |
380 | static void saasync(void *callback_arg, u_int32_t code, | |
381 | struct cam_path *path, void *arg); | |
382 | static void sadone(struct cam_periph *periph, | |
383 | union ccb *start_ccb); | |
384 | static int saerror(union ccb *ccb, u_int32_t cam_flags, | |
385 | u_int32_t sense_flags); | |
386 | static int samarkswanted(struct cam_periph *); | |
387 | static int sacheckeod(struct cam_periph *periph); | |
388 | static int sagetparams(struct cam_periph *periph, | |
389 | sa_params params_to_get, | |
390 | u_int32_t *blocksize, u_int8_t *density, | |
391 | u_int32_t *numblocks, int *buff_mode, | |
392 | u_int8_t *write_protect, u_int8_t *speed, | |
393 | int *comp_supported, int *comp_enabled, | |
394 | u_int32_t *comp_algorithm, | |
395 | sa_comp_t *comp_page); | |
396 | static int sasetparams(struct cam_periph *periph, | |
397 | sa_params params_to_set, | |
398 | u_int32_t blocksize, u_int8_t density, | |
399 | u_int32_t comp_algorithm, | |
400 | u_int32_t sense_flags); | |
401 | static void saprevent(struct cam_periph *periph, int action); | |
402 | static int sarewind(struct cam_periph *periph); | |
403 | static int saspace(struct cam_periph *periph, int count, | |
404 | scsi_space_code code); | |
b13267a5 | 405 | static int samount(struct cam_periph *, int, cdev_t); |
984263bc MD |
406 | static int saretension(struct cam_periph *periph); |
407 | static int sareservereleaseunit(struct cam_periph *periph, | |
408 | int reserve); | |
409 | static int saloadunload(struct cam_periph *periph, int load); | |
410 | static int saerase(struct cam_periph *periph, int longerase); | |
411 | static int sawritefilemarks(struct cam_periph *periph, | |
412 | int nmarks, int setmarks); | |
413 | static int sardpos(struct cam_periph *periph, int, u_int32_t *); | |
414 | static int sasetpos(struct cam_periph *periph, int, u_int32_t *); | |
415 | ||
416 | ||
417 | static struct periph_driver sadriver = | |
418 | { | |
419 | sainit, "sa", | |
420 | TAILQ_HEAD_INITIALIZER(sadriver.units), /* generation */ 0 | |
421 | }; | |
422 | ||
2ad14cb5 | 423 | PERIPHDRIVER_DECLARE(sa, sadriver); |
984263bc MD |
424 | |
425 | /* For 2.2-stable support */ | |
426 | #ifndef D_TAPE | |
427 | #define D_TAPE 0 | |
428 | #endif | |
429 | ||
430 | #define SA_CDEV_MAJOR 14 | |
431 | ||
fef8985e MD |
432 | static struct dev_ops sa_ops = { |
433 | { "sa", SA_CDEV_MAJOR, D_TAPE }, | |
434 | .d_open = saopen, | |
435 | .d_close = saclose, | |
436 | .d_read = physread, | |
437 | .d_write = physwrite, | |
438 | .d_ioctl = saioctl, | |
439 | .d_strategy = sastrategy, | |
984263bc MD |
440 | }; |
441 | ||
442 | static struct extend_array *saperiphs; | |
443 | ||
444 | static int | |
fef8985e | 445 | saopen(struct dev_open_args *ap) |
984263bc | 446 | { |
b13267a5 | 447 | cdev_t dev = ap->a_head.a_dev; |
984263bc MD |
448 | struct cam_periph *periph; |
449 | struct sa_softc *softc; | |
450 | int unit; | |
984263bc | 451 | int error; |
984263bc MD |
452 | |
453 | unit = SAUNIT(dev); | |
984263bc | 454 | |
984263bc | 455 | periph = cam_extend_get(saperiphs, unit); |
1c8b7a9a PA |
456 | if (cam_periph_acquire(periph) != CAM_REQ_CMP) { |
457 | return (ENXIO); | |
984263bc | 458 | } |
1c8b7a9a PA |
459 | |
460 | cam_periph_lock(periph); | |
461 | ||
984263bc | 462 | softc = (struct sa_softc *)periph->softc; |
984263bc MD |
463 | |
464 | CAM_DEBUG(periph->path, CAM_DEBUG_TRACE|CAM_DEBUG_INFO, | |
465 | ("saopen(%d): dev=0x%x softc=0x%x\n", unit, unit, softc->flags)); | |
466 | ||
984263bc MD |
467 | if (SA_IS_CTRL(dev)) { |
468 | softc->ctrl_mode = 1; | |
469 | cam_periph_unlock(periph); | |
470 | return (0); | |
471 | } | |
472 | ||
1c8b7a9a PA |
473 | if ((error = cam_periph_hold(periph, PCATCH)) != 0) { |
474 | cam_periph_unlock(periph); | |
475 | cam_periph_release(periph); | |
476 | return (error); | |
477 | } | |
478 | ||
984263bc MD |
479 | if (softc->flags & SA_FLAG_OPEN) { |
480 | error = EBUSY; | |
481 | } else if (softc->flags & SA_FLAG_INVALID) { | |
482 | error = ENXIO; | |
483 | } else { | |
35872d89 PA |
484 | /* |
485 | * Preserve whether this is a read_only open. | |
486 | */ | |
487 | softc->open_rdonly = (ap->a_oflags & O_RDWR) == O_RDONLY; | |
488 | ||
984263bc MD |
489 | /* |
490 | * The function samount ensures media is loaded and ready. | |
491 | * It also does a device RESERVE if the tape isn't yet mounted. | |
35872d89 PA |
492 | * |
493 | * If the mount fails and this was a non-blocking open, | |
494 | * make this a 'open_pending_mount' action. | |
984263bc | 495 | */ |
fef8985e | 496 | error = samount(periph, ap->a_oflags, dev); |
35872d89 PA |
497 | if (error && (ap->a_oflags & O_NONBLOCK)) { |
498 | softc->flags |= SA_FLAG_OPEN; | |
499 | softc->open_pending_mount = 1; | |
2d19cdd3 | 500 | cam_periph_unhold(periph, 1); |
35872d89 PA |
501 | return (0); |
502 | } | |
984263bc MD |
503 | } |
504 | ||
505 | if (error) { | |
2d19cdd3 | 506 | cam_periph_unhold(periph, 1); |
984263bc | 507 | cam_periph_release(periph); |
1c8b7a9a | 508 | return (error); |
984263bc | 509 | } |
1c8b7a9a PA |
510 | |
511 | saprevent(periph, PR_PREVENT); | |
512 | softc->flags |= SA_FLAG_OPEN; | |
513 | ||
2d19cdd3 | 514 | cam_periph_unhold(periph, 1); |
984263bc MD |
515 | return (error); |
516 | } | |
517 | ||
518 | static int | |
fef8985e | 519 | saclose(struct dev_close_args *ap) |
984263bc | 520 | { |
b13267a5 | 521 | cdev_t dev = ap->a_head.a_dev; |
984263bc MD |
522 | struct cam_periph *periph; |
523 | struct sa_softc *softc; | |
524 | int unit, mode, error, writing, tmp; | |
525 | int closedbits = SA_FLAG_OPEN; | |
526 | ||
527 | unit = SAUNIT(dev); | |
528 | mode = SAMODE(dev); | |
529 | periph = cam_extend_get(saperiphs, unit); | |
530 | if (periph == NULL) | |
531 | return (ENXIO); | |
532 | ||
1c8b7a9a PA |
533 | cam_periph_lock(periph); |
534 | ||
984263bc MD |
535 | softc = (struct sa_softc *)periph->softc; |
536 | ||
537 | CAM_DEBUG(periph->path, CAM_DEBUG_TRACE|CAM_DEBUG_INFO, | |
538 | ("saclose(%d): dev=0x%x softc=0x%x\n", unit, unit, softc->flags)); | |
539 | ||
540 | ||
35872d89 | 541 | softc->open_rdonly = 0; |
984263bc MD |
542 | if (SA_IS_CTRL(dev)) { |
543 | softc->ctrl_mode = 0; | |
984263bc | 544 | cam_periph_unlock(periph); |
1c8b7a9a | 545 | cam_periph_release(periph); |
984263bc MD |
546 | return (0); |
547 | } | |
548 | ||
35872d89 PA |
549 | if (softc->open_pending_mount) { |
550 | softc->flags &= ~SA_FLAG_OPEN; | |
551 | softc->open_pending_mount = 0; | |
35872d89 | 552 | cam_periph_unlock(periph); |
1c8b7a9a | 553 | cam_periph_release(periph); |
35872d89 PA |
554 | return (0); |
555 | } | |
556 | ||
1c8b7a9a PA |
557 | if ((error = cam_periph_hold(periph, 0)) != 0) { |
558 | cam_periph_unlock(periph); | |
559 | return (error); | |
560 | } | |
561 | ||
984263bc MD |
562 | /* |
563 | * Were we writing the tape? | |
564 | */ | |
565 | writing = (softc->flags & SA_FLAG_TAPE_WRITTEN) != 0; | |
566 | ||
567 | /* | |
568 | * See whether or not we need to write filemarks. If this | |
569 | * fails, we probably have to assume we've lost tape | |
570 | * position. | |
571 | */ | |
572 | error = sacheckeod(periph); | |
573 | if (error) { | |
1c8b7a9a PA |
574 | xpt_print(periph->path, |
575 | "failed to write terminating filemark(s)\n"); | |
984263bc MD |
576 | softc->flags |= SA_FLAG_TAPE_FROZEN; |
577 | } | |
578 | ||
579 | /* | |
580 | * Whatever we end up doing, allow users to eject tapes from here on. | |
581 | */ | |
582 | saprevent(periph, PR_ALLOW); | |
583 | ||
584 | /* | |
585 | * Decide how to end... | |
586 | */ | |
587 | if ((softc->flags & SA_FLAG_TAPE_MOUNTED) == 0) { | |
588 | closedbits |= SA_FLAG_TAPE_FROZEN; | |
589 | } else switch (mode) { | |
590 | case SA_MODE_OFFLINE: | |
591 | /* | |
592 | * An 'offline' close is an unconditional release of | |
593 | * frozen && mount conditions, irrespective of whether | |
594 | * these operations succeeded. The reason for this is | |
595 | * to allow at least some kind of programmatic way | |
596 | * around our state getting all fouled up. If somebody | |
597 | * issues an 'offline' command, that will be allowed | |
598 | * to clear state. | |
599 | */ | |
0e224b5d SW |
600 | sarewind(periph); |
601 | saloadunload(periph, FALSE); | |
984263bc MD |
602 | closedbits |= SA_FLAG_TAPE_MOUNTED|SA_FLAG_TAPE_FROZEN; |
603 | break; | |
604 | case SA_MODE_REWIND: | |
605 | /* | |
606 | * If the rewind fails, return an error- if anyone cares, | |
607 | * but not overwriting any previous error. | |
608 | * | |
609 | * We don't clear the notion of mounted here, but we do | |
610 | * clear the notion of frozen if we successfully rewound. | |
611 | */ | |
612 | tmp = sarewind(periph); | |
613 | if (tmp) { | |
614 | if (error != 0) | |
615 | error = tmp; | |
616 | } else { | |
617 | closedbits |= SA_FLAG_TAPE_FROZEN; | |
618 | } | |
619 | break; | |
620 | case SA_MODE_NOREWIND: | |
621 | /* | |
622 | * If we're not rewinding/unloading the tape, find out | |
623 | * whether we need to back up over one of two filemarks | |
624 | * we wrote (if we wrote two filemarks) so that appends | |
625 | * from this point on will be sane. | |
626 | */ | |
627 | if (error == 0 && writing && (softc->quirks & SA_QUIRK_2FM)) { | |
628 | tmp = saspace(periph, -1, SS_FILEMARKS); | |
629 | if (tmp) { | |
1c8b7a9a PA |
630 | xpt_print(periph->path, "unable to backspace " |
631 | "over one of double filemarks at end of " | |
632 | "tape\n"); | |
633 | xpt_print(periph->path, "it is possible that " | |
634 | "this device needs a SA_QUIRK_1FM quirk set" | |
635 | "for it\n"); | |
984263bc MD |
636 | softc->flags |= SA_FLAG_TAPE_FROZEN; |
637 | } | |
638 | } | |
639 | break; | |
640 | default: | |
1c8b7a9a | 641 | xpt_print(periph->path, "unknown mode 0x%x in saclose\n", mode); |
984263bc MD |
642 | /* NOTREACHED */ |
643 | break; | |
644 | } | |
645 | ||
646 | /* | |
647 | * We wish to note here that there are no more filemarks to be written. | |
648 | */ | |
649 | softc->filemarks = 0; | |
650 | softc->flags &= ~SA_FLAG_TAPE_WRITTEN; | |
651 | ||
652 | /* | |
653 | * And we are no longer open for business. | |
654 | */ | |
655 | softc->flags &= ~closedbits; | |
656 | ||
657 | /* | |
658 | * Inform users if tape state if frozen.... | |
659 | */ | |
660 | if (softc->flags & SA_FLAG_TAPE_FROZEN) { | |
1c8b7a9a PA |
661 | xpt_print(periph->path, "tape is now frozen- use an OFFLINE, " |
662 | "REWIND or MTEOM command to clear this state.\n"); | |
984263bc MD |
663 | } |
664 | ||
665 | /* release the device if it is no longer mounted */ | |
666 | if ((softc->flags & SA_FLAG_TAPE_MOUNTED) == 0) | |
667 | sareservereleaseunit(periph, FALSE); | |
668 | ||
2d19cdd3 | 669 | cam_periph_unhold(periph, 1); |
984263bc MD |
670 | cam_periph_release(periph); |
671 | ||
672 | return (error); | |
673 | } | |
674 | ||
675 | /* | |
676 | * Actually translate the requested transfer into one the physical driver | |
677 | * can understand. The transfer is described by a buf and will include | |
678 | * only one physical transfer. | |
679 | */ | |
fef8985e MD |
680 | static int |
681 | sastrategy(struct dev_strategy_args *ap) | |
984263bc | 682 | { |
b13267a5 | 683 | cdev_t dev = ap->a_head.a_dev; |
fef8985e | 684 | struct bio *bio = ap->a_bio; |
81b5c339 | 685 | struct buf *bp = bio->bio_buf; |
984263bc MD |
686 | struct cam_periph *periph; |
687 | struct sa_softc *softc; | |
688 | u_int unit; | |
984263bc | 689 | |
81b5c339 | 690 | if (SA_IS_CTRL(dev)) { |
984263bc MD |
691 | bp->b_error = EINVAL; |
692 | goto bad; | |
693 | } | |
81b5c339 | 694 | unit = SAUNIT(dev); |
984263bc MD |
695 | periph = cam_extend_get(saperiphs, unit); |
696 | if (periph == NULL) { | |
697 | bp->b_error = ENXIO; | |
698 | goto bad; | |
699 | } | |
1c8b7a9a | 700 | cam_periph_lock(periph); |
984263bc | 701 | |
1c8b7a9a | 702 | softc = (struct sa_softc *)periph->softc; |
984263bc MD |
703 | |
704 | if (softc->flags & SA_FLAG_INVALID) { | |
1c8b7a9a | 705 | cam_periph_unlock(periph); |
984263bc MD |
706 | bp->b_error = ENXIO; |
707 | goto bad; | |
708 | } | |
709 | ||
710 | if (softc->flags & SA_FLAG_TAPE_FROZEN) { | |
1c8b7a9a | 711 | cam_periph_unlock(periph); |
984263bc MD |
712 | bp->b_error = EPERM; |
713 | goto bad; | |
714 | } | |
715 | ||
35872d89 PA |
716 | /* |
717 | * This should actually never occur as the write(2) | |
718 | * system call traps attempts to write to a read-only | |
719 | * file descriptor. | |
720 | */ | |
721 | if (bp->b_cmd == BUF_CMD_WRITE && softc->open_rdonly) { | |
1c8b7a9a | 722 | cam_periph_unlock(periph); |
35872d89 PA |
723 | bp->b_error = EBADF; |
724 | goto bad; | |
725 | } | |
726 | ||
35872d89 PA |
727 | if (softc->open_pending_mount) { |
728 | int error = samount(periph, 0, dev); | |
729 | if (error) { | |
1c8b7a9a | 730 | cam_periph_unlock(periph); |
35872d89 PA |
731 | bp->b_error = ENXIO; |
732 | goto bad; | |
733 | } | |
734 | saprevent(periph, PR_PREVENT); | |
735 | softc->open_pending_mount = 0; | |
736 | } | |
737 | ||
984263bc | 738 | /* |
35872d89 | 739 | * If it's a null transfer, return immediately |
984263bc | 740 | */ |
1c8b7a9a PA |
741 | if (bp->b_bcount == 0) { |
742 | cam_periph_unlock(periph); | |
984263bc | 743 | goto done; |
1c8b7a9a | 744 | } |
984263bc MD |
745 | |
746 | /* valid request? */ | |
747 | if (softc->flags & SA_FLAG_FIXED) { | |
748 | /* | |
749 | * Fixed block device. The byte count must | |
750 | * be a multiple of our block size. | |
751 | */ | |
752 | if (((softc->blk_mask != ~0) && | |
753 | ((bp->b_bcount & softc->blk_mask) != 0)) || | |
754 | ((softc->blk_mask == ~0) && | |
755 | ((bp->b_bcount % softc->min_blk) != 0))) { | |
1c8b7a9a PA |
756 | xpt_print(periph->path, "Invalid request. Fixed block " |
757 | "device requests must be a multiple of %d bytes\n", | |
758 | softc->min_blk); | |
759 | cam_periph_unlock(periph); | |
984263bc MD |
760 | bp->b_error = EINVAL; |
761 | goto bad; | |
762 | } | |
763 | } else if ((bp->b_bcount > softc->max_blk) || | |
764 | (bp->b_bcount < softc->min_blk) || | |
765 | (bp->b_bcount & softc->blk_mask) != 0) { | |
766 | ||
767 | xpt_print_path(periph->path); | |
1c8b7a9a PA |
768 | kprintf("Invalid request. Variable block " |
769 | "device requests must be "); | |
984263bc | 770 | if (softc->blk_mask != 0) { |
85f8e2ea | 771 | kprintf("a multiple of %d ", (0x1 << softc->blk_gran)); |
984263bc | 772 | } |
85f8e2ea | 773 | kprintf("between %d and %d bytes\n", softc->min_blk, |
984263bc | 774 | softc->max_blk); |
1c8b7a9a | 775 | cam_periph_unlock(periph); |
984263bc MD |
776 | bp->b_error = EINVAL; |
777 | goto bad; | |
778 | } | |
779 | ||
984263bc MD |
780 | /* |
781 | * Place it at the end of the queue. | |
782 | */ | |
81b5c339 | 783 | bioq_insert_tail(&softc->bio_queue, bio); |
984263bc | 784 | softc->queue_count++; |
41afe5bf PA |
785 | #if 0 |
786 | CAM_DEBUG(periph->path, CAM_DEBUG_INFO, | |
787 | ("sastrategy: queuing a %ld %s byte %s\n", bp->bio_bcount, | |
788 | (softc->flags & SA_FLAG_FIXED)? "fixed" : "variable", | |
789 | (bp->bio_cmd == BIO_READ)? "read" : "write")); | |
790 | #endif | |
791 | if (softc->queue_count > 1) { | |
792 | CAM_DEBUG(periph->path, CAM_DEBUG_INFO, | |
793 | ("sastrategy: queue count now %d\n", softc->queue_count)); | |
794 | } | |
984263bc MD |
795 | |
796 | /* | |
797 | * Schedule ourselves for performing the work. | |
798 | */ | |
799 | xpt_schedule(periph, 1); | |
1c8b7a9a | 800 | cam_periph_unlock(periph); |
984263bc | 801 | |
fef8985e | 802 | return(0); |
984263bc MD |
803 | bad: |
804 | bp->b_flags |= B_ERROR; | |
805 | done: | |
806 | ||
807 | /* | |
808 | * Correctly set the buf to indicate a completed xfer | |
809 | */ | |
810 | bp->b_resid = bp->b_bcount; | |
81b5c339 | 811 | biodone(bio); |
fef8985e | 812 | return(0); |
984263bc MD |
813 | } |
814 | ||
35872d89 PA |
815 | |
816 | #define PENDING_MOUNT_CHECK(softc, periph, dev) \ | |
817 | if (softc->open_pending_mount) { \ | |
818 | error = samount(periph, 0, dev); \ | |
819 | if (error) { \ | |
820 | break; \ | |
821 | } \ | |
822 | saprevent(periph, PR_PREVENT); \ | |
823 | softc->open_pending_mount = 0; \ | |
824 | } | |
825 | ||
984263bc | 826 | static int |
fef8985e | 827 | saioctl(struct dev_ioctl_args *ap) |
984263bc | 828 | { |
b13267a5 | 829 | cdev_t dev = ap->a_head.a_dev; |
fef8985e | 830 | caddr_t addr = ap->a_data; |
984263bc MD |
831 | struct cam_periph *periph; |
832 | struct sa_softc *softc; | |
833 | scsi_space_code spaceop; | |
2d19cdd3 | 834 | int didholdperiph = 0; |
984263bc MD |
835 | int unit; |
836 | int mode; | |
984263bc MD |
837 | int error = 0; |
838 | ||
839 | unit = SAUNIT(dev); | |
840 | mode = SAMODE(dev); | |
984263bc MD |
841 | error = 0; /* shut up gcc */ |
842 | spaceop = 0; /* shut up gcc */ | |
843 | ||
844 | periph = cam_extend_get(saperiphs, unit); | |
845 | if (periph == NULL) | |
846 | return (ENXIO); | |
847 | ||
1c8b7a9a | 848 | cam_periph_lock(periph); |
984263bc MD |
849 | softc = (struct sa_softc *)periph->softc; |
850 | ||
851 | /* | |
852 | * Check for control mode accesses. We allow MTIOCGET and | |
853 | * MTIOCERRSTAT (but need to be the only one open in order | |
854 | * to clear latched status), and MTSETBSIZE, MTSETDNSTY | |
855 | * and MTCOMP (but need to be the only one accessing this | |
856 | * device to run those). | |
857 | */ | |
858 | ||
859 | if (SA_IS_CTRL(dev)) { | |
fef8985e | 860 | switch (ap->a_cmd) { |
984263bc MD |
861 | case MTIOCGETEOTMODEL: |
862 | case MTIOCGET: | |
863 | break; | |
864 | case MTIOCERRSTAT: | |
865 | /* | |
866 | * If the periph isn't already locked, lock it | |
867 | * so our MTIOCERRSTAT can reset latched error stats. | |
868 | * | |
869 | * If the periph is already locked, skip it because | |
870 | * we're just getting status and it'll be up to the | |
871 | * other thread that has this device open to do | |
872 | * an MTIOCERRSTAT that would clear latched status. | |
873 | */ | |
984263bc | 874 | if ((periph->flags & CAM_PERIPH_LOCKED) == 0) { |
1c8b7a9a | 875 | error = cam_periph_hold(periph, PCATCH); |
984263bc | 876 | if (error != 0) { |
984263bc MD |
877 | return (error); |
878 | } | |
2d19cdd3 | 879 | didholdperiph = 1; |
984263bc MD |
880 | } |
881 | break; | |
882 | ||
556a5c3b PA |
883 | case MTIOCTOP: |
884 | { | |
885 | struct mtop *mt = (struct mtop *) addr; | |
886 | ||
887 | /* | |
888 | * Check to make sure it's an OP we can perform | |
889 | * with no media inserted. | |
890 | */ | |
891 | switch (mt->mt_op) { | |
892 | case MTSETBSIZ: | |
893 | case MTSETDNSTY: | |
894 | case MTCOMP: | |
895 | mt = NULL; | |
896 | /* FALLTHROUGH */ | |
897 | default: | |
898 | break; | |
899 | } | |
900 | if (mt != NULL) { | |
901 | break; | |
902 | } | |
903 | /* FALLTHROUGH */ | |
904 | } | |
984263bc | 905 | case MTIOCSETEOTMODEL: |
984263bc MD |
906 | /* |
907 | * We need to acquire the peripheral here rather | |
908 | * than at open time because we are sharing writable | |
909 | * access to data structures. | |
910 | */ | |
1c8b7a9a | 911 | error = cam_periph_hold(periph, PCATCH); |
984263bc | 912 | if (error != 0) { |
984263bc MD |
913 | return (error); |
914 | } | |
2d19cdd3 | 915 | didholdperiph = 1; |
984263bc MD |
916 | break; |
917 | ||
918 | default: | |
919 | return (EINVAL); | |
920 | } | |
921 | } | |
922 | ||
923 | /* | |
924 | * Find the device that the user is talking about | |
925 | */ | |
fef8985e | 926 | switch (ap->a_cmd) { |
984263bc MD |
927 | case MTIOCGET: |
928 | { | |
fef8985e | 929 | struct mtget *g = (struct mtget *)addr; |
984263bc MD |
930 | |
931 | /* | |
932 | * If this isn't the control mode device, actually go out | |
933 | * and ask the drive again what it's set to. | |
934 | */ | |
35872d89 | 935 | if (!SA_IS_CTRL(dev) && !softc->open_pending_mount) { |
984263bc MD |
936 | u_int8_t write_protect; |
937 | int comp_enabled, comp_supported; | |
938 | error = sagetparams(periph, SA_PARAM_ALL, | |
939 | &softc->media_blksize, &softc->media_density, | |
940 | &softc->media_numblks, &softc->buffer_mode, | |
941 | &write_protect, &softc->speed, &comp_supported, | |
942 | &comp_enabled, &softc->comp_algorithm, NULL); | |
943 | if (error) | |
944 | break; | |
945 | if (write_protect) | |
946 | softc->flags |= SA_FLAG_TAPE_WP; | |
947 | else | |
948 | softc->flags &= ~SA_FLAG_TAPE_WP; | |
949 | softc->flags &= ~(SA_FLAG_COMP_SUPP| | |
950 | SA_FLAG_COMP_ENABLED|SA_FLAG_COMP_UNSUPP); | |
951 | if (comp_supported) { | |
952 | if (softc->saved_comp_algorithm == 0) | |
953 | softc->saved_comp_algorithm = | |
954 | softc->comp_algorithm; | |
955 | softc->flags |= SA_FLAG_COMP_SUPP; | |
956 | if (comp_enabled) | |
957 | softc->flags |= SA_FLAG_COMP_ENABLED; | |
958 | } else | |
959 | softc->flags |= SA_FLAG_COMP_UNSUPP; | |
960 | } | |
961 | bzero(g, sizeof(struct mtget)); | |
962 | g->mt_type = MT_ISAR; | |
963 | if (softc->flags & SA_FLAG_COMP_UNSUPP) { | |
964 | g->mt_comp = MT_COMP_UNSUPP; | |
965 | g->mt_comp0 = MT_COMP_UNSUPP; | |
966 | g->mt_comp1 = MT_COMP_UNSUPP; | |
967 | g->mt_comp2 = MT_COMP_UNSUPP; | |
968 | g->mt_comp3 = MT_COMP_UNSUPP; | |
969 | } else { | |
970 | if ((softc->flags & SA_FLAG_COMP_ENABLED) == 0) { | |
971 | g->mt_comp = MT_COMP_DISABLED; | |
972 | } else { | |
973 | g->mt_comp = softc->comp_algorithm; | |
974 | } | |
975 | g->mt_comp0 = softc->comp_algorithm; | |
976 | g->mt_comp1 = softc->comp_algorithm; | |
977 | g->mt_comp2 = softc->comp_algorithm; | |
978 | g->mt_comp3 = softc->comp_algorithm; | |
979 | } | |
980 | g->mt_density = softc->media_density; | |
981 | g->mt_density0 = softc->media_density; | |
982 | g->mt_density1 = softc->media_density; | |
983 | g->mt_density2 = softc->media_density; | |
984 | g->mt_density3 = softc->media_density; | |
985 | g->mt_blksiz = softc->media_blksize; | |
986 | g->mt_blksiz0 = softc->media_blksize; | |
987 | g->mt_blksiz1 = softc->media_blksize; | |
988 | g->mt_blksiz2 = softc->media_blksize; | |
989 | g->mt_blksiz3 = softc->media_blksize; | |
990 | g->mt_fileno = softc->fileno; | |
991 | g->mt_blkno = softc->blkno; | |
992 | g->mt_dsreg = (short) softc->dsreg; | |
993 | /* | |
994 | * Yes, we know that this is likely to overflow | |
995 | */ | |
996 | if (softc->last_resid_was_io) { | |
997 | if ((g->mt_resid = (short) softc->last_io_resid) != 0) { | |
2d19cdd3 | 998 | if (SA_IS_CTRL(dev) == 0 || didholdperiph) { |
984263bc MD |
999 | softc->last_io_resid = 0; |
1000 | } | |
1001 | } | |
1002 | } else { | |
1003 | if ((g->mt_resid = (short)softc->last_ctl_resid) != 0) { | |
2d19cdd3 | 1004 | if (SA_IS_CTRL(dev) == 0 || didholdperiph) { |
984263bc MD |
1005 | softc->last_ctl_resid = 0; |
1006 | } | |
1007 | } | |
1008 | } | |
1009 | error = 0; | |
1010 | break; | |
1011 | } | |
1012 | case MTIOCERRSTAT: | |
1013 | { | |
1014 | struct scsi_tape_errors *sep = | |
fef8985e | 1015 | &((union mterrstat *)addr)->scsi_errstat; |
984263bc MD |
1016 | |
1017 | CAM_DEBUG(periph->path, CAM_DEBUG_TRACE, | |
1018 | ("saioctl: MTIOCERRSTAT\n")); | |
1019 | ||
1020 | bzero(sep, sizeof(*sep)); | |
1021 | sep->io_resid = softc->last_io_resid; | |
1022 | bcopy((caddr_t) &softc->last_io_sense, sep->io_sense, | |
1023 | sizeof (sep->io_sense)); | |
1024 | bcopy((caddr_t) &softc->last_io_cdb, sep->io_cdb, | |
1025 | sizeof (sep->io_cdb)); | |
1026 | sep->ctl_resid = softc->last_ctl_resid; | |
1027 | bcopy((caddr_t) &softc->last_ctl_sense, sep->ctl_sense, | |
1028 | sizeof (sep->ctl_sense)); | |
1029 | bcopy((caddr_t) &softc->last_ctl_cdb, sep->ctl_cdb, | |
1030 | sizeof (sep->ctl_cdb)); | |
1031 | ||
35872d89 | 1032 | if ((SA_IS_CTRL(dev) == 0 && softc->open_pending_mount) || |
2d19cdd3 | 1033 | didholdperiph) |
984263bc MD |
1034 | bzero((caddr_t) &softc->errinfo, |
1035 | sizeof (softc->errinfo)); | |
1036 | error = 0; | |
1037 | break; | |
1038 | } | |
1039 | case MTIOCTOP: | |
1040 | { | |
1041 | struct mtop *mt; | |
1042 | int count; | |
1043 | ||
35872d89 PA |
1044 | PENDING_MOUNT_CHECK(softc, periph, dev); |
1045 | ||
fef8985e | 1046 | mt = (struct mtop *)addr; |
984263bc MD |
1047 | |
1048 | CAM_DEBUG(periph->path, CAM_DEBUG_TRACE, | |
1049 | ("saioctl: op=0x%x count=0x%x\n", | |
1050 | mt->mt_op, mt->mt_count)); | |
1051 | ||
1052 | count = mt->mt_count; | |
1053 | switch (mt->mt_op) { | |
1054 | case MTWEOF: /* write an end-of-file marker */ | |
1055 | /* | |
1056 | * We don't need to clear the SA_FLAG_TAPE_WRITTEN | |
1057 | * flag because by keeping track of filemarks | |
1058 | * we have last written we know ehether or not | |
1059 | * we need to write more when we close the device. | |
1060 | */ | |
1061 | error = sawritefilemarks(periph, count, FALSE); | |
1062 | break; | |
1063 | case MTWSS: /* write a setmark */ | |
1064 | error = sawritefilemarks(periph, count, TRUE); | |
1065 | break; | |
1066 | case MTBSR: /* backward space record */ | |
1067 | case MTFSR: /* forward space record */ | |
1068 | case MTBSF: /* backward space file */ | |
1069 | case MTFSF: /* forward space file */ | |
1070 | case MTBSS: /* backward space setmark */ | |
1071 | case MTFSS: /* forward space setmark */ | |
1072 | case MTEOD: /* space to end of recorded medium */ | |
1073 | { | |
1074 | int nmarks; | |
1075 | ||
1076 | spaceop = SS_FILEMARKS; | |
1077 | nmarks = softc->filemarks; | |
1078 | error = sacheckeod(periph); | |
1079 | if (error) { | |
1c8b7a9a PA |
1080 | xpt_print(periph->path, |
1081 | "EOD check prior to spacing failed\n"); | |
984263bc MD |
1082 | softc->flags |= SA_FLAG_EIO_PENDING; |
1083 | break; | |
1084 | } | |
1085 | nmarks -= softc->filemarks; | |
1086 | switch(mt->mt_op) { | |
1087 | case MTBSR: | |
1088 | count = -count; | |
1089 | /* FALLTHROUGH */ | |
1090 | case MTFSR: | |
1091 | spaceop = SS_BLOCKS; | |
1092 | break; | |
1093 | case MTBSF: | |
1094 | count = -count; | |
1095 | /* FALLTHROUGH */ | |
1096 | case MTFSF: | |
1097 | break; | |
1098 | case MTBSS: | |
1099 | count = -count; | |
1100 | /* FALLTHROUGH */ | |
1101 | case MTFSS: | |
1102 | spaceop = SS_SETMARKS; | |
1103 | break; | |
1104 | case MTEOD: | |
1105 | spaceop = SS_EOD; | |
1106 | count = 0; | |
1107 | nmarks = 0; | |
1108 | break; | |
1109 | default: | |
1110 | error = EINVAL; | |
1111 | break; | |
1112 | } | |
1113 | if (error) | |
1114 | break; | |
1115 | ||
1116 | nmarks = softc->filemarks; | |
1117 | /* | |
1118 | * XXX: Why are we checking again? | |
1119 | */ | |
1120 | error = sacheckeod(periph); | |
1121 | if (error) | |
1122 | break; | |
1123 | nmarks -= softc->filemarks; | |
1124 | error = saspace(periph, count - nmarks, spaceop); | |
1125 | /* | |
1126 | * At this point, clear that we've written the tape | |
1127 | * and that we've written any filemarks. We really | |
1128 | * don't know what the applications wishes to do next- | |
1129 | * the sacheckeod's will make sure we terminated the | |
1130 | * tape correctly if we'd been writing, but the next | |
1131 | * action the user application takes will set again | |
1132 | * whether we need to write filemarks. | |
1133 | */ | |
1134 | softc->flags &= | |
1135 | ~(SA_FLAG_TAPE_WRITTEN|SA_FLAG_TAPE_FROZEN); | |
1136 | softc->filemarks = 0; | |
1137 | break; | |
1138 | } | |
1139 | case MTREW: /* rewind */ | |
35872d89 | 1140 | PENDING_MOUNT_CHECK(softc, periph, dev); |
0e224b5d | 1141 | sacheckeod(periph); |
984263bc MD |
1142 | error = sarewind(periph); |
1143 | /* see above */ | |
1144 | softc->flags &= | |
1145 | ~(SA_FLAG_TAPE_WRITTEN|SA_FLAG_TAPE_FROZEN); | |
1146 | softc->flags &= ~SA_FLAG_ERR_PENDING; | |
1147 | softc->filemarks = 0; | |
1148 | break; | |
1149 | case MTERASE: /* erase */ | |
35872d89 | 1150 | PENDING_MOUNT_CHECK(softc, periph, dev); |
984263bc MD |
1151 | error = saerase(periph, count); |
1152 | softc->flags &= | |
1153 | ~(SA_FLAG_TAPE_WRITTEN|SA_FLAG_TAPE_FROZEN); | |
1154 | softc->flags &= ~SA_FLAG_ERR_PENDING; | |
1155 | break; | |
1156 | case MTRETENS: /* re-tension tape */ | |
35872d89 | 1157 | PENDING_MOUNT_CHECK(softc, periph, dev); |
984263bc MD |
1158 | error = saretension(periph); |
1159 | softc->flags &= | |
1160 | ~(SA_FLAG_TAPE_WRITTEN|SA_FLAG_TAPE_FROZEN); | |
1161 | softc->flags &= ~SA_FLAG_ERR_PENDING; | |
1162 | break; | |
1163 | case MTOFFL: /* rewind and put the drive offline */ | |
1164 | ||
35872d89 PA |
1165 | PENDING_MOUNT_CHECK(softc, periph, dev); |
1166 | ||
0e224b5d | 1167 | sacheckeod(periph); |
984263bc MD |
1168 | /* see above */ |
1169 | softc->flags &= ~SA_FLAG_TAPE_WRITTEN; | |
1170 | softc->filemarks = 0; | |
1171 | ||
1172 | error = sarewind(periph); | |
1173 | /* clear the frozen flag anyway */ | |
1174 | softc->flags &= ~SA_FLAG_TAPE_FROZEN; | |
1175 | ||
1176 | /* | |
1177 | * Be sure to allow media removal before ejecting. | |
1178 | */ | |
1179 | ||
1180 | saprevent(periph, PR_ALLOW); | |
1181 | if (error == 0) { | |
1182 | error = saloadunload(periph, FALSE); | |
1183 | if (error == 0) { | |
1184 | softc->flags &= ~SA_FLAG_TAPE_MOUNTED; | |
1185 | } | |
1186 | } | |
1187 | break; | |
1188 | ||
1189 | case MTNOP: /* no operation, sets status only */ | |
1190 | case MTCACHE: /* enable controller cache */ | |
1191 | case MTNOCACHE: /* disable controller cache */ | |
1192 | error = 0; | |
1193 | break; | |
1194 | ||
1195 | case MTSETBSIZ: /* Set block size for device */ | |
1196 | ||
35872d89 PA |
1197 | PENDING_MOUNT_CHECK(softc, periph, dev); |
1198 | ||
984263bc MD |
1199 | error = sasetparams(periph, SA_PARAM_BLOCKSIZE, count, |
1200 | 0, 0, 0); | |
1201 | if (error == 0) { | |
1202 | softc->last_media_blksize = | |
1203 | softc->media_blksize; | |
1204 | softc->media_blksize = count; | |
1205 | if (count) { | |
1206 | softc->flags |= SA_FLAG_FIXED; | |
1207 | if (powerof2(count)) { | |
1208 | softc->blk_shift = | |
1209 | ffs(count) - 1; | |
1210 | softc->blk_mask = count - 1; | |
1211 | } else { | |
1212 | softc->blk_mask = ~0; | |
1213 | softc->blk_shift = 0; | |
1214 | } | |
1215 | /* | |
1216 | * Make the user's desire 'persistent'. | |
1217 | */ | |
1218 | softc->quirks &= ~SA_QUIRK_VARIABLE; | |
1219 | softc->quirks |= SA_QUIRK_FIXED; | |
1220 | } else { | |
1221 | softc->flags &= ~SA_FLAG_FIXED; | |
1222 | if (softc->max_blk == 0) { | |
1223 | softc->max_blk = ~0; | |
1224 | } | |
1225 | softc->blk_shift = 0; | |
1226 | if (softc->blk_gran != 0) { | |
1227 | softc->blk_mask = | |
1228 | softc->blk_gran - 1; | |
1229 | } else { | |
1230 | softc->blk_mask = 0; | |
1231 | } | |
1232 | /* | |
1233 | * Make the user's desire 'persistent'. | |
1234 | */ | |
1235 | softc->quirks |= SA_QUIRK_VARIABLE; | |
1236 | softc->quirks &= ~SA_QUIRK_FIXED; | |
1237 | } | |
1238 | } | |
1239 | break; | |
1240 | case MTSETDNSTY: /* Set density for device and mode */ | |
35872d89 PA |
1241 | PENDING_MOUNT_CHECK(softc, periph, dev); |
1242 | ||
984263bc MD |
1243 | if (count > UCHAR_MAX) { |
1244 | error = EINVAL; | |
1245 | break; | |
1246 | } else { | |
1247 | error = sasetparams(periph, SA_PARAM_DENSITY, | |
1248 | 0, count, 0, 0); | |
1249 | } | |
1250 | break; | |
1251 | case MTCOMP: /* enable compression */ | |
35872d89 | 1252 | PENDING_MOUNT_CHECK(softc, periph, dev); |
984263bc MD |
1253 | /* |
1254 | * Some devices don't support compression, and | |
1255 | * don't like it if you ask them for the | |
1256 | * compression page. | |
1257 | */ | |
1258 | if ((softc->quirks & SA_QUIRK_NOCOMP) || | |
1259 | (softc->flags & SA_FLAG_COMP_UNSUPP)) { | |
1260 | error = ENODEV; | |
1261 | break; | |
1262 | } | |
1263 | error = sasetparams(periph, SA_PARAM_COMPRESSION, | |
1264 | 0, 0, count, SF_NO_PRINT); | |
1265 | break; | |
1266 | default: | |
1267 | error = EINVAL; | |
1268 | } | |
1269 | break; | |
1270 | } | |
1271 | case MTIOCIEOT: | |
1272 | case MTIOCEEOT: | |
1273 | error = 0; | |
1274 | break; | |
1275 | case MTIOCRDSPOS: | |
35872d89 | 1276 | PENDING_MOUNT_CHECK(softc, periph, dev); |
fef8985e | 1277 | error = sardpos(periph, 0, (u_int32_t *) addr); |
984263bc MD |
1278 | break; |
1279 | case MTIOCRDHPOS: | |
35872d89 | 1280 | PENDING_MOUNT_CHECK(softc, periph, dev); |
fef8985e | 1281 | error = sardpos(periph, 1, (u_int32_t *) addr); |
984263bc MD |
1282 | break; |
1283 | case MTIOCSLOCATE: | |
35872d89 | 1284 | PENDING_MOUNT_CHECK(softc, periph, dev); |
fef8985e | 1285 | error = sasetpos(periph, 0, (u_int32_t *) addr); |
984263bc MD |
1286 | break; |
1287 | case MTIOCHLOCATE: | |
35872d89 | 1288 | PENDING_MOUNT_CHECK(softc, periph, dev); |
fef8985e | 1289 | error = sasetpos(periph, 1, (u_int32_t *) addr); |
984263bc MD |
1290 | break; |
1291 | case MTIOCGETEOTMODEL: | |
1292 | error = 0; | |
1293 | if (softc->quirks & SA_QUIRK_1FM) | |
1294 | mode = 1; | |
1295 | else | |
1296 | mode = 2; | |
fef8985e | 1297 | *((u_int32_t *) addr) = mode; |
984263bc MD |
1298 | break; |
1299 | case MTIOCSETEOTMODEL: | |
1300 | error = 0; | |
fef8985e | 1301 | switch (*((u_int32_t *) addr)) { |
984263bc MD |
1302 | case 1: |
1303 | softc->quirks &= ~SA_QUIRK_2FM; | |
1304 | softc->quirks |= SA_QUIRK_1FM; | |
1305 | break; | |
1306 | case 2: | |
1307 | softc->quirks &= ~SA_QUIRK_1FM; | |
1308 | softc->quirks |= SA_QUIRK_2FM; | |
1309 | break; | |
1310 | default: | |
1311 | error = EINVAL; | |
1312 | break; | |
1313 | } | |
1314 | break; | |
1315 | default: | |
fef8985e | 1316 | error = cam_periph_ioctl(periph, ap->a_cmd, addr, saerror); |
984263bc MD |
1317 | break; |
1318 | } | |
1319 | ||
1320 | /* | |
1321 | * Check to see if we cleared a frozen state | |
1322 | */ | |
1323 | if (error == 0 && (softc->flags & SA_FLAG_TAPE_FROZEN)) { | |
fef8985e | 1324 | switch(ap->a_cmd) { |
984263bc MD |
1325 | case MTIOCRDSPOS: |
1326 | case MTIOCRDHPOS: | |
1327 | case MTIOCSLOCATE: | |
1328 | case MTIOCHLOCATE: | |
1329 | softc->fileno = (daddr_t) -1; | |
1330 | softc->blkno = (daddr_t) -1; | |
1331 | softc->flags &= ~SA_FLAG_TAPE_FROZEN; | |
1c8b7a9a PA |
1332 | xpt_print(periph->path, |
1333 | "tape state now unfrozen.\n"); | |
984263bc MD |
1334 | break; |
1335 | default: | |
1336 | break; | |
1337 | } | |
1338 | } | |
2d19cdd3 MD |
1339 | if (didholdperiph) |
1340 | cam_periph_unhold(periph, 1); | |
1341 | else | |
1342 | cam_periph_unlock(periph); | |
984263bc MD |
1343 | return (error); |
1344 | } | |
1345 | ||
1346 | static void | |
1347 | sainit(void) | |
1348 | { | |
1349 | cam_status status; | |
984263bc MD |
1350 | |
1351 | /* | |
1352 | * Create our extend array for storing the devices we attach to. | |
1353 | */ | |
1354 | saperiphs = cam_extend_new(); | |
1355 | if (saperiphs == NULL) { | |
85f8e2ea | 1356 | kprintf("sa: Failed to alloc extend array!\n"); |
984263bc MD |
1357 | return; |
1358 | } | |
1359 | ||
1360 | /* | |
1361 | * Install a global async callback. | |
1362 | */ | |
1c8b7a9a | 1363 | status = xpt_register_async(AC_FOUND_DEVICE, saasync, NULL, NULL); |
984263bc MD |
1364 | |
1365 | if (status != CAM_REQ_CMP) { | |
85f8e2ea | 1366 | kprintf("sa: Failed to attach master async callback " |
984263bc MD |
1367 | "due to status 0x%x!\n", status); |
1368 | } | |
1369 | } | |
1370 | ||
1371 | static void | |
1372 | saoninvalidate(struct cam_periph *periph) | |
1373 | { | |
1374 | struct sa_softc *softc; | |
1375 | struct buf *q_bp; | |
81b5c339 | 1376 | struct bio *q_bio; |
984263bc MD |
1377 | |
1378 | softc = (struct sa_softc *)periph->softc; | |
1379 | ||
1380 | /* | |
1381 | * De-register any async callbacks. | |
1382 | */ | |
1c8b7a9a | 1383 | xpt_register_async(0, saasync, periph, periph->path); |
984263bc MD |
1384 | |
1385 | softc->flags |= SA_FLAG_INVALID; | |
1386 | ||
984263bc MD |
1387 | /* |
1388 | * Return all queued I/O with ENXIO. | |
1389 | * XXX Handle any transactions queued to the card | |
1390 | * with XPT_ABORT_CCB. | |
1391 | */ | |
81b5c339 MD |
1392 | while ((q_bio = bioq_first(&softc->bio_queue)) != NULL){ |
1393 | bioq_remove(&softc->bio_queue, q_bio); | |
1394 | q_bp = q_bio->bio_buf; | |
984263bc MD |
1395 | q_bp->b_resid = q_bp->b_bcount; |
1396 | q_bp->b_error = ENXIO; | |
1397 | q_bp->b_flags |= B_ERROR; | |
81b5c339 | 1398 | biodone(q_bio); |
984263bc MD |
1399 | } |
1400 | softc->queue_count = 0; | |
984263bc | 1401 | |
1c8b7a9a | 1402 | xpt_print(periph->path, "lost device\n"); |
984263bc MD |
1403 | |
1404 | } | |
1405 | ||
1406 | static void | |
1407 | sacleanup(struct cam_periph *periph) | |
1408 | { | |
1409 | struct sa_softc *softc; | |
984263bc MD |
1410 | |
1411 | softc = (struct sa_softc *)periph->softc; | |
1412 | ||
1413 | devstat_remove_entry(&softc->device_stats); | |
1414 | ||
984263bc | 1415 | cam_extend_release(saperiphs, periph->unit_number); |
1c8b7a9a | 1416 | xpt_print(periph->path, "removing device entry\n"); |
cd29885a MD |
1417 | kprintf("devfs: PLEASE check that only the right scsi sa devices were removed!!!!\n"); |
1418 | dev_ops_remove_minor(&sa_ops, /*SA_UNITMASK,*/ SA_UNIT(periph->unit_number)); | |
bc6e3c73 | 1419 | kfree(softc, M_SCSISA); |
984263bc MD |
1420 | } |
1421 | ||
1422 | static void | |
1423 | saasync(void *callback_arg, u_int32_t code, | |
1424 | struct cam_path *path, void *arg) | |
1425 | { | |
1426 | struct cam_periph *periph; | |
1427 | ||
1428 | periph = (struct cam_periph *)callback_arg; | |
1429 | switch (code) { | |
1430 | case AC_FOUND_DEVICE: | |
1431 | { | |
1432 | struct ccb_getdev *cgd; | |
1433 | cam_status status; | |
1434 | ||
1435 | cgd = (struct ccb_getdev *)arg; | |
1436 | if (cgd == NULL) | |
1437 | break; | |
1438 | ||
1439 | if (SID_TYPE(&cgd->inq_data) != T_SEQUENTIAL) | |
1440 | break; | |
1441 | ||
1442 | /* | |
1443 | * Allocate a peripheral instance for | |
1444 | * this device and start the probe | |
1445 | * process. | |
1446 | */ | |
1447 | status = cam_periph_alloc(saregister, saoninvalidate, | |
1448 | sacleanup, sastart, | |
1449 | "sa", CAM_PERIPH_BIO, cgd->ccb_h.path, | |
1450 | saasync, AC_FOUND_DEVICE, cgd); | |
1451 | ||
1452 | if (status != CAM_REQ_CMP | |
1453 | && status != CAM_REQ_INPROG) | |
85f8e2ea | 1454 | kprintf("saasync: Unable to probe new device " |
984263bc MD |
1455 | "due to status 0x%x\n", status); |
1456 | break; | |
1457 | } | |
1458 | default: | |
1459 | cam_periph_async(periph, code, path, arg); | |
1460 | break; | |
1461 | } | |
1462 | } | |
1463 | ||
1464 | static cam_status | |
1465 | saregister(struct cam_periph *periph, void *arg) | |
1466 | { | |
1467 | struct sa_softc *softc; | |
984263bc MD |
1468 | struct ccb_getdev *cgd; |
1469 | caddr_t match; | |
1470 | int i; | |
1471 | ||
1472 | cgd = (struct ccb_getdev *)arg; | |
1473 | if (periph == NULL) { | |
85f8e2ea | 1474 | kprintf("saregister: periph was NULL!!\n"); |
984263bc MD |
1475 | return (CAM_REQ_CMP_ERR); |
1476 | } | |
1477 | ||
1478 | if (cgd == NULL) { | |
85f8e2ea | 1479 | kprintf("saregister: no getdev CCB, can't register device\n"); |
984263bc MD |
1480 | return (CAM_REQ_CMP_ERR); |
1481 | } | |
1482 | ||
bc6e3c73 | 1483 | softc = kmalloc(sizeof (*softc), M_SCSISA, M_INTWAIT | M_ZERO); |
984263bc MD |
1484 | softc->scsi_rev = SID_ANSI_REV(&cgd->inq_data); |
1485 | softc->state = SA_STATE_NORMAL; | |
1486 | softc->fileno = (daddr_t) -1; | |
1487 | softc->blkno = (daddr_t) -1; | |
1488 | ||
81b5c339 | 1489 | bioq_init(&softc->bio_queue); |
984263bc MD |
1490 | periph->softc = softc; |
1491 | cam_extend_set(saperiphs, periph->unit_number, periph); | |
1492 | ||
1493 | /* | |
1494 | * See if this device has any quirks. | |
1495 | */ | |
1496 | match = cam_quirkmatch((caddr_t)&cgd->inq_data, | |
1497 | (caddr_t)sa_quirk_table, | |
1498 | sizeof(sa_quirk_table)/sizeof(*sa_quirk_table), | |
1499 | sizeof(*sa_quirk_table), scsi_inquiry_match); | |
1500 | ||
1501 | if (match != NULL) { | |
1502 | softc->quirks = ((struct sa_quirk_entry *)match)->quirks; | |
1503 | softc->last_media_blksize = | |
1504 | ((struct sa_quirk_entry *)match)->prefblk; | |
1505 | #ifdef CAMDEBUG | |
1c8b7a9a PA |
1506 | xpt_print(periph->path, "found quirk entry %d\n", |
1507 | (int) (((struct sa_quirk_entry *) match) - sa_quirk_table)); | |
984263bc MD |
1508 | #endif |
1509 | } else | |
1510 | softc->quirks = SA_QUIRK_NONE; | |
1511 | ||
1512 | /* | |
1513 | * The SA driver supports a blocksize, but we don't know the | |
1514 | * blocksize until we media is inserted. So, set a flag to | |
1515 | * indicate that the blocksize is unavailable right now. | |
1516 | */ | |
1c8b7a9a | 1517 | cam_periph_unlock(periph); |
984263bc MD |
1518 | devstat_add_entry(&softc->device_stats, "sa", periph->unit_number, 0, |
1519 | DEVSTAT_BS_UNAVAILABLE, SID_TYPE(&cgd->inq_data) | | |
1520 | DEVSTAT_TYPE_IF_SCSI, DEVSTAT_PRIORITY_TAPE); | |
1521 | ||
fef8985e | 1522 | make_dev(&sa_ops, SAMINOR(SA_CTLDEV, |
984263bc | 1523 | periph->unit_number, 0, SA_ATYPE_R), UID_ROOT, GID_OPERATOR, |
f7507c39 | 1524 | 0660, "%s%d.ctl", periph->periph_name, periph->unit_number); |
984263bc | 1525 | |
fef8985e | 1526 | make_dev(&sa_ops, SAMINOR(SA_NOT_CTLDEV, |
984263bc | 1527 | periph->unit_number, 0, SA_ATYPE_R), UID_ROOT, GID_OPERATOR, |
f7507c39 | 1528 | 0660, "%s%d", periph->periph_name, periph->unit_number); |
984263bc | 1529 | |
fef8985e | 1530 | make_dev(&sa_ops, SAMINOR(SA_NOT_CTLDEV, |
984263bc | 1531 | periph->unit_number, 0, SA_ATYPE_NR), UID_ROOT, GID_OPERATOR, |
f7507c39 | 1532 | 0660, "n%s%d", periph->periph_name, periph->unit_number); |
984263bc | 1533 | |
fef8985e | 1534 | make_dev(&sa_ops, SAMINOR(SA_NOT_CTLDEV, |
984263bc | 1535 | periph->unit_number, 0, SA_ATYPE_ER), UID_ROOT, GID_OPERATOR, |
f7507c39 | 1536 | 0660, "e%s%d", periph->periph_name, periph->unit_number); |
984263bc MD |
1537 | |
1538 | for (i = 0; i < SA_NUM_MODES; i++) { | |
1539 | ||
fef8985e | 1540 | make_dev(&sa_ops, |
984263bc | 1541 | SAMINOR(SA_NOT_CTLDEV, periph->unit_number, i, SA_ATYPE_R), |
f7507c39 | 1542 | UID_ROOT, GID_OPERATOR, 0660, "%s%d.%d", |
984263bc MD |
1543 | periph->periph_name, periph->unit_number, i); |
1544 | ||
fef8985e | 1545 | make_dev(&sa_ops, |
984263bc | 1546 | SAMINOR(SA_NOT_CTLDEV, periph->unit_number, i, SA_ATYPE_NR), |
f7507c39 | 1547 | UID_ROOT, GID_OPERATOR, 0660, "n%s%d.%d", |
984263bc MD |
1548 | periph->periph_name, periph->unit_number, i); |
1549 | ||
1550 | ||
fef8985e | 1551 | make_dev(&sa_ops, |
984263bc | 1552 | SAMINOR(SA_NOT_CTLDEV, periph->unit_number, i, SA_ATYPE_ER), |
f7507c39 | 1553 | UID_ROOT, GID_OPERATOR, 0660, "e%s%d.%d", |
984263bc MD |
1554 | periph->periph_name, periph->unit_number, i); |
1555 | } | |
1c8b7a9a | 1556 | cam_periph_lock(periph); |
984263bc MD |
1557 | |
1558 | /* | |
1559 | * Add an async callback so that we get | |
1560 | * notified if this device goes away. | |
1561 | */ | |
1c8b7a9a | 1562 | xpt_register_async(AC_LOST_DEVICE, saasync, periph, periph->path); |
984263bc MD |
1563 | |
1564 | xpt_announce_periph(periph, NULL); | |
1565 | ||
1566 | return (CAM_REQ_CMP); | |
1567 | } | |
1568 | ||
1569 | static void | |
1570 | sastart(struct cam_periph *periph, union ccb *start_ccb) | |
1571 | { | |
1572 | struct sa_softc *softc; | |
1573 | ||
1574 | softc = (struct sa_softc *)periph->softc; | |
1575 | ||
41afe5bf | 1576 | CAM_DEBUG(periph->path, CAM_DEBUG_TRACE, ("sastart\n")); |
984263bc MD |
1577 | |
1578 | ||
1579 | switch (softc->state) { | |
1580 | case SA_STATE_NORMAL: | |
1581 | { | |
1582 | /* Pull a buffer from the queue and get going on it */ | |
1583 | struct buf *bp; | |
81b5c339 | 1584 | struct bio *bio; |
984263bc MD |
1585 | |
1586 | /* | |
1587 | * See if there is a buf with work for us to do.. | |
1588 | */ | |
81b5c339 | 1589 | bio = bioq_first(&softc->bio_queue); |
984263bc MD |
1590 | if (periph->immediate_priority <= periph->pinfo.priority) { |
1591 | CAM_DEBUG_PRINT(CAM_DEBUG_SUBTRACE, | |
1592 | ("queuing for immediate ccb\n")); | |
1593 | Set_CCB_Type(start_ccb, SA_CCB_WAITING); | |
1594 | SLIST_INSERT_HEAD(&periph->ccb_list, &start_ccb->ccb_h, | |
1595 | periph_links.sle); | |
1596 | periph->immediate_priority = CAM_PRIORITY_NONE; | |
984263bc | 1597 | wakeup(&periph->ccb_list); |
81b5c339 | 1598 | } else if (bio == NULL) { |
984263bc MD |
1599 | xpt_release_ccb(start_ccb); |
1600 | } else if ((softc->flags & SA_FLAG_ERR_PENDING) != 0) { | |
81b5c339 | 1601 | struct bio *done_bio; |
984263bc MD |
1602 | again: |
1603 | softc->queue_count--; | |
81b5c339 MD |
1604 | bioq_remove(&softc->bio_queue, bio); |
1605 | bp = bio->bio_buf; | |
984263bc | 1606 | bp->b_resid = bp->b_bcount; |
81b5c339 | 1607 | done_bio = bio; |
984263bc MD |
1608 | if ((softc->flags & SA_FLAG_EOM_PENDING) != 0) { |
1609 | /* | |
1610 | * We now just clear errors in this case | |
1611 | * and let the residual be the notifier. | |
1612 | */ | |
1613 | bp->b_error = 0; | |
1614 | } else if ((softc->flags & SA_FLAG_EOF_PENDING) != 0) { | |
1615 | /* | |
1616 | * This can only happen if we're reading | |
1617 | * in fixed length mode. In this case, | |
1618 | * we dump the rest of the list the | |
1619 | * same way. | |
1620 | */ | |
1621 | bp->b_error = 0; | |
81b5c339 MD |
1622 | if (bioq_first(&softc->bio_queue) != NULL) { |
1623 | biodone(done_bio); | |
984263bc MD |
1624 | goto again; |
1625 | } | |
1626 | } else if ((softc->flags & SA_FLAG_EIO_PENDING) != 0) { | |
1627 | bp->b_error = EIO; | |
1628 | bp->b_flags |= B_ERROR; | |
1629 | } | |
81b5c339 | 1630 | bio = bioq_first(&softc->bio_queue); |
984263bc MD |
1631 | /* |
1632 | * Only if we have no other buffers queued up | |
1633 | * do we clear the pending error flag. | |
1634 | */ | |
81b5c339 | 1635 | if (bio == NULL) |
984263bc MD |
1636 | softc->flags &= ~SA_FLAG_ERR_PENDING; |
1637 | CAM_DEBUG(periph->path, CAM_DEBUG_INFO, | |
81b5c339 | 1638 | ("sastart- ERR_PENDING now 0x%x, bio is %sNULL, " |
984263bc MD |
1639 | "%d more buffers queued up\n", |
1640 | (softc->flags & SA_FLAG_ERR_PENDING), | |
81b5c339 | 1641 | (bio != NULL)? "not " : " ", softc->queue_count)); |
984263bc | 1642 | xpt_release_ccb(start_ccb); |
81b5c339 | 1643 | biodone(done_bio); |
984263bc MD |
1644 | } else { |
1645 | u_int32_t length; | |
1646 | ||
81b5c339 MD |
1647 | bioq_remove(&softc->bio_queue, bio); |
1648 | bp = bio->bio_buf; | |
984263bc MD |
1649 | softc->queue_count--; |
1650 | ||
1651 | if ((softc->flags & SA_FLAG_FIXED) != 0) { | |
1652 | if (softc->blk_shift != 0) { | |
1653 | length = | |
1654 | bp->b_bcount >> softc->blk_shift; | |
1655 | } else if (softc->media_blksize != 0) { | |
1656 | length = | |
1657 | bp->b_bcount / softc->media_blksize; | |
1658 | } else { | |
1659 | bp->b_error = EIO; | |
1c8b7a9a PA |
1660 | xpt_print(periph->path, "zero blocksize" |
1661 | " for FIXED length writes?\n"); | |
81b5c339 | 1662 | biodone(bio); |
984263bc MD |
1663 | break; |
1664 | } | |
41afe5bf PA |
1665 | #if 0 |
1666 | CAM_DEBUG(start_ccb->ccb_h.path, CAM_DEBUG_INFO, | |
1667 | ("issuing a %d fixed record %s\n", | |
1668 | length, (bp->bio_cmd == BIO_READ)? "read" : | |
1669 | "write")); | |
1670 | #endif | |
984263bc MD |
1671 | } else { |
1672 | length = bp->b_bcount; | |
41afe5bf | 1673 | #if 0 |
984263bc | 1674 | CAM_DEBUG(start_ccb->ccb_h.path, CAM_DEBUG_INFO, |
41afe5bf PA |
1675 | ("issuing a %d variable byte %s\n", |
1676 | length, (bp->bio_cmd == BIO_READ)? "read" : | |
1677 | "write")); | |
1678 | #endif | |
984263bc MD |
1679 | } |
1680 | devstat_start_transaction(&softc->device_stats); | |
1681 | /* | |
1682 | * Some people have theorized that we should | |
1683 | * suppress illegal length indication if we are | |
1684 | * running in variable block mode so that we don't | |
1685 | * have to request sense every time our requested | |
1686 | * block size is larger than the written block. | |
1687 | * The residual information from the ccb allows | |
1688 | * us to identify this situation anyway. The only | |
1689 | * problem with this is that we will not get | |
1690 | * information about blocks that are larger than | |
1691 | * our read buffer unless we set the block size | |
1692 | * in the mode page to something other than 0. | |
1693 | * | |
1694 | * I believe that this is a non-issue. If user apps | |
1695 | * don't adjust their read size to match our record | |
1696 | * size, that's just life. Anyway, the typical usage | |
1697 | * would be to issue, e.g., 64KB reads and occasionally | |
1698 | * have to do deal with 512 byte or 1KB intermediate | |
1699 | * records. | |
1700 | */ | |
10f3fee5 | 1701 | softc->dsreg = (bp->b_cmd == BUF_CMD_READ) ? |
984263bc MD |
1702 | MTIO_DSREG_RD : MTIO_DSREG_WR; |
1703 | scsi_sa_read_write(&start_ccb->csio, 0, sadone, | |
10f3fee5 | 1704 | MSG_SIMPLE_Q_TAG, (bp->b_cmd == BUF_CMD_READ) != 0, |
984263bc MD |
1705 | FALSE, (softc->flags & SA_FLAG_FIXED) != 0, |
1706 | length, bp->b_data, bp->b_bcount, SSD_FULL_SIZE, | |
1707 | IO_TIMEOUT); | |
1708 | start_ccb->ccb_h.ccb_pflags &= ~SA_POSITION_UPDATED; | |
1709 | Set_CCB_Type(start_ccb, SA_CCB_BUFFER_IO); | |
81b5c339 MD |
1710 | start_ccb->ccb_h.ccb_bio = bio; |
1711 | bio = bioq_first(&softc->bio_queue); | |
984263bc MD |
1712 | xpt_action(start_ccb); |
1713 | } | |
1714 | ||
81b5c339 | 1715 | if (bio != NULL) { |
984263bc MD |
1716 | /* Have more work to do, so ensure we stay scheduled */ |
1717 | xpt_schedule(periph, 1); | |
1718 | } | |
1719 | break; | |
1720 | } | |
1721 | case SA_STATE_ABNORMAL: | |
1722 | default: | |
1723 | panic("state 0x%x in sastart", softc->state); | |
1724 | break; | |
1725 | } | |
1726 | } | |
1727 | ||
1728 | ||
1729 | static void | |
1730 | sadone(struct cam_periph *periph, union ccb *done_ccb) | |
1731 | { | |
1732 | struct sa_softc *softc; | |
1733 | struct ccb_scsiio *csio; | |
1734 | ||
1735 | softc = (struct sa_softc *)periph->softc; | |
1736 | csio = &done_ccb->csio; | |
1737 | switch (CCB_Type(csio)) { | |
1738 | case SA_CCB_BUFFER_IO: | |
1739 | { | |
1740 | struct buf *bp; | |
81b5c339 | 1741 | struct bio *bio; |
984263bc MD |
1742 | int error; |
1743 | ||
1744 | softc->dsreg = MTIO_DSREG_REST; | |
81b5c339 MD |
1745 | bio = (struct bio *)done_ccb->ccb_h.ccb_bio; |
1746 | bp = bio->bio_buf; | |
984263bc MD |
1747 | error = 0; |
1748 | if ((done_ccb->ccb_h.status & CAM_STATUS_MASK) != CAM_REQ_CMP) { | |
1749 | if ((error = saerror(done_ccb, 0, 0)) == ERESTART) { | |
1750 | /* | |
1751 | * A retry was scheduled, so just return. | |
1752 | */ | |
1753 | return; | |
1754 | } | |
1755 | } | |
1756 | ||
1757 | if (error == EIO) { | |
984263bc | 1758 | struct buf *q_bp; |
81b5c339 | 1759 | struct bio *q_bio; |
984263bc MD |
1760 | |
1761 | /* | |
1762 | * Catastrophic error. Mark the tape as frozen | |
1763 | * (we no longer know tape position). | |
1764 | * | |
1765 | * Return all queued I/O with EIO, and unfreeze | |
1766 | * our queue so that future transactions that | |
1767 | * attempt to fix this problem can get to the | |
1768 | * device. | |
1769 | * | |
1770 | */ | |
1771 | ||
984263bc | 1772 | softc->flags |= SA_FLAG_TAPE_FROZEN; |
81b5c339 MD |
1773 | while ((q_bio = bioq_first(&softc->bio_queue)) != NULL) { |
1774 | bioq_remove(&softc->bio_queue, q_bio); | |
1775 | q_bp = q_bio->bio_buf; | |
984263bc MD |
1776 | q_bp->b_resid = q_bp->b_bcount; |
1777 | q_bp->b_error = EIO; | |
1778 | q_bp->b_flags |= B_ERROR; | |
81b5c339 | 1779 | biodone(q_bio); |
984263bc | 1780 | } |
984263bc MD |
1781 | } |
1782 | if (error != 0) { | |
1783 | bp->b_resid = bp->b_bcount; | |
1784 | bp->b_error = error; | |
1785 | bp->b_flags |= B_ERROR; | |
1786 | /* | |
1787 | * In the error case, position is updated in saerror. | |
1788 | */ | |
1789 | } else { | |
1790 | bp->b_resid = csio->resid; | |
1791 | bp->b_error = 0; | |
1792 | if (csio->resid != 0) { | |
1793 | bp->b_flags |= B_ERROR; | |
1794 | } | |
10f3fee5 | 1795 | if (bp->b_cmd != BUF_CMD_READ) { |
984263bc MD |
1796 | softc->flags |= SA_FLAG_TAPE_WRITTEN; |
1797 | softc->filemarks = 0; | |
1798 | } | |
1799 | if (!(csio->ccb_h.ccb_pflags & SA_POSITION_UPDATED) && | |
1800 | (softc->blkno != (daddr_t) -1)) { | |
1801 | if ((softc->flags & SA_FLAG_FIXED) != 0) { | |
1802 | u_int32_t l; | |
1803 | if (softc->blk_shift != 0) { | |
1804 | l = bp->b_bcount >> | |
1805 | softc->blk_shift; | |
1806 | } else { | |
1807 | l = bp->b_bcount / | |
1808 | softc->media_blksize; | |
1809 | } | |
1810 | softc->blkno += (daddr_t) l; | |
1811 | } else { | |
1812 | softc->blkno++; | |
1813 | } | |
1814 | } | |
1815 | } | |
1816 | /* | |
1817 | * If we had an error (immediate or pending), | |
1818 | * release the device queue now. | |
1819 | */ | |
1820 | if (error || (softc->flags & SA_FLAG_ERR_PENDING)) | |
1821 | cam_release_devq(done_ccb->ccb_h.path, 0, 0, 0, 0); | |
1822 | #ifdef CAMDEBUG | |
1823 | if (error || bp->b_resid) { | |
1824 | CAM_DEBUG(periph->path, CAM_DEBUG_INFO, | |
c789717e | 1825 | ("error %d resid %d count %d\n", error, |
984263bc MD |
1826 | bp->b_resid, bp->b_bcount)); |
1827 | } | |
1828 | #endif | |
1829 | devstat_end_transaction_buf(&softc->device_stats, bp); | |
81b5c339 | 1830 | biodone(bio); |
984263bc MD |
1831 | break; |
1832 | } | |
1833 | case SA_CCB_WAITING: | |
1834 | { | |
1835 | /* Caller will release the CCB */ | |
1836 | wakeup(&done_ccb->ccb_h.cbfcnp); | |
1837 | return; | |
1838 | } | |
1839 | } | |
1840 | xpt_release_ccb(done_ccb); | |
1841 | } | |
1842 | ||
1843 | /* | |
1844 | * Mount the tape (make sure it's ready for I/O). | |
1845 | */ | |
1846 | static int | |
b13267a5 | 1847 | samount(struct cam_periph *periph, int oflags, cdev_t dev) |
984263bc MD |
1848 | { |
1849 | struct sa_softc *softc; | |
1850 | union ccb *ccb; | |
1851 | int error; | |
1852 | ||
1853 | /* | |
1854 | * oflags can be checked for 'kind' of open (read-only check) - later | |
1855 | * dev can be checked for a control-mode or compression open - later | |
1856 | */ | |
1857 | UNUSED_PARAMETER(oflags); | |
1858 | UNUSED_PARAMETER(dev); | |
1859 | ||
1860 | ||
1861 | softc = (struct sa_softc *)periph->softc; | |
1862 | ||
1863 | /* | |
1864 | * This should determine if something has happend since the last | |
1865 | * open/mount that would invalidate the mount. We do *not* want | |
1866 | * to retry this command- we just want the status. But we only | |
1867 | * do this if we're mounted already- if we're not mounted, | |
1868 | * we don't care about the unit read state and can instead use | |
1869 | * this opportunity to attempt to reserve the tape unit. | |
1870 | */ | |
1871 | ||
1872 | if (softc->flags & SA_FLAG_TAPE_MOUNTED) { | |
1873 | ccb = cam_periph_getccb(periph, 1); | |
1874 | scsi_test_unit_ready(&ccb->csio, 0, sadone, | |
1875 | MSG_SIMPLE_Q_TAG, SSD_FULL_SIZE, IO_TIMEOUT); | |
1876 | error = cam_periph_runccb(ccb, saerror, 0, SF_NO_PRINT, | |
1877 | &softc->device_stats); | |
1878 | QFRLS(ccb); | |
1879 | if (error == ENXIO) { | |
1880 | softc->flags &= ~SA_FLAG_TAPE_MOUNTED; | |
1881 | scsi_test_unit_ready(&ccb->csio, 0, sadone, | |
1882 | MSG_SIMPLE_Q_TAG, SSD_FULL_SIZE, IO_TIMEOUT); | |
1883 | error = cam_periph_runccb(ccb, saerror, 0, SF_NO_PRINT, | |
1884 | &softc->device_stats); | |
1885 | QFRLS(ccb); | |
1886 | } else if (error) { | |
1887 | /* | |
1888 | * We don't need to freeze the tape because we | |
1889 | * will now attempt to rewind/load it. | |
1890 | */ | |
1891 | softc->flags &= ~SA_FLAG_TAPE_MOUNTED; | |
df602c9d | 1892 | if (CAM_DEBUGGED(periph->path, CAM_DEBUG_INFO)) { |
1c8b7a9a PA |
1893 | xpt_print(periph->path, |
1894 | "error %d on TUR in samount\n", error); | |
984263bc MD |
1895 | } |
1896 | } | |
1897 | } else { | |
1898 | error = sareservereleaseunit(periph, TRUE); | |
1899 | if (error) { | |
1900 | return (error); | |
1901 | } | |
1902 | ccb = cam_periph_getccb(periph, 1); | |
1903 | scsi_test_unit_ready(&ccb->csio, 0, sadone, | |
1904 | MSG_SIMPLE_Q_TAG, SSD_FULL_SIZE, IO_TIMEOUT); | |
1905 | error = cam_periph_runccb(ccb, saerror, 0, SF_NO_PRINT, | |
1906 | &softc->device_stats); | |
1907 | QFRLS(ccb); | |
1908 | } | |
1909 | ||
1910 | if ((softc->flags & SA_FLAG_TAPE_MOUNTED) == 0) { | |
1911 | struct scsi_read_block_limits_data *rblim = NULL; | |
1912 | int comp_enabled, comp_supported; | |
1913 | u_int8_t write_protect, guessing = 0; | |
1914 | ||
1915 | /* | |
1916 | * Clear out old state. | |
1917 | */ | |
1918 | softc->flags &= ~(SA_FLAG_TAPE_WP|SA_FLAG_TAPE_WRITTEN| | |
1919 | SA_FLAG_ERR_PENDING|SA_FLAG_COMP_ENABLED| | |
1920 | SA_FLAG_COMP_SUPP|SA_FLAG_COMP_UNSUPP); | |
1921 | softc->filemarks = 0; | |
1922 | ||
1923 | /* | |
1924 | * *Very* first off, make sure we're loaded to BOT. | |
1925 | */ | |
1926 | scsi_load_unload(&ccb->csio, 2, sadone, MSG_SIMPLE_Q_TAG, FALSE, | |
1927 | FALSE, FALSE, 1, SSD_FULL_SIZE, REWIND_TIMEOUT); | |
1928 | error = cam_periph_runccb(ccb, saerror, 0, SF_NO_PRINT, | |
1929 | &softc->device_stats); | |
1930 | QFRLS(ccb); | |
1931 | ||
1932 | /* | |
1933 | * In case this doesn't work, do a REWIND instead | |
1934 | */ | |
1935 | if (error) { | |
1936 | scsi_rewind(&ccb->csio, 2, sadone, MSG_SIMPLE_Q_TAG, | |
1937 | FALSE, SSD_FULL_SIZE, REWIND_TIMEOUT); | |
1938 | error = cam_periph_runccb(ccb, saerror, 0, SF_NO_PRINT, | |
1939 | &softc->device_stats); | |
1940 | QFRLS(ccb); | |
1941 | } | |
1942 | if (error) { | |
1943 | xpt_release_ccb(ccb); | |
1944 | goto exit; | |
1945 | } | |
1946 | ||
1947 | /* | |
1948 | * Do a dummy test read to force access to the | |
1949 | * media so that the drive will really know what's | |
1950 | * there. We actually don't really care what the | |
1951 | * blocksize on tape is and don't expect to really | |
1952 | * read a full record. | |
1953 | */ | |
1c8b7a9a | 1954 | rblim = kmalloc(8192, M_SCSISA, M_INTWAIT); |
984263bc MD |
1955 | |
1956 | if ((softc->quirks & SA_QUIRK_NODREAD) == 0) { | |
1957 | scsi_sa_read_write(&ccb->csio, 0, sadone, | |
1958 | MSG_SIMPLE_Q_TAG, 1, FALSE, 0, 8192, | |
1959 | (void *) rblim, 8192, SSD_FULL_SIZE, | |
1960 | IO_TIMEOUT); | |
0e224b5d | 1961 | cam_periph_runccb(ccb, saerror, 0, SF_NO_PRINT, |
984263bc MD |
1962 | &softc->device_stats); |
1963 | QFRLS(ccb); | |
1964 | scsi_rewind(&ccb->csio, 1, sadone, MSG_SIMPLE_Q_TAG, | |
1965 | FALSE, SSD_FULL_SIZE, REWIND_TIMEOUT); | |
b05e84c9 PA |
1966 | error = cam_periph_runccb(ccb, saerror, CAM_RETRY_SELTO, |
1967 | SF_NO_PRINT | SF_RETRY_UA, | |
984263bc MD |
1968 | &softc->device_stats); |
1969 | QFRLS(ccb); | |
1970 | if (error) { | |
1c8b7a9a PA |
1971 | xpt_print(periph->path, |
1972 | "unable to rewind after test read\n"); | |
984263bc MD |
1973 | xpt_release_ccb(ccb); |
1974 | goto exit; | |
1975 | } | |
1976 | } | |
1977 | ||
1978 | /* | |
1979 | * Next off, determine block limits. | |
1980 | */ | |
1981 | scsi_read_block_limits(&ccb->csio, 5, sadone, MSG_SIMPLE_Q_TAG, | |
1982 | rblim, SSD_FULL_SIZE, SCSIOP_TIMEOUT); | |
1983 | ||
b05e84c9 PA |
1984 | error = cam_periph_runccb(ccb, saerror, CAM_RETRY_SELTO, |
1985 | SF_NO_PRINT | SF_RETRY_UA, &softc->device_stats); | |
1986 | ||
984263bc MD |
1987 | QFRLS(ccb); |
1988 | xpt_release_ccb(ccb); | |
1989 | ||
1990 | if (error != 0) { | |
1991 | /* | |
1992 | * If it's less than SCSI-2, READ BLOCK LIMITS is not | |
1993 | * a MANDATORY command. Anyway- it doesn't matter- | |
1994 | * we can proceed anyway. | |
1995 | */ | |
1996 | softc->blk_gran = 0; | |
1997 | softc->max_blk = ~0; | |
1998 | softc->min_blk = 0; | |
1999 | } else { | |
b05e84c9 | 2000 | if (softc->scsi_rev >= SCSI_REV_SPC) { |
984263bc MD |
2001 | softc->blk_gran = RBL_GRAN(rblim); |
2002 | } else { | |
2003 | softc->blk_gran = 0; | |
2004 | } | |
2005 | /* | |
2006 | * We take max_blk == min_blk to mean a default to | |
2007 | * fixed mode- but note that whatever we get out of | |
2008 | * sagetparams below will actually determine whether | |
2009 | * we are actually *in* fixed mode. | |
2010 | */ | |
2011 | softc->max_blk = scsi_3btoul(rblim->maximum); | |
2012 | softc->min_blk = scsi_2btoul(rblim->minimum); | |
2013 | ||
2014 | ||
2015 | } | |
2016 | /* | |
2017 | * Next, perform a mode sense to determine | |
2018 | * current density, blocksize, compression etc. | |
2019 | */ | |
2020 | error = sagetparams(periph, SA_PARAM_ALL, | |
2021 | &softc->media_blksize, | |
2022 | &softc->media_density, | |
2023 | &softc->media_numblks, | |
2024 | &softc->buffer_mode, &write_protect, | |
2025 | &softc->speed, &comp_supported, | |
2026 | &comp_enabled, &softc->comp_algorithm, | |
2027 | NULL); | |
2028 | ||
2029 | if (error != 0) { | |
2030 | /* | |
2031 | * We could work a little harder here. We could | |
2032 | * adjust our attempts to get information. It | |
2033 | * might be an ancient tape drive. If someone | |
2034 | * nudges us, we'll do that. | |
2035 | */ | |
2036 | goto exit; | |
2037 | } | |
2038 | ||
2039 | /* | |
2040 | * If no quirk has determined that this is a device that is | |
2041 | * preferred to be in fixed or variable mode, now is the time | |
2042 | * to find out. | |
2043 | */ | |
2044 | if ((softc->quirks & (SA_QUIRK_FIXED|SA_QUIRK_VARIABLE)) == 0) { | |
2045 | guessing = 1; | |
2046 | /* | |
2047 | * This could be expensive to find out. Luckily we | |
2048 | * only need to do this once. If we start out in | |
2049 | * 'default' mode, try and set ourselves to one | |
2050 | * of the densities that would determine a wad | |
2051 | * of other stuff. Go from highest to lowest. | |
2052 | */ | |
2053 | if (softc->media_density == SCSI_DEFAULT_DENSITY) { | |
2054 | int i; | |
2055 | static u_int8_t ctry[] = { | |
2056 | SCSI_DENSITY_HALFINCH_PE, | |
2057 | SCSI_DENSITY_HALFINCH_6250C, | |
2058 | SCSI_DENSITY_HALFINCH_6250, | |
2059 | SCSI_DENSITY_HALFINCH_1600, | |
2060 | SCSI_DENSITY_HALFINCH_800, | |
2061 | SCSI_DENSITY_QIC_4GB, | |
2062 | SCSI_DENSITY_QIC_2GB, | |
2063 | SCSI_DENSITY_QIC_525_320, | |
2064 | SCSI_DENSITY_QIC_150, | |
2065 | SCSI_DENSITY_QIC_120, | |
2066 | SCSI_DENSITY_QIC_24, | |
2067 | SCSI_DENSITY_QIC_11_9TRK, | |
2068 | SCSI_DENSITY_QIC_11_4TRK, | |
2069 | SCSI_DENSITY_QIC_1320, | |
2070 | SCSI_DENSITY_QIC_3080, | |
2071 | 0 | |
2072 | }; | |
2073 | for (i = 0; ctry[i]; i++) { | |
2074 | error = sasetparams(periph, | |
2075 | SA_PARAM_DENSITY, 0, ctry[i], | |
2076 | 0, SF_NO_PRINT); | |
2077 | if (error == 0) { | |
2078 | softc->media_density = ctry[i]; | |
2079 | break; | |
2080 | } | |
2081 | } | |
2082 | } | |
2083 | switch (softc->media_density) { | |
2084 | case SCSI_DENSITY_QIC_11_4TRK: | |
2085 | case SCSI_DENSITY_QIC_11_9TRK: | |
2086 | case SCSI_DENSITY_QIC_24: | |
2087 | case SCSI_DENSITY_QIC_120: | |
2088 | case SCSI_DENSITY_QIC_150: | |
2089 | case SCSI_DENSITY_QIC_525_320: | |
2090 | case SCSI_DENSITY_QIC_1320: | |
2091 | case SCSI_DENSITY_QIC_3080: | |
2092 | softc->quirks &= ~SA_QUIRK_2FM; | |
2093 | softc->quirks |= SA_QUIRK_FIXED|SA_QUIRK_1FM; | |
2094 | softc->last_media_blksize = 512; | |
2095 | break; | |
2096 | case SCSI_DENSITY_QIC_4GB: | |
2097 | case SCSI_DENSITY_QIC_2GB: | |
2098 | softc->quirks &= ~SA_QUIRK_2FM; | |
2099 | softc->quirks |= SA_QUIRK_FIXED|SA_QUIRK_1FM; | |
2100 | softc->last_media_blksize = 1024; | |
2101 | break; | |
2102 | default: | |
2103 | softc->last_media_blksize = | |
2104 | softc->media_blksize; | |
2105 | softc->quirks |= SA_QUIRK_VARIABLE; | |
2106 | break; | |
2107 | } | |
2108 | } | |
2109 | ||
2110 | /* | |
2111 | * If no quirk has determined that this is a device that needs | |
2112 | * to have 2 Filemarks at EOD, now is the time to find out. | |
2113 | */ | |
2114 | ||
2115 | if ((softc->quirks & SA_QUIRK_2FM) == 0) { | |
2116 | switch (softc->media_density) { | |
2117 | case SCSI_DENSITY_HALFINCH_800: | |
2118 | case SCSI_DENSITY_HALFINCH_1600: | |
2119 | case SCSI_DENSITY_HALFINCH_6250: | |
2120 | case SCSI_DENSITY_HALFINCH_6250C: | |
2121 | case SCSI_DENSITY_HALFINCH_PE: | |
2122 | softc->quirks &= ~SA_QUIRK_1FM; | |
2123 | softc->quirks |= SA_QUIRK_2FM; | |
2124 | break; | |
2125 | default: | |
2126 | break; | |
2127 | } | |
2128 | } | |
2129 | ||
2130 | /* | |
2131 | * Now validate that some info we got makes sense. | |
2132 | */ | |
2133 | if ((softc->max_blk < softc->media_blksize) || | |
2134 | (softc->min_blk > softc->media_blksize && | |
2135 | softc->media_blksize)) { | |
1c8b7a9a PA |
2136 | xpt_print(periph->path, |
2137 | "BLOCK LIMITS (%d..%d) could not match current " | |
984263bc MD |
2138 | "block settings (%d)- adjusting\n", softc->min_blk, |
2139 | softc->max_blk, softc->media_blksize); | |
2140 | softc->max_blk = softc->min_blk = | |
2141 | softc->media_blksize; | |
2142 | } | |
2143 | ||
2144 | /* | |
2145 | * Now put ourselves into the right frame of mind based | |
2146 | * upon quirks... | |
2147 | */ | |
2148 | tryagain: | |
2149 | /* | |
2150 | * If we want to be in FIXED mode and our current blocksize | |
2151 | * is not equal to our last blocksize (if nonzero), try and | |
2152 | * set ourselves to this last blocksize (as the 'preferred' | |
2153 | * block size). The initial quirkmatch at registry sets the | |
2154 | * initial 'last' blocksize. If, for whatever reason, this | |
2155 | * 'last' blocksize is zero, set the blocksize to 512, | |
2156 | * or min_blk if that's larger. | |
2157 | */ | |
2158 | if ((softc->quirks & SA_QUIRK_FIXED) && | |
2159 | (softc->quirks & SA_QUIRK_NO_MODESEL) == 0 && | |
2160 | (softc->media_blksize != softc->last_media_blksize)) { | |
2161 | softc->media_blksize = softc->last_media_blksize; | |
2162 | if (softc->media_blksize == 0) { | |
2163 | softc->media_blksize = 512; | |
2164 | if (softc->media_blksize < softc->min_blk) { | |
2165 | softc->media_blksize = softc->min_blk; | |
2166 | } | |
2167 | } | |
2168 | error = sasetparams(periph, SA_PARAM_BLOCKSIZE, | |
2169 | softc->media_blksize, 0, 0, SF_NO_PRINT); | |
2170 | if (error) { | |
1c8b7a9a PA |
2171 | xpt_print(periph->path, |
2172 | "unable to set fixed blocksize to %d\n", | |
2173 | softc->media_blksize); | |
984263bc MD |
2174 | goto exit; |
2175 | } | |
2176 | } | |
2177 | ||
2178 | if ((softc->quirks & SA_QUIRK_VARIABLE) && | |
2179 | (softc->media_blksize != 0)) { | |
2180 | softc->last_media_blksize = softc->media_blksize; | |
2181 | softc->media_blksize = 0; | |
2182 | error = sasetparams(periph, SA_PARAM_BLOCKSIZE, | |
2183 | 0, 0, 0, SF_NO_PRINT); | |
2184 | if (error) { | |
2185 | /* | |
2186 | * If this fails and we were guessing, just | |
2187 | * assume that we got it wrong and go try | |
2188 | * fixed block mode. Don't even check against | |
2189 | * density code at this point. | |
2190 | */ | |
2191 | if (guessing) { | |
2192 | softc->quirks &= ~SA_QUIRK_VARIABLE; | |
2193 | softc->quirks |= SA_QUIRK_FIXED; | |
2194 | if (softc->last_media_blksize == 0) | |
2195 | softc->last_media_blksize = 512; | |
2196 | goto tryagain; | |
2197 | } | |
1c8b7a9a PA |
2198 | xpt_print(periph->path, |
2199 | "unable to set variable blocksize\n"); | |
984263bc MD |
2200 | goto exit; |
2201 | } | |
2202 | } | |
2203 | ||
2204 | /* | |
2205 | * Now that we have the current block size, | |
2206 | * set up some parameters for sastart's usage. | |
2207 | */ | |
2208 | if (softc->media_blksize) { | |
2209 | softc->flags |= SA_FLAG_FIXED; | |
2210 | if (powerof2(softc->media_blksize)) { | |
2211 | softc->blk_shift = | |
2212 | ffs(softc->media_blksize) - 1; | |
2213 | softc->blk_mask = softc->media_blksize - 1; | |
2214 | } else { | |
2215 | softc->blk_mask = ~0; | |
2216 | softc->blk_shift = 0; | |
2217 | } | |
2218 | } else { | |
2219 | /* | |
2220 | * The SCSI-3 spec allows 0 to mean "unspecified". | |
2221 | * The SCSI-1 spec allows 0 to mean 'infinite'. | |
2222 | * | |
2223 | * Either works here. | |
2224 | */ | |
2225 | if (softc->max_blk == 0) { | |
2226 | softc->max_blk = ~0; | |
2227 | } | |
2228 | softc->blk_shift = 0; | |
2229 | if (softc->blk_gran != 0) { | |
2230 | softc->blk_mask = softc->blk_gran - 1; | |
2231 | } else { | |
2232 | softc->blk_mask = 0; | |
2233 | } | |
2234 | } | |
2235 | ||
2236 | if (write_protect) | |
2237 | softc->flags |= SA_FLAG_TAPE_WP; | |
2238 | ||
2239 | if (comp_supported) { | |
2240 | if (softc->saved_comp_algorithm == 0) | |
2241 | softc->saved_comp_algorithm = | |
2242 | softc->comp_algorithm; | |
2243 | softc->flags |= SA_FLAG_COMP_SUPP; | |
2244 | if (comp_enabled) | |
2245 | softc->flags |= SA_FLAG_COMP_ENABLED; | |
2246 | } else | |
2247 | softc->flags |= SA_FLAG_COMP_UNSUPP; | |
2248 | ||
2249 | if ((softc->buffer_mode == SMH_SA_BUF_MODE_NOBUF) && | |
2250 | (softc->quirks & SA_QUIRK_NO_MODESEL) == 0) { | |
2251 | error = sasetparams(periph, SA_PARAM_BUFF_MODE, 0, | |
2252 | 0, 0, SF_NO_PRINT); | |
2253 | if (error == 0) { | |
2254 | softc->buffer_mode = SMH_SA_BUF_MODE_SIBUF; | |
2255 | } else { | |
1c8b7a9a PA |
2256 | xpt_print(periph->path, |
2257 | "unable to set buffered mode\n"); | |
984263bc MD |
2258 | } |
2259 | error = 0; /* not an error */ | |
2260 | } | |
2261 | ||
2262 | ||
2263 | if (error == 0) { | |
2264 | softc->flags |= SA_FLAG_TAPE_MOUNTED; | |
2265 | } | |
2266 | exit: | |
2267 | if (rblim != NULL) | |
1c8b7a9a | 2268 | kfree(rblim, M_SCSISA); |
984263bc MD |
2269 | |
2270 | if (error != 0) { | |
2271 | softc->dsreg = MTIO_DSREG_NIL; | |
2272 | } else { | |
2273 | softc->fileno = softc->blkno = 0; | |
2274 | softc->dsreg = MTIO_DSREG_REST; | |
2275 | } | |
2276 | #ifdef SA_1FM_AT_EOD | |
2277 | if ((softc->quirks & SA_QUIRK_2FM) == 0) | |
2278 | softc->quirks |= SA_QUIRK_1FM; | |
2279 | #else | |
2280 | if ((softc->quirks & SA_QUIRK_1FM) == 0) | |
2281 | softc->quirks |= SA_QUIRK_2FM; | |
2282 | #endif | |
2283 | } else | |
2284 | xpt_release_ccb(ccb); | |
2285 | ||
2286 | /* | |
2287 | * If we return an error, we're not mounted any more, | |
2288 | * so release any device reservation. | |
2289 | */ | |
2290 | if (error != 0) { | |
0e224b5d | 2291 | sareservereleaseunit(periph, FALSE); |
984263bc MD |
2292 | } else { |
2293 | /* | |
2294 | * Clear I/O residual. | |
2295 | */ | |
2296 | softc->last_io_resid = 0; | |
2297 | softc->last_ctl_resid = 0; | |
2298 | } | |
2299 | return (error); | |
2300 | } | |
2301 | ||
2302 | /* | |
2303 | * How many filemarks do we need to write if we were to terminate the | |
2304 | * tape session right now? Note that this can be a negative number | |
2305 | */ | |
2306 | ||
2307 | static int | |
2308 | samarkswanted(struct cam_periph *periph) | |
2309 | { | |
2310 | int markswanted; | |
2311 | struct sa_softc *softc; | |
2312 | ||
2313 | softc = (struct sa_softc *)periph->softc; | |
2314 | markswanted = 0; | |
2315 | if ((softc->flags & SA_FLAG_TAPE_WRITTEN) != 0) { | |
2316 | markswanted++; | |
2317 | if (softc->quirks & SA_QUIRK_2FM) | |
2318 | markswanted++; | |
2319 | } | |
2320 | markswanted -= softc->filemarks; | |
2321 | return (markswanted); | |
2322 | } | |
2323 | ||
2324 | static int | |
2325 | sacheckeod(struct cam_periph *periph) | |
2326 | { | |
2327 | int error; | |
2328 | int markswanted; | |
984263bc | 2329 | |
984263bc MD |
2330 | markswanted = samarkswanted(periph); |
2331 | ||
2332 | if (markswanted > 0) { | |
2333 | error = sawritefilemarks(periph, markswanted, FALSE); | |
2334 | } else { | |
2335 | error = 0; | |
2336 | } | |
2337 | return (error); | |
2338 | } | |
2339 | ||
2340 | static int | |
2341 | saerror(union ccb *ccb, u_int32_t cflgs, u_int32_t sflgs) | |
2342 | { | |
2343 | static const char *toobig = | |
2344 | "%d-byte tape record bigger than supplied buffer\n"; | |
2345 | struct cam_periph *periph; | |
2346 | struct sa_softc *softc; | |
2347 | struct ccb_scsiio *csio; | |
2348 | struct scsi_sense_data *sense; | |
2349 | u_int32_t resid = 0; | |
2350 | int32_t info = 0; | |
2351 | cam_status status; | |
2352 | int error_code, sense_key, asc, ascq, error, aqvalid; | |
2353 | ||
2354 | periph = xpt_path_periph(ccb->ccb_h.path); | |
2355 | softc = (struct sa_softc *)periph->softc; | |
2356 | csio = &ccb->csio; | |
2357 | sense = &csio->sense_data; | |
2358 | scsi_extract_sense(sense, &error_code, &sense_key, &asc, &ascq); | |
2359 | aqvalid = sense->extra_len >= 6; | |
2360 | error = 0; | |
2361 | ||
2362 | status = csio->ccb_h.status & CAM_STATUS_MASK; | |
2363 | ||
2364 | /* | |
2365 | * Calculate/latch up, any residuals... We do this in a funny 2-step | |
2366 | * so we can print stuff here if we have CAM_DEBUG enabled for this | |
2367 | * unit. | |
2368 | */ | |
2369 | if (status == CAM_SCSI_STATUS_ERROR) { | |
2370 | if ((sense->error_code & SSD_ERRCODE_VALID) != 0) { | |
2371 | info = (int32_t) scsi_4btoul(sense->info); | |
2372 | resid = info; | |
2373 | if ((softc->flags & SA_FLAG_FIXED) != 0) | |
2374 | resid *= softc->media_blksize; | |
2375 | } else { | |
2376 | resid = csio->dxfer_len; | |
2377 | info = resid; | |
2378 | if ((softc->flags & SA_FLAG_FIXED) != 0) { | |
2379 | if (softc->media_blksize) | |
2380 | info /= softc->media_blksize; | |
2381 | } | |
2382 | } | |
2383 | if (CCB_Type(csio) == SA_CCB_BUFFER_IO) { | |
2384 | bcopy((caddr_t) sense, (caddr_t) &softc->last_io_sense, | |
2385 | sizeof (struct scsi_sense_data)); | |
2386 | bcopy(csio->cdb_io.cdb_bytes, softc->last_io_cdb, | |
2387 | (int) csio->cdb_len); | |
2388 | softc->last_io_resid = resid; | |
2389 | softc->last_resid_was_io = 1; | |
2390 | } else { | |
2391 | bcopy((caddr_t) sense, (caddr_t) &softc->last_ctl_sense, | |
2392 | sizeof (struct scsi_sense_data)); | |
2393 | bcopy(csio->cdb_io.cdb_bytes, softc->last_ctl_cdb, | |
2394 | (int) csio->cdb_len); | |
2395 | softc->last_ctl_resid = resid; | |
2396 | softc->last_resid_was_io = 0; | |
2397 | } | |
2398 | CAM_DEBUG(periph->path, CAM_DEBUG_INFO, ("CDB[0]=0x%x Key 0x%x " | |
2399 | "ASC/ASCQ 0x%x/0x%x CAM STATUS 0x%x flags 0x%x resid %d " | |
2400 | "dxfer_len %d\n", csio->cdb_io.cdb_bytes[0] & 0xff, | |
2401 | sense_key, asc, ascq, status, | |
2402 | sense->flags & ~SSD_KEY_RESERVED, resid, csio->dxfer_len)); | |
2403 | } else { | |
2404 | CAM_DEBUG(periph->path, CAM_DEBUG_INFO, | |
2405 | ("Cam Status 0x%x\n", status)); | |
2406 | } | |
2407 | ||
2408 | switch (status) { | |
2409 | case CAM_REQ_CMP: | |
2410 | return (0); | |
2411 | case CAM_SCSI_STATUS_ERROR: | |
2412 | /* | |
2413 | * If a read/write command, we handle it here. | |
2414 | */ | |
2415 | if (CCB_Type(csio) != SA_CCB_WAITING) { | |
2416 | break; | |
2417 | } | |
2418 | /* | |
2419 | * If this was just EOM/EOP, Filemark, Setmark or ILI detected | |
2420 | * on a non read/write command, we assume it's not an error | |
2421 | * and propagate the residule and return. | |
2422 | */ | |
2423 | if ((aqvalid && asc == 0 && ascq > 0 && ascq <= 5) || | |
2424 | (aqvalid == 0 && sense_key == SSD_KEY_NO_SENSE)) { | |
2425 | csio->resid = resid; | |
2426 | QFRLS(ccb); | |
2427 | return (0); | |
2428 | } | |
2429 | /* | |
2430 | * Otherwise, we let the common code handle this. | |
2431 | */ | |
2432 | return (cam_periph_error(ccb, cflgs, sflgs, &softc->saved_ccb)); | |
2433 | ||
2434 | /* | |
2435 | * XXX: To Be Fixed | |
2436 | * We cannot depend upon CAM honoring retry counts for these. | |
2437 | */ | |
2438 | case CAM_SCSI_BUS_RESET: | |
2439 | case CAM_BDR_SENT: | |
2440 | if (ccb->ccb_h.retry_count <= 0) { | |
2441 | return (EIO); | |
984263bc MD |
2442 | } |
2443 | /* FALLTHROUGH */ | |
2444 | default: | |
2445 | return (cam_periph_error(ccb, cflgs, sflgs, &softc->saved_ccb)); | |
2446 | } | |
2447 | ||
2448 | /* | |
2449 | * Handle filemark, end of tape, mismatched record sizes.... | |
2450 | * From this point out, we're only handling read/write cases. | |
2451 | * Handle writes && reads differently. | |
2452 | */ | |
2453 | ||
2454 | if (csio->cdb_io.cdb_bytes[0] == SA_WRITE) { | |
2455 | if (sense_key == SSD_KEY_VOLUME_OVERFLOW) { | |
2456 | csio->resid = resid; | |
2457 | error = ENOSPC; | |
2458 | } else if (sense->flags & SSD_EOM) { | |
2459 | softc->flags |= SA_FLAG_EOM_PENDING; | |
2460 | /* | |
2461 | * Grotesque as it seems, the few times | |
2462 | * I've actually seen a non-zero resid, | |
2463 | * the tape drive actually lied and had | |
d53a8480 | 2464 | * written all the data!. |
984263bc MD |
2465 | */ |
2466 | csio->resid = 0; | |
2467 | } | |
2468 | } else { | |
2469 | csio->resid = resid; | |
2470 | if (sense_key == SSD_KEY_BLANK_CHECK) { | |
2471 | if (softc->quirks & SA_QUIRK_1FM) { | |
2472 | error = 0; | |
2473 | softc->flags |= SA_FLAG_EOM_PENDING; | |
2474 | } else { | |
2475 | error = EIO; | |
2476 | } | |
2477 | } else if (sense->flags & SSD_FILEMARK) { | |
2478 | if (softc->flags & SA_FLAG_FIXED) { | |
2479 | error = -1; | |
2480 | softc->flags |= SA_FLAG_EOF_PENDING; | |
2481 | } | |
2482 | /* | |
2483 | * Unconditionally, if we detected a filemark on a read, | |
2484 | * mark that we've run moved a file ahead. | |
2485 | */ | |
2486 | if (softc->fileno != (daddr_t) -1) { | |
2487 | softc->fileno++; | |
2488 | softc->blkno = 0; | |
2489 | csio->ccb_h.ccb_pflags |= SA_POSITION_UPDATED; | |
2490 | } | |
2491 | } | |
2492 | } | |
2493 | ||
2494 | /* | |
2495 | * Incorrect Length usually applies to read, but can apply to writes. | |
2496 | */ | |
2497 | if (error == 0 && (sense->flags & SSD_ILI)) { | |
2498 | if (info < 0) { | |
1c8b7a9a PA |
2499 | xpt_print(csio->ccb_h.path, toobig, |
2500 | csio->dxfer_len - info); | |
984263bc MD |
2501 | csio->resid = csio->dxfer_len; |
2502 | error = EIO; | |
2503 | } else { | |
2504 | csio->resid = resid; | |
2505 | if (softc->flags & SA_FLAG_FIXED) { | |
2506 | softc->flags |= SA_FLAG_EIO_PENDING; | |
2507 | } | |
2508 | /* | |
2509 | * Bump the block number if we hadn't seen a filemark. | |
2510 | * Do this independent of errors (we've moved anyway). | |
2511 | */ | |
2512 | if ((sense->flags & SSD_FILEMARK) == 0) { | |
2513 | if (softc->blkno != (daddr_t) -1) { | |
2514 | softc->blkno++; | |
2515 | csio->ccb_h.ccb_pflags |= | |
2516 | SA_POSITION_UPDATED; | |
2517 | } | |
2518 | } | |
2519 | } | |
2520 | } | |
2521 | ||
2522 | if (error <= 0) { | |
2523 | /* | |
2524 | * Unfreeze the queue if frozen as we're not returning anything | |
2525 | * to our waiters that would indicate an I/O error has occurred | |
2526 | * (yet). | |
2527 | */ | |
2528 | QFRLS(ccb); | |
2529 | error = 0; | |
2530 | } | |
2531 | return (error); | |
2532 | } | |
2533 | ||
2534 | static int | |
2535 | sagetparams(struct cam_periph *periph, sa_params params_to_get, | |
2536 | u_int32_t *blocksize, u_int8_t *density, u_int32_t *numblocks, | |
2537 | int *buff_mode, u_int8_t *write_protect, u_int8_t *speed, | |
2538 | int *comp_supported, int *comp_enabled, u_int32_t *comp_algorithm, | |
2539 | sa_comp_t *tcs) | |
2540 | { | |
2541 | union ccb *ccb; | |
2542 | void *mode_buffer; | |
2543 | struct scsi_mode_header_6 *mode_hdr; | |
2544 | struct scsi_mode_blk_desc *mode_blk; | |
2545 | int mode_buffer_len; | |
2546 | struct sa_softc *softc; | |
2547 | u_int8_t cpage; | |
2548 | int error; | |
2549 | cam_status status; | |
2550 | ||
2551 | softc = (struct sa_softc *)periph->softc; | |
2552 | ccb = cam_periph_getccb(periph, 1); | |
2553 | if (softc->quirks & SA_QUIRK_NO_CPAGE) | |
2554 | cpage = SA_DEVICE_CONFIGURATION_PAGE; | |
2555 | else | |
2556 | cpage = SA_DATA_COMPRESSION_PAGE; | |
2557 | ||
2558 | retry: | |
2559 | mode_buffer_len = sizeof(*mode_hdr) + sizeof(*mode_blk); | |
2560 | ||
2561 | if (params_to_get & SA_PARAM_COMPRESSION) { | |
2562 | if (softc->quirks & SA_QUIRK_NOCOMP) { | |
2563 | *comp_supported = FALSE; | |
2564 | params_to_get &= ~SA_PARAM_COMPRESSION; | |
2565 | } else | |
2566 | mode_buffer_len += sizeof (sa_comp_t); | |
2567 | } | |
2568 | ||
1c8b7a9a | 2569 | mode_buffer = kmalloc(mode_buffer_len, M_SCSISA, M_INTWAIT | M_ZERO); |
984263bc MD |
2570 | mode_hdr = (struct scsi_mode_header_6 *)mode_buffer; |
2571 | mode_blk = (struct scsi_mode_blk_desc *)&mode_hdr[1]; | |
2572 | ||
2573 | /* it is safe to retry this */ | |
2574 | scsi_mode_sense(&ccb->csio, 5, sadone, MSG_SIMPLE_Q_TAG, FALSE, | |
2575 | SMS_PAGE_CTRL_CURRENT, (params_to_get & SA_PARAM_COMPRESSION) ? | |
2576 | cpage : SMS_VENDOR_SPECIFIC_PAGE, mode_buffer, mode_buffer_len, | |
2577 | SSD_FULL_SIZE, SCSIOP_TIMEOUT); | |
2578 | ||
2579 | error = cam_periph_runccb(ccb, saerror, 0, SF_NO_PRINT, | |
2580 | &softc->device_stats); | |
2581 | QFRLS(ccb); | |
2582 | ||
2583 | status = ccb->ccb_h.status & CAM_STATUS_MASK; | |
2584 | ||
2585 | if (error == EINVAL && (params_to_get & SA_PARAM_COMPRESSION) != 0) { | |
2586 | /* | |
2587 | * Hmm. Let's see if we can try another page... | |
2588 | * If we've already done that, give up on compression | |
2589 | * for this device and remember this for the future | |
2590 | * and attempt the request without asking for compression | |
2591 | * info. | |
2592 | */ | |
2593 | if (cpage == SA_DATA_COMPRESSION_PAGE) { | |
2594 | cpage = SA_DEVICE_CONFIGURATION_PAGE; | |
2595 | goto retry; | |
2596 | } | |
2597 | softc->quirks |= SA_QUIRK_NOCOMP; | |
1c8b7a9a | 2598 | kfree(mode_buffer, M_SCSISA); |
984263bc MD |
2599 | goto retry; |
2600 | } else if (status == CAM_SCSI_STATUS_ERROR) { | |
2601 | /* Tell the user about the fatal error. */ | |
2602 | scsi_sense_print(&ccb->csio); | |
2603 | goto sagetparamsexit; | |
2604 | } | |
2605 | ||
2606 | /* | |
2607 | * If the user only wants the compression information, and | |
2608 | * the device doesn't send back the block descriptor, it's | |
2609 | * no big deal. If the user wants more than just | |
2610 | * compression, though, and the device doesn't pass back the | |
2611 | * block descriptor, we need to send another mode sense to | |
2612 | * get the block descriptor. | |
2613 | */ | |
2614 | if ((mode_hdr->blk_desc_len == 0) && | |
2615 | (params_to_get & SA_PARAM_COMPRESSION) && | |
2616 | (params_to_get & ~(SA_PARAM_COMPRESSION))) { | |
2617 | ||
2618 | /* | |
2619 | * Decrease the mode buffer length by the size of | |
2620 | * the compression page, to make sure the data | |
2621 | * there doesn't get overwritten. | |
2622 | */ | |
2623 | mode_buffer_len -= sizeof (sa_comp_t); | |
2624 | ||
2625 | /* | |
2626 | * Now move the compression page that we presumably | |
2627 | * got back down the memory chunk a little bit so | |
2628 | * it doesn't get spammed. | |
2629 | */ | |
2630 | bcopy(&mode_hdr[0], &mode_hdr[1], sizeof (sa_comp_t)); | |
2631 | bzero(&mode_hdr[0], sizeof (mode_hdr[0])); | |
2632 | ||
2633 | /* | |
2634 | * Now, we issue another mode sense and just ask | |
2635 | * for the block descriptor, etc. | |
2636 | */ | |
2637 | ||
2638 | scsi_mode_sense(&ccb->csio, 2, sadone, MSG_SIMPLE_Q_TAG, FALSE, | |
2639 | SMS_PAGE_CTRL_CURRENT, SMS_VENDOR_SPECIFIC_PAGE, | |
2640 | mode_buffer, mode_buffer_len, SSD_FULL_SIZE, | |
2641 | SCSIOP_TIMEOUT); | |
2642 | ||
2643 | error = cam_periph_runccb(ccb, saerror, 0, SF_NO_PRINT, | |
2644 | &softc->device_stats); | |
2645 | QFRLS(ccb); | |
2646 | ||
2647 | if (error != 0) | |
2648 | goto sagetparamsexit; | |
2649 | } | |
2650 | ||
2651 | if (params_to_get & SA_PARAM_BLOCKSIZE) | |
2652 | *blocksize = scsi_3btoul(mode_blk->blklen); | |
2653 | ||
2654 | if (params_to_get & SA_PARAM_NUMBLOCKS) | |
2655 | *numblocks = scsi_3btoul(mode_blk->nblocks); | |
2656 | ||
2657 | if (params_to_get & SA_PARAM_BUFF_MODE) | |
2658 | *buff_mode = mode_hdr->dev_spec & SMH_SA_BUF_MODE_MASK; | |
2659 | ||
2660 | if (params_to_get & SA_PARAM_DENSITY) | |
2661 | *density = mode_blk->density; | |
2662 | ||
2663 | if (params_to_get & SA_PARAM_WP) | |
2664 | *write_protect = (mode_hdr->dev_spec & SMH_SA_WP)? TRUE : FALSE; | |
2665 | ||
2666 | if (params_to_get & SA_PARAM_SPEED) | |
2667 | *speed = mode_hdr->dev_spec & SMH_SA_SPEED_MASK; | |
2668 | ||
2669 | if (params_to_get & SA_PARAM_COMPRESSION) { | |
2670 | sa_comp_t *ntcs = (sa_comp_t *) &mode_blk[1]; | |
2671 | if (cpage == SA_DATA_COMPRESSION_PAGE) { | |
2672 | struct scsi_data_compression_page *cp = &ntcs->dcomp; | |
2673 | *comp_supported = | |
2674 | (cp->dce_and_dcc & SA_DCP_DCC)? TRUE : FALSE; | |
2675 | *comp_enabled = | |
2676 | (cp->dce_and_dcc & SA_DCP_DCE)? TRUE : FALSE; | |
2677 | *comp_algorithm = scsi_4btoul(cp->comp_algorithm); | |
2678 | } else { | |
2679 | struct scsi_dev_conf_page *cp = &ntcs->dconf; | |
2680 | /* | |
2681 | * We don't really know whether this device supports | |
2682 | * Data Compression if the the algorithm field is | |
2683 | * zero. Just say we do. | |
2684 | */ | |
2685 | *comp_supported = TRUE; | |
2686 | *comp_enabled = | |
2687 | (cp->sel_comp_alg != SA_COMP_NONE)? TRUE : FALSE; | |
2688 | *comp_algorithm = cp->sel_comp_alg; | |
2689 | } | |
2690 | if (tcs != NULL) | |
2691 | bcopy(ntcs, tcs, sizeof (sa_comp_t)); | |
2692 | } | |
2693 | ||
2694 | if (CAM_DEBUGGED(periph->path, CAM_DEBUG_INFO)) { | |
2695 | int idx; | |
2696 | char *xyz = mode_buffer; | |
2697 | xpt_print_path(periph->path); | |
85f8e2ea | 2698 | kprintf("Mode Sense Data="); |
984263bc | 2699 | for (idx = 0; idx < mode_buffer_len; idx++) |
85f8e2ea SW |
2700 | kprintf(" 0x%02x", xyz[idx] & 0xff); |
2701 | kprintf("\n"); | |
984263bc MD |
2702 | } |
2703 | ||
2704 | sagetparamsexit: | |
2705 | ||
2706 | xpt_release_ccb(ccb); | |
1c8b7a9a | 2707 | kfree(mode_buffer, M_SCSISA); |
984263bc MD |
2708 | return (error); |
2709 | } | |
2710 | ||
2711 | /* | |
2712 | * The purpose of this function is to set one of four different parameters | |
2713 | * for a tape drive: | |
2714 | * - blocksize | |
2715 | * - density | |
2716 | * - compression / compression algorithm | |
2717 | * - buffering mode | |
2718 | * | |
2719 | * The assumption is that this will be called from saioctl(), and therefore | |
2720 | * from a process context. Thus the waiting malloc calls below. If that | |
2721 | * assumption ever changes, the malloc calls should be changed to be | |
2722 | * NOWAIT mallocs. | |
2723 | * | |
2724 | * Any or all of the four parameters may be set when this function is | |
2725 | * called. It should handle setting more than one parameter at once. | |
2726 | */ | |
2727 | static int | |
2728 | sasetparams(struct cam_periph *periph, sa_params params_to_set, | |
2729 | u_int32_t blocksize, u_int8_t density, u_int32_t calg, | |
2730 | u_int32_t sense_flags) | |
2731 | { | |
2732 | struct sa_softc *softc; | |
2733 | u_int32_t current_blocksize; | |
2734 | u_int32_t current_calg; | |
2735 | u_int8_t current_density; | |
2736 | u_int8_t current_speed; | |
2737 | int comp_enabled, comp_supported; | |
2738 | void *mode_buffer; | |
2739 | int mode_buffer_len; | |
2740 | struct scsi_mode_header_6 *mode_hdr; | |
2741 | struct scsi_mode_blk_desc *mode_blk; | |
2742 | sa_comp_t *ccomp, *cpage; | |
2743 | int buff_mode; | |
2744 | union ccb *ccb = NULL; | |
2745 | int error; | |
2746 | ||
2747 | softc = (struct sa_softc *)periph->softc; | |
2748 | ||
1c8b7a9a | 2749 | ccomp = kmalloc(sizeof (sa_comp_t), M_SCSISA, M_INTWAIT); |
984263bc MD |
2750 | |
2751 | /* | |
2752 | * Since it doesn't make sense to set the number of blocks, or | |
2753 | * write protection, we won't try to get the current value. We | |
2754 | * always want to get the blocksize, so we can set it back to the | |
2755 | * proper value. | |
2756 | */ | |
2757 | error = sagetparams(periph, | |
2758 | params_to_set | SA_PARAM_BLOCKSIZE | SA_PARAM_SPEED, | |
2759 | ¤t_blocksize, ¤t_density, NULL, &buff_mode, NULL, | |
2760 | ¤t_speed, &comp_supported, &comp_enabled, | |
2761 | ¤t_calg, ccomp); | |
2762 | ||
2763 | if (error != 0) { | |
1c8b7a9a | 2764 | kfree(ccomp, M_SCSISA); |
984263bc MD |
2765 | return (error); |
2766 | } | |
2767 | ||
2768 | mode_buffer_len = sizeof(*mode_hdr) + sizeof(*mode_blk); | |
2769 | if (params_to_set & SA_PARAM_COMPRESSION) | |
2770 | mode_buffer_len += sizeof (sa_comp_t); | |
2771 | ||
1c8b7a9a | 2772 | mode_buffer = kmalloc(mode_buffer_len, M_SCSISA, M_INTWAIT | M_ZERO); |
984263bc MD |
2773 | |
2774 | mode_hdr = (struct scsi_mode_header_6 *)mode_buffer; | |
2775 | mode_blk = (struct scsi_mode_blk_desc *)&mode_hdr[1]; | |
2776 | ||
2777 | ccb = cam_periph_getccb(periph, 1); | |
2778 | ||
2779 | retry: | |
2780 | ||
2781 | if (params_to_set & SA_PARAM_COMPRESSION) { | |
2782 | if (mode_blk) { | |
2783 | cpage = (sa_comp_t *)&mode_blk[1]; | |
2784 | } else { | |
2785 | cpage = (sa_comp_t *)&mode_hdr[1]; | |
2786 | } | |
2787 | bcopy(ccomp, cpage, sizeof (sa_comp_t)); | |
2788 | cpage->hdr.pagecode &= ~0x80; | |
2789 | } else | |
2790 | cpage = NULL; | |
2791 | ||
2792 | /* | |
2793 | * If the caller wants us to set the blocksize, use the one they | |
2794 | * pass in. Otherwise, use the blocksize we got back from the | |
2795 | * mode select above. | |
2796 | */ | |
2797 | if (mode_blk) { | |
2798 | if (params_to_set & SA_PARAM_BLOCKSIZE) | |
2799 | scsi_ulto3b(blocksize, mode_blk->blklen); | |
2800 | else | |
2801 | scsi_ulto3b(current_blocksize, mode_blk->blklen); | |
2802 | ||
2803 | /* | |
2804 | * Set density if requested, else preserve old density. | |
2805 | * SCSI_SAME_DENSITY only applies to SCSI-2 or better | |
2806 | * devices, else density we've latched up in our softc. | |
2807 | */ | |
2808 | if (params_to_set & SA_PARAM_DENSITY) { | |
2809 | mode_blk->density = density; | |
2810 | } else if (softc->scsi_rev > SCSI_REV_CCS) { | |
2811 | mode_blk->density = SCSI_SAME_DENSITY; | |
2812 | } else { | |
2813 | mode_blk->density = softc->media_density; | |
2814 | } | |
2815 | } | |
2816 | ||
2817 | /* | |
2818 | * For mode selects, these two fields must be zero. | |
2819 | */ | |
2820 | mode_hdr->data_length = 0; | |
2821 | mode_hdr->medium_type = 0; | |
2822 | ||
2823 | /* set the speed to the current value */ | |
2824 | mode_hdr->dev_spec = current_speed; | |
2825 | ||
f7dd4893 PA |
2826 | /* if set, set single-initiator buffering mode */ |
2827 | if (softc->buffer_mode == SMH_SA_BUF_MODE_SIBUF) { | |
2828 | mode_hdr->dev_spec |= SMH_SA_BUF_MODE_SIBUF; | |
2829 | } | |
984263bc MD |
2830 | |
2831 | if (mode_blk) | |
2832 | mode_hdr->blk_desc_len = sizeof(struct scsi_mode_blk_desc); | |
2833 | else | |
2834 | mode_hdr->blk_desc_len = 0; | |
2835 | ||
2836 | /* | |
2837 | * First, if the user wants us to set the compression algorithm or | |
2838 | * just turn compression on, check to make sure that this drive | |
2839 | * supports compression. | |
2840 | */ | |
2841 | if (params_to_set & SA_PARAM_COMPRESSION) { | |
2842 | /* | |
2843 | * If the compression algorithm is 0, disable compression. | |
2844 | * If the compression algorithm is non-zero, enable | |
2845 | * compression and set the compression type to the | |
2846 | * specified compression algorithm, unless the algorithm is | |
2847 | * MT_COMP_ENABLE. In that case, we look at the | |
2848 | * compression algorithm that is currently set and if it is | |
2849 | * non-zero, we leave it as-is. If it is zero, and we have | |
2850 | * saved a compression algorithm from a time when | |
2851 | * compression was enabled before, set the compression to | |
2852 | * the saved value. | |
2853 | */ | |
2854 | switch (ccomp->hdr.pagecode & ~0x80) { | |
41afe5bf PA |
2855 | case SA_DEVICE_CONFIGURATION_PAGE: |
2856 | { | |
2857 | struct scsi_dev_conf_page *dcp = &cpage->dconf; | |
2858 | if (calg == 0) { | |
2859 | dcp->sel_comp_alg = SA_COMP_NONE; | |
2860 | break; | |
2861 | } | |
2862 | if (calg != MT_COMP_ENABLE) { | |
2863 | dcp->sel_comp_alg = calg; | |
2864 | } else if (dcp->sel_comp_alg == SA_COMP_NONE && | |
2865 | softc->saved_comp_algorithm != 0) { | |
2866 | dcp->sel_comp_alg = softc->saved_comp_algorithm; | |
2867 | } | |
2868 | break; | |
2869 | } | |
984263bc MD |
2870 | case SA_DATA_COMPRESSION_PAGE: |
2871 | if (ccomp->dcomp.dce_and_dcc & SA_DCP_DCC) { | |
2872 | struct scsi_data_compression_page *dcp = &cpage->dcomp; | |
2873 | if (calg == 0) { | |
2874 | /* | |
2875 | * Disable compression, but leave the | |
2876 | * decompression and the capability bit | |
2877 | * alone. | |
2878 | */ | |
2879 | dcp->dce_and_dcc = SA_DCP_DCC; | |
2880 | dcp->dde_and_red |= SA_DCP_DDE; | |
2881 | break; | |
2882 | } | |
2883 | /* enable compression && decompression */ | |
2884 | dcp->dce_and_dcc = SA_DCP_DCE | SA_DCP_DCC; | |
2885 | dcp->dde_and_red |= SA_DCP_DDE; | |
2886 | /* | |
2887 | * If there, use compression algorithm from caller. | |
2888 | * Otherwise, if there's a saved compression algorithm | |
2889 | * and there is no current algorithm, use the saved | |
2890 | * algorithm. Else parrot back what we got and hope | |
2891 | * for the best. | |
2892 | */ | |
2893 | if (calg != MT_COMP_ENABLE) { | |
2894 | scsi_ulto4b(calg, dcp->comp_algorithm); | |
2895 | scsi_ulto4b(calg, dcp->decomp_algorithm); | |
2896 | } else if (scsi_4btoul(dcp->comp_algorithm) == 0 && | |
2897 | softc->saved_comp_algorithm != 0) { | |
2898 | scsi_ulto4b(softc->saved_comp_algorithm, | |
2899 | dcp->comp_algorithm); | |
2900 | scsi_ulto4b(softc->saved_comp_algorithm, | |
2901 | dcp->decomp_algorithm); | |
2902 | } | |
2903 | break; | |
2904 | } | |
41afe5bf PA |
2905 | /* |
2906 | * Compression does not appear to be supported- | |
2907 | * at least via the DATA COMPRESSION page. It | |
2908 | * would be too much to ask us to believe that | |
2909 | * the page itself is supported, but incorrectly | |
2910 | * reports an ability to manipulate data compression, | |
2911 | * so we'll assume that this device doesn't support | |
2912 | * compression. We can just fall through for that. | |
2913 | */ | |
2914 | /* FALLTHROUGH */ | |
984263bc MD |
2915 | default: |
2916 | /* | |
2917 | * The drive doesn't seem to support compression, | |
2918 | * so turn off the set compression bit. | |
2919 | */ | |
2920 | params_to_set &= ~SA_PARAM_COMPRESSION; | |
1c8b7a9a PA |
2921 | xpt_print(periph->path, |
2922 | "device does not seem to support compression\n"); | |
984263bc MD |
2923 | |
2924 | /* | |
2925 | * If that was the only thing the user wanted us to set, | |
2926 | * clean up allocated resources and return with | |
2927 | * 'operation not supported'. | |
2928 | */ | |
2929 | if (params_to_set == SA_PARAM_NONE) { | |
1c8b7a9a | 2930 | kfree(mode_buffer, M_SCSISA); |
984263bc MD |
2931 | xpt_release_ccb(ccb); |
2932 | return (ENODEV); | |
2933 | } | |
2934 | ||
2935 | /* | |
2936 | * That wasn't the only thing the user wanted us to set. | |
2937 | * So, decrease the stated mode buffer length by the | |
2938 | * size of the compression mode page. | |
2939 | */ | |
2940 | mode_buffer_len -= sizeof(sa_comp_t); | |
2941 | } | |
2942 | } | |
2943 | ||
2944 | /* It is safe to retry this operation */ | |
2945 | scsi_mode_select(&ccb->csio, 5, sadone, MSG_SIMPLE_Q_TAG, | |
2946 | (params_to_set & SA_PARAM_COMPRESSION)? TRUE : FALSE, | |
2947 | FALSE, mode_buffer, mode_buffer_len, SSD_FULL_SIZE, SCSIOP_TIMEOUT); | |
2948 | ||
2949 | error = cam_periph_runccb(ccb, saerror, 0, | |
2950 | sense_flags, &softc->device_stats); | |
2951 | QFRLS(ccb); | |
2952 | ||
2953 | if (CAM_DEBUGGED(periph->path, CAM_DEBUG_INFO)) { | |
2954 | int idx; | |
2955 | char *xyz = mode_buffer; | |
2956 | xpt_print_path(periph->path); | |
85f8e2ea | 2957 | kprintf("Err%d, Mode Select Data=", error); |
984263bc | 2958 | for (idx = 0; idx < mode_buffer_len; idx++) |
85f8e2ea SW |
2959 | kprintf(" 0x%02x", xyz[idx] & 0xff); |
2960 | kprintf("\n"); | |
984263bc MD |
2961 | } |
2962 | ||
2963 | ||
2964 | if (error) { | |
2965 | /* | |
2966 | * If we can, try without setting density/blocksize. | |
2967 | */ | |
2968 | if (mode_blk) { | |
2969 | if ((params_to_set & | |
2970 | (SA_PARAM_DENSITY|SA_PARAM_BLOCKSIZE)) == 0) { | |
2971 | mode_blk = NULL; | |
2972 | goto retry; | |
2973 | } | |
2974 | } else { | |
2975 | mode_blk = (struct scsi_mode_blk_desc *)&mode_hdr[1]; | |
2976 | cpage = (sa_comp_t *)&mode_blk[1]; | |
2977 | } | |
2978 | ||
2979 | /* | |
2980 | * If we were setting the blocksize, and that failed, we | |
2981 | * want to set it to its original value. If we weren't | |
2982 | * setting the blocksize, we don't want to change it. | |
2983 | */ | |
2984 | scsi_ulto3b(current_blocksize, mode_blk->blklen); | |
2985 | ||
2986 | /* | |
2987 | * Set density if requested, else preserve old density. | |
2988 | * SCSI_SAME_DENSITY only applies to SCSI-2 or better | |
2989 | * devices, else density we've latched up in our softc. | |
2990 | */ | |
2991 | if (params_to_set & SA_PARAM_DENSITY) { | |
2992 | mode_blk->density = current_density; | |
2993 | } else if (softc->scsi_rev > SCSI_REV_CCS) { | |
2994 | mode_blk->density = SCSI_SAME_DENSITY; | |
2995 | } else { | |
2996 | mode_blk->density = softc->media_density; | |
2997 | } | |
2998 | ||
2999 | if (params_to_set & SA_PARAM_COMPRESSION) | |
3000 | bcopy(ccomp, cpage, sizeof (sa_comp_t)); | |
3001 | ||
3002 | /* | |
3003 | * The retry count is the only CCB field that might have been | |
3004 | * changed that we care about, so reset it back to 1. | |
3005 | */ | |
3006 | ccb->ccb_h.retry_count = 1; | |
3007 | cam_periph_runccb(ccb, saerror, 0, sense_flags, | |
3008 | &softc->device_stats); | |
3009 | QFRLS(ccb); | |
3010 | } | |
3011 | ||
3012 | xpt_release_ccb(ccb); | |
3013 | ||
3014 | if (ccomp != NULL) | |
1c8b7a9a | 3015 | kfree(ccomp, M_SCSISA); |
984263bc MD |
3016 | |
3017 | if (params_to_set & SA_PARAM_COMPRESSION) { | |
3018 | if (error) { | |
3019 | softc->flags &= ~SA_FLAG_COMP_ENABLED; | |
3020 | /* | |
3021 | * Even if we get an error setting compression, | |
3022 | * do not say that we don't support it. We could | |
3023 | * have been wrong, or it may be media specific. | |
3024 | * softc->flags &= ~SA_FLAG_COMP_SUPP; | |
3025 | */ | |
3026 | softc->saved_comp_algorithm = softc->comp_algorithm; | |
3027 | softc->comp_algorithm = 0; | |
3028 | } else { | |
3029 | softc->flags |= SA_FLAG_COMP_ENABLED; | |
3030 | softc->comp_algorithm = calg; | |
3031 | } | |
3032 | } | |
3033 | ||
1c8b7a9a | 3034 | kfree(mode_buffer, M_SCSISA); |
984263bc MD |
3035 | return (error); |
3036 | } | |
3037 | ||
3038 | static void | |
3039 | saprevent(struct cam_periph *periph, int action) | |
3040 | { | |
3041 | struct sa_softc *softc; | |
3042 | union ccb *ccb; | |
3043 | int error, sf; | |
3044 | ||
3045 | softc = (struct sa_softc *)periph->softc; | |
3046 | ||
3047 | if ((action == PR_ALLOW) && (softc->flags & SA_FLAG_TAPE_LOCKED) == 0) | |
3048 | return; | |
3049 | if ((action == PR_PREVENT) && (softc->flags & SA_FLAG_TAPE_LOCKED) != 0) | |
3050 | return; | |
3051 | ||
3052 | /* | |
3053 | * We can be quiet about illegal requests. | |
3054 | */ | |
3055 | if (CAM_DEBUGGED(periph->path, CAM_DEBUG_INFO)) { | |
3056 | sf = 0; | |
3057 | } else | |
3058 | sf = SF_QUIET_IR; | |
3059 | ||
3060 | ccb = cam_periph_getccb(periph, 1); | |
3061 | ||
3062 | /* It is safe to retry this operation */ | |
3063 | scsi_prevent(&ccb->csio, 5, sadone, MSG_SIMPLE_Q_TAG, action, | |
3064 | SSD_FULL_SIZE, SCSIOP_TIMEOUT); | |
3065 | ||
3066 | error = cam_periph_runccb(ccb, saerror, 0, sf, &softc->device_stats); | |
3067 | QFRLS(ccb); | |
3068 | if (error == 0) { | |
3069 | if (action == PR_ALLOW) | |
3070 | softc->flags &= ~SA_FLAG_TAPE_LOCKED; | |
3071 | else | |
3072 | softc->flags |= SA_FLAG_TAPE_LOCKED; | |
3073 | } | |
3074 | ||
3075 | xpt_release_ccb(ccb); | |
3076 | } | |
3077 | ||
3078 | static int | |
3079 | sarewind(struct cam_periph *periph) | |
3080 | { | |
3081 | union ccb *ccb; | |
3082 | struct sa_softc *softc; | |
3083 | int error; | |
3084 | ||
3085 | softc = (struct sa_softc *)periph->softc; | |
3086 | ||
3087 | ccb = cam_periph_getccb(periph, 1); | |
3088 | ||
3089 | /* It is safe to retry this operation */ | |
3090 | scsi_rewind(&ccb->csio, 2, sadone, MSG_SIMPLE_Q_TAG, FALSE, | |
3091 | SSD_FULL_SIZE, REWIND_TIMEOUT); | |
3092 | ||
3093 | softc->dsreg = MTIO_DSREG_REW; | |
3094 | error = cam_periph_runccb(ccb, saerror, 0, 0, &softc->device_stats); | |
3095 | softc->dsreg = MTIO_DSREG_REST; | |
3096 | ||
3097 | if ((ccb->ccb_h.status & CAM_DEV_QFRZN) != 0) | |
3098 | cam_release_devq(ccb->ccb_h.path, 0, 0, 0, FALSE); | |
3099 | ||
3100 | xpt_release_ccb(ccb); | |
3101 | if (error == 0) | |
3102 | softc->fileno = softc->blkno = (daddr_t) 0; | |
3103 | else | |
3104 | softc->fileno = softc->blkno = (daddr_t) -1; | |
3105 | return (error); | |
3106 | } | |
3107 | ||
3108 | static int | |
3109 | saspace(struct cam_periph *periph, int count, scsi_space_code code) | |
3110 | { | |
3111 | union ccb *ccb; | |
3112 | struct sa_softc *softc; | |
3113 | int error; | |
3114 | ||
3115 | softc = (struct sa_softc *)periph->softc; | |
3116 | ||
3117 | ccb = cam_periph_getccb(periph, 1); | |
3118 | ||
3119 | /* This cannot be retried */ | |
3120 | ||
3121 | scsi_space(&ccb->csio, 0, sadone, MSG_SIMPLE_Q_TAG, code, count, | |
3122 | SSD_FULL_SIZE, SPACE_TIMEOUT); | |
3123 | ||
3124 | /* | |
3125 | * Clear residual because we will be using it. | |
3126 | */ | |
3127 | softc->last_ctl_resid = 0; | |
3128 | ||
3129 | softc->dsreg = (count < 0)? MTIO_DSREG_REV : MTIO_DSREG_FWD; | |
3130 | error = cam_periph_runccb(ccb, saerror, 0, 0, &softc->device_stats); | |
3131 | softc->dsreg = MTIO_DSREG_REST; | |
3132 | ||
3133 | if ((ccb->ccb_h.status & CAM_DEV_QFRZN) != 0) | |
3134 | cam_release_devq(ccb->ccb_h.path, 0, 0, 0, FALSE); | |
3135 | ||
3136 | xpt_release_ccb(ccb); | |
3137 | ||
3138 | /* | |
3139 | * If a spacing operation has failed, we need to invalidate | |
3140 | * this mount. | |
3141 | * | |
3142 | * If the spacing operation was setmarks or to end of recorded data, | |
3143 | * we no longer know our relative position. | |
3144 | * | |
3145 | * If the spacing operations was spacing files in reverse, we | |
3146 | * take account of the residual, but still check against less | |
3147 | * than zero- if we've gone negative, we must have hit BOT. | |
3148 | * | |
3149 | * If the spacing operations was spacing records in reverse and | |
3150 | * we have a residual, we've either hit BOT or hit a filemark. | |
3151 | * In the former case, we know our new record number (0). In | |
3152 | * the latter case, we have absolutely no idea what the real | |
3153 | * record number is- we've stopped between the end of the last | |
3154 | * record in the previous file and the filemark that stopped | |
3155 | * our spacing backwards. | |
3156 | */ | |
3157 | if (error) { | |
3158 | softc->fileno = softc->blkno = (daddr_t) -1; | |
3159 | } else if (code == SS_SETMARKS || code == SS_EOD) { | |
3160 | softc->fileno = softc->blkno = (daddr_t) -1; | |
3161 | } else if (code == SS_FILEMARKS && softc->fileno != (daddr_t) -1) { | |
3162 | softc->fileno += (count - softc->last_ctl_resid); | |
3163 | if (softc->fileno < 0) /* we must of hit BOT */ | |
3164 | softc->fileno = 0; | |
3165 | softc->blkno = 0; | |
3166 | } else if (code == SS_BLOCKS && softc->blkno != (daddr_t) -1) { | |
3167 | softc->blkno += (count - softc->last_ctl_resid); | |
3168 | if (count < 0) { | |
3169 | if (softc->last_ctl_resid || softc->blkno < 0) { | |
3170 | if (softc->fileno == 0) { | |
3171 | softc->blkno = 0; | |
3172 | } else { | |
3173 | softc->blkno = (daddr_t) -1; | |
3174 | } | |
3175 | } | |
3176 | } | |
3177 | } | |
3178 | return (error); | |
3179 | } | |
3180 | ||
3181 | static int | |
3182 | sawritefilemarks(struct cam_periph *periph, int nmarks, int setmarks) | |
3183 | { | |
3184 | union ccb *ccb; | |
3185 | struct sa_softc *softc; | |
3186 | int error, nwm = 0; | |
3187 | ||
3188 | softc = (struct sa_softc *)periph->softc; | |
35872d89 PA |
3189 | if (softc->open_rdonly) |
3190 | return (EBADF); | |
984263bc MD |
3191 | |
3192 | ccb = cam_periph_getccb(periph, 1); | |
3193 | /* | |
3194 | * Clear residual because we will be using it. | |
3195 | */ | |
3196 | softc->last_ctl_resid = 0; | |
3197 | ||
3198 | softc->dsreg = MTIO_DSREG_FMK; | |
3199 | /* this *must* not be retried */ | |
3200 | scsi_write_filemarks(&ccb->csio, 0, sadone, MSG_SIMPLE_Q_TAG, | |
3201 | FALSE, setmarks, nmarks, SSD_FULL_SIZE, IO_TIMEOUT); | |
3202 | softc->dsreg = MTIO_DSREG_REST; | |
3203 | ||
3204 | ||
3205 | error = cam_periph_runccb(ccb, saerror, 0, 0, &softc->device_stats); | |
3206 | ||
3207 | if ((ccb->ccb_h.status & CAM_DEV_QFRZN) != 0) | |
3208 | cam_release_devq(ccb->ccb_h.path, 0, 0, 0, FALSE); | |
3209 | ||
3210 | if (error == 0 && nmarks) { | |
3211 | struct sa_softc *softc = (struct sa_softc *)periph->softc; | |
3212 | nwm = nmarks - softc->last_ctl_resid; | |
3213 | softc->filemarks += nwm; | |
3214 | } | |
3215 | ||
3216 | xpt_release_ccb(ccb); | |
3217 | ||
3218 | /* | |
3219 | * Update relative positions (if we're doing that). | |
3220 | */ | |
3221 | if (error) { | |
3222 | softc->fileno = softc->blkno = (daddr_t) -1; | |
3223 | } else if (softc->fileno != (daddr_t) -1) { | |
3224 | softc->fileno += nwm; | |
3225 | softc->blkno = 0; | |
3226 | } | |
3227 | return (error); | |
3228 | } | |
3229 | ||
3230 | static int | |
3231 | sardpos(struct cam_periph *periph, int hard, u_int32_t *blkptr) | |
3232 | { | |
3233 | struct scsi_tape_position_data loc; | |
3234 | union ccb *ccb; | |
3235 | struct sa_softc *softc = (struct sa_softc *)periph->softc; | |
3236 | int error; | |
3237 | ||
3238 | /* | |
3239 | * We try and flush any buffered writes here if we were writing | |
3240 | * and we're trying to get hardware block position. It eats | |
3241 | * up performance substantially, but I'm wary of drive firmware. | |
3242 | * | |
3243 | * I think that *logical* block position is probably okay- | |
3244 | * but hardware block position might have to wait for data | |
3245 | * to hit media to be valid. Caveat Emptor. | |
3246 | */ | |
3247 | ||
3248 | if (hard && (softc->flags & SA_FLAG_TAPE_WRITTEN)) { | |
3249 | error = sawritefilemarks(periph, 0, 0); | |
3250 | if (error && error != EACCES) | |
3251 | return (error); | |
3252 | } | |
3253 | ||
3254 | ccb = cam_periph_getccb(periph, 1); | |
3255 | scsi_read_position(&ccb->csio, 1, sadone, MSG_SIMPLE_Q_TAG, | |
3256 | hard, &loc, SSD_FULL_SIZE, SCSIOP_TIMEOUT); | |
3257 | softc->dsreg = MTIO_DSREG_RBSY; | |
3258 | error = cam_periph_runccb(ccb, saerror, 0, 0, &softc->device_stats); | |
3259 | softc->dsreg = MTIO_DSREG_REST; | |
3260 | if ((ccb->ccb_h.status & CAM_DEV_QFRZN) != 0) | |
3261 | cam_release_devq(ccb->ccb_h.path, 0, 0, 0, 0); | |
3262 | ||
3263 | if (error == 0) { | |
3264 | if (loc.flags & SA_RPOS_UNCERTAIN) { | |
3265 | error = EINVAL; /* nothing is certain */ | |
3266 | } else { | |
3267 | *blkptr = scsi_4btoul(loc.firstblk); | |
3268 | } | |
3269 | } | |
3270 | ||
3271 | xpt_release_ccb(ccb); | |
3272 | return (error); | |
3273 | } | |
3274 | ||
3275 | static int | |
3276 | sasetpos(struct cam_periph *periph, int hard, u_int32_t *blkptr) | |
3277 | { | |
3278 | union ccb *ccb; | |
3279 | struct sa_softc *softc; | |
3280 | int error; | |
3281 | ||
3282 | /* | |
3283 | * We used to try and flush any buffered writes here. | |
3284 | * Now we push this onto user applications to either | |
3285 | * flush the pending writes themselves (via a zero count | |
3286 | * WRITE FILEMARKS command) or they can trust their tape | |
3287 | * drive to do this correctly for them. | |
3288 | */ | |
3289 | ||
3290 | softc = (struct sa_softc *)periph->softc; | |
3291 | ccb = cam_periph_getccb(periph, 1); | |
3292 | ||
3293 | ||
3294 | scsi_set_position(&ccb->csio, 1, sadone, MSG_SIMPLE_Q_TAG, | |
3295 | hard, *blkptr, SSD_FULL_SIZE, SPACE_TIMEOUT); | |
3296 | ||
3297 | ||
3298 | softc->dsreg = MTIO_DSREG_POS; | |
3299 | error = cam_periph_runccb(ccb, saerror, 0, 0, &softc->device_stats); | |
3300 | softc->dsreg = MTIO_DSREG_REST; | |
3301 | if ((ccb->ccb_h.status & CAM_DEV_QFRZN) != 0) | |
3302 | cam_release_devq(ccb->ccb_h.path, 0, 0, 0, 0); | |
3303 | xpt_release_ccb(ccb); | |
3304 | /* | |
3305 | * Note relative file && block number position as now unknown. | |
3306 | */ | |
3307 | softc->fileno = softc->blkno = (daddr_t) -1; | |
3308 | return (error); | |
3309 | } | |
3310 | ||
3311 | static int | |
3312 | saretension(struct cam_periph *periph) | |
3313 | { | |
3314 | union ccb *ccb; | |
3315 | struct sa_softc *softc; | |
3316 | int error; | |
3317 | ||
3318 | softc = (struct sa_softc *)periph->softc; | |
3319 | ||
3320 | ccb = cam_periph_getccb(periph, 1); | |
3321 | ||
3322 | /* It is safe to retry this operation */ | |
3323 | scsi_load_unload(&ccb->csio, 5, sadone, MSG_SIMPLE_Q_TAG, FALSE, | |
3324 | FALSE, TRUE, TRUE, SSD_FULL_SIZE, ERASE_TIMEOUT); | |
3325 | ||
3326 | softc->dsreg = MTIO_DSREG_TEN; | |
3327 | error = cam_periph_runccb(ccb, saerror, 0, 0, &softc->device_stats); | |
3328 | softc->dsreg = MTIO_DSREG_REST; | |
3329 | ||
3330 | if ((ccb->ccb_h.status & CAM_DEV_QFRZN) != 0) | |
3331 | cam_release_devq(ccb->ccb_h.path, 0, 0, 0, FALSE); | |
3332 | xpt_release_ccb(ccb); | |
3333 | if (error == 0) | |
3334 | softc->fileno = softc->blkno = (daddr_t) 0; | |
3335 | else | |
3336 | softc->fileno = softc->blkno = (daddr_t) -1; | |
3337 | return (error); | |
3338 | } | |
3339 | ||
3340 | static int | |
3341 | sareservereleaseunit(struct cam_periph *periph, int reserve) | |
3342 | { | |
3343 | union ccb *ccb; | |
3344 | struct sa_softc *softc; | |
3345 | int error; | |
3346 | ||
3347 | softc = (struct sa_softc *)periph->softc; | |
3348 | ccb = cam_periph_getccb(periph, 1); | |
3349 | ||
3350 | /* It is safe to retry this operation */ | |
3351 | scsi_reserve_release_unit(&ccb->csio, 2, sadone, MSG_SIMPLE_Q_TAG, | |
3352 | FALSE, 0, SSD_FULL_SIZE, SCSIOP_TIMEOUT, reserve); | |
3353 | softc->dsreg = MTIO_DSREG_RBSY; | |
3354 | error = cam_periph_runccb(ccb, saerror, 0, | |
3355 | SF_RETRY_UA | SF_NO_PRINT, &softc->device_stats); | |
3356 | softc->dsreg = MTIO_DSREG_REST; | |
3357 | QFRLS(ccb); | |
3358 | xpt_release_ccb(ccb); | |
3359 | ||
3360 | /* | |
3361 | * If the error was Illegal Request, then the device doesn't support | |
3362 | * RESERVE/RELEASE. This is not an error. | |
3363 | */ | |
3364 | if (error == EINVAL) { | |
3365 | error = 0; | |
3366 | } | |
3367 | ||
3368 | return (error); | |
3369 | } | |
3370 | ||
3371 | static int | |
3372 | saloadunload(struct cam_periph *periph, int load) | |
3373 | { | |
3374 | union ccb *ccb; | |
3375 | struct sa_softc *softc; | |
3376 | int error; | |
3377 | ||
3378 | softc = (struct sa_softc *)periph->softc; | |
3379 | ||
3380 | ccb = cam_periph_getccb(periph, 1); | |
3381 | ||
3382 | /* It is safe to retry this operation */ | |
3383 | scsi_load_unload(&ccb->csio, 5, sadone, MSG_SIMPLE_Q_TAG, FALSE, | |
3384 | FALSE, FALSE, load, SSD_FULL_SIZE, REWIND_TIMEOUT); | |
3385 | ||
3386 | softc->dsreg = (load)? MTIO_DSREG_LD : MTIO_DSREG_UNL; | |
3387 | error = cam_periph_runccb(ccb, saerror, 0, 0, &softc->device_stats); | |
3388 | softc->dsreg = MTIO_DSREG_REST; | |
3389 | QFRLS(ccb); | |
3390 | xpt_release_ccb(ccb); | |
3391 | ||
3392 | if (error || load == 0) | |
3393 | softc->fileno = softc->blkno = (daddr_t) -1; | |
3394 | else if (error == 0) | |
3395 | softc->fileno = softc->blkno = (daddr_t) 0; | |
3396 | return (error); | |
3397 | } | |
3398 | ||
3399 | static int | |
3400 | saerase(struct cam_periph *periph, int longerase) | |
3401 | { | |
3402 | ||
3403 | union ccb *ccb; | |
3404 | struct sa_softc *softc; | |
3405 | int error; | |
3406 | ||
3407 | softc = (struct sa_softc *)periph->softc; | |
35872d89 PA |
3408 | if (softc->open_rdonly) |
3409 | return (EBADF); | |
984263bc MD |
3410 | |
3411 | ccb = cam_periph_getccb(periph, 1); | |
3412 | ||
3413 | scsi_erase(&ccb->csio, 1, sadone, MSG_SIMPLE_Q_TAG, FALSE, longerase, | |
3414 | SSD_FULL_SIZE, ERASE_TIMEOUT); | |
3415 | ||
3416 | softc->dsreg = MTIO_DSREG_ZER; | |
3417 | error = cam_periph_runccb(ccb, saerror, 0, 0, &softc->device_stats); | |
3418 | softc->dsreg = MTIO_DSREG_REST; | |
3419 | ||
3420 | if ((ccb->ccb_h.status & CAM_DEV_QFRZN) != 0) | |
3421 | cam_release_devq(ccb->ccb_h.path, 0, 0, 0, FALSE); | |
3422 | xpt_release_ccb(ccb); | |
3423 | return (error); | |
3424 | } | |
3425 | ||
3426 | #endif /* _KERNEL */ | |
3427 | ||
3428 | /* | |
3429 | * Read tape block limits command. | |
3430 | */ | |
3431 | void | |
3432 | scsi_read_block_limits(struct ccb_scsiio *csio, u_int32_t retries, | |
3433 | void (*cbfcnp)(struct cam_periph *, union ccb *), | |
3434 | u_int8_t tag_action, | |
3435 | struct scsi_read_block_limits_data *rlimit_buf, | |
3436 | u_int8_t sense_len, u_int32_t timeout) | |
3437 | { | |
3438 | struct scsi_read_block_limits *scsi_cmd; | |
3439 | ||
3440 | cam_fill_csio(csio, retries, cbfcnp, CAM_DIR_IN, tag_action, | |
3441 | (u_int8_t *)rlimit_buf, sizeof(*rlimit_buf), sense_len, | |
3442 | sizeof(*scsi_cmd), timeout); | |
3443 | ||
3444 | scsi_cmd = (struct scsi_read_block_limits *)&csio->cdb_io.cdb_bytes; | |
3445 | bzero(scsi_cmd, sizeof(*scsi_cmd)); | |
3446 | scsi_cmd->opcode = READ_BLOCK_LIMITS; | |
3447 | } | |
3448 | ||
3449 | void | |
3450 | scsi_sa_read_write(struct ccb_scsiio *csio, u_int32_t retries, | |
3451 | void (*cbfcnp)(struct cam_periph *, union ccb *), | |
3452 | u_int8_t tag_action, int readop, int sli, | |
3453 | int fixed, u_int32_t length, u_int8_t *data_ptr, | |
3454 | u_int32_t dxfer_len, u_int8_t sense_len, u_int32_t timeout) | |
3455 | { | |
3456 | struct scsi_sa_rw *scsi_cmd; | |
3457 | ||
3458 | scsi_cmd = (struct scsi_sa_rw *)&csio->cdb_io.cdb_bytes; | |
3459 | scsi_cmd->opcode = readop ? SA_READ : SA_WRITE; | |
3460 | scsi_cmd->sli_fixed = 0; | |
3461 | if (sli && readop) | |
3462 | scsi_cmd->sli_fixed |= SAR_SLI; | |
3463 | if (fixed) | |
3464 | scsi_cmd->sli_fixed |= SARW_FIXED; | |
3465 | scsi_ulto3b(length, scsi_cmd->length); | |
3466 | scsi_cmd->control = 0; | |
3467 | ||
3468 | cam_fill_csio(csio, retries, cbfcnp, readop ? CAM_DIR_IN : CAM_DIR_OUT, | |
3469 | tag_action, data_ptr, dxfer_len, sense_len, | |
3470 | sizeof(*scsi_cmd), timeout); | |
3471 | } | |
3472 | ||
3473 | void | |
3474 | scsi_load_unload(struct ccb_scsiio *csio, u_int32_t retries, | |
3475 | void (*cbfcnp)(struct cam_periph *, union ccb *), | |
3476 | u_int8_t tag_action, int immediate, int eot, | |
3477 | int reten, int load, u_int8_t sense_len, | |
3478 | u_int32_t timeout) | |
3479 | { | |
3480 | struct scsi_load_unload *scsi_cmd; | |
3481 | ||
3482 | scsi_cmd = (struct scsi_load_unload *)&csio->cdb_io.cdb_bytes; | |
3483 | bzero(scsi_cmd, sizeof(*scsi_cmd)); | |
3484 | scsi_cmd->opcode = LOAD_UNLOAD; | |
3485 | if (immediate) | |
3486 | scsi_cmd->immediate = SLU_IMMED; | |
3487 | if (eot) | |
3488 | scsi_cmd->eot_reten_load |= SLU_EOT; | |
3489 | if (reten) | |
3490 | scsi_cmd->eot_reten_load |= SLU_RETEN; | |
3491 | if (load) | |
3492 | scsi_cmd->eot_reten_load |= SLU_LOAD; | |
3493 | ||
3494 | cam_fill_csio(csio, retries, cbfcnp, CAM_DIR_NONE, tag_action, | |
3495 | NULL, 0, sense_len, sizeof(*scsi_cmd), timeout); | |
3496 | } | |
3497 | ||
3498 | void | |
3499 | scsi_rewind(struct ccb_scsiio *csio, u_int32_t retries, | |
3500 | void (*cbfcnp)(struct cam_periph *, union ccb *), | |
3501 | u_int8_t tag_action, int immediate, u_int8_t sense_len, | |
3502 | u_int32_t timeout) | |
3503 | { | |
3504 | struct scsi_rewind *scsi_cmd; | |
3505 | ||
3506 | scsi_cmd = (struct scsi_rewind *)&csio->cdb_io.cdb_bytes; | |
3507 | bzero(scsi_cmd, sizeof(*scsi_cmd)); | |
3508 | scsi_cmd->opcode = REWIND; | |
3509 | if (immediate) | |
3510 | scsi_cmd->immediate = SREW_IMMED; | |
3511 | ||
3512 | cam_fill_csio(csio, retries, cbfcnp, CAM_DIR_NONE, tag_action, NULL, | |
3513 | 0, sense_len, sizeof(*scsi_cmd), timeout); | |
3514 | } | |
3515 | ||
3516 | void | |
3517 | scsi_space(struct ccb_scsiio *csio, u_int32_t retries, | |
3518 | void (*cbfcnp)(struct cam_periph *, union ccb *), | |
3519 | u_int8_t tag_action, scsi_space_code code, | |
3520 | u_int32_t count, u_int8_t sense_len, u_int32_t timeout) | |
3521 | { | |
3522 | struct scsi_space *scsi_cmd; | |
3523 | ||
3524 | scsi_cmd = (struct scsi_space *)&csio->cdb_io.cdb_bytes; | |
3525 | scsi_cmd->opcode = SPACE; | |
3526 | scsi_cmd->code = code; | |
3527 | scsi_ulto3b(count, scsi_cmd->count); | |
3528 | scsi_cmd->control = 0; | |
3529 | ||
3530 | cam_fill_csio(csio, retries, cbfcnp, CAM_DIR_NONE, tag_action, NULL, | |
3531 | 0, sense_len, sizeof(*scsi_cmd), timeout); | |
3532 | } | |
3533 | ||
3534 | void | |
3535 | scsi_write_filemarks(struct ccb_scsiio *csio, u_int32_t retries, | |
3536 | void (*cbfcnp)(struct cam_periph *, union ccb *), | |
3537 | u_int8_t tag_action, int immediate, int setmark, | |
3538 | u_int32_t num_marks, u_int8_t sense_len, | |
3539 | u_int32_t timeout) | |
3540 | { | |
3541 | struct scsi_write_filemarks *scsi_cmd; | |
3542 | ||
3543 | scsi_cmd = (struct scsi_write_filemarks *)&csio->cdb_io.cdb_bytes; | |
3544 | bzero(scsi_cmd, sizeof(*scsi_cmd)); | |
3545 | scsi_cmd->opcode = WRITE_FILEMARKS; | |
3546 | if (immediate) | |
3547 | scsi_cmd->byte2 |= SWFMRK_IMMED; | |
3548 | if (setmark) | |
3549 | scsi_cmd->byte2 |= SWFMRK_WSMK; | |
3550 | ||
3551 | scsi_ulto3b(num_marks, scsi_cmd->num_marks); | |
3552 | ||
3553 | cam_fill_csio(csio, retries, cbfcnp, CAM_DIR_NONE, tag_action, NULL, | |
3554 | 0, sense_len, sizeof(*scsi_cmd), timeout); | |
3555 | } | |
3556 | ||
3557 | /* | |
3558 | * The reserve and release unit commands differ only by their opcodes. | |
3559 | */ | |
3560 | void | |
3561 | scsi_reserve_release_unit(struct ccb_scsiio *csio, u_int32_t retries, | |
3562 | void (*cbfcnp)(struct cam_periph *, union ccb *), | |
3563 | u_int8_t tag_action, int third_party, | |
3564 | int third_party_id, u_int8_t sense_len, | |
3565 | u_int32_t timeout, int reserve) | |
3566 | { | |
3567 | struct scsi_reserve_release_unit *scsi_cmd; | |
3568 | ||
3569 | scsi_cmd = (struct scsi_reserve_release_unit *)&csio->cdb_io.cdb_bytes; | |
3570 | bzero(scsi_cmd, sizeof(*scsi_cmd)); | |
3571 | ||
3572 | if (reserve) | |
3573 | scsi_cmd->opcode = RESERVE_UNIT; | |
3574 | else | |
3575 | scsi_cmd->opcode = RELEASE_UNIT; | |
3576 | ||
3577 | if (third_party) { | |
3578 | scsi_cmd->lun_thirdparty |= SRRU_3RD_PARTY; | |
3579 | scsi_cmd->lun_thirdparty |= | |
3580 | ((third_party_id << SRRU_3RD_SHAMT) & SRRU_3RD_MASK); | |
3581 | } | |
3582 | ||
3583 | cam_fill_csio(csio, retries, cbfcnp, CAM_DIR_NONE, tag_action, NULL, | |
3584 | 0, sense_len, sizeof(*scsi_cmd), timeout); | |
3585 | } | |
3586 | ||
3587 | void | |
3588 | scsi_erase(struct ccb_scsiio *csio, u_int32_t retries, | |
3589 | void (*cbfcnp)(struct cam_periph *, union ccb *), | |
3590 | u_int8_t tag_action, int immediate, int long_erase, | |
3591 | u_int8_t sense_len, u_int32_t timeout) | |
3592 | { | |
3593 | struct scsi_erase *scsi_cmd; | |
3594 | ||
3595 | scsi_cmd = (struct scsi_erase *)&csio->cdb_io.cdb_bytes; | |
3596 | bzero(scsi_cmd, sizeof(*scsi_cmd)); | |
3597 | ||
3598 | scsi_cmd->opcode = ERASE; | |
3599 | ||
3600 | if (immediate) | |
3601 | scsi_cmd->lun_imm_long |= SE_IMMED; | |
3602 | ||
3603 | if (long_erase) | |
3604 | scsi_cmd->lun_imm_long |= SE_LONG; | |
3605 | ||
3606 | cam_fill_csio(csio, retries, cbfcnp, CAM_DIR_NONE, tag_action, NULL, | |
3607 | 0, sense_len, sizeof(*scsi_cmd), timeout); | |
3608 | } | |
3609 | ||
3610 | /* | |
3611 | * Read Tape Position command. | |
3612 | */ | |
3613 | void | |
3614 | scsi_read_position(struct ccb_scsiio *csio, u_int32_t retries, | |
3615 | void (*cbfcnp)(struct cam_periph *, union ccb *), | |
3616 | u_int8_t tag_action, int hardsoft, | |
3617 | struct scsi_tape_position_data *sbp, | |
3618 | u_int8_t sense_len, u_int32_t timeout) | |
3619 | { | |
3620 | struct scsi_tape_read_position *scmd; | |
3621 | ||
3622 | cam_fill_csio(csio, retries, cbfcnp, CAM_DIR_IN, tag_action, | |
3623 | (u_int8_t *)sbp, sizeof (*sbp), sense_len, sizeof(*scmd), timeout); | |
3624 | scmd = (struct scsi_tape_read_position *)&csio->cdb_io.cdb_bytes; | |
3625 | bzero(scmd, sizeof(*scmd)); | |
3626 | scmd->opcode = READ_POSITION; | |
3627 | scmd->byte1 = hardsoft; | |
3628 | } | |
3629 | ||
3630 | /* | |
3631 | * Set Tape Position command. | |
3632 | */ | |
3633 | void | |
3634 | scsi_set_position(struct ccb_scsiio *csio, u_int32_t retries, | |
3635 | void (*cbfcnp)(struct cam_periph *, union ccb *), | |
3636 | u_int8_t tag_action, int hardsoft, u_int32_t blkno, | |
3637 | u_int8_t sense_len, u_int32_t timeout) | |
3638 | { | |
3639 | struct scsi_tape_locate *scmd; | |
3640 | ||
3641 | cam_fill_csio(csio, retries, cbfcnp, CAM_DIR_NONE, tag_action, | |
2038fb68 | 3642 | NULL, 0, sense_len, sizeof(*scmd), timeout); |
984263bc MD |
3643 | scmd = (struct scsi_tape_locate *)&csio->cdb_io.cdb_bytes; |
3644 | bzero(scmd, sizeof(*scmd)); | |
3645 | scmd->opcode = LOCATE; | |
3646 | if (hardsoft) | |
3647 | scmd->byte1 |= SA_SPOS_BT; | |
3648 | scsi_ulto4b(blkno, scmd->blkaddr); | |
3649 | } |