[net-next-2.6.git] / arch / x86 / pci / acpi.c

#include <linux/pci.h>
#include <linux/acpi.h>
#include <linux/init.h>
#include <linux/irq.h>
#include <linux/dmi.h>
#include <asm/numa.h>
#include <asm/pci_x86.h>

struct pci_root_info {
	struct acpi_device *bridge;
	char *name;
	unsigned int res_num;
	struct resource *res;
	struct pci_bus *bus;
	int busnum;
};

static acpi_status
resource_to_addr(struct acpi_resource *resource,
			struct acpi_resource_address64 *addr)
{
	acpi_status status;

	status = acpi_resource_to_address64(resource, addr);
	if (ACPI_SUCCESS(status) &&
	    (addr->resource_type == ACPI_MEMORY_RANGE ||
	    addr->resource_type == ACPI_IO_RANGE) &&
	    addr->address_length > 0 &&
	    addr->producer_consumer == ACPI_PRODUCER) {
		return AE_OK;
	}
	return AE_ERROR;
}

static acpi_status
count_resource(struct acpi_resource *acpi_res, void *data)
{
	struct pci_root_info *info = data;
	struct acpi_resource_address64 addr;
	acpi_status status;

	status = resource_to_addr(acpi_res, &addr);
	if (ACPI_SUCCESS(status))
		info->res_num++;
	return AE_OK;
}

static int
bus_has_transparent_bridge(struct pci_bus *bus)
{
	struct pci_dev *dev;

	list_for_each_entry(dev, &bus->devices, bus_list) {
		u16 class = dev->class >> 8;

		if (class == PCI_CLASS_BRIDGE_PCI && dev->transparent)
			return true;
	}
	return false;
}

static acpi_status
setup_resource(struct acpi_resource *acpi_res, void *data)
{
	struct pci_root_info *info = data;
	struct resource *res;
	struct acpi_resource_address64 addr;
	acpi_status status;
	unsigned long flags;
	struct resource *root;
	int max_root_bus_resources = PCI_BUS_NUM_RESOURCES;
	u64 start, end;

	if (bus_has_transparent_bridge(info->bus))
		max_root_bus_resources -= 3;

	status = resource_to_addr(acpi_res, &addr);
	if (!ACPI_SUCCESS(status))
		return AE_OK;

	if (addr.resource_type == ACPI_MEMORY_RANGE) {
		root = &iomem_resource;
		flags = IORESOURCE_MEM;
		if (addr.info.mem.caching == ACPI_PREFETCHABLE_MEMORY)
			flags |= IORESOURCE_PREFETCH;
	} else if (addr.resource_type == ACPI_IO_RANGE) {
		root = &ioport_resource;
		flags = IORESOURCE_IO;
	} else
		return AE_OK;

	start = addr.minimum + addr.translation_offset;
	end = start + addr.address_length - 1;
	if (info->res_num >= max_root_bus_resources) {
		if (pci_probe & PCI_USE__CRS)
			printk(KERN_WARNING "PCI: Failed to allocate "
			       "0x%lx-0x%lx from %s for %s due to _CRS "
			       "returning more than %d resource descriptors\n",
			       (unsigned long) start, (unsigned long) end,
			       root->name, info->name, max_root_bus_resources);
		return AE_OK;
	}

	res = &info->res[info->res_num];
	res->name = info->name;
	res->flags = flags;
	res->start = start;
	res->end = end;
	res->child = NULL;

	if (!(pci_probe & PCI_USE__CRS)) {
		dev_printk(KERN_DEBUG, &info->bridge->dev,
			   "host bridge window %pR (ignored)\n", res);
		return AE_OK;
	}

	if (insert_resource(root, res)) {
		dev_err(&info->bridge->dev,
			"can't allocate host bridge window %pR\n", res);
	} else {
		info->bus->resource[info->res_num] = res;
		info->res_num++;
		if (addr.translation_offset)
			dev_info(&info->bridge->dev, "host bridge window %pR "
				 "(PCI address [%#llx-%#llx])\n",
				 res, res->start - addr.translation_offset,
				 res->end - addr.translation_offset);
		else
			dev_info(&info->bridge->dev,
				 "host bridge window %pR\n", res);
	}
	return AE_OK;
}

