2 -- Copyright (C) 2008-2010 Matthew Wild
3 -- Copyright (C) 2008-2010 Waqas Hussain
5 -- This project is MIT/X11 licensed. Please see the
6 -- COPYING file in the source package for more information.
10 local config = require "core.configmanager";
11 local encodings = require "util.encodings";
12 local stringprep = encodings.stringprep;
13 local usermanager = require "core.usermanager";
14 local signal = require "util.signal";
15 local set = require "util.set";
16 local lfs = require "lfs";
18 local nodeprep, nameprep = stringprep.nodeprep, stringprep.nameprep;
20 local io, os = io, os;
21 local tostring, tonumber = tostring, tonumber;
23 local CFG_SOURCEDIR = _G.CFG_SOURCEDIR;
25 local prosody = prosody;
29 function adduser(params)
30 local user, host, password = nodeprep(params.user), nameprep(params.host), params.password;
32 return false, "invalid-username";
34 return false, "invalid-hostname";
37 local provider = prosody.hosts[host].users;
38 if not(provider) or provider.name == "null" then
39 usermanager.initialize_host(host);
42 local ok = usermanager.create_user(user, password, host);
44 return false, "unable-to-save-data";
49 function user_exists(params)
50 local user, host, password = nodeprep(params.user), nameprep(params.host), params.password;
51 local provider = prosody.hosts[host].users;
52 if not(provider) or provider.name == "null" then
53 usermanager.initialize_host(host);
56 return usermanager.user_exists(user, host);
59 function passwd(params)
60 if not _M.user_exists(params) then
61 return false, "no-such-user";
64 return _M.adduser(params);
67 function deluser(params)
68 if not _M.user_exists(params) then
69 return false, "no-such-user";
71 params.password = nil;
73 return _M.adduser(params);
77 local pidfile = config.get("*", "core", "pidfile");
79 return false, "no-pidfile";
82 local modules_enabled = set.new(config.get("*", "core", "modules_enabled"));
83 if not modules_enabled:contains("posix") then
84 return false, "no-posix";
87 local file, err = io.open(pidfile, "r+");
89 return false, "pidfile-read-failed", err;
92 local locked, err = lfs.lock(file, "w");
95 return false, "pidfile-not-locked";
98 local pid = tonumber(file:read("*a"));
102 return false, "invalid-pid";
109 local ok, pid, err = _M.getpid();
111 if pid == "pidfile-read-failed" or pid == "pidfile-not-locked" then
112 -- Report as not running, since we can't open the pidfile
113 -- (it probably doesn't exist)
118 return true, signal.kill(pid, 0) == 0;
122 local ok, ret = _M.isrunning();
127 return false, "already-running";
129 if not CFG_SOURCEDIR then
130 os.execute("./prosody");
132 os.execute(CFG_SOURCEDIR.."/../../bin/prosody");
138 local ok, ret = _M.isrunning();
143 return false, "not-running";
146 local ok, pid = _M.getpid()
147 if not ok then return false, pid; end
149 signal.kill(pid, signal.SIGTERM);