blob: 5e3a81c6e196c0a1cc5abd9244ecde8403d8cc9c [file] [log] [blame]
wdenke69b4b82002-09-17 21:26:59 +00001/*
2 * (C) Copyright 2002 ELTEC Elektronik AG
3 * Frank Gottschling <fgottschling@eltec.de>
4 *
5 * See file CREDITS for list of people who contributed to this
6 * project.
7 *
8 * This program is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU General Public License as
10 * published by the Free Software Foundation; either version 2 of
11 * the License, or (at your option) any later version.
12 *
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
17 *
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
21 * MA 02111-1307 USA
22 */
23
24/* includes */
25#include <common.h>
26#include <linux/ctype.h>
27#include <pci.h>
28#include <net.h>
29#include "srom.h"
30
31/* imports */
32extern char console_buffer[CFG_CBSIZE];
33extern int l2_cache_enable (int l2control);
wdenke65527f2004-02-12 00:47:09 +000034extern int eepro100_write_eeprom (struct eth_device *dev, int location,
35 int addr_len, unsigned short data);
36extern int read_eeprom (struct eth_device *dev, int location, int addr_len);
wdenke69b4b82002-09-17 21:26:59 +000037
38/*----------------------------------------------------------------------------*/
39/*
40 * read/write to nvram is only byte access
41 */
wdenke65527f2004-02-12 00:47:09 +000042void *nvram_read (void *dest, const long src, size_t count)
wdenke69b4b82002-09-17 21:26:59 +000043{
wdenke65527f2004-02-12 00:47:09 +000044 uchar *d = (uchar *) dest;
Jean-Christophe PLAGNIOL-VILLARD7e1cda62008-09-10 22:48:06 +020045 uchar *s = (uchar *) (CONFIG_ENV_MAP_ADRS + src);
wdenke69b4b82002-09-17 21:26:59 +000046
wdenke65527f2004-02-12 00:47:09 +000047 while (count--)
48 *d++ = *s++;
wdenke69b4b82002-09-17 21:26:59 +000049
wdenke65527f2004-02-12 00:47:09 +000050 return dest;
wdenke69b4b82002-09-17 21:26:59 +000051}
52
wdenke65527f2004-02-12 00:47:09 +000053void nvram_write (long dest, const void *src, size_t count)
wdenke69b4b82002-09-17 21:26:59 +000054{
Jean-Christophe PLAGNIOL-VILLARD7e1cda62008-09-10 22:48:06 +020055 uchar *d = (uchar *) (CONFIG_ENV_MAP_ADRS + dest);
wdenke65527f2004-02-12 00:47:09 +000056 uchar *s = (uchar *) src;
wdenke69b4b82002-09-17 21:26:59 +000057
wdenke65527f2004-02-12 00:47:09 +000058 while (count--)
59 *d++ = *s++;
wdenke69b4b82002-09-17 21:26:59 +000060}
61
62/*----------------------------------------------------------------------------*/
63/*
64 * handle sroms on ELPPC
65 * fix ether address
66 * set serial console as default
67 */
68int misc_init_r (void)
69{
wdenke65527f2004-02-12 00:47:09 +000070 revinfo eerev;
71 u_char *ptr;
72 u_int i, l, initSrom, copyNv;
73 char buf[256];
74 char hex[23] = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 0, 0, 0,
75 0, 0, 0, 0, 10, 11, 12, 13, 14, 15
76 };
wdenke69b4b82002-09-17 21:26:59 +000077
wdenke65527f2004-02-12 00:47:09 +000078 /* Clock setting for MPC107 i2c */
79 mpc107_i2c_init (MPC107_EUMB_ADDR, 0x2b);
wdenke69b4b82002-09-17 21:26:59 +000080
wdenke65527f2004-02-12 00:47:09 +000081 /* Reset the EPIC */
82 out32r (MPC107_EUMB_GCR, 0xa0000000);
83 while (in32r (MPC107_EUMB_GCR) & 0x80000000); /* Wait for reset to complete */
84 out32r (MPC107_EUMB_GCR, 0x20000000); /* Put into into mixed mode */
85 while (in32r (MPC107_EUMB_IACKR) != 0xff); /* Clear all pending interrupts */
wdenke69b4b82002-09-17 21:26:59 +000086
wdenke65527f2004-02-12 00:47:09 +000087 /*
88 * Check/Remake revision info
89 */
90 initSrom = 0;
91 copyNv = 0;
wdenke69b4b82002-09-17 21:26:59 +000092
wdenke65527f2004-02-12 00:47:09 +000093 /* read out current revision srom contens */
94 mpc107_srom_load (0x0000, (u_char *) & eerev, sizeof (revinfo),
95 SECOND_DEVICE, FIRST_BLOCK);
wdenke69b4b82002-09-17 21:26:59 +000096
wdenke65527f2004-02-12 00:47:09 +000097 /* read out current nvram shadow image */
98 nvram_read (buf, CFG_NV_SROM_COPY_ADDR, CFG_SROM_SIZE);
wdenke69b4b82002-09-17 21:26:59 +000099
wdenke65527f2004-02-12 00:47:09 +0000100 if (strcmp (eerev.magic, "ELTEC") != 0) {
101 /* srom is not initialized -> create a default revision info */
102 for (i = 0, ptr = (u_char *) & eerev; i < sizeof (revinfo);
103 i++)
104 *ptr++ = 0x00;
105 strcpy (eerev.magic, "ELTEC");
106 eerev.revrev[0] = 1;
107 eerev.revrev[1] = 0;
108 eerev.size = 0x00E0;
109 eerev.category[0] = 0x01;
wdenke69b4b82002-09-17 21:26:59 +0000110
wdenke65527f2004-02-12 00:47:09 +0000111 /* node id from dead e128 as default */
112 eerev.etheraddr[0] = 0x00;
113 eerev.etheraddr[1] = 0x00;
114 eerev.etheraddr[2] = 0x5B;
115 eerev.etheraddr[3] = 0x00;
116 eerev.etheraddr[4] = 0x2E;
117 eerev.etheraddr[5] = 0x4D;
wdenke69b4b82002-09-17 21:26:59 +0000118
wdenke65527f2004-02-12 00:47:09 +0000119 /* cache config word for ELPPC */
120 *(int *) &eerev.res[0] = 0;
wdenke69b4b82002-09-17 21:26:59 +0000121
wdenke65527f2004-02-12 00:47:09 +0000122 initSrom = 1; /* force dialog */
123 copyNv = 1; /* copy to nvram */
wdenk57b2d802003-06-27 21:31:46 +0000124 }
wdenke69b4b82002-09-17 21:26:59 +0000125
wdenke65527f2004-02-12 00:47:09 +0000126 if ((copyNv == 0)
127 && (el_srom_checksum ((u_char *) & eerev, CFG_SROM_SIZE) !=
128 el_srom_checksum ((u_char *) buf, CFG_SROM_SIZE))) {
129 printf ("Invalid revision info copy in nvram !\n");
130 printf ("Press key:\n <c> to copy current revision info to nvram.\n");
131 printf (" <r> to reenter revision info.\n");
132 printf ("=> ");
133 if (0 != readline (NULL)) {
134 switch ((char) toupper (console_buffer[0])) {
135 case 'C':
136 copyNv = 1;
137 break;
138 case 'R':
139 copyNv = 1;
140 initSrom = 1;
141 break;
142 }
143 }
wdenk57b2d802003-06-27 21:31:46 +0000144 }
wdenke69b4b82002-09-17 21:26:59 +0000145
wdenke65527f2004-02-12 00:47:09 +0000146 if (initSrom) {
147 memcpy (buf, &eerev.revision[0][0], 14); /* save all revision info */
148 printf ("Enter revision number (0-9): %c ",
149 eerev.revision[0][0]);
150 if (0 != readline (NULL)) {
151 eerev.revision[0][0] =
152 (char) toupper (console_buffer[0]);
153 memcpy (&eerev.revision[1][0], buf, 12); /* shift rest of rev info */
154 }
wdenke69b4b82002-09-17 21:26:59 +0000155
wdenke65527f2004-02-12 00:47:09 +0000156 printf ("Enter revision character (A-Z): %c ",
157 eerev.revision[0][1]);
158 if (1 == readline (NULL)) {
159 eerev.revision[0][1] =
160 (char) toupper (console_buffer[0]);
161 }
wdenke69b4b82002-09-17 21:26:59 +0000162
wdenke65527f2004-02-12 00:47:09 +0000163 printf ("Enter board name (V-XXXX-XXXX): %s ",
164 (char *) &eerev.board);
165 if (11 == readline (NULL)) {
166 for (i = 0; i < 11; i++)
167 eerev.board[i] =
168 (char) toupper (console_buffer[i]);
169 eerev.board[11] = '\0';
170 }
wdenke69b4b82002-09-17 21:26:59 +0000171
wdenke65527f2004-02-12 00:47:09 +0000172 printf ("Enter serial number: %s ", (char *) &eerev.serial);
173 if (6 == readline (NULL)) {
174 for (i = 0; i < 6; i++)
175 eerev.serial[i] = console_buffer[i];
176 eerev.serial[6] = '\0';
177 }
wdenke69b4b82002-09-17 21:26:59 +0000178
wdenke65527f2004-02-12 00:47:09 +0000179 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]);
180 if (12 == readline (NULL)) {
181 for (i = 0; i < 12; i += 2)
182 eerev.etheraddr[i >> 1] =
183 (char) (16 *
184 hex[toupper
185 (console_buffer[i]) -
186 '0'] +
187 hex[toupper
188 (console_buffer[i + 1]) -
189 '0']);
190 }
wdenke69b4b82002-09-17 21:26:59 +0000191
wdenke65527f2004-02-12 00:47:09 +0000192 l = strlen ((char *) &eerev.text);
193 printf ("Add to text section (max 64 chr): %s ",
194 (char *) &eerev.text);
195 if (0 != readline (NULL)) {
196 for (i = l; i < 63; i++)
197 eerev.text[i] = console_buffer[i - l];
198 eerev.text[63] = '\0';
199 }
wdenke69b4b82002-09-17 21:26:59 +0000200
wdenke65527f2004-02-12 00:47:09 +0000201 /* prepare network eeprom */
202 memset (buf, 0, 128);
wdenke69b4b82002-09-17 21:26:59 +0000203
wdenke65527f2004-02-12 00:47:09 +0000204 buf[0] = eerev.etheraddr[1];
205 buf[1] = eerev.etheraddr[0];
206 buf[2] = eerev.etheraddr[3];
207 buf[3] = eerev.etheraddr[2];
208 buf[4] = eerev.etheraddr[5];
209 buf[5] = eerev.etheraddr[4];
wdenke69b4b82002-09-17 21:26:59 +0000210
wdenke65527f2004-02-12 00:47:09 +0000211 *(unsigned short *) &buf[20] = 0x48B2;
212 *(unsigned short *) &buf[22] = 0x0004;
213 *(unsigned short *) &buf[24] = 0x1433;
wdenke69b4b82002-09-17 21:26:59 +0000214
wdenke65527f2004-02-12 00:47:09 +0000215 printf ("\nSRom: Writing i82559 info ........ ");
216 if (eepro100_srom_store ((unsigned short *) buf) == -1)
217 printf ("FAILED\n");
218 else
219 printf ("OK\n");
wdenke69b4b82002-09-17 21:26:59 +0000220
wdenke65527f2004-02-12 00:47:09 +0000221 /* update CRC */
222 eerev.crc =
223 el_srom_checksum ((u_char *) eerev.board, eerev.size);
wdenke69b4b82002-09-17 21:26:59 +0000224
wdenke65527f2004-02-12 00:47:09 +0000225 /* write new values */
226 printf ("\nSRom: Writing revision info ...... ");
227 if (mpc107_srom_store
228 ((BLOCK_SIZE - sizeof (revinfo)), (u_char *) & eerev,
229 sizeof (revinfo), SECOND_DEVICE, FIRST_BLOCK) == -1)
230 printf ("FAILED\n\n");
231 else
232 printf ("OK\n\n");
wdenke69b4b82002-09-17 21:26:59 +0000233
wdenke65527f2004-02-12 00:47:09 +0000234 /* write new values as shadow image to nvram */
235 nvram_write (CFG_NV_SROM_COPY_ADDR, (void *) &eerev,
236 CFG_SROM_SIZE);
wdenke69b4b82002-09-17 21:26:59 +0000237
wdenke65527f2004-02-12 00:47:09 +0000238 }
239
240 /*if (initSrom) */
241 /* copy current values as shadow image to nvram */
242 if (initSrom == 0 && copyNv == 1)
243 nvram_write (CFG_NV_SROM_COPY_ADDR, (void *) &eerev,
244 CFG_SROM_SIZE);
wdenke69b4b82002-09-17 21:26:59 +0000245
wdenke65527f2004-02-12 00:47:09 +0000246 /* update environment */
247 sprintf (buf, "%02x:%02x:%02x:%02x:%02x:%02x",
248 eerev.etheraddr[0], eerev.etheraddr[1],
249 eerev.etheraddr[2], eerev.etheraddr[3],
250 eerev.etheraddr[4], eerev.etheraddr[5]);
251 setenv ("ethaddr", buf);
wdenke69b4b82002-09-17 21:26:59 +0000252
wdenke65527f2004-02-12 00:47:09 +0000253 /* print actual board identification */
254 printf ("Ident: %s Ser %s Rev %c%c\n",
255 eerev.board, (char *) &eerev.serial,
256 eerev.revision[0][0], eerev.revision[0][1]);
wdenke69b4b82002-09-17 21:26:59 +0000257
wdenke65527f2004-02-12 00:47:09 +0000258 return (0);
wdenke69b4b82002-09-17 21:26:59 +0000259}
260
261/*----------------------------------------------------------------------------*/