crm.fsf.org/20131203/files/sites/all/modules-new/civicrm/CRM/Utils/Zip.php

   1 <?php
   2 /*
   3  +--------------------------------------------------------------------+
   4  | CiviCRM version 4.6                                                |
   5  +--------------------------------------------------------------------+
   6  | Copyright CiviCRM LLC (c) 2004-2015                                |
   7  +--------------------------------------------------------------------+
   8  | This file is a part of CiviCRM.                                    |
   9  |                                                                    |
  10  | CiviCRM is free software; you can copy, modify, and distribute it  |
  11  | under the terms of the GNU Affero General Public License           |
  12  | Version 3, 19 November 2007 and the CiviCRM Licensing Exception.   |
  13  |                                                                    |
  14  | CiviCRM is distributed in the hope that it will be useful, but     |
  15  | WITHOUT ANY WARRANTY; without even the implied warranty of         |
  16  | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.               |
  17  | See the GNU Affero General Public License for more details.        |
  18  |                                                                    |
  19  | You should have received a copy of the GNU Affero General Public   |
  20  | License and the CiviCRM Licensing Exception along                  |
  21  | with this program; if not, contact CiviCRM LLC                     |
  22  | at info[AT]civicrm[DOT]org. If you have questions about the        |
  23  | GNU Affero General Public License or the licensing of CiviCRM,     |
  24  | see the CiviCRM license FAQ at http://civicrm.org/licensing        |
  25  +--------------------------------------------------------------------+
  26  */
  27
  28 /**
  29  *
  30  * @package CRM
  31  * @copyright CiviCRM LLC (c) 2004-2015
  32  * $Id$
  33  *
  34  */
  35
  36 /**
  37  * Utilities for working with zip files
  38  */
  39 class CRM_Utils_Zip {
  40
  41   /**
  42    * Given a zip file which contains a single root directory, determine the root's name.
  43    *
  44    * @param ZipArchive $zip
  45    *
  46    * @return mixed; FALSE if #root level items !=1; otherwise, the name of base dir
  47    */
  48   static public function findBaseDirName(ZipArchive $zip) {
  49     $cnt = $zip->numFiles;
  50
  51     $base = FALSE;
  52     $baselen = FALSE;
  53
  54     for ($i = 0; $i < $cnt; $i++) {
  55       $filename = $zip->getNameIndex($i);
  56       if ($base === FALSE) {
  57         if (preg_match('/^[^\/]+\/$/', $filename) && $filename != './' && $filename != '../') {
  58           $base = $filename;
  59           $baselen = strlen($filename);
  60         }
  61         else {
  62           return FALSE;
  63         }
  64       }
  65       elseif (0 != substr_compare($base, $filename, 0, $baselen)) {
  66         return FALSE;
  67       }
  68     }
  69
  70     return $base;
  71   }
  72
  73   /**
  74    * Given a zip file, find all directory names in the root
  75    *
  76    * @param ZipArchive $zip
  77    *
  78    * @return array(string), no trailing /
  79    */
  80   static public function findBaseDirs(ZipArchive $zip) {
  81     $cnt = $zip->numFiles;
  82     $basedirs = array();
  83
  84     for ($i = 0; $i < $cnt; $i++) {
  85       $filename = $zip->getNameIndex($i);
  86       // hypothetically, ./ or ../ would not be legit here
  87       if (preg_match('/^[^\/]+\/$/', $filename) && $filename != './' && $filename != '../') {
  88         $basedirs[] = rtrim($filename, '/');
  89       }
  90     }
  91
  92     return $basedirs;
  93   }
  94
  95   /**
  96    * Determine the name of the folder within a zip.
  97    *
  98    * @param ZipArchive $zip
  99    * @param $expected
 100    *
 101    * @return string
 102    *   or FALSE
 103    */
 104   static public function guessBasedir(ZipArchive $zip, $expected) {
 105     $candidate = FALSE;
 106     $basedirs = CRM_Utils_Zip::findBaseDirs($zip);
 107     if (in_array($expected, $basedirs)) {
 108       $candidate = $expected;
 109     }
 110     elseif (count($basedirs) == 1) {
 111       $candidate = array_shift($basedirs);
 112     }
 113     if ($candidate !== FALSE && preg_match('/^[a-zA-Z0-9]/', $candidate)) {
 114       return $candidate;
 115     }
 116     else {
 117       return FALSE;
 118     }
 119   }
 120
 121
 122   /**
 123    * An inefficient helper for creating a ZIP file from data in memory.
 124    * This is only intended for building temp files for unit-testing.
 125    *
 126    * @param string $zipName
 127    *   file name.
 128    * @param array $dirs
 129    *   Array, list of directory paths.
 130    * @param array $files
 131    *   Array, keys are file names and values are file contents.
 132    * @return bool
 133    */
 134   static public function createTestZip($zipName, $dirs, $files) {
 135     $zip = new ZipArchive();
 136     $res = $zip->open($zipName, ZipArchive::CREATE);
 137     if ($res === TRUE) {
 138       foreach ($dirs as $dir) {
 139         if (!$zip->addEmptyDir($dir)) {
 140           return FALSE;
 141         }
 142       }
 143       foreach ($files as $fileName => $fileData) {
 144         if (!$zip->addFromString($fileName, $fileData)) {
 145           return FALSE;
 146         }
 147       }
 148       $zip->close();
 149     }
 150     else {
 151       return FALSE;
 152     }
 153     return TRUE;
 154   }
 155
 156 }