source: asp3_wo_tecs/trunk/arch/arm_m_gcc/common/core_kernel.trb@ 304

# ======================================================================
# 
#   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-2015 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: core.tf 322 2015-04-30 13:23:48Z ertl-ishikawa $
#
# =====================================================================

# 
#     パス2のアーキテクチャ依存テンプレート（ARM-M用）
# 

# 
#  有効な割込み番号，割込みハンドラ番号
# 
$INTNO_VALID = Array(15..$TMAX_INTNO.val)
$INHNO_VALID = $INTNO_VALID

# 
#  有効なCPU例外番号
#  7,8はエミュレートされた例外
# 
$EXCNO_VALID = [ 2,3,4,5,6,7,8,11,12,14 ]

# 
#  CRE_ISRで使用できる割込み番号とそれに対応する割込みハンドラ番号
# 
$INTNO_CREISR_VALID = $INTNO_VALID
$INHNO_CREISR_VALID = $INHNO_VALID

# 
#  DEF_INT／DEF_EXCで使用できる割込みハンドラ番号／CPU例外ハンドラ番号
# 
$INHNO_DEFINH_VALID = $INHNO_VALID
$EXCNO_DEFEXC_VALID = $EXCNO_VALID

# 
#  CFG_INTで使用できる割込み番号と割込み優å…
ˆåº¦
#  最大優å…
ˆåº¦ã¯BASEPRIレジスタでマスクできない優å…
ˆåº¦ï¼ˆå†…
部優å…
ˆåº¦'0'）
#  そのため，カーネル管理外の割込みでのみ指定可能．
$INTNO_CFGINT_VALID = $INTNO_VALID
$INTPRI_CFGINT_VALID = Array(-(1 << $TBITW_IPRI.val)..-2)

# 
#  kernel/kernel.tf のターゲット依存部
# 

# 
#  TSKINICTXBの初期化情
å ±ã‚’ç”Ÿæˆ
# 
def GenerateTskinictxb(key, params)
   return("{" \
          "\t#{params[:tinib_stksz]}, " \
          "\t((void *)((char *)(#{params[:tinib_stk]}) + " \
          "(#{params[:tinib_stksz]}))), " \
          "},")
end

# 
#  標準テンプレートファイルのインクルード
# 
IncludeTrb("kernel/kernel.trb")

$kernelCfgC.append(<<EOS)
/*
 *  Target-dependent Definitions (ARM-M)
 */

/* 
 *  ベクターテーブル
 */ 
__attribute__ ((section(".vector")))
const FP _kernel_vector_table[] = {
    (FP)(TOPPERS_ISTKPT(_kernel_istack, ROUND_STK_T(DEFAULT_ISTKSZ))),   /* 0 The initial stack pointer */
    (FP)start,                 /* 1 The reset handler */
EOS
Array(2..14).each { |excno|
    if excno == 11
        $kernelCfgC.add("    (FP)(_exit_and_dispatch),      /* 11 SVCall handler */")
    elsif excno == 14
        $kernelCfgC.add("    (FP)(_dispatch),      /* 14 PendSV handler */")
    else
        $kernelCfgC.add("    (FP)(_kernel_core_exc_entry), /* #{excno} */")
    end
}
$INTNO_VALID.each { |inhno|
    #if $cfgData[:DEF_INH][inhno]) && ((INH.INHATR[inhno] & TA_NONKERNEL) != 0)$
    inh = $cfgData[:DEF_INH].select { |k,v| 
        (v[:inhno] == inhno) && (v[:inhatr] & $TA_NONKERNEL)
    }
    if !inh.empty?
        inh.each_value { |v|
                $kernelCfgC.add("    (FP)(#{v[:inthdr]}), /* #{inhno} */")
        }
    else
            $kernelCfgC.add("    (FP)(_kernel_core_int_entry), /* #{inhno} */")
    end
}
$kernelCfgC.add2("};")

$kernelCfgC.add("const FP _kernel_exc_tbl[] = {")
Array(0..14).each { |excno|
    exc = $cfgData[:DEF_EXC].select { |k,v| 
        (v[:excno] == excno)
    }
    if !exc.empty?
        exc.each_value { |v|
                $kernelCfgC.add("   (FP)(#{v[:exchdr]}), /* #{excno} */")
        }
    else
            $kernelCfgC.add("   (FP)(_kernel_default_exc_handler), /* #{excno} */")
    end
}
$INTNO_VALID.each { |inhno|
    inh = $cfgData[:DEF_INH].select { |k,v| 
        (v[:inhno] == inhno)
    }
    if !inh.empty?
        inh.each_value { |v|
                $kernelCfgC.add("   (FP)(#{v[:inthdr]}), /* #{inhno} */")
        }
    else
            $kernelCfgC.add("   (FP)(_kernel_default_int_handler), /* #{inhno} */")
    end
}
$kernelCfgC.add2("};")

# 
#  _kernel_bitpat_cfgintの生成
# 

bitpat_cfgint_num = 0
bitpat_cfgint = 0
if ($TMAX_INTNO & 0x0f) == 0x00
    bitpat_cfgint_num = ($TMAX_INTNO >> 4)
else
    bitpat_cfgint_num = ($TMAX_INTNO >> 4) + 1
end

$kernelCfgC.add
$kernelCfgC.add("const uint32_t _kernel_bitpat_cfgint[#{bitpat_cfgint_num}] = {")
Array(0..(bitpat_cfgint_num-1)).each { |num|
    Array((num*32)..((num*32)+31)).each { |inhno|
        inh = $cfgData[:DEF_INH].select { |k,v| 
            (v[:inhno] == inhno)
        }
        if !inh.empty?
            bitpat_cfgint = bitpat_cfgint | (1 << (inhno & 0x01f))
        end
    }
    $kernelCfgC.add(sprintf("   UINT32_C(0x%08x),", bitpat_cfgint))
}
$kernelCfgC.add2("};")

# 
#  割込み優å…
ˆåº¦ãƒ†ãƒ¼ãƒ–ル（内
部表現）
# 
$kernelCfgC.add("const uint32_t _kernel_int_iipm_tbl[] = {")
Array(0..14).each { |excno|
    $kernelCfgC.add(sprintf("   UINT32_C(0x%08x), /* 0x%03x */", 0, excno))
}
$INTNO_VALID.each { |intno|
    int = $cfgData[:CFG_INT].select { |k,v| 
        (v[:intno] == intno)
    }
    intpri = 0
    if !int.empty?
        #        LSBを1にしているのは，割込み属性が設定されていないことを判
        #        別するためである．
        int.each_value { |v|
            intpri = (((1 << $TBITW_IPRI) + v[:intpri]) << (8 - $TBITW_IPRI))
        }
    end
    $kernelCfgC.add(sprintf("   UINT32_C(0x%08x), /* 0x%03x */", intpri, intno))
}
$kernelCfgC.add2("};")