vndb/fu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

FU::Util::query_decode(): Properly handle empty "&"-parts

Browse source
This commit is contained in:
Yorhel 2025-04-25 17:07:56 +02:00
parent 0cd947c545
commit 5f8809d052
2 changed files with 3 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
FU/Util.pm
View file

@ -41,6 +41,7 @@ sub uri_unescape :prototype($) ($s) {
sub query_decode :prototype($) ($s) { sub query_decode :prototype($) ($s) {
my %o; my %o;
for (split /&/, $s//'') { for (split /&/, $s//'') {
next if !length;
my($k,$v) = map uri_unescape($_), split /=/, $_, 2; my($k,$v) = map uri_unescape($_), split /=/, $_, 2;
$v //= builtin::true; $v //= builtin::true;
if (ref $o{$k}) { push $o{$k}->@*, $v } if (ref $o{$k}) { push $o{$k}->@*, $v }

2
t/query.t
View file

@ -10,6 +10,8 @@ is_deeply
ok !eval { query_decode('%10'); 1 }; ok !eval { query_decode('%10'); 1 };
like $@, qr/Invalid control character/; like $@, qr/Invalid control character/;
is_deeply query_decode('&&&a=b'), { a => 'b' };
is query_encode is query_encode
{ a => builtin::true, b => undef, c => builtin::false, d => 'string', e => "&=\xfe" }, { a => builtin::true, b => undef, c => builtin::false, d => 'string', e => "&=\xfe" },
'a&d=string&e=%26%3d%c3%be'; 'a&d=string&e=%26%3d%c3%be';