]> git.sur5r.net Git - u-boot/blobdiff - drivers/smc91111.c
cpu/86xx fixes.
[u-boot] / drivers / smc91111.c
index 45bc2483fcaf5efe7893b88d5f47779dc01e8725..8061f12979dbbbf5317079d49a932f6c48794cb7 100644 (file)
@@ -61,6 +61,7 @@
 
 #include <common.h>
 #include <command.h>
+#include <config.h>
 #include "smc91111.h"
 #include <net.h>
 
@@ -78,6 +79,11 @@ static const char version[] =
        "smc91111.c:v1.0 04/25/01 by Daris A Nevil (dnevil@snmc.com)\n";
 #endif
 
+/* Autonegotiation timeout in seconds */
+#ifndef CONFIG_SMC_AUTONEG_TIMEOUT
+#define CONFIG_SMC_AUTONEG_TIMEOUT 10
+#endif
+
 /*------------------------------------------------------------------------
  .
  . Configuration options, for the experienced user to change.
@@ -154,6 +160,9 @@ extern void eth_halt(void);
 extern int eth_rx(void);
 extern int eth_send(volatile void *packet, int length);
 
+#ifdef SHARED_RESOURCES
+       extern void swap_to(int device_id);
+#endif
 
 /*
  . This is called by  register_netdev().  It is responsible for
@@ -204,7 +213,7 @@ static int smc_rcv(void);
  . If an EEPROM is present it really should be consulted.
 */
 int smc_get_ethaddr(bd_t *bd);
-int get_rom_mac(char *v_rom_mac);
+int get_rom_mac(uchar *v_rom_mac);
 
 /*
  ------------------------------------------------------------
@@ -214,6 +223,83 @@ int get_rom_mac(char *v_rom_mac);
  ------------------------------------------------------------
 */
 
+#ifdef CONFIG_SMC_USE_IOFUNCS
+/*
+ * input and output functions
+ *
+ * Implemented due to inx,outx macros accessing the device improperly
+ * and putting the device into an unkown state.
+ *
+ * For instance, on Sharp LPD7A400 SDK, affects were chip memory
+ * could not be free'd (hence the alloc failures), duplicate packets,
+ * packets being corrupt (shifted) on the wire, etc.  Switching to the
+ * inx,outx functions fixed this problem.
+ */
+static inline word SMC_inw(dword offset);
+static inline void SMC_outw(word value, dword offset);
+static inline byte SMC_inb(dword offset);
+static inline void SMC_outb(byte value, dword offset);
+static inline void SMC_insw(dword offset, volatile uchar* buf, dword len);
+static inline void SMC_outsw(dword offset, uchar* buf, dword len);
+
+#define barrier() __asm__ __volatile__("": : :"memory")
+
+static inline word SMC_inw(dword offset)
+{
+       word v;
+       v = *((volatile word*)(SMC_BASE_ADDRESS+offset));
+       barrier(); *(volatile u32*)(0xc0000000);
+       return v;
+}
+
+static inline void SMC_outw(word value, dword offset)
+{
+       *((volatile word*)(SMC_BASE_ADDRESS+offset)) = value;
+       barrier(); *(volatile u32*)(0xc0000000);
+}
+
+static inline byte SMC_inb(dword offset)
+{
+       word  _w;
+
+       _w = SMC_inw(offset & ~((dword)1));
+       return (offset & 1) ? (byte)(_w >> 8) : (byte)(_w);
+}
+
+static inline void SMC_outb(byte value, dword offset)
+{
+       word  _w;
+
+       _w = SMC_inw(offset & ~((dword)1));
+       if (offset & 1)
+                       *((volatile word*)(SMC_BASE_ADDRESS+(offset & ~((dword)1)))) = (value<<8) | (_w & 0x00ff);
+       else
+                       *((volatile word*)(SMC_BASE_ADDRESS+offset)) = value | (_w & 0xff00);
+}
+
+static inline void SMC_insw(dword offset, volatile uchar* buf, dword len)
+{
+       volatile word *p = (volatile word *)buf;
+
+       while (len-- > 0) {
+               *p++ = SMC_inw(offset);
+               barrier();
+               *((volatile u32*)(0xc0000000));
+       }
+}
+
+static inline void SMC_outsw(dword offset, uchar* buf, dword len)
+{
+       volatile word *p = (volatile word *)buf;
+
+       while (len-- > 0) {
+               SMC_outw(*p++, offset);
+               barrier();
+               *(volatile u32*)(0xc0000000);
+       }
+}
+#endif  /* CONFIG_SMC_USE_IOFUNCS */
+
 static char unsigned smc_mac_addr[6] = {0x02, 0x80, 0xad, 0x20, 0x31, 0xb8};
 
 /*
@@ -221,7 +307,7 @@ static char unsigned smc_mac_addr[6] = {0x02, 0x80, 0xad, 0x20, 0x31, 0xb8};
  * the default mac address.
  */
 
