On Sat, 5 Jun 2004, [iso-8859-1] S=F6nke Ruempler wrote:

> > Remember to shut down the server cleanly before reporting the leak
> > log.=20
>=20
> Here the XMail.memleaks file for now:
>=20
> * addr=3D0x080be6b8   size=3D892
>     from=3D0x0809863b
>     from=3D0x0808e1b5
>     from=3D0x08055df1
>     from=3D0x08055f03
>     from=3D0x0806be27
>     from=3D0x0806c15c
>     from=3D0x0806c357
>     from=3D0x0806c52a
>=20
> Not more ...=20

It's ok. I get that too. It's the TLS data associated with the main=20
thread, and it is intentionally never freed. It's not a leak since it is a=
=20
one-time allocation. I really do not know what is going on in your=20
machine.



PS: You should have used the Perl script below to make more sense of hex=20
numbers)


- Davide



#!/usr/bin/perl
#
# xmtrace.pl by Davide Libenzi ( XMail Perl memory trace decoder )
# Copyright (C) 2004  Davide Libenzi
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
#
# Davide Libenzi <[EMAIL PROTECTED]>
#

use strict;

my $binimage;
my %cache;

if ($#ARGV < 0) {
=09print STDERR "use: ${0} binary < trace-file\n";
=09exit(1);
}

$binimage =3D $ARGV[0];


sub get_sym {
=09my ($hexn) =3D @_;
=09my $ln;

=09if (defined($cache{$hexn})) {
=09=09return $cache{$hexn};
=09}
=09if (open(ADDR, "addr2line -e $binimage $hexn|")) {
=09=09$ln =3D <ADDR>;
=09=09close(ADDR);
=09=09$ln =3D~ s/([^\r\n]*)[\r\n]+/$1/;
=09=09if ($ln ne '??:0') {
=09=09=09$cache{$hexn} =3D $ln;
=09=09=09return $cache{$hexn};
=09=09}
=09}
=09return $hexn;
}

while (<STDIN>) {
=09my $ln;
=09my ($hexn, $sym);

        ($ln =3D $_) =3D~ s/([^\r\n]*)[\r\n]+/$1/;
=09if ($ln !~ /from=3D0x[0-9a-zA-Z]+/) {
=09=09print $ln . "\n";
=09=09next;
=09}
=09($hexn =3D $ln) =3D~ s/.*from=3D0x([0-9a-zA-Z]+).*/$1/;
=09$sym =3D get_sym($hexn);
=09$ln =3D~ s/(.*from=3D)0x([0-9a-zA-Z]+)(.*)/${1}${sym}${3}/;
=09print $ln . "\n";
}

exit(0);

-
To unsubscribe from this list: send the line "unsubscribe xmail" in
the body of a message to [EMAIL PROTECTED]
For general help: send the line "help" in the body of a message to
[EMAIL PROTECTED]

Reply via email to