Репозиторий Sisyphus
Последнее обновление: 1 октября 2023 | Пакетов: 18631 | Посещений: 37903003
en ru br
Репозитории 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
www.altlinux.org/Changes

Группа :: Разработка/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();
 
 
дизайн и разработка: Vladimir Lettiev aka crux © 2004-2005, Andrew Avramenko aka liks © 2007-2008
текущий майнтейнер: Michael Shigorin