OpenPKG CVS Repository
http://cvs.openpkg.org/
____________________________________________________________________________
Server: cvs.openpkg.org Name: Thomas Lotterer
Root: /e/openpkg/cvs Email: [EMAIL PROTECTED]
Module: openpkg-src openpkg-web Date: 15-Sep-2003 15:28:53
Branch: HEAD Handle: 2003091514285101
Modified files:
openpkg-src/perl perl.patch perl.spec
openpkg-web news.txt
Log:
SA-2003.039-perl; CAN-2003-0615
Summary:
Revision Changes Path
1.8 +32 -0 openpkg-src/perl/perl.patch
1.80 +1 -1 openpkg-src/perl/perl.spec
1.6566 +1 -0 openpkg-web/news.txt
____________________________________________________________________________
patch -p0 <<'@@ .'
Index: openpkg-src/perl/perl.patch
============================================================================
$ cvs diff -u -r1.7 -r1.8 perl.patch
--- openpkg-src/perl/perl.patch 3 Sep 2003 12:37:46 -0000 1.7
+++ openpkg-src/perl/perl.patch 15 Sep 2003 13:28:52 -0000 1.8
@@ -144,3 +144,35 @@
if (chdir "lib") {
$do_installarchlib = ! samepath($installarchlib, '.');
+
+-----------------------------------------------------------------------------
+
+http://stein.cshl.org/WWW/software/CGI/
+ under "Revision History" find "Fixed cross-site scripting bug
+ reported by obscure" note attached to Version 2.94. A quick fix was
+ introduced in 2.94. It was replaced by a more careful patch in 2.99.
+
+http://cve.mitre.org/cgi-bin/cvename.cgi?name=CAN-2003-0615
+ Cross-site scripting (XSS) vulnerability in start_form() of CGI.pm
+ allows remote attackers to insert web script via a URL that is fed
+ into the form's action parameter
+
+This is a backport of the 2.99 patch for 2.81 which is the version
+embedded with perl 5.8.0
+
+--- lib/CGI.pm.orig 2003-09-15 14:09:34.000000000 +0200
++++ lib/CGI.pm 2003-09-15 14:16:26.000000000 +0200
+@@ -1533,8 +1533,11 @@
+ $enctype = $enctype || &URL_ENCODED;
+ unless (defined $action) {
+ $action = $self->url(-absolute=>1,-path=>1);
+- $action .= "?$ENV{QUERY_STRING}" if $ENV{QUERY_STRING};
++ if (length($ENV{QUERY_STRING})>0) {
++ $action .= "?".$self->escapeHTML($ENV{QUERY_STRING},1);
++ }
+ }
++ $action = escape($action);
+ $action = qq(action="$action");
+ my($other) = @other ? " @other" : '';
+ $self->{'.parametersToAdd'}={};
+
@@ .
patch -p0 <<'@@ .'
Index: openpkg-src/perl/perl.spec
============================================================================
$ cvs diff -u -r1.79 -r1.80 perl.spec
--- openpkg-src/perl/perl.spec 3 Sep 2003 12:37:46 -0000 1.79
+++ openpkg-src/perl/perl.spec 15 Sep 2003 13:28:52 -0000 1.80
@@ -33,7 +33,7 @@
Group: Language
License: GPL/Artistic
Version: 5.8.0
-Release: 20030903
+Release: 20030915
# list of sources
Source0: ftp://ftp.cpan.org/pub/CPAN/src/perl-%{version}.tar.gz
@@ .
patch -p0 <<'@@ .'
Index: openpkg-web/news.txt
============================================================================
$ cvs diff -u -r1.6565 -r1.6566 news.txt
--- openpkg-web/news.txt 15 Sep 2003 13:20:10 -0000 1.6565
+++ openpkg-web/news.txt 15 Sep 2003 13:28:51 -0000 1.6566
@@ -1,3 +1,4 @@
+15-Sep-2003: Upgraded package: P<perl-5.8.0-20030915>
15-Sep-2003: Upgraded package: P<pine-4.58L-20030915>
15-Sep-2003: New package: P<pine-4.58L-20030915>
15-Sep-2003: Upgraded package: P<mysql-3.23.54a-1.2.4>
@@ .
______________________________________________________________________
The OpenPKG Project www.openpkg.org
CVS Repository Commit List [EMAIL PROTECTED]
