suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

repair for uri-decode

Browse Source 
Certain inputs could cause `uri-decode` to go into a loop.

Patch and supplied by Doug Williams.

Closes PR 14010

original commit: 24fc16674b
This commit is contained in:
Matthew Flatt 2013-09-10 07:09:34 -06:00
parent 8fed20859a
commit 1c9e007ae1
1 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
pkgs/racket-pkgs/racket-test/tests/net/uri-codec.rkt
View File

@ -9,6 +9,15 @@
(uri-decode "%P") => "%P"
(uri-decode "λ") => "λ"
(uri-decode (string-append
"\u631\u633\u627\u646\u647\u200c\u647\u627\u6cc\u2d\u62e\u648\u62f"
"\u645\u627\u646\u6cc\u2f\u62d\u642\u648\u642\u2d\u628\u634\u631\u2d"
"\u645\u6cc\u62f\u6cc\u627\u2f\u31\u32\u35\u34\u36\u2d"))
=> (string-append
"\u631\u633\u627\u646\u647\u200c\u647\u627\u6cc\u2d\u62e\u648\u62f"
"\u645\u627\u646\u6cc\u2f\u62d\u642\u648\u642\u2d\u628\u634\u631\u2d"
"\u645\u6cc\u62f\u6cc\u627\u2f\u31\u32\u35\u34\u36\u2d")
(alist->form-urlencoded '([a . "hel+lo \u7238"]))
=> "a=hel%2Blo+%E7%88%B8"
(form-urlencoded->alist