r22218 - in /trunk/libconvert-uulib-perl: Changes META.yml README UUlib.pm debian/changelog debian/rules uulib/uulib.c uulib/uuscan.c

js at users.alioth.debian.org js at users.alioth.debian.org
Fri Jun 27 09:55:23 UTC 2008


Author: js
Date: Fri Jun 27 09:55:23 2008
New Revision: 22218

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=22218
Log:
* New upstream release. Bugfix only - fixing "infinite-looping problem
  when scanning in freestyle mode", so possibly security-related.
* Setting urgency=high due to the possible security relation.

Modified:
    trunk/libconvert-uulib-perl/Changes
    trunk/libconvert-uulib-perl/META.yml
    trunk/libconvert-uulib-perl/README
    trunk/libconvert-uulib-perl/UUlib.pm
    trunk/libconvert-uulib-perl/debian/changelog
    trunk/libconvert-uulib-perl/debian/rules
    trunk/libconvert-uulib-perl/uulib/uulib.c
    trunk/libconvert-uulib-perl/uulib/uuscan.c

Modified: trunk/libconvert-uulib-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libconvert-uulib-perl/Changes?rev=22218&op=diff
==============================================================================
--- trunk/libconvert-uulib-perl/Changes (original)
+++ trunk/libconvert-uulib-perl/Changes Fri Jun 27 09:55:23 2008
@@ -1,7 +1,14 @@
 Revision history for Perl extension Convert::UUlib.
 
+1.11 Fri Jun 13 15:32:30 CEST 2008
+	- don't ask.
+
+1.10 Fri Jun 13 14:22:42 CEST 2008
+	- fix an infinite-looping problem when scanning in freestyle
+          mode (testcase provided by Pieter Geens).
+
 1.09 Fri May 25 19:38:11 CEST 2007
-	- create something sensible, trust a windows program to fuck
+        - create something sensible, trust a windows program to fuck
           it up: work around literal "(null)" filenames in yenc-encoded
           files.
         - some minor cleanups.
@@ -9,7 +16,7 @@
 1.08 Sat Dec 16 23:27:13 CET 2006
 	- URGENT update, the last release did not
           decode files correctly, usually not at all.
-        - my last patch was, of course, completly bogus.
+        - my last patch was, of course, completely bogus.
           (sorry. looked simple...).
 
 1.07 Sun Dec 10 17:41:46 CET 2006

Modified: trunk/libconvert-uulib-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libconvert-uulib-perl/META.yml?rev=22218&op=diff
==============================================================================
--- trunk/libconvert-uulib-perl/META.yml (original)
+++ trunk/libconvert-uulib-perl/META.yml Fri Jun 27 09:55:23 2008
@@ -1,10 +1,12 @@
-# http://module-build.sourceforge.net/META-spec.html
-#XXXXXXX This is a prototype!!!  It will change in the future!!! XXXXX#
-name:         Convert-UUlib
-version:      1.09
-version_from: UUlib.pm
-installdirs:  site
-requires:
-
-distribution_type: module
-generated_by: ExtUtils::MakeMaker version 6.30
+--- #YAML:1.0
+name:                Convert-UUlib
+version:             1.11
+abstract:            ~
+license:             ~
+author:              ~
+generated_by:        ExtUtils::MakeMaker version 6.44
+distribution_type:   module
+requires:     
+meta-spec:
+    url:     http://module-build.sourceforge.net/META-spec-v1.3.html
+    version: 1.3

Modified: trunk/libconvert-uulib-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libconvert-uulib-perl/README?rev=22218&op=diff
==============================================================================
--- trunk/libconvert-uulib-perl/README (original)
+++ trunk/libconvert-uulib-perl/README Fri Jun 27 09:55:23 2008
@@ -4,8 +4,8 @@
 
 SYNOPSIS
      use Convert::UUlib ':all';
