init.c 54.6 KB
Newer Older
M
Mike Marciniszyn 已提交
1
/*
2
 * Copyright(c) 2015 - 2018 Intel Corporation.
M
Mike Marciniszyn 已提交
3 4 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 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55
 *
 * This file is provided under a dual BSD/GPLv2 license.  When using or
 * redistributing this file, you may do so under either license.
 *
 * GPL LICENSE SUMMARY
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of version 2 of the GNU General Public License as
 * published by the Free Software Foundation.
 *
 * This program is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * General Public License for more details.
 *
 * BSD LICENSE
 *
 * 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.
 *  - Neither the name of Intel Corporation nor the names of its
 *    contributors may be used to endorse or promote products derived
 *    from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 *
 */

#include <linux/pci.h>
#include <linux/netdevice.h>
#include <linux/vmalloc.h>
#include <linux/delay.h>
#include <linux/idr.h>
#include <linux/module.h>
#include <linux/printk.h>
#include <linux/hrtimer.h>
56
#include <linux/bitmap.h>
57
#include <rdma/rdma_vt.h>
M
Mike Marciniszyn 已提交
58 59 60 61

#include "hfi.h"
#include "device.h"
#include "common.h"
62
#include "trace.h"
M
Mike Marciniszyn 已提交
63 64 65 66
#include "mad.h"
#include "sdma.h"
#include "debugfs.h"
#include "verbs.h"
67
#include "aspm.h"
68
#include "affinity.h"
69
#include "vnic.h"
70
#include "exp_rcv.h"
M
Mike Marciniszyn 已提交
71 72 73 74

#undef pr_fmt
#define pr_fmt(fmt) DRIVER_NAME ": " fmt

75
#define HFI1_MAX_ACTIVE_WORKQUEUE_ENTRIES 5
M
Mike Marciniszyn 已提交
76 77 78 79 80 81
/*
 * min buffers we want to have per context, after driver
 */
#define HFI1_MIN_USER_CTXT_BUFCNT 7

#define HFI1_MIN_HDRQ_EGRBUF_CNT 2
82
#define HFI1_MAX_HDRQ_EGRBUF_CNT 16352
M
Mike Marciniszyn 已提交
83 84 85 86 87 88 89
#define HFI1_MIN_EAGER_BUFFER_SIZE (4 * 1024) /* 4KB */
#define HFI1_MAX_EAGER_BUFFER_SIZE (256 * 1024) /* 256KB */

/*
 * Number of user receive contexts we are configured to use (to allow for more
 * pio buffers per ctxt, etc.)  Zero means use one user context per CPU.
 */
90
int num_user_contexts = -1;
91
module_param_named(num_user_contexts, num_user_contexts, int, 0444);
M
Mike Marciniszyn 已提交
92
MODULE_PARM_DESC(
93
	num_user_contexts, "Set max number of user contexts to use (default: -1 will use the real (non-HT) CPU count)");
M
Mike Marciniszyn 已提交
94

95
uint krcvqs[RXE_NUM_DATA_VL];
M
Mike Marciniszyn 已提交
96
int krcvqsset;
97
module_param_array(krcvqs, uint, &krcvqsset, S_IRUGO);
98
MODULE_PARM_DESC(krcvqs, "Array of the number of non-control kernel receive queues by VL");
M
Mike Marciniszyn 已提交
99 100

/* computed based on above array */
101
unsigned long n_krcvqs;
M
Mike Marciniszyn 已提交
102 103 104 105 106

static unsigned hfi1_rcvarr_split = 25;
module_param_named(rcvarr_split, hfi1_rcvarr_split, uint, S_IRUGO);
MODULE_PARM_DESC(rcvarr_split, "Percent of context's RcvArray entries used for Eager buffers");

107
static uint eager_buffer_size = (8 << 20); /* 8MB */
M
Mike Marciniszyn 已提交
108
module_param(eager_buffer_size, uint, S_IRUGO);
109
MODULE_PARM_DESC(eager_buffer_size, "Size of the eager buffers, default: 8MB");
M
Mike Marciniszyn 已提交
110 111 112 113 114 115

static uint rcvhdrcnt = 2048; /* 2x the max eager buffer count */
module_param_named(rcvhdrcnt, rcvhdrcnt, uint, S_IRUGO);
MODULE_PARM_DESC(rcvhdrcnt, "Receive header queue count (default 2048)");

static uint hfi1_hdrq_entsize = 32;
116 117
module_param_named(hdrq_entsize, hfi1_hdrq_entsize, uint, 0444);
MODULE_PARM_DESC(hdrq_entsize, "Size of header queue entries: 2 - 8B, 16 - 64B, 32 - 128B (default)");
M
Mike Marciniszyn 已提交
118 119 120

unsigned int user_credit_return_threshold = 33;	/* default is 33% */
module_param(user_credit_return_threshold, uint, S_IRUGO);
121
MODULE_PARM_DESC(user_credit_return_threshold, "Credit return threshold for user send contexts, return when unreturned credits passes this many blocks (in percent of allocated blocks, 0 is off)");
M
Mike Marciniszyn 已提交
122

123
static inline u64 encode_rcv_header_entry_size(u16 size);
M
Mike Marciniszyn 已提交
124 125 126

static struct idr hfi1_unit_table;

127 128
static int hfi1_create_kctxt(struct hfi1_devdata *dd,
			     struct hfi1_pportdata *ppd)
M
Mike Marciniszyn 已提交
129
{
130
	struct hfi1_ctxtdata *rcd;
M
Mike Marciniszyn 已提交
131 132
	int ret;

133 134 135
	/* Control context has to be always 0 */
	BUILD_BUG_ON(HFI1_CTRL_CTXT != 0);

136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174
	ret = hfi1_create_ctxtdata(ppd, dd->node, &rcd);
	if (ret < 0) {
		dd_dev_err(dd, "Kernel receive context allocation failed\n");
		return ret;
	}

	/*
	 * Set up the kernel context flags here and now because they use
	 * default values for all receive side memories.  User contexts will
	 * be handled as they are created.
	 */
	rcd->flags = HFI1_CAP_KGET(MULTI_PKT_EGR) |
		HFI1_CAP_KGET(NODROP_RHQ_FULL) |
		HFI1_CAP_KGET(NODROP_EGR_FULL) |
		HFI1_CAP_KGET(DMA_RTAIL);

	/* Control context must use DMA_RTAIL */
	if (rcd->ctxt == HFI1_CTRL_CTXT)
		rcd->flags |= HFI1_CAP_DMA_RTAIL;
	rcd->seq_cnt = 1;

	rcd->sc = sc_alloc(dd, SC_ACK, rcd->rcvhdrqentsize, dd->node);
	if (!rcd->sc) {
		dd_dev_err(dd, "Kernel send context allocation failed\n");
		return -ENOMEM;
	}
	hfi1_init_ctxt(rcd->sc);

	return 0;
}

/*
 * Create the receive context array and one or more kernel contexts
 */
int hfi1_create_kctxts(struct hfi1_devdata *dd)
{
	u16 i;
	int ret;

175
	dd->rcd = kcalloc_node(dd->num_rcv_contexts, sizeof(*dd->rcd),
176
			       GFP_KERNEL, dd->node);
177
	if (!dd->rcd)
178
		return -ENOMEM;
M
Mike Marciniszyn 已提交
179

180
	for (i = 0; i < dd->first_dyn_alloc_ctxt; ++i) {
181 182 183
		ret = hfi1_create_kctxt(dd, dd->pport);
		if (ret)
			goto bail;
M
Mike Marciniszyn 已提交
184 185 186
	}

	return 0;
187
bail:
188
	for (i = 0; dd->rcd && i < dd->first_dyn_alloc_ctxt; ++i)
189
		hfi1_free_ctxt(dd->rcd[i]);
190 191

	/* All the contexts should be freed, free the array */
M
Mike Marciniszyn 已提交
192 193 194 195 196
	kfree(dd->rcd);
	dd->rcd = NULL;
	return ret;
}

197
/*
198
 * Helper routines for the receive context reference count (rcd and uctxt).
199 200 201 202 203 204
 */
static void hfi1_rcd_init(struct hfi1_ctxtdata *rcd)
{
	kref_init(&rcd->kref);
}

205 206 207 208 209
/**
 * hfi1_rcd_free - When reference is zero clean up.
 * @kref: pointer to an initialized rcd data structure
 *
 */
210 211
static void hfi1_rcd_free(struct kref *kref)
{
212
	unsigned long flags;
213 214 215 216
	struct hfi1_ctxtdata *rcd =
		container_of(kref, struct hfi1_ctxtdata, kref);

	hfi1_free_ctxtdata(rcd->dd, rcd);
217 218 219 220 221

	spin_lock_irqsave(&rcd->dd->uctxt_lock, flags);
	rcd->dd->rcd[rcd->ctxt] = NULL;
	spin_unlock_irqrestore(&rcd->dd->uctxt_lock, flags);

222 223 224
	kfree(rcd);
}

225 226 227 228 229 230
/**
 * hfi1_rcd_put - decrement reference for rcd
 * @rcd: pointer to an initialized rcd data structure
 *
 * Use this to put a reference after the init.
 */
231 232 233 234 235 236 237 238
int hfi1_rcd_put(struct hfi1_ctxtdata *rcd)
{
	if (rcd)
		return kref_put(&rcd->kref, hfi1_rcd_free);

	return 0;
}

239 240 241 242 243 244
/**
 * hfi1_rcd_get - increment reference for rcd
 * @rcd: pointer to an initialized rcd data structure
 *
 * Use this to get a reference after the init.
 */
245 246 247 248 249
void hfi1_rcd_get(struct hfi1_ctxtdata *rcd)
{
	kref_get(&rcd->kref);
}

250 251 252 253 254 255 256 257 258 259
/**
 * allocate_rcd_index - allocate an rcd index from the rcd array
 * @dd: pointer to a valid devdata structure
 * @rcd: rcd data structure to assign
 * @index: pointer to index that is allocated
 *
 * Find an empty index in the rcd array, and assign the given rcd to it.
 * If the array is full, we are EBUSY.
 *
 */
260
static int allocate_rcd_index(struct hfi1_devdata *dd,
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
			      struct hfi1_ctxtdata *rcd, u16 *index)
{
	unsigned long flags;
	u16 ctxt;

	spin_lock_irqsave(&dd->uctxt_lock, flags);
	for (ctxt = 0; ctxt < dd->num_rcv_contexts; ctxt++)
		if (!dd->rcd[ctxt])
			break;

	if (ctxt < dd->num_rcv_contexts) {
		rcd->ctxt = ctxt;
		dd->rcd[ctxt] = rcd;
		hfi1_rcd_init(rcd);
	}
	spin_unlock_irqrestore(&dd->uctxt_lock, flags);

	if (ctxt >= dd->num_rcv_contexts)
		return -EBUSY;

	*index = ctxt;

	return 0;
}

286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306
/**
 * hfi1_rcd_get_by_index_safe - validate the ctxt index before accessing the
 * array
 * @dd: pointer to a valid devdata structure
 * @ctxt: the index of an possilbe rcd
 *
 * This is a wrapper for hfi1_rcd_get_by_index() to validate that the given
 * ctxt index is valid.
 *
 * The caller is responsible for making the _put().
 *
 */
struct hfi1_ctxtdata *hfi1_rcd_get_by_index_safe(struct hfi1_devdata *dd,
						 u16 ctxt)
{
	if (ctxt < dd->num_rcv_contexts)
		return hfi1_rcd_get_by_index(dd, ctxt);

	return NULL;
}

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
/**
 * hfi1_rcd_get_by_index
 * @dd: pointer to a valid devdata structure
 * @ctxt: the index of an possilbe rcd
 *
 * We need to protect access to the rcd array.  If access is needed to
 * one or more index, get the protecting spinlock and then increment the
 * kref.
 *
 * The caller is responsible for making the _put().
 *
 */
