x86: multi pci root bus with different io resource range, on 64-bit
[deliverable/linux.git] / arch / x86 / pci / k8-bus_64.c
CommitLineData
1da177e4
LT
1#include <linux/init.h>
2#include <linux/pci.h>
871d5f8d 3#include <asm/pci-direct.h>
1da177e4
LT
4#include <asm/mpspec.h>
5#include <linux/cpumask.h>
871d5f8d 6#include <linux/topology.h>
1da177e4
LT
7
8/*
9 * This discovers the pcibus <-> node mapping on AMD K8.
30a18d6c 10 * also get peer root bus resource for io,mmio
1da177e4
LT
11 */
12
35ddd068 13
30a18d6c
YL
14/*
15 * sub bus (transparent) will use entres from 3 to store extra from root,
16 * so need to make sure have enought slot there, increase PCI_BUS_NUM_RESOURCES?
17 */
18#define RES_NUM 16
19struct pci_root_info {
20 char name[12];
21 unsigned int res_num;
22 struct resource res[RES_NUM];
23 int bus_min;
24 int bus_max;
25 int node;
26 int link;
27};
28
29/* 4 at this time, it may become to 32 */
30#define PCI_ROOT_NR 4
31static int pci_root_num;
32static struct pci_root_info pci_root_info[PCI_ROOT_NR];
1da177e4 33
871d5f8d
YL
34#ifdef CONFIG_NUMA
35
36#define BUS_NR 256
37
38static int mp_bus_to_node[BUS_NR];
39
40void set_mp_bus_to_node(int busnum, int node)
41{
42 if (busnum >= 0 && busnum < BUS_NR)
43 mp_bus_to_node[busnum] = node;
44}
45
46int get_mp_bus_to_node(int busnum)
47{
48 int node = -1;
49
50 if (busnum < 0 || busnum > (BUS_NR - 1))
51 return node;
52
53 node = mp_bus_to_node[busnum];
54
55 /*
56 * let numa_node_id to decide it later in dma_alloc_pages
57 * if there is no ram on that node
58 */
59 if (node != -1 && !node_online(node))
60 node = -1;
61
62 return node;
63}
871d5f8d
YL
64#endif
65
30a18d6c
YL
66void set_pci_bus_resources_arch_default(struct pci_bus *b)
67{
68 int i;
69 int j;
70 struct pci_root_info *info;
71
72 if (!pci_root_num)
73 return;
74
75 for (i = 0; i < pci_root_num; i++) {
76 if (pci_root_info[i].bus_min == b->number)
77 break;
78 }
79
80 if (i == pci_root_num)
81 return;
82
83 info = &pci_root_info[i];
84 for (j = 0; j < info->res_num; j++) {
85 struct resource *res;
86 struct resource *root;
87
88 res = &info->res[j];
89 b->resource[j] = res;
90 if (res->flags & IORESOURCE_IO)
91 root = &ioport_resource;
92 else
93 root = &iomem_resource;
94 insert_resource(root, res);
95 }
96}
97
98#define RANGE_NUM 16
99
100struct res_range {
101 size_t start;
102 size_t end;
103};
104
105static void __init update_range(struct res_range *range, size_t start,
106 size_t end)
107{
108 int i;
109 int j;
110
111 for (j = 0; j < RANGE_NUM; j++) {
112 if (!range[j].end)
113 continue;
114 if (start == range[j].start && end < range[j].end) {
115 range[j].start = end + 1;
116 break;
117 } else if (start == range[j].start && end == range[j].end) {
118 range[j].start = 0;
119 range[j].end = 0;
120 break;
121 } else if (start > range[j].start && end == range[j].end) {
122 range[j].end = start - 1;
123 break;
124 } else if (start > range[j].start && end < range[j].end) {
125 /* find the new spare */
126 for (i = 0; i < RANGE_NUM; i++) {
127 if (range[i].end == 0)
128 break;
129 }
130 if (i < RANGE_NUM) {
131 range[i].end = range[j].end;
132 range[i].start = end + 1;
133 } else {
134 printk(KERN_ERR "run of slot in ranges\n");
135 }
136 range[j].end = start - 1;
137 break;
138 }
139 }
140}
141
142static void __init update_res(struct pci_root_info *info, size_t start,
143 size_t end, unsigned long flags, int merge)
144{
145 int i;
146 struct resource *res;
147
148 if (!merge)
149 goto addit;
150
151 /* try to merge it with old one */
152 for (i = 0; i < info->res_num; i++) {
153 res = &info->res[i];
154 if (res->flags != flags)
155 continue;
156 if (res->end + 1 == start) {
157 res->end = end;
158 return;
159 } else if (end + 1 == res->start) {
160 res->start = start;
161 return;
162 }
163 }
164
165addit:
166
167 /* need to add that */
168 if (info->res_num >= RES_NUM)
169 return;
170
171 res = &info->res[info->res_num];
172 res->name = info->name;
173 res->flags = flags;
174 res->start = start;
175 res->end = end;
176 res->child = NULL;
177 info->res_num++;
178}
179
180struct pci_hostbridge_probe {
181 u32 bus;
182 u32 slot;
183 u32 vendor;
184 u32 device;
185};
186
187static struct pci_hostbridge_probe pci_probes[] __initdata = {
188 { 0, 0x18, PCI_VENDOR_ID_AMD, 0x1100 },
189 { 0, 0x18, PCI_VENDOR_ID_AMD, 0x1200 },
190 { 0xff, 0, PCI_VENDOR_ID_AMD, 0x1200 },
191 { 0, 0x18, PCI_VENDOR_ID_AMD, 0x1300 },
192};
193
1da177e4 194/**
871d5f8d
YL
195 * early_fill_mp_bus_to_node()
196 * called before pcibios_scan_root and pci_scan_bus
1da177e4
LT
197 * fills the mp_bus_to_cpumask array based according to the LDT Bus Number
198 * Registers found in the K8 northbridge
199 */
30a18d6c 200static int __init early_fill_mp_bus_info(void)
1da177e4 201{
30a18d6c
YL
202 int i;
203 int j;
204 unsigned bus;
871d5f8d 205 unsigned slot;
30a18d6c 206 int found;
35ddd068 207 int node;
30a18d6c
YL
208 int link;
209 int def_node;
210 int def_link;
211 struct pci_root_info *info;
212 u32 reg;
213 struct resource *res;
214 size_t start;
215 size_t end;
216 struct res_range range[RANGE_NUM];
217 u64 val;
218 u32 address;
1da177e4 219
30a18d6c 220#ifdef CONFIG_NUMA
871d5f8d
YL
221 for (i = 0; i < BUS_NR; i++)
222 mp_bus_to_node[i] = -1;
30a18d6c 223#endif
871d5f8d
YL
224
225 if (!early_pci_allowed())
226 return -1;
227
30a18d6c
YL
228 found = 0;
229 for (i = 0; i < ARRAY_SIZE(pci_probes); i++) {
230 u32 id;
231 u16 device;
232 u16 vendor;
35ddd068 233
30a18d6c
YL
234 bus = pci_probes[i].bus;
235 slot = pci_probes[i].slot;
236 id = read_pci_config(bus, slot, 0, PCI_VENDOR_ID);
35ddd068 237
30a18d6c
YL
238 vendor = id & 0xffff;
239 device = (id>>16) & 0xffff;
240 if (pci_probes[i].vendor == vendor &&
241 pci_probes[i].device == device) {
242 found = 1;
243 break;
244 }
245 }
246
247 if (!found)
248 return 0;
35ddd068 249
30a18d6c
YL
250 pci_root_num = 0;
251 for (i = 0; i < 4; i++) {
252 int min_bus;
253 int max_bus;
254 reg = read_pci_config(bus, slot, 1, 0xe0 + (i << 2));
35ddd068
YL
255
256 /* Check if that register is enabled for bus range */
30a18d6c 257 if ((reg & 7) != 3)
35ddd068
YL
258 continue;
259
30a18d6c
YL
260 min_bus = (reg >> 16) & 0xff;
261 max_bus = (reg >> 24) & 0xff;
262 node = (reg >> 4) & 0x07;
263#ifdef CONFIG_NUMA
35ddd068
YL
264 for (j = min_bus; j <= max_bus; j++)
265 mp_bus_to_node[j] = (unsigned char) node;
30a18d6c
YL
266#endif
267 link = (reg >> 8) & 0x03;
268
269 info = &pci_root_info[pci_root_num];
270 info->bus_min = min_bus;
271 info->bus_max = max_bus;
272 info->node = node;
273 info->link = link;
274 sprintf(info->name, "PCI Bus #%02x", min_bus);
275 pci_root_num++;
1da177e4
LT
276 }
277
30a18d6c
YL
278 /* get the default node and link for left over res */
279 reg = read_pci_config(bus, slot, 0, 0x60);
280 def_node = (reg >> 8) & 0x07;
281 reg = read_pci_config(bus, slot, 0, 0x64);
282 def_link = (reg >> 8) & 0x03;
283
284 memset(range, 0, sizeof(range));
285 range[0].end = 0xffff;
286 /* io port resource */
287 for (i = 0; i < 4; i++) {
288 reg = read_pci_config(bus, slot, 1, 0xc0 + (i << 3));
289 if (!(reg & 3))
290 continue;
291
292 start = reg & 0xfff000;
293 reg = read_pci_config(bus, slot, 1, 0xc4 + (i << 3));
294 node = reg & 0x07;
295 link = (reg >> 4) & 0x03;
296 end = (reg & 0xfff000) | 0xfff;
297
298 /* find the position */
299 for (j = 0; j < pci_root_num; j++) {
300 info = &pci_root_info[j];
301 if (info->node == node && info->link == link)
302 break;
303 }
304 if (j == pci_root_num)
305 continue; /* not found */
306
307 info = &pci_root_info[j];
308 update_res(info, start, end, IORESOURCE_IO, 0);
309 update_range(range, start, end);
310 }
311 /* add left over io port range to def node/link, [0, 0xffff] */
312 /* find the position */
313 for (j = 0; j < pci_root_num; j++) {
314 info = &pci_root_info[j];
315 if (info->node == def_node && info->link == def_link)
316 break;
317 }
318 if (j < pci_root_num) {
319 info = &pci_root_info[j];
320 for (i = 0; i < RANGE_NUM; i++) {
321 if (!range[i].end)
322 continue;
323
324 update_res(info, range[i].start, range[i].end,
325 IORESOURCE_IO, 1);
326 }
327 }
328
329 memset(range, 0, sizeof(range));
330 /* 0xfd00000000-0xffffffffff for HT */
331 /* 0xfc00000000-0xfcffffffff for Family 10h mmconfig*/
332 range[0].end = 0xfbffffffffULL;
333
334 /* need to take out [0, TOM) for RAM*/
335 address = MSR_K8_TOP_MEM1;
336 rdmsrl(address, val);
337 end = (val & 0xffffff8000000ULL);
338 printk(KERN_INFO "TOM: %016lx aka %ldM\n", end, end>>20);
339 if (end < (1ULL<<32))
340 update_range(range, 0, end - 1);
341
342 /* mmio resource */
343 for (i = 0; i < 8; i++) {
344 reg = read_pci_config(bus, slot, 1, 0x80 + (i << 3));
345 if (!(reg & 3))
346 continue;
347
348 start = reg & 0xffffff00; /* 39:16 on 31:8*/
349 start <<= 8;
350 reg = read_pci_config(bus, slot, 1, 0x84 + (i << 3));
351 node = reg & 0x07;
352 link = (reg >> 4) & 0x03;
353 end = (reg & 0xffffff00);
354 end <<= 8;
355 end |= 0xffff;
356
357 /* find the position */
358 for (j = 0; j < pci_root_num; j++) {
359 info = &pci_root_info[j];
360 if (info->node == node && info->link == link)
361 break;
362 }
363 if (j == pci_root_num)
364 continue; /* not found */
365
366 info = &pci_root_info[j];
367 update_res(info, start, end, IORESOURCE_MEM, 0);
368 update_range(range, start, end);
369 }
370
371 /* need to take out [4G, TOM2) for RAM*/
372 /* SYS_CFG */
373 address = MSR_K8_SYSCFG;
374 rdmsrl(address, val);
375 /* TOP_MEM2 is enabled? */
376 if (val & (1<<21)) {
377 /* TOP_MEM2 */
378 address = MSR_K8_TOP_MEM2;
379 rdmsrl(address, val);
380 end = (val & 0xffffff8000000ULL);
381 printk(KERN_INFO "TOM2: %016lx aka %ldM\n", end, end>>20);
382 update_range(range, 1ULL<<32, end - 1);
383 }
384
385 /*
386 * add left over mmio range to def node/link ?
387 * that is tricky, just record range in from start_min to 4G
388 */
389 for (j = 0; j < pci_root_num; j++) {
390 info = &pci_root_info[j];
391 if (info->node == def_node && info->link == def_link)
392 break;
393 }
394 if (j < pci_root_num) {
395 info = &pci_root_info[j];
396
397 for (i = 0; i < RANGE_NUM; i++) {
398 if (!range[i].end)
399 continue;
400
401 update_res(info, range[i].start, range[i].end,
402 IORESOURCE_MEM, 1);
403 }
404 }
405
406#ifdef CONFIG_NUMA
871d5f8d 407 for (i = 0; i < BUS_NR; i++) {
35ddd068 408 node = mp_bus_to_node[i];
871d5f8d
YL
409 if (node >= 0)
410 printk(KERN_DEBUG "bus: %02x to node: %02x\n", i, node);
411 }
412#endif
30a18d6c
YL
413
414 for (i = 0; i < pci_root_num; i++) {
415 int res_num;
416 int busnum;
417
418 info = &pci_root_info[i];
419 res_num = info->res_num;
420 busnum = info->bus_min;
421 printk(KERN_DEBUG "bus: [%02x,%02x] on node %x link %x\n",
422 info->bus_min, info->bus_max, info->node, info->link);
423 for (j = 0; j < res_num; j++) {
424 res = &info->res[j];
425 printk(KERN_DEBUG "bus: %02x index %x %s: [%llx, %llx]\n",
426 busnum, j,
427 (res->flags & IORESOURCE_IO)?"io port":"mmio",
428 res->start, res->end);
429 }
430 }
431
1da177e4
LT
432 return 0;
433}
434
30a18d6c 435postcore_initcall(early_fill_mp_bus_info);
This page took 0.302401 seconds and 5 git commands to generate.