sys/dev/cs/if_cs.c

   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$");
  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
  73 static void     cs_init(void *);
  74 static int      cs_ioctl(struct ifnet *, u_long, caddr_t);
  75 static void     cs_start(struct ifnet *);
  76 static void     cs_stop(struct cs_softc *);
  77 static void     cs_reset(struct cs_softc *);
  78 static void     cs_watchdog(struct ifnet *);
  79
  80 static int      cs_mediachange(struct ifnet *);
  81 static void     cs_mediastatus(struct ifnet *, struct ifmediareq *);
  82 static int      cs_mediaset(struct cs_softc *, int);
  83
  84 static void     cs_write_mbufs(struct cs_softc*, struct mbuf*);
  85 static void     cs_xmit_buf(struct cs_softc*);
  86 static int      cs_get_packet(struct cs_softc*);
  87 static void     cs_setmode(struct cs_softc*);
  88
  89 static int      get_eeprom_data(struct cs_softc *sc, int, int, uint16_t *);
  90 static int      get_eeprom_cksum(int, int, uint16_t *);
  91 static int      wait_eeprom_ready( struct cs_softc *);
  92 static void     control_dc_dc( struct cs_softc *, int );
  93 static int      send_test_pkt( struct cs_softc * );
  94 static int      enable_tp(struct cs_softc *);
  95 static int      enable_aui(struct cs_softc *);
  96 static int      enable_bnc(struct cs_softc *);
  97 static int      cs_duplex_auto(struct cs_softc *);
  98
  99 devclass_t cs_devclass;
 100
 101 /* sysctl vars */
 102 SYSCTL_NODE(_hw, OID_AUTO, cs, CTLFLAG_RD, 0, "cs device parameters");
 103
 104 int     cs_debug = 0;
 105 TUNABLE_INT("hw.cs.debug", &cs_debug);
 106 SYSCTL_INT(_hw_cs, OID_AUTO, debug, CTLFLAG_RW,
 107     &cs_debug, 0,
 108   "cs debug");
 109
 110 int     cs_ignore_cksum_failure = 0;
 111 TUNABLE_INT("hw.cs.ignore_checksum_failure", &cs_ignore_cksum_failure);
 112 SYSCTL_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
 116 static int      cs_recv_delay = 570;
 117 TUNABLE_INT("hw.cs.recv_delay", &cs_recv_delay);
 118 SYSCTL_INT(_hw_cs, OID_AUTO, recv_delay, CTLFLAG_RW, &cs_recv_delay, 570, "");
 119
 120 static int
 121 get_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
 150 static int
 151 get_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
 168 static int
 169 wait_eeprom_ready(struct cs_softc *sc)
 170 {
 171         DELAY(30000);   /* XXX should we do some checks here ? */
 172         return 0;
 173 }
 174
 175 static void
 176 control_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
 190 static int
 191 cs_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
 210 static int
 211 enable_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  */
 229 static int
 230 send_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  */
 271 static int
 272 enable_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  */
 289 static int
 290 enable_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
 304 int
 305 cs_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                 if (!(sc->flags & CS_NO_IRQ))
 471                         cs_writereg(sc, pp_isaint, irq);
 472         } else {
 473                 device_printf(dev, "Unknown or invalid irq\n");
 474                 return (ENXIO);
 475         }
 476
 477         /*
 478          * Temporary disabled
 479          *
 480         if (drq>0)
 481                 cs_writereg(sc, pp_isadma, drq);
 482         else {
 483                 device_printf(dev, "incorrect drq\n",);
 484                 return 0;
 485         }
 486         */
 487
 488         if (bootverbose)
 489                  device_printf(dev, "CS89%c0%s rev %c media%s%s%s\n",
 490                         chip_type==CS8900 ? '0' : '2',
 491                         chip_type==CS8920M ? "M" : "",
 492                         chip_revision,
 493                         (sc->adapter_cnf & A_CNF_10B_T) ? " TP"  : "",
 494                         (sc->adapter_cnf & A_CNF_AUI)   ? " AUI" : "",
 495                         (sc->adapter_cnf & A_CNF_10B_2) ? " BNC" : "");
 496
 497         if ((sc->adapter_cnf & A_CNF_EXTND_10B_2) &&
 498             (sc->adapter_cnf & A_CNF_LOW_RX_SQUELCH))
 499                 sc->line_ctl = LOW_RX_SQUELCH;
 500         else
 501                 sc->line_ctl = 0;
 502
 503
 504         return 0;
 505 }
 506
 507 /*
 508  * Allocate a port resource with the given resource id.
 509  */
 510 int cs_alloc_port(device_t dev, int rid, int size)
 511 {
 512         struct cs_softc *sc = device_get_softc(dev);
 513         struct resource *res;
 514
 515         res = bus_alloc_resource(dev, SYS_RES_IOPORT, &rid,
 516                                  0ul, ~0ul, size, RF_ACTIVE);
 517         if (res) {
 518                 sc->port_rid = rid;
 519                 sc->port_res = res;
 520                 sc->port_used = size;
 521                 return (0);
 522         } else {
 523                 return (ENOENT);
 524         }
 525 }
 526
 527 /*
 528  * Allocate a memory resource with the given resource id.
 529  */
 530 int cs_alloc_memory(device_t dev, int rid, int size)
 531 {
 532         struct cs_softc *sc = device_get_softc(dev);
 533         struct resource *res;
 534
 535         res = bus_alloc_resource(dev, SYS_RES_MEMORY, &rid,
 536                                  0ul, ~0ul, size, RF_ACTIVE);
 537         if (res) {
 538                 sc->mem_rid = rid;
 539                 sc->mem_res = res;
 540                 sc->mem_used = size;
 541                 return (0);
 542         } else {
 543                 return (ENOENT);
 544         }
 545 }
 546
 547 /*
 548  * Allocate an irq resource with the given resource id.
 549  */
 550 int cs_alloc_irq(device_t dev, int rid, int flags)
 551 {
 552         struct cs_softc *sc = device_get_softc(dev);
 553         struct resource *res;
 554
 555         res = bus_alloc_resource_any(dev, SYS_RES_IRQ, &rid,
 556                                      (RF_ACTIVE | flags));
 557         if (res) {
 558                 sc->irq_rid = rid;
 559                 sc->irq_res = res;
 560                 return (0);
 561         } else {
 562                 return (ENOENT);
 563         }
 564 }
 565
 566 /*
 567  * Release all resources
 568  */
 569 void cs_release_resources(device_t dev)
 570 {
 571         struct cs_softc *sc = device_get_softc(dev);
 572
 573         if (sc->port_res) {
 574                 bus_release_resource(dev, SYS_RES_IOPORT,
 575                                      sc->port_rid, sc->port_res);
 576                 sc->port_res = 0;
 577         }
 578         if (sc->mem_res) {
 579                 bus_release_resource(dev, SYS_RES_MEMORY,
 580                                      sc->mem_rid, sc->mem_res);
 581                 sc->mem_res = 0;
 582         }
 583         if (sc->irq_res) {
 584                 bus_release_resource(dev, SYS_RES_IRQ,
 585                                      sc->irq_rid, sc->irq_res);
 586                 sc->irq_res = 0;
 587         }
 588 }
 589
 590 /*
 591  * Install the interface into kernel networking data structures
 592  */
 593 int
 594 cs_attach(device_t dev)
 595 {
 596         int media=0;
 597         struct cs_softc *sc = device_get_softc(dev);;
 598         struct ifnet *ifp = &(sc->arpcom.ac_if);
 599
 600         cs_stop( sc );
 601
 602         ifp->if_softc=sc;
 603         if_initname(ifp, device_get_name(dev), device_get_unit(dev));
 604         ifp->if_start=cs_start;
 605         ifp->if_ioctl=cs_ioctl;
 606         ifp->if_watchdog=cs_watchdog;
 607         ifp->if_init=cs_init;
 608         ifp->if_snd.ifq_maxlen= IFQ_MAXLEN;
 609         /*
 610          *  MIB DATA
 611          */
 612         /*
 613         ifp->if_linkmib=&sc->mibdata;
 614         ifp->if_linkmiblen=sizeof sc->mibdata;
 615         */
 616
 617         ifp->if_flags=(IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST |
 618             IFF_NEEDSGIANT);
 619
 620         /*
 621          * this code still in progress (DMA support)
 622          *
 623
 624         sc->recv_ring=malloc(CS_DMA_BUFFER_SIZE<<1, M_DEVBUF, M_NOWAIT);
 625         if (sc->recv_ring == NULL) {
 626                 log(LOG_ERR,
 627                 "%s: Couldn't allocate memory for NIC\n", ifp->if_xname);
 628                 return(0);
 629         }
 630         if ((sc->recv_ring-(sc->recv_ring & 0x1FFFF))
 631             < (128*1024-CS_DMA_BUFFER_SIZE))
 632             sc->recv_ring+=16*1024;
 633
 634         */
 635
 636         sc->buffer=malloc(ETHER_MAX_LEN-ETHER_CRC_LEN,M_DEVBUF,M_NOWAIT);
 637         if (sc->buffer == NULL) {
 638                 if_printf(ifp, "Couldn't allocate memory for NIC\n");
 639                 return(0);
 640         }
 641
 642         /*
 643          * Initialize the media structures.
 644          */
 645         ifmedia_init(&sc->media, 0, cs_mediachange, cs_mediastatus);
 646
 647         if (sc->adapter_cnf & A_CNF_10B_T) {
 648                 ifmedia_add(&sc->media, IFM_ETHER|IFM_10_T, 0, NULL);
 649                 if (sc->chip_type != CS8900) {
 650                         ifmedia_add(&sc->media,
 651                                 IFM_ETHER|IFM_10_T|IFM_FDX, 0, NULL);
 652                         ifmedia_add(&sc->media,
 653                                 IFM_ETHER|IFM_10_T|IFM_HDX, 0, NULL);
 654                 }
 655         }
 656
 657         if (sc->adapter_cnf & A_CNF_10B_2)
 658                 ifmedia_add(&sc->media, IFM_ETHER|IFM_10_2, 0, NULL);
 659
 660         if (sc->adapter_cnf & A_CNF_AUI)
 661                 ifmedia_add(&sc->media, IFM_ETHER|IFM_10_5, 0, NULL);
 662
 663         if (sc->adapter_cnf & A_CNF_MEDIA)
 664                 ifmedia_add(&sc->media, IFM_ETHER|IFM_AUTO, 0, NULL);
 665
 666         /* Set default media from EEPROM */
 667         switch (sc->adapter_cnf & A_CNF_MEDIA_TYPE) {
 668         case A_CNF_MEDIA_AUTO:  media = IFM_ETHER|IFM_AUTO; break;
 669         case A_CNF_MEDIA_10B_T: media = IFM_ETHER|IFM_10_T; break;
 670         case A_CNF_MEDIA_10B_2: media = IFM_ETHER|IFM_10_2; break;
 671         case A_CNF_MEDIA_AUI:   media = IFM_ETHER|IFM_10_5; break;
 672         default:
 673                 if_printf(ifp, "no media, assuming 10baseT\n");
 674                 sc->adapter_cnf |= A_CNF_10B_T;
 675                 ifmedia_add(&sc->media, IFM_ETHER|IFM_10_T, 0, NULL);
 676                 if (sc->chip_type != CS8900) {
 677                         ifmedia_add(&sc->media,
 678                             IFM_ETHER|IFM_10_T|IFM_FDX, 0, NULL);
 679                         ifmedia_add(&sc->media,
 680                             IFM_ETHER|IFM_10_T|IFM_HDX, 0, NULL);
 681                 }
 682                 media = IFM_ETHER | IFM_10_T;
 683                 break;
 684         }
 685         ifmedia_set(&sc->media, media);
 686         cs_mediaset(sc, media);
 687
 688         ether_ifattach(ifp, sc->arpcom.ac_enaddr);
 689
 690         return (0);
 691 }
 692
 693 int
 694 cs_detach(device_t dev)
 695 {
 696         struct cs_softc *sc;
 697         struct ifnet *ifp;
 698
 699         sc = device_get_softc(dev);
 700         ifp = &sc->arpcom.ac_if;
 701
 702         cs_stop(sc);
 703         ifp->if_flags &= ~IFF_RUNNING;
 704         ether_ifdetach(ifp);
 705         cs_release_resources(dev);
 706         return (0);
 707 }
 708
 709 /*
 710  * Initialize the board
 711  */
 712 static void
 713 cs_init(void *xsc)
 714 {
 715         struct cs_softc *sc=(struct cs_softc *)xsc;
 716         struct ifnet *ifp = &sc->arpcom.ac_if;
 717         int i, s, rx_cfg;
 718
 719         /*
 720          * reset whatchdog timer
 721          */
 722         ifp->if_timer=0;
 723         sc->buf_len = 0;
 724
 725         s=splimp();
 726
 727         /*
 728          * Hardware initialization of cs
 729          */
 730
 731         /* Enable receiver and transmitter */
 732         cs_writereg(sc, PP_LineCTL,
 733                 cs_readreg(sc, PP_LineCTL) | SERIAL_RX_ON | SERIAL_TX_ON);
 734
 735         /* Configure the receiver mode */
 736         cs_setmode(sc);
 737
 738         /*
 739          * This defines what type of frames will cause interrupts
 740          * Bad frames should generate interrupts so that the driver
 741          * could track statistics of discarded packets
 742          */
 743         rx_cfg = RX_OK_ENBL | RX_CRC_ERROR_ENBL | RX_RUNT_ENBL |
 744                  RX_EXTRA_DATA_ENBL;
 745         if (sc->isa_config & STREAM_TRANSFER)
 746                 rx_cfg |= RX_STREAM_ENBL;
 747         cs_writereg(sc, PP_RxCFG, rx_cfg);
 748         cs_writereg(sc, PP_TxCFG, TX_LOST_CRS_ENBL |
 749                     TX_SQE_ERROR_ENBL | TX_OK_ENBL | TX_LATE_COL_ENBL |
 750                     TX_JBR_ENBL | TX_ANY_COL_ENBL | TX_16_COL_ENBL);
 751         cs_writereg(sc, PP_BufCFG, READY_FOR_TX_ENBL |
 752                     RX_MISS_COUNT_OVRFLOW_ENBL | TX_COL_COUNT_OVRFLOW_ENBL |
 753                     TX_UNDERRUN_ENBL /*| RX_DMA_ENBL*/);
 754
 755         /* Write MAC address into IA filter */
 756         for (i=0; i<ETHER_ADDR_LEN/2; i++)
 757                 cs_writereg(sc, PP_IA + i * 2,
 758                     sc->arpcom.ac_enaddr[i * 2] |
 759                     (sc->arpcom.ac_enaddr[i * 2 + 1] << 8) );
 760
 761         /*
 762          * Now enable everything
 763          */
 764 /*
 765 #ifdef  CS_USE_64K_DMA
 766         cs_writereg(sc, PP_BusCTL, ENABLE_IRQ | RX_DMA_SIZE_64K);
 767 #else
 768         cs_writereg(sc, PP_BusCTL, ENABLE_IRQ);
 769 #endif
 770 */
 771         cs_writereg(sc, PP_BusCTL, ENABLE_IRQ);
 772
 773         /*
 774          * Set running and clear output active flags
 775          */
 776         sc->arpcom.ac_if.if_flags |= IFF_RUNNING;
 777         sc->arpcom.ac_if.if_flags &= ~IFF_OACTIVE;
 778
 779         /*
 780          * Start sending process
 781          */
 782         cs_start(ifp);
 783
 784         (void) splx(s);
 785 }
 786
 787 /*
 788  * Get the packet from the board and send it to the upper layer.
 789  */
 790 static int
 791 cs_get_packet(struct cs_softc *sc)
 792 {
 793         struct ifnet *ifp = &(sc->arpcom.ac_if);
 794         int iobase = sc->nic_addr, status, length;
 795         struct ether_header *eh;
 796         struct mbuf *m;
 797
 798 #ifdef CS_DEBUG
 799         int i;
 800 #endif
 801
 802         status = cs_inw(sc, RX_FRAME_PORT);
 803         length = cs_inw(sc, RX_FRAME_PORT);
 804
 805 #ifdef CS_DEBUG
 806         if_printf(ifp, "rcvd: stat %x, len %d\n",
 807                 status, length);
 808 #endif
 809
 810         if (!(status & RX_OK)) {
 811 #ifdef CS_DEBUG
 812                 if_printf(ifp, "bad pkt stat %x\n", status);
 813 #endif
 814                 ifp->if_ierrors++;
 815                 return -1;
 816         }
 817
 818         MGETHDR(m, M_DONTWAIT, MT_DATA);
 819         if (m==NULL)
 820                 return -1;
 821
 822         if (length > MHLEN) {
 823                 MCLGET(m, M_DONTWAIT);
 824                 if (!(m->m_flags & M_EXT)) {
 825                         m_freem(m);
 826                         return -1;
 827                 }
 828         }
 829
 830         /* Initialize packet's header info */
 831         m->m_pkthdr.rcvif = ifp;
 832         m->m_pkthdr.len = length;
 833         m->m_len = length;
 834
 835         /* Get the data */
 836         insw(iobase + RX_FRAME_PORT, m->m_data, (length+1)>>1);
 837
 838         eh = mtod(m, struct ether_header *);
 839
 840 #ifdef CS_DEBUG
 841         for (i=0;i<length;i++)
 842              printf(" %02x",(unsigned char)*((char *)(m->m_data+i)));
 843         printf( "\n" );
 844 #endif
 845
 846         if (status & (RX_IA | RX_BROADCAST) ||
 847             (ifp->if_flags & IFF_MULTICAST && status & RX_HASHED)) {
 848                 /* Feed the packet to the upper layer */
 849                 (*ifp->if_input)(ifp, m);
 850                 ifp->if_ipackets++;
 851                 if (length == ETHER_MAX_LEN-ETHER_CRC_LEN)
 852                         DELAY(cs_recv_delay);
 853         } else {
 854                 m_freem(m);
 855         }
 856
 857         return 0;
 858 }
 859
 860 /*
 861  * Handle interrupts
 862  */
 863 void
 864 csintr(void *arg)
 865 {
 866         struct cs_softc *sc = (struct cs_softc*) arg;
 867         struct ifnet *ifp = &(sc->arpcom.ac_if);
 868         int status;
 869
 870 #ifdef CS_DEBUG
 871         if_printf(ifp, "Interrupt.\n");
 872 #endif
 873
 874         while ((status=cs_inw(sc, ISQ_PORT))) {
 875
 876 #ifdef CS_DEBUG
 877                 if_printf(ifp, "from ISQ: %04x\n", status);
 878 #endif
 879
 880                 switch (status & ISQ_EVENT_MASK) {
 881                 case ISQ_RECEIVER_EVENT:
 882                         cs_get_packet(sc);
 883                         break;
 884
 885                 case ISQ_TRANSMITTER_EVENT:
 886                         if (status & TX_OK)
 887                                 ifp->if_opackets++;
 888                         else
 889                                 ifp->if_oerrors++;
 890                         ifp->if_flags &= ~IFF_OACTIVE;
 891                         ifp->if_timer = 0;
 892                         break;
 893
 894                 case ISQ_BUFFER_EVENT:
 895                         if (status & READY_FOR_TX) {
 896                                 ifp->if_flags &= ~IFF_OACTIVE;
 897                                 ifp->if_timer = 0;
 898                         }
 899
 900                         if (status & TX_UNDERRUN) {
 901                                 ifp->if_flags &= ~IFF_OACTIVE;
 902                                 ifp->if_timer = 0;
 903                                 ifp->if_oerrors++;
 904                         }
 905                         break;
 906
 907                 case ISQ_RX_MISS_EVENT:
 908                         ifp->if_ierrors+=(status>>6);
 909                         break;
 910
 911                 case ISQ_TX_COL_EVENT:
 912                         ifp->if_collisions+=(status>>6);
 913                         break;
 914                 }
 915         }
 916
 917         if (!(ifp->if_flags & IFF_OACTIVE)) {
 918                 cs_start(ifp);
 919         }
 920 }
 921
 922 /*
 923  * Save the data in buffer
 924  */
 925
 926 static void
 927 cs_write_mbufs( struct cs_softc *sc, struct mbuf *m )
 928 {
 929         int len;
 930         struct mbuf *mp;
 931         unsigned char *data, *buf;
 932
 933         for (mp=m, buf=sc->buffer, sc->buf_len=0; mp != NULL; mp=mp->m_next) {
 934                 len = mp->m_len;
 935
 936                 /*
 937                  * Ignore empty parts
 938                  */
 939                 if (!len)
 940                 continue;
 941
 942                 /*
 943                  * Find actual data address
 944                  */
 945                 data = mtod(mp, caddr_t);
 946
 947                 bcopy((caddr_t) data, (caddr_t) buf, len);
 948                 buf += len;
 949                 sc->buf_len += len;
 950         }
 951 }
 952
 953
 954 static void
 955 cs_xmit_buf( struct cs_softc *sc )
 956 {
 957         outsw(sc->nic_addr+TX_FRAME_PORT, sc->buffer, (sc->buf_len+1)>>1);
 958         sc->buf_len = 0;
 959 }
 960
 961 static void
 962 cs_start(struct ifnet *ifp)
 963 {
 964         int s, length;
 965         struct mbuf *m, *mp;
 966         struct cs_softc *sc = ifp->if_softc;
 967
 968         s = splimp();
 969
 970         for (;;) {
 971                 if (sc->buf_len)
 972                         length = sc->buf_len;
 973                 else {
 974                         IF_DEQUEUE( &ifp->if_snd, m );
 975
 976                         if (m==NULL) {
 977                                 (void) splx(s);
 978                                 return;
 979                         }
 980
 981                         for (length=0, mp=m; mp != NULL; mp=mp->m_next)
 982                                 length += mp->m_len;
 983
 984                         /* Skip zero-length packets */
 985                         if (length == 0) {
 986                                 m_freem(m);
 987                                 continue;
 988                         }
 989
 990                         cs_write_mbufs(sc, m);
 991
 992                         BPF_MTAP(ifp, m);
 993
 994                         m_freem(m);
 995                 }
 996
 997                 /*
 998                  * Issue a SEND command
 999                  */
1000                 cs_outw(sc, TX_CMD_PORT, sc->send_cmd);
1001                 cs_outw(sc, TX_LEN_PORT, length );
1002
1003                 /*
1004                  * If there's no free space in the buffer then leave
1005                  * this packet for the next time: indicate output active
1006                  * and return.
1007                  */
1008                 if (!(cs_readreg(sc, PP_BusST) & READY_FOR_TX_NOW)) {
1009                         ifp->if_timer = sc->buf_len;
1010                         (void) splx(s);
1011                         ifp->if_flags |= IFF_OACTIVE;
1012                         return;
1013                 }
1014
1015                 cs_xmit_buf(sc);
1016
1017                 /*
1018                  * Set the watchdog timer in case we never hear
1019                  * from board again. (I don't know about correct
1020                  * value for this timeout)
1021                  */
1022                 ifp->if_timer = length;
1023
1024                 (void) splx(s);
1025                 ifp->if_flags |= IFF_OACTIVE;
1026                 return;
1027         }
1028 }
1029
1030 /*
1031  * Stop everything on the interface
1032  */
1033 static void
1034 cs_stop(struct cs_softc *sc)
1035 {
1036         int s = splimp();
1037
1038         cs_writereg(sc, PP_RxCFG, 0);
1039         cs_writereg(sc, PP_TxCFG, 0);
1040         cs_writereg(sc, PP_BufCFG, 0);
1041         cs_writereg(sc, PP_BusCTL, 0);
1042
1043         sc->arpcom.ac_if.if_flags &= ~(IFF_RUNNING | IFF_OACTIVE);
1044         sc->arpcom.ac_if.if_timer = 0;
1045
1046         (void) splx(s);
1047 }
1048
1049 /*
1050  * Reset the interface
1051  */
1052 static void
1053 cs_reset(struct cs_softc *sc)
1054 {
1055         cs_stop(sc);
1056         cs_init(sc);
1057 }
1058
1059 static void
1060 cs_setmode(struct cs_softc *sc)
1061 {
1062         struct ifnet *ifp = &(sc->arpcom.ac_if);
1063         int rx_ctl;
1064
1065         /* Stop the receiver while changing filters */
1066         cs_writereg(sc, PP_LineCTL, cs_readreg(sc, PP_LineCTL) & ~SERIAL_RX_ON);
1067
1068         if (ifp->if_flags & IFF_PROMISC) {
1069                 /* Turn on promiscuous mode. */
1070                 rx_ctl = RX_OK_ACCEPT | RX_PROM_ACCEPT;
1071         } else {
1072                 if (ifp->if_flags & IFF_MULTICAST) {
1073                         /* Allow receiving frames with multicast addresses */
1074                         rx_ctl = RX_IA_ACCEPT | RX_BROADCAST_ACCEPT |
1075                                  RX_OK_ACCEPT | RX_MULTCAST_ACCEPT;
1076                         /*
1077                          * Here the reconfiguration of chip's multicast
1078                          * filters should be done but I've no idea about
1079                          * hash transformation in this chip. If you can
1080                          * add this code or describe me the transformation
1081                          * I'd be very glad.
1082                          */
1083                 } else {
1084                         /*
1085                          * Receive only good frames addressed for us and
1086                          * good broadcasts.
1087                          */
1088                         rx_ctl = RX_IA_ACCEPT | RX_BROADCAST_ACCEPT |
1089                                  RX_OK_ACCEPT;
1090                 }
1091         }
1092
1093         /* Set up the filter */
1094         cs_writereg(sc, PP_RxCTL, RX_DEF_ACCEPT | rx_ctl);
1095
1096         /* Turn on receiver */
1097         cs_writereg(sc, PP_LineCTL, cs_readreg(sc, PP_LineCTL) | SERIAL_RX_ON);
1098 }
1099
1100 static int
1101 cs_ioctl(register struct ifnet *ifp, u_long command, caddr_t data)
1102 {
1103         struct cs_softc *sc=ifp->if_softc;
1104         struct ifreq *ifr = (struct ifreq *)data;
1105         int s,error=0;
1106
1107 #ifdef CS_DEBUG
1108         if_printf(ifp, "ioctl(%lx)\n", command);
1109 #endif
1110
1111         s=splimp();
1112
1113         switch (command) {
1114         case SIOCSIFFLAGS:
1115                 /*
1116                  * Switch interface state between "running" and
1117                  * "stopped", reflecting the UP flag.
1118                  */
1119                 if (sc->arpcom.ac_if.if_flags & IFF_UP) {
1120                         if ((sc->arpcom.ac_if.if_flags & IFF_RUNNING)==0) {
1121                                 cs_init(sc);
1122                         }
1123                 } else {
1124                         if ((sc->arpcom.ac_if.if_flags & IFF_RUNNING)!=0) {
1125                                 cs_stop(sc);
1126                         }
1127                 }
1128                 /*
1129                  * Promiscuous and/or multicast flags may have changed,
1130                  * so reprogram the multicast filter and/or receive mode.
1131                  *
1132                  * See note about multicasts in cs_setmode
1133                  */
1134                 cs_setmode(sc);
1135                 break;
1136
1137         case SIOCADDMULTI:
1138         case SIOCDELMULTI:
1139             /*
1140              * Multicast list has changed; set the hardware filter
1141              * accordingly.
1142              *
1143              * See note about multicasts in cs_setmode
1144              */
1145             cs_setmode(sc);
1146             error = 0;
1147             break;
1148
1149         case SIOCSIFMEDIA:
1150         case SIOCGIFMEDIA:
1151                 error = ifmedia_ioctl(ifp, ifr, &sc->media, command);
1152                 break;
1153
1154         default:
1155                 error = ether_ioctl(ifp, command, data);
1156                 break;
1157         }
1158
1159         (void) splx(s);
1160         return error;
1161 }
1162
1163 /*
1164  * Device timeout/watchdog routine. Entered if the device neglects to
1165  * generate an interrupt after a transmit has been started on it.
1166  */
1167 static void
1168 cs_watchdog(struct ifnet *ifp)
1169 {
1170         struct cs_softc *sc = ifp->if_softc;
1171
1172         ifp->if_oerrors++;
1173         log(LOG_ERR, "%s: device timeout\n", ifp->if_xname);
1174
1175         /* Reset the interface */
1176         if (ifp->if_flags & IFF_UP)
1177                 cs_reset(sc);
1178         else
1179                 cs_stop(sc);
1180 }
1181
1182 static int
1183 cs_mediachange(struct ifnet *ifp)
1184 {
1185         struct cs_softc *sc = ifp->if_softc;
1186         struct ifmedia *ifm = &sc->media;
1187
1188         if (IFM_TYPE(ifm->ifm_media) != IFM_ETHER)
1189                 return EINVAL;
1190
1191         return cs_mediaset(sc, ifm->ifm_media);
1192 }
1193
1194 static void
1195 cs_mediastatus(struct ifnet *ifp, struct ifmediareq *ifmr)
1196 {
1197         int line_status;
1198         struct cs_softc *sc = ifp->if_softc;
1199
1200         ifmr->ifm_active = IFM_ETHER;
1201         line_status = cs_readreg(sc, PP_LineST);
1202         if (line_status & TENBASET_ON) {
1203                 ifmr->ifm_active |= IFM_10_T;
1204                 if (sc->chip_type != CS8900) {
1205                         if (cs_readreg(sc, PP_AutoNegST) & FDX_ACTIVE)
1206                                 ifmr->ifm_active |= IFM_FDX;
1207                         if (cs_readreg(sc, PP_AutoNegST) & HDX_ACTIVE)
1208                                 ifmr->ifm_active |= IFM_HDX;
1209                 }
1210                 ifmr->ifm_status = IFM_AVALID;
1211                 if (line_status & LINK_OK)
1212                         ifmr->ifm_status |= IFM_ACTIVE;
1213         } else {
1214                 if (line_status & AUI_ON) {
1215                         cs_writereg(sc, PP_SelfCTL, cs_readreg(sc, PP_SelfCTL) |
1216                             HCB1_ENBL);
1217                         if (((sc->adapter_cnf & A_CNF_DC_DC_POLARITY)!=0)^
1218                             (cs_readreg(sc, PP_SelfCTL) & HCB1))
1219                                 ifmr->ifm_active |= IFM_10_2;
1220                         else
1221                                 ifmr->ifm_active |= IFM_10_5;
1222                 }
1223         }
1224 }
1225
1226 static int
1227 cs_mediaset(struct cs_softc *sc, int media)
1228 {
1229         int error;
1230
1231         /* Stop the receiver & transmitter */
1232         cs_writereg(sc, PP_LineCTL, cs_readreg(sc, PP_LineCTL) &
1233             ~(SERIAL_RX_ON | SERIAL_TX_ON));
1234
1235 #ifdef CS_DEBUG
1236         if_printf(&sc->arpcom.ac_if, "cs_setmedia(%x)\n", media);
1237 #endif
1238
1239         switch (IFM_SUBTYPE(media)) {
1240         default:
1241         case IFM_AUTO:
1242                 if ((error=enable_tp(sc))==0)
1243                         error = cs_duplex_auto(sc);
1244                 else if ((error=enable_bnc(sc)) != 0)
1245                         error = enable_aui(sc);
1246                 break;
1247         case IFM_10_T:
1248                 if ((error=enable_tp(sc)) != 0)
1249                         break;
1250                 if (media & IFM_FDX)
1251                         cs_duplex_full(sc);
1252                 else if (media & IFM_HDX)
1253                         cs_duplex_half(sc);
1254                 else
1255                         error = cs_duplex_auto(sc);
1256                 break;
1257         case IFM_10_2:
1258                 error = enable_bnc(sc);
1259                 break;
1260         case IFM_10_5:
1261                 error = enable_aui(sc);
1262                 break;
1263         }
1264
1265         /*
1266          * Turn the transmitter & receiver back on
1267          */
1268         cs_writereg(sc, PP_LineCTL, cs_readreg(sc, PP_LineCTL) |
1269             SERIAL_RX_ON | SERIAL_TX_ON);
1270
1271         return error;
1272 }