Merge with git://www.denx.de/git/u-boot.git
[platform/kernel/u-boot.git] / drivers / cs8900.c
index ecc7c13..80c4ba2 100644 (file)
@@ -1,6 +1,10 @@
 /*
  * Cirrus Logic CS8900A Ethernet
  *
+ * (C) 2003 Wolfgang Denk, wd@denx.de
+ *     Extension to synchronize ethaddr environment variable
+ *     against value in EEPROM
+ *
  * (C) Copyright 2002
  * Sysgo Real-Time Solutions, GmbH <www.elinos.com>
  * Marius Groeger <mgroeger@sysgo.de>
@@ -39,8 +43,9 @@
 
 #ifdef CONFIG_DRIVER_CS8900
 
-#if (CONFIG_COMMANDS & CFG_CMD_NET)
+#if defined(CONFIG_CMD_NET)
 
+#undef DEBUG
 
 /* packet page register access functions */
 
 /* we don't need 16 bit initialisation on 32 bit bus */
 #define get_reg_init_bus(x) get_reg((x))
 #else
-static unsigned short get_reg_init_bus(int regno)
+static unsigned short get_reg_init_bus (int regno)
 {
-    /* force 16 bit busmode */
-    volatile unsigned char c;
-    c = CS8900_BUS16_0;
-    c = CS8900_BUS16_1;
-    c = CS8900_BUS16_0;
-    c = CS8900_BUS16_1;
-    c = CS8900_BUS16_0;
-
-    CS8900_PPTR = regno;
-    return (unsigned short) CS8900_PDATA;
+       /* force 16 bit busmode */
+       volatile unsigned char c;
+
+       c = CS8900_BUS16_0;
+       c = CS8900_BUS16_1;
+       c = CS8900_BUS16_0;
+       c = CS8900_BUS16_1;
+       c = CS8900_BUS16_0;
+
+       CS8900_PPTR = regno;
+       return (unsigned short) CS8900_PDATA;
 }
 #endif
 
-static unsigned short
-get_reg(int regno)
+static unsigned short get_reg (int regno)
 {
-    CS8900_PPTR = regno;
-    return (unsigned short) CS8900_PDATA;
+       CS8900_PPTR = regno;
+       return (unsigned short) CS8900_PDATA;
 }
 
 
-static void put_reg(int regno, unsigned short val)
+static void put_reg (int regno, unsigned short val)
 {
-    CS8900_PPTR = regno;
-    CS8900_PDATA = val;
+       CS8900_PPTR = regno;
+       CS8900_PDATA = val;
 }
 
-static void eth_reset(void)
+static void eth_reset (void)
 {
-    int tmo;
-    unsigned short us;
+       int tmo;
+       unsigned short us;
 
-    /* reset NIC */
-    put_reg(PP_SelfCTL, get_reg(PP_SelfCTL) | PP_SelfCTL_Reset );
+       /* reset NIC */
+       put_reg (PP_SelfCTL, get_reg (PP_SelfCTL) | PP_SelfCTL_Reset);
 
-    /* wait for 200ms */
-    udelay(200000);
-    /* Wait until the chip is reset */
+       /* wait for 200ms */
+       udelay (200000);
+       /* Wait until the chip is reset */
+
+       tmo = get_timer (0) + 1 * CFG_HZ;
+       while ((((us = get_reg_init_bus (PP_SelfSTAT)) & PP_SelfSTAT_InitD) == 0)
+                  && tmo < get_timer (0))
+               /*NOP*/;
+}
 
-    tmo = get_timer(0) + 1 * CFG_HZ;
-    while ((((us = get_reg_init_bus(PP_SelfSTAT)) & PP_SelfSTAT_InitD) == 0)
-          && tmo < get_timer(0))
-      /*NOP*/;
+static void eth_reginit (void)
+{
+       /* receive only error free packets addressed to this card */
+       put_reg (PP_RxCTL, PP_RxCTL_IA | PP_RxCTL_Broadcast | PP_RxCTL_RxOK);
+       /* do not generate any interrupts on receive operations */
+       put_reg (PP_RxCFG, 0);
+       /* do not generate any interrupts on transmit operations */
+       put_reg (PP_TxCFG, 0);
+       /* do not generate any interrupts on buffer operations */
+       put_reg (PP_BufCFG, 0);
+       /* enable transmitter/receiver mode */
+       put_reg (PP_LineCTL, PP_LineCTL_Rx | PP_LineCTL_Tx);
 }
 
