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