]>
Commit | Line | Data |
---|---|---|
a68d3ed0 | 1 | /* |
ea882baf | 2 | * (C) Copyright 2000-2010 |
a68d3ed0 WD |
3 | * Wolfgang Denk, DENX Software Engineering, wd@denx.de. |
4 | * | |
5 | * (C) Copyright 2001 Sysgo Real-Time Solutions, GmbH <www.elinos.com> | |
6 | * Andreas Heppel <aheppel@sysgo.de> | |
a000b795 KP |
7 | * |
8 | * Copyright 2011 Freescale Semiconductor, Inc. | |
9 | * | |
a68d3ed0 WD |
10 | * See file CREDITS for list of people who contributed to this |
11 | * project. | |
12 | * | |
13 | * This program is free software; you can redistribute it and/or | |
14 | * modify it under the terms of the GNU General Public License as | |
15 | * published by the Free Software Foundation; either version 2 of | |
16 | * the License, or (at your option) any later version. | |
17 | * | |
18 | * This program is distributed in the hope that it will be useful, | |
19 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
20 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
21 | * GNU General Public License for more details. | |
22 | * | |
23 | * You should have received a copy of the GNU General Public License | |
24 | * along with this program; if not, write to the Free Software | |
25 | * Foundation, Inc., 59 Temple Place, Suite 330, Boston, | |
26 | * MA 02111-1307 USA | |
27 | */ | |
28 | ||
ea882baf | 29 | /* |
a68d3ed0 WD |
30 | * Support for persistent environment data |
31 | * | |
ea882baf WD |
32 | * The "environment" is stored on external storage as a list of '\0' |
33 | * terminated "name=value" strings. The end of the list is marked by | |
34 | * a double '\0'. The environment is preceeded by a 32 bit CRC over | |
35 | * the data part and, in case of redundant environment, a byte of | |
36 | * flags. | |
a68d3ed0 | 37 | * |
ea882baf WD |
38 | * This linearized representation will also be used before |
39 | * relocation, i. e. as long as we don't have a full C runtime | |
40 | * environment. After that, we use a hash table. | |
a68d3ed0 WD |
41 | */ |
42 | ||
43 | #include <common.h> | |
44 | #include <command.h> | |
45 | #include <environment.h> | |
ea882baf WD |
46 | #include <search.h> |
47 | #include <errno.h> | |
246c6922 | 48 | #include <malloc.h> |
2a3cb020 | 49 | #include <watchdog.h> |
281e00a3 | 50 | #include <serial.h> |
a68d3ed0 WD |
51 | #include <linux/stddef.h> |
52 | #include <asm/byteorder.h> | |
c76fe474 | 53 | #if defined(CONFIG_CMD_NET) |
a68d3ed0 WD |
54 | #include <net.h> |
55 | #endif | |
56 | ||
d87080b7 WD |
57 | DECLARE_GLOBAL_DATA_PTR; |
58 | ||
f3c615b8 ML |
59 | #if !defined(CONFIG_ENV_IS_IN_EEPROM) && \ |
60 | !defined(CONFIG_ENV_IS_IN_FLASH) && \ | |
61 | !defined(CONFIG_ENV_IS_IN_DATAFLASH) && \ | |
62 | !defined(CONFIG_ENV_IS_IN_MG_DISK) && \ | |
63 | !defined(CONFIG_ENV_IS_IN_MMC) && \ | |
64 | !defined(CONFIG_ENV_IS_IN_NAND) && \ | |
65 | !defined(CONFIG_ENV_IS_IN_NVRAM) && \ | |
66 | !defined(CONFIG_ENV_IS_IN_ONENAND) && \ | |
67 | !defined(CONFIG_ENV_IS_IN_SPI_FLASH) && \ | |
68 | !defined(CONFIG_ENV_IS_NOWHERE) | |
75eb82ec | 69 | # error Define one of CONFIG_ENV_IS_IN_{EEPROM|FLASH|DATAFLASH|ONENAND|\ |
31e41398 | 70 | SPI_FLASH|MG_DISK|NVRAM|MMC} or CONFIG_ENV_IS_NOWHERE |
a68d3ed0 WD |
71 | #endif |
72 | ||
73 | #define XMK_STR(x) #x | |
74 | #define MK_STR(x) XMK_STR(x) | |
75 | ||
ea882baf WD |
76 | /* |
77 | * Maximum expected input data size for import command | |
78 | */ | |
79 | #define MAX_ENV_SIZE (1 << 20) /* 1 MiB */ | |
a68d3ed0 | 80 | |
558605cf MF |
81 | ulong load_addr = CONFIG_SYS_LOAD_ADDR; /* Default Load Address */ |
82 | ||
a68d3ed0 WD |
83 | /* |
84 | * Table with supported baudrates (defined in config_xyz.h) | |
85 | */ | |
6d0f6bcf | 86 | static const unsigned long baudrate_table[] = CONFIG_SYS_BAUDRATE_TABLE; |
a68d3ed0 WD |
87 | #define N_BAUDRATES (sizeof(baudrate_table) / sizeof(baudrate_table[0])) |
88 | ||
da95427c | 89 | /* |
ea882baf | 90 | * This variable is incremented on each do_env_set(), so it can |
da95427c HS |
91 | * be used via get_env_id() as an indication, if the environment |
92 | * has changed or not. So it is possible to reread an environment | |
93 | * variable only if the environment was changed ... done so for | |
94 | * example in NetInitLoop() | |
95 | */ | |
2f70c49e | 96 | static int env_id = 1; |
a68d3ed0 | 97 | |
f3c615b8 | 98 | int get_env_id(void) |
2f70c49e HS |
99 | { |
100 | return env_id; | |
101 | } | |
a68d3ed0 | 102 | |
4c94f6c5 | 103 | /* |
ea882baf WD |
104 | * Command interface: print one or all environment variables |
105 | * | |
106 | * Returns 0 in case of error, or length of printed string | |
4c94f6c5 | 107 | */ |
ea882baf | 108 | static int env_print(char *name) |
a68d3ed0 | 109 | { |
ea882baf WD |
110 | char *res = NULL; |
111 | size_t len; | |
112 | ||
113 | if (name) { /* print a single name */ | |
114 | ENTRY e, *ep; | |
115 | ||
116 | e.key = name; | |
117 | e.data = NULL; | |
2eb1573f | 118 | hsearch_r(e, FIND, &ep, &env_htab); |
ea882baf WD |
119 | if (ep == NULL) |
120 | return 0; | |
f3c615b8 | 121 | len = printf("%s=%s\n", ep->key, ep->data); |
ea882baf WD |
122 | return len; |
123 | } | |
a68d3ed0 | 124 | |
ea882baf | 125 | /* print whole list */ |
2eb1573f | 126 | len = hexport_r(&env_htab, '\n', &res, 0); |
a68d3ed0 | 127 | |
ea882baf WD |
128 | if (len > 0) { |
129 | puts(res); | |
130 | free(res); | |
131 | return len; | |
a68d3ed0 WD |
132 | } |
133 | ||
ea882baf WD |
134 | /* should never happen */ |
135 | return 0; | |
4c94f6c5 | 136 | } |
a68d3ed0 | 137 | |
ea882baf | 138 | int do_env_print (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]) |
4c94f6c5 MF |
139 | { |
140 | int i; | |
141 | int rcode = 0; | |
a68d3ed0 | 142 | |
4c94f6c5 MF |
143 | if (argc == 1) { |
144 | /* print all env vars */ | |
ea882baf WD |
145 | rcode = env_print(NULL); |
146 | if (!rcode) | |
4c94f6c5 MF |
147 | return 1; |
148 | printf("\nEnvironment size: %d/%ld bytes\n", | |
149 | rcode, (ulong)ENV_SIZE); | |
150 | return 0; | |
151 | } | |
a68d3ed0 | 152 | |
4c94f6c5 MF |
153 | /* print selected env vars */ |
154 | for (i = 1; i < argc; ++i) { | |
ea882baf WD |
155 | int rc = env_print(argv[i]); |
156 | if (!rc) { | |
157 | printf("## Error: \"%s\" not defined\n", argv[i]); | |
4c94f6c5 | 158 | ++rcode; |
a68d3ed0 WD |
159 | } |
160 | } | |
4c94f6c5 | 161 | |
a68d3ed0 WD |
162 | return rcode; |
163 | } | |
164 | ||
a000b795 KP |
165 | #ifdef CONFIG_CMD_GREPENV |
166 | static int do_env_grep (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]) | |
167 | { | |
168 | ENTRY *match; | |
169 | unsigned char matched[env_htab.size / 8]; | |
170 | int rcode = 1, arg = 1, idx; | |
171 | ||
172 | if (argc < 2) | |
173 | return cmd_usage(cmdtp); | |
174 | ||
175 | memset(matched, 0, env_htab.size / 8); | |
176 | ||
177 | while (arg <= argc) { | |
178 | idx = 0; | |
179 | while ((idx = hstrstr_r(argv[arg], idx, &match, &env_htab))) { | |
180 | if (!(matched[idx / 8] & (1 << (idx & 7)))) { | |
181 | puts(match->key); | |
182 | puts("="); | |
183 | puts(match->data); | |
184 | puts("\n"); | |
185 | } | |
186 | matched[idx / 8] |= 1 << (idx & 7); | |
187 | rcode = 0; | |
188 | } | |
189 | arg++; | |
190 | } | |
191 | ||
192 | return rcode; | |
193 | } | |
194 | #endif | |
195 | ||
ea882baf | 196 | /* |
a68d3ed0 WD |
197 | * Set a new environment variable, |
198 | * or replace or delete an existing one. | |
a68d3ed0 WD |
199 | */ |
200 | ||
ea882baf | 201 | int _do_env_set (int flag, int argc, char * const argv[]) |
a68d3ed0 | 202 | { |
ea882baf WD |
203 | bd_t *bd = gd->bd; |
204 | int i, len; | |
a68d3ed0 | 205 | int console = -1; |
ea882baf WD |
206 | char *name, *value, *s; |
207 | ENTRY e, *ep; | |
a68d3ed0 WD |
208 | |
209 | name = argv[1]; | |
210 | ||
471a7be7 | 211 | if (strchr(name, '=')) { |
f3c615b8 | 212 | printf("## Error: illegal character '=' in variable name \"%s\"\n", name); |
471a7be7 WD |
213 | return 1; |
214 | } | |
215 | ||
2f70c49e | 216 | env_id++; |
a68d3ed0 WD |
217 | /* |
218 | * search if variable with this name already exists | |
219 | */ | |
ea882baf WD |
220 | e.key = name; |
221 | e.data = NULL; | |
2eb1573f | 222 | hsearch_r(e, FIND, &ep, &env_htab); |
a68d3ed0 | 223 | |
9c5586aa | 224 | /* Check for console redirection */ |
f3c615b8 | 225 | if (strcmp(name, "stdin") == 0) |
9c5586aa | 226 | console = stdin; |
f3c615b8 | 227 | else if (strcmp(name, "stdout") == 0) |
9c5586aa | 228 | console = stdout; |
f3c615b8 | 229 | else if (strcmp(name, "stderr") == 0) |
9c5586aa | 230 | console = stderr; |
9c5586aa AR |
231 | |
232 | if (console != -1) { | |
233 | if (argc < 3) { /* Cannot delete it! */ | |
234 | printf("Can't delete \"%s\"\n", name); | |
235 | return 1; | |
236 | } | |
237 | ||
238 | #ifdef CONFIG_CONSOLE_MUX | |
239 | i = iomux_doenv(console, argv[2]); | |
240 | if (i) | |
241 | return i; | |
242 | #else | |
243 | /* Try assigning specified device */ | |
f3c615b8 | 244 | if (console_assign(console, argv[2]) < 0) |
9c5586aa AR |
245 | return 1; |
246 | ||
247 | #ifdef CONFIG_SERIAL_MULTI | |
f3c615b8 | 248 | if (serial_assign(argv[2]) < 0) |
9c5586aa AR |
249 | return 1; |
250 | #endif | |
251 | #endif /* CONFIG_CONSOLE_MUX */ | |
252 | } | |
253 | ||
a68d3ed0 | 254 | /* |
ea882baf WD |
255 | * Some variables like "ethaddr" and "serial#" can be set only |
256 | * once and cannot be deleted; also, "ver" is readonly. | |
a68d3ed0 | 257 | */ |
ea882baf | 258 | if (ep) { /* variable exists */ |
a68d3ed0 | 259 | #ifndef CONFIG_ENV_OVERWRITE |
f3c615b8 ML |
260 | if ((strcmp(name, "serial#") == 0) || |
261 | ((strcmp(name, "ethaddr") == 0) | |
a68d3ed0 | 262 | #if defined(CONFIG_OVERWRITE_ETHADDR_ONCE) && defined(CONFIG_ETHADDR) |
f3c615b8 | 263 | && (strcmp(ep->data, MK_STR(CONFIG_ETHADDR)) != 0) |
a68d3ed0 WD |
264 | #endif /* CONFIG_OVERWRITE_ETHADDR_ONCE && CONFIG_ETHADDR */ |
265 | ) ) { | |
f3c615b8 | 266 | printf("Can't overwrite \"%s\"\n", name); |
a68d3ed0 WD |
267 | return 1; |
268 | } | |
269 | #endif | |
a68d3ed0 WD |
270 | /* |
271 | * Switch to new baudrate if new baudrate is supported | |
272 | */ | |
f3c615b8 | 273 | if (strcmp(name, "baudrate") == 0) { |
a68d3ed0 WD |
274 | int baudrate = simple_strtoul(argv[2], NULL, 10); |
275 | int i; | |
f3c615b8 | 276 | for (i = 0; i < N_BAUDRATES; ++i) { |
a68d3ed0 WD |
277 | if (baudrate == baudrate_table[i]) |
278 | break; | |
279 | } | |
280 | if (i == N_BAUDRATES) { | |
f3c615b8 | 281 | printf("## Baudrate %d bps not supported\n", |
a68d3ed0 WD |
282 | baudrate); |
283 | return 1; | |
284 | } | |
285 | printf ("## Switch baudrate to %d bps and press ENTER ...\n", | |
286 | baudrate); | |
287 | udelay(50000); | |
288 | gd->baudrate = baudrate; | |
c84bad0e | 289 | #if defined(CONFIG_PPC) || defined(CONFIG_MCF52x2) |
d0fb80c3 WD |
290 | gd->bd->bi_baudrate = baudrate; |
291 | #endif | |
292 | ||
f3c615b8 | 293 | serial_setbrg(); |
a68d3ed0 WD |
294 | udelay(50000); |
295 | for (;;) { | |
296 | if (getc() == '\r') | |
f3c615b8 | 297 | break; |
a68d3ed0 WD |
298 | } |
299 | } | |
a68d3ed0 WD |
300 | } |
301 | ||
a68d3ed0 WD |
302 | /* Delete only ? */ |
303 | if ((argc < 3) || argv[2] == NULL) { | |
2eb1573f | 304 | int rc = hdelete_r(name, &env_htab); |
ea882baf | 305 | return !rc; |
a68d3ed0 WD |
306 | } |
307 | ||
308 | /* | |
ea882baf | 309 | * Insert / replace new value |
a68d3ed0 | 310 | */ |
f3c615b8 | 311 | for (i = 2, len = 0; i < argc; ++i) |
a68d3ed0 | 312 | len += strlen(argv[i]) + 1; |
f3c615b8 ML |
313 | |
314 | value = malloc(len); | |
315 | if (value == NULL) { | |
ea882baf | 316 | printf("## Can't malloc %d bytes\n", len); |
a68d3ed0 WD |
317 | return 1; |
318 | } | |
f3c615b8 | 319 | for (i = 2, s = value; i < argc; ++i) { |
ea882baf | 320 | char *v = argv[i]; |
a68d3ed0 | 321 | |
ea882baf | 322 | while ((*s++ = *v++) != '\0') |
a68d3ed0 | 323 | ; |
ea882baf WD |
324 | *(s-1) = ' '; |
325 | } | |
326 | if (s != value) | |
327 | *--s = '\0'; | |
328 | ||
329 | e.key = name; | |
330 | e.data = value; | |
2eb1573f | 331 | hsearch_r(e, ENTER, &ep, &env_htab); |
ea882baf WD |
332 | free(value); |
333 | if (!ep) { | |
334 | printf("## Error inserting \"%s\" variable, errno=%d\n", | |
335 | name, errno); | |
336 | return 1; | |
a68d3ed0 | 337 | } |
a68d3ed0 WD |
338 | |
339 | /* | |
340 | * Some variables should be updated when the corresponding | |
ea882baf | 341 | * entry in the environment is changed |
a68d3ed0 WD |
342 | */ |
343 | ||
f3c615b8 | 344 | if (strcmp(name, "ipaddr") == 0) { |
a68d3ed0 WD |
345 | char *s = argv[2]; /* always use only one arg */ |
346 | char *e; | |
347 | unsigned long addr; | |
348 | bd->bi_ip_addr = 0; | |
f3c615b8 | 349 | for (addr = 0, i = 0; i < 4; ++i) { |
a68d3ed0 WD |
350 | ulong val = s ? simple_strtoul(s, &e, 10) : 0; |
351 | addr <<= 8; | |
352 | addr |= (val & 0xFF); | |
353 | if (s) s = (*e) ? e+1 : e; | |
354 | } | |
355 | bd->bi_ip_addr = htonl(addr); | |
356 | return 0; | |
f3c615b8 | 357 | } else if (strcmp(argv[1], "loadaddr") == 0) { |
a68d3ed0 WD |
358 | load_addr = simple_strtoul(argv[2], NULL, 16); |
359 | return 0; | |
360 | } | |
c76fe474 | 361 | #if defined(CONFIG_CMD_NET) |
f3c615b8 ML |
362 | else if (strcmp(argv[1], "bootfile") == 0) { |
363 | copy_filename(BootFile, argv[2], sizeof(BootFile)); | |
a68d3ed0 WD |
364 | return 0; |
365 | } | |
90253178 | 366 | #endif |
a68d3ed0 WD |
367 | return 0; |
368 | } | |
369 | ||
84b5e802 | 370 | int setenv(const char *varname, const char *varvalue) |
a68d3ed0 | 371 | { |
84b5e802 WD |
372 | const char * const argv[4] = { "setenv", varname, varvalue, NULL }; |
373 | ||
b0fa8e50 | 374 | if ((varvalue == NULL) || (varvalue[0] == '\0')) |
84b5e802 | 375 | return _do_env_set(0, 2, (char * const *)argv); |
9ffd451a | 376 | else |
84b5e802 | 377 | return _do_env_set(0, 3, (char * const *)argv); |
a68d3ed0 WD |
378 | } |
379 | ||
d67f10ce SG |
380 | /** |
381 | * Set an environment variable to an integer value | |
382 | * | |
383 | * @param varname Environmet variable to set | |
384 | * @param value Value to set it to | |
385 | * @return 0 if ok, 1 on error | |
386 | */ | |
387 | int setenv_ulong(const char *varname, ulong value) | |
388 | { | |
389 | /* TODO: this should be unsigned */ | |
390 | char *str = simple_itoa(value); | |
391 | ||
392 | return setenv(varname, str); | |
393 | } | |
394 | ||
395 | /** | |
396 | * Set an environment variable to an address in hex | |
397 | * | |
398 | * @param varname Environmet variable to set | |
399 | * @param addr Value to set it to | |
400 | * @return 0 if ok, 1 on error | |
401 | */ | |
402 | int setenv_addr(const char *varname, const void *addr) | |
403 | { | |
404 | char str[17]; | |
405 | ||
406 | sprintf(str, "%x", (uintptr_t)addr); | |
407 | return setenv(varname, str); | |
408 | } | |
409 | ||
f3c615b8 | 410 | int do_env_set(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]) |
a68d3ed0 | 411 | { |
47e26b1b WD |
412 | if (argc < 2) |
413 | return cmd_usage(cmdtp); | |
a68d3ed0 | 414 | |
ea882baf | 415 | return _do_env_set(flag, argc, argv); |
a68d3ed0 WD |
416 | } |
417 | ||
ea882baf | 418 | /* |
a68d3ed0 WD |
419 | * Prompt for environment variable |
420 | */ | |
c76fe474 | 421 | #if defined(CONFIG_CMD_ASKENV) |
f3c615b8 | 422 | int do_env_ask(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]) |
a68d3ed0 | 423 | { |
6d0f6bcf JCPV |
424 | extern char console_buffer[CONFIG_SYS_CBSIZE]; |
425 | char message[CONFIG_SYS_CBSIZE]; | |
426 | int size = CONFIG_SYS_CBSIZE - 1; | |
ea882baf | 427 | int i, len, pos; |
a68d3ed0 WD |
428 | char *local_args[4]; |
429 | ||
430 | local_args[0] = argv[0]; | |
431 | local_args[1] = argv[1]; | |
432 | local_args[2] = NULL; | |
433 | local_args[3] = NULL; | |
434 | ||
a68d3ed0 WD |
435 | /* Check the syntax */ |
436 | switch (argc) { | |
437 | case 1: | |
47e26b1b | 438 | return cmd_usage(cmdtp); |
a68d3ed0 | 439 | |
ea882baf WD |
440 | case 2: /* env_ask envname */ |
441 | sprintf(message, "Please enter '%s':", argv[1]); | |
a68d3ed0 WD |
442 | break; |
443 | ||
ea882baf WD |
444 | case 3: /* env_ask envname size */ |
445 | sprintf(message, "Please enter '%s':", argv[1]); | |
446 | size = simple_strtoul(argv[2], NULL, 10); | |
a68d3ed0 WD |
447 | break; |
448 | ||
ea882baf | 449 | default: /* env_ask envname message1 ... messagen size */ |
f3c615b8 ML |
450 | for (i = 2, pos = 0; i < argc - 1; i++) { |
451 | if (pos) | |
a68d3ed0 | 452 | message[pos++] = ' '; |
f3c615b8 | 453 | |
ea882baf | 454 | strcpy(message+pos, argv[i]); |
a68d3ed0 WD |
455 | pos += strlen(argv[i]); |
456 | } | |
457 | message[pos] = '\0'; | |
ea882baf | 458 | size = simple_strtoul(argv[argc - 1], NULL, 10); |
a68d3ed0 WD |
459 | break; |
460 | } | |
461 | ||
6d0f6bcf JCPV |
462 | if (size >= CONFIG_SYS_CBSIZE) |
463 | size = CONFIG_SYS_CBSIZE - 1; | |
a68d3ed0 WD |
464 | |
465 | if (size <= 0) | |
466 | return 1; | |
467 | ||
468 | /* prompt for input */ | |
ea882baf | 469 | len = readline(message); |
a68d3ed0 WD |
470 | |
471 | if (size < len) | |
472 | console_buffer[size] = '\0'; | |
473 | ||
474 | len = 2; | |
475 | if (console_buffer[0] != '\0') { | |
476 | local_args[2] = console_buffer; | |
477 | len = 3; | |
478 | } | |
479 | ||
480 | /* Continue calling setenv code */ | |
ea882baf | 481 | return _do_env_set(flag, len, local_args); |
a68d3ed0 | 482 | } |
90253178 | 483 | #endif |
a68d3ed0 | 484 | |
ea882baf | 485 | /* |
246c6922 PT |
486 | * Interactively edit an environment variable |
487 | */ | |
488 | #if defined(CONFIG_CMD_EDITENV) | |
ea882baf | 489 | int do_env_edit(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]) |
246c6922 PT |
490 | { |
491 | char buffer[CONFIG_SYS_CBSIZE]; | |
492 | char *init_val; | |
246c6922 | 493 | |
47e26b1b WD |
494 | if (argc < 2) |
495 | return cmd_usage(cmdtp); | |
246c6922 PT |
496 | |
497 | /* Set read buffer to initial value or empty sting */ | |
498 | init_val = getenv(argv[1]); | |
499 | if (init_val) | |
7fcd9bbd | 500 | sprintf(buffer, "%s", init_val); |
246c6922 PT |
501 | else |
502 | buffer[0] = '\0'; | |
503 | ||
504 | readline_into_buffer("edit: ", buffer); | |
505 | ||
506 | return setenv(argv[1], buffer); | |
507 | } | |
508 | #endif /* CONFIG_CMD_EDITENV */ | |
509 | ||
ea882baf | 510 | /* |
a68d3ed0 WD |
511 | * Look up variable from environment, |
512 | * return address of storage for that variable, | |
513 | * or NULL if not found | |
514 | */ | |
84b5e802 | 515 | char *getenv(const char *name) |
a68d3ed0 | 516 | { |
ea882baf WD |
517 | if (gd->flags & GD_FLG_ENV_READY) { /* after import into hashtable */ |
518 | ENTRY e, *ep; | |
a68d3ed0 | 519 | |
91a76751 | 520 | WATCHDOG_RESET(); |
2a3cb020 | 521 | |
ea882baf WD |
522 | e.key = name; |
523 | e.data = NULL; | |
2eb1573f | 524 | hsearch_r(e, FIND, &ep, &env_htab); |
91a76751 | 525 | |
f3c615b8 | 526 | return ep ? ep->data : NULL; |
a68d3ed0 WD |
527 | } |
528 | ||
ea882baf WD |
529 | /* restricted capabilities before import */ |
530 | ||
531 | if (getenv_f(name, (char *)(gd->env_buf), sizeof(gd->env_buf)) > 0) | |
532 | return (char *)(gd->env_buf); | |
91a76751 | 533 | |
ea882baf | 534 | return NULL; |
a68d3ed0 WD |
535 | } |
536 | ||
ea882baf WD |
537 | /* |
538 | * Look up variable from environment for restricted C runtime env. | |
539 | */ | |
84b5e802 | 540 | int getenv_f(const char *name, char *buf, unsigned len) |
a68d3ed0 WD |
541 | { |
542 | int i, nxt; | |
543 | ||
f3c615b8 | 544 | for (i = 0; env_get_char(i) != '\0'; i = nxt+1) { |
a68d3ed0 WD |
545 | int val, n; |
546 | ||
f3c615b8 ML |
547 | for (nxt = i; env_get_char(nxt) != '\0'; ++nxt) { |
548 | if (nxt >= CONFIG_ENV_SIZE) | |
549 | return -1; | |
a68d3ed0 | 550 | } |
f3c615b8 ML |
551 | |
552 | val = envmatch((uchar *)name, i); | |
553 | if (val < 0) | |
a68d3ed0 | 554 | continue; |
9ed4a958 | 555 | |
a68d3ed0 | 556 | /* found; copy out */ |
f3c615b8 | 557 | for (n = 0; n < len; ++n, ++buf) { |
9ed4a958 WD |
558 | if ((*buf = env_get_char(val++)) == '\0') |
559 | return n; | |
560 | } | |
561 | ||
562 | if (n) | |
563 | *--buf = '\0'; | |
564 | ||
a02a884b WD |
565 | printf("env_buf [%d bytes] too small for value of \"%s\"\n", |
566 | len, name); | |
9ed4a958 WD |
567 | |
568 | return n; | |
a68d3ed0 | 569 | } |
f3c615b8 | 570 | return -1; |
a68d3ed0 WD |
571 | } |
572 | ||
4a9b4131 SG |
573 | /** |
574 | * Decode the integer value of an environment variable and return it. | |
575 | * | |
576 | * @param name Name of environemnt variable | |
577 | * @param base Number base to use (normally 10, or 16 for hex) | |
578 | * @param default_val Default value to return if the variable is not | |
579 | * found | |
580 | * @return the decoded value, or default_val if not found | |
581 | */ | |
582 | ulong getenv_ulong(const char *name, int base, ulong default_val) | |
583 | { | |
584 | /* | |
585 | * We can use getenv() here, even before relocation, since the | |
586 | * environment variable value is an integer and thus short. | |
587 | */ | |
588 | const char *str = getenv(name); | |
589 | ||
590 | return str ? simple_strtoul(str, NULL, base) : default_val; | |
591 | } | |
592 | ||
bdab39d3 | 593 | #if defined(CONFIG_CMD_SAVEENV) && !defined(CONFIG_ENV_IS_NOWHERE) |
ba69dc26 | 594 | |
f3c615b8 | 595 | int do_env_save(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]) |
a68d3ed0 | 596 | { |
f3c615b8 | 597 | extern char *env_name_spec; |
a68d3ed0 | 598 | |
f3c615b8 | 599 | printf("Saving Environment to %s...\n", env_name_spec); |
a68d3ed0 | 600 | |
f3c615b8 | 601 | return saveenv() ? 1 : 0; |
a68d3ed0 | 602 | } |
8bde7f77 | 603 | |
ba69dc26 | 604 | U_BOOT_CMD( |
ea882baf | 605 | saveenv, 1, 0, do_env_save, |
2fb2604d | 606 | "save environment variables to persistent storage", |
a89c33db | 607 | "" |
ba69dc26 MF |
608 | ); |
609 | ||
a68d3ed0 WD |
610 | #endif |
611 | ||
612 | ||
ea882baf | 613 | /* |
a68d3ed0 WD |
614 | * Match a name / name=value pair |
615 | * | |
616 | * s1 is either a simple 'name', or a 'name=value' pair. | |
617 | * i2 is the environment index for a 'name2=value2' pair. | |
618 | * If the names match, return the index for the value2, else NULL. | |
619 | */ | |
620 | ||
f3c615b8 | 621 | int envmatch(uchar *s1, int i2) |
a68d3ed0 | 622 | { |
a68d3ed0 WD |
623 | while (*s1 == env_get_char(i2++)) |
624 | if (*s1++ == '=') | |
f3c615b8 | 625 | return i2; |
a68d3ed0 | 626 | if (*s1 == '\0' && env_get_char(i2-1) == '=') |
f3c615b8 ML |
627 | return i2; |
628 | return -1; | |
a68d3ed0 | 629 | } |
8bde7f77 | 630 | |
f3c615b8 | 631 | static int do_env_default(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]) |
ea882baf | 632 | { |
f3c615b8 | 633 | if ((argc != 2) || (strcmp(argv[1], "-f") != 0)) |
0d302af0 | 634 | return cmd_usage(cmdtp); |
f3c615b8 | 635 | |
ea882baf WD |
636 | set_default_env("## Resetting to default environment\n"); |
637 | return 0; | |
638 | } | |
639 | ||
f3c615b8 | 640 | static int do_env_delete(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]) |
ea882baf WD |
641 | { |
642 | printf("Not implemented yet\n"); | |
643 | return 0; | |
644 | } | |
645 | ||
0c79cda0 | 646 | #ifdef CONFIG_CMD_EXPORTENV |
ea882baf WD |
647 | /* |
648 | * env export [-t | -b | -c] addr [size] | |
649 | * -t: export as text format; if size is given, data will be | |
650 | * padded with '\0' bytes; if not, one terminating '\0' | |
651 | * will be added (which is included in the "filesize" | |
652 | * setting so you can for exmple copy this to flash and | |
653 | * keep the termination). | |
654 | * -b: export as binary format (name=value pairs separated by | |
655 | * '\0', list end marked by double "\0\0") | |
656 | * -c: export as checksum protected environment format as | |
657 | * used for example by "saveenv" command | |
658 | * addr: memory address where environment gets stored | |
659 | * size: size of output buffer | |
660 | * | |
661 | * With "-c" and size is NOT given, then the export command will | |
662 | * format the data as currently used for the persistent storage, | |
663 | * i. e. it will use CONFIG_ENV_SECT_SIZE as output block size and | |
664 | * prepend a valid CRC32 checksum and, in case of resundant | |
665 | * environment, a "current" redundancy flag. If size is given, this | |
666 | * value will be used instead of CONFIG_ENV_SECT_SIZE; again, CRC32 | |
667 | * checksum and redundancy flag will be inserted. | |
668 | * | |
669 | * With "-b" and "-t", always only the real data (including a | |
670 | * terminating '\0' byte) will be written; here the optional size | |
671 | * argument will be used to make sure not to overflow the user | |
672 | * provided buffer; the command will abort if the size is not | |
673 | * sufficient. Any remainign space will be '\0' padded. | |
674 | * | |
675 | * On successful return, the variable "filesize" will be set. | |
676 | * Note that filesize includes the trailing/terminating '\0' byte(s). | |
677 | * | |
678 | * Usage szenario: create a text snapshot/backup of the current settings: | |
679 | * | |
680 | * => env export -t 100000 | |
681 | * => era ${backup_addr} +${filesize} | |
682 | * => cp.b 100000 ${backup_addr} ${filesize} | |
683 | * | |
684 | * Re-import this snapshot, deleting all other settings: | |
685 | * | |
686 | * => env import -d -t ${backup_addr} | |
687 | */ | |
688 | static int do_env_export(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]) | |
689 | { | |
690 | char buf[32]; | |
691 | char *addr, *cmd, *res; | |
692 | size_t size; | |
693 | ssize_t len; | |
694 | env_t *envp; | |
695 | char sep = '\n'; | |
696 | int chk = 0; | |
697 | int fmt = 0; | |
698 | ||
699 | cmd = *argv; | |
700 | ||
701 | while (--argc > 0 && **++argv == '-') { | |
702 | char *arg = *argv; | |
703 | while (*++arg) { | |
704 | switch (*arg) { | |
705 | case 'b': /* raw binary format */ | |
706 | if (fmt++) | |
707 | goto sep_err; | |
708 | sep = '\0'; | |
709 | break; | |
710 | case 'c': /* external checksum format */ | |
711 | if (fmt++) | |
712 | goto sep_err; | |
713 | sep = '\0'; | |
714 | chk = 1; | |
715 | break; | |
716 | case 't': /* text format */ | |
717 | if (fmt++) | |
718 | goto sep_err; | |
719 | sep = '\n'; | |
720 | break; | |
721 | default: | |
0d302af0 | 722 | return cmd_usage(cmdtp); |
ea882baf WD |
723 | } |
724 | } | |
725 | } | |
726 | ||
f3c615b8 | 727 | if (argc < 1) |
0d302af0 | 728 | return cmd_usage(cmdtp); |
8bde7f77 | 729 | |
ea882baf WD |
730 | addr = (char *)simple_strtoul(argv[0], NULL, 16); |
731 | ||
732 | if (argc == 2) { | |
733 | size = simple_strtoul(argv[1], NULL, 16); | |
734 | memset(addr, '\0', size); | |
735 | } else { | |
736 | size = 0; | |
737 | } | |
738 | ||
739 | if (sep) { /* export as text file */ | |
2eb1573f | 740 | len = hexport_r(&env_htab, sep, &addr, size); |
ea882baf WD |
741 | if (len < 0) { |
742 | error("Cannot export environment: errno = %d\n", | |
743 | errno); | |
744 | return 1; | |
745 | } | |
8c3aff52 | 746 | sprintf(buf, "%zX", (size_t)len); |
ea882baf WD |
747 | setenv("filesize", buf); |
748 | ||
749 | return 0; | |
750 | } | |
751 | ||
752 | envp = (env_t *)addr; | |
753 | ||
754 | if (chk) /* export as checksum protected block */ | |
755 | res = (char *)envp->data; | |
756 | else /* export as raw binary data */ | |
757 | res = addr; | |
758 | ||
2eb1573f | 759 | len = hexport_r(&env_htab, '\0', &res, ENV_SIZE); |
ea882baf WD |
760 | if (len < 0) { |
761 | error("Cannot export environment: errno = %d\n", | |
762 | errno); | |
763 | return 1; | |
764 | } | |
765 | ||
766 | if (chk) { | |
767 | envp->crc = crc32(0, envp->data, ENV_SIZE); | |
768 | #ifdef CONFIG_ENV_ADDR_REDUND | |
769 | envp->flags = ACTIVE_FLAG; | |
770 | #endif | |
771 | } | |
f3c615b8 | 772 | sprintf(buf, "%zX", (size_t)(len + offsetof(env_t, data))); |
ea882baf WD |
773 | setenv("filesize", buf); |
774 | ||
775 | return 0; | |
776 | ||
777 | sep_err: | |
778 | printf("## %s: only one of \"-b\", \"-c\" or \"-t\" allowed\n", | |
779 | cmd); | |
780 | return 1; | |
781 | } | |
0c79cda0 | 782 | #endif |
ea882baf | 783 | |
0c79cda0 | 784 | #ifdef CONFIG_CMD_IMPORTENV |
ea882baf WD |
785 | /* |
786 | * env import [-d] [-t | -b | -c] addr [size] | |
787 | * -d: delete existing environment before importing; | |
788 | * otherwise overwrite / append to existion definitions | |
789 | * -t: assume text format; either "size" must be given or the | |
790 | * text data must be '\0' terminated | |
791 | * -b: assume binary format ('\0' separated, "\0\0" terminated) | |
792 | * -c: assume checksum protected environment format | |
793 | * addr: memory address to read from | |
794 | * size: length of input data; if missing, proper '\0' | |
795 | * termination is mandatory | |
796 | */ | |
f3c615b8 | 797 | static int do_env_import(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]) |
ea882baf WD |
798 | { |
799 | char *cmd, *addr; | |
800 | char sep = '\n'; | |
801 | int chk = 0; | |
802 | int fmt = 0; | |
803 | int del = 0; | |
804 | size_t size; | |
805 | ||
806 | cmd = *argv; | |
807 | ||
808 | while (--argc > 0 && **++argv == '-') { | |
809 | char *arg = *argv; | |
810 | while (*++arg) { | |
811 | switch (*arg) { | |
812 | case 'b': /* raw binary format */ | |
813 | if (fmt++) | |
814 | goto sep_err; | |
815 | sep = '\0'; | |
816 | break; | |
817 | case 'c': /* external checksum format */ | |
818 | if (fmt++) | |
819 | goto sep_err; | |
820 | sep = '\0'; | |
821 | chk = 1; | |
822 | break; | |
823 | case 't': /* text format */ | |
824 | if (fmt++) | |
825 | goto sep_err; | |
826 | sep = '\n'; | |
827 | break; | |
828 | case 'd': | |
829 | del = 1; | |
830 | break; | |
831 | default: | |
0d302af0 | 832 | return cmd_usage(cmdtp); |
ea882baf WD |
833 | } |
834 | } | |
835 | } | |
836 | ||
f3c615b8 | 837 | if (argc < 1) |
0d302af0 | 838 | return cmd_usage(cmdtp); |
ea882baf WD |
839 | |
840 | if (!fmt) | |
841 | printf("## Warning: defaulting to text format\n"); | |
842 | ||
843 | addr = (char *)simple_strtoul(argv[0], NULL, 16); | |
844 | ||
845 | if (argc == 2) { | |
846 | size = simple_strtoul(argv[1], NULL, 16); | |
847 | } else { | |
848 | char *s = addr; | |
849 | ||
850 | size = 0; | |
851 | ||
852 | while (size < MAX_ENV_SIZE) { | |
853 | if ((*s == sep) && (*(s+1) == '\0')) | |
854 | break; | |
855 | ++s; | |
856 | ++size; | |
857 | } | |
858 | if (size == MAX_ENV_SIZE) { | |
859 | printf("## Warning: Input data exceeds %d bytes" | |
860 | " - truncated\n", MAX_ENV_SIZE); | |
861 | } | |
862 | ++size; | |
863 | printf("## Info: input data size = %zd = 0x%zX\n", size, size); | |
864 | } | |
865 | ||
866 | if (chk) { | |
867 | uint32_t crc; | |
868 | env_t *ep = (env_t *)addr; | |
869 | ||
870 | size -= offsetof(env_t, data); | |
871 | memcpy(&crc, &ep->crc, sizeof(crc)); | |
872 | ||
873 | if (crc32(0, ep->data, size) != crc) { | |
874 | puts("## Error: bad CRC, import failed\n"); | |
875 | return 1; | |
876 | } | |
877 | addr = (char *)ep->data; | |
878 | } | |
879 | ||
2eb1573f | 880 | if (himport_r(&env_htab, addr, size, sep, del ? 0 : H_NOCLEAR) == 0) { |
ea882baf WD |
881 | error("Environment import failed: errno = %d\n", errno); |
882 | return 1; | |
883 | } | |
884 | gd->flags |= GD_FLG_ENV_READY; | |
885 | ||
886 | return 0; | |
887 | ||
888 | sep_err: | |
889 | printf("## %s: only one of \"-b\", \"-c\" or \"-t\" allowed\n", | |
890 | cmd); | |
891 | return 1; | |
892 | } | |
0c79cda0 | 893 | #endif |
ea882baf WD |
894 | |
895 | #if defined(CONFIG_CMD_RUN) | |
f3c615b8 | 896 | extern int do_run(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]); |
ea882baf WD |
897 | #endif |
898 | ||
899 | /* | |
900 | * New command line interface: "env" command with subcommands | |
901 | */ | |
902 | static cmd_tbl_t cmd_env_sub[] = { | |
903 | #if defined(CONFIG_CMD_ASKENV) | |
904 | U_BOOT_CMD_MKENT(ask, CONFIG_SYS_MAXARGS, 1, do_env_ask, "", ""), | |
905 | #endif | |
906 | U_BOOT_CMD_MKENT(default, 1, 0, do_env_default, "", ""), | |
907 | U_BOOT_CMD_MKENT(delete, 2, 0, do_env_delete, "", ""), | |
908 | #if defined(CONFIG_CMD_EDITENV) | |
909 | U_BOOT_CMD_MKENT(edit, 2, 0, do_env_edit, "", ""), | |
910 | #endif | |
0c79cda0 | 911 | #if defined(CONFIG_CMD_EXPORTENV) |
ea882baf | 912 | U_BOOT_CMD_MKENT(export, 4, 0, do_env_export, "", ""), |
0c79cda0 | 913 | #endif |
a000b795 KP |
914 | #if defined(CONFIG_CMD_GREPENV) |
915 | U_BOOT_CMD_MKENT(grep, CONFIG_SYS_MAXARGS, 1, do_env_grep, "", ""), | |
916 | #endif | |
0c79cda0 | 917 | #if defined(CONFIG_CMD_IMPORTENV) |
ea882baf | 918 | U_BOOT_CMD_MKENT(import, 5, 0, do_env_import, "", ""), |
0c79cda0 | 919 | #endif |
ea882baf WD |
920 | U_BOOT_CMD_MKENT(print, CONFIG_SYS_MAXARGS, 1, do_env_print, "", ""), |
921 | #if defined(CONFIG_CMD_RUN) | |
922 | U_BOOT_CMD_MKENT(run, CONFIG_SYS_MAXARGS, 1, do_run, "", ""), | |
923 | #endif | |
924 | #if defined(CONFIG_CMD_SAVEENV) && !defined(CONFIG_ENV_IS_NOWHERE) | |
925 | U_BOOT_CMD_MKENT(save, 1, 0, do_env_save, "", ""), | |
926 | #endif | |
927 | U_BOOT_CMD_MKENT(set, CONFIG_SYS_MAXARGS, 0, do_env_set, "", ""), | |
928 | }; | |
929 | ||
2e5167cc | 930 | #if defined(CONFIG_NEEDS_MANUAL_RELOC) |
60f7da1f HS |
931 | void env_reloc(void) |
932 | { | |
933 | fixup_cmdtable(cmd_env_sub, ARRAY_SIZE(cmd_env_sub)); | |
934 | } | |
935 | #endif | |
936 | ||
f3c615b8 | 937 | static int do_env(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]) |
ea882baf WD |
938 | { |
939 | cmd_tbl_t *cp; | |
940 | ||
5904da02 TW |
941 | if (argc < 2) |
942 | return cmd_usage(cmdtp); | |
943 | ||
ea882baf WD |
944 | /* drop initial "env" arg */ |
945 | argc--; | |
946 | argv++; | |
947 | ||
948 | cp = find_cmd_tbl(argv[0], cmd_env_sub, ARRAY_SIZE(cmd_env_sub)); | |
949 | ||
950 | if (cp) | |
951 | return cp->cmd(cmdtp, flag, argc, argv); | |
952 | ||
0d302af0 | 953 | return cmd_usage(cmdtp); |
ea882baf WD |
954 | } |
955 | ||
956 | U_BOOT_CMD( | |
957 | env, CONFIG_SYS_MAXARGS, 1, do_env, | |
958 | "environment handling commands", | |
959 | #if defined(CONFIG_CMD_ASKENV) | |
960 | "ask name [message] [size] - ask for environment variable\nenv " | |
961 | #endif | |
962 | "default -f - reset default environment\n" | |
963 | #if defined(CONFIG_CMD_EDITENV) | |
964 | "env edit name - edit environment variable\n" | |
965 | #endif | |
a000b795 KP |
966 | "env export [-t | -b | -c] addr [size] - export environment\n" |
967 | #if defined(CONFIG_CMD_GREPENV) | |
968 | "env grep string [...] - search environment\n" | |
969 | #endif | |
970 | "env import [-d] [-t | -b | -c] addr [size] - import environment\n" | |
ea882baf WD |
971 | "env print [name ...] - print environment\n" |
972 | #if defined(CONFIG_CMD_RUN) | |
973 | "env run var [...] - run commands in an environment variable\n" | |
974 | #endif | |
975 | "env save - save environment\n" | |
976 | "env set [-f] name [arg ...]\n" | |
977 | ); | |
978 | ||
979 | /* | |
980 | * Old command line interface, kept for compatibility | |
981 | */ | |
8bde7f77 | 982 | |
246c6922 | 983 | #if defined(CONFIG_CMD_EDITENV) |
722b061b | 984 | U_BOOT_CMD_COMPLETE( |
ea882baf | 985 | editenv, 2, 0, do_env_edit, |
246c6922 PT |
986 | "edit environment variable", |
987 | "name\n" | |
722b061b MF |
988 | " - edit environment variable 'name'", |
989 | var_complete | |
246c6922 PT |
990 | ); |
991 | #endif | |
992 | ||
722b061b | 993 | U_BOOT_CMD_COMPLETE( |
ea882baf | 994 | printenv, CONFIG_SYS_MAXARGS, 1, do_env_print, |
2fb2604d | 995 | "print environment variables", |
8bde7f77 WD |
996 | "\n - print values of all environment variables\n" |
997 | "printenv name ...\n" | |
722b061b MF |
998 | " - print value of environment variable 'name'", |
999 | var_complete | |
8bde7f77 WD |
1000 | ); |
1001 | ||
a000b795 KP |
1002 | #ifdef CONFIG_CMD_GREPENV |
1003 | U_BOOT_CMD_COMPLETE( | |
1004 | grepenv, CONFIG_SYS_MAXARGS, 0, do_env_grep, | |
1005 | "search environment variables", | |
1006 | "string ...\n" | |
1007 | " - list environment name=value pairs matching 'string'", | |
1008 | var_complete | |
1009 | ); | |
1010 | #endif | |
1011 | ||
722b061b | 1012 | U_BOOT_CMD_COMPLETE( |
ea882baf | 1013 | setenv, CONFIG_SYS_MAXARGS, 0, do_env_set, |
2fb2604d | 1014 | "set environment variables", |
8bde7f77 WD |
1015 | "name value ...\n" |
1016 | " - set environment variable 'name' to 'value ...'\n" | |
1017 | "setenv name\n" | |
722b061b MF |
1018 | " - delete environment variable 'name'", |
1019 | var_complete | |
8bde7f77 WD |
1020 | ); |
1021 | ||
c76fe474 | 1022 | #if defined(CONFIG_CMD_ASKENV) |
8bde7f77 | 1023 | |
0d498393 | 1024 | U_BOOT_CMD( |
ea882baf | 1025 | askenv, CONFIG_SYS_MAXARGS, 1, do_env_ask, |
2fb2604d | 1026 | "get environment variables from stdin", |
8bde7f77 WD |
1027 | "name [message] [size]\n" |
1028 | " - get environment variable 'name' from stdin (max 'size' chars)\n" | |
1029 | "askenv name\n" | |
1030 | " - get environment variable 'name' from stdin\n" | |
1031 | "askenv name size\n" | |
1032 | " - get environment variable 'name' from stdin (max 'size' chars)\n" | |
1033 | "askenv name [message] size\n" | |
1034 | " - display 'message' string and get environment variable 'name'" | |
a89c33db | 1035 | "from stdin (max 'size' chars)" |
8bde7f77 | 1036 | ); |
90253178 | 1037 | #endif |
8bde7f77 | 1038 | |
c76fe474 | 1039 | #if defined(CONFIG_CMD_RUN) |
722b061b | 1040 | U_BOOT_CMD_COMPLETE( |
6d0f6bcf | 1041 | run, CONFIG_SYS_MAXARGS, 1, do_run, |
2fb2604d | 1042 | "run commands in an environment variable", |
8bde7f77 | 1043 | "var [...]\n" |
722b061b MF |
1044 | " - run the commands in the environment variable(s) 'var'", |
1045 | var_complete | |
8bde7f77 | 1046 | ); |
90253178 | 1047 | #endif |