1 /****************************************************************************** 2 ******************************************************************************* 3 ** 4 ** Copyright (C) Sistina Software, Inc. 1997-2003 All rights reserved. 5 ** Copyright (C) 2004-2009 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 /* 15 * lowcomms.c 16 * 17 * This is the "low-level" comms layer. 18 * 19 * It is responsible for sending/receiving messages 20 * from other nodes in the cluster. 21 * 22 * Cluster nodes are referred to by their nodeids. nodeids are 23 * simply 32 bit numbers to the locking module - if they need to 24 * be expanded for the cluster infrastructure then that is its 25 * responsibility. It is this layer's 26 * responsibility to resolve these into IP address or 27 * whatever it needs for inter-node communication. 28 * 29 * The comms level is two kernel threads that deal mainly with 30 * the receiving of messages from other nodes and passing them 31 * up to the mid-level comms layer (which understands the 32 * message format) for execution by the locking core, and 33 * a send thread which does all the setting up of connections 34 * to remote nodes and the sending of data. Threads are not allowed 35 * to send their own data because it may cause them to wait in times 36 * of high load. Also, this way, the sending thread can collect together 37 * messages bound for one node and send them in one block. 38 * 39 * lowcomms will choose to use either TCP or SCTP as its transport layer 40 * depending on the configuration variable 'protocol'. This should be set 41 * to 0 (default) for TCP or 1 for SCTP. It should be configured using a 42 * cluster-wide mechanism as it must be the same on all nodes of the cluster 43 * for the DLM to function. 44 * 45 */ 46 47 #include <asm/ioctls.h> 48 #include <net/sock.h> 49 #include <net/tcp.h> 50 #include <linux/pagemap.h> 51 #include <linux/file.h> 52 #include <linux/mutex.h> 53 #include <linux/sctp.h> 54 #include <linux/slab.h> 55 #include <net/sctp/sctp.h> 56 #include <net/ipv6.h> 57 58 #include "dlm_internal.h" 59 #include "lowcomms.h" 60 #include "midcomms.h" 61 #include "config.h" 62 63 #define NEEDED_RMEM (4*1024*1024) 64 #define CONN_HASH_SIZE 32 65 66 /* Number of messages to send before rescheduling */ 67 #define MAX_SEND_MSG_COUNT 25 68 69 struct cbuf { 70 unsigned int base; 71 unsigned int len; 72 unsigned int mask; 73 }; 74 75 static void cbuf_add(struct cbuf *cb, int n) 76 { 77 cb->len += n; 78 } 79 80 static int cbuf_data(struct cbuf *cb) 81 { 82 return ((cb->base + cb->len) & cb->mask); 83 } 84 85 static void cbuf_init(struct cbuf *cb, int size) 86 { 87 cb->base = cb->len = 0; 88 cb->mask = size-1; 89 } 90 91 static void cbuf_eat(struct cbuf *cb, int n) 92 { 93 cb->len -= n; 94 cb->base += n; 95 cb->base &= cb->mask; 96 } 97 98 static bool cbuf_empty(struct cbuf *cb) 99 { 100 return cb->len == 0; 101 } 102 103 struct connection { 104 struct socket *sock; /* NULL if not connected */ 105 uint32_t nodeid; /* So we know who we are in the list */ 106 struct mutex sock_mutex; 107 unsigned long flags; 108 #define CF_READ_PENDING 1 109 #define CF_WRITE_PENDING 2 110 #define CF_CONNECT_PENDING 3 111 #define CF_INIT_PENDING 4 112 #define CF_IS_OTHERCON 5 113 #define CF_CLOSE 6 114 #define CF_APP_LIMITED 7 115 struct list_head writequeue; /* List of outgoing writequeue_entries */ 116 spinlock_t writequeue_lock; 117 int (*rx_action) (struct connection *); /* What to do when active */ 118 void (*connect_action) (struct connection *); /* What to do to connect */ 119 struct page *rx_page; 120 struct cbuf cb; 121 int retries; 122 #define MAX_CONNECT_RETRIES 3 123 struct hlist_node list; 124 struct connection *othercon; 125 struct work_struct rwork; /* Receive workqueue */ 126 struct work_struct swork; /* Send workqueue */ 127 void (*orig_error_report)(struct sock *sk); 128 }; 129 #define sock2con(x) ((struct connection *)(x)->sk_user_data) 130 131 /* An entry waiting to be sent */ 132 struct writequeue_entry { 133 struct list_head list; 134 struct page *page; 135 int offset; 136 int len; 137 int end; 138 int users; 139 struct connection *con; 140 }; 141 142 struct dlm_node_addr { 143 struct list_head list; 144 int nodeid; 145 int addr_count; 146 int curr_addr_index; 147 struct sockaddr_storage *addr[DLM_MAX_ADDR_COUNT]; 148 }; 149 150 static LIST_HEAD(dlm_node_addrs); 151 static DEFINE_SPINLOCK(dlm_node_addrs_spin); 152 153 static struct sockaddr_storage *dlm_local_addr[DLM_MAX_ADDR_COUNT]; 154 static int dlm_local_count; 155 static int dlm_allow_conn; 156 157 /* Work queues */ 158 static struct workqueue_struct *recv_workqueue; 159 static struct workqueue_struct *send_workqueue; 160 161 static struct hlist_head connection_hash[CONN_HASH_SIZE]; 162 static DEFINE_MUTEX(connections_lock); 163 static struct kmem_cache *con_cache; 164 165 static void process_recv_sockets(struct work_struct *work); 166 static void process_send_sockets(struct work_struct *work); 167 168 169 /* This is deliberately very simple because most clusters have simple 170 sequential nodeids, so we should be able to go straight to a connection 171 struct in the array */ 172 static inline int nodeid_hash(int nodeid) 173 { 174 return nodeid & (CONN_HASH_SIZE-1); 175 } 176 177 static struct connection *__find_con(int nodeid) 178 { 179 int r; 180 struct connection *con; 181 182 r = nodeid_hash(nodeid); 183 184 hlist_for_each_entry(con, &connection_hash[r], list) { 185 if (con->nodeid == nodeid) 186 return con; 187 } 188 return NULL; 189 } 190 191 /* 192 * If 'allocation' is zero then we don't attempt to create a new 193 * connection structure for this node. 194 */ 195 static struct connection *__nodeid2con(int nodeid, gfp_t alloc) 196 { 197 struct connection *con = NULL; 198 int r; 199 200 con = __find_con(nodeid); 201 if (con || !alloc) 202 return con; 203 204 con = kmem_cache_zalloc(con_cache, alloc); 205 if (!con) 206 return NULL; 207 208 r = nodeid_hash(nodeid); 209 hlist_add_head(&con->list, &connection_hash[r]); 210 211 con->nodeid = nodeid; 212 mutex_init(&con->sock_mutex); 213 INIT_LIST_HEAD(&con->writequeue); 214 spin_lock_init(&con->writequeue_lock); 215 INIT_WORK(&con->swork, process_send_sockets); 216 INIT_WORK(&con->rwork, process_recv_sockets); 217 218 /* Setup action pointers for child sockets */ 219 if (con->nodeid) { 220 struct connection *zerocon = __find_con(0); 221 222 con->connect_action = zerocon->connect_action; 223 if (!con->rx_action) 224 con->rx_action = zerocon->rx_action; 225 } 226 227 return con; 228 } 229 230 /* Loop round all connections */ 231 static void foreach_conn(void (*conn_func)(struct connection *c)) 232 { 233 int i; 234 struct hlist_node *n; 235 struct connection *con; 236 237 for (i = 0; i < CONN_HASH_SIZE; i++) { 238 hlist_for_each_entry_safe(con, n, &connection_hash[i], list) 239 conn_func(con); 240 } 241 } 242 243 static struct connection *nodeid2con(int nodeid, gfp_t allocation) 244 { 245 struct connection *con; 246 247 mutex_lock(&connections_lock); 248 con = __nodeid2con(nodeid, allocation); 249 mutex_unlock(&connections_lock); 250 251 return con; 252 } 253 254 static struct dlm_node_addr *find_node_addr(int nodeid) 255 { 256 struct dlm_node_addr *na; 257 258 list_for_each_entry(na, &dlm_node_addrs, list) { 259 if (na->nodeid == nodeid) 260 return na; 261 } 262 return NULL; 263 } 264 265 static int addr_compare(struct sockaddr_storage *x, struct sockaddr_storage *y) 266 { 267 switch (x->ss_family) { 268 case AF_INET: { 269 struct sockaddr_in *sinx = (struct sockaddr_in *)x; 270 struct sockaddr_in *siny = (struct sockaddr_in *)y; 271 if (sinx->sin_addr.s_addr != siny->sin_addr.s_addr) 272 return 0; 273 if (sinx->sin_port != siny->sin_port) 274 return 0; 275 break; 276 } 277 case AF_INET6: { 278 struct sockaddr_in6 *sinx = (struct sockaddr_in6 *)x; 279 struct sockaddr_in6 *siny = (struct sockaddr_in6 *)y; 280 if (!ipv6_addr_equal(&sinx->sin6_addr, &siny->sin6_addr)) 281 return 0; 282 if (sinx->sin6_port != siny->sin6_port) 283 return 0; 284 break; 285 } 286 default: 287 return 0; 288 } 289 return 1; 290 } 291 292 static int nodeid_to_addr(int nodeid, struct sockaddr_storage *sas_out, 293 struct sockaddr *sa_out, bool try_new_addr) 294 { 295 struct sockaddr_storage sas; 296 struct dlm_node_addr *na; 297 298 if (!dlm_local_count) 299 return -1; 300 301 spin_lock(&dlm_node_addrs_spin); 302 na = find_node_addr(nodeid); 303 if (na && na->addr_count) { 304 memcpy(&sas, na->addr[na->curr_addr_index], 305 sizeof(struct sockaddr_storage)); 306 307 if (try_new_addr) { 308 na->curr_addr_index++; 309 if (na->curr_addr_index == na->addr_count) 310 na->curr_addr_index = 0; 311 } 312 } 313 spin_unlock(&dlm_node_addrs_spin); 314 315 if (!na) 316 return -EEXIST; 317 318 if (!na->addr_count) 319 return -ENOENT; 320 321 if (sas_out) 322 memcpy(sas_out, &sas, sizeof(struct sockaddr_storage)); 323 324 if (!sa_out) 325 return 0; 326 327 if (dlm_local_addr[0]->ss_family == AF_INET) { 328 struct sockaddr_in *in4 = (struct sockaddr_in *) &sas; 329 struct sockaddr_in *ret4 = (struct sockaddr_in *) sa_out; 330 ret4->sin_addr.s_addr = in4->sin_addr.s_addr; 331 } else { 332 struct sockaddr_in6 *in6 = (struct sockaddr_in6 *) &sas; 333 struct sockaddr_in6 *ret6 = (struct sockaddr_in6 *) sa_out; 334 ret6->sin6_addr = in6->sin6_addr; 335 } 336 337 return 0; 338 } 339 340 static int addr_to_nodeid(struct sockaddr_storage *addr, int *nodeid) 341 { 342 struct dlm_node_addr *na; 343 int rv = -EEXIST; 344 int addr_i; 345 346 spin_lock(&dlm_node_addrs_spin); 347 list_for_each_entry(na, &dlm_node_addrs, list) { 348 if (!na->addr_count) 349 continue; 350 351 for (addr_i = 0; addr_i < na->addr_count; addr_i++) { 352 if (addr_compare(na->addr[addr_i], addr)) { 353 *nodeid = na->nodeid; 354 rv = 0; 355 goto unlock; 356 } 357 } 358 } 359 unlock: 360 spin_unlock(&dlm_node_addrs_spin); 361 return rv; 362 } 363 364 int dlm_lowcomms_addr(int nodeid, struct sockaddr_storage *addr, int len) 365 { 366 struct sockaddr_storage *new_addr; 367 struct dlm_node_addr *new_node, *na; 368 369 new_node = kzalloc(sizeof(struct dlm_node_addr), GFP_NOFS); 370 if (!new_node) 371 return -ENOMEM; 372 373 new_addr = kzalloc(sizeof(struct sockaddr_storage), GFP_NOFS); 374 if (!new_addr) { 375 kfree(new_node); 376 return -ENOMEM; 377 } 378 379 memcpy(new_addr, addr, len); 380 381 spin_lock(&dlm_node_addrs_spin); 382 na = find_node_addr(nodeid); 383 if (!na) { 384 new_node->nodeid = nodeid; 385 new_node->addr[0] = new_addr; 386 new_node->addr_count = 1; 387 list_add(&new_node->list, &dlm_node_addrs); 388 spin_unlock(&dlm_node_addrs_spin); 389 return 0; 390 } 391 392 if (na->addr_count >= DLM_MAX_ADDR_COUNT) { 393 spin_unlock(&dlm_node_addrs_spin); 394 kfree(new_addr); 395 kfree(new_node); 396 return -ENOSPC; 397 } 398 399 na->addr[na->addr_count++] = new_addr; 400 spin_unlock(&dlm_node_addrs_spin); 401 kfree(new_node); 402 return 0; 403 } 404 405 /* Data available on socket or listen socket received a connect */ 406 static void lowcomms_data_ready(struct sock *sk) 407 { 408 struct connection *con = sock2con(sk); 409 if (con && !test_and_set_bit(CF_READ_PENDING, &con->flags)) 410 queue_work(recv_workqueue, &con->rwork); 411 } 412 413 static void lowcomms_write_space(struct sock *sk) 414 { 415 struct connection *con = sock2con(sk); 416 417 if (!con) 418 return; 419 420 clear_bit(SOCK_NOSPACE, &con->sock->flags); 421 422 if (test_and_clear_bit(CF_APP_LIMITED, &con->flags)) { 423 con->sock->sk->sk_write_pending--; 424 clear_bit(SOCK_ASYNC_NOSPACE, &con->sock->flags); 425 } 426 427 if (!test_and_set_bit(CF_WRITE_PENDING, &con->flags)) 428 queue_work(send_workqueue, &con->swork); 429 } 430 431 static inline void lowcomms_connect_sock(struct connection *con) 432 { 433 if (test_bit(CF_CLOSE, &con->flags)) 434 return; 435 if (!test_and_set_bit(CF_CONNECT_PENDING, &con->flags)) 436 queue_work(send_workqueue, &con->swork); 437 } 438 439 static void lowcomms_state_change(struct sock *sk) 440 { 441 /* SCTP layer is not calling sk_data_ready when the connection 442 * is done, so we catch the signal through here. Also, it 443 * doesn't switch socket state when entering shutdown, so we 444 * skip the write in that case. 445 */ 446 if (sk->sk_shutdown) { 447 if (sk->sk_shutdown == RCV_SHUTDOWN) 448 lowcomms_data_ready(sk); 449 } else if (sk->sk_state == TCP_ESTABLISHED) { 450 lowcomms_write_space(sk); 451 } 452 } 453 454 int dlm_lowcomms_connect_node(int nodeid) 455 { 456 struct connection *con; 457 458 if (nodeid == dlm_our_nodeid()) 459 return 0; 460 461 con = nodeid2con(nodeid, GFP_NOFS); 462 if (!con) 463 return -ENOMEM; 464 lowcomms_connect_sock(con); 465 return 0; 466 } 467 468 static void lowcomms_error_report(struct sock *sk) 469 { 470 struct connection *con = sock2con(sk); 471 struct sockaddr_storage saddr; 472 473 if (nodeid_to_addr(con->nodeid, &saddr, NULL, false)) { 474 printk_ratelimited(KERN_ERR "dlm: node %d: socket error " 475 "sending to node %d, port %d, " 476 "sk_err=%d/%d\n", dlm_our_nodeid(), 477 con->nodeid, dlm_config.ci_tcp_port, 478 sk->sk_err, sk->sk_err_soft); 479 return; 480 } else if (saddr.ss_family == AF_INET) { 481 struct sockaddr_in *sin4 = (struct sockaddr_in *)&saddr; 482 483 printk_ratelimited(KERN_ERR "dlm: node %d: socket error " 484 "sending to node %d at %pI4, port %d, " 485 "sk_err=%d/%d\n", dlm_our_nodeid(), 486 con->nodeid, &sin4->sin_addr.s_addr, 487 dlm_config.ci_tcp_port, sk->sk_err, 488 sk->sk_err_soft); 489 } else { 490 struct sockaddr_in6 *sin6 = (struct sockaddr_in6 *)&saddr; 491 492 printk_ratelimited(KERN_ERR "dlm: node %d: socket error " 493 "sending to node %d at %u.%u.%u.%u, " 494 "port %d, sk_err=%d/%d\n", dlm_our_nodeid(), 495 con->nodeid, sin6->sin6_addr.s6_addr32[0], 496 sin6->sin6_addr.s6_addr32[1], 497 sin6->sin6_addr.s6_addr32[2], 498 sin6->sin6_addr.s6_addr32[3], 499 dlm_config.ci_tcp_port, sk->sk_err, 500 sk->sk_err_soft); 501 } 502 con->orig_error_report(sk); 503 } 504 505 /* Make a socket active */ 506 static void add_sock(struct socket *sock, struct connection *con) 507 { 508 con->sock = sock; 509 510 /* Install a data_ready callback */ 511 con->sock->sk->sk_data_ready = lowcomms_data_ready; 512 con->sock->sk->sk_write_space = lowcomms_write_space; 513 con->sock->sk->sk_state_change = lowcomms_state_change; 514 con->sock->sk->sk_user_data = con; 515 con->sock->sk->sk_allocation = GFP_NOFS; 516 con->orig_error_report = con->sock->sk->sk_error_report; 517 con->sock->sk->sk_error_report = lowcomms_error_report; 518 } 519 520 /* Add the port number to an IPv6 or 4 sockaddr and return the address 521 length */ 522 static void make_sockaddr(struct sockaddr_storage *saddr, uint16_t port, 523 int *addr_len) 524 { 525 saddr->ss_family = dlm_local_addr[0]->ss_family; 526 if (saddr->ss_family == AF_INET) { 527 struct sockaddr_in *in4_addr = (struct sockaddr_in *)saddr; 528 in4_addr->sin_port = cpu_to_be16(port); 529 *addr_len = sizeof(struct sockaddr_in); 530 memset(&in4_addr->sin_zero, 0, sizeof(in4_addr->sin_zero)); 531 } else { 532 struct sockaddr_in6 *in6_addr = (struct sockaddr_in6 *)saddr; 533 in6_addr->sin6_port = cpu_to_be16(port); 534 *addr_len = sizeof(struct sockaddr_in6); 535 } 536 memset((char *)saddr + *addr_len, 0, sizeof(struct sockaddr_storage) - *addr_len); 537 } 538 539 /* Close a remote connection and tidy up */ 540 static void close_connection(struct connection *con, bool and_other, 541 bool tx, bool rx) 542 { 543 clear_bit(CF_CONNECT_PENDING, &con->flags); 544 clear_bit(CF_WRITE_PENDING, &con->flags); 545 if (tx && cancel_work_sync(&con->swork)) 546 log_print("canceled swork for node %d", con->nodeid); 547 if (rx && cancel_work_sync(&con->rwork)) 548 log_print("canceled rwork for node %d", con->nodeid); 549 550 mutex_lock(&con->sock_mutex); 551 if (con->sock) { 552 sock_release(con->sock); 553 con->sock = NULL; 554 } 555 if (con->othercon && and_other) { 556 /* Will only re-enter once. */ 557 close_connection(con->othercon, false, true, true); 558 } 559 if (con->rx_page) { 560 __free_page(con->rx_page); 561 con->rx_page = NULL; 562 } 563 564 con->retries = 0; 565 mutex_unlock(&con->sock_mutex); 566 } 567 568 /* Data received from remote end */ 569 static int receive_from_sock(struct connection *con) 570 { 571 int ret = 0; 572 struct msghdr msg = {}; 573 struct kvec iov[2]; 574 unsigned len; 575 int r; 576 int call_again_soon = 0; 577 int nvec; 578 579 mutex_lock(&con->sock_mutex); 580 581 if (con->sock == NULL) { 582 ret = -EAGAIN; 583 goto out_close; 584 } 585 if (con->nodeid == 0) { 586 ret = -EINVAL; 587 goto out_close; 588 } 589 590 if (con->rx_page == NULL) { 591 /* 592 * This doesn't need to be atomic, but I think it should 593 * improve performance if it is. 594 */ 595 con->rx_page = alloc_page(GFP_ATOMIC); 596 if (con->rx_page == NULL) 597 goto out_resched; 598 cbuf_init(&con->cb, PAGE_CACHE_SIZE); 599 } 600 601 /* 602 * iov[0] is the bit of the circular buffer between the current end 603 * point (cb.base + cb.len) and the end of the buffer. 604 */ 605 iov[0].iov_len = con->cb.base - cbuf_data(&con->cb); 606 iov[0].iov_base = page_address(con->rx_page) + cbuf_data(&con->cb); 607 iov[1].iov_len = 0; 608 nvec = 1; 609 610 /* 611 * iov[1] is the bit of the circular buffer between the start of the 612 * buffer and the start of the currently used section (cb.base) 613 */ 614 if (cbuf_data(&con->cb) >= con->cb.base) { 615 iov[0].iov_len = PAGE_CACHE_SIZE - cbuf_data(&con->cb); 616 iov[1].iov_len = con->cb.base; 617 iov[1].iov_base = page_address(con->rx_page); 618 nvec = 2; 619 } 620 len = iov[0].iov_len + iov[1].iov_len; 621 622 r = ret = kernel_recvmsg(con->sock, &msg, iov, nvec, len, 623 MSG_DONTWAIT | MSG_NOSIGNAL); 624 if (ret <= 0) 625 goto out_close; 626 else if (ret == len) 627 call_again_soon = 1; 628 629 cbuf_add(&con->cb, ret); 630 ret = dlm_process_incoming_buffer(con->nodeid, 631 page_address(con->rx_page), 632 con->cb.base, con->cb.len, 633 PAGE_CACHE_SIZE); 634 if (ret == -EBADMSG) { 635 log_print("lowcomms: addr=%p, base=%u, len=%u, read=%d", 636 page_address(con->rx_page), con->cb.base, 637 con->cb.len, r); 638 } 639 if (ret < 0) 640 goto out_close; 641 cbuf_eat(&con->cb, ret); 642 643 if (cbuf_empty(&con->cb) && !call_again_soon) { 644 __free_page(con->rx_page); 645 con->rx_page = NULL; 646 } 647 648 if (call_again_soon) 649 goto out_resched; 650 mutex_unlock(&con->sock_mutex); 651 return 0; 652 653 out_resched: 654 if (!test_and_set_bit(CF_READ_PENDING, &con->flags)) 655 queue_work(recv_workqueue, &con->rwork); 656 mutex_unlock(&con->sock_mutex); 657 return -EAGAIN; 658 659 out_close: 660 mutex_unlock(&con->sock_mutex); 661 if (ret != -EAGAIN) { 662 close_connection(con, false, true, false); 663 /* Reconnect when there is something to send */ 664 } 665 /* Don't return success if we really got EOF */ 666 if (ret == 0) 667 ret = -EAGAIN; 668 669 return ret; 670 } 671 672 /* Listening socket is busy, accept a connection */ 673 static int tcp_accept_from_sock(struct connection *con) 674 { 675 int result; 676 struct sockaddr_storage peeraddr; 677 struct socket *newsock; 678 int len; 679 int nodeid; 680 struct connection *newcon; 681 struct connection *addcon; 682 683 mutex_lock(&connections_lock); 684 if (!dlm_allow_conn) { 685 mutex_unlock(&connections_lock); 686 return -1; 687 } 688 mutex_unlock(&connections_lock); 689 690 memset(&peeraddr, 0, sizeof(peeraddr)); 691 result = sock_create_kern(&init_net, dlm_local_addr[0]->ss_family, 692 SOCK_STREAM, IPPROTO_TCP, &newsock); 693 if (result < 0) 694 return -ENOMEM; 695 696 mutex_lock_nested(&con->sock_mutex, 0); 697 698 result = -ENOTCONN; 699 if (con->sock == NULL) 700 goto accept_err; 701 702 newsock->type = con->sock->type; 703 newsock->ops = con->sock->ops; 704 705 result = con->sock->ops->accept(con->sock, newsock, O_NONBLOCK); 706 if (result < 0) 707 goto accept_err; 708 709 /* Get the connected socket's peer */ 710 memset(&peeraddr, 0, sizeof(peeraddr)); 711 if (newsock->ops->getname(newsock, (struct sockaddr *)&peeraddr, 712 &len, 2)) { 713 result = -ECONNABORTED; 714 goto accept_err; 715 } 716 717 /* Get the new node's NODEID */ 718 make_sockaddr(&peeraddr, 0, &len); 719 if (addr_to_nodeid(&peeraddr, &nodeid)) { 720 unsigned char *b=(unsigned char *)&peeraddr; 721 log_print("connect from non cluster node"); 722 print_hex_dump_bytes("ss: ", DUMP_PREFIX_NONE, 723 b, sizeof(struct sockaddr_storage)); 724 sock_release(newsock); 725 mutex_unlock(&con->sock_mutex); 726 return -1; 727 } 728 729 log_print("got connection from %d", nodeid); 730 731 /* Check to see if we already have a connection to this node. This 732 * could happen if the two nodes initiate a connection at roughly 733 * the same time and the connections cross on the wire. 734 * In this case we store the incoming one in "othercon" 735 */ 736 newcon = nodeid2con(nodeid, GFP_NOFS); 737 if (!newcon) { 738 result = -ENOMEM; 739 goto accept_err; 740 } 741 mutex_lock_nested(&newcon->sock_mutex, 1); 742 if (newcon->sock) { 743 struct connection *othercon = newcon->othercon; 744 745 if (!othercon) { 746 othercon = kmem_cache_zalloc(con_cache, GFP_NOFS); 747 if (!othercon) { 748 log_print("failed to allocate incoming socket"); 749 mutex_unlock(&newcon->sock_mutex); 750 result = -ENOMEM; 751 goto accept_err; 752 } 753 othercon->nodeid = nodeid; 754 othercon->rx_action = receive_from_sock; 755 mutex_init(&othercon->sock_mutex); 756 INIT_WORK(&othercon->swork, process_send_sockets); 757 INIT_WORK(&othercon->rwork, process_recv_sockets); 758 set_bit(CF_IS_OTHERCON, &othercon->flags); 759 } 760 if (!othercon->sock) { 761 newcon->othercon = othercon; 762 othercon->sock = newsock; 763 newsock->sk->sk_user_data = othercon; 764 add_sock(newsock, othercon); 765 addcon = othercon; 766 } 767 else { 768 printk("Extra connection from node %d attempted\n", nodeid); 769 result = -EAGAIN; 770 mutex_unlock(&newcon->sock_mutex); 771 goto accept_err; 772 } 773 } 774 else { 775 newsock->sk->sk_user_data = newcon; 776 newcon->rx_action = receive_from_sock; 777 add_sock(newsock, newcon); 778 addcon = newcon; 779 } 780 781 mutex_unlock(&newcon->sock_mutex); 782 783 /* 784 * Add it to the active queue in case we got data 785 * between processing the accept adding the socket 786 * to the read_sockets list 787 */ 788 if (!test_and_set_bit(CF_READ_PENDING, &addcon->flags)) 789 queue_work(recv_workqueue, &addcon->rwork); 790 mutex_unlock(&con->sock_mutex); 791 792 return 0; 793 794 accept_err: 795 mutex_unlock(&con->sock_mutex); 796 sock_release(newsock); 797 798 if (result != -EAGAIN) 799 log_print("error accepting connection from node: %d", result); 800 return result; 801 } 802 803 static int sctp_accept_from_sock(struct connection *con) 804 { 805 /* Check that the new node is in the lockspace */ 806 struct sctp_prim prim; 807 int nodeid; 808 int prim_len, ret; 809 int addr_len; 810 struct connection *newcon; 811 struct connection *addcon; 812 struct socket *newsock; 813 814 mutex_lock(&connections_lock); 815 if (!dlm_allow_conn) { 816 mutex_unlock(&connections_lock); 817 return -1; 818 } 819 mutex_unlock(&connections_lock); 820 821 mutex_lock_nested(&con->sock_mutex, 0); 822 823 ret = kernel_accept(con->sock, &newsock, O_NONBLOCK); 824 if (ret < 0) 825 goto accept_err; 826 827 memset(&prim, 0, sizeof(struct sctp_prim)); 828 prim_len = sizeof(struct sctp_prim); 829 830 ret = kernel_getsockopt(newsock, IPPROTO_SCTP, SCTP_PRIMARY_ADDR, 831 (char *)&prim, &prim_len); 832 if (ret < 0) { 833 log_print("getsockopt/sctp_primary_addr failed: %d", ret); 834 goto accept_err; 835 } 836 837 make_sockaddr(&prim.ssp_addr, 0, &addr_len); 838 if (addr_to_nodeid(&prim.ssp_addr, &nodeid)) { 839 unsigned char *b = (unsigned char *)&prim.ssp_addr; 840 841 log_print("reject connect from unknown addr"); 842 print_hex_dump_bytes("ss: ", DUMP_PREFIX_NONE, 843 b, sizeof(struct sockaddr_storage)); 844 goto accept_err; 845 } 846 847 newcon = nodeid2con(nodeid, GFP_NOFS); 848 if (!newcon) { 849 ret = -ENOMEM; 850 goto accept_err; 851 } 852 853 mutex_lock_nested(&newcon->sock_mutex, 1); 854 855 if (newcon->sock) { 856 struct connection *othercon = newcon->othercon; 857 858 if (!othercon) { 859 othercon = kmem_cache_zalloc(con_cache, GFP_NOFS); 860 if (!othercon) { 861 log_print("failed to allocate incoming socket"); 862 mutex_unlock(&newcon->sock_mutex); 863 ret = -ENOMEM; 864 goto accept_err; 865 } 866 othercon->nodeid = nodeid; 867 othercon->rx_action = receive_from_sock; 868 mutex_init(&othercon->sock_mutex); 869 INIT_WORK(&othercon->swork, process_send_sockets); 870 INIT_WORK(&othercon->rwork, process_recv_sockets); 871 set_bit(CF_IS_OTHERCON, &othercon->flags); 872 } 873 if (!othercon->sock) { 874 newcon->othercon = othercon; 875 othercon->sock = newsock; 876 newsock->sk->sk_user_data = othercon; 877 add_sock(newsock, othercon); 878 addcon = othercon; 879 } else { 880 printk("Extra connection from node %d attempted\n", nodeid); 881 ret = -EAGAIN; 882 mutex_unlock(&newcon->sock_mutex); 883 goto accept_err; 884 } 885 } else { 886 newsock->sk->sk_user_data = newcon; 887 newcon->rx_action = receive_from_sock; 888 add_sock(newsock, newcon); 889 addcon = newcon; 890 } 891 892 log_print("connected to %d", nodeid); 893 894 mutex_unlock(&newcon->sock_mutex); 895 896 /* 897 * Add it to the active queue in case we got data 898 * between processing the accept adding the socket 899 * to the read_sockets list 900 */ 901 if (!test_and_set_bit(CF_READ_PENDING, &addcon->flags)) 902 queue_work(recv_workqueue, &addcon->rwork); 903 mutex_unlock(&con->sock_mutex); 904 905 return 0; 906 907 accept_err: 908 mutex_unlock(&con->sock_mutex); 909 if (newsock) 910 sock_release(newsock); 911 if (ret != -EAGAIN) 912 log_print("error accepting connection from node: %d", ret); 913 914 return ret; 915 } 916 917 static void free_entry(struct writequeue_entry *e) 918 { 919 __free_page(e->page); 920 kfree(e); 921 } 922 923 /* 924 * writequeue_entry_complete - try to delete and free write queue entry 925 * @e: write queue entry to try to delete 926 * @completed: bytes completed 927 * 928 * writequeue_lock must be held. 929 */ 930 static void writequeue_entry_complete(struct writequeue_entry *e, int completed) 931 { 932 e->offset += completed; 933 e->len -= completed; 934 935 if (e->len == 0 && e->users == 0) { 936 list_del(&e->list); 937 free_entry(e); 938 } 939 } 940 941 /* 942 * sctp_bind_addrs - bind a SCTP socket to all our addresses 943 */ 944 static int sctp_bind_addrs(struct connection *con, uint16_t port) 945 { 946 struct sockaddr_storage localaddr; 947 int i, addr_len, result = 0; 948 949 for (i = 0; i < dlm_local_count; i++) { 950 memcpy(&localaddr, dlm_local_addr[i], sizeof(localaddr)); 951 make_sockaddr(&localaddr, port, &addr_len); 952 953 if (!i) 954 result = kernel_bind(con->sock, 955 (struct sockaddr *)&localaddr, 956 addr_len); 957 else 958 result = kernel_setsockopt(con->sock, SOL_SCTP, 959 SCTP_SOCKOPT_BINDX_ADD, 960 (char *)&localaddr, addr_len); 961 962 if (result < 0) { 963 log_print("Can't bind to %d addr number %d, %d.\n", 964 port, i + 1, result); 965 break; 966 } 967 } 968 return result; 969 } 970 971 /* Initiate an SCTP association. 972 This is a special case of send_to_sock() in that we don't yet have a 973 peeled-off socket for this association, so we use the listening socket 974 and add the primary IP address of the remote node. 975 */ 976 static void sctp_connect_to_sock(struct connection *con) 977 { 978 struct sockaddr_storage daddr; 979 int one = 1; 980 int result; 981 int addr_len; 982 struct socket *sock; 983 984 if (con->nodeid == 0) { 985 log_print("attempt to connect sock 0 foiled"); 986 return; 987 } 988 989 mutex_lock(&con->sock_mutex); 990 991 /* Some odd races can cause double-connects, ignore them */ 992 if (con->retries++ > MAX_CONNECT_RETRIES) 993 goto out; 994 995 if (con->sock) { 996 log_print("node %d already connected.", con->nodeid); 997 goto out; 998 } 999 1000 memset(&daddr, 0, sizeof(daddr)); 1001 result = nodeid_to_addr(con->nodeid, &daddr, NULL, true); 1002 if (result < 0) { 1003 log_print("no address for nodeid %d", con->nodeid); 1004 goto out; 1005 } 1006 1007 /* Create a socket to communicate with */ 1008 result = sock_create_kern(&init_net, dlm_local_addr[0]->ss_family, 1009 SOCK_STREAM, IPPROTO_SCTP, &sock); 1010 if (result < 0) 1011 goto socket_err; 1012 1013 sock->sk->sk_user_data = con; 1014 con->rx_action = receive_from_sock; 1015 con->connect_action = sctp_connect_to_sock; 1016 add_sock(sock, con); 1017 1018 /* Bind to all addresses. */ 1019 if (sctp_bind_addrs(con, 0)) 1020 goto bind_err; 1021 1022 make_sockaddr(&daddr, dlm_config.ci_tcp_port, &addr_len); 1023 1024 log_print("connecting to %d", con->nodeid); 1025 1026 /* Turn off Nagle's algorithm */ 1027 kernel_setsockopt(sock, SOL_TCP, TCP_NODELAY, (char *)&one, 1028 sizeof(one)); 1029 1030 result = sock->ops->connect(sock, (struct sockaddr *)&daddr, addr_len, 1031 O_NONBLOCK); 1032 if (result == -EINPROGRESS) 1033 result = 0; 1034 if (result == 0) 1035 goto out; 1036 1037 1038 bind_err: 1039 con->sock = NULL; 1040 sock_release(sock); 1041 1042 socket_err: 1043 /* 1044 * Some errors are fatal and this list might need adjusting. For other 1045 * errors we try again until the max number of retries is reached. 1046 */ 1047 if (result != -EHOSTUNREACH && 1048 result != -ENETUNREACH && 1049 result != -ENETDOWN && 1050 result != -EINVAL && 1051 result != -EPROTONOSUPPORT) { 1052 log_print("connect %d try %d error %d", con->nodeid, 1053 con->retries, result); 1054 mutex_unlock(&con->sock_mutex); 1055 msleep(1000); 1056 clear_bit(CF_CONNECT_PENDING, &con->flags); 1057 lowcomms_connect_sock(con); 1058 return; 1059 } 1060 1061 out: 1062 mutex_unlock(&con->sock_mutex); 1063 set_bit(CF_WRITE_PENDING, &con->flags); 1064 } 1065 1066 /* Connect a new socket to its peer */ 1067 static void tcp_connect_to_sock(struct connection *con) 1068 { 1069 struct sockaddr_storage saddr, src_addr; 1070 int addr_len; 1071 struct socket *sock = NULL; 1072 int one = 1; 1073 int result; 1074 1075 if (con->nodeid == 0) { 1076 log_print("attempt to connect sock 0 foiled"); 1077 return; 1078 } 1079 1080 mutex_lock(&con->sock_mutex); 1081 if (con->retries++ > MAX_CONNECT_RETRIES) 1082 goto out; 1083 1084 /* Some odd races can cause double-connects, ignore them */ 1085 if (con->sock) 1086 goto out; 1087 1088 /* Create a socket to communicate with */ 1089 result = sock_create_kern(&init_net, dlm_local_addr[0]->ss_family, 1090 SOCK_STREAM, IPPROTO_TCP, &sock); 1091 if (result < 0) 1092 goto out_err; 1093 1094 memset(&saddr, 0, sizeof(saddr)); 1095 result = nodeid_to_addr(con->nodeid, &saddr, NULL, false); 1096 if (result < 0) { 1097 log_print("no address for nodeid %d", con->nodeid); 1098 goto out_err; 1099 } 1100 1101 sock->sk->sk_user_data = con; 1102 con->rx_action = receive_from_sock; 1103 con->connect_action = tcp_connect_to_sock; 1104 add_sock(sock, con); 1105 1106 /* Bind to our cluster-known address connecting to avoid 1107 routing problems */ 1108 memcpy(&src_addr, dlm_local_addr[0], sizeof(src_addr)); 1109 make_sockaddr(&src_addr, 0, &addr_len); 1110 result = sock->ops->bind(sock, (struct sockaddr *) &src_addr, 1111 addr_len); 1112 if (result < 0) { 1113 log_print("could not bind for connect: %d", result); 1114 /* This *may* not indicate a critical error */ 1115 } 1116 1117 make_sockaddr(&saddr, dlm_config.ci_tcp_port, &addr_len); 1118 1119 log_print("connecting to %d", con->nodeid); 1120 1121 /* Turn off Nagle's algorithm */ 1122 kernel_setsockopt(sock, SOL_TCP, TCP_NODELAY, (char *)&one, 1123 sizeof(one)); 1124 1125 result = sock->ops->connect(sock, (struct sockaddr *)&saddr, addr_len, 1126 O_NONBLOCK); 1127 if (result == -EINPROGRESS) 1128 result = 0; 1129 if (result == 0) 1130 goto out; 1131 1132 out_err: 1133 if (con->sock) { 1134 sock_release(con->sock); 1135 con->sock = NULL; 1136 } else if (sock) { 1137 sock_release(sock); 1138 } 1139 /* 1140 * Some errors are fatal and this list might need adjusting. For other 1141 * errors we try again until the max number of retries is reached. 1142 */ 1143 if (result != -EHOSTUNREACH && 1144 result != -ENETUNREACH && 1145 result != -ENETDOWN && 1146 result != -EINVAL && 1147 result != -EPROTONOSUPPORT) { 1148 log_print("connect %d try %d error %d", con->nodeid, 1149 con->retries, result); 1150 mutex_unlock(&con->sock_mutex); 1151 msleep(1000); 1152 clear_bit(CF_CONNECT_PENDING, &con->flags); 1153 lowcomms_connect_sock(con); 1154 return; 1155 } 1156 out: 1157 mutex_unlock(&con->sock_mutex); 1158 set_bit(CF_WRITE_PENDING, &con->flags); 1159 return; 1160 } 1161 1162 static struct socket *tcp_create_listen_sock(struct connection *con, 1163 struct sockaddr_storage *saddr) 1164 { 1165 struct socket *sock = NULL; 1166 int result = 0; 1167 int one = 1; 1168 int addr_len; 1169 1170 if (dlm_local_addr[0]->ss_family == AF_INET) 1171 addr_len = sizeof(struct sockaddr_in); 1172 else 1173 addr_len = sizeof(struct sockaddr_in6); 1174 1175 /* Create a socket to communicate with */ 1176 result = sock_create_kern(&init_net, dlm_local_addr[0]->ss_family, 1177 SOCK_STREAM, IPPROTO_TCP, &sock); 1178 if (result < 0) { 1179 log_print("Can't create listening comms socket"); 1180 goto create_out; 1181 } 1182 1183 /* Turn off Nagle's algorithm */ 1184 kernel_setsockopt(sock, SOL_TCP, TCP_NODELAY, (char *)&one, 1185 sizeof(one)); 1186 1187 result = kernel_setsockopt(sock, SOL_SOCKET, SO_REUSEADDR, 1188 (char *)&one, sizeof(one)); 1189 1190 if (result < 0) { 1191 log_print("Failed to set SO_REUSEADDR on socket: %d", result); 1192 } 1193 con->rx_action = tcp_accept_from_sock; 1194 con->connect_action = tcp_connect_to_sock; 1195 1196 /* Bind to our port */ 1197 make_sockaddr(saddr, dlm_config.ci_tcp_port, &addr_len); 1198 result = sock->ops->bind(sock, (struct sockaddr *) saddr, addr_len); 1199 if (result < 0) { 1200 log_print("Can't bind to port %d", dlm_config.ci_tcp_port); 1201 sock_release(sock); 1202 sock = NULL; 1203 con->sock = NULL; 1204 goto create_out; 1205 } 1206 result = kernel_setsockopt(sock, SOL_SOCKET, SO_KEEPALIVE, 1207 (char *)&one, sizeof(one)); 1208 if (result < 0) { 1209 log_print("Set keepalive failed: %d", result); 1210 } 1211 1212 result = sock->ops->listen(sock, 5); 1213 if (result < 0) { 1214 log_print("Can't listen on port %d", dlm_config.ci_tcp_port); 1215 sock_release(sock); 1216 sock = NULL; 1217 goto create_out; 1218 } 1219 1220 create_out: 1221 return sock; 1222 } 1223 1224 /* Get local addresses */ 1225 static void init_local(void) 1226 { 1227 struct sockaddr_storage sas, *addr; 1228 int i; 1229 1230 dlm_local_count = 0; 1231 for (i = 0; i < DLM_MAX_ADDR_COUNT; i++) { 1232 if (dlm_our_addr(&sas, i)) 1233 break; 1234 1235 addr = kmalloc(sizeof(*addr), GFP_NOFS); 1236 if (!addr) 1237 break; 1238 memcpy(addr, &sas, sizeof(*addr)); 1239 dlm_local_addr[dlm_local_count++] = addr; 1240 } 1241 } 1242 1243 /* Initialise SCTP socket and bind to all interfaces */ 1244 static int sctp_listen_for_all(void) 1245 { 1246 struct socket *sock = NULL; 1247 int result = -EINVAL; 1248 struct connection *con = nodeid2con(0, GFP_NOFS); 1249 int bufsize = NEEDED_RMEM; 1250 int one = 1; 1251 1252 if (!con) 1253 return -ENOMEM; 1254 1255 log_print("Using SCTP for communications"); 1256 1257 result = sock_create_kern(&init_net, dlm_local_addr[0]->ss_family, 1258 SOCK_STREAM, IPPROTO_SCTP, &sock); 1259 if (result < 0) { 1260 log_print("Can't create comms socket, check SCTP is loaded"); 1261 goto out; 1262 } 1263 1264 result = kernel_setsockopt(sock, SOL_SOCKET, SO_RCVBUFFORCE, 1265 (char *)&bufsize, sizeof(bufsize)); 1266 if (result) 1267 log_print("Error increasing buffer space on socket %d", result); 1268 1269 result = kernel_setsockopt(sock, SOL_SCTP, SCTP_NODELAY, (char *)&one, 1270 sizeof(one)); 1271 if (result < 0) 1272 log_print("Could not set SCTP NODELAY error %d\n", result); 1273 1274 /* Init con struct */ 1275 sock->sk->sk_user_data = con; 1276 con->sock = sock; 1277 con->sock->sk->sk_data_ready = lowcomms_data_ready; 1278 con->rx_action = sctp_accept_from_sock; 1279 con->connect_action = sctp_connect_to_sock; 1280 1281 /* Bind to all addresses. */ 1282 if (sctp_bind_addrs(con, dlm_config.ci_tcp_port)) 1283 goto create_delsock; 1284 1285 result = sock->ops->listen(sock, 5); 1286 if (result < 0) { 1287 log_print("Can't set socket listening"); 1288 goto create_delsock; 1289 } 1290 1291 return 0; 1292 1293 create_delsock: 1294 sock_release(sock); 1295 con->sock = NULL; 1296 out: 1297 return result; 1298 } 1299 1300 static int tcp_listen_for_all(void) 1301 { 1302 struct socket *sock = NULL; 1303 struct connection *con = nodeid2con(0, GFP_NOFS); 1304 int result = -EINVAL; 1305 1306 if (!con) 1307 return -ENOMEM; 1308 1309 /* We don't support multi-homed hosts */ 1310 if (dlm_local_addr[1] != NULL) { 1311 log_print("TCP protocol can't handle multi-homed hosts, " 1312 "try SCTP"); 1313 return -EINVAL; 1314 } 1315 1316 log_print("Using TCP for communications"); 1317 1318 sock = tcp_create_listen_sock(con, dlm_local_addr[0]); 1319 if (sock) { 1320 add_sock(sock, con); 1321 result = 0; 1322 } 1323 else { 1324 result = -EADDRINUSE; 1325 } 1326 1327 return result; 1328 } 1329 1330 1331 1332 static struct writequeue_entry *new_writequeue_entry(struct connection *con, 1333 gfp_t allocation) 1334 { 1335 struct writequeue_entry *entry; 1336 1337 entry = kmalloc(sizeof(struct writequeue_entry), allocation); 1338 if (!entry) 1339 return NULL; 1340 1341 entry->page = alloc_page(allocation); 1342 if (!entry->page) { 1343 kfree(entry); 1344 return NULL; 1345 } 1346 1347 entry->offset = 0; 1348 entry->len = 0; 1349 entry->end = 0; 1350 entry->users = 0; 1351 entry->con = con; 1352 1353 return entry; 1354 } 1355 1356 void *dlm_lowcomms_get_buffer(int nodeid, int len, gfp_t allocation, char **ppc) 1357 { 1358 struct connection *con; 1359 struct writequeue_entry *e; 1360 int offset = 0; 1361 1362 con = nodeid2con(nodeid, allocation); 1363 if (!con) 1364 return NULL; 1365 1366 spin_lock(&con->writequeue_lock); 1367 e = list_entry(con->writequeue.prev, struct writequeue_entry, list); 1368 if ((&e->list == &con->writequeue) || 1369 (PAGE_CACHE_SIZE - e->end < len)) { 1370 e = NULL; 1371 } else { 1372 offset = e->end; 1373 e->end += len; 1374 e->users++; 1375 } 1376 spin_unlock(&con->writequeue_lock); 1377 1378 if (e) { 1379 got_one: 1380 *ppc = page_address(e->page) + offset; 1381 return e; 1382 } 1383 1384 e = new_writequeue_entry(con, allocation); 1385 if (e) { 1386 spin_lock(&con->writequeue_lock); 1387 offset = e->end; 1388 e->end += len; 1389 e->users++; 1390 list_add_tail(&e->list, &con->writequeue); 1391 spin_unlock(&con->writequeue_lock); 1392 goto got_one; 1393 } 1394 return NULL; 1395 } 1396 1397 void dlm_lowcomms_commit_buffer(void *mh) 1398 { 1399 struct writequeue_entry *e = (struct writequeue_entry *)mh; 1400 struct connection *con = e->con; 1401 int users; 1402 1403 spin_lock(&con->writequeue_lock); 1404 users = --e->users; 1405 if (users) 1406 goto out; 1407 e->len = e->end - e->offset; 1408 spin_unlock(&con->writequeue_lock); 1409 1410 if (!test_and_set_bit(CF_WRITE_PENDING, &con->flags)) { 1411 queue_work(send_workqueue, &con->swork); 1412 } 1413 return; 1414 1415 out: 1416 spin_unlock(&con->writequeue_lock); 1417 return; 1418 } 1419 1420 /* Send a message */ 1421 static void send_to_sock(struct connection *con) 1422 { 1423 int ret = 0; 1424 const int msg_flags = MSG_DONTWAIT | MSG_NOSIGNAL; 1425 struct writequeue_entry *e; 1426 int len, offset; 1427 int count = 0; 1428 1429 mutex_lock(&con->sock_mutex); 1430 if (con->sock == NULL) 1431 goto out_connect; 1432 1433 spin_lock(&con->writequeue_lock); 1434 for (;;) { 1435 e = list_entry(con->writequeue.next, struct writequeue_entry, 1436 list); 1437 if ((struct list_head *) e == &con->writequeue) 1438 break; 1439 1440 len = e->len; 1441 offset = e->offset; 1442 BUG_ON(len == 0 && e->users == 0); 1443 spin_unlock(&con->writequeue_lock); 1444 1445 ret = 0; 1446 if (len) { 1447 ret = kernel_sendpage(con->sock, e->page, offset, len, 1448 msg_flags); 1449 if (ret == -EAGAIN || ret == 0) { 1450 if (ret == -EAGAIN && 1451 test_bit(SOCK_ASYNC_NOSPACE, &con->sock->flags) && 1452 !test_and_set_bit(CF_APP_LIMITED, &con->flags)) { 1453 /* Notify TCP that we're limited by the 1454 * application window size. 1455 */ 1456 set_bit(SOCK_NOSPACE, &con->sock->flags); 1457 con->sock->sk->sk_write_pending++; 1458 } 1459 cond_resched(); 1460 goto out; 1461 } else if (ret < 0) 1462 goto send_error; 1463 } 1464 1465 /* Don't starve people filling buffers */ 1466 if (++count >= MAX_SEND_MSG_COUNT) { 1467 cond_resched(); 1468 count = 0; 1469 } 1470 1471 spin_lock(&con->writequeue_lock); 1472 writequeue_entry_complete(e, ret); 1473 } 1474 spin_unlock(&con->writequeue_lock); 1475 out: 1476 mutex_unlock(&con->sock_mutex); 1477 return; 1478 1479 send_error: 1480 mutex_unlock(&con->sock_mutex); 1481 close_connection(con, false, false, true); 1482 lowcomms_connect_sock(con); 1483 return; 1484 1485 out_connect: 1486 mutex_unlock(&con->sock_mutex); 1487 lowcomms_connect_sock(con); 1488 } 1489 1490 static void clean_one_writequeue(struct connection *con) 1491 { 1492 struct writequeue_entry *e, *safe; 1493 1494 spin_lock(&con->writequeue_lock); 1495 list_for_each_entry_safe(e, safe, &con->writequeue, list) { 1496 list_del(&e->list); 1497 free_entry(e); 1498 } 1499 spin_unlock(&con->writequeue_lock); 1500 } 1501 1502 /* Called from recovery when it knows that a node has 1503 left the cluster */ 1504 int dlm_lowcomms_close(int nodeid) 1505 { 1506 struct connection *con; 1507 struct dlm_node_addr *na; 1508 1509 log_print("closing connection to node %d", nodeid); 1510 con = nodeid2con(nodeid, 0); 1511 if (con) { 1512 set_bit(CF_CLOSE, &con->flags); 1513 close_connection(con, true, true, true); 1514 clean_one_writequeue(con); 1515 } 1516 1517 spin_lock(&dlm_node_addrs_spin); 1518 na = find_node_addr(nodeid); 1519 if (na) { 1520 list_del(&na->list); 1521 while (na->addr_count--) 1522 kfree(na->addr[na->addr_count]); 1523 kfree(na); 1524 } 1525 spin_unlock(&dlm_node_addrs_spin); 1526 1527 return 0; 1528 } 1529 1530 /* Receive workqueue function */ 1531 static void process_recv_sockets(struct work_struct *work) 1532 { 1533 struct connection *con = container_of(work, struct connection, rwork); 1534 int err; 1535 1536 clear_bit(CF_READ_PENDING, &con->flags); 1537 do { 1538 err = con->rx_action(con); 1539 } while (!err); 1540 } 1541 1542 /* Send workqueue function */ 1543 static void process_send_sockets(struct work_struct *work) 1544 { 1545 struct connection *con = container_of(work, struct connection, swork); 1546 1547 if (test_and_clear_bit(CF_CONNECT_PENDING, &con->flags)) 1548 con->connect_action(con); 1549 if (test_and_clear_bit(CF_WRITE_PENDING, &con->flags)) 1550 send_to_sock(con); 1551 } 1552 1553 1554 /* Discard all entries on the write queues */ 1555 static void clean_writequeues(void) 1556 { 1557 foreach_conn(clean_one_writequeue); 1558 } 1559 1560 static void work_stop(void) 1561 { 1562 destroy_workqueue(recv_workqueue); 1563 destroy_workqueue(send_workqueue); 1564 } 1565 1566 static int work_start(void) 1567 { 1568 recv_workqueue = alloc_workqueue("dlm_recv", 1569 WQ_UNBOUND | WQ_MEM_RECLAIM, 1); 1570 if (!recv_workqueue) { 1571 log_print("can't start dlm_recv"); 1572 return -ENOMEM; 1573 } 1574 1575 send_workqueue = alloc_workqueue("dlm_send", 1576 WQ_UNBOUND | WQ_MEM_RECLAIM, 1); 1577 if (!send_workqueue) { 1578 log_print("can't start dlm_send"); 1579 destroy_workqueue(recv_workqueue); 1580 return -ENOMEM; 1581 } 1582 1583 return 0; 1584 } 1585 1586 static void stop_conn(struct connection *con) 1587 { 1588 con->flags |= 0x0F; 1589 if (con->sock && con->sock->sk) 1590 con->sock->sk->sk_user_data = NULL; 1591 } 1592 1593 static void free_conn(struct connection *con) 1594 { 1595 close_connection(con, true, true, true); 1596 if (con->othercon) 1597 kmem_cache_free(con_cache, con->othercon); 1598 hlist_del(&con->list); 1599 kmem_cache_free(con_cache, con); 1600 } 1601 1602 void dlm_lowcomms_stop(void) 1603 { 1604 /* Set all the flags to prevent any 1605 socket activity. 1606 */ 1607 mutex_lock(&connections_lock); 1608 dlm_allow_conn = 0; 1609 foreach_conn(stop_conn); 1610 mutex_unlock(&connections_lock); 1611 1612 work_stop(); 1613 1614 mutex_lock(&connections_lock); 1615 clean_writequeues(); 1616 1617 foreach_conn(free_conn); 1618 1619 mutex_unlock(&connections_lock); 1620 kmem_cache_destroy(con_cache); 1621 } 1622 1623 int dlm_lowcomms_start(void) 1624 { 1625 int error = -EINVAL; 1626 struct connection *con; 1627 int i; 1628 1629 for (i = 0; i < CONN_HASH_SIZE; i++) 1630 INIT_HLIST_HEAD(&connection_hash[i]); 1631 1632 init_local(); 1633 if (!dlm_local_count) { 1634 error = -ENOTCONN; 1635 log_print("no local IP address has been set"); 1636 goto fail; 1637 } 1638 1639 error = -ENOMEM; 1640 con_cache = kmem_cache_create("dlm_conn", sizeof(struct connection), 1641 __alignof__(struct connection), 0, 1642 NULL); 1643 if (!con_cache) 1644 goto fail; 1645 1646 error = work_start(); 1647 if (error) 1648 goto fail_destroy; 1649 1650 dlm_allow_conn = 1; 1651 1652 /* Start listening */ 1653 if (dlm_config.ci_protocol == 0) 1654 error = tcp_listen_for_all(); 1655 else 1656 error = sctp_listen_for_all(); 1657 if (error) 1658 goto fail_unlisten; 1659 1660 return 0; 1661 1662 fail_unlisten: 1663 dlm_allow_conn = 0; 1664 con = nodeid2con(0,0); 1665 if (con) { 1666 close_connection(con, false, true, true); 1667 kmem_cache_free(con_cache, con); 1668 } 1669 fail_destroy: 1670 kmem_cache_destroy(con_cache); 1671 fail: 1672 return error; 1673 } 1674 1675 void dlm_lowcomms_exit(void) 1676 { 1677 struct dlm_node_addr *na, *safe; 1678 1679 spin_lock(&dlm_node_addrs_spin); 1680 list_for_each_entry_safe(na, safe, &dlm_node_addrs, list) { 1681 list_del(&na->list); 1682 while (na->addr_count--) 1683 kfree(na->addr[na->addr_count]); 1684 kfree(na); 1685 } 1686 spin_unlock(&dlm_node_addrs_spin); 1687 } 1688