struct hfi1_ctxtdata *hfi1_rcd_get_by_index(struct hfi1_devdata *dd, u16 ctxt)
{
	unsigned long flags;
	struct hfi1_ctxtdata *rcd = NULL;

	spin_lock_irqsave(&dd->uctxt_lock, flags);
	if (dd->rcd[ctxt]) {
		rcd = dd->rcd[ctxt];
		hfi1_rcd_get(rcd);
	}
	spin_unlock_irqrestore(&dd->uctxt_lock, flags);

	return rcd;
}

M
Mike Marciniszyn 已提交
334
/*
335 336
 * Common code for user and kernel context create and setup.
 * NOTE: the initial kref is done here (hf1_rcd_init()).
M
Mike Marciniszyn 已提交
337
 */
338 339
int hfi1_create_ctxtdata(struct hfi1_pportdata *ppd, int numa,
			 struct hfi1_ctxtdata **context)
M
Mike Marciniszyn 已提交
340 341 342 343 344 345 346
{
	struct hfi1_devdata *dd = ppd->dd;
	struct hfi1_ctxtdata *rcd;
	unsigned kctxt_ngroups = 0;
	u32 base;

	if (dd->rcv_entries.nctxt_extra >
347
	    dd->num_rcv_contexts - dd->first_dyn_alloc_ctxt)
M
Mike Marciniszyn 已提交
348
		kctxt_ngroups = (dd->rcv_entries.nctxt_extra -
349
			 (dd->num_rcv_contexts - dd->first_dyn_alloc_ctxt));
350
	rcd = kzalloc_node(sizeof(*rcd), GFP_KERNEL, numa);
M
Mike Marciniszyn 已提交
351 352
	if (rcd) {
		u32 rcvtids, max_entries;
353 354
		u16 ctxt;
		int ret;
M
Mike Marciniszyn 已提交
355

356 357 358 359 360 361 362
		ret = allocate_rcd_index(dd, rcd, &ctxt);
		if (ret) {
			*context = NULL;
			kfree(rcd);
			return ret;
		}

M
Mike Marciniszyn 已提交
363
		INIT_LIST_HEAD(&rcd->qp_wait_list);
M
Mike Marciniszyn 已提交
364
		hfi1_exp_tid_group_init(rcd);
M
Mike Marciniszyn 已提交
365 366
		rcd->ppd = ppd;
		rcd->dd = dd;
367
		__set_bit(0, rcd->in_use_ctxts);
368
		rcd->numa_id = numa;
M
Mike Marciniszyn 已提交
369
		rcd->rcv_array_groups = dd->rcv_entries.ngroups;
370
		rcd->rhf_rcv_function_map = normal_rhf_rcv_functions;
M
Mike Marciniszyn 已提交
371

372
		mutex_init(&rcd->exp_mutex);
M
Mike Marciniszyn 已提交
373

374 375
		hfi1_cdbg(PROC, "setting up context %u\n", rcd->ctxt);

M
Mike Marciniszyn 已提交
376 377 378 379
		/*
		 * Calculate the context's RcvArray entry starting point.
		 * We do this here because we have to take into account all
		 * the RcvArray entries that previous context would have
380 381
		 * taken and we have to account for any extra groups assigned
		 * to the static (kernel) or dynamic (vnic/user) contexts.
M
Mike Marciniszyn 已提交
382
		 */
383
		if (ctxt < dd->first_dyn_alloc_ctxt) {
M
Mike Marciniszyn 已提交
384 385 386
			if (ctxt < kctxt_ngroups) {
				base = ctxt * (dd->rcv_entries.ngroups + 1);
				rcd->rcv_array_groups++;
387
			} else {
M
Mike Marciniszyn 已提交
388 389
				base = kctxt_ngroups +
					(ctxt * dd->rcv_entries.ngroups);
390
			}
M
Mike Marciniszyn 已提交
391
		} else {
392
			u16 ct = ctxt - dd->first_dyn_alloc_ctxt;
M
Mike Marciniszyn 已提交
393 394 395 396 397 398

			base = ((dd->n_krcv_queues * dd->rcv_entries.ngroups) +
				kctxt_ngroups);
			if (ct < dd->rcv_entries.nctxt_extra) {
				base += ct * (dd->rcv_entries.ngroups + 1);
				rcd->rcv_array_groups++;
399
			} else {
M
Mike Marciniszyn 已提交
400 401
				base += dd->rcv_entries.nctxt_extra +
					(ct * dd->rcv_entries.ngroups);
402
			}
M
Mike Marciniszyn 已提交
403 404 405 406 407
		}
		rcd->eager_base = base * dd->rcv_entries.group_size;

		rcd->rcvhdrq_cnt = rcvhdrcnt;
		rcd->rcvhdrqentsize = hfi1_hdrq_entsize;
408 409
		rcd->rhf_offset =
			rcd->rcvhdrqentsize - sizeof(u64) / sizeof(u32);
M
Mike Marciniszyn 已提交
410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430
		/*
		 * Simple Eager buffer allocation: we have already pre-allocated
		 * the number of RcvArray entry groups. Each ctxtdata structure
		 * holds the number of groups for that context.
		 *
		 * To follow CSR requirements and maintain cacheline alignment,
		 * make sure all sizes and bases are multiples of group_size.
		 *
		 * The expected entry count is what is left after assigning
		 * eager.
		 */
		max_entries = rcd->rcv_array_groups *
			dd->rcv_entries.group_size;
		rcvtids = ((max_entries * hfi1_rcvarr_split) / 100);
		rcd->egrbufs.count = round_down(rcvtids,
						dd->rcv_entries.group_size);
		if (rcd->egrbufs.count > MAX_EAGER_ENTRIES) {
			dd_dev_err(dd, "ctxt%u: requested too many RcvArray entries.\n",
				   rcd->ctxt);
			rcd->egrbufs.count = MAX_EAGER_ENTRIES;
		}
431 432 433
		hfi1_cdbg(PROC,
			  "ctxt%u: max Eager buffer RcvArray entries: %u\n",
			  rcd->ctxt, rcd->egrbufs.count);
M
Mike Marciniszyn 已提交
434 435 436 437 438 439 440 441 442

		/*
		 * Allocate array that will hold the eager buffer accounting
		 * data.
		 * This will allocate the maximum possible buffer count based
		 * on the value of the RcvArray split parameter.
		 * The resulting value will be rounded down to the closest
		 * multiple of dd->rcv_entries.group_size.
		 */
443 444 445 446
		rcd->egrbufs.buffers =
			kcalloc_node(rcd->egrbufs.count,
				     sizeof(*rcd->egrbufs.buffers),
				     GFP_KERNEL, numa);
M
Mike Marciniszyn 已提交
447 448
		if (!rcd->egrbufs.buffers)
			goto bail;
449 450 451 452
		rcd->egrbufs.rcvtids =
			kcalloc_node(rcd->egrbufs.count,
				     sizeof(*rcd->egrbufs.rcvtids),
				     GFP_KERNEL, numa);
M
Mike Marciniszyn 已提交
453 454 455 456 457 458 459 460 461 462
		if (!rcd->egrbufs.rcvtids)
			goto bail;
		rcd->egrbufs.size = eager_buffer_size;
		/*
		 * The size of the buffers programmed into the RcvArray
		 * entries needs to be big enough to handle the highest
		 * MTU supported.
		 */
		if (rcd->egrbufs.size < hfi1_max_mtu) {
			rcd->egrbufs.size = __roundup_pow_of_two(hfi1_max_mtu);
463 464
			hfi1_cdbg(PROC,
				  "ctxt%u: eager bufs size too small. Adjusting to %zu\n",
M
Mike Marciniszyn 已提交
465 466 467 468
				    rcd->ctxt, rcd->egrbufs.size);
		}
		rcd->egrbufs.rcvtid_size = HFI1_MAX_EAGER_BUFFER_SIZE;

469 470
		/* Applicable only for statically created kernel contexts */
		if (ctxt < dd->first_dyn_alloc_ctxt) {
471 472
			rcd->opstats = kzalloc_node(sizeof(*rcd->opstats),
						    GFP_KERNEL, numa);
473
			if (!rcd->opstats)
M
Mike Marciniszyn 已提交
474 475
				goto bail;
		}
476

477 478
		*context = rcd;
		return 0;
M
Mike Marciniszyn 已提交
479
	}
480

M
Mike Marciniszyn 已提交
481
bail:
482
	*context = NULL;
483
	hfi1_free_ctxt(rcd);
484 485 486 487 488 489 490
	return -ENOMEM;
}

/**
 * hfi1_free_ctxt
 * @rcd: pointer to an initialized rcd data structure
 *
491 492 493 494 495
 * This wrapper is the free function that matches hfi1_create_ctxtdata().
 * When a context is done being used (kernel or user), this function is called
 * for the "final" put to match the kref init from hf1i_create_ctxtdata().
 * Other users of the context do a get/put sequence to make sure that the
 * structure isn't removed while in use.
496
 */
497
void hfi1_free_ctxt(struct hfi1_ctxtdata *rcd)
498
{
499
	hfi1_rcd_put(rcd);
M
Mike Marciniszyn 已提交
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
}

/*
 * Convert a receive header entry size that to the encoding used in the CSR.
 *
 * Return a zero if the given size is invalid.
 */
static inline u64 encode_rcv_header_entry_size(u16 size)
{
	/* there are only 3 valid receive header entry sizes */
	if (size == 2)
		return 1;
	if (size == 16)
		return 2;
	else if (size == 32)
		return 4;
	return 0; /* invalid */
}

/*
 * Select the largest ccti value over all SLs to determine the intra-
 * packet gap for the link.
 *
 * called with cca_timer_lock held (to protect access to cca_timer
 * array), and rcu_read_lock() (to protect access to cc_state).
 */
void set_link_ipg(struct hfi1_pportdata *ppd)
{
	struct hfi1_devdata *dd = ppd->dd;
	struct cc_state *cc_state;
	int i;
	u16 cce, ccti_limit, max_ccti = 0;
	u16 shift, mult;
	u64 src;
	u32 current_egress_rate; /* Mbits /sec */
	u32 max_pkt_time;
	/*
	 * max_pkt_time is the maximum packet egress time in units
	 * of the fabric clock period 1/(805 MHz).
	 */

	cc_state = get_cc_state(ppd);

543
	if (!cc_state)
M
Mike Marciniszyn 已提交
544 545 546 547 548 549 550 551 552 553 554 555 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
		/*
		 * This should _never_ happen - rcu_read_lock() is held,
		 * and set_link_ipg() should not be called if cc_state
		 * is NULL.
		 */
		return;

	for (i = 0; i < OPA_MAX_SLS; i++) {
		u16 ccti = ppd->cca_timer[i].ccti;

		if (ccti > max_ccti)
			max_ccti = ccti;
	}

	ccti_limit = cc_state->cct.ccti_limit;
	if (max_ccti > ccti_limit)
		max_ccti = ccti_limit;

	cce = cc_state->cct.entries[max_ccti].entry;
	shift = (cce & 0xc000) >> 14;
	mult = (cce & 0x3fff);

	current_egress_rate = active_egress_rate(ppd);

	max_pkt_time = egress_cycles(ppd->ibmaxlen, current_egress_rate);

	src = (max_pkt_time >> shift) * mult;

	src &= SEND_STATIC_RATE_CONTROL_CSR_SRC_RELOAD_SMASK;
	src <<= SEND_STATIC_RATE_CONTROL_CSR_SRC_RELOAD_SHIFT;

	write_csr(dd, SEND_STATIC_RATE_CONTROL, src);
}