-void cs8900_get_enetaddr (uchar *addr)
+void cs8900_get_enetaddr (uchar * addr)
 {
-    int i;
-    /* verify chip id */
-    if (get_reg_init_bus(PP_ChipID) != 0x630e)
-       return;
-    eth_reset();
-    if ((get_reg(PP_SelfST) & (PP_SelfSTAT_EEPROM | PP_SelfSTAT_EEPROM_OK)) ==
-             (PP_SelfSTAT_EEPROM|PP_SelfSTAT_EEPROM_OK)) {
-       /* Load the MAC from EEPROM */
-       for (i=0; i<6/2; i++) {
-           unsigned int Addr;
-           Addr = get_reg(PP_IA+i*2);
-           addr[i*2] = Addr & 0xFF;
-           addr[i*2+1] = Addr >> 8;
+       int i;
+       unsigned char env_enetaddr[6];
+       char *tmp = getenv ("ethaddr");
+       char *end;
+
+       for (i=0; i<6; i++) {
+               env_enetaddr[i] = tmp ? simple_strtoul(tmp, &end, 16) : 0;
+               if (tmp)
+                       tmp = (*end) ? end+1 : end;
+       }
+
+       /* verify chip id */
+       if (get_reg_init_bus (PP_ChipID) != 0x630e)
+               return;
+       eth_reset ();
+       if ((get_reg (PP_SelfST) & (PP_SelfSTAT_EEPROM | PP_SelfSTAT_EEPROM_OK)) ==
+                       (PP_SelfSTAT_EEPROM | PP_SelfSTAT_EEPROM_OK)) {
+
+               /* Load the MAC from EEPROM */
+               for (i = 0; i < 6 / 2; i++) {
+                       unsigned int Addr;
+
+                       Addr = get_reg (PP_IA + i * 2);
+                       addr[i * 2] = Addr & 0xFF;
+                       addr[i * 2 + 1] = Addr >> 8;
+               }
+
+               if (memcmp(env_enetaddr, "\0\0\0\0\0\0", 6) != 0 &&
+                   memcmp(env_enetaddr, addr, 6) != 0) {
+                       printf ("\nWarning: MAC addresses don't match:\n");
+                       printf ("\tHW MAC address:  "
+                               "%02X:%02X:%02X:%02X:%02X:%02X\n",
+                               addr[0], addr[1],
+                               addr[2], addr[3],
+                               addr[4], addr[5] );
+                       printf ("\t\"ethaddr\" value: "
+                               "%02X:%02X:%02X:%02X:%02X:%02X\n",
+                               env_enetaddr[0], env_enetaddr[1],
+                               env_enetaddr[2], env_enetaddr[3],
+                               env_enetaddr[4], env_enetaddr[5]) ;
+                       debug ("### Set MAC addr from environment\n");
+                       memcpy (addr, env_enetaddr, 6);
+               }
+               if (!tmp) {
+                       char ethaddr[20];
+                       sprintf (ethaddr, "%02X:%02X:%02X:%02X:%02X:%02X",
+                                addr[0], addr[1],
+                                addr[2], addr[3],
+                                addr[4], addr[5]) ;
+                       debug ("### Set environment from HW MAC addr = \"%s\"\n",                               ethaddr);
+                       setenv ("ethaddr", ethaddr);
+               }
+
        }
-    }
 }
 
-void eth_halt( void )
+void eth_halt (void)
 {
-    /* disable transmitter/receiver mode */
-    put_reg(PP_LineCTL, 0);
+       /* disable transmitter/receiver mode */
+       put_reg (PP_LineCTL, 0);
 
-    /* "shutdown" to show ChipID or kernel wouldn't find he cs8900 ... */
-    get_reg_init_bus(PP_ChipID);
+       /* "shutdown" to show ChipID or kernel wouldn't find he cs8900 ... */
+       get_reg_init_bus (PP_ChipID);
 }
 
-int eth_init( bd_t *bd )
+int eth_init (bd_t * bd)
 {
 
-    /* verify chip id */
-    if (get_reg_init_bus(PP_ChipID) != 0x630e)
-    {
-       printf( "CS8900 Ethernet chip not found?!\n" );
+       /* verify chip id */
+       if (get_reg_init_bus (PP_ChipID) != 0x630e) {
+               printf ("CS8900 Ethernet chip not found?!\n");
+               return 0;
+       }
+
+       eth_reset ();
+       /* set the ethernet address */
+       put_reg (PP_IA + 0, bd->bi_enetaddr[0] | (bd->bi_enetaddr[1] << 8));
+       put_reg (PP_IA + 2, bd->bi_enetaddr[2] | (bd->bi_enetaddr[3] << 8));
+       put_reg (PP_IA + 4, bd->bi_enetaddr[4] | (bd->bi_enetaddr[5] << 8));
+
+       eth_reginit ();
        return 0;
-    }
+}
 
-    eth_reset();
-    /* set the ethernet address */
-    put_reg(PP_IA + 0, bd->bi_enetaddr[0] | (bd->bi_enetaddr[1] << 8));
-    put_reg(PP_IA + 2, bd->bi_enetaddr[2] | (bd->bi_enetaddr[3] << 8));
-    put_reg(PP_IA + 4, bd->bi_enetaddr[4] | (bd->bi_enetaddr[5] << 8));
+/* Get a data block via Ethernet */
+extern int eth_rx (void)
+{
+       int i;
+       unsigned short rxlen;
+       unsigned short *addr;
+       unsigned short status;
 
-    /* receive only error free packets addressed to this card */
-    put_reg(PP_RxCTL, PP_RxCTL_IA | PP_RxCTL_Broadcast | PP_RxCTL_RxOK);
+       status = get_reg (PP_RER);
 
-    /* do not generate any interrupts on receive operations */
-    put_reg(PP_RxCFG, 0);
+       if ((status & PP_RER_RxOK) == 0)
+               return 0;
 
-    /* do not generate any interrupts on transmit operations */
-    put_reg(PP_TxCFG, 0);
+       status = CS8900_RTDATA;         /* stat */
+       rxlen = CS8900_RTDATA;          /* len */
 
-    /* do not generate any interrupts on buffer operations */
-    put_reg(PP_BufCFG, 0);
+#ifdef DEBUG
+       if (rxlen > PKTSIZE_ALIGN + PKTALIGN)
+               printf ("packet too big!\n");
+#endif
+       for (addr = (unsigned short *) NetRxPackets[0], i = rxlen >> 1; i > 0;
+                i--)
+               *addr++ = CS8900_RTDATA;
+       if (rxlen & 1)
+               *addr++ = CS8900_RTDATA;
 
-    /* enable transmitter/receiver mode */
-    put_reg(PP_LineCTL, PP_LineCTL_Rx | PP_LineCTL_Tx);
+       /* Pass the packet up to the protocol layers. */
+       NetReceive (NetRxPackets[0], rxlen);
 
-    return 0;
+       return rxlen;
 }
 
-/* Get a data block via Ethernet */
-extern int eth_rx(void)
+/* Send a data block via Ethernet. */
+extern int eth_send (volatile void *packet, int length)
 {
-    int i;
-    unsigned short rxlen;
-    unsigned short *addr;
-    unsigned short status;
+       volatile unsigned short *addr;
+       int tmo;
+       unsigned short s;
 
-    status = get_reg(PP_RER);
+retry:
+       /* initiate a transmit sequence */
+       CS8900_TxCMD = PP_TxCmd_TxStart_Full;
+       CS8900_TxLEN = length;
+
+       /* Test to see if the chip has allocated memory for the packet */
+       if ((get_reg (PP_BusSTAT) & PP_BusSTAT_TxRDY) == 0) {
+               /* Oops... this should not happen! */
+#ifdef DEBUG
+               printf ("cs: unable to send packet; retrying...\n");
+#endif
+               for (tmo = get_timer (0) + 5 * CFG_HZ; get_timer (0) < tmo;)
+                       /*NOP*/;
+               eth_reset ();
+               eth_reginit ();
+               goto retry;
+       }
 
-    if ((status & PP_RER_RxOK) == 0)
-      return 0;
+       /* Write the contents of the packet */
+       /* assume even number of bytes */
+       for (addr = packet; length > 0; length -= 2)
+               CS8900_RTDATA = *addr++;
 
-    status = CS8900_RTDATA;       /* stat */
-    rxlen = CS8900_RTDATA;        /* len */
+       /* wait for transfer to succeed */
+       tmo = get_timer (0) + 5 * CFG_HZ;
+       while ((s = get_reg (PP_TER) & ~0x1F) == 0) {
+               if (get_timer (0) >= tmo)
+                       break;
+       }
+
+       /* nothing */ ;
+       if ((s & (PP_TER_CRS | PP_TER_TxOK)) != PP_TER_TxOK) {
+#ifdef DEBUG
+               printf ("\ntransmission error %#x\n", s);
+#endif
+       }
+
+       return 0;
+}
 
-    if(rxlen > PKTSIZE_ALIGN + PKTALIGN)
-      printf("packet too big!\n");
+static void cs8900_e2prom_ready(void)
+{
+       while(get_reg(PP_SelfST) & SI_BUSY);
+}
 
-    for(addr = (unsigned short *)NetRxPackets[0], i = rxlen >> 1; i > 0; i-- )
-      *addr++ = CS8900_RTDATA;
-    if(rxlen & 1)
-      *addr++ = CS8900_RTDATA;
+/***********************************************************/
+/* read a 16-bit word out of the EEPROM                    */
+/***********************************************************/
 
-    /* Pass the packet up to the protocol layers. */
-    NetReceive(NetRxPackets[0], rxlen);
+int cs8900_e2prom_read(unsigned char addr, unsigned short *value)
+{
+       cs8900_e2prom_ready();
+       put_reg(PP_EECMD, EEPROM_READ_CMD | addr);
+       cs8900_e2prom_ready();
+       *value = get_reg(PP_EEData);
 
-    return rxlen;
+       return 0;
 }
 
-/* Send a data block via Ethernet. */
-extern int eth_send(volatile void *packet, int length)
+
+/***********************************************************/
+/* write a 16-bit word into the EEPROM                     */
+/***********************************************************/
+
+int cs8900_e2prom_write(unsigned char addr, unsigned short value)
 {
-    volatile unsigned short *addr;
-    int tmo;
-    unsigned short s;
+       cs8900_e2prom_ready();
+       put_reg(PP_EECMD, EEPROM_WRITE_EN);
+       cs8900_e2prom_ready();
+       put_reg(PP_EEData, value);
+       put_reg(PP_EECMD, EEPROM_WRITE_CMD | addr);
+       cs8900_e2prom_ready();
+       put_reg(PP_EECMD, EEPROM_WRITE_DIS);
+       cs8900_e2prom_ready();
 
-retry:
-    /* initiate a transmit sequence */
-    CS8900_TxCMD = PP_TxCmd_TxStart_Full;
-    CS8900_TxLEN = length;
-
-    /* Test to see if the chip has allocated memory for the packet */
-    if ((get_reg(PP_BusSTAT) & PP_BusSTAT_TxRDY) == 0) {
-       /* Oops... this should not happen! */
-       printf("cs: unable to send packet; retrying...\n");
-       for (tmo = get_timer(0) + 5 * CFG_HZ; get_timer(0) < tmo; )
-         /*NOP*/;
-       eth_reset();
-       goto retry;
-    }
-
-    /* Write the contents of the packet */
-    /* assume even number of bytes */
-    for(addr = packet; length > 0; length -= 2 )
-      CS8900_RTDATA = *addr++;
-
-    /* wait for transfer to succeed */
-    tmo = get_timer(0) + 5 * CFG_HZ;
-    while((s = get_reg(PP_TER) & ~0x1F) == 0)
-    {
-       if (get_timer(0) >= tmo)
-         break;
-    }
-
-      /* nothing */ ;
-    if ((s & (PP_TER_CRS | PP_TER_TxOK)) != PP_TER_TxOK) {
-       printf("\ntransmission error %#x\n", s);
-    }
-
-    return 0;
+       return 0;
 }
 
-#endif /* COMMANDS & CFG_NET */
+#endif /* COMMANDS & CFG_NET */
 
-#endif /* CONFIG_DRIVER_CS8900 */
+#endif /* CONFIG_DRIVER_CS8900 */