drivers/scsi/sata_mv.c

   1 /*
   2  * sata_mv.c - Marvell SATA support
   3  *
   4  * Copyright 2005: EMC Corporation, all rights reserved.
   5  *
   6  * Please ALWAYS copy linux-ide@vger.kernel.org on emails.
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation; version 2 of the License.
  11  *
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  * GNU General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * along with this program; if not, write to the Free Software
  19  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  20  *
  21  */
  22
  23 #include <linux/kernel.h>
  24 #include <linux/module.h>
  25 #include <linux/pci.h>
  26 #include <linux/init.h>
  27 #include <linux/blkdev.h>
  28 #include <linux/delay.h>
  29 #include <linux/interrupt.h>
  30 #include <linux/sched.h>
  31 #include <linux/dma-mapping.h>
  32 #include "scsi.h"
  33 #include <scsi/scsi_host.h>
  34 #include <linux/libata.h>
  35 #include <asm/io.h>
  36
  37 #define DRV_NAME        "sata_mv"
  38 #define DRV_VERSION     "0.22"
  39
  40 enum {
  41         /* BAR's are enumerated in terms of pci_resource_start() terms */
  42         MV_PRIMARY_BAR          = 0,    /* offset 0x10: memory space */
  43         MV_IO_BAR               = 2,    /* offset 0x18: IO space */
  44         MV_MISC_BAR             = 3,    /* offset 0x1c: FLASH, NVRAM, SRAM */
  45
  46         MV_MAJOR_REG_AREA_SZ    = 0x10000,      /* 64KB */
  47         MV_MINOR_REG_AREA_SZ    = 0x2000,       /* 8KB */
  48
  49         MV_PCI_REG_BASE         = 0,
  50         MV_IRQ_COAL_REG_BASE    = 0x18000,      /* 6xxx part only */
  51         MV_SATAHC0_REG_BASE     = 0x20000,
  52
  53         MV_PCI_REG_SZ           = MV_MAJOR_REG_AREA_SZ,
  54         MV_SATAHC_REG_SZ        = MV_MAJOR_REG_AREA_SZ,
  55         MV_SATAHC_ARBTR_REG_SZ  = MV_MINOR_REG_AREA_SZ,         /* arbiter */
  56         MV_PORT_REG_SZ          = MV_MINOR_REG_AREA_SZ,
  57
  58         MV_USE_Q_DEPTH          = ATA_DEF_QUEUE,
  59
  60         MV_MAX_Q_DEPTH          = 32,
  61         MV_MAX_Q_DEPTH_MASK     = MV_MAX_Q_DEPTH - 1,
  62
  63         /* CRQB needs alignment on a 1KB boundary. Size == 1KB
  64          * CRPB needs alignment on a 256B boundary. Size == 256B
  65          * SG count of 176 leads to MV_PORT_PRIV_DMA_SZ == 4KB
  66          * ePRD (SG) entries need alignment on a 16B boundary. Size == 16B
  67          */
  68         MV_CRQB_Q_SZ            = (32 * MV_MAX_Q_DEPTH),
  69         MV_CRPB_Q_SZ            = (8 * MV_MAX_Q_DEPTH),
  70         MV_MAX_SG_CT            = 176,
  71         MV_SG_TBL_SZ            = (16 * MV_MAX_SG_CT),
  72         MV_PORT_PRIV_DMA_SZ     = (MV_CRQB_Q_SZ + MV_CRPB_Q_SZ + MV_SG_TBL_SZ),
  73
  74         /* Our DMA boundary is determined by an ePRD being unable to handle
  75          * anything larger than 64KB
  76          */
  77         MV_DMA_BOUNDARY         = 0xffffU,
  78
  79         MV_PORTS_PER_HC         = 4,
  80         /* == (port / MV_PORTS_PER_HC) to determine HC from 0-7 port */
  81         MV_PORT_HC_SHIFT        = 2,
  82         /* == (port % MV_PORTS_PER_HC) to determine hard port from 0-7 port */
  83         MV_PORT_MASK            = 3,
  84
  85         /* Host Flags */
  86         MV_FLAG_DUAL_HC         = (1 << 30),  /* two SATA Host Controllers */
  87         MV_FLAG_IRQ_COALESCE    = (1 << 29),  /* IRQ coalescing capability */
  88         MV_FLAG_GLBL_SFT_RST    = (1 << 28),  /* Global Soft Reset support */
  89         MV_COMMON_FLAGS         = (ATA_FLAG_SATA | ATA_FLAG_NO_LEGACY |
  90                                    ATA_FLAG_SATA_RESET | ATA_FLAG_MMIO),
  91         MV_6XXX_FLAGS           = (MV_FLAG_IRQ_COALESCE |
  92                                    MV_FLAG_GLBL_SFT_RST),
  93
  94         chip_504x               = 0,
  95         chip_508x               = 1,
  96         chip_604x               = 2,
  97         chip_608x               = 3,
  98
  99         CRQB_FLAG_READ          = (1 << 0),
 100         CRQB_TAG_SHIFT          = 1,
 101         CRQB_CMD_ADDR_SHIFT     = 8,
 102         CRQB_CMD_CS             = (0x2 << 11),
 103         CRQB_CMD_LAST           = (1 << 15),
 104
 105         CRPB_FLAG_STATUS_SHIFT  = 8,
 106
 107         EPRD_FLAG_END_OF_TBL    = (1 << 31),
 108
 109         /* PCI interface registers */
 110
 111         PCI_COMMAND_OFS         = 0xc00,
 112
 113         PCI_MAIN_CMD_STS_OFS    = 0xd30,
 114         STOP_PCI_MASTER         = (1 << 2),
 115         PCI_MASTER_EMPTY        = (1 << 3),
 116         GLOB_SFT_RST            = (1 << 4),
 117
 118         PCI_IRQ_CAUSE_OFS       = 0x1d58,
 119         PCI_IRQ_MASK_OFS        = 0x1d5c,
 120         PCI_UNMASK_ALL_IRQS     = 0x7fffff,     /* bits 22-0 */
 121
 122         HC_MAIN_IRQ_CAUSE_OFS   = 0x1d60,
 123         HC_MAIN_IRQ_MASK_OFS    = 0x1d64,
 124         PORT0_ERR               = (1 << 0),     /* shift by port # */
 125         PORT0_DONE              = (1 << 1),     /* shift by port # */
 126         HC0_IRQ_PEND            = 0x1ff,        /* bits 0-8 = HC0's ports */
 127         HC_SHIFT                = 9,            /* bits 9-17 = HC1's ports */
 128         PCI_ERR                 = (1 << 18),
 129         TRAN_LO_DONE            = (1 << 19),    /* 6xxx: IRQ coalescing */
 130         TRAN_HI_DONE            = (1 << 20),    /* 6xxx: IRQ coalescing */
 131         PORTS_0_7_COAL_DONE     = (1 << 21),    /* 6xxx: IRQ coalescing */
 132         GPIO_INT                = (1 << 22),
 133         SELF_INT                = (1 << 23),
 134         TWSI_INT                = (1 << 24),
 135         HC_MAIN_RSVD            = (0x7f << 25), /* bits 31-25 */
 136         HC_MAIN_MASKED_IRQS     = (TRAN_LO_DONE | TRAN_HI_DONE |
 137                                    PORTS_0_7_COAL_DONE | GPIO_INT | TWSI_INT |
 138                                    HC_MAIN_RSVD),
 139
 140         /* SATAHC registers */
 141         HC_CFG_OFS              = 0,
 142
 143         HC_IRQ_CAUSE_OFS        = 0x14,
 144         CRPB_DMA_DONE           = (1 << 0),     /* shift by port # */
 145         HC_IRQ_COAL             = (1 << 4),     /* IRQ coalescing */
 146         DEV_IRQ                 = (1 << 8),     /* shift by port # */
 147
 148         /* Shadow block registers */
 149         SHD_BLK_OFS             = 0x100,
 150         SHD_CTL_AST_OFS         = 0x20,         /* ofs from SHD_BLK_OFS */
 151
 152         /* SATA registers */
 153         SATA_STATUS_OFS         = 0x300,  /* ctrl, err regs follow status */
 154         SATA_ACTIVE_OFS         = 0x350,
 155
 156         /* Port registers */
 157         EDMA_CFG_OFS            = 0,
 158         EDMA_CFG_Q_DEPTH        = 0,                    /* queueing disabled */
 159         EDMA_CFG_NCQ            = (1 << 5),
 160         EDMA_CFG_NCQ_GO_ON_ERR  = (1 << 14),            /* continue on error */
 161         EDMA_CFG_RD_BRST_EXT    = (1 << 11),            /* read burst 512B */
 162         EDMA_CFG_WR_BUFF_LEN    = (1 << 13),            /* write buffer 512B */
 163
 164         EDMA_ERR_IRQ_CAUSE_OFS  = 0x8,
 165         EDMA_ERR_IRQ_MASK_OFS   = 0xc,
 166         EDMA_ERR_D_PAR          = (1 << 0),
 167         EDMA_ERR_PRD_PAR        = (1 << 1),
 168         EDMA_ERR_DEV            = (1 << 2),
 169         EDMA_ERR_DEV_DCON       = (1 << 3),
 170         EDMA_ERR_DEV_CON        = (1 << 4),
 171         EDMA_ERR_SERR           = (1 << 5),
 172         EDMA_ERR_SELF_DIS       = (1 << 7),
 173         EDMA_ERR_BIST_ASYNC     = (1 << 8),
 174         EDMA_ERR_CRBQ_PAR       = (1 << 9),
 175         EDMA_ERR_CRPB_PAR       = (1 << 10),
 176         EDMA_ERR_INTRL_PAR      = (1 << 11),
 177         EDMA_ERR_IORDY          = (1 << 12),
 178         EDMA_ERR_LNK_CTRL_RX    = (0xf << 13),
 179         EDMA_ERR_LNK_CTRL_RX_2  = (1 << 15),
 180         EDMA_ERR_LNK_DATA_RX    = (0xf << 17),
 181         EDMA_ERR_LNK_CTRL_TX    = (0x1f << 21),
 182         EDMA_ERR_LNK_DATA_TX    = (0x1f << 26),
 183         EDMA_ERR_TRANS_PROTO    = (1 << 31),
 184         EDMA_ERR_FATAL          = (EDMA_ERR_D_PAR | EDMA_ERR_PRD_PAR |
 185                                    EDMA_ERR_DEV_DCON | EDMA_ERR_CRBQ_PAR |
 186                                    EDMA_ERR_CRPB_PAR | EDMA_ERR_INTRL_PAR |
 187                                    EDMA_ERR_IORDY | EDMA_ERR_LNK_CTRL_RX_2 |
 188                                    EDMA_ERR_LNK_DATA_RX |
 189                                    EDMA_ERR_LNK_DATA_TX |
 190                                    EDMA_ERR_TRANS_PROTO),
 191
 192         EDMA_REQ_Q_BASE_HI_OFS  = 0x10,
 193         EDMA_REQ_Q_IN_PTR_OFS   = 0x14,         /* also contains BASE_LO */
 194         EDMA_REQ_Q_BASE_LO_MASK = 0xfffffc00U,
 195
 196         EDMA_REQ_Q_OUT_PTR_OFS  = 0x18,
 197         EDMA_REQ_Q_PTR_SHIFT    = 5,
 198
 199         EDMA_RSP_Q_BASE_HI_OFS  = 0x1c,
 200         EDMA_RSP_Q_IN_PTR_OFS   = 0x20,
 201         EDMA_RSP_Q_OUT_PTR_OFS  = 0x24,         /* also contains BASE_LO */
 202         EDMA_RSP_Q_BASE_LO_MASK = 0xffffff00U,
 203         EDMA_RSP_Q_PTR_SHIFT    = 3,
 204
 205         EDMA_CMD_OFS            = 0x28,
 206         EDMA_EN                 = (1 << 0),
 207         EDMA_DS                 = (1 << 1),
 208         ATA_RST                 = (1 << 2),
 209
 210         /* Host private flags (hp_flags) */
 211         MV_HP_FLAG_MSI          = (1 << 0),
 212
 213         /* Port private flags (pp_flags) */
 214         MV_PP_FLAG_EDMA_EN      = (1 << 0),
 215         MV_PP_FLAG_EDMA_DS_ACT  = (1 << 1),
 216 };
 217
 218 /* Command ReQuest Block: 32B */
 219 struct mv_crqb {
 220         u32                     sg_addr;
 221         u32                     sg_addr_hi;
 222         u16                     ctrl_flags;
 223         u16                     ata_cmd[11];
 224 };
 225
 226 /* Command ResPonse Block: 8B */
 227 struct mv_crpb {
 228         u16                     id;
 229         u16                     flags;
 230         u32                     tmstmp;
 231 };
 232
 233 /* EDMA Physical Region Descriptor (ePRD); A.K.A. SG */
 234 struct mv_sg {
 235         u32                     addr;
 236         u32                     flags_size;
 237         u32                     addr_hi;
 238         u32                     reserved;
 239 };
 240
 241 struct mv_port_priv {
 242         struct mv_crqb          *crqb;
 243         dma_addr_t              crqb_dma;
 244         struct mv_crpb          *crpb;
 245         dma_addr_t              crpb_dma;
 246         struct mv_sg            *sg_tbl;
 247         dma_addr_t              sg_tbl_dma;
 248
 249         unsigned                req_producer;           /* cp of req_in_ptr */
 250         unsigned                rsp_consumer;           /* cp of rsp_out_ptr */
 251         u32                     pp_flags;
 252 };
 253
 254 struct mv_host_priv {
 255         u32                     hp_flags;
 256 };
 257
 258 static void mv_irq_clear(struct ata_port *ap);
 259 static u32 mv_scr_read(struct ata_port *ap, unsigned int sc_reg_in);
 260 static void mv_scr_write(struct ata_port *ap, unsigned int sc_reg_in, u32 val);
 261 static u8 mv_check_err(struct ata_port *ap);
 262 static void mv_phy_reset(struct ata_port *ap);
 263 static void mv_host_stop(struct ata_host_set *host_set);
 264 static int mv_port_start(struct ata_port *ap);
 265 static void mv_port_stop(struct ata_port *ap);
 266 static void mv_qc_prep(struct ata_queued_cmd *qc);
 267 static int mv_qc_issue(struct ata_queued_cmd *qc);
 268 static irqreturn_t mv_interrupt(int irq, void *dev_instance,
 269                                 struct pt_regs *regs);
 270 static void mv_eng_timeout(struct ata_port *ap);
 271 static int mv_init_one(struct pci_dev *pdev, const struct pci_device_id *ent);
 272
 273 static Scsi_Host_Template mv_sht = {
 274         .module                 = THIS_MODULE,
 275         .name                   = DRV_NAME,
 276         .ioctl                  = ata_scsi_ioctl,
 277         .queuecommand           = ata_scsi_queuecmd,
 278         .eh_strategy_handler    = ata_scsi_error,
 279         .can_queue              = MV_USE_Q_DEPTH,
 280         .this_id                = ATA_SHT_THIS_ID,
 281         .sg_tablesize           = MV_MAX_SG_CT,
 282         .max_sectors            = ATA_MAX_SECTORS,
 283         .cmd_per_lun            = ATA_SHT_CMD_PER_LUN,
 284         .emulated               = ATA_SHT_EMULATED,
 285         .use_clustering         = ATA_SHT_USE_CLUSTERING,
 286         .proc_name              = DRV_NAME,
 287         .dma_boundary           = MV_DMA_BOUNDARY,
 288         .slave_configure        = ata_scsi_slave_config,
 289         .bios_param             = ata_std_bios_param,
 290         .ordered_flush          = 1,
 291 };
 292
 293 static struct ata_port_operations mv_ops = {
 294         .port_disable           = ata_port_disable,
 295
 296         .tf_load                = ata_tf_load,
 297         .tf_read                = ata_tf_read,
 298         .check_status           = ata_check_status,
 299         .check_err              = mv_check_err,
 300         .exec_command           = ata_exec_command,
 301         .dev_select             = ata_std_dev_select,
 302
 303         .phy_reset              = mv_phy_reset,
 304
 305         .qc_prep                = mv_qc_prep,
 306         .qc_issue               = mv_qc_issue,
 307
 308         .eng_timeout            = mv_eng_timeout,
 309
 310         .irq_handler            = mv_interrupt,
 311         .irq_clear              = mv_irq_clear,
 312
 313         .scr_read               = mv_scr_read,
 314         .scr_write              = mv_scr_write,
 315
 316         .port_start             = mv_port_start,
 317         .port_stop              = mv_port_stop,
 318         .host_stop              = mv_host_stop,
 319 };
 320
 321 static struct ata_port_info mv_port_info[] = {
 322         {  /* chip_504x */
 323                 .sht            = &mv_sht,
 324                 .host_flags     = MV_COMMON_FLAGS,
 325                 .pio_mask       = 0x1f, /* pio0-4 */
 326                 .udma_mask      = 0,    /* 0x7f (udma0-6 disabled for now) */
 327                 .port_ops       = &mv_ops,
 328         },
 329         {  /* chip_508x */
 330                 .sht            = &mv_sht,
 331                 .host_flags     = (MV_COMMON_FLAGS | MV_FLAG_DUAL_HC),
 332                 .pio_mask       = 0x1f, /* pio0-4 */
 333                 .udma_mask      = 0,    /* 0x7f (udma0-6 disabled for now) */
 334                 .port_ops       = &mv_ops,
 335         },
 336         {  /* chip_604x */
 337                 .sht            = &mv_sht,
 338                 .host_flags     = (MV_COMMON_FLAGS | MV_6XXX_FLAGS),
 339                 .pio_mask       = 0x1f, /* pio0-4 */
 340                 .udma_mask      = 0x7f, /* udma0-6 */
 341                 .port_ops       = &mv_ops,
 342         },
 343         {  /* chip_608x */
 344                 .sht            = &mv_sht,
 345                 .host_flags     = (MV_COMMON_FLAGS | MV_6XXX_FLAGS |
 346                                    MV_FLAG_DUAL_HC),
 347                 .pio_mask       = 0x1f, /* pio0-4 */
 348                 .udma_mask      = 0x7f, /* udma0-6 */
 349                 .port_ops       = &mv_ops,
 350         },
 351 };
 352
 353 static struct pci_device_id mv_pci_tbl[] = {
 354         {PCI_DEVICE(PCI_VENDOR_ID_MARVELL, 0x5040), 0, 0, chip_504x},
 355         {PCI_DEVICE(PCI_VENDOR_ID_MARVELL, 0x5041), 0, 0, chip_504x},
 356         {PCI_DEVICE(PCI_VENDOR_ID_MARVELL, 0x5080), 0, 0, chip_508x},
 357         {PCI_DEVICE(PCI_VENDOR_ID_MARVELL, 0x5081), 0, 0, chip_508x},
 358
 359         {PCI_DEVICE(PCI_VENDOR_ID_MARVELL, 0x6040), 0, 0, chip_604x},
 360         {PCI_DEVICE(PCI_VENDOR_ID_MARVELL, 0x6041), 0, 0, chip_604x},
 361         {PCI_DEVICE(PCI_VENDOR_ID_MARVELL, 0x6080), 0, 0, chip_608x},
 362         {PCI_DEVICE(PCI_VENDOR_ID_MARVELL, 0x6081), 0, 0, chip_608x},
 363         {}                      /* terminate list */
 364 };
 365
 366 static struct pci_driver mv_pci_driver = {
 367         .name                   = DRV_NAME,
 368         .id_table               = mv_pci_tbl,
 369         .probe                  = mv_init_one,
 370         .remove                 = ata_pci_remove_one,
 371 };
 372
 373 /*
 374  * Functions
 375  */
 376
 377 static inline void writelfl(unsigned long data, void __iomem *addr)
 378 {
 379         writel(data, addr);
 380         (void) readl(addr);     /* flush to avoid PCI posted write */
 381 }
 382
 383 static inline void __iomem *mv_hc_base(void __iomem *base, unsigned int hc)
 384 {
 385         return (base + MV_SATAHC0_REG_BASE + (hc * MV_SATAHC_REG_SZ));
 386 }
 387
 388 static inline void __iomem *mv_port_base(void __iomem *base, unsigned int port)
 389 {
 390         return (mv_hc_base(base, port >> MV_PORT_HC_SHIFT) +
 391                 MV_SATAHC_ARBTR_REG_SZ +
 392                 ((port & MV_PORT_MASK) * MV_PORT_REG_SZ));
 393 }
 394
 395 static inline void __iomem *mv_ap_base(struct ata_port *ap)
 396 {
 397         return mv_port_base(ap->host_set->mmio_base, ap->port_no);
 398 }
 399
 400 static inline int mv_get_hc_count(unsigned long hp_flags)
 401 {
 402         return ((hp_flags & MV_FLAG_DUAL_HC) ? 2 : 1);
 403 }
 404
 405 static void mv_irq_clear(struct ata_port *ap)
 406 {
 407 }
 408
 409 static void mv_start_dma(void __iomem *base, struct mv_port_priv *pp,
 410                          struct ata_port *ap)
 411 {
 412         unsigned long flags;
 413
 414         spin_lock_irqsave(&ap->host_set->lock, flags);
 415
 416         writelfl(EDMA_EN, base + EDMA_CMD_OFS);
 417         pp->pp_flags |= MV_PP_FLAG_EDMA_EN;
 418
 419         spin_unlock_irqrestore(&ap->host_set->lock, flags);
 420 }
 421
 422 static void mv_stop_dma(struct ata_port *ap)
 423 {
 424         void __iomem *port_mmio = mv_ap_base(ap);
 425         struct mv_port_priv *pp = ap->private_data;
 426         unsigned long flags;
 427         u32 reg;
 428         int i;
 429
 430         spin_lock_irqsave(&ap->host_set->lock, flags);
 431
 432         if (!(MV_PP_FLAG_EDMA_DS_ACT & pp->pp_flags) &&
 433             ((MV_PP_FLAG_EDMA_EN & pp->pp_flags) ||
 434              (EDMA_EN & readl(port_mmio + EDMA_CMD_OFS)))) {
 435                 /* Disable EDMA if we're not already trying to disable it
 436                  * and it is currently active.   The disable bit auto clears.
 437                  */
 438                 pp->pp_flags |= MV_PP_FLAG_EDMA_DS_ACT;
 439                 writelfl(EDMA_DS, port_mmio + EDMA_CMD_OFS);
 440                 pp->pp_flags &= ~MV_PP_FLAG_EDMA_EN;
 441         }
 442         spin_unlock_irqrestore(&ap->host_set->lock, flags);
 443
 444         /* now properly wait for the eDMA to stop */
 445         for (i = 1000; i > 0; i--) {
 446                 reg = readl(port_mmio + EDMA_CMD_OFS);
 447                 if (!(EDMA_EN & reg)) {
 448                         break;
 449                 }
 450                 udelay(100);
 451         }
 452
 453         spin_lock_irqsave(&ap->host_set->lock, flags);
 454         pp->pp_flags &= ~MV_PP_FLAG_EDMA_DS_ACT;
 455         spin_unlock_irqrestore(&ap->host_set->lock, flags);
 456
 457         if (EDMA_EN & reg) {
 458                 printk(KERN_ERR "ata%u: Unable to stop eDMA\n", ap->id);
 459         }
 460 }
 461
 462 static void mv_dump_mem(void __iomem *start, unsigned bytes)
 463 {
 464 #ifdef ATA_DEBUG
 465         int b, w;
 466         for (b = 0; b < bytes; ) {
 467                 DPRINTK("%p: ", start + b);
 468                 for (w = 0; b < bytes && w < 4; w++) {
 469                         printk("%08x ",readl(start + b));
 470                         b += sizeof(u32);
 471                 }
 472                 printk("\n");
 473         }
 474 #endif
 475 }
 476 static void mv_dump_pci_cfg(struct pci_dev *pdev, unsigned bytes)
 477 {
 478 #ifdef ATA_DEBUG
 479         int b, w;
 480         u32 dw;
 481         for (b = 0; b < bytes; ) {
 482                 DPRINTK("%02x: ", b);
 483                 for (w = 0; b < bytes && w < 4; w++) {
 484                         (void) pci_read_config_dword(pdev,b,&dw);
 485                         printk("%08x ",dw);
 486                         b += sizeof(u32);
 487                 }
 488                 printk("\n");
 489         }
 490 #endif
 491 }
 492 static void mv_dump_all_regs(void __iomem *mmio_base, int port,
 493                              struct pci_dev *pdev)
 494 {
 495 #ifdef ATA_DEBUG
 496         void __iomem *hc_base = mv_hc_base(mmio_base,
 497                                            port >> MV_PORT_HC_SHIFT);
 498         void __iomem *port_base;
 499         int start_port, num_ports, p, start_hc, num_hcs, hc;
 500
 501         if (0 > port) {
 502                 start_hc = start_port = 0;
 503                 num_ports = 8;          /* shld be benign for 4 port devs */
 504                 num_hcs = 2;
 505         } else {
 506                 start_hc = port >> MV_PORT_HC_SHIFT;
 507                 start_port = port;
 508                 num_ports = num_hcs = 1;
 509         }
 510         DPRINTK("All registers for port(s) %u-%u:\n", start_port,
 511                 num_ports > 1 ? num_ports - 1 : start_port);
 512
 513         if (NULL != pdev) {
 514                 DPRINTK("PCI config space regs:\n");
 515                 mv_dump_pci_cfg(pdev, 0x68);
 516         }
 517         DPRINTK("PCI regs:\n");
 518         mv_dump_mem(mmio_base+0xc00, 0x3c);
 519         mv_dump_mem(mmio_base+0xd00, 0x34);
 520         mv_dump_mem(mmio_base+0xf00, 0x4);
 521         mv_dump_mem(mmio_base+0x1d00, 0x6c);
 522         for (hc = start_hc; hc < start_hc + num_hcs; hc++) {
 523                 hc_base = mv_hc_base(mmio_base, port >> MV_PORT_HC_SHIFT);
 524                 DPRINTK("HC regs (HC %i):\n", hc);
 525                 mv_dump_mem(hc_base, 0x1c);
 526         }
 527         for (p = start_port; p < start_port + num_ports; p++) {
 528                 port_base = mv_port_base(mmio_base, p);
 529                 DPRINTK("EDMA regs (port %i):\n",p);
 530                 mv_dump_mem(port_base, 0x54);
 531                 DPRINTK("SATA regs (port %i):\n",p);
 532                 mv_dump_mem(port_base+0x300, 0x60);
 533         }
 534 #endif
 535 }
 536
 537 static unsigned int mv_scr_offset(unsigned int sc_reg_in)
 538 {
 539         unsigned int ofs;
 540
 541         switch (sc_reg_in) {
 542         case SCR_STATUS:
 543         case SCR_CONTROL:
 544         case SCR_ERROR:
 545                 ofs = SATA_STATUS_OFS + (sc_reg_in * sizeof(u32));
 546                 break;
 547         case SCR_ACTIVE:
 548                 ofs = SATA_ACTIVE_OFS;   /* active is not with the others */
 549                 break;
 550         default:
 551                 ofs = 0xffffffffU;
 552                 break;
 553         }
 554         return ofs;
 555 }
 556
 557 static u32 mv_scr_read(struct ata_port *ap, unsigned int sc_reg_in)
 558 {
 559         unsigned int ofs = mv_scr_offset(sc_reg_in);
 560
 561         if (0xffffffffU != ofs) {
 562                 return readl(mv_ap_base(ap) + ofs);
 563         } else {
 564                 return (u32) ofs;
 565         }
 566 }
 567
 568 static void mv_scr_write(struct ata_port *ap, unsigned int sc_reg_in, u32 val)
 569 {
 570         unsigned int ofs = mv_scr_offset(sc_reg_in);
 571
 572         if (0xffffffffU != ofs) {
 573                 writelfl(val, mv_ap_base(ap) + ofs);
 574         }
 575 }
 576
 577 /* This routine only applies to 6xxx parts */
 578 static int mv_global_soft_reset(void __iomem *mmio_base)
 579 {
 580         void __iomem *reg = mmio_base + PCI_MAIN_CMD_STS_OFS;
 581         int i, rc = 0;
 582         u32 t;
 583
 584         /* Following procedure defined in PCI "main command and status
 585          * register" table.
 586          */
 587         t = readl(reg);
 588         writel(t | STOP_PCI_MASTER, reg);
 589
 590         for (i = 0; i < 1000; i++) {
 591                 udelay(1);
 592                 t = readl(reg);
 593                 if (PCI_MASTER_EMPTY & t) {
 594                         break;
 595                 }
 596         }
 597         if (!(PCI_MASTER_EMPTY & t)) {
 598                 printk(KERN_ERR DRV_NAME ": PCI master won't flush\n");
 599                 rc = 1;
 600                 goto done;
 601         }
 602
 603         /* set reset */
 604         i = 5;
 605         do {
 606                 writel(t | GLOB_SFT_RST, reg);
 607                 t = readl(reg);
 608                 udelay(1);
 609         } while (!(GLOB_SFT_RST & t) && (i-- > 0));
 610
 611         if (!(GLOB_SFT_RST & t)) {
 612                 printk(KERN_ERR DRV_NAME ": can't set global reset\n");
 613                 rc = 1;
 614                 goto done;
 615         }
 616
 617         /* clear reset and *reenable the PCI master* (not mentioned in spec) */
 618         i = 5;
 619         do {
 620                 writel(t & ~(GLOB_SFT_RST | STOP_PCI_MASTER), reg);
 621                 t = readl(reg);
 622                 udelay(1);
 623         } while ((GLOB_SFT_RST & t) && (i-- > 0));
 624
 625         if (GLOB_SFT_RST & t) {
 626                 printk(KERN_ERR DRV_NAME ": can't clear global reset\n");
 627                 rc = 1;
 628         }
 629 done:
 630         return rc;
 631 }
 632
 633 static void mv_host_stop(struct ata_host_set *host_set)
 634 {
 635         struct mv_host_priv *hpriv = host_set->private_data;
 636         struct pci_dev *pdev = to_pci_dev(host_set->dev);
 637
 638         if (hpriv->hp_flags & MV_HP_FLAG_MSI) {
 639                 pci_disable_msi(pdev);
 640         } else {
 641                 pci_intx(pdev, 0);
 642         }
 643         kfree(hpriv);
 644         ata_host_stop(host_set);
 645 }
 646
 647 static int mv_port_start(struct ata_port *ap)
 648 {
 649         struct device *dev = ap->host_set->dev;
 650         struct mv_port_priv *pp;
 651         void __iomem *port_mmio = mv_ap_base(ap);
 652         void *mem;
 653         dma_addr_t mem_dma;
 654
 655         pp = kmalloc(sizeof(*pp), GFP_KERNEL);
 656         if (!pp) {
 657                 return -ENOMEM;
 658         }
 659         memset(pp, 0, sizeof(*pp));
 660
 661         mem = dma_alloc_coherent(dev, MV_PORT_PRIV_DMA_SZ, &mem_dma,
 662                                  GFP_KERNEL);
 663         if (!mem) {
 664                 kfree(pp);
 665                 return -ENOMEM;
 666         }
 667         memset(mem, 0, MV_PORT_PRIV_DMA_SZ);
 668
 669         /* First item in chunk of DMA memory:
 670          * 32-slot command request table (CRQB), 32 bytes each in size
 671          */
 672         pp->crqb = mem;
 673         pp->crqb_dma = mem_dma;
 674         mem += MV_CRQB_Q_SZ;
 675         mem_dma += MV_CRQB_Q_SZ;
 676
 677         /* Second item:
 678          * 32-slot command response table (CRPB), 8 bytes each in size
 679          */
 680         pp->crpb = mem;
 681         pp->crpb_dma = mem_dma;
 682         mem += MV_CRPB_Q_SZ;
 683         mem_dma += MV_CRPB_Q_SZ;
 684
 685         /* Third item:
 686          * Table of scatter-gather descriptors (ePRD), 16 bytes each
 687          */
 688         pp->sg_tbl = mem;
 689         pp->sg_tbl_dma = mem_dma;
 690
 691         writelfl(EDMA_CFG_Q_DEPTH | EDMA_CFG_RD_BRST_EXT |
 692                  EDMA_CFG_WR_BUFF_LEN, port_mmio + EDMA_CFG_OFS);
 693
 694         writel((pp->crqb_dma >> 16) >> 16, port_mmio + EDMA_REQ_Q_BASE_HI_OFS);
 695         writelfl(pp->crqb_dma & EDMA_REQ_Q_BASE_LO_MASK,
 696                  port_mmio + EDMA_REQ_Q_IN_PTR_OFS);
 697
 698         writelfl(0, port_mmio + EDMA_REQ_Q_OUT_PTR_OFS);
 699         writelfl(0, port_mmio + EDMA_RSP_Q_IN_PTR_OFS);
 700
 701         writel((pp->crpb_dma >> 16) >> 16, port_mmio + EDMA_RSP_Q_BASE_HI_OFS);
 702         writelfl(pp->crpb_dma & EDMA_RSP_Q_BASE_LO_MASK,
 703                  port_mmio + EDMA_RSP_Q_OUT_PTR_OFS);
 704
 705         pp->req_producer = pp->rsp_consumer = 0;
 706
 707         /* Don't turn on EDMA here...do it before DMA commands only.  Else
 708          * we'll be unable to send non-data, PIO, etc due to restricted access
 709          * to shadow regs.
 710          */
 711         ap->private_data = pp;
 712         return 0;
 713 }
 714
 715 static void mv_port_stop(struct ata_port *ap)
 716 {
 717         struct device *dev = ap->host_set->dev;
 718         struct mv_port_priv *pp = ap->private_data;
 719
 720         mv_stop_dma(ap);
 721
 722         ap->private_data = NULL;
 723         dma_free_coherent(dev, MV_PORT_PRIV_DMA_SZ, pp->crpb, pp->crpb_dma);
 724         kfree(pp);
 725 }
 726
 727 static void mv_fill_sg(struct ata_queued_cmd *qc)
 728 {
 729         struct mv_port_priv *pp = qc->ap->private_data;
 730         unsigned int i;
 731
 732         for (i = 0; i < qc->n_elem; i++) {
 733                 u32 sg_len;
 734                 dma_addr_t addr;
 735
 736                 addr = sg_dma_address(&qc->sg[i]);
 737                 sg_len = sg_dma_len(&qc->sg[i]);
 738
 739                 pp->sg_tbl[i].addr = cpu_to_le32(addr & 0xffffffff);
 740                 pp->sg_tbl[i].addr_hi = cpu_to_le32((addr >> 16) >> 16);
 741                 assert(0 == (sg_len & ~MV_DMA_BOUNDARY));
 742                 pp->sg_tbl[i].flags_size = cpu_to_le32(sg_len);
 743         }
 744         if (0 < qc->n_elem) {
 745                 pp->sg_tbl[qc->n_elem - 1].flags_size |= EPRD_FLAG_END_OF_TBL;
 746         }
 747 }
 748
 749 static inline unsigned mv_inc_q_index(unsigned *index)
 750 {
 751         *index = (*index + 1) & MV_MAX_Q_DEPTH_MASK;
 752         return *index;
 753 }
 754
 755 static inline void mv_crqb_pack_cmd(u16 *cmdw, u8 data, u8 addr, unsigned last)
 756 {
 757         *cmdw = data | (addr << CRQB_CMD_ADDR_SHIFT) | CRQB_CMD_CS |
 758                 (last ? CRQB_CMD_LAST : 0);
 759 }
 760
 761 static void mv_qc_prep(struct ata_queued_cmd *qc)
 762 {
 763         struct ata_port *ap = qc->ap;
 764         struct mv_port_priv *pp = ap->private_data;
 765         u16 *cw;
 766         struct ata_taskfile *tf;
 767         u16 flags = 0;
 768
 769         if (ATA_PROT_DMA != qc->tf.protocol) {
 770                 return;
 771         }
 772
 773         /* the req producer index should be the same as we remember it */
 774         assert(((readl(mv_ap_base(qc->ap) + EDMA_REQ_Q_IN_PTR_OFS) >>
 775                  EDMA_REQ_Q_PTR_SHIFT) & MV_MAX_Q_DEPTH_MASK) ==
 776                pp->req_producer);
 777
 778         /* Fill in command request block
 779          */
 780         if (!(qc->tf.flags & ATA_TFLAG_WRITE)) {
 781                 flags |= CRQB_FLAG_READ;
 782         }
 783         assert(MV_MAX_Q_DEPTH > qc->tag);
 784         flags |= qc->tag << CRQB_TAG_SHIFT;
 785
 786         pp->crqb[pp->req_producer].sg_addr =
 787                 cpu_to_le32(pp->sg_tbl_dma & 0xffffffff);
 788         pp->crqb[pp->req_producer].sg_addr_hi =
 789                 cpu_to_le32((pp->sg_tbl_dma >> 16) >> 16);
 790         pp->crqb[pp->req_producer].ctrl_flags = cpu_to_le16(flags);
 791
 792         cw = &pp->crqb[pp->req_producer].ata_cmd[0];
 793         tf = &qc->tf;
 794
 795         /* Sadly, the CRQB cannot accomodate all registers--there are
 796          * only 11 bytes...so we must pick and choose required
 797          * registers based on the command.  So, we drop feature and
 798          * hob_feature for [RW] DMA commands, but they are needed for
 799          * NCQ.  NCQ will drop hob_nsect.
 800          */
 801         switch (tf->command) {
 802         case ATA_CMD_READ:
 803         case ATA_CMD_READ_EXT:
 804         case ATA_CMD_WRITE:
 805         case ATA_CMD_WRITE_EXT:
 806                 mv_crqb_pack_cmd(cw++, tf->hob_nsect, ATA_REG_NSECT, 0);
 807                 break;
 808 #ifdef LIBATA_NCQ               /* FIXME: remove this line when NCQ added */
 809         case ATA_CMD_FPDMA_READ:
 810         case ATA_CMD_FPDMA_WRITE:
 811                 mv_crqb_pack_cmd(cw++, tf->hob_feature, ATA_REG_FEATURE, 0);
 812                 mv_crqb_pack_cmd(cw++, tf->feature, ATA_REG_FEATURE, 0);
 813                 break;
 814 #endif                          /* FIXME: remove this line when NCQ added */
 815         default:
 816                 /* The only other commands EDMA supports in non-queued and
 817                  * non-NCQ mode are: [RW] STREAM DMA and W DMA FUA EXT, none
 818                  * of which are defined/used by Linux.  If we get here, this
 819                  * driver needs work.
 820                  *
 821                  * FIXME: modify libata to give qc_prep a return value and
 822                  * return error here.
 823                  */
 824                 BUG_ON(tf->command);
 825                 break;
 826         }
 827         mv_crqb_pack_cmd(cw++, tf->nsect, ATA_REG_NSECT, 0);
 828         mv_crqb_pack_cmd(cw++, tf->hob_lbal, ATA_REG_LBAL, 0);
 829         mv_crqb_pack_cmd(cw++, tf->lbal, ATA_REG_LBAL, 0);
 830         mv_crqb_pack_cmd(cw++, tf->hob_lbam, ATA_REG_LBAM, 0);
 831         mv_crqb_pack_cmd(cw++, tf->lbam, ATA_REG_LBAM, 0);
 832         mv_crqb_pack_cmd(cw++, tf->hob_lbah, ATA_REG_LBAH, 0);
 833         mv_crqb_pack_cmd(cw++, tf->lbah, ATA_REG_LBAH, 0);
 834         mv_crqb_pack_cmd(cw++, tf->device, ATA_REG_DEVICE, 0);
 835         mv_crqb_pack_cmd(cw++, tf->command, ATA_REG_CMD, 1);    /* last */
 836
 837         if (!(qc->flags & ATA_QCFLAG_DMAMAP)) {
 838                 return;
 839         }
 840         mv_fill_sg(qc);
 841 }
 842
 843 static int mv_qc_issue(struct ata_queued_cmd *qc)
 844 {
 845         void __iomem *port_mmio = mv_ap_base(qc->ap);
 846         struct mv_port_priv *pp = qc->ap->private_data;
 847         u32 in_ptr;
 848
 849         if (ATA_PROT_DMA != qc->tf.protocol) {
 850                 /* We're about to send a non-EDMA capable command to the
 851                  * port.  Turn off EDMA so there won't be problems accessing
 852                  * shadow block, etc registers.
 853                  */
 854                 mv_stop_dma(qc->ap);
 855                 return ata_qc_issue_prot(qc);
 856         }
 857
 858         in_ptr = readl(port_mmio + EDMA_REQ_Q_IN_PTR_OFS);
 859
 860         /* the req producer index should be the same as we remember it */
 861         assert(((in_ptr >> EDMA_REQ_Q_PTR_SHIFT) & MV_MAX_Q_DEPTH_MASK) ==
 862                pp->req_producer);
 863         /* until we do queuing, the queue should be empty at this point */
 864         assert(((in_ptr >> EDMA_REQ_Q_PTR_SHIFT) & MV_MAX_Q_DEPTH_MASK) ==
 865                ((readl(port_mmio + EDMA_REQ_Q_OUT_PTR_OFS) >>
 866                  EDMA_REQ_Q_PTR_SHIFT) & MV_MAX_Q_DEPTH_MASK));
 867
 868         mv_inc_q_index(&pp->req_producer);      /* now incr producer index */
 869
 870         if (!(MV_PP_FLAG_EDMA_EN & pp->pp_flags)) {
 871                 /* turn on EDMA if not already on */
 872                 mv_start_dma(port_mmio, pp, qc->ap);
 873         }
 874         assert(EDMA_EN & readl(port_mmio + EDMA_CMD_OFS));
 875
 876         /* and write the request in pointer to kick the EDMA to life */
 877         in_ptr &= EDMA_REQ_Q_BASE_LO_MASK;
 878         in_ptr |= pp->req_producer << EDMA_REQ_Q_PTR_SHIFT;
 879         writelfl(in_ptr, port_mmio + EDMA_REQ_Q_IN_PTR_OFS);
 880
 881         return 0;
 882 }
 883
 884 static u8 mv_get_crpb_status(struct ata_port *ap)
 885 {
 886         void __iomem *port_mmio = mv_ap_base(ap);
 887         struct mv_port_priv *pp = ap->private_data;
 888         u32 out_ptr;
 889
 890         out_ptr = readl(port_mmio + EDMA_RSP_Q_OUT_PTR_OFS);
 891
 892         /* the response consumer index should be the same as we remember it */
 893         assert(((out_ptr >> EDMA_RSP_Q_PTR_SHIFT) & MV_MAX_Q_DEPTH_MASK) ==
 894                pp->rsp_consumer);
 895
 896         /* increment our consumer index... */
 897         pp->rsp_consumer = mv_inc_q_index(&pp->rsp_consumer);
 898
 899         /* and, until we do NCQ, there should only be 1 CRPB waiting */
 900         assert(((readl(port_mmio + EDMA_RSP_Q_IN_PTR_OFS) >>
 901                  EDMA_RSP_Q_PTR_SHIFT) & MV_MAX_Q_DEPTH_MASK) ==
 902                pp->rsp_consumer);
 903
 904         /* write out our inc'd consumer index so EDMA knows we're caught up */
 905         out_ptr &= EDMA_RSP_Q_BASE_LO_MASK;
 906         out_ptr |= pp->rsp_consumer << EDMA_RSP_Q_PTR_SHIFT;
 907         writelfl(out_ptr, port_mmio + EDMA_RSP_Q_OUT_PTR_OFS);
 908
 909         /* Return ATA status register for completed CRPB */
 910         return (pp->crpb[pp->rsp_consumer].flags >> CRPB_FLAG_STATUS_SHIFT);
 911 }
 912
 913 static void mv_err_intr(struct ata_port *ap)
 914 {
 915         void __iomem *port_mmio = mv_ap_base(ap);
 916         u32 edma_err_cause, serr = 0;
 917
 918         edma_err_cause = readl(port_mmio + EDMA_ERR_IRQ_CAUSE_OFS);
 919
 920         if (EDMA_ERR_SERR & edma_err_cause) {
 921                 serr = scr_read(ap, SCR_ERROR);
 922                 scr_write_flush(ap, SCR_ERROR, serr);
 923         }
 924         DPRINTK("port %u error; EDMA err cause: 0x%08x SERR: 0x%08x\n",
 925                 ap->port_no, edma_err_cause, serr);
 926
 927         /* Clear EDMA now that SERR cleanup done */
 928         writelfl(0, port_mmio + EDMA_ERR_IRQ_CAUSE_OFS);
 929
 930         /* check for fatal here and recover if needed */
 931         if (EDMA_ERR_FATAL & edma_err_cause) {
 932                 mv_phy_reset(ap);
 933         }
 934 }
 935
 936 /* Handle any outstanding interrupts in a single SATAHC */
 937 static void mv_host_intr(struct ata_host_set *host_set, u32 relevant,
 938                          unsigned int hc)
 939 {
 940         void __iomem *mmio = host_set->mmio_base;
 941         void __iomem *hc_mmio = mv_hc_base(mmio, hc);
 942         struct ata_port *ap;
 943         struct ata_queued_cmd *qc;
 944         u32 hc_irq_cause;
 945         int shift, port, port0, hard_port, handled;
 946         u8 ata_status = 0;
 947
 948         if (hc == 0) {
 949                 port0 = 0;
 950         } else {
 951                 port0 = MV_PORTS_PER_HC;
 952         }
 953
 954         /* we'll need the HC success int register in most cases */
 955         hc_irq_cause = readl(hc_mmio + HC_IRQ_CAUSE_OFS);
 956         if (hc_irq_cause) {
 957                 writelfl(~hc_irq_cause, hc_mmio + HC_IRQ_CAUSE_OFS);
 958         }
 959
 960         VPRINTK("ENTER, hc%u relevant=0x%08x HC IRQ cause=0x%08x\n",
 961                 hc,relevant,hc_irq_cause);
 962
 963         for (port = port0; port < port0 + MV_PORTS_PER_HC; port++) {
 964                 ap = host_set->ports[port];
 965                 hard_port = port & MV_PORT_MASK;        /* range 0-3 */
 966                 handled = 0;    /* ensure ata_status is set if handled++ */
 967
 968                 if ((CRPB_DMA_DONE << hard_port) & hc_irq_cause) {
 969                         /* new CRPB on the queue; just one at a time until NCQ
 970                          */
 971                         ata_status = mv_get_crpb_status(ap);
 972                         handled++;
 973                 } else if ((DEV_IRQ << hard_port) & hc_irq_cause) {
 974                         /* received ATA IRQ; read the status reg to clear INTRQ
 975                          */
 976                         ata_status = readb((void __iomem *)
 977                                            ap->ioaddr.status_addr);
 978                         handled++;
 979                 }
 980
 981                 shift = port << 1;              /* (port * 2) */
 982                 if (port >= MV_PORTS_PER_HC) {
 983                         shift++;        /* skip bit 8 in the HC Main IRQ reg */
 984                 }
 985                 if ((PORT0_ERR << shift) & relevant) {
 986                         mv_err_intr(ap);
 987                         /* OR in ATA_ERR to ensure libata knows we took one */
 988                         ata_status = readb((void __iomem *)
 989                                            ap->ioaddr.status_addr) | ATA_ERR;
 990                         handled++;
 991                 }
 992
 993                 if (handled && ap) {
 994                         qc = ata_qc_from_tag(ap, ap->active_tag);
 995                         if (NULL != qc) {
 996                                 VPRINTK("port %u IRQ found for qc, "
 997                                         "ata_status 0x%x\n", port,ata_status);
 998                                 /* mark qc status appropriately */
 999                                 ata_qc_complete(qc, ata_status);
1000                         }
1001                 }
1002         }
1003         VPRINTK("EXIT\n");
1004 }
1005
1006 static irqreturn_t mv_interrupt(int irq, void *dev_instance,
1007                                 struct pt_regs *regs)
1008 {
1009         struct ata_host_set *host_set = dev_instance;
1010         unsigned int hc, handled = 0, n_hcs;
1011         void __iomem *mmio = host_set->mmio_base;
1012         u32 irq_stat;
1013
1014         irq_stat = readl(mmio + HC_MAIN_IRQ_CAUSE_OFS);
1015
1016         /* check the cases where we either have nothing pending or have read
1017          * a bogus register value which can indicate HW removal or PCI fault
1018          */
1019         if (!irq_stat || (0xffffffffU == irq_stat)) {
1020                 return IRQ_NONE;
1021         }
1022
1023         n_hcs = mv_get_hc_count(host_set->ports[0]->flags);
1024         spin_lock(&host_set->lock);
1025
1026         for (hc = 0; hc < n_hcs; hc++) {
1027                 u32 relevant = irq_stat & (HC0_IRQ_PEND << (hc * HC_SHIFT));
1028                 if (relevant) {
1029                         mv_host_intr(host_set, relevant, hc);
1030                         handled++;
1031                 }
1032         }
1033         if (PCI_ERR & irq_stat) {
1034                 printk(KERN_ERR DRV_NAME ": PCI ERROR; PCI IRQ cause=0x%08x\n",
1035                        readl(mmio + PCI_IRQ_CAUSE_OFS));
1036
1037                 VPRINTK("All regs @ PCI error\n");
1038                 mv_dump_all_regs(mmio, -1, to_pci_dev(host_set->dev));
1039
1040                 writelfl(0, mmio + PCI_IRQ_CAUSE_OFS);
1041                 handled++;
1042         }
1043         spin_unlock(&host_set->lock);
1044
1045         return IRQ_RETVAL(handled);
1046 }
1047
1048 static u8 mv_check_err(struct ata_port *ap)
1049 {
1050         mv_stop_dma(ap);                /* can't read shadow regs if DMA on */
1051         return readb((void __iomem *) ap->ioaddr.error_addr);
1052 }
1053
1054 /* Part of this is taken from __sata_phy_reset and modified to not sleep
1055  * since this routine gets called from interrupt level.
1056  */
1057 static void mv_phy_reset(struct ata_port *ap)
1058 {
1059         void __iomem *port_mmio = mv_ap_base(ap);
1060         struct ata_taskfile tf;
1061         struct ata_device *dev = &ap->device[0];
1062         unsigned long timeout;
1063
1064         VPRINTK("ENTER, port %u, mmio 0x%p\n", ap->port_no, port_mmio);
1065
1066         mv_stop_dma(ap);
1067
1068         writelfl(ATA_RST, port_mmio + EDMA_CMD_OFS);
1069         udelay(25);             /* allow reset propagation */
1070
1071         /* Spec never mentions clearing the bit.  Marvell's driver does
1072          * clear the bit, however.
1073          */
1074         writelfl(0, port_mmio + EDMA_CMD_OFS);
1075
1076         VPRINTK("S-regs after ATA_RST: SStat 0x%08x SErr 0x%08x "
1077                 "SCtrl 0x%08x\n", mv_scr_read(ap, SCR_STATUS),
1078                 mv_scr_read(ap, SCR_ERROR), mv_scr_read(ap, SCR_CONTROL));
1079
1080         /* proceed to init communications via the scr_control reg */
1081         scr_write_flush(ap, SCR_CONTROL, 0x301);
1082         mdelay(1);
1083         scr_write_flush(ap, SCR_CONTROL, 0x300);
1084         timeout = jiffies + (HZ * 1);
1085         do {
1086                 mdelay(10);
1087                 if ((scr_read(ap, SCR_STATUS) & 0xf) != 1)
1088                         break;
1089         } while (time_before(jiffies, timeout));
1090
1091         VPRINTK("S-regs after PHY wake: SStat 0x%08x SErr 0x%08x "
1092                 "SCtrl 0x%08x\n", mv_scr_read(ap, SCR_STATUS),
1093                 mv_scr_read(ap, SCR_ERROR), mv_scr_read(ap, SCR_CONTROL));
1094
1095         if (sata_dev_present(ap)) {
1096                 ata_port_probe(ap);
1097         } else {
1098                 printk(KERN_INFO "ata%u: no device found (phy stat %08x)\n",
1099                        ap->id, scr_read(ap, SCR_STATUS));
1100                 ata_port_disable(ap);
1101                 return;
1102         }
1103         ap->cbl = ATA_CBL_SATA;
1104
1105         tf.lbah = readb((void __iomem *) ap->ioaddr.lbah_addr);
1106         tf.lbam = readb((void __iomem *) ap->ioaddr.lbam_addr);
1107         tf.lbal = readb((void __iomem *) ap->ioaddr.lbal_addr);
1108         tf.nsect = readb((void __iomem *) ap->ioaddr.nsect_addr);
1109
1110         dev->class = ata_dev_classify(&tf);
1111         if (!ata_dev_present(dev)) {
1112                 VPRINTK("Port disabled post-sig: No device present.\n");
1113                 ata_port_disable(ap);
1114         }
1115         VPRINTK("EXIT\n");
1116 }
1117
1118 static void mv_eng_timeout(struct ata_port *ap)
1119 {
1120         struct ata_queued_cmd *qc;
1121         unsigned long flags;
1122
1123         printk(KERN_ERR "ata%u: Entering mv_eng_timeout\n",ap->id);
1124         DPRINTK("All regs @ start of eng_timeout\n");
1125         mv_dump_all_regs(ap->host_set->mmio_base, ap->port_no,
1126                          to_pci_dev(ap->host_set->dev));
1127
1128         qc = ata_qc_from_tag(ap, ap->active_tag);
1129         printk(KERN_ERR "mmio_base %p ap %p qc %p scsi_cmnd %p &cmnd %p\n",
1130                ap->host_set->mmio_base, ap, qc, qc->scsicmd,
1131                &qc->scsicmd->cmnd);
1132
1133         mv_err_intr(ap);
1134         mv_phy_reset(ap);
1135
1136         if (!qc) {
1137                 printk(KERN_ERR "ata%u: BUG: timeout without command\n",
1138                        ap->id);
1139         } else {
1140                 /* hack alert!  We cannot use the supplied completion
1141                  * function from inside the ->eh_strategy_handler() thread.
1142                  * libata is the only user of ->eh_strategy_handler() in
1143                  * any kernel, so the default scsi_done() assumes it is
1144                  * not being called from the SCSI EH.
1145                  */
1146                 spin_lock_irqsave(&ap->host_set->lock, flags);
1147                 qc->scsidone = scsi_finish_command;
1148                 ata_qc_complete(qc, ATA_ERR);
1149                 spin_unlock_irqrestore(&ap->host_set->lock, flags);
1150         }
1151 }
1152
1153 static void mv_port_init(struct ata_ioports *port,  void __iomem *port_mmio)
1154 {
1155         unsigned long shd_base = (unsigned long) port_mmio + SHD_BLK_OFS;
1156         unsigned serr_ofs;
1157
1158         /* PIO related setup
1159          */
1160         port->data_addr = shd_base + (sizeof(u32) * ATA_REG_DATA);
1161         port->error_addr =
1162                 port->feature_addr = shd_base + (sizeof(u32) * ATA_REG_ERR);
1163         port->nsect_addr = shd_base + (sizeof(u32) * ATA_REG_NSECT);
1164         port->lbal_addr = shd_base + (sizeof(u32) * ATA_REG_LBAL);
1165         port->lbam_addr = shd_base + (sizeof(u32) * ATA_REG_LBAM);
1166         port->lbah_addr = shd_base + (sizeof(u32) * ATA_REG_LBAH);
1167         port->device_addr = shd_base + (sizeof(u32) * ATA_REG_DEVICE);
1168         port->status_addr =
1169                 port->command_addr = shd_base + (sizeof(u32) * ATA_REG_STATUS);
1170         /* special case: control/altstatus doesn't have ATA_REG_ address */
1171         port->altstatus_addr = port->ctl_addr = shd_base + SHD_CTL_AST_OFS;
1172
1173         /* unused: */
1174         port->cmd_addr = port->bmdma_addr = port->scr_addr = 0;
1175
1176         /* Clear any currently outstanding port interrupt conditions */
1177         serr_ofs = mv_scr_offset(SCR_ERROR);
1178         writelfl(readl(port_mmio + serr_ofs), port_mmio + serr_ofs);
1179         writelfl(0, port_mmio + EDMA_ERR_IRQ_CAUSE_OFS);
1180
1181         /* unmask all EDMA error interrupts */
1182         writelfl(~0, port_mmio + EDMA_ERR_IRQ_MASK_OFS);
1183
1184         VPRINTK("EDMA cfg=0x%08x EDMA IRQ err cause/mask=0x%08x/0x%08x\n",
1185                 readl(port_mmio + EDMA_CFG_OFS),
1186                 readl(port_mmio + EDMA_ERR_IRQ_CAUSE_OFS),
1187                 readl(port_mmio + EDMA_ERR_IRQ_MASK_OFS));
1188 }
1189
1190 static int mv_host_init(struct ata_probe_ent *probe_ent)
1191 {
1192         int rc = 0, n_hc, port, hc;
1193         void __iomem *mmio = probe_ent->mmio_base;
1194         void __iomem *port_mmio;
1195
1196         if ((MV_FLAG_GLBL_SFT_RST & probe_ent->host_flags) &&
1197             mv_global_soft_reset(probe_ent->mmio_base)) {
1198                 rc = 1;
1199                 goto done;
1200         }
1201
1202         n_hc = mv_get_hc_count(probe_ent->host_flags);
1203         probe_ent->n_ports = MV_PORTS_PER_HC * n_hc;
1204
1205         for (port = 0; port < probe_ent->n_ports; port++) {
1206                 port_mmio = mv_port_base(mmio, port);
1207                 mv_port_init(&probe_ent->port[port], port_mmio);
1208         }
1209
1210         for (hc = 0; hc < n_hc; hc++) {
1211                 void __iomem *hc_mmio = mv_hc_base(mmio, hc);
1212
1213                 VPRINTK("HC%i: HC config=0x%08x HC IRQ cause "
1214                         "(before clear)=0x%08x\n", hc,
1215                         readl(hc_mmio + HC_CFG_OFS),
1216                         readl(hc_mmio + HC_IRQ_CAUSE_OFS));
1217
1218                 /* Clear any currently outstanding hc interrupt conditions */
1219                 writelfl(0, hc_mmio + HC_IRQ_CAUSE_OFS);
1220         }
1221
1222         /* Clear any currently outstanding host interrupt conditions */
1223         writelfl(0, mmio + PCI_IRQ_CAUSE_OFS);
1224
1225         /* and unmask interrupt generation for host regs */
1226         writelfl(PCI_UNMASK_ALL_IRQS, mmio + PCI_IRQ_MASK_OFS);
1227         writelfl(~HC_MAIN_MASKED_IRQS, mmio + HC_MAIN_IRQ_MASK_OFS);
1228
1229         VPRINTK("HC MAIN IRQ cause/mask=0x%08x/0x%08x "
1230                 "PCI int cause/mask=0x%08x/0x%08x\n",
1231                 readl(mmio + HC_MAIN_IRQ_CAUSE_OFS),
1232                 readl(mmio + HC_MAIN_IRQ_MASK_OFS),
1233                 readl(mmio + PCI_IRQ_CAUSE_OFS),
1234                 readl(mmio + PCI_IRQ_MASK_OFS));
1235 done:
1236         return rc;
1237 }
1238
1239 /* FIXME: complete this */
1240 static void mv_print_info(struct ata_probe_ent *probe_ent)
1241 {
1242         struct pci_dev *pdev = to_pci_dev(probe_ent->dev);
1243         struct mv_host_priv *hpriv = probe_ent->private_data;
1244         u8 rev_id, scc;
1245         const char *scc_s;
1246
1247         /* Use this to determine the HW stepping of the chip so we know
1248          * what errata to workaround
1249          */
1250         pci_read_config_byte(pdev, PCI_REVISION_ID, &rev_id);
1251
1252         pci_read_config_byte(pdev, PCI_CLASS_DEVICE, &scc);
1253         if (scc == 0)
1254                 scc_s = "SCSI";
1255         else if (scc == 0x01)
1256                 scc_s = "RAID";
1257         else
1258                 scc_s = "unknown";
1259
1260         printk(KERN_INFO DRV_NAME
1261                "(%s) %u slots %u ports %s mode IRQ via %s\n",
1262                pci_name(pdev), (unsigned)MV_MAX_Q_DEPTH, probe_ent->n_ports,
1263                scc_s, (MV_HP_FLAG_MSI & hpriv->hp_flags) ? "MSI" : "INTx");
1264 }
1265
1266 static int mv_init_one(struct pci_dev *pdev, const struct pci_device_id *ent)
1267 {
1268         static int printed_version = 0;
1269         struct ata_probe_ent *probe_ent = NULL;
1270         struct mv_host_priv *hpriv;
1271         unsigned int board_idx = (unsigned int)ent->driver_data;
1272         void __iomem *mmio_base;
1273         int pci_dev_busy = 0, rc;
1274
1275         if (!printed_version++) {
1276                 printk(KERN_INFO DRV_NAME " version " DRV_VERSION "\n");
1277         }
1278
1279         rc = pci_enable_device(pdev);
1280         if (rc) {
1281                 return rc;
1282         }
1283
1284         rc = pci_request_regions(pdev, DRV_NAME);
1285         if (rc) {
1286                 pci_dev_busy = 1;
1287                 goto err_out;
1288         }
1289
1290         probe_ent = kmalloc(sizeof(*probe_ent), GFP_KERNEL);
1291         if (probe_ent == NULL) {
1292                 rc = -ENOMEM;
1293                 goto err_out_regions;
1294         }
1295
1296         memset(probe_ent, 0, sizeof(*probe_ent));
1297         probe_ent->dev = pci_dev_to_dev(pdev);
1298         INIT_LIST_HEAD(&probe_ent->node);
1299
1300         mmio_base = pci_iomap(pdev, MV_PRIMARY_BAR, 0);
1301         if (mmio_base == NULL) {
1302                 rc = -ENOMEM;
1303                 goto err_out_free_ent;
1304         }
1305
1306         hpriv = kmalloc(sizeof(*hpriv), GFP_KERNEL);
1307         if (!hpriv) {
1308                 rc = -ENOMEM;
1309                 goto err_out_iounmap;
1310         }
1311         memset(hpriv, 0, sizeof(*hpriv));
1312
1313         probe_ent->sht = mv_port_info[board_idx].sht;
1314         probe_ent->host_flags = mv_port_info[board_idx].host_flags;
1315         probe_ent->pio_mask = mv_port_info[board_idx].pio_mask;
1316         probe_ent->udma_mask = mv_port_info[board_idx].udma_mask;
1317         probe_ent->port_ops = mv_port_info[board_idx].port_ops;
1318
1319         probe_ent->irq = pdev->irq;
1320         probe_ent->irq_flags = SA_SHIRQ;
1321         probe_ent->mmio_base = mmio_base;
1322         probe_ent->private_data = hpriv;
1323
1324         /* initialize adapter */
1325         rc = mv_host_init(probe_ent);
1326         if (rc) {
1327                 goto err_out_hpriv;
1328         }
1329
1330         /* Enable interrupts */
1331         if (pci_enable_msi(pdev) == 0) {
1332                 hpriv->hp_flags |= MV_HP_FLAG_MSI;
1333         } else {
1334                 pci_intx(pdev, 1);
1335         }
1336
1337         mv_dump_pci_cfg(pdev, 0x68);
1338         mv_print_info(probe_ent);
1339
1340         if (ata_device_add(probe_ent) == 0) {
1341                 rc = -ENODEV;           /* No devices discovered */
1342                 goto err_out_dev_add;
1343         }
1344
1345         kfree(probe_ent);
1346         return 0;
1347
1348 err_out_dev_add:
1349         if (MV_HP_FLAG_MSI & hpriv->hp_flags) {
1350                 pci_disable_msi(pdev);
1351         } else {
1352                 pci_intx(pdev, 0);
1353         }
1354 err_out_hpriv:
1355         kfree(hpriv);
1356 err_out_iounmap:
1357         pci_iounmap(pdev, mmio_base);
1358 err_out_free_ent:
1359         kfree(probe_ent);
1360 err_out_regions:
1361         pci_release_regions(pdev);
1362 err_out:
1363         if (!pci_dev_busy) {
1364                 pci_disable_device(pdev);
1365         }
1366
1367         return rc;
1368 }
1369
1370 static int __init mv_init(void)
1371 {
1372         return pci_module_init(&mv_pci_driver);
1373 }
1374
1375 static void __exit mv_exit(void)
1376 {
1377         pci_unregister_driver(&mv_pci_driver);
1378 }
1379
1380 MODULE_AUTHOR("Brett Russ");
1381 MODULE_DESCRIPTION("SCSI low-level driver for Marvell SATA controllers");
1382 MODULE_LICENSE("GPL");
1383 MODULE_DEVICE_TABLE(pci, mv_pci_tbl);
1384 MODULE_VERSION(DRV_VERSION);
1385
1386 module_init(mv_init);
1387 module_exit(mv_exit);