root/sys/arch/evbsh3/evbsh3/locore.S
/*      $NetBSD: locore.S,v 1.16 2023/09/29 06:09:20 andvar Exp $       */

/*-
 * Copyright (c) 1990 The Regents of the University of California.
 * All rights reserved.
 *
 * This code is derived from software contributed to Berkeley by
 * William Jolitz.
 *
 * 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. Neither the name of the University nor the names of its contributors
 *    may be used to endorse or promote products derived from this software
 *    without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``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 REGENTS OR CONTRIBUTORS 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.
 *
 *      @(#)locore.s    7.3 (Berkeley) 5/13/91
 */

/*-
 * Copyright (c) 1993, 1994, 1995, 1997
 *      Charles M. Hannum.  All rights reserved.
 *
 * This code is derived from software contributed to Berkeley by
 * William Jolitz.
 *
 * 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 the University of
 *      California, Berkeley and its contributors.
 * 4. Neither the name of the University nor the names of its contributors
 *    may be used to endorse or promote products derived from this software
 *    without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``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 REGENTS OR CONTRIBUTORS 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.
 *
 *      @(#)locore.s    7.3 (Berkeley) 5/13/91
 */

#include "opt_cputype.h"
#include "opt_memsize.h"
#include "assym.h"

#if defined(SH3) && defined(SH4)
#error "evbsh3 port don't support SH3,SH4 common kernel."
#endif

#include <sh3/asm.h>
#include <sh3/cache_sh3.h>
#include <sh3/cache_sh4.h>
#include <sh3/exception.h>
#include <sh3/locore.h>
#include <sh3/mmu_sh3.h>
#include <sh3/mmu_sh4.h>
#include <sh3/psl.h>

#define INIT_STACK                                                      \
        ((IOM_RAM_BEGIN + IOM_RAM_SIZE - 0x00001000) | 0x80000000)

NENTRY(start)
ALTENTRY(kernel_text)
        /* Set SP to initial position */
        mov.l   XLtmpstk, r15

        /* Set Status Register */
        mov.l   SR_init, r0
        ldc     r0, sr

        /* MMU off */
        xor     r0, r0
        MOV     (MMUCR, r2)
        mov.l   r0, @r2

        bra     start1
        nop
        .align  2
SR_init:        .long   PSL_MD | PSL_BL | PSL_IMASK
REG_SYMBOL(MMUCR)
start1:

#ifdef ROMIMAGE
        /* Initialize BUS State Control Regs. */
        mov.l   _ROM_START, r3
        mov.l   XL_ram_start, r4
        mov.l   @r4, r4
        sub     r3, r4
        /* Set Bus State Controller */
        mov.l   XLInitializeBsc, r0
        sub     r4, r0
        jsr     @r0
        nop

        /* Move kernel image from ROM area to RAM area */
        mov.l   ___end, r0
        mov.l   ___start, r1
        mov.l   _KERNBASE, r2
        sub     r2, r0
        sub     r2, r1
        sub     r1, r0
        add     #4, r0          /* size of bytes to be copied */
        shlr2   r0              /* number of long word */
        mov.l   _ROM_START, r3
        add     r3, r1          /* src address */
        mov.l   ___start, r3
        sub     r2, r3
        mov.l   XL_ram_start, r4
        mov.l   @r4, r4
        add     r4, r3          /* dest address */
1:
        mov.l   @r1+, r4
        mov.l   r4, @r3
        add     #4, r3
        dt      r0              /* decrement and Test */
        bf      1b
        /* kernel image copy end */

        mov.l   LXstart_in_RAM, r0
        jmp     @r0             /* jump to RAM area */
        nop

        .align  2
LXstart_in_RAM:
        .long   start_in_RAM
XL_ram_start:
        .long   _C_LABEL(ram_start)
#else /* ROMIMAGE */
#ifndef DONT_INIT_BSC
        /* Set Bus State Controller */
        mov.l   XLInitializeBsc, r0
        jsr     @r0
        nop
#endif /* !DONT_INIT_BSC */
#endif /* ROMIMAGE */

start_in_RAM:
        mova    1f, r0
        mov     r0, r4
        mov.l   XLinitSH3, r0
        jsr     @r0             /* call initSH3() */
        nop

        .align  2
1:

#ifdef SH4
        /* CCR must be accessed from P2 area */
        mova    cache_on, r0
        mov     r0, r5
        mov.l   XLtoP2, r1
        add     r1, r5
        mova    main_label, r0
        mov     r0, r2
        MOV     (CCR, r3)
        mov.l   XL_CCRVAL, r4
        jmp     @r5
        nop

        .align  2
cache_on:
        mov.l   r4, @r3 /* Write to CCR */
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        jmp @r2
        nop

        .align  2
main_label:
#endif /* SH4 */
        mov.l   XLmain, r0
        jsr     @r0             /* call main() */
        nop

                .align  2

#ifndef DONT_INIT_BSC
XLInitializeBsc:.long   _C_LABEL(InitializeBsc)
#endif /* DONT_INIT_BSC */
___start:       .long   start
___etext:       .long   _C_LABEL(etext)
___end:         .long   _C_LABEL(end)
XLtmpstk:       .long   INIT_STACK
_KERNBASE:      .long   0x8c000000
#ifdef ROMIMAGE
_ROM_START:     .long   IOM_ROM_BEGIN
#endif
XLinitSH3:      .long   _C_LABEL(initSH3)
XLmain:         .long   _C_LABEL(main)
XLtoP2:         .long   0x20000000
REG_SYMBOL(CCR)
#ifdef SH4      /* invalidate and enable instruction and operand caches */
XL_CCRVAL:      .long   SH4_CCR_ICI | SH4_CCR_ICE | SH4_CCR_OCI | SH4_CCR_OCE
#endif /* SH4 */

load_and_reset:
        mov.l   XL_start_address, r0
        mov     r0, r8
        mov.l   @r4+, r1        /* r1 = osimage size */
        mov.l   @r4+, r2        /* r2 = check sum */
        shlr2   r1              /* r1 = osimage size in dword */
1:
        mov.l   @r4+, r3
        mov.l   r3, @r0
        add     #4, r0
        dt      r1
        bf      1b

        jmp     @r8             /* jump to start address */
        nop

        .align  2
XL_start_address:
        .long   IOM_RAM_BEGIN + 0x00010000
load_and_reset_end:

ENTRY(XLoadAndReset)
        __INTR_MASK(r0, r1)
        /* copy trampoline code to RAM area top */
        mov.l   XL_load_and_reset, r0
        mov.l   XL_load_and_reset_end, r1
        mov.l   XL_load_trampoline_addr, r2
        mov     r2, r8
        sub     r0, r1          /* r1 = bytes to be copied */
1:      mov.b   @r0+, r3
        mov.b   r3, @r2
        add     #1, r2
        dt      r1
        bf      1b

        jmp     @r8             /* jump to trampoline code */
        nop

        .align  2
XL_load_trampoline_addr:
        .long   IOM_RAM_BEGIN + 0x00008000
XL_load_and_reset:
        .long   load_and_reset
XL_load_and_reset_end:
        .long   load_and_reset_end