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