brintos

brintos / linux-shallow public Read only

0
0
Text · 51.3 KiB · cbac4a4 Raw
1980 lines · c
1// SPDX-License-Identifier: GPL-2.0 OR BSD-3-Clause2/*3 * Copyright(c) 2015 - 2020 Intel Corporation.4 * Copyright(c) 2021 Cornelis Networks.5 */6 7#include <linux/pci.h>8#include <linux/netdevice.h>9#include <linux/vmalloc.h>10#include <linux/delay.h>11#include <linux/xarray.h>12#include <linux/module.h>13#include <linux/printk.h>14#include <linux/hrtimer.h>15#include <linux/bitmap.h>16#include <linux/numa.h>17#include <rdma/rdma_vt.h>18 19#include "hfi.h"20#include "device.h"21#include "common.h"22#include "trace.h"23#include "mad.h"24#include "sdma.h"25#include "debugfs.h"26#include "verbs.h"27#include "aspm.h"28#include "affinity.h"29#include "vnic.h"30#include "exp_rcv.h"31#include "netdev.h"32 33#undef pr_fmt34#define pr_fmt(fmt) DRIVER_NAME ": " fmt35 36/*37 * min buffers we want to have per context, after driver38 */39#define HFI1_MIN_USER_CTXT_BUFCNT 740 41#define HFI1_MIN_EAGER_BUFFER_SIZE (4 * 1024) /* 4KB */42#define HFI1_MAX_EAGER_BUFFER_SIZE (256 * 1024) /* 256KB */43 44#define NUM_IB_PORTS 145 46/*47 * Number of user receive contexts we are configured to use (to allow for more48 * pio buffers per ctxt, etc.)  Zero means use one user context per CPU.49 */50int num_user_contexts = -1;51module_param_named(num_user_contexts, num_user_contexts, int, 0444);52MODULE_PARM_DESC(53	num_user_contexts, "Set max number of user contexts to use (default: -1 will use the real (non-HT) CPU count)");54 55uint krcvqs[RXE_NUM_DATA_VL];56int krcvqsset;57module_param_array(krcvqs, uint, &krcvqsset, S_IRUGO);58MODULE_PARM_DESC(krcvqs, "Array of the number of non-control kernel receive queues by VL");59 60/* computed based on above array */61unsigned long n_krcvqs;62 63static unsigned hfi1_rcvarr_split = 25;64module_param_named(rcvarr_split, hfi1_rcvarr_split, uint, S_IRUGO);65MODULE_PARM_DESC(rcvarr_split, "Percent of context's RcvArray entries used for Eager buffers");66 67static uint eager_buffer_size = (8 << 20); /* 8MB */68module_param(eager_buffer_size, uint, S_IRUGO);69MODULE_PARM_DESC(eager_buffer_size, "Size of the eager buffers, default: 8MB");70 71static uint rcvhdrcnt = 2048; /* 2x the max eager buffer count */72module_param_named(rcvhdrcnt, rcvhdrcnt, uint, S_IRUGO);73MODULE_PARM_DESC(rcvhdrcnt, "Receive header queue count (default 2048)");74 75static uint hfi1_hdrq_entsize = 32;76module_param_named(hdrq_entsize, hfi1_hdrq_entsize, uint, 0444);77MODULE_PARM_DESC(hdrq_entsize, "Size of header queue entries: 2 - 8B, 16 - 64B, 32 - 128B (default)");78 79unsigned int user_credit_return_threshold = 33;	/* default is 33% */80module_param(user_credit_return_threshold, uint, S_IRUGO);81MODULE_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)");82 83DEFINE_XARRAY_FLAGS(hfi1_dev_table, XA_FLAGS_ALLOC | XA_FLAGS_LOCK_IRQ);84 85static int hfi1_create_kctxt(struct hfi1_devdata *dd,86			     struct hfi1_pportdata *ppd)87{88	struct hfi1_ctxtdata *rcd;89	int ret;90 91	/* Control context has to be always 0 */92	BUILD_BUG_ON(HFI1_CTRL_CTXT != 0);93 94	ret = hfi1_create_ctxtdata(ppd, dd->node, &rcd);95	if (ret < 0) {96		dd_dev_err(dd, "Kernel receive context allocation failed\n");97		return ret;98	}99 100	/*101	 * Set up the kernel context flags here and now because they use102	 * default values for all receive side memories.  User contexts will103	 * be handled as they are created.104	 */105	rcd->flags = HFI1_CAP_KGET(MULTI_PKT_EGR) |106		HFI1_CAP_KGET(NODROP_RHQ_FULL) |107		HFI1_CAP_KGET(NODROP_EGR_FULL) |108		HFI1_CAP_KGET(DMA_RTAIL);109 110	/* Control context must use DMA_RTAIL */111	if (rcd->ctxt == HFI1_CTRL_CTXT)112		rcd->flags |= HFI1_CAP_DMA_RTAIL;113	rcd->fast_handler = get_dma_rtail_setting(rcd) ?114				handle_receive_interrupt_dma_rtail :115				handle_receive_interrupt_nodma_rtail;116 117	hfi1_set_seq_cnt(rcd, 1);118 119	rcd->sc = sc_alloc(dd, SC_ACK, rcd->rcvhdrqentsize, dd->node);120	if (!rcd->sc) {121		dd_dev_err(dd, "Kernel send context allocation failed\n");122		return -ENOMEM;123	}124	hfi1_init_ctxt(rcd->sc);125 126	return 0;127}128 129/*130 * Create the receive context array and one or more kernel contexts131 */132int hfi1_create_kctxts(struct hfi1_devdata *dd)133{134	u16 i;135	int ret;136 137	dd->rcd = kcalloc_node(dd->num_rcv_contexts, sizeof(*dd->rcd),138			       GFP_KERNEL, dd->node);139	if (!dd->rcd)140		return -ENOMEM;141 142	for (i = 0; i < dd->first_dyn_alloc_ctxt; ++i) {143		ret = hfi1_create_kctxt(dd, dd->pport);144		if (ret)145			goto bail;146	}147 148	return 0;149bail:150	for (i = 0; dd->rcd && i < dd->first_dyn_alloc_ctxt; ++i)151		hfi1_free_ctxt(dd->rcd[i]);152 153	/* All the contexts should be freed, free the array */154	kfree(dd->rcd);155	dd->rcd = NULL;156	return ret;157}158 159/*160 * Helper routines for the receive context reference count (rcd and uctxt).161 */162static void hfi1_rcd_init(struct hfi1_ctxtdata *rcd)163{164	kref_init(&rcd->kref);165}166 167/**168 * hfi1_rcd_free - When reference is zero clean up.169 * @kref: pointer to an initialized rcd data structure170 *171 */172static void hfi1_rcd_free(struct kref *kref)173{174	unsigned long flags;175	struct hfi1_ctxtdata *rcd =176		container_of(kref, struct hfi1_ctxtdata, kref);177 178	spin_lock_irqsave(&rcd->dd->uctxt_lock, flags);179	rcd->dd->rcd[rcd->ctxt] = NULL;180	spin_unlock_irqrestore(&rcd->dd->uctxt_lock, flags);181 182	hfi1_free_ctxtdata(rcd->dd, rcd);183 184	kfree(rcd);185}186 187/**188 * hfi1_rcd_put - decrement reference for rcd189 * @rcd: pointer to an initialized rcd data structure190 *191 * Use this to put a reference after the init.192 */193int hfi1_rcd_put(struct hfi1_ctxtdata *rcd)194{195	if (rcd)196		return kref_put(&rcd->kref, hfi1_rcd_free);197 198	return 0;199}200 201/**202 * hfi1_rcd_get - increment reference for rcd203 * @rcd: pointer to an initialized rcd data structure204 *205 * Use this to get a reference after the init.206 *207 * Return : reflect kref_get_unless_zero(), which returns non-zero on208 * increment, otherwise 0.209 */210int hfi1_rcd_get(struct hfi1_ctxtdata *rcd)211{212	return kref_get_unless_zero(&rcd->kref);213}214 215/**216 * allocate_rcd_index - allocate an rcd index from the rcd array217 * @dd: pointer to a valid devdata structure218 * @rcd: rcd data structure to assign219 * @index: pointer to index that is allocated220 *221 * Find an empty index in the rcd array, and assign the given rcd to it.222 * If the array is full, we are EBUSY.223 *224 */225static int allocate_rcd_index(struct hfi1_devdata *dd,226			      struct hfi1_ctxtdata *rcd, u16 *index)227{228	unsigned long flags;229	u16 ctxt;230 231	spin_lock_irqsave(&dd->uctxt_lock, flags);232	for (ctxt = 0; ctxt < dd->num_rcv_contexts; ctxt++)233		if (!dd->rcd[ctxt])234			break;235 236	if (ctxt < dd->num_rcv_contexts) {237		rcd->ctxt = ctxt;238		dd->rcd[ctxt] = rcd;239		hfi1_rcd_init(rcd);240	}241	spin_unlock_irqrestore(&dd->uctxt_lock, flags);242 243	if (ctxt >= dd->num_rcv_contexts)244		return -EBUSY;245 246	*index = ctxt;247 248	return 0;249}250 251/**252 * hfi1_rcd_get_by_index_safe - validate the ctxt index before accessing the253 * array254 * @dd: pointer to a valid devdata structure255 * @ctxt: the index of an possilbe rcd256 *257 * This is a wrapper for hfi1_rcd_get_by_index() to validate that the given258 * ctxt index is valid.259 *260 * The caller is responsible for making the _put().261 *262 */263struct hfi1_ctxtdata *hfi1_rcd_get_by_index_safe(struct hfi1_devdata *dd,264						 u16 ctxt)265{266	if (ctxt < dd->num_rcv_contexts)267		return hfi1_rcd_get_by_index(dd, ctxt);268 269	return NULL;270}271 272/**273 * hfi1_rcd_get_by_index - get by index274 * @dd: pointer to a valid devdata structure275 * @ctxt: the index of an possilbe rcd276 *277 * We need to protect access to the rcd array.  If access is needed to278 * one or more index, get the protecting spinlock and then increment the279 * kref.280 *281 * The caller is responsible for making the _put().282 *283 */284struct hfi1_ctxtdata *hfi1_rcd_get_by_index(struct hfi1_devdata *dd, u16 ctxt)285{286	unsigned long flags;287	struct hfi1_ctxtdata *rcd = NULL;288 289	spin_lock_irqsave(&dd->uctxt_lock, flags);290	if (dd->rcd[ctxt]) {291		rcd = dd->rcd[ctxt];292		if (!hfi1_rcd_get(rcd))293			rcd = NULL;294	}295	spin_unlock_irqrestore(&dd->uctxt_lock, flags);296 297	return rcd;298}299 300/*301 * Common code for user and kernel context create and setup.302 * NOTE: the initial kref is done here (hf1_rcd_init()).303 */304int hfi1_create_ctxtdata(struct hfi1_pportdata *ppd, int numa,305			 struct hfi1_ctxtdata **context)306{307	struct hfi1_devdata *dd = ppd->dd;308	struct hfi1_ctxtdata *rcd;309	unsigned kctxt_ngroups = 0;310	u32 base;311 312	if (dd->rcv_entries.nctxt_extra >313	    dd->num_rcv_contexts - dd->first_dyn_alloc_ctxt)314		kctxt_ngroups = (dd->rcv_entries.nctxt_extra -315			 (dd->num_rcv_contexts - dd->first_dyn_alloc_ctxt));316	rcd = kzalloc_node(sizeof(*rcd), GFP_KERNEL, numa);317	if (rcd) {318		u32 rcvtids, max_entries;319		u16 ctxt;320		int ret;321 322		ret = allocate_rcd_index(dd, rcd, &ctxt);323		if (ret) {324			*context = NULL;325			kfree(rcd);326			return ret;327		}328 329		INIT_LIST_HEAD(&rcd->qp_wait_list);330		hfi1_exp_tid_group_init(rcd);331		rcd->ppd = ppd;332		rcd->dd = dd;333		rcd->numa_id = numa;334		rcd->rcv_array_groups = dd->rcv_entries.ngroups;335		rcd->rhf_rcv_function_map = normal_rhf_rcv_functions;336		rcd->slow_handler = handle_receive_interrupt;337		rcd->do_interrupt = rcd->slow_handler;338		rcd->msix_intr = CCE_NUM_MSIX_VECTORS;339 340		mutex_init(&rcd->exp_mutex);341		spin_lock_init(&rcd->exp_lock);342		INIT_LIST_HEAD(&rcd->flow_queue.queue_head);343		INIT_LIST_HEAD(&rcd->rarr_queue.queue_head);344 345		hfi1_cdbg(PROC, "setting up context %u", rcd->ctxt);346 347		/*348		 * Calculate the context's RcvArray entry starting point.349		 * We do this here because we have to take into account all350		 * the RcvArray entries that previous context would have351		 * taken and we have to account for any extra groups assigned352		 * to the static (kernel) or dynamic (vnic/user) contexts.353		 */354		if (ctxt < dd->first_dyn_alloc_ctxt) {355			if (ctxt < kctxt_ngroups) {356				base = ctxt * (dd->rcv_entries.ngroups + 1);357				rcd->rcv_array_groups++;358			} else {359				base = kctxt_ngroups +360					(ctxt * dd->rcv_entries.ngroups);361			}362		} else {363			u16 ct = ctxt - dd->first_dyn_alloc_ctxt;364 365			base = ((dd->n_krcv_queues * dd->rcv_entries.ngroups) +366				kctxt_ngroups);367			if (ct < dd->rcv_entries.nctxt_extra) {368				base += ct * (dd->rcv_entries.ngroups + 1);369				rcd->rcv_array_groups++;370			} else {371				base += dd->rcv_entries.nctxt_extra +372					(ct * dd->rcv_entries.ngroups);373			}374		}375		rcd->eager_base = base * dd->rcv_entries.group_size;376 377		rcd->rcvhdrq_cnt = rcvhdrcnt;378		rcd->rcvhdrqentsize = hfi1_hdrq_entsize;379		rcd->rhf_offset =380			rcd->rcvhdrqentsize - sizeof(u64) / sizeof(u32);381		/*382		 * Simple Eager buffer allocation: we have already pre-allocated383		 * the number of RcvArray entry groups. Each ctxtdata structure384		 * holds the number of groups for that context.385		 *386		 * To follow CSR requirements and maintain cacheline alignment,387		 * make sure all sizes and bases are multiples of group_size.388		 *389		 * The expected entry count is what is left after assigning390		 * eager.391		 */392		max_entries = rcd->rcv_array_groups *393			dd->rcv_entries.group_size;394		rcvtids = ((max_entries * hfi1_rcvarr_split) / 100);395		rcd->egrbufs.count = round_down(rcvtids,396						dd->rcv_entries.group_size);397		if (rcd->egrbufs.count > MAX_EAGER_ENTRIES) {398			dd_dev_err(dd, "ctxt%u: requested too many RcvArray entries.\n",399				   rcd->ctxt);400			rcd->egrbufs.count = MAX_EAGER_ENTRIES;401		}402		hfi1_cdbg(PROC,403			  "ctxt%u: max Eager buffer RcvArray entries: %u",404			  rcd->ctxt, rcd->egrbufs.count);405 406		/*407		 * Allocate array that will hold the eager buffer accounting408		 * data.409		 * This will allocate the maximum possible buffer count based410		 * on the value of the RcvArray split parameter.411		 * The resulting value will be rounded down to the closest412		 * multiple of dd->rcv_entries.group_size.413		 */414		rcd->egrbufs.buffers =415			kcalloc_node(rcd->egrbufs.count,416				     sizeof(*rcd->egrbufs.buffers),417				     GFP_KERNEL, numa);418		if (!rcd->egrbufs.buffers)419			goto bail;420		rcd->egrbufs.rcvtids =421			kcalloc_node(rcd->egrbufs.count,422				     sizeof(*rcd->egrbufs.rcvtids),423				     GFP_KERNEL, numa);424		if (!rcd->egrbufs.rcvtids)425			goto bail;426		rcd->egrbufs.size = eager_buffer_size;427		/*428		 * The size of the buffers programmed into the RcvArray429		 * entries needs to be big enough to handle the highest430		 * MTU supported.431		 */432		if (rcd->egrbufs.size < hfi1_max_mtu) {433			rcd->egrbufs.size = __roundup_pow_of_two(hfi1_max_mtu);434			hfi1_cdbg(PROC,435				  "ctxt%u: eager bufs size too small. Adjusting to %u",436				    rcd->ctxt, rcd->egrbufs.size);437		}438		rcd->egrbufs.rcvtid_size = HFI1_MAX_EAGER_BUFFER_SIZE;439 440		/* Applicable only for statically created kernel contexts */441		if (ctxt < dd->first_dyn_alloc_ctxt) {442			rcd->opstats = kzalloc_node(sizeof(*rcd->opstats),443						    GFP_KERNEL, numa);444			if (!rcd->opstats)445				goto bail;446 447			/* Initialize TID flow generations for the context */448			hfi1_kern_init_ctxt_generations(rcd);449		}450 451		*context = rcd;452		return 0;453	}454 455bail:456	*context = NULL;457	hfi1_free_ctxt(rcd);458	return -ENOMEM;459}460 461/**462 * hfi1_free_ctxt - free context463 * @rcd: pointer to an initialized rcd data structure464 *465 * This wrapper is the free function that matches hfi1_create_ctxtdata().466 * When a context is done being used (kernel or user), this function is called467 * for the "final" put to match the kref init from hfi1_create_ctxtdata().468 * Other users of the context do a get/put sequence to make sure that the469 * structure isn't removed while in use.470 */471void hfi1_free_ctxt(struct hfi1_ctxtdata *rcd)472{473	hfi1_rcd_put(rcd);474}475 476/*477 * Select the largest ccti value over all SLs to determine the intra-478 * packet gap for the link.479 *480 * called with cca_timer_lock held (to protect access to cca_timer481 * array), and rcu_read_lock() (to protect access to cc_state).482 */483void set_link_ipg(struct hfi1_pportdata *ppd)484{485	struct hfi1_devdata *dd = ppd->dd;486	struct cc_state *cc_state;487	int i;488	u16 cce, ccti_limit, max_ccti = 0;489	u16 shift, mult;490	u64 src;491	u32 current_egress_rate; /* Mbits /sec */492	u64 max_pkt_time;493	/*494	 * max_pkt_time is the maximum packet egress time in units495	 * of the fabric clock period 1/(805 MHz).496	 */497 498	cc_state = get_cc_state(ppd);499 500	if (!cc_state)501		/*502		 * This should _never_ happen - rcu_read_lock() is held,503		 * and set_link_ipg() should not be called if cc_state504		 * is NULL.505		 */506		return;507 508	for (i = 0; i < OPA_MAX_SLS; i++) {509		u16 ccti = ppd->cca_timer[i].ccti;510 511		if (ccti > max_ccti)512			max_ccti = ccti;513	}514 515	ccti_limit = cc_state->cct.ccti_limit;516	if (max_ccti > ccti_limit)517		max_ccti = ccti_limit;518 519	cce = cc_state->cct.entries[max_ccti].entry;520	shift = (cce & 0xc000) >> 14;521	mult = (cce & 0x3fff);522 523	current_egress_rate = active_egress_rate(ppd);524 525	max_pkt_time = egress_cycles(ppd->ibmaxlen, current_egress_rate);526 527	src = (max_pkt_time >> shift) * mult;528 529	src &= SEND_STATIC_RATE_CONTROL_CSR_SRC_RELOAD_SMASK;530	src <<= SEND_STATIC_RATE_CONTROL_CSR_SRC_RELOAD_SHIFT;531 532	write_csr(dd, SEND_STATIC_RATE_CONTROL, src);533}534 535static enum hrtimer_restart cca_timer_fn(struct hrtimer *t)536{537	struct cca_timer *cca_timer;538	struct hfi1_pportdata *ppd;539	int sl;540	u16 ccti_timer, ccti_min;541	struct cc_state *cc_state;542	unsigned long flags;543	enum hrtimer_restart ret = HRTIMER_NORESTART;544 545	cca_timer = container_of(t, struct cca_timer, hrtimer);546	ppd = cca_timer->ppd;547	sl = cca_timer->sl;548 549	rcu_read_lock();550 551	cc_state = get_cc_state(ppd);552 553	if (!cc_state) {554		rcu_read_unlock();555		return HRTIMER_NORESTART;556	}557 558	/*559	 * 1) decrement ccti for SL560	 * 2) calculate IPG for link (set_link_ipg())561	 * 3) restart timer, unless ccti is at min value562	 */563 564	ccti_min = cc_state->cong_setting.entries[sl].ccti_min;565	ccti_timer = cc_state->cong_setting.entries[sl].ccti_timer;566 567	spin_lock_irqsave(&ppd->cca_timer_lock, flags);568 569	if (cca_timer->ccti > ccti_min) {570		cca_timer->ccti--;571		set_link_ipg(ppd);572	}573 574	if (cca_timer->ccti > ccti_min) {575		unsigned long nsec = 1024 * ccti_timer;576		/* ccti_timer is in units of 1.024 usec */577		hrtimer_forward_now(t, ns_to_ktime(nsec));578		ret = HRTIMER_RESTART;579	}580 581	spin_unlock_irqrestore(&ppd->cca_timer_lock, flags);582	rcu_read_unlock();583	return ret;584}585 586/*587 * Common code for initializing the physical port structure.588 */589void hfi1_init_pportdata(struct pci_dev *pdev, struct hfi1_pportdata *ppd,590			 struct hfi1_devdata *dd, u8 hw_pidx, u32 port)591{592	int i;593	uint default_pkey_idx;594	struct cc_state *cc_state;595 596	ppd->dd = dd;597	ppd->hw_pidx = hw_pidx;598	ppd->port = port; /* IB port number, not index */599	ppd->prev_link_width = LINK_WIDTH_DEFAULT;600	/*601	 * There are C_VL_COUNT number of PortVLXmitWait counters.602	 * Adding 1 to C_VL_COUNT to include the PortXmitWait counter.603	 */604	for (i = 0; i < C_VL_COUNT + 1; i++) {605		ppd->port_vl_xmit_wait_last[i] = 0;606		ppd->vl_xmit_flit_cnt[i] = 0;607	}608 609	default_pkey_idx = 1;610 611	ppd->pkeys[default_pkey_idx] = DEFAULT_P_KEY;612	ppd->part_enforce |= HFI1_PART_ENFORCE_IN;613	ppd->pkeys[0] = 0x8001;614 615	INIT_WORK(&ppd->link_vc_work, handle_verify_cap);616	INIT_WORK(&ppd->link_up_work, handle_link_up);617	INIT_WORK(&ppd->link_down_work, handle_link_down);618	INIT_WORK(&ppd->freeze_work, handle_freeze);619	INIT_WORK(&ppd->link_downgrade_work, handle_link_downgrade);620	INIT_WORK(&ppd->sma_message_work, handle_sma_message);621	INIT_WORK(&ppd->link_bounce_work, handle_link_bounce);622	INIT_DELAYED_WORK(&ppd->start_link_work, handle_start_link);623	INIT_WORK(&ppd->linkstate_active_work, receive_interrupt_work);624	INIT_WORK(&ppd->qsfp_info.qsfp_work, qsfp_event);625 626	mutex_init(&ppd->hls_lock);627	spin_lock_init(&ppd->qsfp_info.qsfp_lock);628 629	ppd->qsfp_info.ppd = ppd;630	ppd->sm_trap_qp = 0x0;631	ppd->sa_qp = 0x1;632 633	ppd->hfi1_wq = NULL;634 635	spin_lock_init(&ppd->cca_timer_lock);636 637	for (i = 0; i < OPA_MAX_SLS; i++) {638		hrtimer_init(&ppd->cca_timer[i].hrtimer, CLOCK_MONOTONIC,639			     HRTIMER_MODE_REL);640		ppd->cca_timer[i].ppd = ppd;641		ppd->cca_timer[i].sl = i;642		ppd->cca_timer[i].ccti = 0;643		ppd->cca_timer[i].hrtimer.function = cca_timer_fn;644	}645 646	ppd->cc_max_table_entries = IB_CC_TABLE_CAP_DEFAULT;647 648	spin_lock_init(&ppd->cc_state_lock);649	spin_lock_init(&ppd->cc_log_lock);650	cc_state = kzalloc(sizeof(*cc_state), GFP_KERNEL);651	RCU_INIT_POINTER(ppd->cc_state, cc_state);652	if (!cc_state)653		goto bail;654	return;655 656bail:657	dd_dev_err(dd, "Congestion Control Agent disabled for port %d\n", port);658}659 660/*661 * Do initialization for device that is only needed on662 * first detect, not on resets.663 */664static int loadtime_init(struct hfi1_devdata *dd)665{666	return 0;667}668 669/**670 * init_after_reset - re-initialize after a reset671 * @dd: the hfi1_ib device672 *673 * sanity check at least some of the values after reset, and674 * ensure no receive or transmit (explicitly, in case reset675 * failed676 */677static int init_after_reset(struct hfi1_devdata *dd)678{679	int i;680	struct hfi1_ctxtdata *rcd;681	/*682	 * Ensure chip does no sends or receives, tail updates, or683	 * pioavail updates while we re-initialize.  This is mostly684	 * for the driver data structures, not chip registers.685	 */686	for (i = 0; i < dd->num_rcv_contexts; i++) {687		rcd = hfi1_rcd_get_by_index(dd, i);688		hfi1_rcvctrl(dd, HFI1_RCVCTRL_CTXT_DIS |689			     HFI1_RCVCTRL_INTRAVAIL_DIS |690			     HFI1_RCVCTRL_TAILUPD_DIS, rcd);691		hfi1_rcd_put(rcd);692	}693	pio_send_control(dd, PSC_GLOBAL_DISABLE);694	for (i = 0; i < dd->num_send_contexts; i++)695		sc_disable(dd->send_contexts[i].sc);696 697	return 0;698}699 700static void enable_chip(struct hfi1_devdata *dd)701{702	struct hfi1_ctxtdata *rcd;703	u32 rcvmask;704	u16 i;705 706	/* enable PIO send */707	pio_send_control(dd, PSC_GLOBAL_ENABLE);708 709	/*710	 * Enable kernel ctxts' receive and receive interrupt.711	 * Other ctxts done as user opens and initializes them.712	 */713	for (i = 0; i < dd->first_dyn_alloc_ctxt; ++i) {714		rcd = hfi1_rcd_get_by_index(dd, i);715		if (!rcd)716			continue;717		rcvmask = HFI1_RCVCTRL_CTXT_ENB | HFI1_RCVCTRL_INTRAVAIL_ENB;718		rcvmask |= HFI1_CAP_KGET_MASK(rcd->flags, DMA_RTAIL) ?719			HFI1_RCVCTRL_TAILUPD_ENB : HFI1_RCVCTRL_TAILUPD_DIS;720		if (!HFI1_CAP_KGET_MASK(rcd->flags, MULTI_PKT_EGR))721			rcvmask |= HFI1_RCVCTRL_ONE_PKT_EGR_ENB;722		if (HFI1_CAP_KGET_MASK(rcd->flags, NODROP_RHQ_FULL))723			rcvmask |= HFI1_RCVCTRL_NO_RHQ_DROP_ENB;724		if (HFI1_CAP_KGET_MASK(rcd->flags, NODROP_EGR_FULL))725			rcvmask |= HFI1_RCVCTRL_NO_EGR_DROP_ENB;726		if (HFI1_CAP_IS_KSET(TID_RDMA))727			rcvmask |= HFI1_RCVCTRL_TIDFLOW_ENB;728		hfi1_rcvctrl(dd, rcvmask, rcd);729		sc_enable(rcd->sc);730		hfi1_rcd_put(rcd);731	}732}733 734/**735 * create_workqueues - create per port workqueues736 * @dd: the hfi1_ib device737 */738static int create_workqueues(struct hfi1_devdata *dd)739{740	int pidx;741	struct hfi1_pportdata *ppd;742 743	for (pidx = 0; pidx < dd->num_pports; ++pidx) {744		ppd = dd->pport + pidx;745		if (!ppd->hfi1_wq) {746			ppd->hfi1_wq =747				alloc_workqueue(748				    "hfi%d_%d",749				    WQ_SYSFS | WQ_HIGHPRI | WQ_CPU_INTENSIVE |750				    WQ_MEM_RECLAIM,751				    HFI1_MAX_ACTIVE_WORKQUEUE_ENTRIES,752				    dd->unit, pidx);753			if (!ppd->hfi1_wq)754				goto wq_error;755		}756		if (!ppd->link_wq) {757			/*758			 * Make the link workqueue single-threaded to enforce759			 * serialization.760			 */761			ppd->link_wq =762				alloc_workqueue(763				    "hfi_link_%d_%d",764				    WQ_SYSFS | WQ_MEM_RECLAIM | WQ_UNBOUND,765				    1, /* max_active */766				    dd->unit, pidx);767			if (!ppd->link_wq)768				goto wq_error;769		}770	}771	return 0;772wq_error:773	pr_err("alloc_workqueue failed for port %d\n", pidx + 1);774	for (pidx = 0; pidx < dd->num_pports; ++pidx) {775		ppd = dd->pport + pidx;776		if (ppd->hfi1_wq) {777			destroy_workqueue(ppd->hfi1_wq);778			ppd->hfi1_wq = NULL;779		}780		if (ppd->link_wq) {781			destroy_workqueue(ppd->link_wq);782			ppd->link_wq = NULL;783		}784	}785	return -ENOMEM;786}787 788/**789 * destroy_workqueues - destroy per port workqueues790 * @dd: the hfi1_ib device791 */792static void destroy_workqueues(struct hfi1_devdata *dd)793{794	int pidx;795	struct hfi1_pportdata *ppd;796 797	for (pidx = 0; pidx < dd->num_pports; ++pidx) {798		ppd = dd->pport + pidx;799 800		if (ppd->hfi1_wq) {801			destroy_workqueue(ppd->hfi1_wq);802			ppd->hfi1_wq = NULL;803		}804		if (ppd->link_wq) {805			destroy_workqueue(ppd->link_wq);806			ppd->link_wq = NULL;807		}808	}809}810 811/**812 * enable_general_intr() - Enable the IRQs that will be handled by the813 * general interrupt handler.814 * @dd: valid devdata815 *816 */817static void enable_general_intr(struct hfi1_devdata *dd)818{819	set_intr_bits(dd, CCE_ERR_INT, MISC_ERR_INT, true);820	set_intr_bits(dd, PIO_ERR_INT, TXE_ERR_INT, true);821	set_intr_bits(dd, IS_SENDCTXT_ERR_START, IS_SENDCTXT_ERR_END, true);822	set_intr_bits(dd, PBC_INT, GPIO_ASSERT_INT, true);823	set_intr_bits(dd, TCRIT_INT, TCRIT_INT, true);824	set_intr_bits(dd, IS_DC_START, IS_DC_END, true);825	set_intr_bits(dd, IS_SENDCREDIT_START, IS_SENDCREDIT_END, true);826}827 828/**829 * hfi1_init - do the actual initialization sequence on the chip830 * @dd: the hfi1_ib device831 * @reinit: re-initializing, so don't allocate new memory832 *833 * Do the actual initialization sequence on the chip.  This is done834 * both from the init routine called from the PCI infrastructure, and835 * when we reset the chip, or detect that it was reset internally,836 * or it's administratively re-enabled.837 *838 * Memory allocation here and in called routines is only done in839 * the first case (reinit == 0).  We have to be careful, because even840 * without memory allocation, we need to re-write all the chip registers841 * TIDs, etc. after the reset or enable has completed.842 */843int hfi1_init(struct hfi1_devdata *dd, int reinit)844{845	int ret = 0, pidx, lastfail = 0;846	unsigned long len;847	u16 i;848	struct hfi1_ctxtdata *rcd;849	struct hfi1_pportdata *ppd;850 851	/* Set up send low level handlers */852	dd->process_pio_send = hfi1_verbs_send_pio;853	dd->process_dma_send = hfi1_verbs_send_dma;854	dd->pio_inline_send = pio_copy;855	dd->process_vnic_dma_send = hfi1_vnic_send_dma;856 857	if (is_ax(dd)) {858		atomic_set(&dd->drop_packet, DROP_PACKET_ON);859		dd->do_drop = true;860	} else {861		atomic_set(&dd->drop_packet, DROP_PACKET_OFF);862		dd->do_drop = false;863	}864 865	/* make sure the link is not "up" */866	for (pidx = 0; pidx < dd->num_pports; ++pidx) {867		ppd = dd->pport + pidx;868		ppd->linkup = 0;869	}870 871	if (reinit)872		ret = init_after_reset(dd);873	else874		ret = loadtime_init(dd);875	if (ret)876		goto done;877 878	/* dd->rcd can be NULL if early initialization failed */879	for (i = 0; dd->rcd && i < dd->first_dyn_alloc_ctxt; ++i) {880		/*881		 * Set up the (kernel) rcvhdr queue and egr TIDs.  If doing882		 * re-init, the simplest way to handle this is to free883		 * existing, and re-allocate.884		 * Need to re-create rest of ctxt 0 ctxtdata as well.885		 */886		rcd = hfi1_rcd_get_by_index(dd, i);887		if (!rcd)888			continue;889 890		lastfail = hfi1_create_rcvhdrq(dd, rcd);891		if (!lastfail)892			lastfail = hfi1_setup_eagerbufs(rcd);893		if (!lastfail)894			lastfail = hfi1_kern_exp_rcv_init(rcd, reinit);895		if (lastfail) {896			dd_dev_err(dd,897				   "failed to allocate kernel ctxt's rcvhdrq and/or egr bufs\n");898			ret = lastfail;899		}900		/* enable IRQ */901		hfi1_rcd_put(rcd);902	}903 904	/* Allocate enough memory for user event notification. */905	len = PAGE_ALIGN(chip_rcv_contexts(dd) * HFI1_MAX_SHARED_CTXTS *906			 sizeof(*dd->events));907	dd->events = vmalloc_user(len);908	if (!dd->events)909		dd_dev_err(dd, "Failed to allocate user events page\n");910	/*911	 * Allocate a page for device and port status.912	 * Page will be shared amongst all user processes.913	 */914	dd->status = vmalloc_user(PAGE_SIZE);915	if (!dd->status)916		dd_dev_err(dd, "Failed to allocate dev status page\n");917	for (pidx = 0; pidx < dd->num_pports; ++pidx) {918		ppd = dd->pport + pidx;919		if (dd->status)920			/* Currently, we only have one port */921			ppd->statusp = &dd->status->port;922 923		set_mtu(ppd);924	}925 926	/* enable chip even if we have an error, so we can debug cause */927	enable_chip(dd);928 929done:930	/*931	 * Set status even if port serdes is not initialized932	 * so that diags will work.933	 */934	if (dd->status)935		dd->status->dev |= HFI1_STATUS_CHIP_PRESENT |936			HFI1_STATUS_INITTED;937	if (!ret) {938		/* enable all interrupts from the chip */939		enable_general_intr(dd);940		init_qsfp_int(dd);941 942		/* chip is OK for user apps; mark it as initialized */943		for (pidx = 0; pidx < dd->num_pports; ++pidx) {944			ppd = dd->pport + pidx;945 946			/*947			 * start the serdes - must be after interrupts are948			 * enabled so we are notified when the link goes up949			 */950			lastfail = bringup_serdes(ppd);951			if (lastfail)952				dd_dev_info(dd,953					    "Failed to bring up port %u\n",954					    ppd->port);955 956			/*957			 * Set status even if port serdes is not initialized958			 * so that diags will work.959			 */960			if (ppd->statusp)961				*ppd->statusp |= HFI1_STATUS_CHIP_PRESENT |962							HFI1_STATUS_INITTED;963			if (!ppd->link_speed_enabled)964				continue;965		}966	}967 968	/* if ret is non-zero, we probably should do some cleanup here... */969	return ret;970}971 972struct hfi1_devdata *hfi1_lookup(int unit)973{974	return xa_load(&hfi1_dev_table, unit);975}976 977/*978 * Stop the timers during unit shutdown, or after an error late979 * in initialization.980 */981static void stop_timers(struct hfi1_devdata *dd)982{983	struct hfi1_pportdata *ppd;984	int pidx;985 986	for (pidx = 0; pidx < dd->num_pports; ++pidx) {987		ppd = dd->pport + pidx;988		if (ppd->led_override_timer.function) {989			del_timer_sync(&ppd->led_override_timer);990			atomic_set(&ppd->led_override_timer_active, 0);991		}992	}993}994 995/**996 * shutdown_device - shut down a device997 * @dd: the hfi1_ib device998 *999 * This is called to make the device quiet when we are about to1000 * unload the driver, and also when the device is administratively1001 * disabled.   It does not free any data structures.1002 * Everything it does has to be setup again by hfi1_init(dd, 1)1003 */1004static void shutdown_device(struct hfi1_devdata *dd)1005{1006	struct hfi1_pportdata *ppd;1007	struct hfi1_ctxtdata *rcd;1008	unsigned pidx;1009	int i;1010 1011	if (dd->flags & HFI1_SHUTDOWN)1012		return;1013	dd->flags |= HFI1_SHUTDOWN;1014 1015	for (pidx = 0; pidx < dd->num_pports; ++pidx) {1016		ppd = dd->pport + pidx;1017 1018		ppd->linkup = 0;1019		if (ppd->statusp)1020			*ppd->statusp &= ~(HFI1_STATUS_IB_CONF |1021					   HFI1_STATUS_IB_READY);1022	}1023	dd->flags &= ~HFI1_INITTED;1024 1025	/* mask and clean up interrupts */1026	set_intr_bits(dd, IS_FIRST_SOURCE, IS_LAST_SOURCE, false);1027	msix_clean_up_interrupts(dd);1028 1029	for (pidx = 0; pidx < dd->num_pports; ++pidx) {1030		for (i = 0; i < dd->num_rcv_contexts; i++) {1031			rcd = hfi1_rcd_get_by_index(dd, i);1032			hfi1_rcvctrl(dd, HFI1_RCVCTRL_TAILUPD_DIS |1033				     HFI1_RCVCTRL_CTXT_DIS |1034				     HFI1_RCVCTRL_INTRAVAIL_DIS |1035				     HFI1_RCVCTRL_PKEY_DIS |1036				     HFI1_RCVCTRL_ONE_PKT_EGR_DIS, rcd);1037			hfi1_rcd_put(rcd);1038		}1039		/*1040		 * Gracefully stop all sends allowing any in progress to1041		 * trickle out first.1042		 */1043		for (i = 0; i < dd->num_send_contexts; i++)1044			sc_flush(dd->send_contexts[i].sc);1045	}1046 1047	/*1048	 * Enough for anything that's going to trickle out to have actually1049	 * done so.1050	 */1051	udelay(20);1052 1053	for (pidx = 0; pidx < dd->num_pports; ++pidx) {1054		ppd = dd->pport + pidx;1055 1056		/* disable all contexts */1057		for (i = 0; i < dd->num_send_contexts; i++)1058			sc_disable(dd->send_contexts[i].sc);1059		/* disable the send device */1060		pio_send_control(dd, PSC_GLOBAL_DISABLE);1061 1062		shutdown_led_override(ppd);1063 1064		/*1065		 * Clear SerdesEnable.1066		 * We can't count on interrupts since we are stopping.1067		 */1068		hfi1_quiet_serdes(ppd);1069		if (ppd->hfi1_wq)1070			flush_workqueue(ppd->hfi1_wq);1071		if (ppd->link_wq)1072			flush_workqueue(ppd->link_wq);1073	}1074	sdma_exit(dd);1075}1076 1077/**1078 * hfi1_free_ctxtdata - free a context's allocated data1079 * @dd: the hfi1_ib device1080 * @rcd: the ctxtdata structure1081 *1082 * free up any allocated data for a context1083 * It should never change any chip state, or global driver state.1084 */1085void hfi1_free_ctxtdata(struct hfi1_devdata *dd, struct hfi1_ctxtdata *rcd)1086{1087	u32 e;1088 1089	if (!rcd)1090		return;1091 1092	if (rcd->rcvhdrq) {1093		dma_free_coherent(&dd->pcidev->dev, rcvhdrq_size(rcd),1094				  rcd->rcvhdrq, rcd->rcvhdrq_dma);1095		rcd->rcvhdrq = NULL;1096		if (hfi1_rcvhdrtail_kvaddr(rcd)) {1097			dma_free_coherent(&dd->pcidev->dev, PAGE_SIZE,1098					  (void *)hfi1_rcvhdrtail_kvaddr(rcd),1099					  rcd->rcvhdrqtailaddr_dma);1100			rcd->rcvhdrtail_kvaddr = NULL;1101		}1102	}1103 1104	/* all the RcvArray entries should have been cleared by now */1105	kfree(rcd->egrbufs.rcvtids);1106	rcd->egrbufs.rcvtids = NULL;1107 1108	for (e = 0; e < rcd->egrbufs.alloced; e++) {1109		if (rcd->egrbufs.buffers[e].addr)1110			dma_free_coherent(&dd->pcidev->dev,1111					  rcd->egrbufs.buffers[e].len,1112					  rcd->egrbufs.buffers[e].addr,1113					  rcd->egrbufs.buffers[e].dma);1114	}1115	kfree(rcd->egrbufs.buffers);1116	rcd->egrbufs.alloced = 0;1117	rcd->egrbufs.buffers = NULL;1118 1119	sc_free(rcd->sc);1120	rcd->sc = NULL;1121 1122	vfree(rcd->subctxt_uregbase);1123	vfree(rcd->subctxt_rcvegrbuf);1124	vfree(rcd->subctxt_rcvhdr_base);1125	kfree(rcd->opstats);1126 1127	rcd->subctxt_uregbase = NULL;1128	rcd->subctxt_rcvegrbuf = NULL;1129	rcd->subctxt_rcvhdr_base = NULL;1130	rcd->opstats = NULL;1131}1132 1133/*1134 * Release our hold on the shared asic data.  If we are the last one,1135 * return the structure to be finalized outside the lock.  Must be1136 * holding hfi1_dev_table lock.1137 */1138static struct hfi1_asic_data *release_asic_data(struct hfi1_devdata *dd)1139{1140	struct hfi1_asic_data *ad;1141	int other;1142 1143	if (!dd->asic_data)1144		return NULL;1145	dd->asic_data->dds[dd->hfi1_id] = NULL;1146	other = dd->hfi1_id ? 0 : 1;1147	ad = dd->asic_data;1148	dd->asic_data = NULL;1149	/* return NULL if the other dd still has a link */1150	return ad->dds[other] ? NULL : ad;1151}1152 1153static void finalize_asic_data(struct hfi1_devdata *dd,1154			       struct hfi1_asic_data *ad)1155{1156	clean_up_i2c(dd, ad);1157	kfree(ad);1158}1159 1160/**1161 * hfi1_free_devdata - cleans up and frees per-unit data structure1162 * @dd: pointer to a valid devdata structure1163 *1164 * It cleans up and frees all data structures set up by1165 * by hfi1_alloc_devdata().1166 */1167void hfi1_free_devdata(struct hfi1_devdata *dd)1168{1169	struct hfi1_asic_data *ad;1170	unsigned long flags;1171 1172	xa_lock_irqsave(&hfi1_dev_table, flags);1173	__xa_erase(&hfi1_dev_table, dd->unit);1174	ad = release_asic_data(dd);1175	xa_unlock_irqrestore(&hfi1_dev_table, flags);1176 1177	finalize_asic_data(dd, ad);1178	free_platform_config(dd);1179	rcu_barrier(); /* wait for rcu callbacks to complete */1180	free_percpu(dd->int_counter);1181	free_percpu(dd->rcv_limit);1182	free_percpu(dd->send_schedule);1183	free_percpu(dd->tx_opstats);1184	dd->int_counter   = NULL;1185	dd->rcv_limit     = NULL;1186	dd->send_schedule = NULL;1187	dd->tx_opstats    = NULL;1188	kfree(dd->comp_vect);1189	dd->comp_vect = NULL;1190	if (dd->rcvhdrtail_dummy_kvaddr)1191		dma_free_coherent(&dd->pcidev->dev, sizeof(u64),1192				  (void *)dd->rcvhdrtail_dummy_kvaddr,1193				  dd->rcvhdrtail_dummy_dma);1194	dd->rcvhdrtail_dummy_kvaddr = NULL;1195	sdma_clean(dd, dd->num_sdma);1196	rvt_dealloc_device(&dd->verbs_dev.rdi);1197}1198 1199/**1200 * hfi1_alloc_devdata - Allocate our primary per-unit data structure.1201 * @pdev: Valid PCI device1202 * @extra: How many bytes to alloc past the default1203 *1204 * Must be done via verbs allocator, because the verbs cleanup process1205 * both does cleanup and free of the data structure.1206 * "extra" is for chip-specific data.1207 */1208static struct hfi1_devdata *hfi1_alloc_devdata(struct pci_dev *pdev,1209					       size_t extra)1210{1211	struct hfi1_devdata *dd;1212	int ret, nports;1213 1214	/* extra is * number of ports */1215	nports = extra / sizeof(struct hfi1_pportdata);1216 1217	dd = (struct hfi1_devdata *)rvt_alloc_device(sizeof(*dd) + extra,1218						     nports);1219	if (!dd)1220		return ERR_PTR(-ENOMEM);1221	dd->num_pports = nports;1222	dd->pport = (struct hfi1_pportdata *)(dd + 1);1223	dd->pcidev = pdev;1224	pci_set_drvdata(pdev, dd);1225 1226	ret = xa_alloc_irq(&hfi1_dev_table, &dd->unit, dd, xa_limit_32b,1227			GFP_KERNEL);1228	if (ret < 0) {1229		dev_err(&pdev->dev,1230			"Could not allocate unit ID: error %d\n", -ret);1231		goto bail;1232	}1233	rvt_set_ibdev_name(&dd->verbs_dev.rdi, "%s_%d", class_name(), dd->unit);1234	/*1235	 * If the BIOS does not have the NUMA node information set, select1236	 * NUMA 0 so we get consistent performance.1237	 */1238	dd->node = pcibus_to_node(pdev->bus);1239	if (dd->node == NUMA_NO_NODE) {1240		dd_dev_err(dd, "Invalid PCI NUMA node. Performance may be affected\n");1241		dd->node = 0;1242	}1243 1244	/*1245	 * Initialize all locks for the device. This needs to be as early as1246	 * possible so locks are usable.1247	 */1248	spin_lock_init(&dd->sc_lock);1249	spin_lock_init(&dd->sendctrl_lock);1250	spin_lock_init(&dd->rcvctrl_lock);1251	spin_lock_init(&dd->uctxt_lock);1252	spin_lock_init(&dd->hfi1_diag_trans_lock);1253	spin_lock_init(&dd->sc_init_lock);1254	spin_lock_init(&dd->dc8051_memlock);1255	seqlock_init(&dd->sc2vl_lock);1256	spin_lock_init(&dd->sde_map_lock);1257	spin_lock_init(&dd->pio_map_lock);1258	mutex_init(&dd->dc8051_lock);1259	init_waitqueue_head(&dd->event_queue);1260	spin_lock_init(&dd->irq_src_lock);1261 1262	dd->int_counter = alloc_percpu(u64);1263	if (!dd->int_counter) {1264		ret = -ENOMEM;1265		goto bail;1266	}1267 1268	dd->rcv_limit = alloc_percpu(u64);1269	if (!dd->rcv_limit) {1270		ret = -ENOMEM;1271		goto bail;1272	}1273 1274	dd->send_schedule = alloc_percpu(u64);1275	if (!dd->send_schedule) {1276		ret = -ENOMEM;1277		goto bail;1278	}1279 1280	dd->tx_opstats = alloc_percpu(struct hfi1_opcode_stats_perctx);1281	if (!dd->tx_opstats) {1282		ret = -ENOMEM;1283		goto bail;1284	}1285 1286	dd->comp_vect = kzalloc(sizeof(*dd->comp_vect), GFP_KERNEL);1287	if (!dd->comp_vect) {1288		ret = -ENOMEM;1289		goto bail;1290	}1291 1292	/* allocate dummy tail memory for all receive contexts */1293	dd->rcvhdrtail_dummy_kvaddr =1294		dma_alloc_coherent(&dd->pcidev->dev, sizeof(u64),1295				   &dd->rcvhdrtail_dummy_dma, GFP_KERNEL);1296	if (!dd->rcvhdrtail_dummy_kvaddr) {1297		ret = -ENOMEM;1298		goto bail;1299	}1300 1301	atomic_set(&dd->ipoib_rsm_usr_num, 0);1302	return dd;1303 1304bail:1305	hfi1_free_devdata(dd);1306	return ERR_PTR(ret);1307}1308 1309/*1310 * Called from freeze mode handlers, and from PCI error1311 * reporting code.  Should be paranoid about state of1312 * system and data structures.1313 */1314void hfi1_disable_after_error(struct hfi1_devdata *dd)1315{1316	if (dd->flags & HFI1_INITTED) {1317		u32 pidx;1318 1319		dd->flags &= ~HFI1_INITTED;1320		if (dd->pport)1321			for (pidx = 0; pidx < dd->num_pports; ++pidx) {1322				struct hfi1_pportdata *ppd;1323 1324				ppd = dd->pport + pidx;1325				if (dd->flags & HFI1_PRESENT)1326					set_link_state(ppd, HLS_DN_DISABLE);1327 1328				if (ppd->statusp)1329					*ppd->statusp &= ~HFI1_STATUS_IB_READY;1330			}1331	}1332 1333	/*1334	 * Mark as having had an error for driver, and also1335	 * for /sys and status word mapped to user programs.1336	 * This marks unit as not usable, until reset.1337	 */1338	if (dd->status)1339		dd->status->dev |= HFI1_STATUS_HWERROR;1340}1341 1342static void remove_one(struct pci_dev *);1343static int init_one(struct pci_dev *, const struct pci_device_id *);1344static void shutdown_one(struct pci_dev *);1345 1346#define DRIVER_LOAD_MSG "Cornelis " DRIVER_NAME " loaded: "1347#define PFX DRIVER_NAME ": "1348 1349const struct pci_device_id hfi1_pci_tbl[] = {1350	{ PCI_DEVICE(PCI_VENDOR_ID_INTEL, PCI_DEVICE_ID_INTEL0) },1351	{ PCI_DEVICE(PCI_VENDOR_ID_INTEL, PCI_DEVICE_ID_INTEL1) },1352	{ 0, }1353};1354 1355MODULE_DEVICE_TABLE(pci, hfi1_pci_tbl);1356 1357static struct pci_driver hfi1_pci_driver = {1358	.name = DRIVER_NAME,1359	.probe = init_one,1360	.remove = remove_one,1361	.shutdown = shutdown_one,1362	.id_table = hfi1_pci_tbl,1363	.err_handler = &hfi1_pci_err_handler,1364};1365 1366static void __init compute_krcvqs(void)1367{1368	int i;1369 1370	for (i = 0; i < krcvqsset; i++)1371		n_krcvqs += krcvqs[i];1372}1373 1374/*1375 * Do all the generic driver unit- and chip-independent memory1376 * allocation and initialization.1377 */1378static int __init hfi1_mod_init(void)1379{1380	int ret;1381 1382	ret = dev_init();1383	if (ret)1384		goto bail;1385 1386	ret = node_affinity_init();1387	if (ret)1388		goto bail;1389 1390	/* validate max MTU before any devices start */1391	if (!valid_opa_max_mtu(hfi1_max_mtu)) {1392		pr_err("Invalid max_mtu 0x%x, using 0x%x instead\n",1393		       hfi1_max_mtu, HFI1_DEFAULT_MAX_MTU);1394		hfi1_max_mtu = HFI1_DEFAULT_MAX_MTU;1395	}1396	/* valid CUs run from 1-128 in powers of 2 */1397	if (hfi1_cu > 128 || !is_power_of_2(hfi1_cu))1398		hfi1_cu = 1;1399	/* valid credit return threshold is 0-100, variable is unsigned */1400	if (user_credit_return_threshold > 100)1401		user_credit_return_threshold = 100;1402 1403	compute_krcvqs();1404	/*1405	 * sanitize receive interrupt count, time must wait until after1406	 * the hardware type is known1407	 */1408	if (rcv_intr_count > RCV_HDR_HEAD_COUNTER_MASK)1409		rcv_intr_count = RCV_HDR_HEAD_COUNTER_MASK;1410	/* reject invalid combinations */1411	if (rcv_intr_count == 0 && rcv_intr_timeout == 0) {1412		pr_err("Invalid mode: both receive interrupt count and available timeout are zero - setting interrupt count to 1\n");1413		rcv_intr_count = 1;1414	}1415	if (rcv_intr_count > 1 && rcv_intr_timeout == 0) {1416		/*1417		 * Avoid indefinite packet delivery by requiring a timeout1418		 * if count is > 1.1419		 */1420		pr_err("Invalid mode: receive interrupt count greater than 1 and available timeout is zero - setting available timeout to 1\n");1421		rcv_intr_timeout = 1;1422	}1423	if (rcv_intr_dynamic && !(rcv_intr_count > 1 && rcv_intr_timeout > 0)) {1424		/*1425		 * The dynamic algorithm expects a non-zero timeout1426		 * and a count > 1.1427		 */1428		pr_err("Invalid mode: dynamic receive interrupt mitigation with invalid count and timeout - turning dynamic off\n");1429		rcv_intr_dynamic = 0;1430	}1431 1432	/* sanitize link CRC options */1433	link_crc_mask &= SUPPORTED_CRCS;1434 1435	ret = opfn_init();1436	if (ret < 0) {1437		pr_err("Failed to allocate opfn_wq");1438		goto bail_dev;1439	}1440 1441	/*1442	 * These must be called before the driver is registered with1443	 * the PCI subsystem.1444	 */1445	hfi1_dbg_init();1446	ret = pci_register_driver(&hfi1_pci_driver);1447	if (ret < 0) {1448		pr_err("Unable to register driver: error %d\n", -ret);1449		goto bail_dev;1450	}1451	goto bail; /* all OK */1452 1453bail_dev:1454	hfi1_dbg_exit();1455	dev_cleanup();1456bail:1457	return ret;1458}1459 1460module_init(hfi1_mod_init);1461 1462/*1463 * Do the non-unit driver cleanup, memory free, etc. at unload.1464 */1465static void __exit hfi1_mod_cleanup(void)1466{1467	pci_unregister_driver(&hfi1_pci_driver);1468	opfn_exit();1469	node_affinity_destroy_all();1470	hfi1_dbg_exit();1471 1472	WARN_ON(!xa_empty(&hfi1_dev_table));1473	dispose_firmware();	/* asymmetric with obtain_firmware() */1474	dev_cleanup();1475}1476 1477module_exit(hfi1_mod_cleanup);1478 1479/* this can only be called after a successful initialization */1480static void cleanup_device_data(struct hfi1_devdata *dd)1481{1482	int ctxt;1483	int pidx;1484 1485	/* users can't do anything more with chip */1486	for (pidx = 0; pidx < dd->num_pports; ++pidx) {1487		struct hfi1_pportdata *ppd = &dd->pport[pidx];1488		struct cc_state *cc_state;1489		int i;1490 1491		if (ppd->statusp)1492			*ppd->statusp &= ~HFI1_STATUS_CHIP_PRESENT;1493 1494		for (i = 0; i < OPA_MAX_SLS; i++)1495			hrtimer_cancel(&ppd->cca_timer[i].hrtimer);1496 1497		spin_lock(&ppd->cc_state_lock);1498		cc_state = get_cc_state_protected(ppd);1499		RCU_INIT_POINTER(ppd->cc_state, NULL);1500		spin_unlock(&ppd->cc_state_lock);1501 1502		if (cc_state)1503			kfree_rcu(cc_state, rcu);1504	}1505 1506	free_credit_return(dd);1507 1508	/*1509	 * Free any resources still in use (usually just kernel contexts)1510	 * at unload; we do for ctxtcnt, because that's what we allocate.1511	 */1512	for (ctxt = 0; dd->rcd && ctxt < dd->num_rcv_contexts; ctxt++) {1513		struct hfi1_ctxtdata *rcd = dd->rcd[ctxt];1514 1515		if (rcd) {1516			hfi1_free_ctxt_rcv_groups(rcd);1517			hfi1_free_ctxt(rcd);1518		}1519	}1520 1521	kfree(dd->rcd);1522	dd->rcd = NULL;1523 1524	free_pio_map(dd);1525	/* must follow rcv context free - need to remove rcv's hooks */1526	for (ctxt = 0; ctxt < dd->num_send_contexts; ctxt++)1527		sc_free(dd->send_contexts[ctxt].sc);1528	dd->num_send_contexts = 0;1529	kfree(dd->send_contexts);1530	dd->send_contexts = NULL;1531	kfree(dd->hw_to_sw);1532	dd->hw_to_sw = NULL;1533	kfree(dd->boardname);1534	vfree(dd->events);1535	vfree(dd->status);1536}1537 1538/*1539 * Clean up on unit shutdown, or error during unit load after1540 * successful initialization.1541 */1542static void postinit_cleanup(struct hfi1_devdata *dd)1543{1544	hfi1_start_cleanup(dd);1545	hfi1_comp_vectors_clean_up(dd);1546	hfi1_dev_affinity_clean_up(dd);1547 1548	hfi1_pcie_ddcleanup(dd);1549	hfi1_pcie_cleanup(dd->pcidev);1550 1551	cleanup_device_data(dd);1552 1553	hfi1_free_devdata(dd);1554}1555 1556static int init_one(struct pci_dev *pdev, const struct pci_device_id *ent)1557{1558	int ret = 0, j, pidx, initfail;1559	struct hfi1_devdata *dd;1560	struct hfi1_pportdata *ppd;1561 1562	/* First, lock the non-writable module parameters */1563	HFI1_CAP_LOCK();1564 1565	/* Validate dev ids */1566	if (!(ent->device == PCI_DEVICE_ID_INTEL0 ||1567	      ent->device == PCI_DEVICE_ID_INTEL1)) {1568		dev_err(&pdev->dev, "Failing on unknown Intel deviceid 0x%x\n",1569			ent->device);1570		ret = -ENODEV;1571		goto bail;1572	}1573 1574	/* Allocate the dd so we can get to work */1575	dd = hfi1_alloc_devdata(pdev, NUM_IB_PORTS *1576				sizeof(struct hfi1_pportdata));1577	if (IS_ERR(dd)) {1578		ret = PTR_ERR(dd);1579		goto bail;1580	}1581 1582	/* Validate some global module parameters */1583	ret = hfi1_validate_rcvhdrcnt(dd, rcvhdrcnt);1584	if (ret)1585		goto bail;1586 1587	/* use the encoding function as a sanitization check */1588	if (!encode_rcv_header_entry_size(hfi1_hdrq_entsize)) {1589		dd_dev_err(dd, "Invalid HdrQ Entry size %u\n",1590			   hfi1_hdrq_entsize);1591		ret = -EINVAL;1592		goto bail;1593	}1594 1595	/* The receive eager buffer size must be set before the receive1596	 * contexts are created.1597	 *1598	 * Set the eager buffer size.  Validate that it falls in a range1599	 * allowed by the hardware - all powers of 2 between the min and1600	 * max.  The maximum valid MTU is within the eager buffer range1601	 * so we do not need to cap the max_mtu by an eager buffer size1602	 * setting.1603	 */1604	if (eager_buffer_size) {1605		if (!is_power_of_2(eager_buffer_size))1606			eager_buffer_size =1607				roundup_pow_of_two(eager_buffer_size);1608		eager_buffer_size =1609			clamp_val(eager_buffer_size,1610				  MIN_EAGER_BUFFER * 8,1611				  MAX_EAGER_BUFFER_TOTAL);1612		dd_dev_info(dd, "Eager buffer size %u\n",1613			    eager_buffer_size);1614	} else {1615		dd_dev_err(dd, "Invalid Eager buffer size of 0\n");1616		ret = -EINVAL;1617		goto bail;1618	}1619 1620	/* restrict value of hfi1_rcvarr_split */1621	hfi1_rcvarr_split = clamp_val(hfi1_rcvarr_split, 0, 100);1622 1623	ret = hfi1_pcie_init(dd);1624	if (ret)1625		goto bail;1626 1627	/*1628	 * Do device-specific initialization, function table setup, dd1629	 * allocation, etc.1630	 */1631	ret = hfi1_init_dd(dd);1632	if (ret)1633		goto clean_bail; /* error already printed */1634 1635	ret = create_workqueues(dd);1636	if (ret)1637		goto clean_bail;1638 1639	/* do the generic initialization */1640	initfail = hfi1_init(dd, 0);1641 1642	ret = hfi1_register_ib_device(dd);1643 1644	/*1645	 * Now ready for use.  this should be cleared whenever we1646	 * detect a reset, or initiate one.  If earlier failure,1647	 * we still create devices, so diags, etc. can be used1648	 * to determine cause of problem.1649	 */1650	if (!initfail && !ret) {1651		dd->flags |= HFI1_INITTED;1652		/* create debufs files after init and ib register */1653		hfi1_dbg_ibdev_init(&dd->verbs_dev);1654	}1655 1656	j = hfi1_device_create(dd);1657	if (j)1658		dd_dev_err(dd, "Failed to create /dev devices: %d\n", -j);1659 1660	if (initfail || ret) {1661		msix_clean_up_interrupts(dd);1662		stop_timers(dd);1663		flush_workqueue(ib_wq);1664		for (pidx = 0; pidx < dd->num_pports; ++pidx) {1665			hfi1_quiet_serdes(dd->pport + pidx);1666			ppd = dd->pport + pidx;1667			if (ppd->hfi1_wq) {1668				destroy_workqueue(ppd->hfi1_wq);1669				ppd->hfi1_wq = NULL;1670			}1671			if (ppd->link_wq) {1672				destroy_workqueue(ppd->link_wq);1673				ppd->link_wq = NULL;1674			}1675		}1676		if (!j)1677			hfi1_device_remove(dd);1678		if (!ret)1679			hfi1_unregister_ib_device(dd);1680		postinit_cleanup(dd);1681		if (initfail)1682			ret = initfail;1683		goto bail;	/* everything already cleaned */1684	}1685 1686	sdma_start(dd);1687 1688	return 0;1689 1690clean_bail:1691	hfi1_pcie_cleanup(pdev);1692bail:1693	return ret;1694}1695 1696static void wait_for_clients(struct hfi1_devdata *dd)1697{1698	/*1699	 * Remove the device init value and complete the device if there is1700	 * no clients or wait for active clients to finish.1701	 */1702	if (refcount_dec_and_test(&dd->user_refcount))1703		complete(&dd->user_comp);1704 1705	wait_for_completion(&dd->user_comp);1706}1707 1708static void remove_one(struct pci_dev *pdev)1709{1710	struct hfi1_devdata *dd = pci_get_drvdata(pdev);1711 1712	/* close debugfs files before ib unregister */1713	hfi1_dbg_ibdev_exit(&dd->verbs_dev);1714 1715	/* remove the /dev hfi1 interface */1716	hfi1_device_remove(dd);1717 1718	/* wait for existing user space clients to finish */1719	wait_for_clients(dd);1720 1721	/* unregister from IB core */1722	hfi1_unregister_ib_device(dd);1723 1724	/* free netdev data */1725	hfi1_free_rx(dd);1726 1727	/*1728	 * Disable the IB link, disable interrupts on the device,1729	 * clear dma engines, etc.1730	 */1731	shutdown_device(dd);1732	destroy_workqueues(dd);1733 1734	stop_timers(dd);1735 1736	/* wait until all of our (qsfp) queue_work() calls complete */1737	flush_workqueue(ib_wq);1738 1739	postinit_cleanup(dd);1740}1741 1742static void shutdown_one(struct pci_dev *pdev)1743{1744	struct hfi1_devdata *dd = pci_get_drvdata(pdev);1745 1746	shutdown_device(dd);1747}1748 1749/**1750 * hfi1_create_rcvhdrq - create a receive header queue1751 * @dd: the hfi1_ib device1752 * @rcd: the context data1753 *1754 * This must be contiguous memory (from an i/o perspective), and must be1755 * DMA'able (which means for some systems, it will go through an IOMMU,1756 * or be forced into a low address range).1757 */1758int hfi1_create_rcvhdrq(struct hfi1_devdata *dd, struct hfi1_ctxtdata *rcd)1759{1760	unsigned amt;1761 1762	if (!rcd->rcvhdrq) {1763		amt = rcvhdrq_size(rcd);1764 1765		rcd->rcvhdrq = dma_alloc_coherent(&dd->pcidev->dev, amt,1766						  &rcd->rcvhdrq_dma,1767						  GFP_KERNEL);1768 1769		if (!rcd->rcvhdrq) {1770			dd_dev_err(dd,1771				   "attempt to allocate %d bytes for ctxt %u rcvhdrq failed\n",1772				   amt, rcd->ctxt);1773			goto bail;1774		}1775 1776		if (HFI1_CAP_KGET_MASK(rcd->flags, DMA_RTAIL) ||1777		    HFI1_CAP_UGET_MASK(rcd->flags, DMA_RTAIL)) {1778			rcd->rcvhdrtail_kvaddr = dma_alloc_coherent(&dd->pcidev->dev,1779								    PAGE_SIZE,1780								    &rcd->rcvhdrqtailaddr_dma,1781								    GFP_KERNEL);1782			if (!rcd->rcvhdrtail_kvaddr)1783				goto bail_free;1784		}1785	}1786 1787	set_hdrq_regs(rcd->dd, rcd->ctxt, rcd->rcvhdrqentsize,1788		      rcd->rcvhdrq_cnt);1789 1790	return 0;1791 1792bail_free:1793	dd_dev_err(dd,1794		   "attempt to allocate 1 page for ctxt %u rcvhdrqtailaddr failed\n",1795		   rcd->ctxt);1796	dma_free_coherent(&dd->pcidev->dev, amt, rcd->rcvhdrq,1797			  rcd->rcvhdrq_dma);1798	rcd->rcvhdrq = NULL;1799bail:1800	return -ENOMEM;1801}1802 1803/**1804 * hfi1_setup_eagerbufs - llocate eager buffers, both kernel and user1805 * contexts.1806 * @rcd: the context we are setting up.1807 *1808 * Allocate the eager TID buffers and program them into hip.1809 * They are no longer completely contiguous, we do multiple allocation1810 * calls.  Otherwise we get the OOM code involved, by asking for too1811 * much per call, with disastrous results on some kernels.1812 */1813int hfi1_setup_eagerbufs(struct hfi1_ctxtdata *rcd)1814{1815	struct hfi1_devdata *dd = rcd->dd;1816	u32 max_entries, egrtop, alloced_bytes = 0;1817	u16 order, idx = 0;1818	int ret = 0;1819	u16 round_mtu = roundup_pow_of_two(hfi1_max_mtu);1820 1821	/*1822	 * The minimum size of the eager buffers is a groups of MTU-sized1823	 * buffers.1824	 * The global eager_buffer_size parameter is checked against the1825	 * theoretical lower limit of the value. Here, we check against the1826	 * MTU.1827	 */1828	if (rcd->egrbufs.size < (round_mtu * dd->rcv_entries.group_size))1829		rcd->egrbufs.size = round_mtu * dd->rcv_entries.group_size;1830	/*1831	 * If using one-pkt-per-egr-buffer, lower the eager buffer1832	 * size to the max MTU (page-aligned).1833	 */1834	if (!HFI1_CAP_KGET_MASK(rcd->flags, MULTI_PKT_EGR))1835		rcd->egrbufs.rcvtid_size = round_mtu;1836 1837	/*1838	 * Eager buffers sizes of 1MB or less require smaller TID sizes1839	 * to satisfy the "multiple of 8 RcvArray entries" requirement.1840	 */1841	if (rcd->egrbufs.size <= (1 << 20))1842		rcd->egrbufs.rcvtid_size = max((unsigned long)round_mtu,1843			rounddown_pow_of_two(rcd->egrbufs.size / 8));1844 1845	while (alloced_bytes < rcd->egrbufs.size &&1846	       rcd->egrbufs.alloced < rcd->egrbufs.count) {1847		rcd->egrbufs.buffers[idx].addr =1848			dma_alloc_coherent(&dd->pcidev->dev,1849					   rcd->egrbufs.rcvtid_size,1850					   &rcd->egrbufs.buffers[idx].dma,1851					   GFP_KERNEL);1852		if (rcd->egrbufs.buffers[idx].addr) {1853			rcd->egrbufs.buffers[idx].len =1854				rcd->egrbufs.rcvtid_size;1855			rcd->egrbufs.rcvtids[rcd->egrbufs.alloced].addr =1856				rcd->egrbufs.buffers[idx].addr;1857			rcd->egrbufs.rcvtids[rcd->egrbufs.alloced].dma =1858				rcd->egrbufs.buffers[idx].dma;1859			rcd->egrbufs.alloced++;1860			alloced_bytes += rcd->egrbufs.rcvtid_size;1861			idx++;1862		} else {1863			u32 new_size, i, j;1864			u64 offset = 0;1865 1866			/*1867			 * Fail the eager buffer allocation if:1868			 *   - we are already using the lowest acceptable size1869			 *   - we are using one-pkt-per-egr-buffer (this implies1870			 *     that we are accepting only one size)1871			 */1872			if (rcd->egrbufs.rcvtid_size == round_mtu ||1873			    !HFI1_CAP_KGET_MASK(rcd->flags, MULTI_PKT_EGR)) {1874				dd_dev_err(dd, "ctxt%u: Failed to allocate eager buffers\n",1875					   rcd->ctxt);1876				ret = -ENOMEM;1877				goto bail_rcvegrbuf_phys;1878			}1879 1880			new_size = rcd->egrbufs.rcvtid_size / 2;1881 1882			/*1883			 * If the first attempt to allocate memory failed, don't1884			 * fail everything but continue with the next lower1885			 * size.1886			 */1887			if (idx == 0) {1888				rcd->egrbufs.rcvtid_size = new_size;1889				continue;1890			}1891 1892			/*1893			 * Re-partition already allocated buffers to a smaller1894			 * size.1895			 */1896			rcd->egrbufs.alloced = 0;1897			for (i = 0, j = 0, offset = 0; j < idx; i++) {1898				if (i >= rcd->egrbufs.count)1899					break;1900				rcd->egrbufs.rcvtids[i].dma =1901					rcd->egrbufs.buffers[j].dma + offset;1902				rcd->egrbufs.rcvtids[i].addr =1903					rcd->egrbufs.buffers[j].addr + offset;1904				rcd->egrbufs.alloced++;1905				if ((rcd->egrbufs.buffers[j].dma + offset +1906				     new_size) ==1907				    (rcd->egrbufs.buffers[j].dma +1908				     rcd->egrbufs.buffers[j].len)) {1909					j++;1910					offset = 0;1911				} else {1912					offset += new_size;1913				}1914			}1915			rcd->egrbufs.rcvtid_size = new_size;1916		}1917	}1918	rcd->egrbufs.numbufs = idx;1919	rcd->egrbufs.size = alloced_bytes;1920 1921	hfi1_cdbg(PROC,1922		  "ctxt%u: Alloced %u rcv tid entries @ %uKB, total %uKB",1923		  rcd->ctxt, rcd->egrbufs.alloced,1924		  rcd->egrbufs.rcvtid_size / 1024, rcd->egrbufs.size / 1024);1925 1926	/*1927	 * Set the contexts rcv array head update threshold to the closest1928	 * power of 2 (so we can use a mask instead of modulo) below half1929	 * the allocated entries.1930	 */1931	rcd->egrbufs.threshold =1932		rounddown_pow_of_two(rcd->egrbufs.alloced / 2);1933	/*1934	 * Compute the expected RcvArray entry base. This is done after1935	 * allocating the eager buffers in order to maximize the1936	 * expected RcvArray entries for the context.1937	 */1938	max_entries = rcd->rcv_array_groups * dd->rcv_entries.group_size;1939	egrtop = roundup(rcd->egrbufs.alloced, dd->rcv_entries.group_size);1940	rcd->expected_count = max_entries - egrtop;1941	if (rcd->expected_count > MAX_TID_PAIR_ENTRIES * 2)1942		rcd->expected_count = MAX_TID_PAIR_ENTRIES * 2;1943 1944	rcd->expected_base = rcd->eager_base + egrtop;1945	hfi1_cdbg(PROC, "ctxt%u: eager:%u, exp:%u, egrbase:%u, expbase:%u",1946		  rcd->ctxt, rcd->egrbufs.alloced, rcd->expected_count,1947		  rcd->eager_base, rcd->expected_base);1948 1949	if (!hfi1_rcvbuf_validate(rcd->egrbufs.rcvtid_size, PT_EAGER, &order)) {1950		hfi1_cdbg(PROC,1951			  "ctxt%u: current Eager buffer size is invalid %u",1952			  rcd->ctxt, rcd->egrbufs.rcvtid_size);1953		ret = -EINVAL;1954		goto bail_rcvegrbuf_phys;1955	}1956 1957	for (idx = 0; idx < rcd->egrbufs.alloced; idx++) {1958		hfi1_put_tid(dd, rcd->eager_base + idx, PT_EAGER,1959			     rcd->egrbufs.rcvtids[idx].dma, order);1960		cond_resched();1961	}1962 1963	return 0;1964 1965bail_rcvegrbuf_phys:1966	for (idx = 0; idx < rcd->egrbufs.alloced &&1967	     rcd->egrbufs.buffers[idx].addr;1968	     idx++) {1969		dma_free_coherent(&dd->pcidev->dev,1970				  rcd->egrbufs.buffers[idx].len,1971				  rcd->egrbufs.buffers[idx].addr,1972				  rcd->egrbufs.buffers[idx].dma);1973		rcd->egrbufs.buffers[idx].addr = NULL;1974		rcd->egrbufs.buffers[idx].dma = 0;1975		rcd->egrbufs.buffers[idx].len = 0;1976	}1977 1978	return ret;1979}1980