ipoib_main.c 49.7 KB
Newer Older
L
Linus Torvalds 已提交
1 2
/*
 * Copyright (c) 2004 Topspin Communications.  All rights reserved.
3 4
 * Copyright (c) 2005 Sun Microsystems, Inc. All rights reserved.
 * Copyright (c) 2004 Voltaire, Inc. All rights reserved.
L
Linus Torvalds 已提交
5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40
 *
 * This software is available to you under a choice of one of two
 * licenses.  You may choose to be licensed under the terms of the GNU
 * General Public License (GPL) Version 2, available from the file
 * COPYING in the main directory of this source tree, or the
 * OpenIB.org BSD license below:
 *
 *     Redistribution and use in source and binary forms, with or
 *     without modification, are permitted provided that the following
 *     conditions are met:
 *
 *      - Redistributions of source code must retain the above
 *        copyright notice, this list of conditions and the following
 *        disclaimer.
 *
 *      - Redistributions in binary form must reproduce the above
 *        copyright notice, this list of conditions and the following
 *        disclaimer in the documentation and/or other materials
 *        provided with the distribution.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
 * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
 * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
 * SOFTWARE.
 */

#include "ipoib.h"

#include <linux/module.h>

#include <linux/init.h>
#include <linux/slab.h>
41
#include <linux/kernel.h>
42
#include <linux/vmalloc.h>
L
Linus Torvalds 已提交
43 44 45 46 47 48

#include <linux/if_arp.h>	/* For ARPHRD_xxx */

#include <linux/ip.h>
#include <linux/in.h>

49 50
#include <linux/jhash.h>
#include <net/arp.h>
51 52 53
#include <net/addrconf.h>
#include <linux/inetdevice.h>
#include <rdma/ib_cache.h>
54

55 56 57 58
#define DRV_VERSION "1.0.0"

const char ipoib_driver_version[] = DRV_VERSION;

L
Linus Torvalds 已提交
59 60 61
MODULE_AUTHOR("Roland Dreier");
MODULE_DESCRIPTION("IP-over-InfiniBand net driver");
MODULE_LICENSE("Dual BSD/GPL");
62
MODULE_VERSION(DRV_VERSION);
L
Linus Torvalds 已提交
63

64 65 66 67 68 69 70 71
int ipoib_sendq_size __read_mostly = IPOIB_TX_RING_SIZE;
int ipoib_recvq_size __read_mostly = IPOIB_RX_RING_SIZE;

module_param_named(send_queue_size, ipoib_sendq_size, int, 0444);
MODULE_PARM_DESC(send_queue_size, "Number of descriptors in send queue");
module_param_named(recv_queue_size, ipoib_recvq_size, int, 0444);
MODULE_PARM_DESC(recv_queue_size, "Number of descriptors in receive queue");

L
Linus Torvalds 已提交
72 73 74 75 76 77 78
#ifdef CONFIG_INFINIBAND_IPOIB_DEBUG
int ipoib_debug_level;

module_param_named(debug_level, ipoib_debug_level, int, 0644);
MODULE_PARM_DESC(debug_level, "Enable debug tracing if > 0");
#endif

79 80 81 82 83
struct ipoib_path_iter {
	struct net_device *dev;
	struct ipoib_path  path;
};

L
Linus Torvalds 已提交
84 85 86 87 88 89 90 91
static const u8 ipv4_bcast_addr[] = {
	0x00, 0xff, 0xff, 0xff,
	0xff, 0x12, 0x40, 0x1b,	0x00, 0x00, 0x00, 0x00,
	0x00, 0x00, 0x00, 0x00,	0xff, 0xff, 0xff, 0xff
};

struct workqueue_struct *ipoib_workqueue;

92 93
struct ib_sa_client ipoib_sa_client;

L
Linus Torvalds 已提交
94
static void ipoib_add_one(struct ib_device *device);
95
static void ipoib_remove_one(struct ib_device *device, void *client_data);
96
static void ipoib_neigh_reclaim(struct rcu_head *rp);
97 98 99 100
static struct net_device *ipoib_get_net_dev_by_params(
		struct ib_device *dev, u8 port, u16 pkey,
		const union ib_gid *gid, const struct sockaddr *addr,
		void *client_data);
L
Linus Torvalds 已提交
101 102 103 104

static struct ib_client ipoib_client = {
	.name   = "ipoib",
	.add    = ipoib_add_one,
105 106
	.remove = ipoib_remove_one,
	.get_net_dev_by_params = ipoib_get_net_dev_by_params,
L
Linus Torvalds 已提交
107 108 109 110 111 112 113 114
};

int ipoib_open(struct net_device *dev)
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);

	ipoib_dbg(priv, "bringing up interface\n");

115 116
	netif_carrier_off(dev);

117
	set_bit(IPOIB_FLAG_ADMIN_UP, &priv->flags);
L
Linus Torvalds 已提交
118

119
	if (ipoib_ib_dev_open(dev)) {
120 121
		if (!test_bit(IPOIB_PKEY_ASSIGNED, &priv->flags))
			return 0;
122
		goto err_disable;
123
	}
124

125 126
	if (ipoib_ib_dev_up(dev))
		goto err_stop;
L
Linus Torvalds 已提交
127 128 129 130 131

	if (!test_bit(IPOIB_FLAG_SUBINTERFACE, &priv->flags)) {
		struct ipoib_dev_priv *cpriv;

		/* Bring up any child interfaces too */
132
		down_read(&priv->vlan_rwsem);
L
Linus Torvalds 已提交
133 134 135 136 137 138 139 140 141
		list_for_each_entry(cpriv, &priv->child_intfs, list) {
			int flags;

			flags = cpriv->dev->flags;
			if (flags & IFF_UP)
				continue;

			dev_change_flags(cpriv->dev, flags | IFF_UP);
		}
142
		up_read(&priv->vlan_rwsem);
L
Linus Torvalds 已提交
143 144 145 146 147
	}

	netif_start_queue(dev);

	return 0;
148 149

err_stop:
150
	ipoib_ib_dev_stop(dev);
151 152 153 154 155

err_disable:
	clear_bit(IPOIB_FLAG_ADMIN_UP, &priv->flags);

	return -EINVAL;
L
Linus Torvalds 已提交
156 157 158 159 160 161 162 163 164 165 166 167
}

static int ipoib_stop(struct net_device *dev)
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);

	ipoib_dbg(priv, "stopping interface\n");

	clear_bit(IPOIB_FLAG_ADMIN_UP, &priv->flags);

	netif_stop_queue(dev);

168 169
	ipoib_ib_dev_down(dev);
	ipoib_ib_dev_stop(dev);
L
Linus Torvalds 已提交
170 171 172 173 174

	if (!test_bit(IPOIB_FLAG_SUBINTERFACE, &priv->flags)) {
		struct ipoib_dev_priv *cpriv;

		/* Bring down any child interfaces too */
175
		down_read(&priv->vlan_rwsem);
L
Linus Torvalds 已提交
176 177 178 179 180 181 182 183 184
		list_for_each_entry(cpriv, &priv->child_intfs, list) {
			int flags;

			flags = cpriv->dev->flags;
			if (!(flags & IFF_UP))
				continue;

			dev_change_flags(cpriv->dev, flags & ~IFF_UP);
		}
185
		up_read(&priv->vlan_rwsem);
L
Linus Torvalds 已提交
186 187 188 189 190
	}

	return 0;
}

O
Or Gerlitz 已提交
191 192 193 194 195
static void ipoib_uninit(struct net_device *dev)
{
	ipoib_dev_cleanup(dev);
}

196
static netdev_features_t ipoib_fix_features(struct net_device *dev, netdev_features_t features)
197 198 199 200
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);

	if (test_bit(IPOIB_FLAG_ADMIN_CM, &priv->flags))
201
		features &= ~(NETIF_F_IP_CSUM | NETIF_F_TSO);
202 203 204 205

	return features;
}

L
Linus Torvalds 已提交
206 207 208 209
static int ipoib_change_mtu(struct net_device *dev, int new_mtu)
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);

210
	/* dev->mtu > 2K ==> connected mode */
211 212 213 214
	if (ipoib_cm_admin_enabled(dev)) {
		if (new_mtu > ipoib_cm_max_mtu(dev))
			return -EINVAL;

215 216 217
		if (new_mtu > priv->mcast_mtu)
			ipoib_warn(priv, "mtu > %d will cause multicast packet drops.\n",
				   priv->mcast_mtu);
218

219 220 221 222
		dev->mtu = new_mtu;
		return 0;
	}

223
	if (new_mtu > IPOIB_UD_MTU(priv->max_ib_mtu))
L
Linus Torvalds 已提交
224 225 226 227 228 229 230 231 232
		return -EINVAL;

	priv->admin_mtu = new_mtu;

	dev->mtu = min(priv->mcast_mtu, priv->admin_mtu);

	return 0;
}

233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451
/* Called with an RCU read lock taken */
static bool ipoib_is_dev_match_addr_rcu(const struct sockaddr *addr,
					struct net_device *dev)
{
	struct net *net = dev_net(dev);
	struct in_device *in_dev;
	struct sockaddr_in *addr_in = (struct sockaddr_in *)addr;
	struct sockaddr_in6 *addr_in6 = (struct sockaddr_in6 *)addr;
	__be32 ret_addr;

	switch (addr->sa_family) {
	case AF_INET:
		in_dev = in_dev_get(dev);
		if (!in_dev)
			return false;

		ret_addr = inet_confirm_addr(net, in_dev, 0,
					     addr_in->sin_addr.s_addr,
					     RT_SCOPE_HOST);
		in_dev_put(in_dev);
		if (ret_addr)
			return true;

		break;
	case AF_INET6:
		if (IS_ENABLED(CONFIG_IPV6) &&
		    ipv6_chk_addr(net, &addr_in6->sin6_addr, dev, 1))
			return true;

		break;
	}
	return false;
}

/**
 * Find the master net_device on top of the given net_device.
 * @dev: base IPoIB net_device
 *
 * Returns the master net_device with a reference held, or the same net_device
 * if no master exists.
 */
static struct net_device *ipoib_get_master_net_dev(struct net_device *dev)
{
	struct net_device *master;

	rcu_read_lock();
	master = netdev_master_upper_dev_get_rcu(dev);
	if (master)
		dev_hold(master);
	rcu_read_unlock();

	if (master)
		return master;

	dev_hold(dev);
	return dev;
}

/**
 * Find a net_device matching the given address, which is an upper device of
 * the given net_device.
 * @addr: IP address to look for.
 * @dev: base IPoIB net_device
 *
 * If found, returns the net_device with a reference held. Otherwise return
 * NULL.
 */
static struct net_device *ipoib_get_net_dev_match_addr(
		const struct sockaddr *addr, struct net_device *dev)
{
	struct net_device *upper,
			  *result = NULL;
	struct list_head *iter;

	rcu_read_lock();
	if (ipoib_is_dev_match_addr_rcu(addr, dev)) {
		dev_hold(dev);
		result = dev;
		goto out;
	}

	netdev_for_each_all_upper_dev_rcu(dev, upper, iter) {
		if (ipoib_is_dev_match_addr_rcu(addr, upper)) {
			dev_hold(upper);
			result = upper;
			break;
		}
	}
out:
	rcu_read_unlock();
	return result;
}

/* returns the number of IPoIB netdevs on top a given ipoib device matching a
 * pkey_index and address, if one exists.
 *
 * @found_net_dev: contains a matching net_device if the return value >= 1,
 * with a reference held. */
static int ipoib_match_gid_pkey_addr(struct ipoib_dev_priv *priv,
				     const union ib_gid *gid,
				     u16 pkey_index,
				     const struct sockaddr *addr,
				     int nesting,
				     struct net_device **found_net_dev)
{
	struct ipoib_dev_priv *child_priv;
	struct net_device *net_dev = NULL;
	int matches = 0;

	if (priv->pkey_index == pkey_index &&
	    (!gid || !memcmp(gid, &priv->local_gid, sizeof(*gid)))) {
		if (!addr) {
			net_dev = ipoib_get_master_net_dev(priv->dev);
		} else {
			/* Verify the net_device matches the IP address, as
			 * IPoIB child devices currently share a GID. */
			net_dev = ipoib_get_net_dev_match_addr(addr, priv->dev);
		}
		if (net_dev) {
			if (!*found_net_dev)
				*found_net_dev = net_dev;
			else
				dev_put(net_dev);
			++matches;
		}
	}

	/* Check child interfaces */
	down_read_nested(&priv->vlan_rwsem, nesting);
	list_for_each_entry(child_priv, &priv->child_intfs, list) {
		matches += ipoib_match_gid_pkey_addr(child_priv, gid,
						    pkey_index, addr,
						    nesting + 1,
						    found_net_dev);
		if (matches > 1)
			break;
	}
	up_read(&priv->vlan_rwsem);

	return matches;
}

/* Returns the number of matching net_devs found (between 0 and 2). Also
 * return the matching net_device in the @net_dev parameter, holding a
 * reference to the net_device, if the number of matches >= 1 */
static int __ipoib_get_net_dev_by_params(struct list_head *dev_list, u8 port,
					 u16 pkey_index,
					 const union ib_gid *gid,
					 const struct sockaddr *addr,
					 struct net_device **net_dev)
{
	struct ipoib_dev_priv *priv;
	int matches = 0;

	*net_dev = NULL;

	list_for_each_entry(priv, dev_list, list) {
		if (priv->port != port)
			continue;

		matches += ipoib_match_gid_pkey_addr(priv, gid, pkey_index,
						     addr, 0, net_dev);
		if (matches > 1)
			break;
	}

	return matches;
}

static struct net_device *ipoib_get_net_dev_by_params(
		struct ib_device *dev, u8 port, u16 pkey,
		const union ib_gid *gid, const struct sockaddr *addr,
		void *client_data)
{
	struct net_device *net_dev;
	struct list_head *dev_list = client_data;
	u16 pkey_index;
	int matches;
	int ret;

	if (!rdma_protocol_ib(dev, port))
		return NULL;

	ret = ib_find_cached_pkey(dev, port, pkey, &pkey_index);
	if (ret)
		return NULL;

	if (!dev_list)
		return NULL;

	/* See if we can find a unique device matching the L2 parameters */
	matches = __ipoib_get_net_dev_by_params(dev_list, port, pkey_index,
						gid, NULL, &net_dev);

	switch (matches) {
	case 0:
		return NULL;
	case 1:
		return net_dev;
	}

	dev_put(net_dev);

	/* Couldn't find a unique device with L2 parameters only. Use L3
	 * address to uniquely match the net device */
	matches = __ipoib_get_net_dev_by_params(dev_list, port, pkey_index,
						gid, addr, &net_dev);
	switch (matches) {
	case 0:
		return NULL;
	default:
		dev_warn_ratelimited(&dev->dev,
				     "duplicate IP address detected\n");
		/* Fall through */
	case 1:
		return net_dev;
	}
}

452 453 454 455 456 457 458 459 460 461
int ipoib_set_mode(struct net_device *dev, const char *buf)
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);

	/* flush paths if we switch modes so that connections are restarted */
	if (IPOIB_CM_SUPPORTED(dev->dev_addr) && !strcmp(buf, "connected\n")) {
		set_bit(IPOIB_FLAG_ADMIN_CM, &priv->flags);
		ipoib_warn(priv, "enabling connected mode "
			   "will cause multicast packet drops\n");
		netdev_update_features(dev);
462
		dev_set_mtu(dev, ipoib_cm_max_mtu(dev));
463
		rtnl_unlock();
C
Christoph Hellwig 已提交
464
		priv->tx_wr.wr.send_flags &= ~IB_SEND_IP_CSUM;
465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483

		ipoib_flush_paths(dev);
		rtnl_lock();
		return 0;
	}

	if (!strcmp(buf, "datagram\n")) {
		clear_bit(IPOIB_FLAG_ADMIN_CM, &priv->flags);
		netdev_update_features(dev);
		dev_set_mtu(dev, min(priv->mcast_mtu, dev->mtu));
		rtnl_unlock();
		ipoib_flush_paths(dev);
		rtnl_lock();
		return 0;
	}

	return -EINVAL;
}

484
static struct ipoib_path *__path_find(struct net_device *dev, void *gid)
L
Linus Torvalds 已提交
485 486 487 488 489 490 491 492 493
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);
	struct rb_node *n = priv->path_tree.rb_node;
	struct ipoib_path *path;
	int ret;

	while (n) {
		path = rb_entry(n, struct ipoib_path, rb_node);

494
		ret = memcmp(gid, path->pathrec.dgid.raw,
L
Linus Torvalds 已提交
495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543 544
			     sizeof (union ib_gid));

		if (ret < 0)
			n = n->rb_left;
		else if (ret > 0)
			n = n->rb_right;
		else
			return path;
	}

	return NULL;
}

static int __path_add(struct net_device *dev, struct ipoib_path *path)
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);
	struct rb_node **n = &priv->path_tree.rb_node;
	struct rb_node *pn = NULL;
	struct ipoib_path *tpath;
	int ret;

	while (*n) {
		pn = *n;
		tpath = rb_entry(pn, struct ipoib_path, rb_node);

		ret = memcmp(path->pathrec.dgid.raw, tpath->pathrec.dgid.raw,
			     sizeof (union ib_gid));
		if (ret < 0)
			n = &pn->rb_left;
		else if (ret > 0)
			n = &pn->rb_right;
		else
			return -EEXIST;
	}

	rb_link_node(&path->rb_node, pn, n);
	rb_insert_color(&path->rb_node, &priv->path_tree);

	list_add_tail(&path->list, &priv->path_list);

	return 0;
}

static void path_free(struct net_device *dev, struct ipoib_path *path)
{
	struct sk_buff *skb;

	while ((skb = __skb_dequeue(&path->queue)))
		dev_kfree_skb_irq(skb);

545
	ipoib_dbg(netdev_priv(dev), "path_free\n");
L
Linus Torvalds 已提交
546

547 548
	/* remove all neigh connected to this path */
	ipoib_del_neighs_by_gid(dev, path->pathrec.dgid.raw);
L
Linus Torvalds 已提交
549 550 551 552 553 554 555

	if (path->ah)
		ipoib_put_ah(path->ah);

	kfree(path);
}

556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613
#ifdef CONFIG_INFINIBAND_IPOIB_DEBUG

struct ipoib_path_iter *ipoib_path_iter_init(struct net_device *dev)
{
	struct ipoib_path_iter *iter;

	iter = kmalloc(sizeof *iter, GFP_KERNEL);
	if (!iter)
		return NULL;

	iter->dev = dev;
	memset(iter->path.pathrec.dgid.raw, 0, 16);

	if (ipoib_path_iter_next(iter)) {
		kfree(iter);
		return NULL;
	}

	return iter;
}

int ipoib_path_iter_next(struct ipoib_path_iter *iter)
{
	struct ipoib_dev_priv *priv = netdev_priv(iter->dev);
	struct rb_node *n;
	struct ipoib_path *path;
	int ret = 1;

	spin_lock_irq(&priv->lock);

	n = rb_first(&priv->path_tree);

	while (n) {
		path = rb_entry(n, struct ipoib_path, rb_node);

		if (memcmp(iter->path.pathrec.dgid.raw, path->pathrec.dgid.raw,
			   sizeof (union ib_gid)) < 0) {
			iter->path = *path;
			ret = 0;
			break;
		}

		n = rb_next(n);
	}

	spin_unlock_irq(&priv->lock);

	return ret;
}

void ipoib_path_iter_read(struct ipoib_path_iter *iter,
			  struct ipoib_path *path)
{
	*path = iter->path;
}

#endif /* CONFIG_INFINIBAND_IPOIB_DEBUG */

614 615 616 617 618 619 620 621
void ipoib_mark_paths_invalid(struct net_device *dev)
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);
	struct ipoib_path *path, *tp;

	spin_lock_irq(&priv->lock);

	list_for_each_entry_safe(path, tp, &priv->path_list, list) {
H
Harvey Harrison 已提交
622
		ipoib_dbg(priv, "mark path LID 0x%04x GID %pI6 invalid\n",
623
			be16_to_cpu(path->pathrec.dlid),
624
			path->pathrec.dgid.raw);
625 626 627 628 629 630
		path->valid =  0;
	}

	spin_unlock_irq(&priv->lock);
}

L
Linus Torvalds 已提交
631 632 633 634 635
void ipoib_flush_paths(struct net_device *dev)
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);
	struct ipoib_path *path, *tp;
	LIST_HEAD(remove_list);
636
	unsigned long flags;
L
Linus Torvalds 已提交
637

638 639
	netif_tx_lock_bh(dev);
	spin_lock_irqsave(&priv->lock, flags);
L
Linus Torvalds 已提交
640

