ide-tape.c 75.6 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
148
149
150
151
152
/* 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
153
154

struct idetape_bh {
155
	u32 b_size;
Linus Torvalds's avatar
Linus Torvalds committed
156
157
158
159
160
	atomic_t b_count;
	struct idetape_bh *b_reqnext;
	char *b_data;
};

161
162
163
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
/* 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

198
199
200
201
202
203
/* 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 */
204
	IDETAPE_FLAG_BUSY		= (1 << 2),
205
	/* Attempt to auto-detect the current user block size */
206
	IDETAPE_FLAG_DETECT_BS		= (1 << 3),
207
	/* Currently on a filemark */
208
	IDETAPE_FLAG_FILEMARK		= (1 << 4),
209
	/* DRQ interrupt device */
210
	IDETAPE_FLAG_DRQ_INTERRUPT	= (1 << 5),
211
	/* 0 = no tape is loaded, so we don't rewind after ejecting */
212
	IDETAPE_FLAG_MEDIUM_PRESENT	= (1 << 6),
213
214
};

Linus Torvalds's avatar
Linus Torvalds committed
215
/*
216
217
 * 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
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
 */
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 */
241
	struct ide_atapi_pc *pc;
Linus Torvalds's avatar
Linus Torvalds committed
242
	/* Last failed packet command */
243
	struct ide_atapi_pc *failed_pc;
Linus Torvalds's avatar
Linus Torvalds committed
244
	/* Packet command stack */
245
	struct ide_atapi_pc pc_stack[IDETAPE_PC_STACK];
Linus Torvalds's avatar
Linus Torvalds committed
246
247
248
249
250
251
252
	/* 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;

	/*
253
	 * DSC polling variables.
Linus Torvalds's avatar
Linus Torvalds committed
254
	 *
255
256
257
	 * 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
258
	 * data transfer) request in the device request queue.
Linus Torvalds's avatar
Linus Torvalds committed
259
260
261
262
263
264
265
	 */
	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 */
266
267
	unsigned long best_dsc_rw_freq;
	unsigned long dsc_poll_freq;
Linus Torvalds's avatar
Linus Torvalds committed
268
269
	unsigned long dsc_timeout;

270
	/* Read position information */
Linus Torvalds's avatar
Linus Torvalds committed
271
272
	u8 partition;
	/* Current block */
273
	unsigned int first_frame;
Linus Torvalds's avatar
Linus Torvalds committed
274

275
	/* Last error information */
Linus Torvalds's avatar
Linus Torvalds committed
276
277
	u8 sense_key, asc, ascq;

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

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

Linus Torvalds's avatar
Linus Torvalds committed
289
	/* Copy of the tape's Capabilities and Mechanical Page */
290
	u8 caps[20];
Linus Torvalds's avatar
Linus Torvalds committed
291
292

	/*
293
	 * Active data transfer request parameters.
Linus Torvalds's avatar
Linus Torvalds committed
294
	 *
295
296
297
	 * 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
298
	 */
299

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

311
	int pages_per_buffer;
Linus Torvalds's avatar
Linus Torvalds committed
312
313
314
315
316
317
	/* Wasted space in each stage */
	int excess_bh_size;

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

320
	/* Measures average tape speed */
Linus Torvalds's avatar
Linus Torvalds committed
321
322
323
324
325
326
327
328
329
330
331
	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;

332
	u32 debug_mask;
Linus Torvalds's avatar
Linus Torvalds committed
333
334
} idetape_tape_t;

335
static DEFINE_MUTEX(idetape_ref_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
336

337
338
static struct class *idetape_sysfs_class;

Linus Torvalds's avatar
Linus Torvalds committed
339
340
341
342
343
344
345
346
347
#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;

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

static void ide_tape_release(struct kref *);

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

/*
366
367
 * 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
368
 */
369
static struct ide_tape_obj *idetape_devs[MAX_HWIFS * MAX_DRIVES];
Linus Torvalds's avatar
Linus Torvalds committed
370
371
372
373
374
375
376

#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;

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

385
static void idetape_input_buffers(ide_drive_t *drive, struct ide_atapi_pc *pc,
386
				  unsigned int bcount)
Linus Torvalds's avatar
Linus Torvalds committed
387
388
389
390
391
392
393
394
{
	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");
395
			ide_pad_transfer(drive, 0, bcount);
Linus Torvalds's avatar
Linus Torvalds committed
396
397
			return;
		}
398
399
400
		count = min(
			(unsigned int)(bh->b_size - atomic_read(&bh->b_count)),
			bcount);
401
		drive->hwif->tp_ops->input_data(drive, NULL, bh->b_data +
402
					atomic_read(&bh->b_count), count);
Linus Torvalds's avatar
Linus Torvalds committed
403
404
405
406
407
408
409
410
411
412
413
		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;
}

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

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

