1 /****************************************************************************** 2 ******************************************************************************* 3 ** 4 ** Copyright (C) Sistina Software, Inc. 1997-2003 All rights reserved. 5 ** Copyright (C) 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 "member.h" 17 #include "lowcomms.h" 18 #include "midcomms.h" 19 #include "rcom.h" 20 #include "recover.h" 21 #include "dir.h" 22 #include "config.h" 23 #include "memory.h" 24 #include "lock.h" 25 #include "util.h" 26 27 28 static int rcom_response(struct dlm_ls *ls) 29 { 30 return test_bit(LSFL_RCOM_READY, &ls->ls_flags); 31 } 32 33 static int create_rcom(struct dlm_ls *ls, int to_nodeid, int type, int len, 34 struct dlm_rcom **rc_ret, struct dlm_mhandle **mh_ret) 35 { 36 struct dlm_rcom *rc; 37 struct dlm_mhandle *mh; 38 char *mb; 39 int mb_len = sizeof(struct dlm_rcom) + len; 40 41 mh = dlm_lowcomms_get_buffer(to_nodeid, mb_len, ls->ls_allocation, &mb); 42 if (!mh) { 43 log_print("create_rcom to %d type %d len %d ENOBUFS", 44 to_nodeid, type, len); 45 return -ENOBUFS; 46 } 47 memset(mb, 0, mb_len); 48 49 rc = (struct dlm_rcom *) mb; 50 51 rc->rc_header.h_version = (DLM_HEADER_MAJOR | DLM_HEADER_MINOR); 52 rc->rc_header.h_lockspace = ls->ls_global_id; 53 rc->rc_header.h_nodeid = dlm_our_nodeid(); 54 rc->rc_header.h_length = mb_len; 55 rc->rc_header.h_cmd = DLM_RCOM; 56 57 rc->rc_type = type; 58 59 spin_lock(&ls->ls_recover_lock); 60 rc->rc_seq = ls->ls_recover_seq; 61 spin_unlock(&ls->ls_recover_lock); 62 63 *mh_ret = mh; 64 *rc_ret = rc; 65 return 0; 66 } 67 68 static void send_rcom(struct dlm_ls *ls, struct dlm_mhandle *mh, 69 struct dlm_rcom *rc) 70 { 71 dlm_rcom_out(rc); 72 dlm_lowcomms_commit_buffer(mh); 73 } 74 75 /* When replying to a status request, a node also sends back its 76 configuration values. The requesting node then checks that the remote 77 node is configured the same way as itself. */ 78 79 static void make_config(struct dlm_ls *ls, struct rcom_config *rf) 80 { 81 rf->rf_lvblen = ls->ls_lvblen; 82 rf->rf_lsflags = ls->ls_exflags; 83 } 84 85 static int check_config(struct dlm_ls *ls, struct dlm_rcom *rc, int nodeid) 86 { 87 struct rcom_config *rf = (struct rcom_config *) rc->rc_buf; 88 89 if ((rc->rc_header.h_version & 0xFFFF0000) != DLM_HEADER_MAJOR) { 90 log_error(ls, "version mismatch: %x nodeid %d: %x", 91 DLM_HEADER_MAJOR | DLM_HEADER_MINOR, nodeid, 92 rc->rc_header.h_version); 93 return -EPROTO; 94 } 95 96 if (rf->rf_lvblen != ls->ls_lvblen || 97 rf->rf_lsflags != ls->ls_exflags) { 98 log_error(ls, "config mismatch: %d,%x nodeid %d: %d,%x", 99 ls->ls_lvblen, ls->ls_exflags, 100 nodeid, rf->rf_lvblen, rf->rf_lsflags); 101 return -EPROTO; 102 } 103 return 0; 104 } 105 106 static void allow_sync_reply(struct dlm_ls *ls, uint64_t *new_seq) 107 { 108 spin_lock(&ls->ls_rcom_spin); 109 *new_seq = ++ls->ls_rcom_seq; 110 set_bit(LSFL_RCOM_WAIT, &ls->ls_flags); 111 spin_unlock(&ls->ls_rcom_spin); 112 } 113 114 static void disallow_sync_reply(struct dlm_ls *ls) 115 { 116 spin_lock(&ls->ls_rcom_spin); 117 clear_bit(LSFL_RCOM_WAIT, &ls->ls_flags); 118 clear_bit(LSFL_RCOM_READY, &ls->ls_flags); 119 spin_unlock(&ls->ls_rcom_spin); 120 } 121 122 int dlm_rcom_status(struct dlm_ls *ls, int nodeid) 123 { 124 struct dlm_rcom *rc; 125 struct dlm_mhandle *mh; 126 int error = 0; 127 128 ls->ls_recover_nodeid = nodeid; 129 130 if (nodeid == dlm_our_nodeid()) { 131 rc = (struct dlm_rcom *) ls->ls_recover_buf; 132 rc->rc_result = dlm_recover_status(ls); 133 goto out; 134 } 135 136 error = create_rcom(ls, nodeid, DLM_RCOM_STATUS, 0, &rc, &mh); 137 if (error) 138 goto out; 139 140 allow_sync_reply(ls, &rc->rc_id); 141 memset(ls->ls_recover_buf, 0, dlm_config.ci_buffer_size); 142 143 send_rcom(ls, mh, rc); 144 145 error = dlm_wait_function(ls, &rcom_response); 146 disallow_sync_reply(ls); 147 if (error) 148 goto out; 149 150 rc = (struct dlm_rcom *) ls->ls_recover_buf; 151 152 if (rc->rc_result == -ESRCH) { 153 /* we pretend the remote lockspace exists with 0 status */ 154 log_debug(ls, "remote node %d not ready", nodeid); 155 rc->rc_result = 0; 156 } else 157 error = check_config(ls, rc, nodeid); 158 /* the caller looks at rc_result for the remote recovery status */ 159 out: 160 return error; 161 } 162 163 static void receive_rcom_status(struct dlm_ls *ls, struct dlm_rcom *rc_in) 164 { 165 struct dlm_rcom *rc; 166 struct dlm_mhandle *mh; 167 int error, nodeid = rc_in->rc_header.h_nodeid; 168 169 error = create_rcom(ls, nodeid, DLM_RCOM_STATUS_REPLY, 170 sizeof(struct rcom_config), &rc, &mh); 171 if (error) 172 return; 173 rc->rc_id = rc_in->rc_id; 174 rc->rc_seq_reply = rc_in->rc_seq; 175 rc->rc_result = dlm_recover_status(ls); 176 make_config(ls, (struct rcom_config *) rc->rc_buf); 177 178 send_rcom(ls, mh, rc); 179 } 180 181 static void receive_sync_reply(struct dlm_ls *ls, struct dlm_rcom *rc_in) 182 { 183 spin_lock(&ls->ls_rcom_spin); 184 if (!test_bit(LSFL_RCOM_WAIT, &ls->ls_flags) || 185 rc_in->rc_id != ls->ls_rcom_seq) { 186 log_debug(ls, "reject reply %d from %d seq %llx expect %llx", 187 rc_in->rc_type, rc_in->rc_header.h_nodeid, 188 (unsigned long long)rc_in->rc_id, 189 (unsigned long long)ls->ls_rcom_seq); 190 goto out; 191 } 192 memcpy(ls->ls_recover_buf, rc_in, rc_in->rc_header.h_length); 193 set_bit(LSFL_RCOM_READY, &ls->ls_flags); 194 clear_bit(LSFL_RCOM_WAIT, &ls->ls_flags); 195 wake_up(&ls->ls_wait_general); 196 out: 197 spin_unlock(&ls->ls_rcom_spin); 198 } 199 200 static void receive_rcom_status_reply(struct dlm_ls *ls, struct dlm_rcom *rc_in) 201 { 202 receive_sync_reply(ls, rc_in); 203 } 204 205 int dlm_rcom_names(struct dlm_ls *ls, int nodeid, char *last_name, int last_len) 206 { 207 struct dlm_rcom *rc; 208 struct dlm_mhandle *mh; 209 int error = 0, len = sizeof(struct dlm_rcom); 210 211 ls->ls_recover_nodeid = nodeid; 212 213 if (nodeid == dlm_our_nodeid()) { 214 dlm_copy_master_names(ls, last_name, last_len, 215 ls->ls_recover_buf + len, 216 dlm_config.ci_buffer_size - len, nodeid); 217 goto out; 218 } 219 220 error = create_rcom(ls, nodeid, DLM_RCOM_NAMES, last_len, &rc, &mh); 221 if (error) 222 goto out; 223 memcpy(rc->rc_buf, last_name, last_len); 224 225 allow_sync_reply(ls, &rc->rc_id); 226 memset(ls->ls_recover_buf, 0, dlm_config.ci_buffer_size); 227 228 send_rcom(ls, mh, rc); 229 230 error = dlm_wait_function(ls, &rcom_response); 231 disallow_sync_reply(ls); 232 out: 233 return error; 234 } 235 236 static void receive_rcom_names(struct dlm_ls *ls, struct dlm_rcom *rc_in) 237 { 238 struct dlm_rcom *rc; 239 struct dlm_mhandle *mh; 240 int error, inlen, outlen, nodeid; 241 242 nodeid = rc_in->rc_header.h_nodeid; 243 inlen = rc_in->rc_header.h_length - sizeof(struct dlm_rcom); 244 outlen = dlm_config.ci_buffer_size - sizeof(struct dlm_rcom); 245 246 error = create_rcom(ls, nodeid, DLM_RCOM_NAMES_REPLY, outlen, &rc, &mh); 247 if (error) 248 return; 249 rc->rc_id = rc_in->rc_id; 250 rc->rc_seq_reply = rc_in->rc_seq; 251 252 dlm_copy_master_names(ls, rc_in->rc_buf, inlen, rc->rc_buf, outlen, 253 nodeid); 254 send_rcom(ls, mh, rc); 255 } 256 257 static void receive_rcom_names_reply(struct dlm_ls *ls, struct dlm_rcom *rc_in) 258 { 259 receive_sync_reply(ls, rc_in); 260 } 261 262 int dlm_send_rcom_lookup(struct dlm_rsb *r, int dir_nodeid) 263 { 264 struct dlm_rcom *rc; 265 struct dlm_mhandle *mh; 266 struct dlm_ls *ls = r->res_ls; 267 int error; 268 269 error = create_rcom(ls, dir_nodeid, DLM_RCOM_LOOKUP, r->res_length, 270 &rc, &mh); 271 if (error) 272 goto out; 273 memcpy(rc->rc_buf, r->res_name, r->res_length); 274 rc->rc_id = (unsigned long) r; 275 276 send_rcom(ls, mh, rc); 277 out: 278 return error; 279 } 280 281 static void receive_rcom_lookup(struct dlm_ls *ls, struct dlm_rcom *rc_in) 282 { 283 struct dlm_rcom *rc; 284 struct dlm_mhandle *mh; 285 int error, ret_nodeid, nodeid = rc_in->rc_header.h_nodeid; 286 int len = rc_in->rc_header.h_length - sizeof(struct dlm_rcom); 287 288 error = create_rcom(ls, nodeid, DLM_RCOM_LOOKUP_REPLY, 0, &rc, &mh); 289 if (error) 290 return; 291 292 error = dlm_dir_lookup(ls, nodeid, rc_in->rc_buf, len, &ret_nodeid); 293 if (error) 294 ret_nodeid = error; 295 rc->rc_result = ret_nodeid; 296 rc->rc_id = rc_in->rc_id; 297 rc->rc_seq_reply = rc_in->rc_seq; 298 299 send_rcom(ls, mh, rc); 300 } 301 302 static void receive_rcom_lookup_reply(struct dlm_ls *ls, struct dlm_rcom *rc_in) 303 { 304 dlm_recover_master_reply(ls, rc_in); 305 } 306 307 static void pack_rcom_lock(struct dlm_rsb *r, struct dlm_lkb *lkb, 308 struct rcom_lock *rl) 309 { 310 memset(rl, 0, sizeof(*rl)); 311 312 rl->rl_ownpid = lkb->lkb_ownpid; 313 rl->rl_lkid = lkb->lkb_id; 314 rl->rl_exflags = lkb->lkb_exflags; 315 rl->rl_flags = lkb->lkb_flags; 316 rl->rl_lvbseq = lkb->lkb_lvbseq; 317 rl->rl_rqmode = lkb->lkb_rqmode; 318 rl->rl_grmode = lkb->lkb_grmode; 319 rl->rl_status = lkb->lkb_status; 320 rl->rl_wait_type = lkb->lkb_wait_type; 321 322 if (lkb->lkb_bastaddr) 323 rl->rl_asts |= AST_BAST; 324 if (lkb->lkb_astaddr) 325 rl->rl_asts |= AST_COMP; 326 327 rl->rl_namelen = r->res_length; 328 memcpy(rl->rl_name, r->res_name, r->res_length); 329 330 /* FIXME: might we have an lvb without DLM_LKF_VALBLK set ? 331 If so, receive_rcom_lock_args() won't take this copy. */ 332 333 if (lkb->lkb_lvbptr) 334 memcpy(rl->rl_lvb, lkb->lkb_lvbptr, r->res_ls->ls_lvblen); 335 } 336 337 int dlm_send_rcom_lock(struct dlm_rsb *r, struct dlm_lkb *lkb) 338 { 339 struct dlm_ls *ls = r->res_ls; 340 struct dlm_rcom *rc; 341 struct dlm_mhandle *mh; 342 struct rcom_lock *rl; 343 int error, len = sizeof(struct rcom_lock); 344 345 if (lkb->lkb_lvbptr) 346 len += ls->ls_lvblen; 347 348 error = create_rcom(ls, r->res_nodeid, DLM_RCOM_LOCK, len, &rc, &mh); 349 if (error) 350 goto out; 351 352 rl = (struct rcom_lock *) rc->rc_buf; 353 pack_rcom_lock(r, lkb, rl); 354 rc->rc_id = (unsigned long) r; 355 356 send_rcom(ls, mh, rc); 357 out: 358 return error; 359 } 360 361 static void receive_rcom_lock(struct dlm_ls *ls, struct dlm_rcom *rc_in) 362 { 363 struct dlm_rcom *rc; 364 struct dlm_mhandle *mh; 365 int error, nodeid = rc_in->rc_header.h_nodeid; 366 367 dlm_recover_master_copy(ls, rc_in); 368 369 error = create_rcom(ls, nodeid, DLM_RCOM_LOCK_REPLY, 370 sizeof(struct rcom_lock), &rc, &mh); 371 if (error) 372 return; 373 374 /* We send back the same rcom_lock struct we received, but 375 dlm_recover_master_copy() has filled in rl_remid and rl_result */ 376 377 memcpy(rc->rc_buf, rc_in->rc_buf, sizeof(struct rcom_lock)); 378 rc->rc_id = rc_in->rc_id; 379 rc->rc_seq_reply = rc_in->rc_seq; 380 381 send_rcom(ls, mh, rc); 382 } 383 384 static void receive_rcom_lock_reply(struct dlm_ls *ls, struct dlm_rcom *rc_in) 385 { 386 dlm_recover_process_copy(ls, rc_in); 387 } 388 389 static int send_ls_not_ready(struct dlm_ls *ls, int nodeid, 390 struct dlm_rcom *rc_in) 391 { 392 struct dlm_rcom *rc; 393 struct rcom_config *rf; 394 struct dlm_mhandle *mh; 395 char *mb; 396 int mb_len = sizeof(struct dlm_rcom) + sizeof(struct rcom_config); 397 398 mh = dlm_lowcomms_get_buffer(nodeid, mb_len, ls->ls_allocation, &mb); 399 if (!mh) 400 return -ENOBUFS; 401 memset(mb, 0, mb_len); 402 403 rc = (struct dlm_rcom *) mb; 404 405 rc->rc_header.h_version = (DLM_HEADER_MAJOR | DLM_HEADER_MINOR); 406 rc->rc_header.h_lockspace = rc_in->rc_header.h_lockspace; 407 rc->rc_header.h_nodeid = dlm_our_nodeid(); 408 rc->rc_header.h_length = mb_len; 409 rc->rc_header.h_cmd = DLM_RCOM; 410 411 rc->rc_type = DLM_RCOM_STATUS_REPLY; 412 rc->rc_id = rc_in->rc_id; 413 rc->rc_seq_reply = rc_in->rc_seq; 414 rc->rc_result = -ESRCH; 415 416 rf = (struct rcom_config *) rc->rc_buf; 417 rf->rf_lvblen = -1; 418 419 dlm_rcom_out(rc); 420 dlm_lowcomms_commit_buffer(mh); 421 422 return 0; 423 } 424 425 static int is_old_reply(struct dlm_ls *ls, struct dlm_rcom *rc) 426 { 427 uint64_t seq; 428 int rv = 0; 429 430 switch (rc->rc_type) { 431 case DLM_RCOM_STATUS_REPLY: 432 case DLM_RCOM_NAMES_REPLY: 433 case DLM_RCOM_LOOKUP_REPLY: 434 case DLM_RCOM_LOCK_REPLY: 435 spin_lock(&ls->ls_recover_lock); 436 seq = ls->ls_recover_seq; 437 spin_unlock(&ls->ls_recover_lock); 438 if (rc->rc_seq_reply != seq) { 439 log_debug(ls, "ignoring old reply %x from %d " 440 "seq_reply %llx expect %llx", 441 rc->rc_type, rc->rc_header.h_nodeid, 442 (unsigned long long)rc->rc_seq_reply, 443 (unsigned long long)seq); 444 rv = 1; 445 } 446 } 447 return rv; 448 } 449 450 /* Called by dlm_recvd; corresponds to dlm_receive_message() but special 451 recovery-only comms are sent through here. */ 452 453 void dlm_receive_rcom(struct dlm_header *hd, int nodeid) 454 { 455 struct dlm_rcom *rc = (struct dlm_rcom *) hd; 456 struct dlm_ls *ls; 457 458 dlm_rcom_in(rc); 459 460 /* If the lockspace doesn't exist then still send a status message 461 back; it's possible that it just doesn't have its global_id yet. */ 462 463 ls = dlm_find_lockspace_global(hd->h_lockspace); 464 if (!ls) { 465 log_print("lockspace %x from %d type %x not found", 466 hd->h_lockspace, nodeid, rc->rc_type); 467 if (rc->rc_type == DLM_RCOM_STATUS) 468 send_ls_not_ready(ls, nodeid, rc); 469 return; 470 } 471 472 if (dlm_recovery_stopped(ls) && (rc->rc_type != DLM_RCOM_STATUS)) { 473 log_debug(ls, "ignoring recovery message %x from %d", 474 rc->rc_type, nodeid); 475 goto out; 476 } 477 478 if (is_old_reply(ls, rc)) 479 goto out; 480 481 if (nodeid != rc->rc_header.h_nodeid) { 482 log_error(ls, "bad rcom nodeid %d from %d", 483 rc->rc_header.h_nodeid, nodeid); 484 goto out; 485 } 486 487 switch (rc->rc_type) { 488 case DLM_RCOM_STATUS: 489 receive_rcom_status(ls, rc); 490 break; 491 492 case DLM_RCOM_NAMES: 493 receive_rcom_names(ls, rc); 494 break; 495 496 case DLM_RCOM_LOOKUP: 497 receive_rcom_lookup(ls, rc); 498 break; 499 500 case DLM_RCOM_LOCK: 501 receive_rcom_lock(ls, rc); 502 break; 503 504 case DLM_RCOM_STATUS_REPLY: 505 receive_rcom_status_reply(ls, rc); 506 break; 507 508 case DLM_RCOM_NAMES_REPLY: 509 receive_rcom_names_reply(ls, rc); 510 break; 511 512 case DLM_RCOM_LOOKUP_REPLY: 513 receive_rcom_lookup_reply(ls, rc); 514 break; 515 516 case DLM_RCOM_LOCK_REPLY: 517 receive_rcom_lock_reply(ls, rc); 518 break; 519 520 default: 521 DLM_ASSERT(0, printk("rc_type=%x\n", rc->rc_type);); 522 } 523 out: 524 dlm_put_lockspace(ls); 525 } 526 527