Merge git://git.linux-nfs.org/pub/linux/nfs-2.6
[linux-2.6] / drivers / infiniband / core / sa_query.c
1 /*
2  * Copyright (c) 2004 Topspin Communications.  All rights reserved.
3  * Copyright (c) 2005 Voltaire, Inc.  All rights reserved.
4  * Copyright (c) 2006 Intel Corporation.  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: sa_query.c 2811 2005-07-06 18:11:43Z halr $
35  */
36
37 #include <linux/module.h>
38 #include <linux/init.h>
39 #include <linux/err.h>
40 #include <linux/random.h>
41 #include <linux/spinlock.h>
42 #include <linux/slab.h>
43 #include <linux/dma-mapping.h>
44 #include <linux/kref.h>
45 #include <linux/idr.h>
46 #include <linux/workqueue.h>
47
48 #include <rdma/ib_pack.h>
49 #include <rdma/ib_cache.h>
50 #include "sa.h"
51
52 MODULE_AUTHOR("Roland Dreier");
53 MODULE_DESCRIPTION("InfiniBand subnet administration query support");
54 MODULE_LICENSE("Dual BSD/GPL");
55
56 struct ib_sa_sm_ah {
57         struct ib_ah        *ah;
58         struct kref          ref;
59         u16                  pkey_index;
60         u8                   src_path_mask;
61 };
62
63 struct ib_sa_port {
64         struct ib_mad_agent *agent;
65         struct ib_sa_sm_ah  *sm_ah;
66         struct work_struct   update_task;
67         spinlock_t           ah_lock;
68         u8                   port_num;
69 };
70
71 struct ib_sa_device {
72         int                     start_port, end_port;
73         struct ib_event_handler event_handler;
74         struct ib_sa_port port[0];
75 };
76
77 struct ib_sa_query {
78         void (*callback)(struct ib_sa_query *, int, struct ib_sa_mad *);
79         void (*release)(struct ib_sa_query *);
80         struct ib_sa_client    *client;
81         struct ib_sa_port      *port;
82         struct ib_mad_send_buf *mad_buf;
83         struct ib_sa_sm_ah     *sm_ah;
84         int                     id;
85 };
86
87 struct ib_sa_service_query {
88         void (*callback)(int, struct ib_sa_service_rec *, void *);
89         void *context;
90         struct ib_sa_query sa_query;
91 };
92
93 struct ib_sa_path_query {
94         void (*callback)(int, struct ib_sa_path_rec *, void *);
95         void *context;
96         struct ib_sa_query sa_query;
97 };
98
99 struct ib_sa_mcmember_query {
100         void (*callback)(int, struct ib_sa_mcmember_rec *, void *);
101         void *context;
102         struct ib_sa_query sa_query;
103 };
104
105 static void ib_sa_add_one(struct ib_device *device);
106 static void ib_sa_remove_one(struct ib_device *device);
107
108 static struct ib_client sa_client = {
109         .name   = "sa",
110         .add    = ib_sa_add_one,
111         .remove = ib_sa_remove_one
112 };
113
114 static spinlock_t idr_lock;
115 static DEFINE_IDR(query_idr);
116
117 static spinlock_t tid_lock;
118 static u32 tid;
119
120 #define PATH_REC_FIELD(field) \
121         .struct_offset_bytes = offsetof(struct ib_sa_path_rec, field),          \
122         .struct_size_bytes   = sizeof ((struct ib_sa_path_rec *) 0)->field,     \
123         .field_name          = "sa_path_rec:" #field
124
125 static const struct ib_field path_rec_table[] = {
126         { RESERVED,
127           .offset_words = 0,
128           .offset_bits  = 0,
129           .size_bits    = 32 },
130         { RESERVED,
131           .offset_words = 1,
132           .offset_bits  = 0,
133           .size_bits    = 32 },
134         { PATH_REC_FIELD(dgid),
135           .offset_words = 2,
136           .offset_bits  = 0,
137           .size_bits    = 128 },
138         { PATH_REC_FIELD(sgid),
139           .offset_words = 6,
140           .offset_bits  = 0,
141           .size_bits    = 128 },
142         { PATH_REC_FIELD(dlid),
143           .offset_words = 10,
144           .offset_bits  = 0,
145           .size_bits    = 16 },
146         { PATH_REC_FIELD(slid),
147           .offset_words = 10,
148           .offset_bits  = 16,
149           .size_bits    = 16 },
150         { PATH_REC_FIELD(raw_traffic),
151           .offset_words = 11,
152           .offset_bits  = 0,
153           .size_bits    = 1 },
154         { RESERVED,
155           .offset_words = 11,
156           .offset_bits  = 1,
157           .size_bits    = 3 },
158         { PATH_REC_FIELD(flow_label),
159           .offset_words = 11,
160           .offset_bits  = 4,
161           .size_bits    = 20 },
162         { PATH_REC_FIELD(hop_limit),
163           .offset_words = 11,
164           .offset_bits  = 24,
165           .size_bits    = 8 },
166         { PATH_REC_FIELD(traffic_class),
167           .offset_words = 12,
168           .offset_bits  = 0,
169           .size_bits    = 8 },
170         { PATH_REC_FIELD(reversible),
171           .offset_words = 12,
172           .offset_bits  = 8,
173           .size_bits    = 1 },
174         { PATH_REC_FIELD(numb_path),
175           .offset_words = 12,
176           .offset_bits  = 9,
177           .size_bits    = 7 },
178         { PATH_REC_FIELD(pkey),
179           .offset_words = 12,
180           .offset_bits  = 16,
181           .size_bits    = 16 },
182         { RESERVED,
183           .offset_words = 13,
184           .offset_bits  = 0,
185           .size_bits    = 12 },
186         { PATH_REC_FIELD(sl),
187           .offset_words = 13,
188           .offset_bits  = 12,
189           .size_bits    = 4 },
190         { PATH_REC_FIELD(mtu_selector),
191           .offset_words = 13,
192           .offset_bits  = 16,
193           .size_bits    = 2 },
194         { PATH_REC_FIELD(mtu),
195           .offset_words = 13,
196           .offset_bits  = 18,
197           .size_bits    = 6 },
198         { PATH_REC_FIELD(rate_selector),
199           .offset_words = 13,
200           .offset_bits  = 24,
201           .size_bits    = 2 },
202         { PATH_REC_FIELD(rate),
203           .offset_words = 13,
204           .offset_bits  = 26,
205           .size_bits    = 6 },
206         { PATH_REC_FIELD(packet_life_time_selector),
207           .offset_words = 14,
208           .offset_bits  = 0,
209           .size_bits    = 2 },
210         { PATH_REC_FIELD(packet_life_time),
211           .offset_words = 14,
212           .offset_bits  = 2,
213           .size_bits    = 6 },
214         { PATH_REC_FIELD(preference),
215           .offset_words = 14,
216           .offset_bits  = 8,
217           .size_bits    = 8 },
218         { RESERVED,
219           .offset_words = 14,
220           .offset_bits  = 16,
221           .size_bits    = 48 },
222 };
223
224 #define MCMEMBER_REC_FIELD(field) \
225         .struct_offset_bytes = offsetof(struct ib_sa_mcmember_rec, field),      \
226         .struct_size_bytes   = sizeof ((struct ib_sa_mcmember_rec *) 0)->field, \
227         .field_name          = "sa_mcmember_rec:" #field
228
229 static const struct ib_field mcmember_rec_table[] = {
230         { MCMEMBER_REC_FIELD(mgid),
231           .offset_words = 0,
232           .offset_bits  = 0,
233           .size_bits    = 128 },
234         { MCMEMBER_REC_FIELD(port_gid),
235           .offset_words = 4,
236           .offset_bits  = 0,
237           .size_bits    = 128 },
238         { MCMEMBER_REC_FIELD(qkey),
239           .offset_words = 8,
240           .offset_bits  = 0,
241           .size_bits    = 32 },
242         { MCMEMBER_REC_FIELD(mlid),
243           .offset_words = 9,
244           .offset_bits  = 0,
245           .size_bits    = 16 },
246         { MCMEMBER_REC_FIELD(mtu_selector),
247           .offset_words = 9,
248           .offset_bits  = 16,
249           .size_bits    = 2 },
250         { MCMEMBER_REC_FIELD(mtu),
251           .offset_words = 9,
252           .offset_bits  = 18,
253           .size_bits    = 6 },
254         { MCMEMBER_REC_FIELD(traffic_class),
255           .offset_words = 9,
256           .offset_bits  = 24,
257           .size_bits    = 8 },
258         { MCMEMBER_REC_FIELD(pkey),
259           .offset_words = 10,
260           .offset_bits  = 0,
261           .size_bits    = 16 },
262         { MCMEMBER_REC_FIELD(rate_selector),
263           .offset_words = 10,
264           .offset_bits  = 16,
265           .size_bits    = 2 },
266         { MCMEMBER_REC_FIELD(rate),
267           .offset_words = 10,
268           .offset_bits  = 18,
269           .size_bits    = 6 },
270         { MCMEMBER_REC_FIELD(packet_life_time_selector),
271           .offset_words = 10,
272           .offset_bits  = 24,
273           .size_bits    = 2 },
274         { MCMEMBER_REC_FIELD(packet_life_time),
275           .offset_words = 10,
276           .offset_bits  = 26,
277           .size_bits    = 6 },
278         { MCMEMBER_REC_FIELD(sl),
279           .offset_words = 11,
280           .offset_bits  = 0,
281           .size_bits    = 4 },
282         { MCMEMBER_REC_FIELD(flow_label),
283           .offset_words = 11,
284           .offset_bits  = 4,
285           .size_bits    = 20 },
286         { MCMEMBER_REC_FIELD(hop_limit),
287           .offset_words = 11,
288           .offset_bits  = 24,
289           .size_bits    = 8 },
290         { MCMEMBER_REC_FIELD(scope),
291           .offset_words = 12,
292           .offset_bits  = 0,
293           .size_bits    = 4 },
294         { MCMEMBER_REC_FIELD(join_state),
295           .offset_words = 12,
296           .offset_bits  = 4,
297           .size_bits    = 4 },
298         { MCMEMBER_REC_FIELD(proxy_join),
299           .offset_words = 12,
300           .offset_bits  = 8,
301           .size_bits    = 1 },
302         { RESERVED,
303           .offset_words = 12,
304           .offset_bits  = 9,
305           .size_bits    = 23 },
306 };
307
308 #define SERVICE_REC_FIELD(field) \
309         .struct_offset_bytes = offsetof(struct ib_sa_service_rec, field),       \
310         .struct_size_bytes   = sizeof ((struct ib_sa_service_rec *) 0)->field,  \
311         .field_name          = "sa_service_rec:" #field
312
313 static const struct ib_field service_rec_table[] = {
314         { SERVICE_REC_FIELD(id),
315           .offset_words = 0,
316           .offset_bits  = 0,
317           .size_bits    = 64 },
318         { SERVICE_REC_FIELD(gid),
319           .offset_words = 2,
320           .offset_bits  = 0,
321           .size_bits    = 128 },
322         { SERVICE_REC_FIELD(pkey),
323           .offset_words = 6,
324           .offset_bits  = 0,
325           .size_bits    = 16 },
326         { SERVICE_REC_FIELD(lease),
327           .offset_words = 7,
328           .offset_bits  = 0,
329           .size_bits    = 32 },
330         { SERVICE_REC_FIELD(key),
331           .offset_words = 8,
332           .offset_bits  = 0,
333           .size_bits    = 128 },
334         { SERVICE_REC_FIELD(name),
335           .offset_words = 12,
336           .offset_bits  = 0,
337           .size_bits    = 64*8 },
338         { SERVICE_REC_FIELD(data8),
339           .offset_words = 28,
340           .offset_bits  = 0,
341           .size_bits    = 16*8 },
342         { SERVICE_REC_FIELD(data16),
343           .offset_words = 32,
344           .offset_bits  = 0,
345           .size_bits    = 8*16 },
346         { SERVICE_REC_FIELD(data32),
347           .offset_words = 36,
348           .offset_bits  = 0,
349           .size_bits    = 4*32 },
350         { SERVICE_REC_FIELD(data64),
351           .offset_words = 40,
352           .offset_bits  = 0,
353           .size_bits    = 2*64 },
354 };
355
356 static void free_sm_ah(struct kref *kref)
357 {
358         struct ib_sa_sm_ah *sm_ah = container_of(kref, struct ib_sa_sm_ah, ref);
359
360         ib_destroy_ah(sm_ah->ah);
361         kfree(sm_ah);
362 }
363
364 static void update_sm_ah(struct work_struct *work)
365 {
366         struct ib_sa_port *port =
367                 container_of(work, struct ib_sa_port, update_task);
368         struct ib_sa_sm_ah *new_ah, *old_ah;
369         struct ib_port_attr port_attr;
370         struct ib_ah_attr   ah_attr;
371
372         if (ib_query_port(port->agent->device, port->port_num, &port_attr)) {
373                 printk(KERN_WARNING "Couldn't query port\n");
374                 return;
375         }
376
377         new_ah = kmalloc(sizeof *new_ah, GFP_KERNEL);
378         if (!new_ah) {
379                 printk(KERN_WARNING "Couldn't allocate new SM AH\n");
380                 return;
381         }
382
383         kref_init(&new_ah->ref);
384         new_ah->src_path_mask = (1 << port_attr.lmc) - 1;
385
386         new_ah->pkey_index = 0;
387         if (ib_find_pkey(port->agent->device, port->port_num,
388                          IB_DEFAULT_PKEY_FULL, &new_ah->pkey_index) &&
389             ib_find_pkey(port->agent->device, port->port_num,
390                          IB_DEFAULT_PKEY_PARTIAL, &new_ah->pkey_index))
391                 printk(KERN_ERR "Couldn't find index for default PKey\n");
392
393         memset(&ah_attr, 0, sizeof ah_attr);
394         ah_attr.dlid     = port_attr.sm_lid;
395         ah_attr.sl       = port_attr.sm_sl;
396         ah_attr.port_num = port->port_num;
397
398         new_ah->ah = ib_create_ah(port->agent->qp->pd, &ah_attr);
399         if (IS_ERR(new_ah->ah)) {
400                 printk(KERN_WARNING "Couldn't create new SM AH\n");
401                 kfree(new_ah);
402                 return;
403         }
404
405         spin_lock_irq(&port->ah_lock);
406         old_ah = port->sm_ah;
407         port->sm_ah = new_ah;
408         spin_unlock_irq(&port->ah_lock);
409
410         if (old_ah)
411                 kref_put(&old_ah->ref, free_sm_ah);
412 }
413
414 static void ib_sa_event(struct ib_event_handler *handler, struct ib_event *event)
415 {
416         if (event->event == IB_EVENT_PORT_ERR    ||
417             event->event == IB_EVENT_PORT_ACTIVE ||
418             event->event == IB_EVENT_LID_CHANGE  ||
419             event->event == IB_EVENT_PKEY_CHANGE ||
420             event->event == IB_EVENT_SM_CHANGE   ||
421             event->event == IB_EVENT_CLIENT_REREGISTER) {
422                 struct ib_sa_device *sa_dev;
423                 sa_dev = container_of(handler, typeof(*sa_dev), event_handler);
424
425                 schedule_work(&sa_dev->port[event->element.port_num -
426                                             sa_dev->start_port].update_task);
427         }
428 }
429
430 void ib_sa_register_client(struct ib_sa_client *client)
431 {
432         atomic_set(&client->users, 1);
433         init_completion(&client->comp);
434 }
435 EXPORT_SYMBOL(ib_sa_register_client);
436
437 void ib_sa_unregister_client(struct ib_sa_client *client)
438 {
439         ib_sa_client_put(client);
440         wait_for_completion(&client->comp);
441 }
442 EXPORT_SYMBOL(ib_sa_unregister_client);
443
444 /**
445  * ib_sa_cancel_query - try to cancel an SA query
446  * @id:ID of query to cancel
447  * @query:query pointer to cancel
448  *
449  * Try to cancel an SA query.  If the id and query don't match up or
450  * the query has already completed, nothing is done.  Otherwise the
451  * query is canceled and will complete with a status of -EINTR.
452  */
453 void ib_sa_cancel_query(int id, struct ib_sa_query *query)
454 {
455         unsigned long flags;
456         struct ib_mad_agent *agent;
457         struct ib_mad_send_buf *mad_buf;
458
459         spin_lock_irqsave(&idr_lock, flags);
460         if (idr_find(&query_idr, id) != query) {
461                 spin_unlock_irqrestore(&idr_lock, flags);
462                 return;
463         }
464         agent = query->port->agent;
465         mad_buf = query->mad_buf;
466         spin_unlock_irqrestore(&idr_lock, flags);
467
468         ib_cancel_mad(agent, mad_buf);
469 }
470 EXPORT_SYMBOL(ib_sa_cancel_query);
471
472 static u8 get_src_path_mask(struct ib_device *device, u8 port_num)
473 {
474         struct ib_sa_device *sa_dev;
475         struct ib_sa_port   *port;
476         unsigned long flags;
477         u8 src_path_mask;
478
479         sa_dev = ib_get_client_data(device, &sa_client);
480         if (!sa_dev)
481                 return 0x7f;
482
483         port  = &sa_dev->port[port_num - sa_dev->start_port];
484         spin_lock_irqsave(&port->ah_lock, flags);
485         src_path_mask = port->sm_ah ? port->sm_ah->src_path_mask : 0x7f;
486         spin_unlock_irqrestore(&port->ah_lock, flags);
487
488         return src_path_mask;
489 }
490
491 int ib_init_ah_from_path(struct ib_device *device, u8 port_num,
492                          struct ib_sa_path_rec *rec, struct ib_ah_attr *ah_attr)
493 {
494         int ret;
495         u16 gid_index;
496
497         memset(ah_attr, 0, sizeof *ah_attr);
498         ah_attr->dlid = be16_to_cpu(rec->dlid);
499         ah_attr->sl = rec->sl;
500         ah_attr->src_path_bits = be16_to_cpu(rec->slid) &
501                                  get_src_path_mask(device, port_num);
502         ah_attr->port_num = port_num;
503         ah_attr->static_rate = rec->rate;
504
505         if (rec->hop_limit > 1) {
506                 ah_attr->ah_flags = IB_AH_GRH;
507                 ah_attr->grh.dgid = rec->dgid;
508
509                 ret = ib_find_cached_gid(device, &rec->sgid, &port_num,
510                                          &gid_index);
511                 if (ret)
512                         return ret;
513
514                 ah_attr->grh.sgid_index    = gid_index;
515                 ah_attr->grh.flow_label    = be32_to_cpu(rec->flow_label);
516                 ah_attr->grh.hop_limit     = rec->hop_limit;
517                 ah_attr->grh.traffic_class = rec->traffic_class;
518         }
519         return 0;
520 }
521 EXPORT_SYMBOL(ib_init_ah_from_path);
522
523 static int alloc_mad(struct ib_sa_query *query, gfp_t gfp_mask)
524 {
525         unsigned long flags;
526
527         spin_lock_irqsave(&query->port->ah_lock, flags);
528         kref_get(&query->port->sm_ah->ref);
529         query->sm_ah = query->port->sm_ah;
530         spin_unlock_irqrestore(&query->port->ah_lock, flags);
531
532         query->mad_buf = ib_create_send_mad(query->port->agent, 1,
533                                             query->sm_ah->pkey_index,
534                                             0, IB_MGMT_SA_HDR, IB_MGMT_SA_DATA,
535                                             gfp_mask);
536         if (!query->mad_buf) {
537                 kref_put(&query->sm_ah->ref, free_sm_ah);
538                 return -ENOMEM;
539         }
540
541         query->mad_buf->ah = query->sm_ah->ah;
542
543         return 0;
544 }
545
546 static void free_mad(struct ib_sa_query *query)
547 {
548         ib_free_send_mad(query->mad_buf);
549         kref_put(&query->sm_ah->ref, free_sm_ah);
550 }
551
552 static void init_mad(struct ib_sa_mad *mad, struct ib_mad_agent *agent)
553 {
554         unsigned long flags;
555
556         memset(mad, 0, sizeof *mad);
557
558         mad->mad_hdr.base_version  = IB_MGMT_BASE_VERSION;
559         mad->mad_hdr.mgmt_class    = IB_MGMT_CLASS_SUBN_ADM;
560         mad->mad_hdr.class_version = IB_SA_CLASS_VERSION;
561
562         spin_lock_irqsave(&tid_lock, flags);
563         mad->mad_hdr.tid           =
564                 cpu_to_be64(((u64) agent->hi_tid) << 32 | tid++);
565         spin_unlock_irqrestore(&tid_lock, flags);
566 }
567
568 static int send_mad(struct ib_sa_query *query, int timeout_ms, gfp_t gfp_mask)
569 {
570         unsigned long flags;
571         int ret, id;
572
573 retry:
574         if (!idr_pre_get(&query_idr, gfp_mask))
575                 return -ENOMEM;
576         spin_lock_irqsave(&idr_lock, flags);
577         ret = idr_get_new(&query_idr, query, &id);
578         spin_unlock_irqrestore(&idr_lock, flags);
579         if (ret == -EAGAIN)
580                 goto retry;
581         if (ret)
582                 return ret;
583
584         query->mad_buf->timeout_ms  = timeout_ms;
585         query->mad_buf->context[0] = query;
586         query->id = id;
587
588         ret = ib_post_send_mad(query->mad_buf, NULL);
589         if (ret) {
590                 spin_lock_irqsave(&idr_lock, flags);
591                 idr_remove(&query_idr, id);
592                 spin_unlock_irqrestore(&idr_lock, flags);
593         }
594
595         /*
596          * It's not safe to dereference query any more, because the
597          * send may already have completed and freed the query in
598          * another context.
599          */
600         return ret ? ret : id;
601 }
602
603 static void ib_sa_path_rec_callback(struct ib_sa_query *sa_query,
604                                     int status,
605                                     struct ib_sa_mad *mad)
606 {
607         struct ib_sa_path_query *query =
608                 container_of(sa_query, struct ib_sa_path_query, sa_query);
609
610         if (mad) {
611                 struct ib_sa_path_rec rec;
612
613                 ib_unpack(path_rec_table, ARRAY_SIZE(path_rec_table),
614                           mad->data, &rec);
615                 query->callback(status, &rec, query->context);
616         } else
617                 query->callback(status, NULL, query->context);
618 }
619
620 static void ib_sa_path_rec_release(struct ib_sa_query *sa_query)
621 {
622         kfree(container_of(sa_query, struct ib_sa_path_query, sa_query));
623 }
624
625 /**
626  * ib_sa_path_rec_get - Start a Path get query
627  * @client:SA client
628  * @device:device to send query on
629  * @port_num: port number to send query on
630  * @rec:Path Record to send in query
631  * @comp_mask:component mask to send in query
632  * @timeout_ms:time to wait for response
633  * @gfp_mask:GFP mask to use for internal allocations
634  * @callback:function called when query completes, times out or is
635  * canceled
636  * @context:opaque user context passed to callback
637  * @sa_query:query context, used to cancel query
638  *
639  * Send a Path Record Get query to the SA to look up a path.  The
640  * callback function will be called when the query completes (or
641  * fails); status is 0 for a successful response, -EINTR if the query
642  * is canceled, -ETIMEDOUT is the query timed out, or -EIO if an error
643  * occurred sending the query.  The resp parameter of the callback is
644  * only valid if status is 0.
645  *
646  * If the return value of ib_sa_path_rec_get() is negative, it is an
647  * error code.  Otherwise it is a query ID that can be used to cancel
648  * the query.
649  */
650 int ib_sa_path_rec_get(struct ib_sa_client *client,
651                        struct ib_device *device, u8 port_num,
652                        struct ib_sa_path_rec *rec,
653                        ib_sa_comp_mask comp_mask,
654                        int timeout_ms, gfp_t gfp_mask,
655                        void (*callback)(int status,
656                                         struct ib_sa_path_rec *resp,
657                                         void *context),
658                        void *context,
659                        struct ib_sa_query **sa_query)
660 {
661         struct ib_sa_path_query *query;
662         struct ib_sa_device *sa_dev = ib_get_client_data(device, &sa_client);
663         struct ib_sa_port   *port;
664         struct ib_mad_agent *agent;
665         struct ib_sa_mad *mad;
666         int ret;
667
668         if (!sa_dev)
669                 return -ENODEV;
670
671         port  = &sa_dev->port[port_num - sa_dev->start_port];
672         agent = port->agent;
673
674         query = kmalloc(sizeof *query, gfp_mask);
675         if (!query)
676                 return -ENOMEM;
677
678         query->sa_query.port     = port;
679         ret = alloc_mad(&query->sa_query, gfp_mask);
680         if (ret)
681                 goto err1;
682
683         ib_sa_client_get(client);
684         query->sa_query.client = client;
685         query->callback        = callback;
686         query->context         = context;
687
688         mad = query->sa_query.mad_buf->mad;
689         init_mad(mad, agent);
690
691         query->sa_query.callback = callback ? ib_sa_path_rec_callback : NULL;
692         query->sa_query.release  = ib_sa_path_rec_release;
693         mad->mad_hdr.method      = IB_MGMT_METHOD_GET;
694         mad->mad_hdr.attr_id     = cpu_to_be16(IB_SA_ATTR_PATH_REC);
695         mad->sa_hdr.comp_mask    = comp_mask;
696
697         ib_pack(path_rec_table, ARRAY_SIZE(path_rec_table), rec, mad->data);
698
699         *sa_query = &query->sa_query;
700
701         ret = send_mad(&query->sa_query, timeout_ms, gfp_mask);
702         if (ret < 0)
703                 goto err2;
704
705         return ret;
706
707 err2:
708         *sa_query = NULL;
709         ib_sa_client_put(query->sa_query.client);
710         free_mad(&query->sa_query);
711
712 err1:
713         kfree(query);
714         return ret;
715 }
716 EXPORT_SYMBOL(ib_sa_path_rec_get);
717
718 static void ib_sa_service_rec_callback(struct ib_sa_query *sa_query,
719                                     int status,
720                                     struct ib_sa_mad *mad)
721 {
722         struct ib_sa_service_query *query =
723                 container_of(sa_query, struct ib_sa_service_query, sa_query);
724
725         if (mad) {
726                 struct ib_sa_service_rec rec;
727
728                 ib_unpack(service_rec_table, ARRAY_SIZE(service_rec_table),
729                           mad->data, &rec);
730                 query->callback(status, &rec, query->context);
731         } else
732                 query->callback(status, NULL, query->context);
733 }
734
735 static void ib_sa_service_rec_release(struct ib_sa_query *sa_query)
736 {
737         kfree(container_of(sa_query, struct ib_sa_service_query, sa_query));
738 }
739
740 /**
741  * ib_sa_service_rec_query - Start Service Record operation
742  * @client:SA client
743  * @device:device to send request on
744  * @port_num: port number to send request on
745  * @method:SA method - should be get, set, or delete
746  * @rec:Service Record to send in request
747  * @comp_mask:component mask to send in request
748  * @timeout_ms:time to wait for response
749  * @gfp_mask:GFP mask to use for internal allocations
750  * @callback:function called when request completes, times out or is
751  * canceled
752  * @context:opaque user context passed to callback
753  * @sa_query:request context, used to cancel request
754  *
755  * Send a Service Record set/get/delete to the SA to register,
756  * unregister or query a service record.
757  * The callback function will be called when the request completes (or
758  * fails); status is 0 for a successful response, -EINTR if the query
759  * is canceled, -ETIMEDOUT is the query timed out, or -EIO if an error
760  * occurred sending the query.  The resp parameter of the callback is
761  * only valid if status is 0.
762  *
763  * If the return value of ib_sa_service_rec_query() is negative, it is an
764  * error code.  Otherwise it is a request ID that can be used to cancel
765  * the query.
766  */
767 int ib_sa_service_rec_query(struct ib_sa_client *client,
768                             struct ib_device *device, u8 port_num, u8 method,
769                             struct ib_sa_service_rec *rec,
770                             ib_sa_comp_mask comp_mask,
771                             int timeout_ms, gfp_t gfp_mask,
772                             void (*callback)(int status,
773                                              struct ib_sa_service_rec *resp,
774                                              void *context),
775                             void *context,
776                             struct ib_sa_query **sa_query)
777 {
778         struct ib_sa_service_query *query;
779         struct ib_sa_device *sa_dev = ib_get_client_data(device, &sa_client);
780         struct ib_sa_port   *port;
781         struct ib_mad_agent *agent;
782         struct ib_sa_mad *mad;
783         int ret;
784
785         if (!sa_dev)
786                 return -ENODEV;
787
788         port  = &sa_dev->port[port_num - sa_dev->start_port];
789         agent = port->agent;
790
791         if (method != IB_MGMT_METHOD_GET &&
792             method != IB_MGMT_METHOD_SET &&
793             method != IB_SA_METHOD_DELETE)
794                 return -EINVAL;
795
796         query = kmalloc(sizeof *query, gfp_mask);
797         if (!query)
798                 return -ENOMEM;
799
800         query->sa_query.port     = port;
801         ret = alloc_mad(&query->sa_query, gfp_mask);
802         if (ret)
803                 goto err1;
804
805         ib_sa_client_get(client);
806         query->sa_query.client = client;
807         query->callback        = callback;
808         query->context         = context;
809
810         mad = query->sa_query.mad_buf->mad;
811         init_mad(mad, agent);
812
813         query->sa_query.callback = callback ? ib_sa_service_rec_callback : NULL;
814         query->sa_query.release  = ib_sa_service_rec_release;
815         mad->mad_hdr.method      = method;
816         mad->mad_hdr.attr_id     = cpu_to_be16(IB_SA_ATTR_SERVICE_REC);
817         mad->sa_hdr.comp_mask    = comp_mask;
818
819         ib_pack(service_rec_table, ARRAY_SIZE(service_rec_table),
820                 rec, mad->data);
821
822         *sa_query = &query->sa_query;
823
824         ret = send_mad(&query->sa_query, timeout_ms, gfp_mask);
825         if (ret < 0)
826                 goto err2;
827
828         return ret;
829
830 err2:
831         *sa_query = NULL;
832         ib_sa_client_put(query->sa_query.client);
833         free_mad(&query->sa_query);
834
835 err1:
836         kfree(query);
837         return ret;
838 }
839 EXPORT_SYMBOL(ib_sa_service_rec_query);
840
841 static void ib_sa_mcmember_rec_callback(struct ib_sa_query *sa_query,
842                                         int status,
843                                         struct ib_sa_mad *mad)
844 {
845         struct ib_sa_mcmember_query *query =
846                 container_of(sa_query, struct ib_sa_mcmember_query, sa_query);
847
848         if (mad) {
849                 struct ib_sa_mcmember_rec rec;
850
851                 ib_unpack(mcmember_rec_table, ARRAY_SIZE(mcmember_rec_table),
852                           mad->data, &rec);
853                 query->callback(status, &rec, query->context);
854         } else
855                 query->callback(status, NULL, query->context);
856 }
857
858 static void ib_sa_mcmember_rec_release(struct ib_sa_query *sa_query)
859 {
860         kfree(container_of(sa_query, struct ib_sa_mcmember_query, sa_query));
861 }
862
863 int ib_sa_mcmember_rec_query(struct ib_sa_client *client,
864                              struct ib_device *device, u8 port_num,
865                              u8 method,
866                              struct ib_sa_mcmember_rec *rec,
867                              ib_sa_comp_mask comp_mask,
868                              int timeout_ms, gfp_t gfp_mask,
869                              void (*callback)(int status,
870                                               struct ib_sa_mcmember_rec *resp,
871                                               void *context),
872                              void *context,
873                              struct ib_sa_query **sa_query)
874 {
875         struct ib_sa_mcmember_query *query;
876         struct ib_sa_device *sa_dev = ib_get_client_data(device, &sa_client);
877         struct ib_sa_port   *port;
878         struct ib_mad_agent *agent;
879         struct ib_sa_mad *mad;
880         int ret;
881
882         if (!sa_dev)
883                 return -ENODEV;
884
885         port  = &sa_dev->port[port_num - sa_dev->start_port];
886         agent = port->agent;
887
888         query = kmalloc(sizeof *query, gfp_mask);
889         if (!query)
890                 return -ENOMEM;
891
892         query->sa_query.port     = port;
893         ret = alloc_mad(&query->sa_query, gfp_mask);
894         if (ret)
895                 goto err1;
896
897         ib_sa_client_get(client);
898         query->sa_query.client = client;
899         query->callback        = callback;
900         query->context         = context;
901
902         mad = query->sa_query.mad_buf->mad;
903         init_mad(mad, agent);
904
905         query->sa_query.callback = callback ? ib_sa_mcmember_rec_callback : NULL;
906         query->sa_query.release  = ib_sa_mcmember_rec_release;
907         mad->mad_hdr.method      = method;
908         mad->mad_hdr.attr_id     = cpu_to_be16(IB_SA_ATTR_MC_MEMBER_REC);
909         mad->sa_hdr.comp_mask    = comp_mask;
910
911         ib_pack(mcmember_rec_table, ARRAY_SIZE(mcmember_rec_table),
912                 rec, mad->data);
913
914         *sa_query = &query->sa_query;
915
916         ret = send_mad(&query->sa_query, timeout_ms, gfp_mask);
917         if (ret < 0)
918                 goto err2;
919
920         return ret;
921
922 err2:
923         *sa_query = NULL;
924         ib_sa_client_put(query->sa_query.client);
925         free_mad(&query->sa_query);
926
927 err1:
928         kfree(query);
929         return ret;
930 }
931
932 static void send_handler(struct ib_mad_agent *agent,
933                          struct ib_mad_send_wc *mad_send_wc)
934 {
935         struct ib_sa_query *query = mad_send_wc->send_buf->context[0];
936         unsigned long flags;
937
938         if (query->callback)
939                 switch (mad_send_wc->status) {
940                 case IB_WC_SUCCESS:
941                         /* No callback -- already got recv */
942                         break;
943                 case IB_WC_RESP_TIMEOUT_ERR:
944                         query->callback(query, -ETIMEDOUT, NULL);
945                         break;
946                 case IB_WC_WR_FLUSH_ERR:
947                         query->callback(query, -EINTR, NULL);
948                         break;
949                 default:
950                         query->callback(query, -EIO, NULL);
951                         break;
952                 }
953
954         spin_lock_irqsave(&idr_lock, flags);
955         idr_remove(&query_idr, query->id);
956         spin_unlock_irqrestore(&idr_lock, flags);
957
958         free_mad(query);
959         ib_sa_client_put(query->client);
960         query->release(query);
961 }
962
963 static void recv_handler(struct ib_mad_agent *mad_agent,
964                          struct ib_mad_recv_wc *mad_recv_wc)
965 {
966         struct ib_sa_query *query;
967         struct ib_mad_send_buf *mad_buf;
968
969         mad_buf = (void *) (unsigned long) mad_recv_wc->wc->wr_id;
970         query = mad_buf->context[0];
971
972         if (query->callback) {
973                 if (mad_recv_wc->wc->status == IB_WC_SUCCESS)
974                         query->callback(query,
975                                         mad_recv_wc->recv_buf.mad->mad_hdr.status ?
976                                         -EINVAL : 0,
977                                         (struct ib_sa_mad *) mad_recv_wc->recv_buf.mad);
978                 else
979                         query->callback(query, -EIO, NULL);
980         }
981
982         ib_free_recv_mad(mad_recv_wc);
983 }
984
985 static void ib_sa_add_one(struct ib_device *device)
986 {
987         struct ib_sa_device *sa_dev;
988         int s, e, i;
989
990         if (rdma_node_get_transport(device->node_type) != RDMA_TRANSPORT_IB)
991                 return;
992
993         if (device->node_type == RDMA_NODE_IB_SWITCH)
994                 s = e = 0;
995         else {
996                 s = 1;
997                 e = device->phys_port_cnt;
998         }
999
1000         sa_dev = kmalloc(sizeof *sa_dev +
1001                          (e - s + 1) * sizeof (struct ib_sa_port),
1002                          GFP_KERNEL);
1003         if (!sa_dev)
1004                 return;
1005
1006         sa_dev->start_port = s;
1007         sa_dev->end_port   = e;
1008
1009         for (i = 0; i <= e - s; ++i) {
1010                 sa_dev->port[i].sm_ah    = NULL;
1011                 sa_dev->port[i].port_num = i + s;
1012                 spin_lock_init(&sa_dev->port[i].ah_lock);
1013
1014                 sa_dev->port[i].agent =
1015                         ib_register_mad_agent(device, i + s, IB_QPT_GSI,
1016                                               NULL, 0, send_handler,
1017                                               recv_handler, sa_dev);
1018                 if (IS_ERR(sa_dev->port[i].agent))
1019                         goto err;
1020
1021                 INIT_WORK(&sa_dev->port[i].update_task, update_sm_ah);
1022         }
1023
1024         ib_set_client_data(device, &sa_client, sa_dev);
1025
1026         /*
1027          * We register our event handler after everything is set up,
1028          * and then update our cached info after the event handler is
1029          * registered to avoid any problems if a port changes state
1030          * during our initialization.
1031          */
1032
1033         INIT_IB_EVENT_HANDLER(&sa_dev->event_handler, device, ib_sa_event);
1034         if (ib_register_event_handler(&sa_dev->event_handler))
1035                 goto err;
1036
1037         for (i = 0; i <= e - s; ++i)
1038                 update_sm_ah(&sa_dev->port[i].update_task);
1039
1040         return;
1041
1042 err:
1043         while (--i >= 0)
1044                 ib_unregister_mad_agent(sa_dev->port[i].agent);
1045
1046         kfree(sa_dev);
1047
1048         return;
1049 }
1050
1051 static void ib_sa_remove_one(struct ib_device *device)
1052 {
1053         struct ib_sa_device *sa_dev = ib_get_client_data(device, &sa_client);
1054         int i;
1055
1056         if (!sa_dev)
1057                 return;
1058
1059         ib_unregister_event_handler(&sa_dev->event_handler);
1060
1061         flush_scheduled_work();
1062
1063         for (i = 0; i <= sa_dev->end_port - sa_dev->start_port; ++i) {
1064                 ib_unregister_mad_agent(sa_dev->port[i].agent);
1065                 kref_put(&sa_dev->port[i].sm_ah->ref, free_sm_ah);
1066         }
1067
1068         kfree(sa_dev);
1069 }
1070
1071 static int __init ib_sa_init(void)
1072 {
1073         int ret;
1074
1075         spin_lock_init(&idr_lock);
1076         spin_lock_init(&tid_lock);
1077
1078         get_random_bytes(&tid, sizeof tid);
1079
1080         ret = ib_register_client(&sa_client);
1081         if (ret) {
1082                 printk(KERN_ERR "Couldn't register ib_sa client\n");
1083                 goto err1;
1084         }
1085
1086         ret = mcast_init();
1087         if (ret) {
1088                 printk(KERN_ERR "Couldn't initialize multicast handling\n");
1089                 goto err2;
1090         }
1091
1092         return 0;
1093 err2:
1094         ib_unregister_client(&sa_client);
1095 err1:
1096         return ret;
1097 }
1098
1099 static void __exit ib_sa_cleanup(void)
1100 {
1101         mcast_cleanup();
1102         ib_unregister_client(&sa_client);
1103         idr_destroy(&query_idr);
1104 }
1105
1106 module_init(ib_sa_init);
1107 module_exit(ib_sa_cleanup);