Bug 858966

Summary: perl-5.16: my variables with attributes leak
Product: [Fedora] Fedora Reporter: Petr Pisar <ppisar>
Component: perlAssignee: Petr Pisar <ppisar>
Status: CLOSED ERRATA QA Contact: Fedora Extras Quality Assurance <extras-qa>
Severity: unspecified Docs Contact:
Priority: unspecified    
Version: 18CC: cweyl, iarnell, jplesnik, kasal, lkundrak, mmaslano, perl-devel, ppisar, psabata, rc040203, tcallawa
Target Milestone: ---   
Target Release: ---   
Hardware: Unspecified   
OS: Unspecified   
URL: https://rt.perl.org/rt3//Public/Bug/Display.html?id=114764
Whiteboard:
Fixed In Version: perl-5.16.1-238.fc19 Doc Type: Bug Fix
Doc Text:
Story Points: ---
Clone Of: Environment:
Last Closed: 2012-09-25 16:33:45 UTC Type: Bug
Regression: --- Mount Type: ---
Documentation: --- CRM:
Verified Versions: Category: ---
oVirt Team: --- RHEL 7.3 requirements from Atomic Host:
Cloudforms Team: --- Target Upstream Version:
Embargoed:

Description Petr Pisar 2012-09-20 08:17:00 UTC
This code consumes more and more memory:

$ perl -e 'while (1) { eval qq{my $x : shared}; }'

perl-5.16 (F≥18) is affected.

Fixes by upstream commit:

commit 9fa29fa7929b4167c5491b792c5cc7e4365a2839
Author: Father Chrysostomos <sprout>
Date:   Wed Sep 19 21:53:51 2012 -0700

    [perl #114764] Stop my vars with attrs from leaking
    
    S_apply_attrs was creating a SV containing a stash name, that was
    later to be put in a const op, which would take care of freeing it.
    But it didn’t free it for a my variable, because the branch where that
    const op was created didn’t apply.  So move the creation of that SV
    inside the branch that uses it, otherwise it leaks.  This leak was the
    result of commit 95f0a2f1ffc6.

Comment 1 Petr Pisar 2012-09-21 08:52:01 UTC
There is leaking another place because just this patch is not enough. Test from patch passes, but code from first comment still suffers.

Comment 2 Fedora Update System 2012-09-21 11:17:55 UTC
perl-5.16.1-232.fc18 has been submitted as an update for Fedora 18.
https://admin.fedoraproject.org/updates/perl-5.16.1-232.fc18

Comment 3 Fedora Update System 2012-09-22 06:38:38 UTC
Package perl-5.16.1-232.fc18:
* should fix your issue,
* was pushed to the Fedora 18 testing repository,
* should be available at your local mirror within two days.
Update it with:
# su -c 'yum update --enablerepo=updates-testing perl-5.16.1-232.fc18'
as soon as you are able to.
Please go to the following url:
https://admin.fedoraproject.org/updates/FEDORA-2012-14584/perl-5.16.1-232.fc18
then log in and leave karma (feedback).

Comment 4 Fedora Update System 2012-09-25 16:33:45 UTC
perl-5.16.1-232.fc18 has been pushed to the Fedora 18 stable repository.  If problems still persist, please make note of it in this bug report.