1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48#include <linux/spinlock.h>
49#include <linux/pci.h>
50#include <linux/io.h>
51#include <linux/delay.h>
52#include <linux/netdevice.h>
53#include <linux/vmalloc.h>
54#include <linux/module.h>
55#include <linux/prefetch.h>
56#include <rdma/ib_verbs.h>
57
58#include "hfi.h"
59#include "trace.h"
60#include "qp.h"
61#include "sdma.h"
62
63#undef pr_fmt
64#define pr_fmt(fmt) DRIVER_NAME ": " fmt
65
66
67
68
69
70const char ib_hfi1_version[] = HFI1_DRIVER_VERSION "\n";
71
72DEFINE_SPINLOCK(hfi1_devs_lock);
73LIST_HEAD(hfi1_dev_list);
74DEFINE_MUTEX(hfi1_mutex);
75
76unsigned int hfi1_max_mtu = HFI1_DEFAULT_MAX_MTU;
77module_param_named(max_mtu, hfi1_max_mtu, uint, S_IRUGO);
78MODULE_PARM_DESC(max_mtu, "Set max MTU bytes, default is " __stringify(
79 HFI1_DEFAULT_MAX_MTU));
80
81unsigned int hfi1_cu = 1;
82module_param_named(cu, hfi1_cu, uint, S_IRUGO);
83MODULE_PARM_DESC(cu, "Credit return units");
84
85unsigned long hfi1_cap_mask = HFI1_CAP_MASK_DEFAULT;
86static int hfi1_caps_set(const char *, const struct kernel_param *);
87static int hfi1_caps_get(char *, const struct kernel_param *);
88static const struct kernel_param_ops cap_ops = {
89 .set = hfi1_caps_set,
90 .get = hfi1_caps_get
91};
92module_param_cb(cap_mask, &cap_ops, &hfi1_cap_mask, S_IWUSR | S_IRUGO);
93MODULE_PARM_DESC(cap_mask, "Bit mask of enabled/disabled HW features");
94
95MODULE_LICENSE("Dual BSD/GPL");
96MODULE_DESCRIPTION("Intel Omni-Path Architecture driver");
97MODULE_VERSION(HFI1_DRIVER_VERSION);
98
99
100
101
102#define MAX_PKT_RECV 64
103#define EGR_HEAD_UPDATE_THRESHOLD 16
104
105struct hfi1_ib_stats hfi1_stats;
106
107static int hfi1_caps_set(const char *val, const struct kernel_param *kp)
108{
109 int ret = 0;
110 unsigned long *cap_mask_ptr = (unsigned long *)kp->arg,
111 cap_mask = *cap_mask_ptr, value, diff,
112 write_mask = ((HFI1_CAP_WRITABLE_MASK << HFI1_CAP_USER_SHIFT) |
113 HFI1_CAP_WRITABLE_MASK);
114
115 ret = kstrtoul(val, 0, &value);
116 if (ret) {
117 pr_warn("Invalid module parameter value for 'cap_mask'\n");
118 goto done;
119 }
120
121 diff = value ^ (cap_mask & ~HFI1_CAP_LOCKED_SMASK);
122
123
124 if (HFI1_CAP_LOCKED() && (diff & ~write_mask)) {
125 pr_warn("Ignoring non-writable capability bits %#lx\n",
126 diff & ~write_mask);
127 diff &= write_mask;
128 }
129
130
131 diff &= ~HFI1_CAP_RESERVED_MASK;
132
133 cap_mask &= ~diff;
134
135 cap_mask |= (value & diff);
136
137 diff = (cap_mask & (HFI1_CAP_MUST_HAVE_KERN << HFI1_CAP_USER_SHIFT)) ^
138 ((cap_mask & HFI1_CAP_MUST_HAVE_KERN) << HFI1_CAP_USER_SHIFT);
139 cap_mask &= ~diff;
140
141 *cap_mask_ptr = cap_mask;
142done:
143 return ret;
144}
145
146static int hfi1_caps_get(char *buffer, const struct kernel_param *kp)
147{
148 unsigned long cap_mask = *(unsigned long *)kp->arg;
149
150 cap_mask &= ~HFI1_CAP_LOCKED_SMASK;
151 cap_mask |= ((cap_mask & HFI1_CAP_K2U) << HFI1_CAP_USER_SHIFT);
152
153 return scnprintf(buffer, PAGE_SIZE, "0x%lx", cap_mask);
154}
155
156const char *get_unit_name(int unit)
157{
158 static char iname[16];
159
160 snprintf(iname, sizeof(iname), DRIVER_NAME "_%u", unit);
161 return iname;
162}
163
164const char *get_card_name(struct rvt_dev_info *rdi)
165{
166 struct hfi1_ibdev *ibdev = container_of(rdi, struct hfi1_ibdev, rdi);
167 struct hfi1_devdata *dd = container_of(ibdev,
168 struct hfi1_devdata, verbs_dev);
169 return get_unit_name(dd->unit);
170}
171
172struct pci_dev *get_pci_dev(struct rvt_dev_info *rdi)
173{
174 struct hfi1_ibdev *ibdev = container_of(rdi, struct hfi1_ibdev, rdi);
175 struct hfi1_devdata *dd = container_of(ibdev,
176 struct hfi1_devdata, verbs_dev);
177 return dd->pcidev;
178}
179
180
181
182
183int hfi1_count_active_units(void)
184{
185 struct hfi1_devdata *dd;
186 struct hfi1_pportdata *ppd;
187 unsigned long flags;
188 int pidx, nunits_active = 0;
189
190 spin_lock_irqsave(&hfi1_devs_lock, flags);
191 list_for_each_entry(dd, &hfi1_dev_list, list) {
192 if (!(dd->flags & HFI1_PRESENT) || !dd->kregbase)
193 continue;
194 for (pidx = 0; pidx < dd->num_pports; ++pidx) {
195 ppd = dd->pport + pidx;
196 if (ppd->lid && ppd->linkup) {
197 nunits_active++;
198 break;
199 }
200 }
201 }
202 spin_unlock_irqrestore(&hfi1_devs_lock, flags);
203 return nunits_active;
204}
205
206
207
208
209
210
211int hfi1_count_units(int *npresentp, int *nupp)
212{
213 int nunits = 0, npresent = 0, nup = 0;
214 struct hfi1_devdata *dd;
215 unsigned long flags;
216 int pidx;
217 struct hfi1_pportdata *ppd;
218
219 spin_lock_irqsave(&hfi1_devs_lock, flags);
220
221 list_for_each_entry(dd, &hfi1_dev_list, list) {
222 nunits++;
223 if ((dd->flags & HFI1_PRESENT) && dd->kregbase)
224 npresent++;
225 for (pidx = 0; pidx < dd->num_pports; ++pidx) {
226 ppd = dd->pport + pidx;
227 if (ppd->lid && ppd->linkup)
228 nup++;
229 }
230 }
231
232 spin_unlock_irqrestore(&hfi1_devs_lock, flags);
233
234 if (npresentp)
235 *npresentp = npresent;
236 if (nupp)
237 *nupp = nup;
238
239 return nunits;
240}
241
242
243
244
245
246static inline void *get_egrbuf(const struct hfi1_ctxtdata *rcd, u64 rhf,
247 u8 *update)
248{
249 u32 idx = rhf_egr_index(rhf), offset = rhf_egr_buf_offset(rhf);
250
251 *update |= !(idx & (rcd->egrbufs.threshold - 1)) && !offset;
252 return (void *)(((u64)(rcd->egrbufs.rcvtids[idx].addr)) +
253 (offset * RCV_BUF_BLOCK_SIZE));
254}
255
256
257
258
259
260
261
262inline int hfi1_rcvbuf_validate(u32 size, u8 type, u16 *encoded)
263{
264 if (unlikely(!PAGE_ALIGNED(size)))
265 return 0;
266 if (unlikely(size < MIN_EAGER_BUFFER))
267 return 0;
268 if (size >
269 (type == PT_EAGER ? MAX_EAGER_BUFFER : MAX_EXPECTED_BUFFER))
270 return 0;
271 if (encoded)
272 *encoded = ilog2(size / PAGE_SIZE) + 1;
273 return 1;
274}
275
276static void rcv_hdrerr(struct hfi1_ctxtdata *rcd, struct hfi1_pportdata *ppd,
277 struct hfi1_packet *packet)
278{
279 struct ib_header *rhdr = packet->hdr;
280 u32 rte = rhf_rcv_type_err(packet->rhf);
281 int lnh = be16_to_cpu(rhdr->lrh[0]) & 3;
282 struct hfi1_ibport *ibp = &ppd->ibport_data;
283 struct hfi1_devdata *dd = ppd->dd;
284 struct rvt_dev_info *rdi = &dd->verbs_dev.rdi;
285
286 if (packet->rhf & (RHF_VCRC_ERR | RHF_ICRC_ERR))
287 return;
288
289 if (packet->rhf & RHF_TID_ERR) {
290
291 struct ib_other_headers *ohdr = NULL;
292 u32 tlen = rhf_pkt_len(packet->rhf);
293 u16 lid = be16_to_cpu(rhdr->lrh[1]);
294 u32 qp_num;
295 u32 rcv_flags = 0;
296
297
298 if (tlen < 24)
299 goto drop;
300
301
302 if (lnh == HFI1_LRH_BTH) {
303 ohdr = &rhdr->u.oth;
304 } else if (lnh == HFI1_LRH_GRH) {
305 u32 vtf;
306
307 ohdr = &rhdr->u.l.oth;
308 if (rhdr->u.l.grh.next_hdr != IB_GRH_NEXT_HDR)
309 goto drop;
310 vtf = be32_to_cpu(rhdr->u.l.grh.version_tclass_flow);
311 if ((vtf >> IB_GRH_VERSION_SHIFT) != IB_GRH_VERSION)
312 goto drop;
313 rcv_flags |= HFI1_HAS_GRH;
314 } else {
315 goto drop;
316 }
317
318 qp_num = be32_to_cpu(ohdr->bth[1]) & RVT_QPN_MASK;
319 if (lid < be16_to_cpu(IB_MULTICAST_LID_BASE)) {
320 struct rvt_qp *qp;
321 unsigned long flags;
322
323 rcu_read_lock();
324 qp = rvt_lookup_qpn(rdi, &ibp->rvp, qp_num);
325 if (!qp) {
326 rcu_read_unlock();
327 goto drop;
328 }
329
330
331
332
333
334 spin_lock_irqsave(&qp->r_lock, flags);
335
336
337 if (!(ib_rvt_state_ops[qp->state] &
338 RVT_PROCESS_RECV_OK)) {
339 ibp->rvp.n_pkt_drops++;
340 }
341
342 switch (qp->ibqp.qp_type) {
343 case IB_QPT_RC:
344 hfi1_rc_hdrerr(
345 rcd,
346 rhdr,
347 rcv_flags,
348 qp);
349 break;
350 default:
351
352 break;
353 }
354
355 spin_unlock_irqrestore(&qp->r_lock, flags);
356 rcu_read_unlock();
357 }
358 }
359
360
361 switch (rte) {
362 case RHF_RTE_ERROR_OP_CODE_ERR:
363 {
364 u32 opcode;
365 void *ebuf = NULL;
366 __be32 *bth = NULL;
367
368 if (rhf_use_egr_bfr(packet->rhf))
369 ebuf = packet->ebuf;
370
371 if (!ebuf)
372 goto drop;
373
374 if (lnh == HFI1_LRH_BTH)
375 bth = (__be32 *)ebuf;
376 else if (lnh == HFI1_LRH_GRH)
377 bth = (__be32 *)((char *)ebuf + sizeof(struct ib_grh));
378 else
379 goto drop;
380
381 opcode = be32_to_cpu(bth[0]) >> 24;
382 opcode &= 0xff;
383
384 if (opcode == IB_OPCODE_CNP) {
385
386
387
388
389 struct rvt_qp *qp = NULL;
390 u32 lqpn, rqpn;
391 u16 rlid;
392 u8 svc_type, sl, sc5;
393
394 sc5 = hdr2sc(rhdr, packet->rhf);
395 sl = ibp->sc_to_sl[sc5];
396
397 lqpn = be32_to_cpu(bth[1]) & RVT_QPN_MASK;
398 rcu_read_lock();
399 qp = rvt_lookup_qpn(rdi, &ibp->rvp, lqpn);
400 if (!qp) {
401 rcu_read_unlock();
402 goto drop;
403 }
404
405 switch (qp->ibqp.qp_type) {
406 case IB_QPT_UD:
407 rlid = 0;
408 rqpn = 0;
409 svc_type = IB_CC_SVCTYPE_UD;
410 break;
411 case IB_QPT_UC:
412 rlid = be16_to_cpu(rhdr->lrh[3]);
413 rqpn = qp->remote_qpn;
414 svc_type = IB_CC_SVCTYPE_UC;
415 break;
416 default:
417 goto drop;
418 }
419
420 process_becn(ppd, sl, rlid, lqpn, rqpn, svc_type);
421 rcu_read_unlock();
422 }
423
424 packet->rhf &= ~RHF_RCV_TYPE_ERR_SMASK;
425 break;
426 }
427 default:
428 break;
429 }
430
431drop:
432 return;
433}
434
435static inline void init_packet(struct hfi1_ctxtdata *rcd,
436 struct hfi1_packet *packet)
437{
438 packet->rsize = rcd->rcvhdrqentsize;
439 packet->maxcnt = rcd->rcvhdrq_cnt * packet->rsize;
440 packet->rcd = rcd;
441 packet->updegr = 0;
442 packet->etail = -1;
443 packet->rhf_addr = get_rhf_addr(rcd);
444 packet->rhf = rhf_to_cpu(packet->rhf_addr);
445 packet->rhqoff = rcd->head;
446 packet->numpkt = 0;
447 packet->rcv_flags = 0;
448}
449
450void hfi1_process_ecn_slowpath(struct rvt_qp *qp, struct hfi1_packet *pkt,
451 bool do_cnp)
452{
453 struct hfi1_ibport *ibp = to_iport(qp->ibqp.device, qp->port_num);
454 struct ib_header *hdr = pkt->hdr;
455 struct ib_other_headers *ohdr = pkt->ohdr;
456 struct ib_grh *grh = NULL;
457 u32 rqpn = 0, bth1;
458 u16 rlid, dlid = be16_to_cpu(hdr->lrh[1]);
459 u8 sc, svc_type;
460 bool is_mcast = false;
461
462 if (pkt->rcv_flags & HFI1_HAS_GRH)
463 grh = &hdr->u.l.grh;
464
465 switch (qp->ibqp.qp_type) {
466 case IB_QPT_SMI:
467 case IB_QPT_GSI:
468 case IB_QPT_UD:
469 rlid = be16_to_cpu(hdr->lrh[3]);
470 rqpn = be32_to_cpu(ohdr->u.ud.deth[1]) & RVT_QPN_MASK;
471 svc_type = IB_CC_SVCTYPE_UD;
472 is_mcast = (dlid > be16_to_cpu(IB_MULTICAST_LID_BASE)) &&
473 (dlid != be16_to_cpu(IB_LID_PERMISSIVE));
474 break;
475 case IB_QPT_UC:
476 rlid = qp->remote_ah_attr.dlid;
477 rqpn = qp->remote_qpn;
478 svc_type = IB_CC_SVCTYPE_UC;
479 break;
480 case IB_QPT_RC:
481 rlid = qp->remote_ah_attr.dlid;
482 rqpn = qp->remote_qpn;
483 svc_type = IB_CC_SVCTYPE_RC;
484 break;
485 default:
486 return;
487 }
488
489 sc = hdr2sc(hdr, pkt->rhf);
490
491 bth1 = be32_to_cpu(ohdr->bth[1]);
492 if (do_cnp && (bth1 & HFI1_FECN_SMASK)) {
493 u16 pkey = (u16)be32_to_cpu(ohdr->bth[0]);
494
495 return_cnp(ibp, qp, rqpn, pkey, dlid, rlid, sc, grh);
496 }
497
498 if (!is_mcast && (bth1 & HFI1_BECN_SMASK)) {
499 struct hfi1_pportdata *ppd = ppd_from_ibp(ibp);
500 u32 lqpn = bth1 & RVT_QPN_MASK;
501 u8 sl = ibp->sc_to_sl[sc];
502
503 process_becn(ppd, sl, rlid, lqpn, rqpn, svc_type);
504 }
505
506}
507
508struct ps_mdata {
509 struct hfi1_ctxtdata *rcd;
510 u32 rsize;
511 u32 maxcnt;
512 u32 ps_head;
513 u32 ps_tail;
514 u32 ps_seq;
515};
516
517static inline void init_ps_mdata(struct ps_mdata *mdata,
518 struct hfi1_packet *packet)
519{
520 struct hfi1_ctxtdata *rcd = packet->rcd;
521
522 mdata->rcd = rcd;
523 mdata->rsize = packet->rsize;
524 mdata->maxcnt = packet->maxcnt;
525 mdata->ps_head = packet->rhqoff;
526
527 if (HFI1_CAP_KGET_MASK(rcd->flags, DMA_RTAIL)) {
528 mdata->ps_tail = get_rcvhdrtail(rcd);
529 if (rcd->ctxt == HFI1_CTRL_CTXT)
530 mdata->ps_seq = rcd->seq_cnt;
531 else
532 mdata->ps_seq = 0;
533 } else {
534 mdata->ps_tail = 0;
535 mdata->ps_seq = rcd->seq_cnt;
536 }
537}
538
539static inline int ps_done(struct ps_mdata *mdata, u64 rhf,
540 struct hfi1_ctxtdata *rcd)
541{
542 if (HFI1_CAP_KGET_MASK(rcd->flags, DMA_RTAIL))
543 return mdata->ps_head == mdata->ps_tail;
544 return mdata->ps_seq != rhf_rcv_seq(rhf);
545}
546
547static inline int ps_skip(struct ps_mdata *mdata, u64 rhf,
548 struct hfi1_ctxtdata *rcd)
549{
550
551
552
553
554 if ((rcd->ctxt == HFI1_CTRL_CTXT) && (mdata->ps_head != mdata->ps_tail))
555 return mdata->ps_seq != rhf_rcv_seq(rhf);
556
557 return 0;
558}
559
560static inline void update_ps_mdata(struct ps_mdata *mdata,
561 struct hfi1_ctxtdata *rcd)
562{
563 mdata->ps_head += mdata->rsize;
564 if (mdata->ps_head >= mdata->maxcnt)
565 mdata->ps_head = 0;
566
567
568 if (!HFI1_CAP_KGET_MASK(rcd->flags, DMA_RTAIL) ||
569 (rcd->ctxt == HFI1_CTRL_CTXT)) {
570 if (++mdata->ps_seq > 13)
571 mdata->ps_seq = 1;
572 }
573}
574
575
576
577
578
579
580
581
582
583#define prescan_rxq(rcd, packet) \
584 do { \
585 if (rcd->ppd->cc_prescan) \
586 __prescan_rxq(packet); \
587 } while (0)
588static void __prescan_rxq(struct hfi1_packet *packet)
589{
590 struct hfi1_ctxtdata *rcd = packet->rcd;
591 struct ps_mdata mdata;
592
593 init_ps_mdata(&mdata, packet);
594
595 while (1) {
596 struct hfi1_devdata *dd = rcd->dd;
597 struct hfi1_ibport *ibp = &rcd->ppd->ibport_data;
598 __le32 *rhf_addr = (__le32 *)rcd->rcvhdrq + mdata.ps_head +
599 dd->rhf_offset;
600 struct rvt_qp *qp;
601 struct ib_header *hdr;
602 struct rvt_dev_info *rdi = &dd->verbs_dev.rdi;
603 u64 rhf = rhf_to_cpu(rhf_addr);
604 u32 etype = rhf_rcv_type(rhf), qpn, bth1;
605 int is_ecn = 0;
606 u8 lnh;
607
608 if (ps_done(&mdata, rhf, rcd))
609 break;
610
611 if (ps_skip(&mdata, rhf, rcd))
612 goto next;
613
614 if (etype != RHF_RCV_TYPE_IB)
615 goto next;
616
617 packet->hdr = hfi1_get_msgheader(dd, rhf_addr);
618 hdr = packet->hdr;
619
620 lnh = be16_to_cpu(hdr->lrh[0]) & 3;
621
622 if (lnh == HFI1_LRH_BTH) {
623 packet->ohdr = &hdr->u.oth;
624 } else if (lnh == HFI1_LRH_GRH) {
625 packet->ohdr = &hdr->u.l.oth;
626 packet->rcv_flags |= HFI1_HAS_GRH;
627 } else {
628 goto next;
629 }
630
631 bth1 = be32_to_cpu(packet->ohdr->bth[1]);
632 is_ecn = !!(bth1 & (HFI1_FECN_SMASK | HFI1_BECN_SMASK));
633
634 if (!is_ecn)
635 goto next;
636
637 qpn = bth1 & RVT_QPN_MASK;
638 rcu_read_lock();
639 qp = rvt_lookup_qpn(rdi, &ibp->rvp, qpn);
640
641 if (!qp) {
642 rcu_read_unlock();
643 goto next;
644 }
645
646 process_ecn(qp, packet, true);
647 rcu_read_unlock();
648
649
650 bth1 &= ~(HFI1_FECN_SMASK | HFI1_BECN_SMASK);
651 packet->ohdr->bth[1] = cpu_to_be32(bth1);
652next:
653 update_ps_mdata(&mdata, rcd);
654 }
655}
656
657static inline int skip_rcv_packet(struct hfi1_packet *packet, int thread)
658{
659 int ret = RCV_PKT_OK;
660
661
662 packet->rhqoff += packet->rsize;
663 if (packet->rhqoff >= packet->maxcnt)
664 packet->rhqoff = 0;
665
666 packet->numpkt++;
667 if (unlikely((packet->numpkt & (MAX_PKT_RECV - 1)) == 0)) {
668 if (thread) {
669 cond_resched();
670 } else {
671 ret = RCV_PKT_LIMIT;
672 this_cpu_inc(*packet->rcd->dd->rcv_limit);
673 }
674 }
675
676 packet->rhf_addr = (__le32 *)packet->rcd->rcvhdrq + packet->rhqoff +
677 packet->rcd->dd->rhf_offset;
678 packet->rhf = rhf_to_cpu(packet->rhf_addr);
679
680 return ret;
681}
682
683static inline int process_rcv_packet(struct hfi1_packet *packet, int thread)
684{
685 int ret = RCV_PKT_OK;
686
687 packet->hdr = hfi1_get_msgheader(packet->rcd->dd,
688 packet->rhf_addr);
689 packet->hlen = (u8 *)packet->rhf_addr - (u8 *)packet->hdr;
690 packet->etype = rhf_rcv_type(packet->rhf);
691
692 packet->tlen = rhf_pkt_len(packet->rhf);
693
694 packet->ebuf = NULL;
695 if (rhf_use_egr_bfr(packet->rhf)) {
696 packet->etail = rhf_egr_index(packet->rhf);
697 packet->ebuf = get_egrbuf(packet->rcd, packet->rhf,
698 &packet->updegr);
699
700
701
702
703
704 prefetch_range(packet->ebuf,
705 packet->tlen - ((packet->rcd->rcvhdrqentsize -
706 (rhf_hdrq_offset(packet->rhf)
707 + 2)) * 4));
708 }
709
710
711
712
713
714
715
716
717
718 packet->rcd->dd->rhf_rcv_function_map[packet->etype](packet);
719 packet->numpkt++;
720
721
722 packet->rhqoff += packet->rsize;
723 if (packet->rhqoff >= packet->maxcnt)
724 packet->rhqoff = 0;
725
726 if (unlikely((packet->numpkt & (MAX_PKT_RECV - 1)) == 0)) {
727 if (thread) {
728 cond_resched();
729 } else {
730 ret = RCV_PKT_LIMIT;
731 this_cpu_inc(*packet->rcd->dd->rcv_limit);
732 }
733 }
734
735 packet->rhf_addr = (__le32 *)packet->rcd->rcvhdrq + packet->rhqoff +
736 packet->rcd->dd->rhf_offset;
737 packet->rhf = rhf_to_cpu(packet->rhf_addr);
738
739 return ret;
740}
741
742static inline void process_rcv_update(int last, struct hfi1_packet *packet)
743{
744
745
746
747
748
749
750 if (!last && !(packet->numpkt & 0xf)) {
751 update_usrhead(packet->rcd, packet->rhqoff, packet->updegr,
752 packet->etail, 0, 0);
753 packet->updegr = 0;
754 }
755 packet->rcv_flags = 0;
756}
757
758static inline void finish_packet(struct hfi1_packet *packet)
759{
760
761
762
763
764
765
766 update_usrhead(packet->rcd, packet->rcd->head, packet->updegr,
767 packet->etail, rcv_intr_dynamic, packet->numpkt);
768}
769
770static inline void process_rcv_qp_work(struct hfi1_packet *packet)
771{
772 struct hfi1_ctxtdata *rcd;
773 struct rvt_qp *qp, *nqp;
774
775 rcd = packet->rcd;
776 rcd->head = packet->rhqoff;
777
778
779
780
781
782 list_for_each_entry_safe(qp, nqp, &rcd->qp_wait_list, rspwait) {
783 list_del_init(&qp->rspwait);
784 if (qp->r_flags & RVT_R_RSP_NAK) {
785 qp->r_flags &= ~RVT_R_RSP_NAK;
786 hfi1_send_rc_ack(rcd, qp, 0);
787 }
788 if (qp->r_flags & RVT_R_RSP_SEND) {
789 unsigned long flags;
790
791 qp->r_flags &= ~RVT_R_RSP_SEND;
792 spin_lock_irqsave(&qp->s_lock, flags);
793 if (ib_rvt_state_ops[qp->state] &
794 RVT_PROCESS_OR_FLUSH_SEND)
795 hfi1_schedule_send(qp);
796 spin_unlock_irqrestore(&qp->s_lock, flags);
797 }
798 if (atomic_dec_and_test(&qp->refcount))
799 wake_up(&qp->wait);
800 }
801}
802
803
804
805
806int handle_receive_interrupt_nodma_rtail(struct hfi1_ctxtdata *rcd, int thread)
807{
808 u32 seq;
809 int last = RCV_PKT_OK;
810 struct hfi1_packet packet;
811
812 init_packet(rcd, &packet);
813 seq = rhf_rcv_seq(packet.rhf);
814 if (seq != rcd->seq_cnt) {
815 last = RCV_PKT_DONE;
816 goto bail;
817 }
818
819 prescan_rxq(rcd, &packet);
820
821 while (last == RCV_PKT_OK) {
822 last = process_rcv_packet(&packet, thread);
823 seq = rhf_rcv_seq(packet.rhf);
824 if (++rcd->seq_cnt > 13)
825 rcd->seq_cnt = 1;
826 if (seq != rcd->seq_cnt)
827 last = RCV_PKT_DONE;
828 process_rcv_update(last, &packet);
829 }
830 process_rcv_qp_work(&packet);
831bail:
832 finish_packet(&packet);
833 return last;
834}
835
836int handle_receive_interrupt_dma_rtail(struct hfi1_ctxtdata *rcd, int thread)
837{
838 u32 hdrqtail;
839 int last = RCV_PKT_OK;
840 struct hfi1_packet packet;
841
842 init_packet(rcd, &packet);
843 hdrqtail = get_rcvhdrtail(rcd);
844 if (packet.rhqoff == hdrqtail) {
845 last = RCV_PKT_DONE;
846 goto bail;
847 }
848 smp_rmb();
849
850 prescan_rxq(rcd, &packet);
851
852 while (last == RCV_PKT_OK) {
853 last = process_rcv_packet(&packet, thread);
854 if (packet.rhqoff == hdrqtail)
855 last = RCV_PKT_DONE;
856 process_rcv_update(last, &packet);
857 }
858 process_rcv_qp_work(&packet);
859bail:
860 finish_packet(&packet);
861 return last;
862}
863
864static inline void set_all_nodma_rtail(struct hfi1_devdata *dd)
865{
866 int i;
867
868 for (i = HFI1_CTRL_CTXT + 1; i < dd->first_user_ctxt; i++)
869 dd->rcd[i]->do_interrupt =
870 &handle_receive_interrupt_nodma_rtail;
871}
872
873static inline void set_all_dma_rtail(struct hfi1_devdata *dd)
874{
875 int i;
876
877 for (i = HFI1_CTRL_CTXT + 1; i < dd->first_user_ctxt; i++)
878 dd->rcd[i]->do_interrupt =
879 &handle_receive_interrupt_dma_rtail;
880}
881
882void set_all_slowpath(struct hfi1_devdata *dd)
883{
884 int i;
885
886
887 for (i = HFI1_CTRL_CTXT + 1; i < dd->first_user_ctxt; i++)
888 dd->rcd[i]->do_interrupt = &handle_receive_interrupt;
889}
890
891static inline int set_armed_to_active(struct hfi1_ctxtdata *rcd,
892 struct hfi1_packet *packet,
893 struct hfi1_devdata *dd)
894{
895 struct work_struct *lsaw = &rcd->ppd->linkstate_active_work;
896 struct ib_header *hdr = hfi1_get_msgheader(packet->rcd->dd,
897 packet->rhf_addr);
898 u8 etype = rhf_rcv_type(packet->rhf);
899
900 if (etype == RHF_RCV_TYPE_IB && hdr2sc(hdr, packet->rhf) != 0xf) {
901 int hwstate = read_logical_state(dd);
902
903 if (hwstate != LSTATE_ACTIVE) {
904 dd_dev_info(dd, "Unexpected link state %d\n", hwstate);
905 return 0;
906 }
907
908 queue_work(rcd->ppd->hfi1_wq, lsaw);
909 return 1;
910 }
911 return 0;
912}
913
914
915
916
917
918
919
920
921int handle_receive_interrupt(struct hfi1_ctxtdata *rcd, int thread)
922{
923 struct hfi1_devdata *dd = rcd->dd;
924 u32 hdrqtail;
925 int needset, last = RCV_PKT_OK;
926 struct hfi1_packet packet;
927 int skip_pkt = 0;
928
929
930 needset = (rcd->ctxt == HFI1_CTRL_CTXT) ? 0 : 1;
931
932 init_packet(rcd, &packet);
933
934 if (!HFI1_CAP_KGET_MASK(rcd->flags, DMA_RTAIL)) {
935 u32 seq = rhf_rcv_seq(packet.rhf);
936
937 if (seq != rcd->seq_cnt) {
938 last = RCV_PKT_DONE;
939 goto bail;
940 }
941 hdrqtail = 0;
942 } else {
943 hdrqtail = get_rcvhdrtail(rcd);
944 if (packet.rhqoff == hdrqtail) {
945 last = RCV_PKT_DONE;
946 goto bail;
947 }
948 smp_rmb();
949
950
951
952
953
954 if (rcd->ctxt == HFI1_CTRL_CTXT) {
955 u32 seq = rhf_rcv_seq(packet.rhf);
956
957 if (seq != rcd->seq_cnt)
958 skip_pkt = 1;
959 }
960 }
961
962 prescan_rxq(rcd, &packet);
963
964 while (last == RCV_PKT_OK) {
965 if (unlikely(dd->do_drop &&
966 atomic_xchg(&dd->drop_packet, DROP_PACKET_OFF) ==
967 DROP_PACKET_ON)) {
968 dd->do_drop = 0;
969
970
971 packet.rhqoff += packet.rsize;
972 packet.rhf_addr = (__le32 *)rcd->rcvhdrq +
973 packet.rhqoff +
974 dd->rhf_offset;
975 packet.rhf = rhf_to_cpu(packet.rhf_addr);
976
977 } else if (skip_pkt) {
978 last = skip_rcv_packet(&packet, thread);
979 skip_pkt = 0;
980 } else {
981
982 if (unlikely(rcd->ppd->host_link_state ==
983 HLS_UP_ARMED) &&
984 set_armed_to_active(rcd, &packet, dd))
985 goto bail;
986 last = process_rcv_packet(&packet, thread);
987 }
988
989 if (!HFI1_CAP_KGET_MASK(rcd->flags, DMA_RTAIL)) {
990 u32 seq = rhf_rcv_seq(packet.rhf);
991
992 if (++rcd->seq_cnt > 13)
993 rcd->seq_cnt = 1;
994 if (seq != rcd->seq_cnt)
995 last = RCV_PKT_DONE;
996 if (needset) {
997 dd_dev_info(dd, "Switching to NO_DMA_RTAIL\n");
998 set_all_nodma_rtail(dd);
999 needset = 0;
1000 }
1001 } else {
1002 if (packet.rhqoff == hdrqtail)
1003 last = RCV_PKT_DONE;
1004
1005
1006
1007
1008 if (rcd->ctxt == HFI1_CTRL_CTXT) {
1009 u32 seq = rhf_rcv_seq(packet.rhf);
1010
1011 if (++rcd->seq_cnt > 13)
1012 rcd->seq_cnt = 1;
1013 if (!last && (seq != rcd->seq_cnt))
1014 skip_pkt = 1;
1015 }
1016
1017 if (needset) {
1018 dd_dev_info(dd,
1019 "Switching to DMA_RTAIL\n");
1020 set_all_dma_rtail(dd);
1021 needset = 0;
1022 }
1023 }
1024
1025 process_rcv_update(last, &packet);
1026 }
1027
1028 process_rcv_qp_work(&packet);
1029
1030bail:
1031
1032
1033
1034
1035 finish_packet(&packet);
1036 return last;
1037}
1038
1039
1040
1041
1042
1043
1044
1045
1046
1047
1048
1049
1050
1051
1052
1053
1054
1055
1056void receive_interrupt_work(struct work_struct *work)
1057{
1058 struct hfi1_pportdata *ppd = container_of(work, struct hfi1_pportdata,
1059 linkstate_active_work);
1060 struct hfi1_devdata *dd = ppd->dd;
1061 int i;
1062
1063
1064 ppd->neighbor_normal = 1;
1065 set_link_state(ppd, HLS_UP_ACTIVE);
1066
1067
1068
1069
1070
1071 for (i = HFI1_CTRL_CTXT; i < dd->first_user_ctxt; i++)
1072 force_recv_intr(dd->rcd[i]);
1073}
1074
1075
1076
1077
1078
1079int mtu_to_enum(u32 mtu, int default_if_bad)
1080{
1081 switch (mtu) {
1082 case 0: return OPA_MTU_0;
1083 case 256: return OPA_MTU_256;
1084 case 512: return OPA_MTU_512;
1085 case 1024: return OPA_MTU_1024;
1086 case 2048: return OPA_MTU_2048;
1087 case 4096: return OPA_MTU_4096;
1088 case 8192: return OPA_MTU_8192;
1089 case 10240: return OPA_MTU_10240;
1090 }
1091 return default_if_bad;
1092}
1093
1094u16 enum_to_mtu(int mtu)
1095{
1096 switch (mtu) {
1097 case OPA_MTU_0: return 0;
1098 case OPA_MTU_256: return 256;
1099 case OPA_MTU_512: return 512;
1100 case OPA_MTU_1024: return 1024;
1101 case OPA_MTU_2048: return 2048;
1102 case OPA_MTU_4096: return 4096;
1103 case OPA_MTU_8192: return 8192;
1104 case OPA_MTU_10240: return 10240;
1105 default: return 0xffff;
1106 }
1107}
1108
1109
1110
1111
1112
1113
1114
1115
1116
1117int set_mtu(struct hfi1_pportdata *ppd)
1118{
1119 struct hfi1_devdata *dd = ppd->dd;
1120 int i, drain, ret = 0, is_up = 0;
1121
1122 ppd->ibmtu = 0;
1123 for (i = 0; i < ppd->vls_supported; i++)
1124 if (ppd->ibmtu < dd->vld[i].mtu)
1125 ppd->ibmtu = dd->vld[i].mtu;
1126 ppd->ibmaxlen = ppd->ibmtu + lrh_max_header_bytes(ppd->dd);
1127
1128 mutex_lock(&ppd->hls_lock);
1129 if (ppd->host_link_state == HLS_UP_INIT ||
1130 ppd->host_link_state == HLS_UP_ARMED ||
1131 ppd->host_link_state == HLS_UP_ACTIVE)
1132 is_up = 1;
1133
1134 drain = !is_ax(dd) && is_up;
1135
1136 if (drain)
1137
1138
1139
1140
1141
1142 ret = stop_drain_data_vls(dd);
1143
1144 if (ret) {
1145 dd_dev_err(dd, "%s: cannot stop/drain VLs - refusing to change per-VL MTUs\n",
1146 __func__);
1147 goto err;
1148 }
1149
1150 hfi1_set_ib_cfg(ppd, HFI1_IB_CFG_MTU, 0);
1151
1152 if (drain)
1153 open_fill_data_vls(dd);
1154
1155err:
1156 mutex_unlock(&ppd->hls_lock);
1157
1158 return ret;
1159}
1160
1161int hfi1_set_lid(struct hfi1_pportdata *ppd, u32 lid, u8 lmc)
1162{
1163 struct hfi1_devdata *dd = ppd->dd;
1164
1165 ppd->lid = lid;
1166 ppd->lmc = lmc;
1167 hfi1_set_ib_cfg(ppd, HFI1_IB_CFG_LIDLMC, 0);
1168
1169 dd_dev_info(dd, "port %u: got a lid: 0x%x\n", ppd->port, lid);
1170
1171 return 0;
1172}
1173
1174void shutdown_led_override(struct hfi1_pportdata *ppd)
1175{
1176 struct hfi1_devdata *dd = ppd->dd;
1177
1178
1179
1180
1181
1182
1183 smp_rmb();
1184 if (atomic_read(&ppd->led_override_timer_active)) {
1185 del_timer_sync(&ppd->led_override_timer);
1186 atomic_set(&ppd->led_override_timer_active, 0);
1187
1188 smp_wmb();
1189 }
1190
1191
1192 write_csr(dd, DCC_CFG_LED_CNTRL, 0);
1193}
1194
1195static void run_led_override(unsigned long opaque)
1196{
1197 struct hfi1_pportdata *ppd = (struct hfi1_pportdata *)opaque;
1198 struct hfi1_devdata *dd = ppd->dd;
1199 unsigned long timeout;
1200 int phase_idx;
1201
1202 if (!(dd->flags & HFI1_INITTED))
1203 return;
1204
1205 phase_idx = ppd->led_override_phase & 1;
1206
1207 setextled(dd, phase_idx);
1208
1209 timeout = ppd->led_override_vals[phase_idx];
1210
1211
1212 ppd->led_override_phase = !ppd->led_override_phase;
1213
1214 mod_timer(&ppd->led_override_timer, jiffies + timeout);
1215}
1216
1217
1218
1219
1220
1221
1222
1223void hfi1_start_led_override(struct hfi1_pportdata *ppd, unsigned int timeon,
1224 unsigned int timeoff)
1225{
1226 if (!(ppd->dd->flags & HFI1_INITTED))
1227 return;
1228
1229
1230 ppd->led_override_vals[0] = msecs_to_jiffies(timeoff);
1231 ppd->led_override_vals[1] = msecs_to_jiffies(timeon);
1232
1233
1234 ppd->led_override_phase = 1;
1235
1236
1237
1238
1239
1240 if (!timer_pending(&ppd->led_override_timer)) {
1241 setup_timer(&ppd->led_override_timer, run_led_override,
1242 (unsigned long)ppd);
1243 ppd->led_override_timer.expires = jiffies + 1;
1244 add_timer(&ppd->led_override_timer);
1245 atomic_set(&ppd->led_override_timer_active, 1);
1246
1247 smp_wmb();
1248 }
1249}
1250
1251
1252
1253
1254
1255
1256
1257
1258
1259
1260int hfi1_reset_device(int unit)
1261{
1262 int ret, i;
1263 struct hfi1_devdata *dd = hfi1_lookup(unit);
1264 struct hfi1_pportdata *ppd;
1265 unsigned long flags;
1266 int pidx;
1267
1268 if (!dd) {
1269 ret = -ENODEV;
1270 goto bail;
1271 }
1272
1273 dd_dev_info(dd, "Reset on unit %u requested\n", unit);
1274
1275 if (!dd->kregbase || !(dd->flags & HFI1_PRESENT)) {
1276 dd_dev_info(dd,
1277 "Invalid unit number %u or not initialized or not present\n",
1278 unit);
1279 ret = -ENXIO;
1280 goto bail;
1281 }
1282
1283 spin_lock_irqsave(&dd->uctxt_lock, flags);
1284 if (dd->rcd)
1285 for (i = dd->first_user_ctxt; i < dd->num_rcv_contexts; i++) {
1286 if (!dd->rcd[i] || !dd->rcd[i]->cnt)
1287 continue;
1288 spin_unlock_irqrestore(&dd->uctxt_lock, flags);
1289 ret = -EBUSY;
1290 goto bail;
1291 }
1292 spin_unlock_irqrestore(&dd->uctxt_lock, flags);
1293
1294 for (pidx = 0; pidx < dd->num_pports; ++pidx) {
1295 ppd = dd->pport + pidx;
1296
1297 shutdown_led_override(ppd);
1298 }
1299 if (dd->flags & HFI1_HAS_SEND_DMA)
1300 sdma_exit(dd);
1301
1302 hfi1_reset_cpu_counters(dd);
1303
1304 ret = hfi1_init(dd, 1);
1305
1306 if (ret)
1307 dd_dev_err(dd,
1308 "Reinitialize unit %u after reset failed with %d\n",
1309 unit, ret);
1310 else
1311 dd_dev_info(dd, "Reinitialized unit %u after resetting\n",
1312 unit);
1313
1314bail:
1315 return ret;
1316}
1317
1318void handle_eflags(struct hfi1_packet *packet)
1319{
1320 struct hfi1_ctxtdata *rcd = packet->rcd;
1321 u32 rte = rhf_rcv_type_err(packet->rhf);
1322
1323 rcv_hdrerr(rcd, rcd->ppd, packet);
1324 if (rhf_err_flags(packet->rhf))
1325 dd_dev_err(rcd->dd,
1326 "receive context %d: rhf 0x%016llx, errs [ %s%s%s%s%s%s%s%s] rte 0x%x\n",
1327 rcd->ctxt, packet->rhf,
1328 packet->rhf & RHF_K_HDR_LEN_ERR ? "k_hdr_len " : "",
1329 packet->rhf & RHF_DC_UNC_ERR ? "dc_unc " : "",
1330 packet->rhf & RHF_DC_ERR ? "dc " : "",
1331 packet->rhf & RHF_TID_ERR ? "tid " : "",
1332 packet->rhf & RHF_LEN_ERR ? "len " : "",
1333 packet->rhf & RHF_ECC_ERR ? "ecc " : "",
1334 packet->rhf & RHF_VCRC_ERR ? "vcrc " : "",
1335 packet->rhf & RHF_ICRC_ERR ? "icrc " : "",
1336 rte);
1337}
1338
1339
1340
1341
1342
1343int process_receive_ib(struct hfi1_packet *packet)
1344{
1345 trace_hfi1_rcvhdr(packet->rcd->ppd->dd,
1346 packet->rcd->ctxt,
1347 rhf_err_flags(packet->rhf),
1348 RHF_RCV_TYPE_IB,
1349 packet->hlen,
1350 packet->tlen,
1351 packet->updegr,
1352 rhf_egr_index(packet->rhf));
1353
1354 if (unlikely(rhf_err_flags(packet->rhf))) {
1355 handle_eflags(packet);
1356 return RHF_RCV_CONTINUE;
1357 }
1358
1359 hfi1_ib_rcv(packet);
1360 return RHF_RCV_CONTINUE;
1361}
1362
1363int process_receive_bypass(struct hfi1_packet *packet)
1364{
1365 struct hfi1_devdata *dd = packet->rcd->dd;
1366
1367 if (unlikely(rhf_err_flags(packet->rhf)))
1368 handle_eflags(packet);
1369
1370 dd_dev_err(dd,
1371 "Bypass packets are not supported in normal operation. Dropping\n");
1372 incr_cntr64(&dd->sw_rcv_bypass_packet_errors);
1373 if (!(dd->err_info_rcvport.status_and_code & OPA_EI_STATUS_SMASK)) {
1374 u64 *flits = packet->ebuf;
1375
1376 if (flits && !(packet->rhf & RHF_LEN_ERR)) {
1377 dd->err_info_rcvport.packet_flit1 = flits[0];
1378 dd->err_info_rcvport.packet_flit2 =
1379 packet->tlen > sizeof(flits[0]) ? flits[1] : 0;
1380 }
1381 dd->err_info_rcvport.status_and_code |=
1382 (OPA_EI_STATUS_SMASK | BAD_L2_ERR);
1383 }
1384 return RHF_RCV_CONTINUE;
1385}
1386
1387int process_receive_error(struct hfi1_packet *packet)
1388{
1389 handle_eflags(packet);
1390
1391 if (unlikely(rhf_err_flags(packet->rhf)))
1392 dd_dev_err(packet->rcd->dd,
1393 "Unhandled error packet received. Dropping.\n");
1394
1395 return RHF_RCV_CONTINUE;
1396}
1397
1398int kdeth_process_expected(struct hfi1_packet *packet)
1399{
1400 if (unlikely(rhf_err_flags(packet->rhf)))
1401 handle_eflags(packet);
1402
1403 dd_dev_err(packet->rcd->dd,
1404 "Unhandled expected packet received. Dropping.\n");
1405 return RHF_RCV_CONTINUE;
1406}
1407
1408int kdeth_process_eager(struct hfi1_packet *packet)
1409{
1410 if (unlikely(rhf_err_flags(packet->rhf)))
1411 handle_eflags(packet);
1412
1413 dd_dev_err(packet->rcd->dd,
1414 "Unhandled eager packet received. Dropping.\n");
1415 return RHF_RCV_CONTINUE;
1416}
1417
1418int process_receive_invalid(struct hfi1_packet *packet)
1419{
1420 dd_dev_err(packet->rcd->dd, "Invalid packet type %d. Dropping\n",
1421 rhf_rcv_type(packet->rhf));
1422 return RHF_RCV_CONTINUE;
1423}
1424