# HG changeset patch
# User Matthew Wild <mwild1@gmail.com>
# Date 1313012977 14400
# Node ID 63304d323983a51e6bad2cdc7565cc2f5c849862
# Parent  5d5d6c6d121af869359175df050b7aa656abff16
tests/test.lua, tests/test_net_http.lua: Tests for net.http's url and form encoding/decoding functions

diff -r 5d5d6c6d121a -r 63304d323983 tests/test.lua
--- a/tests/test.lua	Wed Aug 10 17:49:10 2011 -0400
+++ b/tests/test.lua	Wed Aug 10 17:49:37 2011 -0400
@@ -9,8 +9,10 @@
 
 
 function run_all_tests()
+	package.loaded["net.connlisteners"] = { get = function () return {} end };
 	dotest "util.jid"
 	dotest "util.multitable"
+	dotest "net.http"
 	dotest "core.modulemanager"
 	dotest "core.stanza_router"
 	dotest "core.s2smanager"
diff -r 5d5d6c6d121a -r 63304d323983 tests/test_net_http.lua
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/tests/test_net_http.lua	Wed Aug 10 17:49:37 2011 -0400
@@ -0,0 +1,37 @@
+-- Prosody IM
+-- Copyright (C) 2008-2010 Matthew Wild
+-- Copyright (C) 2008-2010 Waqas Hussain
+-- 
+-- This project is MIT/X11 licensed. Please see the
+-- COPYING file in the source package for more information.
+--
+
+function urlencode(urlencode)
+	assert_equal(urlencode("helloworld123"), "helloworld123", "Normal characters not escaped");
+	assert_equal(urlencode("hello world"), "hello%20world", "Spaces escaped");
+	assert_equal(urlencode("This & that = something"), "This%20%26%20that%20%3d%20something", "Important URL chars escaped");
+end
+
+function urldecode(urldecode)
+	assert_equal("helloworld123", urldecode("helloworld123"), "Normal characters not escaped");
+	assert_equal("hello world", urldecode("hello%20world"), "Spaces escaped");
+	assert_equal("This & that = something", urldecode("This%20%26%20that%20%3d%20something"), "Important URL chars escaped");
+	assert_equal("This & that = something", urldecode("This%20%26%20that%20%3D%20something"), "Important URL chars escaped");
+end
+
+function formencode(formencode)
+	assert_equal(formencode({ { name = "one", value = "1"}, { name = "two", value = "2" } }), "one=1&two=2", "Form encoded");
+	assert_equal(formencode({ { name = "one two", value = "1"}, { name = "two one&", value = "2" } }), "one+two=1&two+one%26=2", "Form encoded");
+end
+
+function formdecode(formdecode)
+	local t = formdecode("one=1&two=2");
+	assert_table(t[1]);
+	assert_equal(t[1].name, "one"); assert_equal(t[1].value, "1");
+	assert_table(t[2]);
+	assert_equal(t[2].name, "two"); assert_equal(t[2].value, "2");
+
+	local t = formdecode("one+two=1&two+one%26=2");
+	assert_equal(t[1].name, "one two"); assert_equal(t[1].value, "1");
+	assert_equal(t[2].name, "two one&"); assert_equal(t[2].value, "2");
+end