1/* 2 * lasat_board.c 3 * 4 * Thomas Horsten <thh@lasat.com> 5 * Copyright (C) 2000 LASAT Networks A/S. 6 * 7 * ######################################################################## 8 * 9 * This program is free software; you can distribute it and/or modify it 10 * under the terms of the GNU General Public License (Version 2) as 11 * published by the Free Software Foundation. 12 * 13 * This program is distributed in the hope it will be useful, but WITHOUT 14 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 15 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 16 * for more details. 17 * 18 * You should have received a copy of the GNU General Public License along 19 * with this program; if not, write to the Free Software Foundation, Inc., 20 * 59 Temple Place - Suite 330, Boston MA 02111-1307, USA. 21 * 22 * ######################################################################## 23 * 24 * Routines specific to the LASAT boards 25 */ 26#include <asm/lasat/lasat.h> 27#include <linux/kernel.h> 28#include <linux/string.h> 29#include <linux/ctype.h> 30#include <asm/bootinfo.h> 31#include <asm/lasat/lasat_mtd.h> 32#include <asm/addrspace.h> 33#include "at93c.h" 34/* New model description table */ 35#include "lasat_models.h" 36struct lasat_info lasat_board_info; 37 38extern unsigned long crc32(unsigned long, unsigned char *, int); 39 40 41int EEPROMRead(unsigned int pos, unsigned char *data, int len) 42{ 43 int i; 44 45 for (i=0; i<len; i++) 46 *data++ = at93c_read(pos++); 47 48 return 0; 49} 50int EEPROMWrite(unsigned int pos, unsigned char *data, int len) 51{ 52 int i; 53 54 for (i=0; i<len; i++) 55 at93c_write(pos++, *data++); 56 57 return 0; 58} 59 60static int upgrade_eeprom_info(struct lasat_eeprom_struct * ser_data) 61{ 62 struct lasat_eeprom_struct_pre7 old; 63 64 memcpy(&old, ser_data, sizeof(struct lasat_eeprom_struct_pre7)); 65 66 switch (ser_data->version) { 67 case 1: 68 case 2: 69 case 3: 70 /* These have old serial numbers that we can't convert. */ 71 return -1; 72 73 case 4: 74 /* This used flags for obscure purposes. */ 75 old.version = 5; 76 77 case 5: 78 /* Writecount didn't exist. */ 79 old.writecount = 1; 80 old.version = 6; 81 82 case 6: 83 /* The length of the part numbers have changed. */ 84 /* So the print_serial, prod_partno, etc have moved. */ 85 /* Also, now the dash is part of the part number (in 86 * accordance with our philosophy that the part numbers 87 * are to be considered "random data"). */ 88 89 memset(ser_data, 0, 128); 90 91 ser_data->cfg[0] = 0; 92 ser_data->cfg[1] = 0; 93 ser_data->cfg[2] = 0; 94 95 memcpy(ser_data->hwaddr, old.hwaddr0, 6); 96 97 memcpy(ser_data->print_partno, old.print_partno, 6); 98 ser_data->print_partno[6] = '-'; 99 memcpy(ser_data->print_partno+7, old.print_partno+6, 3); 100 101 memcpy(ser_data->print_serial, old.print_serial, 14); 102 103 memcpy(ser_data->prod_partno, old.prod_partno, 6); 104 ser_data->prod_partno[6] = '-'; 105 memcpy(ser_data->prod_partno+7, old.prod_partno+6, 3); 106 107 memcpy(ser_data->prod_serial, old.prod_serial, 14); 108 109 memcpy(ser_data->passwd_hash, old.passwd_hash, 16); 110 111 ser_data->vendid = old.vendor; 112 ser_data->ts_ref = old.ts_ref; 113 ser_data->ts_signoff = old.ts_signoff; 114 ser_data->serviceflag = old.writecount; 115 116 ser_data->ipaddr = old.ipaddr; 117 ser_data->netmask = old.netmask; 118 119 /* make up something */ 120 ser_data->cfg[0] = 0x01132001; 121 ser_data->cfg[1] = 0x00010061; 122 123 ser_data->prid = ((ser_data->cfg[0] >> 4) & 0x0f); 124 ser_data->version = 7; 125 126 127 case 7: 128 /* Up to date */ 129 return 0; 130 131 default: 132 /* What, an unknown version? */ 133 return -1; 134 } 135} 136 137int lasat_init_board_info(void) 138{ 139 int c; 140 unsigned long crc; 141 unsigned long cfg0, cfg1; 142 const vendor_info_t *pvi; 143 const product_info_t *ppi; 144 int i_n_base_models = N_BASE_MODELS; 145 const char * const * i_txt_base_models = txt_base_models; 146 int i_n_vendors = N_VENDORS; 147 vendor_info_t const *i_vendor_info_table = vendor_info_table; 148 int i_n_prids = N_PRIDS; 149 150 memset(&lasat_board_info, 0, sizeof(lasat_board_info)); 151 152 /* Assume EEPROM struct is LASAT_EEPROM_VERSION */ 153 lasat_board_info.li_eeprom_upgrade_version = 1; 154 155 /* First read the EEPROM info */ 156 EEPROMRead(0, (unsigned char *)&lasat_board_info.li_eeprom_info, 157 sizeof(struct lasat_eeprom_struct)); 158 159 /* Check the CRC */ 160 crc = crc32(0x0, (unsigned char *)(&lasat_board_info.li_eeprom_info), 161 sizeof(struct lasat_eeprom_struct) - 4); 162 163 if (crc != lasat_board_info.li_eeprom_info.crc32) { 164 return -1; 165 } 166 167 if (lasat_board_info.li_eeprom_info.version != LASAT_EEPROM_VERSION) 168 { 169 if (0 > upgrade_eeprom_info(&(lasat_board_info.li_eeprom_info))) { 170 printk("Upgrading EEPROM information from version %d to version %d failed!\n", 171 (unsigned int)lasat_board_info.li_eeprom_info.version, 172 LASAT_EEPROM_VERSION); 173 return -1; 174 } 175 lasat_write_eeprom_info(); 176 177 /* OK, the EEPROM struct is not LASAT_EEPROM_VERSION */ 178 lasat_board_info.li_eeprom_upgrade_version = 0; 179 } 180 181 /* 182 * Part and serial no. 183 */ 184 memcpy(lasat_board_info.li_partno, 185 lasat_board_info.li_eeprom_info.prod_partno, 12); 186 lasat_board_info.li_partno[12] = '\0'; 187 188 memcpy(lasat_board_info.li_serial, 189 lasat_board_info.li_eeprom_info.prod_serial, 190 14); 191 lasat_board_info.li_serial[14] = '\0'; 192 193 /* 194 * If configuration field is present, use that 195 */ 196 197 cfg0 = lasat_board_info.li_eeprom_info.cfg[0]; 198 cfg1 = lasat_board_info.li_eeprom_info.cfg[1]; 199 200 if ( LASAT_W0_DSCTYPE(cfg0) != 1) { 201 return -1; 202 } 203 /* We have a valid configuration */ 204 205 switch (LASAT_W0_SDRAMBANKSZ(cfg0)) { 206 case 0: 207 lasat_board_info.li_memsize = 0x0800000; 208 break; 209 case 1: 210 lasat_board_info.li_memsize = 0x1000000; 211 break; 212 case 2: 213 lasat_board_info.li_memsize = 0x2000000; 214 break; 215 case 3: 216 lasat_board_info.li_memsize = 0x4000000; 217 break; 218 case 4: 219 lasat_board_info.li_memsize = 0x8000000; 220 break; 221 default: 222 lasat_board_info.li_memsize = 0; 223 } 224 225 switch (LASAT_W0_SDRAMBANKS(cfg0)) { 226 case 0: 227 break; 228 case 1: 229 lasat_board_info.li_memsize *= 2; 230 break; 231 default: 232 break; 233 } 234 235 switch (LASAT_W0_BUSSPEED(cfg0)) { 236 case 0x0: 237 lasat_board_info.li_bus_hz = 60000000; 238 break; 239 case 0x1: 240 lasat_board_info.li_bus_hz = 66000000; 241 break; 242 case 0x2: 243 lasat_board_info.li_bus_hz = 66666667; 244 break; 245 case 0x3: 246 lasat_board_info.li_bus_hz = 80000000; 247 break; 248 case 0x4: 249 lasat_board_info.li_bus_hz = 83333333; 250 break; 251 case 0x5: 252 lasat_board_info.li_bus_hz = 100000000; 253 break; 254 } 255 256 switch (LASAT_W0_CPUCLK(cfg0)) { 257 case 0x0: 258 lasat_board_info.li_cpu_hz = 259 lasat_board_info.li_bus_hz; 260 break; 261 case 0x1: 262 lasat_board_info.li_cpu_hz = 263 lasat_board_info.li_bus_hz + 264 (lasat_board_info.li_bus_hz >> 1); 265 break; 266 case 0x2: 267 lasat_board_info.li_cpu_hz = 268 lasat_board_info.li_bus_hz + 269 lasat_board_info.li_bus_hz; 270 break; 271 case 0x3: 272 lasat_board_info.li_cpu_hz = 273 lasat_board_info.li_bus_hz + 274 lasat_board_info.li_bus_hz + 275 (lasat_board_info.li_bus_hz >> 1); 276 break; 277 case 0x4: 278 lasat_board_info.li_cpu_hz = 279 lasat_board_info.li_bus_hz + 280 lasat_board_info.li_bus_hz + 281 lasat_board_info.li_bus_hz; 282 break; 283 } 284 285 switch (LASAT_W1_EDHAC(cfg1)) { 286 case 0x0: 287 lasat_board_info.li_edhac = 0; 288 lasat_board_info.li_eadi = 0; 289 break; 290 case 0x1: 291 lasat_board_info.li_edhac = 0; 292 lasat_board_info.li_eadi = 1; 293 break; 294 case 0x2: 295 lasat_board_info.li_edhac = 1; 296 lasat_board_info.li_eadi = 1; 297 break; 298 case 0x3: 299 lasat_board_info.li_edhac = 2; 300 lasat_board_info.li_eadi = 1; 301 break; 302 } 303 /* The 200 board always has EADI */ 304 if (LASAT_W0_CPUTYPE(cfg0) == 1) { 305 lasat_board_info.li_eadi = 1; 306 } 307 308 lasat_board_info.li_hifn = LASAT_W1_HIFN(cfg1); 309 lasat_board_info.li_isdn = LASAT_W1_ISDN(cfg1); 310 lasat_board_info.li_ide = LASAT_W1_IDE(cfg1); 311 lasat_board_info.li_hdlc = LASAT_W1_HDLC(cfg1); 312 lasat_board_info.li_usversion = LASAT_W1_USVERSION(cfg1); 313 314 /* Flash size */ 315 switch (LASAT_W1_FLASHSIZE(cfg1)) { 316 case 0: 317 lasat_board_info.li_flash_size = 0x200000; 318 break; 319 case 1: 320 lasat_board_info.li_flash_size = 0x400000; 321 break; 322 case 2: 323 lasat_board_info.li_flash_size = 0x800000; 324 break; 325 case 3: 326 lasat_board_info.li_flash_size = 0x1000000; 327 break; 328 case 4: 329 lasat_board_info.li_flash_size = 0x2000000; 330 break; 331 } 332 333 /* Flash base addresses */ 334 if (mips_machtype == MACH_LASAT_100) { 335 lasat_board_info.li_flash_base = KSEG1ADDR(0x1e000000); 336 lasat_board_info.li_flash_service_base = KSEG1ADDR(0x1e400000); 337 lasat_board_info.li_flash_service_size = 0x100000; 338 lasat_board_info.li_flash_normal_base = KSEG1ADDR(0x1e500000); 339 lasat_board_info.li_flash_normal_size = 0x100000; 340 if (lasat_board_info.li_flash_size > 0x200000) { 341 lasat_board_info.li_flash_cfg_base = KSEG1ADDR(0x1e600000); 342 lasat_board_info.li_flash_cfg_size = 0x100000; 343 lasat_board_info.li_flash_fs_base = KSEG1ADDR(0x1e700000); 344 lasat_board_info.li_flash_fs_size = 0x500000; 345 } 346 } else { 347 lasat_board_info.li_flash_base = KSEG1ADDR(0x10000000); 348 if (lasat_board_info.li_flash_size < 0x1000000) { 349 lasat_board_info.li_flash_service_base = KSEG1ADDR(0x10000000); 350 lasat_board_info.li_flash_service_size = 0x100000; 351 lasat_board_info.li_flash_cfg_base = KSEG1ADDR(0x10200000); 352 lasat_board_info.li_flash_cfg_size = 0x100000; 353 lasat_board_info.li_flash_normal_base = KSEG1ADDR(0x10100000); 354 lasat_board_info.li_flash_normal_size = 0x100000; 355 if (lasat_board_info.li_flash_size >= 0x400000) { 356 lasat_board_info.li_flash_fs_base = KSEG1ADDR(0x10300000); 357 lasat_board_info.li_flash_fs_size = 358 lasat_board_info.li_flash_size - 0x300000; 359 } 360 } else { 361 lasat_board_info.li_flash_service_base = KSEG1ADDR(0x10400000); 362 lasat_board_info.li_flash_service_size = 0x100000; 363 lasat_board_info.li_flash_cfg_base = KSEG1ADDR(0x10000000); 364 lasat_board_info.li_flash_cfg_size = 0x200000; 365 lasat_board_info.li_flash_normal_base = KSEG1ADDR(0x10200000); 366 lasat_board_info.li_flash_normal_size = 0x100000; 367 lasat_board_info.li_flash_fs_base = KSEG1ADDR(0x10500000); 368 lasat_board_info.li_flash_fs_size = 0xa00000; 369 } 370 } 371 372 lasat_board_info.li_bmid = LASAT_W0_BMID(cfg0); 373 lasat_board_info.li_prid = lasat_board_info.li_eeprom_info.prid; 374 if (lasat_board_info.li_prid == 0xffff || lasat_board_info.li_prid == 0) 375 lasat_board_info.li_prid = lasat_board_info.li_bmid; 376 lasat_board_info.li_vendid = lasat_board_info.li_eeprom_info.vendid; 377 378 /* Base model stuff */ 379 if (lasat_board_info.li_bmid > i_n_base_models) 380 lasat_board_info.li_bmid = i_n_base_models; 381 strcpy(lasat_board_info.li_bmstr, i_txt_base_models[lasat_board_info.li_bmid]); 382 383 /* Vendor stuff */ 384 if (lasat_board_info.li_vendid >= i_n_vendors) 385 lasat_board_info.li_vendid = 0; 386 pvi = &i_vendor_info_table[lasat_board_info.li_vendid]; 387 strcpy(lasat_board_info.li_vendstr, pvi->vi_name); 388 389 /* Product ID dependent values */ 390 c = lasat_board_info.li_prid; 391 if (c >= i_n_prids) { 392 strcpy(lasat_board_info.li_namestr, "Unknown Model"); 393 strcpy(lasat_board_info.li_typestr, "Unknown Type"); 394 lasat_board_info.li_vpn_kbps = 0; 395 lasat_board_info.li_vpn_tunnels = 0; 396 lasat_board_info.li_vpn_clients = 0; 397 } else { 398 /* Product ID names (also depending on vendor ID) */ 399 ppi = &pvi->vi_product_info[c]; 400 strcpy(lasat_board_info.li_namestr, ppi->pi_name); 401 if (ppi->pi_type) 402 strcpy(lasat_board_info.li_typestr, ppi->pi_type); 403 else 404 sprintf(lasat_board_info.li_typestr, "%d",10*c); 405 } 406 407 lasat_board_info.li_debugaccess = lasat_board_info.li_eeprom_info.debugaccess; 408 409 return 0; 410} 411 412void lasat_write_eeprom_info(void) 413{ 414 unsigned long crc; 415 416 /* Generate the CRC */ 417 crc = crc32(0x0, (unsigned char *)(&lasat_board_info.li_eeprom_info), 418 sizeof(struct lasat_eeprom_struct) - 4); 419 lasat_board_info.li_eeprom_info.crc32 = crc; 420 421 /* Write the EEPROM info */ 422 EEPROMWrite(0, (unsigned char *)&lasat_board_info.li_eeprom_info, 423 sizeof(struct lasat_eeprom_struct)); 424} 425 426char *get_firmware_version(void) 427{ 428 char *fw; 429 fw = (unsigned char *)(lasat_board_info.li_flash_normal_base); 430 431 if ( (((unsigned long *)fw)[0] != 0xfedeabba) || 432 (((unsigned long *)fw)[1] != 0x00bedead)) 433 return "NONE"; 434 435 fw += 0x50; 436 if ((*fw == 0) || (strlen(fw) > 175)) { 437 return "UNKNOWN"; 438 } 439 440 return fw; 441} 442