- 
-     # read all the files named on the commandline and decode them
+     
+ # read all the files named on the commandline and decode them
      # into the CURRENT directory. See below for a longer example.
      LoadFile $_ for @ARGV;
      for (my $i = 0; my $uu = GetFileListItem $i; $i++) {

Modified: trunk/libconvert-uulib-perl/UUlib.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libconvert-uulib-perl/UUlib.pm?rev=22218&op=diff
==============================================================================
--- trunk/libconvert-uulib-perl/UUlib.pm (original)
+++ trunk/libconvert-uulib-perl/UUlib.pm Fri Jun 27 09:55:23 2008
@@ -8,7 +8,7 @@
 require Exporter;
 require DynaLoader;
 
-our $VERSION = '1.09';
+our $VERSION = '1.11';
 
 our @ISA = qw(Exporter DynaLoader);
 

Modified: trunk/libconvert-uulib-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libconvert-uulib-perl/debian/changelog?rev=22218&op=diff
==============================================================================
--- trunk/libconvert-uulib-perl/debian/changelog (original)
+++ trunk/libconvert-uulib-perl/debian/changelog Fri Jun 27 09:55:23 2008
@@ -1,3 +1,11 @@
+libconvert-uulib-perl (1.11-1) UNRELEASED; urgency=high
+
+  * New upstream release. Bugfix only - fixing "infinite-looping problem
+    when scanning in freestyle mode", so possibly security-related.
+  * Setting urgency=high due to the possible security relation.
+
+ -- Jonas Smedegaard <dr at jones.dk>  Fri, 27 Jun 2008 11:46:52 +0200
+
 libconvert-uulib-perl (1.09-3) unstable; urgency=low
 
   * Really update buildinfo.mk as promised in -2 changelog entry.

Modified: trunk/libconvert-uulib-perl/debian/rules
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libconvert-uulib-perl/debian/rules?rev=22218&op=diff
==============================================================================
--- trunk/libconvert-uulib-perl/debian/rules (original)
+++ trunk/libconvert-uulib-perl/debian/rules Fri Jun 27 09:55:23 2008
@@ -12,7 +12,7 @@
 
 DEB_UPSTREAM_PACKAGE = Convert-UUlib
 DEB_UPSTREAM_URL = http://www.cpan.org/modules/by-module/Convert
-DEB_UPSTREAM_TARBALL_MD5 = f4cfa860176f60a83b56816d5917e71a
+DEB_UPSTREAM_TARBALL_MD5 = 629ef452dd98b446f191b0bb37c39091
 
 DEB_INSTALL_EXAMPLES_libconvert-uulib-perl = example-decoder
 

Modified: trunk/libconvert-uulib-perl/uulib/uulib.c
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libconvert-uulib-perl/uulib/uulib.c?rev=22218&op=diff
==============================================================================
--- trunk/libconvert-uulib-perl/uulib/uulib.c (original)
+++ trunk/libconvert-uulib-perl/uulib/uulib.c Fri Jun 27 09:55:23 2008
@@ -889,6 +889,7 @@
     if (uu_fast_scanning && sr != UURET_CONT)
       break;
   }
+
   if (ferror (datei)) {
     UUMessage (uulib_id, __LINE__, UUMSG_ERROR,
 	       uustring (S_READ_ERROR), filename,
@@ -899,6 +900,7 @@
     UUCLRBUF (uu_rbuf, datei_buf);
     return UURET_IOERR;
   }
+
   fclose (datei);
   UUCLRBUF (uu_rbuf, datei_buf);
 

Modified: trunk/libconvert-uulib-perl/uulib/uuscan.c
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libconvert-uulib-perl/uulib/uuscan.c?rev=22218&op=diff
==============================================================================
--- trunk/libconvert-uulib-perl/uulib/uuscan.c (original)
+++ trunk/libconvert-uulib-perl/uulib/uuscan.c Fri Jun 27 09:55:23 2008
@@ -933,6 +933,9 @@
 	(((ptr = _FP_strrstr (line+2, "--")) == NULL) ||
 	 (*(ptr+2) != '\012' && *(ptr+2) != '\015')) &&
 	_FP_strstr (line+2, "_=_") != NULL) {
+
+      long oldposition = ftell (datei); /* refresh oldpositition so the comment below becomes true */
+     
       if (_FP_fgets (line, 255, datei) == NULL) {
 	break;
       }
@@ -1522,7 +1525,7 @@
     /* ignore empty lines at the beginning of a file */
     preheaders = ftell (datei);
     while (!feof (datei)) {
-      if (UUBUSYPOLL(ftell(datei),progress.fsize)) SPCANCEL();
+      if (UUBUSYPOLL(preheaders,progress.fsize)) SPCANCEL();
       if (_FP_fgets (line, 255, datei) == NULL)
 	break;
       line[255] = '\0';
@@ -3124,9 +3127,8 @@
    * be here!
    */
 
-  if ((sstate.envelope.ctype == NULL ||
-       _FP_stristr (sstate.envelope.ctype, "multipart") != NULL) &&
-      !uu_more_mime) {
+  if ((!sstate.envelope.ctype || _FP_stristr (sstate.envelope.ctype, "multipart"))
+      && !uu_more_mime) {
     prevpos = ftell (datei);
     while (!feof (datei)) {
       if (_FP_fgets (line, 255, datei) == NULL) {
@@ -3181,6 +3183,7 @@
 
   if (sstate.envelope.subject)
     result->subject = _FP_strdup (sstate.envelope.subject);
+
   if (sstate.envelope.from)
     result->origin  = _FP_strdup (sstate.envelope.from);
 




More information about the Pkg-perl-cvs-commits mailing list