blob: 42bcf86efd0592b30849819bfa7bb5327f99390d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
--[[
Copyright (c) 2010-2013 Isode Limited.
All rights reserved.
See the COPYING file for more information.
This script logs into an XMPP server, and collects statistics about
the server software of all contacts in your roster
--]]
require 'sluift'
c = sluift.new_client(os.getenv('SLUIFT_JID'), os.getenv('SLUIFT_PASS'))
c:connect(function ()
versions = {}
for jid in pairs(c:get_contacts()) do
local v = c:get_software_version {to = sluift.jid.domain(jid), timeout = 3000} or {name = 'Unknown'}
versions[v['name']] = (versions[v['name']] or 0) + 1
end
for name, count in pairs(versions) do print(name .. ': ' .. count) end
end)
|