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