static enum hrtimer_restart cca_timer_fn(struct hrtimer *t)
{
	struct cca_timer *cca_timer;
	struct hfi1_pportdata *ppd;
	int sl;
583
	u16 ccti_timer, ccti_min;
M
Mike Marciniszyn 已提交
584
	struct cc_state *cc_state;
585
	unsigned long flags;
586
	enum hrtimer_restart ret = HRTIMER_NORESTART;
M
Mike Marciniszyn 已提交
587 588 589 590 591 592 593 594 595

	cca_timer = container_of(t, struct cca_timer, hrtimer);
	ppd = cca_timer->ppd;
	sl = cca_timer->sl;

	rcu_read_lock();

	cc_state = get_cc_state(ppd);

596
	if (!cc_state) {
M
Mike Marciniszyn 已提交
597 598 599 600 601 602 603 604 605 606 607 608 609
		rcu_read_unlock();
		return HRTIMER_NORESTART;
	}

	/*
	 * 1) decrement ccti for SL
	 * 2) calculate IPG for link (set_link_ipg())
	 * 3) restart timer, unless ccti is at min value
	 */

	ccti_min = cc_state->cong_setting.entries[sl].ccti_min;
	ccti_timer = cc_state->cong_setting.entries[sl].ccti_timer;

610
	spin_lock_irqsave(&ppd->cca_timer_lock, flags);
M
Mike Marciniszyn 已提交
611

612
	if (cca_timer->ccti > ccti_min) {
M
Mike Marciniszyn 已提交
613 614 615 616
		cca_timer->ccti--;
		set_link_ipg(ppd);
	}

617
	if (cca_timer->ccti > ccti_min) {
M
Mike Marciniszyn 已提交
618 619 620
		unsigned long nsec = 1024 * ccti_timer;
		/* ccti_timer is in units of 1.024 usec */
		hrtimer_forward_now(t, ns_to_ktime(nsec));
621
		ret = HRTIMER_RESTART;
M
Mike Marciniszyn 已提交
622
	}
623 624 625 626

	spin_unlock_irqrestore(&ppd->cca_timer_lock, flags);
	rcu_read_unlock();
	return ret;
M
Mike Marciniszyn 已提交
627 628 629 630 631 632 633 634
}

/*
 * Common code for initializing the physical port structure.
 */
void hfi1_init_pportdata(struct pci_dev *pdev, struct hfi1_pportdata *ppd,
			 struct hfi1_devdata *dd, u8 hw_pidx, u8 port)
{
635
	int i;
M
Mike Marciniszyn 已提交
636
	uint default_pkey_idx;
637
	struct cc_state *cc_state;
M
Mike Marciniszyn 已提交
638 639 640 641

	ppd->dd = dd;
	ppd->hw_pidx = hw_pidx;
	ppd->port = port; /* IB port number, not index */
642 643 644 645 646 647 648 649 650
	ppd->prev_link_width = LINK_WIDTH_DEFAULT;
	/*
	 * There are C_VL_COUNT number of PortVLXmitWait counters.
	 * Adding 1 to C_VL_COUNT to include the PortXmitWait counter.
	 */
	for (i = 0; i < C_VL_COUNT + 1; i++) {
		ppd->port_vl_xmit_wait_last[i] = 0;
		ppd->vl_xmit_flit_cnt[i] = 0;
	}
M
Mike Marciniszyn 已提交
651 652 653 654

	default_pkey_idx = 1;

	ppd->pkeys[default_pkey_idx] = DEFAULT_P_KEY;
655 656
	ppd->part_enforce |= HFI1_PART_ENFORCE_IN;

M
Mike Marciniszyn 已提交
657 658 659 660 661 662 663 664 665 666 667 668 669 670
	if (loopback) {
		hfi1_early_err(&pdev->dev,
			       "Faking data partition 0x8001 in idx %u\n",
			       !default_pkey_idx);
		ppd->pkeys[!default_pkey_idx] = 0x8001;
	}

	INIT_WORK(&ppd->link_vc_work, handle_verify_cap);
	INIT_WORK(&ppd->link_up_work, handle_link_up);
	INIT_WORK(&ppd->link_down_work, handle_link_down);
	INIT_WORK(&ppd->freeze_work, handle_freeze);
	INIT_WORK(&ppd->link_downgrade_work, handle_link_downgrade);
	INIT_WORK(&ppd->sma_message_work, handle_sma_message);
	INIT_WORK(&ppd->link_bounce_work, handle_link_bounce);
D
Dean Luick 已提交
671
	INIT_DELAYED_WORK(&ppd->start_link_work, handle_start_link);
672
	INIT_WORK(&ppd->linkstate_active_work, receive_interrupt_work);
673 674
	INIT_WORK(&ppd->qsfp_info.qsfp_work, qsfp_event);

M
Mike Marciniszyn 已提交
675 676 677
	mutex_init(&ppd->hls_lock);
	spin_lock_init(&ppd->qsfp_info.qsfp_lock);

678
	ppd->qsfp_info.ppd = ppd;
M
Mike Marciniszyn 已提交
679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698
	ppd->sm_trap_qp = 0x0;
	ppd->sa_qp = 0x1;

	ppd->hfi1_wq = NULL;

	spin_lock_init(&ppd->cca_timer_lock);

	for (i = 0; i < OPA_MAX_SLS; i++) {
		hrtimer_init(&ppd->cca_timer[i].hrtimer, CLOCK_MONOTONIC,
			     HRTIMER_MODE_REL);
		ppd->cca_timer[i].ppd = ppd;
		ppd->cca_timer[i].sl = i;
		ppd->cca_timer[i].ccti = 0;
		ppd->cca_timer[i].hrtimer.function = cca_timer_fn;
	}

	ppd->cc_max_table_entries = IB_CC_TABLE_CAP_DEFAULT;

	spin_lock_init(&ppd->cc_state_lock);
	spin_lock_init(&ppd->cc_log_lock);
699 700 701
	cc_state = kzalloc(sizeof(*cc_state), GFP_KERNEL);
	RCU_INIT_POINTER(ppd->cc_state, cc_state);
	if (!cc_state)
M
Mike Marciniszyn 已提交
702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730
		goto bail;
	return;

bail:

	hfi1_early_err(&pdev->dev,
		       "Congestion Control Agent disabled for port %d\n", port);
}

/*
 * Do initialization for device that is only needed on
 * first detect, not on resets.
 */
static int loadtime_init(struct hfi1_devdata *dd)
{
	return 0;
}

/**
 * init_after_reset - re-initialize after a reset
 * @dd: the hfi1_ib device
 *
 * sanity check at least some of the values after reset, and
 * ensure no receive or transmit (explicitly, in case reset
 * failed
 */
static int init_after_reset(struct hfi1_devdata *dd)
{
	int i;
731
	struct hfi1_ctxtdata *rcd;
M
Mike Marciniszyn 已提交
732 733 734 735 736
	/*
	 * Ensure chip does no sends or receives, tail updates, or
	 * pioavail updates while we re-initialize.  This is mostly
	 * for the driver data structures, not chip registers.
	 */
737 738
	for (i = 0; i < dd->num_rcv_contexts; i++) {
		rcd = hfi1_rcd_get_by_index(dd, i);
M
Mike Marciniszyn 已提交
739
		hfi1_rcvctrl(dd, HFI1_RCVCTRL_CTXT_DIS |
740
			     HFI1_RCVCTRL_INTRAVAIL_DIS |
741 742 743
			     HFI1_RCVCTRL_TAILUPD_DIS, rcd);
		hfi1_rcd_put(rcd);
	}
M
Mike Marciniszyn 已提交
744 745 746 747 748 749 750 751 752
	pio_send_control(dd, PSC_GLOBAL_DISABLE);
	for (i = 0; i < dd->num_send_contexts; i++)
		sc_disable(dd->send_contexts[i].sc);

	return 0;
}

static void enable_chip(struct hfi1_devdata *dd)
{
753
	struct hfi1_ctxtdata *rcd;
M
Mike Marciniszyn 已提交
754
	u32 rcvmask;
755
	u16 i;
M
Mike Marciniszyn 已提交
756 757 758 759 760 761 762 763

	/* enable PIO send */
	pio_send_control(dd, PSC_GLOBAL_ENABLE);

	/*
	 * Enable kernel ctxts' receive and receive interrupt.
	 * Other ctxts done as user opens and initializes them.
	 */
764
	for (i = 0; i < dd->first_dyn_alloc_ctxt; ++i) {
765 766 767
		rcd = hfi1_rcd_get_by_index(dd, i);
		if (!rcd)
			continue;
768
		rcvmask = HFI1_RCVCTRL_CTXT_ENB | HFI1_RCVCTRL_INTRAVAIL_ENB;
769
		rcvmask |= HFI1_CAP_KGET_MASK(rcd->flags, DMA_RTAIL) ?
M
Mike Marciniszyn 已提交
770
			HFI1_RCVCTRL_TAILUPD_ENB : HFI1_RCVCTRL_TAILUPD_DIS;
771
		if (!HFI1_CAP_KGET_MASK(rcd->flags, MULTI_PKT_EGR))
M
Mike Marciniszyn 已提交
772
			rcvmask |= HFI1_RCVCTRL_ONE_PKT_EGR_ENB;
773
		if (HFI1_CAP_KGET_MASK(rcd->flags, NODROP_RHQ_FULL))
M
Mike Marciniszyn 已提交
774
			rcvmask |= HFI1_RCVCTRL_NO_RHQ_DROP_ENB;
775
		if (HFI1_CAP_KGET_MASK(rcd->flags, NODROP_EGR_FULL))
M
Mike Marciniszyn 已提交
776
			rcvmask |= HFI1_RCVCTRL_NO_EGR_DROP_ENB;
777 778 779
		hfi1_rcvctrl(dd, rcvmask, rcd);
		sc_enable(rcd->sc);
		hfi1_rcd_put(rcd);
M
Mike Marciniszyn 已提交
780 781 782 783 784 785 786 787 788 789 790 791 792 793 794 795
	}
}

/**
 * create_workqueues - create per port workqueues
 * @dd: the hfi1_ib device
 */
static int create_workqueues(struct hfi1_devdata *dd)
{
	int pidx;
	struct hfi1_pportdata *ppd;

	for (pidx = 0; pidx < dd->num_pports; ++pidx) {
		ppd = dd->pport + pidx;
		if (!ppd->hfi1_wq) {
			ppd->hfi1_wq =
796 797 798
				alloc_workqueue(
				    "hfi%d_%d",
				    WQ_SYSFS | WQ_HIGHPRI | WQ_CPU_INTENSIVE,
799
				    HFI1_MAX_ACTIVE_WORKQUEUE_ENTRIES,
800
				    dd->unit, pidx);
M
Mike Marciniszyn 已提交
801 802 803
			if (!ppd->hfi1_wq)
				goto wq_error;
		}
804 805 806 807 808 809 810 811 812 813 814 815 816 817
		if (!ppd->link_wq) {
			/*
			 * Make the link workqueue single-threaded to enforce
			 * serialization.
			 */
			ppd->link_wq =
				alloc_workqueue(
				    "hfi_link_%d_%d",
				    WQ_SYSFS | WQ_MEM_RECLAIM | WQ_UNBOUND,
				    1, /* max_active */
				    dd->unit, pidx);
			if (!ppd->link_wq)
				goto wq_error;
		}
M
Mike Marciniszyn 已提交
818 819 820
	}
	return 0;
wq_error:
821
	pr_err("alloc_workqueue failed for port %d\n", pidx + 1);
M
Mike Marciniszyn 已提交
822 823 824 825 826 827
	for (pidx = 0; pidx < dd->num_pports; ++pidx) {
		ppd = dd->pport + pidx;
		if (ppd->hfi1_wq) {
			destroy_workqueue(ppd->hfi1_wq);
			ppd->hfi1_wq = NULL;
		}
828 829 830 831
		if (ppd->link_wq) {
			destroy_workqueue(ppd->link_wq);
			ppd->link_wq = NULL;
		}
M
Mike Marciniszyn 已提交
832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847 848 849 850 851 852 853
	}
	return -ENOMEM;
}

