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