641
	list_splice_init(&priv->path_list, &remove_list);
L
Linus Torvalds 已提交
642 643 644 645 646 647 648

	list_for_each_entry(path, &remove_list, list)
		rb_erase(&path->rb_node, &priv->path_tree);

	list_for_each_entry_safe(path, tp, &remove_list, list) {
		if (path->query)
			ib_sa_cancel_query(path->query_id, path->query);
649 650
		spin_unlock_irqrestore(&priv->lock, flags);
		netif_tx_unlock_bh(dev);
L
Linus Torvalds 已提交
651 652
		wait_for_completion(&path->done);
		path_free(dev, path);
653 654
		netif_tx_lock_bh(dev);
		spin_lock_irqsave(&priv->lock, flags);
L
Linus Torvalds 已提交
655
	}
656 657 658

	spin_unlock_irqrestore(&priv->lock, flags);
	netif_tx_unlock_bh(dev);
L
Linus Torvalds 已提交
659 660 661 662 663 664 665 666 667 668
}

static void path_rec_completion(int status,
				struct ib_sa_path_rec *pathrec,
				void *path_ptr)
{
	struct ipoib_path *path = path_ptr;
	struct net_device *dev = path->dev;
	struct ipoib_dev_priv *priv = netdev_priv(dev);
	struct ipoib_ah *ah = NULL;
669
	struct ipoib_ah *old_ah = NULL;
670
	struct ipoib_neigh *neigh, *tn;
L
Linus Torvalds 已提交
671 672 673 674
	struct sk_buff_head skqueue;
	struct sk_buff *skb;
	unsigned long flags;

675
	if (!status)
H
Harvey Harrison 已提交
676
		ipoib_dbg(priv, "PathRec LID 0x%04x for GID %pI6\n",
677
			  be16_to_cpu(pathrec->dlid), pathrec->dgid.raw);
L
Linus Torvalds 已提交
678
	else
H
Harvey Harrison 已提交
679
		ipoib_dbg(priv, "PathRec status %d for GID %pI6\n",
680
			  status, path->pathrec.dgid.raw);
L
Linus Torvalds 已提交
681 682 683 684

	skb_queue_head_init(&skqueue);

	if (!status) {
685 686 687 688
		struct ib_ah_attr av;

		if (!ib_init_ah_from_path(priv->ca, priv->port, pathrec, &av))
			ah = ipoib_create_ah(dev, priv->pd, &av);
L
Linus Torvalds 已提交
689 690 691 692
	}

	spin_lock_irqsave(&priv->lock, flags);

693
	if (!IS_ERR_OR_NULL(ah)) {
L
Linus Torvalds 已提交
694 695
		path->pathrec = *pathrec;

696 697 698
		old_ah   = path->ah;
		path->ah = ah;

L
Linus Torvalds 已提交
699 700 701 702 703 704
		ipoib_dbg(priv, "created address handle %p for LID 0x%04x, SL %d\n",
			  ah, be16_to_cpu(pathrec->dlid), pathrec->sl);

		while ((skb = __skb_dequeue(&path->queue)))
			__skb_queue_tail(&skqueue, skb);

705
		list_for_each_entry_safe(neigh, tn, &path->neigh_list, list) {
706 707 708 709 710 711 712 713 714 715 716
			if (neigh->ah) {
				WARN_ON(neigh->ah != old_ah);
				/*
				 * Dropping the ah reference inside
				 * priv->lock is safe here, because we
				 * will hold one more reference from
				 * the original value of path->ah (ie
				 * old_ah).
				 */
				ipoib_put_ah(neigh->ah);
			}
L
Linus Torvalds 已提交
717 718 719
			kref_get(&path->ah->ref);
			neigh->ah = path->ah;

720
			if (ipoib_cm_enabled(dev, neigh->daddr)) {
721 722 723 724 725
				if (!ipoib_cm_get(neigh))
					ipoib_cm_set(neigh, ipoib_cm_create_tx(dev,
									       path,
									       neigh));
				if (!ipoib_cm_get(neigh)) {
726
					ipoib_neigh_free(neigh);
727 728 729 730
					continue;
				}
			}

L
Linus Torvalds 已提交
731 732 733
			while ((skb = __skb_dequeue(&neigh->queue)))
				__skb_queue_tail(&skqueue, skb);
		}
734
		path->valid = 1;
735
	}
L
Linus Torvalds 已提交
736

737
	path->query = NULL;
L
Linus Torvalds 已提交
738 739 740 741
	complete(&path->done);

	spin_unlock_irqrestore(&priv->lock, flags);

742 743 744
	if (IS_ERR_OR_NULL(ah))
		ipoib_del_neighs_by_gid(dev, path->pathrec.dgid.raw);

745 746 747
	if (old_ah)
		ipoib_put_ah(old_ah);

L
Linus Torvalds 已提交
748 749 750 751 752 753 754 755
	while ((skb = __skb_dequeue(&skqueue))) {
		skb->dev = dev;
		if (dev_queue_xmit(skb))
			ipoib_warn(priv, "dev_queue_xmit failed "
				   "to requeue packet\n");
	}
}

756
static struct ipoib_path *path_rec_create(struct net_device *dev, void *gid)
L
Linus Torvalds 已提交
757 758 759 760
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);
	struct ipoib_path *path;

761 762 763
	if (!priv->broadcast)
		return NULL;

764
	path = kzalloc(sizeof *path, GFP_ATOMIC);
L
Linus Torvalds 已提交
765 766 767
	if (!path)
		return NULL;

768
	path->dev = dev;
L
Linus Torvalds 已提交
769 770 771 772 773

	skb_queue_head_init(&path->queue);

	INIT_LIST_HEAD(&path->neigh_list);

774
	memcpy(path->pathrec.dgid.raw, gid, sizeof (union ib_gid));
775 776
	path->pathrec.sgid	    = priv->local_gid;
	path->pathrec.pkey	    = cpu_to_be16(priv->pkey);
777 778
	path->pathrec.numb_path     = 1;
	path->pathrec.traffic_class = priv->broadcast->mcmember.traffic_class;
L
Linus Torvalds 已提交
779 780 781 782 783 784 785 786 787

	return path;
}

static int path_rec_start(struct net_device *dev,
			  struct ipoib_path *path)
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);

H
Harvey Harrison 已提交
788
	ipoib_dbg(priv, "Start path record lookup for %pI6\n",
789
		  path->pathrec.dgid.raw);
L
Linus Torvalds 已提交
790

791 792
	init_completion(&path->done);

L
Linus Torvalds 已提交
793
	path->query_id =
794
		ib_sa_path_rec_get(&ipoib_sa_client, priv->ca, priv->port,
L
Linus Torvalds 已提交
795 796 797 798
				   &path->pathrec,
				   IB_SA_PATH_REC_DGID		|
				   IB_SA_PATH_REC_SGID		|
				   IB_SA_PATH_REC_NUMB_PATH	|
799
				   IB_SA_PATH_REC_TRAFFIC_CLASS |
L
Linus Torvalds 已提交
800 801 802 803 804
				   IB_SA_PATH_REC_PKEY,
				   1000, GFP_ATOMIC,
				   path_rec_completion,
				   path, &path->query);
	if (path->query_id < 0) {
805
		ipoib_warn(priv, "ib_sa_path_rec_get failed: %d\n", path->query_id);
L
Linus Torvalds 已提交
806
		path->query = NULL;
807
		complete(&path->done);
L
Linus Torvalds 已提交
808 809 810 811 812 813
		return path->query_id;
	}

	return 0;
}

814 815
static void neigh_add_path(struct sk_buff *skb, u8 *daddr,
			   struct net_device *dev)
L
Linus Torvalds 已提交
816 817 818 819
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);
	struct ipoib_path *path;
	struct ipoib_neigh *neigh;
820
	unsigned long flags;
L
Linus Torvalds 已提交
821

822
	spin_lock_irqsave(&priv->lock, flags);
823
	neigh = ipoib_neigh_alloc(daddr, dev);
L
Linus Torvalds 已提交
824
	if (!neigh) {
825
		spin_unlock_irqrestore(&priv->lock, flags);
826
		++dev->stats.tx_dropped;
L
Linus Torvalds 已提交
827 828 829 830
		dev_kfree_skb_any(skb);
		return;
	}

831
	path = __path_find(dev, daddr + 4);
L
Linus Torvalds 已提交
832
	if (!path) {
833
		path = path_rec_create(dev, daddr + 4);
L
Linus Torvalds 已提交
834
		if (!path)
835
			goto err_path;
L
Linus Torvalds 已提交
836 837 838 839 840 841

		__path_add(dev, path);
	}

	list_add_tail(&neigh->list, &path->neigh_list);

842
	if (path->ah) {
L
Linus Torvalds 已提交
843 844 845
		kref_get(&path->ah->ref);
		neigh->ah = path->ah;

846
		if (ipoib_cm_enabled(dev, neigh->daddr)) {
847 848 849
			if (!ipoib_cm_get(neigh))
				ipoib_cm_set(neigh, ipoib_cm_create_tx(dev, path, neigh));
			if (!ipoib_cm_get(neigh)) {
850
				ipoib_neigh_free(neigh);
851 852 853 854 855 856 857 858 859
				goto err_drop;
			}
			if (skb_queue_len(&neigh->queue) < IPOIB_MAX_PATH_REC_QUEUE)
				__skb_queue_tail(&neigh->queue, skb);
			else {
				ipoib_warn(priv, "queue length limit %d. Packet drop.\n",
					   skb_queue_len(&neigh->queue));
				goto err_drop;
			}
860 861
		} else {
			spin_unlock_irqrestore(&priv->lock, flags);
862 863
			ipoib_send(dev, skb, path->ah, IPOIB_QPN(daddr));
			ipoib_neigh_put(neigh);
864 865
			return;
		}
L
Linus Torvalds 已提交
866 867 868 869
	} else {
		neigh->ah  = NULL;

		if (!path->query && path_rec_start(dev, path))
870
			goto err_path;
871 872 873 874
		if (skb_queue_len(&neigh->queue) < IPOIB_MAX_PATH_REC_QUEUE)
			__skb_queue_tail(&neigh->queue, skb);
		else
			goto err_drop;
L
Linus Torvalds 已提交
875 876
	}

877
	spin_unlock_irqrestore(&priv->lock, flags);
878
	ipoib_neigh_put(neigh);
L
Linus Torvalds 已提交
879 880
	return;

881
err_path:
882
	ipoib_neigh_free(neigh);
