1 // SPDX-License-Identifier: GPL-2.0+ OR BSD-3-Clause
3 * Copyright (C) 2020, STMicroelectronics - All Rights Reserved
12 #include <dm/uclass.h>
13 #include <jffs2/load_kernel.h>
14 #include <linux/list.h>
15 #include <linux/list_sort.h>
16 #include <linux/mtd/mtd.h>
17 #include <linux/sizes.h>
19 #include "stm32prog.h"
21 /* Primary GPT header size for 128 entries : 17kB = 34 LBA of 512B */
22 #define GPT_HEADER_SZ 34
24 #define OPT_SELECT BIT(0)
25 #define OPT_EMPTY BIT(1)
27 #define IS_SELECT(part) ((part)->option & OPT_SELECT)
28 #define IS_EMPTY(part) ((part)->option & OPT_EMPTY)
30 #define ALT_BUF_LEN SZ_1K
32 #define ROOTFS_MMC0_UUID \
33 EFI_GUID(0xE91C4E10, 0x16E6, 0x4C0E, \
34 0xBD, 0x0E, 0x77, 0xBE, 0xCF, 0x4A, 0x35, 0x82)
36 #define ROOTFS_MMC1_UUID \
37 EFI_GUID(0x491F6117, 0x415D, 0x4F53, \
38 0x88, 0xC9, 0x6E, 0x0D, 0xE5, 0x4D, 0xEA, 0xC6)
40 #define ROOTFS_MMC2_UUID \
41 EFI_GUID(0xFD58F1C7, 0xBE0D, 0x4338, \
42 0x88, 0xE9, 0xAD, 0x8F, 0x05, 0x0A, 0xEB, 0x18)
44 /* RAW parttion (binary / bootloader) used Linux - reserved UUID */
45 #define LINUX_RESERVED_UUID "8DA63339-0007-60C0-C436-083AC8230908"
48 * unique partition guid (uuid) for partition named "rootfs"
49 * on each MMC instance = SD Card or eMMC
50 * allow fixed kernel bootcmd: "rootf=PARTUID=e91c4e10-..."
52 static const efi_guid_t uuid_mmc[3] = {
58 DECLARE_GLOBAL_DATA_PTR;
60 /* order of column in flash layout file */
61 enum stm32prog_col_t {
71 /* partition handling routines : CONFIG_CMD_MTDPARTS */
72 int mtdparts_init(void);
73 int find_dev_and_part(const char *id, struct mtd_device **dev,
74 u8 *part_num, struct part_info **part);
76 char *stm32prog_get_error(struct stm32prog_data *data)
78 static const char error_msg[] = "Unspecified";
80 if (strlen(data->error) == 0)
81 strcpy(data->error, error_msg);
86 u8 stm32prog_header_check(struct raw_header_s *raw_header,
87 struct image_header_s *header)
92 header->image_checksum = 0x0;
93 header->image_length = 0x0;
95 if (!raw_header || !header) {
96 pr_debug("%s:no header data\n", __func__);
99 if (raw_header->magic_number !=
100 (('S' << 0) | ('T' << 8) | ('M' << 16) | (0x32 << 24))) {
101 pr_debug("%s:invalid magic number : 0x%x\n",
102 __func__, raw_header->magic_number);
105 /* only header v1.0 supported */
106 if (raw_header->header_version != 0x00010000) {
107 pr_debug("%s:invalid header version : 0x%x\n",
108 __func__, raw_header->header_version);
111 if (raw_header->reserved1 != 0x0 || raw_header->reserved2) {
112 pr_debug("%s:invalid reserved field\n", __func__);
115 for (i = 0; i < (sizeof(raw_header->padding) / 4); i++) {
116 if (raw_header->padding[i] != 0) {
117 pr_debug("%s:invalid padding field\n", __func__);
122 header->image_checksum = le32_to_cpu(raw_header->image_checksum);
123 header->image_length = le32_to_cpu(raw_header->image_length);
128 static u32 stm32prog_header_checksum(u32 addr, struct image_header_s *header)
133 /* compute checksum on payload */
134 payload = (u8 *)addr;
136 for (i = header->image_length; i > 0; i--)
137 checksum += *(payload++);
142 /* FLASHLAYOUT PARSING *****************************************/
143 static int parse_option(struct stm32prog_data *data,
144 int i, char *p, struct stm32prog_part_t *part)
156 part->option |= OPT_SELECT;
159 part->option |= OPT_EMPTY;
163 stm32prog_err("Layout line %d: invalid option '%c' in %s)",
169 if (!(part->option & OPT_SELECT)) {
170 stm32prog_err("Layout line %d: missing 'P' in option %s", i, p);
177 static int parse_id(struct stm32prog_data *data,
178 int i, char *p, struct stm32prog_part_t *part)
183 result = strict_strtoul(p, 0, &value);
185 if (result || value > PHASE_LAST_USER) {
186 stm32prog_err("Layout line %d: invalid phase value = %s", i, p);
193 static int parse_name(struct stm32prog_data *data,
194 int i, char *p, struct stm32prog_part_t *part)
198 if (strlen(p) < sizeof(part->name)) {
199 strcpy(part->name, p);
201 stm32prog_err("Layout line %d: partition name too long [%d]: %s",
209 static int parse_type(struct stm32prog_data *data,
210 int i, char *p, struct stm32prog_part_t *part)
216 if (!strncmp(p, "Binary", 6)) {
217 part->part_type = PART_BINARY;
219 /* search for Binary(X) case */
229 simple_strtoul(&p[7], NULL, 10);
231 } else if (!strcmp(p, "System")) {
232 part->part_type = PART_SYSTEM;
233 } else if (!strcmp(p, "FileSystem")) {
234 part->part_type = PART_FILESYSTEM;
235 } else if (!strcmp(p, "RawImage")) {
236 part->part_type = RAW_IMAGE;
241 stm32prog_err("Layout line %d: type parsing error : '%s'",
247 static int parse_ip(struct stm32prog_data *data,
248 int i, char *p, struct stm32prog_part_t *part)
251 unsigned int len = 0;
254 if (!strcmp(p, "none")) {
255 part->target = STM32PROG_NONE;
256 } else if (!strncmp(p, "mmc", 3)) {
257 part->target = STM32PROG_MMC;
259 } else if (!strncmp(p, "nor", 3)) {
260 part->target = STM32PROG_NOR;
262 } else if (!strncmp(p, "nand", 4)) {
263 part->target = STM32PROG_NAND;
265 } else if (!strncmp(p, "spi-nand", 8)) {
266 part->target = STM32PROG_SPI_NAND;
272 /* only one digit allowed for device id */
273 if (strlen(p) != len + 1) {
276 part->dev_id = p[len] - '0';
277 if (part->dev_id > 9)
282 stm32prog_err("Layout line %d: ip parsing error: '%s'", i, p);
287 static int parse_offset(struct stm32prog_data *data,
288 int i, char *p, struct stm32prog_part_t *part)
296 /* eMMC boot parttion */
297 if (!strncmp(p, "boot", 4)) {
298 if (strlen(p) != 5) {
303 else if (p[4] == '2')
309 stm32prog_err("Layout line %d: invalid part '%s'",
312 part->addr = simple_strtoull(p, &tail, 0);
313 if (tail == p || *tail != '\0') {
314 stm32prog_err("Layout line %d: invalid offset '%s'",
324 int (* const parse[COL_NB_STM32])(struct stm32prog_data *data, int i, char *p,
325 struct stm32prog_part_t *part) = {
326 [COL_OPTION] = parse_option,
328 [COL_NAME] = parse_name,
329 [COL_TYPE] = parse_type,
331 [COL_OFFSET] = parse_offset,
334 static int parse_flash_layout(struct stm32prog_data *data,
338 int column = 0, part_nb = 0, ret;
339 bool end_of_line, eof;
340 char *p, *start, *last, *col;
341 struct stm32prog_part_t *part;
347 /* check if STM32image is detected */
348 if (!stm32prog_header_check((struct raw_header_s *)addr,
352 addr = addr + BL_HEADER_SIZE;
353 size = data->header.image_length;
355 checksum = stm32prog_header_checksum(addr, &data->header);
356 if (checksum != data->header.image_checksum) {
357 stm32prog_err("Layout: invalid checksum : 0x%x expected 0x%x",
358 checksum, data->header.image_checksum);
365 start = (char *)addr;
368 *last = 0x0; /* force null terminated string */
369 pr_debug("flash layout =\n%s\n", start);
371 /* calculate expected number of partitions */
374 while (*p && (p < last)) {
377 if (p < last && *p == '#')
381 if (part_list_size > PHASE_LAST_USER) {
382 stm32prog_err("Layout: too many partition (%d)",
386 part = calloc(sizeof(struct stm32prog_part_t), part_list_size);
388 stm32prog_err("Layout: alloc failed");
391 data->part_array = part;
393 /* main parsing loop */
397 col = start; /* 1st column */
401 /* CR is ignored and replaced by NULL character */
416 /* comment line is skipped */
417 if (column == 0 && p == col) {
418 while ((p < last) && *p)
423 if (p >= last || !*p) {
430 /* by default continue with the next character */
436 /* replace by \0: allow string parsing for each column */
444 /* skip empty line and multiple TAB in tsv file */
445 if (strlen(col) == 0) {
447 /* skip empty line */
448 if (column == 0 && end_of_line) {
455 if (column < COL_NB_STM32) {
456 ret = parse[column](data, i, col, part);
461 /* save the beginning of the next column */
468 /* end of the line detected */
471 if (column < COL_NB_STM32) {
472 stm32prog_err("Layout line %d: no enought column", i);
479 if (part_nb >= part_list_size) {
482 stm32prog_err("Layout: no enought memory for %d part",
488 data->part_nb = part_nb;
489 if (data->part_nb == 0) {
490 stm32prog_err("Layout: no partition found");
497 static int __init part_cmp(void *priv, struct list_head *a, struct list_head *b)
499 struct stm32prog_part_t *parta, *partb;
501 parta = container_of(a, struct stm32prog_part_t, list);
502 partb = container_of(b, struct stm32prog_part_t, list);
504 if (parta->part_id != partb->part_id)
505 return parta->part_id - partb->part_id;
507 return parta->addr > partb->addr ? 1 : -1;
510 static void get_mtd_by_target(char *string, enum stm32prog_target target,
522 case STM32PROG_SPI_NAND:
523 dev_str = "spi-nand";
529 sprintf(string, "%s%d", dev_str, dev_id);
532 static int init_device(struct stm32prog_data *data,
533 struct stm32prog_dev_t *dev)
535 struct mmc *mmc = NULL;
536 struct blk_desc *block_dev = NULL;
538 struct mtd_info *mtd = NULL;
543 u64 first_addr = 0, last_addr = 0;
544 struct stm32prog_part_t *part, *next_part;
545 u64 part_addr, part_size;
547 const char *part_name;
549 switch (dev->target) {
552 mmc = find_mmc_device(dev->dev_id);
554 stm32prog_err("mmc device %d not found", dev->dev_id);
557 block_dev = mmc_get_blk_desc(mmc);
559 stm32prog_err("mmc device %d not probed", dev->dev_id);
562 dev->erase_size = mmc->erase_grp_size * block_dev->blksz;
565 /* reserve a full erase group for each GTP headers */
566 if (mmc->erase_grp_size > GPT_HEADER_SZ) {
567 first_addr = dev->erase_size;
568 last_addr = (u64)(block_dev->lba -
569 mmc->erase_grp_size) *
572 first_addr = (u64)GPT_HEADER_SZ * block_dev->blksz;
573 last_addr = (u64)(block_dev->lba - GPT_HEADER_SZ - 1) *
576 pr_debug("MMC %d: lba=%ld blksz=%ld\n", dev->dev_id,
577 block_dev->lba, block_dev->blksz);
578 pr_debug(" available address = 0x%llx..0x%llx\n",
579 first_addr, last_addr);
580 pr_debug(" full_update = %d\n", dev->full_update);
586 case STM32PROG_SPI_NAND:
587 get_mtd_by_target(mtd_id, dev->target, dev->dev_id);
588 pr_debug("%s\n", mtd_id);
591 mtd = get_mtd_device_nm(mtd_id);
593 stm32prog_err("MTD device %s not found", mtd_id);
597 last_addr = mtd->size;
598 dev->erase_size = mtd->erasesize;
599 pr_debug("MTD device %s: size=%lld erasesize=%d\n",
600 mtd_id, mtd->size, mtd->erasesize);
601 pr_debug(" available address = 0x%llx..0x%llx\n",
602 first_addr, last_addr);
607 stm32prog_err("unknown device type = %d", dev->target);
610 pr_debug(" erase size = 0x%x\n", dev->erase_size);
611 pr_debug(" full_update = %d\n", dev->full_update);
613 /* order partition list in offset order */
614 list_sort(NULL, &dev->part_list, &part_cmp);
616 pr_debug("id : Opt Phase Name target.n dev.n addr size part_off part_size\n");
617 list_for_each_entry(part, &dev->part_list, list) {
618 if (part->bin_nb > 1) {
619 if ((dev->target != STM32PROG_NAND &&
620 dev->target != STM32PROG_SPI_NAND) ||
621 part->id >= PHASE_FIRST_USER ||
622 strncmp(part->name, "fsbl", 4)) {
623 stm32prog_err("%s (0x%x): multiple binary %d not supported",
624 part->name, part->id,
629 if (part->part_type == RAW_IMAGE) {
633 part->size = block_dev->lba * block_dev->blksz;
635 part->size = last_addr;
636 pr_debug("-- : %1d %02x %14s %02d.%d %02d.%02d %08llx %08llx\n",
637 part->option, part->id, part->name,
638 part->part_type, part->bin_nb, part->target,
639 part->dev_id, part->addr, part->size);
642 if (part->part_id < 0) { /* boot hw partition for eMMC */
644 part->size = mmc->capacity_boot;
646 stm32prog_err("%s (0x%x): hw partition not expected : %d",
647 part->name, part->id,
652 part->part_id = part_id++;
654 /* last partition : size to the end of the device */
655 if (part->list.next != &dev->part_list) {
657 container_of(part->list.next,
658 struct stm32prog_part_t,
660 if (part->addr < next_part->addr) {
661 part->size = next_part->addr -
664 stm32prog_err("%s (0x%x): same address : 0x%llx == %s (0x%x): 0x%llx",
665 part->name, part->id,
673 if (part->addr <= last_addr) {
674 part->size = last_addr - part->addr;
676 stm32prog_err("%s (0x%x): invalid address 0x%llx (max=0x%llx)",
677 part->name, part->id,
678 part->addr, last_addr);
682 if (part->addr < first_addr) {
683 stm32prog_err("%s (0x%x): invalid address 0x%llx (min=0x%llx)",
684 part->name, part->id,
685 part->addr, first_addr);
689 if ((part->addr & ((u64)part->dev->erase_size - 1)) != 0) {
690 stm32prog_err("%s (0x%x): not aligned address : 0x%llx on erase size 0x%x",
691 part->name, part->id, part->addr,
692 part->dev->erase_size);
695 pr_debug("%02d : %1d %02x %14s %02d.%d %02d.%02d %08llx %08llx",
696 part->part_id, part->option, part->id, part->name,
697 part->part_type, part->bin_nb, part->target,
698 part->dev_id, part->addr, part->size);
704 /* check coherency with existing partition */
707 * block devices with GPT: check user partition size
708 * only for partial update, the GPT partions are be
709 * created for full update
711 if (dev->full_update || part->part_id < 0) {
715 disk_partition_t partinfo;
717 ret = part_get_info(block_dev, part->part_id,
721 stm32prog_err("%s (0x%x):Couldn't find part %d on device mmc %d",
722 part->name, part->id,
723 part_id, part->dev_id);
726 part_addr = (u64)partinfo.start * partinfo.blksz;
727 part_size = (u64)partinfo.size * partinfo.blksz;
728 part_name = (char *)partinfo.name;
734 char mtd_part_id[32];
735 struct part_info *mtd_part;
736 struct mtd_device *mtd_dev;
739 sprintf(mtd_part_id, "%s,%d", mtd_id,
741 ret = find_dev_and_part(mtd_part_id, &mtd_dev,
742 &part_num, &mtd_part);
744 stm32prog_err("%s (0x%x): Invalid MTD partition %s",
745 part->name, part->id,
749 part_addr = mtd_part->offset;
750 part_size = mtd_part->size;
751 part_name = mtd_part->name;
756 stm32prog_err("%s (0x%x): Invalid partition",
757 part->name, part->id);
762 pr_debug(" %08llx %08llx\n", part_addr, part_size);
764 if (part->addr != part_addr) {
765 stm32prog_err("%s (0x%x): Bad address for partition %d (%s) = 0x%llx <> 0x%llx expected",
766 part->name, part->id, part->part_id,
767 part_name, part->addr, part_addr);
770 if (part->size != part_size) {
771 stm32prog_err("%s (0x%x): Bad size for partition %d (%s) at 0x%llx = 0x%llx <> 0x%llx expected",
772 part->name, part->id, part->part_id,
773 part_name, part->addr, part->size,
781 static int treat_partition_list(struct stm32prog_data *data)
784 struct stm32prog_part_t *part;
786 for (j = 0; j < STM32PROG_MAX_DEV; j++) {
787 data->dev[j].target = STM32PROG_NONE;
788 INIT_LIST_HEAD(&data->dev[j].part_list);
791 data->tee_detected = false;
792 data->fsbl_nor_detected = false;
793 for (i = 0; i < data->part_nb; i++) {
794 part = &data->part_array[i];
797 /* skip partition with IP="none" */
798 if (part->target == STM32PROG_NONE) {
799 if (IS_SELECT(part)) {
800 stm32prog_err("Layout: selected none phase = 0x%x",
807 if (part->id == PHASE_FLASHLAYOUT ||
808 part->id > PHASE_LAST_USER) {
809 stm32prog_err("Layout: invalid phase = 0x%x",
813 for (j = i + 1; j < data->part_nb; j++) {
814 if (part->id == data->part_array[j].id) {
815 stm32prog_err("Layout: duplicated phase 0x%x at line %d and %d",
820 for (j = 0; j < STM32PROG_MAX_DEV; j++) {
821 if (data->dev[j].target == STM32PROG_NONE) {
822 /* new device found */
823 data->dev[j].target = part->target;
824 data->dev[j].dev_id = part->dev_id;
825 data->dev[j].full_update = true;
828 } else if ((part->target == data->dev[j].target) &&
829 (part->dev_id == data->dev[j].dev_id)) {
833 if (j == STM32PROG_MAX_DEV) {
834 stm32prog_err("Layout: too many device");
837 switch (part->target) {
839 if (!data->fsbl_nor_detected &&
840 !strncmp(part->name, "fsbl", 4))
841 data->fsbl_nor_detected = true;
844 case STM32PROG_SPI_NAND:
845 if (!data->tee_detected &&
846 !strncmp(part->name, "tee", 3))
847 data->tee_detected = true;
852 part->dev = &data->dev[j];
853 if (!IS_SELECT(part))
854 part->dev->full_update = false;
855 list_add_tail(&part->list, &data->dev[j].part_list);
861 static int create_partitions(struct stm32prog_data *data)
865 const int buflen = SZ_8K;
867 char uuid[UUID_STR_LEN + 1];
868 unsigned char *uuid_bin;
872 struct stm32prog_part_t *part;
874 buf = malloc(buflen);
878 puts("partitions : ");
879 /* initialize the selected device */
880 for (i = 0; i < data->dev_nb; i++) {
881 /* create gpt partition support only for full update on MMC */
882 if (data->dev[i].target != STM32PROG_MMC ||
883 !data->dev[i].full_update)
887 rootfs_found = false;
888 memset(buf, 0, buflen);
890 list_for_each_entry(part, &data->dev[i].part_list, list) {
891 /* skip eMMC boot partitions */
892 if (part->part_id < 0)
895 if (part->part_type == RAW_IMAGE)
898 if (offset + 100 > buflen) {
899 pr_debug("\n%s: buffer too small, %s skippped",
900 __func__, part->name);
905 offset += sprintf(buf, "gpt write mmc %d \"",
906 data->dev[i].dev_id);
908 offset += snprintf(buf + offset, buflen - offset,
909 "name=%s,start=0x%llx,size=0x%llx",
914 if (part->part_type == PART_BINARY)
915 offset += snprintf(buf + offset,
918 LINUX_RESERVED_UUID);
920 offset += snprintf(buf + offset,
924 if (part->part_type == PART_SYSTEM)
925 offset += snprintf(buf + offset,
929 if (!rootfs_found && !strcmp(part->name, "rootfs")) {
930 mmc_id = part->dev_id;
932 if (mmc_id < ARRAY_SIZE(uuid_mmc)) {
934 (unsigned char *)uuid_mmc[mmc_id].b;
935 uuid_bin_to_str(uuid_bin, uuid,
936 UUID_STR_FORMAT_GUID);
937 offset += snprintf(buf + offset,
943 offset += snprintf(buf + offset, buflen - offset, ";");
947 offset += snprintf(buf + offset, buflen - offset, "\"");
948 pr_debug("\ncmd: %s\n", buf);
949 if (run_command(buf, 0)) {
950 stm32prog_err("GPT partitionning fail: %s",
958 if (data->dev[i].mmc)
959 part_init(mmc_get_blk_desc(data->dev[i].mmc));
962 sprintf(buf, "gpt verify mmc %d", data->dev[i].dev_id);
963 pr_debug("\ncmd: %s", buf);
964 if (run_command(buf, 0))
969 sprintf(buf, "part list mmc %d", data->dev[i].dev_id);
976 run_command("mtd list", 0);
984 static int stm32prog_alt_add(struct stm32prog_data *data,
985 struct dfu_entity *dfu,
986 struct stm32prog_part_t *part)
992 char buf[ALT_BUF_LEN];
994 char multiplier, type;
996 /* max 3 digit for sector size */
997 if (part->size > SZ_1M) {
998 size = (u32)(part->size / SZ_1M);
1000 } else if (part->size > SZ_1K) {
1001 size = (u32)(part->size / SZ_1K);
1004 size = (u32)part->size;
1007 if (IS_SELECT(part) && !IS_EMPTY(part))
1008 type = 'e'; /*Readable and Writeable*/
1010 type = 'a';/*Readable*/
1012 memset(buf, 0, sizeof(buf));
1013 offset = snprintf(buf, ALT_BUF_LEN - offset,
1014 "@%s/0x%02x/1*%d%c%c ",
1015 part->name, part->id,
1016 size, multiplier, type);
1018 if (part->part_type == RAW_IMAGE) {
1021 if (part->dev->target == STM32PROG_MMC)
1022 dfu_size = part->size / part->dev->mmc->read_bl_len;
1024 dfu_size = part->size;
1025 offset += snprintf(buf + offset, ALT_BUF_LEN - offset,
1026 "raw 0x0 0x%llx", dfu_size);
1027 } else if (part->part_id < 0) {
1028 u64 nb_blk = part->size / part->dev->mmc->read_bl_len;
1030 offset += snprintf(buf + offset, ALT_BUF_LEN - offset,
1031 "raw 0x%llx 0x%llx",
1032 part->addr, nb_blk);
1033 offset += snprintf(buf + offset, ALT_BUF_LEN - offset,
1034 " mmcpart %d;", -(part->part_id));
1036 if (part->part_type == PART_SYSTEM &&
1037 (part->target == STM32PROG_NAND ||
1038 part->target == STM32PROG_NOR ||
1039 part->target == STM32PROG_SPI_NAND))
1040 offset += snprintf(buf + offset,
1041 ALT_BUF_LEN - offset,
1044 offset += snprintf(buf + offset,
1045 ALT_BUF_LEN - offset,
1047 /* dev_id requested by DFU MMC */
1048 if (part->target == STM32PROG_MMC)
1049 offset += snprintf(buf + offset, ALT_BUF_LEN - offset,
1050 " %d", part->dev_id);
1051 offset += snprintf(buf + offset, ALT_BUF_LEN - offset,
1052 " %d;", part->part_id);
1054 switch (part->target) {
1057 sprintf(dfustr, "mmc");
1058 sprintf(devstr, "%d", part->dev_id);
1062 case STM32PROG_NAND:
1064 case STM32PROG_SPI_NAND:
1065 sprintf(dfustr, "mtd");
1066 get_mtd_by_target(devstr, part->target, part->dev_id);
1070 stm32prog_err("invalid target: %d", part->target);
1073 pr_debug("dfu_alt_add(%s,%s,%s)\n", dfustr, devstr, buf);
1074 ret = dfu_alt_add(dfu, dfustr, devstr, buf);
1075 pr_debug("dfu_alt_add(%s,%s,%s) result %d\n",
1076 dfustr, devstr, buf, ret);
1081 static int stm32prog_alt_add_virt(struct dfu_entity *dfu,
1082 char *name, int phase, int size)
1086 char buf[ALT_BUF_LEN];
1088 sprintf(devstr, "%d", phase);
1089 sprintf(buf, "@%s/0x%02x/1*%dBe", name, phase, size);
1090 ret = dfu_alt_add(dfu, "virt", devstr, buf);
1091 pr_debug("dfu_alt_add(virt,%s,%s) result %d\n", devstr, buf, ret);
1096 static int dfu_init_entities(struct stm32prog_data *data)
1099 int phase, i, alt_id;
1100 struct stm32prog_part_t *part;
1101 struct dfu_entity *dfu;
1104 alt_nb = 1; /* number of virtual = CMD */
1105 if (data->part_nb == 0)
1106 alt_nb++; /* +1 for FlashLayout */
1108 for (i = 0; i < data->part_nb; i++) {
1109 if (data->part_array[i].target != STM32PROG_NONE)
1113 if (dfu_alt_init(alt_nb, &dfu))
1116 puts("DFU alt info setting: ");
1117 if (data->part_nb) {
1120 (phase <= PHASE_LAST_USER) &&
1121 (alt_id < alt_nb) && !ret;
1123 /* ordering alt setting by phase id */
1125 for (i = 0; i < data->part_nb; i++) {
1126 if (phase == data->part_array[i].id) {
1127 part = &data->part_array[i];
1133 if (part->target == STM32PROG_NONE)
1135 part->alt_id = alt_id;
1138 ret = stm32prog_alt_add(data, dfu, part);
1141 char buf[ALT_BUF_LEN];
1143 sprintf(buf, "@FlashLayout/0x%02x/1*256Ke ram %x 40000",
1144 PHASE_FLASHLAYOUT, STM32_DDR_BASE);
1145 ret = dfu_alt_add(dfu, "ram", NULL, buf);
1146 pr_debug("dfu_alt_add(ram, NULL,%s) result %d\n", buf, ret);
1150 ret = stm32prog_alt_add_virt(dfu, "virtual", PHASE_CMD, 512);
1153 stm32prog_err("dfu init failed: %d", ret);
1157 dfu_show_entities();
1162 /* copy FSBL on NAND to improve reliability on NAND */
1163 static int stm32prog_copy_fsbl(struct stm32prog_part_t *part)
1167 struct image_header_s header;
1168 struct raw_header_s raw_header;
1169 struct dfu_entity *dfu;
1172 if (part->target != STM32PROG_NAND &&
1173 part->target != STM32PROG_SPI_NAND)
1176 dfu = dfu_get_entity(part->alt_id);
1179 dfu_transaction_cleanup(dfu);
1180 size = BL_HEADER_SIZE;
1181 ret = dfu->read_medium(dfu, 0, (void *)&raw_header, &size);
1184 if (stm32prog_header_check(&raw_header, &header))
1187 /* read header + payload */
1188 size = header.image_length + BL_HEADER_SIZE;
1189 size = round_up(size, part->dev->mtd->erasesize);
1190 fsbl = calloc(1, size);
1193 ret = dfu->read_medium(dfu, 0, fsbl, &size);
1194 pr_debug("%s read size=%lx ret=%d\n", __func__, size, ret);
1198 dfu_transaction_cleanup(dfu);
1200 for (i = part->bin_nb - 1; i > 0; i--) {
1202 /* write to the next erase block */
1203 ret = dfu->write_medium(dfu, offset, fsbl, &size);
1204 pr_debug("%s copy at ofset=%lx size=%lx ret=%d",
1205 __func__, offset, size, ret);
1215 static void stm32prog_end_phase(struct stm32prog_data *data)
1217 if (data->phase == PHASE_FLASHLAYOUT) {
1218 if (parse_flash_layout(data, STM32_DDR_BASE, 0))
1219 stm32prog_err("Layout: invalid FlashLayout");
1223 if (!data->cur_part)
1226 if (CONFIG_IS_ENABLED(MMC) &&
1227 data->cur_part->part_id < 0) {
1230 sprintf(cmdbuf, "mmc bootbus %d 0 0 0; mmc partconf %d 1 %d 0",
1231 data->cur_part->dev_id, data->cur_part->dev_id,
1232 -(data->cur_part->part_id));
1233 if (run_command(cmdbuf, 0)) {
1234 stm32prog_err("commands '%s' failed", cmdbuf);
1239 if (CONFIG_IS_ENABLED(MTD) &&
1240 data->cur_part->bin_nb > 1) {
1241 if (stm32prog_copy_fsbl(data->cur_part)) {
1242 stm32prog_err("%s (0x%x): copy of fsbl failed",
1243 data->cur_part->name, data->cur_part->id);
1249 void stm32prog_do_reset(struct stm32prog_data *data)
1251 if (data->phase == PHASE_RESET) {
1252 data->phase = PHASE_DO_RESET;
1253 puts("Reset requested\n");
1257 void stm32prog_next_phase(struct stm32prog_data *data)
1260 struct stm32prog_part_t *part;
1263 phase = data->phase;
1267 case PHASE_DO_RESET:
1271 /* found next selected partition */
1272 data->cur_part = NULL;
1273 data->phase = PHASE_END;
1277 if (phase > PHASE_LAST_USER)
1279 for (i = 0; i < data->part_nb; i++) {
1280 part = &data->part_array[i];
1281 if (part->id == phase) {
1282 if (IS_SELECT(part) && !IS_EMPTY(part)) {
1283 data->cur_part = part;
1284 data->phase = phase;
1292 if (data->phase == PHASE_END)
1293 puts("Phase=END\n");
1296 static void stm32prog_devices_init(struct stm32prog_data *data)
1301 ret = treat_partition_list(data);
1305 /* initialize the selected device */
1306 for (i = 0; i < data->dev_nb; i++) {
1307 ret = init_device(data, &data->dev[i]);
1312 ret = create_partitions(data);
1322 int stm32prog_dfu_init(struct stm32prog_data *data)
1324 /* init device if no error */
1326 stm32prog_devices_init(data);
1329 stm32prog_next_phase(data);
1331 /* prepare DFU for device read/write */
1332 dfu_free_entities();
1333 return dfu_init_entities(data);
1336 int stm32prog_init(struct stm32prog_data *data, ulong addr, ulong size)
1338 memset(data, 0x0, sizeof(*data));
1339 data->phase = PHASE_FLASHLAYOUT;
1341 return parse_flash_layout(data, addr, size);
1344 void stm32prog_clean(struct stm32prog_data *data)
1347 dfu_free_entities();
1348 free(data->part_array);
1349 free(data->header_data);
1352 /* DFU callback: used after serial and direct DFU USB access */
1353 void dfu_flush_callback(struct dfu_entity *dfu)
1355 if (!stm32prog_data)
1358 if (dfu->dev_type == DFU_DEV_RAM) {
1359 if (dfu->alt == 0 &&
1360 stm32prog_data->phase == PHASE_FLASHLAYOUT) {
1361 stm32prog_end_phase(stm32prog_data);
1362 /* waiting DFU DETACH for reenumeration */
1366 if (!stm32prog_data->cur_part)
1369 if (dfu->alt == stm32prog_data->cur_part->alt_id) {
1370 stm32prog_end_phase(stm32prog_data);
1371 stm32prog_next_phase(stm32prog_data);
1375 void dfu_initiated_callback(struct dfu_entity *dfu)
1377 if (!stm32prog_data)
1380 if (!stm32prog_data->cur_part)
1383 /* force the saved offset for the current partition */
1384 if (dfu->alt == stm32prog_data->cur_part->alt_id) {
1385 dfu->offset = stm32prog_data->offset;
1386 pr_debug("dfu offset = 0x%llx\n", dfu->offset);