source: EcnlProtoTool/trunk/asp3_dcre/kernel/pridataq.trb@ 270

Last change on this file since 270 was 270, checked in by coas-nagasima, 7 years ago

mruby版ECNLプロトタイピング・ツールを追加

  • Property svn:eol-style set to native
  • Property svn:mime-type set to text/x-ruby
File size: 4.2 KB
Line 
1# -*- coding: utf-8 -*-
2#
3# TOPPERS/ASP Kernel
4# Toyohashi Open Platform for Embedded Real-Time Systems/
5# Advanced Standard Profile Kernel
6#
7# Copyright (C) 2015 by FUJI SOFT INCORPORATED, JAPAN
8# Copyright (C) 2015,2016 by Embedded and Real-Time Systems Laboratory
9# Graduate School of Information Science, Nagoya Univ., JAPAN
10#
11# 上記著作権者
12は,以下の(1)~(4)の条件を満たす場合に限り,本ソフトウェ
13# ア(本ソフトウェアを改変したものを含む.以下同じ)を使用・複製・改
14# 変・再é…
15å¸ƒï¼ˆä»¥ä¸‹ï¼Œåˆ©ç”¨ã¨å‘¼ã¶ï¼‰ã™ã‚‹ã“とを無償で許諾する.
16# (1) 本ソフトウェアをソースコードの形で利用する場合には,上記の著作
17# 権表示,この利用条件および下記の無保証規定が,そのままの形でソー
18# スコード中に含まれていること.
19# (2) 本ソフトウェアを,ライブラリ形式など,他のソフトウェア開発に使
20# 用できる形で再é…
21å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œå†é…
22å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨
23# 者
24マニュアルなど)に,上記の著作権表示,この利用条件および下記
25# の無保証規定を掲載すること.
26# (3) 本ソフトウェアを,機器に組み込むなど,他のソフトウェア開発に使
27# 用できない形で再é…
28å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œæ¬¡ã®ã„ずれかの条件を満たすこ
29# と.
30# (a) 再é…
31å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨è€…
32マニュアルなど)に,上記の著
33# 作権表示,この利用条件および下記の無保証規定を掲載すること.
34# (b) 再é…
35å¸ƒã®å½¢æ…
36‹ã‚’,別に定める方法によって,TOPPERSプロジェクトに
37# 報告すること.
38# (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
39# 害からも,上記著作権者
40およびTOPPERSプロジェクトをå…
41è²¬ã™ã‚‹ã“と.
42# また,本ソフトウェアのユーザまたはエンドユーザからのいかなる理
43# 由に基づく請求からも,上記著作権者
44およびTOPPERSプロジェクトを
45# å…
46è²¬ã™ã‚‹ã“と.
47#
48# 本ソフトウェアは,無保証で提供されているものである.上記著作権者
49お
50# よびTOPPERSプロジェクトは,本ソフトウェアに関して,特定の使用目的
51# に対する適合性も含めて,いかなる保証も行わない.また,本ソフトウェ
52# アの利用により直接的または間接的に生じたいかなる損害に関しても,そ
53# の責任を負わない.
54#
55# $Id: pridataq.trb 668 2016-03-03 13:57:53Z ertl-hiro $
56#
57
58#
59# 優å…
60ˆåº¦ãƒ‡ãƒ¼ã‚¿ã‚­ãƒ¥ãƒ¼æ©Ÿèƒ½ã®ç”Ÿæˆã‚¹ã‚¯ãƒªãƒ—ト
61#
62
63class PridataqObject < KernelObject
64 def initialize()
65 super("pdq", "pridataq")
66 end
67
68 def prepare(key, params)
69 # パラメータが省略された時のデフォルト値の設定
70 params[:pdqmb] ||= "NULL"
71
72 # pdqatrが無効の場合(E_RSATR)[NGKI1804]
73 #(TA_TPRI以外のビットがセットされている場合)
74 if (params[:pdqatr] & ~($TA_TPRI)) != 0
75 error_illegal_id("E_RSATR", params, :pdqatr, :pdqid)
76 end
77
78 # (TMIN_DPRI <= maxdpri && maxdpri <= TMAX_DPRI)でない場合(E_PAR)
79 # ï¼»NGKI1819ï¼½
80 if !($TMIN_DPRI <= params[:maxdpri] && params[:maxdpri] <= $TMAX_DPRI)
81 error_illegal_id("E_PAR", params, :maxdpri, :pdqid)
82 end
83
84 # pdqmbがNULLでない場合(E_NOSPT)[ASPS0142]
85 if params[:pdqmb] != "NULL"
86 error_illegal_id("E_NOSPT", params, :pdqmb, :pdqid)
87 end
88
89 # 優å…
90ˆåº¦ãƒ‡ãƒ¼ã‚¿ã‚­ãƒ¥ãƒ¼ç®¡ç†é ˜åŸŸ
91 if params[:pdqcnt] > 0
92 pdqmbName = "_kernel_pdqmb_#{params[:pdqid]}"
93 $kernelCfgC.add("static PDQMB #{pdqmbName}[#{params[:pdqcnt]}];")
94 params[:pdqinib_pdqmb] = pdqmbName
95 else
96 params[:pdqinib_pdqmb] = "NULL"
97 end
98 end
99
100 def generateInib(key, params)
101 return("(#{params[:pdqatr]}), (#{params[:pdqcnt]}), " \
102 "(#{params[:maxdpri]}), #{params[:pdqinib_pdqmb]}")
103 end
104end
105
106#
107# 優å…
108ˆåº¦ãƒ‡ãƒ¼ã‚¿ã‚­ãƒ¥ãƒ¼ã«é–¢ã™ã‚‹æƒ…
109報の生成
110#
111$kernelCfgC.comment_header("Priority Dataqueue Functions")
112PridataqObject.new.generate()
Note: See TracBrowser for help on using the repository browser.