883
err_drop:
884
	++dev->stats.tx_dropped;
L
Linus Torvalds 已提交
885 886
	dev_kfree_skb_any(skb);

887
	spin_unlock_irqrestore(&priv->lock, flags);
888
	ipoib_neigh_put(neigh);
L
Linus Torvalds 已提交
889 890 891
}

static void unicast_arp_send(struct sk_buff *skb, struct net_device *dev,
892
			     struct ipoib_cb *cb)
L
Linus Torvalds 已提交
893 894 895
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);
	struct ipoib_path *path;
896
	unsigned long flags;
L
Linus Torvalds 已提交
897

898
	spin_lock_irqsave(&priv->lock, flags);
L
Linus Torvalds 已提交
899

900
	path = __path_find(dev, cb->hwaddr + 4);
901
	if (!path || !path->valid) {
902 903 904
		int new_path = 0;

		if (!path) {
905
			path = path_rec_create(dev, cb->hwaddr + 4);
906 907
			new_path = 1;
		}
L
Linus Torvalds 已提交
908
		if (path) {
909 910 911 912 913 914
			if (skb_queue_len(&path->queue) < IPOIB_MAX_PATH_REC_QUEUE) {
				__skb_queue_tail(&path->queue, skb);
			} else {
				++dev->stats.tx_dropped;
				dev_kfree_skb_any(skb);
			}
L
Linus Torvalds 已提交
915

916
			if (!path->query && path_rec_start(dev, path)) {
917
				spin_unlock_irqrestore(&priv->lock, flags);
918 919
				if (new_path)
					path_free(dev, path);
L
Linus Torvalds 已提交
920 921 922 923
				return;
			} else
				__path_add(dev, path);
		} else {
924
			++dev->stats.tx_dropped;
L
Linus Torvalds 已提交
925 926 927
			dev_kfree_skb_any(skb);
		}

928
		spin_unlock_irqrestore(&priv->lock, flags);
L
Linus Torvalds 已提交
929 930 931
		return;
	}

932
	if (path->ah) {
L
Linus Torvalds 已提交
933 934 935
		ipoib_dbg(priv, "Send unicast ARP to %04x\n",
			  be16_to_cpu(path->pathrec.dlid));

936
		spin_unlock_irqrestore(&priv->lock, flags);
937
		ipoib_send(dev, skb, path->ah, IPOIB_QPN(cb->hwaddr));
938
		return;
L
Linus Torvalds 已提交
939 940 941 942
	} else if ((path->query || !path_rec_start(dev, path)) &&
		   skb_queue_len(&path->queue) < IPOIB_MAX_PATH_REC_QUEUE) {
		__skb_queue_tail(&path->queue, skb);
	} else {
943
		++dev->stats.tx_dropped;
L
Linus Torvalds 已提交
944 945 946
		dev_kfree_skb_any(skb);
	}

947
	spin_unlock_irqrestore(&priv->lock, flags);
L
Linus Torvalds 已提交
948 949 950 951 952 953
}

static int ipoib_start_xmit(struct sk_buff *skb, struct net_device *dev)
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);
	struct ipoib_neigh *neigh;
954
	struct ipoib_cb *cb = ipoib_skb_cb(skb);
955
	struct ipoib_header *header;
L
Linus Torvalds 已提交
956 957
	unsigned long flags;

958 959 960 961 962 963 964
	header = (struct ipoib_header *) skb->data;

	if (unlikely(cb->hwaddr[4] == 0xff)) {
		/* multicast, arrange "if" according to probability */
		if ((header->proto != htons(ETH_P_IP)) &&
		    (header->proto != htons(ETH_P_IPV6)) &&
		    (header->proto != htons(ETH_P_ARP)) &&
965 966
		    (header->proto != htons(ETH_P_RARP)) &&
		    (header->proto != htons(ETH_P_TIPC))) {
967
			/* ethertype not supported by IPoIB */
968 969
			++dev->stats.tx_dropped;
			dev_kfree_skb_any(skb);
970
			return NETDEV_TX_OK;
971
		}
972 973 974 975 976 977 978 979 980
		/* Add in the P_Key for multicast*/
		cb->hwaddr[8] = (priv->pkey >> 8) & 0xff;
		cb->hwaddr[9] = priv->pkey & 0xff;

		neigh = ipoib_neigh_get(dev, cb->hwaddr);
		if (likely(neigh))
			goto send_using_neigh;
		ipoib_mcast_send(dev, cb->hwaddr, skb);
		return NETDEV_TX_OK;
981
	}
L
Linus Torvalds 已提交
982

983 984 985 986
	/* unicast, arrange "switch" according to probability */
	switch (header->proto) {
	case htons(ETH_P_IP):
	case htons(ETH_P_IPV6):
987
	case htons(ETH_P_TIPC):
988 989 990 991
		neigh = ipoib_neigh_get(dev, cb->hwaddr);
		if (unlikely(!neigh)) {
			neigh_add_path(skb, cb->hwaddr, dev);
			return NETDEV_TX_OK;
992
		}
993 994 995 996 997 998 999 1000 1001 1002 1003 1004
		break;
	case htons(ETH_P_ARP):
	case htons(ETH_P_RARP):
		/* for unicast ARP and RARP should always perform path find */
		unicast_arp_send(skb, dev, cb);
		return NETDEV_TX_OK;
	default:
		/* ethertype not supported by IPoIB */
		++dev->stats.tx_dropped;
		dev_kfree_skb_any(skb);
		return NETDEV_TX_OK;
	}
1005

1006 1007 1008 1009 1010 1011
send_using_neigh:
	/* note we now hold a ref to neigh */
	if (ipoib_cm_get(neigh)) {
		if (ipoib_cm_up(neigh)) {
			ipoib_cm_send(dev, skb, ipoib_cm_get(neigh));
			goto unref;
L
Linus Torvalds 已提交
1012
		}
1013 1014 1015 1016
	} else if (neigh->ah) {
		ipoib_send(dev, skb, neigh->ah, IPOIB_QPN(cb->hwaddr));
		goto unref;
	}
L
Linus Torvalds 已提交
1017

1018 1019 1020 1021
	if (skb_queue_len(&neigh->queue) < IPOIB_MAX_PATH_REC_QUEUE) {
		spin_lock_irqsave(&priv->lock, flags);
		__skb_queue_tail(&neigh->queue, skb);
		spin_unlock_irqrestore(&priv->lock, flags);
L
Linus Torvalds 已提交
1022
	} else {
1023 1024 1025
		++dev->stats.tx_dropped;
		dev_kfree_skb_any(skb);
	}
L
Linus Torvalds 已提交
1026

1027 1028
unref:
	ipoib_neigh_put(neigh);
L
Linus Torvalds 已提交
1029 1030 1031 1032 1033 1034 1035 1036

	return NETDEV_TX_OK;
}

static void ipoib_timeout(struct net_device *dev)
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);

1037 1038 1039 1040 1041
	ipoib_warn(priv, "transmit timeout: latency %d msecs\n",
		   jiffies_to_msecs(jiffies - dev->trans_start));
	ipoib_warn(priv, "queue stopped %d, tx_head %u, tx_tail %u\n",
		   netif_queue_stopped(dev),
		   priv->tx_head, priv->tx_tail);
L
Linus Torvalds 已提交
1042 1043 1044 1045 1046 1047
	/* XXX reset QP, etc. */
}

static int ipoib_hard_header(struct sk_buff *skb,
			     struct net_device *dev,
			     unsigned short type,
1048
			     const void *daddr, const void *saddr, unsigned len)
L
Linus Torvalds 已提交
1049 1050
{
	struct ipoib_header *header;
1051
	struct ipoib_cb *cb = ipoib_skb_cb(skb);
L
Linus Torvalds 已提交
1052 1053 1054 1055 1056 1057 1058

	header = (struct ipoib_header *) skb_push(skb, sizeof *header);

	header->proto = htons(type);
	header->reserved = 0;

	/*
1059
	 * we don't rely on dst_entry structure,  always stuff the
1060 1061
	 * destination address into skb->cb so we can figure out where
	 * to send the packet later.
L
Linus Torvalds 已提交
1062
	 */
1063
	memcpy(cb->hwaddr, daddr, INFINIBAND_ALEN);
L
Linus Torvalds 已提交
1064

1065
	return sizeof *header;
L
Linus Torvalds 已提交
1066 1067 1068 1069 1070 1071
}

static void ipoib_set_mcast_list(struct net_device *dev)
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);

L
Leonid Arsh 已提交
1072 1073 1074 1075 1076
	if (!test_bit(IPOIB_FLAG_OPER_UP, &priv->flags)) {
		ipoib_dbg(priv, "IPOIB_FLAG_OPER_UP not set");
		return;
	}

1077
	queue_work(priv->wq, &priv->restart_task);
L
Linus Torvalds 已提交
1078 1079
}

1080 1081 1082 1083
static int ipoib_get_iflink(const struct net_device *dev)
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);

E
Erez Shitrit 已提交
1084 1085 1086 1087 1088
	/* parent interface */
	if (!test_bit(IPOIB_FLAG_SUBINTERFACE, &priv->flags))
		return dev->ifindex;

	/* child/vlan interface */
1089 1090 1091
	return priv->parent->ifindex;
}

1092
static u32 ipoib_addr_hash(struct ipoib_neigh_hash *htbl, u8 *daddr)
L
Linus Torvalds 已提交
1093
{
1094 1095 1096 1097 1098 1099 1100
	/*
	 * Use only the address parts that contributes to spreading
	 * The subnet prefix is not used as one can not connect to
	 * same remote port (GUID) using the same remote QPN via two
	 * different subnets.
	 */
	 /* qpn octets[1:4) & port GUID octets[12:20) */
1101
	u32 *d32 = (u32 *) daddr;
1102 1103
	u32 hv;

1104
	hv = jhash_3words(d32[3], d32[4], IPOIB_QPN_MASK & d32[0], 0);
1105 1106 1107 1108 1109 1110 1111 1112 1113 1114 1115 1116 1117 1118 1119 1120 1121 1122 1123 1124 1125 1126 1127 1128 1129 1130 1131 1132 1133 1134 1135 1136 1137 1138 1139 1140 1141 1142 1143 1144 1145 1146 1147 1148 1149
	return hv & htbl->mask;
}

