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