]>
Commit | Line | Data |
---|---|---|
3863585b WD |
1 | /* |
2 | * (C) Copyright 2000 | |
3 | * Wolfgang Denk, DENX Software Engineering, wd@denx.de. | |
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 | /* | |
25 | * Memory Functions | |
26 | * | |
27 | * Copied from FADS ROM, Dan Malek (dmalek@jlc.net) | |
28 | */ | |
29 | ||
30 | #include <common.h> | |
31 | #include <command.h> | |
2abbe075 WD |
32 | #ifdef CONFIG_HAS_DATAFLASH |
33 | #include <dataflash.h> | |
34 | #endif | |
a6e6fc61 | 35 | #include <watchdog.h> |
3863585b | 36 | |
02c9aa1d RG |
37 | #include <u-boot/md5.h> |
38 | #include <sha1.h> | |
39 | ||
3863585b WD |
40 | #ifdef CMD_MEM_DEBUG |
41 | #define PRINTF(fmt,args...) printf (fmt ,##args) | |
42 | #else | |
43 | #define PRINTF(fmt,args...) | |
44 | #endif | |
45 | ||
46 | static int mod_mem(cmd_tbl_t *, int, int, int, char *[]); | |
47 | ||
48 | /* Display values from last command. | |
49 | * Memory modify remembered values are different from display memory. | |
50 | */ | |
51 | uint dp_last_addr, dp_last_size; | |
52 | uint dp_last_length = 0x40; | |
53 | uint mm_last_addr, mm_last_size; | |
54 | ||
55 | static ulong base_address = 0; | |
56 | ||
57 | /* Memory Display | |
58 | * | |
59 | * Syntax: | |
60 | * md{.b, .w, .l} {addr} {len} | |
61 | */ | |
62 | #define DISP_LINE_LEN 16 | |
63 | int do_mem_md ( cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) | |
64 | { | |
27b207fd | 65 | ulong addr, length; |
c95c4280 GL |
66 | #if defined(CONFIG_HAS_DATAFLASH) |
67 | ulong nbytes, linebytes; | |
68 | #endif | |
27b207fd | 69 | int size; |
3863585b WD |
70 | int rc = 0; |
71 | ||
72 | /* We use the last specified parameters, unless new ones are | |
73 | * entered. | |
74 | */ | |
75 | addr = dp_last_addr; | |
76 | size = dp_last_size; | |
77 | length = dp_last_length; | |
78 | ||
79 | if (argc < 2) { | |
62c3ae7c | 80 | cmd_usage(cmdtp); |
3863585b WD |
81 | return 1; |
82 | } | |
83 | ||
84 | if ((flag & CMD_FLAG_REPEAT) == 0) { | |
85 | /* New command specified. Check for a size specification. | |
86 | * Defaults to long if no or incorrect specification. | |
87 | */ | |
27b207fd WD |
88 | if ((size = cmd_get_data_size(argv[0], 4)) < 0) |
89 | return 1; | |
3863585b WD |
90 | |
91 | /* Address is specified since argc > 1 | |
92 | */ | |
93 | addr = simple_strtoul(argv[1], NULL, 16); | |
94 | addr += base_address; | |
95 | ||
96 | /* If another parameter, it is the length to display. | |
97 | * Length is the number of objects, not number of bytes. | |
98 | */ | |
99 | if (argc > 2) | |
100 | length = simple_strtoul(argv[2], NULL, 16); | |
101 | } | |
102 | ||
c95c4280 | 103 | #if defined(CONFIG_HAS_DATAFLASH) |
3863585b WD |
104 | /* Print the lines. |
105 | * | |
106 | * We buffer all read data, so we can make sure data is read only | |
107 | * once, and all accesses are with the specified bus width. | |
108 | */ | |
109 | nbytes = length * size; | |
110 | do { | |
111 | char linebuf[DISP_LINE_LEN]; | |
c95c4280 | 112 | void* p; |
3863585b | 113 | linebytes = (nbytes>DISP_LINE_LEN)?DISP_LINE_LEN:nbytes; |
2abbe075 | 114 | |
c95c4280 GL |
115 | rc = read_dataflash(addr, (linebytes/size)*size, linebuf); |
116 | p = (rc == DATAFLASH_OK) ? linebuf : (void*)addr; | |
117 | print_buffer(addr, p, size, linebytes/size, DISP_LINE_LEN/size); | |
118 | ||
3863585b | 119 | nbytes -= linebytes; |
c95c4280 | 120 | addr += linebytes; |
3863585b WD |
121 | if (ctrlc()) { |
122 | rc = 1; | |
123 | break; | |
124 | } | |
125 | } while (nbytes > 0); | |
c95c4280 | 126 | #else |
4c727c77 MF |
127 | |
128 | # if defined(CONFIG_BLACKFIN) | |
129 | /* See if we're trying to display L1 inst */ | |
130 | if (addr_bfin_on_chip_mem(addr)) { | |
131 | char linebuf[DISP_LINE_LEN]; | |
132 | ulong linebytes, nbytes = length * size; | |
133 | do { | |
134 | linebytes = (nbytes > DISP_LINE_LEN) ? DISP_LINE_LEN : nbytes; | |
135 | memcpy(linebuf, (void *)addr, linebytes); | |
136 | print_buffer(addr, linebuf, size, linebytes/size, DISP_LINE_LEN/size); | |
137 | ||
138 | nbytes -= linebytes; | |
139 | addr += linebytes; | |
140 | if (ctrlc()) { | |
141 | rc = 1; | |
142 | break; | |
143 | } | |
144 | } while (nbytes > 0); | |
145 | } else | |
146 | # endif | |
147 | ||
148 | { | |
149 | /* Print the lines. */ | |
150 | print_buffer(addr, (void*)addr, size, length, DISP_LINE_LEN/size); | |
151 | addr += size*length; | |
152 | } | |
c95c4280 | 153 | #endif |
3863585b WD |
154 | |
155 | dp_last_addr = addr; | |
156 | dp_last_length = length; | |
157 | dp_last_size = size; | |
158 | return (rc); | |
159 | } | |
160 | ||
161 | int do_mem_mm ( cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) | |
162 | { | |
163 | return mod_mem (cmdtp, 1, flag, argc, argv); | |
164 | } | |
165 | int do_mem_nm ( cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) | |
166 | { | |
167 | return mod_mem (cmdtp, 0, flag, argc, argv); | |
168 | } | |
169 | ||
170 | int do_mem_mw ( cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) | |
171 | { | |
27b207fd WD |
172 | ulong addr, writeval, count; |
173 | int size; | |
3863585b WD |
174 | |
175 | if ((argc < 3) || (argc > 4)) { | |
62c3ae7c | 176 | cmd_usage(cmdtp); |
3863585b WD |
177 | return 1; |
178 | } | |
179 | ||
180 | /* Check for size specification. | |
181 | */ | |
27b207fd WD |
182 | if ((size = cmd_get_data_size(argv[0], 4)) < 1) |
183 | return 1; | |
3863585b WD |
184 | |
185 | /* Address is specified since argc > 1 | |
186 | */ | |
187 | addr = simple_strtoul(argv[1], NULL, 16); | |
188 | addr += base_address; | |
189 | ||
190 | /* Get the value to write. | |
191 | */ | |
192 | writeval = simple_strtoul(argv[2], NULL, 16); | |
193 | ||
194 | /* Count ? */ | |
195 | if (argc == 4) { | |
196 | count = simple_strtoul(argv[3], NULL, 16); | |
197 | } else { | |
198 | count = 1; | |
199 | } | |
200 | ||
201 | while (count-- > 0) { | |
202 | if (size == 4) | |
203 | *((ulong *)addr) = (ulong )writeval; | |
204 | else if (size == 2) | |
205 | *((ushort *)addr) = (ushort)writeval; | |
206 | else | |
207 | *((u_char *)addr) = (u_char)writeval; | |
208 | addr += size; | |
209 | } | |
210 | return 0; | |
211 | } | |
212 | ||
4aaf29b2 SR |
213 | #ifdef CONFIG_MX_CYCLIC |
214 | int do_mem_mdc ( cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) | |
215 | { | |
216 | int i; | |
217 | ulong count; | |
218 | ||
219 | if (argc < 4) { | |
62c3ae7c | 220 | cmd_usage(cmdtp); |
4aaf29b2 SR |
221 | return 1; |
222 | } | |
223 | ||
224 | count = simple_strtoul(argv[3], NULL, 10); | |
225 | ||
226 | for (;;) { | |
227 | do_mem_md (NULL, 0, 3, argv); | |
228 | ||
229 | /* delay for <count> ms... */ | |
230 | for (i=0; i<count; i++) | |
231 | udelay (1000); | |
232 | ||
233 | /* check for ctrl-c to abort... */ | |
234 | if (ctrlc()) { | |
235 | puts("Abort\n"); | |
236 | return 0; | |
237 | } | |
238 | } | |
239 | ||
240 | return 0; | |
241 | } | |
242 | ||
243 | int do_mem_mwc ( cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) | |
244 | { | |
245 | int i; | |
246 | ulong count; | |
247 | ||
248 | if (argc < 4) { | |
62c3ae7c | 249 | cmd_usage(cmdtp); |
4aaf29b2 SR |
250 | return 1; |
251 | } | |
252 | ||
253 | count = simple_strtoul(argv[3], NULL, 10); | |
254 | ||
255 | for (;;) { | |
256 | do_mem_mw (NULL, 0, 3, argv); | |
257 | ||
258 | /* delay for <count> ms... */ | |
259 | for (i=0; i<count; i++) | |
260 | udelay (1000); | |
261 | ||
262 | /* check for ctrl-c to abort... */ | |
263 | if (ctrlc()) { | |
264 | puts("Abort\n"); | |
265 | return 0; | |
266 | } | |
267 | } | |
268 | ||
269 | return 0; | |
270 | } | |
271 | #endif /* CONFIG_MX_CYCLIC */ | |
272 | ||
3863585b WD |
273 | int do_mem_cmp (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) |
274 | { | |
27b207fd WD |
275 | ulong addr1, addr2, count, ngood; |
276 | int size; | |
3863585b WD |
277 | int rcode = 0; |
278 | ||
279 | if (argc != 4) { | |
62c3ae7c | 280 | cmd_usage(cmdtp); |
3863585b WD |
281 | return 1; |
282 | } | |
283 | ||
284 | /* Check for size specification. | |
285 | */ | |
27b207fd WD |
286 | if ((size = cmd_get_data_size(argv[0], 4)) < 0) |
287 | return 1; | |
3863585b WD |
288 | |
289 | addr1 = simple_strtoul(argv[1], NULL, 16); | |
290 | addr1 += base_address; | |
291 | ||
292 | addr2 = simple_strtoul(argv[2], NULL, 16); | |
293 | addr2 += base_address; | |
294 | ||
295 | count = simple_strtoul(argv[3], NULL, 16); | |
296 | ||
2abbe075 WD |
297 | #ifdef CONFIG_HAS_DATAFLASH |
298 | if (addr_dataflash(addr1) | addr_dataflash(addr2)){ | |
4b9206ed | 299 | puts ("Comparison with DataFlash space not supported.\n\r"); |
2abbe075 WD |
300 | return 0; |
301 | } | |
302 | #endif | |
303 | ||
4c727c77 MF |
304 | #ifdef CONFIG_BLACKFIN |
305 | if (addr_bfin_on_chip_mem(addr1) || addr_bfin_on_chip_mem(addr2)) { | |
306 | puts ("Comparison with L1 instruction memory not supported.\n\r"); | |
307 | return 0; | |
308 | } | |
309 | #endif | |
310 | ||
3863585b WD |
311 | ngood = 0; |
312 | ||
313 | while (count-- > 0) { | |
314 | if (size == 4) { | |
315 | ulong word1 = *(ulong *)addr1; | |
316 | ulong word2 = *(ulong *)addr2; | |
317 | if (word1 != word2) { | |
318 | printf("word at 0x%08lx (0x%08lx) " | |
319 | "!= word at 0x%08lx (0x%08lx)\n", | |
320 | addr1, word1, addr2, word2); | |
321 | rcode = 1; | |
322 | break; | |
323 | } | |
324 | } | |
325 | else if (size == 2) { | |
326 | ushort hword1 = *(ushort *)addr1; | |
327 | ushort hword2 = *(ushort *)addr2; | |
328 | if (hword1 != hword2) { | |
329 | printf("halfword at 0x%08lx (0x%04x) " | |
330 | "!= halfword at 0x%08lx (0x%04x)\n", | |
331 | addr1, hword1, addr2, hword2); | |
332 | rcode = 1; | |
333 | break; | |
334 | } | |
335 | } | |
336 | else { | |
337 | u_char byte1 = *(u_char *)addr1; | |
338 | u_char byte2 = *(u_char *)addr2; | |
339 | if (byte1 != byte2) { | |
340 | printf("byte at 0x%08lx (0x%02x) " | |
341 | "!= byte at 0x%08lx (0x%02x)\n", | |
342 | addr1, byte1, addr2, byte2); | |
343 | rcode = 1; | |
344 | break; | |
345 | } | |
346 | } | |
347 | ngood++; | |
348 | addr1 += size; | |
349 | addr2 += size; | |
350 | } | |
351 | ||
352 | printf("Total of %ld %s%s were the same\n", | |
353 | ngood, size == 4 ? "word" : size == 2 ? "halfword" : "byte", | |
354 | ngood == 1 ? "" : "s"); | |
355 | return rcode; | |
356 | } | |
357 | ||
358 | int do_mem_cp ( cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) | |
359 | { | |
27b207fd WD |
360 | ulong addr, dest, count; |
361 | int size; | |
3863585b WD |
362 | |
363 | if (argc != 4) { | |
62c3ae7c | 364 | cmd_usage(cmdtp); |
3863585b WD |
365 | return 1; |
366 | } | |
367 | ||
368 | /* Check for size specification. | |
369 | */ | |
27b207fd WD |
370 | if ((size = cmd_get_data_size(argv[0], 4)) < 0) |
371 | return 1; | |
3863585b WD |
372 | |
373 | addr = simple_strtoul(argv[1], NULL, 16); | |
374 | addr += base_address; | |
375 | ||
376 | dest = simple_strtoul(argv[2], NULL, 16); | |
377 | dest += base_address; | |
378 | ||
379 | count = simple_strtoul(argv[3], NULL, 16); | |
380 | ||
381 | if (count == 0) { | |
382 | puts ("Zero length ???\n"); | |
383 | return 1; | |
384 | } | |
385 | ||
6d0f6bcf | 386 | #ifndef CONFIG_SYS_NO_FLASH |
3863585b | 387 | /* check if we are copying to Flash */ |
2abbe075 WD |
388 | if ( (addr2info(dest) != NULL) |
389 | #ifdef CONFIG_HAS_DATAFLASH | |
84d0c2f1 | 390 | && (!addr_dataflash(dest)) |
2abbe075 WD |
391 | #endif |
392 | ) { | |
3863585b WD |
393 | int rc; |
394 | ||
4b9206ed | 395 | puts ("Copy to Flash... "); |
3863585b | 396 | |
77ddac94 | 397 | rc = flash_write ((char *)addr, dest, count*size); |
3863585b WD |
398 | if (rc != 0) { |
399 | flash_perror (rc); | |
400 | return (1); | |
401 | } | |
402 | puts ("done\n"); | |
403 | return 0; | |
404 | } | |
405 | #endif | |
406 | ||
2abbe075 WD |
407 | #ifdef CONFIG_HAS_DATAFLASH |
408 | /* Check if we are copying from RAM or Flash to DataFlash */ | |
409 | if (addr_dataflash(dest) && !addr_dataflash(addr)){ | |
410 | int rc; | |
411 | ||
4b9206ed | 412 | puts ("Copy to DataFlash... "); |
2abbe075 WD |
413 | |
414 | rc = write_dataflash (dest, addr, count*size); | |
415 | ||
416 | if (rc != 1) { | |
417 | dataflash_perror (rc); | |
418 | return (1); | |
419 | } | |
420 | puts ("done\n"); | |
421 | return 0; | |
422 | } | |
8bde7f77 | 423 | |
2abbe075 | 424 | /* Check if we are copying from DataFlash to RAM */ |
880cc438 | 425 | if (addr_dataflash(addr) && !addr_dataflash(dest) |
6d0f6bcf | 426 | #ifndef CONFIG_SYS_NO_FLASH |
880cc438 SP |
427 | && (addr2info(dest) == NULL) |
428 | #endif | |
429 | ){ | |
5779d8d9 WD |
430 | int rc; |
431 | rc = read_dataflash(addr, count * size, (char *) dest); | |
432 | if (rc != 1) { | |
d4ca31c4 WD |
433 | dataflash_perror (rc); |
434 | return (1); | |
435 | } | |
2abbe075 WD |
436 | return 0; |
437 | } | |
438 | ||
439 | if (addr_dataflash(addr) && addr_dataflash(dest)){ | |
4b9206ed | 440 | puts ("Unsupported combination of source/destination.\n\r"); |
2abbe075 WD |
441 | return 1; |
442 | } | |
443 | #endif | |
444 | ||
4c727c77 MF |
445 | #ifdef CONFIG_BLACKFIN |
446 | /* See if we're copying to/from L1 inst */ | |
447 | if (addr_bfin_on_chip_mem(dest) || addr_bfin_on_chip_mem(addr)) { | |
448 | memcpy((void *)dest, (void *)addr, count * size); | |
449 | return 0; | |
450 | } | |
451 | #endif | |
452 | ||
3863585b WD |
453 | while (count-- > 0) { |
454 | if (size == 4) | |
455 | *((ulong *)dest) = *((ulong *)addr); | |
456 | else if (size == 2) | |
457 | *((ushort *)dest) = *((ushort *)addr); | |
458 | else | |
459 | *((u_char *)dest) = *((u_char *)addr); | |
460 | addr += size; | |
461 | dest += size; | |
462 | } | |
463 | return 0; | |
464 | } | |
465 | ||
466 | int do_mem_base (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) | |
467 | { | |
468 | if (argc > 1) { | |
469 | /* Set new base address. | |
470 | */ | |
471 | base_address = simple_strtoul(argv[1], NULL, 16); | |
472 | } | |
473 | /* Print the current base address. | |
474 | */ | |
475 | printf("Base Address: 0x%08lx\n", base_address); | |
476 | return 0; | |
477 | } | |
478 | ||
479 | int do_mem_loop (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) | |
480 | { | |
27b207fd WD |
481 | ulong addr, length, i, junk; |
482 | int size; | |
3863585b WD |
483 | volatile uint *longp; |
484 | volatile ushort *shortp; | |
485 | volatile u_char *cp; | |
486 | ||
487 | if (argc < 3) { | |
62c3ae7c | 488 | cmd_usage(cmdtp); |
3863585b WD |
489 | return 1; |
490 | } | |
491 | ||
492 | /* Check for a size spefication. | |
493 | * Defaults to long if no or incorrect specification. | |
494 | */ | |
27b207fd WD |
495 | if ((size = cmd_get_data_size(argv[0], 4)) < 0) |
496 | return 1; | |
3863585b WD |
497 | |
498 | /* Address is always specified. | |
499 | */ | |
500 | addr = simple_strtoul(argv[1], NULL, 16); | |
501 | ||
502 | /* Length is the number of objects, not number of bytes. | |
503 | */ | |
504 | length = simple_strtoul(argv[2], NULL, 16); | |
505 | ||
506 | /* We want to optimize the loops to run as fast as possible. | |
507 | * If we have only one object, just run infinite loops. | |
508 | */ | |
509 | if (length == 1) { | |
510 | if (size == 4) { | |
511 | longp = (uint *)addr; | |
512 | for (;;) | |
513 | i = *longp; | |
514 | } | |
515 | if (size == 2) { | |
516 | shortp = (ushort *)addr; | |
517 | for (;;) | |
518 | i = *shortp; | |
519 | } | |
520 | cp = (u_char *)addr; | |
521 | for (;;) | |
522 | i = *cp; | |
523 | } | |
524 | ||
525 | if (size == 4) { | |
526 | for (;;) { | |
527 | longp = (uint *)addr; | |
528 | i = length; | |
529 | while (i-- > 0) | |
530 | junk = *longp++; | |
531 | } | |
532 | } | |
533 | if (size == 2) { | |
534 | for (;;) { | |
535 | shortp = (ushort *)addr; | |
536 | i = length; | |
537 | while (i-- > 0) | |
538 | junk = *shortp++; | |
539 | } | |
540 | } | |
541 | for (;;) { | |
542 | cp = (u_char *)addr; | |
543 | i = length; | |
544 | while (i-- > 0) | |
545 | junk = *cp++; | |
546 | } | |
547 | } | |
548 | ||
56523f12 WD |
549 | #ifdef CONFIG_LOOPW |
550 | int do_mem_loopw (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) | |
551 | { | |
552 | ulong addr, length, i, data; | |
553 | int size; | |
554 | volatile uint *longp; | |
555 | volatile ushort *shortp; | |
556 | volatile u_char *cp; | |
81050926 | 557 | |
56523f12 | 558 | if (argc < 4) { |
62c3ae7c | 559 | cmd_usage(cmdtp); |
56523f12 WD |
560 | return 1; |
561 | } | |
562 | ||
563 | /* Check for a size spefication. | |
564 | * Defaults to long if no or incorrect specification. | |
565 | */ | |
566 | if ((size = cmd_get_data_size(argv[0], 4)) < 0) | |
567 | return 1; | |
568 | ||
569 | /* Address is always specified. | |
570 | */ | |
571 | addr = simple_strtoul(argv[1], NULL, 16); | |
572 | ||
573 | /* Length is the number of objects, not number of bytes. | |
574 | */ | |
575 | length = simple_strtoul(argv[2], NULL, 16); | |
576 | ||
577 | /* data to write */ | |
578 | data = simple_strtoul(argv[3], NULL, 16); | |
81050926 | 579 | |
56523f12 WD |
580 | /* We want to optimize the loops to run as fast as possible. |
581 | * If we have only one object, just run infinite loops. | |
582 | */ | |
583 | if (length == 1) { | |
584 | if (size == 4) { | |
585 | longp = (uint *)addr; | |
586 | for (;;) | |
587 | *longp = data; | |
588 | } | |
589 | if (size == 2) { | |
590 | shortp = (ushort *)addr; | |
591 | for (;;) | |
592 | *shortp = data; | |
593 | } | |
594 | cp = (u_char *)addr; | |
595 | for (;;) | |
596 | *cp = data; | |
597 | } | |
598 | ||
599 | if (size == 4) { | |
600 | for (;;) { | |
601 | longp = (uint *)addr; | |
602 | i = length; | |
603 | while (i-- > 0) | |
604 | *longp++ = data; | |
605 | } | |
606 | } | |
607 | if (size == 2) { | |
608 | for (;;) { | |
609 | shortp = (ushort *)addr; | |
610 | i = length; | |
611 | while (i-- > 0) | |
612 | *shortp++ = data; | |
613 | } | |
614 | } | |
615 | for (;;) { | |
616 | cp = (u_char *)addr; | |
617 | i = length; | |
618 | while (i-- > 0) | |
619 | *cp++ = data; | |
620 | } | |
621 | } | |
622 | #endif /* CONFIG_LOOPW */ | |
623 | ||
3863585b WD |
624 | /* |
625 | * Perform a memory test. A more complete alternative test can be | |
6d0f6bcf | 626 | * configured using CONFIG_SYS_ALT_MEMTEST. The complete test loops until |
3863585b WD |
627 | * interrupted by ctrl-c or by a failure of one of the sub-tests. |
628 | */ | |
629 | int do_mem_mtest (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) | |
630 | { | |
631 | vu_long *addr, *start, *end; | |
632 | ulong val; | |
633 | ulong readback; | |
87b22b77 | 634 | ulong errs = 0; |
b6fc6fd4 DE |
635 | int iterations = 1; |
636 | int iteration_limit; | |
3863585b | 637 | |
6d0f6bcf | 638 | #if defined(CONFIG_SYS_ALT_MEMTEST) |
6f4abee7 | 639 | vu_long len; |
3863585b WD |
640 | vu_long offset; |
641 | vu_long test_offset; | |
642 | vu_long pattern; | |
643 | vu_long temp; | |
644 | vu_long anti_pattern; | |
645 | vu_long num_words; | |
6d0f6bcf JCPV |
646 | #if defined(CONFIG_SYS_MEMTEST_SCRATCH) |
647 | vu_long *dummy = (vu_long*)CONFIG_SYS_MEMTEST_SCRATCH; | |
5f535fe1 | 648 | #else |
029b6dc7 | 649 | vu_long *dummy = 0; /* yes, this is address 0x0, not NULL */ |
5f535fe1 | 650 | #endif |
3863585b | 651 | int j; |
3863585b WD |
652 | |
653 | static const ulong bitpattern[] = { | |
654 | 0x00000001, /* single bit */ | |
655 | 0x00000003, /* two adjacent bits */ | |
656 | 0x00000007, /* three adjacent bits */ | |
657 | 0x0000000F, /* four adjacent bits */ | |
658 | 0x00000005, /* two non-adjacent bits */ | |
659 | 0x00000015, /* three non-adjacent bits */ | |
660 | 0x00000055, /* four non-adjacent bits */ | |
661 | 0xaaaaaaaa, /* alternating 1/0 */ | |
662 | }; | |
663 | #else | |
664 | ulong incr; | |
665 | ulong pattern; | |
3863585b WD |
666 | #endif |
667 | ||
b6fc6fd4 | 668 | if (argc > 1) |
3863585b | 669 | start = (ulong *)simple_strtoul(argv[1], NULL, 16); |
b6fc6fd4 | 670 | else |
6d0f6bcf | 671 | start = (ulong *)CONFIG_SYS_MEMTEST_START; |
3863585b | 672 | |
b6fc6fd4 | 673 | if (argc > 2) |
3863585b | 674 | end = (ulong *)simple_strtoul(argv[2], NULL, 16); |
b6fc6fd4 | 675 | else |
6d0f6bcf | 676 | end = (ulong *)(CONFIG_SYS_MEMTEST_END); |
3863585b | 677 | |
b6fc6fd4 | 678 | if (argc > 3) |
3863585b | 679 | pattern = (ulong)simple_strtoul(argv[3], NULL, 16); |
b6fc6fd4 | 680 | else |
3863585b | 681 | pattern = 0; |
b6fc6fd4 DE |
682 | |
683 | if (argc > 4) | |
684 | iteration_limit = (ulong)simple_strtoul(argv[4], NULL, 16); | |
685 | else | |
686 | iteration_limit = 0; | |
3863585b | 687 | |
6d0f6bcf | 688 | #if defined(CONFIG_SYS_ALT_MEMTEST) |
3863585b WD |
689 | printf ("Testing %08x ... %08x:\n", (uint)start, (uint)end); |
690 | PRINTF("%s:%d: start 0x%p end 0x%p\n", | |
691 | __FUNCTION__, __LINE__, start, end); | |
692 | ||
693 | for (;;) { | |
694 | if (ctrlc()) { | |
695 | putc ('\n'); | |
696 | return 1; | |
697 | } | |
698 | ||
b6fc6fd4 DE |
699 | |
700 | if (iteration_limit && iterations > iteration_limit) { | |
87b22b77 PG |
701 | printf("Tested %d iteration(s) with %lu errors.\n", |
702 | iterations-1, errs); | |
703 | return errs != 0; | |
b6fc6fd4 DE |
704 | } |
705 | ||
3863585b | 706 | printf("Iteration: %6d\r", iterations); |
b6fc6fd4 | 707 | PRINTF("\n"); |
3863585b WD |
708 | iterations++; |
709 | ||
710 | /* | |
711 | * Data line test: write a pattern to the first | |
712 | * location, write the 1's complement to a 'parking' | |
713 | * address (changes the state of the data bus so a | |
714 | * floating bus doen't give a false OK), and then | |
715 | * read the value back. Note that we read it back | |
716 | * into a variable because the next time we read it, | |
717 | * it might be right (been there, tough to explain to | |
718 | * the quality guys why it prints a failure when the | |
719 | * "is" and "should be" are obviously the same in the | |
720 | * error message). | |
721 | * | |
722 | * Rather than exhaustively testing, we test some | |
723 | * patterns by shifting '1' bits through a field of | |
724 | * '0's and '0' bits through a field of '1's (i.e. | |
725 | * pattern and ~pattern). | |
726 | */ | |
727 | addr = start; | |
728 | for (j = 0; j < sizeof(bitpattern)/sizeof(bitpattern[0]); j++) { | |
729 | val = bitpattern[j]; | |
730 | for(; val != 0; val <<= 1) { | |
731 | *addr = val; | |
732 | *dummy = ~val; /* clear the test data off of the bus */ | |
733 | readback = *addr; | |
734 | if(readback != val) { | |
87b22b77 | 735 | printf ("FAILURE (data line): " |
3863585b WD |
736 | "expected %08lx, actual %08lx\n", |
737 | val, readback); | |
87b22b77 PG |
738 | errs++; |
739 | if (ctrlc()) { | |
740 | putc ('\n'); | |
741 | return 1; | |
742 | } | |
3863585b WD |
743 | } |
744 | *addr = ~val; | |
745 | *dummy = val; | |
746 | readback = *addr; | |
747 | if(readback != ~val) { | |
748 | printf ("FAILURE (data line): " | |
749 | "Is %08lx, should be %08lx\n", | |
e1599e83 | 750 | readback, ~val); |
87b22b77 PG |
751 | errs++; |
752 | if (ctrlc()) { | |
753 | putc ('\n'); | |
754 | return 1; | |
755 | } | |
3863585b WD |
756 | } |
757 | } | |
758 | } | |
759 | ||
760 | /* | |
761 | * Based on code whose Original Author and Copyright | |
762 | * information follows: Copyright (c) 1998 by Michael | |
763 | * Barr. This software is placed into the public | |
764 | * domain and may be used for any purpose. However, | |
765 | * this notice must not be changed or removed and no | |
766 | * warranty is either expressed or implied by its | |
767 | * publication or distribution. | |
768 | */ | |
769 | ||
770 | /* | |
771 | * Address line test | |
772 | * | |
773 | * Description: Test the address bus wiring in a | |
774 | * memory region by performing a walking | |
775 | * 1's test on the relevant bits of the | |
776 | * address and checking for aliasing. | |
777 | * This test will find single-bit | |
778 | * address failures such as stuck -high, | |
779 | * stuck-low, and shorted pins. The base | |
780 | * address and size of the region are | |
781 | * selected by the caller. | |
782 | * | |
783 | * Notes: For best results, the selected base | |
784 | * address should have enough LSB 0's to | |
785 | * guarantee single address bit changes. | |
786 | * For example, to test a 64-Kbyte | |
787 | * region, select a base address on a | |
788 | * 64-Kbyte boundary. Also, select the | |
789 | * region size as a power-of-two if at | |
790 | * all possible. | |
791 | * | |
792 | * Returns: 0 if the test succeeds, 1 if the test fails. | |
3863585b | 793 | */ |
6f4abee7 | 794 | len = ((ulong)end - (ulong)start)/sizeof(vu_long); |
3863585b WD |
795 | pattern = (vu_long) 0xaaaaaaaa; |
796 | anti_pattern = (vu_long) 0x55555555; | |
797 | ||
6f4abee7 | 798 | PRINTF("%s:%d: length = 0x%.8lx\n", |
3863585b | 799 | __FUNCTION__, __LINE__, |
6f4abee7 | 800 | len); |
3863585b WD |
801 | /* |
802 | * Write the default pattern at each of the | |
803 | * power-of-two offsets. | |
804 | */ | |
6f4abee7 | 805 | for (offset = 1; offset < len; offset <<= 1) { |
3863585b WD |
806 | start[offset] = pattern; |
807 | } | |
808 | ||
809 | /* | |
810 | * Check for address bits stuck high. | |
811 | */ | |
812 | test_offset = 0; | |
813 | start[test_offset] = anti_pattern; | |
814 | ||
6f4abee7 | 815 | for (offset = 1; offset < len; offset <<= 1) { |
3863585b WD |
816 | temp = start[offset]; |
817 | if (temp != pattern) { | |
818 | printf ("\nFAILURE: Address bit stuck high @ 0x%.8lx:" | |
819 | " expected 0x%.8lx, actual 0x%.8lx\n", | |
820 | (ulong)&start[offset], pattern, temp); | |
87b22b77 PG |
821 | errs++; |
822 | if (ctrlc()) { | |
823 | putc ('\n'); | |
824 | return 1; | |
825 | } | |
3863585b WD |
826 | } |
827 | } | |
828 | start[test_offset] = pattern; | |
a6e6fc61 | 829 | WATCHDOG_RESET(); |
3863585b WD |
830 | |
831 | /* | |
832 | * Check for addr bits stuck low or shorted. | |
833 | */ | |
6f4abee7 | 834 | for (test_offset = 1; test_offset < len; test_offset <<= 1) { |
3863585b WD |
835 | start[test_offset] = anti_pattern; |
836 | ||
6f4abee7 | 837 | for (offset = 1; offset < len; offset <<= 1) { |
3863585b WD |
838 | temp = start[offset]; |
839 | if ((temp != pattern) && (offset != test_offset)) { | |
840 | printf ("\nFAILURE: Address bit stuck low or shorted @" | |
841 | " 0x%.8lx: expected 0x%.8lx, actual 0x%.8lx\n", | |
842 | (ulong)&start[offset], pattern, temp); | |
87b22b77 PG |
843 | errs++; |
844 | if (ctrlc()) { | |
845 | putc ('\n'); | |
846 | return 1; | |
847 | } | |
3863585b WD |
848 | } |
849 | } | |
850 | start[test_offset] = pattern; | |
851 | } | |
852 | ||
853 | /* | |
854 | * Description: Test the integrity of a physical | |
855 | * memory device by performing an | |
856 | * increment/decrement test over the | |
857 | * entire region. In the process every | |
858 | * storage bit in the device is tested | |
859 | * as a zero and a one. The base address | |
860 | * and the size of the region are | |
861 | * selected by the caller. | |
862 | * | |
863 | * Returns: 0 if the test succeeds, 1 if the test fails. | |
864 | */ | |
865 | num_words = ((ulong)end - (ulong)start)/sizeof(vu_long) + 1; | |
866 | ||
867 | /* | |
868 | * Fill memory with a known pattern. | |
869 | */ | |
870 | for (pattern = 1, offset = 0; offset < num_words; pattern++, offset++) { | |
a6e6fc61 | 871 | WATCHDOG_RESET(); |
3863585b WD |
872 | start[offset] = pattern; |
873 | } | |
874 | ||
875 | /* | |
876 | * Check each location and invert it for the second pass. | |
877 | */ | |
878 | for (pattern = 1, offset = 0; offset < num_words; pattern++, offset++) { | |
a6e6fc61 | 879 | WATCHDOG_RESET(); |
3863585b WD |
880 | temp = start[offset]; |
881 | if (temp != pattern) { | |
882 | printf ("\nFAILURE (read/write) @ 0x%.8lx:" | |
883 | " expected 0x%.8lx, actual 0x%.8lx)\n", | |
884 | (ulong)&start[offset], pattern, temp); | |
87b22b77 PG |
885 | errs++; |
886 | if (ctrlc()) { | |
887 | putc ('\n'); | |
888 | return 1; | |
889 | } | |
3863585b WD |
890 | } |
891 | ||
892 | anti_pattern = ~pattern; | |
893 | start[offset] = anti_pattern; | |
894 | } | |
895 | ||
896 | /* | |
897 | * Check each location for the inverted pattern and zero it. | |
898 | */ | |
899 | for (pattern = 1, offset = 0; offset < num_words; pattern++, offset++) { | |
a6e6fc61 | 900 | WATCHDOG_RESET(); |
3863585b WD |
901 | anti_pattern = ~pattern; |
902 | temp = start[offset]; | |
903 | if (temp != anti_pattern) { | |
904 | printf ("\nFAILURE (read/write): @ 0x%.8lx:" | |
905 | " expected 0x%.8lx, actual 0x%.8lx)\n", | |
906 | (ulong)&start[offset], anti_pattern, temp); | |
87b22b77 PG |
907 | errs++; |
908 | if (ctrlc()) { | |
909 | putc ('\n'); | |
910 | return 1; | |
911 | } | |
3863585b WD |
912 | } |
913 | start[offset] = 0; | |
914 | } | |
915 | } | |
916 | ||
917 | #else /* The original, quickie test */ | |
918 | incr = 1; | |
919 | for (;;) { | |
920 | if (ctrlc()) { | |
921 | putc ('\n'); | |
922 | return 1; | |
923 | } | |
924 | ||
b6fc6fd4 | 925 | if (iteration_limit && iterations > iteration_limit) { |
87b22b77 PG |
926 | printf("Tested %d iteration(s) with %lu errors.\n", |
927 | iterations-1, errs); | |
928 | return errs != 0; | |
b6fc6fd4 DE |
929 | } |
930 | ++iterations; | |
931 | ||
3863585b WD |
932 | printf ("\rPattern %08lX Writing..." |
933 | "%12s" | |
934 | "\b\b\b\b\b\b\b\b\b\b", | |
935 | pattern, ""); | |
936 | ||
937 | for (addr=start,val=pattern; addr<end; addr++) { | |
a6e6fc61 | 938 | WATCHDOG_RESET(); |
3863585b WD |
939 | *addr = val; |
940 | val += incr; | |
941 | } | |
942 | ||
4b9206ed | 943 | puts ("Reading..."); |
3863585b WD |
944 | |
945 | for (addr=start,val=pattern; addr<end; addr++) { | |
a6e6fc61 | 946 | WATCHDOG_RESET(); |
3863585b WD |
947 | readback = *addr; |
948 | if (readback != val) { | |
949 | printf ("\nMem error @ 0x%08X: " | |
950 | "found %08lX, expected %08lX\n", | |
951 | (uint)addr, readback, val); | |
87b22b77 PG |
952 | errs++; |
953 | if (ctrlc()) { | |
954 | putc ('\n'); | |
955 | return 1; | |
956 | } | |
3863585b WD |
957 | } |
958 | val += incr; | |
959 | } | |
960 | ||
961 | /* | |
962 | * Flip the pattern each time to make lots of zeros and | |
963 | * then, the next time, lots of ones. We decrement | |
964 | * the "negative" patterns and increment the "positive" | |
965 | * patterns to preserve this feature. | |
966 | */ | |
967 | if(pattern & 0x80000000) { | |
968 | pattern = -pattern; /* complement & increment */ | |
969 | } | |
970 | else { | |
971 | pattern = ~pattern; | |
972 | } | |
973 | incr = -incr; | |
974 | } | |
3863585b | 975 | #endif |
87b22b77 | 976 | return 0; /* not reached */ |
3863585b WD |
977 | } |
978 | ||
979 | ||
980 | /* Modify memory. | |
981 | * | |
982 | * Syntax: | |
983 | * mm{.b, .w, .l} {addr} | |
984 | * nm{.b, .w, .l} {addr} | |
985 | */ | |
986 | static int | |
987 | mod_mem(cmd_tbl_t *cmdtp, int incrflag, int flag, int argc, char *argv[]) | |
988 | { | |
27b207fd WD |
989 | ulong addr, i; |
990 | int nbytes, size; | |
3863585b WD |
991 | extern char console_buffer[]; |
992 | ||
993 | if (argc != 2) { | |
62c3ae7c | 994 | cmd_usage(cmdtp); |
3863585b WD |
995 | return 1; |
996 | } | |
997 | ||
998 | #ifdef CONFIG_BOOT_RETRY_TIME | |
999 | reset_cmd_timeout(); /* got a good command to get here */ | |
1000 | #endif | |
1001 | /* We use the last specified parameters, unless new ones are | |
1002 | * entered. | |
1003 | */ | |
1004 | addr = mm_last_addr; | |
1005 | size = mm_last_size; | |
1006 | ||
1007 | if ((flag & CMD_FLAG_REPEAT) == 0) { | |
1008 | /* New command specified. Check for a size specification. | |
1009 | * Defaults to long if no or incorrect specification. | |
1010 | */ | |
27b207fd WD |
1011 | if ((size = cmd_get_data_size(argv[0], 4)) < 0) |
1012 | return 1; | |
3863585b WD |
1013 | |
1014 | /* Address is specified since argc > 1 | |
1015 | */ | |
1016 | addr = simple_strtoul(argv[1], NULL, 16); | |
1017 | addr += base_address; | |
1018 | } | |
1019 | ||
2abbe075 WD |
1020 | #ifdef CONFIG_HAS_DATAFLASH |
1021 | if (addr_dataflash(addr)){ | |
4b9206ed | 1022 | puts ("Can't modify DataFlash in place. Use cp instead.\n\r"); |
2abbe075 WD |
1023 | return 0; |
1024 | } | |
1025 | #endif | |
1026 | ||
4c727c77 MF |
1027 | #ifdef CONFIG_BLACKFIN |
1028 | if (addr_bfin_on_chip_mem(addr)) { | |
1029 | puts ("Can't modify L1 instruction in place. Use cp instead.\n\r"); | |
1030 | return 0; | |
1031 | } | |
1032 | #endif | |
1033 | ||
3863585b WD |
1034 | /* Print the address, followed by value. Then accept input for |
1035 | * the next value. A non-converted value exits. | |
1036 | */ | |
1037 | do { | |
1038 | printf("%08lx:", addr); | |
1039 | if (size == 4) | |
1040 | printf(" %08x", *((uint *)addr)); | |
1041 | else if (size == 2) | |
1042 | printf(" %04x", *((ushort *)addr)); | |
1043 | else | |
1044 | printf(" %02x", *((u_char *)addr)); | |
1045 | ||
1046 | nbytes = readline (" ? "); | |
1047 | if (nbytes == 0 || (nbytes == 1 && console_buffer[0] == '-')) { | |
1048 | /* <CR> pressed as only input, don't modify current | |
1049 | * location and move to next. "-" pressed will go back. | |
1050 | */ | |
1051 | if (incrflag) | |
1052 | addr += nbytes ? -size : size; | |
1053 | nbytes = 1; | |
1054 | #ifdef CONFIG_BOOT_RETRY_TIME | |
1055 | reset_cmd_timeout(); /* good enough to not time out */ | |
1056 | #endif | |
1057 | } | |
1058 | #ifdef CONFIG_BOOT_RETRY_TIME | |
1059 | else if (nbytes == -2) { | |
1060 | break; /* timed out, exit the command */ | |
1061 | } | |
1062 | #endif | |
1063 | else { | |
1064 | char *endp; | |
1065 | i = simple_strtoul(console_buffer, &endp, 16); | |
1066 | nbytes = endp - console_buffer; | |
1067 | if (nbytes) { | |
1068 | #ifdef CONFIG_BOOT_RETRY_TIME | |
1069 | /* good enough to not time out | |
1070 | */ | |
1071 | reset_cmd_timeout(); | |
1072 | #endif | |
1073 | if (size == 4) | |
1074 | *((uint *)addr) = i; | |
1075 | else if (size == 2) | |
1076 | *((ushort *)addr) = i; | |
1077 | else | |
1078 | *((u_char *)addr) = i; | |
1079 | if (incrflag) | |
1080 | addr += size; | |
1081 | } | |
1082 | } | |
1083 | } while (nbytes); | |
1084 | ||
1085 | mm_last_addr = addr; | |
1086 | mm_last_size = size; | |
1087 | return 0; | |
1088 | } | |
1089 | ||
c26e454d WD |
1090 | #ifndef CONFIG_CRC32_VERIFY |
1091 | ||
3863585b WD |
1092 | int do_mem_crc (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) |
1093 | { | |
71f95118 WD |
1094 | ulong addr, length; |
1095 | ulong crc; | |
1096 | ulong *ptr; | |
3863585b WD |
1097 | |
1098 | if (argc < 3) { | |
62c3ae7c | 1099 | cmd_usage(cmdtp); |
3863585b WD |
1100 | return 1; |
1101 | } | |
1102 | ||
71f95118 | 1103 | addr = simple_strtoul (argv[1], NULL, 16); |
3863585b WD |
1104 | addr += base_address; |
1105 | ||
71f95118 | 1106 | length = simple_strtoul (argv[2], NULL, 16); |
3863585b | 1107 | |
71f95118 | 1108 | crc = crc32 (0, (const uchar *) addr, length); |
3863585b WD |
1109 | |
1110 | printf ("CRC32 for %08lx ... %08lx ==> %08lx\n", | |
71f95118 | 1111 | addr, addr + length - 1, crc); |
3863585b | 1112 | |
71f95118 WD |
1113 | if (argc > 3) { |
1114 | ptr = (ulong *) simple_strtoul (argv[3], NULL, 16); | |
1115 | *ptr = crc; | |
1116 | } | |
3863585b WD |
1117 | |
1118 | return 0; | |
1119 | } | |
1120 | ||
c26e454d WD |
1121 | #else /* CONFIG_CRC32_VERIFY */ |
1122 | ||
1123 | int do_mem_crc (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) | |
1124 | { | |
1125 | ulong addr, length; | |
1126 | ulong crc; | |
1127 | ulong *ptr; | |
6e592385 | 1128 | ulong vcrc; |
c26e454d WD |
1129 | int verify; |
1130 | int ac; | |
1131 | char **av; | |
1132 | ||
1133 | if (argc < 3) { | |
1134 | usage: | |
62c3ae7c | 1135 | cmd_usage(cmdtp); |
c26e454d WD |
1136 | return 1; |
1137 | } | |
1138 | ||
1139 | av = argv + 1; | |
1140 | ac = argc - 1; | |
1141 | if (strcmp(*av, "-v") == 0) { | |
1142 | verify = 1; | |
1143 | av++; | |
1144 | ac--; | |
1145 | if (ac < 3) | |
1146 | goto usage; | |
1147 | } else | |
1148 | verify = 0; | |
1149 | ||
1150 | addr = simple_strtoul(*av++, NULL, 16); | |
1151 | addr += base_address; | |
1152 | length = simple_strtoul(*av++, NULL, 16); | |
1153 | ||
1154 | crc = crc32(0, (const uchar *) addr, length); | |
1155 | ||
1156 | if (!verify) { | |
1157 | printf ("CRC32 for %08lx ... %08lx ==> %08lx\n", | |
1158 | addr, addr + length - 1, crc); | |
1159 | if (ac > 2) { | |
1160 | ptr = (ulong *) simple_strtoul (*av++, NULL, 16); | |
1161 | *ptr = crc; | |
1162 | } | |
1163 | } else { | |
1164 | vcrc = simple_strtoul(*av++, NULL, 16); | |
1165 | if (vcrc != crc) { | |
1166 | printf ("CRC32 for %08lx ... %08lx ==> %08lx != %08lx ** ERROR **\n", | |
1167 | addr, addr + length - 1, crc, vcrc); | |
1168 | return 1; | |
1169 | } | |
1170 | } | |
1171 | ||
1172 | return 0; | |
1173 | ||
1174 | } | |
1175 | #endif /* CONFIG_CRC32_VERIFY */ | |
1176 | ||
02c9aa1d RG |
1177 | #ifdef CONFIG_CMD_MD5SUM |
1178 | int do_md5sum(cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) | |
1179 | { | |
1180 | unsigned long addr, len; | |
1181 | unsigned int i; | |
1182 | u8 output[16]; | |
1183 | ||
1184 | if (argc < 3) { | |
1185 | cmd_usage(cmdtp); | |
1186 | return 1; | |
1187 | } | |
1188 | ||
1189 | addr = simple_strtoul(argv[1], NULL, 16); | |
1190 | len = simple_strtoul(argv[2], NULL, 16); | |
1191 | ||
1192 | md5((unsigned char *) addr, len, output); | |
1193 | printf("md5 for %08lx ... %08lx ==> ", addr, addr + len - 1); | |
1194 | for (i = 0; i < 16; i++) | |
1195 | printf("%02x", output[i]); | |
1196 | printf("\n"); | |
1197 | ||
1198 | return 0; | |
1199 | } | |
1200 | #endif | |
1201 | ||
1202 | #ifdef CONFIG_CMD_SHA1 | |
1203 | int do_sha1sum(cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) | |
1204 | { | |
1205 | unsigned long addr, len; | |
1206 | unsigned int i; | |
1207 | u8 output[20]; | |
1208 | ||
1209 | if (argc < 3) { | |
1210 | cmd_usage(cmdtp); | |
1211 | return 1; | |
1212 | } | |
1213 | ||
1214 | addr = simple_strtoul(argv[1], NULL, 16); | |
1215 | len = simple_strtoul(argv[2], NULL, 16); | |
1216 | ||
1217 | sha1_csum((unsigned char *) addr, len, output); | |
1218 | printf("SHA1 for %08lx ... %08lx ==> ", addr, addr + len - 1); | |
1219 | for (i = 0; i < 20; i++) | |
1220 | printf("%02x", output[i]); | |
1221 | printf("\n"); | |
1222 | ||
1223 | return 0; | |
1224 | } | |
1225 | #endif | |
fe2ce550 HW |
1226 | |
1227 | #ifdef CONFIG_CMD_UNZIP | |
fe2ce550 HW |
1228 | int do_unzip ( cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) |
1229 | { | |
1230 | unsigned long src, dst; | |
1231 | unsigned long src_len = ~0UL, dst_len = ~0UL; | |
fe2ce550 HW |
1232 | |
1233 | switch (argc) { | |
1234 | case 4: | |
1235 | dst_len = simple_strtoul(argv[3], NULL, 16); | |
1236 | /* fall through */ | |
1237 | case 3: | |
1238 | src = simple_strtoul(argv[1], NULL, 16); | |
1239 | dst = simple_strtoul(argv[2], NULL, 16); | |
1240 | break; | |
1241 | default: | |
62c3ae7c | 1242 | cmd_usage(cmdtp); |
fe2ce550 HW |
1243 | return 1; |
1244 | } | |
1245 | ||
1246 | return !!gunzip((void *) dst, dst_len, (void *) src, &src_len); | |
1247 | } | |
1248 | #endif /* CONFIG_CMD_UNZIP */ | |
1249 | ||
1250 | ||
8bde7f77 | 1251 | /**************************************************/ |
0d498393 | 1252 | U_BOOT_CMD( |
53677ef1 | 1253 | md, 3, 1, do_mem_md, |
2fb2604d | 1254 | "memory display", |
a89c33db | 1255 | "[.b, .w, .l] address [# of objects]" |
8bde7f77 WD |
1256 | ); |
1257 | ||
1258 | ||
0d498393 | 1259 | U_BOOT_CMD( |
53677ef1 | 1260 | mm, 2, 1, do_mem_mm, |
a89c33db WD |
1261 | "memory modify (auto-incrementing address)", |
1262 | "[.b, .w, .l] address" | |
8bde7f77 WD |
1263 | ); |
1264 | ||
1265 | ||
0d498393 | 1266 | U_BOOT_CMD( |
53677ef1 | 1267 | nm, 2, 1, do_mem_nm, |
2fb2604d | 1268 | "memory modify (constant address)", |
a89c33db | 1269 | "[.b, .w, .l] address" |
8bde7f77 WD |
1270 | ); |
1271 | ||
0d498393 | 1272 | U_BOOT_CMD( |
53677ef1 | 1273 | mw, 4, 1, do_mem_mw, |
2fb2604d | 1274 | "memory write (fill)", |
a89c33db | 1275 | "[.b, .w, .l] address value [count]" |
8bde7f77 WD |
1276 | ); |
1277 | ||
0d498393 | 1278 | U_BOOT_CMD( |
53677ef1 | 1279 | cp, 4, 1, do_mem_cp, |
2fb2604d | 1280 | "memory copy", |
a89c33db | 1281 | "[.b, .w, .l] source target count" |
8bde7f77 WD |
1282 | ); |
1283 | ||
0d498393 | 1284 | U_BOOT_CMD( |
53677ef1 | 1285 | cmp, 4, 1, do_mem_cmp, |
2fb2604d | 1286 | "memory compare", |
a89c33db | 1287 | "[.b, .w, .l] addr1 addr2 count" |
8bde7f77 WD |
1288 | ); |
1289 | ||
c26e454d WD |
1290 | #ifndef CONFIG_CRC32_VERIFY |
1291 | ||
0d498393 | 1292 | U_BOOT_CMD( |
53677ef1 | 1293 | crc32, 4, 1, do_mem_crc, |
2fb2604d | 1294 | "checksum calculation", |
a89c33db | 1295 | "address count [addr]\n - compute CRC32 checksum [save at addr]" |
8bde7f77 WD |
1296 | ); |
1297 | ||
c26e454d WD |
1298 | #else /* CONFIG_CRC32_VERIFY */ |
1299 | ||
1300 | U_BOOT_CMD( | |
53677ef1 | 1301 | crc32, 5, 1, do_mem_crc, |
2fb2604d | 1302 | "checksum calculation", |
c26e454d | 1303 | "address count [addr]\n - compute CRC32 checksum [save at addr]\n" |
a89c33db | 1304 | "-v address count crc\n - verify crc of memory area" |
c26e454d WD |
1305 | ); |
1306 | ||
1307 | #endif /* CONFIG_CRC32_VERIFY */ | |
1308 | ||
0d498393 | 1309 | U_BOOT_CMD( |
53677ef1 | 1310 | base, 2, 1, do_mem_base, |
2fb2604d | 1311 | "print or set address offset", |
8bde7f77 | 1312 | "\n - print address offset for memory commands\n" |
a89c33db | 1313 | "base off\n - set address offset for memory commands to 'off'" |
8bde7f77 WD |
1314 | ); |
1315 | ||
0d498393 | 1316 | U_BOOT_CMD( |
53677ef1 | 1317 | loop, 3, 1, do_mem_loop, |
2fb2604d | 1318 | "infinite loop on address range", |
a89c33db | 1319 | "[.b, .w, .l] address number_of_objects" |
8bde7f77 WD |
1320 | ); |
1321 | ||
56523f12 WD |
1322 | #ifdef CONFIG_LOOPW |
1323 | U_BOOT_CMD( | |
53677ef1 | 1324 | loopw, 4, 1, do_mem_loopw, |
2fb2604d | 1325 | "infinite write loop on address range", |
a89c33db | 1326 | "[.b, .w, .l] address number_of_objects data_to_write" |
56523f12 WD |
1327 | ); |
1328 | #endif /* CONFIG_LOOPW */ | |
1329 | ||
0d498393 | 1330 | U_BOOT_CMD( |
b6fc6fd4 | 1331 | mtest, 5, 1, do_mem_mtest, |
a89c33db WD |
1332 | "simple RAM read/write test", |
1333 | "[start [end [pattern [iterations]]]]" | |
8bde7f77 WD |
1334 | ); |
1335 | ||
4aaf29b2 SR |
1336 | #ifdef CONFIG_MX_CYCLIC |
1337 | U_BOOT_CMD( | |
53677ef1 | 1338 | mdc, 4, 1, do_mem_mdc, |
2fb2604d | 1339 | "memory display cyclic", |
a89c33db | 1340 | "[.b, .w, .l] address count delay(ms)" |
4aaf29b2 SR |
1341 | ); |
1342 | ||
1343 | U_BOOT_CMD( | |
53677ef1 | 1344 | mwc, 4, 1, do_mem_mwc, |
2fb2604d | 1345 | "memory write cyclic", |
a89c33db | 1346 | "[.b, .w, .l] address value delay(ms)" |
4aaf29b2 SR |
1347 | ); |
1348 | #endif /* CONFIG_MX_CYCLIC */ | |
1349 | ||
02c9aa1d RG |
1350 | #ifdef CONFIG_CMD_MD5SUM |
1351 | U_BOOT_CMD( | |
1352 | md5sum, 3, 1, do_md5sum, | |
1353 | "compute MD5 message digest", | |
1354 | "address count" | |
1355 | ); | |
1356 | #endif | |
1357 | ||
1358 | #ifdef CONFIG_CMD_SHA1SUM | |
1359 | U_BOOT_CMD( | |
1360 | sha1sum, 3, 1, do_sha1sum, | |
1361 | "compute SHA1 message digest", | |
1362 | "address count" | |
1363 | ); | |
1364 | #endif /* CONFIG_CMD_SHA1 */ | |
1365 | ||
fe2ce550 HW |
1366 | #ifdef CONFIG_CMD_UNZIP |
1367 | U_BOOT_CMD( | |
1368 | unzip, 4, 1, do_unzip, | |
2fb2604d | 1369 | "unzip a memory region", |
a89c33db | 1370 | "srcaddr dstaddr [dstsize]" |
fe2ce550 HW |
1371 | ); |
1372 | #endif /* CONFIG_CMD_UNZIP */ |