Annotation of embedaddon/php/ext/phar/dirstream.c, revision 1.1
1.1 ! misho 1: /*
! 2: +----------------------------------------------------------------------+
! 3: | phar:// stream wrapper support |
! 4: +----------------------------------------------------------------------+
! 5: | Copyright (c) 2005-2012 The PHP Group |
! 6: +----------------------------------------------------------------------+
! 7: | This source file is subject to version 3.01 of the PHP license, |
! 8: | that is bundled with this package in the file LICENSE, and is |
! 9: | available through the world-wide-web at the following url: |
! 10: | http://www.php.net/license/3_01.txt. |
! 11: | If you did not receive a copy of the PHP license and are unable to |
! 12: | obtain it through the world-wide-web, please send a note to |
! 13: | license@php.net so we can mail you a copy immediately. |
! 14: +----------------------------------------------------------------------+
! 15: | Authors: Gregory Beaver <cellog@php.net> |
! 16: | Marcus Boerger <helly@php.net> |
! 17: +----------------------------------------------------------------------+
! 18: */
! 19:
! 20: #define PHAR_DIRSTREAM 1
! 21: #include "phar_internal.h"
! 22: #include "dirstream.h"
! 23:
! 24: BEGIN_EXTERN_C()
! 25: void phar_dostat(phar_archive_data *phar, phar_entry_info *data, php_stream_statbuf *ssb, zend_bool is_dir TSRMLS_DC);
! 26: END_EXTERN_C()
! 27:
! 28: php_stream_ops phar_dir_ops = {
! 29: phar_dir_write, /* write */
! 30: phar_dir_read, /* read */
! 31: phar_dir_close, /* close */
! 32: phar_dir_flush, /* flush */
! 33: "phar dir",
! 34: phar_dir_seek, /* seek */
! 35: NULL, /* cast */
! 36: NULL, /* stat */
! 37: NULL, /* set option */
! 38: };
! 39:
! 40: /**
! 41: * Used for closedir($fp) where $fp is an opendir('phar://...') directory handle
! 42: */
! 43: static int phar_dir_close(php_stream *stream, int close_handle TSRMLS_DC) /* {{{ */
! 44: {
! 45: HashTable *data = (HashTable *)stream->abstract;
! 46:
! 47: if (data && data->arBuckets) {
! 48: zend_hash_destroy(data);
! 49: data->arBuckets = 0;
! 50: FREE_HASHTABLE(data);
! 51: stream->abstract = NULL;
! 52: }
! 53:
! 54: return 0;
! 55: }
! 56: /* }}} */
! 57:
! 58: /**
! 59: * Used for seeking on a phar directory handle
! 60: */
! 61: static int phar_dir_seek(php_stream *stream, off_t offset, int whence, off_t *newoffset TSRMLS_DC) /* {{{ */
! 62: {
! 63: HashTable *data = (HashTable *)stream->abstract;
! 64:
! 65: if (!data) {
! 66: return -1;
! 67: }
! 68:
! 69: if (whence == SEEK_END) {
! 70: whence = SEEK_SET;
! 71: offset = zend_hash_num_elements(data) + offset;
! 72: }
! 73:
! 74: if (whence == SEEK_SET) {
! 75: zend_hash_internal_pointer_reset(data);
! 76: }
! 77:
! 78: if (offset < 0) {
! 79: return -1;
! 80: } else {
! 81: *newoffset = 0;
! 82: while (*newoffset < offset && zend_hash_move_forward(data) == SUCCESS) {
! 83: ++(*newoffset);
! 84: }
! 85: return 0;
! 86: }
! 87: }
! 88: /* }}} */
! 89:
! 90: /**
! 91: * Used for readdir() on an opendir()ed phar directory handle
! 92: */
! 93: static size_t phar_dir_read(php_stream *stream, char *buf, size_t count TSRMLS_DC) /* {{{ */
! 94: {
! 95: size_t to_read;
! 96: HashTable *data = (HashTable *)stream->abstract;
! 97: phar_zstr key;
! 98: char *str_key;
! 99: uint keylen;
! 100: ulong unused;
! 101:
! 102: if (FAILURE == zend_hash_has_more_elements(data)) {
! 103: return 0;
! 104: }
! 105:
! 106: if (HASH_KEY_NON_EXISTANT == zend_hash_get_current_key_ex(data, &key, &keylen, &unused, 0, NULL)) {
! 107: return 0;
! 108: }
! 109:
! 110: PHAR_STR(key, str_key);
! 111: zend_hash_move_forward(data);
! 112: to_read = MIN(keylen, count);
! 113:
! 114: if (to_read == 0 || count < keylen) {
! 115: PHAR_STR_FREE(str_key);
! 116: return 0;
! 117: }
! 118:
! 119: memset(buf, 0, sizeof(php_stream_dirent));
! 120: memcpy(((php_stream_dirent *) buf)->d_name, str_key, to_read);
! 121: PHAR_STR_FREE(str_key);
! 122: ((php_stream_dirent *) buf)->d_name[to_read + 1] = '\0';
! 123:
! 124: return sizeof(php_stream_dirent);
! 125: }
! 126: /* }}} */
! 127:
! 128: /**
! 129: * Dummy: Used for writing to a phar directory (i.e. not used)
! 130: */
! 131: static size_t phar_dir_write(php_stream *stream, const char *buf, size_t count TSRMLS_DC) /* {{{ */
! 132: {
! 133: return 0;
! 134: }
! 135: /* }}} */
! 136:
! 137: /**
! 138: * Dummy: Used for flushing writes to a phar directory (i.e. not used)
! 139: */
! 140: static int phar_dir_flush(php_stream *stream TSRMLS_DC) /* {{{ */
! 141: {
! 142: return EOF;
! 143: }
! 144: /* }}} */
! 145:
! 146: /**
! 147: * add an empty element with a char * key to a hash table, avoiding duplicates
! 148: *
! 149: * This is used to get a unique listing of virtual directories within a phar,
! 150: * for iterating over opendir()ed phar directories.
! 151: */
! 152: static int phar_add_empty(HashTable *ht, char *arKey, uint nKeyLength) /* {{{ */
! 153: {
! 154: void *dummy = (char *) 1;
! 155:
! 156: return zend_hash_update(ht, arKey, nKeyLength, (void *) &dummy, sizeof(void *), NULL);
! 157: }
! 158: /* }}} */
! 159:
! 160: /**
! 161: * Used for sorting directories alphabetically
! 162: */
! 163: static int phar_compare_dir_name(const void *a, const void *b TSRMLS_DC) /* {{{ */
! 164: {
! 165: Bucket *f;
! 166: Bucket *s;
! 167: int result;
! 168:
! 169: f = *((Bucket **) a);
! 170: s = *((Bucket **) b);
! 171: #if (PHP_MAJOR_VERSION < 6)
! 172: result = zend_binary_strcmp(f->arKey, f->nKeyLength, s->arKey, s->nKeyLength);
! 173: #else
! 174: result = zend_binary_strcmp(f->key.arKey.s, f->nKeyLength, s->key.arKey.s, s->nKeyLength);
! 175: #endif
! 176:
! 177: if (result < 0) {
! 178: return -1;
! 179: } else if (result > 0) {
! 180: return 1;
! 181: } else {
! 182: return 0;
! 183: }
! 184: }
! 185: /* }}} */
! 186:
! 187: /**
! 188: * Create a opendir() directory stream handle by iterating over each of the
! 189: * files in a phar and retrieving its relative path. From this, construct
! 190: * a list of files/directories that are "in" the directory represented by dir
! 191: */
! 192: static php_stream *phar_make_dirstream(char *dir, HashTable *manifest TSRMLS_DC) /* {{{ */
! 193: {
! 194: HashTable *data;
! 195: int dirlen = strlen(dir);
! 196: phar_zstr key;
! 197: char *entry, *found, *save, *str_key;
! 198: uint keylen;
! 199: ulong unused;
! 200:
! 201: ALLOC_HASHTABLE(data);
! 202: zend_hash_init(data, 64, zend_get_hash_value, NULL, 0);
! 203:
! 204: if ((*dir == '/' && dirlen == 1 && (manifest->nNumOfElements == 0)) || (dirlen >= sizeof(".phar")-1 && !memcmp(dir, ".phar", sizeof(".phar")-1))) {
! 205: /* make empty root directory for empty phar */
! 206: /* make empty directory for .phar magic directory */
! 207: efree(dir);
! 208: return php_stream_alloc(&phar_dir_ops, data, NULL, "r");
! 209: }
! 210:
! 211: zend_hash_internal_pointer_reset(manifest);
! 212:
! 213: while (FAILURE != zend_hash_has_more_elements(manifest)) {
! 214: if (HASH_KEY_NON_EXISTANT == zend_hash_get_current_key_ex(manifest, &key, &keylen, &unused, 0, NULL)) {
! 215: break;
! 216: }
! 217:
! 218: PHAR_STR(key, str_key);
! 219:
! 220: if (keylen <= (uint)dirlen) {
! 221: if (keylen < (uint)dirlen || !strncmp(str_key, dir, dirlen)) {
! 222: PHAR_STR_FREE(str_key);
! 223: if (SUCCESS != zend_hash_move_forward(manifest)) {
! 224: break;
! 225: }
! 226: continue;
! 227: }
! 228: }
! 229:
! 230: if (*dir == '/') {
! 231: /* root directory */
! 232: if (keylen >= sizeof(".phar")-1 && !memcmp(str_key, ".phar", sizeof(".phar")-1)) {
! 233: PHAR_STR_FREE(str_key);
! 234: /* do not add any magic entries to this directory */
! 235: if (SUCCESS != zend_hash_move_forward(manifest)) {
! 236: break;
! 237: }
! 238: continue;
! 239: }
! 240:
! 241: if (NULL != (found = (char *) memchr(str_key, '/', keylen))) {
! 242: /* the entry has a path separator and is a subdirectory */
! 243: entry = (char *) safe_emalloc(found - str_key, 1, 1);
! 244: memcpy(entry, str_key, found - str_key);
! 245: keylen = found - str_key;
! 246: entry[keylen] = '\0';
! 247: } else {
! 248: entry = (char *) safe_emalloc(keylen, 1, 1);
! 249: memcpy(entry, str_key, keylen);
! 250: entry[keylen] = '\0';
! 251: }
! 252:
! 253: PHAR_STR_FREE(str_key);
! 254: goto PHAR_ADD_ENTRY;
! 255: } else {
! 256: if (0 != memcmp(str_key, dir, dirlen)) {
! 257: /* entry in directory not found */
! 258: PHAR_STR_FREE(str_key);
! 259: if (SUCCESS != zend_hash_move_forward(manifest)) {
! 260: break;
! 261: }
! 262: continue;
! 263: } else {
! 264: if (str_key[dirlen] != '/') {
! 265: PHAR_STR_FREE(str_key);
! 266: if (SUCCESS != zend_hash_move_forward(manifest)) {
! 267: break;
! 268: }
! 269: continue;
! 270: }
! 271: }
! 272: }
! 273:
! 274: save = str_key;
! 275: save += dirlen + 1; /* seek to just past the path separator */
! 276:
! 277: if (NULL != (found = (char *) memchr(save, '/', keylen - dirlen - 1))) {
! 278: /* is subdirectory */
! 279: save -= dirlen + 1;
! 280: entry = (char *) safe_emalloc(found - save + dirlen, 1, 1);
! 281: memcpy(entry, save + dirlen + 1, found - save - dirlen - 1);
! 282: keylen = found - save - dirlen - 1;
! 283: entry[keylen] = '\0';
! 284: } else {
! 285: /* is file */
! 286: save -= dirlen + 1;
! 287: entry = (char *) safe_emalloc(keylen - dirlen, 1, 1);
! 288: memcpy(entry, save + dirlen + 1, keylen - dirlen - 1);
! 289: entry[keylen - dirlen - 1] = '\0';
! 290: keylen = keylen - dirlen - 1;
! 291: }
! 292: PHAR_STR_FREE(str_key);
! 293: PHAR_ADD_ENTRY:
! 294: if (keylen) {
! 295: phar_add_empty(data, entry, keylen);
! 296: }
! 297:
! 298: efree(entry);
! 299:
! 300: if (SUCCESS != zend_hash_move_forward(manifest)) {
! 301: break;
! 302: }
! 303: }
! 304:
! 305: if (FAILURE != zend_hash_has_more_elements(data)) {
! 306: efree(dir);
! 307: if (zend_hash_sort(data, zend_qsort, phar_compare_dir_name, 0 TSRMLS_CC) == FAILURE) {
! 308: FREE_HASHTABLE(data);
! 309: return NULL;
! 310: }
! 311: return php_stream_alloc(&phar_dir_ops, data, NULL, "r");
! 312: } else {
! 313: efree(dir);
! 314: return php_stream_alloc(&phar_dir_ops, data, NULL, "r");
! 315: }
! 316: }
! 317: /* }}}*/
! 318:
! 319: /**
! 320: * Open a directory handle within a phar archive
! 321: */
! 322: php_stream *phar_wrapper_open_dir(php_stream_wrapper *wrapper, char *path, char *mode, int options, char **opened_path, php_stream_context *context STREAMS_DC TSRMLS_DC) /* {{{ */
! 323: {
! 324: php_url *resource = NULL;
! 325: php_stream *ret;
! 326: char *internal_file, *error, *str_key;
! 327: phar_zstr key;
! 328: uint keylen;
! 329: ulong unused;
! 330: phar_archive_data *phar;
! 331: phar_entry_info *entry = NULL;
! 332: uint host_len;
! 333:
! 334: if ((resource = phar_parse_url(wrapper, path, mode, options TSRMLS_CC)) == NULL) {
! 335: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar url \"%s\" is unknown", path);
! 336: return NULL;
! 337: }
! 338:
! 339: /* we must have at the very least phar://alias.phar/ */
! 340: if (!resource->scheme || !resource->host || !resource->path) {
! 341: if (resource->host && !resource->path) {
! 342: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: no directory in \"%s\", must have at least phar://%s/ for root directory (always use full path to a new phar)", path, resource->host);
! 343: php_url_free(resource);
! 344: return NULL;
! 345: }
! 346: php_url_free(resource);
! 347: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: invalid url \"%s\", must have at least phar://%s/", path, path);
! 348: return NULL;
! 349: }
! 350:
! 351: if (strcasecmp("phar", resource->scheme)) {
! 352: php_url_free(resource);
! 353: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: not a phar url \"%s\"", path);
! 354: return NULL;
! 355: }
! 356:
! 357: host_len = strlen(resource->host);
! 358: phar_request_initialize(TSRMLS_C);
! 359: internal_file = resource->path + 1; /* strip leading "/" */
! 360:
! 361: if (FAILURE == phar_get_archive(&phar, resource->host, host_len, NULL, 0, &error TSRMLS_CC)) {
! 362: if (error) {
! 363: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "%s", error);
! 364: efree(error);
! 365: } else {
! 366: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar file \"%s\" is unknown", resource->host);
! 367: }
! 368: php_url_free(resource);
! 369: return NULL;
! 370: }
! 371:
! 372: if (error) {
! 373: efree(error);
! 374: }
! 375:
! 376: if (*internal_file == '\0') {
! 377: /* root directory requested */
! 378: internal_file = estrndup(internal_file - 1, 1);
! 379: ret = phar_make_dirstream(internal_file, &phar->manifest TSRMLS_CC);
! 380: php_url_free(resource);
! 381: return ret;
! 382: }
! 383:
! 384: if (!phar->manifest.arBuckets) {
! 385: php_url_free(resource);
! 386: return NULL;
! 387: }
! 388:
! 389: if (SUCCESS == zend_hash_find(&phar->manifest, internal_file, strlen(internal_file), (void**)&entry) && !entry->is_dir) {
! 390: php_url_free(resource);
! 391: return NULL;
! 392: } else if (entry && entry->is_dir) {
! 393: if (entry->is_mounted) {
! 394: php_url_free(resource);
! 395: return php_stream_opendir(entry->tmp, options, context);
! 396: }
! 397: internal_file = estrdup(internal_file);
! 398: php_url_free(resource);
! 399: return phar_make_dirstream(internal_file, &phar->manifest TSRMLS_CC);
! 400: } else {
! 401: int i_len = strlen(internal_file);
! 402:
! 403: /* search for directory */
! 404: zend_hash_internal_pointer_reset(&phar->manifest);
! 405: while (FAILURE != zend_hash_has_more_elements(&phar->manifest)) {
! 406: if (HASH_KEY_NON_EXISTANT !=
! 407: zend_hash_get_current_key_ex(
! 408: &phar->manifest, &key, &keylen, &unused, 0, NULL)) {
! 409: PHAR_STR(key, str_key);
! 410: if (keylen > (uint)i_len && 0 == memcmp(str_key, internal_file, i_len)) {
! 411: PHAR_STR_FREE(str_key);
! 412: /* directory found */
! 413: internal_file = estrndup(internal_file,
! 414: i_len);
! 415: php_url_free(resource);
! 416: return phar_make_dirstream(internal_file, &phar->manifest TSRMLS_CC);
! 417: }
! 418: PHAR_STR_FREE(str_key);
! 419: }
! 420:
! 421: if (SUCCESS != zend_hash_move_forward(&phar->manifest)) {
! 422: break;
! 423: }
! 424: }
! 425: }
! 426:
! 427: php_url_free(resource);
! 428: return NULL;
! 429: }
! 430: /* }}} */
! 431:
! 432: /**
! 433: * Make a new directory within a phar archive
! 434: */
! 435: int phar_wrapper_mkdir(php_stream_wrapper *wrapper, char *url_from, int mode, int options, php_stream_context *context TSRMLS_DC) /* {{{ */
! 436: {
! 437: phar_entry_info entry, *e;
! 438: phar_archive_data *phar = NULL;
! 439: char *error, *arch, *entry2;
! 440: int arch_len, entry_len;
! 441: php_url *resource = NULL;
! 442: uint host_len;
! 443:
! 444: /* pre-readonly check, we need to know if this is a data phar */
! 445: if (FAILURE == phar_split_fname(url_from, strlen(url_from), &arch, &arch_len, &entry2, &entry_len, 2, 2 TSRMLS_CC)) {
! 446: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: cannot create directory \"%s\", no phar archive specified", url_from);
! 447: return 0;
! 448: }
! 449:
! 450: if (FAILURE == phar_get_archive(&phar, arch, arch_len, NULL, 0, NULL TSRMLS_CC)) {
! 451: phar = NULL;
! 452: }
! 453:
! 454: efree(arch);
! 455: efree(entry2);
! 456:
! 457: if (PHAR_G(readonly) && (!phar || !phar->is_data)) {
! 458: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: cannot create directory \"%s\", write operations disabled", url_from);
! 459: return 0;
! 460: }
! 461:
! 462: if ((resource = phar_parse_url(wrapper, url_from, "w", options TSRMLS_CC)) == NULL) {
! 463: return 0;
! 464: }
! 465:
! 466: /* we must have at the very least phar://alias.phar/internalfile.php */
! 467: if (!resource->scheme || !resource->host || !resource->path) {
! 468: php_url_free(resource);
! 469: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: invalid url \"%s\"", url_from);
! 470: return 0;
! 471: }
! 472:
! 473: if (strcasecmp("phar", resource->scheme)) {
! 474: php_url_free(resource);
! 475: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: not a phar stream url \"%s\"", url_from);
! 476: return 0;
! 477: }
! 478:
! 479: host_len = strlen(resource->host);
! 480:
! 481: if (FAILURE == phar_get_archive(&phar, resource->host, host_len, NULL, 0, &error TSRMLS_CC)) {
! 482: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: cannot create directory \"%s\" in phar \"%s\", error retrieving phar information: %s", resource->path+1, resource->host, error);
! 483: efree(error);
! 484: php_url_free(resource);
! 485: return 0;
! 486: }
! 487:
! 488: if ((e = phar_get_entry_info_dir(phar, resource->path + 1, strlen(resource->path + 1), 2, &error, 1 TSRMLS_CC))) {
! 489: /* directory exists, or is a subdirectory of an existing file */
! 490: if (e->is_temp_dir) {
! 491: efree(e->filename);
! 492: efree(e);
! 493: }
! 494: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: cannot create directory \"%s\" in phar \"%s\", directory already exists", resource->path+1, resource->host);
! 495: php_url_free(resource);
! 496: return 0;
! 497: }
! 498:
! 499: if (error) {
! 500: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: cannot create directory \"%s\" in phar \"%s\", %s", resource->path+1, resource->host, error);
! 501: efree(error);
! 502: php_url_free(resource);
! 503: return 0;
! 504: }
! 505:
! 506: if (phar_get_entry_info_dir(phar, resource->path + 1, strlen(resource->path + 1), 0, &error, 1 TSRMLS_CC)) {
! 507: /* entry exists as a file */
! 508: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: cannot create directory \"%s\" in phar \"%s\", file already exists", resource->path+1, resource->host);
! 509: php_url_free(resource);
! 510: return 0;
! 511: }
! 512:
! 513: if (error) {
! 514: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: cannot create directory \"%s\" in phar \"%s\", %s", resource->path+1, resource->host, error);
! 515: efree(error);
! 516: php_url_free(resource);
! 517: return 0;
! 518: }
! 519:
! 520: memset((void *) &entry, 0, sizeof(phar_entry_info));
! 521:
! 522: /* strip leading "/" */
! 523: if (phar->is_zip) {
! 524: entry.is_zip = 1;
! 525: }
! 526:
! 527: entry.filename = estrdup(resource->path + 1);
! 528:
! 529: if (phar->is_tar) {
! 530: entry.is_tar = 1;
! 531: entry.tar_type = TAR_DIR;
! 532: }
! 533:
! 534: entry.filename_len = strlen(resource->path + 1);
! 535: php_url_free(resource);
! 536: entry.is_dir = 1;
! 537: entry.phar = phar;
! 538: entry.is_modified = 1;
! 539: entry.is_crc_checked = 1;
! 540: entry.flags = PHAR_ENT_PERM_DEF_DIR;
! 541: entry.old_flags = PHAR_ENT_PERM_DEF_DIR;
! 542:
! 543: if (SUCCESS != zend_hash_add(&phar->manifest, entry.filename, entry.filename_len, (void*)&entry, sizeof(phar_entry_info), NULL)) {
! 544: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: cannot create directory \"%s\" in phar \"%s\", adding to manifest failed", entry.filename, phar->fname);
! 545: efree(error);
! 546: efree(entry.filename);
! 547: return 0;
! 548: }
! 549:
! 550: phar_flush(phar, 0, 0, 0, &error TSRMLS_CC);
! 551:
! 552: if (error) {
! 553: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: cannot create directory \"%s\" in phar \"%s\", %s", entry.filename, phar->fname, error);
! 554: zend_hash_del(&phar->manifest, entry.filename, entry.filename_len);
! 555: efree(error);
! 556: return 0;
! 557: }
! 558:
! 559: phar_add_virtual_dirs(phar, entry.filename, entry.filename_len TSRMLS_CC);
! 560: return 1;
! 561: }
! 562: /* }}} */
! 563:
! 564: /**
! 565: * Remove a directory within a phar archive
! 566: */
! 567: int phar_wrapper_rmdir(php_stream_wrapper *wrapper, char *url, int options, php_stream_context *context TSRMLS_DC) /* {{{ */
! 568: {
! 569: phar_entry_info *entry;
! 570: phar_archive_data *phar = NULL;
! 571: char *error, *arch, *entry2;
! 572: int arch_len, entry_len;
! 573: php_url *resource = NULL;
! 574: uint host_len;
! 575: phar_zstr key;
! 576: char *str_key;
! 577: uint key_len;
! 578: ulong unused;
! 579: uint path_len;
! 580:
! 581: /* pre-readonly check, we need to know if this is a data phar */
! 582: if (FAILURE == phar_split_fname(url, strlen(url), &arch, &arch_len, &entry2, &entry_len, 2, 2 TSRMLS_CC)) {
! 583: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: cannot remove directory \"%s\", no phar archive specified, or phar archive does not exist", url);
! 584: return 0;
! 585: }
! 586:
! 587: if (FAILURE == phar_get_archive(&phar, arch, arch_len, NULL, 0, NULL TSRMLS_CC)) {
! 588: phar = NULL;
! 589: }
! 590:
! 591: efree(arch);
! 592: efree(entry2);
! 593:
! 594: if (PHAR_G(readonly) && (!phar || !phar->is_data)) {
! 595: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: cannot rmdir directory \"%s\", write operations disabled", url);
! 596: return 0;
! 597: }
! 598:
! 599: if ((resource = phar_parse_url(wrapper, url, "w", options TSRMLS_CC)) == NULL) {
! 600: return 0;
! 601: }
! 602:
! 603: /* we must have at the very least phar://alias.phar/internalfile.php */
! 604: if (!resource->scheme || !resource->host || !resource->path) {
! 605: php_url_free(resource);
! 606: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: invalid url \"%s\"", url);
! 607: return 0;
! 608: }
! 609:
! 610: if (strcasecmp("phar", resource->scheme)) {
! 611: php_url_free(resource);
! 612: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: not a phar stream url \"%s\"", url);
! 613: return 0;
! 614: }
! 615:
! 616: host_len = strlen(resource->host);
! 617:
! 618: if (FAILURE == phar_get_archive(&phar, resource->host, host_len, NULL, 0, &error TSRMLS_CC)) {
! 619: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: cannot remove directory \"%s\" in phar \"%s\", error retrieving phar information: %s", resource->path+1, resource->host, error);
! 620: efree(error);
! 621: php_url_free(resource);
! 622: return 0;
! 623: }
! 624:
! 625: path_len = strlen(resource->path+1);
! 626:
! 627: if (!(entry = phar_get_entry_info_dir(phar, resource->path + 1, path_len, 2, &error, 1 TSRMLS_CC))) {
! 628: if (error) {
! 629: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: cannot remove directory \"%s\" in phar \"%s\", %s", resource->path+1, resource->host, error);
! 630: efree(error);
! 631: } else {
! 632: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: cannot remove directory \"%s\" in phar \"%s\", directory does not exist", resource->path+1, resource->host);
! 633: }
! 634: php_url_free(resource);
! 635: return 0;
! 636: }
! 637:
! 638: if (!entry->is_deleted) {
! 639: for (zend_hash_internal_pointer_reset(&phar->manifest);
! 640: HASH_KEY_NON_EXISTANT != zend_hash_get_current_key_ex(&phar->manifest, &key, &key_len, &unused, 0, NULL);
! 641: zend_hash_move_forward(&phar->manifest)) {
! 642:
! 643: PHAR_STR(key, str_key);
! 644:
! 645: if (key_len > path_len &&
! 646: memcmp(str_key, resource->path+1, path_len) == 0 &&
! 647: IS_SLASH(str_key[path_len])) {
! 648: PHAR_STR_FREE(str_key);
! 649: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: Directory not empty");
! 650: if (entry->is_temp_dir) {
! 651: efree(entry->filename);
! 652: efree(entry);
! 653: }
! 654: php_url_free(resource);
! 655: return 0;
! 656: }
! 657: PHAR_STR_FREE(str_key);
! 658: }
! 659:
! 660: for (zend_hash_internal_pointer_reset(&phar->virtual_dirs);
! 661: HASH_KEY_NON_EXISTANT != zend_hash_get_current_key_ex(&phar->virtual_dirs, &key, &key_len, &unused, 0, NULL);
! 662: zend_hash_move_forward(&phar->virtual_dirs)) {
! 663:
! 664: PHAR_STR(key, str_key);
! 665:
! 666: if (key_len > path_len &&
! 667: memcmp(str_key, resource->path+1, path_len) == 0 &&
! 668: IS_SLASH(str_key[path_len])) {
! 669: PHAR_STR_FREE(str_key);
! 670: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: Directory not empty");
! 671: if (entry->is_temp_dir) {
! 672: efree(entry->filename);
! 673: efree(entry);
! 674: }
! 675: php_url_free(resource);
! 676: return 0;
! 677: }
! 678: PHAR_STR_FREE(str_key);
! 679: }
! 680: }
! 681:
! 682: if (entry->is_temp_dir) {
! 683: zend_hash_del(&phar->virtual_dirs, resource->path+1, path_len);
! 684: efree(entry->filename);
! 685: efree(entry);
! 686: } else {
! 687: entry->is_deleted = 1;
! 688: entry->is_modified = 1;
! 689: phar_flush(phar, 0, 0, 0, &error TSRMLS_CC);
! 690:
! 691: if (error) {
! 692: php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "phar error: cannot remove directory \"%s\" in phar \"%s\", %s", entry->filename, phar->fname, error);
! 693: php_url_free(resource);
! 694: efree(error);
! 695: return 0;
! 696: }
! 697: }
! 698:
! 699: php_url_free(resource);
! 700: return 1;
! 701: }
! 702: /* }}} */
! 703:
! 704: /*
! 705: * Local variables:
! 706: * tab-width: 4
! 707: * c-basic-offset: 4
! 708: * End:
! 709: * vim600: noet sw=4 ts=4 fdm=marker
! 710: * vim<600: noet sw=4 ts=4
! 711: */
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>