static void
get_current_resources(struct acpi_device *device, int busnum,
			int domain, struct pci_bus *bus)
{
	struct pci_root_info info;
	size_t size;

	if (!(pci_probe & PCI_USE__CRS))
		dev_info(&device->dev,
			 "ignoring host bridge windows from ACPI; "
			 "boot with \"pci=use_crs\" to use them\n");

	info.bridge = device;
	info.bus = bus;
	info.res_num = 0;
	acpi_walk_resources(device->handle, METHOD_NAME__CRS, count_resource,
				&info);
	if (!info.res_num)
		return;

	size = sizeof(*info.res) * info.res_num;
	info.res = kmalloc(size, GFP_KERNEL);
	if (!info.res)
		goto res_alloc_fail;

	info.name = kmalloc(16, GFP_KERNEL);
	if (!info.name)
		goto name_alloc_fail;
	sprintf(info.name, "PCI Bus %04x:%02x", domain, busnum);

	info.res_num = 0;
	acpi_walk_resources(device->handle, METHOD_NAME__CRS, setup_resource,
				&info);

	return;

name_alloc_fail:
	kfree(info.res);
res_alloc_fail:
	return;
}

struct pci_bus * __devinit pci_acpi_scan_root(struct acpi_device *device, int domain, int busnum)
{
	struct pci_bus *bus;
	struct pci_sysdata *sd;
	int node;
#ifdef CONFIG_ACPI_NUMA
	int pxm;
#endif

	if (domain && !pci_domains_supported) {
		printk(KERN_WARNING "pci_bus %04x:%02x: "
		       "ignored (multiple domains not supported)\n",
		       domain, busnum);
		return NULL;
	}

	node = -1;
#ifdef CONFIG_ACPI_NUMA
	pxm = acpi_get_pxm(device->handle);
	if (pxm >= 0)
		node = pxm_to_node(pxm);
	if (node != -1)
		set_mp_bus_to_node(busnum, node);
	else
#endif
		node = get_mp_bus_to_node(busnum);

	if (node != -1 && !node_online(node))
		node = -1;

	/* Allocate per-root-bus (not per bus) arch-specific data.
	 * TODO: leak; this memory is never freed.
	 * It's arguable whether it's worth the trouble to care.
	 */
	sd = kzalloc(sizeof(*sd), GFP_KERNEL);
	if (!sd) {
		printk(KERN_WARNING "pci_bus %04x:%02x: "
		       "ignored (out of memory)\n", domain, busnum);
		return NULL;
	}

	sd->domain = domain;
	sd->node = node;
	/*
	 * Maybe the desired pci bus has been already scanned. In such case
	 * it is unnecessary to scan the pci bus with the given domain,busnum.
	 */
	bus = pci_find_bus(domain, busnum);
	if (bus) {
		/*
		 * If the desired bus exits, the content of bus->sysdata will
		 * be replaced by sd.
		 */
		memcpy(bus->sysdata, sd, sizeof(*sd));
		kfree(sd);
	} else {
		bus = pci_create_bus(NULL, busnum, &pci_root_ops, sd);
		if (bus) {
			get_current_resources(device, busnum, domain, bus);
			bus->subordinate = pci_scan_child_bus(bus);
		}
	}

	if (!bus)
		kfree(sd);

	if (bus && node != -1) {
#ifdef CONFIG_ACPI_NUMA
		if (pxm >= 0)
			dev_printk(KERN_DEBUG, &bus->dev,
				   "on NUMA node %d (pxm %d)\n", node, pxm);
#else
		dev_printk(KERN_DEBUG, &bus->dev, "on NUMA node %d\n", node);
#endif
	}

	return bus;
}

