prosodyctl: Add check that points out any disabled hosts

author: Kim Alvefur <zash@zash.se>
date: Fri, 02 May 2014 08:16:26 +0200
parent: 6158:08e9c9d0beb3
child: 6160:cf0f7caa885e
--- a/prosodyctl	Fri May 02 08:11:11 2014 +0200
+++ b/prosodyctl	Fri May 02 08:16:26 2014 +0200
@@ -799,6 +799,21 @@
 	local ok = true;
 	local function disabled_hosts(host, conf) return host ~= "*" and conf.enabled ~= false; end
 	local function enabled_hosts() return it.filter(disabled_hosts, pairs(config.getconfig())); end
+	if not what or what == "disabled" then
+		local disabled_hosts = set.new();
+		for host, host_options in it.filter("*", pairs(config.getconfig())) do
+			if host_options.enabled == false then
+				disabled_hosts:add(host);
+			end
+		end
+		if not disabled_hosts:empty() then
+			local msg = "Checks will be skipped for these disabled hosts: %s";
+			if what then msg = "These hosts are disabled: %s"; end
+			show_warning(msg, tostring(disabled_hosts));
+			if what then return 0; end
+			print""
+		end
+	end
 	if not what or what == "config" then
 		print("Checking config...");
 		local known_global_options = set.new({