if_ep_isa.c revision 119418
1178476Sjb/* 2178476Sjb * Copyright (c) 1994 Herb Peyerl <hpeyerl@novatel.ca> 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 * 3. All advertising materials mentioning features or use of this software 14 * must display the following acknowledgement: 15 * This product includes software developed by Herb Peyerl. 16 * 4. The name of Herb Peyerl may not be used to endorse or promote products 17 * derived from this software without specific prior written permission. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 20 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 21 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 22 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 23 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 24 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 25 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 26 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 27 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 28 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 29 */ 30 31#include <sys/cdefs.h> 32__FBSDID("$FreeBSD: head/sys/dev/ep/if_ep_isa.c 119418 2003-08-24 17:55:58Z obrien $"); 33 34#include <sys/cdefs.h> 35__FBSDID("$FreeBSD: head/sys/dev/ep/if_ep_isa.c 119418 2003-08-24 17:55:58Z obrien $"); 36 37#include <sys/param.h> 38#include <sys/systm.h> 39#include <sys/kernel.h> 40#include <sys/socket.h> 41#include <sys/module.h> 42#include <sys/bus.h> 43 44#include <machine/bus.h> 45#include <machine/resource.h> 46#include <sys/rman.h> 47 48#include <net/if.h> 49#include <net/if_arp.h> 50#include <net/if_media.h> 51 52#include <isa/isavar.h> 53 54#include <dev/ep/if_epreg.h> 55#include <dev/ep/if_epvar.h> 56 57#ifdef __i386__ 58#include <i386/isa/elink.h> 59#endif 60 61#ifdef __i386__ 62static u_int16_t get_eeprom_data(int, int); 63static void ep_isa_identify(driver_t *, device_t); 64#endif 65 66static int ep_isa_probe(device_t); 67static int ep_isa_attach(device_t); 68static int ep_eeprom_cksum(struct ep_softc *); 69 70struct isa_ident { 71 u_int32_t id; 72 char *name; 73}; 74const char *ep_isa_match_id(u_int32_t, struct isa_ident *); 75 76#define ISA_ID_3C509_XXX 0x0506d509 77#define ISA_ID_3C509_TP 0x506d5090 78#define ISA_ID_3C509_BNC 0x506d5091 79#define ISA_ID_3C509_COMBO 0x506d5094 80#define ISA_ID_3C509_TPO 0x506d5095 81#define ISA_ID_3C509_TPC 0x506d5098 82#ifdef PC98 83#define ISA_ID_3C569B_COMBO 0x506d5694 84#define ISA_ID_3C569B_TPO 0x506d5695 85#endif 86 87#ifdef __i386__ 88static struct isa_ident ep_isa_devs[] = { 89 {ISA_ID_3C509_TP, "3Com 3C509-TP EtherLink III"}, 90 {ISA_ID_3C509_BNC, "3Com 3C509-BNC EtherLink III"}, 91 {ISA_ID_3C509_COMBO, "3Com 3C509-Combo EtherLink III"}, 92 {ISA_ID_3C509_TPO, "3Com 3C509-TPO EtherLink III"}, 93 {ISA_ID_3C509_TPC, "3Com 3C509-TPC EtherLink III"}, 94#ifdef PC98 95 {ISA_ID_3C569B_COMBO, "3Com 3C569B-J-Combo EtherLink III"}, 96 {ISA_ID_3C569B_TPO, "3Com 3C569B-J-TPO EtherLink III"}, 97#endif 98 {0, NULL}, 99}; 100#endif 101 102static struct isa_pnp_id ep_ids[] = { 103 {0x90506d50, "3Com 3C509B-TP EtherLink III (PnP)"}, /* TCM5090 */ 104 {0x91506d50, "3Com 3C509B-BNC EtherLink III (PnP)"}, /* TCM5091 */ 105 {0x94506d50, "3Com 3C509B-Combo EtherLink III (PnP)"}, /* TCM5094 */ 106 {0x95506d50, "3Com 3C509B-TPO EtherLink III (PnP)"}, /* TCM5095 */ 107 {0x98506d50, "3Com 3C509B-TPC EtherLink III (PnP)"}, /* TCM5098 */ 108 {0xf780d041, NULL}, /* PNP80f7 */ 109 {0, NULL}, 110}; 111 112/* 113 * We get eeprom data from the id_port given an offset into the eeprom. 114 * Basically; after the ID_sequence is sent to all of the cards; they enter 115 * the ID_CMD state where they will accept command requests. 0x80-0xbf loads 116 * the eeprom data. We then read the port 16 times and with every read; the 117 * cards check for contention (ie: if one card writes a 0 bit and another 118 * writes a 1 bit then the host sees a 0. At the end of the cycle; each card 119 * compares the data on the bus; if there is a difference then that card goes 120 * into ID_WAIT state again). In the meantime; one bit of data is returned in 121 * the AX register which is conveniently returned to us by inb(). Hence; we 122 * read 16 times getting one bit of data with each read. 123 */ 124#ifdef __i386__ 125static u_int16_t 126get_eeprom_data(int id_port, int offset) 127{ 128 int i; 129 u_int16_t data = 0; 130 131 outb(id_port, EEPROM_CMD_RD | offset); 132 DELAY(BIT_DELAY_MULTIPLE * 1000); 133 for (i = 0; i < 16; i++) { 134 DELAY(50); 135 data = (data << 1) | (inw(id_port) & 1); 136 } 137 return (data); 138} 139#endif 140 141const char * 142ep_isa_match_id(u_int32_t id, struct isa_ident *isa_devs) 143{ 144 struct isa_ident *i = isa_devs; 145 146 while (i->name != NULL) { 147 if (id == i->id) 148 return (i->name); 149 i++; 150 } 151 /* 152 * If we see a card that is likely to be a 3c509 153 * return something so that it will work; be annoying 154 * so that the user will tell us about it though. 155 */ 156 if ((id >> 4) == ISA_ID_3C509_XXX) 157 return ("Unknown 3c509; notify maintainer!"); 158 return (NULL); 159} 160 161#ifdef __i386__ 162static void 163ep_isa_identify(driver_t * driver, device_t parent) 164{ 165 int tag = EP_LAST_TAG; 166 int found = 0; 167 int i; 168 int j; 169 const char *desc; 170 u_int16_t data; 171 u_int32_t irq; 172 u_int32_t ioport; 173 u_int32_t isa_id; 174 device_t child; 175 176 outb(ELINK_ID_PORT, 0); 177 outb(ELINK_ID_PORT, 0); 178 elink_idseq(ELINK_509_POLY); 179 elink_reset(); 180 181 DELAY(DELAY_MULTIPLE * 10000); 182 183 for (i = 0; i < EP_MAX_BOARDS; i++) { 184 185 outb(ELINK_ID_PORT, 0); 186 outb(ELINK_ID_PORT, 0); 187 elink_idseq(ELINK_509_POLY); 188 DELAY(400); 189 190 /* 191 * For the first probe, clear all board's tag registers. 192 * Otherwise kill off already-found boards. -- linux 3c509.c 193 */ 194 if (i == 0) 195 outb(ELINK_ID_PORT, 0xd0); 196 else 197 outb(ELINK_ID_PORT, 0xd8); 198 199 /* Get out of loop if we're out of cards. */ 200 data = get_eeprom_data(ELINK_ID_PORT, EEPROM_MFG_ID); 201 if (data != MFG_ID) 202 break; 203 /* resolve contention using the Ethernet address */ 204 for (j = 0; j < 3; j++) 205 (void)get_eeprom_data(ELINK_ID_PORT, j); 206 207 /* 208 * Construct an 'isa_id' in 'EISA' 209 * format. 210 */ 211 data = get_eeprom_data(ELINK_ID_PORT, EEPROM_MFG_ID); 212 isa_id = (htons(data) << 16); 213 data = get_eeprom_data(ELINK_ID_PORT, EEPROM_PROD_ID); 214 isa_id |= htons(data); 215 216 /* Find known ISA boards */ 217 desc = ep_isa_match_id(isa_id, ep_isa_devs); 218 if (!desc) { 219 if (bootverbose) 220 device_printf(parent, "if_ep: unknown ID 0x%08x\n", 221 isa_id); 222 continue; 223 } 224 /* Retreive IRQ */ 225 data = get_eeprom_data(ELINK_ID_PORT, EEPROM_RESOURCE_CFG); 226 irq = (data >> 12); 227 228 /* Retreive IOPORT */ 229 data = get_eeprom_data(ELINK_ID_PORT, EEPROM_ADDR_CFG); 230#ifdef PC98 231 ioport = (((data & ADDR_CFG_MASK) * 0x100) + 0x40d0); 232#else 233 ioport = (((data & ADDR_CFG_MASK) << 4) + 0x200); 234#endif 235 236 if ((data & ADDR_CFG_MASK) == ADDR_CFG_EISA) { 237 device_printf(parent, "if_ep: <%s> at port 0x%03x in EISA mode!\n", 238 desc, ioport); 239 /* 240 * Set the adaptor tag so that the next card can be 241 * found. 242 */ 243 outb(ELINK_ID_PORT, tag--); 244 continue; 245 } 246 /* Test for an adapter with PnP support. */ 247 data = get_eeprom_data(ELINK_ID_PORT, EEPROM_CAP); 248 if (data == CAP_ISA) { 249 data = get_eeprom_data(ELINK_ID_PORT, EEPROM_INT_CONFIG_1); 250 if (data & ICW1_IAS_PNP) { 251 if (bootverbose) 252 device_printf(parent, "if_ep: <%s> at 0x%03x in PnP mode!\n", 253 desc, ioport); 254 /* 255 * Set the adaptor tag so that the next card 256 * can be found. 257 */ 258 outb(ELINK_ID_PORT, tag--); 259 continue; 260 } 261 } 262 /* Set the adaptor tag so that the next card can be found. */ 263 outb(ELINK_ID_PORT, tag--); 264 265 /* Activate the adaptor at the EEPROM location. */ 266 outb(ELINK_ID_PORT, ACTIVATE_ADAPTER_TO_CONFIG); 267 268 /* Test for an adapter in TEST mode. */ 269 outw(ioport + EP_COMMAND, WINDOW_SELECT | 0); 270 data = inw(ioport + EP_W0_EEPROM_COMMAND); 271 if (data & EEPROM_TST_MODE) { 272 device_printf(parent, "if_ep: <%s> at port 0x%03x in TEST mode! Erase pencil mark.\n", 273 desc, ioport); 274 continue; 275 } 276 child = BUS_ADD_CHILD(parent, ISA_ORDER_SPECULATIVE, "ep", -1); 277 device_set_desc_copy(child, desc); 278 device_set_driver(child, driver); 279 bus_set_resource(child, SYS_RES_IRQ, 0, irq, 1); 280 bus_set_resource(child, SYS_RES_IOPORT, 0, ioport, EP_IOSIZE); 281 282 if (bootverbose) 283 device_printf(parent, "if_ep: <%s> at port 0x%03x-0x%03x irq %d\n", 284 desc, ioport, ioport + EP_IOSIZE, irq); 285 found++; 286 } 287} 288#endif 289 290static int 291ep_isa_probe(device_t dev) 292{ 293 int error = 0; 294 295 /* Check isapnp ids */ 296 error = ISA_PNP_PROBE(device_get_parent(dev), dev, ep_ids); 297 298 /* If the card had a PnP ID that didn't match any we know about */ 299 if (error == ENXIO) 300 return (error); 301 302 /* If we had some other problem. */ 303 if (!(error == 0 || error == ENOENT)) 304 return (error); 305 306 /* If we have the resources we need then we're good to go. */ 307 if ((bus_get_resource_start(dev, SYS_RES_IOPORT, 0) != 0) && 308 (bus_get_resource_start(dev, SYS_RES_IRQ, 0) != 0)) 309 return (0); 310 311 return (ENXIO); 312} 313 314static int 315ep_isa_attach(device_t dev) 316{ 317 struct ep_softc *sc = device_get_softc(dev); 318 int error = 0; 319 320 if ((error = ep_alloc(dev))) { 321 device_printf(dev, "ep_alloc() failed! (%d)\n", error); 322 goto bad; 323 } 324 ep_get_media(sc); 325 326 GO_WINDOW(0); 327 SET_IRQ(BASE, rman_get_start(sc->irq)); 328 329 if ((error = ep_attach(sc))) { 330 device_printf(dev, "ep_attach() failed! (%d)\n", error); 331 goto bad; 332 } 333 error = ep_eeprom_cksum(sc); 334 if (error) { 335 device_printf(sc->dev, "Invalid EEPROM checksum!\n"); 336 goto bad; 337 } 338 if ((error = bus_setup_intr(dev, sc->irq, INTR_TYPE_NET, ep_intr, 339 sc, &sc->ep_intrhand))) { 340 device_printf(dev, "bus_setup_intr() failed! (%d)\n", error); 341 goto bad; 342 } 343 return (0); 344bad: 345 ep_free(dev); 346 return (error); 347} 348 349static int 350ep_eeprom_cksum(struct ep_softc *sc) 351{ 352 int i; 353 int error; 354 u_int16_t val; 355 u_int16_t cksum; 356 u_int8_t cksum_high = 0; 357 u_int8_t cksum_low = 0; 358 359 error = get_e(sc, 0x0f, &val); 360 if (error) 361 return (ENXIO); 362 cksum = val; 363 364 for (i = 0; i < 0x0f; i++) { 365 error = get_e(sc, i, &val); 366 if (error) 367 return (ENXIO); 368 switch (i) { 369 case 0x08: 370 case 0x09: 371 case 0x0d: 372 cksum_low ^= (u_int8_t) (val & 0x00ff) ^ 373 (u_int8_t) ((val & 0xff00) >> 8); 374 break; 375 default: 376 cksum_high ^= (u_int8_t) (val & 0x00ff) ^ 377 (u_int8_t) ((val & 0xff00) >> 8); 378 break; 379 } 380 } 381 return (cksum != ((u_int16_t) cksum_low | (u_int16_t) (cksum_high << 8))); 382} 383 384static device_method_t ep_isa_methods[] = { 385 /* Device interface */ 386#ifdef __i386__ 387 DEVMETHOD(device_identify, ep_isa_identify), 388#endif 389 DEVMETHOD(device_probe, ep_isa_probe), 390 DEVMETHOD(device_attach, ep_isa_attach), 391 DEVMETHOD(device_detach, ep_detach), 392 393 {0, 0} 394}; 395 396static driver_t ep_isa_driver = { 397 "ep", 398 ep_isa_methods, 399 sizeof(struct ep_softc), 400}; 401 402extern devclass_t ep_devclass; 403 404DRIVER_MODULE(ep, isa, ep_isa_driver, ep_devclass, 0, 0); 405#ifdef __i386__ 406MODULE_DEPEND(ep, elink, 1, 1, 1); 407#endif 408