[new uImage] Fix erroneous use of image_get_magic() in fdc/usb cmds
[people/ms/u-boot.git] / common / cmd_nand.c
CommitLineData
dc7c9a1a
WD
1/*
2 * Driver for NAND support, Rick Bronson
3 * borrowed heavily from:
4 * (c) 1999 Machine Vision Holdings, Inc.
5 * (c) 1999, 2000 David Woodhouse <dwmw2@infradead.org>
384cc687
WD
6 *
7 * Added 16-bit nand support
8 * (C) 2004 Texas Instruments
dc7c9a1a
WD
9 */
10
11#include <common.h>
addb2e16
BS
12
13
14#ifndef CFG_NAND_LEGACY
15/*
16 *
17 * New NAND support
18 *
19 */
20#include <common.h>
21
c76fe474 22#if defined(CONFIG_CMD_NAND)
addb2e16
BS
23
24#include <command.h>
25#include <watchdog.h>
26#include <malloc.h>
27#include <asm/byteorder.h>
addb2e16
BS
28#include <jffs2/jffs2.h>
29#include <nand.h>
30
c76fe474 31#if defined(CONFIG_CMD_JFFS2) && defined(CONFIG_JFFS2_CMDLINE)
856f0544
SR
32
33/* parition handling routines */
34int mtdparts_init(void);
35int id_parse(const char *id, const char **ret_id, u8 *dev_type, u8 *dev_num);
36int find_dev_and_part(const char *id, struct mtd_device **dev,
37 u8 *part_num, struct part_info **part);
38#endif
39
addb2e16
BS
40extern nand_info_t nand_info[]; /* info for NAND chips */
41
42static int nand_dump_oob(nand_info_t *nand, ulong off)
43{
44 return 0;
45}
46
47static int nand_dump(nand_info_t *nand, ulong off)
48{
49 int i;
50 u_char *buf, *p;
51
52 buf = malloc(nand->oobblock + nand->oobsize);
53 if (!buf) {
54 puts("No memory for page buffer\n");
55 return 1;
56 }
57 off &= ~(nand->oobblock - 1);
58 i = nand_read_raw(nand, buf, off, nand->oobblock, nand->oobsize);
59 if (i < 0) {
60 printf("Error (%d) reading page %08x\n", i, off);
61 free(buf);
62 return 1;
63 }
64 printf("Page %08x dump:\n", off);
65 i = nand->oobblock >> 4; p = buf;
66 while (i--) {
67 printf( "\t%02x %02x %02x %02x %02x %02x %02x %02x"
68 " %02x %02x %02x %02x %02x %02x %02x %02x\n",
69 p[0], p[1], p[2], p[3], p[4], p[5], p[6], p[7],
70 p[8], p[9], p[10], p[11], p[12], p[13], p[14], p[15]);
71 p += 16;
72 }
73 puts("OOB:\n");
74 i = nand->oobsize >> 3;
75 while (i--) {
76 printf( "\t%02x %02x %02x %02x %02x %02x %02x %02x\n",
77 p[0], p[1], p[2], p[3], p[4], p[5], p[6], p[7]);
78 p += 8;
79 }
80 free(buf);
81
82 return 0;
83}
84
85/* ------------------------------------------------------------------------- */
86
856f0544 87static inline int str2long(char *p, ulong *num)
addb2e16 88{
856f0544 89 char *endptr;
addb2e16 90
856f0544
SR
91 *num = simple_strtoul(p, &endptr, 16);
92 return (*p != '\0' && *endptr == '\0') ? 1 : 0;
93}
addb2e16 94
856f0544
SR
95static int
96arg_off_size(int argc, char *argv[], nand_info_t *nand, ulong *off, ulong *size)
97{
98 int idx = nand_curr_device;
c76fe474 99#if defined(CONFIG_CMD_JFFS2) && defined(CONFIG_JFFS2_CMDLINE)
856f0544
SR
100 struct mtd_device *dev;
101 struct part_info *part;
102 u8 pnum;
103
104 if (argc >= 1 && !(str2long(argv[0], off))) {
105 if ((mtdparts_init() == 0) &&
106 (find_dev_and_part(argv[0], &dev, &pnum, &part) == 0)) {
107 if (dev->id->type != MTD_DEV_TYPE_NAND) {
108 puts("not a NAND device\n");
109 return -1;
110 }
111 *off = part->offset;
112 if (argc >= 2) {
113 if (!(str2long(argv[1], size))) {
114 printf("'%s' is not a number\n", argv[1]);
115 return -1;
116 }
117 if (*size > part->size)
118 *size = part->size;
119 } else {
120 *size = part->size;
121 }
122 idx = dev->id->num;
123 *nand = nand_info[idx];
124 goto out;
addb2e16 125 }
856f0544 126 }
addb2e16 127#endif
addb2e16 128
856f0544
SR
129 if (argc >= 1) {
130 if (!(str2long(argv[0], off))) {
131 printf("'%s' is not a number\n", argv[0]);
132 return -1;
133 }
134 } else {
135 *off = 0;
136 }
addb2e16 137
856f0544
SR
138 if (argc >= 2) {
139 if (!(str2long(argv[1], size))) {
140 printf("'%s' is not a number\n", argv[1]);
141 return -1;
142 }
143 } else {
144 *size = nand->size - *off;
addb2e16
BS
145 }
146
c76fe474 147#if defined(CONFIG_CMD_JFFS2) && defined(CONFIG_JFFS2_CMDLINE)
856f0544
SR
148out:
149#endif
150 printf("device %d ", idx);
151 if (*size == nand->size)
152 puts("whole chip\n");
153 else
154 printf("offset 0x%x, size 0x%x\n", *off, *size);
155 return 0;
addb2e16
BS
156}
157
158int do_nand(cmd_tbl_t * cmdtp, int flag, int argc, char *argv[])
159{
160 int i, dev, ret;
161 ulong addr, off, size;
162 char *cmd, *s;
163 nand_info_t *nand;
c750d2e6
MF
164#ifdef CFG_NAND_QUIET
165 int quiet = CFG_NAND_QUIET;
166#else
2255b2d2 167 int quiet = 0;
c750d2e6 168#endif
2255b2d2 169 const char *quiet_str = getenv("quiet");
addb2e16
BS
170
171 /* at least two arguments please */
172 if (argc < 2)
173 goto usage;
174
2255b2d2
SR
175 if (quiet_str)
176 quiet = simple_strtoul(quiet_str, NULL, 0) != 0;
177
addb2e16
BS
178 cmd = argv[1];
179
180 if (strcmp(cmd, "info") == 0) {
181
182 putc('\n');
183 for (i = 0; i < CFG_MAX_NAND_DEVICE; i++) {
184 if (nand_info[i].name)
185 printf("Device %d: %s, sector size %lu KiB\n",
186 i, nand_info[i].name,
187 nand_info[i].erasesize >> 10);
188 }
189 return 0;
190 }
191
192 if (strcmp(cmd, "device") == 0) {
193
194 if (argc < 3) {
195 if ((nand_curr_device < 0) ||
196 (nand_curr_device >= CFG_MAX_NAND_DEVICE))
197 puts("\nno devices available\n");
198 else
199 printf("\nDevice %d: %s\n", nand_curr_device,
200 nand_info[nand_curr_device].name);
201 return 0;
202 }
203 dev = (int)simple_strtoul(argv[2], NULL, 10);
204 if (dev < 0 || dev >= CFG_MAX_NAND_DEVICE || !nand_info[dev].name) {
205 puts("No such device\n");
206 return 1;
207 }
208 printf("Device %d: %s", dev, nand_info[dev].name);
209 puts("... is now current device\n");
210 nand_curr_device = dev;
43a2b0e7
SR
211
212#ifdef CFG_NAND_SELECT_DEVICE
213 /*
214 * Select the chip in the board/cpu specific driver
215 */
216 board_nand_select_device(nand_info[dev].priv, dev);
217#endif
218
addb2e16
BS
219 return 0;
220 }
221
222 if (strcmp(cmd, "bad") != 0 && strcmp(cmd, "erase") != 0 &&
223 strncmp(cmd, "dump", 4) != 0 &&
2255b2d2
SR
224 strncmp(cmd, "read", 4) != 0 && strncmp(cmd, "write", 5) != 0 &&
225 strcmp(cmd, "scrub") != 0 && strcmp(cmd, "markbad") != 0 &&
226 strcmp(cmd, "biterr") != 0 &&
227 strcmp(cmd, "lock") != 0 && strcmp(cmd, "unlock") != 0 )
addb2e16
BS
228 goto usage;
229
230 /* the following commands operate on the current device */
231 if (nand_curr_device < 0 || nand_curr_device >= CFG_MAX_NAND_DEVICE ||
232 !nand_info[nand_curr_device].name) {
233 puts("\nno devices available\n");
234 return 1;
235 }
236 nand = &nand_info[nand_curr_device];
237
238 if (strcmp(cmd, "bad") == 0) {
239 printf("\nDevice %d bad blocks:\n", nand_curr_device);
240 for (off = 0; off < nand->size; off += nand->erasesize)
241 if (nand_block_isbad(nand, off))
242 printf(" %08x\n", off);
243 return 0;
244 }
245
856f0544
SR
246 /*
247 * Syntax is:
248 * 0 1 2 3 4
249 * nand erase [clean] [off size]
250 */
2255b2d2
SR
251 if (strcmp(cmd, "erase") == 0 || strcmp(cmd, "scrub") == 0) {
252 nand_erase_options_t opts;
856f0544
SR
253 /* "clean" at index 2 means request to write cleanmarker */
254 int clean = argc > 2 && !strcmp("clean", argv[2]);
255 int o = clean ? 3 : 2;
2255b2d2
SR
256 int scrub = !strcmp(cmd, "scrub");
257
856f0544
SR
258 printf("\nNAND %s: ", scrub ? "scrub" : "erase");
259 /* skip first two or three arguments, look for offset and size */
260 if (arg_off_size(argc - o, argv + o, nand, &off, &size) != 0)
261 return 1;
2255b2d2
SR
262
263 memset(&opts, 0, sizeof(opts));
264 opts.offset = off;
265 opts.length = size;
266 opts.jffs2 = clean;
267 opts.quiet = quiet;
268
269 if (scrub) {
856f0544
SR
270 puts("Warning: "
271 "scrub option will erase all factory set "
272 "bad blocks!\n"
273 " "
274 "There is no reliable way to recover them.\n"
275 " "
276 "Use this command only for testing purposes "
277 "if you\n"
278 " "
279 "are sure of what you are doing!\n"
280 "\nReally scrub this NAND flash? <y/N>\n");
2255b2d2
SR
281
282 if (getc() == 'y' && getc() == '\r') {
283 opts.scrub = 1;
284 } else {
856f0544 285 puts("scrub aborted\n");
2255b2d2
SR
286 return -1;
287 }
288 }
289 ret = nand_erase_opts(nand, &opts);
addb2e16
BS
290 printf("%s\n", ret ? "ERROR" : "OK");
291
292 return ret == 0 ? 0 : 1;
293 }
294
295 if (strncmp(cmd, "dump", 4) == 0) {
296 if (argc < 3)
297 goto usage;
298
299 s = strchr(cmd, '.');
300 off = (int)simple_strtoul(argv[2], NULL, 16);
301
302 if (s != NULL && strcmp(s, ".oob") == 0)
303 ret = nand_dump_oob(nand, off);
304 else
305 ret = nand_dump(nand, off);
306
307 return ret == 0 ? 1 : 0;
308
309 }
310
311 /* read write */
312 if (strncmp(cmd, "read", 4) == 0 || strncmp(cmd, "write", 5) == 0) {
2255b2d2
SR
313 int read;
314
addb2e16
BS
315 if (argc < 4)
316 goto usage;
2255b2d2 317
addb2e16
BS
318 addr = (ulong)simple_strtoul(argv[2], NULL, 16);
319
2255b2d2 320 read = strncmp(cmd, "read", 4) == 0; /* 1 = read, 0 = write */
856f0544
SR
321 printf("\nNAND %s: ", read ? "read" : "write");
322 if (arg_off_size(argc - 3, argv + 3, nand, &off, &size) != 0)
323 return 1;
addb2e16 324
2255b2d2
SR
325 s = strchr(cmd, '.');
326 if (s != NULL &&
327 (!strcmp(s, ".jffs2") || !strcmp(s, ".e") || !strcmp(s, ".i"))) {
328 if (read) {
329 /* read */
330 nand_read_options_t opts;
331 memset(&opts, 0, sizeof(opts));
332 opts.buffer = (u_char*) addr;
333 opts.length = size;
334 opts.offset = off;
335 opts.quiet = quiet;
336 ret = nand_read_opts(nand, &opts);
337 } else {
338 /* write */
339 nand_write_options_t opts;
340 memset(&opts, 0, sizeof(opts));
341 opts.buffer = (u_char*) addr;
342 opts.length = size;
343 opts.offset = off;
344 /* opts.forcejffs2 = 1; */
345 opts.pad = 1;
346 opts.blockalign = 1;
347 opts.quiet = quiet;
348 ret = nand_write_opts(nand, &opts);
349 }
62d4f436
HW
350 } else if (s != NULL && !strcmp(s, ".oob")) {
351 /* read out-of-band data */
352 if (read)
0a1e03bc 353 ret = nand->read_oob(nand, off, size, (size_t *) &size,
62d4f436
HW
354 (u_char *) addr);
355 else
0a1e03bc 356 ret = nand->write_oob(nand, off, size, (size_t *) &size,
62d4f436 357 (u_char *) addr);
856f0544
SR
358 } else {
359 if (read)
360 ret = nand_read(nand, off, &size, (u_char *)addr);
361 else
362 ret = nand_write(nand, off, &size, (u_char *)addr);
2255b2d2
SR
363 }
364
addb2e16 365 printf(" %d bytes %s: %s\n", size,
2255b2d2 366 read ? "read" : "written", ret ? "ERROR" : "OK");
addb2e16
BS
367
368 return ret == 0 ? 0 : 1;
369 }
2255b2d2 370
2255b2d2
SR
371 if (strcmp(cmd, "markbad") == 0) {
372 addr = (ulong)simple_strtoul(argv[2], NULL, 16);
373
374 int ret = nand->block_markbad(nand, addr);
375 if (ret == 0) {
376 printf("block 0x%08lx successfully marked as bad\n",
377 (ulong) addr);
378 return 0;
379 } else {
380 printf("block 0x%08lx NOT marked as bad! ERROR %d\n",
381 (ulong) addr, ret);
382 }
383 return 1;
384 }
385 if (strcmp(cmd, "biterr") == 0) {
386 /* todo */
387 return 1;
388 }
389
390 if (strcmp(cmd, "lock") == 0) {
391 int tight = 0;
392 int status = 0;
393 if (argc == 3) {
394 if (!strcmp("tight", argv[2]))
395 tight = 1;
396 if (!strcmp("status", argv[2]))
397 status = 1;
398 }
399
400 if (status) {
401 ulong block_start = 0;
402 ulong off;
403 int last_status = -1;
404
405 struct nand_chip *nand_chip = nand->priv;
406 /* check the WP bit */
407 nand_chip->cmdfunc (nand, NAND_CMD_STATUS, -1, -1);
408 printf("device is %swrite protected\n",
409 (nand_chip->read_byte(nand) & 0x80 ?
410 "NOT " : "" ) );
411
412 for (off = 0; off < nand->size; off += nand->oobblock) {
413 int s = nand_get_lock_status(nand, off);
414
415 /* print message only if status has changed
416 * or at end of chip
417 */
418 if (off == nand->size - nand->oobblock
419 || (s != last_status && off != 0)) {
420
421 printf("%08x - %08x: %8d pages %s%s%s\n",
422 block_start,
423 off-1,
424 (off-block_start)/nand->oobblock,
425 ((last_status & NAND_LOCK_STATUS_TIGHT) ? "TIGHT " : ""),
426 ((last_status & NAND_LOCK_STATUS_LOCK) ? "LOCK " : ""),
427 ((last_status & NAND_LOCK_STATUS_UNLOCK) ? "UNLOCK " : ""));
428 }
429
430 last_status = s;
431 }
432 } else {
433 if (!nand_lock(nand, tight)) {
856f0544 434 puts("NAND flash successfully locked\n");
2255b2d2 435 } else {
856f0544 436 puts("Error locking NAND flash\n");
2255b2d2
SR
437 return 1;
438 }
439 }
440 return 0;
441 }
442
443 if (strcmp(cmd, "unlock") == 0) {
856f0544
SR
444 if (arg_off_size(argc - 2, argv + 2, nand, &off, &size) < 0)
445 return 1;
2255b2d2
SR
446
447 if (!nand_unlock(nand, off, size)) {
856f0544 448 puts("NAND flash successfully unlocked\n");
2255b2d2 449 } else {
856f0544
SR
450 puts("Error unlocking NAND flash, "
451 "write and erase will probably fail\n");
2255b2d2
SR
452 return 1;
453 }
454 return 0;
455 }
456
addb2e16
BS
457usage:
458 printf("Usage:\n%s\n", cmdtp->usage);
459 return 1;
460}
461
462U_BOOT_CMD(nand, 5, 1, do_nand,
463 "nand - NAND sub-system\n",
464 "info - show available NAND devices\n"
465 "nand device [dev] - show or set current device\n"
856f0544 466 "nand read[.jffs2] - addr off|partition size\n"
5bd7fe9a 467 "nand write[.jffs2] - addr off|partition size - read/write `size' bytes starting\n"
addb2e16
BS
468 " at offset `off' to/from memory address `addr'\n"
469 "nand erase [clean] [off size] - erase `size' bytes from\n"
470 " offset `off' (entire device if not specified)\n"
471 "nand bad - show bad blocks\n"
472 "nand dump[.oob] off - dump page\n"
473 "nand scrub - really clean NAND erasing bad blocks (UNSAFE)\n"
474 "nand markbad off - mark bad block at offset (UNSAFE)\n"
2255b2d2
SR
475 "nand biterr off - make a bit error at offset (UNSAFE)\n"
476 "nand lock [tight] [status] - bring nand to lock state or display locked pages\n"
477 "nand unlock [offset] [size] - unlock section\n");
addb2e16 478
856f0544
SR
479static int nand_load_image(cmd_tbl_t *cmdtp, nand_info_t *nand,
480 ulong offset, ulong addr, char *cmd)
addb2e16 481{
addb2e16 482 int r;
10e03893 483 char *ep, *s;
856f0544 484 ulong cnt;
addb2e16 485 image_header_t *hdr;
10e03893
TK
486 int jffs2 = 0;
487
488 s = strchr(cmd, '.');
489 if (s != NULL &&
490 (!strcmp(s, ".jffs2") || !strcmp(s, ".e") || !strcmp(s, ".i")))
491 jffs2 = 1;
addb2e16 492
856f0544 493 printf("\nLoading from %s, offset 0x%lx\n", nand->name, offset);
addb2e16
BS
494
495 cnt = nand->oobblock;
10e03893
TK
496 if (jffs2) {
497 nand_read_options_t opts;
498 memset(&opts, 0, sizeof(opts));
499 opts.buffer = (u_char*) addr;
500 opts.length = cnt;
501 opts.offset = offset;
502 opts.quiet = 1;
503 r = nand_read_opts(nand, &opts);
504 } else {
505 r = nand_read(nand, offset, &cnt, (u_char *) addr);
506 }
507
addb2e16 508 if (r) {
856f0544 509 puts("** Read error\n");
fad63407 510 show_boot_progress (-56);
addb2e16
BS
511 return 1;
512 }
fad63407 513 show_boot_progress (56);
addb2e16
BS
514
515 hdr = (image_header_t *) addr;
516
b97a2a0a
MB
517 if (!image_check_magic (hdr)) {
518 printf("\n** Bad Magic Number 0x%x **\n", image_get_magic (hdr));
fad63407 519 show_boot_progress (-57);
addb2e16
BS
520 return 1;
521 }
fad63407 522 show_boot_progress (57);
addb2e16 523
2242f536 524 image_print_contents (hdr);
addb2e16 525
b97a2a0a 526 cnt = image_get_image_size (hdr);
10e03893
TK
527 if (jffs2) {
528 nand_read_options_t opts;
529 memset(&opts, 0, sizeof(opts));
530 opts.buffer = (u_char*) addr;
531 opts.length = cnt;
532 opts.offset = offset;
533 opts.quiet = 1;
534 r = nand_read_opts(nand, &opts);
535 } else {
536 r = nand_read(nand, offset, &cnt, (u_char *) addr);
537 }
addb2e16 538
addb2e16 539 if (r) {
856f0544 540 puts("** Read error\n");
fad63407 541 show_boot_progress (-58);
addb2e16
BS
542 return 1;
543 }
fad63407 544 show_boot_progress (58);
addb2e16
BS
545
546 /* Loading ok, update default load address */
547
548 load_addr = addr;
549
550 /* Check if we should attempt an auto-start */
551 if (((ep = getenv("autostart")) != NULL) && (strcmp(ep, "yes") == 0)) {
552 char *local_args[2];
553 extern int do_bootm(cmd_tbl_t *, int, int, char *[]);
554
856f0544 555 local_args[0] = cmd;
addb2e16
BS
556 local_args[1] = NULL;
557
558 printf("Automatic boot of image at addr 0x%08lx ...\n", addr);
559
560 do_bootm(cmdtp, 0, 1, local_args);
561 return 1;
562 }
563 return 0;
564}
565
856f0544
SR
566int do_nandboot(cmd_tbl_t * cmdtp, int flag, int argc, char *argv[])
567{
568 char *boot_device = NULL;
569 int idx;
570 ulong addr, offset = 0;
c76fe474 571#if defined(CONFIG_CMD_JFFS2) && defined(CONFIG_JFFS2_CMDLINE)
856f0544
SR
572 struct mtd_device *dev;
573 struct part_info *part;
574 u8 pnum;
575
576 if (argc >= 2) {
577 char *p = (argc == 2) ? argv[1] : argv[2];
578 if (!(str2long(p, &addr)) && (mtdparts_init() == 0) &&
579 (find_dev_and_part(p, &dev, &pnum, &part) == 0)) {
580 if (dev->id->type != MTD_DEV_TYPE_NAND) {
581 puts("Not a NAND device\n");
582 return 1;
583 }
584 if (argc > 3)
585 goto usage;
586 if (argc == 3)
10e03893 587 addr = simple_strtoul(argv[1], NULL, 16);
856f0544
SR
588 else
589 addr = CFG_LOAD_ADDR;
590 return nand_load_image(cmdtp, &nand_info[dev->id->num],
591 part->offset, addr, argv[0]);
592 }
593 }
594#endif
595
fad63407 596 show_boot_progress(52);
856f0544
SR
597 switch (argc) {
598 case 1:
599 addr = CFG_LOAD_ADDR;
600 boot_device = getenv("bootdevice");
601 break;
602 case 2:
603 addr = simple_strtoul(argv[1], NULL, 16);
604 boot_device = getenv("bootdevice");
605 break;
606 case 3:
607 addr = simple_strtoul(argv[1], NULL, 16);
608 boot_device = argv[2];
609 break;
610 case 4:
611 addr = simple_strtoul(argv[1], NULL, 16);
612 boot_device = argv[2];
613 offset = simple_strtoul(argv[3], NULL, 16);
614 break;
615 default:
c76fe474 616#if defined(CONFIG_CMD_JFFS2) && defined(CONFIG_JFFS2_CMDLINE)
856f0544
SR
617usage:
618#endif
619 printf("Usage:\n%s\n", cmdtp->usage);
fad63407 620 show_boot_progress(-53);
856f0544
SR
621 return 1;
622 }
623
fad63407 624 show_boot_progress(53);
856f0544
SR
625 if (!boot_device) {
626 puts("\n** No boot device **\n");
fad63407 627 show_boot_progress(-54);
856f0544
SR
628 return 1;
629 }
fad63407 630 show_boot_progress(54);
addb2e16 631
856f0544
SR
632 idx = simple_strtoul(boot_device, NULL, 16);
633
634 if (idx < 0 || idx >= CFG_MAX_NAND_DEVICE || !nand_info[idx].name) {
635 printf("\n** Device %d not available\n", idx);
fad63407 636 show_boot_progress(-55);
856f0544
SR
637 return 1;
638 }
fad63407 639 show_boot_progress(55);
856f0544
SR
640
641 return nand_load_image(cmdtp, &nand_info[idx], offset, addr, argv[0]);
642}
643
644U_BOOT_CMD(nboot, 4, 1, do_nandboot,
645 "nboot - boot from NAND device\n",
10e03893 646 "[.jffs2] [partition] | [[[loadAddr] dev] offset]\n");
addb2e16 647
c76fe474 648#endif
addb2e16
BS
649
650#else /* CFG_NAND_LEGACY */
651/*
652 *
653 * Legacy NAND support - to be phased out
654 *
655 */
dc7c9a1a
WD
656#include <command.h>
657#include <malloc.h>
658#include <asm/io.h>
a3d991bd 659#include <watchdog.h>
dc7c9a1a 660
fad63407 661#ifdef CONFIG_show_boot_progress
dc7c9a1a 662# include <status_led.h>
fad63407 663# define show_boot_progress(arg) show_boot_progress(arg)
dc7c9a1a 664#else
fad63407 665# define show_boot_progress(arg)
dc7c9a1a
WD
666#endif
667
c76fe474 668#if defined(CONFIG_CMD_NAND)
addb2e16
BS
669#include <linux/mtd/nand_legacy.h>
670#if 0
dc7c9a1a 671#include <linux/mtd/nand_ids.h>
7a8e9bed 672#include <jffs2/jffs2.h>
addb2e16 673#endif
dc7c9a1a 674
1f4bb37d
WD
675#ifdef CONFIG_OMAP1510
676void archflashwp(void *archdata, int wp);
677#endif
678
679#define ROUND_DOWN(value,boundary) ((value) & (~((boundary)-1)))
680
a43278a4 681#undef NAND_DEBUG
dc7c9a1a 682#undef PSYCHO_DEBUG
7a8e9bed
WD
683
684/* ****************** WARNING *********************
685 * When ALLOW_ERASE_BAD_DEBUG is non-zero the erase command will
686 * erase (or at least attempt to erase) blocks that are marked
687 * bad. This can be very handy if you are _sure_ that the block
688 * is OK, say because you marked a good block bad to test bad
689 * block handling and you are done testing, or if you have
690 * accidentally marked blocks bad.
691 *
692 * Erasing factory marked bad blocks is a _bad_ idea. If the
693 * erase succeeds there is no reliable way to find them again,
694 * and attempting to program or erase bad blocks can affect
695 * the data in _other_ (good) blocks.
696 */
697#define ALLOW_ERASE_BAD_DEBUG 0
dc7c9a1a
WD
698
699#define CONFIG_MTD_NAND_ECC /* enable ECC */
1f4bb37d 700#define CONFIG_MTD_NAND_ECC_JFFS2
dc7c9a1a 701
addb2e16 702/* bits for nand_legacy_rw() `cmd'; or together as needed */
7a8e9bed
WD
703#define NANDRW_READ 0x01
704#define NANDRW_WRITE 0x00
705#define NANDRW_JFFS2 0x02
a3d991bd 706#define NANDRW_JFFS2_SKIP 0x04
7a8e9bed 707
addb2e16
BS
708/*
709 * Imports from nand_legacy.c
710 */
711extern struct nand_chip nand_dev_desc[CFG_MAX_NAND_DEVICE];
712extern int curr_device;
713extern int nand_legacy_erase(struct nand_chip *nand, size_t ofs,
714 size_t len, int clean);
715extern int nand_legacy_rw(struct nand_chip *nand, int cmd, size_t start,
716 size_t len, size_t *retlen, u_char *buf);
717extern void nand_print(struct nand_chip *nand);
718extern void nand_print_bad(struct nand_chip *nand);
719extern int nand_read_oob(struct nand_chip *nand, size_t ofs,
720 size_t len, size_t *retlen, u_char *buf);
721extern int nand_write_oob(struct nand_chip *nand, size_t ofs,
722 size_t len, size_t *retlen, const u_char *buf);
dc7c9a1a 723
dc7c9a1a 724
dd520bf3 725int do_nand (cmd_tbl_t * cmdtp, int flag, int argc, char *argv[])
dc7c9a1a 726{
dd520bf3 727 int rcode = 0;
dc7c9a1a 728
dd520bf3
WD
729 switch (argc) {
730 case 0:
731 case 1:
732 printf ("Usage:\n%s\n", cmdtp->usage);
733 return 1;
734 case 2:
735 if (strcmp (argv[1], "info") == 0) {
736 int i;
dc7c9a1a 737
dd520bf3 738 putc ('\n');
dc7c9a1a 739
dd520bf3
WD
740 for (i = 0; i < CFG_MAX_NAND_DEVICE; ++i) {
741 if (nand_dev_desc[i].ChipID ==
742 NAND_ChipID_UNKNOWN)
743 continue; /* list only known devices */
744 printf ("Device %d: ", i);
745 nand_print (&nand_dev_desc[i]);
746 }
747 return 0;
7a8e9bed 748
dd520bf3
WD
749 } else if (strcmp (argv[1], "device") == 0) {
750 if ((curr_device < 0)
751 || (curr_device >= CFG_MAX_NAND_DEVICE)) {
752 puts ("\nno devices available\n");
753 return 1;
754 }
755 printf ("\nDevice %d: ", curr_device);
756 nand_print (&nand_dev_desc[curr_device]);
757 return 0;
7a8e9bed 758
dd520bf3
WD
759 } else if (strcmp (argv[1], "bad") == 0) {
760 if ((curr_device < 0)
761 || (curr_device >= CFG_MAX_NAND_DEVICE)) {
762 puts ("\nno devices available\n");
763 return 1;
764 }
765 printf ("\nDevice %d bad blocks:\n", curr_device);
766 nand_print_bad (&nand_dev_desc[curr_device]);
767 return 0;
dc7c9a1a 768
dc7c9a1a 769 }
dd520bf3
WD
770 printf ("Usage:\n%s\n", cmdtp->usage);
771 return 1;
772 case 3:
773 if (strcmp (argv[1], "device") == 0) {
774 int dev = (int) simple_strtoul (argv[2], NULL, 10);
dc7c9a1a 775
dd520bf3
WD
776 printf ("\nDevice %d: ", dev);
777 if (dev >= CFG_MAX_NAND_DEVICE) {
778 puts ("unknown device\n");
779 return 1;
780 }
781 nand_print (&nand_dev_desc[dev]);
782 /*nand_print (dev); */
dc7c9a1a 783
dd520bf3
WD
784 if (nand_dev_desc[dev].ChipID == NAND_ChipID_UNKNOWN) {
785 return 1;
786 }
dc7c9a1a 787
dd520bf3 788 curr_device = dev;
dc7c9a1a 789
dd520bf3 790 puts ("... is now current device\n");
7a8e9bed 791
dd520bf3
WD
792 return 0;
793 } else if (strcmp (argv[1], "erase") == 0
794 && strcmp (argv[2], "clean") == 0) {
795 struct nand_chip *nand = &nand_dev_desc[curr_device];
796 ulong off = 0;
797 ulong size = nand->totlen;
798 int ret;
7a8e9bed 799
dd520bf3 800 printf ("\nNAND erase: device %d offset %ld, size %ld ... ", curr_device, off, size);
7a8e9bed 801
dd520bf3 802 ret = nand_legacy_erase (nand, off, size, 1);
7a8e9bed 803
dd520bf3 804 printf ("%s\n", ret ? "ERROR" : "OK");
dc7c9a1a 805
7a8e9bed
WD
806 return ret;
807 }
dd520bf3
WD
808
809 printf ("Usage:\n%s\n", cmdtp->usage);
810 return 1;
811 default:
812 /* at least 4 args */
813
814 if (strncmp (argv[1], "read", 4) == 0 ||
815 strncmp (argv[1], "write", 5) == 0) {
816 ulong addr = simple_strtoul (argv[2], NULL, 16);
817 ulong off = simple_strtoul (argv[3], NULL, 16);
818 ulong size = simple_strtoul (argv[4], NULL, 16);
819 int cmd = (strncmp (argv[1], "read", 4) == 0) ?
820 NANDRW_READ : NANDRW_WRITE;
821 int ret, total;
822 char *cmdtail = strchr (argv[1], '.');
823
824 if (cmdtail && !strncmp (cmdtail, ".oob", 2)) {
825 /* read out-of-band data */
826 if (cmd & NANDRW_READ) {
827 ret = nand_read_oob (nand_dev_desc + curr_device,
828 off, size, (size_t *) & total,
829 (u_char *) addr);
830 } else {
831 ret = nand_write_oob (nand_dev_desc + curr_device,
832 off, size, (size_t *) & total,
833 (u_char *) addr);
834 }
835 return ret;
836 } else if (cmdtail && !strncmp (cmdtail, ".jffs2", 2))
837 cmd |= NANDRW_JFFS2; /* skip bad blocks */
838 else if (cmdtail && !strncmp (cmdtail, ".jffs2s", 2)) {
839 cmd |= NANDRW_JFFS2; /* skip bad blocks (on read too) */
840 if (cmd & NANDRW_READ)
841 cmd |= NANDRW_JFFS2_SKIP; /* skip bad blocks (on read too) */
842 }
7a8e9bed 843#ifdef SXNI855T
dd520bf3
WD
844 /* need ".e" same as ".j" for compatibility with older units */
845 else if (cmdtail && !strcmp (cmdtail, ".e"))
846 cmd |= NANDRW_JFFS2; /* skip bad blocks */
7a8e9bed 847#endif
a842a6d2 848#ifdef CFG_NAND_SKIP_BAD_DOT_I
dd520bf3
WD
849 /* need ".i" same as ".jffs2s" for compatibility with older units (esd) */
850 /* ".i" for image -> read skips bad block (no 0xff) */
851 else if (cmdtail && !strcmp (cmdtail, ".i")) {
852 cmd |= NANDRW_JFFS2; /* skip bad blocks (on read too) */
853 if (cmd & NANDRW_READ)
854 cmd |= NANDRW_JFFS2_SKIP; /* skip bad blocks (on read too) */
855 }
a842a6d2 856#endif /* CFG_NAND_SKIP_BAD_DOT_I */
dd520bf3
WD
857 else if (cmdtail) {
858 printf ("Usage:\n%s\n", cmdtp->usage);
859 return 1;
860 }
dc7c9a1a 861
dd520bf3
WD
862 printf ("\nNAND %s: device %d offset %ld, size %ld ...\n",
863 (cmd & NANDRW_READ) ? "read" : "write",
864 curr_device, off, size);
dc7c9a1a 865
dd520bf3
WD
866 ret = nand_legacy_rw (nand_dev_desc + curr_device,
867 cmd, off, size,
868 (size_t *) & total,
869 (u_char *) addr);
dc7c9a1a 870
dd520bf3
WD
871 printf (" %d bytes %s: %s\n", total,
872 (cmd & NANDRW_READ) ? "read" : "written",
873 ret ? "ERROR" : "OK");
dc7c9a1a 874
dd520bf3
WD
875 return ret;
876 } else if (strcmp (argv[1], "erase") == 0 &&
877 (argc == 4 || strcmp ("clean", argv[2]) == 0)) {
878 int clean = argc == 5;
879 ulong off =
880 simple_strtoul (argv[2 + clean], NULL, 16);
881 ulong size =
882 simple_strtoul (argv[3 + clean], NULL, 16);
883 int ret;
dc7c9a1a 884
dd520bf3
WD
885 printf ("\nNAND erase: device %d offset %ld, size %ld ...\n",
886 curr_device, off, size);
dc7c9a1a 887
dd520bf3
WD
888 ret = nand_legacy_erase (nand_dev_desc + curr_device,
889 off, size, clean);
dc7c9a1a 890
dd520bf3 891 printf ("%s\n", ret ? "ERROR" : "OK");
dc7c9a1a 892
dd520bf3
WD
893 return ret;
894 } else {
895 printf ("Usage:\n%s\n", cmdtp->usage);
896 rcode = 1;
897 }
dc7c9a1a 898
dd520bf3
WD
899 return rcode;
900 }
dc7c9a1a
WD
901}
902
0d498393
WD
903U_BOOT_CMD(
904 nand, 5, 1, do_nand,
2255b2d2 905 "nand - legacy NAND sub-system\n",
b0fce99b
WD
906 "info - show available NAND devices\n"
907 "nand device [dev] - show or set current device\n"
a3d991bd 908 "nand read[.jffs2[s]] addr off size\n"
b0fce99b
WD
909 "nand write[.jffs2] addr off size - read/write `size' bytes starting\n"
910 " at offset `off' to/from memory address `addr'\n"
911 "nand erase [clean] [off size] - erase `size' bytes from\n"
912 " offset `off' (entire device if not specified)\n"
913 "nand bad - show bad blocks\n"
914 "nand read.oob addr off size - read out-of-band data\n"
915 "nand write.oob addr off size - read out-of-band data\n"
916);
917
dc7c9a1a
WD
918int do_nandboot (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
919{
920 char *boot_device = NULL;
921 char *ep;
922 int dev;
923 ulong cnt;
924 ulong addr;
925 ulong offset = 0;
926 image_header_t *hdr;
927 int rcode = 0;
fad63407 928 show_boot_progress (52);
dc7c9a1a
WD
929 switch (argc) {
930 case 1:
931 addr = CFG_LOAD_ADDR;
932 boot_device = getenv ("bootdevice");
933 break;
934 case 2:
935 addr = simple_strtoul(argv[1], NULL, 16);
936 boot_device = getenv ("bootdevice");
937 break;
938 case 3:
939 addr = simple_strtoul(argv[1], NULL, 16);
940 boot_device = argv[2];
941 break;
942 case 4:
943 addr = simple_strtoul(argv[1], NULL, 16);
944 boot_device = argv[2];
945 offset = simple_strtoul(argv[3], NULL, 16);
946 break;
947 default:
948 printf ("Usage:\n%s\n", cmdtp->usage);
fad63407 949 show_boot_progress (-53);
dc7c9a1a
WD
950 return 1;
951 }
952
fad63407 953 show_boot_progress (53);
dc7c9a1a
WD
954 if (!boot_device) {
955 puts ("\n** No boot device **\n");
fad63407 956 show_boot_progress (-54);
dc7c9a1a
WD
957 return 1;
958 }
fad63407 959 show_boot_progress (54);
dc7c9a1a
WD
960
961 dev = simple_strtoul(boot_device, &ep, 16);
962
963 if ((dev >= CFG_MAX_NAND_DEVICE) ||
964 (nand_dev_desc[dev].ChipID == NAND_ChipID_UNKNOWN)) {
965 printf ("\n** Device %d not available\n", dev);
fad63407 966 show_boot_progress (-55);
dc7c9a1a
WD
967 return 1;
968 }
fad63407 969 show_boot_progress (55);
dc7c9a1a 970
7a8e9bed 971 printf ("\nLoading from device %d: %s at 0x%lx (offset 0x%lx)\n",
dc7c9a1a
WD
972 dev, nand_dev_desc[dev].name, nand_dev_desc[dev].IO_ADDR,
973 offset);
974
addb2e16
BS
975 if (nand_legacy_rw (nand_dev_desc + dev, NANDRW_READ, offset,
976 SECTORSIZE, NULL, (u_char *)addr)) {
dc7c9a1a 977 printf ("** Read error on %d\n", dev);
fad63407 978 show_boot_progress (-56);
dc7c9a1a
WD
979 return 1;
980 }
fad63407 981 show_boot_progress (56);
dc7c9a1a
WD
982
983 hdr = (image_header_t *)addr;
984
b97a2a0a 985 if (image_check_magic (hdr)) {
dc7c9a1a 986
2242f536 987 image_print_contents (hdr);
dc7c9a1a 988
b97a2a0a 989 cnt = image_get_image_size (hdr);
dc7c9a1a
WD
990 cnt -= SECTORSIZE;
991 } else {
b97a2a0a 992 printf ("\n** Bad Magic Number 0x%x **\n", image_get_magic (hdr));
fad63407 993 show_boot_progress (-57);
dc7c9a1a
WD
994 return 1;
995 }
fad63407 996 show_boot_progress (57);
dc7c9a1a 997
addb2e16
BS
998 if (nand_legacy_rw (nand_dev_desc + dev, NANDRW_READ,
999 offset + SECTORSIZE, cnt, NULL,
1000 (u_char *)(addr+SECTORSIZE))) {
dc7c9a1a 1001 printf ("** Read error on %d\n", dev);
fad63407 1002 show_boot_progress (-58);
dc7c9a1a
WD
1003 return 1;
1004 }
fad63407 1005 show_boot_progress (58);
dc7c9a1a
WD
1006
1007 /* Loading ok, update default load address */
1008
1009 load_addr = addr;
1010
1011 /* Check if we should attempt an auto-start */
1012 if (((ep = getenv("autostart")) != NULL) && (strcmp(ep,"yes") == 0)) {
1013 char *local_args[2];
1014 extern int do_bootm (cmd_tbl_t *, int, int, char *[]);
1015
1016 local_args[0] = argv[0];
1017 local_args[1] = NULL;
1018
7a8e9bed 1019 printf ("Automatic boot of image at addr 0x%08lx ...\n", addr);
dc7c9a1a
WD
1020
1021 do_bootm (cmdtp, 0, 1, local_args);
1022 rcode = 1;
1023 }
1024 return rcode;
1025}
1026
0d498393
WD
1027U_BOOT_CMD(
1028 nboot, 4, 1, do_nandboot,
b0fce99b
WD
1029 "nboot - boot from NAND device\n",
1030 "loadAddr dev\n"
1031);
1032
c76fe474 1033#endif
dc7c9a1a 1034
addb2e16 1035#endif /* CFG_NAND_LEGACY */