source: EcnlProtoTool/trunk/webapp/webmrbc/MainLoopBlock.cs@ 287

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

ファイルヘッダーコメントを追加
  • Property svn:eol-style set to native
  • Property svn:keywords set to Id
  • Property svn:mime-type set to text/x-csharp
File size: 6.6 KB
Line 
1/*
2 * TOPPERS/ECNL Prototyping tool
3 *
4 * Copyright (C) 2017 Cores Co., Ltd. Japan
5 *
6 * 上記著作権者は，以下の(1)～(4)の条件を満たす場合に限り，本ソフトウェ
7 * ア（本ソフトウェアを改変したものを含む．以下同じ）を使用・複製・改
8 * 変・再配布（以下，利用と呼ぶ）することを無償で許諾する．
9 * (1) 本ソフトウェアをソースコードの形で利用する場合には，上記の著作
10 * 権表示，この利用条件および下記の無保証規定が，そのままの形でソー
11 * スコード中に含まれていること．
12 * (2) 本ソフトウェアを，ライブラリ形式など，他のソフトウェア開発に使
13 * 用できる形で再配布する場合には，再配布に伴うドキュメント（利用
14 * 者マニュアルなど）に，上記の著作権表示，この利用条件および下記
15 * の無保証規定を掲載すること．
16 * (3) 本ソフトウェアを，機器に組み込むなど，他のソフトウェア開発に使
17 * 用できない形で再配布する場合には，次のいずれかの条件を満たすこ
18 * と．
19 * (a) 再配布に伴うドキュメント（利用者マニュアルなど）に，上記の著
20 * 作権表示，この利用条件および下記の無保証規定を掲載すること．
21 * (b) 再配布の形態を，別に定める方法によって，TOPPERSプロジェクトに
22 * 報告すること．
23 * (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
24 * 害からも，上記著作権者およびTOPPERSプロジェクトを免責すること．
25 * また，本ソフトウェアのユーザまたはエンドユーザからのいかなる理
26 * 由に基づく請求からも，上記著作権者およびTOPPERSプロジェクトを
27 * 免責すること．
28 *
29 * 本ソフトウェアは，無保証で提供されているものである．上記著作権者お
30 * よびTOPPERSプロジェクトは，本ソフトウェアに関して，特定の使用目的
31 * に対する適合性も含めて，いかなる保証も行わない．また，本ソフトウェ
32 * アの利用により直接的または間接的に生じたいかなる損害に関しても，そ
33 * の責任を負わない．
34 *
35 * @(#) $Id: MainLoopBlock.cs 287 2017-05-05 14:22:23Z coas-nagasima $
36 */
37using System;
38using System.Collections.Generic;
39using System.Linq;
40using System.Text;
41using Bridge.Html5;
42using Bridge.jQuery2;
43
44namespace WebMrbc
45{
46 internal class MainLoopWorkspace : IClassWorkspace
47 {
48 internal Workspace workspace;
49 BlocklyView view;
50 protected Ruby _RubyCode;
51
52 public string Identifier { get { return view.Identifier; } }
53 public Workspace Workspace { get { return workspace; } }
54 public BlocklyView View { get { return view; } }
55 public Ruby RubyCode { get { return _RubyCode; } }
56
57 public MainLoopWorkspace(BlocklyView view)
58 {
59 this.view = view;
60 workspace = view.Init();
61
62 UpdateInitialBlock();
63 }
64
65 private void UpdateInitialBlock()
66 {
67 var xml = Document.CreateElement("xml");
68 var vset = Document.CreateElement("block");
69 vset.SetAttribute("type", "variables_set");
70 xml.AppendChild(vset);
71
72 var field = Document.CreateElement("field");
73 field.SetAttribute("name", "VAR");
74 field.AppendChild(Document.CreateTextNode("MAKER_CODE"));
75 vset.AppendChild(field);
76
77 var value = Document.CreateElement("value");
78 value.SetAttribute("name", "VALUE");
79 vset.AppendChild(value);
80
81 var text = Document.CreateElement("shadow");
82 text.SetAttribute("type", "text");
83 value.AppendChild(text);
84
85 field = Document.CreateElement("field");
86 field.SetAttribute("name", "TEXT");
87 field.AppendChild(Document.CreateTextNode("\\x00\\x00\\xB3"));/* TOPPERSプロジェクト */
88 text.AppendChild(field);
89
90 Blockly.Xml.domToWorkspace(xml, Workspace);
91 }
92
93 public string GetImageUrl()
94 {
95 return "img/no_image.png";
96 }
97
98 public bool IsPreset()
99 {
100 return true;
101 }
102
103 public string ToCode(string filename)
104 {
105 if (Collections.EcnlTaskWorkspace == null)
106 return "";
107
108 _RubyCode = new Ruby(filename);
109 var result = _RubyCode.defineMainLoop(this, Collections.EcnlTaskWorkspace.Identifier);
110 view.Changed = false;
111 return result;
112 }
113
114 //Element ele;
115
116 public void Activate()
117 {
118 //ele = Blockly.Xml.workspaceToDom(workspace);
119 }
120
121 public void Inactivate()
122 {
123 //workspace.clear();
124 //Blockly.Xml.domToWorkspace(ele, workspace);
125 }
126
127 public void ReloadToolbox(HTMLElement toolbox)
128 {
129 toolbox.AppendChild(Document.CreateElement("sep"));
130 var xml = jQuery.ParseXML(App.ArduinoToolbox);
131 var categories = xml.ChildNodes[0];
132 foreach (var item in categories.ChildNodes) {
133 if (item.NodeName != "category")
134 continue;
135 toolbox.AppendChild(item);
136 }
137 }
138
139 public void OpenModifyView(Action<bool> callback)
140 {
141 view.ReloadToolbox(this);
142 callback(true);
143 }
144
145 public string Template(string template)
146 {
147 template = template.Replace("%identifier%", Identifier);
148 template = template.Replace("%attribute%", "MainLoop");
149 template = template.Replace("%img%", GetImageUrl());
150 return template;
151 }
152 }
153
154 partial class Ruby
155 {
156 internal string defineMainLoop(MainLoopWorkspace workspace, string identifier)
157 {
158 string code = workspaceToCode(workspace.Workspace);
159 var sb = new StringBuilder();
160
161 sb.Append(code);
162 sb.AppendLine();
163
164 sb.AppendLine($"ctrl = {identifier}.new()");
165 sb.AppendLine();
166 sb.AppendLine("# メインループ");
167 sb.AppendLine("while (true) do");
168 sb.AppendLine(" # メッセージ待ち");
169 sb.AppendLine(" ret = TargetBoard::wait_msg(ctrl.timer)");
170 sb.AppendLine(" if !ret then");
171 sb.AppendLine(" break;");
172 sb.AppendLine(" end");
173 sb.AppendLine();
174 sb.AppendLine(" # 経過時間の計算");
175 sb.AppendLine(" ctrl.progress ret[0]");
176 sb.AppendLine();
177 sb.AppendLine(" # 戻り値が２つなら");
178 sb.AppendLine(" if ret.length == 2 then");
179 sb.AppendLine(" # 内部イベント");
180 sb.AppendLine(" case (ret[1])");
181 sb.AppendLine(" when 1 then");
182 sb.AppendLine(" TargetBoard::restart");
183 sb.AppendLine(" when 2 then");
184 sb.AppendLine(" ctrl.ntf_inl");
185 sb.AppendLine(" end");
186 sb.AppendLine(" # 戻り値が３つなら");
187 sb.AppendLine(" elsif ret.length == 3 then");
188 sb.AppendLine(" # 通信レイヤーからのメッセージ（通信端点と電文）");
189 sb.AppendLine(" ctrl.recv_msg(ret[1], ret[2])");
190 sb.AppendLine(" end");
191 sb.AppendLine();
192 sb.AppendLine(" # タイムアウトの処理があれば行う");
193 sb.AppendLine(" ctrl.call_timeout");
194 sb.AppendLine("end");
195
196 return sb.ToString();
197 }
198 }
199}
Note: See TracBrowser for help on using the repository browser.