]> git.ipfire.org Git - thirdparty/u-boot.git/blame - common/cmd_nvedit.c
memsize: Fix for bug in memory sizing code
[thirdparty/u-boot.git] / common / cmd_nvedit.c
CommitLineData
a68d3ed0 1/*
ea882baf 2 * (C) Copyright 2000-2010
a68d3ed0
WD
3 * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
4 *
5 * (C) Copyright 2001 Sysgo Real-Time Solutions, GmbH <www.elinos.com>
6 * Andreas Heppel <aheppel@sysgo.de>
a000b795
KP
7 *
8 * Copyright 2011 Freescale Semiconductor, Inc.
9 *
a68d3ed0
WD
10 * See file CREDITS for list of people who contributed to this
11 * project.
12 *
13 * This program is free software; you can redistribute it and/or
14 * modify it under the terms of the GNU General Public License as
15 * published by the Free Software Foundation; either version 2 of
16 * the License, or (at your option) any later version.
17 *
18 * This program is distributed in the hope that it will be useful,
19 * but WITHOUT ANY WARRANTY; without even the implied warranty of
20 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21 * GNU General Public License for more details.
22 *
23 * You should have received a copy of the GNU General Public License
24 * along with this program; if not, write to the Free Software
25 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
26 * MA 02111-1307 USA
27 */
28
ea882baf 29/*
a68d3ed0
WD
30 * Support for persistent environment data
31 *
ea882baf
WD
32 * The "environment" is stored on external storage as a list of '\0'
33 * terminated "name=value" strings. The end of the list is marked by
34 * a double '\0'. The environment is preceeded by a 32 bit CRC over
35 * the data part and, in case of redundant environment, a byte of
36 * flags.
a68d3ed0 37 *
ea882baf
WD
38 * This linearized representation will also be used before
39 * relocation, i. e. as long as we don't have a full C runtime
40 * environment. After that, we use a hash table.
a68d3ed0
WD
41 */
42
43#include <common.h>
44#include <command.h>
45#include <environment.h>
ea882baf
WD
46#include <search.h>
47#include <errno.h>
246c6922 48#include <malloc.h>
2a3cb020 49#include <watchdog.h>
281e00a3 50#include <serial.h>
a68d3ed0
WD
51#include <linux/stddef.h>
52#include <asm/byteorder.h>
c76fe474 53#if defined(CONFIG_CMD_NET)
a68d3ed0
WD
54#include <net.h>
55#endif
56
d87080b7
WD
57DECLARE_GLOBAL_DATA_PTR;
58
f3c615b8
ML
59#if !defined(CONFIG_ENV_IS_IN_EEPROM) && \
60 !defined(CONFIG_ENV_IS_IN_FLASH) && \
61 !defined(CONFIG_ENV_IS_IN_DATAFLASH) && \
f3c615b8 62 !defined(CONFIG_ENV_IS_IN_MMC) && \
57210c7c 63 !defined(CONFIG_ENV_IS_IN_FAT) && \
f3c615b8
ML
64 !defined(CONFIG_ENV_IS_IN_NAND) && \
65 !defined(CONFIG_ENV_IS_IN_NVRAM) && \
66 !defined(CONFIG_ENV_IS_IN_ONENAND) && \
67 !defined(CONFIG_ENV_IS_IN_SPI_FLASH) && \
0a85a9e7 68 !defined(CONFIG_ENV_IS_IN_REMOTE) && \
f3c615b8 69 !defined(CONFIG_ENV_IS_NOWHERE)
75eb82ec 70# error Define one of CONFIG_ENV_IS_IN_{EEPROM|FLASH|DATAFLASH|ONENAND|\
b37d41aa 71SPI_FLASH|NVRAM|MMC|FAT|REMOTE} or CONFIG_ENV_IS_NOWHERE
a68d3ed0
WD
72#endif
73
74#define XMK_STR(x) #x
75#define MK_STR(x) XMK_STR(x)
76
ea882baf
WD
77/*
78 * Maximum expected input data size for import command
79 */
80#define MAX_ENV_SIZE (1 << 20) /* 1 MiB */
a68d3ed0 81
558605cf 82ulong load_addr = CONFIG_SYS_LOAD_ADDR; /* Default Load Address */
1aec244a
SG
83ulong save_addr; /* Default Save Address */
84ulong save_size; /* Default Save Size (in bytes) */
558605cf 85
a68d3ed0
WD
86/*
87 * Table with supported baudrates (defined in config_xyz.h)
88 */
6d0f6bcf 89static const unsigned long baudrate_table[] = CONFIG_SYS_BAUDRATE_TABLE;
a68d3ed0
WD
90#define N_BAUDRATES (sizeof(baudrate_table) / sizeof(baudrate_table[0]))
91
da95427c 92/*
ea882baf 93 * This variable is incremented on each do_env_set(), so it can
da95427c
HS
94 * be used via get_env_id() as an indication, if the environment
95 * has changed or not. So it is possible to reread an environment
96 * variable only if the environment was changed ... done so for
97 * example in NetInitLoop()
98 */
2f70c49e 99static int env_id = 1;
a68d3ed0 100
f3c615b8 101int get_env_id(void)
2f70c49e
HS
102{
103 return env_id;
104}
a68d3ed0 105
4c94f6c5 106/*
ea882baf
WD
107 * Command interface: print one or all environment variables
108 *
109 * Returns 0 in case of error, or length of printed string
4c94f6c5 110 */
ea882baf 111static int env_print(char *name)
a68d3ed0 112{
ea882baf
WD
113 char *res = NULL;
114 size_t len;
115
116 if (name) { /* print a single name */
117 ENTRY e, *ep;
118
119 e.key = name;
120 e.data = NULL;
2eb1573f 121 hsearch_r(e, FIND, &ep, &env_htab);
ea882baf
WD
122 if (ep == NULL)
123 return 0;
f3c615b8 124 len = printf("%s=%s\n", ep->key, ep->data);
ea882baf
WD
125 return len;
126 }
a68d3ed0 127
ea882baf 128 /* print whole list */
37f2fe74 129 len = hexport_r(&env_htab, '\n', &res, 0, 0, NULL);
a68d3ed0 130
ea882baf
WD
131 if (len > 0) {
132 puts(res);
133 free(res);
134 return len;
a68d3ed0
WD
135 }
136
ea882baf
WD
137 /* should never happen */
138 return 0;
4c94f6c5 139}
a68d3ed0 140
ea882baf 141int do_env_print (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
4c94f6c5
MF
142{
143 int i;
144 int rcode = 0;
a68d3ed0 145
4c94f6c5
MF
146 if (argc == 1) {
147 /* print all env vars */
ea882baf
WD
148 rcode = env_print(NULL);
149 if (!rcode)
4c94f6c5
MF
150 return 1;
151 printf("\nEnvironment size: %d/%ld bytes\n",
152 rcode, (ulong)ENV_SIZE);
153 return 0;
154 }
a68d3ed0 155
4c94f6c5
MF
156 /* print selected env vars */
157 for (i = 1; i < argc; ++i) {
ea882baf
WD
158 int rc = env_print(argv[i]);
159 if (!rc) {
160 printf("## Error: \"%s\" not defined\n", argv[i]);
4c94f6c5 161 ++rcode;
a68d3ed0
WD
162 }
163 }
4c94f6c5 164
a68d3ed0
WD
165 return rcode;
166}
167
a000b795 168#ifdef CONFIG_CMD_GREPENV
d09b1787
IG
169static int do_env_grep(cmd_tbl_t *cmdtp, int flag,
170 int argc, char * const argv[])
a000b795
KP
171{
172 ENTRY *match;
173 unsigned char matched[env_htab.size / 8];
174 int rcode = 1, arg = 1, idx;
175
176 if (argc < 2)
4c12eeb8 177 return CMD_RET_USAGE;
a000b795
KP
178
179 memset(matched, 0, env_htab.size / 8);
180
181 while (arg <= argc) {
182 idx = 0;
068f158f 183 while ((idx = hstrstr_r(argv[arg], idx, &match, &env_htab))) {
a000b795
KP
184 if (!(matched[idx / 8] & (1 << (idx & 7)))) {
185 puts(match->key);
186 puts("=");
187 puts(match->data);
188 puts("\n");
189 }
190 matched[idx / 8] |= 1 << (idx & 7);
191 rcode = 0;
192 }
193 arg++;
194 }
195
196 return rcode;
197}
198#endif
199
ea882baf 200/*
a68d3ed0
WD
201 * Set a new environment variable,
202 * or replace or delete an existing one.
a68d3ed0 203 */
d09b1787 204int _do_env_set(int flag, int argc, char * const argv[])
a68d3ed0 205{
ea882baf 206 int i, len;
a68d3ed0 207 int console = -1;
ea882baf
WD
208 char *name, *value, *s;
209 ENTRY e, *ep;
a68d3ed0
WD
210
211 name = argv[1];
212
471a7be7 213 if (strchr(name, '=')) {
d09b1787
IG
214 printf("## Error: illegal character '=' in variable name"
215 "\"%s\"\n", name);
471a7be7
WD
216 return 1;
217 }
218
2f70c49e 219 env_id++;
a68d3ed0
WD
220 /*
221 * search if variable with this name already exists
222 */
ea882baf
WD
223 e.key = name;
224 e.data = NULL;
2eb1573f 225 hsearch_r(e, FIND, &ep, &env_htab);
a68d3ed0 226
9c5586aa 227 /* Check for console redirection */
f3c615b8 228 if (strcmp(name, "stdin") == 0)
9c5586aa 229 console = stdin;
f3c615b8 230 else if (strcmp(name, "stdout") == 0)
9c5586aa 231 console = stdout;
f3c615b8 232 else if (strcmp(name, "stderr") == 0)
9c5586aa 233 console = stderr;
9c5586aa
AR
234
235 if (console != -1) {
236 if (argc < 3) { /* Cannot delete it! */
237 printf("Can't delete \"%s\"\n", name);
238 return 1;
239 }
240
241#ifdef CONFIG_CONSOLE_MUX
242 i = iomux_doenv(console, argv[2]);
243 if (i)
244 return i;
245#else
246 /* Try assigning specified device */
f3c615b8 247 if (console_assign(console, argv[2]) < 0)
9c5586aa
AR
248 return 1;
249
250#ifdef CONFIG_SERIAL_MULTI
f3c615b8 251 if (serial_assign(argv[2]) < 0)
9c5586aa
AR
252 return 1;
253#endif
254#endif /* CONFIG_CONSOLE_MUX */
255 }
256
a68d3ed0 257 /*
ea882baf
WD
258 * Some variables like "ethaddr" and "serial#" can be set only
259 * once and cannot be deleted; also, "ver" is readonly.
a68d3ed0 260 */
ea882baf 261 if (ep) { /* variable exists */
a68d3ed0 262#ifndef CONFIG_ENV_OVERWRITE
d09b1787
IG
263 if (strcmp(name, "serial#") == 0 ||
264 (strcmp(name, "ethaddr") == 0
a68d3ed0 265#if defined(CONFIG_OVERWRITE_ETHADDR_ONCE) && defined(CONFIG_ETHADDR)
d09b1787 266 && strcmp(ep->data, MK_STR(CONFIG_ETHADDR)) != 0
a68d3ed0 267#endif /* CONFIG_OVERWRITE_ETHADDR_ONCE && CONFIG_ETHADDR */
d09b1787 268 )) {
f3c615b8 269 printf("Can't overwrite \"%s\"\n", name);
a68d3ed0
WD
270 return 1;
271 }
272#endif
a68d3ed0
WD
273 /*
274 * Switch to new baudrate if new baudrate is supported
275 */
f3c615b8 276 if (strcmp(name, "baudrate") == 0) {
a68d3ed0
WD
277 int baudrate = simple_strtoul(argv[2], NULL, 10);
278 int i;
f3c615b8 279 for (i = 0; i < N_BAUDRATES; ++i) {
a68d3ed0
WD
280 if (baudrate == baudrate_table[i])
281 break;
282 }
283 if (i == N_BAUDRATES) {
f3c615b8 284 printf("## Baudrate %d bps not supported\n",
a68d3ed0
WD
285 baudrate);
286 return 1;
287 }
d09b1787
IG
288 printf("## Switch baudrate to %d bps and"
289 "press ENTER ...\n", baudrate);
a68d3ed0
WD
290 udelay(50000);
291 gd->baudrate = baudrate;
c84bad0e 292#if defined(CONFIG_PPC) || defined(CONFIG_MCF52x2)
d0fb80c3
WD
293 gd->bd->bi_baudrate = baudrate;
294#endif
295
f3c615b8 296 serial_setbrg();
a68d3ed0 297 udelay(50000);
d09b1787
IG
298 while (getc() != '\r')
299 ;
a68d3ed0 300 }
a68d3ed0
WD
301 }
302
a68d3ed0 303 /* Delete only ? */
d09b1787 304 if (argc < 3 || argv[2] == NULL) {
2eb1573f 305 int rc = hdelete_r(name, &env_htab);
ea882baf 306 return !rc;
a68d3ed0
WD
307 }
308
309 /*
ea882baf 310 * Insert / replace new value
a68d3ed0 311 */
f3c615b8 312 for (i = 2, len = 0; i < argc; ++i)
a68d3ed0 313 len += strlen(argv[i]) + 1;
f3c615b8
ML
314
315 value = malloc(len);
316 if (value == NULL) {
ea882baf 317 printf("## Can't malloc %d bytes\n", len);
a68d3ed0
WD
318 return 1;
319 }
f3c615b8 320 for (i = 2, s = value; i < argc; ++i) {
ea882baf 321 char *v = argv[i];
a68d3ed0 322
ea882baf 323 while ((*s++ = *v++) != '\0')
a68d3ed0 324 ;
d09b1787 325 *(s - 1) = ' ';
ea882baf
WD
326 }
327 if (s != value)
328 *--s = '\0';
329
d09b1787
IG
330 e.key = name;
331 e.data = value;
2eb1573f 332 hsearch_r(e, ENTER, &ep, &env_htab);
ea882baf
WD
333 free(value);
334 if (!ep) {
335 printf("## Error inserting \"%s\" variable, errno=%d\n",
336 name, errno);
337 return 1;
a68d3ed0 338 }
a68d3ed0
WD
339
340 /*
341 * Some variables should be updated when the corresponding
ea882baf 342 * entry in the environment is changed
a68d3ed0 343 */
50a47d05 344 if (strcmp(argv[1], "loadaddr") == 0) {
a68d3ed0
WD
345 load_addr = simple_strtoul(argv[2], NULL, 16);
346 return 0;
347 }
c76fe474 348#if defined(CONFIG_CMD_NET)
f3c615b8
ML
349 else if (strcmp(argv[1], "bootfile") == 0) {
350 copy_filename(BootFile, argv[2], sizeof(BootFile));
a68d3ed0
WD
351 return 0;
352 }
90253178 353#endif
a68d3ed0
WD
354 return 0;
355}
356
84b5e802 357int setenv(const char *varname, const char *varvalue)
a68d3ed0 358{
84b5e802
WD
359 const char * const argv[4] = { "setenv", varname, varvalue, NULL };
360
d09b1787 361 if (varvalue == NULL || varvalue[0] == '\0')
84b5e802 362 return _do_env_set(0, 2, (char * const *)argv);
9ffd451a 363 else
84b5e802 364 return _do_env_set(0, 3, (char * const *)argv);
a68d3ed0
WD
365}
366
d67f10ce
SG
367/**
368 * Set an environment variable to an integer value
369 *
370 * @param varname Environmet variable to set
371 * @param value Value to set it to
372 * @return 0 if ok, 1 on error
373 */
374int setenv_ulong(const char *varname, ulong value)
375{
376 /* TODO: this should be unsigned */
377 char *str = simple_itoa(value);
378
379 return setenv(varname, str);
380}
381
382/**
383 * Set an environment variable to an address in hex
384 *
385 * @param varname Environmet variable to set
386 * @param addr Value to set it to
387 * @return 0 if ok, 1 on error
388 */
389int setenv_addr(const char *varname, const void *addr)
390{
391 char str[17];
392
79afc88d 393 sprintf(str, "%lx", (uintptr_t)addr);
d67f10ce
SG
394 return setenv(varname, str);
395}
396
f3c615b8 397int do_env_set(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
a68d3ed0 398{
47e26b1b 399 if (argc < 2)
4c12eeb8 400 return CMD_RET_USAGE;
a68d3ed0 401
ea882baf 402 return _do_env_set(flag, argc, argv);
a68d3ed0
WD
403}
404
ea882baf 405/*
a68d3ed0
WD
406 * Prompt for environment variable
407 */
c76fe474 408#if defined(CONFIG_CMD_ASKENV)
f3c615b8 409int do_env_ask(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
a68d3ed0 410{
6d0f6bcf
JCPV
411 char message[CONFIG_SYS_CBSIZE];
412 int size = CONFIG_SYS_CBSIZE - 1;
ea882baf 413 int i, len, pos;
a68d3ed0
WD
414 char *local_args[4];
415
416 local_args[0] = argv[0];
417 local_args[1] = argv[1];
418 local_args[2] = NULL;
419 local_args[3] = NULL;
420
a68d3ed0
WD
421 /* Check the syntax */
422 switch (argc) {
423 case 1:
4c12eeb8 424 return CMD_RET_USAGE;
a68d3ed0 425
ea882baf
WD
426 case 2: /* env_ask envname */
427 sprintf(message, "Please enter '%s':", argv[1]);
a68d3ed0
WD
428 break;
429
ea882baf
WD
430 case 3: /* env_ask envname size */
431 sprintf(message, "Please enter '%s':", argv[1]);
432 size = simple_strtoul(argv[2], NULL, 10);
a68d3ed0
WD
433 break;
434
ea882baf 435 default: /* env_ask envname message1 ... messagen size */
f3c615b8
ML
436 for (i = 2, pos = 0; i < argc - 1; i++) {
437 if (pos)
a68d3ed0 438 message[pos++] = ' ';
f3c615b8 439
d09b1787 440 strcpy(message + pos, argv[i]);
a68d3ed0
WD
441 pos += strlen(argv[i]);
442 }
d09b1787 443
a68d3ed0 444 message[pos] = '\0';
ea882baf 445 size = simple_strtoul(argv[argc - 1], NULL, 10);
a68d3ed0
WD
446 break;
447 }
448
6d0f6bcf
JCPV
449 if (size >= CONFIG_SYS_CBSIZE)
450 size = CONFIG_SYS_CBSIZE - 1;
a68d3ed0
WD
451
452 if (size <= 0)
453 return 1;
454
455 /* prompt for input */
ea882baf 456 len = readline(message);
a68d3ed0
WD
457
458 if (size < len)
459 console_buffer[size] = '\0';
460
461 len = 2;
462 if (console_buffer[0] != '\0') {
463 local_args[2] = console_buffer;
464 len = 3;
465 }
466
467 /* Continue calling setenv code */
ea882baf 468 return _do_env_set(flag, len, local_args);
a68d3ed0 469}
90253178 470#endif
a68d3ed0 471
ea882baf 472/*
246c6922
PT
473 * Interactively edit an environment variable
474 */
475#if defined(CONFIG_CMD_EDITENV)
ea882baf 476int do_env_edit(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
246c6922
PT
477{
478 char buffer[CONFIG_SYS_CBSIZE];
479 char *init_val;
246c6922 480
47e26b1b 481 if (argc < 2)
4c12eeb8 482 return CMD_RET_USAGE;
246c6922
PT
483
484 /* Set read buffer to initial value or empty sting */
485 init_val = getenv(argv[1]);
486 if (init_val)
7fcd9bbd 487 sprintf(buffer, "%s", init_val);
246c6922
PT
488 else
489 buffer[0] = '\0';
490
9c348311 491 readline_into_buffer("edit: ", buffer, 0);
246c6922
PT
492
493 return setenv(argv[1], buffer);
494}
495#endif /* CONFIG_CMD_EDITENV */
496
ea882baf 497/*
a68d3ed0
WD
498 * Look up variable from environment,
499 * return address of storage for that variable,
500 * or NULL if not found
501 */
84b5e802 502char *getenv(const char *name)
a68d3ed0 503{
d09b1787 504 if (gd->flags & GD_FLG_ENV_READY) { /* after import into hashtable */
ea882baf 505 ENTRY e, *ep;
a68d3ed0 506
91a76751 507 WATCHDOG_RESET();
2a3cb020 508
d09b1787
IG
509 e.key = name;
510 e.data = NULL;
2eb1573f 511 hsearch_r(e, FIND, &ep, &env_htab);
91a76751 512
f3c615b8 513 return ep ? ep->data : NULL;
a68d3ed0
WD
514 }
515
ea882baf 516 /* restricted capabilities before import */
ea882baf
WD
517 if (getenv_f(name, (char *)(gd->env_buf), sizeof(gd->env_buf)) > 0)
518 return (char *)(gd->env_buf);
91a76751 519
ea882baf 520 return NULL;
a68d3ed0
WD
521}
522
ea882baf
WD
523/*
524 * Look up variable from environment for restricted C runtime env.
525 */
84b5e802 526int getenv_f(const char *name, char *buf, unsigned len)
a68d3ed0
WD
527{
528 int i, nxt;
529
d09b1787 530 for (i = 0; env_get_char(i) != '\0'; i = nxt + 1) {
a68d3ed0
WD
531 int val, n;
532
f3c615b8
ML
533 for (nxt = i; env_get_char(nxt) != '\0'; ++nxt) {
534 if (nxt >= CONFIG_ENV_SIZE)
535 return -1;
a68d3ed0 536 }
f3c615b8
ML
537
538 val = envmatch((uchar *)name, i);
539 if (val < 0)
a68d3ed0 540 continue;
9ed4a958 541
a68d3ed0 542 /* found; copy out */
f3c615b8 543 for (n = 0; n < len; ++n, ++buf) {
d09b1787
IG
544 *buf = env_get_char(val++);
545 if (*buf == '\0')
9ed4a958
WD
546 return n;
547 }
548
549 if (n)
550 *--buf = '\0';
551
a02a884b
WD
552 printf("env_buf [%d bytes] too small for value of \"%s\"\n",
553 len, name);
9ed4a958
WD
554
555 return n;
a68d3ed0 556 }
d09b1787 557
f3c615b8 558 return -1;
a68d3ed0
WD
559}
560
4a9b4131
SG
561/**
562 * Decode the integer value of an environment variable and return it.
563 *
564 * @param name Name of environemnt variable
565 * @param base Number base to use (normally 10, or 16 for hex)
566 * @param default_val Default value to return if the variable is not
567 * found
568 * @return the decoded value, or default_val if not found
569 */
570ulong getenv_ulong(const char *name, int base, ulong default_val)
571{
572 /*
573 * We can use getenv() here, even before relocation, since the
574 * environment variable value is an integer and thus short.
575 */
576 const char *str = getenv(name);
577
578 return str ? simple_strtoul(str, NULL, base) : default_val;
579}
580
bdab39d3 581#if defined(CONFIG_CMD_SAVEENV) && !defined(CONFIG_ENV_IS_NOWHERE)
f3c615b8 582int do_env_save(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
a68d3ed0 583{
f3c615b8 584 printf("Saving Environment to %s...\n", env_name_spec);
a68d3ed0 585
f3c615b8 586 return saveenv() ? 1 : 0;
a68d3ed0 587}
8bde7f77 588
ba69dc26 589U_BOOT_CMD(
ea882baf 590 saveenv, 1, 0, do_env_save,
2fb2604d 591 "save environment variables to persistent storage",
a89c33db 592 ""
ba69dc26 593);
a68d3ed0
WD
594#endif
595
596
ea882baf 597/*
a68d3ed0
WD
598 * Match a name / name=value pair
599 *
600 * s1 is either a simple 'name', or a 'name=value' pair.
601 * i2 is the environment index for a 'name2=value2' pair.
d09b1787 602 * If the names match, return the index for the value2, else -1.
a68d3ed0 603 */
f3c615b8 604int envmatch(uchar *s1, int i2)
a68d3ed0 605{
a68d3ed0
WD
606 while (*s1 == env_get_char(i2++))
607 if (*s1++ == '=')
f3c615b8 608 return i2;
d09b1787 609
a68d3ed0 610 if (*s1 == '\0' && env_get_char(i2-1) == '=')
f3c615b8 611 return i2;
d09b1787 612
f3c615b8 613 return -1;
a68d3ed0 614}
8bde7f77 615
d09b1787
IG
616static int do_env_default(cmd_tbl_t *cmdtp, int flag,
617 int argc, char * const argv[])
ea882baf 618{
d09b1787 619 if (argc != 2 || strcmp(argv[1], "-f") != 0)
4c12eeb8 620 return CMD_RET_USAGE;
f3c615b8 621
ea882baf
WD
622 set_default_env("## Resetting to default environment\n");
623 return 0;
624}
625
d09b1787
IG
626static int do_env_delete(cmd_tbl_t *cmdtp, int flag,
627 int argc, char * const argv[])
ea882baf
WD
628{
629 printf("Not implemented yet\n");
630 return 0;
631}
632
0c79cda0 633#ifdef CONFIG_CMD_EXPORTENV
ea882baf 634/*
37f2fe74 635 * env export [-t | -b | -c] [-s size] addr [var ...]
ea882baf
WD
636 * -t: export as text format; if size is given, data will be
637 * padded with '\0' bytes; if not, one terminating '\0'
638 * will be added (which is included in the "filesize"
639 * setting so you can for exmple copy this to flash and
640 * keep the termination).
641 * -b: export as binary format (name=value pairs separated by
642 * '\0', list end marked by double "\0\0")
643 * -c: export as checksum protected environment format as
644 * used for example by "saveenv" command
37f2fe74
WD
645 * -s size:
646 * size of output buffer
ea882baf 647 * addr: memory address where environment gets stored
37f2fe74
WD
648 * var... List of variable names that get included into the
649 * export. Without arguments, the whole environment gets
650 * exported.
ea882baf
WD
651 *
652 * With "-c" and size is NOT given, then the export command will
653 * format the data as currently used for the persistent storage,
654 * i. e. it will use CONFIG_ENV_SECT_SIZE as output block size and
655 * prepend a valid CRC32 checksum and, in case of resundant
656 * environment, a "current" redundancy flag. If size is given, this
657 * value will be used instead of CONFIG_ENV_SECT_SIZE; again, CRC32
658 * checksum and redundancy flag will be inserted.
659 *
660 * With "-b" and "-t", always only the real data (including a
661 * terminating '\0' byte) will be written; here the optional size
662 * argument will be used to make sure not to overflow the user
663 * provided buffer; the command will abort if the size is not
664 * sufficient. Any remainign space will be '\0' padded.
665 *
666 * On successful return, the variable "filesize" will be set.
667 * Note that filesize includes the trailing/terminating '\0' byte(s).
668 *
669 * Usage szenario: create a text snapshot/backup of the current settings:
670 *
671 * => env export -t 100000
672 * => era ${backup_addr} +${filesize}
673 * => cp.b 100000 ${backup_addr} ${filesize}
674 *
675 * Re-import this snapshot, deleting all other settings:
676 *
677 * => env import -d -t ${backup_addr}
678 */
d09b1787
IG
679static int do_env_export(cmd_tbl_t *cmdtp, int flag,
680 int argc, char * const argv[])
ea882baf
WD
681{
682 char buf[32];
683 char *addr, *cmd, *res;
37f2fe74 684 size_t size = 0;
ea882baf
WD
685 ssize_t len;
686 env_t *envp;
687 char sep = '\n';
688 int chk = 0;
689 int fmt = 0;
690
691 cmd = *argv;
692
693 while (--argc > 0 && **++argv == '-') {
694 char *arg = *argv;
695 while (*++arg) {
696 switch (*arg) {
697 case 'b': /* raw binary format */
698 if (fmt++)
699 goto sep_err;
700 sep = '\0';
701 break;
702 case 'c': /* external checksum format */
703 if (fmt++)
704 goto sep_err;
705 sep = '\0';
706 chk = 1;
707 break;
37f2fe74
WD
708 case 's': /* size given */
709 if (--argc <= 0)
710 return cmd_usage(cmdtp);
711 size = simple_strtoul(*++argv, NULL, 16);
712 goto NXTARG;
ea882baf
WD
713 case 't': /* text format */
714 if (fmt++)
715 goto sep_err;
716 sep = '\n';
717 break;
718 default:
4c12eeb8 719 return CMD_RET_USAGE;
ea882baf
WD
720 }
721 }
37f2fe74 722NXTARG: ;
ea882baf
WD
723 }
724
f3c615b8 725 if (argc < 1)
4c12eeb8 726 return CMD_RET_USAGE;
8bde7f77 727
ea882baf
WD
728 addr = (char *)simple_strtoul(argv[0], NULL, 16);
729
37f2fe74 730 if (size)
ea882baf 731 memset(addr, '\0', size);
37f2fe74
WD
732
733 argc--;
734 argv++;
ea882baf
WD
735
736 if (sep) { /* export as text file */
37f2fe74 737 len = hexport_r(&env_htab, sep, &addr, size, argc, argv);
ea882baf 738 if (len < 0) {
d09b1787 739 error("Cannot export environment: errno = %d\n", errno);
ea882baf
WD
740 return 1;
741 }
8c3aff52 742 sprintf(buf, "%zX", (size_t)len);
ea882baf
WD
743 setenv("filesize", buf);
744
745 return 0;
746 }
747
748 envp = (env_t *)addr;
749
750 if (chk) /* export as checksum protected block */
751 res = (char *)envp->data;
752 else /* export as raw binary data */
753 res = addr;
754
37f2fe74 755 len = hexport_r(&env_htab, '\0', &res, ENV_SIZE, argc, argv);
ea882baf 756 if (len < 0) {
d09b1787 757 error("Cannot export environment: errno = %d\n", errno);
ea882baf
WD
758 return 1;
759 }
760
761 if (chk) {
d09b1787 762 envp->crc = crc32(0, envp->data, ENV_SIZE);
ea882baf
WD
763#ifdef CONFIG_ENV_ADDR_REDUND
764 envp->flags = ACTIVE_FLAG;
765#endif
766 }
f3c615b8 767 sprintf(buf, "%zX", (size_t)(len + offsetof(env_t, data)));
ea882baf
WD
768 setenv("filesize", buf);
769
770 return 0;
771
772sep_err:
d09b1787 773 printf("## %s: only one of \"-b\", \"-c\" or \"-t\" allowed\n", cmd);
ea882baf
WD
774 return 1;
775}
0c79cda0 776#endif
ea882baf 777
0c79cda0 778#ifdef CONFIG_CMD_IMPORTENV
ea882baf
WD
779/*
780 * env import [-d] [-t | -b | -c] addr [size]
781 * -d: delete existing environment before importing;
782 * otherwise overwrite / append to existion definitions
783 * -t: assume text format; either "size" must be given or the
784 * text data must be '\0' terminated
785 * -b: assume binary format ('\0' separated, "\0\0" terminated)
786 * -c: assume checksum protected environment format
787 * addr: memory address to read from
788 * size: length of input data; if missing, proper '\0'
789 * termination is mandatory
790 */
d09b1787
IG
791static int do_env_import(cmd_tbl_t *cmdtp, int flag,
792 int argc, char * const argv[])
ea882baf
WD
793{
794 char *cmd, *addr;
795 char sep = '\n';
796 int chk = 0;
797 int fmt = 0;
798 int del = 0;
799 size_t size;
800
801 cmd = *argv;
802
803 while (--argc > 0 && **++argv == '-') {
804 char *arg = *argv;
805 while (*++arg) {
806 switch (*arg) {
807 case 'b': /* raw binary format */
808 if (fmt++)
809 goto sep_err;
810 sep = '\0';
811 break;
812 case 'c': /* external checksum format */
813 if (fmt++)
814 goto sep_err;
815 sep = '\0';
816 chk = 1;
817 break;
818 case 't': /* text format */
819 if (fmt++)
820 goto sep_err;
821 sep = '\n';
822 break;
823 case 'd':
824 del = 1;
825 break;
826 default:
4c12eeb8 827 return CMD_RET_USAGE;
ea882baf
WD
828 }
829 }
830 }
831
f3c615b8 832 if (argc < 1)
4c12eeb8 833 return CMD_RET_USAGE;
ea882baf
WD
834
835 if (!fmt)
836 printf("## Warning: defaulting to text format\n");
837
838 addr = (char *)simple_strtoul(argv[0], NULL, 16);
839
840 if (argc == 2) {
841 size = simple_strtoul(argv[1], NULL, 16);
842 } else {
843 char *s = addr;
844
845 size = 0;
846
847 while (size < MAX_ENV_SIZE) {
848 if ((*s == sep) && (*(s+1) == '\0'))
849 break;
850 ++s;
851 ++size;
852 }
853 if (size == MAX_ENV_SIZE) {
854 printf("## Warning: Input data exceeds %d bytes"
855 " - truncated\n", MAX_ENV_SIZE);
856 }
d3f80c77 857 size += 2;
79afc88d 858 printf("## Info: input data size = %zu = 0x%zX\n", size, size);
ea882baf
WD
859 }
860
861 if (chk) {
862 uint32_t crc;
863 env_t *ep = (env_t *)addr;
864
865 size -= offsetof(env_t, data);
866 memcpy(&crc, &ep->crc, sizeof(crc));
867
868 if (crc32(0, ep->data, size) != crc) {
869 puts("## Error: bad CRC, import failed\n");
870 return 1;
871 }
872 addr = (char *)ep->data;
873 }
874
2eb1573f 875 if (himport_r(&env_htab, addr, size, sep, del ? 0 : H_NOCLEAR) == 0) {
ea882baf
WD
876 error("Environment import failed: errno = %d\n", errno);
877 return 1;
878 }
879 gd->flags |= GD_FLG_ENV_READY;
880
881 return 0;
882
883sep_err:
884 printf("## %s: only one of \"-b\", \"-c\" or \"-t\" allowed\n",
885 cmd);
886 return 1;
887}
0c79cda0 888#endif
ea882baf 889
ea882baf
WD
890/*
891 * New command line interface: "env" command with subcommands
892 */
893static cmd_tbl_t cmd_env_sub[] = {
894#if defined(CONFIG_CMD_ASKENV)
895 U_BOOT_CMD_MKENT(ask, CONFIG_SYS_MAXARGS, 1, do_env_ask, "", ""),
896#endif
897 U_BOOT_CMD_MKENT(default, 1, 0, do_env_default, "", ""),
898 U_BOOT_CMD_MKENT(delete, 2, 0, do_env_delete, "", ""),
899#if defined(CONFIG_CMD_EDITENV)
900 U_BOOT_CMD_MKENT(edit, 2, 0, do_env_edit, "", ""),
901#endif
0c79cda0 902#if defined(CONFIG_CMD_EXPORTENV)
ea882baf 903 U_BOOT_CMD_MKENT(export, 4, 0, do_env_export, "", ""),
0c79cda0 904#endif
a000b795
KP
905#if defined(CONFIG_CMD_GREPENV)
906 U_BOOT_CMD_MKENT(grep, CONFIG_SYS_MAXARGS, 1, do_env_grep, "", ""),
907#endif
0c79cda0 908#if defined(CONFIG_CMD_IMPORTENV)
ea882baf 909 U_BOOT_CMD_MKENT(import, 5, 0, do_env_import, "", ""),
0c79cda0 910#endif
ea882baf
WD
911 U_BOOT_CMD_MKENT(print, CONFIG_SYS_MAXARGS, 1, do_env_print, "", ""),
912#if defined(CONFIG_CMD_RUN)
913 U_BOOT_CMD_MKENT(run, CONFIG_SYS_MAXARGS, 1, do_run, "", ""),
914#endif
915#if defined(CONFIG_CMD_SAVEENV) && !defined(CONFIG_ENV_IS_NOWHERE)
916 U_BOOT_CMD_MKENT(save, 1, 0, do_env_save, "", ""),
917#endif
918 U_BOOT_CMD_MKENT(set, CONFIG_SYS_MAXARGS, 0, do_env_set, "", ""),
919};
920
2e5167cc 921#if defined(CONFIG_NEEDS_MANUAL_RELOC)
60f7da1f
HS
922void env_reloc(void)
923{
924 fixup_cmdtable(cmd_env_sub, ARRAY_SIZE(cmd_env_sub));
925}
926#endif
927
f3c615b8 928static int do_env(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
ea882baf
WD
929{
930 cmd_tbl_t *cp;
931
5904da02 932 if (argc < 2)
4c12eeb8 933 return CMD_RET_USAGE;
5904da02 934
ea882baf
WD
935 /* drop initial "env" arg */
936 argc--;
937 argv++;
938
939 cp = find_cmd_tbl(argv[0], cmd_env_sub, ARRAY_SIZE(cmd_env_sub));
940
941 if (cp)
942 return cp->cmd(cmdtp, flag, argc, argv);
943
4c12eeb8 944 return CMD_RET_USAGE;
ea882baf
WD
945}
946
947U_BOOT_CMD(
948 env, CONFIG_SYS_MAXARGS, 1, do_env,
949 "environment handling commands",
950#if defined(CONFIG_CMD_ASKENV)
951 "ask name [message] [size] - ask for environment variable\nenv "
952#endif
953 "default -f - reset default environment\n"
954#if defined(CONFIG_CMD_EDITENV)
955 "env edit name - edit environment variable\n"
956#endif
37f2fe74 957 "env export [-t | -b | -c] [-s size] addr [var ...] - export environment\n"
a000b795
KP
958#if defined(CONFIG_CMD_GREPENV)
959 "env grep string [...] - search environment\n"
960#endif
961 "env import [-d] [-t | -b | -c] addr [size] - import environment\n"
ea882baf
WD
962 "env print [name ...] - print environment\n"
963#if defined(CONFIG_CMD_RUN)
964 "env run var [...] - run commands in an environment variable\n"
965#endif
d798a9b5 966#if defined(CONFIG_CMD_SAVEENV) && !defined(CONFIG_ENV_IS_NOWHERE)
ea882baf 967 "env save - save environment\n"
d798a9b5 968#endif
ea882baf
WD
969 "env set [-f] name [arg ...]\n"
970);
971
972/*
973 * Old command line interface, kept for compatibility
974 */
8bde7f77 975
246c6922 976#if defined(CONFIG_CMD_EDITENV)
722b061b 977U_BOOT_CMD_COMPLETE(
ea882baf 978 editenv, 2, 0, do_env_edit,
246c6922
PT
979 "edit environment variable",
980 "name\n"
722b061b
MF
981 " - edit environment variable 'name'",
982 var_complete
246c6922
PT
983);
984#endif
985
722b061b 986U_BOOT_CMD_COMPLETE(
ea882baf 987 printenv, CONFIG_SYS_MAXARGS, 1, do_env_print,
2fb2604d 988 "print environment variables",
8bde7f77
WD
989 "\n - print values of all environment variables\n"
990 "printenv name ...\n"
722b061b
MF
991 " - print value of environment variable 'name'",
992 var_complete
8bde7f77
WD
993);
994
a000b795
KP
995#ifdef CONFIG_CMD_GREPENV
996U_BOOT_CMD_COMPLETE(
997 grepenv, CONFIG_SYS_MAXARGS, 0, do_env_grep,
998 "search environment variables",
999 "string ...\n"
1000 " - list environment name=value pairs matching 'string'",
1001 var_complete
1002);
1003#endif
1004
722b061b 1005U_BOOT_CMD_COMPLETE(
ea882baf 1006 setenv, CONFIG_SYS_MAXARGS, 0, do_env_set,
2fb2604d 1007 "set environment variables",
8bde7f77
WD
1008 "name value ...\n"
1009 " - set environment variable 'name' to 'value ...'\n"
1010 "setenv name\n"
722b061b
MF
1011 " - delete environment variable 'name'",
1012 var_complete
8bde7f77
WD
1013);
1014
c76fe474 1015#if defined(CONFIG_CMD_ASKENV)
8bde7f77 1016
0d498393 1017U_BOOT_CMD(
ea882baf 1018 askenv, CONFIG_SYS_MAXARGS, 1, do_env_ask,
2fb2604d 1019 "get environment variables from stdin",
8bde7f77
WD
1020 "name [message] [size]\n"
1021 " - get environment variable 'name' from stdin (max 'size' chars)\n"
1022 "askenv name\n"
1023 " - get environment variable 'name' from stdin\n"
1024 "askenv name size\n"
1025 " - get environment variable 'name' from stdin (max 'size' chars)\n"
1026 "askenv name [message] size\n"
1027 " - display 'message' string and get environment variable 'name'"
a89c33db 1028 "from stdin (max 'size' chars)"
8bde7f77 1029);
90253178 1030#endif
8bde7f77 1031
c76fe474 1032#if defined(CONFIG_CMD_RUN)
722b061b 1033U_BOOT_CMD_COMPLETE(
6d0f6bcf 1034 run, CONFIG_SYS_MAXARGS, 1, do_run,
2fb2604d 1035 "run commands in an environment variable",
8bde7f77 1036 "var [...]\n"
722b061b
MF
1037 " - run the commands in the environment variable(s) 'var'",
1038 var_complete
8bde7f77 1039);
90253178 1040#endif