mirror of
https://github.com/sheumann/hush.git
synced 2024-08-26 12:29:04 +00:00
242 lines
6.8 KiB
C
242 lines
6.8 KiB
C
/*
|
|
* nandwrite and nanddump ported to busybox from mtd-utils
|
|
*
|
|
* Author: Baruch Siach <baruch@tkos.co.il>, Orex Computed Radiography
|
|
*
|
|
* Licensed under GPLv2, see file LICENSE in this source tree.
|
|
*
|
|
* TODO: add support for large (>4GB) MTD devices
|
|
*/
|
|
|
|
//applet:IF_NANDWRITE(APPLET(nandwrite, BB_DIR_USR_SBIN, BB_SUID_DROP))
|
|
//applet:IF_NANDWRITE(APPLET_ODDNAME(nanddump, nandwrite, BB_DIR_USR_SBIN, BB_SUID_DROP, nanddump))
|
|
|
|
//kbuild:lib-$(CONFIG_NANDWRITE) += nandwrite.o
|
|
//kbuild:lib-$(CONFIG_NANDDUMP) += nandwrite.o
|
|
|
|
//config:config NANDWRITE
|
|
//config: bool "nandwrite"
|
|
//config: default n
|
|
//config: depends on PLATFORM_LINUX
|
|
//config: help
|
|
//config: Write to the specified MTD device, with bad blocks awareness
|
|
//config:
|
|
//config:config NANDDUMP
|
|
//config: bool "nanddump"
|
|
//config: default n
|
|
//config: depends on PLATFORM_LINUX
|
|
//config: help
|
|
//config: Dump the content of raw NAND chip
|
|
|
|
//usage:#define nandwrite_trivial_usage
|
|
//usage: "[-p] [-s ADDR] MTD_DEVICE [FILE]"
|
|
//usage:#define nandwrite_full_usage "\n\n"
|
|
//usage: "Write to the specified MTD device\n"
|
|
//usage: "\nOptions:"
|
|
//usage: "\n -p Pad to page size"
|
|
//usage: "\n -s ADDR Start address"
|
|
|
|
//usage:#define nanddump_trivial_usage
|
|
//usage: "[-o] [-b] [-s ADDR] [-f FILE] MTD_DEVICE"
|
|
//usage:#define nanddump_full_usage "\n\n"
|
|
//usage: "Dump the sepcified MTD device\n"
|
|
//usage: "\nOptions:"
|
|
//usage: "\n -o Omit oob data"
|
|
//usage: "\n -b Omit bad block from the dump"
|
|
//usage: "\n -s ADDR Start address"
|
|
//usage: "\n -l LEN Length"
|
|
//usage: "\n -f FILE Dump to file ('-' for stdout)"
|
|
|
|
#include "libbb.h"
|
|
#include <mtd/mtd-user.h>
|
|
|
|
#define IS_NANDDUMP (ENABLE_NANDDUMP && (!ENABLE_NANDWRITE || (applet_name[4] == 'd')))
|
|
#define IS_NANDWRITE (ENABLE_NANDWRITE && (!ENABLE_NANDDUMP || (applet_name[4] != 'd')))
|
|
|
|
#define OPT_p (1 << 0) /* nandwrite only */
|
|
#define OPT_o (1 << 0) /* nanddump only */
|
|
#define OPT_s (1 << 1)
|
|
#define OPT_b (1 << 2)
|
|
#define OPT_f (1 << 3)
|
|
#define OPT_l (1 << 4)
|
|
|
|
/* helper for writing out 0xff for bad blocks pad */
|
|
static void dump_bad(struct mtd_info_user *meminfo, unsigned len, int oob)
|
|
{
|
|
unsigned char buf[meminfo->writesize];
|
|
unsigned count;
|
|
|
|
/* round len to the next page */
|
|
len = (len | ~(meminfo->writesize - 1)) + 1;
|
|
|
|
memset(buf, 0xff, sizeof(buf));
|
|
for (count = 0; count < len; count += meminfo->writesize) {
|
|
xwrite(STDOUT_FILENO, buf, meminfo->writesize);
|
|
if (oob)
|
|
xwrite(STDOUT_FILENO, buf, meminfo->oobsize);
|
|
}
|
|
}
|
|
|
|
static unsigned next_good_eraseblock(int fd, struct mtd_info_user *meminfo,
|
|
unsigned block_offset)
|
|
{
|
|
while (1) {
|
|
loff_t offs;
|
|
|
|
if (block_offset >= meminfo->size) {
|
|
if (IS_NANDWRITE)
|
|
bb_error_msg_and_die("not enough space in MTD device");
|
|
return block_offset; /* let the caller exit */
|
|
}
|
|
offs = block_offset;
|
|
if (xioctl(fd, MEMGETBADBLOCK, &offs) == 0)
|
|
return block_offset;
|
|
/* ioctl returned 1 => "bad block" */
|
|
if (IS_NANDWRITE)
|
|
printf("Skipping bad block at 0x%08x\n", block_offset);
|
|
block_offset += meminfo->erasesize;
|
|
}
|
|
}
|
|
|
|
int nandwrite_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
|
|
int nandwrite_main(int argc UNUSED_PARAM, char **argv)
|
|
{
|
|
/* Buffer for OOB data */
|
|
unsigned char *oobbuf;
|
|
unsigned opts;
|
|
int fd;
|
|
ssize_t cnt;
|
|
unsigned mtdoffset, meminfo_writesize, blockstart, limit;
|
|
unsigned end_addr = ~0;
|
|
struct mtd_info_user meminfo;
|
|
struct mtd_oob_buf oob;
|
|
unsigned char *filebuf;
|
|
const char *opt_s = "0", *opt_f = "-", *opt_l;
|
|
|
|
if (IS_NANDDUMP) {
|
|
opt_complementary = "=1";
|
|
opts = getopt32(argv, "os:bf:l:", &opt_s, &opt_f, &opt_l);
|
|
} else { /* nandwrite */
|
|
opt_complementary = "-1:?2";
|
|
opts = getopt32(argv, "ps:", &opt_s);
|
|
}
|
|
argv += optind;
|
|
|
|
if (IS_NANDWRITE && argv[1])
|
|
opt_f = argv[1];
|
|
if (!LONE_DASH(opt_f)) {
|
|
int tmp_fd = xopen(opt_f,
|
|
IS_NANDDUMP ? O_WRONLY | O_TRUNC | O_CREAT : O_RDONLY
|
|
);
|
|
xmove_fd(tmp_fd, IS_NANDDUMP ? STDOUT_FILENO : STDIN_FILENO);
|
|
}
|
|
|
|
fd = xopen(argv[0], O_RDWR);
|
|
xioctl(fd, MEMGETINFO, &meminfo);
|
|
|
|
mtdoffset = xstrtou(opt_s, 0);
|
|
if (IS_NANDDUMP && (opts & OPT_l)) {
|
|
unsigned length = xstrtou(opt_l, 0);
|
|
if (length < meminfo.size - mtdoffset)
|
|
end_addr = mtdoffset + length;
|
|
}
|
|
|
|
/* Pull it into a CPU register (hopefully) - smaller code that way */
|
|
meminfo_writesize = meminfo.writesize;
|
|
|
|
if (mtdoffset & (meminfo_writesize - 1))
|
|
bb_error_msg_and_die("start address is not page aligned");
|
|
|
|
filebuf = xmalloc(meminfo_writesize);
|
|
oobbuf = xmalloc(meminfo.oobsize);
|
|
|
|
oob.start = 0;
|
|
oob.length = meminfo.oobsize;
|
|
oob.ptr = oobbuf;
|
|
|
|
blockstart = mtdoffset & ~(meminfo.erasesize - 1);
|
|
if (blockstart != mtdoffset) {
|
|
unsigned tmp;
|
|
/* mtdoffset is in the middle of an erase block, verify that
|
|
* this block is OK. Advance mtdoffset only if this block is
|
|
* bad.
|
|
*/
|
|
tmp = next_good_eraseblock(fd, &meminfo, blockstart);
|
|
if (tmp != blockstart) {
|
|
/* bad block(s), advance mtdoffset */
|
|
if (IS_NANDDUMP & !(opts & OPT_b)) {
|
|
int bad_len = MIN(tmp, end_addr) - mtdoffset;
|
|
dump_bad(&meminfo, bad_len, !(opts & OPT_o));
|
|
}
|
|
mtdoffset = tmp;
|
|
}
|
|
}
|
|
|
|
cnt = -1;
|
|
limit = MIN(meminfo.size, end_addr);
|
|
while (mtdoffset < limit) {
|
|
int input_fd = IS_NANDWRITE ? STDIN_FILENO : fd;
|
|
int output_fd = IS_NANDWRITE ? fd : STDOUT_FILENO;
|
|
|
|
blockstart = mtdoffset & ~(meminfo.erasesize - 1);
|
|
if (blockstart == mtdoffset) {
|
|
/* starting a new eraseblock */
|
|
mtdoffset = next_good_eraseblock(fd, &meminfo, blockstart);
|
|
if (IS_NANDWRITE)
|
|
printf("Writing at 0x%08x\n", mtdoffset);
|
|
else if (mtdoffset > blockstart) {
|
|
int bad_len = MIN(mtdoffset, limit) - blockstart;
|
|
dump_bad(&meminfo, bad_len, !(opts & OPT_o));
|
|
}
|
|
if (mtdoffset >= limit)
|
|
break;
|
|
}
|
|
xlseek(fd, mtdoffset, SEEK_SET);
|
|
|
|
/* get some more data from input */
|
|
cnt = full_read(input_fd, filebuf, meminfo_writesize);
|
|
if (cnt == 0) {
|
|
/* even with -p, we do not pad past the end of input
|
|
* (-p only zero-pads last incomplete page)
|
|
*/
|
|
break;
|
|
}
|
|
if (cnt < meminfo_writesize) {
|
|
if (IS_NANDDUMP)
|
|
bb_error_msg_and_die("short read");
|
|
if (!(opts & OPT_p))
|
|
bb_error_msg_and_die("input size is not rounded up to page size, "
|
|
"use -p to zero pad");
|
|
/* zero pad to end of write block */
|
|
memset(filebuf + cnt, 0, meminfo_writesize - cnt);
|
|
}
|
|
xwrite(output_fd, filebuf, meminfo_writesize);
|
|
|
|
if (IS_NANDDUMP && !(opts & OPT_o)) {
|
|
/* Dump OOB data */
|
|
oob.start = mtdoffset;
|
|
xioctl(fd, MEMREADOOB, &oob);
|
|
xwrite(output_fd, oobbuf, meminfo.oobsize);
|
|
}
|
|
|
|
mtdoffset += meminfo_writesize;
|
|
if (cnt < meminfo_writesize)
|
|
break;
|
|
}
|
|
|
|
if (IS_NANDWRITE && cnt != 0) {
|
|
/* We filled entire MTD, but did we reach EOF on input? */
|
|
if (full_read(STDIN_FILENO, filebuf, meminfo_writesize) != 0) {
|
|
/* no */
|
|
bb_error_msg_and_die("not enough space in MTD device");
|
|
}
|
|
}
|
|
|
|
if (ENABLE_FEATURE_CLEAN_UP) {
|
|
free(filebuf);
|
|
close(fd);
|
|
}
|
|
|
|
return EXIT_SUCCESS;
|
|
}
|