]> CyberLeo.Net >> Repos - Github/sugarcrm.git/blob - include/utils/php_zip_utils.php
Release 6.2.1
[Github/sugarcrm.git] / include / utils / php_zip_utils.php
1 <?php
2 /*********************************************************************************
3  * SugarCRM Community Edition is a customer relationship management program developed by
4  * SugarCRM, Inc. Copyright (C) 2004-2011 SugarCRM Inc.
5  * 
6  * This program is free software; you can redistribute it and/or modify it under
7  * the terms of the GNU Affero General Public License version 3 as published by the
8  * Free Software Foundation with the addition of the following permission added
9  * to Section 15 as permitted in Section 7(a): FOR ANY PART OF THE COVERED WORK
10  * IN WHICH THE COPYRIGHT IS OWNED BY SUGARCRM, SUGARCRM DISCLAIMS THE WARRANTY
11  * OF NON INFRINGEMENT OF THIRD PARTY RIGHTS.
12  * 
13  * This program is distributed in the hope that it will be useful, but WITHOUT
14  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
15  * FOR A PARTICULAR PURPOSE.  See the GNU Affero General Public License for more
16  * details.
17  * 
18  * You should have received a copy of the GNU Affero General Public License along with
19  * this program; if not, see http://www.gnu.org/licenses or write to the Free
20  * Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
21  * 02110-1301 USA.
22  * 
23  * You can contact SugarCRM, Inc. headquarters at 10050 North Wolfe Road,
24  * SW2-130, Cupertino, CA 95014, USA. or at email address contact@sugarcrm.com.
25  * 
26  * The interactive user interfaces in modified source and object code versions
27  * of this program must display Appropriate Legal Notices, as required under
28  * Section 5 of the GNU Affero General Public License version 3.
29  * 
30  * In accordance with Section 7(b) of the GNU Affero General Public License version 3,
31  * these Appropriate Legal Notices must retain the display of the "Powered by
32  * SugarCRM" logo. If the display of the logo is not reasonably feasible for
33  * technical reasons, the Appropriate Legal Notices must display the words
34  * "Powered by SugarCRM".
35  ********************************************************************************/
36
37
38
39 if(!defined('sugarEntry') || !sugarEntry) die('Not A Valid Entry Point');
40
41 function unzip( $zip_archive, $zip_dir)
42 {
43    return unzip_file($zip_archive, null, $zip_dir);
44 }
45
46 function unzip_file( $zip_archive, $archive_file, $zip_dir)
47 {
48     if( !is_dir( $zip_dir ) ) {
49         if (defined('SUGAR_PHPUNIT_RUNNER') || defined('SUGARCRM_INSTALL'))
50         {
51                 $GLOBALS['log']->fatal("Specified directory '$zip_dir' for zip file '$zip_archive' extraction does not exist.");
52                 return false;
53         } else {
54             die( "Specified directory '$zip_dir' for zip file '$zip_archive' extraction does not exist." );
55         }
56     }
57     
58     $zip = new ZipArchive;
59     $res = $zip->open($zip_archive);
60     
61     if($res !== TRUE) {
62         if (defined('SUGAR_PHPUNIT_RUNNER') || defined('SUGARCRM_INSTALL'))
63         {
64                 $GLOBALS['log']->fatal(sprintf("ZIP Error(%d): Status(%s): Arhive(%s): Directory(%s)", $res, $zip->status, $zip_archive, $zip_dir));
65             return false;
66         } else {
67                 die(sprintf("ZIP Error(%d): Status(%s): Arhive(%s): Directory(%s)", $res, $zip->status, $zip_archive, $zip_dir));
68         }
69     }
70
71     if($archive_file !== null) {
72         $res = $zip->extractTo($zip_dir, $archive_file);
73     } else {
74         $res = $zip->extractTo($zip_dir);
75     }
76     
77     if($res !== TRUE) {
78         if (defined('SUGAR_PHPUNIT_RUNNER') || defined('SUGARCRM_INSTALL'))
79         {
80                 $GLOBALS['log']->fatal(sprintf("ZIP Error(%d): Status(%s): Arhive(%s): Directory(%s)", $res, $zip->status, $zip_archive, $zip_dir));
81             return false;
82         } else {
83                 die(sprintf("ZIP Error(%d): Status(%s): Arhive(%s): Directory(%s)", $res, $zip->status, $zip_archive, $zip_dir));
84         }
85     }
86     return true;
87 }
88
89 function zip_dir( $zip_dir, $zip_archive )
90 {
91     if( !is_dir( $zip_dir ) ){
92         if (!defined('SUGAR_PHPUNIT_RUNNER'))
93             die( "Specified directory '$zip_dir' for zip file '$zip_archive' extraction does not exist." );
94         return false;
95     }
96     $zip = new ZipArchive();
97     $zip->open($zip_archive, ZIPARCHIVE::CREATE|ZIPARCHIVE::OVERWRITE);
98     $path = realpath($zip_dir);
99     $chop = strlen($path)+1;
100     $dir = new RecursiveDirectoryIterator($path);
101     $it = new RecursiveIteratorIterator($dir, RecursiveIteratorIterator::SELF_FIRST);
102     foreach ($it as $k => $fileinfo) {
103         // Bug # 45143
104         // ensure that . and .. are not zipped up, otherwise, the
105         // CENT OS and others will fail when deploying module
106         $fileName = $fileinfo->getFilename();
107         if ($fileName == "." || $fileName == "..")
108             continue; 
109         $localname = substr($fileinfo->getPathname(), $chop);
110         if($fileinfo->isDir()) {
111             $zip->addEmptyDir($localname);
112         } else {
113             $zip->addFile($fileinfo->getPathname(), $localname);
114         }
115     }
116 }
117
118 /**
119  * Zip list of files, optionally stripping prefix
120  * @param string $zip_file
121  * @param array $file_list
122  * @param string $prefix Regular expression for the prefix to strip
123  */
124 function zip_files_list($zip_file, $file_list, $prefix = '')
125 {
126     $archive    = new ZipArchive();
127     $res = $archive->open($zip_file, ZipArchive::CREATE|ZipArchive::OVERWRITE);
128     if($res !== TRUE)
129     {
130         $GLOBALS['log']->fatal("Unable to open zip file, check directory permissions: $zip_file");
131         return FALSE;
132     }
133     foreach($file_list as $file) {
134         if(!empty($prefix) && preg_match($prefix, $file, $matches) > 0) {
135             $zipname = substr($file, strlen($matches[0]));
136         } else {
137             $zipname = $file;
138         }
139         $archive->addFile($file, $zipname);
140     }
141     return TRUE;
142 }