if_le.c revision 1.55 1 /* $NetBSD: if_le.c,v 1.55 2003/11/17 14:37:59 tsutsui 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 Charles M. Hannum and by Jason R. Thorpe.
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 /*-
40 * Copyright (c) 1992, 1993
41 * The Regents of the University of California. All rights reserved.
42 *
43 * This code is derived from software contributed to Berkeley by
44 * Ralph Campbell and Rick Macklem.
45 *
46 * Redistribution and use in source and binary forms, with or without
47 * modification, are permitted provided that the following conditions
48 * are met:
49 * 1. Redistributions of source code must retain the above copyright
50 * notice, this list of conditions and the following disclaimer.
51 * 2. Redistributions in binary form must reproduce the above copyright
52 * notice, this list of conditions and the following disclaimer in the
53 * documentation and/or other materials provided with the distribution.
54 * 3. Neither the name of the University nor the names of its contributors
55 * may be used to endorse or promote products derived from this software
56 * without specific prior written permission.
57 *
58 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
59 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
60 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
61 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
62 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
63 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
64 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
65 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
66 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
67 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
68 * SUCH DAMAGE.
69 *
70 * @(#)if_le.c 8.2 (Berkeley) 11/16/93
71 */
72
73 #include <sys/cdefs.h>
74 __KERNEL_RCSID(0, "$NetBSD: if_le.c,v 1.55 2003/11/17 14:37:59 tsutsui Exp $");
75
76 #include "opt_inet.h"
77 #include "bpfilter.h"
78
79 #include <sys/param.h>
80 #include <sys/systm.h>
81 #include <sys/device.h>
82
83 #include <net/if.h>
84 #include <net/if_ether.h>
85 #include <net/if_media.h>
86
87 #include <dev/ic/lancereg.h>
88 #include <dev/ic/lancevar.h>
89 #include <dev/ic/am7990var.h>
90
91 #include <hp300/dev/diovar.h>
92 #include <hp300/dev/diodevs.h>
93 #include <hp300/dev/if_lereg.h>
94
95 #include "opt_useleds.h"
96
97 #ifdef USELEDS
98 #include <hp300/hp300/leds.h>
99 #endif
100
101 struct le_softc {
102 struct am7990_softc sc_am7990; /* glue to MI code */
103
104 bus_space_tag_t sc_bst;
105
106 bus_space_handle_t sc_bsh0; /* DIO registers */
107 bus_space_handle_t sc_bsh1; /* LANCE registers */
108 bus_space_handle_t sc_bsh2; /* buffer area */
109 };
110
111 int lematch(struct device *, struct cfdata *, void *);
112 void leattach(struct device *, struct device *, void *);
113
114 CFATTACH_DECL(le, sizeof(struct le_softc),
115 lematch, leattach, NULL, NULL);
116
117 int leintr(void *);
118
119 #if defined(_KERNEL_OPT)
120 #include "opt_ddb.h"
121 #endif
122
123 #ifdef DDB
124 #define integrate
125 #define hide
126 #else
127 #define integrate static __inline
128 #define hide static
129 #endif
130
131 hide void le_copytobuf(struct lance_softc *, void *, int, int);
132 hide void le_copyfrombuf(struct lance_softc *, void *, int, int);
133 hide void le_zerobuf(struct lance_softc *, int, int);
134
135 /* offsets for: ID, REGS, MEM, NVRAM */
136 int lestd[] = { 0, 0x4000, 0x8000, 0xC008 };
137
138 hide void lewrcsr(struct lance_softc *, u_int16_t, u_int16_t);
139 hide u_int16_t lerdcsr(struct lance_softc *, u_int16_t);
140
141 hide void
142 lewrcsr(struct lance_softc *sc, u_int16_t port, u_int16_t val)
143 {
144 struct le_softc *lesc = (struct le_softc *)sc;
145 bus_space_tag_t bst = lesc->sc_bst;
146 bus_space_handle_t bsh0 = lesc->sc_bsh0;
147 bus_space_handle_t bsh1 = lesc->sc_bsh1;
148
149 do {
150 bus_space_write_2(bst, bsh1, LER1_RAP, port);
151 } while ((bus_space_read_1(bst, bsh0, LER0_STATUS) & LE_ACK) == 0);
152 do {
153 bus_space_write_2(bst, bsh1, LER1_RDP, val);
154 } while ((bus_space_read_1(bst, bsh0, LER0_STATUS) & LE_ACK) == 0);
155 }
156
157 hide u_int16_t
158 lerdcsr(struct lance_softc *sc, u_int16_t port)
159 {
160 struct le_softc *lesc = (struct le_softc *)sc;
161 bus_space_tag_t bst = lesc->sc_bst;
162 bus_space_handle_t bsh0 = lesc->sc_bsh0;
163 bus_space_handle_t bsh1 = lesc->sc_bsh1;
164 u_int16_t val;
165
166 do {
167 bus_space_write_2(bst, bsh1, LER1_RAP, port);
168 } while ((bus_space_read_1(bst, bsh0, LER0_STATUS) & LE_ACK) == 0);
169 do {
170 val = bus_space_read_2(bst, bsh1, LER1_RDP);
171 } while ((bus_space_read_1(bst, bsh0, LER0_STATUS) & LE_ACK) == 0);
172
173 return (val);
174 }
175
176 int
177 lematch(struct device *parent, struct cfdata *match, void *aux)
178 {
179 struct dio_attach_args *da = aux;
180
181 if (da->da_id == DIO_DEVICE_ID_LAN)
182 return (1);
183 return (0);
184 }
185
186 /*
187 * Interface exists: make available by filling in network interface
188 * record. System will initialize the interface when it is ready
189 * to accept packets.
190 */
191 void
192 leattach(struct device *parent, struct device *self, void *aux)
193 {
194 struct dio_attach_args *da = aux;
195 struct le_softc *lesc = (struct le_softc *)self;
196 struct lance_softc *sc = &lesc->sc_am7990.lsc;
197 bus_space_tag_t bst = da->da_bst;
198 bus_space_handle_t bsh0, bsh1, bsh2;
199 bus_size_t offset;
200 int i;
201
202 if (bus_space_map(bst, (bus_addr_t)dio_scodetopa(da->da_scode),
203 da->da_size, 0, &bsh0)) {
204 printf("\n%s: can't map LANCE registers\n",
205 sc->sc_dev.dv_xname);
206 return;
207 }
208
209 if (bus_space_subregion(bst, bsh0, lestd[1], LER1_SIZE, &bsh1)) {
210 printf("\n%s: can't subregion LANCE space\n",
211 sc->sc_dev.dv_xname);
212 return;
213 }
214
215 if (bus_space_subregion(bst, bsh0, lestd[2], LE_BUFSIZE, &bsh2)) {
216 printf("\n%s: can't subregion buffer space\n",
217 sc->sc_dev.dv_xname);
218 return;
219 }
220
221 lesc->sc_bst = bst;
222 lesc->sc_bsh0 = bsh0;
223 lesc->sc_bsh1 = bsh1;
224 lesc->sc_bsh2 = bsh2;
225
226 bus_space_write_1(bst, bsh0, LER0_ID, 0xff);
227 DELAY(100);
228
229 sc->sc_conf3 = LE_C3_BSWP;
230 sc->sc_addr = 0;
231 sc->sc_memsize = LE_BUFSIZE;
232
233 /*
234 * Read the ethernet address off the board, one nibble at a time.
235 */
236 offset = lestd[3];
237 for (i = 0; i < sizeof(sc->sc_enaddr); i++) {
238 sc->sc_enaddr[i] =
239 (bus_space_read_1(bst, bsh0, ++offset) & 0xf) << 4;
240 offset++;
241 sc->sc_enaddr[i] |=
242 (bus_space_read_1(bst, bsh0, ++offset) & 0xf);
243 offset++;
244 }
245
246 sc->sc_copytodesc = le_copytobuf;
247 sc->sc_copyfromdesc = le_copyfrombuf;
248 sc->sc_copytobuf = le_copytobuf;
249 sc->sc_copyfrombuf = le_copyfrombuf;
250 sc->sc_zerobuf = le_zerobuf;
251
252 sc->sc_rdcsr = lerdcsr;
253 sc->sc_wrcsr = lewrcsr;
254 sc->sc_hwinit = NULL;
255
256 am7990_config(&lesc->sc_am7990);
257
258 /* Establish the interrupt handler. */
259 (void) dio_intr_establish(leintr, sc, da->da_ipl, IPL_NET);
260 bus_space_write_1(bst, bsh0, LER0_STATUS, LE_IE);
261 }
262
263 int
264 leintr(void *arg)
265 {
266 struct lance_softc *sc = arg;
267 #ifdef USELEDS
268 u_int16_t isr;
269
270 isr = lerdcsr(sc, LE_CSR0);
271
272 if ((isr & LE_C0_INTR) == 0)
273 return (0);
274
275 if (isr & LE_C0_RINT)
276 ledcontrol(0, 0, LED_LANRCV);
277
278 if (isr & LE_C0_TINT)
279 ledcontrol(0, 0, LED_LANXMT);
280 #endif /* USELEDS */
281
282 return (am7990_intr(sc));
283 }
284
285 hide void
286 le_copytobuf(struct lance_softc *sc, void *from, int boff, int len)
287 {
288 struct le_softc *lesc = (struct le_softc *)sc;
289
290 bus_space_write_region_1(lesc->sc_bst, lesc->sc_bsh2, boff, from, len);
291 }
292
293 hide void
294 le_copyfrombuf(struct lance_softc *sc, void *to, int boff, int len)
295 {
296 struct le_softc *lesc = (struct le_softc *)sc;
297
298 bus_space_read_region_1(lesc->sc_bst, lesc->sc_bsh2, boff, to, len);
299 }
300
301 hide void
302 le_zerobuf(struct lance_softc *sc, int boff, int len)
303 {
304 struct le_softc *lesc = (struct le_softc *)sc;
305
306 bus_space_set_region_1(lesc->sc_bst, lesc->sc_bsh2, boff, 0, len);
307 }
308