struct ipoib_neigh *ipoib_neigh_get(struct net_device *dev, u8 *daddr)
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);
	struct ipoib_neigh_table *ntbl = &priv->ntbl;
	struct ipoib_neigh_hash *htbl;
	struct ipoib_neigh *neigh = NULL;
	u32 hash_val;

	rcu_read_lock_bh();

	htbl = rcu_dereference_bh(ntbl->htbl);

	if (!htbl)
		goto out_unlock;

	hash_val = ipoib_addr_hash(htbl, daddr);
	for (neigh = rcu_dereference_bh(htbl->buckets[hash_val]);
	     neigh != NULL;
	     neigh = rcu_dereference_bh(neigh->hnext)) {
		if (memcmp(daddr, neigh->daddr, INFINIBAND_ALEN) == 0) {
			/* found, take one ref on behalf of the caller */
			if (!atomic_inc_not_zero(&neigh->refcnt)) {
				/* deleted */
				neigh = NULL;
				goto out_unlock;
			}
			neigh->alive = jiffies;
			goto out_unlock;
		}
	}

out_unlock:
	rcu_read_unlock_bh();
	return neigh;
}

static void __ipoib_reap_neigh(struct ipoib_dev_priv *priv)
{
	struct ipoib_neigh_table *ntbl = &priv->ntbl;
	struct ipoib_neigh_hash *htbl;
	unsigned long neigh_obsolete;
	unsigned long dt;
L
Linus Torvalds 已提交
1150
	unsigned long flags;
1151
	int i;
1152 1153
	LIST_HEAD(remove_list);
	struct net_device *dev = priv->dev;
L
Linus Torvalds 已提交
1154

1155
	if (test_bit(IPOIB_STOP_NEIGH_GC, &priv->flags))
1156
		return;
L
Linus Torvalds 已提交
1157

1158
	spin_lock_irqsave(&priv->lock, flags);
1159 1160

	htbl = rcu_dereference_protected(ntbl->htbl,
1161
					 lockdep_is_held(&priv->lock));
1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177

	if (!htbl)
		goto out_unlock;

	/* neigh is obsolete if it was idle for two GC periods */
	dt = 2 * arp_tbl.gc_interval;
	neigh_obsolete = jiffies - dt;
	/* handle possible race condition */
	if (test_bit(IPOIB_STOP_NEIGH_GC, &priv->flags))
		goto out_unlock;

	for (i = 0; i < htbl->size; i++) {
		struct ipoib_neigh *neigh;
		struct ipoib_neigh __rcu **np = &htbl->buckets[i];

		while ((neigh = rcu_dereference_protected(*np,
1178
							  lockdep_is_held(&priv->lock))) != NULL) {
1179 1180
			/* was the neigh idle for two GC periods */
			if (time_after(neigh_obsolete, neigh->alive)) {
1181

1182
				ipoib_check_and_add_mcast_sendonly(priv, neigh->daddr + 4, &remove_list);
1183

1184 1185
				rcu_assign_pointer(*np,
						   rcu_dereference_protected(neigh->hnext,
1186
									     lockdep_is_held(&priv->lock)));
1187 1188 1189 1190 1191 1192
				/* remove from path/mc list */
				list_del(&neigh->list);
				call_rcu(&neigh->rcu, ipoib_neigh_reclaim);
			} else {
				np = &neigh->hnext;
			}
L
Linus Torvalds 已提交
1193

1194 1195
		}
	}
L
Linus Torvalds 已提交
1196

1197
out_unlock:
1198
	spin_unlock_irqrestore(&priv->lock, flags);
1199
	ipoib_mcast_remove_list(dev, &remove_list);
1200
}
L
Linus Torvalds 已提交
1201

1202 1203 1204 1205 1206 1207 1208 1209
static void ipoib_reap_neigh(struct work_struct *work)
{
	struct ipoib_dev_priv *priv =
		container_of(work, struct ipoib_dev_priv, neigh_reap_task.work);

	__ipoib_reap_neigh(priv);

	if (!test_bit(IPOIB_STOP_NEIGH_GC, &priv->flags))
1210
		queue_delayed_work(priv->wq, &priv->neigh_reap_task,
1211
				   arp_tbl.gc_interval);
L
Linus Torvalds 已提交
1212 1213
}

1214 1215

static struct ipoib_neigh *ipoib_neigh_ctor(u8 *daddr,
1216
				      struct net_device *dev)
1217 1218 1219
{
	struct ipoib_neigh *neigh;

1220
	neigh = kzalloc(sizeof *neigh, GFP_ATOMIC);
1221 1222 1223
	if (!neigh)
		return NULL;

1224
	neigh->dev = dev;
1225
	memcpy(&neigh->daddr, daddr, sizeof(neigh->daddr));
1226
	skb_queue_head_init(&neigh->queue);
1227
	INIT_LIST_HEAD(&neigh->list);
1228
	ipoib_cm_set(neigh, NULL);
1229 1230 1231 1232 1233 1234 1235 1236 1237 1238 1239 1240 1241 1242 1243 1244
	/* one ref on behalf of the caller */
	atomic_set(&neigh->refcnt, 1);

	return neigh;
}

struct ipoib_neigh *ipoib_neigh_alloc(u8 *daddr,
				      struct net_device *dev)
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);
	struct ipoib_neigh_table *ntbl = &priv->ntbl;
	struct ipoib_neigh_hash *htbl;
	struct ipoib_neigh *neigh;
	u32 hash_val;

	htbl = rcu_dereference_protected(ntbl->htbl,
1245
					 lockdep_is_held(&priv->lock));
1246 1247 1248 1249 1250 1251 1252 1253 1254 1255
	if (!htbl) {
		neigh = NULL;
		goto out_unlock;
	}

	/* need to add a new neigh, but maybe some other thread succeeded?
	 * recalc hash, maybe hash resize took place so we do a search
	 */
	hash_val = ipoib_addr_hash(htbl, daddr);
	for (neigh = rcu_dereference_protected(htbl->buckets[hash_val],
1256
					       lockdep_is_held(&priv->lock));
1257 1258
	     neigh != NULL;
	     neigh = rcu_dereference_protected(neigh->hnext,
1259
					       lockdep_is_held(&priv->lock))) {
1260 1261 1262 1263 1264 1265 1266 1267 1268 1269 1270 1271 1272 1273 1274 1275 1276 1277 1278 1279 1280 1281
		if (memcmp(daddr, neigh->daddr, INFINIBAND_ALEN) == 0) {
			/* found, take one ref on behalf of the caller */
			if (!atomic_inc_not_zero(&neigh->refcnt)) {
				/* deleted */
				neigh = NULL;
				break;
			}
			neigh->alive = jiffies;
			goto out_unlock;
		}
	}

	neigh = ipoib_neigh_ctor(daddr, dev);
	if (!neigh)
		goto out_unlock;

	/* one ref on behalf of the hash table */
	atomic_inc(&neigh->refcnt);
	neigh->alive = jiffies;
	/* put in hash */
	rcu_assign_pointer(neigh->hnext,
			   rcu_dereference_protected(htbl->buckets[hash_val],
1282
						     lockdep_is_held(&priv->lock)));
1283 1284 1285 1286
	rcu_assign_pointer(htbl->buckets[hash_val], neigh);
	atomic_inc(&ntbl->entries);

out_unlock:
1287 1288 1289 1290

	return neigh;
}

1291
void ipoib_neigh_dtor(struct ipoib_neigh *neigh)
1292
{
1293 1294 1295
	/* neigh reference count was dropprd to zero */
	struct net_device *dev = neigh->dev;
	struct ipoib_dev_priv *priv = netdev_priv(dev);
1296
	struct sk_buff *skb;
1297 1298
	if (neigh->ah)
		ipoib_put_ah(neigh->ah);
1299
	while ((skb = __skb_dequeue(&neigh->queue))) {
1300
		++dev->stats.tx_dropped;
1301 1302
		dev_kfree_skb_any(skb);
	}
1303 1304
	if (ipoib_cm_get(neigh))
		ipoib_cm_destroy_tx(ipoib_cm_get(neigh));
1305 1306 1307 1308
	ipoib_dbg(netdev_priv(dev),
		  "neigh free for %06x %pI6\n",
		  IPOIB_QPN(neigh->daddr),
		  neigh->daddr + 4);
1309
	kfree(neigh);
1310 1311 1312 1313 1314 1315 1316 1317 1318 1319 1320 1321
	if (atomic_dec_and_test(&priv->ntbl.entries)) {
		if (test_bit(IPOIB_NEIGH_TBL_FLUSH, &priv->flags))
			complete(&priv->ntbl.flushed);
	}
}

static void ipoib_neigh_reclaim(struct rcu_head *rp)
{
	/* Called as a result of removal from hash table */
	struct ipoib_neigh *neigh = container_of(rp, struct ipoib_neigh, rcu);
	/* note TX context may hold another ref */
	ipoib_neigh_put(neigh);
1322 1323
}

1324
void ipoib_neigh_free(struct ipoib_neigh *neigh)
L
Linus Torvalds 已提交
1325
{
1326 1327 1328 1329 1330 1331 1332 1333 1334
	struct net_device *dev = neigh->dev;
	struct ipoib_dev_priv *priv = netdev_priv(dev);
	struct ipoib_neigh_table *ntbl = &priv->ntbl;
	struct ipoib_neigh_hash *htbl;
	struct ipoib_neigh __rcu **np;
	struct ipoib_neigh *n;
	u32 hash_val;

	htbl = rcu_dereference_protected(ntbl->htbl,
1335
					lockdep_is_held(&priv->lock));
1336
	if (!htbl)
1337
		return;
1338 1339 1340 1341

	hash_val = ipoib_addr_hash(htbl, neigh->daddr);
	np = &htbl->buckets[hash_val];
	for (n = rcu_dereference_protected(*np,
1342
					    lockdep_is_held(&priv->lock));
1343
	     n != NULL;
1344
	     n = rcu_dereference_protected(*np,
1345
					lockdep_is_held(&priv->lock))) {
1346 1347 1348 1349
		if (n == neigh) {
			/* found */
			rcu_assign_pointer(*np,
					   rcu_dereference_protected(neigh->hnext,
1350
								     lockdep_is_held(&priv->lock)));
1351 1352
			/* remove from parent list */
			list_del(&neigh->list);
1353
			call_rcu(&neigh->rcu, ipoib_neigh_reclaim);
1354
			return;
1355 1356 1357 1358 1359 1360 1361 1362 1363 1364
		} else {
			np = &n->hnext;
		}
	}
}

