1
2
3
4
5
6
7
8
9
10
11
12#include <linux/delay.h>
13#include <linux/export.h>
14#include <linux/gfp.h>
15#include <linux/kernel.h>
16#include <linux/pci.h>
17#include <linux/string.h>
18
19#include <asm/pci-bridge.h>
20#include <asm/ppc-pci.h>
21
22static int eeh_pe_aux_size = 0;
23static LIST_HEAD(eeh_phb_pe);
24
25
26
27
28
29
30
31void eeh_set_pe_aux_size(int size)
32{
33 if (size < 0)
34 return;
35
36 eeh_pe_aux_size = size;
37}
38
39
40
41
42
43
44
45
46static struct eeh_pe *eeh_pe_alloc(struct pci_controller *phb, int type)
47{
48 struct eeh_pe *pe;
49 size_t alloc_size;
50
51 alloc_size = sizeof(struct eeh_pe);
52 if (eeh_pe_aux_size) {
53 alloc_size = ALIGN(alloc_size, cache_line_size());
54 alloc_size += eeh_pe_aux_size;
55 }
56
57
58 pe = kzalloc(alloc_size, GFP_KERNEL);
59 if (!pe) return NULL;
60
61
62 pe->type = type;
63 pe->phb = phb;
64 INIT_LIST_HEAD(&pe->child_list);
65 INIT_LIST_HEAD(&pe->edevs);
66
67 pe->data = (void *)pe + ALIGN(sizeof(struct eeh_pe),
68 cache_line_size());
69 return pe;
70}
71
72
73
74
75
76
77
78
79int eeh_phb_pe_create(struct pci_controller *phb)
80{
81 struct eeh_pe *pe;
82
83
84 pe = eeh_pe_alloc(phb, EEH_PE_PHB);
85 if (!pe) {
86 pr_err("%s: out of memory!\n", __func__);
87 return -ENOMEM;
88 }
89
90
91 list_add_tail(&pe->child, &eeh_phb_pe);
92
93 pr_debug("EEH: Add PE for PHB#%x\n", phb->global_number);
94
95 return 0;
96}
97
98
99
100
101
102
103
104
105
106int eeh_wait_state(struct eeh_pe *pe, int max_wait)
107{
108 int ret;
109 int mwait;
110
111
112
113
114
115
116
117
118
119#define EEH_STATE_MIN_WAIT_TIME (1000)
120#define EEH_STATE_MAX_WAIT_TIME (300 * 1000)
121
122 while (1) {
123 ret = eeh_ops->get_state(pe, &mwait);
124
125 if (ret != EEH_STATE_UNAVAILABLE)
126 return ret;
127
128 if (max_wait <= 0) {
129 pr_warn("%s: Timeout when getting PE's state (%d)\n",
130 __func__, max_wait);
131 return EEH_STATE_NOT_SUPPORT;
132 }
133
134 if (mwait < EEH_STATE_MIN_WAIT_TIME) {
135 pr_warn("%s: Firmware returned bad wait value %d\n",
136 __func__, mwait);
137 mwait = EEH_STATE_MIN_WAIT_TIME;
138 } else if (mwait > EEH_STATE_MAX_WAIT_TIME) {
139 pr_warn("%s: Firmware returned too long wait value %d\n",
140 __func__, mwait);
141 mwait = EEH_STATE_MAX_WAIT_TIME;
142 }
143
144 msleep(min(mwait, max_wait));
145 max_wait -= mwait;
146 }
147}
148
149
150
151
152
153
154
155
156
157struct eeh_pe *eeh_phb_pe_get(struct pci_controller *phb)
158{
159 struct eeh_pe *pe;
160
161 list_for_each_entry(pe, &eeh_phb_pe, child) {
162
163
164
165
166
167 if ((pe->type & EEH_PE_PHB) && pe->phb == phb)
168 return pe;
169 }
170
171 return NULL;
172}
173
174
175
176
177
178
179
180
181
182struct eeh_pe *eeh_pe_next(struct eeh_pe *pe, struct eeh_pe *root)
183{
184 struct list_head *next = pe->child_list.next;
185
186 if (next == &pe->child_list) {
187 while (1) {
188 if (pe == root)
189 return NULL;
190 next = pe->child.next;
191 if (next != &pe->parent->child_list)
192 break;
193 pe = pe->parent;
194 }
195 }
196
197 return list_entry(next, struct eeh_pe, child);
198}
199
200
201
202
203
204
205
206
207
208
209
210
211void *eeh_pe_traverse(struct eeh_pe *root,
212 eeh_pe_traverse_func fn, void *flag)
213{
214 struct eeh_pe *pe;
215 void *ret;
216
217 eeh_for_each_pe(root, pe) {
218 ret = fn(pe, flag);
219 if (ret) return ret;
220 }
221
222 return NULL;
223}
224
225
226
227
228
229
230
231
232
233
234void eeh_pe_dev_traverse(struct eeh_pe *root,
235 eeh_edev_traverse_func fn, void *flag)
236{
237 struct eeh_pe *pe;
238 struct eeh_dev *edev, *tmp;
239
240 if (!root) {
241 pr_warn("%s: Invalid PE %p\n",
242 __func__, root);
243 return;
244 }
245
246
247 eeh_for_each_pe(root, pe)
248 eeh_pe_for_each_dev(pe, edev, tmp)
249 fn(edev, flag);
250}
251
252
253
254
255
256
257
258
259
260static void *__eeh_pe_get(struct eeh_pe *pe, void *flag)
261{
262 int *target_pe = flag;
263
264
265 if (pe->type & EEH_PE_PHB)
266 return NULL;
267
268 if (*target_pe == pe->addr)
269 return pe;
270
271 return NULL;
272}
273
274
275
276
277
278
279
280
281
282
283
284
285
286struct eeh_pe *eeh_pe_get(struct pci_controller *phb, int pe_no)
287{
288 struct eeh_pe *root = eeh_phb_pe_get(phb);
289
290 return eeh_pe_traverse(root, __eeh_pe_get, &pe_no);
291}
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306int eeh_pe_tree_insert(struct eeh_dev *edev, struct eeh_pe *new_pe_parent)
307{
308 struct pci_controller *hose = edev->controller;
309 struct eeh_pe *pe, *parent;
310
311
312
313
314
315
316
317 pe = eeh_pe_get(hose, edev->pe_config_addr);
318 if (pe) {
319 if (pe->type & EEH_PE_INVALID) {
320 list_add_tail(&edev->entry, &pe->edevs);
321 edev->pe = pe;
322
323
324
325
326 parent = pe;
327 while (parent) {
328 if (!(parent->type & EEH_PE_INVALID))
329 break;
330 parent->type &= ~EEH_PE_INVALID;
331 parent = parent->parent;
332 }
333
334 eeh_edev_dbg(edev, "Added to existing PE (parent: PE#%x)\n",
335 pe->parent->addr);
336 } else {
337
338 pe->type = EEH_PE_BUS;
339 edev->pe = pe;
340
341
342 list_add_tail(&edev->entry, &pe->edevs);
343 eeh_edev_dbg(edev, "Added to bus PE\n");
344 }
345 return 0;
346 }
347
348
349 if (edev->physfn)
350 pe = eeh_pe_alloc(hose, EEH_PE_VF);
351 else
352 pe = eeh_pe_alloc(hose, EEH_PE_DEVICE);
353 if (!pe) {
354 pr_err("%s: out of memory!\n", __func__);
355 return -ENOMEM;
356 }
357
358 pe->addr = edev->pe_config_addr;
359
360
361
362
363
364
365
366 if (!new_pe_parent) {
367 new_pe_parent = eeh_phb_pe_get(hose);
368 if (!new_pe_parent) {
369 pr_err("%s: No PHB PE is found (PHB Domain=%d)\n",
370 __func__, hose->global_number);
371 edev->pe = NULL;
372 kfree(pe);
373 return -EEXIST;
374 }
375 }
376
377
378 pe->parent = new_pe_parent;
379 list_add_tail(&pe->child, &new_pe_parent->child_list);
380
381
382
383
384
385 list_add_tail(&edev->entry, &pe->edevs);
386 edev->pe = pe;
387 eeh_edev_dbg(edev, "Added to new (parent: PE#%x)\n",
388 new_pe_parent->addr);
389
390 return 0;
391}
392
393
394
395
396
397
398
399
400
401
402int eeh_pe_tree_remove(struct eeh_dev *edev)
403{
404 struct eeh_pe *pe, *parent, *child;
405 bool keep, recover;
406 int cnt;
407
408 pe = eeh_dev_to_pe(edev);
409 if (!pe) {
410 eeh_edev_dbg(edev, "No PE found for device.\n");
411 return -EEXIST;
412 }
413
414
415 edev->pe = NULL;
416 list_del(&edev->entry);
417
418
419
420
421
422
423
424 while (1) {
425 parent = pe->parent;
426
427
428 if (pe->type & EEH_PE_PHB)
429 break;
430
431
432
433
434
435
436 keep = !!(pe->state & EEH_PE_KEEP);
437 recover = !!(pe->state & EEH_PE_RECOVERING);
438 WARN_ON(keep && !recover);
439
440 if (!keep && !recover) {
441 if (list_empty(&pe->edevs) &&
442 list_empty(&pe->child_list)) {
443 list_del(&pe->child);
444 kfree(pe);
445 } else {
446 break;
447 }
448 } else {
449
450
451
452
453
454
455
456
457
458 if (list_empty(&pe->edevs)) {
459 cnt = 0;
460 list_for_each_entry(child, &pe->child_list, child) {
461 if (!(child->type & EEH_PE_INVALID)) {
462 cnt++;
463 break;
464 }
465 }
466
467 if (!cnt)
468 pe->type |= EEH_PE_INVALID;
469 else
470 break;
471 }
472 }
473
474 pe = parent;
475 }
476
477 return 0;
478}
479
480
481
482
483
484
485
486
487
488
489void eeh_pe_update_time_stamp(struct eeh_pe *pe)
490{
491 time64_t tstamp;
492
493 if (!pe) return;
494
495 if (pe->freeze_count <= 0) {
496 pe->freeze_count = 0;
497 pe->tstamp = ktime_get_seconds();
498 } else {
499 tstamp = ktime_get_seconds();
500 if (tstamp - pe->tstamp > 3600) {
501 pe->tstamp = tstamp;
502 pe->freeze_count = 0;
503 }
504 }
505}
506
507
508
509
510
511
512
513
514
515void eeh_pe_state_mark(struct eeh_pe *root, int state)
516{
517 struct eeh_pe *pe;
518
519 eeh_for_each_pe(root, pe)
520 if (!(pe->state & EEH_PE_REMOVED))
521 pe->state |= state;
522}
523EXPORT_SYMBOL_GPL(eeh_pe_state_mark);
524
525
526
527
528
529
530
531
532
533void eeh_pe_mark_isolated(struct eeh_pe *root)
534{
535 struct eeh_pe *pe;
536 struct eeh_dev *edev;
537 struct pci_dev *pdev;
538
539 eeh_pe_state_mark(root, EEH_PE_ISOLATED);
540 eeh_for_each_pe(root, pe) {
541 list_for_each_entry(edev, &pe->edevs, entry) {
542 pdev = eeh_dev_to_pci_dev(edev);
543 if (pdev)
544 pdev->error_state = pci_channel_io_frozen;
545 }
546
547 if (pe->state & EEH_PE_CFG_RESTRICTED)
548 pe->state |= EEH_PE_CFG_BLOCKED;
549 }
550}
551EXPORT_SYMBOL_GPL(eeh_pe_mark_isolated);
552
553static void __eeh_pe_dev_mode_mark(struct eeh_dev *edev, void *flag)
554{
555 int mode = *((int *)flag);
556
557 edev->mode |= mode;
558}
559
560
561
562
563
564
565
566void eeh_pe_dev_mode_mark(struct eeh_pe *pe, int mode)
567{
568 eeh_pe_dev_traverse(pe, __eeh_pe_dev_mode_mark, &mode);
569}
570
571
572
573
574
575
576
577
578
579
580
581void eeh_pe_state_clear(struct eeh_pe *root, int state, bool include_passed)
582{
583 struct eeh_pe *pe;
584 struct eeh_dev *edev, *tmp;
585 struct pci_dev *pdev;
586
587 eeh_for_each_pe(root, pe) {
588
589 if (pe->state & EEH_PE_REMOVED)
590 continue;
591
592 if (!include_passed && eeh_pe_passed(pe))
593 continue;
594
595 pe->state &= ~state;
596
597
598
599
600
601
602 if (!(state & EEH_PE_ISOLATED))
603 continue;
604
605 pe->check_count = 0;
606 eeh_pe_for_each_dev(pe, edev, tmp) {
607 pdev = eeh_dev_to_pci_dev(edev);
608 if (!pdev)
609 continue;
610
611 pdev->error_state = pci_channel_io_normal;
612 }
613
614
615 if (pe->state & EEH_PE_CFG_RESTRICTED)
616 pe->state &= ~EEH_PE_CFG_BLOCKED;
617 }
618}
619
620
621
622
623
624
625
626
627
628
629
630
631static void eeh_bridge_check_link(struct eeh_dev *edev)
632{
633 int cap;
634 uint32_t val;
635 int timeout = 0;
636
637
638
639
640
641 if (!(edev->mode & (EEH_DEV_ROOT_PORT | EEH_DEV_DS_PORT)))
642 return;
643
644 eeh_edev_dbg(edev, "Checking PCIe link...\n");
645
646
647 cap = edev->pcie_cap;
648 eeh_ops->read_config(edev, cap + PCI_EXP_SLTSTA, 2, &val);
649 if (!(val & PCI_EXP_SLTSTA_PDS)) {
650 eeh_edev_dbg(edev, "No card in the slot (0x%04x) !\n", val);
651 return;
652 }
653
654
655 eeh_ops->read_config(edev, cap + PCI_EXP_SLTCAP, 2, &val);
656 if (val & PCI_EXP_SLTCAP_PCP) {
657 eeh_ops->read_config(edev, cap + PCI_EXP_SLTCTL, 2, &val);
658 if (val & PCI_EXP_SLTCTL_PCC) {
659 eeh_edev_dbg(edev, "In power-off state, power it on ...\n");
660 val &= ~(PCI_EXP_SLTCTL_PCC | PCI_EXP_SLTCTL_PIC);
661 val |= (0x0100 & PCI_EXP_SLTCTL_PIC);
662 eeh_ops->write_config(edev, cap + PCI_EXP_SLTCTL, 2, val);
663 msleep(2 * 1000);
664 }
665 }
666
667
668 eeh_ops->read_config(edev, cap + PCI_EXP_LNKCTL, 2, &val);
669 val &= ~PCI_EXP_LNKCTL_LD;
670 eeh_ops->write_config(edev, cap + PCI_EXP_LNKCTL, 2, val);
671
672
673 eeh_ops->read_config(edev, cap + PCI_EXP_LNKCAP, 4, &val);
674 if (!(val & PCI_EXP_LNKCAP_DLLLARC)) {
675 eeh_edev_dbg(edev, "No link reporting capability (0x%08x) \n", val);
676 msleep(1000);
677 return;
678 }
679
680
681 timeout = 0;
682 while (timeout < 5000) {
683 msleep(20);
684 timeout += 20;
685
686 eeh_ops->read_config(edev, cap + PCI_EXP_LNKSTA, 2, &val);
687 if (val & PCI_EXP_LNKSTA_DLLLA)
688 break;
689 }
690
691 if (val & PCI_EXP_LNKSTA_DLLLA)
692 eeh_edev_dbg(edev, "Link up (%s)\n",
693 (val & PCI_EXP_LNKSTA_CLS_2_5GB) ? "2.5GB" : "5GB");
694 else
695 eeh_edev_dbg(edev, "Link not ready (0x%04x)\n", val);
696}
697
698#define BYTE_SWAP(OFF) (8*((OFF)/4)+3-(OFF))
699#define SAVED_BYTE(OFF) (((u8 *)(edev->config_space))[BYTE_SWAP(OFF)])
700
701static void eeh_restore_bridge_bars(struct eeh_dev *edev)
702{
703 int i;
704
705
706
707
708
709 for (i = 4; i < 13; i++)
710 eeh_ops->write_config(edev, i*4, 4, edev->config_space[i]);
711
712 eeh_ops->write_config(edev, 14*4, 4, edev->config_space[14]);
713
714
715 eeh_ops->write_config(edev, PCI_CACHE_LINE_SIZE, 1,
716 SAVED_BYTE(PCI_CACHE_LINE_SIZE));
717 eeh_ops->write_config(edev, PCI_LATENCY_TIMER, 1,
718 SAVED_BYTE(PCI_LATENCY_TIMER));
719
720 eeh_ops->write_config(edev, 15*4, 4, edev->config_space[15]);
721
722
723 eeh_ops->write_config(edev, PCI_COMMAND, 4, edev->config_space[1] |
724 PCI_COMMAND_MEMORY | PCI_COMMAND_MASTER);
725
726
727 eeh_bridge_check_link(edev);
728}
729
730static void eeh_restore_device_bars(struct eeh_dev *edev)
731{
732 int i;
733 u32 cmd;
734
735 for (i = 4; i < 10; i++)
736 eeh_ops->write_config(edev, i*4, 4, edev->config_space[i]);
737
738 eeh_ops->write_config(edev, 12*4, 4, edev->config_space[12]);
739
740 eeh_ops->write_config(edev, PCI_CACHE_LINE_SIZE, 1,
741 SAVED_BYTE(PCI_CACHE_LINE_SIZE));
742 eeh_ops->write_config(edev, PCI_LATENCY_TIMER, 1,
743 SAVED_BYTE(PCI_LATENCY_TIMER));
744
745
746 eeh_ops->write_config(edev, 15*4, 4, edev->config_space[15]);
747
748
749
750
751
752 eeh_ops->read_config(edev, PCI_COMMAND, 4, &cmd);
753 if (edev->config_space[1] & PCI_COMMAND_PARITY)
754 cmd |= PCI_COMMAND_PARITY;
755 else
756 cmd &= ~PCI_COMMAND_PARITY;
757 if (edev->config_space[1] & PCI_COMMAND_SERR)
758 cmd |= PCI_COMMAND_SERR;
759 else
760 cmd &= ~PCI_COMMAND_SERR;
761 eeh_ops->write_config(edev, PCI_COMMAND, 4, cmd);
762}
763
764
765
766
767
768
769
770
771
772
773static void eeh_restore_one_device_bars(struct eeh_dev *edev, void *flag)
774{
775
776 if (edev->mode & EEH_DEV_BRIDGE)
777 eeh_restore_bridge_bars(edev);
778 else
779 eeh_restore_device_bars(edev);
780
781 if (eeh_ops->restore_config)
782 eeh_ops->restore_config(edev);
783}
784
785
786
787
788
789
790
791
792void eeh_pe_restore_bars(struct eeh_pe *pe)
793{
794
795
796
797
798 eeh_pe_dev_traverse(pe, eeh_restore_one_device_bars, NULL);
799}
800
801
802
803
804
805
806
807
808
809
810const char *eeh_pe_loc_get(struct eeh_pe *pe)
811{
812 struct pci_bus *bus = eeh_pe_bus_get(pe);
813 struct device_node *dn;
814 const char *loc = NULL;
815
816 while (bus) {
817 dn = pci_bus_to_OF_node(bus);
818 if (!dn) {
819 bus = bus->parent;
820 continue;
821 }
822
823 if (pci_is_root_bus(bus))
824 loc = of_get_property(dn, "ibm,io-base-loc-code", NULL);
825 else
826 loc = of_get_property(dn, "ibm,slot-location-code",
827 NULL);
828
829 if (loc)
830 return loc;
831
832 bus = bus->parent;
833 }
834
835 return "N/A";
836}
837
838
839
840
841
842
843
844
845
846
847
848struct pci_bus *eeh_pe_bus_get(struct eeh_pe *pe)
849{
850 struct eeh_dev *edev;
851 struct pci_dev *pdev;
852
853 if (pe->type & EEH_PE_PHB)
854 return pe->phb->bus;
855
856
857 if (pe->state & EEH_PE_PRI_BUS)
858 return pe->bus;
859
860
861 edev = list_first_entry_or_null(&pe->edevs, struct eeh_dev, entry);
862 pdev = eeh_dev_to_pci_dev(edev);
863 if (pdev)
864 return pdev->bus;
865
866 return NULL;
867}
868