Merge remote-tracking branch 'spi/topic/core' into spi-next
[linux-2.6-microblaze.git] / arch / powerpc / kernel / isa-bridge.c
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);