[people/ms/u-boot.git] / common / cmd_flash.c

/*
 * (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>


#ifdef CONFIG_HAS_DATAFLASH
#include <dataflash.h>
#endif

#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;
}

static int
flash_fill_sect_ranges (ulong addr_first, ulong addr_last,
			int *s_first, int *s_last,
			int *s_count )
{
	flash_info_t *info;
	ulong bank;
	int rcode = 0;

	*s_count = 0;

	for (bank=0; bank < CFG_MAX_FLASH_BANKS; ++bank) {
		s_first[bank] = -1;	/* first sector to erase	*/
		s_last [bank] = -1;	/* last  sector to erase	*/
	}

	for (bank=0,info=&flash_info[0];
	     (bank < CFG_MAX_FLASH_BANKS) && (addr_first <= addr_last);
	     ++bank, ++info) {
		ulong b_end;
		int sect;
		short s_end;

		if (info->flash_id == FLASH_UNKNOWN) {
			continue;
		}

		b_end = info->start[0] + info->size - 1;	/* bank end addr */
		s_end = info->sector_count - 1;			/* last sector   */


		for (sect=0; sect < info->sector_count; ++sect) {
			ulong end;	/* last address in current sect	*/

			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[bank] = sect;
			}
			if (addr_last  == end) {
				s_last[bank]  = sect;
			}
		}
		if (s_first[bank] >= 0) {
			if (s_last[bank] < 0) {
				if (addr_last > b_end) {
					s_last[bank] = s_end;
				} else {
					printf ("Error: end address"
						" not on sector boundary\n");
					rcode = 1;
					break;
				}
			}
			if (s_last[bank] < s_first[bank]) {
				printf ("Error: end sector"
					" precedes start sector\n");
				rcode = 1;
				break;
			}
			sect = s_last[bank];
			addr_first = (sect == s_end) ? b_end + 1: info->start[sect + 1];
			(*s_count) += s_last[bank] - s_first[bank] + 1;
		}
	}

	return rcode;
}

int do_flinfo ( cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
{
	ulong bank;

#ifdef CONFIG_HAS_DATAFLASH
	dataflash_print_info();
#endif

	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;
	}

	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[CFG_MAX_FLASH_BANKS], s_last[CFG_MAX_FLASH_BANKS];
	int erased = 0;
	int planned;
	int rcode = 0;

	rcode = flash_fill_sect_ranges (addr_first, addr_last,
					s_first, s_last, &planned );

	if (planned && (rcode == 0)) {
		for (bank=0,info=&flash_info[0];
		     (bank < CFG_MAX_FLASH_BANKS) && (rcode == 0);
		     ++bank, ++info) {
			if (s_first[bank]>=0) {
				erased += s_last[bank] - s_first[bank] + 1;
				printf ("Erase Flash from 0x%08lx to 0x%08lx "
					"in Bank # %ld ",
					info->start[s_first[bank]],
					(s_last[bank] == info->sector_count) ?
						info->start[0] + info->size - 1:
						info->start[s_last[bank]+1] - 1,
					bank+1);
				rcode = flash_erase (info, s_first[bank], s_last[bank]);
			}
		}
		printf ("Erased %d sectors\n", erased);
	} else if (rcode == 0) {
		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[CFG_MAX_FLASH_BANKS], s_last[CFG_MAX_FLASH_BANKS];
	int protected, i;
	int planned;
	int rcode;

	rcode = flash_fill_sect_ranges( addr_first, addr_last, s_first, s_last, &planned );

	protected = 0;

	if (planned && (rcode == 0)) {
		for (bank=0,info=&flash_info[0]; bank < CFG_MAX_FLASH_BANKS; ++bank, ++info) {
			if (info->flash_id == FLASH_UNKNOWN) {
				continue;
			}

			if (s_first[bank]>=0 && s_first[bank]<=s_last[bank]) {
				debug ("Protecting sectors %d..%d in bank %ld\n",
					s_first[bank], s_last[bank], bank+1);
				protected += s_last[bank] - s_first[bank] + 1;
				for (i=s_first[bank]; i<=s_last[bank]; ++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 */
		}

		printf ("%sProtected %d sectors\n",
			p ? "" : "Un-", protected);
	} else if (rcode == 0) {
		printf ("Error: start and/or end address"
			" not on sector boundary\n");
		rcode = 1;
	}
	return rcode;
}


/**************************************************/

U_BOOT_CMD(
	flinfo,    2,    1,    do_flinfo,
	"flinfo  - print FLASH memory information\n",
	"\n    - print information for all FLASH memory banks\n"
	"flinfo N\n    - print information for FLASH memory bank # N\n"
);

U_BOOT_CMD(
	erase,   3,   1,  do_flerase,
	"erase   - erase FLASH memory\n",
	"start end\n"
	"    - erase FLASH from addr 'start' to addr 'end'\n"
	"erase N:SF[-SL]\n    - erase sectors SF-SL in FLASH bank # N\n"
	"erase bank N\n    - erase FLASH bank # N\n"
	"erase all\n    - erase all FLASH banks\n"
);

U_BOOT_CMD(
	protect,  4,  1,   do_protect,
	"protect - enable or disable FLASH write protection\n",
	"on  start end\n"
	"    - protect FLASH from addr 'start' to addr 'end'\n"
	"protect on  N:SF[-SL]\n"
	"    - protect sectors SF-SL in FLASH bank # N\n"
	"protect on  bank N\n    - protect FLASH bank # N\n"
	"protect on  all\n    - protect all FLASH banks\n"
	"protect off start end\n"
	"    - make FLASH from addr 'start' to addr 'end' writable\n"
	"protect off N:SF[-SL]\n"
	"    - make sectors SF-SL writable in FLASH bank # N\n"
	"protect off bank N\n    - make FLASH bank # N writable\n"
	"protect off all\n    - make all FLASH banks writable\n"
);

#endif	/* CFG_CMD_FLASH */
Commit	Line	Data
38a24a61 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	* FLASH support
	26	*/
	27	#include <common.h>
	28	#include <command.h>
8bde7f77	29
38a24a61	30
2abbe075 WD	31	#ifdef CONFIG_HAS_DATAFLASH
	32	#include <dataflash.h>
	33	#endif
	34
38a24a61 WD	35	#if (CONFIG_COMMANDS & CFG_CMD_FLASH)
	36
	37	extern flash_info_t flash_info[]; /* info for FLASH chips */
	38
	39	/*
	40	* The user interface starts numbering for Flash banks with 1
	41	* for historical reasons.
	42	*/
	43
	44	/*
	45	* this routine looks for an abbreviated flash range specification.
	46	* the syntax is B:SF[-SL], where B is the bank number, SF is the first
	47	* sector to erase, and SL is the last sector to erase (defaults to SF).
	48	* bank numbers start at 1 to be consistent with other specs, sector numbers
	49	* start at zero.
	50	*
	51	* returns: 1 - correct spec; pinfo, psf and *psl are
	52	* set appropriately
	53	* 0 - doesn't look like an abbreviated spec
	54	* -1 - looks like an abbreviated spec, but got
	55	* a parsing error, a number out of range,
	56	* or an invalid flash bank.
	57	*/
	58	static int
bdccc4fe	59	abbrev_spec (char str, flash_info_t * pinfo, int psf, int psl)
38a24a61	60	{
bdccc4fe WD	61	flash_info_t *fp;
	62	int bank, first, last;
	63	char p, ep;
38a24a61	64
bdccc4fe WD	65	if ((p = strchr (str, ':')) == NULL)
	66	return 0;
	67	*p++ = '\0';
38a24a61	68
bdccc4fe WD	69	bank = simple_strtoul (str, &ep, 10);
	70	if (ep == str \|\| *ep != '\0' \|\|
	71	bank < 1 \|\| bank > CFG_MAX_FLASH_BANKS \|\|
	72	(fp = &flash_info[bank - 1])->flash_id == FLASH_UNKNOWN)
	73	return -1;
	74
	75	str = p;
	76	if ((p = strchr (str, '-')) != NULL)
	77	*p++ = '\0';
	78
	79	first = simple_strtoul (str, &ep, 10);
	80	if (ep == str \|\| *ep != '\0' \|\| first >= fp->sector_count)
	81	return -1;
	82
	83	if (p != NULL) {
	84	last = simple_strtoul (p, &ep, 10);
	85	if (ep == p \|\| *ep != '\0' \|\|
	86	last < first \|\| last >= fp->sector_count)
	87	return -1;
	88	} else {
	89	last = first;
	90	}
38a24a61	91
bdccc4fe WD	92	*pinfo = fp;
	93	*psf = first;
	94	*psl = last;
	95
	96	return 1;
	97	}
	98
	99	static int
	100	flash_fill_sect_ranges (ulong addr_first, ulong addr_last,
	101	int s_first, int s_last,
	102	int *s_count )
	103	{
	104	flash_info_t *info;
	105	ulong bank;
	106	int rcode = 0;
	107
	108	*s_count = 0;
	109
	110	for (bank=0; bank < CFG_MAX_FLASH_BANKS; ++bank) {
	111	s_first[bank] = -1; /* first sector to erase */
	112	s_last [bank] = -1; /* last sector to erase */
	113	}
	114
	115	for (bank=0,info=&flash_info[0];
	116	(bank < CFG_MAX_FLASH_BANKS) && (addr_first <= addr_last);
	117	++bank, ++info) {
	118	ulong b_end;
	119	int sect;
	120	short s_end;
	121
	122	if (info->flash_id == FLASH_UNKNOWN) {
	123	continue;
	124	}
	125
	126	b_end = info->start[0] + info->size - 1; /* bank end addr */
	127	s_end = info->sector_count - 1; /* last sector */
	128
	129
	130	for (sect=0; sect < info->sector_count; ++sect) {
	131	ulong end; /* last address in current sect */
38a24a61	132
bdccc4fe	133	end = (sect == s_end) ? b_end : info->start[sect + 1] - 1;
38a24a61	134
bdccc4fe WD	135	if (addr_first > end)
	136	continue;
	137	if (addr_last < info->start[sect])
	138	continue;
38a24a61	139
bdccc4fe WD	140	if (addr_first == info->start[sect]) {
	141	s_first[bank] = sect;
	142	}
	143	if (addr_last == end) {
	144	s_last[bank] = sect;
	145	}
	146	}
	147	if (s_first[bank] >= 0) {
	148	if (s_last[bank] < 0) {
	149	if (addr_last > b_end) {
	150	s_last[bank] = s_end;
	151	} else {
	152	printf ("Error: end address"
	153	" not on sector boundary\n");
	154	rcode = 1;
	155	break;
	156	}
	157	}
	158	if (s_last[bank] < s_first[bank]) {
	159	printf ("Error: end sector"
	160	" precedes start sector\n");
	161	rcode = 1;
	162	break;
	163	}
	164	sect = s_last[bank];
	165	addr_first = (sect == s_end) ? b_end + 1: info->start[sect + 1];
	166	(*s_count) += s_last[bank] - s_first[bank] + 1;
	167	}
	168	}
38a24a61	169
bdccc4fe	170	return rcode;
38a24a61	171	}
bdccc4fe	172
38a24a61 WD	173	int do_flinfo ( cmd_tbl_t cmdtp, int flag, int argc, char argv[])
	174	{
	175	ulong bank;
	176
2abbe075 WD	177	#ifdef CONFIG_HAS_DATAFLASH
	178	dataflash_print_info();
	179	#endif
	180
38a24a61 WD	181	if (argc == 1) { /* print info for all FLASH banks */
	182	for (bank=0; bank <CFG_MAX_FLASH_BANKS; ++bank) {
	183	printf ("\nBank # %ld: ", bank+1);
	184
	185	flash_print_info (&flash_info[bank]);
	186	}
	187	return 0;
	188	}
	189
	190	bank = simple_strtoul(argv[1], NULL, 16);
	191	if ((bank < 1) \|\| (bank > CFG_MAX_FLASH_BANKS)) {
	192	printf ("Only FLASH Banks # 1 ... # %d supported\n",
	193	CFG_MAX_FLASH_BANKS);
	194	return 1;
	195	}
	196	printf ("\nBank # %ld: ", bank);
	197	flash_print_info (&flash_info[bank-1]);
	198	return 0;
	199	}
	200	int do_flerase (cmd_tbl_t cmdtp, int flag, int argc, char argv[])
	201	{
	202	flash_info_t *info;
	203	ulong bank, addr_first, addr_last;
	204	int n, sect_first, sect_last;
	205	int rcode = 0;
	206
	207	if (argc < 2) {
	208	printf ("Usage:\n%s\n", cmdtp->usage);
	209	return 1;
	210	}
	211
	212	if (strcmp(argv[1], "all") == 0) {
	213	for (bank=1; bank<=CFG_MAX_FLASH_BANKS; ++bank) {
	214	printf ("Erase Flash Bank # %ld ", bank);
	215	info = &flash_info[bank-1];
	216	rcode = flash_erase (info, 0, info->sector_count-1);
	217	}
	218	return rcode;
	219	}
	220
	221	if ((n = abbrev_spec(argv[1], &info, &sect_first, &sect_last)) != 0) {
	222	if (n < 0) {
	223	printf("Bad sector specification\n");
	224	return 1;
	225	}
	226	printf ("Erase Flash Sectors %d-%d in Bank # %d ",
	227	sect_first, sect_last, (info-flash_info)+1);
	228	rcode = flash_erase(info, sect_first, sect_last);
	229	return rcode;
	230	}
	231
	232	if (argc != 3) {
	233	printf ("Usage:\n%s\n", cmdtp->usage);
	234	return 1;
	235	}
	236
	237	if (strcmp(argv[1], "bank") == 0) {
	238	bank = simple_strtoul(argv[2], NULL, 16);
	239	if ((bank < 1) \|\| (bank > CFG_MAX_FLASH_BANKS)) {
	240	printf ("Only FLASH Banks # 1 ... # %d supported\n",
	241	CFG_MAX_FLASH_BANKS);
	242	return 1;
	243	}
	244	printf ("Erase Flash Bank # %ld ", bank);
245	info = &flash_info[bank-1];
246	rcode = flash_erase (info, 0, info->sector_count-1);
247	return rcode;
248	}
249
250	addr_first = simple_strtoul(argv[1], NULL, 16);
251	addr_last = simple_strtoul(argv[2], NULL, 16);
252
253	if (addr_first >= addr_last) {
254	printf ("Usage:\n%s\n", cmdtp->usage);
255	return 1;
256	}
257
38a24a61 WD	258	rcode = flash_sect_erase(addr_first, addr_last);
	259	return rcode;
	260	}
	261
	262	int flash_sect_erase (ulong addr_first, ulong addr_last)
	263	{
	264	flash_info_t *info;
	265	ulong bank;
bdccc4fe WD	266	int s_first[CFG_MAX_FLASH_BANKS], s_last[CFG_MAX_FLASH_BANKS];
	267	int erased = 0;
	268	int planned;
38a24a61 WD	269	int rcode = 0;
38a24a61 WD	270
bdccc4fe WD	271	rcode = flash_fill_sect_ranges (addr_first, addr_last,
	272	s_first, s_last, &planned );
	273
	274	if (planned && (rcode == 0)) {
	275	for (bank=0,info=&flash_info[0];
	276	(bank < CFG_MAX_FLASH_BANKS) && (rcode == 0);
	277	++bank, ++info) {
	278	if (s_first[bank]>=0) {
	279	erased += s_last[bank] - s_first[bank] + 1;
	280	printf ("Erase Flash from 0x%08lx to 0x%08lx "
	281	"in Bank # %ld ",
	282	info->start[s_first[bank]],
	283	(s_last[bank] == info->sector_count) ?
	284	info->start[0] + info->size - 1:
	285	info->start[s_last[bank]+1] - 1,
	286	bank+1);
	287	rcode = flash_erase (info, s_first[bank], s_last[bank]);
38a24a61 WD	288	}
38a24a61 WD	289	}
38a24a61	290	printf ("Erased %d sectors\n", erased);
bdccc4fe	291	} else if (rcode == 0) {
38a24a61 WD	292	printf ("Error: start and/or end address"
	293	" not on sector boundary\n");
	294	rcode = 1;
	295	}
	296	return rcode;
	297	}
	298
38a24a61 WD	299	int do_protect (cmd_tbl_t cmdtp, int flag, int argc, char argv[])
	300	{
	301	flash_info_t *info;
	302	ulong bank, addr_first, addr_last;
	303	int i, p, n, sect_first, sect_last;
	304	int rcode = 0;
	305
	306	if (argc < 3) {
	307	printf ("Usage:\n%s\n", cmdtp->usage);
	308	return 1;
	309	}
	310
bdccc4fe	311	if (strcmp(argv[1], "off") == 0) {
38a24a61	312	p = 0;
bdccc4fe	313	} else if (strcmp(argv[1], "on") == 0) {
38a24a61	314	p = 1;
bdccc4fe	315	} else {
38a24a61 WD	316	printf ("Usage:\n%s\n", cmdtp->usage);
	317	return 1;
	318	}
	319
	320	if (strcmp(argv[2], "all") == 0) {
	321	for (bank=1; bank<=CFG_MAX_FLASH_BANKS; ++bank) {
	322	info = &flash_info[bank-1];
	323	if (info->flash_id == FLASH_UNKNOWN) {
	324	continue;
	325	}
	326	printf ("%sProtect Flash Bank # %ld\n",
	327	p ? "" : "Un-", bank);
	328
	329	for (i=0; i<info->sector_count; ++i) {
	330	#if defined(CFG_FLASH_PROTECTION)
	331	if (flash_real_protect(info, i, p))
	332	rcode = 1;
	333	putc ('.');
	334	#else
	335	info->protect[i] = p;
	336	#endif /* CFG_FLASH_PROTECTION */
	337	}
	338	}
	339
	340	#if defined(CFG_FLASH_PROTECTION)
	341	if (!rcode) puts (" done\n");
	342	#endif /* CFG_FLASH_PROTECTION */
	343
	344	return rcode;
	345	}
	346
	347	if ((n = abbrev_spec(argv[2], &info, &sect_first, &sect_last)) != 0) {
	348	if (n < 0) {
	349	printf("Bad sector specification\n");
	350	return 1;
	351	}
	352	printf("%sProtect Flash Sectors %d-%d in Bank # %d\n",
	353	p ? "" : "Un-", sect_first, sect_last,
	354	(info-flash_info)+1);
	355	for (i = sect_first; i <= sect_last; i++) {
	356	#if defined(CFG_FLASH_PROTECTION)
	357	if (flash_real_protect(info, i, p))
	358	rcode = 1;
	359	putc ('.');
	360	#else
	361	info->protect[i] = p;
	362	#endif /* CFG_FLASH_PROTECTION */
	363	}
	364
	365	#if defined(CFG_FLASH_PROTECTION)
	366	if (!rcode) puts (" done\n");
	367	#endif /* CFG_FLASH_PROTECTION */
	368
	369	return rcode;
	370	}
	371
	372	if (argc != 4) {
	373	printf ("Usage:\n%s\n", cmdtp->usage);
	374	return 1;
	375	}
	376
	377	if (strcmp(argv[2], "bank") == 0) {
	378	bank = simple_strtoul(argv[3], NULL, 16);
	379	if ((bank < 1) \|\| (bank > CFG_MAX_FLASH_BANKS)) {
380	printf ("Only FLASH Banks # 1 ... # %d supported\n",
381	CFG_MAX_FLASH_BANKS);
382	return 1;
383	}
384	printf ("%sProtect Flash Bank # %ld\n",
385	p ? "" : "Un-", bank);
386	info = &flash_info[bank-1];
387
388	if (info->flash_id == FLASH_UNKNOWN) {
389	printf ("missing or unknown FLASH type\n");
390	return 1;
391	}
392	for (i=0; i<info->sector_count; ++i) {
393	#if defined(CFG_FLASH_PROTECTION)
394	if (flash_real_protect(info, i, p))
395	rcode = 1;
396	putc ('.');
397	#else
398	info->protect[i] = p;
399	#endif /* CFG_FLASH_PROTECTION */
400	}
401
402	#if defined(CFG_FLASH_PROTECTION)
403	if (!rcode) puts (" done\n");
404	#endif /* CFG_FLASH_PROTECTION */
405
406	return rcode;
407	}
408
409	addr_first = simple_strtoul(argv[2], NULL, 16);
410	addr_last = simple_strtoul(argv[3], NULL, 16);
411
412	if (addr_first >= addr_last) {
413	printf ("Usage:\n%s\n", cmdtp->usage);
414	return 1;
415	}
416	rcode = flash_sect_protect (p, addr_first, addr_last);
417	return rcode;
418	}
419
420
421	int flash_sect_protect (int p, ulong addr_first, ulong addr_last)
422	{
423	flash_info_t *info;
424	ulong bank;
bdccc4fe	425	int s_first[CFG_MAX_FLASH_BANKS], s_last[CFG_MAX_FLASH_BANKS];
38a24a61	426	int protected, i;
bdccc4fe WD	427	int planned;
bdccc4fe WD	428	int rcode;
38a24a61	429
bdccc4fe	430	rcode = flash_fill_sect_ranges( addr_first, addr_last, s_first, s_last, &planned );
38a24a61	431
bdccc4fe	432	protected = 0;
38a24a61	433
bdccc4fe WD	434	if (planned && (rcode == 0)) {
	435	for (bank=0,info=&flash_info[0]; bank < CFG_MAX_FLASH_BANKS; ++bank, ++info) {
	436	if (info->flash_id == FLASH_UNKNOWN) {
38a24a61	437	continue;
38a24a61	438	}
bdccc4fe WD	439
	440	if (s_first[bank]>=0 && s_first[bank]<=s_last[bank]) {
	441	debug ("Protecting sectors %d..%d in bank %ld\n",
	442	s_first[bank], s_last[bank], bank+1);
	443	protected += s_last[bank] - s_first[bank] + 1;
	444	for (i=s_first[bank]; i<=s_last[bank]; ++i) {
38a24a61	445	#if defined(CFG_FLASH_PROTECTION)
bdccc4fe WD	446	if (flash_real_protect(info, i, p))
	447	rcode = 1;
	448	putc ('.');
38a24a61	449	#else
bdccc4fe	450	info->protect[i] = p;
38a24a61	451	#endif /* CFG_FLASH_PROTECTION */
bdccc4fe	452	}
38a24a61	453	}
38a24a61	454	#if defined(CFG_FLASH_PROTECTION)
bdccc4fe	455	if (!rcode) putc ('\n');
38a24a61	456	#endif /* CFG_FLASH_PROTECTION */
bdccc4fe	457	}
38a24a61	458
38a24a61 WD	459	printf ("%sProtected %d sectors\n",
38a24a61 WD	460	p ? "" : "Un-", protected);
bdccc4fe	461	} else if (rcode == 0) {
38a24a61 WD	462	printf ("Error: start and/or end address"
	463	" not on sector boundary\n");
	464	rcode = 1;
	465	}
	466	return rcode;
	467	}
	468
8bde7f77 WD	469
	470	/**************************************************/
	471
0d498393 WD	472	U_BOOT_CMD(
0d498393 WD	473	flinfo, 2, 1, do_flinfo,
8bde7f77 WD	474	"flinfo - print FLASH memory information\n",
	475	"\n - print information for all FLASH memory banks\n"
	476	"flinfo N\n - print information for FLASH memory bank # N\n"
	477	);
	478
0d498393 WD	479	U_BOOT_CMD(
0d498393 WD	480	erase, 3, 1, do_flerase,
8bde7f77 WD	481	"erase - erase FLASH memory\n",
	482	"start end\n"
	483	" - erase FLASH from addr 'start' to addr 'end'\n"
	484	"erase N:SF[-SL]\n - erase sectors SF-SL in FLASH bank # N\n"
	485	"erase bank N\n - erase FLASH bank # N\n"
	486	"erase all\n - erase all FLASH banks\n"
	487	);
	488
0d498393 WD	489	U_BOOT_CMD(
0d498393 WD	490	protect, 4, 1, do_protect,
8bde7f77 WD	491	"protect - enable or disable FLASH write protection\n",
	492	"on start end\n"
	493	" - protect FLASH from addr 'start' to addr 'end'\n"
	494	"protect on N:SF[-SL]\n"
	495	" - protect sectors SF-SL in FLASH bank # N\n"
	496	"protect on bank N\n - protect FLASH bank # N\n"
	497	"protect on all\n - protect all FLASH banks\n"
	498	"protect off start end\n"
	499	" - make FLASH from addr 'start' to addr 'end' writable\n"
	500	"protect off N:SF[-SL]\n"
	501	" - make sectors SF-SL writable in FLASH bank # N\n"
	502	"protect off bank N\n - make FLASH bank # N writable\n"
	503	"protect off all\n - make all FLASH banks writable\n"
	504	);
	505
38a24a61	506	#endif /* CFG_CMD_FLASH */