/**
 * hfi1_init - do the actual initialization sequence on the chip
 * @dd: the hfi1_ib device
 * @reinit: re-initializing, so don't allocate new memory
 *
 * Do the actual initialization sequence on the chip.  This is done
 * both from the init routine called from the PCI infrastructure, and
 * when we reset the chip, or detect that it was reset internally,
 * or it's administratively re-enabled.
 *
 * Memory allocation here and in called routines is only done in
 * the first case (reinit == 0).  We have to be careful, because even
 * without memory allocation, we need to re-write all the chip registers
 * TIDs, etc. after the reset or enable has completed.
 */
int hfi1_init(struct hfi1_devdata *dd, int reinit)
{
	int ret = 0, pidx, lastfail = 0;
854 855
	unsigned long len;
	u16 i;
M
Mike Marciniszyn 已提交
856 857 858 859 860 861 862
	struct hfi1_ctxtdata *rcd;
	struct hfi1_pportdata *ppd;

	/* Set up send low level handlers */
	dd->process_pio_send = hfi1_verbs_send_pio;
	dd->process_dma_send = hfi1_verbs_send_dma;
	dd->pio_inline_send = pio_copy;
863
	dd->process_vnic_dma_send = hfi1_vnic_send_dma;
M
Mike Marciniszyn 已提交
864

865
	if (is_ax(dd)) {
M
Mike Marciniszyn 已提交
866 867 868 869 870 871 872 873 874 875 876 877 878 879 880 881 882 883 884 885
		atomic_set(&dd->drop_packet, DROP_PACKET_ON);
		dd->do_drop = 1;
	} else {
		atomic_set(&dd->drop_packet, DROP_PACKET_OFF);
		dd->do_drop = 0;
	}

	/* make sure the link is not "up" */
	for (pidx = 0; pidx < dd->num_pports; ++pidx) {
		ppd = dd->pport + pidx;
		ppd->linkup = 0;
	}

	if (reinit)
		ret = init_after_reset(dd);
	else
		ret = loadtime_init(dd);
	if (ret)
		goto done;

886 887 888
	/* allocate dummy tail memory for all receive contexts */
	dd->rcvhdrtail_dummy_kvaddr = dma_zalloc_coherent(
		&dd->pcidev->dev, sizeof(u64),
889
		&dd->rcvhdrtail_dummy_dma,
890 891 892 893 894 895 896 897
		GFP_KERNEL);

	if (!dd->rcvhdrtail_dummy_kvaddr) {
		dd_dev_err(dd, "cannot allocate dummy tail memory\n");
		ret = -ENOMEM;
		goto done;
	}

M
Mike Marciniszyn 已提交
898
	/* dd->rcd can be NULL if early initialization failed */
899
	for (i = 0; dd->rcd && i < dd->first_dyn_alloc_ctxt; ++i) {
M
Mike Marciniszyn 已提交
900 901 902 903 904 905
		/*
		 * Set up the (kernel) rcvhdr queue and egr TIDs.  If doing
		 * re-init, the simplest way to handle this is to free
		 * existing, and re-allocate.
		 * Need to re-create rest of ctxt 0 ctxtdata as well.
		 */
906
		rcd = hfi1_rcd_get_by_index(dd, i);
M
Mike Marciniszyn 已提交
907 908 909 910 911 912 913 914
		if (!rcd)
			continue;

		rcd->do_interrupt = &handle_receive_interrupt;

		lastfail = hfi1_create_rcvhdrq(dd, rcd);
		if (!lastfail)
			lastfail = hfi1_setup_eagerbufs(rcd);
915
		if (lastfail) {
M
Mike Marciniszyn 已提交
916
			dd_dev_err(dd,
917
				   "failed to allocate kernel ctxt's rcvhdrq and/or egr bufs\n");
918 919
			ret = lastfail;
		}
920
		hfi1_rcd_put(rcd);
M
Mike Marciniszyn 已提交
921 922 923
	}

	/* Allocate enough memory for user event notification. */
924 925
	len = PAGE_ALIGN(dd->chip_rcv_contexts * HFI1_MAX_SHARED_CTXTS *
			 sizeof(*dd->events));
M
Mike Marciniszyn 已提交
926 927 928 929 930 931 932 933 934 935 936 937 938 939 940 941 942 943 944 945 946 947 948 949 950 951 952 953 954 955 956 957 958 959 960 961 962 963 964 965 966
	dd->events = vmalloc_user(len);
	if (!dd->events)
		dd_dev_err(dd, "Failed to allocate user events page\n");
	/*
	 * Allocate a page for device and port status.
	 * Page will be shared amongst all user processes.
	 */
	dd->status = vmalloc_user(PAGE_SIZE);
	if (!dd->status)
		dd_dev_err(dd, "Failed to allocate dev status page\n");
	else
		dd->freezelen = PAGE_SIZE - (sizeof(*dd->status) -
					     sizeof(dd->status->freezemsg));
	for (pidx = 0; pidx < dd->num_pports; ++pidx) {
		ppd = dd->pport + pidx;
		if (dd->status)
			/* Currently, we only have one port */
			ppd->statusp = &dd->status->port;

		set_mtu(ppd);
	}

	/* enable chip even if we have an error, so we can debug cause */
	enable_chip(dd);

done:
	/*
	 * Set status even if port serdes is not initialized
	 * so that diags will work.
	 */
	if (dd->status)
		dd->status->dev |= HFI1_STATUS_CHIP_PRESENT |
			HFI1_STATUS_INITTED;
	if (!ret) {
		/* enable all interrupts from the chip */
		set_intr_state(dd, 1);

		/* chip is OK for user apps; mark it as initialized */
		for (pidx = 0; pidx < dd->num_pports; ++pidx) {
			ppd = dd->pport + pidx;

967 968 969
			/*
			 * start the serdes - must be after interrupts are
			 * enabled so we are notified when the link goes up
M
Mike Marciniszyn 已提交
970 971 972 973
			 */
			lastfail = bringup_serdes(ppd);
			if (lastfail)
				dd_dev_info(dd,
974 975
					    "Failed to bring up port %u\n",
					    ppd->port);
M
Mike Marciniszyn 已提交
976 977 978 979 980 981 982 983 984 985 986 987 988 989 990 991 992 993 994 995 996 997 998 999 1000 1001 1002 1003 1004 1005 1006 1007 1008 1009 1010 1011 1012 1013 1014 1015 1016 1017 1018 1019 1020

			/*
			 * Set status even if port serdes is not initialized
			 * so that diags will work.
			 */
			if (ppd->statusp)
				*ppd->statusp |= HFI1_STATUS_CHIP_PRESENT |
							HFI1_STATUS_INITTED;
			if (!ppd->link_speed_enabled)
				continue;
		}
	}

	/* if ret is non-zero, we probably should do some cleanup here... */
	return ret;
}

static inline struct hfi1_devdata *__hfi1_lookup(int unit)
{
	return idr_find(&hfi1_unit_table, unit);
}

struct hfi1_devdata *hfi1_lookup(int unit)
{
	struct hfi1_devdata *dd;
	unsigned long flags;

	spin_lock_irqsave(&hfi1_devs_lock, flags);
	dd = __hfi1_lookup(unit);
	spin_unlock_irqrestore(&hfi1_devs_lock, flags);

	return dd;
}

/*
 * Stop the timers during unit shutdown, or after an error late
 * in initialization.
 */
static void stop_timers(struct hfi1_devdata *dd)
{
	struct hfi1_pportdata *ppd;
	int pidx;

	for (pidx = 0; pidx < dd->num_pports; ++pidx) {
		ppd = dd->pport + pidx;
1021
		if (ppd->led_override_timer.function) {
M
Mike Marciniszyn 已提交
1022 1023 1024 1025 1026 1027 1028 1029 1030 1031 1032 1033 1034 1035 1036 1037 1038 1039
			del_timer_sync(&ppd->led_override_timer);
			atomic_set(&ppd->led_override_timer_active, 0);
		}
	}
}

/**
 * shutdown_device - shut down a device
 * @dd: the hfi1_ib device
 *
 * This is called to make the device quiet when we are about to
 * unload the driver, and also when the device is administratively
 * disabled.   It does not free any data structures.
 * Everything it does has to be setup again by hfi1_init(dd, 1)
 */
static void shutdown_device(struct hfi1_devdata *dd)
{
	struct hfi1_pportdata *ppd;
1040
	struct hfi1_ctxtdata *rcd;
M
Mike Marciniszyn 已提交
1041 1042 1043
	unsigned pidx;
	int i;

1044 1045 1046 1047
	if (dd->flags & HFI1_SHUTDOWN)
		return;
	dd->flags |= HFI1_SHUTDOWN;

M
Mike Marciniszyn 已提交
1048 1049 1050 1051 1052 1053 1054 1055 1056 1057
	for (pidx = 0; pidx < dd->num_pports; ++pidx) {
		ppd = dd->pport + pidx;

		ppd->linkup = 0;
		if (ppd->statusp)
			*ppd->statusp &= ~(HFI1_STATUS_IB_CONF |
					   HFI1_STATUS_IB_READY);
	}
	dd->flags &= ~HFI1_INITTED;

1058
	/* mask and clean up interrupts, but not errors */
M
Mike Marciniszyn 已提交
1059
	set_intr_state(dd, 0);
1060
	hfi1_clean_up_interrupts(dd);
M
Mike Marciniszyn 已提交
1061 1062 1063

	for (pidx = 0; pidx < dd->num_pports; ++pidx) {
		ppd = dd->pport + pidx;
1064 1065
		for (i = 0; i < dd->num_rcv_contexts; i++) {
			rcd = hfi1_rcd_get_by_index(dd, i);
M
Mike Marciniszyn 已提交
1066
			hfi1_rcvctrl(dd, HFI1_RCVCTRL_TAILUPD_DIS |
1067 1068 1069
				     HFI1_RCVCTRL_CTXT_DIS |
				     HFI1_RCVCTRL_INTRAVAIL_DIS |
				     HFI1_RCVCTRL_PKEY_DIS |
1070 1071 1072
				     HFI1_RCVCTRL_ONE_PKT_EGR_DIS, rcd);
			hfi1_rcd_put(rcd);
		}
M
Mike Marciniszyn 已提交
1073 1074 1075 1076 1077 1078 1079 1080 1081 1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092 1093 1094 1095
		/*
		 * Gracefully stop all sends allowing any in progress to
		 * trickle out first.
		 */
		for (i = 0; i < dd->num_send_contexts; i++)
			sc_flush(dd->send_contexts[i].sc);
	}

	/*
	 * Enough for anything that's going to trickle out to have actually
	 * done so.
	 */
	udelay(20);

	for (pidx = 0; pidx < dd->num_pports; ++pidx) {
		ppd = dd->pport + pidx;

		/* disable all contexts */
		for (i = 0; i < dd->num_send_contexts; i++)
			sc_disable(dd->send_contexts[i].sc);
		/* disable the send device */
		pio_send_control(dd, PSC_GLOBAL_DISABLE);

1096 1097
		shutdown_led_override(ppd);

M
Mike Marciniszyn 已提交
1098 1099 1100 1101 1102 1103 1104 1105 1106 1107
		/*
		 * Clear SerdesEnable.
		 * We can't count on interrupts since we are stopping.
		 */
		hfi1_quiet_serdes(ppd);

		if (ppd->hfi1_wq) {
			destroy_workqueue(ppd->hfi1_wq);
			ppd->hfi1_wq = NULL;
		}
1108 1109 1110 1111
		if (ppd->link_wq) {
			destroy_workqueue(ppd->link_wq);
			ppd->link_wq = NULL;
		}
M
Mike Marciniszyn 已提交
1112 1113 1114 1115 1116 1117 1118 1119 1120 1121 1122 1123 1124 1125
	}
	sdma_exit(dd);
}

