1 /*
2  * pata_cmd64x.c 	- CMD64x PATA for new ATA layer
3  *			  (C) 2005 Red Hat Inc
4  *			  Alan Cox <alan@lxorguk.ukuu.org.uk>
5  *			  (C) 2009-2010 Bartlomiej Zolnierkiewicz
6  *			  (C) 2012 MontaVista Software, LLC <source@mvista.com>
7  *
8  * Based upon
9  * linux/drivers/ide/pci/cmd64x.c		Version 1.30	Sept 10, 2002
10  *
11  * cmd64x.c: Enable interrupts at initialization time on Ultra/PCI machines.
12  *           Note, this driver is not used at all on other systems because
13  *           there the "BIOS" has done all of the following already.
14  *           Due to massive hardware bugs, UltraDMA is only supported
15  *           on the 646U2 and not on the 646U.
16  *
17  * Copyright (C) 1998		Eddie C. Dost  (ecd@skynet.be)
18  * Copyright (C) 1998		David S. Miller (davem@redhat.com)
19  *
20  * Copyright (C) 1999-2002	Andre Hedrick <andre@linux-ide.org>
21  *
22  * TODO
23  *	Testing work
24  */
25 
26 #include <linux/kernel.h>
27 #include <linux/module.h>
28 #include <linux/pci.h>
29 #include <linux/blkdev.h>
30 #include <linux/delay.h>
31 #include <scsi/scsi_host.h>
32 #include <linux/libata.h>
33 
34 #define DRV_NAME "pata_cmd64x"
35 #define DRV_VERSION "0.2.18"
36 
37 /*
38  * CMD64x specific registers definition.
39  */
40 
41 enum {
42 	CFR 		= 0x50,
43 		CFR_INTR_CH0  = 0x04,
44 	CNTRL		= 0x51,
45 		CNTRL_CH0     = 0x04,
46 		CNTRL_CH1     = 0x08,
47 	CMDTIM 		= 0x52,
48 	ARTTIM0 	= 0x53,
49 	DRWTIM0 	= 0x54,
50 	ARTTIM1 	= 0x55,
51 	DRWTIM1 	= 0x56,
52 	ARTTIM23 	= 0x57,
53 		ARTTIM23_DIS_RA2  = 0x04,
54 		ARTTIM23_DIS_RA3  = 0x08,
55 		ARTTIM23_INTR_CH1 = 0x10,
56 	DRWTIM2 	= 0x58,
57 	BRST 		= 0x59,
58 	DRWTIM3 	= 0x5b,
59 	BMIDECR0	= 0x70,
60 	MRDMODE		= 0x71,
61 		MRDMODE_INTR_CH0 = 0x04,
62 		MRDMODE_INTR_CH1 = 0x08,
63 	BMIDESR0	= 0x72,
64 	UDIDETCR0	= 0x73,
65 	DTPR0		= 0x74,
66 	BMIDECR1	= 0x78,
67 	BMIDECSR	= 0x79,
68 	UDIDETCR1	= 0x7B,
69 	DTPR1		= 0x7C
70 };
71 
cmd648_cable_detect(struct ata_port * ap)72 static int cmd648_cable_detect(struct ata_port *ap)
73 {
74 	struct pci_dev *pdev = to_pci_dev(ap->host->dev);
75 	u8 r;
76 
77 	/* Check cable detect bits */
78 	pci_read_config_byte(pdev, BMIDECSR, &r);
79 	if (r & (1 << ap->port_no))
80 		return ATA_CBL_PATA80;
81 	return ATA_CBL_PATA40;
82 }
83 
84 /**
85  *	cmd64x_set_timing	-	set PIO and MWDMA timing
86  *	@ap: ATA interface
87  *	@adev: ATA device
88  *	@mode: mode
89  *
90  *	Called to do the PIO and MWDMA mode setup.
91  */
92 
cmd64x_set_timing(struct ata_port * ap,struct ata_device * adev,u8 mode)93 static void cmd64x_set_timing(struct ata_port *ap, struct ata_device *adev, u8 mode)
94 {
95 	struct pci_dev *pdev = to_pci_dev(ap->host->dev);
96 	struct ata_timing t;
97 	const unsigned long T = 1000000 / 33;
98 	const u8 setup_data[] = { 0x40, 0x40, 0x40, 0x80, 0x00 };
99 
100 	u8 reg;
101 
102 	/* Port layout is not logical so use a table */
103 	const u8 arttim_port[2][2] = {
104 		{ ARTTIM0, ARTTIM1 },
105 		{ ARTTIM23, ARTTIM23 }
106 	};
107 	const u8 drwtim_port[2][2] = {
108 		{ DRWTIM0, DRWTIM1 },
109 		{ DRWTIM2, DRWTIM3 }
110 	};
111 
112 	int arttim = arttim_port[ap->port_no][adev->devno];
113 	int drwtim = drwtim_port[ap->port_no][adev->devno];
114 
115 	/* ata_timing_compute is smart and will produce timings for MWDMA
116 	   that don't violate the drives PIO capabilities. */
117 	if (ata_timing_compute(adev, mode, &t, T, 0) < 0) {
118 		printk(KERN_ERR DRV_NAME ": mode computation failed.\n");
119 		return;
120 	}
121 	if (ap->port_no) {
122 		/* Slave has shared address setup */
123 		struct ata_device *pair = ata_dev_pair(adev);
124 
125 		if (pair) {
126 			struct ata_timing tp;
127 			ata_timing_compute(pair, pair->pio_mode, &tp, T, 0);
128 			ata_timing_merge(&t, &tp, &t, ATA_TIMING_SETUP);
129 		}
130 	}
131 
132 	printk(KERN_DEBUG DRV_NAME ": active %d recovery %d setup %d.\n",
133 		t.active, t.recover, t.setup);
134 	if (t.recover > 16) {
135 		t.active += t.recover - 16;
136 		t.recover = 16;
137 	}
138 	if (t.active > 16)
139 		t.active = 16;
140 
141 	/* Now convert the clocks into values we can actually stuff into
142 	   the chip */
143 
144 	if (t.recover == 16)
145 		t.recover = 0;
146 	else if (t.recover > 1)
147 		t.recover--;
148 	else
149 		t.recover = 15;
150 
151 	if (t.setup > 4)
152 		t.setup = 0xC0;
153 	else
154 		t.setup = setup_data[t.setup];
155 
156 	t.active &= 0x0F;	/* 0 = 16 */
157 
158 	/* Load setup timing */
159 	pci_read_config_byte(pdev, arttim, &reg);
160 	reg &= 0x3F;
161 	reg |= t.setup;
162 	pci_write_config_byte(pdev, arttim, reg);
163 
164 	/* Load active/recovery */
165 	pci_write_config_byte(pdev, drwtim, (t.active << 4) | t.recover);
166 }
167 
168 /**
169  *	cmd64x_set_piomode	-	set initial PIO mode data
170  *	@ap: ATA interface
171  *	@adev: ATA device
172  *
173  *	Used when configuring the devices ot set the PIO timings. All the
174  *	actual work is done by the PIO/MWDMA setting helper
175  */
176 
cmd64x_set_piomode(struct ata_port * ap,struct ata_device * adev)177 static void cmd64x_set_piomode(struct ata_port *ap, struct ata_device *adev)
178 {
179 	cmd64x_set_timing(ap, adev, adev->pio_mode);
180 }
181 
182 /**
183  *	cmd64x_set_dmamode	-	set initial DMA mode data
184  *	@ap: ATA interface
185  *	@adev: ATA device
186  *
187  *	Called to do the DMA mode setup.
188  */
189 
cmd64x_set_dmamode(struct ata_port * ap,struct ata_device * adev)190 static void cmd64x_set_dmamode(struct ata_port *ap, struct ata_device *adev)
191 {
192 	static const u8 udma_data[] = {
193 		0x30, 0x20, 0x10, 0x20, 0x10, 0x00
194 	};
195 
196 	struct pci_dev *pdev = to_pci_dev(ap->host->dev);
197 	u8 regU, regD;
198 
199 	int pciU = UDIDETCR0 + 8 * ap->port_no;
200 	int pciD = BMIDESR0 + 8 * ap->port_no;
201 	int shift = 2 * adev->devno;
202 
203 	pci_read_config_byte(pdev, pciD, &regD);
204 	pci_read_config_byte(pdev, pciU, &regU);
205 
206 	/* DMA bits off */
207 	regD &= ~(0x20 << adev->devno);
208 	/* DMA control bits */
209 	regU &= ~(0x30 << shift);
210 	/* DMA timing bits */
211 	regU &= ~(0x05 << adev->devno);
212 
213 	if (adev->dma_mode >= XFER_UDMA_0) {
214 		/* Merge the timing value */
215 		regU |= udma_data[adev->dma_mode - XFER_UDMA_0] << shift;
216 		/* Merge the control bits */
217 		regU |= 1 << adev->devno; /* UDMA on */
218 		if (adev->dma_mode > XFER_UDMA_2) /* 15nS timing */
219 			regU |= 4 << adev->devno;
220 	} else {
221 		regU &= ~ (1 << adev->devno);	/* UDMA off */
222 		cmd64x_set_timing(ap, adev, adev->dma_mode);
223 	}
224 
225 	regD |= 0x20 << adev->devno;
226 
227 	pci_write_config_byte(pdev, pciU, regU);
228 	pci_write_config_byte(pdev, pciD, regD);
229 }
230 
231 /**
232  *	cmd64x_sff_irq_check	-	check IDE interrupt
233  *	@ap: ATA interface
234  *
235  *	Check IDE interrupt in CFR/ARTTIM23 registers.
236  */
237 
cmd64x_sff_irq_check(struct ata_port * ap)238 static bool cmd64x_sff_irq_check(struct ata_port *ap)
239 {
240 	struct pci_dev *pdev = to_pci_dev(ap->host->dev);
241 	int irq_mask = ap->port_no ? ARTTIM23_INTR_CH1 : CFR_INTR_CH0;
242 	int irq_reg  = ap->port_no ? ARTTIM23 : CFR;
243 	u8 irq_stat;
244 
245 	/* NOTE: reading the register should clear the interrupt */
246 	pci_read_config_byte(pdev, irq_reg, &irq_stat);
247 
248 	return irq_stat & irq_mask;
249 }
250 
251 /**
252  *	cmd64x_sff_irq_clear	-	clear IDE interrupt
253  *	@ap: ATA interface
254  *
255  *	Clear IDE interrupt in CFR/ARTTIM23 and DMA status registers.
256  */
257 
cmd64x_sff_irq_clear(struct ata_port * ap)258 static void cmd64x_sff_irq_clear(struct ata_port *ap)
259 {
260 	struct pci_dev *pdev = to_pci_dev(ap->host->dev);
261 	int irq_reg = ap->port_no ? ARTTIM23 : CFR;
262 	u8 irq_stat;
263 
264 	ata_bmdma_irq_clear(ap);
265 
266 	/* Reading the register should be enough to clear the interrupt */
267 	pci_read_config_byte(pdev, irq_reg, &irq_stat);
268 }
269 
270 /**
271  *	cmd648_sff_irq_check	-	check IDE interrupt
272  *	@ap: ATA interface
273  *
274  *	Check IDE interrupt in MRDMODE register.
275  */
276 
cmd648_sff_irq_check(struct ata_port * ap)277 static bool cmd648_sff_irq_check(struct ata_port *ap)
278 {
279 	struct pci_dev *pdev = to_pci_dev(ap->host->dev);
280 	unsigned long base = pci_resource_start(pdev, 4);
281 	int irq_mask = ap->port_no ? MRDMODE_INTR_CH1 : MRDMODE_INTR_CH0;
282 	u8 mrdmode = inb(base + 1);
283 
284 	return mrdmode & irq_mask;
285 }
286 
287 /**
288  *	cmd648_sff_irq_clear	-	clear IDE interrupt
289  *	@ap: ATA interface
290  *
291  *	Clear IDE interrupt in MRDMODE and DMA status registers.
292  */
293 
cmd648_sff_irq_clear(struct ata_port * ap)294 static void cmd648_sff_irq_clear(struct ata_port *ap)
295 {
296 	struct pci_dev *pdev = to_pci_dev(ap->host->dev);
297 	unsigned long base = pci_resource_start(pdev, 4);
298 	int irq_mask = ap->port_no ? MRDMODE_INTR_CH1 : MRDMODE_INTR_CH0;
299 	u8 mrdmode;
300 
301 	ata_bmdma_irq_clear(ap);
302 
303 	/* Clear this port's interrupt bit (leaving the other port alone) */
304 	mrdmode  = inb(base + 1);
305 	mrdmode &= ~(MRDMODE_INTR_CH0 | MRDMODE_INTR_CH1);
306 	outb(mrdmode | irq_mask, base + 1);
307 }
308 
309 /**
310  *	cmd646r1_bmdma_stop	-	DMA stop callback
311  *	@qc: Command in progress
312  *
313  *	Stub for now while investigating the r1 quirk in the old driver.
314  */
315 
cmd646r1_bmdma_stop(struct ata_queued_cmd * qc)316 static void cmd646r1_bmdma_stop(struct ata_queued_cmd *qc)
317 {
318 	ata_bmdma_stop(qc);
319 }
320 
321 static struct scsi_host_template cmd64x_sht = {
322 	ATA_BMDMA_SHT(DRV_NAME),
323 };
324 
325 static const struct ata_port_operations cmd64x_base_ops = {
326 	.inherits	= &ata_bmdma_port_ops,
327 	.set_piomode	= cmd64x_set_piomode,
328 	.set_dmamode	= cmd64x_set_dmamode,
329 };
330 
331 static struct ata_port_operations cmd64x_port_ops = {
332 	.inherits	= &cmd64x_base_ops,
333 	.sff_irq_check	= cmd64x_sff_irq_check,
334 	.sff_irq_clear	= cmd64x_sff_irq_clear,
335 	.cable_detect	= ata_cable_40wire,
336 };
337 
338 static struct ata_port_operations cmd646r1_port_ops = {
339 	.inherits	= &cmd64x_base_ops,
340 	.sff_irq_check	= cmd64x_sff_irq_check,
341 	.sff_irq_clear	= cmd64x_sff_irq_clear,
342 	.bmdma_stop	= cmd646r1_bmdma_stop,
343 	.cable_detect	= ata_cable_40wire,
344 };
345 
346 static struct ata_port_operations cmd646r3_port_ops = {
347 	.inherits	= &cmd64x_base_ops,
348 	.sff_irq_check	= cmd648_sff_irq_check,
349 	.sff_irq_clear	= cmd648_sff_irq_clear,
350 	.cable_detect	= ata_cable_40wire,
351 };
352 
353 static struct ata_port_operations cmd648_port_ops = {
354 	.inherits	= &cmd64x_base_ops,
355 	.sff_irq_check	= cmd648_sff_irq_check,
356 	.sff_irq_clear	= cmd648_sff_irq_clear,
357 	.cable_detect	= cmd648_cable_detect,
358 };
359 
cmd64x_fixup(struct pci_dev * pdev)360 static void cmd64x_fixup(struct pci_dev *pdev)
361 {
362 	u8 mrdmode;
363 
364 	pci_write_config_byte(pdev, PCI_LATENCY_TIMER, 64);
365 	pci_read_config_byte(pdev, MRDMODE, &mrdmode);
366 	mrdmode &= ~0x30;	/* IRQ set up */
367 	mrdmode |= 0x02;	/* Memory read line enable */
368 	pci_write_config_byte(pdev, MRDMODE, mrdmode);
369 
370 	/* PPC specific fixup copied from old driver */
371 #ifdef CONFIG_PPC
372 	pci_write_config_byte(pdev, UDIDETCR0, 0xF0);
373 #endif
374 }
375 
cmd64x_init_one(struct pci_dev * pdev,const struct pci_device_id * id)376 static int cmd64x_init_one(struct pci_dev *pdev, const struct pci_device_id *id)
377 {
378 	static const struct ata_port_info cmd_info[7] = {
379 		{	/* CMD 643 - no UDMA */
380 			.flags = ATA_FLAG_SLAVE_POSS,
381 			.pio_mask = ATA_PIO4,
382 			.mwdma_mask = ATA_MWDMA2,
383 			.port_ops = &cmd64x_port_ops
384 		},
385 		{	/* CMD 646 with broken UDMA */
386 			.flags = ATA_FLAG_SLAVE_POSS,
387 			.pio_mask = ATA_PIO4,
388 			.mwdma_mask = ATA_MWDMA2,
389 			.port_ops = &cmd64x_port_ops
390 		},
391 		{	/* CMD 646U with broken UDMA */
392 			.flags = ATA_FLAG_SLAVE_POSS,
393 			.pio_mask = ATA_PIO4,
394 			.mwdma_mask = ATA_MWDMA2,
395 			.port_ops = &cmd646r3_port_ops
396 		},
397 		{	/* CMD 646U2 with working UDMA */
398 			.flags = ATA_FLAG_SLAVE_POSS,
399 			.pio_mask = ATA_PIO4,
400 			.mwdma_mask = ATA_MWDMA2,
401 			.udma_mask = ATA_UDMA2,
402 			.port_ops = &cmd646r3_port_ops
403 		},
404 		{	/* CMD 646 rev 1  */
405 			.flags = ATA_FLAG_SLAVE_POSS,
406 			.pio_mask = ATA_PIO4,
407 			.mwdma_mask = ATA_MWDMA2,
408 			.port_ops = &cmd646r1_port_ops
409 		},
410 		{	/* CMD 648 */
411 			.flags = ATA_FLAG_SLAVE_POSS,
412 			.pio_mask = ATA_PIO4,
413 			.mwdma_mask = ATA_MWDMA2,
414 			.udma_mask = ATA_UDMA4,
415 			.port_ops = &cmd648_port_ops
416 		},
417 		{	/* CMD 649 */
418 			.flags = ATA_FLAG_SLAVE_POSS,
419 			.pio_mask = ATA_PIO4,
420 			.mwdma_mask = ATA_MWDMA2,
421 			.udma_mask = ATA_UDMA5,
422 			.port_ops = &cmd648_port_ops
423 		}
424 	};
425 	const struct ata_port_info *ppi[] = {
426 		&cmd_info[id->driver_data],
427 		&cmd_info[id->driver_data],
428 		NULL
429 	};
430 	u8 reg;
431 	int rc;
432 	struct pci_dev *bridge = pdev->bus->self;
433 	/* mobility split bridges don't report enabled ports correctly */
434 	int port_ok = !(bridge && bridge->vendor ==
435 			PCI_VENDOR_ID_MOBILITY_ELECTRONICS);
436 	/* all (with exceptions below) apart from 643 have CNTRL_CH0 bit */
437 	int cntrl_ch0_ok = (id->driver_data != 0);
438 
439 	rc = pcim_enable_device(pdev);
440 	if (rc)
441 		return rc;
442 
443 	if (id->driver_data == 0)	/* 643 */
444 		ata_pci_bmdma_clear_simplex(pdev);
445 
446 	if (pdev->device == PCI_DEVICE_ID_CMD_646)
447 		switch (pdev->revision) {
448 		/* UDMA works since rev 5 */
449 		default:
450 			ppi[0] = &cmd_info[3];
451 			ppi[1] = &cmd_info[3];
452 			break;
453 		/* Interrupts in MRDMODE since rev 3 */
454 		case 3:
455 		case 4:
456 			ppi[0] = &cmd_info[2];
457 			ppi[1] = &cmd_info[2];
458 			break;
459 		/* Rev 1 with other problems? */
460 		case 1:
461 			ppi[0] = &cmd_info[4];
462 			ppi[1] = &cmd_info[4];
463 			/* FALL THRU */
464 		/* Early revs have no CNTRL_CH0 */
465 		case 2:
466 		case 0:
467 			cntrl_ch0_ok = 0;
468 			break;
469 		}
470 
471 	cmd64x_fixup(pdev);
472 
473 	/* check for enabled ports */
474 	pci_read_config_byte(pdev, CNTRL, &reg);
475 	if (!port_ok)
476 		dev_notice(&pdev->dev, "Mobility Bridge detected, ignoring CNTRL port enable/disable\n");
477 	if (port_ok && cntrl_ch0_ok && !(reg & CNTRL_CH0)) {
478 		dev_notice(&pdev->dev, "Primary port is disabled\n");
479 		ppi[0] = &ata_dummy_port_info;
480 
481 	}
482 	if (port_ok && !(reg & CNTRL_CH1)) {
483 		dev_notice(&pdev->dev, "Secondary port is disabled\n");
484 		ppi[1] = &ata_dummy_port_info;
485 	}
486 
487 	return ata_pci_bmdma_init_one(pdev, ppi, &cmd64x_sht, NULL, 0);
488 }
489 
490 #ifdef CONFIG_PM_SLEEP
cmd64x_reinit_one(struct pci_dev * pdev)491 static int cmd64x_reinit_one(struct pci_dev *pdev)
492 {
493 	struct ata_host *host = pci_get_drvdata(pdev);
494 	int rc;
495 
496 	rc = ata_pci_device_do_resume(pdev);
497 	if (rc)
498 		return rc;
499 
500 	cmd64x_fixup(pdev);
501 
502 	ata_host_resume(host);
503 	return 0;
504 }
505 #endif
506 
507 static const struct pci_device_id cmd64x[] = {
508 	{ PCI_VDEVICE(CMD, PCI_DEVICE_ID_CMD_643), 0 },
509 	{ PCI_VDEVICE(CMD, PCI_DEVICE_ID_CMD_646), 1 },
510 	{ PCI_VDEVICE(CMD, PCI_DEVICE_ID_CMD_648), 5 },
511 	{ PCI_VDEVICE(CMD, PCI_DEVICE_ID_CMD_649), 6 },
512 
513 	{ },
514 };
515 
516 static struct pci_driver cmd64x_pci_driver = {
517 	.name 		= DRV_NAME,
518 	.id_table	= cmd64x,
519 	.probe 		= cmd64x_init_one,
520 	.remove		= ata_pci_remove_one,
521 #ifdef CONFIG_PM_SLEEP
522 	.suspend	= ata_pci_device_suspend,
523 	.resume		= cmd64x_reinit_one,
524 #endif
525 };
526 
527 module_pci_driver(cmd64x_pci_driver);
528 
529 MODULE_AUTHOR("Alan Cox");
530 MODULE_DESCRIPTION("low-level driver for CMD64x series PATA controllers");
531 MODULE_LICENSE("GPL");
532 MODULE_DEVICE_TABLE(pci, cmd64x);
533 MODULE_VERSION(DRV_VERSION);
534