[deliverable/linux.git] / arch / powerpc / kernel / pci_dn.c

/*
 * pci_dn.c
 *
 * Copyright (C) 2001 Todd Inglett, IBM Corporation
 *
 * PCI manipulation via device_nodes.
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *    
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 * 
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
 */
#include <linux/kernel.h>
#include <linux/pci.h>
#include <linux/string.h>
#include <linux/init.h>
#include <linux/slab.h>
#include <linux/bootmem.h>

#include <asm/io.h>
#include <asm/prom.h>
#include <asm/pci-bridge.h>
#include <asm/pSeries_reconfig.h>
#include <asm/ppc-pci.h>
#include <asm/firmware.h>

/*
 * Traverse_func that inits the PCI fields of the device node.
 * NOTE: this *must* be done before read/write config to the device.
 */
static void * __devinit update_dn_pci_info(struct device_node *dn, void *data)
{
	struct pci_controller *phb = data;
	const int *type =
		of_get_property(dn, "ibm,pci-config-space-type", NULL);
	const u32 *regs;
	struct pci_dn *pdn;

	if (mem_init_done)
		pdn = kmalloc(sizeof(*pdn), GFP_KERNEL);
	else
		pdn = alloc_bootmem(sizeof(*pdn));
	if (pdn == NULL)
		return NULL;
	memset(pdn, 0, sizeof(*pdn));
	dn->data = pdn;
	pdn->node = dn;
	pdn->phb = phb;
	regs = of_get_property(dn, "reg", NULL);
	if (regs) {
		/* First register entry is addr (00BBSS00)  */
		pdn->busno = (regs[0] >> 16) & 0xff;
		pdn->devfn = (regs[0] >> 8) & 0xff;
	}
	if (firmware_has_feature(FW_FEATURE_ISERIES)) {
		const u32 *busp = of_get_property(dn, "linux,subbus", NULL);
		if (busp)
			pdn->bussubno = *busp;
	}

	pdn->pci_ext_config_space = (type && *type == 1);
	return NULL;
}

/*
 * Traverse a device tree stopping each PCI device in the tree.
 * This is done depth first.  As each node is processed, a "pre"
 * function is called and the children are processed recursively.
 *
 * The "pre" func returns a value.  If non-zero is returned from
 * the "pre" func, the traversal stops and this value is returned.
 * This return value is useful when using traverse as a method of
 * finding a device.
 *
 * NOTE: we do not run the func for devices that do not appear to
 * be PCI except for the start node which we assume (this is good
 * because the start node is often a phb which may be missing PCI
 * properties).
 * We use the class-code as an indicator. If we run into
 * one of these nodes we also assume its siblings are non-pci for
 * performance.
 */
void *traverse_pci_devices(struct device_node *start, traverse_func pre,
		void *data)
{
	struct device_node *dn, *nextdn;
	void *ret;

	/* We started with a phb, iterate all childs */
	for (dn = start->child; dn; dn = nextdn) {
		const u32 *classp;
		u32 class;

		nextdn = NULL;
		classp = of_get_property(dn, "class-code", NULL);
		class = classp ? *classp : 0;

		if (pre && ((ret = pre(dn, data)) != NULL))
			return ret;

		/* If we are a PCI bridge, go down */
		if (dn->child && ((class >> 8) == PCI_CLASS_BRIDGE_PCI ||
				  (class >> 8) == PCI_CLASS_BRIDGE_CARDBUS))
			/* Depth first...do children */
			nextdn = dn->child;
		else if (dn->sibling)
			/* ok, try next sibling instead. */
			nextdn = dn->sibling;
		if (!nextdn) {
			/* Walk up to next valid sibling. */
			do {
				dn = dn->parent;
				if (dn == start)
					return NULL;
			} while (dn->sibling == NULL);
			nextdn = dn->sibling;
		}
	}
	return NULL;
}

/** 
 * pci_devs_phb_init_dynamic - setup pci devices under this PHB
 * phb: pci-to-host bridge (top-level bridge connecting to cpu)
 *
 * This routine is called both during boot, (before the memory
 * subsystem is set up, before kmalloc is valid) and during the 
 * dynamic lpar operation of adding a PHB to a running system.
 */
