machdep.c revision 1.10 1 1.10 matt /* $NetBSD: machdep.c,v 1.10 2011/06/14 05:32:59 matt Exp $ */
2 1.2 matt /*-
3 1.2 matt * Copyright (c) 2010, 2011 The NetBSD Foundation, Inc.
4 1.2 matt * All rights reserved.
5 1.2 matt *
6 1.2 matt * This code is derived from software contributed to The NetBSD Foundation
7 1.2 matt * by Raytheon BBN Technologies Corp and Defense Advanced Research Projects
8 1.2 matt * Agency and which was developed by Matt Thomas of 3am Software Foundry.
9 1.2 matt *
10 1.2 matt * This material is based upon work supported by the Defense Advanced Research
11 1.2 matt * Projects Agency and Space and Naval Warfare Systems Center, Pacific, under
12 1.2 matt * Contract No. N66001-09-C-2073.
13 1.2 matt * Approved for Public Release, Distribution Unlimited
14 1.2 matt *
15 1.2 matt * Redistribution and use in source and binary forms, with or without
16 1.2 matt * modification, are permitted provided that the following conditions
17 1.2 matt * are met:
18 1.2 matt * 1. Redistributions of source code must retain the above copyright
19 1.2 matt * notice, this list of conditions and the following disclaimer.
20 1.2 matt * 2. Redistributions in binary form must reproduce the above copyright
21 1.2 matt * notice, this list of conditions and the following disclaimer in the
22 1.2 matt * documentation and/or other materials provided with the distribution.
23 1.2 matt *
24 1.2 matt * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
25 1.2 matt * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
26 1.2 matt * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
27 1.2 matt * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
28 1.2 matt * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
29 1.2 matt * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
30 1.2 matt * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
31 1.2 matt * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
32 1.2 matt * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
33 1.2 matt * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
34 1.2 matt * POSSIBILITY OF SUCH DAMAGE.
35 1.2 matt */
36 1.2 matt
37 1.2 matt #include <sys/cdefs.h>
38 1.2 matt
39 1.2 matt __KERNEL_RCSID(0, "$NetSBD$");
40 1.2 matt
41 1.2 matt #include "opt_mpc85xx.h"
42 1.2 matt #include "opt_altivec.h"
43 1.2 matt #include "opt_pci.h"
44 1.2 matt #include "opt_ddb.h"
45 1.2 matt #include "gpio.h"
46 1.2 matt #include "pci.h"
47 1.2 matt
48 1.2 matt #define DDRC_PRIVATE
49 1.2 matt #define GLOBAL_PRIVATE
50 1.2 matt #define L2CACHE_PRIVATE
51 1.2 matt #define _POWERPC_BUS_DMA_PRIVATE
52 1.2 matt
53 1.2 matt #include <sys/param.h>
54 1.2 matt #include <sys/cpu.h>
55 1.2 matt #include <sys/intr.h>
56 1.2 matt #include <sys/msgbuf.h>
57 1.2 matt #include <sys/tty.h>
58 1.2 matt #include <sys/kcore.h>
59 1.2 matt #include <sys/bitops.h>
60 1.2 matt #include <sys/bus.h>
61 1.2 matt #include <sys/extent.h>
62 1.2 matt #include <sys/malloc.h>
63 1.8 mrg #include <sys/module.h>
64 1.2 matt
65 1.2 matt #include <uvm/uvm_extern.h>
66 1.2 matt
67 1.2 matt #include <prop/proplib.h>
68 1.2 matt
69 1.2 matt #include <machine/stdarg.h>
70 1.2 matt
71 1.2 matt #include <dev/cons.h>
72 1.2 matt
73 1.2 matt #include <dev/ic/comreg.h>
74 1.2 matt #include <dev/ic/comvar.h>
75 1.2 matt
76 1.2 matt #include <net/if.h>
77 1.2 matt #include <net/if_media.h>
78 1.2 matt #include <dev/mii/miivar.h>
79 1.2 matt
80 1.2 matt #include <powerpc/pcb.h>
81 1.2 matt #include <powerpc/spr.h>
82 1.2 matt #include <powerpc/booke/spr.h>
83 1.2 matt
84 1.2 matt #include <powerpc/booke/cpuvar.h>
85 1.2 matt #include <powerpc/booke/e500reg.h>
86 1.2 matt #include <powerpc/booke/e500var.h>
87 1.2 matt #include <powerpc/booke/etsecreg.h>
88 1.2 matt #include <powerpc/booke/openpicreg.h>
89 1.2 matt #ifdef CADMUS
90 1.2 matt #include <evbppc/mpc85xx/cadmusreg.h>
91 1.2 matt #endif
92 1.2 matt #ifdef PIXIS
93 1.2 matt #include <evbppc/mpc85xx/pixisreg.h>
94 1.2 matt #endif
95 1.2 matt
96 1.10 matt struct uboot_bdinfo {
97 1.10 matt uint32_t bd_memstart;
98 1.10 matt uint32_t bd_memsize;
99 1.10 matt uint32_t bd_flashstart;
100 1.10 matt uint32_t bd_flashsize;
101 1.10 matt /*10*/ uint32_t bd_flashoffset;
102 1.10 matt uint32_t bd_sramstart;
103 1.10 matt uint32_t bd_sramsize;
104 1.10 matt uint32_t bd_immrbase;
105 1.10 matt /*20*/ uint32_t bd_bootflags;
106 1.10 matt uint32_t bd_ipaddr;
107 1.10 matt uint8_t bd_etheraddr[6];
108 1.10 matt uint16_t bd_ethspeed;
109 1.10 matt /*30*/ uint32_t bd_intfreq;
110 1.10 matt uint32_t bd_cpufreq;
111 1.10 matt uint32_t bd_baudrate;
112 1.10 matt /*3c*/ uint8_t bd_etheraddr1[6];
113 1.10 matt /*42*/ uint8_t bd_etheraddr2[6];
114 1.10 matt /*48*/ uint8_t bd_etheraddr3[6];
115 1.10 matt /*4e*/ uint16_t bd_pad;
116 1.10 matt };
117 1.10 matt
118 1.9 mrg /*
119 1.9 mrg * booke kernels need to set module_machine to this for modules to work.
120 1.9 mrg */
121 1.9 mrg char module_machine_booke[] = "powerpc-booke";
122 1.9 mrg
123 1.10 matt void initppc(vaddr_t, vaddr_t, void *, void *, void *, void *);
124 1.2 matt
125 1.2 matt #define MEMREGIONS 4
126 1.2 matt phys_ram_seg_t physmemr[MEMREGIONS]; /* All memory */
127 1.2 matt phys_ram_seg_t availmemr[MEMREGIONS]; /* Available memory */
128 1.2 matt static u_int nmemr;
129 1.2 matt
130 1.2 matt #ifndef CONSFREQ
131 1.2 matt # define CONSFREQ -1 /* inherit from firmware */
132 1.2 matt #endif
133 1.2 matt #ifndef CONSPEED
134 1.2 matt # define CONSPEED 115200
135 1.2 matt #endif
136 1.2 matt #ifndef CONMODE
137 1.2 matt # define CONMODE ((TTYDEF_CFLAG & ~(CSIZE | PARENB)) | CS8)
138 1.2 matt #endif
139 1.2 matt #ifndef CONSADDR
140 1.2 matt # define CONSADDR DUART2_BASE
141 1.2 matt #endif
142 1.2 matt
143 1.2 matt int comcnfreq = CONSFREQ;
144 1.2 matt int comcnspeed = CONSPEED;
145 1.2 matt tcflag_t comcnmode = CONMODE;
146 1.2 matt bus_addr_t comcnaddr = (bus_addr_t)CONSADDR;
147 1.2 matt
148 1.2 matt #if NPCI > 0
149 1.2 matt struct extent *pcimem_ex;
150 1.2 matt struct extent *pciio_ex;
151 1.2 matt #endif
152 1.2 matt
153 1.2 matt struct powerpc_bus_space gur_bst = {
154 1.2 matt .pbs_flags = _BUS_SPACE_BIG_ENDIAN|_BUS_SPACE_MEM_TYPE,
155 1.2 matt .pbs_offset = GUR_BASE,
156 1.2 matt .pbs_limit = GUR_SIZE,
157 1.2 matt };
158 1.2 matt
159 1.5 matt struct powerpc_bus_space gur_le_bst = {
160 1.5 matt .pbs_flags = _BUS_SPACE_LITTLE_ENDIAN|_BUS_SPACE_MEM_TYPE,
161 1.5 matt .pbs_offset = GUR_BASE,
162 1.5 matt .pbs_limit = GUR_SIZE,
163 1.5 matt };
164 1.5 matt
165 1.2 matt const bus_space_handle_t gur_bsh = (bus_space_handle_t)(uintptr_t)(GUR_BASE);
166 1.2 matt
167 1.6 matt #if defined(SYS_CLK)
168 1.6 matt static uint64_t e500_sys_clk = SYS_CLK;
169 1.6 matt #endif
170 1.2 matt #ifdef CADMUS
171 1.2 matt static uint8_t cadmus_pci;
172 1.2 matt static uint8_t cadmus_csr;
173 1.6 matt #ifndef SYS_CLK
174 1.2 matt static uint64_t e500_sys_clk = 33333333; /* 33.333333Mhz */
175 1.6 matt #endif
176 1.2 matt #elif defined(PIXIS)
177 1.2 matt static const uint32_t pixis_spd_map[8] = {
178 1.2 matt [PX_SPD_33MHZ] = 33333333,
179 1.2 matt [PX_SPD_40MHZ] = 40000000,
180 1.2 matt [PX_SPD_50MHZ] = 50000000,
181 1.2 matt [PX_SPD_66MHZ] = 66666666,
182 1.2 matt [PX_SPD_83MHZ] = 83333333,
183 1.6 matt [PX_SPD_100MHZ] = 100000000,
184 1.2 matt [PX_SPD_133MHZ] = 133333333,
185 1.2 matt [PX_SPD_166MHZ] = 166666667,
186 1.2 matt };
187 1.2 matt static uint8_t pixis_spd;
188 1.6 matt #ifndef SYS_CLK
189 1.2 matt static uint64_t e500_sys_clk;
190 1.6 matt #endif
191 1.6 matt #elif !defined(SYS_CLK)
192 1.2 matt static uint64_t e500_sys_clk = 66666667; /* 66.666667Mhz */
193 1.2 matt #endif
194 1.2 matt
195 1.2 matt static int e500_cngetc(dev_t);
196 1.2 matt static void e500_cnputc(dev_t, int);
197 1.2 matt
198 1.2 matt static struct consdev e500_earlycons = {
199 1.2 matt .cn_getc = e500_cngetc,
200 1.2 matt .cn_putc = e500_cnputc,
201 1.2 matt .cn_pollc = nullcnpollc,
202 1.2 matt };
203 1.2 matt
204 1.2 matt /*
205 1.2 matt * List of port-specific devices to attach to the processor local bus.
206 1.2 matt */
207 1.2 matt static const struct cpunode_locators mpc8548_cpunode_locs[] = {
208 1.6 matt { "cpu", 0, 0, 0, 0, { 0 }, 0, /* not a real device */
209 1.6 matt { 0xffff, SVR_MPC8572v1 >> 16, SVR_P2020v2 >> 16 } },
210 1.6 matt #if defined(MPC8572) || defined(P2020)
211 1.6 matt { "cpu", 0, 0, 1, 0, { 0 }, 0, /* not a real device */
212 1.6 matt { SVR_MPC8572v1 >> 16, SVR_P2020v2 >> 16 } },
213 1.6 matt { "cpu", 0, 0, 2, 0, { 0 }, 0, /* not a real device */
214 1.6 matt { SVR_MPC8572v1 >> 16, SVR_P2020v2 >> 16 } },
215 1.6 matt #endif
216 1.2 matt { "wdog" }, /* not a real device */
217 1.3 matt { "duart", DUART1_BASE, 2*DUART_SIZE, 0,
218 1.3 matt 1, { ISOURCE_DUART },
219 1.2 matt 1 + ilog2(DEVDISR_DUART) },
220 1.3 matt { "tsec", ETSEC1_BASE, ETSEC_SIZE, 1,
221 1.3 matt 3, { ISOURCE_ETSEC1_TX, ISOURCE_ETSEC1_RX, ISOURCE_ETSEC1_ERR },
222 1.2 matt 1 + ilog2(DEVDISR_TSEC1) },
223 1.3 matt #if defined(MPC8548) || defined(MPC8555) || defined(MPC8572) || defined(P2020)
224 1.3 matt { "tsec", ETSEC2_BASE, ETSEC_SIZE, 2,
225 1.3 matt 3, { ISOURCE_ETSEC2_TX, ISOURCE_ETSEC2_RX, ISOURCE_ETSEC2_ERR },
226 1.3 matt 1 + ilog2(DEVDISR_TSEC2),
227 1.3 matt { SVR_MPC8548v1 >> 16, SVR_MPC8555v1 >> 16,
228 1.3 matt SVR_MPC8572v1 >> 16, SVR_P2020v2 >> 16 } },
229 1.2 matt #endif
230 1.2 matt #if defined(MPC8544) || defined(MPC8536)
231 1.3 matt { "tsec", ETSEC3_BASE, ETSEC_SIZE, 2,
232 1.3 matt 3, { ISOURCE_ETSEC3_TX, ISOURCE_ETSEC3_RX, ISOURCE_ETSEC3_ERR },
233 1.3 matt 1 + ilog2(DEVDISR_TSEC3),
234 1.3 matt { SVR_MPC8536v1 >> 16, SVR_MPC8544v1 >> 16 } },
235 1.3 matt #endif
236 1.3 matt #if defined(MPC8548) || defined(MPC8572) || defined(P2020)
237 1.3 matt { "tsec", ETSEC3_BASE, ETSEC_SIZE, 3,
238 1.3 matt 3, { ISOURCE_ETSEC3_TX, ISOURCE_ETSEC3_RX, ISOURCE_ETSEC3_ERR },
239 1.3 matt 1 + ilog2(DEVDISR_TSEC3),
240 1.3 matt { SVR_MPC8548v1 >> 16, SVR_MPC8572v1 >> 16,
241 1.3 matt SVR_P2020v2 >> 16 } },
242 1.3 matt #endif
243 1.3 matt #if defined(MPC8548) || defined(MPC8572)
244 1.3 matt { "tsec", ETSEC4_BASE, ETSEC_SIZE, 4,
245 1.3 matt 3, { ISOURCE_ETSEC4_TX, ISOURCE_ETSEC4_RX, ISOURCE_ETSEC4_ERR },
246 1.3 matt 1 + ilog2(DEVDISR_TSEC4),
247 1.3 matt { SVR_MPC8548v1 >> 16, SVR_MPC8572v1 >> 16 } },
248 1.3 matt #endif
249 1.3 matt { "diic", I2C1_BASE, 2*I2C_SIZE, 0,
250 1.3 matt 1, { ISOURCE_I2C },
251 1.3 matt 1 + ilog2(DEVDISR_I2C) },
252 1.2 matt /* MPC8572 doesn't have any GPIO */
253 1.3 matt { "gpio", GLOBAL_BASE, GLOBAL_SIZE, 0,
254 1.3 matt 1, { ISOURCE_GPIO },
255 1.3 matt 0,
256 1.3 matt { 0xffff, SVR_MPC8572v1 >> 16 } },
257 1.3 matt { "ddrc", DDRC1_BASE, DDRC_SIZE, 0,
258 1.3 matt 1, { ISOURCE_DDR },
259 1.3 matt 1 + ilog2(DEVDISR_DDR_15),
260 1.3 matt { 0xffff, SVR_MPC8572v1 >> 16, SVR_MPC8536v1 >> 16 } },
261 1.3 matt #if defined(MPC8536)
262 1.3 matt { "ddrc", DDRC1_BASE, DDRC_SIZE, 0,
263 1.3 matt 1, { ISOURCE_DDR },
264 1.3 matt 1 + ilog2(DEVDISR_DDR_16),
265 1.3 matt { SVR_MPC8536v1 >> 16 } },
266 1.3 matt #endif
267 1.3 matt #if defined(MPC8572)
268 1.3 matt { "ddrc", DDRC1_BASE, DDRC_SIZE, 1,
269 1.3 matt 1, { ISOURCE_DDR },
270 1.3 matt 1 + ilog2(DEVDISR_DDR_15),
271 1.3 matt { SVR_MPC8572v1 >> 16 } },
272 1.3 matt { "ddrc", DDRC1_BASE, DDRC_SIZE, 2,
273 1.3 matt 1, { ISOURCE_DDR },
274 1.3 matt 1 + ilog2(DEVDISR_DDR2_14),
275 1.3 matt { SVR_MPC8572v1 >> 16 } },
276 1.2 matt #endif
277 1.6 matt { "lbc", LBC_BASE, LBC_SIZE, 0,
278 1.6 matt 1, { ISOURCE_LBC },
279 1.6 matt 1 + ilog2(DEVDISR_LBC) },
280 1.2 matt #if defined(MPC8544) || defined(MPC8536)
281 1.3 matt { "pcie", PCIE1_BASE, PCI_SIZE, 1,
282 1.3 matt 1, { ISOURCE_PCIEX },
283 1.3 matt 1 + ilog2(DEVDISR_PCIE),
284 1.3 matt { SVR_MPC8536v1 >> 16, SVR_MPC8544v1 >> 16 } },
285 1.3 matt { "pcie", PCIE2_MPC8544_BASE, PCI_SIZE, 2,
286 1.3 matt 1, { ISOURCE_PCIEX2 },
287 1.3 matt 1 + ilog2(DEVDISR_PCIE2),
288 1.3 matt { SVR_MPC8536v1 >> 16, SVR_MPC8544v1 >> 16 } },
289 1.3 matt { "pcie", PCIE3_MPC8544_BASE, PCI_SIZE, 3,
290 1.3 matt 1, { ISOURCE_PCIEX3 },
291 1.3 matt 1 + ilog2(DEVDISR_PCIE3),
292 1.3 matt { SVR_MPC8536v1 >> 16, SVR_MPC8544v1 >> 16 } },
293 1.3 matt { "pci", PCIX1_MPC8544_BASE, PCI_SIZE, 0,
294 1.3 matt 1, { ISOURCE_PCI1 },
295 1.3 matt 1 + ilog2(DEVDISR_PCI1),
296 1.3 matt { SVR_MPC8536v1 >> 16, SVR_MPC8544v1 >> 16 } },
297 1.2 matt #endif
298 1.2 matt #ifdef MPC8548
299 1.3 matt { "pcie", PCIE1_BASE, PCI_SIZE, 0,
300 1.3 matt 1, { ISOURCE_PCIEX },
301 1.3 matt 1 + ilog2(DEVDISR_PCIE),
302 1.4 matt { SVR_MPC8548v1 >> 16 }, },
303 1.3 matt { "pci", PCIX1_MPC8548_BASE, PCI_SIZE, 1,
304 1.3 matt 1, { ISOURCE_PCI1 },
305 1.3 matt 1 + ilog2(DEVDISR_PCI1),
306 1.4 matt { SVR_MPC8548v1 >> 16 }, },
307 1.3 matt { "pci", PCIX2_MPC8548_BASE, PCI_SIZE, 2,
308 1.3 matt 1, { ISOURCE_PCI2 },
309 1.3 matt 1 + ilog2(DEVDISR_PCI2),
310 1.4 matt { SVR_MPC8548v1 >> 16 }, },
311 1.3 matt #endif
312 1.3 matt #if defined(MPC8572) || defined(P2020)
313 1.3 matt { "pcie", PCIE1_BASE, PCI_SIZE, 1,
314 1.3 matt 1, { ISOURCE_PCIEX },
315 1.3 matt 1 + ilog2(DEVDISR_PCIE),
316 1.3 matt { SVR_MPC8572v1 >> 16, SVR_P2020v2 >> 16 } },
317 1.3 matt { "pcie", PCIE2_MPC8572_BASE, PCI_SIZE, 2,
318 1.3 matt 1, { ISOURCE_PCIEX2 },
319 1.3 matt 1 + ilog2(DEVDISR_PCIE2),
320 1.3 matt { SVR_MPC8572v1 >> 16, SVR_P2020v2 >> 16 } },
321 1.3 matt { "pcie", PCIE3_MPC8572_BASE, PCI_SIZE, 3,
322 1.3 matt 1, { ISOURCE_PCIEX3_MPC8572 },
323 1.3 matt 1 + ilog2(DEVDISR_PCIE3),
324 1.3 matt { SVR_MPC8572v1 >> 16, SVR_P2020v2 >> 16 } },
325 1.3 matt #endif
326 1.3 matt #if defined(MPC8536) || defined(P2020)
327 1.3 matt { "ehci", USB1_BASE, USB_SIZE, 1,
328 1.3 matt 1, { ISOURCE_USB1 },
329 1.3 matt 1 + ilog2(DEVDISR_USB1),
330 1.3 matt { SVR_MPC8536v1 >> 16, SVR_P2020v2 >> 16 } },
331 1.2 matt #endif
332 1.2 matt #ifdef MPC8536
333 1.3 matt { "ehci", USB2_BASE, USB_SIZE, 2,
334 1.3 matt 1, { ISOURCE_USB2 },
335 1.3 matt 1 + ilog2(DEVDISR_USB2),
336 1.3 matt { SVR_MPC8536v1 >> 16 }, },
337 1.3 matt { "ehci", USB3_BASE, USB_SIZE, 3,
338 1.3 matt 1, { ISOURCE_USB3 },
339 1.3 matt 1 + ilog2(DEVDISR_USB3),
340 1.3 matt { SVR_MPC8536v1 >> 16 }, },
341 1.3 matt { "sata", SATA1_BASE, SATA_SIZE, 1,
342 1.3 matt 1, { ISOURCE_SATA1 },
343 1.3 matt 1 + ilog2(DEVDISR_SATA1),
344 1.3 matt { SVR_MPC8536v1 >> 16 }, },
345 1.3 matt { "sata", SATA2_BASE, SATA_SIZE, 2,
346 1.3 matt 1, { ISOURCE_SATA2 },
347 1.3 matt 1 + ilog2(DEVDISR_SATA2),
348 1.3 matt { SVR_MPC8536v1 >> 16 }, },
349 1.3 matt { "spi", SPI_BASE, SPI_SIZE, 0,
350 1.3 matt 1, { ISOURCE_SPI },
351 1.3 matt 1 + ilog2(DEVDISR_SPI_15),
352 1.3 matt { SVR_MPC8536v1 >> 16 }, },
353 1.3 matt { "sdhc", ESDHC_BASE, ESDHC_SIZE, 0,
354 1.3 matt 1, { ISOURCE_ESDHC },
355 1.3 matt 1 + ilog2(DEVDISR_ESDHC_12),
356 1.3 matt { SVR_MPC8536v1 >> 16 }, },
357 1.3 matt #endif
358 1.3 matt #if defined(P2020)
359 1.3 matt { "spi", SPI_BASE, SPI_SIZE, 0,
360 1.3 matt 1, { ISOURCE_SPI },
361 1.3 matt 1 + ilog2(DEVDISR_SPI_28),
362 1.3 matt { SVR_P2020v2 >> 16 }, },
363 1.3 matt { "sdhc", ESDHC_BASE, ESDHC_SIZE, 0,
364 1.3 matt 1, { ISOURCE_ESDHC },
365 1.3 matt 1 + ilog2(DEVDISR_ESDHC_10),
366 1.3 matt { SVR_P2020v2 >> 16 }, },
367 1.2 matt #endif
368 1.2 matt //{ "sec", RNG_BASE, RNG_SIZE, 0, 0, },
369 1.2 matt { NULL }
370 1.2 matt };
371 1.2 matt
372 1.2 matt static int
373 1.2 matt e500_cngetc(dev_t dv)
374 1.2 matt {
375 1.2 matt volatile uint8_t * const com0addr = (void *)(GUR_BASE+CONSADDR);
376 1.2 matt
377 1.2 matt if ((com0addr[com_lsr] & LSR_RXRDY) == 0)
378 1.2 matt return -1;
379 1.2 matt
380 1.2 matt return com0addr[com_data] & 0xff;
381 1.2 matt }
382 1.2 matt
383 1.2 matt static void
384 1.2 matt e500_cnputc(dev_t dv, int c)
385 1.2 matt {
386 1.2 matt volatile uint8_t * const com0addr = (void *)(GUR_BASE+CONSADDR);
387 1.2 matt int timo = 150000;
388 1.2 matt
389 1.2 matt while ((com0addr[com_lsr] & LSR_TXRDY) == 0 && --timo > 0)
390 1.2 matt ;
391 1.2 matt
392 1.2 matt com0addr[com_data] = c;
393 1.2 matt __asm("mbar");
394 1.2 matt
395 1.2 matt while ((com0addr[com_lsr] & LSR_TSRE) == 0 && --timo > 0)
396 1.2 matt ;
397 1.2 matt }
398 1.2 matt
399 1.2 matt static void *
400 1.2 matt gur_tlb_mapiodev(paddr_t pa, psize_t len)
401 1.2 matt {
402 1.2 matt if (pa < gur_bst.pbs_offset)
403 1.2 matt return NULL;
404 1.2 matt if (pa + len > gur_bst.pbs_offset + gur_bst.pbs_limit)
405 1.2 matt return NULL;
406 1.2 matt return (void *)pa;
407 1.2 matt }
408 1.2 matt
409 1.2 matt static void *(* const early_tlb_mapiodev)(paddr_t, psize_t) = gur_tlb_mapiodev;
410 1.2 matt
411 1.2 matt static void
412 1.2 matt e500_cpu_reset(void)
413 1.2 matt {
414 1.2 matt __asm volatile("sync");
415 1.2 matt cpu_write_4(GLOBAL_BASE + RSTCR, HRESET_REQ);
416 1.2 matt __asm volatile("msync;isync");
417 1.2 matt }
418 1.2 matt
419 1.2 matt static psize_t
420 1.2 matt memprobe(vaddr_t endkernel)
421 1.2 matt {
422 1.2 matt phys_ram_seg_t *mr;
423 1.6 matt paddr_t boot_page = cpu_read_4(GUR_BPTR);
424 1.6 matt printf(" bptr=%"PRIxPADDR, boot_page);
425 1.6 matt if (boot_page & BPTR_EN) {
426 1.6 matt /*
427 1.6 matt * shift it to an address
428 1.6 matt */
429 1.6 matt boot_page = (boot_page & BPTR_BOOT_PAGE) << PAGE_SHIFT;
430 1.6 matt } else {
431 1.6 matt boot_page = ~(paddr_t)0;
432 1.6 matt }
433 1.2 matt
434 1.2 matt /*
435 1.2 matt * First we need to find out how much physical memory we have.
436 1.2 matt * We could let our bootloader tell us, but it's almost as easy
437 1.2 matt * to ask the DDR memory controller.
438 1.2 matt */
439 1.2 matt mr = physmemr;
440 1.2 matt #if 1
441 1.2 matt for (u_int i = 0; i < 4; i++) {
442 1.2 matt uint32_t v = cpu_read_4(DDRC1_BASE + CS_CONFIG(i));
443 1.2 matt if (v & CS_CONFIG_EN) {
444 1.2 matt v = cpu_read_4(DDRC1_BASE + CS_BNDS(i));
445 1.6 matt if (v == 0)
446 1.6 matt continue;
447 1.2 matt mr->start = BNDS_SA_GET(v);
448 1.2 matt mr->size = BNDS_SIZE_GET(v);
449 1.6 matt #if 0
450 1.6 matt printf(" [%zd]={%#"PRIx64"@%#"PRIx64"}",
451 1.6 matt mr - physmemr, mr->size, mr->start);
452 1.6 matt #endif
453 1.2 matt mr++;
454 1.2 matt }
455 1.2 matt }
456 1.2 matt
457 1.2 matt if (mr == physmemr)
458 1.2 matt panic("no memory configured!");
459 1.2 matt #else
460 1.2 matt mr->start = 0;
461 1.2 matt mr->size = 32 << 20;
462 1.2 matt mr++;
463 1.2 matt #endif
464 1.2 matt
465 1.2 matt /*
466 1.2 matt * Sort memory regions from low to high and coalesce adjacent regions
467 1.2 matt */
468 1.2 matt u_int cnt = mr - physmemr;
469 1.2 matt if (cnt > 1) {
470 1.2 matt for (u_int i = 0; i < cnt - 1; i++) {
471 1.2 matt for (u_int j = i + 1; j < cnt; j++) {
472 1.2 matt if (physmemr[j].start < physmemr[i].start) {
473 1.2 matt phys_ram_seg_t tmp = physmemr[i];
474 1.2 matt physmemr[i] = physmemr[j];
475 1.2 matt physmemr[j] = tmp;
476 1.2 matt }
477 1.2 matt }
478 1.2 matt }
479 1.2 matt mr = physmemr;
480 1.2 matt for (u_int i = 0; i < cnt; i++, mr++) {
481 1.2 matt if (mr->start + mr->size == mr[1].start) {
482 1.2 matt mr->size += mr[1].size;
483 1.2 matt for (u_int j = 1; j < cnt - i; j++)
484 1.2 matt mr[j] = mr[j+1];
485 1.2 matt cnt--;
486 1.2 matt }
487 1.2 matt }
488 1.2 matt }
489 1.2 matt
490 1.2 matt /*
491 1.2 matt * Copy physical memory to available memory.
492 1.2 matt */
493 1.2 matt memcpy(availmemr, physmemr, cnt * sizeof(physmemr[0]));
494 1.2 matt
495 1.2 matt /*
496 1.2 matt * Adjust available memory to skip kernel at start of memory.
497 1.2 matt */
498 1.2 matt availmemr[0].size -= endkernel - availmemr[0].start;
499 1.2 matt availmemr[0].start = endkernel;
500 1.2 matt
501 1.6 matt mr = availmemr;
502 1.6 matt for (u_int i = 0; i < cnt; i++, mr++) {
503 1.6 matt /*
504 1.6 matt * U-boot reserves a boot-page on multi-core chips.
505 1.6 matt * We need to make sure that we never disturb it.
506 1.6 matt */
507 1.6 matt const paddr_t mr_end = mr->start + mr->size;
508 1.6 matt if (mr_end > boot_page && boot_page >= mr->start) {
509 1.6 matt /*
510 1.6 matt * Normally u-boot will put in at the end
511 1.6 matt * of memory. But in case it doesn't, deal
512 1.6 matt * with all possibilities.
513 1.6 matt */
514 1.6 matt if (boot_page + PAGE_SIZE == mr_end) {
515 1.6 matt mr->size -= PAGE_SIZE;
516 1.6 matt } else if (boot_page == mr->start) {
517 1.6 matt mr->start += PAGE_SIZE;
518 1.6 matt mr->size -= PAGE_SIZE;
519 1.6 matt } else {
520 1.6 matt mr->size = boot_page - mr->start;
521 1.6 matt mr++;
522 1.6 matt for (u_int j = cnt; j > i + 1; j--) {
523 1.6 matt availmemr[j] = availmemr[j-1];
524 1.6 matt }
525 1.6 matt cnt++;
526 1.6 matt mr->start = boot_page + PAGE_SIZE;
527 1.6 matt mr->size = mr_end - mr->start;
528 1.6 matt }
529 1.6 matt break;
530 1.6 matt }
531 1.6 matt }
532 1.6 matt
533 1.2 matt /*
534 1.2 matt * Steal pages at the end of memory for the kernel message buffer.
535 1.2 matt */
536 1.2 matt availmemr[cnt-1].size -= round_page(MSGBUFSIZE);
537 1.2 matt msgbuf_paddr =
538 1.2 matt (uintptr_t)(availmemr[cnt-1].start + availmemr[cnt-1].size);
539 1.2 matt
540 1.2 matt /*
541 1.2 matt * Calculate physmem.
542 1.2 matt */
543 1.2 matt for (u_int i = 0; i < cnt; i++)
544 1.2 matt physmem += atop(physmemr[i].size);
545 1.2 matt
546 1.2 matt nmemr = cnt;
547 1.2 matt return physmemr[cnt-1].start + physmemr[cnt-1].size;
548 1.2 matt }
549 1.2 matt
550 1.2 matt void
551 1.2 matt consinit(void)
552 1.2 matt {
553 1.2 matt static bool attached = false;
554 1.2 matt
555 1.2 matt if (attached)
556 1.2 matt return;
557 1.2 matt attached = true;
558 1.2 matt
559 1.2 matt if (comcnfreq == -1) {
560 1.2 matt const uint32_t porpplsr = cpu_read_4(GLOBAL_BASE + PORPLLSR);
561 1.2 matt const uint32_t plat_ratio = PLAT_RATIO_GET(porpplsr);
562 1.2 matt comcnfreq = e500_sys_clk * plat_ratio;
563 1.2 matt printf(" comcnfreq=%u", comcnfreq);
564 1.2 matt }
565 1.2 matt
566 1.2 matt comcnattach(&gur_bst, comcnaddr, comcnspeed, comcnfreq,
567 1.2 matt COM_TYPE_NORMAL, comcnmode);
568 1.2 matt }
569 1.2 matt
570 1.2 matt void
571 1.2 matt cpu_probe_cache(void)
572 1.2 matt {
573 1.2 matt struct cpu_info * const ci = curcpu();
574 1.2 matt const uint32_t l1cfg0 = mfspr(SPR_L1CFG0);
575 1.2 matt
576 1.2 matt ci->ci_ci.dcache_size = L1CFG_CSIZE_GET(l1cfg0);
577 1.2 matt ci->ci_ci.dcache_line_size = 32 << L1CFG_CBSIZE_GET(l1cfg0);
578 1.2 matt
579 1.2 matt if (L1CFG_CARCH_GET(l1cfg0) == L1CFG_CARCH_HARVARD) {
580 1.2 matt const uint32_t l1cfg1 = mfspr(SPR_L1CFG1);
581 1.2 matt
582 1.2 matt ci->ci_ci.icache_size = L1CFG_CSIZE_GET(l1cfg1);
583 1.2 matt ci->ci_ci.icache_line_size = 32 << L1CFG_CBSIZE_GET(l1cfg1);
584 1.2 matt } else {
585 1.2 matt ci->ci_ci.icache_size = ci->ci_ci.dcache_size;
586 1.2 matt ci->ci_ci.icache_line_size = ci->ci_ci.dcache_line_size;
587 1.2 matt }
588 1.2 matt
589 1.2 matt #ifdef DEBUG
590 1.2 matt uint32_t l1csr0 = mfspr(SPR_L1CSR0);
591 1.2 matt if ((L1CSR_CE & l1csr0) == 0)
592 1.2 matt printf(" DC=off");
593 1.2 matt
594 1.2 matt uint32_t l1csr1 = mfspr(SPR_L1CSR1);
595 1.2 matt if ((L1CSR_CE & l1csr1) == 0)
596 1.2 matt printf(" IC=off");
597 1.2 matt #endif
598 1.2 matt }
599 1.2 matt
600 1.3 matt static uint16_t
601 1.3 matt getsvr(void)
602 1.3 matt {
603 1.3 matt uint16_t svr = mfspr(SPR_SVR) >> 16;
604 1.3 matt
605 1.3 matt svr &= ~0x8; /* clear security bit */
606 1.3 matt switch (svr) {
607 1.3 matt case SVR_MPC8543v1 >> 16: return SVR_MPC8548v1 >> 16;
608 1.3 matt case SVR_MPC8541v1 >> 16: return SVR_MPC8555v1 >> 16;
609 1.3 matt case SVR_P2010v2 >> 16: return SVR_P2020v2 >> 16;
610 1.3 matt default: return svr;
611 1.3 matt }
612 1.3 matt }
613 1.3 matt
614 1.2 matt static const char *
615 1.2 matt socname(uint32_t svr)
616 1.2 matt {
617 1.3 matt svr &= ~0x80000; /* clear security bit */
618 1.2 matt switch (svr >> 8) {
619 1.5 matt case SVR_MPC8533 >> 8: return "MPC8533";
620 1.3 matt case SVR_MPC8536v1 >> 8: return "MPC8536";
621 1.3 matt case SVR_MPC8541v1 >> 8: return "MPC8541";
622 1.2 matt case SVR_MPC8543v2 >> 8: return "MPC8543";
623 1.2 matt case SVR_MPC8544v1 >> 8: return "MPC8544";
624 1.3 matt case SVR_MPC8545v2 >> 8: return "MPC8545";
625 1.3 matt case SVR_MPC8547v2 >> 8: return "MPC8547";
626 1.3 matt case SVR_MPC8548v2 >> 8: return "MPC8548";
627 1.3 matt case SVR_MPC8555v1 >> 8: return "MPC8555";
628 1.3 matt case SVR_MPC8568v1 >> 8: return "MPC8568";
629 1.3 matt case SVR_MPC8567v1 >> 8: return "MPC8567";
630 1.3 matt case SVR_MPC8572v1 >> 8: return "MPC8572";
631 1.3 matt case SVR_P2020v2 >> 8: return "P2020";
632 1.3 matt case SVR_P2010v2 >> 8: return "P2010";
633 1.2 matt default:
634 1.2 matt panic("%s: unknown SVR %#x", __func__, svr);
635 1.2 matt }
636 1.2 matt }
637 1.2 matt
638 1.2 matt static void
639 1.2 matt e500_tlb_print(device_t self, const char *name, uint32_t tlbcfg)
640 1.2 matt {
641 1.2 matt static const char units[16] = "KKKKKMMMMMGGGGGT";
642 1.2 matt
643 1.2 matt const uint32_t minsize = 1U << (2 * TLBCFG_MINSIZE(tlbcfg));
644 1.2 matt const uint32_t assoc = TLBCFG_ASSOC(tlbcfg);
645 1.2 matt const u_int maxsize_log4k = TLBCFG_MAXSIZE(tlbcfg);
646 1.2 matt const uint64_t maxsize = 1ULL << (2 * maxsize_log4k % 10);
647 1.2 matt const uint32_t nentries = TLBCFG_NENTRY(tlbcfg);
648 1.2 matt
649 1.2 matt aprint_normal_dev(self, "%s:", name);
650 1.2 matt
651 1.2 matt aprint_normal(" %u", nentries);
652 1.2 matt if (TLBCFG_AVAIL_P(tlbcfg)) {
653 1.2 matt aprint_normal(" variable-size (%uKB..%"PRIu64"%cB)",
654 1.2 matt minsize, maxsize, units[maxsize_log4k]);
655 1.2 matt } else {
656 1.2 matt aprint_normal(" fixed-size (%uKB)", minsize);
657 1.2 matt }
658 1.2 matt if (assoc == 0 || assoc == nentries)
659 1.2 matt aprint_normal(" fully");
660 1.2 matt else
661 1.2 matt aprint_normal(" %u-way set", assoc);
662 1.2 matt aprint_normal(" associative entries\n");
663 1.2 matt }
664 1.2 matt
665 1.2 matt static void
666 1.2 matt e500_cpu_attach(device_t self, u_int instance)
667 1.2 matt {
668 1.6 matt struct cpu_info * const ci = &cpu_info[instance - (instance > 0)];
669 1.2 matt
670 1.6 matt if (instance > 1) {
671 1.6 matt #ifdef MULTIPROCESSOR
672 1.6 matt #error still needs to be written
673 1.2 matt ci->ci_idepth = -1;
674 1.2 matt cpu_probe_cache();
675 1.6 matt #else
676 1.6 matt aprint_error_dev(self, "disabled (uniprocessor kernel)\n");
677 1.6 matt return;
678 1.6 matt #endif
679 1.2 matt }
680 1.2 matt
681 1.6 matt self->dv_private = ci;
682 1.6 matt
683 1.6 matt ci->ci_cpuid = instance - (instance > 0);
684 1.6 matt ci->ci_dev = self;
685 1.6 matt //ci->ci_idlespin = cpu_idlespin;
686 1.2 matt uint64_t freq = board_info_get_number("processor-frequency");
687 1.6 matt
688 1.2 matt char freqbuf[10];
689 1.2 matt if (freq >= 999500000) {
690 1.2 matt const uint32_t freq32 = (freq + 500000) / 10000000;
691 1.2 matt snprintf(freqbuf, sizeof(freqbuf), "%u.%02u GHz",
692 1.2 matt freq32 / 100, freq32 % 100);
693 1.2 matt } else {
694 1.2 matt const uint32_t freq32 = (freq + 500000) / 1000000;
695 1.2 matt snprintf(freqbuf, sizeof(freqbuf), "%u MHz", freq32);
696 1.2 matt }
697 1.2 matt
698 1.2 matt const uint32_t pvr = mfpvr();
699 1.2 matt const uint32_t svr = mfspr(SPR_SVR);
700 1.2 matt const uint32_t pir = mfspr(SPR_PIR);
701 1.2 matt
702 1.2 matt aprint_normal_dev(self, "%s %s%s %u.%u with an e500%s %u.%u core, "
703 1.2 matt "ID %u%s\n",
704 1.2 matt freqbuf, socname(svr), (SVR_SECURITY_P(svr) ? "E" : ""),
705 1.2 matt (svr >> 4) & 15, svr & 15,
706 1.2 matt (pvr >> 16) == PVR_MPCe500v2 ? "v2" : "",
707 1.2 matt (pvr >> 4) & 15, pvr & 15,
708 1.2 matt pir, (pir == 0 ? " (Primary)" : ""));
709 1.2 matt
710 1.2 matt const uint32_t l1cfg0 = mfspr(SPR_L1CFG0);
711 1.2 matt aprint_normal_dev(self,
712 1.2 matt "%uKB/%uB %u-way L1 %s cache\n",
713 1.2 matt L1CFG_CSIZE_GET(l1cfg0) >> 10,
714 1.2 matt 32 << L1CFG_CBSIZE_GET(l1cfg0),
715 1.2 matt L1CFG_CNWAY_GET(l1cfg0),
716 1.2 matt L1CFG_CARCH_GET(l1cfg0) == L1CFG_CARCH_HARVARD
717 1.2 matt ? "data" : "unified");
718 1.2 matt
719 1.2 matt if (L1CFG_CARCH_GET(l1cfg0) == L1CFG_CARCH_HARVARD) {
720 1.2 matt const uint32_t l1cfg1 = mfspr(SPR_L1CFG1);
721 1.2 matt aprint_normal_dev(self,
722 1.2 matt "%uKB/%uB %u-way L1 %s cache\n",
723 1.2 matt L1CFG_CSIZE_GET(l1cfg1) >> 10,
724 1.2 matt 32 << L1CFG_CBSIZE_GET(l1cfg1),
725 1.2 matt L1CFG_CNWAY_GET(l1cfg1),
726 1.2 matt "instruction");
727 1.2 matt }
728 1.2 matt
729 1.2 matt const uint32_t mmucfg = mfspr(SPR_MMUCFG);
730 1.2 matt aprint_normal_dev(self,
731 1.2 matt "%u TLBs, %u concurrent %u-bit PIDs (%u total)\n",
732 1.2 matt MMUCFG_NTLBS_GET(mmucfg) + 1,
733 1.2 matt MMUCFG_NPIDS_GET(mmucfg),
734 1.2 matt MMUCFG_PIDSIZE_GET(mmucfg) + 1,
735 1.2 matt 1 << (MMUCFG_PIDSIZE_GET(mmucfg) + 1));
736 1.2 matt
737 1.2 matt e500_tlb_print(self, "tlb0", mfspr(SPR_TLB0CFG));
738 1.2 matt e500_tlb_print(self, "tlb1", mfspr(SPR_TLB1CFG));
739 1.2 matt
740 1.7 matt intr_cpu_attach(ci);
741 1.2 matt cpu_evcnt_attach(ci);
742 1.7 matt
743 1.7 matt if (ci == curcpu())
744 1.7 matt intr_cpu_hatch(ci);
745 1.2 matt }
746 1.2 matt
747 1.7 matt void
748 1.7 matt e500_ipi_halt(void)
749 1.7 matt {
750 1.7 matt register_t msr, hid0;
751 1.7 matt
752 1.7 matt msr = wrtee(0);
753 1.7 matt
754 1.7 matt hid0 = mfspr(SPR_HID0);
755 1.7 matt hid0 = (hid0 & ~HID0_TBEN) | HID0_DOZE;
756 1.7 matt mtspr(SPR_HID0, hid0);
757 1.7 matt
758 1.7 matt msr = (msr & ~(PSL_EE|PSL_CE|PSL_ME)) | PSL_WE;
759 1.7 matt mtmsr(msr);
760 1.7 matt for (;;); /* loop forever */
761 1.7 matt }
762 1.7 matt
763 1.7 matt
764 1.2 matt static void
765 1.2 matt calltozero(void)
766 1.2 matt {
767 1.2 matt panic("call to 0 from %p", __builtin_return_address(0));
768 1.2 matt }
769 1.2 matt
770 1.2 matt void
771 1.10 matt initppc(vaddr_t startkernel, vaddr_t endkernel,
772 1.10 matt void *a0, void *a1, void *a2, void *a3)
773 1.2 matt {
774 1.2 matt struct cpu_info * const ci = curcpu();
775 1.2 matt struct cpu_softc * const cpu = ci->ci_softc;
776 1.2 matt
777 1.2 matt cn_tab = &e500_earlycons;
778 1.10 matt printf(" initppc(%#"PRIxVADDR", %#"PRIxVADDR", %p, %p, %p, %p)<enter>",
779 1.10 matt startkernel, endkernel, a0, a1, a2, a3);
780 1.2 matt
781 1.2 matt const register_t hid0 = mfspr(SPR_HID0);
782 1.2 matt mtspr(SPR_HID0, hid0 | HID0_TBEN | HID0_EMCP);
783 1.2 matt #ifdef CADMUS
784 1.2 matt /*
785 1.2 matt * Need to cache this from cadmus since we need to unmap cadmus since
786 1.2 matt * it falls in the middle of kernel address space.
787 1.2 matt */
788 1.2 matt cadmus_pci = ((uint8_t *)0xf8004000)[CM_PCI];
789 1.2 matt cadmus_csr = ((uint8_t *)0xf8004000)[CM_CSR];
790 1.2 matt ((uint8_t *)0xf8004000)[CM_CSR] |= CM_RST_PHYRST;
791 1.2 matt printf(" cadmus_pci=%#x", cadmus_pci);
792 1.2 matt printf(" cadmus_csr=%#x", cadmus_csr);
793 1.2 matt ((uint8_t *)0xf8004000)[CM_CSR] = 0;
794 1.2 matt if ((cadmus_pci & CM_PCI_PSPEED) == CM_PCI_PSPEED_66) {
795 1.2 matt e500_sys_clk *= 2;
796 1.2 matt }
797 1.2 matt #endif
798 1.2 matt #ifdef PIXIS
799 1.2 matt pixis_spd = ((uint8_t *)PX_BASE)[PX_SPD];
800 1.6 matt printf(" pixis_spd=%#x sysclk=%"PRIuMAX,
801 1.6 matt pixis_spd, PX_SPD_SYSCLK_GET(pixis_spd));
802 1.6 matt #ifndef SYS_CLK
803 1.2 matt e500_sys_clk = pixis_spd_map[PX_SPD_SYSCLK_GET(pixis_spd)];
804 1.6 matt #else
805 1.6 matt printf(" pixis_sysclk=%u", pixis_spd_map[PX_SPD_SYSCLK_GET(pixis_spd)]);
806 1.6 matt #endif
807 1.2 matt #endif
808 1.2 matt printf(" porpllsr=0x%08x",
809 1.2 matt *(uint32_t *)(GUR_BASE + GLOBAL_BASE + PORPLLSR));
810 1.2 matt printf(" sys_clk=%"PRIu64, e500_sys_clk);
811 1.2 matt
812 1.2 matt /*
813 1.2 matt * Make sure arguments are page aligned.
814 1.2 matt */
815 1.2 matt startkernel = trunc_page(startkernel);
816 1.2 matt endkernel = round_page(endkernel);
817 1.2 matt
818 1.2 matt /*
819 1.2 matt * Initialize the bus space tag used to access the 85xx general
820 1.2 matt * utility registers. It doesn't need to be extent protected.
821 1.2 matt * We know the GUR is mapped via a TLB1 entry so we add a limited
822 1.2 matt * mapiodev which allows mappings in GUR space.
823 1.2 matt */
824 1.2 matt CTASSERT(offsetof(struct tlb_md_ops, md_tlb_mapiodev) == 0);
825 1.2 matt cpu_md_ops.md_tlb_ops = (const void *)&early_tlb_mapiodev;
826 1.2 matt bus_space_init(&gur_bst, NULL, NULL, 0);
827 1.5 matt bus_space_init(&gur_le_bst, NULL, NULL, 0);
828 1.2 matt cpu->cpu_bst = &gur_bst;
829 1.5 matt cpu->cpu_le_bst = &gur_le_bst;
830 1.2 matt cpu->cpu_bsh = gur_bsh;
831 1.2 matt
832 1.2 matt /*
833 1.2 matt * Attach the console early, really early.
834 1.2 matt */
835 1.2 matt consinit();
836 1.2 matt
837 1.2 matt /*
838 1.2 matt * Reset the PIC to a known state.
839 1.2 matt */
840 1.2 matt cpu_write_4(OPENPIC_BASE + OPENPIC_GCR, GCR_RST);
841 1.2 matt while (cpu_read_4(OPENPIC_BASE + OPENPIC_GCR) & GCR_RST)
842 1.2 matt ;
843 1.2 matt #if 0
844 1.2 matt cpu_write_4(OPENPIC_BASE + OPENPIC_CTPR, 15); /* IPL_HIGH */
845 1.2 matt #endif
846 1.2 matt printf(" openpic-reset(ctpr=%u)",
847 1.2 matt cpu_read_4(OPENPIC_BASE + OPENPIC_CTPR));
848 1.2 matt
849 1.2 matt /*
850 1.2 matt * fill in with an absolute branch to a routine that will panic.
851 1.2 matt */
852 1.2 matt *(int *)0 = 0x48000002 | (int) calltozero;
853 1.2 matt
854 1.2 matt /*
855 1.2 matt * Get the cache sizes.
856 1.2 matt */
857 1.2 matt cpu_probe_cache();
858 1.6 matt printf(" cache(DC=%uKB/%u,IC=%uKB/%u)",
859 1.2 matt ci->ci_ci.dcache_size >> 10,
860 1.2 matt ci->ci_ci.dcache_line_size,
861 1.2 matt ci->ci_ci.icache_size >> 10,
862 1.2 matt ci->ci_ci.icache_line_size);
863 1.2 matt
864 1.2 matt /*
865 1.2 matt * Now find out how much memory is attached
866 1.2 matt */
867 1.2 matt pmemsize = memprobe(endkernel);
868 1.5 matt cpu->cpu_highmem = pmemsize;
869 1.2 matt printf(" memprobe=%zuMB", (size_t) (pmemsize >> 20));
870 1.2 matt
871 1.2 matt /*
872 1.2 matt * Now we need cleanout the TLB of stuff that we don't need.
873 1.2 matt */
874 1.2 matt e500_tlb_init(endkernel, pmemsize);
875 1.2 matt printf(" e500_tlbinit(%#lx,%zuMB)",
876 1.2 matt endkernel, (size_t) (pmemsize >> 20));
877 1.2 matt
878 1.2 matt /*
879 1.2 matt *
880 1.2 matt */
881 1.2 matt printf(" hid0=%#lx/%#lx", hid0, mfspr(SPR_HID0));
882 1.2 matt printf(" hid1=%#lx", mfspr(SPR_HID1));
883 1.2 matt printf(" pordevsr=%#x", cpu_read_4(GLOBAL_BASE + PORDEVSR));
884 1.2 matt printf(" devdisr=%#x", cpu_read_4(GLOBAL_BASE + DEVDISR));
885 1.2 matt
886 1.2 matt mtmsr(mfmsr() | PSL_CE | PSL_ME | PSL_DE);
887 1.2 matt
888 1.2 matt /*
889 1.2 matt * Initialize the message buffer.
890 1.2 matt */
891 1.2 matt initmsgbuf((void *)msgbuf_paddr, round_page(MSGBUFSIZE));
892 1.2 matt printf(" msgbuf=%p", (void *)msgbuf_paddr);
893 1.2 matt
894 1.2 matt /*
895 1.2 matt * Initialize exception vectors and interrupts
896 1.2 matt */
897 1.2 matt exception_init(&e500_intrsw);
898 1.2 matt printf(" exception_init=%p", &e500_intrsw);
899 1.2 matt mtspr(SPR_TCR, TCR_WIE | mfspr(SPR_TCR));
900 1.2 matt
901 1.2 matt /*
902 1.2 matt * Set the page size.
903 1.2 matt */
904 1.2 matt uvm_setpagesize();
905 1.2 matt
906 1.2 matt /*
907 1.2 matt * Initialize the pmap.
908 1.2 matt */
909 1.2 matt pmap_bootstrap(startkernel, endkernel, availmemr, nmemr);
910 1.2 matt
911 1.2 matt /*
912 1.2 matt * Let's take all the indirect calls via our stubs and patch
913 1.2 matt * them to be direct calls.
914 1.2 matt */
915 1.2 matt booke_fixup_stubs();
916 1.2 matt #if 0
917 1.2 matt /*
918 1.2 matt * As a debug measure we can change the TLB entry that maps all of
919 1.2 matt * memory to one that encompasses the 64KB with the kernel vectors.
920 1.2 matt * All other pages will be soft faulted into the TLB as needed.
921 1.2 matt */
922 1.2 matt const uint32_t saved_mas0 = mfspr(SPR_MAS0);
923 1.2 matt mtspr(SPR_MAS6, 0);
924 1.2 matt __asm volatile("tlbsx\t0, %0" :: "b"(startkernel));
925 1.2 matt uint32_t mas0 = mfspr(SPR_MAS0);
926 1.2 matt uint32_t mas1 = mfspr(SPR_MAS1);
927 1.2 matt uint32_t mas2 = mfspr(SPR_MAS2);
928 1.2 matt uint32_t mas3 = mfspr(SPR_MAS3);
929 1.2 matt KASSERT(mas3 & MAS3_SW);
930 1.2 matt KASSERT(mas3 & MAS3_SR);
931 1.2 matt KASSERT(mas3 & MAS3_SX);
932 1.2 matt mas1 = (mas1 & ~MAS1_TSIZE) | MASX_TSIZE_64KB;
933 1.2 matt pt_entry_t xpn_mask = ~0 << (10 + 2 * MASX_TSIZE_GET(mas1));
934 1.2 matt mas2 = (mas2 & ~(MAS2_EPN )) | (startkernel & xpn_mask);
935 1.2 matt mas3 = (mas3 & ~(MAS3_RPN|MAS3_SW)) | (startkernel & xpn_mask);
936 1.2 matt printf(" %#lx=<%#x,%#x,%#x,%#x>", startkernel, mas0, mas1, mas2, mas3);
937 1.2 matt #if 1
938 1.2 matt mtspr(SPR_MAS1, mas1);
939 1.2 matt mtspr(SPR_MAS2, mas2);
940 1.2 matt mtspr(SPR_MAS3, mas3);
941 1.2 matt extern void tlbwe(void);
942 1.2 matt tlbwe();
943 1.2 matt mtspr(SPR_MAS0, saved_mas0);
944 1.2 matt printf("(ok)");
945 1.2 matt #endif
946 1.2 matt #endif
947 1.2 matt
948 1.2 matt /*
949 1.2 matt * Set some more MD helpers
950 1.2 matt */
951 1.2 matt cpu_md_ops.md_cpunode_locs = mpc8548_cpunode_locs;
952 1.2 matt cpu_md_ops.md_device_register = e500_device_register;
953 1.2 matt cpu_md_ops.md_cpu_attach = e500_cpu_attach;
954 1.2 matt cpu_md_ops.md_cpu_reset = e500_cpu_reset;
955 1.2 matt #if NGPIO > 0
956 1.2 matt cpu_md_ops.md_cpunode_attach = pq3gpio_attach;
957 1.2 matt #endif
958 1.2 matt
959 1.2 matt printf(" initppc done!\n");
960 1.8 mrg
961 1.8 mrg /*
962 1.8 mrg * Look for the Book-E modules in the right place.
963 1.8 mrg */
964 1.8 mrg module_machine = module_machine_booke;
965 1.2 matt }
966 1.2 matt
967 1.2 matt #ifdef MPC8548
968 1.2 matt static const char * const mpc8548cds_extirq_names[] = {
969 1.2 matt [0] = "pci inta",
970 1.2 matt [1] = "pci intb",
971 1.2 matt [2] = "pci intc",
972 1.2 matt [3] = "pci intd",
973 1.2 matt [4] = "irq4",
974 1.2 matt [5] = "gige phy",
975 1.2 matt [6] = "atm phy",
976 1.2 matt [7] = "cpld",
977 1.2 matt [8] = "irq8",
978 1.2 matt [9] = "nvram",
979 1.2 matt [10] = "debug",
980 1.2 matt [11] = "pci2 inta",
981 1.2 matt };
982 1.2 matt #endif
983 1.2 matt
984 1.2 matt static const char * const mpc85xx_extirq_names[] = {
985 1.2 matt [0] = "extirq 0",
986 1.2 matt [1] = "extirq 1",
987 1.2 matt [2] = "extirq 2",
988 1.2 matt [3] = "extirq 3",
989 1.2 matt [4] = "extirq 4",
990 1.2 matt [5] = "extirq 5",
991 1.2 matt [6] = "extirq 6",
992 1.2 matt [7] = "extirq 7",
993 1.2 matt [8] = "extirq 8",
994 1.2 matt [9] = "extirq 9",
995 1.2 matt [10] = "extirq 10",
996 1.2 matt [11] = "extirq 11",
997 1.2 matt };
998 1.2 matt
999 1.2 matt static void
1000 1.2 matt mpc85xx_extirq_setup(void)
1001 1.2 matt {
1002 1.2 matt #ifdef MPC8548
1003 1.2 matt const char * const * names = mpc8548cds_extirq_names;
1004 1.2 matt const size_t n = __arraycount(mpc8548cds_extirq_names);
1005 1.2 matt #else
1006 1.2 matt const char * const * names = mpc85xx_extirq_names;
1007 1.2 matt const size_t n = __arraycount(mpc85xx_extirq_names);
1008 1.2 matt #endif
1009 1.2 matt prop_array_t extirqs = prop_array_create_with_capacity(n);
1010 1.2 matt for (u_int i = 0; i < n; i++) {
1011 1.2 matt prop_string_t ps = prop_string_create_cstring_nocopy(names[i]);
1012 1.2 matt prop_array_set(extirqs, i, ps);
1013 1.2 matt prop_object_release(ps);
1014 1.2 matt }
1015 1.2 matt board_info_add_object("external-irqs", extirqs);
1016 1.2 matt prop_object_release(extirqs);
1017 1.2 matt }
1018 1.2 matt
1019 1.2 matt static void
1020 1.2 matt mpc85xx_pci_setup(const char *name, uint32_t intmask, int ist, int inta, ...)
1021 1.2 matt {
1022 1.2 matt prop_dictionary_t pci_intmap = prop_dictionary_create();
1023 1.2 matt KASSERT(pci_intmap != NULL);
1024 1.2 matt prop_number_t mask = prop_number_create_unsigned_integer(intmask);
1025 1.2 matt KASSERT(mask != NULL);
1026 1.2 matt prop_dictionary_set(pci_intmap, "interrupt-mask", mask);
1027 1.2 matt prop_object_release(mask);
1028 1.2 matt prop_number_t pn_ist = prop_number_create_unsigned_integer(ist);
1029 1.2 matt KASSERT(pn_ist != NULL);
1030 1.2 matt prop_number_t pn_intr = prop_number_create_unsigned_integer(inta);
1031 1.2 matt KASSERT(pn_intr != NULL);
1032 1.2 matt prop_dictionary_t entry = prop_dictionary_create();
1033 1.2 matt KASSERT(entry != NULL);
1034 1.2 matt prop_dictionary_set(entry, "interrupt", pn_intr);
1035 1.2 matt prop_dictionary_set(entry, "type", pn_ist);
1036 1.2 matt prop_dictionary_set(pci_intmap, "000000", entry);
1037 1.2 matt prop_object_release(pn_intr);
1038 1.2 matt prop_object_release(entry);
1039 1.2 matt va_list ap;
1040 1.2 matt va_start(ap, inta);
1041 1.2 matt u_int intrinc = __LOWEST_SET_BIT(intmask);
1042 1.2 matt for (u_int i = 0; i < intmask; i += intrinc) {
1043 1.2 matt char prop_name[12];
1044 1.2 matt snprintf(prop_name, sizeof(prop_name), "%06x", i + intrinc);
1045 1.2 matt entry = prop_dictionary_create();
1046 1.2 matt KASSERT(entry != NULL);
1047 1.2 matt pn_intr = prop_number_create_unsigned_integer(va_arg(ap, u_int));
1048 1.2 matt KASSERT(pn_intr != NULL);
1049 1.2 matt prop_dictionary_set(entry, "interrupt", pn_intr);
1050 1.2 matt prop_dictionary_set(entry, "type", pn_ist);
1051 1.2 matt prop_dictionary_set(pci_intmap, prop_name, entry);
1052 1.2 matt prop_object_release(pn_intr);
1053 1.2 matt prop_object_release(entry);
1054 1.2 matt }
1055 1.2 matt va_end(ap);
1056 1.2 matt prop_object_release(pn_ist);
1057 1.2 matt board_info_add_object(name, pci_intmap);
1058 1.2 matt prop_object_release(pci_intmap);
1059 1.2 matt }
1060 1.2 matt
1061 1.2 matt void
1062 1.2 matt cpu_startup(void)
1063 1.2 matt {
1064 1.2 matt struct cpu_info * const ci = curcpu();
1065 1.3 matt const uint16_t svr = getsvr();
1066 1.2 matt
1067 1.2 matt booke_cpu_startup(socname(mfspr(SPR_SVR)));
1068 1.2 matt
1069 1.2 matt uint32_t v = cpu_read_4(GLOBAL_BASE + PORPLLSR);
1070 1.2 matt uint32_t plat_ratio = PLAT_RATIO_GET(v);
1071 1.2 matt uint32_t e500_ratio = E500_RATIO_GET(v);
1072 1.2 matt
1073 1.2 matt uint64_t ccb_freq = e500_sys_clk * plat_ratio;
1074 1.2 matt uint64_t cpu_freq = ccb_freq * e500_ratio / 2;
1075 1.2 matt
1076 1.2 matt ci->ci_khz = (cpu_freq + 500) / 1000;
1077 1.2 matt cpu_timebase = ci->ci_data.cpu_cc_freq = ccb_freq / 8;
1078 1.2 matt
1079 1.3 matt board_info_add_number("my-id", svr);
1080 1.2 matt board_info_add_bool("pq3");
1081 1.2 matt board_info_add_number("mem-size", pmemsize);
1082 1.2 matt const uint32_t l2ctl = cpu_read_4(L2CACHE_BASE + L2CTL);
1083 1.2 matt uint32_t l2siz = L2CTL_L2SIZ_GET(l2ctl);
1084 1.2 matt uint32_t l2banks = l2siz >> 16;
1085 1.2 matt #ifdef MPC85555
1086 1.3 matt if (svr == (MPC8555v1 >> 16)) {
1087 1.2 matt l2siz >>= 1;
1088 1.2 matt l2banks >>= 1;
1089 1.2 matt }
1090 1.2 matt #endif
1091 1.6 matt paddr_t boot_page = cpu_read_4(GUR_BPTR);
1092 1.6 matt if (boot_page & BPTR_EN) {
1093 1.6 matt bool found = false;
1094 1.6 matt boot_page = (boot_page & BPTR_BOOT_PAGE) << PAGE_SHIFT;
1095 1.6 matt for (const uint32_t *dp = (void *)(boot_page + PAGE_SIZE - 4),
1096 1.6 matt * const bp = (void *)boot_page;
1097 1.6 matt bp <= dp; dp--) {
1098 1.6 matt if (*dp == boot_page) {
1099 1.6 matt uintptr_t spinup_table_addr = (uintptr_t)++dp;
1100 1.6 matt spinup_table_addr =
1101 1.6 matt roundup2(spinup_table_addr, 32);
1102 1.6 matt board_info_add_number("mp-boot-page",
1103 1.6 matt boot_page);
1104 1.6 matt board_info_add_number("mp-spin-up-table",
1105 1.6 matt spinup_table_addr);
1106 1.6 matt printf("Found MP boot page @ %#"PRIxPADDR". "
1107 1.6 matt "Spin-up table @ %#"PRIxPTR"\n",
1108 1.6 matt boot_page, spinup_table_addr);
1109 1.6 matt found = true;
1110 1.6 matt break;
1111 1.6 matt }
1112 1.6 matt }
1113 1.6 matt if (!found)
1114 1.6 matt printf("Found MP boot page @ %#"PRIxPADDR
1115 1.6 matt " with missing U-boot signature!\n", boot_page);
1116 1.6 matt }
1117 1.2 matt board_info_add_number("l2-cache-size", l2siz);
1118 1.2 matt board_info_add_number("l2-cache-line-size", 32);
1119 1.2 matt board_info_add_number("l2-cache-banks", l2banks);
1120 1.2 matt board_info_add_number("l2-cache-ways", 8);
1121 1.2 matt
1122 1.2 matt board_info_add_number("processor-frequency", cpu_freq);
1123 1.2 matt board_info_add_number("bus-frequency", ccb_freq);
1124 1.2 matt board_info_add_number("pci-frequency", e500_sys_clk);
1125 1.2 matt board_info_add_number("timebase-frequency", ccb_freq / 8);
1126 1.2 matt
1127 1.2 matt #ifdef CADMUS
1128 1.2 matt const uint8_t phy_base = CM_CSR_EPHY_GET(cadmus_csr) << 2;
1129 1.2 matt board_info_add_number("tsec1-phy-addr", phy_base + 0);
1130 1.2 matt board_info_add_number("tsec2-phy-addr", phy_base + 1);
1131 1.2 matt board_info_add_number("tsec3-phy-addr", phy_base + 2);
1132 1.2 matt board_info_add_number("tsec4-phy-addr", phy_base + 3);
1133 1.2 matt #else
1134 1.2 matt board_info_add_number("tsec1-phy-addr", MII_PHY_ANY);
1135 1.2 matt board_info_add_number("tsec2-phy-addr", MII_PHY_ANY);
1136 1.2 matt board_info_add_number("tsec3-phy-addr", MII_PHY_ANY);
1137 1.2 matt board_info_add_number("tsec4-phy-addr", MII_PHY_ANY);
1138 1.2 matt #endif
1139 1.2 matt
1140 1.2 matt uint64_t macstnaddr =
1141 1.2 matt ((uint64_t)le32toh(cpu_read_4(ETSEC1_BASE + MACSTNADDR1)) << 16)
1142 1.2 matt | ((uint64_t)le32toh(cpu_read_4(ETSEC1_BASE + MACSTNADDR2)) << 48);
1143 1.2 matt board_info_add_data("tsec-mac-addr-base", &macstnaddr, 6);
1144 1.2 matt
1145 1.2 matt #if NPCI > 0 && defined(PCI_MEMBASE)
1146 1.2 matt pcimem_ex = extent_create("pcimem",
1147 1.2 matt PCI_MEMBASE, PCI_MEMBASE + 4*PCI_MEMSIZE,
1148 1.2 matt M_DEVBUF, NULL, 0, EX_WAITOK);
1149 1.2 matt #endif
1150 1.2 matt #if NPCI > 0 && defined(PCI_IOBASE)
1151 1.2 matt pciio_ex = extent_create("pciio",
1152 1.2 matt PCI_IOBASE, PCI_IOBASE + 4*PCI_IOSIZE,
1153 1.2 matt M_DEVBUF, NULL, 0, EX_WAITOK);
1154 1.2 matt #endif
1155 1.2 matt mpc85xx_extirq_setup();
1156 1.2 matt /*
1157 1.2 matt * PCI-Express virtual wire interrupts on combined with
1158 1.2 matt * External IRQ0/1/2/3.
1159 1.2 matt */
1160 1.3 matt switch (svr) {
1161 1.2 matt #if defined(MPC8548)
1162 1.3 matt case SVR_MPC8548v1 >> 16:
1163 1.3 matt mpc85xx_pci_setup("pcie0-interrupt-map", 0x001800,
1164 1.3 matt IST_LEVEL, 0, 1, 2, 3);
1165 1.3 matt break;
1166 1.3 matt #endif
1167 1.3 matt #if defined(MPC8544) || defined(MPC8572) || defined(MPC8536) || defined(P2020)
1168 1.3 matt case SVR_MPC8536v1 >> 16:
1169 1.3 matt case SVR_MPC8544v1 >> 16:
1170 1.3 matt case SVR_MPC8572v1 >> 16:
1171 1.3 matt case SVR_P2010v2 >> 16:
1172 1.3 matt case SVR_P2020v2 >> 16:
1173 1.3 matt mpc85xx_pci_setup("pcie1-interrupt-map", 0x001800, IST_LEVEL,
1174 1.3 matt 0, 1, 2, 3);
1175 1.3 matt mpc85xx_pci_setup("pcie2-interrupt-map", 0x001800, IST_LEVEL,
1176 1.3 matt 4, 5, 6, 7);
1177 1.3 matt mpc85xx_pci_setup("pcie3-interrupt-map", 0x001800, IST_LEVEL,
1178 1.3 matt 8, 9, 10, 11);
1179 1.3 matt break;
1180 1.2 matt #endif
1181 1.3 matt }
1182 1.3 matt switch (svr) {
1183 1.2 matt #if defined(MPC8536)
1184 1.3 matt case SVR_MPC8536v1 >> 16:
1185 1.5 matt mpc85xx_pci_setup("pci0-interrupt-map", 0x001800, IST_LEVEL,
1186 1.3 matt 1, 2, 3, 4);
1187 1.3 matt break;
1188 1.3 matt #endif
1189 1.3 matt #if defined(MPC8544)
1190 1.3 matt case SVR_MPC8544v1 >> 16:
1191 1.5 matt mpc85xx_pci_setup("pci0-interrupt-map", 0x001800, IST_LEVEL,
1192 1.3 matt 0, 1, 2, 3);
1193 1.3 matt break;
1194 1.2 matt #endif
1195 1.2 matt #if defined(MPC8548)
1196 1.3 matt case SVR_MPC8548v1 >> 16:
1197 1.3 matt mpc85xx_pci_setup("pci1-interrupt-map", 0x001800, IST_LEVEL,
1198 1.3 matt 0, 1, 2, 3);
1199 1.3 matt mpc85xx_pci_setup("pci2-interrupt-map", 0x001800, IST_LEVEL,
1200 1.3 matt 11, 1, 2, 3);
1201 1.3 matt break;
1202 1.2 matt #endif
1203 1.3 matt }
1204 1.2 matt }
1205