develooper Front page | perl.cvs.parrot | Postings from December 2008

[svn:parrot] r33944 - trunk/src

From:
cotto
Date:
December 15, 2008 18:29
Subject:
[svn:parrot] r33944 - trunk/src
Message ID:
20081216022929.BC724CBA12@x12.develooper.com
Author: cotto
Date: Mon Dec 15 18:29:28 2008
New Revision: 33944

Modified:
   trunk/src/packfile.c

Log:
[packfile] make directory_unpack a little more paranoid


Modified: trunk/src/packfile.c
==============================================================================
--- trunk/src/packfile.c	(original)
+++ trunk/src/packfile.c	Mon Dec 15 18:29:28 2008
@@ -1764,6 +1764,12 @@
             if (pf->header->wordsize == 8)
                 pos = pf->src + seg->file_offset * 2;
 #endif
+            else
+            {
+                fprintf(stderr, "directory_unpack failed: invalid wordsize %d\n",
+                        pf->header->wordsize);
+                return 0;
+            }
         }
         else
             pos = pf->src + seg->file_offset;



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About