Subversion Repositories HelenOS

/*

 * Copyright (c) 2003-2004 Jakub Jermar

 * All rights reserved.

 *

 * Redistribution and use in source and binary forms, with or without

 * modification, are permitted provided that the following conditions

 * are met:

 *

 * - Redistributions of source code must retain the above copyright

 *   notice, this list of conditions and the following disclaimer.

 * - 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.

 * - 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.

 */

/** @addtogroup mips32

 * @{

 */

/** @file

 */

#include <arch.h>

#include <arch/cp0.h>

#include <arch/exception.h>

#include <mm/as.h>

#include <userspace.h>

#include <memstr.h>

#include <proc/thread.h>

#include <proc/uarg.h>

#include <print.h>

#include <console/console.h>

#include <syscall/syscall.h>

#include <sysinfo/sysinfo.h>

#include <arch/interrupt.h>

#include <console/chardev.h>

#include <arch/barrier.h>

#include <arch/debugger.h>

#include <genarch/fb/fb.h>

#include <genarch/fb/visuals.h>

#include <genarch/drivers/dsrln/dsrlnin.h>

#include <genarch/drivers/dsrln/dsrlnout.h>

#include <genarch/srln/srln.h>

#include <macros.h>

#include <config.h>

#include <string.h>

#include <arch/drivers/msim.h>

#include <arch/asm/regname.h>

/* Size of the code jumping to the exception handler code

 * - J+NOP

 */

#define EXCEPTION_JUMP_SIZE  8

#define TLB_EXC    ((char *) 0x80000000)

#define NORM_EXC   ((char *) 0x80000180)

#define CACHE_EXC  ((char *) 0x80000100)

/* Why the linker moves the variable 64K away in assembler

 * when not in .text section?

 */

/* Stack pointer saved when entering user mode */

uintptr_t supervisor_sp __attribute__ ((section (".text")));

size_t cpu_count = 0;

/** Performs mips32-specific initialization before main_bsp() is called. */

void arch_pre_main(void *entry __attribute__((unused)), bootinfo_t *bootinfo)

{

    /* Setup usermode */

    init.cnt = bootinfo->cnt;

    size_t i;

    for (i = 0; i < min3(bootinfo->cnt, TASKMAP_MAX_RECORDS, CONFIG_INIT_TASKS); i++) {

        init.tasks[i].addr = bootinfo->tasks[i].addr;

        init.tasks[i].size = bootinfo->tasks[i].size;

        str_cpy(init.tasks[i].name, CONFIG_TASK_NAME_BUFLEN,

            bootinfo->tasks[i].name);

    }

    for (i = 0; i < CPUMAP_MAX_RECORDS; i++) {

        if ((bootinfo->cpumap & (1 << i)) != 0)

            cpu_count++;

    }

}

void arch_pre_mm_init(void)

{

    /* It is not assumed by default */

    interrupts_disable();

    /* Initialize dispatch table */

    exception_init();

    /* Copy the exception vectors to the right places */

    memcpy(TLB_EXC, (char *) tlb_refill_entry, EXCEPTION_JUMP_SIZE);

    smc_coherence_block(TLB_EXC, EXCEPTION_JUMP_SIZE);

    memcpy(NORM_EXC, (char *) exception_entry, EXCEPTION_JUMP_SIZE);

    smc_coherence_block(NORM_EXC, EXCEPTION_JUMP_SIZE);

    memcpy(CACHE_EXC, (char *) cache_error_entry, EXCEPTION_JUMP_SIZE);

    smc_coherence_block(CACHE_EXC, EXCEPTION_JUMP_SIZE);

    /*

     * Switch to BEV normal level so that exception vectors point to the

     * kernel. Clear the error level.

     */

    cp0_status_write(cp0_status_read() &

        ~(cp0_status_bev_bootstrap_bit | cp0_status_erl_error_bit));

    /*

     * Mask all interrupts

     */

    cp0_mask_all_int();

    debugger_init();

}

void arch_post_mm_init(void)

{

    interrupt_init();

#ifdef CONFIG_FB

    /* GXemul framebuffer */

    fb_properties_t gxemul_prop = {

        .addr = 0x12000000,

        .offset = 0,

        .x = 640,

        .y = 480,

        .scan = 1920,

        .visual = VISUAL_BGR_8_8_8,

    };

    fb_init(&gxemul_prop);

#else

#ifdef CONFIG_MIPS_PRN

    dsrlnout_init((ioport8_t *) MSIM_KBD_ADDRESS);

#endif /* CONFIG_MIPS_PRN */

#endif /* CONFIG_FB */

}

void arch_post_cpu_init(void)

{

}

void arch_pre_smp_init(void)

{

}

void arch_post_smp_init(void)

{

#ifdef CONFIG_MIPS_KBD

    /*

     * Initialize the msim/GXemul keyboard port. Then initialize the serial line

     * module and connect it to the msim/GXemul keyboard. Enable keyboard interrupts.

     */

    dsrlnin_instance_t *dsrlnin_instance

        = dsrlnin_init((dsrlnin_t *) MSIM_KBD_ADDRESS, MSIM_KBD_IRQ);

    if (dsrlnin_instance) {

        srln_instance_t *srln_instance = srln_init();

        if (srln_instance) {

            indev_t *sink = stdin_wire();

            indev_t *srln = srln_wire(srln_instance, sink);

            dsrlnin_wire(dsrlnin_instance, srln);

            cp0_unmask_int(MSIM_KBD_IRQ);

        }

    }

    /*

     * This is the necessary evil until the userspace driver is entirely

     * self-sufficient.

     */

    sysinfo_set_item_val("kbd", NULL, true);

    sysinfo_set_item_val("kbd.inr", NULL, MSIM_KBD_IRQ);

    sysinfo_set_item_val("kbd.address.virtual", NULL, MSIM_KBD_ADDRESS);

#endif

}

void calibrate_delay_loop(void)

{

}

void userspace(uspace_arg_t *kernel_uarg)

{

    /* EXL = 1, UM = 1, IE = 1 */

    cp0_status_write(cp0_status_read() | (cp0_status_exl_exception_bit |

        cp0_status_um_bit | cp0_status_ie_enabled_bit));

    cp0_epc_write((uintptr_t) kernel_uarg->uspace_entry);

    userspace_asm(((uintptr_t) kernel_uarg->uspace_stack + PAGE_SIZE),

        (uintptr_t) kernel_uarg->uspace_uarg,

        (uintptr_t) kernel_uarg->uspace_entry);

    while (1);

}

/** Perform mips32 specific tasks needed before the new task is run. */

void before_task_runs_arch(void)

{

}

/** Perform mips32 specific tasks needed before the new thread is scheduled. */

void before_thread_runs_arch(void)

{

    supervisor_sp = (uintptr_t) &THREAD->kstack[THREAD_STACK_SIZE -

        SP_DELTA];

}

void after_thread_ran_arch(void)

{

}

/** Set thread-local-storage pointer

 *

 * We have it currently in K1, it is

 * possible to have it separately in the future.

 */

unative_t sys_tls_set(unative_t addr)

{

    return 0;

}

void arch_reboot(void)

{

    ___halt();

    while (1);

}

/** Construct function pointer

 *

 * @param fptr   function pointer structure

 * @param addr   function address

 * @param caller calling function address

 *

 * @return address of the function pointer

 *

 */

void *arch_construct_function(fncptr_t *fptr, void *addr, void *caller)

{

    return addr;

}

void arch_grab_console(void)

{

#ifdef CONFIG_FB

    fb_redraw();

#endif

}

/** Return console to userspace

 *

 */

void arch_release_console(void)

{

}

/** @}

 */