static int ipoib_neigh_hash_init(struct ipoib_dev_priv *priv)
{
	struct ipoib_neigh_table *ntbl = &priv->ntbl;
	struct ipoib_neigh_hash *htbl;
1365
	struct ipoib_neigh __rcu **buckets;
1366 1367 1368 1369 1370 1371 1372 1373 1374 1375 1376 1377 1378 1379 1380 1381 1382
	u32 size;

	clear_bit(IPOIB_NEIGH_TBL_FLUSH, &priv->flags);
	ntbl->htbl = NULL;
	htbl = kzalloc(sizeof(*htbl), GFP_KERNEL);
	if (!htbl)
		return -ENOMEM;
	set_bit(IPOIB_STOP_NEIGH_GC, &priv->flags);
	size = roundup_pow_of_two(arp_tbl.gc_thresh3);
	buckets = kzalloc(size * sizeof(*buckets), GFP_KERNEL);
	if (!buckets) {
		kfree(htbl);
		return -ENOMEM;
	}
	htbl->size = size;
	htbl->mask = (size - 1);
	htbl->buckets = buckets;
1383
	RCU_INIT_POINTER(ntbl->htbl, htbl);
1384
	htbl->ntbl = ntbl;
1385 1386 1387 1388
	atomic_set(&ntbl->entries, 0);

	/* start garbage collection */
	clear_bit(IPOIB_STOP_NEIGH_GC, &priv->flags);
1389
	queue_delayed_work(priv->wq, &priv->neigh_reap_task,
1390
			   arp_tbl.gc_interval);
L
Linus Torvalds 已提交
1391 1392 1393 1394

	return 0;
}

1395 1396 1397 1398 1399 1400
static void neigh_hash_free_rcu(struct rcu_head *head)
{
	struct ipoib_neigh_hash *htbl = container_of(head,
						    struct ipoib_neigh_hash,
						    rcu);
	struct ipoib_neigh __rcu **buckets = htbl->buckets;
1401
	struct ipoib_neigh_table *ntbl = htbl->ntbl;
1402 1403 1404

	kfree(buckets);
	kfree(htbl);
1405
	complete(&ntbl->deleted);
1406 1407 1408 1409 1410 1411 1412 1413 1414 1415 1416
}

void ipoib_del_neighs_by_gid(struct net_device *dev, u8 *gid)
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);
	struct ipoib_neigh_table *ntbl = &priv->ntbl;
	struct ipoib_neigh_hash *htbl;
	unsigned long flags;
	int i;

	/* remove all neigh connected to a given path or mcast */
1417
	spin_lock_irqsave(&priv->lock, flags);
1418 1419

	htbl = rcu_dereference_protected(ntbl->htbl,
1420
					 lockdep_is_held(&priv->lock));
1421 1422 1423 1424 1425 1426 1427 1428 1429

	if (!htbl)
		goto out_unlock;

	for (i = 0; i < htbl->size; i++) {
		struct ipoib_neigh *neigh;
		struct ipoib_neigh __rcu **np = &htbl->buckets[i];

		while ((neigh = rcu_dereference_protected(*np,
1430
							  lockdep_is_held(&priv->lock))) != NULL) {
1431 1432 1433 1434
			/* delete neighs belong to this parent */
			if (!memcmp(gid, neigh->daddr + 4, sizeof (union ib_gid))) {
				rcu_assign_pointer(*np,
						   rcu_dereference_protected(neigh->hnext,
1435
									     lockdep_is_held(&priv->lock)));
1436 1437 1438 1439 1440 1441 1442 1443 1444 1445
				/* remove from parent list */
				list_del(&neigh->list);
				call_rcu(&neigh->rcu, ipoib_neigh_reclaim);
			} else {
				np = &neigh->hnext;
			}

		}
	}
out_unlock:
1446
	spin_unlock_irqrestore(&priv->lock, flags);
1447 1448 1449 1450 1451 1452 1453
}

static void ipoib_flush_neighs(struct ipoib_dev_priv *priv)
{
	struct ipoib_neigh_table *ntbl = &priv->ntbl;
	struct ipoib_neigh_hash *htbl;
	unsigned long flags;
1454
	int i, wait_flushed = 0;
1455

1456
	init_completion(&priv->ntbl.flushed);
1457

1458
	spin_lock_irqsave(&priv->lock, flags);
1459 1460

	htbl = rcu_dereference_protected(ntbl->htbl,
1461
					lockdep_is_held(&priv->lock));
1462 1463 1464
	if (!htbl)
		goto out_unlock;

1465 1466 1467 1468
	wait_flushed = atomic_read(&priv->ntbl.entries);
	if (!wait_flushed)
		goto free_htbl;

1469 1470 1471 1472 1473
	for (i = 0; i < htbl->size; i++) {
		struct ipoib_neigh *neigh;
		struct ipoib_neigh __rcu **np = &htbl->buckets[i];

		while ((neigh = rcu_dereference_protected(*np,
1474
				       lockdep_is_held(&priv->lock))) != NULL) {
1475 1476
			rcu_assign_pointer(*np,
					   rcu_dereference_protected(neigh->hnext,
1477
								     lockdep_is_held(&priv->lock)));
1478 1479 1480 1481 1482 1483
			/* remove from path/mc list */
			list_del(&neigh->list);
			call_rcu(&neigh->rcu, ipoib_neigh_reclaim);
		}
	}

1484
free_htbl:
1485 1486 1487 1488
	rcu_assign_pointer(ntbl->htbl, NULL);
	call_rcu(&htbl->rcu, neigh_hash_free_rcu);

out_unlock:
1489
	spin_unlock_irqrestore(&priv->lock, flags);
1490 1491
	if (wait_flushed)
		wait_for_completion(&priv->ntbl.flushed);
1492 1493 1494 1495 1496 1497 1498 1499
}

static void ipoib_neigh_hash_uninit(struct net_device *dev)
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);
	int stopped;

	ipoib_dbg(priv, "ipoib_neigh_hash_uninit\n");
1500
	init_completion(&priv->ntbl.deleted);
1501 1502 1503 1504 1505 1506 1507
	set_bit(IPOIB_NEIGH_TBL_FLUSH, &priv->flags);

	/* Stop GC if called at init fail need to cancel work */
	stopped = test_and_set_bit(IPOIB_STOP_NEIGH_GC, &priv->flags);
	if (!stopped)
		cancel_delayed_work(&priv->neigh_reap_task);

1508 1509 1510
	ipoib_flush_neighs(priv);

	wait_for_completion(&priv->ntbl.deleted);
1511 1512 1513
}


L
Linus Torvalds 已提交
1514 1515 1516 1517 1518
int ipoib_dev_init(struct net_device *dev, struct ib_device *ca, int port)
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);

	/* Allocate RX/TX "rings" to hold queued skbs */
1519
	priv->rx_ring =	kzalloc(ipoib_recvq_size * sizeof *priv->rx_ring,
L
Linus Torvalds 已提交
1520 1521 1522
				GFP_KERNEL);
	if (!priv->rx_ring) {
		printk(KERN_WARNING "%s: failed to allocate RX ring (%d entries)\n",
1523
		       ca->name, ipoib_recvq_size);
1524
		goto out;
L
Linus Torvalds 已提交
1525 1526
	}

1527
	priv->tx_ring = vzalloc(ipoib_sendq_size * sizeof *priv->tx_ring);
L
Linus Torvalds 已提交
1528 1529
	if (!priv->tx_ring) {
		printk(KERN_WARNING "%s: failed to allocate TX ring (%d entries)\n",
1530
		       ca->name, ipoib_sendq_size);
L
Linus Torvalds 已提交
1531 1532 1533
		goto out_rx_ring_cleanup;
	}

1534
	/* priv->tx_head, tx_tail & tx_outstanding are already 0 */
L
Linus Torvalds 已提交
1535 1536 1537 1538

	if (ipoib_ib_dev_init(dev, ca, port))
		goto out_tx_ring_cleanup;

1539 1540 1541 1542 1543 1544 1545
	/*
	 * Must be after ipoib_ib_dev_init so we can allocate a per
	 * device wq there and use it here
	 */
	if (ipoib_neigh_hash_init(priv) < 0)
		goto out_dev_uninit;

L
Linus Torvalds 已提交
1546 1547
	return 0;

1548 1549 1550
out_dev_uninit:
	ipoib_ib_dev_cleanup(dev);

L
Linus Torvalds 已提交
1551
out_tx_ring_cleanup:
1552
	vfree(priv->tx_ring);
L
Linus Torvalds 已提交
1553 1554 1555 1556 1557 1558 1559 1560 1561 1562 1563

out_rx_ring_cleanup:
	kfree(priv->rx_ring);

out:
	return -ENOMEM;
}

void ipoib_dev_cleanup(struct net_device *dev)
{
	struct ipoib_dev_priv *priv = netdev_priv(dev), *cpriv, *tcpriv;
O
Or Gerlitz 已提交
1564 1565 1566
	LIST_HEAD(head);

	ASSERT_RTNL();
L
Linus Torvalds 已提交
1567

1568
	ipoib_delete_debug_files(dev);
L
Linus Torvalds 已提交
1569 1570 1571

	/* Delete any child interfaces first */
	list_for_each_entry_safe(cpriv, tcpriv, &priv->child_intfs, list) {
1572 1573 1574
		/* Stop GC on child */
		set_bit(IPOIB_STOP_NEIGH_GC, &cpriv->flags);
		cancel_delayed_work(&cpriv->neigh_reap_task);
O
Or Gerlitz 已提交
1575
		unregister_netdevice_queue(cpriv->dev, &head);
L
Linus Torvalds 已提交
1576
	}
O
Or Gerlitz 已提交
1577
	unregister_netdevice_many(&head);
L
Linus Torvalds 已提交
1578

1579 1580 1581 1582 1583 1584
	/*
	 * Must be before ipoib_ib_dev_cleanup or we delete an in use
	 * work queue
	 */
	ipoib_neigh_hash_uninit(dev);

L
Linus Torvalds 已提交
1585 1586
	ipoib_ib_dev_cleanup(dev);

1587
	kfree(priv->rx_ring);
1588
	vfree(priv->tx_ring);
L
Linus Torvalds 已提交
1589

1590 1591
	priv->rx_ring = NULL;
	priv->tx_ring = NULL;
L
Linus Torvalds 已提交
1592 1593
}

1594 1595 1596 1597
static const struct header_ops ipoib_header_ops = {
	.create	= ipoib_hard_header,
};

