if_le_ledma.c revision 155093
1/*	$NetBSD: if_le_ledma.c,v 1.26 2005/12/11 12:23:44 christos 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 * 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#include <sys/cdefs.h>
41__FBSDID("$FreeBSD: head/sys/dev/le/if_le_ledma.c 155093 2006-01-31 14:48:58Z marius $");
42
43#include <sys/param.h>
44#include <sys/systm.h>
45#include <sys/bus.h>
46#include <sys/endian.h>
47#include <sys/kernel.h>
48#include <sys/lock.h>
49#include <sys/module.h>
50#include <sys/mutex.h>
51#include <sys/resource.h>
52#include <sys/rman.h>
53#include <sys/socket.h>
54
55#include <dev/ofw/ofw_bus.h>
56
57#include <machine/bus.h>
58#include <machine/ofw_machdep.h>
59#include <machine/resource.h>
60
61#include <net/ethernet.h>
62#include <net/if.h>
63#include <net/if_media.h>
64
65#include <sparc64/sbus/lsi64854reg.h>
66#include <sparc64/sbus/lsi64854var.h>
67
68#include <dev/le/lancereg.h>
69#include <dev/le/lancevar.h>
70#include <dev/le/am7990var.h>
71
72#define	LEDMA_BOUNDARY	(16*1024*1024)	/* must not cross 16MB boundary */
73#define	LEDMA_MEMSIZE	(16*1024)	/* LANCE memory size */
74#define	LEREG1_RDP	0		/* Register Data Port */
75#define	LEREG1_RAP	2		/* Register Address Port */
76
77struct le_dma_softc {
78	struct am7990_softc	sc_am7990;	/* glue to MI code */
79
80	int			sc_rrid;
81	struct resource		*sc_rres;
82	bus_space_tag_t		sc_regt;
83	bus_space_handle_t	sc_regh;
84
85	int			sc_irid;
86	struct resource		*sc_ires;
87	void			*sc_ih;
88
89	bus_dma_tag_t		sc_dmat;
90	bus_dmamap_t		sc_dmam;
91	bus_addr_t		sc_laddr;	/* LANCE DMA address */
92
93	struct lsi64854_softc	*sc_dma;	/* pointer to DMA engine */
94};
95
96static device_probe_t le_dma_probe;
97static device_attach_t le_dma_attach;
98static device_detach_t le_dma_detach;
99static device_resume_t le_dma_resume;
100static device_suspend_t le_dma_suspend;
101
102static device_method_t le_dma_methods[] = {
103	/* Device interface */
104	DEVMETHOD(device_probe,		le_dma_probe),
105	DEVMETHOD(device_attach,	le_dma_attach),
106	DEVMETHOD(device_detach,	le_dma_detach),
107	/* We can just use the suspend method here. */
108	DEVMETHOD(device_shutdown,	le_dma_suspend),
109	DEVMETHOD(device_suspend,	le_dma_suspend),
110	DEVMETHOD(device_resume,	le_dma_resume),
111
112	{ 0, 0 }
113};
114
115DEFINE_CLASS_0(le, le_dma_driver, le_dma_methods, sizeof(struct le_dma_softc));
116DRIVER_MODULE(le, dma, le_dma_driver, le_devclass, 0, 0);
117MODULE_DEPEND(le, ether, 1, 1, 1);
118
119/*
120 * Media types supported
121 */
122static const int le_dma_supmedia[] = {
123	IFM_MAKEWORD(IFM_ETHER, IFM_AUTO, 0, 0),
124	IFM_MAKEWORD(IFM_ETHER, IFM_10_T, 0, 0),
125	IFM_MAKEWORD(IFM_ETHER, IFM_10_5, 0, 0)
126};
127
128static void le_dma_wrcsr(struct lance_softc *, uint16_t, uint16_t);
129static uint16_t le_dma_rdcsr(struct lance_softc *, uint16_t);
130static void le_dma_setutp(struct lance_softc *);
131static void le_dma_setaui(struct lance_softc *);
132static int le_dma_supmediachange(struct lance_softc *);
133static void le_dma_supmediastatus(struct lance_softc *, struct ifmediareq *);
134static void le_dma_hwreset(struct lance_softc *);
135static int le_dma_hwintr(struct lance_softc *);
136static void le_dma_nocarrier(struct lance_softc *);
137static bus_dmamap_callback_t le_dma_dma_callback;
138
139static void
140le_dma_wrcsr(struct lance_softc *sc, uint16_t port, uint16_t val)
141{
142	struct le_dma_softc *lesc = (struct le_dma_softc *)sc;
143
144	bus_space_write_2(lesc->sc_regt, lesc->sc_regh, LEREG1_RAP, port);
145	bus_space_barrier(lesc->sc_regt, lesc->sc_regh, LEREG1_RAP, 2,
146	    BUS_SPACE_BARRIER_WRITE);
147	bus_space_write_2(lesc->sc_regt, lesc->sc_regh, LEREG1_RDP, val);
148}
149
150static uint16_t
151le_dma_rdcsr(struct lance_softc *sc, uint16_t port)
152{
153	struct le_dma_softc *lesc = (struct le_dma_softc *)sc;
154
155	bus_space_write_2(lesc->sc_regt, lesc->sc_regh, LEREG1_RAP, port);
156	bus_space_barrier(lesc->sc_regt, lesc->sc_regh, LEREG1_RAP, 2,
157	    BUS_SPACE_BARRIER_WRITE);
158	return (bus_space_read_2(lesc->sc_regt, lesc->sc_regh, LEREG1_RDP));
159}
160
161static void
162le_dma_setutp(struct lance_softc *sc)
163{
164	struct lsi64854_softc *dma = ((struct le_dma_softc *)sc)->sc_dma;
165
166	L64854_SCSR(dma, L64854_GCSR(dma) | E_TP_AUI);
167	DELAY(20000);	/* We must not touch the LANCE chip for 20ms. */
168}
169
170static void
171le_dma_setaui(struct lance_softc *sc)
172{
173	struct lsi64854_softc *dma = ((struct le_dma_softc *)sc)->sc_dma;
174
175	L64854_SCSR(dma, L64854_GCSR(dma) & ~E_TP_AUI);
176	DELAY(20000);	/* We must not touch the LANCE chip for 20ms. */
177}
178
179static int
180le_dma_supmediachange(struct lance_softc *sc)
181{
182	struct ifmedia *ifm = &sc->sc_media;
183
184	if (IFM_TYPE(ifm->ifm_media) != IFM_ETHER)
185		return (EINVAL);
186
187	/*
188	 * Switch to the selected media. If autoselect is set, we don't
189	 * really have to do anything. We'll switch to the other media
190	 * when we detect loss of carrier.
191	 */
192	switch (IFM_SUBTYPE(ifm->ifm_media)) {
193	case IFM_10_T:
194		le_dma_setutp(sc);
195		break;
196
197	case IFM_10_5:
198		le_dma_setaui(sc);
199		break;
200
201	case IFM_AUTO:
202		break;
203
204	default:
205		return (EINVAL);
206	}
207
208	return (0);
209}
210
211static void
212le_dma_supmediastatus(struct lance_softc *sc, struct ifmediareq *ifmr)
213{
214	struct lsi64854_softc *dma = ((struct le_dma_softc *)sc)->sc_dma;
215
216	/*
217	 * Notify the world which media we're currently using.
218	 */
219	if (L64854_GCSR(dma) & E_TP_AUI)
220		ifmr->ifm_active = IFM_MAKEWORD(IFM_ETHER, IFM_10_T, 0, 0);
221	else
222		ifmr->ifm_active = IFM_MAKEWORD(IFM_ETHER, IFM_10_5, 0, 0);
223}
224
225static void
226le_dma_hwreset(struct lance_softc *sc)
227{
228	struct le_dma_softc *lesc = (struct le_dma_softc *)sc;
229	struct lsi64854_softc *dma = lesc->sc_dma;
230	uint32_t aui_bit, csr;
231
232	/*
233	 * Reset DMA channel.
234	 */
235	csr = L64854_GCSR(dma);
236	aui_bit = csr & E_TP_AUI;
237	DMA_RESET(dma);
238
239	/* Write bits 24-31 of Lance address. */
240	bus_space_write_4(dma->sc_regt, dma->sc_regh, L64854_REG_ENBAR,
241	    lesc->sc_laddr & 0xff000000);
242
243	DMA_ENINTR(dma);
244
245	/*
246	 * Disable E-cache invalidates on chip writes.
247	 * Retain previous cable selection bit.
248	 */
249	csr = L64854_GCSR(dma);
250	csr |= (E_DSBL_WR_INVAL | aui_bit);
251	L64854_SCSR(dma, csr);
252	DELAY(20000);	/* We must not touch the LANCE chip for 20ms. */
253}
254
255static int
256le_dma_hwintr(struct lance_softc *sc)
257{
258	struct le_dma_softc *lesc = (struct le_dma_softc *)sc;
259	struct lsi64854_softc *dma = lesc->sc_dma;
260
261	return (DMA_INTR(dma));
262}
263
264static void
265le_dma_nocarrier(struct lance_softc *sc)
266{
267	struct le_dma_softc *lesc = (struct le_dma_softc *)sc;
268
269	/*
270	 * Check if the user has requested a certain cable type, and
271	 * if so, honor that request.
272	 */
273
274	if (L64854_GCSR(lesc->sc_dma) & E_TP_AUI) {
275		switch (IFM_SUBTYPE(sc->sc_media.ifm_media)) {
276		case IFM_10_5:
277		case IFM_AUTO:
278			if_printf(sc->sc_ifp, "lost carrier on UTP port, "
279			    "switching to AUI port\n");
280			le_dma_setaui(sc);
281		}
282	} else {
283		switch (IFM_SUBTYPE(sc->sc_media.ifm_media)) {
284		case IFM_10_T:
285		case IFM_AUTO:
286			if_printf(sc->sc_ifp, "lost carrier on AUI port, "
287			    "switching to UTP port\n");
288			le_dma_setutp(sc);
289		}
290	}
291}
292
293static void
294le_dma_dma_callback(void *xsc, bus_dma_segment_t *segs, int nsegs, int error)
295{
296	struct le_dma_softc *lesc = (struct le_dma_softc *)xsc;
297
298	if (error != 0)
299		return;
300	KASSERT(nsegs == 1, ("%s: bad DMA segment count", __func__));
301	lesc->sc_laddr = segs[0].ds_addr;
302}
303
304static int
305le_dma_probe(device_t dev)
306{
307
308	if (strcmp(ofw_bus_get_name(dev), "le") == 0) {
309		device_set_desc(dev, "LANCE Ethernet");
310		return (BUS_PROBE_DEFAULT);
311	}
312	return (ENXIO);
313}
314
315static int
316le_dma_attach(device_t dev)
317{
318	struct le_dma_softc *lesc;
319	struct lsi64854_softc *dma;
320	struct lance_softc *sc;
321	int error;
322
323	lesc = device_get_softc(dev);
324	sc = &lesc->sc_am7990.lsc;
325
326	LE_LOCK_INIT(sc, device_get_nameunit(dev));
327
328	/*
329	 * Establish link to `ledma' device.
330	 * XXX hackery.
331	 */
332	dma = (struct lsi64854_softc *)device_get_softc(device_get_parent(dev));
333	lesc->sc_dma = dma;
334	lesc->sc_dma->sc_client = lesc;
335
336	lesc->sc_rrid = 0;
337	lesc->sc_rres = bus_alloc_resource_any(dev, SYS_RES_MEMORY,
338	    &lesc->sc_rrid, RF_ACTIVE);
339	if (lesc->sc_rres == NULL) {
340		device_printf(dev, "cannot allocate registers\n");
341		error = ENXIO;
342		goto fail_mtx;
343	}
344	lesc->sc_regt = rman_get_bustag(lesc->sc_rres);
345	lesc->sc_regh = rman_get_bushandle(lesc->sc_rres);
346
347	lesc->sc_irid = 0;
348	if ((lesc->sc_ires = bus_alloc_resource_any(dev, SYS_RES_IRQ,
349	    &lesc->sc_irid, RF_SHAREABLE | RF_ACTIVE)) == NULL) {
350		device_printf(dev, "cannot allocate interrupt\n");
351		error = ENXIO;
352		goto fail_rres;
353	}
354
355	sc->sc_memsize = LEDMA_MEMSIZE;
356	error = bus_dma_tag_create(
357	    dma->sc_parent_dmat,	/* parent */
358	    1, LEDMA_BOUNDARY,		/* alignment, boundary */
359	    BUS_SPACE_MAXADDR_32BIT,	/* lowaddr */
360	    BUS_SPACE_MAXADDR,		/* highaddr */
361	    NULL, NULL,			/* filter, filterarg */
362	    sc->sc_memsize,		/* maxsize */
363	    1,				/* nsegments */
364	    sc->sc_memsize,		/* maxsegsize */
365	    BUS_DMA_WAITOK,		/* flags */
366	    NULL, NULL,			/* lockfunc, lockarg */
367	    &lesc->sc_dmat);
368	if (error != 0) {
369		device_printf(dev, "cannot allocate buffer DMA tag\n");
370		goto fail_ires;
371	}
372
373	error = bus_dmamem_alloc(lesc->sc_dmat, (void **)&sc->sc_mem,
374	    BUS_DMA_WAITOK | BUS_DMA_COHERENT, &lesc->sc_dmam);
375	if (error != 0) {
376		device_printf(dev, "cannot allocate DMA buffer memory\n");
377		goto fail_dtag;
378	}
379
380	lesc->sc_laddr = 0;
381	error = bus_dmamap_load(lesc->sc_dmat, lesc->sc_dmam, sc->sc_mem,
382	    sc->sc_memsize, le_dma_dma_callback, lesc, 0);
383	if (error != 0 || lesc->sc_laddr == 0) {
384                device_printf(dev, "cannot load DMA buffer map\n");
385		goto fail_dmem;
386	}
387
388	sc->sc_addr = lesc->sc_laddr & 0xffffff;
389	sc->sc_flags = 0;
390	sc->sc_conf3 = LE_C3_BSWP | LE_C3_ACON | LE_C3_BCON;
391
392	sc->sc_mediachange = le_dma_supmediachange;
393	sc->sc_mediastatus = le_dma_supmediastatus;
394	sc->sc_supmedia = le_dma_supmedia;
395	sc->sc_nsupmedia = sizeof(le_dma_supmedia) / sizeof(le_dma_supmedia[0]);
396	sc->sc_defaultmedia = le_dma_supmedia[0];
397
398	OF_getetheraddr(dev, sc->sc_enaddr);
399
400	sc->sc_copytodesc = lance_copytobuf_contig;
401	sc->sc_copyfromdesc = lance_copyfrombuf_contig;
402	sc->sc_copytobuf = lance_copytobuf_contig;
403	sc->sc_copyfrombuf = lance_copyfrombuf_contig;
404	sc->sc_zerobuf = lance_zerobuf_contig;
405
406	sc->sc_rdcsr = le_dma_rdcsr;
407	sc->sc_wrcsr = le_dma_wrcsr;
408	sc->sc_nocarrier = le_dma_nocarrier;
409	sc->sc_hwreset = le_dma_hwreset;
410	sc->sc_hwintr = le_dma_hwintr;
411
412	error = am7990_config(&lesc->sc_am7990, device_get_name(dev),
413	    device_get_unit(dev));
414	if (error != 0) {
415		device_printf(dev, "cannot attach AM7990\n");
416		goto fail_dmap;
417	}
418
419	error = bus_setup_intr(dev, lesc->sc_ires, INTR_TYPE_NET | INTR_MPSAFE,
420	    am7990_intr, sc, &lesc->sc_ih);
421	if (error != 0) {
422		device_printf(dev, "cannot set up interrupt\n");
423		goto fail_am7990;
424	}
425
426	return (0);
427
428 fail_am7990:
429	am7990_detach(&lesc->sc_am7990);
430 fail_dmap:
431	bus_dmamap_unload(lesc->sc_dmat, lesc->sc_dmam);
432 fail_dmem:
433	bus_dmamem_free(lesc->sc_dmat, sc->sc_mem, lesc->sc_dmam);
434 fail_dtag:
435	bus_dma_tag_destroy(lesc->sc_dmat);
436 fail_ires:
437	bus_release_resource(dev, SYS_RES_IRQ, lesc->sc_irid, lesc->sc_ires);
438 fail_rres:
439	bus_release_resource(dev, SYS_RES_MEMORY, lesc->sc_rrid, lesc->sc_rres);
440 fail_mtx:
441	LE_LOCK_DESTROY(sc);
442	return (error);
443}
444
445static int
446le_dma_detach(device_t dev)
447{
448	struct le_dma_softc *lesc;
449	struct lance_softc *sc;
450
451	lesc = device_get_softc(dev);
452	sc = &lesc->sc_am7990.lsc;
453
454	bus_teardown_intr(dev, lesc->sc_ires, lesc->sc_ih);
455	am7990_detach(&lesc->sc_am7990);
456	bus_dmamap_unload(lesc->sc_dmat, lesc->sc_dmam);
457	bus_dmamem_free(lesc->sc_dmat, sc->sc_mem, lesc->sc_dmam);
458	bus_dma_tag_destroy(lesc->sc_dmat);
459	bus_release_resource(dev, SYS_RES_IRQ, lesc->sc_irid, lesc->sc_ires);
460	bus_release_resource(dev, SYS_RES_MEMORY, lesc->sc_rrid, lesc->sc_rres);
461	LE_LOCK_DESTROY(sc);
462
463	return (0);
464}
465
466static int
467le_dma_suspend(device_t dev)
468{
469	struct le_dma_softc *lesc;
470
471	lesc = device_get_softc(dev);
472
473	lance_suspend(&lesc->sc_am7990.lsc);
474
475	return (0);
476}
477
478static int
479le_dma_resume(device_t dev)
480{
481	struct le_dma_softc *lesc;
482
483	lesc = device_get_softc(dev);
484
485	lance_resume(&lesc->sc_am7990.lsc);
486
487	return (0);
488}
489