1 /* 2 * Copyright 2006, 2008-2009 Freescale Semiconductor 3 * York Sun (yorksun@freescale.com) 4 * Haiying Wang (haiying.wang@freescale.com) 5 * Timur Tabi (timur@freescale.com) 6 * 7 * See file CREDITS for list of people who contributed to this 8 * project. 9 * 10 * This program is free software; you can redistribute it and/or 11 * modify it under the terms of the GNU General Public License as 12 * published by the Free Software Foundation; either version 2 of 13 * the License, or (at your option) any later version. 14 * 15 * This program is distributed in the hope that it will be useful, 16 * but WITHOUT ANY WARRANTY; without even the implied warranty of 17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 18 * GNU General Public License for more details. 19 * 20 * You should have received a copy of the GNU General Public License 21 * along with this program; if not, write to the Free Software 22 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, 23 * MA 02111-1307 USA 24 */ 25 26 #include <common.h> 27 #include <command.h> 28 #include <i2c.h> 29 #include <linux/ctype.h> 30 31 #include "../common/eeprom.h" 32 33 #if !defined(CONFIG_SYS_I2C_EEPROM_CCID) && !defined(CONFIG_SYS_I2C_EEPROM_NXID) 34 #error "Please define either CONFIG_SYS_I2C_EEPROM_CCID or CONFIG_SYS_I2C_EEPROM_NXID" 35 #endif 36 37 #define MAX_NUM_PORTS 8 /* This value must be 8 as defined in doc */ 38 39 /** 40 * static eeprom: EEPROM layout for CCID or NXID formats 41 * 42 * See application note AN3638 for details. 43 */ 44 static struct __attribute__ ((__packed__)) eeprom { 45 #ifdef CONFIG_SYS_I2C_EEPROM_CCID 46 u8 id[4]; /* 0x00 - 0x03 EEPROM Tag 'CCID' */ 47 u8 major; /* 0x04 Board revision, major */ 48 u8 minor; /* 0x05 Board revision, minor */ 49 u8 sn[10]; /* 0x06 - 0x0F Serial Number*/ 50 u8 errata[2]; /* 0x10 - 0x11 Errata Level */ 51 u8 date[6]; /* 0x12 - 0x17 Build Date */ 52 u8 res_0[40]; /* 0x18 - 0x3f Reserved */ 53 u8 mac_count; /* 0x40 Number of MAC addresses */ 54 u8 mac_flag; /* 0x41 MAC table flags */ 55 u8 mac[MAX_NUM_PORTS][6]; /* 0x42 - 0x71 MAC addresses */ 56 u32 crc; /* 0x72 CRC32 checksum */ 57 #endif 58 #ifdef CONFIG_SYS_I2C_EEPROM_NXID 59 u8 id[4]; /* 0x00 - 0x03 EEPROM Tag 'NXID' */ 60 u8 sn[12]; /* 0x04 - 0x0F Serial Number */ 61 u8 errata[5]; /* 0x10 - 0x14 Errata Level */ 62 u8 date[6]; /* 0x15 - 0x1a Build Date */ 63 u8 res_0; /* 0x1b Reserved */ 64 u32 version; /* 0x1c - 0x1f NXID Version */ 65 u8 tempcal[8]; /* 0x20 - 0x27 Temperature Calibration Factors */ 66 u8 tempcalsys[2]; /* 0x28 - 0x29 System Temperature Calibration Factors */ 67 u8 tempcalflags; /* 0x2a Temperature Calibration Flags */ 68 u8 res_1[21]; /* 0x2b - 0x3f Reserved */ 69 u8 mac_count; /* 0x40 Number of MAC addresses */ 70 u8 mac_flag; /* 0x41 MAC table flags */ 71 u8 mac[MAX_NUM_PORTS][6]; /* 0x42 - 0x71 MAC addresses */ 72 u32 crc; /* 0x72 CRC32 checksum */ 73 #endif 74 } e; 75 76 /* Set to 1 if we've read EEPROM into memory */ 77 static int has_been_read = 0; 78 79 #ifdef CONFIG_SYS_I2C_EEPROM_NXID 80 /* Is this a valid NXID EEPROM? */ 81 #define is_valid ((e.id[0] == 'N') || (e.id[1] == 'X') || \ 82 (e.id[2] == 'I') || (e.id[3] == 'D')) 83 #endif 84 85 #ifdef CONFIG_SYS_I2C_EEPROM_CCID 86 /* Is this a valid CCID EEPROM? */ 87 #define is_valid ((e.id[0] == 'C') || (e.id[1] == 'C') || \ 88 (e.id[2] == 'I') || (e.id[3] == 'D')) 89 #endif 90 91 /** 92 * show_eeprom - display the contents of the EEPROM 93 */ 94 static void show_eeprom(void) 95 { 96 int i; 97 unsigned int crc; 98 99 /* EEPROM tag ID, either CCID or NXID */ 100 #ifdef CONFIG_SYS_I2C_EEPROM_NXID 101 printf("ID: %c%c%c%c v%u\n", e.id[0], e.id[1], e.id[2], e.id[3], 102 be32_to_cpu(e.version)); 103 #else 104 printf("ID: %c%c%c%c\n", e.id[0], e.id[1], e.id[2], e.id[3]); 105 #endif 106 107 /* Serial number */ 108 printf("SN: %s\n", e.sn); 109 110 /* Errata level. */ 111 #ifdef CONFIG_SYS_I2C_EEPROM_NXID 112 printf("Errata: %s\n", e.errata); 113 #else 114 printf("Errata: %c%c\n", 115 e.errata[0] ? e.errata[0] : '.', 116 e.errata[1] ? e.errata[1] : '.'); 117 #endif 118 119 /* Build date, BCD date values, as YYMMDDhhmmss */ 120 printf("Build date: 20%02x/%02x/%02x %02x:%02x:%02x %s\n", 121 e.date[0], e.date[1], e.date[2], 122 e.date[3] & 0x7F, e.date[4], e.date[5], 123 e.date[3] & 0x80 ? "PM" : ""); 124 125 /* Show MAC addresses */ 126 for (i = 0; i < min(e.mac_count, MAX_NUM_PORTS); i++) { 127 128 u8 *p = e.mac[i]; 129 130 printf("Eth%u: %02x:%02x:%02x:%02x:%02x:%02x\n", i, 131 p[0], p[1], p[2], p[3], p[4], p[5]); 132 } 133 134 crc = crc32(0, (void *)&e, sizeof(e) - 4); 135 136 if (crc == be32_to_cpu(e.crc)) 137 printf("CRC: %08x\n", be32_to_cpu(e.crc)); 138 else 139 printf("CRC: %08x (should be %08x)\n", 140 be32_to_cpu(e.crc), crc); 141 142 #ifdef DEBUG 143 printf("EEPROM dump: (0x%x bytes)\n", sizeof(e)); 144 for (i = 0; i < sizeof(e); i++) { 145 if ((i % 16) == 0) 146 printf("%02X: ", i); 147 printf("%02X ", ((u8 *)&e)[i]); 148 if (((i % 16) == 15) || (i == sizeof(e) - 1)) 149 printf("\n"); 150 } 151 #endif 152 } 153 154 /** 155 * read_eeprom - read the EEPROM into memory 156 */ 157 static int read_eeprom(void) 158 { 159 int ret; 160 #ifdef CONFIG_SYS_EEPROM_BUS_NUM 161 unsigned int bus; 162 #endif 163 164 if (has_been_read) 165 return 0; 166 167 #ifdef CONFIG_SYS_EEPROM_BUS_NUM 168 bus = i2c_get_bus_num(); 169 i2c_set_bus_num(CONFIG_SYS_EEPROM_BUS_NUM); 170 #endif 171 172 ret = i2c_read(CONFIG_SYS_I2C_EEPROM_ADDR, 0, CONFIG_SYS_I2C_EEPROM_ADDR_LEN, 173 (void *)&e, sizeof(e)); 174 175 #ifdef CONFIG_SYS_EEPROM_BUS_NUM 176 i2c_set_bus_num(bus); 177 #endif 178 179 #ifdef DEBUG 180 show_eeprom(); 181 #endif 182 183 has_been_read = (ret == 0) ? 1 : 0; 184 185 return ret; 186 } 187 188 /** 189 * update_crc - update the CRC 190 * 191 * This function should be called after each update to the EEPROM structure, 192 * to make sure the CRC is always correct. 193 */ 194 static void update_crc(void) 195 { 196 u32 crc; 197 198 crc = crc32(0, (void *)&e, sizeof(e) - 4); 199 e.crc = cpu_to_be32(crc); 200 } 201 202 /** 203 * prog_eeprom - write the EEPROM from memory 204 */ 205 static int prog_eeprom(void) 206 { 207 int ret = 0; /* shut up gcc */ 208 int i; 209 void *p; 210 #ifdef CONFIG_SYS_EEPROM_BUS_NUM 211 unsigned int bus; 212 #endif 213 214 /* Set the reserved values to 0xFF */ 215 #ifdef CONFIG_SYS_I2C_EEPROM_NXID 216 e.res_0 = 0xFF; 217 memset(e.res_1, 0xFF, sizeof(e.res_1)); 218 #else 219 memset(e.res_0, 0xFF, sizeof(e.res_0)); 220 #endif 221 update_crc(); 222 223 #ifdef CONFIG_SYS_EEPROM_BUS_NUM 224 bus = i2c_get_bus_num(); 225 i2c_set_bus_num(CONFIG_SYS_EEPROM_BUS_NUM); 226 #endif 227 228 for (i = 0, p = &e; i < sizeof(e); i += 8, p += 8) { 229 ret = i2c_write(CONFIG_SYS_I2C_EEPROM_ADDR, i, CONFIG_SYS_I2C_EEPROM_ADDR_LEN, 230 p, min((sizeof(e) - i), 8)); 231 if (ret) 232 break; 233 udelay(5000); /* 5ms write cycle timing */ 234 } 235 236 #ifdef CONFIG_SYS_EEPROM_BUS_NUM 237 i2c_set_bus_num(bus); 238 #endif 239 240 if (ret) { 241 printf("Programming failed.\n"); 242 return -1; 243 } 244 245 printf("Programming passed.\n"); 246 return 0; 247 } 248 249 /** 250 * h2i - converts hex character into a number 251 * 252 * This function takes a hexadecimal character (e.g. '7' or 'C') and returns 253 * the integer equivalent. 254 */ 255 static inline u8 h2i(char p) 256 { 257 if ((p >= '0') && (p <= '9')) 258 return p - '0'; 259 260 if ((p >= 'A') && (p <= 'F')) 261 return (p - 'A') + 10; 262 263 if ((p >= 'a') && (p <= 'f')) 264 return (p - 'a') + 10; 265 266 return 0; 267 } 268 269 /** 270 * set_date - stores the build date into the EEPROM 271 * 272 * This function takes a pointer to a string in the format "YYMMDDhhmmss" 273 * (2-digit year, 2-digit month, etc), converts it to a 6-byte BCD string, 274 * and stores it in the build date field of the EEPROM local copy. 275 */ 276 static void set_date(const char *string) 277 { 278 unsigned int i; 279 280 if (strlen(string) != 12) { 281 printf("Usage: mac date YYMMDDhhmmss\n"); 282 return; 283 } 284 285 for (i = 0; i < 6; i++) 286 e.date[i] = h2i(string[2 * i]) << 4 | h2i(string[2 * i + 1]); 287 288 update_crc(); 289 } 290 291 /** 292 * set_mac_address - stores a MAC address into the EEPROM 293 * 294 * This function takes a pointer to MAC address string 295 * (i.e."XX:XX:XX:XX:XX:XX", where "XX" is a two-digit hex number) and 296 * stores it in one of the MAC address fields of the EEPROM local copy. 297 */ 298 static void set_mac_address(unsigned int index, const char *string) 299 { 300 char *p = (char *) string; 301 unsigned int i; 302 303 if (!string) { 304 printf("Usage: mac <n> XX:XX:XX:XX:XX:XX\n"); 305 return; 306 } 307 308 for (i = 0; *p && (i < 6); i++) { 309 e.mac[index][i] = simple_strtoul(p, &p, 16); 310 if (*p == ':') 311 p++; 312 } 313 314 update_crc(); 315 } 316 317 int do_mac(cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) 318 { 319 char cmd; 320 321 if (argc == 1) { 322 show_eeprom(); 323 return 0; 324 } 325 326 cmd = argv[1][0]; 327 328 if (cmd == 'r') { 329 read_eeprom(); 330 return 0; 331 } 332 333 if (cmd == 'i') { 334 #ifdef CONFIG_SYS_I2C_EEPROM_NXID 335 memcpy(e.id, "NXID", sizeof(e.id)); 336 e.version = 0; 337 #else 338 memcpy(e.id, "CCID", sizeof(e.id)); 339 #endif 340 return 0; 341 } 342 343 if (!is_valid) { 344 printf("Please read the EEPROM ('r') and/or set the ID ('i') first.\n"); 345 return 0; 346 } 347 348 if (argc == 2) { 349 switch (cmd) { 350 case 's': /* save */ 351 prog_eeprom(); 352 break; 353 default: 354 cmd_usage(cmdtp); 355 break; 356 } 357 358 return 0; 359 } 360 361 /* We know we have at least one parameter */ 362 363 switch (cmd) { 364 case 'n': /* serial number */ 365 memset(e.sn, 0, sizeof(e.sn)); 366 strncpy((char *)e.sn, argv[2], sizeof(e.sn) - 1); 367 update_crc(); 368 break; 369 case 'e': /* errata */ 370 #ifdef CONFIG_SYS_I2C_EEPROM_NXID 371 memset(e.errata, 0, 5); 372 strncpy((char *)e.errata, argv[2], 4); 373 #else 374 e.errata[0] = argv[2][0]; 375 e.errata[1] = argv[2][1]; 376 #endif 377 update_crc(); 378 break; 379 case 'd': /* date BCD format YYMMDDhhmmss */ 380 set_date(argv[2]); 381 break; 382 case 'p': /* MAC table size */ 383 e.mac_count = simple_strtoul(argv[2], NULL, 16); 384 update_crc(); 385 break; 386 case '0' ... '7': /* "mac 0" through "mac 7" */ 387 set_mac_address(cmd - '0', argv[2]); 388 break; 389 case 'h': /* help */ 390 default: 391 cmd_usage(cmdtp); 392 break; 393 } 394 395 return 0; 396 } 397 398 /** 399 * mac_read_from_eeprom - read the MAC addresses from EEPROM 400 * 401 * This function reads the MAC addresses from EEPROM and sets the 402 * appropriate environment variables for each one read. 403 * 404 * The environment variables are only set if they haven't been set already. 405 * This ensures that any user-saved variables are never overwritten. 406 * 407 * This function must be called after relocation. 408 */ 409 int mac_read_from_eeprom(void) 410 { 411 unsigned int i; 412 u32 crc; 413 414 puts("EEPROM: "); 415 416 if (read_eeprom()) { 417 printf("Read failed.\n"); 418 return -1; 419 } 420 421 if (!is_valid) { 422 printf("Invalid ID (%02x %02x %02x %02x)\n", 423 e.id[0], e.id[1], e.id[2], e.id[3]); 424 return -1; 425 } 426 427 crc = crc32(0, (void *)&e, sizeof(e) - 4); 428 if (crc != be32_to_cpu(e.crc)) { 429 printf("CRC mismatch (%08x != %08x)\n", crc, be32_to_cpu(e.crc)); 430 return -1; 431 } 432 433 for (i = 0; i < min(e.mac_count, MAX_NUM_PORTS); i++) { 434 if (memcmp(&e.mac[i], "\0\0\0\0\0\0", 6) && 435 memcmp(&e.mac[i], "\xFF\xFF\xFF\xFF\xFF\xFF", 6)) { 436 char ethaddr[18]; 437 char enetvar[9]; 438 439 sprintf(ethaddr, "%02X:%02X:%02X:%02X:%02X:%02X", 440 e.mac[i][0], 441 e.mac[i][1], 442 e.mac[i][2], 443 e.mac[i][3], 444 e.mac[i][4], 445 e.mac[i][5]); 446 sprintf(enetvar, i ? "eth%daddr" : "ethaddr", i); 447 /* Only initialize environment variables that are blank 448 * (i.e. have not yet been set) 449 */ 450 if (!getenv(enetvar)) 451 setenv(enetvar, ethaddr); 452 } 453 } 454 455 #ifdef CONFIG_SYS_I2C_EEPROM_NXID 456 printf("%c%c%c%c v%u\n", e.id[0], e.id[1], e.id[2], e.id[3], 457 be32_to_cpu(e.version)); 458 #else 459 printf("%c%c%c%c\n", e.id[0], e.id[1], e.id[2], e.id[3]); 460 #endif 461 462 return 0; 463 } 464 465 #ifdef CONFIG_SYS_I2C_EEPROM_CCID 466 467 /** 468 * get_cpu_board_revision - get the CPU board revision on 85xx boards 469 * 470 * Read the EEPROM to determine the board revision. 471 * 472 * This function is called before relocation, so we need to read a private 473 * copy of the EEPROM into a local variable on the stack. 474 * 475 * Also, we assume that CONFIG_SYS_EEPROM_BUS_NUM == CONFIG_SYS_SPD_BUS_NUM. The global 476 * variable i2c_bus_num must be compile-time initialized to CONFIG_SYS_SPD_BUS_NUM, 477 * so that the SPD code will work. This means that all pre-relocation I2C 478 * operations can only occur on the CONFIG_SYS_SPD_BUS_NUM bus. So if 479 * CONFIG_SYS_EEPROM_BUS_NUM != CONFIG_SYS_SPD_BUS_NUM, then we can't read the EEPROM when 480 * this function is called. Oh well. 481 */ 482 unsigned int get_cpu_board_revision(void) 483 { 484 struct board_eeprom { 485 u32 id; /* 0x00 - 0x03 EEPROM Tag 'CCID' */ 486 u8 major; /* 0x04 Board revision, major */ 487 u8 minor; /* 0x05 Board revision, minor */ 488 } be; 489 490 i2c_read(CONFIG_SYS_I2C_EEPROM_ADDR, 0, CONFIG_SYS_I2C_EEPROM_ADDR_LEN, 491 (void *)&be, sizeof(be)); 492 493 if (be.id != (('C' << 24) | ('C' << 16) | ('I' << 8) | 'D')) 494 return MPC85XX_CPU_BOARD_REV(0, 0); 495 496 if ((be.major == 0xff) && (be.minor == 0xff)) 497 return MPC85XX_CPU_BOARD_REV(0, 0); 498 499 return MPC85XX_CPU_BOARD_REV(be.major, be.minor); 500 } 501 #endif 502