Import of the watch repository from Pebble

third_party/jerryscript/targets/curie_bsp/source/curie-bsp-port.c

@@ -0,0 +1,93 @@
+/* Copyright 2016 Intel Corporation
+ *
+ * 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 <infra/time.h>
+#include <misc/printk.h>
+#include <stdint.h>
+#include <stdbool.h>
+#include <stddef.h>
+#include "jerry-port.h"
+
+/**
+ * Provide console message implementation for the engine.
+ * Curie BSP implementation
+ */
+void
+jerry_port_console (const char *format, /**< format string */
+                    ...) /**< parameters */
+{
+  char buf[256];
+  int length = 0;
+  va_list args;
+  va_start (args, format);
+  length = vsnprintf (buf, 256, format, args);
+  buf[length] = '\0';
+  printk ("%s", buf);
+  va_end (args);
+} /* jerry_port_console */
+
+/**
+ * Provide log message implementation for the engine.
+ * Curie BSP implementation
+ */
+void
+jerry_port_log (jerry_log_level_t level, /**< log level */
+                const char *format, /**< format string */
+                ...)  /**< parameters */
+{
+  if (level <= JERRY_LOG_LEVEL_ERROR)
+  {
+    char buf[256];
+    int length = 0;
+    va_list args;
+    va_start (args, format);
+    length = vsnprintf (buf, 256, format, args);
+    buf[length] = '\0';
+    printk ("%s", buf);
+    va_end (args);
+  }
+} /* jerry_port_log */
+
+/**
+ * Curie BSP implementation of jerry_port_fatal.
+ */
+void jerry_port_fatal (jerry_fatal_code_t code)
+{
+  jerry_port_log (JERRY_LOG_LEVEL_ERROR, "Jerry Fatal Error!\n");
+  while (true);
+} /* jerry_port_fatal */
+
+/**
+ * Curie BSP implementation of jerry_port_get_time_zone.
+ */
+bool jerry_port_get_time_zone (jerry_time_zone_t *tz_p)
+{
+  //EMPTY implementation
+  tz_p->offset = 0;
+  tz_p->daylight_saving_time = 0;
+
+  return true;
+} /* jerry_port_get_time_zone */
+
+/**
+ * Curie BSP implementation of jerry_port_get_current_time.
+ */
+double jerry_port_get_current_time ()
+{
+  uint32_t uptime_ms = get_uptime_ms ();
+  uint32_t epoch_time = uptime_to_epoch (uptime_ms);
+
+  return ((double) epoch_time) * 1000.0;
+} /* jerry_port_get_current_time */

third_party/jerryscript/targets/curie_bsp/source/setjmp.S

@@ -0,0 +1,78 @@
+/* Copyright 2014-2016 Samsung Electronics Co., Ltd.
+ * Copyright 2016 Intel Corporation
+ *
+ * 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.
+ */
+
+.macro func _name
+.global \_name
+.type \_name, %function
+\_name:
+.endm
+.macro endfunc _name
+.size \_name, .-\_name
+.endm
+
+/**
+ * setjmp (jmp_buf env)
+ *
+ * See also:
+ *          longjmp
+ *
+ * @return 0 - if returns from direct call,
+ *         nonzero - if returns after longjmp.
+ */
+func setjmp
+  mov    %eax,(%eax);
+  mov    %ebx,0x4(%eax);
+  mov    %ecx,0x8(%eax);
+  mov    %edx,0xc(%eax);
+  mov    %esi,0x10(%eax);
+  mov    %edi,0x14(%eax);
+  mov    %ebp,0x18(%eax);
+  mov    %esp,0x1c(%eax);
+  push   %edx;
+  mov    0x4(%esp),%edx;
+  mov    %edx,0x20(%eax);
+  pop    %edx;
+  xor    %eax,%eax;
+  ret
+endfunc setjmp
+
+/**
+ * longjmp (jmp_buf env, int val)
+ *
+ * Note:
+ *      if val is not 0, then it would be returned from setjmp,
+ *      otherwise - 0 would be returned.
+ *
+ * See also:
+ *          setjmp
+ */
+func longjmp
+  test   %edx, %edx;
+  jne    . + 0x3;
+  inc    %edx;
+  mov    0x4(%eax),%ebx;
+  mov    0x8(%eax),%ecx;
+  mov    0x10(%eax),%esi;
+  mov    0x14(%eax),%edi;
+  mov    0x18(%eax),%ebp;
+  mov    0x1c(%eax),%esp;
+  push   %edx;
+  mov    0x20(%eax),%edx;
+  mov    %edx,0x4(%esp);
+  mov    0xc(%eax),%edx;
+  pop    %eax;
+  ret
+endfunc longjmp