xref: /openbmc/linux/drivers/ata/sata_svw.c (revision a8fe58ce)
1 /*
2  *  sata_svw.c - ServerWorks / Apple K2 SATA
3  *
4  *  Maintained by: Benjamin Herrenschmidt <benh@kernel.crashing.org> and
5  *		   Jeff Garzik <jgarzik@pobox.com>
6  *  		    Please ALWAYS copy linux-ide@vger.kernel.org
7  *		    on emails.
8  *
9  *  Copyright 2003 Benjamin Herrenschmidt <benh@kernel.crashing.org>
10  *
11  *  Bits from Jeff Garzik, Copyright RedHat, Inc.
12  *
13  *  This driver probably works with non-Apple versions of the
14  *  Broadcom chipset...
15  *
16  *
17  *  This program is free software; you can redistribute it and/or modify
18  *  it under the terms of the GNU General Public License as published by
19  *  the Free Software Foundation; either version 2, or (at your option)
20  *  any later version.
21  *
22  *  This program is distributed in the hope that it will be useful,
23  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
24  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
25  *  GNU General Public License for more details.
26  *
27  *  You should have received a copy of the GNU General Public License
28  *  along with this program; see the file COPYING.  If not, write to
29  *  the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
30  *
31  *
32  *  libata documentation is available via 'make {ps|pdf}docs',
33  *  as Documentation/DocBook/libata.*
34  *
35  *  Hardware documentation available under NDA.
36  *
37  */
38 
39 #include <linux/kernel.h>
40 #include <linux/module.h>
41 #include <linux/pci.h>
42 #include <linux/blkdev.h>
43 #include <linux/delay.h>
44 #include <linux/interrupt.h>
45 #include <linux/device.h>
46 #include <scsi/scsi_host.h>
47 #include <scsi/scsi_cmnd.h>
48 #include <scsi/scsi.h>
49 #include <linux/libata.h>
50 #include <linux/of.h>
51 
52 #define DRV_NAME	"sata_svw"
53 #define DRV_VERSION	"2.3"
54 
55 enum {
56 	/* ap->flags bits */
57 	K2_FLAG_SATA_8_PORTS		= (1 << 24),
58 	K2_FLAG_NO_ATAPI_DMA		= (1 << 25),
59 	K2_FLAG_BAR_POS_3			= (1 << 26),
60 
61 	/* Taskfile registers offsets */
62 	K2_SATA_TF_CMD_OFFSET		= 0x00,
63 	K2_SATA_TF_DATA_OFFSET		= 0x00,
64 	K2_SATA_TF_ERROR_OFFSET		= 0x04,
65 	K2_SATA_TF_NSECT_OFFSET		= 0x08,
66 	K2_SATA_TF_LBAL_OFFSET		= 0x0c,
67 	K2_SATA_TF_LBAM_OFFSET		= 0x10,
68 	K2_SATA_TF_LBAH_OFFSET		= 0x14,
69 	K2_SATA_TF_DEVICE_OFFSET	= 0x18,
70 	K2_SATA_TF_CMDSTAT_OFFSET      	= 0x1c,
71 	K2_SATA_TF_CTL_OFFSET		= 0x20,
72 
73 	/* DMA base */
74 	K2_SATA_DMA_CMD_OFFSET		= 0x30,
75 
76 	/* SCRs base */
77 	K2_SATA_SCR_STATUS_OFFSET	= 0x40,
78 	K2_SATA_SCR_ERROR_OFFSET	= 0x44,
79 	K2_SATA_SCR_CONTROL_OFFSET	= 0x48,
80 
81 	/* Others */
82 	K2_SATA_SICR1_OFFSET		= 0x80,
83 	K2_SATA_SICR2_OFFSET		= 0x84,
84 	K2_SATA_SIM_OFFSET		= 0x88,
85 
86 	/* Port stride */
87 	K2_SATA_PORT_OFFSET		= 0x100,
88 
89 	chip_svw4			= 0,
90 	chip_svw8			= 1,
91 	chip_svw42			= 2,	/* bar 3 */
92 	chip_svw43			= 3,	/* bar 5 */
93 };
94 
95 static u8 k2_stat_check_status(struct ata_port *ap);
96 
97 
98 static int k2_sata_check_atapi_dma(struct ata_queued_cmd *qc)
99 {
100 	u8 cmnd = qc->scsicmd->cmnd[0];
101 
102 	if (qc->ap->flags & K2_FLAG_NO_ATAPI_DMA)
103 		return -1;	/* ATAPI DMA not supported */
104 	else {
105 		switch (cmnd) {
106 		case READ_10:
107 		case READ_12:
108 		case READ_16:
109 		case WRITE_10:
110 		case WRITE_12:
111 		case WRITE_16:
112 			return 0;
113 
114 		default:
115 			return -1;
116 		}
117 
118 	}
119 }
120 
121 static int k2_sata_scr_read(struct ata_link *link,
122 			    unsigned int sc_reg, u32 *val)
123 {
124 	if (sc_reg > SCR_CONTROL)
125 		return -EINVAL;
126 	*val = readl(link->ap->ioaddr.scr_addr + (sc_reg * 4));
127 	return 0;
128 }
129 
130 
131 static int k2_sata_scr_write(struct ata_link *link,
132 			     unsigned int sc_reg, u32 val)
133 {
134 	if (sc_reg > SCR_CONTROL)
135 		return -EINVAL;
136 	writel(val, link->ap->ioaddr.scr_addr + (sc_reg * 4));
137 	return 0;
138 }
139 
140 static int k2_sata_softreset(struct ata_link *link,
141 			     unsigned int *class, unsigned long deadline)
142 {
143 	u8 dmactl;
144 	void __iomem *mmio = link->ap->ioaddr.bmdma_addr;
145 
146 	dmactl = readb(mmio + ATA_DMA_CMD);
147 
148 	/* Clear the start bit */
149 	if (dmactl & ATA_DMA_START) {
150 		dmactl &= ~ATA_DMA_START;
151 		writeb(dmactl, mmio + ATA_DMA_CMD);
152 	}
153 
154 	return ata_sff_softreset(link, class, deadline);
155 }
156 
157 static int k2_sata_hardreset(struct ata_link *link,
158 			     unsigned int *class, unsigned long deadline)
159 {
160 	u8 dmactl;
161 	void __iomem *mmio = link->ap->ioaddr.bmdma_addr;
162 
163 	dmactl = readb(mmio + ATA_DMA_CMD);
164 
165 	/* Clear the start bit */
166 	if (dmactl & ATA_DMA_START) {
167 		dmactl &= ~ATA_DMA_START;
168 		writeb(dmactl, mmio + ATA_DMA_CMD);
169 	}
170 
171 	return sata_sff_hardreset(link, class, deadline);
172 }
173 
174 static void k2_sata_tf_load(struct ata_port *ap, const struct ata_taskfile *tf)
175 {
176 	struct ata_ioports *ioaddr = &ap->ioaddr;
177 	unsigned int is_addr = tf->flags & ATA_TFLAG_ISADDR;
178 
179 	if (tf->ctl != ap->last_ctl) {
180 		writeb(tf->ctl, ioaddr->ctl_addr);
181 		ap->last_ctl = tf->ctl;
182 		ata_wait_idle(ap);
183 	}
184 	if (is_addr && (tf->flags & ATA_TFLAG_LBA48)) {
185 		writew(tf->feature | (((u16)tf->hob_feature) << 8),
186 		       ioaddr->feature_addr);
187 		writew(tf->nsect | (((u16)tf->hob_nsect) << 8),
188 		       ioaddr->nsect_addr);
189 		writew(tf->lbal | (((u16)tf->hob_lbal) << 8),
190 		       ioaddr->lbal_addr);
191 		writew(tf->lbam | (((u16)tf->hob_lbam) << 8),
192 		       ioaddr->lbam_addr);
193 		writew(tf->lbah | (((u16)tf->hob_lbah) << 8),
194 		       ioaddr->lbah_addr);
195 	} else if (is_addr) {
196 		writew(tf->feature, ioaddr->feature_addr);
197 		writew(tf->nsect, ioaddr->nsect_addr);
198 		writew(tf->lbal, ioaddr->lbal_addr);
199 		writew(tf->lbam, ioaddr->lbam_addr);
200 		writew(tf->lbah, ioaddr->lbah_addr);
201 	}
202 
203 	if (tf->flags & ATA_TFLAG_DEVICE)
204 		writeb(tf->device, ioaddr->device_addr);
205 
206 	ata_wait_idle(ap);
207 }
208 
209 
210 static void k2_sata_tf_read(struct ata_port *ap, struct ata_taskfile *tf)
211 {
212 	struct ata_ioports *ioaddr = &ap->ioaddr;
213 	u16 nsect, lbal, lbam, lbah, feature;
214 
215 	tf->command = k2_stat_check_status(ap);
216 	tf->device = readw(ioaddr->device_addr);
217 	feature = readw(ioaddr->error_addr);
218 	nsect = readw(ioaddr->nsect_addr);
219 	lbal = readw(ioaddr->lbal_addr);
220 	lbam = readw(ioaddr->lbam_addr);
221 	lbah = readw(ioaddr->lbah_addr);
222 
223 	tf->feature = feature;
224 	tf->nsect = nsect;
225 	tf->lbal = lbal;
226 	tf->lbam = lbam;
227 	tf->lbah = lbah;
228 
229 	if (tf->flags & ATA_TFLAG_LBA48) {
230 		tf->hob_feature = feature >> 8;
231 		tf->hob_nsect = nsect >> 8;
232 		tf->hob_lbal = lbal >> 8;
233 		tf->hob_lbam = lbam >> 8;
234 		tf->hob_lbah = lbah >> 8;
235 	}
236 }
237 
238 /**
239  *	k2_bmdma_setup_mmio - Set up PCI IDE BMDMA transaction (MMIO)
240  *	@qc: Info associated with this ATA transaction.
241  *
242  *	LOCKING:
243  *	spin_lock_irqsave(host lock)
244  */
245 
246 static void k2_bmdma_setup_mmio(struct ata_queued_cmd *qc)
247 {
248 	struct ata_port *ap = qc->ap;
249 	unsigned int rw = (qc->tf.flags & ATA_TFLAG_WRITE);
250 	u8 dmactl;
251 	void __iomem *mmio = ap->ioaddr.bmdma_addr;
252 
253 	/* load PRD table addr. */
254 	mb();	/* make sure PRD table writes are visible to controller */
255 	writel(ap->bmdma_prd_dma, mmio + ATA_DMA_TABLE_OFS);
256 
257 	/* specify data direction, triple-check start bit is clear */
258 	dmactl = readb(mmio + ATA_DMA_CMD);
259 	dmactl &= ~(ATA_DMA_WR | ATA_DMA_START);
260 	if (!rw)
261 		dmactl |= ATA_DMA_WR;
262 	writeb(dmactl, mmio + ATA_DMA_CMD);
263 
264 	/* issue r/w command if this is not a ATA DMA command*/
265 	if (qc->tf.protocol != ATA_PROT_DMA)
266 		ap->ops->sff_exec_command(ap, &qc->tf);
267 }
268 
269 /**
270  *	k2_bmdma_start_mmio - Start a PCI IDE BMDMA transaction (MMIO)
271  *	@qc: Info associated with this ATA transaction.
272  *
273  *	LOCKING:
274  *	spin_lock_irqsave(host lock)
275  */
276 
277 static void k2_bmdma_start_mmio(struct ata_queued_cmd *qc)
278 {
279 	struct ata_port *ap = qc->ap;
280 	void __iomem *mmio = ap->ioaddr.bmdma_addr;
281 	u8 dmactl;
282 
283 	/* start host DMA transaction */
284 	dmactl = readb(mmio + ATA_DMA_CMD);
285 	writeb(dmactl | ATA_DMA_START, mmio + ATA_DMA_CMD);
286 	/* This works around possible data corruption.
287 
288 	   On certain SATA controllers that can be seen when the r/w
289 	   command is given to the controller before the host DMA is
290 	   started.
291 
292 	   On a Read command, the controller would initiate the
293 	   command to the drive even before it sees the DMA
294 	   start. When there are very fast drives connected to the
295 	   controller, or when the data request hits in the drive
296 	   cache, there is the possibility that the drive returns a
297 	   part or all of the requested data to the controller before
298 	   the DMA start is issued.  In this case, the controller
299 	   would become confused as to what to do with the data.  In
300 	   the worst case when all the data is returned back to the
301 	   controller, the controller could hang. In other cases it
302 	   could return partial data returning in data
303 	   corruption. This problem has been seen in PPC systems and
304 	   can also appear on an system with very fast disks, where
305 	   the SATA controller is sitting behind a number of bridges,
306 	   and hence there is significant latency between the r/w
307 	   command and the start command. */
308 	/* issue r/w command if the access is to ATA */
309 	if (qc->tf.protocol == ATA_PROT_DMA)
310 		ap->ops->sff_exec_command(ap, &qc->tf);
311 }
312 
313 
314 static u8 k2_stat_check_status(struct ata_port *ap)
315 {
316 	return readl(ap->ioaddr.status_addr);
317 }
318 
319 static int k2_sata_show_info(struct seq_file *m, struct Scsi_Host *shost)
320 {
321 	struct ata_port *ap;
322 	struct device_node *np;
323 	int index;
324 
325 	/* Find  the ata_port */
326 	ap = ata_shost_to_port(shost);
327 	if (ap == NULL)
328 		return 0;
329 
330 	/* Find the OF node for the PCI device proper */
331 	np = pci_device_to_OF_node(to_pci_dev(ap->host->dev));
332 	if (np == NULL)
333 		return 0;
334 
335 	/* Match it to a port node */
336 	index = (ap == ap->host->ports[0]) ? 0 : 1;
337 	for (np = np->child; np != NULL; np = np->sibling) {
338 		const u32 *reg = of_get_property(np, "reg", NULL);
339 		if (!reg)
340 			continue;
341 		if (index == *reg) {
342 			seq_printf(m, "devspec: %s\n", np->full_name);
343 			break;
344 		}
345 	}
346 	return 0;
347 }
348 
349 static struct scsi_host_template k2_sata_sht = {
350 	ATA_BMDMA_SHT(DRV_NAME),
351 	.show_info		= k2_sata_show_info,
352 };
353 
354 
355 static struct ata_port_operations k2_sata_ops = {
356 	.inherits		= &ata_bmdma_port_ops,
357 	.softreset              = k2_sata_softreset,
358 	.hardreset              = k2_sata_hardreset,
359 	.sff_tf_load		= k2_sata_tf_load,
360 	.sff_tf_read		= k2_sata_tf_read,
361 	.sff_check_status	= k2_stat_check_status,
362 	.check_atapi_dma	= k2_sata_check_atapi_dma,
363 	.bmdma_setup		= k2_bmdma_setup_mmio,
364 	.bmdma_start		= k2_bmdma_start_mmio,
365 	.scr_read		= k2_sata_scr_read,
366 	.scr_write		= k2_sata_scr_write,
367 };
368 
369 static const struct ata_port_info k2_port_info[] = {
370 	/* chip_svw4 */
371 	{
372 		.flags		= ATA_FLAG_SATA | K2_FLAG_NO_ATAPI_DMA,
373 		.pio_mask	= ATA_PIO4,
374 		.mwdma_mask	= ATA_MWDMA2,
375 		.udma_mask	= ATA_UDMA6,
376 		.port_ops	= &k2_sata_ops,
377 	},
378 	/* chip_svw8 */
379 	{
380 		.flags		= ATA_FLAG_SATA | K2_FLAG_NO_ATAPI_DMA |
381 				  K2_FLAG_SATA_8_PORTS,
382 		.pio_mask	= ATA_PIO4,
383 		.mwdma_mask	= ATA_MWDMA2,
384 		.udma_mask	= ATA_UDMA6,
385 		.port_ops	= &k2_sata_ops,
386 	},
387 	/* chip_svw42 */
388 	{
389 		.flags		= ATA_FLAG_SATA | K2_FLAG_BAR_POS_3,
390 		.pio_mask	= ATA_PIO4,
391 		.mwdma_mask	= ATA_MWDMA2,
392 		.udma_mask	= ATA_UDMA6,
393 		.port_ops	= &k2_sata_ops,
394 	},
395 	/* chip_svw43 */
396 	{
397 		.flags		= ATA_FLAG_SATA,
398 		.pio_mask	= ATA_PIO4,
399 		.mwdma_mask	= ATA_MWDMA2,
400 		.udma_mask	= ATA_UDMA6,
401 		.port_ops	= &k2_sata_ops,
402 	},
403 };
404 
405 static void k2_sata_setup_port(struct ata_ioports *port, void __iomem *base)
406 {
407 	port->cmd_addr		= base + K2_SATA_TF_CMD_OFFSET;
408 	port->data_addr		= base + K2_SATA_TF_DATA_OFFSET;
409 	port->feature_addr	=
410 	port->error_addr	= base + K2_SATA_TF_ERROR_OFFSET;
411 	port->nsect_addr	= base + K2_SATA_TF_NSECT_OFFSET;
412 	port->lbal_addr		= base + K2_SATA_TF_LBAL_OFFSET;
413 	port->lbam_addr		= base + K2_SATA_TF_LBAM_OFFSET;
414 	port->lbah_addr		= base + K2_SATA_TF_LBAH_OFFSET;
415 	port->device_addr	= base + K2_SATA_TF_DEVICE_OFFSET;
416 	port->command_addr	=
417 	port->status_addr	= base + K2_SATA_TF_CMDSTAT_OFFSET;
418 	port->altstatus_addr	=
419 	port->ctl_addr		= base + K2_SATA_TF_CTL_OFFSET;
420 	port->bmdma_addr	= base + K2_SATA_DMA_CMD_OFFSET;
421 	port->scr_addr		= base + K2_SATA_SCR_STATUS_OFFSET;
422 }
423 
424 
425 static int k2_sata_init_one(struct pci_dev *pdev, const struct pci_device_id *ent)
426 {
427 	const struct ata_port_info *ppi[] =
428 		{ &k2_port_info[ent->driver_data], NULL };
429 	struct ata_host *host;
430 	void __iomem *mmio_base;
431 	int n_ports, i, rc, bar_pos;
432 
433 	ata_print_version_once(&pdev->dev, DRV_VERSION);
434 
435 	/* allocate host */
436 	n_ports = 4;
437 	if (ppi[0]->flags & K2_FLAG_SATA_8_PORTS)
438 		n_ports = 8;
439 
440 	host = ata_host_alloc_pinfo(&pdev->dev, ppi, n_ports);
441 	if (!host)
442 		return -ENOMEM;
443 
444 	bar_pos = 5;
445 	if (ppi[0]->flags & K2_FLAG_BAR_POS_3)
446 		bar_pos = 3;
447 	/*
448 	 * If this driver happens to only be useful on Apple's K2, then
449 	 * we should check that here as it has a normal Serverworks ID
450 	 */
451 	rc = pcim_enable_device(pdev);
452 	if (rc)
453 		return rc;
454 
455 	/*
456 	 * Check if we have resources mapped at all (second function may
457 	 * have been disabled by firmware)
458 	 */
459 	if (pci_resource_len(pdev, bar_pos) == 0) {
460 		/* In IDE mode we need to pin the device to ensure that
461 			pcim_release does not clear the busmaster bit in config
462 			space, clearing causes busmaster DMA to fail on
463 			ports 3 & 4 */
464 		pcim_pin_device(pdev);
465 		return -ENODEV;
466 	}
467 
468 	/* Request and iomap PCI regions */
469 	rc = pcim_iomap_regions(pdev, 1 << bar_pos, DRV_NAME);
470 	if (rc == -EBUSY)
471 		pcim_pin_device(pdev);
472 	if (rc)
473 		return rc;
474 	host->iomap = pcim_iomap_table(pdev);
475 	mmio_base = host->iomap[bar_pos];
476 
477 	/* different controllers have different number of ports - currently 4 or 8 */
478 	/* All ports are on the same function. Multi-function device is no
479 	 * longer available. This should not be seen in any system. */
480 	for (i = 0; i < host->n_ports; i++) {
481 		struct ata_port *ap = host->ports[i];
482 		unsigned int offset = i * K2_SATA_PORT_OFFSET;
483 
484 		k2_sata_setup_port(&ap->ioaddr, mmio_base + offset);
485 
486 		ata_port_pbar_desc(ap, 5, -1, "mmio");
487 		ata_port_pbar_desc(ap, 5, offset, "port");
488 	}
489 
490 	rc = dma_set_mask(&pdev->dev, ATA_DMA_MASK);
491 	if (rc)
492 		return rc;
493 	rc = dma_set_coherent_mask(&pdev->dev, ATA_DMA_MASK);
494 	if (rc)
495 		return rc;
496 
497 	/* Clear a magic bit in SCR1 according to Darwin, those help
498 	 * some funky seagate drives (though so far, those were already
499 	 * set by the firmware on the machines I had access to)
500 	 */
501 	writel(readl(mmio_base + K2_SATA_SICR1_OFFSET) & ~0x00040000,
502 	       mmio_base + K2_SATA_SICR1_OFFSET);
503 
504 	/* Clear SATA error & interrupts we don't use */
505 	writel(0xffffffff, mmio_base + K2_SATA_SCR_ERROR_OFFSET);
506 	writel(0x0, mmio_base + K2_SATA_SIM_OFFSET);
507 
508 	pci_set_master(pdev);
509 	return ata_host_activate(host, pdev->irq, ata_bmdma_interrupt,
510 				 IRQF_SHARED, &k2_sata_sht);
511 }
512 
513 /* 0x240 is device ID for Apple K2 device
514  * 0x241 is device ID for Serverworks Frodo4
515  * 0x242 is device ID for Serverworks Frodo8
516  * 0x24a is device ID for BCM5785 (aka HT1000) HT southbridge integrated SATA
517  * controller
518  * */
519 static const struct pci_device_id k2_sata_pci_tbl[] = {
520 	{ PCI_VDEVICE(SERVERWORKS, 0x0240), chip_svw4 },
521 	{ PCI_VDEVICE(SERVERWORKS, 0x0241), chip_svw8 },
522 	{ PCI_VDEVICE(SERVERWORKS, 0x0242), chip_svw4 },
523 	{ PCI_VDEVICE(SERVERWORKS, 0x024a), chip_svw4 },
524 	{ PCI_VDEVICE(SERVERWORKS, 0x024b), chip_svw4 },
525 	{ PCI_VDEVICE(SERVERWORKS, 0x0410), chip_svw42 },
526 	{ PCI_VDEVICE(SERVERWORKS, 0x0411), chip_svw43 },
527 
528 	{ }
529 };
530 
531 static struct pci_driver k2_sata_pci_driver = {
532 	.name			= DRV_NAME,
533 	.id_table		= k2_sata_pci_tbl,
534 	.probe			= k2_sata_init_one,
535 	.remove			= ata_pci_remove_one,
536 };
537 
538 module_pci_driver(k2_sata_pci_driver);
539 
540 MODULE_AUTHOR("Benjamin Herrenschmidt");
541 MODULE_DESCRIPTION("low-level driver for K2 SATA controller");
542 MODULE_LICENSE("GPL");
543 MODULE_DEVICE_TABLE(pci, k2_sata_pci_tbl);
544 MODULE_VERSION(DRV_VERSION);
545