Das U-Boot: Universal Boot Loader
authorwdenk <wdenk>
Wed, 18 Sep 2002 12:49:44 +0000 (12:49 +0000)
committerwdenk <wdenk>
Wed, 18 Sep 2002 12:49:44 +0000 (12:49 +0000)
common/cmd_flash.c [new file with mode: 0644]

diff --git a/common/cmd_flash.c b/common/cmd_flash.c
new file mode 100644 (file)
index 0000000..92faf62
--- /dev/null
@@ -0,0 +1,433 @@
+/*
+ * (C) Copyright 2000
+ * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+
+/*
+ * FLASH support
+ */
+#include <common.h>
+#include <command.h>
+#include <cmd_boot.h>
+#include <flash.h>
+
+#if (CONFIG_COMMANDS & CFG_CMD_FLASH)
+
+extern flash_info_t flash_info[];      /* info for FLASH chips */
+
+/*
+ * The user interface starts numbering for Flash banks with 1
+ * for historical reasons.
+ */
+
+/*
+ * this routine looks for an abbreviated flash range specification.
+ * the syntax is B:SF[-SL], where B is the bank number, SF is the first
+ * sector to erase, and SL is the last sector to erase (defaults to SF).
+ * bank numbers start at 1 to be consistent with other specs, sector numbers
+ * start at zero.
+ *
+ * returns:    1       - correct spec; *pinfo, *psf and *psl are
+ *                       set appropriately
+ *             0       - doesn't look like an abbreviated spec
+ *             -1      - looks like an abbreviated spec, but got
+ *                       a parsing error, a number out of range,
+ *                       or an invalid flash bank.
+ */
+static int
+abbrev_spec(char *str, flash_info_t **pinfo, int *psf, int *psl)
+{
+    flash_info_t *fp;
+    int bank, first, last;
+    char *p, *ep;
+
+    if ((p = strchr(str, ':')) == NULL)
+       return 0;
+    *p++ = '\0';
+
+    bank = simple_strtoul(str, &ep, 10);
+    if (ep == str || *ep != '\0' ||
+      bank < 1 || bank > CFG_MAX_FLASH_BANKS ||
+      (fp = &flash_info[bank - 1])->flash_id == FLASH_UNKNOWN)
+       return -1;
+
+    str = p;
+    if ((p = strchr(str, '-')) != NULL)
+       *p++ = '\0';
+
+    first = simple_strtoul(str, &ep, 10);
+    if (ep == str || *ep != '\0' || first >= fp->sector_count)
+       return -1;
+
+    if (p != NULL) {
+       last = simple_strtoul(p, &ep, 10);
+       if (ep == p || *ep != '\0' ||
+         last < first || last >= fp->sector_count)
+           return -1;
+    }
+    else
+       last = first;
+
+    *pinfo = fp;
+    *psf = first;
+    *psl = last;
+
+    return 1;
+}
+int do_flinfo ( cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
+{
+       ulong bank;
+
+       if (argc == 1) {        /* print info for all FLASH banks */
+               for (bank=0; bank <CFG_MAX_FLASH_BANKS; ++bank) {
+                       printf ("\nBank # %ld: ", bank+1);
+
+                       flash_print_info (&flash_info[bank]);
+               }
+               return 0;
+       }
+
+       bank = simple_strtoul(argv[1], NULL, 16);
+       if ((bank < 1) || (bank > CFG_MAX_FLASH_BANKS)) {
+               printf ("Only FLASH Banks # 1 ... # %d supported\n",
+                       CFG_MAX_FLASH_BANKS);
+               return 1;
+       }
+       printf ("\nBank # %ld: ", bank);
+       flash_print_info (&flash_info[bank-1]);
+       return 0;
+}
+int do_flerase (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
+{
+       flash_info_t *info;
+       ulong bank, addr_first, addr_last;
+       int n, sect_first, sect_last;
+       int rcode = 0;
+
+       if (argc < 2) {
+               printf ("Usage:\n%s\n", cmdtp->usage);
+               return 1;
+       }
+
+       if (strcmp(argv[1], "all") == 0) {
+               for (bank=1; bank<=CFG_MAX_FLASH_BANKS; ++bank) {
+                       printf ("Erase Flash Bank # %ld ", bank);
+                       info = &flash_info[bank-1];
+                       rcode = flash_erase (info, 0, info->sector_count-1);
+               }
+               return rcode;
+       }
+
+       if ((n = abbrev_spec(argv[1], &info, &sect_first, &sect_last)) != 0) {
+               if (n < 0) {
+                       printf("Bad sector specification\n");
+                       return 1;
+               }
+               printf ("Erase Flash Sectors %d-%d in Bank # %d ",
+                       sect_first, sect_last, (info-flash_info)+1);
+               rcode = flash_erase(info, sect_first, sect_last);
+               return rcode;
+       }
+
+       if (argc != 3) {
+               printf ("Usage:\n%s\n", cmdtp->usage);
+               return 1;
+       }
+
+       if (strcmp(argv[1], "bank") == 0) {
+               bank = simple_strtoul(argv[2], NULL, 16);
+               if ((bank < 1) || (bank > CFG_MAX_FLASH_BANKS)) {
+                       printf ("Only FLASH Banks # 1 ... # %d supported\n",
+                               CFG_MAX_FLASH_BANKS);
+                       return 1;
+               }
+               printf ("Erase Flash Bank # %ld ", bank);
+               info = &flash_info[bank-1];
+               rcode = flash_erase (info, 0, info->sector_count-1);
+               return rcode;
+       }
+
+       addr_first = simple_strtoul(argv[1], NULL, 16);
+       addr_last  = simple_strtoul(argv[2], NULL, 16);
+
+       if (addr_first >= addr_last) {
+               printf ("Usage:\n%s\n", cmdtp->usage);
+               return 1;
+       }
+
+       printf ("Erase Flash from 0x%08lx to 0x%08lx ", addr_first, addr_last);
+       rcode = flash_sect_erase(addr_first, addr_last);
+       return rcode;
+}
+
+int flash_sect_erase (ulong addr_first, ulong addr_last)
+{
+       flash_info_t *info;
+       ulong bank;
+       int s_first, s_last;
+       int erased;
+       int rcode = 0;
+
+       erased = 0;
+
+       for (bank=0,info=&flash_info[0]; bank < CFG_MAX_FLASH_BANKS; ++bank, ++info) {
+               ulong b_end;
+               int sect;
+
+               if (info->flash_id == FLASH_UNKNOWN) {
+                       continue;
+               }
+
+               b_end = info->start[0] + info->size - 1; /* bank end addr */
+
+               s_first = -1;           /* first sector to erase        */
+               s_last  = -1;           /* last  sector to erase        */
+
+               for (sect=0; sect < info->sector_count; ++sect) {
+                       ulong end;              /* last address in current sect */
+                       short s_end;
+
+                       s_end = info->sector_count - 1;
+
+                       end = (sect == s_end) ? b_end : info->start[sect + 1] - 1;
+
+                       if (addr_first > end)
+                               continue;
+                       if (addr_last < info->start[sect])
+                               continue;
+
+                       if (addr_first == info->start[sect]) {
+                               s_first = sect;
+                       }
+                       if (addr_last  == end) {
+                               s_last  = sect;
+                       }
+               }
+               if (s_first>=0 && s_first<=s_last) {
+                       erased += s_last - s_first + 1;
+                       rcode = flash_erase (info, s_first, s_last);
+               }
+       }
+       if (erased) {
+               printf ("Erased %d sectors\n", erased);
+       } else {
+               printf ("Error: start and/or end address"
+                       " not on sector boundary\n");
+               rcode = 1;
+       }
+       return rcode;
+}
+
+
+int do_protect (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
+{
+       flash_info_t *info;
+       ulong bank, addr_first, addr_last;
+       int i, p, n, sect_first, sect_last;
+       int rcode = 0;
+
+       if (argc < 3) {
+               printf ("Usage:\n%s\n", cmdtp->usage);
+               return 1;
+       }
+
+       if (strcmp(argv[1], "off") == 0)
+               p = 0;
+       else if (strcmp(argv[1], "on") == 0)
+               p = 1;
+       else {
+               printf ("Usage:\n%s\n", cmdtp->usage);
+               return 1;
+       }
+
+       if (strcmp(argv[2], "all") == 0) {
+               for (bank=1; bank<=CFG_MAX_FLASH_BANKS; ++bank) {
+                       info = &flash_info[bank-1];
+                       if (info->flash_id == FLASH_UNKNOWN) {
+                               continue;
+                       }
+                       printf ("%sProtect Flash Bank # %ld\n",
+                               p ? "" : "Un-", bank);
+
+                       for (i=0; i<info->sector_count; ++i) {
+#if defined(CFG_FLASH_PROTECTION)
+                               if (flash_real_protect(info, i, p))
+                                       rcode = 1;
+                               putc ('.');
+#else
+                               info->protect[i] = p;
+#endif /* CFG_FLASH_PROTECTION */
+                       }
+               }
+
+#if defined(CFG_FLASH_PROTECTION)
+               if (!rcode) puts (" done\n");
+#endif /* CFG_FLASH_PROTECTION */
+
+               return rcode;
+       }
+
+       if ((n = abbrev_spec(argv[2], &info, &sect_first, &sect_last)) != 0) {
+               if (n < 0) {
+                       printf("Bad sector specification\n");
+                       return 1;
+               }
+               printf("%sProtect Flash Sectors %d-%d in Bank # %d\n",
+                       p ? "" : "Un-", sect_first, sect_last,
+                       (info-flash_info)+1);
+               for (i = sect_first; i <= sect_last; i++) {
+#if defined(CFG_FLASH_PROTECTION)
+                       if (flash_real_protect(info, i, p))
+                               rcode =  1;
+                       putc ('.');
+#else
+                       info->protect[i] = p;
+#endif /* CFG_FLASH_PROTECTION */
+               }
+
+#if defined(CFG_FLASH_PROTECTION)
+               if (!rcode) puts (" done\n");
+#endif /* CFG_FLASH_PROTECTION */
+
+               return rcode;
+       }
+
+       if (argc != 4) {
+               printf ("Usage:\n%s\n", cmdtp->usage);
+               return 1;
+       }
+
+       if (strcmp(argv[2], "bank") == 0) {
+               bank = simple_strtoul(argv[3], NULL, 16);
+               if ((bank < 1) || (bank > CFG_MAX_FLASH_BANKS)) {
+                       printf ("Only FLASH Banks # 1 ... # %d supported\n",
+                               CFG_MAX_FLASH_BANKS);
+                       return 1;
+               }
+               printf ("%sProtect Flash Bank # %ld\n",
+                       p ? "" : "Un-", bank);
+               info = &flash_info[bank-1];
+
+               if (info->flash_id == FLASH_UNKNOWN) {
+                       printf ("missing or unknown FLASH type\n");
+                       return 1;
+               }
+               for (i=0; i<info->sector_count; ++i) {
+#if defined(CFG_FLASH_PROTECTION)
+                       if (flash_real_protect(info, i, p))
+                               rcode =  1;
+                       putc ('.');
+#else
+                       info->protect[i] = p;
+#endif /* CFG_FLASH_PROTECTION */
+               }
+
+#if defined(CFG_FLASH_PROTECTION)
+               if (!rcode) puts (" done\n");
+#endif /* CFG_FLASH_PROTECTION */
+
+               return rcode;
+       }
+
+       addr_first = simple_strtoul(argv[2], NULL, 16);
+       addr_last  = simple_strtoul(argv[3], NULL, 16);
+
+       if (addr_first >= addr_last) {
+               printf ("Usage:\n%s\n", cmdtp->usage);
+               return 1;
+       }
+       rcode = flash_sect_protect (p, addr_first, addr_last);
+       return rcode;
+}
+
+
+int flash_sect_protect (int p, ulong addr_first, ulong addr_last)
+{
+       flash_info_t *info;
+       ulong bank;
+       int s_first, s_last;
+       int protected, i;
+       int rcode = 0;
+
+       protected = 0;
+
+       for (bank=0,info=&flash_info[0]; bank < CFG_MAX_FLASH_BANKS; ++bank, ++info) {
+               ulong b_end;
+               int sect;
+
+               if (info->flash_id == FLASH_UNKNOWN) {
+                       continue;
+               }
+
+               b_end = info->start[0] + info->size - 1; /* bank end addr */
+
+               s_first = -1;           /* first sector to erase        */
+               s_last  = -1;           /* last  sector to erase        */
+
+               for (sect=0; sect < info->sector_count; ++sect) {
+                       ulong end;              /* last address in current sect */
+                       short s_end;
+
+                       s_end = info->sector_count - 1;
+
+                       end = (sect == s_end) ? b_end : info->start[sect + 1] - 1;
+
+                       if (addr_first > end)
+                               continue;
+                       if (addr_last < info->start[sect])
+                               continue;
+
+                       if (addr_first == info->start[sect]) {
+                               s_first = sect;
+                       }
+                       if (addr_last  == end) {
+                               s_last  = sect;
+                       }
+               }
+               if (s_first>=0 && s_first<=s_last) {
+                       protected += s_last - s_first + 1;
+                       for (i=s_first; i<=s_last; ++i) {
+#if defined(CFG_FLASH_PROTECTION)
+                               if (flash_real_protect(info, i, p))
+                                       rcode = 1;
+                               putc ('.');
+#else
+                               info->protect[i] = p;
+#endif /* CFG_FLASH_PROTECTION */
+                       }
+               }
+#if defined(CFG_FLASH_PROTECTION)
+               if (!rcode) putc ('\n');
+#endif /* CFG_FLASH_PROTECTION */
+
+       }
+       if (protected) {
+               printf ("%sProtected %d sectors\n",
+                       p ? "" : "Un-", protected);
+       } else {
+               printf ("Error: start and/or end address"
+                       " not on sector boundary\n");
+               rcode = 1;
+       }
+       return rcode;
+}
+
+#endif /* CFG_CMD_FLASH */