if_eg.c revision 1.2 1 1.1 deraadt /*
2 1.1 deraadt * Copyright (c) 1993 Dean Huxley <dean (at) fsa.ca>
3 1.1 deraadt * All rights reserved.
4 1.1 deraadt *
5 1.1 deraadt * Redistribution and use in source and binary forms, with or without
6 1.1 deraadt * modification, are permitted provided that the following conditions
7 1.1 deraadt * are met:
8 1.1 deraadt * 1. Redistributions of source code must retain the above copyright
9 1.1 deraadt * notice, this list of conditions and the following disclaimer.
10 1.1 deraadt * 2. Redistributions in binary form must reproduce the above copyright
11 1.1 deraadt * notice, this list of conditions and the following disclaimer in the
12 1.1 deraadt * documentation and/or other materials provided with the distribution.
13 1.1 deraadt * 3. All advertising materials mentioning features or use of this software
14 1.1 deraadt * must display the following acknowledgement:
15 1.1 deraadt * This product includes software developed by Dean Huxley.
16 1.1 deraadt * 4. The name of Dean Huxley may not be used to endorse or promote products
17 1.1 deraadt * derived from this software without specific prior written permission.
18 1.1 deraadt *
19 1.1 deraadt * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
20 1.1 deraadt * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
21 1.1 deraadt * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
22 1.1 deraadt * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
23 1.1 deraadt * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
24 1.1 deraadt * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
25 1.1 deraadt * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
26 1.1 deraadt * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
27 1.1 deraadt * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
28 1.1 deraadt * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29 1.1 deraadt *
30 1.2 mycroft * $Id: if_eg.c,v 1.2 1994/08/23 23:40:55 mycroft Exp $
31 1.1 deraadt */
32 1.1 deraadt
33 1.1 deraadt /* To do:
34 1.1 deraadt * - multicast
35 1.1 deraadt * - promiscuous
36 1.1 deraadt */
37 1.1 deraadt #include "bpfilter.h"
38 1.1 deraadt
39 1.1 deraadt #include <sys/types.h>
40 1.1 deraadt #include <sys/param.h>
41 1.1 deraadt #include <sys/mbuf.h>
42 1.1 deraadt #include <sys/socket.h>
43 1.1 deraadt #include <sys/ioctl.h>
44 1.1 deraadt #include <sys/errno.h>
45 1.1 deraadt #include <sys/syslog.h>
46 1.1 deraadt #include <sys/select.h>
47 1.1 deraadt #include <sys/device.h>
48 1.1 deraadt
49 1.1 deraadt #include <net/if.h>
50 1.1 deraadt #include <net/netisr.h>
51 1.1 deraadt #include <net/if_dl.h>
52 1.1 deraadt #include <net/if_types.h>
53 1.1 deraadt #include <net/netisr.h>
54 1.1 deraadt
55 1.1 deraadt #ifdef INET
56 1.1 deraadt #include <netinet/in.h>
57 1.1 deraadt #include <netinet/in_systm.h>
58 1.1 deraadt #include <netinet/in_var.h>
59 1.1 deraadt #include <netinet/ip.h>
60 1.1 deraadt #include <netinet/if_ether.h>
61 1.1 deraadt #endif
62 1.1 deraadt
63 1.1 deraadt #ifdef NS
64 1.1 deraadt #include <netns/ns.h>
65 1.1 deraadt #include <netns/ns_if.h>
66 1.1 deraadt #endif
67 1.1 deraadt
68 1.1 deraadt #if NBPFILTER > 0
69 1.1 deraadt #include <net/bpf.h>
70 1.1 deraadt #include <net/bpfdesc.h>
71 1.1 deraadt #endif
72 1.1 deraadt
73 1.1 deraadt #include <machine/cpu.h>
74 1.1 deraadt #include <machine/pio.h>
75 1.1 deraadt
76 1.1 deraadt #include <i386/isa/isavar.h>
77 1.1 deraadt #include <i386/isa/if_egreg.h>
78 1.1 deraadt #include <i386/isa/elink.h>
79 1.1 deraadt
80 1.1 deraadt /* for debugging convenience */
81 1.1 deraadt #ifdef EGDEBUG
82 1.1 deraadt #define dlog(x) log x
83 1.1 deraadt #else
84 1.1 deraadt #define dlog(x)
85 1.1 deraadt #endif
86 1.1 deraadt
87 1.1 deraadt #define ETHER_MIN_LEN 64
88 1.1 deraadt #define ETHER_MAX_LEN 1518
89 1.1 deraadt #define ETHER_ADDR_LEN 6
90 1.1 deraadt
91 1.1 deraadt #define EG_INLEN 10
92 1.1 deraadt #define EG_BUFLEN 0x0670
93 1.1 deraadt
94 1.1 deraadt /*
95 1.1 deraadt * Ethernet software status per interface.
96 1.1 deraadt */
97 1.1 deraadt struct eg_softc {
98 1.1 deraadt struct device sc_dev;
99 1.1 deraadt struct intrhand sc_ih;
100 1.1 deraadt struct arpcom sc_arpcom; /* Ethernet common part */
101 1.2 mycroft u_short eg_cmd; /* Command register R/W */
102 1.2 mycroft u_short eg_ctl; /* Control register R/W (EG_CTL_*) */
103 1.2 mycroft u_short eg_stat; /* Status register R/O (EG_STAT_*) */
104 1.2 mycroft u_short eg_data; /* Data register R/W (16 bits) */
105 1.1 deraadt u_char eg_rom_major; /* Cards ROM version (major number) */
106 1.1 deraadt u_char eg_rom_minor; /* Cards ROM version (minor number) */
107 1.1 deraadt short eg_ram; /* Amount of RAM on the card */
108 1.1 deraadt u_char eg_pcb[64]; /* Primary Command Block buffer */
109 1.1 deraadt u_char eg_incount; /* Number of buffers currently used */
110 1.1 deraadt u_char *eg_inbuf; /* Incoming packet buffer */
111 1.1 deraadt u_char *eg_outbuf; /* Outgoing packet buffer */
112 1.1 deraadt };
113 1.1 deraadt
114 1.1 deraadt static int egprobe();
115 1.1 deraadt static void egattach();
116 1.1 deraadt
117 1.1 deraadt struct cfdriver egcd = {
118 1.1 deraadt NULL, "eg", egprobe, egattach, DV_IFNET, sizeof(struct eg_softc)
119 1.1 deraadt };
120 1.1 deraadt
121 1.1 deraadt int egintr __P((struct eg_softc *));
122 1.1 deraadt static void eginit __P((struct eg_softc *));
123 1.1 deraadt static int egioctl __P((struct ifnet *, int, caddr_t));
124 1.1 deraadt static int egrecv __P((struct eg_softc *));
125 1.1 deraadt static int egstart __P((struct ifnet *));
126 1.1 deraadt static int egwatchdog __P((int));
127 1.1 deraadt static void egreset __P((struct eg_softc *));
128 1.1 deraadt static inline void egread __P((struct eg_softc *, caddr_t, int));
129 1.1 deraadt static struct mbuf *egget __P((caddr_t, int, struct ifnet *));
130 1.1 deraadt static void egstop __P((struct eg_softc *));
131 1.1 deraadt
132 1.1 deraadt /*
133 1.1 deraadt * Support stuff
134 1.1 deraadt */
135 1.1 deraadt
136 1.1 deraadt static inline void
137 1.1 deraadt egprintpcb(sc)
138 1.1 deraadt struct eg_softc *sc;
139 1.1 deraadt {
140 1.1 deraadt int i;
141 1.1 deraadt
142 1.1 deraadt for (i = 0; i < sc->eg_pcb[1] + 2; i++)
143 1.1 deraadt dlog((LOG_DEBUG, "pcb[%2d] = %x\n", sc->eg_pcb[i]));
144 1.1 deraadt }
145 1.1 deraadt
146 1.1 deraadt
147 1.1 deraadt static inline void
148 1.1 deraadt egprintstat(b)
149 1.1 deraadt u_char b;
150 1.1 deraadt {
151 1.1 deraadt dlog((LOG_DEBUG, "%s %s %s %s %s %s %s\n",
152 1.1 deraadt (b & EG_STAT_HCRE)?"HCRE":"",
153 1.1 deraadt (b & EG_STAT_ACRF)?"ACRF":"",
154 1.1 deraadt (b & EG_STAT_DIR )?"DIR ":"",
155 1.1 deraadt (b & EG_STAT_DONE)?"DONE":"",
156 1.1 deraadt (b & EG_STAT_ASF3)?"ASF3":"",
157 1.1 deraadt (b & EG_STAT_ASF2)?"ASF2":"",
158 1.1 deraadt (b & EG_STAT_ASF1)?"ASF1":""));
159 1.1 deraadt }
160 1.1 deraadt
161 1.1 deraadt static int
162 1.1 deraadt egoutPCB(sc, b)
163 1.1 deraadt struct eg_softc *sc;
164 1.1 deraadt u_char b;
165 1.1 deraadt {
166 1.1 deraadt int i;
167 1.1 deraadt
168 1.1 deraadt for (i=0; i < 4000; i++) {
169 1.1 deraadt if (inb(sc->eg_stat) & EG_STAT_HCRE) {
170 1.1 deraadt outb(sc->eg_cmd, b);
171 1.1 deraadt return 0;
172 1.1 deraadt }
173 1.1 deraadt delay(10);
174 1.1 deraadt }
175 1.1 deraadt dlog((LOG_DEBUG, "egoutPCB failed\n"));
176 1.1 deraadt return 1;
177 1.1 deraadt }
178 1.1 deraadt
179 1.1 deraadt static int
180 1.1 deraadt egreadPCBstat(sc, statb)
181 1.1 deraadt struct eg_softc *sc;
182 1.1 deraadt u_char statb;
183 1.1 deraadt {
184 1.1 deraadt int i;
185 1.1 deraadt
186 1.1 deraadt for (i=0; i < 5000; i++) {
187 1.1 deraadt if (EG_PCB_STAT(inb(sc->eg_stat)))
188 1.1 deraadt break;
189 1.1 deraadt delay(10);
190 1.1 deraadt }
191 1.1 deraadt if (EG_PCB_STAT(inb(sc->eg_stat)) == statb)
192 1.1 deraadt return 0;
193 1.1 deraadt return 1;
194 1.1 deraadt }
195 1.1 deraadt
196 1.1 deraadt static int
197 1.1 deraadt egreadPCBready(sc)
198 1.1 deraadt struct eg_softc *sc;
199 1.1 deraadt {
200 1.1 deraadt int i;
201 1.1 deraadt
202 1.1 deraadt for (i=0; i < 10000; i++) {
203 1.1 deraadt if (inb(sc->eg_stat) & EG_STAT_ACRF)
204 1.1 deraadt return 0;
205 1.1 deraadt delay(5);
206 1.1 deraadt }
207 1.1 deraadt dlog((LOG_DEBUG, "PCB read not ready\n"));
208 1.1 deraadt return 1;
209 1.1 deraadt }
210 1.1 deraadt
211 1.1 deraadt static int
212 1.1 deraadt egwritePCB(sc)
213 1.1 deraadt struct eg_softc *sc;
214 1.1 deraadt {
215 1.1 deraadt int i;
216 1.1 deraadt u_char len;
217 1.1 deraadt
218 1.1 deraadt outb(sc->eg_ctl, EG_PCB_MASK(inb(sc->eg_ctl)));
219 1.1 deraadt
220 1.1 deraadt len = sc->eg_pcb[1] + 2;
221 1.1 deraadt for (i = 0; i < len; i++)
222 1.1 deraadt egoutPCB(sc, sc->eg_pcb[i]);
223 1.1 deraadt
224 1.1 deraadt for (i=0; i < 4000; i++) {
225 1.1 deraadt if (inb(sc->eg_stat) & EG_STAT_HCRE)
226 1.1 deraadt break;
227 1.1 deraadt delay(10);
228 1.1 deraadt }
229 1.1 deraadt outb(sc->eg_ctl, EG_PCB_MASK(inb(sc->eg_ctl)) | EG_PCB_DONE);
230 1.1 deraadt egoutPCB(sc, len);
231 1.1 deraadt
232 1.1 deraadt if (egreadPCBstat(sc, EG_PCB_ACCEPT))
233 1.1 deraadt return 1;
234 1.1 deraadt return 0;
235 1.1 deraadt }
236 1.1 deraadt
237 1.1 deraadt static int
238 1.1 deraadt egreadPCB(sc)
239 1.1 deraadt struct eg_softc *sc;
240 1.1 deraadt {
241 1.1 deraadt int i;
242 1.1 deraadt u_char b;
243 1.1 deraadt
244 1.1 deraadt outb(sc->eg_ctl, EG_PCB_MASK(inb(sc->eg_ctl)));
245 1.1 deraadt
246 1.1 deraadt bzero(sc->eg_pcb, sizeof(sc->eg_pcb));
247 1.1 deraadt
248 1.1 deraadt if (egreadPCBready(sc))
249 1.1 deraadt return 1;
250 1.1 deraadt
251 1.1 deraadt sc->eg_pcb[0] = inb(sc->eg_cmd);
252 1.1 deraadt
253 1.1 deraadt if (egreadPCBready(sc))
254 1.1 deraadt return 1;
255 1.1 deraadt
256 1.1 deraadt sc->eg_pcb[1] = inb(sc->eg_cmd);
257 1.1 deraadt
258 1.1 deraadt if (sc->eg_pcb[1] > 62) {
259 1.1 deraadt dlog((LOG_DEBUG, "len %d too large\n", sc->eg_pcb[1]));
260 1.1 deraadt return 1;
261 1.1 deraadt }
262 1.1 deraadt
263 1.1 deraadt for (i = 0; i < sc->eg_pcb[1]; i++) {
264 1.1 deraadt if (egreadPCBready(sc))
265 1.1 deraadt return 1;
266 1.1 deraadt sc->eg_pcb[2+i] = inb(sc->eg_cmd);
267 1.1 deraadt }
268 1.1 deraadt if (egreadPCBready(sc))
269 1.1 deraadt return 1;
270 1.1 deraadt if (egreadPCBstat(sc, EG_PCB_DONE))
271 1.1 deraadt return 1;
272 1.1 deraadt if ((b = inb(sc->eg_cmd)) != sc->eg_pcb[1]+2) {
273 1.1 deraadt dlog((LOG_DEBUG, "%d != %d\n", b, sc->eg_pcb[1]+2));
274 1.1 deraadt return 1;
275 1.1 deraadt }
276 1.2 mycroft outb(sc->eg_ctl, EG_PCB_MASK(inb(sc->eg_ctl)) | EG_PCB_ACCEPT);
277 1.1 deraadt return 0;
278 1.1 deraadt }
279 1.1 deraadt
280 1.1 deraadt /*
281 1.1 deraadt * Real stuff
282 1.1 deraadt */
283 1.1 deraadt
284 1.1 deraadt int
285 1.1 deraadt egprobe(parent, self, aux)
286 1.1 deraadt struct device *parent, *self;
287 1.1 deraadt void *aux;
288 1.1 deraadt {
289 1.2 mycroft struct eg_softc *sc = (void *)self;
290 1.1 deraadt struct isa_attach_args *ia = aux;
291 1.1 deraadt int i;
292 1.1 deraadt
293 1.2 mycroft if (ia->ia_iobase & ~0x07f0 != 0) {
294 1.1 deraadt dlog((LOG_DEBUG, "Weird iobase %x\n", ia->ia_iobase));
295 1.1 deraadt return 0;
296 1.1 deraadt }
297 1.1 deraadt
298 1.1 deraadt sc->eg_cmd = ia->ia_iobase + EG_COMMAND;
299 1.1 deraadt sc->eg_ctl = ia->ia_iobase + EG_CONTROL;
300 1.1 deraadt sc->eg_stat = ia->ia_iobase + EG_STATUS;
301 1.1 deraadt sc->eg_data = ia->ia_iobase + EG_DATA;
302 1.1 deraadt
303 1.1 deraadt /* hard reset card */
304 1.1 deraadt outb(sc->eg_ctl, EG_CTL_RESET);
305 1.1 deraadt outb(sc->eg_ctl, 0);
306 1.1 deraadt for (i = 0; i < 5000; i++) {
307 1.1 deraadt delay(1000);
308 1.1 deraadt if (EG_PCB_STAT(inb(sc->eg_stat)) == 0)
309 1.1 deraadt break;
310 1.1 deraadt }
311 1.1 deraadt if (EG_PCB_STAT(inb(sc->eg_stat)) != 0) {
312 1.1 deraadt dlog((LOG_DEBUG, "eg: Reset failed\n"));
313 1.1 deraadt return 0;
314 1.1 deraadt }
315 1.1 deraadt sc->eg_pcb[0] = EG_CMD_GETINFO; /* Get Adapter Info */
316 1.1 deraadt sc->eg_pcb[1] = 0;
317 1.1 deraadt if (egwritePCB(sc) != 0)
318 1.1 deraadt return 0;
319 1.1 deraadt
320 1.1 deraadt if (egreadPCB(sc) != 0) {
321 1.1 deraadt egprintpcb(sc);
322 1.1 deraadt return 0;
323 1.1 deraadt }
324 1.1 deraadt
325 1.1 deraadt if (sc->eg_pcb[0] != EG_RSP_GETINFO || /* Get Adapter Info Response */
326 1.1 deraadt sc->eg_pcb[1] != 0x0a) {
327 1.1 deraadt egprintpcb(sc);
328 1.1 deraadt return 0;
329 1.1 deraadt }
330 1.1 deraadt sc->eg_rom_major = sc->eg_pcb[3];
331 1.1 deraadt sc->eg_rom_minor = sc->eg_pcb[2];
332 1.1 deraadt sc->eg_ram = sc->eg_pcb[6] | (sc->eg_pcb[7] << 8);
333 1.1 deraadt
334 1.1 deraadt ia->ia_iosize = 0x08;
335 1.1 deraadt ia->ia_msize = 0;
336 1.1 deraadt return 1;
337 1.1 deraadt }
338 1.1 deraadt
339 1.1 deraadt static void
340 1.1 deraadt egattach(parent, self, aux)
341 1.1 deraadt struct device *parent, *self;
342 1.1 deraadt void *aux;
343 1.1 deraadt {
344 1.2 mycroft struct eg_softc *sc = (void *)self;
345 1.2 mycroft struct isa_attach_args *ia = aux;
346 1.1 deraadt struct ifnet *ifp = &sc->sc_arpcom.ac_if;
347 1.1 deraadt int i;
348 1.1 deraadt
349 1.2 mycroft egstop(sc);
350 1.1 deraadt
351 1.1 deraadt sc->eg_pcb[0] = EG_CMD_GETEADDR; /* Get Station address */
352 1.1 deraadt sc->eg_pcb[1] = 0;
353 1.1 deraadt if (egwritePCB(sc) != 0) {
354 1.1 deraadt dlog((LOG_DEBUG, "write error\n"));
355 1.1 deraadt return;
356 1.1 deraadt }
357 1.1 deraadt if (egreadPCB(sc) != 0) {
358 1.1 deraadt dlog((LOG_DEBUG, "read error\n"));
359 1.1 deraadt egprintpcb(sc);
360 1.1 deraadt return;
361 1.1 deraadt }
362 1.1 deraadt
363 1.1 deraadt /* check Get station address response */
364 1.1 deraadt if (sc->eg_pcb[0] != EG_RSP_GETEADDR || sc->eg_pcb[1] != 0x06) {
365 1.1 deraadt dlog((LOG_DEBUG, "parse error\n"));
366 1.1 deraadt egprintpcb(sc);
367 1.1 deraadt return;
368 1.1 deraadt }
369 1.1 deraadt bcopy(&sc->eg_pcb[2], sc->sc_arpcom.ac_enaddr, ETHER_ADDR_LEN);
370 1.1 deraadt
371 1.1 deraadt printf(": ROM v%d.%02d %dk address %s\n",
372 1.2 mycroft sc->eg_rom_major, sc->eg_rom_minor, sc->eg_ram,
373 1.2 mycroft ether_sprintf(sc->sc_arpcom.ac_enaddr));
374 1.1 deraadt
375 1.1 deraadt sc->eg_pcb[0] = EG_CMD_SETEADDR; /* Set station address */
376 1.1 deraadt if (egwritePCB(sc) != 0) {
377 1.1 deraadt dlog((LOG_DEBUG, "write error2\n"));
378 1.1 deraadt return;
379 1.1 deraadt }
380 1.1 deraadt if (egreadPCB(sc) != 0) {
381 1.1 deraadt dlog((LOG_DEBUG, "read error2\n"));
382 1.1 deraadt egprintpcb(sc);
383 1.1 deraadt return;
384 1.1 deraadt }
385 1.2 mycroft if (sc->eg_pcb[0] != EG_RSP_SETEADDR || sc->eg_pcb[1] != 0x02 ||
386 1.1 deraadt sc->eg_pcb[2] != 0 || sc->eg_pcb[3] != 0) {
387 1.1 deraadt dlog((LOG_DEBUG, "parse error2\n"));
388 1.1 deraadt egprintpcb(sc);
389 1.1 deraadt return;
390 1.1 deraadt }
391 1.1 deraadt
392 1.2 mycroft /* Initialize ifnet structure. */
393 1.1 deraadt ifp->if_unit = sc->sc_dev.dv_unit;
394 1.1 deraadt ifp->if_name = egcd.cd_name;
395 1.1 deraadt ifp->if_output = ether_output;
396 1.1 deraadt ifp->if_start = egstart;
397 1.1 deraadt ifp->if_ioctl = egioctl;
398 1.1 deraadt ifp->if_watchdog = egwatchdog;
399 1.1 deraadt ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_NOTRAILERS;
400 1.1 deraadt
401 1.1 deraadt /* Now we can attach the interface. */
402 1.1 deraadt if_attach(ifp);
403 1.1 deraadt ether_ifattach(ifp);
404 1.1 deraadt
405 1.1 deraadt #if NBPFILTER > 0
406 1.2 mycroft bpfattach(&ifp->if_bpf, ifp, DLT_EN10MB, sizeof(struct ether_header));
407 1.1 deraadt #endif
408 1.1 deraadt
409 1.2 mycroft sc->sc_ih.ih_fun = egintr;
410 1.2 mycroft sc->sc_ih.ih_arg = sc;
411 1.2 mycroft sc->sc_ih.ih_level = IPL_NET;
412 1.2 mycroft intr_establish(ia->ia_irq, &sc->sc_ih);
413 1.1 deraadt }
414 1.1 deraadt
415 1.1 deraadt static void
416 1.1 deraadt eginit(sc)
417 1.1 deraadt register struct eg_softc *sc;
418 1.1 deraadt {
419 1.1 deraadt register struct ifnet *ifp = &sc->sc_arpcom.ac_if;
420 1.1 deraadt
421 1.2 mycroft /* Address not known. */
422 1.1 deraadt if (ifp->if_addrlist == 0)
423 1.1 deraadt return;
424 1.1 deraadt
425 1.1 deraadt /* soft reset the board */
426 1.1 deraadt outb(sc->eg_ctl, EG_CTL_FLSH);
427 1.1 deraadt delay(100);
428 1.1 deraadt outb(sc->eg_ctl, EG_CTL_ATTN);
429 1.1 deraadt delay(100);
430 1.1 deraadt outb(sc->eg_ctl, 0);
431 1.1 deraadt delay(200);
432 1.1 deraadt
433 1.1 deraadt sc->eg_pcb[0] = EG_CMD_CONFIG82586; /* Configure 82586 */
434 1.1 deraadt sc->eg_pcb[1] = 2;
435 1.1 deraadt sc->eg_pcb[2] = 3; /* receive broadcast & multicast */
436 1.1 deraadt sc->eg_pcb[3] = 0;
437 1.1 deraadt if (egwritePCB(sc) != 0)
438 1.1 deraadt dlog((LOG_DEBUG, "write error3\n"));
439 1.1 deraadt
440 1.1 deraadt if (egreadPCB(sc) != 0) {
441 1.1 deraadt dlog((LOG_DEBUG, "read error\n"));
442 1.1 deraadt egprintpcb(sc);
443 1.1 deraadt } else if (sc->eg_pcb[2] != 0 || sc->eg_pcb[3] != 0)
444 1.2 mycroft printf("eg: configure card command failed.\n");
445 1.1 deraadt
446 1.2 mycroft if (sc->eg_inbuf == NULL)
447 1.1 deraadt sc->eg_inbuf = malloc(EG_BUFLEN, M_TEMP, M_NOWAIT);
448 1.1 deraadt sc->eg_incount = 0;
449 1.1 deraadt
450 1.2 mycroft if (sc->eg_outbuf == NULL)
451 1.1 deraadt sc->eg_outbuf = malloc(EG_BUFLEN, M_TEMP, M_NOWAIT);
452 1.1 deraadt
453 1.1 deraadt ifp->if_flags |= IFF_RUNNING;
454 1.1 deraadt ifp->if_flags &= ~IFF_OACTIVE;
455 1.1 deraadt
456 1.1 deraadt outb(sc->eg_ctl, EG_CTL_CMDE);
457 1.1 deraadt
458 1.1 deraadt egstart(ifp);
459 1.1 deraadt egrecv(sc);
460 1.1 deraadt }
461 1.1 deraadt
462 1.1 deraadt static int
463 1.1 deraadt egrecv(sc)
464 1.1 deraadt struct eg_softc *sc;
465 1.1 deraadt {
466 1.2 mycroft
467 1.1 deraadt while (sc->eg_incount < EG_INLEN) {
468 1.1 deraadt sc->eg_pcb[0] = EG_CMD_RECVPACKET;
469 1.1 deraadt sc->eg_pcb[1] = 0x08;
470 1.1 deraadt sc->eg_pcb[2] = 0; /* address not used.. we send zero */
471 1.1 deraadt sc->eg_pcb[3] = 0;
472 1.1 deraadt sc->eg_pcb[4] = 0;
473 1.1 deraadt sc->eg_pcb[5] = 0;
474 1.1 deraadt sc->eg_pcb[6] = EG_BUFLEN & 0xff; /* our buffer size */
475 1.1 deraadt sc->eg_pcb[7] = (EG_BUFLEN >> 8) & 0xff;
476 1.1 deraadt sc->eg_pcb[8] = 0; /* timeout, 0 == none */
477 1.1 deraadt sc->eg_pcb[9] = 0;
478 1.2 mycroft if (egwritePCB(sc) == 0)
479 1.1 deraadt sc->eg_incount++;
480 1.2 mycroft else
481 1.1 deraadt break;
482 1.1 deraadt }
483 1.1 deraadt }
484 1.1 deraadt
485 1.1 deraadt static int
486 1.1 deraadt egstart(ifp)
487 1.1 deraadt struct ifnet *ifp;
488 1.1 deraadt {
489 1.1 deraadt register struct eg_softc *sc = egcd.cd_devs[ifp->if_unit];
490 1.1 deraadt struct mbuf *m0, *m;
491 1.1 deraadt int len;
492 1.1 deraadt short *ptr;
493 1.1 deraadt
494 1.1 deraadt /* Don't transmit if interface is busy or not running */
495 1.1 deraadt if ((sc->sc_arpcom.ac_if.if_flags & (IFF_RUNNING|IFF_OACTIVE)) != IFF_RUNNING)
496 1.1 deraadt return 0;
497 1.1 deraadt
498 1.1 deraadt /* Dequeue the next datagram. */
499 1.1 deraadt IF_DEQUEUE(&sc->sc_arpcom.ac_if.if_snd, m0);
500 1.1 deraadt if (m0 == NULL)
501 1.1 deraadt return 0;
502 1.1 deraadt
503 1.1 deraadt sc->sc_arpcom.ac_if.if_flags |= IFF_OACTIVE;
504 1.1 deraadt
505 1.1 deraadt /* Copy the datagram to the buffer. */
506 1.1 deraadt len = 0;
507 1.1 deraadt for (m = m0; m; m = m->m_next) {
508 1.1 deraadt if (m->m_len == 0)
509 1.1 deraadt continue;
510 1.1 deraadt if (len + m->m_len > EG_BUFLEN) {
511 1.1 deraadt dlog((LOG_DEBUG, "Packet too large to send\n"));
512 1.1 deraadt m_freem(m0);
513 1.1 deraadt sc->sc_arpcom.ac_if.if_flags &= ~IFF_OACTIVE;
514 1.1 deraadt sc->sc_arpcom.ac_if.if_oerrors++;
515 1.1 deraadt return 0;
516 1.1 deraadt }
517 1.1 deraadt bcopy(mtod(m, caddr_t), sc->eg_outbuf + len, m->m_len);
518 1.1 deraadt len += m->m_len;
519 1.1 deraadt }
520 1.1 deraadt #if NBPFILTER > 0
521 1.1 deraadt if (sc->sc_arpcom.ac_if.if_bpf)
522 1.1 deraadt bpf_mtap(sc->sc_arpcom.ac_if.if_bpf, m0);
523 1.1 deraadt #endif
524 1.1 deraadt m_freem(m0);
525 1.1 deraadt
526 1.1 deraadt /* length must be a minimum of ETHER_MIN_LEN bytes */
527 1.1 deraadt len = max(len, ETHER_MIN_LEN);
528 1.1 deraadt
529 1.1 deraadt /* set direction bit: host -> adapter */
530 1.1 deraadt outb(sc->eg_ctl, inb(sc->eg_ctl) & ~EG_CTL_DIR);
531 1.1 deraadt
532 1.1 deraadt sc->eg_pcb[0] = EG_CMD_SENDPACKET;
533 1.1 deraadt sc->eg_pcb[1] = 0x06;
534 1.1 deraadt sc->eg_pcb[2] = 0; /* address not used, we send zero */
535 1.1 deraadt sc->eg_pcb[3] = 0;
536 1.1 deraadt sc->eg_pcb[4] = 0;
537 1.1 deraadt sc->eg_pcb[5] = 0;
538 1.1 deraadt sc->eg_pcb[6] = len & 0xff; /* length of packet */
539 1.1 deraadt sc->eg_pcb[7] = (len >> 8) & 0xff;
540 1.1 deraadt if (egwritePCB(sc) == 0) {
541 1.1 deraadt for (ptr = (short *) sc->eg_outbuf; len > 0; len -= 2) {
542 1.1 deraadt outw(sc->eg_data, *ptr++);
543 1.1 deraadt while (!(inb(sc->eg_stat) & EG_STAT_HRDY))
544 1.1 deraadt ; /* XXX need timeout here */
545 1.1 deraadt }
546 1.1 deraadt } else {
547 1.1 deraadt dlog((LOG_DEBUG, "egwritePCB in egstart failed\n"));
548 1.1 deraadt sc->sc_arpcom.ac_if.if_oerrors++;
549 1.1 deraadt sc->sc_arpcom.ac_if.if_flags &= ~IFF_OACTIVE;
550 1.1 deraadt }
551 1.1 deraadt
552 1.1 deraadt /* Set direction bit : Adapter -> host */
553 1.1 deraadt outb(sc->eg_ctl, inb(sc->eg_ctl) | EG_CTL_DIR);
554 1.1 deraadt
555 1.1 deraadt return 0;
556 1.1 deraadt }
557 1.1 deraadt
558 1.1 deraadt int
559 1.1 deraadt egintr(sc)
560 1.1 deraadt register struct eg_softc *sc;
561 1.1 deraadt {
562 1.1 deraadt int i, len;
563 1.1 deraadt short *ptr;
564 1.1 deraadt
565 1.1 deraadt while (inb(sc->eg_stat) & EG_STAT_ACRF) {
566 1.1 deraadt egreadPCB(sc);
567 1.2 mycroft switch (sc->eg_pcb[0]) {
568 1.1 deraadt case EG_RSP_RECVPACKET:
569 1.1 deraadt len = sc->eg_pcb[6]+(sc->eg_pcb[7]<<8);
570 1.1 deraadt for (ptr = (short *) sc->eg_inbuf; len > 0; len -= 2) {
571 1.1 deraadt while (!(inb(sc->eg_stat) & EG_STAT_HRDY))
572 1.1 deraadt ;
573 1.1 deraadt *ptr++ = inw(sc->eg_data);
574 1.1 deraadt }
575 1.1 deraadt len = sc->eg_pcb[8]+(sc->eg_pcb[9]<<8);
576 1.1 deraadt egrecv(sc);
577 1.1 deraadt sc->sc_arpcom.ac_if.if_ipackets++;
578 1.1 deraadt egread(sc, sc->eg_inbuf, len);
579 1.1 deraadt sc->eg_incount--;
580 1.1 deraadt break;
581 1.1 deraadt
582 1.1 deraadt case EG_RSP_SENDPACKET:
583 1.1 deraadt if (sc->eg_pcb[6] || sc->eg_pcb[7]) {
584 1.1 deraadt dlog((LOG_DEBUG, "packet dropped\n"));
585 1.1 deraadt sc->sc_arpcom.ac_if.if_oerrors++;
586 1.2 mycroft } else
587 1.2 mycroft sc->sc_arpcom.ac_if.if_opackets++;
588 1.1 deraadt sc->sc_arpcom.ac_if.if_collisions += sc->eg_pcb[8] & 0xf;
589 1.1 deraadt sc->sc_arpcom.ac_if.if_flags &= ~IFF_OACTIVE;
590 1.1 deraadt egstart(&sc->sc_arpcom.ac_if);
591 1.1 deraadt break;
592 1.1 deraadt
593 1.1 deraadt case EG_RSP_GETSTATS:
594 1.1 deraadt egprintpcb();
595 1.1 deraadt dlog((LOG_DEBUG, "Card Statistics\n"));
596 1.1 deraadt break;
597 1.1 deraadt
598 1.1 deraadt default:
599 1.1 deraadt dlog((LOG_DEBUG, "egintr: Unknown response %x??\n",
600 1.1 deraadt sc->eg_pcb[0]));
601 1.1 deraadt break;
602 1.1 deraadt }
603 1.1 deraadt }
604 1.1 deraadt
605 1.1 deraadt return 0;
606 1.1 deraadt }
607 1.1 deraadt
608 1.1 deraadt /*
609 1.1 deraadt * Pass a packet up to the higher levels.
610 1.1 deraadt */
611 1.1 deraadt static inline void
612 1.1 deraadt egread(sc, buf, len)
613 1.1 deraadt struct eg_softc *sc;
614 1.1 deraadt caddr_t buf;
615 1.1 deraadt int len;
616 1.1 deraadt {
617 1.2 mycroft struct ifnet *ifp;
618 1.1 deraadt struct mbuf *m;
619 1.2 mycroft struct ether_header *eh;
620 1.1 deraadt
621 1.1 deraadt if (len <= sizeof(struct ether_header) ||
622 1.1 deraadt len > ETHER_MAX_LEN) {
623 1.1 deraadt dlog((LOG_DEBUG, "Unacceptable packet size %d\n", len));
624 1.1 deraadt sc->sc_arpcom.ac_if.if_ierrors++;
625 1.1 deraadt return;
626 1.1 deraadt }
627 1.1 deraadt
628 1.2 mycroft /* Pull packet off interface. */
629 1.2 mycroft ifp = &sc->sc_arpcom.ac_if;
630 1.2 mycroft m = egget(buf, len, ifp);
631 1.1 deraadt if (m == 0) {
632 1.1 deraadt dlog((LOG_DEBUG, "egget returned 0\n"));
633 1.1 deraadt sc->sc_arpcom.ac_if.if_ierrors++;
634 1.1 deraadt return;
635 1.1 deraadt }
636 1.1 deraadt
637 1.2 mycroft /* We assume the header fit entirely in one mbuf. */
638 1.2 mycroft eh = mtod(m, struct ether_header *);
639 1.2 mycroft
640 1.1 deraadt #if NBPFILTER > 0
641 1.1 deraadt /*
642 1.1 deraadt * Check if there's a BPF listener on this interface.
643 1.2 mycroft * If so, hand off the raw packet to BPF.
644 1.1 deraadt */
645 1.2 mycroft if (ifp->if_bpf) {
646 1.2 mycroft bpf_mtap(ifp->if_bpf, m);
647 1.1 deraadt
648 1.1 deraadt /*
649 1.1 deraadt * Note that the interface cannot be in promiscuous mode if
650 1.1 deraadt * there are no BPF listeners. And if we are in promiscuous
651 1.1 deraadt * mode, we have to check if this packet is really ours.
652 1.1 deraadt */
653 1.2 mycroft if ((ifp->if_flags & IFF_PROMISC) &&
654 1.1 deraadt (eh->ether_dhost[0] & 1) == 0 && /* !mcast and !bcast */
655 1.1 deraadt bcmp(eh->ether_dhost, sc->sc_arpcom.ac_enaddr,
656 1.1 deraadt sizeof(eh->ether_dhost)) != 0) {
657 1.1 deraadt m_freem(m);
658 1.1 deraadt return;
659 1.1 deraadt }
660 1.1 deraadt }
661 1.1 deraadt #endif
662 1.1 deraadt
663 1.2 mycroft /* We assume the header fit entirely in one mbuf. */
664 1.2 mycroft m->m_pkthdr.len -= sizeof(*eh);
665 1.2 mycroft m->m_len -= sizeof(*eh);
666 1.2 mycroft m->m_data += sizeof(*eh);
667 1.2 mycroft
668 1.2 mycroft ether_input(ifp, eh, m);
669 1.1 deraadt }
670 1.1 deraadt
671 1.1 deraadt /*
672 1.1 deraadt * convert buf into mbufs
673 1.1 deraadt */
674 1.1 deraadt static struct mbuf *
675 1.1 deraadt egget(buf, totlen, ifp)
676 1.2 mycroft caddr_t buf;
677 1.2 mycroft int totlen;
678 1.2 mycroft struct ifnet *ifp;
679 1.2 mycroft {
680 1.2 mycroft struct mbuf *top, **mp, *m;
681 1.2 mycroft int len;
682 1.1 deraadt
683 1.2 mycroft MGETHDR(m, M_DONTWAIT, MT_DATA);
684 1.2 mycroft if (m == 0) {
685 1.1 deraadt dlog((LOG_DEBUG, "MGETHDR returns 0\n"));
686 1.2 mycroft return 0;
687 1.1 deraadt }
688 1.2 mycroft m->m_pkthdr.rcvif = ifp;
689 1.2 mycroft m->m_pkthdr.len = totlen;
690 1.2 mycroft len = MHLEN;
691 1.2 mycroft top = 0;
692 1.2 mycroft mp = ⊤
693 1.2 mycroft
694 1.2 mycroft while (totlen > 0) {
695 1.2 mycroft if (top) {
696 1.2 mycroft MGET(m, M_DONTWAIT, MT_DATA);
697 1.2 mycroft if (m == 0) {
698 1.2 mycroft m_freem(top);
699 1.1 deraadt dlog((LOG_DEBUG, "MGET returns 0\n"));
700 1.2 mycroft return 0;
701 1.2 mycroft }
702 1.2 mycroft len = MLEN;
703 1.2 mycroft }
704 1.2 mycroft if (totlen >= MINCLSIZE) {
705 1.2 mycroft MCLGET(m, M_DONTWAIT);
706 1.2 mycroft if (m->m_flags & M_EXT)
707 1.2 mycroft len = MCLBYTES;
708 1.2 mycroft }
709 1.2 mycroft m->m_len = len = min(totlen, len);
710 1.2 mycroft bcopy((caddr_t)buf, mtod(m, caddr_t), len);
711 1.2 mycroft buf += len;
712 1.2 mycroft totlen -= len;
713 1.2 mycroft *mp = m;
714 1.2 mycroft mp = &m->m_next;
715 1.2 mycroft }
716 1.1 deraadt
717 1.2 mycroft return top;
718 1.1 deraadt }
719 1.1 deraadt
720 1.1 deraadt static int
721 1.2 mycroft egioctl(ifp, command, data)
722 1.1 deraadt register struct ifnet *ifp;
723 1.2 mycroft int command;
724 1.1 deraadt caddr_t data;
725 1.1 deraadt {
726 1.1 deraadt struct eg_softc *sc = egcd.cd_devs[ifp->if_unit];
727 1.2 mycroft register struct ifaddr *ifa = (struct ifaddr *)data;
728 1.2 mycroft struct ifreq *ifr = (struct ifreq *)data;
729 1.2 mycroft int s, error = 0;
730 1.2 mycroft
731 1.2 mycroft s = splimp();
732 1.2 mycroft
733 1.2 mycroft switch (command) {
734 1.1 deraadt
735 1.1 deraadt case SIOCSIFADDR:
736 1.1 deraadt ifp->if_flags |= IFF_UP;
737 1.2 mycroft
738 1.1 deraadt switch (ifa->ifa_addr->sa_family) {
739 1.1 deraadt #ifdef INET
740 1.1 deraadt case AF_INET:
741 1.1 deraadt eginit(sc); /* before arpwhohas */
742 1.2 mycroft sc->sc_arpcom.ac_ipaddr = IA_SIN(ifa)->sin_addr;
743 1.2 mycroft arpwhohas(&sc->sc_arpcom, &IA_SIN(ifa)->sin_addr);
744 1.1 deraadt break;
745 1.1 deraadt #endif
746 1.1 deraadt #ifdef NS
747 1.1 deraadt case AF_NS:
748 1.2 mycroft {
749 1.2 mycroft register struct ns_addr *ina = &IA_SNS(ifa)->sns_addr;
750 1.1 deraadt
751 1.2 mycroft if (ns_nullhost(*ina))
752 1.2 mycroft ina->x_host =
753 1.2 mycroft *(union ns_host *)(sc->sc_arpcom.ac_enaddr);
754 1.2 mycroft else
755 1.2 mycroft bcopy(ina->x_host.c_host,
756 1.2 mycroft sc->sc_arpcom.ac_enaddr,
757 1.2 mycroft sizeof(sc->sc_arpcom.ac_enaddr));
758 1.2 mycroft /* Set new address. */
759 1.2 mycroft eginit(sc);
760 1.2 mycroft break;
761 1.2 mycroft }
762 1.1 deraadt #endif
763 1.1 deraadt default:
764 1.1 deraadt eginit(sc);
765 1.1 deraadt break;
766 1.1 deraadt }
767 1.1 deraadt break;
768 1.2 mycroft
769 1.1 deraadt case SIOCSIFFLAGS:
770 1.1 deraadt if ((ifp->if_flags & IFF_UP) == 0 &&
771 1.1 deraadt (ifp->if_flags & IFF_RUNNING) != 0) {
772 1.2 mycroft /*
773 1.2 mycroft * If interface is marked down and it is running, then
774 1.2 mycroft * stop it.
775 1.2 mycroft */
776 1.2 mycroft egstop(sc);
777 1.1 deraadt ifp->if_flags &= ~IFF_RUNNING;
778 1.1 deraadt } else if ((ifp->if_flags & IFF_UP) != 0 &&
779 1.1 deraadt (ifp->if_flags & IFF_RUNNING) == 0) {
780 1.2 mycroft /*
781 1.2 mycroft * If interface is marked up and it is stopped, then
782 1.2 mycroft * start it.
783 1.2 mycroft */
784 1.1 deraadt eginit(sc);
785 1.1 deraadt } else {
786 1.1 deraadt /*
787 1.1 deraadt * XXX deal with flags changes:
788 1.1 deraadt * IFF_MULTICAST, IFF_PROMISC,
789 1.1 deraadt * IFF_LINK0, IFF_LINK1,
790 1.1 deraadt */
791 1.1 deraadt }
792 1.1 deraadt break;
793 1.2 mycroft
794 1.1 deraadt default:
795 1.1 deraadt error = EINVAL;
796 1.1 deraadt }
797 1.2 mycroft
798 1.2 mycroft splx(s);
799 1.2 mycroft return error;
800 1.1 deraadt }
801 1.1 deraadt
802 1.1 deraadt static void
803 1.1 deraadt egreset(sc)
804 1.1 deraadt struct eg_softc *sc;
805 1.1 deraadt {
806 1.2 mycroft int s;
807 1.1 deraadt
808 1.2 mycroft dlog((LOG_DEBUG, "egreset()\n"));
809 1.2 mycroft s = splimp();
810 1.2 mycroft egstop(sc);
811 1.2 mycroft eginit(sc);
812 1.2 mycroft splx(s);
813 1.1 deraadt }
814 1.1 deraadt
815 1.1 deraadt static int
816 1.1 deraadt egwatchdog(unit)
817 1.1 deraadt int unit;
818 1.1 deraadt {
819 1.2 mycroft struct eg_softc *sc = egcd.cd_devs[unit];
820 1.1 deraadt
821 1.1 deraadt log(LOG_ERR, "%s: device timeout\n", sc->sc_dev.dv_xname);
822 1.1 deraadt sc->sc_arpcom.ac_if.if_oerrors++;
823 1.1 deraadt
824 1.1 deraadt egreset(sc);
825 1.1 deraadt return 0;
826 1.1 deraadt }
827 1.1 deraadt
828 1.1 deraadt static void
829 1.1 deraadt egstop(sc)
830 1.1 deraadt register struct eg_softc *sc;
831 1.1 deraadt {
832 1.1 deraadt
833 1.1 deraadt outb(sc->eg_ctl, 0);
834 1.1 deraadt }
835