source: extension/dcre/kernel/startup.c @ 7

/*
 *  TOPPERS/ASP Kernel
 *      Toyohashi Open Platform for Embedded Real-Time Systems/
 *      Advanced Standard Profile Kernel
 * 
 *  Copyright (C) 2000-2003 by Embedded and Real-Time Systems Laboratory
 *                              Toyohashi Univ. of Technology, JAPAN
 *  Copyright (C) 2005-2010 by Embedded and Real-Time Systems Laboratory
 *              Graduate School of Information Science, Nagoya Univ., JAPAN
 * 
 *  Ÿåµ­Ãøºîž¢ŒÔ€Ï¡€°Ê²Œ€Î(1)¡Á(4)€ÎŸò·ï€òËþ€¿€¹Ÿì¹ç€ËžÂ€ê¡€ËÜ¥œ¥Õ¥È¥Š¥§
 *  ¥¢¡ÊËÜ¥œ¥Õ¥È¥Š¥§¥¢€ò²þÊÑ€·€¿€â€Î€òŽÞ€à¡¥°Ê²ŒÆ±€ž¡Ë€ò»ÈÍÑ¡ŠÊ£Àœ¡Š²þ
 *  ÊÑ¡ŠºÆÇÛÉۡʰʲŒ¡€ÍøÍрȞƀ֡ˀ¹€ë€³€È€ò̵œþ€ÇµöÂú€¹€ë¡¥
 *  (1) ËÜ¥œ¥Õ¥È¥Š¥§¥¢€ò¥œ¡Œ¥¹¥³¡Œ¥É€Î·Á€ÇÍøÍÑ€¹€ëŸì¹ç€Ë€Ï¡€Ÿåµ­€ÎÃøºî
 *      ž¢ÉœŒš¡€€³€ÎÍøÍÑŸò·ï€ª€è€Ó²Œµ­€Î̵ÊÝŸÚµ¬Äꀬ¡€€œ€Î€Þ€Þ€Î·Á€Ç¥œ¡Œ
 *      ¥¹¥³¡Œ¥ÉÃæ€ËŽÞ€Þ€ì€Æ€€€ë€³€È¡¥
 *  (2) ËÜ¥œ¥Õ¥È¥Š¥§¥¢€ò¡€¥é¥€¥Ö¥é¥ê·ÁŒ°€Ê€É¡€ÂŸ€Î¥œ¥Õ¥È¥Š¥§¥¢³«È¯€Ë»È
 *      Íрǀ­€ë·Á€ÇºÆÇÛÉÛ€¹€ëŸì¹ç€Ë€Ï¡€ºÆÇÛÉÛ€ËÈŒ€Š¥É¥­¥å¥á¥ó¥È¡ÊÍøÍÑ
 *      ŒÔ¥Þ¥Ë¥å¥¢¥ë€Ê€É¡Ë€Ë¡€Ÿåµ­€ÎÃøºîž¢ÉœŒš¡€€³€ÎÍøÍÑŸò·ï€ª€è€Ó²Œµ­
 *      €Î̵ÊÝŸÚµ¬Äê€ò·ÇºÜ€¹€ë€³€È¡¥
 *  (3) ËÜ¥œ¥Õ¥È¥Š¥§¥¢€ò¡€µ¡Žï€ËÁȀ߹þ€à€Ê€É¡€ÂŸ€Î¥œ¥Õ¥È¥Š¥§¥¢³«È¯€Ë»È
 *      Íрǀ­€Ê€€·Á€ÇºÆÇÛÉÛ€¹€ëŸì¹ç€Ë€Ï¡€Œ¡€Î€€€º€ì€«€ÎŸò·ï€òËþ€¿€¹€³
 *      €È¡¥
 *    (a) ºÆÇÛÉÛ€ËÈŒ€Š¥É¥­¥å¥á¥ó¥È¡ÊÍøÍьԥޥ˥奢¥ë€Ê€É¡Ë€Ë¡€Ÿåµ­€ÎÃø
 *        ºîž¢ÉœŒš¡€€³€ÎÍøÍÑŸò·ï€ª€è€Ó²Œµ­€Î̵ÊÝŸÚµ¬Äê€ò·ÇºÜ€¹€ë€³€È¡¥
 *    (b) ºÆÇÛÉۀηÁÂÖ€ò¡€ÊÌ€ËÄê€á€ëÊýË¡€Ë€è€Ã€Æ¡€TOPPERS¥×¥í¥ž¥§¥¯¥È€Ë
 *        Êó¹ð€¹€ë€³€È¡¥
 *  (4) ËÜ¥œ¥Õ¥È¥Š¥§¥¢€ÎÍøÍрˀè€êÄŸÀÜŪ€Þ€¿€ÏŽÖÀÜŪ€ËÀž€ž€ë€€€«€Ê€ë»
 *      ³²€«€é€â¡€Ÿåµ­Ãøºîž¢ŒÔ€ª€è€ÓTOPPERS¥×¥í¥ž¥§¥¯¥È€òÌÈÀÕ€¹€ë€³€È¡¥
 *      €Þ€¿¡€ËÜ¥œ¥Õ¥È¥Š¥§¥¢€Î¥æ¡Œ¥¶€Þ€¿€Ï¥š¥ó¥É¥æ¡Œ¥¶€«€é€Î€€€«€Ê€ëÍý
 *      ͳ€ËŽð€Å€¯ÀÁµá€«€é€â¡€Ÿåµ­Ãøºîž¢ŒÔ€ª€è€ÓTOPPERS¥×¥í¥ž¥§¥¯¥È€ò
 *      ÌÈÀÕ€¹€ë€³€È¡¥
 * 
 *  ËÜ¥œ¥Õ¥È¥Š¥§¥¢€Ï¡€ÌµÊÝŸÚ€ÇÄ󶡀µ€ì€Æ€€€ë€â€Î€Ç€¢€ë¡¥Ÿåµ­Ãøºîž¢ŒÔ€ª
 *  €è€ÓTOPPERS¥×¥í¥ž¥§¥¯¥È€Ï¡€ËÜ¥œ¥Õ¥È¥Š¥§¥¢€ËŽØ€·€Æ¡€ÆÃÄê€Î»ÈÍÑÌÜŪ
 *  €ËÂЀ¹€ëŬ¹çÀ­€âŽÞ€á€Æ¡€€€€«€Ê€ëÊÝŸÚ€â¹Ô€ï€Ê€€¡¥€Þ€¿¡€ËÜ¥œ¥Õ¥È¥Š¥§
 *  ¥¢€ÎÍøÍрˀè€êÄŸÀÜŪ€Þ€¿€ÏŽÖÀÜŪ€ËÀž€ž€¿€€€«€Ê€ë»³²€ËŽØ€·€Æ€â¡€€œ
 *  €ÎÀÕÇ€€òÉé€ï€Ê€€¡¥
 * 
 *  @(#) $Id$
 */

