wasm-micro-runtime/product-mini/platforms/rt-thread/iwasm.c
2025-03-07 08:21:54 +08:00

452 lines
11 KiB
C

/*
* Copyright (c) 2021, RT-Thread Development Team
*
* SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
*/
#include <rtthread.h>
#include "wasm_export.h"
#include "platform_api_vmcore.h"
#include <dfs.h>
#include <dfs_file.h>
#include <dfs_fs.h>
#if WASM_ENABLE_LIBC_WASI != 0
#include "../common/libc_wasi.c"
#endif
#ifdef WAMR_ENABLE_RTT_EXPORT
#ifdef WAMR_RTT_EXPORT_VPRINTF
static int
wasm_vprintf(wasm_exec_env_t env, const char *fmt, va_list va)
{
return vprintf(fmt, va);
}
static int
wasm_vsprintf(wasm_exec_env_t env, char *buf, const char *fmt, va_list va)
{
return vsprintf(buf, fmt, va);
}
static int
wasm_vsnprintf(wasm_exec_env_t env, char *buf, int n, const char *fmt,
va_list va)
{
return vsnprintf(buf, n, fmt, va);
}
#endif /* WAMR_RTT_EXPORT_VPRINTF */
#ifdef WAMR_RTT_EXPORT_DEVICE_OPS
static rt_device_t
wasm_rt_device_find(wasm_exec_env_t env, const char *name)
{
return rt_device_find(name);
}
static rt_err_t
wasm_rt_device_open(wasm_exec_env_t env, rt_device_t dev, rt_uint16_t o_flag)
{
return rt_device_open(dev, o_flag);
}
static rt_size_t
wasm_rt_device_write(wasm_exec_env_t env, rt_device_t dev, rt_off_t offset,
const void *buf, rt_size_t size)
{
return rt_device_write(dev, offset, buf, size);
}
static rt_size_t
wasm_rt_device_read(wasm_exec_env_t env, rt_device_t dev, rt_off_t offset,
void *buf, rt_size_t size)
{
return rt_device_read(dev, offset, buf, size);
}
static rt_err_t
wasm_rt_device_close(wasm_exec_env_t env, rt_device_t dev)
{
return rt_device_close(dev);
}
static rt_err_t
wasm_rt_device_control(wasm_exec_env_t env, rt_device_t dev, int cmd, void *arg)
{
return rt_device_control(dev, cmd, arg);
}
#endif /* WAMR_RTT_EXPORT_DEVICE_OPS */
/* clang-format off */
static NativeSymbol native_export_symbols[] = {
#ifdef WAMR_RTT_EXPORT_VPRINTF
{
"vprintf",
wasm_vprintf,
"($*)i"
},
{
"vsprintf",
wasm_vsprintf,
"($$*)i"
},
{
"vsnprintf",
wasm_vsnprintf,
"($i$*)i"
},
#endif /* WAMR_RTT_EXPORT_VPRINTF */
#ifdef WAMR_RTT_EXPORT_DEVICE_OPS
{
"rt_device_find",
wasm_rt_device_find,
"($)i"
},
{
"rt_device_open",
wasm_rt_device_open,
"(ii)i"
},
{
"rt_device_write",
wasm_rt_device_write,
"(ii*~)i"
},
{
"rt_device_read",
wasm_rt_device_read,
"(ii*~)i"
},
{
"rt_device_close",
wasm_rt_device_close,
"(i)i"
},
{
"rt_device_control",
wasm_rt_device_control,
"(ii*)i"
},
#ifdef WAMR_RTT_EXPORT_DEVICE_OPS_CPP
{
"_Z15rt_device_closeP9rt_device",
wasm_rt_device_close,
"(i)i"
},
{
"_Z14rt_device_readP9rt_devicejPvj",
wasm_rt_device_read,
"(ii*~)i"
},
{
"_Z15rt_device_writeP9rt_devicejPKvj",
wasm_rt_device_write,
"(ii*~)i"
},
{
"_Z14rt_device_openP9rt_devicet",
wasm_rt_device_open,
"(ii)i"
},
{
"_Z14rt_device_findPKc",
wasm_rt_device_find,
"($)i"
},
#endif /* WAMR_RTT_EXPORT_DEVICE_OPS_CPP */
#endif /* WAMR_RTT_EXPORT_DEVICE_OPS */
};
/* clang-format on */
#endif /* WAMR_ENABLE_RTT_EXPORT */
static void *
app_instance_func(wasm_module_inst_t module_inst, const char *func_name,
int app_argc, char **app_argv)
{
wasm_application_execute_func(module_inst, func_name, app_argc - 1,
app_argv + 1);
return wasm_runtime_get_exception(module_inst);
}
/**
* run WASM module instance.
* @param module_inst instance of wasm module
* @param app_argc wasm argument count
* @param app_argv wasm arguments
* @return NULL
*/
static void *
app_instance_main(wasm_module_inst_t module_inst, int app_argc, char **app_argv)
{
wasm_application_execute_main(module_inst, app_argc, app_argv);
return wasm_runtime_get_exception(module_inst);
}
rt_uint8_t *
my_read_file_to_buffer(char *filename, rt_uint32_t *size)
{
struct stat f_stat;
if (!filename || !size) {
rt_set_errno(-EINVAL);
return RT_NULL;
}
if (stat(filename, &f_stat) != 0) {
rt_set_errno(errno);
return RT_NULL;
}
if (f_stat.st_size <= 0) {
rt_set_errno(-EINVAL);
return RT_NULL;
}
rt_uint8_t *buff = rt_malloc(f_stat.st_size);
*size = 0;
if (!buff) {
rt_set_errno(-ENOMEM);
return RT_NULL;
}
int fd = open(filename, O_RDONLY);
if (fd < 0) {
rt_free(buff);
rt_set_errno(fd);
return RT_NULL;
}
*size = read(fd, buff, f_stat.st_size);
close(fd);
if (*size != f_stat.st_size) {
rt_free(buff);
rt_set_errno(-EBADF);
return RT_NULL;
}
return buff;
}
void
iwasm_help(void)
{
#ifdef WAMR_ENABLE_IWASM_PARAMS
rt_kputs("Usage: iwasm [-options] wasm_file [args...]\n");
rt_kputs("options:\n");
rt_kputs(" -t Show time taking to run this app.\n");
rt_kputs(" -m Show memory taking to run this app\n");
rt_kputs(" -f|--function name Specify a function name of the module "
"to run rather than main\n");
rt_kputs(" --max-threads=n Set maximum thread number per "
"cluster, default is 4\n");
#else
rt_kputs("Usage: iwasm wasm_file [args...]\n");
#endif /* WAMR_ENABLE_PARAMS */
}
int
iwasm(int argc, char **argv)
{
const char *exception = NULL;
const char *func_name = NULL;
rt_uint8_t *wasm_file_buf = NULL;
rt_uint32_t wasm_file_size;
rt_uint32_t stack_size = 64 * 1024, heap_size = 256 * 1024;
wasm_module_t wasm_module = NULL;
wasm_module_inst_t wasm_module_inst = NULL;
RuntimeInitArgs init_args;
static char error_buf[128] = { 0 };
/* avoid stack overflow */
#if WASM_ENABLE_LIBC_WASI != 0
libc_wasi_parse_context_t wasi_parse_ctx;
memset(&wasi_parse_ctx, 0, sizeof(wasi_parse_ctx));
#endif
#ifdef WAMR_ENABLE_IWASM_PARAMS
int i_arg_begin;
bool show_mem = false;
bool show_stack = false;
bool show_time_exec = false;
for (i_arg_begin = 1; i_arg_begin < argc; i_arg_begin++) {
if (argv[i_arg_begin][0] != '-') {
break;
}
if (argv[i_arg_begin][1] == 'm') {
show_mem = true;
}
else if (argv[i_arg_begin][1] == 's') {
show_stack = true;
}
else if (argv[i_arg_begin][1] == 't') {
show_time_exec = true;
}
else if (argv[i_arg_begin][1] == 'h') {
iwasm_help();
return 0;
}
else if (argv[i_arg_begin][1] == 'f') {
func_name = argv[++i_arg_begin];
}
else if (!strncmp(argv[i_arg_begin], "--max-threads=", 14)) {
if (argv[0][14] != '\0')
wasm_runtime_set_max_thread_num(atoi(argv[0] + 14));
else {
iwasm_help();
return 0;
}
}
else if (argv[i_arg_begin][1] == 0x00) {
continue;
}
else {
rt_kprintf("[iwasm] unknown param: %s\n", argv[i_arg_begin]);
}
}
#else /* WAMR_ENABLE_PARAMS */
#define i_arg_begin 1
#endif /* WAMR_ENABLE_PARAMS */
if (argc - i_arg_begin < 1) {
iwasm_help();
return -1;
}
rt_memset(&init_args, 0, sizeof(RuntimeInitArgs));
init_args.mem_alloc_type = Alloc_With_Allocator;
init_args.mem_alloc_option.allocator.malloc_func = os_malloc;
init_args.mem_alloc_option.allocator.realloc_func = os_realloc;
init_args.mem_alloc_option.allocator.free_func = os_free;
#ifdef WAMR_ENABLE_RTT_EXPORT
init_args.native_symbols = native_export_symbols;
init_args.n_native_symbols =
sizeof(native_export_symbols) / sizeof(NativeSymbol);
init_args.native_module_name = "env";
#endif /* WAMR_ENABLE_RTT_EXPORT */
#ifdef WAMR_ENABLE_IWASM_PARAMS
#if defined(RT_USING_HEAP) && defined(RT_USING_MEMHEAP_AS_HEAP)
extern long list_memheap(void);
if (show_mem) {
list_memheap();
}
#else
rt_uint32_t total, max, used;
if (show_mem) {
rt_memory_info(&total, &used, &max);
}
#endif
rt_thread_t tid;
if (show_stack) {
tid = rt_thread_self();
rt_kprintf("thread stack addr: %p, size: %u, sp: %p\n", tid->stack_addr,
tid->stack_size, tid->sp);
}
#endif /* WAMR_ENABLE_PARAMS */
if (wasm_runtime_full_init(&init_args) == false) {
rt_kprintf("Init WASM runtime environment failed.\n");
return -1;
}
wasm_file_buf = my_read_file_to_buffer(argv[i_arg_begin], &wasm_file_size);
if (!wasm_file_buf) {
rt_err_t err = rt_get_errno();
rt_kprintf("WASM load file to RAM failed: %d\n", err);
goto fail1;
}
rt_memset(error_buf, 0x00, sizeof(error_buf));
wasm_module = wasm_runtime_load(wasm_file_buf, wasm_file_size, error_buf,
sizeof(error_buf));
if (!wasm_module) {
rt_kprintf("%s\n", error_buf);
goto fail2;
}
#if WASM_ENABLE_LIBC_WASI != 0
libc_wasi_init(wasm_module, argc, argv, &wasi_parse_ctx);
#endif
rt_memset(error_buf, 0x00, sizeof(error_buf));
wasm_module_inst = wasm_runtime_instantiate(
wasm_module, stack_size, heap_size, error_buf, sizeof(error_buf));
if (!wasm_module_inst) {
rt_kprintf("%s\n", error_buf);
goto fail3;
}
#ifdef WAMR_ENABLE_IWASM_PARAMS
rt_tick_t ticks_exec;
if (show_time_exec) {
ticks_exec = rt_tick_get();
}
#endif /* WAMR_ENABLE_PARAMS */
if (func_name) {
exception = app_instance_func(wasm_module_inst, func_name,
argc - i_arg_begin, &argv[i_arg_begin]);
}
else {
exception = app_instance_main(wasm_module_inst, argc - i_arg_begin,
&argv[i_arg_begin]);
rt_kprintf("finished run app_instance_main\n");
}
if (exception)
rt_kprintf("%s\n", exception);
#if WASM_ENABLE_LIBC_WASI != 0
if (!exception) {
/* propagate wasi exit code. */
wasm_runtime_get_wasi_exit_code(wasm_module_inst);
}
#endif
#ifdef WAMR_ENABLE_IWASM_PARAMS
if (show_time_exec) {
ticks_exec = rt_tick_get() - ticks_exec;
rt_kprintf("[iwasm] execute ticks took: %u [ticks/s = %u]\n",
ticks_exec, RT_TICK_PER_SECOND);
}
#if defined(RT_USING_HEAP) && defined(RT_USING_MEMHEAP_AS_HEAP)
if (show_mem) {
list_memheap();
}
#else
rt_uint32_t total_after, max_after, used_after;
if (show_mem) {
rt_memory_info(&total_after, &used_after, &max_after);
rt_kprintf("[iwasm] memory took: %u\n", used_after - used);
}
#endif
if (show_stack) {
rt_kprintf("[iwasm] thread stack addr: %p, size: %u, sp: %p\n",
tid->stack_addr, tid->stack_size, tid->sp);
}
#endif /* WAMR_ENABLE_PARAMS */
/* destroy the module instance */
wasm_runtime_deinstantiate(wasm_module_inst);
fail3:
/* unload the module */
wasm_runtime_unload(wasm_module);
fail2:
/* free the file buffer */
rt_free(wasm_file_buf);
fail1:
/* destroy runtime environment */
wasm_runtime_destroy();
return 0;
}
MSH_CMD_EXPORT(iwasm, Embedded VM of WebAssembly);