Initial revision

1 files changed, 258 insertions, 0 deletions

diff --git a/board/eltec/elppc/misc.c b/board/eltec/elppc/misc.c
new file mode 100644
index 0000000..7bfb3a4
--- /dev/null
+++ b/board/eltec/elppc/misc.c
@@ -0,0 +1,258 @@
+/*
+ * (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);
+}
+
+/*----------------------------------------------------------------------------*/