if_ed_pccard.c revision 190898
1/*-
2 * Copyright (c) 2005, M. Warner Losh
3 * Copyright (c) 1995, David Greenman
4 * All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 *    notice unmodified, this list of conditions, and the following
11 *    disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 *    notice, this list of conditions and the following disclaimer in the
14 *    documentation and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26 * SUCH DAMAGE.
27 *
28 * $FreeBSD: head/sys/dev/ed/if_ed_pccard.c 190898 2009-04-10 15:30:19Z imp $
29 */
30
31/*
32 * Notes for adding media support.  Each chipset is somewhat different
33 * from the others.  Linux has a table of OIDs that it uses to see what
34 * supports the misc register of the NS83903.  But a sampling of datasheets
35 * I could dig up on cards I own paints a different picture.
36 *
37 * Chipset specific details:
38 * NS 83903/902A paired
39 *    ccr base 0x1020
40 *    id register at 0x1000: 7-3 = 0, 2-0 = 1.
41 *	(maybe this test is too week)
42 *    misc register at 0x018:
43 *	6 WAIT_TOUTENABLE enable watchdog timeout
44 *	3 AUI/TPI 1 AUX, 0 TPI
45 *	2 loopback
46 *      1 gdlink (tpi mode only) 1 tp good, 0 tp bad
47 *	0 0-no mam, 1 mam connected
48 *
49 * NS83926 appears to be a NS pcmcia glue chip used on the IBM Ethernet II
50 * and the NEC PC9801N-J12 ccr base 0x2000!
51 *
52 * winbond 289c926
53 *    ccr base 0xfd0
54 *    cfb (am 0xff2):
55 *	0-1 PHY01	00 TPI, 01 10B2, 10 10B5, 11 TPI (reduced squ)
56 *	2 LNKEN		0 - enable link and auto switch, 1 disable
57 *	3 LNKSTS	TPI + LNKEN=0 + link good == 1, else 0
58 *    sr (am 0xff4)
59 *	88 00 88 00 88 00, etc
60 *
61 * TMI tc3299a (cr PHY01 == 0)
62 *    ccr base 0x3f8
63 *    cra (io 0xa)
64 *    crb (io 0xb)
65 *	0-1 PHY01	00 auto, 01 res, 10 10B5, 11 TPI
66 *	2 GDLINK	1 disable checking of link
67 *	6 LINK		0 bad link, 1 good link
68 *
69 * EN5017A, EN5020	no data, but very popular
70 * Other chips?
71 * NetBSD supports RTL8019, but none have surfaced that I can see
72 */
73
74#include <sys/param.h>
75#include <sys/systm.h>
76#include <sys/socket.h>
77#include <sys/kernel.h>
78#include <sys/conf.h>
79#include <sys/uio.h>
80
81#include <sys/module.h>
82#include <sys/bus.h>
83#include <machine/bus.h>
84#include <sys/rman.h>
85#include <machine/resource.h>
86
87#include <net/ethernet.h>
88#include <net/if.h>
89#include <net/if_arp.h>
90#include <net/if_mib.h>
91#include <net/if_media.h>
92
93#include <dev/ed/if_edreg.h>
94#include <dev/ed/if_edvar.h>
95#include <dev/ed/ax88x90reg.h>
96#include <dev/ed/dl100xxreg.h>
97#include <dev/ed/tc5299jreg.h>
98#include <dev/pccard/pccardvar.h>
99#include <dev/pccard/pccardreg.h>
100#include <dev/pccard/pccard_cis.h>
101#include <dev/mii/mii.h>
102#include <dev/mii/miivar.h>
103
104#include "card_if.h"
105/* "device miibus" required.  See GENERIC if you get errors here. */
106#include "miibus_if.h"
107#include "pccarddevs.h"
108
109/*
110 * NE-2000 based PC Cards have a number of ways to get the MAC address.
111 * Some cards encode this as a FUNCE.  Others have this in the ROMs the
112 * same way that ISA cards do.  Some have it encoded in the attribute
113 * memory somewhere that isn't in the CIS.  Some new chipsets have it
114 * in special registers in the ASIC part of the chip.
115 *
116 * For those cards that have the MAC adress stored in attribute memory
117 * outside of a FUNCE entry in the CIS, nearly all of them have it at
118 * a fixed offset (0xff0).  We use that offset as a source of last
119 * resource if other offsets have failed.  This is the address of the
120 * National Semiconductor DP83903A, which is the only chip's datasheet
121 * I've found.
122 */
123#define ED_DEFAULT_MAC_OFFSET	0xff0
124
125static const struct ed_product {
126	struct pccard_product	prod;
127	int flags;
128#define	NE2000DVF_DL100XX	0x0001		/* chip is D-Link DL10019/22 */
129#define	NE2000DVF_AX88X90	0x0002		/* chip is ASIX AX88[17]90 */
130#define NE2000DVF_TC5299J	0x0004		/* chip is Tamarack TC5299J */
131#define NE2000DVF_TOSHIBA	0x0008		/* Toshiba DP83902A */
132#define NE2000DVF_ENADDR	0x0100		/* Get MAC from attr mem */
133#define NE2000DVF_ANYFUNC	0x0200		/* Allow any function type */
134#define NE2000DVF_MODEM		0x0400		/* Has a modem/serial */
135	int enoff;
136} ed_pccard_products[] = {
137	{ PCMCIA_CARD(ACCTON, EN2212), 0},
138	{ PCMCIA_CARD(ACCTON, EN2216), 0},
139	{ PCMCIA_CARD(ALLIEDTELESIS, LA_PCM), 0},
140	{ PCMCIA_CARD(AMBICOM, AMB8002T), 0},
141	{ PCMCIA_CARD(BILLIONTON, CFLT10N), 0},
142	{ PCMCIA_CARD(BILLIONTON, LNA100B), NE2000DVF_AX88X90},
143	{ PCMCIA_CARD(BILLIONTON, LNT10TN), 0},
144	{ PCMCIA_CARD(BROMAX, AXNET), NE2000DVF_AX88X90},
145	{ PCMCIA_CARD(BROMAX, IPORT), 0},
146	{ PCMCIA_CARD(BROMAX, IPORT2), 0},
147	{ PCMCIA_CARD(BUFFALO, LPC2_CLT), 0},
148	{ PCMCIA_CARD(BUFFALO, LPC3_CLT), 0},
149	{ PCMCIA_CARD(BUFFALO, LPC3_CLX), NE2000DVF_AX88X90},
150	{ PCMCIA_CARD(BUFFALO, LPC4_TX), NE2000DVF_AX88X90},
151	{ PCMCIA_CARD(BUFFALO, LPC4_CLX), NE2000DVF_AX88X90},
152	{ PCMCIA_CARD(BUFFALO, LPC_CF_CLT), 0},
153	{ PCMCIA_CARD(CNET, NE2000), 0},
154	{ PCMCIA_CARD(COMPEX, AX88190), NE2000DVF_AX88X90},
155	{ PCMCIA_CARD(COMPEX, LANMODEM), 0},
156	{ PCMCIA_CARD(COMPEX, LINKPORT_ENET_B), 0},
157	{ PCMCIA_CARD(COREGA, ETHER_II_PCC_T), 0},
158	{ PCMCIA_CARD(COREGA, ETHER_II_PCC_TD), 0},
159	{ PCMCIA_CARD(COREGA, ETHER_PCC_T), 0},
160	{ PCMCIA_CARD(COREGA, ETHER_PCC_TD), 0},
161	{ PCMCIA_CARD(COREGA, FAST_ETHER_PCC_TX), NE2000DVF_DL100XX},
162	{ PCMCIA_CARD(COREGA, FETHER_PCC_TXD), NE2000DVF_AX88X90},
163	{ PCMCIA_CARD(COREGA, FETHER_PCC_TXF), NE2000DVF_DL100XX},
164	{ PCMCIA_CARD(COREGA, FETHER_II_PCC_TXD), NE2000DVF_AX88X90},
165	{ PCMCIA_CARD(COREGA, LAPCCTXD), 0},
166	{ PCMCIA_CARD(DAYNA, COMMUNICARD_E_1), 0},
167	{ PCMCIA_CARD(DAYNA, COMMUNICARD_E_2), 0},
168	{ PCMCIA_CARD(DLINK, DE650), 0 },
169	{ PCMCIA_CARD(DLINK, DE660), 0 },
170	{ PCMCIA_CARD(DLINK, DE660PLUS), 0},
171	{ PCMCIA_CARD(DYNALINK, L10C), 0},
172	{ PCMCIA_CARD(EDIMAX, EP4000A), 0},
173	{ PCMCIA_CARD(EPSON, EEN10B), NE2000DVF_ENADDR, 0xff0},
174	{ PCMCIA_CARD(EXP, THINLANCOMBO), 0},
175	{ PCMCIA_CARD(GLOBALVILLAGE, LANMODEM), 0},
176	{ PCMCIA_CARD(GREY_CELL, TDK3000), 0},
177	{ PCMCIA_CARD(GREY_CELL, DMF650TX),
178	    NE2000DVF_ANYFUNC | NE2000DVF_DL100XX | NE2000DVF_MODEM},
179	{ PCMCIA_CARD(IBM, HOME_AND_AWAY), 0},
180	{ PCMCIA_CARD(IBM, INFOMOVER), NE2000DVF_ENADDR, 0xff0},
181	{ PCMCIA_CARD(IODATA3, PCLAT), 0},
182	{ PCMCIA_CARD(KINGSTON, CIO10T), 0},
183	{ PCMCIA_CARD(KINGSTON, KNE2), 0},
184	{ PCMCIA_CARD(LANTECH, FASTNETTX), NE2000DVF_AX88X90},
185	{ PCMCIA_CARD(LINKSYS, COMBO_ECARD),
186	    NE2000DVF_DL100XX | NE2000DVF_AX88X90},
187	{ PCMCIA_CARD(LINKSYS, ECARD_1), 0},
188	{ PCMCIA_CARD(LINKSYS, ECARD_2), 0},
189	{ PCMCIA_CARD(LINKSYS, ETHERFAST), NE2000DVF_DL100XX},
190	{ PCMCIA_CARD(LINKSYS, TRUST_COMBO_ECARD), 0},
191	{ PCMCIA_CARD(MACNICA, ME1_JEIDA), 0},
192	{ PCMCIA_CARD(MAGICRAM, ETHER), 0},
193	{ PCMCIA_CARD(MELCO, LPC3_CLX), NE2000DVF_AX88X90},
194	{ PCMCIA_CARD(MELCO, LPC3_TX), NE2000DVF_AX88X90},
195	{ PCMCIA_CARD(MITSUBISHI, B8895), NE2000DVF_ANYFUNC}, /* NG */
196	{ PCMCIA_CARD(MICRORESEARCH, MR10TPC), 0},
197	{ PCMCIA_CARD(NDC, ND5100_E), 0},
198	{ PCMCIA_CARD(NETGEAR, FA410TXC), NE2000DVF_DL100XX},
199	/* Same ID as DLINK DFE-670TXD.  670 has DL10022, fa411 has ax88790 */
200	{ PCMCIA_CARD(NETGEAR, FA411), NE2000DVF_AX88X90 | NE2000DVF_DL100XX},
201	{ PCMCIA_CARD(NEXTCOM, NEXTHAWK), 0},
202	{ PCMCIA_CARD(NEWMEDIA, LANSURFER), 0},
203	{ PCMCIA_CARD(OEM2, ETHERNET), 0},
204	{ PCMCIA_CARD(OEM2, FAST_ETHERNET), NE2000DVF_AX88X90 },
205	{ PCMCIA_CARD(OEM2, NE2000), 0},
206	{ PCMCIA_CARD(PLANET, SMARTCOM2000), 0 },
207	{ PCMCIA_CARD(PREMAX, PE200), 0},
208	{ PCMCIA_CARD(PSION, LANGLOBAL),
209	    NE2000DVF_ANYFUNC | NE2000DVF_AX88X90 | NE2000DVF_MODEM},
210	{ PCMCIA_CARD(RACORE, ETHERNET), 0},
211	{ PCMCIA_CARD(RACORE, FASTENET), NE2000DVF_AX88X90},
212	{ PCMCIA_CARD(RACORE, 8041TX), NE2000DVF_AX88X90 | NE2000DVF_TC5299J},
213	{ PCMCIA_CARD(RELIA, COMBO), 0},
214	{ PCMCIA_CARD(RIOS, PCCARD3), 0},
215	{ PCMCIA_CARD(RPTI, EP400), 0},
216	{ PCMCIA_CARD(RPTI, EP401), 0},
217	{ PCMCIA_CARD(SMC, EZCARD), 0},
218	{ PCMCIA_CARD(SOCKET, EA_ETHER), 0},
219	{ PCMCIA_CARD(SOCKET, ES_1000), 0},
220	{ PCMCIA_CARD(SOCKET, LP_ETHER), 0},
221	{ PCMCIA_CARD(SOCKET, LP_ETHER_CF), 0},
222	{ PCMCIA_CARD(SOCKET, LP_ETH_10_100_CF), NE2000DVF_DL100XX},
223	{ PCMCIA_CARD(SVEC, COMBOCARD), 0},
224	{ PCMCIA_CARD(SVEC, LANCARD), 0},
225	{ PCMCIA_CARD(TAMARACK, ETHERNET), 0},
226	{ PCMCIA_CARD(TDK, CFE_10), 0},
227	{ PCMCIA_CARD(TDK, LAK_CD031), 0},
228	{ PCMCIA_CARD(TDK, DFL5610WS), 0},
229	{ PCMCIA_CARD(TELECOMDEVICE, LM5LT), 0 },
230	{ PCMCIA_CARD(TELECOMDEVICE, TCD_HPC100), NE2000DVF_AX88X90},
231	{ PCMCIA_CARD(TJ, PTJ_LAN_T), 0 },
232	{ PCMCIA_CARD(TOSHIBA2, LANCT00A), NE2000DVF_ANYFUNC | NE2000DVF_TOSHIBA},
233	{ PCMCIA_CARD(ZONET, ZEN), 0},
234	{ { NULL } }
235};
236
237/*
238 *      PC Card (PCMCIA) specific code.
239 */
240static int	ed_pccard_probe(device_t);
241static int	ed_pccard_attach(device_t);
242static void	ed_pccard_tick(void *);
243
244static int	ed_pccard_dl100xx(device_t dev, const struct ed_product *);
245static void	ed_pccard_dl100xx_mii_reset(struct ed_softc *sc);
246static u_int	ed_pccard_dl100xx_mii_readbits(struct ed_softc *sc, int nbits);
247static void	ed_pccard_dl100xx_mii_writebits(struct ed_softc *sc, u_int val,
248    int nbits);
249
250static int	ed_pccard_ax88x90(device_t dev, const struct ed_product *);
251static u_int	ed_pccard_ax88x90_mii_readbits(struct ed_softc *sc, int nbits);
252static void	ed_pccard_ax88x90_mii_writebits(struct ed_softc *sc, u_int val,
253    int nbits);
254
255static int	ed_miibus_readreg(device_t dev, int phy, int reg);
256static int	ed_ifmedia_upd(struct ifnet *);
257static void	ed_ifmedia_sts(struct ifnet *, struct ifmediareq *);
258
259static int	ed_pccard_tc5299j(device_t dev, const struct ed_product *);
260static void	ed_pccard_tc5299j_mii_reset(struct ed_softc *sc);
261static u_int	ed_pccard_tc5299j_mii_readbits(struct ed_softc *sc, int nbits);
262static void	ed_pccard_tc5299j_mii_writebits(struct ed_softc *sc, u_int val,
263    int nbits);
264
265static void
266ed_pccard_print_entry(const struct ed_product *pp)
267{
268	int i;
269
270	printf("Product entry: ");
271	if (pp->prod.pp_name)
272		printf("name='%s',", pp->prod.pp_name);
273	printf("vendor=%#x,product=%#x", pp->prod.pp_vendor,
274	    pp->prod.pp_product);
275	for (i = 0; i < 4; i++)
276		if (pp->prod.pp_cis[i])
277			printf(",CIS%d='%s'", i, pp->prod.pp_cis[i]);
278	printf("\n");
279}
280
281static int
282ed_pccard_probe(device_t dev)
283{
284	const struct ed_product *pp, *pp2;
285	int		error, first = 1;
286	uint32_t	fcn = PCCARD_FUNCTION_UNSPEC;
287
288	/* Make sure we're a network function */
289	error = pccard_get_function(dev, &fcn);
290	if (error != 0)
291		return (error);
292
293	if ((pp = (const struct ed_product *) pccard_product_lookup(dev,
294	    (const struct pccard_product *) ed_pccard_products,
295	    sizeof(ed_pccard_products[0]), NULL)) != NULL) {
296		if (pp->prod.pp_name != NULL)
297			device_set_desc(dev, pp->prod.pp_name);
298		/*
299		 * Some devices don't ID themselves as network, but
300		 * that's OK if the flags say so.
301		 */
302		if (!(pp->flags & NE2000DVF_ANYFUNC) &&
303		    fcn != PCCARD_FUNCTION_NETWORK)
304			return (ENXIO);
305		/*
306		 * Some devices match multiple entries.  Report that
307		 * as a warning to help cull the table
308		 */
309		pp2 = pp;
310		while ((pp2 = (const struct ed_product *)pccard_product_lookup(
311		    dev, (const struct pccard_product *)(pp2 + 1),
312		    sizeof(ed_pccard_products[0]), NULL)) != NULL) {
313			if (first) {
314				device_printf(dev,
315    "Warning: card matches multiple entries.  Report to imp@freebsd.org\n");
316				ed_pccard_print_entry(pp);
317				first = 0;
318			}
319			ed_pccard_print_entry(pp2);
320		}
321
322		return (0);
323	}
324	return (ENXIO);
325}
326
327static int
328ed_pccard_rom_mac(device_t dev, uint8_t *enaddr)
329{
330	struct ed_softc *sc = device_get_softc(dev);
331	uint8_t romdata[32];
332	int i;
333
334	/*
335	 * Read in the rom data at location 0.  Since there are no
336	 * NE-1000 based PC Card devices, we'll assume we're 16-bit.
337	 *
338	 * In researching what format this takes, I've found that the
339	 * following appears to be true for multiple cards based on
340	 * observation as well as datasheet digging.
341	 *
342	 * Data is stored in some ROM and is copied out 8 bits at a time
343	 * into 16-bit wide locations.  This means that the odd locations
344	 * of the ROM are not used (and can be either 0 or ff).
345	 *
346	 * The contents appears to be as follows:
347	 * PROM   RAM
348	 * Offset Offset	What
349	 *  0      0	ENETADDR 0
350	 *  1      2	ENETADDR 1
351	 *  2      4	ENETADDR 2
352	 *  3      6	ENETADDR 3
353	 *  4      8	ENETADDR 4
354	 *  5     10	ENETADDR 5
355	 *  6-13  12-26 Reserved (varies by manufacturer)
356	 * 14     28	0x57
357	 * 15     30    0x57
358	 *
359	 * Some manufacturers have another image of enetaddr from
360	 * PROM offset 0x10 to 0x15 with 0x42 in 0x1e and 0x1f, but
361	 * this doesn't appear to be universally documented in the
362	 * datasheets.  Some manufactuers have a card type, card config
363	 * checksums, etc encoded into PROM offset 6-13, but deciphering it
364	 * requires more knowledge about the exact underlying chipset than
365	 * we possess (and maybe can possess).
366	 */
367	ed_pio_readmem(sc, 0, romdata, 32);
368	if (bootverbose)
369		device_printf(dev, "ROM DATA: %32D\n", romdata, " ");
370	if (romdata[28] != 0x57 || romdata[30] != 0x57)
371		return (0);
372	for (i = 0; i < ETHER_ADDR_LEN; i++)
373		enaddr[i] = romdata[i * 2];
374	return (1);
375}
376
377static int
378ed_pccard_add_modem(device_t dev)
379{
380	struct ed_softc *sc = device_get_softc(dev);
381
382	device_printf(dev, "Need to write this code: modem rid is %d\n",
383	    sc->modem_rid);
384	return 0;
385}
386
387static int
388ed_pccard_kick_phy(struct ed_softc *sc)
389{
390	struct mii_softc *miisc;
391	struct mii_data *mii;
392
393	/*
394	 * Many of the PHYs that wind up on PC Cards are weird in
395	 * this way.  Generally, we don't need to worry so much about
396	 * the Isolation protocol since there's only one PHY in
397	 * these designs, so this workaround is reasonable.
398	 */
399	mii = device_get_softc(sc->miibus);
400	LIST_FOREACH(miisc, &mii->mii_phys, mii_list) {
401		miisc->mii_flags |= MIIF_FORCEANEG;
402		mii_phy_reset(miisc);
403	}
404	return (mii_mediachg(mii));
405}
406
407static int
408ed_pccard_media_ioctl(struct ed_softc *sc, struct ifreq *ifr, u_long command)
409{
410	struct mii_data *mii;
411
412	if (sc->miibus == NULL)
413		return (EINVAL);
414	mii = device_get_softc(sc->miibus);
415	return (ifmedia_ioctl(sc->ifp, ifr, &mii->mii_media, command));
416}
417
418
419static void
420ed_pccard_mediachg(struct ed_softc *sc)
421{
422	struct mii_data *mii;
423
424	if (sc->miibus == NULL)
425		return;
426	mii = device_get_softc(sc->miibus);
427	mii_mediachg(mii);
428}
429
430static int
431ed_pccard_attach(device_t dev)
432{
433	u_char sum;
434	u_char enaddr[ETHER_ADDR_LEN];
435	const struct ed_product *pp;
436	int	error, i, flags;
437	struct ed_softc *sc = device_get_softc(dev);
438	u_long size;
439	static uint16_t *intr_vals[] = {NULL, NULL};
440
441	sc->dev = dev;
442	if ((pp = (const struct ed_product *) pccard_product_lookup(dev,
443	    (const struct pccard_product *) ed_pccard_products,
444	    sizeof(ed_pccard_products[0]), NULL)) == NULL)
445		return (ENXIO);
446	sc->modem_rid = -1;
447	if (pp->flags & NE2000DVF_MODEM) {
448		sc->port_rid = -1;
449		for (i = 0; i < 4; i++) {
450			size = bus_get_resource_count(dev, SYS_RES_IOPORT, i);
451			if (size == ED_NOVELL_IO_PORTS)
452				sc->port_rid = i;
453			else if (size == 8)
454				sc->modem_rid = i;
455		}
456		if (sc->port_rid == -1) {
457			device_printf(dev, "Cannot locate my ports!\n");
458			return (ENXIO);
459		}
460	} else {
461		sc->port_rid = 0;
462	}
463	/* Allocate the port resource during setup. */
464	error = ed_alloc_port(dev, sc->port_rid, ED_NOVELL_IO_PORTS);
465	if (error)
466		return (error);
467	error = ed_alloc_irq(dev, 0, 0);
468	if (error)
469		goto bad;
470
471	/*
472	 * Determine which chipset we are.  Almost the PC Card chipsets have
473	 * the ASIC and NIC offsets in the same place.  There's a tiny
474	 * minority (2?) that follow the WD80x3 conventions, which are handled
475	 * as a special case.
476	 */
477	sc->asic_offset = ED_NOVELL_ASIC_OFFSET;
478	sc->nic_offset  = ED_NOVELL_NIC_OFFSET;
479	error = ENXIO;
480	flags = device_get_flags(dev);
481	if (error != 0)
482		error = ed_pccard_dl100xx(dev, pp);
483	if (error != 0)
484		error = ed_pccard_ax88x90(dev, pp);
485	if (error != 0)
486		error = ed_pccard_tc5299j(dev, pp);
487	if (error != 0)
488		error = ed_probe_Novell_generic(dev, flags);
489	if (error != 0 && (pp->flags & NE2000DVF_TOSHIBA)) {
490		flags |= ED_FLAGS_TOSH_ETHER;
491		flags |= ED_FLAGS_PCCARD;
492		sc->asic_offset = ED_WD_ASIC_OFFSET;
493		sc->nic_offset  = ED_WD_NIC_OFFSET;
494		error = ed_probe_WD80x3_generic(dev, flags, intr_vals);
495	}
496	if (error)
497		goto bad;
498
499	error = bus_setup_intr(dev, sc->irq_res, INTR_TYPE_NET | INTR_MPSAFE,
500	    NULL, edintr, sc, &sc->irq_handle);
501	if (error) {
502		device_printf(dev, "setup intr failed %d \n", error);
503		goto bad;
504	}
505
506	/*
507	 * There are several ways to get the MAC address for the card.
508	 * Some of the above probe routines can fill in the enaddr.  If
509	 * not, we run through a number of 'well known' locations:
510	 *	(1) From the PC Card FUNCE
511	 *	(2) From offset 0 in the shared memory
512	 *	(3) From a hinted offset in attribute memory
513	 *	(4) From 0xff0 in attribute memory
514	 * If we can't get a non-zero MAC address from this list, we fail.
515	 */
516	for (i = 0, sum = 0; i < ETHER_ADDR_LEN; i++)
517		sum |= sc->enaddr[i];
518	if (sum == 0) {
519		pccard_get_ether(dev, enaddr);
520		if (bootverbose)
521			device_printf(dev, "CIS MAC %6D\n", enaddr, ":");
522		for (i = 0, sum = 0; i < ETHER_ADDR_LEN; i++)
523			sum |= enaddr[i];
524		if (sum == 0 && ed_pccard_rom_mac(dev, enaddr)) {
525			if (bootverbose)
526				device_printf(dev, "ROM mac %6D\n", enaddr,
527				    ":");
528			sum++;
529		}
530		if (sum == 0 && pp->flags & NE2000DVF_ENADDR) {
531			for (i = 0; i < ETHER_ADDR_LEN; i++) {
532				pccard_attr_read_1(dev, pp->enoff + i * 2,
533				    enaddr + i);
534				sum |= enaddr[i];
535			}
536			if (bootverbose)
537				device_printf(dev, "Hint %x MAC %6D\n",
538				    pp->enoff, enaddr, ":");
539		}
540		if (sum == 0) {
541			for (i = 0; i < ETHER_ADDR_LEN; i++) {
542				pccard_attr_read_1(dev, ED_DEFAULT_MAC_OFFSET +
543				    i * 2, enaddr + i);
544				sum |= enaddr[i];
545			}
546			if (bootverbose)
547				device_printf(dev, "Fallback MAC %6D\n",
548				    enaddr, ":");
549		}
550		if (sum == 0) {
551			device_printf(dev, "Cannot extract MAC address.\n");
552			ed_release_resources(dev);
553			return (ENXIO);
554		}
555		bcopy(enaddr, sc->enaddr, ETHER_ADDR_LEN);
556	}
557
558	error = ed_attach(dev);
559	if (error)
560		goto bad;
561 	if (sc->chip_type == ED_CHIP_TYPE_DL10019 ||
562	    sc->chip_type == ED_CHIP_TYPE_DL10022) {
563		/* Probe for an MII bus, but ignore errors. */
564		ed_pccard_dl100xx_mii_reset(sc);
565		(void)mii_phy_probe(dev, &sc->miibus, ed_ifmedia_upd,
566		    ed_ifmedia_sts);
567	} else if (sc->chip_type == ED_CHIP_TYPE_AX88190 ||
568	    sc->chip_type == ED_CHIP_TYPE_AX88790) {
569		if ((error = mii_phy_probe(dev, &sc->miibus, ed_ifmedia_upd,
570		     ed_ifmedia_sts)) != 0) {
571			device_printf(dev, "Missing mii %d!\n", error);
572			goto bad;
573		}
574
575	} else if (sc->chip_type == ED_CHIP_TYPE_TC5299J) {
576		ed_pccard_tc5299j_mii_reset(sc);
577		if ((error = mii_phy_probe(dev, &sc->miibus, ed_ifmedia_upd,
578		     ed_ifmedia_sts)) != 0) {
579			device_printf(dev, "Missing mii!\n");
580			goto bad;
581		}
582
583	}
584	if (sc->miibus != NULL) {
585		sc->sc_tick = ed_pccard_tick;
586		sc->sc_mediachg = ed_pccard_mediachg;
587		sc->sc_media_ioctl = ed_pccard_media_ioctl;
588		ed_pccard_kick_phy(sc);
589	} else {
590		printf("Generic ifmedia\n");
591		ed_gen_ifmedia_init(sc);
592	}
593	if (sc->modem_rid != -1)
594		ed_pccard_add_modem(dev);
595	return (0);
596bad:
597	ed_detach(dev);
598	return (error);
599}
600
601/*
602 * Probe the Ethernet MAC addrees for PCMCIA Linksys EtherFast 10/100
603 * and compatible cards (DL10019C Ethernet controller).
604 */
605static int
606ed_pccard_dl100xx(device_t dev, const struct ed_product *pp)
607{
608	struct ed_softc *sc = device_get_softc(dev);
609	u_char sum;
610	uint8_t id;
611	u_int   memsize;
612	int i, error;
613
614	if (!(pp->flags & NE2000DVF_DL100XX))
615		return (ENXIO);
616	if (bootverbose)
617		device_printf(dev, "Trying DL100xx probing\n");
618	error = ed_probe_Novell_generic(dev, device_get_flags(dev));
619	if (bootverbose && error)
620		device_printf(dev, "Novell generic probe failed: %d\n", error);
621	if (error != 0)
622		return (error);
623
624	/*
625	 * Linksys registers(offset from ASIC base)
626	 *
627	 * 0x04-0x09 : Physical Address Register 0-5 (PAR0-PAR5)
628	 * 0x0A      : Card ID Register (CIR)
629	 * 0x0B      : Check Sum Register (SR)
630	 */
631	for (sum = 0, i = 0x04; i < 0x0c; i++)
632		sum += ed_asic_inb(sc, i);
633	if (sum != 0xff) {
634		if (bootverbose)
635			device_printf(dev, "Bad checksum %#x\n", sum);
636		return (ENXIO);		/* invalid DL10019C */
637	}
638	if (bootverbose)
639		device_printf(dev, "CIR is %d\n", ed_asic_inb(sc, 0xa));
640	for (i = 0; i < ETHER_ADDR_LEN; i++)
641		sc->enaddr[i] = ed_asic_inb(sc, 0x04 + i);
642	ed_nic_outb(sc, ED_P0_DCR, ED_DCR_WTS | ED_DCR_FT1 | ED_DCR_LS);
643	id = ed_asic_inb(sc, 0xf);
644	sc->isa16bit = 1;
645	/*
646	 * Hard code values based on the datasheet.  We're NE-2000 compatible
647	 * NIC with 24kb of packet memory starting at 24k offset.  These
648	 * cards also work with 16k at 16k, but don't work with 24k at 16k
649	 * or 32k at 16k.
650	 */
651	sc->type = ED_TYPE_NE2000;
652	sc->mem_start = 24 * 1024;
653	memsize = sc->mem_size = 24 * 1024;
654	sc->mem_end = sc->mem_start + memsize;
655	sc->tx_page_start = memsize / ED_PAGE_SIZE;
656	sc->txb_cnt = 3;
657	sc->rec_page_start = sc->tx_page_start + sc->txb_cnt * ED_TXBUF_SIZE;
658	sc->rec_page_stop = sc->tx_page_start + memsize / ED_PAGE_SIZE;
659
660	sc->mem_ring = sc->mem_start + sc->txb_cnt * ED_PAGE_SIZE * ED_TXBUF_SIZE;
661
662	ed_nic_outb(sc, ED_P0_PSTART, sc->mem_start / ED_PAGE_SIZE);
663	ed_nic_outb(sc, ED_P0_PSTOP, sc->mem_end / ED_PAGE_SIZE);
664	sc->vendor = ED_VENDOR_NOVELL;
665	sc->chip_type = (id & 0x90) == 0x90 ?
666	    ED_CHIP_TYPE_DL10022 : ED_CHIP_TYPE_DL10019;
667	sc->type_str = ((id & 0x90) == 0x90) ? "DL10022" : "DL10019";
668	sc->mii_readbits = ed_pccard_dl100xx_mii_readbits;
669	sc->mii_writebits = ed_pccard_dl100xx_mii_writebits;
670	return (0);
671}
672
673/* MII bit-twiddling routines for cards using Dlink chipset */
674#define DL100XX_MIISET(sc, x) ed_asic_outb(sc, ED_DL100XX_MIIBUS, \
675    ed_asic_inb(sc, ED_DL100XX_MIIBUS) | (x))
676#define DL100XX_MIICLR(sc, x) ed_asic_outb(sc, ED_DL100XX_MIIBUS, \
677    ed_asic_inb(sc, ED_DL100XX_MIIBUS) & ~(x))
678
679static void
680ed_pccard_dl100xx_mii_reset(struct ed_softc *sc)
681{
682	if (sc->chip_type != ED_CHIP_TYPE_DL10022)
683		return;
684
685	ed_asic_outb(sc, ED_DL100XX_MIIBUS, ED_DL10022_MII_RESET2);
686	DELAY(10);
687	ed_asic_outb(sc, ED_DL100XX_MIIBUS,
688	    ED_DL10022_MII_RESET2 | ED_DL10022_MII_RESET1);
689	DELAY(10);
690	ed_asic_outb(sc, ED_DL100XX_MIIBUS, ED_DL10022_MII_RESET2);
691	DELAY(10);
692	ed_asic_outb(sc, ED_DL100XX_MIIBUS,
693	    ED_DL10022_MII_RESET2 | ED_DL10022_MII_RESET1);
694	DELAY(10);
695	ed_asic_outb(sc, ED_DL100XX_MIIBUS, 0);
696}
697
698static void
699ed_pccard_dl100xx_mii_writebits(struct ed_softc *sc, u_int val, int nbits)
700{
701	int i;
702
703	DL100XX_MIISET(sc, ED_DL100XX_MII_DIROUT);
704	for (i = nbits - 1; i >= 0; i--) {
705		if ((val >> i) & 1)
706			DL100XX_MIISET(sc, ED_DL100XX_MII_DATAOUT);
707		else
708			DL100XX_MIICLR(sc, ED_DL100XX_MII_DATAOUT);
709		DL100XX_MIISET(sc, ED_DL100XX_MII_CLK);
710		DL100XX_MIICLR(sc, ED_DL100XX_MII_CLK);
711	}
712}
713
714static u_int
715ed_pccard_dl100xx_mii_readbits(struct ed_softc *sc, int nbits)
716{
717	int i;
718	u_int val = 0;
719
720	DL100XX_MIICLR(sc, ED_DL100XX_MII_DIROUT);
721	for (i = nbits - 1; i >= 0; i--) {
722		DL100XX_MIISET(sc, ED_DL100XX_MII_CLK);
723		val <<= 1;
724		if (ed_asic_inb(sc, ED_DL100XX_MIIBUS) & ED_DL100XX_MII_DATAIN)
725			val++;
726		DL100XX_MIICLR(sc, ED_DL100XX_MII_CLK);
727	}
728	return val;
729}
730
731static void
732ed_pccard_ax88x90_reset(struct ed_softc *sc)
733{
734	int i;
735
736	/* Reset Card */
737	ed_nic_outb(sc, ED_P0_CR, ED_CR_RD2 | ED_CR_STP | ED_CR_PAGE_0);
738	ed_asic_outb(sc, ED_NOVELL_RESET, ed_asic_inb(sc, ED_NOVELL_RESET));
739
740	/* Wait for the RST bit to assert, but cap it at 10ms */
741	for (i = 10000; !(ed_nic_inb(sc, ED_P0_ISR) & ED_ISR_RST) && i > 0;
742	     i--)
743		continue;
744	ed_nic_outb(sc, ED_P0_ISR, ED_ISR_RST);	/* ACK INTR */
745	if (i == 0)
746		device_printf(sc->dev, "Reset didn't finish\n");
747}
748
749/*
750 * Probe and vendor-specific initialization routine for ax88x90 boards
751 */
752static int
753ed_probe_ax88x90_generic(device_t dev, int flags)
754{
755	struct ed_softc *sc = device_get_softc(dev);
756	u_int   memsize;
757	static char test_pattern[32] = "THIS is A memory TEST pattern";
758	char    test_buffer[32];
759
760	ed_pccard_ax88x90_reset(sc);
761	DELAY(10*1000);
762
763	/* Make sure that we really have an 8390 based board */
764	if (!ed_probe_generic8390(sc))
765		return (ENXIO);
766
767	sc->vendor = ED_VENDOR_NOVELL;
768	sc->mem_shared = 0;
769	sc->cr_proto = ED_CR_RD2;
770
771	/*
772	 * This prevents packets from being stored in the NIC memory when the
773	 * readmem routine turns on the start bit in the CR.  We write some
774	 * bytes in word mode and verify we can read them back.  If we can't
775	 * then we don't have an AX88x90 chip here.
776	 */
777	sc->isa16bit = 1;
778	ed_nic_outb(sc, ED_P0_RCR, ED_RCR_MON);
779	ed_nic_outb(sc, ED_P0_DCR, ED_DCR_WTS | ED_DCR_FT1 | ED_DCR_LS);
780	ed_pio_writemem(sc, test_pattern, 16384, sizeof(test_pattern));
781	ed_pio_readmem(sc, 16384, test_buffer, sizeof(test_pattern));
782	if (bcmp(test_pattern, test_buffer, sizeof(test_pattern)) != 0)
783		return (ENXIO);
784
785	/*
786	 * Hard code values based on the datasheet.  We're NE-2000 compatible
787	 * NIC with 16kb of packet memory starting at 16k offset.
788	 */
789	sc->type = ED_TYPE_NE2000;
790	memsize = sc->mem_size = 16*1024;
791	sc->mem_start = 16 * 1024;
792	if (ed_asic_inb(sc, ED_AX88X90_TEST) != 0)
793		sc->chip_type = ED_CHIP_TYPE_AX88790;
794	else {
795		sc->chip_type = ED_CHIP_TYPE_AX88190;
796		/*
797		 * The AX88190 (not A) has external 64k SRAM.  Probe for this
798		 * here.  Most of the cards I have either use the AX88190A
799		 * part, or have only 32k SRAM for some reason, so I don't
800		 * know if this works or not.
801		 */
802		ed_pio_writemem(sc, test_pattern, 32768, sizeof(test_pattern));
803		ed_pio_readmem(sc, 32768, test_buffer, sizeof(test_pattern));
804		if (bcmp(test_pattern, test_buffer, sizeof(test_pattern)) == 0) {
805			sc->mem_start = 2*1024;
806			memsize = sc->mem_size = 62 * 1024;
807		}
808	}
809	sc->mem_end = sc->mem_start + memsize;
810	sc->tx_page_start = memsize / ED_PAGE_SIZE;
811	if (sc->mem_size > 16 * 1024)
812		sc->txb_cnt = 3;
813	else
814		sc->txb_cnt = 2;
815	sc->rec_page_start = sc->tx_page_start + sc->txb_cnt * ED_TXBUF_SIZE;
816	sc->rec_page_stop = sc->tx_page_start + memsize / ED_PAGE_SIZE;
817
818	sc->mem_ring = sc->mem_start + sc->txb_cnt * ED_PAGE_SIZE * ED_TXBUF_SIZE;
819
820	ed_nic_outb(sc, ED_P0_PSTART, sc->mem_start / ED_PAGE_SIZE);
821	ed_nic_outb(sc, ED_P0_PSTOP, sc->mem_end / ED_PAGE_SIZE);
822
823	/* Get the mac before we go -- It's just at 0x400 in "SRAM" */
824	ed_pio_readmem(sc, 0x400, sc->enaddr, ETHER_ADDR_LEN);
825
826	/* clear any pending interrupts that might have occurred above */
827	ed_nic_outb(sc, ED_P0_ISR, 0xff);
828	sc->sc_write_mbufs = ed_pio_write_mbufs;
829	return (0);
830}
831
832static int
833ed_pccard_ax88x90_check_mii(device_t dev, struct ed_softc *sc)
834{
835	int	i, id;
836
837	/*
838	 * All AX88x90 devices have MII and a PHY, so we use this to weed out
839	 * chips that would otherwise make it through the tests we have after
840	 * this point.
841	 */
842	for (i = 0; i < 32; i++) {
843		id = ed_miibus_readreg(dev, i, MII_BMSR);
844		if (id != 0 && id != 0xffff)
845			break;
846	}
847	/*
848	 * Found one, we're good.
849	 */
850	if (i != 32)
851		return (0);
852	/*
853	 * Didn't find anything, so try to power up and try again.  The PHY
854	 * may be not responding because we're in power down mode.
855	 */
856	if (sc->chip_type == ED_CHIP_TYPE_AX88190)
857		return (ENXIO);
858	pccard_ccr_write_1(dev, PCCARD_CCR_STATUS, PCCARD_CCR_STATUS_PWRDWN);
859	for (i = 0; i < 32; i++) {
860		id = ed_miibus_readreg(dev, i, MII_BMSR);
861		if (id != 0 && id != 0xffff)
862			break;
863	}
864	/*
865	 * Still no joy?  We're AFU, punt.
866	 */
867	if (i == 32)
868		return (ENXIO);
869	return (0);
870
871}
872
873/*
874 * Special setup for AX88[17]90
875 */
876static int
877ed_pccard_ax88x90(device_t dev, const struct ed_product *pp)
878{
879	int	error;
880	int iobase;
881	struct	ed_softc *sc = device_get_softc(dev);
882
883	if (!(pp->flags & NE2000DVF_AX88X90))
884		return (ENXIO);
885
886	if (bootverbose)
887		device_printf(dev, "Checking AX88x90\n");
888
889	/*
890	 * Set the IOBASE Register.  The AX88x90 cards are potentially
891	 * multifunction cards, and thus requires a slight workaround.
892	 * We write the address the card is at, on the off chance that this
893	 * card is not MFC.
894	 * XXX I'm not sure that this is still needed...
895	 */
896	iobase = rman_get_start(sc->port_res);
897	pccard_ccr_write_1(dev, PCCARD_CCR_IOBASE0, iobase & 0xff);
898	pccard_ccr_write_1(dev, PCCARD_CCR_IOBASE1, (iobase >> 8) & 0xff);
899
900	sc->mii_readbits = ed_pccard_ax88x90_mii_readbits;
901	sc->mii_writebits = ed_pccard_ax88x90_mii_writebits;
902	error = ed_probe_ax88x90_generic(dev, device_get_flags(dev));
903	if (error) {
904		if (bootverbose)
905			device_printf(dev, "probe ax88x90 failed %d\n",
906			    error);
907		goto fail;
908	}
909	error = ed_pccard_ax88x90_check_mii(dev, sc);
910	if (error)
911		goto fail;
912	sc->vendor = ED_VENDOR_NOVELL;
913	sc->type = ED_TYPE_NE2000;
914	if (sc->chip_type == ED_CHIP_TYPE_AX88190)
915		sc->type_str = "AX88190";
916	else
917		sc->type_str = "AX88790";
918	return (0);
919fail:;
920	sc->mii_readbits = 0;
921	sc->mii_writebits = 0;
922	return (error);
923}
924
925static void
926ed_pccard_ax88x90_mii_writebits(struct ed_softc *sc, u_int val, int nbits)
927{
928	int i, data;
929
930	for (i = nbits - 1; i >= 0; i--) {
931		data = (val >> i) & 1 ? ED_AX88X90_MII_DATAOUT : 0;
932		ed_asic_outb(sc, ED_AX88X90_MIIBUS, data);
933		ed_asic_outb(sc, ED_AX88X90_MIIBUS, data | ED_AX88X90_MII_CLK);
934	}
935}
936
937static u_int
938ed_pccard_ax88x90_mii_readbits(struct ed_softc *sc, int nbits)
939{
940	int i;
941	u_int val = 0;
942	uint8_t mdio;
943
944	mdio = ED_AX88X90_MII_DIRIN;
945	for (i = nbits - 1; i >= 0; i--) {
946		ed_asic_outb(sc, ED_AX88X90_MIIBUS, mdio);
947		val <<= 1;
948		if (ed_asic_inb(sc, ED_AX88X90_MIIBUS) & ED_AX88X90_MII_DATAIN)
949			val++;
950		ed_asic_outb(sc, ED_AX88X90_MIIBUS, mdio | ED_AX88X90_MII_CLK);
951	}
952	return val;
953}
954
955/*
956 * Special setup for TC5299J
957 */
958static int
959ed_pccard_tc5299j(device_t dev, const struct ed_product *pp)
960{
961	int	error, i, id;
962	char *ts;
963	struct	ed_softc *sc = device_get_softc(dev);
964
965	if (!(pp->flags & NE2000DVF_TC5299J))
966		return (ENXIO);
967
968	if (bootverbose)
969		device_printf(dev, "Checking Tc5299j\n");
970
971	/*
972	 * Check to see if we have a MII PHY ID at any of the first 32
973	 * locations.  All TC5299J devices have MII and a PHY, so we use
974	 * this to weed out chips that would otherwise make it through
975	 * the tests we have after this point.
976	 */
977	sc->mii_readbits = ed_pccard_tc5299j_mii_readbits;
978	sc->mii_writebits = ed_pccard_tc5299j_mii_writebits;
979	for (i = 0; i < 32; i++) {
980		id = ed_miibus_readreg(dev, i, MII_PHYIDR1);
981		if (id != 0 && id != 0xffff)
982			break;
983	}
984	if (i == 32) {
985		sc->mii_readbits = 0;
986		sc->mii_writebits = 0;
987		return (ENXIO);
988	}
989
990	ts = "TC5299J";
991	error = ed_probe_Novell_generic(dev, device_get_flags(dev));
992	if (bootverbose)
993		device_printf(dev, "probe novel returns %d\n", error);
994	if (error != 0) {
995		sc->mii_readbits = 0;
996		sc->mii_writebits = 0;
997		return (error);
998	}
999	if (ed_pccard_rom_mac(dev, sc->enaddr) == 0) {
1000		sc->mii_readbits = 0;
1001		sc->mii_writebits = 0;
1002		return (ENXIO);
1003	}
1004	sc->vendor = ED_VENDOR_NOVELL;
1005	sc->type = ED_TYPE_NE2000;
1006	sc->chip_type = ED_CHIP_TYPE_TC5299J;
1007	sc->type_str = ts;
1008	return (0);
1009}
1010
1011/* MII bit-twiddling routines for cards using TC5299J chipset */
1012#define TC5299J_MIISET(sc, x) ed_nic_outb(sc, ED_TC5299J_MIIBUS, \
1013    ed_nic_inb(sc, ED_TC5299J_MIIBUS) | (x))
1014#define TC5299J_MIICLR(sc, x) ed_nic_outb(sc, ED_TC5299J_MIIBUS, \
1015    ed_nic_inb(sc, ED_TC5299J_MIIBUS) & ~(x))
1016
1017static void
1018ed_pccard_tc5299j_mii_reset(struct ed_softc *sc)
1019{
1020	/* Do nothing! */
1021}
1022
1023static void
1024ed_pccard_tc5299j_mii_writebits(struct ed_softc *sc, u_int val, int nbits)
1025{
1026	int i;
1027	uint8_t cr;
1028
1029	cr = ed_nic_inb(sc, ED_P0_CR);
1030	ed_nic_outb(sc, ED_P0_CR, cr | ED_CR_PAGE_3);
1031
1032	TC5299J_MIICLR(sc, ED_TC5299J_MII_DIROUT);
1033	for (i = nbits - 1; i >= 0; i--) {
1034		if ((val >> i) & 1)
1035			TC5299J_MIISET(sc, ED_TC5299J_MII_DATAOUT);
1036		else
1037			TC5299J_MIICLR(sc, ED_TC5299J_MII_DATAOUT);
1038		TC5299J_MIISET(sc, ED_TC5299J_MII_CLK);
1039		TC5299J_MIICLR(sc, ED_TC5299J_MII_CLK);
1040	}
1041	ed_nic_outb(sc, ED_P0_CR, cr);
1042}
1043
1044static u_int
1045ed_pccard_tc5299j_mii_readbits(struct ed_softc *sc, int nbits)
1046{
1047	int i;
1048	u_int val = 0;
1049	uint8_t cr;
1050
1051	cr = ed_nic_inb(sc, ED_P0_CR);
1052	ed_nic_outb(sc, ED_P0_CR, cr | ED_CR_PAGE_3);
1053
1054	TC5299J_MIISET(sc, ED_TC5299J_MII_DIROUT);
1055	for (i = nbits - 1; i >= 0; i--) {
1056		TC5299J_MIISET(sc, ED_TC5299J_MII_CLK);
1057		val <<= 1;
1058		if (ed_nic_inb(sc, ED_TC5299J_MIIBUS) & ED_TC5299J_MII_DATAIN)
1059			val++;
1060		TC5299J_MIICLR(sc, ED_TC5299J_MII_CLK);
1061	}
1062	ed_nic_outb(sc, ED_P0_CR, cr);
1063	return val;
1064}
1065
1066/*
1067 * MII bus support routines.
1068 */
1069static int
1070ed_miibus_readreg(device_t dev, int phy, int reg)
1071{
1072	struct ed_softc *sc;
1073	int failed, val;
1074
1075	sc = device_get_softc(dev);
1076	/*
1077	 * The AX88790 has an interesting quirk.  It has an internal phy that
1078	 * needs a special bit set to access, but can also have additional
1079	 * external PHYs set for things like HomeNET media.  When accessing
1080	 * the internal PHY, a bit has to be set, when accessing the external
1081	 * PHYs, it must be clear.  See Errata 1, page 51, in the AX88790
1082	 * datasheet for more details.
1083	 *
1084	 * Also, PHYs above 16 appear to be phantoms on some cards, but not
1085	 * others.  Registers read for this are often the same as prior values
1086	 * read.  Filter all register requests to 17-31.
1087	 *
1088	 * I can't explain it, since I don't have the DL100xx data sheets, but
1089	 * the DL100xx chips do 13-bits before the 'ACK' but, but the AX88x90
1090	 * chips have 14.  The linux pcnet and axnet drivers confirm this.
1091	 */
1092	if (sc->chip_type == ED_CHIP_TYPE_AX88790) {
1093		if (phy > 0x10)
1094			return (0);
1095		if (phy == 0x10)
1096			ed_asic_outb(sc, ED_AX88X90_GPIO,
1097			    ED_AX88X90_GPIO_INT_PHY);
1098		else
1099			ed_asic_outb(sc, ED_AX88X90_GPIO, 0);
1100	}
1101
1102	(*sc->mii_writebits)(sc, 0xffffffff, 32);
1103	(*sc->mii_writebits)(sc, ED_MII_STARTDELIM, ED_MII_STARTDELIM_BITS);
1104	(*sc->mii_writebits)(sc, ED_MII_READOP, ED_MII_OP_BITS);
1105	(*sc->mii_writebits)(sc, phy, ED_MII_PHY_BITS);
1106	(*sc->mii_writebits)(sc, reg, ED_MII_REG_BITS);
1107	if (sc->chip_type == ED_CHIP_TYPE_AX88790 ||
1108	    sc->chip_type == ED_CHIP_TYPE_AX88190)
1109		(*sc->mii_readbits)(sc, ED_MII_ACK_BITS);
1110	failed = (*sc->mii_readbits)(sc, ED_MII_ACK_BITS);
1111	val = (*sc->mii_readbits)(sc, ED_MII_DATA_BITS);
1112	(*sc->mii_writebits)(sc, ED_MII_IDLE, ED_MII_IDLE_BITS);
1113/*	printf("Reading phy %d reg %#x returning %#x (valid %d)\n", phy, reg, val, !failed); */
1114	return (failed ? 0 : val);
1115}
1116
1117static int
1118ed_miibus_writereg(device_t dev, int phy, int reg, int data)
1119{
1120	struct ed_softc *sc;
1121
1122/*	printf("Writing phy %d reg %#x data %#x\n", phy, reg, data); */
1123	sc = device_get_softc(dev);
1124	/* See ed_miibus_readreg for details */
1125	if (sc->chip_type == ED_CHIP_TYPE_AX88790) {
1126		if (phy > 0x10)
1127			return (0);
1128		if (phy == 0x10)
1129			ed_asic_outb(sc, ED_AX88X90_GPIO,
1130			    ED_AX88X90_GPIO_INT_PHY);
1131		else
1132			ed_asic_outb(sc, ED_AX88X90_GPIO, 0);
1133	}
1134	(*sc->mii_writebits)(sc, 0xffffffff, 32);
1135	(*sc->mii_writebits)(sc, ED_MII_STARTDELIM, ED_MII_STARTDELIM_BITS);
1136	(*sc->mii_writebits)(sc, ED_MII_WRITEOP, ED_MII_OP_BITS);
1137	(*sc->mii_writebits)(sc, phy, ED_MII_PHY_BITS);
1138	(*sc->mii_writebits)(sc, reg, ED_MII_REG_BITS);
1139	(*sc->mii_writebits)(sc, ED_MII_TURNAROUND, ED_MII_TURNAROUND_BITS);
1140	(*sc->mii_writebits)(sc, data, ED_MII_DATA_BITS);
1141	(*sc->mii_writebits)(sc, ED_MII_IDLE, ED_MII_IDLE_BITS);
1142	return (0);
1143}
1144
1145static int
1146ed_ifmedia_upd(struct ifnet *ifp)
1147{
1148	struct ed_softc *sc;
1149	int error;
1150
1151	sc = ifp->if_softc;
1152	if (sc->miibus == NULL)
1153		return (ENXIO);
1154	ED_LOCK(sc);
1155	error = ed_pccard_kick_phy(sc);
1156	ED_UNLOCK(sc);
1157	return (error);
1158}
1159
1160static void
1161ed_ifmedia_sts(struct ifnet *ifp, struct ifmediareq *ifmr)
1162{
1163	struct ed_softc *sc;
1164	struct mii_data *mii;
1165
1166	sc = ifp->if_softc;
1167	if (sc->miibus == NULL)
1168		return;
1169
1170	mii = device_get_softc(sc->miibus);
1171	mii_pollstat(mii);
1172	ifmr->ifm_active = mii->mii_media_active;
1173	ifmr->ifm_status = mii->mii_media_status;
1174}
1175
1176static void
1177ed_child_detached(device_t dev, device_t child)
1178{
1179	struct ed_softc *sc;
1180
1181	sc = device_get_softc(dev);
1182	if (child == sc->miibus)
1183		sc->miibus = NULL;
1184}
1185
1186static void
1187ed_pccard_tick(void *arg)
1188{
1189	struct ed_softc *sc = arg;
1190	struct mii_data *mii;
1191	int media = 0;
1192
1193	ED_ASSERT_LOCKED(sc);
1194	if (sc->miibus != NULL) {
1195		mii = device_get_softc(sc->miibus);
1196		media = mii->mii_media_status;
1197		mii_tick(mii);
1198		if (mii->mii_media_status & IFM_ACTIVE &&
1199		    media != mii->mii_media_status) {
1200			if (sc->chip_type == ED_CHIP_TYPE_DL10022) {
1201				ed_asic_outb(sc, ED_DL10022_DIAG,
1202				    (mii->mii_media_active & IFM_FDX) ?
1203				    ED_DL10022_COLLISON_DIS : 0);
1204#ifdef notyet
1205			} else if (sc->chip_type == ED_CHIP_TYPE_DL10019) {
1206				write_asic(sc, ED_DL10019_MAGIC,
1207				    (mii->mii_media_active & IFM_FDX) ?
1208				    DL19FDUPLX : 0);
1209#endif
1210			}
1211		}
1212
1213	}
1214	callout_reset(&sc->tick_ch, hz, ed_pccard_tick, sc);
1215}
1216
1217static device_method_t ed_pccard_methods[] = {
1218	/* Device interface */
1219	DEVMETHOD(device_probe,		ed_pccard_probe),
1220	DEVMETHOD(device_attach,	ed_pccard_attach),
1221	DEVMETHOD(device_detach,	ed_detach),
1222
1223	/* Bus interface */
1224	DEVMETHOD(bus_child_detached,	ed_child_detached),
1225
1226	/* MII interface */
1227	DEVMETHOD(miibus_readreg,	ed_miibus_readreg),
1228	DEVMETHOD(miibus_writereg,	ed_miibus_writereg),
1229
1230	{ 0, 0 }
1231};
1232
1233static driver_t ed_pccard_driver = {
1234	"ed",
1235	ed_pccard_methods,
1236	sizeof(struct ed_softc)
1237};
1238
1239DRIVER_MODULE(ed, pccard, ed_pccard_driver, ed_devclass, 0, 0);
1240DRIVER_MODULE(miibus, ed, miibus_driver, miibus_devclass, 0, 0);
1241MODULE_DEPEND(ed, miibus, 1, 1, 1);
1242MODULE_DEPEND(ed, ether, 1, 1, 1);
1243