Loading...
1/* sun_esp.c: ESP front-end for Sparc SBUS systems.
2 *
3 * Copyright (C) 2007, 2008 David S. Miller (davem@davemloft.net)
4 */
5
6#include <linux/kernel.h>
7#include <linux/types.h>
8#include <linux/delay.h>
9#include <linux/module.h>
10#include <linux/mm.h>
11#include <linux/init.h>
12#include <linux/dma-mapping.h>
13#include <linux/of.h>
14#include <linux/of_device.h>
15#include <linux/gfp.h>
16
17#include <asm/irq.h>
18#include <asm/io.h>
19#include <asm/dma.h>
20
21#include <scsi/scsi_host.h>
22
23#include "esp_scsi.h"
24
25#define DRV_MODULE_NAME "sun_esp"
26#define PFX DRV_MODULE_NAME ": "
27#define DRV_VERSION "1.100"
28#define DRV_MODULE_RELDATE "August 27, 2008"
29
30#define dma_read32(REG) \
31 sbus_readl(esp->dma_regs + (REG))
32#define dma_write32(VAL, REG) \
33 sbus_writel((VAL), esp->dma_regs + (REG))
34
35/* DVMA chip revisions */
36enum dvma_rev {
37 dvmarev0,
38 dvmaesc1,
39 dvmarev1,
40 dvmarev2,
41 dvmarev3,
42 dvmarevplus,
43 dvmahme
44};
45
46static int __devinit esp_sbus_setup_dma(struct esp *esp,
47 struct platform_device *dma_of)
48{
49 esp->dma = dma_of;
50
51 esp->dma_regs = of_ioremap(&dma_of->resource[0], 0,
52 resource_size(&dma_of->resource[0]),
53 "espdma");
54 if (!esp->dma_regs)
55 return -ENOMEM;
56
57 switch (dma_read32(DMA_CSR) & DMA_DEVICE_ID) {
58 case DMA_VERS0:
59 esp->dmarev = dvmarev0;
60 break;
61 case DMA_ESCV1:
62 esp->dmarev = dvmaesc1;
63 break;
64 case DMA_VERS1:
65 esp->dmarev = dvmarev1;
66 break;
67 case DMA_VERS2:
68 esp->dmarev = dvmarev2;
69 break;
70 case DMA_VERHME:
71 esp->dmarev = dvmahme;
72 break;
73 case DMA_VERSPLUS:
74 esp->dmarev = dvmarevplus;
75 break;
76 }
77
78 return 0;
79
80}
81
82static int __devinit esp_sbus_map_regs(struct esp *esp, int hme)
83{
84 struct platform_device *op = esp->dev;
85 struct resource *res;
86
87 /* On HME, two reg sets exist, first is DVMA,
88 * second is ESP registers.
89 */
90 if (hme)
91 res = &op->resource[1];
92 else
93 res = &op->resource[0];
94
95 esp->regs = of_ioremap(res, 0, SBUS_ESP_REG_SIZE, "ESP");
96 if (!esp->regs)
97 return -ENOMEM;
98
99 return 0;
100}
101
102static int __devinit esp_sbus_map_command_block(struct esp *esp)
103{
104 struct platform_device *op = esp->dev;
105
106 esp->command_block = dma_alloc_coherent(&op->dev, 16,
107 &esp->command_block_dma,
108 GFP_ATOMIC);
109 if (!esp->command_block)
110 return -ENOMEM;
111 return 0;
112}
113
114static int __devinit esp_sbus_register_irq(struct esp *esp)
115{
116 struct Scsi_Host *host = esp->host;
117 struct platform_device *op = esp->dev;
118
119 host->irq = op->archdata.irqs[0];
120 return request_irq(host->irq, scsi_esp_intr, IRQF_SHARED, "ESP", esp);
121}
122
123static void __devinit esp_get_scsi_id(struct esp *esp, struct platform_device *espdma)
124{
125 struct platform_device *op = esp->dev;
126 struct device_node *dp;
127
128 dp = op->dev.of_node;
129 esp->scsi_id = of_getintprop_default(dp, "initiator-id", 0xff);
130 if (esp->scsi_id != 0xff)
131 goto done;
132
133 esp->scsi_id = of_getintprop_default(dp, "scsi-initiator-id", 0xff);
134 if (esp->scsi_id != 0xff)
135 goto done;
136
137 esp->scsi_id = of_getintprop_default(espdma->dev.of_node,
138 "scsi-initiator-id", 7);
139
140done:
141 esp->host->this_id = esp->scsi_id;
142 esp->scsi_id_mask = (1 << esp->scsi_id);
143}
144
145static void __devinit esp_get_differential(struct esp *esp)
146{
147 struct platform_device *op = esp->dev;
148 struct device_node *dp;
149
150 dp = op->dev.of_node;
151 if (of_find_property(dp, "differential", NULL))
152 esp->flags |= ESP_FLAG_DIFFERENTIAL;
153 else
154 esp->flags &= ~ESP_FLAG_DIFFERENTIAL;
155}
156
157static void __devinit esp_get_clock_params(struct esp *esp)
158{
159 struct platform_device *op = esp->dev;
160 struct device_node *bus_dp, *dp;
161 int fmhz;
162
163 dp = op->dev.of_node;
164 bus_dp = dp->parent;
165
166 fmhz = of_getintprop_default(dp, "clock-frequency", 0);
167 if (fmhz == 0)
168 fmhz = of_getintprop_default(bus_dp, "clock-frequency", 0);
169
170 esp->cfreq = fmhz;
171}
172
173static void __devinit esp_get_bursts(struct esp *esp, struct platform_device *dma_of)
174{
175 struct device_node *dma_dp = dma_of->dev.of_node;
176 struct platform_device *op = esp->dev;
177 struct device_node *dp;
178 u8 bursts, val;
179
180 dp = op->dev.of_node;
181 bursts = of_getintprop_default(dp, "burst-sizes", 0xff);
182 val = of_getintprop_default(dma_dp, "burst-sizes", 0xff);
183 if (val != 0xff)
184 bursts &= val;
185
186 val = of_getintprop_default(dma_dp->parent, "burst-sizes", 0xff);
187 if (val != 0xff)
188 bursts &= val;
189
190 if (bursts == 0xff ||
191 (bursts & DMA_BURST16) == 0 ||
192 (bursts & DMA_BURST32) == 0)
193 bursts = (DMA_BURST32 - 1);
194
195 esp->bursts = bursts;
196}
197
198static void __devinit esp_sbus_get_props(struct esp *esp, struct platform_device *espdma)
199{
200 esp_get_scsi_id(esp, espdma);
201 esp_get_differential(esp);
202 esp_get_clock_params(esp);
203 esp_get_bursts(esp, espdma);
204}
205
206static void sbus_esp_write8(struct esp *esp, u8 val, unsigned long reg)
207{
208 sbus_writeb(val, esp->regs + (reg * 4UL));
209}
210
211static u8 sbus_esp_read8(struct esp *esp, unsigned long reg)
212{
213 return sbus_readb(esp->regs + (reg * 4UL));
214}
215
216static dma_addr_t sbus_esp_map_single(struct esp *esp, void *buf,
217 size_t sz, int dir)
218{
219 struct platform_device *op = esp->dev;
220
221 return dma_map_single(&op->dev, buf, sz, dir);
222}
223
224static int sbus_esp_map_sg(struct esp *esp, struct scatterlist *sg,
225 int num_sg, int dir)
226{
227 struct platform_device *op = esp->dev;
228
229 return dma_map_sg(&op->dev, sg, num_sg, dir);
230}
231
232static void sbus_esp_unmap_single(struct esp *esp, dma_addr_t addr,
233 size_t sz, int dir)
234{
235 struct platform_device *op = esp->dev;
236
237 dma_unmap_single(&op->dev, addr, sz, dir);
238}
239
240static void sbus_esp_unmap_sg(struct esp *esp, struct scatterlist *sg,
241 int num_sg, int dir)
242{
243 struct platform_device *op = esp->dev;
244
245 dma_unmap_sg(&op->dev, sg, num_sg, dir);
246}
247
248static int sbus_esp_irq_pending(struct esp *esp)
249{
250 if (dma_read32(DMA_CSR) & (DMA_HNDL_INTR | DMA_HNDL_ERROR))
251 return 1;
252 return 0;
253}
254
255static void sbus_esp_reset_dma(struct esp *esp)
256{
257 int can_do_burst16, can_do_burst32, can_do_burst64;
258 int can_do_sbus64, lim;
259 struct platform_device *op;
260 u32 val;
261
262 can_do_burst16 = (esp->bursts & DMA_BURST16) != 0;
263 can_do_burst32 = (esp->bursts & DMA_BURST32) != 0;
264 can_do_burst64 = 0;
265 can_do_sbus64 = 0;
266 op = esp->dev;
267 if (sbus_can_dma_64bit())
268 can_do_sbus64 = 1;
269 if (sbus_can_burst64())
270 can_do_burst64 = (esp->bursts & DMA_BURST64) != 0;
271
272 /* Put the DVMA into a known state. */
273 if (esp->dmarev != dvmahme) {
274 val = dma_read32(DMA_CSR);
275 dma_write32(val | DMA_RST_SCSI, DMA_CSR);
276 dma_write32(val & ~DMA_RST_SCSI, DMA_CSR);
277 }
278 switch (esp->dmarev) {
279 case dvmahme:
280 dma_write32(DMA_RESET_FAS366, DMA_CSR);
281 dma_write32(DMA_RST_SCSI, DMA_CSR);
282
283 esp->prev_hme_dmacsr = (DMA_PARITY_OFF | DMA_2CLKS |
284 DMA_SCSI_DISAB | DMA_INT_ENAB);
285
286 esp->prev_hme_dmacsr &= ~(DMA_ENABLE | DMA_ST_WRITE |
287 DMA_BRST_SZ);
288
289 if (can_do_burst64)
290 esp->prev_hme_dmacsr |= DMA_BRST64;
291 else if (can_do_burst32)
292 esp->prev_hme_dmacsr |= DMA_BRST32;
293
294 if (can_do_sbus64) {
295 esp->prev_hme_dmacsr |= DMA_SCSI_SBUS64;
296 sbus_set_sbus64(&op->dev, esp->bursts);
297 }
298
299 lim = 1000;
300 while (dma_read32(DMA_CSR) & DMA_PEND_READ) {
301 if (--lim == 0) {
302 printk(KERN_ALERT PFX "esp%d: DMA_PEND_READ "
303 "will not clear!\n",
304 esp->host->unique_id);
305 break;
306 }
307 udelay(1);
308 }
309
310 dma_write32(0, DMA_CSR);
311 dma_write32(esp->prev_hme_dmacsr, DMA_CSR);
312
313 dma_write32(0, DMA_ADDR);
314 break;
315
316 case dvmarev2:
317 if (esp->rev != ESP100) {
318 val = dma_read32(DMA_CSR);
319 dma_write32(val | DMA_3CLKS, DMA_CSR);
320 }
321 break;
322
323 case dvmarev3:
324 val = dma_read32(DMA_CSR);
325 val &= ~DMA_3CLKS;
326 val |= DMA_2CLKS;
327 if (can_do_burst32) {
328 val &= ~DMA_BRST_SZ;
329 val |= DMA_BRST32;
330 }
331 dma_write32(val, DMA_CSR);
332 break;
333
334 case dvmaesc1:
335 val = dma_read32(DMA_CSR);
336 val |= DMA_ADD_ENABLE;
337 val &= ~DMA_BCNT_ENAB;
338 if (!can_do_burst32 && can_do_burst16) {
339 val |= DMA_ESC_BURST;
340 } else {
341 val &= ~(DMA_ESC_BURST);
342 }
343 dma_write32(val, DMA_CSR);
344 break;
345
346 default:
347 break;
348 }
349
350 /* Enable interrupts. */
351 val = dma_read32(DMA_CSR);
352 dma_write32(val | DMA_INT_ENAB, DMA_CSR);
353}
354
355static void sbus_esp_dma_drain(struct esp *esp)
356{
357 u32 csr;
358 int lim;
359
360 if (esp->dmarev == dvmahme)
361 return;
362
363 csr = dma_read32(DMA_CSR);
364 if (!(csr & DMA_FIFO_ISDRAIN))
365 return;
366
367 if (esp->dmarev != dvmarev3 && esp->dmarev != dvmaesc1)
368 dma_write32(csr | DMA_FIFO_STDRAIN, DMA_CSR);
369
370 lim = 1000;
371 while (dma_read32(DMA_CSR) & DMA_FIFO_ISDRAIN) {
372 if (--lim == 0) {
373 printk(KERN_ALERT PFX "esp%d: DMA will not drain!\n",
374 esp->host->unique_id);
375 break;
376 }
377 udelay(1);
378 }
379}
380
381static void sbus_esp_dma_invalidate(struct esp *esp)
382{
383 if (esp->dmarev == dvmahme) {
384 dma_write32(DMA_RST_SCSI, DMA_CSR);
385
386 esp->prev_hme_dmacsr = ((esp->prev_hme_dmacsr |
387 (DMA_PARITY_OFF | DMA_2CLKS |
388 DMA_SCSI_DISAB | DMA_INT_ENAB)) &
389 ~(DMA_ST_WRITE | DMA_ENABLE));
390
391 dma_write32(0, DMA_CSR);
392 dma_write32(esp->prev_hme_dmacsr, DMA_CSR);
393
394 /* This is necessary to avoid having the SCSI channel
395 * engine lock up on us.
396 */
397 dma_write32(0, DMA_ADDR);
398 } else {
399 u32 val;
400 int lim;
401
402 lim = 1000;
403 while ((val = dma_read32(DMA_CSR)) & DMA_PEND_READ) {
404 if (--lim == 0) {
405 printk(KERN_ALERT PFX "esp%d: DMA will not "
406 "invalidate!\n", esp->host->unique_id);
407 break;
408 }
409 udelay(1);
410 }
411
412 val &= ~(DMA_ENABLE | DMA_ST_WRITE | DMA_BCNT_ENAB);
413 val |= DMA_FIFO_INV;
414 dma_write32(val, DMA_CSR);
415 val &= ~DMA_FIFO_INV;
416 dma_write32(val, DMA_CSR);
417 }
418}
419
420static void sbus_esp_send_dma_cmd(struct esp *esp, u32 addr, u32 esp_count,
421 u32 dma_count, int write, u8 cmd)
422{
423 u32 csr;
424
425 BUG_ON(!(cmd & ESP_CMD_DMA));
426
427 sbus_esp_write8(esp, (esp_count >> 0) & 0xff, ESP_TCLOW);
428 sbus_esp_write8(esp, (esp_count >> 8) & 0xff, ESP_TCMED);
429 if (esp->rev == FASHME) {
430 sbus_esp_write8(esp, (esp_count >> 16) & 0xff, FAS_RLO);
431 sbus_esp_write8(esp, 0, FAS_RHI);
432
433 scsi_esp_cmd(esp, cmd);
434
435 csr = esp->prev_hme_dmacsr;
436 csr |= DMA_SCSI_DISAB | DMA_ENABLE;
437 if (write)
438 csr |= DMA_ST_WRITE;
439 else
440 csr &= ~DMA_ST_WRITE;
441 esp->prev_hme_dmacsr = csr;
442
443 dma_write32(dma_count, DMA_COUNT);
444 dma_write32(addr, DMA_ADDR);
445 dma_write32(csr, DMA_CSR);
446 } else {
447 csr = dma_read32(DMA_CSR);
448 csr |= DMA_ENABLE;
449 if (write)
450 csr |= DMA_ST_WRITE;
451 else
452 csr &= ~DMA_ST_WRITE;
453 dma_write32(csr, DMA_CSR);
454 if (esp->dmarev == dvmaesc1) {
455 u32 end = PAGE_ALIGN(addr + dma_count + 16U);
456 dma_write32(end - addr, DMA_COUNT);
457 }
458 dma_write32(addr, DMA_ADDR);
459
460 scsi_esp_cmd(esp, cmd);
461 }
462
463}
464
465static int sbus_esp_dma_error(struct esp *esp)
466{
467 u32 csr = dma_read32(DMA_CSR);
468
469 if (csr & DMA_HNDL_ERROR)
470 return 1;
471
472 return 0;
473}
474
475static const struct esp_driver_ops sbus_esp_ops = {
476 .esp_write8 = sbus_esp_write8,
477 .esp_read8 = sbus_esp_read8,
478 .map_single = sbus_esp_map_single,
479 .map_sg = sbus_esp_map_sg,
480 .unmap_single = sbus_esp_unmap_single,
481 .unmap_sg = sbus_esp_unmap_sg,
482 .irq_pending = sbus_esp_irq_pending,
483 .reset_dma = sbus_esp_reset_dma,
484 .dma_drain = sbus_esp_dma_drain,
485 .dma_invalidate = sbus_esp_dma_invalidate,
486 .send_dma_cmd = sbus_esp_send_dma_cmd,
487 .dma_error = sbus_esp_dma_error,
488};
489
490static int __devinit esp_sbus_probe_one(struct platform_device *op,
491 struct platform_device *espdma,
492 int hme)
493{
494 struct scsi_host_template *tpnt = &scsi_esp_template;
495 struct Scsi_Host *host;
496 struct esp *esp;
497 int err;
498
499 host = scsi_host_alloc(tpnt, sizeof(struct esp));
500
501 err = -ENOMEM;
502 if (!host)
503 goto fail;
504
505 host->max_id = (hme ? 16 : 8);
506 esp = shost_priv(host);
507
508 esp->host = host;
509 esp->dev = op;
510 esp->ops = &sbus_esp_ops;
511
512 if (hme)
513 esp->flags |= ESP_FLAG_WIDE_CAPABLE;
514
515 err = esp_sbus_setup_dma(esp, espdma);
516 if (err < 0)
517 goto fail_unlink;
518
519 err = esp_sbus_map_regs(esp, hme);
520 if (err < 0)
521 goto fail_unlink;
522
523 err = esp_sbus_map_command_block(esp);
524 if (err < 0)
525 goto fail_unmap_regs;
526
527 err = esp_sbus_register_irq(esp);
528 if (err < 0)
529 goto fail_unmap_command_block;
530
531 esp_sbus_get_props(esp, espdma);
532
533 /* Before we try to touch the ESP chip, ESC1 dma can
534 * come up with the reset bit set, so make sure that
535 * is clear first.
536 */
537 if (esp->dmarev == dvmaesc1) {
538 u32 val = dma_read32(DMA_CSR);
539
540 dma_write32(val & ~DMA_RST_SCSI, DMA_CSR);
541 }
542
543 dev_set_drvdata(&op->dev, esp);
544
545 err = scsi_esp_register(esp, &op->dev);
546 if (err)
547 goto fail_free_irq;
548
549 return 0;
550
551fail_free_irq:
552 free_irq(host->irq, esp);
553fail_unmap_command_block:
554 dma_free_coherent(&op->dev, 16,
555 esp->command_block,
556 esp->command_block_dma);
557fail_unmap_regs:
558 of_iounmap(&op->resource[(hme ? 1 : 0)], esp->regs, SBUS_ESP_REG_SIZE);
559fail_unlink:
560 scsi_host_put(host);
561fail:
562 return err;
563}
564
565static int __devinit esp_sbus_probe(struct platform_device *op)
566{
567 struct device_node *dma_node = NULL;
568 struct device_node *dp = op->dev.of_node;
569 struct platform_device *dma_of = NULL;
570 int hme = 0;
571
572 if (dp->parent &&
573 (!strcmp(dp->parent->name, "espdma") ||
574 !strcmp(dp->parent->name, "dma")))
575 dma_node = dp->parent;
576 else if (!strcmp(dp->name, "SUNW,fas")) {
577 dma_node = op->dev.of_node;
578 hme = 1;
579 }
580 if (dma_node)
581 dma_of = of_find_device_by_node(dma_node);
582 if (!dma_of)
583 return -ENODEV;
584
585 return esp_sbus_probe_one(op, dma_of, hme);
586}
587
588static int __devexit esp_sbus_remove(struct platform_device *op)
589{
590 struct esp *esp = dev_get_drvdata(&op->dev);
591 struct platform_device *dma_of = esp->dma;
592 unsigned int irq = esp->host->irq;
593 bool is_hme;
594 u32 val;
595
596 scsi_esp_unregister(esp);
597
598 /* Disable interrupts. */
599 val = dma_read32(DMA_CSR);
600 dma_write32(val & ~DMA_INT_ENAB, DMA_CSR);
601
602 free_irq(irq, esp);
603
604 is_hme = (esp->dmarev == dvmahme);
605
606 dma_free_coherent(&op->dev, 16,
607 esp->command_block,
608 esp->command_block_dma);
609 of_iounmap(&op->resource[(is_hme ? 1 : 0)], esp->regs,
610 SBUS_ESP_REG_SIZE);
611 of_iounmap(&dma_of->resource[0], esp->dma_regs,
612 resource_size(&dma_of->resource[0]));
613
614 scsi_host_put(esp->host);
615
616 dev_set_drvdata(&op->dev, NULL);
617
618 return 0;
619}
620
621static const struct of_device_id esp_match[] = {
622 {
623 .name = "SUNW,esp",
624 },
625 {
626 .name = "SUNW,fas",
627 },
628 {
629 .name = "esp",
630 },
631 {},
632};
633MODULE_DEVICE_TABLE(of, esp_match);
634
635static struct platform_driver esp_sbus_driver = {
636 .driver = {
637 .name = "esp",
638 .owner = THIS_MODULE,
639 .of_match_table = esp_match,
640 },
641 .probe = esp_sbus_probe,
642 .remove = __devexit_p(esp_sbus_remove),
643};
644
645static int __init sunesp_init(void)
646{
647 return platform_driver_register(&esp_sbus_driver);
648}
649
650static void __exit sunesp_exit(void)
651{
652 platform_driver_unregister(&esp_sbus_driver);
653}
654
655MODULE_DESCRIPTION("Sun ESP SCSI driver");
656MODULE_AUTHOR("David S. Miller (davem@davemloft.net)");
657MODULE_LICENSE("GPL");
658MODULE_VERSION(DRV_VERSION);
659
660module_init(sunesp_init);
661module_exit(sunesp_exit);
1// SPDX-License-Identifier: GPL-2.0-only
2/* sun_esp.c: ESP front-end for Sparc SBUS systems.
3 *
4 * Copyright (C) 2007, 2008 David S. Miller (davem@davemloft.net)
5 */
6
7#include <linux/kernel.h>
8#include <linux/types.h>
9#include <linux/delay.h>
10#include <linux/module.h>
11#include <linux/mm.h>
12#include <linux/init.h>
13#include <linux/dma-mapping.h>
14#include <linux/of.h>
15#include <linux/of_device.h>
16#include <linux/gfp.h>
17
18#include <asm/irq.h>
19#include <asm/io.h>
20#include <asm/dma.h>
21
22#include <scsi/scsi_host.h>
23
24#include "esp_scsi.h"
25
26#define DRV_MODULE_NAME "sun_esp"
27#define PFX DRV_MODULE_NAME ": "
28#define DRV_VERSION "1.100"
29#define DRV_MODULE_RELDATE "August 27, 2008"
30
31#define dma_read32(REG) \
32 sbus_readl(esp->dma_regs + (REG))
33#define dma_write32(VAL, REG) \
34 sbus_writel((VAL), esp->dma_regs + (REG))
35
36/* DVMA chip revisions */
37enum dvma_rev {
38 dvmarev0,
39 dvmaesc1,
40 dvmarev1,
41 dvmarev2,
42 dvmarev3,
43 dvmarevplus,
44 dvmahme
45};
46
47static int esp_sbus_setup_dma(struct esp *esp, struct platform_device *dma_of)
48{
49 esp->dma = dma_of;
50
51 esp->dma_regs = of_ioremap(&dma_of->resource[0], 0,
52 resource_size(&dma_of->resource[0]),
53 "espdma");
54 if (!esp->dma_regs)
55 return -ENOMEM;
56
57 switch (dma_read32(DMA_CSR) & DMA_DEVICE_ID) {
58 case DMA_VERS0:
59 esp->dmarev = dvmarev0;
60 break;
61 case DMA_ESCV1:
62 esp->dmarev = dvmaesc1;
63 break;
64 case DMA_VERS1:
65 esp->dmarev = dvmarev1;
66 break;
67 case DMA_VERS2:
68 esp->dmarev = dvmarev2;
69 break;
70 case DMA_VERHME:
71 esp->dmarev = dvmahme;
72 break;
73 case DMA_VERSPLUS:
74 esp->dmarev = dvmarevplus;
75 break;
76 }
77
78 return 0;
79
80}
81
82static int esp_sbus_map_regs(struct esp *esp, int hme)
83{
84 struct platform_device *op = to_platform_device(esp->dev);
85 struct resource *res;
86
87 /* On HME, two reg sets exist, first is DVMA,
88 * second is ESP registers.
89 */
90 if (hme)
91 res = &op->resource[1];
92 else
93 res = &op->resource[0];
94
95 esp->regs = of_ioremap(res, 0, SBUS_ESP_REG_SIZE, "ESP");
96 if (!esp->regs)
97 return -ENOMEM;
98
99 return 0;
100}
101
102static int esp_sbus_map_command_block(struct esp *esp)
103{
104 esp->command_block = dma_alloc_coherent(esp->dev, 16,
105 &esp->command_block_dma,
106 GFP_KERNEL);
107 if (!esp->command_block)
108 return -ENOMEM;
109 return 0;
110}
111
112static int esp_sbus_register_irq(struct esp *esp)
113{
114 struct Scsi_Host *host = esp->host;
115 struct platform_device *op = to_platform_device(esp->dev);
116
117 host->irq = op->archdata.irqs[0];
118 return request_irq(host->irq, scsi_esp_intr, IRQF_SHARED, "ESP", esp);
119}
120
121static void esp_get_scsi_id(struct esp *esp, struct platform_device *espdma)
122{
123 struct platform_device *op = to_platform_device(esp->dev);
124 struct device_node *dp;
125
126 dp = op->dev.of_node;
127 esp->scsi_id = of_getintprop_default(dp, "initiator-id", 0xff);
128 if (esp->scsi_id != 0xff)
129 goto done;
130
131 esp->scsi_id = of_getintprop_default(dp, "scsi-initiator-id", 0xff);
132 if (esp->scsi_id != 0xff)
133 goto done;
134
135 esp->scsi_id = of_getintprop_default(espdma->dev.of_node,
136 "scsi-initiator-id", 7);
137
138done:
139 esp->host->this_id = esp->scsi_id;
140 esp->scsi_id_mask = (1 << esp->scsi_id);
141}
142
143static void esp_get_differential(struct esp *esp)
144{
145 struct platform_device *op = to_platform_device(esp->dev);
146 struct device_node *dp;
147
148 dp = op->dev.of_node;
149 if (of_find_property(dp, "differential", NULL))
150 esp->flags |= ESP_FLAG_DIFFERENTIAL;
151 else
152 esp->flags &= ~ESP_FLAG_DIFFERENTIAL;
153}
154
155static void esp_get_clock_params(struct esp *esp)
156{
157 struct platform_device *op = to_platform_device(esp->dev);
158 struct device_node *bus_dp, *dp;
159 int fmhz;
160
161 dp = op->dev.of_node;
162 bus_dp = dp->parent;
163
164 fmhz = of_getintprop_default(dp, "clock-frequency", 0);
165 if (fmhz == 0)
166 fmhz = of_getintprop_default(bus_dp, "clock-frequency", 0);
167
168 esp->cfreq = fmhz;
169}
170
171static void esp_get_bursts(struct esp *esp, struct platform_device *dma_of)
172{
173 struct device_node *dma_dp = dma_of->dev.of_node;
174 struct platform_device *op = to_platform_device(esp->dev);
175 struct device_node *dp;
176 u8 bursts, val;
177
178 dp = op->dev.of_node;
179 bursts = of_getintprop_default(dp, "burst-sizes", 0xff);
180 val = of_getintprop_default(dma_dp, "burst-sizes", 0xff);
181 if (val != 0xff)
182 bursts &= val;
183
184 val = of_getintprop_default(dma_dp->parent, "burst-sizes", 0xff);
185 if (val != 0xff)
186 bursts &= val;
187
188 if (bursts == 0xff ||
189 (bursts & DMA_BURST16) == 0 ||
190 (bursts & DMA_BURST32) == 0)
191 bursts = (DMA_BURST32 - 1);
192
193 esp->bursts = bursts;
194}
195
196static void esp_sbus_get_props(struct esp *esp, struct platform_device *espdma)
197{
198 esp_get_scsi_id(esp, espdma);
199 esp_get_differential(esp);
200 esp_get_clock_params(esp);
201 esp_get_bursts(esp, espdma);
202}
203
204static void sbus_esp_write8(struct esp *esp, u8 val, unsigned long reg)
205{
206 sbus_writeb(val, esp->regs + (reg * 4UL));
207}
208
209static u8 sbus_esp_read8(struct esp *esp, unsigned long reg)
210{
211 return sbus_readb(esp->regs + (reg * 4UL));
212}
213
214static int sbus_esp_irq_pending(struct esp *esp)
215{
216 if (dma_read32(DMA_CSR) & (DMA_HNDL_INTR | DMA_HNDL_ERROR))
217 return 1;
218 return 0;
219}
220
221static void sbus_esp_reset_dma(struct esp *esp)
222{
223 int can_do_burst16, can_do_burst32, can_do_burst64;
224 int can_do_sbus64, lim;
225 struct platform_device *op = to_platform_device(esp->dev);
226 u32 val;
227
228 can_do_burst16 = (esp->bursts & DMA_BURST16) != 0;
229 can_do_burst32 = (esp->bursts & DMA_BURST32) != 0;
230 can_do_burst64 = 0;
231 can_do_sbus64 = 0;
232 if (sbus_can_dma_64bit())
233 can_do_sbus64 = 1;
234 if (sbus_can_burst64())
235 can_do_burst64 = (esp->bursts & DMA_BURST64) != 0;
236
237 /* Put the DVMA into a known state. */
238 if (esp->dmarev != dvmahme) {
239 val = dma_read32(DMA_CSR);
240 dma_write32(val | DMA_RST_SCSI, DMA_CSR);
241 dma_write32(val & ~DMA_RST_SCSI, DMA_CSR);
242 }
243 switch (esp->dmarev) {
244 case dvmahme:
245 dma_write32(DMA_RESET_FAS366, DMA_CSR);
246 dma_write32(DMA_RST_SCSI, DMA_CSR);
247
248 esp->prev_hme_dmacsr = (DMA_PARITY_OFF | DMA_2CLKS |
249 DMA_SCSI_DISAB | DMA_INT_ENAB);
250
251 esp->prev_hme_dmacsr &= ~(DMA_ENABLE | DMA_ST_WRITE |
252 DMA_BRST_SZ);
253
254 if (can_do_burst64)
255 esp->prev_hme_dmacsr |= DMA_BRST64;
256 else if (can_do_burst32)
257 esp->prev_hme_dmacsr |= DMA_BRST32;
258
259 if (can_do_sbus64) {
260 esp->prev_hme_dmacsr |= DMA_SCSI_SBUS64;
261 sbus_set_sbus64(&op->dev, esp->bursts);
262 }
263
264 lim = 1000;
265 while (dma_read32(DMA_CSR) & DMA_PEND_READ) {
266 if (--lim == 0) {
267 printk(KERN_ALERT PFX "esp%d: DMA_PEND_READ "
268 "will not clear!\n",
269 esp->host->unique_id);
270 break;
271 }
272 udelay(1);
273 }
274
275 dma_write32(0, DMA_CSR);
276 dma_write32(esp->prev_hme_dmacsr, DMA_CSR);
277
278 dma_write32(0, DMA_ADDR);
279 break;
280
281 case dvmarev2:
282 if (esp->rev != ESP100) {
283 val = dma_read32(DMA_CSR);
284 dma_write32(val | DMA_3CLKS, DMA_CSR);
285 }
286 break;
287
288 case dvmarev3:
289 val = dma_read32(DMA_CSR);
290 val &= ~DMA_3CLKS;
291 val |= DMA_2CLKS;
292 if (can_do_burst32) {
293 val &= ~DMA_BRST_SZ;
294 val |= DMA_BRST32;
295 }
296 dma_write32(val, DMA_CSR);
297 break;
298
299 case dvmaesc1:
300 val = dma_read32(DMA_CSR);
301 val |= DMA_ADD_ENABLE;
302 val &= ~DMA_BCNT_ENAB;
303 if (!can_do_burst32 && can_do_burst16) {
304 val |= DMA_ESC_BURST;
305 } else {
306 val &= ~(DMA_ESC_BURST);
307 }
308 dma_write32(val, DMA_CSR);
309 break;
310
311 default:
312 break;
313 }
314
315 /* Enable interrupts. */
316 val = dma_read32(DMA_CSR);
317 dma_write32(val | DMA_INT_ENAB, DMA_CSR);
318}
319
320static void sbus_esp_dma_drain(struct esp *esp)
321{
322 u32 csr;
323 int lim;
324
325 if (esp->dmarev == dvmahme)
326 return;
327
328 csr = dma_read32(DMA_CSR);
329 if (!(csr & DMA_FIFO_ISDRAIN))
330 return;
331
332 if (esp->dmarev != dvmarev3 && esp->dmarev != dvmaesc1)
333 dma_write32(csr | DMA_FIFO_STDRAIN, DMA_CSR);
334
335 lim = 1000;
336 while (dma_read32(DMA_CSR) & DMA_FIFO_ISDRAIN) {
337 if (--lim == 0) {
338 printk(KERN_ALERT PFX "esp%d: DMA will not drain!\n",
339 esp->host->unique_id);
340 break;
341 }
342 udelay(1);
343 }
344}
345
346static void sbus_esp_dma_invalidate(struct esp *esp)
347{
348 if (esp->dmarev == dvmahme) {
349 dma_write32(DMA_RST_SCSI, DMA_CSR);
350
351 esp->prev_hme_dmacsr = ((esp->prev_hme_dmacsr |
352 (DMA_PARITY_OFF | DMA_2CLKS |
353 DMA_SCSI_DISAB | DMA_INT_ENAB)) &
354 ~(DMA_ST_WRITE | DMA_ENABLE));
355
356 dma_write32(0, DMA_CSR);
357 dma_write32(esp->prev_hme_dmacsr, DMA_CSR);
358
359 /* This is necessary to avoid having the SCSI channel
360 * engine lock up on us.
361 */
362 dma_write32(0, DMA_ADDR);
363 } else {
364 u32 val;
365 int lim;
366
367 lim = 1000;
368 while ((val = dma_read32(DMA_CSR)) & DMA_PEND_READ) {
369 if (--lim == 0) {
370 printk(KERN_ALERT PFX "esp%d: DMA will not "
371 "invalidate!\n", esp->host->unique_id);
372 break;
373 }
374 udelay(1);
375 }
376
377 val &= ~(DMA_ENABLE | DMA_ST_WRITE | DMA_BCNT_ENAB);
378 val |= DMA_FIFO_INV;
379 dma_write32(val, DMA_CSR);
380 val &= ~DMA_FIFO_INV;
381 dma_write32(val, DMA_CSR);
382 }
383}
384
385static void sbus_esp_send_dma_cmd(struct esp *esp, u32 addr, u32 esp_count,
386 u32 dma_count, int write, u8 cmd)
387{
388 u32 csr;
389
390 BUG_ON(!(cmd & ESP_CMD_DMA));
391
392 sbus_esp_write8(esp, (esp_count >> 0) & 0xff, ESP_TCLOW);
393 sbus_esp_write8(esp, (esp_count >> 8) & 0xff, ESP_TCMED);
394 if (esp->rev == FASHME) {
395 sbus_esp_write8(esp, (esp_count >> 16) & 0xff, FAS_RLO);
396 sbus_esp_write8(esp, 0, FAS_RHI);
397
398 scsi_esp_cmd(esp, cmd);
399
400 csr = esp->prev_hme_dmacsr;
401 csr |= DMA_SCSI_DISAB | DMA_ENABLE;
402 if (write)
403 csr |= DMA_ST_WRITE;
404 else
405 csr &= ~DMA_ST_WRITE;
406 esp->prev_hme_dmacsr = csr;
407
408 dma_write32(dma_count, DMA_COUNT);
409 dma_write32(addr, DMA_ADDR);
410 dma_write32(csr, DMA_CSR);
411 } else {
412 csr = dma_read32(DMA_CSR);
413 csr |= DMA_ENABLE;
414 if (write)
415 csr |= DMA_ST_WRITE;
416 else
417 csr &= ~DMA_ST_WRITE;
418 dma_write32(csr, DMA_CSR);
419 if (esp->dmarev == dvmaesc1) {
420 u32 end = PAGE_ALIGN(addr + dma_count + 16U);
421 dma_write32(end - addr, DMA_COUNT);
422 }
423 dma_write32(addr, DMA_ADDR);
424
425 scsi_esp_cmd(esp, cmd);
426 }
427
428}
429
430static int sbus_esp_dma_error(struct esp *esp)
431{
432 u32 csr = dma_read32(DMA_CSR);
433
434 if (csr & DMA_HNDL_ERROR)
435 return 1;
436
437 return 0;
438}
439
440static const struct esp_driver_ops sbus_esp_ops = {
441 .esp_write8 = sbus_esp_write8,
442 .esp_read8 = sbus_esp_read8,
443 .irq_pending = sbus_esp_irq_pending,
444 .reset_dma = sbus_esp_reset_dma,
445 .dma_drain = sbus_esp_dma_drain,
446 .dma_invalidate = sbus_esp_dma_invalidate,
447 .send_dma_cmd = sbus_esp_send_dma_cmd,
448 .dma_error = sbus_esp_dma_error,
449};
450
451static int esp_sbus_probe_one(struct platform_device *op,
452 struct platform_device *espdma, int hme)
453{
454 struct scsi_host_template *tpnt = &scsi_esp_template;
455 struct Scsi_Host *host;
456 struct esp *esp;
457 int err;
458
459 host = scsi_host_alloc(tpnt, sizeof(struct esp));
460
461 err = -ENOMEM;
462 if (!host)
463 goto fail;
464
465 host->max_id = (hme ? 16 : 8);
466 esp = shost_priv(host);
467
468 esp->host = host;
469 esp->dev = &op->dev;
470 esp->ops = &sbus_esp_ops;
471
472 if (hme)
473 esp->flags |= ESP_FLAG_WIDE_CAPABLE;
474
475 err = esp_sbus_setup_dma(esp, espdma);
476 if (err < 0)
477 goto fail_unlink;
478
479 err = esp_sbus_map_regs(esp, hme);
480 if (err < 0)
481 goto fail_unlink;
482
483 err = esp_sbus_map_command_block(esp);
484 if (err < 0)
485 goto fail_unmap_regs;
486
487 err = esp_sbus_register_irq(esp);
488 if (err < 0)
489 goto fail_unmap_command_block;
490
491 esp_sbus_get_props(esp, espdma);
492
493 /* Before we try to touch the ESP chip, ESC1 dma can
494 * come up with the reset bit set, so make sure that
495 * is clear first.
496 */
497 if (esp->dmarev == dvmaesc1) {
498 u32 val = dma_read32(DMA_CSR);
499
500 dma_write32(val & ~DMA_RST_SCSI, DMA_CSR);
501 }
502
503 dev_set_drvdata(&op->dev, esp);
504
505 err = scsi_esp_register(esp);
506 if (err)
507 goto fail_free_irq;
508
509 return 0;
510
511fail_free_irq:
512 free_irq(host->irq, esp);
513fail_unmap_command_block:
514 dma_free_coherent(&op->dev, 16,
515 esp->command_block,
516 esp->command_block_dma);
517fail_unmap_regs:
518 of_iounmap(&op->resource[(hme ? 1 : 0)], esp->regs, SBUS_ESP_REG_SIZE);
519fail_unlink:
520 scsi_host_put(host);
521fail:
522 return err;
523}
524
525static int esp_sbus_probe(struct platform_device *op)
526{
527 struct device_node *dma_node = NULL;
528 struct device_node *dp = op->dev.of_node;
529 struct platform_device *dma_of = NULL;
530 int hme = 0;
531 int ret;
532
533 if (of_node_name_eq(dp->parent, "espdma") ||
534 of_node_name_eq(dp->parent, "dma"))
535 dma_node = dp->parent;
536 else if (of_node_name_eq(dp, "SUNW,fas")) {
537 dma_node = op->dev.of_node;
538 hme = 1;
539 }
540 if (dma_node)
541 dma_of = of_find_device_by_node(dma_node);
542 if (!dma_of)
543 return -ENODEV;
544
545 ret = esp_sbus_probe_one(op, dma_of, hme);
546 if (ret)
547 put_device(&dma_of->dev);
548
549 return ret;
550}
551
552static int esp_sbus_remove(struct platform_device *op)
553{
554 struct esp *esp = dev_get_drvdata(&op->dev);
555 struct platform_device *dma_of = esp->dma;
556 unsigned int irq = esp->host->irq;
557 bool is_hme;
558 u32 val;
559
560 scsi_esp_unregister(esp);
561
562 /* Disable interrupts. */
563 val = dma_read32(DMA_CSR);
564 dma_write32(val & ~DMA_INT_ENAB, DMA_CSR);
565
566 free_irq(irq, esp);
567
568 is_hme = (esp->dmarev == dvmahme);
569
570 dma_free_coherent(&op->dev, 16,
571 esp->command_block,
572 esp->command_block_dma);
573 of_iounmap(&op->resource[(is_hme ? 1 : 0)], esp->regs,
574 SBUS_ESP_REG_SIZE);
575 of_iounmap(&dma_of->resource[0], esp->dma_regs,
576 resource_size(&dma_of->resource[0]));
577
578 scsi_host_put(esp->host);
579
580 dev_set_drvdata(&op->dev, NULL);
581
582 put_device(&dma_of->dev);
583
584 return 0;
585}
586
587static const struct of_device_id esp_match[] = {
588 {
589 .name = "SUNW,esp",
590 },
591 {
592 .name = "SUNW,fas",
593 },
594 {
595 .name = "esp",
596 },
597 {},
598};
599MODULE_DEVICE_TABLE(of, esp_match);
600
601static struct platform_driver esp_sbus_driver = {
602 .driver = {
603 .name = "esp",
604 .of_match_table = esp_match,
605 },
606 .probe = esp_sbus_probe,
607 .remove = esp_sbus_remove,
608};
609module_platform_driver(esp_sbus_driver);
610
611MODULE_DESCRIPTION("Sun ESP SCSI driver");
612MODULE_AUTHOR("David S. Miller (davem@davemloft.net)");
613MODULE_LICENSE("GPL");
614MODULE_VERSION(DRV_VERSION);