mmconfig.c 4.48 KB
Newer Older
Linus Torvalds's avatar
Linus Torvalds committed
1
2
3
4
5
6
7
8
9
/*
 * mmconfig.c - Low-level direct PCI config space access via MMCONFIG
 * 
 * This is an 64bit optimized version that always keeps the full mmconfig
 * space mapped. This allows lockless config space operation.
 */

#include <linux/pci.h>
#include <linux/init.h>
10
#include <linux/acpi.h>
11
#include <linux/bitmap.h>
Linus Torvalds's avatar
Linus Torvalds committed
12
13
14
15
#include "pci.h"

#define MMCONFIG_APER_SIZE (256*1024*1024)

16
17
static DECLARE_BITMAP(fallback_slots, 32);

Linus Torvalds's avatar
Linus Torvalds committed
18
/* Static virtual mapping of the MMCONFIG aperture */
19
20
struct mmcfg_virt {
	struct acpi_table_mcfg_config *cfg;
21
	char __iomem *virt;
22
23
};
static struct mmcfg_virt *pci_mmcfg_virt;
Linus Torvalds's avatar
Linus Torvalds committed
24

25
static char __iomem *get_virt(unsigned int seg, unsigned bus)
Linus Torvalds's avatar
Linus Torvalds committed
26
{
27
28
29
30
31
32
	int cfg_num = -1;
	struct acpi_table_mcfg_config *cfg;

	while (1) {
		++cfg_num;
		if (cfg_num >= pci_mmcfg_config_num) {
33
34
35
			/* Not found - fall back to type 1. This happens
			   e.g. on the internal devices of a K8 northbridge. */
			return NULL;
36
37
38
39
40
41
42
43
44
45
		}
		cfg = pci_mmcfg_virt[cfg_num].cfg;
		if (cfg->pci_segment_group_number != seg)
			continue;
		if ((cfg->start_bus_number <= bus) &&
		    (cfg->end_bus_number >= bus))
			return pci_mmcfg_virt[cfg_num].virt;
	}
}

46
static char __iomem *pci_dev_base(unsigned int seg, unsigned int bus, unsigned int devfn)
47
{
48
	char __iomem *addr;
49
50
51
	if (seg == 0 && bus == 0 && test_bit(PCI_SLOT(devfn), &fallback_slots))
		return NULL;
	addr = get_virt(seg, bus);
52
53
54
	if (!addr)
		return NULL;
 	return addr + ((bus << 20) | (devfn << 12));
Linus Torvalds's avatar
Linus Torvalds committed
55
56
57
58
59
}

static int pci_mmcfg_read(unsigned int seg, unsigned int bus,
			  unsigned int devfn, int reg, int len, u32 *value)
{
60
	char __iomem *addr;
Linus Torvalds's avatar
Linus Torvalds committed
61

62
	/* Why do we have this when nobody checks it. How about a BUG()!? -AK */
Linus Torvalds's avatar
Linus Torvalds committed
63
64
65
	if (unlikely(!value || (bus > 255) || (devfn > 255) || (reg > 4095)))
		return -EINVAL;

66
67
68
69
	addr = pci_dev_base(seg, bus, devfn);
	if (!addr)
		return pci_conf1_read(seg,bus,devfn,reg,len,value);

Linus Torvalds's avatar
Linus Torvalds committed
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
	switch (len) {
	case 1:
		*value = readb(addr + reg);
		break;
	case 2:
		*value = readw(addr + reg);
		break;
	case 4:
		*value = readl(addr + reg);
		break;
	}

	return 0;
}