void __devinit pci_devs_phb_init_dynamic(struct pci_controller *phb)
{
	struct device_node * dn = (struct device_node *) phb->arch_data;
	struct pci_dn *pdn;

	/* PHB nodes themselves must not match */
	update_dn_pci_info(dn, phb);
	pdn = dn->data;
	if (pdn) {
		pdn->devfn = pdn->busno = -1;
		pdn->phb = phb;
	}

	/* Update dn->phb ptrs for new phb and children devices */
	traverse_pci_devices(dn, update_dn_pci_info, phb);
}

/*
 * Traversal func that looks for a <busno,devfcn> value.
 * If found, the pci_dn is returned (thus terminating the traversal).
 */
static void *is_devfn_node(struct device_node *dn, void *data)
{
	int busno = ((unsigned long)data >> 8) & 0xff;
	int devfn = ((unsigned long)data) & 0xff;
	struct pci_dn *pci = dn->data;

	if (pci && (devfn == pci->devfn) && (busno == pci->busno))
		return dn;
	return NULL;
}

/*
 * This is the "slow" path for looking up a device_node from a
 * pci_dev.  It will hunt for the device under its parent's
 * phb and then update sysdata for a future fastpath.
 *
 * It may also do fixups on the actual device since this happens
 * on the first read/write.
 *
 * Note that it also must deal with devices that don't exist.
 * In this case it may probe for real hardware ("just in case")
 * and add a device_node to the device tree if necessary.
 *
 */
struct device_node *fetch_dev_dn(struct pci_dev *dev)
{
	struct device_node *orig_dn = dev->sysdata;
	struct device_node *dn;
	unsigned long searchval = (dev->bus->number << 8) | dev->devfn;

	dn = traverse_pci_devices(orig_dn, is_devfn_node, (void *)searchval);
	if (dn)
		dev->sysdata = dn;
	return dn;
}
EXPORT_SYMBOL(fetch_dev_dn);

static int pci_dn_reconfig_notifier(struct notifier_block *nb, unsigned long action, void *node)
{
	struct device_node *np = node;
	struct pci_dn *pci = NULL;
	int err = NOTIFY_OK;

	switch (action) {
	case PSERIES_RECONFIG_ADD:
		pci = np->parent->data;
		if (pci)
			update_dn_pci_info(np, pci->phb);
		break;
	default:
		err = NOTIFY_DONE;
		break;
	}
	return err;
}

static struct notifier_block pci_dn_reconfig_nb = {
	.notifier_call = pci_dn_reconfig_notifier,
};

/** 
 * pci_devs_phb_init - Initialize phbs and pci devs under them.
 * 
 * This routine walks over all phb's (pci-host bridges) on the
 * system, and sets up assorted pci-related structures 
 * (including pci info in the device node structs) for each
 * pci device found underneath.  This routine runs once,
 * early in the boot sequence.
 */
void __init pci_devs_phb_init(void)
{
	struct pci_controller *phb, *tmp;

	/* This must be done first so the device nodes have valid pci info! */
	list_for_each_entry_safe(phb, tmp, &hose_list, list_node)
		pci_devs_phb_init_dynamic(phb);

	pSeries_reconfig_notifier_register(&pci_dn_reconfig_nb);
}
Commit	Line	Data
1da177e4 LT	1	/*
	2	* pci_dn.c
	3	*
	4	* Copyright (C) 2001 Todd Inglett, IBM Corporation
	5	*
	6	* PCI manipulation via device_nodes.
	7	*
	8	* This program is free software; you can redistribute it and/or modify
	9	* it under the terms of the GNU General Public License as published by
	10	* the Free Software Foundation; either version 2 of the License, or
	11	* (at your option) any later version.
	12	*
	13	* This program is distributed in the hope that it will be useful,
	14	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	15	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	16	* GNU General Public License for more details.
	17	*
	18	* You should have received a copy of the GNU General Public License
	19	* along with this program; if not, write to the Free Software
	20	* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
	21	*/
	22	#include <linux/kernel.h>
	23	#include <linux/pci.h>
	24	#include <linux/string.h>
	25	#include <linux/init.h>
1635317f PM	26	#include <linux/slab.h>
1635317f PM	27	#include <linux/bootmem.h>
1da177e4 LT	28
	29	#include <asm/io.h>
	30	#include <asm/prom.h>
	31	#include <asm/pci-bridge.h>
	32	#include <asm/pSeries_reconfig.h>
