xref: /openbmc/linux/arch/x86/pci/mmconfig_64.c (revision b627b4ed)
1 /*
2  * mmconfig.c - Low-level direct PCI config space access via MMCONFIG
3  *
4  * This is an 64bit optimized version that always keeps the full mmconfig
5  * space mapped. This allows lockless config space operation.
6  */
7 
8 #include <linux/pci.h>
9 #include <linux/init.h>
10 #include <linux/acpi.h>
11 #include <linux/bitmap.h>
12 #include <asm/e820.h>
13 #include <asm/pci_x86.h>
14 
15 /* Static virtual mapping of the MMCONFIG aperture */
16 struct mmcfg_virt {
17 	struct acpi_mcfg_allocation *cfg;
18 	char __iomem *virt;
19 };
20 static struct mmcfg_virt *pci_mmcfg_virt;
21 
22 static char __iomem *get_virt(unsigned int seg, unsigned bus)
23 {
24 	struct acpi_mcfg_allocation *cfg;
25 	int cfg_num;
26 
27 	for (cfg_num = 0; cfg_num < pci_mmcfg_config_num; cfg_num++) {
28 		cfg = pci_mmcfg_virt[cfg_num].cfg;
29 		if (cfg->pci_segment == seg &&
30 		    (cfg->start_bus_number <= bus) &&
31 		    (cfg->end_bus_number >= bus))
32 			return pci_mmcfg_virt[cfg_num].virt;
33 	}
34 
35 	/* Fall back to type 0 */
36 	return NULL;
37 }
38 
39 static char __iomem *pci_dev_base(unsigned int seg, unsigned int bus, unsigned int devfn)
40 {
41 	char __iomem *addr;
42 
43 	addr = get_virt(seg, bus);
44 	if (!addr)
45 		return NULL;
46  	return addr + ((bus << 20) | (devfn << 12));
47 }
48 
49 static int pci_mmcfg_read(unsigned int seg, unsigned int bus,
50 			  unsigned int devfn, int reg, int len, u32 *value)
51 {
52 	char __iomem *addr;
53 
54 	/* Why do we have this when nobody checks it. How about a BUG()!? -AK */
55 	if (unlikely((bus > 255) || (devfn > 255) || (reg > 4095))) {
56 err:		*value = -1;
57 		return -EINVAL;
58 	}
59 
60 	addr = pci_dev_base(seg, bus, devfn);
61 	if (!addr)
62 		goto err;
63 
64 	switch (len) {
65 	case 1:
66 		*value = mmio_config_readb(addr + reg);
67 		break;
68 	case 2:
69 		*value = mmio_config_readw(addr + reg);
70 		break;
71 	case 4:
72 		*value = mmio_config_readl(addr + reg);
73 		break;
74 	}
75 
76 	return 0;
77 }
78 
79 static int pci_mmcfg_write(unsigned int seg, unsigned int bus,
80 			   unsigned int devfn, int reg, int len, u32 value)
81 {
82 	char __iomem *addr;
83 
84 	/* Why do we have this when nobody checks it. How about a BUG()!? -AK */
85 	if (unlikely((bus > 255) || (devfn > 255) || (reg > 4095)))
86 		return -EINVAL;
87 
88 	addr = pci_dev_base(seg, bus, devfn);
89 	if (!addr)
90 		return -EINVAL;
91 
92 	switch (len) {
93 	case 1:
94 		mmio_config_writeb(addr + reg, value);
95 		break;
96 	case 2:
97 		mmio_config_writew(addr + reg, value);
98 		break;
99 	case 4:
100 		mmio_config_writel(addr + reg, value);
101 		break;
102 	}
103 
104 	return 0;
105 }
106 
107 static struct pci_raw_ops pci_mmcfg = {
108 	.read =		pci_mmcfg_read,
109 	.write =	pci_mmcfg_write,
110 };
111 
112 static void __iomem * __init mcfg_ioremap(struct acpi_mcfg_allocation *cfg)
113 {
114 	void __iomem *addr;
115 	u64 start, size;
116 
117 	start = cfg->start_bus_number;
118 	start <<= 20;
119 	start += cfg->address;
120 	size = cfg->end_bus_number + 1 - cfg->start_bus_number;
121 	size <<= 20;
122 	addr = ioremap_nocache(start, size);
123 	if (addr) {
124 		printk(KERN_INFO "PCI: Using MMCONFIG at %Lx - %Lx\n",
125 		       start, start + size - 1);
126 		addr -= cfg->start_bus_number << 20;
127 	}
128 	return addr;
129 }
130 
131 int __init pci_mmcfg_arch_init(void)
132 {
133 	int i;
134 	pci_mmcfg_virt = kzalloc(sizeof(*pci_mmcfg_virt) *
135 				 pci_mmcfg_config_num, GFP_KERNEL);
136 	if (pci_mmcfg_virt == NULL) {
137 		printk(KERN_ERR "PCI: Can not allocate memory for mmconfig structures\n");
138 		return 0;
139 	}
140 
141 	for (i = 0; i < pci_mmcfg_config_num; ++i) {
142 		pci_mmcfg_virt[i].cfg = &pci_mmcfg_config[i];
143 		pci_mmcfg_virt[i].virt = mcfg_ioremap(&pci_mmcfg_config[i]);
144 		if (!pci_mmcfg_virt[i].virt) {
145 			printk(KERN_ERR "PCI: Cannot map mmconfig aperture for "
146 					"segment %d\n",
147 				pci_mmcfg_config[i].pci_segment);
148 			pci_mmcfg_arch_free();
149 			return 0;
150 		}
151 	}
152 	raw_pci_ext_ops = &pci_mmcfg;
153 	return 1;
154 }
155 
156 void __init pci_mmcfg_arch_free(void)
157 {
158 	int i;
159 
160 	if (pci_mmcfg_virt == NULL)
161 		return;
162 
163 	for (i = 0; i < pci_mmcfg_config_num; ++i) {
164 		if (pci_mmcfg_virt[i].virt) {
165 			iounmap(pci_mmcfg_virt[i].virt + (pci_mmcfg_virt[i].cfg->start_bus_number << 20));
166 			pci_mmcfg_virt[i].virt = NULL;
167 			pci_mmcfg_virt[i].cfg = NULL;
168 		}
169 	}
170 
171 	kfree(pci_mmcfg_virt);
172 	pci_mmcfg_virt = NULL;
173 }
174