/*
 *              ¥«¡Œ¥Í¥ë€ÎœéŽü²œ€ÈœªÎ»œèÍý
 */

#include "kernel_impl.h"
#include "time_event.h"
#include <sil.h>

/*
 *  ¥È¥ì¡Œ¥¹¥í¥°¥Þ¥¯¥í€Î¥Ç¥Õ¥©¥ë¥ÈÄêµÁ
 */
#ifndef LOG_KER_ENTER
#define LOG_KER_ENTER()
#endif /* LOG_KER_ENTER */

#ifndef LOG_KER_LEAVE
#define LOG_KER_LEAVE()
#endif /* LOG_KER_LEAVE */

#ifndef LOG_EXT_KER_ENTER
#define LOG_EXT_KER_ENTER()
#endif /* LOG_EXT_KER_ENTER */

#ifndef LOG_EXT_KER_LEAVE
#define LOG_EXT_KER_LEAVE(ercd)
#endif /* LOG_EXT_KER_LEAVE */

#ifdef TOPPERS_sta_ker

/*
 *  ¥«¡Œ¥Í¥ëÆ°ºîŸõÂ֥ե饰
 *
 *  ¥¹¥¿¡Œ¥È¥¢¥Ã¥×¥ë¡Œ¥Á¥ó€Ç¡€false¡Ê¡á0¡Ë€ËœéŽü²œ€µ€ì€ë€³€È€òŽüÂÔ€·€Æ
 *  €€€ë¡¥
 */
bool_t  kerflg = false;