d387899f	33	#include <asm/ppc-pci.h>
095eed4f	34	#include <asm/firmware.h>
1da177e4 LT	35
	36	/*
	37	* Traverse_func that inits the PCI fields of the device node.
	38	* NOTE: this must be done before read/write config to the device.
	39	*/
	40	static void * __devinit update_dn_pci_info(struct device_node dn, void data)
	41	{
	42	struct pci_controller *phb = data;
e2eb6392 SR	43	const int *type =
e2eb6392 SR	44	of_get_property(dn, "ibm,pci-config-space-type", NULL);
a7f67bdf	45	const u32 *regs;
1635317f PM	46	struct pci_dn *pdn;
1635317f PM	47
18126f35	48	if (mem_init_done)
1635317f PM	49	pdn = kmalloc(sizeof(*pdn), GFP_KERNEL);
	50	else
	51	pdn = alloc_bootmem(sizeof(*pdn));
	52	if (pdn == NULL)
	53	return NULL;
	54	memset(pdn, 0, sizeof(*pdn));
	55	dn->data = pdn;
	56	pdn->node = dn;
	57	pdn->phb = phb;
e2eb6392	58	regs = of_get_property(dn, "reg", NULL);
1da177e4 LT	59	if (regs) {
1da177e4 LT	60	/* First register entry is addr (00BBSS00) */
1635317f PM	61	pdn->busno = (regs[0] >> 16) & 0xff;
1635317f PM	62	pdn->devfn = (regs[0] >> 8) & 0xff;
1da177e4	63	}
095eed4f	64	if (firmware_has_feature(FW_FEATURE_ISERIES)) {
e2eb6392	65	const u32 *busp = of_get_property(dn, "linux,subbus", NULL);
095eed4f SR	66	if (busp)
	67	pdn->bussubno = *busp;
	68	}
1da177e4	69
1635317f	70	pdn->pci_ext_config_space = (type && *type == 1);
1da177e4 LT	71	return NULL;
	72	}
	73
	74	/*
	75	* Traverse a device tree stopping each PCI device in the tree.
	76	* This is done depth first. As each node is processed, a "pre"
	77	* function is called and the children are processed recursively.
	78	*
	79	* The "pre" func returns a value. If non-zero is returned from
	80	* the "pre" func, the traversal stops and this value is returned.
	81	* This return value is useful when using traverse as a method of
	82	* finding a device.
	83	*
	84	* NOTE: we do not run the func for devices that do not appear to
	85	* be PCI except for the start node which we assume (this is good
	86	* because the start node is often a phb which may be missing PCI
	87	* properties).
	88	* We use the class-code as an indicator. If we run into
	89	* one of these nodes we also assume its siblings are non-pci for
	90	* performance.
	91	*/
	92	void traverse_pci_devices(struct device_node start, traverse_func pre,
	93	void *data)
	94	{
	95	struct device_node dn, nextdn;
	96	void *ret;
	97
	98	/* We started with a phb, iterate all childs */
	99	for (dn = start->child; dn; dn = nextdn) {
a7f67bdf JK	100	const u32 *classp;
a7f67bdf JK	101	u32 class;
1da177e4 LT	102
1da177e4 LT	103	nextdn = NULL;
e2eb6392	104	classp = of_get_property(dn, "class-code", NULL);
1da177e4 LT	105	class = classp ? *classp : 0;
	106
	107	if (pre && ((ret = pre(dn, data)) != NULL))
	108	return ret;
	109
	110	/* If we are a PCI bridge, go down */
	111	if (dn->child && ((class >> 8) == PCI_CLASS_BRIDGE_PCI \|\|
	112	(class >> 8) == PCI_CLASS_BRIDGE_CARDBUS))
	113	/* Depth first...do children */
	114	nextdn = dn->child;
	115	else if (dn->sibling)
	116	/* ok, try next sibling instead. */
	117	nextdn = dn->sibling;
	118	if (!nextdn) {
	119	/* Walk up to next valid sibling. */
	120	do {
	121	dn = dn->parent;
	122	if (dn == start)
	123	return NULL;
	124	} while (dn->sibling == NULL);
	125	nextdn = dn->sibling;
	126	}
	127	}
	128	return NULL;
	129	}
	130
18126f35 LV	131	/**
	132	* pci_devs_phb_init_dynamic - setup pci devices under this PHB
	133	* phb: pci-to-host bridge (top-level bridge connecting to cpu)
	134	*
	135	* This routine is called both during boot, (before the memory
	136	* subsystem is set up, before kmalloc is valid) and during the
	137	* dynamic lpar operation of adding a PHB to a running system.
	138	*/