int __init pci_acpi_init(void)
{
	struct pci_dev *dev = NULL;

	if (pcibios_scanned)
		return 0;

	if (acpi_noirq)
		return 0;

	printk(KERN_INFO "PCI: Using ACPI for IRQ routing\n");
	acpi_irq_penalty_init();
	pcibios_scanned++;
	pcibios_enable_irq = acpi_pci_irq_enable;
	pcibios_disable_irq = acpi_pci_irq_disable;

	if (pci_routeirq) {
		/*
		 * PCI IRQ routing is set up by pci_enable_device(), but we
		 * also do it here in case there are still broken drivers that
		 * don't use pci_enable_device().
		 */
		printk(KERN_INFO "PCI: Routing PCI interrupts for all devices because \"pci=routeirq\" specified\n");
		for_each_pci_dev(dev)
			acpi_pci_irq_enable(dev);
	}

	return 0;
}
Commit	Line	Data
1da177e4 LT	1	#include <linux/pci.h>
	2	#include <linux/acpi.h>
	3	#include <linux/init.h>
b33fa1f3	4	#include <linux/irq.h>
036fff4c	5	#include <linux/dmi.h>
69e1a33f	6	#include <asm/numa.h>
82487711	7	#include <asm/pci_x86.h>
1da177e4	8
62f420f8	9	struct pci_root_info {
42887b29	10	struct acpi_device *bridge;
62f420f8 GH	11	char *name;
	12	unsigned int res_num;
	13	struct resource *res;
	14	struct pci_bus *bus;
	15	int busnum;
	16	};
	17
	18	static acpi_status
	19	resource_to_addr(struct acpi_resource *resource,
	20	struct acpi_resource_address64 *addr)
	21	{
	22	acpi_status status;
	23
	24	status = acpi_resource_to_address64(resource, addr);
	25	if (ACPI_SUCCESS(status) &&
	26	(addr->resource_type == ACPI_MEMORY_RANGE \|\|
	27	addr->resource_type == ACPI_IO_RANGE) &&
	28	addr->address_length > 0 &&
	29	addr->producer_consumer == ACPI_PRODUCER) {
	30	return AE_OK;
	31	}
	32	return AE_ERROR;
	33	}
	34
	35	static acpi_status
	36	count_resource(struct acpi_resource acpi_res, void data)
	37	{
	38	struct pci_root_info *info = data;
	39	struct acpi_resource_address64 addr;
	40	acpi_status status;
	41
	42	status = resource_to_addr(acpi_res, &addr);
	43	if (ACPI_SUCCESS(status))
	44	info->res_num++;
	45	return AE_OK;
	46	}
	47
f9cde5ff GH	48	static int
	49	bus_has_transparent_bridge(struct pci_bus *bus)
	50	{
	51	struct pci_dev *dev;
	52
	53	list_for_each_entry(dev, &bus->devices, bus_list) {
	54	u16 class = dev->class >> 8;
	55
	56	if (class == PCI_CLASS_BRIDGE_PCI && dev->transparent)
	57	return true;
	58	}
	59	return false;
	60	}
	61
