blob: 02a862cc5a353b4c5788de13137c26f40d26b345 [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
wdenkd0dd1072002-10-20 17:17:16 +000042
wdenkd0dd1072002-10-20 17:17:16 +000043int
Wolfgang Denk74de7ae2009-04-01 23:34:12 +020044source (ulong addr, const char *fit_uname)
wdenkd0dd1072002-10-20 17:17:16 +000045{
Wolfgang Denk53677ef2008-05-20 16:00:29 +020046 ulong len;
Marian Balakowicz424c4ab2008-03-12 10:33:00 +010047 image_header_t *hdr;
48 ulong *data;
Marian Balakowicz424c4ab2008-03-12 10:33:00 +010049 int verify;
50#if defined(CONFIG_FIT)
51 const void* fit_hdr;
52 int noffset;
53 const void *fit_data;
54 size_t fit_len;
55#endif
wdenkd0dd1072002-10-20 17:17:16 +000056
Bartlomiej Siekaedbed242008-04-18 12:39:23 +020057 verify = getenv_yesno ("verify");
wdenkd0dd1072002-10-20 17:17:16 +000058
Marian Balakowicz9a4daad2008-02-29 14:58:34 +010059 switch (genimg_get_format ((void *)addr)) {
Marian Balakowiczd5934ad2008-02-04 08:28:09 +010060 case IMAGE_FORMAT_LEGACY:
61 hdr = (image_header_t *)addr;
wdenkd0dd1072002-10-20 17:17:16 +000062
Marian Balakowiczd5934ad2008-02-04 08:28:09 +010063 if (!image_check_magic (hdr)) {
64 puts ("Bad magic number\n");
wdenkd0dd1072002-10-20 17:17:16 +000065 return 1;
66 }
wdenkd0dd1072002-10-20 17:17:16 +000067
Marian Balakowiczd5934ad2008-02-04 08:28:09 +010068 if (!image_check_hcrc (hdr)) {
69 puts ("Bad header crc\n");
70 return 1;
71 }
72
73 if (verify) {
74 if (!image_check_dcrc (hdr)) {
75 puts ("Bad data crc\n");
76 return 1;
77 }
78 }
79
80 if (!image_check_type (hdr, IH_TYPE_SCRIPT)) {
81 puts ("Bad image type\n");
82 return 1;
83 }
84
85 /* get length of script */
86 data = (ulong *)image_get_data (hdr);
87
Marian Balakowicz9a4daad2008-02-29 14:58:34 +010088 if ((len = uimage_to_cpu (*data)) == 0) {
Marian Balakowiczd5934ad2008-02-04 08:28:09 +010089 puts ("Empty Script\n");
90 return 1;
91 }
Bartlomiej Sieka36cc8cb2008-03-20 23:10:19 +010092
93 /*
94 * scripts are just multi-image files with one component, seek
95 * past the zero-terminated sequence of image lengths to get
96 * to the actual image data
97 */
98 while (*data++);
Marian Balakowiczd5934ad2008-02-04 08:28:09 +010099 break;
100#if defined(CONFIG_FIT)
101 case IMAGE_FORMAT_FIT:
Marian Balakowicz424c4ab2008-03-12 10:33:00 +0100102 if (fit_uname == NULL) {
103 puts ("No FIT subimage unit name\n");
104 return 1;
105 }
106
107 fit_hdr = (const void *)addr;
108 if (!fit_check_format (fit_hdr)) {
109 puts ("Bad FIT image format\n");
110 return 1;
111 }
112
113 /* get script component image node offset */
114 noffset = fit_image_get_node (fit_hdr, fit_uname);
115 if (noffset < 0) {
116 printf ("Can't find '%s' FIT subimage\n", fit_uname);
117 return 1;
118 }
119
120 if (!fit_image_check_type (fit_hdr, noffset, IH_TYPE_SCRIPT)) {
121 puts ("Not a image image\n");
122 return 1;
123 }
124
125 /* verify integrity */
126 if (verify) {
127 if (!fit_image_check_hashes (fit_hdr, noffset)) {
128 puts ("Bad Data Hash\n");
129 return 1;
130 }
131 }
132
133 /* get script subimage data address and length */
134 if (fit_image_get_data (fit_hdr, noffset, &fit_data, &fit_len)) {
135 puts ("Could not find script subimage data\n");
136 return 1;
137 }
138
139 data = (ulong *)fit_data;
140 len = (ulong)fit_len;
141 break;
Marian Balakowiczd5934ad2008-02-04 08:28:09 +0100142#endif
143 default:
Wolfgang Denk74de7ae2009-04-01 23:34:12 +0200144 puts ("Wrong image format for \"source\" command\n");
wdenkd0dd1072002-10-20 17:17:16 +0000145 return 1;
146 }
147
wdenk699b13a2002-11-03 18:03:52 +0000148 debug ("** Script length: %ld\n", len);
Simon Glassd51004a2012-03-30 21:30:55 +0000149 return run_command_list((char *)data, len, 0);
wdenkd0dd1072002-10-20 17:17:16 +0000150}
151
wdenk8bde7f72003-06-27 21:31:46 +0000152/**************************************************/
Wolfgang Denk74de7ae2009-04-01 23:34:12 +0200153#if defined(CONFIG_CMD_SOURCE)
wdenkd0dd1072002-10-20 17:17:16 +0000154int
Wolfgang Denk54841ab2010-06-28 22:00:46 +0200155do_source (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
wdenkd0dd1072002-10-20 17:17:16 +0000156{
157 ulong addr;
158 int rcode;
Marian Balakowicz424c4ab2008-03-12 10:33:00 +0100159 const char *fit_uname = NULL;
wdenkd0dd1072002-10-20 17:17:16 +0000160
Marian Balakowicz424c4ab2008-03-12 10:33:00 +0100161 /* Find script image */
wdenkd0dd1072002-10-20 17:17:16 +0000162 if (argc < 2) {
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200163 addr = CONFIG_SYS_LOAD_ADDR;
Wolfgang Denk74de7ae2009-04-01 23:34:12 +0200164 debug ("* source: default load address = 0x%08lx\n", addr);
Marian Balakowicz424c4ab2008-03-12 10:33:00 +0100165#if defined(CONFIG_FIT)
166 } else if (fit_parse_subimage (argv[1], load_addr, &addr, &fit_uname)) {
Wolfgang Denk74de7ae2009-04-01 23:34:12 +0200167 debug ("* source: subimage '%s' from FIT image at 0x%08lx\n",
Marian Balakowicz424c4ab2008-03-12 10:33:00 +0100168 fit_uname, addr);
169#endif
wdenkd0dd1072002-10-20 17:17:16 +0000170 } else {
Marian Balakowicz424c4ab2008-03-12 10:33:00 +0100171 addr = simple_strtoul(argv[1], NULL, 16);
Wolfgang Denk74de7ae2009-04-01 23:34:12 +0200172 debug ("* source: cmdline image address = 0x%08lx\n", addr);
wdenkd0dd1072002-10-20 17:17:16 +0000173 }
174
Marian Balakowicz424c4ab2008-03-12 10:33:00 +0100175 printf ("## Executing script at %08lx\n", addr);
Wolfgang Denk74de7ae2009-04-01 23:34:12 +0200176 rcode = source (addr, fit_uname);
wdenkd0dd1072002-10-20 17:17:16 +0000177 return rcode;
178}
wdenk8bde7f72003-06-27 21:31:46 +0000179
Kim Phillips088f1b12012-10-29 13:34:31 +0000180#ifdef CONFIG_SYS_LONGHELP
181static char source_help_text[] =
Wolfgang Denk74de7ae2009-04-01 23:34:12 +0200182 "[addr]\n"
183 "\t- run script starting at addr\n"
Wolfgang Denka89c33d2009-05-24 17:06:54 +0200184 "\t- A valid image header must be present"
Marian Balakowicz424c4ab2008-03-12 10:33:00 +0100185#if defined(CONFIG_FIT)
Wolfgang Denka89c33d2009-05-24 17:06:54 +0200186 "\n"
Marian Balakowicz424c4ab2008-03-12 10:33:00 +0100187 "For FIT format uImage addr must include subimage\n"
Wolfgang Denka89c33d2009-05-24 17:06:54 +0200188 "unit name in the form of addr:<subimg_uname>"
Jon Loeliger90253172007-07-10 11:02:44 -0500189#endif
Kim Phillips088f1b12012-10-29 13:34:31 +0000190 "";
191#endif
192
193U_BOOT_CMD(
194 source, 2, 0, do_source,
195 "run script from memory", source_help_text
Marian Balakowicz424c4ab2008-03-12 10:33:00 +0100196);
Jon Loeliger90253172007-07-10 11:02:44 -0500197#endif