Merge git://oss.sgi.com:8090/xfs-2.6
[linux-2.6] / drivers / ide / ide-taskfile.c
1 /*
2  * linux/drivers/ide/ide-taskfile.c     Version 0.38    March 05, 2003
3  *
4  *  Copyright (C) 2000-2002     Michael Cornwell <cornwell@acm.org>
5  *  Copyright (C) 2000-2002     Andre Hedrick <andre@linux-ide.org>
6  *  Copyright (C) 2001-2002     Klaus Smolin
7  *                                      IBM Storage Technology Division
8  *  Copyright (C) 2003-2004     Bartlomiej Zolnierkiewicz
9  *
10  *  The big the bad and the ugly.
11  *
12  *  Problems to be fixed because of BH interface or the lack therefore.
13  *
14  *  Fill me in stupid !!!
15  *
16  *  HOST:
17  *      General refers to the Controller and Driver "pair".
18  *  DATA HANDLER:
19  *      Under the context of Linux it generally refers to an interrupt handler.
20  *      However, it correctly describes the 'HOST'
21  *  DATA BLOCK:
22  *      The amount of data needed to be transfered as predefined in the
23  *      setup of the device.
24  *  STORAGE ATOMIC:
25  *      The 'DATA BLOCK' associated to the 'DATA HANDLER', and can be as
26  *      small as a single sector or as large as the entire command block
27  *      request.
28  */
29
30 #include <linux/config.h>
31 #include <linux/module.h>
32 #include <linux/types.h>
33 #include <linux/string.h>
34 #include <linux/kernel.h>
35 #include <linux/timer.h>
36 #include <linux/mm.h>
37 #include <linux/sched.h>
38 #include <linux/interrupt.h>
39 #include <linux/major.h>
40 #include <linux/errno.h>
41 #include <linux/genhd.h>
42 #include <linux/blkpg.h>
43 #include <linux/slab.h>
44 #include <linux/pci.h>
45 #include <linux/delay.h>
46 #include <linux/hdreg.h>
47 #include <linux/ide.h>
48 #include <linux/bitops.h>
49
50 #include <asm/byteorder.h>
51 #include <asm/irq.h>
52 #include <asm/uaccess.h>
53 #include <asm/io.h>
54
55 static void ata_bswap_data (void *buffer, int wcount)
56 {
57         u16 *p = buffer;
58
59         while (wcount--) {
60                 *p = *p << 8 | *p >> 8; p++;
61                 *p = *p << 8 | *p >> 8; p++;
62         }
63 }
64
65 static void taskfile_input_data(ide_drive_t *drive, void *buffer, u32 wcount)
66 {
67         HWIF(drive)->ata_input_data(drive, buffer, wcount);
68         if (drive->bswap)
69                 ata_bswap_data(buffer, wcount);
70 }
71
72 static void taskfile_output_data(ide_drive_t *drive, void *buffer, u32 wcount)
73 {
74         if (drive->bswap) {
75                 ata_bswap_data(buffer, wcount);
76                 HWIF(drive)->ata_output_data(drive, buffer, wcount);
77                 ata_bswap_data(buffer, wcount);
78         } else {
79                 HWIF(drive)->ata_output_data(drive, buffer, wcount);
80         }
81 }
82
83 int taskfile_lib_get_identify (ide_drive_t *drive, u8 *buf)
84 {
85         ide_task_t args;
86         memset(&args, 0, sizeof(ide_task_t));
87         args.tfRegister[IDE_NSECTOR_OFFSET]     = 0x01;
88         if (drive->media == ide_disk)
89                 args.tfRegister[IDE_COMMAND_OFFSET]     = WIN_IDENTIFY;
90         else
91                 args.tfRegister[IDE_COMMAND_OFFSET]     = WIN_PIDENTIFY;
92         args.command_type = IDE_DRIVE_TASK_IN;
93         args.data_phase   = TASKFILE_IN;
94         args.handler      = &task_in_intr;
95         return ide_raw_taskfile(drive, &args, buf);
96 }
97
98 ide_startstop_t do_rw_taskfile (ide_drive_t *drive, ide_task_t *task)
99 {
100         ide_hwif_t *hwif        = HWIF(drive);
101         task_struct_t *taskfile = (task_struct_t *) task->tfRegister;
102         hob_struct_t *hobfile   = (hob_struct_t *) task->hobRegister;
103         u8 HIHI                 = (drive->addressing == 1) ? 0xE0 : 0xEF;
104
105         /* ALL Command Block Executions SHALL clear nIEN, unless otherwise */
106         if (IDE_CONTROL_REG) {
107                 /* clear nIEN */
108                 hwif->OUTB(drive->ctl, IDE_CONTROL_REG);
109         }
110         SELECT_MASK(drive, 0);
111
112         if (drive->addressing == 1) {
113                 hwif->OUTB(hobfile->feature, IDE_FEATURE_REG);
114                 hwif->OUTB(hobfile->sector_count, IDE_NSECTOR_REG);
115                 hwif->OUTB(hobfile->sector_number, IDE_SECTOR_REG);
116                 hwif->OUTB(hobfile->low_cylinder, IDE_LCYL_REG);
117                 hwif->OUTB(hobfile->high_cylinder, IDE_HCYL_REG);
118         }
119
120         hwif->OUTB(taskfile->feature, IDE_FEATURE_REG);
121         hwif->OUTB(taskfile->sector_count, IDE_NSECTOR_REG);
122         hwif->OUTB(taskfile->sector_number, IDE_SECTOR_REG);
123         hwif->OUTB(taskfile->low_cylinder, IDE_LCYL_REG);
124         hwif->OUTB(taskfile->high_cylinder, IDE_HCYL_REG);
125
126         hwif->OUTB((taskfile->device_head & HIHI) | drive->select.all, IDE_SELECT_REG);
127
128         if (task->handler != NULL) {
129                 if (task->prehandler != NULL) {
130                         hwif->OUTBSYNC(drive, taskfile->command, IDE_COMMAND_REG);
131                         ndelay(400);    /* FIXME */
132                         return task->prehandler(drive, task->rq);
133                 }
134                 ide_execute_command(drive, taskfile->command, task->handler, WAIT_WORSTCASE, NULL);
135                 return ide_started;
136         }
137
138         if (!drive->using_dma)
139                 return ide_stopped;
140
141         switch (taskfile->command) {
142                 case WIN_WRITEDMA_ONCE:
143                 case WIN_WRITEDMA:
144                 case WIN_WRITEDMA_EXT:
145                 case WIN_READDMA_ONCE:
146                 case WIN_READDMA:
147                 case WIN_READDMA_EXT:
148                 case WIN_IDENTIFY_DMA:
149                         if (!hwif->dma_setup(drive)) {
150                                 hwif->dma_exec_cmd(drive, taskfile->command);
151                                 hwif->dma_start(drive);
152                                 return ide_started;
153                         }
154                         break;
155                 default:
156                         if (task->handler == NULL)
157                                 return ide_stopped;
158         }
159
160         return ide_stopped;
161 }
162
163 /*
164  * set_multmode_intr() is invoked on completion of a WIN_SETMULT cmd.
165  */
166 ide_startstop_t set_multmode_intr (ide_drive_t *drive)
167 {
168         ide_hwif_t *hwif = HWIF(drive);
169         u8 stat;
170
171         if (OK_STAT(stat = hwif->INB(IDE_STATUS_REG),READY_STAT,BAD_STAT)) {
172                 drive->mult_count = drive->mult_req;
173         } else {
174                 drive->mult_req = drive->mult_count = 0;
175                 drive->special.b.recalibrate = 1;
176                 (void) ide_dump_status(drive, "set_multmode", stat);
177         }
178         return ide_stopped;
179 }
180
181 /*
182  * set_geometry_intr() is invoked on completion of a WIN_SPECIFY cmd.
183  */
184 ide_startstop_t set_geometry_intr (ide_drive_t *drive)
185 {
186         ide_hwif_t *hwif = HWIF(drive);
187         int retries = 5;
188         u8 stat;
189
190         while (((stat = hwif->INB(IDE_STATUS_REG)) & BUSY_STAT) && retries--)
191                 udelay(10);
192
193         if (OK_STAT(stat, READY_STAT, BAD_STAT))
194                 return ide_stopped;
195
196         if (stat & (ERR_STAT|DRQ_STAT))
197                 return ide_error(drive, "set_geometry_intr", stat);
198
199         if (HWGROUP(drive)->handler != NULL)
200                 BUG();
201         ide_set_handler(drive, &set_geometry_intr, WAIT_WORSTCASE, NULL);
202         return ide_started;
203 }
204
205 /*
206  * recal_intr() is invoked on completion of a WIN_RESTORE (recalibrate) cmd.
207  */
208 ide_startstop_t recal_intr (ide_drive_t *drive)
209 {
210         ide_hwif_t *hwif = HWIF(drive);
211         u8 stat;
212
213         if (!OK_STAT(stat = hwif->INB(IDE_STATUS_REG), READY_STAT, BAD_STAT))
214                 return ide_error(drive, "recal_intr", stat);
215         return ide_stopped;
216 }
217
218 /*
219  * Handler for commands without a data phase
220  */
221 ide_startstop_t task_no_data_intr (ide_drive_t *drive)
222 {
223         ide_task_t *args        = HWGROUP(drive)->rq->special;
224         ide_hwif_t *hwif        = HWIF(drive);
225         u8 stat;
226
227         local_irq_enable();
228         if (!OK_STAT(stat = hwif->INB(IDE_STATUS_REG),READY_STAT,BAD_STAT)) {
229                 return ide_error(drive, "task_no_data_intr", stat);
230                 /* calls ide_end_drive_cmd */
231         }
232         if (args)
233                 ide_end_drive_cmd(drive, stat, hwif->INB(IDE_ERROR_REG));
234
235         return ide_stopped;
236 }
237
238 EXPORT_SYMBOL(task_no_data_intr);
239
240 static u8 wait_drive_not_busy(ide_drive_t *drive)
241 {
242         ide_hwif_t *hwif = HWIF(drive);
243         int retries = 100;
244         u8 stat;
245
246         /*
247          * Last sector was transfered, wait until drive is ready.
248          * This can take up to 10 usec, but we will wait max 1 ms
249          * (drive_cmd_intr() waits that long).
250          */
251         while (((stat = hwif->INB(IDE_STATUS_REG)) & BUSY_STAT) && retries--)
252                 udelay(10);
253
254         if (!retries)
255                 printk(KERN_ERR "%s: drive still BUSY!\n", drive->name);
256
257         return stat;
258 }
259
260 static void ide_pio_sector(ide_drive_t *drive, unsigned int write)
261 {
262         ide_hwif_t *hwif = drive->hwif;
263         struct scatterlist *sg = hwif->sg_table;
264         struct page *page;
265 #ifdef CONFIG_HIGHMEM
266         unsigned long flags;
267 #endif
268         unsigned int offset;
269         u8 *buf;
270
271         page = sg[hwif->cursg].page;
272         offset = sg[hwif->cursg].offset + hwif->cursg_ofs * SECTOR_SIZE;
273
274         /* get the current page and offset */
275         page = nth_page(page, (offset >> PAGE_SHIFT));
276         offset %= PAGE_SIZE;
277
278 #ifdef CONFIG_HIGHMEM
279         local_irq_save(flags);
280 #endif
281         buf = kmap_atomic(page, KM_BIO_SRC_IRQ) + offset;
282
283         hwif->nleft--;
284         hwif->cursg_ofs++;
285
286         if ((hwif->cursg_ofs * SECTOR_SIZE) == sg[hwif->cursg].length) {
287                 hwif->cursg++;
288                 hwif->cursg_ofs = 0;
289         }
290
291         /* do the actual data transfer */
292         if (write)
293                 taskfile_output_data(drive, buf, SECTOR_WORDS);
294         else
295                 taskfile_input_data(drive, buf, SECTOR_WORDS);
296
297         kunmap_atomic(buf, KM_BIO_SRC_IRQ);
298 #ifdef CONFIG_HIGHMEM
299         local_irq_restore(flags);
300 #endif
301 }
302
303 static void ide_pio_multi(ide_drive_t *drive, unsigned int write)
304 {
305         unsigned int nsect;
306
307         nsect = min_t(unsigned int, drive->hwif->nleft, drive->mult_count);
308         while (nsect--)
309                 ide_pio_sector(drive, write);
310 }
311
312 static void ide_pio_datablock(ide_drive_t *drive, struct request *rq,
313                                      unsigned int write)
314 {
315         if (rq->bio)    /* fs request */
316                 rq->errors = 0;
317
318         touch_softlockup_watchdog();
319
320         switch (drive->hwif->data_phase) {
321         case TASKFILE_MULTI_IN:
322         case TASKFILE_MULTI_OUT:
323                 ide_pio_multi(drive, write);
324                 break;
325         default:
326                 ide_pio_sector(drive, write);
327                 break;
328         }
329 }
330
331 static ide_startstop_t task_error(ide_drive_t *drive, struct request *rq,
332                                   const char *s, u8 stat)
333 {
334         if (rq->bio) {
335                 ide_hwif_t *hwif = drive->hwif;
336                 int sectors = hwif->nsect - hwif->nleft;
337
338                 switch (hwif->data_phase) {
339                 case TASKFILE_IN:
340                         if (hwif->nleft)
341                                 break;
342                         /* fall through */
343                 case TASKFILE_OUT:
344                         sectors--;
345                         break;
346                 case TASKFILE_MULTI_IN:
347                         if (hwif->nleft)
348                                 break;
349                         /* fall through */
350                 case TASKFILE_MULTI_OUT:
351                         sectors -= drive->mult_count;
352                 default:
353                         break;
354                 }
355
356                 if (sectors > 0) {
357                         ide_driver_t *drv;
358
359                         drv = *(ide_driver_t **)rq->rq_disk->private_data;
360                         drv->end_request(drive, 1, sectors);
361                 }
362         }
363         return ide_error(drive, s, stat);
364 }
365
366 static void task_end_request(ide_drive_t *drive, struct request *rq, u8 stat)
367 {
368         if (rq->flags & REQ_DRIVE_TASKFILE) {
369                 ide_task_t *task = rq->special;
370
371                 if (task->tf_out_flags.all) {
372                         u8 err = drive->hwif->INB(IDE_ERROR_REG);
373                         ide_end_drive_cmd(drive, stat, err);
374                         return;
375                 }
376         }
377
378         if (rq->rq_disk) {
379                 ide_driver_t *drv;
380
381                 drv = *(ide_driver_t **)rq->rq_disk->private_data;;
382                 drv->end_request(drive, 1, rq->hard_nr_sectors);
383         } else
384                 ide_end_request(drive, 1, rq->hard_nr_sectors);
385 }
386
387 /*
388  * Handler for command with PIO data-in phase (Read/Read Multiple).
389  */
390 ide_startstop_t task_in_intr (ide_drive_t *drive)
391 {
392         ide_hwif_t *hwif = drive->hwif;
393         struct request *rq = HWGROUP(drive)->rq;
394         u8 stat = hwif->INB(IDE_STATUS_REG);
395
396         /* new way for dealing with premature shared PCI interrupts */
397         if (!OK_STAT(stat, DATA_READY, BAD_R_STAT)) {
398                 if (stat & (ERR_STAT | DRQ_STAT))
399                         return task_error(drive, rq, __FUNCTION__, stat);
400                 /* No data yet, so wait for another IRQ. */
401                 ide_set_handler(drive, &task_in_intr, WAIT_WORSTCASE, NULL);
402                 return ide_started;
403         }
404
405         ide_pio_datablock(drive, rq, 0);
406
407         /* If it was the last datablock check status and finish transfer. */
408         if (!hwif->nleft) {
409                 stat = wait_drive_not_busy(drive);
410                 if (!OK_STAT(stat, 0, BAD_R_STAT))
411                         return task_error(drive, rq, __FUNCTION__, stat);
412                 task_end_request(drive, rq, stat);
413                 return ide_stopped;
414         }
415
416         /* Still data left to transfer. */
417         ide_set_handler(drive, &task_in_intr, WAIT_WORSTCASE, NULL);
418
419         return ide_started;
420 }
421 EXPORT_SYMBOL(task_in_intr);
422
423 /*
424  * Handler for command with PIO data-out phase (Write/Write Multiple).
425  */
426 static ide_startstop_t task_out_intr (ide_drive_t *drive)
427 {
428         ide_hwif_t *hwif = drive->hwif;
429         struct request *rq = HWGROUP(drive)->rq;
430         u8 stat = hwif->INB(IDE_STATUS_REG);
431
432         if (!OK_STAT(stat, DRIVE_READY, drive->bad_wstat))
433                 return task_error(drive, rq, __FUNCTION__, stat);
434
435         /* Deal with unexpected ATA data phase. */
436         if (((stat & DRQ_STAT) == 0) ^ !hwif->nleft)
437                 return task_error(drive, rq, __FUNCTION__, stat);
438
439         if (!hwif->nleft) {
440                 task_end_request(drive, rq, stat);
441                 return ide_stopped;
442         }
443
444         /* Still data left to transfer. */
445         ide_pio_datablock(drive, rq, 1);
446         ide_set_handler(drive, &task_out_intr, WAIT_WORSTCASE, NULL);
447
448         return ide_started;
449 }
450
451 ide_startstop_t pre_task_out_intr (ide_drive_t *drive, struct request *rq)
452 {
453         ide_startstop_t startstop;
454
455         if (ide_wait_stat(&startstop, drive, DATA_READY,
456                           drive->bad_wstat, WAIT_DRQ)) {
457                 printk(KERN_ERR "%s: no DRQ after issuing %sWRITE%s\n",
458                                 drive->name,
459                                 drive->hwif->data_phase ? "MULT" : "",
460                                 drive->addressing ? "_EXT" : "");
461                 return startstop;
462         }
463
464         if (!drive->unmask)
465                 local_irq_disable();
466
467         ide_set_handler(drive, &task_out_intr, WAIT_WORSTCASE, NULL);
468         ide_pio_datablock(drive, rq, 1);
469
470         return ide_started;
471 }
472 EXPORT_SYMBOL(pre_task_out_intr);
473
474 static int ide_diag_taskfile(ide_drive_t *drive, ide_task_t *args, unsigned long data_size, u8 *buf)
475 {
476         struct request rq;
477
478         memset(&rq, 0, sizeof(rq));
479         rq.flags = REQ_DRIVE_TASKFILE;
480         rq.buffer = buf;
481
482         /*
483          * (ks) We transfer currently only whole sectors.
484          * This is suffient for now.  But, it would be great,
485          * if we would find a solution to transfer any size.
486          * To support special commands like READ LONG.
487          */
488         if (args->command_type != IDE_DRIVE_TASK_NO_DATA) {
489                 if (data_size == 0)
490                         rq.nr_sectors = (args->hobRegister[IDE_NSECTOR_OFFSET] << 8) | args->tfRegister[IDE_NSECTOR_OFFSET];
491                 else
492                         rq.nr_sectors = data_size / SECTOR_SIZE;
493
494                 if (!rq.nr_sectors) {
495                         printk(KERN_ERR "%s: in/out command without data\n",
496                                         drive->name);
497                         return -EFAULT;
498                 }
499
500                 rq.hard_nr_sectors = rq.nr_sectors;
501                 rq.hard_cur_sectors = rq.current_nr_sectors = rq.nr_sectors;
502
503                 if (args->command_type == IDE_DRIVE_TASK_RAW_WRITE)
504                         rq.flags |= REQ_RW;
505         }
506
507         rq.special = args;
508         args->rq = &rq;
509         return ide_do_drive_cmd(drive, &rq, ide_wait);
510 }
511
512 int ide_raw_taskfile (ide_drive_t *drive, ide_task_t *args, u8 *buf)
513 {
514         return ide_diag_taskfile(drive, args, 0, buf);
515 }
516
517 EXPORT_SYMBOL(ide_raw_taskfile);
518
519 int ide_taskfile_ioctl (ide_drive_t *drive, unsigned int cmd, unsigned long arg)
520 {
521         ide_task_request_t      *req_task;
522         ide_task_t              args;
523         u8 *outbuf              = NULL;
524         u8 *inbuf               = NULL;
525         task_ioreg_t *argsptr   = args.tfRegister;
526         task_ioreg_t *hobsptr   = args.hobRegister;
527         int err                 = 0;
528         int tasksize            = sizeof(struct ide_task_request_s);
529         int taskin              = 0;
530         int taskout             = 0;
531         u8 io_32bit             = drive->io_32bit;
532         char __user *buf = (char __user *)arg;
533
534 //      printk("IDE Taskfile ...\n");
535
536         req_task = kzalloc(tasksize, GFP_KERNEL);
537         if (req_task == NULL) return -ENOMEM;
538         if (copy_from_user(req_task, buf, tasksize)) {
539                 kfree(req_task);
540                 return -EFAULT;
541         }
542
543         taskout = (int) req_task->out_size;
544         taskin  = (int) req_task->in_size;
545
546         if (taskout) {
547                 int outtotal = tasksize;
548                 outbuf = kzalloc(taskout, GFP_KERNEL);
549                 if (outbuf == NULL) {
550                         err = -ENOMEM;
551                         goto abort;
552                 }
553                 if (copy_from_user(outbuf, buf + outtotal, taskout)) {
554                         err = -EFAULT;
555                         goto abort;
556                 }
557         }
558
559         if (taskin) {
560                 int intotal = tasksize + taskout;
561                 inbuf = kzalloc(taskin, GFP_KERNEL);
562                 if (inbuf == NULL) {
563                         err = -ENOMEM;
564                         goto abort;
565                 }
566                 if (copy_from_user(inbuf, buf + intotal, taskin)) {
567                         err = -EFAULT;
568                         goto abort;
569                 }
570         }
571
572         memset(&args, 0, sizeof(ide_task_t));
573         memcpy(argsptr, req_task->io_ports, HDIO_DRIVE_TASK_HDR_SIZE);
574         memcpy(hobsptr, req_task->hob_ports, HDIO_DRIVE_HOB_HDR_SIZE);
575
576         args.tf_in_flags  = req_task->in_flags;
577         args.tf_out_flags = req_task->out_flags;
578         args.data_phase   = req_task->data_phase;
579         args.command_type = req_task->req_cmd;
580
581         drive->io_32bit = 0;
582         switch(req_task->data_phase) {
583                 case TASKFILE_OUT_DMAQ:
584                 case TASKFILE_OUT_DMA:
585                         err = ide_diag_taskfile(drive, &args, taskout, outbuf);
586                         break;
587                 case TASKFILE_IN_DMAQ:
588                 case TASKFILE_IN_DMA:
589                         err = ide_diag_taskfile(drive, &args, taskin, inbuf);
590                         break;
591                 case TASKFILE_MULTI_OUT:
592                         if (!drive->mult_count) {
593                                 /* (hs): give up if multcount is not set */
594                                 printk(KERN_ERR "%s: %s Multimode Write " \
595                                         "multcount is not set\n",
596                                         drive->name, __FUNCTION__);
597                                 err = -EPERM;
598                                 goto abort;
599                         }
600                         /* fall through */
601                 case TASKFILE_OUT:
602                         args.prehandler = &pre_task_out_intr;
603                         args.handler = &task_out_intr;
604                         err = ide_diag_taskfile(drive, &args, taskout, outbuf);
605                         break;
606                 case TASKFILE_MULTI_IN:
607                         if (!drive->mult_count) {
608                                 /* (hs): give up if multcount is not set */
609                                 printk(KERN_ERR "%s: %s Multimode Read failure " \
610                                         "multcount is not set\n",
611                                         drive->name, __FUNCTION__);
612                                 err = -EPERM;
613                                 goto abort;
614                         }
615                         /* fall through */
616                 case TASKFILE_IN:
617                         args.handler = &task_in_intr;
618                         err = ide_diag_taskfile(drive, &args, taskin, inbuf);
619                         break;
620                 case TASKFILE_NO_DATA:
621                         args.handler = &task_no_data_intr;
622                         err = ide_diag_taskfile(drive, &args, 0, NULL);
623                         break;
624                 default:
625                         err = -EFAULT;
626                         goto abort;
627         }
628
629         memcpy(req_task->io_ports, &(args.tfRegister), HDIO_DRIVE_TASK_HDR_SIZE);
630         memcpy(req_task->hob_ports, &(args.hobRegister), HDIO_DRIVE_HOB_HDR_SIZE);
631         req_task->in_flags  = args.tf_in_flags;
632         req_task->out_flags = args.tf_out_flags;
633
634         if (copy_to_user(buf, req_task, tasksize)) {
635                 err = -EFAULT;
636                 goto abort;
637         }
638         if (taskout) {
639                 int outtotal = tasksize;
640                 if (copy_to_user(buf + outtotal, outbuf, taskout)) {
641                         err = -EFAULT;
642                         goto abort;
643                 }
644         }
645         if (taskin) {
646                 int intotal = tasksize + taskout;
647                 if (copy_to_user(buf + intotal, inbuf, taskin)) {
648                         err = -EFAULT;
649                         goto abort;
650                 }
651         }
652 abort:
653         kfree(req_task);
654         kfree(outbuf);
655         kfree(inbuf);
656
657 //      printk("IDE Taskfile ioctl ended. rc = %i\n", err);
658
659         drive->io_32bit = io_32bit;
660
661         return err;
662 }
663
664 int ide_wait_cmd (ide_drive_t *drive, u8 cmd, u8 nsect, u8 feature, u8 sectors, u8 *buf)
665 {
666         struct request rq;
667         u8 buffer[4];
668
669         if (!buf)
670                 buf = buffer;
671         memset(buf, 0, 4 + SECTOR_WORDS * 4 * sectors);
672         ide_init_drive_cmd(&rq);
673         rq.buffer = buf;
674         *buf++ = cmd;
675         *buf++ = nsect;
676         *buf++ = feature;
677         *buf++ = sectors;
678         return ide_do_drive_cmd(drive, &rq, ide_wait);
679 }
680
681 /*
682  * FIXME : this needs to map into at taskfile. <andre@linux-ide.org>
683  */
684 int ide_cmd_ioctl (ide_drive_t *drive, unsigned int cmd, unsigned long arg)
685 {
686         int err = 0;
687         u8 args[4], *argbuf = args;
688         u8 xfer_rate = 0;
689         int argsize = 4;
690         ide_task_t tfargs;
691
692         if (NULL == (void *) arg) {
693                 struct request rq;
694                 ide_init_drive_cmd(&rq);
695                 return ide_do_drive_cmd(drive, &rq, ide_wait);
696         }
697
698         if (copy_from_user(args, (void __user *)arg, 4))
699                 return -EFAULT;
700
701         memset(&tfargs, 0, sizeof(ide_task_t));
702         tfargs.tfRegister[IDE_FEATURE_OFFSET] = args[2];
703         tfargs.tfRegister[IDE_NSECTOR_OFFSET] = args[3];
704         tfargs.tfRegister[IDE_SECTOR_OFFSET]  = args[1];
705         tfargs.tfRegister[IDE_LCYL_OFFSET]    = 0x00;
706         tfargs.tfRegister[IDE_HCYL_OFFSET]    = 0x00;
707         tfargs.tfRegister[IDE_SELECT_OFFSET]  = 0x00;
708         tfargs.tfRegister[IDE_COMMAND_OFFSET] = args[0];
709
710         if (args[3]) {
711                 argsize = 4 + (SECTOR_WORDS * 4 * args[3]);
712                 argbuf = kzalloc(argsize, GFP_KERNEL);
713                 if (argbuf == NULL)
714                         return -ENOMEM;
715         }
716         if (set_transfer(drive, &tfargs)) {
717                 xfer_rate = args[1];
718                 if (ide_ata66_check(drive, &tfargs))
719                         goto abort;
720         }
721
722         err = ide_wait_cmd(drive, args[0], args[1], args[2], args[3], argbuf);
723
724         if (!err && xfer_rate) {
725                 /* active-retuning-calls future */
726                 ide_set_xfer_rate(drive, xfer_rate);
727                 ide_driveid_update(drive);
728         }
729 abort:
730         if (copy_to_user((void __user *)arg, argbuf, argsize))
731                 err = -EFAULT;
732         if (argsize > 4)
733                 kfree(argbuf);
734         return err;
735 }
736
737 static int ide_wait_cmd_task(ide_drive_t *drive, u8 *buf)
738 {
739         struct request rq;
740
741         ide_init_drive_cmd(&rq);
742         rq.flags = REQ_DRIVE_TASK;
743         rq.buffer = buf;
744         return ide_do_drive_cmd(drive, &rq, ide_wait);
745 }
746
747 /*
748  * FIXME : this needs to map into at taskfile. <andre@linux-ide.org>
749  */
750 int ide_task_ioctl (ide_drive_t *drive, unsigned int cmd, unsigned long arg)
751 {
752         void __user *p = (void __user *)arg;
753         int err = 0;
754         u8 args[7], *argbuf = args;
755         int argsize = 7;
756
757         if (copy_from_user(args, p, 7))
758                 return -EFAULT;
759         err = ide_wait_cmd_task(drive, argbuf);
760         if (copy_to_user(p, argbuf, argsize))
761                 err = -EFAULT;
762         return err;
763 }
764
765 /*
766  * NOTICE: This is additions from IBM to provide a discrete interface,
767  * for selective taskregister access operations.  Nice JOB Klaus!!!
768  * Glad to be able to work and co-develop this with you and IBM.
769  */
770 ide_startstop_t flagged_taskfile (ide_drive_t *drive, ide_task_t *task)
771 {
772         ide_hwif_t *hwif        = HWIF(drive);
773         task_struct_t *taskfile = (task_struct_t *) task->tfRegister;
774         hob_struct_t *hobfile   = (hob_struct_t *) task->hobRegister;
775
776         if (task->data_phase == TASKFILE_MULTI_IN ||
777             task->data_phase == TASKFILE_MULTI_OUT) {
778                 if (!drive->mult_count) {
779                         printk(KERN_ERR "%s: multimode not set!\n", drive->name);
780                         return ide_stopped;
781                 }
782         }
783
784         /*
785          * (ks) Check taskfile in flags.
786          * If set, then execute as it is defined.
787          * If not set, then define default settings.
788          * The default values are:
789          *      read all taskfile registers (except data)
790          *      read the hob registers (sector, nsector, lcyl, hcyl)
791          */
792         if (task->tf_in_flags.all == 0) {
793                 task->tf_in_flags.all = IDE_TASKFILE_STD_IN_FLAGS;
794                 if (drive->addressing == 1)
795                         task->tf_in_flags.all |= (IDE_HOB_STD_IN_FLAGS  << 8);
796         }
797
798         /* ALL Command Block Executions SHALL clear nIEN, unless otherwise */
799         if (IDE_CONTROL_REG)
800                 /* clear nIEN */
801                 hwif->OUTB(drive->ctl, IDE_CONTROL_REG);
802         SELECT_MASK(drive, 0);
803
804         if (task->tf_out_flags.b.data) {
805                 u16 data =  taskfile->data + (hobfile->data << 8);
806                 hwif->OUTW(data, IDE_DATA_REG);
807         }
808
809         /* (ks) send hob registers first */
810         if (task->tf_out_flags.b.nsector_hob)
811                 hwif->OUTB(hobfile->sector_count, IDE_NSECTOR_REG);
812         if (task->tf_out_flags.b.sector_hob)
813                 hwif->OUTB(hobfile->sector_number, IDE_SECTOR_REG);
814         if (task->tf_out_flags.b.lcyl_hob)
815                 hwif->OUTB(hobfile->low_cylinder, IDE_LCYL_REG);
816         if (task->tf_out_flags.b.hcyl_hob)
817                 hwif->OUTB(hobfile->high_cylinder, IDE_HCYL_REG);
818
819         /* (ks) Send now the standard registers */
820         if (task->tf_out_flags.b.error_feature)
821                 hwif->OUTB(taskfile->feature, IDE_FEATURE_REG);
822         /* refers to number of sectors to transfer */
823         if (task->tf_out_flags.b.nsector)
824                 hwif->OUTB(taskfile->sector_count, IDE_NSECTOR_REG);
825         /* refers to sector offset or start sector */
826         if (task->tf_out_flags.b.sector)
827                 hwif->OUTB(taskfile->sector_number, IDE_SECTOR_REG);
828         if (task->tf_out_flags.b.lcyl)
829                 hwif->OUTB(taskfile->low_cylinder, IDE_LCYL_REG);
830         if (task->tf_out_flags.b.hcyl)
831                 hwif->OUTB(taskfile->high_cylinder, IDE_HCYL_REG);
832
833         /*
834          * (ks) In the flagged taskfile approch, we will use all specified
835          * registers and the register value will not be changed, except the
836          * select bit (master/slave) in the drive_head register. We must make
837          * sure that the desired drive is selected.
838          */
839         hwif->OUTB(taskfile->device_head | drive->select.all, IDE_SELECT_REG);
840         switch(task->data_phase) {
841
842                 case TASKFILE_OUT_DMAQ:
843                 case TASKFILE_OUT_DMA:
844                 case TASKFILE_IN_DMAQ:
845                 case TASKFILE_IN_DMA:
846                         hwif->dma_setup(drive);
847                         hwif->dma_exec_cmd(drive, taskfile->command);
848                         hwif->dma_start(drive);
849                         break;
850
851                 default:
852                         if (task->handler == NULL)
853                                 return ide_stopped;
854
855                         /* Issue the command */
856                         if (task->prehandler) {
857                                 hwif->OUTBSYNC(drive, taskfile->command, IDE_COMMAND_REG);
858                                 ndelay(400);    /* FIXME */
859                                 return task->prehandler(drive, task->rq);
860                         }
861                         ide_execute_command(drive, taskfile->command, task->handler, WAIT_WORSTCASE, NULL);
862         }
863
864         return ide_started;
865 }