external/gpl2/lvm2/dist/lib/mirror/mirrored.c

   1 /*      $NetBSD$        */
   2
   3 /*
   4  * Copyright (C) 2003-2004 Sistina Software, Inc. All rights reserved.
   5  * Copyright (C) 2004-2007 Red Hat, Inc. All rights reserved.
   6  *
   7  * This file is part of LVM2.
   8  *
   9  * This copyrighted material is made available to anyone wishing to use,
  10  * modify, copy, or redistribute it subject to the terms and conditions
  11  * of the GNU Lesser General Public License v.2.1.
  12  *
  13  * You should have received a copy of the GNU Lesser General Public License
  14  * along with this program; if not, write to the Free Software Foundation,
  15  * Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  16  */
  17
  18 #include "lib.h"
  19 #include "toolcontext.h"
  20 #include "metadata.h"
  21 #include "segtype.h"
  22 #include "display.h"
  23 #include "text_export.h"
  24 #include "text_import.h"
  25 #include "config.h"
  26 #include "defaults.h"
  27 #include "lvm-string.h"
  28 #include "targets.h"
  29 #include "activate.h"
  30 #include "sharedlib.h"
  31 #include "str_list.h"
  32
  33 #ifdef DMEVENTD
  34 #  include "libdevmapper-event.h"
  35 #endif
  36
  37 static int _block_on_error_available = 0;
  38 static unsigned _mirror_attributes = 0;
  39
  40 enum {
  41         MIRR_DISABLED,
  42         MIRR_RUNNING,
  43         MIRR_COMPLETED
  44 };
  45
  46 struct mirror_state {
  47         uint32_t default_region_size;
  48 };
  49
  50 static const char *_mirrored_name(const struct lv_segment *seg)
  51 {
  52         return seg->segtype->name;
  53 }
  54
  55 static void _mirrored_display(const struct lv_segment *seg)
  56 {
  57         const char *size;
  58         uint32_t s;
  59
  60         log_print("  Mirrors\t\t%u", seg->area_count);
  61         log_print("  Mirror size\t\t%u", seg->area_len);
  62         if (seg->log_lv)
  63                 log_print("  Mirror log volume\t%s", seg->log_lv->name);
  64
  65         if (seg->region_size) {
  66                 size = display_size(seg->lv->vg->cmd,
  67                                     (uint64_t) seg->region_size);
  68                 log_print("  Mirror region size\t%s", size);
  69         }
  70
  71         log_print("  Mirror original:");
  72         display_stripe(seg, 0, "    ");
  73         log_print("  Mirror destinations:");
  74         for (s = 1; s < seg->area_count; s++)
  75                 display_stripe(seg, s, "    ");
  76         log_print(" ");
  77 }
  78
  79 static int _mirrored_text_import_area_count(struct config_node *sn, uint32_t *area_count)
  80 {
  81         if (!get_config_uint32(sn, "mirror_count", area_count)) {
  82                 log_error("Couldn't read 'mirror_count' for "
  83                           "segment '%s'.", config_parent_name(sn));
  84                 return 0;
  85         }
  86
  87         return 1;
  88 }
  89
  90 static int _mirrored_text_import(struct lv_segment *seg, const struct config_node *sn,
  91                         struct dm_hash_table *pv_hash)
  92 {
  93         const struct config_node *cn;
  94         char *logname = NULL;
  95
  96         if (find_config_node(sn, "extents_moved")) {
  97                 if (get_config_uint32(sn, "extents_moved",
  98                                       &seg->extents_copied))
  99                         seg->status |= PVMOVE;
 100                 else {
 101                         log_error("Couldn't read 'extents_moved' for "
 102                                   "segment %s of logical volume %s.",
 103                                   config_parent_name(sn), seg->lv->name);
 104                         return 0;
 105                 }
 106         }
 107
 108         if (find_config_node(sn, "region_size")) {
 109                 if (!get_config_uint32(sn, "region_size",
 110                                       &seg->region_size)) {
 111                         log_error("Couldn't read 'region_size' for "
 112                                   "segment %s of logical volume %s.",
 113                                   config_parent_name(sn), seg->lv->name);
 114                         return 0;
 115                 }
 116         }
 117
 118         if ((cn = find_config_node(sn, "mirror_log"))) {
 119                 if (!cn->v || !cn->v->v.str) {
 120                         log_error("Mirror log type must be a string.");
 121                         return 0;
 122                 }
 123                 logname = cn->v->v.str;
 124                 if (!(seg->log_lv = find_lv(seg->lv->vg, logname))) {
 125                         log_error("Unrecognised mirror log in "
 126                                   "segment %s of logical volume %s.",
 127                                   config_parent_name(sn), seg->lv->name);
 128                         return 0;
 129                 }
 130                 seg->log_lv->status |= MIRROR_LOG;
 131         }
 132
 133         if (logname && !seg->region_size) {
 134                 log_error("Missing region size for mirror log for "
 135                           "segment %s of logical volume %s.",
 136                           config_parent_name(sn), seg->lv->name);
 137                 return 0;
 138         }
 139
 140         if (!(cn = find_config_node(sn, "mirrors"))) {
 141                 log_error("Couldn't find mirrors array for "
 142                           "segment %s of logical volume %s.",
 143                           config_parent_name(sn), seg->lv->name);
 144                 return 0;
 145         }
 146
 147         return text_import_areas(seg, sn, cn, pv_hash, MIRROR_IMAGE);
 148 }
 149
 150 static int _mirrored_text_export(const struct lv_segment *seg, struct formatter *f)
 151 {
 152         outf(f, "mirror_count = %u", seg->area_count);
 153         if (seg->status & PVMOVE)
 154                 out_size(f, (uint64_t) seg->extents_copied * seg->lv->vg->extent_size,
 155                          "extents_moved = %" PRIu32, seg->extents_copied);
 156         if (seg->log_lv)
 157                 outf(f, "mirror_log = \"%s\"", seg->log_lv->name);
 158         if (seg->region_size)
 159                 outf(f, "region_size = %" PRIu32, seg->region_size);
 160
 161         return out_areas(f, seg, "mirror");
 162 }
 163
 164 #ifdef DEVMAPPER_SUPPORT
 165 static struct mirror_state *_mirrored_init_target(struct dm_pool *mem,
 166                                          struct cmd_context *cmd)
 167 {
 168         struct mirror_state *mirr_state;
 169
 170         if (!(mirr_state = dm_pool_alloc(mem, sizeof(*mirr_state)))) {
 171                 log_error("struct mirr_state allocation failed");
 172                 return NULL;
 173         }
 174
 175         mirr_state->default_region_size = 2 *
 176             find_config_tree_int(cmd,
 177                             "activation/mirror_region_size",
 178                             DEFAULT_MIRROR_REGION_SIZE);
 179
 180         return mirr_state;
 181 }
 182
 183 static int _mirrored_target_percent(void **target_state,
 184                                     percent_range_t *percent_range,
 185                                     struct dm_pool *mem,
 186                                     struct cmd_context *cmd,
 187                                     struct lv_segment *seg, char *params,
 188                                     uint64_t *total_numerator,
 189                                     uint64_t *total_denominator)
 190 {
 191         struct mirror_state *mirr_state;
 192         uint64_t numerator, denominator;
 193         unsigned mirror_count, m;
 194         int used;
 195         char *pos = params;
 196
 197         if (!*target_state)
 198                 *target_state = _mirrored_init_target(mem, cmd);
 199
 200         mirr_state = *target_state;
 201
 202         /* Status line: <#mirrors> (maj:min)+ <synced>/<total_regions> */
 203         log_debug("Mirror status: %s", params);
 204
 205         if (sscanf(pos, "%u %n", &mirror_count, &used) != 1) {
 206                 log_error("Failure parsing mirror status mirror count: %s",
 207                           params);
 208                 return 0;
 209         }
 210         pos += used;
 211
 212         for (m = 0; m < mirror_count; m++) {
 213                 if (sscanf(pos, "%*x:%*x %n", &used) != 0) {
 214                         log_error("Failure parsing mirror status devices: %s",
 215                                   params);
 216                         return 0;
 217                 }
 218                 pos += used;
 219         }
 220
 221         if (sscanf(pos, "%" PRIu64 "/%" PRIu64 "%n", &numerator, &denominator,
 222                    &used) != 2) {
 223                 log_error("Failure parsing mirror status fraction: %s", params);
 224                 return 0;
 225         }
 226         pos += used;
 227
 228         *total_numerator += numerator;
 229         *total_denominator += denominator;
 230
 231         if (seg)
 232                 seg->extents_copied = seg->area_len * numerator / denominator;
 233
 234         if (numerator == denominator)
 235                 *percent_range = PERCENT_100;
 236         else if (numerator == 0)
 237                 *percent_range = PERCENT_0;
 238         else
 239                 *percent_range = PERCENT_0_TO_100;
 240
 241         return 1;
 242 }
 243
 244 static int _add_log(struct dev_manager *dm, struct lv_segment *seg,
 245                     struct dm_tree_node *node, uint32_t area_count, uint32_t region_size)
 246 {
 247         unsigned clustered = 0;
 248         char *log_dlid = NULL;
 249         uint32_t log_flags = 0;
 250
 251         /*
 252          * Use clustered mirror log for non-exclusive activation
 253          * in clustered VG.
 254          */
 255         if ((!(seg->lv->status & ACTIVATE_EXCL) &&
 256               (vg_is_clustered(seg->lv->vg))))
 257                 clustered = 1;
 258
 259         if (seg->log_lv) {
 260                 /* If disk log, use its UUID */
 261                 if (!(log_dlid = build_dlid(dm, seg->log_lv->lvid.s, NULL))) {
 262                         log_error("Failed to build uuid for log LV %s.",
 263                                   seg->log_lv->name);
 264                         return 0;
 265                 }
 266         } else {
 267                 /* If core log, use mirror's UUID and set DM_CORELOG flag */
 268                 if (!(log_dlid = build_dlid(dm, seg->lv->lvid.s, NULL))) {
 269                         log_error("Failed to build uuid for mirror LV %s.",
 270                                   seg->lv->name);
 271                         return 0;
 272                 }
 273                 log_flags |= DM_CORELOG;
 274         }
 275
 276         if (mirror_in_sync() && !(seg->status & PVMOVE))
 277                 log_flags |= DM_NOSYNC;
 278
 279         if (_block_on_error_available && !(seg->status & PVMOVE))
 280                 log_flags |= DM_BLOCK_ON_ERROR;
 281
 282         return dm_tree_node_add_mirror_target_log(node, region_size, clustered, log_dlid, area_count, log_flags);
 283 }
 284
 285 static int _mirrored_add_target_line(struct dev_manager *dm, struct dm_pool *mem,
 286                                 struct cmd_context *cmd, void **target_state,
 287                                 struct lv_segment *seg,
 288                                 struct dm_tree_node *node, uint64_t len,
 289                                 uint32_t *pvmove_mirror_count)
 290 {
 291         struct mirror_state *mirr_state;
 292         uint32_t area_count = seg->area_count;
 293         unsigned start_area = 0u;
 294         int mirror_status = MIRR_RUNNING;
 295         uint32_t region_size;
 296         int r;
 297
 298         if (!*target_state)
 299                 *target_state = _mirrored_init_target(mem, cmd);
 300
 301         mirr_state = *target_state;
 302
 303         /*
 304          * Mirror segment could have only 1 area temporarily
 305          * if the segment is under conversion.
 306          */
 307         if (seg->area_count == 1)
 308                 mirror_status = MIRR_DISABLED;
 309
 310         /*
 311          * For pvmove, only have one mirror segment RUNNING at once.
 312          * Segments before this are COMPLETED and use 2nd area.
 313          * Segments after this are DISABLED and use 1st area.
 314          */
 315         if (seg->status & PVMOVE) {
 316                 if (seg->extents_copied == seg->area_len) {
 317                         mirror_status = MIRR_COMPLETED;
 318                         start_area = 1;
 319                 } else if ((*pvmove_mirror_count)++) {
 320                         mirror_status = MIRR_DISABLED;
 321                         area_count = 1;
 322                 }
 323                 /* else MIRR_RUNNING */
 324         }
 325
 326         if (mirror_status != MIRR_RUNNING) {
 327                 if (!dm_tree_node_add_linear_target(node, len))
 328                         return_0;
 329                 goto done;
 330         }
 331
 332         if (!(seg->status & PVMOVE)) {
 333                 if (!seg->region_size) {
 334                         log_error("Missing region size for mirror segment.");
 335                         return 0;
 336                 }
 337                 region_size = seg->region_size;
 338
 339         } else
 340                 region_size = adjusted_mirror_region_size(seg->lv->vg->extent_size,
 341                                                           seg->area_len,
 342                                                           mirr_state->default_region_size);
 343
 344         if (!dm_tree_node_add_mirror_target(node, len))
 345                 return_0;
 346
 347         if ((r = _add_log(dm, seg, node, area_count, region_size)) <= 0) {
 348                 stack;
 349                 return r;
 350         }
 351
 352       done:
 353         return add_areas_line(dm, seg, node, start_area, area_count);
 354 }
 355
 356 static int _mirrored_target_present(struct cmd_context *cmd,
 357                                     const struct lv_segment *seg,
 358                                     unsigned *attributes)
 359 {
 360         static int _mirrored_checked = 0;
 361         static int _mirrored_present = 0;
 362         uint32_t maj, min, patchlevel;
 363         unsigned maj2, min2, patchlevel2;
 364         char vsn[80];
 365
 366         if (!_mirrored_checked) {
 367                 _mirrored_present = target_present(cmd, "mirror", 1);
 368
 369                 /*
 370                  * block_on_error available as "block_on_error" log
 371                  * argument with mirror target >= 1.1 and <= 1.11
 372                  * or with 1.0 in RHEL4U3 driver >= 4.5
 373                  *
 374                  * block_on_error available as "handle_errors" mirror
 375                  * argument with mirror target >= 1.12.
 376                  *
 377                  * libdm-deptree.c is smart enough to handle the differences
 378                  * between block_on_error and handle_errors for all
 379                  * mirror target versions >= 1.1
 380                  */
 381                 /* FIXME Move this into libdevmapper */
 382
 383                 if (target_version("mirror", &maj, &min, &patchlevel) &&
 384                     maj == 1 &&
 385                     ((min >= 1) ||
 386                      (min == 0 && driver_version(vsn, sizeof(vsn)) &&
 387                       sscanf(vsn, "%u.%u.%u", &maj2, &min2, &patchlevel2) == 3 &&
 388                       maj2 == 4 && min2 == 5 && patchlevel2 == 0)))     /* RHEL4U3 */
 389                         _block_on_error_available = 1;
 390         }
 391
 392         /*
 393          * Check only for modules if atttributes requested and no previous check.
 394          * FIXME: Fails incorrectly if cmirror was built into kernel.
 395          */
 396         if (attributes) {
 397                 if (!_mirror_attributes && module_present(cmd, "log-clustered"))
 398                         _mirror_attributes |= MIRROR_LOG_CLUSTERED;
 399                 *attributes = _mirror_attributes;
 400         }
 401         _mirrored_checked = 1;
 402
 403         return _mirrored_present;
 404 }
 405
 406 #ifdef DMEVENTD
 407 static int _get_mirror_dso_path(struct cmd_context *cmd, char **dso)
 408 {
 409         char *path;
 410         const char *libpath;
 411
 412         if (!(path = dm_pool_alloc(cmd->mem, PATH_MAX))) {
 413                 log_error("Failed to allocate dmeventd library path.");
 414                 return 0;
 415         }
 416
 417         libpath = find_config_tree_str(cmd, "dmeventd/mirror_library",
 418                                        DEFAULT_DMEVENTD_MIRROR_LIB);
 419
 420         get_shared_library_path(cmd, libpath, path, PATH_MAX);
 421
 422         *dso = path;
 423
 424         return 1;
 425 }
 426
 427 static struct dm_event_handler *_create_dm_event_handler(const char *dmname,
 428                                                          const char *dso,
 429                                                          enum dm_event_mask mask)
 430 {
 431         struct dm_event_handler *dmevh;
 432
 433         if (!(dmevh = dm_event_handler_create()))
 434                 return_0;
 435
 436        if (dm_event_handler_set_dso(dmevh, dso))
 437                 goto fail;
 438
 439         if (dm_event_handler_set_dev_name(dmevh, dmname))
 440                 goto fail;
 441
 442         dm_event_handler_set_event_mask(dmevh, mask);
 443         return dmevh;
 444
 445 fail:
 446         dm_event_handler_destroy(dmevh);
 447         return NULL;
 448 }
 449
 450 static int _target_monitored(struct lv_segment *seg, int *pending)
 451 {
 452         char *dso, *name;
 453         struct logical_volume *lv;
 454         struct volume_group *vg;
 455         enum dm_event_mask evmask = 0;
 456         struct dm_event_handler *dmevh;
 457
 458         lv = seg->lv;
 459         vg = lv->vg;
 460
 461         *pending = 0;
 462         if (!_get_mirror_dso_path(vg->cmd, &dso))
 463                 return_0;
 464
 465         if (!(name = build_dm_name(vg->cmd->mem, vg->name, lv->name, NULL)))
 466                 return_0;
 467
 468         if (!(dmevh = _create_dm_event_handler(name, dso, DM_EVENT_ALL_ERRORS)))
 469                 return_0;
 470
 471         if (dm_event_get_registered_device(dmevh, 0)) {
 472                 dm_event_handler_destroy(dmevh);
 473                 return 0;
 474         }
 475
 476         evmask = dm_event_handler_get_event_mask(dmevh);
 477         if (evmask & DM_EVENT_REGISTRATION_PENDING) {
 478                 *pending = 1;
 479                 evmask &= ~DM_EVENT_REGISTRATION_PENDING;
 480         }
 481
 482         dm_event_handler_destroy(dmevh);
 483
 484         return evmask;
 485 }
 486
 487 /* FIXME This gets run while suspended and performs banned operations. */
 488 static int _target_set_events(struct lv_segment *seg,
 489                               int evmask __attribute((unused)), int set)
 490 {
 491         char *dso, *name;
 492         struct logical_volume *lv;
 493         struct volume_group *vg;
 494         struct dm_event_handler *dmevh;
 495         int r;
 496
 497         lv = seg->lv;
 498         vg = lv->vg;
 499
 500         if (!_get_mirror_dso_path(vg->cmd, &dso))
 501                 return_0;
 502
 503         if (!(name = build_dm_name(vg->cmd->mem, vg->name, lv->name, NULL)))
 504                 return_0;
 505
 506         if (!(dmevh = _create_dm_event_handler(name, dso, DM_EVENT_ALL_ERRORS)))
 507                 return_0;
 508
 509         r = set ? dm_event_register_handler(dmevh) : dm_event_unregister_handler(dmevh);
 510         dm_event_handler_destroy(dmevh);
 511         if (!r)
 512                 return_0;
 513
 514         log_info("%s %s for events", set ? "Monitored" : "Unmonitored", name);
 515
 516         return 1;
 517 }
 518
 519 static int _target_monitor_events(struct lv_segment *seg, int events)
 520 {
 521         return _target_set_events(seg, events, 1);
 522 }
 523
 524 static int _target_unmonitor_events(struct lv_segment *seg, int events)
 525 {
 526         return _target_set_events(seg, events, 0);
 527 }
 528
 529 #endif /* DMEVENTD */
 530 #endif /* DEVMAPPER_SUPPORT */
 531
 532 static int _mirrored_modules_needed(struct dm_pool *mem,
 533                                     const struct lv_segment *seg,
 534                                     struct dm_list *modules)
 535 {
 536         if (seg->log_lv &&
 537             !list_segment_modules(mem, first_seg(seg->log_lv), modules))
 538                 return_0;
 539
 540         if (vg_is_clustered(seg->lv->vg) &&
 541             !str_list_add(mem, modules, "clog")) {
 542                 log_error("cluster log string list allocation failed");
 543                 return 0;
 544         }
 545
 546         if (!str_list_add(mem, modules, "mirror")) {
 547                 log_error("mirror string list allocation failed");
 548                 return 0;
 549         }
 550
 551         return 1;
 552 }
 553
 554 static void _mirrored_destroy(const struct segment_type *segtype)
 555 {
 556         dm_free((void *) segtype);
 557 }
 558
 559 static struct segtype_handler _mirrored_ops = {
 560         .name = _mirrored_name,
 561         .display = _mirrored_display,
 562         .text_import_area_count = _mirrored_text_import_area_count,
 563         .text_import = _mirrored_text_import,
 564         .text_export = _mirrored_text_export,
 565 #ifdef DEVMAPPER_SUPPORT
 566         .add_target_line = _mirrored_add_target_line,
 567         .target_percent = _mirrored_target_percent,
 568         .target_present = _mirrored_target_present,
 569 #ifdef DMEVENTD
 570         .target_monitored = _target_monitored,
 571         .target_monitor_events = _target_monitor_events,
 572         .target_unmonitor_events = _target_unmonitor_events,
 573 #endif
 574 #endif
 575         .modules_needed = _mirrored_modules_needed,
 576         .destroy = _mirrored_destroy,
 577 };
 578
 579 #ifdef MIRRORED_INTERNAL
 580 struct segment_type *init_mirrored_segtype(struct cmd_context *cmd)
 581 #else                           /* Shared */
 582 struct segment_type *init_segtype(struct cmd_context *cmd);
 583 struct segment_type *init_segtype(struct cmd_context *cmd)
 584 #endif
 585 {
 586         struct segment_type *segtype = dm_malloc(sizeof(*segtype));
 587
 588         if (!segtype)
 589                 return_NULL;
 590
 591         segtype->cmd = cmd;
 592         segtype->ops = &_mirrored_ops;
 593         segtype->name = "mirror";
 594         segtype->private = NULL;
 595         segtype->flags = SEG_AREAS_MIRRORED | SEG_MONITORED;
 596
 597         log_very_verbose("Initialised segtype: %s", segtype->name);
 598
 599         return segtype;
 600 }