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 IDETAPE_VERSION "1.19"
20 #include <linux/module.h>
21 #include <linux/types.h>
22 #include <linux/string.h>
23 #include <linux/kernel.h>
24 #include <linux/delay.h>
25 #include <linux/timer.h>
27 #include <linux/interrupt.h>
28 #include <linux/jiffies.h>
29 #include <linux/major.h>
30 #include <linux/errno.h>
31 #include <linux/genhd.h>
32 #include <linux/slab.h>
33 #include <linux/pci.h>
34 #include <linux/ide.h>
35 #include <linux/smp_lock.h>
36 #include <linux/completion.h>
37 #include <linux/bitops.h>
38 #include <linux/mutex.h>
39 #include <scsi/scsi.h>
41 #include <asm/byteorder.h>
42 #include <linux/irq.h>
43 #include <linux/uaccess.h>
45 #include <asm/unaligned.h>
46 #include <linux/mtio.h>
49 /* output errors only */
51 /* output all sense key/asc */
53 /* info regarding all chrdev-related procedures */
54 DBG_CHRDEV
= (1 << 2),
55 /* all remaining procedures */
57 /* buffer alloc info (pc_stack & rq_stack) */
58 DBG_PCRQ_STACK
= (1 << 4),
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 *****************************/
78 * Pipelined mode parameters.
80 * We try to use the minimum number of stages which is enough to keep the tape
81 * constantly streaming. To accomplish that, we implement a feedback loop around
82 * the maximum number of stages:
84 * We start from MIN maximum stages (we will not even use MIN stages if we don't
85 * need them), increment it by RATE*(MAX-MIN) whenever we sense that the
86 * pipeline is empty, until we reach the optimum value or until we reach MAX.
88 * Setting the following parameter to 0 is illegal: the pipelined mode cannot be
89 * disabled (idetape_calculate_speeds() divides by tape->max_stages.)
91 #define IDETAPE_MIN_PIPELINE_STAGES 1
92 #define IDETAPE_MAX_PIPELINE_STAGES 400
93 #define IDETAPE_INCREASE_STAGES_RATE 20
96 * After each failed packet command we issue a request sense command and retry
97 * the packet command IDETAPE_MAX_PC_RETRIES times.
99 * Setting IDETAPE_MAX_PC_RETRIES to 0 will disable retries.
101 #define IDETAPE_MAX_PC_RETRIES 3
104 * With each packet command, we allocate a buffer of IDETAPE_PC_BUFFER_SIZE
105 * bytes. This is used for several packet commands (Not for READ/WRITE commands)
107 #define IDETAPE_PC_BUFFER_SIZE 256
110 * In various places in the driver, we need to allocate storage
111 * for packet commands and requests, which will remain valid while
112 * we leave the driver to wait for an interrupt or a timeout event.
114 #define IDETAPE_PC_STACK (10 + IDETAPE_MAX_PC_RETRIES)
117 * Some drives (for example, Seagate STT3401A Travan) require a very long
118 * timeout, because they don't return an interrupt or clear their busy bit
119 * until after the command completes (even retension commands).
121 #define IDETAPE_WAIT_CMD (900*HZ)
124 * The following parameter is used to select the point in the internal tape fifo
125 * in which we will start to refill the buffer. Decreasing the following
126 * parameter will improve the system's latency and interactive response, while
127 * using a high value might improve system throughput.
129 #define IDETAPE_FIFO_THRESHOLD 2
132 * DSC polling parameters.
134 * Polling for DSC (a single bit in the status register) is a very important
135 * function in ide-tape. There are two cases in which we poll for DSC:
137 * 1. Before a read/write packet command, to ensure that we can transfer data
138 * from/to the tape's data buffers, without causing an actual media access.
139 * In case the tape is not ready yet, we take out our request from the device
140 * request queue, so that ide.c could service requests from the other device
141 * on the same interface in the meantime.
143 * 2. After the successful initialization of a "media access packet command",
144 * which is a command that can take a long time to complete (the interval can
145 * range from several seconds to even an hour). Again, we postpone our request
146 * in the middle to free the bus for the other device. The polling frequency
147 * here should be lower than the read/write frequency since those media access
148 * commands are slow. We start from a "fast" frequency - IDETAPE_DSC_MA_FAST
149 * (1 second), and if we don't receive DSC after IDETAPE_DSC_MA_THRESHOLD
150 * (5 min), we switch it to a lower frequency - IDETAPE_DSC_MA_SLOW (1 min).
152 * We also set a timeout for the timer, in case something goes wrong. The
153 * timeout should be longer then the maximum execution time of a tape operation.
157 #define IDETAPE_DSC_RW_MIN 5*HZ/100 /* 50 msec */
158 #define IDETAPE_DSC_RW_MAX 40*HZ/100 /* 400 msec */
159 #define IDETAPE_DSC_RW_TIMEOUT 2*60*HZ /* 2 minutes */
160 #define IDETAPE_DSC_MA_FAST 2*HZ /* 2 seconds */
161 #define IDETAPE_DSC_MA_THRESHOLD 5*60*HZ /* 5 minutes */
162 #define IDETAPE_DSC_MA_SLOW 30*HZ /* 30 seconds */
163 #define IDETAPE_DSC_MA_TIMEOUT 2*60*60*HZ /* 2 hours */
165 /*************************** End of tunable parameters ***********************/
167 /* Read/Write error simulation */
168 #define SIMULATE_ERRORS 0
170 /* tape directions */
172 IDETAPE_DIR_NONE
= (1 << 0),
173 IDETAPE_DIR_READ
= (1 << 1),
174 IDETAPE_DIR_WRITE
= (1 << 2),
180 struct idetape_bh
*b_reqnext
;
184 typedef struct idetape_packet_command_s
{
185 /* Actual packet bytes */
187 /* On each retry, we increment retries */
191 /* Bytes to transfer */
192 int request_transfer
;
193 /* Bytes actually transferred */
194 int actually_transferred
;
195 /* Size of our data buffer */
197 struct idetape_bh
*bh
;
202 /* Pointer into the above buffer */
203 u8
*current_position
;
204 /* Called when this packet command is completed */
205 ide_startstop_t (*callback
) (ide_drive_t
*);
206 /* Temporary buffer */
207 u8 pc_buffer
[IDETAPE_PC_BUFFER_SIZE
];
208 /* Status/Action bit flags: long for set_bit */
213 * Packet command flag bits.
215 /* Set when an error is considered normal - We won't retry */
217 /* 1 When polling for DSC on a media access command */
218 #define PC_WAIT_FOR_DSC 1
219 /* 1 when we prefer to use DMA if possible */
220 #define PC_DMA_RECOMMENDED 2
221 /* 1 while DMA in progress */
222 #define PC_DMA_IN_PROGRESS 3
223 /* 1 when encountered problem during DMA */
224 #define PC_DMA_ERROR 4
228 /* A pipeline stage. */
229 typedef struct idetape_stage_s
{
230 struct request rq
; /* The corresponding request */
231 struct idetape_bh
*bh
; /* The data buffers */
232 struct idetape_stage_s
*next
; /* Pointer to the next stage */
236 * Most of our global data which we need to save even as we leave the driver due
237 * to an interrupt or a timer event is stored in the struct defined below.
239 typedef struct ide_tape_obj
{
241 ide_driver_t
*driver
;
242 struct gendisk
*disk
;
246 * Since a typical character device operation requires more
247 * than one packet command, we provide here enough memory
248 * for the maximum of interconnected packet commands.
249 * The packet commands are stored in the circular array pc_stack.
250 * pc_stack_index points to the last used entry, and warps around
251 * to the start when we get to the last array entry.
253 * pc points to the current processed packet command.
255 * failed_pc points to the last failed packet command, or contains
256 * NULL if we do not need to retry any packet command. This is
257 * required since an additional packet command is needed before the
258 * retry, to get detailed information on what went wrong.
260 /* Current packet command */
262 /* Last failed packet command */
263 idetape_pc_t
*failed_pc
;
264 /* Packet command stack */
265 idetape_pc_t pc_stack
[IDETAPE_PC_STACK
];
266 /* Next free packet command storage space */
268 struct request rq_stack
[IDETAPE_PC_STACK
];
269 /* We implement a circular array */
273 * DSC polling variables.
275 * While polling for DSC we use postponed_rq to postpone the current
276 * request so that ide.c will be able to service pending requests on the
277 * other device. Note that at most we will have only one DSC (usually
278 * data transfer) request in the device request queue. Additional
279 * requests can be queued in our internal pipeline, but they will be
280 * visible to ide.c only one at a time.
282 struct request
*postponed_rq
;
283 /* The time in which we started polling for DSC */
284 unsigned long dsc_polling_start
;
285 /* Timer used to poll for dsc */
286 struct timer_list dsc_timer
;
287 /* Read/Write dsc polling frequency */
288 unsigned long best_dsc_rw_freq
;
289 unsigned long dsc_poll_freq
;
290 unsigned long dsc_timeout
;
292 /* Read position information */
295 unsigned int first_frame
;
297 /* Last error information */
298 u8 sense_key
, asc
, ascq
;
300 /* Character device operation */
304 /* Current character device data transfer direction */
307 /* tape block size, usually 512 or 1024 bytes */
308 unsigned short blk_size
;
311 /* Copy of the tape's Capabilities and Mechanical Page */
315 * Active data transfer request parameters.
317 * At most, there is only one ide-tape originated data transfer request
318 * in the device request queue. This allows ide.c to easily service
319 * requests from the other device when we postpone our active request.
320 * In the pipelined operation mode, we use our internal pipeline
321 * structure to hold more data requests. The data buffer size is chosen
322 * based on the tape's recommendation.
324 /* ptr to the request which is waiting in the device request queue */
325 struct request
*active_data_rq
;
326 /* Data buffer size chosen based on the tape's recommendation */
328 idetape_stage_t
*merge_stage
;
329 int merge_stage_size
;
330 struct idetape_bh
*bh
;
335 * Pipeline parameters.
337 * To accomplish non-pipelined mode, we simply set the following
338 * variables to zero (or NULL, where appropriate).
340 /* Number of currently used stages */
342 /* Number of pending stages */
343 int nr_pending_stages
;
344 /* We will not allocate more than this number of stages */
345 int max_stages
, min_pipeline
, max_pipeline
;
346 /* The first stage which will be removed from the pipeline */
347 idetape_stage_t
*first_stage
;
348 /* The currently active stage */
349 idetape_stage_t
*active_stage
;
350 /* Will be serviced after the currently active request */
351 idetape_stage_t
*next_stage
;
352 /* New requests will be added to the pipeline here */
353 idetape_stage_t
*last_stage
;
354 /* Optional free stage which we can use */
355 idetape_stage_t
*cache_stage
;
357 /* Wasted space in each stage */
360 /* Status/Action flags: long for set_bit */
362 /* protects the ide-tape queue */
365 /* Measures average tape speed */
366 unsigned long avg_time
;
370 /* the door is currently locked */
372 /* the tape hardware is write protected */
374 /* the tape is write protected (hardware or opened as read-only) */
378 * Limit the number of times a request can be postponed, to avoid an
379 * infinite postpone deadlock.
384 * Measures number of frames:
386 * 1. written/read to/from the driver pipeline (pipeline_head).
387 * 2. written/read to/from the tape buffers (idetape_bh).
388 * 3. written/read by the tape to/from the media (tape_head).
395 /* Speed control at the tape buffers input/output */
396 unsigned long insert_time
;
399 int max_insert_speed
;
400 int measure_insert_time
;
402 /* Speed regulation negative feedback loop */
404 int pipeline_head_speed
;
405 int controlled_pipeline_head_speed
;
406 int uncontrolled_pipeline_head_speed
;
407 int controlled_last_pipeline_head
;
408 unsigned long uncontrolled_pipeline_head_time
;
409 unsigned long controlled_pipeline_head_time
;
410 int controlled_previous_pipeline_head
;
411 int uncontrolled_previous_pipeline_head
;
412 unsigned long controlled_previous_head_time
;
413 unsigned long uncontrolled_previous_head_time
;
414 int restart_speed_control_req
;
419 static DEFINE_MUTEX(idetape_ref_mutex
);
421 static struct class *idetape_sysfs_class
;
423 #define to_ide_tape(obj) container_of(obj, struct ide_tape_obj, kref)
425 #define ide_tape_g(disk) \
426 container_of((disk)->private_data, struct ide_tape_obj, driver)
428 static struct ide_tape_obj
*ide_tape_get(struct gendisk
*disk
)
430 struct ide_tape_obj
*tape
= NULL
;
432 mutex_lock(&idetape_ref_mutex
);
433 tape
= ide_tape_g(disk
);
435 kref_get(&tape
->kref
);
436 mutex_unlock(&idetape_ref_mutex
);
440 static void ide_tape_release(struct kref
*);
442 static void ide_tape_put(struct ide_tape_obj
*tape
)
444 mutex_lock(&idetape_ref_mutex
);
445 kref_put(&tape
->kref
, ide_tape_release
);
446 mutex_unlock(&idetape_ref_mutex
);
449 /* Tape door status */
450 #define DOOR_UNLOCKED 0
451 #define DOOR_LOCKED 1
452 #define DOOR_EXPLICITLY_LOCKED 2
455 * Tape flag bits values.
457 #define IDETAPE_IGNORE_DSC 0
458 #define IDETAPE_ADDRESS_VALID 1 /* 0 When the tape position is unknown */
459 #define IDETAPE_BUSY 2 /* Device already opened */
460 #define IDETAPE_PIPELINE_ERROR 3 /* Error detected in a pipeline stage */
461 #define IDETAPE_DETECT_BS 4 /* Attempt to auto-detect the current user block size */
462 #define IDETAPE_FILEMARK 5 /* Currently on a filemark */
463 #define IDETAPE_DRQ_INTERRUPT 6 /* DRQ interrupt device */
464 #define IDETAPE_READ_ERROR 7
465 #define IDETAPE_PIPELINE_ACTIVE 8 /* pipeline active */
466 /* 0 = no tape is loaded, so we don't rewind after ejecting */
467 #define IDETAPE_MEDIUM_PRESENT 9
469 /* A define for the READ BUFFER command */
470 #define IDETAPE_RETRIEVE_FAULTY_BLOCK 6
472 /* Some defines for the SPACE command */
473 #define IDETAPE_SPACE_OVER_FILEMARK 1
474 #define IDETAPE_SPACE_TO_EOD 3
476 /* Some defines for the LOAD UNLOAD command */
477 #define IDETAPE_LU_LOAD_MASK 1
478 #define IDETAPE_LU_RETENSION_MASK 2
479 #define IDETAPE_LU_EOT_MASK 4
482 * Special requests for our block device strategy routine.
484 * In order to service a character device command, we add special requests to
485 * the tail of our block device request queue and wait for their completion.
489 REQ_IDETAPE_PC1
= (1 << 0), /* packet command (first stage) */
490 REQ_IDETAPE_PC2
= (1 << 1), /* packet command (second stage) */
491 REQ_IDETAPE_READ
= (1 << 2),
492 REQ_IDETAPE_WRITE
= (1 << 3),
493 REQ_IDETAPE_READ_BUFFER
= (1 << 4),
496 /* Error codes returned in rq->errors to the higher part of the driver. */
497 #define IDETAPE_ERROR_GENERAL 101
498 #define IDETAPE_ERROR_FILEMARK 102
499 #define IDETAPE_ERROR_EOD 103
501 /* Structures related to the SELECT SENSE / MODE SENSE packet commands. */
502 #define IDETAPE_BLOCK_DESCRIPTOR 0
503 #define IDETAPE_CAPABILITIES_PAGE 0x2a
506 * The variables below are used for the character device interface. Additional
507 * state variables are defined in our ide_drive_t structure.
509 static struct ide_tape_obj
* idetape_devs
[MAX_HWIFS
* MAX_DRIVES
];
511 #define ide_tape_f(file) ((file)->private_data)
513 static struct ide_tape_obj
*ide_tape_chrdev_get(unsigned int i
)
515 struct ide_tape_obj
*tape
= NULL
;
517 mutex_lock(&idetape_ref_mutex
);
518 tape
= idetape_devs
[i
];
520 kref_get(&tape
->kref
);
521 mutex_unlock(&idetape_ref_mutex
);
525 static int idetape_chrdev_release (struct inode
*inode
, struct file
*filp
);
526 static void idetape_write_release (ide_drive_t
*drive
, unsigned int minor
);
529 * Too bad. The drive wants to send us data which we are not ready to accept.
530 * Just throw it away.
532 static void idetape_discard_data (ide_drive_t
*drive
, unsigned int bcount
)
535 (void) HWIF(drive
)->INB(IDE_DATA_REG
);
538 static void idetape_input_buffers (ide_drive_t
*drive
, idetape_pc_t
*pc
, unsigned int bcount
)
540 struct idetape_bh
*bh
= pc
->bh
;
545 printk(KERN_ERR
"ide-tape: bh == NULL in "
546 "idetape_input_buffers\n");
547 idetape_discard_data(drive
, bcount
);
550 count
= min((unsigned int)(bh
->b_size
- atomic_read(&bh
->b_count
)), bcount
);
551 HWIF(drive
)->atapi_input_bytes(drive
, bh
->b_data
+ atomic_read(&bh
->b_count
), count
);
553 atomic_add(count
, &bh
->b_count
);
554 if (atomic_read(&bh
->b_count
) == bh
->b_size
) {
557 atomic_set(&bh
->b_count
, 0);
563 static void idetape_output_buffers (ide_drive_t
*drive
, idetape_pc_t
*pc
, unsigned int bcount
)
565 struct idetape_bh
*bh
= pc
->bh
;
570 printk(KERN_ERR
"ide-tape: bh == NULL in "
571 "idetape_output_buffers\n");
574 count
= min((unsigned int)pc
->b_count
, (unsigned int)bcount
);
575 HWIF(drive
)->atapi_output_bytes(drive
, pc
->b_data
, count
);
578 pc
->b_count
-= count
;
580 pc
->bh
= bh
= bh
->b_reqnext
;
582 pc
->b_data
= bh
->b_data
;
583 pc
->b_count
= atomic_read(&bh
->b_count
);
589 static void idetape_update_buffers (idetape_pc_t
*pc
)
591 struct idetape_bh
*bh
= pc
->bh
;
593 unsigned int bcount
= pc
->actually_transferred
;
595 if (test_bit(PC_WRITING
, &pc
->flags
))
599 printk(KERN_ERR
"ide-tape: bh == NULL in "
600 "idetape_update_buffers\n");
603 count
= min((unsigned int)bh
->b_size
, (unsigned int)bcount
);
604 atomic_set(&bh
->b_count
, count
);
605 if (atomic_read(&bh
->b_count
) == bh
->b_size
)
613 * idetape_next_pc_storage returns a pointer to a place in which we can
614 * safely store a packet command, even though we intend to leave the
615 * driver. A storage space for a maximum of IDETAPE_PC_STACK packet
616 * commands is allocated at initialization time.
618 static idetape_pc_t
*idetape_next_pc_storage (ide_drive_t
*drive
)
620 idetape_tape_t
*tape
= drive
->driver_data
;
622 debug_log(DBG_PCRQ_STACK
, "pc_stack_index=%d\n", tape
->pc_stack_index
);
624 if (tape
->pc_stack_index
== IDETAPE_PC_STACK
)
625 tape
->pc_stack_index
=0;
626 return (&tape
->pc_stack
[tape
->pc_stack_index
++]);
630 * idetape_next_rq_storage is used along with idetape_next_pc_storage.
631 * Since we queue packet commands in the request queue, we need to
632 * allocate a request, along with the allocation of a packet command.
635 /**************************************************************
637 * This should get fixed to use kmalloc(.., GFP_ATOMIC) *
638 * followed later on by kfree(). -ml *
640 **************************************************************/
642 static struct request
*idetape_next_rq_storage (ide_drive_t
*drive
)
644 idetape_tape_t
*tape
= drive
->driver_data
;
646 debug_log(DBG_PCRQ_STACK
, "rq_stack_index=%d\n", tape
->rq_stack_index
);
648 if (tape
->rq_stack_index
== IDETAPE_PC_STACK
)
649 tape
->rq_stack_index
=0;
650 return (&tape
->rq_stack
[tape
->rq_stack_index
++]);
653 static void idetape_init_pc (idetape_pc_t
*pc
)
655 memset(pc
->c
, 0, 12);
658 pc
->request_transfer
= 0;
659 pc
->buffer
= pc
->pc_buffer
;
660 pc
->buffer_size
= IDETAPE_PC_BUFFER_SIZE
;
666 * called on each failed packet command retry to analyze the request sense. We
667 * currently do not utilize this information.
669 static void idetape_analyze_error(ide_drive_t
*drive
, u8
*sense
)
671 idetape_tape_t
*tape
= drive
->driver_data
;
672 idetape_pc_t
*pc
= tape
->failed_pc
;
674 tape
->sense_key
= sense
[2] & 0xF;
675 tape
->asc
= sense
[12];
676 tape
->ascq
= sense
[13];
678 debug_log(DBG_ERR
, "pc = %x, sense key = %x, asc = %x, ascq = %x\n",
679 pc
->c
[0], tape
->sense_key
, tape
->asc
, tape
->ascq
);
681 /* Correct pc->actually_transferred by asking the tape. */
682 if (test_bit(PC_DMA_ERROR
, &pc
->flags
)) {
683 pc
->actually_transferred
= pc
->request_transfer
-
685 be32_to_cpu(get_unaligned((u32
*)&sense
[3]));
686 idetape_update_buffers(pc
);
690 * If error was the result of a zero-length read or write command,
691 * with sense key=5, asc=0x22, ascq=0, let it slide. Some drives
692 * (i.e. Seagate STT3401A Travan) don't support 0-length read/writes.
694 if ((pc
->c
[0] == READ_6
|| pc
->c
[0] == WRITE_6
)
696 && pc
->c
[4] == 0 && pc
->c
[3] == 0 && pc
->c
[2] == 0) {
697 if (tape
->sense_key
== 5) {
698 /* don't report an error, everything's ok */
700 /* don't retry read/write */
701 set_bit(PC_ABORT
, &pc
->flags
);
704 if (pc
->c
[0] == READ_6
&& (sense
[2] & 0x80)) {
705 pc
->error
= IDETAPE_ERROR_FILEMARK
;
706 set_bit(PC_ABORT
, &pc
->flags
);
708 if (pc
->c
[0] == WRITE_6
) {
709 if ((sense
[2] & 0x40) || (tape
->sense_key
== 0xd
710 && tape
->asc
== 0x0 && tape
->ascq
== 0x2)) {
711 pc
->error
= IDETAPE_ERROR_EOD
;
712 set_bit(PC_ABORT
, &pc
->flags
);
715 if (pc
->c
[0] == READ_6
|| pc
->c
[0] == WRITE_6
) {
716 if (tape
->sense_key
== 8) {
717 pc
->error
= IDETAPE_ERROR_EOD
;
718 set_bit(PC_ABORT
, &pc
->flags
);
720 if (!test_bit(PC_ABORT
, &pc
->flags
) &&
721 pc
->actually_transferred
)
722 pc
->retries
= IDETAPE_MAX_PC_RETRIES
+ 1;
726 static void idetape_activate_next_stage(ide_drive_t
*drive
)
728 idetape_tape_t
*tape
= drive
->driver_data
;
729 idetape_stage_t
*stage
= tape
->next_stage
;
730 struct request
*rq
= &stage
->rq
;
732 debug_log(DBG_PROCS
, "Enter %s\n", __func__
);
735 printk(KERN_ERR
"ide-tape: bug: Trying to activate a non"
736 " existing stage\n");
740 rq
->rq_disk
= tape
->disk
;
742 rq
->special
= (void *)stage
->bh
;
743 tape
->active_data_rq
= rq
;
744 tape
->active_stage
= stage
;
745 tape
->next_stage
= stage
->next
;
748 /* Free a stage along with its related buffers completely. */
749 static void __idetape_kfree_stage (idetape_stage_t
*stage
)
751 struct idetape_bh
*prev_bh
, *bh
= stage
->bh
;
755 if (bh
->b_data
!= NULL
) {
756 size
= (int) bh
->b_size
;
758 free_page((unsigned long) bh
->b_data
);
760 bh
->b_data
+= PAGE_SIZE
;
770 static void idetape_kfree_stage (idetape_tape_t
*tape
, idetape_stage_t
*stage
)
772 __idetape_kfree_stage(stage
);
776 * Remove tape->first_stage from the pipeline. The caller should avoid race
779 static void idetape_remove_stage_head (ide_drive_t
*drive
)
781 idetape_tape_t
*tape
= drive
->driver_data
;
782 idetape_stage_t
*stage
;
784 debug_log(DBG_PROCS
, "Enter %s\n", __func__
);
786 if (tape
->first_stage
== NULL
) {
787 printk(KERN_ERR
"ide-tape: bug: tape->first_stage is NULL\n");
790 if (tape
->active_stage
== tape
->first_stage
) {
791 printk(KERN_ERR
"ide-tape: bug: Trying to free our active "
795 stage
= tape
->first_stage
;
796 tape
->first_stage
= stage
->next
;
797 idetape_kfree_stage(tape
, stage
);
799 if (tape
->first_stage
== NULL
) {
800 tape
->last_stage
= NULL
;
801 if (tape
->next_stage
!= NULL
)
802 printk(KERN_ERR
"ide-tape: bug: tape->next_stage != NULL\n");
804 printk(KERN_ERR
"ide-tape: bug: nr_stages should be 0 now\n");
809 * This will free all the pipeline stages starting from new_last_stage->next
810 * to the end of the list, and point tape->last_stage to new_last_stage.
812 static void idetape_abort_pipeline(ide_drive_t
*drive
,
813 idetape_stage_t
*new_last_stage
)
815 idetape_tape_t
*tape
= drive
->driver_data
;
816 idetape_stage_t
*stage
= new_last_stage
->next
;
817 idetape_stage_t
*nstage
;
819 debug_log(DBG_PROCS
, "%s: Enter %s\n", tape
->name
, __func__
);
822 nstage
= stage
->next
;
823 idetape_kfree_stage(tape
, stage
);
825 --tape
->nr_pending_stages
;
829 new_last_stage
->next
= NULL
;
830 tape
->last_stage
= new_last_stage
;
831 tape
->next_stage
= NULL
;
835 * Finish servicing a request and insert a pending pipeline request into the
838 static int idetape_end_request(ide_drive_t
*drive
, int uptodate
, int nr_sects
)
840 struct request
*rq
= HWGROUP(drive
)->rq
;
841 idetape_tape_t
*tape
= drive
->driver_data
;
844 int remove_stage
= 0;
845 idetape_stage_t
*active_stage
;
847 debug_log(DBG_PROCS
, "Enter %s\n", __func__
);
850 case 0: error
= IDETAPE_ERROR_GENERAL
; break;
851 case 1: error
= 0; break;
852 default: error
= uptodate
;
856 tape
->failed_pc
= NULL
;
858 if (!blk_special_request(rq
)) {
859 ide_end_request(drive
, uptodate
, nr_sects
);
863 spin_lock_irqsave(&tape
->lock
, flags
);
865 /* The request was a pipelined data transfer request */
866 if (tape
->active_data_rq
== rq
) {
867 active_stage
= tape
->active_stage
;
868 tape
->active_stage
= NULL
;
869 tape
->active_data_rq
= NULL
;
870 tape
->nr_pending_stages
--;
871 if (rq
->cmd
[0] & REQ_IDETAPE_WRITE
) {
874 set_bit(IDETAPE_PIPELINE_ERROR
, &tape
->flags
);
875 if (error
== IDETAPE_ERROR_EOD
)
876 idetape_abort_pipeline(drive
, active_stage
);
878 } else if (rq
->cmd
[0] & REQ_IDETAPE_READ
) {
879 if (error
== IDETAPE_ERROR_EOD
) {
880 set_bit(IDETAPE_PIPELINE_ERROR
, &tape
->flags
);
881 idetape_abort_pipeline(drive
, active_stage
);
884 if (tape
->next_stage
!= NULL
) {
885 idetape_activate_next_stage(drive
);
887 /* Insert the next request into the request queue. */
888 (void)ide_do_drive_cmd(drive
, tape
->active_data_rq
,
892 * This is a part of the feedback loop which tries to
893 * find the optimum number of stages. We are starting
894 * from a minimum maximum number of stages, and if we
895 * sense that the pipeline is empty, we try to increase
896 * it, until we reach the user compile time memory
899 int i
= (tape
->max_pipeline
- tape
->min_pipeline
) / 10;
901 tape
->max_stages
+= max(i
, 1);
902 tape
->max_stages
= max(tape
->max_stages
,
904 tape
->max_stages
= min(tape
->max_stages
,
908 ide_end_drive_cmd(drive
, 0, 0);
909 // blkdev_dequeue_request(rq);
911 // end_that_request_last(rq);
914 idetape_remove_stage_head(drive
);
915 if (tape
->active_data_rq
== NULL
)
916 clear_bit(IDETAPE_PIPELINE_ACTIVE
, &tape
->flags
);
917 spin_unlock_irqrestore(&tape
->lock
, flags
);
921 static ide_startstop_t
idetape_request_sense_callback (ide_drive_t
*drive
)
923 idetape_tape_t
*tape
= drive
->driver_data
;
925 debug_log(DBG_PROCS
, "Enter %s\n", __func__
);
927 if (!tape
->pc
->error
) {
928 idetape_analyze_error(drive
, tape
->pc
->buffer
);
929 idetape_end_request(drive
, 1, 0);
931 printk(KERN_ERR
"ide-tape: Error in REQUEST SENSE itself - Aborting request!\n");
932 idetape_end_request(drive
, 0, 0);
937 static void idetape_create_request_sense_cmd (idetape_pc_t
*pc
)
940 pc
->c
[0] = REQUEST_SENSE
;
942 pc
->request_transfer
= 20;
943 pc
->callback
= &idetape_request_sense_callback
;
946 static void idetape_init_rq(struct request
*rq
, u8 cmd
)
948 memset(rq
, 0, sizeof(*rq
));
949 rq
->cmd_type
= REQ_TYPE_SPECIAL
;
954 * Generate a new packet command request in front of the request queue, before
955 * the current request, so that it will be processed immediately, on the next
956 * pass through the driver. The function below is called from the request
957 * handling part of the driver (the "bottom" part). Safe storage for the request
958 * should be allocated with ide_tape_next_{pc,rq}_storage() prior to that.
960 * Memory for those requests is pre-allocated at initialization time, and is
961 * limited to IDETAPE_PC_STACK requests. We assume that we have enough space for
962 * the maximum possible number of inter-dependent packet commands.
964 * The higher level of the driver - The ioctl handler and the character device
965 * handling functions should queue request to the lower level part and wait for
966 * their completion using idetape_queue_pc_tail or idetape_queue_rw_tail.
968 static void idetape_queue_pc_head (ide_drive_t
*drive
, idetape_pc_t
*pc
,struct request
*rq
)
970 struct ide_tape_obj
*tape
= drive
->driver_data
;
972 idetape_init_rq(rq
, REQ_IDETAPE_PC1
);
973 rq
->buffer
= (char *) pc
;
974 rq
->rq_disk
= tape
->disk
;
975 (void) ide_do_drive_cmd(drive
, rq
, ide_preempt
);
979 * idetape_retry_pc is called when an error was detected during the
980 * last packet command. We queue a request sense packet command in
981 * the head of the request list.
983 static ide_startstop_t
idetape_retry_pc (ide_drive_t
*drive
)
985 idetape_tape_t
*tape
= drive
->driver_data
;
989 (void)ide_read_error(drive
);
990 pc
= idetape_next_pc_storage(drive
);
991 rq
= idetape_next_rq_storage(drive
);
992 idetape_create_request_sense_cmd(pc
);
993 set_bit(IDETAPE_IGNORE_DSC
, &tape
->flags
);
994 idetape_queue_pc_head(drive
, pc
, rq
);
999 * Postpone the current request so that ide.c will be able to service requests
1000 * from another device on the same hwgroup while we are polling for DSC.
1002 static void idetape_postpone_request (ide_drive_t
*drive
)
1004 idetape_tape_t
*tape
= drive
->driver_data
;
1006 debug_log(DBG_PROCS
, "Enter %s\n", __func__
);
1008 tape
->postponed_rq
= HWGROUP(drive
)->rq
;
1009 ide_stall_queue(drive
, tape
->dsc_poll_freq
);
1012 typedef void idetape_io_buf(ide_drive_t
*, idetape_pc_t
*, unsigned int);
1015 * This is the usual interrupt handler which will be called during a packet
1016 * command. We will transfer some of the data (as requested by the drive) and
1017 * will re-point interrupt handler to us. When data transfer is finished, we
1018 * will act according to the algorithm described before
1021 static ide_startstop_t
idetape_pc_intr(ide_drive_t
*drive
)
1023 ide_hwif_t
*hwif
= drive
->hwif
;
1024 idetape_tape_t
*tape
= drive
->driver_data
;
1025 idetape_pc_t
*pc
= tape
->pc
;
1026 xfer_func_t
*xferfunc
;
1027 idetape_io_buf
*iobuf
;
1030 static int error_sim_count
= 0;
1035 debug_log(DBG_PROCS
, "Enter %s - interrupt handler\n", __func__
);
1037 /* Clear the interrupt */
1038 stat
= ide_read_status(drive
);
1040 if (test_bit(PC_DMA_IN_PROGRESS
, &pc
->flags
)) {
1041 if (hwif
->ide_dma_end(drive
) || (stat
& ERR_STAT
)) {
1043 * A DMA error is sometimes expected. For example,
1044 * if the tape is crossing a filemark during a
1045 * READ command, it will issue an irq and position
1046 * itself before the filemark, so that only a partial
1047 * data transfer will occur (which causes the DMA
1048 * error). In that case, we will later ask the tape
1049 * how much bytes of the original request were
1050 * actually transferred (we can't receive that
1051 * information from the DMA engine on most chipsets).
1055 * On the contrary, a DMA error is never expected;
1056 * it usually indicates a hardware error or abort.
1057 * If the tape crosses a filemark during a READ
1058 * command, it will issue an irq and position itself
1059 * after the filemark (not before). Only a partial
1060 * data transfer will occur, but no DMA error.
1063 set_bit(PC_DMA_ERROR
, &pc
->flags
);
1065 pc
->actually_transferred
= pc
->request_transfer
;
1066 idetape_update_buffers(pc
);
1068 debug_log(DBG_PROCS
, "DMA finished\n");
1072 /* No more interrupts */
1073 if ((stat
& DRQ_STAT
) == 0) {
1074 debug_log(DBG_SENSE
, "Packet command completed, %d bytes"
1075 " transferred\n", pc
->actually_transferred
);
1077 clear_bit(PC_DMA_IN_PROGRESS
, &pc
->flags
);
1081 if ((pc
->c
[0] == WRITE_6
|| pc
->c
[0] == READ_6
) &&
1082 (++error_sim_count
% 100) == 0) {
1083 printk(KERN_INFO
"ide-tape: %s: simulating error\n",
1088 if ((stat
& ERR_STAT
) && pc
->c
[0] == REQUEST_SENSE
)
1090 if ((stat
& ERR_STAT
) || test_bit(PC_DMA_ERROR
, &pc
->flags
)) {
1091 /* Error detected */
1092 debug_log(DBG_ERR
, "%s: I/O error\n", tape
->name
);
1094 if (pc
->c
[0] == REQUEST_SENSE
) {
1095 printk(KERN_ERR
"ide-tape: I/O error in request"
1096 " sense command\n");
1097 return ide_do_reset(drive
);
1099 debug_log(DBG_ERR
, "[cmd %x]: check condition\n",
1102 /* Retry operation */
1103 return idetape_retry_pc(drive
);
1106 if (test_bit(PC_WAIT_FOR_DSC
, &pc
->flags
) &&
1107 (stat
& SEEK_STAT
) == 0) {
1108 /* Media access command */
1109 tape
->dsc_polling_start
= jiffies
;
1110 tape
->dsc_poll_freq
= IDETAPE_DSC_MA_FAST
;
1111 tape
->dsc_timeout
= jiffies
+ IDETAPE_DSC_MA_TIMEOUT
;
1112 /* Allow ide.c to handle other requests */
1113 idetape_postpone_request(drive
);
1116 if (tape
->failed_pc
== pc
)
1117 tape
->failed_pc
= NULL
;
1118 /* Command finished - Call the callback function */
1119 return pc
->callback(drive
);
1121 if (test_and_clear_bit(PC_DMA_IN_PROGRESS
, &pc
->flags
)) {
1122 printk(KERN_ERR
"ide-tape: The tape wants to issue more "
1123 "interrupts in DMA mode\n");
1124 printk(KERN_ERR
"ide-tape: DMA disabled, reverting to PIO\n");
1126 return ide_do_reset(drive
);
1128 /* Get the number of bytes to transfer on this interrupt. */
1129 bcount
= (hwif
->INB(IDE_BCOUNTH_REG
) << 8) |
1130 hwif
->INB(IDE_BCOUNTL_REG
);
1132 ireason
= hwif
->INB(IDE_IREASON_REG
);
1135 printk(KERN_ERR
"ide-tape: CoD != 0 in %s\n", __func__
);
1136 return ide_do_reset(drive
);
1138 if (((ireason
& IO
) == IO
) == test_bit(PC_WRITING
, &pc
->flags
)) {
1139 /* Hopefully, we will never get here */
1140 printk(KERN_ERR
"ide-tape: We wanted to %s, ",
1141 (ireason
& IO
) ? "Write" : "Read");
1142 printk(KERN_ERR
"ide-tape: but the tape wants us to %s !\n",
1143 (ireason
& IO
) ? "Read" : "Write");
1144 return ide_do_reset(drive
);
1146 if (!test_bit(PC_WRITING
, &pc
->flags
)) {
1147 /* Reading - Check that we have enough space */
1148 temp
= pc
->actually_transferred
+ bcount
;
1149 if (temp
> pc
->request_transfer
) {
1150 if (temp
> pc
->buffer_size
) {
1151 printk(KERN_ERR
"ide-tape: The tape wants to "
1152 "send us more data than expected "
1153 "- discarding data\n");
1154 idetape_discard_data(drive
, bcount
);
1155 ide_set_handler(drive
, &idetape_pc_intr
,
1156 IDETAPE_WAIT_CMD
, NULL
);
1159 debug_log(DBG_SENSE
, "The tape wants to send us more "
1160 "data than expected - allowing transfer\n");
1162 iobuf
= &idetape_input_buffers
;
1163 xferfunc
= hwif
->atapi_input_bytes
;
1165 iobuf
= &idetape_output_buffers
;
1166 xferfunc
= hwif
->atapi_output_bytes
;
1170 iobuf(drive
, pc
, bcount
);
1172 xferfunc(drive
, pc
->current_position
, bcount
);
1174 /* Update the current position */
1175 pc
->actually_transferred
+= bcount
;
1176 pc
->current_position
+= bcount
;
1178 debug_log(DBG_SENSE
, "[cmd %x] transferred %d bytes on that intr.\n",
1181 /* And set the interrupt handler again */
1182 ide_set_handler(drive
, &idetape_pc_intr
, IDETAPE_WAIT_CMD
, NULL
);
1187 * Packet Command Interface
1189 * The current Packet Command is available in tape->pc, and will not change
1190 * until we finish handling it. Each packet command is associated with a
1191 * callback function that will be called when the command is finished.
1193 * The handling will be done in three stages:
1195 * 1. idetape_issue_pc will send the packet command to the drive, and will set
1196 * the interrupt handler to idetape_pc_intr.
1198 * 2. On each interrupt, idetape_pc_intr will be called. This step will be
1199 * repeated until the device signals us that no more interrupts will be issued.
1201 * 3. ATAPI Tape media access commands have immediate status with a delayed
1202 * process. In case of a successful initiation of a media access packet command,
1203 * the DSC bit will be set when the actual execution of the command is finished.
1204 * Since the tape drive will not issue an interrupt, we have to poll for this
1205 * event. In this case, we define the request as "low priority request" by
1206 * setting rq_status to IDETAPE_RQ_POSTPONED, set a timer to poll for DSC and
1209 * ide.c will then give higher priority to requests which originate from the
1210 * other device, until will change rq_status to RQ_ACTIVE.
1212 * 4. When the packet command is finished, it will be checked for errors.
1214 * 5. In case an error was found, we queue a request sense packet command in
1215 * front of the request queue and retry the operation up to
1216 * IDETAPE_MAX_PC_RETRIES times.
1218 * 6. In case no error was found, or we decided to give up and not to retry
1219 * again, the callback function will be called and then we will handle the next
1222 static ide_startstop_t
idetape_transfer_pc(ide_drive_t
*drive
)
1224 ide_hwif_t
*hwif
= drive
->hwif
;
1225 idetape_tape_t
*tape
= drive
->driver_data
;
1226 idetape_pc_t
*pc
= tape
->pc
;
1228 ide_startstop_t startstop
;
1231 if (ide_wait_stat(&startstop
,drive
,DRQ_STAT
,BUSY_STAT
,WAIT_READY
)) {
1232 printk(KERN_ERR
"ide-tape: Strange, packet command initiated yet DRQ isn't asserted\n");
1235 ireason
= hwif
->INB(IDE_IREASON_REG
);
1236 while (retries
-- && ((ireason
& CD
) == 0 || (ireason
& IO
))) {
1237 printk(KERN_ERR
"ide-tape: (IO,CoD != (0,1) while issuing "
1238 "a packet command, retrying\n");
1240 ireason
= hwif
->INB(IDE_IREASON_REG
);
1242 printk(KERN_ERR
"ide-tape: (IO,CoD != (0,1) while "
1243 "issuing a packet command, ignoring\n");
1248 if ((ireason
& CD
) == 0 || (ireason
& IO
)) {
1249 printk(KERN_ERR
"ide-tape: (IO,CoD) != (0,1) while issuing "
1250 "a packet command\n");
1251 return ide_do_reset(drive
);
1253 /* Set the interrupt routine */
1254 ide_set_handler(drive
, &idetape_pc_intr
, IDETAPE_WAIT_CMD
, NULL
);
1255 #ifdef CONFIG_BLK_DEV_IDEDMA
1256 /* Begin DMA, if necessary */
1257 if (test_bit(PC_DMA_IN_PROGRESS
, &pc
->flags
))
1258 hwif
->dma_start(drive
);
1260 /* Send the actual packet */
1261 HWIF(drive
)->atapi_output_bytes(drive
, pc
->c
, 12);
1265 static ide_startstop_t
idetape_issue_pc(ide_drive_t
*drive
, idetape_pc_t
*pc
)
1267 ide_hwif_t
*hwif
= drive
->hwif
;
1268 idetape_tape_t
*tape
= drive
->driver_data
;
1272 if (tape
->pc
->c
[0] == REQUEST_SENSE
&&
1273 pc
->c
[0] == REQUEST_SENSE
) {
1274 printk(KERN_ERR
"ide-tape: possible ide-tape.c bug - "
1275 "Two request sense in serial were issued\n");
1278 if (tape
->failed_pc
== NULL
&& pc
->c
[0] != REQUEST_SENSE
)
1279 tape
->failed_pc
= pc
;
1280 /* Set the current packet command */
1283 if (pc
->retries
> IDETAPE_MAX_PC_RETRIES
||
1284 test_bit(PC_ABORT
, &pc
->flags
)) {
1286 * We will "abort" retrying a packet command in case legitimate
1287 * error code was received (crossing a filemark, or end of the
1288 * media, for example).
1290 if (!test_bit(PC_ABORT
, &pc
->flags
)) {
1291 if (!(pc
->c
[0] == TEST_UNIT_READY
&&
1292 tape
->sense_key
== 2 && tape
->asc
== 4 &&
1293 (tape
->ascq
== 1 || tape
->ascq
== 8))) {
1294 printk(KERN_ERR
"ide-tape: %s: I/O error, "
1295 "pc = %2x, key = %2x, "
1296 "asc = %2x, ascq = %2x\n",
1297 tape
->name
, pc
->c
[0],
1298 tape
->sense_key
, tape
->asc
,
1302 pc
->error
= IDETAPE_ERROR_GENERAL
;
1304 tape
->failed_pc
= NULL
;
1305 return pc
->callback(drive
);
1307 debug_log(DBG_SENSE
, "Retry #%d, cmd = %02X\n", pc
->retries
, pc
->c
[0]);
1310 /* We haven't transferred any data yet */
1311 pc
->actually_transferred
= 0;
1312 pc
->current_position
= pc
->buffer
;
1313 /* Request to transfer the entire buffer at once */
1314 bcount
= pc
->request_transfer
;
1316 if (test_and_clear_bit(PC_DMA_ERROR
, &pc
->flags
)) {
1317 printk(KERN_WARNING
"ide-tape: DMA disabled, "
1318 "reverting to PIO\n");
1321 if (test_bit(PC_DMA_RECOMMENDED
, &pc
->flags
) && drive
->using_dma
)
1322 dma_ok
= !hwif
->dma_setup(drive
);
1324 ide_pktcmd_tf_load(drive
, IDE_TFLAG_NO_SELECT_MASK
|
1325 IDE_TFLAG_OUT_DEVICE
, bcount
, dma_ok
);
1327 if (dma_ok
) /* Will begin DMA later */
1328 set_bit(PC_DMA_IN_PROGRESS
, &pc
->flags
);
1329 if (test_bit(IDETAPE_DRQ_INTERRUPT
, &tape
->flags
)) {
1330 ide_execute_command(drive
, WIN_PACKETCMD
, &idetape_transfer_pc
,
1331 IDETAPE_WAIT_CMD
, NULL
);
1334 hwif
->OUTB(WIN_PACKETCMD
, IDE_COMMAND_REG
);
1335 return idetape_transfer_pc(drive
);
1339 static ide_startstop_t
idetape_pc_callback (ide_drive_t
*drive
)
1341 idetape_tape_t
*tape
= drive
->driver_data
;
1343 debug_log(DBG_PROCS
, "Enter %s\n", __func__
);
1345 idetape_end_request(drive
, tape
->pc
->error
? 0 : 1, 0);
1349 /* A mode sense command is used to "sense" tape parameters. */
1350 static void idetape_create_mode_sense_cmd (idetape_pc_t
*pc
, u8 page_code
)
1352 idetape_init_pc(pc
);
1353 pc
->c
[0] = MODE_SENSE
;
1354 if (page_code
!= IDETAPE_BLOCK_DESCRIPTOR
)
1355 /* DBD = 1 - Don't return block descriptors */
1357 pc
->c
[2] = page_code
;
1359 * Changed pc->c[3] to 0 (255 will at best return unused info).
1361 * For SCSI this byte is defined as subpage instead of high byte
1362 * of length and some IDE drives seem to interpret it this way
1363 * and return an error when 255 is used.
1366 /* We will just discard data in that case */
1368 if (page_code
== IDETAPE_BLOCK_DESCRIPTOR
)
1369 pc
->request_transfer
= 12;
1370 else if (page_code
== IDETAPE_CAPABILITIES_PAGE
)
1371 pc
->request_transfer
= 24;
1373 pc
->request_transfer
= 50;
1374 pc
->callback
= &idetape_pc_callback
;
1377 static void idetape_calculate_speeds(ide_drive_t
*drive
)
1379 idetape_tape_t
*tape
= drive
->driver_data
;
1381 if (time_after(jiffies
, tape
->controlled_pipeline_head_time
+ 120 * HZ
)) {
1382 tape
->controlled_previous_pipeline_head
= tape
->controlled_last_pipeline_head
;
1383 tape
->controlled_previous_head_time
= tape
->controlled_pipeline_head_time
;
1384 tape
->controlled_last_pipeline_head
= tape
->pipeline_head
;
1385 tape
->controlled_pipeline_head_time
= jiffies
;
1387 if (time_after(jiffies
, tape
->controlled_pipeline_head_time
+ 60 * HZ
))
1388 tape
->controlled_pipeline_head_speed
= (tape
->pipeline_head
- tape
->controlled_last_pipeline_head
) * 32 * HZ
/ (jiffies
- tape
->controlled_pipeline_head_time
);
1389 else if (time_after(jiffies
, tape
->controlled_previous_head_time
))
1390 tape
->controlled_pipeline_head_speed
= (tape
->pipeline_head
- tape
->controlled_previous_pipeline_head
) * 32 * HZ
/ (jiffies
- tape
->controlled_previous_head_time
);
1392 if (tape
->nr_pending_stages
< tape
->max_stages
/*- 1 */) {
1393 /* -1 for read mode error recovery */
1394 if (time_after(jiffies
, tape
->uncontrolled_previous_head_time
+ 10 * HZ
)) {
1395 tape
->uncontrolled_pipeline_head_time
= jiffies
;
1396 tape
->uncontrolled_pipeline_head_speed
= (tape
->pipeline_head
- tape
->uncontrolled_previous_pipeline_head
) * 32 * HZ
/ (jiffies
- tape
->uncontrolled_previous_head_time
);
1399 tape
->uncontrolled_previous_head_time
= jiffies
;
1400 tape
->uncontrolled_previous_pipeline_head
= tape
->pipeline_head
;
1401 if (time_after(jiffies
, tape
->uncontrolled_pipeline_head_time
+ 30 * HZ
)) {
1402 tape
->uncontrolled_pipeline_head_time
= jiffies
;
1405 tape
->pipeline_head_speed
= max(tape
->uncontrolled_pipeline_head_speed
, tape
->controlled_pipeline_head_speed
);
1407 if (tape
->speed_control
== 1) {
1408 if (tape
->nr_pending_stages
>= tape
->max_stages
/ 2)
1409 tape
->max_insert_speed
= tape
->pipeline_head_speed
+
1410 (1100 - tape
->pipeline_head_speed
) * 2 * (tape
->nr_pending_stages
- tape
->max_stages
/ 2) / tape
->max_stages
;
1412 tape
->max_insert_speed
= 500 +
1413 (tape
->pipeline_head_speed
- 500) * 2 * tape
->nr_pending_stages
/ tape
->max_stages
;
1415 if (tape
->nr_pending_stages
>= tape
->max_stages
* 99 / 100)
1416 tape
->max_insert_speed
= 5000;
1418 tape
->max_insert_speed
= tape
->speed_control
;
1420 tape
->max_insert_speed
= max(tape
->max_insert_speed
, 500);
1423 static ide_startstop_t
idetape_media_access_finished (ide_drive_t
*drive
)
1425 idetape_tape_t
*tape
= drive
->driver_data
;
1426 idetape_pc_t
*pc
= tape
->pc
;
1429 stat
= ide_read_status(drive
);
1431 if (stat
& SEEK_STAT
) {
1432 if (stat
& ERR_STAT
) {
1433 /* Error detected */
1434 if (pc
->c
[0] != TEST_UNIT_READY
)
1435 printk(KERN_ERR
"ide-tape: %s: I/O error, ",
1437 /* Retry operation */
1438 return idetape_retry_pc(drive
);
1441 if (tape
->failed_pc
== pc
)
1442 tape
->failed_pc
= NULL
;
1444 pc
->error
= IDETAPE_ERROR_GENERAL
;
1445 tape
->failed_pc
= NULL
;
1447 return pc
->callback(drive
);
1450 static ide_startstop_t
idetape_rw_callback (ide_drive_t
*drive
)
1452 idetape_tape_t
*tape
= drive
->driver_data
;
1453 struct request
*rq
= HWGROUP(drive
)->rq
;
1454 int blocks
= tape
->pc
->actually_transferred
/ tape
->blk_size
;
1456 tape
->avg_size
+= blocks
* tape
->blk_size
;
1457 tape
->insert_size
+= blocks
* tape
->blk_size
;
1458 if (tape
->insert_size
> 1024 * 1024)
1459 tape
->measure_insert_time
= 1;
1460 if (tape
->measure_insert_time
) {
1461 tape
->measure_insert_time
= 0;
1462 tape
->insert_time
= jiffies
;
1463 tape
->insert_size
= 0;
1465 if (time_after(jiffies
, tape
->insert_time
))
1466 tape
->insert_speed
= tape
->insert_size
/ 1024 * HZ
/ (jiffies
- tape
->insert_time
);
1467 if (time_after_eq(jiffies
, tape
->avg_time
+ HZ
)) {
1468 tape
->avg_speed
= tape
->avg_size
* HZ
/ (jiffies
- tape
->avg_time
) / 1024;
1470 tape
->avg_time
= jiffies
;
1472 debug_log(DBG_PROCS
, "Enter %s\n", __func__
);
1474 tape
->first_frame
+= blocks
;
1475 rq
->current_nr_sectors
-= blocks
;
1477 if (!tape
->pc
->error
)
1478 idetape_end_request(drive
, 1, 0);
1480 idetape_end_request(drive
, tape
->pc
->error
, 0);
1484 static void idetape_create_read_cmd(idetape_tape_t
*tape
, idetape_pc_t
*pc
, unsigned int length
, struct idetape_bh
*bh
)
1486 idetape_init_pc(pc
);
1488 put_unaligned(cpu_to_be32(length
), (unsigned int *) &pc
->c
[1]);
1490 pc
->callback
= &idetape_rw_callback
;
1492 atomic_set(&bh
->b_count
, 0);
1494 pc
->buffer_size
= length
* tape
->blk_size
;
1495 pc
->request_transfer
= pc
->buffer_size
;
1496 if (pc
->request_transfer
== tape
->stage_size
)
1497 set_bit(PC_DMA_RECOMMENDED
, &pc
->flags
);
1500 static void idetape_create_read_buffer_cmd(idetape_tape_t
*tape
,
1501 idetape_pc_t
*pc
, struct idetape_bh
*bh
)
1504 struct idetape_bh
*p
= bh
;
1506 idetape_init_pc(pc
);
1507 pc
->c
[0] = READ_BUFFER
;
1508 pc
->c
[1] = IDETAPE_RETRIEVE_FAULTY_BLOCK
;
1509 pc
->c
[7] = size
>> 8;
1510 pc
->c
[8] = size
& 0xff;
1511 pc
->callback
= &idetape_pc_callback
;
1513 atomic_set(&bh
->b_count
, 0);
1516 atomic_set(&p
->b_count
, 0);
1519 pc
->request_transfer
= size
;
1520 pc
->buffer_size
= size
;
1523 static void idetape_create_write_cmd(idetape_tape_t
*tape
, idetape_pc_t
*pc
, unsigned int length
, struct idetape_bh
*bh
)
1525 idetape_init_pc(pc
);
1527 put_unaligned(cpu_to_be32(length
), (unsigned int *) &pc
->c
[1]);
1529 pc
->callback
= &idetape_rw_callback
;
1530 set_bit(PC_WRITING
, &pc
->flags
);
1532 pc
->b_data
= bh
->b_data
;
1533 pc
->b_count
= atomic_read(&bh
->b_count
);
1535 pc
->buffer_size
= length
* tape
->blk_size
;
1536 pc
->request_transfer
= pc
->buffer_size
;
1537 if (pc
->request_transfer
== tape
->stage_size
)
1538 set_bit(PC_DMA_RECOMMENDED
, &pc
->flags
);
1541 static ide_startstop_t
idetape_do_request(ide_drive_t
*drive
,
1542 struct request
*rq
, sector_t block
)
1544 idetape_tape_t
*tape
= drive
->driver_data
;
1545 idetape_pc_t
*pc
= NULL
;
1546 struct request
*postponed_rq
= tape
->postponed_rq
;
1549 debug_log(DBG_SENSE
, "sector: %ld, nr_sectors: %ld,"
1550 " current_nr_sectors: %d\n",
1551 rq
->sector
, rq
->nr_sectors
, rq
->current_nr_sectors
);
1553 if (!blk_special_request(rq
)) {
1554 /* We do not support buffer cache originated requests. */
1555 printk(KERN_NOTICE
"ide-tape: %s: Unsupported request in "
1556 "request queue (%d)\n", drive
->name
, rq
->cmd_type
);
1557 ide_end_request(drive
, 0, 0);
1561 /* Retry a failed packet command */
1562 if (tape
->failed_pc
!= NULL
&&
1563 tape
->pc
->c
[0] == REQUEST_SENSE
) {
1564 return idetape_issue_pc(drive
, tape
->failed_pc
);
1566 if (postponed_rq
!= NULL
)
1567 if (rq
!= postponed_rq
) {
1568 printk(KERN_ERR
"ide-tape: ide-tape.c bug - "
1569 "Two DSC requests were queued\n");
1570 idetape_end_request(drive
, 0, 0);
1574 tape
->postponed_rq
= NULL
;
1577 * If the tape is still busy, postpone our request and service
1578 * the other device meanwhile.
1580 stat
= ide_read_status(drive
);
1582 if (!drive
->dsc_overlap
&& !(rq
->cmd
[0] & REQ_IDETAPE_PC2
))
1583 set_bit(IDETAPE_IGNORE_DSC
, &tape
->flags
);
1585 if (drive
->post_reset
== 1) {
1586 set_bit(IDETAPE_IGNORE_DSC
, &tape
->flags
);
1587 drive
->post_reset
= 0;
1590 if (time_after(jiffies
, tape
->insert_time
))
1591 tape
->insert_speed
= tape
->insert_size
/ 1024 * HZ
/ (jiffies
- tape
->insert_time
);
1592 idetape_calculate_speeds(drive
);
1593 if (!test_and_clear_bit(IDETAPE_IGNORE_DSC
, &tape
->flags
) &&
1594 (stat
& SEEK_STAT
) == 0) {
1595 if (postponed_rq
== NULL
) {
1596 tape
->dsc_polling_start
= jiffies
;
1597 tape
->dsc_poll_freq
= tape
->best_dsc_rw_freq
;
1598 tape
->dsc_timeout
= jiffies
+ IDETAPE_DSC_RW_TIMEOUT
;
1599 } else if (time_after(jiffies
, tape
->dsc_timeout
)) {
1600 printk(KERN_ERR
"ide-tape: %s: DSC timeout\n",
1602 if (rq
->cmd
[0] & REQ_IDETAPE_PC2
) {
1603 idetape_media_access_finished(drive
);
1606 return ide_do_reset(drive
);
1608 } else if (time_after(jiffies
, tape
->dsc_polling_start
+ IDETAPE_DSC_MA_THRESHOLD
))
1609 tape
->dsc_poll_freq
= IDETAPE_DSC_MA_SLOW
;
1610 idetape_postpone_request(drive
);
1613 if (rq
->cmd
[0] & REQ_IDETAPE_READ
) {
1614 tape
->buffer_head
++;
1615 tape
->postpone_cnt
= 0;
1616 pc
= idetape_next_pc_storage(drive
);
1617 idetape_create_read_cmd(tape
, pc
, rq
->current_nr_sectors
, (struct idetape_bh
*)rq
->special
);
1620 if (rq
->cmd
[0] & REQ_IDETAPE_WRITE
) {
1621 tape
->buffer_head
++;
1622 tape
->postpone_cnt
= 0;
1623 pc
= idetape_next_pc_storage(drive
);
1624 idetape_create_write_cmd(tape
, pc
, rq
->current_nr_sectors
, (struct idetape_bh
*)rq
->special
);
1627 if (rq
->cmd
[0] & REQ_IDETAPE_READ_BUFFER
) {
1628 tape
->postpone_cnt
= 0;
1629 pc
= idetape_next_pc_storage(drive
);
1630 idetape_create_read_buffer_cmd(tape
, pc
,
1631 (struct idetape_bh
*)rq
->special
);
1634 if (rq
->cmd
[0] & REQ_IDETAPE_PC1
) {
1635 pc
= (idetape_pc_t
*) rq
->buffer
;
1636 rq
->cmd
[0] &= ~(REQ_IDETAPE_PC1
);
1637 rq
->cmd
[0] |= REQ_IDETAPE_PC2
;
1640 if (rq
->cmd
[0] & REQ_IDETAPE_PC2
) {
1641 idetape_media_access_finished(drive
);
1646 return idetape_issue_pc(drive
, pc
);
1649 /* Pipeline related functions */
1650 static inline int idetape_pipeline_active (idetape_tape_t
*tape
)
1654 rc1
= test_bit(IDETAPE_PIPELINE_ACTIVE
, &tape
->flags
);
1655 rc2
= (tape
->active_data_rq
!= NULL
);
1660 * The function below uses __get_free_page to allocate a pipeline stage, along
1661 * with all the necessary small buffers which together make a buffer of size
1662 * tape->stage_size (or a bit more). We attempt to combine sequential pages as
1665 * It returns a pointer to the new allocated stage, or NULL if we can't (or
1666 * don't want to) allocate a stage.
1668 * Pipeline stages are optional and are used to increase performance. If we
1669 * can't allocate them, we'll manage without them.
1671 static idetape_stage_t
*__idetape_kmalloc_stage (idetape_tape_t
*tape
, int full
, int clear
)
1673 idetape_stage_t
*stage
;
1674 struct idetape_bh
*prev_bh
, *bh
;
1675 int pages
= tape
->pages_per_stage
;
1676 char *b_data
= NULL
;
1678 if ((stage
= kmalloc(sizeof (idetape_stage_t
),GFP_KERNEL
)) == NULL
)
1682 bh
= stage
->bh
= kmalloc(sizeof(struct idetape_bh
), GFP_KERNEL
);
1685 bh
->b_reqnext
= NULL
;
1686 if ((bh
->b_data
= (char *) __get_free_page (GFP_KERNEL
)) == NULL
)
1689 memset(bh
->b_data
, 0, PAGE_SIZE
);
1690 bh
->b_size
= PAGE_SIZE
;
1691 atomic_set(&bh
->b_count
, full
? bh
->b_size
: 0);
1694 if ((b_data
= (char *) __get_free_page (GFP_KERNEL
)) == NULL
)
1697 memset(b_data
, 0, PAGE_SIZE
);
1698 if (bh
->b_data
== b_data
+ PAGE_SIZE
) {
1699 bh
->b_size
+= PAGE_SIZE
;
1700 bh
->b_data
-= PAGE_SIZE
;
1702 atomic_add(PAGE_SIZE
, &bh
->b_count
);
1705 if (b_data
== bh
->b_data
+ bh
->b_size
) {
1706 bh
->b_size
+= PAGE_SIZE
;
1708 atomic_add(PAGE_SIZE
, &bh
->b_count
);
1712 if ((bh
= kmalloc(sizeof(struct idetape_bh
), GFP_KERNEL
)) == NULL
) {
1713 free_page((unsigned long) b_data
);
1716 bh
->b_reqnext
= NULL
;
1717 bh
->b_data
= b_data
;
1718 bh
->b_size
= PAGE_SIZE
;
1719 atomic_set(&bh
->b_count
, full
? bh
->b_size
: 0);
1720 prev_bh
->b_reqnext
= bh
;
1722 bh
->b_size
-= tape
->excess_bh_size
;
1724 atomic_sub(tape
->excess_bh_size
, &bh
->b_count
);
1727 __idetape_kfree_stage(stage
);
1731 static idetape_stage_t
*idetape_kmalloc_stage (idetape_tape_t
*tape
)
1733 idetape_stage_t
*cache_stage
= tape
->cache_stage
;
1735 debug_log(DBG_PROCS
, "Enter %s\n", __func__
);
1737 if (tape
->nr_stages
>= tape
->max_stages
)
1739 if (cache_stage
!= NULL
) {
1740 tape
->cache_stage
= NULL
;
1743 return __idetape_kmalloc_stage(tape
, 0, 0);
1746 static int idetape_copy_stage_from_user (idetape_tape_t
*tape
, idetape_stage_t
*stage
, const char __user
*buf
, int n
)
1748 struct idetape_bh
*bh
= tape
->bh
;
1754 printk(KERN_ERR
"ide-tape: bh == NULL in "
1755 "idetape_copy_stage_from_user\n");
1758 count
= min((unsigned int)(bh
->b_size
- atomic_read(&bh
->b_count
)), (unsigned int)n
);
1759 if (copy_from_user(bh
->b_data
+ atomic_read(&bh
->b_count
), buf
, count
))
1762 atomic_add(count
, &bh
->b_count
);
1764 if (atomic_read(&bh
->b_count
) == bh
->b_size
) {
1767 atomic_set(&bh
->b_count
, 0);
1774 static int idetape_copy_stage_to_user (idetape_tape_t
*tape
, char __user
*buf
, idetape_stage_t
*stage
, int n
)
1776 struct idetape_bh
*bh
= tape
->bh
;
1782 printk(KERN_ERR
"ide-tape: bh == NULL in "
1783 "idetape_copy_stage_to_user\n");
1786 count
= min(tape
->b_count
, n
);
1787 if (copy_to_user(buf
, tape
->b_data
, count
))
1790 tape
->b_data
+= count
;
1791 tape
->b_count
-= count
;
1793 if (!tape
->b_count
) {
1794 tape
->bh
= bh
= bh
->b_reqnext
;
1796 tape
->b_data
= bh
->b_data
;
1797 tape
->b_count
= atomic_read(&bh
->b_count
);
1804 static void idetape_init_merge_stage (idetape_tape_t
*tape
)
1806 struct idetape_bh
*bh
= tape
->merge_stage
->bh
;
1809 if (tape
->chrdev_dir
== IDETAPE_DIR_WRITE
)
1810 atomic_set(&bh
->b_count
, 0);
1812 tape
->b_data
= bh
->b_data
;
1813 tape
->b_count
= atomic_read(&bh
->b_count
);
1817 static void idetape_switch_buffers (idetape_tape_t
*tape
, idetape_stage_t
*stage
)
1819 struct idetape_bh
*tmp
;
1822 stage
->bh
= tape
->merge_stage
->bh
;
1823 tape
->merge_stage
->bh
= tmp
;
1824 idetape_init_merge_stage(tape
);
1827 /* Add a new stage at the end of the pipeline. */
1828 static void idetape_add_stage_tail (ide_drive_t
*drive
,idetape_stage_t
*stage
)
1830 idetape_tape_t
*tape
= drive
->driver_data
;
1831 unsigned long flags
;
1833 debug_log(DBG_PROCS
, "Enter %s\n", __func__
);
1835 spin_lock_irqsave(&tape
->lock
, flags
);
1837 if (tape
->last_stage
!= NULL
)
1838 tape
->last_stage
->next
=stage
;
1840 tape
->first_stage
= tape
->next_stage
=stage
;
1841 tape
->last_stage
= stage
;
1842 if (tape
->next_stage
== NULL
)
1843 tape
->next_stage
= tape
->last_stage
;
1845 tape
->nr_pending_stages
++;
1846 spin_unlock_irqrestore(&tape
->lock
, flags
);
1849 /* Install a completion in a pending request and sleep until it is serviced. The
1850 * caller should ensure that the request will not be serviced before we install
1851 * the completion (usually by disabling interrupts).
1853 static void idetape_wait_for_request (ide_drive_t
*drive
, struct request
*rq
)
1855 DECLARE_COMPLETION_ONSTACK(wait
);
1856 idetape_tape_t
*tape
= drive
->driver_data
;
1858 if (rq
== NULL
|| !blk_special_request(rq
)) {
1859 printk (KERN_ERR
"ide-tape: bug: Trying to sleep on non-valid request\n");
1862 rq
->end_io_data
= &wait
;
1863 rq
->end_io
= blk_end_sync_rq
;
1864 spin_unlock_irq(&tape
->lock
);
1865 wait_for_completion(&wait
);
1866 /* The stage and its struct request have been deallocated */
1867 spin_lock_irq(&tape
->lock
);
1870 static ide_startstop_t
idetape_read_position_callback(ide_drive_t
*drive
)
1872 idetape_tape_t
*tape
= drive
->driver_data
;
1873 u8
*readpos
= tape
->pc
->buffer
;
1875 debug_log(DBG_PROCS
, "Enter %s\n", __func__
);
1877 if (!tape
->pc
->error
) {
1878 debug_log(DBG_SENSE
, "BOP - %s\n",
1879 (readpos
[0] & 0x80) ? "Yes" : "No");
1880 debug_log(DBG_SENSE
, "EOP - %s\n",
1881 (readpos
[0] & 0x40) ? "Yes" : "No");
1883 if (readpos
[0] & 0x4) {
1884 printk(KERN_INFO
"ide-tape: Block location is unknown"
1886 clear_bit(IDETAPE_ADDRESS_VALID
, &tape
->flags
);
1887 idetape_end_request(drive
, 0, 0);
1889 debug_log(DBG_SENSE
, "Block Location - %u\n",
1890 be32_to_cpu(*(u32
*)&readpos
[4]));
1892 tape
->partition
= readpos
[1];
1894 be32_to_cpu(*(u32
*)&readpos
[4]);
1895 set_bit(IDETAPE_ADDRESS_VALID
, &tape
->flags
);
1896 idetape_end_request(drive
, 1, 0);
1899 idetape_end_request(drive
, 0, 0);
1905 * Write a filemark if write_filemark=1. Flush the device buffers without
1906 * writing a filemark otherwise.
1908 static void idetape_create_write_filemark_cmd (ide_drive_t
*drive
, idetape_pc_t
*pc
,int write_filemark
)
1910 idetape_init_pc(pc
);
1911 pc
->c
[0] = WRITE_FILEMARKS
;
1912 pc
->c
[4] = write_filemark
;
1913 set_bit(PC_WAIT_FOR_DSC
, &pc
->flags
);
1914 pc
->callback
= &idetape_pc_callback
;
1917 static void idetape_create_test_unit_ready_cmd(idetape_pc_t
*pc
)
1919 idetape_init_pc(pc
);
1920 pc
->c
[0] = TEST_UNIT_READY
;
1921 pc
->callback
= &idetape_pc_callback
;
1925 * We add a special packet command request to the tail of the request queue, and
1926 * wait for it to be serviced. This is not to be called from within the request
1927 * handling part of the driver! We allocate here data on the stack and it is
1928 * valid until the request is finished. This is not the case for the bottom part
1929 * of the driver, where we are always leaving the functions to wait for an
1930 * interrupt or a timer event.
1932 * From the bottom part of the driver, we should allocate safe memory using
1933 * idetape_next_pc_storage() and ide_tape_next_rq_storage(), and add the request
1934 * to the request list without waiting for it to be serviced! In that case, we
1935 * usually use idetape_queue_pc_head().
1937 static int __idetape_queue_pc_tail (ide_drive_t
*drive
, idetape_pc_t
*pc
)
1939 struct ide_tape_obj
*tape
= drive
->driver_data
;
1942 idetape_init_rq(&rq
, REQ_IDETAPE_PC1
);
1943 rq
.buffer
= (char *) pc
;
1944 rq
.rq_disk
= tape
->disk
;
1945 return ide_do_drive_cmd(drive
, &rq
, ide_wait
);
1948 static void idetape_create_load_unload_cmd (ide_drive_t
*drive
, idetape_pc_t
*pc
,int cmd
)
1950 idetape_init_pc(pc
);
1951 pc
->c
[0] = START_STOP
;
1953 set_bit(PC_WAIT_FOR_DSC
, &pc
->flags
);
1954 pc
->callback
= &idetape_pc_callback
;
1957 static int idetape_wait_ready(ide_drive_t
*drive
, unsigned long timeout
)
1959 idetape_tape_t
*tape
= drive
->driver_data
;
1961 int load_attempted
= 0;
1963 /* Wait for the tape to become ready */
1964 set_bit(IDETAPE_MEDIUM_PRESENT
, &tape
->flags
);
1966 while (time_before(jiffies
, timeout
)) {
1967 idetape_create_test_unit_ready_cmd(&pc
);
1968 if (!__idetape_queue_pc_tail(drive
, &pc
))
1970 if ((tape
->sense_key
== 2 && tape
->asc
== 4 && tape
->ascq
== 2)
1971 || (tape
->asc
== 0x3A)) {
1975 idetape_create_load_unload_cmd(drive
, &pc
, IDETAPE_LU_LOAD_MASK
);
1976 __idetape_queue_pc_tail(drive
, &pc
);
1978 /* not about to be ready */
1979 } else if (!(tape
->sense_key
== 2 && tape
->asc
== 4 &&
1980 (tape
->ascq
== 1 || tape
->ascq
== 8)))
1987 static int idetape_queue_pc_tail (ide_drive_t
*drive
,idetape_pc_t
*pc
)
1989 return __idetape_queue_pc_tail(drive
, pc
);
1992 static int idetape_flush_tape_buffers (ide_drive_t
*drive
)
1997 idetape_create_write_filemark_cmd(drive
, &pc
, 0);
1998 if ((rc
= idetape_queue_pc_tail(drive
, &pc
)))
2000 idetape_wait_ready(drive
, 60 * 5 * HZ
);
2004 static void idetape_create_read_position_cmd (idetape_pc_t
*pc
)
2006 idetape_init_pc(pc
);
2007 pc
->c
[0] = READ_POSITION
;
2008 pc
->request_transfer
= 20;
2009 pc
->callback
= &idetape_read_position_callback
;
2012 static int idetape_read_position (ide_drive_t
*drive
)
2014 idetape_tape_t
*tape
= drive
->driver_data
;
2018 debug_log(DBG_PROCS
, "Enter %s\n", __func__
);
2020 idetape_create_read_position_cmd(&pc
);
2021 if (idetape_queue_pc_tail(drive
, &pc
))
2023 position
= tape
->first_frame
;
2027 static void idetape_create_locate_cmd (ide_drive_t
*drive
, idetape_pc_t
*pc
, unsigned int block
, u8 partition
, int skip
)
2029 idetape_init_pc(pc
);
2030 pc
->c
[0] = POSITION_TO_ELEMENT
;
2032 put_unaligned(cpu_to_be32(block
), (unsigned int *) &pc
->c
[3]);
2033 pc
->c
[8] = partition
;
2034 set_bit(PC_WAIT_FOR_DSC
, &pc
->flags
);
2035 pc
->callback
= &idetape_pc_callback
;
2038 static int idetape_create_prevent_cmd (ide_drive_t
*drive
, idetape_pc_t
*pc
, int prevent
)
2040 idetape_tape_t
*tape
= drive
->driver_data
;
2042 /* device supports locking according to capabilities page */
2043 if (!(tape
->caps
[6] & 0x01))
2046 idetape_init_pc(pc
);
2047 pc
->c
[0] = ALLOW_MEDIUM_REMOVAL
;
2049 pc
->callback
= &idetape_pc_callback
;
2053 static int __idetape_discard_read_pipeline (ide_drive_t
*drive
)
2055 idetape_tape_t
*tape
= drive
->driver_data
;
2056 unsigned long flags
;
2059 if (tape
->chrdev_dir
!= IDETAPE_DIR_READ
)
2062 /* Remove merge stage. */
2063 cnt
= tape
->merge_stage_size
/ tape
->blk_size
;
2064 if (test_and_clear_bit(IDETAPE_FILEMARK
, &tape
->flags
))
2065 ++cnt
; /* Filemarks count as 1 sector */
2066 tape
->merge_stage_size
= 0;
2067 if (tape
->merge_stage
!= NULL
) {
2068 __idetape_kfree_stage(tape
->merge_stage
);
2069 tape
->merge_stage
= NULL
;
2072 /* Clear pipeline flags. */
2073 clear_bit(IDETAPE_PIPELINE_ERROR
, &tape
->flags
);
2074 tape
->chrdev_dir
= IDETAPE_DIR_NONE
;
2076 /* Remove pipeline stages. */
2077 if (tape
->first_stage
== NULL
)
2080 spin_lock_irqsave(&tape
->lock
, flags
);
2081 tape
->next_stage
= NULL
;
2082 if (idetape_pipeline_active(tape
))
2083 idetape_wait_for_request(drive
, tape
->active_data_rq
);
2084 spin_unlock_irqrestore(&tape
->lock
, flags
);
2086 while (tape
->first_stage
!= NULL
) {
2087 struct request
*rq_ptr
= &tape
->first_stage
->rq
;
2089 cnt
+= rq_ptr
->nr_sectors
- rq_ptr
->current_nr_sectors
;
2090 if (rq_ptr
->errors
== IDETAPE_ERROR_FILEMARK
)
2092 idetape_remove_stage_head(drive
);
2094 tape
->nr_pending_stages
= 0;
2095 tape
->max_stages
= tape
->min_pipeline
;
2100 * Position the tape to the requested block using the LOCATE packet command.
2101 * A READ POSITION command is then issued to check where we are positioned. Like
2102 * all higher level operations, we queue the commands at the tail of the request
2103 * queue and wait for their completion.
2105 static int idetape_position_tape (ide_drive_t
*drive
, unsigned int block
, u8 partition
, int skip
)
2107 idetape_tape_t
*tape
= drive
->driver_data
;
2111 if (tape
->chrdev_dir
== IDETAPE_DIR_READ
)
2112 __idetape_discard_read_pipeline(drive
);
2113 idetape_wait_ready(drive
, 60 * 5 * HZ
);
2114 idetape_create_locate_cmd(drive
, &pc
, block
, partition
, skip
);
2115 retval
= idetape_queue_pc_tail(drive
, &pc
);
2119 idetape_create_read_position_cmd(&pc
);
2120 return (idetape_queue_pc_tail(drive
, &pc
));
2123 static void idetape_discard_read_pipeline (ide_drive_t
*drive
, int restore_position
)
2125 idetape_tape_t
*tape
= drive
->driver_data
;
2129 cnt
= __idetape_discard_read_pipeline(drive
);
2130 if (restore_position
) {
2131 position
= idetape_read_position(drive
);
2132 seek
= position
> cnt
? position
- cnt
: 0;
2133 if (idetape_position_tape(drive
, seek
, 0, 0)) {
2134 printk(KERN_INFO
"ide-tape: %s: position_tape failed in discard_pipeline()\n", tape
->name
);
2141 * Generate a read/write request for the block device interface and wait for it
2144 static int idetape_queue_rw_tail(ide_drive_t
*drive
, int cmd
, int blocks
, struct idetape_bh
*bh
)
2146 idetape_tape_t
*tape
= drive
->driver_data
;
2149 debug_log(DBG_SENSE
, "%s: cmd=%d\n", __func__
, cmd
);
2151 if (idetape_pipeline_active(tape
)) {
2152 printk(KERN_ERR
"ide-tape: bug: the pipeline is active in %s\n",
2157 idetape_init_rq(&rq
, cmd
);
2158 rq
.rq_disk
= tape
->disk
;
2159 rq
.special
= (void *)bh
;
2160 rq
.sector
= tape
->first_frame
;
2161 rq
.nr_sectors
= rq
.current_nr_sectors
= blocks
;
2162 (void) ide_do_drive_cmd(drive
, &rq
, ide_wait
);
2164 if ((cmd
& (REQ_IDETAPE_READ
| REQ_IDETAPE_WRITE
)) == 0)
2167 if (tape
->merge_stage
)
2168 idetape_init_merge_stage(tape
);
2169 if (rq
.errors
== IDETAPE_ERROR_GENERAL
)
2171 return (tape
->blk_size
* (blocks
-rq
.current_nr_sectors
));
2174 /* start servicing the pipeline stages, starting from tape->next_stage. */
2175 static void idetape_plug_pipeline(ide_drive_t
*drive
)
2177 idetape_tape_t
*tape
= drive
->driver_data
;
2179 if (tape
->next_stage
== NULL
)
2181 if (!idetape_pipeline_active(tape
)) {
2182 set_bit(IDETAPE_PIPELINE_ACTIVE
, &tape
->flags
);
2183 idetape_activate_next_stage(drive
);
2184 (void) ide_do_drive_cmd(drive
, tape
->active_data_rq
, ide_end
);
2188 static void idetape_create_inquiry_cmd (idetape_pc_t
*pc
)
2190 idetape_init_pc(pc
);
2192 pc
->c
[4] = pc
->request_transfer
= 254;
2193 pc
->callback
= &idetape_pc_callback
;
2196 static void idetape_create_rewind_cmd (ide_drive_t
*drive
, idetape_pc_t
*pc
)
2198 idetape_init_pc(pc
);
2199 pc
->c
[0] = REZERO_UNIT
;
2200 set_bit(PC_WAIT_FOR_DSC
, &pc
->flags
);
2201 pc
->callback
= &idetape_pc_callback
;
2204 static void idetape_create_erase_cmd (idetape_pc_t
*pc
)
2206 idetape_init_pc(pc
);
2209 set_bit(PC_WAIT_FOR_DSC
, &pc
->flags
);
2210 pc
->callback
= &idetape_pc_callback
;
2213 static void idetape_create_space_cmd (idetape_pc_t
*pc
,int count
, u8 cmd
)
2215 idetape_init_pc(pc
);
2217 put_unaligned(cpu_to_be32(count
), (unsigned int *) &pc
->c
[1]);
2219 set_bit(PC_WAIT_FOR_DSC
, &pc
->flags
);
2220 pc
->callback
= &idetape_pc_callback
;
2223 static void idetape_wait_first_stage (ide_drive_t
*drive
)
2225 idetape_tape_t
*tape
= drive
->driver_data
;
2226 unsigned long flags
;
2228 if (tape
->first_stage
== NULL
)
2230 spin_lock_irqsave(&tape
->lock
, flags
);
2231 if (tape
->active_stage
== tape
->first_stage
)
2232 idetape_wait_for_request(drive
, tape
->active_data_rq
);
2233 spin_unlock_irqrestore(&tape
->lock
, flags
);
2237 * Try to add a character device originated write request to our pipeline. In
2238 * case we don't succeed, we revert to non-pipelined operation mode for this
2239 * request. In order to accomplish that, we
2241 * 1. Try to allocate a new pipeline stage.
2242 * 2. If we can't, wait for more and more requests to be serviced and try again
2244 * 3. If we still can't allocate a stage, fallback to non-pipelined operation
2245 * mode for this request.
2247 static int idetape_add_chrdev_write_request (ide_drive_t
*drive
, int blocks
)
2249 idetape_tape_t
*tape
= drive
->driver_data
;
2250 idetape_stage_t
*new_stage
;
2251 unsigned long flags
;
2254 debug_log(DBG_CHRDEV
, "Enter %s\n", __func__
);
2256 /* Attempt to allocate a new stage. Beware possible race conditions. */
2257 while ((new_stage
= idetape_kmalloc_stage(tape
)) == NULL
) {
2258 spin_lock_irqsave(&tape
->lock
, flags
);
2259 if (idetape_pipeline_active(tape
)) {
2260 idetape_wait_for_request(drive
, tape
->active_data_rq
);
2261 spin_unlock_irqrestore(&tape
->lock
, flags
);
2263 spin_unlock_irqrestore(&tape
->lock
, flags
);
2264 idetape_plug_pipeline(drive
);
2265 if (idetape_pipeline_active(tape
))
2268 * The machine is short on memory. Fallback to non-
2269 * pipelined operation mode for this request.
2271 return idetape_queue_rw_tail(drive
, REQ_IDETAPE_WRITE
, blocks
, tape
->merge_stage
->bh
);
2274 rq
= &new_stage
->rq
;
2275 idetape_init_rq(rq
, REQ_IDETAPE_WRITE
);
2276 /* Doesn't actually matter - We always assume sequential access */
2277 rq
->sector
= tape
->first_frame
;
2278 rq
->nr_sectors
= rq
->current_nr_sectors
= blocks
;
2280 idetape_switch_buffers(tape
, new_stage
);
2281 idetape_add_stage_tail(drive
, new_stage
);
2282 tape
->pipeline_head
++;
2283 idetape_calculate_speeds(drive
);
2286 * Estimate whether the tape has stopped writing by checking if our
2287 * write pipeline is currently empty. If we are not writing anymore,
2288 * wait for the pipeline to be almost completely full (90%) before
2289 * starting to service requests, so that we will be able to keep up with
2290 * the higher speeds of the tape.
2292 if (!idetape_pipeline_active(tape
)) {
2293 if (tape
->nr_stages
>= tape
->max_stages
* 9 / 10 ||
2294 tape
->nr_stages
>= tape
->max_stages
-
2295 tape
->uncontrolled_pipeline_head_speed
* 3 * 1024 /
2297 tape
->measure_insert_time
= 1;
2298 tape
->insert_time
= jiffies
;
2299 tape
->insert_size
= 0;
2300 tape
->insert_speed
= 0;
2301 idetape_plug_pipeline(drive
);
2304 if (test_and_clear_bit(IDETAPE_PIPELINE_ERROR
, &tape
->flags
))
2305 /* Return a deferred error */
2311 * Wait until all pending pipeline requests are serviced. Typically called on
2314 static void idetape_wait_for_pipeline (ide_drive_t
*drive
)
2316 idetape_tape_t
*tape
= drive
->driver_data
;
2317 unsigned long flags
;
2319 while (tape
->next_stage
|| idetape_pipeline_active(tape
)) {
2320 idetape_plug_pipeline(drive
);
2321 spin_lock_irqsave(&tape
->lock
, flags
);
2322 if (idetape_pipeline_active(tape
))
2323 idetape_wait_for_request(drive
, tape
->active_data_rq
);
2324 spin_unlock_irqrestore(&tape
->lock
, flags
);
2328 static void idetape_empty_write_pipeline (ide_drive_t
*drive
)
2330 idetape_tape_t
*tape
= drive
->driver_data
;
2332 struct idetape_bh
*bh
;
2334 if (tape
->chrdev_dir
!= IDETAPE_DIR_WRITE
) {
2335 printk(KERN_ERR
"ide-tape: bug: Trying to empty write pipeline, but we are not writing.\n");
2338 if (tape
->merge_stage_size
> tape
->stage_size
) {
2339 printk(KERN_ERR
"ide-tape: bug: merge_buffer too big\n");
2340 tape
->merge_stage_size
= tape
->stage_size
;
2342 if (tape
->merge_stage_size
) {
2343 blocks
= tape
->merge_stage_size
/ tape
->blk_size
;
2344 if (tape
->merge_stage_size
% tape
->blk_size
) {
2348 i
= tape
->blk_size
- tape
->merge_stage_size
%
2350 bh
= tape
->bh
->b_reqnext
;
2352 atomic_set(&bh
->b_count
, 0);
2359 printk(KERN_INFO
"ide-tape: bug, bh NULL\n");
2362 min
= min(i
, (unsigned int)(bh
->b_size
- atomic_read(&bh
->b_count
)));
2363 memset(bh
->b_data
+ atomic_read(&bh
->b_count
), 0, min
);
2364 atomic_add(min
, &bh
->b_count
);
2369 (void) idetape_add_chrdev_write_request(drive
, blocks
);
2370 tape
->merge_stage_size
= 0;
2372 idetape_wait_for_pipeline(drive
);
2373 if (tape
->merge_stage
!= NULL
) {
2374 __idetape_kfree_stage(tape
->merge_stage
);
2375 tape
->merge_stage
= NULL
;
2377 clear_bit(IDETAPE_PIPELINE_ERROR
, &tape
->flags
);
2378 tape
->chrdev_dir
= IDETAPE_DIR_NONE
;
2381 * On the next backup, perform the feedback loop again. (I don't want to
2382 * keep sense information between backups, as some systems are
2383 * constantly on, and the system load can be totally different on the
2386 tape
->max_stages
= tape
->min_pipeline
;
2387 if (tape
->first_stage
!= NULL
||
2388 tape
->next_stage
!= NULL
||
2389 tape
->last_stage
!= NULL
||
2390 tape
->nr_stages
!= 0) {
2391 printk(KERN_ERR
"ide-tape: ide-tape pipeline bug, "
2392 "first_stage %p, next_stage %p, "
2393 "last_stage %p, nr_stages %d\n",
2394 tape
->first_stage
, tape
->next_stage
,
2395 tape
->last_stage
, tape
->nr_stages
);
2399 static void idetape_restart_speed_control (ide_drive_t
*drive
)
2401 idetape_tape_t
*tape
= drive
->driver_data
;
2403 tape
->restart_speed_control_req
= 0;
2404 tape
->pipeline_head
= 0;
2405 tape
->controlled_last_pipeline_head
= 0;
2406 tape
->controlled_previous_pipeline_head
= tape
->uncontrolled_previous_pipeline_head
= 0;
2407 tape
->pipeline_head_speed
= tape
->controlled_pipeline_head_speed
= 5000;
2408 tape
->uncontrolled_pipeline_head_speed
= 0;
2409 tape
->controlled_pipeline_head_time
= tape
->uncontrolled_pipeline_head_time
= jiffies
;
2410 tape
->controlled_previous_head_time
= tape
->uncontrolled_previous_head_time
= jiffies
;
2413 static int idetape_init_read(ide_drive_t
*drive
, int max_stages
)
2415 idetape_tape_t
*tape
= drive
->driver_data
;
2416 idetape_stage_t
*new_stage
;
2419 u16 blocks
= *(u16
*)&tape
->caps
[12];
2421 /* Initialize read operation */
2422 if (tape
->chrdev_dir
!= IDETAPE_DIR_READ
) {
2423 if (tape
->chrdev_dir
== IDETAPE_DIR_WRITE
) {
2424 idetape_empty_write_pipeline(drive
);
2425 idetape_flush_tape_buffers(drive
);
2427 if (tape
->merge_stage
|| tape
->merge_stage_size
) {
2428 printk (KERN_ERR
"ide-tape: merge_stage_size should be 0 now\n");
2429 tape
->merge_stage_size
= 0;
2431 if ((tape
->merge_stage
= __idetape_kmalloc_stage(tape
, 0, 0)) == NULL
)
2433 tape
->chrdev_dir
= IDETAPE_DIR_READ
;
2436 * Issue a read 0 command to ensure that DSC handshake is
2437 * switched from completion mode to buffer available mode.
2438 * No point in issuing this if DSC overlap isn't supported, some
2439 * drives (Seagate STT3401A) will return an error.
2441 if (drive
->dsc_overlap
) {
2442 bytes_read
= idetape_queue_rw_tail(drive
, REQ_IDETAPE_READ
, 0, tape
->merge_stage
->bh
);
2443 if (bytes_read
< 0) {
2444 __idetape_kfree_stage(tape
->merge_stage
);
2445 tape
->merge_stage
= NULL
;
2446 tape
->chrdev_dir
= IDETAPE_DIR_NONE
;
2451 if (tape
->restart_speed_control_req
)
2452 idetape_restart_speed_control(drive
);
2453 idetape_init_rq(&rq
, REQ_IDETAPE_READ
);
2454 rq
.sector
= tape
->first_frame
;
2455 rq
.nr_sectors
= rq
.current_nr_sectors
= blocks
;
2456 if (!test_bit(IDETAPE_PIPELINE_ERROR
, &tape
->flags
) &&
2457 tape
->nr_stages
< max_stages
) {
2458 new_stage
= idetape_kmalloc_stage(tape
);
2459 while (new_stage
!= NULL
) {
2461 idetape_add_stage_tail(drive
, new_stage
);
2462 if (tape
->nr_stages
>= max_stages
)
2464 new_stage
= idetape_kmalloc_stage(tape
);
2467 if (!idetape_pipeline_active(tape
)) {
2468 if (tape
->nr_pending_stages
>= 3 * max_stages
/ 4) {
2469 tape
->measure_insert_time
= 1;
2470 tape
->insert_time
= jiffies
;
2471 tape
->insert_size
= 0;
2472 tape
->insert_speed
= 0;
2473 idetape_plug_pipeline(drive
);
2480 * Called from idetape_chrdev_read() to service a character device read request
2481 * and add read-ahead requests to our pipeline.
2483 static int idetape_add_chrdev_read_request (ide_drive_t
*drive
,int blocks
)
2485 idetape_tape_t
*tape
= drive
->driver_data
;
2486 unsigned long flags
;
2487 struct request
*rq_ptr
;
2490 debug_log(DBG_PROCS
, "Enter %s, %d blocks\n", __func__
, blocks
);
2492 /* If we are at a filemark, return a read length of 0 */
2493 if (test_bit(IDETAPE_FILEMARK
, &tape
->flags
))
2496 /* Wait for the next block to reach the head of the pipeline. */
2497 idetape_init_read(drive
, tape
->max_stages
);
2498 if (tape
->first_stage
== NULL
) {
2499 if (test_bit(IDETAPE_PIPELINE_ERROR
, &tape
->flags
))
2501 return idetape_queue_rw_tail(drive
, REQ_IDETAPE_READ
, blocks
,
2502 tape
->merge_stage
->bh
);
2504 idetape_wait_first_stage(drive
);
2505 rq_ptr
= &tape
->first_stage
->rq
;
2506 bytes_read
= tape
->blk_size
* (rq_ptr
->nr_sectors
-
2507 rq_ptr
->current_nr_sectors
);
2508 rq_ptr
->nr_sectors
= rq_ptr
->current_nr_sectors
= 0;
2511 if (rq_ptr
->errors
== IDETAPE_ERROR_EOD
)
2514 idetape_switch_buffers(tape
, tape
->first_stage
);
2515 if (rq_ptr
->errors
== IDETAPE_ERROR_FILEMARK
)
2516 set_bit(IDETAPE_FILEMARK
, &tape
->flags
);
2517 spin_lock_irqsave(&tape
->lock
, flags
);
2518 idetape_remove_stage_head(drive
);
2519 spin_unlock_irqrestore(&tape
->lock
, flags
);
2520 tape
->pipeline_head
++;
2521 idetape_calculate_speeds(drive
);
2523 if (bytes_read
> blocks
* tape
->blk_size
) {
2524 printk(KERN_ERR
"ide-tape: bug: trying to return more bytes than requested\n");
2525 bytes_read
= blocks
* tape
->blk_size
;
2527 return (bytes_read
);
2530 static void idetape_pad_zeros (ide_drive_t
*drive
, int bcount
)
2532 idetape_tape_t
*tape
= drive
->driver_data
;
2533 struct idetape_bh
*bh
;
2539 bh
= tape
->merge_stage
->bh
;
2540 count
= min(tape
->stage_size
, bcount
);
2542 blocks
= count
/ tape
->blk_size
;
2544 atomic_set(&bh
->b_count
, min(count
, (unsigned int)bh
->b_size
));
2545 memset(bh
->b_data
, 0, atomic_read(&bh
->b_count
));
2546 count
-= atomic_read(&bh
->b_count
);
2549 idetape_queue_rw_tail(drive
, REQ_IDETAPE_WRITE
, blocks
, tape
->merge_stage
->bh
);
2553 static int idetape_pipeline_size (ide_drive_t
*drive
)
2555 idetape_tape_t
*tape
= drive
->driver_data
;
2556 idetape_stage_t
*stage
;
2560 idetape_wait_for_pipeline(drive
);
2561 stage
= tape
->first_stage
;
2562 while (stage
!= NULL
) {
2564 size
+= tape
->blk_size
* (rq
->nr_sectors
-
2565 rq
->current_nr_sectors
);
2566 if (rq
->errors
== IDETAPE_ERROR_FILEMARK
)
2567 size
+= tape
->blk_size
;
2568 stage
= stage
->next
;
2570 size
+= tape
->merge_stage_size
;
2575 * Rewinds the tape to the Beginning Of the current Partition (BOP). We
2576 * currently support only one partition.
2578 static int idetape_rewind_tape (ide_drive_t
*drive
)
2582 idetape_tape_t
*tape
;
2583 tape
= drive
->driver_data
;
2585 debug_log(DBG_SENSE
, "Enter %s\n", __func__
);
2587 idetape_create_rewind_cmd(drive
, &pc
);
2588 retval
= idetape_queue_pc_tail(drive
, &pc
);
2592 idetape_create_read_position_cmd(&pc
);
2593 retval
= idetape_queue_pc_tail(drive
, &pc
);
2599 /* mtio.h compatible commands should be issued to the chrdev interface. */
2600 static int idetape_blkdev_ioctl(ide_drive_t
*drive
, unsigned int cmd
, unsigned long arg
)
2602 idetape_tape_t
*tape
= drive
->driver_data
;
2603 void __user
*argp
= (void __user
*)arg
;
2605 struct idetape_config
{
2606 int dsc_rw_frequency
;
2607 int dsc_media_access_frequency
;
2611 debug_log(DBG_PROCS
, "Enter %s\n", __func__
);
2615 if (copy_from_user(&config
, argp
, sizeof(config
)))
2617 tape
->best_dsc_rw_freq
= config
.dsc_rw_frequency
;
2618 tape
->max_stages
= config
.nr_stages
;
2621 config
.dsc_rw_frequency
= (int) tape
->best_dsc_rw_freq
;
2622 config
.nr_stages
= tape
->max_stages
;
2623 if (copy_to_user(argp
, &config
, sizeof(config
)))
2633 * The function below is now a bit more complicated than just passing the
2634 * command to the tape since we may have crossed some filemarks during our
2635 * pipelined read-ahead mode. As a minor side effect, the pipeline enables us to
2636 * support MTFSFM when the filemark is in our internal pipeline even if the tape
2637 * doesn't support spacing over filemarks in the reverse direction.
2639 static int idetape_space_over_filemarks (ide_drive_t
*drive
,short mt_op
,int mt_count
)
2641 idetape_tape_t
*tape
= drive
->driver_data
;
2643 unsigned long flags
;
2645 int sprev
= !!(tape
->caps
[4] & 0x20);
2649 if (MTBSF
== mt_op
|| MTBSFM
== mt_op
) {
2652 mt_count
= - mt_count
;
2655 if (tape
->chrdev_dir
== IDETAPE_DIR_READ
) {
2656 /* its a read-ahead buffer, scan it for crossed filemarks. */
2657 tape
->merge_stage_size
= 0;
2658 if (test_and_clear_bit(IDETAPE_FILEMARK
, &tape
->flags
))
2660 while (tape
->first_stage
!= NULL
) {
2661 if (count
== mt_count
) {
2662 if (mt_op
== MTFSFM
)
2663 set_bit(IDETAPE_FILEMARK
, &tape
->flags
);
2666 spin_lock_irqsave(&tape
->lock
, flags
);
2667 if (tape
->first_stage
== tape
->active_stage
) {
2669 * We have reached the active stage in the read
2670 * pipeline. There is no point in allowing the
2671 * drive to continue reading any farther, so we
2672 * stop the pipeline.
2674 * This section should be moved to a separate
2675 * subroutine because similar operations are
2676 * done in __idetape_discard_read_pipeline(),
2679 tape
->next_stage
= NULL
;
2680 spin_unlock_irqrestore(&tape
->lock
, flags
);
2681 idetape_wait_first_stage(drive
);
2682 tape
->next_stage
= tape
->first_stage
->next
;
2684 spin_unlock_irqrestore(&tape
->lock
, flags
);
2685 if (tape
->first_stage
->rq
.errors
== IDETAPE_ERROR_FILEMARK
)
2687 idetape_remove_stage_head(drive
);
2689 idetape_discard_read_pipeline(drive
, 0);
2693 * The filemark was not found in our internal pipeline; now we can issue
2694 * the space command.
2699 idetape_create_space_cmd(&pc
,mt_count
-count
,IDETAPE_SPACE_OVER_FILEMARK
);
2700 return (idetape_queue_pc_tail(drive
, &pc
));
2705 retval
= idetape_space_over_filemarks(drive
, MTFSF
, mt_count
-count
);
2706 if (retval
) return (retval
);
2707 count
= (MTBSFM
== mt_op
? 1 : -1);
2708 return (idetape_space_over_filemarks(drive
, MTFSF
, count
));
2710 printk(KERN_ERR
"ide-tape: MTIO operation %d not supported\n",mt_op
);
2717 * Our character device read / write functions.
2719 * The tape is optimized to maximize throughput when it is transferring an
2720 * integral number of the "continuous transfer limit", which is a parameter of
2721 * the specific tape (26kB on my particular tape, 32kB for Onstream).
2723 * As of version 1.3 of the driver, the character device provides an abstract
2724 * continuous view of the media - any mix of block sizes (even 1 byte) on the
2725 * same backup/restore procedure is supported. The driver will internally
2726 * convert the requests to the recommended transfer unit, so that an unmatch
2727 * between the user's block size to the recommended size will only result in a
2728 * (slightly) increased driver overhead, but will no longer hit performance.
2729 * This is not applicable to Onstream.
2731 static ssize_t
idetape_chrdev_read (struct file
*file
, char __user
*buf
,
2732 size_t count
, loff_t
*ppos
)
2734 struct ide_tape_obj
*tape
= ide_tape_f(file
);
2735 ide_drive_t
*drive
= tape
->drive
;
2736 ssize_t bytes_read
,temp
, actually_read
= 0, rc
;
2738 u16 ctl
= *(u16
*)&tape
->caps
[12];
2740 debug_log(DBG_CHRDEV
, "Enter %s, count %Zd\n", __func__
, count
);
2742 if (tape
->chrdev_dir
!= IDETAPE_DIR_READ
) {
2743 if (test_bit(IDETAPE_DETECT_BS
, &tape
->flags
))
2744 if (count
> tape
->blk_size
&&
2745 (count
% tape
->blk_size
) == 0)
2746 tape
->user_bs_factor
= count
/ tape
->blk_size
;
2748 rc
= idetape_init_read(drive
, tape
->max_stages
);
2753 if (tape
->merge_stage_size
) {
2754 actually_read
= min((unsigned int)(tape
->merge_stage_size
), (unsigned int)count
);
2755 if (idetape_copy_stage_to_user(tape
, buf
, tape
->merge_stage
, actually_read
))
2757 buf
+= actually_read
;
2758 tape
->merge_stage_size
-= actually_read
;
2759 count
-= actually_read
;
2761 while (count
>= tape
->stage_size
) {
2762 bytes_read
= idetape_add_chrdev_read_request(drive
, ctl
);
2763 if (bytes_read
<= 0)
2765 if (idetape_copy_stage_to_user(tape
, buf
, tape
->merge_stage
, bytes_read
))
2768 count
-= bytes_read
;
2769 actually_read
+= bytes_read
;
2772 bytes_read
= idetape_add_chrdev_read_request(drive
, ctl
);
2773 if (bytes_read
<= 0)
2775 temp
= min((unsigned long)count
, (unsigned long)bytes_read
);
2776 if (idetape_copy_stage_to_user(tape
, buf
, tape
->merge_stage
, temp
))
2778 actually_read
+= temp
;
2779 tape
->merge_stage_size
= bytes_read
-temp
;
2782 if (!actually_read
&& test_bit(IDETAPE_FILEMARK
, &tape
->flags
)) {
2783 debug_log(DBG_SENSE
, "%s: spacing over filemark\n", tape
->name
);
2785 idetape_space_over_filemarks(drive
, MTFSF
, 1);
2789 return (ret
) ? ret
: actually_read
;
2792 static ssize_t
idetape_chrdev_write (struct file
*file
, const char __user
*buf
,
2793 size_t count
, loff_t
*ppos
)
2795 struct ide_tape_obj
*tape
= ide_tape_f(file
);
2796 ide_drive_t
*drive
= tape
->drive
;
2797 ssize_t actually_written
= 0;
2799 u16 ctl
= *(u16
*)&tape
->caps
[12];
2801 /* The drive is write protected. */
2802 if (tape
->write_prot
)
2805 debug_log(DBG_CHRDEV
, "Enter %s, count %Zd\n", __func__
, count
);
2807 /* Initialize write operation */
2808 if (tape
->chrdev_dir
!= IDETAPE_DIR_WRITE
) {
2809 if (tape
->chrdev_dir
== IDETAPE_DIR_READ
)
2810 idetape_discard_read_pipeline(drive
, 1);
2811 if (tape
->merge_stage
|| tape
->merge_stage_size
) {
2812 printk(KERN_ERR
"ide-tape: merge_stage_size "
2813 "should be 0 now\n");
2814 tape
->merge_stage_size
= 0;
2816 if ((tape
->merge_stage
= __idetape_kmalloc_stage(tape
, 0, 0)) == NULL
)
2818 tape
->chrdev_dir
= IDETAPE_DIR_WRITE
;
2819 idetape_init_merge_stage(tape
);
2822 * Issue a write 0 command to ensure that DSC handshake is
2823 * switched from completion mode to buffer available mode. No
2824 * point in issuing this if DSC overlap isn't supported, some
2825 * drives (Seagate STT3401A) will return an error.
2827 if (drive
->dsc_overlap
) {
2828 ssize_t retval
= idetape_queue_rw_tail(drive
, REQ_IDETAPE_WRITE
, 0, tape
->merge_stage
->bh
);
2830 __idetape_kfree_stage(tape
->merge_stage
);
2831 tape
->merge_stage
= NULL
;
2832 tape
->chrdev_dir
= IDETAPE_DIR_NONE
;
2839 if (tape
->restart_speed_control_req
)
2840 idetape_restart_speed_control(drive
);
2841 if (tape
->merge_stage_size
) {
2842 if (tape
->merge_stage_size
>= tape
->stage_size
) {
2843 printk(KERN_ERR
"ide-tape: bug: merge buffer too big\n");
2844 tape
->merge_stage_size
= 0;
2846 actually_written
= min((unsigned int)(tape
->stage_size
- tape
->merge_stage_size
), (unsigned int)count
);
2847 if (idetape_copy_stage_from_user(tape
, tape
->merge_stage
, buf
, actually_written
))
2849 buf
+= actually_written
;
2850 tape
->merge_stage_size
+= actually_written
;
2851 count
-= actually_written
;
2853 if (tape
->merge_stage_size
== tape
->stage_size
) {
2855 tape
->merge_stage_size
= 0;
2856 retval
= idetape_add_chrdev_write_request(drive
, ctl
);
2861 while (count
>= tape
->stage_size
) {
2863 if (idetape_copy_stage_from_user(tape
, tape
->merge_stage
, buf
, tape
->stage_size
))
2865 buf
+= tape
->stage_size
;
2866 count
-= tape
->stage_size
;
2867 retval
= idetape_add_chrdev_write_request(drive
, ctl
);
2868 actually_written
+= tape
->stage_size
;
2873 actually_written
+= count
;
2874 if (idetape_copy_stage_from_user(tape
, tape
->merge_stage
, buf
, count
))
2876 tape
->merge_stage_size
+= count
;
2878 return (ret
) ? ret
: actually_written
;
2881 static int idetape_write_filemark (ide_drive_t
*drive
)
2885 /* Write a filemark */
2886 idetape_create_write_filemark_cmd(drive
, &pc
, 1);
2887 if (idetape_queue_pc_tail(drive
, &pc
)) {
2888 printk(KERN_ERR
"ide-tape: Couldn't write a filemark\n");
2895 * Called from idetape_chrdev_ioctl when the general mtio MTIOCTOP ioctl is
2898 * Note: MTBSF and MTBSFM are not supported when the tape doesn't support
2899 * spacing over filemarks in the reverse direction. In this case, MTFSFM is also
2900 * usually not supported (it is supported in the rare case in which we crossed
2901 * the filemark during our read-ahead pipelined operation mode).
2903 * The following commands are currently not supported:
2905 * MTFSS, MTBSS, MTWSM, MTSETDENSITY, MTSETDRVBUFFER, MT_ST_BOOLEANS,
2906 * MT_ST_WRITE_THRESHOLD.
2908 static int idetape_mtioctop(ide_drive_t
*drive
, short mt_op
, int mt_count
)
2910 idetape_tape_t
*tape
= drive
->driver_data
;
2914 debug_log(DBG_ERR
, "Handling MTIOCTOP ioctl: mt_op=%d, mt_count=%d\n",
2916 /* Commands which need our pipelined read-ahead stages. */
2924 return (idetape_space_over_filemarks(drive
,mt_op
,mt_count
));
2930 if (tape
->write_prot
)
2932 idetape_discard_read_pipeline(drive
, 1);
2933 for (i
= 0; i
< mt_count
; i
++) {
2934 retval
= idetape_write_filemark(drive
);
2940 idetape_discard_read_pipeline(drive
, 0);
2941 if (idetape_rewind_tape(drive
))
2945 idetape_discard_read_pipeline(drive
, 0);
2946 idetape_create_load_unload_cmd(drive
, &pc
, IDETAPE_LU_LOAD_MASK
);
2947 return (idetape_queue_pc_tail(drive
, &pc
));
2951 * If door is locked, attempt to unlock before
2952 * attempting to eject.
2954 if (tape
->door_locked
) {
2955 if (idetape_create_prevent_cmd(drive
, &pc
, 0))
2956 if (!idetape_queue_pc_tail(drive
, &pc
))
2957 tape
->door_locked
= DOOR_UNLOCKED
;
2959 idetape_discard_read_pipeline(drive
, 0);
2960 idetape_create_load_unload_cmd(drive
, &pc
,!IDETAPE_LU_LOAD_MASK
);
2961 retval
= idetape_queue_pc_tail(drive
, &pc
);
2963 clear_bit(IDETAPE_MEDIUM_PRESENT
, &tape
->flags
);
2966 idetape_discard_read_pipeline(drive
, 0);
2967 return (idetape_flush_tape_buffers(drive
));
2969 idetape_discard_read_pipeline(drive
, 0);
2970 idetape_create_load_unload_cmd(drive
, &pc
,IDETAPE_LU_RETENSION_MASK
| IDETAPE_LU_LOAD_MASK
);
2971 return (idetape_queue_pc_tail(drive
, &pc
));
2973 idetape_create_space_cmd(&pc
, 0, IDETAPE_SPACE_TO_EOD
);
2974 return (idetape_queue_pc_tail(drive
, &pc
));
2976 (void) idetape_rewind_tape(drive
);
2977 idetape_create_erase_cmd(&pc
);
2978 return (idetape_queue_pc_tail(drive
, &pc
));
2981 if (mt_count
< tape
->blk_size
||
2982 mt_count
% tape
->blk_size
)
2984 tape
->user_bs_factor
= mt_count
/
2986 clear_bit(IDETAPE_DETECT_BS
, &tape
->flags
);
2988 set_bit(IDETAPE_DETECT_BS
, &tape
->flags
);
2991 idetape_discard_read_pipeline(drive
, 0);
2992 return idetape_position_tape(drive
, mt_count
* tape
->user_bs_factor
, tape
->partition
, 0);
2994 idetape_discard_read_pipeline(drive
, 0);
2995 return (idetape_position_tape(drive
, 0, mt_count
, 0));
2999 if (!idetape_create_prevent_cmd(drive
, &pc
, 1))
3001 retval
= idetape_queue_pc_tail(drive
, &pc
);
3002 if (retval
) return retval
;
3003 tape
->door_locked
= DOOR_EXPLICITLY_LOCKED
;
3006 if (!idetape_create_prevent_cmd(drive
, &pc
, 0))
3008 retval
= idetape_queue_pc_tail(drive
, &pc
);
3009 if (retval
) return retval
;
3010 tape
->door_locked
= DOOR_UNLOCKED
;
3013 printk(KERN_ERR
"ide-tape: MTIO operation %d not "
3014 "supported\n", mt_op
);
3020 * Our character device ioctls. General mtio.h magnetic io commands are
3021 * supported here, and not in the corresponding block interface. Our own
3022 * ide-tape ioctls are supported on both interfaces.
3024 static int idetape_chrdev_ioctl(struct inode
*inode
, struct file
*file
,
3025 unsigned int cmd
, unsigned long arg
)
3027 struct ide_tape_obj
*tape
= ide_tape_f(file
);
3028 ide_drive_t
*drive
= tape
->drive
;
3032 int block_offset
= 0, position
= tape
->first_frame
;
3033 void __user
*argp
= (void __user
*)arg
;
3035 debug_log(DBG_CHRDEV
, "Enter %s, cmd=%u\n", __func__
, cmd
);
3037 tape
->restart_speed_control_req
= 1;
3038 if (tape
->chrdev_dir
== IDETAPE_DIR_WRITE
) {
3039 idetape_empty_write_pipeline(drive
);
3040 idetape_flush_tape_buffers(drive
);
3042 if (cmd
== MTIOCGET
|| cmd
== MTIOCPOS
) {
3043 block_offset
= idetape_pipeline_size(drive
) /
3044 (tape
->blk_size
* tape
->user_bs_factor
);
3045 if ((position
= idetape_read_position(drive
)) < 0)
3050 if (copy_from_user(&mtop
, argp
, sizeof (struct mtop
)))
3052 return (idetape_mtioctop(drive
,mtop
.mt_op
,mtop
.mt_count
));
3054 memset(&mtget
, 0, sizeof (struct mtget
));
3055 mtget
.mt_type
= MT_ISSCSI2
;
3056 mtget
.mt_blkno
= position
/ tape
->user_bs_factor
- block_offset
;
3058 ((tape
->blk_size
* tape
->user_bs_factor
)
3059 << MT_ST_BLKSIZE_SHIFT
) & MT_ST_BLKSIZE_MASK
;
3061 if (tape
->drv_write_prot
) {
3062 mtget
.mt_gstat
|= GMT_WR_PROT(0xffffffff);
3064 if (copy_to_user(argp
, &mtget
, sizeof(struct mtget
)))
3068 mtpos
.mt_blkno
= position
/ tape
->user_bs_factor
- block_offset
;
3069 if (copy_to_user(argp
, &mtpos
, sizeof(struct mtpos
)))
3073 if (tape
->chrdev_dir
== IDETAPE_DIR_READ
)
3074 idetape_discard_read_pipeline(drive
, 1);
3075 return idetape_blkdev_ioctl(drive
, cmd
, arg
);
3080 * Do a mode sense page 0 with block descriptor and if it succeeds set the tape
3081 * block size with the reported value.
3083 static void ide_tape_get_bsize_from_bdesc(ide_drive_t
*drive
)
3085 idetape_tape_t
*tape
= drive
->driver_data
;
3088 idetape_create_mode_sense_cmd(&pc
, IDETAPE_BLOCK_DESCRIPTOR
);
3089 if (idetape_queue_pc_tail(drive
, &pc
)) {
3090 printk(KERN_ERR
"ide-tape: Can't get block descriptor\n");
3091 if (tape
->blk_size
== 0) {
3092 printk(KERN_WARNING
"ide-tape: Cannot deal with zero "
3093 "block size, assuming 32k\n");
3094 tape
->blk_size
= 32768;
3098 tape
->blk_size
= (pc
.buffer
[4 + 5] << 16) +
3099 (pc
.buffer
[4 + 6] << 8) +
3101 tape
->drv_write_prot
= (pc
.buffer
[2] & 0x80) >> 7;
3104 static int idetape_chrdev_open (struct inode
*inode
, struct file
*filp
)
3106 unsigned int minor
= iminor(inode
), i
= minor
& ~0xc0;
3108 idetape_tape_t
*tape
;
3112 if (i
>= MAX_HWIFS
* MAX_DRIVES
)
3115 tape
= ide_tape_chrdev_get(i
);
3119 debug_log(DBG_CHRDEV
, "Enter %s\n", __func__
);
3122 * We really want to do nonseekable_open(inode, filp); here, but some
3123 * versions of tar incorrectly call lseek on tapes and bail out if that
3124 * fails. So we disallow pread() and pwrite(), but permit lseeks.
3126 filp
->f_mode
&= ~(FMODE_PREAD
| FMODE_PWRITE
);
3128 drive
= tape
->drive
;
3130 filp
->private_data
= tape
;
3132 if (test_and_set_bit(IDETAPE_BUSY
, &tape
->flags
)) {
3137 retval
= idetape_wait_ready(drive
, 60 * HZ
);
3139 clear_bit(IDETAPE_BUSY
, &tape
->flags
);
3140 printk(KERN_ERR
"ide-tape: %s: drive not ready\n", tape
->name
);
3144 idetape_read_position(drive
);
3145 if (!test_bit(IDETAPE_ADDRESS_VALID
, &tape
->flags
))
3146 (void)idetape_rewind_tape(drive
);
3148 if (tape
->chrdev_dir
!= IDETAPE_DIR_READ
)
3149 clear_bit(IDETAPE_PIPELINE_ERROR
, &tape
->flags
);
3151 /* Read block size and write protect status from drive. */
3152 ide_tape_get_bsize_from_bdesc(drive
);
3154 /* Set write protect flag if device is opened as read-only. */
3155 if ((filp
->f_flags
& O_ACCMODE
) == O_RDONLY
)
3156 tape
->write_prot
= 1;
3158 tape
->write_prot
= tape
->drv_write_prot
;
3160 /* Make sure drive isn't write protected if user wants to write. */
3161 if (tape
->write_prot
) {
3162 if ((filp
->f_flags
& O_ACCMODE
) == O_WRONLY
||
3163 (filp
->f_flags
& O_ACCMODE
) == O_RDWR
) {
3164 clear_bit(IDETAPE_BUSY
, &tape
->flags
);
3170 /* Lock the tape drive door so user can't eject. */
3171 if (tape
->chrdev_dir
== IDETAPE_DIR_NONE
) {
3172 if (idetape_create_prevent_cmd(drive
, &pc
, 1)) {
3173 if (!idetape_queue_pc_tail(drive
, &pc
)) {
3174 if (tape
->door_locked
!= DOOR_EXPLICITLY_LOCKED
)
3175 tape
->door_locked
= DOOR_LOCKED
;
3179 idetape_restart_speed_control(drive
);
3180 tape
->restart_speed_control_req
= 0;
3188 static void idetape_write_release (ide_drive_t
*drive
, unsigned int minor
)
3190 idetape_tape_t
*tape
= drive
->driver_data
;
3192 idetape_empty_write_pipeline(drive
);
3193 tape
->merge_stage
= __idetape_kmalloc_stage(tape
, 1, 0);
3194 if (tape
->merge_stage
!= NULL
) {
3195 idetape_pad_zeros(drive
, tape
->blk_size
*
3196 (tape
->user_bs_factor
- 1));
3197 __idetape_kfree_stage(tape
->merge_stage
);
3198 tape
->merge_stage
= NULL
;
3200 idetape_write_filemark(drive
);
3201 idetape_flush_tape_buffers(drive
);
3202 idetape_flush_tape_buffers(drive
);
3205 static int idetape_chrdev_release (struct inode
*inode
, struct file
*filp
)
3207 struct ide_tape_obj
*tape
= ide_tape_f(filp
);
3208 ide_drive_t
*drive
= tape
->drive
;
3210 unsigned int minor
= iminor(inode
);
3213 tape
= drive
->driver_data
;
3215 debug_log(DBG_CHRDEV
, "Enter %s\n", __func__
);
3217 if (tape
->chrdev_dir
== IDETAPE_DIR_WRITE
)
3218 idetape_write_release(drive
, minor
);
3219 if (tape
->chrdev_dir
== IDETAPE_DIR_READ
) {
3221 idetape_discard_read_pipeline(drive
, 1);
3223 idetape_wait_for_pipeline(drive
);
3225 if (tape
->cache_stage
!= NULL
) {
3226 __idetape_kfree_stage(tape
->cache_stage
);
3227 tape
->cache_stage
= NULL
;
3229 if (minor
< 128 && test_bit(IDETAPE_MEDIUM_PRESENT
, &tape
->flags
))
3230 (void) idetape_rewind_tape(drive
);
3231 if (tape
->chrdev_dir
== IDETAPE_DIR_NONE
) {
3232 if (tape
->door_locked
== DOOR_LOCKED
) {
3233 if (idetape_create_prevent_cmd(drive
, &pc
, 0)) {
3234 if (!idetape_queue_pc_tail(drive
, &pc
))
3235 tape
->door_locked
= DOOR_UNLOCKED
;
3239 clear_bit(IDETAPE_BUSY
, &tape
->flags
);
3246 * check the contents of the ATAPI IDENTIFY command results. We return:
3248 * 1 - If the tape can be supported by us, based on the information we have so
3251 * 0 - If this tape driver is not currently supported by us.
3253 static int idetape_identify_device(ide_drive_t
*drive
)
3255 u8 gcw
[2], protocol
, device_type
, removable
, packet_size
;
3257 if (drive
->id_read
== 0)
3260 *((unsigned short *) &gcw
) = drive
->id
->config
;
3262 protocol
= (gcw
[1] & 0xC0) >> 6;
3263 device_type
= gcw
[1] & 0x1F;
3264 removable
= !!(gcw
[0] & 0x80);
3265 packet_size
= gcw
[0] & 0x3;
3267 /* Check that we can support this device */
3269 printk(KERN_ERR
"ide-tape: Protocol (0x%02x) is not ATAPI\n",
3271 else if (device_type
!= 1)
3272 printk(KERN_ERR
"ide-tape: Device type (0x%02x) is not set "
3273 "to tape\n", device_type
);
3274 else if (!removable
)
3275 printk(KERN_ERR
"ide-tape: The removable flag is not set\n");
3276 else if (packet_size
!= 0) {
3277 printk(KERN_ERR
"ide-tape: Packet size (0x%02x) is not 12 "
3278 "bytes long\n", packet_size
);
3284 static void idetape_get_inquiry_results(ide_drive_t
*drive
)
3286 idetape_tape_t
*tape
= drive
->driver_data
;
3288 char fw_rev
[6], vendor_id
[10], product_id
[18];
3290 idetape_create_inquiry_cmd(&pc
);
3291 if (idetape_queue_pc_tail(drive
, &pc
)) {
3292 printk(KERN_ERR
"ide-tape: %s: can't get INQUIRY results\n",
3296 memcpy(vendor_id
, &pc
.buffer
[8], 8);
3297 memcpy(product_id
, &pc
.buffer
[16], 16);
3298 memcpy(fw_rev
, &pc
.buffer
[32], 4);
3300 ide_fixstring(vendor_id
, 10, 0);
3301 ide_fixstring(product_id
, 18, 0);
3302 ide_fixstring(fw_rev
, 6, 0);
3304 printk(KERN_INFO
"ide-tape: %s <-> %s: %s %s rev %s\n",
3305 drive
->name
, tape
->name
, vendor_id
, product_id
, fw_rev
);
3309 * Ask the tape about its various parameters. In particular, we will adjust our
3310 * data transfer buffer size to the recommended value as returned by the tape.
3312 static void idetape_get_mode_sense_results (ide_drive_t
*drive
)
3314 idetape_tape_t
*tape
= drive
->driver_data
;
3317 u8 speed
, max_speed
;
3319 idetape_create_mode_sense_cmd(&pc
, IDETAPE_CAPABILITIES_PAGE
);
3320 if (idetape_queue_pc_tail(drive
, &pc
)) {
3321 printk(KERN_ERR
"ide-tape: Can't get tape parameters - assuming"
3322 " some default values\n");
3323 tape
->blk_size
= 512;
3324 put_unaligned(52, (u16
*)&tape
->caps
[12]);
3325 put_unaligned(540, (u16
*)&tape
->caps
[14]);
3326 put_unaligned(6*52, (u16
*)&tape
->caps
[16]);
3329 caps
= pc
.buffer
+ 4 + pc
.buffer
[3];
3331 /* convert to host order and save for later use */
3332 speed
= be16_to_cpu(*(u16
*)&caps
[14]);
3333 max_speed
= be16_to_cpu(*(u16
*)&caps
[8]);
3335 put_unaligned(max_speed
, (u16
*)&caps
[8]);
3336 put_unaligned(be16_to_cpu(*(u16
*)&caps
[12]), (u16
*)&caps
[12]);
3337 put_unaligned(speed
, (u16
*)&caps
[14]);
3338 put_unaligned(be16_to_cpu(*(u16
*)&caps
[16]), (u16
*)&caps
[16]);
3341 printk(KERN_INFO
"ide-tape: %s: invalid tape speed "
3342 "(assuming 650KB/sec)\n", drive
->name
);
3343 put_unaligned(650, (u16
*)&caps
[14]);
3346 printk(KERN_INFO
"ide-tape: %s: invalid max_speed "
3347 "(assuming 650KB/sec)\n", drive
->name
);
3348 put_unaligned(650, (u16
*)&caps
[8]);
3351 memcpy(&tape
->caps
, caps
, 20);
3353 tape
->blk_size
= 512;
3354 else if (caps
[7] & 0x04)
3355 tape
->blk_size
= 1024;
3358 #ifdef CONFIG_IDE_PROC_FS
3359 static void idetape_add_settings (ide_drive_t
*drive
)
3361 idetape_tape_t
*tape
= drive
->driver_data
;
3363 ide_add_setting(drive
, "buffer", SETTING_READ
, TYPE_SHORT
, 0, 0xffff,
3364 1, 2, (u16
*)&tape
->caps
[16], NULL
);
3365 ide_add_setting(drive
, "pipeline_min", SETTING_RW
, TYPE_INT
, 1, 0xffff, tape
->stage_size
/ 1024, 1, &tape
->min_pipeline
, NULL
);
3366 ide_add_setting(drive
, "pipeline", SETTING_RW
, TYPE_INT
, 1, 0xffff, tape
->stage_size
/ 1024, 1, &tape
->max_stages
, NULL
);
3367 ide_add_setting(drive
, "pipeline_max", SETTING_RW
, TYPE_INT
, 1, 0xffff, tape
->stage_size
/ 1024, 1, &tape
->max_pipeline
, NULL
);
3368 ide_add_setting(drive
, "pipeline_used", SETTING_READ
, TYPE_INT
, 0, 0xffff, tape
->stage_size
/ 1024, 1, &tape
->nr_stages
, NULL
);
3369 ide_add_setting(drive
, "pipeline_pending", SETTING_READ
, TYPE_INT
, 0, 0xffff, tape
->stage_size
/ 1024, 1, &tape
->nr_pending_stages
, NULL
);
3370 ide_add_setting(drive
, "speed", SETTING_READ
, TYPE_SHORT
, 0, 0xffff,
3371 1, 1, (u16
*)&tape
->caps
[14], NULL
);
3372 ide_add_setting(drive
, "stage", SETTING_READ
, TYPE_INT
, 0, 0xffff, 1,
3373 1024, &tape
->stage_size
, NULL
);
3374 ide_add_setting(drive
, "tdsc", SETTING_RW
, TYPE_INT
, IDETAPE_DSC_RW_MIN
,
3375 IDETAPE_DSC_RW_MAX
, 1000, HZ
, &tape
->best_dsc_rw_freq
,
3377 ide_add_setting(drive
, "dsc_overlap", SETTING_RW
, TYPE_BYTE
, 0, 1, 1, 1, &drive
->dsc_overlap
, NULL
);
3378 ide_add_setting(drive
, "pipeline_head_speed_c",SETTING_READ
, TYPE_INT
, 0, 0xffff, 1, 1, &tape
->controlled_pipeline_head_speed
, NULL
);
3379 ide_add_setting(drive
, "pipeline_head_speed_u",SETTING_READ
, TYPE_INT
, 0, 0xffff, 1, 1, &tape
->uncontrolled_pipeline_head_speed
,NULL
);
3380 ide_add_setting(drive
, "avg_speed", SETTING_READ
, TYPE_INT
, 0, 0xffff, 1, 1, &tape
->avg_speed
, NULL
);
3381 ide_add_setting(drive
, "debug_mask", SETTING_RW
, TYPE_INT
, 0, 0xffff, 1,
3382 1, &tape
->debug_mask
, NULL
);
3385 static inline void idetape_add_settings(ide_drive_t
*drive
) { ; }
3389 * The function below is called to:
3391 * 1. Initialize our various state variables.
3392 * 2. Ask the tape for its capabilities.
3393 * 3. Allocate a buffer which will be used for data transfer. The buffer size
3394 * is chosen based on the recommendation which we received in step 2.
3396 * Note that at this point ide.c already assigned us an irq, so that we can
3397 * queue requests here and wait for their completion.
3399 static void idetape_setup (ide_drive_t
*drive
, idetape_tape_t
*tape
, int minor
)
3401 unsigned long t1
, tmid
, tn
, t
;
3406 u16
*ctl
= (u16
*)&tape
->caps
[12];
3408 spin_lock_init(&tape
->lock
);
3409 drive
->dsc_overlap
= 1;
3410 if (drive
->hwif
->host_flags
& IDE_HFLAG_NO_DSC
) {
3411 printk(KERN_INFO
"ide-tape: %s: disabling DSC overlap\n",
3413 drive
->dsc_overlap
= 0;
3415 /* Seagate Travan drives do not support DSC overlap. */
3416 if (strstr(drive
->id
->model
, "Seagate STT3401"))
3417 drive
->dsc_overlap
= 0;
3418 tape
->minor
= minor
;
3419 tape
->name
[0] = 'h';
3420 tape
->name
[1] = 't';
3421 tape
->name
[2] = '0' + minor
;
3422 tape
->chrdev_dir
= IDETAPE_DIR_NONE
;
3423 tape
->pc
= tape
->pc_stack
;
3424 tape
->max_insert_speed
= 10000;
3425 tape
->speed_control
= 1;
3426 *((unsigned short *) &gcw
) = drive
->id
->config
;
3428 /* Command packet DRQ type */
3429 if (((gcw
[0] & 0x60) >> 5) == 1)
3430 set_bit(IDETAPE_DRQ_INTERRUPT
, &tape
->flags
);
3432 tape
->min_pipeline
= tape
->max_pipeline
= tape
->max_stages
= 10;
3434 idetape_get_inquiry_results(drive
);
3435 idetape_get_mode_sense_results(drive
);
3436 ide_tape_get_bsize_from_bdesc(drive
);
3437 tape
->user_bs_factor
= 1;
3438 tape
->stage_size
= *ctl
* tape
->blk_size
;
3439 while (tape
->stage_size
> 0xffff) {
3440 printk(KERN_NOTICE
"ide-tape: decreasing stage size\n");
3442 tape
->stage_size
= *ctl
* tape
->blk_size
;
3444 stage_size
= tape
->stage_size
;
3445 tape
->pages_per_stage
= stage_size
/ PAGE_SIZE
;
3446 if (stage_size
% PAGE_SIZE
) {
3447 tape
->pages_per_stage
++;
3448 tape
->excess_bh_size
= PAGE_SIZE
- stage_size
% PAGE_SIZE
;
3451 /* Select the "best" DSC read/write polling freq and pipeline size. */
3452 speed
= max(*(u16
*)&tape
->caps
[14], *(u16
*)&tape
->caps
[8]);
3454 tape
->max_stages
= speed
* 1000 * 10 / tape
->stage_size
;
3456 /* Limit memory use for pipeline to 10% of physical memory */
3458 if (tape
->max_stages
* tape
->stage_size
> si
.totalram
* si
.mem_unit
/ 10)
3459 tape
->max_stages
= si
.totalram
* si
.mem_unit
/ (10 * tape
->stage_size
);
3460 tape
->max_stages
= min(tape
->max_stages
, IDETAPE_MAX_PIPELINE_STAGES
);
3461 tape
->min_pipeline
= min(tape
->max_stages
, IDETAPE_MIN_PIPELINE_STAGES
);
3462 tape
->max_pipeline
= min(tape
->max_stages
* 2, IDETAPE_MAX_PIPELINE_STAGES
);
3463 if (tape
->max_stages
== 0)
3464 tape
->max_stages
= tape
->min_pipeline
= tape
->max_pipeline
= 1;
3466 t1
= (tape
->stage_size
* HZ
) / (speed
* 1000);
3467 tmid
= (*(u16
*)&tape
->caps
[16] * 32 * HZ
) / (speed
* 125);
3468 tn
= (IDETAPE_FIFO_THRESHOLD
* tape
->stage_size
* HZ
) / (speed
* 1000);
3470 if (tape
->max_stages
)
3476 * Ensure that the number we got makes sense; limit it within
3477 * IDETAPE_DSC_RW_MIN and IDETAPE_DSC_RW_MAX.
3479 tape
->best_dsc_rw_freq
= max_t(unsigned long,
3480 min_t(unsigned long, t
, IDETAPE_DSC_RW_MAX
),
3481 IDETAPE_DSC_RW_MIN
);
3482 printk(KERN_INFO
"ide-tape: %s <-> %s: %dKBps, %d*%dkB buffer, "
3483 "%dkB pipeline, %lums tDSC%s\n",
3484 drive
->name
, tape
->name
, *(u16
*)&tape
->caps
[14],
3485 (*(u16
*)&tape
->caps
[16] * 512) / tape
->stage_size
,
3486 tape
->stage_size
/ 1024,
3487 tape
->max_stages
* tape
->stage_size
/ 1024,
3488 tape
->best_dsc_rw_freq
* 1000 / HZ
,
3489 drive
->using_dma
? ", DMA":"");
3491 idetape_add_settings(drive
);
3494 static void ide_tape_remove(ide_drive_t
*drive
)
3496 idetape_tape_t
*tape
= drive
->driver_data
;
3498 ide_proc_unregister_driver(drive
, tape
->driver
);
3500 ide_unregister_region(tape
->disk
);
3505 static void ide_tape_release(struct kref
*kref
)
3507 struct ide_tape_obj
*tape
= to_ide_tape(kref
);
3508 ide_drive_t
*drive
= tape
->drive
;
3509 struct gendisk
*g
= tape
->disk
;
3511 BUG_ON(tape
->first_stage
!= NULL
|| tape
->merge_stage_size
);
3513 drive
->dsc_overlap
= 0;
3514 drive
->driver_data
= NULL
;
3515 device_destroy(idetape_sysfs_class
, MKDEV(IDETAPE_MAJOR
, tape
->minor
));
3516 device_destroy(idetape_sysfs_class
, MKDEV(IDETAPE_MAJOR
, tape
->minor
+ 128));
3517 idetape_devs
[tape
->minor
] = NULL
;
3518 g
->private_data
= NULL
;
3523 #ifdef CONFIG_IDE_PROC_FS
3524 static int proc_idetape_read_name
3525 (char *page
, char **start
, off_t off
, int count
, int *eof
, void *data
)
3527 ide_drive_t
*drive
= (ide_drive_t
*) data
;
3528 idetape_tape_t
*tape
= drive
->driver_data
;
3532 len
= sprintf(out
, "%s\n", tape
->name
);
3533 PROC_IDE_READ_RETURN(page
, start
, off
, count
, eof
, len
);
3536 static ide_proc_entry_t idetape_proc
[] = {
3537 { "capacity", S_IFREG
|S_IRUGO
, proc_ide_read_capacity
, NULL
},
3538 { "name", S_IFREG
|S_IRUGO
, proc_idetape_read_name
, NULL
},
3539 { NULL
, 0, NULL
, NULL
}
3543 static int ide_tape_probe(ide_drive_t
*);
3545 static ide_driver_t idetape_driver
= {
3547 .owner
= THIS_MODULE
,
3549 .bus
= &ide_bus_type
,
3551 .probe
= ide_tape_probe
,
3552 .remove
= ide_tape_remove
,
3553 .version
= IDETAPE_VERSION
,
3555 .supports_dsc_overlap
= 1,
3556 .do_request
= idetape_do_request
,
3557 .end_request
= idetape_end_request
,
3558 .error
= __ide_error
,
3559 .abort
= __ide_abort
,
3560 #ifdef CONFIG_IDE_PROC_FS
3561 .proc
= idetape_proc
,
3565 /* Our character device supporting functions, passed to register_chrdev. */
3566 static const struct file_operations idetape_fops
= {
3567 .owner
= THIS_MODULE
,
3568 .read
= idetape_chrdev_read
,
3569 .write
= idetape_chrdev_write
,
3570 .ioctl
= idetape_chrdev_ioctl
,
3571 .open
= idetape_chrdev_open
,
3572 .release
= idetape_chrdev_release
,
3575 static int idetape_open(struct inode
*inode
, struct file
*filp
)
3577 struct gendisk
*disk
= inode
->i_bdev
->bd_disk
;
3578 struct ide_tape_obj
*tape
;
3580 if (!(tape
= ide_tape_get(disk
)))
3586 static int idetape_release(struct inode
*inode
, struct file
*filp
)
3588 struct gendisk
*disk
= inode
->i_bdev
->bd_disk
;
3589 struct ide_tape_obj
*tape
= ide_tape_g(disk
);
3596 static int idetape_ioctl(struct inode
*inode
, struct file
*file
,
3597 unsigned int cmd
, unsigned long arg
)
3599 struct block_device
*bdev
= inode
->i_bdev
;
3600 struct ide_tape_obj
*tape
= ide_tape_g(bdev
->bd_disk
);
3601 ide_drive_t
*drive
= tape
->drive
;
3602 int err
= generic_ide_ioctl(drive
, file
, bdev
, cmd
, arg
);
3604 err
= idetape_blkdev_ioctl(drive
, cmd
, arg
);
3608 static struct block_device_operations idetape_block_ops
= {
3609 .owner
= THIS_MODULE
,
3610 .open
= idetape_open
,
3611 .release
= idetape_release
,
3612 .ioctl
= idetape_ioctl
,
3615 static int ide_tape_probe(ide_drive_t
*drive
)
3617 idetape_tape_t
*tape
;
3621 if (!strstr("ide-tape", drive
->driver_req
))
3623 if (!drive
->present
)
3625 if (drive
->media
!= ide_tape
)
3627 if (!idetape_identify_device (drive
)) {
3628 printk(KERN_ERR
"ide-tape: %s: not supported by this version of ide-tape\n", drive
->name
);
3632 printk("ide-tape: passing drive %s to ide-scsi emulation.\n", drive
->name
);
3635 tape
= kzalloc(sizeof (idetape_tape_t
), GFP_KERNEL
);
3637 printk(KERN_ERR
"ide-tape: %s: Can't allocate a tape structure\n", drive
->name
);
3641 g
= alloc_disk(1 << PARTN_BITS
);
3645 ide_init_disk(g
, drive
);
3647 ide_proc_register_driver(drive
, &idetape_driver
);
3649 kref_init(&tape
->kref
);
3651 tape
->drive
= drive
;
3652 tape
->driver
= &idetape_driver
;
3655 g
->private_data
= &tape
->driver
;
3657 drive
->driver_data
= tape
;
3659 mutex_lock(&idetape_ref_mutex
);
3660 for (minor
= 0; idetape_devs
[minor
]; minor
++)
3662 idetape_devs
[minor
] = tape
;
3663 mutex_unlock(&idetape_ref_mutex
);
3665 idetape_setup(drive
, tape
, minor
);
3667 device_create(idetape_sysfs_class
, &drive
->gendev
,
3668 MKDEV(IDETAPE_MAJOR
, minor
), "%s", tape
->name
);
3669 device_create(idetape_sysfs_class
, &drive
->gendev
,
3670 MKDEV(IDETAPE_MAJOR
, minor
+ 128), "n%s", tape
->name
);
3672 g
->fops
= &idetape_block_ops
;
3673 ide_register_region(g
);
3683 static void __exit
idetape_exit (void)
3685 driver_unregister(&idetape_driver
.gen_driver
);
3686 class_destroy(idetape_sysfs_class
);
3687 unregister_chrdev(IDETAPE_MAJOR
, "ht");
3690 static int __init
idetape_init(void)
3693 idetape_sysfs_class
= class_create(THIS_MODULE
, "ide_tape");
3694 if (IS_ERR(idetape_sysfs_class
)) {
3695 idetape_sysfs_class
= NULL
;
3696 printk(KERN_ERR
"Unable to create sysfs class for ide tapes\n");
3701 if (register_chrdev(IDETAPE_MAJOR
, "ht", &idetape_fops
)) {
3702 printk(KERN_ERR
"ide-tape: Failed to register character device interface\n");
3704 goto out_free_class
;
3707 error
= driver_register(&idetape_driver
.gen_driver
);
3709 goto out_free_driver
;
3714 driver_unregister(&idetape_driver
.gen_driver
);
3716 class_destroy(idetape_sysfs_class
);
3721 MODULE_ALIAS("ide:*m-tape*");
3722 module_init(idetape_init
);
3723 module_exit(idetape_exit
);
3724 MODULE_ALIAS_CHARDEV_MAJOR(IDETAPE_MAJOR
);
3725 MODULE_DESCRIPTION("ATAPI Streaming TAPE Driver");
3726 MODULE_LICENSE("GPL");