blkcg: fix blkg_alloc() failure path
[linux-2.6.git] / drivers / infiniband / core / mad.c
blobb0d0bc8a6fb6ca58c61206ff11dab9f2f5cd5e8e
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.
7 * This software is available to you under a choice of one of two
8 * licenses. You may choose to be licensed under the terms of the GNU
9 * General Public License (GPL) Version 2, available from the file
10 * COPYING in the main directory of this source tree, or the
11 * OpenIB.org BSD license below:
13 * Redistribution and use in source and binary forms, with or
14 * without modification, are permitted provided that the following
15 * conditions are met:
17 * - Redistributions of source code must retain the above
18 * copyright notice, this list of conditions and the following
19 * disclaimer.
21 * - Redistributions in binary form must reproduce the above
22 * copyright notice, this list of conditions and the following
23 * disclaimer in the documentation and/or other materials
24 * provided with the distribution.
26 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
27 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
28 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
29 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
30 * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
31 * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
32 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
33 * SOFTWARE.
36 #include <linux/dma-mapping.h>
37 #include <linux/slab.h>
38 #include <linux/module.h>
39 #include <rdma/ib_cache.h>
41 #include "mad_priv.h"
42 #include "mad_rmpp.h"
43 #include "smi.h"
44 #include "agent.h"
46 MODULE_LICENSE("Dual BSD/GPL");
47 MODULE_DESCRIPTION("kernel IB MAD API");
48 MODULE_AUTHOR("Hal Rosenstock");
49 MODULE_AUTHOR("Sean Hefty");
51 static int mad_sendq_size = IB_MAD_QP_SEND_SIZE;
52 static int mad_recvq_size = IB_MAD_QP_RECV_SIZE;
54 module_param_named(send_queue_size, mad_sendq_size, int, 0444);
55 MODULE_PARM_DESC(send_queue_size, "Size of send queue in number of work requests");
56 module_param_named(recv_queue_size, mad_recvq_size, int, 0444);
57 MODULE_PARM_DESC(recv_queue_size, "Size of receive queue in number of work requests");
59 static struct kmem_cache *ib_mad_cache;
61 static struct list_head ib_mad_port_list;
62 static u32 ib_mad_client_id = 0;
64 /* Port list lock */
65 static DEFINE_SPINLOCK(ib_mad_port_list_lock);
67 /* Forward declarations */
68 static int method_in_use(struct ib_mad_mgmt_method_table **method,
69 struct ib_mad_reg_req *mad_reg_req);
70 static void remove_mad_reg_req(struct ib_mad_agent_private *priv);
71 static struct ib_mad_agent_private *find_mad_agent(
72 struct ib_mad_port_private *port_priv,
73 struct ib_mad *mad);
74 static int ib_mad_post_receive_mads(struct ib_mad_qp_info *qp_info,
75 struct ib_mad_private *mad);
76 static void cancel_mads(struct ib_mad_agent_private *mad_agent_priv);
77 static void timeout_sends(struct work_struct *work);
78 static void local_completions(struct work_struct *work);
79 static int add_nonoui_reg_req(struct ib_mad_reg_req *mad_reg_req,
80 struct ib_mad_agent_private *agent_priv,
81 u8 mgmt_class);
82 static int add_oui_reg_req(struct ib_mad_reg_req *mad_reg_req,
83 struct ib_mad_agent_private *agent_priv);
86 * Returns a ib_mad_port_private structure or NULL for a device/port
87 * Assumes ib_mad_port_list_lock is being held
89 static inline struct ib_mad_port_private *
90 __ib_get_mad_port(struct ib_device *device, int port_num)
92 struct ib_mad_port_private *entry;
94 list_for_each_entry(entry, &ib_mad_port_list, port_list) {
95 if (entry->device == device && entry->port_num == port_num)
96 return entry;
98 return NULL;
102 * Wrapper function to return a ib_mad_port_private structure or NULL
103 * for a device/port
105 static inline struct ib_mad_port_private *
106 ib_get_mad_port(struct ib_device *device, int port_num)
108 struct ib_mad_port_private *entry;
109 unsigned long flags;
111 spin_lock_irqsave(&ib_mad_port_list_lock, flags);
112 entry = __ib_get_mad_port(device, port_num);
113 spin_unlock_irqrestore(&ib_mad_port_list_lock, flags);
115 return entry;
118 static inline u8 convert_mgmt_class(u8 mgmt_class)
120 /* Alias IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE to 0 */
121 return mgmt_class == IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE ?
122 0 : mgmt_class;
125 static int get_spl_qp_index(enum ib_qp_type qp_type)
127 switch (qp_type)
129 case IB_QPT_SMI:
130 return 0;
131 case IB_QPT_GSI:
132 return 1;
133 default:
134 return -1;
138 static int vendor_class_index(u8 mgmt_class)
140 return mgmt_class - IB_MGMT_CLASS_VENDOR_RANGE2_START;
143 static int is_vendor_class(u8 mgmt_class)
145 if ((mgmt_class < IB_MGMT_CLASS_VENDOR_RANGE2_START) ||
146 (mgmt_class > IB_MGMT_CLASS_VENDOR_RANGE2_END))
147 return 0;
148 return 1;
151 static int is_vendor_oui(char *oui)
153 if (oui[0] || oui[1] || oui[2])
154 return 1;
155 return 0;
158 static int is_vendor_method_in_use(
159 struct ib_mad_mgmt_vendor_class *vendor_class,
160 struct ib_mad_reg_req *mad_reg_req)
162 struct ib_mad_mgmt_method_table *method;
163 int i;
165 for (i = 0; i < MAX_MGMT_OUI; i++) {
166 if (!memcmp(vendor_class->oui[i], mad_reg_req->oui, 3)) {
167 method = vendor_class->method_table[i];
168 if (method) {
169 if (method_in_use(&method, mad_reg_req))
170 return 1;
171 else
172 break;
176 return 0;
179 int ib_response_mad(struct ib_mad *mad)
181 return ((mad->mad_hdr.method & IB_MGMT_METHOD_RESP) ||
182 (mad->mad_hdr.method == IB_MGMT_METHOD_TRAP_REPRESS) ||
183 ((mad->mad_hdr.mgmt_class == IB_MGMT_CLASS_BM) &&
184 (mad->mad_hdr.attr_mod & IB_BM_ATTR_MOD_RESP)));
186 EXPORT_SYMBOL(ib_response_mad);
189 * ib_register_mad_agent - Register to send/receive MADs
191 struct ib_mad_agent *ib_register_mad_agent(struct ib_device *device,
192 u8 port_num,
193 enum ib_qp_type qp_type,
194 struct ib_mad_reg_req *mad_reg_req,
195 u8 rmpp_version,
196 ib_mad_send_handler send_handler,
197 ib_mad_recv_handler recv_handler,
198 void *context)
200 struct ib_mad_port_private *port_priv;
201 struct ib_mad_agent *ret = ERR_PTR(-EINVAL);
202 struct ib_mad_agent_private *mad_agent_priv;
203 struct ib_mad_reg_req *reg_req = NULL;
204 struct ib_mad_mgmt_class_table *class;
205 struct ib_mad_mgmt_vendor_class_table *vendor;
206 struct ib_mad_mgmt_vendor_class *vendor_class;
207 struct ib_mad_mgmt_method_table *method;
208 int ret2, qpn;
209 unsigned long flags;
210 u8 mgmt_class, vclass;
212 /* Validate parameters */
213 qpn = get_spl_qp_index(qp_type);
214 if (qpn == -1)
215 goto error1;
217 if (rmpp_version && rmpp_version != IB_MGMT_RMPP_VERSION)
218 goto error1;
220 /* Validate MAD registration request if supplied */
221 if (mad_reg_req) {
222 if (mad_reg_req->mgmt_class_version >= MAX_MGMT_VERSION)
223 goto error1;
224 if (!recv_handler)
225 goto error1;
226 if (mad_reg_req->mgmt_class >= MAX_MGMT_CLASS) {
228 * IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE is the only
229 * one in this range currently allowed
231 if (mad_reg_req->mgmt_class !=
232 IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE)
233 goto error1;
234 } else if (mad_reg_req->mgmt_class == 0) {
236 * Class 0 is reserved in IBA and is used for
237 * aliasing of IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE
239 goto error1;
240 } else if (is_vendor_class(mad_reg_req->mgmt_class)) {
242 * If class is in "new" vendor range,
243 * ensure supplied OUI is not zero
245 if (!is_vendor_oui(mad_reg_req->oui))
246 goto error1;
248 /* Make sure class supplied is consistent with RMPP */
249 if (!ib_is_mad_class_rmpp(mad_reg_req->mgmt_class)) {
250 if (rmpp_version)
251 goto error1;
253 /* Make sure class supplied is consistent with QP type */
254 if (qp_type == IB_QPT_SMI) {
255 if ((mad_reg_req->mgmt_class !=
256 IB_MGMT_CLASS_SUBN_LID_ROUTED) &&
257 (mad_reg_req->mgmt_class !=
258 IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE))
259 goto error1;
260 } else {
261 if ((mad_reg_req->mgmt_class ==
262 IB_MGMT_CLASS_SUBN_LID_ROUTED) ||
263 (mad_reg_req->mgmt_class ==
264 IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE))
265 goto error1;
267 } else {
268 /* No registration request supplied */
269 if (!send_handler)
270 goto error1;
273 /* Validate device and port */
274 port_priv = ib_get_mad_port(device, port_num);
275 if (!port_priv) {
276 ret = ERR_PTR(-ENODEV);
277 goto error1;
280 /* Verify the QP requested is supported. For example, Ethernet devices
281 * will not have QP0 */
282 if (!port_priv->qp_info[qpn].qp) {
283 ret = ERR_PTR(-EPROTONOSUPPORT);
284 goto error1;
287 /* Allocate structures */
288 mad_agent_priv = kzalloc(sizeof *mad_agent_priv, GFP_KERNEL);
289 if (!mad_agent_priv) {
290 ret = ERR_PTR(-ENOMEM);
291 goto error1;
294 mad_agent_priv->agent.mr = ib_get_dma_mr(port_priv->qp_info[qpn].qp->pd,
295 IB_ACCESS_LOCAL_WRITE);
296 if (IS_ERR(mad_agent_priv->agent.mr)) {
297 ret = ERR_PTR(-ENOMEM);
298 goto error2;
301 if (mad_reg_req) {
302 reg_req = kmemdup(mad_reg_req, sizeof *reg_req, GFP_KERNEL);
303 if (!reg_req) {
304 ret = ERR_PTR(-ENOMEM);
305 goto error3;
309 /* Now, fill in the various structures */
310 mad_agent_priv->qp_info = &port_priv->qp_info[qpn];
311 mad_agent_priv->reg_req = reg_req;
312 mad_agent_priv->agent.rmpp_version = rmpp_version;
313 mad_agent_priv->agent.device = device;
314 mad_agent_priv->agent.recv_handler = recv_handler;
315 mad_agent_priv->agent.send_handler = send_handler;
316 mad_agent_priv->agent.context = context;
317 mad_agent_priv->agent.qp = port_priv->qp_info[qpn].qp;
318 mad_agent_priv->agent.port_num = port_num;
319 spin_lock_init(&mad_agent_priv->lock);
320 INIT_LIST_HEAD(&mad_agent_priv->send_list);
321 INIT_LIST_HEAD(&mad_agent_priv->wait_list);
322 INIT_LIST_HEAD(&mad_agent_priv->done_list);
323 INIT_LIST_HEAD(&mad_agent_priv->rmpp_list);
324 INIT_DELAYED_WORK(&mad_agent_priv->timed_work, timeout_sends);
325 INIT_LIST_HEAD(&mad_agent_priv->local_list);
326 INIT_WORK(&mad_agent_priv->local_work, local_completions);
327 atomic_set(&mad_agent_priv->refcount, 1);
328 init_completion(&mad_agent_priv->comp);
330 spin_lock_irqsave(&port_priv->reg_lock, flags);
331 mad_agent_priv->agent.hi_tid = ++ib_mad_client_id;
334 * Make sure MAD registration (if supplied)
335 * is non overlapping with any existing ones
337 if (mad_reg_req) {
338 mgmt_class = convert_mgmt_class(mad_reg_req->mgmt_class);
339 if (!is_vendor_class(mgmt_class)) {
340 class = port_priv->version[mad_reg_req->
341 mgmt_class_version].class;
342 if (class) {
343 method = class->method_table[mgmt_class];
344 if (method) {
345 if (method_in_use(&method,
346 mad_reg_req))
347 goto error4;
350 ret2 = add_nonoui_reg_req(mad_reg_req, mad_agent_priv,
351 mgmt_class);
352 } else {
353 /* "New" vendor class range */
354 vendor = port_priv->version[mad_reg_req->
355 mgmt_class_version].vendor;
356 if (vendor) {
357 vclass = vendor_class_index(mgmt_class);
358 vendor_class = vendor->vendor_class[vclass];
359 if (vendor_class) {
360 if (is_vendor_method_in_use(
361 vendor_class,
362 mad_reg_req))
363 goto error4;
366 ret2 = add_oui_reg_req(mad_reg_req, mad_agent_priv);
368 if (ret2) {
369 ret = ERR_PTR(ret2);
370 goto error4;
374 /* Add mad agent into port's agent list */
375 list_add_tail(&mad_agent_priv->agent_list, &port_priv->agent_list);
376 spin_unlock_irqrestore(&port_priv->reg_lock, flags);
378 return &mad_agent_priv->agent;
380 error4:
381 spin_unlock_irqrestore(&port_priv->reg_lock, flags);
382 kfree(reg_req);
383 error3:
384 ib_dereg_mr(mad_agent_priv->agent.mr);
385 error2:
386 kfree(mad_agent_priv);
387 error1:
388 return ret;
390 EXPORT_SYMBOL(ib_register_mad_agent);
392 static inline int is_snooping_sends(int mad_snoop_flags)
394 return (mad_snoop_flags &
395 (/*IB_MAD_SNOOP_POSTED_SENDS |
396 IB_MAD_SNOOP_RMPP_SENDS |*/
397 IB_MAD_SNOOP_SEND_COMPLETIONS /*|
398 IB_MAD_SNOOP_RMPP_SEND_COMPLETIONS*/));
401 static inline int is_snooping_recvs(int mad_snoop_flags)
403 return (mad_snoop_flags &
404 (IB_MAD_SNOOP_RECVS /*|
405 IB_MAD_SNOOP_RMPP_RECVS*/));
408 static int register_snoop_agent(struct ib_mad_qp_info *qp_info,
409 struct ib_mad_snoop_private *mad_snoop_priv)
411 struct ib_mad_snoop_private **new_snoop_table;
412 unsigned long flags;
413 int i;
415 spin_lock_irqsave(&qp_info->snoop_lock, flags);
416 /* Check for empty slot in array. */
417 for (i = 0; i < qp_info->snoop_table_size; i++)
418 if (!qp_info->snoop_table[i])
419 break;
421 if (i == qp_info->snoop_table_size) {
422 /* Grow table. */
423 new_snoop_table = krealloc(qp_info->snoop_table,
424 sizeof mad_snoop_priv *
425 (qp_info->snoop_table_size + 1),
426 GFP_ATOMIC);
427 if (!new_snoop_table) {
428 i = -ENOMEM;
429 goto out;
432 qp_info->snoop_table = new_snoop_table;
433 qp_info->snoop_table_size++;
435 qp_info->snoop_table[i] = mad_snoop_priv;
436 atomic_inc(&qp_info->snoop_count);
437 out:
438 spin_unlock_irqrestore(&qp_info->snoop_lock, flags);
439 return i;
442 struct ib_mad_agent *ib_register_mad_snoop(struct ib_device *device,
443 u8 port_num,
444 enum ib_qp_type qp_type,
445 int mad_snoop_flags,
446 ib_mad_snoop_handler snoop_handler,
447 ib_mad_recv_handler recv_handler,
448 void *context)
450 struct ib_mad_port_private *port_priv;
451 struct ib_mad_agent *ret;
452 struct ib_mad_snoop_private *mad_snoop_priv;
453 int qpn;
455 /* Validate parameters */
456 if ((is_snooping_sends(mad_snoop_flags) && !snoop_handler) ||
457 (is_snooping_recvs(mad_snoop_flags) && !recv_handler)) {
458 ret = ERR_PTR(-EINVAL);
459 goto error1;
461 qpn = get_spl_qp_index(qp_type);
462 if (qpn == -1) {
463 ret = ERR_PTR(-EINVAL);
464 goto error1;
466 port_priv = ib_get_mad_port(device, port_num);
467 if (!port_priv) {
468 ret = ERR_PTR(-ENODEV);
469 goto error1;
471 /* Allocate structures */
472 mad_snoop_priv = kzalloc(sizeof *mad_snoop_priv, GFP_KERNEL);
473 if (!mad_snoop_priv) {
474 ret = ERR_PTR(-ENOMEM);
475 goto error1;
478 /* Now, fill in the various structures */
479 mad_snoop_priv->qp_info = &port_priv->qp_info[qpn];
480 mad_snoop_priv->agent.device = device;
481 mad_snoop_priv->agent.recv_handler = recv_handler;
482 mad_snoop_priv->agent.snoop_handler = snoop_handler;
483 mad_snoop_priv->agent.context = context;
484 mad_snoop_priv->agent.qp = port_priv->qp_info[qpn].qp;
485 mad_snoop_priv->agent.port_num = port_num;
486 mad_snoop_priv->mad_snoop_flags = mad_snoop_flags;
487 init_completion(&mad_snoop_priv->comp);
488 mad_snoop_priv->snoop_index = register_snoop_agent(
489 &port_priv->qp_info[qpn],
490 mad_snoop_priv);
491 if (mad_snoop_priv->snoop_index < 0) {
492 ret = ERR_PTR(mad_snoop_priv->snoop_index);
493 goto error2;
496 atomic_set(&mad_snoop_priv->refcount, 1);
497 return &mad_snoop_priv->agent;
499 error2:
500 kfree(mad_snoop_priv);
501 error1:
502 return ret;
504 EXPORT_SYMBOL(ib_register_mad_snoop);
506 static inline void deref_mad_agent(struct ib_mad_agent_private *mad_agent_priv)
508 if (atomic_dec_and_test(&mad_agent_priv->refcount))
509 complete(&mad_agent_priv->comp);
512 static inline void deref_snoop_agent(struct ib_mad_snoop_private *mad_snoop_priv)
514 if (atomic_dec_and_test(&mad_snoop_priv->refcount))
515 complete(&mad_snoop_priv->comp);
518 static void unregister_mad_agent(struct ib_mad_agent_private *mad_agent_priv)
520 struct ib_mad_port_private *port_priv;
521 unsigned long flags;
523 /* Note that we could still be handling received MADs */
526 * Canceling all sends results in dropping received response
527 * MADs, preventing us from queuing additional work
529 cancel_mads(mad_agent_priv);
530 port_priv = mad_agent_priv->qp_info->port_priv;
531 cancel_delayed_work(&mad_agent_priv->timed_work);
533 spin_lock_irqsave(&port_priv->reg_lock, flags);
534 remove_mad_reg_req(mad_agent_priv);
535 list_del(&mad_agent_priv->agent_list);
536 spin_unlock_irqrestore(&port_priv->reg_lock, flags);
538 flush_workqueue(port_priv->wq);
539 ib_cancel_rmpp_recvs(mad_agent_priv);
541 deref_mad_agent(mad_agent_priv);
542 wait_for_completion(&mad_agent_priv->comp);
544 kfree(mad_agent_priv->reg_req);
545 ib_dereg_mr(mad_agent_priv->agent.mr);
546 kfree(mad_agent_priv);
549 static void unregister_mad_snoop(struct ib_mad_snoop_private *mad_snoop_priv)
551 struct ib_mad_qp_info *qp_info;
552 unsigned long flags;
554 qp_info = mad_snoop_priv->qp_info;
555 spin_lock_irqsave(&qp_info->snoop_lock, flags);
556 qp_info->snoop_table[mad_snoop_priv->snoop_index] = NULL;
557 atomic_dec(&qp_info->snoop_count);
558 spin_unlock_irqrestore(&qp_info->snoop_lock, flags);
560 deref_snoop_agent(mad_snoop_priv);
561 wait_for_completion(&mad_snoop_priv->comp);
563 kfree(mad_snoop_priv);
567 * ib_unregister_mad_agent - Unregisters a client from using MAD services
569 int ib_unregister_mad_agent(struct ib_mad_agent *mad_agent)
571 struct ib_mad_agent_private *mad_agent_priv;
572 struct ib_mad_snoop_private *mad_snoop_priv;
574 /* If the TID is zero, the agent can only snoop. */
575 if (mad_agent->hi_tid) {
576 mad_agent_priv = container_of(mad_agent,
577 struct ib_mad_agent_private,
578 agent);
579 unregister_mad_agent(mad_agent_priv);
580 } else {
581 mad_snoop_priv = container_of(mad_agent,
582 struct ib_mad_snoop_private,
583 agent);
584 unregister_mad_snoop(mad_snoop_priv);
586 return 0;
588 EXPORT_SYMBOL(ib_unregister_mad_agent);
590 static void dequeue_mad(struct ib_mad_list_head *mad_list)
592 struct ib_mad_queue *mad_queue;
593 unsigned long flags;
595 BUG_ON(!mad_list->mad_queue);
596 mad_queue = mad_list->mad_queue;
597 spin_lock_irqsave(&mad_queue->lock, flags);
598 list_del(&mad_list->list);
599 mad_queue->count--;
600 spin_unlock_irqrestore(&mad_queue->lock, flags);
603 static void snoop_send(struct ib_mad_qp_info *qp_info,
604 struct ib_mad_send_buf *send_buf,
605 struct ib_mad_send_wc *mad_send_wc,
606 int mad_snoop_flags)
608 struct ib_mad_snoop_private *mad_snoop_priv;
609 unsigned long flags;
610 int i;
612 spin_lock_irqsave(&qp_info->snoop_lock, flags);
613 for (i = 0; i < qp_info->snoop_table_size; i++) {
614 mad_snoop_priv = qp_info->snoop_table[i];
615 if (!mad_snoop_priv ||
616 !(mad_snoop_priv->mad_snoop_flags & mad_snoop_flags))
617 continue;
619 atomic_inc(&mad_snoop_priv->refcount);
620 spin_unlock_irqrestore(&qp_info->snoop_lock, flags);
621 mad_snoop_priv->agent.snoop_handler(&mad_snoop_priv->agent,
622 send_buf, mad_send_wc);
623 deref_snoop_agent(mad_snoop_priv);
624 spin_lock_irqsave(&qp_info->snoop_lock, flags);
626 spin_unlock_irqrestore(&qp_info->snoop_lock, flags);
629 static void snoop_recv(struct ib_mad_qp_info *qp_info,
630 struct ib_mad_recv_wc *mad_recv_wc,
631 int mad_snoop_flags)
633 struct ib_mad_snoop_private *mad_snoop_priv;
634 unsigned long flags;
635 int i;
637 spin_lock_irqsave(&qp_info->snoop_lock, flags);
638 for (i = 0; i < qp_info->snoop_table_size; i++) {
639 mad_snoop_priv = qp_info->snoop_table[i];
640 if (!mad_snoop_priv ||
641 !(mad_snoop_priv->mad_snoop_flags & mad_snoop_flags))
642 continue;
644 atomic_inc(&mad_snoop_priv->refcount);
645 spin_unlock_irqrestore(&qp_info->snoop_lock, flags);
646 mad_snoop_priv->agent.recv_handler(&mad_snoop_priv->agent,
647 mad_recv_wc);
648 deref_snoop_agent(mad_snoop_priv);
649 spin_lock_irqsave(&qp_info->snoop_lock, flags);
651 spin_unlock_irqrestore(&qp_info->snoop_lock, flags);
654 static void build_smp_wc(struct ib_qp *qp,
655 u64 wr_id, u16 slid, u16 pkey_index, u8 port_num,
656 struct ib_wc *wc)
658 memset(wc, 0, sizeof *wc);
659 wc->wr_id = wr_id;
660 wc->status = IB_WC_SUCCESS;
661 wc->opcode = IB_WC_RECV;
662 wc->pkey_index = pkey_index;
663 wc->byte_len = sizeof(struct ib_mad) + sizeof(struct ib_grh);
664 wc->src_qp = IB_QP0;
665 wc->qp = qp;
666 wc->slid = slid;
667 wc->sl = 0;
668 wc->dlid_path_bits = 0;
669 wc->port_num = port_num;
673 * Return 0 if SMP is to be sent
674 * Return 1 if SMP was consumed locally (whether or not solicited)
675 * Return < 0 if error
677 static int handle_outgoing_dr_smp(struct ib_mad_agent_private *mad_agent_priv,
678 struct ib_mad_send_wr_private *mad_send_wr)
680 int ret = 0;
681 struct ib_smp *smp = mad_send_wr->send_buf.mad;
682 unsigned long flags;
683 struct ib_mad_local_private *local;
684 struct ib_mad_private *mad_priv;
685 struct ib_mad_port_private *port_priv;
686 struct ib_mad_agent_private *recv_mad_agent = NULL;
687 struct ib_device *device = mad_agent_priv->agent.device;
688 u8 port_num;
689 struct ib_wc mad_wc;
690 struct ib_send_wr *send_wr = &mad_send_wr->send_wr;
692 if (device->node_type == RDMA_NODE_IB_SWITCH &&
693 smp->mgmt_class == IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE)
694 port_num = send_wr->wr.ud.port_num;
695 else
696 port_num = mad_agent_priv->agent.port_num;
699 * Directed route handling starts if the initial LID routed part of
700 * a request or the ending LID routed part of a response is empty.
701 * If we are at the start of the LID routed part, don't update the
702 * hop_ptr or hop_cnt. See section 14.2.2, Vol 1 IB spec.
704 if ((ib_get_smp_direction(smp) ? smp->dr_dlid : smp->dr_slid) ==
705 IB_LID_PERMISSIVE &&
706 smi_handle_dr_smp_send(smp, device->node_type, port_num) ==
707 IB_SMI_DISCARD) {
708 ret = -EINVAL;
709 printk(KERN_ERR PFX "Invalid directed route\n");
710 goto out;
713 /* Check to post send on QP or process locally */
714 if (smi_check_local_smp(smp, device) == IB_SMI_DISCARD &&
715 smi_check_local_returning_smp(smp, device) == IB_SMI_DISCARD)
716 goto out;
718 local = kmalloc(sizeof *local, GFP_ATOMIC);
719 if (!local) {
720 ret = -ENOMEM;
721 printk(KERN_ERR PFX "No memory for ib_mad_local_private\n");
722 goto out;
724 local->mad_priv = NULL;
725 local->recv_mad_agent = NULL;
726 mad_priv = kmem_cache_alloc(ib_mad_cache, GFP_ATOMIC);
727 if (!mad_priv) {
728 ret = -ENOMEM;
729 printk(KERN_ERR PFX "No memory for local response MAD\n");
730 kfree(local);
731 goto out;
734 build_smp_wc(mad_agent_priv->agent.qp,
735 send_wr->wr_id, be16_to_cpu(smp->dr_slid),
736 send_wr->wr.ud.pkey_index,
737 send_wr->wr.ud.port_num, &mad_wc);
739 /* No GRH for DR SMP */
740 ret = device->process_mad(device, 0, port_num, &mad_wc, NULL,
741 (struct ib_mad *)smp,
742 (struct ib_mad *)&mad_priv->mad);
743 switch (ret)
745 case IB_MAD_RESULT_SUCCESS | IB_MAD_RESULT_REPLY:
746 if (ib_response_mad(&mad_priv->mad.mad) &&
747 mad_agent_priv->agent.recv_handler) {
748 local->mad_priv = mad_priv;
749 local->recv_mad_agent = mad_agent_priv;
751 * Reference MAD agent until receive
752 * side of local completion handled
754 atomic_inc(&mad_agent_priv->refcount);
755 } else
756 kmem_cache_free(ib_mad_cache, mad_priv);
757 break;
758 case IB_MAD_RESULT_SUCCESS | IB_MAD_RESULT_CONSUMED:
759 kmem_cache_free(ib_mad_cache, mad_priv);
760 break;
761 case IB_MAD_RESULT_SUCCESS:
762 /* Treat like an incoming receive MAD */
763 port_priv = ib_get_mad_port(mad_agent_priv->agent.device,
764 mad_agent_priv->agent.port_num);
765 if (port_priv) {
766 memcpy(&mad_priv->mad.mad, smp, sizeof(struct ib_mad));
767 recv_mad_agent = find_mad_agent(port_priv,
768 &mad_priv->mad.mad);
770 if (!port_priv || !recv_mad_agent) {
772 * No receiving agent so drop packet and
773 * generate send completion.
775 kmem_cache_free(ib_mad_cache, mad_priv);
776 break;
778 local->mad_priv = mad_priv;
779 local->recv_mad_agent = recv_mad_agent;
780 break;
781 default:
782 kmem_cache_free(ib_mad_cache, mad_priv);
783 kfree(local);
784 ret = -EINVAL;
785 goto out;
788 local->mad_send_wr = mad_send_wr;
789 /* Reference MAD agent until send side of local completion handled */
790 atomic_inc(&mad_agent_priv->refcount);
791 /* Queue local completion to local list */
792 spin_lock_irqsave(&mad_agent_priv->lock, flags);
793 list_add_tail(&local->completion_list, &mad_agent_priv->local_list);
794 spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
795 queue_work(mad_agent_priv->qp_info->port_priv->wq,
796 &mad_agent_priv->local_work);
797 ret = 1;
798 out:
799 return ret;
802 static int get_pad_size(int hdr_len, int data_len)
804 int seg_size, pad;
806 seg_size = sizeof(struct ib_mad) - hdr_len;
807 if (data_len && seg_size) {
808 pad = seg_size - data_len % seg_size;
809 return pad == seg_size ? 0 : pad;
810 } else
811 return seg_size;
814 static void free_send_rmpp_list(struct ib_mad_send_wr_private *mad_send_wr)
816 struct ib_rmpp_segment *s, *t;
818 list_for_each_entry_safe(s, t, &mad_send_wr->rmpp_list, list) {
819 list_del(&s->list);
820 kfree(s);
824 static int alloc_send_rmpp_list(struct ib_mad_send_wr_private *send_wr,
825 gfp_t gfp_mask)
827 struct ib_mad_send_buf *send_buf = &send_wr->send_buf;
828 struct ib_rmpp_mad *rmpp_mad = send_buf->mad;
829 struct ib_rmpp_segment *seg = NULL;
830 int left, seg_size, pad;
832 send_buf->seg_size = sizeof (struct ib_mad) - send_buf->hdr_len;
833 seg_size = send_buf->seg_size;
834 pad = send_wr->pad;
836 /* Allocate data segments. */
837 for (left = send_buf->data_len + pad; left > 0; left -= seg_size) {
838 seg = kmalloc(sizeof (*seg) + seg_size, gfp_mask);
839 if (!seg) {
840 printk(KERN_ERR "alloc_send_rmpp_segs: RMPP mem "
841 "alloc failed for len %zd, gfp %#x\n",
842 sizeof (*seg) + seg_size, gfp_mask);
843 free_send_rmpp_list(send_wr);
844 return -ENOMEM;
846 seg->num = ++send_buf->seg_count;
847 list_add_tail(&seg->list, &send_wr->rmpp_list);
850 /* Zero any padding */
851 if (pad)
852 memset(seg->data + seg_size - pad, 0, pad);
854 rmpp_mad->rmpp_hdr.rmpp_version = send_wr->mad_agent_priv->
855 agent.rmpp_version;
856 rmpp_mad->rmpp_hdr.rmpp_type = IB_MGMT_RMPP_TYPE_DATA;
857 ib_set_rmpp_flags(&rmpp_mad->rmpp_hdr, IB_MGMT_RMPP_FLAG_ACTIVE);
859 send_wr->cur_seg = container_of(send_wr->rmpp_list.next,
860 struct ib_rmpp_segment, list);
861 send_wr->last_ack_seg = send_wr->cur_seg;
862 return 0;
865 struct ib_mad_send_buf * ib_create_send_mad(struct ib_mad_agent *mad_agent,
866 u32 remote_qpn, u16 pkey_index,
867 int rmpp_active,
868 int hdr_len, int data_len,
869 gfp_t gfp_mask)
871 struct ib_mad_agent_private *mad_agent_priv;
872 struct ib_mad_send_wr_private *mad_send_wr;
873 int pad, message_size, ret, size;
874 void *buf;
876 mad_agent_priv = container_of(mad_agent, struct ib_mad_agent_private,
877 agent);
878 pad = get_pad_size(hdr_len, data_len);
879 message_size = hdr_len + data_len + pad;
881 if ((!mad_agent->rmpp_version &&
882 (rmpp_active || message_size > sizeof(struct ib_mad))) ||
883 (!rmpp_active && message_size > sizeof(struct ib_mad)))
884 return ERR_PTR(-EINVAL);
886 size = rmpp_active ? hdr_len : sizeof(struct ib_mad);
887 buf = kzalloc(sizeof *mad_send_wr + size, gfp_mask);
888 if (!buf)
889 return ERR_PTR(-ENOMEM);
891 mad_send_wr = buf + size;
892 INIT_LIST_HEAD(&mad_send_wr->rmpp_list);
893 mad_send_wr->send_buf.mad = buf;
894 mad_send_wr->send_buf.hdr_len = hdr_len;
895 mad_send_wr->send_buf.data_len = data_len;
896 mad_send_wr->pad = pad;
898 mad_send_wr->mad_agent_priv = mad_agent_priv;
899 mad_send_wr->sg_list[0].length = hdr_len;
900 mad_send_wr->sg_list[0].lkey = mad_agent->mr->lkey;
901 mad_send_wr->sg_list[1].length = sizeof(struct ib_mad) - hdr_len;
902 mad_send_wr->sg_list[1].lkey = mad_agent->mr->lkey;
904 mad_send_wr->send_wr.wr_id = (unsigned long) mad_send_wr;
905 mad_send_wr->send_wr.sg_list = mad_send_wr->sg_list;
906 mad_send_wr->send_wr.num_sge = 2;
907 mad_send_wr->send_wr.opcode = IB_WR_SEND;
908 mad_send_wr->send_wr.send_flags = IB_SEND_SIGNALED;
909 mad_send_wr->send_wr.wr.ud.remote_qpn = remote_qpn;
910 mad_send_wr->send_wr.wr.ud.remote_qkey = IB_QP_SET_QKEY;
911 mad_send_wr->send_wr.wr.ud.pkey_index = pkey_index;
913 if (rmpp_active) {
914 ret = alloc_send_rmpp_list(mad_send_wr, gfp_mask);
915 if (ret) {
916 kfree(buf);
917 return ERR_PTR(ret);
921 mad_send_wr->send_buf.mad_agent = mad_agent;
922 atomic_inc(&mad_agent_priv->refcount);
923 return &mad_send_wr->send_buf;
925 EXPORT_SYMBOL(ib_create_send_mad);
927 int ib_get_mad_data_offset(u8 mgmt_class)
929 if (mgmt_class == IB_MGMT_CLASS_SUBN_ADM)
930 return IB_MGMT_SA_HDR;
931 else if ((mgmt_class == IB_MGMT_CLASS_DEVICE_MGMT) ||
932 (mgmt_class == IB_MGMT_CLASS_DEVICE_ADM) ||
933 (mgmt_class == IB_MGMT_CLASS_BIS))
934 return IB_MGMT_DEVICE_HDR;
935 else if ((mgmt_class >= IB_MGMT_CLASS_VENDOR_RANGE2_START) &&
936 (mgmt_class <= IB_MGMT_CLASS_VENDOR_RANGE2_END))
937 return IB_MGMT_VENDOR_HDR;
938 else
939 return IB_MGMT_MAD_HDR;
941 EXPORT_SYMBOL(ib_get_mad_data_offset);
943 int ib_is_mad_class_rmpp(u8 mgmt_class)
945 if ((mgmt_class == IB_MGMT_CLASS_SUBN_ADM) ||
946 (mgmt_class == IB_MGMT_CLASS_DEVICE_MGMT) ||
947 (mgmt_class == IB_MGMT_CLASS_DEVICE_ADM) ||
948 (mgmt_class == IB_MGMT_CLASS_BIS) ||
949 ((mgmt_class >= IB_MGMT_CLASS_VENDOR_RANGE2_START) &&
950 (mgmt_class <= IB_MGMT_CLASS_VENDOR_RANGE2_END)))
951 return 1;
952 return 0;
954 EXPORT_SYMBOL(ib_is_mad_class_rmpp);
956 void *ib_get_rmpp_segment(struct ib_mad_send_buf *send_buf, int seg_num)
958 struct ib_mad_send_wr_private *mad_send_wr;
959 struct list_head *list;
961 mad_send_wr = container_of(send_buf, struct ib_mad_send_wr_private,
962 send_buf);
963 list = &mad_send_wr->cur_seg->list;
965 if (mad_send_wr->cur_seg->num < seg_num) {
966 list_for_each_entry(mad_send_wr->cur_seg, list, list)
967 if (mad_send_wr->cur_seg->num == seg_num)
968 break;
969 } else if (mad_send_wr->cur_seg->num > seg_num) {
970 list_for_each_entry_reverse(mad_send_wr->cur_seg, list, list)
971 if (mad_send_wr->cur_seg->num == seg_num)
972 break;
974 return mad_send_wr->cur_seg->data;
976 EXPORT_SYMBOL(ib_get_rmpp_segment);
978 static inline void *ib_get_payload(struct ib_mad_send_wr_private *mad_send_wr)
980 if (mad_send_wr->send_buf.seg_count)
981 return ib_get_rmpp_segment(&mad_send_wr->send_buf,
982 mad_send_wr->seg_num);
983 else
984 return mad_send_wr->send_buf.mad +
985 mad_send_wr->send_buf.hdr_len;
988 void ib_free_send_mad(struct ib_mad_send_buf *send_buf)
990 struct ib_mad_agent_private *mad_agent_priv;
991 struct ib_mad_send_wr_private *mad_send_wr;
993 mad_agent_priv = container_of(send_buf->mad_agent,
994 struct ib_mad_agent_private, agent);
995 mad_send_wr = container_of(send_buf, struct ib_mad_send_wr_private,
996 send_buf);
998 free_send_rmpp_list(mad_send_wr);
999 kfree(send_buf->mad);
1000 deref_mad_agent(mad_agent_priv);
1002 EXPORT_SYMBOL(ib_free_send_mad);
1004 int ib_send_mad(struct ib_mad_send_wr_private *mad_send_wr)
1006 struct ib_mad_qp_info *qp_info;
1007 struct list_head *list;
1008 struct ib_send_wr *bad_send_wr;
1009 struct ib_mad_agent *mad_agent;
1010 struct ib_sge *sge;
1011 unsigned long flags;
1012 int ret;
1014 /* Set WR ID to find mad_send_wr upon completion */
1015 qp_info = mad_send_wr->mad_agent_priv->qp_info;
1016 mad_send_wr->send_wr.wr_id = (unsigned long)&mad_send_wr->mad_list;
1017 mad_send_wr->mad_list.mad_queue = &qp_info->send_queue;
1019 mad_agent = mad_send_wr->send_buf.mad_agent;
1020 sge = mad_send_wr->sg_list;
1021 sge[0].addr = ib_dma_map_single(mad_agent->device,
1022 mad_send_wr->send_buf.mad,
1023 sge[0].length,
1024 DMA_TO_DEVICE);
1025 mad_send_wr->header_mapping = sge[0].addr;
1027 sge[1].addr = ib_dma_map_single(mad_agent->device,
1028 ib_get_payload(mad_send_wr),
1029 sge[1].length,
1030 DMA_TO_DEVICE);
1031 mad_send_wr->payload_mapping = sge[1].addr;
1033 spin_lock_irqsave(&qp_info->send_queue.lock, flags);
1034 if (qp_info->send_queue.count < qp_info->send_queue.max_active) {
1035 ret = ib_post_send(mad_agent->qp, &mad_send_wr->send_wr,
1036 &bad_send_wr);
1037 list = &qp_info->send_queue.list;
1038 } else {
1039 ret = 0;
1040 list = &qp_info->overflow_list;
1043 if (!ret) {
1044 qp_info->send_queue.count++;
1045 list_add_tail(&mad_send_wr->mad_list.list, list);
1047 spin_unlock_irqrestore(&qp_info->send_queue.lock, flags);
1048 if (ret) {
1049 ib_dma_unmap_single(mad_agent->device,
1050 mad_send_wr->header_mapping,
1051 sge[0].length, DMA_TO_DEVICE);
1052 ib_dma_unmap_single(mad_agent->device,
1053 mad_send_wr->payload_mapping,
1054 sge[1].length, DMA_TO_DEVICE);
1056 return ret;
1060 * ib_post_send_mad - Posts MAD(s) to the send queue of the QP associated
1061 * with the registered client
1063 int ib_post_send_mad(struct ib_mad_send_buf *send_buf,
1064 struct ib_mad_send_buf **bad_send_buf)
1066 struct ib_mad_agent_private *mad_agent_priv;
1067 struct ib_mad_send_buf *next_send_buf;
1068 struct ib_mad_send_wr_private *mad_send_wr;
1069 unsigned long flags;
1070 int ret = -EINVAL;
1072 /* Walk list of send WRs and post each on send list */
1073 for (; send_buf; send_buf = next_send_buf) {
1075 mad_send_wr = container_of(send_buf,
1076 struct ib_mad_send_wr_private,
1077 send_buf);
1078 mad_agent_priv = mad_send_wr->mad_agent_priv;
1080 if (!send_buf->mad_agent->send_handler ||
1081 (send_buf->timeout_ms &&
1082 !send_buf->mad_agent->recv_handler)) {
1083 ret = -EINVAL;
1084 goto error;
1087 if (!ib_is_mad_class_rmpp(((struct ib_mad_hdr *) send_buf->mad)->mgmt_class)) {
1088 if (mad_agent_priv->agent.rmpp_version) {
1089 ret = -EINVAL;
1090 goto error;
1095 * Save pointer to next work request to post in case the
1096 * current one completes, and the user modifies the work
1097 * request associated with the completion
1099 next_send_buf = send_buf->next;
1100 mad_send_wr->send_wr.wr.ud.ah = send_buf->ah;
1102 if (((struct ib_mad_hdr *) send_buf->mad)->mgmt_class ==
1103 IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE) {
1104 ret = handle_outgoing_dr_smp(mad_agent_priv,
1105 mad_send_wr);
1106 if (ret < 0) /* error */
1107 goto error;
1108 else if (ret == 1) /* locally consumed */
1109 continue;
1112 mad_send_wr->tid = ((struct ib_mad_hdr *) send_buf->mad)->tid;
1113 /* Timeout will be updated after send completes */
1114 mad_send_wr->timeout = msecs_to_jiffies(send_buf->timeout_ms);
1115 mad_send_wr->max_retries = send_buf->retries;
1116 mad_send_wr->retries_left = send_buf->retries;
1117 send_buf->retries = 0;
1118 /* Reference for work request to QP + response */
1119 mad_send_wr->refcount = 1 + (mad_send_wr->timeout > 0);
1120 mad_send_wr->status = IB_WC_SUCCESS;
1122 /* Reference MAD agent until send completes */
1123 atomic_inc(&mad_agent_priv->refcount);
1124 spin_lock_irqsave(&mad_agent_priv->lock, flags);
1125 list_add_tail(&mad_send_wr->agent_list,
1126 &mad_agent_priv->send_list);
1127 spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
1129 if (mad_agent_priv->agent.rmpp_version) {
1130 ret = ib_send_rmpp_mad(mad_send_wr);
1131 if (ret >= 0 && ret != IB_RMPP_RESULT_CONSUMED)
1132 ret = ib_send_mad(mad_send_wr);
1133 } else
1134 ret = ib_send_mad(mad_send_wr);
1135 if (ret < 0) {
1136 /* Fail send request */
1137 spin_lock_irqsave(&mad_agent_priv->lock, flags);
1138 list_del(&mad_send_wr->agent_list);
1139 spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
1140 atomic_dec(&mad_agent_priv->refcount);
1141 goto error;
1144 return 0;
1145 error:
1146 if (bad_send_buf)
1147 *bad_send_buf = send_buf;
1148 return ret;
1150 EXPORT_SYMBOL(ib_post_send_mad);
1153 * ib_free_recv_mad - Returns data buffers used to receive
1154 * a MAD to the access layer
1156 void ib_free_recv_mad(struct ib_mad_recv_wc *mad_recv_wc)
1158 struct ib_mad_recv_buf *mad_recv_buf, *temp_recv_buf;
1159 struct ib_mad_private_header *mad_priv_hdr;
1160 struct ib_mad_private *priv;
1161 struct list_head free_list;
1163 INIT_LIST_HEAD(&free_list);
1164 list_splice_init(&mad_recv_wc->rmpp_list, &free_list);
1166 list_for_each_entry_safe(mad_recv_buf, temp_recv_buf,
1167 &free_list, list) {
1168 mad_recv_wc = container_of(mad_recv_buf, struct ib_mad_recv_wc,
1169 recv_buf);
1170 mad_priv_hdr = container_of(mad_recv_wc,
1171 struct ib_mad_private_header,
1172 recv_wc);
1173 priv = container_of(mad_priv_hdr, struct ib_mad_private,
1174 header);
1175 kmem_cache_free(ib_mad_cache, priv);
1178 EXPORT_SYMBOL(ib_free_recv_mad);
1180 struct ib_mad_agent *ib_redirect_mad_qp(struct ib_qp *qp,
1181 u8 rmpp_version,
1182 ib_mad_send_handler send_handler,
1183 ib_mad_recv_handler recv_handler,
1184 void *context)
1186 return ERR_PTR(-EINVAL); /* XXX: for now */
1188 EXPORT_SYMBOL(ib_redirect_mad_qp);
1190 int ib_process_mad_wc(struct ib_mad_agent *mad_agent,
1191 struct ib_wc *wc)
1193 printk(KERN_ERR PFX "ib_process_mad_wc() not implemented yet\n");
1194 return 0;
1196 EXPORT_SYMBOL(ib_process_mad_wc);
1198 static int method_in_use(struct ib_mad_mgmt_method_table **method,
1199 struct ib_mad_reg_req *mad_reg_req)
1201 int i;
1203 for_each_set_bit(i, mad_reg_req->method_mask, IB_MGMT_MAX_METHODS) {
1204 if ((*method)->agent[i]) {
1205 printk(KERN_ERR PFX "Method %d already in use\n", i);
1206 return -EINVAL;
1209 return 0;
1212 static int allocate_method_table(struct ib_mad_mgmt_method_table **method)
1214 /* Allocate management method table */
1215 *method = kzalloc(sizeof **method, GFP_ATOMIC);
1216 if (!*method) {
1217 printk(KERN_ERR PFX "No memory for "
1218 "ib_mad_mgmt_method_table\n");
1219 return -ENOMEM;
1222 return 0;
1226 * Check to see if there are any methods still in use
1228 static int check_method_table(struct ib_mad_mgmt_method_table *method)
1230 int i;
1232 for (i = 0; i < IB_MGMT_MAX_METHODS; i++)
1233 if (method->agent[i])
1234 return 1;
1235 return 0;
1239 * Check to see if there are any method tables for this class still in use
1241 static int check_class_table(struct ib_mad_mgmt_class_table *class)
1243 int i;
1245 for (i = 0; i < MAX_MGMT_CLASS; i++)
1246 if (class->method_table[i])
1247 return 1;
1248 return 0;
1251 static int check_vendor_class(struct ib_mad_mgmt_vendor_class *vendor_class)
1253 int i;
1255 for (i = 0; i < MAX_MGMT_OUI; i++)
1256 if (vendor_class->method_table[i])
1257 return 1;
1258 return 0;
1261 static int find_vendor_oui(struct ib_mad_mgmt_vendor_class *vendor_class,
1262 char *oui)
1264 int i;
1266 for (i = 0; i < MAX_MGMT_OUI; i++)
1267 /* Is there matching OUI for this vendor class ? */
1268 if (!memcmp(vendor_class->oui[i], oui, 3))
1269 return i;
1271 return -1;
1274 static int check_vendor_table(struct ib_mad_mgmt_vendor_class_table *vendor)
1276 int i;
1278 for (i = 0; i < MAX_MGMT_VENDOR_RANGE2; i++)
1279 if (vendor->vendor_class[i])
1280 return 1;
1282 return 0;
1285 static void remove_methods_mad_agent(struct ib_mad_mgmt_method_table *method,
1286 struct ib_mad_agent_private *agent)
1288 int i;
1290 /* Remove any methods for this mad agent */
1291 for (i = 0; i < IB_MGMT_MAX_METHODS; i++) {
1292 if (method->agent[i] == agent) {
1293 method->agent[i] = NULL;
1298 static int add_nonoui_reg_req(struct ib_mad_reg_req *mad_reg_req,
1299 struct ib_mad_agent_private *agent_priv,
1300 u8 mgmt_class)
1302 struct ib_mad_port_private *port_priv;
1303 struct ib_mad_mgmt_class_table **class;
1304 struct ib_mad_mgmt_method_table **method;
1305 int i, ret;
1307 port_priv = agent_priv->qp_info->port_priv;
1308 class = &port_priv->version[mad_reg_req->mgmt_class_version].class;
1309 if (!*class) {
1310 /* Allocate management class table for "new" class version */
1311 *class = kzalloc(sizeof **class, GFP_ATOMIC);
1312 if (!*class) {
1313 printk(KERN_ERR PFX "No memory for "
1314 "ib_mad_mgmt_class_table\n");
1315 ret = -ENOMEM;
1316 goto error1;
1319 /* Allocate method table for this management class */
1320 method = &(*class)->method_table[mgmt_class];
1321 if ((ret = allocate_method_table(method)))
1322 goto error2;
1323 } else {
1324 method = &(*class)->method_table[mgmt_class];
1325 if (!*method) {
1326 /* Allocate method table for this management class */
1327 if ((ret = allocate_method_table(method)))
1328 goto error1;
1332 /* Now, make sure methods are not already in use */
1333 if (method_in_use(method, mad_reg_req))
1334 goto error3;
1336 /* Finally, add in methods being registered */
1337 for_each_set_bit(i, mad_reg_req->method_mask, IB_MGMT_MAX_METHODS)
1338 (*method)->agent[i] = agent_priv;
1340 return 0;
1342 error3:
1343 /* Remove any methods for this mad agent */
1344 remove_methods_mad_agent(*method, agent_priv);
1345 /* Now, check to see if there are any methods in use */
1346 if (!check_method_table(*method)) {
1347 /* If not, release management method table */
1348 kfree(*method);
1349 *method = NULL;
1351 ret = -EINVAL;
1352 goto error1;
1353 error2:
1354 kfree(*class);
1355 *class = NULL;
1356 error1:
1357 return ret;
1360 static int add_oui_reg_req(struct ib_mad_reg_req *mad_reg_req,
1361 struct ib_mad_agent_private *agent_priv)
1363 struct ib_mad_port_private *port_priv;
1364 struct ib_mad_mgmt_vendor_class_table **vendor_table;
1365 struct ib_mad_mgmt_vendor_class_table *vendor = NULL;
1366 struct ib_mad_mgmt_vendor_class *vendor_class = NULL;
1367 struct ib_mad_mgmt_method_table **method;
1368 int i, ret = -ENOMEM;
1369 u8 vclass;
1371 /* "New" vendor (with OUI) class */
1372 vclass = vendor_class_index(mad_reg_req->mgmt_class);
1373 port_priv = agent_priv->qp_info->port_priv;
1374 vendor_table = &port_priv->version[
1375 mad_reg_req->mgmt_class_version].vendor;
1376 if (!*vendor_table) {
1377 /* Allocate mgmt vendor class table for "new" class version */
1378 vendor = kzalloc(sizeof *vendor, GFP_ATOMIC);
1379 if (!vendor) {
1380 printk(KERN_ERR PFX "No memory for "
1381 "ib_mad_mgmt_vendor_class_table\n");
1382 goto error1;
1385 *vendor_table = vendor;
1387 if (!(*vendor_table)->vendor_class[vclass]) {
1388 /* Allocate table for this management vendor class */
1389 vendor_class = kzalloc(sizeof *vendor_class, GFP_ATOMIC);
1390 if (!vendor_class) {
1391 printk(KERN_ERR PFX "No memory for "
1392 "ib_mad_mgmt_vendor_class\n");
1393 goto error2;
1396 (*vendor_table)->vendor_class[vclass] = vendor_class;
1398 for (i = 0; i < MAX_MGMT_OUI; i++) {
1399 /* Is there matching OUI for this vendor class ? */
1400 if (!memcmp((*vendor_table)->vendor_class[vclass]->oui[i],
1401 mad_reg_req->oui, 3)) {
1402 method = &(*vendor_table)->vendor_class[
1403 vclass]->method_table[i];
1404 BUG_ON(!*method);
1405 goto check_in_use;
1408 for (i = 0; i < MAX_MGMT_OUI; i++) {
1409 /* OUI slot available ? */
1410 if (!is_vendor_oui((*vendor_table)->vendor_class[
1411 vclass]->oui[i])) {
1412 method = &(*vendor_table)->vendor_class[
1413 vclass]->method_table[i];
1414 BUG_ON(*method);
1415 /* Allocate method table for this OUI */
1416 if ((ret = allocate_method_table(method)))
1417 goto error3;
1418 memcpy((*vendor_table)->vendor_class[vclass]->oui[i],
1419 mad_reg_req->oui, 3);
1420 goto check_in_use;
1423 printk(KERN_ERR PFX "All OUI slots in use\n");
1424 goto error3;
1426 check_in_use:
1427 /* Now, make sure methods are not already in use */
1428 if (method_in_use(method, mad_reg_req))
1429 goto error4;
1431 /* Finally, add in methods being registered */
1432 for_each_set_bit(i, mad_reg_req->method_mask, IB_MGMT_MAX_METHODS)
1433 (*method)->agent[i] = agent_priv;
1435 return 0;
1437 error4:
1438 /* Remove any methods for this mad agent */
1439 remove_methods_mad_agent(*method, agent_priv);
1440 /* Now, check to see if there are any methods in use */
1441 if (!check_method_table(*method)) {
1442 /* If not, release management method table */
1443 kfree(*method);
1444 *method = NULL;
1446 ret = -EINVAL;
1447 error3:
1448 if (vendor_class) {
1449 (*vendor_table)->vendor_class[vclass] = NULL;
1450 kfree(vendor_class);
1452 error2:
1453 if (vendor) {
1454 *vendor_table = NULL;
1455 kfree(vendor);
1457 error1:
1458 return ret;
1461 static void remove_mad_reg_req(struct ib_mad_agent_private *agent_priv)
1463 struct ib_mad_port_private *port_priv;
1464 struct ib_mad_mgmt_class_table *class;
1465 struct ib_mad_mgmt_method_table *method;
1466 struct ib_mad_mgmt_vendor_class_table *vendor;
1467 struct ib_mad_mgmt_vendor_class *vendor_class;
1468 int index;
1469 u8 mgmt_class;
1472 * Was MAD registration request supplied
1473 * with original registration ?
1475 if (!agent_priv->reg_req) {
1476 goto out;
1479 port_priv = agent_priv->qp_info->port_priv;
1480 mgmt_class = convert_mgmt_class(agent_priv->reg_req->mgmt_class);
1481 class = port_priv->version[
1482 agent_priv->reg_req->mgmt_class_version].class;
1483 if (!class)
1484 goto vendor_check;
1486 method = class->method_table[mgmt_class];
1487 if (method) {
1488 /* Remove any methods for this mad agent */
1489 remove_methods_mad_agent(method, agent_priv);
1490 /* Now, check to see if there are any methods still in use */
1491 if (!check_method_table(method)) {
1492 /* If not, release management method table */
1493 kfree(method);
1494 class->method_table[mgmt_class] = NULL;
1495 /* Any management classes left ? */
1496 if (!check_class_table(class)) {
1497 /* If not, release management class table */
1498 kfree(class);
1499 port_priv->version[
1500 agent_priv->reg_req->
1501 mgmt_class_version].class = NULL;
1506 vendor_check:
1507 if (!is_vendor_class(mgmt_class))
1508 goto out;
1510 /* normalize mgmt_class to vendor range 2 */
1511 mgmt_class = vendor_class_index(agent_priv->reg_req->mgmt_class);
1512 vendor = port_priv->version[
1513 agent_priv->reg_req->mgmt_class_version].vendor;
1515 if (!vendor)
1516 goto out;
1518 vendor_class = vendor->vendor_class[mgmt_class];
1519 if (vendor_class) {
1520 index = find_vendor_oui(vendor_class, agent_priv->reg_req->oui);
1521 if (index < 0)
1522 goto out;
1523 method = vendor_class->method_table[index];
1524 if (method) {
1525 /* Remove any methods for this mad agent */
1526 remove_methods_mad_agent(method, agent_priv);
1528 * Now, check to see if there are
1529 * any methods still in use
1531 if (!check_method_table(method)) {
1532 /* If not, release management method table */
1533 kfree(method);
1534 vendor_class->method_table[index] = NULL;
1535 memset(vendor_class->oui[index], 0, 3);
1536 /* Any OUIs left ? */
1537 if (!check_vendor_class(vendor_class)) {
1538 /* If not, release vendor class table */
1539 kfree(vendor_class);
1540 vendor->vendor_class[mgmt_class] = NULL;
1541 /* Any other vendor classes left ? */
1542 if (!check_vendor_table(vendor)) {
1543 kfree(vendor);
1544 port_priv->version[
1545 agent_priv->reg_req->
1546 mgmt_class_version].
1547 vendor = NULL;
1554 out:
1555 return;
1558 static struct ib_mad_agent_private *
1559 find_mad_agent(struct ib_mad_port_private *port_priv,
1560 struct ib_mad *mad)
1562 struct ib_mad_agent_private *mad_agent = NULL;
1563 unsigned long flags;
1565 spin_lock_irqsave(&port_priv->reg_lock, flags);
1566 if (ib_response_mad(mad)) {
1567 u32 hi_tid;
1568 struct ib_mad_agent_private *entry;
1571 * Routing is based on high 32 bits of transaction ID
1572 * of MAD.
1574 hi_tid = be64_to_cpu(mad->mad_hdr.tid) >> 32;
1575 list_for_each_entry(entry, &port_priv->agent_list, agent_list) {
1576 if (entry->agent.hi_tid == hi_tid) {
1577 mad_agent = entry;
1578 break;
1581 } else {
1582 struct ib_mad_mgmt_class_table *class;
1583 struct ib_mad_mgmt_method_table *method;
1584 struct ib_mad_mgmt_vendor_class_table *vendor;
1585 struct ib_mad_mgmt_vendor_class *vendor_class;
1586 struct ib_vendor_mad *vendor_mad;
1587 int index;
1590 * Routing is based on version, class, and method
1591 * For "newer" vendor MADs, also based on OUI
1593 if (mad->mad_hdr.class_version >= MAX_MGMT_VERSION)
1594 goto out;
1595 if (!is_vendor_class(mad->mad_hdr.mgmt_class)) {
1596 class = port_priv->version[
1597 mad->mad_hdr.class_version].class;
1598 if (!class)
1599 goto out;
1600 if (convert_mgmt_class(mad->mad_hdr.mgmt_class) >=
1601 IB_MGMT_MAX_METHODS)
1602 goto out;
1603 method = class->method_table[convert_mgmt_class(
1604 mad->mad_hdr.mgmt_class)];
1605 if (method)
1606 mad_agent = method->agent[mad->mad_hdr.method &
1607 ~IB_MGMT_METHOD_RESP];
1608 } else {
1609 vendor = port_priv->version[
1610 mad->mad_hdr.class_version].vendor;
1611 if (!vendor)
1612 goto out;
1613 vendor_class = vendor->vendor_class[vendor_class_index(
1614 mad->mad_hdr.mgmt_class)];
1615 if (!vendor_class)
1616 goto out;
1617 /* Find matching OUI */
1618 vendor_mad = (struct ib_vendor_mad *)mad;
1619 index = find_vendor_oui(vendor_class, vendor_mad->oui);
1620 if (index == -1)
1621 goto out;
1622 method = vendor_class->method_table[index];
1623 if (method) {
1624 mad_agent = method->agent[mad->mad_hdr.method &
1625 ~IB_MGMT_METHOD_RESP];
1630 if (mad_agent) {
1631 if (mad_agent->agent.recv_handler)
1632 atomic_inc(&mad_agent->refcount);
1633 else {
1634 printk(KERN_NOTICE PFX "No receive handler for client "
1635 "%p on port %d\n",
1636 &mad_agent->agent, port_priv->port_num);
1637 mad_agent = NULL;
1640 out:
1641 spin_unlock_irqrestore(&port_priv->reg_lock, flags);
1643 return mad_agent;
1646 static int validate_mad(struct ib_mad *mad, u32 qp_num)
1648 int valid = 0;
1650 /* Make sure MAD base version is understood */
1651 if (mad->mad_hdr.base_version != IB_MGMT_BASE_VERSION) {
1652 printk(KERN_ERR PFX "MAD received with unsupported base "
1653 "version %d\n", mad->mad_hdr.base_version);
1654 goto out;
1657 /* Filter SMI packets sent to other than QP0 */
1658 if ((mad->mad_hdr.mgmt_class == IB_MGMT_CLASS_SUBN_LID_ROUTED) ||
1659 (mad->mad_hdr.mgmt_class == IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE)) {
1660 if (qp_num == 0)
1661 valid = 1;
1662 } else {
1663 /* Filter GSI packets sent to QP0 */
1664 if (qp_num != 0)
1665 valid = 1;
1668 out:
1669 return valid;
1672 static int is_data_mad(struct ib_mad_agent_private *mad_agent_priv,
1673 struct ib_mad_hdr *mad_hdr)
1675 struct ib_rmpp_mad *rmpp_mad;
1677 rmpp_mad = (struct ib_rmpp_mad *)mad_hdr;
1678 return !mad_agent_priv->agent.rmpp_version ||
1679 !(ib_get_rmpp_flags(&rmpp_mad->rmpp_hdr) &
1680 IB_MGMT_RMPP_FLAG_ACTIVE) ||
1681 (rmpp_mad->rmpp_hdr.rmpp_type == IB_MGMT_RMPP_TYPE_DATA);
1684 static inline int rcv_has_same_class(struct ib_mad_send_wr_private *wr,
1685 struct ib_mad_recv_wc *rwc)
1687 return ((struct ib_mad *)(wr->send_buf.mad))->mad_hdr.mgmt_class ==
1688 rwc->recv_buf.mad->mad_hdr.mgmt_class;
1691 static inline int rcv_has_same_gid(struct ib_mad_agent_private *mad_agent_priv,
1692 struct ib_mad_send_wr_private *wr,
1693 struct ib_mad_recv_wc *rwc )
1695 struct ib_ah_attr attr;
1696 u8 send_resp, rcv_resp;
1697 union ib_gid sgid;
1698 struct ib_device *device = mad_agent_priv->agent.device;
1699 u8 port_num = mad_agent_priv->agent.port_num;
1700 u8 lmc;
1702 send_resp = ib_response_mad((struct ib_mad *)wr->send_buf.mad);
1703 rcv_resp = ib_response_mad(rwc->recv_buf.mad);
1705 if (send_resp == rcv_resp)
1706 /* both requests, or both responses. GIDs different */
1707 return 0;
1709 if (ib_query_ah(wr->send_buf.ah, &attr))
1710 /* Assume not equal, to avoid false positives. */
1711 return 0;
1713 if (!!(attr.ah_flags & IB_AH_GRH) !=
1714 !!(rwc->wc->wc_flags & IB_WC_GRH))
1715 /* one has GID, other does not. Assume different */
1716 return 0;
1718 if (!send_resp && rcv_resp) {
1719 /* is request/response. */
1720 if (!(attr.ah_flags & IB_AH_GRH)) {
1721 if (ib_get_cached_lmc(device, port_num, &lmc))
1722 return 0;
1723 return (!lmc || !((attr.src_path_bits ^
1724 rwc->wc->dlid_path_bits) &
1725 ((1 << lmc) - 1)));
1726 } else {
1727 if (ib_get_cached_gid(device, port_num,
1728 attr.grh.sgid_index, &sgid))
1729 return 0;
1730 return !memcmp(sgid.raw, rwc->recv_buf.grh->dgid.raw,
1731 16);
1735 if (!(attr.ah_flags & IB_AH_GRH))
1736 return attr.dlid == rwc->wc->slid;
1737 else
1738 return !memcmp(attr.grh.dgid.raw, rwc->recv_buf.grh->sgid.raw,
1739 16);
1742 static inline int is_direct(u8 class)
1744 return (class == IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE);
1747 struct ib_mad_send_wr_private*
1748 ib_find_send_mad(struct ib_mad_agent_private *mad_agent_priv,
1749 struct ib_mad_recv_wc *wc)
1751 struct ib_mad_send_wr_private *wr;
1752 struct ib_mad *mad;
1754 mad = (struct ib_mad *)wc->recv_buf.mad;
1756 list_for_each_entry(wr, &mad_agent_priv->wait_list, agent_list) {
1757 if ((wr->tid == mad->mad_hdr.tid) &&
1758 rcv_has_same_class(wr, wc) &&
1760 * Don't check GID for direct routed MADs.
1761 * These might have permissive LIDs.
1763 (is_direct(wc->recv_buf.mad->mad_hdr.mgmt_class) ||
1764 rcv_has_same_gid(mad_agent_priv, wr, wc)))
1765 return (wr->status == IB_WC_SUCCESS) ? wr : NULL;
1769 * It's possible to receive the response before we've
1770 * been notified that the send has completed
1772 list_for_each_entry(wr, &mad_agent_priv->send_list, agent_list) {
1773 if (is_data_mad(mad_agent_priv, wr->send_buf.mad) &&
1774 wr->tid == mad->mad_hdr.tid &&
1775 wr->timeout &&
1776 rcv_has_same_class(wr, wc) &&
1778 * Don't check GID for direct routed MADs.
1779 * These might have permissive LIDs.
1781 (is_direct(wc->recv_buf.mad->mad_hdr.mgmt_class) ||
1782 rcv_has_same_gid(mad_agent_priv, wr, wc)))
1783 /* Verify request has not been canceled */
1784 return (wr->status == IB_WC_SUCCESS) ? wr : NULL;
1786 return NULL;
1789 void ib_mark_mad_done(struct ib_mad_send_wr_private *mad_send_wr)
1791 mad_send_wr->timeout = 0;
1792 if (mad_send_wr->refcount == 1)
1793 list_move_tail(&mad_send_wr->agent_list,
1794 &mad_send_wr->mad_agent_priv->done_list);
1797 static void ib_mad_complete_recv(struct ib_mad_agent_private *mad_agent_priv,
1798 struct ib_mad_recv_wc *mad_recv_wc)
1800 struct ib_mad_send_wr_private *mad_send_wr;
1801 struct ib_mad_send_wc mad_send_wc;
1802 unsigned long flags;
1804 INIT_LIST_HEAD(&mad_recv_wc->rmpp_list);
1805 list_add(&mad_recv_wc->recv_buf.list, &mad_recv_wc->rmpp_list);
1806 if (mad_agent_priv->agent.rmpp_version) {
1807 mad_recv_wc = ib_process_rmpp_recv_wc(mad_agent_priv,
1808 mad_recv_wc);
1809 if (!mad_recv_wc) {
1810 deref_mad_agent(mad_agent_priv);
1811 return;
1815 /* Complete corresponding request */
1816 if (ib_response_mad(mad_recv_wc->recv_buf.mad)) {
1817 spin_lock_irqsave(&mad_agent_priv->lock, flags);
1818 mad_send_wr = ib_find_send_mad(mad_agent_priv, mad_recv_wc);
1819 if (!mad_send_wr) {
1820 spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
1821 ib_free_recv_mad(mad_recv_wc);
1822 deref_mad_agent(mad_agent_priv);
1823 return;
1825 ib_mark_mad_done(mad_send_wr);
1826 spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
1828 /* Defined behavior is to complete response before request */
1829 mad_recv_wc->wc->wr_id = (unsigned long) &mad_send_wr->send_buf;
1830 mad_agent_priv->agent.recv_handler(&mad_agent_priv->agent,
1831 mad_recv_wc);
1832 atomic_dec(&mad_agent_priv->refcount);
1834 mad_send_wc.status = IB_WC_SUCCESS;
1835 mad_send_wc.vendor_err = 0;
1836 mad_send_wc.send_buf = &mad_send_wr->send_buf;
1837 ib_mad_complete_send_wr(mad_send_wr, &mad_send_wc);
1838 } else {
1839 mad_agent_priv->agent.recv_handler(&mad_agent_priv->agent,
1840 mad_recv_wc);
1841 deref_mad_agent(mad_agent_priv);
1845 static bool generate_unmatched_resp(struct ib_mad_private *recv,
1846 struct ib_mad_private *response)
1848 if (recv->mad.mad.mad_hdr.method == IB_MGMT_METHOD_GET ||
1849 recv->mad.mad.mad_hdr.method == IB_MGMT_METHOD_SET) {
1850 memcpy(response, recv, sizeof *response);
1851 response->header.recv_wc.wc = &response->header.wc;
1852 response->header.recv_wc.recv_buf.mad = &response->mad.mad;
1853 response->header.recv_wc.recv_buf.grh = &response->grh;
1854 response->mad.mad.mad_hdr.method = IB_MGMT_METHOD_GET_RESP;
1855 response->mad.mad.mad_hdr.status =
1856 cpu_to_be16(IB_MGMT_MAD_STATUS_UNSUPPORTED_METHOD_ATTRIB);
1857 if (recv->mad.mad.mad_hdr.mgmt_class == IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE)
1858 response->mad.mad.mad_hdr.status |= IB_SMP_DIRECTION;
1860 return true;
1861 } else {
1862 return false;
1865 static void ib_mad_recv_done_handler(struct ib_mad_port_private *port_priv,
1866 struct ib_wc *wc)
1868 struct ib_mad_qp_info *qp_info;
1869 struct ib_mad_private_header *mad_priv_hdr;
1870 struct ib_mad_private *recv, *response = NULL;
1871 struct ib_mad_list_head *mad_list;
1872 struct ib_mad_agent_private *mad_agent;
1873 int port_num;
1874 int ret = IB_MAD_RESULT_SUCCESS;
1876 mad_list = (struct ib_mad_list_head *)(unsigned long)wc->wr_id;
1877 qp_info = mad_list->mad_queue->qp_info;
1878 dequeue_mad(mad_list);
1880 mad_priv_hdr = container_of(mad_list, struct ib_mad_private_header,
1881 mad_list);
1882 recv = container_of(mad_priv_hdr, struct ib_mad_private, header);
1883 ib_dma_unmap_single(port_priv->device,
1884 recv->header.mapping,
1885 sizeof(struct ib_mad_private) -
1886 sizeof(struct ib_mad_private_header),
1887 DMA_FROM_DEVICE);
1889 /* Setup MAD receive work completion from "normal" work completion */
1890 recv->header.wc = *wc;
1891 recv->header.recv_wc.wc = &recv->header.wc;
1892 recv->header.recv_wc.mad_len = sizeof(struct ib_mad);
1893 recv->header.recv_wc.recv_buf.mad = &recv->mad.mad;
1894 recv->header.recv_wc.recv_buf.grh = &recv->grh;
1896 if (atomic_read(&qp_info->snoop_count))
1897 snoop_recv(qp_info, &recv->header.recv_wc, IB_MAD_SNOOP_RECVS);
1899 /* Validate MAD */
1900 if (!validate_mad(&recv->mad.mad, qp_info->qp->qp_num))
1901 goto out;
1903 response = kmem_cache_alloc(ib_mad_cache, GFP_KERNEL);
1904 if (!response) {
1905 printk(KERN_ERR PFX "ib_mad_recv_done_handler no memory "
1906 "for response buffer\n");
1907 goto out;
1910 if (port_priv->device->node_type == RDMA_NODE_IB_SWITCH)
1911 port_num = wc->port_num;
1912 else
1913 port_num = port_priv->port_num;
1915 if (recv->mad.mad.mad_hdr.mgmt_class ==
1916 IB_MGMT_CLASS_SUBN_DIRECTED_ROUTE) {
1917 enum smi_forward_action retsmi;
1919 if (smi_handle_dr_smp_recv(&recv->mad.smp,
1920 port_priv->device->node_type,
1921 port_num,
1922 port_priv->device->phys_port_cnt) ==
1923 IB_SMI_DISCARD)
1924 goto out;
1926 retsmi = smi_check_forward_dr_smp(&recv->mad.smp);
1927 if (retsmi == IB_SMI_LOCAL)
1928 goto local;
1930 if (retsmi == IB_SMI_SEND) { /* don't forward */
1931 if (smi_handle_dr_smp_send(&recv->mad.smp,
1932 port_priv->device->node_type,
1933 port_num) == IB_SMI_DISCARD)
1934 goto out;
1936 if (smi_check_local_smp(&recv->mad.smp, port_priv->device) == IB_SMI_DISCARD)
1937 goto out;
1938 } else if (port_priv->device->node_type == RDMA_NODE_IB_SWITCH) {
1939 /* forward case for switches */
1940 memcpy(response, recv, sizeof(*response));
1941 response->header.recv_wc.wc = &response->header.wc;
1942 response->header.recv_wc.recv_buf.mad = &response->mad.mad;
1943 response->header.recv_wc.recv_buf.grh = &response->grh;
1945 agent_send_response(&response->mad.mad,
1946 &response->grh, wc,
1947 port_priv->device,
1948 smi_get_fwd_port(&recv->mad.smp),
1949 qp_info->qp->qp_num);
1951 goto out;
1955 local:
1956 /* Give driver "right of first refusal" on incoming MAD */
1957 if (port_priv->device->process_mad) {
1958 ret = port_priv->device->process_mad(port_priv->device, 0,
1959 port_priv->port_num,
1960 wc, &recv->grh,
1961 &recv->mad.mad,
1962 &response->mad.mad);
1963 if (ret & IB_MAD_RESULT_SUCCESS) {
1964 if (ret & IB_MAD_RESULT_CONSUMED)
1965 goto out;
1966 if (ret & IB_MAD_RESULT_REPLY) {
1967 agent_send_response(&response->mad.mad,
1968 &recv->grh, wc,
1969 port_priv->device,
1970 port_num,
1971 qp_info->qp->qp_num);
1972 goto out;
1977 mad_agent = find_mad_agent(port_priv, &recv->mad.mad);
1978 if (mad_agent) {
1979 ib_mad_complete_recv(mad_agent, &recv->header.recv_wc);
1981 * recv is freed up in error cases in ib_mad_complete_recv
1982 * or via recv_handler in ib_mad_complete_recv()
1984 recv = NULL;
1985 } else if ((ret & IB_MAD_RESULT_SUCCESS) &&
1986 generate_unmatched_resp(recv, response)) {
1987 agent_send_response(&response->mad.mad, &recv->grh, wc,
1988 port_priv->device, port_num, qp_info->qp->qp_num);
1991 out:
1992 /* Post another receive request for this QP */
1993 if (response) {
1994 ib_mad_post_receive_mads(qp_info, response);
1995 if (recv)
1996 kmem_cache_free(ib_mad_cache, recv);
1997 } else
1998 ib_mad_post_receive_mads(qp_info, recv);
2001 static void adjust_timeout(struct ib_mad_agent_private *mad_agent_priv)
2003 struct ib_mad_send_wr_private *mad_send_wr;
2004 unsigned long delay;
2006 if (list_empty(&mad_agent_priv->wait_list)) {
2007 __cancel_delayed_work(&mad_agent_priv->timed_work);
2008 } else {
2009 mad_send_wr = list_entry(mad_agent_priv->wait_list.next,
2010 struct ib_mad_send_wr_private,
2011 agent_list);
2013 if (time_after(mad_agent_priv->timeout,
2014 mad_send_wr->timeout)) {
2015 mad_agent_priv->timeout = mad_send_wr->timeout;
2016 __cancel_delayed_work(&mad_agent_priv->timed_work);
2017 delay = mad_send_wr->timeout - jiffies;
2018 if ((long)delay <= 0)
2019 delay = 1;
2020 queue_delayed_work(mad_agent_priv->qp_info->
2021 port_priv->wq,
2022 &mad_agent_priv->timed_work, delay);
2027 static void wait_for_response(struct ib_mad_send_wr_private *mad_send_wr)
2029 struct ib_mad_agent_private *mad_agent_priv;
2030 struct ib_mad_send_wr_private *temp_mad_send_wr;
2031 struct list_head *list_item;
2032 unsigned long delay;
2034 mad_agent_priv = mad_send_wr->mad_agent_priv;
2035 list_del(&mad_send_wr->agent_list);
2037 delay = mad_send_wr->timeout;
2038 mad_send_wr->timeout += jiffies;
2040 if (delay) {
2041 list_for_each_prev(list_item, &mad_agent_priv->wait_list) {
2042 temp_mad_send_wr = list_entry(list_item,
2043 struct ib_mad_send_wr_private,
2044 agent_list);
2045 if (time_after(mad_send_wr->timeout,
2046 temp_mad_send_wr->timeout))
2047 break;
2050 else
2051 list_item = &mad_agent_priv->wait_list;
2052 list_add(&mad_send_wr->agent_list, list_item);
2054 /* Reschedule a work item if we have a shorter timeout */
2055 if (mad_agent_priv->wait_list.next == &mad_send_wr->agent_list) {
2056 __cancel_delayed_work(&mad_agent_priv->timed_work);
2057 queue_delayed_work(mad_agent_priv->qp_info->port_priv->wq,
2058 &mad_agent_priv->timed_work, delay);
2062 void ib_reset_mad_timeout(struct ib_mad_send_wr_private *mad_send_wr,
2063 int timeout_ms)
2065 mad_send_wr->timeout = msecs_to_jiffies(timeout_ms);
2066 wait_for_response(mad_send_wr);
2070 * Process a send work completion
2072 void ib_mad_complete_send_wr(struct ib_mad_send_wr_private *mad_send_wr,
2073 struct ib_mad_send_wc *mad_send_wc)
2075 struct ib_mad_agent_private *mad_agent_priv;
2076 unsigned long flags;
2077 int ret;
2079 mad_agent_priv = mad_send_wr->mad_agent_priv;
2080 spin_lock_irqsave(&mad_agent_priv->lock, flags);
2081 if (mad_agent_priv->agent.rmpp_version) {
2082 ret = ib_process_rmpp_send_wc(mad_send_wr, mad_send_wc);
2083 if (ret == IB_RMPP_RESULT_CONSUMED)
2084 goto done;
2085 } else
2086 ret = IB_RMPP_RESULT_UNHANDLED;
2088 if (mad_send_wc->status != IB_WC_SUCCESS &&
2089 mad_send_wr->status == IB_WC_SUCCESS) {
2090 mad_send_wr->status = mad_send_wc->status;
2091 mad_send_wr->refcount -= (mad_send_wr->timeout > 0);
2094 if (--mad_send_wr->refcount > 0) {
2095 if (mad_send_wr->refcount == 1 && mad_send_wr->timeout &&
2096 mad_send_wr->status == IB_WC_SUCCESS) {
2097 wait_for_response(mad_send_wr);
2099 goto done;
2102 /* Remove send from MAD agent and notify client of completion */
2103 list_del(&mad_send_wr->agent_list);
2104 adjust_timeout(mad_agent_priv);
2105 spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
2107 if (mad_send_wr->status != IB_WC_SUCCESS )
2108 mad_send_wc->status = mad_send_wr->status;
2109 if (ret == IB_RMPP_RESULT_INTERNAL)
2110 ib_rmpp_send_handler(mad_send_wc);
2111 else
2112 mad_agent_priv->agent.send_handler(&mad_agent_priv->agent,
2113 mad_send_wc);
2115 /* Release reference on agent taken when sending */
2116 deref_mad_agent(mad_agent_priv);
2117 return;
2118 done:
2119 spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
2122 static void ib_mad_send_done_handler(struct ib_mad_port_private *port_priv,
2123 struct ib_wc *wc)
2125 struct ib_mad_send_wr_private *mad_send_wr, *queued_send_wr;
2126 struct ib_mad_list_head *mad_list;
2127 struct ib_mad_qp_info *qp_info;
2128 struct ib_mad_queue *send_queue;
2129 struct ib_send_wr *bad_send_wr;
2130 struct ib_mad_send_wc mad_send_wc;
2131 unsigned long flags;
2132 int ret;
2134 mad_list = (struct ib_mad_list_head *)(unsigned long)wc->wr_id;
2135 mad_send_wr = container_of(mad_list, struct ib_mad_send_wr_private,
2136 mad_list);
2137 send_queue = mad_list->mad_queue;
2138 qp_info = send_queue->qp_info;
2140 retry:
2141 ib_dma_unmap_single(mad_send_wr->send_buf.mad_agent->device,
2142 mad_send_wr->header_mapping,
2143 mad_send_wr->sg_list[0].length, DMA_TO_DEVICE);
2144 ib_dma_unmap_single(mad_send_wr->send_buf.mad_agent->device,
2145 mad_send_wr->payload_mapping,
2146 mad_send_wr->sg_list[1].length, DMA_TO_DEVICE);
2147 queued_send_wr = NULL;
2148 spin_lock_irqsave(&send_queue->lock, flags);
2149 list_del(&mad_list->list);
2151 /* Move queued send to the send queue */
2152 if (send_queue->count-- > send_queue->max_active) {
2153 mad_list = container_of(qp_info->overflow_list.next,
2154 struct ib_mad_list_head, list);
2155 queued_send_wr = container_of(mad_list,
2156 struct ib_mad_send_wr_private,
2157 mad_list);
2158 list_move_tail(&mad_list->list, &send_queue->list);
2160 spin_unlock_irqrestore(&send_queue->lock, flags);
2162 mad_send_wc.send_buf = &mad_send_wr->send_buf;
2163 mad_send_wc.status = wc->status;
2164 mad_send_wc.vendor_err = wc->vendor_err;
2165 if (atomic_read(&qp_info->snoop_count))
2166 snoop_send(qp_info, &mad_send_wr->send_buf, &mad_send_wc,
2167 IB_MAD_SNOOP_SEND_COMPLETIONS);
2168 ib_mad_complete_send_wr(mad_send_wr, &mad_send_wc);
2170 if (queued_send_wr) {
2171 ret = ib_post_send(qp_info->qp, &queued_send_wr->send_wr,
2172 &bad_send_wr);
2173 if (ret) {
2174 printk(KERN_ERR PFX "ib_post_send failed: %d\n", ret);
2175 mad_send_wr = queued_send_wr;
2176 wc->status = IB_WC_LOC_QP_OP_ERR;
2177 goto retry;
2182 static void mark_sends_for_retry(struct ib_mad_qp_info *qp_info)
2184 struct ib_mad_send_wr_private *mad_send_wr;
2185 struct ib_mad_list_head *mad_list;
2186 unsigned long flags;
2188 spin_lock_irqsave(&qp_info->send_queue.lock, flags);
2189 list_for_each_entry(mad_list, &qp_info->send_queue.list, list) {
2190 mad_send_wr = container_of(mad_list,
2191 struct ib_mad_send_wr_private,
2192 mad_list);
2193 mad_send_wr->retry = 1;
2195 spin_unlock_irqrestore(&qp_info->send_queue.lock, flags);
2198 static void mad_error_handler(struct ib_mad_port_private *port_priv,
2199 struct ib_wc *wc)
2201 struct ib_mad_list_head *mad_list;
2202 struct ib_mad_qp_info *qp_info;
2203 struct ib_mad_send_wr_private *mad_send_wr;
2204 int ret;
2206 /* Determine if failure was a send or receive */
2207 mad_list = (struct ib_mad_list_head *)(unsigned long)wc->wr_id;
2208 qp_info = mad_list->mad_queue->qp_info;
2209 if (mad_list->mad_queue == &qp_info->recv_queue)
2211 * Receive errors indicate that the QP has entered the error
2212 * state - error handling/shutdown code will cleanup
2214 return;
2217 * Send errors will transition the QP to SQE - move
2218 * QP to RTS and repost flushed work requests
2220 mad_send_wr = container_of(mad_list, struct ib_mad_send_wr_private,
2221 mad_list);
2222 if (wc->status == IB_WC_WR_FLUSH_ERR) {
2223 if (mad_send_wr->retry) {
2224 /* Repost send */
2225 struct ib_send_wr *bad_send_wr;
2227 mad_send_wr->retry = 0;
2228 ret = ib_post_send(qp_info->qp, &mad_send_wr->send_wr,
2229 &bad_send_wr);
2230 if (ret)
2231 ib_mad_send_done_handler(port_priv, wc);
2232 } else
2233 ib_mad_send_done_handler(port_priv, wc);
2234 } else {
2235 struct ib_qp_attr *attr;
2237 /* Transition QP to RTS and fail offending send */
2238 attr = kmalloc(sizeof *attr, GFP_KERNEL);
2239 if (attr) {
2240 attr->qp_state = IB_QPS_RTS;
2241 attr->cur_qp_state = IB_QPS_SQE;
2242 ret = ib_modify_qp(qp_info->qp, attr,
2243 IB_QP_STATE | IB_QP_CUR_STATE);
2244 kfree(attr);
2245 if (ret)
2246 printk(KERN_ERR PFX "mad_error_handler - "
2247 "ib_modify_qp to RTS : %d\n", ret);
2248 else
2249 mark_sends_for_retry(qp_info);
2251 ib_mad_send_done_handler(port_priv, wc);
2256 * IB MAD completion callback
2258 static void ib_mad_completion_handler(struct work_struct *work)
2260 struct ib_mad_port_private *port_priv;
2261 struct ib_wc wc;
2263 port_priv = container_of(work, struct ib_mad_port_private, work);
2264 ib_req_notify_cq(port_priv->cq, IB_CQ_NEXT_COMP);
2266 while (ib_poll_cq(port_priv->cq, 1, &wc) == 1) {
2267 if (wc.status == IB_WC_SUCCESS) {
2268 switch (wc.opcode) {
2269 case IB_WC_SEND:
2270 ib_mad_send_done_handler(port_priv, &wc);
2271 break;
2272 case IB_WC_RECV:
2273 ib_mad_recv_done_handler(port_priv, &wc);
2274 break;
2275 default:
2276 BUG_ON(1);
2277 break;
2279 } else
2280 mad_error_handler(port_priv, &wc);
2284 static void cancel_mads(struct ib_mad_agent_private *mad_agent_priv)
2286 unsigned long flags;
2287 struct ib_mad_send_wr_private *mad_send_wr, *temp_mad_send_wr;
2288 struct ib_mad_send_wc mad_send_wc;
2289 struct list_head cancel_list;
2291 INIT_LIST_HEAD(&cancel_list);
2293 spin_lock_irqsave(&mad_agent_priv->lock, flags);
2294 list_for_each_entry_safe(mad_send_wr, temp_mad_send_wr,
2295 &mad_agent_priv->send_list, agent_list) {
2296 if (mad_send_wr->status == IB_WC_SUCCESS) {
2297 mad_send_wr->status = IB_WC_WR_FLUSH_ERR;
2298 mad_send_wr->refcount -= (mad_send_wr->timeout > 0);
2302 /* Empty wait list to prevent receives from finding a request */
2303 list_splice_init(&mad_agent_priv->wait_list, &cancel_list);
2304 spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
2306 /* Report all cancelled requests */
2307 mad_send_wc.status = IB_WC_WR_FLUSH_ERR;
2308 mad_send_wc.vendor_err = 0;
2310 list_for_each_entry_safe(mad_send_wr, temp_mad_send_wr,
2311 &cancel_list, agent_list) {
2312 mad_send_wc.send_buf = &mad_send_wr->send_buf;
2313 list_del(&mad_send_wr->agent_list);
2314 mad_agent_priv->agent.send_handler(&mad_agent_priv->agent,
2315 &mad_send_wc);
2316 atomic_dec(&mad_agent_priv->refcount);
2320 static struct ib_mad_send_wr_private*
2321 find_send_wr(struct ib_mad_agent_private *mad_agent_priv,
2322 struct ib_mad_send_buf *send_buf)
2324 struct ib_mad_send_wr_private *mad_send_wr;
2326 list_for_each_entry(mad_send_wr, &mad_agent_priv->wait_list,
2327 agent_list) {
2328 if (&mad_send_wr->send_buf == send_buf)
2329 return mad_send_wr;
2332 list_for_each_entry(mad_send_wr, &mad_agent_priv->send_list,
2333 agent_list) {
2334 if (is_data_mad(mad_agent_priv, mad_send_wr->send_buf.mad) &&
2335 &mad_send_wr->send_buf == send_buf)
2336 return mad_send_wr;
2338 return NULL;
2341 int ib_modify_mad(struct ib_mad_agent *mad_agent,
2342 struct ib_mad_send_buf *send_buf, u32 timeout_ms)
2344 struct ib_mad_agent_private *mad_agent_priv;
2345 struct ib_mad_send_wr_private *mad_send_wr;
2346 unsigned long flags;
2347 int active;
2349 mad_agent_priv = container_of(mad_agent, struct ib_mad_agent_private,
2350 agent);
2351 spin_lock_irqsave(&mad_agent_priv->lock, flags);
2352 mad_send_wr = find_send_wr(mad_agent_priv, send_buf);
2353 if (!mad_send_wr || mad_send_wr->status != IB_WC_SUCCESS) {
2354 spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
2355 return -EINVAL;
2358 active = (!mad_send_wr->timeout || mad_send_wr->refcount > 1);
2359 if (!timeout_ms) {
2360 mad_send_wr->status = IB_WC_WR_FLUSH_ERR;
2361 mad_send_wr->refcount -= (mad_send_wr->timeout > 0);
2364 mad_send_wr->send_buf.timeout_ms = timeout_ms;
2365 if (active)
2366 mad_send_wr->timeout = msecs_to_jiffies(timeout_ms);
2367 else
2368 ib_reset_mad_timeout(mad_send_wr, timeout_ms);
2370 spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
2371 return 0;
2373 EXPORT_SYMBOL(ib_modify_mad);
2375 void ib_cancel_mad(struct ib_mad_agent *mad_agent,
2376 struct ib_mad_send_buf *send_buf)
2378 ib_modify_mad(mad_agent, send_buf, 0);
2380 EXPORT_SYMBOL(ib_cancel_mad);
2382 static void local_completions(struct work_struct *work)
2384 struct ib_mad_agent_private *mad_agent_priv;
2385 struct ib_mad_local_private *local;
2386 struct ib_mad_agent_private *recv_mad_agent;
2387 unsigned long flags;
2388 int free_mad;
2389 struct ib_wc wc;
2390 struct ib_mad_send_wc mad_send_wc;
2392 mad_agent_priv =
2393 container_of(work, struct ib_mad_agent_private, local_work);
2395 spin_lock_irqsave(&mad_agent_priv->lock, flags);
2396 while (!list_empty(&mad_agent_priv->local_list)) {
2397 local = list_entry(mad_agent_priv->local_list.next,
2398 struct ib_mad_local_private,
2399 completion_list);
2400 list_del(&local->completion_list);
2401 spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
2402 free_mad = 0;
2403 if (local->mad_priv) {
2404 recv_mad_agent = local->recv_mad_agent;
2405 if (!recv_mad_agent) {
2406 printk(KERN_ERR PFX "No receive MAD agent for local completion\n");
2407 free_mad = 1;
2408 goto local_send_completion;
2412 * Defined behavior is to complete response
2413 * before request
2415 build_smp_wc(recv_mad_agent->agent.qp,
2416 (unsigned long) local->mad_send_wr,
2417 be16_to_cpu(IB_LID_PERMISSIVE),
2418 0, recv_mad_agent->agent.port_num, &wc);
2420 local->mad_priv->header.recv_wc.wc = &wc;
2421 local->mad_priv->header.recv_wc.mad_len =
2422 sizeof(struct ib_mad);
2423 INIT_LIST_HEAD(&local->mad_priv->header.recv_wc.rmpp_list);
2424 list_add(&local->mad_priv->header.recv_wc.recv_buf.list,
2425 &local->mad_priv->header.recv_wc.rmpp_list);
2426 local->mad_priv->header.recv_wc.recv_buf.grh = NULL;
2427 local->mad_priv->header.recv_wc.recv_buf.mad =
2428 &local->mad_priv->mad.mad;
2429 if (atomic_read(&recv_mad_agent->qp_info->snoop_count))
2430 snoop_recv(recv_mad_agent->qp_info,
2431 &local->mad_priv->header.recv_wc,
2432 IB_MAD_SNOOP_RECVS);
2433 recv_mad_agent->agent.recv_handler(
2434 &recv_mad_agent->agent,
2435 &local->mad_priv->header.recv_wc);
2436 spin_lock_irqsave(&recv_mad_agent->lock, flags);
2437 atomic_dec(&recv_mad_agent->refcount);
2438 spin_unlock_irqrestore(&recv_mad_agent->lock, flags);
2441 local_send_completion:
2442 /* Complete send */
2443 mad_send_wc.status = IB_WC_SUCCESS;
2444 mad_send_wc.vendor_err = 0;
2445 mad_send_wc.send_buf = &local->mad_send_wr->send_buf;
2446 if (atomic_read(&mad_agent_priv->qp_info->snoop_count))
2447 snoop_send(mad_agent_priv->qp_info,
2448 &local->mad_send_wr->send_buf,
2449 &mad_send_wc, IB_MAD_SNOOP_SEND_COMPLETIONS);
2450 mad_agent_priv->agent.send_handler(&mad_agent_priv->agent,
2451 &mad_send_wc);
2453 spin_lock_irqsave(&mad_agent_priv->lock, flags);
2454 atomic_dec(&mad_agent_priv->refcount);
2455 if (free_mad)
2456 kmem_cache_free(ib_mad_cache, local->mad_priv);
2457 kfree(local);
2459 spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
2462 static int retry_send(struct ib_mad_send_wr_private *mad_send_wr)
2464 int ret;
2466 if (!mad_send_wr->retries_left)
2467 return -ETIMEDOUT;
2469 mad_send_wr->retries_left--;
2470 mad_send_wr->send_buf.retries++;
2472 mad_send_wr->timeout = msecs_to_jiffies(mad_send_wr->send_buf.timeout_ms);
2474 if (mad_send_wr->mad_agent_priv->agent.rmpp_version) {
2475 ret = ib_retry_rmpp(mad_send_wr);
2476 switch (ret) {
2477 case IB_RMPP_RESULT_UNHANDLED:
2478 ret = ib_send_mad(mad_send_wr);
2479 break;
2480 case IB_RMPP_RESULT_CONSUMED:
2481 ret = 0;
2482 break;
2483 default:
2484 ret = -ECOMM;
2485 break;
2487 } else
2488 ret = ib_send_mad(mad_send_wr);
2490 if (!ret) {
2491 mad_send_wr->refcount++;
2492 list_add_tail(&mad_send_wr->agent_list,
2493 &mad_send_wr->mad_agent_priv->send_list);
2495 return ret;
2498 static void timeout_sends(struct work_struct *work)
2500 struct ib_mad_agent_private *mad_agent_priv;
2501 struct ib_mad_send_wr_private *mad_send_wr;
2502 struct ib_mad_send_wc mad_send_wc;
2503 unsigned long flags, delay;
2505 mad_agent_priv = container_of(work, struct ib_mad_agent_private,
2506 timed_work.work);
2507 mad_send_wc.vendor_err = 0;
2509 spin_lock_irqsave(&mad_agent_priv->lock, flags);
2510 while (!list_empty(&mad_agent_priv->wait_list)) {
2511 mad_send_wr = list_entry(mad_agent_priv->wait_list.next,
2512 struct ib_mad_send_wr_private,
2513 agent_list);
2515 if (time_after(mad_send_wr->timeout, jiffies)) {
2516 delay = mad_send_wr->timeout - jiffies;
2517 if ((long)delay <= 0)
2518 delay = 1;
2519 queue_delayed_work(mad_agent_priv->qp_info->
2520 port_priv->wq,
2521 &mad_agent_priv->timed_work, delay);
2522 break;
2525 list_del(&mad_send_wr->agent_list);
2526 if (mad_send_wr->status == IB_WC_SUCCESS &&
2527 !retry_send(mad_send_wr))
2528 continue;
2530 spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
2532 if (mad_send_wr->status == IB_WC_SUCCESS)
2533 mad_send_wc.status = IB_WC_RESP_TIMEOUT_ERR;
2534 else
2535 mad_send_wc.status = mad_send_wr->status;
2536 mad_send_wc.send_buf = &mad_send_wr->send_buf;
2537 mad_agent_priv->agent.send_handler(&mad_agent_priv->agent,
2538 &mad_send_wc);
2540 atomic_dec(&mad_agent_priv->refcount);
2541 spin_lock_irqsave(&mad_agent_priv->lock, flags);
2543 spin_unlock_irqrestore(&mad_agent_priv->lock, flags);
2546 static void ib_mad_thread_completion_handler(struct ib_cq *cq, void *arg)
2548 struct ib_mad_port_private *port_priv = cq->cq_context;
2549 unsigned long flags;
2551 spin_lock_irqsave(&ib_mad_port_list_lock, flags);
2552 if (!list_empty(&port_priv->port_list))
2553 queue_work(port_priv->wq, &port_priv->work);
2554 spin_unlock_irqrestore(&ib_mad_port_list_lock, flags);
2558 * Allocate receive MADs and post receive WRs for them
2560 static int ib_mad_post_receive_mads(struct ib_mad_qp_info *qp_info,
2561 struct ib_mad_private *mad)
2563 unsigned long flags;
2564 int post, ret;
2565 struct ib_mad_private *mad_priv;
2566 struct ib_sge sg_list;
2567 struct ib_recv_wr recv_wr, *bad_recv_wr;
2568 struct ib_mad_queue *recv_queue = &qp_info->recv_queue;
2570 /* Initialize common scatter list fields */
2571 sg_list.length = sizeof *mad_priv - sizeof mad_priv->header;
2572 sg_list.lkey = (*qp_info->port_priv->mr).lkey;
2574 /* Initialize common receive WR fields */
2575 recv_wr.next = NULL;
2576 recv_wr.sg_list = &sg_list;
2577 recv_wr.num_sge = 1;
2579 do {
2580 /* Allocate and map receive buffer */
2581 if (mad) {
2582 mad_priv = mad;
2583 mad = NULL;
2584 } else {
2585 mad_priv = kmem_cache_alloc(ib_mad_cache, GFP_KERNEL);
2586 if (!mad_priv) {
2587 printk(KERN_ERR PFX "No memory for receive buffer\n");
2588 ret = -ENOMEM;
2589 break;
2592 sg_list.addr = ib_dma_map_single(qp_info->port_priv->device,
2593 &mad_priv->grh,
2594 sizeof *mad_priv -
2595 sizeof mad_priv->header,
2596 DMA_FROM_DEVICE);
2597 mad_priv->header.mapping = sg_list.addr;
2598 recv_wr.wr_id = (unsigned long)&mad_priv->header.mad_list;
2599 mad_priv->header.mad_list.mad_queue = recv_queue;
2601 /* Post receive WR */
2602 spin_lock_irqsave(&recv_queue->lock, flags);
2603 post = (++recv_queue->count < recv_queue->max_active);
2604 list_add_tail(&mad_priv->header.mad_list.list, &recv_queue->list);
2605 spin_unlock_irqrestore(&recv_queue->lock, flags);
2606 ret = ib_post_recv(qp_info->qp, &recv_wr, &bad_recv_wr);
2607 if (ret) {
2608 spin_lock_irqsave(&recv_queue->lock, flags);
2609 list_del(&mad_priv->header.mad_list.list);
2610 recv_queue->count--;
2611 spin_unlock_irqrestore(&recv_queue->lock, flags);
2612 ib_dma_unmap_single(qp_info->port_priv->device,
2613 mad_priv->header.mapping,
2614 sizeof *mad_priv -
2615 sizeof mad_priv->header,
2616 DMA_FROM_DEVICE);
2617 kmem_cache_free(ib_mad_cache, mad_priv);
2618 printk(KERN_ERR PFX "ib_post_recv failed: %d\n", ret);
2619 break;
2621 } while (post);
2623 return ret;
2627 * Return all the posted receive MADs
2629 static void cleanup_recv_queue(struct ib_mad_qp_info *qp_info)
2631 struct ib_mad_private_header *mad_priv_hdr;
2632 struct ib_mad_private *recv;
2633 struct ib_mad_list_head *mad_list;
2635 if (!qp_info->qp)
2636 return;
2638 while (!list_empty(&qp_info->recv_queue.list)) {
2640 mad_list = list_entry(qp_info->recv_queue.list.next,
2641 struct ib_mad_list_head, list);
2642 mad_priv_hdr = container_of(mad_list,
2643 struct ib_mad_private_header,
2644 mad_list);
2645 recv = container_of(mad_priv_hdr, struct ib_mad_private,
2646 header);
2648 /* Remove from posted receive MAD list */
2649 list_del(&mad_list->list);
2651 ib_dma_unmap_single(qp_info->port_priv->device,
2652 recv->header.mapping,
2653 sizeof(struct ib_mad_private) -
2654 sizeof(struct ib_mad_private_header),
2655 DMA_FROM_DEVICE);
2656 kmem_cache_free(ib_mad_cache, recv);
2659 qp_info->recv_queue.count = 0;
2663 * Start the port
2665 static int ib_mad_port_start(struct ib_mad_port_private *port_priv)
2667 int ret, i;
2668 struct ib_qp_attr *attr;
2669 struct ib_qp *qp;
2671 attr = kmalloc(sizeof *attr, GFP_KERNEL);
2672 if (!attr) {
2673 printk(KERN_ERR PFX "Couldn't kmalloc ib_qp_attr\n");
2674 return -ENOMEM;
2677 for (i = 0; i < IB_MAD_QPS_CORE; i++) {
2678 qp = port_priv->qp_info[i].qp;
2679 if (!qp)
2680 continue;
2683 * PKey index for QP1 is irrelevant but
2684 * one is needed for the Reset to Init transition
2686 attr->qp_state = IB_QPS_INIT;
2687 attr->pkey_index = 0;
2688 attr->qkey = (qp->qp_num == 0) ? 0 : IB_QP1_QKEY;
2689 ret = ib_modify_qp(qp, attr, IB_QP_STATE |
2690 IB_QP_PKEY_INDEX | IB_QP_QKEY);
2691 if (ret) {
2692 printk(KERN_ERR PFX "Couldn't change QP%d state to "
2693 "INIT: %d\n", i, ret);
2694 goto out;
2697 attr->qp_state = IB_QPS_RTR;
2698 ret = ib_modify_qp(qp, attr, IB_QP_STATE);
2699 if (ret) {
2700 printk(KERN_ERR PFX "Couldn't change QP%d state to "
2701 "RTR: %d\n", i, ret);
2702 goto out;
2705 attr->qp_state = IB_QPS_RTS;
2706 attr->sq_psn = IB_MAD_SEND_Q_PSN;
2707 ret = ib_modify_qp(qp, attr, IB_QP_STATE | IB_QP_SQ_PSN);
2708 if (ret) {
2709 printk(KERN_ERR PFX "Couldn't change QP%d state to "
2710 "RTS: %d\n", i, ret);
2711 goto out;
2715 ret = ib_req_notify_cq(port_priv->cq, IB_CQ_NEXT_COMP);
2716 if (ret) {
2717 printk(KERN_ERR PFX "Failed to request completion "
2718 "notification: %d\n", ret);
2719 goto out;
2722 for (i = 0; i < IB_MAD_QPS_CORE; i++) {
2723 if (!port_priv->qp_info[i].qp)
2724 continue;
2726 ret = ib_mad_post_receive_mads(&port_priv->qp_info[i], NULL);
2727 if (ret) {
2728 printk(KERN_ERR PFX "Couldn't post receive WRs\n");
2729 goto out;
2732 out:
2733 kfree(attr);
2734 return ret;
2737 static void qp_event_handler(struct ib_event *event, void *qp_context)
2739 struct ib_mad_qp_info *qp_info = qp_context;
2741 /* It's worse than that! He's dead, Jim! */
2742 printk(KERN_ERR PFX "Fatal error (%d) on MAD QP (%d)\n",
2743 event->event, qp_info->qp->qp_num);
2746 static void init_mad_queue(struct ib_mad_qp_info *qp_info,
2747 struct ib_mad_queue *mad_queue)
2749 mad_queue->qp_info = qp_info;
2750 mad_queue->count = 0;
2751 spin_lock_init(&mad_queue->lock);
2752 INIT_LIST_HEAD(&mad_queue->list);
2755 static void init_mad_qp(struct ib_mad_port_private *port_priv,
2756 struct ib_mad_qp_info *qp_info)
2758 qp_info->port_priv = port_priv;
2759 init_mad_queue(qp_info, &qp_info->send_queue);
2760 init_mad_queue(qp_info, &qp_info->recv_queue);
2761 INIT_LIST_HEAD(&qp_info->overflow_list);
2762 spin_lock_init(&qp_info->snoop_lock);
2763 qp_info->snoop_table = NULL;
2764 qp_info->snoop_table_size = 0;
2765 atomic_set(&qp_info->snoop_count, 0);
2768 static int create_mad_qp(struct ib_mad_qp_info *qp_info,
2769 enum ib_qp_type qp_type)
2771 struct ib_qp_init_attr qp_init_attr;
2772 int ret;
2774 memset(&qp_init_attr, 0, sizeof qp_init_attr);
2775 qp_init_attr.send_cq = qp_info->port_priv->cq;
2776 qp_init_attr.recv_cq = qp_info->port_priv->cq;
2777 qp_init_attr.sq_sig_type = IB_SIGNAL_ALL_WR;
2778 qp_init_attr.cap.max_send_wr = mad_sendq_size;
2779 qp_init_attr.cap.max_recv_wr = mad_recvq_size;
2780 qp_init_attr.cap.max_send_sge = IB_MAD_SEND_REQ_MAX_SG;
2781 qp_init_attr.cap.max_recv_sge = IB_MAD_RECV_REQ_MAX_SG;
2782 qp_init_attr.qp_type = qp_type;
2783 qp_init_attr.port_num = qp_info->port_priv->port_num;
2784 qp_init_attr.qp_context = qp_info;
2785 qp_init_attr.event_handler = qp_event_handler;
2786 qp_info->qp = ib_create_qp(qp_info->port_priv->pd, &qp_init_attr);
2787 if (IS_ERR(qp_info->qp)) {
2788 printk(KERN_ERR PFX "Couldn't create ib_mad QP%d\n",
2789 get_spl_qp_index(qp_type));
2790 ret = PTR_ERR(qp_info->qp);
2791 goto error;
2793 /* Use minimum queue sizes unless the CQ is resized */
2794 qp_info->send_queue.max_active = mad_sendq_size;
2795 qp_info->recv_queue.max_active = mad_recvq_size;
2796 return 0;
2798 error:
2799 return ret;
2802 static void destroy_mad_qp(struct ib_mad_qp_info *qp_info)
2804 if (!qp_info->qp)
2805 return;
2807 ib_destroy_qp(qp_info->qp);
2808 kfree(qp_info->snoop_table);
2812 * Open the port
2813 * Create the QP, PD, MR, and CQ if needed
2815 static int ib_mad_port_open(struct ib_device *device,
2816 int port_num)
2818 int ret, cq_size;
2819 struct ib_mad_port_private *port_priv;
2820 unsigned long flags;
2821 char name[sizeof "ib_mad123"];
2822 int has_smi;
2824 /* Create new device info */
2825 port_priv = kzalloc(sizeof *port_priv, GFP_KERNEL);
2826 if (!port_priv) {
2827 printk(KERN_ERR PFX "No memory for ib_mad_port_private\n");
2828 return -ENOMEM;
2831 port_priv->device = device;
2832 port_priv->port_num = port_num;
2833 spin_lock_init(&port_priv->reg_lock);
2834 INIT_LIST_HEAD(&port_priv->agent_list);
2835 init_mad_qp(port_priv, &port_priv->qp_info[0]);
2836 init_mad_qp(port_priv, &port_priv->qp_info[1]);
2838 cq_size = mad_sendq_size + mad_recvq_size;
2839 has_smi = rdma_port_get_link_layer(device, port_num) == IB_LINK_LAYER_INFINIBAND;
2840 if (has_smi)
2841 cq_size *= 2;
2843 port_priv->cq = ib_create_cq(port_priv->device,
2844 ib_mad_thread_completion_handler,
2845 NULL, port_priv, cq_size, 0);
2846 if (IS_ERR(port_priv->cq)) {
2847 printk(KERN_ERR PFX "Couldn't create ib_mad CQ\n");
2848 ret = PTR_ERR(port_priv->cq);
2849 goto error3;
2852 port_priv->pd = ib_alloc_pd(device);
2853 if (IS_ERR(port_priv->pd)) {
2854 printk(KERN_ERR PFX "Couldn't create ib_mad PD\n");
2855 ret = PTR_ERR(port_priv->pd);
2856 goto error4;
2859 port_priv->mr = ib_get_dma_mr(port_priv->pd, IB_ACCESS_LOCAL_WRITE);
2860 if (IS_ERR(port_priv->mr)) {
2861 printk(KERN_ERR PFX "Couldn't get ib_mad DMA MR\n");
2862 ret = PTR_ERR(port_priv->mr);
2863 goto error5;
2866 if (has_smi) {
2867 ret = create_mad_qp(&port_priv->qp_info[0], IB_QPT_SMI);
2868 if (ret)
2869 goto error6;
2871 ret = create_mad_qp(&port_priv->qp_info[1], IB_QPT_GSI);
2872 if (ret)
2873 goto error7;
2875 snprintf(name, sizeof name, "ib_mad%d", port_num);
2876 port_priv->wq = create_singlethread_workqueue(name);
2877 if (!port_priv->wq) {
2878 ret = -ENOMEM;
2879 goto error8;
2881 INIT_WORK(&port_priv->work, ib_mad_completion_handler);
2883 spin_lock_irqsave(&ib_mad_port_list_lock, flags);
2884 list_add_tail(&port_priv->port_list, &ib_mad_port_list);
2885 spin_unlock_irqrestore(&ib_mad_port_list_lock, flags);
2887 ret = ib_mad_port_start(port_priv);
2888 if (ret) {
2889 printk(KERN_ERR PFX "Couldn't start port\n");
2890 goto error9;
2893 return 0;
2895 error9:
2896 spin_lock_irqsave(&ib_mad_port_list_lock, flags);
2897 list_del_init(&port_priv->port_list);
2898 spin_unlock_irqrestore(&ib_mad_port_list_lock, flags);
2900 destroy_workqueue(port_priv->wq);
2901 error8:
2902 destroy_mad_qp(&port_priv->qp_info[1]);
2903 error7:
2904 destroy_mad_qp(&port_priv->qp_info[0]);
2905 error6:
2906 ib_dereg_mr(port_priv->mr);
2907 error5:
2908 ib_dealloc_pd(port_priv->pd);
2909 error4:
2910 ib_destroy_cq(port_priv->cq);
2911 cleanup_recv_queue(&port_priv->qp_info[1]);
2912 cleanup_recv_queue(&port_priv->qp_info[0]);
2913 error3:
2914 kfree(port_priv);
2916 return ret;
2920 * Close the port
2921 * If there are no classes using the port, free the port
2922 * resources (CQ, MR, PD, QP) and remove the port's info structure
2924 static int ib_mad_port_close(struct ib_device *device, int port_num)
2926 struct ib_mad_port_private *port_priv;
2927 unsigned long flags;
2929 spin_lock_irqsave(&ib_mad_port_list_lock, flags);
2930 port_priv = __ib_get_mad_port(device, port_num);
2931 if (port_priv == NULL) {
2932 spin_unlock_irqrestore(&ib_mad_port_list_lock, flags);
2933 printk(KERN_ERR PFX "Port %d not found\n", port_num);
2934 return -ENODEV;
2936 list_del_init(&port_priv->port_list);
2937 spin_unlock_irqrestore(&ib_mad_port_list_lock, flags);
2939 destroy_workqueue(port_priv->wq);
2940 destroy_mad_qp(&port_priv->qp_info[1]);
2941 destroy_mad_qp(&port_priv->qp_info[0]);
2942 ib_dereg_mr(port_priv->mr);
2943 ib_dealloc_pd(port_priv->pd);
2944 ib_destroy_cq(port_priv->cq);
2945 cleanup_recv_queue(&port_priv->qp_info[1]);
2946 cleanup_recv_queue(&port_priv->qp_info[0]);
2947 /* XXX: Handle deallocation of MAD registration tables */
2949 kfree(port_priv);
2951 return 0;
2954 static void ib_mad_init_device(struct ib_device *device)
2956 int start, end, i;
2958 if (rdma_node_get_transport(device->node_type) != RDMA_TRANSPORT_IB)
2959 return;
2961 if (device->node_type == RDMA_NODE_IB_SWITCH) {
2962 start = 0;
2963 end = 0;
2964 } else {
2965 start = 1;
2966 end = device->phys_port_cnt;
2969 for (i = start; i <= end; i++) {
2970 if (ib_mad_port_open(device, i)) {
2971 printk(KERN_ERR PFX "Couldn't open %s port %d\n",
2972 device->name, i);
2973 goto error;
2975 if (ib_agent_port_open(device, i)) {
2976 printk(KERN_ERR PFX "Couldn't open %s port %d "
2977 "for agents\n",
2978 device->name, i);
2979 goto error_agent;
2982 return;
2984 error_agent:
2985 if (ib_mad_port_close(device, i))
2986 printk(KERN_ERR PFX "Couldn't close %s port %d\n",
2987 device->name, i);
2989 error:
2990 i--;
2992 while (i >= start) {
2993 if (ib_agent_port_close(device, i))
2994 printk(KERN_ERR PFX "Couldn't close %s port %d "
2995 "for agents\n",
2996 device->name, i);
2997 if (ib_mad_port_close(device, i))
2998 printk(KERN_ERR PFX "Couldn't close %s port %d\n",
2999 device->name, i);
3000 i--;
3004 static void ib_mad_remove_device(struct ib_device *device)
3006 int i, num_ports, cur_port;
3008 if (rdma_node_get_transport(device->node_type) != RDMA_TRANSPORT_IB)
3009 return;
3011 if (device->node_type == RDMA_NODE_IB_SWITCH) {
3012 num_ports = 1;
3013 cur_port = 0;
3014 } else {
3015 num_ports = device->phys_port_cnt;
3016 cur_port = 1;
3018 for (i = 0; i < num_ports; i++, cur_port++) {
3019 if (ib_agent_port_close(device, cur_port))
3020 printk(KERN_ERR PFX "Couldn't close %s port %d "
3021 "for agents\n",
3022 device->name, cur_port);
3023 if (ib_mad_port_close(device, cur_port))
3024 printk(KERN_ERR PFX "Couldn't close %s port %d\n",
3025 device->name, cur_port);
3029 static struct ib_client mad_client = {
3030 .name = "mad",
3031 .add = ib_mad_init_device,
3032 .remove = ib_mad_remove_device
3035 static int __init ib_mad_init_module(void)
3037 int ret;
3039 mad_recvq_size = min(mad_recvq_size, IB_MAD_QP_MAX_SIZE);
3040 mad_recvq_size = max(mad_recvq_size, IB_MAD_QP_MIN_SIZE);
3042 mad_sendq_size = min(mad_sendq_size, IB_MAD_QP_MAX_SIZE);
3043 mad_sendq_size = max(mad_sendq_size, IB_MAD_QP_MIN_SIZE);
3045 ib_mad_cache = kmem_cache_create("ib_mad",
3046 sizeof(struct ib_mad_private),
3048 SLAB_HWCACHE_ALIGN,
3049 NULL);
3050 if (!ib_mad_cache) {
3051 printk(KERN_ERR PFX "Couldn't create ib_mad cache\n");
3052 ret = -ENOMEM;
3053 goto error1;
3056 INIT_LIST_HEAD(&ib_mad_port_list);
3058 if (ib_register_client(&mad_client)) {
3059 printk(KERN_ERR PFX "Couldn't register ib_mad client\n");
3060 ret = -EINVAL;
3061 goto error2;
3064 return 0;
3066 error2:
3067 kmem_cache_destroy(ib_mad_cache);
3068 error1:
3069 return ret;
3072 static void __exit ib_mad_cleanup_module(void)
3074 ib_unregister_client(&mad_client);
3075 kmem_cache_destroy(ib_mad_cache);
3078 module_init(ib_mad_init_module);
3079 module_exit(ib_mad_cleanup_module);