ide-tape.c 83.4 KB
Newer Older
Linus Torvalds's avatar
Linus Torvalds committed
1
/*
2
3
 * IDE ATAPI streaming tape driver.
 *
4
5
 * Copyright (C) 1995-1999  Gadi Oxman <gadio@netvision.net.il>
 * Copyright (C) 2003-2005  Bartlomiej Zolnierkiewicz
Linus Torvalds's avatar
Linus Torvalds committed
6
7
8
9
10
11
12
13
 *
 * This driver was constructed as a student project in the software laboratory
 * of the faculty of electrical engineering in the Technion - Israel's
 * Institute Of Technology, with the guide of Avner Lottem and Dr. Ilana David.
 *
 * It is hereby placed under the terms of the GNU general public license.
 * (See linux/COPYING).
 *
14
15
 * For a historical changelog see
 * Documentation/ide/ChangeLog.ide-tape.1995-2002
Linus Torvalds's avatar
Linus Torvalds committed
16
17
 */

18
#define IDETAPE_VERSION "1.20"
Linus Torvalds's avatar
Linus Torvalds committed
19
20
21
22
23
24
25
26
27

#include <linux/module.h>
#include <linux/types.h>
#include <linux/string.h>
#include <linux/kernel.h>
#include <linux/delay.h>
#include <linux/timer.h>
#include <linux/mm.h>
#include <linux/interrupt.h>
28
#include <linux/jiffies.h>
Linus Torvalds's avatar
Linus Torvalds committed
29
30
31
32
33
34
35
36
37
#include <linux/major.h>
#include <linux/errno.h>
#include <linux/genhd.h>
#include <linux/slab.h>
#include <linux/pci.h>
#include <linux/ide.h>
#include <linux/smp_lock.h>
#include <linux/completion.h>
#include <linux/bitops.h>
38
#include <linux/mutex.h>
39
#include <scsi/scsi.h>
Linus Torvalds's avatar
Linus Torvalds committed
40
41

#include <asm/byteorder.h>
42
43
44
#include <linux/irq.h>
#include <linux/uaccess.h>
#include <linux/io.h>
Linus Torvalds's avatar
Linus Torvalds committed
45
46
47
#include <asm/unaligned.h>
#include <linux/mtio.h>

48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
enum {
	/* output errors only */
	DBG_ERR =		(1 << 0),
	/* output all sense key/asc */
	DBG_SENSE =		(1 << 1),
	/* info regarding all chrdev-related procedures */
	DBG_CHRDEV =		(1 << 2),
	/* all remaining procedures */
	DBG_PROCS =		(1 << 3),
	/* buffer alloc info (pc_stack & rq_stack) */
	DBG_PCRQ_STACK =	(1 << 4),
};

/* define to see debug info */
#define IDETAPE_DEBUG_LOG		0

