author | Waqas Hussain <waqas20@gmail.com> |
Tue, 20 Jul 2010 17:42:44 +0500 | |
changeset 3394 | 9bf5f2b3314b |
parent 2923 | b7049746bd29 |
child 3639 | 889ef938552c |
permissions | -rw-r--r-- |
1522
569d58d21612
Add copyright header to those files missing one
Matthew Wild <mwild1@gmail.com>
parents:
682
diff
changeset
|
1 |
-- Prosody IM |
2923
b7049746bd29
Update copyright headers for 2010
Matthew Wild <mwild1@gmail.com>
parents:
1522
diff
changeset
|
2 |
-- Copyright (C) 2008-2010 Matthew Wild |
b7049746bd29
Update copyright headers for 2010
Matthew Wild <mwild1@gmail.com>
parents:
1522
diff
changeset
|
3 |
-- Copyright (C) 2008-2010 Waqas Hussain |
1522
569d58d21612
Add copyright header to those files missing one
Matthew Wild <mwild1@gmail.com>
parents:
682
diff
changeset
|
4 |
-- |
569d58d21612
Add copyright header to those files missing one
Matthew Wild <mwild1@gmail.com>
parents:
682
diff
changeset
|
5 |
-- This project is MIT/X11 licensed. Please see the |
569d58d21612
Add copyright header to those files missing one
Matthew Wild <mwild1@gmail.com>
parents:
682
diff
changeset
|
6 |
-- COPYING file in the source package for more information. |
569d58d21612
Add copyright header to those files missing one
Matthew Wild <mwild1@gmail.com>
parents:
682
diff
changeset
|
7 |
-- |
569d58d21612
Add copyright header to those files missing one
Matthew Wild <mwild1@gmail.com>
parents:
682
diff
changeset
|
8 |
|
682
dedd19e9d4b3
Add more tests for util/stanza.lua serialization routines
Matthew Wild <mwild1@gmail.com>
parents:
681
diff
changeset
|
9 |
|
dedd19e9d4b3
Add more tests for util/stanza.lua serialization routines
Matthew Wild <mwild1@gmail.com>
parents:
681
diff
changeset
|
10 |
function preserialize(preserialize, st) |
dedd19e9d4b3
Add more tests for util/stanza.lua serialization routines
Matthew Wild <mwild1@gmail.com>
parents:
681
diff
changeset
|
11 |
local stanza = st.stanza("message", { a = "a" }); |
dedd19e9d4b3
Add more tests for util/stanza.lua serialization routines
Matthew Wild <mwild1@gmail.com>
parents:
681
diff
changeset
|
12 |
local stanza2 = preserialize(stanza); |
dedd19e9d4b3
Add more tests for util/stanza.lua serialization routines
Matthew Wild <mwild1@gmail.com>
parents:
681
diff
changeset
|
13 |
assert_is(stanza2 and stanza.name, "preserialize returns a stanza"); |
dedd19e9d4b3
Add more tests for util/stanza.lua serialization routines
Matthew Wild <mwild1@gmail.com>
parents:
681
diff
changeset
|
14 |
assert_is_not(stanza2.tags, "Preserialized stanza has no tag list"); |
dedd19e9d4b3
Add more tests for util/stanza.lua serialization routines
Matthew Wild <mwild1@gmail.com>
parents:
681
diff
changeset
|
15 |
assert_is_not(stanza2.last_add, "Preserialized stanza has no last_add marker"); |
dedd19e9d4b3
Add more tests for util/stanza.lua serialization routines
Matthew Wild <mwild1@gmail.com>
parents:
681
diff
changeset
|
16 |
assert_is_not(getmetatable(stanza2), "Preserialized stanza has no metatable"); |
dedd19e9d4b3
Add more tests for util/stanza.lua serialization routines
Matthew Wild <mwild1@gmail.com>
parents:
681
diff
changeset
|
17 |
end |
681 | 18 |
|
19 |
function deserialize(deserialize, st) |
|
20 |
local stanza = st.stanza("message", { a = "a" }); |
|
21 |
||
22 |
local stanza2 = deserialize(st.preserialize(stanza)); |
|
682
dedd19e9d4b3
Add more tests for util/stanza.lua serialization routines
Matthew Wild <mwild1@gmail.com>
parents:
681
diff
changeset
|
23 |
assert_is(stanza2 and stanza.name, "deserialize returns a stanza"); |
681 | 24 |
assert_is(stanza2.last_add, "Deserialized stanza is missing last_add for adding child tags"); |
682
dedd19e9d4b3
Add more tests for util/stanza.lua serialization routines
Matthew Wild <mwild1@gmail.com>
parents:
681
diff
changeset
|
25 |
assert_table(stanza2.attr, "Deserialized stanza has attributes"); |
dedd19e9d4b3
Add more tests for util/stanza.lua serialization routines
Matthew Wild <mwild1@gmail.com>
parents:
681
diff
changeset
|
26 |
assert_equal(stanza2.attr.a, "a", "Deserialized stanza retains attributes"); |
dedd19e9d4b3
Add more tests for util/stanza.lua serialization routines
Matthew Wild <mwild1@gmail.com>
parents:
681
diff
changeset
|
27 |
assert_table(getmetatable(stanza2), "Deserialized stanza has metatable"); |
681 | 28 |
end |