Linux Audio

Check our new training course

Loading...
v5.9
   1// SPDX-License-Identifier: GPL-2.0-or-later
   2/*
   3 *  sata_sx4.c - Promise SATA
   4 *
   5 *  Maintained by:  Tejun Heo <tj@kernel.org>
   6 *  		    Please ALWAYS copy linux-ide@vger.kernel.org
   7 *		    on emails.
   8 *
   9 *  Copyright 2003-2004 Red Hat, Inc.
  10 *
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
  11 *  libata documentation is available via 'make {ps|pdf}docs',
  12 *  as Documentation/driver-api/libata.rst
  13 *
  14 *  Hardware documentation available under NDA.
 
  15 */
  16
  17/*
  18	Theory of operation
  19	-------------------
  20
  21	The SX4 (PDC20621) chip features a single Host DMA (HDMA) copy
  22	engine, DIMM memory, and four ATA engines (one per SATA port).
  23	Data is copied to/from DIMM memory by the HDMA engine, before
  24	handing off to one (or more) of the ATA engines.  The ATA
  25	engines operate solely on DIMM memory.
  26
  27	The SX4 behaves like a PATA chip, with no SATA controls or
  28	knowledge whatsoever, leading to the presumption that
  29	PATA<->SATA bridges exist on SX4 boards, external to the
  30	PDC20621 chip itself.
  31
  32	The chip is quite capable, supporting an XOR engine and linked
  33	hardware commands (permits a string to transactions to be
  34	submitted and waited-on as a single unit), and an optional
  35	microprocessor.
  36
  37	The limiting factor is largely software.  This Linux driver was
  38	written to multiplex the single HDMA engine to copy disk
  39	transactions into a fixed DIMM memory space, from where an ATA
  40	engine takes over.  As a result, each WRITE looks like this:
  41
  42		submit HDMA packet to hardware
  43		hardware copies data from system memory to DIMM
  44		hardware raises interrupt
  45
  46		submit ATA packet to hardware
  47		hardware executes ATA WRITE command, w/ data in DIMM
  48		hardware raises interrupt
  49
  50	and each READ looks like this:
  51
  52		submit ATA packet to hardware
  53		hardware executes ATA READ command, w/ data in DIMM
  54		hardware raises interrupt
  55
  56		submit HDMA packet to hardware
  57		hardware copies data from DIMM to system memory
  58		hardware raises interrupt
  59
  60	This is a very slow, lock-step way of doing things that can
  61	certainly be improved by motivated kernel hackers.
  62
  63 */
  64
  65#include <linux/kernel.h>
  66#include <linux/module.h>
  67#include <linux/pci.h>
  68#include <linux/slab.h>
  69#include <linux/blkdev.h>
  70#include <linux/delay.h>
  71#include <linux/interrupt.h>
  72#include <linux/device.h>
  73#include <scsi/scsi_host.h>
  74#include <scsi/scsi_cmnd.h>
  75#include <linux/libata.h>
  76#include "sata_promise.h"
  77
  78#define DRV_NAME	"sata_sx4"
  79#define DRV_VERSION	"0.12"
  80
  81
  82enum {
  83	PDC_MMIO_BAR		= 3,
  84	PDC_DIMM_BAR		= 4,
  85
  86	PDC_PRD_TBL		= 0x44,	/* Direct command DMA table addr */
  87
  88	PDC_PKT_SUBMIT		= 0x40, /* Command packet pointer addr */
  89	PDC_HDMA_PKT_SUBMIT	= 0x100, /* Host DMA packet pointer addr */
  90	PDC_INT_SEQMASK		= 0x40,	/* Mask of asserted SEQ INTs */
  91	PDC_HDMA_CTLSTAT	= 0x12C, /* Host DMA control / status */
  92
  93	PDC_CTLSTAT		= 0x60,	/* IDEn control / status */
  94
  95	PDC_20621_SEQCTL	= 0x400,
  96	PDC_20621_SEQMASK	= 0x480,
  97	PDC_20621_GENERAL_CTL	= 0x484,
  98	PDC_20621_PAGE_SIZE	= (32 * 1024),
  99
 100	/* chosen, not constant, values; we design our own DIMM mem map */
 101	PDC_20621_DIMM_WINDOW	= 0x0C,	/* page# for 32K DIMM window */
 102	PDC_20621_DIMM_BASE	= 0x00200000,
 103	PDC_20621_DIMM_DATA	= (64 * 1024),
 104	PDC_DIMM_DATA_STEP	= (256 * 1024),
 105	PDC_DIMM_WINDOW_STEP	= (8 * 1024),
 106	PDC_DIMM_HOST_PRD	= (6 * 1024),
 107	PDC_DIMM_HOST_PKT	= (128 * 0),
 108	PDC_DIMM_HPKT_PRD	= (128 * 1),
 109	PDC_DIMM_ATA_PKT	= (128 * 2),
 110	PDC_DIMM_APKT_PRD	= (128 * 3),
 111	PDC_DIMM_HEADER_SZ	= PDC_DIMM_APKT_PRD + 128,
 112	PDC_PAGE_WINDOW		= 0x40,
 113	PDC_PAGE_DATA		= PDC_PAGE_WINDOW +
 114				  (PDC_20621_DIMM_DATA / PDC_20621_PAGE_SIZE),
 115	PDC_PAGE_SET		= PDC_DIMM_DATA_STEP / PDC_20621_PAGE_SIZE,
 116
 117	PDC_CHIP0_OFS		= 0xC0000, /* offset of chip #0 */
 118
 119	PDC_20621_ERR_MASK	= (1<<19) | (1<<20) | (1<<21) | (1<<22) |
 120				  (1<<23),
 121
 122	board_20621		= 0,	/* FastTrak S150 SX4 */
 123
 124	PDC_MASK_INT		= (1 << 10), /* HDMA/ATA mask int */
 125	PDC_RESET		= (1 << 11), /* HDMA/ATA reset */
 126	PDC_DMA_ENABLE		= (1 << 7),  /* DMA start/stop */
 127
 128	PDC_MAX_HDMA		= 32,
 129	PDC_HDMA_Q_MASK		= (PDC_MAX_HDMA - 1),
 130
 131	PDC_DIMM0_SPD_DEV_ADDRESS	= 0x50,
 132	PDC_DIMM1_SPD_DEV_ADDRESS	= 0x51,
 133	PDC_I2C_CONTROL			= 0x48,
 134	PDC_I2C_ADDR_DATA		= 0x4C,
 135	PDC_DIMM0_CONTROL		= 0x80,
 136	PDC_DIMM1_CONTROL		= 0x84,
 137	PDC_SDRAM_CONTROL		= 0x88,
 138	PDC_I2C_WRITE			= 0,		/* master -> slave */
 139	PDC_I2C_READ			= (1 << 6),	/* master <- slave */
 140	PDC_I2C_START			= (1 << 7),	/* start I2C proto */
 141	PDC_I2C_MASK_INT		= (1 << 5),	/* mask I2C interrupt */
 142	PDC_I2C_COMPLETE		= (1 << 16),	/* I2C normal compl. */
 143	PDC_I2C_NO_ACK			= (1 << 20),	/* slave no-ack addr */
 144	PDC_DIMM_SPD_SUBADDRESS_START	= 0x00,
 145	PDC_DIMM_SPD_SUBADDRESS_END	= 0x7F,
 146	PDC_DIMM_SPD_ROW_NUM		= 3,
 147	PDC_DIMM_SPD_COLUMN_NUM		= 4,
 148	PDC_DIMM_SPD_MODULE_ROW		= 5,
 149	PDC_DIMM_SPD_TYPE		= 11,
 150	PDC_DIMM_SPD_FRESH_RATE		= 12,
 151	PDC_DIMM_SPD_BANK_NUM		= 17,
 152	PDC_DIMM_SPD_CAS_LATENCY	= 18,
 153	PDC_DIMM_SPD_ATTRIBUTE		= 21,
 154	PDC_DIMM_SPD_ROW_PRE_CHARGE	= 27,
 155	PDC_DIMM_SPD_ROW_ACTIVE_DELAY	= 28,
 156	PDC_DIMM_SPD_RAS_CAS_DELAY	= 29,
 157	PDC_DIMM_SPD_ACTIVE_PRECHARGE	= 30,
 158	PDC_DIMM_SPD_SYSTEM_FREQ	= 126,
 159	PDC_CTL_STATUS			= 0x08,
 160	PDC_DIMM_WINDOW_CTLR		= 0x0C,
 161	PDC_TIME_CONTROL		= 0x3C,
 162	PDC_TIME_PERIOD			= 0x40,
 163	PDC_TIME_COUNTER		= 0x44,
 164	PDC_GENERAL_CTLR		= 0x484,
 165	PCI_PLL_INIT			= 0x8A531824,
 166	PCI_X_TCOUNT			= 0xEE1E5CFF,
 167
 168	/* PDC_TIME_CONTROL bits */
 169	PDC_TIMER_BUZZER		= (1 << 10),
 170	PDC_TIMER_MODE_PERIODIC		= 0,		/* bits 9:8 == 00 */
 171	PDC_TIMER_MODE_ONCE		= (1 << 8),	/* bits 9:8 == 01 */
 172	PDC_TIMER_ENABLE		= (1 << 7),
 173	PDC_TIMER_MASK_INT		= (1 << 5),
 174	PDC_TIMER_SEQ_MASK		= 0x1f,		/* SEQ ID for timer */
 175	PDC_TIMER_DEFAULT		= PDC_TIMER_MODE_ONCE |
 176					  PDC_TIMER_ENABLE |
 177					  PDC_TIMER_MASK_INT,
 178};
 179
 180#define ECC_ERASE_BUF_SZ (128 * 1024)
 181
 182struct pdc_port_priv {
 183	u8			dimm_buf[(ATA_PRD_SZ * ATA_MAX_PRD) + 512];
 184	u8			*pkt;
 185	dma_addr_t		pkt_dma;
 186};
 187
 188struct pdc_host_priv {
 189	unsigned int		doing_hdma;
 190	unsigned int		hdma_prod;
 191	unsigned int		hdma_cons;
 192	struct {
 193		struct ata_queued_cmd *qc;
 194		unsigned int	seq;
 195		unsigned long	pkt_ofs;
 196	} hdma[32];
 197};
 198
 199
 200static int pdc_sata_init_one(struct pci_dev *pdev, const struct pci_device_id *ent);
 201static void pdc_error_handler(struct ata_port *ap);
 202static void pdc_freeze(struct ata_port *ap);
 203static void pdc_thaw(struct ata_port *ap);
 204static int pdc_port_start(struct ata_port *ap);
 205static enum ata_completion_errors pdc20621_qc_prep(struct ata_queued_cmd *qc);
 206static void pdc_tf_load_mmio(struct ata_port *ap, const struct ata_taskfile *tf);
 207static void pdc_exec_command_mmio(struct ata_port *ap, const struct ata_taskfile *tf);
 208static unsigned int pdc20621_dimm_init(struct ata_host *host);
 209static int pdc20621_detect_dimm(struct ata_host *host);
 210static unsigned int pdc20621_i2c_read(struct ata_host *host,
 211				      u32 device, u32 subaddr, u32 *pdata);
 212static int pdc20621_prog_dimm0(struct ata_host *host);
 213static unsigned int pdc20621_prog_dimm_global(struct ata_host *host);
 214#ifdef ATA_VERBOSE_DEBUG
 215static void pdc20621_get_from_dimm(struct ata_host *host,
 216				   void *psource, u32 offset, u32 size);
 217#endif
 218static void pdc20621_put_to_dimm(struct ata_host *host,
 219				 void *psource, u32 offset, u32 size);
 220static void pdc20621_irq_clear(struct ata_port *ap);
 221static unsigned int pdc20621_qc_issue(struct ata_queued_cmd *qc);
 222static int pdc_softreset(struct ata_link *link, unsigned int *class,
 223			 unsigned long deadline);
 224static void pdc_post_internal_cmd(struct ata_queued_cmd *qc);
 225static int pdc_check_atapi_dma(struct ata_queued_cmd *qc);
 226
 227
 228static struct scsi_host_template pdc_sata_sht = {
 229	ATA_BASE_SHT(DRV_NAME),
 230	.sg_tablesize		= LIBATA_MAX_PRD,
 231	.dma_boundary		= ATA_DMA_BOUNDARY,
 232};
 233
 234/* TODO: inherit from base port_ops after converting to new EH */
 235static struct ata_port_operations pdc_20621_ops = {
 236	.inherits		= &ata_sff_port_ops,
 237
 238	.check_atapi_dma	= pdc_check_atapi_dma,
 239	.qc_prep		= pdc20621_qc_prep,
 240	.qc_issue		= pdc20621_qc_issue,
 241
 242	.freeze			= pdc_freeze,
 243	.thaw			= pdc_thaw,
 244	.softreset		= pdc_softreset,
 245	.error_handler		= pdc_error_handler,
 246	.lost_interrupt		= ATA_OP_NULL,
 247	.post_internal_cmd	= pdc_post_internal_cmd,
 248
 249	.port_start		= pdc_port_start,
 250
 251	.sff_tf_load		= pdc_tf_load_mmio,
 252	.sff_exec_command	= pdc_exec_command_mmio,
 253	.sff_irq_clear		= pdc20621_irq_clear,
 254};
 255
 256static const struct ata_port_info pdc_port_info[] = {
 257	/* board_20621 */
 258	{
 259		.flags		= ATA_FLAG_SATA | ATA_FLAG_NO_ATAPI |
 260				  ATA_FLAG_PIO_POLLING,
 261		.pio_mask	= ATA_PIO4,
 262		.mwdma_mask	= ATA_MWDMA2,
 263		.udma_mask	= ATA_UDMA6,
 264		.port_ops	= &pdc_20621_ops,
 265	},
 266
 267};
 268
 269static const struct pci_device_id pdc_sata_pci_tbl[] = {
 270	{ PCI_VDEVICE(PROMISE, 0x6622), board_20621 },
 271
 272	{ }	/* terminate list */
 273};
 274
 275static struct pci_driver pdc_sata_pci_driver = {
 276	.name			= DRV_NAME,
 277	.id_table		= pdc_sata_pci_tbl,
 278	.probe			= pdc_sata_init_one,
 279	.remove			= ata_pci_remove_one,
 280};
 281
 282
 283static int pdc_port_start(struct ata_port *ap)
 284{
 285	struct device *dev = ap->host->dev;
 286	struct pdc_port_priv *pp;
 287
 288	pp = devm_kzalloc(dev, sizeof(*pp), GFP_KERNEL);
 289	if (!pp)
 290		return -ENOMEM;
 291
 292	pp->pkt = dmam_alloc_coherent(dev, 128, &pp->pkt_dma, GFP_KERNEL);
 293	if (!pp->pkt)
 294		return -ENOMEM;
 295
 296	ap->private_data = pp;
 297
 298	return 0;
 299}
 300
 301static inline void pdc20621_ata_sg(u8 *buf, unsigned int portno,
 302				   unsigned int total_len)
 303{
 304	u32 addr;
 305	unsigned int dw = PDC_DIMM_APKT_PRD >> 2;
 306	__le32 *buf32 = (__le32 *) buf;
 307
 308	/* output ATA packet S/G table */
 309	addr = PDC_20621_DIMM_BASE + PDC_20621_DIMM_DATA +
 310	       (PDC_DIMM_DATA_STEP * portno);
 311	VPRINTK("ATA sg addr 0x%x, %d\n", addr, addr);
 312	buf32[dw] = cpu_to_le32(addr);
 313	buf32[dw + 1] = cpu_to_le32(total_len | ATA_PRD_EOT);
 314
 315	VPRINTK("ATA PSG @ %x == (0x%x, 0x%x)\n",
 316		PDC_20621_DIMM_BASE +
 317		       (PDC_DIMM_WINDOW_STEP * portno) +
 318		       PDC_DIMM_APKT_PRD,
 319		buf32[dw], buf32[dw + 1]);
 320}
 321
 322static inline void pdc20621_host_sg(u8 *buf, unsigned int portno,
 323				    unsigned int total_len)
 324{
 325	u32 addr;
 326	unsigned int dw = PDC_DIMM_HPKT_PRD >> 2;
 327	__le32 *buf32 = (__le32 *) buf;
 328
 329	/* output Host DMA packet S/G table */
 330	addr = PDC_20621_DIMM_BASE + PDC_20621_DIMM_DATA +
 331	       (PDC_DIMM_DATA_STEP * portno);
 332
 333	buf32[dw] = cpu_to_le32(addr);
 334	buf32[dw + 1] = cpu_to_le32(total_len | ATA_PRD_EOT);
 335
 336	VPRINTK("HOST PSG @ %x == (0x%x, 0x%x)\n",
 337		PDC_20621_DIMM_BASE +
 338		       (PDC_DIMM_WINDOW_STEP * portno) +
 339		       PDC_DIMM_HPKT_PRD,
 340		buf32[dw], buf32[dw + 1]);
 341}
 342
 343static inline unsigned int pdc20621_ata_pkt(struct ata_taskfile *tf,
 344					    unsigned int devno, u8 *buf,
 345					    unsigned int portno)
 346{
 347	unsigned int i, dw;
 348	__le32 *buf32 = (__le32 *) buf;
 349	u8 dev_reg;
 350
 351	unsigned int dimm_sg = PDC_20621_DIMM_BASE +
 352			       (PDC_DIMM_WINDOW_STEP * portno) +
 353			       PDC_DIMM_APKT_PRD;
 354	VPRINTK("ENTER, dimm_sg == 0x%x, %d\n", dimm_sg, dimm_sg);
 355
 356	i = PDC_DIMM_ATA_PKT;
 357
 358	/*
 359	 * Set up ATA packet
 360	 */
 361	if ((tf->protocol == ATA_PROT_DMA) && (!(tf->flags & ATA_TFLAG_WRITE)))
 362		buf[i++] = PDC_PKT_READ;
 363	else if (tf->protocol == ATA_PROT_NODATA)
 364		buf[i++] = PDC_PKT_NODATA;
 365	else
 366		buf[i++] = 0;
 367	buf[i++] = 0;			/* reserved */
 368	buf[i++] = portno + 1;		/* seq. id */
 369	buf[i++] = 0xff;		/* delay seq. id */
 370
 371	/* dimm dma S/G, and next-pkt */
 372	dw = i >> 2;
 373	if (tf->protocol == ATA_PROT_NODATA)
 374		buf32[dw] = 0;
 375	else
 376		buf32[dw] = cpu_to_le32(dimm_sg);
 377	buf32[dw + 1] = 0;
 378	i += 8;
 379
 380	if (devno == 0)
 381		dev_reg = ATA_DEVICE_OBS;
 382	else
 383		dev_reg = ATA_DEVICE_OBS | ATA_DEV1;
 384
 385	/* select device */
 386	buf[i++] = (1 << 5) | PDC_PKT_CLEAR_BSY | ATA_REG_DEVICE;
 387	buf[i++] = dev_reg;
 388
 389	/* device control register */
 390	buf[i++] = (1 << 5) | PDC_REG_DEVCTL;
 391	buf[i++] = tf->ctl;
 392
 393	return i;
 394}
 395
 396static inline void pdc20621_host_pkt(struct ata_taskfile *tf, u8 *buf,
 397				     unsigned int portno)
 398{
 399	unsigned int dw;
 400	u32 tmp;
 401	__le32 *buf32 = (__le32 *) buf;
 402
 403	unsigned int host_sg = PDC_20621_DIMM_BASE +
 404			       (PDC_DIMM_WINDOW_STEP * portno) +
 405			       PDC_DIMM_HOST_PRD;
 406	unsigned int dimm_sg = PDC_20621_DIMM_BASE +
 407			       (PDC_DIMM_WINDOW_STEP * portno) +
 408			       PDC_DIMM_HPKT_PRD;
 409	VPRINTK("ENTER, dimm_sg == 0x%x, %d\n", dimm_sg, dimm_sg);
 410	VPRINTK("host_sg == 0x%x, %d\n", host_sg, host_sg);
 411
 412	dw = PDC_DIMM_HOST_PKT >> 2;
 413
 414	/*
 415	 * Set up Host DMA packet
 416	 */
 417	if ((tf->protocol == ATA_PROT_DMA) && (!(tf->flags & ATA_TFLAG_WRITE)))
 418		tmp = PDC_PKT_READ;
 419	else
 420		tmp = 0;
 421	tmp |= ((portno + 1 + 4) << 16);	/* seq. id */
 422	tmp |= (0xff << 24);			/* delay seq. id */
 423	buf32[dw + 0] = cpu_to_le32(tmp);
 424	buf32[dw + 1] = cpu_to_le32(host_sg);
 425	buf32[dw + 2] = cpu_to_le32(dimm_sg);
 426	buf32[dw + 3] = 0;
 427
 428	VPRINTK("HOST PKT @ %x == (0x%x 0x%x 0x%x 0x%x)\n",
 429		PDC_20621_DIMM_BASE + (PDC_DIMM_WINDOW_STEP * portno) +
 430			PDC_DIMM_HOST_PKT,
 431		buf32[dw + 0],
 432		buf32[dw + 1],
 433		buf32[dw + 2],
 434		buf32[dw + 3]);
 435}
 436
 437static void pdc20621_dma_prep(struct ata_queued_cmd *qc)
 438{
 439	struct scatterlist *sg;
 440	struct ata_port *ap = qc->ap;
 441	struct pdc_port_priv *pp = ap->private_data;
 442	void __iomem *mmio = ap->host->iomap[PDC_MMIO_BAR];
 443	void __iomem *dimm_mmio = ap->host->iomap[PDC_DIMM_BAR];
 444	unsigned int portno = ap->port_no;
 445	unsigned int i, si, idx, total_len = 0, sgt_len;
 446	__le32 *buf = (__le32 *) &pp->dimm_buf[PDC_DIMM_HEADER_SZ];
 447
 448	WARN_ON(!(qc->flags & ATA_QCFLAG_DMAMAP));
 449
 450	VPRINTK("ata%u: ENTER\n", ap->print_id);
 451
 452	/* hard-code chip #0 */
 453	mmio += PDC_CHIP0_OFS;
 454
 455	/*
 456	 * Build S/G table
 457	 */
 458	idx = 0;
 459	for_each_sg(qc->sg, sg, qc->n_elem, si) {
 460		buf[idx++] = cpu_to_le32(sg_dma_address(sg));
 461		buf[idx++] = cpu_to_le32(sg_dma_len(sg));
 462		total_len += sg_dma_len(sg);
 463	}
 464	buf[idx - 1] |= cpu_to_le32(ATA_PRD_EOT);
 465	sgt_len = idx * 4;
 466
 467	/*
 468	 * Build ATA, host DMA packets
 469	 */
 470	pdc20621_host_sg(&pp->dimm_buf[0], portno, total_len);
 471	pdc20621_host_pkt(&qc->tf, &pp->dimm_buf[0], portno);
 472
 473	pdc20621_ata_sg(&pp->dimm_buf[0], portno, total_len);
 474	i = pdc20621_ata_pkt(&qc->tf, qc->dev->devno, &pp->dimm_buf[0], portno);
 475
 476	if (qc->tf.flags & ATA_TFLAG_LBA48)
 477		i = pdc_prep_lba48(&qc->tf, &pp->dimm_buf[0], i);
 478	else
 479		i = pdc_prep_lba28(&qc->tf, &pp->dimm_buf[0], i);
 480
 481	pdc_pkt_footer(&qc->tf, &pp->dimm_buf[0], i);
 482
 483	/* copy three S/G tables and two packets to DIMM MMIO window */
 484	memcpy_toio(dimm_mmio + (portno * PDC_DIMM_WINDOW_STEP),
 485		    &pp->dimm_buf, PDC_DIMM_HEADER_SZ);
 486	memcpy_toio(dimm_mmio + (portno * PDC_DIMM_WINDOW_STEP) +
 487		    PDC_DIMM_HOST_PRD,
 488		    &pp->dimm_buf[PDC_DIMM_HEADER_SZ], sgt_len);
 489
 490	/* force host FIFO dump */
 491	writel(0x00000001, mmio + PDC_20621_GENERAL_CTL);
 492
 493	readl(dimm_mmio);	/* MMIO PCI posting flush */
 494
 495	VPRINTK("ata pkt buf ofs %u, prd size %u, mmio copied\n", i, sgt_len);
 496}
 497
 498static void pdc20621_nodata_prep(struct ata_queued_cmd *qc)
 499{
 500	struct ata_port *ap = qc->ap;
 501	struct pdc_port_priv *pp = ap->private_data;
 502	void __iomem *mmio = ap->host->iomap[PDC_MMIO_BAR];
 503	void __iomem *dimm_mmio = ap->host->iomap[PDC_DIMM_BAR];
 504	unsigned int portno = ap->port_no;
 505	unsigned int i;
 506
 507	VPRINTK("ata%u: ENTER\n", ap->print_id);
 508
 509	/* hard-code chip #0 */
 510	mmio += PDC_CHIP0_OFS;
 511
 512	i = pdc20621_ata_pkt(&qc->tf, qc->dev->devno, &pp->dimm_buf[0], portno);
 513
 514	if (qc->tf.flags & ATA_TFLAG_LBA48)
 515		i = pdc_prep_lba48(&qc->tf, &pp->dimm_buf[0], i);
 516	else
 517		i = pdc_prep_lba28(&qc->tf, &pp->dimm_buf[0], i);
 518
 519	pdc_pkt_footer(&qc->tf, &pp->dimm_buf[0], i);
 520
 521	/* copy three S/G tables and two packets to DIMM MMIO window */
 522	memcpy_toio(dimm_mmio + (portno * PDC_DIMM_WINDOW_STEP),
 523		    &pp->dimm_buf, PDC_DIMM_HEADER_SZ);
 524
 525	/* force host FIFO dump */
 526	writel(0x00000001, mmio + PDC_20621_GENERAL_CTL);
 527
 528	readl(dimm_mmio);	/* MMIO PCI posting flush */
 529
 530	VPRINTK("ata pkt buf ofs %u, mmio copied\n", i);
 531}
 532
 533static enum ata_completion_errors pdc20621_qc_prep(struct ata_queued_cmd *qc)
 534{
 535	switch (qc->tf.protocol) {
 536	case ATA_PROT_DMA:
 537		pdc20621_dma_prep(qc);
 538		break;
 539	case ATA_PROT_NODATA:
 540		pdc20621_nodata_prep(qc);
 541		break;
 542	default:
 543		break;
 544	}
 545
 546	return AC_ERR_OK;
 547}
 548
 549static void __pdc20621_push_hdma(struct ata_queued_cmd *qc,
 550				 unsigned int seq,
 551				 u32 pkt_ofs)
 552{
 553	struct ata_port *ap = qc->ap;
 554	struct ata_host *host = ap->host;
 555	void __iomem *mmio = host->iomap[PDC_MMIO_BAR];
 556
 557	/* hard-code chip #0 */
 558	mmio += PDC_CHIP0_OFS;
 559
 560	writel(0x00000001, mmio + PDC_20621_SEQCTL + (seq * 4));
 561	readl(mmio + PDC_20621_SEQCTL + (seq * 4));	/* flush */
 562
 563	writel(pkt_ofs, mmio + PDC_HDMA_PKT_SUBMIT);
 564	readl(mmio + PDC_HDMA_PKT_SUBMIT);	/* flush */
 565}
 566
 567static void pdc20621_push_hdma(struct ata_queued_cmd *qc,
 568				unsigned int seq,
 569				u32 pkt_ofs)
 570{
 571	struct ata_port *ap = qc->ap;
 572	struct pdc_host_priv *pp = ap->host->private_data;
 573	unsigned int idx = pp->hdma_prod & PDC_HDMA_Q_MASK;
 574
 575	if (!pp->doing_hdma) {
 576		__pdc20621_push_hdma(qc, seq, pkt_ofs);
 577		pp->doing_hdma = 1;
 578		return;
 579	}
 580
 581	pp->hdma[idx].qc = qc;
 582	pp->hdma[idx].seq = seq;
 583	pp->hdma[idx].pkt_ofs = pkt_ofs;
 584	pp->hdma_prod++;
 585}
 586
 587static void pdc20621_pop_hdma(struct ata_queued_cmd *qc)
 588{
 589	struct ata_port *ap = qc->ap;
 590	struct pdc_host_priv *pp = ap->host->private_data;
 591	unsigned int idx = pp->hdma_cons & PDC_HDMA_Q_MASK;
 592
 593	/* if nothing on queue, we're done */
 594	if (pp->hdma_prod == pp->hdma_cons) {
 595		pp->doing_hdma = 0;
 596		return;
 597	}
 598
 599	__pdc20621_push_hdma(pp->hdma[idx].qc, pp->hdma[idx].seq,
 600			     pp->hdma[idx].pkt_ofs);
 601	pp->hdma_cons++;
 602}
 603
 604#ifdef ATA_VERBOSE_DEBUG
 605static void pdc20621_dump_hdma(struct ata_queued_cmd *qc)
 606{
 607	struct ata_port *ap = qc->ap;
 608	unsigned int port_no = ap->port_no;
 609	void __iomem *dimm_mmio = ap->host->iomap[PDC_DIMM_BAR];
 610
 611	dimm_mmio += (port_no * PDC_DIMM_WINDOW_STEP);
 612	dimm_mmio += PDC_DIMM_HOST_PKT;
 613
 614	printk(KERN_ERR "HDMA[0] == 0x%08X\n", readl(dimm_mmio));
 615	printk(KERN_ERR "HDMA[1] == 0x%08X\n", readl(dimm_mmio + 4));
 616	printk(KERN_ERR "HDMA[2] == 0x%08X\n", readl(dimm_mmio + 8));
 617	printk(KERN_ERR "HDMA[3] == 0x%08X\n", readl(dimm_mmio + 12));
 618}
 619#else
 620static inline void pdc20621_dump_hdma(struct ata_queued_cmd *qc) { }
 621#endif /* ATA_VERBOSE_DEBUG */
 622
 623static void pdc20621_packet_start(struct ata_queued_cmd *qc)
 624{
 625	struct ata_port *ap = qc->ap;
 626	struct ata_host *host = ap->host;
 627	unsigned int port_no = ap->port_no;
 628	void __iomem *mmio = host->iomap[PDC_MMIO_BAR];
 629	unsigned int rw = (qc->tf.flags & ATA_TFLAG_WRITE);
 630	u8 seq = (u8) (port_no + 1);
 631	unsigned int port_ofs;
 632
 633	/* hard-code chip #0 */
 634	mmio += PDC_CHIP0_OFS;
 635
 636	VPRINTK("ata%u: ENTER\n", ap->print_id);
 637
 638	wmb();			/* flush PRD, pkt writes */
 639
 640	port_ofs = PDC_20621_DIMM_BASE + (PDC_DIMM_WINDOW_STEP * port_no);
 641
 642	/* if writing, we (1) DMA to DIMM, then (2) do ATA command */
 643	if (rw && qc->tf.protocol == ATA_PROT_DMA) {
 644		seq += 4;
 645
 646		pdc20621_dump_hdma(qc);
 647		pdc20621_push_hdma(qc, seq, port_ofs + PDC_DIMM_HOST_PKT);
 648		VPRINTK("queued ofs 0x%x (%u), seq %u\n",
 649			port_ofs + PDC_DIMM_HOST_PKT,
 650			port_ofs + PDC_DIMM_HOST_PKT,
 651			seq);
 652	} else {
 653		writel(0x00000001, mmio + PDC_20621_SEQCTL + (seq * 4));
 654		readl(mmio + PDC_20621_SEQCTL + (seq * 4));	/* flush */
 655
 656		writel(port_ofs + PDC_DIMM_ATA_PKT,
 657		       ap->ioaddr.cmd_addr + PDC_PKT_SUBMIT);
 658		readl(ap->ioaddr.cmd_addr + PDC_PKT_SUBMIT);
 659		VPRINTK("submitted ofs 0x%x (%u), seq %u\n",
 660			port_ofs + PDC_DIMM_ATA_PKT,
 661			port_ofs + PDC_DIMM_ATA_PKT,
 662			seq);
 663	}
 664}
 665
 666static unsigned int pdc20621_qc_issue(struct ata_queued_cmd *qc)
 667{
 668	switch (qc->tf.protocol) {
 669	case ATA_PROT_NODATA:
 670		if (qc->tf.flags & ATA_TFLAG_POLLING)
 671			break;
 672		fallthrough;
 673	case ATA_PROT_DMA:
 674		pdc20621_packet_start(qc);
 675		return 0;
 676
 677	case ATAPI_PROT_DMA:
 678		BUG();
 679		break;
 680
 681	default:
 682		break;
 683	}
 684
 685	return ata_sff_qc_issue(qc);
 686}
 687
 688static inline unsigned int pdc20621_host_intr(struct ata_port *ap,
 689					  struct ata_queued_cmd *qc,
 690					  unsigned int doing_hdma,
 691					  void __iomem *mmio)
 692{
 693	unsigned int port_no = ap->port_no;
 694	unsigned int port_ofs =
 695		PDC_20621_DIMM_BASE + (PDC_DIMM_WINDOW_STEP * port_no);
 696	u8 status;
 697	unsigned int handled = 0;
 698
 699	VPRINTK("ENTER\n");
 700
 701	if ((qc->tf.protocol == ATA_PROT_DMA) &&	/* read */
 702	    (!(qc->tf.flags & ATA_TFLAG_WRITE))) {
 703
 704		/* step two - DMA from DIMM to host */
 705		if (doing_hdma) {
 706			VPRINTK("ata%u: read hdma, 0x%x 0x%x\n", ap->print_id,
 707				readl(mmio + 0x104), readl(mmio + PDC_HDMA_CTLSTAT));
 708			/* get drive status; clear intr; complete txn */
 709			qc->err_mask |= ac_err_mask(ata_wait_idle(ap));
 710			ata_qc_complete(qc);
 711			pdc20621_pop_hdma(qc);
 712		}
 713
 714		/* step one - exec ATA command */
 715		else {
 716			u8 seq = (u8) (port_no + 1 + 4);
 717			VPRINTK("ata%u: read ata, 0x%x 0x%x\n", ap->print_id,
 718				readl(mmio + 0x104), readl(mmio + PDC_HDMA_CTLSTAT));
 719
 720			/* submit hdma pkt */
 721			pdc20621_dump_hdma(qc);
 722			pdc20621_push_hdma(qc, seq,
 723					   port_ofs + PDC_DIMM_HOST_PKT);
 724		}
 725		handled = 1;
 726
 727	} else if (qc->tf.protocol == ATA_PROT_DMA) {	/* write */
 728
 729		/* step one - DMA from host to DIMM */
 730		if (doing_hdma) {
 731			u8 seq = (u8) (port_no + 1);
 732			VPRINTK("ata%u: write hdma, 0x%x 0x%x\n", ap->print_id,
 733				readl(mmio + 0x104), readl(mmio + PDC_HDMA_CTLSTAT));
 734
 735			/* submit ata pkt */
 736			writel(0x00000001, mmio + PDC_20621_SEQCTL + (seq * 4));
 737			readl(mmio + PDC_20621_SEQCTL + (seq * 4));
 738			writel(port_ofs + PDC_DIMM_ATA_PKT,
 739			       ap->ioaddr.cmd_addr + PDC_PKT_SUBMIT);
 740			readl(ap->ioaddr.cmd_addr + PDC_PKT_SUBMIT);
 741		}
 742
 743		/* step two - execute ATA command */
 744		else {
 745			VPRINTK("ata%u: write ata, 0x%x 0x%x\n", ap->print_id,
 746				readl(mmio + 0x104), readl(mmio + PDC_HDMA_CTLSTAT));
 747			/* get drive status; clear intr; complete txn */
 748			qc->err_mask |= ac_err_mask(ata_wait_idle(ap));
 749			ata_qc_complete(qc);
 750			pdc20621_pop_hdma(qc);
 751		}
 752		handled = 1;
 753
 754	/* command completion, but no data xfer */
 755	} else if (qc->tf.protocol == ATA_PROT_NODATA) {
 756
 757		status = ata_sff_busy_wait(ap, ATA_BUSY | ATA_DRQ, 1000);
 758		DPRINTK("BUS_NODATA (drv_stat 0x%X)\n", status);
 759		qc->err_mask |= ac_err_mask(status);
 760		ata_qc_complete(qc);
 761		handled = 1;
 762
 763	} else {
 764		ap->stats.idle_irq++;
 765	}
 766
 767	return handled;
 768}
 769
 770static void pdc20621_irq_clear(struct ata_port *ap)
 771{
 772	ioread8(ap->ioaddr.status_addr);
 773}
 774
 775static irqreturn_t pdc20621_interrupt(int irq, void *dev_instance)
 776{
 777	struct ata_host *host = dev_instance;
 778	struct ata_port *ap;
 779	u32 mask = 0;
 780	unsigned int i, tmp, port_no;
 781	unsigned int handled = 0;
 782	void __iomem *mmio_base;
 783
 784	VPRINTK("ENTER\n");
 785
 786	if (!host || !host->iomap[PDC_MMIO_BAR]) {
 787		VPRINTK("QUICK EXIT\n");
 788		return IRQ_NONE;
 789	}
 790
 791	mmio_base = host->iomap[PDC_MMIO_BAR];
 792
 793	/* reading should also clear interrupts */
 794	mmio_base += PDC_CHIP0_OFS;
 795	mask = readl(mmio_base + PDC_20621_SEQMASK);
 796	VPRINTK("mask == 0x%x\n", mask);
 797
 798	if (mask == 0xffffffff) {
 799		VPRINTK("QUICK EXIT 2\n");
 800		return IRQ_NONE;
 801	}
 802	mask &= 0xffff;		/* only 16 tags possible */
 803	if (!mask) {
 804		VPRINTK("QUICK EXIT 3\n");
 805		return IRQ_NONE;
 806	}
 807
 808	spin_lock(&host->lock);
 809
 810	for (i = 1; i < 9; i++) {
 811		port_no = i - 1;
 812		if (port_no > 3)
 813			port_no -= 4;
 814		if (port_no >= host->n_ports)
 815			ap = NULL;
 816		else
 817			ap = host->ports[port_no];
 818		tmp = mask & (1 << i);
 819		VPRINTK("seq %u, port_no %u, ap %p, tmp %x\n", i, port_no, ap, tmp);
 820		if (tmp && ap) {
 821			struct ata_queued_cmd *qc;
 822
 823			qc = ata_qc_from_tag(ap, ap->link.active_tag);
 824			if (qc && (!(qc->tf.flags & ATA_TFLAG_POLLING)))
 825				handled += pdc20621_host_intr(ap, qc, (i > 4),
 826							      mmio_base);
 827		}
 828	}
 829
 830	spin_unlock(&host->lock);
 831
 832	VPRINTK("mask == 0x%x\n", mask);
 833
 834	VPRINTK("EXIT\n");
 835
 836	return IRQ_RETVAL(handled);
 837}
 838
 839static void pdc_freeze(struct ata_port *ap)
 840{
 841	void __iomem *mmio = ap->ioaddr.cmd_addr;
 842	u32 tmp;
 843
 844	/* FIXME: if all 4 ATA engines are stopped, also stop HDMA engine */
 845
 846	tmp = readl(mmio + PDC_CTLSTAT);
 847	tmp |= PDC_MASK_INT;
 848	tmp &= ~PDC_DMA_ENABLE;
 849	writel(tmp, mmio + PDC_CTLSTAT);
 850	readl(mmio + PDC_CTLSTAT); /* flush */
 851}
 852
 853static void pdc_thaw(struct ata_port *ap)
 854{
 855	void __iomem *mmio = ap->ioaddr.cmd_addr;
 856	u32 tmp;
 857
 858	/* FIXME: start HDMA engine, if zero ATA engines running */
 859
 860	/* clear IRQ */
 861	ioread8(ap->ioaddr.status_addr);
 862
 863	/* turn IRQ back on */
 864	tmp = readl(mmio + PDC_CTLSTAT);
 865	tmp &= ~PDC_MASK_INT;
 866	writel(tmp, mmio + PDC_CTLSTAT);
 867	readl(mmio + PDC_CTLSTAT); /* flush */
 868}
 869
 870static void pdc_reset_port(struct ata_port *ap)
 871{
 872	void __iomem *mmio = ap->ioaddr.cmd_addr + PDC_CTLSTAT;
 873	unsigned int i;
 874	u32 tmp;
 875
 876	/* FIXME: handle HDMA copy engine */
 877
 878	for (i = 11; i > 0; i--) {
 879		tmp = readl(mmio);
 880		if (tmp & PDC_RESET)
 881			break;
 882
 883		udelay(100);
 884
 885		tmp |= PDC_RESET;
 886		writel(tmp, mmio);
 887	}
 888
 889	tmp &= ~PDC_RESET;
 890	writel(tmp, mmio);
 891	readl(mmio);	/* flush */
 892}
 893
 894static int pdc_softreset(struct ata_link *link, unsigned int *class,
 895			 unsigned long deadline)
 896{
 897	pdc_reset_port(link->ap);
 898	return ata_sff_softreset(link, class, deadline);
 899}
 900
 901static void pdc_error_handler(struct ata_port *ap)
 902{
 903	if (!(ap->pflags & ATA_PFLAG_FROZEN))
 904		pdc_reset_port(ap);
 905
 906	ata_sff_error_handler(ap);
 907}
 908
 909static void pdc_post_internal_cmd(struct ata_queued_cmd *qc)
 910{
 911	struct ata_port *ap = qc->ap;
 912
 913	/* make DMA engine forget about the failed command */
 914	if (qc->flags & ATA_QCFLAG_FAILED)
 915		pdc_reset_port(ap);
 916}
 917
 918static int pdc_check_atapi_dma(struct ata_queued_cmd *qc)
 919{
 920	u8 *scsicmd = qc->scsicmd->cmnd;
 921	int pio = 1; /* atapi dma off by default */
 922
 923	/* Whitelist commands that may use DMA. */
 924	switch (scsicmd[0]) {
 925	case WRITE_12:
 926	case WRITE_10:
 927	case WRITE_6:
 928	case READ_12:
 929	case READ_10:
 930	case READ_6:
 931	case 0xad: /* READ_DVD_STRUCTURE */
 932	case 0xbe: /* READ_CD */
 933		pio = 0;
 934	}
 935	/* -45150 (FFFF4FA2) to -1 (FFFFFFFF) shall use PIO mode */
 936	if (scsicmd[0] == WRITE_10) {
 937		unsigned int lba =
 938			(scsicmd[2] << 24) |
 939			(scsicmd[3] << 16) |
 940			(scsicmd[4] << 8) |
 941			scsicmd[5];
 942		if (lba >= 0xFFFF4FA2)
 943			pio = 1;
 944	}
 945	return pio;
 946}
 947
 948static void pdc_tf_load_mmio(struct ata_port *ap, const struct ata_taskfile *tf)
 949{
 950	WARN_ON(tf->protocol == ATA_PROT_DMA ||
 951		tf->protocol == ATAPI_PROT_DMA);
 952	ata_sff_tf_load(ap, tf);
 953}
 954
 955
 956static void pdc_exec_command_mmio(struct ata_port *ap, const struct ata_taskfile *tf)
 957{
 958	WARN_ON(tf->protocol == ATA_PROT_DMA ||
 959		tf->protocol == ATAPI_PROT_DMA);
 960	ata_sff_exec_command(ap, tf);
 961}
 962
 963
 964static void pdc_sata_setup_port(struct ata_ioports *port, void __iomem *base)
 965{
 966	port->cmd_addr		= base;
 967	port->data_addr		= base;
 968	port->feature_addr	=
 969	port->error_addr	= base + 0x4;
 970	port->nsect_addr	= base + 0x8;
 971	port->lbal_addr		= base + 0xc;
 972	port->lbam_addr		= base + 0x10;
 973	port->lbah_addr		= base + 0x14;
 974	port->device_addr	= base + 0x18;
 975	port->command_addr	=
 976	port->status_addr	= base + 0x1c;
 977	port->altstatus_addr	=
 978	port->ctl_addr		= base + 0x38;
 979}
 980
 981
 982#ifdef ATA_VERBOSE_DEBUG
 983static void pdc20621_get_from_dimm(struct ata_host *host, void *psource,
 984				   u32 offset, u32 size)
 985{
 986	u32 window_size;
 987	u16 idx;
 988	u8 page_mask;
 989	long dist;
 990	void __iomem *mmio = host->iomap[PDC_MMIO_BAR];
 991	void __iomem *dimm_mmio = host->iomap[PDC_DIMM_BAR];
 992
 993	/* hard-code chip #0 */
 994	mmio += PDC_CHIP0_OFS;
 995
 996	page_mask = 0x00;
 997	window_size = 0x2000 * 4; /* 32K byte uchar size */
 998	idx = (u16) (offset / window_size);
 999
1000	writel(0x01, mmio + PDC_GENERAL_CTLR);
1001	readl(mmio + PDC_GENERAL_CTLR);
1002	writel(((idx) << page_mask), mmio + PDC_DIMM_WINDOW_CTLR);
1003	readl(mmio + PDC_DIMM_WINDOW_CTLR);
1004
1005	offset -= (idx * window_size);
1006	idx++;
1007	dist = ((long) (window_size - (offset + size))) >= 0 ? size :
1008		(long) (window_size - offset);
1009	memcpy_fromio(psource, dimm_mmio + offset / 4, dist);
1010
1011	psource += dist;
1012	size -= dist;
1013	for (; (long) size >= (long) window_size ;) {
1014		writel(0x01, mmio + PDC_GENERAL_CTLR);
1015		readl(mmio + PDC_GENERAL_CTLR);
1016		writel(((idx) << page_mask), mmio + PDC_DIMM_WINDOW_CTLR);
1017		readl(mmio + PDC_DIMM_WINDOW_CTLR);
1018		memcpy_fromio(psource, dimm_mmio, window_size / 4);
1019		psource += window_size;
1020		size -= window_size;
1021		idx++;
1022	}
1023
1024	if (size) {
1025		writel(0x01, mmio + PDC_GENERAL_CTLR);
1026		readl(mmio + PDC_GENERAL_CTLR);
1027		writel(((idx) << page_mask), mmio + PDC_DIMM_WINDOW_CTLR);
1028		readl(mmio + PDC_DIMM_WINDOW_CTLR);
1029		memcpy_fromio(psource, dimm_mmio, size / 4);
1030	}
1031}
1032#endif
1033
1034
1035static void pdc20621_put_to_dimm(struct ata_host *host, void *psource,
1036				 u32 offset, u32 size)
1037{
1038	u32 window_size;
1039	u16 idx;
1040	u8 page_mask;
1041	long dist;
1042	void __iomem *mmio = host->iomap[PDC_MMIO_BAR];
1043	void __iomem *dimm_mmio = host->iomap[PDC_DIMM_BAR];
1044
1045	/* hard-code chip #0 */
1046	mmio += PDC_CHIP0_OFS;
1047
1048	page_mask = 0x00;
1049	window_size = 0x2000 * 4;       /* 32K byte uchar size */
1050	idx = (u16) (offset / window_size);
1051
1052	writel(((idx) << page_mask), mmio + PDC_DIMM_WINDOW_CTLR);
1053	readl(mmio + PDC_DIMM_WINDOW_CTLR);
1054	offset -= (idx * window_size);
1055	idx++;
1056	dist = ((long)(s32)(window_size - (offset + size))) >= 0 ? size :
1057		(long) (window_size - offset);
1058	memcpy_toio(dimm_mmio + offset / 4, psource, dist);
1059	writel(0x01, mmio + PDC_GENERAL_CTLR);
1060	readl(mmio + PDC_GENERAL_CTLR);
1061
1062	psource += dist;
1063	size -= dist;
1064	for (; (long) size >= (long) window_size ;) {
1065		writel(((idx) << page_mask), mmio + PDC_DIMM_WINDOW_CTLR);
1066		readl(mmio + PDC_DIMM_WINDOW_CTLR);
1067		memcpy_toio(dimm_mmio, psource, window_size / 4);
1068		writel(0x01, mmio + PDC_GENERAL_CTLR);
1069		readl(mmio + PDC_GENERAL_CTLR);
1070		psource += window_size;
1071		size -= window_size;
1072		idx++;
1073	}
1074
1075	if (size) {
1076		writel(((idx) << page_mask), mmio + PDC_DIMM_WINDOW_CTLR);
1077		readl(mmio + PDC_DIMM_WINDOW_CTLR);
1078		memcpy_toio(dimm_mmio, psource, size / 4);
1079		writel(0x01, mmio + PDC_GENERAL_CTLR);
1080		readl(mmio + PDC_GENERAL_CTLR);
1081	}
1082}
1083
1084
1085static unsigned int pdc20621_i2c_read(struct ata_host *host, u32 device,
1086				      u32 subaddr, u32 *pdata)
1087{
1088	void __iomem *mmio = host->iomap[PDC_MMIO_BAR];
1089	u32 i2creg  = 0;
1090	u32 status;
1091	u32 count = 0;
1092
1093	/* hard-code chip #0 */
1094	mmio += PDC_CHIP0_OFS;
1095
1096	i2creg |= device << 24;
1097	i2creg |= subaddr << 16;
1098
1099	/* Set the device and subaddress */
1100	writel(i2creg, mmio + PDC_I2C_ADDR_DATA);
1101	readl(mmio + PDC_I2C_ADDR_DATA);
1102
1103	/* Write Control to perform read operation, mask int */
1104	writel(PDC_I2C_READ | PDC_I2C_START | PDC_I2C_MASK_INT,
1105	       mmio + PDC_I2C_CONTROL);
1106
1107	for (count = 0; count <= 1000; count ++) {
1108		status = readl(mmio + PDC_I2C_CONTROL);
1109		if (status & PDC_I2C_COMPLETE) {
1110			status = readl(mmio + PDC_I2C_ADDR_DATA);
1111			break;
1112		} else if (count == 1000)
1113			return 0;
1114	}
1115
1116	*pdata = (status >> 8) & 0x000000ff;
1117	return 1;
1118}
1119
1120
1121static int pdc20621_detect_dimm(struct ata_host *host)
1122{
1123	u32 data = 0;
1124	if (pdc20621_i2c_read(host, PDC_DIMM0_SPD_DEV_ADDRESS,
1125			     PDC_DIMM_SPD_SYSTEM_FREQ, &data)) {
1126		if (data == 100)
1127			return 100;
1128	} else
1129		return 0;
1130
1131	if (pdc20621_i2c_read(host, PDC_DIMM0_SPD_DEV_ADDRESS, 9, &data)) {
1132		if (data <= 0x75)
1133			return 133;
1134	} else
1135		return 0;
1136
1137	return 0;
1138}
1139
1140
1141static int pdc20621_prog_dimm0(struct ata_host *host)
1142{
1143	u32 spd0[50];
1144	u32 data = 0;
1145	int size, i;
1146	u8 bdimmsize;
1147	void __iomem *mmio = host->iomap[PDC_MMIO_BAR];
1148	static const struct {
1149		unsigned int reg;
1150		unsigned int ofs;
1151	} pdc_i2c_read_data [] = {
1152		{ PDC_DIMM_SPD_TYPE, 11 },
1153		{ PDC_DIMM_SPD_FRESH_RATE, 12 },
1154		{ PDC_DIMM_SPD_COLUMN_NUM, 4 },
1155		{ PDC_DIMM_SPD_ATTRIBUTE, 21 },
1156		{ PDC_DIMM_SPD_ROW_NUM, 3 },
1157		{ PDC_DIMM_SPD_BANK_NUM, 17 },
1158		{ PDC_DIMM_SPD_MODULE_ROW, 5 },
1159		{ PDC_DIMM_SPD_ROW_PRE_CHARGE, 27 },
1160		{ PDC_DIMM_SPD_ROW_ACTIVE_DELAY, 28 },
1161		{ PDC_DIMM_SPD_RAS_CAS_DELAY, 29 },
1162		{ PDC_DIMM_SPD_ACTIVE_PRECHARGE, 30 },
1163		{ PDC_DIMM_SPD_CAS_LATENCY, 18 },
1164	};
1165
1166	/* hard-code chip #0 */
1167	mmio += PDC_CHIP0_OFS;
1168
1169	for (i = 0; i < ARRAY_SIZE(pdc_i2c_read_data); i++)
1170		pdc20621_i2c_read(host, PDC_DIMM0_SPD_DEV_ADDRESS,
1171				  pdc_i2c_read_data[i].reg,
1172				  &spd0[pdc_i2c_read_data[i].ofs]);
1173
1174	data |= (spd0[4] - 8) | ((spd0[21] != 0) << 3) | ((spd0[3]-11) << 4);
1175	data |= ((spd0[17] / 4) << 6) | ((spd0[5] / 2) << 7) |
1176		((((spd0[27] + 9) / 10) - 1) << 8) ;
1177	data |= (((((spd0[29] > spd0[28])
1178		    ? spd0[29] : spd0[28]) + 9) / 10) - 1) << 10;
1179	data |= ((spd0[30] - spd0[29] + 9) / 10 - 2) << 12;
1180
1181	if (spd0[18] & 0x08)
1182		data |= ((0x03) << 14);
1183	else if (spd0[18] & 0x04)
1184		data |= ((0x02) << 14);
1185	else if (spd0[18] & 0x01)
1186		data |= ((0x01) << 14);
1187	else
1188		data |= (0 << 14);
1189
1190	/*
1191	   Calculate the size of bDIMMSize (power of 2) and
1192	   merge the DIMM size by program start/end address.
1193	*/
1194
1195	bdimmsize = spd0[4] + (spd0[5] / 2) + spd0[3] + (spd0[17] / 2) + 3;
1196	size = (1 << bdimmsize) >> 20;	/* size = xxx(MB) */
1197	data |= (((size / 16) - 1) << 16);
1198	data |= (0 << 23);
1199	data |= 8;
1200	writel(data, mmio + PDC_DIMM0_CONTROL);
1201	readl(mmio + PDC_DIMM0_CONTROL);
1202	return size;
1203}
1204
1205
1206static unsigned int pdc20621_prog_dimm_global(struct ata_host *host)
1207{
1208	u32 data, spd0;
1209	int error, i;
1210	void __iomem *mmio = host->iomap[PDC_MMIO_BAR];
1211
1212	/* hard-code chip #0 */
1213	mmio += PDC_CHIP0_OFS;
1214
1215	/*
1216	  Set To Default : DIMM Module Global Control Register (0x022259F1)
1217	  DIMM Arbitration Disable (bit 20)
1218	  DIMM Data/Control Output Driving Selection (bit12 - bit15)
1219	  Refresh Enable (bit 17)
1220	*/
1221
1222	data = 0x022259F1;
1223	writel(data, mmio + PDC_SDRAM_CONTROL);
1224	readl(mmio + PDC_SDRAM_CONTROL);
1225
1226	/* Turn on for ECC */
1227	if (!pdc20621_i2c_read(host, PDC_DIMM0_SPD_DEV_ADDRESS,
1228			       PDC_DIMM_SPD_TYPE, &spd0)) {
1229		pr_err("Failed in i2c read: device=%#x, subaddr=%#x\n",
1230		       PDC_DIMM0_SPD_DEV_ADDRESS, PDC_DIMM_SPD_TYPE);
1231		return 1;
1232	}
1233	if (spd0 == 0x02) {
1234		data |= (0x01 << 16);
1235		writel(data, mmio + PDC_SDRAM_CONTROL);
1236		readl(mmio + PDC_SDRAM_CONTROL);
1237		printk(KERN_ERR "Local DIMM ECC Enabled\n");
1238	}
1239
1240	/* DIMM Initialization Select/Enable (bit 18/19) */
1241	data &= (~(1<<18));
1242	data |= (1<<19);
1243	writel(data, mmio + PDC_SDRAM_CONTROL);
1244
1245	error = 1;
1246	for (i = 1; i <= 10; i++) {   /* polling ~5 secs */
1247		data = readl(mmio + PDC_SDRAM_CONTROL);
1248		if (!(data & (1<<19))) {
1249			error = 0;
1250			break;
1251		}
1252		msleep(i*100);
1253	}
1254	return error;
1255}
1256
1257
1258static unsigned int pdc20621_dimm_init(struct ata_host *host)
1259{
1260	int speed, size, length;
1261	u32 addr, spd0, pci_status;
1262	u32 time_period = 0;
1263	u32 tcount = 0;
1264	u32 ticks = 0;
1265	u32 clock = 0;
1266	u32 fparam = 0;
1267	void __iomem *mmio = host->iomap[PDC_MMIO_BAR];
1268
1269	/* hard-code chip #0 */
1270	mmio += PDC_CHIP0_OFS;
1271
1272	/* Initialize PLL based upon PCI Bus Frequency */
1273
1274	/* Initialize Time Period Register */
1275	writel(0xffffffff, mmio + PDC_TIME_PERIOD);
1276	time_period = readl(mmio + PDC_TIME_PERIOD);
1277	VPRINTK("Time Period Register (0x40): 0x%x\n", time_period);
1278
1279	/* Enable timer */
1280	writel(PDC_TIMER_DEFAULT, mmio + PDC_TIME_CONTROL);
1281	readl(mmio + PDC_TIME_CONTROL);
1282
1283	/* Wait 3 seconds */
1284	msleep(3000);
1285
1286	/*
1287	   When timer is enabled, counter is decreased every internal
1288	   clock cycle.
1289	*/
1290
1291	tcount = readl(mmio + PDC_TIME_COUNTER);
1292	VPRINTK("Time Counter Register (0x44): 0x%x\n", tcount);
1293
1294	/*
1295	   If SX4 is on PCI-X bus, after 3 seconds, the timer counter
1296	   register should be >= (0xffffffff - 3x10^8).
1297	*/
1298	if (tcount >= PCI_X_TCOUNT) {
1299		ticks = (time_period - tcount);
1300		VPRINTK("Num counters 0x%x (%d)\n", ticks, ticks);
1301
1302		clock = (ticks / 300000);
1303		VPRINTK("10 * Internal clk = 0x%x (%d)\n", clock, clock);
1304
1305		clock = (clock * 33);
1306		VPRINTK("10 * Internal clk * 33 = 0x%x (%d)\n", clock, clock);
1307
1308		/* PLL F Param (bit 22:16) */
1309		fparam = (1400000 / clock) - 2;
1310		VPRINTK("PLL F Param: 0x%x (%d)\n", fparam, fparam);
1311
1312		/* OD param = 0x2 (bit 31:30), R param = 0x5 (bit 29:25) */
1313		pci_status = (0x8a001824 | (fparam << 16));
1314	} else
1315		pci_status = PCI_PLL_INIT;
1316
1317	/* Initialize PLL. */
1318	VPRINTK("pci_status: 0x%x\n", pci_status);
1319	writel(pci_status, mmio + PDC_CTL_STATUS);
1320	readl(mmio + PDC_CTL_STATUS);
1321
1322	/*
1323	   Read SPD of DIMM by I2C interface,
1324	   and program the DIMM Module Controller.
1325	*/
1326	if (!(speed = pdc20621_detect_dimm(host))) {
1327		printk(KERN_ERR "Detect Local DIMM Fail\n");
1328		return 1;	/* DIMM error */
1329	}
1330	VPRINTK("Local DIMM Speed = %d\n", speed);
1331
1332	/* Programming DIMM0 Module Control Register (index_CID0:80h) */
1333	size = pdc20621_prog_dimm0(host);
1334	VPRINTK("Local DIMM Size = %dMB\n", size);
1335
1336	/* Programming DIMM Module Global Control Register (index_CID0:88h) */
1337	if (pdc20621_prog_dimm_global(host)) {
1338		printk(KERN_ERR "Programming DIMM Module Global Control Register Fail\n");
1339		return 1;
1340	}
1341
1342#ifdef ATA_VERBOSE_DEBUG
1343	{
1344		u8 test_parttern1[40] =
1345			{0x55,0xAA,'P','r','o','m','i','s','e',' ',
1346			'N','o','t',' ','Y','e','t',' ',
1347			'D','e','f','i','n','e','d',' ',
1348			'1','.','1','0',
1349			'9','8','0','3','1','6','1','2',0,0};
1350		u8 test_parttern2[40] = {0};
1351
1352		pdc20621_put_to_dimm(host, test_parttern2, 0x10040, 40);
1353		pdc20621_put_to_dimm(host, test_parttern2, 0x40, 40);
1354
1355		pdc20621_put_to_dimm(host, test_parttern1, 0x10040, 40);
1356		pdc20621_get_from_dimm(host, test_parttern2, 0x40, 40);
1357		printk(KERN_ERR "%x, %x, %s\n", test_parttern2[0],
1358		       test_parttern2[1], &(test_parttern2[2]));
1359		pdc20621_get_from_dimm(host, test_parttern2, 0x10040,
1360				       40);
1361		printk(KERN_ERR "%x, %x, %s\n", test_parttern2[0],
1362		       test_parttern2[1], &(test_parttern2[2]));
1363
1364		pdc20621_put_to_dimm(host, test_parttern1, 0x40, 40);
1365		pdc20621_get_from_dimm(host, test_parttern2, 0x40, 40);
1366		printk(KERN_ERR "%x, %x, %s\n", test_parttern2[0],
1367		       test_parttern2[1], &(test_parttern2[2]));
1368	}
1369#endif
1370
1371	/* ECC initiliazation. */
1372
1373	if (!pdc20621_i2c_read(host, PDC_DIMM0_SPD_DEV_ADDRESS,
1374			       PDC_DIMM_SPD_TYPE, &spd0)) {
1375		pr_err("Failed in i2c read: device=%#x, subaddr=%#x\n",
1376		       PDC_DIMM0_SPD_DEV_ADDRESS, PDC_DIMM_SPD_TYPE);
1377		return 1;
1378	}
1379	if (spd0 == 0x02) {
1380		void *buf;
1381		VPRINTK("Start ECC initialization\n");
1382		addr = 0;
1383		length = size * 1024 * 1024;
1384		buf = kzalloc(ECC_ERASE_BUF_SZ, GFP_KERNEL);
1385		if (!buf)
1386			return 1;
1387		while (addr < length) {
1388			pdc20621_put_to_dimm(host, buf, addr,
1389					     ECC_ERASE_BUF_SZ);
1390			addr += ECC_ERASE_BUF_SZ;
1391		}
1392		kfree(buf);
1393		VPRINTK("Finish ECC initialization\n");
1394	}
1395	return 0;
1396}
1397
1398
1399static void pdc_20621_init(struct ata_host *host)
1400{
1401	u32 tmp;
1402	void __iomem *mmio = host->iomap[PDC_MMIO_BAR];
1403
1404	/* hard-code chip #0 */
1405	mmio += PDC_CHIP0_OFS;
1406
1407	/*
1408	 * Select page 0x40 for our 32k DIMM window
1409	 */
1410	tmp = readl(mmio + PDC_20621_DIMM_WINDOW) & 0xffff0000;
1411	tmp |= PDC_PAGE_WINDOW;	/* page 40h; arbitrarily selected */
1412	writel(tmp, mmio + PDC_20621_DIMM_WINDOW);
1413
1414	/*
1415	 * Reset Host DMA
1416	 */
1417	tmp = readl(mmio + PDC_HDMA_CTLSTAT);
1418	tmp |= PDC_RESET;
1419	writel(tmp, mmio + PDC_HDMA_CTLSTAT);
1420	readl(mmio + PDC_HDMA_CTLSTAT);		/* flush */
1421
1422	udelay(10);
1423
1424	tmp = readl(mmio + PDC_HDMA_CTLSTAT);
1425	tmp &= ~PDC_RESET;
1426	writel(tmp, mmio + PDC_HDMA_CTLSTAT);
1427	readl(mmio + PDC_HDMA_CTLSTAT);		/* flush */
1428}
1429
1430static int pdc_sata_init_one(struct pci_dev *pdev,
1431			     const struct pci_device_id *ent)
1432{
1433	const struct ata_port_info *ppi[] =
1434		{ &pdc_port_info[ent->driver_data], NULL };
1435	struct ata_host *host;
1436	struct pdc_host_priv *hpriv;
1437	int i, rc;
1438
1439	ata_print_version_once(&pdev->dev, DRV_VERSION);
1440
1441	/* allocate host */
1442	host = ata_host_alloc_pinfo(&pdev->dev, ppi, 4);
1443	hpriv = devm_kzalloc(&pdev->dev, sizeof(*hpriv), GFP_KERNEL);
1444	if (!host || !hpriv)
1445		return -ENOMEM;
1446
1447	host->private_data = hpriv;
1448
1449	/* acquire resources and fill host */
1450	rc = pcim_enable_device(pdev);
1451	if (rc)
1452		return rc;
1453
1454	rc = pcim_iomap_regions(pdev, (1 << PDC_MMIO_BAR) | (1 << PDC_DIMM_BAR),
1455				DRV_NAME);
1456	if (rc == -EBUSY)
1457		pcim_pin_device(pdev);
1458	if (rc)
1459		return rc;
1460	host->iomap = pcim_iomap_table(pdev);
1461
1462	for (i = 0; i < 4; i++) {
1463		struct ata_port *ap = host->ports[i];
1464		void __iomem *base = host->iomap[PDC_MMIO_BAR] + PDC_CHIP0_OFS;
1465		unsigned int offset = 0x200 + i * 0x80;
1466
1467		pdc_sata_setup_port(&ap->ioaddr, base + offset);
1468
1469		ata_port_pbar_desc(ap, PDC_MMIO_BAR, -1, "mmio");
1470		ata_port_pbar_desc(ap, PDC_DIMM_BAR, -1, "dimm");
1471		ata_port_pbar_desc(ap, PDC_MMIO_BAR, offset, "port");
1472	}
1473
1474	/* configure and activate */
1475	rc = dma_set_mask_and_coherent(&pdev->dev, ATA_DMA_MASK);
 
 
 
1476	if (rc)
1477		return rc;
1478
1479	if (pdc20621_dimm_init(host))
1480		return -ENOMEM;
1481	pdc_20621_init(host);
1482
1483	pci_set_master(pdev);
1484	return ata_host_activate(host, pdev->irq, pdc20621_interrupt,
1485				 IRQF_SHARED, &pdc_sata_sht);
1486}
1487
1488module_pci_driver(pdc_sata_pci_driver);
1489
1490MODULE_AUTHOR("Jeff Garzik");
1491MODULE_DESCRIPTION("Promise SATA low-level driver");
1492MODULE_LICENSE("GPL");
1493MODULE_DEVICE_TABLE(pci, pdc_sata_pci_tbl);
1494MODULE_VERSION(DRV_VERSION);
v4.6
 
   1/*
   2 *  sata_sx4.c - Promise SATA
   3 *
   4 *  Maintained by:  Tejun Heo <tj@kernel.org>
   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 documentation available under NDA.
  30 *
  31 */
  32
  33/*
  34	Theory of operation
  35	-------------------
  36
  37	The SX4 (PDC20621) chip features a single Host DMA (HDMA) copy
  38	engine, DIMM memory, and four ATA engines (one per SATA port).
  39	Data is copied to/from DIMM memory by the HDMA engine, before
  40	handing off to one (or more) of the ATA engines.  The ATA
  41	engines operate solely on DIMM memory.
  42
  43	The SX4 behaves like a PATA chip, with no SATA controls or
  44	knowledge whatsoever, leading to the presumption that
  45	PATA<->SATA bridges exist on SX4 boards, external to the
  46	PDC20621 chip itself.
  47
  48	The chip is quite capable, supporting an XOR engine and linked
  49	hardware commands (permits a string to transactions to be
  50	submitted and waited-on as a single unit), and an optional
  51	microprocessor.
  52
  53	The limiting factor is largely software.  This Linux driver was
  54	written to multiplex the single HDMA engine to copy disk
  55	transactions into a fixed DIMM memory space, from where an ATA
  56	engine takes over.  As a result, each WRITE looks like this:
  57
  58		submit HDMA packet to hardware
  59		hardware copies data from system memory to DIMM
  60		hardware raises interrupt
  61
  62		submit ATA packet to hardware
  63		hardware executes ATA WRITE command, w/ data in DIMM
  64		hardware raises interrupt
  65
  66	and each READ looks like this:
  67
  68		submit ATA packet to hardware
  69		hardware executes ATA READ command, w/ data in DIMM
  70		hardware raises interrupt
  71
  72		submit HDMA packet to hardware
  73		hardware copies data from DIMM to system memory
  74		hardware raises interrupt
  75
  76	This is a very slow, lock-step way of doing things that can
  77	certainly be improved by motivated kernel hackers.
  78
  79 */
  80
  81#include <linux/kernel.h>
  82#include <linux/module.h>
  83#include <linux/pci.h>
  84#include <linux/slab.h>
  85#include <linux/blkdev.h>
  86#include <linux/delay.h>
  87#include <linux/interrupt.h>
  88#include <linux/device.h>
  89#include <scsi/scsi_host.h>
  90#include <scsi/scsi_cmnd.h>
  91#include <linux/libata.h>
  92#include "sata_promise.h"
  93
  94#define DRV_NAME	"sata_sx4"
  95#define DRV_VERSION	"0.12"
  96
  97
  98enum {
  99	PDC_MMIO_BAR		= 3,
 100	PDC_DIMM_BAR		= 4,
 101
 102	PDC_PRD_TBL		= 0x44,	/* Direct command DMA table addr */
 103
 104	PDC_PKT_SUBMIT		= 0x40, /* Command packet pointer addr */
 105	PDC_HDMA_PKT_SUBMIT	= 0x100, /* Host DMA packet pointer addr */
 106	PDC_INT_SEQMASK		= 0x40,	/* Mask of asserted SEQ INTs */
 107	PDC_HDMA_CTLSTAT	= 0x12C, /* Host DMA control / status */
 108
 109	PDC_CTLSTAT		= 0x60,	/* IDEn control / status */
 110
 111	PDC_20621_SEQCTL	= 0x400,
 112	PDC_20621_SEQMASK	= 0x480,
 113	PDC_20621_GENERAL_CTL	= 0x484,
 114	PDC_20621_PAGE_SIZE	= (32 * 1024),
 115
 116	/* chosen, not constant, values; we design our own DIMM mem map */
 117	PDC_20621_DIMM_WINDOW	= 0x0C,	/* page# for 32K DIMM window */
 118	PDC_20621_DIMM_BASE	= 0x00200000,
 119	PDC_20621_DIMM_DATA	= (64 * 1024),
 120	PDC_DIMM_DATA_STEP	= (256 * 1024),
 121	PDC_DIMM_WINDOW_STEP	= (8 * 1024),
 122	PDC_DIMM_HOST_PRD	= (6 * 1024),
 123	PDC_DIMM_HOST_PKT	= (128 * 0),
 124	PDC_DIMM_HPKT_PRD	= (128 * 1),
 125	PDC_DIMM_ATA_PKT	= (128 * 2),
 126	PDC_DIMM_APKT_PRD	= (128 * 3),
 127	PDC_DIMM_HEADER_SZ	= PDC_DIMM_APKT_PRD + 128,
 128	PDC_PAGE_WINDOW		= 0x40,
 129	PDC_PAGE_DATA		= PDC_PAGE_WINDOW +
 130				  (PDC_20621_DIMM_DATA / PDC_20621_PAGE_SIZE),
 131	PDC_PAGE_SET		= PDC_DIMM_DATA_STEP / PDC_20621_PAGE_SIZE,
 132
 133	PDC_CHIP0_OFS		= 0xC0000, /* offset of chip #0 */
 134
 135	PDC_20621_ERR_MASK	= (1<<19) | (1<<20) | (1<<21) | (1<<22) |
 136				  (1<<23),
 137
 138	board_20621		= 0,	/* FastTrak S150 SX4 */
 139
 140	PDC_MASK_INT		= (1 << 10), /* HDMA/ATA mask int */
 141	PDC_RESET		= (1 << 11), /* HDMA/ATA reset */
 142	PDC_DMA_ENABLE		= (1 << 7),  /* DMA start/stop */
 143
 144	PDC_MAX_HDMA		= 32,
 145	PDC_HDMA_Q_MASK		= (PDC_MAX_HDMA - 1),
 146
 147	PDC_DIMM0_SPD_DEV_ADDRESS	= 0x50,
 148	PDC_DIMM1_SPD_DEV_ADDRESS	= 0x51,
 149	PDC_I2C_CONTROL			= 0x48,
 150	PDC_I2C_ADDR_DATA		= 0x4C,
 151	PDC_DIMM0_CONTROL		= 0x80,
 152	PDC_DIMM1_CONTROL		= 0x84,
 153	PDC_SDRAM_CONTROL		= 0x88,
 154	PDC_I2C_WRITE			= 0,		/* master -> slave */
 155	PDC_I2C_READ			= (1 << 6),	/* master <- slave */
 156	PDC_I2C_START			= (1 << 7),	/* start I2C proto */
 157	PDC_I2C_MASK_INT		= (1 << 5),	/* mask I2C interrupt */
 158	PDC_I2C_COMPLETE		= (1 << 16),	/* I2C normal compl. */
 159	PDC_I2C_NO_ACK			= (1 << 20),	/* slave no-ack addr */
 160	PDC_DIMM_SPD_SUBADDRESS_START	= 0x00,
 161	PDC_DIMM_SPD_SUBADDRESS_END	= 0x7F,
 162	PDC_DIMM_SPD_ROW_NUM		= 3,
 163	PDC_DIMM_SPD_COLUMN_NUM		= 4,
 164	PDC_DIMM_SPD_MODULE_ROW		= 5,
 165	PDC_DIMM_SPD_TYPE		= 11,
 166	PDC_DIMM_SPD_FRESH_RATE		= 12,
 167	PDC_DIMM_SPD_BANK_NUM		= 17,
 168	PDC_DIMM_SPD_CAS_LATENCY	= 18,
 169	PDC_DIMM_SPD_ATTRIBUTE		= 21,
 170	PDC_DIMM_SPD_ROW_PRE_CHARGE	= 27,
 171	PDC_DIMM_SPD_ROW_ACTIVE_DELAY	= 28,
 172	PDC_DIMM_SPD_RAS_CAS_DELAY	= 29,
 173	PDC_DIMM_SPD_ACTIVE_PRECHARGE	= 30,
 174	PDC_DIMM_SPD_SYSTEM_FREQ	= 126,
 175	PDC_CTL_STATUS			= 0x08,
 176	PDC_DIMM_WINDOW_CTLR		= 0x0C,
 177	PDC_TIME_CONTROL		= 0x3C,
 178	PDC_TIME_PERIOD			= 0x40,
 179	PDC_TIME_COUNTER		= 0x44,
 180	PDC_GENERAL_CTLR		= 0x484,
 181	PCI_PLL_INIT			= 0x8A531824,
 182	PCI_X_TCOUNT			= 0xEE1E5CFF,
 183
 184	/* PDC_TIME_CONTROL bits */
 185	PDC_TIMER_BUZZER		= (1 << 10),
 186	PDC_TIMER_MODE_PERIODIC		= 0,		/* bits 9:8 == 00 */
 187	PDC_TIMER_MODE_ONCE		= (1 << 8),	/* bits 9:8 == 01 */
 188	PDC_TIMER_ENABLE		= (1 << 7),
 189	PDC_TIMER_MASK_INT		= (1 << 5),
 190	PDC_TIMER_SEQ_MASK		= 0x1f,		/* SEQ ID for timer */
 191	PDC_TIMER_DEFAULT		= PDC_TIMER_MODE_ONCE |
 192					  PDC_TIMER_ENABLE |
 193					  PDC_TIMER_MASK_INT,
 194};
 195
 196#define ECC_ERASE_BUF_SZ (128 * 1024)
 197
 198struct pdc_port_priv {
 199	u8			dimm_buf[(ATA_PRD_SZ * ATA_MAX_PRD) + 512];
 200	u8			*pkt;
 201	dma_addr_t		pkt_dma;
 202};
 203
 204struct pdc_host_priv {
 205	unsigned int		doing_hdma;
 206	unsigned int		hdma_prod;
 207	unsigned int		hdma_cons;
 208	struct {
 209		struct ata_queued_cmd *qc;
 210		unsigned int	seq;
 211		unsigned long	pkt_ofs;
 212	} hdma[32];
 213};
 214
 215
 216static int pdc_sata_init_one(struct pci_dev *pdev, const struct pci_device_id *ent);
 217static void pdc_error_handler(struct ata_port *ap);
 218static void pdc_freeze(struct ata_port *ap);
 219static void pdc_thaw(struct ata_port *ap);
 220static int pdc_port_start(struct ata_port *ap);
 221static void pdc20621_qc_prep(struct ata_queued_cmd *qc);
 222static void pdc_tf_load_mmio(struct ata_port *ap, const struct ata_taskfile *tf);
 223static void pdc_exec_command_mmio(struct ata_port *ap, const struct ata_taskfile *tf);
 224static unsigned int pdc20621_dimm_init(struct ata_host *host);
 225static int pdc20621_detect_dimm(struct ata_host *host);
 226static unsigned int pdc20621_i2c_read(struct ata_host *host,
 227				      u32 device, u32 subaddr, u32 *pdata);
 228static int pdc20621_prog_dimm0(struct ata_host *host);
 229static unsigned int pdc20621_prog_dimm_global(struct ata_host *host);
 230#ifdef ATA_VERBOSE_DEBUG
 231static void pdc20621_get_from_dimm(struct ata_host *host,
 232				   void *psource, u32 offset, u32 size);
 233#endif
 234static void pdc20621_put_to_dimm(struct ata_host *host,
 235				 void *psource, u32 offset, u32 size);
 236static void pdc20621_irq_clear(struct ata_port *ap);
 237static unsigned int pdc20621_qc_issue(struct ata_queued_cmd *qc);
 238static int pdc_softreset(struct ata_link *link, unsigned int *class,
 239			 unsigned long deadline);
 240static void pdc_post_internal_cmd(struct ata_queued_cmd *qc);
 241static int pdc_check_atapi_dma(struct ata_queued_cmd *qc);
 242
 243
 244static struct scsi_host_template pdc_sata_sht = {
 245	ATA_BASE_SHT(DRV_NAME),
 246	.sg_tablesize		= LIBATA_MAX_PRD,
 247	.dma_boundary		= ATA_DMA_BOUNDARY,
 248};
 249
 250/* TODO: inherit from base port_ops after converting to new EH */
 251static struct ata_port_operations pdc_20621_ops = {
 252	.inherits		= &ata_sff_port_ops,
 253
 254	.check_atapi_dma	= pdc_check_atapi_dma,
 255	.qc_prep		= pdc20621_qc_prep,
 256	.qc_issue		= pdc20621_qc_issue,
 257
 258	.freeze			= pdc_freeze,
 259	.thaw			= pdc_thaw,
 260	.softreset		= pdc_softreset,
 261	.error_handler		= pdc_error_handler,
 262	.lost_interrupt		= ATA_OP_NULL,
 263	.post_internal_cmd	= pdc_post_internal_cmd,
 264
 265	.port_start		= pdc_port_start,
 266
 267	.sff_tf_load		= pdc_tf_load_mmio,
 268	.sff_exec_command	= pdc_exec_command_mmio,
 269	.sff_irq_clear		= pdc20621_irq_clear,
 270};
 271
 272static const struct ata_port_info pdc_port_info[] = {
 273	/* board_20621 */
 274	{
 275		.flags		= ATA_FLAG_SATA | ATA_FLAG_NO_ATAPI |
 276				  ATA_FLAG_PIO_POLLING,
 277		.pio_mask	= ATA_PIO4,
 278		.mwdma_mask	= ATA_MWDMA2,
 279		.udma_mask	= ATA_UDMA6,
 280		.port_ops	= &pdc_20621_ops,
 281	},
 282
 283};
 284
 285static const struct pci_device_id pdc_sata_pci_tbl[] = {
 286	{ PCI_VDEVICE(PROMISE, 0x6622), board_20621 },
 287
 288	{ }	/* terminate list */
 289};
 290
 291static struct pci_driver pdc_sata_pci_driver = {
 292	.name			= DRV_NAME,
 293	.id_table		= pdc_sata_pci_tbl,
 294	.probe			= pdc_sata_init_one,
 295	.remove			= ata_pci_remove_one,
 296};
 297
 298
 299static int pdc_port_start(struct ata_port *ap)
 300{
 301	struct device *dev = ap->host->dev;
 302	struct pdc_port_priv *pp;
 303
 304	pp = devm_kzalloc(dev, sizeof(*pp), GFP_KERNEL);
 305	if (!pp)
 306		return -ENOMEM;
 307
 308	pp->pkt = dmam_alloc_coherent(dev, 128, &pp->pkt_dma, GFP_KERNEL);
 309	if (!pp->pkt)
 310		return -ENOMEM;
 311
 312	ap->private_data = pp;
 313
 314	return 0;
 315}
 316
 317static inline void pdc20621_ata_sg(u8 *buf, unsigned int portno,
 318				   unsigned int total_len)
 319{
 320	u32 addr;
 321	unsigned int dw = PDC_DIMM_APKT_PRD >> 2;
 322	__le32 *buf32 = (__le32 *) buf;
 323
 324	/* output ATA packet S/G table */
 325	addr = PDC_20621_DIMM_BASE + PDC_20621_DIMM_DATA +
 326	       (PDC_DIMM_DATA_STEP * portno);
 327	VPRINTK("ATA sg addr 0x%x, %d\n", addr, addr);
 328	buf32[dw] = cpu_to_le32(addr);
 329	buf32[dw + 1] = cpu_to_le32(total_len | ATA_PRD_EOT);
 330
 331	VPRINTK("ATA PSG @ %x == (0x%x, 0x%x)\n",
 332		PDC_20621_DIMM_BASE +
 333		       (PDC_DIMM_WINDOW_STEP * portno) +
 334		       PDC_DIMM_APKT_PRD,
 335		buf32[dw], buf32[dw + 1]);
 336}
 337
 338static inline void pdc20621_host_sg(u8 *buf, unsigned int portno,
 339				    unsigned int total_len)
 340{
 341	u32 addr;
 342	unsigned int dw = PDC_DIMM_HPKT_PRD >> 2;
 343	__le32 *buf32 = (__le32 *) buf;
 344
 345	/* output Host DMA packet S/G table */
 346	addr = PDC_20621_DIMM_BASE + PDC_20621_DIMM_DATA +
 347	       (PDC_DIMM_DATA_STEP * portno);
 348
 349	buf32[dw] = cpu_to_le32(addr);
 350	buf32[dw + 1] = cpu_to_le32(total_len | ATA_PRD_EOT);
 351
 352	VPRINTK("HOST PSG @ %x == (0x%x, 0x%x)\n",
 353		PDC_20621_DIMM_BASE +
 354		       (PDC_DIMM_WINDOW_STEP * portno) +
 355		       PDC_DIMM_HPKT_PRD,
 356		buf32[dw], buf32[dw + 1]);
 357}
 358
 359static inline unsigned int pdc20621_ata_pkt(struct ata_taskfile *tf,
 360					    unsigned int devno, u8 *buf,
 361					    unsigned int portno)
 362{
 363	unsigned int i, dw;
 364	__le32 *buf32 = (__le32 *) buf;
 365	u8 dev_reg;
 366
 367	unsigned int dimm_sg = PDC_20621_DIMM_BASE +
 368			       (PDC_DIMM_WINDOW_STEP * portno) +
 369			       PDC_DIMM_APKT_PRD;
 370	VPRINTK("ENTER, dimm_sg == 0x%x, %d\n", dimm_sg, dimm_sg);
 371
 372	i = PDC_DIMM_ATA_PKT;
 373
 374	/*
 375	 * Set up ATA packet
 376	 */
 377	if ((tf->protocol == ATA_PROT_DMA) && (!(tf->flags & ATA_TFLAG_WRITE)))
 378		buf[i++] = PDC_PKT_READ;
 379	else if (tf->protocol == ATA_PROT_NODATA)
 380		buf[i++] = PDC_PKT_NODATA;
 381	else
 382		buf[i++] = 0;
 383	buf[i++] = 0;			/* reserved */
 384	buf[i++] = portno + 1;		/* seq. id */
 385	buf[i++] = 0xff;		/* delay seq. id */
 386
 387	/* dimm dma S/G, and next-pkt */
 388	dw = i >> 2;
 389	if (tf->protocol == ATA_PROT_NODATA)
 390		buf32[dw] = 0;
 391	else
 392		buf32[dw] = cpu_to_le32(dimm_sg);
 393	buf32[dw + 1] = 0;
 394	i += 8;
 395
 396	if (devno == 0)
 397		dev_reg = ATA_DEVICE_OBS;
 398	else
 399		dev_reg = ATA_DEVICE_OBS | ATA_DEV1;
 400
 401	/* select device */
 402	buf[i++] = (1 << 5) | PDC_PKT_CLEAR_BSY | ATA_REG_DEVICE;
 403	buf[i++] = dev_reg;
 404
 405	/* device control register */
 406	buf[i++] = (1 << 5) | PDC_REG_DEVCTL;
 407	buf[i++] = tf->ctl;
 408
 409	return i;
 410}
 411
 412static inline void pdc20621_host_pkt(struct ata_taskfile *tf, u8 *buf,
 413				     unsigned int portno)
 414{
 415	unsigned int dw;
 416	u32 tmp;
 417	__le32 *buf32 = (__le32 *) buf;
 418
 419	unsigned int host_sg = PDC_20621_DIMM_BASE +
 420			       (PDC_DIMM_WINDOW_STEP * portno) +
 421			       PDC_DIMM_HOST_PRD;
 422	unsigned int dimm_sg = PDC_20621_DIMM_BASE +
 423			       (PDC_DIMM_WINDOW_STEP * portno) +
 424			       PDC_DIMM_HPKT_PRD;
 425	VPRINTK("ENTER, dimm_sg == 0x%x, %d\n", dimm_sg, dimm_sg);
 426	VPRINTK("host_sg == 0x%x, %d\n", host_sg, host_sg);
 427
 428	dw = PDC_DIMM_HOST_PKT >> 2;
 429
 430	/*
 431	 * Set up Host DMA packet
 432	 */
 433	if ((tf->protocol == ATA_PROT_DMA) && (!(tf->flags & ATA_TFLAG_WRITE)))
 434		tmp = PDC_PKT_READ;
 435	else
 436		tmp = 0;
 437	tmp |= ((portno + 1 + 4) << 16);	/* seq. id */
 438	tmp |= (0xff << 24);			/* delay seq. id */
 439	buf32[dw + 0] = cpu_to_le32(tmp);
 440	buf32[dw + 1] = cpu_to_le32(host_sg);
 441	buf32[dw + 2] = cpu_to_le32(dimm_sg);
 442	buf32[dw + 3] = 0;
 443
 444	VPRINTK("HOST PKT @ %x == (0x%x 0x%x 0x%x 0x%x)\n",
 445		PDC_20621_DIMM_BASE + (PDC_DIMM_WINDOW_STEP * portno) +
 446			PDC_DIMM_HOST_PKT,
 447		buf32[dw + 0],
 448		buf32[dw + 1],
 449		buf32[dw + 2],
 450		buf32[dw + 3]);
 451}
 452
 453static void pdc20621_dma_prep(struct ata_queued_cmd *qc)
 454{
 455	struct scatterlist *sg;
 456	struct ata_port *ap = qc->ap;
 457	struct pdc_port_priv *pp = ap->private_data;
 458	void __iomem *mmio = ap->host->iomap[PDC_MMIO_BAR];
 459	void __iomem *dimm_mmio = ap->host->iomap[PDC_DIMM_BAR];
 460	unsigned int portno = ap->port_no;
 461	unsigned int i, si, idx, total_len = 0, sgt_len;
 462	__le32 *buf = (__le32 *) &pp->dimm_buf[PDC_DIMM_HEADER_SZ];
 463
 464	WARN_ON(!(qc->flags & ATA_QCFLAG_DMAMAP));
 465
 466	VPRINTK("ata%u: ENTER\n", ap->print_id);
 467
 468	/* hard-code chip #0 */
 469	mmio += PDC_CHIP0_OFS;
 470
 471	/*
 472	 * Build S/G table
 473	 */
 474	idx = 0;
 475	for_each_sg(qc->sg, sg, qc->n_elem, si) {
 476		buf[idx++] = cpu_to_le32(sg_dma_address(sg));
 477		buf[idx++] = cpu_to_le32(sg_dma_len(sg));
 478		total_len += sg_dma_len(sg);
 479	}
 480	buf[idx - 1] |= cpu_to_le32(ATA_PRD_EOT);
 481	sgt_len = idx * 4;
 482
 483	/*
 484	 * Build ATA, host DMA packets
 485	 */
 486	pdc20621_host_sg(&pp->dimm_buf[0], portno, total_len);
 487	pdc20621_host_pkt(&qc->tf, &pp->dimm_buf[0], portno);
 488
 489	pdc20621_ata_sg(&pp->dimm_buf[0], portno, total_len);
 490	i = pdc20621_ata_pkt(&qc->tf, qc->dev->devno, &pp->dimm_buf[0], portno);
 491
 492	if (qc->tf.flags & ATA_TFLAG_LBA48)
 493		i = pdc_prep_lba48(&qc->tf, &pp->dimm_buf[0], i);
 494	else
 495		i = pdc_prep_lba28(&qc->tf, &pp->dimm_buf[0], i);
 496
 497	pdc_pkt_footer(&qc->tf, &pp->dimm_buf[0], i);
 498
 499	/* copy three S/G tables and two packets to DIMM MMIO window */
 500	memcpy_toio(dimm_mmio + (portno * PDC_DIMM_WINDOW_STEP),
 501		    &pp->dimm_buf, PDC_DIMM_HEADER_SZ);
 502	memcpy_toio(dimm_mmio + (portno * PDC_DIMM_WINDOW_STEP) +
 503		    PDC_DIMM_HOST_PRD,
 504		    &pp->dimm_buf[PDC_DIMM_HEADER_SZ], sgt_len);
 505
 506	/* force host FIFO dump */
 507	writel(0x00000001, mmio + PDC_20621_GENERAL_CTL);
 508
 509	readl(dimm_mmio);	/* MMIO PCI posting flush */
 510
 511	VPRINTK("ata pkt buf ofs %u, prd size %u, mmio copied\n", i, sgt_len);
 512}
 513
 514static void pdc20621_nodata_prep(struct ata_queued_cmd *qc)
 515{
 516	struct ata_port *ap = qc->ap;
 517	struct pdc_port_priv *pp = ap->private_data;
 518	void __iomem *mmio = ap->host->iomap[PDC_MMIO_BAR];
 519	void __iomem *dimm_mmio = ap->host->iomap[PDC_DIMM_BAR];
 520	unsigned int portno = ap->port_no;
 521	unsigned int i;
 522
 523	VPRINTK("ata%u: ENTER\n", ap->print_id);
 524
 525	/* hard-code chip #0 */
 526	mmio += PDC_CHIP0_OFS;
 527
 528	i = pdc20621_ata_pkt(&qc->tf, qc->dev->devno, &pp->dimm_buf[0], portno);
 529
 530	if (qc->tf.flags & ATA_TFLAG_LBA48)
 531		i = pdc_prep_lba48(&qc->tf, &pp->dimm_buf[0], i);
 532	else
 533		i = pdc_prep_lba28(&qc->tf, &pp->dimm_buf[0], i);
 534
 535	pdc_pkt_footer(&qc->tf, &pp->dimm_buf[0], i);
 536
 537	/* copy three S/G tables and two packets to DIMM MMIO window */
 538	memcpy_toio(dimm_mmio + (portno * PDC_DIMM_WINDOW_STEP),
 539		    &pp->dimm_buf, PDC_DIMM_HEADER_SZ);
 540
 541	/* force host FIFO dump */
 542	writel(0x00000001, mmio + PDC_20621_GENERAL_CTL);
 543
 544	readl(dimm_mmio);	/* MMIO PCI posting flush */
 545
 546	VPRINTK("ata pkt buf ofs %u, mmio copied\n", i);
 547}
 548
 549static void pdc20621_qc_prep(struct ata_queued_cmd *qc)
 550{
 551	switch (qc->tf.protocol) {
 552	case ATA_PROT_DMA:
 553		pdc20621_dma_prep(qc);
 554		break;
 555	case ATA_PROT_NODATA:
 556		pdc20621_nodata_prep(qc);
 557		break;
 558	default:
 559		break;
 560	}
 
 
 561}
 562
 563static void __pdc20621_push_hdma(struct ata_queued_cmd *qc,
 564				 unsigned int seq,
 565				 u32 pkt_ofs)
 566{
 567	struct ata_port *ap = qc->ap;
 568	struct ata_host *host = ap->host;
 569	void __iomem *mmio = host->iomap[PDC_MMIO_BAR];
 570
 571	/* hard-code chip #0 */
 572	mmio += PDC_CHIP0_OFS;
 573
 574	writel(0x00000001, mmio + PDC_20621_SEQCTL + (seq * 4));
 575	readl(mmio + PDC_20621_SEQCTL + (seq * 4));	/* flush */
 576
 577	writel(pkt_ofs, mmio + PDC_HDMA_PKT_SUBMIT);
 578	readl(mmio + PDC_HDMA_PKT_SUBMIT);	/* flush */
 579}
 580
 581static void pdc20621_push_hdma(struct ata_queued_cmd *qc,
 582				unsigned int seq,
 583				u32 pkt_ofs)
 584{
 585	struct ata_port *ap = qc->ap;
 586	struct pdc_host_priv *pp = ap->host->private_data;
 587	unsigned int idx = pp->hdma_prod & PDC_HDMA_Q_MASK;
 588
 589	if (!pp->doing_hdma) {
 590		__pdc20621_push_hdma(qc, seq, pkt_ofs);
 591		pp->doing_hdma = 1;
 592		return;
 593	}
 594
 595	pp->hdma[idx].qc = qc;
 596	pp->hdma[idx].seq = seq;
 597	pp->hdma[idx].pkt_ofs = pkt_ofs;
 598	pp->hdma_prod++;
 599}
 600
 601static void pdc20621_pop_hdma(struct ata_queued_cmd *qc)
 602{
 603	struct ata_port *ap = qc->ap;
 604	struct pdc_host_priv *pp = ap->host->private_data;
 605	unsigned int idx = pp->hdma_cons & PDC_HDMA_Q_MASK;
 606
 607	/* if nothing on queue, we're done */
 608	if (pp->hdma_prod == pp->hdma_cons) {
 609		pp->doing_hdma = 0;
 610		return;
 611	}
 612
 613	__pdc20621_push_hdma(pp->hdma[idx].qc, pp->hdma[idx].seq,
 614			     pp->hdma[idx].pkt_ofs);
 615	pp->hdma_cons++;
 616}
 617
 618#ifdef ATA_VERBOSE_DEBUG
 619static void pdc20621_dump_hdma(struct ata_queued_cmd *qc)
 620{
 621	struct ata_port *ap = qc->ap;
 622	unsigned int port_no = ap->port_no;
 623	void __iomem *dimm_mmio = ap->host->iomap[PDC_DIMM_BAR];
 624
 625	dimm_mmio += (port_no * PDC_DIMM_WINDOW_STEP);
 626	dimm_mmio += PDC_DIMM_HOST_PKT;
 627
 628	printk(KERN_ERR "HDMA[0] == 0x%08X\n", readl(dimm_mmio));
 629	printk(KERN_ERR "HDMA[1] == 0x%08X\n", readl(dimm_mmio + 4));
 630	printk(KERN_ERR "HDMA[2] == 0x%08X\n", readl(dimm_mmio + 8));
 631	printk(KERN_ERR "HDMA[3] == 0x%08X\n", readl(dimm_mmio + 12));
 632}
 633#else
 634static inline void pdc20621_dump_hdma(struct ata_queued_cmd *qc) { }
 635#endif /* ATA_VERBOSE_DEBUG */
 636
 637static void pdc20621_packet_start(struct ata_queued_cmd *qc)
 638{
 639	struct ata_port *ap = qc->ap;
 640	struct ata_host *host = ap->host;
 641	unsigned int port_no = ap->port_no;
 642	void __iomem *mmio = host->iomap[PDC_MMIO_BAR];
 643	unsigned int rw = (qc->tf.flags & ATA_TFLAG_WRITE);
 644	u8 seq = (u8) (port_no + 1);
 645	unsigned int port_ofs;
 646
 647	/* hard-code chip #0 */
 648	mmio += PDC_CHIP0_OFS;
 649
 650	VPRINTK("ata%u: ENTER\n", ap->print_id);
 651
 652	wmb();			/* flush PRD, pkt writes */
 653
 654	port_ofs = PDC_20621_DIMM_BASE + (PDC_DIMM_WINDOW_STEP * port_no);
 655
 656	/* if writing, we (1) DMA to DIMM, then (2) do ATA command */
 657	if (rw && qc->tf.protocol == ATA_PROT_DMA) {
 658		seq += 4;
 659
 660		pdc20621_dump_hdma(qc);
 661		pdc20621_push_hdma(qc, seq, port_ofs + PDC_DIMM_HOST_PKT);
 662		VPRINTK("queued ofs 0x%x (%u), seq %u\n",
 663			port_ofs + PDC_DIMM_HOST_PKT,
 664			port_ofs + PDC_DIMM_HOST_PKT,
 665			seq);
 666	} else {
 667		writel(0x00000001, mmio + PDC_20621_SEQCTL + (seq * 4));
 668		readl(mmio + PDC_20621_SEQCTL + (seq * 4));	/* flush */
 669
 670		writel(port_ofs + PDC_DIMM_ATA_PKT,
 671		       ap->ioaddr.cmd_addr + PDC_PKT_SUBMIT);
 672		readl(ap->ioaddr.cmd_addr + PDC_PKT_SUBMIT);
 673		VPRINTK("submitted ofs 0x%x (%u), seq %u\n",
 674			port_ofs + PDC_DIMM_ATA_PKT,
 675			port_ofs + PDC_DIMM_ATA_PKT,
 676			seq);
 677	}
 678}
 679
 680static unsigned int pdc20621_qc_issue(struct ata_queued_cmd *qc)
 681{
 682	switch (qc->tf.protocol) {
 683	case ATA_PROT_NODATA:
 684		if (qc->tf.flags & ATA_TFLAG_POLLING)
 685			break;
 686		/*FALLTHROUGH*/
 687	case ATA_PROT_DMA:
 688		pdc20621_packet_start(qc);
 689		return 0;
 690
 691	case ATAPI_PROT_DMA:
 692		BUG();
 693		break;
 694
 695	default:
 696		break;
 697	}
 698
 699	return ata_sff_qc_issue(qc);
 700}
 701
 702static inline unsigned int pdc20621_host_intr(struct ata_port *ap,
 703					  struct ata_queued_cmd *qc,
 704					  unsigned int doing_hdma,
 705					  void __iomem *mmio)
 706{
 707	unsigned int port_no = ap->port_no;
 708	unsigned int port_ofs =
 709		PDC_20621_DIMM_BASE + (PDC_DIMM_WINDOW_STEP * port_no);
 710	u8 status;
 711	unsigned int handled = 0;
 712
 713	VPRINTK("ENTER\n");
 714
 715	if ((qc->tf.protocol == ATA_PROT_DMA) &&	/* read */
 716	    (!(qc->tf.flags & ATA_TFLAG_WRITE))) {
 717
 718		/* step two - DMA from DIMM to host */
 719		if (doing_hdma) {
 720			VPRINTK("ata%u: read hdma, 0x%x 0x%x\n", ap->print_id,
 721				readl(mmio + 0x104), readl(mmio + PDC_HDMA_CTLSTAT));
 722			/* get drive status; clear intr; complete txn */
 723			qc->err_mask |= ac_err_mask(ata_wait_idle(ap));
 724			ata_qc_complete(qc);
 725			pdc20621_pop_hdma(qc);
 726		}
 727
 728		/* step one - exec ATA command */
 729		else {
 730			u8 seq = (u8) (port_no + 1 + 4);
 731			VPRINTK("ata%u: read ata, 0x%x 0x%x\n", ap->print_id,
 732				readl(mmio + 0x104), readl(mmio + PDC_HDMA_CTLSTAT));
 733
 734			/* submit hdma pkt */
 735			pdc20621_dump_hdma(qc);
 736			pdc20621_push_hdma(qc, seq,
 737					   port_ofs + PDC_DIMM_HOST_PKT);
 738		}
 739		handled = 1;
 740
 741	} else if (qc->tf.protocol == ATA_PROT_DMA) {	/* write */
 742
 743		/* step one - DMA from host to DIMM */
 744		if (doing_hdma) {
 745			u8 seq = (u8) (port_no + 1);
 746			VPRINTK("ata%u: write hdma, 0x%x 0x%x\n", ap->print_id,
 747				readl(mmio + 0x104), readl(mmio + PDC_HDMA_CTLSTAT));
 748
 749			/* submit ata pkt */
 750			writel(0x00000001, mmio + PDC_20621_SEQCTL + (seq * 4));
 751			readl(mmio + PDC_20621_SEQCTL + (seq * 4));
 752			writel(port_ofs + PDC_DIMM_ATA_PKT,
 753			       ap->ioaddr.cmd_addr + PDC_PKT_SUBMIT);
 754			readl(ap->ioaddr.cmd_addr + PDC_PKT_SUBMIT);
 755		}
 756
 757		/* step two - execute ATA command */
 758		else {
 759			VPRINTK("ata%u: write ata, 0x%x 0x%x\n", ap->print_id,
 760				readl(mmio + 0x104), readl(mmio + PDC_HDMA_CTLSTAT));
 761			/* get drive status; clear intr; complete txn */
 762			qc->err_mask |= ac_err_mask(ata_wait_idle(ap));
 763			ata_qc_complete(qc);
 764			pdc20621_pop_hdma(qc);
 765		}
 766		handled = 1;
 767
 768	/* command completion, but no data xfer */
 769	} else if (qc->tf.protocol == ATA_PROT_NODATA) {
 770
 771		status = ata_sff_busy_wait(ap, ATA_BUSY | ATA_DRQ, 1000);
 772		DPRINTK("BUS_NODATA (drv_stat 0x%X)\n", status);
 773		qc->err_mask |= ac_err_mask(status);
 774		ata_qc_complete(qc);
 775		handled = 1;
 776
 777	} else {
 778		ap->stats.idle_irq++;
 779	}
 780
 781	return handled;
 782}
 783
 784static void pdc20621_irq_clear(struct ata_port *ap)
 785{
 786	ioread8(ap->ioaddr.status_addr);
 787}
 788
 789static irqreturn_t pdc20621_interrupt(int irq, void *dev_instance)
 790{
 791	struct ata_host *host = dev_instance;
 792	struct ata_port *ap;
 793	u32 mask = 0;
 794	unsigned int i, tmp, port_no;
 795	unsigned int handled = 0;
 796	void __iomem *mmio_base;
 797
 798	VPRINTK("ENTER\n");
 799
 800	if (!host || !host->iomap[PDC_MMIO_BAR]) {
 801		VPRINTK("QUICK EXIT\n");
 802		return IRQ_NONE;
 803	}
 804
 805	mmio_base = host->iomap[PDC_MMIO_BAR];
 806
 807	/* reading should also clear interrupts */
 808	mmio_base += PDC_CHIP0_OFS;
 809	mask = readl(mmio_base + PDC_20621_SEQMASK);
 810	VPRINTK("mask == 0x%x\n", mask);
 811
 812	if (mask == 0xffffffff) {
 813		VPRINTK("QUICK EXIT 2\n");
 814		return IRQ_NONE;
 815	}
 816	mask &= 0xffff;		/* only 16 tags possible */
 817	if (!mask) {
 818		VPRINTK("QUICK EXIT 3\n");
 819		return IRQ_NONE;
 820	}
 821
 822	spin_lock(&host->lock);
 823
 824	for (i = 1; i < 9; i++) {
 825		port_no = i - 1;
 826		if (port_no > 3)
 827			port_no -= 4;
 828		if (port_no >= host->n_ports)
 829			ap = NULL;
 830		else
 831			ap = host->ports[port_no];
 832		tmp = mask & (1 << i);
 833		VPRINTK("seq %u, port_no %u, ap %p, tmp %x\n", i, port_no, ap, tmp);
 834		if (tmp && ap) {
 835			struct ata_queued_cmd *qc;
 836
 837			qc = ata_qc_from_tag(ap, ap->link.active_tag);
 838			if (qc && (!(qc->tf.flags & ATA_TFLAG_POLLING)))
 839				handled += pdc20621_host_intr(ap, qc, (i > 4),
 840							      mmio_base);
 841		}
 842	}
 843
 844	spin_unlock(&host->lock);
 845
 846	VPRINTK("mask == 0x%x\n", mask);
 847
 848	VPRINTK("EXIT\n");
 849
 850	return IRQ_RETVAL(handled);
 851}
 852
 853static void pdc_freeze(struct ata_port *ap)
 854{
 855	void __iomem *mmio = ap->ioaddr.cmd_addr;
 856	u32 tmp;
 857
 858	/* FIXME: if all 4 ATA engines are stopped, also stop HDMA engine */
 859
 860	tmp = readl(mmio + PDC_CTLSTAT);
 861	tmp |= PDC_MASK_INT;
 862	tmp &= ~PDC_DMA_ENABLE;
 863	writel(tmp, mmio + PDC_CTLSTAT);
 864	readl(mmio + PDC_CTLSTAT); /* flush */
 865}
 866
 867static void pdc_thaw(struct ata_port *ap)
 868{
 869	void __iomem *mmio = ap->ioaddr.cmd_addr;
 870	u32 tmp;
 871
 872	/* FIXME: start HDMA engine, if zero ATA engines running */
 873
 874	/* clear IRQ */
 875	ioread8(ap->ioaddr.status_addr);
 876
 877	/* turn IRQ back on */
 878	tmp = readl(mmio + PDC_CTLSTAT);
 879	tmp &= ~PDC_MASK_INT;
 880	writel(tmp, mmio + PDC_CTLSTAT);
 881	readl(mmio + PDC_CTLSTAT); /* flush */
 882}
 883
 884static void pdc_reset_port(struct ata_port *ap)
 885{
 886	void __iomem *mmio = ap->ioaddr.cmd_addr + PDC_CTLSTAT;
 887	unsigned int i;
 888	u32 tmp;
 889
 890	/* FIXME: handle HDMA copy engine */
 891
 892	for (i = 11; i > 0; i--) {
 893		tmp = readl(mmio);
 894		if (tmp & PDC_RESET)
 895			break;
 896
 897		udelay(100);
 898
 899		tmp |= PDC_RESET;
 900		writel(tmp, mmio);
 901	}
 902
 903	tmp &= ~PDC_RESET;
 904	writel(tmp, mmio);
 905	readl(mmio);	/* flush */
 906}
 907
 908static int pdc_softreset(struct ata_link *link, unsigned int *class,
 909			 unsigned long deadline)
 910{
 911	pdc_reset_port(link->ap);
 912	return ata_sff_softreset(link, class, deadline);
 913}
 914
 915static void pdc_error_handler(struct ata_port *ap)
 916{
 917	if (!(ap->pflags & ATA_PFLAG_FROZEN))
 918		pdc_reset_port(ap);
 919
 920	ata_sff_error_handler(ap);
 921}
 922
 923static void pdc_post_internal_cmd(struct ata_queued_cmd *qc)
 924{
 925	struct ata_port *ap = qc->ap;
 926
 927	/* make DMA engine forget about the failed command */
 928	if (qc->flags & ATA_QCFLAG_FAILED)
 929		pdc_reset_port(ap);
 930}
 931
 932static int pdc_check_atapi_dma(struct ata_queued_cmd *qc)
 933{
 934	u8 *scsicmd = qc->scsicmd->cmnd;
 935	int pio = 1; /* atapi dma off by default */
 936
 937	/* Whitelist commands that may use DMA. */
 938	switch (scsicmd[0]) {
 939	case WRITE_12:
 940	case WRITE_10:
 941	case WRITE_6:
 942	case READ_12:
 943	case READ_10:
 944	case READ_6:
 945	case 0xad: /* READ_DVD_STRUCTURE */
 946	case 0xbe: /* READ_CD */
 947		pio = 0;
 948	}
 949	/* -45150 (FFFF4FA2) to -1 (FFFFFFFF) shall use PIO mode */
 950	if (scsicmd[0] == WRITE_10) {
 951		unsigned int lba =
 952			(scsicmd[2] << 24) |
 953			(scsicmd[3] << 16) |
 954			(scsicmd[4] << 8) |
 955			scsicmd[5];
 956		if (lba >= 0xFFFF4FA2)
 957			pio = 1;
 958	}
 959	return pio;
 960}
 961
 962static void pdc_tf_load_mmio(struct ata_port *ap, const struct ata_taskfile *tf)
 963{
 964	WARN_ON(tf->protocol == ATA_PROT_DMA ||
 965		tf->protocol == ATAPI_PROT_DMA);
 966	ata_sff_tf_load(ap, tf);
 967}
 968
 969
 970static void pdc_exec_command_mmio(struct ata_port *ap, const struct ata_taskfile *tf)
 971{
 972	WARN_ON(tf->protocol == ATA_PROT_DMA ||
 973		tf->protocol == ATAPI_PROT_DMA);
 974	ata_sff_exec_command(ap, tf);
 975}
 976
 977
 978static void pdc_sata_setup_port(struct ata_ioports *port, void __iomem *base)
 979{
 980	port->cmd_addr		= base;
 981	port->data_addr		= base;
 982	port->feature_addr	=
 983	port->error_addr	= base + 0x4;
 984	port->nsect_addr	= base + 0x8;
 985	port->lbal_addr		= base + 0xc;
 986	port->lbam_addr		= base + 0x10;
 987	port->lbah_addr		= base + 0x14;
 988	port->device_addr	= base + 0x18;
 989	port->command_addr	=
 990	port->status_addr	= base + 0x1c;
 991	port->altstatus_addr	=
 992	port->ctl_addr		= base + 0x38;
 993}
 994
 995
 996#ifdef ATA_VERBOSE_DEBUG
 997static void pdc20621_get_from_dimm(struct ata_host *host, void *psource,
 998				   u32 offset, u32 size)
 999{
1000	u32 window_size;
1001	u16 idx;
1002	u8 page_mask;
1003	long dist;
1004	void __iomem *mmio = host->iomap[PDC_MMIO_BAR];
1005	void __iomem *dimm_mmio = host->iomap[PDC_DIMM_BAR];
1006
1007	/* hard-code chip #0 */
1008	mmio += PDC_CHIP0_OFS;
1009
1010	page_mask = 0x00;
1011	window_size = 0x2000 * 4; /* 32K byte uchar size */
1012	idx = (u16) (offset / window_size);
1013
1014	writel(0x01, mmio + PDC_GENERAL_CTLR);
1015	readl(mmio + PDC_GENERAL_CTLR);
1016	writel(((idx) << page_mask), mmio + PDC_DIMM_WINDOW_CTLR);
1017	readl(mmio + PDC_DIMM_WINDOW_CTLR);
1018
1019	offset -= (idx * window_size);
1020	idx++;
1021	dist = ((long) (window_size - (offset + size))) >= 0 ? size :
1022		(long) (window_size - offset);
1023	memcpy_fromio(psource, dimm_mmio + offset / 4, dist);
1024
1025	psource += dist;
1026	size -= dist;
1027	for (; (long) size >= (long) window_size ;) {
1028		writel(0x01, mmio + PDC_GENERAL_CTLR);
1029		readl(mmio + PDC_GENERAL_CTLR);
1030		writel(((idx) << page_mask), mmio + PDC_DIMM_WINDOW_CTLR);
1031		readl(mmio + PDC_DIMM_WINDOW_CTLR);
1032		memcpy_fromio(psource, dimm_mmio, window_size / 4);
1033		psource += window_size;
1034		size -= window_size;
1035		idx++;
1036	}
1037
1038	if (size) {
1039		writel(0x01, mmio + PDC_GENERAL_CTLR);
1040		readl(mmio + PDC_GENERAL_CTLR);
1041		writel(((idx) << page_mask), mmio + PDC_DIMM_WINDOW_CTLR);
1042		readl(mmio + PDC_DIMM_WINDOW_CTLR);
1043		memcpy_fromio(psource, dimm_mmio, size / 4);
1044	}
1045}
1046#endif
1047
1048
1049static void pdc20621_put_to_dimm(struct ata_host *host, void *psource,
1050				 u32 offset, u32 size)
1051{
1052	u32 window_size;
1053	u16 idx;
1054	u8 page_mask;
1055	long dist;
1056	void __iomem *mmio = host->iomap[PDC_MMIO_BAR];
1057	void __iomem *dimm_mmio = host->iomap[PDC_DIMM_BAR];
1058
1059	/* hard-code chip #0 */
1060	mmio += PDC_CHIP0_OFS;
1061
1062	page_mask = 0x00;
1063	window_size = 0x2000 * 4;       /* 32K byte uchar size */
1064	idx = (u16) (offset / window_size);
1065
1066	writel(((idx) << page_mask), mmio + PDC_DIMM_WINDOW_CTLR);
1067	readl(mmio + PDC_DIMM_WINDOW_CTLR);
1068	offset -= (idx * window_size);
1069	idx++;
1070	dist = ((long)(s32)(window_size - (offset + size))) >= 0 ? size :
1071		(long) (window_size - offset);
1072	memcpy_toio(dimm_mmio + offset / 4, psource, dist);
1073	writel(0x01, mmio + PDC_GENERAL_CTLR);
1074	readl(mmio + PDC_GENERAL_CTLR);
1075
1076	psource += dist;
1077	size -= dist;
1078	for (; (long) size >= (long) window_size ;) {
1079		writel(((idx) << page_mask), mmio + PDC_DIMM_WINDOW_CTLR);
1080		readl(mmio + PDC_DIMM_WINDOW_CTLR);
1081		memcpy_toio(dimm_mmio, psource, window_size / 4);
1082		writel(0x01, mmio + PDC_GENERAL_CTLR);
1083		readl(mmio + PDC_GENERAL_CTLR);
1084		psource += window_size;
1085		size -= window_size;
1086		idx++;
1087	}
1088
1089	if (size) {
1090		writel(((idx) << page_mask), mmio + PDC_DIMM_WINDOW_CTLR);
1091		readl(mmio + PDC_DIMM_WINDOW_CTLR);
1092		memcpy_toio(dimm_mmio, psource, size / 4);
1093		writel(0x01, mmio + PDC_GENERAL_CTLR);
1094		readl(mmio + PDC_GENERAL_CTLR);
1095	}
1096}
1097
1098
1099static unsigned int pdc20621_i2c_read(struct ata_host *host, u32 device,
1100				      u32 subaddr, u32 *pdata)
1101{
1102	void __iomem *mmio = host->iomap[PDC_MMIO_BAR];
1103	u32 i2creg  = 0;
1104	u32 status;
1105	u32 count = 0;
1106
1107	/* hard-code chip #0 */
1108	mmio += PDC_CHIP0_OFS;
1109
1110	i2creg |= device << 24;
1111	i2creg |= subaddr << 16;
1112
1113	/* Set the device and subaddress */
1114	writel(i2creg, mmio + PDC_I2C_ADDR_DATA);
1115	readl(mmio + PDC_I2C_ADDR_DATA);
1116
1117	/* Write Control to perform read operation, mask int */
1118	writel(PDC_I2C_READ | PDC_I2C_START | PDC_I2C_MASK_INT,
1119	       mmio + PDC_I2C_CONTROL);
1120
1121	for (count = 0; count <= 1000; count ++) {
1122		status = readl(mmio + PDC_I2C_CONTROL);
1123		if (status & PDC_I2C_COMPLETE) {
1124			status = readl(mmio + PDC_I2C_ADDR_DATA);
1125			break;
1126		} else if (count == 1000)
1127			return 0;
1128	}
1129
1130	*pdata = (status >> 8) & 0x000000ff;
1131	return 1;
1132}
1133
1134
1135static int pdc20621_detect_dimm(struct ata_host *host)
1136{
1137	u32 data = 0;
1138	if (pdc20621_i2c_read(host, PDC_DIMM0_SPD_DEV_ADDRESS,
1139			     PDC_DIMM_SPD_SYSTEM_FREQ, &data)) {
1140		if (data == 100)
1141			return 100;
1142	} else
1143		return 0;
1144
1145	if (pdc20621_i2c_read(host, PDC_DIMM0_SPD_DEV_ADDRESS, 9, &data)) {
1146		if (data <= 0x75)
1147			return 133;
1148	} else
1149		return 0;
1150
1151	return 0;
1152}
1153
1154
1155static int pdc20621_prog_dimm0(struct ata_host *host)
1156{
1157	u32 spd0[50];
1158	u32 data = 0;
1159	int size, i;
1160	u8 bdimmsize;
1161	void __iomem *mmio = host->iomap[PDC_MMIO_BAR];
1162	static const struct {
1163		unsigned int reg;
1164		unsigned int ofs;
1165	} pdc_i2c_read_data [] = {
1166		{ PDC_DIMM_SPD_TYPE, 11 },
1167		{ PDC_DIMM_SPD_FRESH_RATE, 12 },
1168		{ PDC_DIMM_SPD_COLUMN_NUM, 4 },
1169		{ PDC_DIMM_SPD_ATTRIBUTE, 21 },
1170		{ PDC_DIMM_SPD_ROW_NUM, 3 },
1171		{ PDC_DIMM_SPD_BANK_NUM, 17 },
1172		{ PDC_DIMM_SPD_MODULE_ROW, 5 },
1173		{ PDC_DIMM_SPD_ROW_PRE_CHARGE, 27 },
1174		{ PDC_DIMM_SPD_ROW_ACTIVE_DELAY, 28 },
1175		{ PDC_DIMM_SPD_RAS_CAS_DELAY, 29 },
1176		{ PDC_DIMM_SPD_ACTIVE_PRECHARGE, 30 },
1177		{ PDC_DIMM_SPD_CAS_LATENCY, 18 },
1178	};
1179
1180	/* hard-code chip #0 */
1181	mmio += PDC_CHIP0_OFS;
1182
1183	for (i = 0; i < ARRAY_SIZE(pdc_i2c_read_data); i++)
1184		pdc20621_i2c_read(host, PDC_DIMM0_SPD_DEV_ADDRESS,
1185				  pdc_i2c_read_data[i].reg,
1186				  &spd0[pdc_i2c_read_data[i].ofs]);
1187
1188	data |= (spd0[4] - 8) | ((spd0[21] != 0) << 3) | ((spd0[3]-11) << 4);
1189	data |= ((spd0[17] / 4) << 6) | ((spd0[5] / 2) << 7) |
1190		((((spd0[27] + 9) / 10) - 1) << 8) ;
1191	data |= (((((spd0[29] > spd0[28])
1192		    ? spd0[29] : spd0[28]) + 9) / 10) - 1) << 10;
1193	data |= ((spd0[30] - spd0[29] + 9) / 10 - 2) << 12;
1194
1195	if (spd0[18] & 0x08)
1196		data |= ((0x03) << 14);
1197	else if (spd0[18] & 0x04)
1198		data |= ((0x02) << 14);
1199	else if (spd0[18] & 0x01)
1200		data |= ((0x01) << 14);
1201	else
1202		data |= (0 << 14);
1203
1204	/*
1205	   Calculate the size of bDIMMSize (power of 2) and
1206	   merge the DIMM size by program start/end address.
1207	*/
1208
1209	bdimmsize = spd0[4] + (spd0[5] / 2) + spd0[3] + (spd0[17] / 2) + 3;
1210	size = (1 << bdimmsize) >> 20;	/* size = xxx(MB) */
1211	data |= (((size / 16) - 1) << 16);
1212	data |= (0 << 23);
1213	data |= 8;
1214	writel(data, mmio + PDC_DIMM0_CONTROL);
1215	readl(mmio + PDC_DIMM0_CONTROL);
1216	return size;
1217}
1218
1219
1220static unsigned int pdc20621_prog_dimm_global(struct ata_host *host)
1221{
1222	u32 data, spd0;
1223	int error, i;
1224	void __iomem *mmio = host->iomap[PDC_MMIO_BAR];
1225
1226	/* hard-code chip #0 */
1227	mmio += PDC_CHIP0_OFS;
1228
1229	/*
1230	  Set To Default : DIMM Module Global Control Register (0x022259F1)
1231	  DIMM Arbitration Disable (bit 20)
1232	  DIMM Data/Control Output Driving Selection (bit12 - bit15)
1233	  Refresh Enable (bit 17)
1234	*/
1235
1236	data = 0x022259F1;
1237	writel(data, mmio + PDC_SDRAM_CONTROL);
1238	readl(mmio + PDC_SDRAM_CONTROL);
1239
1240	/* Turn on for ECC */
1241	if (!pdc20621_i2c_read(host, PDC_DIMM0_SPD_DEV_ADDRESS,
1242			       PDC_DIMM_SPD_TYPE, &spd0)) {
1243		pr_err("Failed in i2c read: device=%#x, subaddr=%#x\n",
1244		       PDC_DIMM0_SPD_DEV_ADDRESS, PDC_DIMM_SPD_TYPE);
1245		return 1;
1246	}
1247	if (spd0 == 0x02) {
1248		data |= (0x01 << 16);
1249		writel(data, mmio + PDC_SDRAM_CONTROL);
1250		readl(mmio + PDC_SDRAM_CONTROL);
1251		printk(KERN_ERR "Local DIMM ECC Enabled\n");
1252	}
1253
1254	/* DIMM Initialization Select/Enable (bit 18/19) */
1255	data &= (~(1<<18));
1256	data |= (1<<19);
1257	writel(data, mmio + PDC_SDRAM_CONTROL);
1258
1259	error = 1;
1260	for (i = 1; i <= 10; i++) {   /* polling ~5 secs */
1261		data = readl(mmio + PDC_SDRAM_CONTROL);
1262		if (!(data & (1<<19))) {
1263			error = 0;
1264			break;
1265		}
1266		msleep(i*100);
1267	}
1268	return error;
1269}
1270
1271
1272static unsigned int pdc20621_dimm_init(struct ata_host *host)
1273{
1274	int speed, size, length;
1275	u32 addr, spd0, pci_status;
1276	u32 time_period = 0;
1277	u32 tcount = 0;
1278	u32 ticks = 0;
1279	u32 clock = 0;
1280	u32 fparam = 0;
1281	void __iomem *mmio = host->iomap[PDC_MMIO_BAR];
1282
1283	/* hard-code chip #0 */
1284	mmio += PDC_CHIP0_OFS;
1285
1286	/* Initialize PLL based upon PCI Bus Frequency */
1287
1288	/* Initialize Time Period Register */
1289	writel(0xffffffff, mmio + PDC_TIME_PERIOD);
1290	time_period = readl(mmio + PDC_TIME_PERIOD);
1291	VPRINTK("Time Period Register (0x40): 0x%x\n", time_period);
1292
1293	/* Enable timer */
1294	writel(PDC_TIMER_DEFAULT, mmio + PDC_TIME_CONTROL);
1295	readl(mmio + PDC_TIME_CONTROL);
1296
1297	/* Wait 3 seconds */
1298	msleep(3000);
1299
1300	/*
1301	   When timer is enabled, counter is decreased every internal
1302	   clock cycle.
1303	*/
1304
1305	tcount = readl(mmio + PDC_TIME_COUNTER);
1306	VPRINTK("Time Counter Register (0x44): 0x%x\n", tcount);
1307
1308	/*
1309	   If SX4 is on PCI-X bus, after 3 seconds, the timer counter
1310	   register should be >= (0xffffffff - 3x10^8).
1311	*/
1312	if (tcount >= PCI_X_TCOUNT) {
1313		ticks = (time_period - tcount);
1314		VPRINTK("Num counters 0x%x (%d)\n", ticks, ticks);
1315
1316		clock = (ticks / 300000);
1317		VPRINTK("10 * Internal clk = 0x%x (%d)\n", clock, clock);
1318
1319		clock = (clock * 33);
1320		VPRINTK("10 * Internal clk * 33 = 0x%x (%d)\n", clock, clock);
1321
1322		/* PLL F Param (bit 22:16) */
1323		fparam = (1400000 / clock) - 2;
1324		VPRINTK("PLL F Param: 0x%x (%d)\n", fparam, fparam);
1325
1326		/* OD param = 0x2 (bit 31:30), R param = 0x5 (bit 29:25) */
1327		pci_status = (0x8a001824 | (fparam << 16));
1328	} else
1329		pci_status = PCI_PLL_INIT;
1330
1331	/* Initialize PLL. */
1332	VPRINTK("pci_status: 0x%x\n", pci_status);
1333	writel(pci_status, mmio + PDC_CTL_STATUS);
1334	readl(mmio + PDC_CTL_STATUS);
1335
1336	/*
1337	   Read SPD of DIMM by I2C interface,
1338	   and program the DIMM Module Controller.
1339	*/
1340	if (!(speed = pdc20621_detect_dimm(host))) {
1341		printk(KERN_ERR "Detect Local DIMM Fail\n");
1342		return 1;	/* DIMM error */
1343	}
1344	VPRINTK("Local DIMM Speed = %d\n", speed);
1345
1346	/* Programming DIMM0 Module Control Register (index_CID0:80h) */
1347	size = pdc20621_prog_dimm0(host);
1348	VPRINTK("Local DIMM Size = %dMB\n", size);
1349
1350	/* Programming DIMM Module Global Control Register (index_CID0:88h) */
1351	if (pdc20621_prog_dimm_global(host)) {
1352		printk(KERN_ERR "Programming DIMM Module Global Control Register Fail\n");
1353		return 1;
1354	}
1355
1356#ifdef ATA_VERBOSE_DEBUG
1357	{
1358		u8 test_parttern1[40] =
1359			{0x55,0xAA,'P','r','o','m','i','s','e',' ',
1360			'N','o','t',' ','Y','e','t',' ',
1361			'D','e','f','i','n','e','d',' ',
1362			'1','.','1','0',
1363			'9','8','0','3','1','6','1','2',0,0};
1364		u8 test_parttern2[40] = {0};
1365
1366		pdc20621_put_to_dimm(host, test_parttern2, 0x10040, 40);
1367		pdc20621_put_to_dimm(host, test_parttern2, 0x40, 40);
1368
1369		pdc20621_put_to_dimm(host, test_parttern1, 0x10040, 40);
1370		pdc20621_get_from_dimm(host, test_parttern2, 0x40, 40);
1371		printk(KERN_ERR "%x, %x, %s\n", test_parttern2[0],
1372		       test_parttern2[1], &(test_parttern2[2]));
1373		pdc20621_get_from_dimm(host, test_parttern2, 0x10040,
1374				       40);
1375		printk(KERN_ERR "%x, %x, %s\n", test_parttern2[0],
1376		       test_parttern2[1], &(test_parttern2[2]));
1377
1378		pdc20621_put_to_dimm(host, test_parttern1, 0x40, 40);
1379		pdc20621_get_from_dimm(host, test_parttern2, 0x40, 40);
1380		printk(KERN_ERR "%x, %x, %s\n", test_parttern2[0],
1381		       test_parttern2[1], &(test_parttern2[2]));
1382	}
1383#endif
1384
1385	/* ECC initiliazation. */
1386
1387	if (!pdc20621_i2c_read(host, PDC_DIMM0_SPD_DEV_ADDRESS,
1388			       PDC_DIMM_SPD_TYPE, &spd0)) {
1389		pr_err("Failed in i2c read: device=%#x, subaddr=%#x\n",
1390		       PDC_DIMM0_SPD_DEV_ADDRESS, PDC_DIMM_SPD_TYPE);
1391		return 1;
1392	}
1393	if (spd0 == 0x02) {
1394		void *buf;
1395		VPRINTK("Start ECC initialization\n");
1396		addr = 0;
1397		length = size * 1024 * 1024;
1398		buf = kzalloc(ECC_ERASE_BUF_SZ, GFP_KERNEL);
1399		if (!buf)
1400			return 1;
1401		while (addr < length) {
1402			pdc20621_put_to_dimm(host, buf, addr,
1403					     ECC_ERASE_BUF_SZ);
1404			addr += ECC_ERASE_BUF_SZ;
1405		}
1406		kfree(buf);
1407		VPRINTK("Finish ECC initialization\n");
1408	}
1409	return 0;
1410}
1411
1412
1413static void pdc_20621_init(struct ata_host *host)
1414{
1415	u32 tmp;
1416	void __iomem *mmio = host->iomap[PDC_MMIO_BAR];
1417
1418	/* hard-code chip #0 */
1419	mmio += PDC_CHIP0_OFS;
1420
1421	/*
1422	 * Select page 0x40 for our 32k DIMM window
1423	 */
1424	tmp = readl(mmio + PDC_20621_DIMM_WINDOW) & 0xffff0000;
1425	tmp |= PDC_PAGE_WINDOW;	/* page 40h; arbitrarily selected */
1426	writel(tmp, mmio + PDC_20621_DIMM_WINDOW);
1427
1428	/*
1429	 * Reset Host DMA
1430	 */
1431	tmp = readl(mmio + PDC_HDMA_CTLSTAT);
1432	tmp |= PDC_RESET;
1433	writel(tmp, mmio + PDC_HDMA_CTLSTAT);
1434	readl(mmio + PDC_HDMA_CTLSTAT);		/* flush */
1435
1436	udelay(10);
1437
1438	tmp = readl(mmio + PDC_HDMA_CTLSTAT);
1439	tmp &= ~PDC_RESET;
1440	writel(tmp, mmio + PDC_HDMA_CTLSTAT);
1441	readl(mmio + PDC_HDMA_CTLSTAT);		/* flush */
1442}
1443
1444static int pdc_sata_init_one(struct pci_dev *pdev,
1445			     const struct pci_device_id *ent)
1446{
1447	const struct ata_port_info *ppi[] =
1448		{ &pdc_port_info[ent->driver_data], NULL };
1449	struct ata_host *host;
1450	struct pdc_host_priv *hpriv;
1451	int i, rc;
1452
1453	ata_print_version_once(&pdev->dev, DRV_VERSION);
1454
1455	/* allocate host */
1456	host = ata_host_alloc_pinfo(&pdev->dev, ppi, 4);
1457	hpriv = devm_kzalloc(&pdev->dev, sizeof(*hpriv), GFP_KERNEL);
1458	if (!host || !hpriv)
1459		return -ENOMEM;
1460
1461	host->private_data = hpriv;
1462
1463	/* acquire resources and fill host */
1464	rc = pcim_enable_device(pdev);
1465	if (rc)
1466		return rc;
1467
1468	rc = pcim_iomap_regions(pdev, (1 << PDC_MMIO_BAR) | (1 << PDC_DIMM_BAR),
1469				DRV_NAME);
1470	if (rc == -EBUSY)
1471		pcim_pin_device(pdev);
1472	if (rc)
1473		return rc;
1474	host->iomap = pcim_iomap_table(pdev);
1475
1476	for (i = 0; i < 4; i++) {
1477		struct ata_port *ap = host->ports[i];
1478		void __iomem *base = host->iomap[PDC_MMIO_BAR] + PDC_CHIP0_OFS;
1479		unsigned int offset = 0x200 + i * 0x80;
1480
1481		pdc_sata_setup_port(&ap->ioaddr, base + offset);
1482
1483		ata_port_pbar_desc(ap, PDC_MMIO_BAR, -1, "mmio");
1484		ata_port_pbar_desc(ap, PDC_DIMM_BAR, -1, "dimm");
1485		ata_port_pbar_desc(ap, PDC_MMIO_BAR, offset, "port");
1486	}
1487
1488	/* configure and activate */
1489	rc = dma_set_mask(&pdev->dev, ATA_DMA_MASK);
1490	if (rc)
1491		return rc;
1492	rc = dma_set_coherent_mask(&pdev->dev, ATA_DMA_MASK);
1493	if (rc)
1494		return rc;
1495
1496	if (pdc20621_dimm_init(host))
1497		return -ENOMEM;
1498	pdc_20621_init(host);
1499
1500	pci_set_master(pdev);
1501	return ata_host_activate(host, pdev->irq, pdc20621_interrupt,
1502				 IRQF_SHARED, &pdc_sata_sht);
1503}
1504
1505module_pci_driver(pdc_sata_pci_driver);
1506
1507MODULE_AUTHOR("Jeff Garzik");
1508MODULE_DESCRIPTION("Promise SATA low-level driver");
1509MODULE_LICENSE("GPL");
1510MODULE_DEVICE_TABLE(pci, pdc_sata_pci_tbl);
1511MODULE_VERSION(DRV_VERSION);