usr.sbin/nandtool/nand_erase.c

   1 /*-
   2  * Copyright (c) 2010-2012 Semihalf.
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  *
  14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  24  * SUCH DAMAGE.
  25  */
  26
  27 #include <sys/cdefs.h>
  28 __FBSDID("$FreeBSD$");
  29
  30 #include <stdio.h>
  31 #include <stdlib.h>
  32 #include <unistd.h>
  33 #include <sys/types.h>
  34 #include <sys/disk.h>
  35 #include <libgeom.h>
  36 #include <dev/nand/nand_dev.h>
  37 #include "nandtool.h"
  38
  39 int nand_erase(struct cmd_param *params)
  40 {
  41         struct chip_param_io chip_params;
  42         char *dev;
  43         int fd = -1, ret = 0;
  44         off_t pos, count;
  45         off_t start, nblocks, i;
  46         int block_size, mult;
  47
  48         if (!(dev = param_get_string(params, "dev"))) {
  49                 fprintf(stderr, "Please supply valid 'dev' parameter.\n");
  50                 return (1);
  51         }
  52
  53         if (param_has_value(params, "count"))
  54                 count = param_get_intx(params, "count");
  55         else
  56                 count = 1;
  57
  58         if ((fd = g_open(dev, 1)) < 0) {
  59                 perrorf("Cannot open %s", dev);
  60                 return (1);
  61         }
  62
  63         if (ioctl(fd, NAND_IO_GET_CHIP_PARAM, &chip_params) == -1) {
  64                 perrorf("Cannot ioctl(NAND_IO_GET_CHIP_PARAM)");
  65                 ret = 1;
  66                 goto out;
  67         }
  68
  69         block_size = chip_params.page_size * chip_params.pages_per_block;
  70
  71         if (param_has_value(params, "page")) {
  72                 pos = chip_params.page_size * param_get_intx(params, "page");
  73                 mult = chip_params.page_size;
  74         } else if (param_has_value(params, "block")) {
  75                 pos = block_size * param_get_intx(params, "block");
  76                 mult = block_size;
  77         } else if (param_has_value(params, "pos")) {
  78                 pos = param_get_intx(params, "pos");
  79                 mult = 1;
  80         } else {
  81                 /* Erase whole chip */
  82                 if (ioctl(fd, DIOCGMEDIASIZE, &count) == -1) {
  83                         ret = 1;
  84                         goto out;
  85                 }
  86
  87                 pos = 0;
  88                 mult = 1;
  89         }
  90
  91         if (pos % block_size) {
  92                 fprintf(stderr, "Position must be block-size aligned!\n");
  93                 ret = 1;
  94                 goto out;
  95         }
  96
  97         count *= mult;
  98         start = pos / block_size;
  99         nblocks = count / block_size;
 100
 101         for (i = 0; i < nblocks; i++) {
 102                 if (g_delete(fd, (start + i) * block_size, block_size) == -1) {
 103                         perrorf("Cannot erase block %d - probably a bad block",
 104                             start + i);
 105                         ret = 1;
 106                 }
 107         }
 108
 109 out:
 110         g_close(fd);
 111
 112         return (ret);
 113 }
 114