d/freebsd-dev
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

flua: implement chmod

Browse Source 
Lua does not provide a native way to change the permission of a file.

Submitted by:	Yang Wang <2333@outlook.jp>
Reviewed by:	kevans
Sponsored by:	The FreeBSD Foundation
Differential Revision:	https://reviews.freebsd.org/D24036
This commit is contained in:
Ed Maste 2020-03-13 15:40:35 +00:00
parent a2386b6f6a
commit 405e3338ac
Notes: svn2git 2020-12-20 02:59:44 +00:00 
svn path=/head/; revision=358960
3 changed files with 40 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
libexec/flua/linit_flua.c
View File

@ -57,6 +57,7 @@ static const luaL_Reg loadedlibs[] = {
#endif
/* FreeBSD Extensions */
{"lfs", luaopen_lfs},
{"posix.sys.stat", luaopen_posix_sys_stat},
{"posix.unistd", luaopen_posix_unistd},
{NULL, NULL}
};

38
libexec/flua/modules/lposix.c
View File

@ -27,6 +27,10 @@
#include <sys/cdefs.h>
__FBSDID("$FreeBSD$");
#include <sys/stat.h>
#include <errno.h>
#include <string.h>
#include <unistd.h>
#include <lua.h>
@ -37,6 +41,28 @@ __FBSDID("$FreeBSD$");
* Minimal implementation of luaposix needed for internal FreeBSD bits.
*/
static int
lua_chmod(lua_State *L)
{
int n;
const char *path;
mode_t mode;
n = lua_gettop(L);
luaL_argcheck(L, n == 2, n > 2 ? 3 : n,
"chmod takes exactly two arguments");
path = luaL_checkstring(L, 1);
mode = (mode_t)luaL_checkinteger(L, 2);
if (chmod(path, mode) == -1) {
lua_pushnil(L);
lua_pushstring(L, strerror(errno));
lua_pushinteger(L, errno);
return 3;
}
lua_pushinteger(L, 0);
return 1;
}
static int
lua_getpid(lua_State *L)
{
@ -49,12 +75,24 @@ lua_getpid(lua_State *L)
}
#define REG_SIMPLE(n) { #n, lua_ ## n }
static const struct luaL_Reg sys_statlib[] = {
REG_SIMPLE(chmod),
{ NULL, NULL },
};
static const struct luaL_Reg unistdlib[] = {
REG_SIMPLE(getpid),
{ NULL, NULL },
};
#undef REG_SIMPLE
int
luaopen_posix_sys_stat(lua_State *L)
{
luaL_newlib(L, sys_statlib);
return 1;
}
int
luaopen_posix_unistd(lua_State *L)
{

1
libexec/flua/modules/lposix.h
View File

@ -8,4 +8,5 @@
#include <lua.h>
int luaopen_posix_sys_stat(lua_State *L);
int luaopen_posix_unistd(lua_State *L);