fs/dlm/recover.c

   1 /******************************************************************************
   2 *******************************************************************************
   3 **
   4 **  Copyright (C) Sistina Software, Inc.  1997-2003  All rights reserved.
   5 **  Copyright (C) 2004-2005 Red Hat, Inc.  All rights reserved.
   6 **
   7 **  This copyrighted material is made available to anyone wishing to use,
   8 **  modify, copy, or redistribute it subject to the terms and conditions
   9 **  of the GNU General Public License v.2.
  10 **
  11 *******************************************************************************
  12 ******************************************************************************/
  13
  14 #include "dlm_internal.h"
  15 #include "lockspace.h"
  16 #include "dir.h"
  17 #include "config.h"
  18 #include "ast.h"
  19 #include "memory.h"
  20 #include "rcom.h"
  21 #include "lock.h"
  22 #include "lowcomms.h"
  23 #include "member.h"
  24 #include "recover.h"
  25
  26
  27 /*
  28  * Recovery waiting routines: these functions wait for a particular reply from
  29  * a remote node, or for the remote node to report a certain status.  They need
  30  * to abort if the lockspace is stopped indicating a node has failed (perhaps
  31  * the one being waited for).
  32  */
  33
  34 /*
  35  * Wait until given function returns non-zero or lockspace is stopped
  36  * (LS_RECOVERY_STOP set due to failure of a node in ls_nodes).  When another
  37  * function thinks it could have completed the waited-on task, they should wake
  38  * up ls_wait_general to get an immediate response rather than waiting for the
  39  * timeout.  This uses a timeout so it can check periodically if the wait
  40  * should abort due to node failure (which doesn't cause a wake_up).
  41  * This should only be called by the dlm_recoverd thread.
  42  */
  43
  44 int dlm_wait_function(struct dlm_ls *ls, int (*testfn) (struct dlm_ls *ls))
  45 {
  46         int error = 0;
  47         int rv;
  48
  49         while (1) {
  50                 rv = wait_event_timeout(ls->ls_wait_general,
  51                                         testfn(ls) || dlm_recovery_stopped(ls),
  52                                         dlm_config.ci_recover_timer * HZ);
  53                 if (rv)
  54                         break;
  55         }
  56
  57         if (dlm_recovery_stopped(ls)) {
  58                 log_debug(ls, "dlm_wait_function aborted");
  59                 error = -EINTR;
  60         }
  61         return error;
  62 }
  63
  64 /*
  65  * An efficient way for all nodes to wait for all others to have a certain
  66  * status.  The node with the lowest nodeid polls all the others for their
  67  * status (wait_status_all) and all the others poll the node with the low id
  68  * for its accumulated result (wait_status_low).  When all nodes have set
  69  * status flag X, then status flag X_ALL will be set on the low nodeid.
  70  */
  71
  72 uint32_t dlm_recover_status(struct dlm_ls *ls)
  73 {
  74         uint32_t status;
  75         spin_lock(&ls->ls_recover_lock);
  76         status = ls->ls_recover_status;
  77         spin_unlock(&ls->ls_recover_lock);
  78         return status;
  79 }
  80
  81 static void _set_recover_status(struct dlm_ls *ls, uint32_t status)
  82 {
  83         ls->ls_recover_status |= status;
  84 }
  85
  86 void dlm_set_recover_status(struct dlm_ls *ls, uint32_t status)
  87 {
  88         spin_lock(&ls->ls_recover_lock);
  89         _set_recover_status(ls, status);
  90         spin_unlock(&ls->ls_recover_lock);
  91 }
  92
  93 static int wait_status_all(struct dlm_ls *ls, uint32_t wait_status,
  94                            int save_slots)
  95 {
  96         struct dlm_rcom *rc = ls->ls_recover_buf;
  97         struct dlm_member *memb;
  98         int error = 0, delay;
  99
 100         list_for_each_entry(memb, &ls->ls_nodes, list) {
 101                 delay = 0;
 102                 for (;;) {
 103                         if (dlm_recovery_stopped(ls)) {
 104                                 error = -EINTR;
 105                                 goto out;
 106                         }
 107
 108                         error = dlm_rcom_status(ls, memb->nodeid, 0);
 109                         if (error)
 110                                 goto out;
 111
 112                         if (save_slots)
 113                                 dlm_slot_save(ls, rc, memb);
 114
 115                         if (rc->rc_result & wait_status)
 116                                 break;
 117                         if (delay < 1000)
 118                                 delay += 20;
 119                         msleep(delay);
 120                 }
 121         }
 122  out:
 123         return error;
 124 }
 125
 126 static int wait_status_low(struct dlm_ls *ls, uint32_t wait_status,
 127                            uint32_t status_flags)
 128 {
 129         struct dlm_rcom *rc = ls->ls_recover_buf;
 130         int error = 0, delay = 0, nodeid = ls->ls_low_nodeid;
 131
 132         for (;;) {
 133                 if (dlm_recovery_stopped(ls)) {
 134                         error = -EINTR;
 135                         goto out;
 136                 }
 137
 138                 error = dlm_rcom_status(ls, nodeid, status_flags);
 139                 if (error)
 140                         break;
 141
 142                 if (rc->rc_result & wait_status)
 143                         break;
 144                 if (delay < 1000)
 145                         delay += 20;
 146                 msleep(delay);
 147         }
 148  out:
 149         return error;
 150 }
 151
 152 static int wait_status(struct dlm_ls *ls, uint32_t status)
 153 {
 154         uint32_t status_all = status << 1;
 155         int error;
 156
 157         if (ls->ls_low_nodeid == dlm_our_nodeid()) {
 158                 error = wait_status_all(ls, status, 0);
 159                 if (!error)
 160                         dlm_set_recover_status(ls, status_all);
 161         } else
 162                 error = wait_status_low(ls, status_all, 0);
 163
 164         return error;
 165 }
 166
 167 int dlm_recover_members_wait(struct dlm_ls *ls)
 168 {
 169         struct dlm_member *memb;
 170         struct dlm_slot *slots;
 171         int num_slots, slots_size;
 172         int error, rv;
 173         uint32_t gen;
 174
 175         list_for_each_entry(memb, &ls->ls_nodes, list) {
 176                 memb->slot = -1;
 177                 memb->generation = 0;
 178         }
 179
 180         if (ls->ls_low_nodeid == dlm_our_nodeid()) {
 181                 error = wait_status_all(ls, DLM_RS_NODES, 1);
 182                 if (error)
 183                         goto out;
 184
 185                 /* slots array is sparse, slots_size may be > num_slots */
 186
 187                 rv = dlm_slots_assign(ls, &num_slots, &slots_size, &slots, &gen);
 188                 if (!rv) {
 189                         spin_lock(&ls->ls_recover_lock);
 190                         _set_recover_status(ls, DLM_RS_NODES_ALL);
 191                         ls->ls_num_slots = num_slots;
 192                         ls->ls_slots_size = slots_size;
 193                         ls->ls_slots = slots;
 194                         ls->ls_generation = gen;
 195                         spin_unlock(&ls->ls_recover_lock);
 196                 } else {
 197                         dlm_set_recover_status(ls, DLM_RS_NODES_ALL);
 198                 }
 199         } else {
 200                 error = wait_status_low(ls, DLM_RS_NODES_ALL, DLM_RSF_NEED_SLOTS);
 201                 if (error)
 202                         goto out;
 203
 204                 dlm_slots_copy_in(ls);
 205         }
 206  out:
 207         return error;
 208 }
 209
 210 int dlm_recover_directory_wait(struct dlm_ls *ls)
 211 {
 212         return wait_status(ls, DLM_RS_DIR);
 213 }
 214
 215 int dlm_recover_locks_wait(struct dlm_ls *ls)
 216 {
 217         return wait_status(ls, DLM_RS_LOCKS);
 218 }
 219
 220 int dlm_recover_done_wait(struct dlm_ls *ls)
 221 {
 222         return wait_status(ls, DLM_RS_DONE);
 223 }
 224
 225 /*
 226  * The recover_list contains all the rsb's for which we've requested the new
 227  * master nodeid.  As replies are returned from the resource directories the
 228  * rsb's are removed from the list.  When the list is empty we're done.
 229  *
 230  * The recover_list is later similarly used for all rsb's for which we've sent
 231  * new lkb's and need to receive new corresponding lkid's.
 232  *
 233  * We use the address of the rsb struct as a simple local identifier for the
 234  * rsb so we can match an rcom reply with the rsb it was sent for.
 235  */
 236
 237 static int recover_list_empty(struct dlm_ls *ls)
 238 {
 239         int empty;
 240
 241         spin_lock(&ls->ls_recover_list_lock);
 242         empty = list_empty(&ls->ls_recover_list);
 243         spin_unlock(&ls->ls_recover_list_lock);
 244
 245         return empty;
 246 }
 247
 248 static void recover_list_add(struct dlm_rsb *r)
 249 {
 250         struct dlm_ls *ls = r->res_ls;
 251
 252         spin_lock(&ls->ls_recover_list_lock);
 253         if (list_empty(&r->res_recover_list)) {
 254                 list_add_tail(&r->res_recover_list, &ls->ls_recover_list);
 255                 ls->ls_recover_list_count++;
 256                 dlm_hold_rsb(r);
 257         }
 258         spin_unlock(&ls->ls_recover_list_lock);
 259 }
 260
 261 static void recover_list_del(struct dlm_rsb *r)
 262 {
 263         struct dlm_ls *ls = r->res_ls;
 264
 265         spin_lock(&ls->ls_recover_list_lock);
 266         list_del_init(&r->res_recover_list);
 267         ls->ls_recover_list_count--;
 268         spin_unlock(&ls->ls_recover_list_lock);
 269
 270         dlm_put_rsb(r);
 271 }
 272
 273 static void recover_list_clear(struct dlm_ls *ls)
 274 {
 275         struct dlm_rsb *r, *s;
 276
 277         spin_lock(&ls->ls_recover_list_lock);
 278         list_for_each_entry_safe(r, s, &ls->ls_recover_list, res_recover_list) {
 279                 list_del_init(&r->res_recover_list);
 280                 r->res_recover_locks_count = 0;
 281                 dlm_put_rsb(r);
 282                 ls->ls_recover_list_count--;
 283         }
 284
 285         if (ls->ls_recover_list_count != 0) {
 286                 log_error(ls, "warning: recover_list_count %d",
 287                           ls->ls_recover_list_count);
 288                 ls->ls_recover_list_count = 0;
 289         }
 290         spin_unlock(&ls->ls_recover_list_lock);
 291 }
 292
 293 static int recover_idr_empty(struct dlm_ls *ls)
 294 {
 295         int empty = 1;
 296
 297         spin_lock(&ls->ls_recover_idr_lock);
 298         if (ls->ls_recover_list_count)
 299                 empty = 0;
 300         spin_unlock(&ls->ls_recover_idr_lock);
 301
 302         return empty;
 303 }
 304
 305 static int recover_idr_add(struct dlm_rsb *r)
 306 {
 307         struct dlm_ls *ls = r->res_ls;
 308         int rv, id;
 309
 310         rv = idr_pre_get(&ls->ls_recover_idr, GFP_NOFS);
 311         if (!rv)
 312                 return -ENOMEM;
 313
 314         spin_lock(&ls->ls_recover_idr_lock);
 315         if (r->res_id) {
 316                 spin_unlock(&ls->ls_recover_idr_lock);
 317                 return -1;
 318         }
 319         rv = idr_get_new_above(&ls->ls_recover_idr, r, 1, &id);
 320         if (rv) {
 321                 spin_unlock(&ls->ls_recover_idr_lock);
 322                 return rv;
 323         }
 324         r->res_id = id;
 325         ls->ls_recover_list_count++;
 326         dlm_hold_rsb(r);
 327         spin_unlock(&ls->ls_recover_idr_lock);
 328         return 0;
 329 }
 330
 331 static void recover_idr_del(struct dlm_rsb *r)
 332 {
 333         struct dlm_ls *ls = r->res_ls;
 334
 335         spin_lock(&ls->ls_recover_idr_lock);
 336         idr_remove(&ls->ls_recover_idr, r->res_id);
 337         r->res_id = 0;
 338         ls->ls_recover_list_count--;
 339         spin_unlock(&ls->ls_recover_idr_lock);
 340
 341         dlm_put_rsb(r);
 342 }
 343
 344 static struct dlm_rsb *recover_idr_find(struct dlm_ls *ls, uint64_t id)
 345 {
 346         struct dlm_rsb *r;
 347
 348         spin_lock(&ls->ls_recover_idr_lock);
 349         r = idr_find(&ls->ls_recover_idr, (int)id);
 350         spin_unlock(&ls->ls_recover_idr_lock);
 351         return r;
 352 }
 353
 354 static void recover_idr_clear(struct dlm_ls *ls)
 355 {
 356         struct dlm_rsb *r;
 357         int id;
 358
 359         spin_lock(&ls->ls_recover_idr_lock);
 360
 361         idr_for_each_entry(&ls->ls_recover_idr, r, id) {
 362                 idr_remove(&ls->ls_recover_idr, id);
 363                 r->res_id = 0;
 364                 r->res_recover_locks_count = 0;
 365                 ls->ls_recover_list_count--;
 366
 367                 dlm_put_rsb(r);
 368         }
 369
 370         if (ls->ls_recover_list_count != 0) {
 371                 log_error(ls, "warning: recover_list_count %d",
 372                           ls->ls_recover_list_count);
 373                 ls->ls_recover_list_count = 0;
 374         }
 375         spin_unlock(&ls->ls_recover_idr_lock);
 376 }
 377
 378
 379 /* Master recovery: find new master node for rsb's that were
 380    mastered on nodes that have been removed.
 381
 382    dlm_recover_masters
 383    recover_master
 384    dlm_send_rcom_lookup            ->  receive_rcom_lookup
 385                                        dlm_dir_lookup
 386    receive_rcom_lookup_reply       <-
 387    dlm_recover_master_reply
 388    set_new_master
 389    set_master_lkbs
 390    set_lock_master
 391 */
 392
 393 /*
 394  * Set the lock master for all LKBs in a lock queue
 395  * If we are the new master of the rsb, we may have received new
 396  * MSTCPY locks from other nodes already which we need to ignore
 397  * when setting the new nodeid.
 398  */
 399
 400 static void set_lock_master(struct list_head *queue, int nodeid)
 401 {
 402         struct dlm_lkb *lkb;
 403
 404         list_for_each_entry(lkb, queue, lkb_statequeue) {
 405                 if (!(lkb->lkb_flags & DLM_IFL_MSTCPY)) {
 406                         lkb->lkb_nodeid = nodeid;
 407                         lkb->lkb_remid = 0;
 408                 }
 409         }
 410 }
 411
 412 static void set_master_lkbs(struct dlm_rsb *r)
 413 {
 414         set_lock_master(&r->res_grantqueue, r->res_nodeid);
 415         set_lock_master(&r->res_convertqueue, r->res_nodeid);
 416         set_lock_master(&r->res_waitqueue, r->res_nodeid);
 417 }
 418
 419 /*
 420  * Propagate the new master nodeid to locks
 421  * The NEW_MASTER flag tells dlm_recover_locks() which rsb's to consider.
 422  * The NEW_MASTER2 flag tells recover_lvb() and recover_grant() which
 423  * rsb's to consider.
 424  */
 425
 426 static void set_new_master(struct dlm_rsb *r)
 427 {
 428         set_master_lkbs(r);
 429         rsb_set_flag(r, RSB_NEW_MASTER);
 430         rsb_set_flag(r, RSB_NEW_MASTER2);
 431 }
 432
 433 /*
 434  * We do async lookups on rsb's that need new masters.  The rsb's
 435  * waiting for a lookup reply are kept on the recover_list.
 436  *
 437  * Another node recovering the master may have sent us a rcom lookup,
 438  * and our dlm_master_lookup() set it as the new master, along with
 439  * NEW_MASTER so that we'll recover it here (this implies dir_nodeid
 440  * equals our_nodeid below).
 441  */
 442
 443 static int recover_master(struct dlm_rsb *r, unsigned int *count)
 444 {
 445         struct dlm_ls *ls = r->res_ls;
 446         int our_nodeid, dir_nodeid;
 447         int is_removed = 0;
 448         int error;
 449
 450         if (is_master(r))
 451                 return 0;
 452
 453         is_removed = dlm_is_removed(ls, r->res_nodeid);
 454
 455         if (!is_removed && !rsb_flag(r, RSB_NEW_MASTER))
 456                 return 0;
 457
 458         our_nodeid = dlm_our_nodeid();
 459         dir_nodeid = dlm_dir_nodeid(r);
 460
 461         if (dir_nodeid == our_nodeid) {
 462                 if (is_removed) {
 463                         r->res_master_nodeid = our_nodeid;
 464                         r->res_nodeid = 0;
 465                 }
 466
 467                 /* set master of lkbs to ourself when is_removed, or to
 468                    another new master which we set along with NEW_MASTER
 469                    in dlm_master_lookup */
 470                 set_new_master(r);
 471                 error = 0;
 472         } else {
 473                 recover_idr_add(r);
 474                 error = dlm_send_rcom_lookup(r, dir_nodeid);
 475         }
 476
 477         (*count)++;
 478         return error;
 479 }
 480
 481 /*
 482  * All MSTCPY locks are purged and rebuilt, even if the master stayed the same.
 483  * This is necessary because recovery can be started, aborted and restarted,
 484  * causing the master nodeid to briefly change during the aborted recovery, and
 485  * change back to the original value in the second recovery.  The MSTCPY locks
 486  * may or may not have been purged during the aborted recovery.  Another node
 487  * with an outstanding request in waiters list and a request reply saved in the
 488  * requestqueue, cannot know whether it should ignore the reply and resend the
 489  * request, or accept the reply and complete the request.  It must do the
 490  * former if the remote node purged MSTCPY locks, and it must do the later if
 491  * the remote node did not.  This is solved by always purging MSTCPY locks, in
 492  * which case, the request reply would always be ignored and the request
 493  * resent.
 494  */
 495
 496 static int recover_master_static(struct dlm_rsb *r, unsigned int *count)
 497 {
 498         int dir_nodeid = dlm_dir_nodeid(r);
 499         int new_master = dir_nodeid;
 500
 501         if (dir_nodeid == dlm_our_nodeid())
 502                 new_master = 0;
 503
 504         dlm_purge_mstcpy_locks(r);
 505         r->res_master_nodeid = dir_nodeid;
 506         r->res_nodeid = new_master;
 507         set_new_master(r);
 508         (*count)++;
 509         return 0;
 510 }
 511
 512 /*
 513  * Go through local root resources and for each rsb which has a master which
 514  * has departed, get the new master nodeid from the directory.  The dir will
 515  * assign mastery to the first node to look up the new master.  That means
 516  * we'll discover in this lookup if we're the new master of any rsb's.
 517  *
 518  * We fire off all the dir lookup requests individually and asynchronously to
 519  * the correct dir node.
 520  */
 521
 522 int dlm_recover_masters(struct dlm_ls *ls)
 523 {
 524         struct dlm_rsb *r;
 525         unsigned int total = 0;
 526         unsigned int count = 0;
 527         int nodir = dlm_no_directory(ls);
 528         int error;
 529
 530         log_debug(ls, "dlm_recover_masters");
 531
 532         down_read(&ls->ls_root_sem);
 533         list_for_each_entry(r, &ls->ls_root_list, res_root_list) {
 534                 if (dlm_recovery_stopped(ls)) {
 535                         up_read(&ls->ls_root_sem);
 536                         error = -EINTR;
 537                         goto out;
 538                 }
 539
 540                 lock_rsb(r);
 541                 if (nodir)
 542                         error = recover_master_static(r, &count);
 543                 else
 544                         error = recover_master(r, &count);
 545                 unlock_rsb(r);
 546                 cond_resched();
 547                 total++;
 548
 549                 if (error) {
 550                         up_read(&ls->ls_root_sem);
 551                         goto out;
 552                 }
 553         }
 554         up_read(&ls->ls_root_sem);
 555
 556         log_debug(ls, "dlm_recover_masters %u of %u", count, total);
 557
 558         error = dlm_wait_function(ls, &recover_idr_empty);
 559  out:
 560         if (error)
 561                 recover_idr_clear(ls);
 562         return error;
 563 }
 564
 565 int dlm_recover_master_reply(struct dlm_ls *ls, struct dlm_rcom *rc)
 566 {
 567         struct dlm_rsb *r;
 568         int ret_nodeid, new_master;
 569
 570         r = recover_idr_find(ls, rc->rc_id);
 571         if (!r) {
 572                 log_error(ls, "dlm_recover_master_reply no id %llx",
 573                           (unsigned long long)rc->rc_id);
 574                 goto out;
 575         }
 576
 577         ret_nodeid = rc->rc_result;
 578
 579         if (ret_nodeid == dlm_our_nodeid())
 580                 new_master = 0;
 581         else
 582                 new_master = ret_nodeid;
 583
 584         lock_rsb(r);
 585         r->res_master_nodeid = ret_nodeid;
 586         r->res_nodeid = new_master;
 587         set_new_master(r);
 588         unlock_rsb(r);
 589         recover_idr_del(r);
 590
 591         if (recover_idr_empty(ls))
 592                 wake_up(&ls->ls_wait_general);
 593  out:
 594         return 0;
 595 }
 596
 597
 598 /* Lock recovery: rebuild the process-copy locks we hold on a
 599    remastered rsb on the new rsb master.
 600
 601    dlm_recover_locks
 602    recover_locks
 603    recover_locks_queue
 604    dlm_send_rcom_lock              ->  receive_rcom_lock
 605                                        dlm_recover_master_copy
 606    receive_rcom_lock_reply         <-
 607    dlm_recover_process_copy
 608 */
 609
 610
 611 /*
 612  * keep a count of the number of lkb's we send to the new master; when we get
 613  * an equal number of replies then recovery for the rsb is done
 614  */
 615
 616 static int recover_locks_queue(struct dlm_rsb *r, struct list_head *head)
 617 {
 618         struct dlm_lkb *lkb;
 619         int error = 0;
 620
 621         list_for_each_entry(lkb, head, lkb_statequeue) {
 622                 error = dlm_send_rcom_lock(r, lkb);
 623                 if (error)
 624                         break;
 625                 r->res_recover_locks_count++;
 626         }
 627
 628         return error;
 629 }
 630
 631 static int recover_locks(struct dlm_rsb *r)
 632 {
 633         int error = 0;
 634
 635         lock_rsb(r);
 636
 637         DLM_ASSERT(!r->res_recover_locks_count, dlm_dump_rsb(r););
 638
 639         error = recover_locks_queue(r, &r->res_grantqueue);
 640         if (error)
 641                 goto out;
 642         error = recover_locks_queue(r, &r->res_convertqueue);
 643         if (error)
 644                 goto out;
 645         error = recover_locks_queue(r, &r->res_waitqueue);
 646         if (error)
 647                 goto out;
 648
 649         if (r->res_recover_locks_count)
 650                 recover_list_add(r);
 651         else
 652                 rsb_clear_flag(r, RSB_NEW_MASTER);
 653  out:
 654         unlock_rsb(r);
 655         return error;
 656 }
 657
 658 int dlm_recover_locks(struct dlm_ls *ls)
 659 {
 660         struct dlm_rsb *r;
 661         int error, count = 0;
 662
 663         down_read(&ls->ls_root_sem);
 664         list_for_each_entry(r, &ls->ls_root_list, res_root_list) {
 665                 if (is_master(r)) {
 666                         rsb_clear_flag(r, RSB_NEW_MASTER);
 667                         continue;
 668                 }
 669
 670                 if (!rsb_flag(r, RSB_NEW_MASTER))
 671                         continue;
 672
 673                 if (dlm_recovery_stopped(ls)) {
 674                         error = -EINTR;
 675                         up_read(&ls->ls_root_sem);
 676                         goto out;
 677                 }
 678
 679                 error = recover_locks(r);
 680                 if (error) {
 681                         up_read(&ls->ls_root_sem);
 682                         goto out;
 683                 }
 684
 685                 count += r->res_recover_locks_count;
 686         }
 687         up_read(&ls->ls_root_sem);
 688
 689         log_debug(ls, "dlm_recover_locks %d out", count);
 690
 691         error = dlm_wait_function(ls, &recover_list_empty);
 692  out:
 693         if (error)
 694                 recover_list_clear(ls);
 695         return error;
 696 }
 697
 698 void dlm_recovered_lock(struct dlm_rsb *r)
 699 {
 700         DLM_ASSERT(rsb_flag(r, RSB_NEW_MASTER), dlm_dump_rsb(r););
 701
 702         r->res_recover_locks_count--;
 703         if (!r->res_recover_locks_count) {
 704                 rsb_clear_flag(r, RSB_NEW_MASTER);
 705                 recover_list_del(r);
 706         }
 707
 708         if (recover_list_empty(r->res_ls))
 709                 wake_up(&r->res_ls->ls_wait_general);
 710 }
 711
 712 /*
 713  * The lvb needs to be recovered on all master rsb's.  This includes setting
 714  * the VALNOTVALID flag if necessary, and determining the correct lvb contents
 715  * based on the lvb's of the locks held on the rsb.
 716  *
 717  * RSB_VALNOTVALID is set in two cases:
 718  *
 719  * 1. we are master, but not new, and we purged an EX/PW lock held by a
 720  * failed node (in dlm_recover_purge which set RSB_RECOVER_LVB_INVAL)
 721  *
 722  * 2. we are a new master, and there are only NL/CR locks left.
 723  * (We could probably improve this by only invaliding in this way when
 724  * the previous master left uncleanly.  VMS docs mention that.)
 725  *
 726  * The LVB contents are only considered for changing when this is a new master
 727  * of the rsb (NEW_MASTER2).  Then, the rsb's lvb is taken from any lkb with
 728  * mode > CR.  If no lkb's exist with mode above CR, the lvb contents are taken
 729  * from the lkb with the largest lvb sequence number.
 730  */
 731
 732 static void recover_lvb(struct dlm_rsb *r)
 733 {
 734         struct dlm_lkb *lkb, *high_lkb = NULL;
 735         uint32_t high_seq = 0;
 736         int lock_lvb_exists = 0;
 737         int big_lock_exists = 0;
 738         int lvblen = r->res_ls->ls_lvblen;
 739
 740         if (!rsb_flag(r, RSB_NEW_MASTER2) &&
 741             rsb_flag(r, RSB_RECOVER_LVB_INVAL)) {
 742                 /* case 1 above */
 743                 rsb_set_flag(r, RSB_VALNOTVALID);
 744                 return;
 745         }
 746
 747         if (!rsb_flag(r, RSB_NEW_MASTER2))
 748                 return;
 749
 750         /* we are the new master, so figure out if VALNOTVALID should
 751            be set, and set the rsb lvb from the best lkb available. */
 752
 753         list_for_each_entry(lkb, &r->res_grantqueue, lkb_statequeue) {
 754                 if (!(lkb->lkb_exflags & DLM_LKF_VALBLK))
 755                         continue;
 756
 757                 lock_lvb_exists = 1;
 758
 759                 if (lkb->lkb_grmode > DLM_LOCK_CR) {
 760                         big_lock_exists = 1;
 761                         goto setflag;
 762                 }
 763
 764                 if (((int)lkb->lkb_lvbseq - (int)high_seq) >= 0) {
 765                         high_lkb = lkb;
 766                         high_seq = lkb->lkb_lvbseq;
 767                 }
 768         }
 769
 770         list_for_each_entry(lkb, &r->res_convertqueue, lkb_statequeue) {
 771                 if (!(lkb->lkb_exflags & DLM_LKF_VALBLK))
 772                         continue;
 773
 774                 lock_lvb_exists = 1;
 775
 776                 if (lkb->lkb_grmode > DLM_LOCK_CR) {
 777                         big_lock_exists = 1;
 778                         goto setflag;
 779                 }
 780
 781                 if (((int)lkb->lkb_lvbseq - (int)high_seq) >= 0) {
 782                         high_lkb = lkb;
 783                         high_seq = lkb->lkb_lvbseq;
 784                 }
 785         }
 786
 787  setflag:
 788         if (!lock_lvb_exists)
 789                 goto out;
 790
 791         /* lvb is invalidated if only NL/CR locks remain */
 792         if (!big_lock_exists)
 793                 rsb_set_flag(r, RSB_VALNOTVALID);
 794
 795         if (!r->res_lvbptr) {
 796                 r->res_lvbptr = dlm_allocate_lvb(r->res_ls);
 797                 if (!r->res_lvbptr)
 798                         goto out;
 799         }
 800
 801         if (big_lock_exists) {
 802                 r->res_lvbseq = lkb->lkb_lvbseq;
 803                 memcpy(r->res_lvbptr, lkb->lkb_lvbptr, lvblen);
 804         } else if (high_lkb) {
 805                 r->res_lvbseq = high_lkb->lkb_lvbseq;
 806                 memcpy(r->res_lvbptr, high_lkb->lkb_lvbptr, lvblen);
 807         } else {
 808                 r->res_lvbseq = 0;
 809                 memset(r->res_lvbptr, 0, lvblen);
 810         }
 811  out:
 812         return;
 813 }
 814
 815 /* All master rsb's flagged RECOVER_CONVERT need to be looked at.  The locks
 816    converting PR->CW or CW->PR need to have their lkb_grmode set. */
 817
 818 static void recover_conversion(struct dlm_rsb *r)
 819 {
 820         struct dlm_ls *ls = r->res_ls;
 821         struct dlm_lkb *lkb;
 822         int grmode = -1;
 823
 824         list_for_each_entry(lkb, &r->res_grantqueue, lkb_statequeue) {
 825                 if (lkb->lkb_grmode == DLM_LOCK_PR ||
 826                     lkb->lkb_grmode == DLM_LOCK_CW) {
 827                         grmode = lkb->lkb_grmode;
 828                         break;
 829                 }
 830         }
 831
 832         list_for_each_entry(lkb, &r->res_convertqueue, lkb_statequeue) {
 833                 if (lkb->lkb_grmode != DLM_LOCK_IV)
 834                         continue;
 835                 if (grmode == -1) {
 836                         log_debug(ls, "recover_conversion %x set gr to rq %d",
 837                                   lkb->lkb_id, lkb->lkb_rqmode);
 838                         lkb->lkb_grmode = lkb->lkb_rqmode;
 839                 } else {
 840                         log_debug(ls, "recover_conversion %x set gr %d",
 841                                   lkb->lkb_id, grmode);
 842                         lkb->lkb_grmode = grmode;
 843                 }
 844         }
 845 }
 846
 847 /* We've become the new master for this rsb and waiting/converting locks may
 848    need to be granted in dlm_recover_grant() due to locks that may have
 849    existed from a removed node. */
 850
 851 static void recover_grant(struct dlm_rsb *r)
 852 {
 853         if (!list_empty(&r->res_waitqueue) || !list_empty(&r->res_convertqueue))
 854                 rsb_set_flag(r, RSB_RECOVER_GRANT);
 855 }
 856
 857 void dlm_recover_rsbs(struct dlm_ls *ls)
 858 {
 859         struct dlm_rsb *r;
 860         unsigned int count = 0;
 861
 862         down_read(&ls->ls_root_sem);
 863         list_for_each_entry(r, &ls->ls_root_list, res_root_list) {
 864                 lock_rsb(r);
 865                 if (is_master(r)) {
 866                         if (rsb_flag(r, RSB_RECOVER_CONVERT))
 867                                 recover_conversion(r);
 868
 869                         /* recover lvb before granting locks so the updated
 870                            lvb/VALNOTVALID is presented in the completion */
 871                         recover_lvb(r);
 872
 873                         if (rsb_flag(r, RSB_NEW_MASTER2))
 874                                 recover_grant(r);
 875                         count++;
 876                 } else {
 877                         rsb_clear_flag(r, RSB_VALNOTVALID);
 878                 }
 879                 rsb_clear_flag(r, RSB_RECOVER_CONVERT);
 880                 rsb_clear_flag(r, RSB_RECOVER_LVB_INVAL);
 881                 rsb_clear_flag(r, RSB_NEW_MASTER2);
 882                 unlock_rsb(r);
 883         }
 884         up_read(&ls->ls_root_sem);
 885
 886         if (count)
 887                 log_debug(ls, "dlm_recover_rsbs %d done", count);
 888 }
 889
 890 /* Create a single list of all root rsb's to be used during recovery */
 891
 892 int dlm_create_root_list(struct dlm_ls *ls)
 893 {
 894         struct rb_node *n;
 895         struct dlm_rsb *r;
 896         int i, error = 0;
 897
 898         down_write(&ls->ls_root_sem);
 899         if (!list_empty(&ls->ls_root_list)) {
 900                 log_error(ls, "root list not empty");
 901                 error = -EINVAL;
 902                 goto out;
 903         }
 904
 905         for (i = 0; i < ls->ls_rsbtbl_size; i++) {
 906                 spin_lock(&ls->ls_rsbtbl[i].lock);
 907                 for (n = rb_first(&ls->ls_rsbtbl[i].keep); n; n = rb_next(n)) {
 908                         r = rb_entry(n, struct dlm_rsb, res_hashnode);
 909                         list_add(&r->res_root_list, &ls->ls_root_list);
 910                         dlm_hold_rsb(r);
 911                 }
 912
 913                 if (!RB_EMPTY_ROOT(&ls->ls_rsbtbl[i].toss))
 914                         log_error(ls, "dlm_create_root_list toss not empty");
 915                 spin_unlock(&ls->ls_rsbtbl[i].lock);
 916         }
 917  out:
 918         up_write(&ls->ls_root_sem);
 919         return error;
 920 }
 921
 922 void dlm_release_root_list(struct dlm_ls *ls)
 923 {
 924         struct dlm_rsb *r, *safe;
 925
 926         down_write(&ls->ls_root_sem);
 927         list_for_each_entry_safe(r, safe, &ls->ls_root_list, res_root_list) {
 928                 list_del_init(&r->res_root_list);
 929                 dlm_put_rsb(r);
 930         }
 931         up_write(&ls->ls_root_sem);
 932 }
 933
 934 void dlm_clear_toss(struct dlm_ls *ls)
 935 {
 936         struct rb_node *n, *next;
 937         struct dlm_rsb *r;
 938         unsigned int count = 0;
 939         int i;
 940
 941         for (i = 0; i < ls->ls_rsbtbl_size; i++) {
 942                 spin_lock(&ls->ls_rsbtbl[i].lock);
 943                 for (n = rb_first(&ls->ls_rsbtbl[i].toss); n; n = next) {
 944                         next = rb_next(n);
 945                         r = rb_entry(n, struct dlm_rsb, res_hashnode);
 946                         rb_erase(n, &ls->ls_rsbtbl[i].toss);
 947                         dlm_free_rsb(r);
 948                         count++;
 949                 }
 950                 spin_unlock(&ls->ls_rsbtbl[i].lock);
 951         }
 952
 953         if (count)
 954                 log_debug(ls, "dlm_clear_toss %u done", count);
 955 }
 956