1 // SPDX-License-Identifier: GPL-2.0+ 2 /* 3 * Copyright (c) 2016 Toradex, Inc. 4 */ 5 6 #include <common.h> 7 #include "tdx-cfg-block.h" 8 9 #if defined(CONFIG_TARGET_APALIS_IMX6) || defined(CONFIG_TARGET_COLIBRI_IMX6) 10 #include <asm/arch/sys_proto.h> 11 #else 12 #define is_cpu_type(cpu) (0) 13 #endif 14 #if defined(CONFIG_CPU_PXA27X) 15 #include <asm/arch-pxa/pxa.h> 16 #else 17 #define cpu_is_pxa27x(cpu) (0) 18 #endif 19 #include <cli.h> 20 #include <console.h> 21 #include <flash.h> 22 #include <malloc.h> 23 #include <mmc.h> 24 #include <nand.h> 25 #include <asm/mach-types.h> 26 27 DECLARE_GLOBAL_DATA_PTR; 28 29 #define TAG_VALID 0xcf01 30 #define TAG_MAC 0x0000 31 #define TAG_HW 0x0008 32 #define TAG_INVALID 0xffff 33 34 #define TAG_FLAG_VALID 0x1 35 36 #if defined(CONFIG_TDX_CFG_BLOCK_IS_IN_MMC) 37 #define TDX_CFG_BLOCK_MAX_SIZE 512 38 #elif defined(CONFIG_TDX_CFG_BLOCK_IS_IN_NAND) 39 #define TDX_CFG_BLOCK_MAX_SIZE 64 40 #elif defined(CONFIG_TDX_CFG_BLOCK_IS_IN_NOR) 41 #define TDX_CFG_BLOCK_MAX_SIZE 64 42 #else 43 #error Toradex config block location not set 44 #endif 45 46 struct toradex_tag { 47 u32 len:14; 48 u32 flags:2; 49 u32 id:16; 50 }; 51 52 bool valid_cfgblock; 53 struct toradex_hw tdx_hw_tag; 54 struct toradex_eth_addr tdx_eth_addr; 55 u32 tdx_serial; 56 57 const char * const toradex_modules[] = { 58 [0] = "UNKNOWN MODULE", 59 [1] = "Colibri PXA270 312MHz", 60 [2] = "Colibri PXA270 520MHz", 61 [3] = "Colibri PXA320 806MHz", 62 [4] = "Colibri PXA300 208MHz", 63 [5] = "Colibri PXA310 624MHz", 64 [6] = "Colibri PXA320 806MHz IT", 65 [7] = "Colibri PXA300 208MHz XT", 66 [8] = "Colibri PXA270 312MHz", 67 [9] = "Colibri PXA270 520MHz", 68 [10] = "Colibri VF50 128MB", /* not currently on sale */ 69 [11] = "Colibri VF61 256MB", 70 [12] = "Colibri VF61 256MB IT", 71 [13] = "Colibri VF50 128MB IT", 72 [14] = "Colibri iMX6 Solo 256MB", 73 [15] = "Colibri iMX6 DualLite 512MB", 74 [16] = "Colibri iMX6 Solo 256MB IT", 75 [17] = "Colibri iMX6 DualLite 512MB IT", 76 [18] = "UNKNOWN MODULE", 77 [19] = "UNKNOWN MODULE", 78 [20] = "Colibri T20 256MB", 79 [21] = "Colibri T20 512MB", 80 [22] = "Colibri T20 512MB IT", 81 [23] = "Colibri T30 1GB", 82 [24] = "Colibri T20 256MB IT", 83 [25] = "Apalis T30 2GB", 84 [26] = "Apalis T30 1GB", 85 [27] = "Apalis iMX6 Quad 1GB", 86 [28] = "Apalis iMX6 Quad 2GB IT", 87 [29] = "Apalis iMX6 Dual 512MB", 88 [30] = "Colibri T30 1GB IT", 89 [31] = "Apalis T30 1GB IT", 90 [32] = "Colibri iMX7 Solo 256MB", 91 [33] = "Colibri iMX7 Dual 512MB", 92 [34] = "Apalis TK1 2GB", 93 [35] = "Apalis iMX6 Dual 1GB IT", 94 [36] = "Colibri iMX6ULL 256MB", 95 [37] = "Apalis iMX8 QuadMax 4GB Wi-Fi / Bluetooth", 96 [38] = "Colibri iMX8X", 97 [39] = "Colibri iMX7 Dual 1GB (eMMC)", 98 [40] = "Colibri iMX6ULL 512MB Wi-Fi / Bluetooth IT", 99 [41] = "Colibri iMX7 Dual 512MB EPDC", 100 [42] = "Apalis TK1 4GB", 101 }; 102 103 #ifdef CONFIG_TDX_CFG_BLOCK_IS_IN_MMC 104 static int tdx_cfg_block_mmc_storage(u8 *config_block, int write) 105 { 106 struct mmc *mmc; 107 int dev = CONFIG_TDX_CFG_BLOCK_DEV; 108 int offset = CONFIG_TDX_CFG_BLOCK_OFFSET; 109 uint part = CONFIG_TDX_CFG_BLOCK_PART; 110 uint blk_start; 111 int ret = 0; 112 113 /* Read production parameter config block from eMMC */ 114 mmc = find_mmc_device(dev); 115 if (!mmc) { 116 puts("No MMC card found\n"); 117 ret = -ENODEV; 118 goto out; 119 } 120 if (part != mmc_get_blk_desc(mmc)->hwpart) { 121 if (blk_select_hwpart_devnum(IF_TYPE_MMC, dev, part)) { 122 puts("MMC partition switch failed\n"); 123 ret = -ENODEV; 124 goto out; 125 } 126 } 127 if (offset < 0) 128 offset += mmc->capacity; 129 blk_start = ALIGN(offset, mmc->write_bl_len) / mmc->write_bl_len; 130 131 if (!write) { 132 /* Careful reads a whole block of 512 bytes into config_block */ 133 if (blk_dread(mmc_get_blk_desc(mmc), blk_start, 1, 134 (unsigned char *)config_block) != 1) { 135 ret = -EIO; 136 goto out; 137 } 138 } else { 139 /* Just writing one 512 byte block */ 140 if (blk_dwrite(mmc_get_blk_desc(mmc), blk_start, 1, 141 (unsigned char *)config_block) != 1) { 142 ret = -EIO; 143 goto out; 144 } 145 } 146 147 out: 148 /* Switch back to regular eMMC user partition */ 149 blk_select_hwpart_devnum(IF_TYPE_MMC, 0, 0); 150 151 return ret; 152 } 153 #endif 154 155 #ifdef CONFIG_TDX_CFG_BLOCK_IS_IN_NAND 156 static int read_tdx_cfg_block_from_nand(unsigned char *config_block) 157 { 158 size_t size = TDX_CFG_BLOCK_MAX_SIZE; 159 struct mtd_info *mtd = get_nand_dev_by_index(0); 160 161 if (!mtd) 162 return -ENODEV; 163 164 /* Read production parameter config block from NAND page */ 165 return nand_read_skip_bad(mtd, CONFIG_TDX_CFG_BLOCK_OFFSET, 166 &size, NULL, TDX_CFG_BLOCK_MAX_SIZE, 167 config_block); 168 } 169 170 static int write_tdx_cfg_block_to_nand(unsigned char *config_block) 171 { 172 size_t size = TDX_CFG_BLOCK_MAX_SIZE; 173 174 /* Write production parameter config block to NAND page */ 175 return nand_write_skip_bad(get_nand_dev_by_index(0), 176 CONFIG_TDX_CFG_BLOCK_OFFSET, 177 &size, NULL, TDX_CFG_BLOCK_MAX_SIZE, 178 config_block, WITH_WR_VERIFY); 179 } 180 #endif 181 182 #ifdef CONFIG_TDX_CFG_BLOCK_IS_IN_NOR 183 static int read_tdx_cfg_block_from_nor(unsigned char *config_block) 184 { 185 /* Read production parameter config block from NOR flash */ 186 memcpy(config_block, (void *)CONFIG_TDX_CFG_BLOCK_OFFSET, 187 TDX_CFG_BLOCK_MAX_SIZE); 188 return 0; 189 } 190 191 static int write_tdx_cfg_block_to_nor(unsigned char *config_block) 192 { 193 /* Write production parameter config block to NOR flash */ 194 return flash_write((void *)config_block, CONFIG_TDX_CFG_BLOCK_OFFSET, 195 TDX_CFG_BLOCK_MAX_SIZE); 196 } 197 #endif 198 199 int read_tdx_cfg_block(void) 200 { 201 int ret = 0; 202 u8 *config_block = NULL; 203 struct toradex_tag *tag; 204 size_t size = TDX_CFG_BLOCK_MAX_SIZE; 205 int offset; 206 207 /* Allocate RAM area for config block */ 208 config_block = memalign(ARCH_DMA_MINALIGN, size); 209 if (!config_block) { 210 printf("Not enough malloc space available!\n"); 211 return -ENOMEM; 212 } 213 214 memset(config_block, 0, size); 215 216 #if defined(CONFIG_TDX_CFG_BLOCK_IS_IN_MMC) 217 ret = tdx_cfg_block_mmc_storage(config_block, 0); 218 #elif defined(CONFIG_TDX_CFG_BLOCK_IS_IN_NAND) 219 ret = read_tdx_cfg_block_from_nand(config_block); 220 #elif defined(CONFIG_TDX_CFG_BLOCK_IS_IN_NOR) 221 ret = read_tdx_cfg_block_from_nor(config_block); 222 #else 223 ret = -EINVAL; 224 #endif 225 if (ret) 226 goto out; 227 228 /* Expect a valid tag first */ 229 tag = (struct toradex_tag *)config_block; 230 if (tag->flags != TAG_FLAG_VALID || tag->id != TAG_VALID) { 231 valid_cfgblock = false; 232 ret = -EINVAL; 233 goto out; 234 } 235 valid_cfgblock = true; 236 offset = 4; 237 238 while (offset < TDX_CFG_BLOCK_MAX_SIZE) { 239 tag = (struct toradex_tag *)(config_block + offset); 240 offset += 4; 241 if (tag->id == TAG_INVALID) 242 break; 243 244 if (tag->flags == TAG_FLAG_VALID) { 245 switch (tag->id) { 246 case TAG_MAC: 247 memcpy(&tdx_eth_addr, config_block + offset, 248 6); 249 250 /* NIC part of MAC address is serial number */ 251 tdx_serial = ntohl(tdx_eth_addr.nic) >> 8; 252 break; 253 case TAG_HW: 254 memcpy(&tdx_hw_tag, config_block + offset, 8); 255 break; 256 } 257 } 258 259 /* Get to next tag according to current tags length */ 260 offset += tag->len * 4; 261 } 262 263 /* Cap product id to avoid issues with a yet unknown one */ 264 if (tdx_hw_tag.prodid > (sizeof(toradex_modules) / 265 sizeof(toradex_modules[0]))) 266 tdx_hw_tag.prodid = 0; 267 268 out: 269 free(config_block); 270 return ret; 271 } 272 273 static int get_cfgblock_interactive(void) 274 { 275 char message[CONFIG_SYS_CBSIZE]; 276 char *soc; 277 char it = 'n'; 278 int len; 279 280 if (cpu_is_pxa27x()) 281 sprintf(message, "Is the module the 312 MHz version? [y/N] "); 282 else 283 sprintf(message, "Is the module an IT version? [y/N] "); 284 285 len = cli_readline(message); 286 it = console_buffer[0]; 287 288 soc = env_get("soc"); 289 if (!strcmp("mx6", soc)) { 290 #ifdef CONFIG_MACH_TYPE 291 if (it == 'y' || it == 'Y') 292 if (is_cpu_type(MXC_CPU_MX6Q)) 293 tdx_hw_tag.prodid = APALIS_IMX6Q_IT; 294 else 295 tdx_hw_tag.prodid = APALIS_IMX6D_IT; 296 else 297 if (is_cpu_type(MXC_CPU_MX6Q)) 298 tdx_hw_tag.prodid = APALIS_IMX6Q; 299 else 300 tdx_hw_tag.prodid = APALIS_IMX6D; 301 #else 302 if (it == 'y' || it == 'Y') 303 if (is_cpu_type(MXC_CPU_MX6DL)) 304 tdx_hw_tag.prodid = COLIBRI_IMX6DL_IT; 305 else 306 tdx_hw_tag.prodid = COLIBRI_IMX6S_IT; 307 else 308 if (is_cpu_type(MXC_CPU_MX6DL)) 309 tdx_hw_tag.prodid = COLIBRI_IMX6DL; 310 else 311 tdx_hw_tag.prodid = COLIBRI_IMX6S; 312 #endif /* CONFIG_MACH_TYPE */ 313 } else if (!strcmp("imx7d", soc)) { 314 tdx_hw_tag.prodid = COLIBRI_IMX7D; 315 } else if (!strcmp("imx7s", soc)) { 316 tdx_hw_tag.prodid = COLIBRI_IMX7S; 317 } else if (!strcmp("tegra20", soc)) { 318 if (it == 'y' || it == 'Y') 319 if (gd->ram_size == 0x10000000) 320 tdx_hw_tag.prodid = COLIBRI_T20_256MB_IT; 321 else 322 tdx_hw_tag.prodid = COLIBRI_T20_512MB_IT; 323 else 324 if (gd->ram_size == 0x10000000) 325 tdx_hw_tag.prodid = COLIBRI_T20_256MB; 326 else 327 tdx_hw_tag.prodid = COLIBRI_T20_512MB; 328 } else if (cpu_is_pxa27x()) { 329 if (it == 'y' || it == 'Y') 330 tdx_hw_tag.prodid = COLIBRI_PXA270_312MHZ; 331 else 332 tdx_hw_tag.prodid = COLIBRI_PXA270_520MHZ; 333 #ifdef CONFIG_MACH_TYPE 334 } else if (!strcmp("tegra30", soc)) { 335 if (CONFIG_MACH_TYPE == MACH_TYPE_APALIS_T30) { 336 if (it == 'y' || it == 'Y') 337 tdx_hw_tag.prodid = APALIS_T30_IT; 338 else 339 if (gd->ram_size == 0x40000000) 340 tdx_hw_tag.prodid = APALIS_T30_1GB; 341 else 342 tdx_hw_tag.prodid = APALIS_T30_2GB; 343 } else { 344 if (it == 'y' || it == 'Y') 345 tdx_hw_tag.prodid = COLIBRI_T30_IT; 346 else 347 tdx_hw_tag.prodid = COLIBRI_T30; 348 } 349 #endif /* CONFIG_MACH_TYPE */ 350 } else if (!strcmp("tegra124", soc)) { 351 tdx_hw_tag.prodid = APALIS_TK1_2GB; 352 } else if (!strcmp("vf500", soc)) { 353 if (it == 'y' || it == 'Y') 354 tdx_hw_tag.prodid = COLIBRI_VF50_IT; 355 else 356 tdx_hw_tag.prodid = COLIBRI_VF50; 357 } else if (!strcmp("vf610", soc)) { 358 if (it == 'y' || it == 'Y') 359 tdx_hw_tag.prodid = COLIBRI_VF61_IT; 360 else 361 tdx_hw_tag.prodid = COLIBRI_VF61; 362 } else { 363 printf("Module type not detectable due to unknown SoC\n"); 364 return -1; 365 } 366 367 while (len < 4) { 368 sprintf(message, "Enter the module version (e.g. V1.1B): V"); 369 len = cli_readline(message); 370 } 371 372 tdx_hw_tag.ver_major = console_buffer[0] - '0'; 373 tdx_hw_tag.ver_minor = console_buffer[2] - '0'; 374 tdx_hw_tag.ver_assembly = console_buffer[3] - 'A'; 375 376 if (cpu_is_pxa27x() && (tdx_hw_tag.ver_major == 1)) 377 tdx_hw_tag.prodid -= (COLIBRI_PXA270_312MHZ - 378 COLIBRI_PXA270_V1_312MHZ); 379 380 while (len < 8) { 381 sprintf(message, "Enter module serial number: "); 382 len = cli_readline(message); 383 } 384 385 tdx_serial = simple_strtoul(console_buffer, NULL, 10); 386 387 return 0; 388 } 389 390 static int get_cfgblock_barcode(char *barcode) 391 { 392 if (strlen(barcode) < 16) { 393 printf("Argument too short, barcode is 16 chars long\n"); 394 return -1; 395 } 396 397 /* Get hardware information from the first 8 digits */ 398 tdx_hw_tag.ver_major = barcode[4] - '0'; 399 tdx_hw_tag.ver_minor = barcode[5] - '0'; 400 tdx_hw_tag.ver_assembly = barcode[7] - '0'; 401 402 barcode[4] = '\0'; 403 tdx_hw_tag.prodid = simple_strtoul(barcode, NULL, 10); 404 405 /* Parse second part of the barcode (serial number */ 406 barcode += 8; 407 tdx_serial = simple_strtoul(barcode, NULL, 10); 408 409 return 0; 410 } 411 412 static int do_cfgblock_create(cmd_tbl_t *cmdtp, int flag, int argc, 413 char * const argv[]) 414 { 415 u8 *config_block; 416 struct toradex_tag *tag; 417 size_t size = TDX_CFG_BLOCK_MAX_SIZE; 418 int offset = 0; 419 int ret = CMD_RET_SUCCESS; 420 int err; 421 422 /* Allocate RAM area for config block */ 423 config_block = memalign(ARCH_DMA_MINALIGN, size); 424 if (!config_block) { 425 printf("Not enough malloc space available!\n"); 426 return CMD_RET_FAILURE; 427 } 428 429 memset(config_block, 0xff, size); 430 431 read_tdx_cfg_block(); 432 if (valid_cfgblock) { 433 #if defined(CONFIG_TDX_CFG_BLOCK_IS_IN_NAND) 434 /* 435 * On NAND devices, recreation is only allowed if the page is 436 * empty (config block invalid...) 437 */ 438 printf("NAND erase block %d need to be erased before creating a Toradex config block\n", 439 CONFIG_TDX_CFG_BLOCK_OFFSET / 440 get_nand_dev_by_index(0)->erasesize); 441 goto out; 442 #elif defined(CONFIG_TDX_CFG_BLOCK_IS_IN_NOR) 443 /* 444 * On NOR devices, recreation is only allowed if the sector is 445 * empty and write protection is off (config block invalid...) 446 */ 447 printf("NOR sector at offset 0x%02x need to be erased and unprotected before creating a Toradex config block\n", 448 CONFIG_TDX_CFG_BLOCK_OFFSET); 449 goto out; 450 #else 451 char message[CONFIG_SYS_CBSIZE]; 452 sprintf(message, 453 "A valid Toradex config block is present, still recreate? [y/N] "); 454 455 if (!cli_readline(message)) 456 goto out; 457 458 if (console_buffer[0] != 'y' && console_buffer[0] != 'Y') 459 goto out; 460 #endif 461 } 462 463 /* Parse new Toradex config block data... */ 464 if (argc < 3) 465 err = get_cfgblock_interactive(); 466 else 467 err = get_cfgblock_barcode(argv[2]); 468 469 if (err) { 470 ret = CMD_RET_FAILURE; 471 goto out; 472 } 473 474 /* Convert serial number to MAC address (the storage format) */ 475 tdx_eth_addr.oui = htonl(0x00142dUL << 8); 476 tdx_eth_addr.nic = htonl(tdx_serial << 8); 477 478 /* Valid Tag */ 479 tag = (struct toradex_tag *)config_block; 480 tag->id = TAG_VALID; 481 tag->flags = TAG_FLAG_VALID; 482 tag->len = 0; 483 offset += 4; 484 485 /* Product Tag */ 486 tag = (struct toradex_tag *)(config_block + offset); 487 tag->id = TAG_HW; 488 tag->flags = TAG_FLAG_VALID; 489 tag->len = 2; 490 offset += 4; 491 492 memcpy(config_block + offset, &tdx_hw_tag, 8); 493 offset += 8; 494 495 /* MAC Tag */ 496 tag = (struct toradex_tag *)(config_block + offset); 497 tag->id = TAG_MAC; 498 tag->flags = TAG_FLAG_VALID; 499 tag->len = 2; 500 offset += 4; 501 502 memcpy(config_block + offset, &tdx_eth_addr, 6); 503 offset += 6; 504 memset(config_block + offset, 0, 32 - offset); 505 506 #if defined(CONFIG_TDX_CFG_BLOCK_IS_IN_MMC) 507 err = tdx_cfg_block_mmc_storage(config_block, 1); 508 #elif defined(CONFIG_TDX_CFG_BLOCK_IS_IN_NAND) 509 err = write_tdx_cfg_block_to_nand(config_block); 510 #elif defined(CONFIG_TDX_CFG_BLOCK_IS_IN_NOR) 511 err = write_tdx_cfg_block_to_nor(config_block); 512 #else 513 err = -EINVAL; 514 #endif 515 if (err) { 516 printf("Failed to write Toradex config block: %d\n", ret); 517 ret = CMD_RET_FAILURE; 518 goto out; 519 } 520 521 printf("Toradex config block successfully written\n"); 522 523 out: 524 free(config_block); 525 return ret; 526 } 527 528 static int do_cfgblock(cmd_tbl_t *cmdtp, int flag, int argc, 529 char * const argv[]) 530 { 531 int ret; 532 533 if (argc < 2) 534 return CMD_RET_USAGE; 535 536 if (!strcmp(argv[1], "create")) { 537 return do_cfgblock_create(cmdtp, flag, argc, argv); 538 } else if (!strcmp(argv[1], "reload")) { 539 ret = read_tdx_cfg_block(); 540 if (ret) { 541 printf("Failed to reload Toradex config block: %d\n", 542 ret); 543 return CMD_RET_FAILURE; 544 } 545 return CMD_RET_SUCCESS; 546 } 547 548 return CMD_RET_USAGE; 549 } 550 551 U_BOOT_CMD( 552 cfgblock, 3, 0, do_cfgblock, 553 "Toradex config block handling commands", 554 "create [barcode] - (Re-)create Toradex config block\n" 555 "cfgblock reload - Reload Toradex config block from flash" 556 ); 557