lan91c96.c

   1 /*------------------------------------------------------------------------
   2  * lan91c96.c
   3  * This is a driver for SMSC's LAN91C96 single-chip Ethernet device, based
   4  * on the SMC91111 driver from U-boot.
   5  *
   6  * (C) Copyright 2002
   7  * Sysgo Real-Time Solutions, GmbH <www.elinos.com>
   8  * Rolf Offermanns <rof@sysgo.de>
   9  *
  10  * Copyright (C) 2001 Standard Microsystems Corporation (SMSC)
  11  *       Developed by Simple Network Magic Corporation (SNMC)
  12  * Copyright (C) 1996 by Erik Stahlman (ES)
  13  *
  14  * This program is free software; you can redistribute it and/or modify
  15  * it under the terms of the GNU General Public License as published by
  16  * the Free Software Foundation; either version 2 of the License, or
  17  * (at your option) any later version.
  18  *
  19  * This program is distributed in the hope that it will be useful,
  20  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  21  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  22  * GNU General Public License for more details.
  23  *
  24  * You should have received a copy of the GNU General Public License
  25  * along with this program; if not, write to the Free Software
  26  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  27  *
  28  * Information contained in this file was obtained from the LAN91C96
  29  * manual from SMC.  To get a copy, if you really want one, you can find
  30  * information under www.smsc.com.
  31  *
  32  *
  33  * "Features" of the SMC chip:
  34  *   6144 byte packet memory. ( for the 91C96 )
  35  *   EEPROM for configuration
  36  *   AUI/TP selection  ( mine has 10Base2/10BaseT select )
  37  *
  38  * Arguments:
  39  *      io      = for the base address
  40  *      irq     = for the IRQ
  41  *
  42  * author:
  43  *      Erik Stahlman                           ( erik@vt.edu )
  44  *      Daris A Nevil                           ( dnevil@snmc.com )
  45  *
  46  *
  47  * Hardware multicast code from Peter Cammaert ( pc@denkart.be )
  48  *
  49  * Sources:
  50  *    o   SMSC LAN91C96 databook (www.smsc.com)
  51  *    o   smc91111.c (u-boot driver)
  52  *    o   smc9194.c (linux kernel driver)
  53  *    o   lan91c96.c (Intel Diagnostic Manager driver)
  54  *
  55  * History:
  56  *      04/30/03  Mathijs Haarman       Modified smc91111.c (u-boot version)
  57  *                                      for lan91c96
  58  *---------------------------------------------------------------------------
  59  */
  60
  61 #include <common.h>
  62 #include <command.h>
  63 #include "lan91c96.h"
  64 #include <net.h>
  65
  66 #ifdef CONFIG_DRIVER_LAN91C96
  67
  68 #if (CONFIG_COMMANDS & CFG_CMD_NET) || defined(CONFIG_CMD_NET)
  69
  70 /*------------------------------------------------------------------------
  71  *
  72  * Configuration options, for the experienced user to change.
  73  *
  74  -------------------------------------------------------------------------*/
  75
  76 /* Use power-down feature of the chip */
  77 #define POWER_DOWN      0
  78
  79 /*
  80  * Wait time for memory to be free.  This probably shouldn't be
  81  * tuned that much, as waiting for this means nothing else happens
  82  * in the system
  83 */
  84 #define MEMORY_WAIT_TIME 16
  85
  86 #define SMC_DEBUG 0
  87
  88 #if (SMC_DEBUG > 2 )
  89 #define PRINTK3(args...) printf(args)
  90 #else
  91 #define PRINTK3(args...)
  92 #endif
  93
  94 #if SMC_DEBUG > 1
  95 #define PRINTK2(args...) printf(args)
  96 #else
  97 #define PRINTK2(args...)
  98 #endif
  99
 100 #ifdef SMC_DEBUG
 101 #define PRINTK(args...) printf(args)
 102 #else
 103 #define PRINTK(args...)
 104 #endif
 105
 106
 107 /*------------------------------------------------------------------------
 108  *
 109  * The internal workings of the driver.  If you are changing anything
 110  * here with the SMC stuff, you should have the datasheet and know
 111  * what you are doing.
 112  *
 113  *------------------------------------------------------------------------
 114  */
 115 #define CARDNAME "LAN91C96"
 116
 117 #define SMC_BASE_ADDRESS CONFIG_LAN91C96_BASE
 118
 119 #define SMC_DEV_NAME "LAN91C96"
 120 #define SMC_ALLOC_MAX_TRY 5
 121 #define SMC_TX_TIMEOUT 30
 122
 123 #define ETH_ZLEN 60
 124
 125 #ifdef  CONFIG_LAN91C96_USE_32_BIT
 126 #define USE_32_BIT  1
 127 #else
 128 #undef USE_32_BIT
 129 #endif
 130
 131 /*-----------------------------------------------------------------
 132  *
 133  *  The driver can be entered at any of the following entry points.
 134  *
 135  *-----------------------------------------------------------------
 136  */
 137
 138 extern int eth_init (bd_t * bd);
 139 extern void eth_halt (void);
 140 extern int eth_rx (void);
 141 extern int eth_send (volatile void *packet, int length);
 142 #if 0
 143 static int smc_hw_init (void);
 144 #endif
 145
 146 /*
 147  * This is called by  register_netdev().  It is responsible for
 148  * checking the portlist for the SMC9000 series chipset.  If it finds
 149  * one, then it will initialize the device, find the hardware information,
 150  * and sets up the appropriate device parameters.
 151  * NOTE: Interrupts are *OFF* when this procedure is called.
 152  *
 153  * NB:This shouldn't be static since it is referred to externally.
 154  */
 155 int smc_init (void);
 156
 157 /*
 158  * This is called by  unregister_netdev().  It is responsible for
 159  * cleaning up before the driver is finally unregistered and discarded.
 160  */
 161 void smc_destructor (void);
 162
 163 /*
 164  * The kernel calls this function when someone wants to use the device,
 165  * typically 'ifconfig ethX up'.
 166  */
 167 static int smc_open (bd_t *bd);
 168
 169
 170 /*
 171  * This is called by the kernel in response to 'ifconfig ethX down'.  It
 172  * is responsible for cleaning up everything that the open routine
 173  * does, and maybe putting the card into a powerdown state.
 174  */
 175 static int smc_close (void);
 176
 177 /*
 178  * This is a separate procedure to handle the receipt of a packet, to
 179  * leave the interrupt code looking slightly cleaner
 180  */
 181 static int smc_rcv (void);
 182
 183 /* See if a MAC address is defined in the current environment. If so use it. If not
 184  . print a warning and set the environment and other globals with the default.
 185  . If an EEPROM is present it really should be consulted.
 186 */
 187 int smc_get_ethaddr(bd_t *bd);
 188 int get_rom_mac(unsigned char *v_rom_mac);
 189
 190 /* ------------------------------------------------------------
 191  * Internal routines
 192  * ------------------------------------------------------------
 193  */
 194
 195 static unsigned char smc_mac_addr[] = { 0xc0, 0x00, 0x00, 0x1b, 0x62, 0x9c };
 196
 197 /*
 198  * This function must be called before smc_open() if you want to override
 199  * the default mac address.
 200  */
 201
 202 void smc_set_mac_addr (const unsigned char *addr)
 203 {
 204         int i;
 205
 206         for (i = 0; i < sizeof (smc_mac_addr); i++) {
 207                 smc_mac_addr[i] = addr[i];
 208         }
 209 }
 210
 211 /*
 212  * smc_get_macaddr is no longer used. If you want to override the default
 213  * mac address, call smc_get_mac_addr as a part of the board initialisation.
 214  */
 215
 216 #if 0
 217 void smc_get_macaddr (byte * addr)
 218 {
 219         /* MAC ADDRESS AT FLASHBLOCK 1 / OFFSET 0x10 */
 220         unsigned char *dnp1110_mac = (unsigned char *) (0xE8000000 + 0x20010);
 221         int i;
 222
 223
 224         for (i = 0; i < 6; i++) {
 225                 addr[0] = *(dnp1110_mac + 0);
 226                 addr[1] = *(dnp1110_mac + 1);
 227                 addr[2] = *(dnp1110_mac + 2);
 228                 addr[3] = *(dnp1110_mac + 3);
 229                 addr[4] = *(dnp1110_mac + 4);
 230                 addr[5] = *(dnp1110_mac + 5);
 231         }
 232 }
 233 #endif /* 0 */
 234
 235 /***********************************************
 236  * Show available memory                       *
 237  ***********************************************/
 238 void dump_memory_info (void)
 239 {
 240         word mem_info;
 241         word old_bank;
 242
 243         old_bank = SMC_inw (LAN91C96_BANK_SELECT) & 0xF;
 244
 245         SMC_SELECT_BANK (0);
 246         mem_info = SMC_inw (LAN91C96_MIR);
 247         PRINTK2 ("Memory: %4d available\n", (mem_info >> 8) * 2048);
 248
 249         SMC_SELECT_BANK (old_bank);
 250 }
 251
 252 /*
 253  * A rather simple routine to print out a packet for debugging purposes.
 254  */
 255 #if SMC_DEBUG > 2
 256 static void print_packet (byte *, int);
 257 #endif
 258
 259 /* #define tx_done(dev) 1 */
 260
 261
 262 /* this does a soft reset on the device */
 263 static void smc_reset (void);
 264
 265 /* Enable Interrupts, Receive, and Transmit */
 266 static void smc_enable (void);
 267
 268 /* this puts the device in an inactive state */
 269 static void smc_shutdown (void);
 270
 271
 272 static int poll4int (byte mask, int timeout)
 273 {
 274         int tmo = get_timer (0) + timeout * CFG_HZ;
 275         int is_timeout = 0;
 276         word old_bank = SMC_inw (LAN91C96_BANK_SELECT);
 277
 278         PRINTK2 ("Polling...\n");
 279         SMC_SELECT_BANK (2);
 280         while ((SMC_inw (LAN91C96_INT_STATS) & mask) == 0) {
 281                 if (get_timer (0) >= tmo) {
 282                         is_timeout = 1;
 283                         break;
 284                 }
 285         }
 286
 287         /* restore old bank selection */
 288         SMC_SELECT_BANK (old_bank);
 289
 290         if (is_timeout)
 291                 return 1;
 292         else
 293                 return 0;
 294 }
 295
 296 /*
 297  * Function: smc_reset( void )
 298  * Purpose:
 299  *      This sets the SMC91111 chip to its normal state, hopefully from whatever
 300  *      mess that any other DOS driver has put it in.
 301  *
 302  * Maybe I should reset more registers to defaults in here?  SOFTRST  should
 303  * do that for me.
 304  *
 305  * Method:
 306  *      1.  send a SOFT RESET
 307  *      2.  wait for it to finish
 308  *      3.  enable autorelease mode
 309  *      4.  reset the memory management unit
 310  *      5.  clear all interrupts
 311  *
 312 */
 313 static void smc_reset (void)
 314 {
 315         PRINTK2 ("%s:smc_reset\n", SMC_DEV_NAME);
 316
 317         /* This resets the registers mostly to defaults, but doesn't
 318            affect EEPROM.  That seems unnecessary */
 319         SMC_SELECT_BANK (0);
 320         SMC_outw (LAN91C96_RCR_SOFT_RST, LAN91C96_RCR);
 321
 322         udelay (10);
 323
 324         /* Disable transmit and receive functionality */
 325         SMC_outw (0, LAN91C96_RCR);
 326         SMC_outw (0, LAN91C96_TCR);
 327
 328         /* set the control register */
 329         SMC_SELECT_BANK (1);
 330         SMC_outw (SMC_inw (LAN91C96_CONTROL) | LAN91C96_CTR_BIT_8,
 331                           LAN91C96_CONTROL);
 332
 333         /* Disable all interrupts */
 334         SMC_outb (0, LAN91C96_INT_MASK);
 335 }
 336
 337 /*
 338  * Function: smc_enable
 339  * Purpose: let the chip talk to the outside work
 340  * Method:
 341  *      1.  Initialize the Memory Configuration Register
 342  *      2.  Enable the transmitter
 343  *      3.  Enable the receiver
 344 */
 345 static void smc_enable ()
 346 {
 347         PRINTK2 ("%s:smc_enable\n", SMC_DEV_NAME);
 348         SMC_SELECT_BANK (0);
 349
 350         /* Initialize the Memory Configuration Register. See page
 351            49 of the LAN91C96 data sheet for details. */
 352         SMC_outw (LAN91C96_MCR_TRANSMIT_PAGES, LAN91C96_MCR);
 353
 354         /* Initialize the Transmit Control Register */
 355         SMC_outw (LAN91C96_TCR_TXENA, LAN91C96_TCR);
 356         /* Initialize the Receive Control Register
 357          * FIXME:
 358          * The promiscuous bit set because I could not receive ARP reply
 359          * packets from the server when I send a ARP request. It only works
 360          * when I set the promiscuous bit
 361          */
 362         SMC_outw (LAN91C96_RCR_RXEN | LAN91C96_RCR_PRMS, LAN91C96_RCR);
 363 }
 364
 365 /*
 366  * Function: smc_shutdown
 367  * Purpose:  closes down the SMC91xxx chip.
 368  * Method:
 369  *      1. zero the interrupt mask
 370  *      2. clear the enable receive flag
 371  *      3. clear the enable xmit flags
 372  *
 373  * TODO:
 374  *   (1) maybe utilize power down mode.
 375  *      Why not yet?  Because while the chip will go into power down mode,
 376  *      the manual says that it will wake up in response to any I/O requests
 377  *      in the register space.   Empirical results do not show this working.
 378  */
 379 static void smc_shutdown ()
 380 {
 381         PRINTK2 (CARDNAME ":smc_shutdown\n");
 382
 383         /* no more interrupts for me */
 384         SMC_SELECT_BANK (2);
 385         SMC_outb (0, LAN91C96_INT_MASK);
 386
 387         /* and tell the card to stay away from that nasty outside world */
 388         SMC_SELECT_BANK (0);
 389         SMC_outb (0, LAN91C96_RCR);
 390         SMC_outb (0, LAN91C96_TCR);
 391 }
 392
 393
 394 /*
 395  * Function:  smc_hardware_send_packet(struct net_device * )
 396  * Purpose:
 397  *      This sends the actual packet to the SMC9xxx chip.
 398  *
 399  * Algorithm:
 400  *      First, see if a saved_skb is available.
 401  *              ( this should NOT be called if there is no 'saved_skb'
 402  *      Now, find the packet number that the chip allocated
 403  *      Point the data pointers at it in memory
 404  *      Set the length word in the chip's memory
 405  *      Dump the packet to chip memory
 406  *      Check if a last byte is needed ( odd length packet )
 407  *              if so, set the control flag right
 408  *      Tell the card to send it
 409  *      Enable the transmit interrupt, so I know if it failed
 410  *      Free the kernel data if I actually sent it.
 411  */
 412 static int smc_send_packet (volatile void *packet, int packet_length)
 413 {
 414         byte packet_no;
 415         unsigned long ioaddr;
 416         byte *buf;
 417         int length;
 418         int numPages;
 419         int try = 0;
 420         int time_out;
 421         byte status;
 422
 423
 424         PRINTK3 ("%s:smc_hardware_send_packet\n", SMC_DEV_NAME);
 425
 426         length = ETH_ZLEN < packet_length ? packet_length : ETH_ZLEN;
 427
 428         /* allocate memory
 429          ** The MMU wants the number of pages to be the number of 256 bytes
 430          ** 'pages', minus 1 ( since a packet can't ever have 0 pages :) )
 431          **
 432          ** The 91C111 ignores the size bits, but the code is left intact
 433          ** for backwards and future compatibility.
 434          **
 435          ** Pkt size for allocating is data length +6 (for additional status
 436          ** words, length and ctl!)
 437          **
 438          ** If odd size then last byte is included in this header.
 439          */
 440         numPages = ((length & 0xfffe) + 6);
 441         numPages >>= 8;                         /* Divide by 256 */
 442
 443         if (numPages > 7) {
 444                 printf ("%s: Far too big packet error. \n", SMC_DEV_NAME);
 445                 return 0;
 446         }
 447
 448         /* now, try to allocate the memory */
 449
 450         SMC_SELECT_BANK (2);
 451         SMC_outw (LAN91C96_MMUCR_ALLOC_TX | numPages, LAN91C96_MMU);
 452
 453   again:
 454         try++;
 455         time_out = MEMORY_WAIT_TIME;
 456         do {
 457                 status = SMC_inb (LAN91C96_INT_STATS);
 458                 if (status & LAN91C96_IST_ALLOC_INT) {
 459
 460                         SMC_outb (LAN91C96_IST_ALLOC_INT, LAN91C96_INT_STATS);
 461                         break;
 462                 }
 463         } while (--time_out);
 464
 465         if (!time_out) {
 466                 PRINTK2 ("%s: memory allocation, try %d failed ...\n",
 467                                  SMC_DEV_NAME, try);
 468                 if (try < SMC_ALLOC_MAX_TRY)
 469                         goto again;
 470                 else
 471                         return 0;
 472         }
 473
 474         PRINTK2 ("%s: memory allocation, try %d succeeded ...\n",
 475                          SMC_DEV_NAME, try);
 476
 477         /* I can send the packet now.. */
 478
 479         ioaddr = SMC_BASE_ADDRESS;
 480
 481         buf = (byte *) packet;
 482
 483         /* If I get here, I _know_ there is a packet slot waiting for me */
 484         packet_no = SMC_inb (LAN91C96_ARR);
 485         if (packet_no & LAN91C96_ARR_FAILED) {
 486                 /* or isn't there?  BAD CHIP! */
 487                 printf ("%s: Memory allocation failed. \n", SMC_DEV_NAME);
 488                 return 0;
 489         }
 490
 491         /* we have a packet address, so tell the card to use it */
 492         SMC_outb (packet_no, LAN91C96_PNR);
 493
 494         /* point to the beginning of the packet */
 495         SMC_outw (LAN91C96_PTR_AUTO_INCR, LAN91C96_POINTER);
 496
 497         PRINTK3 ("%s: Trying to xmit packet of length %x\n",
 498                          SMC_DEV_NAME, length);
 499
 500 #if SMC_DEBUG > 2
 501         printf ("Transmitting Packet\n");
 502         print_packet (buf, length);
 503 #endif
 504
 505         /* send the packet length ( +6 for status, length and ctl byte )
 506            and the status word ( set to zeros ) */
 507 #ifdef USE_32_BIT
 508         SMC_outl ((length + 6) << 16, LAN91C96_DATA_HIGH);
 509 #else
 510         SMC_outw (0, LAN91C96_DATA_HIGH);
 511         /* send the packet length ( +6 for status words, length, and ctl */
 512         SMC_outw ((length + 6), LAN91C96_DATA_HIGH);
 513 #endif /* USE_32_BIT */
 514
 515         /* send the actual data
 516          * I _think_ it's faster to send the longs first, and then
 517          * mop up by sending the last word.  It depends heavily
 518          * on alignment, at least on the 486.  Maybe it would be
 519          * a good idea to check which is optimal?  But that could take
 520          * almost as much time as is saved?
 521          */
 522 #ifdef USE_32_BIT
 523         SMC_outsl (LAN91C96_DATA_HIGH, buf, length >> 2);
 524         if (length & 0x2)
 525                 SMC_outw (*((word *) (buf + (length & 0xFFFFFFFC))),
 526                                   LAN91C96_DATA_HIGH);
 527 #else
 528         SMC_outsw (LAN91C96_DATA_HIGH, buf, (length) >> 1);
 529 #endif /* USE_32_BIT */
 530
 531         /* Send the last byte, if there is one.   */
 532         if ((length & 1) == 0) {
 533                 SMC_outw (0, LAN91C96_DATA_HIGH);
 534         } else {
 535                 SMC_outw (buf[length - 1] | 0x2000, LAN91C96_DATA_HIGH);
 536         }
 537
 538         /* and let the chipset deal with it */
 539         SMC_outw (LAN91C96_MMUCR_ENQUEUE, LAN91C96_MMU);
 540
 541         /* poll for TX INT */
 542         if (poll4int (LAN91C96_MSK_TX_INT, SMC_TX_TIMEOUT)) {
 543                 /* sending failed */
 544                 PRINTK2 ("%s: TX timeout, sending failed...\n", SMC_DEV_NAME);
 545
 546                 /* release packet */
 547                 SMC_outw (LAN91C96_MMUCR_RELEASE_TX, LAN91C96_MMU);
 548
 549                 /* wait for MMU getting ready (low) */
 550                 while (SMC_inw (LAN91C96_MMU) & LAN91C96_MMUCR_NO_BUSY) {
 551                         udelay (10);
 552                 }
 553
 554                 PRINTK2 ("MMU ready\n");
 555
 556
 557                 return 0;
 558         } else {
 559                 /* ack. int */
 560                 SMC_outw (LAN91C96_IST_TX_INT, LAN91C96_INT_STATS);
 561
 562                 PRINTK2 ("%s: Sent packet of length %d \n", SMC_DEV_NAME, length);
 563
 564                 /* release packet */
 565                 SMC_outw (LAN91C96_MMUCR_RELEASE_TX, LAN91C96_MMU);
 566
 567                 /* wait for MMU getting ready (low) */
 568                 while (SMC_inw (LAN91C96_MMU) & LAN91C96_MMUCR_NO_BUSY) {
 569                         udelay (10);
 570                 }
 571
 572                 PRINTK2 ("MMU ready\n");
 573         }
 574
 575         return length;
 576 }
 577
 578 /*-------------------------------------------------------------------------
 579  * smc_destructor( struct net_device * dev )
 580  *   Input parameters:
 581  *      dev, pointer to the device structure
 582  *
 583  *   Output:
 584  *      None.
 585  *--------------------------------------------------------------------------
 586  */
 587 void smc_destructor ()
 588 {
 589         PRINTK2 (CARDNAME ":smc_destructor\n");
 590 }
 591
 592
 593 /*
 594  * Open and Initialize the board
 595  *
 596  * Set up everything, reset the card, etc ..
 597  *
 598  */
 599 static int smc_open (bd_t *bd)
 600 {
 601         int i, err;                     /* used to set hw ethernet address */
 602
 603         PRINTK2 ("%s:smc_open\n", SMC_DEV_NAME);
 604
 605         /* reset the hardware */
 606
 607         smc_reset ();
 608         smc_enable ();
 609
 610         SMC_SELECT_BANK (1);
 611
 612         err = smc_get_ethaddr (bd);     /* set smc_mac_addr, and sync it with u-boot globals */
 613         if (err < 0) {
 614                 memset (bd->bi_enetaddr, 0, 6); /* hack to make error stick! upper code will abort if not set */
 615                 return (-1);    /* upper code ignores this, but NOT bi_enetaddr */
 616         }
 617 #ifdef USE_32_BIT
 618         for (i = 0; i < 6; i += 2) {
 619                 word address;
 620
 621                 address = smc_mac_addr[i + 1] << 8;
 622                 address |= smc_mac_addr[i];
 623                 SMC_outw (address, LAN91C96_IA0 + i);
 624         }
 625 #else
 626         for (i = 0; i < 6; i++)
 627                 SMC_outb (smc_mac_addr[i], LAN91C96_IA0 + i);
 628 #endif
 629         return 0;
 630 }
 631
 632 /*-------------------------------------------------------------
 633  *
 634  * smc_rcv -  receive a packet from the card
 635  *
 636  * There is ( at least ) a packet waiting to be read from
 637  * chip-memory.
 638  *
 639  * o Read the status
 640  * o If an error, record it
 641  * o otherwise, read in the packet
 642  *-------------------------------------------------------------
 643  */
 644 static int smc_rcv ()
 645 {
 646         int packet_number;
 647         word status;
 648         word packet_length;
 649         int is_error = 0;
 650
 651 #ifdef USE_32_BIT
 652         dword stat_len;
 653 #endif
 654
 655
 656         SMC_SELECT_BANK (2);
 657         packet_number = SMC_inw (LAN91C96_FIFO);
 658
 659         if (packet_number & LAN91C96_FIFO_RXEMPTY) {
 660                 return 0;
 661         }
 662
 663         PRINTK3 ("%s:smc_rcv\n", SMC_DEV_NAME);
 664         /*  start reading from the start of the packet */
 665         SMC_outw (LAN91C96_PTR_READ | LAN91C96_PTR_RCV |
 666                           LAN91C96_PTR_AUTO_INCR, LAN91C96_POINTER);
 667
 668         /* First two words are status and packet_length */
 669 #ifdef USE_32_BIT
 670         stat_len = SMC_inl (LAN91C96_DATA_HIGH);
 671         status = stat_len & 0xffff;
 672         packet_length = stat_len >> 16;
 673 #else
 674         status = SMC_inw (LAN91C96_DATA_HIGH);
 675         packet_length = SMC_inw (LAN91C96_DATA_HIGH);
 676 #endif
 677
 678         packet_length &= 0x07ff;        /* mask off top bits */
 679
 680         PRINTK2 ("RCV: STATUS %4x LENGTH %4x\n", status, packet_length);
 681
 682         if (!(status & FRAME_FILTER)) {
 683                 /* Adjust for having already read the first two words */
 684                 packet_length -= 4;             /*4; */
 685
 686
 687                 /* set odd length for bug in LAN91C111, */
 688                 /* which never sets RS_ODDFRAME */
 689                 /* TODO ? */
 690
 691
 692 #ifdef USE_32_BIT
 693                 PRINTK3 (" Reading %d dwords (and %d bytes) \n",
 694                          packet_length >> 2, packet_length & 3);
 695                 /* QUESTION:  Like in the TX routine, do I want
 696                    to send the DWORDs or the bytes first, or some
 697                    mixture.  A mixture might improve already slow PIO
 698                    performance  */
 699                 SMC_insl (LAN91C96_DATA_HIGH, NetRxPackets[0], packet_length >> 2);
 700                 /* read the left over bytes */
 701                 if (packet_length & 3) {
 702                         int i;
 703
 704                         byte *tail = (byte *) (NetRxPackets[0] + (packet_length & ~3));
 705                         dword leftover = SMC_inl (LAN91C96_DATA_HIGH);
 706
 707                         for (i = 0; i < (packet_length & 3); i++)
 708                                 *tail++ = (byte) (leftover >> (8 * i)) & 0xff;
 709                 }
 710 #else
 711                 PRINTK3 (" Reading %d words and %d byte(s) \n",
 712                                  (packet_length >> 1), packet_length & 1);
 713                 SMC_insw (LAN91C96_DATA_HIGH, NetRxPackets[0], packet_length >> 1);
 714
 715 #endif /* USE_32_BIT */
 716
 717 #if     SMC_DEBUG > 2
 718                 printf ("Receiving Packet\n");
 719                 print_packet (NetRxPackets[0], packet_length);
 720 #endif
 721         } else {
 722                 /* error ... */
 723                 /* TODO ? */
 724                 is_error = 1;
 725         }
 726
 727         while (SMC_inw (LAN91C96_MMU) & LAN91C96_MMUCR_NO_BUSY)
 728                 udelay (1);             /* Wait until not busy */
 729
 730         /*  error or good, tell the card to get rid of this packet */
 731         SMC_outw (LAN91C96_MMUCR_RELEASE_RX, LAN91C96_MMU);
 732
 733         while (SMC_inw (LAN91C96_MMU) & LAN91C96_MMUCR_NO_BUSY)
 734                 udelay (1);             /* Wait until not busy */
 735
 736         if (!is_error) {
 737                 /* Pass the packet up to the protocol layers. */
 738                 NetReceive (NetRxPackets[0], packet_length);
 739                 return packet_length;
 740         } else {
 741                 return 0;
 742         }
 743
 744 }
 745
 746 /*----------------------------------------------------
 747  * smc_close
 748  *
 749  * this makes the board clean up everything that it can
 750  * and not talk to the outside world.   Caused by
 751  * an 'ifconfig ethX down'
 752  *
 753  -----------------------------------------------------*/
 754 static int smc_close ()
 755 {
 756         PRINTK2 ("%s:smc_close\n", SMC_DEV_NAME);
 757
 758         /* clear everything */
 759         smc_shutdown ();
 760
 761         return 0;
 762 }
 763
 764 #if SMC_DEBUG > 2
 765 static void print_packet (byte * buf, int length)
 766 {
 767 #if 0
 768         int i;
 769         int remainder;
 770         int lines;
 771
 772         printf ("Packet of length %d \n", length);
 773
 774         lines = length / 16;
 775         remainder = length % 16;
 776
 777         for (i = 0; i < lines; i++) {
 778                 int cur;
 779
 780                 for (cur = 0; cur < 8; cur++) {
 781                         byte a, b;
 782
 783                         a = *(buf++);
 784                         b = *(buf++);
 785                         printf ("%02x%02x ", a, b);
 786                 }
 787                 printf ("\n");
 788         }
 789         for (i = 0; i < remainder / 2; i++) {
 790                 byte a, b;
 791
 792                 a = *(buf++);
 793                 b = *(buf++);
 794                 printf ("%02x%02x ", a, b);
 795         }
 796         printf ("\n");
 797 #endif /* 0 */
 798 }
 799 #endif /* SMC_DEBUG > 2 */
 800
 801 int eth_init (bd_t * bd)
 802 {
 803         return (smc_open(bd));
 804 }
 805
 806 void eth_halt ()
 807 {
 808         smc_close ();
 809 }
 810
 811 int eth_rx ()
 812 {
 813         return smc_rcv ();
 814 }
 815
 816 int eth_send (volatile void *packet, int length)
 817 {
 818         return smc_send_packet (packet, length);
 819 }
 820
 821
 822 #if 0
 823 /*-------------------------------------------------------------------------
 824  * smc_hw_init()
 825  *
 826  *   Function:
 827  *      Reset and enable the device, check if the I/O space location
 828  *      is correct
 829  *
 830  *   Input parameters:
 831  *      None
 832  *
 833  *   Output:
 834  *      0 --> success
 835  *      1 --> error
 836  *--------------------------------------------------------------------------
 837  */
 838 static int smc_hw_init ()
 839 {
 840         unsigned short status_test;
 841
 842         /* The attribute register of the LAN91C96 is located at address
 843            0x0e000000 on the lubbock platform */
 844         volatile unsigned *attaddr = (unsigned *) (0x0e000000);
 845
 846         /* first reset, then enable the device. Sequence is critical */
 847         attaddr[LAN91C96_ECOR] |= LAN91C96_ECOR_SRESET;
 848         udelay (100);
 849         attaddr[LAN91C96_ECOR] &= ~LAN91C96_ECOR_SRESET;
 850         attaddr[LAN91C96_ECOR] |= LAN91C96_ECOR_ENABLE;
 851
 852         /* force 16-bit mode */
 853         attaddr[LAN91C96_ECSR] &= ~LAN91C96_ECSR_IOIS8;
 854         udelay (100);
 855
 856         /* check if the I/O address is correct, the upper byte of the
 857            bank select register should read 0x33 */
 858
 859         status_test = SMC_inw (LAN91C96_BANK_SELECT);
 860         if ((status_test & 0xFF00) != 0x3300) {
 861                 printf ("Failed to initialize ethernetchip\n");
 862                 return 1;
 863         }
 864         return 0;
 865 }
 866 #endif /* 0 */
 867
 868 #endif /* COMMANDS & CFG_NET */
 869
 870
 871 /* smc_get_ethaddr (bd_t * bd)
 872  *
 873  * This checks both the environment and the ROM for an ethernet address. If
 874  * found, the environment takes precedence.
 875  */
 876
 877 int smc_get_ethaddr (bd_t * bd)
 878 {
 879         int env_size = 0;
 880         int rom_valid = 0;
 881         int env_present = 0;
 882         int reg = 0;
 883         char *s = NULL;
 884         char *e = NULL;
 885         char *v_mac, es[] = "11:22:33:44:55:66";
 886         char s_env_mac[64];
 887         uchar v_env_mac[6];
 888         uchar v_rom_mac[6];
 889
 890         env_size = getenv_r ("ethaddr", s_env_mac, sizeof (s_env_mac));
 891         if (env_size != sizeof(es)) {   /* Ignore if env is bad or not set */
 892                 printf ("\n*** Warning: ethaddr is not set properly, ignoring!!\n");
 893         } else {
 894                 env_present = 1;
 895                 s = s_env_mac;
 896
 897                 for (reg = 0; reg < 6; ++reg) { /* turn string into mac value */
 898                         v_env_mac[reg] = s ? simple_strtoul (s, &e, 16) : 0;
 899                         if (s)
 900                                 s = (*e) ? e + 1 : e;
 901                 }
 902         }
 903
 904         rom_valid = get_rom_mac (v_rom_mac);    /* get ROM mac value if any */
 905
 906         if (!env_present) {     /* if NO env */
 907                 if (rom_valid) {        /* but ROM is valid */
 908                         v_mac = (char *)v_rom_mac;
 909                         sprintf (s_env_mac, "%02X:%02X:%02X:%02X:%02X:%02X",
 910                                  v_mac[0], v_mac[1], v_mac[2], v_mac[3],
 911                                  v_mac[4], v_mac[5]);
 912                         setenv ("ethaddr", s_env_mac);
 913                 } else {        /* no env, bad ROM */
 914                         printf ("\n*** ERROR: ethaddr is NOT set !!\n");
 915                         return (-1);
 916                 }
 917         } else {                /* good env, don't care ROM */
 918                 v_mac = (char *)v_env_mac;      /* always use a good env over a ROM */
 919         }
 920
 921         if (env_present && rom_valid) { /* if both env and ROM are good */
 922                 if (memcmp (v_env_mac, v_rom_mac, 6) != 0) {
 923                         printf ("\nWarning: MAC addresses don't match:\n");
 924                         printf ("\tHW MAC address:  "
 925                                 "%02X:%02X:%02X:%02X:%02X:%02X\n",
 926                                 v_rom_mac[0], v_rom_mac[1],
 927                                 v_rom_mac[2], v_rom_mac[3],
 928                                 v_rom_mac[4], v_rom_mac[5] );
 929                         printf ("\t\"ethaddr\" value: "
 930                                 "%02X:%02X:%02X:%02X:%02X:%02X\n",
 931                                 v_env_mac[0], v_env_mac[1],
 932                                 v_env_mac[2], v_env_mac[3],
 933                                 v_env_mac[4], v_env_mac[5]) ;
 934                         debug ("### Set MAC addr from environment\n");
 935                 }
 936         }
 937         memcpy (bd->bi_enetaddr, v_mac, 6);     /* update global address to match env (allows env changing) */
 938         smc_set_mac_addr ((unsigned char *)v_mac); /* use old function to update smc default */
 939         PRINTK("Using MAC Address %02X:%02X:%02X:%02X:%02X:%02X\n", v_mac[0], v_mac[1],
 940                 v_mac[2], v_mac[3], v_mac[4], v_mac[5]);
 941         return (0);
 942 }
 943
 944 /*
 945  * get_rom_mac()
 946  * Note, this has omly been tested for the OMAP730 P2.
 947  */
 948
 949 int get_rom_mac (unsigned char *v_rom_mac)
 950 {
 951 #ifdef HARDCODE_MAC     /* used for testing or to supress run time warnings */
 952         char hw_mac_addr[] = { 0x02, 0x80, 0xad, 0x20, 0x31, 0xb8 };
 953
 954         memcpy (v_rom_mac, hw_mac_addr, 6);
 955         return (1);
 956 #else
 957         int i;
 958         SMC_SELECT_BANK (1);
 959         for (i=0; i<6; i++)
 960         {
 961                 v_rom_mac[i] = SMC_inb (LAN91C96_IA0 + i);
 962         }
 963         return (1);
 964 #endif
 965 }
 966
 967 #endif /* CONFIG_DRIVER_LAN91C96 */