machdep.c revision 1.12 1 /* $NetBSD: machdep.c,v 1.12 2009/11/27 03:23:08 rmind Exp $ */
2
3 /*
4 * Copyright (c) 2006 Jachym Holecek
5 * All rights reserved.
6 *
7 * Written for DFC Design, s.r.o.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 *
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 *
16 * 2. Redistributions in binary form must reproduce the above copyright
17 * notice, this list of conditions and the following disclaimer in the
18 * documentation and/or other materials provided with the distribution.
19 *
20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
21 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
22 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
23 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
24 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
25 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
26 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
27 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
28 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
29 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
30 */
31
32 /*
33 * Based on Walnut and Explora.
34 */
35
36 #include <sys/cdefs.h>
37 __KERNEL_RCSID(0, "$NetBSD: machdep.c,v 1.12 2009/11/27 03:23:08 rmind Exp $");
38
39 #include "opt_compat_netbsd.h"
40 #include "opt_ddb.h"
41 #include "opt_ipkdb.h"
42 #include "opt_modular.h"
43 #include "opt_virtex.h"
44 #include "opt_kgdb.h"
45
46 #include <sys/param.h>
47 #include <sys/buf.h>
48 #include <sys/exec.h>
49 #include <sys/malloc.h>
50 #include <sys/mbuf.h>
51 #include <sys/mount.h>
52 #include <sys/msgbuf.h>
53 #include <sys/proc.h>
54 #include <sys/reboot.h>
55 #include <sys/syscallargs.h>
56 #include <sys/syslog.h>
57 #include <sys/systm.h>
58 #include <sys/kernel.h>
59 #include <sys/boot_flag.h>
60 #include <sys/ksyms.h>
61 #include <sys/device.h>
62
63 #include <uvm/uvm_extern.h>
64
65 #include <net/netisr.h>
66
67 #include <dev/cons.h>
68
69 #include <machine/bus.h>
70 #include <machine/powerpc.h>
71 #include <machine/trap.h>
72
73 #include <powerpc/spr.h>
74
75 #include <evbppc/virtex/dcr.h>
76 #include <evbppc/virtex/virtex.h>
77
78 #include "ksyms.h"
79
80 #if defined(DDB)
81 #include <machine/db_machdep.h>
82 #include <ddb/db_extern.h>
83 #endif
84
85 #if defined(KGDB)
86 #include <sys/kgdb.h>
87 #endif
88
89 /*
90 * Global variables used here and there
91 */
92 struct vm_map *mb_map = NULL;
93 struct vm_map *phys_map = NULL;
94
95 /*
96 * This should probably be in autoconf! XXX
97 */
98 char cpu_model[80];
99 char machine[] = MACHINE; /* from <machine/param.h> */
100 char machine_arch[] = MACHINE_ARCH; /* from <machine/param.h> */
101
102 char bootpath[256];
103 paddr_t msgbuf_paddr;
104 vaddr_t msgbuf_vaddr;
105
106 #if NKSYMS || defined(DDB) || defined(MODULAR)
107 void *startsym, *endsym;
108 #endif
109
110 int lcsplx(int);
111 void initppc(u_int, u_int);
112
113 static void dumpsys(void);
114 static void install_extint(void (*)(void));
115 static void trapcpy(int, void *, size_t);
116
117
118 /* These two live in powerpc/powerpc/trap_subr.S */
119 extern int extint, extsize;
120 extern u_long extint_call;
121
122 extern int defaulttrap, defaultsize;
123 extern int sctrap, scsize;
124 extern int alitrap, alisize;
125 extern int dsitrap, dsisize;
126 extern int isitrap, isisize;
127 extern int mchktrap, mchksize;
128 extern int tlbimiss4xx, tlbim4size;
129 extern int tlbdmiss4xx, tlbdm4size;
130 extern int pitfitwdog, pitfitwdogsize;
131 extern int debugtrap, debugsize;
132 extern int errata51handler, errata51size;
133 #ifdef DDB
134 extern int ddblow, ddbsize;
135 #endif
136 #ifdef IPKDB
137 extern int ipkdblow, ipkdbsize;
138 #endif
139
140 /* BSS segment start & end. */
141 extern char edata[], end[];
142
143 /* One region holds all memory, the other is terminator expected by 405 pmap. */
144 #define MEMREGIONS 2
145 struct mem_region physmemr[MEMREGIONS];
146 struct mem_region availmemr[MEMREGIONS];
147
148 static struct {
149 int vector;
150 void *addr;
151 void *size;
152 } traps[] = {
153 /* EXC_EXI handled by install_extint(). */
154 { EXC_SC, &sctrap, &scsize },
155 { EXC_ALI, &alitrap, &alisize },
156 { EXC_DSI, &dsitrap, &dsisize },
157 { EXC_ISI, &isitrap, &isisize },
158 { EXC_MCHK, &mchktrap, &mchksize },
159 { EXC_ITMISS, &tlbimiss4xx, &tlbim4size },
160 { EXC_DTMISS, &tlbdmiss4xx, &tlbdm4size },
161
162 /* EXC_{PIT, FIT, WDOG} handlers are spaced by 0x10 bytes only.. */
163 { EXC_PIT, &pitfitwdog, &pitfitwdogsize },
164 { EXC_DEBUG, &debugtrap, &debugsize },
165
166 /* PPC405GP Rev D errata item 51 */
167 { EXC_DTMISS|EXC_ALI, &errata51handler, &errata51size },
168
169 #if defined(DDB)
170 { EXC_PGM, &ddblow, &ddbsize },
171 #elif defined(IPKDB)
172 { EXC_PGM, &ipkdblow, &ipkdbsize },
173 #endif
174 };
175
176 /* Maximum TLB page size. */
177 #define TLB_PG_SIZE (16*1024*1024)
178
179 void
180 initppc(u_int startkernel, u_int endkernel)
181 {
182 struct cpu_info * const ci = curcpu();
183 u_int addr, memsize;
184 int exc, dbcr0, i;
185
186 /* Initialize cache info for memcpy, memset, etc. */
187 cpu_probe_cache();
188
189 memset(physmemr, 0, sizeof(physmemr)); /* [1].size = 0 */
190 memset(availmemr, 0, sizeof(availmemr)); /* [1].size = 0 */
191
192 memsize = (PHYSMEM * 1024 * 1024) & ~PGOFSET;
193
194 physmemr[0].start = 0;
195 physmemr[0].size = memsize;
196
197 availmemr[0].start = startkernel;
198 availmemr[0].size = memsize - availmemr[0].start;
199
200 /* Map kernel memory linearly. */
201 for (addr = 0; addr < endkernel; addr += TLB_PG_SIZE)
202 ppc4xx_tlb_reserve(addr, addr, TLB_PG_SIZE, TLB_EX);
203
204 /* Give design-specific code a hint for reserved mappings. */
205 virtex_machdep_init(roundup(memsize, TLB_PG_SIZE), TLB_PG_SIZE,
206 physmemr, availmemr);
207
208 lwp0.l_cpu = ci;
209
210 curpcb = lwp_getpcb(&lwp0);
211 memset(curpcb, 0, sizeof(struct pcb));
212 curpcb->pcb_pm = pmap_kernel();
213
214 for (exc = EXC_RSVD; exc <= EXC_LAST; exc += 0x100)
215 trapcpy(exc, &defaulttrap, (size_t)&defaultsize);
216
217 for (i = 0; i < __arraycount(traps); i++)
218 trapcpy(traps[i].vector, traps[i].addr, (size_t)traps[i].size);
219
220 __syncicache((void *)EXC_RST, EXC_LAST - EXC_RST + 0x100);
221
222 /* set exception vector base */
223 mtspr(SPR_EVPR, 0);
224
225 /* handle trap instruction as PGM exception */
226 dbcr0 = mfspr(SPR_DBCR0) & ~DBCR0_TDE;
227 mtspr(SPR_DBCR0, dbcr0);
228
229 install_extint(ext_intr);
230
231 /* enable translation */
232 __asm volatile (
233 " mfmsr %0 \n"
234 " ori %0,%0,%1 \n"
235 " mtmsr %0 \n"
236 " sync \n"
237 " isync \n"
238 : : "r"(0), "K"(PSL_IR | PSL_DR | PSL_ME));
239
240 /* now that we enabled MMU, we can map console */
241 consinit();
242
243 uvm_setpagesize();
244 pmap_bootstrap(startkernel, endkernel);
245
246 #if NKSYMS || defined(DDB) || defined(MODULAR)
247 ksyms_addsyms_elf((int)((u_int)endsym - (u_int)startsym), startsym, endsym);
248 #endif
249 #ifdef DDB
250 if (boothowto & RB_KDB)
251 Debugger();
252 #endif
253 #ifdef IPKDB
254 /*
255 * Now trap to IPKDB
256 */
257 ipkdb_init();
258 if (boothowto & RB_KDB)
259 ipkdb_connect(0);
260 #endif
261 #ifdef KGDB
262 /*
263 * Now trap to KGDB
264 */
265 kgdb_connect(1);
266 #endif /* KGDB */
267 }
268
269 /*
270 * trapcpy:
271 *
272 * Install a trap vector. We cannot use memcpy because the
273 * destination may be zero. Borrowed from Explora.
274 */
275 static void
276 trapcpy(int dest, void *src, size_t len)
277 {
278 uint32_t *dest_p = (void *)dest;
279 uint32_t *src_p = src;
280
281 while (len > 0) {
282 *dest_p++ = *src_p++;
283 len -= sizeof(uint32_t);
284 }
285 }
286
287 static void
288 install_extint(void (*handler)(void))
289 {
290 u_long offset = (u_long)handler - (u_long)&extint_call;
291
292 #ifdef DIAGNOSTIC
293 if (offset > 0x1ffffff)
294 panic("install_extint: too far away");
295 #endif
296
297 /* Patch branch target in EXC_EXI handler. */
298 extint_call = (extint_call & 0xfc000003) | offset;
299
300 memcpy((void *)EXC_EXI, &extint, (size_t)&extsize);
301 __syncicache((void *)&extint_call, sizeof(extint_call));
302 __syncicache((void *)EXC_EXI, (int)&extsize);
303 }
304
305 /*
306 * Machine dependent startup code.
307 */
308
309 char msgbuf[MSGBUFSIZE];
310
311 void
312 cpu_startup(void)
313 {
314 /* For use by propdb. */
315 static u_int memsize = PHYSMEM * 1024 * 1024;
316 static u_int cpuspeed = CPUFREQ * 1000 * 1000;
317 prop_number_t pn;
318
319 vaddr_t minaddr, maxaddr;
320 char pbuf[9];
321
322 curcpu()->ci_khz = cpuspeed / 1000;
323
324 /* Initialize error message buffer. */
325 initmsgbuf((void *)msgbuf, round_page(MSGBUFSIZE));
326
327 printf("%s%s", copyright, version);
328
329 format_bytes(pbuf, sizeof(pbuf), ctob(physmem));
330 printf("total memory = %s\n", pbuf);
331
332 minaddr = 0;
333 /*
334 * Allocate a submap for physio
335 */
336 phys_map = uvm_km_suballoc(kernel_map, &minaddr, &maxaddr,
337 VM_PHYS_SIZE, 0, false, NULL);
338
339 /*
340 * No need to allocate an mbuf cluster submap. Mbuf clusters
341 * are allocated via the pool allocator, and we use direct-mapped
342 * pool pages.
343 */
344
345 format_bytes(pbuf, sizeof(pbuf), ptoa(uvmexp.free));
346 printf("avail memory = %s\n", pbuf);
347
348 /*
349 * Set up the board properties database.
350 */
351 board_info_init();
352
353 pn = prop_number_create_integer(memsize);
354 KASSERT(pn != NULL);
355 if (prop_dictionary_set(board_properties, "mem-size", pn) == false)
356 panic("setting mem-size");
357 prop_object_release(pn);
358
359 pn = prop_number_create_integer(cpuspeed);
360 KASSERT(pn != NULL);
361 if (prop_dictionary_set(board_properties, "processor-frequency",
362 pn) == false)
363 panic("setting processor-frequency");
364 prop_object_release(pn);
365
366 /*
367 * Now that we have VM, malloc()s are OK in bus_space.
368 */
369 bus_space_mallocok();
370 fake_mapiodev = 0;
371 }
372
373
374 static void
375 dumpsys(void)
376 {
377 printf("dumpsys: TBD\n");
378 }
379
380 /* Hook used by 405 pmap module. */
381 void
382 mem_regions(struct mem_region **mem, struct mem_region **avail)
383 {
384 *mem = physmemr;
385 *avail = availmemr;
386 }
387
388 /*
389 * Halt or reboot the machine after syncing/dumping according to howto.
390 */
391 void
392 cpu_reboot(int howto, char *what)
393 {
394 static int syncing;
395 static char str[256];
396 char *ap = str, *ap1 = ap;
397
398 boothowto = howto;
399 if (!cold && !(howto & RB_NOSYNC) && !syncing) {
400 syncing = 1;
401 vfs_shutdown(); /* sync */
402 resettodr(); /* set wall clock */
403 }
404
405 splhigh();
406
407 if (!cold && (howto & RB_DUMP))
408 dumpsys();
409
410 doshutdownhooks();
411
412 pmf_system_shutdown(boothowto);
413
414 if ((howto & RB_POWERDOWN) == RB_POWERDOWN) {
415 /* Power off here if we know how...*/
416 }
417
418 if (howto & RB_HALT) {
419 printf("halted\n\n");
420
421 goto reboot; /* XXX for now... */
422
423 #ifdef DDB
424 printf("dropping to debugger\n");
425 while(1)
426 Debugger();
427 #endif
428 #ifdef KGDB
429 printf("dropping to kgdb\n");
430 while(1)
431 kgdb_connect(1);
432 #endif
433 }
434
435 printf("rebooting\n\n");
436 if (what && *what) {
437 if (strlen(what) > sizeof str - 5)
438 printf("boot string too large, ignored\n");
439 else {
440 strcpy(str, what);
441 ap1 = ap = str + strlen(str);
442 *ap++ = ' ';
443 }
444 }
445 *ap++ = '-';
446 if (howto & RB_SINGLE)
447 *ap++ = 's';
448 if (howto & RB_KDB)
449 *ap++ = 'd';
450 *ap++ = 0;
451 if (ap[-2] == '-')
452 *ap1 = 0;
453
454 /* flush cache for msgbuf */
455 __syncicache((void *)msgbuf_paddr, round_page(MSGBUFSIZE));
456
457 reboot:
458 ppc4xx_reset();
459
460 printf("ppc4xx_reset() failed!\n");
461 #ifdef DDB
462 while(1)
463 Debugger();
464 #endif
465 #ifdef KGDB
466 while(1)
467 kgdb_connect(1);
468 #else
469 while (1)
470 /* nothing */;
471 #endif
472 }
473
474 int
475 lcsplx(int ipl)
476 {
477 return spllower(ipl); /* XXX */
478 }
479