|  | /* | 
|  | * Copyright (C) 2006-2007 Nokia Corporation | 
|  | * | 
|  | * This program is free software; you can redistribute it and/or modify it | 
|  | * under the terms of the GNU General Public License version 2 as published by | 
|  | * the Free Software Foundation. | 
|  | * | 
|  | * 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; see the file COPYING. If not, write to the Free Software | 
|  | * Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. | 
|  | * | 
|  | * Test sub-page read and write on MTD device. | 
|  | * Author: Adrian Hunter <ext-adrian.hunter@nokia.com> | 
|  | * | 
|  | */ | 
|  |  | 
|  | #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt | 
|  |  | 
|  | #include <linux/init.h> | 
|  | #include <linux/module.h> | 
|  | #include <linux/moduleparam.h> | 
|  | #include <linux/err.h> | 
|  | #include <linux/mtd/mtd.h> | 
|  | #include <linux/slab.h> | 
|  | #include <linux/sched.h> | 
|  | #include <linux/random.h> | 
|  |  | 
|  | #include "mtd_test.h" | 
|  |  | 
|  | static int dev = -EINVAL; | 
|  | module_param(dev, int, S_IRUGO); | 
|  | MODULE_PARM_DESC(dev, "MTD device number to use"); | 
|  |  | 
|  | static struct mtd_info *mtd; | 
|  | static unsigned char *writebuf; | 
|  | static unsigned char *readbuf; | 
|  | static unsigned char *bbt; | 
|  |  | 
|  | static int subpgsize; | 
|  | static int bufsize; | 
|  | static int ebcnt; | 
|  | static int pgcnt; | 
|  | static int errcnt; | 
|  | static struct rnd_state rnd_state; | 
|  |  | 
|  | static inline void clear_data(unsigned char *buf, size_t len) | 
|  | { | 
|  | memset(buf, 0, len); | 
|  | } | 
|  |  | 
|  | static int write_eraseblock(int ebnum) | 
|  | { | 
|  | size_t written; | 
|  | int err = 0; | 
|  | loff_t addr = (loff_t)ebnum * mtd->erasesize; | 
|  |  | 
|  | prandom_bytes_state(&rnd_state, writebuf, subpgsize); | 
|  | err = mtd_write(mtd, addr, subpgsize, &written, writebuf); | 
|  | if (unlikely(err || written != subpgsize)) { | 
|  | pr_err("error: write failed at %#llx\n", | 
|  | (long long)addr); | 
|  | if (written != subpgsize) { | 
|  | pr_err("  write size: %#x\n", subpgsize); | 
|  | pr_err("  written: %#zx\n", written); | 
|  | } | 
|  | return err ? err : -1; | 
|  | } | 
|  |  | 
|  | addr += subpgsize; | 
|  |  | 
|  | prandom_bytes_state(&rnd_state, writebuf, subpgsize); | 
|  | err = mtd_write(mtd, addr, subpgsize, &written, writebuf); | 
|  | if (unlikely(err || written != subpgsize)) { | 
|  | pr_err("error: write failed at %#llx\n", | 
|  | (long long)addr); | 
|  | if (written != subpgsize) { | 
|  | pr_err("  write size: %#x\n", subpgsize); | 
|  | pr_err("  written: %#zx\n", written); | 
|  | } | 
|  | return err ? err : -1; | 
|  | } | 
|  |  | 
|  | return err; | 
|  | } | 
|  |  | 
|  | static int write_eraseblock2(int ebnum) | 
|  | { | 
|  | size_t written; | 
|  | int err = 0, k; | 
|  | loff_t addr = (loff_t)ebnum * mtd->erasesize; | 
|  |  | 
|  | for (k = 1; k < 33; ++k) { | 
|  | if (addr + (subpgsize * k) > (loff_t)(ebnum + 1) * mtd->erasesize) | 
|  | break; | 
|  | prandom_bytes_state(&rnd_state, writebuf, subpgsize * k); | 
|  | err = mtd_write(mtd, addr, subpgsize * k, &written, writebuf); | 
|  | if (unlikely(err || written != subpgsize * k)) { | 
|  | pr_err("error: write failed at %#llx\n", | 
|  | (long long)addr); | 
|  | if (written != subpgsize * k) { | 
|  | pr_err("  write size: %#x\n", | 
|  | subpgsize * k); | 
|  | pr_err("  written: %#08zx\n", | 
|  | written); | 
|  | } | 
|  | return err ? err : -1; | 
|  | } | 
|  | addr += subpgsize * k; | 
|  | } | 
|  |  | 
|  | return err; | 
|  | } | 
|  |  | 
|  | static void print_subpage(unsigned char *p) | 
|  | { | 
|  | int i, j; | 
|  |  | 
|  | for (i = 0; i < subpgsize; ) { | 
|  | for (j = 0; i < subpgsize && j < 32; ++i, ++j) | 
|  | printk("%02x", *p++); | 
|  | printk("\n"); | 
|  | } | 
|  | } | 
|  |  | 
|  | static int verify_eraseblock(int ebnum) | 
|  | { | 
|  | size_t read; | 
|  | int err = 0; | 
|  | loff_t addr = (loff_t)ebnum * mtd->erasesize; | 
|  |  | 
|  | prandom_bytes_state(&rnd_state, writebuf, subpgsize); | 
|  | clear_data(readbuf, subpgsize); | 
|  | err = mtd_read(mtd, addr, subpgsize, &read, readbuf); | 
|  | if (unlikely(err || read != subpgsize)) { | 
|  | if (mtd_is_bitflip(err) && read == subpgsize) { | 
|  | pr_info("ECC correction at %#llx\n", | 
|  | (long long)addr); | 
|  | err = 0; | 
|  | } else { | 
|  | pr_err("error: read failed at %#llx\n", | 
|  | (long long)addr); | 
|  | return err ? err : -1; | 
|  | } | 
|  | } | 
|  | if (unlikely(memcmp(readbuf, writebuf, subpgsize))) { | 
|  | pr_err("error: verify failed at %#llx\n", | 
|  | (long long)addr); | 
|  | pr_info("------------- written----------------\n"); | 
|  | print_subpage(writebuf); | 
|  | pr_info("------------- read ------------------\n"); | 
|  | print_subpage(readbuf); | 
|  | pr_info("-------------------------------------\n"); | 
|  | errcnt += 1; | 
|  | } | 
|  |  | 
|  | addr += subpgsize; | 
|  |  | 
|  | prandom_bytes_state(&rnd_state, writebuf, subpgsize); | 
|  | clear_data(readbuf, subpgsize); | 
|  | err = mtd_read(mtd, addr, subpgsize, &read, readbuf); | 
|  | if (unlikely(err || read != subpgsize)) { | 
|  | if (mtd_is_bitflip(err) && read == subpgsize) { | 
|  | pr_info("ECC correction at %#llx\n", | 
|  | (long long)addr); | 
|  | err = 0; | 
|  | } else { | 
|  | pr_err("error: read failed at %#llx\n", | 
|  | (long long)addr); | 
|  | return err ? err : -1; | 
|  | } | 
|  | } | 
|  | if (unlikely(memcmp(readbuf, writebuf, subpgsize))) { | 
|  | pr_info("error: verify failed at %#llx\n", | 
|  | (long long)addr); | 
|  | pr_info("------------- written----------------\n"); | 
|  | print_subpage(writebuf); | 
|  | pr_info("------------- read ------------------\n"); | 
|  | print_subpage(readbuf); | 
|  | pr_info("-------------------------------------\n"); | 
|  | errcnt += 1; | 
|  | } | 
|  |  | 
|  | return err; | 
|  | } | 
|  |  | 
|  | static int verify_eraseblock2(int ebnum) | 
|  | { | 
|  | size_t read; | 
|  | int err = 0, k; | 
|  | loff_t addr = (loff_t)ebnum * mtd->erasesize; | 
|  |  | 
|  | for (k = 1; k < 33; ++k) { | 
|  | if (addr + (subpgsize * k) > (loff_t)(ebnum + 1) * mtd->erasesize) | 
|  | break; | 
|  | prandom_bytes_state(&rnd_state, writebuf, subpgsize * k); | 
|  | clear_data(readbuf, subpgsize * k); | 
|  | err = mtd_read(mtd, addr, subpgsize * k, &read, readbuf); | 
|  | if (unlikely(err || read != subpgsize * k)) { | 
|  | if (mtd_is_bitflip(err) && read == subpgsize * k) { | 
|  | pr_info("ECC correction at %#llx\n", | 
|  | (long long)addr); | 
|  | err = 0; | 
|  | } else { | 
|  | pr_err("error: read failed at " | 
|  | "%#llx\n", (long long)addr); | 
|  | return err ? err : -1; | 
|  | } | 
|  | } | 
|  | if (unlikely(memcmp(readbuf, writebuf, subpgsize * k))) { | 
|  | pr_err("error: verify failed at %#llx\n", | 
|  | (long long)addr); | 
|  | errcnt += 1; | 
|  | } | 
|  | addr += subpgsize * k; | 
|  | } | 
|  |  | 
|  | return err; | 
|  | } | 
|  |  | 
|  | static int verify_eraseblock_ff(int ebnum) | 
|  | { | 
|  | uint32_t j; | 
|  | size_t read; | 
|  | int err = 0; | 
|  | loff_t addr = (loff_t)ebnum * mtd->erasesize; | 
|  |  | 
|  | memset(writebuf, 0xff, subpgsize); | 
|  | for (j = 0; j < mtd->erasesize / subpgsize; ++j) { | 
|  | clear_data(readbuf, subpgsize); | 
|  | err = mtd_read(mtd, addr, subpgsize, &read, readbuf); | 
|  | if (unlikely(err || read != subpgsize)) { | 
|  | if (mtd_is_bitflip(err) && read == subpgsize) { | 
|  | pr_info("ECC correction at %#llx\n", | 
|  | (long long)addr); | 
|  | err = 0; | 
|  | } else { | 
|  | pr_err("error: read failed at " | 
|  | "%#llx\n", (long long)addr); | 
|  | return err ? err : -1; | 
|  | } | 
|  | } | 
|  | if (unlikely(memcmp(readbuf, writebuf, subpgsize))) { | 
|  | pr_err("error: verify 0xff failed at " | 
|  | "%#llx\n", (long long)addr); | 
|  | errcnt += 1; | 
|  | } | 
|  | addr += subpgsize; | 
|  | } | 
|  |  | 
|  | return err; | 
|  | } | 
|  |  | 
|  | static int verify_all_eraseblocks_ff(void) | 
|  | { | 
|  | int err; | 
|  | unsigned int i; | 
|  |  | 
|  | pr_info("verifying all eraseblocks for 0xff\n"); | 
|  | for (i = 0; i < ebcnt; ++i) { | 
|  | if (bbt[i]) | 
|  | continue; | 
|  | err = verify_eraseblock_ff(i); | 
|  | if (err) | 
|  | return err; | 
|  | if (i % 256 == 0) | 
|  | pr_info("verified up to eraseblock %u\n", i); | 
|  |  | 
|  | err = mtdtest_relax(); | 
|  | if (err) | 
|  | return err; | 
|  | } | 
|  | pr_info("verified %u eraseblocks\n", i); | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static int __init mtd_subpagetest_init(void) | 
|  | { | 
|  | int err = 0; | 
|  | uint32_t i; | 
|  | uint64_t tmp; | 
|  |  | 
|  | printk(KERN_INFO "\n"); | 
|  | printk(KERN_INFO "=================================================\n"); | 
|  |  | 
|  | if (dev < 0) { | 
|  | pr_info("Please specify a valid mtd-device via module parameter\n"); | 
|  | pr_crit("CAREFUL: This test wipes all data on the specified MTD device!\n"); | 
|  | return -EINVAL; | 
|  | } | 
|  |  | 
|  | pr_info("MTD device: %d\n", dev); | 
|  |  | 
|  | mtd = get_mtd_device(NULL, dev); | 
|  | if (IS_ERR(mtd)) { | 
|  | err = PTR_ERR(mtd); | 
|  | pr_err("error: cannot get MTD device\n"); | 
|  | return err; | 
|  | } | 
|  |  | 
|  | if (!mtd_type_is_nand(mtd)) { | 
|  | pr_info("this test requires NAND flash\n"); | 
|  | goto out; | 
|  | } | 
|  |  | 
|  | subpgsize = mtd->writesize >> mtd->subpage_sft; | 
|  | tmp = mtd->size; | 
|  | do_div(tmp, mtd->erasesize); | 
|  | ebcnt = tmp; | 
|  | pgcnt = mtd->erasesize / mtd->writesize; | 
|  |  | 
|  | pr_info("MTD device size %llu, eraseblock size %u, " | 
|  | "page size %u, subpage size %u, count of eraseblocks %u, " | 
|  | "pages per eraseblock %u, OOB size %u\n", | 
|  | (unsigned long long)mtd->size, mtd->erasesize, | 
|  | mtd->writesize, subpgsize, ebcnt, pgcnt, mtd->oobsize); | 
|  |  | 
|  | err = -ENOMEM; | 
|  | bufsize = subpgsize * 32; | 
|  | writebuf = kmalloc(bufsize, GFP_KERNEL); | 
|  | if (!writebuf) | 
|  | goto out; | 
|  | readbuf = kmalloc(bufsize, GFP_KERNEL); | 
|  | if (!readbuf) | 
|  | goto out; | 
|  | bbt = kzalloc(ebcnt, GFP_KERNEL); | 
|  | if (!bbt) | 
|  | goto out; | 
|  |  | 
|  | err = mtdtest_scan_for_bad_eraseblocks(mtd, bbt, 0, ebcnt); | 
|  | if (err) | 
|  | goto out; | 
|  |  | 
|  | err = mtdtest_erase_good_eraseblocks(mtd, bbt, 0, ebcnt); | 
|  | if (err) | 
|  | goto out; | 
|  |  | 
|  | pr_info("writing whole device\n"); | 
|  | prandom_seed_state(&rnd_state, 1); | 
|  | for (i = 0; i < ebcnt; ++i) { | 
|  | if (bbt[i]) | 
|  | continue; | 
|  | err = write_eraseblock(i); | 
|  | if (unlikely(err)) | 
|  | goto out; | 
|  | if (i % 256 == 0) | 
|  | pr_info("written up to eraseblock %u\n", i); | 
|  |  | 
|  | err = mtdtest_relax(); | 
|  | if (err) | 
|  | goto out; | 
|  | } | 
|  | pr_info("written %u eraseblocks\n", i); | 
|  |  | 
|  | prandom_seed_state(&rnd_state, 1); | 
|  | pr_info("verifying all eraseblocks\n"); | 
|  | for (i = 0; i < ebcnt; ++i) { | 
|  | if (bbt[i]) | 
|  | continue; | 
|  | err = verify_eraseblock(i); | 
|  | if (unlikely(err)) | 
|  | goto out; | 
|  | if (i % 256 == 0) | 
|  | pr_info("verified up to eraseblock %u\n", i); | 
|  |  | 
|  | err = mtdtest_relax(); | 
|  | if (err) | 
|  | goto out; | 
|  | } | 
|  | pr_info("verified %u eraseblocks\n", i); | 
|  |  | 
|  | err = mtdtest_erase_good_eraseblocks(mtd, bbt, 0, ebcnt); | 
|  | if (err) | 
|  | goto out; | 
|  |  | 
|  | err = verify_all_eraseblocks_ff(); | 
|  | if (err) | 
|  | goto out; | 
|  |  | 
|  | /* Write all eraseblocks */ | 
|  | prandom_seed_state(&rnd_state, 3); | 
|  | pr_info("writing whole device\n"); | 
|  | for (i = 0; i < ebcnt; ++i) { | 
|  | if (bbt[i]) | 
|  | continue; | 
|  | err = write_eraseblock2(i); | 
|  | if (unlikely(err)) | 
|  | goto out; | 
|  | if (i % 256 == 0) | 
|  | pr_info("written up to eraseblock %u\n", i); | 
|  |  | 
|  | err = mtdtest_relax(); | 
|  | if (err) | 
|  | goto out; | 
|  | } | 
|  | pr_info("written %u eraseblocks\n", i); | 
|  |  | 
|  | /* Check all eraseblocks */ | 
|  | prandom_seed_state(&rnd_state, 3); | 
|  | pr_info("verifying all eraseblocks\n"); | 
|  | for (i = 0; i < ebcnt; ++i) { | 
|  | if (bbt[i]) | 
|  | continue; | 
|  | err = verify_eraseblock2(i); | 
|  | if (unlikely(err)) | 
|  | goto out; | 
|  | if (i % 256 == 0) | 
|  | pr_info("verified up to eraseblock %u\n", i); | 
|  |  | 
|  | err = mtdtest_relax(); | 
|  | if (err) | 
|  | goto out; | 
|  | } | 
|  | pr_info("verified %u eraseblocks\n", i); | 
|  |  | 
|  | err = mtdtest_erase_good_eraseblocks(mtd, bbt, 0, ebcnt); | 
|  | if (err) | 
|  | goto out; | 
|  |  | 
|  | err = verify_all_eraseblocks_ff(); | 
|  | if (err) | 
|  | goto out; | 
|  |  | 
|  | pr_info("finished with %d errors\n", errcnt); | 
|  |  | 
|  | out: | 
|  | kfree(bbt); | 
|  | kfree(readbuf); | 
|  | kfree(writebuf); | 
|  | put_mtd_device(mtd); | 
|  | if (err) | 
|  | pr_info("error %d occurred\n", err); | 
|  | printk(KERN_INFO "=================================================\n"); | 
|  | return err; | 
|  | } | 
|  | module_init(mtd_subpagetest_init); | 
|  |  | 
|  | static void __exit mtd_subpagetest_exit(void) | 
|  | { | 
|  | return; | 
|  | } | 
|  | module_exit(mtd_subpagetest_exit); | 
|  |  | 
|  | MODULE_DESCRIPTION("Subpage test module"); | 
|  | MODULE_AUTHOR("Adrian Hunter"); | 
|  | MODULE_LICENSE("GPL"); |