Merge mulgrave-w:git/scsi-misc-2.6
[linux-2.6] / drivers / infiniband / hw / ehca / ehca_mcast.c
1 /*
2  *  IBM eServer eHCA Infiniband device driver for Linux on POWER
3  *
4  *  mcast  functions
5  *
6  *  Authors: Khadija Souissi <souissik@de.ibm.com>
7  *           Waleri Fomin <fomin@de.ibm.com>
8  *           Reinhard Ernst <rernst@de.ibm.com>
9  *           Hoang-Nam Nguyen <hnguyen@de.ibm.com>
10  *           Heiko J Schick <schickhj@de.ibm.com>
11  *
12  *  Copyright (c) 2005 IBM Corporation
13  *
14  *  All rights reserved.
15  *
16  *  This source code is distributed under a dual license of GPL v2.0 and OpenIB
17  *  BSD.
18  *
19  * OpenIB BSD License
20  *
21  * Redistribution and use in source and binary forms, with or without
22  * modification, are permitted provided that the following conditions are met:
23  *
24  * Redistributions of source code must retain the above copyright notice, this
25  * list of conditions and the following disclaimer.
26  *
27  * Redistributions in binary form must reproduce the above copyright notice,
28  * this list of conditions and the following disclaimer in the documentation
29  * and/or other materials
30  * provided with the distribution.
31  *
32  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
33  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
34  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
35  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
36  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
37  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
38  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
39  * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER
40  * IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
41  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
42  * POSSIBILITY OF SUCH DAMAGE.
43  */
44
45 #include <linux/module.h>
46 #include <linux/err.h>
47 #include "ehca_classes.h"
48 #include "ehca_tools.h"
49 #include "ehca_qes.h"
50 #include "ehca_iverbs.h"
51 #include "hcp_if.h"
52
53 #define MAX_MC_LID 0xFFFE
54 #define MIN_MC_LID 0xC000       /* Multicast limits */
55 #define EHCA_VALID_MULTICAST_GID(gid)  ((gid)[0] == 0xFF)
56 #define EHCA_VALID_MULTICAST_LID(lid) \
57         (((lid) >= MIN_MC_LID) && ((lid) <= MAX_MC_LID))
58
59 int ehca_attach_mcast(struct ib_qp *ibqp, union ib_gid *gid, u16 lid)
60 {
61         struct ehca_qp *my_qp = container_of(ibqp, struct ehca_qp, ib_qp);
62         struct ehca_shca *shca = container_of(ibqp->device, struct ehca_shca,
63                                               ib_device);
64         union ib_gid my_gid;
65         u64 subnet_prefix, interface_id, h_ret;
66
67         if (ibqp->qp_type != IB_QPT_UD) {
68                 ehca_err(ibqp->device, "invalid qp_type=%x", ibqp->qp_type);
69                 return -EINVAL;
70         }
71
72         if (!(EHCA_VALID_MULTICAST_GID(gid->raw))) {
73                 ehca_err(ibqp->device, "invalid mulitcast gid");
74                 return -EINVAL;
75         } else if ((lid < MIN_MC_LID) || (lid > MAX_MC_LID)) {
76                 ehca_err(ibqp->device, "invalid mulitcast lid=%x", lid);
77                 return -EINVAL;
78         }
79
80         memcpy(&my_gid.raw, gid->raw, sizeof(union ib_gid));
81
82         subnet_prefix = be64_to_cpu(my_gid.global.subnet_prefix);
83         interface_id = be64_to_cpu(my_gid.global.interface_id);
84         h_ret = hipz_h_attach_mcqp(shca->ipz_hca_handle,
85                                    my_qp->ipz_qp_handle,
86                                    my_qp->galpas.kernel,
87                                    lid, subnet_prefix, interface_id);
88         if (h_ret != H_SUCCESS)
89                 ehca_err(ibqp->device,
90                          "ehca_qp=%p qp_num=%x hipz_h_attach_mcqp() failed "
91                          "h_ret=%lx", my_qp, ibqp->qp_num, h_ret);
92
93         return ehca2ib_return_code(h_ret);
94 }
95
96 int ehca_detach_mcast(struct ib_qp *ibqp, union ib_gid *gid, u16 lid)
97 {
98         struct ehca_qp *my_qp = container_of(ibqp, struct ehca_qp, ib_qp);
99         struct ehca_shca *shca = container_of(ibqp->pd->device,
100                                               struct ehca_shca, ib_device);
101         union ib_gid my_gid;
102         u64 subnet_prefix, interface_id, h_ret;
103
104         if (ibqp->qp_type != IB_QPT_UD) {
105                 ehca_err(ibqp->device, "invalid qp_type %x", ibqp->qp_type);
106                 return -EINVAL;
107         }
108
109         if (!(EHCA_VALID_MULTICAST_GID(gid->raw))) {
110                 ehca_err(ibqp->device, "invalid mulitcast gid");
111                 return -EINVAL;
112         } else if ((lid < MIN_MC_LID) || (lid > MAX_MC_LID)) {
113                 ehca_err(ibqp->device, "invalid mulitcast lid=%x", lid);
114                 return -EINVAL;
115         }
116
117         memcpy(&my_gid.raw, gid->raw, sizeof(union ib_gid));
118
119         subnet_prefix = be64_to_cpu(my_gid.global.subnet_prefix);
120         interface_id = be64_to_cpu(my_gid.global.interface_id);
121         h_ret = hipz_h_detach_mcqp(shca->ipz_hca_handle,
122                                    my_qp->ipz_qp_handle,
123                                    my_qp->galpas.kernel,
124                                    lid, subnet_prefix, interface_id);
125         if (h_ret != H_SUCCESS)
126                 ehca_err(ibqp->device,
127                          "ehca_qp=%p qp_num=%x hipz_h_detach_mcqp() failed "
128                          "h_ret=%lx", my_qp, ibqp->qp_num, h_ret);
129
130         return ehca2ib_return_code(h_ret);
131 }