diff options
author | Remko Tronçon <git@el-tramo.be> | 2011-03-05 12:02:12 (GMT) |
---|---|---|
committer | Remko Tronçon <git@el-tramo.be> | 2011-03-05 12:02:12 (GMT) |
commit | 4e0888a6e2350f06504d4c6a99e5a21fa51ee9bc (patch) | |
tree | 3de7e764cc35810d097ca41ea965b4fcb1702db7 /Sluift/Examples | |
parent | f19d2718149f36fa017c64ad95a7fb3ce045347c (diff) | |
download | swift-4e0888a6e2350f06504d4c6a99e5a21fa51ee9bc.zip swift-4e0888a6e2350f06504d4c6a99e5a21fa51ee9bc.tar.bz2 |
Sluift: Added CollectVersions example.
Diffstat (limited to 'Sluift/Examples')
-rw-r--r-- | Sluift/Examples/CollectVersions.lua | 22 | ||||
-rw-r--r-- | Sluift/Examples/Login.lua | 1 |
2 files changed, 22 insertions, 1 deletions
diff --git a/Sluift/Examples/CollectVersions.lua b/Sluift/Examples/CollectVersions.lua new file mode 100644 index 0000000..c93c8c8 --- /dev/null +++ b/Sluift/Examples/CollectVersions.lua @@ -0,0 +1,22 @@ +-- +-- Copyright (c) 2010 Remko Tronçon +-- Licensed under the GNU General Public License v3. +-- See Documentation/Licenses/GPLv3.txt 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() + +versions = {} +for jid, _ in pairs(c:get_contacts()) do + v = c:get_version(sluift.jid_domain(jid)) + if v then versions[v["name"]] = (versions[v["name"]] or 0) + 1 end +end +for name, count in pairs(versions) do print(name .. ": " .. count) end + +c:disconnect() diff --git a/Sluift/Examples/Login.lua b/Sluift/Examples/Login.lua index c1f42d2..1733bb9 100644 --- a/Sluift/Examples/Login.lua +++ b/Sluift/Examples/Login.lua @@ -10,7 +10,6 @@ -- -- The following environment variables are used: -- * SLUIFT_JID, SWIFT_PASS: JID and password to log in with --- * SLUIFT_OPTIONS: Client options to use (e.g. "{compress = false}") -- * SLUIFT_DEBUG: Sets whether debugging should be turned on require "sluift" |