busybox/miscutils/flash_eraseall.c

/* vi: set sw=4 ts=4: */
/* eraseall.c -- erase the whole of a MTD device
 *
 * Ported to busybox from mtd-utils.
 *
 * Copyright (C) 2000 Arcom Control System Ltd
 *
 * Renamed to flash_eraseall.c
 *
 * Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
 */

#include "libbb.h"
#include <mtd/mtd-user.h>
#include <linux/jffs2.h>

#define OPTION_J	(1 << 0)
#define OPTION_Q	(1 << 1)
#define IS_NAND		(1 << 2)
#define BBTEST		(1 << 3)

/* mtd/jffs2-user.h used to have this atrocity:
extern int target_endian;

#define t16(x) ({ __u16 __b = (x); (target_endian==__BYTE_ORDER)?__b:bswap_16(__b); })
#define t32(x) ({ __u32 __b = (x); (target_endian==__BYTE_ORDER)?__b:bswap_32(__b); })

#define cpu_to_je16(x) ((jint16_t){t16(x)})
#define cpu_to_je32(x) ((jint32_t){t32(x)})
#define cpu_to_jemode(x) ((jmode_t){t32(x)})

#define je16_to_cpu(x) (t16((x).v16))
#define je32_to_cpu(x) (t32((x).v32))
#define jemode_to_cpu(x) (t32((x).m))

but mtd/jffs2-user.h is gone now (at least 2.6.31.6 does not have it anymore)
*/

/* We always use native endianness */
#undef cpu_to_je16
#undef cpu_to_je32
#define cpu_to_je16(v) ((jint16_t){(v)})
#define cpu_to_je32(v) ((jint32_t){(v)})

static uint32_t crc32(uint32_t val, const void *ss, int len,
		uint32_t *crc32_table)
{
	const unsigned char *s = ss;
	while (--len >= 0)
		val = crc32_table[(val ^ *s++) & 0xff] ^ (val >> 8);
	return val;
}

static void show_progress(mtd_info_t *meminfo, erase_info_t *erase)
{
	printf("\rErasing %u Kibyte @ %x - %2u%% complete.",
		(unsigned)meminfo->erasesize / 1024,
		erase->start,
		(unsigned) ((unsigned long long) erase->start * 100 / meminfo->size)
	);
	fflush_all();
}

