diff options
Diffstat (limited to 'core')
| -rw-r--r-- | core/src/xmake/engine.c | 2 | ||||
| -rw-r--r-- | core/src/xmake/libc/strndup.c | 58 | ||||
| -rw-r--r-- | core/src/xmake/makefile | 3 |
3 files changed, 62 insertions, 1 deletions
diff --git a/core/src/xmake/engine.c b/core/src/xmake/engine.c index 5ca1d90f0..e8f774327 100644 --- a/core/src/xmake/engine.c +++ b/core/src/xmake/engine.c @@ -226,6 +226,7 @@ tb_int_t xm_libc_malloc(lua_State* lua); tb_int_t xm_libc_free(lua_State* lua); tb_int_t xm_libc_memcpy(lua_State* lua); tb_int_t xm_libc_memset(lua_State* lua); +tb_int_t xm_libc_strndup(lua_State* lua); tb_int_t xm_libc_dataptr(lua_State* lua); tb_int_t xm_libc_ptraddr(lua_State* lua); @@ -427,6 +428,7 @@ static luaL_Reg const g_libc_functions[] = , { "free", xm_libc_free } , { "memcpy", xm_libc_memcpy } , { "memset", xm_libc_memset } +, { "strndup", xm_libc_strndup } , { "dataptr", xm_libc_dataptr } , { "ptraddr", xm_libc_ptraddr } , { tb_null, tb_null } diff --git a/core/src/xmake/libc/strndup.c b/core/src/xmake/libc/strndup.c new file mode 100644 index 000000000..e0e1a1e02 --- /dev/null +++ b/core/src/xmake/libc/strndup.c @@ -0,0 +1,58 @@ +/*!A cross-platform build utility based on Lua + * + * 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. + * + * Copyright (C) 2015-present, TBOOX Open Source Group. + * + * @author ruki + * @file strndup.c + * + */ + +/* ////////////////////////////////////////////////////////////////////////////////////// + * trace + */ +#define TB_TRACE_MODULE_NAME "strndup" +#define TB_TRACE_MODULE_DEBUG (0) + +/* ////////////////////////////////////////////////////////////////////////////////////// + * includes + */ +#include "prefix.h" + +/* ////////////////////////////////////////////////////////////////////////////////////// + * implementation + */ +tb_int_t xm_libc_strndup(lua_State* lua) +{ + // check + tb_assert_and_check_return_val(lua, 0); + + // check arguments? + if (!xm_lua_ispointer(lua, 1) || !xm_lua_ispointer(lua, 2) || !lua_isnumber(lua, 3)) + xm_libc_return_error(lua, "strndup(invalid args)!"); + + // do strndup + tb_char_t const* s = tb_null; + if (xm_lua_ispointer(lua, 1)) + s = (tb_char_t const*)xm_lua_topointer(lua, 1); + else if (lua_isstring(lua, 2)) + s = lua_tostring(lua, 2); + else xm_libc_return_error(lua, "strndup(invalid args)!"); + tb_int_t n = (tb_int_t)lua_tointeger(lua, 2); + if (s && n >= 0) + lua_pushlstring(lua, s, n); + else lua_pushliteral(lua, ""); + return 1; +} + diff --git a/core/src/xmake/makefile b/core/src/xmake/makefile index 94df3a3e8..ae623c979 100644 --- a/core/src/xmake/makefile +++ b/core/src/xmake/makefile @@ -121,7 +121,8 @@ xmake_C_FILES += \ libc/memset \ libc/memcpy \ libc/dataptr \ - libc/ptraddr + libc/ptraddr \ + libc/strndup iswin = ifeq ($(PLAT),windows) |