62f420f8 GH	62	static acpi_status
	63	setup_resource(struct acpi_resource acpi_res, void data)
	64	{
	65	struct pci_root_info *info = data;
	66	struct resource *res;
	67	struct acpi_resource_address64 addr;
	68	acpi_status status;
	69	unsigned long flags;
	70	struct resource *root;
f9cde5ff	71	int max_root_bus_resources = PCI_BUS_NUM_RESOURCES;
2cdb3f1d YL	72	u64 start, end;
	73
	74	if (bus_has_transparent_bridge(info->bus))
	75	max_root_bus_resources -= 3;
3d9befd2	76
62f420f8 GH	77	status = resource_to_addr(acpi_res, &addr);
	78	if (!ACPI_SUCCESS(status))
	79	return AE_OK;
	80
	81	if (addr.resource_type == ACPI_MEMORY_RANGE) {
	82	root = &iomem_resource;
	83	flags = IORESOURCE_MEM;
	84	if (addr.info.mem.caching == ACPI_PREFETCHABLE_MEMORY)
	85	flags \|= IORESOURCE_PREFETCH;
	86	} else if (addr.resource_type == ACPI_IO_RANGE) {
	87	root = &ioport_resource;
	88	flags = IORESOURCE_IO;
	89	} else
	90	return AE_OK;
	91
2cdb3f1d YL	92	start = addr.minimum + addr.translation_offset;
2cdb3f1d YL	93	end = start + addr.address_length - 1;
f9cde5ff	94	if (info->res_num >= max_root_bus_resources) {
f1db6fde BH	95	if (pci_probe & PCI_USE__CRS)
	96	printk(KERN_WARNING "PCI: Failed to allocate "
	97	"0x%lx-0x%lx from %s for %s due to _CRS "
	98	"returning more than %d resource descriptors\n",
	99	(unsigned long) start, (unsigned long) end,
	100	root->name, info->name, max_root_bus_resources);
f9cde5ff GH	101	return AE_OK;
	102	}
	103
2cdb3f1d YL	104	res = &info->res[info->res_num];
	105	res->name = info->name;
	106	res->flags = flags;
	107	res->start = start;
	108	res->end = end;
	109	res->child = NULL;
	110
f1db6fde BH	111	if (!(pci_probe & PCI_USE__CRS)) {
	112	dev_printk(KERN_DEBUG, &info->bridge->dev,
	113	"host bridge window %pR (ignored)\n", res);
	114	return AE_OK;
	115	}
	116
62f420f8	117	if (insert_resource(root, res)) {
c7dabef8 BH	118	dev_err(&info->bridge->dev,
c7dabef8 BH	119	"can't allocate host bridge window %pR\n", res);
62f420f8 GH	120	} else {
	121	info->bus->resource[info->res_num] = res;
	122	info->res_num++;
42887b29	123	if (addr.translation_offset)
c7dabef8	124	dev_info(&info->bridge->dev, "host bridge window %pR "
42887b29 BH	125	"(PCI address [%#llx-%#llx])\n",
	126	res, res->start - addr.translation_offset,
	127	res->end - addr.translation_offset);
	128	else
	129	dev_info(&info->bridge->dev,
c7dabef8	130	"host bridge window %pR\n", res);
62f420f8 GH	131	}
	132	return AE_OK;
	133	}
	134
62f420f8 GH	135	static void
62f420f8 GH	136	get_current_resources(struct acpi_device *device, int busnum,
cb3576fa	137	int domain, struct pci_bus *bus)
62f420f8 GH	138	{
	139	struct pci_root_info info;
	140	size_t size;
	141
f1db6fde BH	142	if (!(pci_probe & PCI_USE__CRS))
	143	dev_info(&device->dev,
	144	"ignoring host bridge windows from ACPI; "
	145	"boot with \"pci=use_crs\" to use them\n");
	146
42887b29	147	info.bridge = device;
62f420f8 GH	148	info.bus = bus;
	149	info.res_num = 0;
	150	acpi_walk_resources(device->handle, METHOD_NAME__CRS, count_resource,
	151	&info);
	152	if (!info.res_num)
	153	return;
	154
	155	size = sizeof(info.res) info.res_num;
	156	info.res = kmalloc(size, GFP_KERNEL);
	157	if (!info.res)
	158	goto res_alloc_fail;
	159
cb3576fa	160	info.name = kmalloc(16, GFP_KERNEL);
62f420f8 GH	161	if (!info.name)
62f420f8 GH	162	goto name_alloc_fail;
cb3576fa	163	sprintf(info.name, "PCI Bus %04x:%02x", domain, busnum);
62f420f8 GH	164
	165	info.res_num = 0;
	166	acpi_walk_resources(device->handle, METHOD_NAME__CRS, setup_resource,
	167	&info);
62f420f8 GH	168
	169	return;
	170
	171	name_alloc_fail:
	172	kfree(info.res);
	173	res_alloc_fail:
	174	return;
	175	}
	176
