release/src-rt-6.x/linux/linux-2.6/drivers/md/dm-log.c

   1 /*
   2  * Copyright (C) 2003 Sistina Software
   3  *
   4  * This file is released under the LGPL.
   5  */
   6
   7 #include <linux/init.h>
   8 #include <linux/slab.h>
   9 #include <linux/module.h>
  10 #include <linux/vmalloc.h>
  11
  12 #include "dm-log.h"
  13 #include "dm-io.h"
  14
  15 #define DM_MSG_PREFIX "mirror log"
  16
  17 static LIST_HEAD(_log_types);
  18 static DEFINE_SPINLOCK(_lock);
  19
  20 int dm_register_dirty_log_type(struct dirty_log_type *type)
  21 {
  22         spin_lock(&_lock);
  23         type->use_count = 0;
  24         list_add(&type->list, &_log_types);
  25         spin_unlock(&_lock);
  26
  27         return 0;
  28 }
  29
  30 int dm_unregister_dirty_log_type(struct dirty_log_type *type)
  31 {
  32         spin_lock(&_lock);
  33
  34         if (type->use_count)
  35                 DMWARN("Attempt to unregister a log type that is still in use");
  36         else
  37                 list_del(&type->list);
  38
  39         spin_unlock(&_lock);
  40
  41         return 0;
  42 }
  43
  44 static struct dirty_log_type *get_type(const char *type_name)
  45 {
  46         struct dirty_log_type *type;
  47
  48         spin_lock(&_lock);
  49         list_for_each_entry (type, &_log_types, list)
  50                 if (!strcmp(type_name, type->name)) {
  51                         if (!type->use_count && !try_module_get(type->module)){
  52                                 spin_unlock(&_lock);
  53                                 return NULL;
  54                         }
  55                         type->use_count++;
  56                         spin_unlock(&_lock);
  57                         return type;
  58                 }
  59
  60         spin_unlock(&_lock);
  61         return NULL;
  62 }
  63
  64 static void put_type(struct dirty_log_type *type)
  65 {
  66         spin_lock(&_lock);
  67         if (!--type->use_count)
  68                 module_put(type->module);
  69         spin_unlock(&_lock);
  70 }
  71
  72 struct dirty_log *dm_create_dirty_log(const char *type_name, struct dm_target *ti,
  73                                       unsigned int argc, char **argv)
  74 {
  75         struct dirty_log_type *type;
  76         struct dirty_log *log;
  77
  78         log = kmalloc(sizeof(*log), GFP_KERNEL);
  79         if (!log)
  80                 return NULL;
  81
  82         type = get_type(type_name);
  83         if (!type) {
  84                 kfree(log);
  85                 return NULL;
  86         }
  87
  88         log->type = type;
  89         if (type->ctr(log, ti, argc, argv)) {
  90                 kfree(log);
  91                 put_type(type);
  92                 return NULL;
  93         }
  94
  95         return log;
  96 }
  97
  98 void dm_destroy_dirty_log(struct dirty_log *log)
  99 {
 100         log->type->dtr(log);
 101         put_type(log->type);
 102         kfree(log);
 103 }
 104
 105 /*-----------------------------------------------------------------
 106  * Persistent and core logs share a lot of their implementation.
 107  * FIXME: need a reload method to be called from a resume
 108  *---------------------------------------------------------------*/
 109 /*
 110  * Magic for persistent mirrors: "MiRr"
 111  */
 112 #define MIRROR_MAGIC 0x4D695272
 113
 114 /*
 115  * The on-disk version of the metadata.
 116  */
 117 #define MIRROR_DISK_VERSION 2
 118 #define LOG_OFFSET 2
 119
 120 struct log_header {
 121         uint32_t magic;
 122
 123         /*
 124          * Simple, incrementing version. no backward
 125          * compatibility.
 126          */
 127         uint32_t version;
 128         sector_t nr_regions;
 129 };
 130
 131 struct log_c {
 132         struct dm_target *ti;
 133         int touched;
 134         uint32_t region_size;
 135         unsigned int region_count;
 136         region_t sync_count;
 137
 138         unsigned bitset_uint32_count;
 139         uint32_t *clean_bits;
 140         uint32_t *sync_bits;
 141         uint32_t *recovering_bits;      /* FIXME: this seems excessive */
 142
 143         int sync_search;
 144
 145         /* Resync flag */
 146         enum sync {
 147                 DEFAULTSYNC,    /* Synchronize if necessary */
 148                 NOSYNC,         /* Devices known to be already in sync */
 149                 FORCESYNC,      /* Force a sync to happen */
 150         } sync;
 151
 152         struct dm_io_request io_req;
 153
 154         /*
 155          * Disk log fields
 156          */
 157         int log_dev_failed;
 158         struct dm_dev *log_dev;
 159         struct log_header header;
 160
 161         struct io_region header_location;
 162         struct log_header *disk_header;
 163 };
 164
 165 /*
 166  * The touched member needs to be updated every time we access
 167  * one of the bitsets.
 168  */
 169 static  inline int log_test_bit(uint32_t *bs, unsigned bit)
 170 {
 171         return ext2_test_bit(bit, (unsigned long *) bs) ? 1 : 0;
 172 }
 173
 174 static inline void log_set_bit(struct log_c *l,
 175                                uint32_t *bs, unsigned bit)
 176 {
 177         ext2_set_bit(bit, (unsigned long *) bs);
 178         l->touched = 1;
 179 }
 180
 181 static inline void log_clear_bit(struct log_c *l,
 182                                  uint32_t *bs, unsigned bit)
 183 {
 184         ext2_clear_bit(bit, (unsigned long *) bs);
 185         l->touched = 1;
 186 }
 187
 188 /*----------------------------------------------------------------
 189  * Header IO
 190  *--------------------------------------------------------------*/
 191 static void header_to_disk(struct log_header *core, struct log_header *disk)
 192 {
 193         disk->magic = cpu_to_le32(core->magic);
 194         disk->version = cpu_to_le32(core->version);
 195         disk->nr_regions = cpu_to_le64(core->nr_regions);
 196 }
 197
 198 static void header_from_disk(struct log_header *core, struct log_header *disk)
 199 {
 200         core->magic = le32_to_cpu(disk->magic);
 201         core->version = le32_to_cpu(disk->version);
 202         core->nr_regions = le64_to_cpu(disk->nr_regions);
 203 }
 204
 205 static int rw_header(struct log_c *lc, int rw)
 206 {
 207         lc->io_req.bi_rw = rw;
 208         lc->io_req.mem.ptr.vma = lc->disk_header;
 209         lc->io_req.notify.fn = NULL;
 210
 211         return dm_io(&lc->io_req, 1, &lc->header_location, NULL);
 212 }
 213
 214 static int read_header(struct log_c *log)
 215 {
 216         int r;
 217
 218         r = rw_header(log, READ);
 219         if (r)
 220                 return r;
 221
 222         header_from_disk(&log->header, log->disk_header);
 223
 224         /* New log required? */
 225         if (log->sync != DEFAULTSYNC || log->header.magic != MIRROR_MAGIC) {
 226                 log->header.magic = MIRROR_MAGIC;
 227                 log->header.version = MIRROR_DISK_VERSION;
 228                 log->header.nr_regions = 0;
 229         }
 230
 231 #ifdef __LITTLE_ENDIAN
 232         if (log->header.version == 1)
 233                 log->header.version = 2;
 234 #endif
 235
 236         if (log->header.version != MIRROR_DISK_VERSION) {
 237                 DMWARN("incompatible disk log version");
 238                 return -EINVAL;
 239         }
 240
 241         return 0;
 242 }
 243
 244 static inline int write_header(struct log_c *log)
 245 {
 246         header_to_disk(&log->header, log->disk_header);
 247         return rw_header(log, WRITE);
 248 }
 249
 250 /*----------------------------------------------------------------
 251  * core log constructor/destructor
 252  *
 253  * argv contains region_size followed optionally by [no]sync
 254  *--------------------------------------------------------------*/
 255 #define BYTE_SHIFT 3
 256 static int create_log_context(struct dirty_log *log, struct dm_target *ti,
 257                               unsigned int argc, char **argv,
 258                               struct dm_dev *dev)
 259 {
 260         enum sync sync = DEFAULTSYNC;
 261
 262         struct log_c *lc;
 263         uint32_t region_size;
 264         unsigned int region_count;
 265         size_t bitset_size, buf_size;
 266         int r;
 267
 268         if (argc < 1 || argc > 2) {
 269                 DMWARN("wrong number of arguments to mirror log");
 270                 return -EINVAL;
 271         }
 272
 273         if (argc > 1) {
 274                 if (!strcmp(argv[1], "sync"))
 275                         sync = FORCESYNC;
 276                 else if (!strcmp(argv[1], "nosync"))
 277                         sync = NOSYNC;
 278                 else {
 279                         DMWARN("unrecognised sync argument to mirror log: %s",
 280                                argv[1]);
 281                         return -EINVAL;
 282                 }
 283         }
 284
 285         if (sscanf(argv[0], "%u", &region_size) != 1) {
 286                 DMWARN("invalid region size string");
 287                 return -EINVAL;
 288         }
 289
 290         region_count = dm_sector_div_up(ti->len, region_size);
 291
 292         lc = kmalloc(sizeof(*lc), GFP_KERNEL);
 293         if (!lc) {
 294                 DMWARN("couldn't allocate core log");
 295                 return -ENOMEM;
 296         }
 297
 298         lc->ti = ti;
 299         lc->touched = 0;
 300         lc->region_size = region_size;
 301         lc->region_count = region_count;
 302         lc->sync = sync;
 303
 304         /*
 305          * Work out how many "unsigned long"s we need to hold the bitset.
 306          */
 307         bitset_size = dm_round_up(region_count,
 308                                   sizeof(*lc->clean_bits) << BYTE_SHIFT);
 309         bitset_size >>= BYTE_SHIFT;
 310
 311         lc->bitset_uint32_count = bitset_size / sizeof(*lc->clean_bits);
 312
 313         /*
 314          * Disk log?
 315          */
 316         if (!dev) {
 317                 lc->clean_bits = vmalloc(bitset_size);
 318                 if (!lc->clean_bits) {
 319                         DMWARN("couldn't allocate clean bitset");
 320                         kfree(lc);
 321                         return -ENOMEM;
 322                 }
 323                 lc->disk_header = NULL;
 324         } else {
 325                 lc->log_dev = dev;
 326                 lc->log_dev_failed = 0;
 327                 lc->header_location.bdev = lc->log_dev->bdev;
 328                 lc->header_location.sector = 0;
 329
 330                 /*
 331                  * Buffer holds both header and bitset.
 332                  */
 333                 buf_size = dm_round_up((LOG_OFFSET << SECTOR_SHIFT) +
 334                                        bitset_size, ti->limits.hardsect_size);
 335                 lc->header_location.count = buf_size >> SECTOR_SHIFT;
 336                 lc->io_req.mem.type = DM_IO_VMA;
 337                 lc->io_req.client = dm_io_client_create(dm_div_up(buf_size,
 338                                                                    PAGE_SIZE));
 339                 if (IS_ERR(lc->io_req.client)) {
 340                         r = PTR_ERR(lc->io_req.client);
 341                         DMWARN("couldn't allocate disk io client");
 342                         kfree(lc);
 343                         return -ENOMEM;
 344                 }
 345
 346                 lc->disk_header = vmalloc(buf_size);
 347                 if (!lc->disk_header) {
 348                         DMWARN("couldn't allocate disk log buffer");
 349                         kfree(lc);
 350                         return -ENOMEM;
 351                 }
 352
 353                 lc->clean_bits = (void *)lc->disk_header +
 354                                  (LOG_OFFSET << SECTOR_SHIFT);
 355         }
 356
 357         memset(lc->clean_bits, -1, bitset_size);
 358
 359         lc->sync_bits = vmalloc(bitset_size);
 360         if (!lc->sync_bits) {
 361                 DMWARN("couldn't allocate sync bitset");
 362                 if (!dev)
 363                         vfree(lc->clean_bits);
 364                 vfree(lc->disk_header);
 365                 kfree(lc);
 366                 return -ENOMEM;
 367         }
 368         memset(lc->sync_bits, (sync == NOSYNC) ? -1 : 0, bitset_size);
 369         lc->sync_count = (sync == NOSYNC) ? region_count : 0;
 370
 371         lc->recovering_bits = vmalloc(bitset_size);
 372         if (!lc->recovering_bits) {
 373                 DMWARN("couldn't allocate sync bitset");
 374                 vfree(lc->sync_bits);
 375                 if (!dev)
 376                         vfree(lc->clean_bits);
 377                 vfree(lc->disk_header);
 378                 kfree(lc);
 379                 return -ENOMEM;
 380         }
 381         memset(lc->recovering_bits, 0, bitset_size);
 382         lc->sync_search = 0;
 383         log->context = lc;
 384
 385         return 0;
 386 }
 387
 388 static int core_ctr(struct dirty_log *log, struct dm_target *ti,
 389                     unsigned int argc, char **argv)
 390 {
 391         return create_log_context(log, ti, argc, argv, NULL);
 392 }
 393
 394 static void destroy_log_context(struct log_c *lc)
 395 {
 396         vfree(lc->sync_bits);
 397         vfree(lc->recovering_bits);
 398         kfree(lc);
 399 }
 400
 401 static void core_dtr(struct dirty_log *log)
 402 {
 403         struct log_c *lc = (struct log_c *) log->context;
 404
 405         vfree(lc->clean_bits);
 406         destroy_log_context(lc);
 407 }
 408
 409 /*----------------------------------------------------------------
 410  * disk log constructor/destructor
 411  *
 412  * argv contains log_device region_size followed optionally by [no]sync
 413  *--------------------------------------------------------------*/
 414 static int disk_ctr(struct dirty_log *log, struct dm_target *ti,
 415                     unsigned int argc, char **argv)
 416 {
 417         int r;
 418         struct dm_dev *dev;
 419
 420         if (argc < 2 || argc > 3) {
 421                 DMWARN("wrong number of arguments to disk mirror log");
 422                 return -EINVAL;
 423         }
 424
 425         r = dm_get_device(ti, argv[0], 0, 0 /* FIXME */,
 426                           FMODE_READ | FMODE_WRITE, &dev);
 427         if (r)
 428                 return r;
 429
 430         r = create_log_context(log, ti, argc - 1, argv + 1, dev);
 431         if (r) {
 432                 dm_put_device(ti, dev);
 433                 return r;
 434         }
 435
 436         return 0;
 437 }
 438
 439 static void disk_dtr(struct dirty_log *log)
 440 {
 441         struct log_c *lc = (struct log_c *) log->context;
 442
 443         dm_put_device(lc->ti, lc->log_dev);
 444         vfree(lc->disk_header);
 445         dm_io_client_destroy(lc->io_req.client);
 446         destroy_log_context(lc);
 447 }
 448
 449 static int count_bits32(uint32_t *addr, unsigned size)
 450 {
 451         int count = 0, i;
 452
 453         for (i = 0; i < size; i++) {
 454                 count += hweight32(*(addr+i));
 455         }
 456         return count;
 457 }
 458
 459 static void fail_log_device(struct log_c *lc)
 460 {
 461         if (lc->log_dev_failed)
 462                 return;
 463
 464         lc->log_dev_failed = 1;
 465         dm_table_event(lc->ti->table);
 466 }
 467
 468 static int disk_resume(struct dirty_log *log)
 469 {
 470         int r;
 471         unsigned i;
 472         struct log_c *lc = (struct log_c *) log->context;
 473         size_t size = lc->bitset_uint32_count * sizeof(uint32_t);
 474
 475         /* read the disk header */
 476         r = read_header(lc);
 477         if (r) {
 478                 DMWARN("%s: Failed to read header on mirror log device",
 479                        lc->log_dev->name);
 480                 fail_log_device(lc);
 481                 /*
 482                  * If the log device cannot be read, we must assume
 483                  * all regions are out-of-sync.  If we simply return
 484                  * here, the state will be uninitialized and could
 485                  * lead us to return 'in-sync' status for regions
 486                  * that are actually 'out-of-sync'.
 487                  */
 488                 lc->header.nr_regions = 0;
 489         }
 490
 491         /* set or clear any new bits -- device has grown */
 492         if (lc->sync == NOSYNC)
 493                 for (i = lc->header.nr_regions; i < lc->region_count; i++)
 494                         /* FIXME: amazingly inefficient */
 495                         log_set_bit(lc, lc->clean_bits, i);
 496         else
 497                 for (i = lc->header.nr_regions; i < lc->region_count; i++)
 498                         /* FIXME: amazingly inefficient */
 499                         log_clear_bit(lc, lc->clean_bits, i);
 500
 501         /* clear any old bits -- device has shrunk */
 502         for (i = lc->region_count; i % (sizeof(*lc->clean_bits) << BYTE_SHIFT); i++)
 503                 log_clear_bit(lc, lc->clean_bits, i);
 504
 505         /* copy clean across to sync */
 506         memcpy(lc->sync_bits, lc->clean_bits, size);
 507         lc->sync_count = count_bits32(lc->clean_bits, lc->bitset_uint32_count);
 508         lc->sync_search = 0;
 509
 510         /* set the correct number of regions in the header */
 511         lc->header.nr_regions = lc->region_count;
 512
 513         /* write the new header */
 514         r = write_header(lc);
 515         if (r) {
 516                 DMWARN("%s: Failed to write header on mirror log device",
 517                        lc->log_dev->name);
 518                 fail_log_device(lc);
 519         }
 520
 521         return r;
 522 }
 523
 524 static uint32_t core_get_region_size(struct dirty_log *log)
 525 {
 526         struct log_c *lc = (struct log_c *) log->context;
 527         return lc->region_size;
 528 }
 529
 530 static int core_resume(struct dirty_log *log)
 531 {
 532         struct log_c *lc = (struct log_c *) log->context;
 533         lc->sync_search = 0;
 534         return 0;
 535 }
 536
 537 static int core_is_clean(struct dirty_log *log, region_t region)
 538 {
 539         struct log_c *lc = (struct log_c *) log->context;
 540         return log_test_bit(lc->clean_bits, region);
 541 }
 542
 543 static int core_in_sync(struct dirty_log *log, region_t region, int block)
 544 {
 545         struct log_c *lc = (struct log_c *) log->context;
 546         return log_test_bit(lc->sync_bits, region);
 547 }
 548
 549 static int core_flush(struct dirty_log *log)
 550 {
 551         /* no op */
 552         return 0;
 553 }
 554
 555 static int disk_flush(struct dirty_log *log)
 556 {
 557         int r;
 558         struct log_c *lc = (struct log_c *) log->context;
 559
 560         /* only write if the log has changed */
 561         if (!lc->touched)
 562                 return 0;
 563
 564         r = write_header(lc);
 565         if (r)
 566                 fail_log_device(lc);
 567         else
 568                 lc->touched = 0;
 569
 570         return r;
 571 }
 572
 573 static void core_mark_region(struct dirty_log *log, region_t region)
 574 {
 575         struct log_c *lc = (struct log_c *) log->context;
 576         log_clear_bit(lc, lc->clean_bits, region);
 577 }
 578
 579 static void core_clear_region(struct dirty_log *log, region_t region)
 580 {
 581         struct log_c *lc = (struct log_c *) log->context;
 582         log_set_bit(lc, lc->clean_bits, region);
 583 }
 584
 585 static int core_get_resync_work(struct dirty_log *log, region_t *region)
 586 {
 587         struct log_c *lc = (struct log_c *) log->context;
 588
 589         if (lc->sync_search >= lc->region_count)
 590                 return 0;
 591
 592         do {
 593                 *region = ext2_find_next_zero_bit(
 594                                              (unsigned long *) lc->sync_bits,
 595                                              lc->region_count,
 596                                              lc->sync_search);
 597                 lc->sync_search = *region + 1;
 598
 599                 if (*region >= lc->region_count)
 600                         return 0;
 601
 602         } while (log_test_bit(lc->recovering_bits, *region));
 603
 604         log_set_bit(lc, lc->recovering_bits, *region);
 605         return 1;
 606 }
 607
 608 static void core_set_region_sync(struct dirty_log *log, region_t region,
 609                                  int in_sync)
 610 {
 611         struct log_c *lc = (struct log_c *) log->context;
 612
 613         log_clear_bit(lc, lc->recovering_bits, region);
 614         if (in_sync) {
 615                 log_set_bit(lc, lc->sync_bits, region);
 616                 lc->sync_count++;
 617         } else if (log_test_bit(lc->sync_bits, region)) {
 618                 lc->sync_count--;
 619                 log_clear_bit(lc, lc->sync_bits, region);
 620         }
 621 }
 622
 623 static region_t core_get_sync_count(struct dirty_log *log)
 624 {
 625         struct log_c *lc = (struct log_c *) log->context;
 626
 627         return lc->sync_count;
 628 }
 629
 630 #define DMEMIT_SYNC \
 631         if (lc->sync != DEFAULTSYNC) \
 632                 DMEMIT("%ssync ", lc->sync == NOSYNC ? "no" : "")
 633
 634 static int core_status(struct dirty_log *log, status_type_t status,
 635                        char *result, unsigned int maxlen)
 636 {
 637         int sz = 0;
 638         struct log_c *lc = log->context;
 639
 640         switch(status) {
 641         case STATUSTYPE_INFO:
 642                 DMEMIT("1 %s", log->type->name);
 643                 break;
 644
 645         case STATUSTYPE_TABLE:
 646                 DMEMIT("%s %u %u ", log->type->name,
 647                        lc->sync == DEFAULTSYNC ? 1 : 2, lc->region_size);
 648                 DMEMIT_SYNC;
 649         }
 650
 651         return sz;
 652 }
 653
 654 static int disk_status(struct dirty_log *log, status_type_t status,
 655                        char *result, unsigned int maxlen)
 656 {
 657         int sz = 0;
 658         struct log_c *lc = log->context;
 659
 660         switch(status) {
 661         case STATUSTYPE_INFO:
 662                 DMEMIT("3 %s %s %c", log->type->name, lc->log_dev->name,
 663                        lc->log_dev_failed ? 'D' : 'A');
 664                 break;
 665
 666         case STATUSTYPE_TABLE:
 667                 DMEMIT("%s %u %s %u ", log->type->name,
 668                        lc->sync == DEFAULTSYNC ? 2 : 3, lc->log_dev->name,
 669                        lc->region_size);
 670                 DMEMIT_SYNC;
 671         }
 672
 673         return sz;
 674 }
 675
 676 static struct dirty_log_type _core_type = {
 677         .name = "core",
 678         .module = THIS_MODULE,
 679         .ctr = core_ctr,
 680         .dtr = core_dtr,
 681         .resume = core_resume,
 682         .get_region_size = core_get_region_size,
 683         .is_clean = core_is_clean,
 684         .in_sync = core_in_sync,
 685         .flush = core_flush,
 686         .mark_region = core_mark_region,
 687         .clear_region = core_clear_region,
 688         .get_resync_work = core_get_resync_work,
 689         .set_region_sync = core_set_region_sync,
 690         .get_sync_count = core_get_sync_count,
 691         .status = core_status,
 692 };
 693
 694 static struct dirty_log_type _disk_type = {
 695         .name = "disk",
 696         .module = THIS_MODULE,
 697         .ctr = disk_ctr,
 698         .dtr = disk_dtr,
 699         .suspend = disk_flush,
 700         .resume = disk_resume,
 701         .get_region_size = core_get_region_size,
 702         .is_clean = core_is_clean,
 703         .in_sync = core_in_sync,
 704         .flush = disk_flush,
 705         .mark_region = core_mark_region,
 706         .clear_region = core_clear_region,
 707         .get_resync_work = core_get_resync_work,
 708         .set_region_sync = core_set_region_sync,
 709         .get_sync_count = core_get_sync_count,
 710         .status = disk_status,
 711 };
 712
 713 int __init dm_dirty_log_init(void)
 714 {
 715         int r;
 716
 717         r = dm_register_dirty_log_type(&_core_type);
 718         if (r)
 719                 DMWARN("couldn't register core log");
 720
 721         r = dm_register_dirty_log_type(&_disk_type);
 722         if (r) {
 723                 DMWARN("couldn't register disk type");
 724                 dm_unregister_dirty_log_type(&_core_type);
 725         }
 726
 727         return r;
 728 }
 729
 730 void dm_dirty_log_exit(void)
 731 {
 732         dm_unregister_dirty_log_type(&_disk_type);
 733         dm_unregister_dirty_log_type(&_core_type);
 734 }
 735
 736 EXPORT_SYMBOL(dm_register_dirty_log_type);
 737 EXPORT_SYMBOL(dm_unregister_dirty_log_type);
 738 EXPORT_SYMBOL(dm_create_dirty_log);
 739 EXPORT_SYMBOL(dm_destroy_dirty_log);