1/* $NetBSD: if_le_mca.c,v 1.21 2019/04/09 04:04:04 msaitoh Exp $ */ 2 3/*- 4 * Copyright (c) 2001 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Jaromir Dolecek. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29 * POSSIBILITY OF SUCH DAMAGE. 30 */ 31 32/* 33 * Driver for SKNET Personal and MC2+ cards, which are AMD Lance 7990 based 34 * cards made by Syskonnect, former Schneider & Koch Datensysteme GmbH. 35 * 36 * Syskonnect was very helpful and provided docs for these cards promptly. 37 * I wish all vendors would be like that! 38 * I'd like to thank to Alfred Arnold, author of the Linux driver, for 39 * giving me contact to The Right Syskonnect person, too :-) 40 * 41 * Sources: 42 * SKNET MC+ Technical Manual, version 1.1, July 21 1993 43 * SKNET personal Technisches Manual, version 1.2, April 14 1988 44 * SKNET junior Technisches Manual, version 1.0, July 14 1987 45 */ 46 47#include <sys/cdefs.h> 48__KERNEL_RCSID(0, "$NetBSD: if_le_mca.c,v 1.21 2019/04/09 04:04:04 msaitoh Exp $"); 49 50#include <sys/param.h> 51#include <sys/systm.h> 52#include <sys/mbuf.h> 53#include <sys/syslog.h> 54#include <sys/socket.h> 55#include <sys/device.h> 56 57#include <net/if.h> 58#include <net/if_ether.h> 59#include <net/if_media.h> 60 61#include <sys/cpu.h> 62#include <sys/intr.h> 63#include <sys/bus.h> 64 65#include <dev/ic/lancereg.h> 66#include <dev/ic/lancevar.h> 67#include <dev/ic/am7990reg.h> 68#include <dev/ic/am7990var.h> 69 70#include <dev/mca/mcareg.h> 71#include <dev/mca/mcavar.h> 72#include <dev/mca/mcadevs.h> 73 74#include <dev/mca/if_lereg.h> 75 76struct le_mca_softc { 77 struct am7990_softc sc_am7990; /* glue to MI code */ 78 79 void *sc_ih; 80 bus_space_tag_t sc_memt; 81 bus_space_handle_t sc_memh; 82}; 83 84static int le_mca_match(device_t, cfdata_t, void *); 85static void le_mca_attach(device_t, device_t, void *); 86 87static void le_mca_wrcsr(struct lance_softc *, uint16_t, uint16_t); 88static uint16_t le_mca_rdcsr(struct lance_softc *, uint16_t); 89static void le_mca_hwreset(struct lance_softc *); 90static int le_mca_intredge(void *); 91 92static void le_mca_copytobuf(struct lance_softc *, void *, int, int); 93static void le_mca_copyfrombuf(struct lance_softc *, void *, int, int); 94static void le_mca_zerobuf(struct lance_softc *, int, int); 95 96static inline void le_mca_wrreg(struct le_mca_softc *, int, int); 97#define le_mca_set_RAP(sc, reg_number) \ 98 le_mca_wrreg(sc, reg_number, RAP | REGWRITE) 99 100CFATTACH_DECL_NEW(le_mca, sizeof(struct le_mca_softc), 101 le_mca_match, le_mca_attach, NULL, NULL); 102 103/* SKNET MC+ POS mapping */ 104static const uint8_t sknet_mcp_irq[] = { 105 3, 5, 10, 11 106}; 107static const int sknet_mcp_media[] = { 108 IFM_ETHER | IFM_10_2, 109 IFM_ETHER | IFM_10_T, 110 IFM_ETHER | IFM_10_5, 111 0 112}; 113 114int 115le_mca_match(device_t parent, cfdata_t cf, void *aux) 116{ 117 struct mca_attach_args *ma = aux; 118 119 switch(ma->ma_id) { 120 case MCA_PRODUCT_SKNETPER: 121 case MCA_PRODUCT_SKNETG: 122 return 1; 123 } 124 125 return 0; 126} 127 128void 129le_mca_attach(device_t parent, device_t self, void *aux) 130{ 131 struct le_mca_softc *lesc = device_private(self); 132 struct lance_softc *sc = &lesc->sc_am7990.lsc; 133 struct mca_attach_args *ma = aux; 134 int i, pos2, pos3, pos4, irq, membase; 135 const int *supmedia = NULL; 136 const char *typestr; 137 138 sc->sc_dev = self; 139 140 /* 141 * SKNET Personal: 142 * 143 * POS register 2: (adf pos0) 144 * 145 * 7 6 5 4 3 2 1 0 146 * | \___/ \__ enable: 0=adapter disabled, 1=adapter enabled 147 * \ \____ Memory: 0xC0000-0xC3FFF + XX*0x4000 148 * \________ IRQ: 0=10 1=11 149 * 150 * 151 * SKNET MC+: 152 * POS register 2: (adf pos0) 153 * 154 * 7 6 5 4 3 2 1 0 155 * \___/ \ \__ enable: 0=adapter disabled, 1=adapter enabled 156 * \ \___ BootEPROM disable 157 * \_____ BootEPROM start address: 0xC0000 + XX*0x4000 158 * 159 * POS register 3: (adf pos1) 160 * 161 * 7 6 5 4 3 2 1 0 162 * 0 0 1 1 \_____/ 163 * \__ RAM: 0xC0000 + XX*0x4000 164 * 165 * POS register 4: (adf pos2) 166 * 167 * 7 6 5 4 3 2 1 0 168 * \_/ \_/ \_/ 169 * \ \ \__ Need to be reset to 0 0 after boot 170 * \ \_____ IRQ: 00=3 01=5 10=10 11=11 171 * \____________ Medium: 00=BNC 01=UTP 10=AUI 11=not allowed 172 */ 173 174 switch (ma->ma_id) { 175 case MCA_PRODUCT_SKNETPER: 176 typestr = "Personal MC2"; 177 178 pos2 = mca_conf_read(ma->ma_mc, ma->ma_slot, 2); 179 irq = (pos2 & (1<<4)) ? 11 : 10; 180 membase = 0xc0000 + ((pos2 & 0x0e) >> 1) * 0x4000; 181 break; 182 case MCA_PRODUCT_SKNETG: 183 typestr = "MC2+"; 184 185 /* 186 * SKNET MC+ needs the driver to clear 0, 1 bits of pos4 187 * and explicitly set the enable bit. Somebody at Syskonnect 188 * was obviously misguided when the card was designed ... 189 */ 190 pos3 = mca_conf_read(ma->ma_mc, ma->ma_slot, 3); 191 pos4 = mca_conf_read(ma->ma_mc, ma->ma_slot, 4); 192 if ((pos4 & 0x03) != 0) { 193 /* clear the bits 0, 1 */ 194 mca_conf_write(ma->ma_mc, ma->ma_slot, 4, 195 pos4 & ~0x03); 196 } 197 198 pos2 = mca_conf_read(ma->ma_mc, ma->ma_slot, 2); 199 if ((pos2 & 0x01) == 0) { 200 /* enable the card */ 201 mca_conf_write(ma->ma_mc, ma->ma_slot, 2, pos2 | 0x01); 202 } 203 204 /* get irq and memory base */ 205 irq = sknet_mcp_irq[(pos4 & 0x0c) >> 2]; 206 membase = 0xc0000 + ((pos3 & 0x0f) * 0x4000); 207 208 /* Get configured media type */ 209 supmedia = &sknet_mcp_media[(pos4 & 0xc0) >> 6]; 210 break; 211 default: 212 aprint_error(": unknown product %d\n", ma->ma_id); 213 return; 214 } 215 216 lesc->sc_memt = ma->ma_memt; 217 218 if (bus_space_map(lesc->sc_memt, membase, LE_MCA_MEMSIZE, 219 0, &lesc->sc_memh)) { 220 aprint_error(": can't map memory\n"); 221 return; 222 } 223 224 aprint_normal(" slot %d irq %d: SKNET %s Ethernet\n", 225 ma->ma_slot + 1, irq, typestr); 226 227 /* 228 * Extract the physical MAC address from the ROM. 229 */ 230 for (i = 0; i < ETHER_ADDR_LEN; i++) 231 sc->sc_enaddr[i] = bus_space_read_1(lesc->sc_memt, 232 lesc->sc_memh, LE_PROMOFF + i * 2); 233 234 sc->sc_conf3 = LE_C3_ACON; 235 sc->sc_addr = 0; 236 sc->sc_memsize = LE_MCA_RAMSIZE; 237 238 sc->sc_copytodesc = le_mca_copytobuf; 239 sc->sc_copyfromdesc = le_mca_copyfrombuf; 240 sc->sc_copytobuf = le_mca_copytobuf; 241 sc->sc_copyfrombuf = le_mca_copyfrombuf; 242 sc->sc_zerobuf = le_mca_zerobuf; 243 244 sc->sc_rdcsr = le_mca_rdcsr; 245 sc->sc_wrcsr = le_mca_wrcsr; 246 sc->sc_hwinit = NULL; 247 248 sc->sc_hwreset = le_mca_hwreset; 249 250 /* 251 * This is merely cosmetic since it's not possible to switch 252 * the media anyway, even for MC2+. 253 */ 254 if (supmedia != NULL) { 255 sc->sc_supmedia = supmedia; 256 sc->sc_nsupmedia = 1; 257 sc->sc_defaultmedia = *supmedia; 258 } 259 260 lesc->sc_ih = mca_intr_establish(ma->ma_mc, irq, IPL_NET, 261 le_mca_intredge, sc); 262 if (lesc->sc_ih == NULL) { 263 aprint_error_dev(self, 264 "couldn't establish interrupt handler\n"); 265 return; 266 } 267 268 aprint_normal("%s", device_xname(self)); 269 am7990_config(&lesc->sc_am7990); 270} 271 272/* 273 * Controller interrupt. 274 */ 275int 276le_mca_intredge(void *arg) 277{ 278 279 /* 280 * We could check the IRQ bit of LE_PORT, but it seems to be unset 281 * at this time anyway. 282 */ 283 284 if (am7990_intr(arg) == 0) 285 return 0; 286 for(;;) 287 if (am7990_intr(arg) == 0) 288 return 1; 289} 290 291/* 292 * Push a value to LANCE controller. 293 */ 294static inline void 295le_mca_wrreg(struct le_mca_softc *sc, int val, int type) 296{ 297 298 /* 299 * This follows steps in SKNET Personal/MC2+ docs: 300 * 1. write reg. number to LANCE register 301 * 2. write value RESET | type to port 302 * 3. flag REGDO 303 * 4. wait until REGREQ is cleared 304 */ 305 if ((type & REGREAD) == 0) 306 bus_space_write_2(sc->sc_memt, sc->sc_memh, LE_LANCEREG, val); 307 bus_space_write_1(sc->sc_memt, sc->sc_memh, LE_PORT, 308 RESET | type); 309 bus_space_write_1(sc->sc_memt, sc->sc_memh, LE_REGIO, 310 REGDO); 311 /* Delay here doesn't seem to be necessary */ 312 /* delay(1); */ 313 while (bus_space_read_1(sc->sc_memt, sc->sc_memh, LE_PORT) & REGREQ) 314 ; 315} 316 317static void 318le_mca_wrcsr(struct lance_softc *sc, uint16_t port, uint16_t val) 319{ 320 struct le_mca_softc *lsc = (struct le_mca_softc *)sc; 321 322 le_mca_set_RAP(lsc, port); 323 le_mca_wrreg(lsc, val, RDATA | REGWRITE); 324} 325 326static uint16_t 327le_mca_rdcsr(struct lance_softc *sc, uint16_t port) 328{ 329 struct le_mca_softc *lsc = (struct le_mca_softc *)sc; 330 331 le_mca_set_RAP(lsc, port); 332 le_mca_wrreg(lsc, 0, RDATA | REGREAD); 333 334 return (bus_space_read_2(lsc->sc_memt, lsc->sc_memh, LE_LANCEREG)); 335} 336 337static void 338le_mca_hwreset(struct lance_softc *sc) 339{ 340 struct le_mca_softc *lsc = (struct le_mca_softc *)sc; 341 342 bus_space_write_1(lsc->sc_memt, lsc->sc_memh, LE_PORT, 0); 343 delay(5); /* Delay >= 5 microseconds */ 344 bus_space_write_1(lsc->sc_memt, lsc->sc_memh, LE_PORT, RESET); 345} 346 347static void 348le_mca_copytobuf(struct lance_softc *sc, void *from, int boff, int len) 349{ 350 struct le_mca_softc *lsc = (struct le_mca_softc *)sc; 351 352 bus_space_write_region_1(lsc->sc_memt, lsc->sc_memh, boff, from, len); 353} 354 355static void 356le_mca_copyfrombuf(struct lance_softc *sc, void *to, int boff, int len) 357{ 358 struct le_mca_softc *lsc = (struct le_mca_softc *)sc; 359 360 bus_space_read_region_1(lsc->sc_memt, lsc->sc_memh, boff, to, len); 361} 362 363static void 364le_mca_zerobuf(struct lance_softc *sc, int boff, int len) 365{ 366 struct le_mca_softc *lsc = (struct le_mca_softc *)sc; 367 368 bus_space_set_region_1(lsc->sc_memt, lsc->sc_memh, boff, 0x00, len); 369} 370