]> git.ipfire.org Git - people/ms/u-boot.git/blame - common/cmd_nvedit.c
MAKEALL: Add -m/-M option to determine maintainers
[people/ms/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) && \
62 !defined(CONFIG_ENV_IS_IN_MG_DISK) && \
63 !defined(CONFIG_ENV_IS_IN_MMC) && \
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) && \
68 !defined(CONFIG_ENV_IS_NOWHERE)
75eb82ec 69# error Define one of CONFIG_ENV_IS_IN_{EEPROM|FLASH|DATAFLASH|ONENAND|\
31e41398 70SPI_FLASH|MG_DISK|NVRAM|MMC} or CONFIG_ENV_IS_NOWHERE
a68d3ed0
WD
71#endif
72
73#define XMK_STR(x) #x
74#define MK_STR(x) XMK_STR(x)
75
ea882baf
WD
76/*
77 * Maximum expected input data size for import command
78 */
79#define MAX_ENV_SIZE (1 << 20) /* 1 MiB */
a68d3ed0 80
558605cf 81ulong load_addr = CONFIG_SYS_LOAD_ADDR; /* Default Load Address */
1aec244a
SG
82ulong save_addr; /* Default Save Address */
83ulong save_size; /* Default Save Size (in bytes) */
558605cf 84
a68d3ed0
WD
85/*
86 * Table with supported baudrates (defined in config_xyz.h)
87 */
6d0f6bcf 88static const unsigned long baudrate_table[] = CONFIG_SYS_BAUDRATE_TABLE;
a68d3ed0
WD
89#define N_BAUDRATES (sizeof(baudrate_table) / sizeof(baudrate_table[0]))
90
da95427c 91/*
ea882baf 92 * This variable is incremented on each do_env_set(), so it can
da95427c
HS
93 * be used via get_env_id() as an indication, if the environment
94 * has changed or not. So it is possible to reread an environment
95 * variable only if the environment was changed ... done so for
96 * example in NetInitLoop()
97 */
2f70c49e 98static int env_id = 1;
a68d3ed0 99
f3c615b8 100int get_env_id(void)
2f70c49e
HS
101{
102 return env_id;
103}
a68d3ed0 104
4c94f6c5 105/*
ea882baf
WD
106 * Command interface: print one or all environment variables
107 *
108 * Returns 0 in case of error, or length of printed string
4c94f6c5 109 */
ea882baf 110static int env_print(char *name)
a68d3ed0 111{
ea882baf
WD
112 char *res = NULL;
113 size_t len;
114
115 if (name) { /* print a single name */
116 ENTRY e, *ep;
117
118 e.key = name;
119 e.data = NULL;
2eb1573f 120 hsearch_r(e, FIND, &ep, &env_htab);
ea882baf
WD
121 if (ep == NULL)
122 return 0;
f3c615b8 123 len = printf("%s=%s\n", ep->key, ep->data);
ea882baf
WD
124 return len;
125 }
a68d3ed0 126
ea882baf 127 /* print whole list */
37f2fe74 128 len = hexport_r(&env_htab, '\n', &res, 0, 0, NULL);
a68d3ed0 129
ea882baf
WD
130 if (len > 0) {
131 puts(res);
132 free(res);
133 return len;
a68d3ed0
WD
134 }
135
ea882baf
WD
136 /* should never happen */
137 return 0;
4c94f6c5 138}
a68d3ed0 139
ea882baf 140int do_env_print (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
4c94f6c5
MF
141{
142 int i;
143 int rcode = 0;
a68d3ed0 144
4c94f6c5
MF
145 if (argc == 1) {
146 /* print all env vars */
ea882baf
WD
147 rcode = env_print(NULL);
148 if (!rcode)
4c94f6c5
MF
149 return 1;
150 printf("\nEnvironment size: %d/%ld bytes\n",
151 rcode, (ulong)ENV_SIZE);
152 return 0;
153 }
a68d3ed0 154
4c94f6c5
MF
155 /* print selected env vars */
156 for (i = 1; i < argc; ++i) {
ea882baf
WD
157 int rc = env_print(argv[i]);
158 if (!rc) {
159 printf("## Error: \"%s\" not defined\n", argv[i]);
4c94f6c5 160 ++rcode;
a68d3ed0
WD
161 }
162 }
4c94f6c5 163
a68d3ed0
WD
164 return rcode;
165}
166
a000b795 167#ifdef CONFIG_CMD_GREPENV
d09b1787
IG
168static int do_env_grep(cmd_tbl_t *cmdtp, int flag,
169 int argc, char * const argv[])
a000b795
KP
170{
171 ENTRY *match;
172 unsigned char matched[env_htab.size / 8];
173 int rcode = 1, arg = 1, idx;
174
175 if (argc < 2)
4c12eeb8 176 return CMD_RET_USAGE;
a000b795
KP
177
178 memset(matched, 0, env_htab.size / 8);
179
180 while (arg <= argc) {
181 idx = 0;
068f158f 182 while ((idx = hstrstr_r(argv[arg], idx, &match, &env_htab))) {
a000b795
KP
183 if (!(matched[idx / 8] & (1 << (idx & 7)))) {
184 puts(match->key);
185 puts("=");
186 puts(match->data);
187 puts("\n");
188 }
189 matched[idx / 8] |= 1 << (idx & 7);
190 rcode = 0;
191 }
192 arg++;
193 }
194
195 return rcode;
196}
197#endif
198
ea882baf 199/*
a68d3ed0
WD
200 * Set a new environment variable,
201 * or replace or delete an existing one.
a68d3ed0 202 */
d09b1787 203int _do_env_set(int flag, int argc, char * const argv[])
a68d3ed0 204{
ea882baf
WD
205 bd_t *bd = gd->bd;
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 */
f3c615b8 344 if (strcmp(name, "ipaddr") == 0) {
a68d3ed0
WD
345 char *s = argv[2]; /* always use only one arg */
346 char *e;
347 unsigned long addr;
348 bd->bi_ip_addr = 0;
f3c615b8 349 for (addr = 0, i = 0; i < 4; ++i) {
a68d3ed0
WD
350 ulong val = s ? simple_strtoul(s, &e, 10) : 0;
351 addr <<= 8;
d09b1787
IG
352 addr |= val & 0xFF;
353 if (s)
354 s = *e ? e + 1 : e;
a68d3ed0
WD
355 }
356 bd->bi_ip_addr = htonl(addr);
357 return 0;
f3c615b8 358 } else if (strcmp(argv[1], "loadaddr") == 0) {
a68d3ed0
WD
359 load_addr = simple_strtoul(argv[2], NULL, 16);
360 return 0;
361 }
c76fe474 362#if defined(CONFIG_CMD_NET)
f3c615b8
ML
363 else if (strcmp(argv[1], "bootfile") == 0) {
364 copy_filename(BootFile, argv[2], sizeof(BootFile));
a68d3ed0
WD
365 return 0;
366 }
90253178 367#endif
a68d3ed0
WD
368 return 0;
369}
370
84b5e802 371int setenv(const char *varname, const char *varvalue)
a68d3ed0 372{
84b5e802
WD
373 const char * const argv[4] = { "setenv", varname, varvalue, NULL };
374
d09b1787 375 if (varvalue == NULL || varvalue[0] == '\0')
84b5e802 376 return _do_env_set(0, 2, (char * const *)argv);
9ffd451a 377 else
84b5e802 378 return _do_env_set(0, 3, (char * const *)argv);
a68d3ed0
WD
379}
380
d67f10ce
SG
381/**
382 * Set an environment variable to an integer value
383 *
384 * @param varname Environmet variable to set
385 * @param value Value to set it to
386 * @return 0 if ok, 1 on error
387 */
388int setenv_ulong(const char *varname, ulong value)
389{
390 /* TODO: this should be unsigned */
391 char *str = simple_itoa(value);
392
393 return setenv(varname, str);
394}
395
396/**
397 * Set an environment variable to an address in hex
398 *
399 * @param varname Environmet variable to set
400 * @param addr Value to set it to
401 * @return 0 if ok, 1 on error
402 */
403int setenv_addr(const char *varname, const void *addr)
404{
405 char str[17];
406
79afc88d 407 sprintf(str, "%lx", (uintptr_t)addr);
d67f10ce
SG
408 return setenv(varname, str);
409}
410
f3c615b8 411int do_env_set(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
a68d3ed0 412{
47e26b1b 413 if (argc < 2)
4c12eeb8 414 return CMD_RET_USAGE;
a68d3ed0 415
ea882baf 416 return _do_env_set(flag, argc, argv);
a68d3ed0
WD
417}
418
ea882baf 419/*
a68d3ed0
WD
420 * Prompt for environment variable
421 */
c76fe474 422#if defined(CONFIG_CMD_ASKENV)
f3c615b8 423int do_env_ask(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
a68d3ed0 424{
6d0f6bcf
JCPV
425 char message[CONFIG_SYS_CBSIZE];
426 int size = CONFIG_SYS_CBSIZE - 1;
ea882baf 427 int i, len, pos;
a68d3ed0
WD
428 char *local_args[4];
429
430 local_args[0] = argv[0];
431 local_args[1] = argv[1];
432 local_args[2] = NULL;
433 local_args[3] = NULL;
434
a68d3ed0
WD
435 /* Check the syntax */
436 switch (argc) {
437 case 1:
4c12eeb8 438 return CMD_RET_USAGE;
a68d3ed0 439
ea882baf
WD
440 case 2: /* env_ask envname */
441 sprintf(message, "Please enter '%s':", argv[1]);
a68d3ed0
WD
442 break;
443
ea882baf
WD
444 case 3: /* env_ask envname size */
445 sprintf(message, "Please enter '%s':", argv[1]);
446 size = simple_strtoul(argv[2], NULL, 10);
a68d3ed0
WD
447 break;
448
ea882baf 449 default: /* env_ask envname message1 ... messagen size */
f3c615b8
ML
450 for (i = 2, pos = 0; i < argc - 1; i++) {
451 if (pos)
a68d3ed0 452 message[pos++] = ' ';
f3c615b8 453
d09b1787 454 strcpy(message + pos, argv[i]);
a68d3ed0
WD
455 pos += strlen(argv[i]);
456 }
d09b1787 457
a68d3ed0 458 message[pos] = '\0';
ea882baf 459 size = simple_strtoul(argv[argc - 1], NULL, 10);
a68d3ed0
WD
460 break;
461 }
462
6d0f6bcf
JCPV
463 if (size >= CONFIG_SYS_CBSIZE)
464 size = CONFIG_SYS_CBSIZE - 1;
a68d3ed0
WD
465
466 if (size <= 0)
467 return 1;
468
469 /* prompt for input */
ea882baf 470 len = readline(message);
a68d3ed0
WD
471
472 if (size < len)
473 console_buffer[size] = '\0';
474
475 len = 2;
476 if (console_buffer[0] != '\0') {
477 local_args[2] = console_buffer;
478 len = 3;
479 }
480
481 /* Continue calling setenv code */
ea882baf 482 return _do_env_set(flag, len, local_args);
a68d3ed0 483}
90253178 484#endif
a68d3ed0 485
ea882baf 486/*
246c6922
PT
487 * Interactively edit an environment variable
488 */
489#if defined(CONFIG_CMD_EDITENV)
ea882baf 490int do_env_edit(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
246c6922
PT
491{
492 char buffer[CONFIG_SYS_CBSIZE];
493 char *init_val;
246c6922 494
47e26b1b 495 if (argc < 2)
4c12eeb8 496 return CMD_RET_USAGE;
246c6922
PT
497
498 /* Set read buffer to initial value or empty sting */
499 init_val = getenv(argv[1]);
500 if (init_val)
7fcd9bbd 501 sprintf(buffer, "%s", init_val);
246c6922
PT
502 else
503 buffer[0] = '\0';
504
9c348311 505 readline_into_buffer("edit: ", buffer, 0);
246c6922
PT
506
507 return setenv(argv[1], buffer);
508}
509#endif /* CONFIG_CMD_EDITENV */
510
ea882baf 511/*
a68d3ed0
WD
512 * Look up variable from environment,
513 * return address of storage for that variable,
514 * or NULL if not found
515 */
84b5e802 516char *getenv(const char *name)
a68d3ed0 517{
d09b1787 518 if (gd->flags & GD_FLG_ENV_READY) { /* after import into hashtable */
ea882baf 519 ENTRY e, *ep;
a68d3ed0 520
91a76751 521 WATCHDOG_RESET();
2a3cb020 522
d09b1787
IG
523 e.key = name;
524 e.data = NULL;
2eb1573f 525 hsearch_r(e, FIND, &ep, &env_htab);
91a76751 526
f3c615b8 527 return ep ? ep->data : NULL;
a68d3ed0
WD
528 }
529
ea882baf 530 /* restricted capabilities before import */
ea882baf
WD
531 if (getenv_f(name, (char *)(gd->env_buf), sizeof(gd->env_buf)) > 0)
532 return (char *)(gd->env_buf);
91a76751 533
ea882baf 534 return NULL;
a68d3ed0
WD
535}
536
ea882baf
WD
537/*
538 * Look up variable from environment for restricted C runtime env.
539 */
84b5e802 540int getenv_f(const char *name, char *buf, unsigned len)
a68d3ed0
WD
541{
542 int i, nxt;
543
d09b1787 544 for (i = 0; env_get_char(i) != '\0'; i = nxt + 1) {
a68d3ed0
WD
545 int val, n;
546
f3c615b8
ML
547 for (nxt = i; env_get_char(nxt) != '\0'; ++nxt) {
548 if (nxt >= CONFIG_ENV_SIZE)
549 return -1;
a68d3ed0 550 }
f3c615b8
ML
551
552 val = envmatch((uchar *)name, i);
553 if (val < 0)
a68d3ed0 554 continue;
9ed4a958 555
a68d3ed0 556 /* found; copy out */
f3c615b8 557 for (n = 0; n < len; ++n, ++buf) {
d09b1787
IG
558 *buf = env_get_char(val++);
559 if (*buf == '\0')
9ed4a958
WD
560 return n;
561 }
562
563 if (n)
564 *--buf = '\0';
565
a02a884b
WD
566 printf("env_buf [%d bytes] too small for value of \"%s\"\n",
567 len, name);
9ed4a958
WD
568
569 return n;
a68d3ed0 570 }
d09b1787 571
f3c615b8 572 return -1;
a68d3ed0
WD
573}
574
4a9b4131
SG
575/**
576 * Decode the integer value of an environment variable and return it.
577 *
578 * @param name Name of environemnt variable
579 * @param base Number base to use (normally 10, or 16 for hex)
580 * @param default_val Default value to return if the variable is not
581 * found
582 * @return the decoded value, or default_val if not found
583 */
584ulong getenv_ulong(const char *name, int base, ulong default_val)
585{
586 /*
587 * We can use getenv() here, even before relocation, since the
588 * environment variable value is an integer and thus short.
589 */
590 const char *str = getenv(name);
591
592 return str ? simple_strtoul(str, NULL, base) : default_val;
593}
594
bdab39d3 595#if defined(CONFIG_CMD_SAVEENV) && !defined(CONFIG_ENV_IS_NOWHERE)
f3c615b8 596int do_env_save(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
a68d3ed0 597{
f3c615b8 598 printf("Saving Environment to %s...\n", env_name_spec);
a68d3ed0 599
f3c615b8 600 return saveenv() ? 1 : 0;
a68d3ed0 601}
8bde7f77 602
ba69dc26 603U_BOOT_CMD(
ea882baf 604 saveenv, 1, 0, do_env_save,
2fb2604d 605 "save environment variables to persistent storage",
a89c33db 606 ""
ba69dc26 607);
a68d3ed0
WD
608#endif
609
610
ea882baf 611/*
a68d3ed0
WD
612 * Match a name / name=value pair
613 *
614 * s1 is either a simple 'name', or a 'name=value' pair.
615 * i2 is the environment index for a 'name2=value2' pair.
d09b1787 616 * If the names match, return the index for the value2, else -1.
a68d3ed0 617 */
f3c615b8 618int envmatch(uchar *s1, int i2)
a68d3ed0 619{
a68d3ed0
WD
620 while (*s1 == env_get_char(i2++))
621 if (*s1++ == '=')
f3c615b8 622 return i2;
d09b1787 623
a68d3ed0 624 if (*s1 == '\0' && env_get_char(i2-1) == '=')
f3c615b8 625 return i2;
d09b1787 626
f3c615b8 627 return -1;
a68d3ed0 628}
8bde7f77 629
d09b1787
IG
630static int do_env_default(cmd_tbl_t *cmdtp, int flag,
631 int argc, char * const argv[])
ea882baf 632{
d09b1787 633 if (argc != 2 || strcmp(argv[1], "-f") != 0)
4c12eeb8 634 return CMD_RET_USAGE;
f3c615b8 635
ea882baf
WD
636 set_default_env("## Resetting to default environment\n");
637 return 0;
638}
639
d09b1787
IG
640static int do_env_delete(cmd_tbl_t *cmdtp, int flag,
641 int argc, char * const argv[])
ea882baf
WD
642{
643 printf("Not implemented yet\n");
644 return 0;
645}
646
0c79cda0 647#ifdef CONFIG_CMD_EXPORTENV
ea882baf 648/*
37f2fe74 649 * env export [-t | -b | -c] [-s size] addr [var ...]
ea882baf
WD
650 * -t: export as text format; if size is given, data will be
651 * padded with '\0' bytes; if not, one terminating '\0'
652 * will be added (which is included in the "filesize"
653 * setting so you can for exmple copy this to flash and
654 * keep the termination).
655 * -b: export as binary format (name=value pairs separated by
656 * '\0', list end marked by double "\0\0")
657 * -c: export as checksum protected environment format as
658 * used for example by "saveenv" command
37f2fe74
WD
659 * -s size:
660 * size of output buffer
ea882baf 661 * addr: memory address where environment gets stored
37f2fe74
WD
662 * var... List of variable names that get included into the
663 * export. Without arguments, the whole environment gets
664 * exported.
ea882baf
WD
665 *
666 * With "-c" and size is NOT given, then the export command will
667 * format the data as currently used for the persistent storage,
668 * i. e. it will use CONFIG_ENV_SECT_SIZE as output block size and
669 * prepend a valid CRC32 checksum and, in case of resundant
670 * environment, a "current" redundancy flag. If size is given, this
671 * value will be used instead of CONFIG_ENV_SECT_SIZE; again, CRC32
672 * checksum and redundancy flag will be inserted.
673 *
674 * With "-b" and "-t", always only the real data (including a
675 * terminating '\0' byte) will be written; here the optional size
676 * argument will be used to make sure not to overflow the user
677 * provided buffer; the command will abort if the size is not
678 * sufficient. Any remainign space will be '\0' padded.
679 *
680 * On successful return, the variable "filesize" will be set.
681 * Note that filesize includes the trailing/terminating '\0' byte(s).
682 *
683 * Usage szenario: create a text snapshot/backup of the current settings:
684 *
685 * => env export -t 100000
686 * => era ${backup_addr} +${filesize}
687 * => cp.b 100000 ${backup_addr} ${filesize}
688 *
689 * Re-import this snapshot, deleting all other settings:
690 *
691 * => env import -d -t ${backup_addr}
692 */
d09b1787
IG
693static int do_env_export(cmd_tbl_t *cmdtp, int flag,
694 int argc, char * const argv[])
ea882baf
WD
695{
696 char buf[32];
697 char *addr, *cmd, *res;
37f2fe74 698 size_t size = 0;
ea882baf
WD
699 ssize_t len;
700 env_t *envp;
701 char sep = '\n';
702 int chk = 0;
703 int fmt = 0;
704
705 cmd = *argv;
706
707 while (--argc > 0 && **++argv == '-') {
708 char *arg = *argv;
709 while (*++arg) {
710 switch (*arg) {
711 case 'b': /* raw binary format */
712 if (fmt++)
713 goto sep_err;
714 sep = '\0';
715 break;
716 case 'c': /* external checksum format */
717 if (fmt++)
718 goto sep_err;
719 sep = '\0';
720 chk = 1;
721 break;
37f2fe74
WD
722 case 's': /* size given */
723 if (--argc <= 0)
724 return cmd_usage(cmdtp);
725 size = simple_strtoul(*++argv, NULL, 16);
726 goto NXTARG;
ea882baf
WD
727 case 't': /* text format */
728 if (fmt++)
729 goto sep_err;
730 sep = '\n';
731 break;
732 default:
4c12eeb8 733 return CMD_RET_USAGE;
ea882baf
WD
734 }
735 }
37f2fe74 736NXTARG: ;
ea882baf
WD
737 }
738
f3c615b8 739 if (argc < 1)
4c12eeb8 740 return CMD_RET_USAGE;
8bde7f77 741
ea882baf
WD
742 addr = (char *)simple_strtoul(argv[0], NULL, 16);
743
37f2fe74 744 if (size)
ea882baf 745 memset(addr, '\0', size);
37f2fe74
WD
746
747 argc--;
748 argv++;
ea882baf
WD
749
750 if (sep) { /* export as text file */
37f2fe74 751 len = hexport_r(&env_htab, sep, &addr, size, argc, argv);
ea882baf 752 if (len < 0) {
d09b1787 753 error("Cannot export environment: errno = %d\n", errno);
ea882baf
WD
754 return 1;
755 }
8c3aff52 756 sprintf(buf, "%zX", (size_t)len);
ea882baf
WD
757 setenv("filesize", buf);
758
759 return 0;
760 }
761
762 envp = (env_t *)addr;
763
764 if (chk) /* export as checksum protected block */
765 res = (char *)envp->data;
766 else /* export as raw binary data */
767 res = addr;
768
37f2fe74 769 len = hexport_r(&env_htab, '\0', &res, ENV_SIZE, argc, argv);
ea882baf 770 if (len < 0) {
d09b1787 771 error("Cannot export environment: errno = %d\n", errno);
ea882baf
WD
772 return 1;
773 }
774
775 if (chk) {
d09b1787 776 envp->crc = crc32(0, envp->data, ENV_SIZE);
ea882baf
WD
777#ifdef CONFIG_ENV_ADDR_REDUND
778 envp->flags = ACTIVE_FLAG;
779#endif
780 }
f3c615b8 781 sprintf(buf, "%zX", (size_t)(len + offsetof(env_t, data)));
ea882baf
WD
782 setenv("filesize", buf);
783
784 return 0;
785
786sep_err:
d09b1787 787 printf("## %s: only one of \"-b\", \"-c\" or \"-t\" allowed\n", cmd);
ea882baf
WD
788 return 1;
789}
0c79cda0 790#endif
ea882baf 791
0c79cda0 792#ifdef CONFIG_CMD_IMPORTENV
ea882baf
WD
793/*
794 * env import [-d] [-t | -b | -c] addr [size]
795 * -d: delete existing environment before importing;
796 * otherwise overwrite / append to existion definitions
797 * -t: assume text format; either "size" must be given or the
798 * text data must be '\0' terminated
799 * -b: assume binary format ('\0' separated, "\0\0" terminated)
800 * -c: assume checksum protected environment format
801 * addr: memory address to read from
802 * size: length of input data; if missing, proper '\0'
803 * termination is mandatory
804 */
d09b1787
IG
805static int do_env_import(cmd_tbl_t *cmdtp, int flag,
806 int argc, char * const argv[])
ea882baf
WD
807{
808 char *cmd, *addr;
809 char sep = '\n';
810 int chk = 0;
811 int fmt = 0;
812 int del = 0;
813 size_t size;
814
815 cmd = *argv;
816
817 while (--argc > 0 && **++argv == '-') {
818 char *arg = *argv;
819 while (*++arg) {
820 switch (*arg) {
821 case 'b': /* raw binary format */
822 if (fmt++)
823 goto sep_err;
824 sep = '\0';
825 break;
826 case 'c': /* external checksum format */
827 if (fmt++)
828 goto sep_err;
829 sep = '\0';
830 chk = 1;
831 break;
832 case 't': /* text format */
833 if (fmt++)
834 goto sep_err;
835 sep = '\n';
836 break;
837 case 'd':
838 del = 1;
839 break;
840 default:
4c12eeb8 841 return CMD_RET_USAGE;
ea882baf
WD
842 }
843 }
844 }
845
f3c615b8 846 if (argc < 1)
4c12eeb8 847 return CMD_RET_USAGE;
ea882baf
WD
848
849 if (!fmt)
850 printf("## Warning: defaulting to text format\n");
851
852 addr = (char *)simple_strtoul(argv[0], NULL, 16);
853
854 if (argc == 2) {
855 size = simple_strtoul(argv[1], NULL, 16);
856 } else {
857 char *s = addr;
858
859 size = 0;
860
861 while (size < MAX_ENV_SIZE) {
862 if ((*s == sep) && (*(s+1) == '\0'))
863 break;
864 ++s;
865 ++size;
866 }
867 if (size == MAX_ENV_SIZE) {
868 printf("## Warning: Input data exceeds %d bytes"
869 " - truncated\n", MAX_ENV_SIZE);
870 }
d3f80c77 871 size += 2;
79afc88d 872 printf("## Info: input data size = %zu = 0x%zX\n", size, size);
ea882baf
WD
873 }
874
875 if (chk) {
876 uint32_t crc;
877 env_t *ep = (env_t *)addr;
878
879 size -= offsetof(env_t, data);
880 memcpy(&crc, &ep->crc, sizeof(crc));
881
882 if (crc32(0, ep->data, size) != crc) {
883 puts("## Error: bad CRC, import failed\n");
884 return 1;
885 }
886 addr = (char *)ep->data;
887 }
888
2eb1573f 889 if (himport_r(&env_htab, addr, size, sep, del ? 0 : H_NOCLEAR) == 0) {
ea882baf
WD
890 error("Environment import failed: errno = %d\n", errno);
891 return 1;
892 }
893 gd->flags |= GD_FLG_ENV_READY;
894
895 return 0;
896
897sep_err:
898 printf("## %s: only one of \"-b\", \"-c\" or \"-t\" allowed\n",
899 cmd);
900 return 1;
901}
0c79cda0 902#endif
ea882baf 903
ea882baf
WD
904/*
905 * New command line interface: "env" command with subcommands
906 */
907static cmd_tbl_t cmd_env_sub[] = {
908#if defined(CONFIG_CMD_ASKENV)
909 U_BOOT_CMD_MKENT(ask, CONFIG_SYS_MAXARGS, 1, do_env_ask, "", ""),
910#endif
911 U_BOOT_CMD_MKENT(default, 1, 0, do_env_default, "", ""),
912 U_BOOT_CMD_MKENT(delete, 2, 0, do_env_delete, "", ""),
913#if defined(CONFIG_CMD_EDITENV)
914 U_BOOT_CMD_MKENT(edit, 2, 0, do_env_edit, "", ""),
915#endif
0c79cda0 916#if defined(CONFIG_CMD_EXPORTENV)
ea882baf 917 U_BOOT_CMD_MKENT(export, 4, 0, do_env_export, "", ""),
0c79cda0 918#endif
a000b795
KP
919#if defined(CONFIG_CMD_GREPENV)
920 U_BOOT_CMD_MKENT(grep, CONFIG_SYS_MAXARGS, 1, do_env_grep, "", ""),
921#endif
0c79cda0 922#if defined(CONFIG_CMD_IMPORTENV)
ea882baf 923 U_BOOT_CMD_MKENT(import, 5, 0, do_env_import, "", ""),
0c79cda0 924#endif
ea882baf
WD
925 U_BOOT_CMD_MKENT(print, CONFIG_SYS_MAXARGS, 1, do_env_print, "", ""),
926#if defined(CONFIG_CMD_RUN)
927 U_BOOT_CMD_MKENT(run, CONFIG_SYS_MAXARGS, 1, do_run, "", ""),
928#endif
929#if defined(CONFIG_CMD_SAVEENV) && !defined(CONFIG_ENV_IS_NOWHERE)
930 U_BOOT_CMD_MKENT(save, 1, 0, do_env_save, "", ""),
931#endif
932 U_BOOT_CMD_MKENT(set, CONFIG_SYS_MAXARGS, 0, do_env_set, "", ""),
933};
934
2e5167cc 935#if defined(CONFIG_NEEDS_MANUAL_RELOC)
60f7da1f
HS
936void env_reloc(void)
937{
938 fixup_cmdtable(cmd_env_sub, ARRAY_SIZE(cmd_env_sub));
939}
940#endif
941
f3c615b8 942static int do_env(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
ea882baf
WD
943{
944 cmd_tbl_t *cp;
945
5904da02 946 if (argc < 2)
4c12eeb8 947 return CMD_RET_USAGE;
5904da02 948
ea882baf
WD
949 /* drop initial "env" arg */
950 argc--;
951 argv++;
952
953 cp = find_cmd_tbl(argv[0], cmd_env_sub, ARRAY_SIZE(cmd_env_sub));
954
955 if (cp)
956 return cp->cmd(cmdtp, flag, argc, argv);
957
4c12eeb8 958 return CMD_RET_USAGE;
ea882baf
WD
959}
960
961U_BOOT_CMD(
962 env, CONFIG_SYS_MAXARGS, 1, do_env,
963 "environment handling commands",
964#if defined(CONFIG_CMD_ASKENV)
965 "ask name [message] [size] - ask for environment variable\nenv "
966#endif
967 "default -f - reset default environment\n"
968#if defined(CONFIG_CMD_EDITENV)
969 "env edit name - edit environment variable\n"
970#endif
37f2fe74 971 "env export [-t | -b | -c] [-s size] addr [var ...] - export environment\n"
a000b795
KP
972#if defined(CONFIG_CMD_GREPENV)
973 "env grep string [...] - search environment\n"
974#endif
975 "env import [-d] [-t | -b | -c] addr [size] - import environment\n"
ea882baf
WD
976 "env print [name ...] - print environment\n"
977#if defined(CONFIG_CMD_RUN)
978 "env run var [...] - run commands in an environment variable\n"
979#endif
d798a9b5 980#if defined(CONFIG_CMD_SAVEENV) && !defined(CONFIG_ENV_IS_NOWHERE)
ea882baf 981 "env save - save environment\n"
d798a9b5 982#endif
ea882baf
WD
983 "env set [-f] name [arg ...]\n"
984);
985
986/*
987 * Old command line interface, kept for compatibility
988 */
8bde7f77 989
246c6922 990#if defined(CONFIG_CMD_EDITENV)
722b061b 991U_BOOT_CMD_COMPLETE(
ea882baf 992 editenv, 2, 0, do_env_edit,
246c6922
PT
993 "edit environment variable",
994 "name\n"
722b061b
MF
995 " - edit environment variable 'name'",
996 var_complete
246c6922
PT
997);
998#endif
999
722b061b 1000U_BOOT_CMD_COMPLETE(
ea882baf 1001 printenv, CONFIG_SYS_MAXARGS, 1, do_env_print,
2fb2604d 1002 "print environment variables",
8bde7f77
WD
1003 "\n - print values of all environment variables\n"
1004 "printenv name ...\n"
722b061b
MF
1005 " - print value of environment variable 'name'",
1006 var_complete
8bde7f77
WD
1007);
1008
a000b795
KP
1009#ifdef CONFIG_CMD_GREPENV
1010U_BOOT_CMD_COMPLETE(
1011 grepenv, CONFIG_SYS_MAXARGS, 0, do_env_grep,
1012 "search environment variables",
1013 "string ...\n"
1014 " - list environment name=value pairs matching 'string'",
1015 var_complete
1016);
1017#endif
1018
722b061b 1019U_BOOT_CMD_COMPLETE(
ea882baf 1020 setenv, CONFIG_SYS_MAXARGS, 0, do_env_set,
2fb2604d 1021 "set environment variables",
8bde7f77
WD
1022 "name value ...\n"
1023 " - set environment variable 'name' to 'value ...'\n"
1024 "setenv name\n"
722b061b
MF
1025 " - delete environment variable 'name'",
1026 var_complete
8bde7f77
WD
1027);
1028
c76fe474 1029#if defined(CONFIG_CMD_ASKENV)
8bde7f77 1030
0d498393 1031U_BOOT_CMD(
ea882baf 1032 askenv, CONFIG_SYS_MAXARGS, 1, do_env_ask,
2fb2604d 1033 "get environment variables from stdin",
8bde7f77
WD
1034 "name [message] [size]\n"
1035 " - get environment variable 'name' from stdin (max 'size' chars)\n"
1036 "askenv name\n"
1037 " - get environment variable 'name' from stdin\n"
1038 "askenv name size\n"
1039 " - get environment variable 'name' from stdin (max 'size' chars)\n"
1040 "askenv name [message] size\n"
1041 " - display 'message' string and get environment variable 'name'"
a89c33db 1042 "from stdin (max 'size' chars)"
8bde7f77 1043);
90253178 1044#endif
8bde7f77 1045
c76fe474 1046#if defined(CONFIG_CMD_RUN)
722b061b 1047U_BOOT_CMD_COMPLETE(
6d0f6bcf 1048 run, CONFIG_SYS_MAXARGS, 1, do_run,
2fb2604d 1049 "run commands in an environment variable",
8bde7f77 1050 "var [...]\n"
722b061b
MF
1051 " - run the commands in the environment variable(s) 'var'",
1052 var_complete
8bde7f77 1053);
90253178 1054#endif