#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#include "php.h"
#include "php_ini.h"
#include "php_zip.h"
#if HAVE_ZZIPLIB
#include "ext/standard/info.h"
#ifdef HAVE_NEW_ZZIPLIB
#include <zzip/zzip.h>
#else
#include <zziplib.h>
#endif
#ifndef O_BINARY
#define O_BINARY 0
#endif
static int le_zip_dir;
#define le_zip_dir_name "Zip Directory"
static int le_zip_entry;
#define le_zip_entry_name "Zip Entry"
function_entry zip_functions[] = {
PHP_FE(zip_open, NULL)
PHP_FE(zip_read, NULL)
PHP_FE(zip_close, NULL)
PHP_FE(zip_entry_name, NULL)
PHP_FE(zip_entry_compressedsize, NULL)
PHP_FE(zip_entry_filesize, NULL)
PHP_FE(zip_entry_compressionmethod, NULL)
PHP_FE(zip_entry_open, NULL)
PHP_FE(zip_entry_read, NULL)
PHP_FE(zip_entry_close, NULL)
{NULL, NULL, NULL}
};
zend_module_entry zip_module_entry = {
STANDARD_MODULE_HEADER,
"zip",
zip_functions,
PHP_MINIT(zip),
NULL,
NULL,
NULL,
PHP_MINFO(zip),
NO_VERSION_YET,
STANDARD_MODULE_PROPERTIES
};
#ifdef COMPILE_DL_ZIP
ZEND_GET_MODULE(zip)
#endif
static void php_zip_free_dir(zend_rsrc_list_entry *rsrc TSRMLS_DC)
{
ZZIP_DIR *z_dir = (ZZIP_DIR *) rsrc->ptr;
zzip_closedir(z_dir);
}
static void php_zip_free_entry(zend_rsrc_list_entry *rsrc TSRMLS_DC)
{
php_zzip_dirent *entry = (php_zzip_dirent *) rsrc->ptr;
if (entry->fp)
zzip_close(entry->fp);
efree(entry);
}
PHP_MINIT_FUNCTION(zip)
{
le_zip_dir = zend_register_list_destructors_ex(php_zip_free_dir, NULL, le_zip_dir_name, module_number);
le_zip_entry = zend_register_list_destructors_ex(php_zip_free_entry, NULL, le_zip_entry_name, module_number);
return SUCCESS;
}
PHP_MINFO_FUNCTION(zip)
{
php_info_print_table_start();
php_info_print_table_row(2, "Zip support", "enabled");
php_info_print_table_end();
}
PHP_FUNCTION(zip_open)
{
char *filename;
ZZIP_DIR *archive_p = NULL;
int filename_len;
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &filename, &filename_len) == FAILURE) {
return;
}
if (PG(safe_mode) && (!php_checkuid(filename, NULL, CHECKUID_ALLOW_FILE_NOT_EXISTS))) {
RETURN_FALSE;
}
if (php_check_open_basedir(filename TSRMLS_CC)) {
RETURN_FALSE;
}
archive_p = zzip_opendir(filename);
if (archive_p == NULL) {
php_error(E_WARNING, "%s() Cannot open zip archive %s",
get_active_function_name(TSRMLS_C), filename);
RETURN_FALSE;
}
ZEND_REGISTER_RESOURCE(return_value, archive_p, le_zip_dir);
}
PHP_FUNCTION(zip_read)
{
zval *zzip_dp;
ZZIP_DIR *archive_p = NULL;
php_zzip_dirent *entry = NULL;
int ret;
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &zzip_dp) == FAILURE) {
return;
}
ZEND_FETCH_RESOURCE(archive_p, ZZIP_DIR *, &zzip_dp, -1, le_zip_dir_name, le_zip_dir);
entry = emalloc(sizeof(php_zzip_dirent));
ret = zzip_dir_read(archive_p, &entry->dirent);
if (ret == 0) {
efree(entry);
RETURN_FALSE;
}
entry->fp = NULL;
ZEND_REGISTER_RESOURCE(return_value, entry, le_zip_entry);
}
PHP_FUNCTION(zip_close)
{
zval *zzip_dp;
ZZIP_DIR *archive_p = NULL;
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &zzip_dp) == FAILURE) {
return;
}
ZEND_FETCH_RESOURCE(archive_p, ZZIP_DIR *, &zzip_dp, -1, le_zip_dir_name, le_zip_dir);
zend_list_delete(Z_LVAL_P(zzip_dp));
}
static void php_zzip_get_entry(INTERNAL_FUNCTION_PARAMETERS, int opt)
{
zval *zzip_ent;
php_zzip_dirent *entry = NULL;
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &zzip_ent) == FAILURE) {
return;
}
ZEND_FETCH_RESOURCE(entry, php_zzip_dirent *, &zzip_ent, -1, le_zip_entry_name, le_zip_entry);
switch (opt) {
case 0:
RETURN_STRING(entry->dirent.d_name, 1);
break;
case 1:
RETURN_LONG(entry->dirent.d_csize);
break;
case 2:
RETURN_LONG(entry->dirent.st_size);
break;
case 3:
RETURN_STRING((char *) zzip_compr_str(entry->dirent.d_compr), 1);
break;
}
}
PHP_FUNCTION(zip_entry_name)
{
php_zzip_get_entry(INTERNAL_FUNCTION_PARAM_PASSTHRU, 0);
}
PHP_FUNCTION(zip_entry_compressedsize)
{
php_zzip_get_entry(INTERNAL_FUNCTION_PARAM_PASSTHRU, 1);
}
PHP_FUNCTION(zip_entry_filesize)
{
php_zzip_get_entry(INTERNAL_FUNCTION_PARAM_PASSTHRU, 2);
}
PHP_FUNCTION(zip_entry_compressionmethod)
{
php_zzip_get_entry(INTERNAL_FUNCTION_PARAM_PASSTHRU, 3);
}
PHP_FUNCTION(zip_entry_open)
{
zval *zzip_dp;
zval *zzip_ent;
ZZIP_DIR *archive_p = NULL;
php_zzip_dirent *entry = NULL;
char *mode;
int mode_len;
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rr|s", &zzip_dp, &zzip_ent, &mode, &mode_len) == FAILURE) {
return;
}
ZEND_FETCH_RESOURCE(archive_p, ZZIP_DIR *, &zzip_dp, -1, le_zip_dir_name, le_zip_dir);
ZEND_FETCH_RESOURCE(entry, php_zzip_dirent *, &zzip_ent, -1, le_zip_entry_name, le_zip_entry);
entry->fp = zzip_file_open(archive_p, entry->dirent.d_name, O_RDONLY | O_BINARY);
RETURN_BOOL((int) entry->fp);
}
PHP_FUNCTION(zip_entry_read)
{
zval *zzip_ent;
php_zzip_dirent *entry = NULL;
char *buf = NULL;
long len = 1024;
int ret = 0;
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r|l", &zzip_ent, &len) == FAILURE) {
return;
}
if (len <= 0) {
php_error_docref(NULL TSRMLS_CC, E_WARNING, "The bytes parameter must greater then zero");
RETURN_FALSE;
}
ZEND_FETCH_RESOURCE(entry, php_zzip_dirent *, &zzip_ent, -1, le_zip_entry_name, le_zip_entry);
buf = emalloc(len + 1);
ret = zzip_read(entry->fp, buf, len);
buf[ret] = 0;
if (ret == 0) {
RETURN_FALSE;
} else {
RETURN_STRINGL(buf, ret, 0);
}
}
PHP_FUNCTION(zip_entry_close)
{
zval *zzip_ent;
php_zzip_dirent *entry = NULL;
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &zzip_ent) == FAILURE) {
return;
}
ZEND_FETCH_RESOURCE(entry, php_zzip_dirent *, &zzip_ent, -1, le_zip_entry_name, le_zip_entry);
zend_list_delete(Z_LVAL_P(zzip_ent));
}
#endif