import of upstream 2.4.34.4 from kernel.org
[linux-2.4.git] / drivers / scsi / zalon7xx.c
1 /*
2  * Zalon 53c7xx device driver.
3  * By Richard Hirst (rhirst@linuxcare.com)
4  */
5
6 #include <linux/init.h>
7 #include <linux/types.h>
8 #include <linux/stat.h>
9 #include <linux/mm.h>
10 #include <linux/blk.h>
11 #include <linux/sched.h>
12 #include <linux/version.h>
13 #include <linux/config.h>
14 #include <linux/module.h>
15
16 #include <asm/page.h>
17 #include <asm/pgtable.h>
18 #include <asm/irq.h>
19 #include <asm/hardware.h>
20 #include <asm/delay.h>
21 #include <asm/gsc.h>
22
23 #include "scsi.h"
24 #include "hosts.h"
25
26 /*
27  * **      Define the BSD style u_int32 and u_int64 type.
28  * **      Are in fact u_int32_t and u_int64_t :-)
29  * */
30 typedef u32 u_int32;
31 typedef u64 u_int64;
32 typedef u_long          vm_offset_t;
33
34 #include "zalon7xx.h"
35
36
37 /* hosts_* are kluges to pass info between the zalon7xx_detected()
38 ** and the register_parisc_driver() callbacks.
39 */
40 static Scsi_Host_Template *hosts_tptr;
41 static int hosts_used=0;
42 static int zalon_id = 0;
43
44 extern int zalon_attach(Scsi_Host_Template *tpnt,
45                         unsigned long base_addr,
46                         struct parisc_device *dev,
47                         int irq_vector,
48                         int unit
49                         );
50
51
52 #if 0
53 /* FIXME:
54  * Is this function dead code? or is someone planning on using it in the
55  * future.  The clock = (int) pdc_result[16] does not look correct to
56  * me ... I think it should be iodc_data[16].  Since this cause a compile
57  * error with the new encapsulated PDC, I'm not compiling in this function.
58  * - RB
59  */
60 /* poke SCSI clock out of iodc data */
61
62 static u8 iodc_data[32] __attribute__ ((aligned (64)));
63 static unsigned long pdc_result[32] __attribute__ ((aligned (16))) ={0,0,0,0};
64
65 static int 
66 lasi_scsi_clock(void * hpa, int defaultclock)
67 {
68         int clock, status;
69
70         status = pdc_iodc_read(&pdc_result, hpa, 0, &iodc_data, 32 );
71         if (status == PDC_RET_OK) {
72                 clock = (int) pdc_result[16];
73         } else {
74                 printk(KERN_WARNING "%s: pdc_iodc_read returned %d\n", __FUNCTION__, status);
75                 clock = defaultclock; 
76         }
77
78         printk(KERN_DEBUG "%s: SCSI clock %d\n", __FUNCTION__, clock);
79         return clock;
80 }
81 #endif
82
83 static int __init
84 zalon_scsi_callback(struct parisc_device *dev)
85 {
86         struct gsc_irq gsc_irq;
87         u32 zalon_vers;
88         int irq;
89         unsigned long zalon = dev->hpa;
90
91         __raw_writel(CMD_RESET, zalon + IO_MODULE_IO_COMMAND);
92         while (!(__raw_readl(zalon + IO_MODULE_IO_STATUS) & IOSTATUS_RY))
93                 ;
94         __raw_writel(IOIIDATA_MINT5EN | IOIIDATA_PACKEN | IOIIDATA_PREFETCHEN,
95                 zalon + IO_MODULE_II_CDATA);
96
97         /* XXX: Save the Zalon version for bug workarounds? */
98         zalon_vers = __raw_readl(dev->hpa + IO_MODULE_II_CDATA) & 0x07000000;
99         zalon_vers >>= 24;
100
101         /* Setup the interrupts first.
102         ** Later on request_irq() will register the handler.
103         */
104         irq = gsc_alloc_irq(&gsc_irq);
105
106         printk("%s: Zalon vers field is 0x%x, IRQ %d\n", __FUNCTION__,
107                 zalon_vers, irq);
108
109         __raw_writel(gsc_irq.txn_addr | gsc_irq.txn_data, dev->hpa + IO_MODULE_EIM);
110
111         if ( zalon_vers == 0)
112                 printk(KERN_WARNING "%s: Zalon 1.1 or earlier\n", __FUNCTION__);
113
114         /*
115         **  zalon_attach: returns -1 on failure, 0 on success
116         */
117         hosts_used = zalon_attach(hosts_tptr, dev->hpa + GSC_SCSI_ZALON_OFFSET,
118                         dev, irq, zalon_id);
119
120         if (hosts_used == 0)
121                 zalon_id++;
122
123         hosts_used = (hosts_used == 0);
124         return (hosts_used == 0);
125 }
126
127 static struct parisc_device_id zalon_tbl[] = {
128         { HPHW_A_DMA, HVERSION_REV_ANY_ID, HVERSION_ANY_ID, 0x00089 }, 
129         { 0, }
130 };
131
132 MODULE_DEVICE_TABLE(parisc, zalon_tbl);
133
134 static struct parisc_driver zalon_driver = {
135         name:           "GSC SCSI (Zalon)",
136         id_table:       zalon_tbl,
137         probe:          zalon_scsi_callback,
138 };
139
140 int zalon7xx_detect(Scsi_Host_Template *tpnt)
141 {
142         /* "pass" the parameter to the callback functions */
143         hosts_tptr = tpnt;
144         hosts_used = 0;
145
146         /* claim all zalon cards. */
147         register_parisc_driver(&zalon_driver);
148
149         /* Check if any callbacks actually found/claimed anything. */
150         return (hosts_used != 0);
151 }
152
153 #ifdef MODULE
154 extern int ncr53c8xx_release(struct Scsi_Host *host);
155
156 int zalon7xx_release(struct Scsi_Host *host)
157 {
158         ncr53c8xx_release(host);
159         unregister_parisc_driver(&zalon_driver);
160         return 1;
161 }
162 #endif