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
tdx_cfg_block_mmc_storage(u8 * config_block,int write)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
read_tdx_cfg_block_from_nand(unsigned char * config_block)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
write_tdx_cfg_block_to_nand(unsigned char * config_block)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
read_tdx_cfg_block_from_nor(unsigned char * config_block)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
write_tdx_cfg_block_to_nor(unsigned char * config_block)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
read_tdx_cfg_block(void)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
get_cfgblock_interactive(void)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
get_cfgblock_barcode(char * barcode)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
do_cfgblock_create(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])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
do_cfgblock(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])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