49 lines
1.6 KiB
XML
49 lines
1.6 KiB
XML
<?xml version="1.0" encoding="UTF-8"?>
|
|
<!DOCTYPE glsa SYSTEM "http://www.gentoo.org/dtd/glsa.dtd">
|
|
<glsa id="201507-11">
|
|
<title>Perl: Denial of Service</title>
|
|
<synopsis>A vulnerability in Perl allows a remote attacker to cause Denial of
|
|
Service.
|
|
</synopsis>
|
|
<product type="ebuild">perl</product>
|
|
<announced>2015-07-10</announced>
|
|
<revised count="1">2015-07-10</revised>
|
|
<bug>216671</bug>
|
|
<access>remote</access>
|
|
<affected>
|
|
<package name="dev-lang/perl" auto="yes" arch="*">
|
|
<unaffected range="ge">5.20.1-r4</unaffected>
|
|
<vulnerable range="lt">5.20.1-r4</vulnerable>
|
|
</package>
|
|
</affected>
|
|
<background>
|
|
<p>Perl is a highly capable, feature-rich programming language.</p>
|
|
</background>
|
|
<description>
|
|
<p>S_regmatch() function lacks proper checks before passing arguments to
|
|
atoi()
|
|
</p>
|
|
</description>
|
|
<impact type="normal">
|
|
<p>A remote attacker could send a specially crafted input, possibly
|
|
resulting in a Denial of Service condition.
|
|
</p>
|
|
</impact>
|
|
<workaround>
|
|
<p>There is no known workaround at this time.</p>
|
|
</workaround>
|
|
<resolution>
|
|
<p>All Perl users should upgrade to the latest version:</p>
|
|
|
|
<code>
|
|
# emerge --sync
|
|
# emerge --ask --oneshot --verbose ">=dev-lang/perl-5.20.1-r4"
|
|
</code>
|
|
|
|
</resolution>
|
|
<references>
|
|
<uri link="https://nvd.nist.gov/nvd.cfm?cvename=CVE-2013-7422">CVE-2013-7422</uri>
|
|
</references>
|
|
<metadata tag="requester" timestamp="2015-03-29T15:10:08Z">Zlogene</metadata>
|
|
<metadata tag="submitter" timestamp="2015-07-10T08:19:35Z">Zlogene</metadata>
|
|
</glsa>
|