Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Jump to bottom

Leak in MLDBM under Linux #80

Closed
p5pRT opened this issue Jun 18, 1999 · 3 comments
Closed

Leak in MLDBM under Linux #80

p5pRT opened this issue Jun 18, 1999 · 3 comments
Labels
distro-Linux

Comments

@p5pRT
Copy link

p5pRT commented Jun 18, 1999

Migrated from rt.perl.org#883 (status was 'resolved')

Searchable as RT883$
@p5pRT
Copy link
Author

p5pRT commented Jun 18, 1999

From modus@ns.asimov.net

-----------------------------------------------------------------
The following code leaks fairly severely on every Linux system I've tried it
on, running various releases of 5.004 and 5.005. It does not appear to leak
under Solaris x86 or sparc. I have not been ableto try other operating
systems. Gurusamy Sarathy asked me to send this using perlbug, since it
looks to be a problem with perl internals.

The offending code​:

#!/usr/bin/perl -w

use MLDBM qw(DB_File);
use Fcntl;
use strict;

my %in;

tie %in, 'MLDBM', 'testmldbm', O_CREAT|O_RDWR, 0640 || die $1;
$in{'1'} = 'a' x 4082; # On the systems that I tested, this stops leaking if
  # changed to 4081. This number _may_ be system
  # dependant.
untie %in;

while(1) {
  tie %in, 'MLDBM', 'testmldbm', O_RDONLY, 0640 || die $1;
  my $mem = $in{'1'};
  untie %in;
}

Perl Info 


This perlbug was built using Perl 5.00503 - Mon Jun 14 09:34:26 PDT 1999
It is being executed now by  Perl 5.00503 - Mon Jun 14 22:53:23 PDT 1999.

Site configuration information for perl 5.00503:

Configured by modus at Mon Jun 14 22:53:23 PDT 1999.

Summary of my perl5 (5.0 patchlevel 5 subversion 3) configuration:
  Platform:
    osname=linux, osvers=2.2.5-22smp, archname=i386-linux
    uname='linux hq 2.2.5-22smp #1 smp wed jun 2 09:11:51 edt 1999 i686 unknown '
    hint=recommended, useposix=true, d_sigaction=define
    usethreads=undef useperlio=undef d_sfio=undef
  Compiler:
    cc='cc', optimize='-g', gccversion=2.7.2.3
    cppflags='-Dbool=char -DHAS_BOOL -DDEBUGGING'
    ccflags ='-Dbool=char -DHAS_BOOL -DDEBUGGING'
    stdchar='char', d_stdstdio=define, usevfork=false
    intsize=4, longsize=4, ptrsize=4, doublesize=8
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
    alignbytes=4, usemymalloc=n, prototype=define
  Linker and Libraries:
    ld='cc', ldflags =' -L/usr/local/lib'
    libpth=/usr/local/lib /lib /usr/lib
    libs=-lnsl -lndbm -lgdbm -ldb -ldl -lm -lc -lposix -lcrypt
    libc=, so=so, useshrplib=false, libperl=libperl.a
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-rdynamic'
    cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib'

Locally applied patches:
    


@INC for perl 5.00503:
    /usr/lib/perl5/5.00503/i386-linux
    /usr/lib/perl5/5.00503
    /usr/lib/perl5/site_perl/5.005/i386-linux
    /usr/lib/perl5/site_perl/5.005
    .


Environment for perl 5.00503:
    HOME=/home/modus
    LANG (unset)
    LANGUAGE (unset)
    LD_LIBRARY_PATH (unset)
    LOGDIR (unset)
    PATH=/usr/bin:/bin:/usr/bin:/usr/X11R6/bin:/home/modus/bin
    PERL_BADLANG (unset)
    SHELL=/bin/bash

@p5pRT
Copy link
Author

p5pRT commented Jul 24, 2000

From [Unknown Contact. See original ticket]

does not leak when tested anymore on similar systems. (probably fixed in MLDBM)
clsoed

@p5pRT p5pRT closed this as completed Nov 28, 2003
@p5pRT
Copy link
Author

p5pRT commented Nov 28, 2003

From The RT System itself

does not leak when tested anymore on similar systems. (probably fixed in MLDBM)
clsoed

This was referenced Oct 19, 2019
Closed
Open
Closed
Closed
Closed
karenetheridge added a commit that referenced this issue Nov 2, 2019
@karenetheridge
Update perlfaq to CPAN version 5.20191102
a592016 
  [DELTA]

5.20191102  2019-11-02 05:34:43Z
  * fix bad pod markup in perlfaq8 (PR #78; thanks, Joaquín Ferrero!)
  * remove stale section about lib.pm (PR #82, Dan Book)
  * update perlfaq9 to reference Email::Stuffer (PR #79, Dan Book)
  * update perlfaq9 to reference URL::Search (PR #80, Dan Book)
  * update perlfaq9 to use HTTP::Tiny (PR #81, Dan Book)
  * fix some broken links (issue #71, dctabuyz)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Assignees
No one assigned
Labels
distro-Linux
Projects
None yet
Milestone
No milestone
Development

No branches or pull requests
1 participant
@p5pRT