[u-boot.git] / common / cmd_nvedit.c

/*
 * (C) Copyright 2000-2002
 * Wolfgang Denk, DENX Software Engineering, [email protected].
 *
 * (C) Copyright 2001 Sysgo Real-Time Solutions, GmbH <www.elinos.com>
 * Andreas Heppel <[email protected]>

 * See file CREDITS for list of people who contributed to this
 * project.
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License as
 * published by the Free Software Foundation; either version 2 of
 * the License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.	 See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
 * MA 02111-1307 USA
 */

/**************************************************************************
 *
 * Support for persistent environment data
 *
 * The "environment" is stored as a list of '\0' terminated
 * "name=value" strings. The end of the list is marked by a double
 * '\0'. New entries are always added at the end. Deleting an entry
 * shifts the remaining entries to the front. Replacing an entry is a
 * combination of deleting the old value and adding the new one.
 *
 * The environment is preceeded by a 32 bit CRC over the data part.
 *
 **************************************************************************
 */

#include <common.h>
#include <command.h>
#include <environment.h>
#if defined(CONFIG_CMD_EDITENV)
#include <malloc.h>
#endif
#include <watchdog.h>
#include <serial.h>
#include <linux/stddef.h>
#include <asm/byteorder.h>
#if defined(CONFIG_CMD_NET)
#include <net.h>
#endif

DECLARE_GLOBAL_DATA_PTR;

#if !defined(CONFIG_ENV_IS_IN_EEPROM)	&& \
    !defined(CONFIG_ENV_IS_IN_FLASH)	&& \
    !defined(CONFIG_ENV_IS_IN_DATAFLASH)	&& \
    !defined(CONFIG_ENV_IS_IN_MG_DISK)	&& \
    !defined(CONFIG_ENV_IS_IN_NAND)	&& \
    !defined(CONFIG_ENV_IS_IN_NVRAM)	&& \
    !defined(CONFIG_ENV_IS_IN_ONENAND)	&& \
    !defined(CONFIG_ENV_IS_IN_SPI_FLASH)	&& \
    !defined(CONFIG_ENV_IS_NOWHERE)
# error Define one of CONFIG_ENV_IS_IN_{EEPROM|FLASH|DATAFLASH|ONENAND|\
SPI_FLASH|MG_DISK|NVRAM|NOWHERE}
#endif

#define XMK_STR(x)	#x
#define MK_STR(x)	XMK_STR(x)

/************************************************************************
************************************************************************/

/*
 * Table with supported baudrates (defined in config_xyz.h)
 */
static const unsigned long baudrate_table[] = CONFIG_SYS_BAUDRATE_TABLE;
#define	N_BAUDRATES (sizeof(baudrate_table) / sizeof(baudrate_table[0]))

/*
 * This variable is incremented on each do_setenv (), so it can
 * be used via get_env_id() as an indication, if the environment
 * has changed or not. So it is possible to reread an environment
 * variable only if the environment was changed ... done so for
 * example in NetInitLoop()
 */
static int env_id = 1;

int get_env_id (void)
{
	return env_id;
}
/************************************************************************
 * Command interface: print one or all environment variables
 */

/*
 * state 0: finish printing this string and return (matched!)
 * state 1: no matching to be done; print everything
 * state 2: continue searching for matched name
 */
static int printenv(char *name, int state)
{
	int i, j;
	char c, buf[17];

	i = 0;
	buf[16] = '\0';

	while (state && env_get_char(i) != '\0') {
		if (state == 2 && envmatch((uchar *)name, i) >= 0)
			state = 0;

		j = 0;
		do {
			buf[j++] = c = env_get_char(i++);
			if (j == sizeof(buf) - 1) {
				if (state <= 1)
					puts(buf);
				j = 0;
			}
		} while (c != '\0');

		if (state <= 1) {
			if (j)
				puts(buf);
			putc('\n');
		}

		if (ctrlc())
			return -1;
	}

	if (state == 0)
		i = 0;
	return i;
}

