util.prosodyctl: Handle os.execute in Lua 5.2 returning true when command terminates...
[prosody.git] / util / prosodyctl.lua
index b80a69f26eaafab55be94e4a2b47b65130e9818a..7c9a3c19dcf7c0edb6ab95959627d197a429cb45 100644 (file)
@@ -1,7 +1,7 @@
 -- Prosody IM
 -- Copyright (C) 2008-2010 Matthew Wild
 -- Copyright (C) 2008-2010 Waqas Hussain
--- 
+--
 -- This project is MIT/X11 licensed. Please see the
 -- COPYING file in the source package for more information.
 --
@@ -22,35 +22,29 @@ local nodeprep, nameprep = stringprep.nodeprep, stringprep.nameprep;
 
 local io, os = io, os;
 local print = print;
-local tostring, tonumber = tostring, tonumber;
+local tonumber = tonumber;
 
 local CFG_SOURCEDIR = _G.CFG_SOURCEDIR;
 
 local _G = _G;
 local prosody = prosody;
 
-module "prosodyctl"
-
 -- UI helpers
-function show_message(msg, ...)
-       print(msg:format(...));
-end
-
-function show_warning(msg, ...)
+local function show_message(msg, ...)
        print(msg:format(...));
 end
 
-function show_usage(usage, desc)
+local function show_usage(usage, desc)
        print("Usage: ".._G.arg[0].." "..usage);
        if desc then
                print(" "..desc);
        end
 end
 
-function getchar(n)
+local function getchar(n)
        local stty_ret = os.execute("stty raw -echo 2>/dev/null");
        local ok, char;
-       if stty_ret == 0 then
+       if stty_ret == true or stty_ret == 0 then
                ok, char = pcall(io.read, n or 1);
                os.execute("stty sane");
        else
@@ -64,14 +58,14 @@ function getchar(n)
        end
 end
 
-function getline()
+local function getline()
        local ok, line = pcall(io.read, "*l");
        if ok then
                return line;
        end
 end
 
-function getpass()
+local function getpass()
        local stty_ret = os.execute("stty -echo 2>/dev/null");
        if stty_ret ~= 0 then
                io.write("\027[08m"); -- ANSI 'hidden' text attribute
@@ -88,7 +82,7 @@ function getpass()
        end
 end
 
-function show_yesno(prompt)
+local function show_yesno(prompt)
        io.write(prompt, " ");
        local choice = getchar():lower();
        io.write("\n");
@@ -99,7 +93,7 @@ function show_yesno(prompt)
        return (choice == "y");
 end
 
-function read_password()
+local function read_password()
        local password;
        while true do
                io.write("Enter new password: ");
@@ -120,7 +114,7 @@ function read_password()
        return password;
 end
 
-function show_prompt(prompt)
+local function show_prompt(prompt)
        io.write(prompt, " ");
        local line = getline();
        line = line and line:gsub("\n$","");
@@ -128,7 +122,7 @@ function show_prompt(prompt)
 end
 
 -- Server control
-function adduser(params)
+local function adduser(params)
        local user, host, password = nodeprep(params.user), nameprep(params.host), params.password;
        if not user then
                return false, "invalid-username";
@@ -146,77 +140,81 @@ function adduser(params)
        if not(provider) or provider.name == "null" then
                usermanager.initialize_host(host);
        end
-       
+
        local ok, errmsg = usermanager.create_user(user, password, host);
        if not ok then
-               return false, errmsg;
+               return false, errmsg or "creating-user-failed";
        end
        return true;
 end
 
-function user_exists(params)
-       local user, host, password = nodeprep(params.user), nameprep(params.host), params.password;
+local function user_exists(params)
+       local user, host = nodeprep(params.user), nameprep(params.host);
 
        storagemanager.initialize_host(host);
        local provider = prosody.hosts[host].users;
        if not(provider) or provider.name == "null" then
                usermanager.initialize_host(host);
        end
-       
+
        return usermanager.user_exists(user, host);
 end
 
-function passwd(params)
-       if not _M.user_exists(params) then
+local function passwd(params)
+       if not user_exists(params) then
                return false, "no-such-user";
        end
-       
-       return _M.adduser(params);
+
+       return adduser(params);
 end
 
-function deluser(params)
-       if not _M.user_exists(params) then
+local function deluser(params)
+       if not user_exists(params) then
                return false, "no-such-user";
        end
        local user, host = nodeprep(params.user), nameprep(params.host);
-       
+
        return usermanager.delete_user(user, host);
 end
 
-function getpid()
+local function getpid()
        local pidfile = config.get("*", "pidfile");
        if not pidfile then
                return false, "no-pidfile";
        end
-       
-       local modules_enabled = set.new(config.get("*", "modules_enabled"));
-       if not modules_enabled:contains("posix") then
+
+       if type(pidfile) ~= "string" then
+               return false, "invalid-pidfile";
+       end
+
+       local modules_enabled = set.new(config.get("*", "modules_disabled"));
+       if prosody.platform ~= "posix" or modules_enabled:contains("posix") then
                return false, "no-posix";
        end
-       
+
        local file, err = io.open(pidfile, "r+");
        if not file then
                return false, "pidfile-read-failed", err;
        end
-       
+
        local locked, err = lfs.lock(file, "w");
        if locked then
                file:close();
                return false, "pidfile-not-locked";
        end
-       
+
        local pid = tonumber(file:read("*a"));
        file:close();
-       
+
        if not pid then
                return false, "invalid-pid";
        end
-       
+
        return true, pid;
 end
 
-function isrunning()
-       local ok, pid, err = _M.getpid();
+local function isrunning()
+       local ok, pid, err = getpid();
        if not ok then
                if pid == "pidfile-read-failed" or pid == "pidfile-not-locked" then
                        -- Report as not running, since we can't open the pidfile
@@ -228,8 +226,8 @@ function isrunning()
        return true, signal.kill(pid, 0) == 0;
 end
 
-function start()
-       local ok, ret = _M.isrunning();
+local function start()
+       local ok, ret = isrunning();
        if not ok then
                return ok, ret;
        end
@@ -244,36 +242,55 @@ function start()
        return true;
 end
 
-function stop()
-       local ok, ret = _M.isrunning();
+local function stop()
+       local ok, ret = isrunning();
        if not ok then
                return ok, ret;
        end
        if not ret then
                return false, "not-running";
        end
-       
-       local ok, pid = _M.getpid()
+
+       local ok, pid = getpid()
        if not ok then return false, pid; end
-       
+
        signal.kill(pid, signal.SIGTERM);
        return true;
 end
 
-function reload()
-       local ok, ret = _M.isrunning();
+local function reload()
+       local ok, ret = isrunning();
        if not ok then
                return ok, ret;
        end
        if not ret then
                return false, "not-running";
        end
-       
-       local ok, pid = _M.getpid()
+
+       local ok, pid = getpid()
        if not ok then return false, pid; end
-       
+
        signal.kill(pid, signal.SIGHUP);
        return true;
 end
 
-return _M;
+return {
+       show_message = show_message;
+       show_warning = show_message;
+       show_usage = show_usage;
+       getchar = getchar;
+       getline = getline;
+       getpass = getpass;
+       show_yesno = show_yesno;
+       read_password = read_password;
+       show_prompt = show_prompt;
+       adduser = adduser;
+       user_exists = user_exists;
+       passwd = passwd;
+       deluser = deluser;
+       getpid = getpid;
+       isrunning = isrunning;
+       start = start;
+       stop = stop;
+       reload = reload;
+};