mirrors/recycled-ni-neutrino
1
0
Fork 0
mirror of https://github.com/tuxbox-fork-migrations/recycled-ni-neutrino.git synced 2025-08-27 23:42:51 +02:00
Code Issues Packages Projects Releases Wiki Activity

lua_filehelpers.cpp: Add lua script function 'ln()'

Browse Source 
- Set Lua api version to 1.54


Origin commit data
------------------
Commit: 95a078742b
Author: Michael Liebmann <tuxcode.bbg@gmail.com>
Date: 2016-09-05 (Mon, 05 Sep 2016)
This commit is contained in:
Michael Liebmann
2016-09-05 00:27:05 +02:00
parent 7ff676f0c0
commit e217a03f2c
3 changed files with 62 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/gui/lua/lua_api_version.h
View File

@@ -4,4 +4,4 @@
* to luainstance.h changes
*/
#define LUA_API_VERSION_MAJOR 1
#define LUA_API_VERSION_MINOR 53
#define LUA_API_VERSION_MINOR 54

60
src/gui/lua/lua_filehelpers.cpp
View File

@@ -58,6 +58,7 @@ void CLuaInstFileHelpers::LuaFileHelpersRegister(lua_State *L)
{ "rmdir", CLuaInstFileHelpers::FileHelpersRmdir },
{ "mkdir", CLuaInstFileHelpers::FileHelpersMkdir },
{ "readlink", CLuaInstFileHelpers::FileHelpersReadlink },
{ "ln", CLuaInstFileHelpers::FileHelpersLn },
{ "__gc", CLuaInstFileHelpers::FileHelpersDelete },
{ NULL, NULL }
};
@@ -339,6 +340,65 @@ int CLuaInstFileHelpers::FileHelpersReadlink(lua_State *L)
return 1;
}
int CLuaInstFileHelpers::FileHelpersLn(lua_State *L)
{
CLuaFileHelpers *D = FileHelpersCheckData(L, 1);
if (!D) return 0;
int numargs = lua_gettop(L) - 1;
int min_numargs = 2;
if (numargs < min_numargs) {
printf("luascript ln: not enough arguments (%d, expected %d)\n", numargs, min_numargs);
lua_pushboolean(L, false);
return 1;
}
const char *src = "";
src = luaL_checkstring(L, 2);
const char *link = "";
link = luaL_checkstring(L, 3);
const char *flags = "";
if (numargs > min_numargs)
flags = luaL_checkstring(L, 4);
bool symlnk = (strchr(flags, 's') != NULL);
bool force = (strchr(flags, 'f') != NULL);
lua_Debug ar;
if (!symlnk) {
lua_getstack(L, 1, &ar);
lua_getinfo(L, "Sl", &ar);
const char* s = "Currently only supports symlinks.";
printf(">>> Lua script error [%s:%d] %s\n (error from neutrino: [%s:%d])\n",
ar.short_src, ar.currentline, s, __path_file__, __LINE__);
lua_pushboolean(L, false);
return 1;
}
bool ret = true;
if (symlink(src, link) != 0) {
if (force && (errno == EEXIST)) {
if (unlink(link) == 0) {
if (symlink(src, link) == 0) {
lua_pushboolean(L, ret);
return 1;
}
}
}
ret = false;
lua_getstack(L, 1, &ar);
lua_getinfo(L, "Sl", &ar);
const char* s = strerror(errno);
printf(">>> Lua script error [%s:%d] %s\n (error from neutrino: [%s:%d])\n",
ar.short_src, ar.currentline, s, __path_file__, __LINE__);
}
lua_pushboolean(L, ret);
return 1;
}
int CLuaInstFileHelpers::FileHelpersDelete(lua_State *L)

1
src/gui/lua/lua_filehelpers.h
View File

@@ -45,6 +45,7 @@ class CLuaInstFileHelpers
static int FileHelpersRmdir(lua_State *L);
static int FileHelpersMkdir(lua_State *L);
static int FileHelpersReadlink(lua_State *L);
static int FileHelpersLn(lua_State *L);
static int FileHelpersDelete(lua_State *L);
};