1 /*-
2 * SPDX-License-Identifier: BSD-2-Clause OR GPL-2.0
3 *
4 * Copyright (c) 2006 Intel Corporation. All rights reserved.
5 *
6 * This software is available to you under a choice of one of two
7 * licenses. You may choose to be licensed under the terms of the GNU
8 * General Public License (GPL) Version 2, available from the file
9 * COPYING in the main directory of this source tree, or the
10 * OpenIB.org BSD license below:
11 *
12 * Redistribution and use in source and binary forms, with or
13 * without modification, are permitted provided that the following
14 * conditions are met:
15 *
16 * - Redistributions of source code must retain the above
17 * copyright notice, this list of conditions and the following
18 * disclaimer.
19 *
20 * - Redistributions in binary form must reproduce the above
21 * copyright notice, this list of conditions and the following
22 * disclaimer in the documentation and/or other materials
23 * provided with the distribution.
24 *
25 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
26 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
27 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
28 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
29 * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
30 * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
31 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
32 * SOFTWARE.
33 */
34
35 #include <sys/cdefs.h>
36 #define LINUXKPI_PARAM_PREFIX ibcore_
37
38 #include <linux/completion.h>
39 #include <linux/dma-mapping.h>
40 #include <linux/err.h>
41 #include <linux/interrupt.h>
42 #include <linux/slab.h>
43 #include <linux/bitops.h>
44 #include <linux/random.h>
45 #include <linux/rbtree.h>
46
47 #include <rdma/ib_cache.h>
48 #include "sa.h"
49
50 static void mcast_add_one(struct ib_device *device);
51 static void mcast_remove_one(struct ib_device *device, void *client_data);
52
53 static struct ib_client mcast_client = {
54 .name = "ib_multicast",
55 .add = mcast_add_one,
56 .remove = mcast_remove_one
57 };
58
59 static struct ib_sa_client sa_client;
60 static struct workqueue_struct *mcast_wq;
61 static union ib_gid mgid0;
62
63 struct mcast_device;
64
65 struct mcast_port {
66 struct mcast_device *dev;
67 spinlock_t lock;
68 struct rb_root table;
69 atomic_t refcount;
70 struct completion comp;
71 u8 port_num;
72 };
73
74 struct mcast_device {
75 struct ib_device *device;
76 struct ib_event_handler event_handler;
77 int start_port;
78 int end_port;
79 struct mcast_port port[0];
80 };
81
82 enum mcast_state {
83 MCAST_JOINING,
84 MCAST_MEMBER,
85 MCAST_ERROR,
86 };
87
88 enum mcast_group_state {
89 MCAST_IDLE,
90 MCAST_BUSY,
91 MCAST_GROUP_ERROR,
92 MCAST_PKEY_EVENT
93 };
94
95 enum {
96 MCAST_INVALID_PKEY_INDEX = 0xFFFF
97 };
98
99 struct mcast_member;
100
101 struct mcast_group {
102 struct ib_sa_mcmember_rec rec;
103 struct rb_node node;
104 struct mcast_port *port;
105 spinlock_t lock;
106 struct work_struct work;
107 struct list_head pending_list;
108 struct list_head active_list;
109 struct mcast_member *last_join;
110 int members[NUM_JOIN_MEMBERSHIP_TYPES];
111 atomic_t refcount;
112 enum mcast_group_state state;
113 struct ib_sa_query *query;
114 u16 pkey_index;
115 u8 leave_state;
116 int retries;
117 };
118
119 struct mcast_member {
120 struct ib_sa_multicast multicast;
121 struct ib_sa_client *client;
122 struct mcast_group *group;
123 struct list_head list;
124 enum mcast_state state;
125 atomic_t refcount;
126 struct completion comp;
127 };
128
129 static void join_handler(int status, struct ib_sa_mcmember_rec *rec,
130 void *context);
131 static void leave_handler(int status, struct ib_sa_mcmember_rec *rec,
132 void *context);
133
mcast_find(struct mcast_port * port,union ib_gid * mgid)134 static struct mcast_group *mcast_find(struct mcast_port *port,
135 union ib_gid *mgid)
136 {
137 struct rb_node *node = port->table.rb_node;
138 struct mcast_group *group;
139 int ret;
140
141 while (node) {
142 group = rb_entry(node, struct mcast_group, node);
143 ret = memcmp(mgid->raw, group->rec.mgid.raw, sizeof *mgid);
144 if (!ret)
145 return group;
146
147 if (ret < 0)
148 node = node->rb_left;
149 else
150 node = node->rb_right;
151 }
152 return NULL;
153 }
154
mcast_insert(struct mcast_port * port,struct mcast_group * group,int allow_duplicates)155 static struct mcast_group *mcast_insert(struct mcast_port *port,
156 struct mcast_group *group,
157 int allow_duplicates)
158 {
159 struct rb_node **link = &port->table.rb_node;
160 struct rb_node *parent = NULL;
161 struct mcast_group *cur_group;
162 int ret;
163
164 while (*link) {
165 parent = *link;
166 cur_group = rb_entry(parent, struct mcast_group, node);
167
168 ret = memcmp(group->rec.mgid.raw, cur_group->rec.mgid.raw,
169 sizeof group->rec.mgid);
170 if (ret < 0)
171 link = &(*link)->rb_left;
172 else if (ret > 0)
173 link = &(*link)->rb_right;
174 else if (allow_duplicates)
175 link = &(*link)->rb_left;
176 else
177 return cur_group;
178 }
179 rb_link_node(&group->node, parent, link);
180 rb_insert_color(&group->node, &port->table);
181 return NULL;
182 }
183
deref_port(struct mcast_port * port)184 static void deref_port(struct mcast_port *port)
185 {
186 if (atomic_dec_and_test(&port->refcount))
187 complete(&port->comp);
188 }
189
release_group(struct mcast_group * group)190 static void release_group(struct mcast_group *group)
191 {
192 struct mcast_port *port = group->port;
193 unsigned long flags;
194
195 spin_lock_irqsave(&port->lock, flags);
196 if (atomic_dec_and_test(&group->refcount)) {
197 rb_erase(&group->node, &port->table);
198 spin_unlock_irqrestore(&port->lock, flags);
199 kfree(group);
200 deref_port(port);
201 } else
202 spin_unlock_irqrestore(&port->lock, flags);
203 }
204
deref_member(struct mcast_member * member)205 static void deref_member(struct mcast_member *member)
206 {
207 if (atomic_dec_and_test(&member->refcount))
208 complete(&member->comp);
209 }
210
queue_join(struct mcast_member * member)211 static void queue_join(struct mcast_member *member)
212 {
213 struct mcast_group *group = member->group;
214 unsigned long flags;
215
216 spin_lock_irqsave(&group->lock, flags);
217 list_add_tail(&member->list, &group->pending_list);
218 if (group->state == MCAST_IDLE) {
219 group->state = MCAST_BUSY;
220 atomic_inc(&group->refcount);
221 queue_work(mcast_wq, &group->work);
222 }
223 spin_unlock_irqrestore(&group->lock, flags);
224 }
225
226 /*
227 * A multicast group has four types of members: full member, non member,
228 * sendonly non member and sendonly full member.
229 * We need to keep track of the number of members of each
230 * type based on their join state. Adjust the number of members the belong to
231 * the specified join states.
232 */
adjust_membership(struct mcast_group * group,u8 join_state,int inc)233 static void adjust_membership(struct mcast_group *group, u8 join_state, int inc)
234 {
235 int i;
236
237 for (i = 0; i < NUM_JOIN_MEMBERSHIP_TYPES; i++, join_state >>= 1)
238 if (join_state & 0x1)
239 group->members[i] += inc;
240 }
241
242 /*
243 * If a multicast group has zero members left for a particular join state, but
244 * the group is still a member with the SA, we need to leave that join state.
245 * Determine which join states we still belong to, but that do not have any
246 * active members.
247 */
get_leave_state(struct mcast_group * group)248 static u8 get_leave_state(struct mcast_group *group)
249 {
250 u8 leave_state = 0;
251 int i;
252
253 for (i = 0; i < NUM_JOIN_MEMBERSHIP_TYPES; i++)
254 if (!group->members[i])
255 leave_state |= (0x1 << i);
256
257 return leave_state & group->rec.join_state;
258 }
259
check_selector(ib_sa_comp_mask comp_mask,ib_sa_comp_mask selector_mask,ib_sa_comp_mask value_mask,u8 selector,u8 src_value,u8 dst_value)260 static int check_selector(ib_sa_comp_mask comp_mask,
261 ib_sa_comp_mask selector_mask,
262 ib_sa_comp_mask value_mask,
263 u8 selector, u8 src_value, u8 dst_value)
264 {
265 int err;
266
267 if (!(comp_mask & selector_mask) || !(comp_mask & value_mask))
268 return 0;
269
270 switch (selector) {
271 case IB_SA_GT:
272 err = (src_value <= dst_value);
273 break;
274 case IB_SA_LT:
275 err = (src_value >= dst_value);
276 break;
277 case IB_SA_EQ:
278 err = (src_value != dst_value);
279 break;
280 default:
281 err = 0;
282 break;
283 }
284
285 return err;
286 }
287
cmp_rec(struct ib_sa_mcmember_rec * src,struct ib_sa_mcmember_rec * dst,ib_sa_comp_mask comp_mask)288 static int cmp_rec(struct ib_sa_mcmember_rec *src,
289 struct ib_sa_mcmember_rec *dst, ib_sa_comp_mask comp_mask)
290 {
291 /* MGID must already match */
292
293 if (comp_mask & IB_SA_MCMEMBER_REC_PORT_GID &&
294 memcmp(&src->port_gid, &dst->port_gid, sizeof src->port_gid))
295 return -EINVAL;
296 if (comp_mask & IB_SA_MCMEMBER_REC_QKEY && src->qkey != dst->qkey)
297 return -EINVAL;
298 if (comp_mask & IB_SA_MCMEMBER_REC_MLID && src->mlid != dst->mlid)
299 return -EINVAL;
300 if (check_selector(comp_mask, IB_SA_MCMEMBER_REC_MTU_SELECTOR,
301 IB_SA_MCMEMBER_REC_MTU, dst->mtu_selector,
302 src->mtu, dst->mtu))
303 return -EINVAL;
304 if (comp_mask & IB_SA_MCMEMBER_REC_TRAFFIC_CLASS &&
305 src->traffic_class != dst->traffic_class)
306 return -EINVAL;
307 if (comp_mask & IB_SA_MCMEMBER_REC_PKEY && src->pkey != dst->pkey)
308 return -EINVAL;
309 if (check_selector(comp_mask, IB_SA_MCMEMBER_REC_RATE_SELECTOR,
310 IB_SA_MCMEMBER_REC_RATE, dst->rate_selector,
311 src->rate, dst->rate))
312 return -EINVAL;
313 if (check_selector(comp_mask,
314 IB_SA_MCMEMBER_REC_PACKET_LIFE_TIME_SELECTOR,
315 IB_SA_MCMEMBER_REC_PACKET_LIFE_TIME,
316 dst->packet_life_time_selector,
317 src->packet_life_time, dst->packet_life_time))
318 return -EINVAL;
319 if (comp_mask & IB_SA_MCMEMBER_REC_SL && src->sl != dst->sl)
320 return -EINVAL;
321 if (comp_mask & IB_SA_MCMEMBER_REC_FLOW_LABEL &&
322 src->flow_label != dst->flow_label)
323 return -EINVAL;
324 if (comp_mask & IB_SA_MCMEMBER_REC_HOP_LIMIT &&
325 src->hop_limit != dst->hop_limit)
326 return -EINVAL;
327 if (comp_mask & IB_SA_MCMEMBER_REC_SCOPE && src->scope != dst->scope)
328 return -EINVAL;
329
330 /* join_state checked separately, proxy_join ignored */
331
332 return 0;
333 }
334
send_join(struct mcast_group * group,struct mcast_member * member)335 static int send_join(struct mcast_group *group, struct mcast_member *member)
336 {
337 struct mcast_port *port = group->port;
338 int ret;
339
340 group->last_join = member;
341 ret = ib_sa_mcmember_rec_query(&sa_client, port->dev->device,
342 port->port_num, IB_MGMT_METHOD_SET,
343 &member->multicast.rec,
344 member->multicast.comp_mask,
345 3000, GFP_KERNEL, join_handler, group,
346 &group->query);
347 return (ret > 0) ? 0 : ret;
348 }
349
send_leave(struct mcast_group * group,u8 leave_state)350 static int send_leave(struct mcast_group *group, u8 leave_state)
351 {
352 struct mcast_port *port = group->port;
353 struct ib_sa_mcmember_rec rec;
354 int ret;
355
356 rec = group->rec;
357 rec.join_state = leave_state;
358 group->leave_state = leave_state;
359
360 ret = ib_sa_mcmember_rec_query(&sa_client, port->dev->device,
361 port->port_num, IB_SA_METHOD_DELETE, &rec,
362 IB_SA_MCMEMBER_REC_MGID |
363 IB_SA_MCMEMBER_REC_PORT_GID |
364 IB_SA_MCMEMBER_REC_JOIN_STATE,
365 3000, GFP_KERNEL, leave_handler,
366 group, &group->query);
367 return (ret > 0) ? 0 : ret;
368 }
369
join_group(struct mcast_group * group,struct mcast_member * member,u8 join_state)370 static void join_group(struct mcast_group *group, struct mcast_member *member,
371 u8 join_state)
372 {
373 member->state = MCAST_MEMBER;
374 adjust_membership(group, join_state, 1);
375 group->rec.join_state |= join_state;
376 member->multicast.rec = group->rec;
377 member->multicast.rec.join_state = join_state;
378 list_move(&member->list, &group->active_list);
379 }
380
fail_join(struct mcast_group * group,struct mcast_member * member,int status)381 static int fail_join(struct mcast_group *group, struct mcast_member *member,
382 int status)
383 {
384 spin_lock_irq(&group->lock);
385 list_del_init(&member->list);
386 spin_unlock_irq(&group->lock);
387 return member->multicast.callback(status, &member->multicast);
388 }
389
process_group_error(struct mcast_group * group)390 static void process_group_error(struct mcast_group *group)
391 {
392 struct mcast_member *member;
393 int ret = 0;
394 u16 pkey_index;
395
396 if (group->state == MCAST_PKEY_EVENT)
397 ret = ib_find_pkey(group->port->dev->device,
398 group->port->port_num,
399 be16_to_cpu(group->rec.pkey), &pkey_index);
400
401 spin_lock_irq(&group->lock);
402 if (group->state == MCAST_PKEY_EVENT && !ret &&
403 group->pkey_index == pkey_index)
404 goto out;
405
406 while (!list_empty(&group->active_list)) {
407 member = list_entry(group->active_list.next,
408 struct mcast_member, list);
409 atomic_inc(&member->refcount);
410 list_del_init(&member->list);
411 adjust_membership(group, member->multicast.rec.join_state, -1);
412 member->state = MCAST_ERROR;
413 spin_unlock_irq(&group->lock);
414
415 ret = member->multicast.callback(-ENETRESET,
416 &member->multicast);
417 deref_member(member);
418 if (ret)
419 ib_sa_free_multicast(&member->multicast);
420 spin_lock_irq(&group->lock);
421 }
422
423 group->rec.join_state = 0;
424 out:
425 group->state = MCAST_BUSY;
426 spin_unlock_irq(&group->lock);
427 }
428
mcast_work_handler(struct work_struct * work)429 static void mcast_work_handler(struct work_struct *work)
430 {
431 struct mcast_group *group;
432 struct mcast_member *member;
433 struct ib_sa_multicast *multicast;
434 int status, ret;
435 u8 join_state;
436
437 group = container_of(work, typeof(*group), work);
438 retest:
439 spin_lock_irq(&group->lock);
440 while (!list_empty(&group->pending_list) ||
441 (group->state != MCAST_BUSY)) {
442
443 if (group->state != MCAST_BUSY) {
444 spin_unlock_irq(&group->lock);
445 process_group_error(group);
446 goto retest;
447 }
448
449 member = list_entry(group->pending_list.next,
450 struct mcast_member, list);
451 multicast = &member->multicast;
452 join_state = multicast->rec.join_state;
453 atomic_inc(&member->refcount);
454
455 if (join_state == (group->rec.join_state & join_state)) {
456 status = cmp_rec(&group->rec, &multicast->rec,
457 multicast->comp_mask);
458 if (!status)
459 join_group(group, member, join_state);
460 else
461 list_del_init(&member->list);
462 spin_unlock_irq(&group->lock);
463 ret = multicast->callback(status, multicast);
464 } else {
465 spin_unlock_irq(&group->lock);
466 status = send_join(group, member);
467 if (!status) {
468 deref_member(member);
469 return;
470 }
471 ret = fail_join(group, member, status);
472 }
473
474 deref_member(member);
475 if (ret)
476 ib_sa_free_multicast(&member->multicast);
477 spin_lock_irq(&group->lock);
478 }
479
480 join_state = get_leave_state(group);
481 if (join_state) {
482 group->rec.join_state &= ~join_state;
483 spin_unlock_irq(&group->lock);
484 if (send_leave(group, join_state))
485 goto retest;
486 } else {
487 group->state = MCAST_IDLE;
488 spin_unlock_irq(&group->lock);
489 release_group(group);
490 }
491 }
492
493 /*
494 * Fail a join request if it is still active - at the head of the pending queue.
495 */
process_join_error(struct mcast_group * group,int status)496 static void process_join_error(struct mcast_group *group, int status)
497 {
498 struct mcast_member *member;
499 int ret;
500
501 spin_lock_irq(&group->lock);
502 member = list_entry(group->pending_list.next,
503 struct mcast_member, list);
504 if (group->last_join == member) {
505 atomic_inc(&member->refcount);
506 list_del_init(&member->list);
507 spin_unlock_irq(&group->lock);
508 ret = member->multicast.callback(status, &member->multicast);
509 deref_member(member);
510 if (ret)
511 ib_sa_free_multicast(&member->multicast);
512 } else
513 spin_unlock_irq(&group->lock);
514 }
515
join_handler(int status,struct ib_sa_mcmember_rec * rec,void * context)516 static void join_handler(int status, struct ib_sa_mcmember_rec *rec,
517 void *context)
518 {
519 struct mcast_group *group = context;
520 u16 pkey_index = MCAST_INVALID_PKEY_INDEX;
521
522 if (status)
523 process_join_error(group, status);
524 else {
525 int mgids_changed, is_mgid0;
526 if (ib_find_pkey(group->port->dev->device, group->port->port_num,
527 be16_to_cpu(rec->pkey), &pkey_index))
528 pkey_index = MCAST_INVALID_PKEY_INDEX;
529
530 spin_lock_irq(&group->port->lock);
531 if (group->state == MCAST_BUSY &&
532 group->pkey_index == MCAST_INVALID_PKEY_INDEX)
533 group->pkey_index = pkey_index;
534 mgids_changed = memcmp(&rec->mgid, &group->rec.mgid,
535 sizeof(group->rec.mgid));
536 group->rec = *rec;
537 if (mgids_changed) {
538 rb_erase(&group->node, &group->port->table);
539 is_mgid0 = !memcmp(&mgid0, &group->rec.mgid,
540 sizeof(mgid0));
541 mcast_insert(group->port, group, is_mgid0);
542 }
543 spin_unlock_irq(&group->port->lock);
544 }
545 mcast_work_handler(&group->work);
546 }
547
leave_handler(int status,struct ib_sa_mcmember_rec * rec,void * context)548 static void leave_handler(int status, struct ib_sa_mcmember_rec *rec,
549 void *context)
550 {
551 struct mcast_group *group = context;
552
553 if (status && group->retries > 0 &&
554 !send_leave(group, group->leave_state))
555 group->retries--;
556 else
557 mcast_work_handler(&group->work);
558 }
559
acquire_group(struct mcast_port * port,union ib_gid * mgid,gfp_t gfp_mask)560 static struct mcast_group *acquire_group(struct mcast_port *port,
561 union ib_gid *mgid, gfp_t gfp_mask)
562 {
563 struct mcast_group *group, *cur_group;
564 unsigned long flags;
565 int is_mgid0;
566
567 is_mgid0 = !memcmp(&mgid0, mgid, sizeof mgid0);
568 if (!is_mgid0) {
569 spin_lock_irqsave(&port->lock, flags);
570 group = mcast_find(port, mgid);
571 if (group)
572 goto found;
573 spin_unlock_irqrestore(&port->lock, flags);
574 }
575
576 group = kzalloc(sizeof *group, gfp_mask);
577 if (!group)
578 return NULL;
579
580 group->retries = 3;
581 group->port = port;
582 group->rec.mgid = *mgid;
583 group->pkey_index = MCAST_INVALID_PKEY_INDEX;
584 INIT_LIST_HEAD(&group->pending_list);
585 INIT_LIST_HEAD(&group->active_list);
586 INIT_WORK(&group->work, mcast_work_handler);
587 spin_lock_init(&group->lock);
588
589 spin_lock_irqsave(&port->lock, flags);
590 cur_group = mcast_insert(port, group, is_mgid0);
591 if (cur_group) {
592 kfree(group);
593 group = cur_group;
594 } else
595 atomic_inc(&port->refcount);
596 found:
597 atomic_inc(&group->refcount);
598 spin_unlock_irqrestore(&port->lock, flags);
599 return group;
600 }
601
602 /*
603 * We serialize all join requests to a single group to make our lives much
604 * easier. Otherwise, two users could try to join the same group
605 * simultaneously, with different configurations, one could leave while the
606 * join is in progress, etc., which makes locking around error recovery
607 * difficult.
608 */
609 struct ib_sa_multicast *
ib_sa_join_multicast(struct ib_sa_client * client,struct ib_device * device,u8 port_num,struct ib_sa_mcmember_rec * rec,ib_sa_comp_mask comp_mask,gfp_t gfp_mask,int (* callback)(int status,struct ib_sa_multicast * multicast),void * context)610 ib_sa_join_multicast(struct ib_sa_client *client,
611 struct ib_device *device, u8 port_num,
612 struct ib_sa_mcmember_rec *rec,
613 ib_sa_comp_mask comp_mask, gfp_t gfp_mask,
614 int (*callback)(int status,
615 struct ib_sa_multicast *multicast),
616 void *context)
617 {
618 struct mcast_device *dev;
619 struct mcast_member *member;
620 struct ib_sa_multicast *multicast;
621 int ret;
622
623 dev = ib_get_client_data(device, &mcast_client);
624 if (!dev)
625 return ERR_PTR(-ENODEV);
626
627 member = kmalloc(sizeof *member, gfp_mask);
628 if (!member)
629 return ERR_PTR(-ENOMEM);
630
631 ib_sa_client_get(client);
632 member->client = client;
633 member->multicast.rec = *rec;
634 member->multicast.comp_mask = comp_mask;
635 member->multicast.callback = callback;
636 member->multicast.context = context;
637 init_completion(&member->comp);
638 atomic_set(&member->refcount, 1);
639 member->state = MCAST_JOINING;
640
641 member->group = acquire_group(&dev->port[port_num - dev->start_port],
642 &rec->mgid, gfp_mask);
643 if (!member->group) {
644 ret = -ENOMEM;
645 goto err;
646 }
647
648 /*
649 * The user will get the multicast structure in their callback. They
650 * could then free the multicast structure before we can return from
651 * this routine. So we save the pointer to return before queuing
652 * any callback.
653 */
654 multicast = &member->multicast;
655 queue_join(member);
656 return multicast;
657
658 err:
659 ib_sa_client_put(client);
660 kfree(member);
661 return ERR_PTR(ret);
662 }
663 EXPORT_SYMBOL(ib_sa_join_multicast);
664
ib_sa_free_multicast(struct ib_sa_multicast * multicast)665 void ib_sa_free_multicast(struct ib_sa_multicast *multicast)
666 {
667 struct mcast_member *member;
668 struct mcast_group *group;
669
670 member = container_of(multicast, struct mcast_member, multicast);
671 group = member->group;
672
673 spin_lock_irq(&group->lock);
674 if (member->state == MCAST_MEMBER)
675 adjust_membership(group, multicast->rec.join_state, -1);
676
677 list_del_init(&member->list);
678
679 if (group->state == MCAST_IDLE) {
680 group->state = MCAST_BUSY;
681 spin_unlock_irq(&group->lock);
682 /* Continue to hold reference on group until callback */
683 queue_work(mcast_wq, &group->work);
684 } else {
685 spin_unlock_irq(&group->lock);
686 release_group(group);
687 }
688
689 deref_member(member);
690 wait_for_completion(&member->comp);
691 ib_sa_client_put(member->client);
692 kfree(member);
693 }
694 EXPORT_SYMBOL(ib_sa_free_multicast);
695
ib_sa_get_mcmember_rec(struct ib_device * device,u8 port_num,union ib_gid * mgid,struct ib_sa_mcmember_rec * rec)696 int ib_sa_get_mcmember_rec(struct ib_device *device, u8 port_num,
697 union ib_gid *mgid, struct ib_sa_mcmember_rec *rec)
698 {
699 struct mcast_device *dev;
700 struct mcast_port *port;
701 struct mcast_group *group;
702 unsigned long flags;
703 int ret = 0;
704
705 dev = ib_get_client_data(device, &mcast_client);
706 if (!dev)
707 return -ENODEV;
708
709 port = &dev->port[port_num - dev->start_port];
710 spin_lock_irqsave(&port->lock, flags);
711 group = mcast_find(port, mgid);
712 if (group)
713 *rec = group->rec;
714 else
715 ret = -EADDRNOTAVAIL;
716 spin_unlock_irqrestore(&port->lock, flags);
717
718 return ret;
719 }
720 EXPORT_SYMBOL(ib_sa_get_mcmember_rec);
721
ib_init_ah_from_mcmember(struct ib_device * device,u8 port_num,struct ib_sa_mcmember_rec * rec,if_t ndev,enum ib_gid_type gid_type,struct ib_ah_attr * ah_attr)722 int ib_init_ah_from_mcmember(struct ib_device *device, u8 port_num,
723 struct ib_sa_mcmember_rec *rec,
724 if_t ndev,
725 enum ib_gid_type gid_type,
726 struct ib_ah_attr *ah_attr)
727 {
728 int ret;
729 u16 gid_index;
730
731 /* GID table is not based on the netdevice for IB link layer,
732 * so ignore ndev during search.
733 */
734 if (rdma_protocol_ib(device, port_num))
735 ndev = NULL;
736 else if (!rdma_protocol_roce(device, port_num))
737 return -EINVAL;
738
739 ret = ib_find_cached_gid_by_port(device, &rec->port_gid,
740 gid_type, port_num,
741 ndev,
742 &gid_index);
743 if (ret)
744 return ret;
745
746 memset(ah_attr, 0, sizeof *ah_attr);
747 ah_attr->dlid = be16_to_cpu(rec->mlid);
748 ah_attr->sl = rec->sl;
749 ah_attr->port_num = port_num;
750 ah_attr->static_rate = rec->rate;
751
752 ah_attr->ah_flags = IB_AH_GRH;
753 ah_attr->grh.dgid = rec->mgid;
754
755 ah_attr->grh.sgid_index = (u8) gid_index;
756 ah_attr->grh.flow_label = be32_to_cpu(rec->flow_label);
757 ah_attr->grh.hop_limit = rec->hop_limit;
758 ah_attr->grh.traffic_class = rec->traffic_class;
759
760 return 0;
761 }
762 EXPORT_SYMBOL(ib_init_ah_from_mcmember);
763
mcast_groups_event(struct mcast_port * port,enum mcast_group_state state)764 static void mcast_groups_event(struct mcast_port *port,
765 enum mcast_group_state state)
766 {
767 struct mcast_group *group;
768 struct rb_node *node;
769 unsigned long flags;
770
771 spin_lock_irqsave(&port->lock, flags);
772 for (node = rb_first(&port->table); node; node = rb_next(node)) {
773 group = rb_entry(node, struct mcast_group, node);
774 spin_lock(&group->lock);
775 if (group->state == MCAST_IDLE) {
776 atomic_inc(&group->refcount);
777 queue_work(mcast_wq, &group->work);
778 }
779 if (group->state != MCAST_GROUP_ERROR)
780 group->state = state;
781 spin_unlock(&group->lock);
782 }
783 spin_unlock_irqrestore(&port->lock, flags);
784 }
785
mcast_event_handler(struct ib_event_handler * handler,struct ib_event * event)786 static void mcast_event_handler(struct ib_event_handler *handler,
787 struct ib_event *event)
788 {
789 struct mcast_device *dev;
790 int index;
791
792 dev = container_of(handler, struct mcast_device, event_handler);
793 if (!rdma_cap_ib_mcast(dev->device, event->element.port_num))
794 return;
795
796 index = event->element.port_num - dev->start_port;
797
798 switch (event->event) {
799 case IB_EVENT_PORT_ERR:
800 case IB_EVENT_LID_CHANGE:
801 case IB_EVENT_CLIENT_REREGISTER:
802 mcast_groups_event(&dev->port[index], MCAST_GROUP_ERROR);
803 break;
804 case IB_EVENT_PKEY_CHANGE:
805 mcast_groups_event(&dev->port[index], MCAST_PKEY_EVENT);
806 break;
807 default:
808 break;
809 }
810 }
811
mcast_add_one(struct ib_device * device)812 static void mcast_add_one(struct ib_device *device)
813 {
814 struct mcast_device *dev;
815 struct mcast_port *port;
816 int i;
817 int count = 0;
818
819 dev = kmalloc(sizeof *dev + device->phys_port_cnt * sizeof *port,
820 GFP_KERNEL);
821 if (!dev)
822 return;
823
824 dev->start_port = rdma_start_port(device);
825 dev->end_port = rdma_end_port(device);
826
827 for (i = 0; i <= dev->end_port - dev->start_port; i++) {
828 if (!rdma_cap_ib_mcast(device, dev->start_port + i))
829 continue;
830 port = &dev->port[i];
831 port->dev = dev;
832 port->port_num = dev->start_port + i;
833 spin_lock_init(&port->lock);
834 port->table = RB_ROOT;
835 init_completion(&port->comp);
836 atomic_set(&port->refcount, 1);
837 ++count;
838 }
839
840 if (!count) {
841 kfree(dev);
842 return;
843 }
844
845 dev->device = device;
846 ib_set_client_data(device, &mcast_client, dev);
847
848 INIT_IB_EVENT_HANDLER(&dev->event_handler, device, mcast_event_handler);
849 ib_register_event_handler(&dev->event_handler);
850 }
851
mcast_remove_one(struct ib_device * device,void * client_data)852 static void mcast_remove_one(struct ib_device *device, void *client_data)
853 {
854 struct mcast_device *dev = client_data;
855 struct mcast_port *port;
856 int i;
857
858 if (!dev)
859 return;
860
861 ib_unregister_event_handler(&dev->event_handler);
862 flush_workqueue(mcast_wq);
863
864 for (i = 0; i <= dev->end_port - dev->start_port; i++) {
865 if (rdma_cap_ib_mcast(device, dev->start_port + i)) {
866 port = &dev->port[i];
867 deref_port(port);
868 wait_for_completion(&port->comp);
869 }
870 }
871
872 kfree(dev);
873 }
874
mcast_init(void)875 int mcast_init(void)
876 {
877 int ret;
878
879 mcast_wq = alloc_ordered_workqueue("ib_mcast", WQ_MEM_RECLAIM);
880 if (!mcast_wq)
881 return -ENOMEM;
882
883 ib_sa_register_client(&sa_client);
884
885 ret = ib_register_client(&mcast_client);
886 if (ret)
887 goto err;
888 return 0;
889
890 err:
891 ib_sa_unregister_client(&sa_client);
892 destroy_workqueue(mcast_wq);
893 return ret;
894 }
895
mcast_cleanup(void)896 void mcast_cleanup(void)
897 {
898 ib_unregister_client(&mcast_client);
899 ib_sa_unregister_client(&sa_client);
900 destroy_workqueue(mcast_wq);
901 }
902