Takehisa Oneta / Mbed 2 deprecated TinyJS

Important changes to repositories hosted on mbed.com

Mbed hosted mercurial repositories are deprecated and are due to be permanently deleted in July 2026.

To keep a copy of this software download the repository Zip archive or clone locally using Mercurial.

It is also possible to export all your personal repositories from the account settings page.

Dependencies:   mbed

Script.cpp@0:aae260bdcdd9, 2014-01-11 (annotated)

Committer:
ohneta
Date:
Sat Jan 11 20:19:11 2014 +0000
Revision:
0:aae260bdcdd9
Child:
2:f0b75885747c
TinyJS for mbed porting.; 1st edition.

Who changed what in which revision?

UserRevisionLine numberNew contents of line
ohneta 0:aae260bdcdd9 1 /*
ohneta 0:aae260bdcdd9 2 * TinyJS
ohneta 0:aae260bdcdd9 3 *
ohneta 0:aae260bdcdd9 4 * A single-file Javascript-alike engine
ohneta 0:aae260bdcdd9 5 *
ohneta 0:aae260bdcdd9 6 * Authored By Gordon Williams <gw@pur3.co.uk>
ohneta 0:aae260bdcdd9 7 *
ohneta 0:aae260bdcdd9 8 * Copyright (C) 2009 Pur3 Ltd
ohneta 0:aae260bdcdd9 9 *
ohneta 0:aae260bdcdd9 10 * Permission is hereby granted, free of charge, to any person obtaining a copy of
ohneta 0:aae260bdcdd9 11 * this software and associated documentation files (the "Software"), to deal in
ohneta 0:aae260bdcdd9 12 * the Software without restriction, including without limitation the rights to
ohneta 0:aae260bdcdd9 13 * use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies
ohneta 0:aae260bdcdd9 14 * of the Software, and to permit persons to whom the Software is furnished to do
ohneta 0:aae260bdcdd9 15 * so, subject to the following conditions:
ohneta 0:aae260bdcdd9 16
ohneta 0:aae260bdcdd9 17 * The above copyright notice and this permission notice shall be included in all
ohneta 0:aae260bdcdd9 18 * copies or substantial portions of the Software.
ohneta 0:aae260bdcdd9 19
ohneta 0:aae260bdcdd9 20 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
ohneta 0:aae260bdcdd9 21 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
ohneta 0:aae260bdcdd9 22 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
ohneta 0:aae260bdcdd9 23 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
ohneta 0:aae260bdcdd9 24 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
ohneta 0:aae260bdcdd9 25 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
ohneta 0:aae260bdcdd9 26 * SOFTWARE.
ohneta 0:aae260bdcdd9 27 */
ohneta 0:aae260bdcdd9 28
ohneta 0:aae260bdcdd9 29 /*
ohneta 0:aae260bdcdd9 30 * This is a simple program showing how to use TinyJS
ohneta 0:aae260bdcdd9 31 */
ohneta 0:aae260bdcdd9 32
ohneta 0:aae260bdcdd9 33 /*
ohneta 0:aae260bdcdd9 34 * TinyJS for mbed.
ohneta 0:aae260bdcdd9 35 *
ohneta 0:aae260bdcdd9 36 * Authored by Takehisa Oneta (ohneta@gmail.com)
ohneta 0:aae260bdcdd9 37 * 10th Jan. 2013
ohneta 0:aae260bdcdd9 38 */
ohneta 0:aae260bdcdd9 39 #include "TinyJS.h"
ohneta 0:aae260bdcdd9 40 #include "TinyJS_Functions.h"
ohneta 0:aae260bdcdd9 41 #include <assert.h>
ohneta 0:aae260bdcdd9 42 #include <stdio.h>
ohneta 0:aae260bdcdd9 43
ohneta 0:aae260bdcdd9 44 #include "mbed.h"
ohneta 0:aae260bdcdd9 45
ohneta 0:aae260bdcdd9 46
ohneta 0:aae260bdcdd9 47 //const char *code = "var a = 5; if (a==5) a=4; else a=3;";
ohneta 0:aae260bdcdd9 48 //const char *code = "{ var a = 4; var b = 1; while (a>0) { b = b * 2; a = a - 1; } var c = 5; }";
ohneta 0:aae260bdcdd9 49 //const char *code = "{ var b = 1; for (var i=0;i<4;i=i+1) b = b * 2; }";
ohneta 0:aae260bdcdd9 50 const char *code = "function myfunc(x, y) { return x + y; } var a = myfunc(1,2); print(a);";
ohneta 0:aae260bdcdd9 51
ohneta 0:aae260bdcdd9 52 void js_print(CScriptVar *v, void *userdata) {
ohneta 0:aae260bdcdd9 53 printf("> %s\n", v->getParameter("text")->getString().c_str());
ohneta 0:aae260bdcdd9 54 }
ohneta 0:aae260bdcdd9 55
ohneta 0:aae260bdcdd9 56 void js_dump(CScriptVar *v, void *userdata) {
ohneta 0:aae260bdcdd9 57 CTinyJS *js = (CTinyJS*)userdata;
ohneta 0:aae260bdcdd9 58 js->root->trace("> ");
ohneta 0:aae260bdcdd9 59 }
ohneta 0:aae260bdcdd9 60
ohneta 0:aae260bdcdd9 61 #ifndef MBED
ohneta 0:aae260bdcdd9 62 int main(int argc, char **argv)
ohneta 0:aae260bdcdd9 63 {
ohneta 0:aae260bdcdd9 64 CTinyJS *js = new CTinyJS();
ohneta 0:aae260bdcdd9 65 /* add the functions from TinyJS_Functions.cpp */
ohneta 0:aae260bdcdd9 66 registerFunctions(js);
ohneta 0:aae260bdcdd9 67 /* Add a native function */
ohneta 0:aae260bdcdd9 68 js->addNative("function print(text)", &js_print, 0);
ohneta 0:aae260bdcdd9 69 js->addNative("function dump()", &js_dump, js);
ohneta 0:aae260bdcdd9 70 /* Execute out bit of code - we could call 'evaluate' here if
ohneta 0:aae260bdcdd9 71 we wanted something returned */
ohneta 0:aae260bdcdd9 72 try {
ohneta 0:aae260bdcdd9 73 js->execute("var lets_quit = 0; function quit() { lets_quit = 1; }");
ohneta 0:aae260bdcdd9 74 js->execute("print(\"Interactive mode... Type quit(); to exit, or print(...); to print something, or dump() to dump the symbol table!\");");
ohneta 0:aae260bdcdd9 75 } catch (CScriptException *e) {
ohneta 0:aae260bdcdd9 76 printf("ERROR: %s\n", e->text.c_str());
ohneta 0:aae260bdcdd9 77 }
ohneta 0:aae260bdcdd9 78
ohneta 0:aae260bdcdd9 79 while (js->evaluate("lets_quit") == "0") {
ohneta 0:aae260bdcdd9 80 char buffer[2048];
ohneta 0:aae260bdcdd9 81 fgets ( buffer, sizeof(buffer), stdin );
ohneta 0:aae260bdcdd9 82 try {
ohneta 0:aae260bdcdd9 83 js->execute(buffer);
ohneta 0:aae260bdcdd9 84 } catch (CScriptException *e) {
ohneta 0:aae260bdcdd9 85 printf("ERROR: %s\n", e->text.c_str());
ohneta 0:aae260bdcdd9 86 }
ohneta 0:aae260bdcdd9 87 }
ohneta 0:aae260bdcdd9 88 delete js;
ohneta 0:aae260bdcdd9 89 #ifdef _WIN32
ohneta 0:aae260bdcdd9 90 #ifdef _DEBUG
ohneta 0:aae260bdcdd9 91 _CrtDumpMemoryLeaks();
ohneta 0:aae260bdcdd9 92 #endif
ohneta 0:aae260bdcdd9 93 #endif
ohneta 0:aae260bdcdd9 94 return 0;
ohneta 0:aae260bdcdd9 95 }
ohneta 0:aae260bdcdd9 96 #else
ohneta 0:aae260bdcdd9 97
ohneta 0:aae260bdcdd9 98 int mbedErrorFlag;
ohneta 0:aae260bdcdd9 99 std::string mbedErrorMessage;
ohneta 0:aae260bdcdd9 100
ohneta 0:aae260bdcdd9 101 extern int readOneLine(char *buffer, const int bufferSize);
ohneta 0:aae260bdcdd9 102
ohneta 0:aae260bdcdd9 103 // mbed function(s)
ohneta 0:aae260bdcdd9 104 extern void mbedDigitalOut(CScriptVar *c, void *);
ohneta 0:aae260bdcdd9 105 extern char *mbedLedsVarString(int ledNo);
ohneta 0:aae260bdcdd9 106 extern void mbedMemfree(CScriptVar *c, void *);
ohneta 0:aae260bdcdd9 107
ohneta 0:aae260bdcdd9 108
ohneta 0:aae260bdcdd9 109 int tinyjs_main(int argc, char **argv)
ohneta 0:aae260bdcdd9 110 {
ohneta 0:aae260bdcdd9 111 CTinyJS *js = new CTinyJS();
ohneta 0:aae260bdcdd9 112 //registerFunctions(js);
ohneta 0:aae260bdcdd9 113
ohneta 0:aae260bdcdd9 114 js->addNative("function print(text)", &js_print, 0);
ohneta 0:aae260bdcdd9 115 js->addNative("function dump()", &js_dump, js);
ohneta 0:aae260bdcdd9 116
ohneta 0:aae260bdcdd9 117 js->execute("var lets_quit = 0; function quit() { lets_quit = 1; }");
ohneta 0:aae260bdcdd9 118 js->execute("print(\"Interactive mode... Type quit(); to exit, or print(...); to print something, or dump() to dump the symbol table!\");");
ohneta 0:aae260bdcdd9 119
ohneta 0:aae260bdcdd9 120 // add mbed functions
ohneta 0:aae260bdcdd9 121 js->addNative("function mbed.memfree()", &mbedMemfree, 0);
ohneta 0:aae260bdcdd9 122 js->addNative("function mbed.DigitalOut(pinName, val)", &mbedDigitalOut, 0);
ohneta 0:aae260bdcdd9 123 js->execute(mbedLedsVarString(1));
ohneta 0:aae260bdcdd9 124 js->execute(mbedLedsVarString(2));
ohneta 0:aae260bdcdd9 125 js->execute(mbedLedsVarString(3));
ohneta 0:aae260bdcdd9 126 js->execute(mbedLedsVarString(4));
ohneta 0:aae260bdcdd9 127
ohneta 0:aae260bdcdd9 128 while (js->evaluate("lets_quit") == "0") {
ohneta 0:aae260bdcdd9 129 char buffer[2048];
ohneta 0:aae260bdcdd9 130 int len = readOneLine(buffer, 2048);
ohneta 0:aae260bdcdd9 131 {
ohneta 0:aae260bdcdd9 132 mbedErrorFlag = 0;
ohneta 0:aae260bdcdd9 133 js->execute(buffer);
ohneta 0:aae260bdcdd9 134 if (mbedErrorFlag != 0) {
ohneta 0:aae260bdcdd9 135 printf("ERROR: %s\n", mbedErrorMessage.c_str());
ohneta 0:aae260bdcdd9 136 }
ohneta 0:aae260bdcdd9 137 }
ohneta 0:aae260bdcdd9 138 }
ohneta 0:aae260bdcdd9 139 delete js;
ohneta 0:aae260bdcdd9 140
ohneta 0:aae260bdcdd9 141 #ifdef _WIN32
ohneta 0:aae260bdcdd9 142 #ifdef _DEBUG
ohneta 0:aae260bdcdd9 143 _CrtDumpMemoryLeaks();
ohneta 0:aae260bdcdd9 144 #endif
ohneta 0:aae260bdcdd9 145 #endif
ohneta 0:aae260bdcdd9 146 return 0;
ohneta 0:aae260bdcdd9 147 }
ohneta 0:aae260bdcdd9 148 #endif