xref: /linux/drivers/ata/sata_vsc.c (revision b454cc6636d254fbf6049b73e9560aee76fb04a3)
1 /*
2  *  sata_vsc.c - Vitesse VSC7174 4 port DPA SATA
3  *
4  *  Maintained by:  Jeremy Higdon @ SGI
5  * 		    Please ALWAYS copy linux-ide@vger.kernel.org
6  *		    on emails.
7  *
8  *  Copyright 2004 SGI
9  *
10  *  Bits from Jeff Garzik, Copyright RedHat, Inc.
11  *
12  *
13  *  This program is free software; you can redistribute it and/or modify
14  *  it under the terms of the GNU General Public License as published by
15  *  the Free Software Foundation; either version 2, or (at your option)
16  *  any later version.
17  *
18  *  This program is distributed in the hope that it will be useful,
19  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
20  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
21  *  GNU General Public License for more details.
22  *
23  *  You should have received a copy of the GNU General Public License
24  *  along with this program; see the file COPYING.  If not, write to
25  *  the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
26  *
27  *
28  *  libata documentation is available via 'make {ps|pdf}docs',
29  *  as Documentation/DocBook/libata.*
30  *
31  *  Vitesse hardware documentation presumably available under NDA.
32  *  Intel 31244 (same hardware interface) documentation presumably
33  *  available from http://developer.intel.com/
34  *
35  */
36 
37 #include <linux/kernel.h>
38 #include <linux/module.h>
39 #include <linux/pci.h>
40 #include <linux/init.h>
41 #include <linux/blkdev.h>
42 #include <linux/delay.h>
43 #include <linux/interrupt.h>
44 #include <linux/dma-mapping.h>
45 #include <linux/device.h>
46 #include <scsi/scsi_host.h>
47 #include <linux/libata.h>
48 
49 #define DRV_NAME	"sata_vsc"
50 #define DRV_VERSION	"2.0"
51 
52 enum {
53 	/* Interrupt register offsets (from chip base address) */
54 	VSC_SATA_INT_STAT_OFFSET	= 0x00,
55 	VSC_SATA_INT_MASK_OFFSET	= 0x04,
56 
57 	/* Taskfile registers offsets */
58 	VSC_SATA_TF_CMD_OFFSET		= 0x00,
59 	VSC_SATA_TF_DATA_OFFSET		= 0x00,
60 	VSC_SATA_TF_ERROR_OFFSET	= 0x04,
61 	VSC_SATA_TF_FEATURE_OFFSET	= 0x06,
62 	VSC_SATA_TF_NSECT_OFFSET	= 0x08,
63 	VSC_SATA_TF_LBAL_OFFSET		= 0x0c,
64 	VSC_SATA_TF_LBAM_OFFSET		= 0x10,
65 	VSC_SATA_TF_LBAH_OFFSET		= 0x14,
66 	VSC_SATA_TF_DEVICE_OFFSET	= 0x18,
67 	VSC_SATA_TF_STATUS_OFFSET	= 0x1c,
68 	VSC_SATA_TF_COMMAND_OFFSET	= 0x1d,
69 	VSC_SATA_TF_ALTSTATUS_OFFSET	= 0x28,
70 	VSC_SATA_TF_CTL_OFFSET		= 0x29,
71 
72 	/* DMA base */
73 	VSC_SATA_UP_DESCRIPTOR_OFFSET	= 0x64,
74 	VSC_SATA_UP_DATA_BUFFER_OFFSET	= 0x6C,
75 	VSC_SATA_DMA_CMD_OFFSET		= 0x70,
76 
77 	/* SCRs base */
78 	VSC_SATA_SCR_STATUS_OFFSET	= 0x100,
79 	VSC_SATA_SCR_ERROR_OFFSET	= 0x104,
80 	VSC_SATA_SCR_CONTROL_OFFSET	= 0x108,
81 
82 	/* Port stride */
83 	VSC_SATA_PORT_OFFSET		= 0x200,
84 
85 	/* Error interrupt status bit offsets */
86 	VSC_SATA_INT_ERROR_CRC		= 0x40,
87 	VSC_SATA_INT_ERROR_T		= 0x20,
88 	VSC_SATA_INT_ERROR_P		= 0x10,
89 	VSC_SATA_INT_ERROR_R		= 0x8,
90 	VSC_SATA_INT_ERROR_E		= 0x4,
91 	VSC_SATA_INT_ERROR_M		= 0x2,
92 	VSC_SATA_INT_PHY_CHANGE		= 0x1,
93 	VSC_SATA_INT_ERROR = (VSC_SATA_INT_ERROR_CRC  | VSC_SATA_INT_ERROR_T | \
94 			      VSC_SATA_INT_ERROR_P    | VSC_SATA_INT_ERROR_R | \
95 			      VSC_SATA_INT_ERROR_E    | VSC_SATA_INT_ERROR_M | \
96 			      VSC_SATA_INT_PHY_CHANGE),
97 };
98 
99 
100 #define is_vsc_sata_int_err(port_idx, int_status) \
101 	 (int_status & (VSC_SATA_INT_ERROR << (8 * port_idx)))
102 
103 
104 static u32 vsc_sata_scr_read (struct ata_port *ap, unsigned int sc_reg)
105 {
106 	if (sc_reg > SCR_CONTROL)
107 		return 0xffffffffU;
108 	return readl((void __iomem *) ap->ioaddr.scr_addr + (sc_reg * 4));
109 }
110 
111 
112 static void vsc_sata_scr_write (struct ata_port *ap, unsigned int sc_reg,
113 			       u32 val)
114 {
115 	if (sc_reg > SCR_CONTROL)
116 		return;
117 	writel(val, (void __iomem *) ap->ioaddr.scr_addr + (sc_reg * 4));
118 }
119 
120 
121 static void vsc_intr_mask_update(struct ata_port *ap, u8 ctl)
122 {
123 	void __iomem *mask_addr;
124 	u8 mask;
125 
126 	mask_addr = ap->host->mmio_base +
127 		VSC_SATA_INT_MASK_OFFSET + ap->port_no;
128 	mask = readb(mask_addr);
129 	if (ctl & ATA_NIEN)
130 		mask |= 0x80;
131 	else
132 		mask &= 0x7F;
133 	writeb(mask, mask_addr);
134 }
135 
136 
137 static void vsc_sata_tf_load(struct ata_port *ap, const struct ata_taskfile *tf)
138 {
139 	struct ata_ioports *ioaddr = &ap->ioaddr;
140 	unsigned int is_addr = tf->flags & ATA_TFLAG_ISADDR;
141 
142 	/*
143 	 * The only thing the ctl register is used for is SRST.
144 	 * That is not enabled or disabled via tf_load.
145 	 * However, if ATA_NIEN is changed, then we need to change the interrupt register.
146 	 */
147 	if ((tf->ctl & ATA_NIEN) != (ap->last_ctl & ATA_NIEN)) {
148 		ap->last_ctl = tf->ctl;
149 		vsc_intr_mask_update(ap, tf->ctl & ATA_NIEN);
150 	}
151 	if (is_addr && (tf->flags & ATA_TFLAG_LBA48)) {
152 		writew(tf->feature | (((u16)tf->hob_feature) << 8),
153 		       (void __iomem *) ioaddr->feature_addr);
154 		writew(tf->nsect | (((u16)tf->hob_nsect) << 8),
155 		       (void __iomem *) ioaddr->nsect_addr);
156 		writew(tf->lbal | (((u16)tf->hob_lbal) << 8),
157 		       (void __iomem *) ioaddr->lbal_addr);
158 		writew(tf->lbam | (((u16)tf->hob_lbam) << 8),
159 		       (void __iomem *) ioaddr->lbam_addr);
160 		writew(tf->lbah | (((u16)tf->hob_lbah) << 8),
161 		       (void __iomem *) ioaddr->lbah_addr);
162 	} else if (is_addr) {
163 		writew(tf->feature, (void __iomem *) ioaddr->feature_addr);
164 		writew(tf->nsect, (void __iomem *) ioaddr->nsect_addr);
165 		writew(tf->lbal, (void __iomem *) ioaddr->lbal_addr);
166 		writew(tf->lbam, (void __iomem *) ioaddr->lbam_addr);
167 		writew(tf->lbah, (void __iomem *) ioaddr->lbah_addr);
168 	}
169 
170 	if (tf->flags & ATA_TFLAG_DEVICE)
171 		writeb(tf->device, (void __iomem *) ioaddr->device_addr);
172 
173 	ata_wait_idle(ap);
174 }
175 
176 
177 static void vsc_sata_tf_read(struct ata_port *ap, struct ata_taskfile *tf)
178 {
179 	struct ata_ioports *ioaddr = &ap->ioaddr;
180 	u16 nsect, lbal, lbam, lbah, feature;
181 
182 	tf->command = ata_check_status(ap);
183 	tf->device = readw((void __iomem *) ioaddr->device_addr);
184 	feature = readw((void __iomem *) ioaddr->error_addr);
185 	nsect = readw((void __iomem *) ioaddr->nsect_addr);
186 	lbal = readw((void __iomem *) ioaddr->lbal_addr);
187 	lbam = readw((void __iomem *) ioaddr->lbam_addr);
188 	lbah = readw((void __iomem *) ioaddr->lbah_addr);
189 
190 	tf->feature = feature;
191 	tf->nsect = nsect;
192 	tf->lbal = lbal;
193 	tf->lbam = lbam;
194 	tf->lbah = lbah;
195 
196 	if (tf->flags & ATA_TFLAG_LBA48) {
197 		tf->hob_feature = feature >> 8;
198 		tf->hob_nsect = nsect >> 8;
199 		tf->hob_lbal = lbal >> 8;
200 		tf->hob_lbam = lbam >> 8;
201 		tf->hob_lbah = lbah >> 8;
202         }
203 }
204 
205 
206 /*
207  * vsc_sata_interrupt
208  *
209  * Read the interrupt register and process for the devices that have them pending.
210  */
211 static irqreturn_t vsc_sata_interrupt (int irq, void *dev_instance)
212 {
213 	struct ata_host *host = dev_instance;
214 	unsigned int i;
215 	unsigned int handled = 0;
216 	u32 int_status;
217 
218 	spin_lock(&host->lock);
219 
220 	int_status = readl(host->mmio_base + VSC_SATA_INT_STAT_OFFSET);
221 
222 	for (i = 0; i < host->n_ports; i++) {
223 		if (int_status & ((u32) 0xFF << (8 * i))) {
224 			struct ata_port *ap;
225 
226 			ap = host->ports[i];
227 
228 			if (is_vsc_sata_int_err(i, int_status)) {
229 				u32 err_status;
230 				printk(KERN_DEBUG "%s: ignoring interrupt(s)\n", __FUNCTION__);
231 				err_status = ap ? vsc_sata_scr_read(ap, SCR_ERROR) : 0;
232 				vsc_sata_scr_write(ap, SCR_ERROR, err_status);
233 				handled++;
234 			}
235 
236 			if (ap && !(ap->flags & ATA_FLAG_DISABLED)) {
237 				struct ata_queued_cmd *qc;
238 
239 				qc = ata_qc_from_tag(ap, ap->active_tag);
240 				if (qc && (!(qc->tf.flags & ATA_TFLAG_POLLING)))
241 					handled += ata_host_intr(ap, qc);
242 				else if (is_vsc_sata_int_err(i, int_status)) {
243 					/*
244 					 * On some chips (i.e. Intel 31244), an error
245 					 * interrupt will sneak in at initialization
246 					 * time (phy state changes).  Clearing the SCR
247 					 * error register is not required, but it prevents
248 					 * the phy state change interrupts from recurring
249 					 * later.
250 					 */
251 					u32 err_status;
252 					err_status = vsc_sata_scr_read(ap, SCR_ERROR);
253 					printk(KERN_DEBUG "%s: clearing interrupt, "
254 					       "status %x; sata err status %x\n",
255 					       __FUNCTION__,
256 					       int_status, err_status);
257 					vsc_sata_scr_write(ap, SCR_ERROR, err_status);
258 					/* Clear interrupt status */
259 					ata_chk_status(ap);
260 					handled++;
261 				}
262 			}
263 		}
264 	}
265 
266 	spin_unlock(&host->lock);
267 
268 	return IRQ_RETVAL(handled);
269 }
270 
271 
272 static struct scsi_host_template vsc_sata_sht = {
273 	.module			= THIS_MODULE,
274 	.name			= DRV_NAME,
275 	.ioctl			= ata_scsi_ioctl,
276 	.queuecommand		= ata_scsi_queuecmd,
277 	.can_queue		= ATA_DEF_QUEUE,
278 	.this_id		= ATA_SHT_THIS_ID,
279 	.sg_tablesize		= LIBATA_MAX_PRD,
280 	.cmd_per_lun		= ATA_SHT_CMD_PER_LUN,
281 	.emulated		= ATA_SHT_EMULATED,
282 	.use_clustering		= ATA_SHT_USE_CLUSTERING,
283 	.proc_name		= DRV_NAME,
284 	.dma_boundary		= ATA_DMA_BOUNDARY,
285 	.slave_configure	= ata_scsi_slave_config,
286 	.slave_destroy		= ata_scsi_slave_destroy,
287 	.bios_param		= ata_std_bios_param,
288 };
289 
290 
291 static const struct ata_port_operations vsc_sata_ops = {
292 	.port_disable		= ata_port_disable,
293 	.tf_load		= vsc_sata_tf_load,
294 	.tf_read		= vsc_sata_tf_read,
295 	.exec_command		= ata_exec_command,
296 	.check_status		= ata_check_status,
297 	.dev_select		= ata_std_dev_select,
298 	.bmdma_setup            = ata_bmdma_setup,
299 	.bmdma_start            = ata_bmdma_start,
300 	.bmdma_stop		= ata_bmdma_stop,
301 	.bmdma_status		= ata_bmdma_status,
302 	.qc_prep		= ata_qc_prep,
303 	.qc_issue		= ata_qc_issue_prot,
304 	.data_xfer		= ata_mmio_data_xfer,
305 	.freeze			= ata_bmdma_freeze,
306 	.thaw			= ata_bmdma_thaw,
307 	.error_handler		= ata_bmdma_error_handler,
308 	.post_internal_cmd	= ata_bmdma_post_internal_cmd,
309 	.irq_handler		= vsc_sata_interrupt,
310 	.irq_clear		= ata_bmdma_irq_clear,
311 	.scr_read		= vsc_sata_scr_read,
312 	.scr_write		= vsc_sata_scr_write,
313 	.port_start		= ata_port_start,
314 	.port_stop		= ata_port_stop,
315 	.host_stop		= ata_pci_host_stop,
316 };
317 
318 static void __devinit vsc_sata_setup_port(struct ata_ioports *port, unsigned long base)
319 {
320 	port->cmd_addr		= base + VSC_SATA_TF_CMD_OFFSET;
321 	port->data_addr		= base + VSC_SATA_TF_DATA_OFFSET;
322 	port->error_addr	= base + VSC_SATA_TF_ERROR_OFFSET;
323 	port->feature_addr	= base + VSC_SATA_TF_FEATURE_OFFSET;
324 	port->nsect_addr	= base + VSC_SATA_TF_NSECT_OFFSET;
325 	port->lbal_addr		= base + VSC_SATA_TF_LBAL_OFFSET;
326 	port->lbam_addr		= base + VSC_SATA_TF_LBAM_OFFSET;
327 	port->lbah_addr		= base + VSC_SATA_TF_LBAH_OFFSET;
328 	port->device_addr	= base + VSC_SATA_TF_DEVICE_OFFSET;
329 	port->status_addr	= base + VSC_SATA_TF_STATUS_OFFSET;
330 	port->command_addr	= base + VSC_SATA_TF_COMMAND_OFFSET;
331 	port->altstatus_addr	= base + VSC_SATA_TF_ALTSTATUS_OFFSET;
332 	port->ctl_addr		= base + VSC_SATA_TF_CTL_OFFSET;
333 	port->bmdma_addr	= base + VSC_SATA_DMA_CMD_OFFSET;
334 	port->scr_addr		= base + VSC_SATA_SCR_STATUS_OFFSET;
335 	writel(0, (void __iomem *) base + VSC_SATA_UP_DESCRIPTOR_OFFSET);
336 	writel(0, (void __iomem *) base + VSC_SATA_UP_DATA_BUFFER_OFFSET);
337 }
338 
339 
340 static int __devinit vsc_sata_init_one (struct pci_dev *pdev, const struct pci_device_id *ent)
341 {
342 	static int printed_version;
343 	struct ata_probe_ent *probe_ent = NULL;
344 	unsigned long base;
345 	int pci_dev_busy = 0;
346 	void __iomem *mmio_base;
347 	int rc;
348 
349 	if (!printed_version++)
350 		dev_printk(KERN_DEBUG, &pdev->dev, "version " DRV_VERSION "\n");
351 
352 	rc = pci_enable_device(pdev);
353 	if (rc)
354 		return rc;
355 
356 	/*
357 	 * Check if we have needed resource mapped.
358 	 */
359 	if (pci_resource_len(pdev, 0) == 0) {
360 		rc = -ENODEV;
361 		goto err_out;
362 	}
363 
364 	rc = pci_request_regions(pdev, DRV_NAME);
365 	if (rc) {
366 		pci_dev_busy = 1;
367 		goto err_out;
368 	}
369 
370 	/*
371 	 * Use 32 bit DMA mask, because 64 bit address support is poor.
372 	 */
373 	rc = pci_set_dma_mask(pdev, DMA_32BIT_MASK);
374 	if (rc)
375 		goto err_out_regions;
376 	rc = pci_set_consistent_dma_mask(pdev, DMA_32BIT_MASK);
377 	if (rc)
378 		goto err_out_regions;
379 
380 	probe_ent = kmalloc(sizeof(*probe_ent), GFP_KERNEL);
381 	if (probe_ent == NULL) {
382 		rc = -ENOMEM;
383 		goto err_out_regions;
384 	}
385 	memset(probe_ent, 0, sizeof(*probe_ent));
386 	probe_ent->dev = pci_dev_to_dev(pdev);
387 	INIT_LIST_HEAD(&probe_ent->node);
388 
389 	mmio_base = pci_iomap(pdev, 0, 0);
390 	if (mmio_base == NULL) {
391 		rc = -ENOMEM;
392 		goto err_out_free_ent;
393 	}
394 	base = (unsigned long) mmio_base;
395 
396 	/*
397 	 * Due to a bug in the chip, the default cache line size can't be used
398 	 */
399 	pci_write_config_byte(pdev, PCI_CACHE_LINE_SIZE, 0x80);
400 
401 	probe_ent->sht = &vsc_sata_sht;
402 	probe_ent->port_flags = ATA_FLAG_SATA | ATA_FLAG_NO_LEGACY |
403 				ATA_FLAG_MMIO;
404 	probe_ent->port_ops = &vsc_sata_ops;
405 	probe_ent->n_ports = 4;
406 	probe_ent->irq = pdev->irq;
407 	probe_ent->irq_flags = IRQF_SHARED;
408 	probe_ent->mmio_base = mmio_base;
409 
410 	/* We don't care much about the PIO/UDMA masks, but the core won't like us
411 	 * if we don't fill these
412 	 */
413 	probe_ent->pio_mask = 0x1f;
414 	probe_ent->mwdma_mask = 0x07;
415 	probe_ent->udma_mask = 0x7f;
416 
417 	/* We have 4 ports per PCI function */
418 	vsc_sata_setup_port(&probe_ent->port[0], base + 1 * VSC_SATA_PORT_OFFSET);
419 	vsc_sata_setup_port(&probe_ent->port[1], base + 2 * VSC_SATA_PORT_OFFSET);
420 	vsc_sata_setup_port(&probe_ent->port[2], base + 3 * VSC_SATA_PORT_OFFSET);
421 	vsc_sata_setup_port(&probe_ent->port[3], base + 4 * VSC_SATA_PORT_OFFSET);
422 
423 	pci_set_master(pdev);
424 
425 	/*
426 	 * Config offset 0x98 is "Extended Control and Status Register 0"
427 	 * Default value is (1 << 28).  All bits except bit 28 are reserved in
428 	 * DPA mode.  If bit 28 is set, LED 0 reflects all ports' activity.
429 	 * If bit 28 is clear, each port has its own LED.
430 	 */
431 	pci_write_config_dword(pdev, 0x98, 0);
432 
433 	/* FIXME: check ata_device_add return value */
434 	ata_device_add(probe_ent);
435 	kfree(probe_ent);
436 
437 	return 0;
438 
439 err_out_free_ent:
440 	kfree(probe_ent);
441 err_out_regions:
442 	pci_release_regions(pdev);
443 err_out:
444 	if (!pci_dev_busy)
445 		pci_disable_device(pdev);
446 	return rc;
447 }
448 
449 static const struct pci_device_id vsc_sata_pci_tbl[] = {
450 	{ PCI_VENDOR_ID_VITESSE, 0x7174,
451 	  PCI_ANY_ID, PCI_ANY_ID, 0x10600, 0xFFFFFF, 0 },
452 	{ PCI_VENDOR_ID_INTEL, 0x3200,
453 	  PCI_ANY_ID, PCI_ANY_ID, 0x10600, 0xFFFFFF, 0 },
454 
455 	{ }	/* terminate list */
456 };
457 
458 static struct pci_driver vsc_sata_pci_driver = {
459 	.name			= DRV_NAME,
460 	.id_table		= vsc_sata_pci_tbl,
461 	.probe			= vsc_sata_init_one,
462 	.remove			= ata_pci_remove_one,
463 };
464 
465 static int __init vsc_sata_init(void)
466 {
467 	return pci_register_driver(&vsc_sata_pci_driver);
468 }
469 
470 static void __exit vsc_sata_exit(void)
471 {
472 	pci_unregister_driver(&vsc_sata_pci_driver);
473 }
474 
475 MODULE_AUTHOR("Jeremy Higdon");
476 MODULE_DESCRIPTION("low-level driver for Vitesse VSC7174 SATA controller");
477 MODULE_LICENSE("GPL");
478 MODULE_DEVICE_TABLE(pci, vsc_sata_pci_tbl);
479 MODULE_VERSION(DRV_VERSION);
480 
481 module_init(vsc_sata_init);
482 module_exit(vsc_sata_exit);
483