git.oblomov.eu Git - linux-2.6/blob - drivers/mtd/ubi/eba.c

   1 /*
   2  * Copyright (c) International Business Machines Corp., 2006
   3  *
   4  * This program is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation; either version 2 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See
  12  * the GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program; if not, write to the Free Software
  16  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  17  *
  18  * Author: Artem Bityutskiy (Битюцкий Артём)
  19  */
  20
  21 /*
  22  * The UBI Eraseblock Association (EBA) unit.
  23  *
  24  * This unit is responsible for I/O to/from logical eraseblock.
  25  *
  26  * Although in this implementation the EBA table is fully kept and managed in
  27  * RAM, which assumes poor scalability, it might be (partially) maintained on
  28  * flash in future implementations.
  29  *
  30  * The EBA unit implements per-logical eraseblock locking. Before accessing a
  31  * logical eraseblock it is locked for reading or writing. The per-logical
  32  * eraseblock locking is implemented by means of the lock tree. The lock tree
  33  * is an RB-tree which refers all the currently locked logical eraseblocks. The
  34  * lock tree elements are &struct ltree_entry objects. They are indexed by
  35  * (@vol_id, @lnum) pairs.
  36  *
  37  * EBA also maintains the global sequence counter which is incremented each
  38  * time a logical eraseblock is mapped to a physical eraseblock and it is
  39  * stored in the volume identifier header. This means that each VID header has
  40  * a unique sequence number. The sequence number is only increased an we assume
  41  * 64 bits is enough to never overflow.
  42  */
  43
  44 #include <linux/slab.h>
  45 #include <linux/crc32.h>
  46 #include <linux/err.h>
  47 #include "ubi.h"
  48
  49 /* Number of physical eraseblocks reserved for atomic LEB change operation */
  50 #define EBA_RESERVED_PEBS 1
  51
  52 /**
  53  * struct ltree_entry - an entry in the lock tree.
  54  * @rb: links RB-tree nodes
  55  * @vol_id: volume ID of the locked logical eraseblock
  56  * @lnum: locked logical eraseblock number
  57  * @users: how many tasks are using this logical eraseblock or wait for it
  58  * @mutex: read/write mutex to implement read/write access serialization to
  59  * the (@vol_id, @lnum) logical eraseblock
  60  *
  61  * When a logical eraseblock is being locked - corresponding &struct ltree_entry
  62  * object is inserted to the lock tree (@ubi->ltree).
  63  */
  64 struct ltree_entry {
  65         struct rb_node rb;
  66         int vol_id;
  67         int lnum;
  68         int users;
  69         struct rw_semaphore mutex;
  70 };
  71
  72 /* Slab cache for lock-tree entries */
  73 static struct kmem_cache *ltree_slab;
  74
  75 /**
  76  * next_sqnum - get next sequence number.
  77  * @ubi: UBI device description object
  78  *
  79  * This function returns next sequence number to use, which is just the current
  80  * global sequence counter value. It also increases the global sequence
  81  * counter.
  82  */
  83 static unsigned long long next_sqnum(struct ubi_device *ubi)
  84 {
  85         unsigned long long sqnum;
  86
  87         spin_lock(&ubi->ltree_lock);
  88         sqnum = ubi->global_sqnum++;
  89         spin_unlock(&ubi->ltree_lock);
  90
  91         return sqnum;
  92 }
  93
  94 /**
  95  * ubi_get_compat - get compatibility flags of a volume.
  96  * @ubi: UBI device description object
  97  * @vol_id: volume ID
  98  *
  99  * This function returns compatibility flags for an internal volume. User
 100  * volumes have no compatibility flags, so %0 is returned.
 101  */
 102 static int ubi_get_compat(const struct ubi_device *ubi, int vol_id)
 103 {
 104         if (vol_id == UBI_LAYOUT_VOL_ID)
 105                 return UBI_LAYOUT_VOLUME_COMPAT;
 106         return 0;
 107 }
 108
 109 /**
 110  * ltree_lookup - look up the lock tree.
 111  * @ubi: UBI device description object
 112  * @vol_id: volume ID
 113  * @lnum: logical eraseblock number
 114  *
 115  * This function returns a pointer to the corresponding &struct ltree_entry
 116  * object if the logical eraseblock is locked and %NULL if it is not.
 117  * @ubi->ltree_lock has to be locked.
 118  */
 119 static struct ltree_entry *ltree_lookup(struct ubi_device *ubi, int vol_id,
 120                                         int lnum)
 121 {
 122         struct rb_node *p;
 123
 124         p = ubi->ltree.rb_node;
 125         while (p) {
 126                 struct ltree_entry *le;
 127
 128                 le = rb_entry(p, struct ltree_entry, rb);
 129
 130                 if (vol_id < le->vol_id)
 131                         p = p->rb_left;
 132                 else if (vol_id > le->vol_id)
 133                         p = p->rb_right;
 134                 else {
 135                         if (lnum < le->lnum)
 136                                 p = p->rb_left;
 137                         else if (lnum > le->lnum)
 138                                 p = p->rb_right;
 139                         else
 140                                 return le;
 141                 }
 142         }
 143
 144         return NULL;
 145 }
 146
 147 /**
 148  * ltree_add_entry - add new entry to the lock tree.
 149  * @ubi: UBI device description object
 150  * @vol_id: volume ID
 151  * @lnum: logical eraseblock number
 152  *
 153  * This function adds new entry for logical eraseblock (@vol_id, @lnum) to the
 154  * lock tree. If such entry is already there, its usage counter is increased.
 155  * Returns pointer to the lock tree entry or %-ENOMEM if memory allocation
 156  * failed.
 157  */
 158 static struct ltree_entry *ltree_add_entry(struct ubi_device *ubi, int vol_id,
 159                                            int lnum)
 160 {
 161         struct ltree_entry *le, *le1, *le_free;
 162
 163         le = kmem_cache_alloc(ltree_slab, GFP_NOFS);
 164         if (!le)
 165                 return ERR_PTR(-ENOMEM);
 166
 167         le->vol_id = vol_id;
 168         le->lnum = lnum;
 169
 170         spin_lock(&ubi->ltree_lock);
 171         le1 = ltree_lookup(ubi, vol_id, lnum);
 172
 173         if (le1) {
 174                 /*
 175                  * This logical eraseblock is already locked. The newly
 176                  * allocated lock entry is not needed.
 177                  */
 178                 le_free = le;
 179                 le = le1;
 180         } else {
 181                 struct rb_node **p, *parent = NULL;
 182
 183                 /*
 184                  * No lock entry, add the newly allocated one to the
 185                  * @ubi->ltree RB-tree.
 186                  */
 187                 le_free = NULL;
 188
 189                 p = &ubi->ltree.rb_node;
 190                 while (*p) {
 191                         parent = *p;
 192                         le1 = rb_entry(parent, struct ltree_entry, rb);
 193
 194                         if (vol_id < le1->vol_id)
 195                                 p = &(*p)->rb_left;
 196                         else if (vol_id > le1->vol_id)
 197                                 p = &(*p)->rb_right;
 198                         else {
 199                                 ubi_assert(lnum != le1->lnum);
 200                                 if (lnum < le1->lnum)
 201                                         p = &(*p)->rb_left;
 202                                 else
 203                                         p = &(*p)->rb_right;
 204                         }
 205                 }
 206
 207                 rb_link_node(&le->rb, parent, p);
 208                 rb_insert_color(&le->rb, &ubi->ltree);
 209         }
 210         le->users += 1;
 211         spin_unlock(&ubi->ltree_lock);
 212
 213         if (le_free)
 214                 kmem_cache_free(ltree_slab, le_free);
 215
 216         return le;
 217 }
 218
 219 /**
 220  * leb_read_lock - lock logical eraseblock for reading.
 221  * @ubi: UBI device description object
 222  * @vol_id: volume ID
 223  * @lnum: logical eraseblock number
 224  *
 225  * This function locks a logical eraseblock for reading. Returns zero in case
 226  * of success and a negative error code in case of failure.
 227  */
 228 static int leb_read_lock(struct ubi_device *ubi, int vol_id, int lnum)
 229 {
 230         struct ltree_entry *le;
 231
 232         le = ltree_add_entry(ubi, vol_id, lnum);
 233         if (IS_ERR(le))
 234                 return PTR_ERR(le);
 235         down_read(&le->mutex);
 236         return 0;
 237 }
 238
 239 /**
 240  * leb_read_unlock - unlock logical eraseblock.
 241  * @ubi: UBI device description object
 242  * @vol_id: volume ID
 243  * @lnum: logical eraseblock number
 244  */
 245 static void leb_read_unlock(struct ubi_device *ubi, int vol_id, int lnum)
 246 {
 247         int free = 0;
 248         struct ltree_entry *le;
 249
 250         spin_lock(&ubi->ltree_lock);
 251         le = ltree_lookup(ubi, vol_id, lnum);
 252         le->users -= 1;
 253         ubi_assert(le->users >= 0);
 254         if (le->users == 0) {
 255                 rb_erase(&le->rb, &ubi->ltree);
 256                 free = 1;
 257         }
 258         spin_unlock(&ubi->ltree_lock);
 259
 260         up_read(&le->mutex);
 261         if (free)
 262                 kmem_cache_free(ltree_slab, le);
 263 }
 264
 265 /**
 266  * leb_write_lock - lock logical eraseblock for writing.
 267  * @ubi: UBI device description object
 268  * @vol_id: volume ID
 269  * @lnum: logical eraseblock number
 270  *
 271  * This function locks a logical eraseblock for writing. Returns zero in case
 272  * of success and a negative error code in case of failure.
 273  */
 274 static int leb_write_lock(struct ubi_device *ubi, int vol_id, int lnum)
 275 {
 276         struct ltree_entry *le;
 277
 278         le = ltree_add_entry(ubi, vol_id, lnum);
 279         if (IS_ERR(le))
 280                 return PTR_ERR(le);
 281         down_write(&le->mutex);
 282         return 0;
 283 }
 284
 285 /**
 286  * leb_write_unlock - unlock logical eraseblock.
 287  * @ubi: UBI device description object
 288  * @vol_id: volume ID
 289  * @lnum: logical eraseblock number
 290  */
 291 static void leb_write_unlock(struct ubi_device *ubi, int vol_id, int lnum)
 292 {
 293         int free;
 294         struct ltree_entry *le;
 295
 296         spin_lock(&ubi->ltree_lock);
 297         le = ltree_lookup(ubi, vol_id, lnum);
 298         le->users -= 1;
 299         ubi_assert(le->users >= 0);
 300         if (le->users == 0) {
 301                 rb_erase(&le->rb, &ubi->ltree);
 302                 free = 1;
 303         } else
 304                 free = 0;
 305         spin_unlock(&ubi->ltree_lock);
 306
 307         up_write(&le->mutex);
 308         if (free)
 309                 kmem_cache_free(ltree_slab, le);
 310 }
 311
 312 /**
 313  * ubi_eba_unmap_leb - un-map logical eraseblock.
 314  * @ubi: UBI device description object
 315  * @vol_id: volume ID
 316  * @lnum: logical eraseblock number
 317  *
 318  * This function un-maps logical eraseblock @lnum and schedules corresponding
 319  * physical eraseblock for erasure. Returns zero in case of success and a
 320  * negative error code in case of failure.
 321  */
 322 int ubi_eba_unmap_leb(struct ubi_device *ubi, int vol_id, int lnum)
 323 {
 324         int idx = vol_id2idx(ubi, vol_id), err, pnum;
 325         struct ubi_volume *vol = ubi->volumes[idx];
 326
 327         if (ubi->ro_mode)
 328                 return -EROFS;
 329
 330         err = leb_write_lock(ubi, vol_id, lnum);
 331         if (err)
 332                 return err;
 333
 334         pnum = vol->eba_tbl[lnum];
 335         if (pnum < 0)
 336                 /* This logical eraseblock is already unmapped */
 337                 goto out_unlock;
 338
 339         dbg_eba("erase LEB %d:%d, PEB %d", vol_id, lnum, pnum);
 340
 341         vol->eba_tbl[lnum] = UBI_LEB_UNMAPPED;
 342         err = ubi_wl_put_peb(ubi, pnum, 0);
 343
 344 out_unlock:
 345         leb_write_unlock(ubi, vol_id, lnum);
 346         return err;
 347 }
 348
 349 /**
 350  * ubi_eba_read_leb - read data.
 351  * @ubi: UBI device description object
 352  * @vol_id: volume ID
 353  * @lnum: logical eraseblock number
 354  * @buf: buffer to store the read data
 355  * @offset: offset from where to read
 356  * @len: how many bytes to read
 357  * @check: data CRC check flag
 358  *
 359  * If the logical eraseblock @lnum is unmapped, @buf is filled with 0xFF
 360  * bytes. The @check flag only makes sense for static volumes and forces
 361  * eraseblock data CRC checking.
 362  *
 363  * In case of success this function returns zero. In case of a static volume,
 364  * if data CRC mismatches - %-EBADMSG is returned. %-EBADMSG may also be
 365  * returned for any volume type if an ECC error was detected by the MTD device
 366  * driver. Other negative error cored may be returned in case of other errors.
 367  */
 368 int ubi_eba_read_leb(struct ubi_device *ubi, int vol_id, int lnum, void *buf,
 369                      int offset, int len, int check)
 370 {
 371         int err, pnum, scrub = 0, idx = vol_id2idx(ubi, vol_id);
 372         struct ubi_vid_hdr *vid_hdr;
 373         struct ubi_volume *vol = ubi->volumes[idx];
 374         uint32_t uninitialized_var(crc);
 375
 376         err = leb_read_lock(ubi, vol_id, lnum);
 377         if (err)
 378                 return err;
 379
 380         pnum = vol->eba_tbl[lnum];
 381         if (pnum < 0) {
 382                 /*
 383                  * The logical eraseblock is not mapped, fill the whole buffer
 384                  * with 0xFF bytes. The exception is static volumes for which
 385                  * it is an error to read unmapped logical eraseblocks.
 386                  */
 387                 dbg_eba("read %d bytes from offset %d of LEB %d:%d (unmapped)",
 388                         len, offset, vol_id, lnum);
 389                 leb_read_unlock(ubi, vol_id, lnum);
 390                 ubi_assert(vol->vol_type != UBI_STATIC_VOLUME);
 391                 memset(buf, 0xFF, len);
 392                 return 0;
 393         }
 394
 395         dbg_eba("read %d bytes from offset %d of LEB %d:%d, PEB %d",
 396                 len, offset, vol_id, lnum, pnum);
 397
 398         if (vol->vol_type == UBI_DYNAMIC_VOLUME)
 399                 check = 0;
 400
 401 retry:
 402         if (check) {
 403                 vid_hdr = ubi_zalloc_vid_hdr(ubi, GFP_NOFS);
 404                 if (!vid_hdr) {
 405                         err = -ENOMEM;
 406                         goto out_unlock;
 407                 }
 408
 409                 err = ubi_io_read_vid_hdr(ubi, pnum, vid_hdr, 1);
 410                 if (err && err != UBI_IO_BITFLIPS) {
 411                         if (err > 0) {
 412                                 /*
 413                                  * The header is either absent or corrupted.
 414                                  * The former case means there is a bug -
 415                                  * switch to read-only mode just in case.
 416                                  * The latter case means a real corruption - we
 417                                  * may try to recover data. FIXME: but this is
 418                                  * not implemented.
 419                                  */
 420                                 if (err == UBI_IO_BAD_VID_HDR) {
 421                                         ubi_warn("bad VID header at PEB %d, LEB"
 422                                                  "%d:%d", pnum, vol_id, lnum);
 423                                         err = -EBADMSG;
 424                                 } else
 425                                         ubi_ro_mode(ubi);
 426                         }
 427                         goto out_free;
 428                 } else if (err == UBI_IO_BITFLIPS)
 429                         scrub = 1;
 430
 431                 ubi_assert(lnum < be32_to_cpu(vid_hdr->used_ebs));
 432                 ubi_assert(len == be32_to_cpu(vid_hdr->data_size));
 433
 434                 crc = be32_to_cpu(vid_hdr->data_crc);
 435                 ubi_free_vid_hdr(ubi, vid_hdr);
 436         }
 437
 438         err = ubi_io_read_data(ubi, buf, pnum, offset, len);
 439         if (err) {
 440                 if (err == UBI_IO_BITFLIPS) {
 441                         scrub = 1;
 442                         err = 0;
 443                 } else if (err == -EBADMSG) {
 444                         if (vol->vol_type == UBI_DYNAMIC_VOLUME)
 445                                 goto out_unlock;
 446                         scrub = 1;
 447                         if (!check) {
 448                                 ubi_msg("force data checking");
 449                                 check = 1;
 450                                 goto retry;
 451                         }
 452                 } else
 453                         goto out_unlock;
 454         }
 455
 456         if (check) {
 457                 uint32_t crc1 = crc32(UBI_CRC32_INIT, buf, len);
 458                 if (crc1 != crc) {
 459                         ubi_warn("CRC error: calculated %#08x, must be %#08x",
 460                                  crc1, crc);
 461                         err = -EBADMSG;
 462                         goto out_unlock;
 463                 }
 464         }
 465
 466         if (scrub)
 467                 err = ubi_wl_scrub_peb(ubi, pnum);
 468
 469         leb_read_unlock(ubi, vol_id, lnum);
 470         return err;
 471
 472 out_free:
 473         ubi_free_vid_hdr(ubi, vid_hdr);
 474 out_unlock:
 475         leb_read_unlock(ubi, vol_id, lnum);
 476         return err;
 477 }
 478
 479 /**
 480  * recover_peb - recover from write failure.
 481  * @ubi: UBI device description object
 482  * @pnum: the physical eraseblock to recover
 483  * @vol_id: volume ID
 484  * @lnum: logical eraseblock number
 485  * @buf: data which was not written because of the write failure
 486  * @offset: offset of the failed write
 487  * @len: how many bytes should have been written
 488  *
 489  * This function is called in case of a write failure and moves all good data
 490  * from the potentially bad physical eraseblock to a good physical eraseblock.
 491  * This function also writes the data which was not written due to the failure.
 492  * Returns new physical eraseblock number in case of success, and a negative
 493  * error code in case of failure.
 494  */
 495 static int recover_peb(struct ubi_device *ubi, int pnum, int vol_id, int lnum,
 496                        const void *buf, int offset, int len)
 497 {
 498         int err, idx = vol_id2idx(ubi, vol_id), new_pnum, data_size, tries = 0;
 499         struct ubi_volume *vol = ubi->volumes[idx];
 500         struct ubi_vid_hdr *vid_hdr;
 501
 502         vid_hdr = ubi_zalloc_vid_hdr(ubi, GFP_NOFS);
 503         if (!vid_hdr) {
 504                 return -ENOMEM;
 505         }
 506
 507         mutex_lock(&ubi->buf_mutex);
 508
 509 retry:
 510         new_pnum = ubi_wl_get_peb(ubi, UBI_UNKNOWN);
 511         if (new_pnum < 0) {
 512                 mutex_unlock(&ubi->buf_mutex);
 513                 ubi_free_vid_hdr(ubi, vid_hdr);
 514                 return new_pnum;
 515         }
 516
 517         ubi_msg("recover PEB %d, move data to PEB %d", pnum, new_pnum);
 518
 519         err = ubi_io_read_vid_hdr(ubi, pnum, vid_hdr, 1);
 520         if (err && err != UBI_IO_BITFLIPS) {
 521                 if (err > 0)
 522                         err = -EIO;
 523                 goto out_put;
 524         }
 525
 526         vid_hdr->sqnum = cpu_to_be64(next_sqnum(ubi));
 527         err = ubi_io_write_vid_hdr(ubi, new_pnum, vid_hdr);
 528         if (err)
 529                 goto write_error;
 530
 531         data_size = offset + len;
 532         memset(ubi->peb_buf1 + offset, 0xFF, len);
 533
 534         /* Read everything before the area where the write failure happened */
 535         if (offset > 0) {
 536                 err = ubi_io_read_data(ubi, ubi->peb_buf1, pnum, 0, offset);
 537                 if (err && err != UBI_IO_BITFLIPS)
 538                         goto out_put;
 539         }
 540
 541         memcpy(ubi->peb_buf1 + offset, buf, len);
 542
 543         err = ubi_io_write_data(ubi, ubi->peb_buf1, new_pnum, 0, data_size);
 544         if (err)
 545                 goto write_error;
 546
 547         mutex_unlock(&ubi->buf_mutex);
 548         ubi_free_vid_hdr(ubi, vid_hdr);
 549
 550         vol->eba_tbl[lnum] = new_pnum;
 551         ubi_wl_put_peb(ubi, pnum, 1);
 552
 553         ubi_msg("data was successfully recovered");
 554         return 0;
 555
 556 out_put:
 557         mutex_unlock(&ubi->buf_mutex);
 558         ubi_wl_put_peb(ubi, new_pnum, 1);
 559         ubi_free_vid_hdr(ubi, vid_hdr);
 560         return err;
 561
 562 write_error:
 563         /*
 564          * Bad luck? This physical eraseblock is bad too? Crud. Let's try to
 565          * get another one.
 566          */
 567         ubi_warn("failed to write to PEB %d", new_pnum);
 568         ubi_wl_put_peb(ubi, new_pnum, 1);
 569         if (++tries > UBI_IO_RETRIES) {
 570                 mutex_unlock(&ubi->buf_mutex);
 571                 ubi_free_vid_hdr(ubi, vid_hdr);
 572                 return err;
 573         }
 574         ubi_msg("try again");
 575         goto retry;
 576 }
 577
 578 /**
 579  * ubi_eba_write_leb - write data to dynamic volume.
 580  * @ubi: UBI device description object
 581  * @vol_id: volume ID
 582  * @lnum: logical eraseblock number
 583  * @buf: the data to write
 584  * @offset: offset within the logical eraseblock where to write
 585  * @len: how many bytes to write
 586  * @dtype: data type
 587  *
 588  * This function writes data to logical eraseblock @lnum of a dynamic volume
 589  * @vol_id. Returns zero in case of success and a negative error code in case
 590  * of failure. In case of error, it is possible that something was still
 591  * written to the flash media, but may be some garbage.
 592  */
 593 int ubi_eba_write_leb(struct ubi_device *ubi, int vol_id, int lnum,
 594                       const void *buf, int offset, int len, int dtype)
 595 {
 596         int idx = vol_id2idx(ubi, vol_id), err, pnum, tries = 0;
 597         struct ubi_volume *vol = ubi->volumes[idx];
 598         struct ubi_vid_hdr *vid_hdr;
 599
 600         if (ubi->ro_mode)
 601                 return -EROFS;
 602
 603         err = leb_write_lock(ubi, vol_id, lnum);
 604         if (err)
 605                 return err;
 606
 607         pnum = vol->eba_tbl[lnum];
 608         if (pnum >= 0) {
 609                 dbg_eba("write %d bytes at offset %d of LEB %d:%d, PEB %d",
 610                         len, offset, vol_id, lnum, pnum);
 611
 612                 err = ubi_io_write_data(ubi, buf, pnum, offset, len);
 613                 if (err) {
 614                         ubi_warn("failed to write data to PEB %d", pnum);
 615                         if (err == -EIO && ubi->bad_allowed)
 616                                 err = recover_peb(ubi, pnum, vol_id, lnum, buf, offset, len);
 617                         if (err)
 618                                 ubi_ro_mode(ubi);
 619                 }
 620                 leb_write_unlock(ubi, vol_id, lnum);
 621                 return err;
 622         }
 623
 624         /*
 625          * The logical eraseblock is not mapped. We have to get a free physical
 626          * eraseblock and write the volume identifier header there first.
 627          */
 628         vid_hdr = ubi_zalloc_vid_hdr(ubi, GFP_NOFS);
 629         if (!vid_hdr) {
 630                 leb_write_unlock(ubi, vol_id, lnum);
 631                 return -ENOMEM;
 632         }
 633
 634         vid_hdr->vol_type = UBI_VID_DYNAMIC;
 635         vid_hdr->sqnum = cpu_to_be64(next_sqnum(ubi));
 636         vid_hdr->vol_id = cpu_to_be32(vol_id);
 637         vid_hdr->lnum = cpu_to_be32(lnum);
 638         vid_hdr->compat = ubi_get_compat(ubi, vol_id);
 639         vid_hdr->data_pad = cpu_to_be32(vol->data_pad);
 640
 641 retry:
 642         pnum = ubi_wl_get_peb(ubi, dtype);
 643         if (pnum < 0) {
 644                 ubi_free_vid_hdr(ubi, vid_hdr);
 645                 leb_write_unlock(ubi, vol_id, lnum);
 646                 return pnum;
 647         }
 648
 649         dbg_eba("write VID hdr and %d bytes at offset %d of LEB %d:%d, PEB %d",
 650                 len, offset, vol_id, lnum, pnum);
 651
 652         err = ubi_io_write_vid_hdr(ubi, pnum, vid_hdr);
 653         if (err) {
 654                 ubi_warn("failed to write VID header to LEB %d:%d, PEB %d",
 655                          vol_id, lnum, pnum);
 656                 goto write_error;
 657         }
 658
 659         if (len) {
 660                 err = ubi_io_write_data(ubi, buf, pnum, offset, len);
 661                 if (err) {
 662                         ubi_warn("failed to write %d bytes at offset %d of "
 663                                  "LEB %d:%d, PEB %d", len, offset, vol_id,
 664                                  lnum, pnum);
 665                         goto write_error;
 666                 }
 667         }
 668
 669         vol->eba_tbl[lnum] = pnum;
 670
 671         leb_write_unlock(ubi, vol_id, lnum);
 672         ubi_free_vid_hdr(ubi, vid_hdr);
 673         return 0;
 674
 675 write_error:
 676         if (err != -EIO || !ubi->bad_allowed) {
 677                 ubi_ro_mode(ubi);
 678                 leb_write_unlock(ubi, vol_id, lnum);
 679                 ubi_free_vid_hdr(ubi, vid_hdr);
 680                 return err;
 681         }
 682
 683         /*
 684          * Fortunately, this is the first write operation to this physical
 685          * eraseblock, so just put it and request a new one. We assume that if
 686          * this physical eraseblock went bad, the erase code will handle that.
 687          */
 688         err = ubi_wl_put_peb(ubi, pnum, 1);
 689         if (err || ++tries > UBI_IO_RETRIES) {
 690                 ubi_ro_mode(ubi);
 691                 leb_write_unlock(ubi, vol_id, lnum);
 692                 ubi_free_vid_hdr(ubi, vid_hdr);
 693                 return err;
 694         }
 695
 696         vid_hdr->sqnum = cpu_to_be64(next_sqnum(ubi));
 697         ubi_msg("try another PEB");
 698         goto retry;
 699 }
 700
 701 /**
 702  * ubi_eba_write_leb_st - write data to static volume.
 703  * @ubi: UBI device description object
 704  * @vol_id: volume ID
 705  * @lnum: logical eraseblock number
 706  * @buf: data to write
 707  * @len: how many bytes to write
 708  * @dtype: data type
 709  * @used_ebs: how many logical eraseblocks will this volume contain
 710  *
 711  * This function writes data to logical eraseblock @lnum of static volume
 712  * @vol_id. The @used_ebs argument should contain total number of logical
 713  * eraseblock in this static volume.
 714  *
 715  * When writing to the last logical eraseblock, the @len argument doesn't have
 716  * to be aligned to the minimal I/O unit size. Instead, it has to be equivalent
 717  * to the real data size, although the @buf buffer has to contain the
 718  * alignment. In all other cases, @len has to be aligned.
 719  *
 720  * It is prohibited to write more then once to logical eraseblocks of static
 721  * volumes. This function returns zero in case of success and a negative error
 722  * code in case of failure.
 723  */
 724 int ubi_eba_write_leb_st(struct ubi_device *ubi, int vol_id, int lnum,
 725                          const void *buf, int len, int dtype, int used_ebs)
 726 {
 727         int err, pnum, tries = 0, data_size = len;
 728         int idx = vol_id2idx(ubi, vol_id);
 729         struct ubi_volume *vol = ubi->volumes[idx];
 730         struct ubi_vid_hdr *vid_hdr;
 731         uint32_t crc;
 732
 733         if (ubi->ro_mode)
 734                 return -EROFS;
 735
 736         if (lnum == used_ebs - 1)
 737                 /* If this is the last LEB @len may be unaligned */
 738                 len = ALIGN(data_size, ubi->min_io_size);
 739         else
 740                 ubi_assert(len % ubi->min_io_size == 0);
 741
 742         vid_hdr = ubi_zalloc_vid_hdr(ubi, GFP_NOFS);
 743         if (!vid_hdr)
 744                 return -ENOMEM;
 745
 746         err = leb_write_lock(ubi, vol_id, lnum);
 747         if (err) {
 748                 ubi_free_vid_hdr(ubi, vid_hdr);
 749                 return err;
 750         }
 751
 752         vid_hdr->sqnum = cpu_to_be64(next_sqnum(ubi));
 753         vid_hdr->vol_id = cpu_to_be32(vol_id);
 754         vid_hdr->lnum = cpu_to_be32(lnum);
 755         vid_hdr->compat = ubi_get_compat(ubi, vol_id);
 756         vid_hdr->data_pad = cpu_to_be32(vol->data_pad);
 757
 758         crc = crc32(UBI_CRC32_INIT, buf, data_size);
 759         vid_hdr->vol_type = UBI_VID_STATIC;
 760         vid_hdr->data_size = cpu_to_be32(data_size);
 761         vid_hdr->used_ebs = cpu_to_be32(used_ebs);
 762         vid_hdr->data_crc = cpu_to_be32(crc);
 763
 764 retry:
 765         pnum = ubi_wl_get_peb(ubi, dtype);
 766         if (pnum < 0) {
 767                 ubi_free_vid_hdr(ubi, vid_hdr);
 768                 leb_write_unlock(ubi, vol_id, lnum);
 769                 return pnum;
 770         }
 771
 772         dbg_eba("write VID hdr and %d bytes at LEB %d:%d, PEB %d, used_ebs %d",
 773                 len, vol_id, lnum, pnum, used_ebs);
 774
 775         err = ubi_io_write_vid_hdr(ubi, pnum, vid_hdr);
 776         if (err) {
 777                 ubi_warn("failed to write VID header to LEB %d:%d, PEB %d",
 778                          vol_id, lnum, pnum);
 779                 goto write_error;
 780         }
 781
 782         err = ubi_io_write_data(ubi, buf, pnum, 0, len);
 783         if (err) {
 784                 ubi_warn("failed to write %d bytes of data to PEB %d",
 785                          len, pnum);
 786                 goto write_error;
 787         }
 788
 789         ubi_assert(vol->eba_tbl[lnum] < 0);
 790         vol->eba_tbl[lnum] = pnum;
 791
 792         leb_write_unlock(ubi, vol_id, lnum);
 793         ubi_free_vid_hdr(ubi, vid_hdr);
 794         return 0;
 795
 796 write_error:
 797         if (err != -EIO || !ubi->bad_allowed) {
 798                 /*
 799                  * This flash device does not admit of bad eraseblocks or
 800                  * something nasty and unexpected happened. Switch to read-only
 801                  * mode just in case.
 802                  */
 803                 ubi_ro_mode(ubi);
 804                 leb_write_unlock(ubi, vol_id, lnum);
 805                 ubi_free_vid_hdr(ubi, vid_hdr);
 806                 return err;
 807         }
 808
 809         err = ubi_wl_put_peb(ubi, pnum, 1);
 810         if (err || ++tries > UBI_IO_RETRIES) {
 811                 ubi_ro_mode(ubi);
 812                 leb_write_unlock(ubi, vol_id, lnum);
 813                 ubi_free_vid_hdr(ubi, vid_hdr);
 814                 return err;
 815         }
 816
 817         vid_hdr->sqnum = cpu_to_be64(next_sqnum(ubi));
 818         ubi_msg("try another PEB");
 819         goto retry;
 820 }
 821
 822 /*
 823  * ubi_eba_atomic_leb_change - change logical eraseblock atomically.
 824  * @ubi: UBI device description object
 825  * @vol_id: volume ID
 826  * @lnum: logical eraseblock number
 827  * @buf: data to write
 828  * @len: how many bytes to write
 829  * @dtype: data type
 830  *
 831  * This function changes the contents of a logical eraseblock atomically. @buf
 832  * has to contain new logical eraseblock data, and @len - the length of the
 833  * data, which has to be aligned. This function guarantees that in case of an
 834  * unclean reboot the old contents is preserved. Returns zero in case of
 835  * success and a negative error code in case of failure.
 836  *
 837  * UBI reserves one LEB for the "atomic LEB change" operation, so only one
 838  * LEB change may be done at a time. This is ensured by @ubi->alc_mutex.
 839  */
 840 int ubi_eba_atomic_leb_change(struct ubi_device *ubi, int vol_id, int lnum,
 841                               const void *buf, int len, int dtype)
 842 {
 843         int err, pnum, tries = 0, idx = vol_id2idx(ubi, vol_id);
 844         struct ubi_volume *vol = ubi->volumes[idx];
 845         struct ubi_vid_hdr *vid_hdr;
 846         uint32_t crc;
 847
 848         if (ubi->ro_mode)
 849                 return -EROFS;
 850
 851         vid_hdr = ubi_zalloc_vid_hdr(ubi, GFP_NOFS);
 852         if (!vid_hdr)
 853                 return -ENOMEM;
 854
 855         mutex_lock(&ubi->alc_mutex);
 856         err = leb_write_lock(ubi, vol_id, lnum);
 857         if (err)
 858                 goto out_mutex;
 859
 860         vid_hdr->sqnum = cpu_to_be64(next_sqnum(ubi));
 861         vid_hdr->vol_id = cpu_to_be32(vol_id);
 862         vid_hdr->lnum = cpu_to_be32(lnum);
 863         vid_hdr->compat = ubi_get_compat(ubi, vol_id);
 864         vid_hdr->data_pad = cpu_to_be32(vol->data_pad);
 865
 866         crc = crc32(UBI_CRC32_INIT, buf, len);
 867         vid_hdr->vol_type = UBI_VID_DYNAMIC;
 868         vid_hdr->data_size = cpu_to_be32(len);
 869         vid_hdr->copy_flag = 1;
 870         vid_hdr->data_crc = cpu_to_be32(crc);
 871
 872 retry:
 873         pnum = ubi_wl_get_peb(ubi, dtype);
 874         if (pnum < 0) {
 875                 err = pnum;
 876                 goto out_leb_unlock;
 877         }
 878
 879         dbg_eba("change LEB %d:%d, PEB %d, write VID hdr to PEB %d",
 880                 vol_id, lnum, vol->eba_tbl[lnum], pnum);
 881
 882         err = ubi_io_write_vid_hdr(ubi, pnum, vid_hdr);
 883         if (err) {
 884                 ubi_warn("failed to write VID header to LEB %d:%d, PEB %d",
 885                          vol_id, lnum, pnum);
 886                 goto write_error;
 887         }
 888
 889         err = ubi_io_write_data(ubi, buf, pnum, 0, len);
 890         if (err) {
 891                 ubi_warn("failed to write %d bytes of data to PEB %d",
 892                          len, pnum);
 893                 goto write_error;
 894         }
 895
 896         if (vol->eba_tbl[lnum] >= 0) {
 897                 err = ubi_wl_put_peb(ubi, vol->eba_tbl[lnum], 1);
 898                 if (err)
 899                         goto out_leb_unlock;
 900         }
 901
 902         vol->eba_tbl[lnum] = pnum;
 903
 904 out_leb_unlock:
 905         leb_write_unlock(ubi, vol_id, lnum);
 906 out_mutex:
 907         mutex_unlock(&ubi->alc_mutex);
 908         ubi_free_vid_hdr(ubi, vid_hdr);
 909         return err;
 910
 911 write_error:
 912         if (err != -EIO || !ubi->bad_allowed) {
 913                 /*
 914                  * This flash device does not admit of bad eraseblocks or
 915                  * something nasty and unexpected happened. Switch to read-only
 916                  * mode just in case.
 917                  */
 918                 ubi_ro_mode(ubi);
 919                 goto out_leb_unlock;
 920         }
 921
 922         err = ubi_wl_put_peb(ubi, pnum, 1);
 923         if (err || ++tries > UBI_IO_RETRIES) {
 924                 ubi_ro_mode(ubi);
 925                 goto out_leb_unlock;
 926         }
 927
 928         vid_hdr->sqnum = cpu_to_be64(next_sqnum(ubi));
 929         ubi_msg("try another PEB");
 930         goto retry;
 931 }
 932
 933 /**
 934  * ltree_entry_ctor - lock tree entries slab cache constructor.
 935  * @obj: the lock-tree entry to construct
 936  * @cache: the lock tree entry slab cache
 937  * @flags: constructor flags
 938  */
 939 static void ltree_entry_ctor(struct kmem_cache *cache, void *obj)
 940 {
 941         struct ltree_entry *le = obj;
 942
 943         le->users = 0;
 944         init_rwsem(&le->mutex);
 945 }
 946
 947 /**
 948  * ubi_eba_copy_leb - copy logical eraseblock.
 949  * @ubi: UBI device description object
 950  * @from: physical eraseblock number from where to copy
 951  * @to: physical eraseblock number where to copy
 952  * @vid_hdr: VID header of the @from physical eraseblock
 953  *
 954  * This function copies logical eraseblock from physical eraseblock @from to
 955  * physical eraseblock @to. The @vid_hdr buffer may be changed by this
 956  * function. Returns zero in case of success, %UBI_IO_BITFLIPS if the operation
 957  * was canceled because bit-flips were detected at the target PEB, and a
 958  * negative error code in case of failure.
 959  */
 960 int ubi_eba_copy_leb(struct ubi_device *ubi, int from, int to,
 961                      struct ubi_vid_hdr *vid_hdr)
 962 {
 963         int err, vol_id, lnum, data_size, aldata_size, pnum, idx;
 964         struct ubi_volume *vol;
 965         uint32_t crc;
 966
 967         vol_id = be32_to_cpu(vid_hdr->vol_id);
 968         lnum = be32_to_cpu(vid_hdr->lnum);
 969
 970         dbg_eba("copy LEB %d:%d, PEB %d to PEB %d", vol_id, lnum, from, to);
 971
 972         if (vid_hdr->vol_type == UBI_VID_STATIC) {
 973                 data_size = be32_to_cpu(vid_hdr->data_size);
 974                 aldata_size = ALIGN(data_size, ubi->min_io_size);
 975         } else
 976                 data_size = aldata_size =
 977                             ubi->leb_size - be32_to_cpu(vid_hdr->data_pad);
 978
 979         /*
 980          * We do not want anybody to write to this logical eraseblock while we
 981          * are moving it, so we lock it.
 982          */
 983         err = leb_write_lock(ubi, vol_id, lnum);
 984         if (err)
 985                 return err;
 986
 987         mutex_lock(&ubi->buf_mutex);
 988
 989         /*
 990          * But the logical eraseblock might have been put by this time.
 991          * Cancel if it is true.
 992          */
 993         idx = vol_id2idx(ubi, vol_id);
 994
 995         /*
 996          * We may race with volume deletion/re-size, so we have to hold
 997          * @ubi->volumes_lock.
 998          */
 999         spin_lock(&ubi->volumes_lock);
1000         vol = ubi->volumes[idx];
1001         if (!vol) {
1002                 dbg_eba("volume %d was removed meanwhile", vol_id);
1003                 spin_unlock(&ubi->volumes_lock);
1004                 goto out_unlock;
1005         }
1006
1007         pnum = vol->eba_tbl[lnum];
1008         if (pnum != from) {
1009                 dbg_eba("LEB %d:%d is no longer mapped to PEB %d, mapped to "
1010                         "PEB %d, cancel", vol_id, lnum, from, pnum);
1011                 spin_unlock(&ubi->volumes_lock);
1012                 goto out_unlock;
1013         }
1014         spin_unlock(&ubi->volumes_lock);
1015
1016         /* OK, now the LEB is locked and we can safely start moving it */
1017
1018         dbg_eba("read %d bytes of data", aldata_size);
1019         err = ubi_io_read_data(ubi, ubi->peb_buf1, from, 0, aldata_size);
1020         if (err && err != UBI_IO_BITFLIPS) {
1021                 ubi_warn("error %d while reading data from PEB %d",
1022                          err, from);
1023                 goto out_unlock;
1024         }
1025
1026         /*
1027          * Now we have got to calculate how much data we have to to copy. In
1028          * case of a static volume it is fairly easy - the VID header contains
1029          * the data size. In case of a dynamic volume it is more difficult - we
1030          * have to read the contents, cut 0xFF bytes from the end and copy only
1031          * the first part. We must do this to avoid writing 0xFF bytes as it
1032          * may have some side-effects. And not only this. It is important not
1033          * to include those 0xFFs to CRC because later the they may be filled
1034          * by data.
1035          */
1036         if (vid_hdr->vol_type == UBI_VID_DYNAMIC)
1037                 aldata_size = data_size =
1038                         ubi_calc_data_len(ubi, ubi->peb_buf1, data_size);
1039
1040         cond_resched();
1041         crc = crc32(UBI_CRC32_INIT, ubi->peb_buf1, data_size);
1042         cond_resched();
1043
1044         /*
1045          * It may turn out to me that the whole @from physical eraseblock
1046          * contains only 0xFF bytes. Then we have to only write the VID header
1047          * and do not write any data. This also means we should not set
1048          * @vid_hdr->copy_flag, @vid_hdr->data_size, and @vid_hdr->data_crc.
1049          */
1050         if (data_size > 0) {
1051                 vid_hdr->copy_flag = 1;
1052                 vid_hdr->data_size = cpu_to_be32(data_size);
1053                 vid_hdr->data_crc = cpu_to_be32(crc);
1054         }
1055         vid_hdr->sqnum = cpu_to_be64(next_sqnum(ubi));
1056
1057         err = ubi_io_write_vid_hdr(ubi, to, vid_hdr);
1058         if (err)
1059                 goto out_unlock;
1060
1061         cond_resched();
1062
1063         /* Read the VID header back and check if it was written correctly */
1064         err = ubi_io_read_vid_hdr(ubi, to, vid_hdr, 1);
1065         if (err) {
1066                 if (err != UBI_IO_BITFLIPS)
1067                         ubi_warn("cannot read VID header back from PEB %d", to);
1068                 goto out_unlock;
1069         }
1070
1071         if (data_size > 0) {
1072                 err = ubi_io_write_data(ubi, ubi->peb_buf1, to, 0, aldata_size);
1073                 if (err)
1074                         goto out_unlock;
1075
1076                 cond_resched();
1077
1078                 /*
1079                  * We've written the data and are going to read it back to make
1080                  * sure it was written correctly.
1081                  */
1082
1083                 err = ubi_io_read_data(ubi, ubi->peb_buf2, to, 0, aldata_size);
1084                 if (err) {
1085                         if (err != UBI_IO_BITFLIPS)
1086                                 ubi_warn("cannot read data back from PEB %d",
1087                                          to);
1088                         goto out_unlock;
1089                 }
1090
1091                 cond_resched();
1092
1093                 if (memcmp(ubi->peb_buf1, ubi->peb_buf2, aldata_size)) {
1094                         ubi_warn("read data back from PEB %d - it is different",
1095                                  to);
1096                         goto out_unlock;
1097                 }
1098         }
1099
1100         ubi_assert(vol->eba_tbl[lnum] == from);
1101         vol->eba_tbl[lnum] = to;
1102
1103 out_unlock:
1104         mutex_unlock(&ubi->buf_mutex);
1105         leb_write_unlock(ubi, vol_id, lnum);
1106         return err;
1107 }
1108
1109 /**
1110  * ubi_eba_init_scan - initialize the EBA unit using scanning information.
1111  * @ubi: UBI device description object
1112  * @si: scanning information
1113  *
1114  * This function returns zero in case of success and a negative error code in
1115  * case of failure.
1116  */
1117 int ubi_eba_init_scan(struct ubi_device *ubi, struct ubi_scan_info *si)
1118 {
1119         int i, j, err, num_volumes;
1120         struct ubi_scan_volume *sv;
1121         struct ubi_volume *vol;
1122         struct ubi_scan_leb *seb;
1123         struct rb_node *rb;
1124
1125         dbg_eba("initialize EBA unit");
1126
1127         spin_lock_init(&ubi->ltree_lock);
1128         mutex_init(&ubi->alc_mutex);
1129         ubi->ltree = RB_ROOT;
1130
1131         if (ubi_devices_cnt == 0) {
1132                 ltree_slab = kmem_cache_create("ubi_ltree_slab",
1133                                                sizeof(struct ltree_entry), 0,
1134                                                0, &ltree_entry_ctor);
1135                 if (!ltree_slab)
1136                         return -ENOMEM;
1137         }
1138
1139         ubi->global_sqnum = si->max_sqnum + 1;
1140         num_volumes = ubi->vtbl_slots + UBI_INT_VOL_COUNT;
1141
1142         for (i = 0; i < num_volumes; i++) {
1143                 vol = ubi->volumes[i];
1144                 if (!vol)
1145                         continue;
1146
1147                 cond_resched();
1148
1149                 vol->eba_tbl = kmalloc(vol->reserved_pebs * sizeof(int),
1150                                        GFP_KERNEL);
1151                 if (!vol->eba_tbl) {
1152                         err = -ENOMEM;
1153                         goto out_free;
1154                 }
1155
1156                 for (j = 0; j < vol->reserved_pebs; j++)
1157                         vol->eba_tbl[j] = UBI_LEB_UNMAPPED;
1158
1159                 sv = ubi_scan_find_sv(si, idx2vol_id(ubi, i));
1160                 if (!sv)
1161                         continue;
1162
1163                 ubi_rb_for_each_entry(rb, seb, &sv->root, u.rb) {
1164                         if (seb->lnum >= vol->reserved_pebs)
1165                                 /*
1166                                  * This may happen in case of an unclean reboot
1167                                  * during re-size.
1168                                  */
1169                                 ubi_scan_move_to_list(sv, seb, &si->erase);
1170                         vol->eba_tbl[seb->lnum] = seb->pnum;
1171                 }
1172         }
1173
1174         if (ubi->avail_pebs < EBA_RESERVED_PEBS) {
1175                 ubi_err("no enough physical eraseblocks (%d, need %d)",
1176                         ubi->avail_pebs, EBA_RESERVED_PEBS);
1177                 err = -ENOSPC;
1178                 goto out_free;
1179         }
1180         ubi->avail_pebs -= EBA_RESERVED_PEBS;
1181         ubi->rsvd_pebs += EBA_RESERVED_PEBS;
1182
1183         if (ubi->bad_allowed) {
1184                 ubi_calculate_reserved(ubi);
1185
1186                 if (ubi->avail_pebs < ubi->beb_rsvd_level) {
1187                         /* No enough free physical eraseblocks */
1188                         ubi->beb_rsvd_pebs = ubi->avail_pebs;
1189                         ubi_warn("cannot reserve enough PEBs for bad PEB "
1190                                  "handling, reserved %d, need %d",
1191                                  ubi->beb_rsvd_pebs, ubi->beb_rsvd_level);
1192                 } else
1193                         ubi->beb_rsvd_pebs = ubi->beb_rsvd_level;
1194
1195                 ubi->avail_pebs -= ubi->beb_rsvd_pebs;
1196                 ubi->rsvd_pebs  += ubi->beb_rsvd_pebs;
1197         }
1198
1199         dbg_eba("EBA unit is initialized");
1200         return 0;
1201
1202 out_free:
1203         for (i = 0; i < num_volumes; i++) {
1204                 if (!ubi->volumes[i])
1205                         continue;
1206                 kfree(ubi->volumes[i]->eba_tbl);
1207         }
1208         if (ubi_devices_cnt == 0)
1209                 kmem_cache_destroy(ltree_slab);
1210         return err;
1211 }
1212
1213 /**
1214  * ubi_eba_close - close EBA unit.
1215  * @ubi: UBI device description object
1216  */
1217 void ubi_eba_close(const struct ubi_device *ubi)
1218 {
1219         int i, num_volumes = ubi->vtbl_slots + UBI_INT_VOL_COUNT;
1220
1221         dbg_eba("close EBA unit");
1222
1223         for (i = 0; i < num_volumes; i++) {
1224                 if (!ubi->volumes[i])
1225                         continue;
1226                 kfree(ubi->volumes[i]->eba_tbl);
1227         }
1228         if (ubi_devices_cnt == 1)
1229                 kmem_cache_destroy(ltree_slab);
1230 }