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