ibm4xx_machdep.c revision 1.7.44.2 1 /* $NetBSD: ibm4xx_machdep.c,v 1.7.44.2 2010/03/11 15:02:49 yamt 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.7.44.2 2010/03/11 15:02:49 yamt 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 <powerpc/ibm4xx/spr.h>
100 #include <machine/trap.h>
101
102 /*
103 * Global variables used here and there
104 */
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
145 curpcb = lwp_getpcb(&lwp0);
146 memset(curpcb, 0, sizeof(struct pcb));
147
148 curpcb->pcb_pm = pmap_kernel();
149
150 /*
151 * Set up trap vectors
152 */
153 for (exc = EXC_RSVD; exc <= EXC_LAST; exc += 0x100)
154 switch (exc) {
155 default:
156 memcpy((void *)exc, &defaulttrap, (size_t)&defaultsize);
157 break;
158 case EXC_EXI:
159 /*
160 * This one is (potentially) installed during autoconf
161 */
162 break;
163 case EXC_SC:
164 memcpy((void *)EXC_SC, &sctrap, (size_t)&scsize);
165 break;
166 case EXC_ALI:
167 memcpy((void *)EXC_ALI, &alitrap, (size_t)&alisize);
168 break;
169 case EXC_DSI:
170 memcpy((void *)EXC_DSI, &dsitrap, (size_t)&dsisize);
171 break;
172 case EXC_ISI:
173 memcpy((void *)EXC_ISI, &isitrap, (size_t)&isisize);
174 break;
175 case EXC_MCHK:
176 memcpy((void *)EXC_MCHK, &mchktrap, (size_t)&mchksize);
177 break;
178 case EXC_ITMISS:
179 memcpy((void *)EXC_ITMISS, &tlbimiss4xx,
180 (size_t)&tlbim4size);
181 break;
182 case EXC_DTMISS:
183 memcpy((void *)EXC_DTMISS, &tlbdmiss4xx,
184 (size_t)&tlbdm4size);
185 break;
186 /*
187 * EXC_PIT, EXC_FIT, EXC_WDOG handlers
188 * are spaced by 0x10 bytes only..
189 */
190 case EXC_PIT:
191 memcpy((void *)EXC_PIT, &pitfitwdog,
192 (size_t)&pitfitwdogsize);
193 break;
194 case EXC_DEBUG:
195 memcpy((void *)EXC_DEBUG, &debugtrap,
196 (size_t)&debugsize);
197 break;
198 case EXC_DTMISS|EXC_ALI:
199 /* PPC405GP Rev D errata item 51 */
200 memcpy((void *)(EXC_DTMISS|EXC_ALI), &errata51handler,
201 (size_t)&errata51size);
202 break;
203 #if defined(DDB) || defined(IPKDB)
204 case EXC_PGM:
205 #if defined(DDB)
206 memcpy((void *)exc, &ddblow, (size_t)&ddbsize);
207 #elif defined(IPKDB)
208 memcpy((void *)exc, &ipkdblow, (size_t)&ipkdbsize);
209 #endif
210 #endif /* DDB | IPKDB */
211 break;
212 }
213
214 __syncicache((void *)EXC_RST, EXC_LAST - EXC_RST + 0x100);
215 mtspr(SPR_EVPR, 0); /* Set Exception vector base */
216
217 consinit();
218
219 /* Handle trap instruction as PGM exception */
220 {
221 int dbcr0;
222 __asm volatile("mfspr %0,%1":"=r"(dbcr0):"K"(SPR_DBCR0));
223 __asm volatile("mtspr %0,%1"::"K"(SPR_DBCR0),"r"(dbcr0 & ~DBCR0_TDE));
224 }
225
226 /*
227 * external interrupt handler install
228 */
229 if (handler)
230 ibm4xx_install_extint(handler);
231
232 /*
233 * Now enable translation (and machine checks/recoverable interrupts).
234 */
235 __asm volatile ("mfmsr %0; ori %0,%0,%1; mtmsr %0; isync"
236 : : "r"(0), "K"(PSL_IR|PSL_DR));
237 /* XXXX PSL_ME - With ME set kernel gets stuck... */
238
239 KASSERT(curcpu() == ci);
240 }
241
242 void
243 ibm4xx_install_extint(void (*handler)(void))
244 {
245 extern int extint, extsize;
246 extern u_long extint_call;
247 u_long offset = (u_long)handler - (u_long)&extint_call;
248 int msr;
249
250 #ifdef DIAGNOSTIC
251 if (offset > 0x1ffffff)
252 panic("install_extint: too far away");
253 #endif
254 __asm volatile ("mfmsr %0; wrteei 0" : "=r"(msr));
255 extint_call = (extint_call & 0xfc000003) | offset;
256 memcpy((void *)EXC_EXI, &extint, (size_t)&extsize);
257 __syncicache((void *)&extint_call, sizeof extint_call);
258 __syncicache((void *)EXC_EXI, (int)&extsize);
259 __asm volatile ("mtmsr %0" :: "r"(msr));
260 }
261
262 /*
263 * ibm4xx_cpu_startup:
264 * Machine dependent startup code.
265 */
266 void
267 ibm4xx_cpu_startup(const char *model)
268 {
269 vaddr_t minaddr, maxaddr;
270 char pbuf[9];
271
272 KASSERT(curcpu() != NULL);
273 KASSERT(lwp0.l_cpu != NULL);
274 KASSERT(curcpu()->ci_intstk != 0);
275 KASSERT(curcpu()->ci_intrdepth == -1);
276
277 /*
278 * Initialize error message buffer (at end of core).
279 */
280 #if 0 /* For some reason this fails... --Artem
281 * Besides, do we really have to put it at the end of core?
282 * Let's use static buffer for now
283 */
284 if (!(msgbuf_vaddr = uvm_km_alloc(kernel_map, round_page(MSGBUFSIZE),
285 0, UVM_KMF_VAONLY)))
286 panic("startup: no room for message buffer");
287 for (i = 0; i < btoc(MSGBUFSIZE); i++)
288 pmap_kenter_pa(msgbuf_vaddr + i * PAGE_SIZE,
289 msgbuf_paddr + i * PAGE_SIZE,
290 VM_PROT_READ|VM_PROT_WRITE, 0);
291 initmsgbuf((void *)msgbuf_vaddr, round_page(MSGBUFSIZE));
292 #else
293 initmsgbuf((void *)msgbuf, round_page(MSGBUFSIZE));
294 #endif
295
296 printf("%s%s", copyright, version);
297 if (model != NULL)
298 printf("Model: %s\n", model);
299
300 format_bytes(pbuf, sizeof(pbuf), ctob(physmem));
301 printf("total memory = %s\n", pbuf);
302
303 minaddr = 0;
304 /*
305 * Allocate a submap for physio
306 */
307 phys_map = uvm_km_suballoc(kernel_map, &minaddr, &maxaddr,
308 VM_PHYS_SIZE, 0, false, NULL);
309
310 /*
311 * No need to allocate an mbuf cluster submap. Mbuf clusters
312 * are allocated via the pool allocator, and we use direct-mapped
313 * pool pages.
314 */
315
316 format_bytes(pbuf, sizeof(pbuf), ptoa(uvmexp.free));
317 printf("avail memory = %s\n", pbuf);
318 }
319
320 /*
321 * ibm4xx_dumpsys:
322 * Crash dump handling.
323 */
324 void
325 ibm4xx_dumpsys(void)
326 {
327
328 printf("dumpsys: TBD\n");
329 }
330