Adding test for xmppstream

Mon, 03 Jan 2011 22:20:37 +0000

author
Matthew Wild <mwild1@gmail.com>
date
Mon, 03 Jan 2011 22:20:37 +0000
changeset 3993
cbfa0ea6668b
parent 3988
a3104064e905
child 3994
b3dffb6bc1aa

Adding test for xmppstream

test_xmppstream.lua file | annotate | diff | comparison | revisions
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/test_xmppstream.lua	Mon Jan 03 22:20:37 2011 +0000
@@ -0,0 +1,29 @@
+local xmppstream = require "util.xmppstream";
+
+local session = { notopen = true };
+
+local callbacks = {
+	stream_tag = "stream"; stream_ns = "";
+	streamopened = function (session, attr)
+		print("Stream opened!");
+		session.notopen = nil;
+	end;
+	handlestanza = function (session, stanza)
+		print("Received stanza:", stanza);
+	end;
+	streamclosed = function (session)
+		print("Stream closed!");
+	end;
+};
+
+local stream = xmppstream.new(session, callbacks);
+
+stream:feed[[
+<stream>
+	<message foo="bar">
+	]]
+stream:feed[[
+		<body>Hi there!</body>
+	</message>
+</stream>
+]]

mercurial