Initial revision

1 files changed, 235 insertions, 0 deletions

diff --git a/drivers/cs8900.c b/drivers/cs8900.c
new file mode 100644
index 00000000000..ecc7c13b1da
--- /dev/null
+++ b/drivers/cs8900.c
@@ -0,0 +1,235 @@
+/*
+ * Cirrus Logic CS8900A Ethernet
+ *
+ * (C) Copyright 2002
+ * Sysgo Real-Time Solutions, GmbH <www.elinos.com>
+ * Marius Groeger <mgroeger@sysgo.de>
+ *
+ * Copyright (C) 1999 Ben Williamson <benw@pobox.com>
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is loaded into SRAM in bootstrap mode, where it waits
+ * for commands on UART1 to read and write memory, jump to code etc.
+ * A design goal for this program is to be entirely independent of the
+ * target board.  Anything with a CL-PS7111 or EP7211 should be able to run
+ * this code in bootstrap mode.  All the board specifics can be handled on
+ * the host.
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ */
+
+#include <common.h>
+#include <command.h>
+#include "cs8900.h"
+#include <net.h>
+
+#ifdef CONFIG_DRIVER_CS8900
+
+#if (CONFIG_COMMANDS & CFG_CMD_NET)
+
+
+/* packet page register access functions */
+
+#ifdef CS8900_BUS32
+/* 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)
+{
+    /* 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)
+{
+    CS8900_PPTR = regno;
+    return (unsigned short) CS8900_PDATA;
+}
+
+
+static void put_reg(int regno, unsigned short val)
+{
+    CS8900_PPTR = regno;
+    CS8900_PDATA = val;
+}
+
+static void eth_reset(void)
+{
+    int tmo;
+    unsigned short us;
+
+    /* reset NIC */
+    put_reg(PP_SelfCTL, get_reg(PP_SelfCTL) | PP_SelfCTL_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*/;
+}
+
+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;
+	}
+    }
+}
+
+void eth_halt( void )
+{
+    /* 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);
+}
+
+int eth_init( bd_t *bd )
+{
+
+    /* 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));
+
+    /* 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);
+
+    return 0;
+}
+
+/* Get a data block via Ethernet */
+extern int eth_rx(void)
+{
+    int i;
+    unsigned short rxlen;
+    unsigned short *addr;
+    unsigned short status;
+
+    status = get_reg(PP_RER);
+
+    if ((status & PP_RER_RxOK) == 0)
+      return 0;
+
+    status = CS8900_RTDATA;       /* stat */
+    rxlen = CS8900_RTDATA;        /* len */
+
+    if(rxlen > PKTSIZE_ALIGN + PKTALIGN)
+      printf("packet too big!\n");
+
+    for(addr = (unsigned short *)NetRxPackets[0], i = rxlen >> 1; i > 0; i-- )
+      *addr++ = CS8900_RTDATA;
+    if(rxlen & 1)
+      *addr++ = CS8900_RTDATA;
+
+    /* Pass the packet up to the protocol layers. */
+    NetReceive(NetRxPackets[0], rxlen);
+
+    return rxlen;
+}
+
+/* Send a data block via Ethernet. */
+extern int eth_send(volatile void *packet, int length)
+{
+    volatile unsigned short *addr;
+    int tmo;
+    unsigned short s;
+
+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;
+}
+
+#endif /* COMMANDS & CFG_NET */
+
+#endif /* CONFIG_DRIVER_CS8900 */