-void smc_set_mac_addr(const char *addr) {
+void smc_set_mac_addr(const unsigned char *addr) {
        int i;
 
        for (i=0; i < sizeof(smc_mac_addr); i++){
@@ -353,7 +439,7 @@ static inline void smc_wait_mmu_release_complete (void)
 */
 static void smc_reset (void)
 {
-       PRINTK2 ("%s:smc_reset\n", SMC_DEV_NAME);
+       PRINTK2 ("%s: smc_reset\n", SMC_DEV_NAME);
 
        /* This resets the registers mostly to defaults, but doesn't
           affect EEPROM.  That seems unnecessary */
@@ -414,7 +500,7 @@ static void smc_reset (void)
 */
 static void smc_enable()
 {
-       PRINTK2("%s:smc_enable\n", SMC_DEV_NAME);
+       PRINTK2("%s: smc_enable\n", SMC_DEV_NAME);
        SMC_SELECT_BANK( 0 );
        /* see the header file for options in TCR/RCR DEFAULT*/
        SMC_outw( TCR_DEFAULT, TCR_REG );
@@ -440,7 +526,7 @@ static void smc_enable()
 */
 static void smc_shutdown()
 {
-       PRINTK2(CARDNAME ":smc_shutdown\n");
+       PRINTK2(CARDNAME ": smc_shutdown\n");
 
        /* no more interrupts for me */
        SMC_SELECT_BANK( 2 );
@@ -450,6 +536,9 @@ static void smc_shutdown()
        SMC_SELECT_BANK( 0 );
        SMC_outb( RCR_CLEAR, RCR_REG );
        SMC_outb( TCR_CLEAR, TCR_REG );
+#ifdef SHARED_RESOURCES
+       swap_to(FLASH);
+#endif
 }
 
 
@@ -481,9 +570,15 @@ static int smc_send_packet (volatile void *packet, int packet_length)
        int try = 0;
        int time_out;
        byte status;
+       byte saved_pnr;
+       word saved_ptr;
 
+       /* save PTR and PNR registers before manipulation */
+       SMC_SELECT_BANK (2);
+       saved_pnr = SMC_inb( PN_REG );
+       saved_ptr = SMC_inw( PTR_REG );
 
-       PRINTK3 ("%s:smc_hardware_send_packet\n", SMC_DEV_NAME);
+       PRINTK3 ("%s: smc_hardware_send_packet\n", SMC_DEV_NAME);
 
        length = ETH_ZLEN < packet_length ? packet_length : ETH_ZLEN;
 
@@ -557,7 +652,18 @@ again:
        }
 
        /* we have a packet address, so tell the card to use it */
+#ifndef CONFIG_XAENIAX
        SMC_outb (packet_no, PN_REG);
+#else
+       /* On Xaeniax board, we can't use SMC_outb here because that way
+        * the Allocate MMU command will end up written to the command register
+        * as well, which will lead to a problem.
+        */
+       SMC_outl (packet_no << 16, 0);
+#endif
+       /* do not write new ptr value if Write data fifo not empty */
+       while ( saved_ptr & PTR_NOTEMPTY )
+               printf ("Write data fifo not empty!\n");
 
        /* point to the beginning of the packet */
        SMC_outw (PTR_AUTOINC, PTR_REG);
@@ -589,30 +695,55 @@ again:
         */
 #ifdef USE_32_BIT
        SMC_outsl (SMC91111_DATA_REG, buf, length >> 2);
+#ifndef CONFIG_XAENIAX
        if (length & 0x2)
                SMC_outw (*((word *) (buf + (length & 0xFFFFFFFC))),
                          SMC91111_DATA_REG);
+#else
+       /* On XANEIAX, we can only use 32-bit writes, so we need to handle
+        * unaligned tail part specially. The standard code doesn't work.
+        */
+       if ((length & 3) == 3) {
+               u16 * ptr = (u16*) &buf[length-3];
+               SMC_outl((*ptr) | ((0x2000 | buf[length-1]) << 16),
+                               SMC91111_DATA_REG);
+       } else if ((length & 2) == 2) {
+               u16 * ptr = (u16*) &buf[length-2];
+               SMC_outl(*ptr, SMC91111_DATA_REG);
+       } else if (length & 1) {
+               SMC_outl((0x2000 | buf[length-1]), SMC91111_DATA_REG);
+       } else {
+               SMC_outl(0, SMC91111_DATA_REG);
+       }
+#endif
 #else
        SMC_outsw (SMC91111_DATA_REG, buf, (length) >> 1);
 #endif /* USE_32_BIT */
 
+#ifndef CONFIG_XAENIAX
        /* Send the last byte, if there is one.   */
        if ((length & 1) == 0) {
                SMC_outw (0, SMC91111_DATA_REG);
        } else {
                SMC_outw (buf[length - 1] | 0x2000, SMC91111_DATA_REG);
        }
+#endif
 
        /* and let the chipset deal with it */
        SMC_outw (MC_ENQUEUE, MMU_CMD_REG);
 
        /* poll for TX INT */
-       if (poll4int (IM_TX_INT, SMC_TX_TIMEOUT)) {
+       /* if (poll4int (IM_TX_INT, SMC_TX_TIMEOUT)) { */
+       /* poll for TX_EMPTY INT - autorelease enabled */
+       if (poll4int(IM_TX_EMPTY_INT, SMC_TX_TIMEOUT)) {
                /* sending failed */
                PRINTK2 ("%s: TX timeout, sending failed...\n", SMC_DEV_NAME);
 
                /* release packet */
-               SMC_outw (MC_FREEPKT, MMU_CMD_REG);
+               /* no need to release, MMU does that now */
+#ifdef CONFIG_XAENIAX
+                SMC_outw (MC_FREEPKT, MMU_CMD_REG);
+#endif
 
                /* wait for MMU getting ready (low) */
                while (SMC_inw (MMU_CMD_REG) & MC_BUSY) {
@@ -625,12 +756,16 @@ again:
                return 0;
        } else {
                /* ack. int */
-               SMC_outb (IM_TX_INT, SMC91111_INT_REG);
+               SMC_outb (IM_TX_EMPTY_INT, SMC91111_INT_REG);
+               /* SMC_outb (IM_TX_INT, SMC91111_INT_REG); */
                PRINTK2 ("%s: Sent packet of length %d \n", SMC_DEV_NAME,
                         length);
 
                /* release packet */
+               /* no need to release, MMU does that now */
+#ifdef CONFIG_XAENIAX
                SMC_outw (MC_FREEPKT, MMU_CMD_REG);
+#endif
 
                /* wait for MMU getting ready (low) */
                while (SMC_inw (MMU_CMD_REG) & MC_BUSY) {
@@ -642,6 +777,18 @@ again:
 
        }
 
+       /* restore previously saved registers */
+#ifndef CONFIG_XAENIAX
+       SMC_outb( saved_pnr, PN_REG );
+#else
+       /* On Xaeniax board, we can't use SMC_outb here because that way
+        * the Allocate MMU command will end up written to the command register
+        * as well, which will lead to a problem.
+        */
+       SMC_outl(saved_pnr << 16, 0);
+#endif
+       SMC_outw( saved_ptr, PTR_REG );
+
        return length;
 }
 
@@ -658,7 +805,7 @@ again:
 */
 void smc_destructor()
 {
-       PRINTK2(CARDNAME ":smc_destructor\n");
+       PRINTK2(CARDNAME ": smc_destructor\n");
 }
 
 
@@ -672,7 +819,7 @@ static int smc_open (bd_t * bd)
 {
        int i, err;
 
-       PRINTK2 ("%s:smc_open\n", SMC_DEV_NAME);
+       PRINTK2 ("%s: smc_open\n", SMC_DEV_NAME);
 
        /* reset the hardware */
        smc_reset ();
@@ -699,11 +846,11 @@ static int smc_open (bd_t * bd)
 
                address = smc_mac_addr[i + 1] << 8;
                address |= smc_mac_addr[i];
-               SMC_outw (address, ADDR0_REG + i);
+               SMC_outw (address, (ADDR0_REG + i));
        }
 #else
        for (i = 0; i < 6; i++)
-               SMC_outb (smc_mac_addr[i], ADDR0_REG + i);
+               SMC_outb (smc_mac_addr[i], (ADDR0_REG + i));
 #endif
 
        return 0;
@@ -730,8 +877,14 @@ static int smc_rcv()
 #ifdef USE_32_BIT
        dword stat_len;
 #endif
+       byte saved_pnr;
+       word saved_ptr;
 
        SMC_SELECT_BANK(2);
+       /* save PTR and PTR registers */
+       saved_pnr = SMC_inb( PN_REG );
+       saved_ptr = SMC_inw( PTR_REG );
+
        packet_number = SMC_inw( RXFIFO_REG );
 
        if ( packet_number & RXFIFO_REMPTY ) {
@@ -739,7 +892,7 @@ static int smc_rcv()
                return 0;
        }
 
-       PRINTK3("%s:smc_rcv\n", SMC_DEV_NAME);
+       PRINTK3("%s: smc_rcv\n", SMC_DEV_NAME);
        /*  start reading from the start of the packet */
        SMC_outw( PTR_READ | PTR_RCV | PTR_AUTOINC, PTR_REG );
 
@@ -810,6 +963,18 @@ static int smc_rcv()
        while ( SMC_inw( MMU_CMD_REG ) & MC_BUSY )
                udelay(1); /* Wait until not busy */
 
+       /* restore saved registers */
+#ifndef CONFIG_XAENIAX
+       SMC_outb( saved_pnr, PN_REG );
+#else
+       /* On Xaeniax board, we can't use SMC_outb here because that way
+        * the Allocate MMU command will end up written to the command register
+        * as well, which will lead to a problem.
+        */
+       SMC_outl( saved_pnr << 16, 0);
+#endif
+       SMC_outw( saved_ptr, PTR_REG );
+
        if (!is_error) {
                /* Pass the packet up to the protocol layers. */
                NetReceive(NetRxPackets[0], packet_length);
@@ -831,7 +996,7 @@ static int smc_rcv()
  -----------------------------------------------------*/
 static int smc_close()
 {
-       PRINTK2("%s:smc_close\n", SMC_DEV_NAME);
+       PRINTK2("%s: smc_close\n", SMC_DEV_NAME);
 
        /* clear everything */
        smc_shutdown();
@@ -1193,7 +1358,7 @@ static void smc_phy_configure ()
        word status = 0;        /*;my status = 0 */
        int failed = 0;
 
-       PRINTK3 ("%s:smc_program_phy()\n", SMC_DEV_NAME);
+       PRINTK3 ("%s: smc_program_phy()\n", SMC_DEV_NAME);
 
 
        /* Get the detected phy address */
@@ -1252,8 +1417,13 @@ static void smc_phy_configure ()
        /* Update our Auto-Neg Advertisement Register */
        smc_write_phy_register (PHY_AD_REG, my_ad_caps);
 
-       PRINTK2 ("%s:phy caps=%x\n", SMC_DEV_NAME, my_phy_caps);
-       PRINTK2 ("%s:phy advertised caps=%x\n", SMC_DEV_NAME, my_ad_caps);
+       /* Read the register back.  Without this, it appears that when */
+       /* auto-negotiation is restarted, sometimes it isn't ready and */
+       /* the link does not come up. */
+       smc_read_phy_register(PHY_AD_REG);
+
+       PRINTK2 ("%s: phy caps=%x\n", SMC_DEV_NAME, my_phy_caps);
+       PRINTK2 ("%s: phy advertised caps=%x\n", SMC_DEV_NAME, my_ad_caps);
 
        /* Restart auto-negotiation process in order to advertise my caps */
        smc_write_phy_register (PHY_CNTL_REG,
@@ -1262,8 +1432,9 @@ static void smc_phy_configure ()
        /* Wait for the auto-negotiation to complete.  This may take from */
        /* 2 to 3 seconds. */
        /* Wait for the reset to complete, or time out */
-       timeout = 20;           /* Wait up to 10 seconds */
+       timeout = CONFIG_SMC_AUTONEG_TIMEOUT * 2;
        while (timeout--) {
+
                status = smc_read_phy_register (PHY_STAT_REG);
                if (status & PHY_STAT_ANEG_ACK) {
                        /* auto-negotiate complete */
@@ -1274,11 +1445,11 @@ static void smc_phy_configure ()
 
                /* Restart auto-negotiation if remote fault */
                if (status & PHY_STAT_REM_FLT) {
-                       printf ("%s:PHY remote fault detected\n",
+                       printf ("%s: PHY remote fault detected\n",
                                SMC_DEV_NAME);
 
                        /* Restart auto-negotiation */
-                       printf ("%s:PHY restarting auto-negotiation\n",
+                       printf ("%s: PHY restarting auto-negotiation\n",
                                SMC_DEV_NAME);
                        smc_write_phy_register (PHY_CNTL_REG,
                                                PHY_CNTL_ANEG_EN |
@@ -1289,22 +1460,20 @@ static void smc_phy_configure ()
        }
 
        if (timeout < 1) {
-               printf ("%s:PHY auto-negotiate timed out\n", SMC_DEV_NAME);
-               printf ("%s:PHY auto-negotiate timed out\n", SMC_DEV_NAME);
+               printf ("%s: PHY auto-negotiate timed out\n", SMC_DEV_NAME);
                failed = 1;
        }
 
        /* Fail if we detected an auto-negotiate remote fault */
        if (status & PHY_STAT_REM_FLT) {
-               printf ("%s:PHY remote fault detected\n", SMC_DEV_NAME);
-               printf ("%s:PHY remote fault detected\n", SMC_DEV_NAME);
+               printf ("%s: PHY remote fault detected\n", SMC_DEV_NAME);
                failed = 1;
        }
 
        /* Re-Configure the Receive/Phy Control register */
        SMC_outw (RPC_DEFAULT, RPC_REG);
 
-      smc_phy_configure_exit:
+smc_phy_configure_exit:        ;
 
 }
 #endif /* !CONFIG_SMC91111_EXT_PHY */
@@ -1348,6 +1517,9 @@ static void print_packet( byte * buf, int length )
 #endif
 
 int eth_init(bd_t *bd) {
+#ifdef SHARED_RESOURCES
+       swap_to(ETHERNET);
+#endif
        return (smc_open(bd));
 }
 
@@ -1366,8 +1538,9 @@ int eth_send(volatile void *packet, int length) {
 int smc_get_ethaddr (bd_t * bd)
 {
        int env_size, rom_valid, env_present = 0, reg;
-       char *s = NULL, *e, *v_mac, es[] = "11:22:33:44:55:66";
-       uchar s_env_mac[64], v_env_mac[6], v_rom_mac[6];
+       char *s = NULL, *e, es[] = "11:22:33:44:55:66";
+       char s_env_mac[64];
+       uchar v_env_mac[6], v_rom_mac[6], *v_mac;
 
        env_size = getenv_r ("ethaddr", s_env_mac, sizeof (s_env_mac));
        if ((env_size > 0) && (env_size < sizeof (es))) {       /* exit if env is bad */
@@ -1420,13 +1593,13 @@ int smc_get_ethaddr (bd_t * bd)
                }
        }
        memcpy (bd->bi_enetaddr, v_mac, 6);     /* update global address to match env (allows env changing) */
-       smc_set_mac_addr (v_mac);       /* use old function to update smc default */
+       smc_set_mac_addr ((uchar *)v_mac);      /* use old function to update smc default */
        PRINTK("Using MAC Address %02X:%02X:%02X:%02X:%02X:%02X\n", v_mac[0], v_mac[1],
                v_mac[2], v_mac[3], v_mac[4], v_mac[5]);
        return (0);
 }
 
-int get_rom_mac (char *v_rom_mac)
+int get_rom_mac (uchar *v_rom_mac)
 {
 #ifdef HARDCODE_MAC    /* used for testing or to supress run time warnings */
        char hw_mac_addr[] = { 0x02, 0x80, 0xad, 0x20, 0x31, 0xb8 };
@@ -1435,12 +1608,16 @@ int get_rom_mac (char *v_rom_mac)
        return (1);
 #else
        int i;
+       int valid_mac = 0;
+
        SMC_SELECT_BANK (1);
        for (i=0; i<6; i++)
        {
-               v_rom_mac[i] = SMC_inb (ADDR0_REG + i);
+               v_rom_mac[i] = SMC_inb ((ADDR0_REG + i));
+               valid_mac |= v_rom_mac[i];
        }
-       return (1);
+
+       return (valid_mac ? 1 : 0);
 #endif
 }
 #endif /* CONFIG_DRIVER_SMC91111 */