drivers/mtd/mtdpart.c

   1 /*
   2  * Simple MTD partitioning layer
   3  *
   4  * (C) 2000 Nicolas Pitre <nico@cam.org>
   5  *
   6  * This code is GPL
   7  *
   8  *      02-21-2002      Thomas Gleixner <gleixner@autronix.de>
   9  *                      added support for read_oob, write_oob
  10  */
  11
  12 #include <common.h>
  13 #include <malloc.h>
  14 #include <asm/errno.h>
  15
  16 #include <linux/types.h>
  17 #include <linux/list.h>
  18 #include <linux/mtd/mtd.h>
  19 #include <linux/mtd/partitions.h>
  20 #include <linux/mtd/compat.h>
  21
  22 /* Our partition linked list */
  23 struct list_head mtd_partitions;
  24
  25 /* Our partition node structure */
  26 struct mtd_part {
  27         struct mtd_info mtd;
  28         struct mtd_info *master;
  29         u_int32_t offset;
  30         int index;
  31         struct list_head list;
  32         int registered;
  33 };
  34
  35 /*
  36  * Given a pointer to the MTD object in the mtd_part structure, we can retrieve
  37  * the pointer to that structure with this macro.
  38  */
  39 #define PART(x)  ((struct mtd_part *)(x))
  40
  41
  42 /*
  43  * MTD methods which simply translate the effective address and pass through
  44  * to the _real_ device.
  45  */
  46
  47 static int part_read (struct mtd_info *mtd, loff_t from, size_t len,
  48                         size_t *retlen, u_char *buf)
  49 {
  50         struct mtd_part *part = PART(mtd);
  51         int res;
  52
  53         if (from >= mtd->size)
  54                 len = 0;
  55         else if (from + len > mtd->size)
  56                 len = mtd->size - from;
  57         res = part->master->read (part->master, from + part->offset,
  58                                    len, retlen, buf);
  59         if (unlikely(res)) {
  60                 if (res == -EUCLEAN)
  61                         mtd->ecc_stats.corrected++;
  62                 if (res == -EBADMSG)
  63                         mtd->ecc_stats.failed++;
  64         }
  65         return res;
  66 }
  67
  68 #ifdef MTD_LINUX
  69 static int part_point (struct mtd_info *mtd, loff_t from, size_t len,
  70                         size_t *retlen, void **virt, resource_size_t *phys)
  71 {
  72         struct mtd_part *part = PART(mtd);
  73         if (from >= mtd->size)
  74                 len = 0;
  75         else if (from + len > mtd->size)
  76                 len = mtd->size - from;
  77         return part->master->point (part->master, from + part->offset,
  78                                     len, retlen, virt, phys);
  79 }
  80
  81 static void part_unpoint(struct mtd_info *mtd, loff_t from, size_t len)
  82 {
  83         struct mtd_part *part = PART(mtd);
  84
  85         part->master->unpoint(part->master, from + part->offset, len);
  86 }
  87 #endif
  88
  89 static int part_read_oob(struct mtd_info *mtd, loff_t from,
  90                          struct mtd_oob_ops *ops)
  91 {
  92         struct mtd_part *part = PART(mtd);
  93         int res;
  94
  95         if (from >= mtd->size)
  96                 return -EINVAL;
  97         if (ops->datbuf && from + ops->len > mtd->size)
  98                 return -EINVAL;
  99         res = part->master->read_oob(part->master, from + part->offset, ops);
 100
 101         if (unlikely(res)) {
 102                 if (res == -EUCLEAN)
 103                         mtd->ecc_stats.corrected++;
 104                 if (res == -EBADMSG)
 105                         mtd->ecc_stats.failed++;
 106         }
 107         return res;
 108 }
 109
 110 static int part_read_user_prot_reg (struct mtd_info *mtd, loff_t from, size_t len,
 111                         size_t *retlen, u_char *buf)
 112 {
 113         struct mtd_part *part = PART(mtd);
 114         return part->master->read_user_prot_reg (part->master, from,
 115                                         len, retlen, buf);
 116 }
 117
 118 static int part_get_user_prot_info (struct mtd_info *mtd,
 119                                     struct otp_info *buf, size_t len)
 120 {
 121         struct mtd_part *part = PART(mtd);
 122         return part->master->get_user_prot_info (part->master, buf, len);
 123 }
 124
 125 static int part_read_fact_prot_reg (struct mtd_info *mtd, loff_t from, size_t len,
 126                         size_t *retlen, u_char *buf)
 127 {
 128         struct mtd_part *part = PART(mtd);
 129         return part->master->read_fact_prot_reg (part->master, from,
 130                                         len, retlen, buf);
 131 }
 132
 133 static int part_get_fact_prot_info (struct mtd_info *mtd,
 134                                     struct otp_info *buf, size_t len)
 135 {
 136         struct mtd_part *part = PART(mtd);
 137         return part->master->get_fact_prot_info (part->master, buf, len);
 138 }
 139
 140 static int part_write (struct mtd_info *mtd, loff_t to, size_t len,
 141                         size_t *retlen, const u_char *buf)
 142 {
 143         struct mtd_part *part = PART(mtd);
 144         if (!(mtd->flags & MTD_WRITEABLE))
 145                 return -EROFS;
 146         if (to >= mtd->size)
 147                 len = 0;
 148         else if (to + len > mtd->size)
 149                 len = mtd->size - to;
 150         return part->master->write (part->master, to + part->offset,
 151                                     len, retlen, buf);
 152 }
 153
 154 #ifdef MTD_LINUX
 155 static int part_panic_write (struct mtd_info *mtd, loff_t to, size_t len,
 156                         size_t *retlen, const u_char *buf)
 157 {
 158         struct mtd_part *part = PART(mtd);
 159         if (!(mtd->flags & MTD_WRITEABLE))
 160                 return -EROFS;
 161         if (to >= mtd->size)
 162                 len = 0;
 163         else if (to + len > mtd->size)
 164                 len = mtd->size - to;
 165         return part->master->panic_write (part->master, to + part->offset,
 166                                     len, retlen, buf);
 167 }
 168 #endif
 169
 170 static int part_write_oob(struct mtd_info *mtd, loff_t to,
 171                          struct mtd_oob_ops *ops)
 172 {
 173         struct mtd_part *part = PART(mtd);
 174
 175         if (!(mtd->flags & MTD_WRITEABLE))
 176                 return -EROFS;
 177
 178         if (to >= mtd->size)
 179                 return -EINVAL;
 180         if (ops->datbuf && to + ops->len > mtd->size)
 181                 return -EINVAL;
 182         return part->master->write_oob(part->master, to + part->offset, ops);
 183 }
 184
 185 static int part_write_user_prot_reg (struct mtd_info *mtd, loff_t from, size_t len,
 186                         size_t *retlen, u_char *buf)
 187 {
 188         struct mtd_part *part = PART(mtd);
 189         return part->master->write_user_prot_reg (part->master, from,
 190                                         len, retlen, buf);
 191 }
 192
 193 static int part_lock_user_prot_reg (struct mtd_info *mtd, loff_t from, size_t len)
 194 {
 195         struct mtd_part *part = PART(mtd);
 196         return part->master->lock_user_prot_reg (part->master, from, len);
 197 }
 198
 199 #ifdef MTD_LINUX
 200 static int part_writev (struct mtd_info *mtd,  const struct kvec *vecs,
 201                          unsigned long count, loff_t to, size_t *retlen)
 202 {
 203         struct mtd_part *part = PART(mtd);
 204         if (!(mtd->flags & MTD_WRITEABLE))
 205                 return -EROFS;
 206         return part->master->writev (part->master, vecs, count,
 207                                         to + part->offset, retlen);
 208 }
 209 #endif
 210
 211 static int part_erase (struct mtd_info *mtd, struct erase_info *instr)
 212 {
 213         struct mtd_part *part = PART(mtd);
 214         int ret;
 215         if (!(mtd->flags & MTD_WRITEABLE))
 216                 return -EROFS;
 217         if (instr->addr >= mtd->size)
 218                 return -EINVAL;
 219         instr->addr += part->offset;
 220         ret = part->master->erase(part->master, instr);
 221         if (ret) {
 222                 if (instr->fail_addr != 0xffffffff)
 223                         instr->fail_addr -= part->offset;
 224                 instr->addr -= part->offset;
 225         }
 226         return ret;
 227 }
 228
 229 void mtd_erase_callback(struct erase_info *instr)
 230 {
 231         if (instr->mtd->erase == part_erase) {
 232                 struct mtd_part *part = PART(instr->mtd);
 233
 234                 if (instr->fail_addr != 0xffffffff)
 235                         instr->fail_addr -= part->offset;
 236                 instr->addr -= part->offset;
 237         }
 238         if (instr->callback)
 239                 instr->callback(instr);
 240 }
 241 #ifdef MTD_LINUX
 242 EXPORT_SYMBOL_GPL(mtd_erase_callback);
 243 #endif
 244
 245 #ifdef MTD_LINUX
 246 static int part_lock (struct mtd_info *mtd, loff_t ofs, size_t len)
 247 {
 248         struct mtd_part *part = PART(mtd);
 249         if ((len + ofs) > mtd->size)
 250                 return -EINVAL;
 251         return part->master->lock(part->master, ofs + part->offset, len);
 252 }
 253
 254 static int part_unlock (struct mtd_info *mtd, loff_t ofs, size_t len)
 255 {
 256         struct mtd_part *part = PART(mtd);
 257         if ((len + ofs) > mtd->size)
 258                 return -EINVAL;
 259         return part->master->unlock(part->master, ofs + part->offset, len);
 260 }
 261 #endif
 262
 263 static void part_sync(struct mtd_info *mtd)
 264 {
 265         struct mtd_part *part = PART(mtd);
 266         part->master->sync(part->master);
 267 }
 268
 269 #ifdef MTD_LINUX
 270 static int part_suspend(struct mtd_info *mtd)
 271 {
 272         struct mtd_part *part = PART(mtd);
 273         return part->master->suspend(part->master);
 274 }
 275
 276 static void part_resume(struct mtd_info *mtd)
 277 {
 278         struct mtd_part *part = PART(mtd);
 279         part->master->resume(part->master);
 280 }
 281 #endif
 282
 283 static int part_block_isbad (struct mtd_info *mtd, loff_t ofs)
 284 {
 285         struct mtd_part *part = PART(mtd);
 286         if (ofs >= mtd->size)
 287                 return -EINVAL;
 288         ofs += part->offset;
 289         return part->master->block_isbad(part->master, ofs);
 290 }
 291
 292 static int part_block_markbad (struct mtd_info *mtd, loff_t ofs)
 293 {
 294         struct mtd_part *part = PART(mtd);
 295         int res;
 296
 297         if (!(mtd->flags & MTD_WRITEABLE))
 298                 return -EROFS;
 299         if (ofs >= mtd->size)
 300                 return -EINVAL;
 301         ofs += part->offset;
 302         res = part->master->block_markbad(part->master, ofs);
 303 #ifdef MTD_LINUX
 304         if (!res)
 305                 mtd->ecc_stats.badblocks++;
 306 #endif
 307         return res;
 308 }
 309
 310 /*
 311  * This function unregisters and destroy all slave MTD objects which are
 312  * attached to the given master MTD object.
 313  */
 314
 315 int del_mtd_partitions(struct mtd_info *master)
 316 {
 317         struct list_head *node;
 318         struct mtd_part *slave;
 319
 320         for (node = mtd_partitions.next;
 321              node != &mtd_partitions;
 322              node = node->next) {
 323                 slave = list_entry(node, struct mtd_part, list);
 324                 if (slave->master == master) {
 325                         struct list_head *prev = node->prev;
 326                         __list_del(prev, node->next);
 327                         if(slave->registered)
 328                                 del_mtd_device(&slave->mtd);
 329                         kfree(slave);
 330                         node = prev;
 331                 }
 332         }
 333
 334         return 0;
 335 }
 336
 337 /*
 338  * This function, given a master MTD object and a partition table, creates
 339  * and registers slave MTD objects which are bound to the master according to
 340  * the partition definitions.
 341  * (Q: should we register the master MTD object as well?)
 342  */
 343
 344 int add_mtd_partitions(struct mtd_info *master,
 345                        const struct mtd_partition *parts,
 346                        int nbparts)
 347 {
 348         struct mtd_part *slave;
 349         u_int32_t cur_offset = 0;
 350         int i;
 351
 352         /*
 353          * Need to init the list here, since LIST_INIT() does not
 354          * work on platforms where relocation has problems (like MIPS
 355          * & PPC).
 356          */
 357         if (mtd_partitions.next == NULL)
 358                 INIT_LIST_HEAD(&mtd_partitions);
 359
 360         printk (KERN_NOTICE "Creating %d MTD partitions on \"%s\":\n", nbparts, master->name);
 361
 362         for (i = 0; i < nbparts; i++) {
 363
 364                 /* allocate the partition structure */
 365                 slave = kzalloc (sizeof(*slave), GFP_KERNEL);
 366                 if (!slave) {
 367                         printk ("memory allocation error while creating partitions for \"%s\"\n",
 368                                 master->name);
 369                         del_mtd_partitions(master);
 370                         return -ENOMEM;
 371                 }
 372                 list_add(&slave->list, &mtd_partitions);
 373
 374                 /* set up the MTD object for this partition */
 375                 slave->mtd.type = master->type;
 376                 slave->mtd.flags = master->flags & ~parts[i].mask_flags;
 377                 slave->mtd.size = parts[i].size;
 378                 slave->mtd.writesize = master->writesize;
 379                 slave->mtd.oobsize = master->oobsize;
 380                 slave->mtd.oobavail = master->oobavail;
 381                 slave->mtd.subpage_sft = master->subpage_sft;
 382
 383                 slave->mtd.name = parts[i].name;
 384                 slave->mtd.owner = master->owner;
 385
 386                 slave->mtd.read = part_read;
 387                 slave->mtd.write = part_write;
 388
 389 #ifdef MTD_LINUX
 390                 if (master->panic_write)
 391                         slave->mtd.panic_write = part_panic_write;
 392
 393                 if(master->point && master->unpoint){
 394                         slave->mtd.point = part_point;
 395                         slave->mtd.unpoint = part_unpoint;
 396                 }
 397 #endif
 398
 399                 if (master->read_oob)
 400                         slave->mtd.read_oob = part_read_oob;
 401                 if (master->write_oob)
 402                         slave->mtd.write_oob = part_write_oob;
 403                 if(master->read_user_prot_reg)
 404                         slave->mtd.read_user_prot_reg = part_read_user_prot_reg;
 405                 if(master->read_fact_prot_reg)
 406                         slave->mtd.read_fact_prot_reg = part_read_fact_prot_reg;
 407                 if(master->write_user_prot_reg)
 408                         slave->mtd.write_user_prot_reg = part_write_user_prot_reg;
 409                 if(master->lock_user_prot_reg)
 410                         slave->mtd.lock_user_prot_reg = part_lock_user_prot_reg;
 411                 if(master->get_user_prot_info)
 412                         slave->mtd.get_user_prot_info = part_get_user_prot_info;
 413                 if(master->get_fact_prot_info)
 414                         slave->mtd.get_fact_prot_info = part_get_fact_prot_info;
 415                 if (master->sync)
 416                         slave->mtd.sync = part_sync;
 417 #ifdef MTD_LINUX
 418                 if (!i && master->suspend && master->resume) {
 419                                 slave->mtd.suspend = part_suspend;
 420                                 slave->mtd.resume = part_resume;
 421                 }
 422                 if (master->writev)
 423                         slave->mtd.writev = part_writev;
 424                 if (master->lock)
 425                         slave->mtd.lock = part_lock;
 426                 if (master->unlock)
 427                         slave->mtd.unlock = part_unlock;
 428 #endif
 429                 if (master->block_isbad)
 430                         slave->mtd.block_isbad = part_block_isbad;
 431                 if (master->block_markbad)
 432                         slave->mtd.block_markbad = part_block_markbad;
 433                 slave->mtd.erase = part_erase;
 434                 slave->master = master;
 435                 slave->offset = parts[i].offset;
 436                 slave->index = i;
 437
 438                 if (slave->offset == MTDPART_OFS_APPEND)
 439                         slave->offset = cur_offset;
 440                 if (slave->offset == MTDPART_OFS_NXTBLK) {
 441                         slave->offset = cur_offset;
 442                         if ((cur_offset % master->erasesize) != 0) {
 443                                 /* Round up to next erasesize */
 444                                 slave->offset = ((cur_offset / master->erasesize) + 1) * master->erasesize;
 445                                 printk(KERN_NOTICE "Moving partition %d: "
 446                                        "0x%08x -> 0x%08x\n", i,
 447                                        cur_offset, slave->offset);
 448                         }
 449                 }
 450                 if (slave->mtd.size == MTDPART_SIZ_FULL)
 451                         slave->mtd.size = master->size - slave->offset;
 452                 cur_offset = slave->offset + slave->mtd.size;
 453
 454                 printk (KERN_NOTICE "0x%08x-0x%08x : \"%s\"\n", slave->offset,
 455                         slave->offset + slave->mtd.size, slave->mtd.name);
 456
 457                 /* let's do some sanity checks */
 458                 if (slave->offset >= master->size) {
 459                                 /* let's register it anyway to preserve ordering */
 460                         slave->offset = 0;
 461                         slave->mtd.size = 0;
 462                         printk ("mtd: partition \"%s\" is out of reach -- disabled\n",
 463                                 parts[i].name);
 464                 }
 465                 if (slave->offset + slave->mtd.size > master->size) {
 466                         slave->mtd.size = master->size - slave->offset;
 467                         printk ("mtd: partition \"%s\" extends beyond the end of device \"%s\" -- size truncated to %#x\n",
 468                                 parts[i].name, master->name, slave->mtd.size);
 469                 }
 470                 if (master->numeraseregions>1) {
 471                         /* Deal with variable erase size stuff */
 472                         int i;
 473                         struct mtd_erase_region_info *regions = master->eraseregions;
 474
 475                         /* Find the first erase regions which is part of this partition. */
 476                         for (i=0; i < master->numeraseregions && slave->offset >= regions[i].offset; i++)
 477                                 ;
 478
 479                         for (i--; i < master->numeraseregions && slave->offset + slave->mtd.size > regions[i].offset; i++) {
 480                                 if (slave->mtd.erasesize < regions[i].erasesize) {
 481                                         slave->mtd.erasesize = regions[i].erasesize;
 482                                 }
 483                         }
 484                 } else {
 485                         /* Single erase size */
 486                         slave->mtd.erasesize = master->erasesize;
 487                 }
 488
 489                 if ((slave->mtd.flags & MTD_WRITEABLE) &&
 490                     (slave->offset % slave->mtd.erasesize)) {
 491                         /* Doesn't start on a boundary of major erase size */
 492                         /* FIXME: Let it be writable if it is on a boundary of _minor_ erase size though */
 493                         slave->mtd.flags &= ~MTD_WRITEABLE;
 494                         printk ("mtd: partition \"%s\" doesn't start on an erase block boundary -- force read-only\n",
 495                                 parts[i].name);
 496                 }
 497                 if ((slave->mtd.flags & MTD_WRITEABLE) &&
 498                     (slave->mtd.size % slave->mtd.erasesize)) {
 499                         slave->mtd.flags &= ~MTD_WRITEABLE;
 500                         printk ("mtd: partition \"%s\" doesn't end on an erase block -- force read-only\n",
 501                                 parts[i].name);
 502                 }
 503
 504                 slave->mtd.ecclayout = master->ecclayout;
 505                 if (master->block_isbad) {
 506                         uint32_t offs = 0;
 507
 508                         while(offs < slave->mtd.size) {
 509                                 if (master->block_isbad(master,
 510                                                         offs + slave->offset))
 511                                         slave->mtd.ecc_stats.badblocks++;
 512                                 offs += slave->mtd.erasesize;
 513                         }
 514                 }
 515
 516 #ifdef MTD_LINUX
 517                 if (parts[i].mtdp) {
 518                         /* store the object pointer
 519                          * (caller may or may not register it */
 520                         *parts[i].mtdp = &slave->mtd;
 521                         slave->registered = 0;
 522                 } else {
 523                         /* register our partition */
 524                         add_mtd_device(&slave->mtd);
 525                         slave->registered = 1;
 526                 }
 527 #else
 528                 /* register our partition */
 529                 add_mtd_device(&slave->mtd);
 530                 slave->registered = 1;
 531 #endif
 532         }
 533
 534         return 0;
 535 }
 536
 537 #ifdef MTD_LINUX
 538 EXPORT_SYMBOL(add_mtd_partitions);
 539 EXPORT_SYMBOL(del_mtd_partitions);
 540 #endif