From 8e0346d1372ed32d2c5f559e083f3bd60b281c3a Mon Sep 17 00:00:00 2001 From: Jeff Johnston Date: Thu, 15 Dec 2011 22:58:40 +0000 Subject: 2011-12-15 Konrad Eisele * configure.in: Add SPARC LEON support. * configure: Regenerated. * sparc_leon/asm-leon/amba.h, sparc_leon/asm-leon/asmmacro.h, sparc_leon/asm-leon/clock.h, sparc_leon/asm-leon/contextswitch.h, sparc_leon/asm-leon/elfmacro.h, sparc_leon/asm-leon/head.h, sparc_leon/asm-leon/irq.h, sparc_leon/asm-leon/jiffies.h, sparc_leon/asm-leon/lambapp.h, sparc_leon/asm-leon/lambapp_devs.h, sparc_leon/asm-leon/leon.h, sparc_leon/asm-leon/leon3.h, sparc_leon/asm-leon/leonbare_debug.h, sparc_leon/asm-leon/leonbare_kernel.h, sparc_leon/asm-leon/leonbare_kernel_queue.h, sparc_leon/asm-leon/leoncompat.h, sparc_leon/asm-leon/leondbg.h, sparc_leon/asm-leon/leonstack.h, sparc_leon/asm-leon/liblocks.h, sparc_leon/asm-leon/linkage.h, sparc_leon/asm-leon/param.h, sparc_leon/asm-leon/queue.h, sparc_leon/asm-leon/spinlock.h, sparc_leon/asm-leon/stack.h, sparc_leon/asm-leon/time.h, sparc_leon/asm-leon/timer.h, sparc_leon/asm-leon/types.h, sparc_leon/asm-leon/winmacros.h: New file. * sparc_leon/Makefile.in, sparc_leon/_exit.c, sparc_leon/amba.c, sparc_leon/amba_dbg.c, sparc_leon/amba_driver.c, sparc_leon/amba_scan.c, sparc_leon/asm-leon, sparc_leon/bdinit.S, sparc_leon/busscan.S, sparc_leon/cacheA.S, sparc_leon/catch_interrupt.c, sparc_leon/catch_interrupt_mvt.c, sparc_leon/catch_interrupt_pending.c, sparc_leon/catch_interrupt_svt.c, sparc_leon/configure.in, sparc_leon/console.c, sparc_leon/console_dbg.c, sparc_leon/console_init.c, sparc_leon/contextswitch.c, sparc_leon/contextswitch_asm.S, sparc_leon/crt0.S, sparc_leon/crti.S, sparc_leon/crtn.S, sparc_leon/etrap.S, sparc_leon/etrap_fast.S, sparc_leon/fpu.S, sparc_leon/gettimeofday.c, sparc_leon/initcalls.c, sparc_leon/io.c, sparc_leon/irqinstall.S, sparc_leon/irqtrap.S, sparc_leon/irqtrap_fast.S, sparc_leon/jiffies.c, sparc_leon/kernel.c, sparc_leon/kernel_context.S, sparc_leon/kernel_debug.c, sparc_leon/kernel_debug_var.c, sparc_leon/kernel_mm.c, sparc_leon/kernel_mutex.c, sparc_leon/kernel_queue.c, sparc_leon/kernel_sched.c, sparc_leon/kernel_thread.c, sparc_leon/lcpuinit.S, sparc_leon/locore.S, sparc_leon/locore_atexit.c, sparc_leon/locore_clean.S, sparc_leon/locore_mvt.S, sparc_leon/locore_mvt_reset.S, sparc_leon/locore_svt.S, sparc_leon/locore_svt_reset.S, sparc_leon/locore_svtdisp.S, sparc_leon/locore_var.S, sparc_leon/locore_var_svt.S, sparc_leon/mmu_asm.S, sparc_leon/mutex.c, sparc_leon/nocache.S, sparc_leon/pnpinit.c, sparc_leon/pnpinit_malloc.c, sparc_leon/pnpinit_simple.c, sparc_leon/regwin.S, sparc_leon/regwin_patch.c, sparc_leon/regwin_slow.S, sparc_leon/regwinflush.S, sparc_leon/rtc.c, sparc_leon/rtrap.S, sparc_leon/rtrap_fast.S, sparc_leon/stop.S, sparc_leon/timer.c, sparc_leon/times.c: New file * sparc_leon/configure: Regenerate --- libgloss/sparc_leon/kernel.c | 217 +++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 217 insertions(+) create mode 100644 libgloss/sparc_leon/kernel.c (limited to 'libgloss/sparc_leon/kernel.c') diff --git a/libgloss/sparc_leon/kernel.c b/libgloss/sparc_leon/kernel.c new file mode 100644 index 000000000..ecdeb219c --- /dev/null +++ b/libgloss/sparc_leon/kernel.c @@ -0,0 +1,217 @@ +/* + * Copyright (c) 2011 Aeroflex Gaisler + * + * BSD license: + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL + * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN + * THE SOFTWARE. + */ + + +#include +#include +#include +#include +#include +#include + +struct leonbare_kernel leonbare_kernel; + +/* + * queue 0: [ ], + * queue 1: [ , ,, ], + * queue 2: [ ... ], + * ... + * queue n: [ ... ] + * + * Seach through ready queue [0 - LEONBARE_RUNQ_READY_NR-1] for the + * first thread in a queue'ss head to discover + * leonbare_thread_tick_callback() will put threads that have their th_caccount + * consumed into the prepare-run queues. th_caccount is already initialized + * to the value for the next schedule round. So all there is to do is to + * move the to prepare-run queues to run queues [0 - LEONBARE_RUNQ_READY_NR-1]. + * return the first thread in any queue, similary to leonbare_sched_next(). + * Using LEONBARE_KR_RUNQ_WHICH and leonbare_thread.th_runq_which one can + * determine weather the thread is in a runqueue or a prepare-runqueue: + * LEONBARE_KR_RUNQ_WHICH == leonbare_thread.th_runq_which : thread in runqueue + * LEONBARE_KR_RUNQ_WHICH != leonbare_thread.th_runq_which : thread in prepare-runqueue + * after a leonbare_thread_tick_callback() or a run queue change, call + * leonbare_sched_update() to update LEONBARE_KR_NEXT and + * LEONBARE_KR_NEED_SCHEDULE + */ +int +leonbare_sched_update () +{ + int idx; + leonbare_thread_t n = 0; + int i = 0; + LEONBARE_VERIFYIRQDISABLED (); + LEONBARE_VERIFYSCHED (); + for (i = 0; i < LEONBARE_RUNQ_READY_NR; i++) + { + leonbare_thread_t c; + if (!LBTAILQ_EMPTY (LEONBARE_KR_RUNQ (i))) + { + n = LBTAILQ_FIRST (LEONBARE_KR_RUNQ (i)); + break; + } + } + if (!n) + { + for (idx = 0; idx < LEONBARE_RUNQ_READY_NR; idx++) + { + struct leonbare_thread_queue *h0 = + (struct leonbare_thread_queue *) LEONBARE_KR_RUNQ (idx); + struct leonbare_thread_queue *h1 = (struct leonbare_thread_queue *) + LEONBARE_KR_RUNQ (idx + LEONBARE_RUNQ_PREPARE_IDX); + if (LBTAILQ_EMPTY (h1)) + { + LBTAILQ_INIT (h0); + } + else + { + *h0 = *h1; + if (LBTAILQ_FIRST (h0)) + { + LBTAILQ_FIRST (h0)->th_runq.tqe_prev = &(h0)->tqh_first; + } + if (!n) + { + n = LBTAILQ_FIRST (h0); + } + } + } + for (idx = 0; idx < LEONBARE_RUNQ_READY_NR; idx++) + { + LBTAILQ_INIT (LEONBARE_KR_RUNQ (idx + LEONBARE_RUNQ_PREPARE_IDX)); + } + LEONBARE_KR_RUNQ_WHICH++; + LEONBARE_VERIFYSCHED (); + LEONBARE_PRINTQUEUES (); + } + LEONBARE_KR_NEXT = n; + return (LEONBARE_KR_NEED_SCHEDULE); +} + +/* called in the timer irq handling. Decrements the + * th_caccount field. On consumption of th_caccount the + * thread will be removed from the ready queue nad placed into the + * prepare-runqueue for later readdition by leonbare_sched_readyprepare() + * called from gettimeofday.c's installed ticker_callback callback + * leonbare_thread_tick_callback() might change the kernel state in which case + * state on return from leonbare_thread_tick_callback() leonbare_thread_schedule_callback() + * will be called from rtrap_fast.S . + */ +int +leonbare_thread_tick_callback () +{ + LEONBARE_PROTECT_DECL (flags); + unsigned int r; + volatile leonbare_thread_t c = LEONBARE_KR_CURRENT; + leonbare_thread_t i; + LBDEBUG_FNCALL; + if (c && LEONBARE_KR_IS_PREEMPTION) + { + + LEONBARE_PROTECT_KERNEL_START (); + { + + LEONBARE_VERIFYIRQDISABLED (); + LEONBARE_VERIFYSCHED (); + + if ((--c->th_caccount) < 0) + { + LBDEBUG_HEADER_PRINTF (LBDEBUG_QUEUE_NR, "remove %s(%x)\n", + LEONBARE_TH_NAME_DBG (c), c); + LBTAILQ_REMOVE (LEONBARE_KR_RUNQ (c->th_runq_idx), c, th_runq); + LBTAILQ_INSERT_TAIL (LEONBARE_KR_RUNQ + (c->th_runq_idx + LEONBARE_RUNQ_PREPARE_IDX), + c, th_runq); + c->th_caccount = c->th_account; + c->th_runq_which++; + } + else + { + /* todo: round robbin scheme */ + } + } + LEONBARE_PROTECT_KERNEL_END (); + } + r = leonbare_sched_update (); + return r; +} + +/* called from rtrap_fast.S's installed schedule_callback callback */ +int +leonbare_thread_schedule_callback (struct leonbare_pt_regs *ptregs) +{ + unsigned int retval; + LBDEBUG_FNCALL; + if (LEONBARE_KR_IS_IN_KERNEL == 0 && LEONBARE_KR_NEED_SCHEDULE) + { + + leonbare_sched (); + + //KERNEL_ENTER; + //KERNEL_EXIT(LEONBARE_KR_NEED_SCHEDULE, retval); + } + LBDEBUG_FNEXIT; +} + + +struct leonbare_thread _thread_main; +int +leonbare_thread_init () +{ + int i; + LBDEBUG_FNCALL; + + memset ((void *) &_thread_main, 0, sizeof (_thread_main)); + _thread_main.th_reentp = _impure_ptr; + _thread_main.th_name = "
"; + _thread_main.th_runq_idx = 0; + _thread_main.th_pri_idx = 0; + _thread_main.th_account = 0; + + LBTAILQ_INIT (LEONBARE_KR_ALLQ); + for (i = 0; i < LEONBARE_RUNQ_NR; i++) + { + LBTAILQ_INIT (LEONBARE_KR_RUNQ (i)); + } + LBTAILQ_INIT (LEONBARE_KR_ALLM); + + /* queues */ + LBTAILQ_INSERT_TAIL (LEONBARE_KR_ALLQ, &_thread_main, th_allq); + + /* inseart into ready queue 0 at head */ + LBTAILQ_INSERT_HEAD (LEONBARE_KR_RUNQ (_thread_main.th_runq_idx), + &_thread_main, th_runq); + + LEONBARE_KR_CURRENT = &_thread_main; + LEONBARE_KR_IS_IN_KERNEL = 0; + + leonbare_init_ticks (); + schedule_callback = (schedulehandler) leonbare_thread_schedule_callback; + ticker_callback = (tickerhandler) leonbare_thread_tick_callback; + + /* disable later */ + LEONBARE_KR_IS_PREEMPTION = 1; + + + LBDEBUG_FNEXIT; +} -- cgit v1.2.3