sys/dev/netif/ex/if_ex_isa.c

   1 /*-
   2  * Copyright (c) 2000 Matthew N. Dodd
   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/ex/if_ex_isa.c,v 1.3.2.1 2001/03/05 05:33:20 imp Exp $
  27  *      $DragonFly: src/sys/dev/netif/ex/if_ex_isa.c,v 1.10 2005/10/30 04:41:15 dillon Exp $
  28  */
  29
  30 #include <sys/param.h>
  31 #include <sys/systm.h>
  32 #include <sys/kernel.h>
  33 #include <sys/socket.h>
  34
  35 #include <sys/module.h>
  36 #include <sys/bus.h>
  37
  38 #include <machine/bus.h>
  39 #include <machine/resource.h>
  40 #include <machine/clock.h>
  41 #include <sys/rman.h>
  42
  43 #include <net/if.h>
  44 #include <net/if_arp.h>
  45 #include <net/if_media.h>
  46
  47
  48 #include <bus/isa/isavar.h>
  49 #include <bus/isa/pnpvar.h>
  50
  51 #include "if_exreg.h"
  52 #include "if_exvar.h"
  53
  54 /* Bus Front End Functions */
  55 static int      ex_isa_identify (driver_t *, device_t);
  56 static int      ex_isa_probe    (device_t);
  57 static int      ex_isa_attach   (device_t);
  58
  59 #if 0
  60 static  void    ex_pnp_wakeup   (void *);
  61
  62 SYSINIT(ex_pnpwakeup, SI_SUB_CPU, SI_ORDER_ANY, ex_pnp_wakeup, NULL);
  63 #endif
  64
  65 /*
  66  * We need an identify function to 'probe' the ISA bus.
  67  */
  68 static device_method_t ex_methods[] = {
  69         /* Device interface */
  70         DEVMETHOD(device_identify,      ex_isa_identify),
  71         DEVMETHOD(device_probe,         ex_isa_probe),
  72         DEVMETHOD(device_attach,        ex_isa_attach),
  73
  74         { 0, 0 }
  75 };
  76
  77 static driver_t ex_driver = {
  78         "ex",
  79         ex_methods,
  80         sizeof(struct ex_softc),
  81 };
  82
  83 devclass_t ex_devclass;
  84
  85 DRIVER_MODULE(if_ex, isa, ex_driver, ex_devclass, 0, 0);
  86
  87 static struct isa_pnp_id ex_ids[] = {
  88         { 0x3110d425,   NULL }, /* INT1031 */
  89         { 0x3010d425,   NULL }, /* INT1030 */
  90         { 0,            NULL },
  91 };
  92
  93 #if 0
  94 #define EX_PNP_WAKE             0x279
  95
  96 static u_int8_t ex_pnp_wake_seq[] =
  97                         { 0x6A, 0xB5, 0xDA, 0xED, 0xF6, 0xFB, 0x7D, 0xBE,
  98                           0xDF, 0x6F, 0x37, 0x1B, 0x0D, 0x86, 0xC3, 0x61,
  99                           0xB0, 0x58, 0x2C, 0x16, 0x8B, 0x45, 0xA2, 0xD1,
 100                           0xE8, 0x74, 0x3A, 0x9D, 0xCE, 0xE7, 0x73, 0x43 };
 101
 102 static void
 103 ex_pnp_wakeup (void * dummy)
 104 {
 105         int     tmp;
 106
 107         if (bootverbose)
 108                 printf("ex_pnp_wakeup()\n");
 109
 110         outb(EX_PNP_WAKE, 0);
 111         outb(EX_PNP_WAKE, 0);
 112         for (tmp = 0; tmp < 32; tmp++) {
 113                 outb(EX_PNP_WAKE, ex_pnp_wake_seq[tmp]);
 114         }
 115 }
 116 #endif
 117
 118 /*
 119  * Non-destructive identify.
 120  */
 121 static int
 122 ex_isa_identify (driver_t *driver, device_t parent)
 123 {
 124         device_t        child;
 125         u_int32_t       ioport;
 126         u_char          enaddr[6];
 127         u_int           irq;
 128         int             tmp;
 129         int             count;
 130         const char *    desc;
 131
 132         /*
 133          * Rescanning ISA I/O ports is not supported.
 134          */
 135         if (device_get_state(parent) == DS_ATTACHED)
 136                 return (0);
 137
 138         if (bootverbose)
 139                 printf("ex_isa_identify()\n");
 140
 141         count = 0;
 142         for (ioport = 0x200; ioport < 0x3a0; ioport += 0x10) {
 143
 144                 /* No board found at address */
 145                 if (!look_for_card(ioport)) {
 146                         continue;
 147                 }
 148
 149                 if (bootverbose)
 150                         printf("ex: Found card at 0x%03x!\n", ioport);
 151
 152                 /* Board in PnP mode */
 153                 if (eeprom_read(ioport, EE_W0) & EE_W0_PNP) {
 154                         /* Reset the card. */
 155                         outb(ioport + CMD_REG, Reset_CMD);
 156                         DELAY(500);
 157                         if (bootverbose)
 158                                 printf("ex: card at 0x%03x in PnP mode!\n", ioport);
 159                         continue;
 160                 }
 161
 162                 bzero(enaddr, sizeof(enaddr));
 163
 164                 /* Reset the card. */
 165                 outb(ioport + CMD_REG, Reset_CMD);
 166                 DELAY(400);
 167
 168                 ex_get_address(ioport, enaddr);
 169                 tmp = eeprom_read(ioport, EE_W1) & EE_W1_INT_SEL;
 170
 171                 /* work out which set of irq <-> internal tables to use */
 172                 if (ex_card_type(enaddr) == CARD_TYPE_EX_10_PLUS) {
 173                         irq  = plus_ee2irqmap[tmp];
 174                         desc = "Intel Pro/10+";
 175                 } else {
 176                         irq = ee2irqmap[tmp];
 177                         desc = "Intel Pro/10";
 178                 }
 179
 180                 child = BUS_ADD_CHILD(parent, parent,
 181                                       ISA_ORDER_SPECULATIVE, "ex", -1);
 182                 device_set_desc_copy(child, desc);
 183                 device_set_driver(child, driver);
 184                 bus_set_resource(child, SYS_RES_IRQ, 0, irq, 1);
 185                 bus_set_resource(child, SYS_RES_IOPORT, 0, ioport, EX_IOSIZE);
 186                 ++count;
 187
 188                 if (bootverbose)
 189                         printf("ex: Adding board at 0x%03x, irq %d\n", ioport, irq);
 190         }
 191         return (count ? 0 : ENXIO);
 192 }
 193
 194 static int
 195 ex_isa_probe(device_t dev)
 196 {
 197         u_int           iobase;
 198         u_int           irq;
 199         char *          irq2ee;
 200         u_char *        ee2irq;
 201         u_char          enaddr[6];
 202         int             tmp;
 203         int             error;
 204
 205         /* Check isapnp ids */
 206         error = ISA_PNP_PROBE(device_get_parent(dev), dev, ex_ids);
 207
 208         /* If the card had a PnP ID that didn't match any we know about */
 209         if (error == ENXIO) {
 210                 return(error);
 211         }
 212
 213         /* If we had some other problem. */
 214         if (!(error == 0 || error == ENOENT)) {
 215                 return(error);
 216         }
 217
 218         iobase = bus_get_resource_start(dev, SYS_RES_IOPORT, 0);
 219         if (!iobase) {
 220                 printf("ex: no iobase?\n");
 221                 return(ENXIO);
 222         }
 223
 224         if (!look_for_card(iobase)) {
 225                 printf("ex: no card found at 0x%03x\n", iobase);
 226                 return(ENXIO);
 227         }
 228
 229         if (bootverbose)
 230                 printf("ex: ex_isa_probe() found card at 0x%03x\n", iobase);
 231
 232         /*
 233          * Reset the card.
 234          */
 235         outb(iobase + CMD_REG, Reset_CMD);
 236         DELAY(800);
 237
 238         ex_get_address(iobase, enaddr);
 239
 240         /* work out which set of irq <-> internal tables to use */
 241         if (ex_card_type(enaddr) == CARD_TYPE_EX_10_PLUS) {
 242                 irq2ee = plus_irq2eemap;
 243                 ee2irq = plus_ee2irqmap;
 244         } else {
 245                 irq2ee = irq2eemap;
 246                 ee2irq = ee2irqmap;
 247         }
 248
 249         tmp = eeprom_read(iobase, EE_W1) & EE_W1_INT_SEL;
 250         irq = bus_get_resource_start(dev, SYS_RES_IRQ, 0);
 251
 252         if (irq > 0) {
 253                 /* This will happen if board is in PnP mode. */
 254                 if (ee2irq[tmp] != irq) {
 255                         printf("ex: WARNING: board's EEPROM is configured"
 256                                 " for IRQ %d, using %d\n",
 257                                 ee2irq[tmp], irq);
 258                 }
 259         } else {
 260                 irq = ee2irq[tmp];
 261                 bus_set_resource(dev, SYS_RES_IRQ, 0, irq, 1);
 262         }
 263
 264         if (irq == 0) {
 265                 printf("ex: invalid IRQ.\n");
 266                 return(ENXIO);
 267         }
 268
 269         return(0);
 270 }
 271
 272 static int
 273 ex_isa_attach(device_t dev)
 274 {
 275         struct ex_softc *       sc = device_get_softc(dev);
 276         int                     error = 0;
 277         u_int16_t               temp;
 278
 279         sc->dev = dev;
 280         sc->ioport_rid = 0;
 281         sc->irq_rid = 0;
 282
 283         if ((error = ex_alloc_resources(dev)) != 0) {
 284                 device_printf(dev, "ex_alloc_resources() failed!\n");
 285                 goto bad;
 286         }
 287
 288         /*
 289          * Fill in several fields of the softc structure:
 290          *      - I/O base address.
 291          *      - Hardware Ethernet address.
 292          *      - IRQ number (if not supplied in config file, read it from EEPROM).
 293          *      - Connector type.
 294          */
 295         sc->iobase = rman_get_start(sc->ioport);
 296         sc->irq_no = rman_get_start(sc->irq);
 297
 298         ex_get_address(sc->iobase, sc->arpcom.ac_enaddr);
 299
 300         temp = eeprom_read(sc->iobase, EE_W0);
 301         device_printf(sc->dev, "%s config, %s bus, ",
 302                 (temp & EE_W0_PNP) ? "PnP" : "Manual",
 303                 (temp & EE_W0_BUS16) ? "16-bit" : "8-bit");
 304
 305         temp = eeprom_read(sc->iobase, EE_W6);
 306         printf("board id 0x%03x, stepping 0x%01x\n",
 307                 (temp & EE_W6_BOARD_MASK) >> EE_W6_BOARD_SHIFT,
 308                 temp & EE_W6_STEP_MASK);
 309
 310         if ((error = ex_attach(dev)) != 0) {
 311                 device_printf(dev, "ex_attach() failed!\n");
 312                 goto bad;
 313         }
 314
 315         error = bus_setup_intr(dev, sc->irq, 0,
 316                                 ex_intr, (void *)sc,
 317                                 &sc->ih, NULL);
 318         if (error) {
 319                 device_printf(dev, "bus_setup_intr() failed!\n");
 320                 goto bad;
 321         }
 322
 323         return(0);
 324 bad:
 325         ex_release_resources(dev);
 326         return (error);
 327 }