#if IDETAPE_DEBUG_LOG
#define debug_log(lvl, fmt, args...)			\
{							\
	if (tape->debug_mask & lvl)			\
	printk(KERN_INFO "ide-tape: " fmt, ## args);	\
}
#else
#define debug_log(lvl, fmt, args...) do {} while (0)
#endif

Linus Torvalds's avatar
Linus Torvalds committed
74
75
/**************************** Tunable parameters *****************************/
/*
76
77
 * After each failed packet command we issue a request sense command and retry
 * the packet command IDETAPE_MAX_PC_RETRIES times.
Linus Torvalds's avatar
Linus Torvalds committed
78
 *
79
 * Setting IDETAPE_MAX_PC_RETRIES to 0 will disable retries.
Linus Torvalds's avatar
Linus Torvalds committed
80
81
82
83
 */
#define IDETAPE_MAX_PC_RETRIES		3

/*
84
85
 * With each packet command, we allocate a buffer of IDETAPE_PC_BUFFER_SIZE
 * bytes. This is used for several packet commands (Not for READ/WRITE commands)
Linus Torvalds's avatar
Linus Torvalds committed
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
 */
#define IDETAPE_PC_BUFFER_SIZE		256

/*
 *	In various places in the driver, we need to allocate storage
 *	for packet commands and requests, which will remain valid while
 *	we leave the driver to wait for an interrupt or a timeout event.
 */
#define IDETAPE_PC_STACK		(10 + IDETAPE_MAX_PC_RETRIES)

/*
 * Some drives (for example, Seagate STT3401A Travan) require a very long
 * timeout, because they don't return an interrupt or clear their busy bit
 * until after the command completes (even retension commands).
 */
#define IDETAPE_WAIT_CMD		(900*HZ)

/*
104
105
106
107
 * The following parameter is used to select the point in the internal tape fifo
 * in which we will start to refill the buffer. Decreasing the following
 * parameter will improve the system's latency and interactive response, while
 * using a high value might improve system throughput.
Linus Torvalds's avatar
Linus Torvalds committed
108
 */
109
#define IDETAPE_FIFO_THRESHOLD		2
Linus Torvalds's avatar
Linus Torvalds committed
110
111

/*
112
 * DSC polling parameters.
Linus Torvalds's avatar
Linus Torvalds committed
113
 *
114
115
 * Polling for DSC (a single bit in the status register) is a very important
 * function in ide-tape. There are two cases in which we poll for DSC:
Linus Torvalds's avatar
Linus Torvalds committed
116
 *
117
118
119
120
121
 * 1. Before a read/write packet command, to ensure that we can transfer data
 * from/to the tape's data buffers, without causing an actual media access.
 * In case the tape is not ready yet, we take out our request from the device
 * request queue, so that ide.c could service requests from the other device
 * on the same interface in the meantime.
Linus Torvalds's avatar
Linus Torvalds committed
122
 *
123
124
125
126
127
128
129
130
 * 2. After the successful initialization of a "media access packet command",
 * which is a command that can take a long time to complete (the interval can
 * range from several seconds to even an hour). Again, we postpone our request
 * in the middle to free the bus for the other device. The polling frequency
 * here should be lower than the read/write frequency since those media access
 * commands are slow. We start from a "fast" frequency - IDETAPE_DSC_MA_FAST
 * (1 second), and if we don't receive DSC after IDETAPE_DSC_MA_THRESHOLD
 * (5 min), we switch it to a lower frequency - IDETAPE_DSC_MA_SLOW (1 min).
Linus Torvalds's avatar
Linus Torvalds committed
131
 *
132
133
 * We also set a timeout for the timer, in case something goes wrong. The
 * timeout should be longer then the maximum execution time of a tape operation.
Linus Torvalds's avatar
Linus Torvalds committed
134
 */
135
136

/* DSC timings. */
Linus Torvalds's avatar
Linus Torvalds committed
137
138
139
140
141
142
143
144
145
146
#define IDETAPE_DSC_RW_MIN		5*HZ/100	/* 50 msec */
#define IDETAPE_DSC_RW_MAX		40*HZ/100	/* 400 msec */
#define IDETAPE_DSC_RW_TIMEOUT		2*60*HZ		/* 2 minutes */
#define IDETAPE_DSC_MA_FAST		2*HZ		/* 2 seconds */
#define IDETAPE_DSC_MA_THRESHOLD	5*60*HZ		/* 5 minutes */
#define IDETAPE_DSC_MA_SLOW		30*HZ		/* 30 seconds */
#define IDETAPE_DSC_MA_TIMEOUT		2*60*60*HZ	/* 2 hours */

/*************************** End of tunable parameters ***********************/

147
/* Read/Write error simulation */
Linus Torvalds's avatar
Linus Torvalds committed
148
149
#define SIMULATE_ERRORS			0

150
151
152
153
154
155
/* tape directions */
enum {
	IDETAPE_DIR_NONE  = (1 << 0),
	IDETAPE_DIR_READ  = (1 << 1),
	IDETAPE_DIR_WRITE = (1 << 2),
};
Linus Torvalds's avatar
Linus Torvalds committed
156
157

struct idetape_bh {
158
	u32 b_size;
Linus Torvalds's avatar
Linus Torvalds committed
159
160
161
162
163
	atomic_t b_count;
	struct idetape_bh *b_reqnext;
	char *b_data;
};

164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
/* Tape door status */
#define DOOR_UNLOCKED			0
#define DOOR_LOCKED			1
#define DOOR_EXPLICITLY_LOCKED		2

/* Some defines for the SPACE command */
#define IDETAPE_SPACE_OVER_FILEMARK	1
#define IDETAPE_SPACE_TO_EOD		3

/* Some defines for the LOAD UNLOAD command */
#define IDETAPE_LU_LOAD_MASK		1
#define IDETAPE_LU_RETENSION_MASK	2
#define IDETAPE_LU_EOT_MASK		4

/*
 * Special requests for our block device strategy routine.
 *
 * In order to service a character device command, we add special requests to
 * the tail of our block device request queue and wait for their completion.
 */

enum {
	REQ_IDETAPE_PC1		= (1 << 0), /* packet command (first stage) */
	REQ_IDETAPE_PC2		= (1 << 1), /* packet command (second stage) */
	REQ_IDETAPE_READ	= (1 << 2),
	REQ_IDETAPE_WRITE	= (1 << 3),
};

/* Error codes returned in rq->errors to the higher part of the driver. */
#define IDETAPE_ERROR_GENERAL		101
#define IDETAPE_ERROR_FILEMARK		102
#define IDETAPE_ERROR_EOD		103

/* Structures related to the SELECT SENSE / MODE SENSE packet commands. */
#define IDETAPE_BLOCK_DESCRIPTOR	0
#define IDETAPE_CAPABILITIES_PAGE	0x2a

201
202
203
204
205
206
/* Tape flag bits values. */
enum {
	IDETAPE_FLAG_IGNORE_DSC		= (1 << 0),
	/* 0 When the tape position is unknown */
	IDETAPE_FLAG_ADDRESS_VALID	= (1 <<	1),
	/* Device already opened */
207
	IDETAPE_FLAG_BUSY		= (1 << 2),
208
	/* Attempt to auto-detect the current user block size */
209
	IDETAPE_FLAG_DETECT_BS		= (1 << 3),
210
	/* Currently on a filemark */
211
	IDETAPE_FLAG_FILEMARK		= (1 << 4),
212
	/* DRQ interrupt device */
213
	IDETAPE_FLAG_DRQ_INTERRUPT	= (1 << 5),
214
	/* 0 = no tape is loaded, so we don't rewind after ejecting */
215
	IDETAPE_FLAG_MEDIUM_PRESENT	= (1 << 6),
216
217
};

Linus Torvalds's avatar
Linus Torvalds committed
218
/*
219
220
 * Most of our global data which we need to save even as we leave the driver due
 * to an interrupt or a timer event is stored in the struct defined below.
Linus Torvalds's avatar
Linus Torvalds committed
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
 */
typedef struct ide_tape_obj {
	ide_drive_t	*drive;
	ide_driver_t	*driver;
	struct gendisk	*disk;
	struct kref	kref;

	/*
	 *	Since a typical character device operation requires more
	 *	than one packet command, we provide here enough memory
	 *	for the maximum of interconnected packet commands.
	 *	The packet commands are stored in the circular array pc_stack.
	 *	pc_stack_index points to the last used entry, and warps around
	 *	to the start when we get to the last array entry.
	 *
	 *	pc points to the current processed packet command.
	 *
	 *	failed_pc points to the last failed packet command, or contains
	 *	NULL if we do not need to retry any packet command. This is
	 *	required since an additional packet command is needed before the
	 *	retry, to get detailed information on what went wrong.
	 */
	/* Current packet command */
244
	struct ide_atapi_pc *pc;
Linus Torvalds's avatar
Linus Torvalds committed
245
	/* Last failed packet command */
246
	struct ide_atapi_pc *failed_pc;
Linus Torvalds's avatar
Linus Torvalds committed
247
	/* Packet command stack */
248
	struct ide_atapi_pc pc_stack[IDETAPE_PC_STACK];
Linus Torvalds's avatar
Linus Torvalds committed
249
250
251
252
253
254
255
	/* Next free packet command storage space */
	int pc_stack_index;
	struct request rq_stack[IDETAPE_PC_STACK];
	/* We implement a circular array */
	int rq_stack_index;

	/*
256
	 * DSC polling variables.
Linus Torvalds's avatar
Linus Torvalds committed
257
	 *
258
259
260
	 * While polling for DSC we use postponed_rq to postpone the current
	 * request so that ide.c will be able to service pending requests on the
	 * other device. Note that at most we will have only one DSC (usually
261
	 * data transfer) request in the device request queue.
Linus Torvalds's avatar
Linus Torvalds committed
262
263
264
265
266
267
268
	 */
	struct request *postponed_rq;
	/* The time in which we started polling for DSC */
	unsigned long dsc_polling_start;
	/* Timer used to poll for dsc */
	struct timer_list dsc_timer;
	/* Read/Write dsc polling frequency */
269
270
	unsigned long best_dsc_rw_freq;
	unsigned long dsc_poll_freq;
Linus Torvalds's avatar
Linus Torvalds committed
271
272
	unsigned long dsc_timeout;

273
	/* Read position information */
Linus Torvalds's avatar
Linus Torvalds committed
274
275
	u8 partition;
	/* Current block */
276
	unsigned int first_frame;
Linus Torvalds's avatar
Linus Torvalds committed
277

278
	/* Last error information */
Linus Torvalds's avatar
Linus Torvalds committed
279
280
	u8 sense_key, asc, ascq;

281
	/* Character device operation */
Linus Torvalds's avatar
Linus Torvalds committed
282
283
284
285
	unsigned int minor;
	/* device name */
	char name[4];
	/* Current character device data transfer direction */
286
	u8 chrdev_dir;
Linus Torvalds's avatar
Linus Torvalds committed
287

288
289
	/* tape block size, usually 512 or 1024 bytes */
	unsigned short blk_size;
Linus Torvalds's avatar
Linus Torvalds committed
290
	int user_bs_factor;
291

Linus Torvalds's avatar
Linus Torvalds committed
292
	/* Copy of the tape's Capabilities and Mechanical Page */
293
	u8 caps[20];
Linus Torvalds's avatar
Linus Torvalds committed
294
295

	/*
296
	 * Active data transfer request parameters.
Linus Torvalds's avatar
Linus Torvalds committed
297
	 *
298
299
300
	 * At most, there is only one ide-tape originated data transfer request
	 * in the device request queue. This allows ide.c to easily service
	 * requests from the other device when we postpone our active request.
Linus Torvalds's avatar
Linus Torvalds committed
301
	 */
302

303
	/* Data buffer size chosen based on the tape's recommendation */
304
	int buffer_size;
305
306
	/* merge buffer */
	struct idetape_bh *merge_bh;
307
308
	/* size of the merge buffer */
	int merge_bh_size;
309
	/* pointer to current buffer head within the merge buffer */
Linus Torvalds's avatar
Linus Torvalds committed
310
311
312
	struct idetape_bh *bh;
	char *b_data;
	int b_count;
313

314
	int pages_per_buffer;
Linus Torvalds's avatar
Linus Torvalds committed
315
316
317
318
319
320
	/* Wasted space in each stage */
	int excess_bh_size;

	/* Status/Action flags: long for set_bit */
	unsigned long flags;
	/* protects the ide-tape queue */
321
	spinlock_t lock;
Linus Torvalds's avatar
Linus Torvalds committed
322

323
	/* Measures average tape speed */
Linus Torvalds's avatar
Linus Torvalds committed
324
325
326
327
328
329
330
331
332
333
334
	unsigned long avg_time;
	int avg_size;
	int avg_speed;

	/* the door is currently locked */
	int door_locked;
	/* the tape hardware is write protected */
	char drv_write_prot;
	/* the tape is write protected (hardware or opened as read-only) */
	char write_prot;

335
	u32 debug_mask;
Linus Torvalds's avatar
Linus Torvalds committed
336
337
} idetape_tape_t;

338
static DEFINE_MUTEX(idetape_ref_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
339

340
341
static struct class *idetape_sysfs_class;

Linus Torvalds's avatar
Linus Torvalds committed
342
343
344
345
346
347
348
349
350
#define to_ide_tape(obj) container_of(obj, struct ide_tape_obj, kref)

#define ide_tape_g(disk) \
	container_of((disk)->private_data, struct ide_tape_obj, driver)

static struct ide_tape_obj *ide_tape_get(struct gendisk *disk)
{
	struct ide_tape_obj *tape = NULL;

351
	mutex_lock(&idetape_ref_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
352
353
354
	tape = ide_tape_g(disk);
	if (tape)
		kref_get(&tape->kref);
355
	mutex_unlock(&idetape_ref_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
356
357
358
359
360
361
362
	return tape;
}

static void ide_tape_release(struct kref *);

static void ide_tape_put(struct ide_tape_obj *tape)
{
363
	mutex_lock(&idetape_ref_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
364
	kref_put(&tape->kref, ide_tape_release);
365
	mutex_unlock(&idetape_ref_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
366
367
368
}

/*
369
370
 * The variables below are used for the character device interface. Additional
 * state variables are defined in our ide_drive_t structure.
Linus Torvalds's avatar
Linus Torvalds committed
371
 */
372
static struct ide_tape_obj *idetape_devs[MAX_HWIFS * MAX_DRIVES];
Linus Torvalds's avatar
Linus Torvalds committed
373
374
375
376
377
378
379

#define ide_tape_f(file) ((file)->private_data)

static struct ide_tape_obj *ide_tape_chrdev_get(unsigned int i)
{
	struct ide_tape_obj *tape = NULL;

380
	mutex_lock(&idetape_ref_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
381
382
383
	tape = idetape_devs[i];
	if (tape)
		kref_get(&tape->kref);
384
	mutex_unlock(&idetape_ref_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
385
386
387
	return tape;
}

388
static void idetape_input_buffers(ide_drive_t *drive, struct ide_atapi_pc *pc,
389
				  unsigned int bcount)
Linus Torvalds's avatar
Linus Torvalds committed
390
391
392
393
394
395
396
397
{
	struct idetape_bh *bh = pc->bh;
	int count;

	while (bcount) {
		if (bh == NULL) {
			printk(KERN_ERR "ide-tape: bh == NULL in "
				"idetape_input_buffers\n");
398
			ide_pad_transfer(drive, 0, bcount);
Linus Torvalds's avatar
Linus Torvalds committed
399
400
			return;
		}
401
402
403
		count = min(
			(unsigned int)(bh->b_size - atomic_read(&bh->b_count)),
			bcount);
404
		drive->hwif->input_data(drive, NULL, bh->b_data +
405
					atomic_read(&bh->b_count), count);
Linus Torvalds's avatar
Linus Torvalds committed
406
407
408
409
410
411
412
413
414
415
416
		bcount -= count;
		atomic_add(count, &bh->b_count);
		if (atomic_read(&bh->b_count) == bh->b_size) {
			bh = bh->b_reqnext;
			if (bh)
				atomic_set(&bh->b_count, 0);
		}
	}
	pc->bh = bh;
}

417
static void idetape_output_buffers(ide_drive_t *drive, struct ide_atapi_pc *pc,
418
				   unsigned int bcount)
Linus Torvalds's avatar
Linus Torvalds committed
419
420
421
422
423
424
{
	struct idetape_bh *bh = pc->bh;
	int count;

	while (bcount) {
		if (bh == NULL) {
425
426
			printk(KERN_ERR "ide-tape: bh == NULL in %s\n",
					__func__);
Linus Torvalds's avatar
Linus Torvalds committed
427
428
429
			return;
		}
		count = min((unsigned int)pc->b_count, (unsigned int)bcount);
430
		drive->hwif->output_data(drive, NULL, pc->b_data, count);
Linus Torvalds's avatar
Linus Torvalds committed
431
432
433
434
		bcount -= count;
		pc->b_data += count;
		pc->b_count -= count;
		if (!pc->b_count) {
435
436
			bh = bh->b_reqnext;
			pc->bh = bh;
Linus Torvalds's avatar
Linus Torvalds committed
437
438
439
440
441
442
443
444
			if (bh) {
				pc->b_data = bh->b_data;
				pc->b_count = atomic_read(&bh->b_count);
			}
		}
	}
}

445
static void idetape_update_buffers(struct ide_atapi_pc *pc)
Linus Torvalds's avatar
Linus Torvalds committed
446
447
448
{
	struct idetape_bh *bh = pc->bh;
	int count;
449
	unsigned int bcount = pc->xferred;
Linus Torvalds's avatar
Linus Torvalds committed
450

451
	if (pc->flags & PC_FLAG_WRITING)
Linus Torvalds's avatar
Linus Torvalds committed
452
453
454
		return;
	while (bcount) {
		if (bh == NULL) {
455
456
			printk(KERN_ERR "ide-tape: bh == NULL in %s\n",
					__func__);
Linus Torvalds's avatar
Linus Torvalds committed
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
			return;
		}
		count = min((unsigned int)bh->b_size, (unsigned int)bcount);
		atomic_set(&bh->b_count, count);
		if (atomic_read(&bh->b_count) == bh->b_size)
			bh = bh->b_reqnext;
		bcount -= count;
	}
	pc->bh = bh;
}

/*
 *	idetape_next_pc_storage returns a pointer to a place in which we can
 *	safely store a packet command, even though we intend to leave the
 *	driver. A storage space for a maximum of IDETAPE_PC_STACK packet
 *	commands is allocated at initialization time.
 */
474
static struct ide_atapi_pc *idetape_next_pc_storage(ide_drive_t *drive)
Linus Torvalds's avatar
Linus Torvalds committed
475
476
477
{
	idetape_tape_t *tape = drive->driver_data;

478
479
	debug_log(DBG_PCRQ_STACK, "pc_stack_index=%d\n", tape->pc_stack_index);

Linus Torvalds's avatar
Linus Torvalds committed
480
	if (tape->pc_stack_index == IDETAPE_PC_STACK)
481
		tape->pc_stack_index = 0;
Linus Torvalds's avatar
Linus Torvalds committed
482
483
484
485
486
487
488
489
	return (&tape->pc_stack[tape->pc_stack_index++]);
}

/*
 *	idetape_next_rq_storage is used along with idetape_next_pc_storage.
 *	Since we queue packet commands in the request queue, we need to
 *	allocate a request, along with the allocation of a packet command.
 */
490

Linus Torvalds's avatar
Linus Torvalds committed
491
492
493
494
495
496
/**************************************************************
 *                                                            *
 *  This should get fixed to use kmalloc(.., GFP_ATOMIC)      *
 *  followed later on by kfree().   -ml                       *
 *                                                            *
 **************************************************************/
497
498

static struct request *idetape_next_rq_storage(ide_drive_t *drive)
Linus Torvalds's avatar
Linus Torvalds committed
499
500
501
{
	idetape_tape_t *tape = drive->driver_data;

502
503
	debug_log(DBG_PCRQ_STACK, "rq_stack_index=%d\n", tape->rq_stack_index);

Linus Torvalds's avatar
Linus Torvalds committed
504
	if (tape->rq_stack_index == IDETAPE_PC_STACK)
505
		tape->rq_stack_index = 0;
Linus Torvalds's avatar
Linus Torvalds committed
506
507
508
	return (&tape->rq_stack[tape->rq_stack_index++]);
}

509
static void idetape_init_pc(struct ide_atapi_pc *pc)
Linus Torvalds's avatar
Linus Torvalds committed
510
511
512
513
{
	memset(pc->c, 0, 12);
	pc->retries = 0;
	pc->flags = 0;
514
515
516
	pc->req_xfer = 0;
	pc->buf = pc->pc_buf;
	pc->buf_size = IDETAPE_PC_BUFFER_SIZE;
Linus Torvalds's avatar
Linus Torvalds committed
517
518
519
520
521
	pc->bh = NULL;
	pc->b_data = NULL;
}

/*
522
523
 * called on each failed packet command retry to analyze the request sense. We
 * currently do not utilize this information.
Linus Torvalds's avatar
Linus Torvalds committed
524
 */
525
static void idetape_analyze_error(ide_drive_t *drive, u8 *sense)
Linus Torvalds's avatar
Linus Torvalds committed
526
527
{
	idetape_tape_t *tape = drive->driver_data;
528
	struct ide_atapi_pc *pc = tape->failed_pc;
Linus Torvalds's avatar
Linus Torvalds committed
529

530
531
532
	tape->sense_key = sense[2] & 0xF;
	tape->asc       = sense[12];
	tape->ascq      = sense[13];
533
534
535

	debug_log(DBG_ERR, "pc = %x, sense key = %x, asc = %x, ascq = %x\n",
		 pc->c[0], tape->sense_key, tape->asc, tape->ascq);
Linus Torvalds's avatar
Linus Torvalds committed
536

537
	/* Correct pc->xferred by asking the tape.	 */
538
	if (pc->flags & PC_FLAG_DMA_ERROR) {
539
		pc->xferred = pc->req_xfer -
540
			tape->blk_size *
541
			get_unaligned_be32(&sense[3]);
Linus Torvalds's avatar
Linus Torvalds committed
542
543
544
545
546
547
548
549
		idetape_update_buffers(pc);
	}

	/*
	 * If error was the result of a zero-length read or write command,
	 * with sense key=5, asc=0x22, ascq=0, let it slide.  Some drives
	 * (i.e. Seagate STT3401A Travan) don't support 0-length read/writes.
	 */
550
	if ((pc->c[0] == READ_6 || pc->c[0] == WRITE_6)
551
552
553
	    /* length == 0 */
	    && pc->c[4] == 0 && pc->c[3] == 0 && pc->c[2] == 0) {
		if (tape->sense_key == 5) {
Linus Torvalds's avatar
Linus Torvalds committed
554
555
556
			/* don't report an error, everything's ok */
			pc->error = 0;
			/* don't retry read/write */
557
			pc->flags |= PC_FLAG_ABORT;
Linus Torvalds's avatar
Linus Torvalds committed
558
559
		}
	}
560
	if (pc->c[0] == READ_6 && (sense[2] & 0x80)) {
Linus Torvalds's avatar
Linus Torvalds committed
561
		pc->error = IDETAPE_ERROR_FILEMARK;
562
		pc->flags |= PC_FLAG_ABORT;
Linus Torvalds's avatar
Linus Torvalds committed
563
	}
564
	if (pc->c[0] == WRITE_6) {
565
566
		if ((sense[2] & 0x40) || (tape->sense_key == 0xd
		     && tape->asc == 0x0 && tape->ascq == 0x2)) {
Linus Torvalds's avatar
Linus Torvalds committed
567
			pc->error = IDETAPE_ERROR_EOD;
568
			pc->flags |= PC_FLAG_ABORT;
Linus Torvalds's avatar
Linus Torvalds committed
569
570
		}
	}
571
	if (pc->c[0] == READ_6 || pc->c[0] == WRITE_6) {
572
		if (tape->sense_key == 8) {
Linus Torvalds's avatar
Linus Torvalds committed
573
			pc->error = IDETAPE_ERROR_EOD;
574
			pc->flags |= PC_FLAG_ABORT;
Linus Torvalds's avatar
Linus Torvalds committed
575
		}
576
		if (!(pc->flags & PC_FLAG_ABORT) &&
577
		    pc->xferred)
Linus Torvalds's avatar
Linus Torvalds committed
578
579
580
581
			pc->retries = IDETAPE_MAX_PC_RETRIES + 1;
	}
}

582
/* Free data buffers completely. */
583
static void ide_tape_kfree_buffer(idetape_tape_t *tape)
Linus Torvalds's avatar
Linus Torvalds committed
584
{
585
	struct idetape_bh *prev_bh, *bh = tape->merge_bh;
586
587
588
589
590
591
592
593
594
595
596
597

	while (bh) {
		u32 size = bh->b_size;

		while (size) {
			unsigned int order = fls(size >> PAGE_SHIFT)-1;

			if (bh->b_data)
				free_pages((unsigned long)bh->b_data, order);

			size &= (order-1);
			bh->b_data += (1 << order) * PAGE_SIZE;
Linus Torvalds's avatar
Linus Torvalds committed
598
599
600
601
602
		}
		prev_bh = bh;
		bh = bh->b_reqnext;
		kfree(prev_bh);
	}
603
	kfree(tape->merge_bh);
Linus Torvalds's avatar
Linus Torvalds committed
604
605
606
607
608
609
610
611
612
}

static int idetape_end_request(ide_drive_t *drive, int uptodate, int nr_sects)
{
	struct request *rq = HWGROUP(drive)->rq;
	idetape_tape_t *tape = drive->driver_data;
	unsigned long flags;
	int error;

613
	debug_log(DBG_PROCS, "Enter %s\n", __func__);
Linus Torvalds's avatar
Linus Torvalds committed
614
615

	switch (uptodate) {
616
617
618
	case 0:	error = IDETAPE_ERROR_GENERAL; break;
	case 1: error = 0; break;
	default: error = uptodate;
Linus Torvalds's avatar
Linus Torvalds committed
619
620
621
622
623
	}
	rq->errors = error;
	if (error)
		tape->failed_pc = NULL;

624
625
626
627
628
	if (!blk_special_request(rq)) {
		ide_end_request(drive, uptodate, nr_sects);
		return 0;
	}

629
	spin_lock_irqsave(&tape->lock, flags);
Linus Torvalds's avatar
Linus Torvalds committed
630
631
632

	ide_end_drive_cmd(drive, 0, 0);

633
	spin_unlock_irqrestore(&tape->lock, flags);
Linus Torvalds's avatar
Linus Torvalds committed
634
635
636
	return 0;
}

637
static ide_startstop_t idetape_request_sense_callback(ide_drive_t *drive)
Linus Torvalds's avatar
Linus Torvalds committed
638
639
640
{
	idetape_tape_t *tape = drive->driver_data;

641
642
	debug_log(DBG_PROCS, "Enter %s\n", __func__);

Linus Torvalds's avatar
Linus Torvalds committed
643
	if (!tape->pc->error) {
644
		idetape_analyze_error(drive, tape->pc->buf);
Linus Torvalds's avatar
Linus Torvalds committed
645
646
		idetape_end_request(drive, 1, 0);
	} else {
647
648
		printk(KERN_ERR "ide-tape: Error in REQUEST SENSE itself - "
				"Aborting request!\n");
Linus Torvalds's avatar
Linus Torvalds committed
649
650
651
652
653
		idetape_end_request(drive, 0, 0);
	}
	return ide_stopped;
}

654
static void idetape_create_request_sense_cmd(struct ide_atapi_pc *pc)
Linus Torvalds's avatar
Linus Torvalds committed
655
{
656
	idetape_init_pc(pc);
657
	pc->c[0] = REQUEST_SENSE;
Linus Torvalds's avatar
Linus Torvalds committed
658
	pc->c[4] = 20;
659
660
	pc->req_xfer = 20;
	pc->idetape_callback = &idetape_request_sense_callback;
Linus Torvalds's avatar
Linus Torvalds committed
661
662
663
664
}

static void idetape_init_rq(struct request *rq, u8 cmd)
{
665
	blk_rq_init(NULL, rq);
666
	rq->cmd_type = REQ_TYPE_SPECIAL;
Linus Torvalds's avatar
Linus Torvalds committed
667
668
669
670
	rq->cmd[0] = cmd;
}

/*
671
672
673
674
675
 * Generate a new packet command request in front of the request queue, before
 * the current request, so that it will be processed immediately, on the next
 * pass through the driver. The function below is called from the request
 * handling part of the driver (the "bottom" part). Safe storage for the request
 * should be allocated with ide_tape_next_{pc,rq}_storage() prior to that.
Linus Torvalds's avatar
Linus Torvalds committed
676
 *
677
678
679
 * Memory for those requests is pre-allocated at initialization time, and is
 * limited to IDETAPE_PC_STACK requests. We assume that we have enough space for
 * the maximum possible number of inter-dependent packet commands.
Linus Torvalds's avatar
Linus Torvalds committed
680
 *
681
682
683
 * The higher level of the driver - The ioctl handler and the character device
 * handling functions should queue request to the lower level part and wait for
 * their completion using idetape_queue_pc_tail or idetape_queue_rw_tail.
Linus Torvalds's avatar
Linus Torvalds committed
684
 */
685
static void idetape_queue_pc_head(ide_drive_t *drive, struct ide_atapi_pc *pc,
686
				  struct request *rq)
Linus Torvalds's avatar
Linus Torvalds committed
687
688
689
690
{
	struct ide_tape_obj *tape = drive->driver_data;

	idetape_init_rq(rq, REQ_IDETAPE_PC1);
691
	rq->cmd_flags |= REQ_PREEMPT;
Linus Torvalds's avatar
Linus Torvalds committed
692
693
694
695
696
697
698
699
700
701
702
703
704
	rq->buffer = (char *) pc;
	rq->rq_disk = tape->disk;
	(void) ide_do_drive_cmd(drive, rq, ide_preempt);
}

/*
 *	idetape_retry_pc is called when an error was detected during the
 *	last packet command. We queue a request sense packet command in
 *	the head of the request list.
 */
static ide_startstop_t idetape_retry_pc (ide_drive_t *drive)
{
	idetape_tape_t *tape = drive->driver_data;
705
	struct ide_atapi_pc *pc;
Linus Torvalds's avatar
Linus Torvalds committed
706
707
	struct request *rq;

708
	(void)ide_read_error(drive);
Linus Torvalds's avatar
Linus Torvalds committed
709
710
711
	pc = idetape_next_pc_storage(drive);
	rq = idetape_next_rq_storage(drive);
	idetape_create_request_sense_cmd(pc);
712
	set_bit(IDETAPE_FLAG_IGNORE_DSC, &tape->flags);
Linus Torvalds's avatar
Linus Torvalds committed
713
714
715
716
717
	idetape_queue_pc_head(drive, pc, rq);
	return ide_stopped;
}

/*
718
719
 * Postpone the current request so that ide.c will be able to service requests
 * from another device on the same hwgroup while we are polling for DSC.
Linus Torvalds's avatar
Linus Torvalds committed
720
 */
721
static void idetape_postpone_request(ide_drive_t *drive)
Linus Torvalds's avatar
Linus Torvalds committed
722
723
724
{
	idetape_tape_t *tape = drive->driver_data;

725
726
	debug_log(DBG_PROCS, "Enter %s\n", __func__);

Linus Torvalds's avatar
Linus Torvalds committed
727
	tape->postponed_rq = HWGROUP(drive)->rq;
728
	ide_stall_queue(drive, tape->dsc_poll_freq);
Linus Torvalds's avatar
Linus Torvalds committed
729
730
}

731
typedef void idetape_io_buf(ide_drive_t *, struct ide_atapi_pc *, unsigned int);
732

Linus Torvalds's avatar
Linus Torvalds committed
733
/*
734
735
736
737
 * This is the usual interrupt handler which will be called during a packet
 * command. We will transfer some of the data (as requested by the drive) and
 * will re-point interrupt handler to us. When data transfer is finished, we
 * will act according to the algorithm described before
738
 * idetape_issue_pc.
Linus Torvalds's avatar
Linus Torvalds committed
739
 */
740
static ide_startstop_t idetape_pc_intr(ide_drive_t *drive)
Linus Torvalds's avatar
Linus Torvalds committed
741
742
743
{
	ide_hwif_t *hwif = drive->hwif;
	idetape_tape_t *tape = drive->driver_data;
744
	struct ide_atapi_pc *pc = tape->pc;
745
746
	xfer_func_t *xferfunc;
	idetape_io_buf *iobuf;
Linus Torvalds's avatar
Linus Torvalds committed
747
748
	unsigned int temp;
#if SIMULATE_ERRORS
749
	static int error_sim_count;
Linus Torvalds's avatar
Linus Torvalds committed
750
#endif
751
	u16 bcount;
752
	u8 stat, ireason;
Linus Torvalds's avatar
Linus Torvalds committed
753

754
	debug_log(DBG_PROCS, "Enter %s - interrupt handler\n", __func__);
Linus Torvalds's avatar
Linus Torvalds committed
755
756

	/* Clear the interrupt */
757
	stat = ide_read_status(drive);
Linus Torvalds's avatar
Linus Torvalds committed
758

759
	if (pc->flags & PC_FLAG_DMA_IN_PROGRESS) {
760
		if (hwif->dma_ops->dma_end(drive) || (stat & ERR_STAT)) {
Linus Torvalds's avatar
Linus Torvalds committed
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
			/*
			 * A DMA error is sometimes expected. For example,
			 * if the tape is crossing a filemark during a
			 * READ command, it will issue an irq and position
			 * itself before the filemark, so that only a partial
			 * data transfer will occur (which causes the DMA
			 * error). In that case, we will later ask the tape
			 * how much bytes of the original request were
			 * actually transferred (we can't receive that
			 * information from the DMA engine on most chipsets).
			 */

			/*
			 * On the contrary, a DMA error is never expected;
			 * it usually indicates a hardware error or abort.
			 * If the tape crosses a filemark during a READ
			 * command, it will issue an irq and position itself
			 * after the filemark (not before). Only a partial
			 * data transfer will occur, but no DMA error.
			 * (AS, 19 Apr 2001)
			 */
782
			pc->flags |= PC_FLAG_DMA_ERROR;
Linus Torvalds's avatar
Linus Torvalds committed
783
		} else {
784
			pc->xferred = pc->req_xfer;
Linus Torvalds's avatar
Linus Torvalds committed
785
786
			idetape_update_buffers(pc);
		}
787
788
		debug_log(DBG_PROCS, "DMA finished\n");

Linus Torvalds's avatar
Linus Torvalds committed
789
790
791
	}

	/* No more interrupts */
792
	if ((stat & DRQ_STAT) == 0) {
793
		debug_log(DBG_SENSE, "Packet command completed, %d bytes"
794
				" transferred\n", pc->xferred);
Linus Torvalds's avatar
Linus Torvalds committed
795

796
		pc->flags &= ~PC_FLAG_DMA_IN_PROGRESS;
Linus Torvalds's avatar
Linus Torvalds committed
797
798
799
		local_irq_enable();

#if SIMULATE_ERRORS
800
		if ((pc->c[0] == WRITE_6 || pc->c[0] == READ_6) &&
Linus Torvalds's avatar
Linus Torvalds committed
801
802
803
		    (++error_sim_count % 100) == 0) {
			printk(KERN_INFO "ide-tape: %s: simulating error\n",
				tape->name);
804
			stat |= ERR_STAT;
Linus Torvalds's avatar
Linus Torvalds committed
805
806
		}
#endif
807
		if ((stat & ERR_STAT) && pc->c[0] == REQUEST_SENSE)
808
			stat &= ~ERR_STAT;
809
		if ((stat & ERR_STAT) || (pc->flags & PC_FLAG_DMA_ERROR)) {
810
			/* Error detected */
811
812
			debug_log(DBG_ERR, "%s: I/O error\n", tape->name);

813
			if (pc->c[0] == REQUEST_SENSE) {
814
815
				printk(KERN_ERR "ide-tape: I/O error in request"
						" sense command\n");
Linus Torvalds's avatar
Linus Torvalds committed
816
817
				return ide_do_reset(drive);
			}
818
819
820
			debug_log(DBG_ERR, "[cmd %x]: check condition\n",
					pc->c[0]);

Linus Torvalds's avatar
Linus Torvalds committed
821
822
823
824
			/* Retry operation */
			return idetape_retry_pc(drive);
		}
		pc->error = 0;
825
		if ((pc->flags & PC_FLAG_WAIT_FOR_DSC) &&
826
		    (stat & SEEK_STAT) == 0) {
Linus Torvalds's avatar
Linus Torvalds committed
827
828
			/* Media access command */
			tape->dsc_polling_start = jiffies;
829
			tape->dsc_poll_freq = IDETAPE_DSC_MA_FAST;
Linus Torvalds's avatar
Linus Torvalds committed
830
831
832
833
834
835
836
837
			tape->dsc_timeout = jiffies + IDETAPE_DSC_MA_TIMEOUT;
			/* Allow ide.c to handle other requests */
			idetape_postpone_request(drive);
			return ide_stopped;
		}
		if (tape->failed_pc == pc)
			tape->failed_pc = NULL;
		/* Command finished - Call the callback function */
838
		return pc->idetape_callback(drive);
Linus Torvalds's avatar
Linus Torvalds committed
839
	}
840
841
842

	if (pc->flags & PC_FLAG_DMA_IN_PROGRESS) {
		pc->flags &= ~PC_FLAG_DMA_IN_PROGRESS;
Linus Torvalds's avatar
Linus Torvalds committed
843
844
845
		printk(KERN_ERR "ide-tape: The tape wants to issue more "
				"interrupts in DMA mode\n");
		printk(KERN_ERR "ide-tape: DMA disabled, reverting to PIO\n");
846
		ide_dma_off(drive);
Linus Torvalds's avatar
Linus Torvalds committed
847
848
849
		return ide_do_reset(drive);
	}
	/* Get the number of bytes to transfer on this interrupt. */
850
851
	bcount = (hwif->INB(hwif->io_ports.lbah_addr) << 8) |
		  hwif->INB(hwif->io_ports.lbam_addr);
Linus Torvalds's avatar
Linus Torvalds committed
852

853
	ireason = hwif->INB(hwif->io_ports.nsect_addr);
Linus Torvalds's avatar
Linus Torvalds committed
854

855
	if (ireason & CD) {
856
		printk(KERN_ERR "ide-tape: CoD != 0 in %s\n", __func__);
Linus Torvalds's avatar
Linus Torvalds committed
857
858
		return ide_do_reset(drive);
	}
859
	if (((ireason & IO) == IO) == !!(pc->flags & PC_FLAG_WRITING)) {
Linus Torvalds's avatar
Linus Torvalds committed
860
861
		/* Hopefully, we will never get here */
		printk(KERN_ERR "ide-tape: We wanted to %s, ",
862
				(ireason & IO) ? "Write" : "Read");
Linus Torvalds's avatar
Linus Torvalds committed
863
		printk(KERN_ERR "ide-tape: but the tape wants us to %s !\n",
864
				(ireason & IO) ? "Read" : "Write");
Linus Torvalds's avatar
Linus Torvalds committed
865
866
		return ide_do_reset(drive);
	}
867
	if (!(pc->flags & PC_FLAG_WRITING)) {
Linus Torvalds's avatar
Linus Torvalds committed
868
		/* Reading - Check that we have enough space */
869
870
871
		temp = pc->xferred + bcount;
		if (temp > pc->req_xfer) {
			if (temp > pc->buf_size) {
872
873
874
				printk(KERN_ERR "ide-tape: The tape wants to "
					"send us more data than expected "
					"- discarding data\n");
875
				ide_pad_transfer(drive, 0, bcount);
876
877
				ide_set_handler(drive, &idetape_pc_intr,
						IDETAPE_WAIT_CMD, NULL);
Linus Torvalds's avatar
Linus Torvalds committed
878
879
				return ide_started;
			}
880
881
			debug_log(DBG_SENSE, "The tape wants to send us more "
				"data than expected - allowing transfer\n");
Linus Torvalds's avatar
Linus Torvalds committed
882
		}
883
		iobuf = &idetape_input_buffers;
884
		xferfunc = hwif->input_data;
Linus Torvalds's avatar
Linus Torvalds committed
885
	} else {
886
		iobuf = &idetape_output_buffers;
887
		xferfunc = hwif->output_data;
Linus Torvalds's avatar
Linus Torvalds committed
888
	}
889
890
891
892

	if (pc->bh)
		iobuf(drive, pc, bcount);
	else
893
		xferfunc(drive, NULL, pc->cur_pos, bcount);
894

Linus Torvalds's avatar
Linus Torvalds committed
895
	/* Update the current position */
896
897
	pc->xferred += bcount;
	pc->cur_pos += bcount;
898
899
900
901

	debug_log(DBG_SENSE, "[cmd %x] transferred %d bytes on that intr.\n",
			pc->c[0], bcount);

Linus Torvalds's avatar
Linus Torvalds committed
902
903
904
905
906
907
	/* And set the interrupt handler again */
	ide_set_handler(drive, &idetape_pc_intr, IDETAPE_WAIT_CMD, NULL);
	return ide_started;
}

/*
908
 * Packet Command Interface
Linus Torvalds's avatar
Linus Torvalds committed
909
 *
910
911
912
 * The current Packet Command is available in tape->pc, and will not change
 * until we finish handling it. Each packet command is associated with a
 * callback function that will be called when the command is finished.
Linus Torvalds's avatar
Linus Torvalds committed
913
 *
914
 * The handling will be done in three stages:
Linus Torvalds's avatar
Linus Torvalds committed
915
 *
916
917
 * 1. idetape_issue_pc will send the packet command to the drive, and will set
 * the interrupt handler to idetape_pc_intr.
Linus Torvalds's avatar
Linus Torvalds committed
918
 *
919
920
 * 2. On each interrupt, idetape_pc_intr will be called. This step will be
 * repeated until the device signals us that no more interrupts will be issued.
Linus Torvalds's avatar
Linus Torvalds committed
921
 *
922
923
924
925
926
927
928
 * 3. ATAPI Tape media access commands have immediate status with a delayed
 * process. In case of a successful initiation of a media access packet command,
 * the DSC bit will be set when the actual execution of the command is finished.
 * Since the tape drive will not issue an interrupt, we have to poll for this
 * event. In this case, we define the request as "low priority request" by
 * setting rq_status to IDETAPE_RQ_POSTPONED, set a timer to poll for DSC and
 * exit the driver.
Linus Torvalds's avatar
Linus Torvalds committed
929
 *
930
931
 * ide.c will then give higher priority to requests which originate from the
 * other device, until will change rq_status to RQ_ACTIVE.
Linus Torvalds's avatar
Linus Torvalds committed
932
 *
933
 * 4. When the packet command is finished, it will be checked for errors.
Linus Torvalds's avatar
Linus Torvalds committed
934
 *
935
936
937
 * 5. In case an error was found, we queue a request sense packet command in
 * front of the request queue and retry the operation up to
 * IDETAPE_MAX_PC_RETRIES times.
Linus Torvalds's avatar
Linus Torvalds committed
938
 *
939
940
941
 * 6. In case no error was found, or we decided to give up and not to retry
 * again, the callback function will be called and then we will handle the next
 * request.
Linus Torvalds's avatar
Linus Torvalds committed
942
943
944
945
946
 */
static ide_startstop_t idetape_transfer_pc(ide_drive_t *drive)
{
	ide_hwif_t *hwif = drive->hwif;
	idetape_tape_t *tape = drive->driver_data;
947
	struct ide_atapi_pc *pc = tape->pc;
Linus Torvalds's avatar
Linus Torvalds committed
948
949
	int retries = 100;
	ide_startstop_t startstop;
950
	u8 ireason;
Linus Torvalds's avatar
Linus Torvalds committed
951

952
953
954
	if (ide_wait_stat(&startstop, drive, DRQ_STAT, BUSY_STAT, WAIT_READY)) {
		printk(KERN_ERR "ide-tape: Strange, packet command initiated "
				"yet DRQ isn't asserted\n");
Linus Torvalds's avatar
Linus Torvalds committed
955
956
		return startstop;
	}
957
	ireason = hwif->INB(hwif->io_ports.nsect_addr);
958
	while (retries-- && ((ireason & CD) == 0 || (ireason & IO))) {
Linus Torvalds's avatar
Linus Torvalds committed
959
960
961
		printk(KERN_ERR "ide-tape: (IO,CoD != (0,1) while issuing "
				"a packet command, retrying\n");
		udelay(100);
962
		ireason = hwif->INB(hwif->io_ports.nsect_addr);
Linus Torvalds's avatar
Linus Torvalds committed
963
964
965
		if (retries == 0) {
			printk(KERN_ERR "ide-tape: (IO,CoD != (0,1) while "
					"issuing a packet command, ignoring\n");
966
967
			ireason |= CD;
			ireason &= ~IO;
Linus Torvalds's avatar
Linus Torvalds committed
968
969
		}
	}
970
	if ((ireason & CD) == 0 || (ireason & IO)) {
Linus Torvalds's avatar
Linus Torvalds committed
971
972
973
974
975
976
977
978
		printk(KERN_ERR "ide-tape: (IO,CoD) != (0,1) while issuing "
				"a packet command\n");
		return ide_do_reset(drive);
	}
	/* Set the interrupt routine */
	ide_set_handler(drive, &idetape_pc_intr, IDETAPE_WAIT_CMD, NULL);
#ifdef CONFIG_BLK_DEV_IDEDMA
	/* Begin DMA, if necessary */
979
	if (pc->flags & PC_FLAG_DMA_IN_PROGRESS)
980
		hwif->dma_ops->dma_start(drive);
Linus Torvalds's avatar
Linus Torvalds committed
981
982
#endif
	/* Send the actual packet */
983
984
	hwif->output_data(drive, NULL, pc->c, 12);

Linus Torvalds's avatar
Linus Torvalds committed
985
986
987
	return ide_started;
}

988
989
static ide_startstop_t idetape_issue_pc(ide_drive_t *drive,
		struct ide_atapi_pc *pc)
Linus Torvalds's avatar
Linus Torvalds committed
990
991
992
993
{
	ide_hwif_t *hwif = drive->hwif;
	idetape_tape_t *tape = drive->driver_data;
	int dma_ok = 0;
994
	u16 bcount;
Linus Torvalds's avatar
Linus Torvalds committed
995

996
997
	if (tape->pc->c[0] == REQUEST_SENSE &&
	    pc->c[0] == REQUEST_SENSE) {
Linus Torvalds's avatar
Linus Torvalds committed
998
999
1000
1001
		printk(KERN_ERR "ide-tape: possible ide-tape.c bug - "
			"Two request sense in serial were issued\n");
	}

1002
	if (tape->failed_pc == NULL && pc->c[0] != REQUEST_SENSE)
Linus Torvalds's avatar
Linus Torvalds committed
1003
1004
1005
1006
1007
		tape->failed_pc = pc;
	/* Set the current packet command */
	tape->pc = pc;

	if (pc->retries > IDETAPE_MAX_PC_RETRIES ||
1008
		(pc->flags & PC_FLAG_ABORT)) {
Linus Torvalds's avatar
Linus Torvalds committed
1009
		/*
1010
1011
1012
		 * We will "abort" retrying a packet command in case legitimate
		 * error code was received (crossing a filemark, or end of the
		 * media, for example).
Linus Torvalds's avatar
Linus Torvalds committed
1013
		 */
1014
		if (!(pc->flags & PC_FLAG_ABORT)) {
1015
			if (!(pc->c[0] == TEST_UNIT_READY &&
Linus Torvalds's avatar
Linus Torvalds committed
1016
1017
1018
1019
1020
1021
1022
1023
1024
1025
1026
1027
1028
			      tape->sense_key == 2 && tape->asc == 4 &&
			     (tape->ascq == 1 || tape->ascq == 8))) {
				printk(KERN_ERR "ide-tape: %s: I/O error, "
						"pc = %2x, key = %2x, "
						"asc = %2x, ascq = %2x\n",
						tape->name, pc->c[0],
						tape->sense_key, tape->asc,
						tape->ascq);
			}
			/* Giving up */
			pc->error = IDETAPE_ERROR_GENERAL;
		}
		tape->failed_pc = NULL;
1029
		return pc->idetape_callback(drive);
Linus Torvalds's avatar
Linus Torvalds committed
1030
	}
1031
	debug_log(DBG_SENSE, "Retry #%d, cmd = %02X\n", pc->retries, pc->c[0]);
Linus Torvalds's avatar
Linus Torvalds committed
1032
1033
1034

	pc->retries++;
	/* We haven't transferred any data yet */
1035
1036
	pc->xferred = 0;
	pc->cur_pos = pc->buf;
Linus Torvalds's avatar
Linus Torvalds committed
1037
	/* Request to transfer the entire buffer at once */
1038
	bcount = pc->req_xfer;
Linus Torvalds's avatar
Linus Torvalds committed
1039

1040
1041
	if (pc->flags & PC_FLAG_DMA_ERROR) {
		pc->flags &= ~PC_FLAG_DMA_ERROR;
Linus Torvalds's avatar
Linus Torvalds committed
1042
1043
		printk(KERN_WARNING "ide-tape: DMA disabled, "
				"reverting to PIO\n");
1044
		ide_dma_off(drive);
Linus Torvalds's avatar
Linus Torvalds committed
1045
	}
1046
	if ((pc->flags & PC_FLAG_DMA_RECOMMENDED) && drive->using_dma)
1047
		dma_ok = !hwif->dma_ops->dma_setup(drive);
Linus Torvalds's avatar
Linus Torvalds committed
1048

1049
1050
1051
	ide_pktcmd_tf_load(drive, IDE_TFLAG_NO_SELECT_MASK |
			   IDE_TFLAG_OUT_DEVICE, bcount, dma_ok);

1052
1053
1054
1055
	if (dma_ok)
		/* Will begin DMA later */
		pc->flags |= PC_FLAG_DMA_IN_PROGRESS;
	if (test_bit(IDETAPE_FLAG_DRQ_INTERRUPT, &tape->flags)) {
1056
1057
		ide_execute_command(drive, WIN_PACKETCMD, &idetape_transfer_pc,
				    IDETAPE_WAIT_CMD, NULL);
Linus Torvalds's avatar
Linus Torvalds committed
1058
1059
		return ide_started;
	} else {
1060
		ide_execute_pkt_cmd(drive);
Linus Torvalds's avatar
Linus Torvalds committed
1061
1062
1063
1064
		return idetape_transfer_pc(drive);
	}
}

1065
static ide_startstop_t idetape_pc_callback(ide_drive_t *drive)
Linus Torvalds's avatar
Linus Torvalds committed
1066
1067
{
	idetape_tape_t *tape = drive->driver_data;
1068
1069

	debug_log(DBG_PROCS, "Enter %s\n", __func__);
Linus Torvalds's avatar
Linus Torvalds committed
1070
1071
1072
1073
1074

	idetape_end_request(drive, tape->pc->error ? 0 : 1, 0);
	return ide_stopped;
}

1075
/* A mode sense command is used to "sense" tape parameters. */
1076
static void idetape_create_mode_sense_cmd(struct ide_atapi_pc *pc, u8 page_code)
Linus Torvalds's avatar
Linus Torvalds committed
1077
1078
{
	idetape_init_pc(pc);
1079
	pc->c[0] = MODE_SENSE;
Linus Torvalds's avatar
Linus Torvalds committed
1080
	if (page_code != IDETAPE_BLOCK_DESCRIPTOR)
1081
1082
		/* DBD = 1 - Don't return block descriptors */
		pc->c[1] = 8;
Linus Torvalds's avatar
Linus Torvalds committed
1083
1084
1085
1086
1087
1088
1089
1090
1091
	pc->c[2] = page_code;
	/*
	 * Changed pc->c[3] to 0 (255 will at best return unused info).
	 *
	 * For SCSI this byte is defined as subpage instead of high byte
	 * of length and some IDE drives seem to interpret it this way
	 * and return an error when 255 is used.
	 */
	pc->c[3] = 0;
1092
1093
	/* We will just discard data in that case */
	pc->c[4] = 255;
Linus Torvalds's avatar
Linus Torvalds committed
1094
	if (page_code == IDETAPE_BLOCK_DESCRIPTOR)
1095
		pc->req_xfer = 12;
Linus Torvalds's avatar
Linus Torvalds committed
1096
	else if (page_code == IDETAPE_CAPABILITIES_PAGE)
1097
		pc->req_xfer = 24;
Linus Torvalds's avatar
Linus Torvalds committed
1098
	else
1099
1100
		pc->req_xfer = 50;
	pc->idetape_callback = &idetape_pc_callback;
Linus Torvalds's avatar
Linus Torvalds committed
1101
1102
}

1103
static ide_startstop_t idetape_media_access_finished(ide_drive_t *drive)
Linus Torvalds's avatar
Linus Torvalds committed
1104
1105
{
	idetape_tape_t *tape = drive->driver_data;
1106
	struct ide_atapi_pc *pc = tape->pc;
1107
	u8 stat;
Linus Torvalds's avatar
Linus Torvalds committed
1108

1109
1110
	stat = ide_read_status(drive);

1111
1112
	if (stat & SEEK_STAT) {
		if (stat & ERR_STAT) {
Linus Torvalds's avatar
Linus Torvalds committed
1113
			/* Error detected */
1114
			if (pc->c[0] != TEST_UNIT_READY)
Linus Torvalds's avatar
Linus Torvalds committed
1115
1116
1117
1118
1119
1120
1121
1122
1123
1124
1125
1126
				printk(KERN_ERR "ide-tape: %s: I/O error, ",
						tape->name);
			/* Retry operation */
			return idetape_retry_pc(drive);
		}
		pc->error = 0;
		if (tape->failed_pc == pc)
			tape->failed_pc = NULL;
	} else {
		pc->error = IDETAPE_ERROR_GENERAL;
		tape->failed_pc = NULL;
	}