]> git.proxmox.com Git - mirror_ubuntu-artful-kernel.git/blame - drivers/scsi/st.c
block,scsi: fixup blk_get_request dead queue scenarios
[mirror_ubuntu-artful-kernel.git] / drivers / scsi / st.c
CommitLineData
1da177e4
LT
1/*
2 SCSI Tape Driver for Linux version 1.1 and newer. See the accompanying
3 file Documentation/scsi/st.txt for more information.
4
5 History:
6 Rewritten from Dwayne Forsyth's SCSI tape driver by Kai Makisara.
7 Contribution and ideas from several people including (in alphabetical
8 order) Klaus Ehrenfried, Eugene Exarevsky, Eric Lee Green, Wolfgang Denk,
9 Steve Hirsch, Andreas Koppenh"ofer, Michael Leodolter, Eyal Lebedinsky,
10 Michael Schaefer, J"org Weule, and Eric Youngdale.
11
3e51d3c9 12 Copyright 1992 - 2010 Kai Makisara
1da177e4
LT
13 email Kai.Makisara@kolumbus.fi
14
15 Some small formal changes - aeb, 950809
16
17 Last modified: 18-JAN-1998 Richard Gooch <rgooch@atnf.csiro.au> Devfs support
18 */
19
373daacf 20static const char *verstr = "20101219";
1da177e4
LT
21
22#include <linux/module.h>
23
24#include <linux/fs.h>
25#include <linux/kernel.h>
26#include <linux/sched.h>
27#include <linux/mm.h>
28#include <linux/init.h>
29#include <linux/string.h>
5a0e3ad6 30#include <linux/slab.h>
1da177e4
LT
31#include <linux/errno.h>
32#include <linux/mtio.h>
16c4b3e2 33#include <linux/cdrom.h>
1da177e4
LT
34#include <linux/ioctl.h>
35#include <linux/fcntl.h>
36#include <linux/spinlock.h>
37#include <linux/blkdev.h>
38#include <linux/moduleparam.h>
1da177e4 39#include <linux/cdev.h>
6c648d95 40#include <linux/idr.h>
1da177e4 41#include <linux/delay.h>
0b950672 42#include <linux/mutex.h>
1da177e4
LT
43
44#include <asm/uaccess.h>
45#include <asm/dma.h>
1da177e4
LT
46
47#include <scsi/scsi.h>
48#include <scsi/scsi_dbg.h>
49#include <scsi/scsi_device.h>
50#include <scsi/scsi_driver.h>
51#include <scsi/scsi_eh.h>
52#include <scsi/scsi_host.h>
53#include <scsi/scsi_ioctl.h>
16c4b3e2 54#include <scsi/sg.h>
1da177e4
LT
55
56
57/* The driver prints some debugging information on the console if DEBUG
58 is defined and non-zero. */
59#define DEBUG 0
60
b30d8bca 61#define ST_DEB_MSG KERN_NOTICE
1da177e4
LT
62#if DEBUG
63/* The message level for the debug messages is currently set to KERN_NOTICE
64 so that people can easily see the messages. Later when the debugging messages
65 in the drivers are more widely classified, this may be changed to KERN_DEBUG. */
1da177e4
LT
66#define DEB(a) a
67#define DEBC(a) if (debugging) { a ; }
68#else
69#define DEB(a)
70#define DEBC(a)
71#endif
72
73#define ST_KILOBYTE 1024
74
75#include "st_options.h"
76#include "st.h"
77
78static int buffer_kbs;
79static int max_sg_segs;
80static int try_direct_io = TRY_DIRECT_IO;
81static int try_rdio = 1;
82static int try_wdio = 1;
83
af23782b 84static struct class st_sysfs_class;
c69c6be5 85static const struct attribute_group *st_dev_groups[];
1da177e4
LT
86
87MODULE_AUTHOR("Kai Makisara");
f018fa55 88MODULE_DESCRIPTION("SCSI tape (st) driver");
1da177e4 89MODULE_LICENSE("GPL");
f018fa55 90MODULE_ALIAS_CHARDEV_MAJOR(SCSI_TAPE_MAJOR);
d7b8bcb0 91MODULE_ALIAS_SCSI_DEVICE(TYPE_TAPE);
1da177e4
LT
92
93/* Set 'perm' (4th argument) to 0 to disable module_param's definition
94 * of sysfs parameters (which module_param doesn't yet support).
95 * Sysfs parameters defined explicitly later.
96 */
97module_param_named(buffer_kbs, buffer_kbs, int, 0);
98MODULE_PARM_DESC(buffer_kbs, "Default driver buffer size for fixed block mode (KB; 32)");
99module_param_named(max_sg_segs, max_sg_segs, int, 0);
100MODULE_PARM_DESC(max_sg_segs, "Maximum number of scatter/gather segments to use (256)");
101module_param_named(try_direct_io, try_direct_io, int, 0);
102MODULE_PARM_DESC(try_direct_io, "Try direct I/O between user buffer and tape drive (1)");
103
104/* Extra parameters for testing */
105module_param_named(try_rdio, try_rdio, int, 0);
106MODULE_PARM_DESC(try_rdio, "Try direct read i/o when possible");
107module_param_named(try_wdio, try_wdio, int, 0);
108MODULE_PARM_DESC(try_wdio, "Try direct write i/o when possible");
109
110#ifndef MODULE
111static int write_threshold_kbs; /* retained for compatibility */
112static struct st_dev_parm {
113 char *name;
114 int *val;
115} parms[] __initdata = {
116 {
117 "buffer_kbs", &buffer_kbs
118 },
119 { /* Retained for compatibility with 2.4 */
120 "write_threshold_kbs", &write_threshold_kbs
121 },
122 {
123 "max_sg_segs", NULL
124 },
125 {
126 "try_direct_io", &try_direct_io
127 }
128};
129#endif
130
131/* Restrict the number of modes so that names for all are assigned */
132#if ST_NBR_MODES > 16
133#error "Maximum number of modes is 16"
134#endif
135/* Bit reversed order to get same names for same minors with all
136 mode counts */
0ad78200 137static const char *st_formats[] = {
1da177e4
LT
138 "", "r", "k", "s", "l", "t", "o", "u",
139 "m", "v", "p", "x", "a", "y", "q", "z"};
140
141/* The default definitions have been moved to st_options.h */
142
143#define ST_FIXED_BUFFER_SIZE (ST_FIXED_BUFFER_BLOCKS * ST_KILOBYTE)
144
145/* The buffer size should fit into the 24 bits for length in the
146 6-byte SCSI read and write commands. */
147#if ST_FIXED_BUFFER_SIZE >= (2 << 24 - 1)
148#error "Buffer size should not exceed (2 << 24 - 1) bytes!"
149#endif
150
151static int debugging = DEBUG;
152
153#define MAX_RETRIES 0
154#define MAX_WRITE_RETRIES 0
155#define MAX_READY_RETRIES 0
156#define NO_TAPE NOT_READY
157
158#define ST_TIMEOUT (900 * HZ)
159#define ST_LONG_TIMEOUT (14000 * HZ)
160
161/* Remove mode bits and auto-rewind bit (7) */
162#define TAPE_NR(x) ( ((iminor(x) & ~255) >> (ST_NBR_MODE_BITS + 1)) | \
163 (iminor(x) & ~(-1 << ST_MODE_SHIFT)) )
164#define TAPE_MODE(x) ((iminor(x) & ST_MODE_MASK) >> ST_MODE_SHIFT)
165
166/* Construct the minor number from the device (d), mode (m), and non-rewind (n) data */
167#define TAPE_MINOR(d, m, n) (((d & ~(255 >> (ST_NBR_MODE_BITS + 1))) << (ST_NBR_MODE_BITS + 1)) | \
168 (d & (255 >> (ST_NBR_MODE_BITS + 1))) | (m << ST_MODE_SHIFT) | ((n != 0) << 7) )
169
170/* Internal ioctl to set both density (uppermost 8 bits) and blocksize (lower
171 24 bits) */
172#define SET_DENS_AND_BLK 0x10001
173
1da177e4
LT
174static int st_fixed_buffer_size = ST_FIXED_BUFFER_SIZE;
175static int st_max_sg_segs = ST_MAX_SG;
176
1da177e4
LT
177static int modes_defined;
178
1da177e4 179static int enlarge_buffer(struct st_buffer *, int, int);
40f6b36c 180static void clear_buffer(struct st_buffer *);
1da177e4
LT
181static void normalize_buffer(struct st_buffer *);
182static int append_to_buffer(const char __user *, struct st_buffer *, int);
183static int from_buffer(struct st_buffer *, char __user *, int);
184static void move_buffer_data(struct st_buffer *, int);
1da177e4 185
6620742f 186static int sgl_map_user_pages(struct st_buffer *, const unsigned int,
1da177e4 187 unsigned long, size_t, int);
6620742f 188static int sgl_unmap_user_pages(struct st_buffer *, const unsigned int, int);
1da177e4
LT
189
190static int st_probe(struct device *);
191static int st_remove(struct device *);
1da177e4 192
405ae7d3
RD
193static int do_create_sysfs_files(void);
194static void do_remove_sysfs_files(void);
1da177e4
LT
195
196static struct scsi_driver st_template = {
197 .owner = THIS_MODULE,
198 .gendrv = {
199 .name = "st",
200 .probe = st_probe,
201 .remove = st_remove,
202 },
1da177e4
LT
203};
204
205static int st_compression(struct scsi_tape *, int);
206
207static int find_partition(struct scsi_tape *);
208static int switch_partition(struct scsi_tape *);
209
210static int st_int_ioctl(struct scsi_tape *, unsigned int, unsigned long);
211
f03a5670
KM
212static void scsi_tape_release(struct kref *);
213
214#define to_scsi_tape(obj) container_of(obj, struct scsi_tape, kref)
215
0b950672 216static DEFINE_MUTEX(st_ref_mutex);
6c648d95
JM
217static DEFINE_SPINLOCK(st_index_lock);
218static DEFINE_SPINLOCK(st_use_lock);
219static DEFINE_IDR(st_index_idr);
220
f03a5670 221
1da177e4
LT
222\f
223#include "osst_detect.h"
224#ifndef SIGS_FROM_OSST
225#define SIGS_FROM_OSST \
226 {"OnStream", "SC-", "", "osst"}, \
227 {"OnStream", "DI-", "", "osst"}, \
228 {"OnStream", "DP-", "", "osst"}, \
229 {"OnStream", "USB", "", "osst"}, \
230 {"OnStream", "FW-", "", "osst"}
231#endif
232
f03a5670
KM
233static struct scsi_tape *scsi_tape_get(int dev)
234{
235 struct scsi_tape *STp = NULL;
236
0b950672 237 mutex_lock(&st_ref_mutex);
6c648d95 238 spin_lock(&st_index_lock);
f03a5670 239
6c648d95 240 STp = idr_find(&st_index_idr, dev);
f03a5670
KM
241 if (!STp) goto out;
242
243 kref_get(&STp->kref);
244
245 if (!STp->device)
246 goto out_put;
247
248 if (scsi_device_get(STp->device))
249 goto out_put;
250
251 goto out;
252
253out_put:
254 kref_put(&STp->kref, scsi_tape_release);
255 STp = NULL;
256out:
6c648d95 257 spin_unlock(&st_index_lock);
0b950672 258 mutex_unlock(&st_ref_mutex);
f03a5670
KM
259 return STp;
260}
261
262static void scsi_tape_put(struct scsi_tape *STp)
263{
264 struct scsi_device *sdev = STp->device;
265
0b950672 266 mutex_lock(&st_ref_mutex);
f03a5670
KM
267 kref_put(&STp->kref, scsi_tape_release);
268 scsi_device_put(sdev);
0b950672 269 mutex_unlock(&st_ref_mutex);
f03a5670
KM
270}
271
1da177e4
LT
272struct st_reject_data {
273 char *vendor;
274 char *model;
275 char *rev;
276 char *driver_hint; /* Name of the correct driver, NULL if unknown */
277};
278
279static struct st_reject_data reject_list[] = {
280 /* {"XXX", "Yy-", "", NULL}, example */
281 SIGS_FROM_OSST,
282 {NULL, }};
283
284/* If the device signature is on the list of incompatible drives, the
285 function returns a pointer to the name of the correct driver (if known) */
286static char * st_incompatible(struct scsi_device* SDp)
287{
288 struct st_reject_data *rp;
289
290 for (rp=&(reject_list[0]); rp->vendor != NULL; rp++)
291 if (!strncmp(rp->vendor, SDp->vendor, strlen(rp->vendor)) &&
292 !strncmp(rp->model, SDp->model, strlen(rp->model)) &&
293 !strncmp(rp->rev, SDp->rev, strlen(rp->rev))) {
294 if (rp->driver_hint)
295 return rp->driver_hint;
296 else
297 return "unknown";
298 }
299 return NULL;
300}
301\f
302
303static inline char *tape_name(struct scsi_tape *tape)
304{
305 return tape->disk->disk_name;
306}
307
b30d8bca
HR
308#define st_printk(prefix, t, fmt, a...) \
309 sdev_printk(prefix, (t)->device, "%s: " fmt, \
310 tape_name(t), ##a)
311#ifdef DEBUG
312#define DEBC_printk(t, fmt, a...) \
313 if (debugging) { st_printk(ST_DEB_MSG, t, fmt, ##a ); }
314#else
315#define DEBC_printk(t, fmt, a...)
316#endif
1da177e4 317
8b05b773 318static void st_analyze_sense(struct st_request *SRpnt, struct st_cmdstatus *s)
1da177e4
LT
319{
320 const u8 *ucp;
8b05b773 321 const u8 *sense = SRpnt->sense;
1da177e4 322
8b05b773
MC
323 s->have_sense = scsi_normalize_sense(SRpnt->sense,
324 SCSI_SENSE_BUFFERSIZE, &s->sense_hdr);
1da177e4
LT
325 s->flags = 0;
326
327 if (s->have_sense) {
328 s->deferred = 0;
329 s->remainder_valid =
330 scsi_get_sense_info_fld(sense, SCSI_SENSE_BUFFERSIZE, &s->uremainder64);
331 switch (sense[0] & 0x7f) {
332 case 0x71:
333 s->deferred = 1;
334 case 0x70:
335 s->fixed_format = 1;
336 s->flags = sense[2] & 0xe0;
337 break;
338 case 0x73:
339 s->deferred = 1;
340 case 0x72:
341 s->fixed_format = 0;
342 ucp = scsi_sense_desc_find(sense, SCSI_SENSE_BUFFERSIZE, 4);
343 s->flags = ucp ? (ucp[3] & 0xe0) : 0;
344 break;
345 }
346 }
347}
348
349
350/* Convert the result to success code */
8b05b773 351static int st_chk_result(struct scsi_tape *STp, struct st_request * SRpnt)
1da177e4 352{
8b05b773 353 int result = SRpnt->result;
1da177e4
LT
354 u8 scode;
355 DEB(const char *stp;)
356 char *name = tape_name(STp);
357 struct st_cmdstatus *cmdstatp;
358
359 if (!result)
360 return 0;
361
362 cmdstatp = &STp->buffer->cmdstat;
f03a5670 363 st_analyze_sense(SRpnt, cmdstatp);
1da177e4
LT
364
365 if (cmdstatp->have_sense)
366 scode = STp->buffer->cmdstat.sense_hdr.sense_key;
367 else
368 scode = 0;
369
b30d8bca
HR
370 DEB(
371 if (debugging) {
372 st_printk(ST_DEB_MSG, STp,
373 "Error: %x, cmd: %x %x %x %x %x %x\n", result,
374 SRpnt->cmd[0], SRpnt->cmd[1], SRpnt->cmd[2],
375 SRpnt->cmd[3], SRpnt->cmd[4], SRpnt->cmd[5]);
1da177e4 376 if (cmdstatp->have_sense)
4e73ea7b 377 __scsi_print_sense(name, SRpnt->sense, SCSI_SENSE_BUFFERSIZE);
1da177e4
LT
378 } ) /* end DEB */
379 if (!debugging) { /* Abnormal conditions for tape */
380 if (!cmdstatp->have_sense)
b30d8bca
HR
381 st_printk(KERN_WARNING, STp,
382 "Error %x (driver bt 0x%x, host bt 0x%x).\n",
383 result, driver_byte(result), host_byte(result));
1da177e4
LT
384 else if (cmdstatp->have_sense &&
385 scode != NO_SENSE &&
386 scode != RECOVERED_ERROR &&
387 /* scode != UNIT_ATTENTION && */
388 scode != BLANK_CHECK &&
389 scode != VOLUME_OVERFLOW &&
8b05b773
MC
390 SRpnt->cmd[0] != MODE_SENSE &&
391 SRpnt->cmd[0] != TEST_UNIT_READY) {
4e73ea7b
LT
392
393 __scsi_print_sense(name, SRpnt->sense, SCSI_SENSE_BUFFERSIZE);
1da177e4
LT
394 }
395 }
396
397 if (cmdstatp->fixed_format &&
398 STp->cln_mode >= EXTENDED_SENSE_START) { /* Only fixed format sense */
399 if (STp->cln_sense_value)
8b05b773 400 STp->cleaning_req |= ((SRpnt->sense[STp->cln_mode] &
1da177e4
LT
401 STp->cln_sense_mask) == STp->cln_sense_value);
402 else
8b05b773 403 STp->cleaning_req |= ((SRpnt->sense[STp->cln_mode] &
1da177e4
LT
404 STp->cln_sense_mask) != 0);
405 }
406 if (cmdstatp->have_sense &&
407 cmdstatp->sense_hdr.asc == 0 && cmdstatp->sense_hdr.ascq == 0x17)
408 STp->cleaning_req = 1; /* ASC and ASCQ => cleaning requested */
409
410 STp->pos_unknown |= STp->device->was_reset;
411
412 if (cmdstatp->have_sense &&
413 scode == RECOVERED_ERROR
414#if ST_RECOVERED_WRITE_FATAL
8b05b773
MC
415 && SRpnt->cmd[0] != WRITE_6
416 && SRpnt->cmd[0] != WRITE_FILEMARKS
1da177e4
LT
417#endif
418 ) {
419 STp->recover_count++;
420 STp->recover_reg++;
421
b30d8bca 422 DEB(
1da177e4 423 if (debugging) {
8b05b773 424 if (SRpnt->cmd[0] == READ_6)
1da177e4 425 stp = "read";
8b05b773 426 else if (SRpnt->cmd[0] == WRITE_6)
1da177e4
LT
427 stp = "write";
428 else
429 stp = "ioctl";
b30d8bca
HR
430 st_printk(ST_DEB_MSG, STp,
431 "Recovered %s error (%d).\n",
432 stp, STp->recover_count);
1da177e4
LT
433 } ) /* end DEB */
434
435 if (cmdstatp->flags == 0)
436 return 0;
437 }
438 return (-EIO);
439}
440
4deba245 441static struct st_request *st_allocate_request(struct scsi_tape *stp)
8b05b773 442{
4deba245
FT
443 struct st_request *streq;
444
445 streq = kzalloc(sizeof(*streq), GFP_KERNEL);
446 if (streq)
447 streq->stp = stp;
448 else {
b30d8bca
HR
449 st_printk(KERN_ERR, stp,
450 "Can't get SCSI request.\n");
4deba245
FT
451 if (signal_pending(current))
452 stp->buffer->syscall_result = -EINTR;
453 else
454 stp->buffer->syscall_result = -EBUSY;
455 }
456
457 return streq;
8b05b773
MC
458}
459
460static void st_release_request(struct st_request *streq)
461{
462 kfree(streq);
1da177e4
LT
463}
464
13b53b44
FT
465static void st_scsi_execute_end(struct request *req, int uptodate)
466{
467 struct st_request *SRpnt = req->end_io_data;
468 struct scsi_tape *STp = SRpnt->stp;
c68bf8ee 469 struct bio *tmp;
13b53b44
FT
470
471 STp->buffer->cmdstat.midlevel_result = SRpnt->result = req->errors;
c3a4d78c 472 STp->buffer->cmdstat.residual = req->resid_len;
13b53b44 473
c68bf8ee 474 tmp = SRpnt->bio;
13b53b44
FT
475 if (SRpnt->waiting)
476 complete(SRpnt->waiting);
477
c68bf8ee 478 blk_rq_unmap_user(tmp);
13b53b44
FT
479 __blk_put_request(req->q, req);
480}
481
482static int st_scsi_execute(struct st_request *SRpnt, const unsigned char *cmd,
483 int data_direction, void *buffer, unsigned bufflen,
484 int timeout, int retries)
485{
486 struct request *req;
487 struct rq_map_data *mdata = &SRpnt->stp->buffer->map_data;
488 int err = 0;
489 int write = (data_direction == DMA_TO_DEVICE);
490
491 req = blk_get_request(SRpnt->stp->device->request_queue, write,
492 GFP_KERNEL);
a492f075 493 if (IS_ERR(req))
13b53b44
FT
494 return DRIVER_ERROR << 24;
495
f27b087b 496 blk_rq_set_block_pc(req);
13b53b44
FT
497 req->cmd_flags |= REQ_QUIET;
498
499 mdata->null_mapped = 1;
500
02ae2c0e
KM
501 if (bufflen) {
502 err = blk_rq_map_user(req->q, req, mdata, NULL, bufflen,
503 GFP_KERNEL);
504 if (err) {
505 blk_put_request(req);
506 return DRIVER_ERROR << 24;
507 }
13b53b44
FT
508 }
509
510 SRpnt->bio = req->bio;
511 req->cmd_len = COMMAND_SIZE(cmd[0]);
512 memset(req->cmd, 0, BLK_MAX_CDB);
513 memcpy(req->cmd, cmd, req->cmd_len);
514 req->sense = SRpnt->sense;
515 req->sense_len = 0;
516 req->timeout = timeout;
517 req->retries = retries;
518 req->end_io_data = SRpnt;
519
520 blk_execute_rq_nowait(req->q, NULL, req, 1, st_scsi_execute_end);
521 return 0;
522}
523
1da177e4
LT
524/* Do the scsi command. Waits until command performed if do_wait is true.
525 Otherwise write_behind_check() is used to check that the command
526 has finished. */
8b05b773
MC
527static struct st_request *
528st_do_scsi(struct st_request * SRpnt, struct scsi_tape * STp, unsigned char *cmd,
1da177e4
LT
529 int bytes, int direction, int timeout, int retries, int do_wait)
530{
f03a5670 531 struct completion *waiting;
6d476267
FT
532 struct rq_map_data *mdata = &STp->buffer->map_data;
533 int ret;
1da177e4 534
f03a5670
KM
535 /* if async, make sure there's no command outstanding */
536 if (!do_wait && ((STp->buffer)->last_SRpnt)) {
b30d8bca
HR
537 st_printk(KERN_ERR, STp,
538 "Async command already active.\n");
f03a5670
KM
539 if (signal_pending(current))
540 (STp->buffer)->syscall_result = (-EINTR);
541 else
542 (STp->buffer)->syscall_result = (-EBUSY);
543 return NULL;
544 }
545
4deba245
FT
546 if (!SRpnt) {
547 SRpnt = st_allocate_request(STp);
548 if (!SRpnt)
1da177e4 549 return NULL;
1da177e4
LT
550 }
551
f03a5670
KM
552 /* If async IO, set last_SRpnt. This ptr tells write_behind_check
553 which IO is outstanding. It's nulled out when the IO completes. */
554 if (!do_wait)
555 (STp->buffer)->last_SRpnt = SRpnt;
556
557 waiting = &STp->wait;
558 init_completion(waiting);
8b05b773 559 SRpnt->waiting = waiting;
1da177e4 560
6620742f 561 if (STp->buffer->do_dio) {
c982c368 562 mdata->page_order = 0;
6620742f
FT
563 mdata->nr_entries = STp->buffer->sg_segs;
564 mdata->pages = STp->buffer->mapped_pages;
565 } else {
c982c368 566 mdata->page_order = STp->buffer->reserved_page_order;
6d476267
FT
567 mdata->nr_entries =
568 DIV_ROUND_UP(bytes, PAGE_SIZE << mdata->page_order);
c982c368
FT
569 mdata->pages = STp->buffer->reserved_pages;
570 mdata->offset = 0;
6d476267
FT
571 }
572
8b05b773
MC
573 memcpy(SRpnt->cmd, cmd, sizeof(SRpnt->cmd));
574 STp->buffer->cmdstat.have_sense = 0;
575 STp->buffer->syscall_result = 0;
576
6620742f
FT
577 ret = st_scsi_execute(SRpnt, cmd, direction, NULL, bytes, timeout,
578 retries);
6d476267 579 if (ret) {
8b05b773
MC
580 /* could not allocate the buffer or request was too large */
581 (STp->buffer)->syscall_result = (-EBUSY);
787926b1 582 (STp->buffer)->last_SRpnt = NULL;
6d476267 583 } else if (do_wait) {
f03a5670 584 wait_for_completion(waiting);
8b05b773 585 SRpnt->waiting = NULL;
1da177e4
LT
586 (STp->buffer)->syscall_result = st_chk_result(STp, SRpnt);
587 }
8b05b773 588
1da177e4
LT
589 return SRpnt;
590}
591
592
593/* Handle the write-behind checking (waits for completion). Returns -ENOSPC if
594 write has been correct but EOM early warning reached, -EIO if write ended in
595 error or zero if write successful. Asynchronous writes are used only in
596 variable block mode. */
597static int write_behind_check(struct scsi_tape * STp)
598{
599 int retval = 0;
600 struct st_buffer *STbuffer;
601 struct st_partstat *STps;
602 struct st_cmdstatus *cmdstatp;
8b05b773 603 struct st_request *SRpnt;
1da177e4
LT
604
605 STbuffer = STp->buffer;
606 if (!STbuffer->writing)
607 return 0;
608
b30d8bca 609 DEB(
1da177e4
LT
610 if (STp->write_pending)
611 STp->nbr_waits++;
612 else
613 STp->nbr_finished++;
b30d8bca 614 ) /* end DEB */
1da177e4
LT
615
616 wait_for_completion(&(STp->wait));
f03a5670
KM
617 SRpnt = STbuffer->last_SRpnt;
618 STbuffer->last_SRpnt = NULL;
8b05b773 619 SRpnt->waiting = NULL;
1da177e4 620
f03a5670 621 (STp->buffer)->syscall_result = st_chk_result(STp, SRpnt);
8b05b773 622 st_release_request(SRpnt);
1da177e4
LT
623
624 STbuffer->buffer_bytes -= STbuffer->writing;
625 STps = &(STp->ps[STp->partition]);
626 if (STps->drv_block >= 0) {
627 if (STp->block_size == 0)
628 STps->drv_block++;
629 else
630 STps->drv_block += STbuffer->writing / STp->block_size;
631 }
632
633 cmdstatp = &STbuffer->cmdstat;
634 if (STbuffer->syscall_result) {
635 retval = -EIO;
636 if (cmdstatp->have_sense && !cmdstatp->deferred &&
637 (cmdstatp->flags & SENSE_EOM) &&
638 (cmdstatp->sense_hdr.sense_key == NO_SENSE ||
639 cmdstatp->sense_hdr.sense_key == RECOVERED_ERROR)) {
640 /* EOM at write-behind, has all data been written? */
641 if (!cmdstatp->remainder_valid ||
642 cmdstatp->uremainder64 == 0)
643 retval = -ENOSPC;
644 }
645 if (retval == -EIO)
646 STps->drv_block = -1;
647 }
648 STbuffer->writing = 0;
649
650 DEB(if (debugging && retval)
b30d8bca
HR
651 st_printk(ST_DEB_MSG, STp,
652 "Async write error %x, return value %d.\n",
653 STbuffer->cmdstat.midlevel_result, retval);) /* end DEB */
1da177e4
LT
654
655 return retval;
656}
657
658
659/* Step over EOF if it has been inadvertently crossed (ioctl not used because
660 it messes up the block number). */
661static int cross_eof(struct scsi_tape * STp, int forward)
662{
8b05b773 663 struct st_request *SRpnt;
1da177e4
LT
664 unsigned char cmd[MAX_COMMAND_SIZE];
665
666 cmd[0] = SPACE;
667 cmd[1] = 0x01; /* Space FileMarks */
668 if (forward) {
669 cmd[2] = cmd[3] = 0;
670 cmd[4] = 1;
671 } else
672 cmd[2] = cmd[3] = cmd[4] = 0xff; /* -1 filemarks */
673 cmd[5] = 0;
674
b30d8bca
HR
675 DEBC_printk(STp, "Stepping over filemark %s.\n",
676 forward ? "forward" : "backward");
1da177e4 677
02ae2c0e
KM
678 SRpnt = st_do_scsi(NULL, STp, cmd, 0, DMA_NONE,
679 STp->device->request_queue->rq_timeout,
680 MAX_RETRIES, 1);
1da177e4 681 if (!SRpnt)
02ae2c0e 682 return (STp->buffer)->syscall_result;
39ade4b1 683
02ae2c0e
KM
684 st_release_request(SRpnt);
685 SRpnt = NULL;
1da177e4
LT
686
687 if ((STp->buffer)->cmdstat.midlevel_result != 0)
b30d8bca
HR
688 st_printk(KERN_ERR, STp,
689 "Stepping over filemark %s failed.\n",
690 forward ? "forward" : "backward");
1da177e4 691
02ae2c0e 692 return (STp->buffer)->syscall_result;
1da177e4
LT
693}
694
695
696/* Flush the write buffer (never need to write if variable blocksize). */
8ef8d594 697static int st_flush_write_buffer(struct scsi_tape * STp)
1da177e4 698{
786231af 699 int transfer, blks;
1da177e4
LT
700 int result;
701 unsigned char cmd[MAX_COMMAND_SIZE];
8b05b773 702 struct st_request *SRpnt;
1da177e4
LT
703 struct st_partstat *STps;
704
705 result = write_behind_check(STp);
706 if (result)
707 return result;
708
709 result = 0;
710 if (STp->dirty == 1) {
711
786231af 712 transfer = STp->buffer->buffer_bytes;
b30d8bca 713 DEBC_printk(STp, "Flushing %d bytes.\n", transfer);
1da177e4 714
1da177e4
LT
715 memset(cmd, 0, MAX_COMMAND_SIZE);
716 cmd[0] = WRITE_6;
717 cmd[1] = 1;
718 blks = transfer / STp->block_size;
719 cmd[2] = blks >> 16;
720 cmd[3] = blks >> 8;
721 cmd[4] = blks;
722
723 SRpnt = st_do_scsi(NULL, STp, cmd, transfer, DMA_TO_DEVICE,
a02488ed
JB
724 STp->device->request_queue->rq_timeout,
725 MAX_WRITE_RETRIES, 1);
1da177e4
LT
726 if (!SRpnt)
727 return (STp->buffer)->syscall_result;
728
729 STps = &(STp->ps[STp->partition]);
730 if ((STp->buffer)->syscall_result != 0) {
731 struct st_cmdstatus *cmdstatp = &STp->buffer->cmdstat;
732
733 if (cmdstatp->have_sense && !cmdstatp->deferred &&
734 (cmdstatp->flags & SENSE_EOM) &&
735 (cmdstatp->sense_hdr.sense_key == NO_SENSE ||
736 cmdstatp->sense_hdr.sense_key == RECOVERED_ERROR) &&
737 (!cmdstatp->remainder_valid ||
738 cmdstatp->uremainder64 == 0)) { /* All written at EOM early warning */
739 STp->dirty = 0;
740 (STp->buffer)->buffer_bytes = 0;
741 if (STps->drv_block >= 0)
742 STps->drv_block += blks;
743 result = (-ENOSPC);
744 } else {
b30d8bca 745 st_printk(KERN_ERR, STp, "Error on flush.\n");
1da177e4
LT
746 STps->drv_block = (-1);
747 result = (-EIO);
748 }
749 } else {
750 if (STps->drv_block >= 0)
751 STps->drv_block += blks;
752 STp->dirty = 0;
753 (STp->buffer)->buffer_bytes = 0;
754 }
8b05b773 755 st_release_request(SRpnt);
1da177e4
LT
756 SRpnt = NULL;
757 }
758 return result;
759}
760
761
762/* Flush the tape buffer. The tape will be positioned correctly unless
763 seek_next is true. */
764static int flush_buffer(struct scsi_tape *STp, int seek_next)
765{
766 int backspace, result;
767 struct st_buffer *STbuffer;
768 struct st_partstat *STps;
769
770 STbuffer = STp->buffer;
771
772 /*
773 * If there was a bus reset, block further access
774 * to this device.
775 */
776 if (STp->pos_unknown)
777 return (-EIO);
778
779 if (STp->ready != ST_READY)
780 return 0;
781 STps = &(STp->ps[STp->partition]);
782 if (STps->rw == ST_WRITING) /* Writing */
8ef8d594 783 return st_flush_write_buffer(STp);
1da177e4
LT
784
785 if (STp->block_size == 0)
786 return 0;
787
788 backspace = ((STp->buffer)->buffer_bytes +
789 (STp->buffer)->read_pointer) / STp->block_size -
790 ((STp->buffer)->read_pointer + STp->block_size - 1) /
791 STp->block_size;
792 (STp->buffer)->buffer_bytes = 0;
793 (STp->buffer)->read_pointer = 0;
794 result = 0;
795 if (!seek_next) {
796 if (STps->eof == ST_FM_HIT) {
797 result = cross_eof(STp, 0); /* Back over the EOF hit */
798 if (!result)
799 STps->eof = ST_NOEOF;
800 else {
801 if (STps->drv_file >= 0)
802 STps->drv_file++;
803 STps->drv_block = 0;
804 }
805 }
806 if (!result && backspace > 0)
807 result = st_int_ioctl(STp, MTBSR, backspace);
808 } else if (STps->eof == ST_FM_HIT) {
809 if (STps->drv_file >= 0)
810 STps->drv_file++;
811 STps->drv_block = 0;
812 STps->eof = ST_NOEOF;
813 }
814 return result;
815
816}
817\f
818/* Set the mode parameters */
819static int set_mode_densblk(struct scsi_tape * STp, struct st_modedef * STm)
820{
821 int set_it = 0;
822 unsigned long arg;
1da177e4
LT
823
824 if (!STp->density_changed &&
825 STm->default_density >= 0 &&
826 STm->default_density != STp->density) {
827 arg = STm->default_density;
828 set_it = 1;
829 } else
830 arg = STp->density;
831 arg <<= MT_ST_DENSITY_SHIFT;
832 if (!STp->blksize_changed &&
833 STm->default_blksize >= 0 &&
834 STm->default_blksize != STp->block_size) {
835 arg |= STm->default_blksize;
836 set_it = 1;
837 } else
838 arg |= STp->block_size;
839 if (set_it &&
840 st_int_ioctl(STp, SET_DENS_AND_BLK, arg)) {
b30d8bca
HR
841 st_printk(KERN_WARNING, STp,
842 "Can't set default block size to %d bytes "
843 "and density %x.\n",
844 STm->default_blksize, STm->default_density);
1da177e4
LT
845 if (modes_defined)
846 return (-EINVAL);
847 }
848 return 0;
849}
850
851
8b05b773 852/* Lock or unlock the drive door. Don't use when st_request allocated. */
1da177e4
LT
853static int do_door_lock(struct scsi_tape * STp, int do_lock)
854{
855 int retval, cmd;
1da177e4
LT
856
857 cmd = do_lock ? SCSI_IOCTL_DOORLOCK : SCSI_IOCTL_DOORUNLOCK;
b30d8bca 858 DEBC_printk(STp, "%socking drive door.\n", do_lock ? "L" : "Unl");
1da177e4
LT
859 retval = scsi_ioctl(STp->device, cmd, NULL);
860 if (!retval) {
861 STp->door_locked = do_lock ? ST_LOCKED_EXPLICIT : ST_UNLOCKED;
862 }
863 else {
864 STp->door_locked = ST_LOCK_FAILS;
865 }
866 return retval;
867}
868
869
870/* Set the internal state after reset */
871static void reset_state(struct scsi_tape *STp)
872{
873 int i;
874 struct st_partstat *STps;
875
876 STp->pos_unknown = 0;
877 for (i = 0; i < ST_NBR_PARTITIONS; i++) {
878 STps = &(STp->ps[i]);
879 STps->rw = ST_IDLE;
880 STps->eof = ST_NOEOF;
881 STps->at_sm = 0;
882 STps->last_block_valid = 0;
883 STps->drv_block = -1;
884 STps->drv_file = -1;
885 }
886 if (STp->can_partitions) {
887 STp->partition = find_partition(STp);
888 if (STp->partition < 0)
889 STp->partition = 0;
890 STp->new_partition = STp->partition;
891 }
892}
893\f
894/* Test if the drive is ready. Returns either one of the codes below or a negative system
895 error code. */
896#define CHKRES_READY 0
897#define CHKRES_NEW_SESSION 1
898#define CHKRES_NOT_READY 2
899#define CHKRES_NO_TAPE 3
900
901#define MAX_ATTENTIONS 10
902
903static int test_ready(struct scsi_tape *STp, int do_wait)
904{
905 int attentions, waits, max_wait, scode;
906 int retval = CHKRES_READY, new_session = 0;
907 unsigned char cmd[MAX_COMMAND_SIZE];
02ae2c0e 908 struct st_request *SRpnt = NULL;
1da177e4
LT
909 struct st_cmdstatus *cmdstatp = &STp->buffer->cmdstat;
910
911 max_wait = do_wait ? ST_BLOCK_SECONDS : 0;
912
913 for (attentions=waits=0; ; ) {
914 memset((void *) &cmd[0], 0, MAX_COMMAND_SIZE);
915 cmd[0] = TEST_UNIT_READY;
02ae2c0e
KM
916 SRpnt = st_do_scsi(SRpnt, STp, cmd, 0, DMA_NONE,
917 STp->long_timeout, MAX_READY_RETRIES, 1);
1da177e4 918
02ae2c0e
KM
919 if (!SRpnt) {
920 retval = (STp->buffer)->syscall_result;
1da177e4 921 break;
02ae2c0e 922 }
1da177e4
LT
923
924 if (cmdstatp->have_sense) {
925
926 scode = cmdstatp->sense_hdr.sense_key;
927
928 if (scode == UNIT_ATTENTION) { /* New media? */
929 new_session = 1;
930 if (attentions < MAX_ATTENTIONS) {
931 attentions++;
932 continue;
933 }
934 else {
935 retval = (-EIO);
936 break;
937 }
938 }
939
940 if (scode == NOT_READY) {
941 if (waits < max_wait) {
942 if (msleep_interruptible(1000)) {
943 retval = (-EINTR);
944 break;
945 }
946 waits++;
947 continue;
948 }
949 else {
950 if ((STp->device)->scsi_level >= SCSI_2 &&
951 cmdstatp->sense_hdr.asc == 0x3a) /* Check ASC */
952 retval = CHKRES_NO_TAPE;
953 else
954 retval = CHKRES_NOT_READY;
955 break;
956 }
957 }
958 }
959
960 retval = (STp->buffer)->syscall_result;
961 if (!retval)
962 retval = new_session ? CHKRES_NEW_SESSION : CHKRES_READY;
963 break;
964 }
965
02ae2c0e
KM
966 if (SRpnt != NULL)
967 st_release_request(SRpnt);
1da177e4
LT
968 return retval;
969}
970
971
972/* See if the drive is ready and gather information about the tape. Return values:
973 < 0 negative error code from errno.h
974 0 drive ready
975 1 drive not ready (possibly no tape)
976*/
977static int check_tape(struct scsi_tape *STp, struct file *filp)
978{
979 int i, retval, new_session = 0, do_wait;
980 unsigned char cmd[MAX_COMMAND_SIZE], saved_cleaning;
981 unsigned short st_flags = filp->f_flags;
8b05b773 982 struct st_request *SRpnt = NULL;
1da177e4
LT
983 struct st_modedef *STm;
984 struct st_partstat *STps;
496ad9aa 985 struct inode *inode = file_inode(filp);
1da177e4
LT
986 int mode = TAPE_MODE(inode);
987
988 STp->ready = ST_READY;
989
990 if (mode != STp->current_mode) {
b30d8bca
HR
991 DEBC_printk(STp, "Mode change from %d to %d.\n",
992 STp->current_mode, mode);
1da177e4
LT
993 new_session = 1;
994 STp->current_mode = mode;
995 }
996 STm = &(STp->modes[STp->current_mode]);
997
998 saved_cleaning = STp->cleaning_req;
999 STp->cleaning_req = 0;
1000
1001 do_wait = ((filp->f_flags & O_NONBLOCK) == 0);
1002 retval = test_ready(STp, do_wait);
1003
1004 if (retval < 0)
1005 goto err_out;
1006
1007 if (retval == CHKRES_NEW_SESSION) {
1008 STp->pos_unknown = 0;
1009 STp->partition = STp->new_partition = 0;
1010 if (STp->can_partitions)
1011 STp->nbr_partitions = 1; /* This guess will be updated later
1012 if necessary */
1013 for (i = 0; i < ST_NBR_PARTITIONS; i++) {
1014 STps = &(STp->ps[i]);
1015 STps->rw = ST_IDLE;
1016 STps->eof = ST_NOEOF;
1017 STps->at_sm = 0;
1018 STps->last_block_valid = 0;
1019 STps->drv_block = 0;
1020 STps->drv_file = 0;
1021 }
1022 new_session = 1;
1023 }
1024 else {
1025 STp->cleaning_req |= saved_cleaning;
1026
1027 if (retval == CHKRES_NOT_READY || retval == CHKRES_NO_TAPE) {
1028 if (retval == CHKRES_NO_TAPE)
1029 STp->ready = ST_NO_TAPE;
1030 else
1031 STp->ready = ST_NOT_READY;
1032
1033 STp->density = 0; /* Clear the erroneous "residue" */
1034 STp->write_prot = 0;
1035 STp->block_size = 0;
1036 STp->ps[0].drv_file = STp->ps[0].drv_block = (-1);
1037 STp->partition = STp->new_partition = 0;
1038 STp->door_locked = ST_UNLOCKED;
1039 return CHKRES_NOT_READY;
1040 }
1041 }
1042
1043 if (STp->omit_blklims)
1044 STp->min_block = STp->max_block = (-1);
1045 else {
1046 memset((void *) &cmd[0], 0, MAX_COMMAND_SIZE);
1047 cmd[0] = READ_BLOCK_LIMITS;
1048
02ae2c0e
KM
1049 SRpnt = st_do_scsi(SRpnt, STp, cmd, 6, DMA_FROM_DEVICE,
1050 STp->device->request_queue->rq_timeout,
1051 MAX_READY_RETRIES, 1);
1052 if (!SRpnt) {
1053 retval = (STp->buffer)->syscall_result;
1da177e4
LT
1054 goto err_out;
1055 }
1056
8b05b773 1057 if (!SRpnt->result && !STp->buffer->cmdstat.have_sense) {
1da177e4
LT
1058 STp->max_block = ((STp->buffer)->b_data[1] << 16) |
1059 ((STp->buffer)->b_data[2] << 8) | (STp->buffer)->b_data[3];
1060 STp->min_block = ((STp->buffer)->b_data[4] << 8) |
1061 (STp->buffer)->b_data[5];
1062 if ( DEB( debugging || ) !STp->inited)
b30d8bca
HR
1063 st_printk(KERN_INFO, STp,
1064 "Block limits %d - %d bytes.\n",
1065 STp->min_block, STp->max_block);
1da177e4
LT
1066 } else {
1067 STp->min_block = STp->max_block = (-1);
b30d8bca 1068 DEBC_printk(STp, "Can't read block limits.\n");
1da177e4
LT
1069 }
1070 }
1071
1072 memset((void *) &cmd[0], 0, MAX_COMMAND_SIZE);
1073 cmd[0] = MODE_SENSE;
1074 cmd[4] = 12;
1075
02ae2c0e
KM
1076 SRpnt = st_do_scsi(SRpnt, STp, cmd, 12, DMA_FROM_DEVICE,
1077 STp->device->request_queue->rq_timeout,
1078 MAX_READY_RETRIES, 1);
1079 if (!SRpnt) {
1080 retval = (STp->buffer)->syscall_result;
1da177e4
LT
1081 goto err_out;
1082 }
1083
1084 if ((STp->buffer)->syscall_result != 0) {
b30d8bca 1085 DEBC_printk(STp, "No Mode Sense.\n");
1da177e4
LT
1086 STp->block_size = ST_DEFAULT_BLOCK; /* Educated guess (?) */
1087 (STp->buffer)->syscall_result = 0; /* Prevent error propagation */
1088 STp->drv_write_prot = 0;
1089 } else {
b30d8bca
HR
1090 DEBC_printk(STp,"Mode sense. Length %d, "
1091 "medium %x, WBS %x, BLL %d\n",
1092 (STp->buffer)->b_data[0],
1093 (STp->buffer)->b_data[1],
1094 (STp->buffer)->b_data[2],
1095 (STp->buffer)->b_data[3]);
1da177e4
LT
1096
1097 if ((STp->buffer)->b_data[3] >= 8) {
1098 STp->drv_buffer = ((STp->buffer)->b_data[2] >> 4) & 7;
1099 STp->density = (STp->buffer)->b_data[4];
1100 STp->block_size = (STp->buffer)->b_data[9] * 65536 +
1101 (STp->buffer)->b_data[10] * 256 + (STp->buffer)->b_data[11];
b30d8bca
HR
1102 DEBC_printk(STp, "Density %x, tape length: %x, "
1103 "drv buffer: %d\n",
1104 STp->density,
1105 (STp->buffer)->b_data[5] * 65536 +
1106 (STp->buffer)->b_data[6] * 256 +
1107 (STp->buffer)->b_data[7],
1108 STp->drv_buffer);
1da177e4
LT
1109 }
1110 STp->drv_write_prot = ((STp->buffer)->b_data[2] & 0x80) != 0;
c743e44f 1111 if (!STp->drv_buffer && STp->immediate_filemark) {
b30d8bca
HR
1112 st_printk(KERN_WARNING, STp,
1113 "non-buffered tape: disabling "
1114 "writing immediate filemarks\n");
c743e44f
LD
1115 STp->immediate_filemark = 0;
1116 }
1da177e4 1117 }
8b05b773 1118 st_release_request(SRpnt);
1da177e4 1119 SRpnt = NULL;
b30d8bca 1120 STp->inited = 1;
1da177e4
LT
1121
1122 if (STp->block_size > 0)
1123 (STp->buffer)->buffer_blocks =
b30d8bca 1124 (STp->buffer)->buffer_size / STp->block_size;
1da177e4
LT
1125 else
1126 (STp->buffer)->buffer_blocks = 1;
1127 (STp->buffer)->buffer_bytes = (STp->buffer)->read_pointer = 0;
1128
b30d8bca
HR
1129 DEBC_printk(STp, "Block size: %d, buffer size: %d (%d blocks).\n",
1130 STp->block_size, (STp->buffer)->buffer_size,
1131 (STp->buffer)->buffer_blocks);
1da177e4
LT
1132
1133 if (STp->drv_write_prot) {
1134 STp->write_prot = 1;
1135
b30d8bca 1136 DEBC_printk(STp, "Write protected\n");
1da177e4
LT
1137
1138 if (do_wait &&
1139 ((st_flags & O_ACCMODE) == O_WRONLY ||
1140 (st_flags & O_ACCMODE) == O_RDWR)) {
1141 retval = (-EROFS);
1142 goto err_out;
1143 }
1144 }
1145
1146 if (STp->can_partitions && STp->nbr_partitions < 1) {
1147 /* This code is reached when the device is opened for the first time
1148 after the driver has been initialized with tape in the drive and the
1149 partition support has been enabled. */
b30d8bca 1150 DEBC_printk(STp, "Updating partition number in status.\n");
1da177e4
LT
1151 if ((STp->partition = find_partition(STp)) < 0) {
1152 retval = STp->partition;
1153 goto err_out;
1154 }
1155 STp->new_partition = STp->partition;
1156 STp->nbr_partitions = 1; /* This guess will be updated when necessary */
1157 }
1158
1159 if (new_session) { /* Change the drive parameters for the new mode */
1160 STp->density_changed = STp->blksize_changed = 0;
1161 STp->compression_changed = 0;
1162 if (!(STm->defaults_for_writes) &&
1163 (retval = set_mode_densblk(STp, STm)) < 0)
1164 goto err_out;
1165
1166 if (STp->default_drvbuffer != 0xff) {
1167 if (st_int_ioctl(STp, MTSETDRVBUFFER, STp->default_drvbuffer))
b30d8bca
HR
1168 st_printk(KERN_WARNING, STp,
1169 "Can't set default drive "
1170 "buffering to %d.\n",
1171 STp->default_drvbuffer);
1da177e4
LT
1172 }
1173 }
1174
1175 return CHKRES_READY;
1176
1177 err_out:
1178 return retval;
1179}
1180
1181
b3369c68 1182\f/* Open the device. Needs to take the BKL only because of incrementing the SCSI host
1da177e4
LT
1183 module count. */
1184static int st_open(struct inode *inode, struct file *filp)
1185{
1186 int i, retval = (-EIO);
46a243f7 1187 int resumed = 0;
1da177e4
LT
1188 struct scsi_tape *STp;
1189 struct st_partstat *STps;
1190 int dev = TAPE_NR(inode);
1da177e4
LT
1191
1192 /*
1193 * We really want to do nonseekable_open(inode, filp); here, but some
1194 * versions of tar incorrectly call lseek on tapes and bail out if that
1195 * fails. So we disallow pread() and pwrite(), but permit lseeks.
1196 */
1197 filp->f_mode &= ~(FMODE_PREAD | FMODE_PWRITE);
1198
b3369c68 1199 if (!(STp = scsi_tape_get(dev))) {
f03a5670 1200 return -ENXIO;
b3369c68 1201 }
f03a5670 1202
1da177e4 1203 filp->private_data = STp;
1da177e4 1204
6c648d95 1205 spin_lock(&st_use_lock);
1da177e4 1206 if (STp->in_use) {
6c648d95 1207 spin_unlock(&st_use_lock);
f03a5670 1208 scsi_tape_put(STp);
b30d8bca 1209 DEBC_printk(STp, "Device already in use.\n");
1da177e4
LT
1210 return (-EBUSY);
1211 }
1212
1da177e4 1213 STp->in_use = 1;
6c648d95 1214 spin_unlock(&st_use_lock);
1da177e4
LT
1215 STp->rew_at_close = STp->autorew_dev = (iminor(inode) & 0x80) == 0;
1216
46a243f7
ON
1217 if (scsi_autopm_get_device(STp->device) < 0) {
1218 retval = -EIO;
1219 goto err_out;
1220 }
1221 resumed = 1;
1da177e4
LT
1222 if (!scsi_block_when_processing_errors(STp->device)) {
1223 retval = (-ENXIO);
1224 goto err_out;
1225 }
1226
1227 /* See that we have at least a one page buffer available */
1228 if (!enlarge_buffer(STp->buffer, PAGE_SIZE, STp->restr_dma)) {
b30d8bca
HR
1229 st_printk(KERN_WARNING, STp,
1230 "Can't allocate one page tape buffer.\n");
1da177e4
LT
1231 retval = (-EOVERFLOW);
1232 goto err_out;
1233 }
1234
40f6b36c 1235 (STp->buffer)->cleared = 0;
1da177e4
LT
1236 (STp->buffer)->writing = 0;
1237 (STp->buffer)->syscall_result = 0;
1238
1239 STp->write_prot = ((filp->f_flags & O_ACCMODE) == O_RDONLY);
1240
1241 STp->dirty = 0;
1242 for (i = 0; i < ST_NBR_PARTITIONS; i++) {
1243 STps = &(STp->ps[i]);
1244 STps->rw = ST_IDLE;
1245 }
9abe16c6 1246 STp->try_dio_now = STp->try_dio;
1da177e4
LT
1247 STp->recover_count = 0;
1248 DEB( STp->nbr_waits = STp->nbr_finished = 0;
deee13df 1249 STp->nbr_requests = STp->nbr_dio = STp->nbr_pages = 0; )
1da177e4
LT
1250
1251 retval = check_tape(STp, filp);
1252 if (retval < 0)
1253 goto err_out;
1254 if ((filp->f_flags & O_NONBLOCK) == 0 &&
1255 retval != CHKRES_READY) {
413f7327
KM
1256 if (STp->ready == NO_TAPE)
1257 retval = (-ENOMEDIUM);
1258 else
1259 retval = (-EIO);
1da177e4
LT
1260 goto err_out;
1261 }
1262 return 0;
1263
1264 err_out:
1265 normalize_buffer(STp->buffer);
0644f539 1266 spin_lock(&st_use_lock);
1da177e4 1267 STp->in_use = 0;
0644f539 1268 spin_unlock(&st_use_lock);
f03a5670 1269 scsi_tape_put(STp);
46a243f7
ON
1270 if (resumed)
1271 scsi_autopm_put_device(STp->device);
1da177e4
LT
1272 return retval;
1273
1274}
1275\f
1276
1277/* Flush the tape buffer before close */
75e1fcc0 1278static int st_flush(struct file *filp, fl_owner_t id)
1da177e4
LT
1279{
1280 int result = 0, result2;
1281 unsigned char cmd[MAX_COMMAND_SIZE];
8b05b773 1282 struct st_request *SRpnt;
1da177e4
LT
1283 struct scsi_tape *STp = filp->private_data;
1284 struct st_modedef *STm = &(STp->modes[STp->current_mode]);
1285 struct st_partstat *STps = &(STp->ps[STp->partition]);
1da177e4
LT
1286
1287 if (file_count(filp) > 1)
1288 return 0;
1289
1290 if (STps->rw == ST_WRITING && !STp->pos_unknown) {
8ef8d594 1291 result = st_flush_write_buffer(STp);
1da177e4
LT
1292 if (result != 0 && result != (-ENOSPC))
1293 goto out;
1294 }
1295
1296 if (STp->can_partitions &&
1297 (result2 = switch_partition(STp)) < 0) {
b30d8bca 1298 DEBC_printk(STp, "switch_partition at close failed.\n");
1da177e4
LT
1299 if (result == 0)
1300 result = result2;
1301 goto out;
1302 }
1303
1304 DEBC( if (STp->nbr_requests)
b30d8bca
HR
1305 st_printk(KERN_DEBUG, STp,
1306 "Number of r/w requests %d, dio used in %d, "
1307 "pages %d.\n", STp->nbr_requests, STp->nbr_dio,
1308 STp->nbr_pages));
1da177e4
LT
1309
1310 if (STps->rw == ST_WRITING && !STp->pos_unknown) {
1311 struct st_cmdstatus *cmdstatp = &STp->buffer->cmdstat;
1312
b30d8bca
HR
1313#if DEBUG
1314 DEBC_printk(STp, "Async write waits %d, finished %d.\n",
1315 STp->nbr_waits, STp->nbr_finished);
1316#endif
1da177e4
LT
1317 memset(cmd, 0, MAX_COMMAND_SIZE);
1318 cmd[0] = WRITE_FILEMARKS;
c743e44f
LD
1319 if (STp->immediate_filemark)
1320 cmd[1] = 1;
1da177e4
LT
1321 cmd[4] = 1 + STp->two_fm;
1322
02ae2c0e
KM
1323 SRpnt = st_do_scsi(NULL, STp, cmd, 0, DMA_NONE,
1324 STp->device->request_queue->rq_timeout,
1325 MAX_WRITE_RETRIES, 1);
1da177e4 1326 if (!SRpnt) {
02ae2c0e 1327 result = (STp->buffer)->syscall_result;
1da177e4
LT
1328 goto out;
1329 }
1330
1331 if (STp->buffer->syscall_result == 0 ||
1332 (cmdstatp->have_sense && !cmdstatp->deferred &&
1333 (cmdstatp->flags & SENSE_EOM) &&
1334 (cmdstatp->sense_hdr.sense_key == NO_SENSE ||
1335 cmdstatp->sense_hdr.sense_key == RECOVERED_ERROR) &&
1336 (!cmdstatp->remainder_valid || cmdstatp->uremainder64 == 0))) {
1337 /* Write successful at EOM */
8b05b773 1338 st_release_request(SRpnt);
1da177e4
LT
1339 SRpnt = NULL;
1340 if (STps->drv_file >= 0)
1341 STps->drv_file++;
1342 STps->drv_block = 0;
1343 if (STp->two_fm)
1344 cross_eof(STp, 0);
1345 STps->eof = ST_FM;
1346 }
1347 else { /* Write error */
8b05b773 1348 st_release_request(SRpnt);
1da177e4 1349 SRpnt = NULL;
b30d8bca
HR
1350 st_printk(KERN_ERR, STp,
1351 "Error on write filemark.\n");
1da177e4
LT
1352 if (result == 0)
1353 result = (-EIO);
1354 }
1355
b30d8bca 1356 DEBC_printk(STp, "Buffer flushed, %d EOF(s) written\n", cmd[4]);
1da177e4
LT
1357 } else if (!STp->rew_at_close) {
1358 STps = &(STp->ps[STp->partition]);
1359 if (!STm->sysv || STps->rw != ST_READING) {
1360 if (STp->can_bsr)
1361 result = flush_buffer(STp, 0);
1362 else if (STps->eof == ST_FM_HIT) {
1363 result = cross_eof(STp, 0);
1364 if (result) {
1365 if (STps->drv_file >= 0)
1366 STps->drv_file++;
1367 STps->drv_block = 0;
1368 STps->eof = ST_FM;
1369 } else
1370 STps->eof = ST_NOEOF;
1371 }
1372 } else if ((STps->eof == ST_NOEOF &&
1373 !(result = cross_eof(STp, 1))) ||
1374 STps->eof == ST_FM_HIT) {
1375 if (STps->drv_file >= 0)
1376 STps->drv_file++;
1377 STps->drv_block = 0;
1378 STps->eof = ST_FM;
1379 }
1380 }
1381
1382 out:
1383 if (STp->rew_at_close) {
1384 result2 = st_int_ioctl(STp, MTREW, 1);
1385 if (result == 0)
1386 result = result2;
1387 }
1388 return result;
1389}
1390
1391
1392/* Close the device and release it. BKL is not needed: this is the only thread
1393 accessing this tape. */
1394static int st_release(struct inode *inode, struct file *filp)
1395{
1396 int result = 0;
1397 struct scsi_tape *STp = filp->private_data;
1398
1399 if (STp->door_locked == ST_LOCKED_AUTO)
1400 do_door_lock(STp, 0);
1401
1402 normalize_buffer(STp->buffer);
6c648d95 1403 spin_lock(&st_use_lock);
1da177e4 1404 STp->in_use = 0;
6c648d95 1405 spin_unlock(&st_use_lock);
46a243f7 1406 scsi_autopm_put_device(STp->device);
f03a5670 1407 scsi_tape_put(STp);
1da177e4
LT
1408
1409 return result;
1410}
1411\f
1412/* The checks common to both reading and writing */
1413static ssize_t rw_checks(struct scsi_tape *STp, struct file *filp, size_t count)
1414{
1415 ssize_t retval = 0;
1416
1417 /*
1418 * If we are in the middle of error recovery, don't let anyone
1419 * else try and use this device. Also, if error recovery fails, it
1420 * may try and take the device offline, in which case all further
1421 * access to the device is prohibited.
1422 */
1423 if (!scsi_block_when_processing_errors(STp->device)) {
1424 retval = (-ENXIO);
1425 goto out;
1426 }
1427
1428 if (STp->ready != ST_READY) {
1429 if (STp->ready == ST_NO_TAPE)
1430 retval = (-ENOMEDIUM);
1431 else
1432 retval = (-EIO);
1433 goto out;
1434 }
1435
1436 if (! STp->modes[STp->current_mode].defined) {
1437 retval = (-ENXIO);
1438 goto out;
1439 }
1440
1441
1442 /*
1443 * If there was a bus reset, block further access
1444 * to this device.
1445 */
1446 if (STp->pos_unknown) {
1447 retval = (-EIO);
1448 goto out;
1449 }
1450
1451 if (count == 0)
1452 goto out;
1453
b30d8bca 1454 DEB(
1da177e4 1455 if (!STp->in_use) {
b30d8bca
HR
1456 st_printk(ST_DEB_MSG, STp,
1457 "Incorrect device.\n");
1da177e4
LT
1458 retval = (-EIO);
1459 goto out;
1460 } ) /* end DEB */
1461
1462 if (STp->can_partitions &&
1463 (retval = switch_partition(STp)) < 0)
1464 goto out;
1465
1466 if (STp->block_size == 0 && STp->max_block > 0 &&
1467 (count < STp->min_block || count > STp->max_block)) {
1468 retval = (-EINVAL);
1469 goto out;
1470 }
1471
1472 if (STp->do_auto_lock && STp->door_locked == ST_UNLOCKED &&
1473 !do_door_lock(STp, 1))
1474 STp->door_locked = ST_LOCKED_AUTO;
1475
1476 out:
1477 return retval;
1478}
1479
1480
1481static int setup_buffering(struct scsi_tape *STp, const char __user *buf,
1482 size_t count, int is_read)
1483{
1484 int i, bufsize, retval = 0;
1485 struct st_buffer *STbp = STp->buffer;
1486
1487 if (is_read)
9abe16c6 1488 i = STp->try_dio_now && try_rdio;
1da177e4 1489 else
9abe16c6 1490 i = STp->try_dio_now && try_wdio;
8b05b773 1491
1da177e4
LT
1492 if (i && ((unsigned long)buf & queue_dma_alignment(
1493 STp->device->request_queue)) == 0) {
6620742f
FT
1494 i = sgl_map_user_pages(STbp, STbp->use_sg, (unsigned long)buf,
1495 count, (is_read ? READ : WRITE));
1da177e4
LT
1496 if (i > 0) {
1497 STbp->do_dio = i;
1498 STbp->buffer_bytes = 0; /* can be used as transfer counter */
1499 }
1500 else
1501 STbp->do_dio = 0; /* fall back to buffering with any error */
1502 STbp->sg_segs = STbp->do_dio;
1da177e4
LT
1503 DEB(
1504 if (STbp->do_dio) {
1505 STp->nbr_dio++;
1506 STp->nbr_pages += STbp->do_dio;
1da177e4
LT
1507 }
1508 )
1509 } else
1510 STbp->do_dio = 0;
1511 DEB( STp->nbr_requests++; )
1512
1513 if (!STbp->do_dio) {
1514 if (STp->block_size)
1515 bufsize = STp->block_size > st_fixed_buffer_size ?
1516 STp->block_size : st_fixed_buffer_size;
40f6b36c 1517 else {
1da177e4 1518 bufsize = count;
40f6b36c
KM
1519 /* Make sure that data from previous user is not leaked even if
1520 HBA does not return correct residual */
1521 if (is_read && STp->sili && !STbp->cleared)
1522 clear_buffer(STbp);
1523 }
1524
1da177e4
LT
1525 if (bufsize > STbp->buffer_size &&
1526 !enlarge_buffer(STbp, bufsize, STp->restr_dma)) {
b30d8bca
HR
1527 st_printk(KERN_WARNING, STp,
1528 "Can't allocate %d byte tape buffer.\n",
1529 bufsize);
1da177e4
LT
1530 retval = (-EOVERFLOW);
1531 goto out;
1532 }
1533 if (STp->block_size)
1534 STbp->buffer_blocks = bufsize / STp->block_size;
1535 }
1536
1537 out:
1538 return retval;
1539}
1540
1541
1542/* Can be called more than once after each setup_buffer() */
787926b1 1543static void release_buffering(struct scsi_tape *STp, int is_read)
1da177e4
LT
1544{
1545 struct st_buffer *STbp;
1546
1547 STbp = STp->buffer;
1548 if (STbp->do_dio) {
6620742f 1549 sgl_unmap_user_pages(STbp, STbp->do_dio, is_read);
1da177e4 1550 STbp->do_dio = 0;
787926b1 1551 STbp->sg_segs = 0;
1da177e4
LT
1552 }
1553}
1554
1555
1556/* Write command */
1557static ssize_t
1558st_write(struct file *filp, const char __user *buf, size_t count, loff_t * ppos)
1559{
1560 ssize_t total;
1561 ssize_t i, do_count, blks, transfer;
1562 ssize_t retval;
1563 int undone, retry_eot = 0, scode;
1564 int async_write;
1565 unsigned char cmd[MAX_COMMAND_SIZE];
1566 const char __user *b_point;
8b05b773 1567 struct st_request *SRpnt = NULL;
1da177e4
LT
1568 struct scsi_tape *STp = filp->private_data;
1569 struct st_modedef *STm;
1570 struct st_partstat *STps;
1571 struct st_buffer *STbp;
1da177e4 1572
28f85009 1573 if (mutex_lock_interruptible(&STp->lock))
1da177e4
LT
1574 return -ERESTARTSYS;
1575
1576 retval = rw_checks(STp, filp, count);
1577 if (retval || count == 0)
1578 goto out;
1579
1580 /* Write must be integral number of blocks */
1581 if (STp->block_size != 0 && (count % STp->block_size) != 0) {
b30d8bca
HR
1582 st_printk(KERN_WARNING, STp,
1583 "Write not multiple of tape block size.\n");
1da177e4
LT
1584 retval = (-EINVAL);
1585 goto out;
1586 }
1587
1588 STm = &(STp->modes[STp->current_mode]);
1589 STps = &(STp->ps[STp->partition]);
1590
1591 if (STp->write_prot) {
1592 retval = (-EACCES);
1593 goto out;
1594 }
1595
1596
1597 if (STps->rw == ST_READING) {
1598 retval = flush_buffer(STp, 0);
1599 if (retval)
1600 goto out;
1601 STps->rw = ST_WRITING;
1602 } else if (STps->rw != ST_WRITING &&
1603 STps->drv_file == 0 && STps->drv_block == 0) {
1604 if ((retval = set_mode_densblk(STp, STm)) < 0)
1605 goto out;
1606 if (STm->default_compression != ST_DONT_TOUCH &&
1607 !(STp->compression_changed)) {
1608 if (st_compression(STp, (STm->default_compression == ST_YES))) {
b30d8bca
HR
1609 st_printk(KERN_WARNING, STp,
1610 "Can't set default compression.\n");
1da177e4
LT
1611 if (modes_defined) {
1612 retval = (-EINVAL);
1613 goto out;
1614 }
1615 }
1616 }
1617 }
1618
1619 STbp = STp->buffer;
1620 i = write_behind_check(STp);
1621 if (i) {
1622 if (i == -ENOSPC)
1623 STps->eof = ST_EOM_OK;
1624 else
1625 STps->eof = ST_EOM_ERROR;
1626 }
1627
1628 if (STps->eof == ST_EOM_OK) {
1629 STps->eof = ST_EOD_1; /* allow next write */
1630 retval = (-ENOSPC);
1631 goto out;
1632 }
1633 else if (STps->eof == ST_EOM_ERROR) {
1634 retval = (-EIO);
1635 goto out;
1636 }
1637
1638 /* Check the buffer readability in cases where copy_user might catch
1639 the problems after some tape movement. */
1640 if (STp->block_size != 0 &&
1641 !STbp->do_dio &&
1642 (copy_from_user(&i, buf, 1) != 0 ||
1643 copy_from_user(&i, buf + count - 1, 1) != 0)) {
1644 retval = (-EFAULT);
1645 goto out;
1646 }
1647
1648 retval = setup_buffering(STp, buf, count, 0);
1649 if (retval)
1650 goto out;
1651
1652 total = count;
1653
1654 memset(cmd, 0, MAX_COMMAND_SIZE);
1655 cmd[0] = WRITE_6;
1656 cmd[1] = (STp->block_size != 0);
1657
1658 STps->rw = ST_WRITING;
1659
1660 b_point = buf;
1661 while (count > 0 && !retry_eot) {
1662
1663 if (STbp->do_dio) {
1664 do_count = count;
1665 }
1666 else {
1667 if (STp->block_size == 0)
1668 do_count = count;
1669 else {
1670 do_count = STbp->buffer_blocks * STp->block_size -
1671 STbp->buffer_bytes;
1672 if (do_count > count)
1673 do_count = count;
1674 }
1675
1676 i = append_to_buffer(b_point, STbp, do_count);
1677 if (i) {
1678 retval = i;
1679 goto out;
1680 }
1681 }
1682 count -= do_count;
1683 b_point += do_count;
1684
1685 async_write = STp->block_size == 0 && !STbp->do_dio &&
1686 STm->do_async_writes && STps->eof < ST_EOM_OK;
1687
1688 if (STp->block_size != 0 && STm->do_buffer_writes &&
9abe16c6 1689 !(STp->try_dio_now && try_wdio) && STps->eof < ST_EOM_OK &&
1da177e4
LT
1690 STbp->buffer_bytes < STbp->buffer_size) {
1691 STp->dirty = 1;
1692 /* Don't write a buffer that is not full enough. */
1693 if (!async_write && count == 0)
1694 break;
1695 }
1696
1697 retry_write:
1698 if (STp->block_size == 0)
1699 blks = transfer = do_count;
1700 else {
1701 if (!STbp->do_dio)
1702 blks = STbp->buffer_bytes;
1703 else
1704 blks = do_count;
1705 blks /= STp->block_size;
1706 transfer = blks * STp->block_size;
1707 }
1708 cmd[2] = blks >> 16;
1709 cmd[3] = blks >> 8;
1710 cmd[4] = blks;
1711
1712 SRpnt = st_do_scsi(SRpnt, STp, cmd, transfer, DMA_TO_DEVICE,
a02488ed
JB
1713 STp->device->request_queue->rq_timeout,
1714 MAX_WRITE_RETRIES, !async_write);
1da177e4
LT
1715 if (!SRpnt) {
1716 retval = STbp->syscall_result;
1717 goto out;
1718 }
8b05b773 1719 if (async_write && !STbp->syscall_result) {
1da177e4
LT
1720 STbp->writing = transfer;
1721 STp->dirty = !(STbp->writing ==
1722 STbp->buffer_bytes);
1723 SRpnt = NULL; /* Prevent releasing this request! */
1724 DEB( STp->write_pending = 1; )
1725 break;
1726 }
1727
1728 if (STbp->syscall_result != 0) {
1729 struct st_cmdstatus *cmdstatp = &STp->buffer->cmdstat;
1730
b30d8bca 1731 DEBC_printk(STp, "Error on write:\n");
1da177e4
LT
1732 if (cmdstatp->have_sense && (cmdstatp->flags & SENSE_EOM)) {
1733 scode = cmdstatp->sense_hdr.sense_key;
1734 if (cmdstatp->remainder_valid)
1735 undone = (int)cmdstatp->uremainder64;
1736 else if (STp->block_size == 0 &&
1737 scode == VOLUME_OVERFLOW)
1738 undone = transfer;
1739 else
1740 undone = 0;
1741 if (STp->block_size != 0)
1742 undone *= STp->block_size;
1743 if (undone <= do_count) {
1744 /* Only data from this write is not written */
1745 count += undone;
626dcb1e 1746 b_point -= undone;
1da177e4
LT
1747 do_count -= undone;
1748 if (STp->block_size)
1749 blks = (transfer - undone) / STp->block_size;
1750 STps->eof = ST_EOM_OK;
1751 /* Continue in fixed block mode if all written
1752 in this request but still something left to write
1753 (retval left to zero)
1754 */
1755 if (STp->block_size == 0 ||
1756 undone > 0 || count == 0)
1757 retval = (-ENOSPC); /* EOM within current request */
b30d8bca
HR
1758 DEBC_printk(STp, "EOM with %d "
1759 "bytes unwritten.\n",
1760 (int)count);
1da177e4
LT
1761 } else {
1762 /* EOT within data buffered earlier (possible only
1763 in fixed block mode without direct i/o) */
1764 if (!retry_eot && !cmdstatp->deferred &&
1765 (scode == NO_SENSE || scode == RECOVERED_ERROR)) {
1766 move_buffer_data(STp->buffer, transfer - undone);
1767 retry_eot = 1;
1768 if (STps->drv_block >= 0) {
1769 STps->drv_block += (transfer - undone) /
1770 STp->block_size;
1771 }
1772 STps->eof = ST_EOM_OK;
b30d8bca
HR
1773 DEBC_printk(STp, "Retry "
1774 "write of %d "
1775 "bytes at EOM.\n",
1776 STp->buffer->buffer_bytes);
1da177e4
LT
1777 goto retry_write;
1778 }
1779 else {
1780 /* Either error within data buffered by driver or
1781 failed retry */
1782 count -= do_count;
1783 blks = do_count = 0;
1784 STps->eof = ST_EOM_ERROR;
1785 STps->drv_block = (-1); /* Too cautious? */
1786 retval = (-EIO); /* EOM for old data */
b30d8bca
HR
1787 DEBC_printk(STp, "EOM with "
1788 "lost data.\n");
1da177e4
LT
1789 }
1790 }
1791 } else {
1792 count += do_count;
1793 STps->drv_block = (-1); /* Too cautious? */
8b05b773 1794 retval = STbp->syscall_result;
1da177e4
LT
1795 }
1796
1797 }
1798
1799 if (STps->drv_block >= 0) {
1800 if (STp->block_size == 0)
1801 STps->drv_block += (do_count > 0);
1802 else
1803 STps->drv_block += blks;
1804 }
1805
1806 STbp->buffer_bytes = 0;
1807 STp->dirty = 0;
1808
1809 if (retval || retry_eot) {
1810 if (count < total)
1811 retval = total - count;
1812 goto out;
1813 }
1814 }
1815
1816 if (STps->eof == ST_EOD_1)
1817 STps->eof = ST_EOM_OK;
1818 else if (STps->eof != ST_EOM_OK)
1819 STps->eof = ST_NOEOF;
1820 retval = total - count;
1821
1822 out:
1823 if (SRpnt != NULL)
8b05b773 1824 st_release_request(SRpnt);
787926b1 1825 release_buffering(STp, 0);
28f85009 1826 mutex_unlock(&STp->lock);
1da177e4
LT
1827
1828 return retval;
1829}
1830\f
1831/* Read data from the tape. Returns zero in the normal case, one if the
1832 eof status has changed, and the negative error code in case of a
1833 fatal error. Otherwise updates the buffer and the eof state.
1834
1835 Does release user buffer mapping if it is set.
1836*/
1837static long read_tape(struct scsi_tape *STp, long count,
8b05b773 1838 struct st_request ** aSRpnt)
1da177e4
LT
1839{
1840 int transfer, blks, bytes;
1841 unsigned char cmd[MAX_COMMAND_SIZE];
8b05b773 1842 struct st_request *SRpnt;
1da177e4
LT
1843 struct st_modedef *STm;
1844 struct st_partstat *STps;
1845 struct st_buffer *STbp;
1846 int retval = 0;
1da177e4
LT
1847
1848 if (count == 0)
1849 return 0;
1850
1851 STm = &(STp->modes[STp->current_mode]);
1852 STps = &(STp->ps[STp->partition]);
1853 if (STps->eof == ST_FM_HIT)
1854 return 1;
1855 STbp = STp->buffer;
1856
1857 if (STp->block_size == 0)
1858 blks = bytes = count;
1859 else {
9abe16c6 1860 if (!(STp->try_dio_now && try_rdio) && STm->do_read_ahead) {
1da177e4
LT
1861 blks = (STp->buffer)->buffer_blocks;
1862 bytes = blks * STp->block_size;
1863 } else {
1864 bytes = count;
1865 if (!STbp->do_dio && bytes > (STp->buffer)->buffer_size)
1866 bytes = (STp->buffer)->buffer_size;
1867 blks = bytes / STp->block_size;
1868 bytes = blks * STp->block_size;
1869 }
1870 }
1871
1872 memset(cmd, 0, MAX_COMMAND_SIZE);
1873 cmd[0] = READ_6;
1874 cmd[1] = (STp->block_size != 0);
40f6b36c
KM
1875 if (!cmd[1] && STp->sili)
1876 cmd[1] |= 2;
1da177e4
LT
1877 cmd[2] = blks >> 16;
1878 cmd[3] = blks >> 8;
1879 cmd[4] = blks;
1880
1881 SRpnt = *aSRpnt;
1882 SRpnt = st_do_scsi(SRpnt, STp, cmd, bytes, DMA_FROM_DEVICE,
a02488ed
JB
1883 STp->device->request_queue->rq_timeout,
1884 MAX_RETRIES, 1);
787926b1 1885 release_buffering(STp, 1);
1da177e4
LT
1886 *aSRpnt = SRpnt;
1887 if (!SRpnt)
1888 return STbp->syscall_result;
1889
1890 STbp->read_pointer = 0;
1891 STps->at_sm = 0;
1892
1893 /* Something to check */
1894 if (STbp->syscall_result) {
1895 struct st_cmdstatus *cmdstatp = &STp->buffer->cmdstat;
1896
1897 retval = 1;
b30d8bca
HR
1898 DEBC_printk(STp,
1899 "Sense: %2x %2x %2x %2x %2x %2x %2x %2x\n",
1900 SRpnt->sense[0], SRpnt->sense[1],
1901 SRpnt->sense[2], SRpnt->sense[3],
1902 SRpnt->sense[4], SRpnt->sense[5],
1903 SRpnt->sense[6], SRpnt->sense[7]);
1da177e4
LT
1904 if (cmdstatp->have_sense) {
1905
1906 if (cmdstatp->sense_hdr.sense_key == BLANK_CHECK)
1907 cmdstatp->flags &= 0xcf; /* No need for EOM in this case */
1908
1909 if (cmdstatp->flags != 0) { /* EOF, EOM, or ILI */
1910 /* Compute the residual count */
1911 if (cmdstatp->remainder_valid)
1912 transfer = (int)cmdstatp->uremainder64;
1913 else
1914 transfer = 0;
1915 if (STp->block_size == 0 &&
1916 cmdstatp->sense_hdr.sense_key == MEDIUM_ERROR)
1917 transfer = bytes;
1918
1919 if (cmdstatp->flags & SENSE_ILI) { /* ILI */
b30d8bca
HR
1920 if (STp->block_size == 0 &&
1921 transfer < 0) {
1922 st_printk(KERN_NOTICE, STp,
1923 "Failed to read %d "
1924 "byte block with %d "
1925 "byte transfer.\n",
1926 bytes - transfer,
1927 bytes);
1928 if (STps->drv_block >= 0)
1929 STps->drv_block += 1;
1930 STbp->buffer_bytes = 0;
1931 return (-ENOMEM);
1932 } else if (STp->block_size == 0) {
1da177e4
LT
1933 STbp->buffer_bytes = bytes - transfer;
1934 } else {
8b05b773 1935 st_release_request(SRpnt);
1da177e4
LT
1936 SRpnt = *aSRpnt = NULL;
1937 if (transfer == blks) { /* We did not get anything, error */
b30d8bca
HR
1938 st_printk(KERN_NOTICE, STp,
1939 "Incorrect "
1940 "block size.\n");
1da177e4
LT
1941 if (STps->drv_block >= 0)
1942 STps->drv_block += blks - transfer + 1;
1943 st_int_ioctl(STp, MTBSR, 1);
1944 return (-EIO);
1945 }
1946 /* We have some data, deliver it */
1947 STbp->buffer_bytes = (blks - transfer) *
1948 STp->block_size;
b30d8bca
HR
1949 DEBC_printk(STp, "ILI but "
1950 "enough data "
1951 "received %ld "
1952 "%d.\n", count,
1953 STbp->buffer_bytes);
1da177e4
LT
1954 if (STps->drv_block >= 0)
1955 STps->drv_block += 1;
1956 if (st_int_ioctl(STp, MTBSR, 1))
1957 return (-EIO);
1958 }
1959 } else if (cmdstatp->flags & SENSE_FMK) { /* FM overrides EOM */
1960 if (STps->eof != ST_FM_HIT)
1961 STps->eof = ST_FM_HIT;
1962 else
1963 STps->eof = ST_EOD_2;
1964 if (STp->block_size == 0)
1965 STbp->buffer_bytes = 0;
1966 else
1967 STbp->buffer_bytes =
1968 bytes - transfer * STp->block_size;
b30d8bca
HR
1969 DEBC_printk(STp, "EOF detected (%d "
1970 "bytes read).\n",
1971 STbp->buffer_bytes);
1da177e4
LT
1972 } else if (cmdstatp->flags & SENSE_EOM) {
1973 if (STps->eof == ST_FM)
1974 STps->eof = ST_EOD_1;
1975 else
1976 STps->eof = ST_EOM_OK;
1977 if (STp->block_size == 0)
1978 STbp->buffer_bytes = bytes - transfer;
1979 else
1980 STbp->buffer_bytes =
1981 bytes - transfer * STp->block_size;
1982
b30d8bca
HR
1983 DEBC_printk(STp, "EOM detected (%d "
1984 "bytes read).\n",
1985 STbp->buffer_bytes);
1da177e4
LT
1986 }
1987 }
b30d8bca 1988 /* end of EOF, EOM, ILI test */
1da177e4 1989 else { /* nonzero sense key */
b30d8bca 1990 DEBC_printk(STp, "Tape error while reading.\n");
1da177e4
LT
1991 STps->drv_block = (-1);
1992 if (STps->eof == ST_FM &&
1993 cmdstatp->sense_hdr.sense_key == BLANK_CHECK) {
b30d8bca
HR
1994 DEBC_printk(STp, "Zero returned for "
1995 "first BLANK CHECK "
1996 "after EOF.\n");
1da177e4
LT
1997 STps->eof = ST_EOD_2; /* First BLANK_CHECK after FM */
1998 } else /* Some other extended sense code */
1999 retval = (-EIO);
2000 }
2001
2002 if (STbp->buffer_bytes < 0) /* Caused by bogus sense data */
2003 STbp->buffer_bytes = 0;
2004 }
b30d8bca 2005 /* End of extended sense test */
1da177e4
LT
2006 else { /* Non-extended sense */
2007 retval = STbp->syscall_result;
2008 }
2009
2010 }
b30d8bca 2011 /* End of error handling */
40f6b36c 2012 else { /* Read successful */
1da177e4 2013 STbp->buffer_bytes = bytes;
40f6b36c
KM
2014 if (STp->sili) /* In fixed block mode residual is always zero here */
2015 STbp->buffer_bytes -= STp->buffer->cmdstat.residual;
2016 }
1da177e4
LT
2017
2018 if (STps->drv_block >= 0) {
2019 if (STp->block_size == 0)
2020 STps->drv_block++;
2021 else
2022 STps->drv_block += STbp->buffer_bytes / STp->block_size;
2023 }
2024 return retval;
2025}
2026\f
2027
2028/* Read command */
2029static ssize_t
2030st_read(struct file *filp, char __user *buf, size_t count, loff_t * ppos)
2031{
2032 ssize_t total;
2033 ssize_t retval = 0;
2034 ssize_t i, transfer;
2035 int special, do_dio = 0;
8b05b773 2036 struct st_request *SRpnt = NULL;
1da177e4
LT
2037 struct scsi_tape *STp = filp->private_data;
2038 struct st_modedef *STm;
2039 struct st_partstat *STps;
2040 struct st_buffer *STbp = STp->buffer;
1da177e4 2041
28f85009 2042 if (mutex_lock_interruptible(&STp->lock))
1da177e4
LT
2043 return -ERESTARTSYS;
2044
2045 retval = rw_checks(STp, filp, count);
2046 if (retval || count == 0)
2047 goto out;
2048
2049 STm = &(STp->modes[STp->current_mode]);
9abe16c6
KM
2050 if (STp->block_size != 0 && (count % STp->block_size) != 0) {
2051 if (!STm->do_read_ahead) {
2052 retval = (-EINVAL); /* Read must be integral number of blocks */
2053 goto out;
2054 }
2055 STp->try_dio_now = 0; /* Direct i/o can't handle split blocks */
1da177e4
LT
2056 }
2057
2058 STps = &(STp->ps[STp->partition]);
2059 if (STps->rw == ST_WRITING) {
2060 retval = flush_buffer(STp, 0);
2061 if (retval)
2062 goto out;
2063 STps->rw = ST_READING;
2064 }
b30d8bca 2065 DEB(
1da177e4 2066 if (debugging && STps->eof != ST_NOEOF)
b30d8bca
HR
2067 st_printk(ST_DEB_MSG, STp,
2068 "EOF/EOM flag up (%d). Bytes %d\n",
2069 STps->eof, STbp->buffer_bytes);
2070 ) /* end DEB */
1da177e4
LT
2071
2072 retval = setup_buffering(STp, buf, count, 1);
2073 if (retval)
2074 goto out;
2075 do_dio = STbp->do_dio;
2076
2077 if (STbp->buffer_bytes == 0 &&
2078 STps->eof >= ST_EOD_1) {
2079 if (STps->eof < ST_EOD) {
2080 STps->eof += 1;
2081 retval = 0;
2082 goto out;
2083 }
2084 retval = (-EIO); /* EOM or Blank Check */
2085 goto out;
2086 }
2087
2088 if (do_dio) {
2089 /* Check the buffer writability before any tape movement. Don't alter
2090 buffer data. */
2091 if (copy_from_user(&i, buf, 1) != 0 ||
2092 copy_to_user(buf, &i, 1) != 0 ||
2093 copy_from_user(&i, buf + count - 1, 1) != 0 ||
2094 copy_to_user(buf + count - 1, &i, 1) != 0) {
2095 retval = (-EFAULT);
2096 goto out;
2097 }
2098 }
2099
2100 STps->rw = ST_READING;
2101
2102
2103 /* Loop until enough data in buffer or a special condition found */
2104 for (total = 0, special = 0; total < count && !special;) {
2105
2106 /* Get new data if the buffer is empty */
2107 if (STbp->buffer_bytes == 0) {
2108 special = read_tape(STp, count - total, &SRpnt);
2109 if (special < 0) { /* No need to continue read */
2110 retval = special;
2111 goto out;
2112 }
2113 }
2114
2115 /* Move the data from driver buffer to user buffer */
2116 if (STbp->buffer_bytes > 0) {
b30d8bca 2117 DEB(
1da177e4 2118 if (debugging && STps->eof != ST_NOEOF)
b30d8bca
HR
2119 st_printk(ST_DEB_MSG, STp,
2120 "EOF up (%d). Left %d, needed %d.\n",
2121 STps->eof, STbp->buffer_bytes,
2122 (int)(count - total));
2123 ) /* end DEB */
1da177e4
LT
2124 transfer = STbp->buffer_bytes < count - total ?
2125 STbp->buffer_bytes : count - total;
2126 if (!do_dio) {
2127 i = from_buffer(STbp, buf, transfer);
2128 if (i) {
2129 retval = i;
2130 goto out;
2131 }
2132 }
2133 buf += transfer;
2134 total += transfer;
2135 }
2136
2137 if (STp->block_size == 0)
2138 break; /* Read only one variable length block */
2139
2140 } /* for (total = 0, special = 0;
2141 total < count && !special; ) */
2142
2143 /* Change the eof state if no data from tape or buffer */
2144 if (total == 0) {
2145 if (STps->eof == ST_FM_HIT) {
2146 STps->eof = ST_FM;
2147 STps->drv_block = 0;
2148 if (STps->drv_file >= 0)
2149 STps->drv_file++;
2150 } else if (STps->eof == ST_EOD_1) {
2151 STps->eof = ST_EOD_2;
2152 STps->drv_block = 0;
2153 if (STps->drv_file >= 0)
2154 STps->drv_file++;
2155 } else if (STps->eof == ST_EOD_2)
2156 STps->eof = ST_EOD;
2157 } else if (STps->eof == ST_FM)
2158 STps->eof = ST_NOEOF;
2159 retval = total;
2160
2161 out:
2162 if (SRpnt != NULL) {
8b05b773 2163 st_release_request(SRpnt);
1da177e4
LT
2164 SRpnt = NULL;
2165 }
2166 if (do_dio) {
787926b1 2167 release_buffering(STp, 1);
1da177e4
LT
2168 STbp->buffer_bytes = 0;
2169 }
28f85009 2170 mutex_unlock(&STp->lock);
1da177e4
LT
2171
2172 return retval;
2173}
2174\f
2175
2176
2177DEB(
2178/* Set the driver options */
b30d8bca 2179static void st_log_options(struct scsi_tape * STp, struct st_modedef * STm)
1da177e4
LT
2180{
2181 if (debugging) {
b30d8bca
HR
2182 st_printk(KERN_INFO, STp,
2183 "Mode %d options: buffer writes: %d, "
2184 "async writes: %d, read ahead: %d\n",
2185 STp->current_mode, STm->do_buffer_writes,
2186 STm->do_async_writes, STm->do_read_ahead);
2187 st_printk(KERN_INFO, STp,
2188 " can bsr: %d, two FMs: %d, "
2189 "fast mteom: %d, auto lock: %d,\n",
2190 STp->can_bsr, STp->two_fm, STp->fast_mteom,
2191 STp->do_auto_lock);
2192 st_printk(KERN_INFO, STp,
2193 " defs for wr: %d, no block limits: %d, "
2194 "partitions: %d, s2 log: %d\n",
2195 STm->defaults_for_writes, STp->omit_blklims,
2196 STp->can_partitions, STp->scsi2_logical);
2197 st_printk(KERN_INFO, STp,
2198 " sysv: %d nowait: %d sili: %d "
2199 "nowait_filemark: %d\n",
2200 STm->sysv, STp->immediate, STp->sili,
2201 STp->immediate_filemark);
2202 st_printk(KERN_INFO, STp, " debugging: %d\n", debugging);
1da177e4
LT
2203 }
2204}
2205 )
2206
2207
2208static int st_set_options(struct scsi_tape *STp, long options)
2209{
2210 int value;
2211 long code;
2212 struct st_modedef *STm;
1da177e4 2213 struct cdev *cd0, *cd1;
d6216c47 2214 struct device *d0, *d1;
1da177e4
LT
2215
2216 STm = &(STp->modes[STp->current_mode]);
2217 if (!STm->defined) {
d6216c47
ML
2218 cd0 = STm->cdevs[0];
2219 cd1 = STm->cdevs[1];
2220 d0 = STm->devs[0];
2221 d1 = STm->devs[1];
1da177e4 2222 memcpy(STm, &(STp->modes[0]), sizeof(struct st_modedef));
d6216c47
ML
2223 STm->cdevs[0] = cd0;
2224 STm->cdevs[1] = cd1;
2225 STm->devs[0] = d0;
2226 STm->devs[1] = d1;
1da177e4 2227 modes_defined = 1;
b30d8bca
HR
2228 DEBC_printk(STp, "Initialized mode %d definition from mode 0\n",
2229 STp->current_mode);
1da177e4
LT
2230 }
2231
2232 code = options & MT_ST_OPTIONS;
2233 if (code == MT_ST_BOOLEANS) {
2234 STm->do_buffer_writes = (options & MT_ST_BUFFER_WRITES) != 0;
2235 STm->do_async_writes = (options & MT_ST_ASYNC_WRITES) != 0;
2236 STm->defaults_for_writes = (options & MT_ST_DEF_WRITES) != 0;
2237 STm->do_read_ahead = (options & MT_ST_READ_AHEAD) != 0;
2238 STp->two_fm = (options & MT_ST_TWO_FM) != 0;
2239 STp->fast_mteom = (options & MT_ST_FAST_MTEOM) != 0;
2240 STp->do_auto_lock = (options & MT_ST_AUTO_LOCK) != 0;
2241 STp->can_bsr = (options & MT_ST_CAN_BSR) != 0;
2242 STp->omit_blklims = (options & MT_ST_NO_BLKLIMS) != 0;
2243 if ((STp->device)->scsi_level >= SCSI_2)
2244 STp->can_partitions = (options & MT_ST_CAN_PARTITIONS) != 0;
2245 STp->scsi2_logical = (options & MT_ST_SCSI2LOGICAL) != 0;
2246 STp->immediate = (options & MT_ST_NOWAIT) != 0;
c743e44f 2247 STp->immediate_filemark = (options & MT_ST_NOWAIT_EOF) != 0;
1da177e4 2248 STm->sysv = (options & MT_ST_SYSV) != 0;
40f6b36c 2249 STp->sili = (options & MT_ST_SILI) != 0;
1da177e4 2250 DEB( debugging = (options & MT_ST_DEBUGGING) != 0;
b30d8bca 2251 st_log_options(STp, STm); )
1da177e4
LT
2252 } else if (code == MT_ST_SETBOOLEANS || code == MT_ST_CLEARBOOLEANS) {
2253 value = (code == MT_ST_SETBOOLEANS);
2254 if ((options & MT_ST_BUFFER_WRITES) != 0)
2255 STm->do_buffer_writes = value;
2256 if ((options & MT_ST_ASYNC_WRITES) != 0)
2257 STm->do_async_writes = value;
2258 if ((options & MT_ST_DEF_WRITES) != 0)
2259 STm->defaults_for_writes = value;
2260 if ((options & MT_ST_READ_AHEAD) != 0)
2261 STm->do_read_ahead = value;
2262 if ((options & MT_ST_TWO_FM) != 0)
2263 STp->two_fm = value;
2264 if ((options & MT_ST_FAST_MTEOM) != 0)
2265 STp->fast_mteom = value;
2266 if ((options & MT_ST_AUTO_LOCK) != 0)
2267 STp->do_auto_lock = value;
2268 if ((options & MT_ST_CAN_BSR) != 0)
2269 STp->can_bsr = value;
2270 if ((options & MT_ST_NO_BLKLIMS) != 0)
2271 STp->omit_blklims = value;
2272 if ((STp->device)->scsi_level >= SCSI_2 &&
2273 (options & MT_ST_CAN_PARTITIONS) != 0)
2274 STp->can_partitions = value;
2275 if ((options & MT_ST_SCSI2LOGICAL) != 0)
2276 STp->scsi2_logical = value;
2277 if ((options & MT_ST_NOWAIT) != 0)
2278 STp->immediate = value;
c743e44f
LD
2279 if ((options & MT_ST_NOWAIT_EOF) != 0)
2280 STp->immediate_filemark = value;
1da177e4
LT
2281 if ((options & MT_ST_SYSV) != 0)
2282 STm->sysv = value;
40f6b36c
KM
2283 if ((options & MT_ST_SILI) != 0)
2284 STp->sili = value;
b30d8bca 2285 DEB(
1da177e4
LT
2286 if ((options & MT_ST_DEBUGGING) != 0)
2287 debugging = value;
b30d8bca 2288 st_log_options(STp, STm); )
1da177e4
LT
2289 } else if (code == MT_ST_WRITE_THRESHOLD) {
2290 /* Retained for compatibility */
2291 } else if (code == MT_ST_DEF_BLKSIZE) {
2292 value = (options & ~MT_ST_OPTIONS);
2293 if (value == ~MT_ST_OPTIONS) {
2294 STm->default_blksize = (-1);
b30d8bca 2295 DEBC_printk(STp, "Default block size disabled.\n");
1da177e4
LT
2296 } else {
2297 STm->default_blksize = value;
b30d8bca
HR
2298 DEBC_printk(STp,"Default block size set to "
2299 "%d bytes.\n", STm->default_blksize);
1da177e4
LT
2300 if (STp->ready == ST_READY) {
2301 STp->blksize_changed = 0;
2302 set_mode_densblk(STp, STm);
2303 }
2304 }
2305 } else if (code == MT_ST_TIMEOUTS) {
2306 value = (options & ~MT_ST_OPTIONS);
2307 if ((value & MT_ST_SET_LONG_TIMEOUT) != 0) {
2308 STp->long_timeout = (value & ~MT_ST_SET_LONG_TIMEOUT) * HZ;
b30d8bca
HR
2309 DEBC_printk(STp, "Long timeout set to %d seconds.\n",
2310 (value & ~MT_ST_SET_LONG_TIMEOUT));
1da177e4 2311 } else {
a02488ed
JB
2312 blk_queue_rq_timeout(STp->device->request_queue,
2313 value * HZ);
b30d8bca
HR
2314 DEBC_printk(STp, "Normal timeout set to %d seconds.\n",
2315 value);
1da177e4
LT
2316 }
2317 } else if (code == MT_ST_SET_CLN) {
2318 value = (options & ~MT_ST_OPTIONS) & 0xff;
2319 if (value != 0 &&
832151f4
RK
2320 (value < EXTENDED_SENSE_START ||
2321 value >= SCSI_SENSE_BUFFERSIZE))
1da177e4
LT
2322 return (-EINVAL);
2323 STp->cln_mode = value;
2324 STp->cln_sense_mask = (options >> 8) & 0xff;
2325 STp->cln_sense_value = (options >> 16) & 0xff;
b30d8bca
HR
2326 st_printk(KERN_INFO, STp,
2327 "Cleaning request mode %d, mask %02x, value %02x\n",
2328 value, STp->cln_sense_mask, STp->cln_sense_value);
1da177e4
LT
2329 } else if (code == MT_ST_DEF_OPTIONS) {
2330 code = (options & ~MT_ST_CLEAR_DEFAULT);
2331 value = (options & MT_ST_CLEAR_DEFAULT);
2332 if (code == MT_ST_DEF_DENSITY) {
2333 if (value == MT_ST_CLEAR_DEFAULT) {
2334 STm->default_density = (-1);
b30d8bca
HR
2335 DEBC_printk(STp,
2336 "Density default disabled.\n");
1da177e4
LT
2337 } else {
2338 STm->default_density = value & 0xff;
b30d8bca
HR
2339 DEBC_printk(STp, "Density default set to %x\n",
2340 STm->default_density);
1da177e4
LT
2341 if (STp->ready == ST_READY) {
2342 STp->density_changed = 0;
2343 set_mode_densblk(STp, STm);
2344 }
2345 }
2346 } else if (code == MT_ST_DEF_DRVBUFFER) {
2347 if (value == MT_ST_CLEAR_DEFAULT) {
2348 STp->default_drvbuffer = 0xff;
b30d8bca
HR
2349 DEBC_printk(STp,
2350 "Drive buffer default disabled.\n");
1da177e4
LT
2351 } else {
2352 STp->default_drvbuffer = value & 7;
b30d8bca
HR
2353 DEBC_printk(STp,
2354 "Drive buffer default set to %x\n",
2355 STp->default_drvbuffer);
1da177e4
LT
2356 if (STp->ready == ST_READY)
2357 st_int_ioctl(STp, MTSETDRVBUFFER, STp->default_drvbuffer);
2358 }
2359 } else if (code == MT_ST_DEF_COMPRESSION) {
2360 if (value == MT_ST_CLEAR_DEFAULT) {
2361 STm->default_compression = ST_DONT_TOUCH;
b30d8bca
HR
2362 DEBC_printk(STp,
2363 "Compression default disabled.\n");
1da177e4
LT
2364 } else {
2365 if ((value & 0xff00) != 0) {
2366 STp->c_algo = (value & 0xff00) >> 8;
b30d8bca
HR
2367 DEBC_printk(STp, "Compression "
2368 "algorithm set to 0x%x.\n",
2369 STp->c_algo);
1da177e4
LT
2370 }
2371 if ((value & 0xff) != 0xff) {
2372 STm->default_compression = (value & 1 ? ST_YES : ST_NO);
b30d8bca
HR
2373 DEBC_printk(STp, "Compression default "
2374 "set to %x\n",
2375 (value & 1));
1da177e4
LT
2376 if (STp->ready == ST_READY) {
2377 STp->compression_changed = 0;
2378 st_compression(STp, (STm->default_compression == ST_YES));
2379 }
2380 }
2381 }
2382 }
2383 } else
2384 return (-EIO);
2385
2386 return 0;
2387}
2388\f
2389#define MODE_HEADER_LENGTH 4
2390
2391/* Mode header and page byte offsets */
2392#define MH_OFF_DATA_LENGTH 0
2393#define MH_OFF_MEDIUM_TYPE 1
2394#define MH_OFF_DEV_SPECIFIC 2
2395#define MH_OFF_BDESCS_LENGTH 3
2396#define MP_OFF_PAGE_NBR 0
2397#define MP_OFF_PAGE_LENGTH 1
2398
2399/* Mode header and page bit masks */
2400#define MH_BIT_WP 0x80
2401#define MP_MSK_PAGE_NBR 0x3f
2402
2403/* Don't return block descriptors */
2404#define MODE_SENSE_OMIT_BDESCS 0x08
2405
2406#define MODE_SELECT_PAGE_FORMAT 0x10
2407
2408/* Read a mode page into the tape buffer. The block descriptors are included
2409 if incl_block_descs is true. The page control is ored to the page number
2410 parameter, if necessary. */
2411static int read_mode_page(struct scsi_tape *STp, int page, int omit_block_descs)
2412{
2413 unsigned char cmd[MAX_COMMAND_SIZE];
8ecf0d99 2414 struct st_request *SRpnt;
1da177e4
LT
2415
2416 memset(cmd, 0, MAX_COMMAND_SIZE);
2417 cmd[0] = MODE_SENSE;
2418 if (omit_block_descs)
2419 cmd[1] = MODE_SENSE_OMIT_BDESCS;
2420 cmd[2] = page;
2421 cmd[4] = 255;
2422
02ae2c0e
KM
2423 SRpnt = st_do_scsi(NULL, STp, cmd, cmd[4], DMA_FROM_DEVICE,
2424 STp->device->request_queue->rq_timeout, 0, 1);
2425 if (SRpnt == NULL)
2426 return (STp->buffer)->syscall_result;
1da177e4 2427
8b05b773 2428 st_release_request(SRpnt);
1da177e4 2429
02ae2c0e 2430 return STp->buffer->syscall_result;
1da177e4
LT
2431}
2432
2433
2434/* Send the mode page in the tape buffer to the drive. Assumes that the mode data
2435 in the buffer is correctly formatted. The long timeout is used if slow is non-zero. */
2436static int write_mode_page(struct scsi_tape *STp, int page, int slow)
2437{
02ae2c0e 2438 int pgo;
1da177e4 2439 unsigned char cmd[MAX_COMMAND_SIZE];
18c87015 2440 struct st_request *SRpnt;
02ae2c0e 2441 int timeout;
1da177e4
LT
2442
2443 memset(cmd, 0, MAX_COMMAND_SIZE);
2444 cmd[0] = MODE_SELECT;
2445 cmd[1] = MODE_SELECT_PAGE_FORMAT;
2446 pgo = MODE_HEADER_LENGTH + (STp->buffer)->b_data[MH_OFF_BDESCS_LENGTH];
2447 cmd[4] = pgo + (STp->buffer)->b_data[pgo + MP_OFF_PAGE_LENGTH] + 2;
2448
2449 /* Clear reserved fields */
2450 (STp->buffer)->b_data[MH_OFF_DATA_LENGTH] = 0;
2451 (STp->buffer)->b_data[MH_OFF_MEDIUM_TYPE] = 0;
2452 (STp->buffer)->b_data[MH_OFF_DEV_SPECIFIC] &= ~MH_BIT_WP;
2453 (STp->buffer)->b_data[pgo + MP_OFF_PAGE_NBR] &= MP_MSK_PAGE_NBR;
2454
02ae2c0e
KM
2455 timeout = slow ?
2456 STp->long_timeout : STp->device->request_queue->rq_timeout;
2457 SRpnt = st_do_scsi(NULL, STp, cmd, cmd[4], DMA_TO_DEVICE,
2458 timeout, 0, 1);
2459 if (SRpnt == NULL)
2460 return (STp->buffer)->syscall_result;
1da177e4 2461
8b05b773 2462 st_release_request(SRpnt);
1da177e4 2463
02ae2c0e 2464 return STp->buffer->syscall_result;
1da177e4
LT
2465}
2466
2467
2468#define COMPRESSION_PAGE 0x0f
2469#define COMPRESSION_PAGE_LENGTH 16
2470
2471#define CP_OFF_DCE_DCC 2
2472#define CP_OFF_C_ALGO 7
2473
2474#define DCE_MASK 0x80
2475#define DCC_MASK 0x40
2476#define RED_MASK 0x60
2477
2478
2479/* Control the compression with mode page 15. Algorithm not changed if zero.
2480
2481 The block descriptors are read and written because Sony SDT-7000 does not
2482 work without this (suggestion from Michael Schaefer <Michael.Schaefer@dlr.de>).
2483 Including block descriptors should not cause any harm to other drives. */
2484
2485static int st_compression(struct scsi_tape * STp, int state)
2486{
2487 int retval;
2488 int mpoffs; /* Offset to mode page start */
2489 unsigned char *b_data = (STp->buffer)->b_data;
1da177e4
LT
2490
2491 if (STp->ready != ST_READY)
2492 return (-EIO);
2493
2494 /* Read the current page contents */
2495 retval = read_mode_page(STp, COMPRESSION_PAGE, 0);
2496 if (retval) {
b30d8bca 2497 DEBC_printk(STp, "Compression mode page not supported.\n");
1da177e4
LT
2498 return (-EIO);
2499 }
2500
2501 mpoffs = MODE_HEADER_LENGTH + b_data[MH_OFF_BDESCS_LENGTH];
b30d8bca
HR
2502 DEBC_printk(STp, "Compression state is %d.\n",
2503 (b_data[mpoffs + CP_OFF_DCE_DCC] & DCE_MASK ? 1 : 0));
1da177e4
LT
2504
2505 /* Check if compression can be changed */
2506 if ((b_data[mpoffs + CP_OFF_DCE_DCC] & DCC_MASK) == 0) {
b30d8bca 2507 DEBC_printk(STp, "Compression not supported.\n");
1da177e4
LT
2508 return (-EIO);
2509 }
2510
2511 /* Do the change */
2512 if (state) {
2513 b_data[mpoffs + CP_OFF_DCE_DCC] |= DCE_MASK;
2514 if (STp->c_algo != 0)
2515 b_data[mpoffs + CP_OFF_C_ALGO] = STp->c_algo;
2516 }
2517 else {
2518 b_data[mpoffs + CP_OFF_DCE_DCC] &= ~DCE_MASK;
2519 if (STp->c_algo != 0)
2520 b_data[mpoffs + CP_OFF_C_ALGO] = 0; /* no compression */
2521 }
2522
2523 retval = write_mode_page(STp, COMPRESSION_PAGE, 0);
2524 if (retval) {
b30d8bca 2525 DEBC_printk(STp, "Compression change failed.\n");
1da177e4
LT
2526 return (-EIO);
2527 }
b30d8bca 2528 DEBC_printk(STp, "Compression state changed to %d.\n", state);
1da177e4
LT
2529
2530 STp->compression_changed = 1;
2531 return 0;
2532}
2533
2534
2535/* Process the load and unload commands (does unload if the load code is zero) */
2536static int do_load_unload(struct scsi_tape *STp, struct file *filp, int load_code)
2537{
2538 int retval = (-EIO), timeout;
1da177e4
LT
2539 unsigned char cmd[MAX_COMMAND_SIZE];
2540 struct st_partstat *STps;
8b05b773 2541 struct st_request *SRpnt;
1da177e4
LT
2542
2543 if (STp->ready != ST_READY && !load_code) {
2544 if (STp->ready == ST_NO_TAPE)
2545 return (-ENOMEDIUM);
2546 else
2547 return (-EIO);
2548 }
2549
2550 memset(cmd, 0, MAX_COMMAND_SIZE);
2551 cmd[0] = START_STOP;
2552 if (load_code)
2553 cmd[4] |= 1;
2554 /*
2555 * If arg >= 1 && arg <= 6 Enhanced load/unload in HP C1553A
2556 */
2557 if (load_code >= 1 + MT_ST_HPLOADER_OFFSET
2558 && load_code <= 6 + MT_ST_HPLOADER_OFFSET) {
b30d8bca
HR
2559 DEBC_printk(STp, " Enhanced %sload slot %2d.\n",
2560 (cmd[4]) ? "" : "un",
2561 load_code - MT_ST_HPLOADER_OFFSET);
1da177e4
LT
2562 cmd[3] = load_code - MT_ST_HPLOADER_OFFSET; /* MediaID field of C1553A */
2563 }
2564 if (STp->immediate) {
2565 cmd[1] = 1; /* Don't wait for completion */
a02488ed 2566 timeout = STp->device->request_queue->rq_timeout;
1da177e4
LT
2567 }
2568 else
2569 timeout = STp->long_timeout;
2570
2571 DEBC(
2572 if (!load_code)
b30d8bca 2573 st_printk(ST_DEB_MSG, STp, "Unloading tape.\n");
1da177e4 2574 else
b30d8bca 2575 st_printk(ST_DEB_MSG, STp, "Loading tape.\n");
1da177e4
LT
2576 );
2577
02ae2c0e
KM
2578 SRpnt = st_do_scsi(NULL, STp, cmd, 0, DMA_NONE,
2579 timeout, MAX_RETRIES, 1);
1da177e4 2580 if (!SRpnt)
02ae2c0e 2581 return (STp->buffer)->syscall_result;
1da177e4
LT
2582
2583 retval = (STp->buffer)->syscall_result;
02ae2c0e 2584 st_release_request(SRpnt);
1da177e4
LT
2585
2586 if (!retval) { /* SCSI command successful */
2587
2588 if (!load_code) {
2589 STp->rew_at_close = 0;
2590 STp->ready = ST_NO_TAPE;
2591 }
2592 else {
2593 STp->rew_at_close = STp->autorew_dev;
2594 retval = check_tape(STp, filp);
2595 if (retval > 0)
2596 retval = 0;
2597 }
2598 }
2599 else {
2600 STps = &(STp->ps[STp->partition]);
2601 STps->drv_file = STps->drv_block = (-1);
2602 }
2603
2604 return retval;
2605}
2606\f
2607#if DEBUG
2608#define ST_DEB_FORWARD 0
2609#define ST_DEB_BACKWARD 1
b30d8bca 2610static void deb_space_print(struct scsi_tape *STp, int direction, char *units, unsigned char *cmd)
1da177e4
LT
2611{
2612 s32 sc;
2613
b30d8bca
HR
2614 if (!debugging)
2615 return;
2616
1da177e4
LT
2617 sc = cmd[2] & 0x80 ? 0xff000000 : 0;
2618 sc |= (cmd[2] << 16) | (cmd[3] << 8) | cmd[4];
2619 if (direction)
2620 sc = -sc;
b30d8bca
HR
2621 st_printk(ST_DEB_MSG, STp, "Spacing tape %s over %d %s.\n",
2622 direction ? "backward" : "forward", sc, units);
1da177e4 2623}
b30d8bca
HR
2624#else
2625#define ST_DEB_FORWARD 0
2626#define ST_DEB_BACKWARD 1
2627static void deb_space_print(struct scsi_tape *STp, int direction, char *units, unsigned char *cmd) {}
1da177e4
LT
2628#endif
2629
2630
2631/* Internal ioctl function */
2632static int st_int_ioctl(struct scsi_tape *STp, unsigned int cmd_in, unsigned long arg)
2633{
2634 int timeout;
2635 long ltmp;
2636 int ioctl_result;
2637 int chg_eof = 1;
2638 unsigned char cmd[MAX_COMMAND_SIZE];
8b05b773 2639 struct st_request *SRpnt;
1da177e4
LT
2640 struct st_partstat *STps;
2641 int fileno, blkno, at_sm, undone;
2642 int datalen = 0, direction = DMA_NONE;
1da177e4
LT
2643
2644 WARN_ON(STp->buffer->do_dio != 0);
2645 if (STp->ready != ST_READY) {
2646 if (STp->ready == ST_NO_TAPE)
2647 return (-ENOMEDIUM);
2648 else
2649 return (-EIO);
2650 }
2651 timeout = STp->long_timeout;
2652 STps = &(STp->ps[STp->partition]);
2653 fileno = STps->drv_file;
2654 blkno = STps->drv_block;
2655 at_sm = STps->at_sm;
2656
2657 memset(cmd, 0, MAX_COMMAND_SIZE);
2658 switch (cmd_in) {
2659 case MTFSFM:
2660 chg_eof = 0; /* Changed from the FSF after this */
2661 case MTFSF:
2662 cmd[0] = SPACE;
2663 cmd[1] = 0x01; /* Space FileMarks */
2664 cmd[2] = (arg >> 16);
2665 cmd[3] = (arg >> 8);
2666 cmd[4] = arg;
b30d8bca 2667 deb_space_print(STp, ST_DEB_FORWARD, "filemarks", cmd);
1da177e4
LT
2668 if (fileno >= 0)
2669 fileno += arg;
2670 blkno = 0;
2671 at_sm &= (arg == 0);
2672 break;
2673 case MTBSFM:
2674 chg_eof = 0; /* Changed from the FSF after this */
2675 case MTBSF:
2676 cmd[0] = SPACE;
2677 cmd[1] = 0x01; /* Space FileMarks */
2678 ltmp = (-arg);
2679 cmd[2] = (ltmp >> 16);
2680 cmd[3] = (ltmp >> 8);
2681 cmd[4] = ltmp;
b30d8bca 2682 deb_space_print(STp, ST_DEB_BACKWARD, "filemarks", cmd);
1da177e4
LT
2683 if (fileno >= 0)
2684 fileno -= arg;
2685 blkno = (-1); /* We can't know the block number */
2686 at_sm &= (arg == 0);
2687 break;
2688 case MTFSR:
2689 cmd[0] = SPACE;
2690 cmd[1] = 0x00; /* Space Blocks */
2691 cmd[2] = (arg >> 16);
2692 cmd[3] = (arg >> 8);
2693 cmd[4] = arg;
b30d8bca 2694 deb_space_print(STp, ST_DEB_FORWARD, "blocks", cmd);
1da177e4
LT
2695 if (blkno >= 0)
2696 blkno += arg;
2697 at_sm &= (arg == 0);
2698 break;
2699 case MTBSR:
2700 cmd[0] = SPACE;
2701 cmd[1] = 0x00; /* Space Blocks */
2702 ltmp = (-arg);
2703 cmd[2] = (ltmp >> 16);
2704 cmd[3] = (ltmp >> 8);
2705 cmd[4] = ltmp;
b30d8bca 2706 deb_space_print(STp, ST_DEB_BACKWARD, "blocks", cmd);
1da177e4
LT
2707 if (blkno >= 0)
2708 blkno -= arg;
2709 at_sm &= (arg == 0);
2710 break;
2711 case MTFSS:
2712 cmd[0] = SPACE;
2713 cmd[1] = 0x04; /* Space Setmarks */
2714 cmd[2] = (arg >> 16);
2715 cmd[3] = (arg >> 8);
2716 cmd[4] = arg;
b30d8bca 2717 deb_space_print(STp, ST_DEB_FORWARD, "setmarks", cmd);
1da177e4
LT
2718 if (arg != 0) {
2719 blkno = fileno = (-1);
2720 at_sm = 1;
2721 }
2722 break;
2723 case MTBSS:
2724 cmd[0] = SPACE;
2725 cmd[1] = 0x04; /* Space Setmarks */
2726 ltmp = (-arg);
2727 cmd[2] = (ltmp >> 16);
2728 cmd[3] = (ltmp >> 8);
2729 cmd[4] = ltmp;
b30d8bca 2730 deb_space_print(STp, ST_DEB_BACKWARD, "setmarks", cmd);
1da177e4
LT
2731 if (arg != 0) {
2732 blkno = fileno = (-1);
2733 at_sm = 1;
2734 }
2735 break;
2736 case MTWEOF:
3e51d3c9 2737 case MTWEOFI:
1da177e4
LT
2738 case MTWSM:
2739 if (STp->write_prot)
2740 return (-EACCES);
2741 cmd[0] = WRITE_FILEMARKS;
2742 if (cmd_in == MTWSM)
2743 cmd[1] = 2;
c743e44f
LD
2744 if (cmd_in == MTWEOFI ||
2745 (cmd_in == MTWEOF && STp->immediate_filemark))
3e51d3c9 2746 cmd[1] |= 1;
1da177e4
LT
2747 cmd[2] = (arg >> 16);
2748 cmd[3] = (arg >> 8);
2749 cmd[4] = arg;
a02488ed 2750 timeout = STp->device->request_queue->rq_timeout;
b30d8bca
HR
2751 DEBC(
2752 if (cmd_in != MTWSM)
2753 st_printk(ST_DEB_MSG, STp,
2754 "Writing %d filemarks.\n",
2755 cmd[2] * 65536 +
2756 cmd[3] * 256 +
2757 cmd[4]);
2758 else
2759 st_printk(ST_DEB_MSG, STp,
2760 "Writing %d setmarks.\n",
2761 cmd[2] * 65536 +
2762 cmd[3] * 256 +
2763 cmd[4]);
1da177e4
LT
2764 )
2765 if (fileno >= 0)
2766 fileno += arg;
2767 blkno = 0;
2768 at_sm = (cmd_in == MTWSM);
2769 break;
2770 case MTREW:
2771 cmd[0] = REZERO_UNIT;
2772 if (STp->immediate) {
2773 cmd[1] = 1; /* Don't wait for completion */
a02488ed 2774 timeout = STp->device->request_queue->rq_timeout;
1da177e4 2775 }
b30d8bca 2776 DEBC_printk(STp, "Rewinding tape.\n");
1da177e4
LT
2777 fileno = blkno = at_sm = 0;
2778 break;
2779 case MTNOP:
b30d8bca 2780 DEBC_printk(STp, "No op on tape.\n");
1da177e4
LT
2781 return 0; /* Should do something ? */
2782 break;
2783 case MTRETEN:
2784 cmd[0] = START_STOP;
2785 if (STp->immediate) {
2786 cmd[1] = 1; /* Don't wait for completion */
a02488ed 2787 timeout = STp->device->request_queue->rq_timeout;
1da177e4
LT
2788 }
2789 cmd[4] = 3;
b30d8bca 2790 DEBC_printk(STp, "Retensioning tape.\n");
1da177e4
LT
2791 fileno = blkno = at_sm = 0;
2792 break;
2793 case MTEOM:
2794 if (!STp->fast_mteom) {
2795 /* space to the end of tape */
2796 ioctl_result = st_int_ioctl(STp, MTFSF, 0x7fffff);
2797 fileno = STps->drv_file;
2798 if (STps->eof >= ST_EOD_1)
2799 return 0;
2800 /* The next lines would hide the number of spaced FileMarks
2801 That's why I inserted the previous lines. I had no luck
2802 with detecting EOM with FSF, so we go now to EOM.
2803 Joerg Weule */
2804 } else
2805 fileno = (-1);
2806 cmd[0] = SPACE;
2807 cmd[1] = 3;
b30d8bca 2808 DEBC_printk(STp, "Spacing to end of recorded medium.\n");
1da177e4
LT
2809 blkno = -1;
2810 at_sm = 0;
2811 break;
2812 case MTERASE:
2813 if (STp->write_prot)
2814 return (-EACCES);
2815 cmd[0] = ERASE;
2816 cmd[1] = (arg ? 1 : 0); /* Long erase with non-zero argument */
2817 if (STp->immediate) {
2818 cmd[1] |= 2; /* Don't wait for completion */
a02488ed 2819 timeout = STp->device->request_queue->rq_timeout;
1da177e4
LT
2820 }
2821 else
2822 timeout = STp->long_timeout * 8;
2823
b30d8bca 2824 DEBC_printk(STp, "Erasing tape.\n");
1da177e4
LT
2825 fileno = blkno = at_sm = 0;
2826 break;
2827 case MTSETBLK: /* Set block length */
2828 case MTSETDENSITY: /* Set tape density */
2829 case MTSETDRVBUFFER: /* Set drive buffering */
2830 case SET_DENS_AND_BLK: /* Set density and block size */
2831 chg_eof = 0;
2832 if (STp->dirty || (STp->buffer)->buffer_bytes != 0)
2833 return (-EIO); /* Not allowed if data in buffer */
2834 if ((cmd_in == MTSETBLK || cmd_in == SET_DENS_AND_BLK) &&
2835 (arg & MT_ST_BLKSIZE_MASK) != 0 &&
2836 STp->max_block > 0 &&
2837 ((arg & MT_ST_BLKSIZE_MASK) < STp->min_block ||
2838 (arg & MT_ST_BLKSIZE_MASK) > STp->max_block)) {
b30d8bca 2839 st_printk(KERN_WARNING, STp, "Illegal block size.\n");
1da177e4
LT
2840 return (-EINVAL);
2841 }
2842 cmd[0] = MODE_SELECT;
2843 if ((STp->use_pf & USE_PF))
2844 cmd[1] = MODE_SELECT_PAGE_FORMAT;
2845 cmd[4] = datalen = 12;
2846 direction = DMA_TO_DEVICE;
2847
2848 memset((STp->buffer)->b_data, 0, 12);
2849 if (cmd_in == MTSETDRVBUFFER)
2850 (STp->buffer)->b_data[2] = (arg & 7) << 4;
2851 else
2852 (STp->buffer)->b_data[2] =
2853 STp->drv_buffer << 4;
2854 (STp->buffer)->b_data[3] = 8; /* block descriptor length */
2855 if (cmd_in == MTSETDENSITY) {
2856 (STp->buffer)->b_data[4] = arg;
2857 STp->density_changed = 1; /* At least we tried ;-) */
2858 } else if (cmd_in == SET_DENS_AND_BLK)
2859 (STp->buffer)->b_data[4] = arg >> 24;
2860 else
2861 (STp->buffer)->b_data[4] = STp->density;
2862 if (cmd_in == MTSETBLK || cmd_in == SET_DENS_AND_BLK) {
2863 ltmp = arg & MT_ST_BLKSIZE_MASK;
2864 if (cmd_in == MTSETBLK)
2865 STp->blksize_changed = 1; /* At least we tried ;-) */
2866 } else
2867 ltmp = STp->block_size;
2868 (STp->buffer)->b_data[9] = (ltmp >> 16);
2869 (STp->buffer)->b_data[10] = (ltmp >> 8);
2870 (STp->buffer)->b_data[11] = ltmp;
a02488ed 2871 timeout = STp->device->request_queue->rq_timeout;
b30d8bca 2872 DEBC(
1da177e4 2873 if (cmd_in == MTSETBLK || cmd_in == SET_DENS_AND_BLK)
b30d8bca
HR
2874 st_printk(ST_DEB_MSG, STp,
2875 "Setting block size to %d bytes.\n",
2876 (STp->buffer)->b_data[9] * 65536 +
2877 (STp->buffer)->b_data[10] * 256 +
2878 (STp->buffer)->b_data[11]);
1da177e4 2879 if (cmd_in == MTSETDENSITY || cmd_in == SET_DENS_AND_BLK)
b30d8bca
HR
2880 st_printk(ST_DEB_MSG, STp,
2881 "Setting density code to %x.\n",
2882 (STp->buffer)->b_data[4]);
1da177e4 2883 if (cmd_in == MTSETDRVBUFFER)
b30d8bca
HR
2884 st_printk(ST_DEB_MSG, STp,
2885 "Setting drive buffer code to %d.\n",
2886 ((STp->buffer)->b_data[2] >> 4) & 7);
1da177e4
LT
2887 )
2888 break;
2889 default:
2890 return (-ENOSYS);
2891 }
2892
02ae2c0e
KM
2893 SRpnt = st_do_scsi(NULL, STp, cmd, datalen, direction,
2894 timeout, MAX_RETRIES, 1);
1da177e4
LT
2895 if (!SRpnt)
2896 return (STp->buffer)->syscall_result;
2897
02ae2c0e 2898 ioctl_result = (STp->buffer)->syscall_result;
1da177e4
LT
2899
2900 if (!ioctl_result) { /* SCSI command successful */
8b05b773 2901 st_release_request(SRpnt);
1da177e4
LT
2902 SRpnt = NULL;
2903 STps->drv_block = blkno;
2904 STps->drv_file = fileno;
2905 STps->at_sm = at_sm;
2906
2907 if (cmd_in == MTBSFM)
2908 ioctl_result = st_int_ioctl(STp, MTFSF, 1);
2909 else if (cmd_in == MTFSFM)
2910 ioctl_result = st_int_ioctl(STp, MTBSF, 1);
2911
2912 if (cmd_in == MTSETBLK || cmd_in == SET_DENS_AND_BLK) {
1da177e4
LT
2913 STp->block_size = arg & MT_ST_BLKSIZE_MASK;
2914 if (STp->block_size != 0) {
1da177e4
LT
2915 (STp->buffer)->buffer_blocks =
2916 (STp->buffer)->buffer_size / STp->block_size;
2917 }
2918 (STp->buffer)->buffer_bytes = (STp->buffer)->read_pointer = 0;
2919 if (cmd_in == SET_DENS_AND_BLK)
2920 STp->density = arg >> MT_ST_DENSITY_SHIFT;
2921 } else if (cmd_in == MTSETDRVBUFFER)
2922 STp->drv_buffer = (arg & 7);
2923 else if (cmd_in == MTSETDENSITY)
2924 STp->density = arg;
2925
2926 if (cmd_in == MTEOM)
2927 STps->eof = ST_EOD;
2928 else if (cmd_in == MTFSF)
2929 STps->eof = ST_FM;
2930 else if (chg_eof)
2931 STps->eof = ST_NOEOF;
2932
3e51d3c9
KM
2933 if (cmd_in == MTWEOF || cmd_in == MTWEOFI)
2934 STps->rw = ST_IDLE; /* prevent automatic WEOF at close */
1da177e4
LT
2935 } else { /* SCSI command was not completely successful. Don't return
2936 from this block without releasing the SCSI command block! */
2937 struct st_cmdstatus *cmdstatp = &STp->buffer->cmdstat;
2938
2939 if (cmdstatp->flags & SENSE_EOM) {
2940 if (cmd_in != MTBSF && cmd_in != MTBSFM &&
2941 cmd_in != MTBSR && cmd_in != MTBSS)
2942 STps->eof = ST_EOM_OK;
2943 STps->drv_block = 0;
2944 }
2945
2946 if (cmdstatp->remainder_valid)
2947 undone = (int)cmdstatp->uremainder64;
2948 else
2949 undone = 0;
2950
3e51d3c9 2951 if ((cmd_in == MTWEOF || cmd_in == MTWEOFI) &&
1da177e4 2952 cmdstatp->have_sense &&
91614c05
KM
2953 (cmdstatp->flags & SENSE_EOM)) {
2954 if (cmdstatp->sense_hdr.sense_key == NO_SENSE ||
2955 cmdstatp->sense_hdr.sense_key == RECOVERED_ERROR) {
2956 ioctl_result = 0; /* EOF(s) written successfully at EOM */
2957 STps->eof = ST_NOEOF;
2958 } else { /* Writing EOF(s) failed */
2959 if (fileno >= 0)
2960 fileno -= undone;
2961 if (undone < arg)
2962 STps->eof = ST_NOEOF;
2963 }
1da177e4 2964 STps->drv_file = fileno;
1da177e4
LT
2965 } else if ((cmd_in == MTFSF) || (cmd_in == MTFSFM)) {
2966 if (fileno >= 0)
2967 STps->drv_file = fileno - undone;
2968 else
2969 STps->drv_file = fileno;
2970 STps->drv_block = -1;
2971 STps->eof = ST_NOEOF;
2972 } else if ((cmd_in == MTBSF) || (cmd_in == MTBSFM)) {
2973 if (arg > 0 && undone < 0) /* Some drives get this wrong */
2974 undone = (-undone);
2975 if (STps->drv_file >= 0)
2976 STps->drv_file = fileno + undone;
2977 STps->drv_block = 0;
2978 STps->eof = ST_NOEOF;
2979 } else if (cmd_in == MTFSR) {
2980 if (cmdstatp->flags & SENSE_FMK) { /* Hit filemark */
2981 if (STps->drv_file >= 0)
2982 STps->drv_file++;
2983 STps->drv_block = 0;
2984 STps->eof = ST_FM;
2985 } else {
2986 if (blkno >= undone)
2987 STps->drv_block = blkno - undone;
2988 else
2989 STps->drv_block = (-1);
2990 STps->eof = ST_NOEOF;
2991 }
2992 } else if (cmd_in == MTBSR) {
2993 if (cmdstatp->flags & SENSE_FMK) { /* Hit filemark */
2994 STps->drv_file--;
2995 STps->drv_block = (-1);
2996 } else {
2997 if (arg > 0 && undone < 0) /* Some drives get this wrong */
2998 undone = (-undone);
2999 if (STps->drv_block >= 0)
3000 STps->drv_block = blkno + undone;
3001 }
3002 STps->eof = ST_NOEOF;
3003 } else if (cmd_in == MTEOM) {
3004 STps->drv_file = (-1);
3005 STps->drv_block = (-1);
3006 STps->eof = ST_EOD;
3007 } else if (cmd_in == MTSETBLK ||
3008 cmd_in == MTSETDENSITY ||
3009 cmd_in == MTSETDRVBUFFER ||
3010 cmd_in == SET_DENS_AND_BLK) {
3011 if (cmdstatp->sense_hdr.sense_key == ILLEGAL_REQUEST &&
3012 !(STp->use_pf & PF_TESTED)) {
3013 /* Try the other possible state of Page Format if not
3014 already tried */
1da2019f 3015 STp->use_pf = (STp->use_pf ^ USE_PF) | PF_TESTED;
8b05b773 3016 st_release_request(SRpnt);
1da177e4
LT
3017 SRpnt = NULL;
3018 return st_int_ioctl(STp, cmd_in, arg);
3019 }
3020 } else if (chg_eof)
3021 STps->eof = ST_NOEOF;
3022
3023 if (cmdstatp->sense_hdr.sense_key == BLANK_CHECK)
3024 STps->eof = ST_EOD;
3025
8b05b773 3026 st_release_request(SRpnt);
1da177e4
LT
3027 SRpnt = NULL;
3028 }
3029
3030 return ioctl_result;
3031}
3032\f
3033
3034/* Get the tape position. If bt == 2, arg points into a kernel space mt_loc
3035 structure. */
3036
3037static int get_location(struct scsi_tape *STp, unsigned int *block, int *partition,
3038 int logical)
3039{
3040 int result;
3041 unsigned char scmd[MAX_COMMAND_SIZE];
8b05b773 3042 struct st_request *SRpnt;
1da177e4
LT
3043
3044 if (STp->ready != ST_READY)
3045 return (-EIO);
3046
3047 memset(scmd, 0, MAX_COMMAND_SIZE);
3048 if ((STp->device)->scsi_level < SCSI_2) {
3049 scmd[0] = QFA_REQUEST_BLOCK;
3050 scmd[4] = 3;
3051 } else {
3052 scmd[0] = READ_POSITION;
3053 if (!logical && !STp->scsi2_logical)
3054 scmd[1] = 1;
3055 }
02ae2c0e
KM
3056 SRpnt = st_do_scsi(NULL, STp, scmd, 20, DMA_FROM_DEVICE,
3057 STp->device->request_queue->rq_timeout,
3058 MAX_READY_RETRIES, 1);
1da177e4 3059 if (!SRpnt)
02ae2c0e 3060 return (STp->buffer)->syscall_result;
1da177e4
LT
3061
3062 if ((STp->buffer)->syscall_result != 0 ||
3063 (STp->device->scsi_level >= SCSI_2 &&
3064 ((STp->buffer)->b_data[0] & 4) != 0)) {
3065 *block = *partition = 0;
b30d8bca 3066 DEBC_printk(STp, " Can't read tape position.\n");
1da177e4
LT
3067 result = (-EIO);
3068 } else {
3069 result = 0;
3070 if ((STp->device)->scsi_level < SCSI_2) {
3071 *block = ((STp->buffer)->b_data[0] << 16)
3072 + ((STp->buffer)->b_data[1] << 8)
3073 + (STp->buffer)->b_data[2];
3074 *partition = 0;
3075 } else {
3076 *block = ((STp->buffer)->b_data[4] << 24)
3077 + ((STp->buffer)->b_data[5] << 16)
3078 + ((STp->buffer)->b_data[6] << 8)
3079 + (STp->buffer)->b_data[7];
3080 *partition = (STp->buffer)->b_data[1];
3081 if (((STp->buffer)->b_data[0] & 0x80) &&
3082 (STp->buffer)->b_data[1] == 0) /* BOP of partition 0 */
3083 STp->ps[0].drv_block = STp->ps[0].drv_file = 0;
3084 }
b30d8bca
HR
3085 DEBC_printk(STp, "Got tape pos. blk %d part %d.\n",
3086 *block, *partition);
1da177e4 3087 }
8b05b773 3088 st_release_request(SRpnt);
1da177e4
LT
3089 SRpnt = NULL;
3090
3091 return result;
3092}
3093
3094
3095/* Set the tape block and partition. Negative partition means that only the
3096 block should be set in vendor specific way. */
3097static int set_location(struct scsi_tape *STp, unsigned int block, int partition,
3098 int logical)
3099{
3100 struct st_partstat *STps;
3101 int result, p;
3102 unsigned int blk;
3103 int timeout;
3104 unsigned char scmd[MAX_COMMAND_SIZE];
8b05b773 3105 struct st_request *SRpnt;
1da177e4
LT
3106
3107 if (STp->ready != ST_READY)
3108 return (-EIO);
3109 timeout = STp->long_timeout;
3110 STps = &(STp->ps[STp->partition]);
3111
b30d8bca
HR
3112 DEBC_printk(STp, "Setting block to %d and partition to %d.\n",
3113 block, partition);
1da177e4
LT
3114 DEB(if (partition < 0)
3115 return (-EIO); )
3116
3117 /* Update the location at the partition we are leaving */
3118 if ((!STp->can_partitions && partition != 0) ||
3119 partition >= ST_NBR_PARTITIONS)
3120 return (-EINVAL);
3121 if (partition != STp->partition) {
3122 if (get_location(STp, &blk, &p, 1))
3123 STps->last_block_valid = 0;
3124 else {
3125 STps->last_block_valid = 1;
3126 STps->last_block_visited = blk;
b30d8bca
HR
3127 DEBC_printk(STp, "Visited block %d for "
3128 "partition %d saved.\n",
3129 blk, STp->partition);
1da177e4
LT
3130 }
3131 }
3132
3133 memset(scmd, 0, MAX_COMMAND_SIZE);
3134 if ((STp->device)->scsi_level < SCSI_2) {
3135 scmd[0] = QFA_SEEK_BLOCK;
3136 scmd[2] = (block >> 16);
3137 scmd[3] = (block >> 8);
3138 scmd[4] = block;
3139 scmd[5] = 0;
3140 } else {
3141 scmd[0] = SEEK_10;
3142 scmd[3] = (block >> 24);
3143 scmd[4] = (block >> 16);
3144 scmd[5] = (block >> 8);
3145 scmd[6] = block;
3146 if (!logical && !STp->scsi2_logical)
3147 scmd[1] = 4;
3148 if (STp->partition != partition) {
3149 scmd[1] |= 2;
3150 scmd[8] = partition;
b30d8bca
HR
3151 DEBC_printk(STp, "Trying to change partition "
3152 "from %d to %d\n", STp->partition,
3153 partition);
1da177e4
LT
3154 }
3155 }
3156 if (STp->immediate) {
3157 scmd[1] |= 1; /* Don't wait for completion */
a02488ed 3158 timeout = STp->device->request_queue->rq_timeout;
1da177e4
LT
3159 }
3160
02ae2c0e
KM
3161 SRpnt = st_do_scsi(NULL, STp, scmd, 0, DMA_NONE,
3162 timeout, MAX_READY_RETRIES, 1);
1da177e4 3163 if (!SRpnt)
02ae2c0e 3164 return (STp->buffer)->syscall_result;
1da177e4
LT
3165
3166 STps->drv_block = STps->drv_file = (-1);
3167 STps->eof = ST_NOEOF;
3168 if ((STp->buffer)->syscall_result != 0) {
3169 result = (-EIO);
3170 if (STp->can_partitions &&
3171 (STp->device)->scsi_level >= SCSI_2 &&
3172 (p = find_partition(STp)) >= 0)
3173 STp->partition = p;
3174 } else {
3175 if (STp->can_partitions) {
3176 STp->partition = partition;
3177 STps = &(STp->ps[partition]);
3178 if (!STps->last_block_valid ||
3179 STps->last_block_visited != block) {
3180 STps->at_sm = 0;
3181 STps->rw = ST_IDLE;
3182 }
3183 } else
3184 STps->at_sm = 0;
3185 if (block == 0)
3186 STps->drv_block = STps->drv_file = 0;
3187 result = 0;
3188 }
02ae2c0e 3189
8b05b773 3190 st_release_request(SRpnt);
1da177e4
LT
3191 SRpnt = NULL;
3192
3193 return result;
3194}
3195
3196
3197/* Find the current partition number for the drive status. Called from open and
3198 returns either partition number of negative error code. */
3199static int find_partition(struct scsi_tape *STp)
3200{
3201 int i, partition;
3202 unsigned int block;
3203
3204 if ((i = get_location(STp, &block, &partition, 1)) < 0)
3205 return i;
3206 if (partition >= ST_NBR_PARTITIONS)
3207 return (-EIO);
3208 return partition;
3209}
3210
3211
3212/* Change the partition if necessary */
3213static int switch_partition(struct scsi_tape *STp)
3214{
3215 struct st_partstat *STps;
3216
3217 if (STp->partition == STp->new_partition)
3218 return 0;
3219 STps = &(STp->ps[STp->new_partition]);
3220 if (!STps->last_block_valid)
3221 STps->last_block_visited = 0;
3222 return set_location(STp, STps->last_block_visited, STp->new_partition, 1);
3223}
3224\f
3225/* Functions for reading and writing the medium partition mode page. */
3226
3227#define PART_PAGE 0x11
3228#define PART_PAGE_FIXED_LENGTH 8
3229
3230#define PP_OFF_MAX_ADD_PARTS 2
3231#define PP_OFF_NBR_ADD_PARTS 3
3232#define PP_OFF_FLAGS 4
3233#define PP_OFF_PART_UNITS 6
3234#define PP_OFF_RESERVED 7
3235
3236#define PP_BIT_IDP 0x20
3237#define PP_MSK_PSUM_MB 0x10
3238
3239/* Get the number of partitions on the tape. As a side effect reads the
3240 mode page into the tape buffer. */
3241static int nbr_partitions(struct scsi_tape *STp)
3242{
3243 int result;
1da177e4
LT
3244
3245 if (STp->ready != ST_READY)
3246 return (-EIO);
3247
3248 result = read_mode_page(STp, PART_PAGE, 1);
3249
3250 if (result) {
b30d8bca 3251 DEBC_printk(STp, "Can't read medium partition page.\n");
1da177e4
LT
3252 result = (-EIO);
3253 } else {
3254 result = (STp->buffer)->b_data[MODE_HEADER_LENGTH +
3255 PP_OFF_NBR_ADD_PARTS] + 1;
b30d8bca 3256 DEBC_printk(STp, "Number of partitions %d.\n", result);
1da177e4
LT
3257 }
3258
3259 return result;
3260}
3261
3262
3263/* Partition the tape into two partitions if size > 0 or one partition if
3264 size == 0.
3265
3266 The block descriptors are read and written because Sony SDT-7000 does not
3267 work without this (suggestion from Michael Schaefer <Michael.Schaefer@dlr.de>).
3268
3269 My HP C1533A drive returns only one partition size field. This is used to
3270 set the size of partition 1. There is no size field for the default partition.
3271 Michael Schaefer's Sony SDT-7000 returns two descriptors and the second is
3272 used to set the size of partition 1 (this is what the SCSI-3 standard specifies).
3273 The following algorithm is used to accommodate both drives: if the number of
3274 partition size fields is greater than the maximum number of additional partitions
3275 in the mode page, the second field is used. Otherwise the first field is used.
3276
3277 For Seagate DDS drives the page length must be 8 when no partitions is defined
3278 and 10 when 1 partition is defined (information from Eric Lee Green). This is
3279 is acceptable also to some other old drives and enforced if the first partition
3280 size field is used for the first additional partition size.
3281 */
3282static int partition_tape(struct scsi_tape *STp, int size)
3283{
1da177e4
LT
3284 int result;
3285 int pgo, psd_cnt, psdo;
3286 unsigned char *bp;
3287
3288 result = read_mode_page(STp, PART_PAGE, 0);
3289 if (result) {
b30d8bca 3290 DEBC_printk(STp, "Can't read partition mode page.\n");
1da177e4
LT
3291 return result;
3292 }
3293 /* The mode page is in the buffer. Let's modify it and write it. */
3294 bp = (STp->buffer)->b_data;
3295 pgo = MODE_HEADER_LENGTH + bp[MH_OFF_BDESCS_LENGTH];
b30d8bca
HR
3296 DEBC_printk(STp, "Partition page length is %d bytes.\n",
3297 bp[pgo + MP_OFF_PAGE_LENGTH] + 2);
1da177e4
LT
3298
3299 psd_cnt = (bp[pgo + MP_OFF_PAGE_LENGTH] + 2 - PART_PAGE_FIXED_LENGTH) / 2;
3300 psdo = pgo + PART_PAGE_FIXED_LENGTH;
3301 if (psd_cnt > bp[pgo + PP_OFF_MAX_ADD_PARTS]) {
3302 bp[psdo] = bp[psdo + 1] = 0xff; /* Rest of the tape */
3303 psdo += 2;
3304 }
3305 memset(bp + psdo, 0, bp[pgo + PP_OFF_NBR_ADD_PARTS] * 2);
3306
b30d8bca 3307 DEBC_printk(STp, "psd_cnt %d, max.parts %d, nbr_parts %d\n",
1da177e4 3308 psd_cnt, bp[pgo + PP_OFF_MAX_ADD_PARTS],
b30d8bca 3309 bp[pgo + PP_OFF_NBR_ADD_PARTS]);
1da177e4
LT
3310
3311 if (size <= 0) {
3312 bp[pgo + PP_OFF_NBR_ADD_PARTS] = 0;
3313 if (psd_cnt <= bp[pgo + PP_OFF_MAX_ADD_PARTS])
3314 bp[pgo + MP_OFF_PAGE_LENGTH] = 6;
b30d8bca 3315 DEBC_printk(STp, "Formatting tape with one partition.\n");
1da177e4
LT
3316 } else {
3317 bp[psdo] = (size >> 8) & 0xff;
3318 bp[psdo + 1] = size & 0xff;
3319 bp[pgo + 3] = 1;
3320 if (bp[pgo + MP_OFF_PAGE_LENGTH] < 8)
3321 bp[pgo + MP_OFF_PAGE_LENGTH] = 8;
b30d8bca
HR
3322 DEBC_printk(STp, "Formatting tape with two partitions "
3323 "(1 = %d MB).\n", size);
1da177e4
LT
3324 }
3325 bp[pgo + PP_OFF_PART_UNITS] = 0;
3326 bp[pgo + PP_OFF_RESERVED] = 0;
3327 bp[pgo + PP_OFF_FLAGS] = PP_BIT_IDP | PP_MSK_PSUM_MB;
3328
3329 result = write_mode_page(STp, PART_PAGE, 1);
3330 if (result) {
b30d8bca 3331 st_printk(KERN_INFO, STp, "Partitioning of tape failed.\n");
1da177e4
LT
3332 result = (-EIO);
3333 }
3334
3335 return result;
3336}
3337\f
3338
3339
3340/* The ioctl command */
fd66c1b4 3341static long st_ioctl(struct file *file, unsigned int cmd_in, unsigned long arg)
1da177e4
LT
3342{
3343 int i, cmd_nr, cmd_type, bt;
3344 int retval = 0;
3345 unsigned int blk;
3346 struct scsi_tape *STp = file->private_data;
3347 struct st_modedef *STm;
3348 struct st_partstat *STps;
1da177e4
LT
3349 void __user *p = (void __user *)arg;
3350
28f85009 3351 if (mutex_lock_interruptible(&STp->lock))
1da177e4
LT
3352 return -ERESTARTSYS;
3353
b30d8bca 3354 DEB(
1da177e4 3355 if (debugging && !STp->in_use) {
b30d8bca 3356 st_printk(ST_DEB_MSG, STp, "Incorrect device.\n");
1da177e4
LT
3357 retval = (-EIO);
3358 goto out;
3359 } ) /* end DEB */
3360
3361 STm = &(STp->modes[STp->current_mode]);
3362 STps = &(STp->ps[STp->partition]);
3363
3364 /*
3365 * If we are in the middle of error recovery, don't let anyone
3366 * else try and use this device. Also, if error recovery fails, it
3367 * may try and take the device offline, in which case all further
3368 * access to the device is prohibited.
3369 */
83ff6fe8
AV
3370 retval = scsi_nonblockable_ioctl(STp->device, cmd_in, p,
3371 file->f_flags & O_NDELAY);
1da177e4
LT
3372 if (!scsi_block_when_processing_errors(STp->device) || retval != -ENODEV)
3373 goto out;
3374 retval = 0;
3375
3376 cmd_type = _IOC_TYPE(cmd_in);
3377 cmd_nr = _IOC_NR(cmd_in);
3378
3379 if (cmd_type == _IOC_TYPE(MTIOCTOP) && cmd_nr == _IOC_NR(MTIOCTOP)) {
3380 struct mtop mtc;
3381
3382 if (_IOC_SIZE(cmd_in) != sizeof(mtc)) {
3383 retval = (-EINVAL);
3384 goto out;
3385 }
3386
3387 i = copy_from_user(&mtc, p, sizeof(struct mtop));
3388 if (i) {
3389 retval = (-EFAULT);
3390 goto out;
3391 }
3392
3393 if (mtc.mt_op == MTSETDRVBUFFER && !capable(CAP_SYS_ADMIN)) {
b30d8bca
HR
3394 st_printk(KERN_WARNING, STp,
3395 "MTSETDRVBUFFER only allowed for root.\n");
1da177e4
LT
3396 retval = (-EPERM);
3397 goto out;
3398 }
3399 if (!STm->defined &&
3400 (mtc.mt_op != MTSETDRVBUFFER &&
3401 (mtc.mt_count & MT_ST_OPTIONS) == 0)) {
3402 retval = (-ENXIO);
3403 goto out;
3404 }
3405
3406 if (!STp->pos_unknown) {
3407
3408 if (STps->eof == ST_FM_HIT) {
3409 if (mtc.mt_op == MTFSF || mtc.mt_op == MTFSFM ||
3410 mtc.mt_op == MTEOM) {
3411 mtc.mt_count -= 1;
3412 if (STps->drv_file >= 0)
3413 STps->drv_file += 1;
3414 } else if (mtc.mt_op == MTBSF || mtc.mt_op == MTBSFM) {
3415 mtc.mt_count += 1;
3416 if (STps->drv_file >= 0)
3417 STps->drv_file += 1;
3418 }
3419 }
3420
3421 if (mtc.mt_op == MTSEEK) {
3422 /* Old position must be restored if partition will be
3423 changed */
3424 i = !STp->can_partitions ||
3425 (STp->new_partition != STp->partition);
3426 } else {
3427 i = mtc.mt_op == MTREW || mtc.mt_op == MTOFFL ||
3428 mtc.mt_op == MTRETEN || mtc.mt_op == MTEOM ||
3429 mtc.mt_op == MTLOCK || mtc.mt_op == MTLOAD ||
3430 mtc.mt_op == MTFSF || mtc.mt_op == MTFSFM ||
3431 mtc.mt_op == MTBSF || mtc.mt_op == MTBSFM ||
3432 mtc.mt_op == MTCOMPRESSION;
3433 }
3434 i = flush_buffer(STp, i);
3435 if (i < 0) {
3436 retval = i;
3437 goto out;
3438 }
3439 if (STps->rw == ST_WRITING &&
3440 (mtc.mt_op == MTREW || mtc.mt_op == MTOFFL ||
3441 mtc.mt_op == MTSEEK ||
3442 mtc.mt_op == MTBSF || mtc.mt_op == MTBSFM)) {
3443 i = st_int_ioctl(STp, MTWEOF, 1);
3444 if (i < 0) {
3445 retval = i;
3446 goto out;
3447 }
3448 if (mtc.mt_op == MTBSF || mtc.mt_op == MTBSFM)
3449 mtc.mt_count++;
3450 STps->rw = ST_IDLE;
3451 }
3452
3453 } else {
3454 /*
3455 * If there was a bus reset, block further access
3456 * to this device. If the user wants to rewind the tape,
3457 * then reset the flag and allow access again.
3458 */
3459 if (mtc.mt_op != MTREW &&
3460 mtc.mt_op != MTOFFL &&
3461 mtc.mt_op != MTRETEN &&
3462 mtc.mt_op != MTERASE &&
3463 mtc.mt_op != MTSEEK &&
3464 mtc.mt_op != MTEOM) {
3465 retval = (-EIO);
3466 goto out;
3467 }
3468 reset_state(STp);
3469 /* remove this when the midlevel properly clears was_reset */
3470 STp->device->was_reset = 0;
3471 }
3472
3473 if (mtc.mt_op != MTNOP && mtc.mt_op != MTSETBLK &&
3474 mtc.mt_op != MTSETDENSITY && mtc.mt_op != MTWSM &&
3475 mtc.mt_op != MTSETDRVBUFFER && mtc.mt_op != MTSETPART)
3476 STps->rw = ST_IDLE; /* Prevent automatic WEOF and fsf */
3477
3478 if (mtc.mt_op == MTOFFL && STp->door_locked != ST_UNLOCKED)
3479 do_door_lock(STp, 0); /* Ignore result! */
3480
3481 if (mtc.mt_op == MTSETDRVBUFFER &&
3482 (mtc.mt_count & MT_ST_OPTIONS) != 0) {
3483 retval = st_set_options(STp, mtc.mt_count);
3484 goto out;
3485 }
3486
3487 if (mtc.mt_op == MTSETPART) {
3488 if (!STp->can_partitions ||
3489 mtc.mt_count < 0 || mtc.mt_count >= ST_NBR_PARTITIONS) {
3490 retval = (-EINVAL);
3491 goto out;
3492 }
3493 if (mtc.mt_count >= STp->nbr_partitions &&
3494 (STp->nbr_partitions = nbr_partitions(STp)) < 0) {
3495 retval = (-EIO);
3496 goto out;
3497 }
3498 if (mtc.mt_count >= STp->nbr_partitions) {
3499 retval = (-EINVAL);
3500 goto out;
3501 }
3502 STp->new_partition = mtc.mt_count;
3503 retval = 0;
3504 goto out;
3505 }
3506
3507 if (mtc.mt_op == MTMKPART) {
3508 if (!STp->can_partitions) {
3509 retval = (-EINVAL);
3510 goto out;
3511 }
3512 if ((i = st_int_ioctl(STp, MTREW, 0)) < 0 ||
3513 (i = partition_tape(STp, mtc.mt_count)) < 0) {
3514 retval = i;
3515 goto out;
3516 }
3517 for (i = 0; i < ST_NBR_PARTITIONS; i++) {
3518 STp->ps[i].rw = ST_IDLE;
3519 STp->ps[i].at_sm = 0;
3520 STp->ps[i].last_block_valid = 0;
3521 }
3522 STp->partition = STp->new_partition = 0;
3523 STp->nbr_partitions = 1; /* Bad guess ?-) */
3524 STps->drv_block = STps->drv_file = 0;
3525 retval = 0;
3526 goto out;
3527 }
3528
3529 if (mtc.mt_op == MTSEEK) {
3530 i = set_location(STp, mtc.mt_count, STp->new_partition, 0);
3531 if (!STp->can_partitions)
3532 STp->ps[0].rw = ST_IDLE;
3533 retval = i;
3534 goto out;
3535 }
3536
3537 if (mtc.mt_op == MTUNLOAD || mtc.mt_op == MTOFFL) {
3538 retval = do_load_unload(STp, file, 0);
3539 goto out;
3540 }
3541
3542 if (mtc.mt_op == MTLOAD) {
3543 retval = do_load_unload(STp, file, max(1, mtc.mt_count));
3544 goto out;
3545 }
3546
3547 if (mtc.mt_op == MTLOCK || mtc.mt_op == MTUNLOCK) {
3548 retval = do_door_lock(STp, (mtc.mt_op == MTLOCK));
3549 goto out;
3550 }
3551
3552 if (STp->can_partitions && STp->ready == ST_READY &&
3553 (i = switch_partition(STp)) < 0) {
3554 retval = i;
3555 goto out;
3556 }
3557
3558 if (mtc.mt_op == MTCOMPRESSION)
3559 retval = st_compression(STp, (mtc.mt_count & 1));
3560 else
3561 retval = st_int_ioctl(STp, mtc.mt_op, mtc.mt_count);
3562 goto out;
3563 }
3564 if (!STm->defined) {
3565 retval = (-ENXIO);
3566 goto out;
3567 }
3568
3569 if ((i = flush_buffer(STp, 0)) < 0) {
3570 retval = i;
3571 goto out;
3572 }
3573 if (STp->can_partitions &&
3574 (i = switch_partition(STp)) < 0) {
3575 retval = i;
3576 goto out;
3577 }
3578
3579 if (cmd_type == _IOC_TYPE(MTIOCGET) && cmd_nr == _IOC_NR(MTIOCGET)) {
3580 struct mtget mt_status;
3581
3582 if (_IOC_SIZE(cmd_in) != sizeof(struct mtget)) {
3583 retval = (-EINVAL);
3584 goto out;
3585 }
3586
3587 mt_status.mt_type = STp->tape_type;
3588 mt_status.mt_dsreg =
3589 ((STp->block_size << MT_ST_BLKSIZE_SHIFT) & MT_ST_BLKSIZE_MASK) |
3590 ((STp->density << MT_ST_DENSITY_SHIFT) & MT_ST_DENSITY_MASK);
3591 mt_status.mt_blkno = STps->drv_block;
3592 mt_status.mt_fileno = STps->drv_file;
3593 if (STp->block_size != 0) {
3594 if (STps->rw == ST_WRITING)
3595 mt_status.mt_blkno +=
3596 (STp->buffer)->buffer_bytes / STp->block_size;
3597 else if (STps->rw == ST_READING)
3598 mt_status.mt_blkno -=
3599 ((STp->buffer)->buffer_bytes +
3600 STp->block_size - 1) / STp->block_size;
3601 }
3602
3603 mt_status.mt_gstat = 0;
3604 if (STp->drv_write_prot)
3605 mt_status.mt_gstat |= GMT_WR_PROT(0xffffffff);
3606 if (mt_status.mt_blkno == 0) {
3607 if (mt_status.mt_fileno == 0)
3608 mt_status.mt_gstat |= GMT_BOT(0xffffffff);
3609 else
3610 mt_status.mt_gstat |= GMT_EOF(0xffffffff);
3611 }
3612 mt_status.mt_erreg = (STp->recover_reg << MT_ST_SOFTERR_SHIFT);
3613 mt_status.mt_resid = STp->partition;
3614 if (STps->eof == ST_EOM_OK || STps->eof == ST_EOM_ERROR)
3615 mt_status.mt_gstat |= GMT_EOT(0xffffffff);
3616 else if (STps->eof >= ST_EOM_OK)
3617 mt_status.mt_gstat |= GMT_EOD(0xffffffff);
3618 if (STp->density == 1)
3619 mt_status.mt_gstat |= GMT_D_800(0xffffffff);
3620 else if (STp->density == 2)
3621 mt_status.mt_gstat |= GMT_D_1600(0xffffffff);
3622 else if (STp->density == 3)
3623 mt_status.mt_gstat |= GMT_D_6250(0xffffffff);
3624 if (STp->ready == ST_READY)
3625 mt_status.mt_gstat |= GMT_ONLINE(0xffffffff);
3626 if (STp->ready == ST_NO_TAPE)
3627 mt_status.mt_gstat |= GMT_DR_OPEN(0xffffffff);
3628 if (STps->at_sm)
3629 mt_status.mt_gstat |= GMT_SM(0xffffffff);
3630 if (STm->do_async_writes ||
3631 (STm->do_buffer_writes && STp->block_size != 0) ||
3632 STp->drv_buffer != 0)
3633 mt_status.mt_gstat |= GMT_IM_REP_EN(0xffffffff);
3634 if (STp->cleaning_req)
3635 mt_status.mt_gstat |= GMT_CLN(0xffffffff);
3636
3637 i = copy_to_user(p, &mt_status, sizeof(struct mtget));
3638 if (i) {
3639 retval = (-EFAULT);
3640 goto out;
3641 }
3642
3643 STp->recover_reg = 0; /* Clear after read */
3644 retval = 0;
3645 goto out;
3646 } /* End of MTIOCGET */
3647 if (cmd_type == _IOC_TYPE(MTIOCPOS) && cmd_nr == _IOC_NR(MTIOCPOS)) {
3648 struct mtpos mt_pos;
3649 if (_IOC_SIZE(cmd_in) != sizeof(struct mtpos)) {
3650 retval = (-EINVAL);
3651 goto out;
3652 }
3653 if ((i = get_location(STp, &blk, &bt, 0)) < 0) {
3654 retval = i;
3655 goto out;
3656 }
3657 mt_pos.mt_blkno = blk;
3658 i = copy_to_user(p, &mt_pos, sizeof(struct mtpos));
3659 if (i)
3660 retval = (-EFAULT);
3661 goto out;
3662 }
28f85009 3663 mutex_unlock(&STp->lock);
1da177e4
LT
3664 switch (cmd_in) {
3665 case SCSI_IOCTL_GET_IDLUN:
3666 case SCSI_IOCTL_GET_BUS_NUMBER:
3667 break;
3668 default:
16c4b3e2
KM
3669 if ((cmd_in == SG_IO ||
3670 cmd_in == SCSI_IOCTL_SEND_COMMAND ||
3671 cmd_in == CDROM_SEND_PACKET) &&
3672 !capable(CAP_SYS_RAWIO))
1da177e4
LT
3673 i = -EPERM;
3674 else
74f3c8af
AV
3675 i = scsi_cmd_ioctl(STp->disk->queue, STp->disk,
3676 file->f_mode, cmd_in, p);
1da177e4
LT
3677 if (i != -ENOTTY)
3678 return i;
3679 break;
3680 }
16c4b3e2
KM
3681 retval = scsi_ioctl(STp->device, cmd_in, p);
3682 if (!retval && cmd_in == SCSI_IOCTL_STOP_UNIT) { /* unload */
3683 STp->rew_at_close = 0;
3684 STp->ready = ST_NO_TAPE;
3685 }
3686 return retval;
1da177e4
LT
3687
3688 out:
28f85009 3689 mutex_unlock(&STp->lock);
1da177e4
LT
3690 return retval;
3691}
3692
3693#ifdef CONFIG_COMPAT
3694static long st_compat_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
3695{
3696 struct scsi_tape *STp = file->private_data;
3697 struct scsi_device *sdev = STp->device;
3698 int ret = -ENOIOCTLCMD;
3699 if (sdev->host->hostt->compat_ioctl) {
3700
3701 ret = sdev->host->hostt->compat_ioctl(sdev, cmd, (void __user *)arg);
3702
3703 }
3704 return ret;
3705}
3706#endif
3707
3708\f
3709
3710/* Try to allocate a new tape buffer. Calling function must not hold
3711 dev_arr_lock. */
f409d6cc 3712static struct st_buffer *new_tape_buffer(int need_dma, int max_sg)
1da177e4 3713{
1da177e4
LT
3714 struct st_buffer *tb;
3715
f409d6cc 3716 tb = kzalloc(sizeof(struct st_buffer), GFP_ATOMIC);
1da177e4
LT
3717 if (!tb) {
3718 printk(KERN_NOTICE "st: Can't allocate new tape buffer.\n");
3719 return NULL;
3720 }
1ac63cf5 3721 tb->frp_segs = 0;
1da177e4 3722 tb->use_sg = max_sg;
1da177e4 3723 tb->dma = need_dma;
f409d6cc 3724 tb->buffer_size = 0;
1da177e4 3725
f409d6cc
FT
3726 tb->reserved_pages = kzalloc(max_sg * sizeof(struct page *),
3727 GFP_ATOMIC);
d0e1ae31
FT
3728 if (!tb->reserved_pages) {
3729 kfree(tb);
3730 return NULL;
3731 }
3732
1da177e4
LT
3733 return tb;
3734}
3735
3736
3737/* Try to allocate enough space in the tape buffer */
8f78fc5e
KM
3738#define ST_MAX_ORDER 6
3739
1da177e4
LT
3740static int enlarge_buffer(struct st_buffer * STbuffer, int new_size, int need_dma)
3741{
769989a4 3742 int segs, max_segs, b_size, order, got;
c53033f6 3743 gfp_t priority;
1da177e4
LT
3744
3745 if (new_size <= STbuffer->buffer_size)
3746 return 1;
3747
3748 if (STbuffer->buffer_size <= PAGE_SIZE)
3749 normalize_buffer(STbuffer); /* Avoid extra segment */
3750
3751 max_segs = STbuffer->use_sg;
1da177e4
LT
3752
3753 priority = GFP_KERNEL | __GFP_NOWARN;
3754 if (need_dma)
3755 priority |= GFP_DMA;
9c905966 3756
08c95832
FT
3757 if (STbuffer->cleared)
3758 priority |= __GFP_ZERO;
3759
9c905966 3760 if (STbuffer->frp_segs) {
c982c368 3761 order = STbuffer->reserved_page_order;
08c95832 3762 b_size = PAGE_SIZE << order;
9c905966
FT
3763 } else {
3764 for (b_size = PAGE_SIZE, order = 0;
46081b16
FT
3765 order < ST_MAX_ORDER &&
3766 max_segs * (PAGE_SIZE << order) < new_size;
8f78fc5e 3767 order++, b_size *= 2)
9c905966 3768 ; /* empty */
373daacf 3769 STbuffer->reserved_page_order = order;
9c905966 3770 }
8f78fc5e
KM
3771 if (max_segs * (PAGE_SIZE << order) < new_size) {
3772 if (order == ST_MAX_ORDER)
3773 return 0;
3774 normalize_buffer(STbuffer);
3775 return enlarge_buffer(STbuffer, new_size, need_dma);
3776 }
1da177e4
LT
3777
3778 for (segs = STbuffer->frp_segs, got = STbuffer->buffer_size;
3779 segs < max_segs && got < new_size;) {
08c95832
FT
3780 struct page *page;
3781
3782 page = alloc_pages(priority, order);
3783 if (!page) {
1da177e4
LT
3784 DEB(STbuffer->buffer_size = got);
3785 normalize_buffer(STbuffer);
3786 return 0;
3787 }
08c95832 3788
1da177e4
LT
3789 STbuffer->frp_segs += 1;
3790 got += b_size;
3791 STbuffer->buffer_size = got;
08c95832 3792 STbuffer->reserved_pages[segs] = page;
1da177e4
LT
3793 segs++;
3794 }
08c95832 3795 STbuffer->b_data = page_address(STbuffer->reserved_pages[0]);
1da177e4
LT
3796
3797 return 1;
3798}
3799
3800
40f6b36c
KM
3801/* Make sure that no data from previous user is in the internal buffer */
3802static void clear_buffer(struct st_buffer * st_bp)
3803{
3804 int i;
3805
3806 for (i=0; i < st_bp->frp_segs; i++)
08c95832 3807 memset(page_address(st_bp->reserved_pages[i]), 0,
c982c368 3808 PAGE_SIZE << st_bp->reserved_page_order);
40f6b36c
KM
3809 st_bp->cleared = 1;
3810}
3811
3812
1da177e4
LT
3813/* Release the extra buffer */
3814static void normalize_buffer(struct st_buffer * STbuffer)
3815{
c982c368 3816 int i, order = STbuffer->reserved_page_order;
1da177e4 3817
1ac63cf5 3818 for (i = 0; i < STbuffer->frp_segs; i++) {
08c95832
FT
3819 __free_pages(STbuffer->reserved_pages[i], order);
3820 STbuffer->buffer_size -= (PAGE_SIZE << order);
1da177e4 3821 }
1ac63cf5 3822 STbuffer->frp_segs = 0;
8b05b773 3823 STbuffer->sg_segs = 0;
c982c368 3824 STbuffer->reserved_page_order = 0;
d0e1ae31 3825 STbuffer->map_data.offset = 0;
1da177e4
LT
3826}
3827
3828
3829/* Move data from the user buffer to the tape buffer. Returns zero (success) or
3830 negative error code. */
3831static int append_to_buffer(const char __user *ubp, struct st_buffer * st_bp, int do_count)
3832{
3833 int i, cnt, res, offset;
c982c368 3834 int length = PAGE_SIZE << st_bp->reserved_page_order;
1da177e4
LT
3835
3836 for (i = 0, offset = st_bp->buffer_bytes;
08c95832
FT
3837 i < st_bp->frp_segs && offset >= length; i++)
3838 offset -= length;
1da177e4
LT
3839 if (i == st_bp->frp_segs) { /* Should never happen */
3840 printk(KERN_WARNING "st: append_to_buffer offset overflow.\n");
3841 return (-EIO);
3842 }
3843 for (; i < st_bp->frp_segs && do_count > 0; i++) {
08c95832
FT
3844 struct page *page = st_bp->reserved_pages[i];
3845 cnt = length - offset < do_count ? length - offset : do_count;
3846 res = copy_from_user(page_address(page) + offset, ubp, cnt);
1da177e4
LT
3847 if (res)
3848 return (-EFAULT);
3849 do_count -= cnt;
3850 st_bp->buffer_bytes += cnt;
3851 ubp += cnt;
3852 offset = 0;
3853 }
3854 if (do_count) /* Should never happen */
3855 return (-EIO);
3856
3857 return 0;
3858}
3859
3860
3861/* Move data from the tape buffer to the user buffer. Returns zero (success) or
3862 negative error code. */
3863static int from_buffer(struct st_buffer * st_bp, char __user *ubp, int do_count)
3864{
3865 int i, cnt, res, offset;
c982c368 3866 int length = PAGE_SIZE << st_bp->reserved_page_order;
1da177e4
LT
3867
3868 for (i = 0, offset = st_bp->read_pointer;
08c95832
FT
3869 i < st_bp->frp_segs && offset >= length; i++)
3870 offset -= length;
1da177e4
LT
3871 if (i == st_bp->frp_segs) { /* Should never happen */
3872 printk(KERN_WARNING "st: from_buffer offset overflow.\n");
3873 return (-EIO);
3874 }
3875 for (; i < st_bp->frp_segs && do_count > 0; i++) {
08c95832
FT
3876 struct page *page = st_bp->reserved_pages[i];
3877 cnt = length - offset < do_count ? length - offset : do_count;
3878 res = copy_to_user(ubp, page_address(page) + offset, cnt);
1da177e4
LT
3879 if (res)
3880 return (-EFAULT);
3881 do_count -= cnt;
3882 st_bp->buffer_bytes -= cnt;
3883 st_bp->read_pointer += cnt;
3884 ubp += cnt;
3885 offset = 0;
3886 }
3887 if (do_count) /* Should never happen */
3888 return (-EIO);
3889
3890 return 0;
3891}
3892
3893
3894/* Move data towards start of buffer */
3895static void move_buffer_data(struct st_buffer * st_bp, int offset)
3896{
3897 int src_seg, dst_seg, src_offset = 0, dst_offset;
3898 int count, total;
c982c368 3899 int length = PAGE_SIZE << st_bp->reserved_page_order;
1da177e4
LT
3900
3901 if (offset == 0)
3902 return;
3903
3904 total=st_bp->buffer_bytes - offset;
3905 for (src_seg=0; src_seg < st_bp->frp_segs; src_seg++) {
3906 src_offset = offset;
08c95832 3907 if (src_offset < length)
1da177e4 3908 break;
08c95832 3909 offset -= length;
1da177e4
LT
3910 }
3911
3912 st_bp->buffer_bytes = st_bp->read_pointer = total;
3913 for (dst_seg=dst_offset=0; total > 0; ) {
08c95832
FT
3914 struct page *dpage = st_bp->reserved_pages[dst_seg];
3915 struct page *spage = st_bp->reserved_pages[src_seg];
3916
3917 count = min(length - dst_offset, length - src_offset);
3918 memmove(page_address(dpage) + dst_offset,
3919 page_address(spage) + src_offset, count);
1da177e4 3920 src_offset += count;
08c95832 3921 if (src_offset >= length) {
1da177e4
LT
3922 src_seg++;
3923 src_offset = 0;
3924 }
3925 dst_offset += count;
08c95832 3926 if (dst_offset >= length) {
1da177e4
LT
3927 dst_seg++;
3928 dst_offset = 0;
3929 }
3930 total -= count;
3931 }
3932}
3933
1da177e4
LT
3934/* Validate the options from command line or module parameters */
3935static void validate_options(void)
3936{
3937 if (buffer_kbs > 0)
3938 st_fixed_buffer_size = buffer_kbs * ST_KILOBYTE;
3939 if (max_sg_segs >= ST_FIRST_SG)
3940 st_max_sg_segs = max_sg_segs;
3941}
3942
3943#ifndef MODULE
3944/* Set the boot options. Syntax is defined in Documenation/scsi/st.txt.
3945 */
3946static int __init st_setup(char *str)
3947{
3948 int i, len, ints[5];
3949 char *stp;
3950
3951 stp = get_options(str, ARRAY_SIZE(ints), ints);
3952
3953 if (ints[0] > 0) {
3954 for (i = 0; i < ints[0] && i < ARRAY_SIZE(parms); i++)
3955 if (parms[i].val)
3956 *parms[i].val = ints[i + 1];
3957 } else {
3958 while (stp != NULL) {
3959 for (i = 0; i < ARRAY_SIZE(parms); i++) {
3960 len = strlen(parms[i].name);
3961 if (!strncmp(stp, parms[i].name, len) &&
3962 (*(stp + len) == ':' || *(stp + len) == '=')) {
3963 if (parms[i].val)
3964 *parms[i].val =
3965 simple_strtoul(stp + len + 1, NULL, 0);
3966 else
3967 printk(KERN_WARNING "st: Obsolete parameter %s\n",
3968 parms[i].name);
3969 break;
3970 }
3971 }
6391a113 3972 if (i >= ARRAY_SIZE(parms))
1da177e4
LT
3973 printk(KERN_WARNING "st: invalid parameter in '%s'\n",
3974 stp);
3975 stp = strchr(stp, ',');
3976 if (stp)
3977 stp++;
3978 }
3979 }
3980
3981 validate_options();
3982
3983 return 1;
3984}
3985
3986__setup("st=", st_setup);
3987
3988#endif
3989
00977a59 3990static const struct file_operations st_fops =
1da177e4
LT
3991{
3992 .owner = THIS_MODULE,
3993 .read = st_read,
3994 .write = st_write,
fd66c1b4 3995 .unlocked_ioctl = st_ioctl,
1da177e4
LT
3996#ifdef CONFIG_COMPAT
3997 .compat_ioctl = st_compat_ioctl,
3998#endif
3999 .open = st_open,
4000 .flush = st_flush,
4001 .release = st_release,
b4d878e2 4002 .llseek = noop_llseek,
1da177e4
LT
4003};
4004
26898afd
JM
4005static int create_one_cdev(struct scsi_tape *tape, int mode, int rew)
4006{
4007 int i, error;
4008 dev_t cdev_devno;
4009 struct cdev *cdev;
4010 struct device *dev;
4011 struct st_modedef *STm = &(tape->modes[mode]);
4012 char name[10];
4013 int dev_num = tape->index;
4014
4015 cdev_devno = MKDEV(SCSI_TAPE_MAJOR, TAPE_MINOR(dev_num, mode, rew));
4016
4017 cdev = cdev_alloc();
4018 if (!cdev) {
4019 pr_err("st%d: out of memory. Device not attached.\n", dev_num);
4020 error = -ENOMEM;
4021 goto out;
4022 }
4023 cdev->owner = THIS_MODULE;
4024 cdev->ops = &st_fops;
4025
4026 error = cdev_add(cdev, cdev_devno, 1);
4027 if (error) {
4028 pr_err("st%d: Can't add %s-rewind mode %d\n", dev_num,
4029 rew ? "non" : "auto", mode);
4030 pr_err("st%d: Device not attached.\n", dev_num);
4031 goto out_free;
4032 }
4033 STm->cdevs[rew] = cdev;
4034
4035 i = mode << (4 - ST_NBR_MODE_BITS);
4036 snprintf(name, 10, "%s%s%s", rew ? "n" : "",
4037 tape->disk->disk_name, st_formats[i]);
4038
4039 dev = device_create(&st_sysfs_class, &tape->device->sdev_gendev,
4040 cdev_devno, &tape->modes[mode], "%s", name);
4041 if (IS_ERR(dev)) {
4042 pr_err("st%d: device_create failed\n", dev_num);
4043 error = PTR_ERR(dev);
4044 goto out_free;
4045 }
4046
4047 STm->devs[rew] = dev;
4048
4049 return 0;
4050out_free:
4051 cdev_del(STm->cdevs[rew]);
4052 STm->cdevs[rew] = NULL;
4053out:
4054 return error;
4055}
4056
4057static int create_cdevs(struct scsi_tape *tape)
4058{
4059 int mode, error;
4060 for (mode = 0; mode < ST_NBR_MODES; ++mode) {
4061 error = create_one_cdev(tape, mode, 0);
4062 if (error)
4063 return error;
4064 error = create_one_cdev(tape, mode, 1);
4065 if (error)
4066 return error;
4067 }
4068
4069 return sysfs_create_link(&tape->device->sdev_gendev.kobj,
4070 &tape->modes[0].devs[0]->kobj, "tape");
4071}
4072
4073static void remove_cdevs(struct scsi_tape *tape)
4074{
4075 int mode, rew;
4076 sysfs_remove_link(&tape->device->sdev_gendev.kobj, "tape");
4077 for (mode = 0; mode < ST_NBR_MODES; mode++) {
4078 struct st_modedef *STm = &(tape->modes[mode]);
4079 for (rew = 0; rew < 2; rew++) {
4080 if (STm->cdevs[rew])
4081 cdev_del(STm->cdevs[rew]);
4082 if (STm->devs[rew])
4083 device_unregister(STm->devs[rew]);
4084 }
4085 }
4086}
4087
1da177e4
LT
4088static int st_probe(struct device *dev)
4089{
4090 struct scsi_device *SDp = to_scsi_device(dev);
4091 struct gendisk *disk = NULL;
1da177e4
LT
4092 struct scsi_tape *tpnt = NULL;
4093 struct st_modedef *STm;
4094 struct st_partstat *STps;
4095 struct st_buffer *buffer;
b98c52b5 4096 int i, error;
1da177e4 4097 char *stp;
1da177e4
LT
4098
4099 if (SDp->type != TYPE_TAPE)
4100 return -ENODEV;
4101 if ((stp = st_incompatible(SDp))) {
3bf743e7 4102 sdev_printk(KERN_INFO, SDp, "Found incompatible tape\n");
b30d8bca
HR
4103 sdev_printk(KERN_INFO, SDp,
4104 "st: The suggested driver is %s.\n", stp);
1da177e4
LT
4105 return -ENODEV;
4106 }
4107
8a78362c 4108 i = queue_max_segments(SDp->request_queue);
1da177e4
LT
4109 if (st_max_sg_segs < i)
4110 i = st_max_sg_segs;
f409d6cc 4111 buffer = new_tape_buffer((SDp->host)->unchecked_isa_dma, i);
1da177e4 4112 if (buffer == NULL) {
b30d8bca
HR
4113 sdev_printk(KERN_ERR, SDp,
4114 "st: Can't allocate new tape buffer. "
4115 "Device not attached.\n");
1da177e4
LT
4116 goto out;
4117 }
4118
4119 disk = alloc_disk(1);
4120 if (!disk) {
b30d8bca
HR
4121 sdev_printk(KERN_ERR, SDp,
4122 "st: out of memory. Device not attached.\n");
1da177e4
LT
4123 goto out_buffer_free;
4124 }
4125
24669f75 4126 tpnt = kzalloc(sizeof(struct scsi_tape), GFP_ATOMIC);
1da177e4 4127 if (tpnt == NULL) {
b30d8bca
HR
4128 sdev_printk(KERN_ERR, SDp,
4129 "st: Can't allocate device descriptor.\n");
1da177e4
LT
4130 goto out_put_disk;
4131 }
f03a5670 4132 kref_init(&tpnt->kref);
1da177e4 4133 tpnt->disk = disk;
1da177e4
LT
4134 disk->private_data = &tpnt->driver;
4135 disk->queue = SDp->request_queue;
2b5bebcc
JL
4136 /* SCSI tape doesn't register this gendisk via add_disk(). Manually
4137 * take queue reference that release_disk() expects. */
4138 if (!blk_get_queue(disk->queue))
4139 goto out_put_disk;
1da177e4 4140 tpnt->driver = &st_template;
1da177e4
LT
4141
4142 tpnt->device = SDp;
4143 if (SDp->scsi_level <= 2)
4144 tpnt->tape_type = MT_ISSCSI1;
4145 else
4146 tpnt->tape_type = MT_ISSCSI2;
4147
4148 tpnt->buffer = buffer;
f03a5670 4149 tpnt->buffer->last_SRpnt = NULL;
1da177e4
LT
4150
4151 tpnt->inited = 0;
4152 tpnt->dirty = 0;
4153 tpnt->in_use = 0;
4154 tpnt->drv_buffer = 1; /* Try buffering if no mode sense */
4155 tpnt->restr_dma = (SDp->host)->unchecked_isa_dma;
4156 tpnt->use_pf = (SDp->scsi_level >= SCSI_2);
4157 tpnt->density = 0;
4158 tpnt->do_auto_lock = ST_AUTO_LOCK;
4159 tpnt->can_bsr = (SDp->scsi_level > 2 ? 1 : ST_IN_FILE_POS); /* BSR mandatory in SCSI3 */
4160 tpnt->can_partitions = 0;
4161 tpnt->two_fm = ST_TWO_FM;
4162 tpnt->fast_mteom = ST_FAST_MTEOM;
4163 tpnt->scsi2_logical = ST_SCSI2LOGICAL;
40f6b36c 4164 tpnt->sili = ST_SILI;
1da177e4 4165 tpnt->immediate = ST_NOWAIT;
c743e44f 4166 tpnt->immediate_filemark = 0;
1da177e4
LT
4167 tpnt->default_drvbuffer = 0xff; /* No forced buffering */
4168 tpnt->partition = 0;
4169 tpnt->new_partition = 0;
4170 tpnt->nbr_partitions = 0;
a02488ed 4171 blk_queue_rq_timeout(tpnt->device->request_queue, ST_TIMEOUT);
1da177e4
LT
4172 tpnt->long_timeout = ST_LONG_TIMEOUT;
4173 tpnt->try_dio = try_direct_io && !SDp->host->unchecked_isa_dma;
4174
1da177e4
LT
4175 for (i = 0; i < ST_NBR_MODES; i++) {
4176 STm = &(tpnt->modes[i]);
4177 STm->defined = 0;
4178 STm->sysv = ST_SYSV;
4179 STm->defaults_for_writes = 0;
4180 STm->do_async_writes = ST_ASYNC_WRITES;
4181 STm->do_buffer_writes = ST_BUFFER_WRITES;
4182 STm->do_read_ahead = ST_READ_AHEAD;
4183 STm->default_compression = ST_DONT_TOUCH;
4184 STm->default_blksize = (-1); /* No forced size */
4185 STm->default_density = (-1); /* No forced density */
6c648d95 4186 STm->tape = tpnt;
1da177e4
LT
4187 }
4188
4189 for (i = 0; i < ST_NBR_PARTITIONS; i++) {
4190 STps = &(tpnt->ps[i]);
4191 STps->rw = ST_IDLE;
4192 STps->eof = ST_NOEOF;
4193 STps->at_sm = 0;
4194 STps->last_block_valid = 0;
4195 STps->drv_block = (-1);
4196 STps->drv_file = (-1);
4197 }
4198
4199 tpnt->current_mode = 0;
4200 tpnt->modes[0].defined = 1;
4201
4202 tpnt->density_changed = tpnt->compression_changed =
4203 tpnt->blksize_changed = 0;
28f85009 4204 mutex_init(&tpnt->lock);
1da177e4 4205
b98c52b5 4206 idr_preload(GFP_KERNEL);
6c648d95 4207 spin_lock(&st_index_lock);
b98c52b5 4208 error = idr_alloc(&st_index_idr, tpnt, 0, ST_MAX_TAPES + 1, GFP_NOWAIT);
6c648d95 4209 spin_unlock(&st_index_lock);
b98c52b5
TH
4210 idr_preload_end();
4211 if (error < 0) {
6c648d95 4212 pr_warn("st: idr allocation failed: %d\n", error);
2b5bebcc 4213 goto out_put_queue;
6c648d95 4214 }
b98c52b5
TH
4215 tpnt->index = error;
4216 sprintf(disk->disk_name, "st%d", tpnt->index);
6c648d95
JM
4217
4218 dev_set_drvdata(dev, tpnt);
1da177e4 4219
1da177e4 4220
26898afd
JM
4221 error = create_cdevs(tpnt);
4222 if (error)
4223 goto out_remove_devs;
46a243f7 4224 scsi_autopm_put_device(SDp);
1da177e4 4225
42252854 4226 sdev_printk(KERN_NOTICE, SDp,
8b1ea24c 4227 "Attached scsi tape %s\n", tape_name(tpnt));
42252854
KM
4228 sdev_printk(KERN_INFO, SDp, "%s: try direct i/o: %s (alignment %d B)\n",
4229 tape_name(tpnt), tpnt->try_dio ? "yes" : "no",
4230 queue_dma_alignment(SDp->request_queue) + 1);
1da177e4
LT
4231
4232 return 0;
4233
26898afd
JM
4234out_remove_devs:
4235 remove_cdevs(tpnt);
6c648d95 4236 spin_lock(&st_index_lock);
b98c52b5 4237 idr_remove(&st_index_idr, tpnt->index);
6c648d95 4238 spin_unlock(&st_index_lock);
2b5bebcc
JL
4239out_put_queue:
4240 blk_put_queue(disk->queue);
1da177e4
LT
4241out_put_disk:
4242 put_disk(disk);
c9475cb0 4243 kfree(tpnt);
1da177e4
LT
4244out_buffer_free:
4245 kfree(buffer);
4246out:
4247 return -ENODEV;
4248};
4249
4250
4251static int st_remove(struct device *dev)
4252{
6c648d95 4253 struct scsi_tape *tpnt = dev_get_drvdata(dev);
6c648d95
JM
4254 int index = tpnt->index;
4255
4256 scsi_autopm_get_device(to_scsi_device(dev));
26898afd 4257 remove_cdevs(tpnt);
1da177e4 4258
6c648d95
JM
4259 mutex_lock(&st_ref_mutex);
4260 kref_put(&tpnt->kref, scsi_tape_release);
4261 mutex_unlock(&st_ref_mutex);
4262 spin_lock(&st_index_lock);
4263 idr_remove(&st_index_idr, index);
4264 spin_unlock(&st_index_lock);
1da177e4
LT
4265 return 0;
4266}
4267
f03a5670
KM
4268/**
4269 * scsi_tape_release - Called to free the Scsi_Tape structure
4270 * @kref: pointer to embedded kref
4271 *
0b950672 4272 * st_ref_mutex must be held entering this routine. Because it is
f03a5670
KM
4273 * called on last put, you should always use the scsi_tape_get()
4274 * scsi_tape_put() helpers which manipulate the semaphore directly
4275 * and never do a direct kref_put().
4276 **/
4277static void scsi_tape_release(struct kref *kref)
4278{
4279 struct scsi_tape *tpnt = to_scsi_tape(kref);
4280 struct gendisk *disk = tpnt->disk;
4281
4282 tpnt->device = NULL;
4283
4284 if (tpnt->buffer) {
f03a5670 4285 normalize_buffer(tpnt->buffer);
d0e1ae31 4286 kfree(tpnt->buffer->reserved_pages);
f03a5670
KM
4287 kfree(tpnt->buffer);
4288 }
4289
4290 disk->private_data = NULL;
4291 put_disk(disk);
4292 kfree(tpnt);
4293 return;
4294}
4295
af23782b
JM
4296static struct class st_sysfs_class = {
4297 .name = "scsi_tape",
c69c6be5 4298 .dev_groups = st_dev_groups,
af23782b
JM
4299};
4300
1da177e4
LT
4301static int __init init_st(void)
4302{
13026a6b
JG
4303 int err;
4304
1da177e4
LT
4305 validate_options();
4306
13026a6b 4307 printk(KERN_INFO "st: Version %s, fixed bufsize %d, s/g segs %d\n",
1da177e4
LT
4308 verstr, st_fixed_buffer_size, st_max_sg_segs);
4309
af23782b
JM
4310 err = class_register(&st_sysfs_class);
4311 if (err) {
4312 pr_err("Unable register sysfs class for SCSI tapes\n");
4313 return err;
1da177e4
LT
4314 }
4315
13026a6b
JG
4316 err = register_chrdev_region(MKDEV(SCSI_TAPE_MAJOR, 0),
4317 ST_MAX_TAPE_ENTRIES, "st");
4318 if (err) {
4319 printk(KERN_ERR "Unable to get major %d for SCSI tapes\n",
4320 SCSI_TAPE_MAJOR);
4321 goto err_class;
1da177e4
LT
4322 }
4323
13026a6b
JG
4324 err = scsi_register_driver(&st_template.gendrv);
4325 if (err)
4326 goto err_chrdev;
4327
405ae7d3 4328 err = do_create_sysfs_files();
13026a6b
JG
4329 if (err)
4330 goto err_scsidrv;
4331
4332 return 0;
4333
4334err_scsidrv:
4335 scsi_unregister_driver(&st_template.gendrv);
4336err_chrdev:
4337 unregister_chrdev_region(MKDEV(SCSI_TAPE_MAJOR, 0),
4338 ST_MAX_TAPE_ENTRIES);
4339err_class:
af23782b 4340 class_unregister(&st_sysfs_class);
13026a6b 4341 return err;
1da177e4
LT
4342}
4343
4344static void __exit exit_st(void)
4345{
405ae7d3 4346 do_remove_sysfs_files();
1da177e4
LT
4347 scsi_unregister_driver(&st_template.gendrv);
4348 unregister_chrdev_region(MKDEV(SCSI_TAPE_MAJOR, 0),
4349 ST_MAX_TAPE_ENTRIES);
af23782b 4350 class_unregister(&st_sysfs_class);
1da177e4
LT
4351 printk(KERN_INFO "st: Unloaded.\n");
4352}
4353
4354module_init(init_st);
4355module_exit(exit_st);
4356
4357
4358/* The sysfs driver interface. Read-only at the moment */
4359static ssize_t st_try_direct_io_show(struct device_driver *ddp, char *buf)
4360{
4361 return snprintf(buf, PAGE_SIZE, "%d\n", try_direct_io);
4362}
4363static DRIVER_ATTR(try_direct_io, S_IRUGO, st_try_direct_io_show, NULL);
4364
4365static ssize_t st_fixed_buffer_size_show(struct device_driver *ddp, char *buf)
4366{
4367 return snprintf(buf, PAGE_SIZE, "%d\n", st_fixed_buffer_size);
4368}
4369static DRIVER_ATTR(fixed_buffer_size, S_IRUGO, st_fixed_buffer_size_show, NULL);
4370
4371static ssize_t st_max_sg_segs_show(struct device_driver *ddp, char *buf)
4372{
4373 return snprintf(buf, PAGE_SIZE, "%d\n", st_max_sg_segs);
4374}
4375static DRIVER_ATTR(max_sg_segs, S_IRUGO, st_max_sg_segs_show, NULL);
4376
4377static ssize_t st_version_show(struct device_driver *ddd, char *buf)
4378{
4379 return snprintf(buf, PAGE_SIZE, "[%s]\n", verstr);
4380}
4381static DRIVER_ATTR(version, S_IRUGO, st_version_show, NULL);
4382
405ae7d3 4383static int do_create_sysfs_files(void)
1da177e4 4384{
405ae7d3 4385 struct device_driver *sysfs = &st_template.gendrv;
13026a6b
JG
4386 int err;
4387
405ae7d3 4388 err = driver_create_file(sysfs, &driver_attr_try_direct_io);
13026a6b
JG
4389 if (err)
4390 return err;
405ae7d3 4391 err = driver_create_file(sysfs, &driver_attr_fixed_buffer_size);
13026a6b
JG
4392 if (err)
4393 goto err_try_direct_io;
405ae7d3 4394 err = driver_create_file(sysfs, &driver_attr_max_sg_segs);
13026a6b
JG
4395 if (err)
4396 goto err_attr_fixed_buf;
405ae7d3 4397 err = driver_create_file(sysfs, &driver_attr_version);
13026a6b
JG
4398 if (err)
4399 goto err_attr_max_sg;
1da177e4 4400
13026a6b
JG
4401 return 0;
4402
4403err_attr_max_sg:
405ae7d3 4404 driver_remove_file(sysfs, &driver_attr_max_sg_segs);
13026a6b 4405err_attr_fixed_buf:
405ae7d3 4406 driver_remove_file(sysfs, &driver_attr_fixed_buffer_size);
13026a6b 4407err_try_direct_io:
405ae7d3 4408 driver_remove_file(sysfs, &driver_attr_try_direct_io);
13026a6b 4409 return err;
1da177e4
LT
4410}
4411
405ae7d3 4412static void do_remove_sysfs_files(void)
1da177e4 4413{
405ae7d3 4414 struct device_driver *sysfs = &st_template.gendrv;
1da177e4 4415
405ae7d3
RD
4416 driver_remove_file(sysfs, &driver_attr_version);
4417 driver_remove_file(sysfs, &driver_attr_max_sg_segs);
4418 driver_remove_file(sysfs, &driver_attr_fixed_buffer_size);
4419 driver_remove_file(sysfs, &driver_attr_try_direct_io);
1da177e4
LT
4420}
4421
1da177e4 4422/* The sysfs simple class interface */
ee959b00 4423static ssize_t
af23782b 4424defined_show(struct device *dev, struct device_attribute *attr, char *buf)
1da177e4 4425{
7d15d6a4 4426 struct st_modedef *STm = dev_get_drvdata(dev);
1da177e4
LT
4427 ssize_t l = 0;
4428
4429 l = snprintf(buf, PAGE_SIZE, "%d\n", STm->defined);
4430 return l;
4431}
c69c6be5 4432static DEVICE_ATTR_RO(defined);
1da177e4 4433
ee959b00 4434static ssize_t
af23782b
JM
4435default_blksize_show(struct device *dev, struct device_attribute *attr,
4436 char *buf)
1da177e4 4437{
7d15d6a4 4438 struct st_modedef *STm = dev_get_drvdata(dev);
1da177e4
LT
4439 ssize_t l = 0;
4440
4441 l = snprintf(buf, PAGE_SIZE, "%d\n", STm->default_blksize);
4442 return l;
4443}
c69c6be5 4444static DEVICE_ATTR_RO(default_blksize);
1da177e4 4445
ee959b00 4446static ssize_t
af23782b
JM
4447default_density_show(struct device *dev, struct device_attribute *attr,
4448 char *buf)
1da177e4 4449{
7d15d6a4 4450 struct st_modedef *STm = dev_get_drvdata(dev);
1da177e4
LT
4451 ssize_t l = 0;
4452 char *fmt;
4453
4454 fmt = STm->default_density >= 0 ? "0x%02x\n" : "%d\n";
4455 l = snprintf(buf, PAGE_SIZE, fmt, STm->default_density);
4456 return l;
4457}
c69c6be5 4458static DEVICE_ATTR_RO(default_density);
1da177e4 4459
ee959b00 4460static ssize_t
af23782b
JM
4461default_compression_show(struct device *dev, struct device_attribute *attr,
4462 char *buf)
1da177e4 4463{
7d15d6a4 4464 struct st_modedef *STm = dev_get_drvdata(dev);
1da177e4
LT
4465 ssize_t l = 0;
4466
4467 l = snprintf(buf, PAGE_SIZE, "%d\n", STm->default_compression - 1);
4468 return l;
4469}
c69c6be5 4470static DEVICE_ATTR_RO(default_compression);
1da177e4 4471
ee959b00 4472static ssize_t
af23782b 4473options_show(struct device *dev, struct device_attribute *attr, char *buf)
b174be02 4474{
7d15d6a4 4475 struct st_modedef *STm = dev_get_drvdata(dev);
6c648d95
JM
4476 struct scsi_tape *STp = STm->tape;
4477 int options;
b174be02
KM
4478 ssize_t l = 0;
4479
b174be02
KM
4480 options = STm->do_buffer_writes ? MT_ST_BUFFER_WRITES : 0;
4481 options |= STm->do_async_writes ? MT_ST_ASYNC_WRITES : 0;
4482 options |= STm->do_read_ahead ? MT_ST_READ_AHEAD : 0;
4483 DEB( options |= debugging ? MT_ST_DEBUGGING : 0 );
4484 options |= STp->two_fm ? MT_ST_TWO_FM : 0;
4485 options |= STp->fast_mteom ? MT_ST_FAST_MTEOM : 0;
4486 options |= STm->defaults_for_writes ? MT_ST_DEF_WRITES : 0;
4487 options |= STp->can_bsr ? MT_ST_CAN_BSR : 0;
4488 options |= STp->omit_blklims ? MT_ST_NO_BLKLIMS : 0;
4489 options |= STp->can_partitions ? MT_ST_CAN_PARTITIONS : 0;
4490 options |= STp->scsi2_logical ? MT_ST_SCSI2LOGICAL : 0;
4491 options |= STm->sysv ? MT_ST_SYSV : 0;
4492 options |= STp->immediate ? MT_ST_NOWAIT : 0;
c743e44f 4493 options |= STp->immediate_filemark ? MT_ST_NOWAIT_EOF : 0;
b174be02
KM
4494 options |= STp->sili ? MT_ST_SILI : 0;
4495
4496 l = snprintf(buf, PAGE_SIZE, "0x%08x\n", options);
4497 return l;
4498}
c69c6be5
GKH
4499static DEVICE_ATTR_RO(options);
4500
4501static struct attribute *st_dev_attrs[] = {
4502 &dev_attr_defined.attr,
4503 &dev_attr_default_blksize.attr,
4504 &dev_attr_default_density.attr,
4505 &dev_attr_default_compression.attr,
4506 &dev_attr_options.attr,
4507 NULL,
af23782b 4508};
c69c6be5 4509ATTRIBUTE_GROUPS(st_dev);
b174be02 4510
1da177e4 4511/* The following functions may be useful for a larger audience. */
6620742f
FT
4512static int sgl_map_user_pages(struct st_buffer *STbp,
4513 const unsigned int max_pages, unsigned long uaddr,
4514 size_t count, int rw)
1da177e4 4515{
07542b83
JB
4516 unsigned long end = (uaddr + count + PAGE_SIZE - 1) >> PAGE_SHIFT;
4517 unsigned long start = uaddr >> PAGE_SHIFT;
4518 const int nr_pages = end - start;
1da177e4 4519 int res, i, j;
1da177e4 4520 struct page **pages;
6620742f 4521 struct rq_map_data *mdata = &STbp->map_data;
1da177e4 4522
1da177e4
LT
4523 /* User attempted Overflow! */
4524 if ((uaddr + count) < uaddr)
4525 return -EINVAL;
4526
4527 /* Too big */
4528 if (nr_pages > max_pages)
4529 return -ENOMEM;
4530
4531 /* Hmm? */
4532 if (count == 0)
4533 return 0;
4534
4535 if ((pages = kmalloc(max_pages * sizeof(*pages), GFP_KERNEL)) == NULL)
4536 return -ENOMEM;
4537
4538 /* Try to fault in all of the necessary pages */
4539 down_read(&current->mm->mmap_sem);
4540 /* rw==READ means read from drive, write into memory area */
4541 res = get_user_pages(
4542 current,
4543 current->mm,
4544 uaddr,
4545 nr_pages,
4546 rw == READ,
4547 0, /* don't force */
4548 pages,
4549 NULL);
4550 up_read(&current->mm->mmap_sem);
4551
4552 /* Errors and no page mapped should return here */
4553 if (res < nr_pages)
4554 goto out_unmap;
4555
4556 for (i=0; i < nr_pages; i++) {
4557 /* FIXME: flush superflous for rw==READ,
4558 * probably wrong function for rw==WRITE
4559 */
4560 flush_dcache_page(pages[i]);
4561 }
4562
6620742f 4563 mdata->offset = uaddr & ~PAGE_MASK;
6620742f 4564 STbp->mapped_pages = pages;
1da177e4 4565
1da177e4 4566 return nr_pages;
1da177e4
LT
4567 out_unmap:
4568 if (res > 0) {
4569 for (j=0; j < res; j++)
4570 page_cache_release(pages[j]);
6bc733e9 4571 res = 0;
1da177e4
LT
4572 }
4573 kfree(pages);
4574 return res;
4575}
4576
4577
4578/* And unmap them... */
6620742f
FT
4579static int sgl_unmap_user_pages(struct st_buffer *STbp,
4580 const unsigned int nr_pages, int dirtied)
1da177e4
LT
4581{
4582 int i;
4583
4584 for (i=0; i < nr_pages; i++) {
6620742f 4585 struct page *page = STbp->mapped_pages[i];
b5810039 4586
b5810039
NP
4587 if (dirtied)
4588 SetPageDirty(page);
1da177e4
LT
4589 /* FIXME: cache flush missing for rw==READ
4590 * FIXME: call the correct reference counting function
4591 */
b5810039 4592 page_cache_release(page);
1da177e4 4593 }
6620742f
FT
4594 kfree(STbp->mapped_pages);
4595 STbp->mapped_pages = NULL;
1da177e4
LT
4596
4597 return 0;
4598}