/**
 * hfi1_free_ctxtdata - free a context's allocated data
 * @dd: the hfi1_ib device
 * @rcd: the ctxtdata structure
 *
 * free up any allocated data for a context
 * It should never change any chip state, or global driver state.
 */
void hfi1_free_ctxtdata(struct hfi1_devdata *dd, struct hfi1_ctxtdata *rcd)
{
1126
	u32 e;
M
Mike Marciniszyn 已提交
1127 1128 1129 1130 1131 1132

	if (!rcd)
		return;

	if (rcd->rcvhdrq) {
		dma_free_coherent(&dd->pcidev->dev, rcd->rcvhdrq_size,
1133
				  rcd->rcvhdrq, rcd->rcvhdrq_dma);
M
Mike Marciniszyn 已提交
1134 1135 1136 1137
		rcd->rcvhdrq = NULL;
		if (rcd->rcvhdrtail_kvaddr) {
			dma_free_coherent(&dd->pcidev->dev, PAGE_SIZE,
					  (void *)rcd->rcvhdrtail_kvaddr,
1138
					  rcd->rcvhdrqtailaddr_dma);
M
Mike Marciniszyn 已提交
1139 1140 1141 1142 1143 1144
			rcd->rcvhdrtail_kvaddr = NULL;
		}
	}

	/* all the RcvArray entries should have been cleared by now */
	kfree(rcd->egrbufs.rcvtids);
1145
	rcd->egrbufs.rcvtids = NULL;
M
Mike Marciniszyn 已提交
1146 1147

	for (e = 0; e < rcd->egrbufs.alloced; e++) {
1148
		if (rcd->egrbufs.buffers[e].dma)
M
Mike Marciniszyn 已提交
1149 1150 1151
			dma_free_coherent(&dd->pcidev->dev,
					  rcd->egrbufs.buffers[e].len,
					  rcd->egrbufs.buffers[e].addr,
1152
					  rcd->egrbufs.buffers[e].dma);
M
Mike Marciniszyn 已提交
1153 1154
	}
	kfree(rcd->egrbufs.buffers);
1155 1156
	rcd->egrbufs.alloced = 0;
	rcd->egrbufs.buffers = NULL;
M
Mike Marciniszyn 已提交
1157 1158

	sc_free(rcd->sc);
1159 1160
	rcd->sc = NULL;

M
Mike Marciniszyn 已提交
1161 1162 1163 1164
	vfree(rcd->subctxt_uregbase);
	vfree(rcd->subctxt_rcvegrbuf);
	vfree(rcd->subctxt_rcvhdr_base);
	kfree(rcd->opstats);
1165 1166 1167 1168 1169

	rcd->subctxt_uregbase = NULL;
	rcd->subctxt_rcvegrbuf = NULL;
	rcd->subctxt_rcvhdr_base = NULL;
	rcd->opstats = NULL;
M
Mike Marciniszyn 已提交
1170 1171
}

D
Dean Luick 已提交
1172 1173
/*
 * Release our hold on the shared asic data.  If we are the last one,
1174 1175
 * return the structure to be finalized outside the lock.  Must be
 * holding hfi1_devs_lock.
D
Dean Luick 已提交
1176
 */
1177
static struct hfi1_asic_data *release_asic_data(struct hfi1_devdata *dd)
D
Dean Luick 已提交
1178
{
1179
	struct hfi1_asic_data *ad;
D
Dean Luick 已提交
1180 1181 1182
	int other;

	if (!dd->asic_data)
1183
		return NULL;
D
Dean Luick 已提交
1184 1185
	dd->asic_data->dds[dd->hfi1_id] = NULL;
	other = dd->hfi1_id ? 0 : 1;
1186
	ad = dd->asic_data;
D
Dean Luick 已提交
1187
	dd->asic_data = NULL;
1188 1189 1190 1191 1192 1193 1194 1195 1196
	/* return NULL if the other dd still has a link */
	return ad->dds[other] ? NULL : ad;
}

static void finalize_asic_data(struct hfi1_devdata *dd,
			       struct hfi1_asic_data *ad)
{
	clean_up_i2c(dd, ad);
	kfree(ad);
D
Dean Luick 已提交
1197 1198
}

1199 1200 1201 1202 1203 1204 1205 1206
/**
 * hfi1_clean_devdata - cleans up per-unit data structure
 * @dd: pointer to a valid devdata structure
 *
 * It cleans up all data structures set up by
 * by hfi1_alloc_devdata().
 */
static void hfi1_clean_devdata(struct hfi1_devdata *dd)
M
Mike Marciniszyn 已提交
1207
{
1208
	struct hfi1_asic_data *ad;
M
Mike Marciniszyn 已提交
1209 1210 1211
	unsigned long flags;

	spin_lock_irqsave(&hfi1_devs_lock, flags);
1212 1213 1214 1215
	if (!list_empty(&dd->list)) {
		idr_remove(&hfi1_unit_table, dd->unit);
		list_del_init(&dd->list);
	}
1216
	ad = release_asic_data(dd);
M
Mike Marciniszyn 已提交
1217
	spin_unlock_irqrestore(&hfi1_devs_lock, flags);
1218 1219

	finalize_asic_data(dd, ad);
1220
	free_platform_config(dd);
M
Mike Marciniszyn 已提交
1221 1222 1223
	rcu_barrier(); /* wait for rcu callbacks to complete */
	free_percpu(dd->int_counter);
	free_percpu(dd->rcv_limit);
1224
	free_percpu(dd->send_schedule);
1225
	free_percpu(dd->tx_opstats);
1226 1227 1228 1229
	dd->int_counter   = NULL;
	dd->rcv_limit     = NULL;
	dd->send_schedule = NULL;
	dd->tx_opstats    = NULL;
1230 1231
	kfree(dd->comp_vect);
	dd->comp_vect = NULL;
1232
	sdma_clean(dd, dd->num_sdma);
J
Jubin John 已提交
1233
	rvt_dealloc_device(&dd->verbs_dev.rdi);
M
Mike Marciniszyn 已提交
1234 1235
}

1236 1237 1238 1239 1240 1241 1242 1243
static void __hfi1_free_devdata(struct kobject *kobj)
{
	struct hfi1_devdata *dd =
		container_of(kobj, struct hfi1_devdata, kobj);

	hfi1_clean_devdata(dd);
}

1244 1245 1246 1247 1248 1249 1250 1251 1252
static struct kobj_type hfi1_devdata_type = {
	.release = __hfi1_free_devdata,
};

void hfi1_free_devdata(struct hfi1_devdata *dd)
{
	kobject_put(&dd->kobj);
}

M
Mike Marciniszyn 已提交
1253 1254 1255 1256 1257 1258 1259 1260 1261 1262 1263 1264
/*
 * Allocate our primary per-unit data structure.  Must be done via verbs
 * allocator, because the verbs cleanup process both does cleanup and
 * free of the data structure.
 * "extra" is for chip-specific data.
 *
 * Use the idr mechanism to get a unit number for this unit.
 */
struct hfi1_devdata *hfi1_alloc_devdata(struct pci_dev *pdev, size_t extra)
{
	unsigned long flags;
	struct hfi1_devdata *dd;
1265
	int ret, nports;
M
Mike Marciniszyn 已提交
1266

1267 1268
	/* extra is * number of ports */
	nports = extra / sizeof(struct hfi1_pportdata);
M
Mike Marciniszyn 已提交
1269

1270 1271
	dd = (struct hfi1_devdata *)rvt_alloc_device(sizeof(*dd) + extra,
						     nports);
M
Mike Marciniszyn 已提交
1272 1273
	if (!dd)
		return ERR_PTR(-ENOMEM);
1274
	dd->num_pports = nports;
M
Mike Marciniszyn 已提交
1275
	dd->pport = (struct hfi1_pportdata *)(dd + 1);
1276 1277
	dd->pcidev = pdev;
	pci_set_drvdata(pdev, dd);
M
Mike Marciniszyn 已提交
1278 1279 1280 1281 1282 1283 1284 1285 1286 1287

	INIT_LIST_HEAD(&dd->list);
	idr_preload(GFP_KERNEL);
	spin_lock_irqsave(&hfi1_devs_lock, flags);

	ret = idr_alloc(&hfi1_unit_table, dd, 0, 0, GFP_NOWAIT);
	if (ret >= 0) {
		dd->unit = ret;
		list_add(&dd->list, &hfi1_dev_list);
	}
1288
	dd->node = -1;
M
Mike Marciniszyn 已提交
1289 1290 1291 1292 1293 1294 1295 1296 1297

	spin_unlock_irqrestore(&hfi1_devs_lock, flags);
	idr_preload_end();

	if (ret < 0) {
		hfi1_early_err(&pdev->dev,
			       "Could not allocate unit ID: error %d\n", -ret);
		goto bail;
	}
1298 1299
	rvt_set_ibdev_name(&dd->verbs_dev.rdi, "%s_%d", class_name(), dd->unit);

M
Mike Marciniszyn 已提交
1300 1301 1302 1303 1304 1305 1306 1307 1308 1309 1310 1311 1312
	/*
	 * Initialize all locks for the device. This needs to be as early as
	 * possible so locks are usable.
	 */
	spin_lock_init(&dd->sc_lock);
	spin_lock_init(&dd->sendctrl_lock);
	spin_lock_init(&dd->rcvctrl_lock);
	spin_lock_init(&dd->uctxt_lock);
	spin_lock_init(&dd->hfi1_diag_trans_lock);
	spin_lock_init(&dd->sc_init_lock);
	spin_lock_init(&dd->dc8051_memlock);
	seqlock_init(&dd->sc2vl_lock);
	spin_lock_init(&dd->sde_map_lock);
1313
	spin_lock_init(&dd->pio_map_lock);
T
Tadeusz Struk 已提交
1314
	mutex_init(&dd->dc8051_lock);
M
Mike Marciniszyn 已提交
1315 1316 1317 1318 1319 1320 1321 1322 1323 1324 1325 1326 1327 1328
	init_waitqueue_head(&dd->event_queue);

	dd->int_counter = alloc_percpu(u64);
	if (!dd->int_counter) {
		ret = -ENOMEM;
		goto bail;
	}

	dd->rcv_limit = alloc_percpu(u64);
	if (!dd->rcv_limit) {
		ret = -ENOMEM;
		goto bail;
	}

1329 1330 1331 1332 1333 1334
	dd->send_schedule = alloc_percpu(u64);
	if (!dd->send_schedule) {
		ret = -ENOMEM;
		goto bail;
	}

1335 1336 1337 1338 1339 1340
	dd->tx_opstats = alloc_percpu(struct hfi1_opcode_stats_perctx);
	if (!dd->tx_opstats) {
		ret = -ENOMEM;
		goto bail;
	}

1341 1342 1343 1344 1345 1346
	dd->comp_vect = kzalloc(sizeof(*dd->comp_vect), GFP_KERNEL);
	if (!dd->comp_vect) {
		ret = -ENOMEM;
		goto bail;
	}

1347
	kobject_init(&dd->kobj, &hfi1_devdata_type);
M
Mike Marciniszyn 已提交
1348 1349 1350
	return dd;

bail:
1351
	hfi1_clean_devdata(dd);
M
Mike Marciniszyn 已提交
1352 1353 1354 1355 1356 1357 1358 1359 1360 1361 1362 1363 1364 1365 1366 1367 1368 1369 1370 1371 1372 1373 1374 1375 1376 1377 1378 1379 1380 1381 1382 1383 1384 1385 1386 1387 1388 1389
	return ERR_PTR(ret);
}

