LINT build test. Aggregated source code adjustments to bring most of the
[dragonfly.git] / sys / bus / isa / i386 / isa_compat.c
1 /*-
2  * Copyright (c) 1998 Doug Rabson
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/i386/isa/isa_compat.c,v 1.18.2.1 2001/05/17 23:05:06 imp Exp $
27  * $DragonFly: src/sys/bus/isa/i386/isa_compat.c,v 1.2 2003/06/17 04:28:37 dillon Exp $
28  */
29
30 #include <sys/param.h>
31 #include <sys/systm.h>
32 #include <sys/kernel.h>
33 #include <sys/bus.h>
34 #include <sys/malloc.h>
35 #include <sys/module.h>
36 #include <machine/bus.h>
37 #include <sys/rman.h>
38
39 #include <machine/vmparam.h>
40 #include <vm/vm.h>
41 #include <vm/pmap.h>
42 #include <machine/pmap.h>
43 #include <machine/md_var.h>
44
45 #include <machine/resource.h>
46 #include <isa/isavar.h>
47 #include <i386/isa/isa_compat.h>
48 #include <i386/isa/isa_device.h>
49
50 struct isa_compat_resources {
51     struct resource *ports;
52     struct resource *memory;
53     struct resource *drq;
54     struct resource *irq;
55 };
56
57 int
58 isa_compat_nextid(void)
59 {
60         static int id = 2;      /* id_id of -1, 0 and 1 are "used" */
61
62         return id++;
63 }
64
65 static void
66 isa_compat_alloc_resources(device_t dev, struct isa_compat_resources *res)
67 {
68         int rid;
69         u_long start, count;
70
71         if (bus_get_resource(dev, SYS_RES_IOPORT, 0,
72                              &start, &count) == 0) {
73                 rid = 0;
74                 res->ports = bus_alloc_resource(dev, SYS_RES_IOPORT,
75                                                 &rid, 0ul, ~0ul, 1,
76                                                 RF_ACTIVE);
77                 if (res->ports == NULL && bootverbose)
78                         printf("isa_compat: didn't get ports for %s\n",
79                                device_get_name(dev));
80         } else
81                 res->ports = 0;
82
83         if (bus_get_resource(dev, SYS_RES_MEMORY, 0,
84                              &start, &count) == 0
85             && start != 0) {
86                 rid = 0;
87                 res->memory = bus_alloc_resource(dev, SYS_RES_MEMORY,
88                                                  &rid, 0ul, ~0ul, 1,
89                                                  RF_ACTIVE);
90                 if (res->memory == NULL && bootverbose)
91                         printf("isa_compat: didn't get memory for %s\n",
92                                device_get_name(dev));
93         } else
94                 res->memory = 0;
95
96         if (bus_get_resource(dev, SYS_RES_DRQ, 0,
97                              &start, &count) == 0) {
98                 rid = 0;
99                 res->drq = bus_alloc_resource(dev, SYS_RES_DRQ,
100                                               &rid, 0ul, ~0ul, 1,
101                                               RF_ACTIVE);
102                 if (res->drq == NULL && bootverbose)
103                         printf("isa_compat: didn't get drq for %s\n",
104                                device_get_name(dev));
105         } else
106                 res->drq = 0;
107
108         if (bus_get_resource(dev, SYS_RES_IRQ, 0,
109                              &start, &count) == 0) {
110                 rid = 0;
111                 res->irq = bus_alloc_resource(dev, SYS_RES_IRQ,
112                                               &rid, 0ul, ~0ul, 1,
113                                               RF_SHAREABLE | RF_ACTIVE);
114                 if (res->irq == NULL && bootverbose)
115                         printf("isa_compat: didn't get irq for %s\n",
116                                device_get_name(dev));
117         } else
118                 res->irq = 0;
119 }
120
121 static void
122 isa_compat_release_resources(device_t dev, struct isa_compat_resources *res)
123 {
124         if (res->ports) {
125                 bus_release_resource(dev, SYS_RES_IOPORT, 0, res->ports);
126                 res->ports = 0;
127         }
128         if (res->memory) {
129                 bus_release_resource(dev, SYS_RES_MEMORY, 0, res->memory);
130                 res->memory = 0;
131         }
132         if (res->drq) {
133                 bus_release_resource(dev, SYS_RES_DRQ, 0, res->drq);
134                 res->drq = 0;
135         }
136         if (res->irq) {
137                 bus_release_resource(dev, SYS_RES_IRQ, 0, res->irq);
138                 res->irq = 0;
139         }
140 }
141
142 #define irqmask(x)      ((x) < 0 ? 0 : (1 << (x)))
143
144 static int
145 isa_compat_probe(device_t dev)
146 {
147         struct isa_device *dvp = device_get_softc(dev);
148         struct isa_compat_resources res;
149         struct old_isa_driver *op;
150         u_long start, count;
151
152         /* No pnp support */
153         if (isa_get_vendorid(dev))
154                 return (ENXIO);
155
156         bzero(&res, sizeof(res));
157         /*
158          * Fill in the isa_device fields.
159          */
160         op = device_get_driver(dev)->priv;
161         dvp->id_id = isa_compat_nextid();
162         dvp->id_driver = op->driver;
163         if (bus_get_resource(dev, SYS_RES_IOPORT, 0,
164                              &start, &count) == 0)
165                 dvp->id_iobase = start;
166         else
167                 dvp->id_iobase = -1;
168         if (bus_get_resource(dev, SYS_RES_IRQ, 0,
169                              &start, &count) == 0)
170                 dvp->id_irq = irqmask(start);
171         else
172                 dvp->id_irq = 0;
173         if (bus_get_resource(dev, SYS_RES_DRQ, 0,
174                              &start, &count) == 0)
175                 dvp->id_drq = start;
176         else
177                 dvp->id_drq = -1;
178         if (bus_get_resource(dev, SYS_RES_MEMORY,
179                              0, &start, &count) == 0) {
180                 dvp->id_maddr = (void *)(uintptr_t)start;
181                 dvp->id_msize = count;
182         } else {
183                 dvp->id_maddr = NULL;
184                 dvp->id_msize = 0;
185         }
186         dvp->id_unit = device_get_unit(dev);
187         dvp->id_flags = device_get_flags(dev);
188         dvp->id_enabled = device_is_enabled(dev);       /* XXX unused */
189         dvp->id_device = dev;
190
191         /*
192          * Do the wrapped probe.
193          */
194         if (dvp->id_driver->probe) {
195                 int portsize;
196                 void *maddr;
197                 struct isa_device old;
198
199                 isa_compat_alloc_resources(dev, &res);
200                 if (res.memory)
201                         maddr = rman_get_virtual(res.memory);
202                 else
203                         maddr = 0;
204                 dvp->id_maddr = maddr;
205                 old = *dvp;
206                 portsize = dvp->id_driver->probe(dvp);
207                 isa_compat_release_resources(dev, &res);
208                 if (portsize != 0) {
209                         if (portsize > 0 || dvp->id_iobase != old.id_iobase)
210                                 bus_set_resource(dev, SYS_RES_IOPORT,
211                                                  0, dvp->id_iobase, portsize);
212                         if (dvp->id_irq != old.id_irq)
213                                 bus_set_resource(dev, SYS_RES_IRQ, 0,
214                                                  ffs(dvp->id_irq) - 1, 1);
215                         if (dvp->id_drq != old.id_drq)
216                                 bus_set_resource(dev, SYS_RES_DRQ, 0,
217                                                  dvp->id_drq, 1);
218                         if (dvp->id_maddr != old.id_maddr
219                             || dvp->id_msize != old.id_msize) {
220                                 maddr = dvp->id_maddr;
221                                 if (maddr != NULL)
222                                         bus_set_resource(dev,
223                                                          SYS_RES_MEMORY,
224                                                          0,
225                                                          kvtop(maddr),
226                                                          dvp->id_msize);
227                                 else
228                                         bus_delete_resource(dev,
229                                                             SYS_RES_MEMORY,
230                                                             0);
231                         }
232                         return 0;
233                 }
234         }
235         return ENXIO;
236 }
237
238 static int
239 isa_compat_attach(device_t dev)
240 {
241         struct isa_device *dvp = device_get_softc(dev);
242         struct isa_compat_resources res;
243         int error;
244
245         bzero(&res, sizeof(res));
246         isa_compat_alloc_resources(dev, &res);
247         if (dvp->id_driver->attach)
248                 dvp->id_driver->attach(dvp);
249         if (res.irq && dvp->id_irq && dvp->id_intr) {
250                 struct old_isa_driver *op;
251                 void *ih;
252
253                 op = device_get_driver(dev)->priv;
254                 error = BUS_SETUP_INTR(device_get_parent(dev), dev,
255                                        res.irq, op->type,
256                                        dvp->id_intr,
257                                        (void *)(uintptr_t)dvp->id_unit,
258                                        &ih);
259                 if (error)
260                         printf("isa_compat_attach: failed to setup intr: %d\n",
261                                error);
262         }
263         device_printf(dev, "driver is using old-style compatability shims\n");
264         return 0;
265 }
266
267 static device_method_t isa_compat_methods[] = {
268         /* Device interface */
269         DEVMETHOD(device_probe,         isa_compat_probe),
270         DEVMETHOD(device_attach,        isa_compat_attach),
271
272         { 0, 0 }
273 };
274
275 /*
276  * Create a new style driver around each old isa driver.
277  */
278 void
279 isa_wrap_old_drivers(void)
280 {
281         int i;
282         struct old_isa_driver *op;
283         devclass_t isa_devclass = devclass_find("isa");
284
285         for (i = 0, op = &old_drivers[0]; i < old_drivers_count; i++, op++) {
286                 driver_t *driver;
287                 driver = malloc(sizeof(driver_t), M_DEVBUF, M_NOWAIT);
288                 if (!driver)
289                         continue;
290                 bzero(driver, sizeof(driver_t));
291                 driver->name = op->driver->name;
292                 driver->methods = isa_compat_methods;
293                 driver->softc = sizeof(struct isa_device);
294                 driver->priv = op;
295                 if (op->driver->sensitive_hw)
296                         resource_set_int(op->driver->name, -1, "sensitive", 1);
297                 devclass_add_driver(isa_devclass, driver);
298         }
299 }
300
301 int
302 haveseen_iobase(struct isa_device *dvp, int size)
303 {
304         int rid;
305         struct resource *res;
306         device_t dev = dvp->id_device;
307         int base = dvp->id_iobase;
308
309         /*
310          * Ask for resource 1 so that we don't hurt our hints.  In theory
311          * this should work, but....
312          */
313         rid = 1;
314         res = bus_alloc_resource(dev, SYS_RES_IOPORT,
315                                  &rid, base, base + size, size, RF_ACTIVE);
316         if (res)
317                 bus_release_resource(dev, SYS_RES_IOPORT, rid, res);
318         return res ? 0 : 1;
319 }