Репозитории ALT
S: | 1.92-alt1 |
5.1: | 1.35-alt2 |
4.1: | 1.33_01-alt1 |
4.0: | 1.25-alt3.1 |
3.0: | 1.25-alt3 |
Группа :: Разработка/Perl
Пакет: perl-Net-SSLeay
Главная Изменения Спек Патчи Sources Загрузить Gear Bugs and FR Repocop
Патч: perl-Net-SSLeay-1.25-deb-memory-leak.patch
Скачать
Скачать
libnet-ssleay-perl (1.22-1) unstable; urgency=low
* New upstream release.
* Add patch from Simon Horman <horms@vergenet.net>,that fixes two
outstanding memory leaks in SSLeay.pm,
Closes: #169732
-- Stephen Zander <gibreel@debian.org> Tue, 25 Feb 2003 00:17:37 -0800
--- libnet-ssleay-perl-1.25.orig/SSLeay.pm
+++ libnet-ssleay-perl-1.25/SSLeay.pm
@@ -1879,6 +1879,18 @@
}
###
+### Wrap load_error_strings so it is only called once
+### to avoid leaking like a sieve
+###
+
+my $load_error_strings_state = 0;
+sub load_error_strings_wrapper {
+ return if $load_error_strings_state == 1;
+ $load_error_strings_state = 1;
+ load_error_strings();
+}
+
+###
### Basic request - response primitive (don't use for https)
###
@@ -1892,7 +1904,7 @@
### Do SSL negotiation stuff
warn "Creating SSL $ssl_version context...\n" if $trace>2;
- load_error_strings(); # Some bloat, but I'm after ease of use
+ load_error_strings_wrapper(); # Some bloat, but I'm after ease of use
SSLeay_add_ssl_algorithms(); # and debuggability.
randomize();
@@ -2022,7 +2034,7 @@
### Do SSL negotiation stuff
warn "Creating SSL $ssl_version context...\n" if $trace>2;
- load_error_strings(); # Some bloat, but I'm after ease of use
+ load_error_strings_wrapper(); # Some bloat, but I'm after ease of use
SSLeay_add_ssl_algorithms(); # and debuggability.
randomize();