drivers/ata/sata_promise.c

   1 /*
   2  *  sata_promise.c - Promise SATA
   3  *
   4  *  Maintained by:  Jeff Garzik <jgarzik@pobox.com>
   5  *                  Please ALWAYS copy linux-ide@vger.kernel.org
   6  *                  on emails.
   7  *
   8  *  Copyright 2003-2004 Red Hat, Inc.
   9  *
  10  *
  11  *  This program is free software; you can redistribute it and/or modify
  12  *  it under the terms of the GNU General Public License as published by
  13  *  the Free Software Foundation; either version 2, or (at your option)
  14  *  any later version.
  15  *
  16  *  This program is distributed in the hope that it will be useful,
  17  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19  *  GNU General Public License for more details.
  20  *
  21  *  You should have received a copy of the GNU General Public License
  22  *  along with this program; see the file COPYING.  If not, write to
  23  *  the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  24  *
  25  *
  26  *  libata documentation is available via 'make {ps|pdf}docs',
  27  *  as Documentation/DocBook/libata.*
  28  *
  29  *  Hardware information only available under NDA.
  30  *
  31  */
  32
  33 #include <linux/kernel.h>
  34 #include <linux/module.h>
  35 #include <linux/pci.h>
  36 #include <linux/init.h>
  37 #include <linux/blkdev.h>
  38 #include <linux/delay.h>
  39 #include <linux/interrupt.h>
  40 #include <linux/sched.h>
  41 #include <linux/device.h>
  42 #include <scsi/scsi.h>
  43 #include <scsi/scsi_host.h>
  44 #include <scsi/scsi_cmnd.h>
  45 #include <linux/libata.h>
  46 #include "sata_promise.h"
  47
  48 #define DRV_NAME        "sata_promise"
  49 #define DRV_VERSION     "1.05"
  50
  51
  52 enum {
  53         /* register offsets */
  54         PDC_FEATURE             = 0x04, /* Feature/Error reg (per port) */
  55         PDC_SECTOR_COUNT        = 0x08, /* Sector count reg (per port) */
  56         PDC_SECTOR_NUMBER       = 0x0C, /* Sector number reg (per port) */
  57         PDC_CYLINDER_LOW        = 0x10, /* Cylinder low reg (per port) */
  58         PDC_CYLINDER_HIGH       = 0x14, /* Cylinder high reg (per port) */
  59         PDC_DEVICE              = 0x18, /* Device/Head reg (per port) */
  60         PDC_COMMAND             = 0x1C, /* Command/status reg (per port) */
  61         PDC_ALTSTATUS           = 0x38, /* Alternate-status/device-control reg (per port) */
  62         PDC_PKT_SUBMIT          = 0x40, /* Command packet pointer addr */
  63         PDC_INT_SEQMASK         = 0x40, /* Mask of asserted SEQ INTs */
  64         PDC_FLASH_CTL           = 0x44, /* Flash control register */
  65         PDC_GLOBAL_CTL          = 0x48, /* Global control/status (per port) */
  66         PDC_CTLSTAT             = 0x60, /* IDE control and status (per port) */
  67         PDC_SATA_PLUG_CSR       = 0x6C, /* SATA Plug control/status reg */
  68         PDC2_SATA_PLUG_CSR      = 0x60, /* SATAII Plug control/status reg */
  69         PDC_TBG_MODE            = 0x41C, /* TBG mode (not SATAII) */
  70         PDC_SLEW_CTL            = 0x470, /* slew rate control reg (not SATAII) */
  71
  72         PDC_ERR_MASK            = (1<<19) | (1<<20) | (1<<21) | (1<<22) |
  73                                   (1<<8) | (1<<9) | (1<<10),
  74
  75         board_2037x             = 0,    /* FastTrak S150 TX2plus */
  76         board_20319             = 1,    /* FastTrak S150 TX4 */
  77         board_20619             = 2,    /* FastTrak TX4000 */
  78         board_2057x             = 3,    /* SATAII150 Tx2plus */
  79         board_40518             = 4,    /* SATAII150 Tx4 */
  80
  81         PDC_HAS_PATA            = (1 << 1), /* PDC20375/20575 has PATA */
  82
  83         /* Sequence counter control registers bit definitions */
  84         PDC_SEQCNTRL_INT_MASK   = (1 << 5), /* Sequence Interrupt Mask */
  85
  86         /* Feature register values */
  87         PDC_FEATURE_ATAPI_PIO   = 0x00, /* ATAPI data xfer by PIO */
  88         PDC_FEATURE_ATAPI_DMA   = 0x01, /* ATAPI data xfer by DMA */
  89
  90         /* Device/Head register values */
  91         PDC_DEVICE_SATA         = 0xE0, /* Device/Head value for SATA devices */
  92
  93         /* PDC_CTLSTAT bit definitions */
  94         PDC_DMA_ENABLE          = (1 << 7),
  95         PDC_IRQ_DISABLE         = (1 << 10),
  96         PDC_RESET               = (1 << 11), /* HDMA reset */
  97
  98         PDC_COMMON_FLAGS        = ATA_FLAG_NO_LEGACY |
  99                                   ATA_FLAG_MMIO |
 100                                   ATA_FLAG_PIO_POLLING,
 101
 102         /* hp->flags bits */
 103         PDC_FLAG_GEN_II         = (1 << 0),
 104 };
 105
 106
 107 struct pdc_port_priv {
 108         u8                      *pkt;
 109         dma_addr_t              pkt_dma;
 110 };
 111
 112 struct pdc_host_priv {
 113         unsigned long           flags;
 114         unsigned long           port_flags[ATA_MAX_PORTS];
 115 };
 116
 117 static u32 pdc_sata_scr_read (struct ata_port *ap, unsigned int sc_reg);
 118 static void pdc_sata_scr_write (struct ata_port *ap, unsigned int sc_reg, u32 val);
 119 static int pdc_ata_init_one (struct pci_dev *pdev, const struct pci_device_id *ent);
 120 static irqreturn_t pdc_interrupt (int irq, void *dev_instance);
 121 static void pdc_eng_timeout(struct ata_port *ap);
 122 static int pdc_port_start(struct ata_port *ap);
 123 static void pdc_pata_phy_reset(struct ata_port *ap);
 124 static void pdc_qc_prep(struct ata_queued_cmd *qc);
 125 static void pdc_tf_load_mmio(struct ata_port *ap, const struct ata_taskfile *tf);
 126 static void pdc_exec_command_mmio(struct ata_port *ap, const struct ata_taskfile *tf);
 127 static int pdc_check_atapi_dma(struct ata_queued_cmd *qc);
 128 static int pdc_old_check_atapi_dma(struct ata_queued_cmd *qc);
 129 static void pdc_irq_clear(struct ata_port *ap);
 130 static unsigned int pdc_qc_issue_prot(struct ata_queued_cmd *qc);
 131 static void pdc_freeze(struct ata_port *ap);
 132 static void pdc_thaw(struct ata_port *ap);
 133 static void pdc_error_handler(struct ata_port *ap);
 134 static void pdc_post_internal_cmd(struct ata_queued_cmd *qc);
 135
 136
 137 static struct scsi_host_template pdc_ata_sht = {
 138         .module                 = THIS_MODULE,
 139         .name                   = DRV_NAME,
 140         .ioctl                  = ata_scsi_ioctl,
 141         .queuecommand           = ata_scsi_queuecmd,
 142         .can_queue              = ATA_DEF_QUEUE,
 143         .this_id                = ATA_SHT_THIS_ID,
 144         .sg_tablesize           = LIBATA_MAX_PRD,
 145         .cmd_per_lun            = ATA_SHT_CMD_PER_LUN,
 146         .emulated               = ATA_SHT_EMULATED,
 147         .use_clustering         = ATA_SHT_USE_CLUSTERING,
 148         .proc_name              = DRV_NAME,
 149         .dma_boundary           = ATA_DMA_BOUNDARY,
 150         .slave_configure        = ata_scsi_slave_config,
 151         .slave_destroy          = ata_scsi_slave_destroy,
 152         .bios_param             = ata_std_bios_param,
 153 };
 154
 155 static const struct ata_port_operations pdc_sata_ops = {
 156         .port_disable           = ata_port_disable,
 157         .tf_load                = pdc_tf_load_mmio,
 158         .tf_read                = ata_tf_read,
 159         .check_status           = ata_check_status,
 160         .exec_command           = pdc_exec_command_mmio,
 161         .dev_select             = ata_std_dev_select,
 162         .check_atapi_dma        = pdc_check_atapi_dma,
 163
 164         .qc_prep                = pdc_qc_prep,
 165         .qc_issue               = pdc_qc_issue_prot,
 166         .freeze                 = pdc_freeze,
 167         .thaw                   = pdc_thaw,
 168         .error_handler          = pdc_error_handler,
 169         .post_internal_cmd      = pdc_post_internal_cmd,
 170         .data_xfer              = ata_mmio_data_xfer,
 171         .irq_handler            = pdc_interrupt,
 172         .irq_clear              = pdc_irq_clear,
 173
 174         .scr_read               = pdc_sata_scr_read,
 175         .scr_write              = pdc_sata_scr_write,
 176         .port_start             = pdc_port_start,
 177 };
 178
 179 /* First-generation chips need a more restrictive ->check_atapi_dma op */
 180 static const struct ata_port_operations pdc_old_sata_ops = {
 181         .port_disable           = ata_port_disable,
 182         .tf_load                = pdc_tf_load_mmio,
 183         .tf_read                = ata_tf_read,
 184         .check_status           = ata_check_status,
 185         .exec_command           = pdc_exec_command_mmio,
 186         .dev_select             = ata_std_dev_select,
 187         .check_atapi_dma        = pdc_old_check_atapi_dma,
 188
 189         .qc_prep                = pdc_qc_prep,
 190         .qc_issue               = pdc_qc_issue_prot,
 191         .freeze                 = pdc_freeze,
 192         .thaw                   = pdc_thaw,
 193         .error_handler          = pdc_error_handler,
 194         .post_internal_cmd      = pdc_post_internal_cmd,
 195         .data_xfer              = ata_mmio_data_xfer,
 196         .irq_handler            = pdc_interrupt,
 197         .irq_clear              = pdc_irq_clear,
 198
 199         .scr_read               = pdc_sata_scr_read,
 200         .scr_write              = pdc_sata_scr_write,
 201         .port_start             = pdc_port_start,
 202 };
 203
 204 static const struct ata_port_operations pdc_pata_ops = {
 205         .port_disable           = ata_port_disable,
 206         .tf_load                = pdc_tf_load_mmio,
 207         .tf_read                = ata_tf_read,
 208         .check_status           = ata_check_status,
 209         .exec_command           = pdc_exec_command_mmio,
 210         .dev_select             = ata_std_dev_select,
 211         .check_atapi_dma        = pdc_check_atapi_dma,
 212
 213         .phy_reset              = pdc_pata_phy_reset,
 214
 215         .qc_prep                = pdc_qc_prep,
 216         .qc_issue               = pdc_qc_issue_prot,
 217         .data_xfer              = ata_mmio_data_xfer,
 218         .eng_timeout            = pdc_eng_timeout,
 219         .irq_handler            = pdc_interrupt,
 220         .irq_clear              = pdc_irq_clear,
 221
 222         .port_start             = pdc_port_start,
 223 };
 224
 225 static const struct ata_port_info pdc_port_info[] = {
 226         /* board_2037x */
 227         {
 228                 .sht            = &pdc_ata_sht,
 229                 .flags          = PDC_COMMON_FLAGS,
 230                 .pio_mask       = 0x1f, /* pio0-4 */
 231                 .mwdma_mask     = 0x07, /* mwdma0-2 */
 232                 .udma_mask      = 0x7f, /* udma0-6 ; FIXME */
 233                 .port_ops       = &pdc_old_sata_ops,
 234         },
 235
 236         /* board_20319 */
 237         {
 238                 .sht            = &pdc_ata_sht,
 239                 .flags          = PDC_COMMON_FLAGS | ATA_FLAG_SATA,
 240                 .pio_mask       = 0x1f, /* pio0-4 */
 241                 .mwdma_mask     = 0x07, /* mwdma0-2 */
 242                 .udma_mask      = 0x7f, /* udma0-6 ; FIXME */
 243                 .port_ops       = &pdc_old_sata_ops,
 244         },
 245
 246         /* board_20619 */
 247         {
 248                 .sht            = &pdc_ata_sht,
 249                 .flags          = PDC_COMMON_FLAGS | ATA_FLAG_SRST | ATA_FLAG_SLAVE_POSS,
 250                 .pio_mask       = 0x1f, /* pio0-4 */
 251                 .mwdma_mask     = 0x07, /* mwdma0-2 */
 252                 .udma_mask      = 0x7f, /* udma0-6 ; FIXME */
 253                 .port_ops       = &pdc_pata_ops,
 254         },
 255
 256         /* board_2057x */
 257         {
 258                 .sht            = &pdc_ata_sht,
 259                 .flags          = PDC_COMMON_FLAGS,
 260                 .pio_mask       = 0x1f, /* pio0-4 */
 261                 .mwdma_mask     = 0x07, /* mwdma0-2 */
 262                 .udma_mask      = 0x7f, /* udma0-6 ; FIXME */
 263                 .port_ops       = &pdc_sata_ops,
 264         },
 265
 266         /* board_40518 */
 267         {
 268                 .sht            = &pdc_ata_sht,
 269                 .flags          = PDC_COMMON_FLAGS | ATA_FLAG_SATA,
 270                 .pio_mask       = 0x1f, /* pio0-4 */
 271                 .mwdma_mask     = 0x07, /* mwdma0-2 */
 272                 .udma_mask      = 0x7f, /* udma0-6 ; FIXME */
 273                 .port_ops       = &pdc_sata_ops,
 274         },
 275 };
 276
 277 static const struct pci_device_id pdc_ata_pci_tbl[] = {
 278         { PCI_VDEVICE(PROMISE, 0x3371), board_2037x },
 279         { PCI_VDEVICE(PROMISE, 0x3373), board_2037x },
 280         { PCI_VDEVICE(PROMISE, 0x3375), board_2037x },
 281         { PCI_VDEVICE(PROMISE, 0x3376), board_2037x },
 282         { PCI_VDEVICE(PROMISE, 0x3570), board_2057x },
 283         { PCI_VDEVICE(PROMISE, 0x3571), board_2057x },
 284         { PCI_VDEVICE(PROMISE, 0x3574), board_2057x },
 285         { PCI_VDEVICE(PROMISE, 0x3577), board_2057x },
 286         { PCI_VDEVICE(PROMISE, 0x3d73), board_2057x },
 287         { PCI_VDEVICE(PROMISE, 0x3d75), board_2057x },
 288
 289         { PCI_VDEVICE(PROMISE, 0x3318), board_20319 },
 290         { PCI_VDEVICE(PROMISE, 0x3319), board_20319 },
 291         { PCI_VDEVICE(PROMISE, 0x3515), board_20319 },
 292         { PCI_VDEVICE(PROMISE, 0x3519), board_20319 },
 293         { PCI_VDEVICE(PROMISE, 0x3d17), board_40518 },
 294         { PCI_VDEVICE(PROMISE, 0x3d18), board_40518 },
 295
 296         { PCI_VDEVICE(PROMISE, 0x6629), board_20619 },
 297
 298         { }     /* terminate list */
 299 };
 300
 301
 302 static struct pci_driver pdc_ata_pci_driver = {
 303         .name                   = DRV_NAME,
 304         .id_table               = pdc_ata_pci_tbl,
 305         .probe                  = pdc_ata_init_one,
 306         .remove                 = ata_pci_remove_one,
 307 };
 308
 309
 310 static int pdc_port_start(struct ata_port *ap)
 311 {
 312         struct device *dev = ap->host->dev;
 313         struct pdc_host_priv *hp = ap->host->private_data;
 314         struct pdc_port_priv *pp;
 315         int rc;
 316
 317         /* fix up port flags and cable type for SATA+PATA chips */
 318         ap->flags |= hp->port_flags[ap->port_no];
 319         if (ap->flags & ATA_FLAG_SATA)
 320                 ap->cbl = ATA_CBL_SATA;
 321
 322         rc = ata_port_start(ap);
 323         if (rc)
 324                 return rc;
 325
 326         pp = devm_kzalloc(dev, sizeof(*pp), GFP_KERNEL);
 327         if (!pp)
 328                 return -ENOMEM;
 329
 330         pp->pkt = dmam_alloc_coherent(dev, 128, &pp->pkt_dma, GFP_KERNEL);
 331         if (!pp->pkt)
 332                 return -ENOMEM;
 333
 334         ap->private_data = pp;
 335
 336         /* fix up PHYMODE4 align timing */
 337         if ((hp->flags & PDC_FLAG_GEN_II) && sata_scr_valid(ap)) {
 338                 void __iomem *mmio = (void __iomem *) ap->ioaddr.scr_addr;
 339                 unsigned int tmp;
 340
 341                 tmp = readl(mmio + 0x014);
 342                 tmp = (tmp & ~3) | 1;   /* set bits 1:0 = 0:1 */
 343                 writel(tmp, mmio + 0x014);
 344         }
 345
 346         return 0;
 347 }
 348
 349 static void pdc_reset_port(struct ata_port *ap)
 350 {
 351         void __iomem *mmio = (void __iomem *) ap->ioaddr.cmd_addr + PDC_CTLSTAT;
 352         unsigned int i;
 353         u32 tmp;
 354
 355         for (i = 11; i > 0; i--) {
 356                 tmp = readl(mmio);
 357                 if (tmp & PDC_RESET)
 358                         break;
 359
 360                 udelay(100);
 361
 362                 tmp |= PDC_RESET;
 363                 writel(tmp, mmio);
 364         }
 365
 366         tmp &= ~PDC_RESET;
 367         writel(tmp, mmio);
 368         readl(mmio);    /* flush */
 369 }
 370
 371 static void pdc_pata_cbl_detect(struct ata_port *ap)
 372 {
 373         u8 tmp;
 374         void __iomem *mmio = (void __iomem *) ap->ioaddr.cmd_addr + PDC_CTLSTAT + 0x03;
 375
 376         tmp = readb(mmio);
 377
 378         if (tmp & 0x01) {
 379                 ap->cbl = ATA_CBL_PATA40;
 380                 ap->udma_mask &= ATA_UDMA_MASK_40C;
 381         } else
 382                 ap->cbl = ATA_CBL_PATA80;
 383 }
 384
 385 static void pdc_pata_phy_reset(struct ata_port *ap)
 386 {
 387         pdc_pata_cbl_detect(ap);
 388         pdc_reset_port(ap);
 389         ata_port_probe(ap);
 390         ata_bus_reset(ap);
 391 }
 392
 393 static u32 pdc_sata_scr_read (struct ata_port *ap, unsigned int sc_reg)
 394 {
 395         if (sc_reg > SCR_CONTROL || ap->cbl != ATA_CBL_SATA)
 396                 return 0xffffffffU;
 397         return readl((void __iomem *) ap->ioaddr.scr_addr + (sc_reg * 4));
 398 }
 399
 400
 401 static void pdc_sata_scr_write (struct ata_port *ap, unsigned int sc_reg,
 402                                u32 val)
 403 {
 404         if (sc_reg > SCR_CONTROL || ap->cbl != ATA_CBL_SATA)
 405                 return;
 406         writel(val, (void __iomem *) ap->ioaddr.scr_addr + (sc_reg * 4));
 407 }
 408
 409 static void pdc_atapi_pkt(struct ata_queued_cmd *qc)
 410 {
 411         struct ata_port *ap = qc->ap;
 412         dma_addr_t sg_table = ap->prd_dma;
 413         unsigned int cdb_len = qc->dev->cdb_len;
 414         u8 *cdb = qc->cdb;
 415         struct pdc_port_priv *pp = ap->private_data;
 416         u8 *buf = pp->pkt;
 417         u32 *buf32 = (u32 *) buf;
 418         unsigned int dev_sel, feature, nbytes;
 419
 420         /* set control bits (byte 0), zero delay seq id (byte 3),
 421          * and seq id (byte 2)
 422          */
 423         switch (qc->tf.protocol) {
 424         case ATA_PROT_ATAPI_DMA:
 425                 if (!(qc->tf.flags & ATA_TFLAG_WRITE))
 426                         buf32[0] = cpu_to_le32(PDC_PKT_READ);
 427                 else
 428                         buf32[0] = 0;
 429                 break;
 430         case ATA_PROT_ATAPI_NODATA:
 431                 buf32[0] = cpu_to_le32(PDC_PKT_NODATA);
 432                 break;
 433         default:
 434                 BUG();
 435                 break;
 436         }
 437         buf32[1] = cpu_to_le32(sg_table);       /* S/G table addr */
 438         buf32[2] = 0;                           /* no next-packet */
 439
 440         /* select drive */
 441         if (sata_scr_valid(ap)) {
 442                 dev_sel = PDC_DEVICE_SATA;
 443         } else {
 444                 dev_sel = ATA_DEVICE_OBS;
 445                 if (qc->dev->devno != 0)
 446                         dev_sel |= ATA_DEV1;
 447         }
 448         buf[12] = (1 << 5) | ATA_REG_DEVICE;
 449         buf[13] = dev_sel;
 450         buf[14] = (1 << 5) | ATA_REG_DEVICE | PDC_PKT_CLEAR_BSY;
 451         buf[15] = dev_sel; /* once more, waiting for BSY to clear */
 452
 453         buf[16] = (1 << 5) | ATA_REG_NSECT;
 454         buf[17] = 0x00;
 455         buf[18] = (1 << 5) | ATA_REG_LBAL;
 456         buf[19] = 0x00;
 457
 458         /* set feature and byte counter registers */
 459         if (qc->tf.protocol != ATA_PROT_ATAPI_DMA) {
 460                 feature = PDC_FEATURE_ATAPI_PIO;
 461                 /* set byte counter register to real transfer byte count */
 462                 nbytes = qc->nbytes;
 463                 if (nbytes > 0xffff)
 464                         nbytes = 0xffff;
 465         } else {
 466                 feature = PDC_FEATURE_ATAPI_DMA;
 467                 /* set byte counter register to 0 */
 468                 nbytes = 0;
 469         }
 470         buf[20] = (1 << 5) | ATA_REG_FEATURE;
 471         buf[21] = feature;
 472         buf[22] = (1 << 5) | ATA_REG_BYTEL;
 473         buf[23] = nbytes & 0xFF;
 474         buf[24] = (1 << 5) | ATA_REG_BYTEH;
 475         buf[25] = (nbytes >> 8) & 0xFF;
 476
 477         /* send ATAPI packet command 0xA0 */
 478         buf[26] = (1 << 5) | ATA_REG_CMD;
 479         buf[27] = ATA_CMD_PACKET;
 480
 481         /* select drive and check DRQ */
 482         buf[28] = (1 << 5) | ATA_REG_DEVICE | PDC_PKT_WAIT_DRDY;
 483         buf[29] = dev_sel;
 484
 485         /* we can represent cdb lengths 2/4/6/8/10/12/14/16 */
 486         BUG_ON(cdb_len & ~0x1E);
 487
 488         /* append the CDB as the final part */
 489         buf[30] = (((cdb_len >> 1) & 7) << 5) | ATA_REG_DATA | PDC_LAST_REG;
 490         memcpy(buf+31, cdb, cdb_len);
 491 }
 492
 493 static void pdc_qc_prep(struct ata_queued_cmd *qc)
 494 {
 495         struct pdc_port_priv *pp = qc->ap->private_data;
 496         unsigned int i;
 497
 498         VPRINTK("ENTER\n");
 499
 500         switch (qc->tf.protocol) {
 501         case ATA_PROT_DMA:
 502                 ata_qc_prep(qc);
 503                 /* fall through */
 504
 505         case ATA_PROT_NODATA:
 506                 i = pdc_pkt_header(&qc->tf, qc->ap->prd_dma,
 507                                    qc->dev->devno, pp->pkt);
 508
 509                 if (qc->tf.flags & ATA_TFLAG_LBA48)
 510                         i = pdc_prep_lba48(&qc->tf, pp->pkt, i);
 511                 else
 512                         i = pdc_prep_lba28(&qc->tf, pp->pkt, i);
 513
 514                 pdc_pkt_footer(&qc->tf, pp->pkt, i);
 515                 break;
 516
 517         case ATA_PROT_ATAPI:
 518                 ata_qc_prep(qc);
 519                 break;
 520
 521         case ATA_PROT_ATAPI_DMA:
 522                 ata_qc_prep(qc);
 523                 /*FALLTHROUGH*/
 524         case ATA_PROT_ATAPI_NODATA:
 525                 pdc_atapi_pkt(qc);
 526                 break;
 527
 528         default:
 529                 break;
 530         }
 531 }
 532
 533 static void pdc_freeze(struct ata_port *ap)
 534 {
 535         void __iomem *mmio = (void __iomem *) ap->ioaddr.cmd_addr;
 536         u32 tmp;
 537
 538         tmp = readl(mmio + PDC_CTLSTAT);
 539         tmp |= PDC_IRQ_DISABLE;
 540         tmp &= ~PDC_DMA_ENABLE;
 541         writel(tmp, mmio + PDC_CTLSTAT);
 542         readl(mmio + PDC_CTLSTAT); /* flush */
 543 }
 544
 545 static void pdc_thaw(struct ata_port *ap)
 546 {
 547         void __iomem *mmio = (void __iomem *) ap->ioaddr.cmd_addr;
 548         u32 tmp;
 549
 550         /* clear IRQ */
 551         readl(mmio + PDC_INT_SEQMASK);
 552
 553         /* turn IRQ back on */
 554         tmp = readl(mmio + PDC_CTLSTAT);
 555         tmp &= ~PDC_IRQ_DISABLE;
 556         writel(tmp, mmio + PDC_CTLSTAT);
 557         readl(mmio + PDC_CTLSTAT); /* flush */
 558 }
 559
 560 static void pdc_error_handler(struct ata_port *ap)
 561 {
 562         ata_reset_fn_t hardreset;
 563
 564         if (!(ap->pflags & ATA_PFLAG_FROZEN))
 565                 pdc_reset_port(ap);
 566
 567         hardreset = NULL;
 568         if (sata_scr_valid(ap))
 569                 hardreset = sata_std_hardreset;
 570
 571         /* perform recovery */
 572         ata_do_eh(ap, ata_std_prereset, ata_std_softreset, hardreset,
 573                   ata_std_postreset);
 574 }
 575
 576 static void pdc_post_internal_cmd(struct ata_queued_cmd *qc)
 577 {
 578         struct ata_port *ap = qc->ap;
 579
 580         if (qc->flags & ATA_QCFLAG_FAILED)
 581                 qc->err_mask |= AC_ERR_OTHER;
 582
 583         /* make DMA engine forget about the failed command */
 584         if (qc->err_mask)
 585                 pdc_reset_port(ap);
 586 }
 587
 588 static void pdc_eng_timeout(struct ata_port *ap)
 589 {
 590         struct ata_host *host = ap->host;
 591         u8 drv_stat;
 592         struct ata_queued_cmd *qc;
 593         unsigned long flags;
 594
 595         DPRINTK("ENTER\n");
 596
 597         spin_lock_irqsave(&host->lock, flags);
 598
 599         qc = ata_qc_from_tag(ap, ap->active_tag);
 600
 601         switch (qc->tf.protocol) {
 602         case ATA_PROT_DMA:
 603         case ATA_PROT_NODATA:
 604                 ata_port_printk(ap, KERN_ERR, "command timeout\n");
 605                 drv_stat = ata_wait_idle(ap);
 606                 qc->err_mask |= __ac_err_mask(drv_stat);
 607                 break;
 608
 609         default:
 610                 drv_stat = ata_busy_wait(ap, ATA_BUSY | ATA_DRQ, 1000);
 611
 612                 ata_port_printk(ap, KERN_ERR,
 613                                 "unknown timeout, cmd 0x%x stat 0x%x\n",
 614                                 qc->tf.command, drv_stat);
 615
 616                 qc->err_mask |= ac_err_mask(drv_stat);
 617                 break;
 618         }
 619
 620         spin_unlock_irqrestore(&host->lock, flags);
 621         ata_eh_qc_complete(qc);
 622         DPRINTK("EXIT\n");
 623 }
 624
 625 static inline unsigned int pdc_host_intr( struct ata_port *ap,
 626                                           struct ata_queued_cmd *qc)
 627 {
 628         unsigned int handled = 0;
 629         u32 tmp;
 630         void __iomem *mmio = (void __iomem *) ap->ioaddr.cmd_addr + PDC_GLOBAL_CTL;
 631
 632         tmp = readl(mmio);
 633         if (tmp & PDC_ERR_MASK) {
 634                 qc->err_mask |= AC_ERR_DEV;
 635                 pdc_reset_port(ap);
 636         }
 637
 638         switch (qc->tf.protocol) {
 639         case ATA_PROT_DMA:
 640         case ATA_PROT_NODATA:
 641         case ATA_PROT_ATAPI_DMA:
 642         case ATA_PROT_ATAPI_NODATA:
 643                 qc->err_mask |= ac_err_mask(ata_wait_idle(ap));
 644                 ata_qc_complete(qc);
 645                 handled = 1;
 646                 break;
 647
 648         default:
 649                 ap->stats.idle_irq++;
 650                 break;
 651         }
 652
 653         return handled;
 654 }
 655
 656 static void pdc_irq_clear(struct ata_port *ap)
 657 {
 658         struct ata_host *host = ap->host;
 659         void __iomem *mmio = host->mmio_base;
 660
 661         readl(mmio + PDC_INT_SEQMASK);
 662 }
 663
 664 static irqreturn_t pdc_interrupt (int irq, void *dev_instance)
 665 {
 666         struct ata_host *host = dev_instance;
 667         struct ata_port *ap;
 668         u32 mask = 0;
 669         unsigned int i, tmp;
 670         unsigned int handled = 0;
 671         void __iomem *mmio_base;
 672
 673         VPRINTK("ENTER\n");
 674
 675         if (!host || !host->mmio_base) {
 676                 VPRINTK("QUICK EXIT\n");
 677                 return IRQ_NONE;
 678         }
 679
 680         mmio_base = host->mmio_base;
 681
 682         /* reading should also clear interrupts */
 683         mask = readl(mmio_base + PDC_INT_SEQMASK);
 684
 685         if (mask == 0xffffffff) {
 686                 VPRINTK("QUICK EXIT 2\n");
 687                 return IRQ_NONE;
 688         }
 689
 690         spin_lock(&host->lock);
 691
 692         mask &= 0xffff;         /* only 16 tags possible */
 693         if (!mask) {
 694                 VPRINTK("QUICK EXIT 3\n");
 695                 goto done_irq;
 696         }
 697
 698         writel(mask, mmio_base + PDC_INT_SEQMASK);
 699
 700         for (i = 0; i < host->n_ports; i++) {
 701                 VPRINTK("port %u\n", i);
 702                 ap = host->ports[i];
 703                 tmp = mask & (1 << (i + 1));
 704                 if (tmp && ap &&
 705                     !(ap->flags & ATA_FLAG_DISABLED)) {
 706                         struct ata_queued_cmd *qc;
 707
 708                         qc = ata_qc_from_tag(ap, ap->active_tag);
 709                         if (qc && (!(qc->tf.flags & ATA_TFLAG_POLLING)))
 710                                 handled += pdc_host_intr(ap, qc);
 711                 }
 712         }
 713
 714         VPRINTK("EXIT\n");
 715
 716 done_irq:
 717         spin_unlock(&host->lock);
 718         return IRQ_RETVAL(handled);
 719 }
 720
 721 static inline void pdc_packet_start(struct ata_queued_cmd *qc)
 722 {
 723         struct ata_port *ap = qc->ap;
 724         struct pdc_port_priv *pp = ap->private_data;
 725         unsigned int port_no = ap->port_no;
 726         u8 seq = (u8) (port_no + 1);
 727
 728         VPRINTK("ENTER, ap %p\n", ap);
 729
 730         writel(0x00000001, ap->host->mmio_base + (seq * 4));
 731         readl(ap->host->mmio_base + (seq * 4)); /* flush */
 732
 733         pp->pkt[2] = seq;
 734         wmb();                  /* flush PRD, pkt writes */
 735         writel(pp->pkt_dma, (void __iomem *) ap->ioaddr.cmd_addr + PDC_PKT_SUBMIT);
 736         readl((void __iomem *) ap->ioaddr.cmd_addr + PDC_PKT_SUBMIT); /* flush */
 737 }
 738
 739 static unsigned int pdc_qc_issue_prot(struct ata_queued_cmd *qc)
 740 {
 741         switch (qc->tf.protocol) {
 742         case ATA_PROT_ATAPI_NODATA:
 743                 if (qc->dev->flags & ATA_DFLAG_CDB_INTR)
 744                         break;
 745                 /*FALLTHROUGH*/
 746         case ATA_PROT_ATAPI_DMA:
 747         case ATA_PROT_DMA:
 748         case ATA_PROT_NODATA:
 749                 pdc_packet_start(qc);
 750                 return 0;
 751
 752         default:
 753                 break;
 754         }
 755
 756         return ata_qc_issue_prot(qc);
 757 }
 758
 759 static void pdc_tf_load_mmio(struct ata_port *ap, const struct ata_taskfile *tf)
 760 {
 761         WARN_ON (tf->protocol == ATA_PROT_DMA ||
 762                  tf->protocol == ATA_PROT_NODATA);
 763         ata_tf_load(ap, tf);
 764 }
 765
 766
 767 static void pdc_exec_command_mmio(struct ata_port *ap, const struct ata_taskfile *tf)
 768 {
 769         WARN_ON (tf->protocol == ATA_PROT_DMA ||
 770                  tf->protocol == ATA_PROT_NODATA);
 771         ata_exec_command(ap, tf);
 772 }
 773
 774 static int pdc_check_atapi_dma(struct ata_queued_cmd *qc)
 775 {
 776         u8 *scsicmd = qc->scsicmd->cmnd;
 777         int pio = 1; /* atapi dma off by default */
 778
 779         /* Whitelist commands that may use DMA. */
 780         switch (scsicmd[0]) {
 781         case WRITE_12:
 782         case WRITE_10:
 783         case WRITE_6:
 784         case READ_12:
 785         case READ_10:
 786         case READ_6:
 787         case 0xad: /* READ_DVD_STRUCTURE */
 788         case 0xbe: /* READ_CD */
 789                 pio = 0;
 790         }
 791         /* -45150 (FFFF4FA2) to -1 (FFFFFFFF) shall use PIO mode */
 792         if (scsicmd[0] == WRITE_10) {
 793                 unsigned int lba;
 794                 lba = (scsicmd[2] << 24) | (scsicmd[3] << 16) | (scsicmd[4] << 8) | scsicmd[5];
 795                 if (lba >= 0xFFFF4FA2)
 796                         pio = 1;
 797         }
 798         return pio;
 799 }
 800
 801 static int pdc_old_check_atapi_dma(struct ata_queued_cmd *qc)
 802 {
 803         struct ata_port *ap = qc->ap;
 804
 805         /* First generation chips cannot use ATAPI DMA on SATA ports */
 806         if (sata_scr_valid(ap))
 807                 return 1;
 808         return pdc_check_atapi_dma(qc);
 809 }
 810
 811 static void pdc_ata_setup_port(struct ata_ioports *port, unsigned long base)
 812 {
 813         port->cmd_addr          = base;
 814         port->data_addr         = base;
 815         port->feature_addr      =
 816         port->error_addr        = base + 0x4;
 817         port->nsect_addr        = base + 0x8;
 818         port->lbal_addr         = base + 0xc;
 819         port->lbam_addr         = base + 0x10;
 820         port->lbah_addr         = base + 0x14;
 821         port->device_addr       = base + 0x18;
 822         port->command_addr      =
 823         port->status_addr       = base + 0x1c;
 824         port->altstatus_addr    =
 825         port->ctl_addr          = base + 0x38;
 826 }
 827
 828
 829 static void pdc_host_init(unsigned int chip_id, struct ata_probe_ent *pe)
 830 {
 831         void __iomem *mmio = pe->mmio_base;
 832         struct pdc_host_priv *hp = pe->private_data;
 833         int hotplug_offset;
 834         u32 tmp;
 835
 836         if (hp->flags & PDC_FLAG_GEN_II)
 837                 hotplug_offset = PDC2_SATA_PLUG_CSR;
 838         else
 839                 hotplug_offset = PDC_SATA_PLUG_CSR;
 840
 841         /*
 842          * Except for the hotplug stuff, this is voodoo from the
 843          * Promise driver.  Label this entire section
 844          * "TODO: figure out why we do this"
 845          */
 846
 847         /* enable BMR_BURST, maybe change FIFO_SHD to 8 dwords */
 848         tmp = readl(mmio + PDC_FLASH_CTL);
 849         tmp |= 0x02000; /* bit 13 (enable bmr burst) */
 850         if (!(hp->flags & PDC_FLAG_GEN_II))
 851                 tmp |= 0x10000; /* bit 16 (fifo threshold at 8 dw) */
 852         writel(tmp, mmio + PDC_FLASH_CTL);
 853
 854         /* clear plug/unplug flags for all ports */
 855         tmp = readl(mmio + hotplug_offset);
 856         writel(tmp | 0xff, mmio + hotplug_offset);
 857
 858         /* mask plug/unplug ints */
 859         tmp = readl(mmio + hotplug_offset);
 860         writel(tmp | 0xff0000, mmio + hotplug_offset);
 861
 862         /* don't initialise TBG or SLEW on 2nd generation chips */
 863         if (hp->flags & PDC_FLAG_GEN_II)
 864                 return;
 865
 866         /* reduce TBG clock to 133 Mhz. */
 867         tmp = readl(mmio + PDC_TBG_MODE);
 868         tmp &= ~0x30000; /* clear bit 17, 16*/
 869         tmp |= 0x10000;  /* set bit 17:16 = 0:1 */
 870         writel(tmp, mmio + PDC_TBG_MODE);
 871
 872         readl(mmio + PDC_TBG_MODE);     /* flush */
 873         msleep(10);
 874
 875         /* adjust slew rate control register. */
 876         tmp = readl(mmio + PDC_SLEW_CTL);
 877         tmp &= 0xFFFFF03F; /* clear bit 11 ~ 6 */
 878         tmp  |= 0x00000900; /* set bit 11-9 = 100b , bit 8-6 = 100 */
 879         writel(tmp, mmio + PDC_SLEW_CTL);
 880 }
 881
 882 static int pdc_ata_init_one (struct pci_dev *pdev, const struct pci_device_id *ent)
 883 {
 884         static int printed_version;
 885         struct ata_probe_ent *probe_ent;
 886         struct pdc_host_priv *hp;
 887         unsigned long base;
 888         void __iomem *mmio_base;
 889         unsigned int board_idx = (unsigned int) ent->driver_data;
 890         int rc;
 891         u8 tmp;
 892
 893         if (!printed_version++)
 894                 dev_printk(KERN_DEBUG, &pdev->dev, "version " DRV_VERSION "\n");
 895
 896         rc = pcim_enable_device(pdev);
 897         if (rc)
 898                 return rc;
 899
 900         rc = pci_request_regions(pdev, DRV_NAME);
 901         if (rc) {
 902                 pcim_pin_device(pdev);
 903                 return rc;
 904         }
 905
 906         rc = pci_set_dma_mask(pdev, ATA_DMA_MASK);
 907         if (rc)
 908                 return rc;
 909         rc = pci_set_consistent_dma_mask(pdev, ATA_DMA_MASK);
 910         if (rc)
 911                 return rc;
 912
 913         probe_ent = devm_kzalloc(&pdev->dev, sizeof(*probe_ent), GFP_KERNEL);
 914         if (probe_ent == NULL)
 915                 return -ENOMEM;
 916
 917         probe_ent->dev = pci_dev_to_dev(pdev);
 918         INIT_LIST_HEAD(&probe_ent->node);
 919
 920         mmio_base = pcim_iomap(pdev, 3, 0);
 921         if (mmio_base == NULL)
 922                 return -ENOMEM;
 923         base = (unsigned long) mmio_base;
 924
 925         hp = devm_kzalloc(&pdev->dev, sizeof(*hp), GFP_KERNEL);
 926         if (hp == NULL)
 927                 return -ENOMEM;
 928
 929         probe_ent->private_data = hp;
 930
 931         probe_ent->sht          = pdc_port_info[board_idx].sht;
 932         probe_ent->port_flags   = pdc_port_info[board_idx].flags;
 933         probe_ent->pio_mask     = pdc_port_info[board_idx].pio_mask;
 934         probe_ent->mwdma_mask   = pdc_port_info[board_idx].mwdma_mask;
 935         probe_ent->udma_mask    = pdc_port_info[board_idx].udma_mask;
 936         probe_ent->port_ops     = pdc_port_info[board_idx].port_ops;
 937
 938         probe_ent->irq = pdev->irq;
 939         probe_ent->irq_flags = IRQF_SHARED;
 940         probe_ent->mmio_base = mmio_base;
 941
 942         pdc_ata_setup_port(&probe_ent->port[0], base + 0x200);
 943         pdc_ata_setup_port(&probe_ent->port[1], base + 0x280);
 944
 945         probe_ent->port[0].scr_addr = base + 0x400;
 946         probe_ent->port[1].scr_addr = base + 0x500;
 947
 948         /* notice 4-port boards */
 949         switch (board_idx) {
 950         case board_40518:
 951                 hp->flags |= PDC_FLAG_GEN_II;
 952                 /* Fall through */
 953         case board_20319:
 954                 probe_ent->n_ports = 4;
 955
 956                 pdc_ata_setup_port(&probe_ent->port[2], base + 0x300);
 957                 pdc_ata_setup_port(&probe_ent->port[3], base + 0x380);
 958
 959                 probe_ent->port[2].scr_addr = base + 0x600;
 960                 probe_ent->port[3].scr_addr = base + 0x700;
 961                 break;
 962         case board_2057x:
 963                 hp->flags |= PDC_FLAG_GEN_II;
 964                 /* Fall through */
 965         case board_2037x:
 966                 /* TX2plus boards also have a PATA port */
 967                 tmp = readb(mmio_base + PDC_FLASH_CTL+1);
 968                 if (!(tmp & 0x80)) {
 969                         probe_ent->n_ports = 3;
 970                         pdc_ata_setup_port(&probe_ent->port[2], base + 0x300);
 971                         hp->port_flags[2] = ATA_FLAG_SLAVE_POSS;
 972                         printk(KERN_INFO DRV_NAME " PATA port found\n");
 973                 } else
 974                         probe_ent->n_ports = 2;
 975                 hp->port_flags[0] = ATA_FLAG_SATA;
 976                 hp->port_flags[1] = ATA_FLAG_SATA;
 977                 break;
 978         case board_20619:
 979                 probe_ent->n_ports = 4;
 980
 981                 pdc_ata_setup_port(&probe_ent->port[2], base + 0x300);
 982                 pdc_ata_setup_port(&probe_ent->port[3], base + 0x380);
 983
 984                 probe_ent->port[2].scr_addr = base + 0x600;
 985                 probe_ent->port[3].scr_addr = base + 0x700;
 986                 break;
 987         default:
 988                 BUG();
 989                 break;
 990         }
 991
 992         pci_set_master(pdev);
 993
 994         /* initialize adapter */
 995         pdc_host_init(board_idx, probe_ent);
 996
 997         if (!ata_device_add(probe_ent))
 998                 return -ENODEV;
 999
1000         devm_kfree(&pdev->dev, probe_ent);
1001         return 0;
1002 }
1003
1004
1005 static int __init pdc_ata_init(void)
1006 {
1007         return pci_register_driver(&pdc_ata_pci_driver);
1008 }
1009
1010
1011 static void __exit pdc_ata_exit(void)
1012 {
1013         pci_unregister_driver(&pdc_ata_pci_driver);
1014 }
1015
1016
1017 MODULE_AUTHOR("Jeff Garzik");
1018 MODULE_DESCRIPTION("Promise ATA TX2/TX4/TX4000 low-level driver");
1019 MODULE_LICENSE("GPL");
1020 MODULE_DEVICE_TABLE(pci, pdc_ata_pci_tbl);
1021 MODULE_VERSION(DRV_VERSION);
1022
1023 module_init(pdc_ata_init);
1024 module_exit(pdc_ata_exit);