/*
 * Called from freeze mode handlers, and from PCI error
 * reporting code.  Should be paranoid about state of
 * system and data structures.
 */
void hfi1_disable_after_error(struct hfi1_devdata *dd)
{
	if (dd->flags & HFI1_INITTED) {
		u32 pidx;

		dd->flags &= ~HFI1_INITTED;
		if (dd->pport)
			for (pidx = 0; pidx < dd->num_pports; ++pidx) {
				struct hfi1_pportdata *ppd;

				ppd = dd->pport + pidx;
				if (dd->flags & HFI1_PRESENT)
					set_link_state(ppd, HLS_DN_DISABLE);

				if (ppd->statusp)
					*ppd->statusp &= ~HFI1_STATUS_IB_READY;
			}
	}

	/*
	 * Mark as having had an error for driver, and also
	 * for /sys and status word mapped to user programs.
	 * This marks unit as not usable, until reset.
	 */
	if (dd->status)
		dd->status->dev |= HFI1_STATUS_HWERROR;
}

static void remove_one(struct pci_dev *);
static int init_one(struct pci_dev *, const struct pci_device_id *);
1390
static void shutdown_one(struct pci_dev *);
M
Mike Marciniszyn 已提交
1391 1392 1393 1394

#define DRIVER_LOAD_MSG "Intel " DRIVER_NAME " loaded: "
#define PFX DRIVER_NAME ": "

1395
const struct pci_device_id hfi1_pci_tbl[] = {
M
Mike Marciniszyn 已提交
1396 1397 1398 1399 1400 1401 1402 1403 1404 1405 1406
	{ PCI_DEVICE(PCI_VENDOR_ID_INTEL, PCI_DEVICE_ID_INTEL0) },
	{ PCI_DEVICE(PCI_VENDOR_ID_INTEL, PCI_DEVICE_ID_INTEL1) },
	{ 0, }
};

MODULE_DEVICE_TABLE(pci, hfi1_pci_tbl);

static struct pci_driver hfi1_pci_driver = {
	.name = DRIVER_NAME,
	.probe = init_one,
	.remove = remove_one,
1407
	.shutdown = shutdown_one,
M
Mike Marciniszyn 已提交
1408 1409 1410 1411 1412 1413 1414 1415 1416 1417 1418 1419 1420 1421 1422 1423 1424 1425 1426 1427 1428 1429 1430 1431
	.id_table = hfi1_pci_tbl,
	.err_handler = &hfi1_pci_err_handler,
};

static void __init compute_krcvqs(void)
{
	int i;

	for (i = 0; i < krcvqsset; i++)
		n_krcvqs += krcvqs[i];
}

/*
 * Do all the generic driver unit- and chip-independent memory
 * allocation and initialization.
 */
static int __init hfi1_mod_init(void)
{
	int ret;

	ret = dev_init();
	if (ret)
		goto bail;

1432 1433 1434
	ret = node_affinity_init();
	if (ret)
		goto bail;
1435

M
Mike Marciniszyn 已提交
1436 1437 1438 1439 1440 1441 1442 1443 1444 1445 1446 1447 1448 1449
	/* validate max MTU before any devices start */
	if (!valid_opa_max_mtu(hfi1_max_mtu)) {
		pr_err("Invalid max_mtu 0x%x, using 0x%x instead\n",
		       hfi1_max_mtu, HFI1_DEFAULT_MAX_MTU);
		hfi1_max_mtu = HFI1_DEFAULT_MAX_MTU;
	}
	/* valid CUs run from 1-128 in powers of 2 */
	if (hfi1_cu > 128 || !is_power_of_2(hfi1_cu))
		hfi1_cu = 1;
	/* valid credit return threshold is 0-100, variable is unsigned */
	if (user_credit_return_threshold > 100)
		user_credit_return_threshold = 100;

	compute_krcvqs();
1450 1451 1452 1453
	/*
	 * sanitize receive interrupt count, time must wait until after
	 * the hardware type is known
	 */
M
Mike Marciniszyn 已提交
1454 1455 1456 1457 1458 1459 1460 1461 1462 1463 1464 1465 1466 1467 1468 1469 1470 1471 1472 1473 1474 1475 1476 1477 1478 1479 1480 1481 1482 1483 1484 1485 1486 1487
	if (rcv_intr_count > RCV_HDR_HEAD_COUNTER_MASK)
		rcv_intr_count = RCV_HDR_HEAD_COUNTER_MASK;
	/* reject invalid combinations */
	if (rcv_intr_count == 0 && rcv_intr_timeout == 0) {
		pr_err("Invalid mode: both receive interrupt count and available timeout are zero - setting interrupt count to 1\n");
		rcv_intr_count = 1;
	}
	if (rcv_intr_count > 1 && rcv_intr_timeout == 0) {
		/*
		 * Avoid indefinite packet delivery by requiring a timeout
		 * if count is > 1.
		 */
		pr_err("Invalid mode: receive interrupt count greater than 1 and available timeout is zero - setting available timeout to 1\n");
		rcv_intr_timeout = 1;
	}
	if (rcv_intr_dynamic && !(rcv_intr_count > 1 && rcv_intr_timeout > 0)) {
		/*
		 * The dynamic algorithm expects a non-zero timeout
		 * and a count > 1.
		 */
		pr_err("Invalid mode: dynamic receive interrupt mitigation with invalid count and timeout - turning dynamic off\n");
		rcv_intr_dynamic = 0;
	}

	/* sanitize link CRC options */
	link_crc_mask &= SUPPORTED_CRCS;

	/*
	 * These must be called before the driver is registered with
	 * the PCI subsystem.
	 */
	idr_init(&hfi1_unit_table);

	hfi1_dbg_init();
1488 1489 1490
	ret = hfi1_wss_init();
	if (ret < 0)
		goto bail_wss;
M
Mike Marciniszyn 已提交
1491 1492 1493 1494 1495 1496 1497 1498
	ret = pci_register_driver(&hfi1_pci_driver);
	if (ret < 0) {
		pr_err("Unable to register driver: error %d\n", -ret);
		goto bail_dev;
	}
	goto bail; /* all OK */

bail_dev:
1499 1500
	hfi1_wss_exit();
bail_wss:
M
Mike Marciniszyn 已提交
1501 1502 1503 1504 1505 1506 1507 1508 1509 1510 1511 1512 1513 1514 1515
	hfi1_dbg_exit();
	idr_destroy(&hfi1_unit_table);
	dev_cleanup();
bail:
	return ret;
}

module_init(hfi1_mod_init);

/*
 * Do the non-unit driver cleanup, memory free, etc. at unload.
 */
static void __exit hfi1_mod_cleanup(void)
{
	pci_unregister_driver(&hfi1_pci_driver);
1516
	node_affinity_destroy_all();
1517
	hfi1_wss_exit();
M
Mike Marciniszyn 已提交
1518 1519 1520 1521 1522 1523 1524 1525 1526 1527 1528 1529 1530 1531 1532 1533 1534 1535 1536 1537 1538 1539 1540 1541 1542 1543 1544 1545
	hfi1_dbg_exit();

	idr_destroy(&hfi1_unit_table);
	dispose_firmware();	/* asymmetric with obtain_firmware() */
	dev_cleanup();
}

module_exit(hfi1_mod_cleanup);

/* this can only be called after a successful initialization */
static void cleanup_device_data(struct hfi1_devdata *dd)
{
	int ctxt;
	int pidx;

	/* users can't do anything more with chip */
	for (pidx = 0; pidx < dd->num_pports; ++pidx) {
		struct hfi1_pportdata *ppd = &dd->pport[pidx];
		struct cc_state *cc_state;
		int i;

		if (ppd->statusp)
			*ppd->statusp &= ~HFI1_STATUS_CHIP_PRESENT;

		for (i = 0; i < OPA_MAX_SLS; i++)
			hrtimer_cancel(&ppd->cca_timer[i].hrtimer);

		spin_lock(&ppd->cc_state_lock);
1546
		cc_state = get_cc_state_protected(ppd);
1547
		RCU_INIT_POINTER(ppd->cc_state, NULL);
M
Mike Marciniszyn 已提交
1548 1549 1550
		spin_unlock(&ppd->cc_state_lock);

		if (cc_state)
1551
			kfree_rcu(cc_state, rcu);
M
Mike Marciniszyn 已提交
1552 1553 1554 1555
	}

	free_credit_return(dd);

1556 1557 1558
	if (dd->rcvhdrtail_dummy_kvaddr) {
		dma_free_coherent(&dd->pcidev->dev, sizeof(u64),
				  (void *)dd->rcvhdrtail_dummy_kvaddr,
1559
				  dd->rcvhdrtail_dummy_dma);
D
Dan Carpenter 已提交
1560
		dd->rcvhdrtail_dummy_kvaddr = NULL;
1561 1562
	}

1563 1564 1565 1566 1567 1568
	/*
	 * Free any resources still in use (usually just kernel contexts)
	 * at unload; we do for ctxtcnt, because that's what we allocate.
	 */
	for (ctxt = 0; dd->rcd && ctxt < dd->num_rcv_contexts; ctxt++) {
		struct hfi1_ctxtdata *rcd = dd->rcd[ctxt];
M
Mike Marciniszyn 已提交
1569 1570 1571

		if (rcd) {
			hfi1_clear_tids(rcd);
1572
			hfi1_free_ctxt(rcd);
M
Mike Marciniszyn 已提交
1573 1574
		}
	}
1575 1576 1577 1578

	kfree(dd->rcd);
	dd->rcd = NULL;

1579
	free_pio_map(dd);
M
Mike Marciniszyn 已提交
1580 1581 1582 1583 1584 1585
	/* must follow rcv context free - need to remove rcv's hooks */
	for (ctxt = 0; ctxt < dd->num_send_contexts; ctxt++)
		sc_free(dd->send_contexts[ctxt].sc);
	dd->num_send_contexts = 0;
	kfree(dd->send_contexts);
	dd->send_contexts = NULL;
J
Jubin John 已提交
1586 1587
	kfree(dd->hw_to_sw);
	dd->hw_to_sw = NULL;
M
Mike Marciniszyn 已提交
1588 1589 1590 1591 1592 1593 1594 1595 1596 1597 1598 1599
	kfree(dd->boardname);
	vfree(dd->events);
	vfree(dd->status);
}

/*
 * Clean up on unit shutdown, or error during unit load after
 * successful initialization.
 */
static void postinit_cleanup(struct hfi1_devdata *dd)
{
	hfi1_start_cleanup(dd);
1600 1601
	hfi1_comp_vectors_clean_up(dd);
	hfi1_dev_affinity_clean_up(dd);
M
Mike Marciniszyn 已提交
1602 1603 1604 1605 1606 1607 1608 1609 1610

	hfi1_pcie_ddcleanup(dd);
	hfi1_pcie_cleanup(dd->pcidev);

	cleanup_device_data(dd);

	hfi1_free_devdata(dd);
}

