drivers/infiniband/core/mad.c

   1 /*
   2  * Copyright (c) 2004-2007 Voltaire, Inc. All rights reserved.
   3  * Copyright (c) 2005 Intel Corporation.  All rights reserved.
   4  * Copyright (c) 2005 Mellanox Technologies Ltd.  All rights reserved.
   5  * Copyright (c) 2009 HNR Consulting. All rights reserved.
   6  * Copyright (c) 2014,2018 Intel Corporation.  All rights reserved.
   7  *
   8  * This software is available to you under a choice of one of two
   9  * licenses.  You may choose to be licensed under the terms of the GNU
  10  * General Public License (GPL) Version 2, available from the file
  11  * COPYING in the main directory of this source tree, or the
  12  * OpenIB.org BSD license below:
  13  *
  14  *     Redistribution and use in source and binary forms, with or
  15  *     without modification, are permitted provided that the following
  16  *     conditions are met:
  17  *
  18  *      - Redistributions of source code must retain the above
  19  *        copyright notice, this list of conditions and the following
  20  *        disclaimer.
  21  *
  22  *      - Redistributions in binary form must reproduce the above
  23  *        copyright notice, this list of conditions and the following
  24  *        disclaimer in the documentation and/or other materials
  25  *        provided with the distribution.
  26  *
  27  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  28  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  29  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
  30  * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
  31  * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
  32  * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
  33  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
  34  * SOFTWARE.
  35  *
  36  */
  37
  38 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
  39
  40 #include <linux/dma-mapping.h>
  41 #include <linux/slab.h>
  42 #include <linux/module.h>
  43 #include <linux/security.h>
  44 #include <linux/xarray.h>
  45 #include <rdma/ib_cache.h>
  46
  47 #include "mad_priv.h"
  48 #include "core_priv.h"
  49 #include "mad_rmpp.h"
  50 #include "smi.h"
  51 #include "opa_smi.h"
  52 #include "agent.h"
  53
  54 #define CREATE_TRACE_POINTS
  55 #include <trace/events/ib_mad.h>
  56
  57 #ifdef CONFIG_TRACEPOINTS
  58 static void create_mad_addr_info(struct ib_mad_send_wr_private *mad_send_wr,
  59                           struct ib_mad_qp_info *qp_info,
  60                           struct trace_event_raw_ib_mad_send_template *entry)
  61 {
  62         u16 pkey;
  63         struct ib_device *dev = qp_info->port_priv->device;
  64         u8 pnum = qp_info->port_priv->port_num;
  65         struct ib_ud_wr *wr = &mad_send_wr->send_wr;
  66         struct rdma_ah_attr attr = {};
  67
  68         rdma_query_ah(wr->ah, &attr);
  69
  70         /* These are common */
  71         entry->sl = attr.sl;
  72         ib_query_pkey(dev, pnum, wr->pkey_index, &pkey);
  73         entry->pkey = pkey;
  74         entry->rqpn = wr->remote_qpn;
  75         entry->rqkey = wr->remote_qkey;
  76         entry->dlid = rdma_ah_get_dlid(&attr);
  77 }
  78 #endif
  79
  80 static int mad_sendq_size = IB_MAD_QP_SEND_SIZE;
  81 static int mad_recvq_size = IB_MAD_QP_RECV_SIZE;
  82
  83 module_param_named(send_queue_size, mad_sendq_size, int, 0444);
  84 MODULE_PARM_DESC(send_queue_size, "Size of send queue in number of work requests");
  85 module_param_named(recv_queue_size, mad_recvq_size, int, 0444);
  86 MODULE_PARM_DESC(recv_queue_size, "Size of receive queue in number of work requests");
  87
  88 /* Client ID 0 is used for snoop-only clients */
  89 static DEFINE_XARRAY_ALLOC1(ib_mad_clients);
  90 static u32 ib_mad_client_next;
  91 static struct list_head ib_mad_port_list;
  92
  93 /* Port list lock */
  94 static DEFINE_SPINLOCK(ib_mad_port_list_lock);
  95
  96 /* Forward declarations */
  97 static int method_in_use(struct ib_mad_mgmt_method_table **method,
  98                          struct ib_mad_reg_req *mad_reg_req);
  99 static void remove_mad_reg_req(struct ib_mad_agent_private *priv);
 100 static struct ib_mad_agent_private *find_mad_agent(
 101                                         struct ib_mad_port_private *port_priv,
 102                                         const struct ib_mad_hdr *mad);
 103 static int ib_mad_post_receive_mads(struct ib_mad_qp_info *qp_info,
 104                                     struct ib_mad_private *mad);
 105 static void cancel_mads(struct ib_mad_agent_private *mad_agent_priv);
 106 static void timeout_sends(struct work_struct *work);
 107 static void local_completions(struct work_struct *work);
 108 static int add_nonoui_reg_req(struct ib_mad_reg_req *mad_reg_req,
 109                               struct ib_mad_agent_private *agent_priv,
 110                               u8 mgmt_class);
 111 static int add_oui_reg_req(struct ib_mad_reg_req *mad_reg_req,
 112                            struct ib_mad_agent_private *agent_priv);
 113 static bool ib_mad_send_error(struct ib_mad_port_private *port_priv,
 114                               struct ib_wc *wc);
 115 static void ib_mad_send_done(struct ib_cq *cq, struct ib_wc *wc);
 116
 117 /*
 118  * Returns a ib_mad_port_private structure or NULL for a device/port
 119  * Assumes ib_mad_port_list_lock is being held
 120  */
 121 static inline struct ib_mad_port_private *
 122 __ib_get_mad_port(struct ib_device *device, int port_num)
 123 {
 124         struct ib_mad_port_private *entry;
 125
 126         list_for_each_entry(entry, &ib_mad_port_list, port_list) {
 127                 if (entry->device == device && entry->port_num == port_num)
 128                         return entry;
 129         }
 130         return NULL;
 131 }
 132
 133 /*
 134  * Wrapper function to return a ib_mad_port_private structure or NULL
 135  * for a device/port
 136  */
 137 static inline struct ib_mad_port_private *
 138 ib_get_mad_port(struct ib_device *device, int port_num)
 139 {
 140         struct ib_mad_port_private *entry;
 141         unsigned long flags;
 142
 143         spin_lock_irqsave(&ib_mad_port_list_lock, flags);
 144         entry = __ib_get_mad_port(device, port_num);
 145         spin_unlock_irqrestore(&ib_mad_port_list_lock, flags);
 146
 147         return entry;
 148 }
 149
 150 static inline u8 convert_mgmt_class(u8 mgmt_class)
 151 {
 152         /* Alias IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE to 0 */
 153         return mgmt_class == IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE ?
 154                 0 : mgmt_class;
 155 }
 156
 157 static int get_spl_qp_index(enum ib_qp_type qp_type)
 158 {
 159         switch (qp_type)
 160         {
 161         case IB_QPT_SMI:
 162                 return 0;
 163         case IB_QPT_GSI:
 164                 return 1;
 165         default:
 166                 return -1;
 167         }
 168 }
 169
 170 static int vendor_class_index(u8 mgmt_class)
 171 {
 172         return mgmt_class - IB_MGMT_CLASS_VENDOR_RANGE2_START;
 173 }
 174
 175 static int is_vendor_class(u8 mgmt_class)
 176 {
 177         if ((mgmt_class < IB_MGMT_CLASS_VENDOR_RANGE2_START) ||
 178             (mgmt_class > IB_MGMT_CLASS_VENDOR_RANGE2_END))
 179                 return 0;
 180         return 1;
 181 }
 182
 183 static int is_vendor_oui(char *oui)
 184 {
 185         if (oui[0] || oui[1] || oui[2])
 186                 return 1;
 187         return 0;
 188 }
 189
 190 static int is_vendor_method_in_use(
 191                 struct ib_mad_mgmt_vendor_class *vendor_class,
 192                 struct ib_mad_reg_req *mad_reg_req)
 193 {
 194         struct ib_mad_mgmt_method_table *method;
 195         int i;
 196
 197         for (i = 0; i < MAX_MGMT_OUI; i++) {
 198                 if (!memcmp(vendor_class->oui[i], mad_reg_req->oui, 3)) {
 199                         method = vendor_class->method_table[i];
 200                         if (method) {
 201                                 if (method_in_use(&method, mad_reg_req))
 202                                         return 1;
 203                                 else
 204                                         break;
 205                         }
 206                 }
 207         }
 208         return 0;
 209 }
 210
 211 int ib_response_mad(const struct ib_mad_hdr *hdr)
 212 {
 213         return ((hdr->method & IB_MGMT_METHOD_RESP) ||
 214                 (hdr->method == IB_MGMT_METHOD_TRAP_REPRESS) ||
 215                 ((hdr->mgmt_class == IB_MGMT_CLASS_BM) &&
 216                  (hdr->attr_mod & IB_BM_ATTR_MOD_RESP)));
 217 }
 218 EXPORT_SYMBOL(ib_response_mad);
 219
 220 /*
 221  * ib_register_mad_agent - Register to send/receive MADs
 222  *
 223  * Context: Process context.
 224  */
 225 struct ib_mad_agent *ib_register_mad_agent(struct ib_device *device,
 226                                            u8 port_num,
 227                                            enum ib_qp_type qp_type,
 228                                            struct ib_mad_reg_req *mad_reg_req,
 229                                            u8 rmpp_version,
 230                                            ib_mad_send_handler send_handler,
 231                                            ib_mad_recv_handler recv_handler,
 232                                            void *context,
 233                                            u32 registration_flags)
 234 {
 235         struct ib_mad_port_private *port_priv;
 236         struct ib_mad_agent *ret = ERR_PTR(-EINVAL);
 237         struct ib_mad_agent_private *mad_agent_priv;
 238         struct ib_mad_reg_req *reg_req = NULL;
 239         struct ib_mad_mgmt_class_table *class;
 240         struct ib_mad_mgmt_vendor_class_table *vendor;
 241         struct ib_mad_mgmt_vendor_class *vendor_class;
 242         struct ib_mad_mgmt_method_table *method;
 243         int ret2, qpn;
 244         u8 mgmt_class, vclass;
 245
 246         if ((qp_type == IB_QPT_SMI && !rdma_cap_ib_smi(device, port_num)) ||
 247             (qp_type == IB_QPT_GSI && !rdma_cap_ib_cm(device, port_num)))
 248                 return ERR_PTR(-EPROTONOSUPPORT);
 249
 250         /* Validate parameters */
 251         qpn = get_spl_qp_index(qp_type);
 252         if (qpn == -1) {
 253                 dev_dbg_ratelimited(&device->dev, "%s: invalid QP Type %d\n",
 254                                     __func__, qp_type);
 255                 goto error1;
 256         }
 257
 258         if (rmpp_version && rmpp_version != IB_MGMT_RMPP_VERSION) {
 259                 dev_dbg_ratelimited(&device->dev,
 260                                     "%s: invalid RMPP Version %u\n",
 261                                     __func__, rmpp_version);
 262                 goto error1;
 263         }
 264
 265         /* Validate MAD registration request if supplied */
 266         if (mad_reg_req) {
 267                 if (mad_reg_req->mgmt_class_version >= MAX_MGMT_VERSION) {
 268                         dev_dbg_ratelimited(&device->dev,
 269                                             "%s: invalid Class Version %u\n",
 270                                             __func__,
 271                                             mad_reg_req->mgmt_class_version);
 272                         goto error1;
 273                 }
 274                 if (!recv_handler) {
 275                         dev_dbg_ratelimited(&device->dev,
 276                                             "%s: no recv_handler\n", __func__);
 277                         goto error1;
 278                 }
 279                 if (mad_reg_req->mgmt_class >= MAX_MGMT_CLASS) {
 280                         /*
 281                          * IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE is the only
 282                          * one in this range currently allowed
 283                          */
 284                         if (mad_reg_req->mgmt_class !=
 285                             IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE) {
 286                                 dev_dbg_ratelimited(&device->dev,
 287                                         "%s: Invalid Mgmt Class 0x%x\n",
 288                                         __func__, mad_reg_req->mgmt_class);
 289                                 goto error1;
 290                         }
 291                 } else if (mad_reg_req->mgmt_class == 0) {
 292                         /*
 293                          * Class 0 is reserved in IBA and is used for
 294                          * aliasing of IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE
 295                          */
 296                         dev_dbg_ratelimited(&device->dev,
 297                                             "%s: Invalid Mgmt Class 0\n",
 298                                             __func__);
 299                         goto error1;
 300                 } else if (is_vendor_class(mad_reg_req->mgmt_class)) {
 301                         /*
 302                          * If class is in "new" vendor range,
 303                          * ensure supplied OUI is not zero
 304                          */
 305                         if (!is_vendor_oui(mad_reg_req->oui)) {
 306                                 dev_dbg_ratelimited(&device->dev,
 307                                         "%s: No OUI specified for class 0x%x\n",
 308                                         __func__,
 309                                         mad_reg_req->mgmt_class);
 310                                 goto error1;
 311                         }
 312                 }
 313                 /* Make sure class supplied is consistent with RMPP */
 314                 if (!ib_is_mad_class_rmpp(mad_reg_req->mgmt_class)) {
 315                         if (rmpp_version) {
 316                                 dev_dbg_ratelimited(&device->dev,
 317                                         "%s: RMPP version for non-RMPP class 0x%x\n",
 318                                         __func__, mad_reg_req->mgmt_class);
 319                                 goto error1;
 320                         }
 321                 }
 322
 323                 /* Make sure class supplied is consistent with QP type */
 324                 if (qp_type == IB_QPT_SMI) {
 325                         if ((mad_reg_req->mgmt_class !=
 326                                         IB_MGMT_CLASS_SUBN_LID_ROUTED) &&
 327                             (mad_reg_req->mgmt_class !=
 328                                         IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE)) {
 329                                 dev_dbg_ratelimited(&device->dev,
 330                                         "%s: Invalid SM QP type: class 0x%x\n",
 331                                         __func__, mad_reg_req->mgmt_class);
 332                                 goto error1;
 333                         }
 334                 } else {
 335                         if ((mad_reg_req->mgmt_class ==
 336                                         IB_MGMT_CLASS_SUBN_LID_ROUTED) ||
 337                             (mad_reg_req->mgmt_class ==
 338                                         IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE)) {
 339                                 dev_dbg_ratelimited(&device->dev,
 340                                         "%s: Invalid GS QP type: class 0x%x\n",
 341                                         __func__, mad_reg_req->mgmt_class);
 342                                 goto error1;
 343                         }
 344                 }
 345         } else {
 346                 /* No registration request supplied */
 347                 if (!send_handler)
 348                         goto error1;
 349                 if (registration_flags & IB_MAD_USER_RMPP)
 350                         goto error1;
 351         }
 352
 353         /* Validate device and port */
 354         port_priv = ib_get_mad_port(device, port_num);
 355         if (!port_priv) {
 356                 dev_dbg_ratelimited(&device->dev, "%s: Invalid port %d\n",
 357                                     __func__, port_num);
 358                 ret = ERR_PTR(-ENODEV);
 359                 goto error1;
 360         }
 361
 362         /* Verify the QP requested is supported. For example, Ethernet devices
 363          * will not have QP0.
 364          */
 365         if (!port_priv->qp_info[qpn].qp) {
 366                 dev_dbg_ratelimited(&device->dev, "%s: QP %d not supported\n",
 367                                     __func__, qpn);
 368                 ret = ERR_PTR(-EPROTONOSUPPORT);
 369                 goto error1;
 370         }
 371
 372         /* Allocate structures */
 373         mad_agent_priv = kzalloc(sizeof *mad_agent_priv, GFP_KERNEL);
 374         if (!mad_agent_priv) {
 375                 ret = ERR_PTR(-ENOMEM);
 376                 goto error1;
 377         }
 378
 379         if (mad_reg_req) {
 380                 reg_req = kmemdup(mad_reg_req, sizeof *reg_req, GFP_KERNEL);
 381                 if (!reg_req) {
 382                         ret = ERR_PTR(-ENOMEM);
 383                         goto error3;
 384                 }
 385         }
 386
 387         /* Now, fill in the various structures */
 388         mad_agent_priv->qp_info = &port_priv->qp_info[qpn];
 389         mad_agent_priv->reg_req = reg_req;
 390         mad_agent_priv->agent.rmpp_version = rmpp_version;
 391         mad_agent_priv->agent.device = device;
 392         mad_agent_priv->agent.recv_handler = recv_handler;
 393         mad_agent_priv->agent.send_handler = send_handler;
 394         mad_agent_priv->agent.context = context;
 395         mad_agent_priv->agent.qp = port_priv->qp_info[qpn].qp;
 396         mad_agent_priv->agent.port_num = port_num;
 397         mad_agent_priv->agent.flags = registration_flags;
 398         spin_lock_init(&mad_agent_priv->lock);
 399         INIT_LIST_HEAD(&mad_agent_priv->send_list);
 400         INIT_LIST_HEAD(&mad_agent_priv->wait_list);
 401         INIT_LIST_HEAD(&mad_agent_priv->done_list);
 402         INIT_LIST_HEAD(&mad_agent_priv->rmpp_list);
 403         INIT_DELAYED_WORK(&mad_agent_priv->timed_work, timeout_sends);
 404         INIT_LIST_HEAD(&mad_agent_priv->local_list);
 405         INIT_WORK(&mad_agent_priv->local_work, local_completions);
 406         atomic_set(&mad_agent_priv->refcount, 1);
 407         init_completion(&mad_agent_priv->comp);
 408
 409         ret2 = ib_mad_agent_security_setup(&mad_agent_priv->agent, qp_type);
 410         if (ret2) {
 411                 ret = ERR_PTR(ret2);
 412                 goto error4;
 413         }
 414
 415         /*
 416          * The mlx4 driver uses the top byte to distinguish which virtual
 417          * function generated the MAD, so we must avoid using it.
 418          */
 419         ret2 = xa_alloc_cyclic(&ib_mad_clients, &mad_agent_priv->agent.hi_tid,
 420                         mad_agent_priv, XA_LIMIT(0, (1 << 24) - 1),
 421                         &ib_mad_client_next, GFP_KERNEL);
 422         if (ret2 < 0) {
 423                 ret = ERR_PTR(ret2);
 424                 goto error5;
 425         }
 426
 427         /*
 428          * Make sure MAD registration (if supplied)
 429          * is non overlapping with any existing ones
 430          */
 431         spin_lock_irq(&port_priv->reg_lock);
 432         if (mad_reg_req) {
 433                 mgmt_class = convert_mgmt_class(mad_reg_req->mgmt_class);
 434                 if (!is_vendor_class(mgmt_class)) {
 435                         class = port_priv->version[mad_reg_req->
 436                                                    mgmt_class_version].class;
 437                         if (class) {
 438                                 method = class->method_table[mgmt_class];
 439                                 if (method) {
 440                                         if (method_in_use(&method,
 441                                                            mad_reg_req))
 442                                                 goto error6;
 443                                 }
 444                         }
 445                         ret2 = add_nonoui_reg_req(mad_reg_req, mad_agent_priv,
 446                                                   mgmt_class);
 447                 } else {
 448                         /* "New" vendor class range */
 449                         vendor = port_priv->version[mad_reg_req->
 450                                                     mgmt_class_version].vendor;
 451                         if (vendor) {
 452                                 vclass = vendor_class_index(mgmt_class);
 453                                 vendor_class = vendor->vendor_class[vclass];
 454                                 if (vendor_class) {
 455                                         if (is_vendor_method_in_use(
 456                                                         vendor_class,
 457                                                         mad_reg_req))
 458                                                 goto error6;
 459                                 }
 460                         }
 461                         ret2 = add_oui_reg_req(mad_reg_req, mad_agent_priv);
 462                 }
 463                 if (ret2) {
 464                         ret = ERR_PTR(ret2);
 465                         goto error6;
 466                 }
 467         }
 468         spin_unlock_irq(&port_priv->reg_lock);
 469
 470         trace_ib_mad_create_agent(mad_agent_priv);
 471         return &mad_agent_priv->agent;
 472 error6:
 473         spin_unlock_irq(&port_priv->reg_lock);
 474         xa_erase(&ib_mad_clients, mad_agent_priv->agent.hi_tid);
 475 error5:
 476         ib_mad_agent_security_cleanup(&mad_agent_priv->agent);
 477 error4:
 478         kfree(reg_req);
 479 error3:
 480         kfree(mad_agent_priv);
 481 error1:
 482         return ret;
 483 }
 484 EXPORT_SYMBOL(ib_register_mad_agent);
 485
 486 static inline int is_snooping_sends(int mad_snoop_flags)
 487 {
 488         return (mad_snoop_flags &
 489                 (/*IB_MAD_SNOOP_POSTED_SENDS |
 490                  IB_MAD_SNOOP_RMPP_SENDS |*/
 491                  IB_MAD_SNOOP_SEND_COMPLETIONS /*|
 492                  IB_MAD_SNOOP_RMPP_SEND_COMPLETIONS*/));
 493 }
 494
 495 static inline int is_snooping_recvs(int mad_snoop_flags)
 496 {
 497         return (mad_snoop_flags &
 498                 (IB_MAD_SNOOP_RECVS /*|
 499                  IB_MAD_SNOOP_RMPP_RECVS*/));
 500 }
 501
 502 static int register_snoop_agent(struct ib_mad_qp_info *qp_info,
 503                                 struct ib_mad_snoop_private *mad_snoop_priv)
 504 {
 505         struct ib_mad_snoop_private **new_snoop_table;
 506         unsigned long flags;
 507         int i;
 508
 509         spin_lock_irqsave(&qp_info->snoop_lock, flags);
 510         /* Check for empty slot in array. */
 511         for (i = 0; i < qp_info->snoop_table_size; i++)
 512                 if (!qp_info->snoop_table[i])
 513                         break;
 514
 515         if (i == qp_info->snoop_table_size) {
 516                 /* Grow table. */
 517                 new_snoop_table = krealloc(qp_info->snoop_table,
 518                                            sizeof mad_snoop_priv *
 519                                            (qp_info->snoop_table_size + 1),
 520                                            GFP_ATOMIC);
 521                 if (!new_snoop_table) {
 522                         i = -ENOMEM;
 523                         goto out;
 524                 }
 525
 526                 qp_info->snoop_table = new_snoop_table;
 527                 qp_info->snoop_table_size++;
 528         }
 529         qp_info->snoop_table[i] = mad_snoop_priv;
 530         atomic_inc(&qp_info->snoop_count);
 531 out:
 532         spin_unlock_irqrestore(&qp_info->snoop_lock, flags);
 533         return i;
 534 }
 535
 536 struct ib_mad_agent *ib_register_mad_snoop(struct ib_device *device,
 537                                            u8 port_num,
 538                                            enum ib_qp_type qp_type,
 539                                            int mad_snoop_flags,
 540                                            ib_mad_snoop_handler snoop_handler,
 541                                            ib_mad_recv_handler recv_handler,
 542                                            void *context)
 543 {
 544         struct ib_mad_port_private *port_priv;
 545         struct ib_mad_agent *ret;
 546         struct ib_mad_snoop_private *mad_snoop_priv;
 547         int qpn;
 548         int err;
 549
 550         /* Validate parameters */
 551         if ((is_snooping_sends(mad_snoop_flags) && !snoop_handler) ||
 552             (is_snooping_recvs(mad_snoop_flags) && !recv_handler)) {
 553                 ret = ERR_PTR(-EINVAL);
 554                 goto error1;
 555         }
 556         qpn = get_spl_qp_index(qp_type);
 557         if (qpn == -1) {
 558                 ret = ERR_PTR(-EINVAL);
 559                 goto error1;
 560         }
 561         port_priv = ib_get_mad_port(device, port_num);
 562         if (!port_priv) {
 563                 ret = ERR_PTR(-ENODEV);
 564                 goto error1;
 565         }
 566         /* Allocate structures */
 567         mad_snoop_priv = kzalloc(sizeof *mad_snoop_priv, GFP_KERNEL);
 568         if (!mad_snoop_priv) {
 569                 ret = ERR_PTR(-ENOMEM);
 570                 goto error1;
 571         }
 572
 573         /* Now, fill in the various structures */
 574         mad_snoop_priv->qp_info = &port_priv->qp_info[qpn];
 575         mad_snoop_priv->agent.device = device;
 576         mad_snoop_priv->agent.recv_handler = recv_handler;
 577         mad_snoop_priv->agent.snoop_handler = snoop_handler;
 578         mad_snoop_priv->agent.context = context;
 579         mad_snoop_priv->agent.qp = port_priv->qp_info[qpn].qp;
 580         mad_snoop_priv->agent.port_num = port_num;
 581         mad_snoop_priv->mad_snoop_flags = mad_snoop_flags;
 582         init_completion(&mad_snoop_priv->comp);
 583
 584         err = ib_mad_agent_security_setup(&mad_snoop_priv->agent, qp_type);
 585         if (err) {
 586                 ret = ERR_PTR(err);
 587                 goto error2;
 588         }
 589
 590         mad_snoop_priv->snoop_index = register_snoop_agent(
 591                                                 &port_priv->qp_info[qpn],
 592                                                 mad_snoop_priv);
 593         if (mad_snoop_priv->snoop_index < 0) {
 594                 ret = ERR_PTR(mad_snoop_priv->snoop_index);
 595                 goto error3;
 596         }
 597
 598         atomic_set(&mad_snoop_priv->refcount, 1);
 599         return &mad_snoop_priv->agent;
 600 error3:
 601         ib_mad_agent_security_cleanup(&mad_snoop_priv->agent);
 602 error2:
 603         kfree(mad_snoop_priv);
 604 error1:
 605         return ret;
 606 }
 607 EXPORT_SYMBOL(ib_register_mad_snoop);
 608
 609 static inline void deref_mad_agent(struct ib_mad_agent_private *mad_agent_priv)
 610 {
 611         if (atomic_dec_and_test(&mad_agent_priv->refcount))
 612                 complete(&mad_agent_priv->comp);
 613 }
 614
 615 static inline void deref_snoop_agent(struct ib_mad_snoop_private *mad_snoop_priv)
 616 {
 617         if (atomic_dec_and_test(&mad_snoop_priv->refcount))
 618                 complete(&mad_snoop_priv->comp);
 619 }
 620
 621 static void unregister_mad_agent(struct ib_mad_agent_private *mad_agent_priv)
 622 {
 623         struct ib_mad_port_private *port_priv;
 624
 625         /* Note that we could still be handling received MADs */
 626         trace_ib_mad_unregister_agent(mad_agent_priv);
 627
 628         /*
 629          * Canceling all sends results in dropping received response
 630          * MADs, preventing us from queuing additional work
 631          */
 632         cancel_mads(mad_agent_priv);
 633         port_priv = mad_agent_priv->qp_info->port_priv;
 634         cancel_delayed_work(&mad_agent_priv->timed_work);
 635
 636         spin_lock_irq(&port_priv->reg_lock);
 637         remove_mad_reg_req(mad_agent_priv);
 638         spin_unlock_irq(&port_priv->reg_lock);
 639         xa_erase(&ib_mad_clients, mad_agent_priv->agent.hi_tid);
 640
 641         flush_workqueue(port_priv->wq);
 642         ib_cancel_rmpp_recvs(mad_agent_priv);
 643
 644         deref_mad_agent(mad_agent_priv);
 645         wait_for_completion(&mad_agent_priv->comp);
 646
 647         ib_mad_agent_security_cleanup(&mad_agent_priv->agent);
 648
 649         kfree(mad_agent_priv->reg_req);
 650         kfree_rcu(mad_agent_priv, rcu);
 651 }
 652
 653 static void unregister_mad_snoop(struct ib_mad_snoop_private *mad_snoop_priv)
 654 {
 655         struct ib_mad_qp_info *qp_info;
 656         unsigned long flags;
 657
 658         qp_info = mad_snoop_priv->qp_info;
 659         spin_lock_irqsave(&qp_info->snoop_lock, flags);
 660         qp_info->snoop_table[mad_snoop_priv->snoop_index] = NULL;
 661         atomic_dec(&qp_info->snoop_count);
 662         spin_unlock_irqrestore(&qp_info->snoop_lock, flags);
 663
 664         deref_snoop_agent(mad_snoop_priv);
 665         wait_for_completion(&mad_snoop_priv->comp);
 666
 667         ib_mad_agent_security_cleanup(&mad_snoop_priv->agent);
 668
 669         kfree(mad_snoop_priv);
 670 }
 671
 672 /*
 673  * ib_unregister_mad_agent - Unregisters a client from using MAD services
 674  *
 675  * Context: Process context.
 676  */
 677 void ib_unregister_mad_agent(struct ib_mad_agent *mad_agent)
 678 {
 679         struct ib_mad_agent_private *mad_agent_priv;
 680         struct ib_mad_snoop_private *mad_snoop_priv;
 681
 682         /* If the TID is zero, the agent can only snoop. */
 683         if (mad_agent->hi_tid) {
 684                 mad_agent_priv = container_of(mad_agent,
 685                                               struct ib_mad_agent_private,
 686                                               agent);
 687                 unregister_mad_agent(mad_agent_priv);
 688         } else {
 689                 mad_snoop_priv = container_of(mad_agent,
 690                                               struct ib_mad_snoop_private,
 691                                               agent);
 692                 unregister_mad_snoop(mad_snoop_priv);
 693         }
 694 }
 695 EXPORT_SYMBOL(ib_unregister_mad_agent);
 696
 697 static void dequeue_mad(struct ib_mad_list_head *mad_list)
 698 {
 699         struct ib_mad_queue *mad_queue;
 700         unsigned long flags;
 701
 702         mad_queue = mad_list->mad_queue;
 703         spin_lock_irqsave(&mad_queue->lock, flags);
 704         list_del(&mad_list->list);
 705         mad_queue->count--;
 706         spin_unlock_irqrestore(&mad_queue->lock, flags);
 707 }
 708
 709 static void snoop_send(struct ib_mad_qp_info *qp_info,
 710                        struct ib_mad_send_buf *send_buf,
 711                        struct ib_mad_send_wc *mad_send_wc,
 712                        int mad_snoop_flags)
 713 {
 714         struct ib_mad_snoop_private *mad_snoop_priv;
 715         unsigned long flags;
 716         int i;
 717
 718         spin_lock_irqsave(&qp_info->snoop_lock, flags);
 719         for (i = 0; i < qp_info->snoop_table_size; i++) {
 720                 mad_snoop_priv = qp_info->snoop_table[i];
 721                 if (!mad_snoop_priv ||
 722                     !(mad_snoop_priv->mad_snoop_flags & mad_snoop_flags))
 723                         continue;
 724
 725                 atomic_inc(&mad_snoop_priv->refcount);
 726                 spin_unlock_irqrestore(&qp_info->snoop_lock, flags);
 727                 mad_snoop_priv->agent.snoop_handler(&mad_snoop_priv->agent,
 728                                                     send_buf, mad_send_wc);
 729                 deref_snoop_agent(mad_snoop_priv);
 730                 spin_lock_irqsave(&qp_info->snoop_lock, flags);
 731         }
 732         spin_unlock_irqrestore(&qp_info->snoop_lock, flags);
 733 }
 734
 735 static void snoop_recv(struct ib_mad_qp_info *qp_info,
 736                        struct ib_mad_recv_wc *mad_recv_wc,
 737                        int mad_snoop_flags)
 738 {
 739         struct ib_mad_snoop_private *mad_snoop_priv;
 740         unsigned long flags;
 741         int i;
 742
 743         spin_lock_irqsave(&qp_info->snoop_lock, flags);
 744         for (i = 0; i < qp_info->snoop_table_size; i++) {
 745                 mad_snoop_priv = qp_info->snoop_table[i];
 746                 if (!mad_snoop_priv ||
 747                     !(mad_snoop_priv->mad_snoop_flags & mad_snoop_flags))
 748                         continue;
 749
 750                 atomic_inc(&mad_snoop_priv->refcount);
 751                 spin_unlock_irqrestore(&qp_info->snoop_lock, flags);
 752                 mad_snoop_priv->agent.recv_handler(&mad_snoop_priv->agent, NULL,
 753                                                    mad_recv_wc);
 754                 deref_snoop_agent(mad_snoop_priv);
 755                 spin_lock_irqsave(&qp_info->snoop_lock, flags);
 756         }
 757         spin_unlock_irqrestore(&qp_info->snoop_lock, flags);
 758 }
 759
 760 static void build_smp_wc(struct ib_qp *qp, struct ib_cqe *cqe, u16 slid,
 761                 u16 pkey_index, u8 port_num, struct ib_wc *wc)
 762 {
 763         memset(wc, 0, sizeof *wc);
 764         wc->wr_cqe = cqe;
 765         wc->status = IB_WC_SUCCESS;
 766         wc->opcode = IB_WC_RECV;
 767         wc->pkey_index = pkey_index;
 768         wc->byte_len = sizeof(struct ib_mad) + sizeof(struct ib_grh);
 769         wc->src_qp = IB_QP0;
 770         wc->qp = qp;
 771         wc->slid = slid;
 772         wc->sl = 0;
 773         wc->dlid_path_bits = 0;
 774         wc->port_num = port_num;
 775 }
 776
 777 static size_t mad_priv_size(const struct ib_mad_private *mp)
 778 {
 779         return sizeof(struct ib_mad_private) + mp->mad_size;
 780 }
 781
 782 static struct ib_mad_private *alloc_mad_private(size_t mad_size, gfp_t flags)
 783 {
 784         size_t size = sizeof(struct ib_mad_private) + mad_size;
 785         struct ib_mad_private *ret = kzalloc(size, flags);
 786
 787         if (ret)
 788                 ret->mad_size = mad_size;
 789
 790         return ret;
 791 }
 792
 793 static size_t port_mad_size(const struct ib_mad_port_private *port_priv)
 794 {
 795         return rdma_max_mad_size(port_priv->device, port_priv->port_num);
 796 }
 797
 798 static size_t mad_priv_dma_size(const struct ib_mad_private *mp)
 799 {
 800         return sizeof(struct ib_grh) + mp->mad_size;
 801 }
 802
 803 /*
 804  * Return 0 if SMP is to be sent
 805  * Return 1 if SMP was consumed locally (whether or not solicited)
 806  * Return < 0 if error
 807  */
 808 static int handle_outgoing_dr_smp(struct ib_mad_agent_private *mad_agent_priv,
 809                                   struct ib_mad_send_wr_private *mad_send_wr)
 810 {
 811         int ret = 0;
 812         struct ib_smp *smp = mad_send_wr->send_buf.mad;
 813         struct opa_smp *opa_smp = (struct opa_smp *)smp;
 814         unsigned long flags;
 815         struct ib_mad_local_private *local;
 816         struct ib_mad_private *mad_priv;
 817         struct ib_mad_port_private *port_priv;
 818         struct ib_mad_agent_private *recv_mad_agent = NULL;
 819         struct ib_device *device = mad_agent_priv->agent.device;
 820         u8 port_num;
 821         struct ib_wc mad_wc;
 822         struct ib_ud_wr *send_wr = &mad_send_wr->send_wr;
 823         size_t mad_size = port_mad_size(mad_agent_priv->qp_info->port_priv);
 824         u16 out_mad_pkey_index = 0;
 825         u16 drslid;
 826         bool opa = rdma_cap_opa_mad(mad_agent_priv->qp_info->port_priv->device,
 827                                     mad_agent_priv->qp_info->port_priv->port_num);
 828
 829         if (rdma_cap_ib_switch(device) &&
 830             smp->mgmt_class == IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE)
 831                 port_num = send_wr->port_num;
 832         else
 833                 port_num = mad_agent_priv->agent.port_num;
 834
 835         /*
 836          * Directed route handling starts if the initial LID routed part of
 837          * a request or the ending LID routed part of a response is empty.
 838          * If we are at the start of the LID routed part, don't update the
 839          * hop_ptr or hop_cnt.  See section 14.2.2, Vol 1 IB spec.
 840          */
 841         if (opa && smp->class_version == OPA_SM_CLASS_VERSION) {
 842                 u32 opa_drslid;
 843
 844                 trace_ib_mad_handle_out_opa_smi(opa_smp);
 845
 846                 if ((opa_get_smp_direction(opa_smp)
 847                      ? opa_smp->route.dr.dr_dlid : opa_smp->route.dr.dr_slid) ==
 848                      OPA_LID_PERMISSIVE &&
 849                      opa_smi_handle_dr_smp_send(opa_smp,
 850                                                 rdma_cap_ib_switch(device),
 851                                                 port_num) == IB_SMI_DISCARD) {
 852                         ret = -EINVAL;
 853                         dev_err(&device->dev, "OPA Invalid directed route\n");
 854                         goto out;
 855                 }
 856                 opa_drslid = be32_to_cpu(opa_smp->route.dr.dr_slid);
 857                 if (opa_drslid != be32_to_cpu(OPA_LID_PERMISSIVE) &&
 858                     opa_drslid & 0xffff0000) {
 859                         ret = -EINVAL;
 860                         dev_err(&device->dev, "OPA Invalid dr_slid 0x%x\n",
 861                                opa_drslid);
 862                         goto out;
 863                 }
 864                 drslid = (u16)(opa_drslid & 0x0000ffff);
 865
 866                 /* Check to post send on QP or process locally */
 867                 if (opa_smi_check_local_smp(opa_smp, device) == IB_SMI_DISCARD &&
 868                     opa_smi_check_local_returning_smp(opa_smp, device) == IB_SMI_DISCARD)
 869                         goto out;
 870         } else {
 871                 trace_ib_mad_handle_out_ib_smi(smp);
 872
 873                 if ((ib_get_smp_direction(smp) ? smp->dr_dlid : smp->dr_slid) ==
 874                      IB_LID_PERMISSIVE &&
 875                      smi_handle_dr_smp_send(smp, rdma_cap_ib_switch(device), port_num) ==
 876                      IB_SMI_DISCARD) {
 877                         ret = -EINVAL;
 878                         dev_err(&device->dev, "Invalid directed route\n");
 879                         goto out;
 880                 }
 881                 drslid = be16_to_cpu(smp->dr_slid);
 882
 883                 /* Check to post send on QP or process locally */
 884                 if (smi_check_local_smp(smp, device) == IB_SMI_DISCARD &&
 885                     smi_check_local_returning_smp(smp, device) == IB_SMI_DISCARD)
 886                         goto out;
 887         }
 888
 889         local = kmalloc(sizeof *local, GFP_ATOMIC);
 890         if (!local) {
 891                 ret = -ENOMEM;
 892                 goto out;
 893         }
 894         local->mad_priv = NULL;
 895         local->recv_mad_agent = NULL;
 896         mad_priv = alloc_mad_private(mad_size, GFP_ATOMIC);
 897         if (!mad_priv) {
 898                 ret = -ENOMEM;
 899                 kfree(local);
 900                 goto out;
 901         }
 902
 903         build_smp_wc(mad_agent_priv->agent.qp,
 904                      send_wr->wr.wr_cqe, drslid,
 905                      send_wr->pkey_index,
 906                      send_wr->port_num, &mad_wc);
 907
 908         if (opa && smp->base_version == OPA_MGMT_BASE_VERSION) {
 909                 mad_wc.byte_len = mad_send_wr->send_buf.hdr_len
 910                                         + mad_send_wr->send_buf.data_len
 911                                         + sizeof(struct ib_grh);
 912         }
 913
 914         /* No GRH for DR SMP */
 915         ret = device->ops.process_mad(device, 0, port_num, &mad_wc, NULL,
 916                                       (const struct ib_mad *)smp,
 917                                       (struct ib_mad *)mad_priv->mad, &mad_size,
 918                                       &out_mad_pkey_index);
 919         switch (ret)
 920         {
 921         case IB_MAD_RESULT_SUCCESS | IB_MAD_RESULT_REPLY:
 922                 if (ib_response_mad((const struct ib_mad_hdr *)mad_priv->mad) &&
 923                     mad_agent_priv->agent.recv_handler) {
 924                         local->mad_priv = mad_priv;
 925                         local->recv_mad_agent = mad_agent_priv;
 926                         /*
 927                          * Reference MAD agent until receive
 928                          * side of local completion handled
 929                          */
 930                         atomic_inc(&mad_agent_priv->refcount);
 931                 } else
 932                         kfree(mad_priv);
 933                 break;
 934         case IB_MAD_RESULT_SUCCESS | IB_MAD_RESULT_CONSUMED:
 935                 kfree(mad_priv);
 936                 break;
 937         case IB_MAD_RESULT_SUCCESS:
 938                 /* Treat like an incoming receive MAD */
 939                 port_priv = ib_get_mad_port(mad_agent_priv->agent.device,
 940                                             mad_agent_priv->agent.port_num);
 941                 if (port_priv) {
 942                         memcpy(mad_priv->mad, smp, mad_priv->mad_size);
 943                         recv_mad_agent = find_mad_agent(port_priv,
 944                                                         (const struct ib_mad_hdr *)mad_priv->mad);
 945                 }
 946                 if (!port_priv || !recv_mad_agent) {
 947                         /*
 948                          * No receiving agent so drop packet and
 949                          * generate send completion.
 950                          */
 951                         kfree(mad_priv);
 952                         break;
 953                 }
 954                 local->mad_priv = mad_priv;
 955                 local->recv_mad_agent = recv_mad_agent;
 956                 break;
 957         default:
 958                 kfree(mad_priv);
 959                 kfree(local);
 960                 ret = -EINVAL;
 961                 goto out;
 962         }
 963
 964         local->mad_send_wr = mad_send_wr;
 965         if (opa) {
 966                 local->mad_send_wr->send_wr.pkey_index = out_mad_pkey_index;
 967                 local->return_wc_byte_len = mad_size;
 968         }
 969         /* Reference MAD agent until send side of local completion handled */
 970         atomic_inc(&mad_agent_priv->refcount);
 971         /* Queue local completion to local list */
 972         spin_lock_irqsave(&mad_agent_priv->lock, flags);
 973         list_add_tail(&local->completion_list, &mad_agent_priv->local_list);
 974         spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
 975         queue_work(mad_agent_priv->qp_info->port_priv->wq,
 976                    &mad_agent_priv->local_work);
 977         ret = 1;
 978 out:
 979         return ret;
 980 }
 981
 982 static int get_pad_size(int hdr_len, int data_len, size_t mad_size)
 983 {
 984         int seg_size, pad;
 985
 986         seg_size = mad_size - hdr_len;
 987         if (data_len && seg_size) {
 988                 pad = seg_size - data_len % seg_size;
 989                 return pad == seg_size ? 0 : pad;
 990         } else
 991                 return seg_size;
 992 }
 993
 994 static void free_send_rmpp_list(struct ib_mad_send_wr_private *mad_send_wr)
 995 {
 996         struct ib_rmpp_segment *s, *t;
 997
 998         list_for_each_entry_safe(s, t, &mad_send_wr->rmpp_list, list) {
 999                 list_del(&s->list);
1000                 kfree(s);
1001         }
1002 }
1003
1004 static int alloc_send_rmpp_list(struct ib_mad_send_wr_private *send_wr,
1005                                 size_t mad_size, gfp_t gfp_mask)
1006 {
1007         struct ib_mad_send_buf *send_buf = &send_wr->send_buf;
1008         struct ib_rmpp_mad *rmpp_mad = send_buf->mad;
1009         struct ib_rmpp_segment *seg = NULL;
1010         int left, seg_size, pad;
1011
1012         send_buf->seg_size = mad_size - send_buf->hdr_len;
1013         send_buf->seg_rmpp_size = mad_size - IB_MGMT_RMPP_HDR;
1014         seg_size = send_buf->seg_size;
1015         pad = send_wr->pad;
1016
1017         /* Allocate data segments. */
1018         for (left = send_buf->data_len + pad; left > 0; left -= seg_size) {
1019                 seg = kmalloc(sizeof (*seg) + seg_size, gfp_mask);
1020                 if (!seg) {
1021                         free_send_rmpp_list(send_wr);
1022                         return -ENOMEM;
1023                 }
1024                 seg->num = ++send_buf->seg_count;
1025                 list_add_tail(&seg->list, &send_wr->rmpp_list);
1026         }
1027
1028         /* Zero any padding */
1029         if (pad)
1030                 memset(seg->data + seg_size - pad, 0, pad);
1031
1032         rmpp_mad->rmpp_hdr.rmpp_version = send_wr->mad_agent_priv->
1033                                           agent.rmpp_version;
1034         rmpp_mad->rmpp_hdr.rmpp_type = IB_MGMT_RMPP_TYPE_DATA;
1035         ib_set_rmpp_flags(&rmpp_mad->rmpp_hdr, IB_MGMT_RMPP_FLAG_ACTIVE);
1036
1037         send_wr->cur_seg = container_of(send_wr->rmpp_list.next,
1038                                         struct ib_rmpp_segment, list);
1039         send_wr->last_ack_seg = send_wr->cur_seg;
1040         return 0;
1041 }
1042
1043 int ib_mad_kernel_rmpp_agent(const struct ib_mad_agent *agent)
1044 {
1045         return agent->rmpp_version && !(agent->flags & IB_MAD_USER_RMPP);
1046 }
1047 EXPORT_SYMBOL(ib_mad_kernel_rmpp_agent);
1048
1049 struct ib_mad_send_buf * ib_create_send_mad(struct ib_mad_agent *mad_agent,
1050                                             u32 remote_qpn, u16 pkey_index,
1051                                             int rmpp_active,
1052                                             int hdr_len, int data_len,
1053                                             gfp_t gfp_mask,
1054                                             u8 base_version)
1055 {
1056         struct ib_mad_agent_private *mad_agent_priv;
1057         struct ib_mad_send_wr_private *mad_send_wr;
1058         int pad, message_size, ret, size;
1059         void *buf;
1060         size_t mad_size;
1061         bool opa;
1062
1063         mad_agent_priv = container_of(mad_agent, struct ib_mad_agent_private,
1064                                       agent);
1065
1066         opa = rdma_cap_opa_mad(mad_agent->device, mad_agent->port_num);
1067
1068         if (opa && base_version == OPA_MGMT_BASE_VERSION)
1069                 mad_size = sizeof(struct opa_mad);
1070         else
1071                 mad_size = sizeof(struct ib_mad);
1072
1073         pad = get_pad_size(hdr_len, data_len, mad_size);
1074         message_size = hdr_len + data_len + pad;
1075
1076         if (ib_mad_kernel_rmpp_agent(mad_agent)) {
1077                 if (!rmpp_active && message_size > mad_size)
1078                         return ERR_PTR(-EINVAL);
1079         } else
1080                 if (rmpp_active || message_size > mad_size)
1081                         return ERR_PTR(-EINVAL);
1082
1083         size = rmpp_active ? hdr_len : mad_size;
1084         buf = kzalloc(sizeof *mad_send_wr + size, gfp_mask);
1085         if (!buf)
1086                 return ERR_PTR(-ENOMEM);
1087
1088         mad_send_wr = buf + size;
1089         INIT_LIST_HEAD(&mad_send_wr->rmpp_list);
1090         mad_send_wr->send_buf.mad = buf;
1091         mad_send_wr->send_buf.hdr_len = hdr_len;
1092         mad_send_wr->send_buf.data_len = data_len;
1093         mad_send_wr->pad = pad;
1094
1095         mad_send_wr->mad_agent_priv = mad_agent_priv;
1096         mad_send_wr->sg_list[0].length = hdr_len;
1097         mad_send_wr->sg_list[0].lkey = mad_agent->qp->pd->local_dma_lkey;
1098
1099         /* OPA MADs don't have to be the full 2048 bytes */
1100         if (opa && base_version == OPA_MGMT_BASE_VERSION &&
1101             data_len < mad_size - hdr_len)
1102                 mad_send_wr->sg_list[1].length = data_len;
1103         else
1104                 mad_send_wr->sg_list[1].length = mad_size - hdr_len;
1105
1106         mad_send_wr->sg_list[1].lkey = mad_agent->qp->pd->local_dma_lkey;
1107
1108         mad_send_wr->mad_list.cqe.done = ib_mad_send_done;
1109
1110         mad_send_wr->send_wr.wr.wr_cqe = &mad_send_wr->mad_list.cqe;
1111         mad_send_wr->send_wr.wr.sg_list = mad_send_wr->sg_list;
1112         mad_send_wr->send_wr.wr.num_sge = 2;
1113         mad_send_wr->send_wr.wr.opcode = IB_WR_SEND;
1114         mad_send_wr->send_wr.wr.send_flags = IB_SEND_SIGNALED;
1115         mad_send_wr->send_wr.remote_qpn = remote_qpn;
1116         mad_send_wr->send_wr.remote_qkey = IB_QP_SET_QKEY;
1117         mad_send_wr->send_wr.pkey_index = pkey_index;
1118
1119         if (rmpp_active) {
1120                 ret = alloc_send_rmpp_list(mad_send_wr, mad_size, gfp_mask);
1121                 if (ret) {
1122                         kfree(buf);
1123                         return ERR_PTR(ret);
1124                 }
1125         }
1126
1127         mad_send_wr->send_buf.mad_agent = mad_agent;
1128         atomic_inc(&mad_agent_priv->refcount);
1129         return &mad_send_wr->send_buf;
1130 }
1131 EXPORT_SYMBOL(ib_create_send_mad);
1132
1133 int ib_get_mad_data_offset(u8 mgmt_class)
1134 {
1135         if (mgmt_class == IB_MGMT_CLASS_SUBN_ADM)
1136                 return IB_MGMT_SA_HDR;
1137         else if ((mgmt_class == IB_MGMT_CLASS_DEVICE_MGMT) ||
1138                  (mgmt_class == IB_MGMT_CLASS_DEVICE_ADM) ||
1139                  (mgmt_class == IB_MGMT_CLASS_BIS))
1140                 return IB_MGMT_DEVICE_HDR;
1141         else if ((mgmt_class >= IB_MGMT_CLASS_VENDOR_RANGE2_START) &&
1142                  (mgmt_class <= IB_MGMT_CLASS_VENDOR_RANGE2_END))
1143                 return IB_MGMT_VENDOR_HDR;
1144         else
1145                 return IB_MGMT_MAD_HDR;
1146 }
1147 EXPORT_SYMBOL(ib_get_mad_data_offset);
1148
1149 int ib_is_mad_class_rmpp(u8 mgmt_class)
1150 {
1151         if ((mgmt_class == IB_MGMT_CLASS_SUBN_ADM) ||
1152             (mgmt_class == IB_MGMT_CLASS_DEVICE_MGMT) ||
1153             (mgmt_class == IB_MGMT_CLASS_DEVICE_ADM) ||
1154             (mgmt_class == IB_MGMT_CLASS_BIS) ||
1155             ((mgmt_class >= IB_MGMT_CLASS_VENDOR_RANGE2_START) &&
1156              (mgmt_class <= IB_MGMT_CLASS_VENDOR_RANGE2_END)))
1157                 return 1;
1158         return 0;
1159 }
1160 EXPORT_SYMBOL(ib_is_mad_class_rmpp);
1161
1162 void *ib_get_rmpp_segment(struct ib_mad_send_buf *send_buf, int seg_num)
1163 {
1164         struct ib_mad_send_wr_private *mad_send_wr;
1165         struct list_head *list;
1166
1167         mad_send_wr = container_of(send_buf, struct ib_mad_send_wr_private,
1168                                    send_buf);
1169         list = &mad_send_wr->cur_seg->list;
1170
1171         if (mad_send_wr->cur_seg->num < seg_num) {
1172                 list_for_each_entry(mad_send_wr->cur_seg, list, list)
1173                         if (mad_send_wr->cur_seg->num == seg_num)
1174                                 break;
1175         } else if (mad_send_wr->cur_seg->num > seg_num) {
1176                 list_for_each_entry_reverse(mad_send_wr->cur_seg, list, list)
1177                         if (mad_send_wr->cur_seg->num == seg_num)
1178                                 break;
1179         }
1180         return mad_send_wr->cur_seg->data;
1181 }
1182 EXPORT_SYMBOL(ib_get_rmpp_segment);
1183
1184 static inline void *ib_get_payload(struct ib_mad_send_wr_private *mad_send_wr)
1185 {
1186         if (mad_send_wr->send_buf.seg_count)
1187                 return ib_get_rmpp_segment(&mad_send_wr->send_buf,
1188                                            mad_send_wr->seg_num);
1189         else
1190                 return mad_send_wr->send_buf.mad +
1191                        mad_send_wr->send_buf.hdr_len;
1192 }
1193
1194 void ib_free_send_mad(struct ib_mad_send_buf *send_buf)
1195 {
1196         struct ib_mad_agent_private *mad_agent_priv;
1197         struct ib_mad_send_wr_private *mad_send_wr;
1198
1199         mad_agent_priv = container_of(send_buf->mad_agent,
1200                                       struct ib_mad_agent_private, agent);
1201         mad_send_wr = container_of(send_buf, struct ib_mad_send_wr_private,
1202                                    send_buf);
1203
1204         free_send_rmpp_list(mad_send_wr);
1205         kfree(send_buf->mad);
1206         deref_mad_agent(mad_agent_priv);
1207 }
1208 EXPORT_SYMBOL(ib_free_send_mad);
1209
1210 int ib_send_mad(struct ib_mad_send_wr_private *mad_send_wr)
1211 {
1212         struct ib_mad_qp_info *qp_info;
1213         struct list_head *list;
1214         struct ib_mad_agent *mad_agent;
1215         struct ib_sge *sge;
1216         unsigned long flags;
1217         int ret;
1218
1219         /* Set WR ID to find mad_send_wr upon completion */
1220         qp_info = mad_send_wr->mad_agent_priv->qp_info;
1221         mad_send_wr->mad_list.mad_queue = &qp_info->send_queue;
1222         mad_send_wr->mad_list.cqe.done = ib_mad_send_done;
1223         mad_send_wr->send_wr.wr.wr_cqe = &mad_send_wr->mad_list.cqe;
1224
1225         mad_agent = mad_send_wr->send_buf.mad_agent;
1226         sge = mad_send_wr->sg_list;
1227         sge[0].addr = ib_dma_map_single(mad_agent->device,
1228                                         mad_send_wr->send_buf.mad,
1229                                         sge[0].length,
1230                                         DMA_TO_DEVICE);
1231         if (unlikely(ib_dma_mapping_error(mad_agent->device, sge[0].addr)))
1232                 return -ENOMEM;
1233
1234         mad_send_wr->header_mapping = sge[0].addr;
1235
1236         sge[1].addr = ib_dma_map_single(mad_agent->device,
1237                                         ib_get_payload(mad_send_wr),
1238                                         sge[1].length,
1239                                         DMA_TO_DEVICE);
1240         if (unlikely(ib_dma_mapping_error(mad_agent->device, sge[1].addr))) {
1241                 ib_dma_unmap_single(mad_agent->device,
1242                                     mad_send_wr->header_mapping,
1243                                     sge[0].length, DMA_TO_DEVICE);
1244                 return -ENOMEM;
1245         }
1246         mad_send_wr->payload_mapping = sge[1].addr;
1247
1248         spin_lock_irqsave(&qp_info->send_queue.lock, flags);
1249         if (qp_info->send_queue.count < qp_info->send_queue.max_active) {
1250                 trace_ib_mad_ib_send_mad(mad_send_wr, qp_info);
1251                 ret = ib_post_send(mad_agent->qp, &mad_send_wr->send_wr.wr,
1252                                    NULL);
1253                 list = &qp_info->send_queue.list;
1254         } else {
1255                 ret = 0;
1256                 list = &qp_info->overflow_list;
1257         }
1258
1259         if (!ret) {
1260                 qp_info->send_queue.count++;
1261                 list_add_tail(&mad_send_wr->mad_list.list, list);
1262         }
1263         spin_unlock_irqrestore(&qp_info->send_queue.lock, flags);
1264         if (ret) {
1265                 ib_dma_unmap_single(mad_agent->device,
1266                                     mad_send_wr->header_mapping,
1267                                     sge[0].length, DMA_TO_DEVICE);
1268                 ib_dma_unmap_single(mad_agent->device,
1269                                     mad_send_wr->payload_mapping,
1270                                     sge[1].length, DMA_TO_DEVICE);
1271         }
1272         return ret;
1273 }
1274
1275 /*
1276  * ib_post_send_mad - Posts MAD(s) to the send queue of the QP associated
1277  *  with the registered client
1278  */
1279 int ib_post_send_mad(struct ib_mad_send_buf *send_buf,
1280                      struct ib_mad_send_buf **bad_send_buf)
1281 {
1282         struct ib_mad_agent_private *mad_agent_priv;
1283         struct ib_mad_send_buf *next_send_buf;
1284         struct ib_mad_send_wr_private *mad_send_wr;
1285         unsigned long flags;
1286         int ret = -EINVAL;
1287
1288         /* Walk list of send WRs and post each on send list */
1289         for (; send_buf; send_buf = next_send_buf) {
1290                 mad_send_wr = container_of(send_buf,
1291                                            struct ib_mad_send_wr_private,
1292                                            send_buf);
1293                 mad_agent_priv = mad_send_wr->mad_agent_priv;
1294
1295                 ret = ib_mad_enforce_security(mad_agent_priv,
1296                                               mad_send_wr->send_wr.pkey_index);
1297                 if (ret)
1298                         goto error;
1299
1300                 if (!send_buf->mad_agent->send_handler ||
1301                     (send_buf->timeout_ms &&
1302                      !send_buf->mad_agent->recv_handler)) {
1303                         ret = -EINVAL;
1304                         goto error;
1305                 }
1306
1307                 if (!ib_is_mad_class_rmpp(((struct ib_mad_hdr *) send_buf->mad)->mgmt_class)) {
1308                         if (mad_agent_priv->agent.rmpp_version) {
1309                                 ret = -EINVAL;
1310                                 goto error;
1311                         }
1312                 }
1313
1314                 /*
1315                  * Save pointer to next work request to post in case the
1316                  * current one completes, and the user modifies the work
1317                  * request associated with the completion
1318                  */
1319                 next_send_buf = send_buf->next;
1320                 mad_send_wr->send_wr.ah = send_buf->ah;
1321
1322                 if (((struct ib_mad_hdr *) send_buf->mad)->mgmt_class ==
1323                     IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE) {
1324                         ret = handle_outgoing_dr_smp(mad_agent_priv,
1325                                                      mad_send_wr);
1326                         if (ret < 0)            /* error */
1327                                 goto error;
1328                         else if (ret == 1)      /* locally consumed */
1329                                 continue;
1330                 }
1331
1332                 mad_send_wr->tid = ((struct ib_mad_hdr *) send_buf->mad)->tid;
1333                 /* Timeout will be updated after send completes */
1334                 mad_send_wr->timeout = msecs_to_jiffies(send_buf->timeout_ms);
1335                 mad_send_wr->max_retries = send_buf->retries;
1336                 mad_send_wr->retries_left = send_buf->retries;
1337                 send_buf->retries = 0;
1338                 /* Reference for work request to QP + response */
1339                 mad_send_wr->refcount = 1 + (mad_send_wr->timeout > 0);
1340                 mad_send_wr->status = IB_WC_SUCCESS;
1341
1342                 /* Reference MAD agent until send completes */
1343                 atomic_inc(&mad_agent_priv->refcount);
1344                 spin_lock_irqsave(&mad_agent_priv->lock, flags);
1345                 list_add_tail(&mad_send_wr->agent_list,
1346                               &mad_agent_priv->send_list);
1347                 spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
1348
1349                 if (ib_mad_kernel_rmpp_agent(&mad_agent_priv->agent)) {
1350                         ret = ib_send_rmpp_mad(mad_send_wr);
1351                         if (ret >= 0 && ret != IB_RMPP_RESULT_CONSUMED)
1352                                 ret = ib_send_mad(mad_send_wr);
1353                 } else
1354                         ret = ib_send_mad(mad_send_wr);
1355                 if (ret < 0) {
1356                         /* Fail send request */
1357                         spin_lock_irqsave(&mad_agent_priv->lock, flags);
1358                         list_del(&mad_send_wr->agent_list);
1359                         spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
1360                         atomic_dec(&mad_agent_priv->refcount);
1361                         goto error;
1362                 }
1363         }
1364         return 0;
1365 error:
1366         if (bad_send_buf)
1367                 *bad_send_buf = send_buf;
1368         return ret;
1369 }
1370 EXPORT_SYMBOL(ib_post_send_mad);
1371
1372 /*
1373  * ib_free_recv_mad - Returns data buffers used to receive
1374  *  a MAD to the access layer
1375  */
1376 void ib_free_recv_mad(struct ib_mad_recv_wc *mad_recv_wc)
1377 {
1378         struct ib_mad_recv_buf *mad_recv_buf, *temp_recv_buf;
1379         struct ib_mad_private_header *mad_priv_hdr;
1380         struct ib_mad_private *priv;
1381         struct list_head free_list;
1382
1383         INIT_LIST_HEAD(&free_list);
1384         list_splice_init(&mad_recv_wc->rmpp_list, &free_list);
1385
1386         list_for_each_entry_safe(mad_recv_buf, temp_recv_buf,
1387                                         &free_list, list) {
1388                 mad_recv_wc = container_of(mad_recv_buf, struct ib_mad_recv_wc,
1389                                            recv_buf);
1390                 mad_priv_hdr = container_of(mad_recv_wc,
1391                                             struct ib_mad_private_header,
1392                                             recv_wc);
1393                 priv = container_of(mad_priv_hdr, struct ib_mad_private,
1394                                     header);
1395                 kfree(priv);
1396         }
1397 }
1398 EXPORT_SYMBOL(ib_free_recv_mad);
1399
1400 static int method_in_use(struct ib_mad_mgmt_method_table **method,
1401                          struct ib_mad_reg_req *mad_reg_req)
1402 {
1403         int i;
1404
1405         for_each_set_bit(i, mad_reg_req->method_mask, IB_MGMT_MAX_METHODS) {
1406                 if ((*method)->agent[i]) {
1407                         pr_err("Method %d already in use\n", i);
1408                         return -EINVAL;
1409                 }
1410         }
1411         return 0;
1412 }
1413
1414 static int allocate_method_table(struct ib_mad_mgmt_method_table **method)
1415 {
1416         /* Allocate management method table */
1417         *method = kzalloc(sizeof **method, GFP_ATOMIC);
1418         return (*method) ? 0 : (-ENOMEM);
1419 }
1420
1421 /*
1422  * Check to see if there are any methods still in use
1423  */
1424 static int check_method_table(struct ib_mad_mgmt_method_table *method)
1425 {
1426         int i;
1427
1428         for (i = 0; i < IB_MGMT_MAX_METHODS; i++)
1429                 if (method->agent[i])
1430                         return 1;
1431         return 0;
1432 }
1433
1434 /*
1435  * Check to see if there are any method tables for this class still in use
1436  */
1437 static int check_class_table(struct ib_mad_mgmt_class_table *class)
1438 {
1439         int i;
1440
1441         for (i = 0; i < MAX_MGMT_CLASS; i++)
1442                 if (class->method_table[i])
1443                         return 1;
1444         return 0;
1445 }
1446
1447 static int check_vendor_class(struct ib_mad_mgmt_vendor_class *vendor_class)
1448 {
1449         int i;
1450
1451         for (i = 0; i < MAX_MGMT_OUI; i++)
1452                 if (vendor_class->method_table[i])
1453                         return 1;
1454         return 0;
1455 }
1456
1457 static int find_vendor_oui(struct ib_mad_mgmt_vendor_class *vendor_class,
1458                            const char *oui)
1459 {
1460         int i;
1461
1462         for (i = 0; i < MAX_MGMT_OUI; i++)
1463                 /* Is there matching OUI for this vendor class ? */
1464                 if (!memcmp(vendor_class->oui[i], oui, 3))
1465                         return i;
1466
1467         return -1;
1468 }
1469
1470 static int check_vendor_table(struct ib_mad_mgmt_vendor_class_table *vendor)
1471 {
1472         int i;
1473
1474         for (i = 0; i < MAX_MGMT_VENDOR_RANGE2; i++)
1475                 if (vendor->vendor_class[i])
1476                         return 1;
1477
1478         return 0;
1479 }
1480
1481 static void remove_methods_mad_agent(struct ib_mad_mgmt_method_table *method,
1482                                      struct ib_mad_agent_private *agent)
1483 {
1484         int i;
1485
1486         /* Remove any methods for this mad agent */
1487         for (i = 0; i < IB_MGMT_MAX_METHODS; i++) {
1488                 if (method->agent[i] == agent) {
1489                         method->agent[i] = NULL;
1490                 }
1491         }
1492 }
1493
1494 static int add_nonoui_reg_req(struct ib_mad_reg_req *mad_reg_req,
1495                               struct ib_mad_agent_private *agent_priv,
1496                               u8 mgmt_class)
1497 {
1498         struct ib_mad_port_private *port_priv;
1499         struct ib_mad_mgmt_class_table **class;
1500         struct ib_mad_mgmt_method_table **method;
1501         int i, ret;
1502
1503         port_priv = agent_priv->qp_info->port_priv;
1504         class = &port_priv->version[mad_reg_req->mgmt_class_version].class;
1505         if (!*class) {
1506                 /* Allocate management class table for "new" class version */
1507                 *class = kzalloc(sizeof **class, GFP_ATOMIC);
1508                 if (!*class) {
1509                         ret = -ENOMEM;
1510                         goto error1;
1511                 }
1512
1513                 /* Allocate method table for this management class */
1514                 method = &(*class)->method_table[mgmt_class];
1515                 if ((ret = allocate_method_table(method)))
1516                         goto error2;
1517         } else {
1518                 method = &(*class)->method_table[mgmt_class];
1519                 if (!*method) {
1520                         /* Allocate method table for this management class */
1521                         if ((ret = allocate_method_table(method)))
1522                                 goto error1;
1523                 }
1524         }
1525
1526         /* Now, make sure methods are not already in use */
1527         if (method_in_use(method, mad_reg_req))
1528                 goto error3;
1529
1530         /* Finally, add in methods being registered */
1531         for_each_set_bit(i, mad_reg_req->method_mask, IB_MGMT_MAX_METHODS)
1532                 (*method)->agent[i] = agent_priv;
1533
1534         return 0;
1535
1536 error3:
1537         /* Remove any methods for this mad agent */
1538         remove_methods_mad_agent(*method, agent_priv);
1539         /* Now, check to see if there are any methods in use */
1540         if (!check_method_table(*method)) {
1541                 /* If not, release management method table */
1542                 kfree(*method);
1543                 *method = NULL;
1544         }
1545         ret = -EINVAL;
1546         goto error1;
1547 error2:
1548         kfree(*class);
1549         *class = NULL;
1550 error1:
1551         return ret;
1552 }
1553
1554 static int add_oui_reg_req(struct ib_mad_reg_req *mad_reg_req,
1555                            struct ib_mad_agent_private *agent_priv)
1556 {
1557         struct ib_mad_port_private *port_priv;
1558         struct ib_mad_mgmt_vendor_class_table **vendor_table;
1559         struct ib_mad_mgmt_vendor_class_table *vendor = NULL;
1560         struct ib_mad_mgmt_vendor_class *vendor_class = NULL;
1561         struct ib_mad_mgmt_method_table **method;
1562         int i, ret = -ENOMEM;
1563         u8 vclass;
1564
1565         /* "New" vendor (with OUI) class */
1566         vclass = vendor_class_index(mad_reg_req->mgmt_class);
1567         port_priv = agent_priv->qp_info->port_priv;
1568         vendor_table = &port_priv->version[
1569                                 mad_reg_req->mgmt_class_version].vendor;
1570         if (!*vendor_table) {
1571                 /* Allocate mgmt vendor class table for "new" class version */
1572                 vendor = kzalloc(sizeof *vendor, GFP_ATOMIC);
1573                 if (!vendor)
1574                         goto error1;
1575
1576                 *vendor_table = vendor;
1577         }
1578         if (!(*vendor_table)->vendor_class[vclass]) {
1579                 /* Allocate table for this management vendor class */
1580                 vendor_class = kzalloc(sizeof *vendor_class, GFP_ATOMIC);
1581                 if (!vendor_class)
1582                         goto error2;
1583
1584                 (*vendor_table)->vendor_class[vclass] = vendor_class;
1585         }
1586         for (i = 0; i < MAX_MGMT_OUI; i++) {
1587                 /* Is there matching OUI for this vendor class ? */
1588                 if (!memcmp((*vendor_table)->vendor_class[vclass]->oui[i],
1589                             mad_reg_req->oui, 3)) {
1590                         method = &(*vendor_table)->vendor_class[
1591                                                 vclass]->method_table[i];
1592                         if (!*method)
1593                                 goto error3;
1594                         goto check_in_use;
1595                 }
1596         }
1597         for (i = 0; i < MAX_MGMT_OUI; i++) {
1598                 /* OUI slot available ? */
1599                 if (!is_vendor_oui((*vendor_table)->vendor_class[
1600                                 vclass]->oui[i])) {
1601                         method = &(*vendor_table)->vendor_class[
1602                                 vclass]->method_table[i];
1603                         /* Allocate method table for this OUI */
1604                         if (!*method) {
1605                                 ret = allocate_method_table(method);
1606                                 if (ret)
1607                                         goto error3;
1608                         }
1609                         memcpy((*vendor_table)->vendor_class[vclass]->oui[i],
1610                                mad_reg_req->oui, 3);
1611                         goto check_in_use;
1612                 }
1613         }
1614         dev_err(&agent_priv->agent.device->dev, "All OUI slots in use\n");
1615         goto error3;
1616
1617 check_in_use:
1618         /* Now, make sure methods are not already in use */
1619         if (method_in_use(method, mad_reg_req))
1620                 goto error4;
1621
1622         /* Finally, add in methods being registered */
1623         for_each_set_bit(i, mad_reg_req->method_mask, IB_MGMT_MAX_METHODS)
1624                 (*method)->agent[i] = agent_priv;
1625
1626         return 0;
1627
1628 error4:
1629         /* Remove any methods for this mad agent */
1630         remove_methods_mad_agent(*method, agent_priv);
1631         /* Now, check to see if there are any methods in use */
1632         if (!check_method_table(*method)) {
1633                 /* If not, release management method table */
1634                 kfree(*method);
1635                 *method = NULL;
1636         }
1637         ret = -EINVAL;
1638 error3:
1639         if (vendor_class) {
1640                 (*vendor_table)->vendor_class[vclass] = NULL;
1641                 kfree(vendor_class);
1642         }
1643 error2:
1644         if (vendor) {
1645                 *vendor_table = NULL;
1646                 kfree(vendor);
1647         }
1648 error1:
1649         return ret;
1650 }
1651
1652 static void remove_mad_reg_req(struct ib_mad_agent_private *agent_priv)
1653 {
1654         struct ib_mad_port_private *port_priv;
1655         struct ib_mad_mgmt_class_table *class;
1656         struct ib_mad_mgmt_method_table *method;
1657         struct ib_mad_mgmt_vendor_class_table *vendor;
1658         struct ib_mad_mgmt_vendor_class *vendor_class;
1659         int index;
1660         u8 mgmt_class;
1661
1662         /*
1663          * Was MAD registration request supplied
1664          * with original registration ?
1665          */
1666         if (!agent_priv->reg_req) {
1667                 goto out;
1668         }
1669
1670         port_priv = agent_priv->qp_info->port_priv;
1671         mgmt_class = convert_mgmt_class(agent_priv->reg_req->mgmt_class);
1672         class = port_priv->version[
1673                         agent_priv->reg_req->mgmt_class_version].class;
1674         if (!class)
1675                 goto vendor_check;
1676
1677         method = class->method_table[mgmt_class];
1678         if (method) {
1679                 /* Remove any methods for this mad agent */
1680                 remove_methods_mad_agent(method, agent_priv);
1681                 /* Now, check to see if there are any methods still in use */
1682                 if (!check_method_table(method)) {
1683                         /* If not, release management method table */
1684                         kfree(method);
1685                         class->method_table[mgmt_class] = NULL;
1686                         /* Any management classes left ? */
1687                         if (!check_class_table(class)) {
1688                                 /* If not, release management class table */
1689                                 kfree(class);
1690                                 port_priv->version[
1691                                         agent_priv->reg_req->
1692                                         mgmt_class_version].class = NULL;
1693                         }
1694                 }
1695         }
1696
1697 vendor_check:
1698         if (!is_vendor_class(mgmt_class))
1699                 goto out;
1700
1701         /* normalize mgmt_class to vendor range 2 */
1702         mgmt_class = vendor_class_index(agent_priv->reg_req->mgmt_class);
1703         vendor = port_priv->version[
1704                         agent_priv->reg_req->mgmt_class_version].vendor;
1705
1706         if (!vendor)
1707                 goto out;
1708
1709         vendor_class = vendor->vendor_class[mgmt_class];
1710         if (vendor_class) {
1711                 index = find_vendor_oui(vendor_class, agent_priv->reg_req->oui);
1712                 if (index < 0)
1713                         goto out;
1714                 method = vendor_class->method_table[index];
1715                 if (method) {
1716                         /* Remove any methods for this mad agent */
1717                         remove_methods_mad_agent(method, agent_priv);
1718                         /*
1719                          * Now, check to see if there are
1720                          * any methods still in use
1721                          */
1722                         if (!check_method_table(method)) {
1723                                 /* If not, release management method table */
1724                                 kfree(method);
1725                                 vendor_class->method_table[index] = NULL;
1726                                 memset(vendor_class->oui[index], 0, 3);
1727                                 /* Any OUIs left ? */
1728                                 if (!check_vendor_class(vendor_class)) {
1729                                         /* If not, release vendor class table */
1730                                         kfree(vendor_class);
1731                                         vendor->vendor_class[mgmt_class] = NULL;
1732                                         /* Any other vendor classes left ? */
1733                                         if (!check_vendor_table(vendor)) {
1734                                                 kfree(vendor);
1735                                                 port_priv->version[
1736                                                         agent_priv->reg_req->
1737                                                         mgmt_class_version].
1738                                                         vendor = NULL;
1739                                         }
1740                                 }
1741                         }
1742                 }
1743         }
1744
1745 out:
1746         return;
1747 }
1748
1749 static struct ib_mad_agent_private *
1750 find_mad_agent(struct ib_mad_port_private *port_priv,
1751                const struct ib_mad_hdr *mad_hdr)
1752 {
1753         struct ib_mad_agent_private *mad_agent = NULL;
1754         unsigned long flags;
1755
1756         if (ib_response_mad(mad_hdr)) {
1757                 u32 hi_tid;
1758
1759                 /*
1760                  * Routing is based on high 32 bits of transaction ID
1761                  * of MAD.
1762                  */
1763                 hi_tid = be64_to_cpu(mad_hdr->tid) >> 32;
1764                 rcu_read_lock();
1765                 mad_agent = xa_load(&ib_mad_clients, hi_tid);
1766                 if (mad_agent && !atomic_inc_not_zero(&mad_agent->refcount))
1767                         mad_agent = NULL;
1768                 rcu_read_unlock();
1769         } else {
1770                 struct ib_mad_mgmt_class_table *class;
1771                 struct ib_mad_mgmt_method_table *method;
1772                 struct ib_mad_mgmt_vendor_class_table *vendor;
1773                 struct ib_mad_mgmt_vendor_class *vendor_class;
1774                 const struct ib_vendor_mad *vendor_mad;
1775                 int index;
1776
1777                 spin_lock_irqsave(&port_priv->reg_lock, flags);
1778                 /*
1779                  * Routing is based on version, class, and method
1780                  * For "newer" vendor MADs, also based on OUI
1781                  */
1782                 if (mad_hdr->class_version >= MAX_MGMT_VERSION)
1783                         goto out;
1784                 if (!is_vendor_class(mad_hdr->mgmt_class)) {
1785                         class = port_priv->version[
1786                                         mad_hdr->class_version].class;
1787                         if (!class)
1788                                 goto out;
1789                         if (convert_mgmt_class(mad_hdr->mgmt_class) >=
1790                             ARRAY_SIZE(class->method_table))
1791                                 goto out;
1792                         method = class->method_table[convert_mgmt_class(
1793                                                         mad_hdr->mgmt_class)];
1794                         if (method)
1795                                 mad_agent = method->agent[mad_hdr->method &
1796                                                           ~IB_MGMT_METHOD_RESP];
1797                 } else {
1798                         vendor = port_priv->version[
1799                                         mad_hdr->class_version].vendor;
1800                         if (!vendor)
1801                                 goto out;
1802                         vendor_class = vendor->vendor_class[vendor_class_index(
1803                                                 mad_hdr->mgmt_class)];
1804                         if (!vendor_class)
1805                                 goto out;
1806                         /* Find matching OUI */
1807                         vendor_mad = (const struct ib_vendor_mad *)mad_hdr;
1808                         index = find_vendor_oui(vendor_class, vendor_mad->oui);
1809                         if (index == -1)
1810                                 goto out;
1811                         method = vendor_class->method_table[index];
1812                         if (method) {
1813                                 mad_agent = method->agent[mad_hdr->method &
1814                                                           ~IB_MGMT_METHOD_RESP];
1815                         }
1816                 }
1817                 if (mad_agent)
1818                         atomic_inc(&mad_agent->refcount);
1819 out:
1820                 spin_unlock_irqrestore(&port_priv->reg_lock, flags);
1821         }
1822
1823         if (mad_agent && !mad_agent->agent.recv_handler) {
1824                 dev_notice(&port_priv->device->dev,
1825                            "No receive handler for client %p on port %d\n",
1826                            &mad_agent->agent, port_priv->port_num);
1827                 deref_mad_agent(mad_agent);
1828                 mad_agent = NULL;
1829         }
1830
1831         return mad_agent;
1832 }
1833
1834 static int validate_mad(const struct ib_mad_hdr *mad_hdr,
1835                         const struct ib_mad_qp_info *qp_info,
1836                         bool opa)
1837 {
1838         int valid = 0;
1839         u32 qp_num = qp_info->qp->qp_num;
1840
1841         /* Make sure MAD base version is understood */
1842         if (mad_hdr->base_version != IB_MGMT_BASE_VERSION &&
1843             (!opa || mad_hdr->base_version != OPA_MGMT_BASE_VERSION)) {
1844                 pr_err("MAD received with unsupported base version %d %s\n",
1845                        mad_hdr->base_version, opa ? "(opa)" : "");
1846                 goto out;
1847         }
1848
1849         /* Filter SMI packets sent to other than QP0 */
1850         if ((mad_hdr->mgmt_class == IB_MGMT_CLASS_SUBN_LID_ROUTED) ||
1851             (mad_hdr->mgmt_class == IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE)) {
1852                 if (qp_num == 0)
1853                         valid = 1;
1854         } else {
1855                 /* CM attributes other than ClassPortInfo only use Send method */
1856                 if ((mad_hdr->mgmt_class == IB_MGMT_CLASS_CM) &&
1857                     (mad_hdr->attr_id != IB_MGMT_CLASSPORTINFO_ATTR_ID) &&
1858                     (mad_hdr->method != IB_MGMT_METHOD_SEND))
1859                         goto out;
1860                 /* Filter GSI packets sent to QP0 */
1861                 if (qp_num != 0)
1862                         valid = 1;
1863         }
1864
1865 out:
1866         return valid;
1867 }
1868
1869 static int is_rmpp_data_mad(const struct ib_mad_agent_private *mad_agent_priv,
1870                             const struct ib_mad_hdr *mad_hdr)
1871 {
1872         struct ib_rmpp_mad *rmpp_mad;
1873
1874         rmpp_mad = (struct ib_rmpp_mad *)mad_hdr;
1875         return !mad_agent_priv->agent.rmpp_version ||
1876                 !ib_mad_kernel_rmpp_agent(&mad_agent_priv->agent) ||
1877                 !(ib_get_rmpp_flags(&rmpp_mad->rmpp_hdr) &
1878                                     IB_MGMT_RMPP_FLAG_ACTIVE) ||
1879                 (rmpp_mad->rmpp_hdr.rmpp_type == IB_MGMT_RMPP_TYPE_DATA);
1880 }
1881
1882 static inline int rcv_has_same_class(const struct ib_mad_send_wr_private *wr,
1883                                      const struct ib_mad_recv_wc *rwc)
1884 {
1885         return ((struct ib_mad_hdr *)(wr->send_buf.mad))->mgmt_class ==
1886                 rwc->recv_buf.mad->mad_hdr.mgmt_class;
1887 }
1888
1889 static inline int rcv_has_same_gid(const struct ib_mad_agent_private *mad_agent_priv,
1890                                    const struct ib_mad_send_wr_private *wr,
1891                                    const struct ib_mad_recv_wc *rwc )
1892 {
1893         struct rdma_ah_attr attr;
1894         u8 send_resp, rcv_resp;
1895         union ib_gid sgid;
1896         struct ib_device *device = mad_agent_priv->agent.device;
1897         u8 port_num = mad_agent_priv->agent.port_num;
1898         u8 lmc;
1899         bool has_grh;
1900
1901         send_resp = ib_response_mad((struct ib_mad_hdr *)wr->send_buf.mad);
1902         rcv_resp = ib_response_mad(&rwc->recv_buf.mad->mad_hdr);
1903
1904         if (send_resp == rcv_resp)
1905                 /* both requests, or both responses. GIDs different */
1906                 return 0;
1907
1908         if (rdma_query_ah(wr->send_buf.ah, &attr))
1909                 /* Assume not equal, to avoid false positives. */
1910                 return 0;
1911
1912         has_grh = !!(rdma_ah_get_ah_flags(&attr) & IB_AH_GRH);
1913         if (has_grh != !!(rwc->wc->wc_flags & IB_WC_GRH))
1914                 /* one has GID, other does not.  Assume different */
1915                 return 0;
1916
1917         if (!send_resp && rcv_resp) {
1918                 /* is request/response. */
1919                 if (!has_grh) {
1920                         if (ib_get_cached_lmc(device, port_num, &lmc))
1921                                 return 0;
1922                         return (!lmc || !((rdma_ah_get_path_bits(&attr) ^
1923                                            rwc->wc->dlid_path_bits) &
1924                                           ((1 << lmc) - 1)));
1925                 } else {
1926                         const struct ib_global_route *grh =
1927                                         rdma_ah_read_grh(&attr);
1928
1929                         if (rdma_query_gid(device, port_num,
1930                                            grh->sgid_index, &sgid))
1931                                 return 0;
1932                         return !memcmp(sgid.raw, rwc->recv_buf.grh->dgid.raw,
1933                                        16);
1934                 }
1935         }
1936
1937         if (!has_grh)
1938                 return rdma_ah_get_dlid(&attr) == rwc->wc->slid;
1939         else
1940                 return !memcmp(rdma_ah_read_grh(&attr)->dgid.raw,
1941                                rwc->recv_buf.grh->sgid.raw,
1942                                16);
1943 }
1944
1945 static inline int is_direct(u8 class)
1946 {
1947         return (class == IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE);
1948 }
1949
1950 struct ib_mad_send_wr_private*
1951 ib_find_send_mad(const struct ib_mad_agent_private *mad_agent_priv,
1952                  const struct ib_mad_recv_wc *wc)
1953 {
1954         struct ib_mad_send_wr_private *wr;
1955         const struct ib_mad_hdr *mad_hdr;
1956
1957         mad_hdr = &wc->recv_buf.mad->mad_hdr;
1958
1959         list_for_each_entry(wr, &mad_agent_priv->wait_list, agent_list) {
1960                 if ((wr->tid == mad_hdr->tid) &&
1961                     rcv_has_same_class(wr, wc) &&
1962                     /*
1963                      * Don't check GID for direct routed MADs.
1964                      * These might have permissive LIDs.
1965                      */
1966                     (is_direct(mad_hdr->mgmt_class) ||
1967                      rcv_has_same_gid(mad_agent_priv, wr, wc)))
1968                         return (wr->status == IB_WC_SUCCESS) ? wr : NULL;
1969         }
1970
1971         /*
1972          * It's possible to receive the response before we've
1973          * been notified that the send has completed
1974          */
1975         list_for_each_entry(wr, &mad_agent_priv->send_list, agent_list) {
1976                 if (is_rmpp_data_mad(mad_agent_priv, wr->send_buf.mad) &&
1977                     wr->tid == mad_hdr->tid &&
1978                     wr->timeout &&
1979                     rcv_has_same_class(wr, wc) &&
1980                     /*
1981                      * Don't check GID for direct routed MADs.
1982                      * These might have permissive LIDs.
1983                      */
1984                     (is_direct(mad_hdr->mgmt_class) ||
1985                      rcv_has_same_gid(mad_agent_priv, wr, wc)))
1986                         /* Verify request has not been canceled */
1987                         return (wr->status == IB_WC_SUCCESS) ? wr : NULL;
1988         }
1989         return NULL;
1990 }
1991
1992 void ib_mark_mad_done(struct ib_mad_send_wr_private *mad_send_wr)
1993 {
1994         mad_send_wr->timeout = 0;
1995         if (mad_send_wr->refcount == 1)
1996                 list_move_tail(&mad_send_wr->agent_list,
1997                               &mad_send_wr->mad_agent_priv->done_list);
1998 }
1999
2000 static void ib_mad_complete_recv(struct ib_mad_agent_private *mad_agent_priv,
2001                                  struct ib_mad_recv_wc *mad_recv_wc)
2002 {
2003         struct ib_mad_send_wr_private *mad_send_wr;
2004         struct ib_mad_send_wc mad_send_wc;
2005         unsigned long flags;
2006         int ret;
2007
2008         INIT_LIST_HEAD(&mad_recv_wc->rmpp_list);
2009         ret = ib_mad_enforce_security(mad_agent_priv,
2010                                       mad_recv_wc->wc->pkey_index);
2011         if (ret) {
2012                 ib_free_recv_mad(mad_recv_wc);
2013                 deref_mad_agent(mad_agent_priv);
2014                 return;
2015         }
2016
2017         list_add(&mad_recv_wc->recv_buf.list, &mad_recv_wc->rmpp_list);
2018         if (ib_mad_kernel_rmpp_agent(&mad_agent_priv->agent)) {
2019                 mad_recv_wc = ib_process_rmpp_recv_wc(mad_agent_priv,
2020                                                       mad_recv_wc);
2021                 if (!mad_recv_wc) {
2022                         deref_mad_agent(mad_agent_priv);
2023                         return;
2024                 }
2025         }
2026
2027         /* Complete corresponding request */
2028         if (ib_response_mad(&mad_recv_wc->recv_buf.mad->mad_hdr)) {
2029                 spin_lock_irqsave(&mad_agent_priv->lock, flags);
2030                 mad_send_wr = ib_find_send_mad(mad_agent_priv, mad_recv_wc);
2031                 if (!mad_send_wr) {
2032                         spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
2033                         if (!ib_mad_kernel_rmpp_agent(&mad_agent_priv->agent)
2034                            && ib_is_mad_class_rmpp(mad_recv_wc->recv_buf.mad->mad_hdr.mgmt_class)
2035                            && (ib_get_rmpp_flags(&((struct ib_rmpp_mad *)mad_recv_wc->recv_buf.mad)->rmpp_hdr)
2036                                         & IB_MGMT_RMPP_FLAG_ACTIVE)) {
2037                                 /* user rmpp is in effect
2038                                  * and this is an active RMPP MAD
2039                                  */
2040                                 mad_agent_priv->agent.recv_handler(
2041                                                 &mad_agent_priv->agent, NULL,
2042                                                 mad_recv_wc);
2043                                 atomic_dec(&mad_agent_priv->refcount);
2044                         } else {
2045                                 /* not user rmpp, revert to normal behavior and
2046                                  * drop the mad */
2047                                 ib_free_recv_mad(mad_recv_wc);
2048                                 deref_mad_agent(mad_agent_priv);
2049                                 return;
2050                         }
2051                 } else {
2052                         ib_mark_mad_done(mad_send_wr);
2053                         spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
2054
2055                         /* Defined behavior is to complete response before request */
2056                         mad_agent_priv->agent.recv_handler(
2057                                         &mad_agent_priv->agent,
2058                                         &mad_send_wr->send_buf,
2059                                         mad_recv_wc);
2060                         atomic_dec(&mad_agent_priv->refcount);
2061
2062                         mad_send_wc.status = IB_WC_SUCCESS;
2063                         mad_send_wc.vendor_err = 0;
2064                         mad_send_wc.send_buf = &mad_send_wr->send_buf;
2065                         ib_mad_complete_send_wr(mad_send_wr, &mad_send_wc);
2066                 }
2067         } else {
2068                 mad_agent_priv->agent.recv_handler(&mad_agent_priv->agent, NULL,
2069                                                    mad_recv_wc);
2070                 deref_mad_agent(mad_agent_priv);
2071         }
2072
2073         return;
2074 }
2075
2076 static enum smi_action handle_ib_smi(const struct ib_mad_port_private *port_priv,
2077                                      const struct ib_mad_qp_info *qp_info,
2078                                      const struct ib_wc *wc,
2079                                      int port_num,
2080                                      struct ib_mad_private *recv,
2081                                      struct ib_mad_private *response)
2082 {
2083         enum smi_forward_action retsmi;
2084         struct ib_smp *smp = (struct ib_smp *)recv->mad;
2085
2086         trace_ib_mad_handle_ib_smi(smp);
2087
2088         if (smi_handle_dr_smp_recv(smp,
2089                                    rdma_cap_ib_switch(port_priv->device),
2090                                    port_num,
2091                                    port_priv->device->phys_port_cnt) ==
2092                                    IB_SMI_DISCARD)
2093                 return IB_SMI_DISCARD;
2094
2095         retsmi = smi_check_forward_dr_smp(smp);
2096         if (retsmi == IB_SMI_LOCAL)
2097                 return IB_SMI_HANDLE;
2098
2099         if (retsmi == IB_SMI_SEND) { /* don't forward */
2100                 if (smi_handle_dr_smp_send(smp,
2101                                            rdma_cap_ib_switch(port_priv->device),
2102                                            port_num) == IB_SMI_DISCARD)
2103                         return IB_SMI_DISCARD;
2104
2105                 if (smi_check_local_smp(smp, port_priv->device) == IB_SMI_DISCARD)
2106                         return IB_SMI_DISCARD;
2107         } else if (rdma_cap_ib_switch(port_priv->device)) {
2108                 /* forward case for switches */
2109                 memcpy(response, recv, mad_priv_size(response));
2110                 response->header.recv_wc.wc = &response->header.wc;
2111                 response->header.recv_wc.recv_buf.mad = (struct ib_mad *)response->mad;
2112                 response->header.recv_wc.recv_buf.grh = &response->grh;
2113
2114                 agent_send_response((const struct ib_mad_hdr *)response->mad,
2115                                     &response->grh, wc,
2116                                     port_priv->device,
2117                                     smi_get_fwd_port(smp),
2118                                     qp_info->qp->qp_num,
2119                                     response->mad_size,
2120                                     false);
2121
2122                 return IB_SMI_DISCARD;
2123         }
2124         return IB_SMI_HANDLE;
2125 }
2126
2127 static bool generate_unmatched_resp(const struct ib_mad_private *recv,
2128                                     struct ib_mad_private *response,
2129                                     size_t *resp_len, bool opa)
2130 {
2131         const struct ib_mad_hdr *recv_hdr = (const struct ib_mad_hdr *)recv->mad;
2132         struct ib_mad_hdr *resp_hdr = (struct ib_mad_hdr *)response->mad;
2133
2134         if (recv_hdr->method == IB_MGMT_METHOD_GET ||
2135             recv_hdr->method == IB_MGMT_METHOD_SET) {
2136                 memcpy(response, recv, mad_priv_size(response));
2137                 response->header.recv_wc.wc = &response->header.wc;
2138                 response->header.recv_wc.recv_buf.mad = (struct ib_mad *)response->mad;
2139                 response->header.recv_wc.recv_buf.grh = &response->grh;
2140                 resp_hdr->method = IB_MGMT_METHOD_GET_RESP;
2141                 resp_hdr->status = cpu_to_be16(IB_MGMT_MAD_STATUS_UNSUPPORTED_METHOD_ATTRIB);
2142                 if (recv_hdr->mgmt_class == IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE)
2143                         resp_hdr->status |= IB_SMP_DIRECTION;
2144
2145                 if (opa && recv_hdr->base_version == OPA_MGMT_BASE_VERSION) {
2146                         if (recv_hdr->mgmt_class ==
2147                             IB_MGMT_CLASS_SUBN_LID_ROUTED ||
2148                             recv_hdr->mgmt_class ==
2149                             IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE)
2150                                 *resp_len = opa_get_smp_header_size(
2151                                                         (struct opa_smp *)recv->mad);
2152                         else
2153                                 *resp_len = sizeof(struct ib_mad_hdr);
2154                 }
2155
2156                 return true;
2157         } else {
2158                 return false;
2159         }
2160 }
2161
2162 static enum smi_action
2163 handle_opa_smi(struct ib_mad_port_private *port_priv,
2164                struct ib_mad_qp_info *qp_info,
2165                struct ib_wc *wc,
2166                int port_num,
2167                struct ib_mad_private *recv,
2168                struct ib_mad_private *response)
2169 {
2170         enum smi_forward_action retsmi;
2171         struct opa_smp *smp = (struct opa_smp *)recv->mad;
2172
2173         trace_ib_mad_handle_opa_smi(smp);
2174
2175         if (opa_smi_handle_dr_smp_recv(smp,
2176                                    rdma_cap_ib_switch(port_priv->device),
2177                                    port_num,
2178                                    port_priv->device->phys_port_cnt) ==
2179                                    IB_SMI_DISCARD)
2180                 return IB_SMI_DISCARD;
2181
2182         retsmi = opa_smi_check_forward_dr_smp(smp);
2183         if (retsmi == IB_SMI_LOCAL)
2184                 return IB_SMI_HANDLE;
2185
2186         if (retsmi == IB_SMI_SEND) { /* don't forward */
2187                 if (opa_smi_handle_dr_smp_send(smp,
2188                                            rdma_cap_ib_switch(port_priv->device),
2189                                            port_num) == IB_SMI_DISCARD)
2190                         return IB_SMI_DISCARD;
2191
2192                 if (opa_smi_check_local_smp(smp, port_priv->device) ==
2193                     IB_SMI_DISCARD)
2194                         return IB_SMI_DISCARD;
2195
2196         } else if (rdma_cap_ib_switch(port_priv->device)) {
2197                 /* forward case for switches */
2198                 memcpy(response, recv, mad_priv_size(response));
2199                 response->header.recv_wc.wc = &response->header.wc;
2200                 response->header.recv_wc.recv_buf.opa_mad =
2201                                 (struct opa_mad *)response->mad;
2202                 response->header.recv_wc.recv_buf.grh = &response->grh;
2203
2204                 agent_send_response((const struct ib_mad_hdr *)response->mad,
2205                                     &response->grh, wc,
2206                                     port_priv->device,
2207                                     opa_smi_get_fwd_port(smp),
2208                                     qp_info->qp->qp_num,
2209                                     recv->header.wc.byte_len,
2210                                     true);
2211
2212                 return IB_SMI_DISCARD;
2213         }
2214
2215         return IB_SMI_HANDLE;
2216 }
2217
2218 static enum smi_action
2219 handle_smi(struct ib_mad_port_private *port_priv,
2220            struct ib_mad_qp_info *qp_info,
2221            struct ib_wc *wc,
2222            int port_num,
2223            struct ib_mad_private *recv,
2224            struct ib_mad_private *response,
2225            bool opa)
2226 {
2227         struct ib_mad_hdr *mad_hdr = (struct ib_mad_hdr *)recv->mad;
2228
2229         if (opa && mad_hdr->base_version == OPA_MGMT_BASE_VERSION &&
2230             mad_hdr->class_version == OPA_SM_CLASS_VERSION)
2231                 return handle_opa_smi(port_priv, qp_info, wc, port_num, recv,
2232                                       response);
2233
2234         return handle_ib_smi(port_priv, qp_info, wc, port_num, recv, response);
2235 }
2236
2237 static void ib_mad_recv_done(struct ib_cq *cq, struct ib_wc *wc)
2238 {
2239         struct ib_mad_port_private *port_priv = cq->cq_context;
2240         struct ib_mad_list_head *mad_list =
2241                 container_of(wc->wr_cqe, struct ib_mad_list_head, cqe);
2242         struct ib_mad_qp_info *qp_info;
2243         struct ib_mad_private_header *mad_priv_hdr;
2244         struct ib_mad_private *recv, *response = NULL;
2245         struct ib_mad_agent_private *mad_agent;
2246         int port_num;
2247         int ret = IB_MAD_RESULT_SUCCESS;
2248         size_t mad_size;
2249         u16 resp_mad_pkey_index = 0;
2250         bool opa;
2251
2252         if (list_empty_careful(&port_priv->port_list))
2253                 return;
2254
2255         if (wc->status != IB_WC_SUCCESS) {
2256                 /*
2257                  * Receive errors indicate that the QP has entered the error
2258                  * state - error handling/shutdown code will cleanup
2259                  */
2260                 return;
2261         }
2262
2263         qp_info = mad_list->mad_queue->qp_info;
2264         dequeue_mad(mad_list);
2265
2266         opa = rdma_cap_opa_mad(qp_info->port_priv->device,
2267                                qp_info->port_priv->port_num);
2268
2269         mad_priv_hdr = container_of(mad_list, struct ib_mad_private_header,
2270                                     mad_list);
2271         recv = container_of(mad_priv_hdr, struct ib_mad_private, header);
2272         ib_dma_unmap_single(port_priv->device,
2273                             recv->header.mapping,
2274                             mad_priv_dma_size(recv),
2275                             DMA_FROM_DEVICE);
2276
2277         /* Setup MAD receive work completion from "normal" work completion */
2278         recv->header.wc = *wc;
2279         recv->header.recv_wc.wc = &recv->header.wc;
2280
2281         if (opa && ((struct ib_mad_hdr *)(recv->mad))->base_version == OPA_MGMT_BASE_VERSION) {
2282                 recv->header.recv_wc.mad_len = wc->byte_len - sizeof(struct ib_grh);
2283                 recv->header.recv_wc.mad_seg_size = sizeof(struct opa_mad);
2284         } else {
2285                 recv->header.recv_wc.mad_len = sizeof(struct ib_mad);
2286                 recv->header.recv_wc.mad_seg_size = sizeof(struct ib_mad);
2287         }
2288
2289         recv->header.recv_wc.recv_buf.mad = (struct ib_mad *)recv->mad;
2290         recv->header.recv_wc.recv_buf.grh = &recv->grh;
2291
2292         if (atomic_read(&qp_info->snoop_count))
2293                 snoop_recv(qp_info, &recv->header.recv_wc, IB_MAD_SNOOP_RECVS);
2294
2295         /* Validate MAD */
2296         if (!validate_mad((const struct ib_mad_hdr *)recv->mad, qp_info, opa))
2297                 goto out;
2298
2299         trace_ib_mad_recv_done_handler(qp_info, wc,
2300                                        (struct ib_mad_hdr *)recv->mad);
2301
2302         mad_size = recv->mad_size;
2303         response = alloc_mad_private(mad_size, GFP_KERNEL);
2304         if (!response)
2305                 goto out;
2306
2307         if (rdma_cap_ib_switch(port_priv->device))
2308                 port_num = wc->port_num;
2309         else
2310                 port_num = port_priv->port_num;
2311
2312         if (((struct ib_mad_hdr *)recv->mad)->mgmt_class ==
2313             IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE) {
2314                 if (handle_smi(port_priv, qp_info, wc, port_num, recv,
2315                                response, opa)
2316                     == IB_SMI_DISCARD)
2317                         goto out;
2318         }
2319
2320         /* Give driver "right of first refusal" on incoming MAD */
2321         if (port_priv->device->ops.process_mad) {
2322                 ret = port_priv->device->ops.process_mad(
2323                         port_priv->device, 0, port_priv->port_num, wc,
2324                         &recv->grh, (const struct ib_mad *)recv->mad,
2325                         (struct ib_mad *)response->mad, &mad_size,
2326                         &resp_mad_pkey_index);
2327
2328                 if (opa)
2329                         wc->pkey_index = resp_mad_pkey_index;
2330
2331                 if (ret & IB_MAD_RESULT_SUCCESS) {
2332                         if (ret & IB_MAD_RESULT_CONSUMED)
2333                                 goto out;
2334                         if (ret & IB_MAD_RESULT_REPLY) {
2335                                 agent_send_response((const struct ib_mad_hdr *)response->mad,
2336                                                     &recv->grh, wc,
2337                                                     port_priv->device,
2338                                                     port_num,
2339                                                     qp_info->qp->qp_num,
2340                                                     mad_size, opa);
2341                                 goto out;
2342                         }
2343                 }
2344         }
2345
2346         mad_agent = find_mad_agent(port_priv, (const struct ib_mad_hdr *)recv->mad);
2347         if (mad_agent) {
2348                 trace_ib_mad_recv_done_agent(mad_agent);
2349                 ib_mad_complete_recv(mad_agent, &recv->header.recv_wc);
2350                 /*
2351                  * recv is freed up in error cases in ib_mad_complete_recv
2352                  * or via recv_handler in ib_mad_complete_recv()
2353                  */
2354                 recv = NULL;
2355         } else if ((ret & IB_MAD_RESULT_SUCCESS) &&
2356                    generate_unmatched_resp(recv, response, &mad_size, opa)) {
2357                 agent_send_response((const struct ib_mad_hdr *)response->mad, &recv->grh, wc,
2358                                     port_priv->device, port_num,
2359                                     qp_info->qp->qp_num, mad_size, opa);
2360         }
2361
2362 out:
2363         /* Post another receive request for this QP */
2364         if (response) {
2365                 ib_mad_post_receive_mads(qp_info, response);
2366                 kfree(recv);
2367         } else
2368                 ib_mad_post_receive_mads(qp_info, recv);
2369 }
2370
2371 static void adjust_timeout(struct ib_mad_agent_private *mad_agent_priv)
2372 {
2373         struct ib_mad_send_wr_private *mad_send_wr;
2374         unsigned long delay;
2375
2376         if (list_empty(&mad_agent_priv->wait_list)) {
2377                 cancel_delayed_work(&mad_agent_priv->timed_work);
2378         } else {
2379                 mad_send_wr = list_entry(mad_agent_priv->wait_list.next,
2380                                          struct ib_mad_send_wr_private,
2381                                          agent_list);
2382
2383                 if (time_after(mad_agent_priv->timeout,
2384                                mad_send_wr->timeout)) {
2385                         mad_agent_priv->timeout = mad_send_wr->timeout;
2386                         delay = mad_send_wr->timeout - jiffies;
2387                         if ((long)delay <= 0)
2388                                 delay = 1;
2389                         mod_delayed_work(mad_agent_priv->qp_info->port_priv->wq,
2390                                          &mad_agent_priv->timed_work, delay);
2391                 }
2392         }
2393 }
2394
2395 static void wait_for_response(struct ib_mad_send_wr_private *mad_send_wr)
2396 {
2397         struct ib_mad_agent_private *mad_agent_priv;
2398         struct ib_mad_send_wr_private *temp_mad_send_wr;
2399         struct list_head *list_item;
2400         unsigned long delay;
2401
2402         mad_agent_priv = mad_send_wr->mad_agent_priv;
2403         list_del(&mad_send_wr->agent_list);
2404
2405         delay = mad_send_wr->timeout;
2406         mad_send_wr->timeout += jiffies;
2407
2408         if (delay) {
2409                 list_for_each_prev(list_item, &mad_agent_priv->wait_list) {
2410                         temp_mad_send_wr = list_entry(list_item,
2411                                                 struct ib_mad_send_wr_private,
2412                                                 agent_list);
2413                         if (time_after(mad_send_wr->timeout,
2414                                        temp_mad_send_wr->timeout))
2415                                 break;
2416                 }
2417         }
2418         else
2419                 list_item = &mad_agent_priv->wait_list;
2420         list_add(&mad_send_wr->agent_list, list_item);
2421
2422         /* Reschedule a work item if we have a shorter timeout */
2423         if (mad_agent_priv->wait_list.next == &mad_send_wr->agent_list)
2424                 mod_delayed_work(mad_agent_priv->qp_info->port_priv->wq,
2425                                  &mad_agent_priv->timed_work, delay);
2426 }
2427
2428 void ib_reset_mad_timeout(struct ib_mad_send_wr_private *mad_send_wr,
2429                           unsigned long timeout_ms)
2430 {
2431         mad_send_wr->timeout = msecs_to_jiffies(timeout_ms);
2432         wait_for_response(mad_send_wr);
2433 }
2434
2435 /*
2436  * Process a send work completion
2437  */
2438 void ib_mad_complete_send_wr(struct ib_mad_send_wr_private *mad_send_wr,
2439                              struct ib_mad_send_wc *mad_send_wc)
2440 {
2441         struct ib_mad_agent_private     *mad_agent_priv;
2442         unsigned long                   flags;
2443         int                             ret;
2444
2445         mad_agent_priv = mad_send_wr->mad_agent_priv;
2446         spin_lock_irqsave(&mad_agent_priv->lock, flags);
2447         if (ib_mad_kernel_rmpp_agent(&mad_agent_priv->agent)) {
2448                 ret = ib_process_rmpp_send_wc(mad_send_wr, mad_send_wc);
2449                 if (ret == IB_RMPP_RESULT_CONSUMED)
2450                         goto done;
2451         } else
2452                 ret = IB_RMPP_RESULT_UNHANDLED;
2453
2454         if (mad_send_wc->status != IB_WC_SUCCESS &&
2455             mad_send_wr->status == IB_WC_SUCCESS) {
2456                 mad_send_wr->status = mad_send_wc->status;
2457                 mad_send_wr->refcount -= (mad_send_wr->timeout > 0);
2458         }
2459
2460         if (--mad_send_wr->refcount > 0) {
2461                 if (mad_send_wr->refcount == 1 && mad_send_wr->timeout &&
2462                     mad_send_wr->status == IB_WC_SUCCESS) {
2463                         wait_for_response(mad_send_wr);
2464                 }
2465                 goto done;
2466         }
2467
2468         /* Remove send from MAD agent and notify client of completion */
2469         list_del(&mad_send_wr->agent_list);
2470         adjust_timeout(mad_agent_priv);
2471         spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
2472
2473         if (mad_send_wr->status != IB_WC_SUCCESS )
2474                 mad_send_wc->status = mad_send_wr->status;
2475         if (ret == IB_RMPP_RESULT_INTERNAL)
2476                 ib_rmpp_send_handler(mad_send_wc);
2477         else
2478                 mad_agent_priv->agent.send_handler(&mad_agent_priv->agent,
2479                                                    mad_send_wc);
2480
2481         /* Release reference on agent taken when sending */
2482         deref_mad_agent(mad_agent_priv);
2483         return;
2484 done:
2485         spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
2486 }
2487
2488 static void ib_mad_send_done(struct ib_cq *cq, struct ib_wc *wc)
2489 {
2490         struct ib_mad_port_private *port_priv = cq->cq_context;
2491         struct ib_mad_list_head *mad_list =
2492                 container_of(wc->wr_cqe, struct ib_mad_list_head, cqe);
2493         struct ib_mad_send_wr_private   *mad_send_wr, *queued_send_wr;
2494         struct ib_mad_qp_info           *qp_info;
2495         struct ib_mad_queue             *send_queue;
2496         struct ib_mad_send_wc           mad_send_wc;
2497         unsigned long flags;
2498         int ret;
2499
2500         if (list_empty_careful(&port_priv->port_list))
2501                 return;
2502
2503         if (wc->status != IB_WC_SUCCESS) {
2504                 if (!ib_mad_send_error(port_priv, wc))
2505                         return;
2506         }
2507
2508         mad_send_wr = container_of(mad_list, struct ib_mad_send_wr_private,
2509                                    mad_list);
2510         send_queue = mad_list->mad_queue;
2511         qp_info = send_queue->qp_info;
2512
2513         trace_ib_mad_send_done_agent(mad_send_wr->mad_agent_priv);
2514         trace_ib_mad_send_done_handler(mad_send_wr, wc);
2515
2516 retry:
2517         ib_dma_unmap_single(mad_send_wr->send_buf.mad_agent->device,
2518                             mad_send_wr->header_mapping,
2519                             mad_send_wr->sg_list[0].length, DMA_TO_DEVICE);
2520         ib_dma_unmap_single(mad_send_wr->send_buf.mad_agent->device,
2521                             mad_send_wr->payload_mapping,
2522                             mad_send_wr->sg_list[1].length, DMA_TO_DEVICE);
2523         queued_send_wr = NULL;
2524         spin_lock_irqsave(&send_queue->lock, flags);
2525         list_del(&mad_list->list);
2526
2527         /* Move queued send to the send queue */
2528         if (send_queue->count-- > send_queue->max_active) {
2529                 mad_list = container_of(qp_info->overflow_list.next,
2530                                         struct ib_mad_list_head, list);
2531                 queued_send_wr = container_of(mad_list,
2532                                         struct ib_mad_send_wr_private,
2533                                         mad_list);
2534                 list_move_tail(&mad_list->list, &send_queue->list);
2535         }
2536         spin_unlock_irqrestore(&send_queue->lock, flags);
2537
2538         mad_send_wc.send_buf = &mad_send_wr->send_buf;
2539         mad_send_wc.status = wc->status;
2540         mad_send_wc.vendor_err = wc->vendor_err;
2541         if (atomic_read(&qp_info->snoop_count))
2542                 snoop_send(qp_info, &mad_send_wr->send_buf, &mad_send_wc,
2543                            IB_MAD_SNOOP_SEND_COMPLETIONS);
2544         ib_mad_complete_send_wr(mad_send_wr, &mad_send_wc);
2545
2546         if (queued_send_wr) {
2547                 trace_ib_mad_send_done_resend(queued_send_wr, qp_info);
2548                 ret = ib_post_send(qp_info->qp, &queued_send_wr->send_wr.wr,
2549                                    NULL);
2550                 if (ret) {
2551                         dev_err(&port_priv->device->dev,
2552                                 "ib_post_send failed: %d\n", ret);
2553                         mad_send_wr = queued_send_wr;
2554                         wc->status = IB_WC_LOC_QP_OP_ERR;
2555                         goto retry;
2556                 }
2557         }
2558 }
2559
2560 static void mark_sends_for_retry(struct ib_mad_qp_info *qp_info)
2561 {
2562         struct ib_mad_send_wr_private *mad_send_wr;
2563         struct ib_mad_list_head *mad_list;
2564         unsigned long flags;
2565
2566         spin_lock_irqsave(&qp_info->send_queue.lock, flags);
2567         list_for_each_entry(mad_list, &qp_info->send_queue.list, list) {
2568                 mad_send_wr = container_of(mad_list,
2569                                            struct ib_mad_send_wr_private,
2570                                            mad_list);
2571                 mad_send_wr->retry = 1;
2572         }
2573         spin_unlock_irqrestore(&qp_info->send_queue.lock, flags);
2574 }
2575
2576 static bool ib_mad_send_error(struct ib_mad_port_private *port_priv,
2577                 struct ib_wc *wc)
2578 {
2579         struct ib_mad_list_head *mad_list =
2580                 container_of(wc->wr_cqe, struct ib_mad_list_head, cqe);
2581         struct ib_mad_qp_info *qp_info = mad_list->mad_queue->qp_info;
2582         struct ib_mad_send_wr_private *mad_send_wr;
2583         int ret;
2584
2585         /*
2586          * Send errors will transition the QP to SQE - move
2587          * QP to RTS and repost flushed work requests
2588          */
2589         mad_send_wr = container_of(mad_list, struct ib_mad_send_wr_private,
2590                                    mad_list);
2591         if (wc->status == IB_WC_WR_FLUSH_ERR) {
2592                 if (mad_send_wr->retry) {
2593                         /* Repost send */
2594                         mad_send_wr->retry = 0;
2595                         trace_ib_mad_error_handler(mad_send_wr, qp_info);
2596                         ret = ib_post_send(qp_info->qp, &mad_send_wr->send_wr.wr,
2597                                            NULL);
2598                         if (!ret)
2599                                 return false;
2600                 }
2601         } else {
2602                 struct ib_qp_attr *attr;
2603
2604                 /* Transition QP to RTS and fail offending send */
2605                 attr = kmalloc(sizeof *attr, GFP_KERNEL);
2606                 if (attr) {
2607                         attr->qp_state = IB_QPS_RTS;
2608                         attr->cur_qp_state = IB_QPS_SQE;
2609                         ret = ib_modify_qp(qp_info->qp, attr,
2610                                            IB_QP_STATE | IB_QP_CUR_STATE);
2611                         kfree(attr);
2612                         if (ret)
2613                                 dev_err(&port_priv->device->dev,
2614                                         "%s - ib_modify_qp to RTS: %d\n",
2615                                         __func__, ret);
2616                         else
2617                                 mark_sends_for_retry(qp_info);
2618                 }
2619         }
2620
2621         return true;
2622 }
2623
2624 static void cancel_mads(struct ib_mad_agent_private *mad_agent_priv)
2625 {
2626         unsigned long flags;
2627         struct ib_mad_send_wr_private *mad_send_wr, *temp_mad_send_wr;
2628         struct ib_mad_send_wc mad_send_wc;
2629         struct list_head cancel_list;
2630
2631         INIT_LIST_HEAD(&cancel_list);
2632
2633         spin_lock_irqsave(&mad_agent_priv->lock, flags);
2634         list_for_each_entry_safe(mad_send_wr, temp_mad_send_wr,
2635                                  &mad_agent_priv->send_list, agent_list) {
2636                 if (mad_send_wr->status == IB_WC_SUCCESS) {
2637                         mad_send_wr->status = IB_WC_WR_FLUSH_ERR;
2638                         mad_send_wr->refcount -= (mad_send_wr->timeout > 0);
2639                 }
2640         }
2641
2642         /* Empty wait list to prevent receives from finding a request */
2643         list_splice_init(&mad_agent_priv->wait_list, &cancel_list);
2644         spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
2645
2646         /* Report all cancelled requests */
2647         mad_send_wc.status = IB_WC_WR_FLUSH_ERR;
2648         mad_send_wc.vendor_err = 0;
2649
2650         list_for_each_entry_safe(mad_send_wr, temp_mad_send_wr,
2651                                  &cancel_list, agent_list) {
2652                 mad_send_wc.send_buf = &mad_send_wr->send_buf;
2653                 list_del(&mad_send_wr->agent_list);
2654                 mad_agent_priv->agent.send_handler(&mad_agent_priv->agent,
2655                                                    &mad_send_wc);
2656                 atomic_dec(&mad_agent_priv->refcount);
2657         }
2658 }
2659
2660 static struct ib_mad_send_wr_private*
2661 find_send_wr(struct ib_mad_agent_private *mad_agent_priv,
2662              struct ib_mad_send_buf *send_buf)
2663 {
2664         struct ib_mad_send_wr_private *mad_send_wr;
2665
2666         list_for_each_entry(mad_send_wr, &mad_agent_priv->wait_list,
2667                             agent_list) {
2668                 if (&mad_send_wr->send_buf == send_buf)
2669                         return mad_send_wr;
2670         }
2671
2672         list_for_each_entry(mad_send_wr, &mad_agent_priv->send_list,
2673                             agent_list) {
2674                 if (is_rmpp_data_mad(mad_agent_priv,
2675                                      mad_send_wr->send_buf.mad) &&
2676                     &mad_send_wr->send_buf == send_buf)
2677                         return mad_send_wr;
2678         }
2679         return NULL;
2680 }
2681
2682 int ib_modify_mad(struct ib_mad_agent *mad_agent,
2683                   struct ib_mad_send_buf *send_buf, u32 timeout_ms)
2684 {
2685         struct ib_mad_agent_private *mad_agent_priv;
2686         struct ib_mad_send_wr_private *mad_send_wr;
2687         unsigned long flags;
2688         int active;
2689
2690         mad_agent_priv = container_of(mad_agent, struct ib_mad_agent_private,
2691                                       agent);
2692         spin_lock_irqsave(&mad_agent_priv->lock, flags);
2693         mad_send_wr = find_send_wr(mad_agent_priv, send_buf);
2694         if (!mad_send_wr || mad_send_wr->status != IB_WC_SUCCESS) {
2695                 spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
2696                 return -EINVAL;
2697         }
2698
2699         active = (!mad_send_wr->timeout || mad_send_wr->refcount > 1);
2700         if (!timeout_ms) {
2701                 mad_send_wr->status = IB_WC_WR_FLUSH_ERR;
2702                 mad_send_wr->refcount -= (mad_send_wr->timeout > 0);
2703         }
2704
2705         mad_send_wr->send_buf.timeout_ms = timeout_ms;
2706         if (active)
2707                 mad_send_wr->timeout = msecs_to_jiffies(timeout_ms);
2708         else
2709                 ib_reset_mad_timeout(mad_send_wr, timeout_ms);
2710
2711         spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
2712         return 0;
2713 }
2714 EXPORT_SYMBOL(ib_modify_mad);
2715
2716 void ib_cancel_mad(struct ib_mad_agent *mad_agent,
2717                    struct ib_mad_send_buf *send_buf)
2718 {
2719         ib_modify_mad(mad_agent, send_buf, 0);
2720 }
2721 EXPORT_SYMBOL(ib_cancel_mad);
2722
2723 static void local_completions(struct work_struct *work)
2724 {
2725         struct ib_mad_agent_private *mad_agent_priv;
2726         struct ib_mad_local_private *local;
2727         struct ib_mad_agent_private *recv_mad_agent;
2728         unsigned long flags;
2729         int free_mad;
2730         struct ib_wc wc;
2731         struct ib_mad_send_wc mad_send_wc;
2732         bool opa;
2733
2734         mad_agent_priv =
2735                 container_of(work, struct ib_mad_agent_private, local_work);
2736
2737         opa = rdma_cap_opa_mad(mad_agent_priv->qp_info->port_priv->device,
2738                                mad_agent_priv->qp_info->port_priv->port_num);
2739
2740         spin_lock_irqsave(&mad_agent_priv->lock, flags);
2741         while (!list_empty(&mad_agent_priv->local_list)) {
2742                 local = list_entry(mad_agent_priv->local_list.next,
2743                                    struct ib_mad_local_private,
2744                                    completion_list);
2745                 list_del(&local->completion_list);
2746                 spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
2747                 free_mad = 0;
2748                 if (local->mad_priv) {
2749                         u8 base_version;
2750                         recv_mad_agent = local->recv_mad_agent;
2751                         if (!recv_mad_agent) {
2752                                 dev_err(&mad_agent_priv->agent.device->dev,
2753                                         "No receive MAD agent for local completion\n");
2754                                 free_mad = 1;
2755                                 goto local_send_completion;
2756                         }
2757
2758                         /*
2759                          * Defined behavior is to complete response
2760                          * before request
2761                          */
2762                         build_smp_wc(recv_mad_agent->agent.qp,
2763                                      local->mad_send_wr->send_wr.wr.wr_cqe,
2764                                      be16_to_cpu(IB_LID_PERMISSIVE),
2765                                      local->mad_send_wr->send_wr.pkey_index,
2766                                      recv_mad_agent->agent.port_num, &wc);
2767
2768                         local->mad_priv->header.recv_wc.wc = &wc;
2769
2770                         base_version = ((struct ib_mad_hdr *)(local->mad_priv->mad))->base_version;
2771                         if (opa && base_version == OPA_MGMT_BASE_VERSION) {
2772                                 local->mad_priv->header.recv_wc.mad_len = local->return_wc_byte_len;
2773                                 local->mad_priv->header.recv_wc.mad_seg_size = sizeof(struct opa_mad);
2774                         } else {
2775                                 local->mad_priv->header.recv_wc.mad_len = sizeof(struct ib_mad);
2776                                 local->mad_priv->header.recv_wc.mad_seg_size = sizeof(struct ib_mad);
2777                         }
2778
2779                         INIT_LIST_HEAD(&local->mad_priv->header.recv_wc.rmpp_list);
2780                         list_add(&local->mad_priv->header.recv_wc.recv_buf.list,
2781                                  &local->mad_priv->header.recv_wc.rmpp_list);
2782                         local->mad_priv->header.recv_wc.recv_buf.grh = NULL;
2783                         local->mad_priv->header.recv_wc.recv_buf.mad =
2784                                                 (struct ib_mad *)local->mad_priv->mad;
2785                         if (atomic_read(&recv_mad_agent->qp_info->snoop_count))
2786                                 snoop_recv(recv_mad_agent->qp_info,
2787                                           &local->mad_priv->header.recv_wc,
2788                                            IB_MAD_SNOOP_RECVS);
2789                         recv_mad_agent->agent.recv_handler(
2790                                                 &recv_mad_agent->agent,
2791                                                 &local->mad_send_wr->send_buf,
2792                                                 &local->mad_priv->header.recv_wc);
2793                         spin_lock_irqsave(&recv_mad_agent->lock, flags);
2794                         atomic_dec(&recv_mad_agent->refcount);
2795                         spin_unlock_irqrestore(&recv_mad_agent->lock, flags);
2796                 }
2797
2798 local_send_completion:
2799                 /* Complete send */
2800                 mad_send_wc.status = IB_WC_SUCCESS;
2801                 mad_send_wc.vendor_err = 0;
2802                 mad_send_wc.send_buf = &local->mad_send_wr->send_buf;
2803                 if (atomic_read(&mad_agent_priv->qp_info->snoop_count))
2804                         snoop_send(mad_agent_priv->qp_info,
2805                                    &local->mad_send_wr->send_buf,
2806                                    &mad_send_wc, IB_MAD_SNOOP_SEND_COMPLETIONS);
2807                 mad_agent_priv->agent.send_handler(&mad_agent_priv->agent,
2808                                                    &mad_send_wc);
2809
2810                 spin_lock_irqsave(&mad_agent_priv->lock, flags);
2811                 atomic_dec(&mad_agent_priv->refcount);
2812                 if (free_mad)
2813                         kfree(local->mad_priv);
2814                 kfree(local);
2815         }
2816         spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
2817 }
2818
2819 static int retry_send(struct ib_mad_send_wr_private *mad_send_wr)
2820 {
2821         int ret;
2822
2823         if (!mad_send_wr->retries_left)
2824                 return -ETIMEDOUT;
2825
2826         mad_send_wr->retries_left--;
2827         mad_send_wr->send_buf.retries++;
2828
2829         mad_send_wr->timeout = msecs_to_jiffies(mad_send_wr->send_buf.timeout_ms);
2830
2831         if (ib_mad_kernel_rmpp_agent(&mad_send_wr->mad_agent_priv->agent)) {
2832                 ret = ib_retry_rmpp(mad_send_wr);
2833                 switch (ret) {
2834                 case IB_RMPP_RESULT_UNHANDLED:
2835                         ret = ib_send_mad(mad_send_wr);
2836                         break;
2837                 case IB_RMPP_RESULT_CONSUMED:
2838                         ret = 0;
2839                         break;
2840                 default:
2841                         ret = -ECOMM;
2842                         break;
2843                 }
2844         } else
2845                 ret = ib_send_mad(mad_send_wr);
2846
2847         if (!ret) {
2848                 mad_send_wr->refcount++;
2849                 list_add_tail(&mad_send_wr->agent_list,
2850                               &mad_send_wr->mad_agent_priv->send_list);
2851         }
2852         return ret;
2853 }
2854
2855 static void timeout_sends(struct work_struct *work)
2856 {
2857         struct ib_mad_agent_private *mad_agent_priv;
2858         struct ib_mad_send_wr_private *mad_send_wr;
2859         struct ib_mad_send_wc mad_send_wc;
2860         unsigned long flags, delay;
2861
2862         mad_agent_priv = container_of(work, struct ib_mad_agent_private,
2863                                       timed_work.work);
2864         mad_send_wc.vendor_err = 0;
2865
2866         spin_lock_irqsave(&mad_agent_priv->lock, flags);
2867         while (!list_empty(&mad_agent_priv->wait_list)) {
2868                 mad_send_wr = list_entry(mad_agent_priv->wait_list.next,
2869                                          struct ib_mad_send_wr_private,
2870                                          agent_list);
2871
2872                 if (time_after(mad_send_wr->timeout, jiffies)) {
2873                         delay = mad_send_wr->timeout - jiffies;
2874                         if ((long)delay <= 0)
2875                                 delay = 1;
2876                         queue_delayed_work(mad_agent_priv->qp_info->
2877                                            port_priv->wq,
2878                                            &mad_agent_priv->timed_work, delay);
2879                         break;
2880                 }
2881
2882                 list_del(&mad_send_wr->agent_list);
2883                 if (mad_send_wr->status == IB_WC_SUCCESS &&
2884                     !retry_send(mad_send_wr))
2885                         continue;
2886
2887                 spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
2888
2889                 if (mad_send_wr->status == IB_WC_SUCCESS)
2890                         mad_send_wc.status = IB_WC_RESP_TIMEOUT_ERR;
2891                 else
2892                         mad_send_wc.status = mad_send_wr->status;
2893                 mad_send_wc.send_buf = &mad_send_wr->send_buf;
2894                 mad_agent_priv->agent.send_handler(&mad_agent_priv->agent,
2895                                                    &mad_send_wc);
2896
2897                 atomic_dec(&mad_agent_priv->refcount);
2898                 spin_lock_irqsave(&mad_agent_priv->lock, flags);
2899         }
2900         spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
2901 }
2902
2903 /*
2904  * Allocate receive MADs and post receive WRs for them
2905  */
2906 static int ib_mad_post_receive_mads(struct ib_mad_qp_info *qp_info,
2907                                     struct ib_mad_private *mad)
2908 {
2909         unsigned long flags;
2910         int post, ret;
2911         struct ib_mad_private *mad_priv;
2912         struct ib_sge sg_list;
2913         struct ib_recv_wr recv_wr;
2914         struct ib_mad_queue *recv_queue = &qp_info->recv_queue;
2915
2916         /* Initialize common scatter list fields */
2917         sg_list.lkey = qp_info->port_priv->pd->local_dma_lkey;
2918
2919         /* Initialize common receive WR fields */
2920         recv_wr.next = NULL;
2921         recv_wr.sg_list = &sg_list;
2922         recv_wr.num_sge = 1;
2923
2924         do {
2925                 /* Allocate and map receive buffer */
2926                 if (mad) {
2927                         mad_priv = mad;
2928                         mad = NULL;
2929                 } else {
2930                         mad_priv = alloc_mad_private(port_mad_size(qp_info->port_priv),
2931                                                      GFP_ATOMIC);
2932                         if (!mad_priv) {
2933                                 ret = -ENOMEM;
2934                                 break;
2935                         }
2936                 }
2937                 sg_list.length = mad_priv_dma_size(mad_priv);
2938                 sg_list.addr = ib_dma_map_single(qp_info->port_priv->device,
2939                                                  &mad_priv->grh,
2940                                                  mad_priv_dma_size(mad_priv),
2941                                                  DMA_FROM_DEVICE);
2942                 if (unlikely(ib_dma_mapping_error(qp_info->port_priv->device,
2943                                                   sg_list.addr))) {
2944                         ret = -ENOMEM;
2945                         break;
2946                 }
2947                 mad_priv->header.mapping = sg_list.addr;
2948                 mad_priv->header.mad_list.mad_queue = recv_queue;
2949                 mad_priv->header.mad_list.cqe.done = ib_mad_recv_done;
2950                 recv_wr.wr_cqe = &mad_priv->header.mad_list.cqe;
2951
2952                 /* Post receive WR */
2953                 spin_lock_irqsave(&recv_queue->lock, flags);
2954                 post = (++recv_queue->count < recv_queue->max_active);
2955                 list_add_tail(&mad_priv->header.mad_list.list, &recv_queue->list);
2956                 spin_unlock_irqrestore(&recv_queue->lock, flags);
2957                 ret = ib_post_recv(qp_info->qp, &recv_wr, NULL);
2958                 if (ret) {
2959                         spin_lock_irqsave(&recv_queue->lock, flags);
2960                         list_del(&mad_priv->header.mad_list.list);
2961                         recv_queue->count--;
2962                         spin_unlock_irqrestore(&recv_queue->lock, flags);
2963                         ib_dma_unmap_single(qp_info->port_priv->device,
2964                                             mad_priv->header.mapping,
2965                                             mad_priv_dma_size(mad_priv),
2966                                             DMA_FROM_DEVICE);
2967                         kfree(mad_priv);
2968                         dev_err(&qp_info->port_priv->device->dev,
2969                                 "ib_post_recv failed: %d\n", ret);
2970                         break;
2971                 }
2972         } while (post);
2973
2974         return ret;
2975 }
2976
2977 /*
2978  * Return all the posted receive MADs
2979  */
2980 static void cleanup_recv_queue(struct ib_mad_qp_info *qp_info)
2981 {
2982         struct ib_mad_private_header *mad_priv_hdr;
2983         struct ib_mad_private *recv;
2984         struct ib_mad_list_head *mad_list;
2985
2986         if (!qp_info->qp)
2987                 return;
2988
2989         while (!list_empty(&qp_info->recv_queue.list)) {
2990
2991                 mad_list = list_entry(qp_info->recv_queue.list.next,
2992                                       struct ib_mad_list_head, list);
2993                 mad_priv_hdr = container_of(mad_list,
2994                                             struct ib_mad_private_header,
2995                                             mad_list);
2996                 recv = container_of(mad_priv_hdr, struct ib_mad_private,
2997                                     header);
2998
2999                 /* Remove from posted receive MAD list */
3000                 list_del(&mad_list->list);
3001
3002                 ib_dma_unmap_single(qp_info->port_priv->device,
3003                                     recv->header.mapping,
3004                                     mad_priv_dma_size(recv),
3005                                     DMA_FROM_DEVICE);
3006                 kfree(recv);
3007         }
3008
3009         qp_info->recv_queue.count = 0;
3010 }
3011
3012 /*
3013  * Start the port
3014  */
3015 static int ib_mad_port_start(struct ib_mad_port_private *port_priv)
3016 {
3017         int ret, i;
3018         struct ib_qp_attr *attr;
3019         struct ib_qp *qp;
3020         u16 pkey_index;
3021
3022         attr = kmalloc(sizeof *attr, GFP_KERNEL);
3023         if (!attr)
3024                 return -ENOMEM;
3025
3026         ret = ib_find_pkey(port_priv->device, port_priv->port_num,
3027                            IB_DEFAULT_PKEY_FULL, &pkey_index);
3028         if (ret)
3029                 pkey_index = 0;
3030
3031         for (i = 0; i < IB_MAD_QPS_CORE; i++) {
3032                 qp = port_priv->qp_info[i].qp;
3033                 if (!qp)
3034                         continue;
3035
3036                 /*
3037                  * PKey index for QP1 is irrelevant but
3038                  * one is needed for the Reset to Init transition
3039                  */
3040                 attr->qp_state = IB_QPS_INIT;
3041                 attr->pkey_index = pkey_index;
3042                 attr->qkey = (qp->qp_num == 0) ? 0 : IB_QP1_QKEY;
3043                 ret = ib_modify_qp(qp, attr, IB_QP_STATE |
3044                                              IB_QP_PKEY_INDEX | IB_QP_QKEY);
3045                 if (ret) {
3046                         dev_err(&port_priv->device->dev,
3047                                 "Couldn't change QP%d state to INIT: %d\n",
3048                                 i, ret);
3049                         goto out;
3050                 }
3051
3052                 attr->qp_state = IB_QPS_RTR;
3053                 ret = ib_modify_qp(qp, attr, IB_QP_STATE);
3054                 if (ret) {
3055                         dev_err(&port_priv->device->dev,
3056                                 "Couldn't change QP%d state to RTR: %d\n",
3057                                 i, ret);
3058                         goto out;
3059                 }
3060
3061                 attr->qp_state = IB_QPS_RTS;
3062                 attr->sq_psn = IB_MAD_SEND_Q_PSN;
3063                 ret = ib_modify_qp(qp, attr, IB_QP_STATE | IB_QP_SQ_PSN);
3064                 if (ret) {
3065                         dev_err(&port_priv->device->dev,
3066                                 "Couldn't change QP%d state to RTS: %d\n",
3067                                 i, ret);
3068                         goto out;
3069                 }
3070         }
3071
3072         ret = ib_req_notify_cq(port_priv->cq, IB_CQ_NEXT_COMP);
3073         if (ret) {
3074                 dev_err(&port_priv->device->dev,
3075                         "Failed to request completion notification: %d\n",
3076                         ret);
3077                 goto out;
3078         }
3079
3080         for (i = 0; i < IB_MAD_QPS_CORE; i++) {
3081                 if (!port_priv->qp_info[i].qp)
3082                         continue;
3083
3084                 ret = ib_mad_post_receive_mads(&port_priv->qp_info[i], NULL);
3085                 if (ret) {
3086                         dev_err(&port_priv->device->dev,
3087                                 "Couldn't post receive WRs\n");
3088                         goto out;
3089                 }
3090         }
3091 out:
3092         kfree(attr);
3093         return ret;
3094 }
3095
3096 static void qp_event_handler(struct ib_event *event, void *qp_context)
3097 {
3098         struct ib_mad_qp_info   *qp_info = qp_context;
3099
3100         /* It's worse than that! He's dead, Jim! */
3101         dev_err(&qp_info->port_priv->device->dev,
3102                 "Fatal error (%d) on MAD QP (%d)\n",
3103                 event->event, qp_info->qp->qp_num);
3104 }
3105
3106 static void init_mad_queue(struct ib_mad_qp_info *qp_info,
3107                            struct ib_mad_queue *mad_queue)
3108 {
3109         mad_queue->qp_info = qp_info;
3110         mad_queue->count = 0;
3111         spin_lock_init(&mad_queue->lock);
3112         INIT_LIST_HEAD(&mad_queue->list);
3113 }
3114
3115 static void init_mad_qp(struct ib_mad_port_private *port_priv,
3116                         struct ib_mad_qp_info *qp_info)
3117 {
3118         qp_info->port_priv = port_priv;
3119         init_mad_queue(qp_info, &qp_info->send_queue);
3120         init_mad_queue(qp_info, &qp_info->recv_queue);
3121         INIT_LIST_HEAD(&qp_info->overflow_list);
3122         spin_lock_init(&qp_info->snoop_lock);
3123         qp_info->snoop_table = NULL;
3124         qp_info->snoop_table_size = 0;
3125         atomic_set(&qp_info->snoop_count, 0);
3126 }
3127
3128 static int create_mad_qp(struct ib_mad_qp_info *qp_info,
3129                          enum ib_qp_type qp_type)
3130 {
3131         struct ib_qp_init_attr  qp_init_attr;
3132         int ret;
3133
3134         memset(&qp_init_attr, 0, sizeof qp_init_attr);
3135         qp_init_attr.send_cq = qp_info->port_priv->cq;
3136         qp_init_attr.recv_cq = qp_info->port_priv->cq;
3137         qp_init_attr.sq_sig_type = IB_SIGNAL_ALL_WR;
3138         qp_init_attr.cap.max_send_wr = mad_sendq_size;
3139         qp_init_attr.cap.max_recv_wr = mad_recvq_size;
3140         qp_init_attr.cap.max_send_sge = IB_MAD_SEND_REQ_MAX_SG;
3141         qp_init_attr.cap.max_recv_sge = IB_MAD_RECV_REQ_MAX_SG;
3142         qp_init_attr.qp_type = qp_type;
3143         qp_init_attr.port_num = qp_info->port_priv->port_num;
3144         qp_init_attr.qp_context = qp_info;
3145         qp_init_attr.event_handler = qp_event_handler;
3146         qp_info->qp = ib_create_qp(qp_info->port_priv->pd, &qp_init_attr);
3147         if (IS_ERR(qp_info->qp)) {
3148                 dev_err(&qp_info->port_priv->device->dev,
3149                         "Couldn't create ib_mad QP%d\n",
3150                         get_spl_qp_index(qp_type));
3151                 ret = PTR_ERR(qp_info->qp);
3152                 goto error;
3153         }
3154         /* Use minimum queue sizes unless the CQ is resized */
3155         qp_info->send_queue.max_active = mad_sendq_size;
3156         qp_info->recv_queue.max_active = mad_recvq_size;
3157         return 0;
3158
3159 error:
3160         return ret;
3161 }
3162
3163 static void destroy_mad_qp(struct ib_mad_qp_info *qp_info)
3164 {
3165         if (!qp_info->qp)
3166                 return;
3167
3168         ib_destroy_qp(qp_info->qp);
3169         kfree(qp_info->snoop_table);
3170 }
3171
3172 /*
3173  * Open the port
3174  * Create the QP, PD, MR, and CQ if needed
3175  */
3176 static int ib_mad_port_open(struct ib_device *device,
3177                             int port_num)
3178 {
3179         int ret, cq_size;
3180         struct ib_mad_port_private *port_priv;
3181         unsigned long flags;
3182         char name[sizeof "ib_mad123"];
3183         int has_smi;
3184
3185         if (WARN_ON(rdma_max_mad_size(device, port_num) < IB_MGMT_MAD_SIZE))
3186                 return -EFAULT;
3187
3188         if (WARN_ON(rdma_cap_opa_mad(device, port_num) &&
3189                     rdma_max_mad_size(device, port_num) < OPA_MGMT_MAD_SIZE))
3190                 return -EFAULT;
3191
3192         /* Create new device info */
3193         port_priv = kzalloc(sizeof *port_priv, GFP_KERNEL);
3194         if (!port_priv)
3195                 return -ENOMEM;
3196
3197         port_priv->device = device;
3198         port_priv->port_num = port_num;
3199         spin_lock_init(&port_priv->reg_lock);
3200         init_mad_qp(port_priv, &port_priv->qp_info[0]);
3201         init_mad_qp(port_priv, &port_priv->qp_info[1]);
3202
3203         cq_size = mad_sendq_size + mad_recvq_size;
3204         has_smi = rdma_cap_ib_smi(device, port_num);
3205         if (has_smi)
3206                 cq_size *= 2;
3207
3208         port_priv->pd = ib_alloc_pd(device, 0);
3209         if (IS_ERR(port_priv->pd)) {
3210                 dev_err(&device->dev, "Couldn't create ib_mad PD\n");
3211                 ret = PTR_ERR(port_priv->pd);
3212                 goto error3;
3213         }
3214
3215         port_priv->cq = ib_alloc_cq(port_priv->device, port_priv, cq_size, 0,
3216                         IB_POLL_UNBOUND_WORKQUEUE);
3217         if (IS_ERR(port_priv->cq)) {
3218                 dev_err(&device->dev, "Couldn't create ib_mad CQ\n");
3219                 ret = PTR_ERR(port_priv->cq);
3220                 goto error4;
3221         }
3222
3223         if (has_smi) {
3224                 ret = create_mad_qp(&port_priv->qp_info[0], IB_QPT_SMI);
3225                 if (ret)
3226                         goto error6;
3227         }
3228         ret = create_mad_qp(&port_priv->qp_info[1], IB_QPT_GSI);
3229         if (ret)
3230                 goto error7;
3231
3232         snprintf(name, sizeof name, "ib_mad%d", port_num);
3233         port_priv->wq = alloc_ordered_workqueue(name, WQ_MEM_RECLAIM);
3234         if (!port_priv->wq) {
3235                 ret = -ENOMEM;
3236                 goto error8;
3237         }
3238
3239         spin_lock_irqsave(&ib_mad_port_list_lock, flags);
3240         list_add_tail(&port_priv->port_list, &ib_mad_port_list);
3241         spin_unlock_irqrestore(&ib_mad_port_list_lock, flags);
3242
3243         ret = ib_mad_port_start(port_priv);
3244         if (ret) {
3245                 dev_err(&device->dev, "Couldn't start port\n");
3246                 goto error9;
3247         }
3248
3249         return 0;
3250
3251 error9:
3252         spin_lock_irqsave(&ib_mad_port_list_lock, flags);
3253         list_del_init(&port_priv->port_list);
3254         spin_unlock_irqrestore(&ib_mad_port_list_lock, flags);
3255
3256         destroy_workqueue(port_priv->wq);
3257 error8:
3258         destroy_mad_qp(&port_priv->qp_info[1]);
3259 error7:
3260         destroy_mad_qp(&port_priv->qp_info[0]);
3261 error6:
3262         ib_free_cq(port_priv->cq);
3263         cleanup_recv_queue(&port_priv->qp_info[1]);
3264         cleanup_recv_queue(&port_priv->qp_info[0]);
3265 error4:
3266         ib_dealloc_pd(port_priv->pd);
3267 error3:
3268         kfree(port_priv);
3269
3270         return ret;
3271 }
3272
3273 /*
3274  * Close the port
3275  * If there are no classes using the port, free the port
3276  * resources (CQ, MR, PD, QP) and remove the port's info structure
3277  */
3278 static int ib_mad_port_close(struct ib_device *device, int port_num)
3279 {
3280         struct ib_mad_port_private *port_priv;
3281         unsigned long flags;
3282
3283         spin_lock_irqsave(&ib_mad_port_list_lock, flags);
3284         port_priv = __ib_get_mad_port(device, port_num);
3285         if (port_priv == NULL) {
3286                 spin_unlock_irqrestore(&ib_mad_port_list_lock, flags);
3287                 dev_err(&device->dev, "Port %d not found\n", port_num);
3288                 return -ENODEV;
3289         }
3290         list_del_init(&port_priv->port_list);
3291         spin_unlock_irqrestore(&ib_mad_port_list_lock, flags);
3292
3293         destroy_workqueue(port_priv->wq);
3294         destroy_mad_qp(&port_priv->qp_info[1]);
3295         destroy_mad_qp(&port_priv->qp_info[0]);
3296         ib_free_cq(port_priv->cq);
3297         ib_dealloc_pd(port_priv->pd);
3298         cleanup_recv_queue(&port_priv->qp_info[1]);
3299         cleanup_recv_queue(&port_priv->qp_info[0]);
3300         /* XXX: Handle deallocation of MAD registration tables */
3301
3302         kfree(port_priv);
3303
3304         return 0;
3305 }
3306
3307 static void ib_mad_init_device(struct ib_device *device)
3308 {
3309         int start, i;
3310
3311         start = rdma_start_port(device);
3312
3313         for (i = start; i <= rdma_end_port(device); i++) {
3314                 if (!rdma_cap_ib_mad(device, i))
3315                         continue;
3316
3317                 if (ib_mad_port_open(device, i)) {
3318                         dev_err(&device->dev, "Couldn't open port %d\n", i);
3319                         goto error;
3320                 }
3321                 if (ib_agent_port_open(device, i)) {
3322                         dev_err(&device->dev,
3323                                 "Couldn't open port %d for agents\n", i);
3324                         goto error_agent;
3325                 }
3326         }
3327         return;
3328
3329 error_agent:
3330         if (ib_mad_port_close(device, i))
3331                 dev_err(&device->dev, "Couldn't close port %d\n", i);
3332
3333 error:
3334         while (--i >= start) {
3335                 if (!rdma_cap_ib_mad(device, i))
3336                         continue;
3337
3338                 if (ib_agent_port_close(device, i))
3339                         dev_err(&device->dev,
3340                                 "Couldn't close port %d for agents\n", i);
3341                 if (ib_mad_port_close(device, i))
3342                         dev_err(&device->dev, "Couldn't close port %d\n", i);
3343         }
3344 }
3345
3346 static void ib_mad_remove_device(struct ib_device *device, void *client_data)
3347 {
3348         unsigned int i;
3349
3350         rdma_for_each_port (device, i) {
3351                 if (!rdma_cap_ib_mad(device, i))
3352                         continue;
3353
3354                 if (ib_agent_port_close(device, i))
3355                         dev_err(&device->dev,
3356                                 "Couldn't close port %d for agents\n", i);
3357                 if (ib_mad_port_close(device, i))
3358                         dev_err(&device->dev, "Couldn't close port %d\n", i);
3359         }
3360 }
3361
3362 static struct ib_client mad_client = {
3363         .name   = "mad",
3364         .add = ib_mad_init_device,
3365         .remove = ib_mad_remove_device
3366 };
3367
3368 int ib_mad_init(void)
3369 {
3370         mad_recvq_size = min(mad_recvq_size, IB_MAD_QP_MAX_SIZE);
3371         mad_recvq_size = max(mad_recvq_size, IB_MAD_QP_MIN_SIZE);
3372
3373         mad_sendq_size = min(mad_sendq_size, IB_MAD_QP_MAX_SIZE);
3374         mad_sendq_size = max(mad_sendq_size, IB_MAD_QP_MIN_SIZE);
3375
3376         INIT_LIST_HEAD(&ib_mad_port_list);
3377
3378         if (ib_register_client(&mad_client)) {
3379                 pr_err("Couldn't register ib_mad client\n");
3380                 return -EINVAL;
3381         }
3382
3383         return 0;
3384 }
3385
3386 void ib_mad_cleanup(void)
3387 {
3388         ib_unregister_client(&mad_client);
3389 }