if_eg.c revision 1.97 1 /* $NetBSD: if_eg.c,v 1.97 2020/01/29 06:21:40 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.97 2020/01/29 06:21:40 thorpej Exp $");
44
45 #include "opt_inet.h"
46
47 #include <sys/param.h>
48 #include <sys/systm.h>
49 #include <sys/mbuf.h>
50 #include <sys/socket.h>
51 #include <sys/ioctl.h>
52 #include <sys/errno.h>
53 #include <sys/syslog.h>
54 #include <sys/select.h>
55 #include <sys/device.h>
56 #include <sys/rndsource.h>
57
58 #include <net/if.h>
59 #include <net/if_dl.h>
60 #include <net/if_types.h>
61 #include <net/bpf.h>
62
63 #include <net/if_ether.h>
64
65 #ifdef INET
66 #include <netinet/in.h>
67 #include <netinet/in_systm.h>
68 #include <netinet/in_var.h>
69 #include <netinet/ip.h>
70 #include <netinet/if_inarp.h>
71 #endif
72
73 #include <sys/cpu.h>
74 #include <sys/intr.h>
75 #include <sys/bus.h>
76
77 #include <dev/isa/isavar.h>
78 #include <dev/isa/if_egreg.h>
79 #include <dev/isa/elink.h>
80
81 /* for debugging convenience */
82 #ifdef EGDEBUG
83 #define DPRINTF(x) printf x
84 #else
85 #define DPRINTF(x)
86 #endif
87
88 #define EG_INLEN 10
89 #define EG_BUFLEN 0x0670
90
91 #define EG_PCBLEN 64
92
93 /*
94 * Ethernet software status per interface.
95 */
96 struct eg_softc {
97 device_t sc_dev;
98 void *sc_ih;
99 struct ethercom sc_ethercom; /* Ethernet common part */
100 bus_space_tag_t sc_iot; /* bus space identifier */
101 bus_space_handle_t sc_ioh; /* i/o handle */
102 u_int8_t eg_rom_major; /* Cards ROM version (major number) */
103 u_int8_t eg_rom_minor; /* Cards ROM version (minor number) */
104 short eg_ram; /* Amount of RAM on the card */
105 u_int8_t eg_pcb[EG_PCBLEN]; /* Primary Command Block buffer */
106 u_int8_t eg_incount; /* Number of buffers currently used */
107 void * eg_inbuf; /* Incoming packet buffer */
108 void * eg_outbuf; /* Outgoing packet buffer */
109
110 krndsource_t rnd_source;
111 };
112
113 int egprobe(device_t, cfdata_t, void *);
114 void egattach(device_t, device_t, void *);
115
116 CFATTACH_DECL_NEW(eg, sizeof(struct eg_softc),
117 egprobe, egattach, NULL, NULL);
118
119 int egintr(void *);
120 void eginit(struct eg_softc *);
121 int egioctl(struct ifnet *, u_long, void *);
122 void egrecv(struct eg_softc *);
123 void egstart(struct ifnet *);
124 void egwatchdog(struct ifnet *);
125 void egreset(struct eg_softc *);
126 void egread(struct eg_softc *, void *, int);
127 struct mbuf *egget(struct eg_softc *, void *, int);
128 void egstop(struct eg_softc *);
129
130 static inline void egprintpcb(u_int8_t *);
131 static int egoutPCB(bus_space_tag_t, bus_space_handle_t, u_int8_t);
132 static int egreadPCBstat(bus_space_tag_t, bus_space_handle_t, u_int8_t);
133 static int egreadPCBready(bus_space_tag_t, bus_space_handle_t);
134 static int egwritePCB(bus_space_tag_t, bus_space_handle_t, u_int8_t *);
135 static int egreadPCB(bus_space_tag_t, bus_space_handle_t, u_int8_t *);
136
137 /*
138 * Support stuff
139 */
140
141 static inline void
142 egprintpcb(u_int8_t *pcb)
143 {
144 int i;
145
146 for (i = 0; i < pcb[1] + 2; i++)
147 DPRINTF(("pcb[%2d] = %x\n", i, pcb[i]));
148 }
149
150 static int
151 egoutPCB(bus_space_tag_t iot, bus_space_handle_t ioh, u_int8_t b)
152 {
153 int i;
154
155 for (i=0; i < 4000; i++) {
156 if (bus_space_read_1(iot, ioh, EG_STATUS) & EG_STAT_HCRE) {
157 bus_space_write_1(iot, ioh, EG_COMMAND, b);
158 return 0;
159 }
160 delay(10);
161 }
162 DPRINTF(("egoutPCB failed\n"));
163 return 1;
164 }
165
166 static int
167 egreadPCBstat(bus_space_tag_t iot, bus_space_handle_t ioh, u_int8_t statb)
168 {
169 int i;
170
171 for (i=0; i < 5000; i++) {
172 if ((bus_space_read_1(iot, ioh, EG_STATUS) &
173 EG_PCB_STAT) != EG_PCB_NULL)
174 break;
175 delay(10);
176 }
177 if ((bus_space_read_1(iot, ioh, EG_STATUS) & EG_PCB_STAT) == statb)
178 return 0;
179 return 1;
180 }
181
182 static int
183 egreadPCBready(bus_space_tag_t iot, bus_space_handle_t ioh)
184 {
185 int i;
186
187 for (i=0; i < 10000; i++) {
188 if (bus_space_read_1(iot, ioh, EG_STATUS) & EG_STAT_ACRF)
189 return 0;
190 delay(5);
191 }
192 DPRINTF(("PCB read not ready\n"));
193 return 1;
194 }
195
196 static int
197 egwritePCB(bus_space_tag_t iot, bus_space_handle_t ioh, u_int8_t *pcb)
198 {
199 int i;
200 u_int8_t len;
201
202 bus_space_write_1(iot, ioh, EG_CONTROL,
203 (bus_space_read_1(iot, ioh, EG_CONTROL) & ~EG_PCB_STAT) | EG_PCB_NULL);
204
205 len = pcb[1] + 2;
206 for (i = 0; i < len; i++)
207 egoutPCB(iot, ioh, pcb[i]);
208
209 for (i=0; i < 4000; i++) {
210 if (bus_space_read_1(iot, ioh, EG_STATUS) & EG_STAT_HCRE)
211 break;
212 delay(10);
213 }
214
215 bus_space_write_1(iot, ioh, EG_CONTROL,
216 (bus_space_read_1(iot, ioh, EG_CONTROL) & ~EG_PCB_STAT) | EG_PCB_DONE);
217
218 egoutPCB(iot, ioh, len);
219
220 if (egreadPCBstat(iot, ioh, EG_PCB_ACCEPT))
221 return 1;
222 return 0;
223 }
224
225 static int
226 egreadPCB(bus_space_tag_t iot, bus_space_handle_t ioh, u_int8_t *pcb)
227 {
228 int i;
229
230 bus_space_write_1(iot, ioh, EG_CONTROL,
231 (bus_space_read_1(iot, ioh, EG_CONTROL) & ~EG_PCB_STAT) | EG_PCB_NULL);
232
233 memset(pcb, 0, EG_PCBLEN);
234
235 if (egreadPCBready(iot, ioh))
236 return 1;
237
238 pcb[0] = bus_space_read_1(iot, ioh, EG_COMMAND);
239
240 if (egreadPCBready(iot, ioh))
241 return 1;
242
243 pcb[1] = bus_space_read_1(iot, ioh, EG_COMMAND);
244
245 if (pcb[1] > 62) {
246 DPRINTF(("len %d too large\n", pcb[1]));
247 return 1;
248 }
249
250 for (i = 0; i < pcb[1]; i++) {
251 if (egreadPCBready(iot, ioh))
252 return 1;
253 pcb[2+i] = bus_space_read_1(iot, ioh, EG_COMMAND);
254 }
255 if (egreadPCBready(iot, ioh))
256 return 1;
257 if (egreadPCBstat(iot, ioh, EG_PCB_DONE))
258 return 1;
259 if (bus_space_read_1(iot, ioh, EG_COMMAND) != pcb[1] + 2) {
260 return 1;
261 }
262
263 bus_space_write_1(iot, ioh, EG_CONTROL,
264 (bus_space_read_1(iot, ioh, EG_CONTROL) &
265 ~EG_PCB_STAT) | EG_PCB_ACCEPT);
266
267 return 0;
268 }
269
270 /*
271 * Real stuff
272 */
273
274 int
275 egprobe(device_t parent, cfdata_t match, void *aux)
276 {
277 struct isa_attach_args *ia = aux;
278 bus_space_tag_t iot = ia->ia_iot;
279 bus_space_handle_t ioh;
280 int i, rval;
281 static u_int8_t pcb[EG_PCBLEN];
282
283 rval = 0;
284
285 /*
286 * XXX This probe is slow. If there are no ISA expansion slots,
287 * then skip it.
288 */
289 if (isa_get_slotcount() == 0)
290 return (0);
291
292 if (ia->ia_nio < 1)
293 return (0);
294 if (ia->ia_nirq < 1)
295 return (0);
296
297 if (ISA_DIRECT_CONFIG(ia))
298 return (0);
299
300 /* Disallow wildcarded i/o address. */
301 if (ia->ia_io[0].ir_addr == ISA_UNKNOWN_PORT)
302 return (0);
303
304 /* Disallow wildcarded IRQ. */
305 if (ia->ia_irq[0].ir_irq == ISA_UNKNOWN_IRQ)
306 return (0);
307
308 if ((ia->ia_io[0].ir_addr & ~0x07f0) != 0) {
309 DPRINTF(("Weird iobase %x\n", ia->ia_io[0].ir_addr));
310 return 0;
311 }
312
313 /* Map i/o space. */
314 if (bus_space_map(iot, ia->ia_io[0].ir_addr, 0x08, 0, &ioh)) {
315 DPRINTF(("egprobe: can't map i/o space in probe\n"));
316 return 0;
317 }
318
319 /* hard reset card */
320 bus_space_write_1(iot, ioh, EG_CONTROL, EG_CTL_RESET);
321 bus_space_write_1(iot, ioh, EG_CONTROL, 0);
322 for (i = 0; i < 500; i++) {
323 delay(1000);
324 if ((bus_space_read_1(iot, ioh, EG_STATUS) &
325 EG_PCB_STAT) == EG_PCB_NULL)
326 break;
327 }
328 if ((bus_space_read_1(iot, ioh, EG_STATUS) & EG_PCB_STAT) != EG_PCB_NULL) {
329 DPRINTF(("egprobe: Reset failed\n"));
330 goto out;
331 }
332 pcb[0] = EG_CMD_GETINFO; /* Get Adapter Info */
333 pcb[1] = 0;
334 if (egwritePCB(iot, ioh, pcb) != 0)
335 goto out;
336
337 if ((egreadPCB(iot, ioh, pcb) != 0) ||
338 pcb[0] != EG_RSP_GETINFO || /* Get Adapter Info Response */
339 pcb[1] != 0x0a) {
340 egprintpcb(pcb);
341 goto out;
342 }
343
344 ia->ia_nio = 1;
345 ia->ia_io[0].ir_size = 0x08;
346
347 ia->ia_nirq = 1;
348
349 ia->ia_niomem = 0;
350 ia->ia_ndrq = 0;
351
352 rval = 1;
353
354 out:
355 bus_space_unmap(iot, ioh, 0x08);
356 return rval;
357 }
358
359 void
360 egattach(device_t parent, device_t self, void *aux)
361 {
362 struct eg_softc *sc = device_private(self);
363 struct isa_attach_args *ia = aux;
364 bus_space_tag_t iot = ia->ia_iot;
365 bus_space_handle_t ioh;
366 struct ifnet *ifp = &sc->sc_ethercom.ec_if;
367 u_int8_t myaddr[ETHER_ADDR_LEN];
368
369 sc->sc_dev = self;
370
371 printf("\n");
372
373 /* Map i/o space. */
374 if (bus_space_map(iot, ia->ia_io[0].ir_addr, 0x08, 0, &ioh)) {
375 aprint_error_dev(self, "can't map i/o space\n");
376 return;
377 }
378
379 sc->sc_iot = iot;
380 sc->sc_ioh = ioh;
381
382 sc->eg_pcb[0] = EG_CMD_GETINFO; /* Get Adapter Info */
383 sc->eg_pcb[1] = 0;
384 if (egwritePCB(iot, ioh, sc->eg_pcb) != 0) {
385 aprint_error_dev(self, "error requesting adapter info\n");
386 return;
387 }
388 if (egreadPCB(iot, ioh, sc->eg_pcb) != 0) {
389 egprintpcb(sc->eg_pcb);
390 aprint_error_dev(self, "error reading adapter info\n");
391 return;
392 }
393
394 if (sc->eg_pcb[0] != EG_RSP_GETINFO || /* Get Adapter Info Response */
395 sc->eg_pcb[1] != 0x0a) {
396 egprintpcb(sc->eg_pcb);
397 aprint_error_dev(self, "bogus adapter info\n");
398 return;
399 }
400
401 sc->eg_rom_major = sc->eg_pcb[3];
402 sc->eg_rom_minor = sc->eg_pcb[2];
403 sc->eg_ram = sc->eg_pcb[6] | (sc->eg_pcb[7] << 8);
404
405 egstop(sc);
406
407 sc->eg_pcb[0] = EG_CMD_GETEADDR; /* Get Station address */
408 sc->eg_pcb[1] = 0;
409 if (egwritePCB(iot, ioh, sc->eg_pcb) != 0) {
410 aprint_error_dev(self, "can't send Get Station Address\n");
411 return;
412 }
413 if (egreadPCB(iot, ioh, sc->eg_pcb) != 0) {
414 aprint_error_dev(self, "can't read station address\n");
415 egprintpcb(sc->eg_pcb);
416 return;
417 }
418
419 /* check Get station address response */
420 if (sc->eg_pcb[0] != EG_RSP_GETEADDR || sc->eg_pcb[1] != 0x06) {
421 aprint_error_dev(self, "card responded with garbage (1)\n");
422 egprintpcb(sc->eg_pcb);
423 return;
424 }
425 memcpy(myaddr, &sc->eg_pcb[2], ETHER_ADDR_LEN);
426
427 aprint_normal_dev(self, "ROM v%d.%02d %dk address %s\n",
428 sc->eg_rom_major, sc->eg_rom_minor, sc->eg_ram,
429 ether_sprintf(myaddr));
430
431 sc->eg_pcb[0] = EG_CMD_SETEADDR; /* Set station address */
432 if (egwritePCB(iot, ioh, sc->eg_pcb) != 0) {
433 aprint_error_dev(self, "can't send Set Station Address\n");
434 return;
435 }
436 if (egreadPCB(iot, ioh, sc->eg_pcb) != 0) {
437 aprint_error_dev(self,
438 "can't read Set Station Address status\n");
439 egprintpcb(sc->eg_pcb);
440 return;
441 }
442 if (sc->eg_pcb[0] != EG_RSP_SETEADDR || sc->eg_pcb[1] != 0x02 ||
443 sc->eg_pcb[2] != 0 || sc->eg_pcb[3] != 0) {
444 aprint_error_dev(self, "card responded with garbage (2)\n");
445 egprintpcb(sc->eg_pcb);
446 return;
447 }
448
449 /* Initialize ifnet structure. */
450 strlcpy(ifp->if_xname, device_xname(sc->sc_dev), IFNAMSIZ);
451 ifp->if_softc = sc;
452 ifp->if_start = egstart;
453 ifp->if_ioctl = egioctl;
454 ifp->if_watchdog = egwatchdog;
455 ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX;
456 IFQ_SET_READY(&ifp->if_snd);
457
458 /* Now we can attach the interface. */
459 if_attach(ifp);
460 ether_ifattach(ifp, myaddr);
461
462 sc->sc_ih = isa_intr_establish(ia->ia_ic, ia->ia_irq[0].ir_irq,
463 IST_EDGE, IPL_NET, egintr, sc);
464
465 rnd_attach_source(&sc->rnd_source, device_xname(sc->sc_dev),
466 RND_TYPE_NET, RND_FLAG_DEFAULT);
467 }
468
469 void
470 eginit(struct eg_softc *sc)
471 {
472 struct ifnet *ifp = &sc->sc_ethercom.ec_if;
473 bus_space_tag_t iot = sc->sc_iot;
474 bus_space_handle_t ioh = sc->sc_ioh;
475
476 /* soft reset the board */
477 bus_space_write_1(iot, ioh, EG_CONTROL, EG_CTL_FLSH);
478 delay(100);
479 bus_space_write_1(iot, ioh, EG_CONTROL, EG_CTL_ATTN);
480 delay(100);
481 bus_space_write_1(iot, ioh, EG_CONTROL, 0);
482 delay(200);
483
484 sc->eg_pcb[0] = EG_CMD_CONFIG82586; /* Configure 82586 */
485 sc->eg_pcb[1] = 2;
486 sc->eg_pcb[2] = 3; /* receive broadcast & multicast */
487 sc->eg_pcb[3] = 0;
488 if (egwritePCB(iot, ioh, sc->eg_pcb) != 0)
489 aprint_error_dev(sc->sc_dev, "can't send Configure 82586\n");
490
491 if (egreadPCB(iot, ioh, sc->eg_pcb) != 0) {
492 aprint_error_dev(sc->sc_dev,
493 "can't read Configure 82586 status\n");
494 egprintpcb(sc->eg_pcb);
495 } else if (sc->eg_pcb[2] != 0 || sc->eg_pcb[3] != 0)
496 aprint_error_dev(sc->sc_dev,"configure card command failed\n");
497
498 if (sc->eg_inbuf == NULL) {
499 sc->eg_inbuf = malloc(EG_BUFLEN, M_TEMP, M_NOWAIT);
500 if (sc->eg_inbuf == NULL) {
501 aprint_error_dev(sc->sc_dev, "can't allocate inbuf\n");
502 panic("eginit");
503 }
504 }
505 sc->eg_incount = 0;
506
507 if (sc->eg_outbuf == NULL) {
508 sc->eg_outbuf = malloc(EG_BUFLEN, M_TEMP, M_NOWAIT);
509 if (sc->eg_outbuf == NULL) {
510 aprint_error_dev(sc->sc_dev,"can't allocate outbuf\n");
511 panic("eginit");
512 }
513 }
514
515 bus_space_write_1(iot, ioh, EG_CONTROL, EG_CTL_CMDE);
516
517 sc->eg_incount = 0;
518 egrecv(sc);
519
520 /* Interface is now `running', with no output active. */
521 ifp->if_flags |= IFF_RUNNING;
522 ifp->if_flags &= ~IFF_OACTIVE;
523
524 /* Attempt to start output, if any. */
525 egstart(ifp);
526 }
527
528 void
529 egrecv(struct eg_softc *sc)
530 {
531
532 while (sc->eg_incount < EG_INLEN) {
533 sc->eg_pcb[0] = EG_CMD_RECVPACKET;
534 sc->eg_pcb[1] = 0x08;
535 sc->eg_pcb[2] = 0; /* address not used.. we send zero */
536 sc->eg_pcb[3] = 0;
537 sc->eg_pcb[4] = 0;
538 sc->eg_pcb[5] = 0;
539 sc->eg_pcb[6] = EG_BUFLEN & 0xff; /* our buffer size */
540 sc->eg_pcb[7] = (EG_BUFLEN >> 8) & 0xff;
541 sc->eg_pcb[8] = 0; /* timeout, 0 == none */
542 sc->eg_pcb[9] = 0;
543 if (egwritePCB(sc->sc_iot, sc->sc_ioh, sc->eg_pcb) != 0)
544 break;
545 sc->eg_incount++;
546 }
547 }
548
549 void
550 egstart(struct ifnet *ifp)
551 {
552 struct eg_softc *sc = ifp->if_softc;
553 bus_space_tag_t iot = sc->sc_iot;
554 bus_space_handle_t ioh = sc->sc_ioh;
555 struct mbuf *m0, *m;
556 char *buffer;
557 int len;
558 u_int16_t *ptr;
559
560 /* Don't transmit if interface is busy or not running */
561 if ((ifp->if_flags & (IFF_RUNNING|IFF_OACTIVE)) != IFF_RUNNING)
562 return;
563
564 loop:
565 /* Dequeue the next datagram. */
566 IFQ_DEQUEUE(&ifp->if_snd, m0);
567 if (m0 == 0)
568 return;
569
570 ifp->if_flags |= IFF_OACTIVE;
571
572 /* We need to use m->m_pkthdr.len, so require the header */
573 if ((m0->m_flags & M_PKTHDR) == 0) {
574 aprint_error_dev(sc->sc_dev, "no header mbuf\n");
575 panic("egstart");
576 }
577 len = uimax(m0->m_pkthdr.len, ETHER_MIN_LEN - ETHER_CRC_LEN);
578
579 bpf_mtap(ifp, m0, BPF_D_OUT);
580
581 sc->eg_pcb[0] = EG_CMD_SENDPACKET;
582 sc->eg_pcb[1] = 0x06;
583 sc->eg_pcb[2] = 0; /* address not used, we send zero */
584 sc->eg_pcb[3] = 0;
585 sc->eg_pcb[4] = 0;
586 sc->eg_pcb[5] = 0;
587 sc->eg_pcb[6] = len; /* length of packet */
588 sc->eg_pcb[7] = len >> 8;
589 if (egwritePCB(iot, ioh, sc->eg_pcb) != 0) {
590 aprint_error_dev(sc->sc_dev,
591 "can't send Send Packet command\n");
592 if_statinc(ifp, if_oerrors);
593 ifp->if_flags &= ~IFF_OACTIVE;
594 m_freem(m0);
595 goto loop;
596 }
597
598 buffer = sc->eg_outbuf;
599 for (m = m0; m != 0; m = m->m_next) {
600 memcpy(buffer, mtod(m, void *), m->m_len);
601 buffer += m->m_len;
602 }
603 if (len > m0->m_pkthdr.len)
604 memset(buffer, 0, len - m0->m_pkthdr.len);
605
606 /* set direction bit: host -> adapter */
607 bus_space_write_1(iot, ioh, EG_CONTROL,
608 bus_space_read_1(iot, ioh, EG_CONTROL) & ~EG_CTL_DIR);
609
610 for (ptr = (u_int16_t *) sc->eg_outbuf; len > 0; len -= 2) {
611 bus_space_write_2(iot, ioh, EG_DATA, *ptr++);
612 while (!(bus_space_read_1(iot, ioh, EG_STATUS) & EG_STAT_HRDY))
613 ; /* XXX need timeout here */
614 }
615
616 m_freem(m0);
617 }
618
619 int
620 egintr(void *arg)
621 {
622 struct eg_softc *sc = arg;
623 struct ifnet *ifp = &sc->sc_ethercom.ec_if;
624 bus_space_tag_t iot = sc->sc_iot;
625 bus_space_handle_t ioh = sc->sc_ioh;
626 int i, len, serviced;
627 u_int16_t *ptr;
628
629 serviced = 0;
630
631 while (bus_space_read_1(iot, ioh, EG_STATUS) & EG_STAT_ACRF) {
632 egreadPCB(iot, ioh, sc->eg_pcb);
633 switch (sc->eg_pcb[0]) {
634 case EG_RSP_RECVPACKET:
635 len = sc->eg_pcb[6] | (sc->eg_pcb[7] << 8);
636
637 /* Set direction bit : Adapter -> host */
638 bus_space_write_1(iot, ioh, EG_CONTROL,
639 bus_space_read_1(iot, ioh, EG_CONTROL) | EG_CTL_DIR);
640
641 for (ptr = (u_int16_t *) sc->eg_inbuf;
642 len > 0; len -= 2) {
643 while (!(bus_space_read_1(iot, ioh, EG_STATUS) &
644 EG_STAT_HRDY))
645 ;
646 *ptr++ = bus_space_read_2(iot, ioh, EG_DATA);
647 }
648
649 len = sc->eg_pcb[8] | (sc->eg_pcb[9] << 8);
650 egread(sc, sc->eg_inbuf, len);
651
652 sc->eg_incount--;
653 egrecv(sc);
654 serviced = 1;
655 break;
656
657 case EG_RSP_SENDPACKET:
658 if (sc->eg_pcb[6] || sc->eg_pcb[7]) {
659 DPRINTF(("%s: packet dropped\n",
660 device_xname(sc->sc_dev)));
661 if_statinc(ifp, if_oerrors);
662 } else
663 if_statinc(ifp, if_opackets);
664 if (sc->eg_pcb[8] & 0xf)
665 if_statadd(ifp, if_collisions,
666 sc->eg_pcb[8] & 0xf);
667 sc->sc_ethercom.ec_if.if_flags &= ~IFF_OACTIVE;
668 egstart(&sc->sc_ethercom.ec_if);
669 serviced = 1;
670 break;
671
672 /* XXX byte-order and type-size bugs here... */
673 case EG_RSP_GETSTATS:
674 DPRINTF(("%s: Card Statistics\n",
675 device_xname(sc->sc_dev)));
676 memcpy(&i, &sc->eg_pcb[2], sizeof(i));
677 DPRINTF(("Receive Packets %d\n", i));
678 memcpy(&i, &sc->eg_pcb[6], sizeof(i));
679 DPRINTF(("Transmit Packets %d\n", i));
680 DPRINTF(("CRC errors %d\n",
681 *(short *) &sc->eg_pcb[10]));
682 DPRINTF(("alignment errors %d\n",
683 *(short *) &sc->eg_pcb[12]));
684 DPRINTF(("no resources errors %d\n",
685 *(short *) &sc->eg_pcb[14]));
686 DPRINTF(("overrun errors %d\n",
687 *(short *) &sc->eg_pcb[16]));
688 serviced = 1;
689 break;
690
691 default:
692 printf("%s: egintr: Unknown response %x??\n",
693 device_xname(sc->sc_dev), sc->eg_pcb[0]);
694 egprintpcb(sc->eg_pcb);
695 break;
696 }
697
698 rnd_add_uint32(&sc->rnd_source, sc->eg_pcb[0]);
699 }
700
701 return serviced;
702 }
703
704 /*
705 * Pass a packet up to the higher levels.
706 */
707 void
708 egread(struct eg_softc *sc, void *buf, int len)
709 {
710 struct ifnet *ifp = &sc->sc_ethercom.ec_if;
711 struct mbuf *m;
712
713 if (len <= sizeof(struct ether_header) ||
714 len > ETHER_MAX_LEN) {
715 aprint_error_dev(sc->sc_dev,
716 "invalid packet size %d; dropping\n", len);
717 if_statinc(ifp, if_ierrors);
718 return;
719 }
720
721 /* Pull packet off interface. */
722 m = egget(sc, buf, len);
723 if (m == 0) {
724 if_statinc(ifp, if_ierrors);
725 return;
726 }
727
728 if_percpuq_enqueue(ifp->if_percpuq, m);
729 }
730
731 /*
732 * convert buf into mbufs
733 */
734 struct mbuf *
735 egget(struct eg_softc *sc, void *buf, int totlen)
736 {
737 struct ifnet *ifp = &sc->sc_ethercom.ec_if;
738 struct mbuf *m, *m0, *newm;
739 int len;
740
741 MGETHDR(m0, M_DONTWAIT, MT_DATA);
742 if (m0 == 0)
743 return (0);
744 m_set_rcvif(m0, ifp);
745 m0->m_pkthdr.len = totlen;
746 len = MHLEN;
747 m = m0;
748
749 while (totlen > 0) {
750 if (totlen >= MINCLSIZE) {
751 MCLGET(m, M_DONTWAIT);
752 if ((m->m_flags & M_EXT) == 0)
753 goto bad;
754 len = MCLBYTES;
755 }
756
757 m->m_len = len = uimin(totlen, len);
758 memcpy(mtod(m, void *), buf, len);
759 buf = (char *)buf + len;
760
761 totlen -= len;
762 if (totlen > 0) {
763 MGET(newm, M_DONTWAIT, MT_DATA);
764 if (newm == 0)
765 goto bad;
766 len = MLEN;
767 m = m->m_next = newm;
768 }
769 }
770
771 return (m0);
772
773 bad:
774 m_freem(m0);
775 return (0);
776 }
777
778 int
779 egioctl(struct ifnet *ifp, unsigned long cmd, void *data)
780 {
781 struct eg_softc *sc = ifp->if_softc;
782 struct ifaddr *ifa = (struct ifaddr *)data;
783 int s, error = 0;
784
785 s = splnet();
786
787 switch (cmd) {
788
789 case SIOCINITIFADDR:
790 ifp->if_flags |= IFF_UP;
791
792 eginit(sc);
793 switch (ifa->ifa_addr->sa_family) {
794 #ifdef INET
795 case AF_INET:
796 arp_ifinit(ifp, ifa);
797 break;
798 #endif
799 default:
800 break;
801 }
802 break;
803
804 case SIOCSIFFLAGS:
805 if ((error = ifioctl_common(ifp, cmd, data)) != 0)
806 break;
807 /* XXX re-use ether_ioctl() */
808 switch (ifp->if_flags & (IFF_UP|IFF_RUNNING)) {
809 case IFF_RUNNING:
810 /*
811 * If interface is marked down and it is running, then
812 * stop it.
813 */
814 egstop(sc);
815 ifp->if_flags &= ~IFF_RUNNING;
816 break;
817 case IFF_UP:
818 /*
819 * If interface is marked up and it is stopped, then
820 * start it.
821 */
822 eginit(sc);
823 break;
824 default:
825 sc->eg_pcb[0] = EG_CMD_GETSTATS;
826 sc->eg_pcb[1] = 0;
827 if (egwritePCB(sc->sc_iot, sc->sc_ioh, sc->eg_pcb) != 0) {
828 DPRINTF(("write error\n"));
829 }
830 /*
831 * XXX deal with flags changes:
832 * IFF_MULTICAST, IFF_PROMISC,
833 * IFF_LINK0, IFF_LINK1,
834 */
835 break;
836 }
837 break;
838
839 default:
840 error = ether_ioctl(ifp, cmd, data);
841 break;
842 }
843
844 splx(s);
845 return error;
846 }
847
848 void
849 egreset(struct eg_softc *sc)
850 {
851 int s;
852
853 DPRINTF(("%s: egreset()\n", device_xname(sc->sc_dev)));
854 s = splnet();
855 egstop(sc);
856 eginit(sc);
857 splx(s);
858 }
859
860 void
861 egwatchdog(struct ifnet *ifp)
862 {
863 struct eg_softc *sc = ifp->if_softc;
864
865 log(LOG_ERR, "%s: device timeout\n", device_xname(sc->sc_dev));
866 if_statinc(ifp, if_oerrors);
867
868 egreset(sc);
869 }
870
871 void
872 egstop(struct eg_softc *sc)
873 {
874
875 bus_space_write_1(sc->sc_iot, sc->sc_ioh, EG_CONTROL, 0);
876 }
877