ibm4xx_machdep.c revision 1.10 1 /* $NetBSD: ibm4xx_machdep.c,v 1.10 2009/11/21 17:40:28 rmind Exp $ */
2 /* Original: ibm40x_machdep.c,v 1.3 2005/01/17 17:19:36 shige Exp $ */
3
4 /*
5 * Copyright 2001, 2002 Wasabi Systems, Inc.
6 * All rights reserved.
7 *
8 * Written by Eduardo Horvath and Simon Burge for Wasabi Systems, Inc.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed for the NetBSD Project by
21 * Wasabi Systems, Inc.
22 * 4. The name of Wasabi Systems, Inc. may not be used to endorse
23 * or promote products derived from this software without specific prior
24 * written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``AS IS'' AND
27 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL WASABI SYSTEMS, INC
30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 * POSSIBILITY OF SUCH DAMAGE.
37 */
38
39 /*
40 * Copyright (C) 1995, 1996 Wolfgang Solfrank.
41 * Copyright (C) 1995, 1996 TooLs GmbH.
42 * All rights reserved.
43 *
44 * Redistribution and use in source and binary forms, with or without
45 * modification, are permitted provided that the following conditions
46 * are met:
47 * 1. Redistributions of source code must retain the above copyright
48 * notice, this list of conditions and the following disclaimer.
49 * 2. Redistributions in binary form must reproduce the above copyright
50 * notice, this list of conditions and the following disclaimer in the
51 * documentation and/or other materials provided with the distribution.
52 * 3. All advertising materials mentioning features or use of this software
53 * must display the following acknowledgement:
54 * This product includes software developed by TooLs GmbH.
55 * 4. The name of TooLs GmbH may not be used to endorse or promote products
56 * derived from this software without specific prior written permission.
57 *
58 * THIS SOFTWARE IS PROVIDED BY TOOLS GMBH ``AS IS'' AND ANY EXPRESS OR
59 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
60 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
61 * IN NO EVENT SHALL TOOLS GMBH BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
62 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
63 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
64 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
65 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
66 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
67 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
68 */
69
70 #include <sys/cdefs.h>
71 __KERNEL_RCSID(0, "$NetBSD: ibm4xx_machdep.c,v 1.10 2009/11/21 17:40:28 rmind Exp $");
72
73 #include "opt_compat_netbsd.h"
74 #include "opt_ddb.h"
75 #include "opt_kgdb.h"
76 #include "opt_ipkdb.h"
77
78 #include <sys/param.h>
79 #include <sys/msgbuf.h>
80 #include <sys/proc.h>
81
82 #include <uvm/uvm_extern.h>
83
84 #if defined(DDB)
85 #include <machine/db_machdep.h>
86 #include <ddb/db_extern.h>
87 #endif
88
89 #if defined(KGDB)
90 #include <sys/kgdb.h>
91 #endif
92
93 #if defined(IPKDB)
94 #include <ipkdb/ipkdb.h>
95 #endif
96
97 #include <machine/powerpc.h>
98 #include <powerpc/spr.h>
99 #include <machine/trap.h>
100
101 /*
102 * Global variables used here and there
103 */
104 extern struct user *proc0paddr;
105 paddr_t msgbuf_paddr;
106 vaddr_t msgbuf_vaddr;
107 char msgbuf[MSGBUFSIZE];
108
109 /*
110 * ibm4xx_init:
111 */
112 void
113 ibm4xx_init(void (*handler)(void))
114 {
115 extern int defaulttrap, defaultsize;
116 extern int sctrap, scsize;
117 extern int alitrap, alisize;
118 extern int dsitrap, dsisize;
119 extern int isitrap, isisize;
120 extern int mchktrap, mchksize;
121 extern int tlbimiss4xx, tlbim4size;
122 extern int tlbdmiss4xx, tlbdm4size;
123 extern int pitfitwdog, pitfitwdogsize;
124 extern int debugtrap, debugsize;
125 extern int errata51handler, errata51size;
126 #ifdef DDB
127 extern int ddblow, ddbsize;
128 #endif
129 #ifdef IPKDB
130 extern int ipkdblow, ipkdbsize;
131 #endif
132 uintptr_t exc;
133 struct cpu_info * const ci = curcpu();
134
135 /* Initialize cache info for memcpy, etc. */
136 cpu_probe_cache();
137
138 /*
139 * Initialize lwp0 and current pcb and pmap pointers.
140 */
141 KASSERT(ci != NULL);
142 KASSERT(curcpu() == ci);
143 lwp0.l_cpu = ci;
144 lwp0.l_addr = proc0paddr;
145 memset(lwp0.l_addr, 0, sizeof *lwp0.l_addr);
146 KASSERT(lwp0.l_cpu != NULL);
147
148 curpcb = lwp_getpcb(&lwp0);
149 memset(curpcb, 0, sizeof(*curpcb));
150 curpcb->pcb_pm = pmap_kernel();
151
152 /*
153 * Set up trap vectors
154 */
155 for (exc = EXC_RSVD; exc <= EXC_LAST; exc += 0x100)
156 switch (exc) {
157 default:
158 memcpy((void *)exc, &defaulttrap, (size_t)&defaultsize);
159 break;
160 case EXC_EXI:
161 /*
162 * This one is (potentially) installed during autoconf
163 */
164 break;
165 case EXC_SC:
166 memcpy((void *)EXC_SC, &sctrap, (size_t)&scsize);
167 break;
168 case EXC_ALI:
169 memcpy((void *)EXC_ALI, &alitrap, (size_t)&alisize);
170 break;
171 case EXC_DSI:
172 memcpy((void *)EXC_DSI, &dsitrap, (size_t)&dsisize);
173 break;
174 case EXC_ISI:
175 memcpy((void *)EXC_ISI, &isitrap, (size_t)&isisize);
176 break;
177 case EXC_MCHK:
178 memcpy((void *)EXC_MCHK, &mchktrap, (size_t)&mchksize);
179 break;
180 case EXC_ITMISS:
181 memcpy((void *)EXC_ITMISS, &tlbimiss4xx,
182 (size_t)&tlbim4size);
183 break;
184 case EXC_DTMISS:
185 memcpy((void *)EXC_DTMISS, &tlbdmiss4xx,
186 (size_t)&tlbdm4size);
187 break;
188 /*
189 * EXC_PIT, EXC_FIT, EXC_WDOG handlers
190 * are spaced by 0x10 bytes only..
191 */
192 case EXC_PIT:
193 memcpy((void *)EXC_PIT, &pitfitwdog,
194 (size_t)&pitfitwdogsize);
195 break;
196 case EXC_DEBUG:
197 memcpy((void *)EXC_DEBUG, &debugtrap,
198 (size_t)&debugsize);
199 break;
200 case EXC_DTMISS|EXC_ALI:
201 /* PPC405GP Rev D errata item 51 */
202 memcpy((void *)(EXC_DTMISS|EXC_ALI), &errata51handler,
203 (size_t)&errata51size);
204 break;
205 #if defined(DDB) || defined(IPKDB)
206 case EXC_PGM:
207 #if defined(DDB)
208 memcpy((void *)exc, &ddblow, (size_t)&ddbsize);
209 #elif defined(IPKDB)
210 memcpy((void *)exc, &ipkdblow, (size_t)&ipkdbsize);
211 #endif
212 #endif /* DDB | IPKDB */
213 break;
214 }
215
216 __syncicache((void *)EXC_RST, EXC_LAST - EXC_RST + 0x100);
217 mtspr(SPR_EVPR, 0); /* Set Exception vector base */
218
219 consinit();
220
221 /* Handle trap instruction as PGM exception */
222 {
223 int dbcr0;
224 __asm volatile("mfspr %0,%1":"=r"(dbcr0):"K"(SPR_DBCR0));
225 __asm volatile("mtspr %0,%1"::"K"(SPR_DBCR0),"r"(dbcr0 & ~DBCR0_TDE));
226 }
227
228 /*
229 * external interrupt handler install
230 */
231 if (handler)
232 ibm4xx_install_extint(handler);
233
234 /*
235 * Now enable translation (and machine checks/recoverable interrupts).
236 */
237 __asm volatile ("mfmsr %0; ori %0,%0,%1; mtmsr %0; isync"
238 : : "r"(0), "K"(PSL_IR|PSL_DR));
239 /* XXXX PSL_ME - With ME set kernel gets stuck... */
240
241 KASSERT(curcpu() == ci);
242 }
243
244 void
245 ibm4xx_install_extint(void (*handler)(void))
246 {
247 extern int extint, extsize;
248 extern u_long extint_call;
249 u_long offset = (u_long)handler - (u_long)&extint_call;
250 int msr;
251
252 #ifdef DIAGNOSTIC
253 if (offset > 0x1ffffff)
254 panic("install_extint: too far away");
255 #endif
256 __asm volatile ("mfmsr %0; wrteei 0" : "=r"(msr));
257 extint_call = (extint_call & 0xfc000003) | offset;
258 memcpy((void *)EXC_EXI, &extint, (size_t)&extsize);
259 __syncicache((void *)&extint_call, sizeof extint_call);
260 __syncicache((void *)EXC_EXI, (int)&extsize);
261 __asm volatile ("mtmsr %0" :: "r"(msr));
262 }
263
264 /*
265 * ibm4xx_cpu_startup:
266 * Machine dependent startup code.
267 */
268 void
269 ibm4xx_cpu_startup(const char *model)
270 {
271 vaddr_t minaddr, maxaddr;
272 char pbuf[9];
273
274 KASSERT(curcpu() != NULL);
275 KASSERT(lwp0.l_cpu != NULL);
276 KASSERT(curcpu()->ci_intstk != 0);
277 KASSERT(curcpu()->ci_intrdepth == -1);
278
279 /*
280 * Initialize error message buffer (at end of core).
281 */
282 #if 0 /* For some reason this fails... --Artem
283 * Besides, do we really have to put it at the end of core?
284 * Let's use static buffer for now
285 */
286 if (!(msgbuf_vaddr = uvm_km_alloc(kernel_map, round_page(MSGBUFSIZE),
287 0, UVM_KMF_VAONLY)))
288 panic("startup: no room for message buffer");
289 for (i = 0; i < btoc(MSGBUFSIZE); i++)
290 pmap_kenter_pa(msgbuf_vaddr + i * PAGE_SIZE,
291 msgbuf_paddr + i * PAGE_SIZE,
292 VM_PROT_READ|VM_PROT_WRITE, 0);
293 initmsgbuf((void *)msgbuf_vaddr, round_page(MSGBUFSIZE));
294 #else
295 initmsgbuf((void *)msgbuf, round_page(MSGBUFSIZE));
296 #endif
297
298 printf("%s%s", copyright, version);
299 if (model != NULL)
300 printf("Model: %s\n", model);
301
302 format_bytes(pbuf, sizeof(pbuf), ctob(physmem));
303 printf("total memory = %s\n", pbuf);
304
305 minaddr = 0;
306 /*
307 * Allocate a submap for physio
308 */
309 phys_map = uvm_km_suballoc(kernel_map, &minaddr, &maxaddr,
310 VM_PHYS_SIZE, 0, false, NULL);
311
312 /*
313 * No need to allocate an mbuf cluster submap. Mbuf clusters
314 * are allocated via the pool allocator, and we use direct-mapped
315 * pool pages.
316 */
317
318 format_bytes(pbuf, sizeof(pbuf), ptoa(uvmexp.free));
319 printf("avail memory = %s\n", pbuf);
320 }
321
322 /*
323 * ibm4xx_dumpsys:
324 * Crash dump handling.
325 */
326 void
327 ibm4xx_dumpsys(void)
328 {
329
330 printf("dumpsys: TBD\n");
331 }
332