xref: /rk3399_rockchip-uboot/common/main.c (revision bc2b4c27d0fcdaac45f704d9ae05ef0bab3dc928)
1 /*
2  * (C) Copyright 2000
3  * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
4  *
5  * Add to readline cmdline-editing by
6  * (C) Copyright 2005
7  * JinHua Luo, GuangDong Linux Center, <luo.jinhua@gd-linux.com>
8  *
9  * See file CREDITS for list of people who contributed to this
10  * project.
11  *
12  * This program is free software; you can redistribute it and/or
13  * modify it under the terms of the GNU General Public License as
14  * published by the Free Software Foundation; either version 2 of
15  * the License, or (at your option) any later version.
16  *
17  * This program is distributed in the hope that it will be useful,
18  * but WITHOUT ANY WARRANTY; without even the implied warranty of
19  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
20  * GNU General Public License for more details.
21  *
22  * You should have received a copy of the GNU General Public License
23  * along with this program; if not, write to the Free Software
24  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
25  * MA 02111-1307 USA
26  */
27 
28 /* #define	DEBUG	*/
29 
30 #include <common.h>
31 #include <watchdog.h>
32 #include <command.h>
33 #include <fdtdec.h>
34 #include <malloc.h>
35 #include <version.h>
36 #ifdef CONFIG_MODEM_SUPPORT
37 #include <malloc.h>		/* for free() prototype */
38 #endif
39 
40 #ifdef CONFIG_SYS_HUSH_PARSER
41 #include <hush.h>
42 #endif
43 
44 #ifdef CONFIG_OF_CONTROL
45 #include <fdtdec.h>
46 #endif
47 
48 #include <post.h>
49 #include <linux/ctype.h>
50 #include <menu.h>
51 
52 DECLARE_GLOBAL_DATA_PTR;
53 
54 /*
55  * Board-specific Platform code can reimplement show_boot_progress () if needed
56  */
57 void inline __show_boot_progress (int val) {}
58 void show_boot_progress (int val) __attribute__((weak, alias("__show_boot_progress")));
59 
60 #define MAX_DELAY_STOP_STR 32
61 
62 #undef DEBUG_PARSER
63 
64 char        console_buffer[CONFIG_SYS_CBSIZE + 1];	/* console I/O buffer	*/
65 
66 static char * delete_char (char *buffer, char *p, int *colp, int *np, int plen);
67 static const char erase_seq[] = "\b \b";		/* erase sequence	*/
68 static const char   tab_seq[] = "        ";		/* used to expand TABs	*/
69 
70 #ifdef CONFIG_BOOT_RETRY_TIME
71 static uint64_t endtime = 0;  /* must be set, default is instant timeout */
72 static int      retry_time = -1; /* -1 so can call readline before main_loop */
73 #endif
74 
75 #define	endtick(seconds) (get_ticks() + (uint64_t)(seconds) * get_tbclk())
76 
77 #ifndef CONFIG_BOOT_RETRY_MIN
78 #define CONFIG_BOOT_RETRY_MIN CONFIG_BOOT_RETRY_TIME
79 #endif
80 
81 #ifdef CONFIG_MODEM_SUPPORT
82 int do_mdm_init = 0;
83 extern void mdm_init(void); /* defined in board.c */
84 #endif
85 
86 /***************************************************************************
87  * Watch for 'delay' seconds for autoboot stop or autoboot delay string.
88  * returns: 0 -  no key string, allow autoboot 1 - got key string, abort
89  */
90 #if defined(CONFIG_BOOTDELAY)
91 # if defined(CONFIG_AUTOBOOT_KEYED)
92 static int abortboot_keyed(int bootdelay)
93 {
94 	int abort = 0;
95 	uint64_t etime = endtick(bootdelay);
96 	struct {
97 		char* str;
98 		u_int len;
99 		int retry;
100 	}
101 	delaykey [] = {
102 		{ str: getenv ("bootdelaykey"),  retry: 1 },
103 		{ str: getenv ("bootdelaykey2"), retry: 1 },
104 		{ str: getenv ("bootstopkey"),   retry: 0 },
105 		{ str: getenv ("bootstopkey2"),  retry: 0 },
106 	};
107 
108 	char presskey [MAX_DELAY_STOP_STR];
109 	u_int presskey_len = 0;
110 	u_int presskey_max = 0;
111 	u_int i;
112 
113 #ifndef CONFIG_ZERO_BOOTDELAY_CHECK
114 	if (bootdelay == 0)
115 		return 0;
116 #endif
117 
118 #  ifdef CONFIG_AUTOBOOT_PROMPT
119 	printf(CONFIG_AUTOBOOT_PROMPT);
120 #  endif
121 
122 #  ifdef CONFIG_AUTOBOOT_DELAY_STR
123 	if (delaykey[0].str == NULL)
124 		delaykey[0].str = CONFIG_AUTOBOOT_DELAY_STR;
125 #  endif
126 #  ifdef CONFIG_AUTOBOOT_DELAY_STR2
127 	if (delaykey[1].str == NULL)
128 		delaykey[1].str = CONFIG_AUTOBOOT_DELAY_STR2;
129 #  endif
130 #  ifdef CONFIG_AUTOBOOT_STOP_STR
131 	if (delaykey[2].str == NULL)
132 		delaykey[2].str = CONFIG_AUTOBOOT_STOP_STR;
133 #  endif
134 #  ifdef CONFIG_AUTOBOOT_STOP_STR2
135 	if (delaykey[3].str == NULL)
136 		delaykey[3].str = CONFIG_AUTOBOOT_STOP_STR2;
137 #  endif
138 
139 	for (i = 0; i < sizeof(delaykey) / sizeof(delaykey[0]); i ++) {
140 		delaykey[i].len = delaykey[i].str == NULL ?
141 				    0 : strlen (delaykey[i].str);
142 		delaykey[i].len = delaykey[i].len > MAX_DELAY_STOP_STR ?
143 				    MAX_DELAY_STOP_STR : delaykey[i].len;
144 
145 		presskey_max = presskey_max > delaykey[i].len ?
146 				    presskey_max : delaykey[i].len;
147 
148 #  if DEBUG_BOOTKEYS
149 		printf("%s key:<%s>\n",
150 		       delaykey[i].retry ? "delay" : "stop",
151 		       delaykey[i].str ? delaykey[i].str : "NULL");
152 #  endif
153 	}
154 
155 	/* In order to keep up with incoming data, check timeout only
156 	 * when catch up.
157 	 */
158 	do {
159 		if (tstc()) {
160 			if (presskey_len < presskey_max) {
161 				presskey [presskey_len ++] = getc();
162 			}
163 			else {
164 				for (i = 0; i < presskey_max - 1; i ++)
165 					presskey [i] = presskey [i + 1];
166 
167 				presskey [i] = getc();
168 			}
169 		}
170 
171 		for (i = 0; i < sizeof(delaykey) / sizeof(delaykey[0]); i ++) {
172 			if (delaykey[i].len > 0 &&
173 			    presskey_len >= delaykey[i].len &&
174 			    memcmp (presskey + presskey_len - delaykey[i].len,
175 				    delaykey[i].str,
176 				    delaykey[i].len) == 0) {
177 #  if DEBUG_BOOTKEYS
178 				printf("got %skey\n",
179 				       delaykey[i].retry ? "delay" : "stop");
180 #  endif
181 
182 #  ifdef CONFIG_BOOT_RETRY_TIME
183 				/* don't retry auto boot */
184 				if (! delaykey[i].retry)
185 					retry_time = -1;
186 #  endif
187 				abort = 1;
188 			}
189 		}
190 	} while (!abort && get_ticks() <= etime);
191 
192 #  if DEBUG_BOOTKEYS
193 	if (!abort)
194 		puts("key timeout\n");
195 #  endif
196 
197 #ifdef CONFIG_SILENT_CONSOLE
198 	if (abort)
199 		gd->flags &= ~GD_FLG_SILENT;
200 #endif
201 
202 	return abort;
203 }
204 
205 # else	/* !defined(CONFIG_AUTOBOOT_KEYED) */
206 
207 #ifdef CONFIG_MENUKEY
208 static int menukey = 0;
209 #endif
210 
211 static int abortboot_normal(int bootdelay)
212 {
213 	int abort = 0;
214 	unsigned long ts;
215 
216 #ifdef CONFIG_MENUPROMPT
217 	printf(CONFIG_MENUPROMPT);
218 #else
219 	if (bootdelay >= 0)
220 		printf("Hit any key to stop autoboot: %2d ", bootdelay);
221 #endif
222 
223 #if defined CONFIG_ZERO_BOOTDELAY_CHECK
224 	/*
225 	 * Check if key already pressed
226 	 * Don't check if bootdelay < 0
227 	 */
228 	if (bootdelay >= 0) {
229 		if (tstc()) {	/* we got a key press	*/
230 			(void) getc();  /* consume input	*/
231 			puts ("\b\b\b 0");
232 			abort = 1;	/* don't auto boot	*/
233 		}
234 	}
235 #endif
236 
237 	while ((bootdelay > 0) && (!abort)) {
238 		--bootdelay;
239 		/* delay 1000 ms */
240 		ts = get_timer(0);
241 		do {
242 			if (tstc()) {	/* we got a key press	*/
243 				abort  = 1;	/* don't auto boot	*/
244 				bootdelay = 0;	/* no more delay	*/
245 # ifdef CONFIG_MENUKEY
246 				menukey = getc();
247 # else
248 				(void) getc();  /* consume input	*/
249 # endif
250 				break;
251 			}
252 			udelay(10000);
253 		} while (!abort && get_timer(ts) < 1000);
254 
255 		printf("\b\b\b%2d ", bootdelay);
256 	}
257 
258 	putc('\n');
259 
260 #ifdef CONFIG_SILENT_CONSOLE
261 	if (abort)
262 		gd->flags &= ~GD_FLG_SILENT;
263 #endif
264 
265 	return abort;
266 }
267 # endif	/* CONFIG_AUTOBOOT_KEYED */
268 
269 static int abortboot(int bootdelay)
270 {
271 #ifdef CONFIG_AUTOBOOT_KEYED
272 	return abortboot_keyed(bootdelay);
273 #else
274 	return abortboot_normal(bootdelay);
275 #endif
276 }
277 #endif	/* CONFIG_BOOTDELAY */
278 
279 /*
280  * Runs the given boot command securely.  Specifically:
281  * - Doesn't run the command with the shell (run_command or parse_string_outer),
282  *   since that's a lot of code surface that an attacker might exploit.
283  *   Because of this, we don't do any argument parsing--the secure boot command
284  *   has to be a full-fledged u-boot command.
285  * - Doesn't check for keypresses before booting, since that could be a
286  *   security hole; also disables Ctrl-C.
287  * - Doesn't allow the command to return.
288  *
289  * Upon any failures, this function will drop into an infinite loop after
290  * printing the error message to console.
291  */
292 
293 #if defined(CONFIG_BOOTDELAY) && defined(CONFIG_OF_CONTROL)
294 static void secure_boot_cmd(char *cmd)
295 {
296 	cmd_tbl_t *cmdtp;
297 	int rc;
298 
299 	if (!cmd) {
300 		printf("## Error: Secure boot command not specified\n");
301 		goto err;
302 	}
303 
304 	/* Disable Ctrl-C just in case some command is used that checks it. */
305 	disable_ctrlc(1);
306 
307 	/* Find the command directly. */
308 	cmdtp = find_cmd(cmd);
309 	if (!cmdtp) {
310 		printf("## Error: \"%s\" not defined\n", cmd);
311 		goto err;
312 	}
313 
314 	/* Run the command, forcing no flags and faking argc and argv. */
315 	rc = (cmdtp->cmd)(cmdtp, 0, 1, &cmd);
316 
317 	/* Shouldn't ever return from boot command. */
318 	printf("## Error: \"%s\" returned (code %d)\n", cmd, rc);
319 
320 err:
321 	/*
322 	 * Not a whole lot to do here.  Rebooting won't help much, since we'll
323 	 * just end up right back here.  Just loop.
324 	 */
325 	hang();
326 }
327 
328 static void process_fdt_options(const void *blob)
329 {
330 	ulong addr;
331 
332 	/* Add an env variable to point to a kernel payload, if available */
333 	addr = fdtdec_get_config_int(gd->fdt_blob, "kernel-offset", 0);
334 	if (addr)
335 		setenv_addr("kernaddr", (void *)(CONFIG_SYS_TEXT_BASE + addr));
336 
337 	/* Add an env variable to point to a root disk, if available */
338 	addr = fdtdec_get_config_int(gd->fdt_blob, "rootdisk-offset", 0);
339 	if (addr)
340 		setenv_addr("rootaddr", (void *)(CONFIG_SYS_TEXT_BASE + addr));
341 }
342 #endif /* CONFIG_OF_CONTROL */
343 
344 #ifdef CONFIG_BOOTDELAY
345 static void process_boot_delay(void)
346 {
347 #ifdef CONFIG_OF_CONTROL
348 	char *env;
349 #endif
350 	char *s;
351 	int bootdelay;
352 #ifdef CONFIG_BOOTCOUNT_LIMIT
353 	unsigned long bootcount = 0;
354 	unsigned long bootlimit = 0;
355 	char *bcs;
356 	char bcs_set[16];
357 #endif /* CONFIG_BOOTCOUNT_LIMIT */
358 
359 #ifdef CONFIG_BOOTCOUNT_LIMIT
360 	bootcount = bootcount_load();
361 	bootcount++;
362 	bootcount_store (bootcount);
363 	sprintf (bcs_set, "%lu", bootcount);
364 	setenv ("bootcount", bcs_set);
365 	bcs = getenv ("bootlimit");
366 	bootlimit = bcs ? simple_strtoul (bcs, NULL, 10) : 0;
367 #endif /* CONFIG_BOOTCOUNT_LIMIT */
368 
369 	s = getenv ("bootdelay");
370 	bootdelay = s ? (int)simple_strtol(s, NULL, 10) : CONFIG_BOOTDELAY;
371 
372 	debug ("### main_loop entered: bootdelay=%d\n\n", bootdelay);
373 
374 #if defined(CONFIG_MENU_SHOW)
375 	bootdelay = menu_show(bootdelay);
376 #endif
377 # ifdef CONFIG_BOOT_RETRY_TIME
378 	init_cmd_timeout ();
379 # endif	/* CONFIG_BOOT_RETRY_TIME */
380 
381 #ifdef CONFIG_POST
382 	if (gd->flags & GD_FLG_POSTFAIL) {
383 		s = getenv("failbootcmd");
384 	}
385 	else
386 #endif /* CONFIG_POST */
387 #ifdef CONFIG_BOOTCOUNT_LIMIT
388 	if (bootlimit && (bootcount > bootlimit)) {
389 		printf ("Warning: Bootlimit (%u) exceeded. Using altbootcmd.\n",
390 		        (unsigned)bootlimit);
391 		s = getenv ("altbootcmd");
392 	}
393 	else
394 #endif /* CONFIG_BOOTCOUNT_LIMIT */
395 		s = getenv ("bootcmd");
396 #ifdef CONFIG_OF_CONTROL
397 	/* Allow the fdt to override the boot command */
398 	env = fdtdec_get_config_string(gd->fdt_blob, "bootcmd");
399 	if (env)
400 		s = env;
401 
402 	process_fdt_options(gd->fdt_blob);
403 
404 	/*
405 	 * If the bootsecure option was chosen, use secure_boot_cmd().
406 	 * Always use 'env' in this case, since bootsecure requres that the
407 	 * bootcmd was specified in the FDT too.
408 	 */
409 	if (fdtdec_get_config_int(gd->fdt_blob, "bootsecure", 0))
410 		secure_boot_cmd(env);
411 
412 #endif /* CONFIG_OF_CONTROL */
413 
414 	debug ("### main_loop: bootcmd=\"%s\"\n", s ? s : "<UNDEFINED>");
415 
416 	if (bootdelay != -1 && s && !abortboot(bootdelay)) {
417 #ifdef CONFIG_AUTOBOOT_KEYED
418 		int prev = disable_ctrlc(1);	/* disable Control C checking */
419 #endif
420 
421 		run_command_list(s, -1, 0);
422 
423 #ifdef CONFIG_AUTOBOOT_KEYED
424 		disable_ctrlc(prev);	/* restore Control C checking */
425 #endif
426 	}
427 
428 #ifdef CONFIG_MENUKEY
429 	if (menukey == CONFIG_MENUKEY) {
430 		s = getenv("menucmd");
431 		if (s)
432 			run_command_list(s, -1, 0);
433 	}
434 #endif /* CONFIG_MENUKEY */
435 }
436 #endif /* CONFIG_BOOTDELAY */
437 
438 void main_loop(void)
439 {
440 #ifndef CONFIG_SYS_HUSH_PARSER
441 	static char lastcommand[CONFIG_SYS_CBSIZE] = { 0, };
442 	int len;
443 	int rc = 1;
444 	int flag;
445 #endif
446 #ifdef CONFIG_PREBOOT
447 	char *p;
448 #endif
449 
450 	bootstage_mark_name(BOOTSTAGE_ID_MAIN_LOOP, "main_loop");
451 
452 #ifdef CONFIG_MODEM_SUPPORT
453 	debug("DEBUG: main_loop:   do_mdm_init=%d\n", do_mdm_init);
454 	if (do_mdm_init) {
455 		char *str = strdup(getenv("mdm_cmd"));
456 		setenv("preboot", str);  /* set or delete definition */
457 		if (str != NULL)
458 			free(str);
459 		mdm_init(); /* wait for modem connection */
460 	}
461 #endif  /* CONFIG_MODEM_SUPPORT */
462 
463 #ifdef CONFIG_VERSION_VARIABLE
464 	{
465 		setenv("ver", version_string);  /* set version variable */
466 	}
467 #endif /* CONFIG_VERSION_VARIABLE */
468 
469 #ifdef CONFIG_SYS_HUSH_PARSER
470 	u_boot_hush_start();
471 #endif
472 
473 #if defined(CONFIG_HUSH_INIT_VAR)
474 	hush_init_var();
475 #endif
476 
477 #ifdef CONFIG_PREBOOT
478 	p = getenv("preboot");
479 	if (p != NULL) {
480 # ifdef CONFIG_AUTOBOOT_KEYED
481 		int prev = disable_ctrlc(1);	/* disable Control C checking */
482 # endif
483 
484 		run_command_list(p, -1, 0);
485 
486 # ifdef CONFIG_AUTOBOOT_KEYED
487 		disable_ctrlc(prev);	/* restore Control C checking */
488 # endif
489 	}
490 #endif /* CONFIG_PREBOOT */
491 
492 #if defined(CONFIG_UPDATE_TFTP)
493 	update_tftp(0UL);
494 #endif /* CONFIG_UPDATE_TFTP */
495 
496 #ifdef CONFIG_BOOTDELAY
497 	process_boot_delay();
498 #endif
499 	/*
500 	 * Main Loop for Monitor Command Processing
501 	 */
502 #ifdef CONFIG_SYS_HUSH_PARSER
503 	parse_file_outer();
504 	/* This point is never reached */
505 	for (;;);
506 #else
507 	for (;;) {
508 #ifdef CONFIG_BOOT_RETRY_TIME
509 		if (rc >= 0) {
510 			/* Saw enough of a valid command to
511 			 * restart the timeout.
512 			 */
513 			reset_cmd_timeout();
514 		}
515 #endif
516 		len = readline (CONFIG_SYS_PROMPT);
517 
518 		flag = 0;	/* assume no special flags for now */
519 		if (len > 0)
520 			strcpy (lastcommand, console_buffer);
521 		else if (len == 0)
522 			flag |= CMD_FLAG_REPEAT;
523 #ifdef CONFIG_BOOT_RETRY_TIME
524 		else if (len == -2) {
525 			/* -2 means timed out, retry autoboot
526 			 */
527 			puts ("\nTimed out waiting for command\n");
528 # ifdef CONFIG_RESET_TO_RETRY
529 			/* Reinit board to run initialization code again */
530 			do_reset (NULL, 0, 0, NULL);
531 # else
532 			return;		/* retry autoboot */
533 # endif
534 		}
535 #endif
536 
537 		if (len == -1)
538 			puts ("<INTERRUPT>\n");
539 		else
540 			rc = run_command(lastcommand, flag);
541 
542 		if (rc <= 0) {
543 			/* invalid command or not repeatable, forget it */
544 			lastcommand[0] = 0;
545 		}
546 	}
547 #endif /*CONFIG_SYS_HUSH_PARSER*/
548 }
549 
550 #ifdef CONFIG_BOOT_RETRY_TIME
551 /***************************************************************************
552  * initialize command line timeout
553  */
554 void init_cmd_timeout(void)
555 {
556 	char *s = getenv ("bootretry");
557 
558 	if (s != NULL)
559 		retry_time = (int)simple_strtol(s, NULL, 10);
560 	else
561 		retry_time =  CONFIG_BOOT_RETRY_TIME;
562 
563 	if (retry_time >= 0 && retry_time < CONFIG_BOOT_RETRY_MIN)
564 		retry_time = CONFIG_BOOT_RETRY_MIN;
565 }
566 
567 /***************************************************************************
568  * reset command line timeout to retry_time seconds
569  */
570 void reset_cmd_timeout(void)
571 {
572 	endtime = endtick(retry_time);
573 }
574 #endif
575 
576 #ifdef CONFIG_CMDLINE_EDITING
577 
578 /*
579  * cmdline-editing related codes from vivi.
580  * Author: Janghoon Lyu <nandy@mizi.com>
581  */
582 
583 #define putnstr(str,n)	do {			\
584 		printf ("%.*s", (int)n, str);	\
585 	} while (0)
586 
587 #define CTL_CH(c)		((c) - 'a' + 1)
588 #define CTL_BACKSPACE		('\b')
589 #define DEL			((char)255)
590 #define DEL7			((char)127)
591 #define CREAD_HIST_CHAR		('!')
592 
593 #define getcmd_putch(ch)	putc(ch)
594 #define getcmd_getch()		getc()
595 #define getcmd_cbeep()		getcmd_putch('\a')
596 
597 #define HIST_MAX		20
598 #define HIST_SIZE		CONFIG_SYS_CBSIZE
599 
600 static int hist_max;
601 static int hist_add_idx;
602 static int hist_cur = -1;
603 static unsigned hist_num;
604 
605 static char *hist_list[HIST_MAX];
606 static char hist_lines[HIST_MAX][HIST_SIZE + 1];	/* Save room for NULL */
607 
608 #define add_idx_minus_one() ((hist_add_idx == 0) ? hist_max : hist_add_idx-1)
609 
610 static void hist_init(void)
611 {
612 	int i;
613 
614 	hist_max = 0;
615 	hist_add_idx = 0;
616 	hist_cur = -1;
617 	hist_num = 0;
618 
619 	for (i = 0; i < HIST_MAX; i++) {
620 		hist_list[i] = hist_lines[i];
621 		hist_list[i][0] = '\0';
622 	}
623 }
624 
625 static void cread_add_to_hist(char *line)
626 {
627 	strcpy(hist_list[hist_add_idx], line);
628 
629 	if (++hist_add_idx >= HIST_MAX)
630 		hist_add_idx = 0;
631 
632 	if (hist_add_idx > hist_max)
633 		hist_max = hist_add_idx;
634 
635 	hist_num++;
636 }
637 
638 static char* hist_prev(void)
639 {
640 	char *ret;
641 	int old_cur;
642 
643 	if (hist_cur < 0)
644 		return NULL;
645 
646 	old_cur = hist_cur;
647 	if (--hist_cur < 0)
648 		hist_cur = hist_max;
649 
650 	if (hist_cur == hist_add_idx) {
651 		hist_cur = old_cur;
652 		ret = NULL;
653 	} else
654 		ret = hist_list[hist_cur];
655 
656 	return (ret);
657 }
658 
659 static char* hist_next(void)
660 {
661 	char *ret;
662 
663 	if (hist_cur < 0)
664 		return NULL;
665 
666 	if (hist_cur == hist_add_idx)
667 		return NULL;
668 
669 	if (++hist_cur > hist_max)
670 		hist_cur = 0;
671 
672 	if (hist_cur == hist_add_idx) {
673 		ret = "";
674 	} else
675 		ret = hist_list[hist_cur];
676 
677 	return (ret);
678 }
679 
680 #ifndef CONFIG_CMDLINE_EDITING
681 static void cread_print_hist_list(void)
682 {
683 	int i;
684 	unsigned long n;
685 
686 	n = hist_num - hist_max;
687 
688 	i = hist_add_idx + 1;
689 	while (1) {
690 		if (i > hist_max)
691 			i = 0;
692 		if (i == hist_add_idx)
693 			break;
694 		printf("%s\n", hist_list[i]);
695 		n++;
696 		i++;
697 	}
698 }
699 #endif /* CONFIG_CMDLINE_EDITING */
700 
701 #define BEGINNING_OF_LINE() {			\
702 	while (num) {				\
703 		getcmd_putch(CTL_BACKSPACE);	\
704 		num--;				\
705 	}					\
706 }
707 
708 #define ERASE_TO_EOL() {				\
709 	if (num < eol_num) {				\
710 		printf("%*s", (int)(eol_num - num), ""); \
711 		do {					\
712 			getcmd_putch(CTL_BACKSPACE);	\
713 		} while (--eol_num > num);		\
714 	}						\
715 }
716 
717 #define REFRESH_TO_EOL() {			\
718 	if (num < eol_num) {			\
719 		wlen = eol_num - num;		\
720 		putnstr(buf + num, wlen);	\
721 		num = eol_num;			\
722 	}					\
723 }
724 
725 static void cread_add_char(char ichar, int insert, unsigned long *num,
726 	       unsigned long *eol_num, char *buf, unsigned long len)
727 {
728 	unsigned long wlen;
729 
730 	/* room ??? */
731 	if (insert || *num == *eol_num) {
732 		if (*eol_num > len - 1) {
733 			getcmd_cbeep();
734 			return;
735 		}
736 		(*eol_num)++;
737 	}
738 
739 	if (insert) {
740 		wlen = *eol_num - *num;
741 		if (wlen > 1) {
742 			memmove(&buf[*num+1], &buf[*num], wlen-1);
743 		}
744 
745 		buf[*num] = ichar;
746 		putnstr(buf + *num, wlen);
747 		(*num)++;
748 		while (--wlen) {
749 			getcmd_putch(CTL_BACKSPACE);
750 		}
751 	} else {
752 		/* echo the character */
753 		wlen = 1;
754 		buf[*num] = ichar;
755 		putnstr(buf + *num, wlen);
756 		(*num)++;
757 	}
758 }
759 
760 static void cread_add_str(char *str, int strsize, int insert, unsigned long *num,
761 	      unsigned long *eol_num, char *buf, unsigned long len)
762 {
763 	while (strsize--) {
764 		cread_add_char(*str, insert, num, eol_num, buf, len);
765 		str++;
766 	}
767 }
768 
769 static int cread_line(const char *const prompt, char *buf, unsigned int *len,
770 		int timeout)
771 {
772 	unsigned long num = 0;
773 	unsigned long eol_num = 0;
774 	unsigned long wlen;
775 	char ichar;
776 	int insert = 1;
777 	int esc_len = 0;
778 	char esc_save[8];
779 	int init_len = strlen(buf);
780 	int first = 1;
781 
782 	if (init_len)
783 		cread_add_str(buf, init_len, 1, &num, &eol_num, buf, *len);
784 
785 	while (1) {
786 #ifdef CONFIG_BOOT_RETRY_TIME
787 		while (!tstc()) {	/* while no incoming data */
788 			if (retry_time >= 0 && get_ticks() > endtime)
789 				return (-2);	/* timed out */
790 			WATCHDOG_RESET();
791 		}
792 #endif
793 		if (first && timeout) {
794 			uint64_t etime = endtick(timeout);
795 
796 			while (!tstc()) {	/* while no incoming data */
797 				if (get_ticks() >= etime)
798 					return -2;	/* timed out */
799 				WATCHDOG_RESET();
800 			}
801 			first = 0;
802 		}
803 
804 		ichar = getcmd_getch();
805 
806 		if ((ichar == '\n') || (ichar == '\r')) {
807 			putc('\n');
808 			break;
809 		}
810 
811 		/*
812 		 * handle standard linux xterm esc sequences for arrow key, etc.
813 		 */
814 		if (esc_len != 0) {
815 			if (esc_len == 1) {
816 				if (ichar == '[') {
817 					esc_save[esc_len] = ichar;
818 					esc_len = 2;
819 				} else {
820 					cread_add_str(esc_save, esc_len, insert,
821 						      &num, &eol_num, buf, *len);
822 					esc_len = 0;
823 				}
824 				continue;
825 			}
826 
827 			switch (ichar) {
828 
829 			case 'D':	/* <- key */
830 				ichar = CTL_CH('b');
831 				esc_len = 0;
832 				break;
833 			case 'C':	/* -> key */
834 				ichar = CTL_CH('f');
835 				esc_len = 0;
836 				break;	/* pass off to ^F handler */
837 			case 'H':	/* Home key */
838 				ichar = CTL_CH('a');
839 				esc_len = 0;
840 				break;	/* pass off to ^A handler */
841 			case 'A':	/* up arrow */
842 				ichar = CTL_CH('p');
843 				esc_len = 0;
844 				break;	/* pass off to ^P handler */
845 			case 'B':	/* down arrow */
846 				ichar = CTL_CH('n');
847 				esc_len = 0;
848 				break;	/* pass off to ^N handler */
849 			default:
850 				esc_save[esc_len++] = ichar;
851 				cread_add_str(esc_save, esc_len, insert,
852 					      &num, &eol_num, buf, *len);
853 				esc_len = 0;
854 				continue;
855 			}
856 		}
857 
858 		switch (ichar) {
859 		case 0x1b:
860 			if (esc_len == 0) {
861 				esc_save[esc_len] = ichar;
862 				esc_len = 1;
863 			} else {
864 				puts("impossible condition #876\n");
865 				esc_len = 0;
866 			}
867 			break;
868 
869 		case CTL_CH('a'):
870 			BEGINNING_OF_LINE();
871 			break;
872 		case CTL_CH('c'):	/* ^C - break */
873 			*buf = '\0';	/* discard input */
874 			return (-1);
875 		case CTL_CH('f'):
876 			if (num < eol_num) {
877 				getcmd_putch(buf[num]);
878 				num++;
879 			}
880 			break;
881 		case CTL_CH('b'):
882 			if (num) {
883 				getcmd_putch(CTL_BACKSPACE);
884 				num--;
885 			}
886 			break;
887 		case CTL_CH('d'):
888 			if (num < eol_num) {
889 				wlen = eol_num - num - 1;
890 				if (wlen) {
891 					memmove(&buf[num], &buf[num+1], wlen);
892 					putnstr(buf + num, wlen);
893 				}
894 
895 				getcmd_putch(' ');
896 				do {
897 					getcmd_putch(CTL_BACKSPACE);
898 				} while (wlen--);
899 				eol_num--;
900 			}
901 			break;
902 		case CTL_CH('k'):
903 			ERASE_TO_EOL();
904 			break;
905 		case CTL_CH('e'):
906 			REFRESH_TO_EOL();
907 			break;
908 		case CTL_CH('o'):
909 			insert = !insert;
910 			break;
911 		case CTL_CH('x'):
912 		case CTL_CH('u'):
913 			BEGINNING_OF_LINE();
914 			ERASE_TO_EOL();
915 			break;
916 		case DEL:
917 		case DEL7:
918 		case 8:
919 			if (num) {
920 				wlen = eol_num - num;
921 				num--;
922 				memmove(&buf[num], &buf[num+1], wlen);
923 				getcmd_putch(CTL_BACKSPACE);
924 				putnstr(buf + num, wlen);
925 				getcmd_putch(' ');
926 				do {
927 					getcmd_putch(CTL_BACKSPACE);
928 				} while (wlen--);
929 				eol_num--;
930 			}
931 			break;
932 		case CTL_CH('p'):
933 		case CTL_CH('n'):
934 		{
935 			char * hline;
936 
937 			esc_len = 0;
938 
939 			if (ichar == CTL_CH('p'))
940 				hline = hist_prev();
941 			else
942 				hline = hist_next();
943 
944 			if (!hline) {
945 				getcmd_cbeep();
946 				continue;
947 			}
948 
949 			/* nuke the current line */
950 			/* first, go home */
951 			BEGINNING_OF_LINE();
952 
953 			/* erase to end of line */
954 			ERASE_TO_EOL();
955 
956 			/* copy new line into place and display */
957 			strcpy(buf, hline);
958 			eol_num = strlen(buf);
959 			REFRESH_TO_EOL();
960 			continue;
961 		}
962 #ifdef CONFIG_AUTO_COMPLETE
963 		case '\t': {
964 			int num2, col;
965 
966 			/* do not autocomplete when in the middle */
967 			if (num < eol_num) {
968 				getcmd_cbeep();
969 				break;
970 			}
971 
972 			buf[num] = '\0';
973 			col = strlen(prompt) + eol_num;
974 			num2 = num;
975 			if (cmd_auto_complete(prompt, buf, &num2, &col)) {
976 				col = num2 - num;
977 				num += col;
978 				eol_num += col;
979 			}
980 			break;
981 		}
982 #endif
983 		default:
984 			cread_add_char(ichar, insert, &num, &eol_num, buf, *len);
985 			break;
986 		}
987 	}
988 	*len = eol_num;
989 	buf[eol_num] = '\0';	/* lose the newline */
990 
991 	if (buf[0] && buf[0] != CREAD_HIST_CHAR)
992 		cread_add_to_hist(buf);
993 	hist_cur = hist_add_idx;
994 
995 	return 0;
996 }
997 
998 #endif /* CONFIG_CMDLINE_EDITING */
999 
1000 /****************************************************************************/
1001 
1002 /*
1003  * Prompt for input and read a line.
1004  * If  CONFIG_BOOT_RETRY_TIME is defined and retry_time >= 0,
1005  * time out when time goes past endtime (timebase time in ticks).
1006  * Return:	number of read characters
1007  *		-1 if break
1008  *		-2 if timed out
1009  */
1010 int readline (const char *const prompt)
1011 {
1012 	/*
1013 	 * If console_buffer isn't 0-length the user will be prompted to modify
1014 	 * it instead of entering it from scratch as desired.
1015 	 */
1016 	console_buffer[0] = '\0';
1017 
1018 	return readline_into_buffer(prompt, console_buffer, 0);
1019 }
1020 
1021 
1022 int readline_into_buffer(const char *const prompt, char *buffer, int timeout)
1023 {
1024 	char *p = buffer;
1025 #ifdef CONFIG_CMDLINE_EDITING
1026 	unsigned int len = CONFIG_SYS_CBSIZE;
1027 	int rc;
1028 	static int initted = 0;
1029 
1030 	/*
1031 	 * History uses a global array which is not
1032 	 * writable until after relocation to RAM.
1033 	 * Revert to non-history version if still
1034 	 * running from flash.
1035 	 */
1036 	if (gd->flags & GD_FLG_RELOC) {
1037 		if (!initted) {
1038 			hist_init();
1039 			initted = 1;
1040 		}
1041 
1042 		if (prompt)
1043 			puts (prompt);
1044 
1045 		rc = cread_line(prompt, p, &len, timeout);
1046 		return rc < 0 ? rc : len;
1047 
1048 	} else {
1049 #endif	/* CONFIG_CMDLINE_EDITING */
1050 	char * p_buf = p;
1051 	int	n = 0;				/* buffer index		*/
1052 	int	plen = 0;			/* prompt length	*/
1053 	int	col;				/* output column cnt	*/
1054 	char	c;
1055 
1056 	/* print prompt */
1057 	if (prompt) {
1058 		plen = strlen (prompt);
1059 		puts (prompt);
1060 	}
1061 	col = plen;
1062 
1063 	for (;;) {
1064 #ifdef CONFIG_BOOT_RETRY_TIME
1065 		while (!tstc()) {	/* while no incoming data */
1066 			if (retry_time >= 0 && get_ticks() > endtime)
1067 				return (-2);	/* timed out */
1068 			WATCHDOG_RESET();
1069 		}
1070 #endif
1071 		WATCHDOG_RESET();		/* Trigger watchdog, if needed */
1072 
1073 #ifdef CONFIG_SHOW_ACTIVITY
1074 		while (!tstc()) {
1075 			show_activity(0);
1076 			WATCHDOG_RESET();
1077 		}
1078 #endif
1079 		c = getc();
1080 
1081 		/*
1082 		 * Special character handling
1083 		 */
1084 		switch (c) {
1085 		case '\r':				/* Enter		*/
1086 		case '\n':
1087 			*p = '\0';
1088 			puts ("\r\n");
1089 			return (p - p_buf);
1090 
1091 		case '\0':				/* nul			*/
1092 			continue;
1093 
1094 		case 0x03:				/* ^C - break		*/
1095 			p_buf[0] = '\0';	/* discard input */
1096 			return (-1);
1097 
1098 		case 0x15:				/* ^U - erase line	*/
1099 			while (col > plen) {
1100 				puts (erase_seq);
1101 				--col;
1102 			}
1103 			p = p_buf;
1104 			n = 0;
1105 			continue;
1106 
1107 		case 0x17:				/* ^W - erase word	*/
1108 			p=delete_char(p_buf, p, &col, &n, plen);
1109 			while ((n > 0) && (*p != ' ')) {
1110 				p=delete_char(p_buf, p, &col, &n, plen);
1111 			}
1112 			continue;
1113 
1114 		case 0x08:				/* ^H  - backspace	*/
1115 		case 0x7F:				/* DEL - backspace	*/
1116 			p=delete_char(p_buf, p, &col, &n, plen);
1117 			continue;
1118 
1119 		default:
1120 			/*
1121 			 * Must be a normal character then
1122 			 */
1123 			if (n < CONFIG_SYS_CBSIZE-2) {
1124 				if (c == '\t') {	/* expand TABs		*/
1125 #ifdef CONFIG_AUTO_COMPLETE
1126 					/* if auto completion triggered just continue */
1127 					*p = '\0';
1128 					if (cmd_auto_complete(prompt, console_buffer, &n, &col)) {
1129 						p = p_buf + n;	/* reset */
1130 						continue;
1131 					}
1132 #endif
1133 					puts (tab_seq+(col&07));
1134 					col += 8 - (col&07);
1135 				} else {
1136 					char buf[2];
1137 
1138 					/*
1139 					 * Echo input using puts() to force am
1140 					 * LCD flush if we are using an LCD
1141 					 */
1142 					++col;
1143 					buf[0] = c;
1144 					buf[1] = '\0';
1145 					puts(buf);
1146 				}
1147 				*p++ = c;
1148 				++n;
1149 			} else {			/* Buffer full		*/
1150 				putc ('\a');
1151 			}
1152 		}
1153 	}
1154 #ifdef CONFIG_CMDLINE_EDITING
1155 	}
1156 #endif
1157 }
1158 
1159 /****************************************************************************/
1160 
1161 static char * delete_char (char *buffer, char *p, int *colp, int *np, int plen)
1162 {
1163 	char *s;
1164 
1165 	if (*np == 0) {
1166 		return (p);
1167 	}
1168 
1169 	if (*(--p) == '\t') {			/* will retype the whole line	*/
1170 		while (*colp > plen) {
1171 			puts (erase_seq);
1172 			(*colp)--;
1173 		}
1174 		for (s=buffer; s<p; ++s) {
1175 			if (*s == '\t') {
1176 				puts (tab_seq+((*colp) & 07));
1177 				*colp += 8 - ((*colp) & 07);
1178 			} else {
1179 				++(*colp);
1180 				putc (*s);
1181 			}
1182 		}
1183 	} else {
1184 		puts (erase_seq);
1185 		(*colp)--;
1186 	}
1187 	(*np)--;
1188 	return (p);
1189 }
1190 
1191 /****************************************************************************/
1192 
1193 int parse_line (char *line, char *argv[])
1194 {
1195 	int nargs = 0;
1196 
1197 #ifdef DEBUG_PARSER
1198 	printf ("parse_line: \"%s\"\n", line);
1199 #endif
1200 	while (nargs < CONFIG_SYS_MAXARGS) {
1201 
1202 		/* skip any white space */
1203 		while (isblank(*line))
1204 			++line;
1205 
1206 		if (*line == '\0') {	/* end of line, no more args	*/
1207 			argv[nargs] = NULL;
1208 #ifdef DEBUG_PARSER
1209 		printf ("parse_line: nargs=%d\n", nargs);
1210 #endif
1211 			return (nargs);
1212 		}
1213 
1214 		argv[nargs++] = line;	/* begin of argument string	*/
1215 
1216 		/* find end of string */
1217 		while (*line && !isblank(*line))
1218 			++line;
1219 
1220 		if (*line == '\0') {	/* end of line, no more args	*/
1221 			argv[nargs] = NULL;
1222 #ifdef DEBUG_PARSER
1223 		printf ("parse_line: nargs=%d\n", nargs);
1224 #endif
1225 			return (nargs);
1226 		}
1227 
1228 		*line++ = '\0';		/* terminate current arg	 */
1229 	}
1230 
1231 	printf ("** Too many args (max. %d) **\n", CONFIG_SYS_MAXARGS);
1232 
1233 #ifdef DEBUG_PARSER
1234 	printf ("parse_line: nargs=%d\n", nargs);
1235 #endif
1236 	return (nargs);
1237 }
1238 
1239 /****************************************************************************/
1240 
1241 #ifndef CONFIG_SYS_HUSH_PARSER
1242 static void process_macros (const char *input, char *output)
1243 {
1244 	char c, prev;
1245 	const char *varname_start = NULL;
1246 	int inputcnt = strlen (input);
1247 	int outputcnt = CONFIG_SYS_CBSIZE;
1248 	int state = 0;		/* 0 = waiting for '$'  */
1249 
1250 	/* 1 = waiting for '(' or '{' */
1251 	/* 2 = waiting for ')' or '}' */
1252 	/* 3 = waiting for '''  */
1253 #ifdef DEBUG_PARSER
1254 	char *output_start = output;
1255 
1256 	printf ("[PROCESS_MACROS] INPUT len %d: \"%s\"\n", strlen (input),
1257 		input);
1258 #endif
1259 
1260 	prev = '\0';		/* previous character   */
1261 
1262 	while (inputcnt && outputcnt) {
1263 		c = *input++;
1264 		inputcnt--;
1265 
1266 		if (state != 3) {
1267 			/* remove one level of escape characters */
1268 			if ((c == '\\') && (prev != '\\')) {
1269 				if (inputcnt-- == 0)
1270 					break;
1271 				prev = c;
1272 				c = *input++;
1273 			}
1274 		}
1275 
1276 		switch (state) {
1277 		case 0:	/* Waiting for (unescaped) $    */
1278 			if ((c == '\'') && (prev != '\\')) {
1279 				state = 3;
1280 				break;
1281 			}
1282 			if ((c == '$') && (prev != '\\')) {
1283 				state++;
1284 			} else {
1285 				*(output++) = c;
1286 				outputcnt--;
1287 			}
1288 			break;
1289 		case 1:	/* Waiting for (        */
1290 			if (c == '(' || c == '{') {
1291 				state++;
1292 				varname_start = input;
1293 			} else {
1294 				state = 0;
1295 				*(output++) = '$';
1296 				outputcnt--;
1297 
1298 				if (outputcnt) {
1299 					*(output++) = c;
1300 					outputcnt--;
1301 				}
1302 			}
1303 			break;
1304 		case 2:	/* Waiting for )        */
1305 			if (c == ')' || c == '}') {
1306 				int i;
1307 				char envname[CONFIG_SYS_CBSIZE], *envval;
1308 				int envcnt = input - varname_start - 1;	/* Varname # of chars */
1309 
1310 				/* Get the varname */
1311 				for (i = 0; i < envcnt; i++) {
1312 					envname[i] = varname_start[i];
1313 				}
1314 				envname[i] = 0;
1315 
1316 				/* Get its value */
1317 				envval = getenv (envname);
1318 
1319 				/* Copy into the line if it exists */
1320 				if (envval != NULL)
1321 					while ((*envval) && outputcnt) {
1322 						*(output++) = *(envval++);
1323 						outputcnt--;
1324 					}
1325 				/* Look for another '$' */
1326 				state = 0;
1327 			}
1328 			break;
1329 		case 3:	/* Waiting for '        */
1330 			if ((c == '\'') && (prev != '\\')) {
1331 				state = 0;
1332 			} else {
1333 				*(output++) = c;
1334 				outputcnt--;
1335 			}
1336 			break;
1337 		}
1338 		prev = c;
1339 	}
1340 
1341 	if (outputcnt)
1342 		*output = 0;
1343 	else
1344 		*(output - 1) = 0;
1345 
1346 #ifdef DEBUG_PARSER
1347 	printf ("[PROCESS_MACROS] OUTPUT len %d: \"%s\"\n",
1348 		strlen (output_start), output_start);
1349 #endif
1350 }
1351 
1352 /****************************************************************************
1353  * returns:
1354  *	1  - command executed, repeatable
1355  *	0  - command executed but not repeatable, interrupted commands are
1356  *	     always considered not repeatable
1357  *	-1 - not executed (unrecognized, bootd recursion or too many args)
1358  *           (If cmd is NULL or "" or longer than CONFIG_SYS_CBSIZE-1 it is
1359  *           considered unrecognized)
1360  *
1361  * WARNING:
1362  *
1363  * We must create a temporary copy of the command since the command we get
1364  * may be the result from getenv(), which returns a pointer directly to
1365  * the environment data, which may change magicly when the command we run
1366  * creates or modifies environment variables (like "bootp" does).
1367  */
1368 static int builtin_run_command(const char *cmd, int flag)
1369 {
1370 	char cmdbuf[CONFIG_SYS_CBSIZE];	/* working copy of cmd		*/
1371 	char *token;			/* start of token in cmdbuf	*/
1372 	char *sep;			/* end of token (separator) in cmdbuf */
1373 	char finaltoken[CONFIG_SYS_CBSIZE];
1374 	char *str = cmdbuf;
1375 	char *argv[CONFIG_SYS_MAXARGS + 1];	/* NULL terminated	*/
1376 	int argc, inquotes;
1377 	int repeatable = 1;
1378 	int rc = 0;
1379 
1380 #ifdef DEBUG_PARSER
1381 	printf ("[RUN_COMMAND] cmd[%p]=\"", cmd);
1382 	puts (cmd ? cmd : "NULL");	/* use puts - string may be loooong */
1383 	puts ("\"\n");
1384 #endif
1385 
1386 	clear_ctrlc();		/* forget any previous Control C */
1387 
1388 	if (!cmd || !*cmd) {
1389 		return -1;	/* empty command */
1390 	}
1391 
1392 	if (strlen(cmd) >= CONFIG_SYS_CBSIZE) {
1393 		puts ("## Command too long!\n");
1394 		return -1;
1395 	}
1396 
1397 	strcpy (cmdbuf, cmd);
1398 
1399 	/* Process separators and check for invalid
1400 	 * repeatable commands
1401 	 */
1402 
1403 #ifdef DEBUG_PARSER
1404 	printf ("[PROCESS_SEPARATORS] %s\n", cmd);
1405 #endif
1406 	while (*str) {
1407 
1408 		/*
1409 		 * Find separator, or string end
1410 		 * Allow simple escape of ';' by writing "\;"
1411 		 */
1412 		for (inquotes = 0, sep = str; *sep; sep++) {
1413 			if ((*sep=='\'') &&
1414 			    (*(sep-1) != '\\'))
1415 				inquotes=!inquotes;
1416 
1417 			if (!inquotes &&
1418 			    (*sep == ';') &&	/* separator		*/
1419 			    ( sep != str) &&	/* past string start	*/
1420 			    (*(sep-1) != '\\'))	/* and NOT escaped	*/
1421 				break;
1422 		}
1423 
1424 		/*
1425 		 * Limit the token to data between separators
1426 		 */
1427 		token = str;
1428 		if (*sep) {
1429 			str = sep + 1;	/* start of command for next pass */
1430 			*sep = '\0';
1431 		}
1432 		else
1433 			str = sep;	/* no more commands for next pass */
1434 #ifdef DEBUG_PARSER
1435 		printf ("token: \"%s\"\n", token);
1436 #endif
1437 
1438 		/* find macros in this token and replace them */
1439 		process_macros (token, finaltoken);
1440 
1441 		/* Extract arguments */
1442 		if ((argc = parse_line (finaltoken, argv)) == 0) {
1443 			rc = -1;	/* no command at all */
1444 			continue;
1445 		}
1446 
1447 		if (cmd_process(flag, argc, argv, &repeatable, NULL))
1448 			rc = -1;
1449 
1450 		/* Did the user stop this? */
1451 		if (had_ctrlc ())
1452 			return -1;	/* if stopped then not repeatable */
1453 	}
1454 
1455 	return rc ? rc : repeatable;
1456 }
1457 #endif
1458 
1459 /*
1460  * Run a command using the selected parser.
1461  *
1462  * @param cmd	Command to run
1463  * @param flag	Execution flags (CMD_FLAG_...)
1464  * @return 0 on success, or != 0 on error.
1465  */
1466 int run_command(const char *cmd, int flag)
1467 {
1468 #ifndef CONFIG_SYS_HUSH_PARSER
1469 	/*
1470 	 * builtin_run_command can return 0 or 1 for success, so clean up
1471 	 * its result.
1472 	 */
1473 	if (builtin_run_command(cmd, flag) == -1)
1474 		return 1;
1475 
1476 	return 0;
1477 #else
1478 	return parse_string_outer(cmd,
1479 			FLAG_PARSE_SEMICOLON | FLAG_EXIT_FROM_LOOP);
1480 #endif
1481 }
1482 
1483 #ifndef CONFIG_SYS_HUSH_PARSER
1484 /**
1485  * Execute a list of command separated by ; or \n using the built-in parser.
1486  *
1487  * This function cannot take a const char * for the command, since if it
1488  * finds newlines in the string, it replaces them with \0.
1489  *
1490  * @param cmd	String containing list of commands
1491  * @param flag	Execution flags (CMD_FLAG_...)
1492  * @return 0 on success, or != 0 on error.
1493  */
1494 static int builtin_run_command_list(char *cmd, int flag)
1495 {
1496 	char *line, *next;
1497 	int rcode = 0;
1498 
1499 	/*
1500 	 * Break into individual lines, and execute each line; terminate on
1501 	 * error.
1502 	 */
1503 	line = next = cmd;
1504 	while (*next) {
1505 		if (*next == '\n') {
1506 			*next = '\0';
1507 			/* run only non-empty commands */
1508 			if (*line) {
1509 				debug("** exec: \"%s\"\n", line);
1510 				if (builtin_run_command(line, 0) < 0) {
1511 					rcode = 1;
1512 					break;
1513 				}
1514 			}
1515 			line = next + 1;
1516 		}
1517 		++next;
1518 	}
1519 	if (rcode == 0 && *line)
1520 		rcode = (builtin_run_command(line, 0) >= 0);
1521 
1522 	return rcode;
1523 }
1524 #endif
1525 
1526 int run_command_list(const char *cmd, int len, int flag)
1527 {
1528 	int need_buff = 1;
1529 	char *buff = (char *)cmd;	/* cast away const */
1530 	int rcode = 0;
1531 
1532 	if (len == -1) {
1533 		len = strlen(cmd);
1534 #ifdef CONFIG_SYS_HUSH_PARSER
1535 		/* hush will never change our string */
1536 		need_buff = 0;
1537 #else
1538 		/* the built-in parser will change our string if it sees \n */
1539 		need_buff = strchr(cmd, '\n') != NULL;
1540 #endif
1541 	}
1542 	if (need_buff) {
1543 		buff = malloc(len + 1);
1544 		if (!buff)
1545 			return 1;
1546 		memcpy(buff, cmd, len);
1547 		buff[len] = '\0';
1548 	}
1549 #ifdef CONFIG_SYS_HUSH_PARSER
1550 	rcode = parse_string_outer(buff, FLAG_PARSE_SEMICOLON);
1551 #else
1552 	/*
1553 	 * This function will overwrite any \n it sees with a \0, which
1554 	 * is why it can't work with a const char *. Here we are making
1555 	 * using of internal knowledge of this function, to avoid always
1556 	 * doing a malloc() which is actually required only in a case that
1557 	 * is pretty rare.
1558 	 */
1559 	rcode = builtin_run_command_list(buff, flag);
1560 	if (need_buff)
1561 		free(buff);
1562 #endif
1563 
1564 	return rcode;
1565 }
1566 
1567 /****************************************************************************/
1568 
1569 #if defined(CONFIG_CMD_RUN)
1570 int do_run (cmd_tbl_t * cmdtp, int flag, int argc, char * const argv[])
1571 {
1572 	int i;
1573 
1574 	if (argc < 2)
1575 		return CMD_RET_USAGE;
1576 
1577 	for (i=1; i<argc; ++i) {
1578 		char *arg;
1579 
1580 		if ((arg = getenv (argv[i])) == NULL) {
1581 			printf ("## Error: \"%s\" not defined\n", argv[i]);
1582 			return 1;
1583 		}
1584 
1585 		if (run_command(arg, flag) != 0)
1586 			return 1;
1587 	}
1588 	return 0;
1589 }
1590 #endif
1591