2 -- Copyright (C) 2008-2009 Matthew Wild
3 -- Copyright (C) 2008-2009 Waqas Hussain
5 -- This project is MIT/X11 licensed. Please see the
6 -- COPYING file in the source package for more information.
12 function test(input_jid, expected_node, expected_server, expected_resource)
13 local rnode, rserver, rresource = split(input_jid);
14 assert_equal(expected_node, rnode, "split("..tostring(input_jid)..") failed");
15 assert_equal(expected_server, rserver, "split("..tostring(input_jid)..") failed");
16 assert_equal(expected_resource, rresource, "split("..tostring(input_jid)..") failed");
18 test("node@server", "node", "server", nil );
19 test("node@server/resource", "node", "server", "resource" );
20 test("server", nil, "server", nil );
21 test("server/resource", nil, "server", "resource" );
22 test(nil, nil, nil , nil );
24 test("node@/server", nil, nil, nil , nil );
25 test("@server", nil, nil, nil , nil );
26 test("@server/resource",nil,nil,nil, nil );
30 assert_equal(bare("user@host"), "user@host", "bare JID remains bare");
31 assert_equal(bare("host"), "host", "Host JID remains host");
32 assert_equal(bare("host/resource"), "host", "Host JID with resource becomes host");
33 assert_equal(bare("user@host/resource"), "user@host", "user@host JID with resource becomes user@host");
34 assert_equal(bare("user@/resource"), nil, "invalid JID is nil");
35 assert_equal(bare("@/resource"), nil, "invalid JID is nil");
36 assert_equal(bare("@/"), nil, "invalid JID is nil");
37 assert_equal(bare("/"), nil, "invalid JID is nil");
38 assert_equal(bare(""), nil, "invalid JID is nil");
39 assert_equal(bare("@"), nil, "invalid JID is nil");
40 assert_equal(bare("user@"), nil, "invalid JID is nil");
41 assert_equal(bare("user@@"), nil, "invalid JID is nil");
42 assert_equal(bare("user@@host"), nil, "invalid JID is nil");
43 assert_equal(bare("user@@host/resource"), nil, "invalid JID is nil");
44 assert_equal(bare("user@host/"), nil, "invalid JID is nil");