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