Return to dirstream.c CVS log | Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / php / ext / phar |
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: */