Fix for mcrypt error, when encrypting files of size = X*1024 bytes

[jirafeau.git] / lib / functions.php

diff --git a/lib/functions.php b/lib/functions.php
index 850386b79ee6c5e6aa5e111dd8866b24d2d338c8..cfb27033d84dc8cda4a26b11a34f472937d7c35b 100644 (file)
--- a/lib/functions.php
+++ b/lib/functions.php
@@ -1205,10 +1205,13 @@ function jirafeau_encrypt_file($fp_src, $fp_dst)
     /* Crypt file. */
     $r = fopen($fp_src, 'r');
     $w = fopen($fp_dst, 'c');
-    while (!feof($r)) {
-        $enc = mcrypt_generic($m, fread($r, 1024));
-        if (fwrite($w, $enc) === false) {
-            return '';
+    while (!feof($r)) { 
+        $to_enc = fread($r, 1024);
+        if (strlen($to_enc) > 0) {
+            $enc = mcrypt_generic($m, $to_enc);
+            if (fwrite($w, $enc) === false) {
+                return '';
+            }
         }
     }
     fclose($r);