Home | History | Annotate | Line # | Download | only in ibm4xx
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