projects / deliverable / linux.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Merge branch 'master' of git://git.kernel.org/pub/scm/linux/kernel/git/torvalds/linux-2.6
[deliverable/linux.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 struct kmem_cache *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
Linux kernel - Deliverables
This page took 0.092735 seconds and 5 git commands to generate.