if_ai.c revision 1.27.2.1 1 /* $NetBSD: if_ai.c,v 1.27.2.1 2008/05/18 12:34:03 yamt Exp $ */
2
3 /*-
4 * Copyright (c) 1998 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Rafal K. Boni.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 * POSSIBILITY OF SUCH DAMAGE.
30 */
31
32 #include <sys/cdefs.h>
33 __KERNEL_RCSID(0, "$NetBSD: if_ai.c,v 1.27.2.1 2008/05/18 12:34:03 yamt Exp $");
34
35 #include <sys/param.h>
36 #include <sys/systm.h>
37 #include <sys/mbuf.h>
38 #include <sys/errno.h>
39 #include <sys/device.h>
40 #include <sys/protosw.h>
41 #include <sys/socket.h>
42
43 #include <net/if.h>
44 #include <net/if_dl.h>
45 #include <net/if_types.h>
46 #include <net/if_media.h>
47 #include <net/if_ether.h>
48
49 #include <sys/cpu.h>
50 #include <sys/bus.h>
51 #include <sys/intr.h>
52
53 #include <dev/isa/isareg.h>
54 #include <dev/isa/isavar.h>
55
56 #include <dev/ic/i82586reg.h>
57 #include <dev/ic/i82586var.h>
58 #include <dev/isa/if_aireg.h>
59
60 #ifdef AI_DEBUG
61 #define DPRINTF(x) printf x
62 #else
63 #define DPRINTF(x)
64 #endif
65
66 struct ai_softc {
67 struct ie_softc sc_ie;
68
69 bus_space_tag_t sc_regt; /* space tag for registers */
70 bus_space_handle_t sc_regh; /* space handle for registers */
71
72 u_int8_t card_rev;
73 u_int8_t card_type;
74
75 void *sc_ih; /* interrupt handle */
76 };
77
78 const char *ai_names[] = {
79 "StarLAN 10",
80 "EN100",
81 "StarLAN Fiber",
82 };
83
84 /* Functions required by the i82586 MI driver */
85 static void ai_reset(struct ie_softc *, int);
86 static void ai_atten(struct ie_softc *, int);
87
88 static void ai_copyin(struct ie_softc *, void *, int, size_t);
89 static void ai_copyout(struct ie_softc *, const void *, int, size_t);
90
91 static u_int16_t ai_read_16(struct ie_softc *, int);
92 static void ai_write_16(struct ie_softc *, int, u_int16_t);
93 static void ai_write_24(struct ie_softc *, int, int);
94
95 /* Local support functions */
96 static int check_ie_present(struct ie_softc*, bus_space_tag_t,
97 bus_space_handle_t, bus_size_t);
98 static int ai_find_mem_size(struct ai_softc*, bus_space_tag_t,
99 bus_size_t);
100
101 int ai_match(struct device *, struct cfdata *, void *);
102 void ai_attach(struct device *, struct device *, void *);
103
104 /*
105 * AT&T StarLan support routines
106 */
107 static void
108 ai_reset(sc, why)
109 struct ie_softc *sc;
110 int why;
111 {
112 struct ai_softc* asc = (struct ai_softc *) sc;
113
114 switch (why) {
115 case CHIP_PROBE:
116 /* reset to chip to see if it responds */
117 bus_space_write_1(asc->sc_regt, asc->sc_regh, AI_RESET, 0);
118 DELAY(100);
119 break;
120
121 case CARD_RESET:
122 /*
123 * this takes around 10sec, and we can get
124 * by quite well w/out it...
125 */
126 break;
127 }
128 }
129
130 static void
131 ai_atten(struct ie_softc *sc, int why)
132 {
133 struct ai_softc* asc = (struct ai_softc *) sc;
134 bus_space_write_1(asc->sc_regt, asc->sc_regh, AI_ATTN, 0);
135 }
136
137 static void
138 ai_copyin (sc, dst, offset, size)
139 struct ie_softc *sc;
140 void *dst;
141 int offset;
142 size_t size;
143 {
144 int dribble;
145 u_int8_t* bptr = dst;
146
147 bus_space_barrier(sc->bt, sc->bh, offset, size,
148 BUS_SPACE_BARRIER_READ);
149
150 if (offset % 2) {
151 *bptr = bus_space_read_1(sc->bt, sc->bh, offset);
152 offset++; bptr++; size--;
153 }
154
155 dribble = size % 2;
156 bus_space_read_region_2(sc->bt, sc->bh, offset, (u_int16_t *) bptr,
157 size >> 1);
158
159 if (dribble) {
160 bptr += size - 1;
161 offset += size - 1;
162 *bptr = bus_space_read_1(sc->bt, sc->bh, offset);
163 }
164 }
165
166 static void
167 ai_copyout (sc, src, offset, size)
168 struct ie_softc *sc;
169 const void *src;
170 int offset;
171 size_t size;
172 {
173 int dribble;
174 int osize = size;
175 int ooffset = offset;
176 const u_int8_t* bptr = src;
177
178 if (offset % 2) {
179 bus_space_write_1(sc->bt, sc->bh, offset, *bptr);
180 offset++; bptr++; size--;
181 }
182
183 dribble = size % 2;
184 bus_space_write_region_2(sc->bt, sc->bh, offset,
185 (const u_int16_t *)bptr, size >> 1);
186 if (dribble) {
187 bptr += size - 1;
188 offset += size - 1;
189 bus_space_write_1(sc->bt, sc->bh, offset, *bptr);
190 }
191
192 bus_space_barrier(sc->bt, sc->bh, ooffset, osize,
193 BUS_SPACE_BARRIER_WRITE);
194 }
195
196 static u_int16_t
197 ai_read_16 (sc, offset)
198 struct ie_softc *sc;
199 int offset;
200 {
201 bus_space_barrier(sc->bt, sc->bh, offset, 2, BUS_SPACE_BARRIER_READ);
202 return bus_space_read_2(sc->bt, sc->bh, offset);
203 }
204
205 static void
206 ai_write_16 (sc, offset, value)
207 struct ie_softc *sc;
208 int offset;
209 u_int16_t value;
210 {
211 bus_space_write_2(sc->bt, sc->bh, offset, value);
212 bus_space_barrier(sc->bt, sc->bh, offset, 2, BUS_SPACE_BARRIER_WRITE);
213 }
214
215 static void
216 ai_write_24 (sc, offset, addr)
217 struct ie_softc *sc;
218 int offset, addr;
219 {
220 bus_space_write_4(sc->bt, sc->bh, offset, addr +
221 (u_long) sc->sc_maddr - (u_long) sc->sc_iobase);
222 bus_space_barrier(sc->bt, sc->bh, offset, 4, BUS_SPACE_BARRIER_WRITE);
223 }
224
225 int
226 ai_match(struct device *parent, struct cfdata *cf, void *aux)
227 {
228 int rv = 0;
229 u_int8_t val, type;
230 bus_size_t memsize;
231 bus_space_tag_t iot;
232 bus_space_handle_t ioh;
233 struct isa_attach_args * const ia = aux;
234 struct ai_softc asc;
235
236 if (ia->ia_nio < 1)
237 return (0);
238 if (ia->ia_niomem < 1)
239 return (0);
240 if (ia->ia_nirq < 1)
241 return (0);
242
243 if (ISA_DIRECT_CONFIG(ia))
244 return (0);
245
246 /* Punt if wildcarded port, IRQ or memory address */
247 if (ia->ia_io[0].ir_addr == ISA_UNKNOWN_PORT ||
248 ia->ia_iomem[0].ir_addr == ISA_UNKNOWN_IOMEM ||
249 ia->ia_irq[0].ir_irq == ISA_UNKNOWN_IRQ) {
250 DPRINTF((
251 "ai_match: wildcarded IRQ, IOAddr, or memAddr, skipping\n"));
252 return (0);
253 }
254
255 iot = ia->ia_iot;
256
257 /*
258 * This probe is horribly bad, but I have no info on this card other
259 * than the former driver, and it was just as bad!
260 */
261 if (bus_space_map(iot, ia->ia_io[0].ir_addr,
262 AI_IOSIZE, 0, &ioh) != 0) {
263
264 DPRINTF(("ai_match: cannot map %d IO ports @ 0x%x\n",
265 AI_IOSIZE, ia->ia_iobase));
266 return (0);
267 }
268
269 val = bus_space_read_1(iot, ioh, AI_REVISION);
270
271 type = SL_BOARD(val);
272 if (type != SL10_BOARD && type != EN100_BOARD &&
273 type != SLFIBER_BOARD) {
274 DPRINTF(("ai_match: unknown board code 0x%02x @ 0x%x\n",
275 type, ia->ia_iobase));
276 goto out;
277 }
278
279 /*
280 * Fill in just about enough of our local `ai_softc' for
281 * ai_find_mem_size() to do its job.
282 */
283 memset(&asc, 0, sizeof asc);
284 asc.sc_regt = iot;
285 asc.sc_regh = ioh;
286
287 if ((memsize = ai_find_mem_size(&asc, ia->ia_memt,
288 ia->ia_iomem[0].ir_addr)) == 0) {
289 DPRINTF(("ai_match: cannot size memory of board @ 0x%x\n",
290 ia->ia_io[0].ir_addr));
291 goto out;
292 }
293
294 if (ia->ia_iomem[0].ir_size != 0 &&
295 ia->ia_iomem[0].ir_size != memsize) {
296 DPRINTF((
297 "ai_match: memsize of board @ 0x%x doesn't match config\n",
298 ia->ia_iobase));
299 goto out;
300 }
301
302 rv = 1;
303
304 ia->ia_nio = 1;
305 ia->ia_io[0].ir_size = AI_IOSIZE;
306
307 ia->ia_niomem = 1;
308 ia->ia_iomem[0].ir_size = memsize;
309
310 ia->ia_nirq = 1;
311
312 ia->ia_ndrq = 0;
313
314 DPRINTF(("ai_match: found board @ 0x%x\n", ia->ia_iobase));
315
316 out:
317 bus_space_unmap(iot, ioh, AI_IOSIZE);
318 return rv;
319 }
320
321 void
322 ai_attach(struct device *parent, struct device *self, void *aux)
323 {
324 struct ai_softc *asc = (void *)self;
325 struct ie_softc *sc = &asc->sc_ie;
326 struct isa_attach_args *ia = aux;
327
328 u_int8_t val = 0;
329 bus_space_handle_t ioh, memh;
330 u_int8_t ethaddr[ETHER_ADDR_LEN];
331 char name[80];
332
333 if (bus_space_map(ia->ia_iot, ia->ia_io[0].ir_addr,
334 ia->ia_io[0].ir_size, 0, &ioh) != 0) {
335 DPRINTF(("\n%s: can't map i/o space 0x%x-0x%x\n",
336 device_xname(&sc->sc_dev),
337 ia->ia_io[0].ir_addr, ia->ia_io[0].ir_addr +
338 ia->ia_io[0].ir_size - 1));
339 return;
340 }
341
342 if (bus_space_map(ia->ia_memt, ia->ia_iomem[0].ir_addr,
343 ia->ia_iomem[0].ir_size, 0, &memh) != 0) {
344 DPRINTF(("\n%s: can't map iomem space 0x%x-0x%x\n",
345 device_xname(&sc->sc_dev),
346 ia->ia_iomem[0].ir_addr, ia->ia_iomem[0].ir_addr +
347 ia->ia_iomem[0].ir_size - 1));
348 bus_space_unmap(ia->ia_iot, ioh, ia->ia_io[0].ir_size);
349 return;
350 }
351
352 asc->sc_regt = ia->ia_iot;
353 asc->sc_regh = ioh;
354
355 sc->hwinit = NULL;
356 sc->intrhook = NULL;
357 sc->hwreset = ai_reset;
358 sc->chan_attn = ai_atten;
359
360 sc->ie_bus_barrier = NULL;
361
362 sc->memcopyin = ai_copyin;
363 sc->memcopyout = ai_copyout;
364 sc->ie_bus_read16 = ai_read_16;
365 sc->ie_bus_write16 = ai_write_16;
366 sc->ie_bus_write24 = ai_write_24;
367
368 sc->do_xmitnopchain = 0;
369
370 sc->sc_mediachange = NULL;
371 sc->sc_mediastatus = NULL;
372
373 sc->bt = ia->ia_memt;
374 sc->bh = memh;
375
376 /* Map i/o space. */
377 sc->sc_msize = ia->ia_iomem[0].ir_size;
378 sc->sc_maddr = (void *)memh;
379 sc->sc_iobase = (char *)sc->sc_maddr + sc->sc_msize - (1 << 24);
380
381 /* set up pointers to important on-card control structures */
382 sc->iscp = 0;
383 sc->scb = IE_ISCP_SZ;
384 sc->scp = sc->sc_msize + IE_SCP_ADDR - (1 << 24);
385
386 sc->buf_area = sc->scb + IE_SCB_SZ;
387 sc->buf_area_sz = sc->sc_msize - IE_ISCP_SZ - IE_SCB_SZ - IE_SCP_SZ;
388
389 /* zero card memory */
390 bus_space_set_region_1(sc->bt, sc->bh, 0, 0, sc->sc_msize);
391
392 /* set card to 16-bit bus mode */
393 bus_space_write_1(sc->bt, sc->bh, IE_SCP_BUS_USE((u_long)sc->scp),
394 IE_SYSBUS_16BIT);
395
396 /* set up pointers to key structures */
397 ai_write_24(sc, IE_SCP_ISCP((u_long)sc->scp), (u_long) sc->iscp);
398 ai_write_16(sc, IE_ISCP_SCB((u_long)sc->iscp), (u_long) sc->scb);
399 ai_write_24(sc, IE_ISCP_BASE((u_long)sc->iscp), (u_long) sc->iscp);
400
401 /* flush setup of pointers, check if chip answers */
402 bus_space_barrier(sc->bt, sc->bh, 0, sc->sc_msize,
403 BUS_SPACE_BARRIER_WRITE);
404 if (!i82586_proberam(sc)) {
405 DPRINTF(("\n%s: can't talk to i82586!\n",
406 device_xname(&sc->sc_dev)));
407 bus_space_unmap(ia->ia_iot, ioh, ia->ia_io[0].ir_size);
408 bus_space_unmap(ia->ia_memt, memh, ia->ia_iomem[0].ir_size);
409 return;
410 }
411
412 val = bus_space_read_1(asc->sc_regt, asc->sc_regh, AI_REVISION);
413 asc->card_rev = SL_REV(val);
414 asc->card_type = SL_BOARD(val) - 1;
415 snprintf(name, sizeof(name), "%s, rev. %d",
416 ai_names[asc->card_type], asc->card_rev);
417
418 i82586_attach(sc, name, ethaddr, NULL, 0, 0);
419
420 asc->sc_ih = isa_intr_establish(ia->ia_ic, ia->ia_irq[0].ir_irq,
421 IST_EDGE, IPL_NET, i82586_intr, sc);
422 if (asc->sc_ih == NULL) {
423 DPRINTF(("\n%s: can't establish interrupt\n",
424 device_xname(&sc->sc_dev)));
425 }
426 }
427
428 /*
429 * Divine the memory size of this board.
430 * Better hope there's nothing important hiding just below the card...
431 */
432 static int
433 ai_find_mem_size(asc, memt, maddr)
434 struct ai_softc* asc;
435 bus_space_tag_t memt;
436 bus_size_t maddr;
437 {
438 int size;
439 bus_space_handle_t memh;
440 struct ie_softc* sc = &asc->sc_ie;
441
442 for (size = 65536; size >= 16384; size -= 16384) {
443 if (bus_space_map(memt, maddr, size, 0, &memh) == 0) {
444 size = check_ie_present(sc, memt, maddr, size);
445 bus_space_unmap(memt, memh, size);
446
447 if (size != 0)
448 return size;
449 }
450 }
451
452 return (0);
453 }
454
455 /*
456 * Check to see if there's an 82586 out there.
457 */
458 static int
459 check_ie_present(sc, memt, memh, size)
460 struct ie_softc* sc;
461 bus_space_tag_t memt;
462 bus_space_handle_t memh;
463 bus_size_t size;
464 {
465 sc->hwreset = ai_reset;
466 sc->chan_attn = ai_atten;
467 sc->ie_bus_read16 = ai_read_16;
468 sc->ie_bus_write16 = ai_write_16;
469
470 sc->bt = memt;
471 sc->bh = memh;
472 sc->sc_iobase = (char *)memh + size - (1 << 24);
473
474 sc->scp = size + IE_SCP_ADDR - (1 << 24);
475 bus_space_set_region_1(memt, memh, (u_long) sc->scp, 0, IE_SCP_SZ);
476
477 sc->iscp = 0;
478 bus_space_set_region_1(memt, memh, (u_long) sc->iscp, 0, IE_ISCP_SZ);
479
480 sc->scb = IE_ISCP_SZ;
481 bus_space_set_region_1(memt, memh, sc->scb, 0, IE_SCB_SZ);
482
483 /* set card to 16-bit bus mode */
484 bus_space_write_1(sc->bt, sc->bh, IE_SCP_BUS_USE((u_long)sc->scp),
485 IE_SYSBUS_16BIT);
486
487 /* set up pointers to key structures */
488 ai_write_24(sc, IE_SCP_ISCP((u_long)sc->scp), (u_long) sc->iscp);
489 ai_write_16(sc, IE_ISCP_SCB((u_long)sc->iscp), (u_long) sc->scb);
490 ai_write_24(sc, IE_ISCP_BASE((u_long)sc->iscp), (u_long) sc->iscp);
491
492 /* flush setup of pointers, check if chip answers */
493 bus_space_barrier(sc->bt, sc->bh, 0, sc->sc_msize,
494 BUS_SPACE_BARRIER_WRITE);
495
496 if (!i82586_proberam(sc))
497 return (0);
498
499 return (size);
500 }
501
502 CFATTACH_DECL(ai, sizeof(struct ai_softc),
503 ai_match, ai_attach, NULL, NULL);
504