/*
 *  ¥«¡Œ¥Í¥ë€Îµ¯Æ°
 */
void
sta_ker(void)
{
        /*
         *  ¥¿¡Œ¥²¥Ã¥È°Íž€ÎœéŽü²œ
         */
        target_initialize();

        /*
         *  ³Æ¥â¥ž¥å¡Œ¥ë€ÎœéŽü²œ
         *
         *  ¥¿¥€¥à¥€¥Ù¥ó¥ÈŽÉÍý¥â¥ž¥å¡Œ¥ë€ÏŸ€Î¥â¥ž¥å¡Œ¥ë€è€êÀè€ËœéŽü²œ
         *  €¹€ëɬÍ×€¬€¢€ë¡¥
         */
        initialize_kmm();
        initialize_tmevt();
        initialize_object();

        /*
         *  œéŽü²œ¥ë¡Œ¥Á¥ó€ÎŒÂ¹Ô
         */ 
        call_inirtn();

        /*
         *  ¥«¡Œ¥Í¥ëÆ°ºî€Î³«»Ï
         */
        kerflg = true;
        LOG_KER_ENTER();
        start_dispatch();
        assert(0);
}

#endif /* TOPPERS_sta_ker */

/*
 *  ¥«¡Œ¥Í¥ë€ÎœªÎ»
 */
#ifdef TOPPERS_ext_ker

ER
ext_ker(void)
{
        SIL_PRE_LOC;

        LOG_EXT_KER_ENTER();

        /*
         *  ³ä¹þ€ß¥í¥Ã¥¯ŸõÂր˰ܹÔ
         */
        SIL_LOC_INT();

        /*
         *  ¥«¡Œ¥Í¥ëÆ°ºî€ÎœªÎ»
         */
        LOG_KER_LEAVE();
        kerflg = false;

        /*
         *  ¥«¡Œ¥Í¥ë€ÎœªÎ»œèÍý€ÎžÆœÐ€·
         *
         *  È󥿥¹¥¯¥³¥ó¥Æ¥­¥¹¥È€ËÀڀꎹ€š€Æ¡€exit_kernel€òžÆ€ÓœÐ€¹¡¥
         */
        call_exit_kernel();

        /*
         *  ¥³¥ó¥Ñ¥€¥é€Î·Ù¹ðÂкö¡Ê€³€³€ØÍè€ë€³€È€Ï€Ê€€€Ï€º¡Ë
         */
        SIL_UNL_INT();
        LOG_EXT_KER_LEAVE(E_SYS);
        return(E_SYS);
}

/*
 *  ¥«¡Œ¥Í¥ë€ÎœªÎ»œèÍý
 */
void
exit_kernel(void)
{
        /*
         *  œªÎ»œèÍý¥ë¡Œ¥Á¥ó€ÎŒÂ¹Ô
         */
        call_terrtn();

        /*
         *  ¥¿¡Œ¥²¥Ã¥È°Íž€ÎœªÎ»œèÍý
         */
        target_exit();
        assert(0);
}

#endif /* TOPPERS_ext_ker */

/*
 *  ¥«¡Œ¥Í¥ë€Î³ä€êÉÕ€±€ë¥á¥â¥êÎΰè€ÎŽÉÍý
 *
 *  ¥á¥â¥êÎΰè€òÀèƬ€«€éœç€Ë³ä€êÅö€Æ¡€²òÊü€µ€ì€¿¥á¥â¥êÎΰè€òºÆÍøÍÑ€·€Ê
 *  €€¥á¥â¥êŽÉÍý¥â¥ž¥å¡Œ¥ë¡¥
 */
#ifdef TOPPERS_kermem
#ifndef OMIT_KMM_ALLOCONLY

static void     *kmm_brk;

void
initialize_kmm(void)
{
        kmm_brk = ((char *) kmm) + kmmsz;
}

void *
kernel_malloc(SIZE size)
{
        if (((char *) kmm_brk) - ((char *) kmm) >= size) {
                kmm_brk = ((char *) kmm_brk) - size;
                return(kmm_brk);
        }
        else {
                return(NULL);
        }
}

void
kernel_free(void *ptr)
{
}

#endif /* OMIT_KMM_ALLOCONLY */
#endif /* TOPPERS_kermem */