1611 1612 1613 1614 1615 1616 1617 1618 1619 1620 1621 1622 1623 1624 1625 1626 1627 1628 1629 1630 1631 1632 1633
static int init_validate_rcvhdrcnt(struct device *dev, uint thecnt)
{
	if (thecnt <= HFI1_MIN_HDRQ_EGRBUF_CNT) {
		hfi1_early_err(dev, "Receive header queue count too small\n");
		return -EINVAL;
	}

	if (thecnt > HFI1_MAX_HDRQ_EGRBUF_CNT) {
		hfi1_early_err(dev,
			       "Receive header queue count cannot be greater than %u\n",
			       HFI1_MAX_HDRQ_EGRBUF_CNT);
		return -EINVAL;
	}

	if (thecnt % HDRQ_INCREMENT) {
		hfi1_early_err(dev, "Receive header queue count %d must be divisible by %lu\n",
			       thecnt, HDRQ_INCREMENT);
		return -EINVAL;
	}

	return 0;
}

M
Mike Marciniszyn 已提交
1634 1635 1636
static int init_one(struct pci_dev *pdev, const struct pci_device_id *ent)
{
	int ret = 0, j, pidx, initfail;
1637
	struct hfi1_devdata *dd;
1638
	struct hfi1_pportdata *ppd;
M
Mike Marciniszyn 已提交
1639 1640 1641 1642

	/* First, lock the non-writable module parameters */
	HFI1_CAP_LOCK();

1643 1644 1645 1646 1647 1648 1649 1650 1651 1652
	/* Validate dev ids */
	if (!(ent->device == PCI_DEVICE_ID_INTEL0 ||
	      ent->device == PCI_DEVICE_ID_INTEL1)) {
		hfi1_early_err(&pdev->dev,
			       "Failing on unknown Intel deviceid 0x%x\n",
			       ent->device);
		ret = -ENODEV;
		goto bail;
	}

M
Mike Marciniszyn 已提交
1653
	/* Validate some global module parameters */
1654 1655
	ret = init_validate_rcvhdrcnt(&pdev->dev, rcvhdrcnt);
	if (ret)
1656
		goto bail;
1657

M
Mike Marciniszyn 已提交
1658 1659 1660 1661
	/* use the encoding function as a sanitization check */
	if (!encode_rcv_header_entry_size(hfi1_hdrq_entsize)) {
		hfi1_early_err(&pdev->dev, "Invalid HdrQ Entry size %u\n",
			       hfi1_hdrq_entsize);
1662
		ret = -EINVAL;
M
Mike Marciniszyn 已提交
1663 1664 1665 1666 1667 1668 1669 1670 1671 1672 1673 1674 1675 1676 1677 1678 1679 1680 1681 1682 1683 1684 1685 1686 1687 1688 1689 1690 1691 1692 1693 1694 1695 1696 1697
		goto bail;
	}

	/* The receive eager buffer size must be set before the receive
	 * contexts are created.
	 *
	 * Set the eager buffer size.  Validate that it falls in a range
	 * allowed by the hardware - all powers of 2 between the min and
	 * max.  The maximum valid MTU is within the eager buffer range
	 * so we do not need to cap the max_mtu by an eager buffer size
	 * setting.
	 */
	if (eager_buffer_size) {
		if (!is_power_of_2(eager_buffer_size))
			eager_buffer_size =
				roundup_pow_of_two(eager_buffer_size);
		eager_buffer_size =
			clamp_val(eager_buffer_size,
				  MIN_EAGER_BUFFER * 8,
				  MAX_EAGER_BUFFER_TOTAL);
		hfi1_early_info(&pdev->dev, "Eager buffer size %u\n",
				eager_buffer_size);
	} else {
		hfi1_early_err(&pdev->dev, "Invalid Eager buffer size of 0\n");
		ret = -EINVAL;
		goto bail;
	}

	/* restrict value of hfi1_rcvarr_split */
	hfi1_rcvarr_split = clamp_val(hfi1_rcvarr_split, 0, 100);

	ret = hfi1_pcie_init(pdev, ent);
	if (ret)
		goto bail;

1698 1699 1700 1701 1702 1703 1704
	/*
	 * Do device-specific initialization, function table setup, dd
	 * allocation, etc.
	 */
	dd = hfi1_init_dd(pdev, ent);

	if (IS_ERR(dd)) {
M
Mike Marciniszyn 已提交
1705 1706
		ret = PTR_ERR(dd);
		goto clean_bail; /* error already printed */
1707
	}
M
Mike Marciniszyn 已提交
1708 1709 1710 1711 1712 1713 1714 1715

	ret = create_workqueues(dd);
	if (ret)
		goto clean_bail;

	/* do the generic initialization */
	initfail = hfi1_init(dd, 0);

1716 1717 1718
	/* setup vnic */
	hfi1_vnic_setup(dd);

M
Mike Marciniszyn 已提交
1719 1720 1721 1722 1723 1724 1725 1726
	ret = hfi1_register_ib_device(dd);

	/*
	 * Now ready for use.  this should be cleared whenever we
	 * detect a reset, or initiate one.  If earlier failure,
	 * we still create devices, so diags, etc. can be used
	 * to determine cause of problem.
	 */
1727
	if (!initfail && !ret) {
M
Mike Marciniszyn 已提交
1728
		dd->flags |= HFI1_INITTED;
1729 1730 1731
		/* create debufs files after init and ib register */
		hfi1_dbg_ibdev_init(&dd->verbs_dev);
	}
M
Mike Marciniszyn 已提交
1732 1733 1734 1735 1736 1737

	j = hfi1_device_create(dd);
	if (j)
		dd_dev_err(dd, "Failed to create /dev devices: %d\n", -j);

	if (initfail || ret) {
1738
		hfi1_clean_up_interrupts(dd);
M
Mike Marciniszyn 已提交
1739 1740
		stop_timers(dd);
		flush_workqueue(ib_wq);
1741
		for (pidx = 0; pidx < dd->num_pports; ++pidx) {
M
Mike Marciniszyn 已提交
1742
			hfi1_quiet_serdes(dd->pport + pidx);
1743 1744 1745 1746 1747
			ppd = dd->pport + pidx;
			if (ppd->hfi1_wq) {
				destroy_workqueue(ppd->hfi1_wq);
				ppd->hfi1_wq = NULL;
			}
1748 1749 1750 1751
			if (ppd->link_wq) {
				destroy_workqueue(ppd->link_wq);
				ppd->link_wq = NULL;
			}
1752
		}
M
Mike Marciniszyn 已提交
1753 1754 1755 1756
		if (!j)
			hfi1_device_remove(dd);
		if (!ret)
			hfi1_unregister_ib_device(dd);
1757
		hfi1_vnic_cleanup(dd);
M
Mike Marciniszyn 已提交
1758 1759 1760 1761 1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773
		postinit_cleanup(dd);
		if (initfail)
			ret = initfail;
		goto bail;	/* everything already cleaned */
	}

	sdma_start(dd);

	return 0;

clean_bail:
	hfi1_pcie_cleanup(pdev);
bail:
	return ret;
}

1774 1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785
static void wait_for_clients(struct hfi1_devdata *dd)
{
	/*
	 * Remove the device init value and complete the device if there is
	 * no clients or wait for active clients to finish.
	 */
	if (atomic_dec_and_test(&dd->user_refcount))
		complete(&dd->user_comp);

	wait_for_completion(&dd->user_comp);
}

M
Mike Marciniszyn 已提交
1786 1787 1788 1789
static void remove_one(struct pci_dev *pdev)
{
	struct hfi1_devdata *dd = pci_get_drvdata(pdev);

1790 1791
	/* close debugfs files before ib unregister */
	hfi1_dbg_ibdev_exit(&dd->verbs_dev);
1792 1793 1794 1795 1796 1797 1798

	/* remove the /dev hfi1 interface */
	hfi1_device_remove(dd);

	/* wait for existing user space clients to finish */
	wait_for_clients(dd);

M
Mike Marciniszyn 已提交
1799 1800 1801
	/* unregister from IB core */
	hfi1_unregister_ib_device(dd);

1802 1803 1804
	/* cleanup vnic */
	hfi1_vnic_cleanup(dd);

M
Mike Marciniszyn 已提交
1805 1806 1807 1808 1809 1810 1811 1812 1813 1814 1815 1816 1817 1818
	/*
	 * Disable the IB link, disable interrupts on the device,
	 * clear dma engines, etc.
	 */
	shutdown_device(dd);

	stop_timers(dd);

	/* wait until all of our (qsfp) queue_work() calls complete */
	flush_workqueue(ib_wq);

	postinit_cleanup(dd);
}

1819 1820 1821 1822 1823 1824 1825
static void shutdown_one(struct pci_dev *pdev)
{
	struct hfi1_devdata *dd = pci_get_drvdata(pdev);

	shutdown_device(dd);
}

M
Mike Marciniszyn 已提交
1826 1827 1828 1829 1830 1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 1844 1845 1846
/**
 * hfi1_create_rcvhdrq - create a receive header queue
 * @dd: the hfi1_ib device
 * @rcd: the context data
 *
 * This must be contiguous memory (from an i/o perspective), and must be
 * DMA'able (which means for some systems, it will go through an IOMMU,
 * or be forced into a low address range).
 */
int hfi1_create_rcvhdrq(struct hfi1_devdata *dd, struct hfi1_ctxtdata *rcd)
{
	unsigned amt;
	u64 reg;

	if (!rcd->rcvhdrq) {
		gfp_t gfp_flags;

		/*
		 * rcvhdrqentsize is in DWs, so we have to convert to bytes
		 * (* sizeof(u32)).
		 */
1847 1848
		amt = PAGE_ALIGN(rcd->rcvhdrq_cnt * rcd->rcvhdrqentsize *
				 sizeof(u32));
M
Mike Marciniszyn 已提交
1849

1850
		if (rcd->ctxt < dd->first_dyn_alloc_ctxt || rcd->is_vnic)
1851 1852 1853
			gfp_flags = GFP_KERNEL;
		else
			gfp_flags = GFP_USER;
M
Mike Marciniszyn 已提交
1854
		rcd->rcvhdrq = dma_zalloc_coherent(
1855
			&dd->pcidev->dev, amt, &rcd->rcvhdrq_dma,
M
Mike Marciniszyn 已提交
1856 1857 1858 1859
			gfp_flags | __GFP_COMP);

		if (!rcd->rcvhdrq) {
			dd_dev_err(dd,
1860 1861
				   "attempt to allocate %d bytes for ctxt %u rcvhdrq failed\n",
				   amt, rcd->ctxt);
M
Mike Marciniszyn 已提交
1862 1863 1864
			goto bail;
		}

1865 1866
		if (HFI1_CAP_KGET_MASK(rcd->flags, DMA_RTAIL) ||
		    HFI1_CAP_UGET_MASK(rcd->flags, DMA_RTAIL)) {
M
Mike Marciniszyn 已提交
1867
			rcd->rcvhdrtail_kvaddr = dma_zalloc_coherent(
1868 1869
				&dd->pcidev->dev, PAGE_SIZE,
				&rcd->rcvhdrqtailaddr_dma, gfp_flags);
M
Mike Marciniszyn 已提交
1870 1871 1872 1873 1874 1875 1876 1877 1878 1879 1880 1881 1882 1883 1884 1885 1886 1887 1888 1889
			if (!rcd->rcvhdrtail_kvaddr)
				goto bail_free;
		}

		rcd->rcvhdrq_size = amt;
	}
	/*
	 * These values are per-context:
	 *	RcvHdrCnt
	 *	RcvHdrEntSize
	 *	RcvHdrSize
	 */
	reg = ((u64)(rcd->rcvhdrq_cnt >> HDRQ_SIZE_SHIFT)
			& RCV_HDR_CNT_CNT_MASK)
		<< RCV_HDR_CNT_CNT_SHIFT;
	write_kctxt_csr(dd, rcd->ctxt, RCV_HDR_CNT, reg);
	reg = (encode_rcv_header_entry_size(rcd->rcvhdrqentsize)
			& RCV_HDR_ENT_SIZE_ENT_SIZE_MASK)
		<< RCV_HDR_ENT_SIZE_ENT_SIZE_SHIFT;
	write_kctxt_csr(dd, rcd->ctxt, RCV_HDR_ENT_SIZE, reg);
M
Mike Marciniszyn 已提交
1890
	reg = ((u64)DEFAULT_RCVHDRSIZE & RCV_HDR_SIZE_HDR_SIZE_MASK)
M
Mike Marciniszyn 已提交
1891 1892
		<< RCV_HDR_SIZE_HDR_SIZE_SHIFT;
	write_kctxt_csr(dd, rcd->ctxt, RCV_HDR_SIZE, reg);
1893 1894 1895 1896 1897 1898

	/*
	 * Program dummy tail address for every receive context
	 * before enabling any receive context
	 */
	write_kctxt_csr(dd, rcd->ctxt, RCV_HDR_TAIL_ADDR,
1899
			dd->rcvhdrtail_dummy_dma);
1900

M
Mike Marciniszyn 已提交
1901 1902 1903 1904
	return 0;

bail_free:
	dd_dev_err(dd,
1905 1906
		   "attempt to allocate 1 page for ctxt %u rcvhdrqtailaddr failed\n",
		   rcd->ctxt);
M
Mike Marciniszyn 已提交
1907
	dma_free_coherent(&dd->pcidev->dev, amt, rcd->rcvhdrq,
1908
			  rcd->rcvhdrq_dma);
M
Mike Marciniszyn 已提交
1909 1910 1911 1912 1913 1914 1915 1916 1917 1918 1919 1920 1921 1922 1923 1924 1925 1926 1927 1928 1929 1930 1931 1932 1933 1934 1935 1936 1937
	rcd->rcvhdrq = NULL;
bail:
	return -ENOMEM;
}

