2 * Copyright (c) 2004 Topspin Communications. All rights reserved.
4 * This software is available to you under a choice of one of two
5 * licenses. You may choose to be licensed under the terms of the GNU
6 * General Public License (GPL) Version 2, available from the file
7 * COPYING in the main directory of this source tree, or the
8 * OpenIB.org BSD license below:
10 * Redistribution and use in source and binary forms, with or
11 * without modification, are permitted provided that the following
14 * - Redistributions of source code must retain the above
15 * copyright notice, this list of conditions and the following
18 * - Redistributions in binary form must reproduce the above
19 * copyright notice, this list of conditions and the following
20 * disclaimer in the documentation and/or other materials
21 * provided with the distribution.
23 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
24 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
25 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
26 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
27 * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
28 * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
29 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
32 * $Id: sa_query.c 1389 2004-12-27 22:56:47Z roland $
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/pci.h>
42 #include <linux/dma-mapping.h>
43 #include <linux/kref.h>
44 #include <linux/idr.h>
49 MODULE_AUTHOR("Roland Dreier");
50 MODULE_DESCRIPTION("InfiniBand subnet administration query support");
51 MODULE_LICENSE("Dual BSD/GPL");
54 * These two structures must be packed because they have 64-bit fields
55 * that are only 32-bit aligned. 64-bit architectures will lay them
56 * out wrong otherwise. (And unfortunately they are sent on the wire
57 * so we can't change the layout)
63 ib_sa_comp_mask comp_mask;
64 } __attribute__ ((packed));
67 struct ib_mad_hdr mad_hdr;
68 struct ib_rmpp_hdr rmpp_hdr;
69 struct ib_sa_hdr sa_hdr;
71 } __attribute__ ((packed));
79 struct ib_mad_agent *agent;
81 struct ib_sa_sm_ah *sm_ah;
82 struct work_struct update_task;
88 int start_port, end_port;
89 struct ib_event_handler event_handler;
90 struct ib_sa_port port[0];
94 void (*callback)(struct ib_sa_query *, int, struct ib_sa_mad *);
95 void (*release)(struct ib_sa_query *);
96 struct ib_sa_port *port;
97 struct ib_sa_mad *mad;
98 struct ib_sa_sm_ah *sm_ah;
99 DECLARE_PCI_UNMAP_ADDR(mapping)
103 struct ib_sa_path_query {
104 void (*callback)(int, struct ib_sa_path_rec *, void *);
106 struct ib_sa_query sa_query;
109 struct ib_sa_mcmember_query {
110 void (*callback)(int, struct ib_sa_mcmember_rec *, void *);
112 struct ib_sa_query sa_query;
115 static void ib_sa_add_one(struct ib_device *device);
116 static void ib_sa_remove_one(struct ib_device *device);
118 static struct ib_client sa_client = {
120 .add = ib_sa_add_one,
121 .remove = ib_sa_remove_one
124 static spinlock_t idr_lock;
125 static DEFINE_IDR(query_idr);
127 static spinlock_t tid_lock;
131 IB_SA_ATTR_CLASS_PORTINFO = 0x01,
132 IB_SA_ATTR_NOTICE = 0x02,
133 IB_SA_ATTR_INFORM_INFO = 0x03,
134 IB_SA_ATTR_NODE_REC = 0x11,
135 IB_SA_ATTR_PORT_INFO_REC = 0x12,
136 IB_SA_ATTR_SL2VL_REC = 0x13,
137 IB_SA_ATTR_SWITCH_REC = 0x14,
138 IB_SA_ATTR_LINEAR_FDB_REC = 0x15,
139 IB_SA_ATTR_RANDOM_FDB_REC = 0x16,
140 IB_SA_ATTR_MCAST_FDB_REC = 0x17,
141 IB_SA_ATTR_SM_INFO_REC = 0x18,
142 IB_SA_ATTR_LINK_REC = 0x20,
143 IB_SA_ATTR_GUID_INFO_REC = 0x30,
144 IB_SA_ATTR_SERVICE_REC = 0x31,
145 IB_SA_ATTR_PARTITION_REC = 0x33,
146 IB_SA_ATTR_RANGE_REC = 0x34,
147 IB_SA_ATTR_PATH_REC = 0x35,
148 IB_SA_ATTR_VL_ARB_REC = 0x36,
149 IB_SA_ATTR_MC_GROUP_REC = 0x37,
150 IB_SA_ATTR_MC_MEMBER_REC = 0x38,
151 IB_SA_ATTR_TRACE_REC = 0x39,
152 IB_SA_ATTR_MULTI_PATH_REC = 0x3a,
153 IB_SA_ATTR_SERVICE_ASSOC_REC = 0x3b
156 #define PATH_REC_FIELD(field) \
157 .struct_offset_bytes = offsetof(struct ib_sa_path_rec, field), \
158 .struct_size_bytes = sizeof ((struct ib_sa_path_rec *) 0)->field, \
159 .field_name = "sa_path_rec:" #field
161 static const struct ib_field path_rec_table[] = {
170 { PATH_REC_FIELD(dgid),
174 { PATH_REC_FIELD(sgid),
178 { PATH_REC_FIELD(dlid),
182 { PATH_REC_FIELD(slid),
186 { PATH_REC_FIELD(raw_traffic),
194 { PATH_REC_FIELD(flow_label),
198 { PATH_REC_FIELD(hop_limit),
202 { PATH_REC_FIELD(traffic_class),
206 { PATH_REC_FIELD(reversible),
210 { PATH_REC_FIELD(numb_path),
214 { PATH_REC_FIELD(pkey),
222 { PATH_REC_FIELD(sl),
226 { PATH_REC_FIELD(mtu_selector),
230 { PATH_REC_FIELD(mtu),
234 { PATH_REC_FIELD(rate_selector),
238 { PATH_REC_FIELD(rate),
242 { PATH_REC_FIELD(packet_life_time_selector),
246 { PATH_REC_FIELD(packet_life_time),
250 { PATH_REC_FIELD(preference),
260 #define MCMEMBER_REC_FIELD(field) \
261 .struct_offset_bytes = offsetof(struct ib_sa_mcmember_rec, field), \
262 .struct_size_bytes = sizeof ((struct ib_sa_mcmember_rec *) 0)->field, \
263 .field_name = "sa_mcmember_rec:" #field
265 static const struct ib_field mcmember_rec_table[] = {
266 { MCMEMBER_REC_FIELD(mgid),
270 { MCMEMBER_REC_FIELD(port_gid),
274 { MCMEMBER_REC_FIELD(qkey),
278 { MCMEMBER_REC_FIELD(mlid),
282 { MCMEMBER_REC_FIELD(mtu_selector),
286 { MCMEMBER_REC_FIELD(mtu),
290 { MCMEMBER_REC_FIELD(traffic_class),
294 { MCMEMBER_REC_FIELD(pkey),
298 { MCMEMBER_REC_FIELD(rate_selector),
302 { MCMEMBER_REC_FIELD(rate),
306 { MCMEMBER_REC_FIELD(packet_life_time_selector),
310 { MCMEMBER_REC_FIELD(packet_life_time),
314 { MCMEMBER_REC_FIELD(sl),
318 { MCMEMBER_REC_FIELD(flow_label),
322 { MCMEMBER_REC_FIELD(hop_limit),
326 { MCMEMBER_REC_FIELD(scope),
330 { MCMEMBER_REC_FIELD(join_state),
334 { MCMEMBER_REC_FIELD(proxy_join),
344 static void free_sm_ah(struct kref *kref)
346 struct ib_sa_sm_ah *sm_ah = container_of(kref, struct ib_sa_sm_ah, ref);
348 ib_destroy_ah(sm_ah->ah);
352 static void update_sm_ah(void *port_ptr)
354 struct ib_sa_port *port = port_ptr;
355 struct ib_sa_sm_ah *new_ah, *old_ah;
356 struct ib_port_attr port_attr;
357 struct ib_ah_attr ah_attr;
359 if (ib_query_port(port->agent->device, port->port_num, &port_attr)) {
360 printk(KERN_WARNING "Couldn't query port\n");
364 new_ah = kmalloc(sizeof *new_ah, GFP_KERNEL);
366 printk(KERN_WARNING "Couldn't allocate new SM AH\n");
370 kref_init(&new_ah->ref);
372 memset(&ah_attr, 0, sizeof ah_attr);
373 ah_attr.dlid = port_attr.sm_lid;
374 ah_attr.sl = port_attr.sm_sl;
375 ah_attr.port_num = port->port_num;
377 new_ah->ah = ib_create_ah(port->agent->qp->pd, &ah_attr);
378 if (IS_ERR(new_ah->ah)) {
379 printk(KERN_WARNING "Couldn't create new SM AH\n");
384 spin_lock_irq(&port->ah_lock);
385 old_ah = port->sm_ah;
386 port->sm_ah = new_ah;
387 spin_unlock_irq(&port->ah_lock);
390 kref_put(&old_ah->ref, free_sm_ah);
393 static void ib_sa_event(struct ib_event_handler *handler, struct ib_event *event)
395 if (event->event == IB_EVENT_PORT_ERR ||
396 event->event == IB_EVENT_PORT_ACTIVE ||
397 event->event == IB_EVENT_LID_CHANGE ||
398 event->event == IB_EVENT_PKEY_CHANGE ||
399 event->event == IB_EVENT_SM_CHANGE) {
400 struct ib_sa_device *sa_dev =
401 ib_get_client_data(event->device, &sa_client);
403 schedule_work(&sa_dev->port[event->element.port_num -
404 sa_dev->start_port].update_task);
409 * ib_sa_cancel_query - try to cancel an SA query
410 * @id:ID of query to cancel
411 * @query:query pointer to cancel
413 * Try to cancel an SA query. If the id and query don't match up or
414 * the query has already completed, nothing is done. Otherwise the
415 * query is canceled and will complete with a status of -EINTR.
417 void ib_sa_cancel_query(int id, struct ib_sa_query *query)
420 struct ib_mad_agent *agent;
422 spin_lock_irqsave(&idr_lock, flags);
423 if (idr_find(&query_idr, id) != query) {
424 spin_unlock_irqrestore(&idr_lock, flags);
427 agent = query->port->agent;
428 spin_unlock_irqrestore(&idr_lock, flags);
430 ib_cancel_mad(agent, id);
432 EXPORT_SYMBOL(ib_sa_cancel_query);
434 static void init_mad(struct ib_sa_mad *mad, struct ib_mad_agent *agent)
438 memset(mad, 0, sizeof *mad);
440 mad->mad_hdr.base_version = IB_MGMT_BASE_VERSION;
441 mad->mad_hdr.mgmt_class = IB_MGMT_CLASS_SUBN_ADM;
442 mad->mad_hdr.class_version = IB_SA_CLASS_VERSION;
444 spin_lock_irqsave(&tid_lock, flags);
446 cpu_to_be64(((u64) agent->hi_tid) << 32 | tid++);
447 spin_unlock_irqrestore(&tid_lock, flags);
450 static int send_mad(struct ib_sa_query *query, int timeout_ms)
452 struct ib_sa_port *port = query->port;
455 struct ib_sge gather_list;
456 struct ib_send_wr *bad_wr, wr = {
457 .opcode = IB_WR_SEND,
458 .sg_list = &gather_list,
460 .send_flags = IB_SEND_SIGNALED,
463 .mad_hdr = &query->mad->mad_hdr,
465 .remote_qkey = IB_QP1_QKEY,
466 .timeout_ms = timeout_ms
472 if (!idr_pre_get(&query_idr, GFP_ATOMIC))
474 spin_lock_irqsave(&idr_lock, flags);
475 ret = idr_get_new(&query_idr, query, &query->id);
476 spin_unlock_irqrestore(&idr_lock, flags);
482 wr.wr_id = query->id;
484 spin_lock_irqsave(&port->ah_lock, flags);
485 kref_get(&port->sm_ah->ref);
486 query->sm_ah = port->sm_ah;
487 wr.wr.ud.ah = port->sm_ah->ah;
488 spin_unlock_irqrestore(&port->ah_lock, flags);
490 gather_list.addr = dma_map_single(port->agent->device->dma_device,
492 sizeof (struct ib_sa_mad),
494 gather_list.length = sizeof (struct ib_sa_mad);
495 gather_list.lkey = port->mr->lkey;
496 pci_unmap_addr_set(query, mapping, gather_list.addr);
498 ret = ib_post_send_mad(port->agent, &wr, &bad_wr);
500 dma_unmap_single(port->agent->device->dma_device,
501 pci_unmap_addr(query, mapping),
502 sizeof (struct ib_sa_mad),
504 kref_put(&query->sm_ah->ref, free_sm_ah);
505 spin_lock_irqsave(&idr_lock, flags);
506 idr_remove(&query_idr, query->id);
507 spin_unlock_irqrestore(&idr_lock, flags);
513 static void ib_sa_path_rec_callback(struct ib_sa_query *sa_query,
515 struct ib_sa_mad *mad)
517 struct ib_sa_path_query *query =
518 container_of(sa_query, struct ib_sa_path_query, sa_query);
521 struct ib_sa_path_rec rec;
523 ib_unpack(path_rec_table, ARRAY_SIZE(path_rec_table),
525 query->callback(status, &rec, query->context);
527 query->callback(status, NULL, query->context);
530 static void ib_sa_path_rec_release(struct ib_sa_query *sa_query)
532 kfree(sa_query->mad);
533 kfree(container_of(sa_query, struct ib_sa_path_query, sa_query));
537 * ib_sa_path_rec_get - Start a Path get query
538 * @device:device to send query on
539 * @port_num: port number to send query on
540 * @rec:Path Record to send in query
541 * @comp_mask:component mask to send in query
542 * @timeout_ms:time to wait for response
543 * @gfp_mask:GFP mask to use for internal allocations
544 * @callback:function called when query completes, times out or is
546 * @context:opaque user context passed to callback
547 * @sa_query:query context, used to cancel query
549 * Send a Path Record Get query to the SA to look up a path. The
550 * callback function will be called when the query completes (or
551 * fails); status is 0 for a successful response, -EINTR if the query
552 * is canceled, -ETIMEDOUT is the query timed out, or -EIO if an error
553 * occurred sending the query. The resp parameter of the callback is
554 * only valid if status is 0.
556 * If the return value of ib_sa_path_rec_get() is negative, it is an
557 * error code. Otherwise it is a query ID that can be used to cancel
560 int ib_sa_path_rec_get(struct ib_device *device, u8 port_num,
561 struct ib_sa_path_rec *rec,
562 ib_sa_comp_mask comp_mask,
563 int timeout_ms, int gfp_mask,
564 void (*callback)(int status,
565 struct ib_sa_path_rec *resp,
568 struct ib_sa_query **sa_query)
570 struct ib_sa_path_query *query;
571 struct ib_sa_device *sa_dev = ib_get_client_data(device, &sa_client);
572 struct ib_sa_port *port = &sa_dev->port[port_num - sa_dev->start_port];
573 struct ib_mad_agent *agent = port->agent;
576 query = kmalloc(sizeof *query, gfp_mask);
579 query->sa_query.mad = kmalloc(sizeof *query->sa_query.mad, gfp_mask);
580 if (!query->sa_query.mad) {
585 query->callback = callback;
586 query->context = context;
588 init_mad(query->sa_query.mad, agent);
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 query->sa_query.mad->mad_hdr.method = IB_MGMT_METHOD_GET;
594 query->sa_query.mad->mad_hdr.attr_id = cpu_to_be16(IB_SA_ATTR_PATH_REC);
595 query->sa_query.mad->sa_hdr.comp_mask = comp_mask;
597 ib_pack(path_rec_table, ARRAY_SIZE(path_rec_table),
598 rec, query->sa_query.mad->data);
600 *sa_query = &query->sa_query;
601 ret = send_mad(&query->sa_query, timeout_ms);
604 kfree(query->sa_query.mad);
608 return ret ? ret : query->sa_query.id;
610 EXPORT_SYMBOL(ib_sa_path_rec_get);
612 static void ib_sa_mcmember_rec_callback(struct ib_sa_query *sa_query,
614 struct ib_sa_mad *mad)
616 struct ib_sa_mcmember_query *query =
617 container_of(sa_query, struct ib_sa_mcmember_query, sa_query);
620 struct ib_sa_mcmember_rec rec;
622 ib_unpack(mcmember_rec_table, ARRAY_SIZE(mcmember_rec_table),
624 query->callback(status, &rec, query->context);
626 query->callback(status, NULL, query->context);
629 static void ib_sa_mcmember_rec_release(struct ib_sa_query *sa_query)
631 kfree(sa_query->mad);
632 kfree(container_of(sa_query, struct ib_sa_mcmember_query, sa_query));
635 int ib_sa_mcmember_rec_query(struct ib_device *device, u8 port_num,
637 struct ib_sa_mcmember_rec *rec,
638 ib_sa_comp_mask comp_mask,
639 int timeout_ms, int gfp_mask,
640 void (*callback)(int status,
641 struct ib_sa_mcmember_rec *resp,
644 struct ib_sa_query **sa_query)
646 struct ib_sa_mcmember_query *query;
647 struct ib_sa_device *sa_dev = ib_get_client_data(device, &sa_client);
648 struct ib_sa_port *port = &sa_dev->port[port_num - sa_dev->start_port];
649 struct ib_mad_agent *agent = port->agent;
652 query = kmalloc(sizeof *query, gfp_mask);
655 query->sa_query.mad = kmalloc(sizeof *query->sa_query.mad, gfp_mask);
656 if (!query->sa_query.mad) {
661 query->callback = callback;
662 query->context = context;
664 init_mad(query->sa_query.mad, agent);
666 query->sa_query.callback = callback ? ib_sa_mcmember_rec_callback : NULL;
667 query->sa_query.release = ib_sa_mcmember_rec_release;
668 query->sa_query.port = port;
669 query->sa_query.mad->mad_hdr.method = method;
670 query->sa_query.mad->mad_hdr.attr_id = cpu_to_be16(IB_SA_ATTR_MC_MEMBER_REC);
671 query->sa_query.mad->sa_hdr.comp_mask = comp_mask;
673 ib_pack(mcmember_rec_table, ARRAY_SIZE(mcmember_rec_table),
674 rec, query->sa_query.mad->data);
676 *sa_query = &query->sa_query;
677 ret = send_mad(&query->sa_query, timeout_ms);
680 kfree(query->sa_query.mad);
684 return ret ? ret : query->sa_query.id;
686 EXPORT_SYMBOL(ib_sa_mcmember_rec_query);
688 static void send_handler(struct ib_mad_agent *agent,
689 struct ib_mad_send_wc *mad_send_wc)
691 struct ib_sa_query *query;
694 spin_lock_irqsave(&idr_lock, flags);
695 query = idr_find(&query_idr, mad_send_wc->wr_id);
696 spin_unlock_irqrestore(&idr_lock, flags);
702 switch (mad_send_wc->status) {
704 /* No callback -- already got recv */
706 case IB_WC_RESP_TIMEOUT_ERR:
707 query->callback(query, -ETIMEDOUT, NULL);
709 case IB_WC_WR_FLUSH_ERR:
710 query->callback(query, -EINTR, NULL);
713 query->callback(query, -EIO, NULL);
717 dma_unmap_single(agent->device->dma_device,
718 pci_unmap_addr(query, mapping),
719 sizeof (struct ib_sa_mad),
721 kref_put(&query->sm_ah->ref, free_sm_ah);
723 query->release(query);
725 spin_lock_irqsave(&idr_lock, flags);
726 idr_remove(&query_idr, mad_send_wc->wr_id);
727 spin_unlock_irqrestore(&idr_lock, flags);
730 static void recv_handler(struct ib_mad_agent *mad_agent,
731 struct ib_mad_recv_wc *mad_recv_wc)
733 struct ib_sa_query *query;
736 spin_lock_irqsave(&idr_lock, flags);
737 query = idr_find(&query_idr, mad_recv_wc->wc->wr_id);
738 spin_unlock_irqrestore(&idr_lock, flags);
740 if (query && query->callback) {
741 if (mad_recv_wc->wc->status == IB_WC_SUCCESS)
742 query->callback(query,
743 mad_recv_wc->recv_buf.mad->mad_hdr.status ?
745 (struct ib_sa_mad *) mad_recv_wc->recv_buf.mad);
747 query->callback(query, -EIO, NULL);
750 ib_free_recv_mad(mad_recv_wc);
753 static void ib_sa_add_one(struct ib_device *device)
755 struct ib_sa_device *sa_dev;
758 if (device->node_type == IB_NODE_SWITCH)
762 e = device->phys_port_cnt;
765 sa_dev = kmalloc(sizeof *sa_dev +
766 (e - s + 1) * sizeof (struct ib_sa_port),
771 sa_dev->start_port = s;
772 sa_dev->end_port = e;
774 for (i = 0; i <= e - s; ++i) {
775 sa_dev->port[i].mr = NULL;
776 sa_dev->port[i].sm_ah = NULL;
777 sa_dev->port[i].port_num = i + s;
778 spin_lock_init(&sa_dev->port[i].ah_lock);
780 sa_dev->port[i].agent =
781 ib_register_mad_agent(device, i + s, IB_QPT_GSI,
782 NULL, 0, send_handler,
783 recv_handler, sa_dev);
784 if (IS_ERR(sa_dev->port[i].agent))
787 sa_dev->port[i].mr = ib_get_dma_mr(sa_dev->port[i].agent->qp->pd,
788 IB_ACCESS_LOCAL_WRITE);
789 if (IS_ERR(sa_dev->port[i].mr)) {
790 ib_unregister_mad_agent(sa_dev->port[i].agent);
794 INIT_WORK(&sa_dev->port[i].update_task,
795 update_sm_ah, &sa_dev->port[i]);
798 ib_set_client_data(device, &sa_client, sa_dev);
801 * We register our event handler after everything is set up,
802 * and then update our cached info after the event handler is
803 * registered to avoid any problems if a port changes state
804 * during our initialization.
807 INIT_IB_EVENT_HANDLER(&sa_dev->event_handler, device, ib_sa_event);
808 if (ib_register_event_handler(&sa_dev->event_handler))
811 for (i = 0; i <= e - s; ++i)
812 update_sm_ah(&sa_dev->port[i]);
818 ib_dereg_mr(sa_dev->port[i].mr);
819 ib_unregister_mad_agent(sa_dev->port[i].agent);
827 static void ib_sa_remove_one(struct ib_device *device)
829 struct ib_sa_device *sa_dev = ib_get_client_data(device, &sa_client);
835 ib_unregister_event_handler(&sa_dev->event_handler);
837 for (i = 0; i <= sa_dev->end_port - sa_dev->start_port; ++i) {
838 ib_unregister_mad_agent(sa_dev->port[i].agent);
839 kref_put(&sa_dev->port[i].sm_ah->ref, free_sm_ah);
845 static int __init ib_sa_init(void)
849 spin_lock_init(&idr_lock);
850 spin_lock_init(&tid_lock);
852 get_random_bytes(&tid, sizeof tid);
854 ret = ib_register_client(&sa_client);
856 printk(KERN_ERR "Couldn't register ib_sa client\n");
861 static void __exit ib_sa_cleanup(void)
863 ib_unregister_client(&sa_client);
866 module_init(ib_sa_init);
867 module_exit(ib_sa_cleanup);