if_cs.c revision 140921 
1/*-
2 * Copyright (c) 1997,1998 Maxim Bolotin and Oleg Sharoiko.
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 unmodified, this list of conditions, and the following
10 *    disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 *    notice, this list of conditions and the following disclaimer in the
13 *    documentation and/or other materials provided with the distribution.
14 *
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25 * SUCH DAMAGE.
26 *
27 */
28
29#include <sys/cdefs.h>
30__FBSDID("$FreeBSD: head/sys/dev/cs/if_cs.c 140921 2005-01-28 00:28:22Z imp $");
31
32/*
33 *
34 * Device driver for Crystal Semiconductor CS8920 based ethernet
35 *   adapters. By Maxim Bolotin and Oleg Sharoiko, 27-April-1997
36 */
37
38/*
39#define	 CS_DEBUG
40 */
41
42#include <sys/param.h>
43#include <sys/systm.h>
44#include <sys/malloc.h>
45#include <sys/mbuf.h>
46#include <sys/socket.h>
47#include <sys/sockio.h>
48#include <sys/kernel.h>
49#include <sys/sysctl.h>
50#include <sys/syslog.h>
51
52#include <sys/module.h>
53#include <sys/bus.h>
54#include <machine/bus.h>
55#include <sys/rman.h>
56#include <machine/resource.h>
57
58#include <net/if.h>
59#include <net/if_arp.h>
60#include <net/if_media.h>
61#include <net/ethernet.h>
62#include <net/bpf.h>
63
64#include <dev/cs/if_csvar.h>
65#include <dev/cs/if_csreg.h>
66
67#ifdef  CS_USE_64K_DMA
68#define CS_DMA_BUFFER_SIZE 65536
69#else
70#define CS_DMA_BUFFER_SIZE 16384
71#endif
72
73static void	cs_init(void *);
74static int	cs_ioctl(struct ifnet *, u_long, caddr_t);
75static void	cs_start(struct ifnet *);
76static void	cs_stop(struct cs_softc *);
77static void	cs_reset(struct cs_softc *);
78static void	cs_watchdog(struct ifnet *);
79
80static int	cs_mediachange(struct ifnet *);
81static void	cs_mediastatus(struct ifnet *, struct ifmediareq *);
82static int      cs_mediaset(struct cs_softc *, int);
83
84static void	cs_write_mbufs(struct cs_softc*, struct mbuf*);
85static void	cs_xmit_buf(struct cs_softc*);
86static int	cs_get_packet(struct cs_softc*);
87static void	cs_setmode(struct cs_softc*);
88
89static int	get_eeprom_data(struct cs_softc *sc, int, int, uint16_t *);
90static int	get_eeprom_cksum(int, int, uint16_t *);
91static int	wait_eeprom_ready( struct cs_softc *);
92static void	control_dc_dc( struct cs_softc *, int );
93static int	send_test_pkt( struct cs_softc * );
94static int	enable_tp(struct cs_softc *);
95static int	enable_aui(struct cs_softc *);
96static int	enable_bnc(struct cs_softc *);
97static int      cs_duplex_auto(struct cs_softc *);
98
99devclass_t cs_devclass;
100
101/* sysctl vars */
102SYSCTL_NODE(_hw, OID_AUTO, cs, CTLFLAG_RD, 0, "cs device parameters");
103
104int	cs_debug = 0;
105TUNABLE_INT("hw.cs.debug", &cs_debug);
106SYSCTL_INT(_hw_cs, OID_AUTO, debug, CTLFLAG_RW,
107    &cs_debug, 0,
108  "cs debug");
109
110int	cs_ignore_cksum_failure = 0;
111TUNABLE_INT("hw.cs.ignore_checksum_failure", &cs_ignore_cksum_failure);
112SYSCTL_INT(_hw_cs, OID_AUTO, ignore_checksum_failure, CTLFLAG_RW,
113    &cs_ignore_cksum_failure, 0,
114  "ignore checksum errors in cs card EEPROM");
115
116static int	cs_recv_delay = 570;
117TUNABLE_INT("hw.cs.recv_delay", &cs_ignore_cksum_failure);
118SYSCTL_INT(_hw_cs, OID_AUTO, recv_delay, CTLFLAG_RW, &cs_recv_delay, 570, "");
119
120static int
121get_eeprom_data(struct cs_softc *sc, int off, int len, uint16_t *buffer)
122{
123	int i;
124
125#ifdef CS_DEBUG
126	printf(CS_NAME":EEPROM data from %x for %x:\n", off, len);
127#endif
128
129	for (i=0; i < len; i++) {
130		if (wait_eeprom_ready(sc) < 0)
131			return (-1);
132		/* Send command to EEPROM to read */
133		cs_writereg(sc, PP_EECMD, (off + i) | EEPROM_READ_CMD);
134		if (wait_eeprom_ready(sc) < 0)
135			return (-1);
136		buffer[i] = cs_readreg(sc, PP_EEData);
137
138#ifdef CS_DEBUG
139		printf("%02x %02x ",(unsigned char)buffer[i],
140		    (unsigned char)buffer[i] >> 8);
141#endif
142	}
143
144#ifdef CS_DEBUG
145	printf("\n");
146#endif
147	return (0);
148}
149
150static int
151get_eeprom_cksum(int off, int len, uint16_t *buffer)
152{
153	int i;
154	uint16_t cksum=0;
155
156	for (i = 0; i < len; i++)
157		cksum += buffer[i];
158	cksum &= 0xffff;
159	if (cksum==0)
160		return (0);
161	if (cs_ignore_cksum_failure) {
162		printf(CS_NAME": checksum mismatch, ignoring\n");
163		return (0);
164	}
165	return (-1);
166}
167
168static int
169wait_eeprom_ready(struct cs_softc *sc)
170{
171	DELAY(30000);	/* XXX should we do some checks here ? */
172	return 0;
173}
174
175static void
176control_dc_dc(struct cs_softc *sc, int on_not_off)
177{
178	unsigned int self_control = HCB1_ENBL;
179
180	if (((sc->adapter_cnf & A_CNF_DC_DC_POLARITY)!=0) ^ on_not_off)
181		self_control |= HCB1;
182	else
183		self_control &= ~HCB1;
184	cs_writereg(sc, PP_SelfCTL, self_control);
185
186	DELAY(500000);
187}
188
189
190static int
191cs_duplex_auto(struct cs_softc *sc)
192{
193        int i, error=0;
194
195	cs_writereg(sc, PP_AutoNegCTL,
196	    RE_NEG_NOW | ALLOW_FDX | AUTO_NEG_ENABLE);
197        for (i=0; cs_readreg(sc, PP_AutoNegST) & AUTO_NEG_BUSY; i++) {
198                if (i > 40000) {
199                        if_printf(&sc->arpcom.ac_if,
200                        	"full/half duplex auto negotiation timeout\n");
201			error = ETIMEDOUT;
202                        break;
203                }
204                DELAY(1000);
205        }
206        DELAY( 1000000 );
207	return error;
208}
209
210static int
211enable_tp(struct cs_softc *sc)
212{
213
214	cs_writereg(sc, PP_LineCTL, sc->line_ctl & ~AUI_ONLY);
215	control_dc_dc(sc, 0);
216	DELAY( 150000 );
217
218	if ((cs_readreg(sc, PP_LineST) & LINK_OK)==0) {
219		if_printf(&sc->arpcom.ac_if, "failed to enable TP\n");
220                return EINVAL;
221	}
222
223	return 0;
224}
225
226/*
227 * XXX This was rewritten from Linux driver without any tests.
228 */
229static int
230send_test_pkt(struct cs_softc *sc)
231{
232	char test_packet[] = { 0,0,0,0,0,0, 0,0,0,0,0,0,
233				0, 46,  /* A 46 in network order */
234				0, 0,   /* DSAP=0 & SSAP=0 fields */
235				0xf3, 0 /* Control (Test Req + P bit set) */ };
236	int i;
237	u_char ether_address_backup[ETHER_ADDR_LEN];
238
239	for (i = 0; i < ETHER_ADDR_LEN; i++)
240		ether_address_backup[i] = sc->arpcom.ac_enaddr[i];
241
242	cs_writereg(sc, PP_LineCTL, cs_readreg(sc, PP_LineCTL) | SERIAL_TX_ON);
243	bcopy(test_packet, sc->arpcom.ac_enaddr, ETHER_ADDR_LEN);
244	bcopy(test_packet+ETHER_ADDR_LEN,
245	    sc->arpcom.ac_enaddr, ETHER_ADDR_LEN);
246	cs_outw(sc, TX_CMD_PORT, sc->send_cmd);
247	cs_outw(sc, TX_LEN_PORT, sizeof(test_packet));
248
249	/* Wait for chip to allocate memory */
250	DELAY(50000);
251	if (!(cs_readreg(sc, PP_BusST) & READY_FOR_TX_NOW)) {
252		for (i = 0; i < ETHER_ADDR_LEN; i++)
253			sc->arpcom.ac_enaddr[i] = ether_address_backup[i];
254		return 0;
255	}
256
257	outsw(sc->nic_addr + TX_FRAME_PORT, test_packet, sizeof(test_packet));
258
259	DELAY(30000);
260
261	for (i = 0; i < ETHER_ADDR_LEN; i++)
262		sc->arpcom.ac_enaddr[i] = ether_address_backup[i];
263	if ((cs_readreg(sc, PP_TxEvent) & TX_SEND_OK_BITS) == TX_OK)
264		return 1;
265	return 0;
266}
267
268/*
269 * XXX This was rewritten from Linux driver without any tests.
270 */
271static int
272enable_aui(struct cs_softc *sc)
273{
274
275	control_dc_dc(sc, 0);
276	cs_writereg(sc, PP_LineCTL,
277	    (sc->line_ctl & ~AUTO_AUI_10BASET) | AUI_ONLY);
278
279	if (!send_test_pkt(sc)) {
280		if_printf(&sc->arpcom.ac_if, "failed to enable AUI\n");
281		return EINVAL;
282        }
283        return 0;
284}
285
286/*
287 * XXX This was rewritten from Linux driver without any tests.
288 */
289static int
290enable_bnc(struct cs_softc *sc)
291{
292
293	control_dc_dc(sc, 1);
294	cs_writereg(sc, PP_LineCTL,
295	    (sc->line_ctl & ~AUTO_AUI_10BASET) | AUI_ONLY);
296
297	if (!send_test_pkt(sc)) {
298		if_printf(&sc->arpcom.ac_if, "failed to enable BNC\n");
299		return EINVAL;
300        }
301        return 0;
302}
303
304int
305cs_cs89x0_probe(device_t dev)
306{
307	int i;
308	int error;
309	u_long irq, junk;
310	struct cs_softc *sc = device_get_softc(dev);
311	unsigned rev_type = 0;
312	uint16_t id;
313	char chip_revision;
314	uint16_t eeprom_buff[CHKSUM_LEN];
315	int chip_type, pp_isaint, pp_isadma;
316
317	error = cs_alloc_port(dev, 0, CS_89x0_IO_PORTS);
318	if (error)
319		return (error);
320
321	sc->nic_addr = rman_get_start(sc->port_res);
322
323	if ((cs_inw(sc, ADD_PORT) & ADD_MASK) != ADD_SIG) {
324		/* Chip not detected. Let's try to reset it */
325		if (bootverbose)
326			device_printf(dev, "trying to reset the chip.\n");
327		cs_outw(sc, ADD_PORT, PP_SelfCTL);
328		i = cs_inw(sc, DATA_PORT);
329		cs_outw(sc, ADD_PORT, PP_SelfCTL);
330		cs_outw(sc, DATA_PORT, i | POWER_ON_RESET);
331		if ((cs_inw(sc, ADD_PORT) & ADD_MASK) != ADD_SIG)
332			return (ENXIO);
333	}
334
335	for (i = 0; i < 10000; i++) {
336		id = cs_readreg(sc, PP_ChipID);
337		if (id == CHIP_EISA_ID_SIG)
338			break;
339	}
340	if (i == 10000)
341		return (ENXIO);
342
343	rev_type = cs_readreg(sc, PRODUCT_ID_ADD);
344	chip_type = rev_type & ~REVISON_BITS;
345	chip_revision = ((rev_type & REVISON_BITS) >> 8) + 'A';
346
347	sc->chip_type = chip_type;
348
349	if(chip_type==CS8900) {
350		pp_isaint = PP_CS8900_ISAINT;
351		pp_isadma = PP_CS8900_ISADMA;
352		sc->send_cmd = TX_CS8900_AFTER_ALL;
353	} else {
354		pp_isaint = PP_CS8920_ISAINT;
355		pp_isadma = PP_CS8920_ISADMA;
356		sc->send_cmd = TX_CS8920_AFTER_ALL;
357	}
358
359        /*
360         * Clear some fields so that fail of EEPROM will left them clean
361         */
362        sc->auto_neg_cnf = 0;
363        sc->adapter_cnf  = 0;
364        sc->isa_config   = 0;
365
366	/*
367	 * If no interrupt specified (or "?"), use what the board tells us.
368	 */
369	error = bus_get_resource(dev, SYS_RES_IRQ, 0, &irq, &junk);
370
371	/*
372	 * Get data from EEPROM
373	 */
374	if((cs_readreg(sc, PP_SelfST) & EEPROM_PRESENT) == 0) {
375		device_printf(dev, "No EEPROM, assuming defaults.\n");
376	} else {
377		if (get_eeprom_data(sc,START_EEPROM_DATA,CHKSUM_LEN, eeprom_buff)<0) {
378			device_printf(dev, "EEPROM read failed, "
379				"assuming defaults.\n");
380		} else {
381			if (get_eeprom_cksum(START_EEPROM_DATA,CHKSUM_LEN, eeprom_buff)<0) {
382				device_printf(dev, "EEPROM cheksum bad, "
383					"assuming defaults.\n");
384			} else {
385                                sc->auto_neg_cnf =
386                                        eeprom_buff[AUTO_NEG_CNF_OFFSET/2];
387                                sc->adapter_cnf =
388                                        eeprom_buff[ADAPTER_CNF_OFFSET/2];
389                                sc->isa_config =
390                                        eeprom_buff[ISA_CNF_OFFSET/2];
391
392                                for (i=0; i<ETHER_ADDR_LEN/2; i++) {
393                                        sc->arpcom.ac_enaddr[i*2]=
394                                                eeprom_buff[i];
395                                        sc->arpcom.ac_enaddr[i*2+1]=
396                                                eeprom_buff[i] >> 8;
397                                }
398
399                                /*
400                                 * If no interrupt specified (or "?"),
401                                 * use what the board tells us.
402                                 */
403				if (error) {
404					irq = sc->isa_config & INT_NO_MASK;
405                                        if (chip_type==CS8900) {
406                                                switch(irq) {
407						 case 0:
408							irq=10;
409							error=0;
410							break;
411						 case 1:
412							irq=11;
413							error=0;
414							break;
415						 case 2:
416							irq=12;
417							error=0;
418							break;
419						 case 3:
420							irq=5;
421							error=0;
422							break;
423						 default:
424							device_printf(dev, "invalid irq in EEPROM.\n");
425							error=EINVAL;
426                                                }
427					} else {
428						if (irq>CS8920_NO_INTS) {
429							device_printf(dev, "invalid irq in EEPROM.\n");
430							error=EINVAL;
431						} else {
432							error=0;
433						}
434					}
435
436					if (!error)
437						bus_set_resource(dev, SYS_RES_IRQ, 0,
438								irq, 1);
439				}
440			}
441                }
442        }
443
444	if (!error) {
445                if (chip_type == CS8900) {
446			switch(irq) {
447				case  5:
448					irq = 3;
449					break;
450				case 10:
451					irq = 0;
452					break;
453				case 11:
454					irq = 1;
455					break;
456				case 12:
457					irq = 2;
458					break;
459				default:
460					error=EINVAL;
461			}
462                } else {
463                        if (irq > CS8920_NO_INTS) {
464                                error = EINVAL;
465                        }
466                }
467	}
468
469	if (!error) {
470                cs_writereg(sc, pp_isaint, irq);
471	} else {
472	       	device_printf(dev, "Unknown or invalid irq\n");
473                return (ENXIO);
474        }
475
476        /*
477         * Temporary disabled
478         *
479        if (drq>0)
480		cs_writereg(sc, pp_isadma, drq);
481	else {
482		device_printf(dev, "incorrect drq\n",);
483		return 0;
484	}
485        */
486
487	if (bootverbose)
488		 device_printf(dev, "CS89%c0%s rev %c media%s%s%s\n",
489			chip_type==CS8900 ? '0' : '2',
490			chip_type==CS8920M ? "M" : "",
491			chip_revision,
492			(sc->adapter_cnf & A_CNF_10B_T) ? " TP"  : "",
493			(sc->adapter_cnf & A_CNF_AUI)   ? " AUI" : "",
494			(sc->adapter_cnf & A_CNF_10B_2) ? " BNC" : "");
495
496        if ((sc->adapter_cnf & A_CNF_EXTND_10B_2) &&
497            (sc->adapter_cnf & A_CNF_LOW_RX_SQUELCH))
498                sc->line_ctl = LOW_RX_SQUELCH;
499        else
500                sc->line_ctl = 0;
501
502
503	return 0;
504}
505
506/*
507 * Allocate a port resource with the given resource id.
508 */
509int cs_alloc_port(device_t dev, int rid, int size)
510{
511        struct cs_softc *sc = device_get_softc(dev);
512        struct resource *res;
513
514        res = bus_alloc_resource(dev, SYS_RES_IOPORT, &rid,
515                                 0ul, ~0ul, size, RF_ACTIVE);
516        if (res) {
517                sc->port_rid = rid;
518                sc->port_res = res;
519                sc->port_used = size;
520                return (0);
521        } else {
522                return (ENOENT);
523        }
524}
525
526/*
527 * Allocate a memory resource with the given resource id.
528 */
529int cs_alloc_memory(device_t dev, int rid, int size)
530{
531        struct cs_softc *sc = device_get_softc(dev);
532        struct resource *res;
533
534        res = bus_alloc_resource(dev, SYS_RES_MEMORY, &rid,
535                                 0ul, ~0ul, size, RF_ACTIVE);
536        if (res) {
537                sc->mem_rid = rid;
538                sc->mem_res = res;
539                sc->mem_used = size;
540                return (0);
541        } else {
542                return (ENOENT);
543        }
544}
545
546/*
547 * Allocate an irq resource with the given resource id.
548 */
549int cs_alloc_irq(device_t dev, int rid, int flags)
550{
551        struct cs_softc *sc = device_get_softc(dev);
552        struct resource *res;
553
554        res = bus_alloc_resource_any(dev, SYS_RES_IRQ, &rid,
555                                     (RF_ACTIVE | flags));
556        if (res) {
557                sc->irq_rid = rid;
558                sc->irq_res = res;
559                return (0);
560        } else {
561                return (ENOENT);
562        }
563}
564
565/*
566 * Release all resources
567 */
568void cs_release_resources(device_t dev)
569{
570        struct cs_softc *sc = device_get_softc(dev);
571
572        if (sc->port_res) {
573                bus_release_resource(dev, SYS_RES_IOPORT,
574                                     sc->port_rid, sc->port_res);
575                sc->port_res = 0;
576        }
577        if (sc->mem_res) {
578                bus_release_resource(dev, SYS_RES_MEMORY,
579                                     sc->mem_rid, sc->mem_res);
580                sc->mem_res = 0;
581        }
582        if (sc->irq_res) {
583                bus_release_resource(dev, SYS_RES_IRQ,
584                                     sc->irq_rid, sc->irq_res);
585                sc->irq_res = 0;
586        }
587}
588
589/*
590 * Install the interface into kernel networking data structures
591 */
592int
593cs_attach(device_t dev)
594{
595        int media=0;
596	struct cs_softc *sc = device_get_softc(dev);;
597	struct ifnet *ifp = &(sc->arpcom.ac_if);
598
599	cs_stop( sc );
600
601	ifp->if_softc=sc;
602	if_initname(ifp, device_get_name(dev), device_get_unit(dev));
603	ifp->if_start=cs_start;
604	ifp->if_ioctl=cs_ioctl;
605	ifp->if_watchdog=cs_watchdog;
606	ifp->if_init=cs_init;
607	ifp->if_snd.ifq_maxlen= IFQ_MAXLEN;
608	/*
609	 *  MIB DATA
610	 */
611	/*
612	ifp->if_linkmib=&sc->mibdata;
613	ifp->if_linkmiblen=sizeof sc->mibdata;
614	*/
615
616	ifp->if_flags=(IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST |
617	    IFF_NEEDSGIANT);
618
619	/*
620	 * this code still in progress (DMA support)
621	 *
622
623	sc->recv_ring=malloc(CS_DMA_BUFFER_SIZE<<1, M_DEVBUF, M_NOWAIT);
624	if (sc->recv_ring == NULL) {
625		log(LOG_ERR,
626		"%s: Couldn't allocate memory for NIC\n", ifp->if_xname);
627		return(0);
628	}
629	if ((sc->recv_ring-(sc->recv_ring & 0x1FFFF))
630	    < (128*1024-CS_DMA_BUFFER_SIZE))
631	    sc->recv_ring+=16*1024;
632
633	*/
634
635	sc->buffer=malloc(ETHER_MAX_LEN-ETHER_CRC_LEN,M_DEVBUF,M_NOWAIT);
636	if (sc->buffer == NULL) {
637		if_printf(ifp, "Couldn't allocate memory for NIC\n");
638		return(0);
639	}
640
641	/*
642	 * Initialize the media structures.
643	 */
644	ifmedia_init(&sc->media, 0, cs_mediachange, cs_mediastatus);
645
646	if (sc->adapter_cnf & A_CNF_10B_T) {
647		ifmedia_add(&sc->media, IFM_ETHER|IFM_10_T, 0, NULL);
648		if (sc->chip_type != CS8900) {
649			ifmedia_add(&sc->media,
650				IFM_ETHER|IFM_10_T|IFM_FDX, 0, NULL);
651			ifmedia_add(&sc->media,
652				IFM_ETHER|IFM_10_T|IFM_HDX, 0, NULL);
653		}
654	}
655
656	if (sc->adapter_cnf & A_CNF_10B_2)
657		ifmedia_add(&sc->media, IFM_ETHER|IFM_10_2, 0, NULL);
658
659	if (sc->adapter_cnf & A_CNF_AUI)
660		ifmedia_add(&sc->media, IFM_ETHER|IFM_10_5, 0, NULL);
661
662	if (sc->adapter_cnf & A_CNF_MEDIA)
663		ifmedia_add(&sc->media, IFM_ETHER|IFM_AUTO, 0, NULL);
664
665	/* Set default media from EEPROM */
666	switch (sc->adapter_cnf & A_CNF_MEDIA_TYPE) {
667	case A_CNF_MEDIA_AUTO:  media = IFM_ETHER|IFM_AUTO; break;
668	case A_CNF_MEDIA_10B_T: media = IFM_ETHER|IFM_10_T; break;
669	case A_CNF_MEDIA_10B_2: media = IFM_ETHER|IFM_10_2; break;
670	case A_CNF_MEDIA_AUI:   media = IFM_ETHER|IFM_10_5; break;
671	default:
672		if_printf(ifp, "no media, assuming 10baseT\n");
673		sc->adapter_cnf |= A_CNF_10B_T;
674		ifmedia_add(&sc->media, IFM_ETHER|IFM_10_T, 0, NULL);
675		if (sc->chip_type != CS8900) {
676			ifmedia_add(&sc->media,
677			    IFM_ETHER|IFM_10_T|IFM_FDX, 0, NULL);
678			ifmedia_add(&sc->media,
679			    IFM_ETHER|IFM_10_T|IFM_HDX, 0, NULL);
680		}
681		media = IFM_ETHER | IFM_10_T;
682		break;
683	}
684	ifmedia_set(&sc->media, media);
685	cs_mediaset(sc, media);
686
687	ether_ifattach(ifp, sc->arpcom.ac_enaddr);
688
689	return (0);
690}
691
692int
693cs_detach(device_t dev)
694{
695	struct cs_softc *sc;
696	struct ifnet *ifp;
697
698	sc = device_get_softc(dev);
699	ifp = &sc->arpcom.ac_if;
700
701	cs_stop(sc);
702	ifp->if_flags &= ~IFF_RUNNING;
703	ether_ifdetach(ifp);
704	cs_release_resources(dev);
705	return (0);
706}
707
708/*
709 * Initialize the board
710 */
711static void
712cs_init(void *xsc)
713{
714	struct cs_softc *sc=(struct cs_softc *)xsc;
715	struct ifnet *ifp = &sc->arpcom.ac_if;
716	int i, s, rx_cfg;
717
718	/*
719	 * reset whatchdog timer
720	 */
721	ifp->if_timer=0;
722	sc->buf_len = 0;
723
724	s=splimp();
725
726	/*
727	 * Hardware initialization of cs
728	 */
729
730	/* Enable receiver and transmitter */
731	cs_writereg(sc, PP_LineCTL,
732		cs_readreg(sc, PP_LineCTL) | SERIAL_RX_ON | SERIAL_TX_ON);
733
734	/* Configure the receiver mode */
735	cs_setmode(sc);
736
737	/*
738	 * This defines what type of frames will cause interrupts
739	 * Bad frames should generate interrupts so that the driver
740	 * could track statistics of discarded packets
741	 */
742        rx_cfg = RX_OK_ENBL | RX_CRC_ERROR_ENBL | RX_RUNT_ENBL |
743		 RX_EXTRA_DATA_ENBL;
744	if (sc->isa_config & STREAM_TRANSFER)
745		rx_cfg |= RX_STREAM_ENBL;
746	cs_writereg(sc, PP_RxCFG, rx_cfg);
747	cs_writereg(sc, PP_TxCFG, TX_LOST_CRS_ENBL |
748		    TX_SQE_ERROR_ENBL | TX_OK_ENBL | TX_LATE_COL_ENBL |
749		    TX_JBR_ENBL | TX_ANY_COL_ENBL | TX_16_COL_ENBL);
750	cs_writereg(sc, PP_BufCFG, READY_FOR_TX_ENBL |
751		    RX_MISS_COUNT_OVRFLOW_ENBL | TX_COL_COUNT_OVRFLOW_ENBL |
752		    TX_UNDERRUN_ENBL /*| RX_DMA_ENBL*/);
753
754        /* Write MAC address into IA filter */
755        for (i=0; i<ETHER_ADDR_LEN/2; i++)
756                cs_writereg(sc, PP_IA + i * 2,
757		    sc->arpcom.ac_enaddr[i * 2] |
758		    (sc->arpcom.ac_enaddr[i * 2 + 1] << 8) );
759
760	/*
761	 * Now enable everything
762	 */
763/*
764#ifdef	CS_USE_64K_DMA
765	cs_writereg(sc, PP_BusCTL, ENABLE_IRQ | RX_DMA_SIZE_64K);
766#else
767        cs_writereg(sc, PP_BusCTL, ENABLE_IRQ);
768#endif
769*/
770	cs_writereg(sc, PP_BusCTL, ENABLE_IRQ);
771
772	/*
773	 * Set running and clear output active flags
774	 */
775	sc->arpcom.ac_if.if_flags |= IFF_RUNNING;
776	sc->arpcom.ac_if.if_flags &= ~IFF_OACTIVE;
777
778	/*
779	 * Start sending process
780	 */
781	cs_start(ifp);
782
783	(void) splx(s);
784}
785
786/*
787 * Get the packet from the board and send it to the upper layer.
788 */
789static int
790cs_get_packet(struct cs_softc *sc)
791{
792	struct ifnet *ifp = &(sc->arpcom.ac_if);
793	int iobase = sc->nic_addr, status, length;
794	struct ether_header *eh;
795	struct mbuf *m;
796
797#ifdef CS_DEBUG
798	int i;
799#endif
800
801	status = cs_inw(sc, RX_FRAME_PORT);
802	length = cs_inw(sc, RX_FRAME_PORT);
803
804#ifdef CS_DEBUG
805	if_printf(ifp, "rcvd: stat %x, len %d\n",
806		status, length);
807#endif
808
809	if (!(status & RX_OK)) {
810#ifdef CS_DEBUG
811		if_printf(ifp, "bad pkt stat %x\n", status);
812#endif
813		ifp->if_ierrors++;
814		return -1;
815	}
816
817	MGETHDR(m, M_DONTWAIT, MT_DATA);
818	if (m==NULL)
819		return -1;
820
821	if (length > MHLEN) {
822		MCLGET(m, M_DONTWAIT);
823		if (!(m->m_flags & M_EXT)) {
824			m_freem(m);
825			return -1;
826		}
827	}
828
829	/* Initialize packet's header info */
830	m->m_pkthdr.rcvif = ifp;
831	m->m_pkthdr.len = length;
832	m->m_len = length;
833
834	/* Get the data */
835	insw(iobase + RX_FRAME_PORT, m->m_data, (length+1)>>1);
836
837	eh = mtod(m, struct ether_header *);
838
839#ifdef CS_DEBUG
840	for (i=0;i<length;i++)
841	     printf(" %02x",(unsigned char)*((char *)(m->m_data+i)));
842	printf( "\n" );
843#endif
844
845	if (status & (RX_IA | RX_BROADCAST) ||
846	    (ifp->if_flags & IFF_MULTICAST && status & RX_HASHED)) {
847		/* Feed the packet to the upper layer */
848		(*ifp->if_input)(ifp, m);
849		ifp->if_ipackets++;
850		if (length == ETHER_MAX_LEN-ETHER_CRC_LEN)
851                        DELAY(cs_recv_delay);
852	} else {
853		m_freem(m);
854	}
855
856	return 0;
857}
858
859/*
860 * Handle interrupts
861 */
862void
863csintr(void *arg)
864{
865	struct cs_softc *sc = (struct cs_softc*) arg;
866	struct ifnet *ifp = &(sc->arpcom.ac_if);
867	int status;
868
869#ifdef CS_DEBUG
870	if_printf(ifp, "Interrupt.\n");
871#endif
872
873	while ((status=cs_inw(sc, ISQ_PORT))) {
874
875#ifdef CS_DEBUG
876		if_printf(ifp, "from ISQ: %04x\n", status);
877#endif
878
879		switch (status & ISQ_EVENT_MASK) {
880                case ISQ_RECEIVER_EVENT:
881                        cs_get_packet(sc);
882                        break;
883
884                case ISQ_TRANSMITTER_EVENT:
885                        if (status & TX_OK)
886                                ifp->if_opackets++;
887                        else
888                                ifp->if_oerrors++;
889                        ifp->if_flags &= ~IFF_OACTIVE;
890                        ifp->if_timer = 0;
891                        break;
892
893                case ISQ_BUFFER_EVENT:
894                        if (status & READY_FOR_TX) {
895                                ifp->if_flags &= ~IFF_OACTIVE;
896                                ifp->if_timer = 0;
897                        }
898
899                        if (status & TX_UNDERRUN) {
900                                ifp->if_flags &= ~IFF_OACTIVE;
901                                ifp->if_timer = 0;
902                                ifp->if_oerrors++;
903                        }
904                        break;
905
906                case ISQ_RX_MISS_EVENT:
907                        ifp->if_ierrors+=(status>>6);
908                        break;
909
910                case ISQ_TX_COL_EVENT:
911                        ifp->if_collisions+=(status>>6);
912                        break;
913                }
914        }
915
916        if (!(ifp->if_flags & IFF_OACTIVE)) {
917                cs_start(ifp);
918        }
919}
920
921/*
922 * Save the data in buffer
923 */
924
925static void
926cs_write_mbufs( struct cs_softc *sc, struct mbuf *m )
927{
928	int len;
929	struct mbuf *mp;
930	unsigned char *data, *buf;
931
932	for (mp=m, buf=sc->buffer, sc->buf_len=0; mp != NULL; mp=mp->m_next) {
933		len = mp->m_len;
934
935		/*
936		 * Ignore empty parts
937		 */
938		if (!len)
939		continue;
940
941		/*
942		 * Find actual data address
943		 */
944		data = mtod(mp, caddr_t);
945
946		bcopy((caddr_t) data, (caddr_t) buf, len);
947		buf += len;
948		sc->buf_len += len;
949	}
950}
951
952
953static void
954cs_xmit_buf( struct cs_softc *sc )
955{
956	outsw(sc->nic_addr+TX_FRAME_PORT, sc->buffer, (sc->buf_len+1)>>1);
957	sc->buf_len = 0;
958}
959
960static void
961cs_start(struct ifnet *ifp)
962{
963	int s, length;
964	struct mbuf *m, *mp;
965	struct cs_softc *sc = ifp->if_softc;
966
967	s = splimp();
968
969	for (;;) {
970		if (sc->buf_len)
971			length = sc->buf_len;
972		else {
973			IF_DEQUEUE( &ifp->if_snd, m );
974
975			if (m==NULL) {
976				(void) splx(s);
977				return;
978			}
979
980			for (length=0, mp=m; mp != NULL; mp=mp->m_next)
981				length += mp->m_len;
982
983			/* Skip zero-length packets */
984			if (length == 0) {
985				m_freem(m);
986				continue;
987			}
988
989			cs_write_mbufs(sc, m);
990
991			BPF_MTAP(ifp, m);
992
993			m_freem(m);
994		}
995
996		/*
997		 * Issue a SEND command
998		 */
999		cs_outw(sc, TX_CMD_PORT, sc->send_cmd);
1000		cs_outw(sc, TX_LEN_PORT, length );
1001
1002		/*
1003		 * If there's no free space in the buffer then leave
1004		 * this packet for the next time: indicate output active
1005		 * and return.
1006		 */
1007		if (!(cs_readreg(sc, PP_BusST) & READY_FOR_TX_NOW)) {
1008			ifp->if_timer = sc->buf_len;
1009			(void) splx(s);
1010			ifp->if_flags |= IFF_OACTIVE;
1011			return;
1012		}
1013
1014               	cs_xmit_buf(sc);
1015
1016		/*
1017		 * Set the watchdog timer in case we never hear
1018		 * from board again. (I don't know about correct
1019		 * value for this timeout)
1020		 */
1021		ifp->if_timer = length;
1022
1023		(void) splx(s);
1024		ifp->if_flags |= IFF_OACTIVE;
1025		return;
1026	}
1027}
1028
1029/*
1030 * Stop everything on the interface
1031 */
1032static void
1033cs_stop(struct cs_softc *sc)
1034{
1035	int s = splimp();
1036
1037	cs_writereg(sc, PP_RxCFG, 0);
1038	cs_writereg(sc, PP_TxCFG, 0);
1039	cs_writereg(sc, PP_BufCFG, 0);
1040	cs_writereg(sc, PP_BusCTL, 0);
1041
1042	sc->arpcom.ac_if.if_flags &= ~(IFF_RUNNING | IFF_OACTIVE);
1043	sc->arpcom.ac_if.if_timer = 0;
1044
1045	(void) splx(s);
1046}
1047
1048/*
1049 * Reset the interface
1050 */
1051static void
1052cs_reset(struct cs_softc *sc)
1053{
1054	cs_stop(sc);
1055	cs_init(sc);
1056}
1057
1058static void
1059cs_setmode(struct cs_softc *sc)
1060{
1061	struct ifnet *ifp = &(sc->arpcom.ac_if);
1062	int rx_ctl;
1063
1064	/* Stop the receiver while changing filters */
1065	cs_writereg(sc, PP_LineCTL, cs_readreg(sc, PP_LineCTL) & ~SERIAL_RX_ON);
1066
1067	if (ifp->if_flags & IFF_PROMISC) {
1068		/* Turn on promiscuous mode. */
1069		rx_ctl = RX_OK_ACCEPT | RX_PROM_ACCEPT;
1070	} else {
1071		if (ifp->if_flags & IFF_MULTICAST) {
1072			/* Allow receiving frames with multicast addresses */
1073			rx_ctl = RX_IA_ACCEPT | RX_BROADCAST_ACCEPT |
1074				 RX_OK_ACCEPT | RX_MULTCAST_ACCEPT;
1075			/*
1076			 * Here the reconfiguration of chip's multicast
1077			 * filters should be done but I've no idea about
1078			 * hash transformation in this chip. If you can
1079			 * add this code or describe me the transformation
1080			 * I'd be very glad.
1081			 */
1082		} else {
1083			/*
1084			 * Receive only good frames addressed for us and
1085			 * good broadcasts.
1086			 */
1087			rx_ctl = RX_IA_ACCEPT | RX_BROADCAST_ACCEPT |
1088				 RX_OK_ACCEPT;
1089		}
1090	}
1091
1092	/* Set up the filter */
1093	cs_writereg(sc, PP_RxCTL, RX_DEF_ACCEPT | rx_ctl);
1094
1095	/* Turn on receiver */
1096	cs_writereg(sc, PP_LineCTL, cs_readreg(sc, PP_LineCTL) | SERIAL_RX_ON);
1097}
1098
1099static int
1100cs_ioctl(register struct ifnet *ifp, u_long command, caddr_t data)
1101{
1102	struct cs_softc *sc=ifp->if_softc;
1103	struct ifreq *ifr = (struct ifreq *)data;
1104	int s,error=0;
1105
1106#ifdef CS_DEBUG
1107	if_printf(ifp, "ioctl(%lx)\n", command);
1108#endif
1109
1110	s=splimp();
1111
1112	switch (command) {
1113	case SIOCSIFFLAGS:
1114		/*
1115		 * Switch interface state between "running" and
1116		 * "stopped", reflecting the UP flag.
1117                 */
1118                if (sc->arpcom.ac_if.if_flags & IFF_UP) {
1119                        if ((sc->arpcom.ac_if.if_flags & IFF_RUNNING)==0) {
1120                                cs_init(sc);
1121                        }
1122                } else {
1123                        if ((sc->arpcom.ac_if.if_flags & IFF_RUNNING)!=0) {
1124                                cs_stop(sc);
1125                        }
1126		}
1127		/*
1128		 * Promiscuous and/or multicast flags may have changed,
1129		 * so reprogram the multicast filter and/or receive mode.
1130		 *
1131		 * See note about multicasts in cs_setmode
1132		 */
1133		cs_setmode(sc);
1134		break;
1135
1136	case SIOCADDMULTI:
1137	case SIOCDELMULTI:
1138	    /*
1139	     * Multicast list has changed; set the hardware filter
1140	     * accordingly.
1141	     *
1142	     * See note about multicasts in cs_setmode
1143	     */
1144	    cs_setmode(sc);
1145	    error = 0;
1146	    break;
1147
1148        case SIOCSIFMEDIA:
1149        case SIOCGIFMEDIA:
1150                error = ifmedia_ioctl(ifp, ifr, &sc->media, command);
1151                break;
1152
1153        default:
1154		error = ether_ioctl(ifp, command, data);
1155		break;
1156        }
1157
1158	(void) splx(s);
1159	return error;
1160}
1161
1162/*
1163 * Device timeout/watchdog routine. Entered if the device neglects to
1164 * generate an interrupt after a transmit has been started on it.
1165 */
1166static void
1167cs_watchdog(struct ifnet *ifp)
1168{
1169	struct cs_softc *sc = ifp->if_softc;
1170
1171	ifp->if_oerrors++;
1172	log(LOG_ERR, "%s: device timeout\n", ifp->if_xname);
1173
1174	/* Reset the interface */
1175	if (ifp->if_flags & IFF_UP)
1176		cs_reset(sc);
1177	else
1178		cs_stop(sc);
1179}
1180
1181static int
1182cs_mediachange(struct ifnet *ifp)
1183{
1184	struct cs_softc *sc = ifp->if_softc;
1185	struct ifmedia *ifm = &sc->media;
1186
1187	if (IFM_TYPE(ifm->ifm_media) != IFM_ETHER)
1188		return EINVAL;
1189
1190	return cs_mediaset(sc, ifm->ifm_media);
1191}
1192
1193static void
1194cs_mediastatus(struct ifnet *ifp, struct ifmediareq *ifmr)
1195{
1196	int line_status;
1197	struct cs_softc *sc = ifp->if_softc;
1198
1199	ifmr->ifm_active = IFM_ETHER;
1200	line_status = cs_readreg(sc, PP_LineST);
1201	if (line_status & TENBASET_ON) {
1202		ifmr->ifm_active |= IFM_10_T;
1203		if (sc->chip_type != CS8900) {
1204			if (cs_readreg(sc, PP_AutoNegST) & FDX_ACTIVE)
1205				ifmr->ifm_active |= IFM_FDX;
1206			if (cs_readreg(sc, PP_AutoNegST) & HDX_ACTIVE)
1207				ifmr->ifm_active |= IFM_HDX;
1208		}
1209		ifmr->ifm_status = IFM_AVALID;
1210		if (line_status & LINK_OK)
1211			ifmr->ifm_status |= IFM_ACTIVE;
1212	} else {
1213		if (line_status & AUI_ON) {
1214			cs_writereg(sc, PP_SelfCTL, cs_readreg(sc, PP_SelfCTL) |
1215			    HCB1_ENBL);
1216			if (((sc->adapter_cnf & A_CNF_DC_DC_POLARITY)!=0)^
1217			    (cs_readreg(sc, PP_SelfCTL) & HCB1))
1218				ifmr->ifm_active |= IFM_10_2;
1219			else
1220				ifmr->ifm_active |= IFM_10_5;
1221		}
1222	}
1223}
1224
1225static int
1226cs_mediaset(struct cs_softc *sc, int media)
1227{
1228        int error;
1229
1230	/* Stop the receiver & transmitter */
1231	cs_writereg(sc, PP_LineCTL, cs_readreg(sc, PP_LineCTL) &
1232	    ~(SERIAL_RX_ON | SERIAL_TX_ON));
1233
1234#ifdef CS_DEBUG
1235	if_printf(&sc->arpcom.ac_if, "cs_setmedia(%x)\n", media);
1236#endif
1237
1238	switch (IFM_SUBTYPE(media)) {
1239	default:
1240	case IFM_AUTO:
1241		if ((error=enable_tp(sc))==0)
1242			error = cs_duplex_auto(sc);
1243		else if ((error=enable_bnc(sc)) != 0)
1244			error = enable_aui(sc);
1245		break;
1246	case IFM_10_T:
1247		if ((error=enable_tp(sc)) != 0)
1248			break;
1249		if (media & IFM_FDX)
1250			cs_duplex_full(sc);
1251		else if (media & IFM_HDX)
1252			cs_duplex_half(sc);
1253		else
1254			error = cs_duplex_auto(sc);
1255		break;
1256	case IFM_10_2:
1257		error = enable_bnc(sc);
1258		break;
1259	case IFM_10_5:
1260		error = enable_aui(sc);
1261		break;
1262	}
1263
1264	/*
1265	 * Turn the transmitter & receiver back on
1266	 */
1267	cs_writereg(sc, PP_LineCTL, cs_readreg(sc, PP_LineCTL) |
1268	    SERIAL_RX_ON | SERIAL_TX_ON);
1269
1270	return error;
1271}
1272