]> git.ipfire.org Git - people/ms/u-boot.git/blame - cmd/source.c
cmd: Kconfig: Add a Kconfig options for a few CMD
[people/ms/u-boot.git] / cmd / source.c
CommitLineData
d0dd1077
WD
1/*
2 * (C) Copyright 2001
3 * Kyle Harris, kharris@nexus-tech.net
4 *
1a459660 5 * SPDX-License-Identifier: GPL-2.0+
d0dd1077
WD
6 */
7
8/*
74de7aef
WD
9 * The "source" command allows to define "script images", i. e. files
10 * that contain command sequences that can be executed by the command
11 * interpreter. It returns the exit status of the last command
12 * executed from the script. This is very similar to running a shell
13 * script in a UNIX shell, hence the name for the command.
d0dd1077
WD
14 */
15
16/* #define DEBUG */
17
18#include <common.h>
19#include <command.h>
20#include <image.h>
21#include <malloc.h>
0eb25b61 22#include <mapmem.h>
d0dd1077 23#include <asm/byteorder.h>
4ca30d60 24#include <asm/io.h>
d0dd1077
WD
25#if defined(CONFIG_8xx)
26#include <mpc8xx.h>
27#endif
d0dd1077 28
d0dd1077 29int
74de7aef 30source (ulong addr, const char *fit_uname)
d0dd1077 31{
53677ef1 32 ulong len;
21d29f7f 33#if defined(CONFIG_IMAGE_FORMAT_LEGACY)
4ca30d60 34 const image_header_t *hdr;
21d29f7f 35#endif
210fbee9 36 u32 *data;
424c4abd 37 int verify;
4ca30d60 38 void *buf;
424c4abd
MB
39#if defined(CONFIG_FIT)
40 const void* fit_hdr;
41 int noffset;
42 const void *fit_data;
43 size_t fit_len;
44#endif
d0dd1077 45
edbed247 46 verify = getenv_yesno ("verify");
d0dd1077 47
4ca30d60
SG
48 buf = map_sysmem(addr, 0);
49 switch (genimg_get_format(buf)) {
21d29f7f 50#if defined(CONFIG_IMAGE_FORMAT_LEGACY)
d5934ad7 51 case IMAGE_FORMAT_LEGACY:
4ca30d60 52 hdr = buf;
d0dd1077 53
d5934ad7
MB
54 if (!image_check_magic (hdr)) {
55 puts ("Bad magic number\n");
56 return 1;
57 }
d0dd1077 58
d5934ad7
MB
59 if (!image_check_hcrc (hdr)) {
60 puts ("Bad header crc\n");
d0dd1077
WD
61 return 1;
62 }
d0dd1077 63
d5934ad7
MB
64 if (verify) {
65 if (!image_check_dcrc (hdr)) {
66 puts ("Bad data crc\n");
67 return 1;
68 }
69 }
70
71 if (!image_check_type (hdr, IH_TYPE_SCRIPT)) {
72 puts ("Bad image type\n");
73 return 1;
74 }
d0dd1077 75
d5934ad7 76 /* get length of script */
210fbee9 77 data = (u32 *)image_get_data (hdr);
d0dd1077 78
9a4daad0 79 if ((len = uimage_to_cpu (*data)) == 0) {
d5934ad7
MB
80 puts ("Empty Script\n");
81 return 1;
82 }
36cc8cbb
BS
83
84 /*
85 * scripts are just multi-image files with one component, seek
86 * past the zero-terminated sequence of image lengths to get
87 * to the actual image data
88 */
89 while (*data++);
d5934ad7 90 break;
21d29f7f 91#endif
d5934ad7
MB
92#if defined(CONFIG_FIT)
93 case IMAGE_FORMAT_FIT:
424c4abd
MB
94 if (fit_uname == NULL) {
95 puts ("No FIT subimage unit name\n");
96 return 1;
97 }
98
4ca30d60 99 fit_hdr = buf;
424c4abd
MB
100 if (!fit_check_format (fit_hdr)) {
101 puts ("Bad FIT image format\n");
102 return 1;
103 }
104
105 /* get script component image node offset */
106 noffset = fit_image_get_node (fit_hdr, fit_uname);
107 if (noffset < 0) {
108 printf ("Can't find '%s' FIT subimage\n", fit_uname);
109 return 1;
110 }
111
112 if (!fit_image_check_type (fit_hdr, noffset, IH_TYPE_SCRIPT)) {
113 puts ("Not a image image\n");
114 return 1;
115 }
116
117 /* verify integrity */
118 if (verify) {
b8da8366 119 if (!fit_image_verify(fit_hdr, noffset)) {
424c4abd
MB
120 puts ("Bad Data Hash\n");
121 return 1;
122 }
123 }
124
125 /* get script subimage data address and length */
126 if (fit_image_get_data (fit_hdr, noffset, &fit_data, &fit_len)) {
127 puts ("Could not find script subimage data\n");
128 return 1;
129 }
130
210fbee9 131 data = (u32 *)fit_data;
424c4abd
MB
132 len = (ulong)fit_len;
133 break;
d5934ad7
MB
134#endif
135 default:
74de7aef 136 puts ("Wrong image format for \"source\" command\n");
d0dd1077
WD
137 return 1;
138 }
139
699b13a6 140 debug ("** Script length: %ld\n", len);
d51004a8 141 return run_command_list((char *)data, len, 0);
d0dd1077
WD
142}
143
8bde7f77 144/**************************************************/
74de7aef 145#if defined(CONFIG_CMD_SOURCE)
0e350f81 146static int do_source(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
d0dd1077
WD
147{
148 ulong addr;
149 int rcode;
424c4abd 150 const char *fit_uname = NULL;
d0dd1077 151
424c4abd 152 /* Find script image */
d0dd1077 153 if (argc < 2) {
6d0f6bcf 154 addr = CONFIG_SYS_LOAD_ADDR;
74de7aef 155 debug ("* source: default load address = 0x%08lx\n", addr);
424c4abd
MB
156#if defined(CONFIG_FIT)
157 } else if (fit_parse_subimage (argv[1], load_addr, &addr, &fit_uname)) {
74de7aef 158 debug ("* source: subimage '%s' from FIT image at 0x%08lx\n",
424c4abd
MB
159 fit_uname, addr);
160#endif
d0dd1077 161 } else {
424c4abd 162 addr = simple_strtoul(argv[1], NULL, 16);
74de7aef 163 debug ("* source: cmdline image address = 0x%08lx\n", addr);
d0dd1077
WD
164 }
165
424c4abd 166 printf ("## Executing script at %08lx\n", addr);
74de7aef 167 rcode = source (addr, fit_uname);
d0dd1077
WD
168 return rcode;
169}
8bde7f77 170
088f1b19
KP
171#ifdef CONFIG_SYS_LONGHELP
172static char source_help_text[] =
74de7aef
WD
173 "[addr]\n"
174 "\t- run script starting at addr\n"
a89c33db 175 "\t- A valid image header must be present"
424c4abd 176#if defined(CONFIG_FIT)
a89c33db 177 "\n"
424c4abd 178 "For FIT format uImage addr must include subimage\n"
a89c33db 179 "unit name in the form of addr:<subimg_uname>"
90253178 180#endif
088f1b19
KP
181 "";
182#endif
183
184U_BOOT_CMD(
185 source, 2, 0, do_source,
186 "run script from memory", source_help_text
424c4abd 187);
90253178 188#endif