1da177e4 LT	177	struct pci_bus * __devinit pci_acpi_scan_root(struct acpi_device *device, int domain, int busnum)
1da177e4 LT	178	{
69e1a33f	179	struct pci_bus *bus;
08f1c192	180	struct pci_sysdata *sd;
871d5f8d YL	181	int node;
871d5f8d YL	182	#ifdef CONFIG_ACPI_NUMA
08f1c192	183	int pxm;
871d5f8d	184	#endif
08f1c192	185
a79e4198	186	if (domain && !pci_domains_supported) {
2a6bed83 BH	187	printk(KERN_WARNING "pci_bus %04x:%02x: "
	188	"ignored (multiple domains not supported)\n",
	189	domain, busnum);
a79e4198 JG	190	return NULL;
	191	}
	192
871d5f8d YL	193	node = -1;
	194	#ifdef CONFIG_ACPI_NUMA
	195	pxm = acpi_get_pxm(device->handle);
	196	if (pxm >= 0)
	197	node = pxm_to_node(pxm);
	198	if (node != -1)
	199	set_mp_bus_to_node(busnum, node);
	200	else
871d5f8d	201	#endif
871d5f8d	202	node = get_mp_bus_to_node(busnum);
b755de8d YL	203
	204	if (node != -1 && !node_online(node))
	205	node = -1;
871d5f8d	206
08f1c192 MBY	207	/* Allocate per-root-bus (not per bus) arch-specific data.
	208	* TODO: leak; this memory is never freed.
	209	* It's arguable whether it's worth the trouble to care.
	210	*/
	211	sd = kzalloc(sizeof(*sd), GFP_KERNEL);
	212	if (!sd) {
2a6bed83 BH	213	printk(KERN_WARNING "pci_bus %04x:%02x: "
2a6bed83 BH	214	"ignored (out of memory)\n", domain, busnum);
08f1c192 MBY	215	return NULL;
08f1c192 MBY	216	}
69e1a33f	217
a79e4198	218	sd->domain = domain;
871d5f8d	219	sd->node = node;
b87e81e5	220	/*
	221	* Maybe the desired pci bus has been already scanned. In such case
	222	* it is unnecessary to scan the pci bus with the given domain,busnum.
	223	*/
	224	bus = pci_find_bus(domain, busnum);
	225	if (bus) {
	226	/*
	227	* If the desired bus exits, the content of bus->sysdata will
	228	* be replaced by sd.
	229	*/
	230	memcpy(bus->sysdata, sd, sizeof(*sd));
	231	kfree(sd);
626fdfec YL	232	} else {
	233	bus = pci_create_bus(NULL, busnum, &pci_root_ops, sd);
	234	if (bus) {
f1db6fde	235	get_current_resources(device, busnum, domain, bus);
626fdfec YL	236	bus->subordinate = pci_scan_child_bus(bus);
	237	}
	238	}
08f1c192	239
08f1c192 MBY	240	if (!bus)
	241	kfree(sd);
	242
dbb6152e	243	if (bus && node != -1) {
69e1a33f	244	#ifdef CONFIG_ACPI_NUMA
dbb6152e	245	if (pxm >= 0)
2b8c2efe BH	246	dev_printk(KERN_DEBUG, &bus->dev,
2b8c2efe BH	247	"on NUMA node %d (pxm %d)\n", node, pxm);
dbb6152e	248	#else
2b8c2efe	249	dev_printk(KERN_DEBUG, &bus->dev, "on NUMA node %d\n", node);
69e1a33f	250	#endif
dbb6152e	251	}
62f420f8	252
69e1a33f	253	return bus;
1da177e4 LT	254	}
1da177e4 LT	255
8dd779b1	256	int __init pci_acpi_init(void)
1da177e4 LT	257	{
	258	struct pci_dev *dev = NULL;
	259
	260	if (pcibios_scanned)
	261	return 0;
	262
	263	if (acpi_noirq)
	264	return 0;
	265
	266	printk(KERN_INFO "PCI: Using ACPI for IRQ routing\n");
	267	acpi_irq_penalty_init();
	268	pcibios_scanned++;
	269	pcibios_enable_irq = acpi_pci_irq_enable;
87bec66b	270	pcibios_disable_irq = acpi_pci_irq_disable;
1da177e4 LT	271
	272	if (pci_routeirq) {
	273	/*
	274	* PCI IRQ routing is set up by pci_enable_device(), but we
	275	* also do it here in case there are still broken drivers that
	276	* don't use pci_enable_device().
	277	*/
	278	printk(KERN_INFO "PCI: Routing PCI interrupts for all devices because \"pci=routeirq\" specified\n");
fb37fb96	279	for_each_pci_dev(dev)
1da177e4	280	acpi_pci_irq_enable(dev);
657472e9	281	}
1da177e4	282
1da177e4 LT	283	return 0;
1da177e4 LT	284	}