442
static void idetape_update_buffers(ide_drive_t *drive, struct ide_atapi_pc *pc)
Linus Torvalds's avatar
Linus Torvalds committed
443
444
445
{
	struct idetape_bh *bh = pc->bh;
	int count;
446
	unsigned int bcount = pc->xferred;
Linus Torvalds's avatar
Linus Torvalds committed
447

448
	if (pc->flags & PC_FLAG_WRITING)
Linus Torvalds's avatar
Linus Torvalds committed
449
450
451
		return;
	while (bcount) {
		if (bh == NULL) {
452
453
			printk(KERN_ERR "ide-tape: bh == NULL in %s\n",
					__func__);
Linus Torvalds's avatar
Linus Torvalds committed
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
			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.
 */
471
static struct ide_atapi_pc *idetape_next_pc_storage(ide_drive_t *drive)
Linus Torvalds's avatar
Linus Torvalds committed
472
473
474
{
	idetape_tape_t *tape = drive->driver_data;

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

Linus Torvalds's avatar
Linus Torvalds committed
477
	if (tape->pc_stack_index == IDETAPE_PC_STACK)
478
		tape->pc_stack_index = 0;
Linus Torvalds's avatar
Linus Torvalds committed
479
480
481
482
483
484
485
486
	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.
 */
487

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

static struct request *idetape_next_rq_storage(ide_drive_t *drive)
Linus Torvalds's avatar
Linus Torvalds committed
496
497
498
{
	idetape_tape_t *tape = drive->driver_data;

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

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

/*
507
508
 * 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
509
 */
510
static void idetape_analyze_error(ide_drive_t *drive, u8 *sense)
Linus Torvalds's avatar
Linus Torvalds committed
511
512
{
	idetape_tape_t *tape = drive->driver_data;
513
	struct ide_atapi_pc *pc = tape->failed_pc;
Linus Torvalds's avatar
Linus Torvalds committed
514

515
516
517
	tape->sense_key = sense[2] & 0xF;
	tape->asc       = sense[12];
	tape->ascq      = sense[13];
518
519
520

	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
521

522
	/* Correct pc->xferred by asking the tape.	 */
523
	if (pc->flags & PC_FLAG_DMA_ERROR) {
524
		pc->xferred = pc->req_xfer -
525
			tape->blk_size *
526
			get_unaligned_be32(&sense[3]);
527
		idetape_update_buffers(drive, pc);
Linus Torvalds's avatar
Linus Torvalds committed
528
529
530
531
532
533
534
	}

	/*
	 * 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.
	 */
535
	if ((pc->c[0] == READ_6 || pc->c[0] == WRITE_6)
536
537
538
	    /* 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
539
540
541
			/* don't report an error, everything's ok */
			pc->error = 0;
			/* don't retry read/write */
542
			pc->flags |= PC_FLAG_ABORT;
Linus Torvalds's avatar
Linus Torvalds committed
543
544
		}
	}
545
	if (pc->c[0] == READ_6 && (sense[2] & 0x80)) {
Linus Torvalds's avatar
Linus Torvalds committed
546
		pc->error = IDETAPE_ERROR_FILEMARK;
547
		pc->flags |= PC_FLAG_ABORT;
Linus Torvalds's avatar
Linus Torvalds committed
548
	}
549
	if (pc->c[0] == WRITE_6) {
550
551
		if ((sense[2] & 0x40) || (tape->sense_key == 0xd
		     && tape->asc == 0x0 && tape->ascq == 0x2)) {
Linus Torvalds's avatar
Linus Torvalds committed
552
			pc->error = IDETAPE_ERROR_EOD;
553
			pc->flags |= PC_FLAG_ABORT;
Linus Torvalds's avatar
Linus Torvalds committed
554
555
		}
	}
556
	if (pc->c[0] == READ_6 || pc->c[0] == WRITE_6) {
557
		if (tape->sense_key == 8) {
Linus Torvalds's avatar
Linus Torvalds committed
558
			pc->error = IDETAPE_ERROR_EOD;
559
			pc->flags |= PC_FLAG_ABORT;
Linus Torvalds's avatar
Linus Torvalds committed
560
		}
561
		if (!(pc->flags & PC_FLAG_ABORT) &&
562
		    pc->xferred)
Linus Torvalds's avatar
Linus Torvalds committed
563
564
565
566
			pc->retries = IDETAPE_MAX_PC_RETRIES + 1;
	}
}

567
/* Free data buffers completely. */
568
static void ide_tape_kfree_buffer(idetape_tape_t *tape)
Linus Torvalds's avatar
Linus Torvalds committed
569
{
570
	struct idetape_bh *prev_bh, *bh = tape->merge_bh;
571
572
573
574
575
576
577
578
579
580
581
582

	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
583
584
585
586
587
		}
		prev_bh = bh;
		bh = bh->b_reqnext;
		kfree(prev_bh);
	}
588
	kfree(tape->merge_bh);
Linus Torvalds's avatar
Linus Torvalds committed
589
590
591
592
593
594
595
596
597
}

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;

598
	debug_log(DBG_PROCS, "Enter %s\n", __func__);
Linus Torvalds's avatar
Linus Torvalds committed
599
600

	switch (uptodate) {
601
602
603
	case 0:	error = IDETAPE_ERROR_GENERAL; break;
	case 1: error = 0; break;
	default: error = uptodate;
Linus Torvalds's avatar
Linus Torvalds committed
604
605
606
607
608
	}
	rq->errors = error;
	if (error)
		tape->failed_pc = NULL;

609
610
611
612
613
	if (!blk_special_request(rq)) {
		ide_end_request(drive, uptodate, nr_sects);
		return 0;
	}

614
	spin_lock_irqsave(&tape->lock, flags);
Linus Torvalds's avatar
Linus Torvalds committed
615
616
617

	ide_end_drive_cmd(drive, 0, 0);

618
	spin_unlock_irqrestore(&tape->lock, flags);
Linus Torvalds's avatar
Linus Torvalds committed
619
620
621
	return 0;
}

622
static void ide_tape_callback(ide_drive_t *drive)
Linus Torvalds's avatar
Linus Torvalds committed
623
624
{
	idetape_tape_t *tape = drive->driver_data;
625
626
	struct ide_atapi_pc *pc = tape->pc;
	int uptodate = pc->error ? 0 : 1;
Linus Torvalds's avatar
Linus Torvalds committed
627

628
629
	debug_log(DBG_PROCS, "Enter %s\n", __func__);

630
631
632
	if (tape->failed_pc == pc)
		tape->failed_pc = NULL;

633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
	if (pc->c[0] == REQUEST_SENSE) {
		if (uptodate)
			idetape_analyze_error(drive, pc->buf);
		else
			printk(KERN_ERR "ide-tape: Error in REQUEST SENSE "
					"itself - Aborting request!\n");
	} else if (pc->c[0] == READ_6 || pc->c[0] == WRITE_6) {
		struct request *rq = drive->hwif->hwgroup->rq;
		int blocks = pc->xferred / tape->blk_size;

		tape->avg_size += blocks * tape->blk_size;

		if (time_after_eq(jiffies, tape->avg_time + HZ)) {
			tape->avg_speed = tape->avg_size * HZ /
				(jiffies - tape->avg_time) / 1024;
			tape->avg_size = 0;
			tape->avg_time = jiffies;
		}

		tape->first_frame += blocks;
		rq->current_nr_sectors -= blocks;

		if (pc->error)
			uptodate = pc->error;
	} else if (pc->c[0] == READ_POSITION && uptodate) {
		u8 *readpos = tape->pc->buf;

		debug_log(DBG_SENSE, "BOP - %s\n",
				(readpos[0] & 0x80) ? "Yes" : "No");
		debug_log(DBG_SENSE, "EOP - %s\n",
				(readpos[0] & 0x40) ? "Yes" : "No");

		if (readpos[0] & 0x4) {
			printk(KERN_INFO "ide-tape: Block location is unknown"
					 "to the tape\n");
			clear_bit(IDETAPE_FLAG_ADDRESS_VALID, &tape->flags);
			uptodate = 0;
		} else {
			debug_log(DBG_SENSE, "Block Location - %u\n",
					be32_to_cpu(*(u32 *)&readpos[4]));

			tape->partition = readpos[1];
			tape->first_frame = be32_to_cpu(*(u32 *)&readpos[4]);
			set_bit(IDETAPE_FLAG_ADDRESS_VALID, &tape->flags);
		}
Linus Torvalds's avatar
Linus Torvalds committed
678
	}
679
680

	idetape_end_request(drive, uptodate, 0);
Linus Torvalds's avatar
Linus Torvalds committed
681
682
}

683
684
685
686
687
688
689
690
691
692
static void idetape_init_pc(struct ide_atapi_pc *pc)
{
	memset(pc->c, 0, 12);
	pc->retries = 0;
	pc->flags = 0;
	pc->req_xfer = 0;
	pc->buf = pc->pc_buf;
	pc->buf_size = IDETAPE_PC_BUFFER_SIZE;
	pc->bh = NULL;
	pc->b_data = NULL;
693
	pc->callback = ide_tape_callback;
Linus Torvalds's avatar
Linus Torvalds committed
694
695
}

696
static void idetape_create_request_sense_cmd(struct ide_atapi_pc *pc)
Linus Torvalds's avatar
Linus Torvalds committed
697
{
698
	idetape_init_pc(pc);
699
	pc->c[0] = REQUEST_SENSE;
Linus Torvalds's avatar
Linus Torvalds committed
700
	pc->c[4] = 20;
701
	pc->req_xfer = 20;
Linus Torvalds's avatar
Linus Torvalds committed
702
703
704
705
}

static void idetape_init_rq(struct request *rq, u8 cmd)
{
706
	blk_rq_init(NULL, rq);
707
	rq->cmd_type = REQ_TYPE_SPECIAL;
Linus Torvalds's avatar
Linus Torvalds committed
708
709
710
711
	rq->cmd[0] = cmd;
}

/*
712
713
714
715
716
 * 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
717
 *
718
719
720
 * 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
721
 *
722
723
724
 * 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
725
 */
726
static void idetape_queue_pc_head(ide_drive_t *drive, struct ide_atapi_pc *pc,
727
				  struct request *rq)
Linus Torvalds's avatar
Linus Torvalds committed
728
729
730
731
{
	struct ide_tape_obj *tape = drive->driver_data;

	idetape_init_rq(rq, REQ_IDETAPE_PC1);
732
	rq->cmd_flags |= REQ_PREEMPT;
Linus Torvalds's avatar
Linus Torvalds committed
733
734
	rq->buffer = (char *) pc;
	rq->rq_disk = tape->disk;
735
	ide_do_drive_cmd(drive, rq);
Linus Torvalds's avatar
Linus Torvalds committed
736
737
738
739
740
741
742
}

/*
 *	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.
 */
743
static void idetape_retry_pc(ide_drive_t *drive)
Linus Torvalds's avatar
Linus Torvalds committed
744
745
{
	idetape_tape_t *tape = drive->driver_data;
746
	struct ide_atapi_pc *pc;
Linus Torvalds's avatar
Linus Torvalds committed
747
748
	struct request *rq;

749
	(void)ide_read_error(drive);
Linus Torvalds's avatar
Linus Torvalds committed
750
751
752
	pc = idetape_next_pc_storage(drive);
	rq = idetape_next_rq_storage(drive);
	idetape_create_request_sense_cmd(pc);
753
	set_bit(IDETAPE_FLAG_IGNORE_DSC, &tape->flags);
Linus Torvalds's avatar
Linus Torvalds committed
754
755
756
757
	idetape_queue_pc_head(drive, pc, rq);
}

/*
758
759
 * 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
760
 */
761
static void idetape_postpone_request(ide_drive_t *drive)
Linus Torvalds's avatar
Linus Torvalds committed
762
763
764
{
	idetape_tape_t *tape = drive->driver_data;

765
766
	debug_log(DBG_PROCS, "Enter %s\n", __func__);

Linus Torvalds's avatar
Linus Torvalds committed
767
	tape->postponed_rq = HWGROUP(drive)->rq;
768
	ide_stall_queue(drive, tape->dsc_poll_freq);
Linus Torvalds's avatar
Linus Torvalds committed
769
770
}

771
772
773
774
775
776
777
778
779
780
781
782
static void ide_tape_handle_dsc(ide_drive_t *drive)
{
	idetape_tape_t *tape = drive->driver_data;

	/* Media access command */
	tape->dsc_polling_start = jiffies;
	tape->dsc_poll_freq = IDETAPE_DSC_MA_FAST;
	tape->dsc_timeout = jiffies + IDETAPE_DSC_MA_TIMEOUT;
	/* Allow ide.c to handle other requests */
	idetape_postpone_request(drive);
}

783
784
785
786
787
788
789
790
static void ide_tape_io_buffers(ide_drive_t *drive, struct ide_atapi_pc *pc,
				unsigned int bcount, int write)
{
	if (write)
		idetape_output_buffers(drive, pc, bcount);
	else
		idetape_input_buffers(drive, pc, bcount);
}
791

Linus Torvalds's avatar
Linus Torvalds committed
792
/*
793
794
795
796
 * 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
797
 * idetape_issue_pc.
Linus Torvalds's avatar
Linus Torvalds committed
798
 */
799
static ide_startstop_t idetape_pc_intr(ide_drive_t *drive)
Linus Torvalds's avatar
Linus Torvalds committed
800
801
802
{
	idetape_tape_t *tape = drive->driver_data;

803
804
805
	return ide_pc_intr(drive, tape->pc, idetape_pc_intr, IDETAPE_WAIT_CMD,
			   NULL, idetape_update_buffers, idetape_retry_pc,
			   ide_tape_handle_dsc, ide_tape_io_buffers);
Linus Torvalds's avatar
Linus Torvalds committed
806
807
808
}

/*
809
 * Packet Command Interface
Linus Torvalds's avatar
Linus Torvalds committed
810
 *
811
812
813
 * 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
814
 *
815
 * The handling will be done in three stages:
Linus Torvalds's avatar
Linus Torvalds committed
816
 *
817
818
 * 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
819
 *
820
821
 * 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
822
 *
823
824
825
826
827
828
829
 * 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
830
 *
831
832
 * 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
833
 *
834
 * 4. When the packet command is finished, it will be checked for errors.
Linus Torvalds's avatar
Linus Torvalds committed
835
 *
836
837
838
 * 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
839
 *
840
841
842
 * 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
843
844
845
846
 */
static ide_startstop_t idetape_transfer_pc(ide_drive_t *drive)
{
	idetape_tape_t *tape = drive->driver_data;
847

848
849
	return ide_transfer_pc(drive, tape->pc, idetape_pc_intr,
			       IDETAPE_WAIT_CMD, NULL);
Linus Torvalds's avatar
Linus Torvalds committed
850
851
}

852
853
static ide_startstop_t idetape_issue_pc(ide_drive_t *drive,
		struct ide_atapi_pc *pc)
Linus Torvalds's avatar
Linus Torvalds committed
854
855
856
{
	idetape_tape_t *tape = drive->driver_data;

857
858
	if (tape->pc->c[0] == REQUEST_SENSE &&
	    pc->c[0] == REQUEST_SENSE) {
Linus Torvalds's avatar
Linus Torvalds committed
859
860
861
862
		printk(KERN_ERR "ide-tape: possible ide-tape.c bug - "
			"Two request sense in serial were issued\n");
	}

863
	if (tape->failed_pc == NULL && pc->c[0] != REQUEST_SENSE)
Linus Torvalds's avatar
Linus Torvalds committed
864
865
866
867
868
		tape->failed_pc = pc;
	/* Set the current packet command */
	tape->pc = pc;

	if (pc->retries > IDETAPE_MAX_PC_RETRIES ||
869
		(pc->flags & PC_FLAG_ABORT)) {
Linus Torvalds's avatar
Linus Torvalds committed
870
		/*
871
872
873
		 * 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
874
		 */
875
		if (!(pc->flags & PC_FLAG_ABORT)) {
876
			if (!(pc->c[0] == TEST_UNIT_READY &&
Linus Torvalds's avatar
Linus Torvalds committed
877
878
879
880
881
882
883
884
885
886
887
888
889
			      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;
890
		pc->callback(drive);
891
		return ide_stopped;
Linus Torvalds's avatar
Linus Torvalds committed
892
	}
893
	debug_log(DBG_SENSE, "Retry #%d, cmd = %02X\n", pc->retries, pc->c[0]);
Linus Torvalds's avatar
Linus Torvalds committed
894
895
896

	pc->retries++;

897
898
	return ide_issue_pc(drive, pc, idetape_transfer_pc,
			    IDETAPE_WAIT_CMD, NULL);
Linus Torvalds's avatar
Linus Torvalds committed
899
900
}

901
/* A mode sense command is used to "sense" tape parameters. */
902
static void idetape_create_mode_sense_cmd(struct ide_atapi_pc *pc, u8 page_code)
Linus Torvalds's avatar
Linus Torvalds committed
903
904
{
	idetape_init_pc(pc);
905
	pc->c[0] = MODE_SENSE;
Linus Torvalds's avatar
Linus Torvalds committed
906
	if (page_code != IDETAPE_BLOCK_DESCRIPTOR)
907
908
		/* DBD = 1 - Don't return block descriptors */
		pc->c[1] = 8;
Linus Torvalds's avatar
Linus Torvalds committed
909
910
911
912
913
914
915
916
917
	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;
918
919
	/* We will just discard data in that case */
	pc->c[4] = 255;
Linus Torvalds's avatar
Linus Torvalds committed
920
	if (page_code == IDETAPE_BLOCK_DESCRIPTOR)
921
		pc->req_xfer = 12;
Linus Torvalds's avatar
Linus Torvalds committed
922
	else if (page_code == IDETAPE_CAPABILITIES_PAGE)
923
		pc->req_xfer = 24;
Linus Torvalds's avatar
Linus Torvalds committed
924
	else
925
		pc->req_xfer = 50;
Linus Torvalds's avatar
Linus Torvalds committed
926
927
}

928
static ide_startstop_t idetape_media_access_finished(ide_drive_t *drive)
Linus Torvalds's avatar
Linus Torvalds committed
929
{
930
	ide_hwif_t *hwif = drive->hwif;
Linus Torvalds's avatar
Linus Torvalds committed
931
	idetape_tape_t *tape = drive->driver_data;
932
	struct ide_atapi_pc *pc = tape->pc;
933
	u8 stat;
Linus Torvalds's avatar
Linus Torvalds committed
934

935
	stat = hwif->tp_ops->read_status(hwif);
936

937
938
	if (stat & SEEK_STAT) {
		if (stat & ERR_STAT) {
Linus Torvalds's avatar
Linus Torvalds committed
939
			/* Error detected */
940
			if (pc->c[0] != TEST_UNIT_READY)
Linus Torvalds's avatar
Linus Torvalds committed
941
942
943
				printk(KERN_ERR "ide-tape: %s: I/O error, ",
						tape->name);
			/* Retry operation */
944
945
			idetape_retry_pc(drive);
			return ide_stopped;
Linus Torvalds's avatar
Linus Torvalds committed
946
947
948
949
950
951
		}
		pc->error = 0;
	} else {
		pc->error = IDETAPE_ERROR_GENERAL;
		tape->failed_pc = NULL;
	}
952
	pc->callback(drive);
Linus Torvalds's avatar
Linus Torvalds committed
953
954
955
	return ide_stopped;
}

956
957
958
static void ide_tape_create_rw_cmd(idetape_tape_t *tape,
		struct ide_atapi_pc *pc, unsigned int length,
		struct idetape_bh *bh, u8 opcode)
Linus Torvalds's avatar
Linus Torvalds committed
959
960
{
	idetape_init_pc(pc);
961
	put_unaligned(cpu_to_be32(length), (unsigned int *) &pc->c[1]);
Linus Torvalds's avatar
Linus Torvalds committed
962
963
	pc->c[1] = 1;
	pc->bh = bh;
964
965
966
	pc->buf = NULL;
	pc->buf_size = length * tape->blk_size;
	pc->req_xfer = pc->buf_size;
967
	if (pc->req_xfer == tape->buffer_size)
968
		pc->flags |= PC_FLAG_DMA_OK;
Linus Torvalds's avatar
Linus Torvalds committed
969

970
971
972
973
974
975
976
977
978
	if (opcode == READ_6) {
		pc->c[0] = READ_6;
		atomic_set(&bh->b_count, 0);
	} else if (opcode == WRITE_6) {
		pc->c[0] = WRITE_6;
		pc->flags |= PC_FLAG_WRITING;
		pc->b_data = bh->b_data;
		pc->b_count = atomic_read(&bh->b_count);
	}
Linus Torvalds's avatar
Linus Torvalds committed
979
980
981
982
983
}

static ide_startstop_t idetape_do_request(ide_drive_t *drive,
					  struct request *rq, sector_t block)
{
984
	ide_hwif_t *hwif = drive->hwif;
Linus Torvalds's avatar
Linus Torvalds committed
985
	idetape_tape_t *tape = drive->driver_data;
986
	struct ide_atapi_pc *pc = NULL;
Linus Torvalds's avatar
Linus Torvalds committed
987
	struct request *postponed_rq = tape->postponed_rq;
988
	u8 stat;
Linus Torvalds's avatar
Linus Torvalds committed
989

990
991
	debug_log(DBG_SENSE, "sector: %ld, nr_sectors: %ld,"
			" current_nr_sectors: %d\n",
Linus Torvalds's avatar
Linus Torvalds committed
992
993
			rq->sector, rq->nr_sectors, rq->current_nr_sectors);

994
	if (!blk_special_request(rq)) {
995
		/* We do not support buffer cache originated requests. */
Linus Torvalds's avatar
Linus Torvalds committed
996
		printk(KERN_NOTICE "ide-tape: %s: Unsupported request in "
997
			"request queue (%d)\n", drive->name, rq->cmd_type);
Linus Torvalds's avatar
Linus Torvalds committed
998
999
1000
1001
		ide_end_request(drive, 0, 0);
		return ide_stopped;
	}

1002
	/* Retry a failed packet command */
1003
1004
1005
1006
	if (tape->failed_pc && tape->pc->c[0] == REQUEST_SENSE) {
		pc = tape->failed_pc;
		goto out;
	}
1007

Linus Torvalds's avatar
Linus Torvalds committed
1008
1009
1010
1011
1012
1013
1014
1015
1016
1017
1018
1019
1020
1021
	if (postponed_rq != NULL)
		if (rq != postponed_rq) {
			printk(KERN_ERR "ide-tape: ide-tape.c bug - "
					"Two DSC requests were queued\n");
			idetape_end_request(drive, 0, 0);
			return ide_stopped;
		}

	tape->postponed_rq = NULL;

	/*
	 * If the tape is still busy, postpone our request and service
	 * the other device meanwhile.
	 */
1022
	stat = hwif->tp_ops->read_status(hwif);
Linus Torvalds's avatar
Linus Torvalds committed
1023
1024

	if (!drive->dsc_overlap && !(rq->cmd[0] & REQ_IDETAPE_PC2))
1025
		set_bit(IDETAPE_FLAG_IGNORE_DSC, &tape->flags);
Linus Torvalds's avatar
Linus Torvalds committed
1026
1027

	if (drive->post_reset == 1) {
1028
		set_bit(IDETAPE_FLAG_IGNORE_DSC, &tape->flags);
Linus Torvalds's avatar
Linus Torvalds committed
1029
1030
1031
		drive->post_reset = 0;
	}

1032
	if (!test_and_clear_bit(IDETAPE_FLAG_IGNORE_DSC, &tape->flags) &&
1033
	    (stat & SEEK_STAT) == 0) {
Linus Torvalds's avatar
Linus Torvalds committed
1034
1035
		if (postponed_rq == NULL) {
			tape->dsc_polling_start = jiffies;
1036
			tape->dsc_poll_freq = tape->best_dsc_rw_freq;
Linus Torvalds's avatar
Linus Torvalds committed
1037
1038
1039
1040
1041
1042
1043
1044
1045
1046
			tape->dsc_timeout = jiffies + IDETAPE_DSC_RW_TIMEOUT;
		} else if (time_after(jiffies, tape->dsc_timeout)) {
			printk(KERN_ERR "ide-tape: %s: DSC timeout\n",
				tape->name);
			if (rq->cmd[0] & REQ_IDETAPE_PC2) {
				idetape_media_access_finished(drive);
				return ide_stopped;
			} else {
				return ide_do_reset(drive);
			}
1047
1048
1049
		} else if (time_after(jiffies,
					tape->dsc_polling_start +
					IDETAPE_DSC_MA_THRESHOLD))
1050
			tape->dsc_poll_freq = IDETAPE_DSC_MA_SLOW;
Linus Torvalds's avatar
Linus Torvalds committed
1051
1052
1053
1054
1055
		idetape_postpone_request(drive);
		return ide_stopped;
	}
	if (rq->cmd[0] & REQ_IDETAPE_READ) {
		pc = idetape_next_pc_storage(drive);
1056
1057
1058
		ide_tape_create_rw_cmd(tape, pc, rq->current_nr_sectors,
					(struct idetape_bh *)rq->special,
					READ_6);
Linus Torvalds's avatar
Linus Torvalds committed
1059
1060
1061
1062
		goto out;
	}
	if (rq->cmd[0] & REQ_IDETAPE_WRITE) {
		pc = idetape_next_pc_storage(drive);
1063
1064
1065
		ide_tape_create_rw_cmd(tape, pc, rq->current_nr_sectors,
					 (struct idetape_bh *)rq->special,
					 WRITE_6);
Linus Torvalds's avatar
Linus Torvalds committed
1066
1067
1068
		goto out;
	}
	if (rq->cmd[0] & REQ_IDETAPE_PC1) {
1069
		pc = (struct ide_atapi_pc *) rq->buffer;
Linus Torvalds's avatar
Linus Torvalds committed
1070
1071
1072
1073
1074
1075
1076
1077
1078
1079
		rq->cmd[0] &= ~(REQ_IDETAPE_PC1);
		rq->cmd[0] |= REQ_IDETAPE_PC2;
		goto out;
	}
	if (rq->cmd[0] & REQ_IDETAPE_PC2) {
		idetape_media_access_finished(drive);
		return ide_stopped;
	}
	BUG();
out:
1080
1081
1082
	if (test_bit(IDETAPE_FLAG_DRQ_INTERRUPT, &tape->flags))
		pc->flags |= PC_FLAG_DRQ_INTERRUPT;

1083
	return idetape_issue_pc(drive, pc);
Linus Torvalds's avatar
Linus Torvalds committed
1084
1085
1086
}

/*
1087
 * The function below uses __get_free_pages to allocate a data buffer of size
1088
 * tape->buffer_size (or a bit more). We attempt to combine sequential pages as
1089
 * much as possible.
Linus Torvalds's avatar
Linus Torvalds committed
1090
 *
1091
1092
 * It returns a pointer to the newly allocated buffer, or NULL in case of
 * failure.
Linus Torvalds's avatar
Linus Torvalds committed
1093
 */
1094
1095
static struct idetape_bh *ide_tape_kmalloc_buffer(idetape_tape_t *tape,
						  int full, int clear)
Linus Torvalds's avatar
Linus Torvalds committed
1096
{
1097
	struct idetape_bh *prev_bh, *bh, *merge_bh;
1098
	int pages = tape->pages_per_buffer;
1099
	unsigned int order, b_allocd;
Linus Torvalds's avatar
Linus Torvalds committed
1100
1101
	char *b_data = NULL;

1102
1103
	merge_bh = kmalloc(sizeof(struct idetape_bh), GFP_KERNEL);
	bh = merge_bh;
Linus Torvalds's avatar
Linus Torvalds committed
1104
1105
	if (bh == NULL)
		goto abort;
1106
1107
1108

	order = fls(pages) - 1;
	bh->b_data = (char *) __get_free_pages(GFP_KERNEL, order);
1109
	if (!bh->b_data)
Linus Torvalds's avatar
Linus Torvalds committed
1110
		goto abort;
1111
1112
1113
	b_allocd = (1 << order) * PAGE_SIZE;
	pages &= (order-1);

Linus Torvalds's avatar
Linus Torvalds committed
1114
	if (clear)
1115
1116
1117
		memset(bh->b_data, 0, b_allocd);
	bh->b_reqnext = NULL;
	bh->b_size = b_allocd;
Linus Torvalds's avatar
Linus Torvalds committed
1118
1119
	atomic_set(&bh->b_count, full ? bh->b_size : 0);

1120
1121
1122
	while (pages) {
		order = fls(pages) - 1;
		b_data = (char *) __get_free_pages(GFP_KERNEL, order);
1123
		if (!b_data)
Linus Torvalds's avatar
Linus Torvalds committed
1124
			goto abort;
1125
1126
		b_allocd = (1 << order) * PAGE_SIZE;

Linus Torvalds's avatar
Linus Torvalds committed
1127
		if (clear)