sys/dev/disk/aic7xxx/ahc_isa.c

   1 /*
   2  * FreeBSD, VLB/ISA product support functions
   3  *
   4  * Copyright (c) 2004 Justin T. Gibbs.
   5  * All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions, and the following disclaimer,
  12  *    without modification.
  13  * 2. Redistributions in binary form must reproduce at minimum a disclaimer
  14  *    substantially similar to the "NO WARRANTY" disclaimer below
  15  *    ("Disclaimer") and any redistribution must be conditioned upon
  16  *    including a substantially similar Disclaimer requirement for further
  17  *    binary redistribution.
  18  * 3. Neither the names of the above-listed copyright holders nor the names
  19  *    of any contributors may be used to endorse or promote products derived
  20  *    from this software without specific prior written permission.
  21  *
  22  * NO WARRANTY
  23  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  24  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  25  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
  26  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
  27  * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  28  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  29  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
  31  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
  32  * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  33  * POSSIBILITY OF SUCH DAMAGES.
  34  *
  35  * $Id$
  36  *
  37  * $FreeBSD: src/sys/dev/aic7xxx/ahc_isa.c,v 1.5 2004/10/15 23:39:52 gibbs Exp $
  38  * $DragonFly: src/sys/dev/disk/aic7xxx/ahc_isa.c,v 1.4 2008/05/18 20:30:21 pavalos Exp $
  39  */
  40
  41 #include "aic7xxx_osm.h"
  42
  43 #include <machine/limits.h>     /* For CHAR_BIT */
  44 #include <bus/isa/isavar.h>     /* For ISA attach glue */
  45
  46
  47 static struct aic7770_identity *ahc_isa_find_device(bus_space_tag_t tag,
  48                                                     bus_space_handle_t bsh);
  49 static void                     ahc_isa_identify(driver_t *driver,
  50                                                  device_t parent);
  51 static int                      ahc_isa_probe(device_t dev);
  52 static int                      ahc_isa_attach(device_t dev);
  53
  54 /*
  55  * Perform an EISA probe of the address with the addition
  56  * of a "priming" step.  The 284X requires priming (a write
  57  * to offset 0x80, the first EISA ID register) to ensure it
  58  * is not mistaken as an EISA card.  Once we have the ID,
  59  * lookup the controller in the aic7770 table of supported
  60  * devices.
  61  */
  62 static struct aic7770_identity *
  63 ahc_isa_find_device(bus_space_tag_t tag, bus_space_handle_t bsh) {
  64         uint32_t  id;
  65         u_int     id_size;
  66         int       i;
  67
  68         id = 0;
  69         id_size = sizeof(id);
  70         for (i = 0; i < id_size; i++) {
  71                 bus_space_write_1(tag, bsh, 0x80, 0x80 + i);
  72                 id |= bus_space_read_1(tag, bsh, 0x80 + i)
  73                    << ((id_size - i - 1) * CHAR_BIT);
  74         }
  75
  76         return (aic7770_find_device(id));
  77 }
  78
  79 static void
  80 ahc_isa_identify(driver_t *driver, device_t parent)
  81 {
  82         int slot;
  83         int max_slot;
  84
  85         max_slot = 14;
  86         for (slot = 0; slot <= max_slot; slot++) {
  87                 struct aic7770_identity *entry;
  88                 bus_space_tag_t     tag;
  89                 bus_space_handle_t  bsh;
  90                 struct resource    *regs;
  91                 uint32_t            iobase;
  92                 int                 rid;
  93
  94                 rid = 0;
  95                 iobase = (slot * AHC_EISA_SLOT_SIZE) + AHC_EISA_SLOT_OFFSET;
  96                 regs = bus_alloc_resource(parent, SYS_RES_IOPORT, &rid,
  97                                           iobase, iobase, AHC_EISA_IOSIZE,
  98                                           RF_ACTIVE);
  99                 if (regs == NULL) {
 100                         if (bootverbose)
 101                                 kprintf("ahc_isa_probe %d: ioport 0x%x "
 102                                        "alloc failed\n", slot, iobase);
 103                         continue;
 104                 }
 105
 106                 tag = rman_get_bustag(regs);
 107                 bsh = rman_get_bushandle(regs);
 108
 109                 entry = ahc_isa_find_device(tag, bsh);
 110                 if (entry != NULL) {
 111                         device_t child;
 112
 113                         child = BUS_ADD_CHILD(parent, parent, ISA_ORDER_SPECULATIVE,
 114                                               "ahc", -1);
 115                         if (child != NULL) {
 116                                 device_set_driver(child, driver);
 117                                 bus_set_resource(child, SYS_RES_IOPORT,
 118                                                  0, iobase, AHC_EISA_IOSIZE);
 119                         }
 120                 }
 121                 bus_release_resource(parent, SYS_RES_IOPORT, rid, regs);
 122         }
 123 }
 124
 125 static int
 126 ahc_isa_probe(device_t dev)
 127 {
 128         struct    aic7770_identity *entry;
 129         bus_space_tag_t     tag;
 130         bus_space_handle_t  bsh;
 131         struct    resource *regs;
 132         struct    resource *irq;
 133         uint32_t  iobase;
 134         u_int     intdef;
 135         u_int     hcntrl;
 136         int       irq_num;
 137         int       error;
 138         int       zero;
 139
 140         error = ENXIO;
 141         zero = 0;
 142         regs = NULL;
 143         irq = NULL;
 144
 145         /* Skip probes for ISA PnP devices */
 146         if (isa_get_logicalid(dev) != 0)
 147                 return (error);
 148
 149         regs = bus_alloc_resource_any(dev, SYS_RES_IOPORT, &zero, RF_ACTIVE);
 150         if (regs == NULL) {
 151                 device_printf(dev, "No resources allocated.\n");
 152                 return (ENOMEM);
 153         }
 154
 155         iobase = rman_get_start(regs);
 156         tag = rman_get_bustag(regs);
 157         bsh = rman_get_bushandle(regs);
 158
 159         entry = ahc_isa_find_device(tag, bsh);
 160         if (entry == NULL)
 161                 goto cleanup;
 162
 163         /* Pause the card preseving the IRQ type */
 164         hcntrl = bus_space_read_1(tag, bsh, HCNTRL) & IRQMS;
 165         bus_space_write_1(tag, bsh, HCNTRL, hcntrl | PAUSE);
 166         while ((bus_space_read_1(tag, bsh, HCNTRL) & PAUSE) == 0)
 167                 ;
 168
 169         /* Make sure we have a valid interrupt vector */
 170         intdef = bus_space_read_1(tag, bsh, INTDEF);
 171         irq_num = intdef & VECTOR;
 172         switch (irq_num) {
 173         case 9:
 174         case 10:
 175         case 11:
 176         case 12:
 177         case 14:
 178         case 15:
 179                 break;
 180         default:
 181                 device_printf(dev, "@0x%x: illegal irq setting %d\n",
 182                               iobase, irq_num);
 183                 goto cleanup;
 184         }
 185
 186         if (bus_set_resource(dev, SYS_RES_IRQ, zero, irq_num, 1) != 0)
 187                 goto cleanup;
 188
 189         /*
 190          * The 284X only supports edge triggered interrupts,
 191          * so do not claim RF_SHAREABLE.
 192          */
 193         irq = bus_alloc_resource_any(dev, SYS_RES_IRQ, &zero,
 194                                      0 /*!(RF_ACTIVE|RF_SHAREABLE)*/);
 195         if (irq != NULL) {
 196                 error = 0;
 197                 device_set_desc(dev, entry->name);
 198         } else
 199                 device_printf(dev, "@0x%x: irq %d allocation failed\n",
 200                               iobase, irq_num);
 201
 202 cleanup:
 203         if (regs != NULL) {
 204                 bus_release_resource(dev, SYS_RES_IOPORT, zero, regs);
 205                 regs = NULL;
 206         }
 207
 208         if (irq != NULL) {
 209                 bus_release_resource(dev, SYS_RES_IRQ, zero, irq);
 210                 irq = NULL;
 211         }
 212
 213         return (error);
 214 }
 215
 216 static int
 217 ahc_isa_attach(device_t dev)
 218 {
 219         struct   aic7770_identity *entry;
 220         bus_space_tag_t     tag;
 221         bus_space_handle_t  bsh;
 222         struct    resource *regs;
 223         struct    ahc_softc *ahc;
 224         char     *name;
 225         int       zero;
 226         int       error;
 227
 228         zero = 0;
 229         regs = bus_alloc_resource_any(dev, SYS_RES_IOPORT, &zero, RF_ACTIVE);
 230         if (regs == NULL)
 231                 return (ENOMEM);
 232
 233         tag = rman_get_bustag(regs);
 234         bsh = rman_get_bushandle(regs);
 235         entry = ahc_isa_find_device(tag, bsh);
 236         bus_release_resource(dev, SYS_RES_IOPORT, zero, regs);
 237         if (entry == NULL)
 238                 return (ENODEV);
 239
 240         /*
 241          * Allocate a softc for this card and
 242          * set it up for attachment by our
 243          * common detect routine.
 244          */
 245         name = kmalloc(strlen(device_get_nameunit(dev)) + 1, M_DEVBUF, M_INTWAIT);
 246         strcpy(name, device_get_nameunit(dev));
 247         ahc = ahc_alloc(dev, name);
 248         if (ahc == NULL)
 249                 return (ENOMEM);
 250
 251         ahc_set_unit(ahc, device_get_unit(dev));
 252
 253         /* Allocate a dmatag for our SCB DMA maps */
 254         /* XXX Should be a child of the VLB/ISA bus dma tag */
 255         error = aic_dma_tag_create(ahc, /*parent*/NULL, /*alignment*/1,
 256                                    /*boundary*/0,
 257                                    /*lowaddr*/BUS_SPACE_MAXADDR_32BIT,
 258                                    /*highaddr*/BUS_SPACE_MAXADDR,
 259                                    /*filter*/NULL, /*filterarg*/NULL,
 260                                    /*maxsize*/BUS_SPACE_MAXSIZE_32BIT,
 261                                    /*nsegments*/AHC_NSEG,
 262                                    /*maxsegsz*/AHC_MAXTRANSFER_SIZE,
 263                                    /*flags*/0,
 264                                    &ahc->parent_dmat);
 265
 266         if (error != 0) {
 267                 kprintf("ahc_isa_attach: Could not allocate DMA tag "
 268                        "- error %d\n", error);
 269                 ahc_free(ahc);
 270                 return (ENOMEM);
 271         }
 272         ahc->dev_softc = dev;
 273         error = aic7770_config(ahc, entry, /*unused ioport arg*/0);
 274         if (error != 0) {
 275                 ahc_free(ahc);
 276                 return (error);
 277         }
 278
 279         ahc_attach(ahc);
 280         return (0);
 281 }
 282
 283 static device_method_t ahc_isa_device_methods[] = {
 284         /* Device interface */
 285         DEVMETHOD(device_identify,      ahc_isa_identify),
 286         DEVMETHOD(device_probe,         ahc_isa_probe),
 287         DEVMETHOD(device_attach,        ahc_isa_attach),
 288         DEVMETHOD(device_detach,        ahc_detach),
 289         { 0, 0 }
 290 };
 291
 292 static driver_t ahc_isa_driver = {
 293         "ahc",
 294         ahc_isa_device_methods,
 295         sizeof(struct ahc_softc)
 296 };
 297
 298 DRIVER_MODULE(ahc_isa, isa, ahc_isa_driver, ahc_devclass, 0, 0);
 299 MODULE_DEPEND(ahc_isa, ahc, 1, 1, 1);
 300 MODULE_VERSION(ahc_isa, 1);