/* $OpenBSD: locore.S,v 1.66 2009/09/20 19:17:47 miod Exp $ */ /* * Copyright (c) 2005, Miodrag Vallat. * Copyright (c) 1998 Steve Murphree, Jr. * Copyright (c) 1996 Nivas Madhur * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by Nivas Madhur. * 4. The name of the author may not be used to endorse or promote products * derived from this software without specific prior written permission * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. * */ /* * Mach Operating System * Copyright (c) 1993-1991 Carnegie Mellon University * Copyright (c) 1991 OMRON Corporation * All Rights Reserved. * * Permission to use, copy, modify and distribute this software and its * documentation is hereby granted, provided that both the copyright * notice and this permission notice appear in all copies of the * software, derivative works or modified versions, and any portions * thereof, and that both notices appear in supporting documentation. * * CARNEGIE MELLON AND OMRON ALLOW FREE USE OF THIS SOFTWARE IN ITS "AS IS" * CONDITION. CARNEGIE MELLON AND OMRON DISCLAIM ANY LIABILITY OF ANY KIND * FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE. * * Carnegie Mellon requests users of this software to return to * * Software Distribution Coordinator or Software.Distribution@CS.CMU.EDU * School of Computer Science * Carnegie Mellon University * Pittsburgh PA 15213-3890 * * any improvements or extensions that they make and grant Carnegie the * rights to redistribute these changes. */ #include "assym.h" #include "ksyms.h" #include #include #include #include #include #include /* * The memory looks like: * 0x00000 - 0x01000 trap vectors * 0x01000 - 0x10000 first 64k used by BUG * 0x10000 == start Boot loader jumps here. (for now, this can * handle only NMAGIC - screwy linker) */ text GLOBAL(kernelstart) GLOBAL(kernel_text) ASGLOBAL(start) /* * A few identical jump instructions to make sure the pipeline is * in a good state. Probably overkill, but it's cheap. */ br _ASM_LABEL(main_start) br _ASM_LABEL(main_start) br _ASM_LABEL(main_start) br _ASM_LABEL(main_start) /* * Startup code for main processor. */ ASLOCAL(main_start) /* * Save the arguments passed by the boot loader * r2 boot flags * r3 boot controller physical address * r4 esym (if applicable) * r5 start of miniroot (unused) * r6 end of miniroot (unused) * r7 ((Clun << 8) | Dlun): encoded bootdev * r8 board type (0x187, 0x188, 0x197) */ /* * (*entry)(flag, bugargs.ctrl_addr, cp, kernel.smini,kernel.emini, * bootdev, brdtyp); */ or.u r13, r0, hi16(_C_LABEL(boothowto)) st r2, r13, lo16(_C_LABEL(boothowto)) or.u r13, r0, hi16(_C_LABEL(bootaddr)) st r3, r13, lo16(_C_LABEL(bootaddr)) or.u r13, r0, hi16(_C_LABEL(first_addr)) st r4, r13, lo16(_C_LABEL(first_addr)) #if defined(DDB) || NKSYMS > 0 or.u r13, r0, hi16(_C_LABEL(esym)) st r4, r13, lo16(_C_LABEL(esym)) #endif or.u r13, r0, hi16(_C_LABEL(bootdev)) st r7, r13, lo16(_C_LABEL(bootdev)) or.u r13, r0, hi16(_C_LABEL(brdtyp)) st r8, r13, lo16(_C_LABEL(brdtyp)) /* set cputyp */ ldcr r1, PID extu r8, r1, 8<8> or.u r13, r0, hi16(_C_LABEL(cputyp)) st r8, r13, lo16(_C_LABEL(cputyp)) bsr _ASM_LABEL(setup_psr) stcr r0, VBR /* set Vector Base Register to 0, ALWAYS! */ FLUSH_PIPELINE #ifdef MULTIPROCESSOR /* * Have curcpu() point at the dummy cpuinfo structure, * so that cpu_number() does not dereference random memory. * This is necessary for early spl usage, despite the fact that * interrupts are disabled... */ or.u r11, r0, hi16(_ASM_LABEL(dummy_cpu)) or r11, r11, lo16(_ASM_LABEL(dummy_cpu)) stcr r11, CPU /* * MVME BUG idles all secondary MPUs upon startup, so at this point * we do not have to compete with them. */ #endif /* MULTIPROCESSOR */ /* Switch to startup stack */ or.u r31, r0, hi16(_ASM_LABEL(initstack_end)) or r31, r31, lo16(_ASM_LABEL(initstack_end)) #ifdef M88110 #ifdef M88100 cmp r2, r8, CPU_88110 bb1 ne, r2, 1f /* if it's a 'mc88110, use different vectors */ #endif or.u r3, r0, hi16(_C_LABEL(m88110_vector_list)) br.n 2f or r3, r3, lo16(_C_LABEL(m88110_vector_list)) 1: #endif /* M88110 */ #ifdef M88100 or.u r3, r0, hi16(_C_LABEL(vector_list)) or r3, r3, lo16(_C_LABEL(vector_list)) #endif /* M88100 */ 2: bsr.n _C_LABEL(mvme88k_vector_init) ldcr r2, VBR /* * mvme_bootstrap(), among other things, clears proc0's u area. * We are still using the interrupt stack here, thus we are not * affected... */ bsr _C_LABEL(mvme_bootstrap) /* * ...and we can switch to the u area stack now. */ ldcr r10, CPU ld r2, r10, CI_CURPCB /* call main() - no arguments although main() still defines one */ bsr.n _C_LABEL(main) addu r31, r2, USPACE #ifdef MULTIPROCESSOR /* * Startup code for secondary processors. * Some of these initializations are very close to main_start; refer * to the comments there for details. */ GLOBAL(secondary_start) or.u r31, r0, hi16(_ASM_LABEL(slavestack_end)) or r31, r31, lo16(_ASM_LABEL(slavestack_end)) bsr _ASM_LABEL(setup_psr) stcr r0, VBR /* set Vector Base Register to 0, ALWAYS! */ FLUSH_PIPELINE /* * Have curcpu() point at the dummy cpuinfo structure, * so that cpu_number() does not dereference random memory. * This is necessary for early spl usage, despite the fact that * interrupts are disabled... */ or.u r11, r0, hi16(_ASM_LABEL(dummy_cpu)) or r11, r11, lo16(_ASM_LABEL(dummy_cpu)) stcr r11, CPU /* * While holding the cpu_mutex, the secondary cpu can use the slavestack * to call secondary_pre_main() to determine its cpu number. * After that, however, it should allocate its own stack and switch * to it. */ bsr _C_LABEL(secondary_pre_main) /* set cpu number */ ldcr r1, CPU st r2, r1, CI_CURPCB /* save stack as curpcb for traps */ bsr.n _C_LABEL(secondary_main) addu r31, r2, USPACE /* switch to startup stack */ /* * Dummy mp_atomic_begin() and mp_atomic_end() routine, so that * we can interact with ddb if things go wrong very early during * bootstrap. Of course this should never happen (-: */ ASLOCAL(dummy_mplock) jmp r1 #endif /* MULTIPROCESSOR */ /* * Reset code. * Should be rewritten in C eventually. */ GLOBAL(doboot) #ifdef MVME188 /* check if it's a mvme188 */ or.u r4, r0, hi16(_C_LABEL(brdtyp)) ld r3, r4, lo16(_C_LABEL(brdtyp)) cmp r4, r3, BRD_188 bb1 ne, r4, 1f bsr _C_LABEL(m188_reset) br 8f 1: #endif /* MVME188 */ /* * Try hitting the SRST bit in VMEchip2 to reset the system. */ or.u r3, r0, 0xfff4 ld r4, r3, 0x0060 /* read offset (LCSR + 0x60) */ bb0.n 30, r4, 1f /* if not SYSCON, don't SYSRST */ set r4, r4, 1<23> /* set SYSRST bit - bit 23 */ st r4, r3, 0x0060 /* and store it back */ 1: /* * MVME197LE Errata #7: * ``When asserting the RST bit in the VMEchip2 GCSR, the pulse * generated is too short for the BusSwitch1 to recognize * properly.'' */ #ifdef MVME197 or.u r2, r0, hi16(0x20000) #endif ld r4, r3, 0x0104 /* try local reset, then... */ set r4, r4, 1<7> st r4, r3, 0x0104 #ifdef MVME197 bcnd.n ne0,r2, 1b /* ...for a while */ subu r2, r2, 1 #endif /* * We will be here if the reset above failed. In this case, * we will try to return to bug. * * Switch to interrupt stack and call _doboot to take care * going to BUG. Need to do this since _doboot turns off the * the MMU and we need to be on a 1-to-1 mapped stack so that * further calls don't get data access exceptions. */ 8: or.u r31, r0, hi16(_ASM_LABEL(initstack_end)) bsr.n _C_LABEL(_doboot) or r31, r31, lo16(_ASM_LABEL(initstack_end)) /*NOTREACHED*/ /* * MVME188 specific support routines */ #ifdef MVME188 /* * void m188_delay(int us) * * The processor loops (busy waits) for the given number of microseconds: * Thus, delay(1000000) will delay for one second. * (originally from Mach 2.5) */ GLOBAL(m188_delay) bcnd eq0, r2, 2f or.u r3, r0, hi16(_C_LABEL(m188_delay_const)) ld r3, r3, lo16(_C_LABEL(m188_delay_const)) mul r4, r2, r3 subu r4, r4, 4 /* overhead of these instructions */ /* now loop for the given number of cycles */ 1: bcnd.n gt0, r4, 1b subu r4, r4, 2 /* two cycles per iteration */ 2: jmp r1 #endif /*****************************************************************************/ data .align PAGE_SIZE GLOBAL(kernel_sdt) /* SDT (segment descriptor table */ space 0x2000 /* 8K - 4K phys, 4K virt*/ .align PAGE_SIZE ASGLOBAL(initstack) space USPACE ASGLOBAL(initstack_end) #ifdef MULTIPROCESSOR space PAGE_SIZE /* 4K, small, interim stack */ ASLOCAL(slavestack_end) #endif /* * Process 0's u. * Should be page aligned. */ .align PAGE_SIZE ASLOCAL(u0) space USPACE GLOBAL(proc0paddr) word _ASM_LABEL(u0) /* KVA of proc0 uarea */ #ifdef MULTIPROCESSOR /* Dummy cpuinfo structure, for cpu_number() to work early. */ ASLOCAL(dummy_cpu) word 3 /* CIF_ALIVE | CIF_PRIMARY */ /* ci_flags */ word 0 /* ci_curproc */ word 0 /* ci_curpcb */ word 0 /* ci_curpmap */ word 0 /* ci_cpuid */ word _ASM_LABEL(dummy_mplock) /* ci_mp_atomic_begin */ word _ASM_LABEL(dummy_mplock) /* ci_mp_atomic_end */ space CPU_INFO_SIZEOF - 7 * 4 #endif /* MULTIPROCESSOR */ #if defined(DDB) || NKSYMS > 0 GLOBAL(esym) word 0 #endif /* DDB || NKSYMS > 0 */