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