-/* Prosody IM v0.3
+/* Prosody IM v0.4
-- Copyright (C) 2008-2009 Matthew Wild
-- Copyright (C) 2008-2009 Waqas Hussain
--- Copyright 2009 Tobias Markmann
+-- Copyright (C) 2009 Tobias Markmann
--
-- This project is MIT/X11 licensed. Please see the
-- COPYING file in the source package for more information.
#include <syslog.h>
#include <pwd.h>
+#include <grp.h>
#include <string.h>
#include <errno.h>
}
/* Close stdin, stdout, stderr */
-/* close(0);
+ close(0);
close(1);
close(2);
-*/
+
/* Final fork, use it wisely */
if(fork())
exit(0);
LOG_INFO,
LOG_NOTICE,
LOG_WARNING,
- LOG_EMERG,
+ LOG_CRIT,
-1
};
int lc_syslog_log(lua_State* L)
return 2;
}
+int lc_setgid(lua_State* L)
+{
+ int gid = -1;
+ if(lua_gettop(L) < 1)
+ return 0;
+ if(!lua_isnumber(L, 1) && lua_tostring(L, 1))
+ {
+ /* Passed GID is actually a string, so look up the GID */
+ struct group *g;
+ g = getgrnam(lua_tostring(L, 1));
+ if(!g)
+ {
+ lua_pushboolean(L, 0);
+ lua_pushstring(L, "no-such-group");
+ return 2;
+ }
+ gid = g->gr_gid;
+ }
+ else
+ {
+ gid = lua_tonumber(L, 1);
+ }
+
+ if(gid>-1)
+ {
+ /* Ok, attempt setgid */
+ errno = 0;
+ if(setgid(gid))
+ {
+ /* Fail */
+ lua_pushboolean(L, 0);
+ switch(errno)
+ {
+ case EINVAL:
+ lua_pushstring(L, "invalid-gid");
+ break;
+ case EPERM:
+ lua_pushstring(L, "permission-denied");
+ break;
+ default:
+ lua_pushstring(L, "unknown-error");
+ }
+ return 2;
+ }
+ else
+ {
+ /* Success! */
+ lua_pushboolean(L, 1);
+ return 1;
+ }
+ }
+
+ /* Seems we couldn't find a valid GID to switch to */
+ lua_pushboolean(L, 0);
+ lua_pushstring(L, "invalid-gid");
+ return 2;
+}
+
/* Like POSIX's setrlimit()/getrlimit() API functions.
*
* Syntax:
int rid = -1;
if(arguments < 1 || arguments > 3) {
lua_pushboolean(L, 0);
- lua_pushstring(L, "Wrong number of arguments");
+ lua_pushstring(L, "incorrect-arguments");
}
resource = luaL_checkstring(L, 1);
if (softlimit < 0 || hardlimit < 0) {
if (getrlimit(rid, &lim_current)) {
lua_pushboolean(L, 0);
- lua_pushstring(L, "getrlimit() failed.");
+ lua_pushstring(L, "getrlimit-failed");
return 2;
}
}
if (setrlimit(rid, &lim)) {
lua_pushboolean(L, 0);
- lua_pushstring(L, "setrlimit() failed.");
+ lua_pushstring(L, "setrlimit-failed");
return 2;
}
} else {
+ /* Unsupported resoucrce. Sorry I'm pretty limited by POSIX standard. */
lua_pushboolean(L, 0);
- lua_pushstring(L, "Unsupported resoucrce. Sorry I'm pretty limited by POSIX standard.");
+ lua_pushstring(L, "invalid-resource");
return 2;
}
lua_pushboolean(L, 1);
if (arguments != 1) {
lua_pushboolean(L, 0);
- lua_pushstring(L, "I expect one argument only, the resource string.");
+ lua_pushstring(L, "invalid-arguments");
return 2;
}
if (rid != -1) {
if (getrlimit(rid, &lim)) {
lua_pushboolean(L, 0);
- lua_pushstring(L, "getrlimit() failed.");
+ lua_pushstring(L, "getrlimit-failed.");
return 2;
}
} else {
+ /* Unsupported resoucrce. Sorry I'm pretty limited by POSIX standard. */
lua_pushboolean(L, 0);
- lua_pushstring(L, "Unsupported resoucrce. Sorry I'm pretty limited by POSIX standard.");
+ lua_pushstring(L, "invalid-resource");
return 2;
}
lua_pushboolean(L, 1);
lua_pushcfunction(L, lc_getuid);
lua_setfield(L, -2, "getuid");
+ lua_pushcfunction(L, lc_getgid);
+ lua_setfield(L, -2, "getgid");
lua_pushcfunction(L, lc_setuid);
lua_setfield(L, -2, "setuid");
+ lua_pushcfunction(L, lc_setgid);
+ lua_setfield(L, -2, "setgid");
lua_pushcfunction(L, lc_setrlimit);
lua_setfield(L, -2, "setrlimit");