2 * Copyright (c) 2006, 2007 Cisco Systems, Inc. All rights reserved.
4 * This software is available to you under a choice of one of two
5 * licenses. You may choose to be licensed under the terms of the GNU
6 * General Public License (GPL) Version 2, available from the file
7 * COPYING in the main directory of this source tree, or the
8 * OpenIB.org BSD license below:
10 * Redistribution and use in source and binary forms, with or
11 * without modification, are permitted provided that the following
14 * - Redistributions of source code must retain the above
15 * copyright notice, this list of conditions and the following
18 * - Redistributions in binary form must reproduce the above
19 * copyright notice, this list of conditions and the following
20 * disclaimer in the documentation and/or other materials
21 * provided with the distribution.
23 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
24 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
25 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
26 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
27 * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
28 * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
29 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
33 #include <linux/init.h>
34 #include <linux/string.h>
35 #include <linux/slab.h>
37 #include <linux/mlx4/cmd.h>
41 #define MGM_QPN_MASK 0x00FFFFFF
42 #define MGM_BLCK_LB_BIT 30
45 __be32 next_gid_index;
49 __be32 qp[MLX4_QP_PER_MGM];
52 static const u8 zero_gid[16]; /* automatically initialized to 0 */
54 static int mlx4_READ_MCG(struct mlx4_dev *dev, int index,
55 struct mlx4_cmd_mailbox *mailbox)
57 return mlx4_cmd_box(dev, 0, mailbox->dma, index, 0, MLX4_CMD_READ_MCG,
58 MLX4_CMD_TIME_CLASS_A);
61 static int mlx4_WRITE_MCG(struct mlx4_dev *dev, int index,
62 struct mlx4_cmd_mailbox *mailbox)
64 return mlx4_cmd(dev, mailbox->dma, index, 0, MLX4_CMD_WRITE_MCG,
65 MLX4_CMD_TIME_CLASS_A);
68 static int mlx4_MGID_HASH(struct mlx4_dev *dev, struct mlx4_cmd_mailbox *mailbox,
74 err = mlx4_cmd_imm(dev, mailbox->dma, &imm, 0, 0, MLX4_CMD_MGID_HASH,
75 MLX4_CMD_TIME_CLASS_A);
84 * Caller must hold MCG table semaphore. gid and mgm parameters must
85 * be properly aligned for command interface.
87 * Returns 0 unless a firmware command error occurs.
89 * If GID is found in MGM or MGM is empty, *index = *hash, *prev = -1
90 * and *mgm holds MGM entry.
92 * if GID is found in AMGM, *index = index in AMGM, *prev = index of
93 * previous entry in hash chain and *mgm holds AMGM entry.
95 * If no AMGM exists for given gid, *index = -1, *prev = index of last
96 * entry in hash chain and *mgm holds end of hash chain.
98 static int find_mgm(struct mlx4_dev *dev,
99 u8 *gid, struct mlx4_cmd_mailbox *mgm_mailbox,
100 u16 *hash, int *prev, int *index)
102 struct mlx4_cmd_mailbox *mailbox;
103 struct mlx4_mgm *mgm = mgm_mailbox->buf;
107 mailbox = mlx4_alloc_cmd_mailbox(dev);
112 memcpy(mgid, gid, 16);
114 err = mlx4_MGID_HASH(dev, mailbox, hash);
115 mlx4_free_cmd_mailbox(dev, mailbox);
120 mlx4_dbg(dev, "Hash for %04x:%04x:%04x:%04x:"
121 "%04x:%04x:%04x:%04x is %04x\n",
122 be16_to_cpu(((__be16 *) gid)[0]),
123 be16_to_cpu(((__be16 *) gid)[1]),
124 be16_to_cpu(((__be16 *) gid)[2]),
125 be16_to_cpu(((__be16 *) gid)[3]),
126 be16_to_cpu(((__be16 *) gid)[4]),
127 be16_to_cpu(((__be16 *) gid)[5]),
128 be16_to_cpu(((__be16 *) gid)[6]),
129 be16_to_cpu(((__be16 *) gid)[7]),
136 err = mlx4_READ_MCG(dev, *index, mgm_mailbox);
140 if (!memcmp(mgm->gid, zero_gid, 16)) {
141 if (*index != *hash) {
142 mlx4_err(dev, "Found zero MGID in AMGM.\n");
148 if (!memcmp(mgm->gid, gid, 16))
152 *index = be32_to_cpu(mgm->next_gid_index) >> 6;
159 int mlx4_multicast_attach(struct mlx4_dev *dev, struct mlx4_qp *qp, u8 gid[16],
160 int block_mcast_loopback)
162 struct mlx4_priv *priv = mlx4_priv(dev);
163 struct mlx4_cmd_mailbox *mailbox;
164 struct mlx4_mgm *mgm;
172 mailbox = mlx4_alloc_cmd_mailbox(dev);
174 return PTR_ERR(mailbox);
177 mutex_lock(&priv->mcg_table.mutex);
179 err = find_mgm(dev, gid, mailbox, &hash, &prev, &index);
184 if (!memcmp(mgm->gid, zero_gid, 16))
185 memcpy(mgm->gid, gid, 16);
189 index = mlx4_bitmap_alloc(&priv->mcg_table.bitmap);
191 mlx4_err(dev, "No AMGM entries left\n");
195 index += dev->caps.num_mgms;
197 memset(mgm, 0, sizeof *mgm);
198 memcpy(mgm->gid, gid, 16);
201 members_count = be32_to_cpu(mgm->members_count);
202 if (members_count == MLX4_QP_PER_MGM) {
203 mlx4_err(dev, "MGM at index %x is full.\n", index);
208 for (i = 0; i < members_count; ++i)
209 if ((be32_to_cpu(mgm->qp[i]) & MGM_QPN_MASK) == qp->qpn) {
210 mlx4_dbg(dev, "QP %06x already a member of MGM\n", qp->qpn);
215 if (block_mcast_loopback)
216 mgm->qp[members_count++] = cpu_to_be32((qp->qpn & MGM_QPN_MASK) |
217 (1 << MGM_BLCK_LB_BIT));
219 mgm->qp[members_count++] = cpu_to_be32(qp->qpn & MGM_QPN_MASK);
221 mgm->members_count = cpu_to_be32(members_count);
223 err = mlx4_WRITE_MCG(dev, index, mailbox);
230 err = mlx4_READ_MCG(dev, prev, mailbox);
234 mgm->next_gid_index = cpu_to_be32(index << 6);
236 err = mlx4_WRITE_MCG(dev, prev, mailbox);
241 if (err && link && index != -1) {
242 if (index < dev->caps.num_mgms)
243 mlx4_warn(dev, "Got AMGM index %d < %d",
244 index, dev->caps.num_mgms);
246 mlx4_bitmap_free(&priv->mcg_table.bitmap,
247 index - dev->caps.num_mgms);
249 mutex_unlock(&priv->mcg_table.mutex);
251 mlx4_free_cmd_mailbox(dev, mailbox);
254 EXPORT_SYMBOL_GPL(mlx4_multicast_attach);
256 int mlx4_multicast_detach(struct mlx4_dev *dev, struct mlx4_qp *qp, u8 gid[16])
258 struct mlx4_priv *priv = mlx4_priv(dev);
259 struct mlx4_cmd_mailbox *mailbox;
260 struct mlx4_mgm *mgm;
267 mailbox = mlx4_alloc_cmd_mailbox(dev);
269 return PTR_ERR(mailbox);
272 mutex_lock(&priv->mcg_table.mutex);
274 err = find_mgm(dev, gid, mailbox, &hash, &prev, &index);
279 mlx4_err(dev, "MGID %04x:%04x:%04x:%04x:%04x:%04x:%04x:%04x "
281 be16_to_cpu(((__be16 *) gid)[0]),
282 be16_to_cpu(((__be16 *) gid)[1]),
283 be16_to_cpu(((__be16 *) gid)[2]),
284 be16_to_cpu(((__be16 *) gid)[3]),
285 be16_to_cpu(((__be16 *) gid)[4]),
286 be16_to_cpu(((__be16 *) gid)[5]),
287 be16_to_cpu(((__be16 *) gid)[6]),
288 be16_to_cpu(((__be16 *) gid)[7]));
293 members_count = be32_to_cpu(mgm->members_count);
294 for (loc = -1, i = 0; i < members_count; ++i)
295 if ((be32_to_cpu(mgm->qp[i]) & MGM_QPN_MASK) == qp->qpn)
299 mlx4_err(dev, "QP %06x not found in MGM\n", qp->qpn);
305 mgm->members_count = cpu_to_be32(--members_count);
306 mgm->qp[loc] = mgm->qp[i - 1];
310 err = mlx4_WRITE_MCG(dev, index, mailbox);
315 /* Remove entry from MGM */
316 int amgm_index = be32_to_cpu(mgm->next_gid_index) >> 6;
318 err = mlx4_READ_MCG(dev, amgm_index, mailbox);
322 memset(mgm->gid, 0, 16);
324 err = mlx4_WRITE_MCG(dev, index, mailbox);
329 if (amgm_index < dev->caps.num_mgms)
330 mlx4_warn(dev, "MGM entry %d had AMGM index %d < %d",
331 index, amgm_index, dev->caps.num_mgms);
333 mlx4_bitmap_free(&priv->mcg_table.bitmap,
334 amgm_index - dev->caps.num_mgms);
337 /* Remove entry from AMGM */
338 int cur_next_index = be32_to_cpu(mgm->next_gid_index) >> 6;
339 err = mlx4_READ_MCG(dev, prev, mailbox);
343 mgm->next_gid_index = cpu_to_be32(cur_next_index << 6);
345 err = mlx4_WRITE_MCG(dev, prev, mailbox);
349 if (index < dev->caps.num_mgms)
350 mlx4_warn(dev, "entry %d had next AMGM index %d < %d",
351 prev, index, dev->caps.num_mgms);
353 mlx4_bitmap_free(&priv->mcg_table.bitmap,
354 index - dev->caps.num_mgms);
358 mutex_unlock(&priv->mcg_table.mutex);
360 mlx4_free_cmd_mailbox(dev, mailbox);
363 EXPORT_SYMBOL_GPL(mlx4_multicast_detach);
365 int mlx4_init_mcg_table(struct mlx4_dev *dev)
367 struct mlx4_priv *priv = mlx4_priv(dev);
370 err = mlx4_bitmap_init(&priv->mcg_table.bitmap,
371 dev->caps.num_amgms, dev->caps.num_amgms - 1, 0);
375 mutex_init(&priv->mcg_table.mutex);
380 void mlx4_cleanup_mcg_table(struct mlx4_dev *dev)
382 mlx4_bitmap_cleanup(&mlx4_priv(dev)->mcg_table.bitmap);