Initial import from FreeBSD RELENG_4:
[dragonfly.git] / sys / dev / disk / aic / aic_cbus.c
1 /*-
2  * Copyright (c) 1999 Luoqi Chen.
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24  * SUCH DAMAGE.
25  *
26  * $FreeBSD: src/sys/dev/aic/aic_cbus.c,v 1.1.2.2 2000/06/21 09:37:09 nyan Exp $
27  */
28
29 #include <sys/param.h>
30 #include <sys/systm.h>
31 #include <sys/kernel.h>
32 #include <sys/module.h>
33 #include <sys/bus.h>
34
35 #include <machine/bus_pio.h>
36 #include <machine/bus.h>
37 #include <machine/resource.h>
38 #include <sys/rman.h>
39  
40 #include <isa/isavar.h>
41 #include <dev/aic/aic6360reg.h>
42 #include <dev/aic/aicvar.h>
43   
44 struct aic_isa_softc {
45         struct  aic_softc sc_aic;
46         struct  resource *sc_port;
47         struct  resource *sc_irq;
48         struct  resource *sc_drq;
49         void    *sc_ih;
50 };
51
52 static int aic_isa_alloc_resources __P((device_t));
53 static void aic_isa_release_resources __P((device_t));
54 static int aic_isa_probe __P((device_t));
55 static int aic_isa_attach __P((device_t));
56
57 #ifdef PC98
58 static u_int aic_isa_ports[] = { 0x1840 };
59 #else
60 static u_int aic_isa_ports[] = { 0x340, 0x140 };
61 #endif
62 #define AIC_ISA_NUMPORTS (sizeof(aic_isa_ports) / sizeof(aic_isa_ports[0]))
63 #define AIC_ISA_PORTSIZE 0x20
64
65 #ifdef PC98
66 #define AIC98_GENERIC           0x00
67 #define AIC98_NEC100            0x01
68 #define AIC_TYPE98(x)           (((x) >> 16) & 0x01)
69
70 static bus_addr_t aicport_generic[AIC_ISA_PORTSIZE] = {
71         0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
72         0x08, 0x09, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f,
73         0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17,
74         0x18, 0x19, 0x1a, 0x1b, 0x1c, 0x1d, 0x1e, 0x1f,
75 };
76 static bus_addr_t aicport_100[AIC_ISA_PORTSIZE] = {
77         0x00, 0x02, 0x04, 0x06, 0x08, 0x0a, 0x0c, 0x0e,
78         0x10, 0x12, 0x14, 0x16, 0x18, 0x1a, 0x1c, 0x1e,
79         0x20, 0x22, 0x24, 0x26, 0x28, 0x2a, 0x2c, 0x2e,
80         0x30, 0x32, 0x34, 0x36, 0x38, 0x3a, 0x3c, 0x3e,
81 };
82
83 static struct isa_pnp_id aic_ids[] = {
84         { 0xa180a3b8,   "NEC PC9801-100"},
85         {0}
86 };
87 #endif
88
89 static int
90 aic_isa_alloc_resources(device_t dev)
91 {
92         struct aic_isa_softc *sc = device_get_softc(dev);
93         int rid;
94 #ifdef PC98
95         bus_addr_t *bs_iat;
96
97         if ((isa_get_logicalid(dev) == 0xa180a3b8) ||
98             (AIC_TYPE98(device_get_flags(dev)) == AIC98_NEC100))
99                 bs_iat = aicport_100;
100         else
101                 bs_iat = aicport_generic;
102 #endif
103
104         sc->sc_port = sc->sc_irq = sc->sc_drq = 0;
105
106         rid = 0;
107 #ifdef PC98
108         sc->sc_port = isa_alloc_resourcev(dev, SYS_RES_IOPORT, &rid,
109                                           bs_iat, AIC_ISA_PORTSIZE, RF_ACTIVE);
110 #else
111         sc->sc_port = bus_alloc_resource(dev, SYS_RES_IOPORT, &rid,
112                                         0ul, ~0ul, AIC_ISA_PORTSIZE, RF_ACTIVE);
113 #endif
114         if (!sc->sc_port)
115                 return (ENOMEM);
116 #ifdef PC98
117         isa_load_resourcev(sc->sc_port, bs_iat, AIC_ISA_PORTSIZE);
118 #endif
119
120         if (isa_get_irq(dev) != -1) {
121                 rid = 0;
122                 sc->sc_irq = bus_alloc_resource(dev, SYS_RES_IRQ, &rid,
123                                                 0ul, ~0ul, 1, RF_ACTIVE);
124                 if (!sc->sc_irq) {
125                         aic_isa_release_resources(dev);
126                         return (ENOMEM);
127                 }
128         }
129
130         if (isa_get_drq(dev) != -1) {
131                 rid = 0;
132                 sc->sc_drq = bus_alloc_resource(dev, SYS_RES_DRQ, &rid,
133                                                 0ul, ~0ul, 1, RF_ACTIVE);
134                 if (!sc->sc_drq) {
135                         aic_isa_release_resources(dev);
136                         return (ENOMEM);
137                 }
138         }
139
140         sc->sc_aic.unit = device_get_unit(dev);
141         sc->sc_aic.tag = rman_get_bustag(sc->sc_port);
142         sc->sc_aic.bsh = rman_get_bushandle(sc->sc_port);
143         return (0);
144 }
145
146 static void
147 aic_isa_release_resources(device_t dev)
148 {
149         struct aic_isa_softc *sc = device_get_softc(dev);
150
151         if (sc->sc_port)
152                 bus_release_resource(dev, SYS_RES_IOPORT, 0, sc->sc_port);
153         if (sc->sc_irq)
154                 bus_release_resource(dev, SYS_RES_IRQ, 0, sc->sc_irq);
155         if (sc->sc_drq)
156                 bus_release_resource(dev, SYS_RES_DRQ, 0, sc->sc_drq);
157         sc->sc_port = sc->sc_irq = sc->sc_drq = 0;
158 }
159
160 static int
161 aic_isa_probe(device_t dev)
162 {
163         struct aic_isa_softc *sc = device_get_softc(dev);
164         struct aic_softc *aic = &sc->sc_aic;
165         int numports, i;
166         u_int port, *ports;
167         u_int8_t porta;
168
169 #ifdef PC98
170         if (ISA_PNP_PROBE(device_get_parent(dev), dev, aic_ids) == ENXIO)
171 #else
172         if (isa_get_vendorid(dev))
173 #endif
174                 return (ENXIO);
175
176         port = isa_get_port(dev);
177         if (port != -1) {
178                 ports = &port;
179                 numports = 1;
180         } else {
181                 ports = aic_isa_ports;
182                 numports = AIC_ISA_NUMPORTS;
183         }
184
185         for (i = 0; i < numports; i++) {
186 #ifdef PC98
187                 if (bus_set_resource(dev, SYS_RES_IOPORT, 0, ports[i], 1))
188                         continue;
189 #else
190                 if (bus_set_resource(dev, SYS_RES_IOPORT, 0, ports[i],
191                                      AIC_ISA_PORTSIZE))
192                         continue;
193 #endif
194                 if (aic_isa_alloc_resources(dev))
195                         continue;
196                 if (!aic_probe(aic)) {
197                         aic_isa_release_resources(dev);
198                         break;
199                 }
200                 aic_isa_release_resources(dev);
201         }
202
203         if (i == numports)
204                 return (ENXIO);
205
206         porta = aic_inb(aic, PORTA);
207         if (isa_get_irq(dev) == -1)
208                 bus_set_resource(dev, SYS_RES_IRQ, 0, PORTA_IRQ(porta), 1);
209         if ((aic->flags & AIC_DMA_ENABLE) && isa_get_drq(dev) == -1)
210                 bus_set_resource(dev, SYS_RES_DRQ, 0, PORTA_DRQ(porta), 1);
211         device_set_desc(dev, "Adaptec 6260/6360 SCSI controller");
212         return (0);
213 }
214
215 static int
216 aic_isa_attach(device_t dev)
217 {
218         struct aic_isa_softc *sc = device_get_softc(dev);
219         struct aic_softc *aic = &sc->sc_aic;
220         int error;
221
222         error = aic_isa_alloc_resources(dev);
223         if (error) {
224                 device_printf(dev, "resource allocation failed\n");
225                 return (error);
226         }
227
228         error = aic_attach(aic);
229         if (error) {
230                 device_printf(dev, "attach failed\n");
231                 aic_isa_release_resources(dev);
232                 return (error);
233         }
234
235         error = bus_setup_intr(dev, sc->sc_irq, INTR_TYPE_CAM, aic_intr,
236                                 aic, &sc->sc_ih);
237         if (error) {
238                 device_printf(dev, "failed to register interrupt handler\n");
239                 aic_isa_release_resources(dev);
240                 return (error);
241         }
242         return (0);
243 }
244
245 static int
246 aic_isa_detach(device_t dev)
247 {
248         struct aic_isa_softc *sc = device_get_softc(dev);
249         struct aic_softc *aic = &sc->sc_aic;
250         int error;
251
252         error = aic_detach(aic);
253         if (error) {
254                 device_printf(dev, "detach failed\n");
255                 return (error);
256         }
257
258         error = bus_teardown_intr(dev, sc->sc_irq, sc->sc_ih);
259         if (error) {
260                 device_printf(dev, "failed to unregister interrupt handler\n");
261         }
262
263         aic_isa_release_resources(dev);
264         return (0);
265 }
266
267 static device_method_t aic_isa_methods[] = {
268         /* Device interface */
269         DEVMETHOD(device_probe,         aic_isa_probe),
270         DEVMETHOD(device_attach,        aic_isa_attach),
271         DEVMETHOD(device_detach,        aic_isa_detach),
272         { 0, 0 }
273 };
274
275 static driver_t aic_isa_driver = {
276         "aic",
277         aic_isa_methods, sizeof(struct aic_isa_softc),
278 };
279
280 extern devclass_t aic_devclass;
281
282 DRIVER_MODULE(aic, isa, aic_isa_driver, aic_devclass, 0, 0);