xref: /openbmc/u-boot/cmd/gpt.c (revision a4670f8e)
1 /*
2  * cmd_gpt.c -- GPT (GUID Partition Table) handling command
3  *
4  * Copyright (C) 2015
5  * Lukasz Majewski <l.majewski@majess.pl>
6  *
7  * Copyright (C) 2012 Samsung Electronics
8  * author: Lukasz Majewski <l.majewski@samsung.com>
9  * author: Piotr Wilczek <p.wilczek@samsung.com>
10  *
11  * SPDX-License-Identifier:	GPL-2.0+
12  */
13 
14 #include <common.h>
15 #include <malloc.h>
16 #include <command.h>
17 #include <part_efi.h>
18 #include <exports.h>
19 #include <linux/ctype.h>
20 #include <div64.h>
21 #include <memalign.h>
22 #include <linux/compat.h>
23 #include <linux/sizes.h>
24 #include <stdlib.h>
25 
26 static LIST_HEAD(disk_partitions);
27 
28 /**
29  * extract_env(): Expand env name from string format '&{env_name}'
30  *                and return pointer to the env (if the env is set)
31  *
32  * @param str - pointer to string
33  * @param env - pointer to pointer to extracted env
34  *
35  * @return - zero on successful expand and env is set
36  */
37 static int extract_env(const char *str, char **env)
38 {
39 	int ret = -1;
40 	char *e, *s;
41 #ifdef CONFIG_RANDOM_UUID
42 	char uuid_str[UUID_STR_LEN + 1];
43 #endif
44 
45 	if (!str || strlen(str) < 4)
46 		return -1;
47 
48 	if (!((strncmp(str, "${", 2) == 0) && (str[strlen(str) - 1] == '}')))
49 		return -1;
50 
51 	s = strdup(str);
52 	if (s == NULL)
53 		return -1;
54 
55 	memset(s + strlen(s) - 1, '\0', 1);
56 	memmove(s, s + 2, strlen(s) - 1);
57 
58 	e = env_get(s);
59 	if (e == NULL) {
60 #ifdef CONFIG_RANDOM_UUID
61 		debug("%s unset. ", str);
62 		gen_rand_uuid_str(uuid_str, UUID_STR_FORMAT_GUID);
63 		env_set(s, uuid_str);
64 
65 		e = env_get(s);
66 		if (e) {
67 			debug("Set to random.\n");
68 			ret = 0;
69 		} else {
70 			debug("Can't get random UUID.\n");
71 		}
72 #else
73 		debug("%s unset.\n", str);
74 #endif
75 	} else {
76 		debug("%s get from environment.\n", str);
77 		ret = 0;
78 	}
79 
80 	*env = e;
81 	free(s);
82 
83 	return ret;
84 }
85 
86 /**
87  * extract_val(): Extract value from a key=value pair list (comma separated).
88  *                Only value for the given key is returend.
89  *                Function allocates memory for the value, remember to free!
90  *
91  * @param str - pointer to string with key=values pairs
92  * @param key - pointer to the key to search for
93  *
94  * @return - pointer to allocated string with the value
95  */
96 static char *extract_val(const char *str, const char *key)
97 {
98 	char *v, *k;
99 	char *s, *strcopy;
100 	char *new = NULL;
101 
102 	strcopy = strdup(str);
103 	if (strcopy == NULL)
104 		return NULL;
105 
106 	s = strcopy;
107 	while (s) {
108 		v = strsep(&s, ",");
109 		if (!v)
110 			break;
111 		k = strsep(&v, "=");
112 		if (!k)
113 			break;
114 		if  (strcmp(k, key) == 0) {
115 			new = strdup(v);
116 			break;
117 		}
118 	}
119 
120 	free(strcopy);
121 
122 	return new;
123 }
124 
125 /**
126  * found_key(): Found key without value in parameter list (comma separated).
127  *
128  * @param str - pointer to string with key
129  * @param key - pointer to the key to search for
130  *
131  * @return - true on found key
132  */
133 static bool found_key(const char *str, const char *key)
134 {
135 	char *k;
136 	char *s, *strcopy;
137 	bool result = false;
138 
139 	strcopy = strdup(str);
140 	if (!strcopy)
141 		return NULL;
142 
143 	s = strcopy;
144 	while (s) {
145 		k = strsep(&s, ",");
146 		if (!k)
147 			break;
148 		if  (strcmp(k, key) == 0) {
149 			result = true;
150 			break;
151 		}
152 	}
153 
154 	free(strcopy);
155 
156 	return result;
157 }
158 
159 static int calc_parts_list_len(int numparts)
160 {
161 	int partlistlen = UUID_STR_LEN + 1 + strlen("uuid_disk=");
162 	/* for the comma */
163 	partlistlen++;
164 
165 	/* per-partition additions; numparts starts at 1, so this should be correct */
166 	partlistlen += numparts * (strlen("name=,") + PART_NAME_LEN + 1);
167 	/* see part.h for definition of struct disk_partition */
168 	partlistlen += numparts * (strlen("start=MiB,") + sizeof(lbaint_t) + 1);
169 	partlistlen += numparts * (strlen("size=MiB,") + sizeof(lbaint_t) + 1);
170 	partlistlen += numparts * (strlen("uuid=;") + UUID_STR_LEN + 1);
171 	/* for the terminating null */
172 	partlistlen++;
173 	debug("Length of partitions_list is %d for %d partitions\n", partlistlen,
174 	      numparts);
175 	return partlistlen;
176 }
177 
178 #ifdef CONFIG_CMD_GPT_RENAME
179 static void del_gpt_info(void)
180 {
181 	struct list_head *pos = &disk_partitions;
182 	struct disk_part *curr;
183 	while (!list_empty(pos)) {
184 		curr = list_entry(pos->next, struct disk_part, list);
185 		list_del(pos->next);
186 		free(curr);
187 	}
188 }
189 
190 static struct disk_part *allocate_disk_part(disk_partition_t *info, int partnum)
191 {
192 	struct disk_part *newpart;
193 	newpart = calloc(1, sizeof(struct disk_part));
194 	if (!newpart)
195 		return ERR_PTR(-ENOMEM);
196 
197 	newpart->gpt_part_info.start = info->start;
198 	newpart->gpt_part_info.size = info->size;
199 	newpart->gpt_part_info.blksz = info->blksz;
200 	strncpy((char *)newpart->gpt_part_info.name, (const char *)info->name,
201 		PART_NAME_LEN);
202 	newpart->gpt_part_info.name[PART_NAME_LEN - 1] = '\0';
203 	strncpy((char *)newpart->gpt_part_info.type, (const char *)info->type,
204 		PART_TYPE_LEN);
205 	newpart->gpt_part_info.type[PART_TYPE_LEN - 1] = '\0';
206 	newpart->gpt_part_info.bootable = info->bootable;
207 #ifdef CONFIG_PARTITION_UUIDS
208 	strncpy(newpart->gpt_part_info.uuid, (const char *)info->uuid,
209 		UUID_STR_LEN);
210 	/* UUID_STR_LEN is correct, as uuid[]'s length is UUID_STR_LEN+1 chars */
211 	newpart->gpt_part_info.uuid[UUID_STR_LEN] = '\0';
212 #endif
213 	newpart->partnum = partnum;
214 
215 	return newpart;
216 }
217 
218 static void prettyprint_part_size(char *sizestr, lbaint_t partsize,
219 				  lbaint_t blksize)
220 {
221 	unsigned long long partbytes, partmegabytes;
222 
223 	partbytes = partsize * blksize;
224 	partmegabytes = lldiv(partbytes, SZ_1M);
225 	snprintf(sizestr, 16, "%lluMiB", partmegabytes);
226 }
227 
228 static void print_gpt_info(void)
229 {
230 	struct list_head *pos;
231 	struct disk_part *curr;
232 	char partstartstr[16];
233 	char partsizestr[16];
234 
235 	list_for_each(pos, &disk_partitions) {
236 		curr = list_entry(pos, struct disk_part, list);
237 		prettyprint_part_size(partstartstr, curr->gpt_part_info.start,
238 				      curr->gpt_part_info.blksz);
239 		prettyprint_part_size(partsizestr, curr->gpt_part_info.size,
240 				      curr->gpt_part_info.blksz);
241 
242 		printf("Partition %d:\n", curr->partnum);
243 		printf("Start %s, size %s\n", partstartstr, partsizestr);
244 		printf("Block size %lu, name %s\n", curr->gpt_part_info.blksz,
245 		       curr->gpt_part_info.name);
246 		printf("Type %s, bootable %d\n", curr->gpt_part_info.type,
247 		       curr->gpt_part_info.bootable);
248 #ifdef CONFIG_PARTITION_UUIDS
249 		printf("UUID %s\n", curr->gpt_part_info.uuid);
250 #endif
251 		printf("\n");
252 	}
253 }
254 
255 /*
256  * create the string that upstream 'gpt write' command will accept as an
257  * argument
258  *
259  * From doc/README.gpt, Format of partitions layout:
260  *    "uuid_disk=...;name=u-boot,size=60MiB,uuid=...;
261  *	name=kernel,size=60MiB,uuid=...;"
262  * The fields 'name' and 'size' are mandatory for every partition.
263  * The field 'start' is optional. The fields 'uuid' and 'uuid_disk'
264  * are optional if CONFIG_RANDOM_UUID is enabled.
265  */
266 static int create_gpt_partitions_list(int numparts, const char *guid,
267 				      char *partitions_list)
268 {
269 	struct list_head *pos;
270 	struct disk_part *curr;
271 	char partstr[PART_NAME_LEN + 1];
272 
273 	if (!partitions_list)
274 		return -EINVAL;
275 
276 	strcpy(partitions_list, "uuid_disk=");
277 	strncat(partitions_list, guid, UUID_STR_LEN + 1);
278 	strcat(partitions_list, ";");
279 
280 	list_for_each(pos, &disk_partitions) {
281 		curr = list_entry(pos, struct disk_part, list);
282 		strcat(partitions_list, "name=");
283 		strncat(partitions_list, (const char *)curr->gpt_part_info.name,
284 			PART_NAME_LEN + 1);
285 		strcat(partitions_list, ",start=");
286 		prettyprint_part_size(partstr, (unsigned long)curr->gpt_part_info.start,
287 				      (unsigned long) curr->gpt_part_info.blksz);
288 		/* one extra byte for NULL */
289 		strncat(partitions_list, partstr, PART_NAME_LEN + 1);
290 		strcat(partitions_list, ",size=");
291 		prettyprint_part_size(partstr, curr->gpt_part_info.size,
292 				      curr->gpt_part_info.blksz);
293 		strncat(partitions_list, partstr, PART_NAME_LEN + 1);
294 
295 		strcat(partitions_list, ",uuid=");
296 		strncat(partitions_list, curr->gpt_part_info.uuid,
297 			UUID_STR_LEN + 1);
298 		strcat(partitions_list, ";");
299 	}
300 	return 0;
301 }
302 
303 /*
304  * read partition info into disk_partitions list where
305  * it can be printed or modified
306  */
307 static int get_gpt_info(struct blk_desc *dev_desc)
308 {
309 	/* start partition numbering at 1, as U-Boot does */
310 	int valid_parts = 0, p, ret;
311 	disk_partition_t info;
312 	struct disk_part *new_disk_part;
313 
314 	/*
315 	 * Always re-read partition info from device, in case
316 	 * it has changed
317 	 */
318 	INIT_LIST_HEAD(&disk_partitions);
319 
320 	for (p = 1; p <= MAX_SEARCH_PARTITIONS; p++) {
321 		ret = part_get_info(dev_desc, p, &info);
322 		if (ret)
323 			continue;
324 
325 		/* Add 1 here because counter is zero-based but p1 is
326 		   the first partition */
327 		new_disk_part = allocate_disk_part(&info, valid_parts+1);
328 		if (IS_ERR(new_disk_part))
329 			goto out;
330 
331 		list_add_tail(&new_disk_part->list, &disk_partitions);
332 		valid_parts++;
333 	}
334 	if (valid_parts == 0) {
335 		printf("** No valid partitions found **\n");
336 		goto out;
337 	}
338 	return valid_parts;
339  out:
340 	if (valid_parts >= 1)
341 		del_gpt_info();
342 	return -ENODEV;
343 }
344 
345 /* a wrapper to test get_gpt_info */
346 static int do_get_gpt_info(struct blk_desc *dev_desc)
347 {
348 	int ret;
349 
350 	ret = get_gpt_info(dev_desc);
351 	if (ret > 0) {
352 		print_gpt_info();
353 		del_gpt_info();
354 		return 0;
355 	}
356 	return ret;
357 }
358 #endif
359 
360 /**
361  * set_gpt_info(): Fill partition information from string
362  *		function allocates memory, remember to free!
363  *
364  * @param dev_desc - pointer block device descriptor
365  * @param str_part - pointer to string with partition information
366  * @param str_disk_guid - pointer to pointer to allocated string with disk guid
367  * @param partitions - pointer to pointer to allocated partitions array
368  * @param parts_count - number of partitions
369  *
370  * @return - zero on success, otherwise error
371  *
372  */
373 static int set_gpt_info(struct blk_desc *dev_desc,
374 			const char *str_part,
375 			char **str_disk_guid,
376 			disk_partition_t **partitions,
377 			u8 *parts_count)
378 {
379 	char *tok, *str, *s;
380 	int i;
381 	char *val, *p;
382 	int p_count;
383 	disk_partition_t *parts;
384 	int errno = 0;
385 	uint64_t size_ll, start_ll;
386 	lbaint_t offset = 0;
387 	int max_str_part = calc_parts_list_len(MAX_SEARCH_PARTITIONS);
388 
389 	debug("%s:  lba num: 0x%x %d\n", __func__,
390 	      (unsigned int)dev_desc->lba, (unsigned int)dev_desc->lba);
391 
392 	if (str_part == NULL)
393 		return -1;
394 
395 	str = strdup(str_part);
396 	if (str == NULL)
397 		return -ENOMEM;
398 
399 	/* extract disk guid */
400 	s = str;
401 	val = extract_val(str, "uuid_disk");
402 	if (!val) {
403 #ifdef CONFIG_RANDOM_UUID
404 		*str_disk_guid = malloc(UUID_STR_LEN + 1);
405 		if (str_disk_guid == NULL)
406 			return -ENOMEM;
407 		gen_rand_uuid_str(*str_disk_guid, UUID_STR_FORMAT_STD);
408 #else
409 		free(str);
410 		return -2;
411 #endif
412 	} else {
413 		val = strsep(&val, ";");
414 		if (extract_env(val, &p))
415 			p = val;
416 		*str_disk_guid = strdup(p);
417 		free(val);
418 		/* Move s to first partition */
419 		strsep(&s, ";");
420 	}
421 	if (s == NULL) {
422 		printf("Error: is the partitions string NULL-terminated?\n");
423 		return -EINVAL;
424 	}
425 	if (strnlen(s, max_str_part) == 0)
426 		return -3;
427 
428 	i = strnlen(s, max_str_part) - 1;
429 	if (s[i] == ';')
430 		s[i] = '\0';
431 
432 	/* calculate expected number of partitions */
433 	p_count = 1;
434 	p = s;
435 	while (*p) {
436 		if (*p++ == ';')
437 			p_count++;
438 	}
439 
440 	/* allocate memory for partitions */
441 	parts = calloc(sizeof(disk_partition_t), p_count);
442 	if (parts == NULL)
443 		return -ENOMEM;
444 
445 	/* retrieve partitions data from string */
446 	for (i = 0; i < p_count; i++) {
447 		tok = strsep(&s, ";");
448 
449 		if (tok == NULL)
450 			break;
451 
452 		/* uuid */
453 		val = extract_val(tok, "uuid");
454 		if (!val) {
455 			/* 'uuid' is optional if random uuid's are enabled */
456 #ifdef CONFIG_RANDOM_UUID
457 			gen_rand_uuid_str(parts[i].uuid, UUID_STR_FORMAT_STD);
458 #else
459 			errno = -4;
460 			goto err;
461 #endif
462 		} else {
463 			if (extract_env(val, &p))
464 				p = val;
465 			if (strnlen(p, max_str_part) >= sizeof(parts[i].uuid)) {
466 				printf("Wrong uuid format for partition %d\n", i);
467 				errno = -4;
468 				goto err;
469 			}
470 			strncpy((char *)parts[i].uuid, p, max_str_part);
471 			free(val);
472 		}
473 #ifdef CONFIG_PARTITION_TYPE_GUID
474 		/* guid */
475 		val = extract_val(tok, "type");
476 		if (val) {
477 			/* 'type' is optional */
478 			if (extract_env(val, &p))
479 				p = val;
480 			if (strnlen(p, max_str_part) >= sizeof(parts[i].type_guid)) {
481 				printf("Wrong type guid format for partition %d\n",
482 				       i);
483 				errno = -4;
484 				goto err;
485 			}
486 			strncpy((char *)parts[i].type_guid, p, max_str_part);
487 			free(val);
488 		}
489 #endif
490 		/* name */
491 		val = extract_val(tok, "name");
492 		if (!val) { /* name is mandatory */
493 			errno = -4;
494 			goto err;
495 		}
496 		if (extract_env(val, &p))
497 			p = val;
498 		if (strnlen(p, max_str_part) >= sizeof(parts[i].name)) {
499 			errno = -4;
500 			goto err;
501 		}
502 		strncpy((char *)parts[i].name, p, max_str_part);
503 		free(val);
504 
505 		/* size */
506 		val = extract_val(tok, "size");
507 		if (!val) { /* 'size' is mandatory */
508 			errno = -4;
509 			goto err;
510 		}
511 		if (extract_env(val, &p))
512 			p = val;
513 		if ((strcmp(p, "-") == 0)) {
514 			/* Let part efi module to auto extend the size */
515 			parts[i].size = 0;
516 		} else {
517 			size_ll = ustrtoull(p, &p, 0);
518 			parts[i].size = lldiv(size_ll, dev_desc->blksz);
519 		}
520 
521 		free(val);
522 
523 		/* start address */
524 		val = extract_val(tok, "start");
525 		if (val) { /* start address is optional */
526 			if (extract_env(val, &p))
527 				p = val;
528 			start_ll = ustrtoull(p, &p, 0);
529 			parts[i].start = lldiv(start_ll, dev_desc->blksz);
530 			free(val);
531 		}
532 
533 		offset += parts[i].size + parts[i].start;
534 
535 		/* bootable */
536 		if (found_key(tok, "bootable"))
537 			parts[i].bootable = 1;
538 	}
539 
540 	*parts_count = p_count;
541 	*partitions = parts;
542 	free(str);
543 
544 	return 0;
545 err:
546 	free(str);
547 	free(*str_disk_guid);
548 	free(parts);
549 
550 	return errno;
551 }
552 
553 static int gpt_default(struct blk_desc *blk_dev_desc, const char *str_part)
554 {
555 	int ret;
556 	char *str_disk_guid;
557 	u8 part_count = 0;
558 	disk_partition_t *partitions = NULL;
559 
560 	/* fill partitions */
561 	ret = set_gpt_info(blk_dev_desc, str_part,
562 			&str_disk_guid, &partitions, &part_count);
563 	if (ret) {
564 		if (ret == -1)
565 			printf("No partition list provided\n");
566 		if (ret == -2)
567 			printf("Missing disk guid\n");
568 		if ((ret == -3) || (ret == -4))
569 			printf("Partition list incomplete\n");
570 		return -1;
571 	}
572 
573 	/* save partitions layout to disk */
574 	ret = gpt_restore(blk_dev_desc, str_disk_guid, partitions, part_count);
575 	free(str_disk_guid);
576 	free(partitions);
577 
578 	return ret;
579 }
580 
581 static int gpt_verify(struct blk_desc *blk_dev_desc, const char *str_part)
582 {
583 	ALLOC_CACHE_ALIGN_BUFFER_PAD(gpt_header, gpt_head, 1,
584 				     blk_dev_desc->blksz);
585 	disk_partition_t *partitions = NULL;
586 	gpt_entry *gpt_pte = NULL;
587 	char *str_disk_guid;
588 	u8 part_count = 0;
589 	int ret = 0;
590 
591 	/* fill partitions */
592 	ret = set_gpt_info(blk_dev_desc, str_part,
593 			&str_disk_guid, &partitions, &part_count);
594 	if (ret) {
595 		if (ret == -1) {
596 			printf("No partition list provided - only basic check\n");
597 			ret = gpt_verify_headers(blk_dev_desc, gpt_head,
598 						 &gpt_pte);
599 			goto out;
600 		}
601 		if (ret == -2)
602 			printf("Missing disk guid\n");
603 		if ((ret == -3) || (ret == -4))
604 			printf("Partition list incomplete\n");
605 		return -1;
606 	}
607 
608 	/* Check partition layout with provided pattern */
609 	ret = gpt_verify_partitions(blk_dev_desc, partitions, part_count,
610 				    gpt_head, &gpt_pte);
611 	free(str_disk_guid);
612 	free(partitions);
613  out:
614 	free(gpt_pte);
615 	return ret;
616 }
617 
618 static int do_disk_guid(struct blk_desc *dev_desc, char * const namestr)
619 {
620 	int ret;
621 	char disk_guid[UUID_STR_LEN + 1];
622 
623 	ret = get_disk_guid(dev_desc, disk_guid);
624 	if (ret < 0)
625 		return CMD_RET_FAILURE;
626 
627 	if (namestr)
628 		env_set(namestr, disk_guid);
629 	else
630 		printf("%s\n", disk_guid);
631 
632 	return ret;
633 }
634 
635 #ifdef CONFIG_CMD_GPT_RENAME
636 static int do_rename_gpt_parts(struct blk_desc *dev_desc, char *subcomm,
637 			       char *name1, char *name2)
638 {
639 	struct list_head *pos;
640 	struct disk_part *curr;
641 	disk_partition_t *new_partitions = NULL;
642 	char disk_guid[UUID_STR_LEN + 1];
643 	char *partitions_list, *str_disk_guid;
644 	u8 part_count = 0;
645 	int partlistlen, ret, numparts = 0, partnum, i = 1, ctr1 = 0, ctr2 = 0;
646 
647 	if ((subcomm == NULL) || (name1 == NULL) || (name2 == NULL) ||
648 	    (strcmp(subcomm, "swap") && (strcmp(subcomm, "rename"))))
649 		return -EINVAL;
650 
651 	ret = get_disk_guid(dev_desc, disk_guid);
652 	if (ret < 0)
653 		return ret;
654 	numparts = get_gpt_info(dev_desc);
655 	if (numparts <=  0)
656 		return numparts ? numparts : -ENODEV;
657 
658 	partlistlen = calc_parts_list_len(numparts);
659 	partitions_list = malloc(partlistlen);
660 	if (partitions_list == NULL)
661 		return -ENOMEM;
662 	memset(partitions_list, '\0', partlistlen);
663 
664 	ret = create_gpt_partitions_list(numparts, disk_guid, partitions_list);
665 	if (ret < 0)
666 		return ret;
667 	/*
668 	 * Uncomment the following line to print a string that 'gpt write'
669 	 * or 'gpt verify' will accept as input.
670 	 */
671 	debug("OLD partitions_list is %s with %u chars\n", partitions_list,
672 	      (unsigned)strlen(partitions_list));
673 
674 	ret = set_gpt_info(dev_desc, partitions_list, &str_disk_guid,
675 			   &new_partitions, &part_count);
676 	if (ret < 0)
677 		return ret;
678 
679 	if (!strcmp(subcomm, "swap")) {
680 		if ((strlen(name1) > PART_NAME_LEN) || (strlen(name2) > PART_NAME_LEN)) {
681 			printf("Names longer than %d characters are truncated.\n", PART_NAME_LEN);
682 			return -EINVAL;
683 		}
684 		list_for_each(pos, &disk_partitions) {
685 			curr = list_entry(pos, struct disk_part, list);
686 			if (!strcmp((char *)curr->gpt_part_info.name, name1)) {
687 				strcpy((char *)curr->gpt_part_info.name, name2);
688 				ctr1++;
689 			} else if (!strcmp((char *)curr->gpt_part_info.name, name2)) {
690 				strcpy((char *)curr->gpt_part_info.name, name1);
691 				ctr2++;
692 			}
693 		}
694 		if ((ctr1 + ctr2 < 2) || (ctr1 != ctr2)) {
695 			printf("Cannot swap partition names except in pairs.\n");
696 			return -EINVAL;
697 		}
698 	} else { /* rename */
699 		if (strlen(name2) > PART_NAME_LEN) {
700 			printf("Names longer than %d characters are truncated.\n", PART_NAME_LEN);
701 			return -EINVAL;
702 		}
703 		partnum = (int)simple_strtol(name1, NULL, 10);
704 		if ((partnum < 0) || (partnum > numparts)) {
705 			printf("Illegal partition number %s\n", name1);
706 			return -EINVAL;
707 		}
708 		ret = part_get_info(dev_desc, partnum, new_partitions);
709 		if (ret < 0)
710 			return ret;
711 
712 		/* U-Boot partition numbering starts at 1 */
713 		list_for_each(pos, &disk_partitions) {
714 			curr = list_entry(pos, struct disk_part, list);
715 			if (i == partnum) {
716 				strcpy((char *)curr->gpt_part_info.name, name2);
717 				break;
718 			}
719 			i++;
720 		}
721 	}
722 
723 	ret = create_gpt_partitions_list(numparts, disk_guid, partitions_list);
724 	if (ret < 0)
725 		return ret;
726 	debug("NEW partitions_list is %s with %u chars\n", partitions_list,
727 	      (unsigned)strlen(partitions_list));
728 
729 	ret = set_gpt_info(dev_desc, partitions_list, &str_disk_guid,
730 			   &new_partitions, &part_count);
731 	if (ret < 0)
732 		return ret;
733 
734 	debug("Writing new partition table\n");
735 	ret = gpt_restore(dev_desc, disk_guid, new_partitions, numparts);
736 	if (ret < 0) {
737 		printf("Writing new partition table failed\n");
738 		return ret;
739 	}
740 
741 	debug("Reading back new partition table\n");
742 	numparts = get_gpt_info(dev_desc);
743 	if (numparts <=  0)
744 		return numparts ? numparts : -ENODEV;
745 	printf("new partition table with %d partitions is:\n", numparts);
746 	print_gpt_info();
747 
748 	del_gpt_info();
749 	free(partitions_list);
750 	free(str_disk_guid);
751 	free(new_partitions);
752 	return ret;
753 }
754 #endif
755 
756 /**
757  * do_gpt(): Perform GPT operations
758  *
759  * @param cmdtp - command name
760  * @param flag
761  * @param argc
762  * @param argv
763  *
764  * @return zero on success; otherwise error
765  */
766 static int do_gpt(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
767 {
768 	int ret = CMD_RET_SUCCESS;
769 	int dev = 0;
770 	char *ep;
771 	struct blk_desc *blk_dev_desc = NULL;
772 
773 #ifndef CONFIG_CMD_GPT_RENAME
774 	if (argc < 4 || argc > 5)
775 #else
776 	if (argc < 4 || argc > 6)
777 #endif
778 		return CMD_RET_USAGE;
779 
780 	dev = (int)simple_strtoul(argv[3], &ep, 10);
781 	if (!ep || ep[0] != '\0') {
782 		printf("'%s' is not a number\n", argv[3]);
783 		return CMD_RET_USAGE;
784 	}
785 	blk_dev_desc = blk_get_dev(argv[2], dev);
786 	if (!blk_dev_desc) {
787 		printf("%s: %s dev %d NOT available\n",
788 		       __func__, argv[2], dev);
789 		return CMD_RET_FAILURE;
790 	}
791 
792 	if ((strcmp(argv[1], "write") == 0) && (argc == 5)) {
793 		printf("Writing GPT: ");
794 		ret = gpt_default(blk_dev_desc, argv[4]);
795 	} else if ((strcmp(argv[1], "verify") == 0)) {
796 		ret = gpt_verify(blk_dev_desc, argv[4]);
797 		printf("Verify GPT: ");
798 	} else if (strcmp(argv[1], "guid") == 0) {
799 		ret = do_disk_guid(blk_dev_desc, argv[4]);
800 #ifdef CONFIG_CMD_GPT_RENAME
801 	} else if (strcmp(argv[1], "read") == 0) {
802 		ret = do_get_gpt_info(blk_dev_desc);
803 	} else if ((strcmp(argv[1], "swap") == 0) ||
804 		   (strcmp(argv[1], "rename") == 0)) {
805 		ret = do_rename_gpt_parts(blk_dev_desc, argv[1], argv[4], argv[5]);
806 #endif
807 	} else {
808 		return CMD_RET_USAGE;
809 	}
810 
811 	if (ret) {
812 		printf("error!\n");
813 		return CMD_RET_FAILURE;
814 	}
815 
816 	printf("success!\n");
817 	return CMD_RET_SUCCESS;
818 }
819 
820 U_BOOT_CMD(gpt, CONFIG_SYS_MAXARGS, 1, do_gpt,
821 	"GUID Partition Table",
822 	"<command> <interface> <dev> <partitions_list>\n"
823 	" - GUID partition table restoration and validity check\n"
824 	" Restore or verify GPT information on a device connected\n"
825 	" to interface\n"
826 	" Example usage:\n"
827 	" gpt write mmc 0 $partitions\n"
828 	" gpt verify mmc 0 $partitions\n"
829 	" read <interface> <dev>\n"
830 	"    - read GPT into a data structure for manipulation\n"
831 	" guid <interface> <dev>\n"
832 	"    - print disk GUID\n"
833 	" guid <interface> <dev> <varname>\n"
834 	"    - set environment variable to disk GUID\n"
835 	" Example usage:\n"
836 	" gpt guid mmc 0\n"
837 	" gpt guid mmc 0 varname\n"
838 #ifdef CONFIG_CMD_GPT_RENAME
839 	"gpt partition renaming commands:\n"
840 	"gpt swap <interface> <dev> <name1> <name2>\n"
841 	"    - change all partitions named name1 to name2\n"
842 	"      and vice-versa\n"
843 	"gpt rename <interface> <dev> <part> <name>\n"
844 	"    - rename the specified partition\n"
845 	" Example usage:\n"
846 	" gpt swap mmc 0 foo bar\n"
847 	" gpt rename mmc 0 3 foo\n"
848 #endif
849 );
850