1
2
3
4
5
6
7
8
9#include <asm/sn/types.h>
10#include <asm/sn/addrs.h>
11#include <asm/sn/pcidev.h>
12#include <asm/sn/pcibus_provider_defs.h>
13#include <asm/sn/sn_sal.h>
14#include "xtalk/hubdev.h"
15#include <linux/acpi.h>
16
17
18
19
20
21
22
23
24
25
26
27
28struct acpi_vendor_uuid sn_uuid = {
29 .subtype = 0,
30 .data = { 0x2c, 0xc6, 0xa6, 0xfe, 0x9c, 0x44, 0xda, 0x11,
31 0xa2, 0x7c, 0x08, 0x00, 0x69, 0x13, 0xea, 0x51 },
32};
33
34struct sn_pcidev_match {
35 u8 bus;
36 unsigned int devfn;
37 acpi_handle handle;
38};
39
40
41
42
43static long
44sal_ioif_init(u64 *result)
45{
46 struct ia64_sal_retval isrv = {0,0,0,0};
47
48 SAL_CALL_NOLOCK(isrv,
49 SN_SAL_IOIF_INIT, 0, 0, 0, 0, 0, 0, 0);
50 *result = isrv.v0;
51 return isrv.status;
52}
53
54
55
56
57
58
59
60
61
62static acpi_status __init
63sn_acpi_hubdev_init(acpi_handle handle, u32 depth, void *context, void **ret)
64{
65 struct acpi_buffer buffer = { ACPI_ALLOCATE_BUFFER, NULL };
66 struct acpi_buffer name_buffer = { ACPI_ALLOCATE_BUFFER, NULL };
67 u64 addr;
68 struct hubdev_info *hubdev;
69 struct hubdev_info *hubdev_ptr;
70 int i;
71 u64 nasid;
72 struct acpi_resource *resource;
73 acpi_status status;
74 struct acpi_resource_vendor_typed *vendor;
75 extern void sn_common_hubdev_init(struct hubdev_info *);
76
77 status = acpi_get_vendor_resource(handle, METHOD_NAME__CRS,
78 &sn_uuid, &buffer);
79 if (ACPI_FAILURE(status)) {
80 acpi_get_name(handle, ACPI_FULL_PATHNAME, &name_buffer);
81 printk(KERN_ERR
82 "sn_acpi_hubdev_init: acpi_get_vendor_resource() "
83 "(0x%x) failed for: %s\n", status,
84 (char *)name_buffer.pointer);
85 kfree(name_buffer.pointer);
86 return AE_OK;
87 }
88
89 resource = buffer.pointer;
90 vendor = &resource->data.vendor_typed;
91 if ((vendor->byte_length - sizeof(struct acpi_vendor_uuid)) !=
92 sizeof(struct hubdev_info *)) {
93 acpi_get_name(handle, ACPI_FULL_PATHNAME, &name_buffer);
94 printk(KERN_ERR
95 "sn_acpi_hubdev_init: Invalid vendor data length: "
96 "%d for: %s\n",
97 vendor->byte_length, (char *)name_buffer.pointer);
98 kfree(name_buffer.pointer);
99 goto exit;
100 }
101
102 memcpy(&addr, vendor->byte_data, sizeof(struct hubdev_info *));
103 hubdev_ptr = __va((struct hubdev_info *) addr);
104
105 nasid = hubdev_ptr->hdi_nasid;
106 i = nasid_to_cnodeid(nasid);
107 hubdev = (struct hubdev_info *)(NODEPDA(i)->pdinfo);
108 *hubdev = *hubdev_ptr;
109 sn_common_hubdev_init(hubdev);
110
111exit:
112 kfree(buffer.pointer);
113 return AE_OK;
114}
115
116
117
118
119
120static struct pcibus_bussoft *
121sn_get_bussoft_ptr(struct pci_bus *bus)
122{
123 u64 addr;
124 struct acpi_buffer buffer = { ACPI_ALLOCATE_BUFFER, NULL };
125 struct acpi_buffer name_buffer = { ACPI_ALLOCATE_BUFFER, NULL };
126 acpi_handle handle;
127 struct pcibus_bussoft *prom_bussoft_ptr;
128 struct acpi_resource *resource;
129 acpi_status status;
130 struct acpi_resource_vendor_typed *vendor;
131
132
133 handle = PCI_CONTROLLER(bus)->acpi_handle;
134 status = acpi_get_vendor_resource(handle, METHOD_NAME__CRS,
135 &sn_uuid, &buffer);
136 if (ACPI_FAILURE(status)) {
137 acpi_get_name(handle, ACPI_FULL_PATHNAME, &name_buffer);
138 printk(KERN_ERR "%s: "
139 "acpi_get_vendor_resource() failed (0x%x) for: %s\n",
140 __func__, status, (char *)name_buffer.pointer);
141 kfree(name_buffer.pointer);
142 return NULL;
143 }
144 resource = buffer.pointer;
145 vendor = &resource->data.vendor_typed;
146
147 if ((vendor->byte_length - sizeof(struct acpi_vendor_uuid)) !=
148 sizeof(struct pcibus_bussoft *)) {
149 printk(KERN_ERR
150 "%s: Invalid vendor data length %d\n",
151 __func__, vendor->byte_length);
152 kfree(buffer.pointer);
153 return NULL;
154 }
155 memcpy(&addr, vendor->byte_data, sizeof(struct pcibus_bussoft *));
156 prom_bussoft_ptr = __va((struct pcibus_bussoft *) addr);
157 kfree(buffer.pointer);
158
159 return prom_bussoft_ptr;
160}
161
162
163
164
165
166
167
168static int
169sn_extract_device_info(acpi_handle handle, struct pcidev_info **pcidev_info,
170 struct sn_irq_info **sn_irq_info)
171{
172 u64 addr;
173 struct acpi_buffer buffer = { ACPI_ALLOCATE_BUFFER, NULL };
174 struct acpi_buffer name_buffer = { ACPI_ALLOCATE_BUFFER, NULL };
175 struct sn_irq_info *irq_info, *irq_info_prom;
176 struct pcidev_info *pcidev_ptr, *pcidev_prom_ptr;
177 struct acpi_resource *resource;
178 int ret = 0;
179 acpi_status status;
180 struct acpi_resource_vendor_typed *vendor;
181
182
183
184
185
186 status = acpi_get_vendor_resource(handle, METHOD_NAME__CRS,
187 &sn_uuid, &buffer);
188 if (ACPI_FAILURE(status)) {
189 acpi_get_name(handle, ACPI_FULL_PATHNAME, &name_buffer);
190 printk(KERN_ERR
191 "%s: acpi_get_vendor_resource() failed (0x%x) for: %s\n",
192 __func__, status, (char *)name_buffer.pointer);
193 kfree(name_buffer.pointer);
194 return 1;
195 }
196
197 resource = buffer.pointer;
198 vendor = &resource->data.vendor_typed;
199 if ((vendor->byte_length - sizeof(struct acpi_vendor_uuid)) !=
200 sizeof(struct pci_devdev_info *)) {
201 acpi_get_name(handle, ACPI_FULL_PATHNAME, &name_buffer);
202 printk(KERN_ERR
203 "%s: Invalid vendor data length: %d for: %s\n",
204 __func__, vendor->byte_length,
205 (char *)name_buffer.pointer);
206 kfree(name_buffer.pointer);
207 ret = 1;
208 goto exit;
209 }
210
211 pcidev_ptr = kzalloc(sizeof(struct pcidev_info), GFP_KERNEL);
212 if (!pcidev_ptr)
213 panic("%s: Unable to alloc memory for pcidev_info", __func__);
214
215 memcpy(&addr, vendor->byte_data, sizeof(struct pcidev_info *));
216 pcidev_prom_ptr = __va(addr);
217 memcpy(pcidev_ptr, pcidev_prom_ptr, sizeof(struct pcidev_info));
218
219
220 irq_info = kzalloc(sizeof(struct sn_irq_info), GFP_KERNEL);
221 if (!irq_info)
222 panic("%s: Unable to alloc memory for sn_irq_info", __func__);
223
224 if (pcidev_ptr->pdi_sn_irq_info) {
225 irq_info_prom = __va(pcidev_ptr->pdi_sn_irq_info);
226 memcpy(irq_info, irq_info_prom, sizeof(struct sn_irq_info));
227 }
228
229 *pcidev_info = pcidev_ptr;
230 *sn_irq_info = irq_info;
231
232exit:
233 kfree(buffer.pointer);
234 return ret;
235}
236
237static unsigned int
238get_host_devfn(acpi_handle device_handle, acpi_handle rootbus_handle)
239{
240 unsigned long long adr;
241 acpi_handle child;
242 unsigned int devfn;
243 int function;
244 acpi_handle parent;
245 int slot;
246 acpi_status status;
247 struct acpi_buffer name_buffer = { ACPI_ALLOCATE_BUFFER, NULL };
248
249 acpi_get_name(device_handle, ACPI_FULL_PATHNAME, &name_buffer);
250
251
252
253
254
255 child = device_handle;
256 while (child) {
257 status = acpi_get_parent(child, &parent);
258 if (ACPI_FAILURE(status)) {
259 printk(KERN_ERR "%s: acpi_get_parent() failed "
260 "(0x%x) for: %s\n", __func__, status,
261 (char *)name_buffer.pointer);
262 panic("%s: Unable to find host devfn\n", __func__);
263 }
264 if (parent == rootbus_handle)
265 break;
266 child = parent;
267 }
268 if (!child) {
269 printk(KERN_ERR "%s: Unable to find root bus for: %s\n",
270 __func__, (char *)name_buffer.pointer);
271 BUG();
272 }
273
274 status = acpi_evaluate_integer(child, METHOD_NAME__ADR, NULL, &adr);
275 if (ACPI_FAILURE(status)) {
276 printk(KERN_ERR "%s: Unable to get _ADR (0x%x) for: %s\n",
277 __func__, status, (char *)name_buffer.pointer);
278 panic("%s: Unable to find host devfn\n", __func__);
279 }
280
281 kfree(name_buffer.pointer);
282
283 slot = (adr >> 16) & 0xffff;
284 function = adr & 0xffff;
285 devfn = PCI_DEVFN(slot, function);
286 return devfn;
287}
288
289
290
291
292
293
294
295
296
297static acpi_status
298find_matching_device(acpi_handle handle, u32 lvl, void *context, void **rv)
299{
300 unsigned long long bbn = -1;
301 unsigned long long adr;
302 acpi_handle parent = NULL;
303 acpi_status status;
304 unsigned int devfn;
305 int function;
306 int slot;
307 struct sn_pcidev_match *info = context;
308 struct acpi_buffer name_buffer = { ACPI_ALLOCATE_BUFFER, NULL };
309
310 status = acpi_evaluate_integer(handle, METHOD_NAME__ADR, NULL,
311 &adr);
312 if (ACPI_SUCCESS(status)) {
313 status = acpi_get_parent(handle, &parent);
314 if (ACPI_FAILURE(status)) {
315 acpi_get_name(handle, ACPI_FULL_PATHNAME, &name_buffer);
316 printk(KERN_ERR
317 "%s: acpi_get_parent() failed (0x%x) for: %s\n",
318 __func__, status, (char *)name_buffer.pointer);
319 kfree(name_buffer.pointer);
320 return AE_OK;
321 }
322 status = acpi_evaluate_integer(parent, METHOD_NAME__BBN,
323 NULL, &bbn);
324 if (ACPI_FAILURE(status)) {
325 acpi_get_name(handle, ACPI_FULL_PATHNAME, &name_buffer);
326 printk(KERN_ERR
327 "%s: Failed to find _BBN in parent of: %s\n",
328 __func__, (char *)name_buffer.pointer);
329 kfree(name_buffer.pointer);
330 return AE_OK;
331 }
332
333 slot = (adr >> 16) & 0xffff;
334 function = adr & 0xffff;
335 devfn = PCI_DEVFN(slot, function);
336 if ((info->devfn == devfn) && (info->bus == bbn)) {
337
338 info->handle = handle;
339 return 1;
340 }
341 }
342 return AE_OK;
343}
344
345
346
347
348
349
350int
351sn_acpi_get_pcidev_info(struct pci_dev *dev, struct pcidev_info **pcidev_info,
352 struct sn_irq_info **sn_irq_info)
353{
354 unsigned int host_devfn;
355 struct sn_pcidev_match pcidev_match;
356 acpi_handle rootbus_handle;
357 unsigned long long segment;
358 acpi_status status;
359 struct acpi_buffer name_buffer = { ACPI_ALLOCATE_BUFFER, NULL };
360
361 rootbus_handle = PCI_CONTROLLER(dev)->acpi_handle;
362 status = acpi_evaluate_integer(rootbus_handle, METHOD_NAME__SEG, NULL,
363 &segment);
364 if (ACPI_SUCCESS(status)) {
365 if (segment != pci_domain_nr(dev)) {
366 acpi_get_name(rootbus_handle, ACPI_FULL_PATHNAME,
367 &name_buffer);
368 printk(KERN_ERR
369 "%s: Segment number mismatch, 0x%llx vs 0x%x for: %s\n",
370 __func__, segment, pci_domain_nr(dev),
371 (char *)name_buffer.pointer);
372 kfree(name_buffer.pointer);
373 return 1;
374 }
375 } else {
376 acpi_get_name(rootbus_handle, ACPI_FULL_PATHNAME, &name_buffer);
377 printk(KERN_ERR "%s: Unable to get __SEG from: %s\n",
378 __func__, (char *)name_buffer.pointer);
379 kfree(name_buffer.pointer);
380 return 1;
381 }
382
383
384
385
386
387
388 pcidev_match.bus = dev->bus->number;
389 pcidev_match.devfn = dev->devfn;
390 pcidev_match.handle = NULL;
391
392 acpi_walk_namespace(ACPI_TYPE_DEVICE, rootbus_handle, ACPI_UINT32_MAX,
393 find_matching_device, &pcidev_match, NULL);
394
395 if (!pcidev_match.handle) {
396 printk(KERN_ERR
397 "%s: Could not find matching ACPI device for %s.\n",
398 __func__, pci_name(dev));
399 return 1;
400 }
401
402 if (sn_extract_device_info(pcidev_match.handle, pcidev_info, sn_irq_info))
403 return 1;
404
405
406 host_devfn = get_host_devfn(pcidev_match.handle, rootbus_handle);
407 (*pcidev_info)->pdi_slot_host_handle =
408 ((unsigned long) pci_domain_nr(dev) << 40) |
409
410 host_devfn;
411 return 0;
412}
413
414
415
416
417
418
419
420
421
422
423
424void
425sn_acpi_slot_fixup(struct pci_dev *dev)
426{
427 void __iomem *addr;
428 struct pcidev_info *pcidev_info = NULL;
429 struct sn_irq_info *sn_irq_info = NULL;
430 size_t image_size, size;
431
432 if (sn_acpi_get_pcidev_info(dev, &pcidev_info, &sn_irq_info)) {
433 panic("%s: Failure obtaining pcidev_info for %s\n",
434 __func__, pci_name(dev));
435 }
436
437 if (pcidev_info->pdi_pio_mapped_addr[PCI_ROM_RESOURCE]) {
438
439
440
441
442
443 size = pci_resource_len(dev, PCI_ROM_RESOURCE);
444 addr = ioremap(pcidev_info->pdi_pio_mapped_addr[PCI_ROM_RESOURCE],
445 size);
446 image_size = pci_get_rom_size(dev, addr, size);
447 dev->resource[PCI_ROM_RESOURCE].start = (unsigned long) addr;
448 dev->resource[PCI_ROM_RESOURCE].end =
449 (unsigned long) addr + image_size - 1;
450 dev->resource[PCI_ROM_RESOURCE].flags |= IORESOURCE_ROM_BIOS_COPY;
451 }
452 sn_pci_fixup_slot(dev, pcidev_info, sn_irq_info);
453}
454
455EXPORT_SYMBOL(sn_acpi_slot_fixup);
456
457
458
459
460
461
462
463void
464sn_acpi_bus_fixup(struct pci_bus *bus)
465{
466 struct pci_dev *pci_dev = NULL;
467 struct pcibus_bussoft *prom_bussoft_ptr;
468
469 if (!bus->parent) {
470 prom_bussoft_ptr = sn_get_bussoft_ptr(bus);
471 if (prom_bussoft_ptr == NULL) {
472 printk(KERN_ERR
473 "%s: 0x%04x:0x%02x Unable to "
474 "obtain prom_bussoft_ptr\n",
475 __func__, pci_domain_nr(bus), bus->number);
476 return;
477 }
478 sn_common_bus_fixup(bus, prom_bussoft_ptr);
479 }
480 list_for_each_entry(pci_dev, &bus->devices, bus_list) {
481 sn_acpi_slot_fixup(pci_dev);
482 }
483}
484
485
486
487
488
489
490
491void __init
492sn_io_acpi_init(void)
493{
494 u64 result;
495 long status;
496
497
498 acpi_irq_model = ACPI_IRQ_MODEL_PLATFORM;
499
500
501 acpi_get_devices("SGIHUB", sn_acpi_hubdev_init, NULL, NULL);
502 acpi_get_devices("SGITIO", sn_acpi_hubdev_init, NULL, NULL);
503
504 status = sal_ioif_init(&result);
505 if (status || result)
506 panic("sal_ioif_init failed: [%lx] %s\n",
507 status, ia64_sal_strerror(status));
508}
509