|
|
|
/*
|
|
|
|
* 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>
|
|
|
|
*
|
|
|
|
* 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>
|
|
|
|
|
|
|
|
#undef DEBUG
|
|
|
|
|
|
|
|
/* 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 CS8900_PDATA;
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
static unsigned short get_reg (int regno)
|
|
|
|
{
|
|
|
|
CS8900_PPTR = regno;
|
|
|
|
return 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 * CONFIG_SYS_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 (void)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
uchar enetaddr[6];
|
|
|
|
|
|
|
|
/* if the env is setup, then bail */
|
|
|
|
if (eth_getenv_enetaddr("ethaddr", enetaddr))
|
|
|
|
return;
|
|
|
|
|
|
|
|
/* verify chip id */
|
|
|
|
if (get_reg_init_bus (PP_ChipID) != 0x630e)
|
|
|
|
return;
|
|
|
|
eth_reset ();
|
|
|
|
if ((get_reg (PP_SelfSTAT) & (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);
|
|
|
|
enetaddr[i * 2] = Addr & 0xFF;
|
|
|
|
enetaddr[i * 2 + 1] = Addr >> 8;
|
|
|
|
}
|
|
|
|
|
|
|
|
eth_setenv_enetaddr("ethaddr", enetaddr);
|
|
|
|
debug("### Set environment from HW MAC addr = \"%pM\"\n", enetaddr);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
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)
|
|
|
|
{
|
|
|
|
uchar *enetaddr[6];
|
|
|
|
|
|
|
|
/* 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 */
|
|
|
|
eth_getenv_enetaddr("ethaddr", enetaddr);
|
|
|
|
put_reg (PP_IA + 0, enetaddr[0] | (enetaddr[1] << 8));
|
|
|
|
put_reg (PP_IA + 2, enetaddr[2] | (enetaddr[3] << 8));
|
|
|
|
put_reg (PP_IA + 4, enetaddr[4] | (enetaddr[5] << 8));
|
|
|
|
|
|
|
|
eth_reginit ();
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Get a data block via Ethernet */
|
|
|
|
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 */
|
|
|
|
|
|
|
|
#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;
|
|
|
|
|
|
|
|
/* Pass the packet up to the protocol layers. */
|
|
|
|
NetReceive (NetRxPackets[0], rxlen);
|
|
|
|
|
|
|
|
return rxlen;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Send a data block via Ethernet. */
|
|
|
|
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! */
|
|
|
|
#ifdef DEBUG
|
|
|
|
printf ("cs: unable to send packet; retrying...\n");
|
|
|
|
#endif
|
|
|
|
for (tmo = get_timer (0) + 5 * CONFIG_SYS_HZ; get_timer (0) < tmo;)
|
|
|
|
/*NOP*/;
|
|
|
|
eth_reset ();
|
|
|
|
eth_reginit ();
|
|
|
|
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 * CONFIG_SYS_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;
|
|
|
|
}
|
|
|
|
|
|
|
|
static void cs8900_e2prom_ready(void)
|
|
|
|
{
|
|
|
|
while (get_reg(PP_SelfSTAT) & SI_BUSY)
|
|
|
|
;
|
|
|
|
}
|
|
|
|
|
|
|
|
/***********************************************************/
|
|
|
|
/* read a 16-bit word out of the EEPROM */
|
|
|
|
/***********************************************************/
|
|
|
|
|
|
|
|
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 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/***********************************************************/
|
|
|
|
/* write a 16-bit word into the EEPROM */
|
|
|
|
/***********************************************************/
|
|
|
|
|
|
|
|
int cs8900_e2prom_write(unsigned char addr, unsigned short value)
|
|
|
|
{
|
|
|
|
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();
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
}
|