1/*	$NetBSD: if_cs_isa.c,v 1.25 2009/09/22 16:44:08 tsutsui Exp $	*/
2
3/*
4 * Copyright 1997
5 * Digital Equipment Corporation. All rights reserved.
6 *
7 * This software is furnished under license and may be used and
8 * copied only in accordance with the following terms and conditions.
9 * Subject to these conditions, you may download, copy, install,
10 * use, modify and distribute this software in source and/or binary
11 * form. No title or ownership is transferred hereby.
12 *
13 * 1) Any source code used, modified or distributed must reproduce
14 *    and retain this copyright notice and list of conditions as
15 *    they appear in the source file.
16 *
17 * 2) No right is granted to use any trade name, trademark, or logo of
18 *    Digital Equipment Corporation. Neither the "Digital Equipment
19 *    Corporation" name nor any trademark or logo of Digital Equipment
20 *    Corporation may be used to endorse or promote products derived
21 *    from this software without the prior written permission of
22 *    Digital Equipment Corporation.
23 *
24 * 3) This software is provided "AS-IS" and any express or implied
25 *    warranties, including but not limited to, any implied warranties
26 *    of merchantability, fitness for a particular purpose, or
27 *    non-infringement are disclaimed. In no event shall DIGITAL be
28 *    liable for any damages whatsoever, and in particular, DIGITAL
29 *    shall not be liable for special, indirect, consequential, or
30 *    incidental damages or damages for lost profits, loss of
31 *    revenue or loss of use, whether such damages arise in contract,
32 *    negligence, tort, under statute, in equity, at law or otherwise,
33 *    even if advised of the possibility of such damage.
34 */
35
36#include <sys/cdefs.h>
37__KERNEL_RCSID(0, "$NetBSD: if_cs_isa.c,v 1.25 2009/09/22 16:44:08 tsutsui Exp $");
38
39#include <sys/param.h>
40#include <sys/systm.h>
41#include <sys/socket.h>
42#include <sys/device.h>
43
44#include <sys/rnd.h>
45
46#include <net/if.h>
47#include <net/if_ether.h>
48#include <net/if_media.h>
49
50#include <sys/bus.h>
51#include <sys/intr.h>
52
53#include <dev/isa/isareg.h>
54#include <dev/isa/isavar.h>
55#include <dev/isa/isadmavar.h>
56
57#include <dev/ic/cs89x0reg.h>
58#include <dev/ic/cs89x0var.h>
59#include <dev/isa/cs89x0isavar.h>
60
61static int	cs_isa_probe(device_t, cfdata_t, void *);
62static void	cs_isa_attach(device_t, device_t, void *);
63
64CFATTACH_DECL_NEW(cs_isa, sizeof(struct cs_softc_isa),
65    cs_isa_probe, cs_isa_attach, NULL, NULL);
66
67int
68cs_isa_probe(device_t parent, cfdata_t cf, void *aux)
69{
70	struct isa_attach_args *ia = aux;
71	bus_space_tag_t iot = ia->ia_iot;
72	bus_space_tag_t memt = ia->ia_memt;
73	bus_space_handle_t ioh, memh;
74	struct cs_softc sc;
75	int rv = 0, have_io = 0, have_mem = 0;
76	u_int16_t isa_cfg, isa_membase;
77	int maddr, irq;
78
79	if (ia->ia_nio < 1)
80		return (0);
81	if (ia->ia_nirq < 1)
82		return (0);
83
84	if (ISA_DIRECT_CONFIG(ia))
85		return (0);
86
87	/*
88	 * Disallow wildcarded I/O base.
89	 */
90	if (ia->ia_io[0].ir_addr == ISA_UNKNOWN_PORT)
91		return (0);
92
93	if (ia->ia_niomem > 0)
94		maddr = ia->ia_iomem[0].ir_addr;
95	else
96		maddr = ISA_UNKNOWN_IOMEM;
97
98	/*
99	 * Map the I/O space.
100	 */
101	if (bus_space_map(ia->ia_iot, ia->ia_io[0].ir_addr, CS8900_IOSIZE,
102	    0, &ioh))
103		goto out;
104	have_io = 1;
105
106	memset(&sc, 0, sizeof sc);
107	sc.sc_iot = iot;
108	sc.sc_ioh = ioh;
109	/* Verify that it's a Crystal product. */
110	if (CS_READ_PACKET_PAGE_IO(&sc, PKTPG_EISA_NUM) !=
111	    EISA_NUM_CRYSTAL)
112		goto out;
113
114	/*
115	 * Verify that it's a supported chip.
116	 */
117	switch (CS_READ_PACKET_PAGE_IO(&sc, PKTPG_PRODUCT_ID) &
118	    PROD_ID_MASK) {
119	case PROD_ID_CS8900:
120#ifdef notyet
121	case PROD_ID_CS8920:
122	case PROD_ID_CS8920M:
123#endif
124		break;
125	default:
126		/* invalid product ID */
127		goto out;
128	}
129
130	/*
131	 * If the IRQ or memory address were not specified, read the
132	 * ISA_CFG EEPROM location.
133	 */
134	if (maddr == ISA_UNKNOWN_IOMEM ||
135	    ia->ia_irq[0].ir_irq == ISA_UNKNOWN_IRQ) {
136		if (cs_verify_eeprom(&sc) == CS_ERROR) {
137			printf("cs_isa_probe: EEPROM bad or missing\n");
138			goto out;
139		}
140		if (cs_read_eeprom(&sc, EEPROM_ISA_CFG, &isa_cfg)
141		    == CS_ERROR) {
142			printf("cs_isa_probe: unable to read ISA_CFG\n");
143			goto out;
144		}
145	}
146
147	/*
148	 * If the IRQ wasn't specified, get it from the EEPROM.
149	 */
150	if (ia->ia_irq[0].ir_irq == ISA_UNKNOWN_IRQ) {
151		irq = isa_cfg & ISA_CFG_IRQ_MASK;
152		if (irq == 3)
153			irq = 5;
154		else
155			irq += 10;
156	} else
157		irq = ia->ia_irq[0].ir_irq;
158
159	/*
160	 * If the memory address wasn't specified, get it from the EEPROM.
161	 */
162	if (maddr == ISA_UNKNOWN_IOMEM) {
163		if ((isa_cfg & ISA_CFG_MEM_MODE) == 0) {
164			/* EEPROM says don't use memory mode. */
165			goto out;
166		}
167		if (cs_read_eeprom(&sc, EEPROM_MEM_BASE, &isa_membase)
168		    == CS_ERROR) {
169			printf("cs_isa_probe: unable to read MEM_BASE\n");
170			goto out;
171		}
172
173		isa_membase &= MEM_BASE_MASK;
174		maddr = (int)isa_membase << 8;
175	}
176
177	/*
178	 * We now have a valid mem address; attempt to map it.
179	 */
180	if (bus_space_map(ia->ia_memt, maddr, CS8900_MEMSIZE, 0, &memh)) {
181		/* Can't map it; fall back on i/o-only mode. */
182		printf("cs_isa_probe: unable to map memory space\n");
183		maddr = ISA_UNKNOWN_IOMEM;
184	} else
185		have_mem = 1;
186
187	ia->ia_nio = 1;
188	ia->ia_io[0].ir_size = CS8900_IOSIZE;
189
190	if (maddr == ISA_UNKNOWN_IOMEM)
191		ia->ia_niomem = 0;
192	else {
193		ia->ia_niomem = 1;
194		ia->ia_iomem[0].ir_addr = maddr;
195		ia->ia_iomem[0].ir_size = CS8900_MEMSIZE;
196	}
197
198	ia->ia_nirq = 1;
199	ia->ia_irq[0].ir_irq = irq;
200
201	rv = 1;
202
203 out:
204	if (have_io)
205		bus_space_unmap(iot, ioh, CS8900_IOSIZE);
206	if (have_mem)
207		bus_space_unmap(memt, memh, CS8900_MEMSIZE);
208
209	return (rv);
210}
211
212void
213cs_isa_attach(device_t parent, device_t self, void *aux)
214{
215	struct cs_softc_isa *isc = device_private(self);
216	struct cs_softc *sc = &isc->sc_cs;
217	struct isa_attach_args *ia = aux;
218
219	sc->sc_dev = self;
220	isc->sc_ic = ia->ia_ic;
221	sc->sc_iot = ia->ia_iot;
222	sc->sc_memt = ia->ia_memt;
223
224	if (ia->ia_ndrq > 0)
225		isc->sc_drq = ia->ia_drq[0].ir_drq;
226	else
227		isc->sc_drq = -1;
228
229	sc->sc_irq = ia->ia_irq[0].ir_irq;
230
231	printf("\n");
232
233	/*
234	 * Map the device.
235	 */
236	if (bus_space_map(sc->sc_iot, ia->ia_io[0].ir_addr, CS8900_IOSIZE,
237	    0, &sc->sc_ioh)) {
238		aprint_error_dev(self, "unable to map i/o space\n");
239		return;
240	}
241
242	/*
243	 * Validate IRQ.
244	 */
245	if (CS8900_IRQ_ISVALID(sc->sc_irq) == 0) {
246		aprint_error_dev(self, "invalid IRQ %d\n", sc->sc_irq);
247		return;
248	}
249
250	/*
251	 * Map the memory space if it was specified.  If we can do this,
252	 * we set ourselves up to use memory mode forever.  Otherwise,
253	 * we fall back on I/O mode.
254	 */
255	if (ia->ia_iomem[0].ir_addr != ISA_UNKNOWN_IOMEM &&
256	    ia->ia_iomem[0].ir_size == CS8900_MEMSIZE &&
257	    CS8900_MEMBASE_ISVALID(ia->ia_iomem[0].ir_addr)) {
258		if (bus_space_map(sc->sc_memt, ia->ia_iomem[0].ir_addr,
259		    CS8900_MEMSIZE, 0, &sc->sc_memh)) {
260			aprint_error_dev(self, "unable to map memory space\n");
261		} else {
262			sc->sc_cfgflags |= CFGFLG_MEM_MODE;
263			sc->sc_pktpgaddr = ia->ia_iomem[0].ir_addr;
264		}
265	}
266
267	sc->sc_ih = isa_intr_establish(ia->ia_ic, sc->sc_irq, IST_EDGE,
268	    IPL_NET, cs_intr, sc);
269	if (sc->sc_ih == NULL) {
270		aprint_error_dev(self, "unable to establish interrupt\n");
271		return;
272	}
273
274	sc->sc_dma_chipinit = cs_isa_dma_chipinit;
275	sc->sc_dma_attach = cs_isa_dma_attach;
276	sc->sc_dma_process_rx = cs_process_rx_dma;
277
278	cs_attach(sc, NULL, NULL, 0, 0);
279}
280