static int pci_mmcfg_write(unsigned int seg, unsigned int bus,
			   unsigned int devfn, int reg, int len, u32 value)
{
88
	char __iomem *addr;
Linus Torvalds's avatar
Linus Torvalds committed
89

90
	/* Why do we have this when nobody checks it. How about a BUG()!? -AK */
Linus Torvalds's avatar
Linus Torvalds committed
91
92
93
	if (unlikely((bus > 255) || (devfn > 255) || (reg > 4095)))
		return -EINVAL;

94
95
96
97
	addr = pci_dev_base(seg, bus, devfn);
	if (!addr)
		return pci_conf1_write(seg,bus,devfn,reg,len,value);

Linus Torvalds's avatar
Linus Torvalds committed
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
	switch (len) {
	case 1:
		writeb(value, addr + reg);
		break;
	case 2:
		writew(value, addr + reg);
		break;
	case 4:
		writel(value, addr + reg);
		break;
	}

	return 0;
}

static struct pci_raw_ops pci_mmcfg = {
	.read =		pci_mmcfg_read,
	.write =	pci_mmcfg_write,
};

118
119
120
121
122
123
124
125
126
127
128
129
/* K8 systems have some devices (typically in the builtin northbridge)
   that are only accessible using type1
   Normally this can be expressed in the MCFG by not listing them
   and assigning suitable _SEGs, but this isn't implemented in some BIOS.
   Instead try to discover all devices on bus 0 that are unreachable using MM
   and fallback for them.
   We only do this for bus 0/seg 0 */
static __init void unreachable_devices(void)
{
	int i;
	for (i = 0; i < 32; i++) {
		u32 val1;
130
		char __iomem *addr;
131
132
133
134
135
136
137
138
139
140
141

		pci_conf1_read(0, 0, PCI_DEVFN(i,0), 0, 4, &val1);
		if (val1 == 0xffffffff)
			continue;
		addr = pci_dev_base(0, 0, PCI_DEVFN(i, 0));
		if (addr == NULL|| readl(addr) != val1) {
			set_bit(i, &fallback_slots);
		}
	}
}

Linus Torvalds's avatar
Linus Torvalds committed
142
143
static int __init pci_mmcfg_init(void)
{
144
145
	int i;

Linus Torvalds's avatar
Linus Torvalds committed
146
147
	if ((pci_probe & PCI_PROBE_MMCONF) == 0)
		return 0;
148
149
150
151
152

	acpi_table_parse(ACPI_MCFG, acpi_parse_mcfg);
	if ((pci_mmcfg_config_num == 0) ||
	    (pci_mmcfg_config == NULL) ||
	    (pci_mmcfg_config[0].base_address == 0))
Linus Torvalds's avatar
Linus Torvalds committed
153
154
155
		return 0;

	/* RED-PEN i386 doesn't do _nocache right now */
156
157
158
	pci_mmcfg_virt = kmalloc(sizeof(*pci_mmcfg_virt) * pci_mmcfg_config_num, GFP_KERNEL);
	if (pci_mmcfg_virt == NULL) {
		printk("PCI: Can not allocate memory for mmconfig structures\n");
Linus Torvalds's avatar
Linus Torvalds committed
159
		return 0;
160
161
162
163
164
165
166
167
168
169
170
	}
	for (i = 0; i < pci_mmcfg_config_num; ++i) {
		pci_mmcfg_virt[i].cfg = &pci_mmcfg_config[i];
		pci_mmcfg_virt[i].virt = ioremap_nocache(pci_mmcfg_config[i].base_address, MMCONFIG_APER_SIZE);
		if (!pci_mmcfg_virt[i].virt) {
			printk("PCI: Cannot map mmconfig aperture for segment %d\n",
			       pci_mmcfg_config[i].pci_segment_group_number);
			return 0;
		}
		printk(KERN_INFO "PCI: Using MMCONFIG at %x\n", pci_mmcfg_config[i].base_address);
	}
Linus Torvalds's avatar
Linus Torvalds committed
171

172
173
	unreachable_devices();

Linus Torvalds's avatar
Linus Torvalds committed
174
175
176
177
178
179
180
	raw_pci_ops = &pci_mmcfg;
	pci_probe = (pci_probe & ~PCI_PROBE_MASK) | PCI_PROBE_MMCONF;

	return 0;
}

arch_initcall(pci_mmcfg_init);