1598
static const struct net_device_ops ipoib_netdev_ops = {
O
Or Gerlitz 已提交
1599
	.ndo_uninit		 = ipoib_uninit,
1600 1601 1602
	.ndo_open		 = ipoib_open,
	.ndo_stop		 = ipoib_stop,
	.ndo_change_mtu		 = ipoib_change_mtu,
1603
	.ndo_fix_features	 = ipoib_fix_features,
1604 1605
	.ndo_start_xmit	 	 = ipoib_start_xmit,
	.ndo_tx_timeout		 = ipoib_timeout,
1606
	.ndo_set_rx_mode	 = ipoib_set_mcast_list,
1607
	.ndo_get_iflink		 = ipoib_get_iflink,
1608 1609
};

O
Or Gerlitz 已提交
1610
void ipoib_setup(struct net_device *dev)
L
Linus Torvalds 已提交
1611 1612 1613
{
	struct ipoib_dev_priv *priv = netdev_priv(dev);

1614
	dev->netdev_ops		 = &ipoib_netdev_ops;
1615
	dev->header_ops		 = &ipoib_header_ops;
1616

E
Eli Cohen 已提交
1617 1618
	ipoib_set_ethtool_ops(dev);

M
Michal Schmidt 已提交
1619
	netif_napi_add(dev, &priv->napi, ipoib_poll, NAPI_POLL_WEIGHT);
L
Linus Torvalds 已提交
1620

1621
	dev->watchdog_timeo	 = HZ;
L
Linus Torvalds 已提交
1622

1623
	dev->flags		|= IFF_BROADCAST | IFF_MULTICAST;
L
Linus Torvalds 已提交
1624

1625
	dev->hard_header_len	 = IPOIB_ENCAP_LEN;
1626 1627 1628
	dev->addr_len		 = INFINIBAND_ALEN;
	dev->type		 = ARPHRD_INFINIBAND;
	dev->tx_queue_len	 = ipoib_sendq_size * 2;
E
Eli Cohen 已提交
1629 1630
	dev->features		 = (NETIF_F_VLAN_CHALLENGED	|
				    NETIF_F_HIGHDMA);
1631
	netif_keep_dst(dev);
L
Linus Torvalds 已提交
1632 1633 1634 1635 1636 1637 1638

	memcpy(dev->broadcast, ipv4_bcast_addr, INFINIBAND_ALEN);

	priv->dev = dev;

	spin_lock_init(&priv->lock);

1639
	init_rwsem(&priv->vlan_rwsem);
L
Linus Torvalds 已提交
1640 1641 1642 1643 1644 1645

	INIT_LIST_HEAD(&priv->path_list);
	INIT_LIST_HEAD(&priv->child_intfs);
	INIT_LIST_HEAD(&priv->dead_ahs);
	INIT_LIST_HEAD(&priv->multicast_list);

D
David Howells 已提交
1646
	INIT_DELAYED_WORK(&priv->mcast_task,   ipoib_mcast_join_task);
1647
	INIT_WORK(&priv->carrier_on_task, ipoib_mcast_carrier_on_task);
1648 1649 1650
	INIT_WORK(&priv->flush_light,   ipoib_ib_dev_flush_light);
	INIT_WORK(&priv->flush_normal,   ipoib_ib_dev_flush_normal);
	INIT_WORK(&priv->flush_heavy,   ipoib_ib_dev_flush_heavy);
D
David Howells 已提交
1651 1652
	INIT_WORK(&priv->restart_task, ipoib_mcast_restart_task);
	INIT_DELAYED_WORK(&priv->ah_reap_task, ipoib_reap_ah);
1653
	INIT_DELAYED_WORK(&priv->neigh_reap_task, ipoib_reap_neigh);
L
Linus Torvalds 已提交
1654 1655 1656 1657 1658 1659
}

struct ipoib_dev_priv *ipoib_intf_alloc(const char *name)
{
	struct net_device *dev;

1660 1661
	dev = alloc_netdev((int)sizeof(struct ipoib_dev_priv), name,
			   NET_NAME_UNKNOWN, ipoib_setup);
L
Linus Torvalds 已提交
1662 1663 1664 1665 1666 1667
	if (!dev)
		return NULL;

	return netdev_priv(dev);
}

1668 1669
static ssize_t show_pkey(struct device *dev,
			 struct device_attribute *attr, char *buf)
L
Linus Torvalds 已提交
1670
{
1671
	struct ipoib_dev_priv *priv = netdev_priv(to_net_dev(dev));
L
Linus Torvalds 已提交
1672 1673 1674

	return sprintf(buf, "0x%04x\n", priv->pkey);
}
1675
static DEVICE_ATTR(pkey, S_IRUGO, show_pkey, NULL);
L
Linus Torvalds 已提交
1676

1677 1678 1679 1680 1681 1682 1683 1684
static ssize_t show_umcast(struct device *dev,
			   struct device_attribute *attr, char *buf)
{
	struct ipoib_dev_priv *priv = netdev_priv(to_net_dev(dev));

	return sprintf(buf, "%d\n", test_bit(IPOIB_FLAG_UMCAST, &priv->flags));
}

1685
void ipoib_set_umcast(struct net_device *ndev, int umcast_val)
1686
{
1687
	struct ipoib_dev_priv *priv = netdev_priv(ndev);
1688 1689 1690 1691 1692 1693 1694

	if (umcast_val > 0) {
		set_bit(IPOIB_FLAG_UMCAST, &priv->flags);
		ipoib_warn(priv, "ignoring multicast groups joined directly "
				"by userspace\n");
	} else
		clear_bit(IPOIB_FLAG_UMCAST, &priv->flags);
1695 1696 1697 1698 1699 1700 1701 1702 1703
}

static ssize_t set_umcast(struct device *dev,
			  struct device_attribute *attr,
			  const char *buf, size_t count)
{
	unsigned long umcast_val = simple_strtoul(buf, NULL, 0);

	ipoib_set_umcast(to_net_dev(dev), umcast_val);
1704 1705 1706 1707 1708 1709 1710 1711 1712 1713

	return count;
}
static DEVICE_ATTR(umcast, S_IWUSR | S_IRUGO, show_umcast, set_umcast);

int ipoib_add_umcast_attr(struct net_device *dev)
{
	return device_create_file(&dev->dev, &dev_attr_umcast);
}

1714 1715
static ssize_t create_child(struct device *dev,
			    struct device_attribute *attr,
L
Linus Torvalds 已提交
1716 1717 1718 1719 1720 1721 1722 1723
			    const char *buf, size_t count)
{
	int pkey;
	int ret;

	if (sscanf(buf, "%i", &pkey) != 1)
		return -EINVAL;

1724
	if (pkey <= 0 || pkey > 0xffff || pkey == 0x8000)
L
Linus Torvalds 已提交
1725 1726
		return -EINVAL;

1727 1728 1729 1730 1731 1732
	/*
	 * Set the full membership bit, so that we join the right
	 * broadcast group, etc.
	 */
	pkey |= 0x8000;

1733
	ret = ipoib_vlan_add(to_net_dev(dev), pkey);
L
Linus Torvalds 已提交
1734 1735 1736

	return ret ? ret : count;
}
1737
static DEVICE_ATTR(create_child, S_IWUSR, NULL, create_child);
L
Linus Torvalds 已提交
1738

1739 1740
static ssize_t delete_child(struct device *dev,
			    struct device_attribute *attr,
L
Linus Torvalds 已提交
1741 1742 1743 1744 1745 1746 1747 1748 1749 1750 1751
			    const char *buf, size_t count)
{
	int pkey;
	int ret;

	if (sscanf(buf, "%i", &pkey) != 1)
		return -EINVAL;

	if (pkey < 0 || pkey > 0xffff)
		return -EINVAL;

1752
	ret = ipoib_vlan_delete(to_net_dev(dev), pkey);
L
Linus Torvalds 已提交
1753 1754 1755 1756

	return ret ? ret : count;

}
1757
static DEVICE_ATTR(delete_child, S_IWUSR, NULL, delete_child);
L
Linus Torvalds 已提交
1758 1759 1760

int ipoib_add_pkey_attr(struct net_device *dev)
{
1761
	return device_create_file(&dev->dev, &dev_attr_pkey);
L
Linus Torvalds 已提交
1762 1763
}

1764 1765
int ipoib_set_dev_features(struct ipoib_dev_priv *priv, struct ib_device *hca)
{
1766
	priv->hca_caps = hca->attrs.device_cap_flags;
1767 1768

	if (priv->hca_caps & IB_DEVICE_UD_IP_CSUM) {
1769 1770
		priv->dev->hw_features = NETIF_F_SG |
			NETIF_F_IP_CSUM | NETIF_F_RXCSUM;
1771

1772 1773
		if (priv->hca_caps & IB_DEVICE_UD_TSO)
			priv->dev->hw_features |= NETIF_F_TSO;
O
Or Gerlitz 已提交
1774

1775 1776
		priv->dev->features |= priv->dev->hw_features;
	}
1777 1778 1779 1780

	return 0;
}

L
Linus Torvalds 已提交
1781 1782 1783 1784
static struct net_device *ipoib_add_port(const char *format,
					 struct ib_device *hca, u8 port)
{
	struct ipoib_dev_priv *priv;
1785
	struct ib_port_attr attr;
L
Linus Torvalds 已提交
1786 1787 1788 1789 1790 1791 1792
	int result = -ENOMEM;

	priv = ipoib_intf_alloc(format);
	if (!priv)
		goto alloc_mem_failed;

	SET_NETDEV_DEV(priv->dev, hca->dma_device);
E
Eli Cohen 已提交
1793
	priv->dev->dev_id = port - 1;
L
Linus Torvalds 已提交
1794

1795 1796
	result = ib_query_port(hca, port, &attr);
	if (!result)
1797 1798 1799 1800 1801 1802 1803 1804 1805 1806 1807
		priv->max_ib_mtu = ib_mtu_enum_to_int(attr.max_mtu);
	else {
		printk(KERN_WARNING "%s: ib_query_port %d failed\n",
		       hca->name, port);
		goto device_init_failed;
	}

