1/*-
2 * Copyright (c) 2000 Matthew N. Dodd
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 *    notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 *    notice, this list of conditions and the following disclaimer in the
12 *    documentation and/or other materials provided with the distribution.
13 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 *
26 */
27
28#include <sys/cdefs.h>
29__FBSDID("$FreeBSD$");
30
31#include <sys/param.h>
32#include <sys/systm.h>
33#include <sys/kernel.h>
34#include <sys/socket.h>
35
36#include <sys/module.h>
37#include <sys/bus.h>
38
39#include <machine/bus.h>
40#include <machine/resource.h>
41#include <sys/rman.h>
42
43#include <net/if.h>
44#include <net/if_arp.h>
45#include <net/if_media.h>
46
47
48#include <isa/isavar.h>
49#include <isa/pnpvar.h>
50
51#include <dev/ex/if_exreg.h>
52#include <dev/ex/if_exvar.h>
53
54/* Bus Front End Functions */
55static void	ex_isa_identify(driver_t *, device_t);
56static int	ex_isa_probe(device_t);
57static int	ex_isa_attach(device_t);
58
59static int	ex_look_for_card(struct ex_softc *);
60
61#if 0
62static	void	ex_pnp_wakeup(void *);
63
64SYSINIT(ex_pnpwakeup, SI_SUB_CPU, SI_ORDER_ANY, ex_pnp_wakeup, NULL);
65#endif
66
67static device_method_t ex_isa_methods[] = {
68	/* Device interface */
69	DEVMETHOD(device_identify,	ex_isa_identify),
70	DEVMETHOD(device_probe,		ex_isa_probe),
71	DEVMETHOD(device_attach,	ex_isa_attach),
72	DEVMETHOD(device_detach,	ex_detach),
73
74	{ 0, 0 }
75};
76
77static driver_t ex_isa_driver = {
78	"ex",
79	ex_isa_methods,
80	sizeof(struct ex_softc),
81};
82
83DRIVER_MODULE(ex, isa, ex_isa_driver, ex_devclass, 0, 0);
84
85static struct isa_pnp_id ex_ids[] = {
86	{ 0x3110d425,	NULL },	/* INT1031 */
87	{ 0x3010d425,	NULL },	/* INT1030 */
88	{ 0,		NULL },
89};
90
91#if 0
92#define EX_PNP_WAKE		0x279
93
94static uint8_t ex_pnp_wake_seq[] =
95			{ 0x6A, 0xB5, 0xDA, 0xED, 0xF6, 0xFB, 0x7D, 0xBE,
96			  0xDF, 0x6F, 0x37, 0x1B, 0x0D, 0x86, 0xC3, 0x61,
97			  0xB0, 0x58, 0x2C, 0x16, 0x8B, 0x45, 0xA2, 0xD1,
98			  0xE8, 0x74, 0x3A, 0x9D, 0xCE, 0xE7, 0x73, 0x43 };
99
100static void
101ex_pnp_wakeup (void * dummy)
102{
103	int	tmp;
104
105	if (bootverbose)
106		printf("ex_pnp_wakeup()\n");
107
108	outb(EX_PNP_WAKE, 0);
109	outb(EX_PNP_WAKE, 0);
110	for (tmp = 0; tmp < 32; tmp++) {
111		outb(EX_PNP_WAKE, ex_pnp_wake_seq[tmp]);
112	}
113}
114#endif
115
116/*
117 * Non-destructive identify.
118 */
119static void
120ex_isa_identify(driver_t *driver, device_t parent)
121{
122	device_t	child;
123	bus_addr_t	ioport;
124	u_char 		enaddr[6];
125	u_int		irq;
126	int		tmp;
127	const char *	desc;
128	struct ex_softc sc;
129	int		rid;
130
131	if (bootverbose)
132		printf("ex_isa_identify()\n");
133
134	for (ioport = 0x200; ioport < 0x3a0; ioport += 0x10) {
135		rid = 0;
136		sc.ioport = bus_alloc_resource(parent, SYS_RES_IOPORT, &rid,
137		    ioport, ioport, 0x10, RF_ACTIVE);
138		if (sc.ioport == NULL)
139			continue;
140
141		/* No board found at address */
142		if (!ex_look_for_card(&sc)) {
143			bus_release_resource(parent, SYS_RES_IOPORT, rid,
144			    sc.ioport);
145			continue;
146		}
147
148		if (bootverbose)
149			printf("ex: Found card at 0x%03lx!\n", (unsigned long)ioport);
150
151		/* Board in PnP mode */
152		if (ex_eeprom_read(&sc, EE_W0) & EE_W0_PNP) {
153			/* Reset the card. */
154			CSR_WRITE_1(&sc, CMD_REG, Reset_CMD);
155			DELAY(500);
156			if (bootverbose)
157				printf("ex: card at 0x%03lx in PnP mode!\n", (unsigned long)ioport);
158			bus_release_resource(parent, SYS_RES_IOPORT, rid,
159			    sc.ioport);
160			continue;
161		}
162
163		bzero(enaddr, sizeof(enaddr));
164
165		/* Reset the card. */
166		CSR_WRITE_1(&sc, CMD_REG, Reset_CMD);
167		DELAY(400);
168
169		ex_get_address(&sc, enaddr);
170		tmp = ex_eeprom_read(&sc, EE_W1) & EE_W1_INT_SEL;
171
172		/* work out which set of irq <-> internal tables to use */
173		if (ex_card_type(enaddr) == CARD_TYPE_EX_10_PLUS) {
174			irq  = plus_ee2irqmap[tmp];
175			desc = "Intel Pro/10+";
176		} else {
177			irq = ee2irqmap[tmp];
178			desc = "Intel Pro/10";
179		}
180
181		bus_release_resource(parent, SYS_RES_IOPORT, rid, sc.ioport);
182		child = BUS_ADD_CHILD(parent, ISA_ORDER_SPECULATIVE, "ex", -1);
183		device_set_desc_copy(child, desc);
184		device_set_driver(child, driver);
185		bus_set_resource(child, SYS_RES_IRQ, 0, irq, 1);
186		bus_set_resource(child, SYS_RES_IOPORT, 0, ioport, EX_IOSIZE);
187		if (bootverbose)
188			printf("ex: Adding board at 0x%03lx, irq %d\n",
189			   (unsigned long)ioport, irq);
190	}
191
192	return;
193}
194
195static int
196ex_isa_probe(device_t dev)
197{
198	bus_addr_t	iobase;
199	u_int		irq;
200	char *		irq2ee;
201	u_char *	ee2irq;
202	u_char 		enaddr[6];
203	int		tmp;
204	int		error;
205	struct ex_softc *sc = device_get_softc(dev);
206
207	/* Check isapnp ids */
208	error = ISA_PNP_PROBE(device_get_parent(dev), dev, ex_ids);
209
210	/* If the card had a PnP ID that didn't match any we know about */
211	if (error == ENXIO)
212		return(error);
213
214	/* If we had some other problem. */
215	if (!(error == 0 || error == ENOENT))
216		return(error);
217
218	error = ex_alloc_resources(dev);
219	if (error != 0)
220		goto bad;
221	iobase = bus_get_resource_start(dev, SYS_RES_IOPORT, 0);
222	if (!ex_look_for_card(sc)) {
223		if (bootverbose)
224			printf("ex: no card found at 0x%03lx.\n", (unsigned long)iobase);
225		error = ENXIO;
226		goto bad;
227	}
228	if (bootverbose)
229		printf("ex: ex_isa_probe() found card at 0x%03lx\n", (unsigned long)iobase);
230
231	/*
232	 * Reset the card.
233	 */
234	CSR_WRITE_1(sc, CMD_REG, Reset_CMD);
235	DELAY(800);
236
237	ex_get_address(sc, enaddr);
238
239	/* work out which set of irq <-> internal tables to use */
240	if (ex_card_type(enaddr) == CARD_TYPE_EX_10_PLUS) {
241		irq2ee = plus_irq2eemap;
242		ee2irq = plus_ee2irqmap;
243	} else {
244		irq2ee = irq2eemap;
245		ee2irq = ee2irqmap;
246	}
247
248	tmp = ex_eeprom_read(sc, EE_W1) & EE_W1_INT_SEL;
249	irq = bus_get_resource_start(dev, SYS_RES_IRQ, 0);
250	if (irq > 0) {
251		/* This will happen if board is in PnP mode. */
252		if (ee2irq[tmp] != irq) {
253			device_printf(dev,
254			    "WARNING: IRQ mismatch: EEPROM %d, using %d\n",
255				ee2irq[tmp], irq);
256		}
257	} else {
258		irq = ee2irq[tmp];
259		bus_set_resource(dev, SYS_RES_IRQ, 0, irq, 1);
260	}
261
262	if (irq == 0) {
263		printf("ex: invalid IRQ.\n");
264		error = ENXIO;
265	}
266
267bad:;
268	ex_release_resources(dev);
269	return (error);
270}
271
272static int
273ex_isa_attach(device_t dev)
274{
275	struct ex_softc *	sc = device_get_softc(dev);
276	int			error = 0;
277	uint16_t		temp;
278
279	sc->dev = dev;
280	sc->ioport_rid = 0;
281	sc->irq_rid = 0;
282	sc->flags |= HAS_INT_NO_REG;
283
284	if ((error = ex_alloc_resources(dev)) != 0) {
285		device_printf(dev, "ex_alloc_resources() failed!\n");
286		goto bad;
287	}
288
289	/*
290	 * Fill in several fields of the softc structure:
291	 *	- I/O base address.
292	 *	- Hardware Ethernet address.
293	 *	- IRQ number (if not supplied in config file, read it from EEPROM).
294	 *	- Connector type.
295	 */
296	sc->irq_no = rman_get_start(sc->irq);
297
298	ex_get_address(sc, sc->enaddr);
299
300	temp = ex_eeprom_read(sc, EE_W0);
301	device_printf(sc->dev, "%s config, %s bus, ",
302		(temp & EE_W0_PNP) ? "PnP" : "Manual",
303		(temp & EE_W0_BUS16) ? "16-bit" : "8-bit");
304
305	temp = ex_eeprom_read(sc, EE_W6);
306	printf("board id 0x%03x, stepping 0x%01x\n",
307		(temp & EE_W6_BOARD_MASK) >> EE_W6_BOARD_SHIFT,
308		temp & EE_W6_STEP_MASK);
309
310	if ((error = ex_attach(dev)) != 0) {
311		device_printf(dev, "ex_attach() failed!\n");
312		goto bad;
313	}
314
315	return(0);
316bad:
317	ex_release_resources(dev);
318	return (error);
319}
320
321static int
322ex_look_for_card(struct ex_softc *sc)
323{
324	int count1, count2;
325
326	/*
327	 * Check for the i82595 signature, and check that the round robin
328	 * counter actually advances.
329	 */
330	if (((count1 = CSR_READ_1(sc, ID_REG)) & Id_Mask) != Id_Sig)
331		return(0);
332	count2 = CSR_READ_1(sc, ID_REG);
333	count2 = CSR_READ_1(sc, ID_REG);
334	count2 = CSR_READ_1(sc, ID_REG);
335
336	return((count2 & Counter_bits) == ((count1 + 0xc0) & Counter_bits));
337}
338