-- TRANSPORTED BUDDIES AVAILABILITY INDICATION

-- XXX: to option?

transport_jids = { 'icq.jabber.kiev.ua', 'mrim.unixzone.org.ua' }

function online ( jid )

	local info = main.buddy_info ( jid )

	if not info then

		return false

	end

	for resource, params in pairs ( info.resources ) do

		if params.status ~= '_' then

			return true

		end

	end

	return false

end

local transports_pc_handler =

	function ( args )

		for k, jid in pairs ( transport_jids ) do

			if args.jid == jid then

				if args.new_status == '_' then

					main.run ( ("color roster * *@%s red"):format ( jid ) )

					main.run ( ("color roster dn_? *@%s red"):format ( jid ) )

				else

					main.run ( ("color roster * *@%s white"):format ( jid ) )

					main.run ( ("color roster dn_? *@%s brightblack"):format ( jid ) )

				end

			end

		end

	end

main.hook ( 'hook-lua-start',

	function ( args )

		for k, jid in pairs ( transport_jids ) do

			if not online ( jid ) then

				main.run ( ("color roster * *@%s red"):format ( jid ) )

				main.run ( ("color roster dn_? *@%s red"):format ( jid ) )

			else

				main.run ( ("color roster * *@%s white"):format ( jid ) )

				main.run ( ("color roster dn_? *@%s brightblack"):format ( jid ) )

			end

		end

	end )

main.hook ( 'hook-status-change', transports_pc_handler )

main.hook ( 'hook-post-connect',  transports_pc_handler )

main.hook ( 'hook-pre-disconnect',

	function ( args )

		for k, jid in pairs ( transport_jids ) do

			-- when disconnected, all buddies are inaccessible, so, make them the same

			main.run ( ("color roster * *@%s white"):format ( jid ) )

			main.run ( ("color roster dn_? *@%s brightblack"):format ( jid ) )

		end

	end )

-- vim: se ts=4 sw=4: --