	/* MTU will be reset when mcast join happens */
	priv->dev->mtu  = IPOIB_UD_MTU(priv->max_ib_mtu);
	priv->mcast_mtu  = priv->admin_mtu = priv->dev->mtu;

1808 1809
	priv->dev->neigh_priv_len = sizeof(struct ipoib_neigh);

L
Linus Torvalds 已提交
1810 1811 1812 1813
	result = ib_query_pkey(hca, port, 0, &priv->pkey);
	if (result) {
		printk(KERN_WARNING "%s: ib_query_pkey port %d failed (ret = %d)\n",
		       hca->name, port, result);
E
Eli Cohen 已提交
1814
		goto device_init_failed;
L
Linus Torvalds 已提交
1815 1816
	}

1817 1818
	result = ipoib_set_dev_features(priv, hca);
	if (result)
1819
		goto device_init_failed;
V
Vladimir Sokolovsky 已提交
1820

1821 1822 1823 1824 1825 1826
	/*
	 * Set the full membership bit, so that we join the right
	 * broadcast group, etc.
	 */
	priv->pkey |= 0x8000;

L
Linus Torvalds 已提交
1827 1828 1829
	priv->dev->broadcast[8] = priv->pkey >> 8;
	priv->dev->broadcast[9] = priv->pkey & 0xff;

1830
	result = ib_query_gid(hca, port, 0, &priv->local_gid, NULL);
L
Linus Torvalds 已提交
1831 1832 1833
	if (result) {
		printk(KERN_WARNING "%s: ib_query_gid port %d failed (ret = %d)\n",
		       hca->name, port, result);
E
Eli Cohen 已提交
1834
		goto device_init_failed;
L
Linus Torvalds 已提交
1835 1836 1837 1838 1839 1840 1841 1842 1843 1844 1845 1846 1847 1848 1849 1850 1851 1852 1853 1854 1855 1856 1857 1858 1859 1860 1861
	} else
		memcpy(priv->dev->dev_addr + 4, priv->local_gid.raw, sizeof (union ib_gid));

	result = ipoib_dev_init(priv->dev, hca, port);
	if (result < 0) {
		printk(KERN_WARNING "%s: failed to initialize port %d (ret = %d)\n",
		       hca->name, port, result);
		goto device_init_failed;
	}

	INIT_IB_EVENT_HANDLER(&priv->event_handler,
			      priv->ca, ipoib_event);
	result = ib_register_event_handler(&priv->event_handler);
	if (result < 0) {
		printk(KERN_WARNING "%s: ib_register_event_handler failed for "
		       "port %d (ret = %d)\n",
		       hca->name, port, result);
		goto event_failed;
	}

	result = register_netdev(priv->dev);
	if (result) {
		printk(KERN_WARNING "%s: couldn't register ipoib port %d; error %d\n",
		       hca->name, port, result);
		goto register_failed;
	}

1862
	ipoib_create_debug_files(priv->dev);
L
Linus Torvalds 已提交
1863

1864 1865
	if (ipoib_cm_add_mode_attr(priv->dev))
		goto sysfs_failed;
L
Linus Torvalds 已提交
1866 1867
	if (ipoib_add_pkey_attr(priv->dev))
		goto sysfs_failed;
1868 1869
	if (ipoib_add_umcast_attr(priv->dev))
		goto sysfs_failed;
1870
	if (device_create_file(&priv->dev->dev, &dev_attr_create_child))
L
Linus Torvalds 已提交
1871
		goto sysfs_failed;
1872
	if (device_create_file(&priv->dev->dev, &dev_attr_delete_child))
L
Linus Torvalds 已提交
1873 1874 1875 1876 1877
		goto sysfs_failed;

	return priv->dev;

sysfs_failed:
1878
	ipoib_delete_debug_files(priv->dev);
L
Linus Torvalds 已提交
1879 1880 1881 1882
	unregister_netdev(priv->dev);

register_failed:
	ib_unregister_event_handler(&priv->event_handler);
1883
	flush_workqueue(ipoib_workqueue);
1884 1885 1886
	/* Stop GC if started before flush */
	set_bit(IPOIB_STOP_NEIGH_GC, &priv->flags);
	cancel_delayed_work(&priv->neigh_reap_task);
1887
	flush_workqueue(priv->wq);
L
Linus Torvalds 已提交
1888 1889 1890 1891 1892 1893 1894 1895 1896 1897 1898 1899 1900 1901 1902 1903

event_failed:
	ipoib_dev_cleanup(priv->dev);

device_init_failed:
	free_netdev(priv->dev);

alloc_mem_failed:
	return ERR_PTR(result);
}

static void ipoib_add_one(struct ib_device *device)
{
	struct list_head *dev_list;
	struct net_device *dev;
	struct ipoib_dev_priv *priv;
1904
	int p;
M
Michael Wang 已提交
1905
	int count = 0;
T
Tom Tucker 已提交
1906

L
Linus Torvalds 已提交
1907 1908 1909 1910 1911 1912
	dev_list = kmalloc(sizeof *dev_list, GFP_KERNEL);
	if (!dev_list)
		return;

	INIT_LIST_HEAD(dev_list);

1913
	for (p = rdma_start_port(device); p <= rdma_end_port(device); ++p) {
M
Michael Wang 已提交
1914
		if (!rdma_protocol_ib(device, p))
E
Eli Cohen 已提交
1915
			continue;
L
Linus Torvalds 已提交
1916 1917 1918 1919
		dev = ipoib_add_port("ib%d", device, p);
		if (!IS_ERR(dev)) {
			priv = netdev_priv(dev);
			list_add_tail(&priv->list, dev_list);
M
Michael Wang 已提交
1920
			count++;
L
Linus Torvalds 已提交
1921 1922 1923
		}
	}

M
Michael Wang 已提交
1924 1925 1926 1927 1928
	if (!count) {
		kfree(dev_list);
		return;
	}

L
Linus Torvalds 已提交
1929 1930 1931
	ib_set_client_data(device, &ipoib_client, dev_list);
}

1932
static void ipoib_remove_one(struct ib_device *device, void *client_data)
L
Linus Torvalds 已提交
1933 1934
{
	struct ipoib_dev_priv *priv, *tmp;
1935
	struct list_head *dev_list = client_data;
L
Linus Torvalds 已提交
1936

1937 1938
	if (!dev_list)
		return;
L
Linus Torvalds 已提交
1939 1940 1941

	list_for_each_entry_safe(priv, tmp, dev_list, list) {
		ib_unregister_event_handler(&priv->event_handler);
1942
		flush_workqueue(ipoib_workqueue);
1943 1944 1945 1946 1947

		rtnl_lock();
		dev_change_flags(priv->dev, priv->dev->flags & ~IFF_UP);
		rtnl_unlock();

1948 1949 1950
		/* Stop GC */
		set_bit(IPOIB_STOP_NEIGH_GC, &priv->flags);
		cancel_delayed_work(&priv->neigh_reap_task);
1951
		flush_workqueue(priv->wq);
L
Linus Torvalds 已提交
1952 1953 1954 1955

		unregister_netdev(priv->dev);
		free_netdev(priv->dev);
	}
1956 1957

	kfree(dev_list);
L
Linus Torvalds 已提交
1958 1959 1960 1961 1962 1963
}

static int __init ipoib_init_module(void)
{
	int ret;

1964 1965 1966 1967 1968 1969
	ipoib_recvq_size = roundup_pow_of_two(ipoib_recvq_size);
	ipoib_recvq_size = min(ipoib_recvq_size, IPOIB_MAX_QUEUE_SIZE);
	ipoib_recvq_size = max(ipoib_recvq_size, IPOIB_MIN_QUEUE_SIZE);

	ipoib_sendq_size = roundup_pow_of_two(ipoib_sendq_size);
	ipoib_sendq_size = min(ipoib_sendq_size, IPOIB_MAX_QUEUE_SIZE);
1970
	ipoib_sendq_size = max3(ipoib_sendq_size, 2 * MAX_SEND_CQE, IPOIB_MIN_QUEUE_SIZE);
1971 1972 1973
#ifdef CONFIG_INFINIBAND_IPOIB_CM
	ipoib_max_conn_qp = min(ipoib_max_conn_qp, IPOIB_CM_MAX_CONN_QP);
#endif
1974

1975 1976 1977 1978 1979 1980
	/*
	 * When copying small received packets, we only copy from the
	 * linear data part of the SKB, so we rely on this condition.
	 */
	BUILD_BUG_ON(IPOIB_CM_COPYBREAK > IPOIB_CM_HEAD_SIZE);

L
Linus Torvalds 已提交
1981 1982 1983 1984 1985
	ret = ipoib_register_debugfs();
	if (ret)
		return ret;

	/*
1986 1987 1988 1989 1990 1991 1992 1993
	 * We create a global workqueue here that is used for all flush
	 * operations.  However, if you attempt to flush a workqueue
	 * from a task on that same workqueue, it deadlocks the system.
	 * We want to be able to flush the tasks associated with a
	 * specific net device, so we also create a workqueue for each
	 * netdevice.  We queue up the tasks for that device only on
	 * its private workqueue, and we only queue up flush events
	 * on our global flush workqueue.  This avoids the deadlocks.
L
Linus Torvalds 已提交
1994
	 */
1995
	ipoib_workqueue = create_singlethread_workqueue("ipoib_flush");
L
Linus Torvalds 已提交
1996 1997 1998 1999 2000
	if (!ipoib_workqueue) {
		ret = -ENOMEM;
		goto err_fs;
	}

2001 2002
	ib_sa_register_client(&ipoib_sa_client);

L
Linus Torvalds 已提交
2003 2004
	ret = ib_register_client(&ipoib_client);
	if (ret)
2005
		goto err_sa;
L
Linus Torvalds 已提交
2006

O
Or Gerlitz 已提交
2007 2008 2009 2010
	ret = ipoib_netlink_init();
	if (ret)
		goto err_client;

L
Linus Torvalds 已提交
2011 2012
	return 0;

O
Or Gerlitz 已提交
2013 2014 2015
err_client:
	ib_unregister_client(&ipoib_client);

2016 2017
err_sa:
	ib_sa_unregister_client(&ipoib_sa_client);
L
Linus Torvalds 已提交
2018 2019
	destroy_workqueue(ipoib_workqueue);

2020 2021 2022
err_fs:
	ipoib_unregister_debugfs();

L
Linus Torvalds 已提交
2023 2024 2025 2026 2027
	return ret;
}

static void __exit ipoib_cleanup_module(void)
{
O
Or Gerlitz 已提交
2028
	ipoib_netlink_fini();
L
Linus Torvalds 已提交
2029
	ib_unregister_client(&ipoib_client);
2030
	ib_sa_unregister_client(&ipoib_sa_client);
2031
	ipoib_unregister_debugfs();
L
Linus Torvalds 已提交
2032 2033 2034 2035 2036
	destroy_workqueue(ipoib_workqueue);
}

module_init(ipoib_init_module);
module_exit(ipoib_cleanup_module);