2 /*********************************************************************************
3 * SugarCRM Community Edition is a customer relationship management program developed by
4 * SugarCRM, Inc. Copyright (C) 2004-2012 SugarCRM Inc.
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.
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
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
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.
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.
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 ********************************************************************************/
39 if(!defined('sugarEntry') || !sugarEntry) die('Not A Valid Entry Point');
41 function unzip( $zip_archive, $zip_dir)
43 return unzip_file($zip_archive, null, $zip_dir);
46 function unzip_file( $zip_archive, $archive_file, $zip_dir)
48 if( !is_dir( $zip_dir ) ) {
49 if (defined('SUGAR_PHPUNIT_RUNNER') || defined('SUGARCRM_INSTALL'))
51 $GLOBALS['log']->fatal("Specified directory '$zip_dir' for zip file '$zip_archive' extraction does not exist.");
54 die( "Specified directory '$zip_dir' for zip file '$zip_archive' extraction does not exist." );
58 $zip = new ZipArchive;
60 $res = $zip->open(UploadFile::realpath($zip_archive)); // we need realpath here for PHP streams support
63 if (defined('SUGAR_PHPUNIT_RUNNER') || defined('SUGARCRM_INSTALL'))
65 $GLOBALS['log']->fatal(sprintf("ZIP Error(%d): Status(%s): Arhive(%s): Directory(%s)", $res, $zip->status, $zip_archive, $zip_dir));
68 die(sprintf("ZIP Error(%d): Status(%s): Arhive(%s): Directory(%s)", $res, $zip->status, $zip_archive, $zip_dir));
73 if($archive_file !== null) {
74 $res = $zip->extractTo(UploadFile::realpath($zip_dir), $archive_file);
76 $res = $zip->extractTo(UploadFile::realpath($zip_dir));
80 if (defined('SUGAR_PHPUNIT_RUNNER') || defined('SUGARCRM_INSTALL'))
82 $GLOBALS['log']->fatal(sprintf("ZIP Error(%d): Status(%s): Arhive(%s): Directory(%s)", $res, $zip->status, $zip_archive, $zip_dir));
85 die(sprintf("ZIP Error(%d): Status(%s): Arhive(%s): Directory(%s)", $res, $zip->status, $zip_archive, $zip_dir));
91 function zip_dir( $zip_dir, $zip_archive )
93 if( !is_dir( $zip_dir ) ){
94 if (!defined('SUGAR_PHPUNIT_RUNNER'))
95 die( "Specified directory '$zip_dir' for zip file '$zip_archive' extraction does not exist." );
98 $zip = new ZipArchive();
99 $zip->open(UploadFile::realpath($zip_archive), ZIPARCHIVE::CREATE|ZIPARCHIVE::OVERWRITE); // we need realpath here for PHP streams support
100 $path = UploadFile::realpath($zip_dir);
101 $chop = strlen($path)+1;
102 $dir = new RecursiveDirectoryIterator($path);
103 $it = new RecursiveIteratorIterator($dir, RecursiveIteratorIterator::SELF_FIRST);
104 foreach ($it as $k => $fileinfo) {
106 // ensure that . and .. are not zipped up, otherwise, the
107 // CENT OS and others will fail when deploying module
108 $fileName = $fileinfo->getFilename();
109 if ($fileName == "." || $fileName == "..")
111 $localname = str_replace("\\", "/",substr($fileinfo->getPathname(), $chop)); // ensure file
112 if($fileinfo->isDir()) {
113 $zip->addEmptyDir($localname."/");
115 $zip->addFile($fileinfo->getPathname(), $localname);
121 * Zip list of files, optionally stripping prefix
122 * FIXME: check what happens with streams
123 * @param string $zip_file
124 * @param array $file_list
125 * @param string $prefix Regular expression for the prefix to strip
127 function zip_files_list($zip_file, $file_list, $prefix = '')
129 $archive = new ZipArchive();
130 $res = $archive->open(UploadFile::realpath($zip_file), ZipArchive::CREATE|ZipArchive::OVERWRITE); // we need realpath here for PHP streams support
133 $GLOBALS['log']->fatal("Unable to open zip file, check directory permissions: $zip_file");
136 foreach($file_list as $file) {
137 if(!empty($prefix) && preg_match($prefix, $file, $matches) > 0) {
138 $zipname = substr($file, strlen($matches[0]));
142 $archive->addFile($file, $zipname);