xref: /netbsd-src/sys/dev/eisa/if_tlp_eisa.c (revision aaf4ece63a859a04e37cf3a7229b5fab0157cc06)
1 /*	$NetBSD: if_tlp_eisa.c,v 1.14 2005/12/11 12:21:20 christos Exp $	*/
2 
3 /*-
4  * Copyright (c) 1999, 2000 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.
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  * EISA bus front-end for the Digital Semiconductor ``Tulip'' (21x4x)
42  * Ethernet controller family driver.
43  */
44 
45 #include <sys/cdefs.h>
46 __KERNEL_RCSID(0, "$NetBSD: if_tlp_eisa.c,v 1.14 2005/12/11 12:21:20 christos Exp $");
47 
48 #include "opt_inet.h"
49 #include "opt_ns.h"
50 #include "bpfilter.h"
51 
52 #include <sys/param.h>
53 #include <sys/systm.h>
54 #include <sys/mbuf.h>
55 #include <sys/malloc.h>
56 #include <sys/kernel.h>
57 #include <sys/socket.h>
58 #include <sys/ioctl.h>
59 #include <sys/errno.h>
60 #include <sys/device.h>
61 
62 #include <machine/endian.h>
63 
64 #include <net/if.h>
65 #include <net/if_dl.h>
66 #include <net/if_media.h>
67 #include <net/if_ether.h>
68 
69 #if NBPFILTER > 0
70 #include <net/bpf.h>
71 #endif
72 
73 #ifdef INET
74 #include <netinet/in.h>
75 #include <netinet/if_inarp.h>
76 #endif
77 
78 #ifdef NS
79 #include <netns/ns.h>
80 #include <netns/ns_if.h>
81 #endif
82 
83 #include <machine/bus.h>
84 #include <machine/intr.h>
85 
86 #include <dev/mii/miivar.h>
87 #include <dev/mii/mii_bitbang.h>
88 
89 #include <dev/ic/tulipreg.h>
90 #include <dev/ic/tulipvar.h>
91 
92 #include <dev/eisa/eisareg.h>
93 #include <dev/eisa/eisavar.h>
94 #include <dev/eisa/eisadevs.h>
95 
96 #include <dev/pci/pcireg.h>
97 
98 /*
99  * DE425 configuration registers; literal offsets from CSR base.
100  * This is effectively the 21040 PCI configuration space interleaved
101  * into the CSR space (CSRs are space 16 bytes on the DE425).
102  *
103  * What a cool address decoder hack they must have on that board...
104  */
105 #define	DE425_CFID		0x08	/* Configuration ID */
106 #define	DE425_CFCS		0x0c	/* Configuration Command-Status */
107 #define	DE425_CFRV		0x18	/* Configuration Revision */
108 #define	DE425_CFLT		0x1c	/* Configuration Latency Timer */
109 #define	DE425_CBIO		0x28	/* Configuration Base I/O Address */
110 #define	DE425_CFDA		0x2c	/* Configuration Driver Area */
111 #define	DE425_ENETROM		0xc90	/* Offset in I/O space for ENETROM */
112 #define	DE425_CFG0		0xc88	/* IRQ Configuration Register */
113 
114 struct tulip_eisa_softc {
115 	struct tulip_softc sc_tulip;	/* real Tulip softc */
116 
117 	/* EISA-specific goo. */
118 	void	*sc_ih;			/* interrupt handle */
119 };
120 
121 static int	tlp_eisa_match(struct device *, struct cfdata *, void *);
122 static void	tlp_eisa_attach(struct device *, struct device *, void *);
123 
124 CFATTACH_DECL(tlp_eisa, sizeof(struct tulip_eisa_softc),
125     tlp_eisa_match, tlp_eisa_attach, NULL, NULL);
126 
127 static const int tlp_eisa_irqs[] = { 5, 9, 10, 11 };
128 
129 static const struct tulip_eisa_product {
130 	const char	*tep_eisaid;	/* EISA ID */
131 	const char	*tep_name;	/* device name */
132 	tulip_chip_t	tep_chip;	/* base Tulip chip type */
133 } tlp_eisa_products[] = {
134 	{ "DEC4250",			"DEC DE425",
135 	  TULIP_CHIP_DE425 },
136 
137 	{ NULL,				NULL,
138 	  TULIP_CHIP_INVALID },
139 };
140 
141 static const struct tulip_eisa_product *
142 tlp_eisa_lookup(const struct eisa_attach_args *ea)
143 {
144 	const struct tulip_eisa_product *tep;
145 
146 	for (tep = tlp_eisa_products;
147 	     tep->tep_chip != TULIP_CHIP_INVALID; tep++)
148 		if (strcmp(ea->ea_idstring, tep->tep_eisaid) == 0)
149 			return (tep);
150 	return (NULL);
151 }
152 
153 static int
154 tlp_eisa_match(struct device *parent, struct cfdata *match, void *aux)
155 {
156 	struct eisa_attach_args *ea = aux;
157 
158 	if (tlp_eisa_lookup(ea) != NULL)
159 		return (1);
160 
161 	return (0);
162 }
163 
164 static void
165 tlp_eisa_attach(struct device *parent, struct device *self, void *aux)
166 {
167 	static const u_int8_t testpat[] =
168 	    { 0xff, 0, 0x55, 0xaa, 0xff, 0, 0x55, 0xaa };
169 	struct tulip_eisa_softc *esc = (void *) self;
170 	struct tulip_softc *sc = &esc->sc_tulip;
171 	struct eisa_attach_args *ea = aux;
172 	eisa_chipset_tag_t ec = ea->ea_ec;
173 	eisa_intr_handle_t ih;
174 	bus_space_tag_t iot = ea->ea_iot;
175 	bus_space_handle_t ioh;
176 	const char *intrstr;
177 	const struct tulip_eisa_product *tep;
178 	u_int8_t enaddr[ETHER_ADDR_LEN], tmpbuf[sizeof(testpat)];
179 	u_int32_t val;
180 	int irq, i, cnt;
181 
182 	/*
183 	 * Map the device.
184 	 */
185 	if (bus_space_map(iot, EISA_SLOT_ADDR(ea->ea_slot),
186 	    EISA_SLOT_SIZE, 0, &ioh)) {
187 		printf(": unable to map I/O space\n");
188 		return;
189 	}
190 
191 	sc->sc_st = iot;
192 	sc->sc_sh = ioh;
193 
194 	tep = tlp_eisa_lookup(ea);
195 	if (tep == NULL) {
196 		printf("\n");
197 		panic("tlp_eisa_attach: impossible");
198 	}
199 	sc->sc_chip = tep->tep_chip;
200 
201 	/*
202 	 * DE425's registers are 16 bytes long; the PCI configuration
203 	 * space registers are interleaved in the I/O space.
204 	 */
205 	sc->sc_regshift = 4;
206 
207 	/*
208 	 * No power management hooks.
209 	 */
210 	sc->sc_flags |= TULIPF_ENABLED;
211 
212 	/*
213 	 * CBIO must map the EISA slot, and I/O access and Bus Mastering
214 	 * must be enabled.
215 	 */
216 	bus_space_write_4(iot, ioh, DE425_CBIO, EISA_SLOT_ADDR(ea->ea_slot));
217 	bus_space_write_4(iot, ioh, DE425_CFCS,
218 	    bus_space_read_4(iot, ioh, DE425_CFCS) |
219 	    PCI_COMMAND_IO_ENABLE | PCI_COMMAND_MASTER_ENABLE);
220 
221 	/*
222 	 * Get revision info.
223 	 */
224 	sc->sc_rev = bus_space_read_4(iot, ioh, DE425_CFRV) & 0xff;
225 
226 	printf(": %s Ethernet, pass %d.%d\n",
227 	    tep->tep_name, (sc->sc_rev >> 4) & 0xf, sc->sc_rev & 0xf);
228 
229 	sc->sc_dmat = ea->ea_dmat;
230 
231 	/*
232 	 * EISA doesn't have a cache line register.
233 	 */
234 	sc->sc_cacheline = 0;
235 
236 	/*
237 	 * Find the beginning of the Ethernet Address ROM.
238 	 */
239 	for (i = 0, cnt = 0; i < sizeof(testpat) && cnt < 32; cnt++) {
240 		tmpbuf[i] = bus_space_read_1(iot, ioh, DE425_ENETROM);
241 		if (tmpbuf[i] == testpat[i])
242 			i++;
243 		else
244 			i = 0;
245 	}
246 
247 	/*
248 	 * ...and now read the contents of the Ethernet Address ROM.
249 	 */
250 	sc->sc_srom = malloc(32, M_DEVBUF, M_WAITOK|M_ZERO);
251 	for (i = 0; i < 32; i++)
252 		sc->sc_srom[i] = bus_space_read_1(iot, ioh, DE425_ENETROM);
253 
254 	/*
255 	 * None of the DE425 boards have the new-style SROMs.
256 	 */
257 	if (tlp_parse_old_srom(sc, enaddr) == 0) {
258 		printf("%s: unable to decode old-style SROM\n",
259 		    sc->sc_dev.dv_xname);
260 		return;
261 	}
262 
263 	/*
264 	 * All DE425 boards use the 21040 media switch.
265 	 */
266 	sc->sc_mediasw = &tlp_21040_mediasw;
267 
268 	/*
269 	 * Figure out which IRQ we want to use, and determine of it's
270 	 * edge- or level-triggered.
271 	 */
272 	val = bus_space_read_4(iot, ioh, DE425_CFG0);
273 	irq = tlp_eisa_irqs[(val >> 1) & 0x03];
274 
275 	/*
276 	 * Map and establish our interrupt.
277 	 */
278 	if (eisa_intr_map(ec, irq, &ih)) {
279 		printf("%s: unable to map interrupt (%u)\n",
280 		    sc->sc_dev.dv_xname, irq);
281 		return;
282 	}
283 	intrstr = eisa_intr_string(ec, ih);
284 	esc->sc_ih = eisa_intr_establish(ec, ih,
285 	    (val & 0x01) ? IST_EDGE : IST_LEVEL, IPL_NET, tlp_intr, sc);
286 	if (esc->sc_ih == NULL) {
287 		printf("%s: unable to establish interrupt",
288 		    sc->sc_dev.dv_xname);
289 		if (intrstr != NULL)
290 			printf(" at %s", intrstr);
291 		printf("\n");
292 		return;
293 	}
294 	if (intrstr != NULL)
295 		printf("%s: interrupting at %s\n", sc->sc_dev.dv_xname,
296 		    intrstr);
297 
298 	/*
299 	 * Finish off the attach.
300 	 */
301 	tlp_attach(sc, enaddr);
302 }
303