cvsweb/cvsweb.cgi - diff

Return to cvsweb.cgi CVS log

Up to [cvsweb.bsd.lv] / cvsweb

version 4.8, 2019/11/09 09:41:07

version 4.9, 2019/11/09 10:06:23

Line 358 if (defined($ENV{QUERY_STRING})) {

$p =~ y/+/ /;

my ($key, $val) = split(/=/, $p, 2);

next unless defined($key);

$val = 1 unless defined($val);

$key = uri_unescape($key);

($key = uri_unescape($key)) =~ /[[:graph:]]/ or next;

$key =~ /([^a-z_12-])/ and fatal('404 Not Found',

($val = uri_unescape($val)) =~ /[[:graph:]]/ or next;

'Invalid character "%s" in query parameter "%s"', $1, $key);

if (defined $val) {

$val = uri_unescape($val);

$val =~ /([^a-zA-Z_01-9.\/-])/ and fatal('404 Not Found',

'Invalid character "%s" in the value "%s" of the query parameter "%s"',

$1, $value, $key);

} else {

$val = 1;

}

$query{$key} = $val;

}