blob: 965b8b1b04534483e869812282753d962b492af2 [file] [log] [blame]
wdenkd0dd1072002-10-20 17:17:16 +00001/*
2 * (C) Copyright 2001
3 * Kyle Harris, kharris@nexus-tech.net
4 *
5 * See file CREDITS for list of people who contributed to this
6 * project.
7 *
8 * This program is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU General Public License as
10 * published by the Free Software Foundation; either version 2 of
11 * the License, or (at your option) any later version.
12 *
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
17 *
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
21 * MA 02111-1307 USA
22 */
23
24/*
Wolfgang Denk74de7ae2009-04-01 23:34:12 +020025 * The "source" command allows to define "script images", i. e. files
26 * that contain command sequences that can be executed by the command
27 * interpreter. It returns the exit status of the last command
28 * executed from the script. This is very similar to running a shell
29 * script in a UNIX shell, hence the name for the command.
wdenkd0dd1072002-10-20 17:17:16 +000030 */
31
32/* #define DEBUG */
33
34#include <common.h>
35#include <command.h>
36#include <image.h>
37#include <malloc.h>
38#include <asm/byteorder.h>
wdenkd0dd1072002-10-20 17:17:16 +000039#if defined(CONFIG_8xx)
40#include <mpc8xx.h>
41#endif
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +020042#ifdef CONFIG_SYS_HUSH_PARSER
wdenkd0dd1072002-10-20 17:17:16 +000043#include <hush.h>
44#endif
45
wdenkd0dd1072002-10-20 17:17:16 +000046int
Wolfgang Denk74de7ae2009-04-01 23:34:12 +020047source (ulong addr, const char *fit_uname)
wdenkd0dd1072002-10-20 17:17:16 +000048{
Wolfgang Denk53677ef2008-05-20 16:00:29 +020049 ulong len;
Marian Balakowicz424c4ab2008-03-12 10:33:00 +010050 image_header_t *hdr;
51 ulong *data;
52 char *cmd;
53 int rcode = 0;
54 int verify;
55#if defined(CONFIG_FIT)
56 const void* fit_hdr;
57 int noffset;
58 const void *fit_data;
59 size_t fit_len;
60#endif
wdenkd0dd1072002-10-20 17:17:16 +000061
Bartlomiej Siekaedbed242008-04-18 12:39:23 +020062 verify = getenv_yesno ("verify");
wdenkd0dd1072002-10-20 17:17:16 +000063
Marian Balakowicz9a4daad2008-02-29 14:58:34 +010064 switch (genimg_get_format ((void *)addr)) {
Marian Balakowiczd5934ad2008-02-04 08:28:09 +010065 case IMAGE_FORMAT_LEGACY:
66 hdr = (image_header_t *)addr;
wdenkd0dd1072002-10-20 17:17:16 +000067
Marian Balakowiczd5934ad2008-02-04 08:28:09 +010068 if (!image_check_magic (hdr)) {
69 puts ("Bad magic number\n");
wdenkd0dd1072002-10-20 17:17:16 +000070 return 1;
71 }
wdenkd0dd1072002-10-20 17:17:16 +000072
Marian Balakowiczd5934ad2008-02-04 08:28:09 +010073 if (!image_check_hcrc (hdr)) {
74 puts ("Bad header crc\n");
75 return 1;
76 }
77
78 if (verify) {
79 if (!image_check_dcrc (hdr)) {
80 puts ("Bad data crc\n");
81 return 1;
82 }
83 }
84
85 if (!image_check_type (hdr, IH_TYPE_SCRIPT)) {
86 puts ("Bad image type\n");
87 return 1;
88 }
89
90 /* get length of script */
91 data = (ulong *)image_get_data (hdr);
92
Marian Balakowicz9a4daad2008-02-29 14:58:34 +010093 if ((len = uimage_to_cpu (*data)) == 0) {
Marian Balakowiczd5934ad2008-02-04 08:28:09 +010094 puts ("Empty Script\n");
95 return 1;
96 }
Bartlomiej Sieka36cc8cb2008-03-20 23:10:19 +010097
98 /*
99 * scripts are just multi-image files with one component, seek
100 * past the zero-terminated sequence of image lengths to get
101 * to the actual image data
102 */
103 while (*data++);
Marian Balakowiczd5934ad2008-02-04 08:28:09 +0100104 break;
105#if defined(CONFIG_FIT)
106 case IMAGE_FORMAT_FIT:
Marian Balakowicz424c4ab2008-03-12 10:33:00 +0100107 if (fit_uname == NULL) {
108 puts ("No FIT subimage unit name\n");
109 return 1;
110 }
111
112 fit_hdr = (const void *)addr;
113 if (!fit_check_format (fit_hdr)) {
114 puts ("Bad FIT image format\n");
115 return 1;
116 }
117
118 /* get script component image node offset */
119 noffset = fit_image_get_node (fit_hdr, fit_uname);
120 if (noffset < 0) {
121 printf ("Can't find '%s' FIT subimage\n", fit_uname);
122 return 1;
123 }
124
125 if (!fit_image_check_type (fit_hdr, noffset, IH_TYPE_SCRIPT)) {
126 puts ("Not a image image\n");
127 return 1;
128 }
129
130 /* verify integrity */
131 if (verify) {
132 if (!fit_image_check_hashes (fit_hdr, noffset)) {
133 puts ("Bad Data Hash\n");
134 return 1;
135 }
136 }
137
138 /* get script subimage data address and length */
139 if (fit_image_get_data (fit_hdr, noffset, &fit_data, &fit_len)) {
140 puts ("Could not find script subimage data\n");
141 return 1;
142 }
143
144 data = (ulong *)fit_data;
145 len = (ulong)fit_len;
146 break;
Marian Balakowiczd5934ad2008-02-04 08:28:09 +0100147#endif
148 default:
Wolfgang Denk74de7ae2009-04-01 23:34:12 +0200149 puts ("Wrong image format for \"source\" command\n");
wdenkd0dd1072002-10-20 17:17:16 +0000150 return 1;
151 }
152
wdenk699b13a2002-11-03 18:03:52 +0000153 debug ("** Script length: %ld\n", len);
wdenkd0dd1072002-10-20 17:17:16 +0000154
155 if ((cmd = malloc (len + 1)) == NULL) {
156 return 1;
157 }
158
wdenkd0dd1072002-10-20 17:17:16 +0000159 /* make sure cmd is null terminated */
Marian Balakowiczf13e7b22008-01-08 18:12:17 +0100160 memmove (cmd, (char *)data, len);
wdenkd0dd1072002-10-20 17:17:16 +0000161 *(cmd + len) = 0;
162
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200163#ifdef CONFIG_SYS_HUSH_PARSER /*?? */
wdenkd0dd1072002-10-20 17:17:16 +0000164 rcode = parse_string_outer (cmd, FLAG_PARSE_SEMICOLON);
165#else
166 {
167 char *line = cmd;
168 char *next = cmd;
169
170 /*
171 * break into individual lines,
172 * and execute each line;
173 * terminate on error.
174 */
175 while (*next) {
176 if (*next == '\n') {
177 *next = '\0';
178 /* run only non-empty commands */
Petri Lehtinen35912932008-09-10 09:43:49 +0300179 if (*line) {
wdenkd0dd1072002-10-20 17:17:16 +0000180 debug ("** exec: \"%s\"\n",
181 line);
182 if (run_command (line, 0) < 0) {
183 rcode = 1;
184 break;
185 }
186 }
187 line = next + 1;
188 }
189 ++next;
190 }
Petri Lehtinen35912932008-09-10 09:43:49 +0300191 if (rcode == 0 && *line)
192 rcode = (run_command(line, 0) >= 0);
wdenkd0dd1072002-10-20 17:17:16 +0000193 }
194#endif
195 free (cmd);
196 return rcode;
197}
198
wdenk8bde7f72003-06-27 21:31:46 +0000199/**************************************************/
Wolfgang Denk74de7ae2009-04-01 23:34:12 +0200200#if defined(CONFIG_CMD_SOURCE)
wdenkd0dd1072002-10-20 17:17:16 +0000201int
Wolfgang Denk74de7ae2009-04-01 23:34:12 +0200202do_source (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
wdenkd0dd1072002-10-20 17:17:16 +0000203{
204 ulong addr;
205 int rcode;
Marian Balakowicz424c4ab2008-03-12 10:33:00 +0100206 const char *fit_uname = NULL;
wdenkd0dd1072002-10-20 17:17:16 +0000207
Marian Balakowicz424c4ab2008-03-12 10:33:00 +0100208 /* Find script image */
wdenkd0dd1072002-10-20 17:17:16 +0000209 if (argc < 2) {
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200210 addr = CONFIG_SYS_LOAD_ADDR;
Wolfgang Denk74de7ae2009-04-01 23:34:12 +0200211 debug ("* source: default load address = 0x%08lx\n", addr);
Marian Balakowicz424c4ab2008-03-12 10:33:00 +0100212#if defined(CONFIG_FIT)
213 } else if (fit_parse_subimage (argv[1], load_addr, &addr, &fit_uname)) {
Wolfgang Denk74de7ae2009-04-01 23:34:12 +0200214 debug ("* source: subimage '%s' from FIT image at 0x%08lx\n",
Marian Balakowicz424c4ab2008-03-12 10:33:00 +0100215 fit_uname, addr);
216#endif
wdenkd0dd1072002-10-20 17:17:16 +0000217 } else {
Marian Balakowicz424c4ab2008-03-12 10:33:00 +0100218 addr = simple_strtoul(argv[1], NULL, 16);
Wolfgang Denk74de7ae2009-04-01 23:34:12 +0200219 debug ("* source: cmdline image address = 0x%08lx\n", addr);
wdenkd0dd1072002-10-20 17:17:16 +0000220 }
221
Marian Balakowicz424c4ab2008-03-12 10:33:00 +0100222 printf ("## Executing script at %08lx\n", addr);
Wolfgang Denk74de7ae2009-04-01 23:34:12 +0200223 rcode = source (addr, fit_uname);
wdenkd0dd1072002-10-20 17:17:16 +0000224 return rcode;
225}
wdenk8bde7f72003-06-27 21:31:46 +0000226
wdenk0d498392003-07-01 21:06:45 +0000227U_BOOT_CMD(
Wolfgang Denk74de7ae2009-04-01 23:34:12 +0200228 source, 2, 0, do_source,
Peter Tyser2fb26042009-01-27 18:03:12 -0600229 "run script from memory",
Wolfgang Denk74de7ae2009-04-01 23:34:12 +0200230 "[addr]\n"
231 "\t- run script starting at addr\n"
Wolfgang Denka89c33d2009-05-24 17:06:54 +0200232 "\t- A valid image header must be present"
Marian Balakowicz424c4ab2008-03-12 10:33:00 +0100233#if defined(CONFIG_FIT)
Wolfgang Denka89c33d2009-05-24 17:06:54 +0200234 "\n"
Marian Balakowicz424c4ab2008-03-12 10:33:00 +0100235 "For FIT format uImage addr must include subimage\n"
Wolfgang Denka89c33d2009-05-24 17:06:54 +0200236 "unit name in the form of addr:<subimg_uname>"
Jon Loeliger90253172007-07-10 11:02:44 -0500237#endif
Marian Balakowicz424c4ab2008-03-12 10:33:00 +0100238);
Wolfgang Denk74de7ae2009-04-01 23:34:12 +0200239
240/*
241 * Keep for now for backward compatibility;
242 * remove later when support for "autoscr" goes away.
243 */
244static int
245do_autoscr (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
246{
247 printf ("\n### WARNING ### "
248 "\"autoscr\" is deprecated, use \"source\" instead ###\n\n");
249 return do_source (cmdtp, flag, argc, argv);
250}
251
252U_BOOT_CMD(
253 autoscr, 2, 0, do_autoscr,
254 "DEPRECATED - use \"source\" command instead",
Wolfgang Denka89c33d2009-05-24 17:06:54 +0200255 ""
Wolfgang Denk74de7ae2009-04-01 23:34:12 +0200256);
Jon Loeliger90253172007-07-10 11:02:44 -0500257#endif