[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

[stable] update of libjavascript-perl fixing #564772 (a possible segfault)



Dear stable release managers,

Please approve the upload of libjavascript-perl/1.08-1+lenny1 to 
stable.

libjavascript-perl (1.08-1+lenny1) stable; urgency=low

  * Steal fix_context_destruction.patch from upstream SVN. Fixes a segfault
    after calling non-present function. Closes: 564772
  * add myself to Uploaders

 -- Damyan Ivanov <dmn@debian.org>  Wed, 10 Feb 2010 08:02:09 +0200

The Uploaders addition is so that the upload doesn't look as an NMU (I 
am member of the Perl group) and that I claim responsibility.

fix_context_destruction.patch, interdiff and debfiff to 1.08-1 
(currently in lenny) attached.

Thanks,
    dam
# Description: fix segmentation fault when evaluated JavaScript code calls an
#  undefined external function
# Bug-Debian: 564772
# Origin: upstream, svn://svn.versed.se/public/Perl/modules/JavaScript/trunk (revision 931)
--- a/lib/JavaScript/Context.pm
+++ b/lib/JavaScript/Context.pm
@@ -19,10 +19,8 @@ sub new {
     
     my $self = bless { _impl => $cx_ptr }, $pkg;
 
-    $Context{${$cx_ptr}} = $self;
-    
-    weaken($Context{$cx_ptr});
-
+    $Context{$$cx_ptr} = $self;
+    weaken($Context{$$cx_ptr});
     $self->{runtime} = $runtime;
     
     return $self;
--- a/t/30-refcount.t
+++ b/t/30-refcount.t
@@ -31,5 +31,5 @@ my $rt = JavaScript::Runtime->new();
         is($sv->REFCNT, 2);
     }
     
-    is($sv->REFCNT, 1);
+    is($sv->REFCNT, 0);
 }
diff -u libjavascript-perl-1.08/debian/control libjavascript-perl-1.08/debian/control
--- libjavascript-perl-1.08/debian/control
+++ libjavascript-perl-1.08/debian/control
@@ -7,7 +7,7 @@
 Maintainer: Debian Perl Group <pkg-perl-maintainers@lists.alioth.debian.org>
 Uploaders: Daniel Ruoso <daniel@ruoso.com>,
  Krzysztof Krzyzaniak (eloy) <eloy@debian.org>, Niko Tyni <ntyni@debian.org>,
- gregor herrmann <gregoa@debian.org>
+ gregor herrmann <gregoa@debian.org>, Damyan Ivanov <dmn@debian.org>
 Standards-Version: 3.7.3
 Homepage: http://search.cpan.org/dist/JavaScript/
 Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libjavascript-perl/
diff -u libjavascript-perl-1.08/debian/changelog libjavascript-perl-1.08/debian/changelog
--- libjavascript-perl-1.08/debian/changelog
+++ libjavascript-perl-1.08/debian/changelog
@@ -1,3 +1,11 @@
+libjavascript-perl (1.08-1+lenny1) stable; urgency=low
+
+  * Steal fix_context_destruction.patch from upstream SVN. Fixes a segfault
+    after calling non-present function. Closes: 564772
+  * add myself to Uploaders
+
+ -- Damyan Ivanov <dmn@debian.org>  Wed, 10 Feb 2010 08:02:09 +0200
+
 libjavascript-perl (1.08-1) unstable; urgency=low
 
   * New upstream release.
diff -u libjavascript-perl-1.08/debian/patches/series libjavascript-perl-1.08/debian/patches/series
--- libjavascript-perl-1.08/debian/patches/series
+++ libjavascript-perl-1.08/debian/patches/series
@@ -2,0 +3 @@
+fix_context_destruction.patch
only in patch2:
unchanged:
--- libjavascript-perl-1.08.orig/debian/patches/fix_context_destruction.patch
+++ libjavascript-perl-1.08/debian/patches/fix_context_destruction.patch
@@ -0,0 +1,28 @@
+# Description: fix segmentation fault when evaluated JavaScript code calls an
+#  undefined external function
+# Bug-Debian: 564772
+# Origin: upstream, svn://svn.versed.se/public/Perl/modules/JavaScript/trunk (revision 931)
+--- a/lib/JavaScript/Context.pm
++++ b/lib/JavaScript/Context.pm
+@@ -19,10 +19,8 @@ sub new {
+     
+     my $self = bless { _impl => $cx_ptr }, $pkg;
+ 
+-    $Context{${$cx_ptr}} = $self;
+-    
+-    weaken($Context{$cx_ptr});
+-
++    $Context{$$cx_ptr} = $self;
++    weaken($Context{$$cx_ptr});
+     $self->{runtime} = $runtime;
+     
+     return $self;
+--- a/t/30-refcount.t
++++ b/t/30-refcount.t
+@@ -31,5 +31,5 @@ my $rt = JavaScript::Runtime->new();
+         is($sv->REFCNT, 2);
+     }
+     
+-    is($sv->REFCNT, 1);
++    is($sv->REFCNT, 0);
+ }
File lists identical (after any substitutions)

Control files: lines which differ (wdiff format)
------------------------------------------------
Depends: perl (>= [-5.10.0-10),-] {+5.10.0-19lenny2),+} perlapi-5.10.0, libc6 (>= 2.7-1), libmozjs1d (>= 1.9~b4)
Installed-Size: [-308-] {+304+}
[-Source: libjavascript-perl (1.08-1)-]
Version: [-1.08-1+b1-] {+1.08-1+lenny1+}

Attachment: signature.asc
Description: Digital signature


Reply to: