Hello community,
here is the log from the commit of package perl-BSD-Resource for openSUSE:Factory
checked in at Fri Mar 26 16:36:35 CET 2010.
--------
--- perl-BSD-Resource/perl-BSD-Resource.changes 2010-02-04 12:19:55.000000000 +0100
+++ perl-BSD-Resource/perl-BSD-Resource.changes 2010-03-26 15:12:19.000000000 +0100
@@ -1,0 +2,7 @@
+Thu Mar 25 17:41:05 CET 2010 - anicka@suse.cz
+
+- update to 1.2904
+ * Address rt.cpan.org #53856: memory leak in get_rlimits()
+ * Address rt.cpan.org #53859: clarify get_rlimits() docs
+
+-------------------------------------------------------------------
calling whatdependson for head-i586
Old:
----
BSD-Resource-1.2903.tar.bz2
New:
----
BSD-Resource-1.2904.tar.bz2
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-BSD-Resource.spec ++++++
--- /var/tmp/diff_new_pack.l4X5mL/_old 2010-03-26 16:35:45.000000000 +0100
+++ /var/tmp/diff_new_pack.l4X5mL/_new 2010-03-26 16:35:45.000000000 +0100
@@ -1,5 +1,5 @@
#
-# spec file for package perl-BSD-Resource (Version 1.2903)
+# spec file for package perl-BSD-Resource (Version 1.2904)
#
# Copyright (c) 2010 SUSE LINUX Products GmbH, Nuernberg, Germany.
#
@@ -18,8 +18,8 @@
Name: perl-BSD-Resource
-Version: 1.2903
-Release: 3
+Version: 1.2904
+Release: 1
Requires: perl = %{perl_version}
AutoReqProv: on
Group: Development/Libraries/Perl
++++++ BSD-Resource-1.2903.tar.bz2 -> BSD-Resource-1.2904.tar.bz2 ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/BSD-Resource-1.2903/ChangeLog new/BSD-Resource-1.2904/ChangeLog
--- old/BSD-Resource-1.2903/ChangeLog 2009-03-31 18:17:43.000000000 +0200
+++ new/BSD-Resource-1.2904/ChangeLog 2010-03-15 02:01:32.000000000 +0100
@@ -1,3 +1,11 @@
+2010-03-14 Jarkko Hietaniemi
+
+ * Address rt.cpan.org #53856: memory leak in get_rlimits()
+
+ * Address rt.cpan.org #53859: clarify get_rlimits() docs
+
+ * Release 1.2904.
+
2009-03-31 Jarkko Hietaniemi
* Address rt.cpan.org #44082:
@@ -33,7 +41,7 @@
2008-01-27 Jarkko Hietaniemi
- * Rewrite the setrlimit.t test. Simplify it a lot; now all
+ * Rewrite the setrlimit.t test. Simplify it a lot; now all
RLIM_INFINITY limits are simply skipped; for those that
are limited we try setting only the soft limit, and accept
a value lower than we tried to set, since various systems
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/BSD-Resource-1.2903/META.yml new/BSD-Resource-1.2904/META.yml
--- old/BSD-Resource-1.2903/META.yml 2009-03-31 18:17:51.000000000 +0200
+++ new/BSD-Resource-1.2904/META.yml 2010-03-15 02:02:24.000000000 +0100
@@ -1,12 +1,20 @@
--- #YAML:1.0
-name: BSD-Resource
-version: 1.2903
-abstract: ~
-license: ~
-author: ~
-generated_by: ExtUtils::MakeMaker version 6.42
-distribution_type: module
-requires:
+name: BSD-Resource
+version: 1.2904
+abstract: ~
+author: []
+license: unknown
+distribution_type: module
+configure_requires:
+ ExtUtils::MakeMaker: 0
+build_requires:
+ ExtUtils::MakeMaker: 0
+requires: {}
+no_index:
+ directory:
+ - t
+ - inc
+generated_by: ExtUtils::MakeMaker version 6.55_02
meta-spec:
- url: http://module-build.sourceforge.net/META-spec-v1.3.html
- version: 1.3
+ url: http://module-build.sourceforge.net/META-spec-v1.4.html
+ version: 1.4
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/BSD-Resource-1.2903/Resource.pm new/BSD-Resource-1.2904/Resource.pm
--- old/BSD-Resource-1.2903/Resource.pm 2009-03-31 18:15:36.000000000 +0200
+++ new/BSD-Resource-1.2904/Resource.pm 2010-03-15 01:58:54.000000000 +0100
@@ -1,5 +1,5 @@
#
-# Copyright (c) 1995-2008 Jarkko Hietaniemi. All rights reserved.
+# Copyright (c) 1995-2010 Jarkko Hietaniemi. All rights reserved.
# This program is free software; you can redistribute it and/or
# modify it under the same terms as Perl itself.
#
@@ -13,7 +13,7 @@
use strict;
use vars qw(@ISA @EXPORT @EXPORT_OK $AUTOLOAD $VERSION);
-$VERSION = '1.2903';
+$VERSION = '1.2904';
use Carp;
use AutoLoader;
@@ -403,17 +403,25 @@
=head2 get_rlimits
- $rlimits = get_rlimits();
+ use BSD::Resource qw{get_rlimits};
+ my $limits = get_rlimits();
-B
+B
get_rlimits() returns a reference to hash which has the names of the
available resource limits as keys and their indices (those which
are needed as the first argument to getrlimit() and setrlimit())
as values. For example:
- $r = get_rlimits();
- print "ok.\n" if ($r->{'RLIM_STACK'} == RLIM_STACK);
+ use BSD::Resource qw{get_rlimits};
+ my $limits = get_rlimits();
+ for my $name (keys %$limits) {
+ my ($soft, $hard) = BSD::Resource::getrlimit($limits->{$name});
+ print "$name soft $soft hard $hard\n";
+ }
+
+Note that a limit of -1 means unlimited.
=head1 ERRORS
@@ -478,7 +486,7 @@
=head1 COPYRIGHT AND LICENSE
-Copyright 1995-2008 Jarkko Hietaniemi All Rights Reserved
+Copyright 1995-2010 Jarkko Hietaniemi All Rights Reserved
This library is free software; you may redistribute it and/or modify
it under the same terms as Perl itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/BSD-Resource-1.2903/Resource.xs new/BSD-Resource-1.2904/Resource.xs
--- old/BSD-Resource-1.2903/Resource.xs 2008-01-28 02:55:59.000000000 +0100
+++ new/BSD-Resource-1.2904/Resource.xs 2010-03-15 01:50:49.000000000 +0100
@@ -1,5 +1,5 @@
/*
- * Copyright (c) 1995-2008 Jarkko Hietaniemi. All rights reserved.
+ * Copyright (c) 1995-2010 Jarkko Hietaniemi. All rights reserved.
* This program is free software; you can redistribute it and/or
* modify it under the same terms as Perl itself.
*
@@ -658,6 +658,7 @@
_get_rlimits()
CODE:
RETVAL = newHV();
+ sv_2mortal((SV*)RETVAL);
#if defined(RLIMIT_AIO_MEM) || defined(HAS_RLIMIT_AIO_MEM)
hv_store(RETVAL, "RLIMIT_AIO_MEM" , 14, newSViv(RLIMIT_AIO_MEM), 0);
#endif
@@ -716,6 +717,7 @@
_get_prios()
CODE:
RETVAL = newHV();
+ sv_2mortal((SV*)RETVAL);
#if defined(PRIO_PROCESS)
hv_store(RETVAL, "PRIO_PROCESS", 12, newSViv(PRIO_PROCESS), 0);
#endif
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Remember to have fun...
--
To unsubscribe, e-mail: opensuse-commit+unsubscribe@opensuse.org
For additional commands, e-mail: opensuse-commit+help@opensuse.org