Scott Wood | e5d8d54 | 2007-08-21 03:40:02 +1000 | [diff] [blame] | 1 | /* |
| 2 | * Old U-boot compatibility for PowerQUICC II |
| 3 | * (a.k.a. 82xx with CPM, not the 8240 family of chips) |
| 4 | * |
| 5 | * Author: Scott Wood <scottwood@freescale.com> |
| 6 | * |
| 7 | * Copyright (c) 2007 Freescale Semiconductor, Inc. |
| 8 | * |
| 9 | * This program is free software; you can redistribute it and/or modify it |
| 10 | * under the terms of the GNU General Public License version 2 as published |
| 11 | * by the Free Software Foundation. |
| 12 | */ |
| 13 | |
| 14 | #include "ops.h" |
| 15 | #include "stdio.h" |
| 16 | #include "cuboot.h" |
| 17 | #include "io.h" |
Scott Wood | a94b89a | 2007-08-31 17:18:28 -0500 | [diff] [blame] | 18 | #include "fsl-soc.h" |
Scott Wood | e5d8d54 | 2007-08-21 03:40:02 +1000 | [diff] [blame] | 19 | |
| 20 | #define TARGET_CPM2 |
| 21 | #define TARGET_HAS_ETH1 |
| 22 | #include "ppcboot.h" |
| 23 | |
| 24 | static bd_t bd; |
| 25 | |
| 26 | struct cs_range { |
| 27 | u32 csnum; |
| 28 | u32 base; /* must be zero */ |
| 29 | u32 addr; |
| 30 | u32 size; |
| 31 | }; |
| 32 | |
| 33 | struct pci_range { |
| 34 | u32 flags; |
| 35 | u32 pci_addr[2]; |
| 36 | u32 phys_addr; |
| 37 | u32 size[2]; |
| 38 | }; |
| 39 | |
| 40 | struct cs_range cs_ranges_buf[MAX_PROP_LEN / sizeof(struct cs_range)]; |
| 41 | struct pci_range pci_ranges_buf[MAX_PROP_LEN / sizeof(struct pci_range)]; |
| 42 | |
| 43 | /* Different versions of u-boot put the BCSR in different places, and |
| 44 | * some don't set up the PCI PIC at all, so we assume the device tree is |
| 45 | * sane and update the BRx registers appropriately. |
| 46 | * |
Scott Wood | 96fca1de | 2007-09-14 13:24:02 -0500 | [diff] [blame] | 47 | * For any node defined as compatible with fsl,pq2-localbus, |
| 48 | * #address/#size must be 2/1 for the localbus, and 1/1 for the parent bus. |
| 49 | * Ranges must be for whole chip selects. |
Scott Wood | e5d8d54 | 2007-08-21 03:40:02 +1000 | [diff] [blame] | 50 | */ |
| 51 | static void update_cs_ranges(void) |
| 52 | { |
Scott Wood | 96fca1de | 2007-09-14 13:24:02 -0500 | [diff] [blame] | 53 | void *bus_node, *parent_node; |
Scott Wood | e5d8d54 | 2007-08-21 03:40:02 +1000 | [diff] [blame] | 54 | u32 *ctrl_addr; |
| 55 | unsigned long ctrl_size; |
| 56 | u32 naddr, nsize; |
| 57 | int len; |
| 58 | int i; |
| 59 | |
Scott Wood | 96fca1de | 2007-09-14 13:24:02 -0500 | [diff] [blame] | 60 | bus_node = finddevice("/localbus"); |
| 61 | if (!bus_node || !dt_is_compatible(bus_node, "fsl,pq2-localbus")) |
Scott Wood | e5d8d54 | 2007-08-21 03:40:02 +1000 | [diff] [blame] | 62 | return; |
| 63 | |
| 64 | dt_get_reg_format(bus_node, &naddr, &nsize); |
| 65 | if (naddr != 2 || nsize != 1) |
| 66 | goto err; |
| 67 | |
| 68 | parent_node = get_parent(bus_node); |
| 69 | if (!parent_node) |
| 70 | goto err; |
| 71 | |
| 72 | dt_get_reg_format(parent_node, &naddr, &nsize); |
| 73 | if (naddr != 1 || nsize != 1) |
| 74 | goto err; |
| 75 | |
Scott Wood | 96fca1de | 2007-09-14 13:24:02 -0500 | [diff] [blame] | 76 | if (!dt_xlate_reg(bus_node, 0, (unsigned long *)&ctrl_addr, |
Scott Wood | e5d8d54 | 2007-08-21 03:40:02 +1000 | [diff] [blame] | 77 | &ctrl_size)) |
| 78 | goto err; |
| 79 | |
| 80 | len = getprop(bus_node, "ranges", cs_ranges_buf, sizeof(cs_ranges_buf)); |
| 81 | |
| 82 | for (i = 0; i < len / sizeof(struct cs_range); i++) { |
| 83 | u32 base, option; |
| 84 | int cs = cs_ranges_buf[i].csnum; |
| 85 | if (cs >= ctrl_size / 8) |
| 86 | goto err; |
| 87 | |
| 88 | if (cs_ranges_buf[i].base != 0) |
| 89 | goto err; |
| 90 | |
| 91 | base = in_be32(&ctrl_addr[cs * 2]); |
| 92 | |
| 93 | /* If CS is already valid, use the existing flags. |
| 94 | * Otherwise, guess a sane default. |
| 95 | */ |
| 96 | if (base & 1) { |
| 97 | base &= 0x7fff; |
| 98 | option = in_be32(&ctrl_addr[cs * 2 + 1]) & 0x7fff; |
| 99 | } else { |
| 100 | base = 0x1801; |
| 101 | option = 0x10; |
| 102 | } |
| 103 | |
| 104 | out_be32(&ctrl_addr[cs * 2], 0); |
| 105 | out_be32(&ctrl_addr[cs * 2 + 1], |
| 106 | option | ~(cs_ranges_buf[i].size - 1)); |
| 107 | out_be32(&ctrl_addr[cs * 2], base | cs_ranges_buf[i].addr); |
| 108 | } |
| 109 | |
| 110 | return; |
| 111 | |
| 112 | err: |
Scott Wood | 96fca1de | 2007-09-14 13:24:02 -0500 | [diff] [blame] | 113 | printf("Bad /localbus node\r\n"); |
Scott Wood | e5d8d54 | 2007-08-21 03:40:02 +1000 | [diff] [blame] | 114 | } |
| 115 | |
| 116 | /* Older u-boots don't set PCI up properly. Update the hardware to match |
| 117 | * the device tree. The prefetch mem region and non-prefetch mem region |
| 118 | * must be contiguous in the host bus. As required by the PCI binding, |
| 119 | * PCI #addr/#size must be 3/2. The parent bus must be 1/1. Only |
| 120 | * 32-bit PCI is supported. All three region types (prefetchable mem, |
| 121 | * non-prefetchable mem, and I/O) must be present. |
| 122 | */ |
| 123 | static void fixup_pci(void) |
| 124 | { |
| 125 | struct pci_range *mem = NULL, *mmio = NULL, |
| 126 | *io = NULL, *mem_base = NULL; |
| 127 | u32 *pci_regs[3]; |
| 128 | u8 *soc_regs; |
| 129 | int i, len; |
Scott Wood | a94b89a | 2007-08-31 17:18:28 -0500 | [diff] [blame] | 130 | void *node, *parent_node; |
Scott Wood | 5680915 | 2007-08-30 12:06:21 -0500 | [diff] [blame] | 131 | u32 naddr, nsize, mem_log2; |
Scott Wood | e5d8d54 | 2007-08-21 03:40:02 +1000 | [diff] [blame] | 132 | |
Scott Wood | 5680915 | 2007-08-30 12:06:21 -0500 | [diff] [blame] | 133 | node = finddevice("/pci"); |
| 134 | if (!node || !dt_is_compatible(node, "fsl,pq2-pci")) |
Scott Wood | e5d8d54 | 2007-08-21 03:40:02 +1000 | [diff] [blame] | 135 | return; |
| 136 | |
Scott Wood | e5d8d54 | 2007-08-21 03:40:02 +1000 | [diff] [blame] | 137 | for (i = 0; i < 3; i++) |
Scott Wood | 5680915 | 2007-08-30 12:06:21 -0500 | [diff] [blame] | 138 | if (!dt_xlate_reg(node, i, |
Scott Wood | e5d8d54 | 2007-08-21 03:40:02 +1000 | [diff] [blame] | 139 | (unsigned long *)&pci_regs[i], NULL)) |
| 140 | goto err; |
| 141 | |
Scott Wood | a94b89a | 2007-08-31 17:18:28 -0500 | [diff] [blame] | 142 | soc_regs = (u8 *)fsl_get_immr(); |
| 143 | if (!soc_regs) |
Scott Wood | e5d8d54 | 2007-08-21 03:40:02 +1000 | [diff] [blame] | 144 | goto err; |
| 145 | |
Scott Wood | 5680915 | 2007-08-30 12:06:21 -0500 | [diff] [blame] | 146 | dt_get_reg_format(node, &naddr, &nsize); |
Scott Wood | e5d8d54 | 2007-08-21 03:40:02 +1000 | [diff] [blame] | 147 | if (naddr != 3 || nsize != 2) |
| 148 | goto err; |
| 149 | |
Scott Wood | 5680915 | 2007-08-30 12:06:21 -0500 | [diff] [blame] | 150 | parent_node = get_parent(node); |
Scott Wood | e5d8d54 | 2007-08-21 03:40:02 +1000 | [diff] [blame] | 151 | if (!parent_node) |
| 152 | goto err; |
| 153 | |
| 154 | dt_get_reg_format(parent_node, &naddr, &nsize); |
| 155 | if (naddr != 1 || nsize != 1) |
| 156 | goto err; |
| 157 | |
Scott Wood | 5680915 | 2007-08-30 12:06:21 -0500 | [diff] [blame] | 158 | len = getprop(node, "ranges", pci_ranges_buf, |
Scott Wood | e5d8d54 | 2007-08-21 03:40:02 +1000 | [diff] [blame] | 159 | sizeof(pci_ranges_buf)); |
| 160 | |
| 161 | for (i = 0; i < len / sizeof(struct pci_range); i++) { |
| 162 | u32 flags = pci_ranges_buf[i].flags & 0x43000000; |
| 163 | |
| 164 | if (flags == 0x42000000) |
| 165 | mem = &pci_ranges_buf[i]; |
| 166 | else if (flags == 0x02000000) |
| 167 | mmio = &pci_ranges_buf[i]; |
| 168 | else if (flags == 0x01000000) |
| 169 | io = &pci_ranges_buf[i]; |
| 170 | } |
| 171 | |
| 172 | if (!mem || !mmio || !io) |
| 173 | goto err; |
| 174 | |
| 175 | if (mem->phys_addr + mem->size[1] == mmio->phys_addr) |
| 176 | mem_base = mem; |
| 177 | else if (mmio->phys_addr + mmio->size[1] == mem->phys_addr) |
| 178 | mem_base = mmio; |
| 179 | else |
| 180 | goto err; |
| 181 | |
| 182 | out_be32(&pci_regs[1][0], mem_base->phys_addr | 1); |
| 183 | out_be32(&pci_regs[2][0], ~(mem->size[1] + mmio->size[1] - 1)); |
| 184 | |
| 185 | out_be32(&pci_regs[1][1], io->phys_addr | 1); |
| 186 | out_be32(&pci_regs[2][1], ~(io->size[1] - 1)); |
| 187 | |
| 188 | out_le32(&pci_regs[0][0], mem->pci_addr[1] >> 12); |
| 189 | out_le32(&pci_regs[0][2], mem->phys_addr >> 12); |
| 190 | out_le32(&pci_regs[0][4], (~(mem->size[1] - 1) >> 12) | 0xa0000000); |
| 191 | |
| 192 | out_le32(&pci_regs[0][6], mmio->pci_addr[1] >> 12); |
| 193 | out_le32(&pci_regs[0][8], mmio->phys_addr >> 12); |
| 194 | out_le32(&pci_regs[0][10], (~(mmio->size[1] - 1) >> 12) | 0x80000000); |
| 195 | |
| 196 | out_le32(&pci_regs[0][12], io->pci_addr[1] >> 12); |
| 197 | out_le32(&pci_regs[0][14], io->phys_addr >> 12); |
| 198 | out_le32(&pci_regs[0][16], (~(io->size[1] - 1) >> 12) | 0xc0000000); |
| 199 | |
| 200 | /* Inbound translation */ |
| 201 | out_le32(&pci_regs[0][58], 0); |
| 202 | out_le32(&pci_regs[0][60], 0); |
| 203 | |
| 204 | mem_log2 = 1 << (__ilog2_u32(bd.bi_memsize - 1) + 1); |
| 205 | out_le32(&pci_regs[0][62], 0xa0000000 | ~((1 << (mem_log2 - 12)) - 1)); |
| 206 | |
| 207 | /* If PCI is disabled, drive RST high to enable. */ |
| 208 | if (!(in_le32(&pci_regs[0][32]) & 1)) { |
| 209 | /* Tpvrh (Power valid to RST# high) 100 ms */ |
| 210 | udelay(100000); |
| 211 | |
| 212 | out_le32(&pci_regs[0][32], 1); |
| 213 | |
| 214 | /* Trhfa (RST# high to first cfg access) 2^25 clocks */ |
| 215 | udelay(1020000); |
| 216 | } |
| 217 | |
| 218 | /* Enable bus master and memory access */ |
| 219 | out_le32(&pci_regs[0][64], 0x80000004); |
| 220 | out_le32(&pci_regs[0][65], in_le32(&pci_regs[0][65]) | 6); |
| 221 | |
| 222 | /* Park the bus on PCI, and elevate PCI's arbitration priority, |
| 223 | * as required by section 9.6 of the user's manual. |
| 224 | */ |
| 225 | out_8(&soc_regs[0x10028], 3); |
| 226 | out_be32((u32 *)&soc_regs[0x1002c], 0x01236745); |
| 227 | |
| 228 | return; |
| 229 | |
| 230 | err: |
| 231 | printf("Bad PCI node\r\n"); |
| 232 | } |
| 233 | |
| 234 | static void pq2_platform_fixups(void) |
| 235 | { |
| 236 | void *node; |
| 237 | |
| 238 | dt_fixup_memory(bd.bi_memstart, bd.bi_memsize); |
| 239 | dt_fixup_mac_addresses(bd.bi_enetaddr, bd.bi_enet1addr); |
| 240 | dt_fixup_cpu_clocks(bd.bi_intfreq, bd.bi_busfreq / 4, bd.bi_busfreq); |
| 241 | |
| 242 | node = finddevice("/soc/cpm"); |
Scott Wood | 6d817aa | 2007-08-29 15:08:40 -0500 | [diff] [blame] | 243 | if (node) |
Scott Wood | e5d8d54 | 2007-08-21 03:40:02 +1000 | [diff] [blame] | 244 | setprop(node, "clock-frequency", &bd.bi_cpmfreq, 4); |
Scott Wood | 6d817aa | 2007-08-29 15:08:40 -0500 | [diff] [blame] | 245 | |
| 246 | node = finddevice("/soc/cpm/brg"); |
| 247 | if (node) |
| 248 | setprop(node, "clock-frequency", &bd.bi_brgfreq, 4); |
Scott Wood | e5d8d54 | 2007-08-21 03:40:02 +1000 | [diff] [blame] | 249 | |
| 250 | update_cs_ranges(); |
| 251 | fixup_pci(); |
| 252 | } |
| 253 | |
| 254 | void platform_init(unsigned long r3, unsigned long r4, unsigned long r5, |
| 255 | unsigned long r6, unsigned long r7) |
| 256 | { |
| 257 | CUBOOT_INIT(); |
David Gibson | 2f0dfea | 2007-12-10 14:28:39 +1100 | [diff] [blame] | 258 | fdt_init(_dtb_start); |
Scott Wood | e5d8d54 | 2007-08-21 03:40:02 +1000 | [diff] [blame] | 259 | serial_console_init(); |
| 260 | platform_ops.fixups = pq2_platform_fixups; |
| 261 | } |