1 /* 2 * net/tipc/group.c: TIPC group messaging code 3 * 4 * Copyright (c) 2017, Ericsson AB 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions are met: 9 * 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. Neither the names of the copyright holders nor the names of its 16 * contributors may be used to endorse or promote products derived from 17 * this software without specific prior written permission. 18 * 19 * Alternatively, this software may be distributed under the terms of the 20 * GNU General Public License ("GPL") version 2 as published by the Free 21 * Software Foundation. 22 * 23 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" 24 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 26 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE 27 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 28 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 29 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 30 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 31 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 32 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 33 * POSSIBILITY OF SUCH DAMAGE. 34 */ 35 36 #include "core.h" 37 #include "addr.h" 38 #include "group.h" 39 #include "bcast.h" 40 #include "topsrv.h" 41 #include "msg.h" 42 #include "socket.h" 43 #include "node.h" 44 #include "name_table.h" 45 #include "subscr.h" 46 47 #define ADV_UNIT (((MAX_MSG_SIZE + MAX_H_SIZE) / FLOWCTL_BLK_SZ) + 1) 48 #define ADV_IDLE ADV_UNIT 49 #define ADV_ACTIVE (ADV_UNIT * 12) 50 51 enum mbr_state { 52 MBR_JOINING, 53 MBR_PUBLISHED, 54 MBR_JOINED, 55 MBR_PENDING, 56 MBR_ACTIVE, 57 MBR_RECLAIMING, 58 MBR_REMITTED, 59 MBR_LEAVING 60 }; 61 62 struct tipc_member { 63 struct rb_node tree_node; 64 struct list_head list; 65 struct list_head small_win; 66 struct sk_buff_head deferredq; 67 struct tipc_group *group; 68 u32 node; 69 u32 port; 70 u32 instance; 71 enum mbr_state state; 72 u16 advertised; 73 u16 window; 74 u16 bc_rcv_nxt; 75 u16 bc_syncpt; 76 u16 bc_acked; 77 }; 78 79 struct tipc_group { 80 struct rb_root members; 81 struct list_head small_win; 82 struct list_head pending; 83 struct list_head active; 84 struct tipc_nlist dests; 85 struct net *net; 86 int subid; 87 u32 type; 88 u32 instance; 89 u32 scope; 90 u32 portid; 91 u16 member_cnt; 92 u16 active_cnt; 93 u16 max_active; 94 u16 bc_snd_nxt; 95 u16 bc_ackers; 96 bool *open; 97 bool loopback; 98 bool events; 99 }; 100 101 static void tipc_group_proto_xmit(struct tipc_group *grp, struct tipc_member *m, 102 int mtyp, struct sk_buff_head *xmitq); 103 104 static void tipc_group_open(struct tipc_member *m, bool *wakeup) 105 { 106 *wakeup = false; 107 if (list_empty(&m->small_win)) 108 return; 109 list_del_init(&m->small_win); 110 *m->group->open = true; 111 *wakeup = true; 112 } 113 114 static void tipc_group_decr_active(struct tipc_group *grp, 115 struct tipc_member *m) 116 { 117 if (m->state == MBR_ACTIVE || m->state == MBR_RECLAIMING || 118 m->state == MBR_REMITTED) 119 grp->active_cnt--; 120 } 121 122 static int tipc_group_rcvbuf_limit(struct tipc_group *grp) 123 { 124 int max_active, active_pool, idle_pool; 125 int mcnt = grp->member_cnt + 1; 126 127 /* Limit simultaneous reception from other members */ 128 max_active = min(mcnt / 8, 64); 129 max_active = max(max_active, 16); 130 grp->max_active = max_active; 131 132 /* Reserve blocks for active and idle members */ 133 active_pool = max_active * ADV_ACTIVE; 134 idle_pool = (mcnt - max_active) * ADV_IDLE; 135 136 /* Scale to bytes, considering worst-case truesize/msgsize ratio */ 137 return (active_pool + idle_pool) * FLOWCTL_BLK_SZ * 4; 138 } 139 140 u16 tipc_group_bc_snd_nxt(struct tipc_group *grp) 141 { 142 return grp->bc_snd_nxt; 143 } 144 145 static bool tipc_group_is_receiver(struct tipc_member *m) 146 { 147 return m && m->state != MBR_JOINING && m->state != MBR_LEAVING; 148 } 149 150 static bool tipc_group_is_sender(struct tipc_member *m) 151 { 152 return m && m->state != MBR_JOINING && m->state != MBR_PUBLISHED; 153 } 154 155 u32 tipc_group_exclude(struct tipc_group *grp) 156 { 157 if (!grp->loopback) 158 return grp->portid; 159 return 0; 160 } 161 162 struct tipc_group *tipc_group_create(struct net *net, u32 portid, 163 struct tipc_group_req *mreq, 164 bool *group_is_open) 165 { 166 u32 filter = TIPC_SUB_PORTS | TIPC_SUB_NO_STATUS; 167 bool global = mreq->scope != TIPC_NODE_SCOPE; 168 struct tipc_group *grp; 169 u32 type = mreq->type; 170 171 grp = kzalloc(sizeof(*grp), GFP_ATOMIC); 172 if (!grp) 173 return NULL; 174 tipc_nlist_init(&grp->dests, tipc_own_addr(net)); 175 INIT_LIST_HEAD(&grp->small_win); 176 INIT_LIST_HEAD(&grp->active); 177 INIT_LIST_HEAD(&grp->pending); 178 grp->members = RB_ROOT; 179 grp->net = net; 180 grp->portid = portid; 181 grp->type = type; 182 grp->instance = mreq->instance; 183 grp->scope = mreq->scope; 184 grp->loopback = mreq->flags & TIPC_GROUP_LOOPBACK; 185 grp->events = mreq->flags & TIPC_GROUP_MEMBER_EVTS; 186 grp->open = group_is_open; 187 *grp->open = false; 188 filter |= global ? TIPC_SUB_CLUSTER_SCOPE : TIPC_SUB_NODE_SCOPE; 189 if (tipc_topsrv_kern_subscr(net, portid, type, 0, ~0, 190 filter, &grp->subid)) 191 return grp; 192 kfree(grp); 193 return NULL; 194 } 195 196 void tipc_group_join(struct net *net, struct tipc_group *grp, int *sk_rcvbuf) 197 { 198 struct rb_root *tree = &grp->members; 199 struct tipc_member *m, *tmp; 200 struct sk_buff_head xmitq; 201 202 skb_queue_head_init(&xmitq); 203 rbtree_postorder_for_each_entry_safe(m, tmp, tree, tree_node) { 204 tipc_group_proto_xmit(grp, m, GRP_JOIN_MSG, &xmitq); 205 tipc_group_update_member(m, 0); 206 } 207 tipc_node_distr_xmit(net, &xmitq); 208 *sk_rcvbuf = tipc_group_rcvbuf_limit(grp); 209 } 210 211 void tipc_group_delete(struct net *net, struct tipc_group *grp) 212 { 213 struct rb_root *tree = &grp->members; 214 struct tipc_member *m, *tmp; 215 struct sk_buff_head xmitq; 216 217 __skb_queue_head_init(&xmitq); 218 219 rbtree_postorder_for_each_entry_safe(m, tmp, tree, tree_node) { 220 tipc_group_proto_xmit(grp, m, GRP_LEAVE_MSG, &xmitq); 221 __skb_queue_purge(&m->deferredq); 222 list_del(&m->list); 223 kfree(m); 224 } 225 tipc_node_distr_xmit(net, &xmitq); 226 tipc_nlist_purge(&grp->dests); 227 tipc_topsrv_kern_unsubscr(net, grp->subid); 228 kfree(grp); 229 } 230 231 static struct tipc_member *tipc_group_find_member(struct tipc_group *grp, 232 u32 node, u32 port) 233 { 234 struct rb_node *n = grp->members.rb_node; 235 u64 nkey, key = (u64)node << 32 | port; 236 struct tipc_member *m; 237 238 while (n) { 239 m = container_of(n, struct tipc_member, tree_node); 240 nkey = (u64)m->node << 32 | m->port; 241 if (key < nkey) 242 n = n->rb_left; 243 else if (key > nkey) 244 n = n->rb_right; 245 else 246 return m; 247 } 248 return NULL; 249 } 250 251 static struct tipc_member *tipc_group_find_dest(struct tipc_group *grp, 252 u32 node, u32 port) 253 { 254 struct tipc_member *m; 255 256 m = tipc_group_find_member(grp, node, port); 257 if (m && tipc_group_is_receiver(m)) 258 return m; 259 return NULL; 260 } 261 262 static struct tipc_member *tipc_group_find_node(struct tipc_group *grp, 263 u32 node) 264 { 265 struct tipc_member *m; 266 struct rb_node *n; 267 268 for (n = rb_first(&grp->members); n; n = rb_next(n)) { 269 m = container_of(n, struct tipc_member, tree_node); 270 if (m->node == node) 271 return m; 272 } 273 return NULL; 274 } 275 276 static void tipc_group_add_to_tree(struct tipc_group *grp, 277 struct tipc_member *m) 278 { 279 u64 nkey, key = (u64)m->node << 32 | m->port; 280 struct rb_node **n, *parent = NULL; 281 struct tipc_member *tmp; 282 283 n = &grp->members.rb_node; 284 while (*n) { 285 tmp = container_of(*n, struct tipc_member, tree_node); 286 parent = *n; 287 tmp = container_of(parent, struct tipc_member, tree_node); 288 nkey = (u64)tmp->node << 32 | tmp->port; 289 if (key < nkey) 290 n = &(*n)->rb_left; 291 else if (key > nkey) 292 n = &(*n)->rb_right; 293 else 294 return; 295 } 296 rb_link_node(&m->tree_node, parent, n); 297 rb_insert_color(&m->tree_node, &grp->members); 298 } 299 300 static struct tipc_member *tipc_group_create_member(struct tipc_group *grp, 301 u32 node, u32 port, 302 u32 instance, int state) 303 { 304 struct tipc_member *m; 305 306 m = kzalloc(sizeof(*m), GFP_ATOMIC); 307 if (!m) 308 return NULL; 309 INIT_LIST_HEAD(&m->list); 310 INIT_LIST_HEAD(&m->small_win); 311 __skb_queue_head_init(&m->deferredq); 312 m->group = grp; 313 m->node = node; 314 m->port = port; 315 m->instance = instance; 316 m->bc_acked = grp->bc_snd_nxt - 1; 317 grp->member_cnt++; 318 tipc_group_add_to_tree(grp, m); 319 tipc_nlist_add(&grp->dests, m->node); 320 m->state = state; 321 return m; 322 } 323 324 void tipc_group_add_member(struct tipc_group *grp, u32 node, 325 u32 port, u32 instance) 326 { 327 tipc_group_create_member(grp, node, port, instance, MBR_PUBLISHED); 328 } 329 330 static void tipc_group_delete_member(struct tipc_group *grp, 331 struct tipc_member *m) 332 { 333 rb_erase(&m->tree_node, &grp->members); 334 grp->member_cnt--; 335 336 /* Check if we were waiting for replicast ack from this member */ 337 if (grp->bc_ackers && less(m->bc_acked, grp->bc_snd_nxt - 1)) 338 grp->bc_ackers--; 339 340 list_del_init(&m->list); 341 list_del_init(&m->small_win); 342 tipc_group_decr_active(grp, m); 343 344 /* If last member on a node, remove node from dest list */ 345 if (!tipc_group_find_node(grp, m->node)) 346 tipc_nlist_del(&grp->dests, m->node); 347 348 kfree(m); 349 } 350 351 struct tipc_nlist *tipc_group_dests(struct tipc_group *grp) 352 { 353 return &grp->dests; 354 } 355 356 void tipc_group_self(struct tipc_group *grp, struct tipc_name_seq *seq, 357 int *scope) 358 { 359 seq->type = grp->type; 360 seq->lower = grp->instance; 361 seq->upper = grp->instance; 362 *scope = grp->scope; 363 } 364 365 void tipc_group_update_member(struct tipc_member *m, int len) 366 { 367 struct tipc_group *grp = m->group; 368 struct tipc_member *_m, *tmp; 369 370 if (!tipc_group_is_receiver(m)) 371 return; 372 373 m->window -= len; 374 375 if (m->window >= ADV_IDLE) 376 return; 377 378 list_del_init(&m->small_win); 379 380 /* Sort member into small_window members' list */ 381 list_for_each_entry_safe(_m, tmp, &grp->small_win, small_win) { 382 if (_m->window > m->window) 383 break; 384 } 385 list_add_tail(&m->small_win, &_m->small_win); 386 } 387 388 void tipc_group_update_bc_members(struct tipc_group *grp, int len, bool ack) 389 { 390 u16 prev = grp->bc_snd_nxt - 1; 391 struct tipc_member *m; 392 struct rb_node *n; 393 u16 ackers = 0; 394 395 for (n = rb_first(&grp->members); n; n = rb_next(n)) { 396 m = container_of(n, struct tipc_member, tree_node); 397 if (tipc_group_is_receiver(m)) { 398 tipc_group_update_member(m, len); 399 m->bc_acked = prev; 400 ackers++; 401 } 402 } 403 404 /* Mark number of acknowledges to expect, if any */ 405 if (ack) 406 grp->bc_ackers = ackers; 407 grp->bc_snd_nxt++; 408 } 409 410 bool tipc_group_cong(struct tipc_group *grp, u32 dnode, u32 dport, 411 int len, struct tipc_member **mbr) 412 { 413 struct sk_buff_head xmitq; 414 struct tipc_member *m; 415 int adv, state; 416 417 m = tipc_group_find_dest(grp, dnode, dport); 418 if (!tipc_group_is_receiver(m)) { 419 *mbr = NULL; 420 return false; 421 } 422 *mbr = m; 423 424 if (m->window >= len) 425 return false; 426 427 *grp->open = false; 428 429 /* If not fully advertised, do it now to prevent mutual blocking */ 430 adv = m->advertised; 431 state = m->state; 432 if (state == MBR_JOINED && adv == ADV_IDLE) 433 return true; 434 if (state == MBR_ACTIVE && adv == ADV_ACTIVE) 435 return true; 436 if (state == MBR_PENDING && adv == ADV_IDLE) 437 return true; 438 skb_queue_head_init(&xmitq); 439 tipc_group_proto_xmit(grp, m, GRP_ADV_MSG, &xmitq); 440 tipc_node_distr_xmit(grp->net, &xmitq); 441 return true; 442 } 443 444 bool tipc_group_bc_cong(struct tipc_group *grp, int len) 445 { 446 struct tipc_member *m = NULL; 447 448 /* If prev bcast was replicast, reject until all receivers have acked */ 449 if (grp->bc_ackers) { 450 *grp->open = false; 451 return true; 452 } 453 if (list_empty(&grp->small_win)) 454 return false; 455 456 m = list_first_entry(&grp->small_win, struct tipc_member, small_win); 457 if (m->window >= len) 458 return false; 459 460 return tipc_group_cong(grp, m->node, m->port, len, &m); 461 } 462 463 /* tipc_group_sort_msg() - sort msg into queue by bcast sequence number 464 */ 465 static void tipc_group_sort_msg(struct sk_buff *skb, struct sk_buff_head *defq) 466 { 467 struct tipc_msg *_hdr, *hdr = buf_msg(skb); 468 u16 bc_seqno = msg_grp_bc_seqno(hdr); 469 struct sk_buff *_skb, *tmp; 470 int mtyp = msg_type(hdr); 471 472 /* Bcast/mcast may be bypassed by ucast or other bcast, - sort it in */ 473 if (mtyp == TIPC_GRP_BCAST_MSG || mtyp == TIPC_GRP_MCAST_MSG) { 474 skb_queue_walk_safe(defq, _skb, tmp) { 475 _hdr = buf_msg(_skb); 476 if (!less(bc_seqno, msg_grp_bc_seqno(_hdr))) 477 continue; 478 __skb_queue_before(defq, _skb, skb); 479 return; 480 } 481 /* Bcast was not bypassed, - add to tail */ 482 } 483 /* Unicasts are never bypassed, - always add to tail */ 484 __skb_queue_tail(defq, skb); 485 } 486 487 /* tipc_group_filter_msg() - determine if we should accept arriving message 488 */ 489 void tipc_group_filter_msg(struct tipc_group *grp, struct sk_buff_head *inputq, 490 struct sk_buff_head *xmitq) 491 { 492 struct sk_buff *skb = __skb_dequeue(inputq); 493 bool ack, deliver, update, leave = false; 494 struct sk_buff_head *defq; 495 struct tipc_member *m; 496 struct tipc_msg *hdr; 497 u32 node, port; 498 int mtyp, blks; 499 500 if (!skb) 501 return; 502 503 hdr = buf_msg(skb); 504 node = msg_orignode(hdr); 505 port = msg_origport(hdr); 506 507 if (!msg_in_group(hdr)) 508 goto drop; 509 510 m = tipc_group_find_member(grp, node, port); 511 if (!tipc_group_is_sender(m)) 512 goto drop; 513 514 if (less(msg_grp_bc_seqno(hdr), m->bc_rcv_nxt)) 515 goto drop; 516 517 TIPC_SKB_CB(skb)->orig_member = m->instance; 518 defq = &m->deferredq; 519 tipc_group_sort_msg(skb, defq); 520 521 while ((skb = skb_peek(defq))) { 522 hdr = buf_msg(skb); 523 mtyp = msg_type(hdr); 524 blks = msg_blocks(hdr); 525 deliver = true; 526 ack = false; 527 update = false; 528 529 if (more(msg_grp_bc_seqno(hdr), m->bc_rcv_nxt)) 530 break; 531 532 /* Decide what to do with message */ 533 switch (mtyp) { 534 case TIPC_GRP_MCAST_MSG: 535 if (msg_nameinst(hdr) != grp->instance) { 536 update = true; 537 deliver = false; 538 } 539 /* Fall thru */ 540 case TIPC_GRP_BCAST_MSG: 541 m->bc_rcv_nxt++; 542 ack = msg_grp_bc_ack_req(hdr); 543 break; 544 case TIPC_GRP_UCAST_MSG: 545 break; 546 case TIPC_GRP_MEMBER_EVT: 547 if (m->state == MBR_LEAVING) 548 leave = true; 549 if (!grp->events) 550 deliver = false; 551 break; 552 default: 553 break; 554 } 555 556 /* Execute decisions */ 557 __skb_dequeue(defq); 558 if (deliver) 559 __skb_queue_tail(inputq, skb); 560 else 561 kfree_skb(skb); 562 563 if (ack) 564 tipc_group_proto_xmit(grp, m, GRP_ACK_MSG, xmitq); 565 566 if (leave) { 567 __skb_queue_purge(defq); 568 tipc_group_delete_member(grp, m); 569 break; 570 } 571 if (!update) 572 continue; 573 574 tipc_group_update_rcv_win(grp, blks, node, port, xmitq); 575 } 576 return; 577 drop: 578 kfree_skb(skb); 579 } 580 581 void tipc_group_update_rcv_win(struct tipc_group *grp, int blks, u32 node, 582 u32 port, struct sk_buff_head *xmitq) 583 { 584 struct list_head *active = &grp->active; 585 int max_active = grp->max_active; 586 int reclaim_limit = max_active * 3 / 4; 587 int active_cnt = grp->active_cnt; 588 struct tipc_member *m, *rm, *pm; 589 590 m = tipc_group_find_member(grp, node, port); 591 if (!m) 592 return; 593 594 m->advertised -= blks; 595 596 switch (m->state) { 597 case MBR_JOINED: 598 /* First, decide if member can go active */ 599 if (active_cnt <= max_active) { 600 m->state = MBR_ACTIVE; 601 list_add_tail(&m->list, active); 602 grp->active_cnt++; 603 tipc_group_proto_xmit(grp, m, GRP_ADV_MSG, xmitq); 604 } else { 605 m->state = MBR_PENDING; 606 list_add_tail(&m->list, &grp->pending); 607 } 608 609 if (active_cnt < reclaim_limit) 610 break; 611 612 /* Reclaim from oldest active member, if possible */ 613 if (!list_empty(active)) { 614 rm = list_first_entry(active, struct tipc_member, list); 615 rm->state = MBR_RECLAIMING; 616 list_del_init(&rm->list); 617 tipc_group_proto_xmit(grp, rm, GRP_RECLAIM_MSG, xmitq); 618 break; 619 } 620 /* Nobody to reclaim from; - revert oldest pending to JOINED */ 621 pm = list_first_entry(&grp->pending, struct tipc_member, list); 622 list_del_init(&pm->list); 623 pm->state = MBR_JOINED; 624 tipc_group_proto_xmit(grp, pm, GRP_ADV_MSG, xmitq); 625 break; 626 case MBR_ACTIVE: 627 if (!list_is_last(&m->list, &grp->active)) 628 list_move_tail(&m->list, &grp->active); 629 if (m->advertised > (ADV_ACTIVE * 3 / 4)) 630 break; 631 tipc_group_proto_xmit(grp, m, GRP_ADV_MSG, xmitq); 632 break; 633 case MBR_REMITTED: 634 if (m->advertised > ADV_IDLE) 635 break; 636 m->state = MBR_JOINED; 637 grp->active_cnt--; 638 if (m->advertised < ADV_IDLE) { 639 pr_warn_ratelimited("Rcv unexpected msg after REMIT\n"); 640 tipc_group_proto_xmit(grp, m, GRP_ADV_MSG, xmitq); 641 } 642 643 if (list_empty(&grp->pending)) 644 return; 645 646 /* Set oldest pending member to active and advertise */ 647 pm = list_first_entry(&grp->pending, struct tipc_member, list); 648 pm->state = MBR_ACTIVE; 649 list_move_tail(&pm->list, &grp->active); 650 grp->active_cnt++; 651 tipc_group_proto_xmit(grp, pm, GRP_ADV_MSG, xmitq); 652 break; 653 case MBR_RECLAIMING: 654 case MBR_JOINING: 655 case MBR_LEAVING: 656 default: 657 break; 658 } 659 } 660 661 static void tipc_group_create_event(struct tipc_group *grp, 662 struct tipc_member *m, 663 u32 event, u16 seqno, 664 struct sk_buff_head *inputq) 665 { u32 dnode = tipc_own_addr(grp->net); 666 struct tipc_event evt; 667 struct sk_buff *skb; 668 struct tipc_msg *hdr; 669 670 memset(&evt, 0, sizeof(evt)); 671 evt.event = event; 672 evt.found_lower = m->instance; 673 evt.found_upper = m->instance; 674 evt.port.ref = m->port; 675 evt.port.node = m->node; 676 evt.s.seq.type = grp->type; 677 evt.s.seq.lower = m->instance; 678 evt.s.seq.upper = m->instance; 679 680 skb = tipc_msg_create(TIPC_CRITICAL_IMPORTANCE, TIPC_GRP_MEMBER_EVT, 681 GROUP_H_SIZE, sizeof(evt), dnode, m->node, 682 grp->portid, m->port, 0); 683 if (!skb) 684 return; 685 686 hdr = buf_msg(skb); 687 msg_set_nametype(hdr, grp->type); 688 msg_set_grp_evt(hdr, event); 689 msg_set_dest_droppable(hdr, true); 690 msg_set_grp_bc_seqno(hdr, seqno); 691 memcpy(msg_data(hdr), &evt, sizeof(evt)); 692 TIPC_SKB_CB(skb)->orig_member = m->instance; 693 __skb_queue_tail(inputq, skb); 694 } 695 696 static void tipc_group_proto_xmit(struct tipc_group *grp, struct tipc_member *m, 697 int mtyp, struct sk_buff_head *xmitq) 698 { 699 struct tipc_msg *hdr; 700 struct sk_buff *skb; 701 int adv = 0; 702 703 skb = tipc_msg_create(GROUP_PROTOCOL, mtyp, INT_H_SIZE, 0, 704 m->node, tipc_own_addr(grp->net), 705 m->port, grp->portid, 0); 706 if (!skb) 707 return; 708 709 if (m->state == MBR_ACTIVE) 710 adv = ADV_ACTIVE - m->advertised; 711 else if (m->state == MBR_JOINED || m->state == MBR_PENDING) 712 adv = ADV_IDLE - m->advertised; 713 714 hdr = buf_msg(skb); 715 716 if (mtyp == GRP_JOIN_MSG) { 717 msg_set_grp_bc_syncpt(hdr, grp->bc_snd_nxt); 718 msg_set_adv_win(hdr, adv); 719 m->advertised += adv; 720 } else if (mtyp == GRP_LEAVE_MSG) { 721 msg_set_grp_bc_syncpt(hdr, grp->bc_snd_nxt); 722 } else if (mtyp == GRP_ADV_MSG) { 723 msg_set_adv_win(hdr, adv); 724 m->advertised += adv; 725 } else if (mtyp == GRP_ACK_MSG) { 726 msg_set_grp_bc_acked(hdr, m->bc_rcv_nxt); 727 } else if (mtyp == GRP_REMIT_MSG) { 728 msg_set_grp_remitted(hdr, m->window); 729 } 730 msg_set_dest_droppable(hdr, true); 731 __skb_queue_tail(xmitq, skb); 732 } 733 734 void tipc_group_proto_rcv(struct tipc_group *grp, bool *usr_wakeup, 735 struct tipc_msg *hdr, struct sk_buff_head *inputq, 736 struct sk_buff_head *xmitq) 737 { 738 u32 node = msg_orignode(hdr); 739 u32 port = msg_origport(hdr); 740 struct tipc_member *m, *pm; 741 u16 remitted, in_flight; 742 743 if (!grp) 744 return; 745 746 if (grp->scope == TIPC_NODE_SCOPE && node != tipc_own_addr(grp->net)) 747 return; 748 749 m = tipc_group_find_member(grp, node, port); 750 751 switch (msg_type(hdr)) { 752 case GRP_JOIN_MSG: 753 if (!m) 754 m = tipc_group_create_member(grp, node, port, 755 0, MBR_JOINING); 756 if (!m) 757 return; 758 m->bc_syncpt = msg_grp_bc_syncpt(hdr); 759 m->bc_rcv_nxt = m->bc_syncpt; 760 m->window += msg_adv_win(hdr); 761 762 /* Wait until PUBLISH event is received if necessary */ 763 if (m->state != MBR_PUBLISHED) 764 return; 765 766 /* Member can be taken into service */ 767 m->state = MBR_JOINED; 768 tipc_group_open(m, usr_wakeup); 769 tipc_group_update_member(m, 0); 770 tipc_group_proto_xmit(grp, m, GRP_ADV_MSG, xmitq); 771 tipc_group_create_event(grp, m, TIPC_PUBLISHED, 772 m->bc_syncpt, inputq); 773 return; 774 case GRP_LEAVE_MSG: 775 if (!m) 776 return; 777 m->bc_syncpt = msg_grp_bc_syncpt(hdr); 778 list_del_init(&m->list); 779 tipc_group_open(m, usr_wakeup); 780 tipc_group_decr_active(grp, m); 781 m->state = MBR_LEAVING; 782 tipc_group_create_event(grp, m, TIPC_WITHDRAWN, 783 m->bc_syncpt, inputq); 784 return; 785 case GRP_ADV_MSG: 786 if (!m) 787 return; 788 m->window += msg_adv_win(hdr); 789 tipc_group_open(m, usr_wakeup); 790 return; 791 case GRP_ACK_MSG: 792 if (!m) 793 return; 794 m->bc_acked = msg_grp_bc_acked(hdr); 795 if (--grp->bc_ackers) 796 return; 797 list_del_init(&m->small_win); 798 *m->group->open = true; 799 *usr_wakeup = true; 800 tipc_group_update_member(m, 0); 801 return; 802 case GRP_RECLAIM_MSG: 803 if (!m) 804 return; 805 tipc_group_proto_xmit(grp, m, GRP_REMIT_MSG, xmitq); 806 m->window = ADV_IDLE; 807 tipc_group_open(m, usr_wakeup); 808 return; 809 case GRP_REMIT_MSG: 810 if (!m || m->state != MBR_RECLAIMING) 811 return; 812 813 remitted = msg_grp_remitted(hdr); 814 815 /* Messages preceding the REMIT still in receive queue */ 816 if (m->advertised > remitted) { 817 m->state = MBR_REMITTED; 818 in_flight = m->advertised - remitted; 819 m->advertised = ADV_IDLE + in_flight; 820 return; 821 } 822 /* This should never happen */ 823 if (m->advertised < remitted) 824 pr_warn_ratelimited("Unexpected REMIT msg\n"); 825 826 /* All messages preceding the REMIT have been read */ 827 m->state = MBR_JOINED; 828 grp->active_cnt--; 829 m->advertised = ADV_IDLE; 830 831 /* Set oldest pending member to active and advertise */ 832 if (list_empty(&grp->pending)) 833 return; 834 pm = list_first_entry(&grp->pending, struct tipc_member, list); 835 pm->state = MBR_ACTIVE; 836 list_move_tail(&pm->list, &grp->active); 837 grp->active_cnt++; 838 if (pm->advertised <= (ADV_ACTIVE * 3 / 4)) 839 tipc_group_proto_xmit(grp, pm, GRP_ADV_MSG, xmitq); 840 return; 841 default: 842 pr_warn("Received unknown GROUP_PROTO message\n"); 843 } 844 } 845 846 /* tipc_group_member_evt() - receive and handle a member up/down event 847 */ 848 void tipc_group_member_evt(struct tipc_group *grp, 849 bool *usr_wakeup, 850 int *sk_rcvbuf, 851 struct tipc_msg *hdr, 852 struct sk_buff_head *inputq, 853 struct sk_buff_head *xmitq) 854 { 855 struct tipc_event *evt = (void *)msg_data(hdr); 856 u32 instance = evt->found_lower; 857 u32 node = evt->port.node; 858 u32 port = evt->port.ref; 859 int event = evt->event; 860 struct tipc_member *m; 861 struct net *net; 862 u32 self; 863 864 if (!grp) 865 return; 866 867 net = grp->net; 868 self = tipc_own_addr(net); 869 if (!grp->loopback && node == self && port == grp->portid) 870 return; 871 872 m = tipc_group_find_member(grp, node, port); 873 874 switch (event) { 875 case TIPC_PUBLISHED: 876 /* Send and wait for arrival of JOIN message if necessary */ 877 if (!m) { 878 m = tipc_group_create_member(grp, node, port, instance, 879 MBR_PUBLISHED); 880 if (!m) 881 break; 882 tipc_group_update_member(m, 0); 883 tipc_group_proto_xmit(grp, m, GRP_JOIN_MSG, xmitq); 884 break; 885 } 886 887 if (m->state != MBR_JOINING) 888 break; 889 890 /* Member can be taken into service */ 891 m->instance = instance; 892 m->state = MBR_JOINED; 893 tipc_group_open(m, usr_wakeup); 894 tipc_group_update_member(m, 0); 895 tipc_group_proto_xmit(grp, m, GRP_JOIN_MSG, xmitq); 896 tipc_group_create_event(grp, m, TIPC_PUBLISHED, 897 m->bc_syncpt, inputq); 898 break; 899 case TIPC_WITHDRAWN: 900 if (!m) 901 break; 902 903 tipc_group_decr_active(grp, m); 904 m->state = MBR_LEAVING; 905 list_del_init(&m->list); 906 tipc_group_open(m, usr_wakeup); 907 908 /* Only send event if no LEAVE message can be expected */ 909 if (!tipc_node_is_up(net, node)) 910 tipc_group_create_event(grp, m, TIPC_WITHDRAWN, 911 m->bc_rcv_nxt, inputq); 912 break; 913 default: 914 break; 915 } 916 *sk_rcvbuf = tipc_group_rcvbuf_limit(grp); 917 } 918 919 int tipc_group_fill_sock_diag(struct tipc_group *grp, struct sk_buff *skb) 920 { 921 struct nlattr *group = nla_nest_start_noflag(skb, TIPC_NLA_SOCK_GROUP); 922 923 if (!group) 924 return -EMSGSIZE; 925 926 if (nla_put_u32(skb, TIPC_NLA_SOCK_GROUP_ID, 927 grp->type) || 928 nla_put_u32(skb, TIPC_NLA_SOCK_GROUP_INSTANCE, 929 grp->instance) || 930 nla_put_u32(skb, TIPC_NLA_SOCK_GROUP_BC_SEND_NEXT, 931 grp->bc_snd_nxt)) 932 goto group_msg_cancel; 933 934 if (grp->scope == TIPC_NODE_SCOPE) 935 if (nla_put_flag(skb, TIPC_NLA_SOCK_GROUP_NODE_SCOPE)) 936 goto group_msg_cancel; 937 938 if (grp->scope == TIPC_CLUSTER_SCOPE) 939 if (nla_put_flag(skb, TIPC_NLA_SOCK_GROUP_CLUSTER_SCOPE)) 940 goto group_msg_cancel; 941 942 if (*grp->open) 943 if (nla_put_flag(skb, TIPC_NLA_SOCK_GROUP_OPEN)) 944 goto group_msg_cancel; 945 946 nla_nest_end(skb, group); 947 return 0; 948 949 group_msg_cancel: 950 nla_nest_cancel(skb, group); 951 return -1; 952 } 953