WorkStruct: make allyesconfig
[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(struct work_struct *work)
364 {
365         struct ib_sa_port *port =
366                 container_of(work, struct ib_sa_port, update_task);
367         struct ib_sa_sm_ah *new_ah, *old_ah;
368         struct ib_port_attr port_attr;
369         struct ib_ah_attr   ah_attr;
370
371         if (ib_query_port(port->agent->device, port->port_num, &port_attr)) {
372                 printk(KERN_WARNING "Couldn't query port\n");
373                 return;
374         }
375
376         new_ah = kmalloc(sizeof *new_ah, GFP_KERNEL);
377         if (!new_ah) {
378                 printk(KERN_WARNING "Couldn't allocate new SM AH\n");
379                 return;
380         }
381
382         kref_init(&new_ah->ref);
383
384         memset(&ah_attr, 0, sizeof ah_attr);
385         ah_attr.dlid     = port_attr.sm_lid;
386         ah_attr.sl       = port_attr.sm_sl;
387         ah_attr.port_num = port->port_num;
388
389         new_ah->ah = ib_create_ah(port->agent->qp->pd, &ah_attr);
390         if (IS_ERR(new_ah->ah)) {
391                 printk(KERN_WARNING "Couldn't create new SM AH\n");
392                 kfree(new_ah);
393                 return;
394         }
395
396         spin_lock_irq(&port->ah_lock);
397         old_ah = port->sm_ah;
398         port->sm_ah = new_ah;
399         spin_unlock_irq(&port->ah_lock);
400
401         if (old_ah)
402                 kref_put(&old_ah->ref, free_sm_ah);
403 }
404
405 static void ib_sa_event(struct ib_event_handler *handler, struct ib_event *event)
406 {
407         if (event->event == IB_EVENT_PORT_ERR    ||
408             event->event == IB_EVENT_PORT_ACTIVE ||
409             event->event == IB_EVENT_LID_CHANGE  ||
410             event->event == IB_EVENT_PKEY_CHANGE ||
411             event->event == IB_EVENT_SM_CHANGE   ||
412             event->event == IB_EVENT_CLIENT_REREGISTER) {
413                 struct ib_sa_device *sa_dev;
414                 sa_dev = container_of(handler, typeof(*sa_dev), event_handler);
415
416                 schedule_work(&sa_dev->port[event->element.port_num -
417                                             sa_dev->start_port].update_task);
418         }
419 }
420
421 void ib_sa_register_client(struct ib_sa_client *client)
422 {
423         atomic_set(&client->users, 1);
424         init_completion(&client->comp);
425 }
426 EXPORT_SYMBOL(ib_sa_register_client);
427
428 static inline void ib_sa_client_get(struct ib_sa_client *client)
429 {
430         atomic_inc(&client->users);
431 }
432
433 static inline void ib_sa_client_put(struct ib_sa_client *client)
434 {
435         if (atomic_dec_and_test(&client->users))
436                 complete(&client->comp);
437 }
438
439 void ib_sa_unregister_client(struct ib_sa_client *client)
440 {
441         ib_sa_client_put(client);
442         wait_for_completion(&client->comp);
443 }
444 EXPORT_SYMBOL(ib_sa_unregister_client);
445
446 /**
447  * ib_sa_cancel_query - try to cancel an SA query
448  * @id:ID of query to cancel
449  * @query:query pointer to cancel
450  *
451  * Try to cancel an SA query.  If the id and query don't match up or
452  * the query has already completed, nothing is done.  Otherwise the
453  * query is canceled and will complete with a status of -EINTR.
454  */
455 void ib_sa_cancel_query(int id, struct ib_sa_query *query)
456 {
457         unsigned long flags;
458         struct ib_mad_agent *agent;
459         struct ib_mad_send_buf *mad_buf;
460
461         spin_lock_irqsave(&idr_lock, flags);
462         if (idr_find(&query_idr, id) != query) {
463                 spin_unlock_irqrestore(&idr_lock, flags);
464                 return;
465         }
466         agent = query->port->agent;
467         mad_buf = query->mad_buf;
468         spin_unlock_irqrestore(&idr_lock, flags);
469
470         ib_cancel_mad(agent, mad_buf);
471 }
472 EXPORT_SYMBOL(ib_sa_cancel_query);
473
474 int ib_init_ah_from_path(struct ib_device *device, u8 port_num,
475                          struct ib_sa_path_rec *rec, struct ib_ah_attr *ah_attr)
476 {
477         int ret;
478         u16 gid_index;
479
480         memset(ah_attr, 0, sizeof *ah_attr);
481         ah_attr->dlid = be16_to_cpu(rec->dlid);
482         ah_attr->sl = rec->sl;
483         ah_attr->src_path_bits = be16_to_cpu(rec->slid) & 0x7f;
484         ah_attr->port_num = port_num;
485
486         if (rec->hop_limit > 1) {
487                 ah_attr->ah_flags = IB_AH_GRH;
488                 ah_attr->grh.dgid = rec->dgid;
489
490                 ret = ib_find_cached_gid(device, &rec->sgid, &port_num,
491                                          &gid_index);
492                 if (ret)
493                         return ret;
494
495                 ah_attr->grh.sgid_index    = gid_index;
496                 ah_attr->grh.flow_label    = be32_to_cpu(rec->flow_label);
497                 ah_attr->grh.hop_limit     = rec->hop_limit;
498                 ah_attr->grh.traffic_class = rec->traffic_class;
499         }
500         return 0;
501 }
502 EXPORT_SYMBOL(ib_init_ah_from_path);
503
504 static void init_mad(struct ib_sa_mad *mad, struct ib_mad_agent *agent)
505 {
506         unsigned long flags;
507
508         memset(mad, 0, sizeof *mad);
509
510         mad->mad_hdr.base_version  = IB_MGMT_BASE_VERSION;
511         mad->mad_hdr.mgmt_class    = IB_MGMT_CLASS_SUBN_ADM;
512         mad->mad_hdr.class_version = IB_SA_CLASS_VERSION;
513
514         spin_lock_irqsave(&tid_lock, flags);
515         mad->mad_hdr.tid           =
516                 cpu_to_be64(((u64) agent->hi_tid) << 32 | tid++);
517         spin_unlock_irqrestore(&tid_lock, flags);
518 }
519
520 static int send_mad(struct ib_sa_query *query, int timeout_ms, gfp_t gfp_mask)
521 {
522         unsigned long flags;
523         int ret, id;
524
525 retry:
526         if (!idr_pre_get(&query_idr, gfp_mask))
527                 return -ENOMEM;
528         spin_lock_irqsave(&idr_lock, flags);
529         ret = idr_get_new(&query_idr, query, &id);
530         spin_unlock_irqrestore(&idr_lock, flags);
531         if (ret == -EAGAIN)
532                 goto retry;
533         if (ret)
534                 return ret;
535
536         query->mad_buf->timeout_ms  = timeout_ms;
537         query->mad_buf->context[0] = query;
538         query->id = id;
539
540         spin_lock_irqsave(&query->port->ah_lock, flags);
541         kref_get(&query->port->sm_ah->ref);
542         query->sm_ah = query->port->sm_ah;
543         spin_unlock_irqrestore(&query->port->ah_lock, flags);
544
545         query->mad_buf->ah = query->sm_ah->ah;
546
547         ret = ib_post_send_mad(query->mad_buf, NULL);
548         if (ret) {
549                 spin_lock_irqsave(&idr_lock, flags);
550                 idr_remove(&query_idr, id);
551                 spin_unlock_irqrestore(&idr_lock, flags);
552
553                 kref_put(&query->sm_ah->ref, free_sm_ah);
554         }
555
556         /*
557          * It's not safe to dereference query any more, because the
558          * send may already have completed and freed the query in
559          * another context.
560          */
561         return ret ? ret : id;
562 }
563
564 static void ib_sa_path_rec_callback(struct ib_sa_query *sa_query,
565                                     int status,
566                                     struct ib_sa_mad *mad)
567 {
568         struct ib_sa_path_query *query =
569                 container_of(sa_query, struct ib_sa_path_query, sa_query);
570
571         if (mad) {
572                 struct ib_sa_path_rec rec;
573
574                 ib_unpack(path_rec_table, ARRAY_SIZE(path_rec_table),
575                           mad->data, &rec);
576                 query->callback(status, &rec, query->context);
577         } else
578                 query->callback(status, NULL, query->context);
579 }
580
581 static void ib_sa_path_rec_release(struct ib_sa_query *sa_query)
582 {
583         kfree(container_of(sa_query, struct ib_sa_path_query, sa_query));
584 }
585
586 /**
587  * ib_sa_path_rec_get - Start a Path get query
588  * @client:SA client
589  * @device:device to send query on
590  * @port_num: port number to send query on
591  * @rec:Path Record to send in query
592  * @comp_mask:component mask to send in query
593  * @timeout_ms:time to wait for response
594  * @gfp_mask:GFP mask to use for internal allocations
595  * @callback:function called when query completes, times out or is
596  * canceled
597  * @context:opaque user context passed to callback
598  * @sa_query:query context, used to cancel query
599  *
600  * Send a Path Record Get query to the SA to look up a path.  The
601  * callback function will be called when the query completes (or
602  * fails); status is 0 for a successful response, -EINTR if the query
603  * is canceled, -ETIMEDOUT is the query timed out, or -EIO if an error
604  * occurred sending the query.  The resp parameter of the callback is
605  * only valid if status is 0.
606  *
607  * If the return value of ib_sa_path_rec_get() is negative, it is an
608  * error code.  Otherwise it is a query ID that can be used to cancel
609  * the query.
610  */
611 int ib_sa_path_rec_get(struct ib_sa_client *client,
612                        struct ib_device *device, u8 port_num,
613                        struct ib_sa_path_rec *rec,
614                        ib_sa_comp_mask comp_mask,
615                        int timeout_ms, gfp_t gfp_mask,
616                        void (*callback)(int status,
617                                         struct ib_sa_path_rec *resp,
618                                         void *context),
619                        void *context,
620                        struct ib_sa_query **sa_query)
621 {
622         struct ib_sa_path_query *query;
623         struct ib_sa_device *sa_dev = ib_get_client_data(device, &sa_client);
624         struct ib_sa_port   *port;
625         struct ib_mad_agent *agent;
626         struct ib_sa_mad *mad;
627         int ret;
628
629         if (!sa_dev)
630                 return -ENODEV;
631
632         port  = &sa_dev->port[port_num - sa_dev->start_port];
633         agent = port->agent;
634
635         query = kmalloc(sizeof *query, gfp_mask);
636         if (!query)
637                 return -ENOMEM;
638
639         query->sa_query.mad_buf = ib_create_send_mad(agent, 1, 0,
640                                                      0, IB_MGMT_SA_HDR,
641                                                      IB_MGMT_SA_DATA, gfp_mask);
642         if (!query->sa_query.mad_buf) {
643                 ret = -ENOMEM;
644                 goto err1;
645         }
646
647         ib_sa_client_get(client);
648         query->sa_query.client = client;
649         query->callback        = callback;
650         query->context         = context;
651
652         mad = query->sa_query.mad_buf->mad;
653         init_mad(mad, agent);
654
655         query->sa_query.callback = callback ? ib_sa_path_rec_callback : NULL;
656         query->sa_query.release  = ib_sa_path_rec_release;
657         query->sa_query.port     = port;
658         mad->mad_hdr.method      = IB_MGMT_METHOD_GET;
659         mad->mad_hdr.attr_id     = cpu_to_be16(IB_SA_ATTR_PATH_REC);
660         mad->sa_hdr.comp_mask    = comp_mask;
661
662         ib_pack(path_rec_table, ARRAY_SIZE(path_rec_table), rec, mad->data);
663
664         *sa_query = &query->sa_query;
665
666         ret = send_mad(&query->sa_query, timeout_ms, gfp_mask);
667         if (ret < 0)
668                 goto err2;
669
670         return ret;
671
672 err2:
673         *sa_query = NULL;
674         ib_sa_client_put(query->sa_query.client);
675         ib_free_send_mad(query->sa_query.mad_buf);
676
677 err1:
678         kfree(query);
679         return ret;
680 }
681 EXPORT_SYMBOL(ib_sa_path_rec_get);
682
683 static void ib_sa_service_rec_callback(struct ib_sa_query *sa_query,
684                                     int status,
685                                     struct ib_sa_mad *mad)
686 {
687         struct ib_sa_service_query *query =
688                 container_of(sa_query, struct ib_sa_service_query, sa_query);
689
690         if (mad) {
691                 struct ib_sa_service_rec rec;
692
693                 ib_unpack(service_rec_table, ARRAY_SIZE(service_rec_table),
694                           mad->data, &rec);
695                 query->callback(status, &rec, query->context);
696         } else
697                 query->callback(status, NULL, query->context);
698 }
699
700 static void ib_sa_service_rec_release(struct ib_sa_query *sa_query)
701 {
702         kfree(container_of(sa_query, struct ib_sa_service_query, sa_query));
703 }
704
705 /**
706  * ib_sa_service_rec_query - Start Service Record operation
707  * @client:SA client
708  * @device:device to send request on
709  * @port_num: port number to send request on
710  * @method:SA method - should be get, set, or delete
711  * @rec:Service Record to send in request
712  * @comp_mask:component mask to send in request
713  * @timeout_ms:time to wait for response
714  * @gfp_mask:GFP mask to use for internal allocations
715  * @callback:function called when request completes, times out or is
716  * canceled
717  * @context:opaque user context passed to callback
718  * @sa_query:request context, used to cancel request
719  *
720  * Send a Service Record set/get/delete to the SA to register,
721  * unregister or query a service record.
722  * The callback function will be called when the request completes (or
723  * fails); status is 0 for a successful response, -EINTR if the query
724  * is canceled, -ETIMEDOUT is the query timed out, or -EIO if an error
725  * occurred sending the query.  The resp parameter of the callback is
726  * only valid if status is 0.
727  *
728  * If the return value of ib_sa_service_rec_query() is negative, it is an
729  * error code.  Otherwise it is a request ID that can be used to cancel
730  * the query.
731  */
732 int ib_sa_service_rec_query(struct ib_sa_client *client,
733                             struct ib_device *device, u8 port_num, u8 method,
734                             struct ib_sa_service_rec *rec,
735                             ib_sa_comp_mask comp_mask,
736                             int timeout_ms, gfp_t gfp_mask,
737                             void (*callback)(int status,
738                                              struct ib_sa_service_rec *resp,
739                                              void *context),
740                             void *context,
741                             struct ib_sa_query **sa_query)
742 {
743         struct ib_sa_service_query *query;
744         struct ib_sa_device *sa_dev = ib_get_client_data(device, &sa_client);
745         struct ib_sa_port   *port;
746         struct ib_mad_agent *agent;
747         struct ib_sa_mad *mad;
748         int ret;
749
750         if (!sa_dev)
751                 return -ENODEV;
752
753         port  = &sa_dev->port[port_num - sa_dev->start_port];
754         agent = port->agent;
755
756         if (method != IB_MGMT_METHOD_GET &&
757             method != IB_MGMT_METHOD_SET &&
758             method != IB_SA_METHOD_DELETE)
759                 return -EINVAL;
760
761         query = kmalloc(sizeof *query, gfp_mask);
762         if (!query)
763                 return -ENOMEM;
764
765         query->sa_query.mad_buf = ib_create_send_mad(agent, 1, 0,
766                                                      0, IB_MGMT_SA_HDR,
767                                                      IB_MGMT_SA_DATA, gfp_mask);
768         if (!query->sa_query.mad_buf) {
769                 ret = -ENOMEM;
770                 goto err1;
771         }
772
773         ib_sa_client_get(client);
774         query->sa_query.client = client;
775         query->callback        = callback;
776         query->context         = context;
777
778         mad = query->sa_query.mad_buf->mad;
779         init_mad(mad, agent);
780
781         query->sa_query.callback = callback ? ib_sa_service_rec_callback : NULL;
782         query->sa_query.release  = ib_sa_service_rec_release;
783         query->sa_query.port     = port;
784         mad->mad_hdr.method      = method;
785         mad->mad_hdr.attr_id     = cpu_to_be16(IB_SA_ATTR_SERVICE_REC);
786         mad->sa_hdr.comp_mask    = comp_mask;
787
788         ib_pack(service_rec_table, ARRAY_SIZE(service_rec_table),
789                 rec, mad->data);
790
791         *sa_query = &query->sa_query;
792
793         ret = send_mad(&query->sa_query, timeout_ms, gfp_mask);
794         if (ret < 0)
795                 goto err2;
796
797         return ret;
798
799 err2:
800         *sa_query = NULL;
801         ib_sa_client_put(query->sa_query.client);
802         ib_free_send_mad(query->sa_query.mad_buf);
803
804 err1:
805         kfree(query);
806         return ret;
807 }
808 EXPORT_SYMBOL(ib_sa_service_rec_query);
809
810 static void ib_sa_mcmember_rec_callback(struct ib_sa_query *sa_query,
811                                         int status,
812                                         struct ib_sa_mad *mad)
813 {
814         struct ib_sa_mcmember_query *query =
815                 container_of(sa_query, struct ib_sa_mcmember_query, sa_query);
816
817         if (mad) {
818                 struct ib_sa_mcmember_rec rec;
819
820                 ib_unpack(mcmember_rec_table, ARRAY_SIZE(mcmember_rec_table),
821                           mad->data, &rec);
822                 query->callback(status, &rec, query->context);
823         } else
824                 query->callback(status, NULL, query->context);
825 }
826
827 static void ib_sa_mcmember_rec_release(struct ib_sa_query *sa_query)
828 {
829         kfree(container_of(sa_query, struct ib_sa_mcmember_query, sa_query));
830 }
831
832 int ib_sa_mcmember_rec_query(struct ib_sa_client *client,
833                              struct ib_device *device, u8 port_num,
834                              u8 method,
835                              struct ib_sa_mcmember_rec *rec,
836                              ib_sa_comp_mask comp_mask,
837                              int timeout_ms, gfp_t gfp_mask,
838                              void (*callback)(int status,
839                                               struct ib_sa_mcmember_rec *resp,
840                                               void *context),
841                              void *context,
842                              struct ib_sa_query **sa_query)
843 {
844         struct ib_sa_mcmember_query *query;
845         struct ib_sa_device *sa_dev = ib_get_client_data(device, &sa_client);
846         struct ib_sa_port   *port;
847         struct ib_mad_agent *agent;
848         struct ib_sa_mad *mad;
849         int ret;
850
851         if (!sa_dev)
852                 return -ENODEV;
853
854         port  = &sa_dev->port[port_num - sa_dev->start_port];
855         agent = port->agent;
856
857         query = kmalloc(sizeof *query, gfp_mask);
858         if (!query)
859                 return -ENOMEM;
860
861         query->sa_query.mad_buf = ib_create_send_mad(agent, 1, 0,
862                                                      0, IB_MGMT_SA_HDR,
863                                                      IB_MGMT_SA_DATA, gfp_mask);
864         if (!query->sa_query.mad_buf) {
865                 ret = -ENOMEM;
866                 goto err1;
867         }
868
869         ib_sa_client_get(client);
870         query->sa_query.client = client;
871         query->callback        = callback;
872         query->context         = context;
873
874         mad = query->sa_query.mad_buf->mad;
875         init_mad(mad, agent);
876
877         query->sa_query.callback = callback ? ib_sa_mcmember_rec_callback : NULL;
878         query->sa_query.release  = ib_sa_mcmember_rec_release;
879         query->sa_query.port     = port;
880         mad->mad_hdr.method      = method;
881         mad->mad_hdr.attr_id     = cpu_to_be16(IB_SA_ATTR_MC_MEMBER_REC);
882         mad->sa_hdr.comp_mask    = comp_mask;
883
884         ib_pack(mcmember_rec_table, ARRAY_SIZE(mcmember_rec_table),
885                 rec, mad->data);
886
887         *sa_query = &query->sa_query;
888
889         ret = send_mad(&query->sa_query, timeout_ms, gfp_mask);
890         if (ret < 0)
891                 goto err2;
892
893         return ret;
894
895 err2:
896         *sa_query = NULL;
897         ib_sa_client_put(query->sa_query.client);
898         ib_free_send_mad(query->sa_query.mad_buf);
899
900 err1:
901         kfree(query);
902         return ret;
903 }
904 EXPORT_SYMBOL(ib_sa_mcmember_rec_query);
905
906 static void send_handler(struct ib_mad_agent *agent,
907                          struct ib_mad_send_wc *mad_send_wc)
908 {
909         struct ib_sa_query *query = mad_send_wc->send_buf->context[0];
910         unsigned long flags;
911
912         if (query->callback)
913                 switch (mad_send_wc->status) {
914                 case IB_WC_SUCCESS:
915                         /* No callback -- already got recv */
916                         break;
917                 case IB_WC_RESP_TIMEOUT_ERR:
918                         query->callback(query, -ETIMEDOUT, NULL);
919                         break;
920                 case IB_WC_WR_FLUSH_ERR:
921                         query->callback(query, -EINTR, NULL);
922                         break;
923                 default:
924                         query->callback(query, -EIO, NULL);
925                         break;
926                 }
927
928         spin_lock_irqsave(&idr_lock, flags);
929         idr_remove(&query_idr, query->id);
930         spin_unlock_irqrestore(&idr_lock, flags);
931
932         ib_free_send_mad(mad_send_wc->send_buf);
933         kref_put(&query->sm_ah->ref, free_sm_ah);
934         ib_sa_client_put(query->client);
935         query->release(query);
936 }
937
938 static void recv_handler(struct ib_mad_agent *mad_agent,
939                          struct ib_mad_recv_wc *mad_recv_wc)
940 {
941         struct ib_sa_query *query;
942         struct ib_mad_send_buf *mad_buf;
943
944         mad_buf = (void *) (unsigned long) mad_recv_wc->wc->wr_id;
945         query = mad_buf->context[0];
946
947         if (query->callback) {
948                 if (mad_recv_wc->wc->status == IB_WC_SUCCESS)
949                         query->callback(query,
950                                         mad_recv_wc->recv_buf.mad->mad_hdr.status ?
951                                         -EINVAL : 0,
952                                         (struct ib_sa_mad *) mad_recv_wc->recv_buf.mad);
953                 else
954                         query->callback(query, -EIO, NULL);
955         }
956
957         ib_free_recv_mad(mad_recv_wc);
958 }
959
960 static void ib_sa_add_one(struct ib_device *device)
961 {
962         struct ib_sa_device *sa_dev;
963         int s, e, i;
964
965         if (rdma_node_get_transport(device->node_type) != RDMA_TRANSPORT_IB)
966                 return;
967
968         if (device->node_type == RDMA_NODE_IB_SWITCH)
969                 s = e = 0;
970         else {
971                 s = 1;
972                 e = device->phys_port_cnt;
973         }
974
975         sa_dev = kmalloc(sizeof *sa_dev +
976                          (e - s + 1) * sizeof (struct ib_sa_port),
977                          GFP_KERNEL);
978         if (!sa_dev)
979                 return;
980
981         sa_dev->start_port = s;
982         sa_dev->end_port   = e;
983
984         for (i = 0; i <= e - s; ++i) {
985                 sa_dev->port[i].sm_ah    = NULL;
986                 sa_dev->port[i].port_num = i + s;
987                 spin_lock_init(&sa_dev->port[i].ah_lock);
988
989                 sa_dev->port[i].agent =
990                         ib_register_mad_agent(device, i + s, IB_QPT_GSI,
991                                               NULL, 0, send_handler,
992                                               recv_handler, sa_dev);
993                 if (IS_ERR(sa_dev->port[i].agent))
994                         goto err;
995
996                 INIT_WORK(&sa_dev->port[i].update_task, update_sm_ah);
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].update_task);
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);