int do_printenv (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
{
	int i;
	int rcode = 0;

	if (argc == 1) {
		/* print all env vars */
		rcode = printenv(NULL, 1);
		if (rcode < 0)
			return 1;
		printf("\nEnvironment size: %d/%ld bytes\n",
			rcode, (ulong)ENV_SIZE);
		return 0;
	}

	/* print selected env vars */
	for (i = 1; i < argc; ++i) {
		char *name = argv[i];
		if (printenv(name, 2)) {
			printf("## Error: \"%s\" not defined\n", name);
			++rcode;
		}
	}

	return rcode;
}

/************************************************************************
 * Set a new environment variable,
 * or replace or delete an existing one.
 *
 * This function will ONLY work with a in-RAM copy of the environment
 */

int _do_setenv (int flag, int argc, char * const argv[])
{
	int   i, len, oldval;
	int   console = -1;
	uchar *env, *nxt = NULL;
	char *name;
	bd_t *bd = gd->bd;

	uchar *env_data = env_get_addr(0);

	if (!env_data)	/* need copy in RAM */
		return 1;

	name = argv[1];

	if (strchr(name, '=')) {
		printf ("## Error: illegal character '=' in variable name \"%s\"\n", name);
		return 1;
	}

	env_id++;
	/*
	 * search if variable with this name already exists
	 */
	oldval = -1;
	for (env=env_data; *env; env=nxt+1) {
		for (nxt=env; *nxt; ++nxt)
			;
		if ((oldval = envmatch((uchar *)name, env-env_data)) >= 0)
			break;
	}

	/* Check for console redirection */
	if (strcmp(name,"stdin") == 0) {
		console = stdin;
	} else if (strcmp(name,"stdout") == 0) {
		console = stdout;
	} else if (strcmp(name,"stderr") == 0) {
		console = stderr;
	}

	if (console != -1) {
		if (argc < 3) {		/* Cannot delete it! */
			printf("Can't delete \"%s\"\n", name);
			return 1;
		}

#ifdef CONFIG_CONSOLE_MUX
		i = iomux_doenv(console, argv[2]);
		if (i)
			return i;
#else
		/* Try assigning specified device */
		if (console_assign (console, argv[2]) < 0)
			return 1;

#ifdef CONFIG_SERIAL_MULTI
		if (serial_assign (argv[2]) < 0)
			return 1;
#endif
#endif /* CONFIG_CONSOLE_MUX */
	}

	/*
	 * Delete any existing definition
	 */
	if (oldval >= 0) {
#ifndef CONFIG_ENV_OVERWRITE

		/*
		 * Ethernet Address and serial# can be set only once,
		 * ver is readonly.
		 */
		if (
#ifdef CONFIG_HAS_UID
		/* Allow serial# forced overwrite with 0xdeaf4add flag */
		    ((strcmp (name, "serial#") == 0) && (flag != 0xdeaf4add)) ||
#else
		    (strcmp (name, "serial#") == 0) ||
#endif
		    ((strcmp (name, "ethaddr") == 0)
#if defined(CONFIG_OVERWRITE_ETHADDR_ONCE) && defined(CONFIG_ETHADDR)
		     && (strcmp ((char *)env_get_addr(oldval),MK_STR(CONFIG_ETHADDR)) != 0)
#endif	/* CONFIG_OVERWRITE_ETHADDR_ONCE && CONFIG_ETHADDR */
		    ) ) {
			printf ("Can't overwrite \"%s\"\n", name);
			return 1;
		}
#endif

		/*
		 * Switch to new baudrate if new baudrate is supported
		 */
		if (strcmp(argv[1],"baudrate") == 0) {
			int baudrate = simple_strtoul(argv[2], NULL, 10);
			int i;
			for (i=0; i<N_BAUDRATES; ++i) {
				if (baudrate == baudrate_table[i])
					break;
			}
			if (i == N_BAUDRATES) {
				printf ("## Baudrate %d bps not supported\n",
					baudrate);
				return 1;
			}
			printf ("## Switch baudrate to %d bps and press ENTER ...\n",
				baudrate);
			udelay(50000);
			gd->baudrate = baudrate;
#if defined(CONFIG_PPC) || defined(CONFIG_MCF52x2)
			gd->bd->bi_baudrate = baudrate;
#endif

			serial_setbrg ();
			udelay(50000);
			for (;;) {
				if (getc() == '\r')
				      break;
			}
		}

		if (*++nxt == '\0') {
			if (env > env_data) {
				env--;
			} else {
				*env = '\0';
			}
		} else {
			for (;;) {
				*env = *nxt++;
				if ((*env == '\0') && (*nxt == '\0'))
					break;
				++env;
			}
		}
		*++env = '\0';
	}

	/* Delete only ? */
	if ((argc < 3) || argv[2] == NULL) {
		env_crc_update ();
		return 0;
	}

	/*
	 * Append new definition at the end
	 */
	for (env=env_data; *env || *(env+1); ++env)
		;
	if (env > env_data)
		++env;
	/*
	 * Overflow when:
	 * "name" + "=" + "val" +"\0\0"  > ENV_SIZE - (env-env_data)
	 */
	len = strlen(name) + 2;
	/* add '=' for first arg, ' ' for all others */
	for (i=2; i<argc; ++i) {
		len += strlen(argv[i]) + 1;
	}
	if (len > (&env_data[ENV_SIZE]-env)) {
		printf ("## Error: environment overflow, \"%s\" deleted\n", name);
		return 1;
	}
	while ((*env = *name++) != '\0')
		env++;
	for (i=2; i<argc; ++i) {
		char *val = argv[i];

		*env = (i==2) ? '=' : ' ';
		while ((*++env = *val++) != '\0')
			;
	}

	/* end is marked with double '\0' */
	*++env = '\0';

	/* Update CRC */
	env_crc_update ();

	/*
	 * Some variables should be updated when the corresponding
	 * entry in the enviornment is changed
	 */

	if (strcmp(argv[1],"ethaddr") == 0)
		return 0;

	if (strcmp(argv[1],"ipaddr") == 0) {
		char *s = argv[2];	/* always use only one arg */
		char *e;
		unsigned long addr;
		bd->bi_ip_addr = 0;
		for (addr=0, i=0; i<4; ++i) {
			ulong val = s ? simple_strtoul(s, &e, 10) : 0;
			addr <<= 8;
			addr  |= (val & 0xFF);
			if (s) s = (*e) ? e+1 : e;
		}
		bd->bi_ip_addr = htonl(addr);
		return 0;
	}
	if (strcmp(argv[1],"loadaddr") == 0) {
		load_addr = simple_strtoul(argv[2], NULL, 16);
		return 0;
	}
#if defined(CONFIG_CMD_NET)
	if (strcmp(argv[1],"bootfile") == 0) {
		copy_filename (BootFile, argv[2], sizeof(BootFile));
		return 0;
	}
#endif
	return 0;
}

int setenv (char *varname, char *varvalue)
{
	char * const argv[4] = { "setenv", varname, varvalue, NULL };
	if ((varvalue == NULL) || (varvalue[0] == '\0'))
		return _do_setenv (0, 2, argv);
	else
		return _do_setenv (0, 3, argv);
}

#ifdef CONFIG_HAS_UID
void forceenv (char *varname, char *varvalue)
{
	char * const argv[4] = { "forceenv", varname, varvalue, NULL };
	_do_setenv (0xdeaf4add, 3, argv);
}
#endif

int do_setenv (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
{
	if (argc < 2) {
		cmd_usage(cmdtp);
		return 1;
	}

	return _do_setenv (flag, argc, argv);
}

/************************************************************************
 * Prompt for environment variable
 */

#if defined(CONFIG_CMD_ASKENV)
int do_askenv ( cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
{
	extern char console_buffer[CONFIG_SYS_CBSIZE];
	char message[CONFIG_SYS_CBSIZE];
	int size = CONFIG_SYS_CBSIZE - 1;
	int len;
	char *local_args[4];

	local_args[0] = argv[0];
	local_args[1] = argv[1];
	local_args[2] = NULL;
	local_args[3] = NULL;

	if (argc < 2) {
		cmd_usage(cmdtp);
		return 1;
	}
	/* Check the syntax */
	switch (argc) {
	case 1:
		cmd_usage(cmdtp);
		return 1;

	case 2:		/* askenv envname */
		sprintf (message, "Please enter '%s':", argv[1]);
		break;

	case 3:		/* askenv envname size */
		sprintf (message, "Please enter '%s':", argv[1]);
		size = simple_strtoul (argv[2], NULL, 10);
		break;

	default:	/* askenv envname message1 ... messagen size */
	    {
		int i;
		int pos = 0;

		for (i = 2; i < argc - 1; i++) {
			if (pos) {
				message[pos++] = ' ';
			}
			strcpy (message+pos, argv[i]);
			pos += strlen(argv[i]);
		}
		message[pos] = '\0';
		size = simple_strtoul (argv[argc - 1], NULL, 10);
	    }
		break;
	}

	if (size >= CONFIG_SYS_CBSIZE)
		size = CONFIG_SYS_CBSIZE - 1;

	if (size <= 0)
		return 1;

	/* prompt for input */
	len = readline (message);

	if (size < len)
		console_buffer[size] = '\0';

	len = 2;
	if (console_buffer[0] != '\0') {
		local_args[2] = console_buffer;
		len = 3;
	}

	/* Continue calling setenv code */
	return _do_setenv (flag, len, local_args);
}
#endif

/************************************************************************
 * Interactively edit an environment variable
 */
#if defined(CONFIG_CMD_EDITENV)
int do_editenv(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
{
	char buffer[CONFIG_SYS_CBSIZE];
	char *init_val;
	int len;

	if (argc < 2) {
		cmd_usage(cmdtp);
		return 1;
	}

	/* Set read buffer to initial value or empty sting */
	init_val = getenv(argv[1]);
	if (init_val)
		len = sprintf(buffer, "%s", init_val);
	else
		buffer[0] = '\0';

	readline_into_buffer("edit: ", buffer);

	return setenv(argv[1], buffer);
}
#endif /* CONFIG_CMD_EDITENV */

/************************************************************************
 * Look up variable from environment,
 * return address of storage for that variable,
 * or NULL if not found
 */

char *getenv (char *name)
{
	int i, nxt;

	WATCHDOG_RESET();

	for (i=0; env_get_char(i) != '\0'; i=nxt+1) {
		int val;

		for (nxt=i; env_get_char(nxt) != '\0'; ++nxt) {
			if (nxt >= CONFIG_ENV_SIZE) {
				return (NULL);
			}
		}
		if ((val=envmatch((uchar *)name, i)) < 0)
			continue;
		return ((char *)env_get_addr(val));
	}

	return (NULL);
}

int getenv_r (char *name, char *buf, unsigned len)
{
	int i, nxt;

	for (i=0; env_get_char(i) != '\0'; i=nxt+1) {
		int val, n;

		for (nxt=i; env_get_char(nxt) != '\0'; ++nxt) {
			if (nxt >= CONFIG_ENV_SIZE) {
				return (-1);
			}
		}
		if ((val=envmatch((uchar *)name, i)) < 0)
			continue;
		/* found; copy out */
		n = 0;
		while ((len > n++) && (*buf++ = env_get_char(val++)) != '\0')
			;
		if (len == n)
			*buf = '\0';
		return (n);
	}
	return (-1);
}

#if defined(CONFIG_CMD_SAVEENV) && !defined(CONFIG_ENV_IS_NOWHERE)

int do_saveenv (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
{
	extern char * env_name_spec;

	printf ("Saving Environment to %s...\n", env_name_spec);

	return (saveenv() ? 1 : 0);
}

U_BOOT_CMD(
	saveenv, 1, 0,	do_saveenv,
	"save environment variables to persistent storage",
	""
);

#endif


/************************************************************************
 * Match a name / name=value pair
 *
 * s1 is either a simple 'name', or a 'name=value' pair.
 * i2 is the environment index for a 'name2=value2' pair.
 * If the names match, return the index for the value2, else NULL.
 */

int envmatch (uchar *s1, int i2)
{

	while (*s1 == env_get_char(i2++))
		if (*s1++ == '=')
			return(i2);
	if (*s1 == '\0' && env_get_char(i2-1) == '=')
		return(i2);
	return(-1);
}


/**************************************************/

#if defined(CONFIG_CMD_EDITENV)
U_BOOT_CMD(
	editenv, 2, 0,	do_editenv,
	"edit environment variable",
	"name\n"
	"    - edit environment variable 'name'"
);
#endif

U_BOOT_CMD(
	printenv, CONFIG_SYS_MAXARGS, 1,	do_printenv,
	"print environment variables",
	"\n    - print values of all environment variables\n"
	"printenv name ...\n"
	"    - print value of environment variable 'name'"
);

U_BOOT_CMD(
	setenv, CONFIG_SYS_MAXARGS, 0,	do_setenv,
	"set environment variables",
	"name value ...\n"
	"    - set environment variable 'name' to 'value ...'\n"
	"setenv name\n"
	"    - delete environment variable 'name'"
);

#if defined(CONFIG_CMD_ASKENV)

U_BOOT_CMD(
	askenv,	CONFIG_SYS_MAXARGS,	1,	do_askenv,
	"get environment variables from stdin",
	"name [message] [size]\n"
	"    - get environment variable 'name' from stdin (max 'size' chars)\n"
	"askenv name\n"
	"    - get environment variable 'name' from stdin\n"
	"askenv name size\n"
	"    - get environment variable 'name' from stdin (max 'size' chars)\n"
	"askenv name [message] size\n"
	"    - display 'message' string and get environment variable 'name'"
	"from stdin (max 'size' chars)"
);
#endif

#if defined(CONFIG_CMD_RUN)
int do_run (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]);
U_BOOT_CMD(
	run,	CONFIG_SYS_MAXARGS,	1,	do_run,
	"run commands in an environment variable",
	"var [...]\n"
	"    - run the commands in the environment variable(s) 'var'"
);
#endif
Commit	Line	Data
a68d3ed0 WD	1	/*
	2	* (C) Copyright 2000-2002
	3	* Wolfgang Denk, DENX Software Engineering, [email protected].
	4	*
	5	* (C) Copyright 2001 Sysgo Real-Time Solutions, GmbH <www.elinos.com>
	6	* Andreas Heppel <[email protected]>
	7
	8	* See file CREDITS for list of people who contributed to this
	9	* project.
	10	*
	11	* This program is free software; you can redistribute it and/or
	12	* modify it under the terms of the GNU General Public License as
	13	* published by the Free Software Foundation; either version 2 of
	14	* the License, or (at your option) any later version.
	15	*
	16	* This program is distributed in the hope that it will be useful,
	17	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	18	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	19	* GNU General Public License for more details.
	20	*
	21	* You should have received a copy of the GNU General Public License
	22	* along with this program; if not, write to the Free Software
	23	* Foundation, Inc., 59 Temple Place, Suite 330, Boston,
	24	* MA 02111-1307 USA
	25	*/
	26
	27	/**************************************************************************
	28	*
	29	* Support for persistent environment data
	30	*
	31	* The "environment" is stored as a list of '\0' terminated
	32	* "name=value" strings. The end of the list is marked by a double
	33	* '\0'. New entries are always added at the end. Deleting an entry
	34	* shifts the remaining entries to the front. Replacing an entry is a
	35	* combination of deleting the old value and adding the new one.
	36	*
	37	* The environment is preceeded by a 32 bit CRC over the data part.
	38	*
	39	**************************************************************************
	40	*/
	41
	42	#include <common.h>
	43	#include <command.h>
	44	#include <environment.h>
246c6922 PT	45	#if defined(CONFIG_CMD_EDITENV)
	46	#include <malloc.h>
	47	#endif
2a3cb020	48	#include <watchdog.h>
281e00a3	49	#include <serial.h>
a68d3ed0 WD	50	#include <linux/stddef.h>
a68d3ed0 WD	51	#include <asm/byteorder.h>
c76fe474	52	#if defined(CONFIG_CMD_NET)
a68d3ed0 WD	53	#include <net.h>
	54	#endif
	55
d87080b7 WD	56	DECLARE_GLOBAL_DATA_PTR;
d87080b7 WD	57
75eb82ec	58	#if !defined(CONFIG_ENV_IS_IN_EEPROM) && \
5a1aceb0	59	!defined(CONFIG_ENV_IS_IN_FLASH) && \
057c849c	60	!defined(CONFIG_ENV_IS_IN_DATAFLASH) && \
75eb82ec	61	!defined(CONFIG_ENV_IS_IN_MG_DISK) && \
51bfee19	62	!defined(CONFIG_ENV_IS_IN_NAND) && \
75eb82ec	63	!defined(CONFIG_ENV_IS_IN_NVRAM) && \
9656138f	64	!defined(CONFIG_ENV_IS_IN_ONENAND) && \
0b5099a8	65	!defined(CONFIG_ENV_IS_IN_SPI_FLASH) && \
93f6d725	66	!defined(CONFIG_ENV_IS_NOWHERE)
75eb82ec K	67	# error Define one of CONFIG_ENV_IS_IN_{EEPROM\|FLASH\|DATAFLASH\|ONENAND\|\
75eb82ec K	68	SPI_FLASH\|MG_DISK\|NVRAM\|NOWHERE}
a68d3ed0 WD	69	#endif
	70
	71	#define XMK_STR(x) #x
	72	#define MK_STR(x) XMK_STR(x)
	73
	74	/************************************************************************
	75	************************************************************************/
	76
a68d3ed0 WD	77	/*
	78	* Table with supported baudrates (defined in config_xyz.h)
	79	*/
6d0f6bcf	80	static const unsigned long baudrate_table[] = CONFIG_SYS_BAUDRATE_TABLE;
a68d3ed0 WD	81	#define N_BAUDRATES (sizeof(baudrate_table) / sizeof(baudrate_table[0]))
a68d3ed0 WD	82
da95427c HS	83	/*
	84	* This variable is incremented on each do_setenv (), so it can
	85	* be used via get_env_id() as an indication, if the environment
	86	* has changed or not. So it is possible to reread an environment
	87	* variable only if the environment was changed ... done so for
	88	* example in NetInitLoop()
	89	*/
2f70c49e	90	static int env_id = 1;
a68d3ed0	91
2f70c49e HS	92	int get_env_id (void)
	93	{
	94	return env_id;
	95	}
a68d3ed0 WD	96	/************************************************************************
	97	* Command interface: print one or all environment variables
	98	*/
	99
4c94f6c5 MF	100	/*
	101	* state 0: finish printing this string and return (matched!)
	102	* state 1: no matching to be done; print everything
	103	* state 2: continue searching for matched name
	104	*/
	105	static int printenv(char *name, int state)
a68d3ed0	106	{
4c94f6c5 MF	107	int i, j;
	108	char c, buf[17];
	109
	110	i = 0;
	111	buf[16] = '\0';
	112
	113	while (state && env_get_char(i) != '\0') {
	114	if (state == 2 && envmatch((uchar *)name, i) >= 0)
	115	state = 0;
	116
	117	j = 0;
	118	do {
	119	buf[j++] = c = env_get_char(i++);
	120	if (j == sizeof(buf) - 1) {
	121	if (state <= 1)
	122	puts(buf);
	123	j = 0;
a68d3ed0	124	}
4c94f6c5	125	} while (c != '\0');
a68d3ed0	126
4c94f6c5 MF	127	if (state <= 1) {
	128	if (j)
	129	puts(buf);
	130	putc('\n');
	131	}
a68d3ed0	132
4c94f6c5 MF	133	if (ctrlc())
4c94f6c5 MF	134	return -1;
a68d3ed0 WD	135	}
a68d3ed0 WD	136
4c94f6c5 MF	137	if (state == 0)
	138	i = 0;
	139	return i;
	140	}
a68d3ed0	141
54841ab5	142	int do_printenv (cmd_tbl_t cmdtp, int flag, int argc, char const argv[])
4c94f6c5 MF	143	{
	144	int i;
	145	int rcode = 0;
a68d3ed0	146
4c94f6c5 MF	147	if (argc == 1) {
	148	/* print all env vars */
	149	rcode = printenv(NULL, 1);
	150	if (rcode < 0)
	151	return 1;
	152	printf("\nEnvironment size: %d/%ld bytes\n",
	153	rcode, (ulong)ENV_SIZE);
	154	return 0;
	155	}
a68d3ed0	156
4c94f6c5 MF	157	/* print selected env vars */
	158	for (i = 1; i < argc; ++i) {
	159	char *name = argv[i];
	160	if (printenv(name, 2)) {
	161	printf("## Error: \"%s\" not defined\n", name);
	162	++rcode;
a68d3ed0 WD	163	}
a68d3ed0 WD	164	}
4c94f6c5	165
a68d3ed0 WD	166	return rcode;
	167	}
	168
	169	/************************************************************************
	170	* Set a new environment variable,
	171	* or replace or delete an existing one.
	172	*
	173	* This function will ONLY work with a in-RAM copy of the environment
	174	*/
	175
54841ab5	176	int _do_setenv (int flag, int argc, char * const argv[])
a68d3ed0	177	{
a68d3ed0 WD	178	int i, len, oldval;
	179	int console = -1;
	180	uchar env, nxt = NULL;
77ddac94	181	char *name;
a68d3ed0 WD	182	bd_t *bd = gd->bd;
	183
	184	uchar *env_data = env_get_addr(0);
	185
	186	if (!env_data) /* need copy in RAM */
	187	return 1;
	188
	189	name = argv[1];
	190
471a7be7 WD	191	if (strchr(name, '=')) {
	192	printf ("## Error: illegal character '=' in variable name \"%s\"\n", name);
	193	return 1;
	194	}
	195
2f70c49e	196	env_id++;
a68d3ed0 WD	197	/*
	198	* search if variable with this name already exists
	199	*/
	200	oldval = -1;
	201	for (env=env_data; *env; env=nxt+1) {
	202	for (nxt=env; *nxt; ++nxt)
	203	;
77ddac94	204	if ((oldval = envmatch((uchar *)name, env-env_data)) >= 0)
a68d3ed0 WD	205	break;
	206	}
	207
9c5586aa AR	208	/* Check for console redirection */
	209	if (strcmp(name,"stdin") == 0) {
	210	console = stdin;
	211	} else if (strcmp(name,"stdout") == 0) {
	212	console = stdout;
	213	} else if (strcmp(name,"stderr") == 0) {
	214	console = stderr;
	215	}
	216
	217	if (console != -1) {
	218	if (argc < 3) { /* Cannot delete it! */
	219	printf("Can't delete \"%s\"\n", name);
	220	return 1;
	221	}
	222
	223	#ifdef CONFIG_CONSOLE_MUX
	224	i = iomux_doenv(console, argv[2]);
	225	if (i)
	226	return i;
	227	#else
	228	/* Try assigning specified device */
	229	if (console_assign (console, argv[2]) < 0)
	230	return 1;
	231
	232	#ifdef CONFIG_SERIAL_MULTI
	233	if (serial_assign (argv[2]) < 0)
	234	return 1;
	235	#endif
	236	#endif /* CONFIG_CONSOLE_MUX */
	237	}
	238
a68d3ed0 WD	239	/*
	240	* Delete any existing definition
	241	*/
	242	if (oldval >= 0) {
	243	#ifndef CONFIG_ENV_OVERWRITE
	244
	245	/*
0587597c SR	246	* Ethernet Address and serial# can be set only once,
0587597c SR	247	* ver is readonly.
a68d3ed0	248	*/
f6a69559	249	if (
c74b2108 SK	250	#ifdef CONFIG_HAS_UID
c74b2108 SK	251	/* Allow serial# forced overwrite with 0xdeaf4add flag */
f6a69559	252	((strcmp (name, "serial#") == 0) && (flag != 0xdeaf4add)) \|\|
c74b2108	253	#else
f6a69559	254	(strcmp (name, "serial#") == 0) \|\|
c74b2108	255	#endif
a68d3ed0 WD	256	((strcmp (name, "ethaddr") == 0)
a68d3ed0 WD	257	#if defined(CONFIG_OVERWRITE_ETHADDR_ONCE) && defined(CONFIG_ETHADDR)
77ddac94	258	&& (strcmp ((char *)env_get_addr(oldval),MK_STR(CONFIG_ETHADDR)) != 0)
a68d3ed0 WD	259	#endif /* CONFIG_OVERWRITE_ETHADDR_ONCE && CONFIG_ETHADDR */
	260	) ) {
	261	printf ("Can't overwrite \"%s\"\n", name);
	262	return 1;
	263	}
	264	#endif
	265
a68d3ed0 WD	266	/*
	267	* Switch to new baudrate if new baudrate is supported
	268	*/
	269	if (strcmp(argv[1],"baudrate") == 0) {
	270	int baudrate = simple_strtoul(argv[2], NULL, 10);
	271	int i;
	272	for (i=0; i<N_BAUDRATES; ++i) {
	273	if (baudrate == baudrate_table[i])
	274	break;
	275	}
	276	if (i == N_BAUDRATES) {
	277	printf ("## Baudrate %d bps not supported\n",
	278	baudrate);
	279	return 1;
	280	}
	281	printf ("## Switch baudrate to %d bps and press ENTER ...\n",
	282	baudrate);
	283	udelay(50000);
	284	gd->baudrate = baudrate;
c84bad0e	285	#if defined(CONFIG_PPC) \|\| defined(CONFIG_MCF52x2)
d0fb80c3 WD	286	gd->bd->bi_baudrate = baudrate;
	287	#endif
	288
a68d3ed0 WD	289	serial_setbrg ();
	290	udelay(50000);
	291	for (;;) {
	292	if (getc() == '\r')
	293	break;
	294	}
	295	}
	296
	297	if (*++nxt == '\0') {
	298	if (env > env_data) {
	299	env--;
	300	} else {
	301	*env = '\0';
	302	}
	303	} else {
	304	for (;;) {
	305	env = nxt++;
	306	if ((env == '\0') && (nxt == '\0'))
	307	break;
	308	++env;
	309	}
	310	}
	311	*++env = '\0';
	312	}
	313
a68d3ed0 WD	314	/* Delete only ? */
	315	if ((argc < 3) \|\| argv[2] == NULL) {
	316	env_crc_update ();
	317	return 0;
	318	}
	319
	320	/*
	321	* Append new definition at the end
	322	*/
	323	for (env=env_data; env \|\| (env+1); ++env)
	324	;
	325	if (env > env_data)
	326	++env;
	327	/*
	328	* Overflow when:
	329	* "name" + "=" + "val" +"\0\0" > ENV_SIZE - (env-env_data)
	330	*/
	331	len = strlen(name) + 2;
	332	/* add '=' for first arg, ' ' for all others */
	333	for (i=2; i<argc; ++i) {
	334	len += strlen(argv[i]) + 1;
	335	}
	336	if (len > (&env_data[ENV_SIZE]-env)) {
	337	printf ("## Error: environment overflow, \"%s\" deleted\n", name);
	338	return 1;
	339	}
	340	while ((env = name++) != '\0')
	341	env++;
	342	for (i=2; i<argc; ++i) {
	343	char *val = argv[i];
	344
	345	*env = (i==2) ? '=' : ' ';
	346	while ((++env = val++) != '\0')
	347	;
	348	}
	349
	350	/* end is marked with double '\0' */
	351	*++env = '\0';
	352
	353	/* Update CRC */
	354	env_crc_update ();
	355
	356	/*
	357	* Some variables should be updated when the corresponding
	358	* entry in the enviornment is changed
	359	*/
	360
56b555a6	361	if (strcmp(argv[1],"ethaddr") == 0)
a68d3ed0	362	return 0;
a68d3ed0 WD	363
	364	if (strcmp(argv[1],"ipaddr") == 0) {
	365	char s = argv[2]; / always use only one arg */
	366	char *e;
	367	unsigned long addr;
	368	bd->bi_ip_addr = 0;
	369	for (addr=0, i=0; i<4; ++i) {
	370	ulong val = s ? simple_strtoul(s, &e, 10) : 0;
	371	addr <<= 8;
	372	addr \|= (val & 0xFF);
	373	if (s) s = (*e) ? e+1 : e;
	374	}
	375	bd->bi_ip_addr = htonl(addr);
	376	return 0;
	377	}
	378	if (strcmp(argv[1],"loadaddr") == 0) {
	379	load_addr = simple_strtoul(argv[2], NULL, 16);
	380	return 0;
	381	}
c76fe474	382	#if defined(CONFIG_CMD_NET)
a68d3ed0 WD	383	if (strcmp(argv[1],"bootfile") == 0) {
	384	copy_filename (BootFile, argv[2], sizeof(BootFile));
	385	return 0;
	386	}
90253178	387	#endif
a68d3ed0 WD	388	return 0;
	389	}
	390
75678c80	391	int setenv (char varname, char varvalue)
a68d3ed0	392	{
54841ab5	393	char * const argv[4] = { "setenv", varname, varvalue, NULL };
b0fa8e50	394	if ((varvalue == NULL) \|\| (varvalue[0] == '\0'))
75678c80	395	return _do_setenv (0, 2, argv);
9ffd451a	396	else
75678c80	397	return _do_setenv (0, 3, argv);
a68d3ed0 WD	398	}
a68d3ed0 WD	399
c74b2108 SK	400	#ifdef CONFIG_HAS_UID
	401	void forceenv (char varname, char varvalue)
	402	{
54841ab5	403	char * const argv[4] = { "forceenv", varname, varvalue, NULL };
c74b2108 SK	404	_do_setenv (0xdeaf4add, 3, argv);
	405	}
	406	#endif
	407
54841ab5	408	int do_setenv (cmd_tbl_t cmdtp, int flag, int argc, char const argv[])
a68d3ed0 WD	409	{
a68d3ed0 WD	410	if (argc < 2) {
62c3ae7c	411	cmd_usage(cmdtp);
a68d3ed0 WD	412	return 1;
	413	}
	414
	415	return _do_setenv (flag, argc, argv);
	416	}
	417
	418	/************************************************************************
	419	* Prompt for environment variable
	420	*/
	421
c76fe474	422	#if defined(CONFIG_CMD_ASKENV)
54841ab5	423	int do_askenv ( cmd_tbl_t cmdtp, int flag, int argc, char const argv[])
a68d3ed0	424	{
6d0f6bcf JCPV	425	extern char console_buffer[CONFIG_SYS_CBSIZE];
	426	char message[CONFIG_SYS_CBSIZE];
	427	int size = CONFIG_SYS_CBSIZE - 1;
a68d3ed0 WD	428	int len;
	429	char *local_args[4];
	430
	431	local_args[0] = argv[0];
	432	local_args[1] = argv[1];
	433	local_args[2] = NULL;
	434	local_args[3] = NULL;
	435
	436	if (argc < 2) {
62c3ae7c	437	cmd_usage(cmdtp);
a68d3ed0 WD	438	return 1;
	439	}
	440	/* Check the syntax */
	441	switch (argc) {
	442	case 1:
62c3ae7c	443	cmd_usage(cmdtp);
a68d3ed0 WD	444	return 1;
	445
	446	case 2: /* askenv envname */
	447	sprintf (message, "Please enter '%s':", argv[1]);
	448	break;
	449
	450	case 3: /* askenv envname size */
	451	sprintf (message, "Please enter '%s':", argv[1]);
	452	size = simple_strtoul (argv[2], NULL, 10);
	453	break;
	454
	455	default: /* askenv envname message1 ... messagen size */
	456	{
	457	int i;
	458	int pos = 0;
	459
	460	for (i = 2; i < argc - 1; i++) {
	461	if (pos) {
	462	message[pos++] = ' ';
	463	}
	464	strcpy (message+pos, argv[i]);
	465	pos += strlen(argv[i]);
	466	}
	467	message[pos] = '\0';
	468	size = simple_strtoul (argv[argc - 1], NULL, 10);
	469	}
	470	break;
	471	}
	472
6d0f6bcf JCPV	473	if (size >= CONFIG_SYS_CBSIZE)
6d0f6bcf JCPV	474	size = CONFIG_SYS_CBSIZE - 1;
a68d3ed0 WD	475
	476	if (size <= 0)
	477	return 1;
	478
	479	/* prompt for input */
	480	len = readline (message);
	481
	482	if (size < len)
	483	console_buffer[size] = '\0';
	484
	485	len = 2;
	486	if (console_buffer[0] != '\0') {
	487	local_args[2] = console_buffer;
	488	len = 3;
	489	}
	490
	491	/* Continue calling setenv code */
	492	return _do_setenv (flag, len, local_args);
	493	}
90253178	494	#endif
a68d3ed0	495
246c6922 PT	496	/************************************************************************
	497	* Interactively edit an environment variable
	498	*/
	499	#if defined(CONFIG_CMD_EDITENV)
54841ab5	500	int do_editenv(cmd_tbl_t cmdtp, int flag, int argc, char const argv[])
246c6922 PT	501	{
	502	char buffer[CONFIG_SYS_CBSIZE];
	503	char *init_val;
	504	int len;
	505
	506	if (argc < 2) {
	507	cmd_usage(cmdtp);
	508	return 1;
	509	}
	510
	511	/* Set read buffer to initial value or empty sting */
	512	init_val = getenv(argv[1]);
	513	if (init_val)
	514	len = sprintf(buffer, "%s", init_val);
	515	else
	516	buffer[0] = '\0';
	517
	518	readline_into_buffer("edit: ", buffer);
	519
	520	return setenv(argv[1], buffer);
	521	}
	522	#endif /* CONFIG_CMD_EDITENV */
	523
a68d3ed0 WD	524	/************************************************************************
	525	* Look up variable from environment,
	526	* return address of storage for that variable,
	527	* or NULL if not found
	528	*/
	529
77ddac94	530	char getenv (char name)
a68d3ed0 WD	531	{
	532	int i, nxt;
	533
2a3cb020 WD	534	WATCHDOG_RESET();
2a3cb020 WD	535
a68d3ed0 WD	536	for (i=0; env_get_char(i) != '\0'; i=nxt+1) {
	537	int val;
	538
	539	for (nxt=i; env_get_char(nxt) != '\0'; ++nxt) {
0e8d1586	540	if (nxt >= CONFIG_ENV_SIZE) {
a68d3ed0 WD	541	return (NULL);
	542	}
	543	}
77ddac94	544	if ((val=envmatch((uchar *)name, i)) < 0)
a68d3ed0	545	continue;
77ddac94	546	return ((char *)env_get_addr(val));
a68d3ed0 WD	547	}
	548
	549	return (NULL);
	550	}
	551
77ddac94	552	int getenv_r (char name, char buf, unsigned len)
a68d3ed0 WD	553	{
	554	int i, nxt;
	555
	556	for (i=0; env_get_char(i) != '\0'; i=nxt+1) {
	557	int val, n;
	558
	559	for (nxt=i; env_get_char(nxt) != '\0'; ++nxt) {
0e8d1586	560	if (nxt >= CONFIG_ENV_SIZE) {
a68d3ed0 WD	561	return (-1);
	562	}
	563	}
77ddac94	564	if ((val=envmatch((uchar *)name, i)) < 0)
a68d3ed0 WD	565	continue;
	566	/* found; copy out */
	567	n = 0;
	568	while ((len > n++) && (*buf++ = env_get_char(val++)) != '\0')
	569	;
	570	if (len == n)
	571	*buf = '\0';
	572	return (n);
	573	}
	574	return (-1);
	575	}
	576
bdab39d3	577	#if defined(CONFIG_CMD_SAVEENV) && !defined(CONFIG_ENV_IS_NOWHERE)
ba69dc26	578
54841ab5	579	int do_saveenv (cmd_tbl_t cmdtp, int flag, int argc, char const argv[])
a68d3ed0 WD	580	{
	581	extern char * env_name_spec;
	582
	583	printf ("Saving Environment to %s...\n", env_name_spec);
	584
	585	return (saveenv() ? 1 : 0);
	586	}
8bde7f77	587
ba69dc26 MF	588	U_BOOT_CMD(
ba69dc26 MF	589	saveenv, 1, 0, do_saveenv,
2fb2604d	590	"save environment variables to persistent storage",
a89c33db	591	""
ba69dc26 MF	592	);
ba69dc26 MF	593
a68d3ed0 WD	594	#endif
	595
	596
	597	/************************************************************************
	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.
	602	* If the names match, return the index for the value2, else NULL.
	603	*/
	604
26a41790	605	int envmatch (uchar *s1, int i2)
a68d3ed0 WD	606	{
	607
	608	while (*s1 == env_get_char(i2++))
	609	if (*s1++ == '=')
	610	return(i2);
	611	if (*s1 == '\0' && env_get_char(i2-1) == '=')
	612	return(i2);
	613	return(-1);
	614	}
8bde7f77 WD	615
	616
	617	/**************************************************/
	618
246c6922 PT	619	#if defined(CONFIG_CMD_EDITENV)
	620	U_BOOT_CMD(
	621	editenv, 2, 0, do_editenv,
	622	"edit environment variable",
	623	"name\n"
	624	" - edit environment variable 'name'"
	625	);
	626	#endif
	627
0d498393	628	U_BOOT_CMD(
6d0f6bcf	629	printenv, CONFIG_SYS_MAXARGS, 1, do_printenv,
2fb2604d	630	"print environment variables",
8bde7f77 WD	631	"\n - print values of all environment variables\n"
8bde7f77 WD	632	"printenv name ...\n"
a89c33db	633	" - print value of environment variable 'name'"
8bde7f77 WD	634	);
8bde7f77 WD	635
0d498393	636	U_BOOT_CMD(
6d0f6bcf	637	setenv, CONFIG_SYS_MAXARGS, 0, do_setenv,
2fb2604d	638	"set environment variables",
8bde7f77 WD	639	"name value ...\n"
	640	" - set environment variable 'name' to 'value ...'\n"
	641	"setenv name\n"
a89c33db	642	" - delete environment variable 'name'"
8bde7f77 WD	643	);
8bde7f77 WD	644
c76fe474	645	#if defined(CONFIG_CMD_ASKENV)
8bde7f77	646
0d498393	647	U_BOOT_CMD(
6d0f6bcf	648	askenv, CONFIG_SYS_MAXARGS, 1, do_askenv,
2fb2604d	649	"get environment variables from stdin",
8bde7f77 WD	650	"name [message] [size]\n"
	651	" - get environment variable 'name' from stdin (max 'size' chars)\n"
	652	"askenv name\n"
	653	" - get environment variable 'name' from stdin\n"
	654	"askenv name size\n"
	655	" - get environment variable 'name' from stdin (max 'size' chars)\n"
	656	"askenv name [message] size\n"
	657	" - display 'message' string and get environment variable 'name'"
a89c33db	658	"from stdin (max 'size' chars)"
8bde7f77	659	);
90253178	660	#endif
8bde7f77	661
c76fe474	662	#if defined(CONFIG_CMD_RUN)
54841ab5	663	int do_run (cmd_tbl_t cmdtp, int flag, int argc, char const argv[]);
0d498393	664	U_BOOT_CMD(
6d0f6bcf	665	run, CONFIG_SYS_MAXARGS, 1, do_run,
2fb2604d	666	"run commands in an environment variable",
8bde7f77	667	"var [...]\n"
a89c33db	668	" - run the commands in the environment variable(s) 'var'"
8bde7f77	669	);
90253178	670	#endif