/* * (C) Copyright 2002 ELTEC Elektronik AG * Frank Gottschling <fgottschling@eltec.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 *//* includes */#include <common.h>#include <linux/ctype.h>#include <pci.h>#include <net.h>#include "srom.h"/* imports  */extern char console_buffer[CFG_CBSIZE];extern int l2_cache_enable (int l2control);extern int eepro100_write_eeprom (struct eth_device* dev, int location,		 int addr_len, unsigned short data);extern int read_eeprom (struct eth_device* dev, int location, int addr_len);/*----------------------------------------------------------------------------*//* * read/write to nvram is only byte access */void *nvram_read(void *dest, const long src, size_t count){    uchar *d = (uchar *) dest;    uchar *s = (uchar *) (CFG_ENV_MAP_ADRS + src);    while (count--)	*d++ = *s++;    return dest;}void nvram_write(long dest, const void *src, size_t count){    uchar *d = (uchar *) (CFG_ENV_MAP_ADRS + dest);    uchar *s = (uchar *) src;    while (count--)	*d++ = *s++;}/*----------------------------------------------------------------------------*//* * handle sroms on ELPPC * fix ether address * set serial console as default */int misc_init_r (void){    revinfo eerev;    u_char *ptr;    u_int  i, l, initSrom, copyNv;    char buf[256];    char hex[23] = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 0, 0, 0,		     0, 0, 0, 0, 10, 11, 12, 13, 14, 15 };    /* Clock setting for MPC107 i2c */    mpc107_i2c_init (MPC107_EUMB_ADDR, 0x2b);    /* Reset the EPIC */    out32r (MPC107_EUMB_GCR, 0xa0000000);    while (in32r (MPC107_EUMB_GCR) & 0x80000000);   /* Wait for reset to complete */    out32r (MPC107_EUMB_GCR, 0x20000000);           /* Put into into mixed mode */    while (in32r (MPC107_EUMB_IACKR) != 0xff);      /* Clear all pending interrupts */    /*     * Check/Remake revision info     */    initSrom = 0;    copyNv   = 0;    /* read out current revision srom contens */    mpc107_srom_load (0x0000, (u_char*)&eerev, sizeof(revinfo),		SECOND_DEVICE, FIRST_BLOCK);    /* read out current nvram shadow image */    nvram_read (buf, CFG_NV_SROM_COPY_ADDR, CFG_SROM_SIZE);    if (strcmp (eerev.magic, "ELTEC") != 0)    {	/* srom is not initialized -> create a default revision info */	for (i = 0, ptr = (u_char *)&eerev; i < sizeof(revinfo); i++)	    *ptr++ = 0x00;	strcpy(eerev.magic, "ELTEC");	eerev.revrev[0] = 1;	eerev.revrev[1] = 0;	eerev.size = 0x00E0;	eerev.category[0] = 0x01;	/* node id from dead e128 as default */	eerev.etheraddr[0] = 0x00;	eerev.etheraddr[1] = 0x00;	eerev.etheraddr[2] = 0x5B;	eerev.etheraddr[3] = 0x00;	eerev.etheraddr[4] = 0x2E;	eerev.etheraddr[5] = 0x4D;	/* cache config word for ELPPC */	*(int*)&eerev.res[0] = 0;	initSrom = 1;  /* force dialog */	copyNv   = 1;  /* copy to nvram */    }    if ((copyNv == 0) &&   (el_srom_checksum((u_char*)&eerev, CFG_SROM_SIZE) !=		el_srom_checksum((u_char*)buf, CFG_SROM_SIZE)))    {	printf ("Invalid revision info copy in nvram !\n");	printf ("Press key:\n  <c> to copy current revision info to nvram.\n");	printf ("  <r> to reenter revision info.\n");	printf ("=> ");	if (0 != readline (NULL))	{	    switch ((char)toupper(console_buffer[0]))	    {	    case 'C':		copyNv = 1;		break;	    case 'R':		copyNv = 1;		initSrom = 1;		break;	    }	}    }    if (initSrom)    {	memcpy (buf, &eerev.revision[0][0], 14);     /* save all revision info */	printf ("Enter revision number (0-9): %c  ", eerev.revision[0][0]);	if (0 != readline (NULL))	{	    eerev.revision[0][0] = (char)toupper(console_buffer[0]);	    memcpy (&eerev.revision[1][0], buf, 12); /* shift rest of rev info */	}	printf ("Enter revision character (A-Z): %c  ", eerev.revision[0][1]);	if (1 == readline (NULL))	{	    eerev.revision[0][1] = (char)toupper(console_buffer[0]);	}	printf ("Enter board name (V-XXXX-XXXX): %s  ", (char *)&eerev.board);	if (11 == readline (NULL))	{	    for (i=0; i<11; i++)		eerev.board[i] =  (char)toupper(console_buffer[i]);	    eerev.board[11] = '\0';	}	printf ("Enter serial number: %s ", (char *)&eerev.serial );	if (6 == readline (NULL))	{	    for (i=0; i<6; i++)		eerev.serial[i] = console_buffer[i];	    eerev.serial[6] = '\0';	}	printf ("Enter ether node ID with leading zero (HEX): %02x%02x%02x%02x%02x%02x  ",	    eerev.etheraddr[0], eerev.etheraddr[1],	    eerev.etheraddr[2], eerev.etheraddr[3],	    eerev.etheraddr[4], eerev.etheraddr[5]);	if (12 == readline (NULL))	{	    for (i=0; i<12; i+=2)	    eerev.etheraddr[i>>1] = (char)(16*hex[toupper(console_buffer[i])-'0'] +			       hex[toupper(console_buffer[i+1])-'0']);	}	l = strlen ((char *)&eerev.text);	printf("Add to text section (max 64 chr): %s ", (char *)&eerev.text );	if (0 != readline (NULL))	{	    for (i = l; i<63; i++)		eerev.text[i] = console_buffer[i-l];	    eerev.text[63] = '\0';	}	/* prepare network eeprom */	memset (buf, 0, 128);	buf[0] = eerev.etheraddr[1];	buf[1] = eerev.etheraddr[0];	buf[2] = eerev.etheraddr[3];	buf[3] = eerev.etheraddr[2];	buf[4] = eerev.etheraddr[5];	buf[5] = eerev.etheraddr[4];	*(unsigned short *)&buf[20] = 0x48B2;	*(unsigned short *)&buf[22] = 0x0004;	*(unsigned short *)&buf[24] = 0x1433;	printf("\nSRom:  Writing i82559 info ........ ");	if (eepro100_srom_store ((unsigned short *)buf) == -1)	    printf("FAILED\n");	else	    printf("OK\n");	/* update CRC */	eerev.crc = el_srom_checksum((u_char *)eerev.board, eerev.size);	/* write new values */	printf("\nSRom:  Writing revision info ...... ");	if (mpc107_srom_store((BLOCK_SIZE-sizeof(revinfo)), (u_char *)&eerev,			    sizeof(revinfo), SECOND_DEVICE, FIRST_BLOCK) == -1)	    printf("FAILED\n\n");	else	    printf("OK\n\n");	/* write new values as shadow image to nvram */	nvram_write (CFG_NV_SROM_COPY_ADDR, (void *)&eerev, CFG_SROM_SIZE);    } /*if (initSrom) */    /* copy current values as shadow image to nvram */    if (initSrom == 0 && copyNv == 1)	nvram_write (CFG_NV_SROM_COPY_ADDR, (void *)&eerev, CFG_SROM_SIZE);    /* update environment */    sprintf (buf, "%02x:%02x:%02x:%02x:%02x:%02x",	    eerev.etheraddr[0], eerev.etheraddr[1],	    eerev.etheraddr[2], eerev.etheraddr[3],	    eerev.etheraddr[4], eerev.etheraddr[5]);    setenv ("ethaddr", buf);    /* set serial console as default */    if ((ptr = getenv ("console")) == NULL)	setenv ("console", "serial");    /* print actual board identification */    printf("Ident: %s  Ser %s  Rev %c%c\n",	    eerev.board, (char *)&eerev.serial,	    eerev.revision[0][0], eerev.revision[0][1]);    return (0);}/*----------------------------------------------------------------------------*/