2 * IDE ATAPI streaming tape driver.
4 * Copyright (C) 1995-1999 Gadi Oxman <gadio@netvision.net.il>
5 * Copyright (C) 2003-2005 Bartlomiej Zolnierkiewicz
7 * This driver was constructed as a student project in the software laboratory
8 * of the faculty of electrical engineering in the Technion - Israel's
9 * Institute Of Technology, with the guide of Avner Lottem and Dr. Ilana David.
11 * It is hereby placed under the terms of the GNU general public license.
12 * (See linux/COPYING).
14 * For a historical changelog see
15 * Documentation/ide/ChangeLog.ide-tape.1995-2002
18 #define DRV_NAME "ide-tape"
20 #define IDETAPE_VERSION "1.20"
22 #include <linux/module.h>
23 #include <linux/types.h>
24 #include <linux/string.h>
25 #include <linux/kernel.h>
26 #include <linux/delay.h>
27 #include <linux/timer.h>
29 #include <linux/interrupt.h>
30 #include <linux/jiffies.h>
31 #include <linux/major.h>
32 #include <linux/errno.h>
33 #include <linux/genhd.h>
34 #include <linux/slab.h>
35 #include <linux/pci.h>
36 #include <linux/ide.h>
37 #include <linux/smp_lock.h>
38 #include <linux/completion.h>
39 #include <linux/bitops.h>
40 #include <linux/mutex.h>
41 #include <scsi/scsi.h>
43 #include <asm/byteorder.h>
44 #include <linux/irq.h>
45 #include <linux/uaccess.h>
47 #include <asm/unaligned.h>
48 #include <linux/mtio.h>
51 /* output errors only */
53 /* output all sense key/asc */
55 /* info regarding all chrdev-related procedures */
56 DBG_CHRDEV
= (1 << 2),
57 /* all remaining procedures */
61 /* define to see debug info */
62 #define IDETAPE_DEBUG_LOG 0
65 #define debug_log(lvl, fmt, args...) \
67 if (tape->debug_mask & lvl) \
68 printk(KERN_INFO "ide-tape: " fmt, ## args); \
71 #define debug_log(lvl, fmt, args...) do {} while (0)
74 /**************************** Tunable parameters *****************************/
76 * After each failed packet command we issue a request sense command and retry
77 * the packet command IDETAPE_MAX_PC_RETRIES times.
79 * Setting IDETAPE_MAX_PC_RETRIES to 0 will disable retries.
81 #define IDETAPE_MAX_PC_RETRIES 3
84 * With each packet command, we allocate a buffer of IDETAPE_PC_BUFFER_SIZE
85 * bytes. This is used for several packet commands (Not for READ/WRITE commands)
87 #define IDETAPE_PC_BUFFER_SIZE 256
90 * Some drives (for example, Seagate STT3401A Travan) require a very long
91 * timeout, because they don't return an interrupt or clear their busy bit
92 * until after the command completes (even retension commands).
94 #define IDETAPE_WAIT_CMD (900*HZ)
97 * The following parameter is used to select the point in the internal tape fifo
98 * in which we will start to refill the buffer. Decreasing the following
99 * parameter will improve the system's latency and interactive response, while
100 * using a high value might improve system throughput.
102 #define IDETAPE_FIFO_THRESHOLD 2
105 * DSC polling parameters.
107 * Polling for DSC (a single bit in the status register) is a very important
108 * function in ide-tape. There are two cases in which we poll for DSC:
110 * 1. Before a read/write packet command, to ensure that we can transfer data
111 * from/to the tape's data buffers, without causing an actual media access.
112 * In case the tape is not ready yet, we take out our request from the device
113 * request queue, so that ide.c could service requests from the other device
114 * on the same interface in the meantime.
116 * 2. After the successful initialization of a "media access packet command",
117 * which is a command that can take a long time to complete (the interval can
118 * range from several seconds to even an hour). Again, we postpone our request
119 * in the middle to free the bus for the other device. The polling frequency
120 * here should be lower than the read/write frequency since those media access
121 * commands are slow. We start from a "fast" frequency - IDETAPE_DSC_MA_FAST
122 * (1 second), and if we don't receive DSC after IDETAPE_DSC_MA_THRESHOLD
123 * (5 min), we switch it to a lower frequency - IDETAPE_DSC_MA_SLOW (1 min).
125 * We also set a timeout for the timer, in case something goes wrong. The
126 * timeout should be longer then the maximum execution time of a tape operation.
130 #define IDETAPE_DSC_RW_MIN 5*HZ/100 /* 50 msec */
131 #define IDETAPE_DSC_RW_MAX 40*HZ/100 /* 400 msec */
132 #define IDETAPE_DSC_RW_TIMEOUT 2*60*HZ /* 2 minutes */
133 #define IDETAPE_DSC_MA_FAST 2*HZ /* 2 seconds */
134 #define IDETAPE_DSC_MA_THRESHOLD 5*60*HZ /* 5 minutes */
135 #define IDETAPE_DSC_MA_SLOW 30*HZ /* 30 seconds */
136 #define IDETAPE_DSC_MA_TIMEOUT 2*60*60*HZ /* 2 hours */
138 /*************************** End of tunable parameters ***********************/
140 /* tape directions */
142 IDETAPE_DIR_NONE
= (1 << 0),
143 IDETAPE_DIR_READ
= (1 << 1),
144 IDETAPE_DIR_WRITE
= (1 << 2),
150 struct idetape_bh
*b_reqnext
;
154 /* Tape door status */
155 #define DOOR_UNLOCKED 0
156 #define DOOR_LOCKED 1
157 #define DOOR_EXPLICITLY_LOCKED 2
159 /* Some defines for the SPACE command */
160 #define IDETAPE_SPACE_OVER_FILEMARK 1
161 #define IDETAPE_SPACE_TO_EOD 3
163 /* Some defines for the LOAD UNLOAD command */
164 #define IDETAPE_LU_LOAD_MASK 1
165 #define IDETAPE_LU_RETENSION_MASK 2
166 #define IDETAPE_LU_EOT_MASK 4
169 * Special requests for our block device strategy routine.
171 * In order to service a character device command, we add special requests to
172 * the tail of our block device request queue and wait for their completion.
176 REQ_IDETAPE_PC1
= (1 << 0), /* packet command (first stage) */
177 REQ_IDETAPE_PC2
= (1 << 1), /* packet command (second stage) */
178 REQ_IDETAPE_READ
= (1 << 2),
179 REQ_IDETAPE_WRITE
= (1 << 3),
182 /* Error codes returned in rq->errors to the higher part of the driver. */
183 #define IDETAPE_ERROR_GENERAL 101
184 #define IDETAPE_ERROR_FILEMARK 102
185 #define IDETAPE_ERROR_EOD 103
187 /* Structures related to the SELECT SENSE / MODE SENSE packet commands. */
188 #define IDETAPE_BLOCK_DESCRIPTOR 0
189 #define IDETAPE_CAPABILITIES_PAGE 0x2a
192 * Most of our global data which we need to save even as we leave the driver due
193 * to an interrupt or a timer event is stored in the struct defined below.
195 typedef struct ide_tape_obj
{
197 ide_driver_t
*driver
;
198 struct gendisk
*disk
;
202 * pc points to the current processed packet command.
204 * failed_pc points to the last failed packet command, or contains
205 * NULL if we do not need to retry any packet command. This is
206 * required since an additional packet command is needed before the
207 * retry, to get detailed information on what went wrong.
209 /* Current packet command */
210 struct ide_atapi_pc
*pc
;
211 /* Last failed packet command */
212 struct ide_atapi_pc
*failed_pc
;
213 /* used by REQ_IDETAPE_{READ,WRITE} requests */
214 struct ide_atapi_pc queued_pc
;
216 struct ide_atapi_pc request_sense_pc
;
217 struct request request_sense_rq
;
220 * DSC polling variables.
222 * While polling for DSC we use postponed_rq to postpone the current
223 * request so that ide.c will be able to service pending requests on the
224 * other device. Note that at most we will have only one DSC (usually
225 * data transfer) request in the device request queue.
227 struct request
*postponed_rq
;
228 /* The time in which we started polling for DSC */
229 unsigned long dsc_polling_start
;
230 /* Timer used to poll for dsc */
231 struct timer_list dsc_timer
;
232 /* Read/Write dsc polling frequency */
233 unsigned long best_dsc_rw_freq
;
234 unsigned long dsc_poll_freq
;
235 unsigned long dsc_timeout
;
237 /* Read position information */
240 unsigned int first_frame
;
242 /* Last error information */
243 u8 sense_key
, asc
, ascq
;
245 /* Character device operation */
249 /* Current character device data transfer direction */
252 /* tape block size, usually 512 or 1024 bytes */
253 unsigned short blk_size
;
256 /* Copy of the tape's Capabilities and Mechanical Page */
260 * Active data transfer request parameters.
262 * At most, there is only one ide-tape originated data transfer request
263 * in the device request queue. This allows ide.c to easily service
264 * requests from the other device when we postpone our active request.
267 /* Data buffer size chosen based on the tape's recommendation */
270 struct idetape_bh
*merge_bh
;
271 /* size of the merge buffer */
273 /* pointer to current buffer head within the merge buffer */
274 struct idetape_bh
*bh
;
278 int pages_per_buffer
;
279 /* Wasted space in each stage */
282 /* protects the ide-tape queue */
285 /* Measures average tape speed */
286 unsigned long avg_time
;
290 /* the door is currently locked */
292 /* the tape hardware is write protected */
294 /* the tape is write protected (hardware or opened as read-only) */
300 static DEFINE_MUTEX(idetape_ref_mutex
);
302 static struct class *idetape_sysfs_class
;
304 #define to_ide_tape(obj) container_of(obj, struct ide_tape_obj, kref)
306 #define ide_tape_g(disk) \
307 container_of((disk)->private_data, struct ide_tape_obj, driver)
309 static void ide_tape_release(struct kref
*);
311 static struct ide_tape_obj
*ide_tape_get(struct gendisk
*disk
)
313 struct ide_tape_obj
*tape
= NULL
;
315 mutex_lock(&idetape_ref_mutex
);
316 tape
= ide_tape_g(disk
);
318 if (ide_device_get(tape
->drive
))
321 kref_get(&tape
->kref
);
323 mutex_unlock(&idetape_ref_mutex
);
327 static void ide_tape_put(struct ide_tape_obj
*tape
)
329 ide_drive_t
*drive
= tape
->drive
;
331 mutex_lock(&idetape_ref_mutex
);
332 kref_put(&tape
->kref
, ide_tape_release
);
333 ide_device_put(drive
);
334 mutex_unlock(&idetape_ref_mutex
);
338 * The variables below are used for the character device interface. Additional
339 * state variables are defined in our ide_drive_t structure.
341 static struct ide_tape_obj
*idetape_devs
[MAX_HWIFS
* MAX_DRIVES
];
343 #define ide_tape_f(file) ((file)->private_data)
345 static struct ide_tape_obj
*ide_tape_chrdev_get(unsigned int i
)
347 struct ide_tape_obj
*tape
= NULL
;
349 mutex_lock(&idetape_ref_mutex
);
350 tape
= idetape_devs
[i
];
352 kref_get(&tape
->kref
);
353 mutex_unlock(&idetape_ref_mutex
);
357 static void idetape_input_buffers(ide_drive_t
*drive
, struct ide_atapi_pc
*pc
,
360 struct idetape_bh
*bh
= pc
->bh
;
365 printk(KERN_ERR
"ide-tape: bh == NULL in "
366 "idetape_input_buffers\n");
367 ide_pad_transfer(drive
, 0, bcount
);
371 (unsigned int)(bh
->b_size
- atomic_read(&bh
->b_count
)),
373 drive
->hwif
->tp_ops
->input_data(drive
, NULL
, bh
->b_data
+
374 atomic_read(&bh
->b_count
), count
);
376 atomic_add(count
, &bh
->b_count
);
377 if (atomic_read(&bh
->b_count
) == bh
->b_size
) {
380 atomic_set(&bh
->b_count
, 0);
386 static void idetape_output_buffers(ide_drive_t
*drive
, struct ide_atapi_pc
*pc
,
389 struct idetape_bh
*bh
= pc
->bh
;
394 printk(KERN_ERR
"ide-tape: bh == NULL in %s\n",
398 count
= min((unsigned int)pc
->b_count
, (unsigned int)bcount
);
399 drive
->hwif
->tp_ops
->output_data(drive
, NULL
, pc
->b_data
, count
);
402 pc
->b_count
-= count
;
407 pc
->b_data
= bh
->b_data
;
408 pc
->b_count
= atomic_read(&bh
->b_count
);
414 static void idetape_update_buffers(ide_drive_t
*drive
, struct ide_atapi_pc
*pc
)
416 struct idetape_bh
*bh
= pc
->bh
;
418 unsigned int bcount
= pc
->xferred
;
420 if (pc
->flags
& PC_FLAG_WRITING
)
424 printk(KERN_ERR
"ide-tape: bh == NULL in %s\n",
428 count
= min((unsigned int)bh
->b_size
, (unsigned int)bcount
);
429 atomic_set(&bh
->b_count
, count
);
430 if (atomic_read(&bh
->b_count
) == bh
->b_size
)
438 * called on each failed packet command retry to analyze the request sense. We
439 * currently do not utilize this information.
441 static void idetape_analyze_error(ide_drive_t
*drive
, u8
*sense
)
443 idetape_tape_t
*tape
= drive
->driver_data
;
444 struct ide_atapi_pc
*pc
= tape
->failed_pc
;
446 tape
->sense_key
= sense
[2] & 0xF;
447 tape
->asc
= sense
[12];
448 tape
->ascq
= sense
[13];
450 debug_log(DBG_ERR
, "pc = %x, sense key = %x, asc = %x, ascq = %x\n",
451 pc
->c
[0], tape
->sense_key
, tape
->asc
, tape
->ascq
);
453 /* Correct pc->xferred by asking the tape. */
454 if (pc
->flags
& PC_FLAG_DMA_ERROR
) {
455 pc
->xferred
= pc
->req_xfer
-
457 get_unaligned_be32(&sense
[3]);
458 idetape_update_buffers(drive
, pc
);
462 * If error was the result of a zero-length read or write command,
463 * with sense key=5, asc=0x22, ascq=0, let it slide. Some drives
464 * (i.e. Seagate STT3401A Travan) don't support 0-length read/writes.
466 if ((pc
->c
[0] == READ_6
|| pc
->c
[0] == WRITE_6
)
468 && pc
->c
[4] == 0 && pc
->c
[3] == 0 && pc
->c
[2] == 0) {
469 if (tape
->sense_key
== 5) {
470 /* don't report an error, everything's ok */
472 /* don't retry read/write */
473 pc
->flags
|= PC_FLAG_ABORT
;
476 if (pc
->c
[0] == READ_6
&& (sense
[2] & 0x80)) {
477 pc
->error
= IDETAPE_ERROR_FILEMARK
;
478 pc
->flags
|= PC_FLAG_ABORT
;
480 if (pc
->c
[0] == WRITE_6
) {
481 if ((sense
[2] & 0x40) || (tape
->sense_key
== 0xd
482 && tape
->asc
== 0x0 && tape
->ascq
== 0x2)) {
483 pc
->error
= IDETAPE_ERROR_EOD
;
484 pc
->flags
|= PC_FLAG_ABORT
;
487 if (pc
->c
[0] == READ_6
|| pc
->c
[0] == WRITE_6
) {
488 if (tape
->sense_key
== 8) {
489 pc
->error
= IDETAPE_ERROR_EOD
;
490 pc
->flags
|= PC_FLAG_ABORT
;
492 if (!(pc
->flags
& PC_FLAG_ABORT
) &&
494 pc
->retries
= IDETAPE_MAX_PC_RETRIES
+ 1;
498 /* Free data buffers completely. */
499 static void ide_tape_kfree_buffer(idetape_tape_t
*tape
)
501 struct idetape_bh
*prev_bh
, *bh
= tape
->merge_bh
;
504 u32 size
= bh
->b_size
;
507 unsigned int order
= fls(size
>> PAGE_SHIFT
)-1;
510 free_pages((unsigned long)bh
->b_data
, order
);
513 bh
->b_data
+= (1 << order
) * PAGE_SIZE
;
521 static int idetape_end_request(ide_drive_t
*drive
, int uptodate
, int nr_sects
)
523 struct request
*rq
= HWGROUP(drive
)->rq
;
524 idetape_tape_t
*tape
= drive
->driver_data
;
528 debug_log(DBG_PROCS
, "Enter %s\n", __func__
);
531 case 0: error
= IDETAPE_ERROR_GENERAL
; break;
532 case 1: error
= 0; break;
533 default: error
= uptodate
;
537 tape
->failed_pc
= NULL
;
539 if (!blk_special_request(rq
)) {
540 ide_end_request(drive
, uptodate
, nr_sects
);
544 spin_lock_irqsave(&tape
->lock
, flags
);
546 ide_end_drive_cmd(drive
, 0, 0);
548 spin_unlock_irqrestore(&tape
->lock
, flags
);
552 static void ide_tape_callback(ide_drive_t
*drive
)
554 idetape_tape_t
*tape
= drive
->driver_data
;
555 struct ide_atapi_pc
*pc
= tape
->pc
;
556 int uptodate
= pc
->error
? 0 : 1;
558 debug_log(DBG_PROCS
, "Enter %s\n", __func__
);
560 if (tape
->failed_pc
== pc
)
561 tape
->failed_pc
= NULL
;
563 if (pc
->c
[0] == REQUEST_SENSE
) {
565 idetape_analyze_error(drive
, pc
->buf
);
567 printk(KERN_ERR
"ide-tape: Error in REQUEST SENSE "
568 "itself - Aborting request!\n");
569 } else if (pc
->c
[0] == READ_6
|| pc
->c
[0] == WRITE_6
) {
570 struct request
*rq
= drive
->hwif
->hwgroup
->rq
;
571 int blocks
= pc
->xferred
/ tape
->blk_size
;
573 tape
->avg_size
+= blocks
* tape
->blk_size
;
575 if (time_after_eq(jiffies
, tape
->avg_time
+ HZ
)) {
576 tape
->avg_speed
= tape
->avg_size
* HZ
/
577 (jiffies
- tape
->avg_time
) / 1024;
579 tape
->avg_time
= jiffies
;
582 tape
->first_frame
+= blocks
;
583 rq
->current_nr_sectors
-= blocks
;
586 uptodate
= pc
->error
;
587 } else if (pc
->c
[0] == READ_POSITION
&& uptodate
) {
588 u8
*readpos
= tape
->pc
->buf
;
590 debug_log(DBG_SENSE
, "BOP - %s\n",
591 (readpos
[0] & 0x80) ? "Yes" : "No");
592 debug_log(DBG_SENSE
, "EOP - %s\n",
593 (readpos
[0] & 0x40) ? "Yes" : "No");
595 if (readpos
[0] & 0x4) {
596 printk(KERN_INFO
"ide-tape: Block location is unknown"
598 clear_bit(IDE_AFLAG_ADDRESS_VALID
, &drive
->atapi_flags
);
601 debug_log(DBG_SENSE
, "Block Location - %u\n",
602 be32_to_cpup((__be32
*)&readpos
[4]));
604 tape
->partition
= readpos
[1];
605 tape
->first_frame
= be32_to_cpup((__be32
*)&readpos
[4]);
606 set_bit(IDE_AFLAG_ADDRESS_VALID
, &drive
->atapi_flags
);
610 idetape_end_request(drive
, uptodate
, 0);
613 static void idetape_init_pc(struct ide_atapi_pc
*pc
)
615 memset(pc
->c
, 0, 12);
619 pc
->buf
= pc
->pc_buf
;
620 pc
->buf_size
= IDETAPE_PC_BUFFER_SIZE
;
625 static void idetape_create_request_sense_cmd(struct ide_atapi_pc
*pc
)
628 pc
->c
[0] = REQUEST_SENSE
;
634 * Generate a new packet command request in front of the request queue, before
635 * the current request, so that it will be processed immediately, on the next
636 * pass through the driver.
638 static void idetape_queue_pc_head(ide_drive_t
*drive
, struct ide_atapi_pc
*pc
,
641 struct ide_tape_obj
*tape
= drive
->driver_data
;
643 blk_rq_init(NULL
, rq
);
644 rq
->cmd_type
= REQ_TYPE_SPECIAL
;
645 rq
->cmd_flags
|= REQ_PREEMPT
;
646 rq
->buffer
= (char *) pc
;
647 rq
->rq_disk
= tape
->disk
;
648 memcpy(rq
->cmd
, pc
->c
, 12);
649 rq
->cmd
[13] = REQ_IDETAPE_PC1
;
650 ide_do_drive_cmd(drive
, rq
);
654 * idetape_retry_pc is called when an error was detected during the
655 * last packet command. We queue a request sense packet command in
656 * the head of the request list.
658 static void idetape_retry_pc(ide_drive_t
*drive
)
660 struct ide_tape_obj
*tape
= drive
->driver_data
;
661 struct request
*rq
= &tape
->request_sense_rq
;
662 struct ide_atapi_pc
*pc
= &tape
->request_sense_pc
;
664 (void)ide_read_error(drive
);
665 idetape_create_request_sense_cmd(pc
);
666 set_bit(IDE_AFLAG_IGNORE_DSC
, &drive
->atapi_flags
);
667 idetape_queue_pc_head(drive
, pc
, rq
);
671 * Postpone the current request so that ide.c will be able to service requests
672 * from another device on the same hwgroup while we are polling for DSC.
674 static void idetape_postpone_request(ide_drive_t
*drive
)
676 idetape_tape_t
*tape
= drive
->driver_data
;
678 debug_log(DBG_PROCS
, "Enter %s\n", __func__
);
680 tape
->postponed_rq
= HWGROUP(drive
)->rq
;
681 ide_stall_queue(drive
, tape
->dsc_poll_freq
);
684 static void ide_tape_handle_dsc(ide_drive_t
*drive
)
686 idetape_tape_t
*tape
= drive
->driver_data
;
688 /* Media access command */
689 tape
->dsc_polling_start
= jiffies
;
690 tape
->dsc_poll_freq
= IDETAPE_DSC_MA_FAST
;
691 tape
->dsc_timeout
= jiffies
+ IDETAPE_DSC_MA_TIMEOUT
;
692 /* Allow ide.c to handle other requests */
693 idetape_postpone_request(drive
);
696 static int ide_tape_io_buffers(ide_drive_t
*drive
, struct ide_atapi_pc
*pc
,
697 unsigned int bcount
, int write
)
700 idetape_output_buffers(drive
, pc
, bcount
);
702 idetape_input_buffers(drive
, pc
, bcount
);
708 * This is the usual interrupt handler which will be called during a packet
709 * command. We will transfer some of the data (as requested by the drive) and
710 * will re-point interrupt handler to us. When data transfer is finished, we
711 * will act according to the algorithm described before
714 static ide_startstop_t
idetape_pc_intr(ide_drive_t
*drive
)
716 idetape_tape_t
*tape
= drive
->driver_data
;
718 return ide_pc_intr(drive
, tape
->pc
, idetape_pc_intr
, IDETAPE_WAIT_CMD
,
719 NULL
, idetape_update_buffers
, idetape_retry_pc
,
720 ide_tape_handle_dsc
, ide_tape_io_buffers
);
724 * Packet Command Interface
726 * The current Packet Command is available in tape->pc, and will not change
727 * until we finish handling it. Each packet command is associated with a
728 * callback function that will be called when the command is finished.
730 * The handling will be done in three stages:
732 * 1. idetape_issue_pc will send the packet command to the drive, and will set
733 * the interrupt handler to idetape_pc_intr.
735 * 2. On each interrupt, idetape_pc_intr will be called. This step will be
736 * repeated until the device signals us that no more interrupts will be issued.
738 * 3. ATAPI Tape media access commands have immediate status with a delayed
739 * process. In case of a successful initiation of a media access packet command,
740 * the DSC bit will be set when the actual execution of the command is finished.
741 * Since the tape drive will not issue an interrupt, we have to poll for this
742 * event. In this case, we define the request as "low priority request" by
743 * setting rq_status to IDETAPE_RQ_POSTPONED, set a timer to poll for DSC and
746 * ide.c will then give higher priority to requests which originate from the
747 * other device, until will change rq_status to RQ_ACTIVE.
749 * 4. When the packet command is finished, it will be checked for errors.
751 * 5. In case an error was found, we queue a request sense packet command in
752 * front of the request queue and retry the operation up to
753 * IDETAPE_MAX_PC_RETRIES times.
755 * 6. In case no error was found, or we decided to give up and not to retry
756 * again, the callback function will be called and then we will handle the next
759 static ide_startstop_t
idetape_transfer_pc(ide_drive_t
*drive
)
761 idetape_tape_t
*tape
= drive
->driver_data
;
763 return ide_transfer_pc(drive
, tape
->pc
, idetape_pc_intr
,
764 IDETAPE_WAIT_CMD
, NULL
);
767 static ide_startstop_t
idetape_issue_pc(ide_drive_t
*drive
,
768 struct ide_atapi_pc
*pc
)
770 idetape_tape_t
*tape
= drive
->driver_data
;
772 if (tape
->pc
->c
[0] == REQUEST_SENSE
&&
773 pc
->c
[0] == REQUEST_SENSE
) {
774 printk(KERN_ERR
"ide-tape: possible ide-tape.c bug - "
775 "Two request sense in serial were issued\n");
778 if (tape
->failed_pc
== NULL
&& pc
->c
[0] != REQUEST_SENSE
)
779 tape
->failed_pc
= pc
;
780 /* Set the current packet command */
783 if (pc
->retries
> IDETAPE_MAX_PC_RETRIES
||
784 (pc
->flags
& PC_FLAG_ABORT
)) {
786 * We will "abort" retrying a packet command in case legitimate
787 * error code was received (crossing a filemark, or end of the
788 * media, for example).
790 if (!(pc
->flags
& PC_FLAG_ABORT
)) {
791 if (!(pc
->c
[0] == TEST_UNIT_READY
&&
792 tape
->sense_key
== 2 && tape
->asc
== 4 &&
793 (tape
->ascq
== 1 || tape
->ascq
== 8))) {
794 printk(KERN_ERR
"ide-tape: %s: I/O error, "
795 "pc = %2x, key = %2x, "
796 "asc = %2x, ascq = %2x\n",
797 tape
->name
, pc
->c
[0],
798 tape
->sense_key
, tape
->asc
,
802 pc
->error
= IDETAPE_ERROR_GENERAL
;
804 tape
->failed_pc
= NULL
;
805 drive
->pc_callback(drive
);
808 debug_log(DBG_SENSE
, "Retry #%d, cmd = %02X\n", pc
->retries
, pc
->c
[0]);
812 return ide_issue_pc(drive
, pc
, idetape_transfer_pc
,
813 IDETAPE_WAIT_CMD
, NULL
);
816 /* A mode sense command is used to "sense" tape parameters. */
817 static void idetape_create_mode_sense_cmd(struct ide_atapi_pc
*pc
, u8 page_code
)
820 pc
->c
[0] = MODE_SENSE
;
821 if (page_code
!= IDETAPE_BLOCK_DESCRIPTOR
)
822 /* DBD = 1 - Don't return block descriptors */
824 pc
->c
[2] = page_code
;
826 * Changed pc->c[3] to 0 (255 will at best return unused info).
828 * For SCSI this byte is defined as subpage instead of high byte
829 * of length and some IDE drives seem to interpret it this way
830 * and return an error when 255 is used.
833 /* We will just discard data in that case */
835 if (page_code
== IDETAPE_BLOCK_DESCRIPTOR
)
837 else if (page_code
== IDETAPE_CAPABILITIES_PAGE
)
843 static ide_startstop_t
idetape_media_access_finished(ide_drive_t
*drive
)
845 ide_hwif_t
*hwif
= drive
->hwif
;
846 idetape_tape_t
*tape
= drive
->driver_data
;
847 struct ide_atapi_pc
*pc
= tape
->pc
;
850 stat
= hwif
->tp_ops
->read_status(hwif
);
852 if (stat
& ATA_DSC
) {
853 if (stat
& ATA_ERR
) {
855 if (pc
->c
[0] != TEST_UNIT_READY
)
856 printk(KERN_ERR
"ide-tape: %s: I/O error, ",
858 /* Retry operation */
859 idetape_retry_pc(drive
);
864 pc
->error
= IDETAPE_ERROR_GENERAL
;
865 tape
->failed_pc
= NULL
;
867 drive
->pc_callback(drive
);
871 static void ide_tape_create_rw_cmd(idetape_tape_t
*tape
,
872 struct ide_atapi_pc
*pc
, struct request
*rq
,
875 struct idetape_bh
*bh
= (struct idetape_bh
*)rq
->special
;
876 unsigned int length
= rq
->current_nr_sectors
;
879 put_unaligned(cpu_to_be32(length
), (unsigned int *) &pc
->c
[1]);
883 pc
->buf_size
= length
* tape
->blk_size
;
884 pc
->req_xfer
= pc
->buf_size
;
885 if (pc
->req_xfer
== tape
->buffer_size
)
886 pc
->flags
|= PC_FLAG_DMA_OK
;
888 if (opcode
== READ_6
) {
890 atomic_set(&bh
->b_count
, 0);
891 } else if (opcode
== WRITE_6
) {
893 pc
->flags
|= PC_FLAG_WRITING
;
894 pc
->b_data
= bh
->b_data
;
895 pc
->b_count
= atomic_read(&bh
->b_count
);
898 memcpy(rq
->cmd
, pc
->c
, 12);
901 static ide_startstop_t
idetape_do_request(ide_drive_t
*drive
,
902 struct request
*rq
, sector_t block
)
904 ide_hwif_t
*hwif
= drive
->hwif
;
905 idetape_tape_t
*tape
= drive
->driver_data
;
906 struct ide_atapi_pc
*pc
= NULL
;
907 struct request
*postponed_rq
= tape
->postponed_rq
;
910 debug_log(DBG_SENSE
, "sector: %llu, nr_sectors: %lu,"
911 " current_nr_sectors: %u\n",
912 (unsigned long long)rq
->sector
, rq
->nr_sectors
,
913 rq
->current_nr_sectors
);
915 if (!blk_special_request(rq
)) {
916 /* We do not support buffer cache originated requests. */
917 printk(KERN_NOTICE
"ide-tape: %s: Unsupported request in "
918 "request queue (%d)\n", drive
->name
, rq
->cmd_type
);
919 ide_end_request(drive
, 0, 0);
923 /* Retry a failed packet command */
924 if (tape
->failed_pc
&& tape
->pc
->c
[0] == REQUEST_SENSE
) {
925 pc
= tape
->failed_pc
;
929 if (postponed_rq
!= NULL
)
930 if (rq
!= postponed_rq
) {
931 printk(KERN_ERR
"ide-tape: ide-tape.c bug - "
932 "Two DSC requests were queued\n");
933 idetape_end_request(drive
, 0, 0);
937 tape
->postponed_rq
= NULL
;
940 * If the tape is still busy, postpone our request and service
941 * the other device meanwhile.
943 stat
= hwif
->tp_ops
->read_status(hwif
);
945 if (!drive
->dsc_overlap
&& !(rq
->cmd
[13] & REQ_IDETAPE_PC2
))
946 set_bit(IDE_AFLAG_IGNORE_DSC
, &drive
->atapi_flags
);
948 if (drive
->post_reset
== 1) {
949 set_bit(IDE_AFLAG_IGNORE_DSC
, &drive
->atapi_flags
);
950 drive
->post_reset
= 0;
953 if (!test_and_clear_bit(IDE_AFLAG_IGNORE_DSC
, &drive
->atapi_flags
) &&
954 (stat
& ATA_DSC
) == 0) {
955 if (postponed_rq
== NULL
) {
956 tape
->dsc_polling_start
= jiffies
;
957 tape
->dsc_poll_freq
= tape
->best_dsc_rw_freq
;
958 tape
->dsc_timeout
= jiffies
+ IDETAPE_DSC_RW_TIMEOUT
;
959 } else if (time_after(jiffies
, tape
->dsc_timeout
)) {
960 printk(KERN_ERR
"ide-tape: %s: DSC timeout\n",
962 if (rq
->cmd
[13] & REQ_IDETAPE_PC2
) {
963 idetape_media_access_finished(drive
);
966 return ide_do_reset(drive
);
968 } else if (time_after(jiffies
,
969 tape
->dsc_polling_start
+
970 IDETAPE_DSC_MA_THRESHOLD
))
971 tape
->dsc_poll_freq
= IDETAPE_DSC_MA_SLOW
;
972 idetape_postpone_request(drive
);
975 if (rq
->cmd
[13] & REQ_IDETAPE_READ
) {
976 pc
= &tape
->queued_pc
;
977 ide_tape_create_rw_cmd(tape
, pc
, rq
, READ_6
);
980 if (rq
->cmd
[13] & REQ_IDETAPE_WRITE
) {
981 pc
= &tape
->queued_pc
;
982 ide_tape_create_rw_cmd(tape
, pc
, rq
, WRITE_6
);
985 if (rq
->cmd
[13] & REQ_IDETAPE_PC1
) {
986 pc
= (struct ide_atapi_pc
*) rq
->buffer
;
987 rq
->cmd
[13] &= ~(REQ_IDETAPE_PC1
);
988 rq
->cmd
[13] |= REQ_IDETAPE_PC2
;
991 if (rq
->cmd
[13] & REQ_IDETAPE_PC2
) {
992 idetape_media_access_finished(drive
);
998 return idetape_issue_pc(drive
, pc
);
1002 * The function below uses __get_free_pages to allocate a data buffer of size
1003 * tape->buffer_size (or a bit more). We attempt to combine sequential pages as
1006 * It returns a pointer to the newly allocated buffer, or NULL in case of
1009 static struct idetape_bh
*ide_tape_kmalloc_buffer(idetape_tape_t
*tape
,
1010 int full
, int clear
)
1012 struct idetape_bh
*prev_bh
, *bh
, *merge_bh
;
1013 int pages
= tape
->pages_per_buffer
;
1014 unsigned int order
, b_allocd
;
1015 char *b_data
= NULL
;
1017 merge_bh
= kmalloc(sizeof(struct idetape_bh
), GFP_KERNEL
);
1022 order
= fls(pages
) - 1;
1023 bh
->b_data
= (char *) __get_free_pages(GFP_KERNEL
, order
);
1026 b_allocd
= (1 << order
) * PAGE_SIZE
;
1030 memset(bh
->b_data
, 0, b_allocd
);
1031 bh
->b_reqnext
= NULL
;
1032 bh
->b_size
= b_allocd
;
1033 atomic_set(&bh
->b_count
, full
? bh
->b_size
: 0);
1036 order
= fls(pages
) - 1;
1037 b_data
= (char *) __get_free_pages(GFP_KERNEL
, order
);
1040 b_allocd
= (1 << order
) * PAGE_SIZE
;
1043 memset(b_data
, 0, b_allocd
);
1045 /* newly allocated page frames below buffer header or ...*/
1046 if (bh
->b_data
== b_data
+ b_allocd
) {
1047 bh
->b_size
+= b_allocd
;
1048 bh
->b_data
-= b_allocd
;
1050 atomic_add(b_allocd
, &bh
->b_count
);
1053 /* they are above the header */
1054 if (b_data
== bh
->b_data
+ bh
->b_size
) {
1055 bh
->b_size
+= b_allocd
;
1057 atomic_add(b_allocd
, &bh
->b_count
);
1061 bh
= kmalloc(sizeof(struct idetape_bh
), GFP_KERNEL
);
1063 free_pages((unsigned long) b_data
, order
);
1066 bh
->b_reqnext
= NULL
;
1067 bh
->b_data
= b_data
;
1068 bh
->b_size
= b_allocd
;
1069 atomic_set(&bh
->b_count
, full
? bh
->b_size
: 0);
1070 prev_bh
->b_reqnext
= bh
;
1075 bh
->b_size
-= tape
->excess_bh_size
;
1077 atomic_sub(tape
->excess_bh_size
, &bh
->b_count
);
1080 ide_tape_kfree_buffer(tape
);
1084 static int idetape_copy_stage_from_user(idetape_tape_t
*tape
,
1085 const char __user
*buf
, int n
)
1087 struct idetape_bh
*bh
= tape
->bh
;
1093 printk(KERN_ERR
"ide-tape: bh == NULL in %s\n",
1097 count
= min((unsigned int)
1098 (bh
->b_size
- atomic_read(&bh
->b_count
)),
1100 if (copy_from_user(bh
->b_data
+ atomic_read(&bh
->b_count
), buf
,
1104 atomic_add(count
, &bh
->b_count
);
1106 if (atomic_read(&bh
->b_count
) == bh
->b_size
) {
1109 atomic_set(&bh
->b_count
, 0);
1116 static int idetape_copy_stage_to_user(idetape_tape_t
*tape
, char __user
*buf
,
1119 struct idetape_bh
*bh
= tape
->bh
;
1125 printk(KERN_ERR
"ide-tape: bh == NULL in %s\n",
1129 count
= min(tape
->b_count
, n
);
1130 if (copy_to_user(buf
, tape
->b_data
, count
))
1133 tape
->b_data
+= count
;
1134 tape
->b_count
-= count
;
1136 if (!tape
->b_count
) {
1140 tape
->b_data
= bh
->b_data
;
1141 tape
->b_count
= atomic_read(&bh
->b_count
);
1148 static void idetape_init_merge_buffer(idetape_tape_t
*tape
)
1150 struct idetape_bh
*bh
= tape
->merge_bh
;
1151 tape
->bh
= tape
->merge_bh
;
1153 if (tape
->chrdev_dir
== IDETAPE_DIR_WRITE
)
1154 atomic_set(&bh
->b_count
, 0);
1156 tape
->b_data
= bh
->b_data
;
1157 tape
->b_count
= atomic_read(&bh
->b_count
);
1162 * Write a filemark if write_filemark=1. Flush the device buffers without
1163 * writing a filemark otherwise.
1165 static void idetape_create_write_filemark_cmd(ide_drive_t
*drive
,
1166 struct ide_atapi_pc
*pc
, int write_filemark
)
1168 idetape_init_pc(pc
);
1169 pc
->c
[0] = WRITE_FILEMARKS
;
1170 pc
->c
[4] = write_filemark
;
1171 pc
->flags
|= PC_FLAG_WAIT_FOR_DSC
;
1174 static void idetape_create_test_unit_ready_cmd(struct ide_atapi_pc
*pc
)
1176 idetape_init_pc(pc
);
1177 pc
->c
[0] = TEST_UNIT_READY
;
1181 * We add a special packet command request to the tail of the request queue, and
1182 * wait for it to be serviced.
1184 static int idetape_queue_pc_tail(ide_drive_t
*drive
, struct ide_atapi_pc
*pc
)
1186 struct ide_tape_obj
*tape
= drive
->driver_data
;
1190 rq
= blk_get_request(drive
->queue
, READ
, __GFP_WAIT
);
1191 rq
->cmd_type
= REQ_TYPE_SPECIAL
;
1192 rq
->cmd
[13] = REQ_IDETAPE_PC1
;
1193 rq
->buffer
= (char *)pc
;
1194 memcpy(rq
->cmd
, pc
->c
, 12);
1195 error
= blk_execute_rq(drive
->queue
, tape
->disk
, rq
, 0);
1196 blk_put_request(rq
);
1200 static void idetape_create_load_unload_cmd(ide_drive_t
*drive
,
1201 struct ide_atapi_pc
*pc
, int cmd
)
1203 idetape_init_pc(pc
);
1204 pc
->c
[0] = START_STOP
;
1206 pc
->flags
|= PC_FLAG_WAIT_FOR_DSC
;
1209 static int idetape_wait_ready(ide_drive_t
*drive
, unsigned long timeout
)
1211 idetape_tape_t
*tape
= drive
->driver_data
;
1212 struct ide_atapi_pc pc
;
1213 int load_attempted
= 0;
1215 /* Wait for the tape to become ready */
1216 set_bit(IDE_AFLAG_MEDIUM_PRESENT
, &drive
->atapi_flags
);
1218 while (time_before(jiffies
, timeout
)) {
1219 idetape_create_test_unit_ready_cmd(&pc
);
1220 if (!idetape_queue_pc_tail(drive
, &pc
))
1222 if ((tape
->sense_key
== 2 && tape
->asc
== 4 && tape
->ascq
== 2)
1223 || (tape
->asc
== 0x3A)) {
1227 idetape_create_load_unload_cmd(drive
, &pc
,
1228 IDETAPE_LU_LOAD_MASK
);
1229 idetape_queue_pc_tail(drive
, &pc
);
1231 /* not about to be ready */
1232 } else if (!(tape
->sense_key
== 2 && tape
->asc
== 4 &&
1233 (tape
->ascq
== 1 || tape
->ascq
== 8)))
1240 static int idetape_flush_tape_buffers(ide_drive_t
*drive
)
1242 struct ide_atapi_pc pc
;
1245 idetape_create_write_filemark_cmd(drive
, &pc
, 0);
1246 rc
= idetape_queue_pc_tail(drive
, &pc
);
1249 idetape_wait_ready(drive
, 60 * 5 * HZ
);
1253 static void idetape_create_read_position_cmd(struct ide_atapi_pc
*pc
)
1255 idetape_init_pc(pc
);
1256 pc
->c
[0] = READ_POSITION
;
1260 static int idetape_read_position(ide_drive_t
*drive
)
1262 idetape_tape_t
*tape
= drive
->driver_data
;
1263 struct ide_atapi_pc pc
;
1266 debug_log(DBG_PROCS
, "Enter %s\n", __func__
);
1268 idetape_create_read_position_cmd(&pc
);
1269 if (idetape_queue_pc_tail(drive
, &pc
))
1271 position
= tape
->first_frame
;
1275 static void idetape_create_locate_cmd(ide_drive_t
*drive
,
1276 struct ide_atapi_pc
*pc
,
1277 unsigned int block
, u8 partition
, int skip
)
1279 idetape_init_pc(pc
);
1280 pc
->c
[0] = POSITION_TO_ELEMENT
;
1282 put_unaligned(cpu_to_be32(block
), (unsigned int *) &pc
->c
[3]);
1283 pc
->c
[8] = partition
;
1284 pc
->flags
|= PC_FLAG_WAIT_FOR_DSC
;
1287 static int idetape_create_prevent_cmd(ide_drive_t
*drive
,
1288 struct ide_atapi_pc
*pc
, int prevent
)
1290 idetape_tape_t
*tape
= drive
->driver_data
;
1292 /* device supports locking according to capabilities page */
1293 if (!(tape
->caps
[6] & 0x01))
1296 idetape_init_pc(pc
);
1297 pc
->c
[0] = ALLOW_MEDIUM_REMOVAL
;
1302 static void __ide_tape_discard_merge_buffer(ide_drive_t
*drive
)
1304 idetape_tape_t
*tape
= drive
->driver_data
;
1306 if (tape
->chrdev_dir
!= IDETAPE_DIR_READ
)
1309 clear_bit(IDE_AFLAG_FILEMARK
, &drive
->atapi_flags
);
1310 tape
->merge_bh_size
= 0;
1311 if (tape
->merge_bh
!= NULL
) {
1312 ide_tape_kfree_buffer(tape
);
1313 tape
->merge_bh
= NULL
;
1316 tape
->chrdev_dir
= IDETAPE_DIR_NONE
;
1320 * Position the tape to the requested block using the LOCATE packet command.
1321 * A READ POSITION command is then issued to check where we are positioned. Like
1322 * all higher level operations, we queue the commands at the tail of the request
1323 * queue and wait for their completion.
1325 static int idetape_position_tape(ide_drive_t
*drive
, unsigned int block
,
1326 u8 partition
, int skip
)
1328 idetape_tape_t
*tape
= drive
->driver_data
;
1330 struct ide_atapi_pc pc
;
1332 if (tape
->chrdev_dir
== IDETAPE_DIR_READ
)
1333 __ide_tape_discard_merge_buffer(drive
);
1334 idetape_wait_ready(drive
, 60 * 5 * HZ
);
1335 idetape_create_locate_cmd(drive
, &pc
, block
, partition
, skip
);
1336 retval
= idetape_queue_pc_tail(drive
, &pc
);
1340 idetape_create_read_position_cmd(&pc
);
1341 return (idetape_queue_pc_tail(drive
, &pc
));
1344 static void ide_tape_discard_merge_buffer(ide_drive_t
*drive
,
1345 int restore_position
)
1347 idetape_tape_t
*tape
= drive
->driver_data
;
1350 __ide_tape_discard_merge_buffer(drive
);
1351 if (restore_position
) {
1352 position
= idetape_read_position(drive
);
1353 seek
= position
> 0 ? position
: 0;
1354 if (idetape_position_tape(drive
, seek
, 0, 0)) {
1355 printk(KERN_INFO
"ide-tape: %s: position_tape failed in"
1356 " %s\n", tape
->name
, __func__
);
1363 * Generate a read/write request for the block device interface and wait for it
1366 static int idetape_queue_rw_tail(ide_drive_t
*drive
, int cmd
, int blocks
,
1367 struct idetape_bh
*bh
)
1369 idetape_tape_t
*tape
= drive
->driver_data
;
1373 debug_log(DBG_SENSE
, "%s: cmd=%d\n", __func__
, cmd
);
1375 rq
= blk_get_request(drive
->queue
, READ
, __GFP_WAIT
);
1376 rq
->cmd_type
= REQ_TYPE_SPECIAL
;
1378 rq
->rq_disk
= tape
->disk
;
1379 rq
->special
= (void *)bh
;
1380 rq
->sector
= tape
->first_frame
;
1381 rq
->nr_sectors
= blocks
;
1382 rq
->current_nr_sectors
= blocks
;
1383 blk_execute_rq(drive
->queue
, tape
->disk
, rq
, 0);
1385 errors
= rq
->errors
;
1386 ret
= tape
->blk_size
* (blocks
- rq
->current_nr_sectors
);
1387 blk_put_request(rq
);
1389 if ((cmd
& (REQ_IDETAPE_READ
| REQ_IDETAPE_WRITE
)) == 0)
1393 idetape_init_merge_buffer(tape
);
1394 if (errors
== IDETAPE_ERROR_GENERAL
)
1399 static void idetape_create_inquiry_cmd(struct ide_atapi_pc
*pc
)
1401 idetape_init_pc(pc
);
1407 static void idetape_create_rewind_cmd(ide_drive_t
*drive
,
1408 struct ide_atapi_pc
*pc
)
1410 idetape_init_pc(pc
);
1411 pc
->c
[0] = REZERO_UNIT
;
1412 pc
->flags
|= PC_FLAG_WAIT_FOR_DSC
;
1415 static void idetape_create_erase_cmd(struct ide_atapi_pc
*pc
)
1417 idetape_init_pc(pc
);
1420 pc
->flags
|= PC_FLAG_WAIT_FOR_DSC
;
1423 static void idetape_create_space_cmd(struct ide_atapi_pc
*pc
, int count
, u8 cmd
)
1425 idetape_init_pc(pc
);
1427 put_unaligned(cpu_to_be32(count
), (unsigned int *) &pc
->c
[1]);
1429 pc
->flags
|= PC_FLAG_WAIT_FOR_DSC
;
1432 /* Queue up a character device originated write request. */
1433 static int idetape_add_chrdev_write_request(ide_drive_t
*drive
, int blocks
)
1435 idetape_tape_t
*tape
= drive
->driver_data
;
1437 debug_log(DBG_CHRDEV
, "Enter %s\n", __func__
);
1439 return idetape_queue_rw_tail(drive
, REQ_IDETAPE_WRITE
,
1440 blocks
, tape
->merge_bh
);
1443 static void ide_tape_flush_merge_buffer(ide_drive_t
*drive
)
1445 idetape_tape_t
*tape
= drive
->driver_data
;
1447 struct idetape_bh
*bh
;
1449 if (tape
->chrdev_dir
!= IDETAPE_DIR_WRITE
) {
1450 printk(KERN_ERR
"ide-tape: bug: Trying to empty merge buffer"
1451 " but we are not writing.\n");
1454 if (tape
->merge_bh_size
> tape
->buffer_size
) {
1455 printk(KERN_ERR
"ide-tape: bug: merge_buffer too big\n");
1456 tape
->merge_bh_size
= tape
->buffer_size
;
1458 if (tape
->merge_bh_size
) {
1459 blocks
= tape
->merge_bh_size
/ tape
->blk_size
;
1460 if (tape
->merge_bh_size
% tape
->blk_size
) {
1464 i
= tape
->blk_size
- tape
->merge_bh_size
%
1466 bh
= tape
->bh
->b_reqnext
;
1468 atomic_set(&bh
->b_count
, 0);
1474 printk(KERN_INFO
"ide-tape: bug,"
1478 min
= min(i
, (unsigned int)(bh
->b_size
-
1479 atomic_read(&bh
->b_count
)));
1480 memset(bh
->b_data
+ atomic_read(&bh
->b_count
),
1482 atomic_add(min
, &bh
->b_count
);
1487 (void) idetape_add_chrdev_write_request(drive
, blocks
);
1488 tape
->merge_bh_size
= 0;
1490 if (tape
->merge_bh
!= NULL
) {
1491 ide_tape_kfree_buffer(tape
);
1492 tape
->merge_bh
= NULL
;
1494 tape
->chrdev_dir
= IDETAPE_DIR_NONE
;
1497 static int idetape_init_read(ide_drive_t
*drive
)
1499 idetape_tape_t
*tape
= drive
->driver_data
;
1502 /* Initialize read operation */
1503 if (tape
->chrdev_dir
!= IDETAPE_DIR_READ
) {
1504 if (tape
->chrdev_dir
== IDETAPE_DIR_WRITE
) {
1505 ide_tape_flush_merge_buffer(drive
);
1506 idetape_flush_tape_buffers(drive
);
1508 if (tape
->merge_bh
|| tape
->merge_bh_size
) {
1509 printk(KERN_ERR
"ide-tape: merge_bh_size should be"
1511 tape
->merge_bh_size
= 0;
1513 tape
->merge_bh
= ide_tape_kmalloc_buffer(tape
, 0, 0);
1514 if (!tape
->merge_bh
)
1516 tape
->chrdev_dir
= IDETAPE_DIR_READ
;
1519 * Issue a read 0 command to ensure that DSC handshake is
1520 * switched from completion mode to buffer available mode.
1521 * No point in issuing this if DSC overlap isn't supported, some
1522 * drives (Seagate STT3401A) will return an error.
1524 if (drive
->dsc_overlap
) {
1525 bytes_read
= idetape_queue_rw_tail(drive
,
1526 REQ_IDETAPE_READ
, 0,
1528 if (bytes_read
< 0) {
1529 ide_tape_kfree_buffer(tape
);
1530 tape
->merge_bh
= NULL
;
1531 tape
->chrdev_dir
= IDETAPE_DIR_NONE
;
1540 /* called from idetape_chrdev_read() to service a chrdev read request. */
1541 static int idetape_add_chrdev_read_request(ide_drive_t
*drive
, int blocks
)
1543 idetape_tape_t
*tape
= drive
->driver_data
;
1545 debug_log(DBG_PROCS
, "Enter %s, %d blocks\n", __func__
, blocks
);
1547 /* If we are at a filemark, return a read length of 0 */
1548 if (test_bit(IDE_AFLAG_FILEMARK
, &drive
->atapi_flags
))
1551 idetape_init_read(drive
);
1553 return idetape_queue_rw_tail(drive
, REQ_IDETAPE_READ
, blocks
,
1557 static void idetape_pad_zeros(ide_drive_t
*drive
, int bcount
)
1559 idetape_tape_t
*tape
= drive
->driver_data
;
1560 struct idetape_bh
*bh
;
1566 bh
= tape
->merge_bh
;
1567 count
= min(tape
->buffer_size
, bcount
);
1569 blocks
= count
/ tape
->blk_size
;
1571 atomic_set(&bh
->b_count
,
1572 min(count
, (unsigned int)bh
->b_size
));
1573 memset(bh
->b_data
, 0, atomic_read(&bh
->b_count
));
1574 count
-= atomic_read(&bh
->b_count
);
1577 idetape_queue_rw_tail(drive
, REQ_IDETAPE_WRITE
, blocks
,
1583 * Rewinds the tape to the Beginning Of the current Partition (BOP). We
1584 * currently support only one partition.
1586 static int idetape_rewind_tape(ide_drive_t
*drive
)
1589 struct ide_atapi_pc pc
;
1590 idetape_tape_t
*tape
;
1591 tape
= drive
->driver_data
;
1593 debug_log(DBG_SENSE
, "Enter %s\n", __func__
);
1595 idetape_create_rewind_cmd(drive
, &pc
);
1596 retval
= idetape_queue_pc_tail(drive
, &pc
);
1600 idetape_create_read_position_cmd(&pc
);
1601 retval
= idetape_queue_pc_tail(drive
, &pc
);
1607 /* mtio.h compatible commands should be issued to the chrdev interface. */
1608 static int idetape_blkdev_ioctl(ide_drive_t
*drive
, unsigned int cmd
,
1611 idetape_tape_t
*tape
= drive
->driver_data
;
1612 void __user
*argp
= (void __user
*)arg
;
1614 struct idetape_config
{
1615 int dsc_rw_frequency
;
1616 int dsc_media_access_frequency
;
1620 debug_log(DBG_PROCS
, "Enter %s\n", __func__
);
1624 if (copy_from_user(&config
, argp
, sizeof(config
)))
1626 tape
->best_dsc_rw_freq
= config
.dsc_rw_frequency
;
1629 config
.dsc_rw_frequency
= (int) tape
->best_dsc_rw_freq
;
1630 config
.nr_stages
= 1;
1631 if (copy_to_user(argp
, &config
, sizeof(config
)))
1640 static int idetape_space_over_filemarks(ide_drive_t
*drive
, short mt_op
,
1643 idetape_tape_t
*tape
= drive
->driver_data
;
1644 struct ide_atapi_pc pc
;
1645 int retval
, count
= 0;
1646 int sprev
= !!(tape
->caps
[4] & 0x20);
1650 if (MTBSF
== mt_op
|| MTBSFM
== mt_op
) {
1653 mt_count
= -mt_count
;
1656 if (tape
->chrdev_dir
== IDETAPE_DIR_READ
) {
1657 tape
->merge_bh_size
= 0;
1658 if (test_and_clear_bit(IDE_AFLAG_FILEMARK
, &drive
->atapi_flags
))
1660 ide_tape_discard_merge_buffer(drive
, 0);
1666 idetape_create_space_cmd(&pc
, mt_count
- count
,
1667 IDETAPE_SPACE_OVER_FILEMARK
);
1668 return idetape_queue_pc_tail(drive
, &pc
);
1673 retval
= idetape_space_over_filemarks(drive
, MTFSF
,
1677 count
= (MTBSFM
== mt_op
? 1 : -1);
1678 return idetape_space_over_filemarks(drive
, MTFSF
, count
);
1680 printk(KERN_ERR
"ide-tape: MTIO operation %d not supported\n",
1687 * Our character device read / write functions.
1689 * The tape is optimized to maximize throughput when it is transferring an
1690 * integral number of the "continuous transfer limit", which is a parameter of
1691 * the specific tape (26kB on my particular tape, 32kB for Onstream).
1693 * As of version 1.3 of the driver, the character device provides an abstract
1694 * continuous view of the media - any mix of block sizes (even 1 byte) on the
1695 * same backup/restore procedure is supported. The driver will internally
1696 * convert the requests to the recommended transfer unit, so that an unmatch
1697 * between the user's block size to the recommended size will only result in a
1698 * (slightly) increased driver overhead, but will no longer hit performance.
1699 * This is not applicable to Onstream.
1701 static ssize_t
idetape_chrdev_read(struct file
*file
, char __user
*buf
,
1702 size_t count
, loff_t
*ppos
)
1704 struct ide_tape_obj
*tape
= ide_tape_f(file
);
1705 ide_drive_t
*drive
= tape
->drive
;
1706 ssize_t bytes_read
, temp
, actually_read
= 0, rc
;
1708 u16 ctl
= *(u16
*)&tape
->caps
[12];
1710 debug_log(DBG_CHRDEV
, "Enter %s, count %Zd\n", __func__
, count
);
1712 if (tape
->chrdev_dir
!= IDETAPE_DIR_READ
) {
1713 if (test_bit(IDE_AFLAG_DETECT_BS
, &drive
->atapi_flags
))
1714 if (count
> tape
->blk_size
&&
1715 (count
% tape
->blk_size
) == 0)
1716 tape
->user_bs_factor
= count
/ tape
->blk_size
;
1718 rc
= idetape_init_read(drive
);
1723 if (tape
->merge_bh_size
) {
1724 actually_read
= min((unsigned int)(tape
->merge_bh_size
),
1725 (unsigned int)count
);
1726 if (idetape_copy_stage_to_user(tape
, buf
, actually_read
))
1728 buf
+= actually_read
;
1729 tape
->merge_bh_size
-= actually_read
;
1730 count
-= actually_read
;
1732 while (count
>= tape
->buffer_size
) {
1733 bytes_read
= idetape_add_chrdev_read_request(drive
, ctl
);
1734 if (bytes_read
<= 0)
1736 if (idetape_copy_stage_to_user(tape
, buf
, bytes_read
))
1739 count
-= bytes_read
;
1740 actually_read
+= bytes_read
;
1743 bytes_read
= idetape_add_chrdev_read_request(drive
, ctl
);
1744 if (bytes_read
<= 0)
1746 temp
= min((unsigned long)count
, (unsigned long)bytes_read
);
1747 if (idetape_copy_stage_to_user(tape
, buf
, temp
))
1749 actually_read
+= temp
;
1750 tape
->merge_bh_size
= bytes_read
-temp
;
1753 if (!actually_read
&& test_bit(IDE_AFLAG_FILEMARK
, &drive
->atapi_flags
)) {
1754 debug_log(DBG_SENSE
, "%s: spacing over filemark\n", tape
->name
);
1756 idetape_space_over_filemarks(drive
, MTFSF
, 1);
1760 return ret
? ret
: actually_read
;
1763 static ssize_t
idetape_chrdev_write(struct file
*file
, const char __user
*buf
,
1764 size_t count
, loff_t
*ppos
)
1766 struct ide_tape_obj
*tape
= ide_tape_f(file
);
1767 ide_drive_t
*drive
= tape
->drive
;
1768 ssize_t actually_written
= 0;
1770 u16 ctl
= *(u16
*)&tape
->caps
[12];
1772 /* The drive is write protected. */
1773 if (tape
->write_prot
)
1776 debug_log(DBG_CHRDEV
, "Enter %s, count %Zd\n", __func__
, count
);
1778 /* Initialize write operation */
1779 if (tape
->chrdev_dir
!= IDETAPE_DIR_WRITE
) {
1780 if (tape
->chrdev_dir
== IDETAPE_DIR_READ
)
1781 ide_tape_discard_merge_buffer(drive
, 1);
1782 if (tape
->merge_bh
|| tape
->merge_bh_size
) {
1783 printk(KERN_ERR
"ide-tape: merge_bh_size "
1784 "should be 0 now\n");
1785 tape
->merge_bh_size
= 0;
1787 tape
->merge_bh
= ide_tape_kmalloc_buffer(tape
, 0, 0);
1788 if (!tape
->merge_bh
)
1790 tape
->chrdev_dir
= IDETAPE_DIR_WRITE
;
1791 idetape_init_merge_buffer(tape
);
1794 * Issue a write 0 command to ensure that DSC handshake is
1795 * switched from completion mode to buffer available mode. No
1796 * point in issuing this if DSC overlap isn't supported, some
1797 * drives (Seagate STT3401A) will return an error.
1799 if (drive
->dsc_overlap
) {
1800 ssize_t retval
= idetape_queue_rw_tail(drive
,
1801 REQ_IDETAPE_WRITE
, 0,
1804 ide_tape_kfree_buffer(tape
);
1805 tape
->merge_bh
= NULL
;
1806 tape
->chrdev_dir
= IDETAPE_DIR_NONE
;
1813 if (tape
->merge_bh_size
) {
1814 if (tape
->merge_bh_size
>= tape
->buffer_size
) {
1815 printk(KERN_ERR
"ide-tape: bug: merge buf too big\n");
1816 tape
->merge_bh_size
= 0;
1818 actually_written
= min((unsigned int)
1819 (tape
->buffer_size
- tape
->merge_bh_size
),
1820 (unsigned int)count
);
1821 if (idetape_copy_stage_from_user(tape
, buf
, actually_written
))
1823 buf
+= actually_written
;
1824 tape
->merge_bh_size
+= actually_written
;
1825 count
-= actually_written
;
1827 if (tape
->merge_bh_size
== tape
->buffer_size
) {
1829 tape
->merge_bh_size
= 0;
1830 retval
= idetape_add_chrdev_write_request(drive
, ctl
);
1835 while (count
>= tape
->buffer_size
) {
1837 if (idetape_copy_stage_from_user(tape
, buf
, tape
->buffer_size
))
1839 buf
+= tape
->buffer_size
;
1840 count
-= tape
->buffer_size
;
1841 retval
= idetape_add_chrdev_write_request(drive
, ctl
);
1842 actually_written
+= tape
->buffer_size
;
1847 actually_written
+= count
;
1848 if (idetape_copy_stage_from_user(tape
, buf
, count
))
1850 tape
->merge_bh_size
+= count
;
1852 return ret
? ret
: actually_written
;
1855 static int idetape_write_filemark(ide_drive_t
*drive
)
1857 struct ide_atapi_pc pc
;
1859 /* Write a filemark */
1860 idetape_create_write_filemark_cmd(drive
, &pc
, 1);
1861 if (idetape_queue_pc_tail(drive
, &pc
)) {
1862 printk(KERN_ERR
"ide-tape: Couldn't write a filemark\n");
1869 * Called from idetape_chrdev_ioctl when the general mtio MTIOCTOP ioctl is
1872 * Note: MTBSF and MTBSFM are not supported when the tape doesn't support
1873 * spacing over filemarks in the reverse direction. In this case, MTFSFM is also
1874 * usually not supported.
1876 * The following commands are currently not supported:
1878 * MTFSS, MTBSS, MTWSM, MTSETDENSITY, MTSETDRVBUFFER, MT_ST_BOOLEANS,
1879 * MT_ST_WRITE_THRESHOLD.
1881 static int idetape_mtioctop(ide_drive_t
*drive
, short mt_op
, int mt_count
)
1883 idetape_tape_t
*tape
= drive
->driver_data
;
1884 struct ide_atapi_pc pc
;
1887 debug_log(DBG_ERR
, "Handling MTIOCTOP ioctl: mt_op=%d, mt_count=%d\n",
1897 return idetape_space_over_filemarks(drive
, mt_op
, mt_count
);
1904 if (tape
->write_prot
)
1906 ide_tape_discard_merge_buffer(drive
, 1);
1907 for (i
= 0; i
< mt_count
; i
++) {
1908 retval
= idetape_write_filemark(drive
);
1914 ide_tape_discard_merge_buffer(drive
, 0);
1915 if (idetape_rewind_tape(drive
))
1919 ide_tape_discard_merge_buffer(drive
, 0);
1920 idetape_create_load_unload_cmd(drive
, &pc
,
1921 IDETAPE_LU_LOAD_MASK
);
1922 return idetape_queue_pc_tail(drive
, &pc
);
1926 * If door is locked, attempt to unlock before
1927 * attempting to eject.
1929 if (tape
->door_locked
) {
1930 if (idetape_create_prevent_cmd(drive
, &pc
, 0))
1931 if (!idetape_queue_pc_tail(drive
, &pc
))
1932 tape
->door_locked
= DOOR_UNLOCKED
;
1934 ide_tape_discard_merge_buffer(drive
, 0);
1935 idetape_create_load_unload_cmd(drive
, &pc
,
1936 !IDETAPE_LU_LOAD_MASK
);
1937 retval
= idetape_queue_pc_tail(drive
, &pc
);
1939 clear_bit(IDE_AFLAG_MEDIUM_PRESENT
, &drive
->atapi_flags
);
1942 ide_tape_discard_merge_buffer(drive
, 0);
1943 return idetape_flush_tape_buffers(drive
);
1945 ide_tape_discard_merge_buffer(drive
, 0);
1946 idetape_create_load_unload_cmd(drive
, &pc
,
1947 IDETAPE_LU_RETENSION_MASK
| IDETAPE_LU_LOAD_MASK
);
1948 return idetape_queue_pc_tail(drive
, &pc
);
1950 idetape_create_space_cmd(&pc
, 0, IDETAPE_SPACE_TO_EOD
);
1951 return idetape_queue_pc_tail(drive
, &pc
);
1953 (void)idetape_rewind_tape(drive
);
1954 idetape_create_erase_cmd(&pc
);
1955 return idetape_queue_pc_tail(drive
, &pc
);
1958 if (mt_count
< tape
->blk_size
||
1959 mt_count
% tape
->blk_size
)
1961 tape
->user_bs_factor
= mt_count
/ tape
->blk_size
;
1962 clear_bit(IDE_AFLAG_DETECT_BS
, &drive
->atapi_flags
);
1964 set_bit(IDE_AFLAG_DETECT_BS
, &drive
->atapi_flags
);
1967 ide_tape_discard_merge_buffer(drive
, 0);
1968 return idetape_position_tape(drive
,
1969 mt_count
* tape
->user_bs_factor
, tape
->partition
, 0);
1971 ide_tape_discard_merge_buffer(drive
, 0);
1972 return idetape_position_tape(drive
, 0, mt_count
, 0);
1976 if (!idetape_create_prevent_cmd(drive
, &pc
, 1))
1978 retval
= idetape_queue_pc_tail(drive
, &pc
);
1981 tape
->door_locked
= DOOR_EXPLICITLY_LOCKED
;
1984 if (!idetape_create_prevent_cmd(drive
, &pc
, 0))
1986 retval
= idetape_queue_pc_tail(drive
, &pc
);
1989 tape
->door_locked
= DOOR_UNLOCKED
;
1992 printk(KERN_ERR
"ide-tape: MTIO operation %d not supported\n",
1999 * Our character device ioctls. General mtio.h magnetic io commands are
2000 * supported here, and not in the corresponding block interface. Our own
2001 * ide-tape ioctls are supported on both interfaces.
2003 static int idetape_chrdev_ioctl(struct inode
*inode
, struct file
*file
,
2004 unsigned int cmd
, unsigned long arg
)
2006 struct ide_tape_obj
*tape
= ide_tape_f(file
);
2007 ide_drive_t
*drive
= tape
->drive
;
2011 int block_offset
= 0, position
= tape
->first_frame
;
2012 void __user
*argp
= (void __user
*)arg
;
2014 debug_log(DBG_CHRDEV
, "Enter %s, cmd=%u\n", __func__
, cmd
);
2016 if (tape
->chrdev_dir
== IDETAPE_DIR_WRITE
) {
2017 ide_tape_flush_merge_buffer(drive
);
2018 idetape_flush_tape_buffers(drive
);
2020 if (cmd
== MTIOCGET
|| cmd
== MTIOCPOS
) {
2021 block_offset
= tape
->merge_bh_size
/
2022 (tape
->blk_size
* tape
->user_bs_factor
);
2023 position
= idetape_read_position(drive
);
2029 if (copy_from_user(&mtop
, argp
, sizeof(struct mtop
)))
2031 return idetape_mtioctop(drive
, mtop
.mt_op
, mtop
.mt_count
);
2033 memset(&mtget
, 0, sizeof(struct mtget
));
2034 mtget
.mt_type
= MT_ISSCSI2
;
2035 mtget
.mt_blkno
= position
/ tape
->user_bs_factor
- block_offset
;
2037 ((tape
->blk_size
* tape
->user_bs_factor
)
2038 << MT_ST_BLKSIZE_SHIFT
) & MT_ST_BLKSIZE_MASK
;
2040 if (tape
->drv_write_prot
)
2041 mtget
.mt_gstat
|= GMT_WR_PROT(0xffffffff);
2043 if (copy_to_user(argp
, &mtget
, sizeof(struct mtget
)))
2047 mtpos
.mt_blkno
= position
/ tape
->user_bs_factor
- block_offset
;
2048 if (copy_to_user(argp
, &mtpos
, sizeof(struct mtpos
)))
2052 if (tape
->chrdev_dir
== IDETAPE_DIR_READ
)
2053 ide_tape_discard_merge_buffer(drive
, 1);
2054 return idetape_blkdev_ioctl(drive
, cmd
, arg
);
2059 * Do a mode sense page 0 with block descriptor and if it succeeds set the tape
2060 * block size with the reported value.
2062 static void ide_tape_get_bsize_from_bdesc(ide_drive_t
*drive
)
2064 idetape_tape_t
*tape
= drive
->driver_data
;
2065 struct ide_atapi_pc pc
;
2067 idetape_create_mode_sense_cmd(&pc
, IDETAPE_BLOCK_DESCRIPTOR
);
2068 if (idetape_queue_pc_tail(drive
, &pc
)) {
2069 printk(KERN_ERR
"ide-tape: Can't get block descriptor\n");
2070 if (tape
->blk_size
== 0) {
2071 printk(KERN_WARNING
"ide-tape: Cannot deal with zero "
2072 "block size, assuming 32k\n");
2073 tape
->blk_size
= 32768;
2077 tape
->blk_size
= (pc
.buf
[4 + 5] << 16) +
2078 (pc
.buf
[4 + 6] << 8) +
2080 tape
->drv_write_prot
= (pc
.buf
[2] & 0x80) >> 7;
2083 static int idetape_chrdev_open(struct inode
*inode
, struct file
*filp
)
2085 unsigned int minor
= iminor(inode
), i
= minor
& ~0xc0;
2087 idetape_tape_t
*tape
;
2088 struct ide_atapi_pc pc
;
2091 if (i
>= MAX_HWIFS
* MAX_DRIVES
)
2095 tape
= ide_tape_chrdev_get(i
);
2101 debug_log(DBG_CHRDEV
, "Enter %s\n", __func__
);
2104 * We really want to do nonseekable_open(inode, filp); here, but some
2105 * versions of tar incorrectly call lseek on tapes and bail out if that
2106 * fails. So we disallow pread() and pwrite(), but permit lseeks.
2108 filp
->f_mode
&= ~(FMODE_PREAD
| FMODE_PWRITE
);
2110 drive
= tape
->drive
;
2112 filp
->private_data
= tape
;
2114 if (test_and_set_bit(IDE_AFLAG_BUSY
, &drive
->atapi_flags
)) {
2119 retval
= idetape_wait_ready(drive
, 60 * HZ
);
2121 clear_bit(IDE_AFLAG_BUSY
, &drive
->atapi_flags
);
2122 printk(KERN_ERR
"ide-tape: %s: drive not ready\n", tape
->name
);
2126 idetape_read_position(drive
);
2127 if (!test_bit(IDE_AFLAG_ADDRESS_VALID
, &drive
->atapi_flags
))
2128 (void)idetape_rewind_tape(drive
);
2130 /* Read block size and write protect status from drive. */
2131 ide_tape_get_bsize_from_bdesc(drive
);
2133 /* Set write protect flag if device is opened as read-only. */
2134 if ((filp
->f_flags
& O_ACCMODE
) == O_RDONLY
)
2135 tape
->write_prot
= 1;
2137 tape
->write_prot
= tape
->drv_write_prot
;
2139 /* Make sure drive isn't write protected if user wants to write. */
2140 if (tape
->write_prot
) {
2141 if ((filp
->f_flags
& O_ACCMODE
) == O_WRONLY
||
2142 (filp
->f_flags
& O_ACCMODE
) == O_RDWR
) {
2143 clear_bit(IDE_AFLAG_BUSY
, &drive
->atapi_flags
);
2149 /* Lock the tape drive door so user can't eject. */
2150 if (tape
->chrdev_dir
== IDETAPE_DIR_NONE
) {
2151 if (idetape_create_prevent_cmd(drive
, &pc
, 1)) {
2152 if (!idetape_queue_pc_tail(drive
, &pc
)) {
2153 if (tape
->door_locked
!= DOOR_EXPLICITLY_LOCKED
)
2154 tape
->door_locked
= DOOR_LOCKED
;
2167 static void idetape_write_release(ide_drive_t
*drive
, unsigned int minor
)
2169 idetape_tape_t
*tape
= drive
->driver_data
;
2171 ide_tape_flush_merge_buffer(drive
);
2172 tape
->merge_bh
= ide_tape_kmalloc_buffer(tape
, 1, 0);
2173 if (tape
->merge_bh
!= NULL
) {
2174 idetape_pad_zeros(drive
, tape
->blk_size
*
2175 (tape
->user_bs_factor
- 1));
2176 ide_tape_kfree_buffer(tape
);
2177 tape
->merge_bh
= NULL
;
2179 idetape_write_filemark(drive
);
2180 idetape_flush_tape_buffers(drive
);
2181 idetape_flush_tape_buffers(drive
);
2184 static int idetape_chrdev_release(struct inode
*inode
, struct file
*filp
)
2186 struct ide_tape_obj
*tape
= ide_tape_f(filp
);
2187 ide_drive_t
*drive
= tape
->drive
;
2188 struct ide_atapi_pc pc
;
2189 unsigned int minor
= iminor(inode
);
2192 tape
= drive
->driver_data
;
2194 debug_log(DBG_CHRDEV
, "Enter %s\n", __func__
);
2196 if (tape
->chrdev_dir
== IDETAPE_DIR_WRITE
)
2197 idetape_write_release(drive
, minor
);
2198 if (tape
->chrdev_dir
== IDETAPE_DIR_READ
) {
2200 ide_tape_discard_merge_buffer(drive
, 1);
2203 if (minor
< 128 && test_bit(IDE_AFLAG_MEDIUM_PRESENT
, &drive
->atapi_flags
))
2204 (void) idetape_rewind_tape(drive
);
2205 if (tape
->chrdev_dir
== IDETAPE_DIR_NONE
) {
2206 if (tape
->door_locked
== DOOR_LOCKED
) {
2207 if (idetape_create_prevent_cmd(drive
, &pc
, 0)) {
2208 if (!idetape_queue_pc_tail(drive
, &pc
))
2209 tape
->door_locked
= DOOR_UNLOCKED
;
2213 clear_bit(IDE_AFLAG_BUSY
, &drive
->atapi_flags
);
2219 static void idetape_get_inquiry_results(ide_drive_t
*drive
)
2221 idetape_tape_t
*tape
= drive
->driver_data
;
2222 struct ide_atapi_pc pc
;
2223 char fw_rev
[4], vendor_id
[8], product_id
[16];
2225 idetape_create_inquiry_cmd(&pc
);
2226 if (idetape_queue_pc_tail(drive
, &pc
)) {
2227 printk(KERN_ERR
"ide-tape: %s: can't get INQUIRY results\n",
2231 memcpy(vendor_id
, &pc
.buf
[8], 8);
2232 memcpy(product_id
, &pc
.buf
[16], 16);
2233 memcpy(fw_rev
, &pc
.buf
[32], 4);
2235 ide_fixstring(vendor_id
, 8, 0);
2236 ide_fixstring(product_id
, 16, 0);
2237 ide_fixstring(fw_rev
, 4, 0);
2239 printk(KERN_INFO
"ide-tape: %s <-> %s: %.8s %.16s rev %.4s\n",
2240 drive
->name
, tape
->name
, vendor_id
, product_id
, fw_rev
);
2244 * Ask the tape about its various parameters. In particular, we will adjust our
2245 * data transfer buffer size to the recommended value as returned by the tape.
2247 static void idetape_get_mode_sense_results(ide_drive_t
*drive
)
2249 idetape_tape_t
*tape
= drive
->driver_data
;
2250 struct ide_atapi_pc pc
;
2252 u8 speed
, max_speed
;
2254 idetape_create_mode_sense_cmd(&pc
, IDETAPE_CAPABILITIES_PAGE
);
2255 if (idetape_queue_pc_tail(drive
, &pc
)) {
2256 printk(KERN_ERR
"ide-tape: Can't get tape parameters - assuming"
2257 " some default values\n");
2258 tape
->blk_size
= 512;
2259 put_unaligned(52, (u16
*)&tape
->caps
[12]);
2260 put_unaligned(540, (u16
*)&tape
->caps
[14]);
2261 put_unaligned(6*52, (u16
*)&tape
->caps
[16]);
2264 caps
= pc
.buf
+ 4 + pc
.buf
[3];
2266 /* convert to host order and save for later use */
2267 speed
= be16_to_cpup((__be16
*)&caps
[14]);
2268 max_speed
= be16_to_cpup((__be16
*)&caps
[8]);
2270 *(u16
*)&caps
[8] = max_speed
;
2271 *(u16
*)&caps
[12] = be16_to_cpup((__be16
*)&caps
[12]);
2272 *(u16
*)&caps
[14] = speed
;
2273 *(u16
*)&caps
[16] = be16_to_cpup((__be16
*)&caps
[16]);
2276 printk(KERN_INFO
"ide-tape: %s: invalid tape speed "
2277 "(assuming 650KB/sec)\n", drive
->name
);
2278 *(u16
*)&caps
[14] = 650;
2281 printk(KERN_INFO
"ide-tape: %s: invalid max_speed "
2282 "(assuming 650KB/sec)\n", drive
->name
);
2283 *(u16
*)&caps
[8] = 650;
2286 memcpy(&tape
->caps
, caps
, 20);
2288 tape
->blk_size
= 512;
2289 else if (caps
[7] & 0x04)
2290 tape
->blk_size
= 1024;
2293 #ifdef CONFIG_IDE_PROC_FS
2294 #define ide_tape_devset_get(name, field) \
2295 static int get_##name(ide_drive_t *drive) \
2297 idetape_tape_t *tape = drive->driver_data; \
2298 return tape->field; \
2301 #define ide_tape_devset_set(name, field) \
2302 static int set_##name(ide_drive_t *drive, int arg) \
2304 idetape_tape_t *tape = drive->driver_data; \
2305 tape->field = arg; \
2309 #define ide_tape_devset_rw(_name, _min, _max, _field, _mulf, _divf) \
2310 ide_tape_devset_get(_name, _field) \
2311 ide_tape_devset_set(_name, _field) \
2312 __IDE_DEVSET(_name, S_RW, _min, _max, get_##_name, set_##_name, _mulf, _divf)
2314 #define ide_tape_devset_r(_name, _min, _max, _field, _mulf, _divf) \
2315 ide_tape_devset_get(_name, _field) \
2316 __IDE_DEVSET(_name, S_READ, _min, _max, get_##_name, NULL, _mulf, _divf)
2318 static int mulf_tdsc(ide_drive_t
*drive
) { return 1000; }
2319 static int divf_tdsc(ide_drive_t
*drive
) { return HZ
; }
2320 static int divf_buffer(ide_drive_t
*drive
) { return 2; }
2321 static int divf_buffer_size(ide_drive_t
*drive
) { return 1024; }
2323 ide_devset_rw(dsc_overlap
, 0, 1, dsc_overlap
);
2325 ide_tape_devset_rw(debug_mask
, 0, 0xffff, debug_mask
, NULL
, NULL
);
2326 ide_tape_devset_rw(tdsc
, IDETAPE_DSC_RW_MIN
, IDETAPE_DSC_RW_MAX
,
2327 best_dsc_rw_freq
, mulf_tdsc
, divf_tdsc
);
2329 ide_tape_devset_r(avg_speed
, 0, 0xffff, avg_speed
, NULL
, NULL
);
2330 ide_tape_devset_r(speed
, 0, 0xffff, caps
[14], NULL
, NULL
);
2331 ide_tape_devset_r(buffer
, 0, 0xffff, caps
[16], NULL
, divf_buffer
);
2332 ide_tape_devset_r(buffer_size
, 0, 0xffff, buffer_size
, NULL
, divf_buffer_size
);
2334 static const struct ide_devset
*idetape_settings
[] = {
2335 &ide_devset_avg_speed
,
2337 &ide_devset_buffer_size
,
2338 &ide_devset_debug_mask
,
2339 &ide_devset_dsc_overlap
,
2347 * The function below is called to:
2349 * 1. Initialize our various state variables.
2350 * 2. Ask the tape for its capabilities.
2351 * 3. Allocate a buffer which will be used for data transfer. The buffer size
2352 * is chosen based on the recommendation which we received in step 2.
2354 * Note that at this point ide.c already assigned us an irq, so that we can
2355 * queue requests here and wait for their completion.
2357 static void idetape_setup(ide_drive_t
*drive
, idetape_tape_t
*tape
, int minor
)
2363 u16
*ctl
= (u16
*)&tape
->caps
[12];
2365 drive
->pc_callback
= ide_tape_callback
;
2367 spin_lock_init(&tape
->lock
);
2368 drive
->dsc_overlap
= 1;
2369 if (drive
->hwif
->host_flags
& IDE_HFLAG_NO_DSC
) {
2370 printk(KERN_INFO
"ide-tape: %s: disabling DSC overlap\n",
2372 drive
->dsc_overlap
= 0;
2374 /* Seagate Travan drives do not support DSC overlap. */
2375 if (strstr((char *)&drive
->id
[ATA_ID_PROD
], "Seagate STT3401"))
2376 drive
->dsc_overlap
= 0;
2377 tape
->minor
= minor
;
2378 tape
->name
[0] = 'h';
2379 tape
->name
[1] = 't';
2380 tape
->name
[2] = '0' + minor
;
2381 tape
->chrdev_dir
= IDETAPE_DIR_NONE
;
2383 *((u16
*)&gcw
) = drive
->id
[ATA_ID_CONFIG
];
2385 /* Command packet DRQ type */
2386 if (((gcw
[0] & 0x60) >> 5) == 1)
2387 set_bit(IDE_AFLAG_DRQ_INTERRUPT
, &drive
->atapi_flags
);
2389 idetape_get_inquiry_results(drive
);
2390 idetape_get_mode_sense_results(drive
);
2391 ide_tape_get_bsize_from_bdesc(drive
);
2392 tape
->user_bs_factor
= 1;
2393 tape
->buffer_size
= *ctl
* tape
->blk_size
;
2394 while (tape
->buffer_size
> 0xffff) {
2395 printk(KERN_NOTICE
"ide-tape: decreasing stage size\n");
2397 tape
->buffer_size
= *ctl
* tape
->blk_size
;
2399 buffer_size
= tape
->buffer_size
;
2400 tape
->pages_per_buffer
= buffer_size
/ PAGE_SIZE
;
2401 if (buffer_size
% PAGE_SIZE
) {
2402 tape
->pages_per_buffer
++;
2403 tape
->excess_bh_size
= PAGE_SIZE
- buffer_size
% PAGE_SIZE
;
2406 /* select the "best" DSC read/write polling freq */
2407 speed
= max(*(u16
*)&tape
->caps
[14], *(u16
*)&tape
->caps
[8]);
2409 t
= (IDETAPE_FIFO_THRESHOLD
* tape
->buffer_size
* HZ
) / (speed
* 1000);
2412 * Ensure that the number we got makes sense; limit it within
2413 * IDETAPE_DSC_RW_MIN and IDETAPE_DSC_RW_MAX.
2415 tape
->best_dsc_rw_freq
= clamp_t(unsigned long, t
, IDETAPE_DSC_RW_MIN
,
2416 IDETAPE_DSC_RW_MAX
);
2417 printk(KERN_INFO
"ide-tape: %s <-> %s: %dKBps, %d*%dkB buffer, "
2419 drive
->name
, tape
->name
, *(u16
*)&tape
->caps
[14],
2420 (*(u16
*)&tape
->caps
[16] * 512) / tape
->buffer_size
,
2421 tape
->buffer_size
/ 1024,
2422 tape
->best_dsc_rw_freq
* 1000 / HZ
,
2423 drive
->using_dma
? ", DMA":"");
2425 ide_proc_register_driver(drive
, tape
->driver
);
2428 static void ide_tape_remove(ide_drive_t
*drive
)
2430 idetape_tape_t
*tape
= drive
->driver_data
;
2432 ide_proc_unregister_driver(drive
, tape
->driver
);
2434 ide_unregister_region(tape
->disk
);
2439 static void ide_tape_release(struct kref
*kref
)
2441 struct ide_tape_obj
*tape
= to_ide_tape(kref
);
2442 ide_drive_t
*drive
= tape
->drive
;
2443 struct gendisk
*g
= tape
->disk
;
2445 BUG_ON(tape
->merge_bh_size
);
2447 drive
->dsc_overlap
= 0;
2448 drive
->driver_data
= NULL
;
2449 device_destroy(idetape_sysfs_class
, MKDEV(IDETAPE_MAJOR
, tape
->minor
));
2450 device_destroy(idetape_sysfs_class
,
2451 MKDEV(IDETAPE_MAJOR
, tape
->minor
+ 128));
2452 idetape_devs
[tape
->minor
] = NULL
;
2453 g
->private_data
= NULL
;
2458 #ifdef CONFIG_IDE_PROC_FS
2459 static int proc_idetape_read_name
2460 (char *page
, char **start
, off_t off
, int count
, int *eof
, void *data
)
2462 ide_drive_t
*drive
= (ide_drive_t
*) data
;
2463 idetape_tape_t
*tape
= drive
->driver_data
;
2467 len
= sprintf(out
, "%s\n", tape
->name
);
2468 PROC_IDE_READ_RETURN(page
, start
, off
, count
, eof
, len
);
2471 static ide_proc_entry_t idetape_proc
[] = {
2472 { "capacity", S_IFREG
|S_IRUGO
, proc_ide_read_capacity
, NULL
},
2473 { "name", S_IFREG
|S_IRUGO
, proc_idetape_read_name
, NULL
},
2474 { NULL
, 0, NULL
, NULL
}
2478 static int ide_tape_probe(ide_drive_t
*);
2480 static ide_driver_t idetape_driver
= {
2482 .owner
= THIS_MODULE
,
2484 .bus
= &ide_bus_type
,
2486 .probe
= ide_tape_probe
,
2487 .remove
= ide_tape_remove
,
2488 .version
= IDETAPE_VERSION
,
2490 .do_request
= idetape_do_request
,
2491 .end_request
= idetape_end_request
,
2492 .error
= __ide_error
,
2493 #ifdef CONFIG_IDE_PROC_FS
2494 .proc
= idetape_proc
,
2495 .settings
= idetape_settings
,
2499 /* Our character device supporting functions, passed to register_chrdev. */
2500 static const struct file_operations idetape_fops
= {
2501 .owner
= THIS_MODULE
,
2502 .read
= idetape_chrdev_read
,
2503 .write
= idetape_chrdev_write
,
2504 .ioctl
= idetape_chrdev_ioctl
,
2505 .open
= idetape_chrdev_open
,
2506 .release
= idetape_chrdev_release
,
2509 static int idetape_open(struct inode
*inode
, struct file
*filp
)
2511 struct gendisk
*disk
= inode
->i_bdev
->bd_disk
;
2512 struct ide_tape_obj
*tape
;
2514 tape
= ide_tape_get(disk
);
2521 static int idetape_release(struct inode
*inode
, struct file
*filp
)
2523 struct gendisk
*disk
= inode
->i_bdev
->bd_disk
;
2524 struct ide_tape_obj
*tape
= ide_tape_g(disk
);
2531 static int idetape_ioctl(struct inode
*inode
, struct file
*file
,
2532 unsigned int cmd
, unsigned long arg
)
2534 struct block_device
*bdev
= inode
->i_bdev
;
2535 struct ide_tape_obj
*tape
= ide_tape_g(bdev
->bd_disk
);
2536 ide_drive_t
*drive
= tape
->drive
;
2537 int err
= generic_ide_ioctl(drive
, file
, bdev
, cmd
, arg
);
2539 err
= idetape_blkdev_ioctl(drive
, cmd
, arg
);
2543 static struct block_device_operations idetape_block_ops
= {
2544 .owner
= THIS_MODULE
,
2545 .open
= idetape_open
,
2546 .release
= idetape_release
,
2547 .ioctl
= idetape_ioctl
,
2550 static int ide_tape_probe(ide_drive_t
*drive
)
2552 idetape_tape_t
*tape
;
2556 if (!strstr("ide-tape", drive
->driver_req
))
2559 if (drive
->media
!= ide_tape
)
2562 if (drive
->id_read
== 1 && !ide_check_atapi_device(drive
, DRV_NAME
)) {
2563 printk(KERN_ERR
"ide-tape: %s: not supported by this version of"
2564 " the driver\n", drive
->name
);
2567 tape
= kzalloc(sizeof(idetape_tape_t
), GFP_KERNEL
);
2569 printk(KERN_ERR
"ide-tape: %s: Can't allocate a tape struct\n",
2574 g
= alloc_disk(1 << PARTN_BITS
);
2578 ide_init_disk(g
, drive
);
2580 kref_init(&tape
->kref
);
2582 tape
->drive
= drive
;
2583 tape
->driver
= &idetape_driver
;
2586 g
->private_data
= &tape
->driver
;
2588 drive
->driver_data
= tape
;
2590 mutex_lock(&idetape_ref_mutex
);
2591 for (minor
= 0; idetape_devs
[minor
]; minor
++)
2593 idetape_devs
[minor
] = tape
;
2594 mutex_unlock(&idetape_ref_mutex
);
2596 idetape_setup(drive
, tape
, minor
);
2598 device_create_drvdata(idetape_sysfs_class
, &drive
->gendev
,
2599 MKDEV(IDETAPE_MAJOR
, minor
), NULL
,
2601 device_create_drvdata(idetape_sysfs_class
, &drive
->gendev
,
2602 MKDEV(IDETAPE_MAJOR
, minor
+ 128), NULL
,
2605 g
->fops
= &idetape_block_ops
;
2606 ide_register_region(g
);
2616 static void __exit
idetape_exit(void)
2618 driver_unregister(&idetape_driver
.gen_driver
);
2619 class_destroy(idetape_sysfs_class
);
2620 unregister_chrdev(IDETAPE_MAJOR
, "ht");
2623 static int __init
idetape_init(void)
2626 idetape_sysfs_class
= class_create(THIS_MODULE
, "ide_tape");
2627 if (IS_ERR(idetape_sysfs_class
)) {
2628 idetape_sysfs_class
= NULL
;
2629 printk(KERN_ERR
"Unable to create sysfs class for ide tapes\n");
2634 if (register_chrdev(IDETAPE_MAJOR
, "ht", &idetape_fops
)) {
2635 printk(KERN_ERR
"ide-tape: Failed to register chrdev"
2638 goto out_free_class
;
2641 error
= driver_register(&idetape_driver
.gen_driver
);
2643 goto out_free_driver
;
2648 driver_unregister(&idetape_driver
.gen_driver
);
2650 class_destroy(idetape_sysfs_class
);
2655 MODULE_ALIAS("ide:*m-tape*");
2656 module_init(idetape_init
);
2657 module_exit(idetape_exit
);
2658 MODULE_ALIAS_CHARDEV_MAJOR(IDETAPE_MAJOR
);
2659 MODULE_DESCRIPTION("ATAPI Streaming TAPE Driver");
2660 MODULE_LICENSE("GPL");