if_we_mca.c revision 1.1 1 /* $NetBSD: if_we_mca.c,v 1.1 2001/03/23 19:25:35 jdolecek Exp $ */
2
3 /*-
4 * Copyright (c) 1997, 1998 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility,
9 * NASA Ames Research Center, and Jaromir Dolecek.
10 *
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
13 * are met:
14 * 1. Redistributions of source code must retain the above copyright
15 * notice, this list of conditions and the following disclaimer.
16 * 2. Redistributions in binary form must reproduce the above copyright
17 * notice, this list of conditions and the following disclaimer in the
18 * documentation and/or other materials provided with the distribution.
19 * 3. All advertising materials mentioning features or use of this software
20 * must display the following acknowledgement:
21 * This product includes software developed by the NetBSD
22 * Foundation, Inc. and its contributors.
23 * 4. Neither the name of The NetBSD Foundation nor the names of its
24 * contributors may be used to endorse or promote products derived
25 * from this software without specific prior written permission.
26 *
27 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
28 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
29 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
30 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
31 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
32 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
33 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
34 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
35 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
36 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
37 * POSSIBILITY OF SUCH DAMAGE.
38 */
39
40 /*
41 * Device driver for National Semiconductor DS8390/WD83C690 based ethernet
42 * adapters.
43 *
44 * Copyright (c) 1994, 1995 Charles M. Hannum. All rights reserved.
45 *
46 * Copyright (C) 1993, David Greenman. This software may be used, modified,
47 * copied, distributed, and sold, in both source and binary form provided that
48 * the above copyright and these terms are retained. Under no circumstances is
49 * the author responsible for the proper functioning of this software, nor does
50 * the author assume any responsibility for damages incurred with its use.
51 */
52
53 /*
54 * Device driver for the Western Digital/SMC 8003 and 8013 series,
55 * and the SMC Elite Ultra (8216).
56 *
57 * Currently only tested with WD8003W/A. Other WD8003-based cards
58 * should work without problems, the SMC Elite based ones hopefully too.
59 */
60
61 #include <sys/param.h>
62 #include <sys/systm.h>
63 #include <sys/device.h>
64 #include <sys/socket.h>
65 #include <sys/mbuf.h>
66 #include <sys/syslog.h>
67
68 #include <net/if.h>
69 #include <net/if_dl.h>
70 #include <net/if_types.h>
71 #include <net/if_media.h>
72
73 #include <net/if_ether.h>
74
75 #include <machine/bus.h>
76 #include <machine/bswap.h>
77 #include <machine/intr.h>
78
79 #include <dev/mca/mcareg.h>
80 #include <dev/mca/mcavar.h>
81 #include <dev/mca/mcadevs.h>
82
83 #include <dev/ic/dp8390reg.h>
84 #include <dev/ic/dp8390var.h>
85 #include <dev/ic/wereg.h>
86 #include <dev/ic/wevar.h>
87
88 #define WD_8003 0x01
89 #define WD_ELITE 0x02
90 #define WD_MEMSIZE 16384 /* all supported cards have 16K Bytes memory */
91
92 int we_mca_probe __P((struct device *, struct cfdata *, void *));
93 void we_mca_attach __P((struct device *, struct device *, void *));
94 void we_mca_init_hook __P((struct we_softc *));
95
96 struct cfattach we_mca_ca = {
97 sizeof(struct we_softc), we_mca_probe, we_mca_attach
98 };
99
100 /*
101 * The types for some cards may not be correct; hopefully it's close
102 * enough.
103 */
104 static const struct we_mca_product {
105 u_int32_t we_id;
106 const char *we_name;
107 int we_flag;
108 int we_type;
109 const char *we_typestr;
110 } we_mca_products[] = {
111 { MCA_PRODUCT_WD_8013EP, "EtherCard PLUS Elite/A (8013EP/A)",
112 WD_ELITE, WE_TYPE_WD8013EP, "WD8013EP/A" },
113 { MCA_PRODUCT_WD_8013WP, "EtherCard PLUS Elite 10T/A (8013WP/A)",
114 WD_ELITE, WE_TYPE_WD8013EP, "WD8013WP/A" }, /* XXX */
115 { MCA_PRODUCT_IBM_WD_2,"IBM PS/2 Adapter/A for Ethernet Networks (UTP)",
116 WD_ELITE, WE_TYPE_WD8013EP, "WD8013WP/A"}, /* XXX */
117 { MCA_PRODUCT_IBM_WD_T,"IBM PS/2 Adapter/A for Ethernet Networks (BNC)",
118 WD_ELITE, WE_TYPE_WD8013EP, "WD8013WP/A"}, /* XXX */
119 { MCA_PRODUCT_WD_8003E, "WD EtherCard PLUS/A (WD8003E/A or WD8003ET/A)",
120 WD_8003, WE_TYPE_WD8003E, "WD8003E/A or WD8003ET/A" },
121 { MCA_PRODUCT_WD_8003ST,"WD StarCard PLUS/A (WD8003ST/A)",
122 WD_8003, WE_TYPE_WD8003W, "WD8003ST/A" }, /* XXX */
123 { MCA_PRODUCT_WD_8003W, "WD EtherCard PLUS 10T/A (WD8003W/A)",
124 WD_8003, WE_TYPE_WD8003W, "WD8003W/A" },
125 { MCA_PRODUCT_IBM_WD_O, "IBM PS/2 Adapter/A for Ethernet Networks",
126 WD_8003, WE_TYPE_WD8003W, "IBM PS/2 Adapter/A" },/*XXX*/
127 { 0x0000, NULL },
128 };
129
130 /* see POS description in we_mca_attach() */
131 static const int we_mca_irq[] = {
132 3, 4, 10, 15,
133 };
134
135 /* memory position and shared RAM sizes for WD8013-type of cards */
136 static const struct {
137 u_int8_t id;
138 int maddr;
139 int memsize;
140 } we_mca_elite_mem[] = {
141 { 0x10, 0x0C0000, 16384 },
142 { 0x12, 0x0C4000, 16384 },
143 { 0x14, 0x0C8000, 16384 },
144 { 0x16, 0x0CC000, 16384 },
145 { 0x18, 0x0D0000, 16384 },
146 { 0x1A, 0x0D4000, 16384 },
147 { 0x1C, 0x0D8000, 16384 },
148 { 0x1E, 0x0DC000, 16384 },
149 { 0x90, 0xFC0000, 16384 },
150 { 0x94, 0xFC8000, 16384 },
151 { 0x98, 0xFD0000, 16384 },
152 { 0x9C, 0x0C0000, 16384 },
153 { 0x00, 0x0C0000, 8192 },
154 { 0x01, 0x0C2000, 8192 },
155 { 0x10, 0x0C4000, 8192 },
156 { 0x11, 0x0C6000, 8192 },
157 { 0x00, 0x000000, 0 },
158 };
159
160
161 static const struct we_mca_product *we_mca_lookup __P((int));
162
163 static const struct we_mca_product *
164 we_mca_lookup(id)
165 int id;
166 {
167 const struct we_mca_product *wep;
168
169 for(wep = we_mca_products; wep->we_name; wep++)
170 if (wep->we_id == id)
171 return (wep);
172
173 return (NULL);
174 }
175
176 int
177 we_mca_probe(parent, cf, aux)
178 struct device *parent;
179 struct cfdata *cf;
180 void *aux;
181 {
182 struct mca_attach_args *ma = aux;
183
184 return (we_mca_lookup(ma->ma_id) != NULL);
185 }
186
187 void
188 we_mca_attach(parent, self, aux)
189 struct device *parent, *self;
190 void *aux;
191 {
192 struct we_softc *wsc = (struct we_softc *)self;
193 struct dp8390_softc *sc = &wsc->sc_dp8390;
194 struct mca_attach_args *ma = aux;
195 const struct we_mca_product *wep;
196 bus_space_tag_t nict, asict, memt;
197 bus_space_handle_t nich, asich, memh;
198 const char *typestr;
199 int irq, iobase, maddr;
200 int pos2, pos3, pos5;
201
202 pos2 = mca_conf_read(ma->ma_mc, ma->ma_slot, 2);
203 pos3 = mca_conf_read(ma->ma_mc, ma->ma_slot, 3);
204 pos5 = mca_conf_read(ma->ma_mc, ma->ma_slot, 5);
205
206 /*
207 * POS registers differ much between 8003 and 8013, so they are
208 * divided to two sections.
209 *
210 * 8003: POS register 2: (adf pos0)
211 * 7 6 5 4 3 2 1 0
212 * 0 0 1 \___/ \__ enable: 0=adapter disabled, 1=adapter enabled
213 * \_____ Adapter IO Space: 0x200-0x29F + XX*0x20
214 *
215 * 8003: POS register 3: (adf pos1)
216 * 7 6 5 4 3 2 1 0
217 * 1 1 0 \__/ 1 X
218 * \______ Shared Ram Space (16K Bytes):
219 * 0xC0000-0xC3FFF + XX * 0x4000
220 *
221 * 8003: POS register 5: (adf pos3)
222 * 7 6 5 4 3 2 1 0
223 * \_/
224 * \__ Interrupt Level: 00=3 01=4 10=10 11=15
225 *
226 * -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
227 *
228 * 8013: POS register 2: (adf pos0)
229 * 7 6 5 4 3 2 1 0
230 * \____/ \__ enable: 0=adapter disabled, 1=adapter enabled
231 * \___________ Adapter I/O Space: 0x0800-0x081F + XX * 0x1000
232 *
233 * 8013: POS register 3: (adf pos1)
234 * 7 6 5 4 3 2 1 0
235 * X 0 Shared Ram Base Address - mask 0x9f
236 * see wd_elite_mem[] array for details
237 *
238 * 8013: POS register 5: (adf pos3)
239 * 7 6 5 4 3 2 1 0
240 * \_/ \_/
241 * \ \__ Media Select: 00=TwPr (no link) 10=BNC
242 * \ 01=AUI|AUI or 10BaseT
243 * \____ Interrupt Level: 00=3 01=4 10=10 11=14
244 */
245
246 wep = we_mca_lookup(ma->ma_id);
247 #ifdef DIAGNOSTIC
248 if (wep == NULL) {
249 printf("\n%s: where did the card go?\n", sc->sc_dev.dv_xname);
250 return;
251 }
252 #endif
253
254 if (wep->we_flag & WD_8003) {
255 /* WD8003 based */
256 iobase = 0x200 + (((pos2 & 0x0e) >> 1) * 0x020);
257 maddr = 0xC0000 + (((pos3 & 0x1c) >> 2) * 0x04000);
258 irq = we_mca_irq[(pos5 & 0x03)];
259 sc->mem_size = WD_MEMSIZE;
260 } else {
261 /* SMC Elite */
262 int i, id;
263
264 iobase = 0x800 + (((pos2 & 0xf0) >> 4) * 0x1000);
265 irq = we_mca_irq[(pos5 & 0x06) >> 2];
266
267 /* find location of shared mem and it's size */
268 id = (pos3 & 0x9f);
269 for(i=0; we_mca_elite_mem[i].maddr; i++)
270 if (we_mca_elite_mem[i].id == id)
271 break;
272 if (we_mca_elite_mem[i].maddr == 0) {
273 printf("\n%s: cannot find Shared Ram Base Address\n",
274 sc->sc_dev.dv_xname);
275 return;
276 }
277
278 maddr = we_mca_elite_mem[i].maddr;
279 sc->mem_size = we_mca_elite_mem[i].memsize;
280 }
281
282 nict = asict = ma->ma_iot;
283 memt = ma->ma_memt;
284
285 printf(" slot %d: %s\n", ma->ma_slot + 1, wep->we_name);
286
287 /* Map the device. */
288 if (bus_space_map(asict, iobase, WE_NPORTS, 0, &asich)) {
289 printf("%s: can't map nic i/o space\n",
290 sc->sc_dev.dv_xname);
291 return;
292 }
293
294 if (bus_space_subregion(asict, asich, WE_NIC_OFFSET, WE_NIC_NPORTS,
295 &nich)) {
296 printf("%s: can't subregion i/o space\n",
297 sc->sc_dev.dv_xname);
298 return;
299 }
300
301 wsc->sc_type = wep->we_type;
302 wsc->sc_16bitp = 1; /* all cards we support are 16bit */
303 sc->is790 = 0;
304 typestr = wep->we_typestr;
305
306 /*
307 * Map memory space.
308 */
309 if (bus_space_map(memt, maddr, sc->mem_size, 0, &memh)) {
310 printf("%s: can't map shared memory\n",
311 sc->sc_dev.dv_xname);
312 return;
313 }
314
315 wsc->sc_asict = asict;
316 wsc->sc_asich = asich;
317
318 sc->sc_regt = nict;
319 sc->sc_regh = nich;
320
321 sc->sc_buft = memt;
322 sc->sc_bufh = memh;
323
324 wsc->sc_maddr = maddr;
325
326 /* Interface is always enabled. */
327 sc->sc_enabled = 1;
328
329 wsc->sc_init_hook = we_mca_init_hook;
330
331 if (we_config(self, wsc, typestr))
332 return;
333
334 /* Map and establish the interrupt. */
335 wsc->sc_ih = mca_intr_establish(ma->ma_mc, irq,
336 IPL_NET, dp8390_intr, sc);
337 if (wsc->sc_ih == NULL) {
338 printf("%s: can't establish interrupt\n", sc->sc_dev.dv_xname);
339 return;
340 }
341 printf("%s: interrupting at irq %d\n", sc->sc_dev.dv_xname, irq);
342 }
343
344 void
345 we_mca_init_hook(wsc)
346 struct we_softc *wsc;
347 {
348 /*
349 * This quirk really needs to be here, at least for WD8003W/A. Without
350 * this, the card doesn't send any interrupts in 16bit mode. The quirk
351 * was taken from Linux smc-mca.c driver.
352 * I do not know why it's necessary. I don't want to know. It works
353 * and that is enough for me.
354 */
355 bus_space_write_1(wsc->sc_asict, wsc->sc_asich, WE_LAAR, 0x04);
356 wsc->sc_laar_proto |= 0x04;
357 }
358