xref: /linux/drivers/infiniband/hw/qib/qib_iba7220.c (revision e9f0878c4b2004ac19581274c1ae4c61ae3ca70e)
1 /*
2  * Copyright (c) 2011 - 2017 Intel Corporation.  All rights reserved.
3  * Copyright (c) 2006, 2007, 2008, 2009, 2010 QLogic Corporation.
4  * All rights reserved.
5  * Copyright (c) 2003, 2004, 2005, 2006 PathScale, Inc. All rights reserved.
6  *
7  * This software is available to you under a choice of one of two
8  * licenses.  You may choose to be licensed under the terms of the GNU
9  * General Public License (GPL) Version 2, available from the file
10  * COPYING in the main directory of this source tree, or the
11  * OpenIB.org BSD license below:
12  *
13  *     Redistribution and use in source and binary forms, with or
14  *     without modification, are permitted provided that the following
15  *     conditions are met:
16  *
17  *      - Redistributions of source code must retain the above
18  *        copyright notice, this list of conditions and the following
19  *        disclaimer.
20  *
21  *      - Redistributions in binary form must reproduce the above
22  *        copyright notice, this list of conditions and the following
23  *        disclaimer in the documentation and/or other materials
24  *        provided with the distribution.
25  *
26  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
27  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
28  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
29  * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
30  * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
31  * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
32  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
33  * SOFTWARE.
34  */
35 /*
36  * This file contains all of the code that is specific to the
37  * QLogic_IB 7220 chip (except that specific to the SerDes)
38  */
39 
40 #include <linux/interrupt.h>
41 #include <linux/pci.h>
42 #include <linux/delay.h>
43 #include <linux/module.h>
44 #include <linux/io.h>
45 #include <rdma/ib_verbs.h>
46 
47 #include "qib.h"
48 #include "qib_7220.h"
49 
50 static void qib_setup_7220_setextled(struct qib_pportdata *, u32);
51 static void qib_7220_handle_hwerrors(struct qib_devdata *, char *, size_t);
52 static void sendctrl_7220_mod(struct qib_pportdata *ppd, u32 op);
53 static u32 qib_7220_iblink_state(u64);
54 static u8 qib_7220_phys_portstate(u64);
55 static void qib_sdma_update_7220_tail(struct qib_pportdata *, u16);
56 static void qib_set_ib_7220_lstate(struct qib_pportdata *, u16, u16);
57 
58 /*
59  * This file contains almost all the chip-specific register information and
60  * access functions for the QLogic QLogic_IB 7220 PCI-Express chip, with the
61  * exception of SerDes support, which in in qib_sd7220.c.
62  */
63 
64 /* Below uses machine-generated qib_chipnum_regs.h file */
65 #define KREG_IDX(regname) (QIB_7220_##regname##_OFFS / sizeof(u64))
66 
67 /* Use defines to tie machine-generated names to lower-case names */
68 #define kr_control KREG_IDX(Control)
69 #define kr_counterregbase KREG_IDX(CntrRegBase)
70 #define kr_errclear KREG_IDX(ErrClear)
71 #define kr_errmask KREG_IDX(ErrMask)
72 #define kr_errstatus KREG_IDX(ErrStatus)
73 #define kr_extctrl KREG_IDX(EXTCtrl)
74 #define kr_extstatus KREG_IDX(EXTStatus)
75 #define kr_gpio_clear KREG_IDX(GPIOClear)
76 #define kr_gpio_mask KREG_IDX(GPIOMask)
77 #define kr_gpio_out KREG_IDX(GPIOOut)
78 #define kr_gpio_status KREG_IDX(GPIOStatus)
79 #define kr_hrtbt_guid KREG_IDX(HRTBT_GUID)
80 #define kr_hwdiagctrl KREG_IDX(HwDiagCtrl)
81 #define kr_hwerrclear KREG_IDX(HwErrClear)
82 #define kr_hwerrmask KREG_IDX(HwErrMask)
83 #define kr_hwerrstatus KREG_IDX(HwErrStatus)
84 #define kr_ibcctrl KREG_IDX(IBCCtrl)
85 #define kr_ibcddrctrl KREG_IDX(IBCDDRCtrl)
86 #define kr_ibcddrstatus KREG_IDX(IBCDDRStatus)
87 #define kr_ibcstatus KREG_IDX(IBCStatus)
88 #define kr_ibserdesctrl KREG_IDX(IBSerDesCtrl)
89 #define kr_intclear KREG_IDX(IntClear)
90 #define kr_intmask KREG_IDX(IntMask)
91 #define kr_intstatus KREG_IDX(IntStatus)
92 #define kr_ncmodectrl KREG_IDX(IBNCModeCtrl)
93 #define kr_palign KREG_IDX(PageAlign)
94 #define kr_partitionkey KREG_IDX(RcvPartitionKey)
95 #define kr_portcnt KREG_IDX(PortCnt)
96 #define kr_rcvbthqp KREG_IDX(RcvBTHQP)
97 #define kr_rcvctrl KREG_IDX(RcvCtrl)
98 #define kr_rcvegrbase KREG_IDX(RcvEgrBase)
99 #define kr_rcvegrcnt KREG_IDX(RcvEgrCnt)
100 #define kr_rcvhdrcnt KREG_IDX(RcvHdrCnt)
101 #define kr_rcvhdrentsize KREG_IDX(RcvHdrEntSize)
102 #define kr_rcvhdrsize KREG_IDX(RcvHdrSize)
103 #define kr_rcvpktledcnt KREG_IDX(RcvPktLEDCnt)
104 #define kr_rcvtidbase KREG_IDX(RcvTIDBase)
105 #define kr_rcvtidcnt KREG_IDX(RcvTIDCnt)
106 #define kr_revision KREG_IDX(Revision)
107 #define kr_scratch KREG_IDX(Scratch)
108 #define kr_sendbuffererror KREG_IDX(SendBufErr0)
109 #define kr_sendctrl KREG_IDX(SendCtrl)
110 #define kr_senddmabase KREG_IDX(SendDmaBase)
111 #define kr_senddmabufmask0 KREG_IDX(SendDmaBufMask0)
112 #define kr_senddmabufmask1 (KREG_IDX(SendDmaBufMask0) + 1)
113 #define kr_senddmabufmask2 (KREG_IDX(SendDmaBufMask0) + 2)
114 #define kr_senddmahead KREG_IDX(SendDmaHead)
115 #define kr_senddmaheadaddr KREG_IDX(SendDmaHeadAddr)
116 #define kr_senddmalengen KREG_IDX(SendDmaLenGen)
117 #define kr_senddmastatus KREG_IDX(SendDmaStatus)
118 #define kr_senddmatail KREG_IDX(SendDmaTail)
119 #define kr_sendpioavailaddr KREG_IDX(SendBufAvailAddr)
120 #define kr_sendpiobufbase KREG_IDX(SendBufBase)
121 #define kr_sendpiobufcnt KREG_IDX(SendBufCnt)
122 #define kr_sendpiosize KREG_IDX(SendBufSize)
123 #define kr_sendregbase KREG_IDX(SendRegBase)
124 #define kr_userregbase KREG_IDX(UserRegBase)
125 #define kr_xgxs_cfg KREG_IDX(XGXSCfg)
126 
127 /* These must only be written via qib_write_kreg_ctxt() */
128 #define kr_rcvhdraddr KREG_IDX(RcvHdrAddr0)
129 #define kr_rcvhdrtailaddr KREG_IDX(RcvHdrTailAddr0)
130 
131 
132 #define CREG_IDX(regname) ((QIB_7220_##regname##_OFFS - \
133 			QIB_7220_LBIntCnt_OFFS) / sizeof(u64))
134 
135 #define cr_badformat CREG_IDX(RxVersionErrCnt)
136 #define cr_erricrc CREG_IDX(RxICRCErrCnt)
137 #define cr_errlink CREG_IDX(RxLinkMalformCnt)
138 #define cr_errlpcrc CREG_IDX(RxLPCRCErrCnt)
139 #define cr_errpkey CREG_IDX(RxPKeyMismatchCnt)
140 #define cr_rcvflowctrl_err CREG_IDX(RxFlowCtrlViolCnt)
141 #define cr_err_rlen CREG_IDX(RxLenErrCnt)
142 #define cr_errslen CREG_IDX(TxLenErrCnt)
143 #define cr_errtidfull CREG_IDX(RxTIDFullErrCnt)
144 #define cr_errtidvalid CREG_IDX(RxTIDValidErrCnt)
145 #define cr_errvcrc CREG_IDX(RxVCRCErrCnt)
146 #define cr_ibstatuschange CREG_IDX(IBStatusChangeCnt)
147 #define cr_lbint CREG_IDX(LBIntCnt)
148 #define cr_invalidrlen CREG_IDX(RxMaxMinLenErrCnt)
149 #define cr_invalidslen CREG_IDX(TxMaxMinLenErrCnt)
150 #define cr_lbflowstall CREG_IDX(LBFlowStallCnt)
151 #define cr_pktrcv CREG_IDX(RxDataPktCnt)
152 #define cr_pktrcvflowctrl CREG_IDX(RxFlowPktCnt)
153 #define cr_pktsend CREG_IDX(TxDataPktCnt)
154 #define cr_pktsendflow CREG_IDX(TxFlowPktCnt)
155 #define cr_portovfl CREG_IDX(RxP0HdrEgrOvflCnt)
156 #define cr_rcvebp CREG_IDX(RxEBPCnt)
157 #define cr_rcvovfl CREG_IDX(RxBufOvflCnt)
158 #define cr_senddropped CREG_IDX(TxDroppedPktCnt)
159 #define cr_sendstall CREG_IDX(TxFlowStallCnt)
160 #define cr_sendunderrun CREG_IDX(TxUnderrunCnt)
161 #define cr_wordrcv CREG_IDX(RxDwordCnt)
162 #define cr_wordsend CREG_IDX(TxDwordCnt)
163 #define cr_txunsupvl CREG_IDX(TxUnsupVLErrCnt)
164 #define cr_rxdroppkt CREG_IDX(RxDroppedPktCnt)
165 #define cr_iblinkerrrecov CREG_IDX(IBLinkErrRecoveryCnt)
166 #define cr_iblinkdown CREG_IDX(IBLinkDownedCnt)
167 #define cr_ibsymbolerr CREG_IDX(IBSymbolErrCnt)
168 #define cr_vl15droppedpkt CREG_IDX(RxVL15DroppedPktCnt)
169 #define cr_rxotherlocalphyerr CREG_IDX(RxOtherLocalPhyErrCnt)
170 #define cr_excessbufferovfl CREG_IDX(ExcessBufferOvflCnt)
171 #define cr_locallinkintegrityerr CREG_IDX(LocalLinkIntegrityErrCnt)
172 #define cr_rxvlerr CREG_IDX(RxVlErrCnt)
173 #define cr_rxdlidfltr CREG_IDX(RxDlidFltrCnt)
174 #define cr_psstat CREG_IDX(PSStat)
175 #define cr_psstart CREG_IDX(PSStart)
176 #define cr_psinterval CREG_IDX(PSInterval)
177 #define cr_psrcvdatacount CREG_IDX(PSRcvDataCount)
178 #define cr_psrcvpktscount CREG_IDX(PSRcvPktsCount)
179 #define cr_psxmitdatacount CREG_IDX(PSXmitDataCount)
180 #define cr_psxmitpktscount CREG_IDX(PSXmitPktsCount)
181 #define cr_psxmitwaitcount CREG_IDX(PSXmitWaitCount)
182 #define cr_txsdmadesc CREG_IDX(TxSDmaDescCnt)
183 #define cr_pcieretrydiag CREG_IDX(PcieRetryBufDiagQwordCnt)
184 
185 #define SYM_RMASK(regname, fldname) ((u64)              \
186 	QIB_7220_##regname##_##fldname##_RMASK)
187 #define SYM_MASK(regname, fldname) ((u64)               \
188 	QIB_7220_##regname##_##fldname##_RMASK <<       \
189 	 QIB_7220_##regname##_##fldname##_LSB)
190 #define SYM_LSB(regname, fldname) (QIB_7220_##regname##_##fldname##_LSB)
191 #define SYM_FIELD(value, regname, fldname) ((u64) \
192 	(((value) >> SYM_LSB(regname, fldname)) & \
193 	 SYM_RMASK(regname, fldname)))
194 #define ERR_MASK(fldname) SYM_MASK(ErrMask, fldname##Mask)
195 #define HWE_MASK(fldname) SYM_MASK(HwErrMask, fldname##Mask)
196 
197 /* ibcctrl bits */
198 #define QLOGIC_IB_IBCC_LINKINITCMD_DISABLE 1
199 /* cycle through TS1/TS2 till OK */
200 #define QLOGIC_IB_IBCC_LINKINITCMD_POLL 2
201 /* wait for TS1, then go on */
202 #define QLOGIC_IB_IBCC_LINKINITCMD_SLEEP 3
203 #define QLOGIC_IB_IBCC_LINKINITCMD_SHIFT 16
204 
205 #define QLOGIC_IB_IBCC_LINKCMD_DOWN 1           /* move to 0x11 */
206 #define QLOGIC_IB_IBCC_LINKCMD_ARMED 2          /* move to 0x21 */
207 #define QLOGIC_IB_IBCC_LINKCMD_ACTIVE 3 /* move to 0x31 */
208 
209 #define BLOB_7220_IBCHG 0x81
210 
211 /*
212  * We could have a single register get/put routine, that takes a group type,
213  * but this is somewhat clearer and cleaner.  It also gives us some error
214  * checking.  64 bit register reads should always work, but are inefficient
215  * on opteron (the northbridge always generates 2 separate HT 32 bit reads),
216  * so we use kreg32 wherever possible.  User register and counter register
217  * reads are always 32 bit reads, so only one form of those routines.
218  */
219 
220 /**
221  * qib_read_ureg32 - read 32-bit virtualized per-context register
222  * @dd: device
223  * @regno: register number
224  * @ctxt: context number
225  *
226  * Return the contents of a register that is virtualized to be per context.
227  * Returns -1 on errors (not distinguishable from valid contents at
228  * runtime; we may add a separate error variable at some point).
229  */
230 static inline u32 qib_read_ureg32(const struct qib_devdata *dd,
231 				  enum qib_ureg regno, int ctxt)
232 {
233 	if (!dd->kregbase || !(dd->flags & QIB_PRESENT))
234 		return 0;
235 
236 	if (dd->userbase)
237 		return readl(regno + (u64 __iomem *)
238 			     ((char __iomem *)dd->userbase +
239 			      dd->ureg_align * ctxt));
240 	else
241 		return readl(regno + (u64 __iomem *)
242 			     (dd->uregbase +
243 			      (char __iomem *)dd->kregbase +
244 			      dd->ureg_align * ctxt));
245 }
246 
247 /**
248  * qib_write_ureg - write 32-bit virtualized per-context register
249  * @dd: device
250  * @regno: register number
251  * @value: value
252  * @ctxt: context
253  *
254  * Write the contents of a register that is virtualized to be per context.
255  */
256 static inline void qib_write_ureg(const struct qib_devdata *dd,
257 				  enum qib_ureg regno, u64 value, int ctxt)
258 {
259 	u64 __iomem *ubase;
260 
261 	if (dd->userbase)
262 		ubase = (u64 __iomem *)
263 			((char __iomem *) dd->userbase +
264 			 dd->ureg_align * ctxt);
265 	else
266 		ubase = (u64 __iomem *)
267 			(dd->uregbase +
268 			 (char __iomem *) dd->kregbase +
269 			 dd->ureg_align * ctxt);
270 
271 	if (dd->kregbase && (dd->flags & QIB_PRESENT))
272 		writeq(value, &ubase[regno]);
273 }
274 
275 /**
276  * qib_write_kreg_ctxt - write a device's per-ctxt 64-bit kernel register
277  * @dd: the qlogic_ib device
278  * @regno: the register number to write
279  * @ctxt: the context containing the register
280  * @value: the value to write
281  */
282 static inline void qib_write_kreg_ctxt(const struct qib_devdata *dd,
283 				       const u16 regno, unsigned ctxt,
284 				       u64 value)
285 {
286 	qib_write_kreg(dd, regno + ctxt, value);
287 }
288 
289 static inline void write_7220_creg(const struct qib_devdata *dd,
290 				   u16 regno, u64 value)
291 {
292 	if (dd->cspec->cregbase && (dd->flags & QIB_PRESENT))
293 		writeq(value, &dd->cspec->cregbase[regno]);
294 }
295 
296 static inline u64 read_7220_creg(const struct qib_devdata *dd, u16 regno)
297 {
298 	if (!dd->cspec->cregbase || !(dd->flags & QIB_PRESENT))
299 		return 0;
300 	return readq(&dd->cspec->cregbase[regno]);
301 }
302 
303 static inline u32 read_7220_creg32(const struct qib_devdata *dd, u16 regno)
304 {
305 	if (!dd->cspec->cregbase || !(dd->flags & QIB_PRESENT))
306 		return 0;
307 	return readl(&dd->cspec->cregbase[regno]);
308 }
309 
310 /* kr_revision bits */
311 #define QLOGIC_IB_R_EMULATORREV_MASK ((1ULL << 22) - 1)
312 #define QLOGIC_IB_R_EMULATORREV_SHIFT 40
313 
314 /* kr_control bits */
315 #define QLOGIC_IB_C_RESET (1U << 7)
316 
317 /* kr_intstatus, kr_intclear, kr_intmask bits */
318 #define QLOGIC_IB_I_RCVURG_MASK ((1ULL << 17) - 1)
319 #define QLOGIC_IB_I_RCVURG_SHIFT 32
320 #define QLOGIC_IB_I_RCVAVAIL_MASK ((1ULL << 17) - 1)
321 #define QLOGIC_IB_I_RCVAVAIL_SHIFT 0
322 #define QLOGIC_IB_I_SERDESTRIMDONE (1ULL << 27)
323 
324 #define QLOGIC_IB_C_FREEZEMODE 0x00000002
325 #define QLOGIC_IB_C_LINKENABLE 0x00000004
326 
327 #define QLOGIC_IB_I_SDMAINT             0x8000000000000000ULL
328 #define QLOGIC_IB_I_SDMADISABLED        0x4000000000000000ULL
329 #define QLOGIC_IB_I_ERROR               0x0000000080000000ULL
330 #define QLOGIC_IB_I_SPIOSENT            0x0000000040000000ULL
331 #define QLOGIC_IB_I_SPIOBUFAVAIL        0x0000000020000000ULL
332 #define QLOGIC_IB_I_GPIO                0x0000000010000000ULL
333 
334 /* variables for sanity checking interrupt and errors */
335 #define QLOGIC_IB_I_BITSEXTANT \
336 		(QLOGIC_IB_I_SDMAINT | QLOGIC_IB_I_SDMADISABLED | \
337 		(QLOGIC_IB_I_RCVURG_MASK << QLOGIC_IB_I_RCVURG_SHIFT) | \
338 		(QLOGIC_IB_I_RCVAVAIL_MASK << \
339 		 QLOGIC_IB_I_RCVAVAIL_SHIFT) | \
340 		QLOGIC_IB_I_ERROR | QLOGIC_IB_I_SPIOSENT | \
341 		QLOGIC_IB_I_SPIOBUFAVAIL | QLOGIC_IB_I_GPIO | \
342 		QLOGIC_IB_I_SERDESTRIMDONE)
343 
344 #define IB_HWE_BITSEXTANT \
345 	       (HWE_MASK(RXEMemParityErr) | \
346 		HWE_MASK(TXEMemParityErr) | \
347 		(QLOGIC_IB_HWE_PCIEMEMPARITYERR_MASK <<	 \
348 		 QLOGIC_IB_HWE_PCIEMEMPARITYERR_SHIFT) | \
349 		QLOGIC_IB_HWE_PCIE1PLLFAILED | \
350 		QLOGIC_IB_HWE_PCIE0PLLFAILED | \
351 		QLOGIC_IB_HWE_PCIEPOISONEDTLP | \
352 		QLOGIC_IB_HWE_PCIECPLTIMEOUT | \
353 		QLOGIC_IB_HWE_PCIEBUSPARITYXTLH | \
354 		QLOGIC_IB_HWE_PCIEBUSPARITYXADM | \
355 		QLOGIC_IB_HWE_PCIEBUSPARITYRADM | \
356 		HWE_MASK(PowerOnBISTFailed) |	  \
357 		QLOGIC_IB_HWE_COREPLL_FBSLIP | \
358 		QLOGIC_IB_HWE_COREPLL_RFSLIP | \
359 		QLOGIC_IB_HWE_SERDESPLLFAILED | \
360 		HWE_MASK(IBCBusToSPCParityErr) | \
361 		HWE_MASK(IBCBusFromSPCParityErr) | \
362 		QLOGIC_IB_HWE_PCIECPLDATAQUEUEERR | \
363 		QLOGIC_IB_HWE_PCIECPLHDRQUEUEERR | \
364 		QLOGIC_IB_HWE_SDMAMEMREADERR | \
365 		QLOGIC_IB_HWE_CLK_UC_PLLNOTLOCKED | \
366 		QLOGIC_IB_HWE_PCIESERDESQ0PCLKNOTDETECT | \
367 		QLOGIC_IB_HWE_PCIESERDESQ1PCLKNOTDETECT | \
368 		QLOGIC_IB_HWE_PCIESERDESQ2PCLKNOTDETECT | \
369 		QLOGIC_IB_HWE_PCIESERDESQ3PCLKNOTDETECT | \
370 		QLOGIC_IB_HWE_DDSRXEQMEMORYPARITYERR | \
371 		QLOGIC_IB_HWE_IB_UC_MEMORYPARITYERR | \
372 		QLOGIC_IB_HWE_PCIE_UC_OCT0MEMORYPARITYERR | \
373 		QLOGIC_IB_HWE_PCIE_UC_OCT1MEMORYPARITYERR)
374 
375 #define IB_E_BITSEXTANT							\
376 	(ERR_MASK(RcvFormatErr) | ERR_MASK(RcvVCRCErr) |		\
377 	 ERR_MASK(RcvICRCErr) | ERR_MASK(RcvMinPktLenErr) |		\
378 	 ERR_MASK(RcvMaxPktLenErr) | ERR_MASK(RcvLongPktLenErr) |	\
379 	 ERR_MASK(RcvShortPktLenErr) | ERR_MASK(RcvUnexpectedCharErr) | \
380 	 ERR_MASK(RcvUnsupportedVLErr) | ERR_MASK(RcvEBPErr) |		\
381 	 ERR_MASK(RcvIBFlowErr) | ERR_MASK(RcvBadVersionErr) |		\
382 	 ERR_MASK(RcvEgrFullErr) | ERR_MASK(RcvHdrFullErr) |		\
383 	 ERR_MASK(RcvBadTidErr) | ERR_MASK(RcvHdrLenErr) |		\
384 	 ERR_MASK(RcvHdrErr) | ERR_MASK(RcvIBLostLinkErr) |		\
385 	 ERR_MASK(SendSpecialTriggerErr) |				\
386 	 ERR_MASK(SDmaDisabledErr) | ERR_MASK(SendMinPktLenErr) |	\
387 	 ERR_MASK(SendMaxPktLenErr) | ERR_MASK(SendUnderRunErr) |	\
388 	 ERR_MASK(SendPktLenErr) | ERR_MASK(SendDroppedSmpPktErr) |	\
389 	 ERR_MASK(SendDroppedDataPktErr) |				\
390 	 ERR_MASK(SendPioArmLaunchErr) |				\
391 	 ERR_MASK(SendUnexpectedPktNumErr) |				\
392 	 ERR_MASK(SendUnsupportedVLErr) | ERR_MASK(SendBufMisuseErr) |	\
393 	 ERR_MASK(SDmaGenMismatchErr) | ERR_MASK(SDmaOutOfBoundErr) |	\
394 	 ERR_MASK(SDmaTailOutOfBoundErr) | ERR_MASK(SDmaBaseErr) |	\
395 	 ERR_MASK(SDma1stDescErr) | ERR_MASK(SDmaRpyTagErr) |		\
396 	 ERR_MASK(SDmaDwEnErr) | ERR_MASK(SDmaMissingDwErr) |		\
397 	 ERR_MASK(SDmaUnexpDataErr) |					\
398 	 ERR_MASK(IBStatusChanged) | ERR_MASK(InvalidAddrErr) |		\
399 	 ERR_MASK(ResetNegated) | ERR_MASK(HardwareErr) |		\
400 	 ERR_MASK(SDmaDescAddrMisalignErr) |				\
401 	 ERR_MASK(InvalidEEPCmd))
402 
403 /* kr_hwerrclear, kr_hwerrmask, kr_hwerrstatus, bits */
404 #define QLOGIC_IB_HWE_PCIEMEMPARITYERR_MASK  0x00000000000000ffULL
405 #define QLOGIC_IB_HWE_PCIEMEMPARITYERR_SHIFT 0
406 #define QLOGIC_IB_HWE_PCIEPOISONEDTLP      0x0000000010000000ULL
407 #define QLOGIC_IB_HWE_PCIECPLTIMEOUT       0x0000000020000000ULL
408 #define QLOGIC_IB_HWE_PCIEBUSPARITYXTLH    0x0000000040000000ULL
409 #define QLOGIC_IB_HWE_PCIEBUSPARITYXADM    0x0000000080000000ULL
410 #define QLOGIC_IB_HWE_PCIEBUSPARITYRADM    0x0000000100000000ULL
411 #define QLOGIC_IB_HWE_COREPLL_FBSLIP       0x0080000000000000ULL
412 #define QLOGIC_IB_HWE_COREPLL_RFSLIP       0x0100000000000000ULL
413 #define QLOGIC_IB_HWE_PCIE1PLLFAILED       0x0400000000000000ULL
414 #define QLOGIC_IB_HWE_PCIE0PLLFAILED       0x0800000000000000ULL
415 #define QLOGIC_IB_HWE_SERDESPLLFAILED      0x1000000000000000ULL
416 /* specific to this chip */
417 #define QLOGIC_IB_HWE_PCIECPLDATAQUEUEERR         0x0000000000000040ULL
418 #define QLOGIC_IB_HWE_PCIECPLHDRQUEUEERR          0x0000000000000080ULL
419 #define QLOGIC_IB_HWE_SDMAMEMREADERR              0x0000000010000000ULL
420 #define QLOGIC_IB_HWE_CLK_UC_PLLNOTLOCKED          0x2000000000000000ULL
421 #define QLOGIC_IB_HWE_PCIESERDESQ0PCLKNOTDETECT   0x0100000000000000ULL
422 #define QLOGIC_IB_HWE_PCIESERDESQ1PCLKNOTDETECT   0x0200000000000000ULL
423 #define QLOGIC_IB_HWE_PCIESERDESQ2PCLKNOTDETECT   0x0400000000000000ULL
424 #define QLOGIC_IB_HWE_PCIESERDESQ3PCLKNOTDETECT   0x0800000000000000ULL
425 #define QLOGIC_IB_HWE_DDSRXEQMEMORYPARITYERR       0x0000008000000000ULL
426 #define QLOGIC_IB_HWE_IB_UC_MEMORYPARITYERR        0x0000004000000000ULL
427 #define QLOGIC_IB_HWE_PCIE_UC_OCT0MEMORYPARITYERR 0x0000001000000000ULL
428 #define QLOGIC_IB_HWE_PCIE_UC_OCT1MEMORYPARITYERR 0x0000002000000000ULL
429 
430 #define IBA7220_IBCC_LINKCMD_SHIFT 19
431 
432 /* kr_ibcddrctrl bits */
433 #define IBA7220_IBC_DLIDLMC_MASK        0xFFFFFFFFUL
434 #define IBA7220_IBC_DLIDLMC_SHIFT       32
435 
436 #define IBA7220_IBC_HRTBT_MASK  (SYM_RMASK(IBCDDRCtrl, HRTBT_AUTO) | \
437 				 SYM_RMASK(IBCDDRCtrl, HRTBT_ENB))
438 #define IBA7220_IBC_HRTBT_SHIFT SYM_LSB(IBCDDRCtrl, HRTBT_ENB)
439 
440 #define IBA7220_IBC_LANE_REV_SUPPORTED (1<<8)
441 #define IBA7220_IBC_LREV_MASK   1
442 #define IBA7220_IBC_LREV_SHIFT  8
443 #define IBA7220_IBC_RXPOL_MASK  1
444 #define IBA7220_IBC_RXPOL_SHIFT 7
445 #define IBA7220_IBC_WIDTH_SHIFT 5
446 #define IBA7220_IBC_WIDTH_MASK  0x3
447 #define IBA7220_IBC_WIDTH_1X_ONLY       (0 << IBA7220_IBC_WIDTH_SHIFT)
448 #define IBA7220_IBC_WIDTH_4X_ONLY       (1 << IBA7220_IBC_WIDTH_SHIFT)
449 #define IBA7220_IBC_WIDTH_AUTONEG       (2 << IBA7220_IBC_WIDTH_SHIFT)
450 #define IBA7220_IBC_SPEED_AUTONEG       (1 << 1)
451 #define IBA7220_IBC_SPEED_SDR           (1 << 2)
452 #define IBA7220_IBC_SPEED_DDR           (1 << 3)
453 #define IBA7220_IBC_SPEED_AUTONEG_MASK  (0x7 << 1)
454 #define IBA7220_IBC_IBTA_1_2_MASK       (1)
455 
456 /* kr_ibcddrstatus */
457 /* link latency shift is 0, don't bother defining */
458 #define IBA7220_DDRSTAT_LINKLAT_MASK    0x3ffffff
459 
460 /* kr_extstatus bits */
461 #define QLOGIC_IB_EXTS_FREQSEL 0x2
462 #define QLOGIC_IB_EXTS_SERDESSEL 0x4
463 #define QLOGIC_IB_EXTS_MEMBIST_ENDTEST     0x0000000000004000
464 #define QLOGIC_IB_EXTS_MEMBIST_DISABLED    0x0000000000008000
465 
466 /* kr_xgxsconfig bits */
467 #define QLOGIC_IB_XGXS_RESET          0x5ULL
468 #define QLOGIC_IB_XGXS_FC_SAFE        (1ULL << 63)
469 
470 /* kr_rcvpktledcnt */
471 #define IBA7220_LEDBLINK_ON_SHIFT 32 /* 4ns period on after packet */
472 #define IBA7220_LEDBLINK_OFF_SHIFT 0 /* 4ns period off before next on */
473 
474 #define _QIB_GPIO_SDA_NUM 1
475 #define _QIB_GPIO_SCL_NUM 0
476 #define QIB_TWSI_EEPROM_DEV 0xA2 /* All Production 7220 cards. */
477 #define QIB_TWSI_TEMP_DEV 0x98
478 
479 /* HW counter clock is at 4nsec */
480 #define QIB_7220_PSXMITWAIT_CHECK_RATE 4000
481 
482 #define IBA7220_R_INTRAVAIL_SHIFT 17
483 #define IBA7220_R_PKEY_DIS_SHIFT 34
484 #define IBA7220_R_TAILUPD_SHIFT 35
485 #define IBA7220_R_CTXTCFG_SHIFT 36
486 
487 #define IBA7220_HDRHEAD_PKTINT_SHIFT 32 /* interrupt cnt in upper 32 bits */
488 
489 /*
490  * the size bits give us 2^N, in KB units.  0 marks as invalid,
491  * and 7 is reserved.  We currently use only 2KB and 4KB
492  */
493 #define IBA7220_TID_SZ_SHIFT 37 /* shift to 3bit size selector */
494 #define IBA7220_TID_SZ_2K (1UL << IBA7220_TID_SZ_SHIFT) /* 2KB */
495 #define IBA7220_TID_SZ_4K (2UL << IBA7220_TID_SZ_SHIFT) /* 4KB */
496 #define IBA7220_TID_PA_SHIFT 11U /* TID addr in chip stored w/o low bits */
497 #define PBC_7220_VL15_SEND (1ULL << 63) /* pbc; VL15, no credit check */
498 #define PBC_7220_VL15_SEND_CTRL (1ULL << 31) /* control version of same */
499 
500 #define AUTONEG_TRIES 5 /* sequential retries to negotiate DDR */
501 
502 /* packet rate matching delay multiplier */
503 static u8 rate_to_delay[2][2] = {
504 	/* 1x, 4x */
505 	{   8, 2 }, /* SDR */
506 	{   4, 1 }  /* DDR */
507 };
508 
509 static u8 ib_rate_to_delay[IB_RATE_120_GBPS + 1] = {
510 	[IB_RATE_2_5_GBPS] = 8,
511 	[IB_RATE_5_GBPS] = 4,
512 	[IB_RATE_10_GBPS] = 2,
513 	[IB_RATE_20_GBPS] = 1
514 };
515 
516 #define IBA7220_LINKSPEED_SHIFT SYM_LSB(IBCStatus, LinkSpeedActive)
517 #define IBA7220_LINKWIDTH_SHIFT SYM_LSB(IBCStatus, LinkWidthActive)
518 
519 /* link training states, from IBC */
520 #define IB_7220_LT_STATE_DISABLED        0x00
521 #define IB_7220_LT_STATE_LINKUP          0x01
522 #define IB_7220_LT_STATE_POLLACTIVE      0x02
523 #define IB_7220_LT_STATE_POLLQUIET       0x03
524 #define IB_7220_LT_STATE_SLEEPDELAY      0x04
525 #define IB_7220_LT_STATE_SLEEPQUIET      0x05
526 #define IB_7220_LT_STATE_CFGDEBOUNCE     0x08
527 #define IB_7220_LT_STATE_CFGRCVFCFG      0x09
528 #define IB_7220_LT_STATE_CFGWAITRMT      0x0a
529 #define IB_7220_LT_STATE_CFGIDLE 0x0b
530 #define IB_7220_LT_STATE_RECOVERRETRAIN  0x0c
531 #define IB_7220_LT_STATE_RECOVERWAITRMT  0x0e
532 #define IB_7220_LT_STATE_RECOVERIDLE     0x0f
533 
534 /* link state machine states from IBC */
535 #define IB_7220_L_STATE_DOWN             0x0
536 #define IB_7220_L_STATE_INIT             0x1
537 #define IB_7220_L_STATE_ARM              0x2
538 #define IB_7220_L_STATE_ACTIVE           0x3
539 #define IB_7220_L_STATE_ACT_DEFER        0x4
540 
541 static const u8 qib_7220_physportstate[0x20] = {
542 	[IB_7220_LT_STATE_DISABLED] = IB_PHYSPORTSTATE_DISABLED,
543 	[IB_7220_LT_STATE_LINKUP] = IB_PHYSPORTSTATE_LINKUP,
544 	[IB_7220_LT_STATE_POLLACTIVE] = IB_PHYSPORTSTATE_POLL,
545 	[IB_7220_LT_STATE_POLLQUIET] = IB_PHYSPORTSTATE_POLL,
546 	[IB_7220_LT_STATE_SLEEPDELAY] = IB_PHYSPORTSTATE_SLEEP,
547 	[IB_7220_LT_STATE_SLEEPQUIET] = IB_PHYSPORTSTATE_SLEEP,
548 	[IB_7220_LT_STATE_CFGDEBOUNCE] =
549 		IB_PHYSPORTSTATE_CFG_TRAIN,
550 	[IB_7220_LT_STATE_CFGRCVFCFG] =
551 		IB_PHYSPORTSTATE_CFG_TRAIN,
552 	[IB_7220_LT_STATE_CFGWAITRMT] =
553 		IB_PHYSPORTSTATE_CFG_TRAIN,
554 	[IB_7220_LT_STATE_CFGIDLE] = IB_PHYSPORTSTATE_CFG_TRAIN,
555 	[IB_7220_LT_STATE_RECOVERRETRAIN] =
556 		IB_PHYSPORTSTATE_LINK_ERR_RECOVER,
557 	[IB_7220_LT_STATE_RECOVERWAITRMT] =
558 		IB_PHYSPORTSTATE_LINK_ERR_RECOVER,
559 	[IB_7220_LT_STATE_RECOVERIDLE] =
560 		IB_PHYSPORTSTATE_LINK_ERR_RECOVER,
561 	[0x10] = IB_PHYSPORTSTATE_CFG_TRAIN,
562 	[0x11] = IB_PHYSPORTSTATE_CFG_TRAIN,
563 	[0x12] = IB_PHYSPORTSTATE_CFG_TRAIN,
564 	[0x13] = IB_PHYSPORTSTATE_CFG_TRAIN,
565 	[0x14] = IB_PHYSPORTSTATE_CFG_TRAIN,
566 	[0x15] = IB_PHYSPORTSTATE_CFG_TRAIN,
567 	[0x16] = IB_PHYSPORTSTATE_CFG_TRAIN,
568 	[0x17] = IB_PHYSPORTSTATE_CFG_TRAIN
569 };
570 
571 int qib_special_trigger;
572 module_param_named(special_trigger, qib_special_trigger, int, S_IRUGO);
573 MODULE_PARM_DESC(special_trigger, "Enable SpecialTrigger arm/launch");
574 
575 #define IBCBUSFRSPCPARITYERR HWE_MASK(IBCBusFromSPCParityErr)
576 #define IBCBUSTOSPCPARITYERR HWE_MASK(IBCBusToSPCParityErr)
577 
578 #define SYM_MASK_BIT(regname, fldname, bit) ((u64) \
579 	(1ULL << (SYM_LSB(regname, fldname) + (bit))))
580 
581 #define TXEMEMPARITYERR_PIOBUF \
582 	SYM_MASK_BIT(HwErrMask, TXEMemParityErrMask, 0)
583 #define TXEMEMPARITYERR_PIOPBC \
584 	SYM_MASK_BIT(HwErrMask, TXEMemParityErrMask, 1)
585 #define TXEMEMPARITYERR_PIOLAUNCHFIFO \
586 	SYM_MASK_BIT(HwErrMask, TXEMemParityErrMask, 2)
587 
588 #define RXEMEMPARITYERR_RCVBUF \
589 	SYM_MASK_BIT(HwErrMask, RXEMemParityErrMask, 0)
590 #define RXEMEMPARITYERR_LOOKUPQ \
591 	SYM_MASK_BIT(HwErrMask, RXEMemParityErrMask, 1)
592 #define RXEMEMPARITYERR_EXPTID \
593 	SYM_MASK_BIT(HwErrMask, RXEMemParityErrMask, 2)
594 #define RXEMEMPARITYERR_EAGERTID \
595 	SYM_MASK_BIT(HwErrMask, RXEMemParityErrMask, 3)
596 #define RXEMEMPARITYERR_FLAGBUF \
597 	SYM_MASK_BIT(HwErrMask, RXEMemParityErrMask, 4)
598 #define RXEMEMPARITYERR_DATAINFO \
599 	SYM_MASK_BIT(HwErrMask, RXEMemParityErrMask, 5)
600 #define RXEMEMPARITYERR_HDRINFO \
601 	SYM_MASK_BIT(HwErrMask, RXEMemParityErrMask, 6)
602 
603 /* 7220 specific hardware errors... */
604 static const struct qib_hwerror_msgs qib_7220_hwerror_msgs[] = {
605 	/* generic hardware errors */
606 	QLOGIC_IB_HWE_MSG(IBCBUSFRSPCPARITYERR, "QIB2IB Parity"),
607 	QLOGIC_IB_HWE_MSG(IBCBUSTOSPCPARITYERR, "IB2QIB Parity"),
608 
609 	QLOGIC_IB_HWE_MSG(TXEMEMPARITYERR_PIOBUF,
610 			  "TXE PIOBUF Memory Parity"),
611 	QLOGIC_IB_HWE_MSG(TXEMEMPARITYERR_PIOPBC,
612 			  "TXE PIOPBC Memory Parity"),
613 	QLOGIC_IB_HWE_MSG(TXEMEMPARITYERR_PIOLAUNCHFIFO,
614 			  "TXE PIOLAUNCHFIFO Memory Parity"),
615 
616 	QLOGIC_IB_HWE_MSG(RXEMEMPARITYERR_RCVBUF,
617 			  "RXE RCVBUF Memory Parity"),
618 	QLOGIC_IB_HWE_MSG(RXEMEMPARITYERR_LOOKUPQ,
619 			  "RXE LOOKUPQ Memory Parity"),
620 	QLOGIC_IB_HWE_MSG(RXEMEMPARITYERR_EAGERTID,
621 			  "RXE EAGERTID Memory Parity"),
622 	QLOGIC_IB_HWE_MSG(RXEMEMPARITYERR_EXPTID,
623 			  "RXE EXPTID Memory Parity"),
624 	QLOGIC_IB_HWE_MSG(RXEMEMPARITYERR_FLAGBUF,
625 			  "RXE FLAGBUF Memory Parity"),
626 	QLOGIC_IB_HWE_MSG(RXEMEMPARITYERR_DATAINFO,
627 			  "RXE DATAINFO Memory Parity"),
628 	QLOGIC_IB_HWE_MSG(RXEMEMPARITYERR_HDRINFO,
629 			  "RXE HDRINFO Memory Parity"),
630 
631 	/* chip-specific hardware errors */
632 	QLOGIC_IB_HWE_MSG(QLOGIC_IB_HWE_PCIEPOISONEDTLP,
633 			  "PCIe Poisoned TLP"),
634 	QLOGIC_IB_HWE_MSG(QLOGIC_IB_HWE_PCIECPLTIMEOUT,
635 			  "PCIe completion timeout"),
636 	/*
637 	 * In practice, it's unlikely wthat we'll see PCIe PLL, or bus
638 	 * parity or memory parity error failures, because most likely we
639 	 * won't be able to talk to the core of the chip.  Nonetheless, we
640 	 * might see them, if they are in parts of the PCIe core that aren't
641 	 * essential.
642 	 */
643 	QLOGIC_IB_HWE_MSG(QLOGIC_IB_HWE_PCIE1PLLFAILED,
644 			  "PCIePLL1"),
645 	QLOGIC_IB_HWE_MSG(QLOGIC_IB_HWE_PCIE0PLLFAILED,
646 			  "PCIePLL0"),
647 	QLOGIC_IB_HWE_MSG(QLOGIC_IB_HWE_PCIEBUSPARITYXTLH,
648 			  "PCIe XTLH core parity"),
649 	QLOGIC_IB_HWE_MSG(QLOGIC_IB_HWE_PCIEBUSPARITYXADM,
650 			  "PCIe ADM TX core parity"),
651 	QLOGIC_IB_HWE_MSG(QLOGIC_IB_HWE_PCIEBUSPARITYRADM,
652 			  "PCIe ADM RX core parity"),
653 	QLOGIC_IB_HWE_MSG(QLOGIC_IB_HWE_SERDESPLLFAILED,
654 			  "SerDes PLL"),
655 	QLOGIC_IB_HWE_MSG(QLOGIC_IB_HWE_PCIECPLDATAQUEUEERR,
656 			  "PCIe cpl header queue"),
657 	QLOGIC_IB_HWE_MSG(QLOGIC_IB_HWE_PCIECPLHDRQUEUEERR,
658 			  "PCIe cpl data queue"),
659 	QLOGIC_IB_HWE_MSG(QLOGIC_IB_HWE_SDMAMEMREADERR,
660 			  "Send DMA memory read"),
661 	QLOGIC_IB_HWE_MSG(QLOGIC_IB_HWE_CLK_UC_PLLNOTLOCKED,
662 			  "uC PLL clock not locked"),
663 	QLOGIC_IB_HWE_MSG(QLOGIC_IB_HWE_PCIESERDESQ0PCLKNOTDETECT,
664 			  "PCIe serdes Q0 no clock"),
665 	QLOGIC_IB_HWE_MSG(QLOGIC_IB_HWE_PCIESERDESQ1PCLKNOTDETECT,
666 			  "PCIe serdes Q1 no clock"),
667 	QLOGIC_IB_HWE_MSG(QLOGIC_IB_HWE_PCIESERDESQ2PCLKNOTDETECT,
668 			  "PCIe serdes Q2 no clock"),
669 	QLOGIC_IB_HWE_MSG(QLOGIC_IB_HWE_PCIESERDESQ3PCLKNOTDETECT,
670 			  "PCIe serdes Q3 no clock"),
671 	QLOGIC_IB_HWE_MSG(QLOGIC_IB_HWE_DDSRXEQMEMORYPARITYERR,
672 			  "DDS RXEQ memory parity"),
673 	QLOGIC_IB_HWE_MSG(QLOGIC_IB_HWE_IB_UC_MEMORYPARITYERR,
674 			  "IB uC memory parity"),
675 	QLOGIC_IB_HWE_MSG(QLOGIC_IB_HWE_PCIE_UC_OCT0MEMORYPARITYERR,
676 			  "PCIe uC oct0 memory parity"),
677 	QLOGIC_IB_HWE_MSG(QLOGIC_IB_HWE_PCIE_UC_OCT1MEMORYPARITYERR,
678 			  "PCIe uC oct1 memory parity"),
679 };
680 
681 #define RXE_PARITY (RXEMEMPARITYERR_EAGERTID|RXEMEMPARITYERR_EXPTID)
682 
683 #define QLOGIC_IB_E_PKTERRS (\
684 		ERR_MASK(SendPktLenErr) |				\
685 		ERR_MASK(SendDroppedDataPktErr) |			\
686 		ERR_MASK(RcvVCRCErr) |					\
687 		ERR_MASK(RcvICRCErr) |					\
688 		ERR_MASK(RcvShortPktLenErr) |				\
689 		ERR_MASK(RcvEBPErr))
690 
691 /* Convenience for decoding Send DMA errors */
692 #define QLOGIC_IB_E_SDMAERRS ( \
693 		ERR_MASK(SDmaGenMismatchErr) |				\
694 		ERR_MASK(SDmaOutOfBoundErr) |				\
695 		ERR_MASK(SDmaTailOutOfBoundErr) | ERR_MASK(SDmaBaseErr) | \
696 		ERR_MASK(SDma1stDescErr) | ERR_MASK(SDmaRpyTagErr) |	\
697 		ERR_MASK(SDmaDwEnErr) | ERR_MASK(SDmaMissingDwErr) |	\
698 		ERR_MASK(SDmaUnexpDataErr) |				\
699 		ERR_MASK(SDmaDescAddrMisalignErr) |			\
700 		ERR_MASK(SDmaDisabledErr) |				\
701 		ERR_MASK(SendBufMisuseErr))
702 
703 /* These are all rcv-related errors which we want to count for stats */
704 #define E_SUM_PKTERRS \
705 	(ERR_MASK(RcvHdrLenErr) | ERR_MASK(RcvBadTidErr) |		\
706 	 ERR_MASK(RcvBadVersionErr) | ERR_MASK(RcvHdrErr) |		\
707 	 ERR_MASK(RcvLongPktLenErr) | ERR_MASK(RcvShortPktLenErr) |	\
708 	 ERR_MASK(RcvMaxPktLenErr) | ERR_MASK(RcvMinPktLenErr) |	\
709 	 ERR_MASK(RcvFormatErr) | ERR_MASK(RcvUnsupportedVLErr) |	\
710 	 ERR_MASK(RcvUnexpectedCharErr) | ERR_MASK(RcvEBPErr))
711 
712 /* These are all send-related errors which we want to count for stats */
713 #define E_SUM_ERRS \
714 	(ERR_MASK(SendPioArmLaunchErr) | ERR_MASK(SendUnexpectedPktNumErr) | \
715 	 ERR_MASK(SendDroppedDataPktErr) | ERR_MASK(SendDroppedSmpPktErr) | \
716 	 ERR_MASK(SendMaxPktLenErr) | ERR_MASK(SendUnsupportedVLErr) |	\
717 	 ERR_MASK(SendMinPktLenErr) | ERR_MASK(SendPktLenErr) |		\
718 	 ERR_MASK(InvalidAddrErr))
719 
720 /*
721  * this is similar to E_SUM_ERRS, but can't ignore armlaunch, don't ignore
722  * errors not related to freeze and cancelling buffers.  Can't ignore
723  * armlaunch because could get more while still cleaning up, and need
724  * to cancel those as they happen.
725  */
726 #define E_SPKT_ERRS_IGNORE \
727 	(ERR_MASK(SendDroppedDataPktErr) | ERR_MASK(SendDroppedSmpPktErr) | \
728 	 ERR_MASK(SendMaxPktLenErr) | ERR_MASK(SendMinPktLenErr) |	\
729 	 ERR_MASK(SendPktLenErr))
730 
731 /*
732  * these are errors that can occur when the link changes state while
733  * a packet is being sent or received.  This doesn't cover things
734  * like EBP or VCRC that can be the result of a sending having the
735  * link change state, so we receive a "known bad" packet.
736  */
737 #define E_SUM_LINK_PKTERRS \
738 	(ERR_MASK(SendDroppedDataPktErr) | ERR_MASK(SendDroppedSmpPktErr) | \
739 	 ERR_MASK(SendMinPktLenErr) | ERR_MASK(SendPktLenErr) |		\
740 	 ERR_MASK(RcvShortPktLenErr) | ERR_MASK(RcvMinPktLenErr) |	\
741 	 ERR_MASK(RcvUnexpectedCharErr))
742 
743 static void autoneg_7220_work(struct work_struct *);
744 static u32 __iomem *qib_7220_getsendbuf(struct qib_pportdata *, u64, u32 *);
745 
746 /*
747  * Called when we might have an error that is specific to a particular
748  * PIO buffer, and may need to cancel that buffer, so it can be re-used.
749  * because we don't need to force the update of pioavail.
750  */
751 static void qib_disarm_7220_senderrbufs(struct qib_pportdata *ppd)
752 {
753 	unsigned long sbuf[3];
754 	struct qib_devdata *dd = ppd->dd;
755 
756 	/*
757 	 * It's possible that sendbuffererror could have bits set; might
758 	 * have already done this as a result of hardware error handling.
759 	 */
760 	/* read these before writing errorclear */
761 	sbuf[0] = qib_read_kreg64(dd, kr_sendbuffererror);
762 	sbuf[1] = qib_read_kreg64(dd, kr_sendbuffererror + 1);
763 	sbuf[2] = qib_read_kreg64(dd, kr_sendbuffererror + 2);
764 
765 	if (sbuf[0] || sbuf[1] || sbuf[2])
766 		qib_disarm_piobufs_set(dd, sbuf,
767 				       dd->piobcnt2k + dd->piobcnt4k);
768 }
769 
770 static void qib_7220_txe_recover(struct qib_devdata *dd)
771 {
772 	qib_devinfo(dd->pcidev, "Recovering from TXE PIO parity error\n");
773 	qib_disarm_7220_senderrbufs(dd->pport);
774 }
775 
776 /*
777  * This is called with interrupts disabled and sdma_lock held.
778  */
779 static void qib_7220_sdma_sendctrl(struct qib_pportdata *ppd, unsigned op)
780 {
781 	struct qib_devdata *dd = ppd->dd;
782 	u64 set_sendctrl = 0;
783 	u64 clr_sendctrl = 0;
784 
785 	if (op & QIB_SDMA_SENDCTRL_OP_ENABLE)
786 		set_sendctrl |= SYM_MASK(SendCtrl, SDmaEnable);
787 	else
788 		clr_sendctrl |= SYM_MASK(SendCtrl, SDmaEnable);
789 
790 	if (op & QIB_SDMA_SENDCTRL_OP_INTENABLE)
791 		set_sendctrl |= SYM_MASK(SendCtrl, SDmaIntEnable);
792 	else
793 		clr_sendctrl |= SYM_MASK(SendCtrl, SDmaIntEnable);
794 
795 	if (op & QIB_SDMA_SENDCTRL_OP_HALT)
796 		set_sendctrl |= SYM_MASK(SendCtrl, SDmaHalt);
797 	else
798 		clr_sendctrl |= SYM_MASK(SendCtrl, SDmaHalt);
799 
800 	spin_lock(&dd->sendctrl_lock);
801 
802 	dd->sendctrl |= set_sendctrl;
803 	dd->sendctrl &= ~clr_sendctrl;
804 
805 	qib_write_kreg(dd, kr_sendctrl, dd->sendctrl);
806 	qib_write_kreg(dd, kr_scratch, 0);
807 
808 	spin_unlock(&dd->sendctrl_lock);
809 }
810 
811 static void qib_decode_7220_sdma_errs(struct qib_pportdata *ppd,
812 				      u64 err, char *buf, size_t blen)
813 {
814 	static const struct {
815 		u64 err;
816 		const char *msg;
817 	} errs[] = {
818 		{ ERR_MASK(SDmaGenMismatchErr),
819 		  "SDmaGenMismatch" },
820 		{ ERR_MASK(SDmaOutOfBoundErr),
821 		  "SDmaOutOfBound" },
822 		{ ERR_MASK(SDmaTailOutOfBoundErr),
823 		  "SDmaTailOutOfBound" },
824 		{ ERR_MASK(SDmaBaseErr),
825 		  "SDmaBase" },
826 		{ ERR_MASK(SDma1stDescErr),
827 		  "SDma1stDesc" },
828 		{ ERR_MASK(SDmaRpyTagErr),
829 		  "SDmaRpyTag" },
830 		{ ERR_MASK(SDmaDwEnErr),
831 		  "SDmaDwEn" },
832 		{ ERR_MASK(SDmaMissingDwErr),
833 		  "SDmaMissingDw" },
834 		{ ERR_MASK(SDmaUnexpDataErr),
835 		  "SDmaUnexpData" },
836 		{ ERR_MASK(SDmaDescAddrMisalignErr),
837 		  "SDmaDescAddrMisalign" },
838 		{ ERR_MASK(SendBufMisuseErr),
839 		  "SendBufMisuse" },
840 		{ ERR_MASK(SDmaDisabledErr),
841 		  "SDmaDisabled" },
842 	};
843 	int i;
844 	size_t bidx = 0;
845 
846 	for (i = 0; i < ARRAY_SIZE(errs); i++) {
847 		if (err & errs[i].err)
848 			bidx += scnprintf(buf + bidx, blen - bidx,
849 					 "%s ", errs[i].msg);
850 	}
851 }
852 
853 /*
854  * This is called as part of link down clean up so disarm and flush
855  * all send buffers so that SMP packets can be sent.
856  */
857 static void qib_7220_sdma_hw_clean_up(struct qib_pportdata *ppd)
858 {
859 	/* This will trigger the Abort interrupt */
860 	sendctrl_7220_mod(ppd, QIB_SENDCTRL_DISARM_ALL | QIB_SENDCTRL_FLUSH |
861 			  QIB_SENDCTRL_AVAIL_BLIP);
862 	ppd->dd->upd_pio_shadow  = 1; /* update our idea of what's busy */
863 }
864 
865 static void qib_sdma_7220_setlengen(struct qib_pportdata *ppd)
866 {
867 	/*
868 	 * Set SendDmaLenGen and clear and set
869 	 * the MSB of the generation count to enable generation checking
870 	 * and load the internal generation counter.
871 	 */
872 	qib_write_kreg(ppd->dd, kr_senddmalengen, ppd->sdma_descq_cnt);
873 	qib_write_kreg(ppd->dd, kr_senddmalengen,
874 		       ppd->sdma_descq_cnt |
875 		       (1ULL << QIB_7220_SendDmaLenGen_Generation_MSB));
876 }
877 
878 static void qib_7220_sdma_hw_start_up(struct qib_pportdata *ppd)
879 {
880 	qib_sdma_7220_setlengen(ppd);
881 	qib_sdma_update_7220_tail(ppd, 0); /* Set SendDmaTail */
882 	ppd->sdma_head_dma[0] = 0;
883 }
884 
885 #define DISABLES_SDMA (							\
886 		ERR_MASK(SDmaDisabledErr) |				\
887 		ERR_MASK(SDmaBaseErr) |					\
888 		ERR_MASK(SDmaTailOutOfBoundErr) |			\
889 		ERR_MASK(SDmaOutOfBoundErr) |				\
890 		ERR_MASK(SDma1stDescErr) |				\
891 		ERR_MASK(SDmaRpyTagErr) |				\
892 		ERR_MASK(SDmaGenMismatchErr) |				\
893 		ERR_MASK(SDmaDescAddrMisalignErr) |			\
894 		ERR_MASK(SDmaMissingDwErr) |				\
895 		ERR_MASK(SDmaDwEnErr))
896 
897 static void sdma_7220_errors(struct qib_pportdata *ppd, u64 errs)
898 {
899 	unsigned long flags;
900 	struct qib_devdata *dd = ppd->dd;
901 	char *msg;
902 
903 	errs &= QLOGIC_IB_E_SDMAERRS;
904 
905 	msg = dd->cspec->sdmamsgbuf;
906 	qib_decode_7220_sdma_errs(ppd, errs, msg,
907 		sizeof(dd->cspec->sdmamsgbuf));
908 	spin_lock_irqsave(&ppd->sdma_lock, flags);
909 
910 	if (errs & ERR_MASK(SendBufMisuseErr)) {
911 		unsigned long sbuf[3];
912 
913 		sbuf[0] = qib_read_kreg64(dd, kr_sendbuffererror);
914 		sbuf[1] = qib_read_kreg64(dd, kr_sendbuffererror + 1);
915 		sbuf[2] = qib_read_kreg64(dd, kr_sendbuffererror + 2);
916 
917 		qib_dev_err(ppd->dd,
918 			    "IB%u:%u SendBufMisuse: %04lx %016lx %016lx\n",
919 			    ppd->dd->unit, ppd->port, sbuf[2], sbuf[1],
920 			    sbuf[0]);
921 	}
922 
923 	if (errs & ERR_MASK(SDmaUnexpDataErr))
924 		qib_dev_err(dd, "IB%u:%u SDmaUnexpData\n", ppd->dd->unit,
925 			    ppd->port);
926 
927 	switch (ppd->sdma_state.current_state) {
928 	case qib_sdma_state_s00_hw_down:
929 		/* not expecting any interrupts */
930 		break;
931 
932 	case qib_sdma_state_s10_hw_start_up_wait:
933 		/* handled in intr path */
934 		break;
935 
936 	case qib_sdma_state_s20_idle:
937 		/* not expecting any interrupts */
938 		break;
939 
940 	case qib_sdma_state_s30_sw_clean_up_wait:
941 		/* not expecting any interrupts */
942 		break;
943 
944 	case qib_sdma_state_s40_hw_clean_up_wait:
945 		if (errs & ERR_MASK(SDmaDisabledErr))
946 			__qib_sdma_process_event(ppd,
947 				qib_sdma_event_e50_hw_cleaned);
948 		break;
949 
950 	case qib_sdma_state_s50_hw_halt_wait:
951 		/* handled in intr path */
952 		break;
953 
954 	case qib_sdma_state_s99_running:
955 		if (errs & DISABLES_SDMA)
956 			__qib_sdma_process_event(ppd,
957 				qib_sdma_event_e7220_err_halted);
958 		break;
959 	}
960 
961 	spin_unlock_irqrestore(&ppd->sdma_lock, flags);
962 }
963 
964 /*
965  * Decode the error status into strings, deciding whether to always
966  * print * it or not depending on "normal packet errors" vs everything
967  * else.   Return 1 if "real" errors, otherwise 0 if only packet
968  * errors, so caller can decide what to print with the string.
969  */
970 static int qib_decode_7220_err(struct qib_devdata *dd, char *buf, size_t blen,
971 			       u64 err)
972 {
973 	int iserr = 1;
974 
975 	*buf = '\0';
976 	if (err & QLOGIC_IB_E_PKTERRS) {
977 		if (!(err & ~QLOGIC_IB_E_PKTERRS))
978 			iserr = 0;
979 		if ((err & ERR_MASK(RcvICRCErr)) &&
980 		    !(err & (ERR_MASK(RcvVCRCErr) | ERR_MASK(RcvEBPErr))))
981 			strlcat(buf, "CRC ", blen);
982 		if (!iserr)
983 			goto done;
984 	}
985 	if (err & ERR_MASK(RcvHdrLenErr))
986 		strlcat(buf, "rhdrlen ", blen);
987 	if (err & ERR_MASK(RcvBadTidErr))
988 		strlcat(buf, "rbadtid ", blen);
989 	if (err & ERR_MASK(RcvBadVersionErr))
990 		strlcat(buf, "rbadversion ", blen);
991 	if (err & ERR_MASK(RcvHdrErr))
992 		strlcat(buf, "rhdr ", blen);
993 	if (err & ERR_MASK(SendSpecialTriggerErr))
994 		strlcat(buf, "sendspecialtrigger ", blen);
995 	if (err & ERR_MASK(RcvLongPktLenErr))
996 		strlcat(buf, "rlongpktlen ", blen);
997 	if (err & ERR_MASK(RcvMaxPktLenErr))
998 		strlcat(buf, "rmaxpktlen ", blen);
999 	if (err & ERR_MASK(RcvMinPktLenErr))
1000 		strlcat(buf, "rminpktlen ", blen);
1001 	if (err & ERR_MASK(SendMinPktLenErr))
1002 		strlcat(buf, "sminpktlen ", blen);
1003 	if (err & ERR_MASK(RcvFormatErr))
1004 		strlcat(buf, "rformaterr ", blen);
1005 	if (err & ERR_MASK(RcvUnsupportedVLErr))
1006 		strlcat(buf, "runsupvl ", blen);
1007 	if (err & ERR_MASK(RcvUnexpectedCharErr))
1008 		strlcat(buf, "runexpchar ", blen);
1009 	if (err & ERR_MASK(RcvIBFlowErr))
1010 		strlcat(buf, "ribflow ", blen);
1011 	if (err & ERR_MASK(SendUnderRunErr))
1012 		strlcat(buf, "sunderrun ", blen);
1013 	if (err & ERR_MASK(SendPioArmLaunchErr))
1014 		strlcat(buf, "spioarmlaunch ", blen);
1015 	if (err & ERR_MASK(SendUnexpectedPktNumErr))
1016 		strlcat(buf, "sunexperrpktnum ", blen);
1017 	if (err & ERR_MASK(SendDroppedSmpPktErr))
1018 		strlcat(buf, "sdroppedsmppkt ", blen);
1019 	if (err & ERR_MASK(SendMaxPktLenErr))
1020 		strlcat(buf, "smaxpktlen ", blen);
1021 	if (err & ERR_MASK(SendUnsupportedVLErr))
1022 		strlcat(buf, "sunsupVL ", blen);
1023 	if (err & ERR_MASK(InvalidAddrErr))
1024 		strlcat(buf, "invalidaddr ", blen);
1025 	if (err & ERR_MASK(RcvEgrFullErr))
1026 		strlcat(buf, "rcvegrfull ", blen);
1027 	if (err & ERR_MASK(RcvHdrFullErr))
1028 		strlcat(buf, "rcvhdrfull ", blen);
1029 	if (err & ERR_MASK(IBStatusChanged))
1030 		strlcat(buf, "ibcstatuschg ", blen);
1031 	if (err & ERR_MASK(RcvIBLostLinkErr))
1032 		strlcat(buf, "riblostlink ", blen);
1033 	if (err & ERR_MASK(HardwareErr))
1034 		strlcat(buf, "hardware ", blen);
1035 	if (err & ERR_MASK(ResetNegated))
1036 		strlcat(buf, "reset ", blen);
1037 	if (err & QLOGIC_IB_E_SDMAERRS)
1038 		qib_decode_7220_sdma_errs(dd->pport, err, buf, blen);
1039 	if (err & ERR_MASK(InvalidEEPCmd))
1040 		strlcat(buf, "invalideepromcmd ", blen);
1041 done:
1042 	return iserr;
1043 }
1044 
1045 static void reenable_7220_chase(struct timer_list *t)
1046 {
1047 	struct qib_chippport_specific *cpspec = from_timer(cpspec, t,
1048 							 chase_timer);
1049 	struct qib_pportdata *ppd = &cpspec->pportdata;
1050 
1051 	ppd->cpspec->chase_timer.expires = 0;
1052 	qib_set_ib_7220_lstate(ppd, QLOGIC_IB_IBCC_LINKCMD_DOWN,
1053 		QLOGIC_IB_IBCC_LINKINITCMD_POLL);
1054 }
1055 
1056 static void handle_7220_chase(struct qib_pportdata *ppd, u64 ibcst)
1057 {
1058 	u8 ibclt;
1059 	unsigned long tnow;
1060 
1061 	ibclt = (u8)SYM_FIELD(ibcst, IBCStatus, LinkTrainingState);
1062 
1063 	/*
1064 	 * Detect and handle the state chase issue, where we can
1065 	 * get stuck if we are unlucky on timing on both sides of
1066 	 * the link.   If we are, we disable, set a timer, and
1067 	 * then re-enable.
1068 	 */
1069 	switch (ibclt) {
1070 	case IB_7220_LT_STATE_CFGRCVFCFG:
1071 	case IB_7220_LT_STATE_CFGWAITRMT:
1072 	case IB_7220_LT_STATE_TXREVLANES:
1073 	case IB_7220_LT_STATE_CFGENH:
1074 		tnow = jiffies;
1075 		if (ppd->cpspec->chase_end &&
1076 		    time_after(tnow, ppd->cpspec->chase_end)) {
1077 			ppd->cpspec->chase_end = 0;
1078 			qib_set_ib_7220_lstate(ppd,
1079 				QLOGIC_IB_IBCC_LINKCMD_DOWN,
1080 				QLOGIC_IB_IBCC_LINKINITCMD_DISABLE);
1081 			ppd->cpspec->chase_timer.expires = jiffies +
1082 				QIB_CHASE_DIS_TIME;
1083 			add_timer(&ppd->cpspec->chase_timer);
1084 		} else if (!ppd->cpspec->chase_end)
1085 			ppd->cpspec->chase_end = tnow + QIB_CHASE_TIME;
1086 		break;
1087 
1088 	default:
1089 		ppd->cpspec->chase_end = 0;
1090 		break;
1091 	}
1092 }
1093 
1094 static void handle_7220_errors(struct qib_devdata *dd, u64 errs)
1095 {
1096 	char *msg;
1097 	u64 ignore_this_time = 0;
1098 	u64 iserr = 0;
1099 	struct qib_pportdata *ppd = dd->pport;
1100 	u64 mask;
1101 
1102 	/* don't report errors that are masked */
1103 	errs &= dd->cspec->errormask;
1104 	msg = dd->cspec->emsgbuf;
1105 
1106 	/* do these first, they are most important */
1107 	if (errs & ERR_MASK(HardwareErr))
1108 		qib_7220_handle_hwerrors(dd, msg, sizeof(dd->cspec->emsgbuf));
1109 
1110 	if (errs & QLOGIC_IB_E_SDMAERRS)
1111 		sdma_7220_errors(ppd, errs);
1112 
1113 	if (errs & ~IB_E_BITSEXTANT)
1114 		qib_dev_err(dd,
1115 			"error interrupt with unknown errors %llx set\n",
1116 			(unsigned long long) (errs & ~IB_E_BITSEXTANT));
1117 
1118 	if (errs & E_SUM_ERRS) {
1119 		qib_disarm_7220_senderrbufs(ppd);
1120 		if ((errs & E_SUM_LINK_PKTERRS) &&
1121 		    !(ppd->lflags & QIBL_LINKACTIVE)) {
1122 			/*
1123 			 * This can happen when trying to bring the link
1124 			 * up, but the IB link changes state at the "wrong"
1125 			 * time. The IB logic then complains that the packet
1126 			 * isn't valid.  We don't want to confuse people, so
1127 			 * we just don't print them, except at debug
1128 			 */
1129 			ignore_this_time = errs & E_SUM_LINK_PKTERRS;
1130 		}
1131 	} else if ((errs & E_SUM_LINK_PKTERRS) &&
1132 		   !(ppd->lflags & QIBL_LINKACTIVE)) {
1133 		/*
1134 		 * This can happen when SMA is trying to bring the link
1135 		 * up, but the IB link changes state at the "wrong" time.
1136 		 * The IB logic then complains that the packet isn't
1137 		 * valid.  We don't want to confuse people, so we just
1138 		 * don't print them, except at debug
1139 		 */
1140 		ignore_this_time = errs & E_SUM_LINK_PKTERRS;
1141 	}
1142 
1143 	qib_write_kreg(dd, kr_errclear, errs);
1144 
1145 	errs &= ~ignore_this_time;
1146 	if (!errs)
1147 		goto done;
1148 
1149 	/*
1150 	 * The ones we mask off are handled specially below
1151 	 * or above.  Also mask SDMADISABLED by default as it
1152 	 * is too chatty.
1153 	 */
1154 	mask = ERR_MASK(IBStatusChanged) |
1155 		ERR_MASK(RcvEgrFullErr) | ERR_MASK(RcvHdrFullErr) |
1156 		ERR_MASK(HardwareErr) | ERR_MASK(SDmaDisabledErr);
1157 
1158 	qib_decode_7220_err(dd, msg, sizeof(dd->cspec->emsgbuf), errs & ~mask);
1159 
1160 	if (errs & E_SUM_PKTERRS)
1161 		qib_stats.sps_rcverrs++;
1162 	if (errs & E_SUM_ERRS)
1163 		qib_stats.sps_txerrs++;
1164 	iserr = errs & ~(E_SUM_PKTERRS | QLOGIC_IB_E_PKTERRS |
1165 			 ERR_MASK(SDmaDisabledErr));
1166 
1167 	if (errs & ERR_MASK(IBStatusChanged)) {
1168 		u64 ibcs;
1169 
1170 		ibcs = qib_read_kreg64(dd, kr_ibcstatus);
1171 		if (!(ppd->lflags & QIBL_IB_AUTONEG_INPROG))
1172 			handle_7220_chase(ppd, ibcs);
1173 
1174 		/* Update our picture of width and speed from chip */
1175 		ppd->link_width_active =
1176 			((ibcs >> IBA7220_LINKWIDTH_SHIFT) & 1) ?
1177 			    IB_WIDTH_4X : IB_WIDTH_1X;
1178 		ppd->link_speed_active =
1179 			((ibcs >> IBA7220_LINKSPEED_SHIFT) & 1) ?
1180 			    QIB_IB_DDR : QIB_IB_SDR;
1181 
1182 		/*
1183 		 * Since going into a recovery state causes the link state
1184 		 * to go down and since recovery is transitory, it is better
1185 		 * if we "miss" ever seeing the link training state go into
1186 		 * recovery (i.e., ignore this transition for link state
1187 		 * special handling purposes) without updating lastibcstat.
1188 		 */
1189 		if (qib_7220_phys_portstate(ibcs) !=
1190 					    IB_PHYSPORTSTATE_LINK_ERR_RECOVER)
1191 			qib_handle_e_ibstatuschanged(ppd, ibcs);
1192 	}
1193 
1194 	if (errs & ERR_MASK(ResetNegated)) {
1195 		qib_dev_err(dd,
1196 			"Got reset, requires re-init (unload and reload driver)\n");
1197 		dd->flags &= ~QIB_INITTED;  /* needs re-init */
1198 		/* mark as having had error */
1199 		*dd->devstatusp |= QIB_STATUS_HWERROR;
1200 		*dd->pport->statusp &= ~QIB_STATUS_IB_CONF;
1201 	}
1202 
1203 	if (*msg && iserr)
1204 		qib_dev_porterr(dd, ppd->port, "%s error\n", msg);
1205 
1206 	if (ppd->state_wanted & ppd->lflags)
1207 		wake_up_interruptible(&ppd->state_wait);
1208 
1209 	/*
1210 	 * If there were hdrq or egrfull errors, wake up any processes
1211 	 * waiting in poll.  We used to try to check which contexts had
1212 	 * the overflow, but given the cost of that and the chip reads
1213 	 * to support it, it's better to just wake everybody up if we
1214 	 * get an overflow; waiters can poll again if it's not them.
1215 	 */
1216 	if (errs & (ERR_MASK(RcvEgrFullErr) | ERR_MASK(RcvHdrFullErr))) {
1217 		qib_handle_urcv(dd, ~0U);
1218 		if (errs & ERR_MASK(RcvEgrFullErr))
1219 			qib_stats.sps_buffull++;
1220 		else
1221 			qib_stats.sps_hdrfull++;
1222 	}
1223 done:
1224 	return;
1225 }
1226 
1227 /* enable/disable chip from delivering interrupts */
1228 static void qib_7220_set_intr_state(struct qib_devdata *dd, u32 enable)
1229 {
1230 	if (enable) {
1231 		if (dd->flags & QIB_BADINTR)
1232 			return;
1233 		qib_write_kreg(dd, kr_intmask, ~0ULL);
1234 		/* force re-interrupt of any pending interrupts. */
1235 		qib_write_kreg(dd, kr_intclear, 0ULL);
1236 	} else
1237 		qib_write_kreg(dd, kr_intmask, 0ULL);
1238 }
1239 
1240 /*
1241  * Try to cleanup as much as possible for anything that might have gone
1242  * wrong while in freeze mode, such as pio buffers being written by user
1243  * processes (causing armlaunch), send errors due to going into freeze mode,
1244  * etc., and try to avoid causing extra interrupts while doing so.
1245  * Forcibly update the in-memory pioavail register copies after cleanup
1246  * because the chip won't do it while in freeze mode (the register values
1247  * themselves are kept correct).
1248  * Make sure that we don't lose any important interrupts by using the chip
1249  * feature that says that writing 0 to a bit in *clear that is set in
1250  * *status will cause an interrupt to be generated again (if allowed by
1251  * the *mask value).
1252  * This is in chip-specific code because of all of the register accesses,
1253  * even though the details are similar on most chips.
1254  */
1255 static void qib_7220_clear_freeze(struct qib_devdata *dd)
1256 {
1257 	/* disable error interrupts, to avoid confusion */
1258 	qib_write_kreg(dd, kr_errmask, 0ULL);
1259 
1260 	/* also disable interrupts; errormask is sometimes overwritten */
1261 	qib_7220_set_intr_state(dd, 0);
1262 
1263 	qib_cancel_sends(dd->pport);
1264 
1265 	/* clear the freeze, and be sure chip saw it */
1266 	qib_write_kreg(dd, kr_control, dd->control);
1267 	qib_read_kreg32(dd, kr_scratch);
1268 
1269 	/* force in-memory update now we are out of freeze */
1270 	qib_force_pio_avail_update(dd);
1271 
1272 	/*
1273 	 * force new interrupt if any hwerr, error or interrupt bits are
1274 	 * still set, and clear "safe" send packet errors related to freeze
1275 	 * and cancelling sends.  Re-enable error interrupts before possible
1276 	 * force of re-interrupt on pending interrupts.
1277 	 */
1278 	qib_write_kreg(dd, kr_hwerrclear, 0ULL);
1279 	qib_write_kreg(dd, kr_errclear, E_SPKT_ERRS_IGNORE);
1280 	qib_write_kreg(dd, kr_errmask, dd->cspec->errormask);
1281 	qib_7220_set_intr_state(dd, 1);
1282 }
1283 
1284 /**
1285  * qib_7220_handle_hwerrors - display hardware errors.
1286  * @dd: the qlogic_ib device
1287  * @msg: the output buffer
1288  * @msgl: the size of the output buffer
1289  *
1290  * Use same msg buffer as regular errors to avoid excessive stack
1291  * use.  Most hardware errors are catastrophic, but for right now,
1292  * we'll print them and continue.  We reuse the same message buffer as
1293  * handle_7220_errors() to avoid excessive stack usage.
1294  */
1295 static void qib_7220_handle_hwerrors(struct qib_devdata *dd, char *msg,
1296 				     size_t msgl)
1297 {
1298 	u64 hwerrs;
1299 	u32 bits, ctrl;
1300 	int isfatal = 0;
1301 	char *bitsmsg;
1302 
1303 	hwerrs = qib_read_kreg64(dd, kr_hwerrstatus);
1304 	if (!hwerrs)
1305 		goto bail;
1306 	if (hwerrs == ~0ULL) {
1307 		qib_dev_err(dd,
1308 			"Read of hardware error status failed (all bits set); ignoring\n");
1309 		goto bail;
1310 	}
1311 	qib_stats.sps_hwerrs++;
1312 
1313 	/*
1314 	 * Always clear the error status register, except MEMBISTFAIL,
1315 	 * regardless of whether we continue or stop using the chip.
1316 	 * We want that set so we know it failed, even across driver reload.
1317 	 * We'll still ignore it in the hwerrmask.  We do this partly for
1318 	 * diagnostics, but also for support.
1319 	 */
1320 	qib_write_kreg(dd, kr_hwerrclear,
1321 		       hwerrs & ~HWE_MASK(PowerOnBISTFailed));
1322 
1323 	hwerrs &= dd->cspec->hwerrmask;
1324 
1325 	if (hwerrs & ~(TXEMEMPARITYERR_PIOBUF | TXEMEMPARITYERR_PIOPBC |
1326 		       RXE_PARITY))
1327 		qib_devinfo(dd->pcidev,
1328 			"Hardware error: hwerr=0x%llx (cleared)\n",
1329 			(unsigned long long) hwerrs);
1330 
1331 	if (hwerrs & ~IB_HWE_BITSEXTANT)
1332 		qib_dev_err(dd,
1333 			"hwerror interrupt with unknown errors %llx set\n",
1334 			(unsigned long long) (hwerrs & ~IB_HWE_BITSEXTANT));
1335 
1336 	if (hwerrs & QLOGIC_IB_HWE_IB_UC_MEMORYPARITYERR)
1337 		qib_sd7220_clr_ibpar(dd);
1338 
1339 	ctrl = qib_read_kreg32(dd, kr_control);
1340 	if ((ctrl & QLOGIC_IB_C_FREEZEMODE) && !dd->diag_client) {
1341 		/*
1342 		 * Parity errors in send memory are recoverable by h/w
1343 		 * just do housekeeping, exit freeze mode and continue.
1344 		 */
1345 		if (hwerrs & (TXEMEMPARITYERR_PIOBUF |
1346 			      TXEMEMPARITYERR_PIOPBC)) {
1347 			qib_7220_txe_recover(dd);
1348 			hwerrs &= ~(TXEMEMPARITYERR_PIOBUF |
1349 				    TXEMEMPARITYERR_PIOPBC);
1350 		}
1351 		if (hwerrs)
1352 			isfatal = 1;
1353 		else
1354 			qib_7220_clear_freeze(dd);
1355 	}
1356 
1357 	*msg = '\0';
1358 
1359 	if (hwerrs & HWE_MASK(PowerOnBISTFailed)) {
1360 		isfatal = 1;
1361 		strlcat(msg,
1362 			"[Memory BIST test failed, InfiniPath hardware unusable]",
1363 			msgl);
1364 		/* ignore from now on, so disable until driver reloaded */
1365 		dd->cspec->hwerrmask &= ~HWE_MASK(PowerOnBISTFailed);
1366 		qib_write_kreg(dd, kr_hwerrmask, dd->cspec->hwerrmask);
1367 	}
1368 
1369 	qib_format_hwerrors(hwerrs, qib_7220_hwerror_msgs,
1370 			    ARRAY_SIZE(qib_7220_hwerror_msgs), msg, msgl);
1371 
1372 	bitsmsg = dd->cspec->bitsmsgbuf;
1373 	if (hwerrs & (QLOGIC_IB_HWE_PCIEMEMPARITYERR_MASK <<
1374 		      QLOGIC_IB_HWE_PCIEMEMPARITYERR_SHIFT)) {
1375 		bits = (u32) ((hwerrs >>
1376 			       QLOGIC_IB_HWE_PCIEMEMPARITYERR_SHIFT) &
1377 			      QLOGIC_IB_HWE_PCIEMEMPARITYERR_MASK);
1378 		snprintf(bitsmsg, sizeof(dd->cspec->bitsmsgbuf),
1379 			 "[PCIe Mem Parity Errs %x] ", bits);
1380 		strlcat(msg, bitsmsg, msgl);
1381 	}
1382 
1383 #define _QIB_PLL_FAIL (QLOGIC_IB_HWE_COREPLL_FBSLIP |   \
1384 			 QLOGIC_IB_HWE_COREPLL_RFSLIP)
1385 
1386 	if (hwerrs & _QIB_PLL_FAIL) {
1387 		isfatal = 1;
1388 		snprintf(bitsmsg, sizeof(dd->cspec->bitsmsgbuf),
1389 			 "[PLL failed (%llx), InfiniPath hardware unusable]",
1390 			 (unsigned long long) hwerrs & _QIB_PLL_FAIL);
1391 		strlcat(msg, bitsmsg, msgl);
1392 		/* ignore from now on, so disable until driver reloaded */
1393 		dd->cspec->hwerrmask &= ~(hwerrs & _QIB_PLL_FAIL);
1394 		qib_write_kreg(dd, kr_hwerrmask, dd->cspec->hwerrmask);
1395 	}
1396 
1397 	if (hwerrs & QLOGIC_IB_HWE_SERDESPLLFAILED) {
1398 		/*
1399 		 * If it occurs, it is left masked since the eternal
1400 		 * interface is unused.
1401 		 */
1402 		dd->cspec->hwerrmask &= ~QLOGIC_IB_HWE_SERDESPLLFAILED;
1403 		qib_write_kreg(dd, kr_hwerrmask, dd->cspec->hwerrmask);
1404 	}
1405 
1406 	qib_dev_err(dd, "%s hardware error\n", msg);
1407 
1408 	if (isfatal && !dd->diag_client) {
1409 		qib_dev_err(dd,
1410 			"Fatal Hardware Error, no longer usable, SN %.16s\n",
1411 			dd->serial);
1412 		/*
1413 		 * For /sys status file and user programs to print; if no
1414 		 * trailing brace is copied, we'll know it was truncated.
1415 		 */
1416 		if (dd->freezemsg)
1417 			snprintf(dd->freezemsg, dd->freezelen,
1418 				 "{%s}", msg);
1419 		qib_disable_after_error(dd);
1420 	}
1421 bail:;
1422 }
1423 
1424 /**
1425  * qib_7220_init_hwerrors - enable hardware errors
1426  * @dd: the qlogic_ib device
1427  *
1428  * now that we have finished initializing everything that might reasonably
1429  * cause a hardware error, and cleared those errors bits as they occur,
1430  * we can enable hardware errors in the mask (potentially enabling
1431  * freeze mode), and enable hardware errors as errors (along with
1432  * everything else) in errormask
1433  */
1434 static void qib_7220_init_hwerrors(struct qib_devdata *dd)
1435 {
1436 	u64 val;
1437 	u64 extsval;
1438 
1439 	extsval = qib_read_kreg64(dd, kr_extstatus);
1440 
1441 	if (!(extsval & (QLOGIC_IB_EXTS_MEMBIST_ENDTEST |
1442 			 QLOGIC_IB_EXTS_MEMBIST_DISABLED)))
1443 		qib_dev_err(dd, "MemBIST did not complete!\n");
1444 	if (extsval & QLOGIC_IB_EXTS_MEMBIST_DISABLED)
1445 		qib_devinfo(dd->pcidev, "MemBIST is disabled.\n");
1446 
1447 	val = ~0ULL;    /* default to all hwerrors become interrupts, */
1448 
1449 	val &= ~QLOGIC_IB_HWE_IB_UC_MEMORYPARITYERR;
1450 	dd->cspec->hwerrmask = val;
1451 
1452 	qib_write_kreg(dd, kr_hwerrclear, ~HWE_MASK(PowerOnBISTFailed));
1453 	qib_write_kreg(dd, kr_hwerrmask, dd->cspec->hwerrmask);
1454 
1455 	/* clear all */
1456 	qib_write_kreg(dd, kr_errclear, ~0ULL);
1457 	/* enable errors that are masked, at least this first time. */
1458 	qib_write_kreg(dd, kr_errmask, ~0ULL);
1459 	dd->cspec->errormask = qib_read_kreg64(dd, kr_errmask);
1460 	/* clear any interrupts up to this point (ints still not enabled) */
1461 	qib_write_kreg(dd, kr_intclear, ~0ULL);
1462 }
1463 
1464 /*
1465  * Disable and enable the armlaunch error.  Used for PIO bandwidth testing
1466  * on chips that are count-based, rather than trigger-based.  There is no
1467  * reference counting, but that's also fine, given the intended use.
1468  * Only chip-specific because it's all register accesses
1469  */
1470 static void qib_set_7220_armlaunch(struct qib_devdata *dd, u32 enable)
1471 {
1472 	if (enable) {
1473 		qib_write_kreg(dd, kr_errclear, ERR_MASK(SendPioArmLaunchErr));
1474 		dd->cspec->errormask |= ERR_MASK(SendPioArmLaunchErr);
1475 	} else
1476 		dd->cspec->errormask &= ~ERR_MASK(SendPioArmLaunchErr);
1477 	qib_write_kreg(dd, kr_errmask, dd->cspec->errormask);
1478 }
1479 
1480 /*
1481  * Formerly took parameter <which> in pre-shifted,
1482  * pre-merged form with LinkCmd and LinkInitCmd
1483  * together, and assuming the zero was NOP.
1484  */
1485 static void qib_set_ib_7220_lstate(struct qib_pportdata *ppd, u16 linkcmd,
1486 				   u16 linitcmd)
1487 {
1488 	u64 mod_wd;
1489 	struct qib_devdata *dd = ppd->dd;
1490 	unsigned long flags;
1491 
1492 	if (linitcmd == QLOGIC_IB_IBCC_LINKINITCMD_DISABLE) {
1493 		/*
1494 		 * If we are told to disable, note that so link-recovery
1495 		 * code does not attempt to bring us back up.
1496 		 */
1497 		spin_lock_irqsave(&ppd->lflags_lock, flags);
1498 		ppd->lflags |= QIBL_IB_LINK_DISABLED;
1499 		spin_unlock_irqrestore(&ppd->lflags_lock, flags);
1500 	} else if (linitcmd || linkcmd == QLOGIC_IB_IBCC_LINKCMD_DOWN) {
1501 		/*
1502 		 * Any other linkinitcmd will lead to LINKDOWN and then
1503 		 * to INIT (if all is well), so clear flag to let
1504 		 * link-recovery code attempt to bring us back up.
1505 		 */
1506 		spin_lock_irqsave(&ppd->lflags_lock, flags);
1507 		ppd->lflags &= ~QIBL_IB_LINK_DISABLED;
1508 		spin_unlock_irqrestore(&ppd->lflags_lock, flags);
1509 	}
1510 
1511 	mod_wd = (linkcmd << IBA7220_IBCC_LINKCMD_SHIFT) |
1512 		(linitcmd << QLOGIC_IB_IBCC_LINKINITCMD_SHIFT);
1513 
1514 	qib_write_kreg(dd, kr_ibcctrl, ppd->cpspec->ibcctrl | mod_wd);
1515 	/* write to chip to prevent back-to-back writes of ibc reg */
1516 	qib_write_kreg(dd, kr_scratch, 0);
1517 }
1518 
1519 /*
1520  * All detailed interaction with the SerDes has been moved to qib_sd7220.c
1521  *
1522  * The portion of IBA7220-specific bringup_serdes() that actually deals with
1523  * registers and memory within the SerDes itself is qib_sd7220_init().
1524  */
1525 
1526 /**
1527  * qib_7220_bringup_serdes - bring up the serdes
1528  * @ppd: physical port on the qlogic_ib device
1529  */
1530 static int qib_7220_bringup_serdes(struct qib_pportdata *ppd)
1531 {
1532 	struct qib_devdata *dd = ppd->dd;
1533 	u64 val, prev_val, guid, ibc;
1534 	int ret = 0;
1535 
1536 	/* Put IBC in reset, sends disabled */
1537 	dd->control &= ~QLOGIC_IB_C_LINKENABLE;
1538 	qib_write_kreg(dd, kr_control, 0ULL);
1539 
1540 	if (qib_compat_ddr_negotiate) {
1541 		ppd->cpspec->ibdeltainprog = 1;
1542 		ppd->cpspec->ibsymsnap = read_7220_creg32(dd, cr_ibsymbolerr);
1543 		ppd->cpspec->iblnkerrsnap =
1544 			read_7220_creg32(dd, cr_iblinkerrrecov);
1545 	}
1546 
1547 	/* flowcontrolwatermark is in units of KBytes */
1548 	ibc = 0x5ULL << SYM_LSB(IBCCtrl, FlowCtrlWaterMark);
1549 	/*
1550 	 * How often flowctrl sent.  More or less in usecs; balance against
1551 	 * watermark value, so that in theory senders always get a flow
1552 	 * control update in time to not let the IB link go idle.
1553 	 */
1554 	ibc |= 0x3ULL << SYM_LSB(IBCCtrl, FlowCtrlPeriod);
1555 	/* max error tolerance */
1556 	ibc |= 0xfULL << SYM_LSB(IBCCtrl, PhyerrThreshold);
1557 	/* use "real" buffer space for */
1558 	ibc |= 4ULL << SYM_LSB(IBCCtrl, CreditScale);
1559 	/* IB credit flow control. */
1560 	ibc |= 0xfULL << SYM_LSB(IBCCtrl, OverrunThreshold);
1561 	/*
1562 	 * set initial max size pkt IBC will send, including ICRC; it's the
1563 	 * PIO buffer size in dwords, less 1; also see qib_set_mtu()
1564 	 */
1565 	ibc |= ((u64)(ppd->ibmaxlen >> 2) + 1) << SYM_LSB(IBCCtrl, MaxPktLen);
1566 	ppd->cpspec->ibcctrl = ibc; /* without linkcmd or linkinitcmd! */
1567 
1568 	/* initially come up waiting for TS1, without sending anything. */
1569 	val = ppd->cpspec->ibcctrl | (QLOGIC_IB_IBCC_LINKINITCMD_DISABLE <<
1570 		QLOGIC_IB_IBCC_LINKINITCMD_SHIFT);
1571 	qib_write_kreg(dd, kr_ibcctrl, val);
1572 
1573 	if (!ppd->cpspec->ibcddrctrl) {
1574 		/* not on re-init after reset */
1575 		ppd->cpspec->ibcddrctrl = qib_read_kreg64(dd, kr_ibcddrctrl);
1576 
1577 		if (ppd->link_speed_enabled == (QIB_IB_SDR | QIB_IB_DDR))
1578 			ppd->cpspec->ibcddrctrl |=
1579 				IBA7220_IBC_SPEED_AUTONEG_MASK |
1580 				IBA7220_IBC_IBTA_1_2_MASK;
1581 		else
1582 			ppd->cpspec->ibcddrctrl |=
1583 				ppd->link_speed_enabled == QIB_IB_DDR ?
1584 				IBA7220_IBC_SPEED_DDR : IBA7220_IBC_SPEED_SDR;
1585 		if ((ppd->link_width_enabled & (IB_WIDTH_1X | IB_WIDTH_4X)) ==
1586 		    (IB_WIDTH_1X | IB_WIDTH_4X))
1587 			ppd->cpspec->ibcddrctrl |= IBA7220_IBC_WIDTH_AUTONEG;
1588 		else
1589 			ppd->cpspec->ibcddrctrl |=
1590 				ppd->link_width_enabled == IB_WIDTH_4X ?
1591 				IBA7220_IBC_WIDTH_4X_ONLY :
1592 				IBA7220_IBC_WIDTH_1X_ONLY;
1593 
1594 		/* always enable these on driver reload, not sticky */
1595 		ppd->cpspec->ibcddrctrl |=
1596 			IBA7220_IBC_RXPOL_MASK << IBA7220_IBC_RXPOL_SHIFT;
1597 		ppd->cpspec->ibcddrctrl |=
1598 			IBA7220_IBC_HRTBT_MASK << IBA7220_IBC_HRTBT_SHIFT;
1599 
1600 		/* enable automatic lane reversal detection for receive */
1601 		ppd->cpspec->ibcddrctrl |= IBA7220_IBC_LANE_REV_SUPPORTED;
1602 	} else
1603 		/* write to chip to prevent back-to-back writes of ibc reg */
1604 		qib_write_kreg(dd, kr_scratch, 0);
1605 
1606 	qib_write_kreg(dd, kr_ibcddrctrl, ppd->cpspec->ibcddrctrl);
1607 	qib_write_kreg(dd, kr_scratch, 0);
1608 
1609 	qib_write_kreg(dd, kr_ncmodectrl, 0Ull);
1610 	qib_write_kreg(dd, kr_scratch, 0);
1611 
1612 	ret = qib_sd7220_init(dd);
1613 
1614 	val = qib_read_kreg64(dd, kr_xgxs_cfg);
1615 	prev_val = val;
1616 	val |= QLOGIC_IB_XGXS_FC_SAFE;
1617 	if (val != prev_val) {
1618 		qib_write_kreg(dd, kr_xgxs_cfg, val);
1619 		qib_read_kreg32(dd, kr_scratch);
1620 	}
1621 	if (val & QLOGIC_IB_XGXS_RESET)
1622 		val &= ~QLOGIC_IB_XGXS_RESET;
1623 	if (val != prev_val)
1624 		qib_write_kreg(dd, kr_xgxs_cfg, val);
1625 
1626 	/* first time through, set port guid */
1627 	if (!ppd->guid)
1628 		ppd->guid = dd->base_guid;
1629 	guid = be64_to_cpu(ppd->guid);
1630 
1631 	qib_write_kreg(dd, kr_hrtbt_guid, guid);
1632 	if (!ret) {
1633 		dd->control |= QLOGIC_IB_C_LINKENABLE;
1634 		qib_write_kreg(dd, kr_control, dd->control);
1635 	} else
1636 		/* write to chip to prevent back-to-back writes of ibc reg */
1637 		qib_write_kreg(dd, kr_scratch, 0);
1638 	return ret;
1639 }
1640 
1641 /**
1642  * qib_7220_quiet_serdes - set serdes to txidle
1643  * @ppd: physical port of the qlogic_ib device
1644  * Called when driver is being unloaded
1645  */
1646 static void qib_7220_quiet_serdes(struct qib_pportdata *ppd)
1647 {
1648 	u64 val;
1649 	struct qib_devdata *dd = ppd->dd;
1650 	unsigned long flags;
1651 
1652 	/* disable IBC */
1653 	dd->control &= ~QLOGIC_IB_C_LINKENABLE;
1654 	qib_write_kreg(dd, kr_control,
1655 		       dd->control | QLOGIC_IB_C_FREEZEMODE);
1656 
1657 	ppd->cpspec->chase_end = 0;
1658 	if (ppd->cpspec->chase_timer.function) /* if initted */
1659 		del_timer_sync(&ppd->cpspec->chase_timer);
1660 
1661 	if (ppd->cpspec->ibsymdelta || ppd->cpspec->iblnkerrdelta ||
1662 	    ppd->cpspec->ibdeltainprog) {
1663 		u64 diagc;
1664 
1665 		/* enable counter writes */
1666 		diagc = qib_read_kreg64(dd, kr_hwdiagctrl);
1667 		qib_write_kreg(dd, kr_hwdiagctrl,
1668 			       diagc | SYM_MASK(HwDiagCtrl, CounterWrEnable));
1669 
1670 		if (ppd->cpspec->ibsymdelta || ppd->cpspec->ibdeltainprog) {
1671 			val = read_7220_creg32(dd, cr_ibsymbolerr);
1672 			if (ppd->cpspec->ibdeltainprog)
1673 				val -= val - ppd->cpspec->ibsymsnap;
1674 			val -= ppd->cpspec->ibsymdelta;
1675 			write_7220_creg(dd, cr_ibsymbolerr, val);
1676 		}
1677 		if (ppd->cpspec->iblnkerrdelta || ppd->cpspec->ibdeltainprog) {
1678 			val = read_7220_creg32(dd, cr_iblinkerrrecov);
1679 			if (ppd->cpspec->ibdeltainprog)
1680 				val -= val - ppd->cpspec->iblnkerrsnap;
1681 			val -= ppd->cpspec->iblnkerrdelta;
1682 			write_7220_creg(dd, cr_iblinkerrrecov, val);
1683 		}
1684 
1685 		/* and disable counter writes */
1686 		qib_write_kreg(dd, kr_hwdiagctrl, diagc);
1687 	}
1688 	qib_set_ib_7220_lstate(ppd, 0, QLOGIC_IB_IBCC_LINKINITCMD_DISABLE);
1689 
1690 	spin_lock_irqsave(&ppd->lflags_lock, flags);
1691 	ppd->lflags &= ~QIBL_IB_AUTONEG_INPROG;
1692 	spin_unlock_irqrestore(&ppd->lflags_lock, flags);
1693 	wake_up(&ppd->cpspec->autoneg_wait);
1694 	cancel_delayed_work_sync(&ppd->cpspec->autoneg_work);
1695 
1696 	shutdown_7220_relock_poll(ppd->dd);
1697 	val = qib_read_kreg64(ppd->dd, kr_xgxs_cfg);
1698 	val |= QLOGIC_IB_XGXS_RESET;
1699 	qib_write_kreg(ppd->dd, kr_xgxs_cfg, val);
1700 }
1701 
1702 /**
1703  * qib_setup_7220_setextled - set the state of the two external LEDs
1704  * @dd: the qlogic_ib device
1705  * @on: whether the link is up or not
1706  *
1707  * The exact combo of LEDs if on is true is determined by looking
1708  * at the ibcstatus.
1709  *
1710  * These LEDs indicate the physical and logical state of IB link.
1711  * For this chip (at least with recommended board pinouts), LED1
1712  * is Yellow (logical state) and LED2 is Green (physical state),
1713  *
1714  * Note:  We try to match the Mellanox HCA LED behavior as best
1715  * we can.  Green indicates physical link state is OK (something is
1716  * plugged in, and we can train).
1717  * Amber indicates the link is logically up (ACTIVE).
1718  * Mellanox further blinks the amber LED to indicate data packet
1719  * activity, but we have no hardware support for that, so it would
1720  * require waking up every 10-20 msecs and checking the counters
1721  * on the chip, and then turning the LED off if appropriate.  That's
1722  * visible overhead, so not something we will do.
1723  *
1724  */
1725 static void qib_setup_7220_setextled(struct qib_pportdata *ppd, u32 on)
1726 {
1727 	struct qib_devdata *dd = ppd->dd;
1728 	u64 extctl, ledblink = 0, val, lst, ltst;
1729 	unsigned long flags;
1730 
1731 	/*
1732 	 * The diags use the LED to indicate diag info, so we leave
1733 	 * the external LED alone when the diags are running.
1734 	 */
1735 	if (dd->diag_client)
1736 		return;
1737 
1738 	if (ppd->led_override) {
1739 		ltst = (ppd->led_override & QIB_LED_PHYS) ?
1740 			IB_PHYSPORTSTATE_LINKUP : IB_PHYSPORTSTATE_DISABLED,
1741 		lst = (ppd->led_override & QIB_LED_LOG) ?
1742 			IB_PORT_ACTIVE : IB_PORT_DOWN;
1743 	} else if (on) {
1744 		val = qib_read_kreg64(dd, kr_ibcstatus);
1745 		ltst = qib_7220_phys_portstate(val);
1746 		lst = qib_7220_iblink_state(val);
1747 	} else {
1748 		ltst = 0;
1749 		lst = 0;
1750 	}
1751 
1752 	spin_lock_irqsave(&dd->cspec->gpio_lock, flags);
1753 	extctl = dd->cspec->extctrl & ~(SYM_MASK(EXTCtrl, LEDPriPortGreenOn) |
1754 				 SYM_MASK(EXTCtrl, LEDPriPortYellowOn));
1755 	if (ltst == IB_PHYSPORTSTATE_LINKUP) {
1756 		extctl |= SYM_MASK(EXTCtrl, LEDPriPortGreenOn);
1757 		/*
1758 		 * counts are in chip clock (4ns) periods.
1759 		 * This is 1/16 sec (66.6ms) on,
1760 		 * 3/16 sec (187.5 ms) off, with packets rcvd
1761 		 */
1762 		ledblink = ((66600 * 1000UL / 4) << IBA7220_LEDBLINK_ON_SHIFT)
1763 			| ((187500 * 1000UL / 4) << IBA7220_LEDBLINK_OFF_SHIFT);
1764 	}
1765 	if (lst == IB_PORT_ACTIVE)
1766 		extctl |= SYM_MASK(EXTCtrl, LEDPriPortYellowOn);
1767 	dd->cspec->extctrl = extctl;
1768 	qib_write_kreg(dd, kr_extctrl, extctl);
1769 	spin_unlock_irqrestore(&dd->cspec->gpio_lock, flags);
1770 
1771 	if (ledblink) /* blink the LED on packet receive */
1772 		qib_write_kreg(dd, kr_rcvpktledcnt, ledblink);
1773 }
1774 
1775 /*
1776  * qib_setup_7220_cleanup - clean up any per-chip chip-specific stuff
1777  * @dd: the qlogic_ib device
1778  *
1779  * This is called during driver unload.
1780  *
1781  */
1782 static void qib_setup_7220_cleanup(struct qib_devdata *dd)
1783 {
1784 	qib_free_irq(dd);
1785 	kfree(dd->cspec->cntrs);
1786 	kfree(dd->cspec->portcntrs);
1787 }
1788 
1789 /*
1790  * This is only called for SDmaInt.
1791  * SDmaDisabled is handled on the error path.
1792  */
1793 static void sdma_7220_intr(struct qib_pportdata *ppd, u64 istat)
1794 {
1795 	unsigned long flags;
1796 
1797 	spin_lock_irqsave(&ppd->sdma_lock, flags);
1798 
1799 	switch (ppd->sdma_state.current_state) {
1800 	case qib_sdma_state_s00_hw_down:
1801 		break;
1802 
1803 	case qib_sdma_state_s10_hw_start_up_wait:
1804 		__qib_sdma_process_event(ppd, qib_sdma_event_e20_hw_started);
1805 		break;
1806 
1807 	case qib_sdma_state_s20_idle:
1808 		break;
1809 
1810 	case qib_sdma_state_s30_sw_clean_up_wait:
1811 		break;
1812 
1813 	case qib_sdma_state_s40_hw_clean_up_wait:
1814 		break;
1815 
1816 	case qib_sdma_state_s50_hw_halt_wait:
1817 		__qib_sdma_process_event(ppd, qib_sdma_event_e60_hw_halted);
1818 		break;
1819 
1820 	case qib_sdma_state_s99_running:
1821 		/* too chatty to print here */
1822 		__qib_sdma_intr(ppd);
1823 		break;
1824 	}
1825 	spin_unlock_irqrestore(&ppd->sdma_lock, flags);
1826 }
1827 
1828 static void qib_wantpiobuf_7220_intr(struct qib_devdata *dd, u32 needint)
1829 {
1830 	unsigned long flags;
1831 
1832 	spin_lock_irqsave(&dd->sendctrl_lock, flags);
1833 	if (needint) {
1834 		if (!(dd->sendctrl & SYM_MASK(SendCtrl, SendBufAvailUpd)))
1835 			goto done;
1836 		/*
1837 		 * blip the availupd off, next write will be on, so
1838 		 * we ensure an avail update, regardless of threshold or
1839 		 * buffers becoming free, whenever we want an interrupt
1840 		 */
1841 		qib_write_kreg(dd, kr_sendctrl, dd->sendctrl &
1842 			~SYM_MASK(SendCtrl, SendBufAvailUpd));
1843 		qib_write_kreg(dd, kr_scratch, 0ULL);
1844 		dd->sendctrl |= SYM_MASK(SendCtrl, SendIntBufAvail);
1845 	} else
1846 		dd->sendctrl &= ~SYM_MASK(SendCtrl, SendIntBufAvail);
1847 	qib_write_kreg(dd, kr_sendctrl, dd->sendctrl);
1848 	qib_write_kreg(dd, kr_scratch, 0ULL);
1849 done:
1850 	spin_unlock_irqrestore(&dd->sendctrl_lock, flags);
1851 }
1852 
1853 /*
1854  * Handle errors and unusual events first, separate function
1855  * to improve cache hits for fast path interrupt handling.
1856  */
1857 static noinline void unlikely_7220_intr(struct qib_devdata *dd, u64 istat)
1858 {
1859 	if (unlikely(istat & ~QLOGIC_IB_I_BITSEXTANT))
1860 		qib_dev_err(dd,
1861 			    "interrupt with unknown interrupts %Lx set\n",
1862 			    istat & ~QLOGIC_IB_I_BITSEXTANT);
1863 
1864 	if (istat & QLOGIC_IB_I_GPIO) {
1865 		u32 gpiostatus;
1866 
1867 		/*
1868 		 * Boards for this chip currently don't use GPIO interrupts,
1869 		 * so clear by writing GPIOstatus to GPIOclear, and complain
1870 		 * to alert developer. To avoid endless repeats, clear
1871 		 * the bits in the mask, since there is some kind of
1872 		 * programming error or chip problem.
1873 		 */
1874 		gpiostatus = qib_read_kreg32(dd, kr_gpio_status);
1875 		/*
1876 		 * In theory, writing GPIOstatus to GPIOclear could
1877 		 * have a bad side-effect on some diagnostic that wanted
1878 		 * to poll for a status-change, but the various shadows
1879 		 * make that problematic at best. Diags will just suppress
1880 		 * all GPIO interrupts during such tests.
1881 		 */
1882 		qib_write_kreg(dd, kr_gpio_clear, gpiostatus);
1883 
1884 		if (gpiostatus) {
1885 			const u32 mask = qib_read_kreg32(dd, kr_gpio_mask);
1886 			u32 gpio_irq = mask & gpiostatus;
1887 
1888 			/*
1889 			 * A bit set in status and (chip) Mask register
1890 			 * would cause an interrupt. Since we are not
1891 			 * expecting any, report it. Also check that the
1892 			 * chip reflects our shadow, report issues,
1893 			 * and refresh from the shadow.
1894 			 */
1895 			/*
1896 			 * Clear any troublemakers, and update chip
1897 			 * from shadow
1898 			 */
1899 			dd->cspec->gpio_mask &= ~gpio_irq;
1900 			qib_write_kreg(dd, kr_gpio_mask, dd->cspec->gpio_mask);
1901 		}
1902 	}
1903 
1904 	if (istat & QLOGIC_IB_I_ERROR) {
1905 		u64 estat;
1906 
1907 		qib_stats.sps_errints++;
1908 		estat = qib_read_kreg64(dd, kr_errstatus);
1909 		if (!estat)
1910 			qib_devinfo(dd->pcidev,
1911 				"error interrupt (%Lx), but no error bits set!\n",
1912 				istat);
1913 		else
1914 			handle_7220_errors(dd, estat);
1915 	}
1916 }
1917 
1918 static irqreturn_t qib_7220intr(int irq, void *data)
1919 {
1920 	struct qib_devdata *dd = data;
1921 	irqreturn_t ret;
1922 	u64 istat;
1923 	u64 ctxtrbits;
1924 	u64 rmask;
1925 	unsigned i;
1926 
1927 	if ((dd->flags & (QIB_PRESENT | QIB_BADINTR)) != QIB_PRESENT) {
1928 		/*
1929 		 * This return value is not great, but we do not want the
1930 		 * interrupt core code to remove our interrupt handler
1931 		 * because we don't appear to be handling an interrupt
1932 		 * during a chip reset.
1933 		 */
1934 		ret = IRQ_HANDLED;
1935 		goto bail;
1936 	}
1937 
1938 	istat = qib_read_kreg64(dd, kr_intstatus);
1939 
1940 	if (unlikely(!istat)) {
1941 		ret = IRQ_NONE; /* not our interrupt, or already handled */
1942 		goto bail;
1943 	}
1944 	if (unlikely(istat == -1)) {
1945 		qib_bad_intrstatus(dd);
1946 		/* don't know if it was our interrupt or not */
1947 		ret = IRQ_NONE;
1948 		goto bail;
1949 	}
1950 
1951 	this_cpu_inc(*dd->int_counter);
1952 	if (unlikely(istat & (~QLOGIC_IB_I_BITSEXTANT |
1953 			      QLOGIC_IB_I_GPIO | QLOGIC_IB_I_ERROR)))
1954 		unlikely_7220_intr(dd, istat);
1955 
1956 	/*
1957 	 * Clear the interrupt bits we found set, relatively early, so we
1958 	 * "know" know the chip will have seen this by the time we process
1959 	 * the queue, and will re-interrupt if necessary.  The processor
1960 	 * itself won't take the interrupt again until we return.
1961 	 */
1962 	qib_write_kreg(dd, kr_intclear, istat);
1963 
1964 	/*
1965 	 * Handle kernel receive queues before checking for pio buffers
1966 	 * available since receives can overflow; piobuf waiters can afford
1967 	 * a few extra cycles, since they were waiting anyway.
1968 	 */
1969 	ctxtrbits = istat &
1970 		((QLOGIC_IB_I_RCVAVAIL_MASK << QLOGIC_IB_I_RCVAVAIL_SHIFT) |
1971 		 (QLOGIC_IB_I_RCVURG_MASK << QLOGIC_IB_I_RCVURG_SHIFT));
1972 	if (ctxtrbits) {
1973 		rmask = (1ULL << QLOGIC_IB_I_RCVAVAIL_SHIFT) |
1974 			(1ULL << QLOGIC_IB_I_RCVURG_SHIFT);
1975 		for (i = 0; i < dd->first_user_ctxt; i++) {
1976 			if (ctxtrbits & rmask) {
1977 				ctxtrbits &= ~rmask;
1978 				qib_kreceive(dd->rcd[i], NULL, NULL);
1979 			}
1980 			rmask <<= 1;
1981 		}
1982 		if (ctxtrbits) {
1983 			ctxtrbits =
1984 				(ctxtrbits >> QLOGIC_IB_I_RCVAVAIL_SHIFT) |
1985 				(ctxtrbits >> QLOGIC_IB_I_RCVURG_SHIFT);
1986 			qib_handle_urcv(dd, ctxtrbits);
1987 		}
1988 	}
1989 
1990 	/* only call for SDmaInt */
1991 	if (istat & QLOGIC_IB_I_SDMAINT)
1992 		sdma_7220_intr(dd->pport, istat);
1993 
1994 	if ((istat & QLOGIC_IB_I_SPIOBUFAVAIL) && (dd->flags & QIB_INITTED))
1995 		qib_ib_piobufavail(dd);
1996 
1997 	ret = IRQ_HANDLED;
1998 bail:
1999 	return ret;
2000 }
2001 
2002 /*
2003  * Set up our chip-specific interrupt handler.
2004  * The interrupt type has already been setup, so
2005  * we just need to do the registration and error checking.
2006  * If we are using MSI interrupts, we may fall back to
2007  * INTx later, if the interrupt handler doesn't get called
2008  * within 1/2 second (see verify_interrupt()).
2009  */
2010 static void qib_setup_7220_interrupt(struct qib_devdata *dd)
2011 {
2012 	int ret;
2013 
2014 	ret = pci_request_irq(dd->pcidev, 0, qib_7220intr, NULL, dd,
2015 			      QIB_DRV_NAME);
2016 	if (ret)
2017 		qib_dev_err(dd, "Couldn't setup %s interrupt (irq=%d): %d\n",
2018 			    dd->pcidev->msi_enabled ?  "MSI" : "INTx",
2019 			    pci_irq_vector(dd->pcidev, 0), ret);
2020 }
2021 
2022 /**
2023  * qib_7220_boardname - fill in the board name
2024  * @dd: the qlogic_ib device
2025  *
2026  * info is based on the board revision register
2027  */
2028 static void qib_7220_boardname(struct qib_devdata *dd)
2029 {
2030 	u32 boardid;
2031 
2032 	boardid = SYM_FIELD(dd->revision, Revision,
2033 			    BoardID);
2034 
2035 	switch (boardid) {
2036 	case 1:
2037 		dd->boardname = "InfiniPath_QLE7240";
2038 		break;
2039 	case 2:
2040 		dd->boardname = "InfiniPath_QLE7280";
2041 		break;
2042 	default:
2043 		qib_dev_err(dd, "Unknown 7220 board with ID %u\n", boardid);
2044 		dd->boardname = "Unknown_InfiniPath_7220";
2045 		break;
2046 	}
2047 
2048 	if (dd->majrev != 5 || !dd->minrev || dd->minrev > 2)
2049 		qib_dev_err(dd,
2050 			    "Unsupported InfiniPath hardware revision %u.%u!\n",
2051 			    dd->majrev, dd->minrev);
2052 
2053 	snprintf(dd->boardversion, sizeof(dd->boardversion),
2054 		 "ChipABI %u.%u, %s, InfiniPath%u %u.%u, SW Compat %u\n",
2055 		 QIB_CHIP_VERS_MAJ, QIB_CHIP_VERS_MIN, dd->boardname,
2056 		 (unsigned int)SYM_FIELD(dd->revision, Revision_R, Arch),
2057 		 dd->majrev, dd->minrev,
2058 		 (unsigned int)SYM_FIELD(dd->revision, Revision_R, SW));
2059 }
2060 
2061 /*
2062  * This routine sleeps, so it can only be called from user context, not
2063  * from interrupt context.
2064  */
2065 static int qib_setup_7220_reset(struct qib_devdata *dd)
2066 {
2067 	u64 val;
2068 	int i;
2069 	int ret;
2070 	u16 cmdval;
2071 	u8 int_line, clinesz;
2072 	unsigned long flags;
2073 
2074 	qib_pcie_getcmd(dd, &cmdval, &int_line, &clinesz);
2075 
2076 	/* Use dev_err so it shows up in logs, etc. */
2077 	qib_dev_err(dd, "Resetting InfiniPath unit %u\n", dd->unit);
2078 
2079 	/* no interrupts till re-initted */
2080 	qib_7220_set_intr_state(dd, 0);
2081 
2082 	dd->pport->cpspec->ibdeltainprog = 0;
2083 	dd->pport->cpspec->ibsymdelta = 0;
2084 	dd->pport->cpspec->iblnkerrdelta = 0;
2085 
2086 	/*
2087 	 * Keep chip from being accessed until we are ready.  Use
2088 	 * writeq() directly, to allow the write even though QIB_PRESENT
2089 	 * isn't set.
2090 	 */
2091 	dd->flags &= ~(QIB_INITTED | QIB_PRESENT);
2092 	/* so we check interrupts work again */
2093 	dd->z_int_counter = qib_int_counter(dd);
2094 	val = dd->control | QLOGIC_IB_C_RESET;
2095 	writeq(val, &dd->kregbase[kr_control]);
2096 	mb(); /* prevent compiler reordering around actual reset */
2097 
2098 	for (i = 1; i <= 5; i++) {
2099 		/*
2100 		 * Allow MBIST, etc. to complete; longer on each retry.
2101 		 * We sometimes get machine checks from bus timeout if no
2102 		 * response, so for now, make it *really* long.
2103 		 */
2104 		msleep(1000 + (1 + i) * 2000);
2105 
2106 		qib_pcie_reenable(dd, cmdval, int_line, clinesz);
2107 
2108 		/*
2109 		 * Use readq directly, so we don't need to mark it as PRESENT
2110 		 * until we get a successful indication that all is well.
2111 		 */
2112 		val = readq(&dd->kregbase[kr_revision]);
2113 		if (val == dd->revision) {
2114 			dd->flags |= QIB_PRESENT; /* it's back */
2115 			ret = qib_reinit_intr(dd);
2116 			goto bail;
2117 		}
2118 	}
2119 	ret = 0; /* failed */
2120 
2121 bail:
2122 	if (ret) {
2123 		if (qib_pcie_params(dd, dd->lbus_width, NULL))
2124 			qib_dev_err(dd,
2125 				"Reset failed to setup PCIe or interrupts; continuing anyway\n");
2126 
2127 		/* hold IBC in reset, no sends, etc till later */
2128 		qib_write_kreg(dd, kr_control, 0ULL);
2129 
2130 		/* clear the reset error, init error/hwerror mask */
2131 		qib_7220_init_hwerrors(dd);
2132 
2133 		/* do setup similar to speed or link-width changes */
2134 		if (dd->pport->cpspec->ibcddrctrl & IBA7220_IBC_IBTA_1_2_MASK)
2135 			dd->cspec->presets_needed = 1;
2136 		spin_lock_irqsave(&dd->pport->lflags_lock, flags);
2137 		dd->pport->lflags |= QIBL_IB_FORCE_NOTIFY;
2138 		dd->pport->lflags &= ~QIBL_IB_AUTONEG_FAILED;
2139 		spin_unlock_irqrestore(&dd->pport->lflags_lock, flags);
2140 	}
2141 
2142 	return ret;
2143 }
2144 
2145 /**
2146  * qib_7220_put_tid - write a TID to the chip
2147  * @dd: the qlogic_ib device
2148  * @tidptr: pointer to the expected TID (in chip) to update
2149  * @tidtype: 0 for eager, 1 for expected
2150  * @pa: physical address of in memory buffer; tidinvalid if freeing
2151  */
2152 static void qib_7220_put_tid(struct qib_devdata *dd, u64 __iomem *tidptr,
2153 			     u32 type, unsigned long pa)
2154 {
2155 	if (pa != dd->tidinvalid) {
2156 		u64 chippa = pa >> IBA7220_TID_PA_SHIFT;
2157 
2158 		/* paranoia checks */
2159 		if (pa != (chippa << IBA7220_TID_PA_SHIFT)) {
2160 			qib_dev_err(dd, "Physaddr %lx not 2KB aligned!\n",
2161 				    pa);
2162 			return;
2163 		}
2164 		if (chippa >= (1UL << IBA7220_TID_SZ_SHIFT)) {
2165 			qib_dev_err(dd,
2166 				"Physical page address 0x%lx larger than supported\n",
2167 				pa);
2168 			return;
2169 		}
2170 
2171 		if (type == RCVHQ_RCV_TYPE_EAGER)
2172 			chippa |= dd->tidtemplate;
2173 		else /* for now, always full 4KB page */
2174 			chippa |= IBA7220_TID_SZ_4K;
2175 		pa = chippa;
2176 	}
2177 	writeq(pa, tidptr);
2178 	mmiowb();
2179 }
2180 
2181 /**
2182  * qib_7220_clear_tids - clear all TID entries for a ctxt, expected and eager
2183  * @dd: the qlogic_ib device
2184  * @ctxt: the ctxt
2185  *
2186  * clear all TID entries for a ctxt, expected and eager.
2187  * Used from qib_close().  On this chip, TIDs are only 32 bits,
2188  * not 64, but they are still on 64 bit boundaries, so tidbase
2189  * is declared as u64 * for the pointer math, even though we write 32 bits
2190  */
2191 static void qib_7220_clear_tids(struct qib_devdata *dd,
2192 				struct qib_ctxtdata *rcd)
2193 {
2194 	u64 __iomem *tidbase;
2195 	unsigned long tidinv;
2196 	u32 ctxt;
2197 	int i;
2198 
2199 	if (!dd->kregbase || !rcd)
2200 		return;
2201 
2202 	ctxt = rcd->ctxt;
2203 
2204 	tidinv = dd->tidinvalid;
2205 	tidbase = (u64 __iomem *)
2206 		((char __iomem *)(dd->kregbase) +
2207 		 dd->rcvtidbase +
2208 		 ctxt * dd->rcvtidcnt * sizeof(*tidbase));
2209 
2210 	for (i = 0; i < dd->rcvtidcnt; i++)
2211 		qib_7220_put_tid(dd, &tidbase[i], RCVHQ_RCV_TYPE_EXPECTED,
2212 				 tidinv);
2213 
2214 	tidbase = (u64 __iomem *)
2215 		((char __iomem *)(dd->kregbase) +
2216 		 dd->rcvegrbase +
2217 		 rcd->rcvegr_tid_base * sizeof(*tidbase));
2218 
2219 	for (i = 0; i < rcd->rcvegrcnt; i++)
2220 		qib_7220_put_tid(dd, &tidbase[i], RCVHQ_RCV_TYPE_EAGER,
2221 				 tidinv);
2222 }
2223 
2224 /**
2225  * qib_7220_tidtemplate - setup constants for TID updates
2226  * @dd: the qlogic_ib device
2227  *
2228  * We setup stuff that we use a lot, to avoid calculating each time
2229  */
2230 static void qib_7220_tidtemplate(struct qib_devdata *dd)
2231 {
2232 	if (dd->rcvegrbufsize == 2048)
2233 		dd->tidtemplate = IBA7220_TID_SZ_2K;
2234 	else if (dd->rcvegrbufsize == 4096)
2235 		dd->tidtemplate = IBA7220_TID_SZ_4K;
2236 	dd->tidinvalid = 0;
2237 }
2238 
2239 /**
2240  * qib_init_7220_get_base_info - set chip-specific flags for user code
2241  * @rcd: the qlogic_ib ctxt
2242  * @kbase: qib_base_info pointer
2243  *
2244  * We set the PCIE flag because the lower bandwidth on PCIe vs
2245  * HyperTransport can affect some user packet algorithims.
2246  */
2247 static int qib_7220_get_base_info(struct qib_ctxtdata *rcd,
2248 				  struct qib_base_info *kinfo)
2249 {
2250 	kinfo->spi_runtime_flags |= QIB_RUNTIME_PCIE |
2251 		QIB_RUNTIME_NODMA_RTAIL | QIB_RUNTIME_SDMA;
2252 
2253 	if (rcd->dd->flags & QIB_USE_SPCL_TRIG)
2254 		kinfo->spi_runtime_flags |= QIB_RUNTIME_SPECIAL_TRIGGER;
2255 
2256 	return 0;
2257 }
2258 
2259 static struct qib_message_header *
2260 qib_7220_get_msgheader(struct qib_devdata *dd, __le32 *rhf_addr)
2261 {
2262 	u32 offset = qib_hdrget_offset(rhf_addr);
2263 
2264 	return (struct qib_message_header *)
2265 		(rhf_addr - dd->rhf_offset + offset);
2266 }
2267 
2268 static void qib_7220_config_ctxts(struct qib_devdata *dd)
2269 {
2270 	unsigned long flags;
2271 	u32 nchipctxts;
2272 
2273 	nchipctxts = qib_read_kreg32(dd, kr_portcnt);
2274 	dd->cspec->numctxts = nchipctxts;
2275 	if (qib_n_krcv_queues > 1) {
2276 		dd->qpn_mask = 0x3e;
2277 		dd->first_user_ctxt = qib_n_krcv_queues * dd->num_pports;
2278 		if (dd->first_user_ctxt > nchipctxts)
2279 			dd->first_user_ctxt = nchipctxts;
2280 	} else
2281 		dd->first_user_ctxt = dd->num_pports;
2282 	dd->n_krcv_queues = dd->first_user_ctxt;
2283 
2284 	if (!qib_cfgctxts) {
2285 		int nctxts = dd->first_user_ctxt + num_online_cpus();
2286 
2287 		if (nctxts <= 5)
2288 			dd->ctxtcnt = 5;
2289 		else if (nctxts <= 9)
2290 			dd->ctxtcnt = 9;
2291 		else if (nctxts <= nchipctxts)
2292 			dd->ctxtcnt = nchipctxts;
2293 	} else if (qib_cfgctxts <= nchipctxts)
2294 		dd->ctxtcnt = qib_cfgctxts;
2295 	if (!dd->ctxtcnt) /* none of the above, set to max */
2296 		dd->ctxtcnt = nchipctxts;
2297 
2298 	/*
2299 	 * Chip can be configured for 5, 9, or 17 ctxts, and choice
2300 	 * affects number of eager TIDs per ctxt (1K, 2K, 4K).
2301 	 * Lock to be paranoid about later motion, etc.
2302 	 */
2303 	spin_lock_irqsave(&dd->cspec->rcvmod_lock, flags);
2304 	if (dd->ctxtcnt > 9)
2305 		dd->rcvctrl |= 2ULL << IBA7220_R_CTXTCFG_SHIFT;
2306 	else if (dd->ctxtcnt > 5)
2307 		dd->rcvctrl |= 1ULL << IBA7220_R_CTXTCFG_SHIFT;
2308 	/* else configure for default 5 receive ctxts */
2309 	if (dd->qpn_mask)
2310 		dd->rcvctrl |= 1ULL << QIB_7220_RcvCtrl_RcvQPMapEnable_LSB;
2311 	qib_write_kreg(dd, kr_rcvctrl, dd->rcvctrl);
2312 	spin_unlock_irqrestore(&dd->cspec->rcvmod_lock, flags);
2313 
2314 	/* kr_rcvegrcnt changes based on the number of contexts enabled */
2315 	dd->cspec->rcvegrcnt = qib_read_kreg32(dd, kr_rcvegrcnt);
2316 	dd->rcvhdrcnt = max(dd->cspec->rcvegrcnt, IBA7220_KRCVEGRCNT);
2317 }
2318 
2319 static int qib_7220_get_ib_cfg(struct qib_pportdata *ppd, int which)
2320 {
2321 	int lsb, ret = 0;
2322 	u64 maskr; /* right-justified mask */
2323 
2324 	switch (which) {
2325 	case QIB_IB_CFG_LWID_ENB: /* Get allowed Link-width */
2326 		ret = ppd->link_width_enabled;
2327 		goto done;
2328 
2329 	case QIB_IB_CFG_LWID: /* Get currently active Link-width */
2330 		ret = ppd->link_width_active;
2331 		goto done;
2332 
2333 	case QIB_IB_CFG_SPD_ENB: /* Get allowed Link speeds */
2334 		ret = ppd->link_speed_enabled;
2335 		goto done;
2336 
2337 	case QIB_IB_CFG_SPD: /* Get current Link spd */
2338 		ret = ppd->link_speed_active;
2339 		goto done;
2340 
2341 	case QIB_IB_CFG_RXPOL_ENB: /* Get Auto-RX-polarity enable */
2342 		lsb = IBA7220_IBC_RXPOL_SHIFT;
2343 		maskr = IBA7220_IBC_RXPOL_MASK;
2344 		break;
2345 
2346 	case QIB_IB_CFG_LREV_ENB: /* Get Auto-Lane-reversal enable */
2347 		lsb = IBA7220_IBC_LREV_SHIFT;
2348 		maskr = IBA7220_IBC_LREV_MASK;
2349 		break;
2350 
2351 	case QIB_IB_CFG_LINKLATENCY:
2352 		ret = qib_read_kreg64(ppd->dd, kr_ibcddrstatus)
2353 			& IBA7220_DDRSTAT_LINKLAT_MASK;
2354 		goto done;
2355 
2356 	case QIB_IB_CFG_OP_VLS:
2357 		ret = ppd->vls_operational;
2358 		goto done;
2359 
2360 	case QIB_IB_CFG_VL_HIGH_CAP:
2361 		ret = 0;
2362 		goto done;
2363 
2364 	case QIB_IB_CFG_VL_LOW_CAP:
2365 		ret = 0;
2366 		goto done;
2367 
2368 	case QIB_IB_CFG_OVERRUN_THRESH: /* IB overrun threshold */
2369 		ret = SYM_FIELD(ppd->cpspec->ibcctrl, IBCCtrl,
2370 				OverrunThreshold);
2371 		goto done;
2372 
2373 	case QIB_IB_CFG_PHYERR_THRESH: /* IB PHY error threshold */
2374 		ret = SYM_FIELD(ppd->cpspec->ibcctrl, IBCCtrl,
2375 				PhyerrThreshold);
2376 		goto done;
2377 
2378 	case QIB_IB_CFG_LINKDEFAULT: /* IB link default (sleep/poll) */
2379 		/* will only take effect when the link state changes */
2380 		ret = (ppd->cpspec->ibcctrl &
2381 		       SYM_MASK(IBCCtrl, LinkDownDefaultState)) ?
2382 			IB_LINKINITCMD_SLEEP : IB_LINKINITCMD_POLL;
2383 		goto done;
2384 
2385 	case QIB_IB_CFG_HRTBT: /* Get Heartbeat off/enable/auto */
2386 		lsb = IBA7220_IBC_HRTBT_SHIFT;
2387 		maskr = IBA7220_IBC_HRTBT_MASK;
2388 		break;
2389 
2390 	case QIB_IB_CFG_PMA_TICKS:
2391 		/*
2392 		 * 0x00 = 10x link transfer rate or 4 nsec. for 2.5Gbs
2393 		 * Since the clock is always 250MHz, the value is 1 or 0.
2394 		 */
2395 		ret = (ppd->link_speed_active == QIB_IB_DDR);
2396 		goto done;
2397 
2398 	default:
2399 		ret = -EINVAL;
2400 		goto done;
2401 	}
2402 	ret = (int)((ppd->cpspec->ibcddrctrl >> lsb) & maskr);
2403 done:
2404 	return ret;
2405 }
2406 
2407 static int qib_7220_set_ib_cfg(struct qib_pportdata *ppd, int which, u32 val)
2408 {
2409 	struct qib_devdata *dd = ppd->dd;
2410 	u64 maskr; /* right-justified mask */
2411 	int lsb, ret = 0, setforce = 0;
2412 	u16 lcmd, licmd;
2413 	unsigned long flags;
2414 	u32 tmp = 0;
2415 
2416 	switch (which) {
2417 	case QIB_IB_CFG_LIDLMC:
2418 		/*
2419 		 * Set LID and LMC. Combined to avoid possible hazard
2420 		 * caller puts LMC in 16MSbits, DLID in 16LSbits of val
2421 		 */
2422 		lsb = IBA7220_IBC_DLIDLMC_SHIFT;
2423 		maskr = IBA7220_IBC_DLIDLMC_MASK;
2424 		break;
2425 
2426 	case QIB_IB_CFG_LWID_ENB: /* set allowed Link-width */
2427 		/*
2428 		 * As with speed, only write the actual register if
2429 		 * the link is currently down, otherwise takes effect
2430 		 * on next link change.
2431 		 */
2432 		ppd->link_width_enabled = val;
2433 		if (!(ppd->lflags & QIBL_LINKDOWN))
2434 			goto bail;
2435 		/*
2436 		 * We set the QIBL_IB_FORCE_NOTIFY bit so updown
2437 		 * will get called because we want update
2438 		 * link_width_active, and the change may not take
2439 		 * effect for some time (if we are in POLL), so this
2440 		 * flag will force the updown routine to be called
2441 		 * on the next ibstatuschange down interrupt, even
2442 		 * if it's not an down->up transition.
2443 		 */
2444 		val--; /* convert from IB to chip */
2445 		maskr = IBA7220_IBC_WIDTH_MASK;
2446 		lsb = IBA7220_IBC_WIDTH_SHIFT;
2447 		setforce = 1;
2448 		break;
2449 
2450 	case QIB_IB_CFG_SPD_ENB: /* set allowed Link speeds */
2451 		/*
2452 		 * If we turn off IB1.2, need to preset SerDes defaults,
2453 		 * but not right now. Set a flag for the next time
2454 		 * we command the link down.  As with width, only write the
2455 		 * actual register if the link is currently down, otherwise
2456 		 * takes effect on next link change.  Since setting is being
2457 		 * explicitly requested (via MAD or sysfs), clear autoneg
2458 		 * failure status if speed autoneg is enabled.
2459 		 */
2460 		ppd->link_speed_enabled = val;
2461 		if ((ppd->cpspec->ibcddrctrl & IBA7220_IBC_IBTA_1_2_MASK) &&
2462 		    !(val & (val - 1)))
2463 			dd->cspec->presets_needed = 1;
2464 		if (!(ppd->lflags & QIBL_LINKDOWN))
2465 			goto bail;
2466 		/*
2467 		 * We set the QIBL_IB_FORCE_NOTIFY bit so updown
2468 		 * will get called because we want update
2469 		 * link_speed_active, and the change may not take
2470 		 * effect for some time (if we are in POLL), so this
2471 		 * flag will force the updown routine to be called
2472 		 * on the next ibstatuschange down interrupt, even
2473 		 * if it's not an down->up transition.
2474 		 */
2475 		if (val == (QIB_IB_SDR | QIB_IB_DDR)) {
2476 			val = IBA7220_IBC_SPEED_AUTONEG_MASK |
2477 				IBA7220_IBC_IBTA_1_2_MASK;
2478 			spin_lock_irqsave(&ppd->lflags_lock, flags);
2479 			ppd->lflags &= ~QIBL_IB_AUTONEG_FAILED;
2480 			spin_unlock_irqrestore(&ppd->lflags_lock, flags);
2481 		} else
2482 			val = val == QIB_IB_DDR ?
2483 				IBA7220_IBC_SPEED_DDR : IBA7220_IBC_SPEED_SDR;
2484 		maskr = IBA7220_IBC_SPEED_AUTONEG_MASK |
2485 			IBA7220_IBC_IBTA_1_2_MASK;
2486 		/* IBTA 1.2 mode + speed bits are contiguous */
2487 		lsb = SYM_LSB(IBCDDRCtrl, IB_ENHANCED_MODE);
2488 		setforce = 1;
2489 		break;
2490 
2491 	case QIB_IB_CFG_RXPOL_ENB: /* set Auto-RX-polarity enable */
2492 		lsb = IBA7220_IBC_RXPOL_SHIFT;
2493 		maskr = IBA7220_IBC_RXPOL_MASK;
2494 		break;
2495 
2496 	case QIB_IB_CFG_LREV_ENB: /* set Auto-Lane-reversal enable */
2497 		lsb = IBA7220_IBC_LREV_SHIFT;
2498 		maskr = IBA7220_IBC_LREV_MASK;
2499 		break;
2500 
2501 	case QIB_IB_CFG_OVERRUN_THRESH: /* IB overrun threshold */
2502 		maskr = SYM_FIELD(ppd->cpspec->ibcctrl, IBCCtrl,
2503 				  OverrunThreshold);
2504 		if (maskr != val) {
2505 			ppd->cpspec->ibcctrl &=
2506 				~SYM_MASK(IBCCtrl, OverrunThreshold);
2507 			ppd->cpspec->ibcctrl |= (u64) val <<
2508 				SYM_LSB(IBCCtrl, OverrunThreshold);
2509 			qib_write_kreg(dd, kr_ibcctrl, ppd->cpspec->ibcctrl);
2510 			qib_write_kreg(dd, kr_scratch, 0);
2511 		}
2512 		goto bail;
2513 
2514 	case QIB_IB_CFG_PHYERR_THRESH: /* IB PHY error threshold */
2515 		maskr = SYM_FIELD(ppd->cpspec->ibcctrl, IBCCtrl,
2516 				  PhyerrThreshold);
2517 		if (maskr != val) {
2518 			ppd->cpspec->ibcctrl &=
2519 				~SYM_MASK(IBCCtrl, PhyerrThreshold);
2520 			ppd->cpspec->ibcctrl |= (u64) val <<
2521 				SYM_LSB(IBCCtrl, PhyerrThreshold);
2522 			qib_write_kreg(dd, kr_ibcctrl, ppd->cpspec->ibcctrl);
2523 			qib_write_kreg(dd, kr_scratch, 0);
2524 		}
2525 		goto bail;
2526 
2527 	case QIB_IB_CFG_PKEYS: /* update pkeys */
2528 		maskr = (u64) ppd->pkeys[0] | ((u64) ppd->pkeys[1] << 16) |
2529 			((u64) ppd->pkeys[2] << 32) |
2530 			((u64) ppd->pkeys[3] << 48);
2531 		qib_write_kreg(dd, kr_partitionkey, maskr);
2532 		goto bail;
2533 
2534 	case QIB_IB_CFG_LINKDEFAULT: /* IB link default (sleep/poll) */
2535 		/* will only take effect when the link state changes */
2536 		if (val == IB_LINKINITCMD_POLL)
2537 			ppd->cpspec->ibcctrl &=
2538 				~SYM_MASK(IBCCtrl, LinkDownDefaultState);
2539 		else /* SLEEP */
2540 			ppd->cpspec->ibcctrl |=
2541 				SYM_MASK(IBCCtrl, LinkDownDefaultState);
2542 		qib_write_kreg(dd, kr_ibcctrl, ppd->cpspec->ibcctrl);
2543 		qib_write_kreg(dd, kr_scratch, 0);
2544 		goto bail;
2545 
2546 	case QIB_IB_CFG_MTU: /* update the MTU in IBC */
2547 		/*
2548 		 * Update our housekeeping variables, and set IBC max
2549 		 * size, same as init code; max IBC is max we allow in
2550 		 * buffer, less the qword pbc, plus 1 for ICRC, in dwords
2551 		 * Set even if it's unchanged, print debug message only
2552 		 * on changes.
2553 		 */
2554 		val = (ppd->ibmaxlen >> 2) + 1;
2555 		ppd->cpspec->ibcctrl &= ~SYM_MASK(IBCCtrl, MaxPktLen);
2556 		ppd->cpspec->ibcctrl |= (u64)val << SYM_LSB(IBCCtrl, MaxPktLen);
2557 		qib_write_kreg(dd, kr_ibcctrl, ppd->cpspec->ibcctrl);
2558 		qib_write_kreg(dd, kr_scratch, 0);
2559 		goto bail;
2560 
2561 	case QIB_IB_CFG_LSTATE: /* set the IB link state */
2562 		switch (val & 0xffff0000) {
2563 		case IB_LINKCMD_DOWN:
2564 			lcmd = QLOGIC_IB_IBCC_LINKCMD_DOWN;
2565 			if (!ppd->cpspec->ibdeltainprog &&
2566 			    qib_compat_ddr_negotiate) {
2567 				ppd->cpspec->ibdeltainprog = 1;
2568 				ppd->cpspec->ibsymsnap =
2569 					read_7220_creg32(dd, cr_ibsymbolerr);
2570 				ppd->cpspec->iblnkerrsnap =
2571 					read_7220_creg32(dd, cr_iblinkerrrecov);
2572 			}
2573 			break;
2574 
2575 		case IB_LINKCMD_ARMED:
2576 			lcmd = QLOGIC_IB_IBCC_LINKCMD_ARMED;
2577 			break;
2578 
2579 		case IB_LINKCMD_ACTIVE:
2580 			lcmd = QLOGIC_IB_IBCC_LINKCMD_ACTIVE;
2581 			break;
2582 
2583 		default:
2584 			ret = -EINVAL;
2585 			qib_dev_err(dd, "bad linkcmd req 0x%x\n", val >> 16);
2586 			goto bail;
2587 		}
2588 		switch (val & 0xffff) {
2589 		case IB_LINKINITCMD_NOP:
2590 			licmd = 0;
2591 			break;
2592 
2593 		case IB_LINKINITCMD_POLL:
2594 			licmd = QLOGIC_IB_IBCC_LINKINITCMD_POLL;
2595 			break;
2596 
2597 		case IB_LINKINITCMD_SLEEP:
2598 			licmd = QLOGIC_IB_IBCC_LINKINITCMD_SLEEP;
2599 			break;
2600 
2601 		case IB_LINKINITCMD_DISABLE:
2602 			licmd = QLOGIC_IB_IBCC_LINKINITCMD_DISABLE;
2603 			ppd->cpspec->chase_end = 0;
2604 			/*
2605 			 * stop state chase counter and timer, if running.
2606 			 * wait forpending timer, but don't clear .data (ppd)!
2607 			 */
2608 			if (ppd->cpspec->chase_timer.expires) {
2609 				del_timer_sync(&ppd->cpspec->chase_timer);
2610 				ppd->cpspec->chase_timer.expires = 0;
2611 			}
2612 			break;
2613 
2614 		default:
2615 			ret = -EINVAL;
2616 			qib_dev_err(dd, "bad linkinitcmd req 0x%x\n",
2617 				    val & 0xffff);
2618 			goto bail;
2619 		}
2620 		qib_set_ib_7220_lstate(ppd, lcmd, licmd);
2621 
2622 		maskr = IBA7220_IBC_WIDTH_MASK;
2623 		lsb = IBA7220_IBC_WIDTH_SHIFT;
2624 		tmp = (ppd->cpspec->ibcddrctrl >> lsb) & maskr;
2625 		/* If the width active on the chip does not match the
2626 		 * width in the shadow register, write the new active
2627 		 * width to the chip.
2628 		 * We don't have to worry about speed as the speed is taken
2629 		 * care of by set_7220_ibspeed_fast called by ib_updown.
2630 		 */
2631 		if (ppd->link_width_enabled-1 != tmp) {
2632 			ppd->cpspec->ibcddrctrl &= ~(maskr << lsb);
2633 			ppd->cpspec->ibcddrctrl |=
2634 				(((u64)(ppd->link_width_enabled-1) & maskr) <<
2635 				 lsb);
2636 			qib_write_kreg(dd, kr_ibcddrctrl,
2637 				       ppd->cpspec->ibcddrctrl);
2638 			qib_write_kreg(dd, kr_scratch, 0);
2639 			spin_lock_irqsave(&ppd->lflags_lock, flags);
2640 			ppd->lflags |= QIBL_IB_FORCE_NOTIFY;
2641 			spin_unlock_irqrestore(&ppd->lflags_lock, flags);
2642 		}
2643 		goto bail;
2644 
2645 	case QIB_IB_CFG_HRTBT: /* set Heartbeat off/enable/auto */
2646 		if (val > IBA7220_IBC_HRTBT_MASK) {
2647 			ret = -EINVAL;
2648 			goto bail;
2649 		}
2650 		lsb = IBA7220_IBC_HRTBT_SHIFT;
2651 		maskr = IBA7220_IBC_HRTBT_MASK;
2652 		break;
2653 
2654 	default:
2655 		ret = -EINVAL;
2656 		goto bail;
2657 	}
2658 	ppd->cpspec->ibcddrctrl &= ~(maskr << lsb);
2659 	ppd->cpspec->ibcddrctrl |= (((u64) val & maskr) << lsb);
2660 	qib_write_kreg(dd, kr_ibcddrctrl, ppd->cpspec->ibcddrctrl);
2661 	qib_write_kreg(dd, kr_scratch, 0);
2662 	if (setforce) {
2663 		spin_lock_irqsave(&ppd->lflags_lock, flags);
2664 		ppd->lflags |= QIBL_IB_FORCE_NOTIFY;
2665 		spin_unlock_irqrestore(&ppd->lflags_lock, flags);
2666 	}
2667 bail:
2668 	return ret;
2669 }
2670 
2671 static int qib_7220_set_loopback(struct qib_pportdata *ppd, const char *what)
2672 {
2673 	int ret = 0;
2674 	u64 val, ddr;
2675 
2676 	if (!strncmp(what, "ibc", 3)) {
2677 		ppd->cpspec->ibcctrl |= SYM_MASK(IBCCtrl, Loopback);
2678 		val = 0; /* disable heart beat, so link will come up */
2679 		qib_devinfo(ppd->dd->pcidev, "Enabling IB%u:%u IBC loopback\n",
2680 			 ppd->dd->unit, ppd->port);
2681 	} else if (!strncmp(what, "off", 3)) {
2682 		ppd->cpspec->ibcctrl &= ~SYM_MASK(IBCCtrl, Loopback);
2683 		/* enable heart beat again */
2684 		val = IBA7220_IBC_HRTBT_MASK << IBA7220_IBC_HRTBT_SHIFT;
2685 		qib_devinfo(ppd->dd->pcidev,
2686 			"Disabling IB%u:%u IBC loopback (normal)\n",
2687 			ppd->dd->unit, ppd->port);
2688 	} else
2689 		ret = -EINVAL;
2690 	if (!ret) {
2691 		qib_write_kreg(ppd->dd, kr_ibcctrl, ppd->cpspec->ibcctrl);
2692 		ddr = ppd->cpspec->ibcddrctrl & ~(IBA7220_IBC_HRTBT_MASK
2693 					     << IBA7220_IBC_HRTBT_SHIFT);
2694 		ppd->cpspec->ibcddrctrl = ddr | val;
2695 		qib_write_kreg(ppd->dd, kr_ibcddrctrl,
2696 			       ppd->cpspec->ibcddrctrl);
2697 		qib_write_kreg(ppd->dd, kr_scratch, 0);
2698 	}
2699 	return ret;
2700 }
2701 
2702 static void qib_update_7220_usrhead(struct qib_ctxtdata *rcd, u64 hd,
2703 				    u32 updegr, u32 egrhd, u32 npkts)
2704 {
2705 	if (updegr)
2706 		qib_write_ureg(rcd->dd, ur_rcvegrindexhead, egrhd, rcd->ctxt);
2707 	mmiowb();
2708 	qib_write_ureg(rcd->dd, ur_rcvhdrhead, hd, rcd->ctxt);
2709 	mmiowb();
2710 }
2711 
2712 static u32 qib_7220_hdrqempty(struct qib_ctxtdata *rcd)
2713 {
2714 	u32 head, tail;
2715 
2716 	head = qib_read_ureg32(rcd->dd, ur_rcvhdrhead, rcd->ctxt);
2717 	if (rcd->rcvhdrtail_kvaddr)
2718 		tail = qib_get_rcvhdrtail(rcd);
2719 	else
2720 		tail = qib_read_ureg32(rcd->dd, ur_rcvhdrtail, rcd->ctxt);
2721 	return head == tail;
2722 }
2723 
2724 /*
2725  * Modify the RCVCTRL register in chip-specific way. This
2726  * is a function because bit positions and (future) register
2727  * location is chip-specifc, but the needed operations are
2728  * generic. <op> is a bit-mask because we often want to
2729  * do multiple modifications.
2730  */
2731 static void rcvctrl_7220_mod(struct qib_pportdata *ppd, unsigned int op,
2732 			     int ctxt)
2733 {
2734 	struct qib_devdata *dd = ppd->dd;
2735 	u64 mask, val;
2736 	unsigned long flags;
2737 
2738 	spin_lock_irqsave(&dd->cspec->rcvmod_lock, flags);
2739 	if (op & QIB_RCVCTRL_TAILUPD_ENB)
2740 		dd->rcvctrl |= (1ULL << IBA7220_R_TAILUPD_SHIFT);
2741 	if (op & QIB_RCVCTRL_TAILUPD_DIS)
2742 		dd->rcvctrl &= ~(1ULL << IBA7220_R_TAILUPD_SHIFT);
2743 	if (op & QIB_RCVCTRL_PKEY_ENB)
2744 		dd->rcvctrl &= ~(1ULL << IBA7220_R_PKEY_DIS_SHIFT);
2745 	if (op & QIB_RCVCTRL_PKEY_DIS)
2746 		dd->rcvctrl |= (1ULL << IBA7220_R_PKEY_DIS_SHIFT);
2747 	if (ctxt < 0)
2748 		mask = (1ULL << dd->ctxtcnt) - 1;
2749 	else
2750 		mask = (1ULL << ctxt);
2751 	if (op & QIB_RCVCTRL_CTXT_ENB) {
2752 		/* always done for specific ctxt */
2753 		dd->rcvctrl |= (mask << SYM_LSB(RcvCtrl, PortEnable));
2754 		if (!(dd->flags & QIB_NODMA_RTAIL))
2755 			dd->rcvctrl |= 1ULL << IBA7220_R_TAILUPD_SHIFT;
2756 		/* Write these registers before the context is enabled. */
2757 		qib_write_kreg_ctxt(dd, kr_rcvhdrtailaddr, ctxt,
2758 			dd->rcd[ctxt]->rcvhdrqtailaddr_phys);
2759 		qib_write_kreg_ctxt(dd, kr_rcvhdraddr, ctxt,
2760 			dd->rcd[ctxt]->rcvhdrq_phys);
2761 		dd->rcd[ctxt]->seq_cnt = 1;
2762 	}
2763 	if (op & QIB_RCVCTRL_CTXT_DIS)
2764 		dd->rcvctrl &= ~(mask << SYM_LSB(RcvCtrl, PortEnable));
2765 	if (op & QIB_RCVCTRL_INTRAVAIL_ENB)
2766 		dd->rcvctrl |= (mask << IBA7220_R_INTRAVAIL_SHIFT);
2767 	if (op & QIB_RCVCTRL_INTRAVAIL_DIS)
2768 		dd->rcvctrl &= ~(mask << IBA7220_R_INTRAVAIL_SHIFT);
2769 	qib_write_kreg(dd, kr_rcvctrl, dd->rcvctrl);
2770 	if ((op & QIB_RCVCTRL_INTRAVAIL_ENB) && dd->rhdrhead_intr_off) {
2771 		/* arm rcv interrupt */
2772 		val = qib_read_ureg32(dd, ur_rcvhdrhead, ctxt) |
2773 			dd->rhdrhead_intr_off;
2774 		qib_write_ureg(dd, ur_rcvhdrhead, val, ctxt);
2775 	}
2776 	if (op & QIB_RCVCTRL_CTXT_ENB) {
2777 		/*
2778 		 * Init the context registers also; if we were
2779 		 * disabled, tail and head should both be zero
2780 		 * already from the enable, but since we don't
2781 		 * know, we have to do it explicitly.
2782 		 */
2783 		val = qib_read_ureg32(dd, ur_rcvegrindextail, ctxt);
2784 		qib_write_ureg(dd, ur_rcvegrindexhead, val, ctxt);
2785 
2786 		val = qib_read_ureg32(dd, ur_rcvhdrtail, ctxt);
2787 		dd->rcd[ctxt]->head = val;
2788 		/* If kctxt, interrupt on next receive. */
2789 		if (ctxt < dd->first_user_ctxt)
2790 			val |= dd->rhdrhead_intr_off;
2791 		qib_write_ureg(dd, ur_rcvhdrhead, val, ctxt);
2792 	}
2793 	if (op & QIB_RCVCTRL_CTXT_DIS) {
2794 		if (ctxt >= 0) {
2795 			qib_write_kreg_ctxt(dd, kr_rcvhdrtailaddr, ctxt, 0);
2796 			qib_write_kreg_ctxt(dd, kr_rcvhdraddr, ctxt, 0);
2797 		} else {
2798 			unsigned i;
2799 
2800 			for (i = 0; i < dd->cfgctxts; i++) {
2801 				qib_write_kreg_ctxt(dd, kr_rcvhdrtailaddr,
2802 						    i, 0);
2803 				qib_write_kreg_ctxt(dd, kr_rcvhdraddr, i, 0);
2804 			}
2805 		}
2806 	}
2807 	spin_unlock_irqrestore(&dd->cspec->rcvmod_lock, flags);
2808 }
2809 
2810 /*
2811  * Modify the SENDCTRL register in chip-specific way. This
2812  * is a function there may be multiple such registers with
2813  * slightly different layouts. To start, we assume the
2814  * "canonical" register layout of the first chips.
2815  * Chip requires no back-back sendctrl writes, so write
2816  * scratch register after writing sendctrl
2817  */
2818 static void sendctrl_7220_mod(struct qib_pportdata *ppd, u32 op)
2819 {
2820 	struct qib_devdata *dd = ppd->dd;
2821 	u64 tmp_dd_sendctrl;
2822 	unsigned long flags;
2823 
2824 	spin_lock_irqsave(&dd->sendctrl_lock, flags);
2825 
2826 	/* First the ones that are "sticky", saved in shadow */
2827 	if (op & QIB_SENDCTRL_CLEAR)
2828 		dd->sendctrl = 0;
2829 	if (op & QIB_SENDCTRL_SEND_DIS)
2830 		dd->sendctrl &= ~SYM_MASK(SendCtrl, SPioEnable);
2831 	else if (op & QIB_SENDCTRL_SEND_ENB) {
2832 		dd->sendctrl |= SYM_MASK(SendCtrl, SPioEnable);
2833 		if (dd->flags & QIB_USE_SPCL_TRIG)
2834 			dd->sendctrl |= SYM_MASK(SendCtrl,
2835 						 SSpecialTriggerEn);
2836 	}
2837 	if (op & QIB_SENDCTRL_AVAIL_DIS)
2838 		dd->sendctrl &= ~SYM_MASK(SendCtrl, SendBufAvailUpd);
2839 	else if (op & QIB_SENDCTRL_AVAIL_ENB)
2840 		dd->sendctrl |= SYM_MASK(SendCtrl, SendBufAvailUpd);
2841 
2842 	if (op & QIB_SENDCTRL_DISARM_ALL) {
2843 		u32 i, last;
2844 
2845 		tmp_dd_sendctrl = dd->sendctrl;
2846 		/*
2847 		 * disarm any that are not yet launched, disabling sends
2848 		 * and updates until done.
2849 		 */
2850 		last = dd->piobcnt2k + dd->piobcnt4k;
2851 		tmp_dd_sendctrl &=
2852 			~(SYM_MASK(SendCtrl, SPioEnable) |
2853 			  SYM_MASK(SendCtrl, SendBufAvailUpd));
2854 		for (i = 0; i < last; i++) {
2855 			qib_write_kreg(dd, kr_sendctrl,
2856 				       tmp_dd_sendctrl |
2857 				       SYM_MASK(SendCtrl, Disarm) | i);
2858 			qib_write_kreg(dd, kr_scratch, 0);
2859 		}
2860 	}
2861 
2862 	tmp_dd_sendctrl = dd->sendctrl;
2863 
2864 	if (op & QIB_SENDCTRL_FLUSH)
2865 		tmp_dd_sendctrl |= SYM_MASK(SendCtrl, Abort);
2866 	if (op & QIB_SENDCTRL_DISARM)
2867 		tmp_dd_sendctrl |= SYM_MASK(SendCtrl, Disarm) |
2868 			((op & QIB_7220_SendCtrl_DisarmPIOBuf_RMASK) <<
2869 			 SYM_LSB(SendCtrl, DisarmPIOBuf));
2870 	if ((op & QIB_SENDCTRL_AVAIL_BLIP) &&
2871 	    (dd->sendctrl & SYM_MASK(SendCtrl, SendBufAvailUpd)))
2872 		tmp_dd_sendctrl &= ~SYM_MASK(SendCtrl, SendBufAvailUpd);
2873 
2874 	qib_write_kreg(dd, kr_sendctrl, tmp_dd_sendctrl);
2875 	qib_write_kreg(dd, kr_scratch, 0);
2876 
2877 	if (op & QIB_SENDCTRL_AVAIL_BLIP) {
2878 		qib_write_kreg(dd, kr_sendctrl, dd->sendctrl);
2879 		qib_write_kreg(dd, kr_scratch, 0);
2880 	}
2881 
2882 	spin_unlock_irqrestore(&dd->sendctrl_lock, flags);
2883 
2884 	if (op & QIB_SENDCTRL_FLUSH) {
2885 		u32 v;
2886 		/*
2887 		 * ensure writes have hit chip, then do a few
2888 		 * more reads, to allow DMA of pioavail registers
2889 		 * to occur, so in-memory copy is in sync with
2890 		 * the chip.  Not always safe to sleep.
2891 		 */
2892 		v = qib_read_kreg32(dd, kr_scratch);
2893 		qib_write_kreg(dd, kr_scratch, v);
2894 		v = qib_read_kreg32(dd, kr_scratch);
2895 		qib_write_kreg(dd, kr_scratch, v);
2896 		qib_read_kreg32(dd, kr_scratch);
2897 	}
2898 }
2899 
2900 /**
2901  * qib_portcntr_7220 - read a per-port counter
2902  * @dd: the qlogic_ib device
2903  * @creg: the counter to snapshot
2904  */
2905 static u64 qib_portcntr_7220(struct qib_pportdata *ppd, u32 reg)
2906 {
2907 	u64 ret = 0ULL;
2908 	struct qib_devdata *dd = ppd->dd;
2909 	u16 creg;
2910 	/* 0xffff for unimplemented or synthesized counters */
2911 	static const u16 xlator[] = {
2912 		[QIBPORTCNTR_PKTSEND] = cr_pktsend,
2913 		[QIBPORTCNTR_WORDSEND] = cr_wordsend,
2914 		[QIBPORTCNTR_PSXMITDATA] = cr_psxmitdatacount,
2915 		[QIBPORTCNTR_PSXMITPKTS] = cr_psxmitpktscount,
2916 		[QIBPORTCNTR_PSXMITWAIT] = cr_psxmitwaitcount,
2917 		[QIBPORTCNTR_SENDSTALL] = cr_sendstall,
2918 		[QIBPORTCNTR_PKTRCV] = cr_pktrcv,
2919 		[QIBPORTCNTR_PSRCVDATA] = cr_psrcvdatacount,
2920 		[QIBPORTCNTR_PSRCVPKTS] = cr_psrcvpktscount,
2921 		[QIBPORTCNTR_RCVEBP] = cr_rcvebp,
2922 		[QIBPORTCNTR_RCVOVFL] = cr_rcvovfl,
2923 		[QIBPORTCNTR_WORDRCV] = cr_wordrcv,
2924 		[QIBPORTCNTR_RXDROPPKT] = cr_rxdroppkt,
2925 		[QIBPORTCNTR_RXLOCALPHYERR] = cr_rxotherlocalphyerr,
2926 		[QIBPORTCNTR_RXVLERR] = cr_rxvlerr,
2927 		[QIBPORTCNTR_ERRICRC] = cr_erricrc,
2928 		[QIBPORTCNTR_ERRVCRC] = cr_errvcrc,
2929 		[QIBPORTCNTR_ERRLPCRC] = cr_errlpcrc,
2930 		[QIBPORTCNTR_BADFORMAT] = cr_badformat,
2931 		[QIBPORTCNTR_ERR_RLEN] = cr_err_rlen,
2932 		[QIBPORTCNTR_IBSYMBOLERR] = cr_ibsymbolerr,
2933 		[QIBPORTCNTR_INVALIDRLEN] = cr_invalidrlen,
2934 		[QIBPORTCNTR_UNSUPVL] = cr_txunsupvl,
2935 		[QIBPORTCNTR_EXCESSBUFOVFL] = cr_excessbufferovfl,
2936 		[QIBPORTCNTR_ERRLINK] = cr_errlink,
2937 		[QIBPORTCNTR_IBLINKDOWN] = cr_iblinkdown,
2938 		[QIBPORTCNTR_IBLINKERRRECOV] = cr_iblinkerrrecov,
2939 		[QIBPORTCNTR_LLI] = cr_locallinkintegrityerr,
2940 		[QIBPORTCNTR_PSINTERVAL] = cr_psinterval,
2941 		[QIBPORTCNTR_PSSTART] = cr_psstart,
2942 		[QIBPORTCNTR_PSSTAT] = cr_psstat,
2943 		[QIBPORTCNTR_VL15PKTDROP] = cr_vl15droppedpkt,
2944 		[QIBPORTCNTR_ERRPKEY] = cr_errpkey,
2945 		[QIBPORTCNTR_KHDROVFL] = 0xffff,
2946 	};
2947 
2948 	if (reg >= ARRAY_SIZE(xlator)) {
2949 		qib_devinfo(ppd->dd->pcidev,
2950 			 "Unimplemented portcounter %u\n", reg);
2951 		goto done;
2952 	}
2953 	creg = xlator[reg];
2954 
2955 	if (reg == QIBPORTCNTR_KHDROVFL) {
2956 		int i;
2957 
2958 		/* sum over all kernel contexts */
2959 		for (i = 0; i < dd->first_user_ctxt; i++)
2960 			ret += read_7220_creg32(dd, cr_portovfl + i);
2961 	}
2962 	if (creg == 0xffff)
2963 		goto done;
2964 
2965 	/*
2966 	 * only fast incrementing counters are 64bit; use 32 bit reads to
2967 	 * avoid two independent reads when on opteron
2968 	 */
2969 	if ((creg == cr_wordsend || creg == cr_wordrcv ||
2970 	     creg == cr_pktsend || creg == cr_pktrcv))
2971 		ret = read_7220_creg(dd, creg);
2972 	else
2973 		ret = read_7220_creg32(dd, creg);
2974 	if (creg == cr_ibsymbolerr) {
2975 		if (dd->pport->cpspec->ibdeltainprog)
2976 			ret -= ret - ppd->cpspec->ibsymsnap;
2977 		ret -= dd->pport->cpspec->ibsymdelta;
2978 	} else if (creg == cr_iblinkerrrecov) {
2979 		if (dd->pport->cpspec->ibdeltainprog)
2980 			ret -= ret - ppd->cpspec->iblnkerrsnap;
2981 		ret -= dd->pport->cpspec->iblnkerrdelta;
2982 	}
2983 done:
2984 	return ret;
2985 }
2986 
2987 /*
2988  * Device counter names (not port-specific), one line per stat,
2989  * single string.  Used by utilities like ipathstats to print the stats
2990  * in a way which works for different versions of drivers, without changing
2991  * the utility.  Names need to be 12 chars or less (w/o newline), for proper
2992  * display by utility.
2993  * Non-error counters are first.
2994  * Start of "error" conters is indicated by a leading "E " on the first
2995  * "error" counter, and doesn't count in label length.
2996  * The EgrOvfl list needs to be last so we truncate them at the configured
2997  * context count for the device.
2998  * cntr7220indices contains the corresponding register indices.
2999  */
3000 static const char cntr7220names[] =
3001 	"Interrupts\n"
3002 	"HostBusStall\n"
3003 	"E RxTIDFull\n"
3004 	"RxTIDInvalid\n"
3005 	"Ctxt0EgrOvfl\n"
3006 	"Ctxt1EgrOvfl\n"
3007 	"Ctxt2EgrOvfl\n"
3008 	"Ctxt3EgrOvfl\n"
3009 	"Ctxt4EgrOvfl\n"
3010 	"Ctxt5EgrOvfl\n"
3011 	"Ctxt6EgrOvfl\n"
3012 	"Ctxt7EgrOvfl\n"
3013 	"Ctxt8EgrOvfl\n"
3014 	"Ctxt9EgrOvfl\n"
3015 	"Ctx10EgrOvfl\n"
3016 	"Ctx11EgrOvfl\n"
3017 	"Ctx12EgrOvfl\n"
3018 	"Ctx13EgrOvfl\n"
3019 	"Ctx14EgrOvfl\n"
3020 	"Ctx15EgrOvfl\n"
3021 	"Ctx16EgrOvfl\n";
3022 
3023 static const size_t cntr7220indices[] = {
3024 	cr_lbint,
3025 	cr_lbflowstall,
3026 	cr_errtidfull,
3027 	cr_errtidvalid,
3028 	cr_portovfl + 0,
3029 	cr_portovfl + 1,
3030 	cr_portovfl + 2,
3031 	cr_portovfl + 3,
3032 	cr_portovfl + 4,
3033 	cr_portovfl + 5,
3034 	cr_portovfl + 6,
3035 	cr_portovfl + 7,
3036 	cr_portovfl + 8,
3037 	cr_portovfl + 9,
3038 	cr_portovfl + 10,
3039 	cr_portovfl + 11,
3040 	cr_portovfl + 12,
3041 	cr_portovfl + 13,
3042 	cr_portovfl + 14,
3043 	cr_portovfl + 15,
3044 	cr_portovfl + 16,
3045 };
3046 
3047 /*
3048  * same as cntr7220names and cntr7220indices, but for port-specific counters.
3049  * portcntr7220indices is somewhat complicated by some registers needing
3050  * adjustments of various kinds, and those are ORed with _PORT_VIRT_FLAG
3051  */
3052 static const char portcntr7220names[] =
3053 	"TxPkt\n"
3054 	"TxFlowPkt\n"
3055 	"TxWords\n"
3056 	"RxPkt\n"
3057 	"RxFlowPkt\n"
3058 	"RxWords\n"
3059 	"TxFlowStall\n"
3060 	"TxDmaDesc\n"  /* 7220 and 7322-only */
3061 	"E RxDlidFltr\n"  /* 7220 and 7322-only */
3062 	"IBStatusChng\n"
3063 	"IBLinkDown\n"
3064 	"IBLnkRecov\n"
3065 	"IBRxLinkErr\n"
3066 	"IBSymbolErr\n"
3067 	"RxLLIErr\n"
3068 	"RxBadFormat\n"
3069 	"RxBadLen\n"
3070 	"RxBufOvrfl\n"
3071 	"RxEBP\n"
3072 	"RxFlowCtlErr\n"
3073 	"RxICRCerr\n"
3074 	"RxLPCRCerr\n"
3075 	"RxVCRCerr\n"
3076 	"RxInvalLen\n"
3077 	"RxInvalPKey\n"
3078 	"RxPktDropped\n"
3079 	"TxBadLength\n"
3080 	"TxDropped\n"
3081 	"TxInvalLen\n"
3082 	"TxUnderrun\n"
3083 	"TxUnsupVL\n"
3084 	"RxLclPhyErr\n" /* 7220 and 7322-only */
3085 	"RxVL15Drop\n" /* 7220 and 7322-only */
3086 	"RxVlErr\n" /* 7220 and 7322-only */
3087 	"XcessBufOvfl\n" /* 7220 and 7322-only */
3088 	;
3089 
3090 #define _PORT_VIRT_FLAG 0x8000 /* "virtual", need adjustments */
3091 static const size_t portcntr7220indices[] = {
3092 	QIBPORTCNTR_PKTSEND | _PORT_VIRT_FLAG,
3093 	cr_pktsendflow,
3094 	QIBPORTCNTR_WORDSEND | _PORT_VIRT_FLAG,
3095 	QIBPORTCNTR_PKTRCV | _PORT_VIRT_FLAG,
3096 	cr_pktrcvflowctrl,
3097 	QIBPORTCNTR_WORDRCV | _PORT_VIRT_FLAG,
3098 	QIBPORTCNTR_SENDSTALL | _PORT_VIRT_FLAG,
3099 	cr_txsdmadesc,
3100 	cr_rxdlidfltr,
3101 	cr_ibstatuschange,
3102 	QIBPORTCNTR_IBLINKDOWN | _PORT_VIRT_FLAG,
3103 	QIBPORTCNTR_IBLINKERRRECOV | _PORT_VIRT_FLAG,
3104 	QIBPORTCNTR_ERRLINK | _PORT_VIRT_FLAG,
3105 	QIBPORTCNTR_IBSYMBOLERR | _PORT_VIRT_FLAG,
3106 	QIBPORTCNTR_LLI | _PORT_VIRT_FLAG,
3107 	QIBPORTCNTR_BADFORMAT | _PORT_VIRT_FLAG,
3108 	QIBPORTCNTR_ERR_RLEN | _PORT_VIRT_FLAG,
3109 	QIBPORTCNTR_RCVOVFL | _PORT_VIRT_FLAG,
3110 	QIBPORTCNTR_RCVEBP | _PORT_VIRT_FLAG,
3111 	cr_rcvflowctrl_err,
3112 	QIBPORTCNTR_ERRICRC | _PORT_VIRT_FLAG,
3113 	QIBPORTCNTR_ERRLPCRC | _PORT_VIRT_FLAG,
3114 	QIBPORTCNTR_ERRVCRC | _PORT_VIRT_FLAG,
3115 	QIBPORTCNTR_INVALIDRLEN | _PORT_VIRT_FLAG,
3116 	QIBPORTCNTR_ERRPKEY | _PORT_VIRT_FLAG,
3117 	QIBPORTCNTR_RXDROPPKT | _PORT_VIRT_FLAG,
3118 	cr_invalidslen,
3119 	cr_senddropped,
3120 	cr_errslen,
3121 	cr_sendunderrun,
3122 	cr_txunsupvl,
3123 	QIBPORTCNTR_RXLOCALPHYERR | _PORT_VIRT_FLAG,
3124 	QIBPORTCNTR_VL15PKTDROP | _PORT_VIRT_FLAG,
3125 	QIBPORTCNTR_RXVLERR | _PORT_VIRT_FLAG,
3126 	QIBPORTCNTR_EXCESSBUFOVFL | _PORT_VIRT_FLAG,
3127 };
3128 
3129 /* do all the setup to make the counter reads efficient later */
3130 static void init_7220_cntrnames(struct qib_devdata *dd)
3131 {
3132 	int i, j = 0;
3133 	char *s;
3134 
3135 	for (i = 0, s = (char *)cntr7220names; s && j <= dd->cfgctxts;
3136 	     i++) {
3137 		/* we always have at least one counter before the egrovfl */
3138 		if (!j && !strncmp("Ctxt0EgrOvfl", s + 1, 12))
3139 			j = 1;
3140 		s = strchr(s + 1, '\n');
3141 		if (s && j)
3142 			j++;
3143 	}
3144 	dd->cspec->ncntrs = i;
3145 	if (!s)
3146 		/* full list; size is without terminating null */
3147 		dd->cspec->cntrnamelen = sizeof(cntr7220names) - 1;
3148 	else
3149 		dd->cspec->cntrnamelen = 1 + s - cntr7220names;
3150 	dd->cspec->cntrs = kmalloc_array(dd->cspec->ncntrs, sizeof(u64),
3151 					 GFP_KERNEL);
3152 
3153 	for (i = 0, s = (char *)portcntr7220names; s; i++)
3154 		s = strchr(s + 1, '\n');
3155 	dd->cspec->nportcntrs = i - 1;
3156 	dd->cspec->portcntrnamelen = sizeof(portcntr7220names) - 1;
3157 	dd->cspec->portcntrs = kmalloc_array(dd->cspec->nportcntrs,
3158 					     sizeof(u64),
3159 					     GFP_KERNEL);
3160 }
3161 
3162 static u32 qib_read_7220cntrs(struct qib_devdata *dd, loff_t pos, char **namep,
3163 			      u64 **cntrp)
3164 {
3165 	u32 ret;
3166 
3167 	if (!dd->cspec->cntrs) {
3168 		ret = 0;
3169 		goto done;
3170 	}
3171 
3172 	if (namep) {
3173 		*namep = (char *)cntr7220names;
3174 		ret = dd->cspec->cntrnamelen;
3175 		if (pos >= ret)
3176 			ret = 0; /* final read after getting everything */
3177 	} else {
3178 		u64 *cntr = dd->cspec->cntrs;
3179 		int i;
3180 
3181 		ret = dd->cspec->ncntrs * sizeof(u64);
3182 		if (!cntr || pos >= ret) {
3183 			/* everything read, or couldn't get memory */
3184 			ret = 0;
3185 			goto done;
3186 		}
3187 
3188 		*cntrp = cntr;
3189 		for (i = 0; i < dd->cspec->ncntrs; i++)
3190 			*cntr++ = read_7220_creg32(dd, cntr7220indices[i]);
3191 	}
3192 done:
3193 	return ret;
3194 }
3195 
3196 static u32 qib_read_7220portcntrs(struct qib_devdata *dd, loff_t pos, u32 port,
3197 				  char **namep, u64 **cntrp)
3198 {
3199 	u32 ret;
3200 
3201 	if (!dd->cspec->portcntrs) {
3202 		ret = 0;
3203 		goto done;
3204 	}
3205 	if (namep) {
3206 		*namep = (char *)portcntr7220names;
3207 		ret = dd->cspec->portcntrnamelen;
3208 		if (pos >= ret)
3209 			ret = 0; /* final read after getting everything */
3210 	} else {
3211 		u64 *cntr = dd->cspec->portcntrs;
3212 		struct qib_pportdata *ppd = &dd->pport[port];
3213 		int i;
3214 
3215 		ret = dd->cspec->nportcntrs * sizeof(u64);
3216 		if (!cntr || pos >= ret) {
3217 			/* everything read, or couldn't get memory */
3218 			ret = 0;
3219 			goto done;
3220 		}
3221 		*cntrp = cntr;
3222 		for (i = 0; i < dd->cspec->nportcntrs; i++) {
3223 			if (portcntr7220indices[i] & _PORT_VIRT_FLAG)
3224 				*cntr++ = qib_portcntr_7220(ppd,
3225 					portcntr7220indices[i] &
3226 					~_PORT_VIRT_FLAG);
3227 			else
3228 				*cntr++ = read_7220_creg32(dd,
3229 					   portcntr7220indices[i]);
3230 		}
3231 	}
3232 done:
3233 	return ret;
3234 }
3235 
3236 /**
3237  * qib_get_7220_faststats - get word counters from chip before they overflow
3238  * @opaque - contains a pointer to the qlogic_ib device qib_devdata
3239  *
3240  * This needs more work; in particular, decision on whether we really
3241  * need traffic_wds done the way it is
3242  * called from add_timer
3243  */
3244 static void qib_get_7220_faststats(struct timer_list *t)
3245 {
3246 	struct qib_devdata *dd = from_timer(dd, t, stats_timer);
3247 	struct qib_pportdata *ppd = dd->pport;
3248 	unsigned long flags;
3249 	u64 traffic_wds;
3250 
3251 	/*
3252 	 * don't access the chip while running diags, or memory diags can
3253 	 * fail
3254 	 */
3255 	if (!(dd->flags & QIB_INITTED) || dd->diag_client)
3256 		/* but re-arm the timer, for diags case; won't hurt other */
3257 		goto done;
3258 
3259 	/*
3260 	 * We now try to maintain an activity timer, based on traffic
3261 	 * exceeding a threshold, so we need to check the word-counts
3262 	 * even if they are 64-bit.
3263 	 */
3264 	traffic_wds = qib_portcntr_7220(ppd, cr_wordsend) +
3265 		qib_portcntr_7220(ppd, cr_wordrcv);
3266 	spin_lock_irqsave(&dd->eep_st_lock, flags);
3267 	traffic_wds -= dd->traffic_wds;
3268 	dd->traffic_wds += traffic_wds;
3269 	spin_unlock_irqrestore(&dd->eep_st_lock, flags);
3270 done:
3271 	mod_timer(&dd->stats_timer, jiffies + HZ * ACTIVITY_TIMER);
3272 }
3273 
3274 /*
3275  * If we are using MSI, try to fallback to INTx.
3276  */
3277 static int qib_7220_intr_fallback(struct qib_devdata *dd)
3278 {
3279 	if (!dd->msi_lo)
3280 		return 0;
3281 
3282 	qib_devinfo(dd->pcidev,
3283 		    "MSI interrupt not detected, trying INTx interrupts\n");
3284 
3285 	qib_free_irq(dd);
3286 	dd->msi_lo = 0;
3287 	if (pci_alloc_irq_vectors(dd->pcidev, 1, 1, PCI_IRQ_LEGACY) < 0)
3288 		qib_dev_err(dd, "Failed to enable INTx\n");
3289 	qib_setup_7220_interrupt(dd);
3290 	return 1;
3291 }
3292 
3293 /*
3294  * Reset the XGXS (between serdes and IBC).  Slightly less intrusive
3295  * than resetting the IBC or external link state, and useful in some
3296  * cases to cause some retraining.  To do this right, we reset IBC
3297  * as well.
3298  */
3299 static void qib_7220_xgxs_reset(struct qib_pportdata *ppd)
3300 {
3301 	u64 val, prev_val;
3302 	struct qib_devdata *dd = ppd->dd;
3303 
3304 	prev_val = qib_read_kreg64(dd, kr_xgxs_cfg);
3305 	val = prev_val | QLOGIC_IB_XGXS_RESET;
3306 	prev_val &= ~QLOGIC_IB_XGXS_RESET; /* be sure */
3307 	qib_write_kreg(dd, kr_control,
3308 		       dd->control & ~QLOGIC_IB_C_LINKENABLE);
3309 	qib_write_kreg(dd, kr_xgxs_cfg, val);
3310 	qib_read_kreg32(dd, kr_scratch);
3311 	qib_write_kreg(dd, kr_xgxs_cfg, prev_val);
3312 	qib_write_kreg(dd, kr_control, dd->control);
3313 }
3314 
3315 /*
3316  * For this chip, we want to use the same buffer every time
3317  * when we are trying to bring the link up (they are always VL15
3318  * packets).  At that link state the packet should always go out immediately
3319  * (or at least be discarded at the tx interface if the link is down).
3320  * If it doesn't, and the buffer isn't available, that means some other
3321  * sender has gotten ahead of us, and is preventing our packet from going
3322  * out.  In that case, we flush all packets, and try again.  If that still
3323  * fails, we fail the request, and hope things work the next time around.
3324  *
3325  * We don't need very complicated heuristics on whether the packet had
3326  * time to go out or not, since even at SDR 1X, it goes out in very short
3327  * time periods, covered by the chip reads done here and as part of the
3328  * flush.
3329  */
3330 static u32 __iomem *get_7220_link_buf(struct qib_pportdata *ppd, u32 *bnum)
3331 {
3332 	u32 __iomem *buf;
3333 	u32 lbuf = ppd->dd->cspec->lastbuf_for_pio;
3334 	int do_cleanup;
3335 	unsigned long flags;
3336 
3337 	/*
3338 	 * always blip to get avail list updated, since it's almost
3339 	 * always needed, and is fairly cheap.
3340 	 */
3341 	sendctrl_7220_mod(ppd->dd->pport, QIB_SENDCTRL_AVAIL_BLIP);
3342 	qib_read_kreg64(ppd->dd, kr_scratch); /* extra chip flush */
3343 	buf = qib_getsendbuf_range(ppd->dd, bnum, lbuf, lbuf);
3344 	if (buf)
3345 		goto done;
3346 
3347 	spin_lock_irqsave(&ppd->sdma_lock, flags);
3348 	if (ppd->sdma_state.current_state == qib_sdma_state_s20_idle &&
3349 	    ppd->sdma_state.current_state != qib_sdma_state_s00_hw_down) {
3350 		__qib_sdma_process_event(ppd, qib_sdma_event_e00_go_hw_down);
3351 		do_cleanup = 0;
3352 	} else {
3353 		do_cleanup = 1;
3354 		qib_7220_sdma_hw_clean_up(ppd);
3355 	}
3356 	spin_unlock_irqrestore(&ppd->sdma_lock, flags);
3357 
3358 	if (do_cleanup) {
3359 		qib_read_kreg64(ppd->dd, kr_scratch); /* extra chip flush */
3360 		buf = qib_getsendbuf_range(ppd->dd, bnum, lbuf, lbuf);
3361 	}
3362 done:
3363 	return buf;
3364 }
3365 
3366 /*
3367  * This code for non-IBTA-compliant IB speed negotiation is only known to
3368  * work for the SDR to DDR transition, and only between an HCA and a switch
3369  * with recent firmware.  It is based on observed heuristics, rather than
3370  * actual knowledge of the non-compliant speed negotiation.
3371  * It has a number of hard-coded fields, since the hope is to rewrite this
3372  * when a spec is available on how the negoation is intended to work.
3373  */
3374 static void autoneg_7220_sendpkt(struct qib_pportdata *ppd, u32 *hdr,
3375 				 u32 dcnt, u32 *data)
3376 {
3377 	int i;
3378 	u64 pbc;
3379 	u32 __iomem *piobuf;
3380 	u32 pnum;
3381 	struct qib_devdata *dd = ppd->dd;
3382 
3383 	i = 0;
3384 	pbc = 7 + dcnt + 1; /* 7 dword header, dword data, icrc */
3385 	pbc |= PBC_7220_VL15_SEND;
3386 	while (!(piobuf = get_7220_link_buf(ppd, &pnum))) {
3387 		if (i++ > 5)
3388 			return;
3389 		udelay(2);
3390 	}
3391 	sendctrl_7220_mod(dd->pport, QIB_SENDCTRL_DISARM_BUF(pnum));
3392 	writeq(pbc, piobuf);
3393 	qib_flush_wc();
3394 	qib_pio_copy(piobuf + 2, hdr, 7);
3395 	qib_pio_copy(piobuf + 9, data, dcnt);
3396 	if (dd->flags & QIB_USE_SPCL_TRIG) {
3397 		u32 spcl_off = (pnum >= dd->piobcnt2k) ? 2047 : 1023;
3398 
3399 		qib_flush_wc();
3400 		__raw_writel(0xaebecede, piobuf + spcl_off);
3401 	}
3402 	qib_flush_wc();
3403 	qib_sendbuf_done(dd, pnum);
3404 }
3405 
3406 /*
3407  * _start packet gets sent twice at start, _done gets sent twice at end
3408  */
3409 static void autoneg_7220_send(struct qib_pportdata *ppd, int which)
3410 {
3411 	struct qib_devdata *dd = ppd->dd;
3412 	static u32 swapped;
3413 	u32 dw, i, hcnt, dcnt, *data;
3414 	static u32 hdr[7] = { 0xf002ffff, 0x48ffff, 0x6400abba };
3415 	static u32 madpayload_start[0x40] = {
3416 		0x1810103, 0x1, 0x0, 0x0, 0x2c90000, 0x2c9, 0x0, 0x0,
3417 		0xffffffff, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
3418 		0x1, 0x1388, 0x15e, 0x1, /* rest 0's */
3419 		};
3420 	static u32 madpayload_done[0x40] = {
3421 		0x1810103, 0x1, 0x0, 0x0, 0x2c90000, 0x2c9, 0x0, 0x0,
3422 		0xffffffff, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0, 0x0,
3423 		0x40000001, 0x1388, 0x15e, /* rest 0's */
3424 		};
3425 
3426 	dcnt = ARRAY_SIZE(madpayload_start);
3427 	hcnt = ARRAY_SIZE(hdr);
3428 	if (!swapped) {
3429 		/* for maintainability, do it at runtime */
3430 		for (i = 0; i < hcnt; i++) {
3431 			dw = (__force u32) cpu_to_be32(hdr[i]);
3432 			hdr[i] = dw;
3433 		}
3434 		for (i = 0; i < dcnt; i++) {
3435 			dw = (__force u32) cpu_to_be32(madpayload_start[i]);
3436 			madpayload_start[i] = dw;
3437 			dw = (__force u32) cpu_to_be32(madpayload_done[i]);
3438 			madpayload_done[i] = dw;
3439 		}
3440 		swapped = 1;
3441 	}
3442 
3443 	data = which ? madpayload_done : madpayload_start;
3444 
3445 	autoneg_7220_sendpkt(ppd, hdr, dcnt, data);
3446 	qib_read_kreg64(dd, kr_scratch);
3447 	udelay(2);
3448 	autoneg_7220_sendpkt(ppd, hdr, dcnt, data);
3449 	qib_read_kreg64(dd, kr_scratch);
3450 	udelay(2);
3451 }
3452 
3453 /*
3454  * Do the absolute minimum to cause an IB speed change, and make it
3455  * ready, but don't actually trigger the change.   The caller will
3456  * do that when ready (if link is in Polling training state, it will
3457  * happen immediately, otherwise when link next goes down)
3458  *
3459  * This routine should only be used as part of the DDR autonegotation
3460  * code for devices that are not compliant with IB 1.2 (or code that
3461  * fixes things up for same).
3462  *
3463  * When link has gone down, and autoneg enabled, or autoneg has
3464  * failed and we give up until next time we set both speeds, and
3465  * then we want IBTA enabled as well as "use max enabled speed.
3466  */
3467 static void set_7220_ibspeed_fast(struct qib_pportdata *ppd, u32 speed)
3468 {
3469 	ppd->cpspec->ibcddrctrl &= ~(IBA7220_IBC_SPEED_AUTONEG_MASK |
3470 		IBA7220_IBC_IBTA_1_2_MASK);
3471 
3472 	if (speed == (QIB_IB_SDR | QIB_IB_DDR))
3473 		ppd->cpspec->ibcddrctrl |= IBA7220_IBC_SPEED_AUTONEG_MASK |
3474 			IBA7220_IBC_IBTA_1_2_MASK;
3475 	else
3476 		ppd->cpspec->ibcddrctrl |= speed == QIB_IB_DDR ?
3477 			IBA7220_IBC_SPEED_DDR : IBA7220_IBC_SPEED_SDR;
3478 
3479 	qib_write_kreg(ppd->dd, kr_ibcddrctrl, ppd->cpspec->ibcddrctrl);
3480 	qib_write_kreg(ppd->dd, kr_scratch, 0);
3481 }
3482 
3483 /*
3484  * This routine is only used when we are not talking to another
3485  * IB 1.2-compliant device that we think can do DDR.
3486  * (This includes all existing switch chips as of Oct 2007.)
3487  * 1.2-compliant devices go directly to DDR prior to reaching INIT
3488  */
3489 static void try_7220_autoneg(struct qib_pportdata *ppd)
3490 {
3491 	unsigned long flags;
3492 
3493 	/*
3494 	 * Required for older non-IB1.2 DDR switches.  Newer
3495 	 * non-IB-compliant switches don't need it, but so far,
3496 	 * aren't bothered by it either.  "Magic constant"
3497 	 */
3498 	qib_write_kreg(ppd->dd, kr_ncmodectrl, 0x3b9dc07);
3499 
3500 	spin_lock_irqsave(&ppd->lflags_lock, flags);
3501 	ppd->lflags |= QIBL_IB_AUTONEG_INPROG;
3502 	spin_unlock_irqrestore(&ppd->lflags_lock, flags);
3503 	autoneg_7220_send(ppd, 0);
3504 	set_7220_ibspeed_fast(ppd, QIB_IB_DDR);
3505 
3506 	toggle_7220_rclkrls(ppd->dd);
3507 	/* 2 msec is minimum length of a poll cycle */
3508 	queue_delayed_work(ib_wq, &ppd->cpspec->autoneg_work,
3509 			   msecs_to_jiffies(2));
3510 }
3511 
3512 /*
3513  * Handle the empirically determined mechanism for auto-negotiation
3514  * of DDR speed with switches.
3515  */
3516 static void autoneg_7220_work(struct work_struct *work)
3517 {
3518 	struct qib_pportdata *ppd;
3519 	struct qib_devdata *dd;
3520 	u32 i;
3521 	unsigned long flags;
3522 
3523 	ppd = &container_of(work, struct qib_chippport_specific,
3524 			    autoneg_work.work)->pportdata;
3525 	dd = ppd->dd;
3526 
3527 	/*
3528 	 * Busy wait for this first part, it should be at most a
3529 	 * few hundred usec, since we scheduled ourselves for 2msec.
3530 	 */
3531 	for (i = 0; i < 25; i++) {
3532 		if (SYM_FIELD(ppd->lastibcstat, IBCStatus, LinkTrainingState)
3533 		     == IB_7220_LT_STATE_POLLQUIET) {
3534 			qib_set_linkstate(ppd, QIB_IB_LINKDOWN_DISABLE);
3535 			break;
3536 		}
3537 		udelay(100);
3538 	}
3539 
3540 	if (!(ppd->lflags & QIBL_IB_AUTONEG_INPROG))
3541 		goto done; /* we got there early or told to stop */
3542 
3543 	/* we expect this to timeout */
3544 	if (wait_event_timeout(ppd->cpspec->autoneg_wait,
3545 			       !(ppd->lflags & QIBL_IB_AUTONEG_INPROG),
3546 			       msecs_to_jiffies(90)))
3547 		goto done;
3548 
3549 	toggle_7220_rclkrls(dd);
3550 
3551 	/* we expect this to timeout */
3552 	if (wait_event_timeout(ppd->cpspec->autoneg_wait,
3553 			       !(ppd->lflags & QIBL_IB_AUTONEG_INPROG),
3554 			       msecs_to_jiffies(1700)))
3555 		goto done;
3556 
3557 	set_7220_ibspeed_fast(ppd, QIB_IB_SDR);
3558 	toggle_7220_rclkrls(dd);
3559 
3560 	/*
3561 	 * Wait up to 250 msec for link to train and get to INIT at DDR;
3562 	 * this should terminate early.
3563 	 */
3564 	wait_event_timeout(ppd->cpspec->autoneg_wait,
3565 		!(ppd->lflags & QIBL_IB_AUTONEG_INPROG),
3566 		msecs_to_jiffies(250));
3567 done:
3568 	if (ppd->lflags & QIBL_IB_AUTONEG_INPROG) {
3569 		spin_lock_irqsave(&ppd->lflags_lock, flags);
3570 		ppd->lflags &= ~QIBL_IB_AUTONEG_INPROG;
3571 		if (dd->cspec->autoneg_tries == AUTONEG_TRIES) {
3572 			ppd->lflags |= QIBL_IB_AUTONEG_FAILED;
3573 			dd->cspec->autoneg_tries = 0;
3574 		}
3575 		spin_unlock_irqrestore(&ppd->lflags_lock, flags);
3576 		set_7220_ibspeed_fast(ppd, ppd->link_speed_enabled);
3577 	}
3578 }
3579 
3580 static u32 qib_7220_iblink_state(u64 ibcs)
3581 {
3582 	u32 state = (u32)SYM_FIELD(ibcs, IBCStatus, LinkState);
3583 
3584 	switch (state) {
3585 	case IB_7220_L_STATE_INIT:
3586 		state = IB_PORT_INIT;
3587 		break;
3588 	case IB_7220_L_STATE_ARM:
3589 		state = IB_PORT_ARMED;
3590 		break;
3591 	case IB_7220_L_STATE_ACTIVE:
3592 		/* fall through */
3593 	case IB_7220_L_STATE_ACT_DEFER:
3594 		state = IB_PORT_ACTIVE;
3595 		break;
3596 	default: /* fall through */
3597 	case IB_7220_L_STATE_DOWN:
3598 		state = IB_PORT_DOWN;
3599 		break;
3600 	}
3601 	return state;
3602 }
3603 
3604 /* returns the IBTA port state, rather than the IBC link training state */
3605 static u8 qib_7220_phys_portstate(u64 ibcs)
3606 {
3607 	u8 state = (u8)SYM_FIELD(ibcs, IBCStatus, LinkTrainingState);
3608 	return qib_7220_physportstate[state];
3609 }
3610 
3611 static int qib_7220_ib_updown(struct qib_pportdata *ppd, int ibup, u64 ibcs)
3612 {
3613 	int ret = 0, symadj = 0;
3614 	struct qib_devdata *dd = ppd->dd;
3615 	unsigned long flags;
3616 
3617 	spin_lock_irqsave(&ppd->lflags_lock, flags);
3618 	ppd->lflags &= ~QIBL_IB_FORCE_NOTIFY;
3619 	spin_unlock_irqrestore(&ppd->lflags_lock, flags);
3620 
3621 	if (!ibup) {
3622 		/*
3623 		 * When the link goes down we don't want AEQ running, so it
3624 		 * won't interfere with IBC training, etc., and we need
3625 		 * to go back to the static SerDes preset values.
3626 		 */
3627 		if (!(ppd->lflags & (QIBL_IB_AUTONEG_FAILED |
3628 				     QIBL_IB_AUTONEG_INPROG)))
3629 			set_7220_ibspeed_fast(ppd, ppd->link_speed_enabled);
3630 		if (!(ppd->lflags & QIBL_IB_AUTONEG_INPROG)) {
3631 			qib_sd7220_presets(dd);
3632 			qib_cancel_sends(ppd); /* initial disarm, etc. */
3633 			spin_lock_irqsave(&ppd->sdma_lock, flags);
3634 			if (__qib_sdma_running(ppd))
3635 				__qib_sdma_process_event(ppd,
3636 					qib_sdma_event_e70_go_idle);
3637 			spin_unlock_irqrestore(&ppd->sdma_lock, flags);
3638 		}
3639 		/* this might better in qib_sd7220_presets() */
3640 		set_7220_relock_poll(dd, ibup);
3641 	} else {
3642 		if (qib_compat_ddr_negotiate &&
3643 		    !(ppd->lflags & (QIBL_IB_AUTONEG_FAILED |
3644 				     QIBL_IB_AUTONEG_INPROG)) &&
3645 		    ppd->link_speed_active == QIB_IB_SDR &&
3646 		    (ppd->link_speed_enabled & (QIB_IB_DDR | QIB_IB_SDR)) ==
3647 		    (QIB_IB_DDR | QIB_IB_SDR) &&
3648 		    dd->cspec->autoneg_tries < AUTONEG_TRIES) {
3649 			/* we are SDR, and DDR auto-negotiation enabled */
3650 			++dd->cspec->autoneg_tries;
3651 			if (!ppd->cpspec->ibdeltainprog) {
3652 				ppd->cpspec->ibdeltainprog = 1;
3653 				ppd->cpspec->ibsymsnap = read_7220_creg32(dd,
3654 					cr_ibsymbolerr);
3655 				ppd->cpspec->iblnkerrsnap = read_7220_creg32(dd,
3656 					cr_iblinkerrrecov);
3657 			}
3658 			try_7220_autoneg(ppd);
3659 			ret = 1; /* no other IB status change processing */
3660 		} else if ((ppd->lflags & QIBL_IB_AUTONEG_INPROG) &&
3661 			   ppd->link_speed_active == QIB_IB_SDR) {
3662 			autoneg_7220_send(ppd, 1);
3663 			set_7220_ibspeed_fast(ppd, QIB_IB_DDR);
3664 			udelay(2);
3665 			toggle_7220_rclkrls(dd);
3666 			ret = 1; /* no other IB status change processing */
3667 		} else {
3668 			if ((ppd->lflags & QIBL_IB_AUTONEG_INPROG) &&
3669 			    (ppd->link_speed_active & QIB_IB_DDR)) {
3670 				spin_lock_irqsave(&ppd->lflags_lock, flags);
3671 				ppd->lflags &= ~(QIBL_IB_AUTONEG_INPROG |
3672 						 QIBL_IB_AUTONEG_FAILED);
3673 				spin_unlock_irqrestore(&ppd->lflags_lock,
3674 						       flags);
3675 				dd->cspec->autoneg_tries = 0;
3676 				/* re-enable SDR, for next link down */
3677 				set_7220_ibspeed_fast(ppd,
3678 						      ppd->link_speed_enabled);
3679 				wake_up(&ppd->cpspec->autoneg_wait);
3680 				symadj = 1;
3681 			} else if (ppd->lflags & QIBL_IB_AUTONEG_FAILED) {
3682 				/*
3683 				 * Clear autoneg failure flag, and do setup
3684 				 * so we'll try next time link goes down and
3685 				 * back to INIT (possibly connected to a
3686 				 * different device).
3687 				 */
3688 				spin_lock_irqsave(&ppd->lflags_lock, flags);
3689 				ppd->lflags &= ~QIBL_IB_AUTONEG_FAILED;
3690 				spin_unlock_irqrestore(&ppd->lflags_lock,
3691 						       flags);
3692 				ppd->cpspec->ibcddrctrl |=
3693 					IBA7220_IBC_IBTA_1_2_MASK;
3694 				qib_write_kreg(dd, kr_ncmodectrl, 0);
3695 				symadj = 1;
3696 			}
3697 		}
3698 
3699 		if (!(ppd->lflags & QIBL_IB_AUTONEG_INPROG))
3700 			symadj = 1;
3701 
3702 		if (!ret) {
3703 			ppd->delay_mult = rate_to_delay
3704 			    [(ibcs >> IBA7220_LINKSPEED_SHIFT) & 1]
3705 			    [(ibcs >> IBA7220_LINKWIDTH_SHIFT) & 1];
3706 
3707 			set_7220_relock_poll(dd, ibup);
3708 			spin_lock_irqsave(&ppd->sdma_lock, flags);
3709 			/*
3710 			 * Unlike 7322, the 7220 needs this, due to lack of
3711 			 * interrupt in some cases when we have sdma active
3712 			 * when the link goes down.
3713 			 */
3714 			if (ppd->sdma_state.current_state !=
3715 			    qib_sdma_state_s20_idle)
3716 				__qib_sdma_process_event(ppd,
3717 					qib_sdma_event_e00_go_hw_down);
3718 			spin_unlock_irqrestore(&ppd->sdma_lock, flags);
3719 		}
3720 	}
3721 
3722 	if (symadj) {
3723 		if (ppd->cpspec->ibdeltainprog) {
3724 			ppd->cpspec->ibdeltainprog = 0;
3725 			ppd->cpspec->ibsymdelta += read_7220_creg32(ppd->dd,
3726 				cr_ibsymbolerr) - ppd->cpspec->ibsymsnap;
3727 			ppd->cpspec->iblnkerrdelta += read_7220_creg32(ppd->dd,
3728 				cr_iblinkerrrecov) - ppd->cpspec->iblnkerrsnap;
3729 		}
3730 	} else if (!ibup && qib_compat_ddr_negotiate &&
3731 		   !ppd->cpspec->ibdeltainprog &&
3732 			!(ppd->lflags & QIBL_IB_AUTONEG_INPROG)) {
3733 		ppd->cpspec->ibdeltainprog = 1;
3734 		ppd->cpspec->ibsymsnap = read_7220_creg32(ppd->dd,
3735 							  cr_ibsymbolerr);
3736 		ppd->cpspec->iblnkerrsnap = read_7220_creg32(ppd->dd,
3737 						     cr_iblinkerrrecov);
3738 	}
3739 
3740 	if (!ret)
3741 		qib_setup_7220_setextled(ppd, ibup);
3742 	return ret;
3743 }
3744 
3745 /*
3746  * Does read/modify/write to appropriate registers to
3747  * set output and direction bits selected by mask.
3748  * these are in their canonical postions (e.g. lsb of
3749  * dir will end up in D48 of extctrl on existing chips).
3750  * returns contents of GP Inputs.
3751  */
3752 static int gpio_7220_mod(struct qib_devdata *dd, u32 out, u32 dir, u32 mask)
3753 {
3754 	u64 read_val, new_out;
3755 	unsigned long flags;
3756 
3757 	if (mask) {
3758 		/* some bits being written, lock access to GPIO */
3759 		dir &= mask;
3760 		out &= mask;
3761 		spin_lock_irqsave(&dd->cspec->gpio_lock, flags);
3762 		dd->cspec->extctrl &= ~((u64)mask << SYM_LSB(EXTCtrl, GPIOOe));
3763 		dd->cspec->extctrl |= ((u64) dir << SYM_LSB(EXTCtrl, GPIOOe));
3764 		new_out = (dd->cspec->gpio_out & ~mask) | out;
3765 
3766 		qib_write_kreg(dd, kr_extctrl, dd->cspec->extctrl);
3767 		qib_write_kreg(dd, kr_gpio_out, new_out);
3768 		dd->cspec->gpio_out = new_out;
3769 		spin_unlock_irqrestore(&dd->cspec->gpio_lock, flags);
3770 	}
3771 	/*
3772 	 * It is unlikely that a read at this time would get valid
3773 	 * data on a pin whose direction line was set in the same
3774 	 * call to this function. We include the read here because
3775 	 * that allows us to potentially combine a change on one pin with
3776 	 * a read on another, and because the old code did something like
3777 	 * this.
3778 	 */
3779 	read_val = qib_read_kreg64(dd, kr_extstatus);
3780 	return SYM_FIELD(read_val, EXTStatus, GPIOIn);
3781 }
3782 
3783 /*
3784  * Read fundamental info we need to use the chip.  These are
3785  * the registers that describe chip capabilities, and are
3786  * saved in shadow registers.
3787  */
3788 static void get_7220_chip_params(struct qib_devdata *dd)
3789 {
3790 	u64 val;
3791 	u32 piobufs;
3792 	int mtu;
3793 
3794 	dd->uregbase = qib_read_kreg32(dd, kr_userregbase);
3795 
3796 	dd->rcvtidcnt = qib_read_kreg32(dd, kr_rcvtidcnt);
3797 	dd->rcvtidbase = qib_read_kreg32(dd, kr_rcvtidbase);
3798 	dd->rcvegrbase = qib_read_kreg32(dd, kr_rcvegrbase);
3799 	dd->palign = qib_read_kreg32(dd, kr_palign);
3800 	dd->piobufbase = qib_read_kreg64(dd, kr_sendpiobufbase);
3801 	dd->pio2k_bufbase = dd->piobufbase & 0xffffffff;
3802 
3803 	val = qib_read_kreg64(dd, kr_sendpiosize);
3804 	dd->piosize2k = val & ~0U;
3805 	dd->piosize4k = val >> 32;
3806 
3807 	mtu = ib_mtu_enum_to_int(qib_ibmtu);
3808 	if (mtu == -1)
3809 		mtu = QIB_DEFAULT_MTU;
3810 	dd->pport->ibmtu = (u32)mtu;
3811 
3812 	val = qib_read_kreg64(dd, kr_sendpiobufcnt);
3813 	dd->piobcnt2k = val & ~0U;
3814 	dd->piobcnt4k = val >> 32;
3815 	/* these may be adjusted in init_chip_wc_pat() */
3816 	dd->pio2kbase = (u32 __iomem *)
3817 		((char __iomem *) dd->kregbase + dd->pio2k_bufbase);
3818 	if (dd->piobcnt4k) {
3819 		dd->pio4kbase = (u32 __iomem *)
3820 			((char __iomem *) dd->kregbase +
3821 			 (dd->piobufbase >> 32));
3822 		/*
3823 		 * 4K buffers take 2 pages; we use roundup just to be
3824 		 * paranoid; we calculate it once here, rather than on
3825 		 * ever buf allocate
3826 		 */
3827 		dd->align4k = ALIGN(dd->piosize4k, dd->palign);
3828 	}
3829 
3830 	piobufs = dd->piobcnt4k + dd->piobcnt2k;
3831 
3832 	dd->pioavregs = ALIGN(piobufs, sizeof(u64) * BITS_PER_BYTE / 2) /
3833 		(sizeof(u64) * BITS_PER_BYTE / 2);
3834 }
3835 
3836 /*
3837  * The chip base addresses in cspec and cpspec have to be set
3838  * after possible init_chip_wc_pat(), rather than in
3839  * qib_get_7220_chip_params(), so split out as separate function
3840  */
3841 static void set_7220_baseaddrs(struct qib_devdata *dd)
3842 {
3843 	u32 cregbase;
3844 	/* init after possible re-map in init_chip_wc_pat() */
3845 	cregbase = qib_read_kreg32(dd, kr_counterregbase);
3846 	dd->cspec->cregbase = (u64 __iomem *)
3847 		((char __iomem *) dd->kregbase + cregbase);
3848 
3849 	dd->egrtidbase = (u64 __iomem *)
3850 		((char __iomem *) dd->kregbase + dd->rcvegrbase);
3851 }
3852 
3853 
3854 #define SENDCTRL_SHADOWED (SYM_MASK(SendCtrl, SendIntBufAvail) |	\
3855 			   SYM_MASK(SendCtrl, SPioEnable) |		\
3856 			   SYM_MASK(SendCtrl, SSpecialTriggerEn) |	\
3857 			   SYM_MASK(SendCtrl, SendBufAvailUpd) |	\
3858 			   SYM_MASK(SendCtrl, AvailUpdThld) |		\
3859 			   SYM_MASK(SendCtrl, SDmaEnable) |		\
3860 			   SYM_MASK(SendCtrl, SDmaIntEnable) |		\
3861 			   SYM_MASK(SendCtrl, SDmaHalt) |		\
3862 			   SYM_MASK(SendCtrl, SDmaSingleDescriptor))
3863 
3864 static int sendctrl_hook(struct qib_devdata *dd,
3865 			 const struct diag_observer *op,
3866 			 u32 offs, u64 *data, u64 mask, int only_32)
3867 {
3868 	unsigned long flags;
3869 	unsigned idx = offs / sizeof(u64);
3870 	u64 local_data, all_bits;
3871 
3872 	if (idx != kr_sendctrl) {
3873 		qib_dev_err(dd, "SendCtrl Hook called with offs %X, %s-bit\n",
3874 			    offs, only_32 ? "32" : "64");
3875 		return 0;
3876 	}
3877 
3878 	all_bits = ~0ULL;
3879 	if (only_32)
3880 		all_bits >>= 32;
3881 	spin_lock_irqsave(&dd->sendctrl_lock, flags);
3882 	if ((mask & all_bits) != all_bits) {
3883 		/*
3884 		 * At least some mask bits are zero, so we need
3885 		 * to read. The judgement call is whether from
3886 		 * reg or shadow. First-cut: read reg, and complain
3887 		 * if any bits which should be shadowed are different
3888 		 * from their shadowed value.
3889 		 */
3890 		if (only_32)
3891 			local_data = (u64)qib_read_kreg32(dd, idx);
3892 		else
3893 			local_data = qib_read_kreg64(dd, idx);
3894 		qib_dev_err(dd, "Sendctrl -> %X, Shad -> %X\n",
3895 			    (u32)local_data, (u32)dd->sendctrl);
3896 		if ((local_data & SENDCTRL_SHADOWED) !=
3897 		    (dd->sendctrl & SENDCTRL_SHADOWED))
3898 			qib_dev_err(dd, "Sendctrl read: %X shadow is %X\n",
3899 				(u32)local_data, (u32) dd->sendctrl);
3900 		*data = (local_data & ~mask) | (*data & mask);
3901 	}
3902 	if (mask) {
3903 		/*
3904 		 * At least some mask bits are one, so we need
3905 		 * to write, but only shadow some bits.
3906 		 */
3907 		u64 sval, tval; /* Shadowed, transient */
3908 
3909 		/*
3910 		 * New shadow val is bits we don't want to touch,
3911 		 * ORed with bits we do, that are intended for shadow.
3912 		 */
3913 		sval = (dd->sendctrl & ~mask);
3914 		sval |= *data & SENDCTRL_SHADOWED & mask;
3915 		dd->sendctrl = sval;
3916 		tval = sval | (*data & ~SENDCTRL_SHADOWED & mask);
3917 		qib_dev_err(dd, "Sendctrl <- %X, Shad <- %X\n",
3918 			    (u32)tval, (u32)sval);
3919 		qib_write_kreg(dd, kr_sendctrl, tval);
3920 		qib_write_kreg(dd, kr_scratch, 0Ull);
3921 	}
3922 	spin_unlock_irqrestore(&dd->sendctrl_lock, flags);
3923 
3924 	return only_32 ? 4 : 8;
3925 }
3926 
3927 static const struct diag_observer sendctrl_observer = {
3928 	sendctrl_hook, kr_sendctrl * sizeof(u64),
3929 	kr_sendctrl * sizeof(u64)
3930 };
3931 
3932 /*
3933  * write the final few registers that depend on some of the
3934  * init setup.  Done late in init, just before bringing up
3935  * the serdes.
3936  */
3937 static int qib_late_7220_initreg(struct qib_devdata *dd)
3938 {
3939 	int ret = 0;
3940 	u64 val;
3941 
3942 	qib_write_kreg(dd, kr_rcvhdrentsize, dd->rcvhdrentsize);
3943 	qib_write_kreg(dd, kr_rcvhdrsize, dd->rcvhdrsize);
3944 	qib_write_kreg(dd, kr_rcvhdrcnt, dd->rcvhdrcnt);
3945 	qib_write_kreg(dd, kr_sendpioavailaddr, dd->pioavailregs_phys);
3946 	val = qib_read_kreg64(dd, kr_sendpioavailaddr);
3947 	if (val != dd->pioavailregs_phys) {
3948 		qib_dev_err(dd,
3949 			"Catastrophic software error, SendPIOAvailAddr written as %lx, read back as %llx\n",
3950 			(unsigned long) dd->pioavailregs_phys,
3951 			(unsigned long long) val);
3952 		ret = -EINVAL;
3953 	}
3954 	qib_register_observer(dd, &sendctrl_observer);
3955 	return ret;
3956 }
3957 
3958 static int qib_init_7220_variables(struct qib_devdata *dd)
3959 {
3960 	struct qib_chippport_specific *cpspec;
3961 	struct qib_pportdata *ppd;
3962 	int ret = 0;
3963 	u32 sbufs, updthresh;
3964 
3965 	cpspec = (struct qib_chippport_specific *)(dd + 1);
3966 	ppd = &cpspec->pportdata;
3967 	dd->pport = ppd;
3968 	dd->num_pports = 1;
3969 
3970 	dd->cspec = (struct qib_chip_specific *)(cpspec + dd->num_pports);
3971 	dd->cspec->dd = dd;
3972 	ppd->cpspec = cpspec;
3973 
3974 	spin_lock_init(&dd->cspec->sdepb_lock);
3975 	spin_lock_init(&dd->cspec->rcvmod_lock);
3976 	spin_lock_init(&dd->cspec->gpio_lock);
3977 
3978 	/* we haven't yet set QIB_PRESENT, so use read directly */
3979 	dd->revision = readq(&dd->kregbase[kr_revision]);
3980 
3981 	if ((dd->revision & 0xffffffffU) == 0xffffffffU) {
3982 		qib_dev_err(dd,
3983 			"Revision register read failure, giving up initialization\n");
3984 		ret = -ENODEV;
3985 		goto bail;
3986 	}
3987 	dd->flags |= QIB_PRESENT;  /* now register routines work */
3988 
3989 	dd->majrev = (u8) SYM_FIELD(dd->revision, Revision_R,
3990 				    ChipRevMajor);
3991 	dd->minrev = (u8) SYM_FIELD(dd->revision, Revision_R,
3992 				    ChipRevMinor);
3993 
3994 	get_7220_chip_params(dd);
3995 	qib_7220_boardname(dd);
3996 
3997 	/*
3998 	 * GPIO bits for TWSI data and clock,
3999 	 * used for serial EEPROM.
4000 	 */
4001 	dd->gpio_sda_num = _QIB_GPIO_SDA_NUM;
4002 	dd->gpio_scl_num = _QIB_GPIO_SCL_NUM;
4003 	dd->twsi_eeprom_dev = QIB_TWSI_EEPROM_DEV;
4004 
4005 	dd->flags |= QIB_HAS_INTX | QIB_HAS_LINK_LATENCY |
4006 		QIB_NODMA_RTAIL | QIB_HAS_THRESH_UPDATE;
4007 	dd->flags |= qib_special_trigger ?
4008 		QIB_USE_SPCL_TRIG : QIB_HAS_SEND_DMA;
4009 
4010 	init_waitqueue_head(&cpspec->autoneg_wait);
4011 	INIT_DELAYED_WORK(&cpspec->autoneg_work, autoneg_7220_work);
4012 
4013 	ret = qib_init_pportdata(ppd, dd, 0, 1);
4014 	if (ret)
4015 		goto bail;
4016 	ppd->link_width_supported = IB_WIDTH_1X | IB_WIDTH_4X;
4017 	ppd->link_speed_supported = QIB_IB_SDR | QIB_IB_DDR;
4018 
4019 	ppd->link_width_enabled = ppd->link_width_supported;
4020 	ppd->link_speed_enabled = ppd->link_speed_supported;
4021 	/*
4022 	 * Set the initial values to reasonable default, will be set
4023 	 * for real when link is up.
4024 	 */
4025 	ppd->link_width_active = IB_WIDTH_4X;
4026 	ppd->link_speed_active = QIB_IB_SDR;
4027 	ppd->delay_mult = rate_to_delay[0][1];
4028 	ppd->vls_supported = IB_VL_VL0;
4029 	ppd->vls_operational = ppd->vls_supported;
4030 
4031 	if (!qib_mini_init)
4032 		qib_write_kreg(dd, kr_rcvbthqp, QIB_KD_QP);
4033 
4034 	timer_setup(&ppd->cpspec->chase_timer, reenable_7220_chase, 0);
4035 
4036 	qib_num_cfg_vls = 1; /* if any 7220's, only one VL */
4037 
4038 	dd->rcvhdrentsize = QIB_RCVHDR_ENTSIZE;
4039 	dd->rcvhdrsize = QIB_DFLT_RCVHDRSIZE;
4040 	dd->rhf_offset =
4041 		dd->rcvhdrentsize - sizeof(u64) / sizeof(u32);
4042 
4043 	/* we always allocate at least 2048 bytes for eager buffers */
4044 	ret = ib_mtu_enum_to_int(qib_ibmtu);
4045 	dd->rcvegrbufsize = ret != -1 ? max(ret, 2048) : QIB_DEFAULT_MTU;
4046 	BUG_ON(!is_power_of_2(dd->rcvegrbufsize));
4047 	dd->rcvegrbufsize_shift = ilog2(dd->rcvegrbufsize);
4048 
4049 	qib_7220_tidtemplate(dd);
4050 
4051 	/*
4052 	 * We can request a receive interrupt for 1 or
4053 	 * more packets from current offset.  For now, we set this
4054 	 * up for a single packet.
4055 	 */
4056 	dd->rhdrhead_intr_off = 1ULL << 32;
4057 
4058 	/* setup the stats timer; the add_timer is done at end of init */
4059 	timer_setup(&dd->stats_timer, qib_get_7220_faststats, 0);
4060 	dd->stats_timer.expires = jiffies + ACTIVITY_TIMER * HZ;
4061 
4062 	/*
4063 	 * Control[4] has been added to change the arbitration within
4064 	 * the SDMA engine between favoring data fetches over descriptor
4065 	 * fetches.  qib_sdma_fetch_arb==0 gives data fetches priority.
4066 	 */
4067 	if (qib_sdma_fetch_arb)
4068 		dd->control |= 1 << 4;
4069 
4070 	dd->ureg_align = 0x10000;  /* 64KB alignment */
4071 
4072 	dd->piosize2kmax_dwords = (dd->piosize2k >> 2)-1;
4073 	qib_7220_config_ctxts(dd);
4074 	qib_set_ctxtcnt(dd);  /* needed for PAT setup */
4075 
4076 	ret = init_chip_wc_pat(dd, 0);
4077 	if (ret)
4078 		goto bail;
4079 	set_7220_baseaddrs(dd); /* set chip access pointers now */
4080 
4081 	ret = 0;
4082 	if (qib_mini_init)
4083 		goto bail;
4084 
4085 	ret = qib_create_ctxts(dd);
4086 	init_7220_cntrnames(dd);
4087 
4088 	/* use all of 4KB buffers for the kernel SDMA, zero if !SDMA.
4089 	 * reserve the update threshold amount for other kernel use, such
4090 	 * as sending SMI, MAD, and ACKs, or 3, whichever is greater,
4091 	 * unless we aren't enabling SDMA, in which case we want to use
4092 	 * all the 4k bufs for the kernel.
4093 	 * if this was less than the update threshold, we could wait
4094 	 * a long time for an update.  Coded this way because we
4095 	 * sometimes change the update threshold for various reasons,
4096 	 * and we want this to remain robust.
4097 	 */
4098 	updthresh = 8U; /* update threshold */
4099 	if (dd->flags & QIB_HAS_SEND_DMA) {
4100 		dd->cspec->sdmabufcnt =  dd->piobcnt4k;
4101 		sbufs = updthresh > 3 ? updthresh : 3;
4102 	} else {
4103 		dd->cspec->sdmabufcnt = 0;
4104 		sbufs = dd->piobcnt4k;
4105 	}
4106 
4107 	dd->cspec->lastbuf_for_pio = dd->piobcnt2k + dd->piobcnt4k -
4108 		dd->cspec->sdmabufcnt;
4109 	dd->lastctxt_piobuf = dd->cspec->lastbuf_for_pio - sbufs;
4110 	dd->cspec->lastbuf_for_pio--; /* range is <= , not < */
4111 	dd->last_pio = dd->cspec->lastbuf_for_pio;
4112 	dd->pbufsctxt = dd->lastctxt_piobuf /
4113 		(dd->cfgctxts - dd->first_user_ctxt);
4114 
4115 	/*
4116 	 * if we are at 16 user contexts, we will have one 7 sbufs
4117 	 * per context, so drop the update threshold to match.  We
4118 	 * want to update before we actually run out, at low pbufs/ctxt
4119 	 * so give ourselves some margin
4120 	 */
4121 	if ((dd->pbufsctxt - 2) < updthresh)
4122 		updthresh = dd->pbufsctxt - 2;
4123 
4124 	dd->cspec->updthresh_dflt = updthresh;
4125 	dd->cspec->updthresh = updthresh;
4126 
4127 	/* before full enable, no interrupts, no locking needed */
4128 	dd->sendctrl |= (updthresh & SYM_RMASK(SendCtrl, AvailUpdThld))
4129 			     << SYM_LSB(SendCtrl, AvailUpdThld);
4130 
4131 	dd->psxmitwait_supported = 1;
4132 	dd->psxmitwait_check_rate = QIB_7220_PSXMITWAIT_CHECK_RATE;
4133 bail:
4134 	return ret;
4135 }
4136 
4137 static u32 __iomem *qib_7220_getsendbuf(struct qib_pportdata *ppd, u64 pbc,
4138 					u32 *pbufnum)
4139 {
4140 	u32 first, last, plen = pbc & QIB_PBC_LENGTH_MASK;
4141 	struct qib_devdata *dd = ppd->dd;
4142 	u32 __iomem *buf;
4143 
4144 	if (((pbc >> 32) & PBC_7220_VL15_SEND_CTRL) &&
4145 		!(ppd->lflags & (QIBL_IB_AUTONEG_INPROG | QIBL_LINKACTIVE)))
4146 		buf = get_7220_link_buf(ppd, pbufnum);
4147 	else {
4148 		if ((plen + 1) > dd->piosize2kmax_dwords)
4149 			first = dd->piobcnt2k;
4150 		else
4151 			first = 0;
4152 		/* try 4k if all 2k busy, so same last for both sizes */
4153 		last = dd->cspec->lastbuf_for_pio;
4154 		buf = qib_getsendbuf_range(dd, pbufnum, first, last);
4155 	}
4156 	return buf;
4157 }
4158 
4159 /* these 2 "counters" are really control registers, and are always RW */
4160 static void qib_set_cntr_7220_sample(struct qib_pportdata *ppd, u32 intv,
4161 				     u32 start)
4162 {
4163 	write_7220_creg(ppd->dd, cr_psinterval, intv);
4164 	write_7220_creg(ppd->dd, cr_psstart, start);
4165 }
4166 
4167 /*
4168  * NOTE: no real attempt is made to generalize the SDMA stuff.
4169  * At some point "soon" we will have a new more generalized
4170  * set of sdma interface, and then we'll clean this up.
4171  */
4172 
4173 /* Must be called with sdma_lock held, or before init finished */
4174 static void qib_sdma_update_7220_tail(struct qib_pportdata *ppd, u16 tail)
4175 {
4176 	/* Commit writes to memory and advance the tail on the chip */
4177 	wmb();
4178 	ppd->sdma_descq_tail = tail;
4179 	qib_write_kreg(ppd->dd, kr_senddmatail, tail);
4180 }
4181 
4182 static void qib_sdma_set_7220_desc_cnt(struct qib_pportdata *ppd, unsigned cnt)
4183 {
4184 }
4185 
4186 static struct sdma_set_state_action sdma_7220_action_table[] = {
4187 	[qib_sdma_state_s00_hw_down] = {
4188 		.op_enable = 0,
4189 		.op_intenable = 0,
4190 		.op_halt = 0,
4191 		.go_s99_running_tofalse = 1,
4192 	},
4193 	[qib_sdma_state_s10_hw_start_up_wait] = {
4194 		.op_enable = 1,
4195 		.op_intenable = 1,
4196 		.op_halt = 1,
4197 	},
4198 	[qib_sdma_state_s20_idle] = {
4199 		.op_enable = 1,
4200 		.op_intenable = 1,
4201 		.op_halt = 1,
4202 	},
4203 	[qib_sdma_state_s30_sw_clean_up_wait] = {
4204 		.op_enable = 0,
4205 		.op_intenable = 1,
4206 		.op_halt = 0,
4207 	},
4208 	[qib_sdma_state_s40_hw_clean_up_wait] = {
4209 		.op_enable = 1,
4210 		.op_intenable = 1,
4211 		.op_halt = 1,
4212 	},
4213 	[qib_sdma_state_s50_hw_halt_wait] = {
4214 		.op_enable = 1,
4215 		.op_intenable = 1,
4216 		.op_halt = 1,
4217 	},
4218 	[qib_sdma_state_s99_running] = {
4219 		.op_enable = 1,
4220 		.op_intenable = 1,
4221 		.op_halt = 0,
4222 		.go_s99_running_totrue = 1,
4223 	},
4224 };
4225 
4226 static void qib_7220_sdma_init_early(struct qib_pportdata *ppd)
4227 {
4228 	ppd->sdma_state.set_state_action = sdma_7220_action_table;
4229 }
4230 
4231 static int init_sdma_7220_regs(struct qib_pportdata *ppd)
4232 {
4233 	struct qib_devdata *dd = ppd->dd;
4234 	unsigned i, n;
4235 	u64 senddmabufmask[3] = { 0 };
4236 
4237 	/* Set SendDmaBase */
4238 	qib_write_kreg(dd, kr_senddmabase, ppd->sdma_descq_phys);
4239 	qib_sdma_7220_setlengen(ppd);
4240 	qib_sdma_update_7220_tail(ppd, 0); /* Set SendDmaTail */
4241 	/* Set SendDmaHeadAddr */
4242 	qib_write_kreg(dd, kr_senddmaheadaddr, ppd->sdma_head_phys);
4243 
4244 	/*
4245 	 * Reserve all the former "kernel" piobufs, using high number range
4246 	 * so we get as many 4K buffers as possible
4247 	 */
4248 	n = dd->piobcnt2k + dd->piobcnt4k;
4249 	i = n - dd->cspec->sdmabufcnt;
4250 
4251 	for (; i < n; ++i) {
4252 		unsigned word = i / 64;
4253 		unsigned bit = i & 63;
4254 
4255 		BUG_ON(word >= 3);
4256 		senddmabufmask[word] |= 1ULL << bit;
4257 	}
4258 	qib_write_kreg(dd, kr_senddmabufmask0, senddmabufmask[0]);
4259 	qib_write_kreg(dd, kr_senddmabufmask1, senddmabufmask[1]);
4260 	qib_write_kreg(dd, kr_senddmabufmask2, senddmabufmask[2]);
4261 
4262 	ppd->sdma_state.first_sendbuf = i;
4263 	ppd->sdma_state.last_sendbuf = n;
4264 
4265 	return 0;
4266 }
4267 
4268 /* sdma_lock must be held */
4269 static u16 qib_sdma_7220_gethead(struct qib_pportdata *ppd)
4270 {
4271 	struct qib_devdata *dd = ppd->dd;
4272 	int sane;
4273 	int use_dmahead;
4274 	u16 swhead;
4275 	u16 swtail;
4276 	u16 cnt;
4277 	u16 hwhead;
4278 
4279 	use_dmahead = __qib_sdma_running(ppd) &&
4280 		(dd->flags & QIB_HAS_SDMA_TIMEOUT);
4281 retry:
4282 	hwhead = use_dmahead ?
4283 		(u16)le64_to_cpu(*ppd->sdma_head_dma) :
4284 		(u16)qib_read_kreg32(dd, kr_senddmahead);
4285 
4286 	swhead = ppd->sdma_descq_head;
4287 	swtail = ppd->sdma_descq_tail;
4288 	cnt = ppd->sdma_descq_cnt;
4289 
4290 	if (swhead < swtail) {
4291 		/* not wrapped */
4292 		sane = (hwhead >= swhead) & (hwhead <= swtail);
4293 	} else if (swhead > swtail) {
4294 		/* wrapped around */
4295 		sane = ((hwhead >= swhead) && (hwhead < cnt)) ||
4296 			(hwhead <= swtail);
4297 	} else {
4298 		/* empty */
4299 		sane = (hwhead == swhead);
4300 	}
4301 
4302 	if (unlikely(!sane)) {
4303 		if (use_dmahead) {
4304 			/* try one more time, directly from the register */
4305 			use_dmahead = 0;
4306 			goto retry;
4307 		}
4308 		/* assume no progress */
4309 		hwhead = swhead;
4310 	}
4311 
4312 	return hwhead;
4313 }
4314 
4315 static int qib_sdma_7220_busy(struct qib_pportdata *ppd)
4316 {
4317 	u64 hwstatus = qib_read_kreg64(ppd->dd, kr_senddmastatus);
4318 
4319 	return (hwstatus & SYM_MASK(SendDmaStatus, ScoreBoardDrainInProg)) ||
4320 	       (hwstatus & SYM_MASK(SendDmaStatus, AbortInProg)) ||
4321 	       (hwstatus & SYM_MASK(SendDmaStatus, InternalSDmaEnable)) ||
4322 	       !(hwstatus & SYM_MASK(SendDmaStatus, ScbEmpty));
4323 }
4324 
4325 /*
4326  * Compute the amount of delay before sending the next packet if the
4327  * port's send rate differs from the static rate set for the QP.
4328  * Since the delay affects this packet but the amount of the delay is
4329  * based on the length of the previous packet, use the last delay computed
4330  * and save the delay count for this packet to be used next time
4331  * we get here.
4332  */
4333 static u32 qib_7220_setpbc_control(struct qib_pportdata *ppd, u32 plen,
4334 				   u8 srate, u8 vl)
4335 {
4336 	u8 snd_mult = ppd->delay_mult;
4337 	u8 rcv_mult = ib_rate_to_delay[srate];
4338 	u32 ret = ppd->cpspec->last_delay_mult;
4339 
4340 	ppd->cpspec->last_delay_mult = (rcv_mult > snd_mult) ?
4341 		(plen * (rcv_mult - snd_mult) + 1) >> 1 : 0;
4342 
4343 	/* Indicate VL15, if necessary */
4344 	if (vl == 15)
4345 		ret |= PBC_7220_VL15_SEND_CTRL;
4346 	return ret;
4347 }
4348 
4349 static void qib_7220_initvl15_bufs(struct qib_devdata *dd)
4350 {
4351 }
4352 
4353 static void qib_7220_init_ctxt(struct qib_ctxtdata *rcd)
4354 {
4355 	if (!rcd->ctxt) {
4356 		rcd->rcvegrcnt = IBA7220_KRCVEGRCNT;
4357 		rcd->rcvegr_tid_base = 0;
4358 	} else {
4359 		rcd->rcvegrcnt = rcd->dd->cspec->rcvegrcnt;
4360 		rcd->rcvegr_tid_base = IBA7220_KRCVEGRCNT +
4361 			(rcd->ctxt - 1) * rcd->rcvegrcnt;
4362 	}
4363 }
4364 
4365 static void qib_7220_txchk_change(struct qib_devdata *dd, u32 start,
4366 				  u32 len, u32 which, struct qib_ctxtdata *rcd)
4367 {
4368 	int i;
4369 	unsigned long flags;
4370 
4371 	switch (which) {
4372 	case TXCHK_CHG_TYPE_KERN:
4373 		/* see if we need to raise avail update threshold */
4374 		spin_lock_irqsave(&dd->uctxt_lock, flags);
4375 		for (i = dd->first_user_ctxt;
4376 		     dd->cspec->updthresh != dd->cspec->updthresh_dflt
4377 		     && i < dd->cfgctxts; i++)
4378 			if (dd->rcd[i] && dd->rcd[i]->subctxt_cnt &&
4379 			   ((dd->rcd[i]->piocnt / dd->rcd[i]->subctxt_cnt) - 1)
4380 			   < dd->cspec->updthresh_dflt)
4381 				break;
4382 		spin_unlock_irqrestore(&dd->uctxt_lock, flags);
4383 		if (i == dd->cfgctxts) {
4384 			spin_lock_irqsave(&dd->sendctrl_lock, flags);
4385 			dd->cspec->updthresh = dd->cspec->updthresh_dflt;
4386 			dd->sendctrl &= ~SYM_MASK(SendCtrl, AvailUpdThld);
4387 			dd->sendctrl |= (dd->cspec->updthresh &
4388 					 SYM_RMASK(SendCtrl, AvailUpdThld)) <<
4389 					   SYM_LSB(SendCtrl, AvailUpdThld);
4390 			spin_unlock_irqrestore(&dd->sendctrl_lock, flags);
4391 			sendctrl_7220_mod(dd->pport, QIB_SENDCTRL_AVAIL_BLIP);
4392 		}
4393 		break;
4394 	case TXCHK_CHG_TYPE_USER:
4395 		spin_lock_irqsave(&dd->sendctrl_lock, flags);
4396 		if (rcd && rcd->subctxt_cnt && ((rcd->piocnt
4397 			/ rcd->subctxt_cnt) - 1) < dd->cspec->updthresh) {
4398 			dd->cspec->updthresh = (rcd->piocnt /
4399 						rcd->subctxt_cnt) - 1;
4400 			dd->sendctrl &= ~SYM_MASK(SendCtrl, AvailUpdThld);
4401 			dd->sendctrl |= (dd->cspec->updthresh &
4402 					SYM_RMASK(SendCtrl, AvailUpdThld))
4403 					<< SYM_LSB(SendCtrl, AvailUpdThld);
4404 			spin_unlock_irqrestore(&dd->sendctrl_lock, flags);
4405 			sendctrl_7220_mod(dd->pport, QIB_SENDCTRL_AVAIL_BLIP);
4406 		} else
4407 			spin_unlock_irqrestore(&dd->sendctrl_lock, flags);
4408 		break;
4409 	}
4410 }
4411 
4412 static void writescratch(struct qib_devdata *dd, u32 val)
4413 {
4414 	qib_write_kreg(dd, kr_scratch, val);
4415 }
4416 
4417 #define VALID_TS_RD_REG_MASK 0xBF
4418 /**
4419  * qib_7220_tempsense_read - read register of temp sensor via TWSI
4420  * @dd: the qlogic_ib device
4421  * @regnum: register to read from
4422  *
4423  * returns reg contents (0..255) or < 0 for error
4424  */
4425 static int qib_7220_tempsense_rd(struct qib_devdata *dd, int regnum)
4426 {
4427 	int ret;
4428 	u8 rdata;
4429 
4430 	if (regnum > 7) {
4431 		ret = -EINVAL;
4432 		goto bail;
4433 	}
4434 
4435 	/* return a bogus value for (the one) register we do not have */
4436 	if (!((1 << regnum) & VALID_TS_RD_REG_MASK)) {
4437 		ret = 0;
4438 		goto bail;
4439 	}
4440 
4441 	ret = mutex_lock_interruptible(&dd->eep_lock);
4442 	if (ret)
4443 		goto bail;
4444 
4445 	ret = qib_twsi_blk_rd(dd, QIB_TWSI_TEMP_DEV, regnum, &rdata, 1);
4446 	if (!ret)
4447 		ret = rdata;
4448 
4449 	mutex_unlock(&dd->eep_lock);
4450 
4451 	/*
4452 	 * There are three possibilities here:
4453 	 * ret is actual value (0..255)
4454 	 * ret is -ENXIO or -EINVAL from twsi code or this file
4455 	 * ret is -EINTR from mutex_lock_interruptible.
4456 	 */
4457 bail:
4458 	return ret;
4459 }
4460 
4461 #ifdef CONFIG_INFINIBAND_QIB_DCA
4462 static int qib_7220_notify_dca(struct qib_devdata *dd, unsigned long event)
4463 {
4464 	return 0;
4465 }
4466 #endif
4467 
4468 /* Dummy function, as 7220 boards never disable EEPROM Write */
4469 static int qib_7220_eeprom_wen(struct qib_devdata *dd, int wen)
4470 {
4471 	return 1;
4472 }
4473 
4474 /**
4475  * qib_init_iba7220_funcs - set up the chip-specific function pointers
4476  * @dev: the pci_dev for qlogic_ib device
4477  * @ent: pci_device_id struct for this dev
4478  *
4479  * This is global, and is called directly at init to set up the
4480  * chip-specific function pointers for later use.
4481  */
4482 struct qib_devdata *qib_init_iba7220_funcs(struct pci_dev *pdev,
4483 					   const struct pci_device_id *ent)
4484 {
4485 	struct qib_devdata *dd;
4486 	int ret;
4487 	u32 boardid, minwidth;
4488 
4489 	dd = qib_alloc_devdata(pdev, sizeof(struct qib_chip_specific) +
4490 		sizeof(struct qib_chippport_specific));
4491 	if (IS_ERR(dd))
4492 		goto bail;
4493 
4494 	dd->f_bringup_serdes    = qib_7220_bringup_serdes;
4495 	dd->f_cleanup           = qib_setup_7220_cleanup;
4496 	dd->f_clear_tids        = qib_7220_clear_tids;
4497 	dd->f_free_irq          = qib_free_irq;
4498 	dd->f_get_base_info     = qib_7220_get_base_info;
4499 	dd->f_get_msgheader     = qib_7220_get_msgheader;
4500 	dd->f_getsendbuf        = qib_7220_getsendbuf;
4501 	dd->f_gpio_mod          = gpio_7220_mod;
4502 	dd->f_eeprom_wen        = qib_7220_eeprom_wen;
4503 	dd->f_hdrqempty         = qib_7220_hdrqempty;
4504 	dd->f_ib_updown         = qib_7220_ib_updown;
4505 	dd->f_init_ctxt         = qib_7220_init_ctxt;
4506 	dd->f_initvl15_bufs     = qib_7220_initvl15_bufs;
4507 	dd->f_intr_fallback     = qib_7220_intr_fallback;
4508 	dd->f_late_initreg      = qib_late_7220_initreg;
4509 	dd->f_setpbc_control    = qib_7220_setpbc_control;
4510 	dd->f_portcntr          = qib_portcntr_7220;
4511 	dd->f_put_tid           = qib_7220_put_tid;
4512 	dd->f_quiet_serdes      = qib_7220_quiet_serdes;
4513 	dd->f_rcvctrl           = rcvctrl_7220_mod;
4514 	dd->f_read_cntrs        = qib_read_7220cntrs;
4515 	dd->f_read_portcntrs    = qib_read_7220portcntrs;
4516 	dd->f_reset             = qib_setup_7220_reset;
4517 	dd->f_init_sdma_regs    = init_sdma_7220_regs;
4518 	dd->f_sdma_busy         = qib_sdma_7220_busy;
4519 	dd->f_sdma_gethead      = qib_sdma_7220_gethead;
4520 	dd->f_sdma_sendctrl     = qib_7220_sdma_sendctrl;
4521 	dd->f_sdma_set_desc_cnt = qib_sdma_set_7220_desc_cnt;
4522 	dd->f_sdma_update_tail  = qib_sdma_update_7220_tail;
4523 	dd->f_sdma_hw_clean_up  = qib_7220_sdma_hw_clean_up;
4524 	dd->f_sdma_hw_start_up  = qib_7220_sdma_hw_start_up;
4525 	dd->f_sdma_init_early   = qib_7220_sdma_init_early;
4526 	dd->f_sendctrl          = sendctrl_7220_mod;
4527 	dd->f_set_armlaunch     = qib_set_7220_armlaunch;
4528 	dd->f_set_cntr_sample   = qib_set_cntr_7220_sample;
4529 	dd->f_iblink_state      = qib_7220_iblink_state;
4530 	dd->f_ibphys_portstate  = qib_7220_phys_portstate;
4531 	dd->f_get_ib_cfg        = qib_7220_get_ib_cfg;
4532 	dd->f_set_ib_cfg        = qib_7220_set_ib_cfg;
4533 	dd->f_set_ib_loopback   = qib_7220_set_loopback;
4534 	dd->f_set_intr_state    = qib_7220_set_intr_state;
4535 	dd->f_setextled         = qib_setup_7220_setextled;
4536 	dd->f_txchk_change      = qib_7220_txchk_change;
4537 	dd->f_update_usrhead    = qib_update_7220_usrhead;
4538 	dd->f_wantpiobuf_intr   = qib_wantpiobuf_7220_intr;
4539 	dd->f_xgxs_reset        = qib_7220_xgxs_reset;
4540 	dd->f_writescratch      = writescratch;
4541 	dd->f_tempsense_rd	= qib_7220_tempsense_rd;
4542 #ifdef CONFIG_INFINIBAND_QIB_DCA
4543 	dd->f_notify_dca = qib_7220_notify_dca;
4544 #endif
4545 	/*
4546 	 * Do remaining pcie setup and save pcie values in dd.
4547 	 * Any error printing is already done by the init code.
4548 	 * On return, we have the chip mapped, but chip registers
4549 	 * are not set up until start of qib_init_7220_variables.
4550 	 */
4551 	ret = qib_pcie_ddinit(dd, pdev, ent);
4552 	if (ret < 0)
4553 		goto bail_free;
4554 
4555 	/* initialize chip-specific variables */
4556 	ret = qib_init_7220_variables(dd);
4557 	if (ret)
4558 		goto bail_cleanup;
4559 
4560 	if (qib_mini_init)
4561 		goto bail;
4562 
4563 	boardid = SYM_FIELD(dd->revision, Revision,
4564 			    BoardID);
4565 	switch (boardid) {
4566 	case 0:
4567 	case 2:
4568 	case 10:
4569 	case 12:
4570 		minwidth = 16; /* x16 capable boards */
4571 		break;
4572 	default:
4573 		minwidth = 8; /* x8 capable boards */
4574 		break;
4575 	}
4576 	if (qib_pcie_params(dd, minwidth, NULL))
4577 		qib_dev_err(dd,
4578 			"Failed to setup PCIe or interrupts; continuing anyway\n");
4579 
4580 	if (qib_read_kreg64(dd, kr_hwerrstatus) &
4581 	    QLOGIC_IB_HWE_SERDESPLLFAILED)
4582 		qib_write_kreg(dd, kr_hwerrclear,
4583 			       QLOGIC_IB_HWE_SERDESPLLFAILED);
4584 
4585 	/* setup interrupt handler (interrupt type handled above) */
4586 	qib_setup_7220_interrupt(dd);
4587 	qib_7220_init_hwerrors(dd);
4588 
4589 	/* clear diagctrl register, in case diags were running and crashed */
4590 	qib_write_kreg(dd, kr_hwdiagctrl, 0);
4591 
4592 	goto bail;
4593 
4594 bail_cleanup:
4595 	qib_pcie_ddcleanup(dd);
4596 bail_free:
4597 	qib_free_devdata(dd);
4598 	dd = ERR_PTR(ret);
4599 bail:
4600 	return dd;
4601 }
4602