blob: 4e2494eee5ce12ad5f1f7f04f05e507a6e03836a [file] [log] [blame] [edit]
/*
* (C) Copyright 2006
* Wolfgang Denk, DENX Software Engineering, wd@denx.de.
*
* See file CREDITS for list of people who contributed to this
* project.
*
* 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., 59 Temple Place, Suite 330, Boston,
* MA 02111-1307 USA
*/
#include <common.h>
#include <mpc5xxx.h>
/* For the V38B board the pin is GPIO_PSC_6 */
#define GPIO_PIN GPIO_PSC6_0
#define NO_ERROR 0
#define ERR_NO_NUMBER 1
#define ERR_BAD_NUMBER 2
static int is_high(void);
static int check_device(void);
static void io_out(int value);
static void io_input(void);
static void io_output(void);
static void init_gpio(void);
static void read_byte(unsigned char *data);
static void write_byte(unsigned char command);
void read_2501_memory(unsigned char *psernum, unsigned char *perr);
void board_get_enetaddr(uchar *enetaddr);
static int is_high()
{
return (*((vu_long *) MPC5XXX_WU_GPIO_DATA_I) & GPIO_PIN);
}
static void io_out(int value)
{
if (value)
*((vu_long *) MPC5XXX_WU_GPIO_DATA_O) |= GPIO_PIN;
else
*((vu_long *) MPC5XXX_WU_GPIO_DATA_O) &= ~GPIO_PIN;
}
static void io_input()
{
*((vu_long *) MPC5XXX_WU_GPIO_DIR) &= ~GPIO_PIN;
udelay(3); /* allow input to settle */
}
static void io_output()
{
*((vu_long *) MPC5XXX_WU_GPIO_DIR) |= GPIO_PIN;
}
static void init_gpio()
{
*((vu_long *) MPC5XXX_WU_GPIO_ENABLE) |= GPIO_PIN; /* Enable appropriate pin */
}
void read_2501_memory(unsigned char *psernum, unsigned char *perr)
{
#define NBYTES 28
unsigned char crcval, i;
unsigned char buf[NBYTES];
*perr = 0;
crcval = 0;
for (i = 0; i < NBYTES; i++)
buf[i] = 0;
if (!check_device())
*perr = ERR_NO_NUMBER;
else {
*perr = NO_ERROR;
write_byte(0xCC); /* skip ROM (0xCC) */
write_byte(0xF0); /* Read memory command 0xF0 */
write_byte(0x00); /* Address TA1=0, TA2=0 */
write_byte(0x00);
read_byte(&crcval); /* Read CRC of address and command */
for (i = 0; i < NBYTES; i++)
read_byte(&buf[i]);
}
if (strncmp((const char *) &buf[11], "MAREL IEEE 802.3", 16)) {
*perr = ERR_BAD_NUMBER;
psernum[0] = 0x00;
psernum[1] = 0xE0;
psernum[2] = 0xEE;
psernum[3] = 0xFF;
psernum[4] = 0xFF;
psernum[5] = 0xFF;
} else {
psernum[0] = 0x00;
psernum[1] = 0xE0;
psernum[2] = 0xEE;
psernum[3] = buf[7];
psernum[4] = buf[6];
psernum[5] = buf[5];
}
}
static int check_device()
{
int found;
io_output();
io_out(0);
udelay(500); /* must be at least 480 us low pulse */
io_input();
udelay(60);
found = (is_high() == 0) ? 1 : 0;
udelay(500); /* must be at least 480 us low pulse */
return found;
}
static void write_byte(unsigned char command)
{
char i;
for (i = 0; i < 8; i++) {
/* 1 us to 15 us low pulse starts bit slot */
/* Start with high pulse for 3 us */
io_input();
udelay(3);
io_out(0);
io_output();
udelay(3);
if (command & 0x01) {
/* 60 us high for 1-bit */
io_input();
udelay(60);
} else
/* 60 us low for 0-bit */
udelay(60);
/* Leave pin as input */
io_input();
command = command >> 1;
}
}
static void read_byte(unsigned char *data)
{
unsigned char i, rdat = 0;
for (i = 0; i < 8; i++) {
/* read one bit from one-wire device */
/* 1 - 15 us low starts bit slot */
io_out(0);
io_output();
udelay(0);
/* allow line to be pulled high */
io_input();
/* delay 10 us */
udelay(10);
/* now sample input status */
if (is_high())
rdat = (rdat >> 1) | 0x80;
else
rdat = rdat >> 1;
udelay(60); /* at least 60 us */
}
/* copy the return value */
*data = rdat;
}
void board_get_enetaddr(uchar *enetaddr)
{
unsigned char sn[6], err = NO_ERROR;
init_gpio();
read_2501_memory(sn, &err);
if (err == NO_ERROR) {
sprintf((char *)enetaddr, "%02x:%02x:%02x:%02x:%02x:%02x",
sn[0], sn[1], sn[2], sn[3], sn[4], sn[5]);
printf("MAC address: %s\n", enetaddr);
setenv("ethaddr", (char *)enetaddr);
} else {
sprintf((char *)enetaddr, "00:01:02:03:04:05");
printf("Error reading MAC address.\n");
printf("Setting default to %s\n", enetaddr);
setenv("ethaddr", (char *)enetaddr);
}
}