1 /* $NetBSD: if_le.c,v 1.43 2022/09/25 18:03:04 thorpej 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 Charles M. Hannum; Jason R. Thorpe of the Numerical Aerospace
9 * Simulation Facility, NASA Ames Research Center; Paul Kranenburg.
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 *
20 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
21 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
22 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
23 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
24 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
25 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
26 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
27 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
28 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
29 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
30 * POSSIBILITY OF SUCH DAMAGE.
31 */
32
33 #include <sys/cdefs.h>
34 __KERNEL_RCSID(0, "$NetBSD: if_le.c,v 1.43 2022/09/25 18:03:04 thorpej Exp $");
35
36 #include "opt_inet.h"
37
38 #include <sys/param.h>
39 #include <sys/systm.h>
40 #include <sys/mbuf.h>
41 #include <sys/syslog.h>
42 #include <sys/socket.h>
43 #include <sys/device.h>
44
45 #include <net/if.h>
46 #include <net/if_ether.h>
47 #include <net/if_media.h>
48
49 #include <sys/bus.h>
50 #include <sys/intr.h>
51 #include <machine/autoconf.h>
52
53 #include <dev/sbus/sbusvar.h>
54 #include <dev/sbus/lebuffervar.h> /*XXX*/
55
56 #include <dev/ic/lancereg.h>
57 #include <dev/ic/lancevar.h>
58 #include <dev/ic/am7990reg.h>
59 #include <dev/ic/am7990var.h>
60
61 #include "ioconf.h"
62
63 /*
64 * LANCE registers.
65 */
66 #define LEREG1_RDP 0 /* Register Data port */
67 #define LEREG1_RAP 2 /* Register Address port */
68
69 struct le_softc {
70 struct am7990_softc sc_am7990; /* glue to MI code */
71 bus_space_tag_t sc_bustag;
72 bus_dma_tag_t sc_dmatag;
73 bus_dmamap_t sc_dmamap;
74 bus_space_handle_t sc_reg;
75 };
76
77 #define MEMSIZE 0x4000 /* LANCE memory size */
78
79 int lematch_sbus(device_t, cfdata_t, void *);
80 void leattach_sbus(device_t, device_t, void *);
81
82 /*
83 * Media types supported.
84 */
85 static int lemedia[] = {
86 IFM_ETHER | IFM_10_5,
87 };
88 #define NLEMEDIA __arraycount(lemedia)
89
90 CFATTACH_DECL_NEW(le_sbus, sizeof(struct le_softc),
91 lematch_sbus, leattach_sbus, NULL, NULL);
92
93 #if defined(_KERNEL_OPT)
94 #include "opt_ddb.h"
95 #endif
96
97 static void lewrcsr(struct lance_softc *, uint16_t, uint16_t);
98 static uint16_t lerdcsr(struct lance_softc *, uint16_t);
99
100 static void
lewrcsr(struct lance_softc * sc,uint16_t port,uint16_t val)101 lewrcsr(struct lance_softc *sc, uint16_t port, uint16_t val)
102 {
103 struct le_softc *lesc = (struct le_softc *)sc;
104 bus_space_tag_t t = lesc->sc_bustag;
105 bus_space_handle_t h = lesc->sc_reg;
106
107 bus_space_write_2(t, h, LEREG1_RAP, port);
108 bus_space_write_2(t, h, LEREG1_RDP, val);
109
110 #if defined(SUN4M)
111 /*
112 * We need to flush the Sbus->Mbus write buffers. This can most
113 * easily be accomplished by reading back the register that we
114 * just wrote (thanks to Chris Torek for this solution).
115 */
116 (void)bus_space_read_2(t, h, LEREG1_RDP);
117 #endif
118 }
119
120 static uint16_t
lerdcsr(struct lance_softc * sc,uint16_t port)121 lerdcsr(struct lance_softc *sc, uint16_t port)
122 {
123 struct le_softc *lesc = (struct le_softc *)sc;
124 bus_space_tag_t t = lesc->sc_bustag;
125 bus_space_handle_t h = lesc->sc_reg;
126
127 bus_space_write_2(t, h, LEREG1_RAP, port);
128 return (bus_space_read_2(t, h, LEREG1_RDP));
129 }
130
131
132 int
lematch_sbus(device_t parent,cfdata_t cf,void * aux)133 lematch_sbus(device_t parent, cfdata_t cf, void *aux)
134 {
135 struct sbus_attach_args *sa = aux;
136
137 return (strcmp(cf->cf_name, sa->sa_name) == 0);
138 }
139
140 void
leattach_sbus(device_t parent,device_t self,void * aux)141 leattach_sbus(device_t parent, device_t self, void *aux)
142 {
143 struct le_softc *lesc = device_private(self);
144 struct lance_softc *sc = &lesc->sc_am7990.lsc;
145 struct sbus_attach_args *sa = aux;
146 bus_dma_tag_t dmatag;
147 cfdriver_t lebufcd;
148
149 sc->sc_dev = self;
150 lesc->sc_bustag = sa->sa_bustag;
151 lesc->sc_dmatag = dmatag = sa->sa_dmatag;
152
153 if (sbus_bus_map(sa->sa_bustag,
154 sa->sa_slot,
155 sa->sa_offset,
156 sa->sa_size,
157 0, &lesc->sc_reg) != 0) {
158 aprint_error(": cannot map registers\n");
159 return;
160 }
161
162 /*
163 * Look for an "unallocated" lebuffer and pair it with
164 * this `le' device on the assumption that we're on
165 * a pre-historic ROM that doesn't establish le<=>lebuffer
166 * parent-child relationships.
167 */
168 lebufcd = config_cfdriver_lookup("lebuffer");
169 if (lebufcd != NULL) {
170 int unit;
171
172 /* Check all possible lebuffer units */
173 for (unit = 0; unit < lebufcd->cd_ndevs; unit++) {
174 device_t lebufdev;
175 struct lebuf_softc *lebufsc;
176
177 /* Check if unit is valid */
178 lebufdev = device_lookup(lebufcd, unit);
179 if (lebufdev == NULL)
180 continue;
181
182 /* Check if we have a common sbus parent */
183 if (parent != device_parent(lebufdev))
184 continue;
185 lebufsc = device_private(lebufdev);
186
187 /*
188 * Check if this lebuffer unit is attached
189 * but unused by its child, if_le_lebuffer.
190 * XXX: this won't work if lebuffer is configured
191 * but not le at lebuffer?
192 */
193 if (lebufsc->sc_buffer == 0 || lebufsc->attached != 0)
194 continue;
195
196 /* Assume this lebuffer is my pair */
197 sc->sc_mem = lebufsc->sc_buffer;
198 sc->sc_memsize = lebufsc->sc_bufsiz;
199
200 /* Lance view is offset by buffer location */
201 sc->sc_addr = 0;
202
203 /* Denote it */
204 aprint_normal(" (%s)", device_xname(lebufdev));
205 lebufsc->attached = 1;
206
207 /* That old black magic... */
208 sc->sc_conf3 = prom_getpropint(sa->sa_node,
209 "busmaster-regval",
210 LE_C3_BSWP | LE_C3_ACON | LE_C3_BCON);
211 break;
212 }
213 }
214
215 if (sc->sc_mem == 0) {
216 bus_dma_segment_t seg;
217 int rseg, error;
218
219 #ifndef BUS_DMA_24BIT
220 /* XXX - This flag is not defined on all archs */
221 #define BUS_DMA_24BIT 0
222 #endif
223 /* Get a DMA handle */
224 if ((error = bus_dmamap_create(dmatag, MEMSIZE, 1, MEMSIZE, 0,
225 BUS_DMA_NOWAIT | BUS_DMA_24BIT, &lesc->sc_dmamap)) != 0) {
226 aprint_error(": DMA map create error %d\n", error);
227 return;
228 }
229
230 /* Allocate DMA buffer */
231 if ((error = bus_dmamem_alloc(dmatag, MEMSIZE, 0, 0,
232 &seg, 1, &rseg, BUS_DMA_NOWAIT | BUS_DMA_24BIT)) != 0) {
233 aprint_error(": DMA buffer allocation error %d\n",
234 error);
235 bus_dmamap_destroy(dmatag, lesc->sc_dmamap);
236 return;
237 }
238
239 /* Map DMA buffer into kernel space */
240 if ((error = bus_dmamem_map(dmatag, &seg, rseg, MEMSIZE,
241 (void **)&sc->sc_mem, BUS_DMA_NOWAIT | BUS_DMA_COHERENT))
242 != 0) {
243 aprint_error(": DMA buffer map error %d\n", error);
244 bus_dmamem_free(lesc->sc_dmatag, &seg, rseg);
245 bus_dmamap_destroy(dmatag, lesc->sc_dmamap);
246 return;
247 }
248
249 /* Load DMA buffer */
250 if ((error = bus_dmamap_load(dmatag, lesc->sc_dmamap,
251 sc->sc_mem, MEMSIZE, NULL, BUS_DMA_NOWAIT)) != 0) {
252 aprint_error(": DMA buffer map load error %d\n", error);
253 bus_dmamem_unmap(dmatag, sc->sc_mem, MEMSIZE);
254 bus_dmamem_free(lesc->sc_dmatag, &seg, rseg);
255 bus_dmamap_destroy(dmatag, lesc->sc_dmamap);
256 return;
257 }
258
259 sc->sc_addr = lesc->sc_dmamap->dm_segs[0].ds_addr & 0xffffff;
260 sc->sc_memsize = MEMSIZE;
261 sc->sc_conf3 = LE_C3_BSWP | LE_C3_ACON | LE_C3_BCON;
262 }
263
264 prom_getether(sa->sa_node, sc->sc_enaddr);
265
266 sc->sc_supmedia = lemedia;
267 sc->sc_nsupmedia = NLEMEDIA;
268 sc->sc_defaultmedia = lemedia[0];
269
270 sc->sc_copytodesc = lance_copytobuf_contig;
271 sc->sc_copyfromdesc = lance_copyfrombuf_contig;
272 sc->sc_copytobuf = lance_copytobuf_contig;
273 sc->sc_copyfrombuf = lance_copyfrombuf_contig;
274 sc->sc_zerobuf = lance_zerobuf_contig;
275
276 sc->sc_rdcsr = lerdcsr;
277 sc->sc_wrcsr = lewrcsr;
278
279 am7990_config(&lesc->sc_am7990);
280
281 /* Establish interrupt handler */
282 if (sa->sa_nintr != 0)
283 (void)bus_intr_establish(lesc->sc_bustag, sa->sa_pri,
284 IPL_NET, am7990_intr, sc);
285 }
286