int flash_eraseall_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
int flash_eraseall_main(int argc UNUSED_PARAM, char **argv)
{
	struct jffs2_unknown_node cleanmarker;
	mtd_info_t meminfo;
	int fd, clmpos, clmlen;
	erase_info_t erase;
	struct stat st;
	unsigned int flags;
	char *mtd_name;

	opt_complementary = "=1";
	flags = BBTEST | getopt32(argv, "jq");

	mtd_name = argv[optind];
	fd = xopen(mtd_name, O_RDWR);
	fstat(fd, &st);
	if (!S_ISCHR(st.st_mode))
		bb_error_msg_and_die("%s: not a char device", mtd_name);

	xioctl(fd, MEMGETINFO, &meminfo);
	erase.length = meminfo.erasesize;
	if (meminfo.type == MTD_NANDFLASH)
		flags |= IS_NAND;

	clmpos = 0;
	clmlen = 8;
	if (flags & OPTION_J) {
		uint32_t *crc32_table;

		crc32_table = crc32_filltable(NULL, 0);

		cleanmarker.magic = cpu_to_je16(JFFS2_MAGIC_BITMASK);
		cleanmarker.nodetype = cpu_to_je16(JFFS2_NODETYPE_CLEANMARKER);
		if (!(flags & IS_NAND))
			cleanmarker.totlen = cpu_to_je32(sizeof(struct jffs2_unknown_node));
		else {
			struct nand_oobinfo oobinfo;

			xioctl(fd, MEMGETOOBSEL, &oobinfo);

			/* Check for autoplacement */
			if (oobinfo.useecc == MTD_NANDECC_AUTOPLACE) {
				/* Get the position of the free bytes */
				clmpos = oobinfo.oobfree[0][0];
				clmlen = oobinfo.oobfree[0][1];
				if (clmlen > 8)
					clmlen = 8;
				if (clmlen == 0)
					bb_error_msg_and_die("autoplacement selected and no empty space in oob");
			} else {
				/* Legacy mode */
				switch (meminfo.oobsize) {
				case 8:
					clmpos = 6;
					clmlen = 2;
					break;
				case 16:
					clmpos = 8;
					/*clmlen = 8;*/
					break;
				case 64:
					clmpos = 16;
					/*clmlen = 8;*/
					break;
				}
			}
			cleanmarker.totlen = cpu_to_je32(8);
		}

		cleanmarker.hdr_crc = cpu_to_je32(crc32(0, &cleanmarker, sizeof(struct jffs2_unknown_node) - 4,
					crc32_table));
	}

	/* Don't want to destroy progress indicator by bb_error_msg's */
	applet_name = xasprintf("\n%s: %s", applet_name, mtd_name);

	for (erase.start = 0; erase.start < meminfo.size;
	     erase.start += meminfo.erasesize) {
		if (flags & BBTEST) {
			int ret;
			loff_t offset = erase.start;

			ret = ioctl(fd, MEMGETBADBLOCK, &offset);
			if (ret > 0) {
				if (!(flags & OPTION_Q))
					bb_info_msg("\nSkipping bad block at 0x%08x", erase.start);
				continue;
			}
			if (ret < 0) {
				/* Black block table is not available on certain flash
				 * types e.g. NOR
				 */
				if (errno == EOPNOTSUPP) {
					flags &= ~BBTEST;
					if (flags & IS_NAND)
						bb_error_msg_and_die("bad block check not available");
				} else {
					bb_perror_msg_and_die("MEMGETBADBLOCK error");
				}
			}
		}

		if (!(flags & OPTION_Q))
			show_progress(&meminfo, &erase);

		xioctl(fd, MEMERASE, &erase);

		/* format for JFFS2 ? */
		if (!(flags & OPTION_J))
			continue;

		/* write cleanmarker */
		if (flags & IS_NAND) {
			struct mtd_oob_buf oob;

			oob.ptr = (unsigned char *) &cleanmarker;
			oob.start = erase.start + clmpos;
			oob.length = clmlen;
			xioctl(fd, MEMWRITEOOB, &oob);
		} else {
			xlseek(fd, erase.start, SEEK_SET);
			/* if (lseek(fd, erase.start, SEEK_SET) < 0) {
				bb_perror_msg("MTD %s failure", "seek");
				continue;
			} */
			xwrite(fd, &cleanmarker, sizeof(cleanmarker));
			/* if (write(fd, &cleanmarker, sizeof(cleanmarker)) != sizeof(cleanmarker)) {
				bb_perror_msg("MTD %s failure", "write");
				continue;
			} */
		}
		if (!(flags & OPTION_Q))
			printf(" Cleanmarker written at %x.", erase.start);
	}
	if (!(flags & OPTION_Q)) {
		show_progress(&meminfo, &erase);
		bb_putchar('\n');
	}

	if (ENABLE_FEATURE_CLEAN_UP)
		close(fd);
	return EXIT_SUCCESS;
}
1	/* vi: set sw=4 ts=4: */
2	/* eraseall.c -- erase the whole of a MTD device
3	*
4	* Ported to busybox from mtd-utils.
5	*
6	* Copyright (C) 2000 Arcom Control System Ltd
7	*
8	* Renamed to flash_eraseall.c
9	*
10	* Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
11	*/
12
13	#include "libbb.h"
14	#include <mtd/mtd-user.h>
15	#include <linux/jffs2.h>
16
17	#define OPTION_J (1 << 0)
18	#define OPTION_Q (1 << 1)
19	#define IS_NAND (1 << 2)
20	#define BBTEST (1 << 3)
21
22	/* mtd/jffs2-user.h used to have this atrocity:
23	extern int target_endian;
24
25	#define t16(x) ({ __u16 __b = (x); (target_endian==__BYTE_ORDER)?__b:bswap_16(__b); })
26	#define t32(x) ({ __u32 __b = (x); (target_endian==__BYTE_ORDER)?__b:bswap_32(__b); })
27
28	#define cpu_to_je16(x) ((jint16_t){t16(x)})
29	#define cpu_to_je32(x) ((jint32_t){t32(x)})
30	#define cpu_to_jemode(x) ((jmode_t){t32(x)})
31
32	#define je16_to_cpu(x) (t16((x).v16))
33	#define je32_to_cpu(x) (t32((x).v32))
34	#define jemode_to_cpu(x) (t32((x).m))
35
36	but mtd/jffs2-user.h is gone now (at least 2.6.31.6 does not have it anymore)
37	*/
38
39	/* We always use native endianness */
40	#undef cpu_to_je16
41	#undef cpu_to_je32
42	#define cpu_to_je16(v) ((jint16_t){(v)})
43	#define cpu_to_je32(v) ((jint32_t){(v)})
44
45	static uint32_t crc32(uint32_t val, const void *ss, int len,
46	uint32_t *crc32_table)
47	{
48	const unsigned char *s = ss;
49	while (--len >= 0)
50	val = crc32_table[(val ^ *s++) & 0xff] ^ (val >> 8);
51	return val;
52	}
53
54	static void show_progress(mtd_info_t meminfo, erase_info_t erase)
55	{
56	printf("\rErasing %u Kibyte @ %x - %2u%% complete.",
57	(unsigned)meminfo->erasesize / 1024,
58	erase->start,
59	(unsigned) ((unsigned long long) erase->start * 100 / meminfo->size)
60	);
61	fflush_all();
62	}
63
64	int flash_eraseall_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
65	int flash_eraseall_main(int argc UNUSED_PARAM, char **argv)
66	{
67	struct jffs2_unknown_node cleanmarker;
68	mtd_info_t meminfo;
69	int fd, clmpos, clmlen;
70	erase_info_t erase;
71	struct stat st;
72	unsigned int flags;
73	char *mtd_name;
74
75	opt_complementary = "=1";
76	flags = BBTEST \| getopt32(argv, "jq");
77
78	mtd_name = argv[optind];
79	fd = xopen(mtd_name, O_RDWR);
80	fstat(fd, &st);
81	if (!S_ISCHR(st.st_mode))
82	bb_error_msg_and_die("%s: not a char device", mtd_name);
83
84	xioctl(fd, MEMGETINFO, &meminfo);
85	erase.length = meminfo.erasesize;
86	if (meminfo.type == MTD_NANDFLASH)
87	flags \|= IS_NAND;
88
89	clmpos = 0;
90	clmlen = 8;
91	if (flags & OPTION_J) {
92	uint32_t *crc32_table;
93
94	crc32_table = crc32_filltable(NULL, 0);
95
96	cleanmarker.magic = cpu_to_je16(JFFS2_MAGIC_BITMASK);
97	cleanmarker.nodetype = cpu_to_je16(JFFS2_NODETYPE_CLEANMARKER);
98	if (!(flags & IS_NAND))
99	cleanmarker.totlen = cpu_to_je32(sizeof(struct jffs2_unknown_node));
100	else {
101	struct nand_oobinfo oobinfo;
102
103	xioctl(fd, MEMGETOOBSEL, &oobinfo);
104
105	/* Check for autoplacement */
106	if (oobinfo.useecc == MTD_NANDECC_AUTOPLACE) {
107	/* Get the position of the free bytes */
108	clmpos = oobinfo.oobfree[0][0];
109	clmlen = oobinfo.oobfree[0][1];
110	if (clmlen > 8)
111	clmlen = 8;
112	if (clmlen == 0)
113	bb_error_msg_and_die("autoplacement selected and no empty space in oob");
114	} else {
115	/* Legacy mode */
116	switch (meminfo.oobsize) {
117	case 8:
118	clmpos = 6;
119	clmlen = 2;
120	break;
121	case 16:
122	clmpos = 8;
123	/clmlen = 8;/
124	break;
125	case 64:
126	clmpos = 16;
127	/clmlen = 8;/
128	break;
129	}
130	}
131	cleanmarker.totlen = cpu_to_je32(8);
132	}
133
134	cleanmarker.hdr_crc = cpu_to_je32(crc32(0, &cleanmarker, sizeof(struct jffs2_unknown_node) - 4,
135	crc32_table));
136	}
137
138	/* Don't want to destroy progress indicator by bb_error_msg's */
139	applet_name = xasprintf("\n%s: %s", applet_name, mtd_name);
140
141	for (erase.start = 0; erase.start < meminfo.size;
142	erase.start += meminfo.erasesize) {
143	if (flags & BBTEST) {
144	int ret;
145	loff_t offset = erase.start;
146
147	ret = ioctl(fd, MEMGETBADBLOCK, &offset);
148	if (ret > 0) {
149	if (!(flags & OPTION_Q))
150	bb_info_msg("\nSkipping bad block at 0x%08x", erase.start);
151	continue;
152	}
153	if (ret < 0) {
154	/* Black block table is not available on certain flash
155	* types e.g. NOR
156	*/
157	if (errno == EOPNOTSUPP) {
158	flags &= ~BBTEST;
159	if (flags & IS_NAND)
160	bb_error_msg_and_die("bad block check not available");
161	} else {
162	bb_perror_msg_and_die("MEMGETBADBLOCK error");
163	}
164	}
165	}
166
167	if (!(flags & OPTION_Q))
168	show_progress(&meminfo, &erase);
169
170	xioctl(fd, MEMERASE, &erase);
171
172	/* format for JFFS2 ? */
173	if (!(flags & OPTION_J))
174	continue;
175
176	/* write cleanmarker */
177	if (flags & IS_NAND) {
178	struct mtd_oob_buf oob;
179
180	oob.ptr = (unsigned char *) &cleanmarker;
181	oob.start = erase.start + clmpos;
182	oob.length = clmlen;
183	xioctl(fd, MEMWRITEOOB, &oob);
184	} else {
185	xlseek(fd, erase.start, SEEK_SET);
186	/* if (lseek(fd, erase.start, SEEK_SET) < 0) {
187	bb_perror_msg("MTD %s failure", "seek");
188	continue;
189	} */
190	xwrite(fd, &cleanmarker, sizeof(cleanmarker));
191	/* if (write(fd, &cleanmarker, sizeof(cleanmarker)) != sizeof(cleanmarker)) {
192	bb_perror_msg("MTD %s failure", "write");
193	continue;
194	} */
195	}
196	if (!(flags & OPTION_Q))
197	printf(" Cleanmarker written at %x.", erase.start);
198	}
199	if (!(flags & OPTION_Q)) {
200	show_progress(&meminfo, &erase);
201	bb_putchar('\n');
202	}
203
204	if (ENABLE_FEATURE_CLEAN_UP)
205	close(fd);
206	return EXIT_SUCCESS;
207	}