/**
 * allocate eager buffers, both kernel and user contexts.
 * @rcd: the context we are setting up.
 *
 * Allocate the eager TID buffers and program them into hip.
 * They are no longer completely contiguous, we do multiple allocation
 * calls.  Otherwise we get the OOM code involved, by asking for too
 * much per call, with disastrous results on some kernels.
 */
int hfi1_setup_eagerbufs(struct hfi1_ctxtdata *rcd)
{
	struct hfi1_devdata *dd = rcd->dd;
	u32 max_entries, egrtop, alloced_bytes = 0, idx = 0;
	gfp_t gfp_flags;
	u16 order;
	int ret = 0;
	u16 round_mtu = roundup_pow_of_two(hfi1_max_mtu);

	/*
	 * GFP_USER, but without GFP_FS, so buffer cache can be
	 * coalesced (we hope); otherwise, even at order 4,
	 * heavy filesystem activity makes these fail, and we can
	 * use compound pages.
	 */
1938
	gfp_flags = __GFP_RECLAIM | __GFP_IO | __GFP_COMP;
M
Mike Marciniszyn 已提交
1939 1940 1941 1942 1943 1944 1945 1946 1947 1948 1949 1950 1951 1952 1953 1954 1955 1956 1957 1958 1959 1960 1961 1962 1963 1964 1965 1966 1967 1968

	/*
	 * The minimum size of the eager buffers is a groups of MTU-sized
	 * buffers.
	 * The global eager_buffer_size parameter is checked against the
	 * theoretical lower limit of the value. Here, we check against the
	 * MTU.
	 */
	if (rcd->egrbufs.size < (round_mtu * dd->rcv_entries.group_size))
		rcd->egrbufs.size = round_mtu * dd->rcv_entries.group_size;
	/*
	 * If using one-pkt-per-egr-buffer, lower the eager buffer
	 * size to the max MTU (page-aligned).
	 */
	if (!HFI1_CAP_KGET_MASK(rcd->flags, MULTI_PKT_EGR))
		rcd->egrbufs.rcvtid_size = round_mtu;

	/*
	 * Eager buffers sizes of 1MB or less require smaller TID sizes
	 * to satisfy the "multiple of 8 RcvArray entries" requirement.
	 */
	if (rcd->egrbufs.size <= (1 << 20))
		rcd->egrbufs.rcvtid_size = max((unsigned long)round_mtu,
			rounddown_pow_of_two(rcd->egrbufs.size / 8));

	while (alloced_bytes < rcd->egrbufs.size &&
	       rcd->egrbufs.alloced < rcd->egrbufs.count) {
		rcd->egrbufs.buffers[idx].addr =
			dma_zalloc_coherent(&dd->pcidev->dev,
					    rcd->egrbufs.rcvtid_size,
1969
					    &rcd->egrbufs.buffers[idx].dma,
M
Mike Marciniszyn 已提交
1970 1971 1972 1973 1974 1975
					    gfp_flags);
		if (rcd->egrbufs.buffers[idx].addr) {
			rcd->egrbufs.buffers[idx].len =
				rcd->egrbufs.rcvtid_size;
			rcd->egrbufs.rcvtids[rcd->egrbufs.alloced].addr =
				rcd->egrbufs.buffers[idx].addr;
1976 1977
			rcd->egrbufs.rcvtids[rcd->egrbufs.alloced].dma =
				rcd->egrbufs.buffers[idx].dma;
M
Mike Marciniszyn 已提交
1978 1979 1980 1981 1982 1983 1984 1985 1986 1987 1988 1989 1990 1991 1992 1993
			rcd->egrbufs.alloced++;
			alloced_bytes += rcd->egrbufs.rcvtid_size;
			idx++;
		} else {
			u32 new_size, i, j;
			u64 offset = 0;

			/*
			 * Fail the eager buffer allocation if:
			 *   - we are already using the lowest acceptable size
			 *   - we are using one-pkt-per-egr-buffer (this implies
			 *     that we are accepting only one size)
			 */
			if (rcd->egrbufs.rcvtid_size == round_mtu ||
			    !HFI1_CAP_KGET_MASK(rcd->flags, MULTI_PKT_EGR)) {
				dd_dev_err(dd, "ctxt%u: Failed to allocate eager buffers\n",
1994
					   rcd->ctxt);
1995
				ret = -ENOMEM;
M
Mike Marciniszyn 已提交
1996 1997 1998 1999 2000 2001 2002 2003 2004 2005 2006 2007 2008 2009 2010 2011 2012 2013 2014 2015 2016 2017 2018
				goto bail_rcvegrbuf_phys;
			}

			new_size = rcd->egrbufs.rcvtid_size / 2;

			/*
			 * If the first attempt to allocate memory failed, don't
			 * fail everything but continue with the next lower
			 * size.
			 */
			if (idx == 0) {
				rcd->egrbufs.rcvtid_size = new_size;
				continue;
			}

			/*
			 * Re-partition already allocated buffers to a smaller
			 * size.
			 */
			rcd->egrbufs.alloced = 0;
			for (i = 0, j = 0, offset = 0; j < idx; i++) {
				if (i >= rcd->egrbufs.count)
					break;
2019 2020
				rcd->egrbufs.rcvtids[i].dma =
					rcd->egrbufs.buffers[j].dma + offset;
M
Mike Marciniszyn 已提交
2021 2022 2023
				rcd->egrbufs.rcvtids[i].addr =
					rcd->egrbufs.buffers[j].addr + offset;
				rcd->egrbufs.alloced++;
2024
				if ((rcd->egrbufs.buffers[j].dma + offset +
M
Mike Marciniszyn 已提交
2025
				     new_size) ==
2026
				    (rcd->egrbufs.buffers[j].dma +
M
Mike Marciniszyn 已提交
2027 2028 2029
				     rcd->egrbufs.buffers[j].len)) {
					j++;
					offset = 0;
2030
				} else {
M
Mike Marciniszyn 已提交
2031
					offset += new_size;
2032
				}
M
Mike Marciniszyn 已提交
2033 2034 2035 2036 2037 2038 2039
			}
			rcd->egrbufs.rcvtid_size = new_size;
		}
	}
	rcd->egrbufs.numbufs = idx;
	rcd->egrbufs.size = alloced_bytes;

2040 2041
	hfi1_cdbg(PROC,
		  "ctxt%u: Alloced %u rcv tid entries @ %uKB, total %zuKB\n",
2042 2043
		  rcd->ctxt, rcd->egrbufs.alloced,
		  rcd->egrbufs.rcvtid_size / 1024, rcd->egrbufs.size / 1024);
2044

M
Mike Marciniszyn 已提交
2045 2046 2047 2048 2049 2050 2051 2052 2053 2054 2055 2056 2057 2058 2059 2060 2061 2062 2063
	/*
	 * Set the contexts rcv array head update threshold to the closest
	 * power of 2 (so we can use a mask instead of modulo) below half
	 * the allocated entries.
	 */
	rcd->egrbufs.threshold =
		rounddown_pow_of_two(rcd->egrbufs.alloced / 2);
	/*
	 * Compute the expected RcvArray entry base. This is done after
	 * allocating the eager buffers in order to maximize the
	 * expected RcvArray entries for the context.
	 */
	max_entries = rcd->rcv_array_groups * dd->rcv_entries.group_size;
	egrtop = roundup(rcd->egrbufs.alloced, dd->rcv_entries.group_size);
	rcd->expected_count = max_entries - egrtop;
	if (rcd->expected_count > MAX_TID_PAIR_ENTRIES * 2)
		rcd->expected_count = MAX_TID_PAIR_ENTRIES * 2;

	rcd->expected_base = rcd->eager_base + egrtop;
2064 2065 2066
	hfi1_cdbg(PROC, "ctxt%u: eager:%u, exp:%u, egrbase:%u, expbase:%u\n",
		  rcd->ctxt, rcd->egrbufs.alloced, rcd->expected_count,
		  rcd->eager_base, rcd->expected_base);
M
Mike Marciniszyn 已提交
2067 2068

	if (!hfi1_rcvbuf_validate(rcd->egrbufs.rcvtid_size, PT_EAGER, &order)) {
2069 2070 2071
		hfi1_cdbg(PROC,
			  "ctxt%u: current Eager buffer size is invalid %u\n",
			  rcd->ctxt, rcd->egrbufs.rcvtid_size);
M
Mike Marciniszyn 已提交
2072
		ret = -EINVAL;
2073
		goto bail_rcvegrbuf_phys;
M
Mike Marciniszyn 已提交
2074 2075 2076 2077
	}

	for (idx = 0; idx < rcd->egrbufs.alloced; idx++) {
		hfi1_put_tid(dd, rcd->eager_base + idx, PT_EAGER,
2078
			     rcd->egrbufs.rcvtids[idx].dma, order);
M
Mike Marciniszyn 已提交
2079 2080
		cond_resched();
	}
2081 2082

	return 0;
M
Mike Marciniszyn 已提交
2083 2084 2085

bail_rcvegrbuf_phys:
	for (idx = 0; idx < rcd->egrbufs.alloced &&
2086
	     rcd->egrbufs.buffers[idx].addr;
M
Mike Marciniszyn 已提交
2087 2088 2089 2090
	     idx++) {
		dma_free_coherent(&dd->pcidev->dev,
				  rcd->egrbufs.buffers[idx].len,
				  rcd->egrbufs.buffers[idx].addr,
2091
				  rcd->egrbufs.buffers[idx].dma);
M
Mike Marciniszyn 已提交
2092
		rcd->egrbufs.buffers[idx].addr = NULL;
2093
		rcd->egrbufs.buffers[idx].dma = 0;
M
Mike Marciniszyn 已提交
2094 2095
		rcd->egrbufs.buffers[idx].len = 0;
	}
2096

M
Mike Marciniszyn 已提交
2097 2098
	return ret;
}