# HG changeset patch
# User Kim Alvefur <zash@zash.se>
# Date 1315006075 -7200
# Node ID 074237d7820b9ec8d821dd7226683e1c6a875281
# Parent  8963f4026f3a89741a71a4a7069747ca14111110
mod_server_contact_info: Add module that publishes contact information.

diff -r 8963f4026f3a -r 074237d7820b mod_server_contact_info/mod_server_contact_info.lua
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/mod_server_contact_info/mod_server_contact_info.lua	Sat Sep 03 01:27:55 2011 +0200
@@ -0,0 +1,58 @@
+-- This plugin implements http://xmpp.org/extensions/xep-0157.html
+local t_insert = table.insert;
+local df_new = require "util.dataforms".new;
+
+local x_contact_info;
+-- Source: http://xmpp.org/registrar/formtypes.html#http:--jabber.org-network-serverinfo
+local valid_types = {
+	abuse = true;
+	admin = true;
+	feedback = true;
+	sales = true;
+	security = true;
+	support = true;
+}
+
+local function update_form_data()
+	if x_contact_info then
+		module:remove_item("extension", x_contact_info);
+	end
+	x_contact_info = nil;
+
+	local contact_config = module:get_option("contact_info");
+	if not contact_config then -- we'll use admins from the config as default
+		contact_config = { admin = {}; };
+		local admins = module:get_option("admins");
+		if not admins or #admins == 0 then
+			module:log("debug", "No contact_info or admins in config");
+			return -- Nothing to attach, so we'll just skip it.
+		end
+		module:log("debug", "No contact_info in config, using admins as fallback");
+		--TODO fetch global admins too?
+		for i = 1,#admins do
+			t_insert(contact_config.admin, "xmpp:" .. admins[i])
+			module:log("debug", "Added %s to admin-addresses", admins[i]);
+		end
+	end
+	if not next(contact_config) then
+		module:log("debug", "No contacts, skipping");
+		return -- No use in serving an empty form.
+	end
+	local form_layout = {
+		{ value = "http://jabber.org/network/serverinfo"; type = "hidden"; name = "FORM_TYPE"; };
+	};
+	local form_values = {};
+
+	for t,a in pairs(contact_config) do
+		if valid_types[t] and a then
+			t_insert(form_layout, { name = t .. "-addresses", type = "list-multi" });
+			form_values[t .. "-addresses"] = type(a) == "table" and a or {a};
+		end
+	end
+
+	x_contact_info = df_new(form_layout):form(form_values, "result");
+	module:add_extension(x_contact_info);
+end
+
+module:hook_global("config-reloaded", update_form_data);
+update_form_data();