Bug 712694 (CVE-2011-2201)
| Summary: | CVE-2011-2201 perl-Data-FormValidator: Reports invalid field as valid when untaint_all_constraints used | ||
|---|---|---|---|
| Product: | [Other] Security Response | Reporter: | Jan Lieskovsky <jlieskov> |
| Component: | vulnerability | Assignee: | Red Hat Product Security <security-response-team> |
| Status: | CLOSED ERRATA | QA Contact: | |
| Severity: | low | Docs Contact: | |
| Priority: | low | ||
| Version: | unspecified | CC: | iarnell, perl-devel |
| Target Milestone: | --- | Keywords: | Security |
| Target Release: | --- | ||
| Hardware: | All | ||
| OS: | Linux | ||
| Whiteboard: | |||
| Fixed In Version: | Doc Type: | Bug Fix | |
| Doc Text: | Story Points: | --- | |
| Clone Of: | Environment: | ||
| Last Closed: | 2011-09-09 08:27:57 UTC | Type: | --- |
| Regression: | --- | Mount Type: | --- |
| Documentation: | --- | CRM: | |
| Verified Versions: | Category: | --- | |
| oVirt Team: | --- | RHEL 7.3 requirements from Atomic Host: | |
| Cloudforms Team: | --- | Target Upstream Version: | |
| Embargoed: | |||
| Bug Depends On: | 712699 | ||
| Bug Blocks: | |||
|
Description
Jan Lieskovsky
2011-06-12 14:35:17 UTC
This issue affect the versions of the perl-Data-FormValidator package, as shipped with Fedora release of 13, 14, and 15. Please schedule an update (once final upstream patch known / ready). CVE Request: [3] http://www.openwall.com/lists/oss-security/2011/06/12/3 Public PoC (from [2]):
======================
#!/opt/perl/5.12/bin/perl
use strict;
use warnings;
use Data::FormValidator;
"some_unrelated_string" =~ m/^.*$/;
my $profile = {
untaint_all_constraints => 1,
required => [qw(a)],
constraint_methods => {
a => qr/will_never_match/,
},
};
my $results = Data::FormValidator->check({ a => 1 }, $profile);
warn $results->valid('a');
Have tried on my F-15 machine (perl-Data-FormValidator-4.66-4.fc15.noarch)
as:
$ cat test.pl
#!/usr/bin/perl -w
use strict;
use warnings;
use Data::Dumper;
use Data::FormValidator;
"some_unrelated_string" =~ m/^.*$/;
my $profile = {
untaint_all_constraints => 1,
required => [qw(a)],
constraint_methods => {
a => qr/will_never_match/,
},
};
my $results = Data::FormValidator->check({ a => 1 }, $profile);
print $results->valid,"\n";
and 'a' is reported as being valid.
Created perl-Data-FormValidator tracking bugs for this issue Affects: fedora-all [bug 712699] The CVE identifier of CVE-2011-2201 has been assigned to this issue: http://www.openwall.com/lists/oss-security/2011/06/13/13 |