xref: /linux/arch/powerpc/kernel/isa-bridge.c (revision e58e871becec2d3b04ed91c0c16fe8deac9c9dfa)
1 /*
2  * Routines for tracking a legacy ISA bridge
3  *
4  * Copyrigh 2007 Benjamin Herrenschmidt <benh@kernel.crashing.org>, IBM Corp.
5  *
6  * Some bits and pieces moved over from pci_64.c
7  *
8  * Copyrigh 2003 Anton Blanchard <anton@au.ibm.com>, IBM Corp.
9  *
10  *      This program is free software; you can redistribute it and/or
11  *      modify it under the terms of the GNU General Public License
12  *      as published by the Free Software Foundation; either version
13  *      2 of the License, or (at your option) any later version.
14  */
15 
16 #define DEBUG
17 
18 #include <linux/kernel.h>
19 #include <linux/pci.h>
20 #include <linux/string.h>
21 #include <linux/export.h>
22 #include <linux/init.h>
23 #include <linux/mm.h>
24 #include <linux/notifier.h>
25 
26 #include <asm/processor.h>
27 #include <asm/io.h>
28 #include <asm/prom.h>
29 #include <asm/pci-bridge.h>
30 #include <asm/machdep.h>
31 #include <asm/ppc-pci.h>
32 #include <asm/isa-bridge.h>
33 
34 unsigned long isa_io_base;	/* NULL if no ISA bus */
35 EXPORT_SYMBOL(isa_io_base);
36 
37 /* Cached ISA bridge dev. */
38 static struct device_node *isa_bridge_devnode;
39 struct pci_dev *isa_bridge_pcidev;
40 EXPORT_SYMBOL_GPL(isa_bridge_pcidev);
41 
42 #define ISA_SPACE_MASK 0x1
43 #define ISA_SPACE_IO 0x1
44 
45 static void pci_process_ISA_OF_ranges(struct device_node *isa_node,
46 				      unsigned long phb_io_base_phys)
47 {
48 	/* We should get some saner parsing here and remove these structs */
49 	struct pci_address {
50 		u32 a_hi;
51 		u32 a_mid;
52 		u32 a_lo;
53 	};
54 
55 	struct isa_address {
56 		u32 a_hi;
57 		u32 a_lo;
58 	};
59 
60 	struct isa_range {
61 		struct isa_address isa_addr;
62 		struct pci_address pci_addr;
63 		unsigned int size;
64 	};
65 
66 	const struct isa_range *range;
67 	unsigned long pci_addr;
68 	unsigned int isa_addr;
69 	unsigned int size;
70 	int rlen = 0;
71 
72 	range = of_get_property(isa_node, "ranges", &rlen);
73 	if (range == NULL || (rlen < sizeof(struct isa_range)))
74 		goto inval_range;
75 
76 	/* From "ISA Binding to 1275"
77 	 * The ranges property is laid out as an array of elements,
78 	 * each of which comprises:
79 	 *   cells 0 - 1:	an ISA address
80 	 *   cells 2 - 4:	a PCI address
81 	 *			(size depending on dev->n_addr_cells)
82 	 *   cell 5:		the size of the range
83 	 */
84 	if ((range->isa_addr.a_hi & ISA_SPACE_MASK) != ISA_SPACE_IO) {
85 		range++;
86 		rlen -= sizeof(struct isa_range);
87 		if (rlen < sizeof(struct isa_range))
88 			goto inval_range;
89 	}
90 	if ((range->isa_addr.a_hi & ISA_SPACE_MASK) != ISA_SPACE_IO)
91 		goto inval_range;
92 
93 	isa_addr = range->isa_addr.a_lo;
94 	pci_addr = (unsigned long) range->pci_addr.a_mid << 32 |
95 		range->pci_addr.a_lo;
96 
97 	/* Assume these are both zero. Note: We could fix that and
98 	 * do a proper parsing instead ... oh well, that will do for
99 	 * now as nobody uses fancy mappings for ISA bridges
100 	 */
101 	if ((pci_addr != 0) || (isa_addr != 0)) {
102 		printk(KERN_ERR "unexpected isa to pci mapping: %s\n",
103 		       __func__);
104 		return;
105 	}
106 
107 	/* Align size and make sure it's cropped to 64K */
108 	size = PAGE_ALIGN(range->size);
109 	if (size > 0x10000)
110 		size = 0x10000;
111 
112 	__ioremap_at(phb_io_base_phys, (void *)ISA_IO_BASE,
113 		     size, pgprot_val(pgprot_noncached(__pgprot(0))));
114 	return;
115 
116 inval_range:
117 	printk(KERN_ERR "no ISA IO ranges or unexpected isa range, "
118 	       "mapping 64k\n");
119 	__ioremap_at(phb_io_base_phys, (void *)ISA_IO_BASE,
120 		     0x10000, pgprot_val(pgprot_noncached(__pgprot(0))));
121 }
122 
123 
124 /**
125  * isa_bridge_find_early - Find and map the ISA IO space early before
126  *                         main PCI discovery. This is optionally called by
127  *                         the arch code when adding PCI PHBs to get early
128  *                         access to ISA IO ports
129  */
130 void __init isa_bridge_find_early(struct pci_controller *hose)
131 {
132 	struct device_node *np, *parent = NULL, *tmp;
133 
134 	/* If we already have an ISA bridge, bail off */
135 	if (isa_bridge_devnode != NULL)
136 		return;
137 
138 	/* For each "isa" node in the system. Note : we do a search by
139 	 * type and not by name. It might be better to do by name but that's
140 	 * what the code used to do and I don't want to break too much at
141 	 * once. We can look into changing that separately
142 	 */
143 	for_each_node_by_type(np, "isa") {
144 		/* Look for our hose being a parent */
145 		for (parent = of_get_parent(np); parent;) {
146 			if (parent == hose->dn) {
147 				of_node_put(parent);
148 				break;
149 			}
150 			tmp = parent;
151 			parent = of_get_parent(parent);
152 			of_node_put(tmp);
153 		}
154 		if (parent != NULL)
155 			break;
156 	}
157 	if (np == NULL)
158 		return;
159 	isa_bridge_devnode = np;
160 
161 	/* Now parse the "ranges" property and setup the ISA mapping */
162 	pci_process_ISA_OF_ranges(np, hose->io_base_phys);
163 
164 	/* Set the global ISA io base to indicate we have an ISA bridge */
165 	isa_io_base = ISA_IO_BASE;
166 
167 	pr_debug("ISA bridge (early) is %s\n", np->full_name);
168 }
169 
170 /**
171  * isa_bridge_find_early - Find and map the ISA IO space early before
172  *                         main PCI discovery. This is optionally called by
173  *                         the arch code when adding PCI PHBs to get early
174  *                         access to ISA IO ports
175  */
176 void __init isa_bridge_init_non_pci(struct device_node *np)
177 {
178 	const __be32 *ranges, *pbasep = NULL;
179 	int rlen, i, rs;
180 	u32 na, ns, pna;
181 	u64 cbase, pbase, size = 0;
182 
183 	/* If we already have an ISA bridge, bail off */
184 	if (isa_bridge_devnode != NULL)
185 		return;
186 
187 	pna = of_n_addr_cells(np);
188 	if (of_property_read_u32(np, "#address-cells", &na) ||
189 	    of_property_read_u32(np, "#size-cells", &ns)) {
190 		pr_warn("ISA: Non-PCI bridge %s is missing address format\n",
191 			np->full_name);
192 		return;
193 	}
194 
195 	/* Check it's a supported address format */
196 	if (na != 2 || ns != 1) {
197 		pr_warn("ISA: Non-PCI bridge %s has unsupported address format\n",
198 			np->full_name);
199 		return;
200 	}
201 	rs = na + ns + pna;
202 
203 	/* Grab the ranges property */
204 	ranges = of_get_property(np, "ranges", &rlen);
205 	if (ranges == NULL || rlen < rs) {
206 		pr_warn("ISA: Non-PCI bridge %s has absent or invalid ranges\n",
207 			np->full_name);
208 		return;
209 	}
210 
211 	/* Parse it. We are only looking for IO space */
212 	for (i = 0; (i + rs - 1) < rlen; i += rs) {
213 		if (be32_to_cpup(ranges + i) != 1)
214 			continue;
215 		cbase = be32_to_cpup(ranges + i + 1);
216 		size = of_read_number(ranges + i + na + pna, ns);
217 		pbasep = ranges + i + na;
218 		break;
219 	}
220 
221 	/* Got something ? */
222 	if (!size || !pbasep) {
223 		pr_warn("ISA: Non-PCI bridge %s has no usable IO range\n",
224 			np->full_name);
225 		return;
226 	}
227 
228 	/* Align size and make sure it's cropped to 64K */
229 	size = PAGE_ALIGN(size);
230 	if (size > 0x10000)
231 		size = 0x10000;
232 
233 	/* Map pbase */
234 	pbase = of_translate_address(np, pbasep);
235 	if (pbase == OF_BAD_ADDR) {
236 		pr_warn("ISA: Non-PCI bridge %s failed to translate IO base\n",
237 			np->full_name);
238 		return;
239 	}
240 
241 	/* We need page alignment */
242 	if ((cbase & ~PAGE_MASK) || (pbase & ~PAGE_MASK)) {
243 		pr_warn("ISA: Non-PCI bridge %s has non aligned IO range\n",
244 			np->full_name);
245 		return;
246 	}
247 
248 	/* Got it */
249 	isa_bridge_devnode = np;
250 
251 	/* Set the global ISA io base to indicate we have an ISA bridge
252 	 * and map it
253 	 */
254 	isa_io_base = ISA_IO_BASE;
255 	__ioremap_at(pbase, (void *)ISA_IO_BASE,
256 		     size, pgprot_val(pgprot_noncached(__pgprot(0))));
257 
258 	pr_debug("ISA: Non-PCI bridge is %s\n", np->full_name);
259 }
260 
261 /**
262  * isa_bridge_find_late - Find and map the ISA IO space upon discovery of
263  *                        a new ISA bridge
264  */
265 static void isa_bridge_find_late(struct pci_dev *pdev,
266 				 struct device_node *devnode)
267 {
268 	struct pci_controller *hose = pci_bus_to_host(pdev->bus);
269 
270 	/* Store ISA device node and PCI device */
271 	isa_bridge_devnode = of_node_get(devnode);
272 	isa_bridge_pcidev = pdev;
273 
274 	/* Now parse the "ranges" property and setup the ISA mapping */
275 	pci_process_ISA_OF_ranges(devnode, hose->io_base_phys);
276 
277 	/* Set the global ISA io base to indicate we have an ISA bridge */
278 	isa_io_base = ISA_IO_BASE;
279 
280 	pr_debug("ISA bridge (late) is %s on %s\n",
281 		 devnode->full_name, pci_name(pdev));
282 }
283 
284 /**
285  * isa_bridge_remove - Remove/unmap an ISA bridge
286  */
287 static void isa_bridge_remove(void)
288 {
289 	pr_debug("ISA bridge removed !\n");
290 
291 	/* Clear the global ISA io base to indicate that we have no more
292 	 * ISA bridge. Note that drivers don't quite handle that, though
293 	 * we should probably do something about it. But do we ever really
294 	 * have ISA bridges being removed on machines using legacy devices ?
295 	 */
296 	isa_io_base = ISA_IO_BASE;
297 
298 	/* Clear references to the bridge */
299 	of_node_put(isa_bridge_devnode);
300 	isa_bridge_devnode = NULL;
301 	isa_bridge_pcidev = NULL;
302 
303 	/* Unmap the ISA area */
304 	__iounmap_at((void *)ISA_IO_BASE, 0x10000);
305 }
306 
307 /**
308  * isa_bridge_notify - Get notified of PCI devices addition/removal
309  */
310 static int isa_bridge_notify(struct notifier_block *nb, unsigned long action,
311 			     void *data)
312 {
313 	struct device *dev = data;
314 	struct pci_dev *pdev = to_pci_dev(dev);
315 	struct device_node *devnode = pci_device_to_OF_node(pdev);
316 
317 	switch(action) {
318 	case BUS_NOTIFY_ADD_DEVICE:
319 		/* Check if we have an early ISA device, without PCI dev */
320 		if (isa_bridge_devnode && isa_bridge_devnode == devnode &&
321 		    !isa_bridge_pcidev) {
322 			pr_debug("ISA bridge PCI attached: %s\n",
323 				 pci_name(pdev));
324 			isa_bridge_pcidev = pdev;
325 		}
326 
327 		/* Check if we have no ISA device, and this happens to be one,
328 		 * register it as such if it has an OF device
329 		 */
330 		if (!isa_bridge_devnode && devnode && devnode->type &&
331 		    !strcmp(devnode->type, "isa"))
332 			isa_bridge_find_late(pdev, devnode);
333 
334 		return 0;
335 	case BUS_NOTIFY_DEL_DEVICE:
336 		/* Check if this our existing ISA device */
337 		if (pdev == isa_bridge_pcidev ||
338 		    (devnode && devnode == isa_bridge_devnode))
339 			isa_bridge_remove();
340 		return 0;
341 	}
342 	return 0;
343 }
344 
345 static struct notifier_block isa_bridge_notifier = {
346 	.notifier_call = isa_bridge_notify
347 };
348 
349 /**
350  * isa_bridge_init - register to be notified of ISA bridge addition/removal
351  *
352  */
353 static int __init isa_bridge_init(void)
354 {
355 	bus_register_notifier(&pci_bus_type, &isa_bridge_notifier);
356 	return 0;
357 }
358 arch_initcall(isa_bridge_init);
359