1 | // Porting from
|
---|
2 | // https://github.com/jeanlazarou/blockly2ruby
|
---|
3 | // Copyright (c) 2014 Jean Lazarou
|
---|
4 | // MIT Lisence
|
---|
5 | using System;
|
---|
6 | using System.Linq;
|
---|
7 | using Bridge;
|
---|
8 | using Bridge.Text.RegularExpressions;
|
---|
9 | using System.Collections.Generic;
|
---|
10 | using System.Runtime.InteropServices;
|
---|
11 |
|
---|
12 | namespace WebMrbc
|
---|
13 | {
|
---|
14 | [ComVisible(true)]
|
---|
15 | public partial class Ruby : Generator, IMrbParser
|
---|
16 | {
|
---|
17 | static Ruby()
|
---|
18 | {
|
---|
19 | /**
|
---|
20 | * List of illegal variable names.
|
---|
21 | * This is not intended to be a security feature. Blockly is 100% client-side,
|
---|
22 | * so bypassing this list is trivial. This is intended to prevent users from
|
---|
23 | * accidentally clobbering a built-in object or function.
|
---|
24 | * @private
|
---|
25 | */
|
---|
26 | addReservedWords(
|
---|
27 | "Class,Object,BEGIN,END,__ENCODING__,__END__,__FILE__,__LINE__" +
|
---|
28 | "alias,and,begin,break,case,class,def,defined?,do,else,elsif,end,ensure,false,for,if,in,module,next" +
|
---|
29 | "nil,not,or,redo,rescue,retry,return,self,super,then,true,undef,unless,until,when,while,yield");
|
---|
30 | }
|
---|
31 |
|
---|
32 | node tree;
|
---|
33 | node[] allNodes;
|
---|
34 | locals_node locals;
|
---|
35 | bool global = true;
|
---|
36 |
|
---|
37 | public Ruby(string filename)
|
---|
38 | : base("Ruby")
|
---|
39 | {
|
---|
40 | this.filename = filename;
|
---|
41 | }
|
---|
42 |
|
---|
43 | /**
|
---|
44 | * Initialise the database of variable names.
|
---|
45 | */
|
---|
46 | public override void init(Workspace workspace)
|
---|
47 | {
|
---|
48 | locals = new locals_node(null);
|
---|
49 | }
|
---|
50 |
|
---|
51 | /**
|
---|
52 | * Prepend the generated code with the variable definitions.
|
---|
53 | * @param {string} code Generated code.
|
---|
54 | * @return {string} Completed code.
|
---|
55 | */
|
---|
56 | public override string finish(node[] codes)
|
---|
57 | {
|
---|
58 | tree = new scope_node(this, new begin_node(this, codes));
|
---|
59 | var cond = new ruby_code_cond(filename, INDENT);
|
---|
60 | tree.to_ruby(cond);
|
---|
61 | allNodes = cond.nodes;
|
---|
62 | return cond.ToString();
|
---|
63 | }
|
---|
64 |
|
---|
65 | /**
|
---|
66 | * Naked values are top-level blocks with outputs that aren't plugged into
|
---|
67 | * anything.
|
---|
68 | * @param {string} line Line of generated code.
|
---|
69 | * @return {string} Legal line of code.
|
---|
70 | */
|
---|
71 | public override node[] scrubNakedValue(node[] line)
|
---|
72 | {
|
---|
73 | return line;
|
---|
74 | }
|
---|
75 |
|
---|
76 | /**
|
---|
77 | * Common tasks for generating Ruby from blocks.
|
---|
78 | * Handles comments for the specified block and any connected value blocks.
|
---|
79 | * Calls any statements following this block.
|
---|
80 | * @param {!Blockly.Block} block The current block.
|
---|
81 | * @param {string} code The Ruby code created for this block.
|
---|
82 | * @return {string} Ruby code with comments and subsequent blocks added.
|
---|
83 | * @this {Blockly.CodeGenerator}
|
---|
84 | * @private
|
---|
85 | */
|
---|
86 | public override node[] scrub_(Block block, node[] code)
|
---|
87 | {
|
---|
88 | var commentCode = "";
|
---|
89 | // Only collect comments for blocks that aren't inline.
|
---|
90 | if (block.outputConnection == null || block.outputConnection.targetConnection == null) {
|
---|
91 | // Collect comment for this block.
|
---|
92 | var comment = block.getCommentText();
|
---|
93 | if (!String.IsNullOrEmpty(comment)) {
|
---|
94 | commentCode += this.prefixLines(comment, "# ") + "\n";
|
---|
95 | }
|
---|
96 | // Collect comments for all value arguments.
|
---|
97 | // Don't collect comments for nested statements.
|
---|
98 | var inputList = block.inputList;
|
---|
99 | for (var x = 0; x < inputList.Length; x++) {
|
---|
100 | if (inputList[x].type == Blockly.INPUT_VALUE) {
|
---|
101 | var childBlock = inputList[x].connection.targetBlock();
|
---|
102 | if (childBlock != null) {
|
---|
103 | comment = allNestedComments(childBlock);
|
---|
104 | if (!String.IsNullOrEmpty(comment)) {
|
---|
105 | commentCode += this.prefixLines(comment, "# ");
|
---|
106 | }
|
---|
107 | }
|
---|
108 | }
|
---|
109 | }
|
---|
110 | }
|
---|
111 | Block nextBlock = null;
|
---|
112 | if (block.nextConnection != null)
|
---|
113 | nextBlock = block.nextConnection.targetBlock();
|
---|
114 | var nextCode = blockToCode(nextBlock);
|
---|
115 | if (nextCode == null)
|
---|
116 | return code;
|
---|
117 | return (node[])code.Concat(nextCode);
|
---|
118 | }
|
---|
119 |
|
---|
120 | public int lineno { get; set; }
|
---|
121 | public int column { get; set; }
|
---|
122 | public string filename { get; }
|
---|
123 |
|
---|
124 | string[] syms = new string[0];
|
---|
125 |
|
---|
126 | private mrb_sym get_sym(string str)
|
---|
127 | {
|
---|
128 | int i = syms.IndexOf(str);
|
---|
129 | if (i < 0) {
|
---|
130 | i = syms.Length;
|
---|
131 | syms.Push(str);
|
---|
132 | }
|
---|
133 | return (mrb_sym)(i + 1);
|
---|
134 | }
|
---|
135 |
|
---|
136 | public string sym2name(mrb_sym sym)
|
---|
137 | {
|
---|
138 | int i = (int)sym - 1;
|
---|
139 | if ((i < 0) || (i >= syms.Length))
|
---|
140 | return ((int)sym).ToString();
|
---|
141 | return syms[i];
|
---|
142 | }
|
---|
143 |
|
---|
144 | mrb_sym intern(string str)
|
---|
145 | {
|
---|
146 | return get_sym(str);
|
---|
147 | }
|
---|
148 |
|
---|
149 | mrb_sym get_var_name(string str)
|
---|
150 | {
|
---|
151 | int i = syms.IndexOf(str);
|
---|
152 |
|
---|
153 | // ローカル変数なら登録されているはずなので、
|
---|
154 | if (i < 0)
|
---|
155 | // グローバル変数とする
|
---|
156 | return get_sym((global ? "$" : "@") + str);
|
---|
157 |
|
---|
158 | var sym = (mrb_sym)(i + 1);
|
---|
159 |
|
---|
160 | // ローカル変数でなければ、
|
---|
161 | if (!local_var_p(sym))
|
---|
162 | // グローバル変数とする
|
---|
163 | return get_sym((global ? "$" : "@") + str);
|
---|
164 |
|
---|
165 | return sym;
|
---|
166 | }
|
---|
167 |
|
---|
168 | node new_var_node(mrb_sym sym)
|
---|
169 | {
|
---|
170 | var name = sym2name(sym);
|
---|
171 | if (name.StartsWith("$")) {
|
---|
172 | return new gvar_node(this, sym);
|
---|
173 | }
|
---|
174 | else if (name.StartsWith("@@")) {
|
---|
175 | return new cvar_node(this, sym);
|
---|
176 | }
|
---|
177 | else if (name.StartsWith("@")) {
|
---|
178 | return new ivar_node(this, sym);
|
---|
179 | }
|
---|
180 | else {
|
---|
181 | return new lvar_node(this, sym);
|
---|
182 | }
|
---|
183 | }
|
---|
184 |
|
---|
185 | node new_num_node(string num)
|
---|
186 | {
|
---|
187 | var result = MrbParser.parse(num);
|
---|
188 | var begin = result as begin_node;
|
---|
189 | if ((begin != null) && (begin.progs.Length == 1))
|
---|
190 | return begin.progs[0];
|
---|
191 | return result;
|
---|
192 | }
|
---|
193 |
|
---|
194 | node new_str_node(string text)
|
---|
195 | {
|
---|
196 | var result = MrbParser.parse("\"" + text + "\"");
|
---|
197 | var begin = result as begin_node;
|
---|
198 | if ((begin != null) && (begin.progs.Length == 1))
|
---|
199 | return begin.progs[0];
|
---|
200 | return result;
|
---|
201 | }
|
---|
202 |
|
---|
203 | locals_node local_switch()
|
---|
204 | {
|
---|
205 | var prev = this.locals;
|
---|
206 | this.locals = new locals_node(null);
|
---|
207 | return prev;
|
---|
208 | }
|
---|
209 |
|
---|
210 | void local_resume(locals_node prev)
|
---|
211 | {
|
---|
212 | this.locals = prev;
|
---|
213 | }
|
---|
214 |
|
---|
215 | void local_nest()
|
---|
216 | {
|
---|
217 | this.locals = new locals_node(this.locals);
|
---|
218 | }
|
---|
219 |
|
---|
220 | void local_unnest()
|
---|
221 | {
|
---|
222 | if (this.locals != null) {
|
---|
223 | this.locals = this.locals.cdr;
|
---|
224 | }
|
---|
225 | }
|
---|
226 |
|
---|
227 | bool local_var_p(mrb_sym sym)
|
---|
228 | {
|
---|
229 | locals_node l = this.locals;
|
---|
230 |
|
---|
231 | while (l != null) {
|
---|
232 | if (l.symList.Contains(sym))
|
---|
233 | return true;
|
---|
234 | l = l.cdr;
|
---|
235 | }
|
---|
236 | return false;
|
---|
237 | }
|
---|
238 |
|
---|
239 | void local_add_f(mrb_sym sym)
|
---|
240 | {
|
---|
241 | if (this.locals != null) {
|
---|
242 | this.locals.push(sym);
|
---|
243 | }
|
---|
244 | }
|
---|
245 |
|
---|
246 | mrb_sym local_add_f(string name)
|
---|
247 | {
|
---|
248 | var sym = intern(name);
|
---|
249 | local_add_f(sym);
|
---|
250 | return sym;
|
---|
251 | }
|
---|
252 |
|
---|
253 | void local_add(mrb_sym sym)
|
---|
254 | {
|
---|
255 | if (!local_var_p(sym)) {
|
---|
256 | local_add_f(sym);
|
---|
257 | }
|
---|
258 | }
|
---|
259 |
|
---|
260 | public mrb_sym[] locals_node()
|
---|
261 | {
|
---|
262 | return this.locals != null ? this.locals.symList : null;
|
---|
263 | }
|
---|
264 |
|
---|
265 | void assignable(node lhs)
|
---|
266 | {
|
---|
267 | var lvar = lhs as lvar_node;
|
---|
268 | if (lvar != null) {
|
---|
269 | local_add(lvar.name);
|
---|
270 | }
|
---|
271 | }
|
---|
272 |
|
---|
273 | node var_reference(node lhs)
|
---|
274 | {
|
---|
275 | node n;
|
---|
276 |
|
---|
277 | var lvar = lhs as lvar_node;
|
---|
278 | if (lvar != null) {
|
---|
279 | if (!local_var_p(lvar.name)) {
|
---|
280 | n = new fcall_node(this, lvar.name, null);
|
---|
281 | return n;
|
---|
282 | }
|
---|
283 | }
|
---|
284 |
|
---|
285 | return lhs;
|
---|
286 | }
|
---|
287 |
|
---|
288 | public string[] GetBlockId(string filename, int lineno)
|
---|
289 | {
|
---|
290 | var nodes = allNodes;
|
---|
291 | var result = new string[0];
|
---|
292 | foreach (var node in nodes) {
|
---|
293 | if (node.filename != filename)
|
---|
294 | continue;
|
---|
295 | if (lineno < node.start_lineno)
|
---|
296 | continue;
|
---|
297 | if (node.column == 0) {
|
---|
298 | if (lineno >= node.lineno)
|
---|
299 | continue;
|
---|
300 | }
|
---|
301 | else {
|
---|
302 | if (lineno > node.lineno)
|
---|
303 | continue;
|
---|
304 | }
|
---|
305 | if (String.IsNullOrEmpty(node.block_id))
|
---|
306 | continue;
|
---|
307 |
|
---|
308 | result.Push(node.block_id);
|
---|
309 | }
|
---|
310 | return result;
|
---|
311 | }
|
---|
312 |
|
---|
313 | public string[] GetBlockId(string filename, int lineno, int column)
|
---|
314 | {
|
---|
315 | var nodes = allNodes;
|
---|
316 | var result = new string[0];
|
---|
317 | foreach (var node in nodes) {
|
---|
318 | if (node.filename != filename)
|
---|
319 | continue;
|
---|
320 | if ((lineno < node.start_lineno))
|
---|
321 | continue;
|
---|
322 | if ((lineno == node.start_lineno) && (column < node.column))
|
---|
323 | continue;
|
---|
324 | if (node.column == 0) {
|
---|
325 | if (lineno >= node.lineno)
|
---|
326 | continue;
|
---|
327 | }
|
---|
328 | else {
|
---|
329 | if ((lineno == node.lineno) && (column > node.column))
|
---|
330 | continue;
|
---|
331 | if (lineno > node.lineno)
|
---|
332 | continue;
|
---|
333 | }
|
---|
334 | if (String.IsNullOrEmpty(node.block_id))
|
---|
335 | continue;
|
---|
336 |
|
---|
337 | result.Push(node.block_id);
|
---|
338 | }
|
---|
339 | return result;
|
---|
340 | }
|
---|
341 |
|
---|
342 | public void yyError(string message, params object[] expected)
|
---|
343 | {
|
---|
344 | App.WriteLine($"{filename}({lineno},{column}): error {String.Format(message, expected)}");
|
---|
345 | }
|
---|
346 | }
|
---|
347 | }
|
---|