1 1.74 andvar /* $NetBSD: if_ie.c,v 1.74 2024/02/09 22:08:33 andvar Exp $ */ 2 1.1 gwr 3 1.1 gwr /*- 4 1.27 mycroft * Copyright (c) 1993, 1994, 1995 Charles M. Hannum. 5 1.1 gwr * Copyright (c) 1992, 1993, University of Vermont and State 6 1.1 gwr * Agricultural College. 7 1.1 gwr * Copyright (c) 1992, 1993, Garrett A. Wollman. 8 1.1 gwr * 9 1.1 gwr * Portions: 10 1.3 gwr * Copyright (c) 1994, 1995, Rafal K. Boni 11 1.1 gwr * Copyright (c) 1990, 1991, William F. Jolitz 12 1.1 gwr * Copyright (c) 1990, The Regents of the University of California 13 1.1 gwr * 14 1.1 gwr * All rights reserved. 15 1.1 gwr * 16 1.1 gwr * Redistribution and use in source and binary forms, with or without 17 1.1 gwr * modification, are permitted provided that the following conditions 18 1.1 gwr * are met: 19 1.1 gwr * 1. Redistributions of source code must retain the above copyright 20 1.1 gwr * notice, this list of conditions and the following disclaimer. 21 1.1 gwr * 2. Redistributions in binary form must reproduce the above copyright 22 1.1 gwr * notice, this list of conditions and the following disclaimer in the 23 1.1 gwr * documentation and/or other materials provided with the distribution. 24 1.1 gwr * 3. All advertising materials mentioning features or use of this software 25 1.1 gwr * must display the following acknowledgement: 26 1.27 mycroft * This product includes software developed by Charles M. Hannum, by the 27 1.1 gwr * University of Vermont and State Agricultural College and Garrett A. 28 1.1 gwr * Wollman, by William F. Jolitz, and by the University of California, 29 1.1 gwr * Berkeley, Lawrence Berkeley Laboratory, and its contributors. 30 1.1 gwr * 4. Neither the names of the Universities nor the names of the authors 31 1.1 gwr * may be used to endorse or promote products derived from this software 32 1.1 gwr * without specific prior written permission. 33 1.1 gwr * 34 1.1 gwr * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 35 1.1 gwr * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 36 1.1 gwr * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 37 1.1 gwr * ARE DISCLAIMED. IN NO EVENT SHALL THE UNIVERSITY OR AUTHORS BE LIABLE 38 1.1 gwr * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 39 1.1 gwr * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 40 1.1 gwr * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 41 1.1 gwr * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 42 1.1 gwr * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 43 1.1 gwr * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 44 1.1 gwr * SUCH DAMAGE. 45 1.1 gwr */ 46 1.1 gwr 47 1.1 gwr /* 48 1.1 gwr * Intel 82586 Ethernet chip 49 1.1 gwr * Register, bit, and structure definitions. 50 1.1 gwr * 51 1.1 gwr * Original StarLAN driver written by Garrett Wollman with reference to the 52 1.1 gwr * Clarkson Packet Driver code for this chip written by Russ Nelson and others. 53 1.1 gwr * 54 1.1 gwr * BPF support code taken from hpdev/if_le.c, supplied with tcpdump. 55 1.1 gwr * 56 1.1 gwr * 3C507 support is loosely based on code donated to NetBSD by Rafal Boni. 57 1.1 gwr * 58 1.1 gwr * Majorly cleaned up and 3C507 code merged by Charles Hannum. 59 1.1 gwr * 60 1.3 gwr * Converted to SUN ie driver by Charles D. Cranor, 61 1.3 gwr * October 1994, January 1995. 62 1.3 gwr * This sun version based on i386 version 1.30. 63 1.17 gwr * [ see sys/dev/isa/if_ie.c ] 64 1.1 gwr */ 65 1.1 gwr 66 1.1 gwr /* 67 1.1 gwr * The i82586 is a very painful chip, found in sun3's, sun-4/100's 68 1.1 gwr * sun-4/200's, and VME based suns. The byte order is all wrong for a 69 1.1 gwr * SUN, making life difficult. Programming this chip is mostly the same, 70 1.1 gwr * but certain details differ from system to system. This driver is 71 1.73 andvar * written so that different "ie" interfaces can be controlled by the same 72 1.1 gwr * driver. 73 1.1 gwr */ 74 1.1 gwr 75 1.1 gwr /* 76 1.1 gwr Mode of operation: 77 1.1 gwr 78 1.1 gwr We run the 82586 in a standard Ethernet mode. We keep NFRAMES 79 1.1 gwr received frame descriptors around for the receiver to use, and 80 1.1 gwr NRXBUF associated receive buffer descriptors, both in a circular 81 1.1 gwr list. Whenever a frame is received, we rotate both lists as 82 1.1 gwr necessary. (The 586 treats both lists as a simple queue.) We also 83 1.1 gwr keep a transmit command around so that packets can be sent off 84 1.1 gwr quickly. 85 1.3 gwr 86 1.1 gwr We configure the adapter in AL-LOC = 1 mode, which means that the 87 1.1 gwr Ethernet/802.3 MAC header is placed at the beginning of the receive 88 1.1 gwr buffer rather than being split off into various fields in the RFD. 89 1.1 gwr This also means that we must include this header in the transmit 90 1.1 gwr buffer as well. 91 1.3 gwr 92 1.1 gwr By convention, all transmit commands, and only transmit commands, 93 1.1 gwr shall have the I (IE_CMD_INTR) bit set in the command. This way, 94 1.1 gwr when an interrupt arrives at ieintr(), it is immediately possible 95 1.1 gwr to tell what precisely caused it. ANY OTHER command-sending 96 1.6 mycroft routines should run at splnet(), and should post an acknowledgement 97 1.1 gwr to every interrupt they generate. 98 1.1 gwr */ 99 1.39 lukem 100 1.39 lukem #include <sys/cdefs.h> 101 1.74 andvar __KERNEL_RCSID(0, "$NetBSD: if_ie.c,v 1.74 2024/02/09 22:08:33 andvar Exp $"); 102 1.1 gwr 103 1.25 jonathan #include "opt_inet.h" 104 1.26 jonathan #include "opt_ns.h" 105 1.1 gwr 106 1.1 gwr #include <sys/param.h> 107 1.1 gwr #include <sys/systm.h> 108 1.1 gwr #include <sys/mbuf.h> 109 1.1 gwr #include <sys/buf.h> 110 1.1 gwr #include <sys/protosw.h> 111 1.1 gwr #include <sys/socket.h> 112 1.1 gwr #include <sys/ioctl.h> 113 1.3 gwr #include <sys/errno.h> 114 1.1 gwr #include <sys/syslog.h> 115 1.3 gwr #include <sys/device.h> 116 1.1 gwr 117 1.1 gwr #include <net/if.h> 118 1.1 gwr #include <net/if_types.h> 119 1.1 gwr #include <net/if_dl.h> 120 1.20 is #include <net/if_ether.h> 121 1.1 gwr #include <net/bpf.h> 122 1.1 gwr 123 1.1 gwr #ifdef INET 124 1.1 gwr #include <netinet/in.h> 125 1.1 gwr #include <netinet/in_systm.h> 126 1.1 gwr #include <netinet/in_var.h> 127 1.1 gwr #include <netinet/ip.h> 128 1.20 is #include <netinet/if_inarp.h> 129 1.1 gwr #endif 130 1.1 gwr 131 1.33 mrg #include <uvm/uvm_extern.h> 132 1.1 gwr 133 1.16 gwr #include <machine/autoconf.h> 134 1.16 gwr #include <machine/cpu.h> 135 1.16 gwr #include <machine/pmap.h> 136 1.16 gwr 137 1.1 gwr /* 138 1.1 gwr * ugly byte-order hack for SUNs 139 1.1 gwr */ 140 1.1 gwr 141 1.51 tsutsui #define XSWAP(y) ( (((y) & 0xff00) >> 8) | (((y) & 0xff) << 8) ) 142 1.1 gwr #define SWAP(x) ((u_short)(XSWAP((u_short)(x)))) 143 1.1 gwr 144 1.1 gwr #include "i82586.h" 145 1.10 gwr #include "if_iereg.h" 146 1.10 gwr #include "if_ievar.h" 147 1.1 gwr 148 1.18 gwr /* #define IEDEBUG XXX */ 149 1.1 gwr 150 1.1 gwr /* 151 1.1 gwr * IED: ie debug flags 152 1.1 gwr */ 153 1.1 gwr 154 1.1 gwr #define IED_RINT 0x01 155 1.1 gwr #define IED_TINT 0x02 156 1.1 gwr #define IED_RNR 0x04 157 1.1 gwr #define IED_CNA 0x08 158 1.1 gwr #define IED_READFRAME 0x10 159 1.17 gwr #define IED_ENQ 0x20 160 1.17 gwr #define IED_XMIT 0x40 161 1.17 gwr #define IED_ALL 0x7f 162 1.1 gwr 163 1.17 gwr #ifdef IEDEBUG 164 1.17 gwr #define inline /* not */ 165 1.41 chs void print_rbd(volatile struct ie_recv_buf_desc *); 166 1.69 msaitoh int in_ierint = 0; 167 1.69 msaitoh int in_ietint = 0; 168 1.69 msaitoh int ie_debug_flags = 0; 169 1.17 gwr #endif 170 1.17 gwr 171 1.18 gwr /* XXX - Skip TDR for now - it always complains... */ 172 1.69 msaitoh int ie_run_tdr = 0; 173 1.18 gwr 174 1.41 chs static void iewatchdog(struct ifnet *); 175 1.41 chs static int ieinit(struct ie_softc *); 176 1.45 christos static int ieioctl(struct ifnet *, u_long, void *); 177 1.41 chs static void iestart(struct ifnet *); 178 1.41 chs static void iereset(struct ie_softc *); 179 1.41 chs static int ie_setupram(struct ie_softc *); 180 1.41 chs 181 1.41 chs static int cmd_and_wait(struct ie_softc *, int, void *, int); 182 1.41 chs 183 1.41 chs static void ie_drop_packet_buffer(struct ie_softc *); 184 1.41 chs static void ie_readframe(struct ie_softc *, int); 185 1.41 chs static inline void ie_setup_config(struct ie_config_cmd *, int, int); 186 1.41 chs 187 1.41 chs static void ierint(struct ie_softc *); 188 1.41 chs static void iestop(struct ie_softc *); 189 1.41 chs static void ietint(struct ie_softc *); 190 1.41 chs static void iexmit(struct ie_softc *); 191 1.41 chs 192 1.41 chs static int mc_setup(struct ie_softc *, void *); 193 1.41 chs static void mc_reset(struct ie_softc *); 194 1.41 chs static void run_tdr(struct ie_softc *, struct ie_tdr_cmd *); 195 1.41 chs static void iememinit(struct ie_softc *); 196 1.41 chs 197 1.51 tsutsui static inline uint8_t *Align(char *); 198 1.41 chs static inline u_int Swap32(u_int); 199 1.41 chs static inline u_int vtop24(struct ie_softc *, void *); 200 1.51 tsutsui static inline uint16_t vtop16sw(struct ie_softc *, void *); 201 1.41 chs 202 1.41 chs static inline void ie_ack(struct ie_softc *, u_int); 203 1.51 tsutsui static inline u_short ether_cmp(u_char *, uint8_t *); 204 1.41 chs static inline int ie_buflen(struct ie_softc *, int); 205 1.41 chs static inline int ie_packet_len(struct ie_softc *); 206 1.60 ozaki static inline struct mbuf * ieget(struct ie_softc *); 207 1.1 gwr 208 1.1 gwr 209 1.1 gwr /* 210 1.1 gwr * Here are a few useful functions. We could have done these as macros, 211 1.1 gwr * but since we have the inline facility, it makes sense to use that 212 1.1 gwr * instead. 213 1.1 gwr */ 214 1.17 gwr 215 1.17 gwr /* KVA to 24 bit device address */ 216 1.68 msaitoh static inline u_int 217 1.41 chs vtop24(struct ie_softc *sc, void *ptr) 218 1.17 gwr { 219 1.17 gwr u_int pa; 220 1.17 gwr 221 1.46 tsutsui pa = (vaddr_t)ptr - (vaddr_t)sc->sc_iobase; 222 1.17 gwr #ifdef IEDEBUG 223 1.17 gwr if (pa & ~0xffFFff) 224 1.17 gwr panic("ie:vtop24"); 225 1.17 gwr #endif 226 1.51 tsutsui return pa; 227 1.17 gwr } 228 1.17 gwr 229 1.17 gwr /* KVA to 16 bit offset, swapped */ 230 1.68 msaitoh static inline u_short 231 1.41 chs vtop16sw(struct ie_softc *sc, void *ptr) 232 1.17 gwr { 233 1.17 gwr u_int pa; 234 1.17 gwr 235 1.46 tsutsui pa = (vaddr_t)ptr - (vaddr_t)sc->sc_maddr; 236 1.17 gwr #ifdef IEDEBUG 237 1.17 gwr if (pa & ~0xFFff) 238 1.17 gwr panic("ie:vtop16"); 239 1.17 gwr #endif 240 1.17 gwr 241 1.51 tsutsui return SWAP(pa); 242 1.17 gwr } 243 1.17 gwr 244 1.68 msaitoh static inline u_int 245 1.41 chs Swap32(u_int x) 246 1.1 gwr { 247 1.17 gwr u_int y; 248 1.17 gwr 249 1.17 gwr y = x & 0xFF; 250 1.17 gwr y <<= 8; x >>= 8; 251 1.17 gwr y |= x & 0xFF; 252 1.17 gwr y <<= 8; x >>= 8; 253 1.17 gwr y |= x & 0xFF; 254 1.17 gwr y <<= 8; x >>= 8; 255 1.17 gwr y |= x & 0xFF; 256 1.1 gwr 257 1.51 tsutsui return y; 258 1.1 gwr } 259 1.1 gwr 260 1.51 tsutsui static inline uint8_t * 261 1.46 tsutsui Align(char *ptr) 262 1.1 gwr { 263 1.1 gwr u_long l = (u_long)ptr; 264 1.1 gwr 265 1.1 gwr l = (l + 3) & ~3L; 266 1.51 tsutsui return (uint8_t *)l; 267 1.1 gwr } 268 1.1 gwr 269 1.17 gwr 270 1.68 msaitoh static inline void 271 1.41 chs ie_ack(struct ie_softc *sc, u_int mask) 272 1.1 gwr { 273 1.1 gwr volatile struct ie_sys_ctl_block *scb = sc->scb; 274 1.1 gwr 275 1.16 gwr cmd_and_wait(sc, scb->ie_status & mask, 0, 0); 276 1.1 gwr } 277 1.1 gwr 278 1.1 gwr 279 1.1 gwr /* 280 1.1 gwr * Taken almost exactly from Bill's if_is.c, 281 1.1 gwr * then modified beyond recognition... 282 1.1 gwr */ 283 1.68 msaitoh void 284 1.41 chs ie_attach(struct ie_softc *sc) 285 1.1 gwr { 286 1.1 gwr struct ifnet *ifp = &sc->sc_if; 287 1.1 gwr 288 1.9 gwr /* MD code has done its part before calling this. */ 289 1.17 gwr printf(": macaddr %s\n", ether_sprintf(sc->sc_addr)); 290 1.1 gwr 291 1.17 gwr /* 292 1.17 gwr * Compute number of transmit and receive buffers. 293 1.17 gwr * Tx buffers take 1536 bytes, and fixed in number. 294 1.17 gwr * Rx buffers are 512 bytes each, variable number. 295 1.17 gwr * Need at least 1 frame for each 3 rx buffers. 296 1.17 gwr * The ratio 3bufs:2frames is a compromise. 297 1.17 gwr */ 298 1.17 gwr sc->ntxbuf = NTXBUF; /* XXX - Fix me... */ 299 1.17 gwr switch (sc->sc_msize) { 300 1.17 gwr case 16384: 301 1.17 gwr sc->nframes = 8 * 4; 302 1.17 gwr sc->nrxbuf = 8 * 6; 303 1.17 gwr break; 304 1.17 gwr case 32768: 305 1.17 gwr sc->nframes = 16 * 4; 306 1.17 gwr sc->nrxbuf = 16 * 6; 307 1.17 gwr break; 308 1.17 gwr case 65536: 309 1.17 gwr sc->nframes = 32 * 4; 310 1.17 gwr sc->nrxbuf = 32 * 6; 311 1.17 gwr break; 312 1.17 gwr default: 313 1.17 gwr sc->nframes = 0; 314 1.17 gwr } 315 1.17 gwr if (sc->nframes > MXFRAMES) 316 1.17 gwr sc->nframes = MXFRAMES; 317 1.17 gwr if (sc->nrxbuf > MXRXBUF) 318 1.17 gwr sc->nrxbuf = MXRXBUF; 319 1.9 gwr 320 1.18 gwr #ifdef IEDEBUG 321 1.51 tsutsui aprint_debug_dev(sc->sc_dev, 322 1.51 tsutsui "%dK memory, %d tx frames, %d rx frames, %d rx bufs\n", 323 1.51 tsutsui (sc->sc_msize >> 10), sc->ntxbuf, sc->nframes, sc->nrxbuf); 324 1.18 gwr #endif 325 1.9 gwr 326 1.17 gwr if ((sc->nframes <= 0) || (sc->nrxbuf <= 0)) 327 1.51 tsutsui panic("%s: weird memory size", __func__); 328 1.9 gwr 329 1.1 gwr /* 330 1.9 gwr * Setup RAM for transmit/receive 331 1.1 gwr */ 332 1.1 gwr if (ie_setupram(sc) == 0) { 333 1.51 tsutsui aprint_error(": RAM CONFIG FAILED!\n"); 334 1.1 gwr /* XXX should reclaim resources? */ 335 1.1 gwr return; 336 1.1 gwr } 337 1.1 gwr 338 1.1 gwr /* 339 1.1 gwr * Initialize and attach S/W interface 340 1.1 gwr */ 341 1.51 tsutsui strcpy(ifp->if_xname, device_xname(sc->sc_dev)); 342 1.11 thorpej ifp->if_softc = sc; 343 1.1 gwr ifp->if_start = iestart; 344 1.1 gwr ifp->if_ioctl = ieioctl; 345 1.1 gwr ifp->if_watchdog = iewatchdog; 346 1.67 msaitoh ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST; 347 1.1 gwr 348 1.1 gwr /* Attach the interface. */ 349 1.1 gwr if_attach(ifp); 350 1.62 nonaka if_deferred_start_init(ifp, NULL); 351 1.20 is ether_ifattach(ifp, sc->sc_addr); 352 1.1 gwr } 353 1.1 gwr 354 1.1 gwr /* 355 1.17 gwr * Setup IE's ram space. 356 1.17 gwr */ 357 1.68 msaitoh static int 358 1.41 chs ie_setupram(struct ie_softc *sc) 359 1.17 gwr { 360 1.17 gwr volatile struct ie_sys_conf_ptr *scp; 361 1.17 gwr volatile struct ie_int_sys_conf_ptr *iscp; 362 1.17 gwr volatile struct ie_sys_ctl_block *scb; 363 1.17 gwr int off; 364 1.17 gwr 365 1.17 gwr /* 366 1.17 gwr * Allocate from end of buffer space for 367 1.17 gwr * ISCP, SCB, and other small stuff. 368 1.17 gwr */ 369 1.17 gwr off = sc->buf_area_sz; 370 1.17 gwr off &= ~3; 371 1.17 gwr 372 1.17 gwr /* SCP (address already chosen). */ 373 1.17 gwr scp = sc->scp; 374 1.43 tsutsui (sc->sc_memset)(__UNVOLATILE(scp), 0, sizeof(*scp)); 375 1.17 gwr 376 1.17 gwr /* ISCP */ 377 1.17 gwr off -= sizeof(*iscp); 378 1.51 tsutsui iscp = (volatile void *)(sc->buf_area + off); 379 1.43 tsutsui (sc->sc_memset)(__UNVOLATILE(iscp), 0, sizeof(*iscp)); 380 1.17 gwr sc->iscp = iscp; 381 1.17 gwr 382 1.17 gwr /* SCB */ 383 1.17 gwr off -= sizeof(*scb); 384 1.51 tsutsui scb = (volatile void *)(sc->buf_area + off); 385 1.43 tsutsui (sc->sc_memset)(__UNVOLATILE(scb), 0, sizeof(*scb)); 386 1.17 gwr sc->scb = scb; 387 1.17 gwr 388 1.17 gwr /* Remainder is for buffers, etc. */ 389 1.17 gwr sc->buf_area_sz = off; 390 1.17 gwr 391 1.17 gwr /* 392 1.17 gwr * Now fill in the structures we just allocated. 393 1.17 gwr */ 394 1.17 gwr 395 1.17 gwr /* SCP: main thing is 24-bit ptr to ISCP */ 396 1.17 gwr scp->ie_bus_use = 0; /* 16-bit */ 397 1.43 tsutsui scp->ie_iscp_ptr = Swap32(vtop24(sc, __UNVOLATILE(iscp))); 398 1.17 gwr 399 1.17 gwr /* ISCP */ 400 1.17 gwr iscp->ie_busy = 1; /* ie_busy == char */ 401 1.43 tsutsui iscp->ie_scb_offset = vtop16sw(sc, __UNVOLATILE(scb)); 402 1.17 gwr iscp->ie_base = Swap32(vtop24(sc, sc->sc_maddr)); 403 1.17 gwr 404 1.17 gwr /* SCB */ 405 1.17 gwr scb->ie_command_list = SWAP(0xffff); 406 1.17 gwr scb->ie_recv_list = SWAP(0xffff); 407 1.17 gwr 408 1.17 gwr /* Other stuff is done in ieinit() */ 409 1.51 tsutsui (sc->reset_586)(sc); 410 1.51 tsutsui (sc->chan_attn)(sc); 411 1.17 gwr 412 1.17 gwr delay(100); /* wait a while... */ 413 1.17 gwr 414 1.17 gwr if (iscp->ie_busy) { 415 1.17 gwr return 0; 416 1.17 gwr } 417 1.17 gwr /* 418 1.17 gwr * Acknowledge any interrupts we may have caused... 419 1.17 gwr */ 420 1.17 gwr ie_ack(sc, IE_ST_WHENCE); 421 1.17 gwr 422 1.17 gwr return 1; 423 1.17 gwr } 424 1.17 gwr 425 1.17 gwr /* 426 1.1 gwr * Device timeout/watchdog routine. Entered if the device neglects to 427 1.1 gwr * generate an interrupt after a transmit has been started on it. 428 1.1 gwr */ 429 1.68 msaitoh static void 430 1.41 chs iewatchdog(struct ifnet *ifp) 431 1.1 gwr { 432 1.12 thorpej struct ie_softc *sc = ifp->if_softc; 433 1.1 gwr 434 1.51 tsutsui log(LOG_ERR, "%s: device timeout\n", device_xname(sc->sc_dev)); 435 1.71 thorpej if_statinc(ifp, if_oerrors); 436 1.1 gwr iereset(sc); 437 1.1 gwr } 438 1.1 gwr 439 1.1 gwr /* 440 1.1 gwr * What to do upon receipt of an interrupt. 441 1.1 gwr */ 442 1.68 msaitoh int 443 1.41 chs ie_intr(void *arg) 444 1.1 gwr { 445 1.17 gwr struct ie_softc *sc = arg; 446 1.51 tsutsui uint16_t status; 447 1.17 gwr int loopcnt; 448 1.1 gwr 449 1.1 gwr /* 450 1.1 gwr * check for parity error 451 1.1 gwr */ 452 1.1 gwr if (sc->hard_type == IE_VME) { 453 1.51 tsutsui volatile struct ievme *iev = 454 1.51 tsutsui (volatile struct ievme *)sc->sc_reg; 455 1.51 tsutsui 456 1.1 gwr if (iev->status & IEVME_PERR) { 457 1.21 fair printf("%s: parity error (ctrl 0x%x @ 0x%02x%04x)\n", 458 1.51 tsutsui device_xname(sc->sc_dev), iev->pectrl, 459 1.16 gwr iev->pectrl & IEVME_HADDR, iev->peaddr); 460 1.1 gwr iev->pectrl = iev->pectrl | IEVME_PARACK; 461 1.1 gwr } 462 1.1 gwr } 463 1.3 gwr 464 1.22 gwr status = sc->scb->ie_status; 465 1.22 gwr if ((status & IE_ST_WHENCE) == 0) 466 1.17 gwr return 0; 467 1.17 gwr 468 1.22 gwr loopcnt = sc->nframes; 469 1.51 tsutsui loop: 470 1.3 gwr /* Ack interrupts FIRST in case we receive more during the ISR. */ 471 1.22 gwr ie_ack(sc, IE_ST_WHENCE & status); 472 1.3 gwr 473 1.1 gwr if (status & (IE_ST_RECV | IE_ST_RNR)) { 474 1.1 gwr #ifdef IEDEBUG 475 1.1 gwr in_ierint++; 476 1.1 gwr if (sc->sc_debug & IED_RINT) 477 1.51 tsutsui printf("%s: rint\n", device_xname(sc->sc_dev)); 478 1.1 gwr #endif 479 1.1 gwr ierint(sc); 480 1.1 gwr #ifdef IEDEBUG 481 1.1 gwr in_ierint--; 482 1.1 gwr #endif 483 1.1 gwr } 484 1.3 gwr 485 1.1 gwr if (status & IE_ST_DONE) { 486 1.1 gwr #ifdef IEDEBUG 487 1.1 gwr in_ietint++; 488 1.1 gwr if (sc->sc_debug & IED_TINT) 489 1.51 tsutsui printf("%s: tint\n", device_xname(sc->sc_dev)); 490 1.1 gwr #endif 491 1.1 gwr ietint(sc); 492 1.1 gwr #ifdef IEDEBUG 493 1.1 gwr in_ietint--; 494 1.1 gwr #endif 495 1.1 gwr } 496 1.3 gwr 497 1.17 gwr /* 498 1.18 gwr * Receiver not ready (RNR) just means it has 499 1.18 gwr * run out of resources (buffers or frames). 500 1.18 gwr * One can easily cause this with (i.e.) spray. 501 1.19 gwr * This is not a serious error, so be silent. 502 1.17 gwr */ 503 1.1 gwr if (status & IE_ST_RNR) { 504 1.18 gwr #ifdef IEDEBUG 505 1.51 tsutsui printf("%s: receiver not ready\n", device_xname(sc->sc_dev)); 506 1.18 gwr #endif 507 1.71 thorpej if_statinc(&sc->sc_if, if_ierrors); 508 1.3 gwr iereset(sc); 509 1.1 gwr } 510 1.3 gwr 511 1.1 gwr #ifdef IEDEBUG 512 1.1 gwr if ((status & IE_ST_ALLDONE) && (sc->sc_debug & IED_CNA)) 513 1.51 tsutsui printf("%s: cna\n", device_xname(sc->sc_dev)); 514 1.1 gwr #endif 515 1.1 gwr 516 1.22 gwr status = sc->scb->ie_status; 517 1.22 gwr if (status & IE_ST_WHENCE) { 518 1.22 gwr /* It still wants service... */ 519 1.17 gwr if (--loopcnt > 0) 520 1.17 gwr goto loop; 521 1.22 gwr /* ... but we've been here long enough. */ 522 1.22 gwr log(LOG_ERR, "%s: interrupt stuck?\n", 523 1.51 tsutsui device_xname(sc->sc_dev)); 524 1.17 gwr iereset(sc); 525 1.17 gwr } 526 1.1 gwr return 1; 527 1.1 gwr } 528 1.1 gwr 529 1.1 gwr /* 530 1.1 gwr * Process a received-frame interrupt. 531 1.1 gwr */ 532 1.68 msaitoh void 533 1.41 chs ierint(struct ie_softc *sc) 534 1.1 gwr { 535 1.1 gwr volatile struct ie_sys_ctl_block *scb = sc->scb; 536 1.17 gwr int i, status; 537 1.1 gwr static int timesthru = 1024; 538 1.1 gwr 539 1.1 gwr i = sc->rfhead; 540 1.1 gwr for (;;) { 541 1.1 gwr status = sc->rframes[i]->ie_fd_status; 542 1.1 gwr 543 1.1 gwr if ((status & IE_FD_COMPLETE) && (status & IE_FD_OK)) { 544 1.1 gwr if (!--timesthru) { 545 1.71 thorpej if_statadd(&sc->sc_if, if_ierrors, 546 1.1 gwr SWAP(scb->ie_err_crc) + 547 1.1 gwr SWAP(scb->ie_err_align) + 548 1.1 gwr SWAP(scb->ie_err_resource) + 549 1.71 thorpej SWAP(scb->ie_err_overrun)); 550 1.3 gwr scb->ie_err_crc = 0; 551 1.3 gwr scb->ie_err_align = 0; 552 1.1 gwr scb->ie_err_resource = 0; 553 1.1 gwr scb->ie_err_overrun = 0; 554 1.1 gwr timesthru = 1024; 555 1.1 gwr } 556 1.1 gwr ie_readframe(sc, i); 557 1.1 gwr } else { 558 1.1 gwr if ((status & IE_FD_RNR) != 0 && 559 1.1 gwr (scb->ie_status & IE_RU_READY) == 0) { 560 1.43 tsutsui sc->rframes[0]->ie_fd_buf_desc = vtop16sw(sc, 561 1.43 tsutsui __UNVOLATILE(sc->rbuffs[0])); 562 1.43 tsutsui scb->ie_recv_list = vtop16sw(sc, 563 1.43 tsutsui __UNVOLATILE(sc->rframes[0])); 564 1.16 gwr cmd_and_wait(sc, IE_RU_START, 0, 0); 565 1.1 gwr } 566 1.1 gwr break; 567 1.1 gwr } 568 1.1 gwr i = (i + 1) % sc->nframes; 569 1.1 gwr } 570 1.1 gwr } 571 1.1 gwr 572 1.1 gwr /* 573 1.17 gwr * Process a command-complete interrupt. These are only generated by the 574 1.17 gwr * transmission of frames. This routine is deceptively simple, since most 575 1.17 gwr * of the real work is done by iestart(). 576 1.1 gwr */ 577 1.68 msaitoh void 578 1.41 chs ietint(struct ie_softc *sc) 579 1.1 gwr { 580 1.20 is struct ifnet *ifp; 581 1.17 gwr int status; 582 1.1 gwr 583 1.20 is ifp = &sc->sc_if; 584 1.20 is 585 1.17 gwr ifp->if_timer = 0; 586 1.1 gwr 587 1.3 gwr status = sc->xmit_cmds[sc->xctail]->ie_xmit_status; 588 1.1 gwr 589 1.3 gwr if (!(status & IE_STAT_COMPL) || (status & IE_STAT_BUSY)) 590 1.51 tsutsui printf("%s: command still busy!\n", __func__); 591 1.3 gwr 592 1.3 gwr if (status & IE_STAT_OK) { 593 1.71 thorpej if_statadd2(ifp, if_opackets, 1, 594 1.71 thorpej if_collisions, SWAP(status & IE_XS_MAXCOLL)); 595 1.17 gwr } else { 596 1.71 thorpej if_statinc(ifp, if_oerrors); 597 1.17 gwr /* 598 1.17 gwr * XXX 599 1.17 gwr * Check SQE and DEFERRED? 600 1.17 gwr * What if more than one bit is set? 601 1.17 gwr */ 602 1.17 gwr if (status & IE_STAT_ABORT) 603 1.51 tsutsui printf("%s: send aborted\n", device_xname(sc->sc_dev)); 604 1.17 gwr if (status & IE_XS_LATECOLL) 605 1.51 tsutsui printf("%s: late collision\n", 606 1.51 tsutsui device_xname(sc->sc_dev)); 607 1.17 gwr if (status & IE_XS_NOCARRIER) 608 1.51 tsutsui printf("%s: no carrier\n", device_xname(sc->sc_dev)); 609 1.17 gwr if (status & IE_XS_LOSTCTS) 610 1.51 tsutsui printf("%s: lost CTS\n", device_xname(sc->sc_dev)); 611 1.17 gwr if (status & IE_XS_UNDERRUN) 612 1.51 tsutsui printf("%s: DMA underrun\n", device_xname(sc->sc_dev)); 613 1.17 gwr if (status & IE_XS_EXCMAX) { 614 1.23 gwr /* Do not print this one (too noisy). */ 615 1.71 thorpej if_statadd(ifp, if_collisions, 16); 616 1.17 gwr } 617 1.1 gwr } 618 1.1 gwr 619 1.1 gwr /* 620 1.1 gwr * If multicast addresses were added or deleted while we 621 1.1 gwr * were transmitting, mc_reset() set the want_mcsetup flag 622 1.1 gwr * indicating that we should do it. 623 1.1 gwr */ 624 1.1 gwr if (sc->want_mcsetup) { 625 1.45 christos mc_setup(sc, (void *)sc->xmit_cbuffs[sc->xctail]); 626 1.1 gwr sc->want_mcsetup = 0; 627 1.1 gwr } 628 1.3 gwr 629 1.3 gwr /* Done with the buffer. */ 630 1.17 gwr sc->xmit_busy--; 631 1.3 gwr sc->xctail = (sc->xctail + 1) % NTXBUF; 632 1.1 gwr 633 1.17 gwr /* Start the next packet, if any, transmitting. */ 634 1.17 gwr if (sc->xmit_busy > 0) 635 1.17 gwr iexmit(sc); 636 1.17 gwr 637 1.62 nonaka if_schedule_deferred_start(ifp); 638 1.1 gwr } 639 1.1 gwr 640 1.1 gwr /* 641 1.1 gwr * Compare two Ether/802 addresses for equality, inlined and 642 1.1 gwr * unrolled for speed. I'd love to have an inline assembler 643 1.9 gwr * version of this... XXX: Who wanted that? mycroft? 644 1.9 gwr * I wrote one, but the following is just as efficient. 645 1.9 gwr * This expands to 10 short m68k instructions! -gwr 646 1.53 cegger * Note: use this like memcmp() 647 1.1 gwr */ 648 1.51 tsutsui static inline uint16_t 649 1.51 tsutsui ether_cmp(uint8_t *one, uint8_t *two) 650 1.1 gwr { 651 1.51 tsutsui uint16_t *a = (uint16_t *)one; 652 1.51 tsutsui uint16_t *b = (uint16_t *)two; 653 1.51 tsutsui uint16_t diff; 654 1.9 gwr 655 1.9 gwr diff = *a++ - *b++; 656 1.9 gwr diff |= *a++ - *b++; 657 1.9 gwr diff |= *a++ - *b++; 658 1.1 gwr 659 1.51 tsutsui return diff; 660 1.1 gwr } 661 1.9 gwr #define ether_equal !ether_cmp 662 1.1 gwr 663 1.1 gwr /* 664 1.1 gwr * We want to isolate the bits that have meaning... This assumes that 665 1.1 gwr * IE_RBUF_SIZE is an even power of two. If somehow the act_len exceeds 666 1.1 gwr * the size of the buffer, then we are screwed anyway. 667 1.1 gwr */ 668 1.68 msaitoh static inline int 669 1.41 chs ie_buflen(struct ie_softc *sc, int head) 670 1.1 gwr { 671 1.36 tsutsui int len; 672 1.1 gwr 673 1.17 gwr len = SWAP(sc->rbuffs[head]->ie_rbd_actual); 674 1.17 gwr len &= (IE_RBUF_SIZE | (IE_RBUF_SIZE - 1)); 675 1.51 tsutsui return len; 676 1.1 gwr } 677 1.1 gwr 678 1.68 msaitoh static inline int 679 1.41 chs ie_packet_len(struct ie_softc *sc) 680 1.1 gwr { 681 1.17 gwr int i; 682 1.17 gwr int head = sc->rbhead; 683 1.17 gwr int acc = 0; 684 1.1 gwr 685 1.1 gwr do { 686 1.51 tsutsui if ((sc->rbuffs[sc->rbhead]->ie_rbd_actual & IE_RBD_USED) 687 1.51 tsutsui == 0) { 688 1.1 gwr #ifdef IEDEBUG 689 1.1 gwr print_rbd(sc->rbuffs[sc->rbhead]); 690 1.1 gwr #endif 691 1.51 tsutsui log(LOG_ERR, 692 1.51 tsutsui "%s: receive descriptors out of sync at %d\n", 693 1.51 tsutsui device_xname(sc->sc_dev), sc->rbhead); 694 1.1 gwr iereset(sc); 695 1.1 gwr return -1; 696 1.1 gwr } 697 1.3 gwr 698 1.1 gwr i = sc->rbuffs[head]->ie_rbd_actual & IE_RBD_LAST; 699 1.1 gwr 700 1.1 gwr acc += ie_buflen(sc, head); 701 1.1 gwr head = (head + 1) % sc->nrxbuf; 702 1.51 tsutsui } while (i == 0); 703 1.1 gwr 704 1.1 gwr return acc; 705 1.1 gwr } 706 1.1 gwr 707 1.1 gwr /* 708 1.3 gwr * Setup all necessary artifacts for an XMIT command, and then pass the XMIT 709 1.3 gwr * command to the chip to be executed. On the way, if we have a BPF listener 710 1.3 gwr * also give him a copy. 711 1.3 gwr */ 712 1.68 msaitoh static void 713 1.41 chs iexmit(struct ie_softc *sc) 714 1.3 gwr { 715 1.20 is struct ifnet *ifp; 716 1.20 is 717 1.20 is ifp = &sc->sc_if; 718 1.3 gwr 719 1.17 gwr #ifdef IEDEBUG 720 1.17 gwr if (sc->sc_debug & IED_XMIT) 721 1.51 tsutsui printf("%s: xmit buffer %d\n", device_xname(sc->sc_dev), 722 1.17 gwr sc->xctail); 723 1.17 gwr #endif 724 1.17 gwr 725 1.3 gwr sc->xmit_buffs[sc->xctail]->ie_xmit_flags |= IE_XMIT_LAST; 726 1.3 gwr sc->xmit_buffs[sc->xctail]->ie_xmit_next = SWAP(0xffff); 727 1.17 gwr sc->xmit_buffs[sc->xctail]->ie_xmit_buf = 728 1.17 gwr Swap32(vtop24(sc, sc->xmit_cbuffs[sc->xctail])); 729 1.3 gwr 730 1.3 gwr sc->xmit_cmds[sc->xctail]->com.ie_cmd_link = SWAP(0xffff); 731 1.3 gwr sc->xmit_cmds[sc->xctail]->com.ie_cmd_cmd = 732 1.17 gwr IE_CMD_XMIT | IE_CMD_INTR | IE_CMD_LAST; 733 1.3 gwr 734 1.3 gwr sc->xmit_cmds[sc->xctail]->ie_xmit_status = SWAP(0); 735 1.3 gwr sc->xmit_cmds[sc->xctail]->ie_xmit_desc = 736 1.43 tsutsui vtop16sw(sc, __UNVOLATILE(sc->xmit_buffs[sc->xctail])); 737 1.3 gwr 738 1.68 msaitoh sc->scb->ie_command_list = 739 1.43 tsutsui vtop16sw(sc, __UNVOLATILE(sc->xmit_cmds[sc->xctail])); 740 1.16 gwr cmd_and_wait(sc, IE_CU_START, 0, 0); 741 1.3 gwr 742 1.20 is ifp->if_timer = 5; 743 1.3 gwr } 744 1.3 gwr 745 1.3 gwr /* 746 1.1 gwr * Read data off the interface, and turn it into an mbuf chain. 747 1.1 gwr * 748 1.1 gwr * This code is DRAMATICALLY different from the previous version; this 749 1.1 gwr * version tries to allocate the entire mbuf chain up front, given the 750 1.1 gwr * length of the data available. This enables us to allocate mbuf 751 1.1 gwr * clusters in many situations where before we would have had a long 752 1.1 gwr * chain of partially-full mbufs. This should help to speed up the 753 1.1 gwr * operation considerably. (Provided that it works, of course.) 754 1.1 gwr */ 755 1.17 gwr static inline struct mbuf * 756 1.60 ozaki ieget(struct ie_softc *sc) 757 1.1 gwr { 758 1.17 gwr struct mbuf *top, **mp, *m; 759 1.17 gwr int len, totlen, resid; 760 1.17 gwr int thisrboff, thismboff; 761 1.17 gwr int head; 762 1.30 thorpej struct ether_header eh; 763 1.1 gwr 764 1.1 gwr totlen = ie_packet_len(sc); 765 1.1 gwr if (totlen <= 0) 766 1.17 gwr return 0; 767 1.1 gwr 768 1.17 gwr head = sc->rbhead; 769 1.1 gwr 770 1.1 gwr /* 771 1.1 gwr * Snarf the Ethernet header. 772 1.1 gwr */ 773 1.45 christos (sc->sc_memcpy)((void *)&eh, (void *)sc->cbuffs[head], 774 1.30 thorpej sizeof(struct ether_header)); 775 1.1 gwr 776 1.30 thorpej resid = totlen; 777 1.17 gwr 778 1.17 gwr MGETHDR(m, M_DONTWAIT, MT_DATA); 779 1.17 gwr if (m == 0) 780 1.17 gwr return 0; 781 1.3 gwr 782 1.58 ozaki m_set_rcvif(m, &sc->sc_if); 783 1.17 gwr m->m_pkthdr.len = totlen; 784 1.17 gwr len = MHLEN; 785 1.1 gwr top = 0; 786 1.17 gwr mp = ⊤ 787 1.1 gwr 788 1.1 gwr /* 789 1.1 gwr * This loop goes through and allocates mbufs for all the data we will 790 1.1 gwr * be copying in. It does not actually do the copying yet. 791 1.1 gwr */ 792 1.17 gwr while (totlen > 0) { 793 1.1 gwr if (top) { 794 1.1 gwr MGET(m, M_DONTWAIT, MT_DATA); 795 1.17 gwr if (m == 0) { 796 1.1 gwr m_freem(top); 797 1.17 gwr return 0; 798 1.1 gwr } 799 1.17 gwr len = MLEN; 800 1.1 gwr } 801 1.17 gwr if (totlen >= MINCLSIZE) { 802 1.1 gwr MCLGET(m, M_DONTWAIT); 803 1.1 gwr if (m->m_flags & M_EXT) 804 1.17 gwr len = MCLBYTES; 805 1.1 gwr } 806 1.31 thorpej 807 1.31 thorpej if (mp == &top) { 808 1.46 tsutsui char *newdata = (char *) 809 1.31 thorpej ALIGN(m->m_data + sizeof(struct ether_header)) - 810 1.31 thorpej sizeof(struct ether_header); 811 1.59 msaitoh len -= newdata - m->m_data; 812 1.31 thorpej m->m_data = newdata; 813 1.31 thorpej } 814 1.31 thorpej 815 1.66 riastrad m->m_len = len = uimin(totlen, len); 816 1.31 thorpej 817 1.17 gwr totlen -= len; 818 1.17 gwr *mp = m; 819 1.17 gwr mp = &m->m_next; 820 1.17 gwr } 821 1.1 gwr 822 1.1 gwr m = top; 823 1.1 gwr thismboff = 0; 824 1.1 gwr 825 1.1 gwr /* 826 1.30 thorpej * Copy the Ethernet header into the mbuf chain. 827 1.30 thorpej */ 828 1.45 christos memcpy(mtod(m, void *), &eh, sizeof(struct ether_header)); 829 1.30 thorpej thismboff = sizeof(struct ether_header); 830 1.30 thorpej thisrboff = sizeof(struct ether_header); 831 1.30 thorpej resid -= sizeof(struct ether_header); 832 1.30 thorpej 833 1.30 thorpej /* 834 1.1 gwr * Now we take the mbuf chain (hopefully only one mbuf most of the 835 1.1 gwr * time) and stuff the data into it. There are no possible failures 836 1.1 gwr * at or after this point. 837 1.1 gwr */ 838 1.17 gwr while (resid > 0) { 839 1.17 gwr int thisrblen = ie_buflen(sc, head) - thisrboff; 840 1.17 gwr int thismblen = m->m_len - thismboff; 841 1.17 gwr 842 1.66 riastrad len = uimin(thisrblen, thismblen); 843 1.46 tsutsui (sc->sc_memcpy)(mtod(m, char *) + thismboff, 844 1.45 christos (void *)(sc->cbuffs[head] + thisrboff), 845 1.28 thorpej (u_int)len); 846 1.17 gwr resid -= len; 847 1.1 gwr 848 1.17 gwr if (len == thismblen) { 849 1.1 gwr m = m->m_next; 850 1.17 gwr thismboff = 0; 851 1.17 gwr } else 852 1.17 gwr thismboff += len; 853 1.17 gwr 854 1.17 gwr if (len == thisrblen) { 855 1.17 gwr head = (head + 1) % sc->nrxbuf; 856 1.17 gwr thisrboff = 0; 857 1.17 gwr } else 858 1.17 gwr thisrboff += len; 859 1.1 gwr } 860 1.1 gwr 861 1.1 gwr /* 862 1.1 gwr * Unless something changed strangely while we were doing the copy, 863 1.1 gwr * we have now copied everything in from the shared memory. 864 1.1 gwr * This means that we are done. 865 1.1 gwr */ 866 1.17 gwr return top; 867 1.1 gwr } 868 1.1 gwr 869 1.1 gwr /* 870 1.1 gwr * Read frame NUM from unit UNIT (pre-cached as IE). 871 1.1 gwr * 872 1.1 gwr * This routine reads the RFD at NUM, and copies in the buffers from 873 1.1 gwr * the list of RBD, then rotates the RBD and RFD lists so that the receiver 874 1.1 gwr * doesn't start complaining. Trailers are DROPPED---there's no point 875 1.1 gwr * in wasting time on confusing code to deal with them. Hopefully, 876 1.1 gwr * this machine will never ARP for trailers anyway. 877 1.1 gwr */ 878 1.68 msaitoh static void 879 1.41 chs ie_readframe(struct ie_softc *sc, int num) 880 1.1 gwr { 881 1.3 gwr int status; 882 1.1 gwr struct mbuf *m = 0; 883 1.1 gwr 884 1.3 gwr status = sc->rframes[num]->ie_fd_status; 885 1.1 gwr 886 1.17 gwr /* Advance the RFD list, since we're done with this descriptor. */ 887 1.1 gwr sc->rframes[num]->ie_fd_status = SWAP(0); 888 1.1 gwr sc->rframes[num]->ie_fd_last |= IE_FD_LAST; 889 1.1 gwr sc->rframes[sc->rftail]->ie_fd_last &= ~IE_FD_LAST; 890 1.1 gwr sc->rftail = (sc->rftail + 1) % sc->nframes; 891 1.1 gwr sc->rfhead = (sc->rfhead + 1) % sc->nframes; 892 1.1 gwr 893 1.3 gwr if (status & IE_FD_OK) { 894 1.60 ozaki m = ieget(sc); 895 1.17 gwr ie_drop_packet_buffer(sc); 896 1.17 gwr } 897 1.17 gwr if (m == 0) { 898 1.71 thorpej if_statinc(&sc->sc_if, if_ierrors); 899 1.17 gwr return; 900 1.1 gwr } 901 1.3 gwr 902 1.1 gwr #ifdef IEDEBUG 903 1.30 thorpej if (sc->sc_debug & IED_READFRAME) { 904 1.30 thorpej struct ether_header *eh = mtod(m, struct ether_header *); 905 1.30 thorpej 906 1.21 fair printf("%s: frame from ether %s type 0x%x\n", 907 1.51 tsutsui device_xname(sc->sc_dev), 908 1.30 thorpej ether_sprintf(eh->ether_shost), (u_int)eh->ether_type); 909 1.30 thorpej } 910 1.1 gwr #endif 911 1.1 gwr 912 1.1 gwr /* 913 1.1 gwr * Finally pass this packet up to higher layers. 914 1.1 gwr */ 915 1.57 ozaki if_percpuq_enqueue((&sc->sc_if)->if_percpuq, m); 916 1.1 gwr } 917 1.1 gwr 918 1.68 msaitoh static void 919 1.41 chs ie_drop_packet_buffer(struct ie_softc *sc) 920 1.1 gwr { 921 1.3 gwr int i; 922 1.1 gwr 923 1.1 gwr do { 924 1.1 gwr /* 925 1.1 gwr * This means we are somehow out of sync. So, we reset the 926 1.1 gwr * adapter. 927 1.1 gwr */ 928 1.51 tsutsui if ((sc->rbuffs[sc->rbhead]->ie_rbd_actual & IE_RBD_USED) 929 1.51 tsutsui == 0) { 930 1.1 gwr #ifdef IEDEBUG 931 1.1 gwr print_rbd(sc->rbuffs[sc->rbhead]); 932 1.1 gwr #endif 933 1.51 tsutsui log(LOG_ERR, 934 1.51 tsutsui "%s: receive descriptors out of sync at %d\n", 935 1.51 tsutsui device_xname(sc->sc_dev), sc->rbhead); 936 1.1 gwr iereset(sc); 937 1.1 gwr return; 938 1.1 gwr } 939 1.3 gwr 940 1.1 gwr i = sc->rbuffs[sc->rbhead]->ie_rbd_actual & IE_RBD_LAST; 941 1.1 gwr 942 1.1 gwr sc->rbuffs[sc->rbhead]->ie_rbd_length |= IE_RBD_LAST; 943 1.1 gwr sc->rbuffs[sc->rbhead]->ie_rbd_actual = SWAP(0); 944 1.1 gwr sc->rbhead = (sc->rbhead + 1) % sc->nrxbuf; 945 1.1 gwr sc->rbuffs[sc->rbtail]->ie_rbd_length &= ~IE_RBD_LAST; 946 1.1 gwr sc->rbtail = (sc->rbtail + 1) % sc->nrxbuf; 947 1.51 tsutsui } while (i == 0); 948 1.1 gwr } 949 1.1 gwr 950 1.1 gwr /* 951 1.1 gwr * Start transmission on an interface. 952 1.1 gwr */ 953 1.68 msaitoh static void 954 1.41 chs iestart(struct ifnet *ifp) 955 1.1 gwr { 956 1.11 thorpej struct ie_softc *sc = ifp->if_softc; 957 1.1 gwr struct mbuf *m0, *m; 958 1.51 tsutsui uint8_t *buffer; 959 1.51 tsutsui uint16_t len; 960 1.1 gwr 961 1.72 thorpej if ((ifp->if_flags & IFF_RUNNING) != IFF_RUNNING) 962 1.4 gwr return; 963 1.1 gwr 964 1.72 thorpej while (sc->xmit_busy < sc->ntxbuf) { 965 1.17 gwr IF_DEQUEUE(&ifp->if_snd, m0); 966 1.17 gwr if (m0 == 0) 967 1.1 gwr break; 968 1.1 gwr 969 1.17 gwr /* We need to use m->m_pkthdr.len, so require the header */ 970 1.17 gwr if ((m0->m_flags & M_PKTHDR) == 0) 971 1.51 tsutsui panic("%s: no header mbuf", __func__); 972 1.17 gwr 973 1.17 gwr /* Tap off here if there is a BPF listener. */ 974 1.65 msaitoh bpf_mtap(ifp, m0, BPF_D_OUT); 975 1.17 gwr 976 1.17 gwr #ifdef IEDEBUG 977 1.17 gwr if (sc->sc_debug & IED_ENQ) 978 1.51 tsutsui printf("%s: fill buffer %d\n", device_xname(sc->sc_dev), 979 1.17 gwr sc->xchead); 980 1.17 gwr #endif 981 1.17 gwr 982 1.3 gwr buffer = sc->xmit_cbuffs[sc->xchead]; 983 1.17 gwr for (m = m0; m != 0; m = m->m_next) { 984 1.45 christos (sc->sc_memcpy)(buffer, mtod(m, void *), m->m_len); 985 1.1 gwr buffer += m->m_len; 986 1.1 gwr } 987 1.38 bouyer if (m0->m_pkthdr.len < ETHER_MIN_LEN - ETHER_CRC_LEN) { 988 1.38 bouyer sc->sc_memset(buffer, 0, 989 1.38 bouyer ETHER_MIN_LEN - ETHER_CRC_LEN - m0->m_pkthdr.len); 990 1.38 bouyer len = ETHER_MIN_LEN - ETHER_CRC_LEN; 991 1.38 bouyer } else 992 1.38 bouyer len = m0->m_pkthdr.len; 993 1.1 gwr 994 1.1 gwr m_freem(m0); 995 1.3 gwr sc->xmit_buffs[sc->xchead]->ie_xmit_flags = SWAP(len); 996 1.1 gwr 997 1.17 gwr /* Start the first packet transmitting. */ 998 1.17 gwr if (sc->xmit_busy == 0) 999 1.17 gwr iexmit(sc); 1000 1.1 gwr 1001 1.17 gwr sc->xchead = (sc->xchead + 1) % sc->ntxbuf; 1002 1.17 gwr sc->xmit_busy++; 1003 1.1 gwr } 1004 1.1 gwr } 1005 1.1 gwr 1006 1.68 msaitoh static void 1007 1.41 chs iereset(struct ie_softc *sc) 1008 1.1 gwr { 1009 1.41 chs int s; 1010 1.41 chs 1011 1.41 chs s = splnet(); 1012 1.1 gwr 1013 1.18 gwr /* No message here. The caller does that. */ 1014 1.17 gwr iestop(sc); 1015 1.1 gwr 1016 1.1 gwr /* 1017 1.1 gwr * Stop i82586 dead in its tracks. 1018 1.1 gwr */ 1019 1.16 gwr if (cmd_and_wait(sc, IE_RU_ABORT | IE_CU_ABORT, 0, 0)) 1020 1.51 tsutsui printf("%s: abort commands timed out\n", 1021 1.51 tsutsui device_xname(sc->sc_dev)); 1022 1.1 gwr 1023 1.16 gwr if (cmd_and_wait(sc, IE_RU_DISABLE | IE_CU_STOP, 0, 0)) 1024 1.51 tsutsui printf("%s: disable commands timed out\n", 1025 1.51 tsutsui device_xname(sc->sc_dev)); 1026 1.1 gwr 1027 1.17 gwr ieinit(sc); 1028 1.1 gwr 1029 1.1 gwr splx(s); 1030 1.1 gwr } 1031 1.1 gwr 1032 1.1 gwr /* 1033 1.1 gwr * Send a command to the controller and wait for it to either 1034 1.1 gwr * complete or be accepted, depending on the command. If the 1035 1.1 gwr * command pointer is null, then pretend that the command is 1036 1.1 gwr * not an action command. If the command pointer is not null, 1037 1.1 gwr * and the command is an action command, wait for 1038 1.1 gwr * ((volatile struct ie_cmd_common *)pcmd)->ie_cmd_status & MASK 1039 1.1 gwr * to become true. 1040 1.1 gwr */ 1041 1.68 msaitoh static int 1042 1.41 chs cmd_and_wait(struct ie_softc *sc, int cmd, void *pcmd, int mask) 1043 1.1 gwr { 1044 1.1 gwr volatile struct ie_cmd_common *cc = pcmd; 1045 1.1 gwr volatile struct ie_sys_ctl_block *scb = sc->scb; 1046 1.17 gwr int tmo; 1047 1.1 gwr 1048 1.51 tsutsui scb->ie_command = (uint16_t)cmd; 1049 1.17 gwr (sc->chan_attn)(sc); 1050 1.17 gwr 1051 1.17 gwr /* Wait for the command to be accepted by the CU. */ 1052 1.17 gwr tmo = 10; 1053 1.17 gwr while (scb->ie_command && --tmo) 1054 1.17 gwr delay(10); 1055 1.17 gwr if (scb->ie_command) { 1056 1.17 gwr #ifdef IEDEBUG 1057 1.17 gwr printf("%s: cmd_and_wait, CU stuck (1)\n", 1058 1.51 tsutsui device_xname(sc->sc_dev)); 1059 1.17 gwr #endif 1060 1.17 gwr return -1; /* timed out */ 1061 1.17 gwr } 1062 1.1 gwr 1063 1.17 gwr /* 1064 1.17 gwr * If asked, also wait for it to finish. 1065 1.17 gwr */ 1066 1.1 gwr if (IE_ACTION_COMMAND(cmd) && pcmd) { 1067 1.1 gwr 1068 1.1 gwr /* 1069 1.17 gwr * According to the packet driver, the minimum timeout should 1070 1.17 gwr * be .369 seconds, which we round up to .4. 1071 1.1 gwr */ 1072 1.17 gwr tmo = 36900; 1073 1.1 gwr 1074 1.1 gwr /* 1075 1.1 gwr * Now spin-lock waiting for status. This is not a very nice 1076 1.1 gwr * thing to do, but I haven't figured out how, or indeed if, we 1077 1.1 gwr * can put the process waiting for action to sleep. (We may 1078 1.1 gwr * be getting called through some other timeout running in the 1079 1.1 gwr * kernel.) 1080 1.1 gwr */ 1081 1.17 gwr while (((cc->ie_cmd_status & mask) == 0) && --tmo) 1082 1.17 gwr delay(10); 1083 1.1 gwr 1084 1.17 gwr if ((cc->ie_cmd_status & mask) == 0) { 1085 1.17 gwr #ifdef IEDEBUG 1086 1.17 gwr printf("%s: cmd_and_wait, CU stuck (2)\n", 1087 1.51 tsutsui device_xname(sc->sc_dev)); 1088 1.17 gwr #endif 1089 1.17 gwr return -1; /* timed out */ 1090 1.17 gwr } 1091 1.1 gwr } 1092 1.17 gwr return 0; 1093 1.1 gwr } 1094 1.1 gwr 1095 1.1 gwr /* 1096 1.17 gwr * Run the time-domain reflectometer. 1097 1.1 gwr */ 1098 1.68 msaitoh static void 1099 1.41 chs run_tdr(struct ie_softc *sc, struct ie_tdr_cmd *cmd) 1100 1.1 gwr { 1101 1.3 gwr int result; 1102 1.1 gwr 1103 1.1 gwr cmd->com.ie_cmd_status = SWAP(0); 1104 1.1 gwr cmd->com.ie_cmd_cmd = IE_CMD_TDR | IE_CMD_LAST; 1105 1.1 gwr cmd->com.ie_cmd_link = SWAP(0xffff); 1106 1.1 gwr 1107 1.17 gwr sc->scb->ie_command_list = vtop16sw(sc, cmd); 1108 1.1 gwr cmd->ie_tdr_time = SWAP(0); 1109 1.1 gwr 1110 1.16 gwr if (cmd_and_wait(sc, IE_CU_START, cmd, IE_STAT_COMPL) || 1111 1.51 tsutsui (cmd->com.ie_cmd_status & IE_STAT_OK) == 0) 1112 1.17 gwr result = 0x10000; /* impossible value */ 1113 1.1 gwr else 1114 1.1 gwr result = cmd->ie_tdr_time; 1115 1.1 gwr 1116 1.1 gwr ie_ack(sc, IE_ST_WHENCE); 1117 1.1 gwr 1118 1.1 gwr if (result & IE_TDR_SUCCESS) 1119 1.1 gwr return; 1120 1.1 gwr 1121 1.1 gwr if (result & 0x10000) { 1122 1.51 tsutsui printf("%s: TDR command failed\n", device_xname(sc->sc_dev)); 1123 1.1 gwr } else if (result & IE_TDR_XCVR) { 1124 1.51 tsutsui printf("%s: transceiver problem\n", device_xname(sc->sc_dev)); 1125 1.1 gwr } else if (result & IE_TDR_OPEN) { 1126 1.14 christos printf("%s: TDR detected an open %d clocks away\n", 1127 1.51 tsutsui device_xname(sc->sc_dev), SWAP(result & IE_TDR_TIME)); 1128 1.1 gwr } else if (result & IE_TDR_SHORT) { 1129 1.14 christos printf("%s: TDR detected a short %d clocks away\n", 1130 1.51 tsutsui device_xname(sc->sc_dev), SWAP(result & IE_TDR_TIME)); 1131 1.1 gwr } else { 1132 1.21 fair printf("%s: TDR returned unknown status 0x%x\n", 1133 1.51 tsutsui device_xname(sc->sc_dev), result); 1134 1.1 gwr } 1135 1.1 gwr } 1136 1.1 gwr 1137 1.1 gwr /* 1138 1.17 gwr * iememinit: set up the buffers 1139 1.1 gwr * 1140 1.1 gwr * we have a block of KVA at sc->buf_area which is of size sc->buf_area_sz. 1141 1.74 andvar * this is to be used for the buffers. the chip indexes its control data 1142 1.1 gwr * structures with 16 bit offsets, and it indexes actual buffers with 1143 1.1 gwr * 24 bit addresses. so we should allocate control buffers first so that 1144 1.1 gwr * we don't overflow the 16 bit offset field. The number of transmit 1145 1.1 gwr * buffers is fixed at compile time. 1146 1.1 gwr * 1147 1.1 gwr * note: this function was written to be easy to understand, rather than 1148 1.1 gwr * highly efficient (it isn't in the critical path). 1149 1.17 gwr * 1150 1.17 gwr * The memory layout is: tbufs, rbufs, (gap), control blocks 1151 1.17 gwr * [tbuf0, tbuf1] [rbuf0,...rbufN] gap [rframes] [tframes] 1152 1.17 gwr * XXX - This needs review... 1153 1.1 gwr */ 1154 1.68 msaitoh static void 1155 1.41 chs iememinit(struct ie_softc *sc) 1156 1.1 gwr { 1157 1.51 tsutsui uint8_t *ptr; 1158 1.17 gwr int i; 1159 1.51 tsutsui uint16_t nxt; 1160 1.1 gwr 1161 1.17 gwr /* First, zero all the memory. */ 1162 1.17 gwr ptr = sc->buf_area; 1163 1.28 thorpej (sc->sc_memset)(ptr, 0, sc->buf_area_sz); 1164 1.1 gwr 1165 1.17 gwr /* Allocate tx/rx buffers. */ 1166 1.17 gwr for (i = 0; i < NTXBUF; i++) { 1167 1.17 gwr sc->xmit_cbuffs[i] = ptr; 1168 1.17 gwr ptr += IE_TBUF_SIZE; 1169 1.17 gwr } 1170 1.17 gwr for (i = 0; i < sc->nrxbuf; i++) { 1171 1.17 gwr sc->cbuffs[i] = ptr; 1172 1.17 gwr ptr += IE_RBUF_SIZE; 1173 1.17 gwr } 1174 1.17 gwr 1175 1.17 gwr /* Small pad (Don't trust the chip...) */ 1176 1.17 gwr ptr += 16; 1177 1.17 gwr 1178 1.17 gwr /* Allocate and fill in xmit buffer descriptors. */ 1179 1.17 gwr for (i = 0; i < NTXBUF; i++) { 1180 1.51 tsutsui sc->xmit_buffs[i] = (volatile void *)ptr; 1181 1.17 gwr ptr = Align(ptr + sizeof(*sc->xmit_buffs[i])); 1182 1.17 gwr sc->xmit_buffs[i]->ie_xmit_buf = 1183 1.17 gwr Swap32(vtop24(sc, sc->xmit_cbuffs[i])); 1184 1.17 gwr sc->xmit_buffs[i]->ie_xmit_next = SWAP(0xffff); 1185 1.17 gwr } 1186 1.17 gwr 1187 1.17 gwr /* Allocate and fill in recv buffer descriptors. */ 1188 1.17 gwr for (i = 0; i < sc->nrxbuf; i++) { 1189 1.51 tsutsui sc->rbuffs[i] = (volatile void *)ptr; 1190 1.17 gwr ptr = Align(ptr + sizeof(*sc->rbuffs[i])); 1191 1.68 msaitoh sc->rbuffs[i]->ie_rbd_buffer = 1192 1.51 tsutsui Swap32(vtop24(sc, sc->cbuffs[i])); 1193 1.17 gwr sc->rbuffs[i]->ie_rbd_length = SWAP(IE_RBUF_SIZE); 1194 1.17 gwr } 1195 1.17 gwr 1196 1.17 gwr /* link together recv bufs and set EOL on last */ 1197 1.17 gwr i = sc->nrxbuf - 1; 1198 1.17 gwr sc->rbuffs[i]->ie_rbd_length |= IE_RBD_LAST; 1199 1.43 tsutsui nxt = vtop16sw(sc, __UNVOLATILE(sc->rbuffs[0])); 1200 1.17 gwr do { 1201 1.17 gwr sc->rbuffs[i]->ie_rbd_next = nxt; 1202 1.43 tsutsui nxt = vtop16sw(sc, __UNVOLATILE(sc->rbuffs[i])); 1203 1.17 gwr } while (--i >= 0); 1204 1.17 gwr 1205 1.17 gwr /* Allocate transmit commands. */ 1206 1.17 gwr for (i = 0; i < NTXBUF; i++) { 1207 1.51 tsutsui sc->xmit_cmds[i] = (volatile void *)ptr; 1208 1.17 gwr ptr = Align(ptr + sizeof(*sc->xmit_cmds[i])); 1209 1.17 gwr sc->xmit_cmds[i]->com.ie_cmd_link = SWAP(0xffff); 1210 1.17 gwr } 1211 1.17 gwr 1212 1.17 gwr /* Allocate receive frames. */ 1213 1.17 gwr for (i = 0; i < sc->nframes; i++) { 1214 1.51 tsutsui sc->rframes[i] = (volatile void *)ptr; 1215 1.17 gwr ptr = Align(ptr + sizeof(*sc->rframes[i])); 1216 1.17 gwr } 1217 1.17 gwr 1218 1.17 gwr /* Link together recv frames and set EOL on last */ 1219 1.17 gwr i = sc->nframes - 1; 1220 1.17 gwr sc->rframes[i]->ie_fd_last |= IE_FD_LAST; 1221 1.43 tsutsui nxt = vtop16sw(sc, __UNVOLATILE(sc->rframes[0])); 1222 1.17 gwr do { 1223 1.17 gwr sc->rframes[i]->ie_fd_next = nxt; 1224 1.43 tsutsui nxt = vtop16sw(sc, __UNVOLATILE(sc->rframes[i])); 1225 1.17 gwr } while (--i >= 0); 1226 1.1 gwr 1227 1.1 gwr 1228 1.3 gwr /* Pointers to last packet sent and next available transmit buffer. */ 1229 1.3 gwr sc->xchead = sc->xctail = 0; 1230 1.3 gwr 1231 1.17 gwr /* Clear transmit-busy flag. */ 1232 1.3 gwr sc->xmit_busy = 0; 1233 1.1 gwr 1234 1.1 gwr /* 1235 1.17 gwr * Set the head and tail pointers on receive to keep track of 1236 1.17 gwr * the order in which RFDs and RBDs are used. link the 1237 1.17 gwr * recv frames and buffer into the scb. 1238 1.1 gwr */ 1239 1.1 gwr sc->rfhead = 0; 1240 1.1 gwr sc->rftail = sc->nframes - 1; 1241 1.1 gwr sc->rbhead = 0; 1242 1.1 gwr sc->rbtail = sc->nrxbuf - 1; 1243 1.1 gwr 1244 1.17 gwr sc->scb->ie_recv_list = 1245 1.43 tsutsui vtop16sw(sc, __UNVOLATILE(sc->rframes[0])); 1246 1.17 gwr sc->rframes[0]->ie_fd_buf_desc = 1247 1.43 tsutsui vtop16sw(sc, __UNVOLATILE(sc->rbuffs[0])); 1248 1.1 gwr 1249 1.17 gwr i = (ptr - sc->buf_area); 1250 1.1 gwr #ifdef IEDEBUG 1251 1.17 gwr printf("IE_DEBUG: used %d of %d bytes\n", i, sc->buf_area_sz); 1252 1.1 gwr #endif 1253 1.17 gwr if (i > sc->buf_area_sz) 1254 1.17 gwr panic("ie: iememinit, out of space"); 1255 1.1 gwr } 1256 1.1 gwr 1257 1.1 gwr /* 1258 1.1 gwr * Run the multicast setup command. 1259 1.6 mycroft * Called at splnet(). 1260 1.1 gwr */ 1261 1.68 msaitoh static int 1262 1.41 chs mc_setup(struct ie_softc *sc, void *ptr) 1263 1.1 gwr { 1264 1.17 gwr struct ie_mcast_cmd *cmd = ptr; /* XXX - Was volatile */ 1265 1.1 gwr 1266 1.1 gwr cmd->com.ie_cmd_status = SWAP(0); 1267 1.1 gwr cmd->com.ie_cmd_cmd = IE_CMD_MCAST | IE_CMD_LAST; 1268 1.1 gwr cmd->com.ie_cmd_link = SWAP(0xffff); 1269 1.1 gwr 1270 1.45 christos (sc->sc_memcpy)((void *)cmd->ie_mcast_addrs, 1271 1.45 christos (void *)sc->mcast_addrs, 1272 1.1 gwr sc->mcast_count * sizeof *sc->mcast_addrs); 1273 1.1 gwr 1274 1.1 gwr cmd->ie_mcast_bytes = 1275 1.51 tsutsui SWAP(sc->mcast_count * ETHER_ADDR_LEN); /* grrr... */ 1276 1.1 gwr 1277 1.17 gwr sc->scb->ie_command_list = vtop16sw(sc, cmd); 1278 1.16 gwr if (cmd_and_wait(sc, IE_CU_START, cmd, IE_STAT_COMPL) || 1279 1.51 tsutsui (cmd->com.ie_cmd_status & IE_STAT_OK) == 0) { 1280 1.14 christos printf("%s: multicast address setup command failed\n", 1281 1.51 tsutsui device_xname(sc->sc_dev)); 1282 1.1 gwr return 0; 1283 1.1 gwr } 1284 1.1 gwr return 1; 1285 1.1 gwr } 1286 1.1 gwr 1287 1.68 msaitoh static inline void 1288 1.41 chs ie_setup_config(struct ie_config_cmd *cmd, int promiscuous, int manchester) 1289 1.17 gwr { 1290 1.17 gwr 1291 1.17 gwr /* 1292 1.17 gwr * these are all char's so no need to byte-swap 1293 1.17 gwr */ 1294 1.17 gwr cmd->ie_config_count = 0x0c; 1295 1.17 gwr cmd->ie_fifo = 8; 1296 1.17 gwr cmd->ie_save_bad = 0x40; 1297 1.17 gwr cmd->ie_addr_len = 0x2e; 1298 1.17 gwr cmd->ie_priority = 0; 1299 1.17 gwr cmd->ie_ifs = 0x60; 1300 1.17 gwr cmd->ie_slot_low = 0; 1301 1.17 gwr cmd->ie_slot_high = 0xf2; 1302 1.17 gwr cmd->ie_promisc = promiscuous | manchester << 2; 1303 1.17 gwr cmd->ie_crs_cdt = 0; 1304 1.17 gwr cmd->ie_min_len = 64; 1305 1.17 gwr cmd->ie_junk = 0xff; 1306 1.17 gwr } 1307 1.17 gwr 1308 1.1 gwr /* 1309 1.1 gwr * This routine inits the ie. 1310 1.1 gwr * This includes executing the CONFIGURE, IA-SETUP, and MC-SETUP commands, 1311 1.1 gwr * starting the receiver unit, and clearing interrupts. 1312 1.1 gwr * 1313 1.6 mycroft * THIS ROUTINE MUST BE CALLED AT splnet() OR HIGHER. 1314 1.1 gwr */ 1315 1.68 msaitoh static int 1316 1.41 chs ieinit(struct ie_softc *sc) 1317 1.1 gwr { 1318 1.1 gwr volatile struct ie_sys_ctl_block *scb = sc->scb; 1319 1.3 gwr void *ptr; 1320 1.20 is struct ifnet *ifp; 1321 1.1 gwr 1322 1.20 is ifp = &sc->sc_if; 1323 1.17 gwr ptr = sc->buf_area; /* XXX - Use scb instead? */ 1324 1.1 gwr 1325 1.1 gwr /* 1326 1.1 gwr * Send the configure command first. 1327 1.1 gwr */ 1328 1.1 gwr { 1329 1.17 gwr struct ie_config_cmd *cmd = ptr; /* XXX - Was volatile */ 1330 1.1 gwr 1331 1.17 gwr scb->ie_command_list = vtop16sw(sc, cmd); 1332 1.1 gwr cmd->com.ie_cmd_status = SWAP(0); 1333 1.1 gwr cmd->com.ie_cmd_cmd = IE_CMD_CONFIG | IE_CMD_LAST; 1334 1.1 gwr cmd->com.ie_cmd_link = SWAP(0xffff); 1335 1.1 gwr 1336 1.17 gwr ie_setup_config(cmd, (sc->promisc != 0), 0); 1337 1.1 gwr 1338 1.16 gwr if (cmd_and_wait(sc, IE_CU_START, cmd, IE_STAT_COMPL) || 1339 1.51 tsutsui (cmd->com.ie_cmd_status & IE_STAT_OK) == 0) { 1340 1.14 christos printf("%s: configure command failed\n", 1341 1.51 tsutsui device_xname(sc->sc_dev)); 1342 1.1 gwr return 0; 1343 1.1 gwr } 1344 1.1 gwr } 1345 1.3 gwr 1346 1.1 gwr /* 1347 1.1 gwr * Now send the Individual Address Setup command. 1348 1.1 gwr */ 1349 1.1 gwr { 1350 1.17 gwr struct ie_iasetup_cmd *cmd = ptr; /* XXX - Was volatile */ 1351 1.1 gwr 1352 1.17 gwr scb->ie_command_list = vtop16sw(sc, cmd); 1353 1.1 gwr cmd->com.ie_cmd_status = SWAP(0); 1354 1.1 gwr cmd->com.ie_cmd_cmd = IE_CMD_IASETUP | IE_CMD_LAST; 1355 1.1 gwr cmd->com.ie_cmd_link = SWAP(0xffff); 1356 1.1 gwr 1357 1.45 christos (sc->sc_memcpy)((void *)&cmd->ie_address, 1358 1.47 dyoung CLLADDR(ifp->if_sadl), sizeof(cmd->ie_address)); 1359 1.1 gwr 1360 1.16 gwr if (cmd_and_wait(sc, IE_CU_START, cmd, IE_STAT_COMPL) || 1361 1.51 tsutsui (cmd->com.ie_cmd_status & IE_STAT_OK) == 0) { 1362 1.14 christos printf("%s: individual address setup command failed\n", 1363 1.51 tsutsui device_xname(sc->sc_dev)); 1364 1.1 gwr return 0; 1365 1.1 gwr } 1366 1.1 gwr } 1367 1.1 gwr 1368 1.1 gwr /* 1369 1.1 gwr * Now run the time-domain reflectometer. 1370 1.1 gwr */ 1371 1.18 gwr if (ie_run_tdr) 1372 1.18 gwr run_tdr(sc, ptr); 1373 1.1 gwr 1374 1.1 gwr /* 1375 1.1 gwr * Acknowledge any interrupts we have generated thus far. 1376 1.1 gwr */ 1377 1.1 gwr ie_ack(sc, IE_ST_WHENCE); 1378 1.1 gwr 1379 1.1 gwr /* 1380 1.1 gwr * Set up the transmit and recv buffers. 1381 1.1 gwr */ 1382 1.17 gwr iememinit(sc); 1383 1.1 gwr 1384 1.3 gwr /* tell higher levels that we are here */ 1385 1.20 is ifp->if_flags |= IFF_RUNNING; 1386 1.3 gwr 1387 1.17 gwr sc->scb->ie_recv_list = 1388 1.43 tsutsui vtop16sw(sc, __UNVOLATILE(sc->rframes[0])); 1389 1.16 gwr cmd_and_wait(sc, IE_RU_START, 0, 0); 1390 1.1 gwr 1391 1.3 gwr ie_ack(sc, IE_ST_WHENCE); 1392 1.1 gwr 1393 1.1 gwr if (sc->run_586) 1394 1.3 gwr (sc->run_586)(sc); 1395 1.1 gwr 1396 1.1 gwr return 0; 1397 1.1 gwr } 1398 1.1 gwr 1399 1.68 msaitoh static void 1400 1.41 chs iestop(struct ie_softc *sc) 1401 1.1 gwr { 1402 1.1 gwr 1403 1.16 gwr cmd_and_wait(sc, IE_RU_DISABLE, 0, 0); 1404 1.1 gwr } 1405 1.1 gwr 1406 1.68 msaitoh static int 1407 1.45 christos ieioctl(struct ifnet *ifp, u_long cmd, void *data) 1408 1.1 gwr { 1409 1.11 thorpej struct ie_softc *sc = ifp->if_softc; 1410 1.17 gwr struct ifaddr *ifa = (struct ifaddr *)data; 1411 1.17 gwr int s, error = 0; 1412 1.1 gwr 1413 1.6 mycroft s = splnet(); 1414 1.1 gwr 1415 1.1 gwr switch (cmd) { 1416 1.1 gwr 1417 1.52 dyoung case SIOCINITIFADDR: 1418 1.1 gwr ifp->if_flags |= IFF_UP; 1419 1.1 gwr 1420 1.1 gwr switch (ifa->ifa_addr->sa_family) { 1421 1.1 gwr #ifdef INET 1422 1.1 gwr case AF_INET: 1423 1.1 gwr ieinit(sc); 1424 1.20 is arp_ifinit(ifp, ifa); 1425 1.1 gwr break; 1426 1.1 gwr #endif 1427 1.1 gwr default: 1428 1.1 gwr ieinit(sc); 1429 1.1 gwr break; 1430 1.1 gwr } 1431 1.1 gwr break; 1432 1.1 gwr 1433 1.1 gwr case SIOCSIFFLAGS: 1434 1.52 dyoung if ((error = ifioctl_common(ifp, cmd, data)) != 0) 1435 1.52 dyoung break; 1436 1.1 gwr sc->promisc = ifp->if_flags & (IFF_PROMISC | IFF_ALLMULTI); 1437 1.1 gwr 1438 1.68 msaitoh switch (ifp->if_flags & (IFF_UP | IFF_RUNNING)) { 1439 1.52 dyoung case IFF_RUNNING: 1440 1.1 gwr /* 1441 1.1 gwr * If interface is marked down and it is running, then 1442 1.1 gwr * stop it. 1443 1.1 gwr */ 1444 1.1 gwr iestop(sc); 1445 1.1 gwr ifp->if_flags &= ~IFF_RUNNING; 1446 1.52 dyoung break; 1447 1.52 dyoung case IFF_UP: 1448 1.1 gwr /* 1449 1.1 gwr * If interface is marked up and it is stopped, then 1450 1.1 gwr * start it. 1451 1.1 gwr */ 1452 1.1 gwr ieinit(sc); 1453 1.52 dyoung break; 1454 1.52 dyoung default: 1455 1.1 gwr /* 1456 1.1 gwr * Reset the interface to pick up changes in any other 1457 1.1 gwr * flags that affect hardware registers. 1458 1.1 gwr */ 1459 1.1 gwr iestop(sc); 1460 1.1 gwr ieinit(sc); 1461 1.52 dyoung break; 1462 1.1 gwr } 1463 1.1 gwr #ifdef IEDEBUG 1464 1.1 gwr if (ifp->if_flags & IFF_DEBUG) 1465 1.1 gwr sc->sc_debug = IED_ALL; 1466 1.1 gwr else 1467 1.17 gwr sc->sc_debug = ie_debug_flags; 1468 1.1 gwr #endif 1469 1.1 gwr break; 1470 1.1 gwr 1471 1.1 gwr case SIOCADDMULTI: 1472 1.1 gwr case SIOCDELMULTI: 1473 1.48 dyoung if ((error = ether_ioctl(ifp, cmd, data)) == ENETRESET) { 1474 1.1 gwr /* 1475 1.1 gwr * Multicast list has changed; set the hardware filter 1476 1.1 gwr * accordingly. 1477 1.1 gwr */ 1478 1.40 thorpej if (ifp->if_flags & IFF_RUNNING) 1479 1.40 thorpej mc_reset(sc); 1480 1.1 gwr error = 0; 1481 1.1 gwr } 1482 1.1 gwr break; 1483 1.1 gwr 1484 1.1 gwr default: 1485 1.52 dyoung error = ether_ioctl(ifp, cmd, data); 1486 1.52 dyoung break; 1487 1.1 gwr } 1488 1.1 gwr splx(s); 1489 1.1 gwr return error; 1490 1.1 gwr } 1491 1.1 gwr 1492 1.68 msaitoh static void 1493 1.41 chs mc_reset(struct ie_softc *sc) 1494 1.1 gwr { 1495 1.70 msaitoh struct ethercom *ec = &sc->sc_ethercom; 1496 1.1 gwr struct ether_multi *enm; 1497 1.1 gwr struct ether_multistep step; 1498 1.20 is struct ifnet *ifp; 1499 1.20 is 1500 1.20 is ifp = &sc->sc_if; 1501 1.1 gwr 1502 1.1 gwr /* 1503 1.1 gwr * Step through the list of addresses. 1504 1.1 gwr */ 1505 1.1 gwr sc->mcast_count = 0; 1506 1.70 msaitoh ETHER_FIRST_MULTI(step, ec, enm); 1507 1.1 gwr while (enm) { 1508 1.1 gwr if (sc->mcast_count >= MAXMCAST || 1509 1.37 tsutsui ether_cmp(enm->enm_addrlo, enm->enm_addrhi) != 0) { 1510 1.20 is ifp->if_flags |= IFF_ALLMULTI; 1511 1.51 tsutsui ieioctl(ifp, SIOCSIFFLAGS, NULL); 1512 1.1 gwr goto setflag; 1513 1.1 gwr } 1514 1.37 tsutsui memcpy(&sc->mcast_addrs[sc->mcast_count], enm->enm_addrlo, 1515 1.37 tsutsui ETHER_ADDR_LEN); 1516 1.1 gwr sc->mcast_count++; 1517 1.1 gwr ETHER_NEXT_MULTI(step, enm); 1518 1.1 gwr } 1519 1.1 gwr setflag: 1520 1.70 msaitoh ETHER_UNLOCK(ec); 1521 1.1 gwr sc->want_mcsetup = 1; 1522 1.1 gwr } 1523 1.1 gwr 1524 1.1 gwr #ifdef IEDEBUG 1525 1.68 msaitoh void 1526 1.41 chs print_rbd(volatile struct ie_recv_buf_desc *rbd) 1527 1.1 gwr { 1528 1.1 gwr 1529 1.14 christos printf("RBD at %08lx:\nactual %04x, next %04x, buffer %08x\n" 1530 1.1 gwr "length %04x, mbz %04x\n", (u_long)rbd, rbd->ie_rbd_actual, 1531 1.1 gwr rbd->ie_rbd_next, rbd->ie_rbd_buffer, rbd->ie_rbd_length, 1532 1.1 gwr rbd->mbz); 1533 1.1 gwr } 1534 1.1 gwr #endif 1535