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