summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
Diffstat (limited to 'Sluift/Examples')
-rwxr-xr-xSluift/Examples/Wonderland.lua104
1 files changed, 52 insertions, 52 deletions
diff --git a/Sluift/Examples/Wonderland.lua b/Sluift/Examples/Wonderland.lua
index cf79371..58c00ca 100755
--- a/Sluift/Examples/Wonderland.lua
+++ b/Sluift/Examples/Wonderland.lua
@@ -1,52 +1,52 @@
---
--- Copyright (c) 2011 Remko Tronçon
--- Licensed under the GNU General Public License v3.
--- See Documentation/Licenses/GPLv3.txt for more information.
---
-
--- This script creates the wonderland world example.
---
-
-require "sluift"
---sluift.debug = true
-
-characters = {
- {jid = "alice@wonderland.lit", name = "Alice", groups = {}, presence = "<presence/>"},
- {jid = "hatter@wonderland.lit", name = "Mad Hatter", groups = {}, presence = "<presence><show>away</show><status>At the Tea Party</status></presence>"},
- {jid ="queen@wonderland.lit", name = "Queen of Hearts", groups = {}, presence = "<presence><show>dnd</show><status>Executing</status></presence>"},
- {jid = "rabbit@wonderland.lit", name = "White Rabbit", groups = {"Animals"}, presence = "<presence><status>Oh dear!</status></presence>"},
- {jid = "turtle@wonderland.lit", name = "Mock Turtle", groups = {"Animals"}, presence = "<presence/>"},
-}
-
-clients = {}
-for _, character in ipairs(characters) do
- print("Connecting " .. character["name"] .. "...")
- client = sluift.new_client(character["jid"], os.getenv("SLUIFT_PASS"))
- client:set_options({compress = false, tls = false})
- client:connect()
- client:get_contacts()
- client:send(character["presence"])
- table.insert(clients, client)
- for _, contact in ipairs(characters) do
- if contact["jid"] ~= character["jid"] then
- client:add_contact(contact)
- end
- end
-end
-
-print("Confirming subscriptions")
-for _, client in ipairs(clients) do
- for _, contact in ipairs(characters) do
- client:confirm_subscription(contact["jid"])
- end
-end
-
-print("Done. Waiting ...")
-while true do
- for _, client in ipairs(clients) do
- client:for_event(function(e)
- if e["type"] == "message" then client:send_message(e["from"], "Off with their heads!") end
- end, 1000)
- end
- sluift.sleep(1000)
-end
+--
+-- Copyright (c) 2011 Remko Tronçon
+-- Licensed under the GNU General Public License v3.
+-- See Documentation/Licenses/GPLv3.txt for more information.
+--
+
+-- This script creates the wonderland world example.
+--
+
+require "sluift"
+--sluift.debug = true
+
+characters = {
+ {jid = "alice@wonderland.lit", name = "Alice", groups = {}, presence = "<presence/>"},
+ {jid = "hatter@wonderland.lit", name = "Mad Hatter", groups = {}, presence = "<presence><show>away</show><status>At the Tea Party</status></presence>"},
+ {jid ="queen@wonderland.lit", name = "Queen of Hearts", groups = {}, presence = "<presence><show>dnd</show><status>Executing</status></presence>"},
+ {jid = "rabbit@wonderland.lit", name = "White Rabbit", groups = {"Animals"}, presence = "<presence><status>Oh dear!</status></presence>"},
+ {jid = "turtle@wonderland.lit", name = "Mock Turtle", groups = {"Animals"}, presence = "<presence/>"},
+}
+
+clients = {}
+for _, character in ipairs(characters) do
+ print("Connecting " .. character["name"] .. "...")
+ client = sluift.new_client(character["jid"], os.getenv("SLUIFT_PASS"))
+ client:set_options({compress = false, tls = false})
+ client:connect()
+ client:get_contacts()
+ client:send(character["presence"])
+ table.insert(clients, client)
+ for _, contact in ipairs(characters) do
+ if contact["jid"] ~= character["jid"] then
+ client:add_contact(contact)
+ end
+ end
+end
+
+print("Confirming subscriptions")
+for _, client in ipairs(clients) do
+ for _, contact in ipairs(characters) do
+ client:confirm_subscription(contact["jid"])
+ end
+end
+
+print("Done. Waiting ...")
+while true do
+ for _, client in ipairs(clients) do
+ client:for_event(function(e)
+ if e["type"] == "message" then client:send_message(e["from"], "Off with their heads!") end
+ end, 1000)
+ end
+ sluift.sleep(1000)
+end