drivers/net/uli526x.c

   1 /*
   2  * Copyright 2007, 2010 Freescale Semiconductor, Inc.
   3  *
   4  * Author: Roy Zang <tie-fei.zang@freescale.com>, Sep, 2007
   5  *
   6  * Description:
   7  * ULI 526x Ethernet port driver.
   8  * Based on the Linux driver: drivers/net/tulip/uli526x.c
   9  *
  10  * This is free software; you can redistribute it and/or modify
  11  * it under the terms of  the GNU General  Public License as published by
  12  * the Free Software Foundation;  either version 2 of the  License, or
  13  * (at your option) any later version.
  14  */
  15
  16 #include <common.h>
  17 #include <malloc.h>
  18 #include <net.h>
  19 #include <netdev.h>
  20 #include <asm/io.h>
  21 #include <pci.h>
  22 #include <miiphy.h>
  23
  24 /* some kernel function compatible define */
  25
  26 #undef DEBUG
  27
  28 /* Board/System/Debug information/definition */
  29 #define ULI_VENDOR_ID           0x10B9
  30 #define ULI5261_DEVICE_ID       0x5261
  31 #define ULI5263_DEVICE_ID       0x5263
  32 /* ULi M5261 ID*/
  33 #define PCI_ULI5261_ID          (ULI5261_DEVICE_ID << 16 | ULI_VENDOR_ID)
  34 /* ULi M5263 ID*/
  35 #define PCI_ULI5263_ID          (ULI5263_DEVICE_ID << 16 | ULI_VENDOR_ID)
  36
  37 #define ULI526X_IO_SIZE 0x100
  38 #define TX_DESC_CNT     0x10            /* Allocated Tx descriptors */
  39 #define RX_DESC_CNT     PKTBUFSRX       /* Allocated Rx descriptors */
  40 #define TX_FREE_DESC_CNT        (TX_DESC_CNT - 2) /* Max TX packet count */
  41 #define TX_WAKE_DESC_CNT        (TX_DESC_CNT - 3) /* TX wakeup count */
  42 #define DESC_ALL_CNT            (TX_DESC_CNT + RX_DESC_CNT)
  43 #define TX_BUF_ALLOC            0x300
  44 #define RX_ALLOC_SIZE           PKTSIZE
  45 #define ULI526X_RESET           1
  46 #define CR0_DEFAULT             0
  47 #define CR6_DEFAULT             0x22200000
  48 #define CR7_DEFAULT             0x180c1
  49 #define CR15_DEFAULT            0x06            /* TxJabber RxWatchdog */
  50 #define TDES0_ERR_MASK          0x4302          /* TXJT, LC, EC, FUE */
  51 #define MAX_PACKET_SIZE         1514
  52 #define ULI5261_MAX_MULTICAST   14
  53 #define RX_COPY_SIZE            100
  54 #define MAX_CHECK_PACKET        0x8000
  55
  56 #define ULI526X_10MHF           0
  57 #define ULI526X_100MHF          1
  58 #define ULI526X_10MFD           4
  59 #define ULI526X_100MFD          5
  60 #define ULI526X_AUTO            8
  61
  62 #define ULI526X_TXTH_72         0x400000        /* TX TH 72 byte */
  63 #define ULI526X_TXTH_96         0x404000        /* TX TH 96 byte */
  64 #define ULI526X_TXTH_128        0x0000          /* TX TH 128 byte */
  65 #define ULI526X_TXTH_256        0x4000          /* TX TH 256 byte */
  66 #define ULI526X_TXTH_512        0x8000          /* TX TH 512 byte */
  67 #define ULI526X_TXTH_1K         0xC000          /* TX TH 1K  byte */
  68
  69 /* CR9 definition: SROM/MII */
  70 #define CR9_SROM_READ           0x4800
  71 #define CR9_SRCS                0x1
  72 #define CR9_SRCLK               0x2
  73 #define CR9_CRDOUT              0x8
  74 #define SROM_DATA_0             0x0
  75 #define SROM_DATA_1             0x4
  76 #define PHY_DATA_1              0x20000
  77 #define PHY_DATA_0              0x00000
  78 #define MDCLKH                  0x10000
  79
  80 #define PHY_POWER_DOWN  0x800
  81
  82 #define SROM_V41_CODE           0x14
  83
  84 #define SROM_CLK_WRITE(data, ioaddr) do {                       \
  85         outl(data|CR9_SROM_READ|CR9_SRCS, ioaddr);              \
  86         udelay(5);                                              \
  87         outl(data|CR9_SROM_READ|CR9_SRCS|CR9_SRCLK, ioaddr);    \
  88         udelay(5);                                              \
  89         outl(data|CR9_SROM_READ|CR9_SRCS, ioaddr);              \
  90         udelay(5);                                              \
  91         } while (0)
  92
  93 /* Structure/enum declaration */
  94
  95 struct tx_desc {
  96         u32 tdes0, tdes1, tdes2, tdes3; /* Data for the card */
  97         char *tx_buf_ptr;               /* Data for us */
  98         struct tx_desc *next_tx_desc;
  99 };
 100
 101 struct rx_desc {
 102         u32 rdes0, rdes1, rdes2, rdes3; /* Data for the card */
 103         char *rx_buf_ptr;               /* Data for us */
 104         struct rx_desc *next_rx_desc;
 105 };
 106
 107 struct uli526x_board_info {
 108         u32 chip_id;    /* Chip vendor/Device ID */
 109         pci_dev_t pdev;
 110
 111         long ioaddr;                    /* I/O base address */
 112         u32 cr0_data;
 113         u32 cr5_data;
 114         u32 cr6_data;
 115         u32 cr7_data;
 116         u32 cr15_data;
 117
 118         /* pointer for memory physical address */
 119         dma_addr_t buf_pool_dma_ptr;    /* Tx buffer pool memory */
 120         dma_addr_t buf_pool_dma_start;  /* Tx buffer pool align dword */
 121         dma_addr_t desc_pool_dma_ptr;   /* descriptor pool memory */
 122         dma_addr_t first_tx_desc_dma;
 123         dma_addr_t first_rx_desc_dma;
 124
 125         /* descriptor pointer */
 126         unsigned char *buf_pool_ptr;    /* Tx buffer pool memory */
 127         unsigned char *buf_pool_start;  /* Tx buffer pool align dword */
 128         unsigned char *desc_pool_ptr;   /* descriptor pool memory */
 129         struct tx_desc *first_tx_desc;
 130         struct tx_desc *tx_insert_ptr;
 131         struct tx_desc *tx_remove_ptr;
 132         struct rx_desc *first_rx_desc;
 133         struct rx_desc *rx_ready_ptr;   /* packet come pointer */
 134         unsigned long tx_packet_cnt;    /* transmitted packet count */
 135
 136         u16 PHY_reg4;                   /* Saved Phyxcer register 4 value */
 137
 138         u8 media_mode;                  /* user specify media mode */
 139         u8 op_mode;                     /* real work dedia mode */
 140         u8 phy_addr;
 141
 142         /* NIC SROM data */
 143         unsigned char srom[128];
 144 };
 145
 146 enum uli526x_offsets {
 147         DCR0 = 0x00, DCR1 = 0x08, DCR2 = 0x10, DCR3 = 0x18, DCR4 = 0x20,
 148         DCR5 = 0x28, DCR6 = 0x30, DCR7 = 0x38, DCR8 = 0x40, DCR9 = 0x48,
 149         DCR10 = 0x50, DCR11 = 0x58, DCR12 = 0x60, DCR13 = 0x68, DCR14 = 0x70,
 150         DCR15 = 0x78
 151 };
 152
 153 enum uli526x_CR6_bits {
 154         CR6_RXSC = 0x2, CR6_PBF = 0x8, CR6_PM = 0x40, CR6_PAM = 0x80,
 155         CR6_FDM = 0x200, CR6_TXSC = 0x2000, CR6_STI = 0x100000,
 156         CR6_SFT = 0x200000, CR6_RXA = 0x40000000, CR6_NO_PURGE = 0x20000000
 157 };
 158
 159 /* Global variable declaration -- */
 160
 161 static unsigned char uli526x_media_mode = ULI526X_AUTO;
 162
 163 static struct tx_desc desc_pool_array[DESC_ALL_CNT + 0x20]
 164         __attribute__ ((aligned(32)));
 165 static char buf_pool[TX_BUF_ALLOC * TX_DESC_CNT + 4];
 166
 167 /* For module input parameter */
 168 static int mode = 8;
 169
 170 /* function declaration -- */
 171 static int uli526x_start_xmit(struct eth_device *dev,
 172                                 volatile void *packet, int length);
 173 static const struct ethtool_ops netdev_ethtool_ops;
 174 static u16 read_srom_word(long, int);
 175 static void uli526x_descriptor_init(struct uli526x_board_info *, unsigned long);
 176 static void allocate_rx_buffer(struct uli526x_board_info *);
 177 static void update_cr6(u32, unsigned long);
 178 static u16 uli_phy_read(unsigned long, u8, u8, u32);
 179 static u16 phy_readby_cr10(unsigned long, u8, u8);
 180 static void uli_phy_write(unsigned long, u8, u8, u16, u32);
 181 static void phy_writeby_cr10(unsigned long, u8, u8, u16);
 182 static void phy_write_1bit(unsigned long, u32, u32);
 183 static u16 phy_read_1bit(unsigned long, u32);
 184 static int uli526x_rx_packet(struct eth_device *);
 185 static void uli526x_free_tx_pkt(struct eth_device *,
 186                 struct uli526x_board_info *);
 187 static void uli526x_reuse_buf(struct rx_desc *);
 188 static void uli526x_init(struct eth_device *);
 189 static void uli526x_set_phyxcer(struct uli526x_board_info *);
 190
 191
 192 static int uli526x_init_one(struct eth_device *, bd_t *);
 193 static void uli526x_disable(struct eth_device *);
 194 static void set_mac_addr(struct eth_device *);
 195
 196 static struct pci_device_id uli526x_pci_tbl[] = {
 197         { ULI_VENDOR_ID, ULI5261_DEVICE_ID}, /* 5261 device */
 198         { ULI_VENDOR_ID, ULI5263_DEVICE_ID}, /* 5263 device */
 199         {}
 200 };
 201
 202 /* ULI526X network board routine */
 203
 204 /*
 205  *      Search ULI526X board, register it
 206  */
 207
 208 int uli526x_initialize(bd_t *bis)
 209 {
 210         pci_dev_t devno;
 211         int card_number = 0;
 212         struct eth_device *dev;
 213         struct uli526x_board_info *db;  /* board information structure */
 214
 215         u32 iobase;
 216         int idx = 0;
 217
 218         while (1) {
 219                 /* Find PCI device */
 220                 devno = pci_find_devices(uli526x_pci_tbl, idx++);
 221                 if (devno < 0)
 222                         break;
 223
 224                 pci_read_config_dword(devno, PCI_BASE_ADDRESS_1, &iobase);
 225                 iobase &= ~0xf;
 226
 227                 dev = (struct eth_device *)malloc(sizeof *dev);
 228                 if (!dev) {
 229                         printf("uli526x: Can not allocate memory\n");
 230                         break;
 231                 }
 232                 memset(dev, 0, sizeof(*dev));
 233                 sprintf(dev->name, "uli526x#%d", card_number);
 234                 db = (struct uli526x_board_info *)
 235                         malloc(sizeof(struct uli526x_board_info));
 236
 237                 dev->priv = db;
 238                 db->pdev = devno;
 239                 dev->iobase = iobase;
 240
 241                 dev->init = uli526x_init_one;
 242                 dev->halt = uli526x_disable;
 243                 dev->send = uli526x_start_xmit;
 244                 dev->recv = uli526x_rx_packet;
 245
 246                 /* init db */
 247                 db->ioaddr = dev->iobase;
 248                 /* get chip id */
 249
 250                 pci_read_config_dword(devno, PCI_VENDOR_ID, &db->chip_id);
 251 #ifdef DEBUG
 252                 printf("uli526x: uli526x @0x%x\n", iobase);
 253                 printf("uli526x: chip_id%x\n", db->chip_id);
 254 #endif
 255                 eth_register(dev);
 256                 card_number++;
 257                 pci_write_config_byte(devno, PCI_LATENCY_TIMER, 0x20);
 258                 udelay(10 * 1000);
 259         }
 260         return card_number;
 261 }
 262
 263 static int uli526x_init_one(struct eth_device *dev, bd_t *bis)
 264 {
 265
 266         struct uli526x_board_info *db = dev->priv;
 267         int i;
 268
 269         switch (mode) {
 270         case ULI526X_10MHF:
 271         case ULI526X_100MHF:
 272         case ULI526X_10MFD:
 273         case ULI526X_100MFD:
 274                 uli526x_media_mode = mode;
 275                 break;
 276         default:
 277                 uli526x_media_mode = ULI526X_AUTO;
 278                 break;
 279         }
 280
 281         /* Allocate Tx/Rx descriptor memory */
 282         db->desc_pool_ptr = (uchar *)&desc_pool_array[0];
 283         db->desc_pool_dma_ptr = (dma_addr_t)&desc_pool_array[0];
 284         if (db->desc_pool_ptr == NULL)
 285                 return -1;
 286
 287         db->buf_pool_ptr = (uchar *)&buf_pool[0];
 288         db->buf_pool_dma_ptr = (dma_addr_t)&buf_pool[0];
 289         if (db->buf_pool_ptr == NULL)
 290                 return -1;
 291
 292         db->first_tx_desc = (struct tx_desc *) db->desc_pool_ptr;
 293         db->first_tx_desc_dma = db->desc_pool_dma_ptr;
 294
 295         db->buf_pool_start = db->buf_pool_ptr;
 296         db->buf_pool_dma_start = db->buf_pool_dma_ptr;
 297
 298 #ifdef DEBUG
 299         printf("%s(): db->ioaddr= 0x%x\n",
 300                 __FUNCTION__, db->ioaddr);
 301         printf("%s(): media_mode= 0x%x\n",
 302                 __FUNCTION__, uli526x_media_mode);
 303         printf("%s(): db->desc_pool_ptr= 0x%x\n",
 304                 __FUNCTION__, db->desc_pool_ptr);
 305         printf("%s(): db->desc_pool_dma_ptr= 0x%x\n",
 306                 __FUNCTION__, db->desc_pool_dma_ptr);
 307         printf("%s(): db->buf_pool_ptr= 0x%x\n",
 308                 __FUNCTION__, db->buf_pool_ptr);
 309         printf("%s(): db->buf_pool_dma_ptr= 0x%x\n",
 310                 __FUNCTION__, db->buf_pool_dma_ptr);
 311 #endif
 312
 313         /* read 64 word srom data */
 314         for (i = 0; i < 64; i++)
 315                 ((u16 *) db->srom)[i] = cpu_to_le16(read_srom_word(db->ioaddr,
 316                         i));
 317
 318         /* Set Node address */
 319         if (((db->srom[0] == 0xff) && (db->srom[1] == 0xff)) ||
 320             ((db->srom[0] == 0x00) && (db->srom[1] == 0x00)))
 321         /* SROM absent, so write MAC address to ID Table */
 322                 set_mac_addr(dev);
 323         else {          /*Exist SROM*/
 324                 for (i = 0; i < 6; i++)
 325                         dev->enetaddr[i] = db->srom[20 + i];
 326         }
 327 #ifdef DEBUG
 328         for (i = 0; i < 6; i++)
 329                 printf("%c%02x", i ? ':' : ' ', dev->enetaddr[i]);
 330 #endif
 331         db->PHY_reg4 = 0x1e0;
 332
 333         /* system variable init */
 334         db->cr6_data = CR6_DEFAULT ;
 335         db->cr6_data |= ULI526X_TXTH_256;
 336         db->cr0_data = CR0_DEFAULT;
 337         uli526x_init(dev);
 338         return 0;
 339 }
 340
 341 static void uli526x_disable(struct eth_device *dev)
 342 {
 343 #ifdef DEBUG
 344         printf("uli526x_disable\n");
 345 #endif
 346         struct uli526x_board_info *db = dev->priv;
 347
 348         if (!((inl(db->ioaddr + DCR12)) & 0x8)) {
 349                 /* Reset & stop ULI526X board */
 350                 outl(ULI526X_RESET, db->ioaddr + DCR0);
 351                 udelay(5);
 352                 uli_phy_write(db->ioaddr, db->phy_addr, 0, 0x8000, db->chip_id);
 353
 354                 /* reset the board */
 355                 db->cr6_data &= ~(CR6_RXSC | CR6_TXSC); /* Disable Tx/Rx */
 356                 update_cr6(db->cr6_data, dev->iobase);
 357                 outl(0, dev->iobase + DCR7);            /* Disable Interrupt */
 358                 outl(inl(dev->iobase + DCR5), dev->iobase + DCR5);
 359         }
 360 }
 361
 362 /*      Initialize ULI526X board
 363  *      Reset ULI526X board
 364  *      Initialize TX/Rx descriptor chain structure
 365  *      Send the set-up frame
 366  *      Enable Tx/Rx machine
 367  */
 368
 369 static void uli526x_init(struct eth_device *dev)
 370 {
 371
 372         struct uli526x_board_info *db = dev->priv;
 373         u8      phy_tmp;
 374         u16     phy_value;
 375         u16 phy_reg_reset;
 376
 377         /* Reset M526x MAC controller */
 378         outl(ULI526X_RESET, db->ioaddr + DCR0); /* RESET MAC */
 379         udelay(100);
 380         outl(db->cr0_data, db->ioaddr + DCR0);
 381         udelay(5);
 382
 383         /* Phy addr : In some boards,M5261/M5263 phy address != 1 */
 384         db->phy_addr = 1;
 385         db->tx_packet_cnt = 0;
 386         for (phy_tmp = 0; phy_tmp < 32; phy_tmp++) {
 387                 /* peer add */
 388                 phy_value = uli_phy_read(db->ioaddr, phy_tmp, 3, db->chip_id);
 389                 if (phy_value != 0xffff && phy_value != 0) {
 390                         db->phy_addr = phy_tmp;
 391                         break;
 392                 }
 393         }
 394
 395 #ifdef DEBUG
 396         printf("%s(): db->ioaddr= 0x%x\n", __FUNCTION__, db->ioaddr);
 397         printf("%s(): db->phy_addr= 0x%x\n", __FUNCTION__, db->phy_addr);
 398 #endif
 399         if (phy_tmp == 32)
 400                 printf("Can not find the phy address!!!");
 401
 402         /* Parser SROM and media mode */
 403         db->media_mode = uli526x_media_mode;
 404
 405         if (!(inl(db->ioaddr + DCR12) & 0x8)) {
 406                 /* Phyxcer capability setting */
 407                 phy_reg_reset = uli_phy_read(db->ioaddr,
 408                         db->phy_addr, 0, db->chip_id);
 409                 phy_reg_reset = (phy_reg_reset | 0x8000);
 410                 uli_phy_write(db->ioaddr, db->phy_addr, 0,
 411                         phy_reg_reset, db->chip_id);
 412                 udelay(500);
 413
 414                 /* Process Phyxcer Media Mode */
 415                 uli526x_set_phyxcer(db);
 416         }
 417         /* Media Mode Process */
 418         if (!(db->media_mode & ULI526X_AUTO))
 419                 db->op_mode = db->media_mode;   /* Force Mode */
 420
 421         /* Initialize Transmit/Receive decriptor and CR3/4 */
 422         uli526x_descriptor_init(db, db->ioaddr);
 423
 424         /* Init CR6 to program M526X operation */
 425         update_cr6(db->cr6_data, db->ioaddr);
 426
 427         /* Init CR7, interrupt active bit */
 428         db->cr7_data = CR7_DEFAULT;
 429         outl(db->cr7_data, db->ioaddr + DCR7);
 430
 431         /* Init CR15, Tx jabber and Rx watchdog timer */
 432         outl(db->cr15_data, db->ioaddr + DCR15);
 433
 434         /* Enable ULI526X Tx/Rx function */
 435         db->cr6_data |= CR6_RXSC | CR6_TXSC;
 436         update_cr6(db->cr6_data, db->ioaddr);
 437         while (!(inl(db->ioaddr + DCR12) & 0x8))
 438                 udelay(10);
 439 }
 440
 441 /*
 442  *      Hardware start transmission.
 443  *      Send a packet to media from the upper layer.
 444  */
 445
 446 static int uli526x_start_xmit(struct eth_device *dev,
 447                                 volatile void *packet, int length)
 448 {
 449         struct uli526x_board_info *db = dev->priv;
 450         struct tx_desc *txptr;
 451         unsigned int len = length;
 452         /* Too large packet check */
 453         if (len > MAX_PACKET_SIZE) {
 454                 printf(": big packet = %d\n", len);
 455                 return 0;
 456         }
 457
 458         /* No Tx resource check, it never happen nromally */
 459         if (db->tx_packet_cnt >= TX_FREE_DESC_CNT) {
 460                 printf("No Tx resource %ld\n", db->tx_packet_cnt);
 461                 return 0;
 462         }
 463
 464         /* Disable NIC interrupt */
 465         outl(0, dev->iobase + DCR7);
 466
 467         /* transmit this packet */
 468         txptr = db->tx_insert_ptr;
 469         memcpy((char *)txptr->tx_buf_ptr, (char *)packet, (int)length);
 470         txptr->tdes1 = cpu_to_le32(0xe1000000 | length);
 471
 472         /* Point to next transmit free descriptor */
 473         db->tx_insert_ptr = txptr->next_tx_desc;
 474
 475         /* Transmit Packet Process */
 476         if ((db->tx_packet_cnt < TX_DESC_CNT)) {
 477                 txptr->tdes0 = cpu_to_le32(0x80000000); /* Set owner bit */
 478                 db->tx_packet_cnt++;                    /* Ready to send */
 479                 outl(0x1, dev->iobase + DCR1);  /* Issue Tx polling */
 480         }
 481
 482         /* Got ULI526X status */
 483         db->cr5_data = inl(db->ioaddr + DCR5);
 484         outl(db->cr5_data, db->ioaddr + DCR5);
 485
 486 #ifdef TX_DEBUG
 487         printf("%s(): length = 0x%x\n", __FUNCTION__, length);
 488         printf("%s(): cr5_data=%x\n", __FUNCTION__, db->cr5_data);
 489 #endif
 490
 491         outl(db->cr7_data, dev->iobase + DCR7);
 492         uli526x_free_tx_pkt(dev, db);
 493
 494         return length;
 495 }
 496
 497 /*
 498  *      Free TX resource after TX complete
 499  */
 500
 501 static void uli526x_free_tx_pkt(struct eth_device *dev,
 502         struct uli526x_board_info *db)
 503 {
 504         struct tx_desc *txptr;
 505         u32 tdes0;
 506
 507         txptr = db->tx_remove_ptr;
 508         while (db->tx_packet_cnt) {
 509                 tdes0 = le32_to_cpu(txptr->tdes0);
 510                 /* printf(DRV_NAME ": tdes0=%x\n", tdes0); */
 511                 if (tdes0 & 0x80000000)
 512                         break;
 513
 514                 /* A packet sent completed */
 515                 db->tx_packet_cnt--;
 516
 517                 if (tdes0 != 0x7fffffff) {
 518 #ifdef TX_DEBUG
 519                         printf("%s()tdes0=%x\n", __FUNCTION__, tdes0);
 520 #endif
 521                         if (tdes0 & TDES0_ERR_MASK) {
 522                                 if (tdes0 & 0x0002) {   /* UnderRun */
 523                                         if (!(db->cr6_data & CR6_SFT)) {
 524                                                 db->cr6_data = db->cr6_data |
 525                                                         CR6_SFT;
 526                                                 update_cr6(db->cr6_data,
 527                                                         db->ioaddr);
 528                                         }
 529                                 }
 530                         }
 531                 }
 532
 533                 txptr = txptr->next_tx_desc;
 534         }/* End of while */
 535
 536         /* Update TX remove pointer to next */
 537         db->tx_remove_ptr = txptr;
 538 }
 539
 540
 541 /*
 542  *      Receive the come packet and pass to upper layer
 543  */
 544
 545 static int uli526x_rx_packet(struct eth_device *dev)
 546 {
 547         struct uli526x_board_info *db = dev->priv;
 548         struct rx_desc *rxptr;
 549         int rxlen = 0;
 550         u32 rdes0;
 551
 552         rxptr = db->rx_ready_ptr;
 553
 554         rdes0 = le32_to_cpu(rxptr->rdes0);
 555 #ifdef RX_DEBUG
 556         printf("%s(): rxptr->rdes0=%x:%x\n", __FUNCTION__, rxptr->rdes0);
 557 #endif
 558         if (!(rdes0 & 0x80000000)) {    /* packet owner check */
 559                 if ((rdes0 & 0x300) != 0x300) {
 560                         /* A packet without First/Last flag */
 561                         /* reuse this buf */
 562                         printf("A packet without First/Last flag");
 563                         uli526x_reuse_buf(rxptr);
 564                 } else {
 565                         /* A packet with First/Last flag */
 566                         rxlen = ((rdes0 >> 16) & 0x3fff) - 4;
 567 #ifdef RX_DEBUG
 568                         printf("%s(): rxlen =%x\n", __FUNCTION__, rxlen);
 569 #endif
 570                         /* error summary bit check */
 571                         if (rdes0 & 0x8000) {
 572                                 /* This is a error packet */
 573                                 printf("Error: rdes0: %x\n", rdes0);
 574                         }
 575
 576                         if (!(rdes0 & 0x8000) ||
 577                                 ((db->cr6_data & CR6_PM) && (rxlen > 6))) {
 578
 579 #ifdef RX_DEBUG
 580                                 printf("%s(): rx_skb_ptr =%x\n",
 581                                         __FUNCTION__, rxptr->rx_buf_ptr);
 582                                 printf("%s(): rxlen =%x\n",
 583                                         __FUNCTION__, rxlen);
 584
 585                                 printf("%s(): buf addr =%x\n",
 586                                         __FUNCTION__, rxptr->rx_buf_ptr);
 587                                 printf("%s(): rxlen =%x\n",
 588                                         __FUNCTION__, rxlen);
 589                                 int i;
 590                                 for (i = 0; i < 0x20; i++)
 591                                         printf("%s(): data[%x] =%x\n",
 592                                         __FUNCTION__, i, rxptr->rx_buf_ptr[i]);
 593 #endif
 594
 595                                 NetReceive((uchar *)rxptr->rx_buf_ptr, rxlen);
 596                                 uli526x_reuse_buf(rxptr);
 597
 598                         } else {
 599                                 /* Reuse SKB buffer when the packet is error */
 600                                 printf("Reuse buffer, rdes0");
 601                                 uli526x_reuse_buf(rxptr);
 602                         }
 603                 }
 604
 605                 rxptr = rxptr->next_rx_desc;
 606         }
 607
 608         db->rx_ready_ptr = rxptr;
 609         return rxlen;
 610 }
 611
 612 /*
 613  *      Reuse the RX buffer
 614  */
 615
 616 static void uli526x_reuse_buf(struct rx_desc *rxptr)
 617 {
 618
 619         if (!(rxptr->rdes0 & cpu_to_le32(0x80000000)))
 620                 rxptr->rdes0 = cpu_to_le32(0x80000000);
 621         else
 622                 printf("Buffer reuse method error");
 623 }
 624 /*
 625  *      Initialize transmit/Receive descriptor
 626  *      Using Chain structure, and allocate Tx/Rx buffer
 627  */
 628
 629 static void uli526x_descriptor_init(struct uli526x_board_info *db,
 630         unsigned long ioaddr)
 631 {
 632         struct tx_desc *tmp_tx;
 633         struct rx_desc *tmp_rx;
 634         unsigned char *tmp_buf;
 635         dma_addr_t tmp_tx_dma, tmp_rx_dma;
 636         dma_addr_t tmp_buf_dma;
 637         int i;
 638         /* tx descriptor start pointer */
 639         db->tx_insert_ptr = db->first_tx_desc;
 640         db->tx_remove_ptr = db->first_tx_desc;
 641
 642         outl(db->first_tx_desc_dma, ioaddr + DCR4);     /* TX DESC address */
 643
 644         /* rx descriptor start pointer */
 645         db->first_rx_desc = (void *)db->first_tx_desc +
 646                 sizeof(struct tx_desc) * TX_DESC_CNT;
 647         db->first_rx_desc_dma =  db->first_tx_desc_dma +
 648                 sizeof(struct tx_desc) * TX_DESC_CNT;
 649         db->rx_ready_ptr = db->first_rx_desc;
 650         outl(db->first_rx_desc_dma, ioaddr + DCR3);     /* RX DESC address */
 651 #ifdef DEBUG
 652         printf("%s(): db->first_tx_desc= 0x%x\n",
 653                 __FUNCTION__, db->first_tx_desc);
 654         printf("%s(): db->first_rx_desc_dma= 0x%x\n",
 655                 __FUNCTION__, db->first_rx_desc_dma);
 656 #endif
 657         /* Init Transmit chain */
 658         tmp_buf = db->buf_pool_start;
 659         tmp_buf_dma = db->buf_pool_dma_start;
 660         tmp_tx_dma = db->first_tx_desc_dma;
 661         for (tmp_tx = db->first_tx_desc, i = 0;
 662                         i < TX_DESC_CNT; i++, tmp_tx++) {
 663                 tmp_tx->tx_buf_ptr = (char *)tmp_buf;
 664                 tmp_tx->tdes0 = cpu_to_le32(0);
 665                 tmp_tx->tdes1 = cpu_to_le32(0x81000000);        /* IC, chain */
 666                 tmp_tx->tdes2 = cpu_to_le32(tmp_buf_dma);
 667                 tmp_tx_dma += sizeof(struct tx_desc);
 668                 tmp_tx->tdes3 = cpu_to_le32(tmp_tx_dma);
 669                 tmp_tx->next_tx_desc = tmp_tx + 1;
 670                 tmp_buf = tmp_buf + TX_BUF_ALLOC;
 671                 tmp_buf_dma = tmp_buf_dma + TX_BUF_ALLOC;
 672         }
 673         (--tmp_tx)->tdes3 = cpu_to_le32(db->first_tx_desc_dma);
 674         tmp_tx->next_tx_desc = db->first_tx_desc;
 675
 676          /* Init Receive descriptor chain */
 677         tmp_rx_dma = db->first_rx_desc_dma;
 678         for (tmp_rx = db->first_rx_desc, i = 0; i < RX_DESC_CNT;
 679                         i++, tmp_rx++) {
 680                 tmp_rx->rdes0 = cpu_to_le32(0);
 681                 tmp_rx->rdes1 = cpu_to_le32(0x01000600);
 682                 tmp_rx_dma += sizeof(struct rx_desc);
 683                 tmp_rx->rdes3 = cpu_to_le32(tmp_rx_dma);
 684                 tmp_rx->next_rx_desc = tmp_rx + 1;
 685         }
 686         (--tmp_rx)->rdes3 = cpu_to_le32(db->first_rx_desc_dma);
 687         tmp_rx->next_rx_desc = db->first_rx_desc;
 688
 689         /* pre-allocate Rx buffer */
 690         allocate_rx_buffer(db);
 691 }
 692
 693 /*
 694  *      Update CR6 value
 695  *      Firstly stop ULI526X, then written value and start
 696  */
 697
 698 static void update_cr6(u32 cr6_data, unsigned long ioaddr)
 699 {
 700
 701         outl(cr6_data, ioaddr + DCR6);
 702         udelay(5);
 703 }
 704
 705 /*
 706  *      Allocate rx buffer,
 707  */
 708
 709 static void allocate_rx_buffer(struct uli526x_board_info *db)
 710 {
 711         int index;
 712         struct rx_desc *rxptr;
 713         rxptr = db->first_rx_desc;
 714         u32 addr;
 715
 716         for (index = 0; index < RX_DESC_CNT; index++) {
 717                 addr = (u32)NetRxPackets[index];
 718                 addr += (16 - (addr & 15));
 719                 rxptr->rx_buf_ptr = (char *) addr;
 720                 rxptr->rdes2 = cpu_to_le32(addr);
 721                 rxptr->rdes0 = cpu_to_le32(0x80000000);
 722 #ifdef DEBUG
 723                 printf("%s(): Number 0x%x:\n", __FUNCTION__, index);
 724                 printf("%s(): addr 0x%x:\n", __FUNCTION__, addr);
 725                 printf("%s(): rxptr address = 0x%x\n", __FUNCTION__, rxptr);
 726                 printf("%s(): rxptr buf address = 0x%x\n", \
 727                         __FUNCTION__, rxptr->rx_buf_ptr);
 728                 printf("%s(): rdes2  = 0x%x\n", __FUNCTION__, rxptr->rdes2);
 729 #endif
 730                 rxptr = rxptr->next_rx_desc;
 731         }
 732 }
 733
 734 /*
 735  *      Read one word data from the serial ROM
 736  */
 737
 738 static u16 read_srom_word(long ioaddr, int offset)
 739 {
 740         int i;
 741         u16 srom_data = 0;
 742         long cr9_ioaddr = ioaddr + DCR9;
 743
 744         outl(CR9_SROM_READ, cr9_ioaddr);
 745         outl(CR9_SROM_READ | CR9_SRCS, cr9_ioaddr);
 746
 747         /* Send the Read Command 110b */
 748         SROM_CLK_WRITE(SROM_DATA_1, cr9_ioaddr);
 749         SROM_CLK_WRITE(SROM_DATA_1, cr9_ioaddr);
 750         SROM_CLK_WRITE(SROM_DATA_0, cr9_ioaddr);
 751
 752         /* Send the offset */
 753         for (i = 5; i >= 0; i--) {
 754                 srom_data = (offset & (1 << i)) ? SROM_DATA_1 : SROM_DATA_0;
 755                 SROM_CLK_WRITE(srom_data, cr9_ioaddr);
 756         }
 757
 758         outl(CR9_SROM_READ | CR9_SRCS, cr9_ioaddr);
 759
 760         for (i = 16; i > 0; i--) {
 761                 outl(CR9_SROM_READ | CR9_SRCS | CR9_SRCLK, cr9_ioaddr);
 762                 udelay(5);
 763                 srom_data = (srom_data << 1) | ((inl(cr9_ioaddr) & CR9_CRDOUT)
 764                         ? 1 : 0);
 765                 outl(CR9_SROM_READ | CR9_SRCS, cr9_ioaddr);
 766                 udelay(5);
 767         }
 768
 769         outl(CR9_SROM_READ, cr9_ioaddr);
 770         return srom_data;
 771 }
 772
 773 /*
 774  *      Set 10/100 phyxcer capability
 775  *      AUTO mode : phyxcer register4 is NIC capability
 776  *      Force mode: phyxcer register4 is the force media
 777  */
 778
 779 static void uli526x_set_phyxcer(struct uli526x_board_info *db)
 780 {
 781         u16 phy_reg;
 782
 783         /* Phyxcer capability setting */
 784         phy_reg = uli_phy_read(db->ioaddr,
 785                         db->phy_addr, 4, db->chip_id) & ~0x01e0;
 786
 787         if (db->media_mode & ULI526X_AUTO) {
 788                 /* AUTO Mode */
 789                 phy_reg |= db->PHY_reg4;
 790         } else {
 791                 /* Force Mode */
 792                 switch (db->media_mode) {
 793                 case ULI526X_10MHF: phy_reg |= 0x20; break;
 794                 case ULI526X_10MFD: phy_reg |= 0x40; break;
 795                 case ULI526X_100MHF: phy_reg |= 0x80; break;
 796                 case ULI526X_100MFD: phy_reg |= 0x100; break;
 797                 }
 798
 799         }
 800
 801         /* Write new capability to Phyxcer Reg4 */
 802         if (!(phy_reg & 0x01e0)) {
 803                 phy_reg |= db->PHY_reg4;
 804                 db->media_mode |= ULI526X_AUTO;
 805         }
 806         uli_phy_write(db->ioaddr, db->phy_addr, 4, phy_reg, db->chip_id);
 807
 808         /* Restart Auto-Negotiation */
 809         uli_phy_write(db->ioaddr, db->phy_addr, 0, 0x1200, db->chip_id);
 810         udelay(50);
 811 }
 812
 813 /*
 814  *      Write a word to Phy register
 815  */
 816
 817 static void uli_phy_write(unsigned long iobase, u8 phy_addr, u8 offset,
 818         u16 phy_data, u32 chip_id)
 819 {
 820         u16 i;
 821         unsigned long ioaddr;
 822
 823         if (chip_id == PCI_ULI5263_ID) {
 824                 phy_writeby_cr10(iobase, phy_addr, offset, phy_data);
 825                 return;
 826         }
 827         /* M5261/M5263 Chip */
 828         ioaddr = iobase + DCR9;
 829
 830         /* Send 33 synchronization clock to Phy controller */
 831         for (i = 0; i < 35; i++)
 832                 phy_write_1bit(ioaddr, PHY_DATA_1, chip_id);
 833
 834         /* Send start command(01) to Phy */
 835         phy_write_1bit(ioaddr, PHY_DATA_0, chip_id);
 836         phy_write_1bit(ioaddr, PHY_DATA_1, chip_id);
 837
 838         /* Send write command(01) to Phy */
 839         phy_write_1bit(ioaddr, PHY_DATA_0, chip_id);
 840         phy_write_1bit(ioaddr, PHY_DATA_1, chip_id);
 841
 842         /* Send Phy address */
 843         for (i = 0x10; i > 0; i = i >> 1)
 844                 phy_write_1bit(ioaddr, phy_addr & i ?
 845                         PHY_DATA_1 : PHY_DATA_0, chip_id);
 846
 847         /* Send register address */
 848         for (i = 0x10; i > 0; i = i >> 1)
 849                 phy_write_1bit(ioaddr, offset & i ?
 850                         PHY_DATA_1 : PHY_DATA_0, chip_id);
 851
 852         /* written trasnition */
 853         phy_write_1bit(ioaddr, PHY_DATA_1, chip_id);
 854         phy_write_1bit(ioaddr, PHY_DATA_0, chip_id);
 855
 856         /* Write a word data to PHY controller */
 857         for (i = 0x8000; i > 0; i >>= 1)
 858                 phy_write_1bit(ioaddr, phy_data & i ?
 859                         PHY_DATA_1 : PHY_DATA_0, chip_id);
 860 }
 861
 862 /*
 863  *      Read a word data from phy register
 864  */
 865
 866 static u16 uli_phy_read(unsigned long iobase, u8 phy_addr, u8 offset,
 867                         u32 chip_id)
 868 {
 869         int i;
 870         u16 phy_data;
 871         unsigned long ioaddr;
 872
 873         if (chip_id == PCI_ULI5263_ID)
 874                 return phy_readby_cr10(iobase, phy_addr, offset);
 875         /* M5261/M5263 Chip */
 876         ioaddr = iobase + DCR9;
 877
 878         /* Send 33 synchronization clock to Phy controller */
 879         for (i = 0; i < 35; i++)
 880                 phy_write_1bit(ioaddr, PHY_DATA_1, chip_id);
 881
 882         /* Send start command(01) to Phy */
 883         phy_write_1bit(ioaddr, PHY_DATA_0, chip_id);
 884         phy_write_1bit(ioaddr, PHY_DATA_1, chip_id);
 885
 886         /* Send read command(10) to Phy */
 887         phy_write_1bit(ioaddr, PHY_DATA_1, chip_id);
 888         phy_write_1bit(ioaddr, PHY_DATA_0, chip_id);
 889
 890         /* Send Phy address */
 891         for (i = 0x10; i > 0; i = i >> 1)
 892                 phy_write_1bit(ioaddr, phy_addr & i ?
 893                         PHY_DATA_1 : PHY_DATA_0, chip_id);
 894
 895         /* Send register address */
 896         for (i = 0x10; i > 0; i = i >> 1)
 897                 phy_write_1bit(ioaddr, offset & i ?
 898                         PHY_DATA_1 : PHY_DATA_0, chip_id);
 899
 900         /* Skip transition state */
 901         phy_read_1bit(ioaddr, chip_id);
 902
 903         /* read 16bit data */
 904         for (phy_data = 0, i = 0; i < 16; i++) {
 905                 phy_data <<= 1;
 906                 phy_data |= phy_read_1bit(ioaddr, chip_id);
 907         }
 908
 909         return phy_data;
 910 }
 911
 912 static u16 phy_readby_cr10(unsigned long iobase, u8 phy_addr, u8 offset)
 913 {
 914         unsigned long ioaddr, cr10_value;
 915
 916         ioaddr = iobase + DCR10;
 917         cr10_value = phy_addr;
 918         cr10_value = (cr10_value<<5) + offset;
 919         cr10_value = (cr10_value<<16) + 0x08000000;
 920         outl(cr10_value, ioaddr);
 921         udelay(1);
 922         while (1) {
 923                 cr10_value = inl(ioaddr);
 924                 if (cr10_value & 0x10000000)
 925                         break;
 926         }
 927         return (cr10_value&0x0ffff);
 928 }
 929
 930 static void phy_writeby_cr10(unsigned long iobase, u8 phy_addr,
 931         u8 offset, u16 phy_data)
 932 {
 933         unsigned long ioaddr, cr10_value;
 934
 935         ioaddr = iobase + DCR10;
 936         cr10_value = phy_addr;
 937         cr10_value = (cr10_value<<5) + offset;
 938         cr10_value = (cr10_value<<16) + 0x04000000 + phy_data;
 939         outl(cr10_value, ioaddr);
 940         udelay(1);
 941 }
 942 /*
 943  *      Write one bit data to Phy Controller
 944  */
 945
 946 static void phy_write_1bit(unsigned long ioaddr, u32 phy_data, u32 chip_id)
 947 {
 948         outl(phy_data , ioaddr);                        /* MII Clock Low */
 949         udelay(1);
 950         outl(phy_data  | MDCLKH, ioaddr);       /* MII Clock High */
 951         udelay(1);
 952         outl(phy_data , ioaddr);                        /* MII Clock Low */
 953         udelay(1);
 954 }
 955
 956 /*
 957  *      Read one bit phy data from PHY controller
 958  */
 959
 960 static u16 phy_read_1bit(unsigned long ioaddr, u32 chip_id)
 961 {
 962         u16 phy_data;
 963
 964         outl(0x50000 , ioaddr);
 965         udelay(1);
 966         phy_data = (inl(ioaddr) >> 19) & 0x1;
 967         outl(0x40000 , ioaddr);
 968         udelay(1);
 969
 970         return phy_data;
 971 }
 972
 973 /*
 974  * Set MAC address to ID Table
 975  */
 976
 977 static void set_mac_addr(struct eth_device *dev)
 978 {
 979         int i;
 980         u16 addr;
 981         struct uli526x_board_info *db = dev->priv;
 982         outl(0x10000, db->ioaddr + DCR0);       /* Diagnosis mode */
 983         /* Reset dianostic pointer port */
 984         outl(0x1c0, db->ioaddr + DCR13);
 985         outl(0, db->ioaddr + DCR14);    /* Clear reset port */
 986         outl(0x10, db->ioaddr + DCR14); /* Reset ID Table pointer */
 987         outl(0, db->ioaddr + DCR14);    /* Clear reset port */
 988         outl(0, db->ioaddr + DCR13);    /* Clear CR13 */
 989         /* Select ID Table access port */
 990         outl(0x1b0, db->ioaddr + DCR13);
 991         /* Read MAC address from CR14 */
 992         for (i = 0; i < 3; i++) {
 993                 addr = dev->enetaddr[2 * i] | (dev->enetaddr[2 * i + 1] << 8);
 994                 outl(addr, db->ioaddr + DCR14);
 995         }
 996         /* write end */
 997         outl(0, db->ioaddr + DCR13);    /* Clear CR13 */
 998         outl(0, db->ioaddr + DCR0);     /* Clear CR0 */
 999         udelay(10);
1000         return;
1001 }