2 * Copyright (c) 2005 Voltaire Inc. All rights reserved.
3 * Copyright (c) 2002-2005, Network Appliance, Inc. All rights reserved.
4 * Copyright (c) 1999-2005, Mellanox Technologies, Inc. All rights reserved.
5 * Copyright (c) 2005 Intel Corporation. All rights reserved.
7 * This software is available to you under a choice of one of two
8 * licenses. You may choose to be licensed under the terms of the GNU
9 * General Public License (GPL) Version 2, available from the file
10 * COPYING in the main directory of this source tree, or the
11 * OpenIB.org BSD license below:
13 * Redistribution and use in source and binary forms, with or
14 * without modification, are permitted provided that the following
17 * - Redistributions of source code must retain the above
18 * copyright notice, this list of conditions and the following
21 * - Redistributions in binary form must reproduce the above
22 * copyright notice, this list of conditions and the following
23 * disclaimer in the documentation and/or other materials
24 * provided with the distribution.
26 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
27 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
28 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
29 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
30 * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
31 * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
32 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
36 #include <linux/mutex.h>
37 #include <linux/inetdevice.h>
38 #include <linux/slab.h>
39 #include <linux/workqueue.h>
40 #include <linux/module.h>
41 #include <linux/notifier.h>
42 #include <net/route.h>
43 #include <net/netevent.h>
44 #include <rdma/ib_addr.h>
45 #include <netinet/if_ether.h>
46 #include <netinet6/scope6_var.h>
49 MODULE_AUTHOR("Sean Hefty");
50 MODULE_DESCRIPTION("IB Address Translation");
51 MODULE_LICENSE("Dual BSD/GPL");
54 struct list_head list;
55 struct sockaddr_storage src_addr;
56 struct sockaddr_storage dst_addr;
57 struct rdma_dev_addr *addr;
58 struct rdma_addr_client *client;
60 void (*callback)(int status, struct sockaddr *src_addr,
61 struct rdma_dev_addr *addr, void *context);
62 unsigned long timeout;
66 static void process_req(struct work_struct *work);
68 static DEFINE_MUTEX(lock);
69 static LIST_HEAD(req_list);
70 static struct delayed_work work;
71 static struct workqueue_struct *addr_wq;
73 static struct rdma_addr_client self;
74 void rdma_addr_register_client(struct rdma_addr_client *client)
76 atomic_set(&client->refcount, 1);
77 init_completion(&client->comp);
79 EXPORT_SYMBOL(rdma_addr_register_client);
81 static inline void put_client(struct rdma_addr_client *client)
83 if (atomic_dec_and_test(&client->refcount))
84 complete(&client->comp);
87 void rdma_addr_unregister_client(struct rdma_addr_client *client)
90 wait_for_completion(&client->comp);
92 EXPORT_SYMBOL(rdma_addr_unregister_client);
94 int rdma_copy_addr(struct rdma_dev_addr *dev_addr, struct ifnet *dev,
95 const unsigned char *dst_dev_addr)
97 if (dev->if_type == IFT_INFINIBAND)
98 dev_addr->dev_type = ARPHRD_INFINIBAND;
99 else if (dev->if_type == IFT_ETHER)
100 dev_addr->dev_type = ARPHRD_ETHER;
102 dev_addr->dev_type = 0;
103 memcpy(dev_addr->src_dev_addr, IF_LLADDR(dev), dev->if_addrlen);
104 memcpy(dev_addr->broadcast, __DECONST(char *, dev->if_broadcastaddr),
107 memcpy(dev_addr->dst_dev_addr, dst_dev_addr, dev->if_addrlen);
108 dev_addr->bound_dev_if = dev->if_index;
111 EXPORT_SYMBOL(rdma_copy_addr);
113 #define SCOPE_ID_CACHE(_scope_id, _addr6) do { \
114 (_addr6)->sin6_addr.s6_addr[3] = (_scope_id); \
115 (_addr6)->sin6_scope_id = 0; } while (0)
117 #define SCOPE_ID_RESTORE(_scope_id, _addr6) do { \
118 (_addr6)->sin6_scope_id = (_scope_id); \
119 (_addr6)->sin6_addr.s6_addr[3] = 0; } while (0)
121 int rdma_translate_ip(struct sockaddr *addr, struct rdma_dev_addr *dev_addr,
124 struct net_device *dev;
125 int ret = -EADDRNOTAVAIL;
127 if (dev_addr->bound_dev_if) {
128 dev = dev_get_by_index(&init_net, dev_addr->bound_dev_if);
131 ret = rdma_copy_addr(dev_addr, dev, NULL);
136 switch (addr->sa_family) {
138 dev = ip_dev_find(&init_net,
139 ((struct sockaddr_in *) addr)->sin_addr.s_addr);
144 ret = rdma_copy_addr(dev_addr, dev, NULL);
146 *vlan_id = rdma_vlan_dev_vlan_id(dev);
153 struct sockaddr_in6 *sin6;
158 sin6 = (struct sockaddr_in6 *)addr;
159 port = sin6->sin6_port;
161 scope_id = sin6->sin6_scope_id;
162 if (IN6_IS_SCOPE_LINKLOCAL(&sin6->sin6_addr))
163 SCOPE_ID_CACHE(scope_id, sin6);
164 CURVNET_SET_QUIET(&init_net);
165 ifa = ifa_ifwithaddr(addr);
167 sin6->sin6_port = port;
168 if (IN6_IS_SCOPE_LINKLOCAL(&sin6->sin6_addr))
169 SCOPE_ID_RESTORE(scope_id, sin6);
174 ret = rdma_copy_addr(dev_addr, ifa->ifa_ifp, NULL);
176 *vlan_id = rdma_vlan_dev_vlan_id(ifa->ifa_ifp);
186 EXPORT_SYMBOL(rdma_translate_ip);
188 static void set_timeout(unsigned long time)
190 int delay; /* under FreeBSD ticks are 32-bit */
192 delay = time - jiffies;
196 mod_delayed_work(addr_wq, &work, delay);
199 static void queue_req(struct addr_req *req)
201 struct addr_req *temp_req;
204 list_for_each_entry_reverse(temp_req, &req_list, list) {
205 if (time_after_eq(req->timeout, temp_req->timeout))
209 list_add(&req->list, &temp_req->list);
211 if (req_list.next == &req->list)
212 set_timeout(req->timeout);
216 static int addr_resolve(struct sockaddr *src_in,
217 struct sockaddr *dst_in,
218 struct rdma_dev_addr *addr)
220 struct sockaddr_in *sin;
221 struct sockaddr_in6 *sin6;
225 #if defined(INET) || defined(INET6)
231 u_char edst[MAX_ADDR_LEN];
237 CURVNET_SET_QUIET(&init_net);
240 * Determine whether the address is unicast, multicast, or broadcast
241 * and whether the source interface is valid.
251 memset(edst, 0, sizeof(edst));
256 switch (dst_in->sa_family) {
259 sin = (struct sockaddr_in *)dst_in;
260 if (sin->sin_addr.s_addr == INADDR_BROADCAST)
262 if (IN_MULTICAST(ntohl(sin->sin_addr.s_addr)))
264 sin = (struct sockaddr_in *)src_in;
265 if (sin->sin_addr.s_addr != INADDR_ANY) {
267 * Address comparison fails if the port is set
268 * cache it here to be restored later.
270 port = sin->sin_port;
272 memset(&sin->sin_zero, 0, sizeof(sin->sin_zero));
275 * If we have a source address to use look it
276 * up first and verify that it is a local
279 CURVNET_SET_QUIET(&init_net);
280 ifa = ifa_ifwithaddr(src_in);
282 sin->sin_port = port;
296 sin6 = (struct sockaddr_in6 *)dst_in;
297 if (IN6_IS_ADDR_MULTICAST(&sin6->sin6_addr))
299 if (IN6_IS_SCOPE_LINKLOCAL(&sin6->sin6_addr)) {
301 * The IB address comparison fails if the
302 * scope ID is set and not part of the addr:
304 scope_id = sin6->sin6_scope_id;
306 SCOPE_ID_CACHE(scope_id, sin6);
308 sin6 = (struct sockaddr_in6 *)src_in;
309 if (!IN6_IS_ADDR_UNSPECIFIED(&sin6->sin6_addr)) {
310 port = sin6->sin6_port;
312 if (IN6_IS_SCOPE_LINKLOCAL(&sin6->sin6_addr)) {
314 SCOPE_ID_CACHE(scope_id, sin6);
318 * If we have a source address to use look it
319 * up first and verify that it is a local
322 CURVNET_SET_QUIET(&init_net);
323 ifa = ifa_ifwithaddr(src_in);
325 sin6->sin6_port = port;
342 * Make sure the route exists and has a valid link.
344 rte = rtalloc1(dst_in, 1, 0);
345 if (rte == NULL || rte->rt_ifp == NULL || !RT_LINK_IS_UP(rte->rt_ifp)) {
348 error = EHOSTUNREACH;
351 if (rte->rt_flags & RTF_GATEWAY)
354 * If it's not multicast or broadcast and the route doesn't match the
355 * requested interface return unreachable. Otherwise fetch the
356 * correct interface pointer and unlock the route.
358 if (multi || bcast) {
361 /* rt_ifa holds the route answer source address */
365 } else if (ifp && ifp != rte->rt_ifp) {
376 #if defined(INET) || defined(INET6)
380 memcpy(edst, ifp->if_broadcastaddr, ifp->if_addrlen);
383 struct sockaddr *llsa;
384 struct sockaddr_dl sdl;
386 sdl.sdl_len = sizeof(sdl);
387 llsa = (struct sockaddr *)&sdl;
389 if (ifp->if_resolvemulti == NULL) {
393 error = ifp->if_resolvemulti(ifp, &llsa, dst_in);
395 memcpy(edst, LLADDR((struct sockaddr_dl *)llsa),
401 * Resolve the link local address.
403 switch (dst_in->sa_family) {
406 error = arpresolve(ifp, is_gw, NULL,
407 is_gw ? rte->rt_gateway : dst_in, edst, NULL, NULL);
412 error = nd6_resolve(ifp, is_gw, NULL,
413 is_gw ? rte->rt_gateway : dst_in, edst, NULL, NULL);
417 KASSERT(0, ("rdma_addr_resolve: Unreachable"));
424 error = -rdma_copy_addr(addr, ifp, edst);
426 memcpy(src_in, ifa->ifa_addr, ip_addr_size(ifa->ifa_addr));
428 if (scope_id < 256) {
429 sin6 = (struct sockaddr_in6 *)src_in;
430 if (IN6_IS_SCOPE_LINKLOCAL(&sin6->sin6_addr))
431 SCOPE_ID_RESTORE(scope_id, sin6);
432 sin6 = (struct sockaddr_in6 *)dst_in;
433 SCOPE_ID_RESTORE(scope_id, sin6);
436 if (error == EWOULDBLOCK)
443 static void process_req(struct work_struct *work)
445 struct addr_req *req, *temp_req;
446 struct sockaddr *src_in, *dst_in;
447 struct list_head done_list;
449 INIT_LIST_HEAD(&done_list);
452 list_for_each_entry_safe(req, temp_req, &req_list, list) {
453 if (req->status == -ENODATA) {
454 src_in = (struct sockaddr *) &req->src_addr;
455 dst_in = (struct sockaddr *) &req->dst_addr;
456 req->status = addr_resolve(src_in, dst_in, req->addr);
457 if (req->status && time_after_eq(jiffies, req->timeout))
458 req->status = -ETIMEDOUT;
459 else if (req->status == -ENODATA)
462 list_move_tail(&req->list, &done_list);
465 if (!list_empty(&req_list)) {
466 req = list_entry(req_list.next, struct addr_req, list);
467 set_timeout(req->timeout);
471 list_for_each_entry_safe(req, temp_req, &done_list, list) {
472 list_del(&req->list);
473 req->callback(req->status, (struct sockaddr *) &req->src_addr,
474 req->addr, req->context);
475 put_client(req->client);
480 int rdma_resolve_ip(struct rdma_addr_client *client,
481 struct sockaddr *src_addr, struct sockaddr *dst_addr,
482 struct rdma_dev_addr *addr, int timeout_ms,
483 void (*callback)(int status, struct sockaddr *src_addr,
484 struct rdma_dev_addr *addr, void *context),
487 struct sockaddr *src_in, *dst_in;
488 struct addr_req *req;
491 req = kzalloc(sizeof *req, GFP_KERNEL);
495 src_in = (struct sockaddr *) &req->src_addr;
496 dst_in = (struct sockaddr *) &req->dst_addr;
499 if (src_addr->sa_family != dst_addr->sa_family) {
504 memcpy(src_in, src_addr, ip_addr_size(src_addr));
506 src_in->sa_family = dst_addr->sa_family;
509 memcpy(dst_in, dst_addr, ip_addr_size(dst_addr));
511 req->callback = callback;
512 req->context = context;
513 req->client = client;
514 atomic_inc(&client->refcount);
516 req->status = addr_resolve(src_in, dst_in, addr);
517 switch (req->status) {
519 req->timeout = jiffies;
523 req->timeout = msecs_to_jiffies(timeout_ms) + jiffies;
528 atomic_dec(&client->refcount);
536 EXPORT_SYMBOL(rdma_resolve_ip);
538 void rdma_addr_cancel(struct rdma_dev_addr *addr)
540 struct addr_req *req, *temp_req;
543 list_for_each_entry_safe(req, temp_req, &req_list, list) {
544 if (req->addr == addr) {
545 req->status = -ECANCELED;
546 req->timeout = jiffies;
547 list_move(&req->list, &req_list);
548 set_timeout(req->timeout);
554 EXPORT_SYMBOL(rdma_addr_cancel);
556 struct resolve_cb_context {
557 struct rdma_dev_addr *addr;
558 struct completion comp;
561 static void resolve_cb(int status, struct sockaddr *src_addr,
562 struct rdma_dev_addr *addr, void *context)
564 memcpy(((struct resolve_cb_context *)context)->addr, addr, sizeof(struct
566 complete(&((struct resolve_cb_context *)context)->comp);
569 int rdma_addr_find_dmac_by_grh(union ib_gid *sgid, union ib_gid *dgid, u8 *dmac,
570 u16 *vlan_id, u32 scope_id)
573 struct rdma_dev_addr dev_addr;
574 struct resolve_cb_context ctx;
575 struct net_device *dev;
578 struct sockaddr _sockaddr;
579 struct sockaddr_in _sockaddr_in;
580 struct sockaddr_in6 _sockaddr_in6;
581 } sgid_addr, dgid_addr;
584 ret = rdma_gid2ip(&sgid_addr._sockaddr, sgid, scope_id);
588 ret = rdma_gid2ip(&dgid_addr._sockaddr, dgid, scope_id);
592 memset(&dev_addr, 0, sizeof(dev_addr));
594 ctx.addr = &dev_addr;
595 init_completion(&ctx.comp);
596 ret = rdma_resolve_ip(&self, &sgid_addr._sockaddr, &dgid_addr._sockaddr,
597 &dev_addr, 1000, resolve_cb, &ctx);
601 wait_for_completion(&ctx.comp);
603 memcpy(dmac, dev_addr.dst_dev_addr, ETH_ALEN);
604 dev = dev_get_by_index(&init_net, dev_addr.bound_dev_if);
608 *vlan_id = rdma_vlan_dev_vlan_id(dev);
612 EXPORT_SYMBOL(rdma_addr_find_dmac_by_grh);
614 u32 rdma_get_ipv6_scope_id(struct ib_device *ib, u8 port_num)
618 if (ib->get_netdev == NULL)
620 ifp = ib->get_netdev(ib, port_num);
623 return (in6_getscopezone(ifp, IPV6_ADDR_SCOPE_LINKLOCAL));
629 int rdma_addr_find_smac_by_sgid(union ib_gid *sgid, u8 *smac, u16 *vlan_id,
633 struct rdma_dev_addr dev_addr;
635 struct sockaddr _sockaddr;
636 struct sockaddr_in _sockaddr_in;
637 struct sockaddr_in6 _sockaddr_in6;
640 ret = rdma_gid2ip(&gid_addr._sockaddr, sgid, scope_id);
643 memset(&dev_addr, 0, sizeof(dev_addr));
644 ret = rdma_translate_ip(&gid_addr._sockaddr, &dev_addr, vlan_id);
648 memcpy(smac, dev_addr.src_dev_addr, ETH_ALEN);
651 EXPORT_SYMBOL(rdma_addr_find_smac_by_sgid);
653 static int netevent_callback(struct notifier_block *self, unsigned long event,
656 if (event == NETEVENT_NEIGH_UPDATE) {
657 set_timeout(jiffies);
662 static struct notifier_block nb = {
663 .notifier_call = netevent_callback
666 static int __init addr_init(void)
668 INIT_DELAYED_WORK(&work, process_req);
669 addr_wq = create_singlethread_workqueue("ib_addr");
673 register_netevent_notifier(&nb);
674 rdma_addr_register_client(&self);
678 static void __exit addr_cleanup(void)
680 rdma_addr_unregister_client(&self);
681 unregister_netevent_notifier(&nb);
682 destroy_workqueue(addr_wq);
685 module_init(addr_init);
686 module_exit(addr_cleanup);