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