HarmonyOS 鸿蒙Next中如何使用arkts执行lua函数

试下以下方式：

//lua/CMakeLists.txt：

# the minimum version of CMake.

cmake_minimum_required(VERSION 3.4.1)

project(lua)

add_library(lua SHARED

lapi.c

lauxlib.c

lbaselib.c

lcode.c

ldblib.c

ldebug.c

ldo.c

ldump.c

lfunc.c

lgc.c

linit.c

liolib.c

llex.c

lmathlib.c

lmem.c

loadlib.c

lobject.c

lopcodes.c

loslib.c

lparser.c

lstate.c

lstring.c

lstrlib.c

ltable.c

ltablib.c

ltm.c

lundump.c

lvm.c

lzio.c

print.c

)

include_directories(${CMAKE_CURRENT_SOURCE_DIR})
//CMakeLists.txt：

add_subdirectory(lua)

target_link_libraries(entry PUBLIC lua libace_napi.z.so libhilog_ndk.z.so)

#include "lua/lua.hpp"

static lua_State *lua;

static napi_value open_lua(napi_env env, napi_callback_info info) {

size_t argc = 1;

napi_value args[1] = {nullptr};

napi_get_cb_info(env, info, &argc, args, nullptr, nullptr);

lua = lua_open();

return nullptr;

}

static napi_value do_luascript(napi_env env, napi_callback_info info) {

size_t argc = 2;

napi_value args[2] = {nullptr};

napi_get_cb_info(env, info, &argc, args, nullptr, nullptr);

size_t typeLen = 0;

// char类型的转换

char *lua_script = nullptr;

// 写入缓存，获得args[0]对应的char长度

napi_get_value_string_utf8(env, args[1], nullptr, 0, &typeLen);

// napi_get_value_string_utf8（env，数组对象，char，缓存长度，获取的长度）主要作用是通过缓存复制的方法，将对象转换为char，复制到缓存中，获取长度

lua_script = new char[typeLen + 1];

// 获取输入的字符串转换为char类型的str

napi_get_value_string_utf8(env, args[1], lua_script, typeLen + 1, &typeLen);

luaL_openlibs(lua);

int ret = luaL_dostring(lua, lua_script);

napi_value str_value;

if (!ret) {

const char *result = lua_tostring(lua, -1);

napi_create_string_utf8(env, result, NAPI_AUTO_LENGTH, &str_value);

OH_LOG_Print(LOG_APP, LOG_WARN, 0xFFFF, "sdk_napi.cpp", "result is %{public}s", result);

return str_value;

}

return nullptr;

}

{"open_lua", nullptr, open_lua, nullptr, nullptr, nullptr, napi_default, nullptr},

{"do_luascript", nullptr, do_luascript, nullptr, nullptr, nullptr, napi_default, nullptr}

返回指针到ets：

#include "lua/lua.hpp"

#include "napi/native_api.h"

#include "hilog/log.h"

#include <bits/alltypes.h>

#include <stddef.h>

//static lua_State *g_lua_State;

static napi_value open_lua(napi_env env, napi_callback_info info) {

lua_State *g_lua_State = lua_open();

luaL_openlibs(g_lua_State);

int64_t addr = (int64_t)(g_lua_State);

napi_value resultAddr;

napi_create_int64(env, addr, &resultAddr);

return resultAddr;

}

static napi_value do_luascript(napi_env env, napi_callback_info info) {

size_t argc = 2;

napi_value args[2] = {nullptr};

napi_get_cb_info(env, info, &argc, args, nullptr, nullptr);

int64_t testLua;

napi_get_value_int64(env, args[0], &testLua);

lua_State * lua1 = (lua_State *)testLua;

size_t typeLen = 0;

// char类型的转换

char *lua_script = nullptr;

// 写入缓存，获得args[0]对应的char长度

napi_get_value_string_utf8(env, args[1], nullptr, 0, &typeLen);

// napi_get_value_string_utf8（env，数组对象，char，缓存长度，获取的长度）主要作用是通过缓存复制的方法，将对象转换为char，复制到缓存中，获取长度

lua_script = new char[typeLen + 1];

// 获取输入的字符串转换为char类型的str

napi_get_value_string_utf8(env, args[1], lua_script, typeLen + 1, &typeLen);

int ret = luaL_dostring(lua1, lua_script);

napi_value str_value = nullptr;

if (!ret) {

const char *result = lua_tostring(lua1, -1);

napi_create_string_utf8(env, result, NAPI_AUTO_LENGTH, &str_value);

OH_LOG_Print(LOG_APP, LOG_WARN, 0xFFFF, "testNapi", "result is %{public}s", result);

return str_value;

}

return nullptr;

}

index.ets：

const lua = testNapi.open_lua();

hilog.info(0x0000, 'testNapi', 'lua test: %{public}s' + lua, '');

testNapi.do_luascript(lua, "function sum(a, b) return a + b end");

const data1 = testNapi.do_luascript(lua, "return sum(1, 2)");

hilog.info(0x0000, 'testNapi', '%{public}s', data1);