if_eg.c revision 1.59 1 /* $NetBSD: if_eg.c,v 1.59 2002/10/02 02:09:18 thorpej Exp $ */
2
3 /*
4 * Copyright (c) 1993 Dean Huxley <dean (at) fsa.ca>
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 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. All advertising materials mentioning features or use of this software
16 * must display the following acknowledgement:
17 * This product includes software developed by Dean Huxley.
18 * 4. The name of Dean Huxley may not be used to endorse or promote products
19 * derived from this software without specific prior written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
24 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 */
32 /*
33 * Support for 3Com 3c505 Etherlink+ card.
34 */
35
36 /*
37 * To do:
38 * - multicast
39 * - promiscuous
40 */
41
42 #include <sys/cdefs.h>
43 __KERNEL_RCSID(0, "$NetBSD: if_eg.c,v 1.59 2002/10/02 02:09:18 thorpej Exp $");
44
45 #include "opt_inet.h"
46 #include "opt_ns.h"
47 #include "bpfilter.h"
48 #include "rnd.h"
49
50 #include <sys/param.h>
51 #include <sys/systm.h>
52 #include <sys/mbuf.h>
53 #include <sys/socket.h>
54 #include <sys/ioctl.h>
55 #include <sys/errno.h>
56 #include <sys/syslog.h>
57 #include <sys/select.h>
58 #include <sys/device.h>
59 #if NRND > 0
60 #include <sys/rnd.h>
61 #endif
62
63 #include <net/if.h>
64 #include <net/if_dl.h>
65 #include <net/if_types.h>
66
67 #include <net/if_ether.h>
68
69 #ifdef INET
70 #include <netinet/in.h>
71 #include <netinet/in_systm.h>
72 #include <netinet/in_var.h>
73 #include <netinet/ip.h>
74 #include <netinet/if_inarp.h>
75 #endif
76
77 #ifdef NS
78 #include <netns/ns.h>
79 #include <netns/ns_if.h>
80 #endif
81
82 #if NBPFILTER > 0
83 #include <net/bpf.h>
84 #include <net/bpfdesc.h>
85 #endif
86
87 #include <machine/cpu.h>
88 #include <machine/intr.h>
89 #include <machine/bus.h>
90
91 #include <dev/isa/isavar.h>
92 #include <dev/isa/if_egreg.h>
93 #include <dev/isa/elink.h>
94
95 /* for debugging convenience */
96 #ifdef EGDEBUG
97 #define DPRINTF(x) printf x
98 #else
99 #define DPRINTF(x)
100 #endif
101
102 #define EG_INLEN 10
103 #define EG_BUFLEN 0x0670
104
105 #define EG_PCBLEN 64
106
107 /*
108 * Ethernet software status per interface.
109 */
110 struct eg_softc {
111 struct device sc_dev;
112 void *sc_ih;
113 struct ethercom sc_ethercom; /* Ethernet common part */
114 bus_space_tag_t sc_iot; /* bus space identifier */
115 bus_space_handle_t sc_ioh; /* i/o handle */
116 u_int8_t eg_rom_major; /* Cards ROM version (major number) */
117 u_int8_t eg_rom_minor; /* Cards ROM version (minor number) */
118 short eg_ram; /* Amount of RAM on the card */
119 u_int8_t eg_pcb[EG_PCBLEN]; /* Primary Command Block buffer */
120 u_int8_t eg_incount; /* Number of buffers currently used */
121 caddr_t eg_inbuf; /* Incoming packet buffer */
122 caddr_t eg_outbuf; /* Outgoing packet buffer */
123
124 #if NRND > 0
125 rndsource_element_t rnd_source;
126 #endif
127 };
128
129 int egprobe __P((struct device *, struct cfdata *, void *));
130 void egattach __P((struct device *, struct device *, void *));
131
132 CFATTACH_DECL(eg, sizeof(struct eg_softc),
133 egprobe, egattach, NULL, NULL);
134
135 int egintr __P((void *));
136 void eginit __P((struct eg_softc *));
137 int egioctl __P((struct ifnet *, u_long, caddr_t));
138 void egrecv __P((struct eg_softc *));
139 void egstart __P((struct ifnet *));
140 void egwatchdog __P((struct ifnet *));
141 void egreset __P((struct eg_softc *));
142 void egread __P((struct eg_softc *, caddr_t, int));
143 struct mbuf *egget __P((struct eg_softc *, caddr_t, int));
144 void egstop __P((struct eg_softc *));
145
146 static inline void egprintpcb __P((u_int8_t *));
147 static inline void egprintstat __P((u_char));
148 static int egoutPCB __P((bus_space_tag_t, bus_space_handle_t, u_int8_t));
149 static int egreadPCBstat __P((bus_space_tag_t, bus_space_handle_t, u_int8_t));
150 static int egreadPCBready __P((bus_space_tag_t, bus_space_handle_t));
151 static int egwritePCB __P((bus_space_tag_t, bus_space_handle_t, u_int8_t *));
152 static int egreadPCB __P((bus_space_tag_t, bus_space_handle_t, u_int8_t *));
153
154 /*
155 * Support stuff
156 */
157
158 static inline void
159 egprintpcb(pcb)
160 u_int8_t *pcb;
161 {
162 int i;
163
164 for (i = 0; i < pcb[1] + 2; i++)
165 DPRINTF(("pcb[%2d] = %x\n", i, pcb[i]));
166 }
167
168
169 static inline void
170 egprintstat(b)
171 u_char b;
172 {
173 DPRINTF(("%s %s %s %s %s %s %s\n",
174 (b & EG_STAT_HCRE)?"HCRE":"",
175 (b & EG_STAT_ACRF)?"ACRF":"",
176 (b & EG_STAT_DIR )?"DIR ":"",
177 (b & EG_STAT_DONE)?"DONE":"",
178 (b & EG_STAT_ASF3)?"ASF3":"",
179 (b & EG_STAT_ASF2)?"ASF2":"",
180 (b & EG_STAT_ASF1)?"ASF1":""));
181 }
182
183 static int
184 egoutPCB(iot, ioh, b)
185 bus_space_tag_t iot;
186 bus_space_handle_t ioh;
187 u_int8_t b;
188 {
189 int i;
190
191 for (i=0; i < 4000; i++) {
192 if (bus_space_read_1(iot, ioh, EG_STATUS) & EG_STAT_HCRE) {
193 bus_space_write_1(iot, ioh, EG_COMMAND, b);
194 return 0;
195 }
196 delay(10);
197 }
198 DPRINTF(("egoutPCB failed\n"));
199 return 1;
200 }
201
202 static int
203 egreadPCBstat(iot, ioh, statb)
204 bus_space_tag_t iot;
205 bus_space_handle_t ioh;
206 u_int8_t statb;
207 {
208 int i;
209
210 for (i=0; i < 5000; i++) {
211 if ((bus_space_read_1(iot, ioh, EG_STATUS) &
212 EG_PCB_STAT) != EG_PCB_NULL)
213 break;
214 delay(10);
215 }
216 if ((bus_space_read_1(iot, ioh, EG_STATUS) & EG_PCB_STAT) == statb)
217 return 0;
218 return 1;
219 }
220
221 static int
222 egreadPCBready(iot, ioh)
223 bus_space_tag_t iot;
224 bus_space_handle_t ioh;
225 {
226 int i;
227
228 for (i=0; i < 10000; i++) {
229 if (bus_space_read_1(iot, ioh, EG_STATUS) & EG_STAT_ACRF)
230 return 0;
231 delay(5);
232 }
233 DPRINTF(("PCB read not ready\n"));
234 return 1;
235 }
236
237 static int
238 egwritePCB(iot, ioh, pcb)
239 bus_space_tag_t iot;
240 bus_space_handle_t ioh;
241 u_int8_t *pcb;
242 {
243 int i;
244 u_int8_t len;
245
246 bus_space_write_1(iot, ioh, EG_CONTROL,
247 (bus_space_read_1(iot, ioh, EG_CONTROL) & ~EG_PCB_STAT) | EG_PCB_NULL);
248
249 len = pcb[1] + 2;
250 for (i = 0; i < len; i++)
251 egoutPCB(iot, ioh, pcb[i]);
252
253 for (i=0; i < 4000; i++) {
254 if (bus_space_read_1(iot, ioh, EG_STATUS) & EG_STAT_HCRE)
255 break;
256 delay(10);
257 }
258
259 bus_space_write_1(iot, ioh, EG_CONTROL,
260 (bus_space_read_1(iot, ioh, EG_CONTROL) & ~EG_PCB_STAT) | EG_PCB_DONE);
261
262 egoutPCB(iot, ioh, len);
263
264 if (egreadPCBstat(iot, ioh, EG_PCB_ACCEPT))
265 return 1;
266 return 0;
267 }
268
269 static int
270 egreadPCB(iot, ioh, pcb)
271 bus_space_tag_t iot;
272 bus_space_handle_t ioh;
273 u_int8_t *pcb;
274 {
275 int i;
276 u_int8_t b;
277
278 bus_space_write_1(iot, ioh, EG_CONTROL,
279 (bus_space_read_1(iot, ioh, EG_CONTROL) & ~EG_PCB_STAT) | EG_PCB_NULL);
280
281 memset(pcb, 0, EG_PCBLEN);
282
283 if (egreadPCBready(iot, ioh))
284 return 1;
285
286 pcb[0] = bus_space_read_1(iot, ioh, EG_COMMAND);
287
288 if (egreadPCBready(iot, ioh))
289 return 1;
290
291 pcb[1] = bus_space_read_1(iot, ioh, EG_COMMAND);
292
293 if (pcb[1] > 62) {
294 DPRINTF(("len %d too large\n", pcb[1]));
295 return 1;
296 }
297
298 for (i = 0; i < pcb[1]; i++) {
299 if (egreadPCBready(iot, ioh))
300 return 1;
301 pcb[2+i] = bus_space_read_1(iot, ioh, EG_COMMAND);
302 }
303 if (egreadPCBready(iot, ioh))
304 return 1;
305 if (egreadPCBstat(iot, ioh, EG_PCB_DONE))
306 return 1;
307 if ((b = bus_space_read_1(iot, ioh, EG_COMMAND)) != pcb[1] + 2) {
308 DPRINTF(("%d != %d\n", b, pcb[1] + 2));
309 return 1;
310 }
311
312 bus_space_write_1(iot, ioh, EG_CONTROL,
313 (bus_space_read_1(iot, ioh, EG_CONTROL) &
314 ~EG_PCB_STAT) | EG_PCB_ACCEPT);
315
316 return 0;
317 }
318
319 /*
320 * Real stuff
321 */
322
323 int
324 egprobe(parent, match, aux)
325 struct device *parent;
326 struct cfdata *match;
327 void *aux;
328 {
329 struct isa_attach_args *ia = aux;
330 bus_space_tag_t iot = ia->ia_iot;
331 bus_space_handle_t ioh;
332 int i, rval;
333 static u_int8_t pcb[EG_PCBLEN];
334
335 rval = 0;
336
337 if (ia->ia_nio < 1)
338 return (0);
339 if (ia->ia_nirq < 1)
340 return (0);
341
342 if (ISA_DIRECT_CONFIG(ia))
343 return (0);
344
345 /* Disallow wildcarded i/o address. */
346 if (ia->ia_io[0].ir_addr == ISACF_PORT_DEFAULT)
347 return (0);
348
349 /* Disallow wildcarded IRQ. */
350 if (ia->ia_irq[0].ir_irq == ISACF_IRQ_DEFAULT)
351 return (0);
352
353 if ((ia->ia_io[0].ir_addr & ~0x07f0) != 0) {
354 DPRINTF(("Weird iobase %x\n", ia->ia_io[0].ir_addr));
355 return 0;
356 }
357
358 /* Map i/o space. */
359 if (bus_space_map(iot, ia->ia_io[0].ir_addr, 0x08, 0, &ioh)) {
360 DPRINTF(("egprobe: can't map i/o space in probe\n"));
361 return 0;
362 }
363
364 /* hard reset card */
365 bus_space_write_1(iot, ioh, EG_CONTROL, EG_CTL_RESET);
366 bus_space_write_1(iot, ioh, EG_CONTROL, 0);
367 for (i = 0; i < 5000; i++) {
368 delay(1000);
369 if ((bus_space_read_1(iot, ioh, EG_STATUS) &
370 EG_PCB_STAT) == EG_PCB_NULL)
371 break;
372 }
373 if ((bus_space_read_1(iot, ioh, EG_STATUS) & EG_PCB_STAT) != EG_PCB_NULL) {
374 DPRINTF(("egprobe: Reset failed\n"));
375 goto out;
376 }
377 pcb[0] = EG_CMD_GETINFO; /* Get Adapter Info */
378 pcb[1] = 0;
379 if (egwritePCB(iot, ioh, pcb) != 0)
380 goto out;
381
382 if ((egreadPCB(iot, ioh, pcb) != 0) ||
383 pcb[0] != EG_RSP_GETINFO || /* Get Adapter Info Response */
384 pcb[1] != 0x0a) {
385 egprintpcb(pcb);
386 goto out;
387 }
388
389 ia->ia_nio = 1;
390 ia->ia_io[0].ir_size = 0x08;
391
392 ia->ia_nirq = 1;
393
394 ia->ia_niomem = 0;
395 ia->ia_ndrq = 0;
396
397 rval = 1;
398
399 out:
400 bus_space_unmap(iot, ioh, 0x08);
401 return rval;
402 }
403
404 void
405 egattach(parent, self, aux)
406 struct device *parent, *self;
407 void *aux;
408 {
409 struct eg_softc *sc = (void *)self;
410 struct isa_attach_args *ia = aux;
411 bus_space_tag_t iot = ia->ia_iot;
412 bus_space_handle_t ioh;
413 struct ifnet *ifp = &sc->sc_ethercom.ec_if;
414 u_int8_t myaddr[ETHER_ADDR_LEN];
415
416 printf("\n");
417
418 /* Map i/o space. */
419 if (bus_space_map(iot, ia->ia_io[0].ir_addr, 0x08, 0, &ioh)) {
420 printf("%s: can't map i/o space\n", self->dv_xname);
421 return;
422 }
423
424 sc->sc_iot = iot;
425 sc->sc_ioh = ioh;
426
427 sc->eg_pcb[0] = EG_CMD_GETINFO; /* Get Adapter Info */
428 sc->eg_pcb[1] = 0;
429 if (egwritePCB(iot, ioh, sc->eg_pcb) != 0) {
430 printf("%s: error requesting adapter info\n", self->dv_xname);
431 return;
432 }
433 if (egreadPCB(iot, ioh, sc->eg_pcb) != 0) {
434 egprintpcb(sc->eg_pcb);
435 printf("%s: error reading adapter info\n", self->dv_xname);
436 return;
437 }
438
439 if (sc->eg_pcb[0] != EG_RSP_GETINFO || /* Get Adapter Info Response */
440 sc->eg_pcb[1] != 0x0a) {
441 egprintpcb(sc->eg_pcb);
442 printf("%s: bogus adapter info\n", self->dv_xname);
443 return;
444 }
445
446 sc->eg_rom_major = sc->eg_pcb[3];
447 sc->eg_rom_minor = sc->eg_pcb[2];
448 sc->eg_ram = sc->eg_pcb[6] | (sc->eg_pcb[7] << 8);
449
450 egstop(sc);
451
452 sc->eg_pcb[0] = EG_CMD_GETEADDR; /* Get Station address */
453 sc->eg_pcb[1] = 0;
454 if (egwritePCB(iot, ioh, sc->eg_pcb) != 0) {
455 printf("%s: can't send Get Station Address\n", self->dv_xname);
456 return;
457 }
458 if (egreadPCB(iot, ioh, sc->eg_pcb) != 0) {
459 printf("%s: can't read station address\n", self->dv_xname);
460 egprintpcb(sc->eg_pcb);
461 return;
462 }
463
464 /* check Get station address response */
465 if (sc->eg_pcb[0] != EG_RSP_GETEADDR || sc->eg_pcb[1] != 0x06) {
466 printf("%s: card responded with garbage (1)\n",
467 self->dv_xname);
468 egprintpcb(sc->eg_pcb);
469 return;
470 }
471 memcpy(myaddr, &sc->eg_pcb[2], ETHER_ADDR_LEN);
472
473 printf("%s: ROM v%d.%02d %dk address %s\n", self->dv_xname,
474 sc->eg_rom_major, sc->eg_rom_minor, sc->eg_ram,
475 ether_sprintf(myaddr));
476
477 sc->eg_pcb[0] = EG_CMD_SETEADDR; /* Set station address */
478 if (egwritePCB(iot, ioh, sc->eg_pcb) != 0) {
479 printf("%s: can't send Set Station Address\n", self->dv_xname);
480 return;
481 }
482 if (egreadPCB(iot, ioh, sc->eg_pcb) != 0) {
483 printf("%s: can't read Set Station Address status\n",
484 self->dv_xname);
485 egprintpcb(sc->eg_pcb);
486 return;
487 }
488 if (sc->eg_pcb[0] != EG_RSP_SETEADDR || sc->eg_pcb[1] != 0x02 ||
489 sc->eg_pcb[2] != 0 || sc->eg_pcb[3] != 0) {
490 printf("%s: card responded with garbage (2)\n",
491 self->dv_xname);
492 egprintpcb(sc->eg_pcb);
493 return;
494 }
495
496 /* Initialize ifnet structure. */
497 strcpy(ifp->if_xname, sc->sc_dev.dv_xname);
498 ifp->if_softc = sc;
499 ifp->if_start = egstart;
500 ifp->if_ioctl = egioctl;
501 ifp->if_watchdog = egwatchdog;
502 ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_NOTRAILERS;
503 IFQ_SET_READY(&ifp->if_snd);
504
505 /* Now we can attach the interface. */
506 if_attach(ifp);
507 ether_ifattach(ifp, myaddr);
508
509 sc->sc_ih = isa_intr_establish(ia->ia_ic, ia->ia_irq[0].ir_irq,
510 IST_EDGE, IPL_NET, egintr, sc);
511
512 #if NRND > 0
513 rnd_attach_source(&sc->rnd_source, sc->sc_dev.dv_xname,
514 RND_TYPE_NET, 0);
515 #endif
516 }
517
518 void
519 eginit(sc)
520 struct eg_softc *sc;
521 {
522 struct ifnet *ifp = &sc->sc_ethercom.ec_if;
523 bus_space_tag_t iot = sc->sc_iot;
524 bus_space_handle_t ioh = sc->sc_ioh;
525
526 /* soft reset the board */
527 bus_space_write_1(iot, ioh, EG_CONTROL, EG_CTL_FLSH);
528 delay(100);
529 bus_space_write_1(iot, ioh, EG_CONTROL, EG_CTL_ATTN);
530 delay(100);
531 bus_space_write_1(iot, ioh, EG_CONTROL, 0);
532 delay(200);
533
534 sc->eg_pcb[0] = EG_CMD_CONFIG82586; /* Configure 82586 */
535 sc->eg_pcb[1] = 2;
536 sc->eg_pcb[2] = 3; /* receive broadcast & multicast */
537 sc->eg_pcb[3] = 0;
538 if (egwritePCB(iot, ioh, sc->eg_pcb) != 0)
539 printf("%s: can't send Configure 82586\n",
540 sc->sc_dev.dv_xname);
541
542 if (egreadPCB(iot, ioh, sc->eg_pcb) != 0) {
543 printf("%s: can't read Configure 82586 status\n",
544 sc->sc_dev.dv_xname);
545 egprintpcb(sc->eg_pcb);
546 } else if (sc->eg_pcb[2] != 0 || sc->eg_pcb[3] != 0)
547 printf("%s: configure card command failed\n",
548 sc->sc_dev.dv_xname);
549
550 if (sc->eg_inbuf == NULL) {
551 sc->eg_inbuf = malloc(EG_BUFLEN, M_TEMP, M_NOWAIT);
552 if (sc->eg_inbuf == NULL) {
553 printf("%s: can't allocate inbuf\n",
554 sc->sc_dev.dv_xname);
555 panic("eginit");
556 }
557 }
558 sc->eg_incount = 0;
559
560 if (sc->eg_outbuf == NULL) {
561 sc->eg_outbuf = malloc(EG_BUFLEN, M_TEMP, M_NOWAIT);
562 if (sc->eg_outbuf == NULL) {
563 printf("%s: can't allocate outbuf\n",
564 sc->sc_dev.dv_xname);
565 panic("eginit");
566 }
567 }
568
569 bus_space_write_1(iot, ioh, EG_CONTROL, EG_CTL_CMDE);
570
571 sc->eg_incount = 0;
572 egrecv(sc);
573
574 /* Interface is now `running', with no output active. */
575 ifp->if_flags |= IFF_RUNNING;
576 ifp->if_flags &= ~IFF_OACTIVE;
577
578 /* Attempt to start output, if any. */
579 egstart(ifp);
580 }
581
582 void
583 egrecv(sc)
584 struct eg_softc *sc;
585 {
586
587 while (sc->eg_incount < EG_INLEN) {
588 sc->eg_pcb[0] = EG_CMD_RECVPACKET;
589 sc->eg_pcb[1] = 0x08;
590 sc->eg_pcb[2] = 0; /* address not used.. we send zero */
591 sc->eg_pcb[3] = 0;
592 sc->eg_pcb[4] = 0;
593 sc->eg_pcb[5] = 0;
594 sc->eg_pcb[6] = EG_BUFLEN & 0xff; /* our buffer size */
595 sc->eg_pcb[7] = (EG_BUFLEN >> 8) & 0xff;
596 sc->eg_pcb[8] = 0; /* timeout, 0 == none */
597 sc->eg_pcb[9] = 0;
598 if (egwritePCB(sc->sc_iot, sc->sc_ioh, sc->eg_pcb) != 0)
599 break;
600 sc->eg_incount++;
601 }
602 }
603
604 void
605 egstart(ifp)
606 struct ifnet *ifp;
607 {
608 struct eg_softc *sc = ifp->if_softc;
609 bus_space_tag_t iot = sc->sc_iot;
610 bus_space_handle_t ioh = sc->sc_ioh;
611 struct mbuf *m0, *m;
612 caddr_t buffer;
613 int len;
614 u_int16_t *ptr;
615
616 /* Don't transmit if interface is busy or not running */
617 if ((ifp->if_flags & (IFF_RUNNING|IFF_OACTIVE)) != IFF_RUNNING)
618 return;
619
620 loop:
621 /* Dequeue the next datagram. */
622 IFQ_DEQUEUE(&ifp->if_snd, m0);
623 if (m0 == 0)
624 return;
625
626 ifp->if_flags |= IFF_OACTIVE;
627
628 /* We need to use m->m_pkthdr.len, so require the header */
629 if ((m0->m_flags & M_PKTHDR) == 0) {
630 printf("%s: no header mbuf\n", sc->sc_dev.dv_xname);
631 panic("egstart");
632 }
633 len = max(m0->m_pkthdr.len, ETHER_MIN_LEN - ETHER_CRC_LEN);
634
635 #if NBPFILTER > 0
636 if (ifp->if_bpf)
637 bpf_mtap(ifp->if_bpf, m0);
638 #endif
639
640 sc->eg_pcb[0] = EG_CMD_SENDPACKET;
641 sc->eg_pcb[1] = 0x06;
642 sc->eg_pcb[2] = 0; /* address not used, we send zero */
643 sc->eg_pcb[3] = 0;
644 sc->eg_pcb[4] = 0;
645 sc->eg_pcb[5] = 0;
646 sc->eg_pcb[6] = len; /* length of packet */
647 sc->eg_pcb[7] = len >> 8;
648 if (egwritePCB(iot, ioh, sc->eg_pcb) != 0) {
649 printf("%s: can't send Send Packet command\n",
650 sc->sc_dev.dv_xname);
651 ifp->if_oerrors++;
652 ifp->if_flags &= ~IFF_OACTIVE;
653 m_freem(m0);
654 goto loop;
655 }
656
657 buffer = sc->eg_outbuf;
658 for (m = m0; m != 0; m = m->m_next) {
659 memcpy(buffer, mtod(m, caddr_t), m->m_len);
660 buffer += m->m_len;
661 }
662
663 /* set direction bit: host -> adapter */
664 bus_space_write_1(iot, ioh, EG_CONTROL,
665 bus_space_read_1(iot, ioh, EG_CONTROL) & ~EG_CTL_DIR);
666
667 for (ptr = (u_int16_t *) sc->eg_outbuf; len > 0; len -= 2) {
668 bus_space_write_2(iot, ioh, EG_DATA, *ptr++);
669 while (!(bus_space_read_1(iot, ioh, EG_STATUS) & EG_STAT_HRDY))
670 ; /* XXX need timeout here */
671 }
672
673 m_freem(m0);
674 }
675
676 int
677 egintr(arg)
678 void *arg;
679 {
680 struct eg_softc *sc = arg;
681 bus_space_tag_t iot = sc->sc_iot;
682 bus_space_handle_t ioh = sc->sc_ioh;
683 int i, len, serviced;
684 u_int16_t *ptr;
685
686 serviced = 0;
687
688 while (bus_space_read_1(iot, ioh, EG_STATUS) & EG_STAT_ACRF) {
689 egreadPCB(iot, ioh, sc->eg_pcb);
690 switch (sc->eg_pcb[0]) {
691 case EG_RSP_RECVPACKET:
692 len = sc->eg_pcb[6] | (sc->eg_pcb[7] << 8);
693
694 /* Set direction bit : Adapter -> host */
695 bus_space_write_1(iot, ioh, EG_CONTROL,
696 bus_space_read_1(iot, ioh, EG_CONTROL) | EG_CTL_DIR);
697
698 for (ptr = (u_int16_t *) sc->eg_inbuf;
699 len > 0; len -= 2) {
700 while (!(bus_space_read_1(iot, ioh, EG_STATUS) &
701 EG_STAT_HRDY))
702 ;
703 *ptr++ = bus_space_read_2(iot, ioh, EG_DATA);
704 }
705
706 len = sc->eg_pcb[8] | (sc->eg_pcb[9] << 8);
707 egread(sc, sc->eg_inbuf, len);
708
709 sc->eg_incount--;
710 egrecv(sc);
711 serviced = 1;
712 break;
713
714 case EG_RSP_SENDPACKET:
715 if (sc->eg_pcb[6] || sc->eg_pcb[7]) {
716 DPRINTF(("%s: packet dropped\n",
717 sc->sc_dev.dv_xname));
718 sc->sc_ethercom.ec_if.if_oerrors++;
719 } else
720 sc->sc_ethercom.ec_if.if_opackets++;
721 sc->sc_ethercom.ec_if.if_collisions +=
722 sc->eg_pcb[8] & 0xf;
723 sc->sc_ethercom.ec_if.if_flags &= ~IFF_OACTIVE;
724 egstart(&sc->sc_ethercom.ec_if);
725 serviced = 1;
726 break;
727
728 /* XXX byte-order and type-size bugs here... */
729 case EG_RSP_GETSTATS:
730 DPRINTF(("%s: Card Statistics\n",
731 sc->sc_dev.dv_xname));
732 memcpy(&i, &sc->eg_pcb[2], sizeof(i));
733 DPRINTF(("Receive Packets %d\n", i));
734 memcpy(&i, &sc->eg_pcb[6], sizeof(i));
735 DPRINTF(("Transmit Packets %d\n", i));
736 DPRINTF(("CRC errors %d\n",
737 *(short *) &sc->eg_pcb[10]));
738 DPRINTF(("alignment errors %d\n",
739 *(short *) &sc->eg_pcb[12]));
740 DPRINTF(("no resources errors %d\n",
741 *(short *) &sc->eg_pcb[14]));
742 DPRINTF(("overrun errors %d\n",
743 *(short *) &sc->eg_pcb[16]));
744 serviced = 1;
745 break;
746
747 default:
748 printf("%s: egintr: Unknown response %x??\n",
749 sc->sc_dev.dv_xname, sc->eg_pcb[0]);
750 egprintpcb(sc->eg_pcb);
751 break;
752 }
753
754 #if NRND > 0
755 rnd_add_uint32(&sc->rnd_source, sc->eg_pcb[0]);
756 #endif
757 }
758
759 return serviced;
760 }
761
762 /*
763 * Pass a packet up to the higher levels.
764 */
765 void
766 egread(sc, buf, len)
767 struct eg_softc *sc;
768 caddr_t buf;
769 int len;
770 {
771 struct ifnet *ifp = &sc->sc_ethercom.ec_if;
772 struct mbuf *m;
773
774 if (len <= sizeof(struct ether_header) ||
775 len > ETHER_MAX_LEN) {
776 printf("%s: invalid packet size %d; dropping\n",
777 sc->sc_dev.dv_xname, len);
778 ifp->if_ierrors++;
779 return;
780 }
781
782 /* Pull packet off interface. */
783 m = egget(sc, buf, len);
784 if (m == 0) {
785 ifp->if_ierrors++;
786 return;
787 }
788
789 ifp->if_ipackets++;
790
791 #if NBPFILTER > 0
792 /*
793 * Check if there's a BPF listener on this interface.
794 * If so, hand off the raw packet to BPF.
795 */
796 if (ifp->if_bpf)
797 bpf_mtap(ifp->if_bpf, m);
798 #endif
799
800 (*ifp->if_input)(ifp, m);
801 }
802
803 /*
804 * convert buf into mbufs
805 */
806 struct mbuf *
807 egget(sc, buf, totlen)
808 struct eg_softc *sc;
809 caddr_t buf;
810 int totlen;
811 {
812 struct ifnet *ifp = &sc->sc_ethercom.ec_if;
813 struct mbuf *m, *m0, *newm;
814 int len;
815
816 MGETHDR(m0, M_DONTWAIT, MT_DATA);
817 if (m0 == 0)
818 return (0);
819 m0->m_pkthdr.rcvif = ifp;
820 m0->m_pkthdr.len = totlen;
821 len = MHLEN;
822 m = m0;
823
824 while (totlen > 0) {
825 if (totlen >= MINCLSIZE) {
826 MCLGET(m, M_DONTWAIT);
827 if ((m->m_flags & M_EXT) == 0)
828 goto bad;
829 len = MCLBYTES;
830 }
831
832 m->m_len = len = min(totlen, len);
833 memcpy(mtod(m, caddr_t), (caddr_t)buf, len);
834 buf += len;
835
836 totlen -= len;
837 if (totlen > 0) {
838 MGET(newm, M_DONTWAIT, MT_DATA);
839 if (newm == 0)
840 goto bad;
841 len = MLEN;
842 m = m->m_next = newm;
843 }
844 }
845
846 return (m0);
847
848 bad:
849 m_freem(m0);
850 return (0);
851 }
852
853 int
854 egioctl(ifp, cmd, data)
855 struct ifnet *ifp;
856 u_long cmd;
857 caddr_t data;
858 {
859 struct eg_softc *sc = ifp->if_softc;
860 struct ifaddr *ifa = (struct ifaddr *)data;
861 int s, error = 0;
862
863 s = splnet();
864
865 switch (cmd) {
866
867 case SIOCSIFADDR:
868 ifp->if_flags |= IFF_UP;
869
870 switch (ifa->ifa_addr->sa_family) {
871 #ifdef INET
872 case AF_INET:
873 eginit(sc);
874 arp_ifinit(ifp, ifa);
875 break;
876 #endif
877 #ifdef NS
878 case AF_NS:
879 {
880 struct ns_addr *ina = &IA_SNS(ifa)->sns_addr;
881
882 if (ns_nullhost(*ina))
883 ina->x_host =
884 *(union ns_host *)LLADDR(ifp->if_sadl);
885 else
886 memcpy(LLADDR(ifp->if_sadl), ina->x_host.c_host,
887 ETHER_ADDR_LEN);
888 /* Set new address. */
889 eginit(sc);
890 break;
891 }
892 #endif
893 default:
894 eginit(sc);
895 break;
896 }
897 break;
898
899 case SIOCSIFFLAGS:
900 if ((ifp->if_flags & IFF_UP) == 0 &&
901 (ifp->if_flags & IFF_RUNNING) != 0) {
902 /*
903 * If interface is marked down and it is running, then
904 * stop it.
905 */
906 egstop(sc);
907 ifp->if_flags &= ~IFF_RUNNING;
908 } else if ((ifp->if_flags & IFF_UP) != 0 &&
909 (ifp->if_flags & IFF_RUNNING) == 0) {
910 /*
911 * If interface is marked up and it is stopped, then
912 * start it.
913 */
914 eginit(sc);
915 } else {
916 sc->eg_pcb[0] = EG_CMD_GETSTATS;
917 sc->eg_pcb[1] = 0;
918 if (egwritePCB(sc->sc_iot, sc->sc_ioh, sc->eg_pcb) != 0)
919 DPRINTF(("write error\n"));
920 /*
921 * XXX deal with flags changes:
922 * IFF_MULTICAST, IFF_PROMISC,
923 * IFF_LINK0, IFF_LINK1,
924 */
925 }
926 break;
927
928 default:
929 error = EINVAL;
930 break;
931 }
932
933 splx(s);
934 return error;
935 }
936
937 void
938 egreset(sc)
939 struct eg_softc *sc;
940 {
941 int s;
942
943 DPRINTF(("%s: egreset()\n", sc->sc_dev.dv_xname));
944 s = splnet();
945 egstop(sc);
946 eginit(sc);
947 splx(s);
948 }
949
950 void
951 egwatchdog(ifp)
952 struct ifnet *ifp;
953 {
954 struct eg_softc *sc = ifp->if_softc;
955
956 log(LOG_ERR, "%s: device timeout\n", sc->sc_dev.dv_xname);
957 sc->sc_ethercom.ec_if.if_oerrors++;
958
959 egreset(sc);
960 }
961
962 void
963 egstop(sc)
964 struct eg_softc *sc;
965 {
966
967 bus_space_write_1(sc->sc_iot, sc->sc_ioh, EG_CONTROL, 0);
968 }
969