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