1da177e4 LT	139	void __devinit pci_devs_phb_init_dynamic(struct pci_controller *phb)
	140	{
	141	struct device_node * dn = (struct device_node *) phb->arch_data;
1635317f	142	struct pci_dn *pdn;
1da177e4 LT	143
1da177e4 LT	144	/* PHB nodes themselves must not match */
1635317f PM	145	update_dn_pci_info(dn, phb);
	146	pdn = dn->data;
	147	if (pdn) {
	148	pdn->devfn = pdn->busno = -1;
	149	pdn->phb = phb;
	150	}
1da177e4 LT	151
	152	/* Update dn->phb ptrs for new phb and children devices */
	153	traverse_pci_devices(dn, update_dn_pci_info, phb);
	154	}
	155
	156	/*
	157	* Traversal func that looks for a <busno,devfcn> value.
1635317f	158	* If found, the pci_dn is returned (thus terminating the traversal).
1da177e4 LT	159	*/
	160	static void is_devfn_node(struct device_node dn, void *data)
	161	{
	162	int busno = ((unsigned long)data >> 8) & 0xff;
	163	int devfn = ((unsigned long)data) & 0xff;
1635317f	164	struct pci_dn *pci = dn->data;
1da177e4	165
1635317f PM	166	if (pci && (devfn == pci->devfn) && (busno == pci->busno))
	167	return dn;
	168	return NULL;
1da177e4 LT	169	}
	170
	171	/*
	172	* This is the "slow" path for looking up a device_node from a
	173	* pci_dev. It will hunt for the device under its parent's
	174	* phb and then update sysdata for a future fastpath.
	175	*
	176	* It may also do fixups on the actual device since this happens
	177	* on the first read/write.
	178	*
	179	* Note that it also must deal with devices that don't exist.
	180	* In this case it may probe for real hardware ("just in case")
	181	* and add a device_node to the device tree if necessary.
	182	*
	183	*/
	184	struct device_node fetch_dev_dn(struct pci_dev dev)
	185	{
	186	struct device_node *orig_dn = dev->sysdata;
1da177e4 LT	187	struct device_node *dn;
	188	unsigned long searchval = (dev->bus->number << 8) \| dev->devfn;
	189
1635317f	190	dn = traverse_pci_devices(orig_dn, is_devfn_node, (void *)searchval);
1da177e4 LT	191	if (dn)
	192	dev->sysdata = dn;
	193	return dn;
	194	}
	195	EXPORT_SYMBOL(fetch_dev_dn);
	196
	197	static int pci_dn_reconfig_notifier(struct notifier_block nb, unsigned long action, void node)
	198	{
	199	struct device_node *np = node;
8902e87f	200	struct pci_dn *pci = NULL;
1da177e4 LT	201	int err = NOTIFY_OK;
	202
	203	switch (action) {
	204	case PSERIES_RECONFIG_ADD:
1635317f	205	pci = np->parent->data;
8902e87f JR	206	if (pci)
8902e87f JR	207	update_dn_pci_info(np, pci->phb);
1da177e4 LT	208	break;
	209	default:
	210	err = NOTIFY_DONE;
	211	break;
	212	}
	213	return err;
	214	}
	215
	216	static struct notifier_block pci_dn_reconfig_nb = {
	217	.notifier_call = pci_dn_reconfig_notifier,
	218	};
	219
18126f35 LV	220	/**
	221	* pci_devs_phb_init - Initialize phbs and pci devs under them.
	222	*
	223	* This routine walks over all phb's (pci-host bridges) on the
	224	* system, and sets up assorted pci-related structures
	225	* (including pci info in the device node structs) for each
	226	* pci device found underneath. This routine runs once,
	227	* early in the boot sequence.
1da177e4 LT	228	*/
	229	void __init pci_devs_phb_init(void)
	230	{
	231	struct pci_controller phb, tmp;
	232
	233	/* This must be done first so the device nodes have valid pci info! */
	234	list_for_each_entry_safe(phb, tmp, &hose_list, list_node)
	235	pci_devs_phb_init_dynamic(phb);
	236
	237	pSeries_reconfig_notifier_register(&pci_dn_reconfig_nb);
	238	}