From ff933bfa8f1a91be94d42ce19e7c62dd537da7ea Mon Sep 17 00:00:00 2001
From: skodak <skodak>
Date: Thu, 7 May 2009 16:44:48 +0000
Subject: [PATCH] MDL-2307 fixing unzip regression, sorry

---
 lib/moodlelib.php | 15 ++++++++++++---
 1 file changed, 12 insertions(+), 3 deletions(-)

diff --git a/lib/moodlelib.php b/lib/moodlelib.php
index dbd16ff700b..195fde2f3fc 100644
--- a/lib/moodlelib.php
+++ b/lib/moodlelib.php
@@ -6541,16 +6541,25 @@ function unzip_file ($zipfile, $destination = '', $showstatus = true) {
     //    -$zipfilename is the name of the zip file (without path)
     //    -$destpath is the destination path where the zip file will uncompressed (dir)
 
-    $list = null;
+    $list = array();
+
+    require_once("$CFG->libdir/filelib.php");
+
+    do {
+        $temppath = "$CFG->dataroot/temp/unzip/".random_string(10);
+    } while (file_exists($temppath));
+    if (!check_dir_exists($temppath, true, true)) {
+        return false;
+    }
 
     if (empty($CFG->unzip)) {    // Use built-in php-based unzip function
 
         include_once("$CFG->libdir/pclzip/pclzip.lib.php");
         $archive = new PclZip(cleardoubleslashes("$zippath/$zipfilename"));
-        if (!$list = $archive->extract(PCLZIP_OPT_PATH, $destpath,
+        if (!$list = $archive->extract(PCLZIP_OPT_PATH, $temppath,
                                        PCLZIP_CB_PRE_EXTRACT, 'unzip_cleanfilename',
                                        PCLZIP_OPT_EXTRACT_DIR_RESTRICTION, $temppath)) {
-            if (!empty($showstatus)) {
+                    if (!empty($showstatus)) {
                 notice($archive->errorInfo(true));
             }
             return false;