1 | /*
|
---|
2 | * システム関連
|
---|
3 | *
|
---|
4 | * Copyright (c) 2016 Wakayama.rb Ruby Board developers
|
---|
5 | *
|
---|
6 | * This software is released under the MIT License.
|
---|
7 | * https://github.com/wakayamarb/wrbb-v2lib-firm/blob/master/MITL
|
---|
8 | *
|
---|
9 | */
|
---|
10 | #include <arduino.h>
|
---|
11 | /*#include <eeprom.h>*/
|
---|
12 | /*#include <reboot.h>*/
|
---|
13 |
|
---|
14 | #include <mruby.h>
|
---|
15 | #include <mruby/string.h>
|
---|
16 | #include <mruby/variable.h>
|
---|
17 | #include <mruby/version.h>
|
---|
18 | /*#include <eeploader.h>*/
|
---|
19 |
|
---|
20 | #include "../llbruby.h"
|
---|
21 |
|
---|
22 | #if BOARD == BOARD_GR || FIRMWARE == SDBT || FIRMWARE == SDWF || BOARD == BOARD_P05 || BOARD == BOARD_P06
|
---|
23 | #include "sSdCard.h"
|
---|
24 | #include "sWiFi.h"
|
---|
25 | #endif
|
---|
26 |
|
---|
27 | #define EEPROMADDRESS 0xFF
|
---|
28 |
|
---|
29 | /******************************************************/
|
---|
30 | /* 終了させます*/
|
---|
31 | /* System.exit()*/
|
---|
32 | /* エラー値がもどり、即終了*/
|
---|
33 | /******************************************************/
|
---|
34 | mrb_value mrb_system_exit(mrb_state *mrb, mrb_value self)
|
---|
35 | {
|
---|
36 | mrb_raise(mrb, mrb_class_get(mrb, "Sys#exit Called"), "Normal Completion");
|
---|
37 |
|
---|
38 | return mrb_nil_value(); /*戻り値は無しですよ。*/
|
---|
39 | }
|
---|
40 |
|
---|
41 | /******************************************************/
|
---|
42 | /* 次に実行するスクリプトファイルをVmFilenameにセットします。*/
|
---|
43 | /* System.setRun( filename )*/
|
---|
44 | /******************************************************/
|
---|
45 | mrb_value mrb_system_setrun(mrb_state *mrb, mrb_value self)
|
---|
46 | {
|
---|
47 | mrb_value text;
|
---|
48 |
|
---|
49 | mrb_get_args(mrb, "S", &text);
|
---|
50 | char *str = RSTRING_PTR(text);
|
---|
51 | int len = RSTRING_LEN(text);
|
---|
52 | if (len > sizeof(RubyFilename) - 1)
|
---|
53 | len = sizeof(RubyFilename) - 1;
|
---|
54 |
|
---|
55 | strcpy(RubyFilename, (char*)str);
|
---|
56 | RubyFilename[0] = '\0';
|
---|
57 |
|
---|
58 | return mrb_nil_value(); /*戻り値は無しですよ。*/
|
---|
59 | }
|
---|
60 |
|
---|
61 | /******************************************************/
|
---|
62 | /* システムのバージョンを取得します*/
|
---|
63 | /* System.version([R])*/
|
---|
64 | /* 引数があればmrubyのバーションを返す*/
|
---|
65 | /******************************************************/
|
---|
66 | mrb_value mrb_system_version(mrb_state *mrb, mrb_value self)
|
---|
67 | {
|
---|
68 | int tmp;
|
---|
69 |
|
---|
70 | int n = mrb_get_args(mrb, "|i", &tmp);
|
---|
71 |
|
---|
72 | if (n >= 1) {
|
---|
73 | /*return mrb_const_get(mrb, mrb_obj_value(mrb->kernel_module), mrb_intern_lit(mrb, "MRUBY_VERSION"));*/
|
---|
74 | return mrb_str_new_cstr(mrb, MRUBY_VERSION);
|
---|
75 | }
|
---|
76 | return mrb_str_new_cstr(mrb, (const char*)ProgVer);
|
---|
77 | }
|
---|
78 |
|
---|
79 | /******************************************************/
|
---|
80 | /*フラッシュメモリに書き込みます*/
|
---|
81 | /* System.push(address, buf, length)*/
|
---|
82 | /* address: 書き込み開始アドレス(0x0000~0x00ff)*/
|
---|
83 | /* buf: 書き込むデータ*/
|
---|
84 | /* length: 書き込むサイズ*/
|
---|
85 | /* 戻り値*/
|
---|
86 | /* 1:成功, 0:失敗*/
|
---|
87 | /******************************************************/
|
---|
88 | mrb_value mrb_system_push(mrb_state *mrb, mrb_value self)
|
---|
89 | {
|
---|
90 | int address;
|
---|
91 | mrb_value value;
|
---|
92 | int len;
|
---|
93 | char *str;
|
---|
94 |
|
---|
95 | mrb_get_args(mrb, "iSi", &address, &value, &len);
|
---|
96 |
|
---|
97 | str = RSTRING_PTR(value);
|
---|
98 |
|
---|
99 | if (address > EEPROMADDRESS) {
|
---|
100 | return mrb_fixnum_value(0);
|
---|
101 | }
|
---|
102 |
|
---|
103 | int ret = 1;
|
---|
104 | for (int i = 0; i < len; i++) {
|
---|
105 | ret = EEPROM_write((unsigned long)address, (unsigned char)str[i]);
|
---|
106 | if (ret == -1) {
|
---|
107 | ret = 0;
|
---|
108 | break;
|
---|
109 | }
|
---|
110 | address++;
|
---|
111 | }
|
---|
112 |
|
---|
113 | return mrb_fixnum_value(ret);
|
---|
114 | }
|
---|
115 |
|
---|
116 | /******************************************************/
|
---|
117 | /*フラッシュメモリから読み出します*/
|
---|
118 | /* System.pop(address, length)*/
|
---|
119 | /* address: 読み込みアドレス(0x0000~0x00ff)*/
|
---|
120 | /* length: 読み込みサイズ(MAX 32バイト)*/
|
---|
121 | /* 戻り値*/
|
---|
122 | /* 読み込んだデータ*/
|
---|
123 | /******************************************************/
|
---|
124 | mrb_value mrb_system_pop(mrb_state *mrb, mrb_value self)
|
---|
125 | {
|
---|
126 | unsigned char str[32];
|
---|
127 | int address;
|
---|
128 | int len;
|
---|
129 |
|
---|
130 | mrb_get_args(mrb, "ii", &address, &len);
|
---|
131 |
|
---|
132 | if (len > 32) {
|
---|
133 | len = 32;
|
---|
134 | }
|
---|
135 |
|
---|
136 | if (address > EEPROMADDRESS) {
|
---|
137 | return mrb_str_new(mrb, (const char *)str, 0);
|
---|
138 | }
|
---|
139 |
|
---|
140 | for (int i = 0; i < len; i++) {
|
---|
141 | str[i] = EEPROM_read((unsigned long)address);
|
---|
142 | address++;
|
---|
143 | }
|
---|
144 |
|
---|
145 | return mrb_str_new(mrb, (const char *)str, len);
|
---|
146 | }
|
---|
147 |
|
---|
148 | /******************************************************/
|
---|
149 | /* ファイルローダーを呼び出します*/
|
---|
150 | /* System.fileload()*/
|
---|
151 | /******************************************************/
|
---|
152 | mrb_value mrb_system_fileload(mrb_state *mrb, mrb_value self)
|
---|
153 | {
|
---|
154 | /*ファイルローダーの呼び出し*/
|
---|
155 | if (fileloader((const char*)ProgVer, MRUBY_VERSION) == 1) {
|
---|
156 | mrb_full_gc(mrb); /*強制GCを入れる*/
|
---|
157 | /*強制終了*/
|
---|
158 | mrb_raise(mrb, mrb_class_get(mrb, "Sys#exit Called"), "Normal Completion");
|
---|
159 | }
|
---|
160 |
|
---|
161 | mrb_full_gc(mrb); /*強制GCを入れる*/
|
---|
162 |
|
---|
163 | return mrb_nil_value(); /*戻り値は無しですよ。*/
|
---|
164 | }
|
---|
165 |
|
---|
166 | /******************************************************/
|
---|
167 | /* リセットします*/
|
---|
168 | /* System.reset()*/
|
---|
169 | /******************************************************/
|
---|
170 | mrb_value mrb_system_reset(mrb_state *mrb, mrb_value self)
|
---|
171 | {
|
---|
172 | system_reboot(REBOOT_USERAPP); /*リセット後にユーザアプリを起動する*/
|
---|
173 |
|
---|
174 | return mrb_nil_value(); /*戻り値は無しですよ。*/
|
---|
175 | }
|
---|
176 |
|
---|
177 | /******************************************************/
|
---|
178 | /* SDカードを使えるようにします: System.useSD*/
|
---|
179 | /* System.useSD()*/
|
---|
180 | /*戻り値*/
|
---|
181 | /* 0:使用不可, 1:使用可能*/
|
---|
182 | /******************************************************/
|
---|
183 | mrb_value mrb_system_useSD(mrb_state *mrb, mrb_value self)
|
---|
184 | {
|
---|
185 | int ret = 0;
|
---|
186 |
|
---|
187 | #if BOARD == BOARD_GR || FIRMWARE == SDBT || FIRMWARE == SDWF || BOARD == BOARD_P05 || BOARD == BOARD_P06
|
---|
188 | ret = sdcard_Init(mrb); /*SDカード関連メソッドの設定*/
|
---|
189 | #endif
|
---|
190 |
|
---|
191 | return mrb_fixnum_value(ret);
|
---|
192 | }
|
---|
193 |
|
---|
194 | /******************************************************/
|
---|
195 | /* WiFiモジュールESP8266ボードを使えるようにします: System.useWiFi*/
|
---|
196 | /* System.useWiFi()*/
|
---|
197 | /*戻り値*/
|
---|
198 | /* 0:使用不可, 1:使用可能*/
|
---|
199 | /******************************************************/
|
---|
200 | mrb_value mrb_system_useWiFi(mrb_state *mrb, mrb_value self)
|
---|
201 | {
|
---|
202 | int ret = 0;
|
---|
203 |
|
---|
204 | #if (BOARD == FIRMWARE && BOARD == SDWF) || BOARD == BOARD_P05 || BOARD == BOARD_P06
|
---|
205 | ret = esp8266_Init(mrb); /*ESP8266ボード関連メソッドの設定*/
|
---|
206 | #endif
|
---|
207 |
|
---|
208 | return mrb_fixnum_value(ret);
|
---|
209 | }
|
---|
210 |
|
---|
211 | /******************************************************/
|
---|
212 | /* 実行しているmrbファイルパスを取得します: System.getMrbPath*/
|
---|
213 | /* System.getMrbPath()*/
|
---|
214 | /*戻り値*/
|
---|
215 | /* 実行しているmrbファイルパス*/
|
---|
216 | /******************************************************/
|
---|
217 | mrb_value mrb_system_getmrbpath(mrb_state *mrb, mrb_value self)
|
---|
218 | {
|
---|
219 | return mrb_str_new_cstr(mrb, (const char*)ExeFilename);
|
---|
220 | }
|
---|
221 |
|
---|
222 | /******************************************************/
|
---|
223 | /* ライブラリを定義します*/
|
---|
224 | /******************************************************/
|
---|
225 | void sys_Init(mrb_state *mrb)
|
---|
226 | {
|
---|
227 | struct RClass *systemModule = mrb_define_module(mrb, "System");
|
---|
228 |
|
---|
229 | mrb_define_module_function(mrb, systemModule, "exit", mrb_system_exit, MRB_ARGS_NONE());
|
---|
230 | mrb_define_module_function(mrb, systemModule, "reset", mrb_system_reset, MRB_ARGS_NONE());
|
---|
231 | mrb_define_module_function(mrb, systemModule, "setrun", mrb_system_setrun, MRB_ARGS_REQ(1));
|
---|
232 | mrb_define_module_function(mrb, systemModule, "version", mrb_system_version, MRB_ARGS_OPT(1));
|
---|
233 |
|
---|
234 | mrb_define_module_function(mrb, systemModule, "push", mrb_system_push, MRB_ARGS_REQ(3));
|
---|
235 | mrb_define_module_function(mrb, systemModule, "pop", mrb_system_pop, MRB_ARGS_REQ(2));
|
---|
236 |
|
---|
237 | mrb_define_module_function(mrb, systemModule, "fileload", mrb_system_fileload, MRB_ARGS_NONE());
|
---|
238 |
|
---|
239 | mrb_define_module_function(mrb, systemModule, "useSD", mrb_system_useSD, MRB_ARGS_NONE());
|
---|
240 | mrb_define_module_function(mrb, systemModule, "useWiFi", mrb_system_useWiFi, MRB_ARGS_NONE());
|
---|
241 |
|
---|
242 | mrb_define_module_function(mrb, systemModule, "getMrbPath", mrb_system_getmrbpath, MRB_ARGS_NONE());
|
---|
243 | }
|
---|