Import of the watch repository from Pebble

third_party/jerryscript/targets/mbed/source/jerry_extapi.cpp

@@ -0,0 +1,149 @@
+/* Copyright 2014-2015 Samsung Electronics Co., Ltd.
+ * Copyright 2016 University of Szeged.
+ *
+ * Licensed under the Apache License, Version 2.0 (the "License");
+ * you may not use this file except in compliance with the License.
+ * You may obtain a copy of the License at
+ *
+ *     http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ */
+
+#include <stdlib.h>
+#include <stdio.h>
+
+#include "jerry-core/jerry-api.h"
+#include "jerry_extapi.h"
+
+#include "native_mbed.h"
+
+#ifndef MIN
+#define MIN(A,B) ((A)<(B)?(A):(B))
+#endif
+
+//-----------------------------------------------------------------------------
+
+#define __UNSED__ __attribute__((unused))
+
+#define DECLARE_HANDLER(NAME) \
+static jerry_value_t \
+NAME ## _handler (const jerry_value_t func_value __UNSED__, \
+                  const jerry_value_t this_value __UNSED__, \
+                  const jerry_value_t args[], \
+                  const jerry_length_t args_cnt )
+
+#define REGISTER_HANDLER(NAME) \
+  register_native_function ( # NAME, NAME ## _handler)
+
+//-----------------------------------------------------------------------------
+
+DECLARE_HANDLER(assert)
+{
+  if (args_cnt == 1
+      && jerry_value_is_boolean (args[0])
+      && jerry_get_boolean_value (args[0]))
+  {
+    printf (">> Jerry assert true\r\n");
+    return jerry_create_boolean (true);
+  }
+  printf ("ERROR: Script assertion failed\n");
+  exit (JERRY_STANDALONE_EXIT_CODE_FAIL);
+  return jerry_create_boolean (false);
+}
+
+DECLARE_HANDLER(led)
+{
+  jerry_value_t ret_val;
+
+  if (args_cnt < 2)
+  {
+    ret_val = jerry_create_boolean (false);
+    printf ("Error: invalid arguments number!\r\n");
+    return ret_val;
+  }
+
+  if (!(jerry_value_is_number (args[0])
+        && jerry_value_is_number (args[1])))
+  {
+    ret_val = jerry_create_boolean (false);
+    printf ("Error: arguments must be numbers!\r\n");
+    return ret_val;
+  }
+
+  int port, value;
+  port = (int) jerry_get_number_value (args[0]);
+  value = (int) jerry_get_number_value (args[1]);
+
+  if (port >= 0 && port <= 3)
+  {
+    native_led (port, value);
+    ret_val = jerry_create_boolean (true);
+  }
+  else
+  {
+    ret_val = jerry_create_boolean (false);
+  }
+  return ret_val;
+}
+
+//-----------------------------------------------------------------------------
+
+static bool
+register_native_function (const char* name,
+                          jerry_external_handler_t handler)
+{
+  jerry_value_t global_object_val = jerry_get_global_object ();
+  jerry_value_t reg_function = jerry_create_external_function (handler);
+
+  bool is_ok = true; 
+
+  if (!(jerry_value_is_function (reg_function)
+        && jerry_value_is_constructor (reg_function)))
+  {
+    is_ok = false;
+    printf ("Error: create_external_function failed !!!\r\n");
+    jerry_release_value (global_object_val);
+    jerry_release_value (reg_function);
+    return is_ok;
+  }
+
+  if (jerry_value_has_error_flag (reg_function))
+  {
+    is_ok = false;
+    printf ("Error: create_external_function has error flag! \n\r");
+    jerry_release_value (global_object_val);
+    jerry_release_value (reg_function);
+    return is_ok;
+  }
+
+  jerry_value_t jerry_name = jerry_create_string ((jerry_char_t *) name);
+
+  jerry_value_t set_result = jerry_set_property (global_object_val,
+                                                 jerry_name,
+                                                 reg_function);
+
+
+  if (jerry_value_has_error_flag (set_result))
+  {
+    is_ok = false;
+    printf ("Error: register_native_function failed: [%s]\r\n", name);
+  }
+
+  jerry_release_value (jerry_name);
+  jerry_release_value (global_object_val);
+  jerry_release_value (reg_function);
+  jerry_release_value (set_result);
+
+  return is_ok;
+}
+
+void js_register_functions (void)
+{
+  REGISTER_HANDLER (assert);
+  REGISTER_HANDLER (led);
+}

third_party/jerryscript/targets/mbed/source/jerry_extapi.h

@@ -0,0 +1,24 @@
+/* Copyright 2015 Samsung Electronics Co., Ltd.
+ *
+ * Licensed under the Apache License, Version 2.0 (the "License");
+ * you may not use this file except in compliance with the License.
+ * You may obtain a copy of the License at
+ *
+ *     http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ */
+
+#ifndef __JERRY_EXTAPI_H__
+#define __JERRY_EXTAPI_H__
+
+#define JERRY_STANDALONE_EXIT_CODE_OK   (0)
+#define JERRY_STANDALONE_EXIT_CODE_FAIL (1)
+
+void js_register_functions (void);
+
+#endif

third_party/jerryscript/targets/mbed/source/jerry_run.cpp

@@ -0,0 +1,128 @@
+/* Copyright 2014-2015 Samsung Electronics Co., Ltd.
+ * Copyright 2016 University of Szeged.
+ *
+ * Licensed under the Apache License, Version 2.0 (the "License");
+ * you may not use this file except in compliance with the License.
+ * You may obtain a copy of the License at
+ *
+ *     http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ */
+
+#include <stdlib.h>
+#include <stdio.h>
+
+#include "jerry-core/jerry-api.h"
+#include "jerry_extapi.h"
+#include "jerry_run.h"
+
+static const char* fn_sys_loop_name = "sysloop";
+
+int js_entry (const char *source_p, const size_t source_size)
+{
+  const jerry_char_t *jerry_src = (const jerry_char_t *) source_p;
+  jerry_init (JERRY_INIT_EMPTY);
+  uint8_t ret_code = 0;
+
+  js_register_functions ();
+
+  jerry_value_t parsed_code = jerry_parse (jerry_src, source_size, false);
+
+  if (!jerry_value_has_error_flag (parsed_code))
+  {
+    jerry_value_t ret_value = jerry_run (parsed_code);
+
+    if (jerry_value_has_error_flag (ret_value))
+      {
+      printf ("Error: ret_value has an error flag!\r\n");
+      return ret_code = -1;
+      }
+
+    jerry_release_value (ret_value);
+  }
+  else
+  {
+    printf ("Error: jerry_parse failed!\r\n");
+    ret_code = -1;
+  }
+
+  jerry_release_value (parsed_code);
+
+  return ret_code;
+}
+
+int js_eval (const char *source_p, const size_t source_size)
+{
+  int status = 0;
+
+  jerry_value_t ret_val = jerry_eval ((jerry_char_t *) source_p,
+                                      source_size,
+                                      false);
+
+  if (jerry_value_has_error_flag (ret_val))
+  {
+    printf ("Error: jerry_eval failed!\r\n");
+    status = -1;
+  }
+
+  jerry_release_value (ret_val);
+
+  return status;
+}
+
+int js_loop (uint32_t ticknow)
+{
+  int status = 0;
+  jerry_value_t global_obj = jerry_get_global_object ();
+  jerry_value_t sys_name = jerry_create_string ((const jerry_char_t *) fn_sys_loop_name);
+  jerry_value_t sysloop_func = jerry_get_property (global_obj, sys_name);
+  
+  jerry_release_value (sys_name);
+
+  if (jerry_value_has_error_flag (sysloop_func))
+  {
+    printf ("Error: '%s' not defined!!!\r\n", fn_sys_loop_name);
+    jerry_release_value (global_obj);
+    jerry_release_value (sysloop_func);
+    return -1;
+  }
+
+  if (!jerry_value_is_function (sysloop_func))
+  {
+    printf ("Error: '%s' is not a function!!!\r\n", fn_sys_loop_name);
+    jerry_release_value (global_obj);
+    jerry_release_value (sysloop_func);
+    return -2;
+  }
+
+  jerry_value_t val_args[1];
+  uint16_t val_argv = 1;
+
+  val_args[0] = jerry_create_number (ticknow);
+
+  jerry_value_t ret_val_sysloop = jerry_call_function (sysloop_func,
+                                                       global_obj,
+                                                       val_args,
+                                                       val_argv);
+  if (jerry_value_has_error_flag (ret_val_sysloop))
+  {
+    status = -3;
+  }
+
+  jerry_release_value (global_obj);
+  jerry_release_value (ret_val_sysloop);
+  jerry_release_value (sysloop_func);
+  jerry_release_value (val_args[0]);
+
+  return status;
+}
+
+void js_exit (void)
+{
+  jerry_cleanup ();
+}

third_party/jerryscript/targets/mbed/source/jerry_run.h

@@ -0,0 +1,24 @@
+/* Copyright 2015 Samsung Electronics Co., Ltd.
+ *
+ * Licensed under the Apache License, Version 2.0 (the "License");
+ * you may not use this file except in compliance with the License.
+ * You may obtain a copy of the License at
+ *
+ *     http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ */
+
+#ifndef __JERRY_RUN_H__
+#define __JERRY_RUN_H__
+
+int js_entry (const char *source_p, const size_t source_size);
+int js_eval (const char *source_p, const size_t source_size);
+int js_loop (uint32_t ticknow);
+void js_exit (void);
+
+#endif

third_party/jerryscript/targets/mbed/source/main.cpp

@@ -0,0 +1,73 @@
+/* Copyright 2014-2015 Samsung Electronics Co., Ltd.
+ * Copyright 2016 University of Szeged.
+ *
+ * Licensed under the Apache License, Version 2.0 (the "License");
+ * you may not use this file except in compliance with the License.
+ * You may obtain a copy of the License at
+ *
+ *     http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ */
+
+#include "mbed-drivers/mbed.h"
+
+#include "jerry-core/jerry-api.h"
+#include "jerry_run.h"
+
+#include "jerry_targetjs.h"
+
+static Serial pc (USBTX, USBRX); //tx, rx
+
+static int jerry_task_init (void)
+{
+  int retcode;
+
+  DECLARE_JS_CODES;
+
+  /* run main.js */
+  retcode = js_entry (js_codes[0].source, js_codes[0].length);
+  if (retcode != 0)
+  {
+    printf ("js_entry failed code(%d) [%s]\r\n", retcode, js_codes[0].name);
+    js_exit ();
+    return -1;
+  }
+  /* run rest of the js files */
+  for (int src = 1; js_codes[src].source; src++)
+  {
+    retcode = js_eval (js_codes[src].source, js_codes[src].length);
+    if (retcode != 0)
+    {
+      printf ("js_eval failed code(%d) [%s]\r\n", retcode, js_codes[src].name);
+      js_exit ();
+      return -2;
+    }
+  }
+  return 0;
+}
+
+static void jerry_loop (void)
+{
+  static uint32_t _jcount = 0;
+
+  js_loop (_jcount++);
+}
+
+void app_start (int, char**)
+{
+  /* set 9600 baud rate for stdout */
+  pc.baud (9600);
+
+  printf ("\r\nJerryScript in mbed\r\n");
+  printf ("Version: \t%d.%d\n\n", JERRY_API_MAJOR_VERSION, JERRY_API_MINOR_VERSION);
+  
+  if (jerry_task_init () == 0)
+  {
+    minar::Scheduler::postCallback(jerry_loop).period(minar::milliseconds(100));
+  }
+}

third_party/jerryscript/targets/mbed/source/makejerry.cmake

@@ -0,0 +1,30 @@
+# Copyright 2015-2016 Samsung Electronics Co., Ltd.
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+
+# application name
+set(MBEDMODULE "jerry")
+
+# add include jerry-core
+set(LJCORE ${CMAKE_CURRENT_LIST_DIR}/../../../)
+include_directories(${LJCORE})
+
+# compile flags
+set(CMAKE_C_FLAGS "${CMAKE_C_FLAGS} -mlittle-endian -mthumb -mcpu=cortex-m4" )
+
+# link jerryscript
+set(LJPATH ${CMAKE_CURRENT_LIST_DIR}/../libjerry)
+set(LJFILES "")
+set(LJFILES ${LJFILES} ${LJPATH}/libjerrylibm.a)
+set(LJFILES ${LJFILES} ${LJPATH}/libjerrycore.a)
+target_link_libraries(${MBEDMODULE} ${LJFILES})

third_party/jerryscript/targets/mbed/source/native_mbed.cpp

@@ -0,0 +1,25 @@
+/* Copyright 2014-2015 Samsung Electronics Co., Ltd.
+ *
+ * Licensed under the Apache License, Version 2.0 (the "License");
+ * you may not use this file except in compliance with the License.
+ * You may obtain a copy of the License at
+ *
+ *     http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ */
+
+#include "mbed-drivers/mbed.h"
+
+#include "native_mbed.h"
+
+void native_led (int port, int val)
+{
+  static const PinName portmap[] = { LED1, LED2, LED3, LED4 };
+  static DigitalOut led (portmap[port]);
+  led = val;
+}

third_party/jerryscript/targets/mbed/source/native_mbed.h

@@ -0,0 +1,21 @@
+/* Copyright 2014-2015 Samsung Electronics Co., Ltd.
+ *
+ * Licensed under the Apache License, Version 2.0 (the "License");
+ * you may not use this file except in compliance with the License.
+ * You may obtain a copy of the License at
+ *
+ *     http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ */
+
+#ifndef __NATIVE_MBED_H__
+#define __NATIVE_MBED_H__
+
+void native_led (int port, int val);
+
+#endif /* !__NATIVE_MBED_H__ */

third_party/jerryscript/targets/mbed/source/port/jerry_port.c

@@ -0,0 +1,86 @@
+/* Copyright 2016 University of Szeged.
+ *
+ * Licensed under the Apache License, Version 2.0 (the "License");
+ * you may not use this file except in compliance with the License.
+ * You may obtain a copy of the License at
+ *
+ *     http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ */
+
+#define _BSD_SOURCE
+#include <stdarg.h>
+#include <stdlib.h>
+#include <sys/time.h>
+
+#include "jerry-core/jerry-port.h"
+
+#include "mbed-hal/us_ticker_api.h"
+
+/**
+ * Provide console message implementation for the engine.
+ */
+void
+jerry_port_console (const char *format, /**< format string */
+                    ...) /**< parameters */
+{
+  va_list args;
+  va_start (args, format);
+  vfprintf (stdout, format, args);
+  va_end (args);
+} /* jerry_port_console */
+
+/**
+ * Provide log message implementation for the engine.
+ */
+void
+jerry_port_log (jerry_log_level_t level, /**< log level */
+                const char *format, /**< format string */
+                ...)  /**< parameters */
+{
+  (void) level; /* ignore log level */
+
+  va_list args;
+  va_start (args, format);
+  vfprintf (stderr, format, args);
+  va_end (args);
+} /* jerry_port_log */
+
+/**
+ * Implementation of jerry_port_fatal.
+ */
+void
+jerry_port_fatal (jerry_fatal_code_t code, /**< fatal code enum item,  */
+                  void *lr) /**< return address at time failure occurred */
+{
+  exit (code);
+} /* jerry_port_fatal */
+
+/**
+ * Implementation of jerry_port_get_time_zone.
+ * 
+ * @return true - if success
+ */
+bool
+jerry_port_get_time_zone (jerry_time_zone_t *tz_p) /**< timezone pointer */
+{
+  tz_p->offset = 0;
+  tz_p->daylight_saving_time = 0;
+  return true;
+} /* jerry_port_get_time_zone */
+
+/**
+ * Implementation of jerry_port_get_current_time.
+ *
+ * @return current timer's counter value in microseconds 
+ */
+double
+jerry_port_get_current_time ()
+{
+  return (double) us_ticker_read ();
+} /* jerry_port_get_current_time */