2008-09-29 20:43:04 -04:00
|
|
|
IN: urls.encoding.tests
|
|
|
|
USING: urls.encoding tools.test arrays kernel assocs present accessors ;
|
|
|
|
|
2015-07-03 12:39:59 -04:00
|
|
|
{ "~hello world" } [ "%7ehello world" url-decode ] unit-test
|
|
|
|
{ "" } [ "%XX%XX%XX" url-decode ] unit-test
|
|
|
|
{ "" } [ "%XX%XX%X" url-decode ] unit-test
|
2008-09-29 20:43:04 -04:00
|
|
|
|
2015-07-03 12:39:59 -04:00
|
|
|
{ "hello world" } [ "hello%20world" url-decode ] unit-test
|
|
|
|
{ " ! " } [ "%20%21%20" url-decode ] unit-test
|
|
|
|
{ "hello world" } [ "hello world%" url-decode ] unit-test
|
|
|
|
{ "hello world" } [ "hello world%x" url-decode ] unit-test
|
|
|
|
{ "hello%20world" } [ "hello world" url-encode ] unit-test
|
2008-09-29 20:43:04 -04:00
|
|
|
|
2015-07-03 12:39:59 -04:00
|
|
|
{ "~foo" } [ "~foo" url-encode ] unit-test
|
|
|
|
{ "~foo" } [ "~foo" url-encode-full ] unit-test
|
2010-07-06 00:55:36 -04:00
|
|
|
|
2015-07-03 12:39:59 -04:00
|
|
|
{ ":foo" } [ ":foo" url-encode ] unit-test
|
|
|
|
{ "%3Afoo" } [ ":foo" url-encode-full ] unit-test
|
2010-07-06 00:55:36 -04:00
|
|
|
|
2015-07-03 12:39:59 -04:00
|
|
|
{ "hello world" } [ "hello+world" query-decode ] unit-test
|
2008-09-29 20:43:04 -04:00
|
|
|
|
2015-07-03 12:39:59 -04:00
|
|
|
{ "\u001234hi\u002045" } [ "\u001234hi\u002045" url-encode url-decode ] unit-test
|
2008-09-29 20:43:04 -04:00
|
|
|
|
2015-07-03 12:39:59 -04:00
|
|
|
{ "a=b&a=c" } [ { { "a" { "b" "c" } } } assoc>query ] unit-test
|
2008-09-29 20:43:04 -04:00
|
|
|
|
2015-07-03 12:39:59 -04:00
|
|
|
{ H{ { "a" "b" } } } [ "a=b" query>assoc ] unit-test
|
2008-09-29 20:43:04 -04:00
|
|
|
|
2015-07-03 12:39:59 -04:00
|
|
|
{ H{ { "a" { "b" "c" } } } } [ "a=b&a=c" query>assoc ] unit-test
|
2008-09-29 20:43:04 -04:00
|
|
|
|
2015-07-03 12:39:59 -04:00
|
|
|
{ H{ { "a" { "b" "c" } } } } [ "a=b;a=c" query>assoc ] unit-test
|
2008-09-29 22:19:02 -04:00
|
|
|
|
2015-07-03 12:39:59 -04:00
|
|
|
{ H{ { "text" "hello world" } } } [ "text=hello+world" query>assoc ] unit-test
|
2008-09-29 20:43:04 -04:00
|
|
|
|
2015-07-03 12:39:59 -04:00
|
|
|
{ "foo=%3A" } [ { { "foo" ":" } } assoc>query ] unit-test
|
2010-07-06 00:55:36 -04:00
|
|
|
|
2015-07-03 12:39:59 -04:00
|
|
|
{ "a=3" } [ { { "a" 3 } } assoc>query ] unit-test
|
2009-04-10 05:01:59 -04:00
|
|
|
|
2015-07-03 12:39:59 -04:00
|
|
|
{ "a" } [ { { "a" f } } assoc>query ] unit-test
|
2009-04-10 05:01:59 -04:00
|
|
|
|
2015-07-03 12:39:59 -04:00
|
|
|
{ H{ { "a" f } } } [ "a" query>assoc ] unit-test
|