Annotation of embedaddon/php/ext/phar/zip.c, revision 1.1

1.1     ! misho       1: /*
        !             2:   +----------------------------------------------------------------------+
        !             3:   | ZIP archive support for Phar                                         |
        !             4:   +----------------------------------------------------------------------+
        !             5:   | Copyright (c) 2007-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:   +----------------------------------------------------------------------+
        !            17: */
        !            18: 
        !            19: #include "phar_internal.h"
        !            20: 
        !            21: #define PHAR_GET_16(var) ((php_uint16)((((php_uint16)var[0]) & 0xff) | \
        !            22:        (((php_uint16)var[1]) & 0xff) << 8))
        !            23: #define PHAR_GET_32(var) ((php_uint32)((((php_uint32)var[0]) & 0xff) | \
        !            24:        (((php_uint32)var[1]) & 0xff) << 8 | \
        !            25:        (((php_uint32)var[2]) & 0xff) << 16 | \
        !            26:        (((php_uint32)var[3]) & 0xff) << 24))
        !            27: static inline void phar_write_32(char buffer[4], php_uint32 value)
        !            28: {
        !            29:        buffer[3] = (unsigned char) ((value & 0xff000000) >> 24);
        !            30:        buffer[2] = (unsigned char) ((value & 0xff0000) >> 16);
        !            31:        buffer[1] = (unsigned char) ((value & 0xff00) >> 8);
        !            32:        buffer[0] = (unsigned char) (value & 0xff);
        !            33: }
        !            34: static inline void phar_write_16(char buffer[2], php_uint32 value)
        !            35: {
        !            36:        buffer[1] = (unsigned char) ((value & 0xff00) >> 8);
        !            37:        buffer[0] = (unsigned char) (value & 0xff);
        !            38: }
        !            39: # define PHAR_SET_32(var, value) phar_write_32(var, (php_uint32) (value));
        !            40: # define PHAR_SET_16(var, value) phar_write_16(var, (php_uint16) (value));
        !            41: 
        !            42: static int phar_zip_process_extra(php_stream *fp, phar_entry_info *entry, php_uint16 len TSRMLS_DC) /* {{{ */
        !            43: {
        !            44:        union {
        !            45:                phar_zip_extra_field_header header;
        !            46:                phar_zip_unix3 unix3;
        !            47:        } h;
        !            48:        int read;
        !            49: 
        !            50:        do {
        !            51:                if (sizeof(h.header) != php_stream_read(fp, (char *) &h.header, sizeof(h.header))) {
        !            52:                        return FAILURE;
        !            53:                }
        !            54: 
        !            55:                if (h.header.tag[0] != 'n' || h.header.tag[1] != 'u') {
        !            56:                        /* skip to next header */
        !            57:                        php_stream_seek(fp, PHAR_GET_16(h.header.size), SEEK_CUR);
        !            58:                        len -= PHAR_GET_16(h.header.size) + 4;
        !            59:                        continue;
        !            60:                }
        !            61: 
        !            62:                /* unix3 header found */
        !            63:                read = php_stream_read(fp, (char *) &(h.unix3.crc32), sizeof(h.unix3) - sizeof(h.header));
        !            64:                len -= read + 4;
        !            65: 
        !            66:                if (sizeof(h.unix3) - sizeof(h.header) != read) {
        !            67:                        return FAILURE;
        !            68:                }
        !            69: 
        !            70:                if (PHAR_GET_16(h.unix3.size) > sizeof(h.unix3) - 4) {
        !            71:                        /* skip symlink filename - we may add this support in later */
        !            72:                        php_stream_seek(fp, PHAR_GET_16(h.unix3.size) - sizeof(h.unix3.size), SEEK_CUR);
        !            73:                }
        !            74: 
        !            75:                /* set permissions */
        !            76:                entry->flags &= PHAR_ENT_COMPRESSION_MASK;
        !            77: 
        !            78:                if (entry->is_dir) {
        !            79:                        entry->flags |= PHAR_GET_16(h.unix3.perms) & PHAR_ENT_PERM_MASK;
        !            80:                } else {
        !            81:                        entry->flags |= PHAR_GET_16(h.unix3.perms) & PHAR_ENT_PERM_MASK;
        !            82:                }
        !            83: 
        !            84:        } while (len);
        !            85: 
        !            86:        return SUCCESS;
        !            87: }
        !            88: /* }}} */
        !            89: 
        !            90: /*
        !            91:   extracted from libzip
        !            92:   zip_dirent.c -- read directory entry (local or central), clean dirent
        !            93:   Copyright (C) 1999, 2003, 2004, 2005 Dieter Baron and Thomas Klausner
        !            94: 
        !            95:   This function is part of libzip, a library to manipulate ZIP archives.
        !            96:   The authors can be contacted at <nih@giga.or.at>
        !            97: 
        !            98:   Redistribution and use in source and binary forms, with or without
        !            99:   modification, are permitted provided that the following conditions
        !           100:   are met:
        !           101:   1. Redistributions of source code must retain the above copyright
        !           102:      notice, this list of conditions and the following disclaimer.
        !           103:   2. Redistributions in binary form must reproduce the above copyright
        !           104:      notice, this list of conditions and the following disclaimer in
        !           105:      the documentation and/or other materials provided with the
        !           106:      distribution.
        !           107:   3. The names of the authors may not be used to endorse or promote
        !           108:      products derived from this software without specific prior
        !           109:      written permission.
        !           110: 
        !           111:   THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS
        !           112:   OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
        !           113:   WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
        !           114:   ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY
        !           115:   DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
        !           116:   DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
        !           117:   GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
        !           118:   INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER
        !           119:   IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
        !           120:   OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN
        !           121:   IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
        !           122:  */
        !           123: static time_t phar_zip_d2u_time(char *cdtime, char *cddate) /* {{{ */
        !           124: {
        !           125:        int dtime = PHAR_GET_16(cdtime), ddate = PHAR_GET_16(cddate);
        !           126:        struct tm *tm, tmbuf;
        !           127:        time_t now;
        !           128: 
        !           129:        now = time(NULL);
        !           130:        tm = php_localtime_r(&now, &tmbuf);
        !           131: 
        !           132:        tm->tm_year = ((ddate>>9)&127) + 1980 - 1900;
        !           133:        tm->tm_mon = ((ddate>>5)&15) - 1;
        !           134:        tm->tm_mday = ddate&31;
        !           135: 
        !           136:        tm->tm_hour = (dtime>>11)&31;
        !           137:        tm->tm_min = (dtime>>5)&63;
        !           138:        tm->tm_sec = (dtime<<1)&62;
        !           139: 
        !           140:        return mktime(tm);
        !           141: }
        !           142: /* }}} */
        !           143: 
        !           144: static void phar_zip_u2d_time(time_t time, char *dtime, char *ddate) /* {{{ */
        !           145: {
        !           146:        php_uint16 ctime, cdate;
        !           147:        struct tm *tm, tmbuf;
        !           148: 
        !           149:        tm = php_localtime_r(&time, &tmbuf);
        !           150:        cdate = ((tm->tm_year+1900-1980)<<9) + ((tm->tm_mon+1)<<5) + tm->tm_mday;
        !           151:        ctime = ((tm->tm_hour)<<11) + ((tm->tm_min)<<5) + ((tm->tm_sec)>>1);
        !           152:        PHAR_SET_16(dtime, ctime);
        !           153:        PHAR_SET_16(ddate, cdate);
        !           154: }
        !           155: /* }}} */
        !           156: 
        !           157: /**
        !           158:  * Does not check for a previously opened phar in the cache.
        !           159:  *
        !           160:  * Parse a new one and add it to the cache, returning either SUCCESS or
        !           161:  * FAILURE, and setting pphar to the pointer to the manifest entry
        !           162:  * 
        !           163:  * This is used by phar_open_from_fp to process a zip-based phar, but can be called
        !           164:  * directly.
        !           165:  */
        !           166: int phar_parse_zipfile(php_stream *fp, char *fname, int fname_len, char *alias, int alias_len, phar_archive_data** pphar, char **error TSRMLS_DC) /* {{{ */
        !           167: {
        !           168:        phar_zip_dir_end locator;
        !           169:        char buf[sizeof(locator) + 65536];
        !           170:        long size;
        !           171:        php_uint16 i;
        !           172:        phar_archive_data *mydata = NULL;
        !           173:        phar_entry_info entry = {0};
        !           174:        char *p = buf, *ext, *actual_alias = NULL;
        !           175:        char *metadata = NULL;
        !           176: 
        !           177:        size = php_stream_tell(fp);
        !           178: 
        !           179:        if (size > sizeof(locator) + 65536) {
        !           180:                /* seek to max comment length + end of central directory record */
        !           181:                size = sizeof(locator) + 65536;
        !           182:                if (FAILURE == php_stream_seek(fp, -size, SEEK_END)) {
        !           183:                        php_stream_close(fp);
        !           184:                        if (error) {
        !           185:                                spprintf(error, 4096, "phar error: unable to search for end of central directory in zip-based phar \"%s\"", fname);
        !           186:                        }
        !           187:                        return FAILURE;
        !           188:                }
        !           189:        } else {
        !           190:                php_stream_seek(fp, 0, SEEK_SET);
        !           191:        }
        !           192: 
        !           193:        if (!php_stream_read(fp, buf, size)) {
        !           194:                php_stream_close(fp);
        !           195:                if (error) {
        !           196:                        spprintf(error, 4096, "phar error: unable to read in data to search for end of central directory in zip-based phar \"%s\"", fname);
        !           197:                }
        !           198:                return FAILURE;
        !           199:        }
        !           200: 
        !           201:        while ((p=(char *) memchr(p + 1, 'P', (size_t) (size - (p + 1 - buf)))) != NULL) {
        !           202:                if (!memcmp(p + 1, "K\5\6", 3)) {
        !           203:                        memcpy((void *)&locator, (void *) p, sizeof(locator));
        !           204:                        if (PHAR_GET_16(locator.centraldisk) != 0 || PHAR_GET_16(locator.disknumber) != 0) {
        !           205:                                /* split archives not handled */
        !           206:                                php_stream_close(fp);
        !           207:                                if (error) {
        !           208:                                        spprintf(error, 4096, "phar error: split archives spanning multiple zips cannot be processed in zip-based phar \"%s\"", fname);
        !           209:                                }
        !           210:                                return FAILURE;
        !           211:                        }
        !           212: 
        !           213:                        if (PHAR_GET_16(locator.counthere) != PHAR_GET_16(locator.count)) {
        !           214:                                if (error) {
        !           215:                                        spprintf(error, 4096, "phar error: corrupt zip archive, conflicting file count in end of central directory record in zip-based phar \"%s\"", fname);
        !           216:                                }
        !           217:                                php_stream_close(fp);
        !           218:                                return FAILURE;
        !           219:                        }
        !           220: 
        !           221:                        mydata = pecalloc(1, sizeof(phar_archive_data), PHAR_G(persist));
        !           222:                        mydata->is_persistent = PHAR_G(persist);
        !           223: 
        !           224:                        /* read in archive comment, if any */
        !           225:                        if (PHAR_GET_16(locator.comment_len)) {
        !           226: 
        !           227:                                metadata = p + sizeof(locator);
        !           228: 
        !           229:                                if (PHAR_GET_16(locator.comment_len) != size - (metadata - buf)) {
        !           230:                                        if (error) {
        !           231:                                                spprintf(error, 4096, "phar error: corrupt zip archive, zip file comment truncated in zip-based phar \"%s\"", fname);
        !           232:                                        }
        !           233:                                        php_stream_close(fp);
        !           234:                                        pefree(mydata, mydata->is_persistent);
        !           235:                                        return FAILURE;
        !           236:                                }
        !           237: 
        !           238:                                mydata->metadata_len = PHAR_GET_16(locator.comment_len);
        !           239: 
        !           240:                                if (phar_parse_metadata(&metadata, &mydata->metadata, PHAR_GET_16(locator.comment_len) TSRMLS_CC) == FAILURE) {
        !           241:                                        mydata->metadata_len = 0;
        !           242:                                        /* if not valid serialized data, it is a regular string */
        !           243: 
        !           244:                                        if (entry.is_persistent) {
        !           245:                                                ALLOC_PERMANENT_ZVAL(mydata->metadata);
        !           246:                                        } else {
        !           247:                                                ALLOC_ZVAL(mydata->metadata);
        !           248:                                        }
        !           249: 
        !           250:                                        INIT_ZVAL(*mydata->metadata);
        !           251:                                        metadata = pestrndup(metadata, PHAR_GET_16(locator.comment_len), mydata->is_persistent);
        !           252:                                        ZVAL_STRINGL(mydata->metadata, metadata, PHAR_GET_16(locator.comment_len), 0);
        !           253:                                }
        !           254:                        } else {
        !           255:                                mydata->metadata = NULL;
        !           256:                        }
        !           257: 
        !           258:                        goto foundit;
        !           259:                }
        !           260:        }
        !           261: 
        !           262:        php_stream_close(fp);
        !           263: 
        !           264:        if (error) {
        !           265:                spprintf(error, 4096, "phar error: end of central directory not found in zip-based phar \"%s\"", fname);
        !           266:        }
        !           267: 
        !           268:        return FAILURE;
        !           269: foundit:
        !           270:        mydata->fname = pestrndup(fname, fname_len, mydata->is_persistent);
        !           271: #ifdef PHP_WIN32
        !           272:        phar_unixify_path_separators(mydata->fname, fname_len);
        !           273: #endif
        !           274:        mydata->is_zip = 1;
        !           275:        mydata->fname_len = fname_len;
        !           276:        ext = strrchr(mydata->fname, '/');
        !           277: 
        !           278:        if (ext) {
        !           279:                mydata->ext = memchr(ext, '.', (mydata->fname + fname_len) - ext);
        !           280:                if (mydata->ext == ext) {
        !           281:                        mydata->ext = memchr(ext + 1, '.', (mydata->fname + fname_len) - ext - 1);
        !           282:                }
        !           283:                if (mydata->ext) {
        !           284:                        mydata->ext_len = (mydata->fname + fname_len) - mydata->ext;
        !           285:                }
        !           286:        }
        !           287: 
        !           288:        /* clean up on big-endian systems */
        !           289:        /* seek to central directory */
        !           290:        php_stream_seek(fp, PHAR_GET_32(locator.cdir_offset), SEEK_SET);
        !           291:        /* read in central directory */
        !           292:        zend_hash_init(&mydata->manifest, PHAR_GET_16(locator.count),
        !           293:                zend_get_hash_value, destroy_phar_manifest_entry, (zend_bool)mydata->is_persistent);
        !           294:        zend_hash_init(&mydata->mounted_dirs, 5,
        !           295:                zend_get_hash_value, NULL, (zend_bool)mydata->is_persistent);
        !           296:        zend_hash_init(&mydata->virtual_dirs, PHAR_GET_16(locator.count) * 2,
        !           297:                zend_get_hash_value, NULL, (zend_bool)mydata->is_persistent);
        !           298:        entry.phar = mydata;
        !           299:        entry.is_zip = 1;
        !           300:        entry.fp_type = PHAR_FP;
        !           301:        entry.is_persistent = mydata->is_persistent;
        !           302: #define PHAR_ZIP_FAIL_FREE(errmsg, save) \
        !           303:                        zend_hash_destroy(&mydata->manifest); \
        !           304:                        mydata->manifest.arBuckets = 0; \
        !           305:                        zend_hash_destroy(&mydata->mounted_dirs); \
        !           306:                        mydata->mounted_dirs.arBuckets = 0; \
        !           307:                        zend_hash_destroy(&mydata->virtual_dirs); \
        !           308:                        mydata->virtual_dirs.arBuckets = 0; \
        !           309:                        php_stream_close(fp); \
        !           310:                        if (mydata->metadata) { \
        !           311:                                zval_dtor(mydata->metadata); \
        !           312:                        } \
        !           313:                        if (mydata->signature) { \
        !           314:                                efree(mydata->signature); \
        !           315:                        } \
        !           316:                        if (error) { \
        !           317:                                spprintf(error, 4096, "phar error: %s in zip-based phar \"%s\"", errmsg, mydata->fname); \
        !           318:                        } \
        !           319:                        pefree(mydata->fname, mydata->is_persistent); \
        !           320:                        if (mydata->alias) { \
        !           321:                                pefree(mydata->alias, mydata->is_persistent); \
        !           322:                        } \
        !           323:                        pefree(mydata, mydata->is_persistent); \
        !           324:                        efree(save); \
        !           325:                        return FAILURE;
        !           326: #define PHAR_ZIP_FAIL(errmsg) \
        !           327:                        zend_hash_destroy(&mydata->manifest); \
        !           328:                        mydata->manifest.arBuckets = 0; \
        !           329:                        zend_hash_destroy(&mydata->mounted_dirs); \
        !           330:                        mydata->mounted_dirs.arBuckets = 0; \
        !           331:                        zend_hash_destroy(&mydata->virtual_dirs); \
        !           332:                        mydata->virtual_dirs.arBuckets = 0; \
        !           333:                        php_stream_close(fp); \
        !           334:                        if (mydata->metadata) { \
        !           335:                                zval_dtor(mydata->metadata); \
        !           336:                        } \
        !           337:                        if (mydata->signature) { \
        !           338:                                efree(mydata->signature); \
        !           339:                        } \
        !           340:                        if (error) { \
        !           341:                                spprintf(error, 4096, "phar error: %s in zip-based phar \"%s\"", errmsg, mydata->fname); \
        !           342:                        } \
        !           343:                        pefree(mydata->fname, mydata->is_persistent); \
        !           344:                        if (mydata->alias) { \
        !           345:                                pefree(mydata->alias, mydata->is_persistent); \
        !           346:                        } \
        !           347:                        pefree(mydata, mydata->is_persistent); \
        !           348:                        return FAILURE;
        !           349: 
        !           350:        /* add each central directory item to the manifest */
        !           351:        for (i = 0; i < PHAR_GET_16(locator.count); ++i) {
        !           352:                phar_zip_central_dir_file zipentry;
        !           353:                off_t beforeus = php_stream_tell(fp);
        !           354: 
        !           355:                if (sizeof(zipentry) != php_stream_read(fp, (char *) &zipentry, sizeof(zipentry))) {
        !           356:                        PHAR_ZIP_FAIL("unable to read central directory entry, truncated");
        !           357:                }
        !           358: 
        !           359:                /* clean up for bigendian systems */
        !           360:                if (memcmp("PK\1\2", zipentry.signature, 4)) {
        !           361:                        /* corrupted entry */
        !           362:                        PHAR_ZIP_FAIL("corrupted central directory entry, no magic signature");
        !           363:                }
        !           364: 
        !           365:                if (entry.is_persistent) {
        !           366:                        entry.manifest_pos = i;
        !           367:                }
        !           368: 
        !           369:                entry.compressed_filesize = PHAR_GET_32(zipentry.compsize);
        !           370:                entry.uncompressed_filesize = PHAR_GET_32(zipentry.uncompsize);
        !           371:                entry.crc32 = PHAR_GET_32(zipentry.crc32);
        !           372:                /* do not PHAR_GET_16 either on the next line */
        !           373:                entry.timestamp = phar_zip_d2u_time(zipentry.timestamp, zipentry.datestamp);
        !           374:                entry.flags = PHAR_ENT_PERM_DEF_FILE;
        !           375:                entry.header_offset = PHAR_GET_32(zipentry.offset);
        !           376:                entry.offset = entry.offset_abs = PHAR_GET_32(zipentry.offset) + sizeof(phar_zip_file_header) + PHAR_GET_16(zipentry.filename_len) +
        !           377:                        PHAR_GET_16(zipentry.extra_len);
        !           378: 
        !           379:                if (PHAR_GET_16(zipentry.flags) & PHAR_ZIP_FLAG_ENCRYPTED) {
        !           380:                        PHAR_ZIP_FAIL("Cannot process encrypted zip files");
        !           381:                }
        !           382: 
        !           383:                if (!PHAR_GET_16(zipentry.filename_len)) {
        !           384:                        PHAR_ZIP_FAIL("Cannot process zips created from stdin (zero-length filename)");
        !           385:                }
        !           386: 
        !           387:                entry.filename_len = PHAR_GET_16(zipentry.filename_len);
        !           388:                entry.filename = (char *) pemalloc(entry.filename_len + 1, entry.is_persistent);
        !           389: 
        !           390:                if (entry.filename_len != php_stream_read(fp, entry.filename, entry.filename_len)) {
        !           391:                        pefree(entry.filename, entry.is_persistent);
        !           392:                        PHAR_ZIP_FAIL("unable to read in filename from central directory, truncated");
        !           393:                }
        !           394: 
        !           395:                entry.filename[entry.filename_len] = '\0';
        !           396: 
        !           397:                if (entry.filename[entry.filename_len - 1] == '/') {
        !           398:                        entry.is_dir = 1;
        !           399:                        entry.filename_len--;
        !           400:                        entry.flags |= PHAR_ENT_PERM_DEF_DIR;
        !           401:                } else {
        !           402:                        entry.is_dir = 0;
        !           403:                }
        !           404: 
        !           405:                if (entry.filename_len == sizeof(".phar/signature.bin")-1 && !strncmp(entry.filename, ".phar/signature.bin", sizeof(".phar/signature.bin")-1)) {
        !           406:                        size_t read;
        !           407:                        php_stream *sigfile;
        !           408:                        off_t now;
        !           409:                        char *sig;
        !           410: 
        !           411:                        now = php_stream_tell(fp);
        !           412:                        pefree(entry.filename, entry.is_persistent);
        !           413:                        sigfile = php_stream_fopen_tmpfile();
        !           414:                        if (!sigfile) {
        !           415:                                PHAR_ZIP_FAIL("couldn't open temporary file");
        !           416:                        }
        !           417: 
        !           418:                        php_stream_seek(fp, 0, SEEK_SET);
        !           419:                        /* copy file contents + local headers and zip comment, if any, to be hashed for signature */
        !           420:                        phar_stream_copy_to_stream(fp, sigfile, entry.header_offset, NULL);
        !           421:                        /* seek to central directory */
        !           422:                        php_stream_seek(fp, PHAR_GET_32(locator.cdir_offset), SEEK_SET);
        !           423:                        /* copy central directory header */
        !           424:                        phar_stream_copy_to_stream(fp, sigfile, beforeus - PHAR_GET_32(locator.cdir_offset), NULL);
        !           425:                        if (metadata) {
        !           426:                                php_stream_write(sigfile, metadata, PHAR_GET_16(locator.comment_len));
        !           427:                        }
        !           428:                        php_stream_seek(fp, sizeof(phar_zip_file_header) + entry.header_offset + entry.filename_len + PHAR_GET_16(zipentry.extra_len), SEEK_SET);
        !           429:                        sig = (char *) emalloc(entry.uncompressed_filesize);
        !           430:                        read = php_stream_read(fp, sig, entry.uncompressed_filesize);
        !           431:                        if (read != entry.uncompressed_filesize) {
        !           432:                                php_stream_close(sigfile);
        !           433:                                efree(sig);
        !           434:                                PHAR_ZIP_FAIL("signature cannot be read");
        !           435:                        }
        !           436:                        mydata->sig_flags = PHAR_GET_32(sig);
        !           437:                        if (FAILURE == phar_verify_signature(sigfile, php_stream_tell(sigfile), mydata->sig_flags, sig + 8, entry.uncompressed_filesize - 8, fname, &mydata->signature, &mydata->sig_len, error TSRMLS_CC)) {
        !           438:                                efree(sig);
        !           439:                                if (error) {
        !           440:                                        char *save;
        !           441:                                        php_stream_close(sigfile);
        !           442:                                        spprintf(&save, 4096, "signature cannot be verified: %s", *error);
        !           443:                                        efree(*error);
        !           444:                                        PHAR_ZIP_FAIL_FREE(save, save);
        !           445:                                } else {
        !           446:                                        php_stream_close(sigfile);
        !           447:                                        PHAR_ZIP_FAIL("signature cannot be verified");
        !           448:                                }
        !           449:                        }
        !           450:                        php_stream_close(sigfile);
        !           451:                        efree(sig);
        !           452:                        /* signature checked out, let's ensure this is the last file in the phar */
        !           453:                        if (i != PHAR_GET_16(locator.count) - 1) {
        !           454:                                PHAR_ZIP_FAIL("entries exist after signature, invalid phar");
        !           455:                        }
        !           456: 
        !           457:                        continue;
        !           458:                }
        !           459: 
        !           460:                phar_add_virtual_dirs(mydata, entry.filename, entry.filename_len TSRMLS_CC);
        !           461: 
        !           462:                if (PHAR_GET_16(zipentry.extra_len)) {
        !           463:                        off_t loc = php_stream_tell(fp);
        !           464:                        if (FAILURE == phar_zip_process_extra(fp, &entry, PHAR_GET_16(zipentry.extra_len) TSRMLS_CC)) {
        !           465:                                pefree(entry.filename, entry.is_persistent);
        !           466:                                PHAR_ZIP_FAIL("Unable to process extra field header for file in central directory");
        !           467:                        }
        !           468:                        php_stream_seek(fp, loc + PHAR_GET_16(zipentry.extra_len), SEEK_SET);
        !           469:                }
        !           470: 
        !           471:                switch (PHAR_GET_16(zipentry.compressed)) {
        !           472:                        case PHAR_ZIP_COMP_NONE :
        !           473:                                /* compression flag already set */
        !           474:                                break;
        !           475:                        case PHAR_ZIP_COMP_DEFLATE :
        !           476:                                entry.flags |= PHAR_ENT_COMPRESSED_GZ;
        !           477:                                if (!PHAR_G(has_zlib)) {
        !           478:                                        pefree(entry.filename, entry.is_persistent);
        !           479:                                        PHAR_ZIP_FAIL("zlib extension is required");
        !           480:                                }
        !           481:                                break;
        !           482:                        case PHAR_ZIP_COMP_BZIP2 :
        !           483:                                entry.flags |= PHAR_ENT_COMPRESSED_BZ2;
        !           484:                                if (!PHAR_G(has_bz2)) {
        !           485:                                        pefree(entry.filename, entry.is_persistent);
        !           486:                                        PHAR_ZIP_FAIL("bzip2 extension is required");
        !           487:                                }
        !           488:                                break;
        !           489:                        case 1 :
        !           490:                                pefree(entry.filename, entry.is_persistent);
        !           491:                                PHAR_ZIP_FAIL("unsupported compression method (Shrunk) used in this zip");
        !           492:                        case 2 :
        !           493:                        case 3 :
        !           494:                        case 4 :
        !           495:                        case 5 :
        !           496:                                pefree(entry.filename, entry.is_persistent);
        !           497:                                PHAR_ZIP_FAIL("unsupported compression method (Reduce) used in this zip");
        !           498:                        case 6 :
        !           499:                                pefree(entry.filename, entry.is_persistent);
        !           500:                                PHAR_ZIP_FAIL("unsupported compression method (Implode) used in this zip");
        !           501:                        case 7 :
        !           502:                                pefree(entry.filename, entry.is_persistent);
        !           503:                                PHAR_ZIP_FAIL("unsupported compression method (Tokenize) used in this zip");
        !           504:                        case 9 :
        !           505:                                pefree(entry.filename, entry.is_persistent);
        !           506:                                PHAR_ZIP_FAIL("unsupported compression method (Deflate64) used in this zip");
        !           507:                        case 10 :
        !           508:                                pefree(entry.filename, entry.is_persistent);
        !           509:                                PHAR_ZIP_FAIL("unsupported compression method (PKWare Implode/old IBM TERSE) used in this zip");
        !           510:                        case 14 :
        !           511:                                pefree(entry.filename, entry.is_persistent);
        !           512:                                PHAR_ZIP_FAIL("unsupported compression method (LZMA) used in this zip");
        !           513:                        case 18 :
        !           514:                                pefree(entry.filename, entry.is_persistent);
        !           515:                                PHAR_ZIP_FAIL("unsupported compression method (IBM TERSE) used in this zip");
        !           516:                        case 19 :
        !           517:                                pefree(entry.filename, entry.is_persistent);
        !           518:                                PHAR_ZIP_FAIL("unsupported compression method (IBM LZ77) used in this zip");
        !           519:                        case 97 :
        !           520:                                pefree(entry.filename, entry.is_persistent);
        !           521:                                PHAR_ZIP_FAIL("unsupported compression method (WavPack) used in this zip");
        !           522:                        case 98 :
        !           523:                                pefree(entry.filename, entry.is_persistent);
        !           524:                                PHAR_ZIP_FAIL("unsupported compression method (PPMd) used in this zip");
        !           525:                        default :
        !           526:                                pefree(entry.filename, entry.is_persistent);
        !           527:                                PHAR_ZIP_FAIL("unsupported compression method (unknown) used in this zip");
        !           528:                }
        !           529: 
        !           530:                /* get file metadata */
        !           531:                if (PHAR_GET_16(zipentry.comment_len)) {
        !           532:                        if (PHAR_GET_16(zipentry.comment_len) != php_stream_read(fp, buf, PHAR_GET_16(zipentry.comment_len))) {
        !           533:                                pefree(entry.filename, entry.is_persistent);
        !           534:                                PHAR_ZIP_FAIL("unable to read in file comment, truncated");
        !           535:                        }
        !           536: 
        !           537:                        p = buf;
        !           538:                        entry.metadata_len = PHAR_GET_16(zipentry.comment_len);
        !           539: 
        !           540:                        if (phar_parse_metadata(&p, &(entry.metadata), PHAR_GET_16(zipentry.comment_len) TSRMLS_CC) == FAILURE) {
        !           541:                                entry.metadata_len = 0;
        !           542:                                /* if not valid serialized data, it is a regular string */
        !           543: 
        !           544:                                if (entry.is_persistent) {
        !           545:                                        ALLOC_PERMANENT_ZVAL(entry.metadata);
        !           546:                                } else {
        !           547:                                        ALLOC_ZVAL(entry.metadata);
        !           548:                                }
        !           549: 
        !           550:                                INIT_ZVAL(*entry.metadata);
        !           551:                                ZVAL_STRINGL(entry.metadata, pestrndup(buf, PHAR_GET_16(zipentry.comment_len), entry.is_persistent), PHAR_GET_16(zipentry.comment_len), 0);
        !           552:                        }
        !           553:                } else {
        !           554:                        entry.metadata = NULL;
        !           555:                }
        !           556: 
        !           557:                if (!actual_alias && entry.filename_len == sizeof(".phar/alias.txt")-1 && !strncmp(entry.filename, ".phar/alias.txt", sizeof(".phar/alias.txt")-1)) {
        !           558:                        php_stream_filter *filter;
        !           559:                        off_t saveloc;
        !           560:                        /* verify local file header */
        !           561:                        phar_zip_file_header local;
        !           562: 
        !           563:                        /* archive alias found */
        !           564:                        saveloc = php_stream_tell(fp);
        !           565:                        php_stream_seek(fp, PHAR_GET_32(zipentry.offset), SEEK_SET);
        !           566: 
        !           567:                        if (sizeof(local) != php_stream_read(fp, (char *) &local, sizeof(local))) {
        !           568:                                pefree(entry.filename, entry.is_persistent);
        !           569:                                PHAR_ZIP_FAIL("phar error: internal corruption of zip-based phar (cannot read local file header for alias)");
        !           570:                        }
        !           571: 
        !           572:                        /* verify local header */
        !           573:                        if (entry.filename_len != PHAR_GET_16(local.filename_len) || entry.crc32 != PHAR_GET_32(local.crc32) || entry.uncompressed_filesize != PHAR_GET_32(local.uncompsize) || entry.compressed_filesize != PHAR_GET_32(local.compsize)) {
        !           574:                                pefree(entry.filename, entry.is_persistent);
        !           575:                                PHAR_ZIP_FAIL("phar error: internal corruption of zip-based phar (local header of alias does not match central directory)");
        !           576:                        }
        !           577: 
        !           578:                        /* construct actual offset to file start - local extra_len can be different from central extra_len */
        !           579:                        entry.offset = entry.offset_abs =
        !           580:                                sizeof(local) + entry.header_offset + PHAR_GET_16(local.filename_len) + PHAR_GET_16(local.extra_len);
        !           581: #if PHP_VERSION_ID < 50207
        !           582:                        /* work around Bug #46147 */
        !           583:                        fp->writepos = fp->readpos = 0;
        !           584: #endif
        !           585:                        php_stream_seek(fp, entry.offset, SEEK_SET);
        !           586:                        /* these next lines should be for php < 5.2.6 after 5.3 filters are fixed */
        !           587:                        fp->writepos = 0;
        !           588:                        fp->readpos = 0;
        !           589:                        php_stream_seek(fp, entry.offset, SEEK_SET);
        !           590:                        fp->writepos = 0;
        !           591:                        fp->readpos = 0;
        !           592:                        /* the above lines should be for php < 5.2.6 after 5.3 filters are fixed */
        !           593: 
        !           594:                        mydata->alias_len = entry.uncompressed_filesize;
        !           595: 
        !           596:                        if (entry.flags & PHAR_ENT_COMPRESSED_GZ) {
        !           597:                                filter = php_stream_filter_create("zlib.inflate", NULL, php_stream_is_persistent(fp) TSRMLS_CC);
        !           598: 
        !           599:                                if (!filter) {
        !           600:                                        pefree(entry.filename, entry.is_persistent);
        !           601:                                        PHAR_ZIP_FAIL("unable to decompress alias, zlib filter creation failed");
        !           602:                                }
        !           603: 
        !           604:                                php_stream_filter_append(&fp->readfilters, filter);
        !           605: 
        !           606: #if PHP_MAJOR_VERSION >= 6
        !           607:                                if (!(entry.uncompressed_filesize = php_stream_copy_to_mem(fp, (void **) &actual_alias, entry.uncompressed_filesize, 0)) || !actual_alias) {
        !           608: #else
        !           609:                                if (!(entry.uncompressed_filesize = php_stream_copy_to_mem(fp, &actual_alias, entry.uncompressed_filesize, 0)) || !actual_alias) {
        !           610: #endif
        !           611:                                        pefree(entry.filename, entry.is_persistent);
        !           612: #if PHP_VERSION_ID < 50207
        !           613:                                        PHAR_ZIP_FAIL("unable to read in alias, truncated (PHP 5.2.7 and newer has a potential fix for this problem)");
        !           614: #endif
        !           615:                                        PHAR_ZIP_FAIL("unable to read in alias, truncated");
        !           616:                                }
        !           617: 
        !           618:                                php_stream_filter_flush(filter, 1);
        !           619:                                php_stream_filter_remove(filter, 1 TSRMLS_CC);
        !           620: 
        !           621:                        } else if (entry.flags & PHAR_ENT_COMPRESSED_BZ2) {
        !           622:                                filter = php_stream_filter_create("bzip2.decompress", NULL, php_stream_is_persistent(fp) TSRMLS_CC);
        !           623: 
        !           624:                                if (!filter) {
        !           625:                                        pefree(entry.filename, entry.is_persistent);
        !           626:                                        PHAR_ZIP_FAIL("unable to read in alias, bzip2 filter creation failed");
        !           627:                                }
        !           628: 
        !           629:                                php_stream_filter_append(&fp->readfilters, filter);
        !           630: 
        !           631: #if PHP_MAJOR_VERSION >= 6
        !           632:                                if (!(entry.uncompressed_filesize = php_stream_copy_to_mem(fp, (void **) &actual_alias, entry.uncompressed_filesize, 0)) || !actual_alias) {
        !           633: #else
        !           634:                                if (!(entry.uncompressed_filesize = php_stream_copy_to_mem(fp, &actual_alias, entry.uncompressed_filesize, 0)) || !actual_alias) {
        !           635: #endif
        !           636:                                        pefree(entry.filename, entry.is_persistent);
        !           637: #if PHP_VERSION_ID < 50207
        !           638:                                        PHAR_ZIP_FAIL("unable to read in alias, truncated (PHP 5.2.7 and newer has a potential fix for this problem)");
        !           639: #endif
        !           640:                                        PHAR_ZIP_FAIL("unable to read in alias, truncated");
        !           641:                                }
        !           642: 
        !           643:                                php_stream_filter_flush(filter, 1);
        !           644:                                php_stream_filter_remove(filter, 1 TSRMLS_CC);
        !           645:                        } else {
        !           646: #if PHP_MAJOR_VERSION >= 6
        !           647:                                if (!(entry.uncompressed_filesize = php_stream_copy_to_mem(fp, (void **) &actual_alias, entry.uncompressed_filesize, 0)) || !actual_alias) {
        !           648: #else
        !           649:                                if (!(entry.uncompressed_filesize = php_stream_copy_to_mem(fp, &actual_alias, entry.uncompressed_filesize, 0)) || !actual_alias) {
        !           650: #endif
        !           651:                                        pefree(entry.filename, entry.is_persistent);
        !           652:                                        PHAR_ZIP_FAIL("unable to read in alias, truncated");
        !           653:                                }
        !           654:                        }
        !           655: 
        !           656:                        /* return to central directory parsing */
        !           657:                        php_stream_seek(fp, saveloc, SEEK_SET);
        !           658:                }
        !           659: 
        !           660:                phar_set_inode(&entry TSRMLS_CC);
        !           661:                zend_hash_add(&mydata->manifest, entry.filename, entry.filename_len, (void *)&entry,sizeof(phar_entry_info), NULL);
        !           662:        }
        !           663: 
        !           664:        mydata->fp = fp;
        !           665: 
        !           666:        if (zend_hash_exists(&(mydata->manifest), ".phar/stub.php", sizeof(".phar/stub.php")-1)) {
        !           667:                mydata->is_data = 0;
        !           668:        } else {
        !           669:                mydata->is_data = 1;
        !           670:        }
        !           671: 
        !           672:        zend_hash_add(&(PHAR_GLOBALS->phar_fname_map), mydata->fname, fname_len, (void*)&mydata, sizeof(phar_archive_data*), NULL);
        !           673: 
        !           674:        if (actual_alias) {
        !           675:                phar_archive_data **fd_ptr;
        !           676: 
        !           677:                if (!phar_validate_alias(actual_alias, mydata->alias_len)) {
        !           678:                        if (error) {
        !           679:                                spprintf(error, 4096, "phar error: invalid alias \"%s\" in zip-based phar \"%s\"", actual_alias, fname);
        !           680:                        }
        !           681:                        efree(actual_alias);
        !           682:                        zend_hash_del(&(PHAR_GLOBALS->phar_fname_map), mydata->fname, fname_len);
        !           683:                        return FAILURE;
        !           684:                }
        !           685: 
        !           686:                mydata->is_temporary_alias = 0;
        !           687: 
        !           688:                if (SUCCESS == zend_hash_find(&(PHAR_GLOBALS->phar_alias_map), actual_alias, mydata->alias_len, (void **)&fd_ptr)) {
        !           689:                        if (SUCCESS != phar_free_alias(*fd_ptr, actual_alias, mydata->alias_len TSRMLS_CC)) {
        !           690:                                if (error) {
        !           691:                                        spprintf(error, 4096, "phar error: Unable to add zip-based phar \"%s\" with implicit alias, alias is already in use", fname);
        !           692:                                }
        !           693:                                efree(actual_alias);
        !           694:                                zend_hash_del(&(PHAR_GLOBALS->phar_fname_map), mydata->fname, fname_len);
        !           695:                                return FAILURE;
        !           696:                        }
        !           697:                }
        !           698: 
        !           699:                mydata->alias = entry.is_persistent ? pestrndup(actual_alias, mydata->alias_len, 1) : actual_alias;
        !           700: 
        !           701:                if (entry.is_persistent) {
        !           702:                        efree(actual_alias);
        !           703:                }
        !           704: 
        !           705:                zend_hash_add(&(PHAR_GLOBALS->phar_alias_map), actual_alias, mydata->alias_len, (void*)&mydata, sizeof(phar_archive_data*), NULL);
        !           706:        } else {
        !           707:                phar_archive_data **fd_ptr;
        !           708: 
        !           709:                if (alias_len) {
        !           710:                        if (SUCCESS == zend_hash_find(&(PHAR_GLOBALS->phar_alias_map), alias, alias_len, (void **)&fd_ptr)) {
        !           711:                                if (SUCCESS != phar_free_alias(*fd_ptr, alias, alias_len TSRMLS_CC)) {
        !           712:                                        if (error) {
        !           713:                                                spprintf(error, 4096, "phar error: Unable to add zip-based phar \"%s\" with explicit alias, alias is already in use", fname);
        !           714:                                        }
        !           715:                                        zend_hash_del(&(PHAR_GLOBALS->phar_fname_map), mydata->fname, fname_len);
        !           716:                                        return FAILURE;
        !           717:                                }
        !           718:                        }
        !           719: 
        !           720:                        zend_hash_add(&(PHAR_GLOBALS->phar_alias_map), actual_alias, mydata->alias_len, (void*)&mydata, sizeof(phar_archive_data*), NULL);
        !           721:                        mydata->alias = pestrndup(alias, alias_len, mydata->is_persistent);
        !           722:                        mydata->alias_len = alias_len;
        !           723:                } else {
        !           724:                        mydata->alias = pestrndup(mydata->fname, fname_len, mydata->is_persistent);
        !           725:                        mydata->alias_len = fname_len;
        !           726:                }
        !           727: 
        !           728:                mydata->is_temporary_alias = 1;
        !           729:        }
        !           730: 
        !           731:        if (pphar) {
        !           732:                *pphar = mydata;
        !           733:        }
        !           734: 
        !           735:        return SUCCESS;
        !           736: }
        !           737: /* }}} */
        !           738: 
        !           739: /**
        !           740:  * Create or open a zip-based phar for writing
        !           741:  */
        !           742: int phar_open_or_create_zip(char *fname, int fname_len, char *alias, int alias_len, int is_data, int options, phar_archive_data** pphar, char **error TSRMLS_DC) /* {{{ */
        !           743: {
        !           744:        phar_archive_data *phar;
        !           745:        int ret = phar_create_or_parse_filename(fname, fname_len, alias, alias_len, is_data, options, &phar, error TSRMLS_CC);
        !           746: 
        !           747:        if (FAILURE == ret) {
        !           748:                return FAILURE;
        !           749:        }
        !           750: 
        !           751:        if (pphar) {
        !           752:                *pphar = phar;
        !           753:        }
        !           754: 
        !           755:        phar->is_data = is_data;
        !           756: 
        !           757:        if (phar->is_zip) {
        !           758:                return ret;
        !           759:        }
        !           760: 
        !           761:        if (phar->is_brandnew) {
        !           762:                phar->internal_file_start = 0;
        !           763:                phar->is_zip = 1;
        !           764:                phar->is_tar = 0;
        !           765:                return SUCCESS;
        !           766:        }
        !           767: 
        !           768:        /* we've reached here - the phar exists and is a regular phar */
        !           769:        if (error) {
        !           770:                spprintf(error, 4096, "phar zip error: phar \"%s\" already exists as a regular phar and must be deleted from disk prior to creating as a zip-based phar", fname);
        !           771:        }
        !           772: 
        !           773:        return FAILURE;
        !           774: }
        !           775: /* }}} */
        !           776: 
        !           777: struct _phar_zip_pass {
        !           778:        php_stream *filefp;
        !           779:        php_stream *centralfp;
        !           780:        php_stream *old;
        !           781:        int free_fp;
        !           782:        int free_ufp;
        !           783:        char **error;
        !           784: };
        !           785: /* perform final modification of zip contents for each file in the manifest before saving */
        !           786: static int phar_zip_changed_apply(void *data, void *arg TSRMLS_DC) /* {{{ */
        !           787: {
        !           788:        phar_entry_info *entry;
        !           789:        phar_zip_file_header local;
        !           790:        phar_zip_unix3 perms;
        !           791:        phar_zip_central_dir_file central;
        !           792:        struct _phar_zip_pass *p;
        !           793:        php_uint32 newcrc32;
        !           794:        off_t offset;
        !           795:        int not_really_modified = 0;
        !           796:        entry = (phar_entry_info *)data;
        !           797:        p = (struct _phar_zip_pass*) arg;
        !           798: 
        !           799:        if (entry->is_mounted) {
        !           800:                return ZEND_HASH_APPLY_KEEP;
        !           801:        }
        !           802: 
        !           803:        if (entry->is_deleted) {
        !           804:                if (entry->fp_refcount <= 0) {
        !           805:                        return ZEND_HASH_APPLY_REMOVE;
        !           806:                } else {
        !           807:                        /* we can't delete this in-memory until it is closed */
        !           808:                        return ZEND_HASH_APPLY_KEEP;
        !           809:                }
        !           810:        }
        !           811: 
        !           812:        phar_add_virtual_dirs(entry->phar, entry->filename, entry->filename_len TSRMLS_CC);
        !           813:        memset(&local, 0, sizeof(local));
        !           814:        memset(&central, 0, sizeof(central));
        !           815:        memset(&perms, 0, sizeof(perms));
        !           816:        strncpy(local.signature, "PK\3\4", 4);
        !           817:        strncpy(central.signature, "PK\1\2", 4);
        !           818:        PHAR_SET_16(central.extra_len, sizeof(perms));
        !           819:        PHAR_SET_16(local.extra_len, sizeof(perms));
        !           820:        perms.tag[0] = 'n';
        !           821:        perms.tag[1] = 'u';
        !           822:        PHAR_SET_16(perms.size, sizeof(perms) - 4);
        !           823:        PHAR_SET_16(perms.perms, entry->flags & PHAR_ENT_PERM_MASK);
        !           824:        {
        !           825:                php_uint32 crc = (php_uint32) ~0;
        !           826:                CRC32(crc, perms.perms[0]);
        !           827:                CRC32(crc, perms.perms[1]);
        !           828:                PHAR_SET_32(perms.crc32, ~crc);
        !           829:        }
        !           830: 
        !           831:        if (entry->flags & PHAR_ENT_COMPRESSED_GZ) {
        !           832:                PHAR_SET_16(central.compressed, PHAR_ZIP_COMP_DEFLATE);
        !           833:                PHAR_SET_16(local.compressed, PHAR_ZIP_COMP_DEFLATE);
        !           834:        }
        !           835: 
        !           836:        if (entry->flags & PHAR_ENT_COMPRESSED_BZ2) {
        !           837:                PHAR_SET_16(central.compressed, PHAR_ZIP_COMP_BZIP2);
        !           838:                PHAR_SET_16(local.compressed, PHAR_ZIP_COMP_BZIP2);
        !           839:        }
        !           840: 
        !           841:        /* do not use PHAR_GET_16 on either field of the next line */
        !           842:        phar_zip_u2d_time(entry->timestamp, local.timestamp, local.datestamp);
        !           843:        memcpy(central.timestamp, local.timestamp, sizeof(local.timestamp));
        !           844:        memcpy(central.datestamp, local.datestamp, sizeof(local.datestamp));
        !           845:        PHAR_SET_16(central.filename_len, entry->filename_len + (entry->is_dir ? 1 : 0));
        !           846:        PHAR_SET_16(local.filename_len, entry->filename_len + (entry->is_dir ? 1 : 0));
        !           847:        PHAR_SET_32(central.offset, php_stream_tell(p->filefp));
        !           848: 
        !           849:        /* do extra field for perms later */
        !           850:        if (entry->is_modified) {
        !           851:                php_uint32 loc;
        !           852:                php_stream_filter *filter;
        !           853:                php_stream *efp;
        !           854: 
        !           855:                if (entry->is_dir) {
        !           856:                        entry->is_modified = 0;
        !           857:                        if (entry->fp_type == PHAR_MOD && entry->fp != entry->phar->fp && entry->fp != entry->phar->ufp) {
        !           858:                                php_stream_close(entry->fp);
        !           859:                                entry->fp = NULL;
        !           860:                                entry->fp_type = PHAR_FP;
        !           861:                        }
        !           862:                        goto continue_dir;
        !           863:                }
        !           864: 
        !           865:                if (FAILURE == phar_open_entry_fp(entry, p->error, 0 TSRMLS_CC)) {
        !           866:                        spprintf(p->error, 0, "unable to open file contents of file \"%s\" in zip-based phar \"%s\"", entry->filename, entry->phar->fname);
        !           867:                        return ZEND_HASH_APPLY_STOP;
        !           868:                }
        !           869: 
        !           870:                /* we can be modified and already be compressed, such as when chmod() is executed */
        !           871:                if (entry->flags & PHAR_ENT_COMPRESSION_MASK && (entry->old_flags == entry->flags || !entry->old_flags)) {
        !           872:                        not_really_modified = 1;
        !           873:                        goto is_compressed;
        !           874:                }
        !           875: 
        !           876:                if (-1 == phar_seek_efp(entry, 0, SEEK_SET, 0, 0 TSRMLS_CC)) {
        !           877:                        spprintf(p->error, 0, "unable to seek to start of file \"%s\" to zip-based phar \"%s\"", entry->filename, entry->phar->fname);
        !           878:                        return ZEND_HASH_APPLY_STOP;
        !           879:                }
        !           880: 
        !           881:                efp = phar_get_efp(entry, 0 TSRMLS_CC);
        !           882:                newcrc32 = ~0;
        !           883: 
        !           884:                for (loc = 0;loc < entry->uncompressed_filesize; ++loc) {
        !           885:                        CRC32(newcrc32, php_stream_getc(efp));
        !           886:                }
        !           887: 
        !           888:                entry->crc32 = ~newcrc32;
        !           889:                PHAR_SET_32(central.uncompsize, entry->uncompressed_filesize);
        !           890:                PHAR_SET_32(local.uncompsize, entry->uncompressed_filesize);
        !           891: 
        !           892:                if (!(entry->flags & PHAR_ENT_COMPRESSION_MASK)) {
        !           893:                        /* not compressed */
        !           894:                        entry->compressed_filesize = entry->uncompressed_filesize;
        !           895:                        PHAR_SET_32(central.compsize, entry->uncompressed_filesize);
        !           896:                        PHAR_SET_32(local.compsize, entry->uncompressed_filesize);
        !           897:                        goto not_compressed;
        !           898:                }
        !           899: 
        !           900:                filter = php_stream_filter_create(phar_compress_filter(entry, 0), NULL, 0 TSRMLS_CC);
        !           901: 
        !           902:                if (!filter) {
        !           903:                        if (entry->flags & PHAR_ENT_COMPRESSED_GZ) {
        !           904:                                spprintf(p->error, 0, "unable to gzip compress file \"%s\" to zip-based phar \"%s\"", entry->filename, entry->phar->fname);
        !           905:                        } else {
        !           906:                                spprintf(p->error, 0, "unable to bzip2 compress file \"%s\" to zip-based phar \"%s\"", entry->filename, entry->phar->fname);
        !           907:                        }
        !           908:                        return ZEND_HASH_APPLY_STOP;
        !           909:                }
        !           910: 
        !           911:                /* create new file that holds the compressed version */
        !           912:                /* work around inability to specify freedom in write and strictness
        !           913:                in read count */
        !           914:                entry->cfp = php_stream_fopen_tmpfile();
        !           915: 
        !           916:                if (!entry->cfp) {
        !           917:                        spprintf(p->error, 0, "unable to create temporary file for file \"%s\" while creating zip-based phar \"%s\"", entry->filename, entry->phar->fname);
        !           918:                        return ZEND_HASH_APPLY_STOP;
        !           919:                }
        !           920: 
        !           921:                php_stream_flush(efp);
        !           922: 
        !           923:                if (-1 == phar_seek_efp(entry, 0, SEEK_SET, 0, 0 TSRMLS_CC)) {
        !           924:                        spprintf(p->error, 0, "unable to seek to start of file \"%s\" to zip-based phar \"%s\"", entry->filename, entry->phar->fname);
        !           925:                        return ZEND_HASH_APPLY_STOP;
        !           926:                }
        !           927: 
        !           928:                php_stream_filter_append((&entry->cfp->writefilters), filter);
        !           929: 
        !           930:                if (SUCCESS != phar_stream_copy_to_stream(efp, entry->cfp, entry->uncompressed_filesize, NULL)) {
        !           931:                        spprintf(p->error, 0, "unable to copy compressed file contents of file \"%s\" while creating new phar \"%s\"", entry->filename, entry->phar->fname);
        !           932:                        return ZEND_HASH_APPLY_STOP;
        !           933:                }
        !           934: 
        !           935:                php_stream_filter_flush(filter, 1);
        !           936:                php_stream_flush(entry->cfp);
        !           937:                php_stream_filter_remove(filter, 1 TSRMLS_CC);
        !           938:                php_stream_seek(entry->cfp, 0, SEEK_END);
        !           939:                entry->compressed_filesize = (php_uint32) php_stream_tell(entry->cfp);
        !           940:                PHAR_SET_32(central.compsize, entry->compressed_filesize);
        !           941:                PHAR_SET_32(local.compsize, entry->compressed_filesize);
        !           942:                /* generate crc on compressed file */
        !           943:                php_stream_rewind(entry->cfp);
        !           944:                entry->old_flags = entry->flags;
        !           945:                entry->is_modified = 1;
        !           946:        } else {
        !           947: is_compressed:
        !           948:                PHAR_SET_32(central.uncompsize, entry->uncompressed_filesize);
        !           949:                PHAR_SET_32(local.uncompsize, entry->uncompressed_filesize);
        !           950:                PHAR_SET_32(central.compsize, entry->compressed_filesize);
        !           951:                PHAR_SET_32(local.compsize, entry->compressed_filesize);
        !           952: 
        !           953:                if (-1 == php_stream_seek(p->old, entry->offset_abs, SEEK_SET)) {
        !           954:                        spprintf(p->error, 0, "unable to seek to start of file \"%s\" while creating zip-based phar \"%s\"", entry->filename, entry->phar->fname);
        !           955:                        return ZEND_HASH_APPLY_STOP;
        !           956:                }
        !           957:        }
        !           958: not_compressed:
        !           959:        PHAR_SET_32(central.crc32, entry->crc32);
        !           960:        PHAR_SET_32(local.crc32, entry->crc32);
        !           961: continue_dir:
        !           962:        /* set file metadata */
        !           963:        if (entry->metadata) {
        !           964:                php_serialize_data_t metadata_hash;
        !           965: 
        !           966:                if (entry->metadata_str.c) {
        !           967:                        smart_str_free(&entry->metadata_str);
        !           968:                }
        !           969:                entry->metadata_str.c = 0;
        !           970:                entry->metadata_str.len = 0;
        !           971:                PHP_VAR_SERIALIZE_INIT(metadata_hash);
        !           972:                php_var_serialize(&entry->metadata_str, &entry->metadata, &metadata_hash TSRMLS_CC);
        !           973:                PHP_VAR_SERIALIZE_DESTROY(metadata_hash);
        !           974:                PHAR_SET_16(central.comment_len, entry->metadata_str.len);
        !           975:        }
        !           976: 
        !           977:        entry->header_offset = php_stream_tell(p->filefp);
        !           978:        offset = entry->header_offset + sizeof(local) + entry->filename_len + (entry->is_dir ? 1 : 0) + sizeof(perms);
        !           979: 
        !           980:        if (sizeof(local) != php_stream_write(p->filefp, (char *)&local, sizeof(local))) {
        !           981:                spprintf(p->error, 0, "unable to write local file header of file \"%s\" to zip-based phar \"%s\"", entry->filename, entry->phar->fname);
        !           982:                return ZEND_HASH_APPLY_STOP;
        !           983:        }
        !           984: 
        !           985:        if (sizeof(central) != php_stream_write(p->centralfp, (char *)&central, sizeof(central))) {
        !           986:                spprintf(p->error, 0, "unable to write central directory entry for file \"%s\" while creating zip-based phar \"%s\"", entry->filename, entry->phar->fname);
        !           987:                return ZEND_HASH_APPLY_STOP;
        !           988:        }
        !           989: 
        !           990:        if (entry->is_dir) {
        !           991:                if (entry->filename_len != php_stream_write(p->filefp, entry->filename, entry->filename_len)) {
        !           992:                        spprintf(p->error, 0, "unable to write filename to local directory entry for directory \"%s\" while creating zip-based phar \"%s\"", entry->filename, entry->phar->fname);
        !           993:                        return ZEND_HASH_APPLY_STOP;
        !           994:                }
        !           995: 
        !           996:                if (1 != php_stream_write(p->filefp, "/", 1)) {
        !           997:                        spprintf(p->error, 0, "unable to write filename to local directory entry for directory \"%s\" while creating zip-based phar \"%s\"", entry->filename, entry->phar->fname);
        !           998:                        return ZEND_HASH_APPLY_STOP;
        !           999:                }
        !          1000: 
        !          1001:                if (entry->filename_len != php_stream_write(p->centralfp, entry->filename, entry->filename_len)) {
        !          1002:                        spprintf(p->error, 0, "unable to write filename to central directory entry for directory \"%s\" while creating zip-based phar \"%s\"", entry->filename, entry->phar->fname);
        !          1003:                        return ZEND_HASH_APPLY_STOP;
        !          1004:                }
        !          1005: 
        !          1006:                if (1 != php_stream_write(p->centralfp, "/", 1)) {
        !          1007:                        spprintf(p->error, 0, "unable to write filename to central directory entry for directory \"%s\" while creating zip-based phar \"%s\"", entry->filename, entry->phar->fname);
        !          1008:                        return ZEND_HASH_APPLY_STOP;
        !          1009:                }
        !          1010:        } else {
        !          1011:                if (entry->filename_len != php_stream_write(p->filefp, entry->filename, entry->filename_len)) {
        !          1012:                        spprintf(p->error, 0, "unable to write filename to local directory entry for file \"%s\" while creating zip-based phar \"%s\"", entry->filename, entry->phar->fname);
        !          1013:                        return ZEND_HASH_APPLY_STOP;
        !          1014:                }
        !          1015: 
        !          1016:                if (entry->filename_len != php_stream_write(p->centralfp, entry->filename, entry->filename_len)) {
        !          1017:                        spprintf(p->error, 0, "unable to write filename to central directory entry for file \"%s\" while creating zip-based phar \"%s\"", entry->filename, entry->phar->fname);
        !          1018:                        return ZEND_HASH_APPLY_STOP;
        !          1019:                }
        !          1020:        }
        !          1021: 
        !          1022:        if (sizeof(perms) != php_stream_write(p->filefp, (char *)&perms, sizeof(perms))) {
        !          1023:                spprintf(p->error, 0, "unable to write local extra permissions file header of file \"%s\" to zip-based phar \"%s\"", entry->filename, entry->phar->fname);
        !          1024:                return ZEND_HASH_APPLY_STOP;
        !          1025:        }
        !          1026: 
        !          1027:        if (sizeof(perms) != php_stream_write(p->centralfp, (char *)&perms, sizeof(perms))) {
        !          1028:                spprintf(p->error, 0, "unable to write central extra permissions file header of file \"%s\" to zip-based phar \"%s\"", entry->filename, entry->phar->fname);
        !          1029:                return ZEND_HASH_APPLY_STOP;
        !          1030:        }
        !          1031: 
        !          1032:        if (!not_really_modified && entry->is_modified) {
        !          1033:                if (entry->cfp) {
        !          1034:                        if (SUCCESS != phar_stream_copy_to_stream(entry->cfp, p->filefp, entry->compressed_filesize, NULL)) {
        !          1035:                                spprintf(p->error, 0, "unable to write compressed contents of file \"%s\" in zip-based phar \"%s\"", entry->filename, entry->phar->fname);
        !          1036:                                return ZEND_HASH_APPLY_STOP;
        !          1037:                        }
        !          1038: 
        !          1039:                        php_stream_close(entry->cfp);
        !          1040:                        entry->cfp = NULL;
        !          1041:                } else {
        !          1042:                        if (FAILURE == phar_open_entry_fp(entry, p->error, 0 TSRMLS_CC)) {
        !          1043:                                return ZEND_HASH_APPLY_STOP;
        !          1044:                        }
        !          1045: 
        !          1046:                        phar_seek_efp(entry, 0, SEEK_SET, 0, 0 TSRMLS_CC);
        !          1047: 
        !          1048:                        if (SUCCESS != phar_stream_copy_to_stream(phar_get_efp(entry, 0 TSRMLS_CC), p->filefp, entry->uncompressed_filesize, NULL)) {
        !          1049:                                spprintf(p->error, 0, "unable to write contents of file \"%s\" in zip-based phar \"%s\"", entry->filename, entry->phar->fname);
        !          1050:                                return ZEND_HASH_APPLY_STOP;
        !          1051:                        }
        !          1052:                }
        !          1053: 
        !          1054:                if (entry->fp_type == PHAR_MOD && entry->fp != entry->phar->fp && entry->fp != entry->phar->ufp && entry->fp_refcount == 0) {
        !          1055:                        php_stream_close(entry->fp);
        !          1056:                }
        !          1057: 
        !          1058:                entry->is_modified = 0;
        !          1059:        } else {
        !          1060:                entry->is_modified = 0;
        !          1061:                if (entry->fp_refcount) {
        !          1062:                        /* open file pointers refer to this fp, do not free the stream */
        !          1063:                        switch (entry->fp_type) {
        !          1064:                                case PHAR_FP:
        !          1065:                                        p->free_fp = 0;
        !          1066:                                        break;
        !          1067:                                case PHAR_UFP:
        !          1068:                                        p->free_ufp = 0;
        !          1069:                                default:
        !          1070:                                        break;
        !          1071:                        }
        !          1072:                }
        !          1073: 
        !          1074:                if (!entry->is_dir && entry->compressed_filesize && SUCCESS != phar_stream_copy_to_stream(p->old, p->filefp, entry->compressed_filesize, NULL)) {
        !          1075:                        spprintf(p->error, 0, "unable to copy contents of file \"%s\" while creating zip-based phar \"%s\"", entry->filename, entry->phar->fname);
        !          1076:                        return ZEND_HASH_APPLY_STOP;
        !          1077:                }
        !          1078:        }
        !          1079: 
        !          1080:        entry->fp = NULL;
        !          1081:        entry->offset = entry->offset_abs = offset;
        !          1082:        entry->fp_type = PHAR_FP;
        !          1083: 
        !          1084:        if (entry->metadata_str.c) {
        !          1085:                if (entry->metadata_str.len != php_stream_write(p->centralfp, entry->metadata_str.c, entry->metadata_str.len)) {
        !          1086:                        spprintf(p->error, 0, "unable to write metadata as file comment for file \"%s\" while creating zip-based phar \"%s\"", entry->filename, entry->phar->fname);
        !          1087:                        smart_str_free(&entry->metadata_str);
        !          1088:                        return ZEND_HASH_APPLY_STOP;
        !          1089:                }
        !          1090: 
        !          1091:                smart_str_free(&entry->metadata_str);
        !          1092:        }
        !          1093: 
        !          1094:        return ZEND_HASH_APPLY_KEEP;
        !          1095: }
        !          1096: /* }}} */
        !          1097: 
        !          1098: static int phar_zip_applysignature(phar_archive_data *phar, struct _phar_zip_pass *pass,
        !          1099:                                   smart_str *metadata TSRMLS_DC) /* {{{ */
        !          1100: {
        !          1101:        /* add signature for executable tars or tars explicitly set with setSignatureAlgorithm */
        !          1102:        if (!phar->is_data || phar->sig_flags) {
        !          1103:                int signature_length;
        !          1104:                char *signature, sigbuf[8];
        !          1105:                phar_entry_info entry = {0};
        !          1106:                php_stream *newfile;
        !          1107:                off_t tell, st;
        !          1108: 
        !          1109:                newfile = php_stream_fopen_tmpfile();
        !          1110:                st = tell = php_stream_tell(pass->filefp);
        !          1111:                /* copy the local files, central directory, and the zip comment to generate the hash */
        !          1112:                php_stream_seek(pass->filefp, 0, SEEK_SET);
        !          1113:                phar_stream_copy_to_stream(pass->filefp, newfile, tell, NULL);
        !          1114:                tell = php_stream_tell(pass->centralfp);
        !          1115:                php_stream_seek(pass->centralfp, 0, SEEK_SET);
        !          1116:                phar_stream_copy_to_stream(pass->centralfp, newfile, tell, NULL);
        !          1117:                if (metadata->c) {
        !          1118:                        php_stream_write(newfile, metadata->c, metadata->len);
        !          1119:                }
        !          1120: 
        !          1121:                if (FAILURE == phar_create_signature(phar, newfile, &signature, &signature_length, pass->error TSRMLS_CC)) {
        !          1122:                        if (pass->error) {
        !          1123:                                char *save = *(pass->error);
        !          1124:                                spprintf(pass->error, 0, "phar error: unable to write signature to zip-based phar: %s", save);
        !          1125:                                efree(save);
        !          1126:                        }
        !          1127: 
        !          1128:                        php_stream_close(newfile);
        !          1129:                        return FAILURE;
        !          1130:                }
        !          1131: 
        !          1132:                entry.filename = ".phar/signature.bin";
        !          1133:                entry.filename_len = sizeof(".phar/signature.bin")-1;
        !          1134:                entry.fp = php_stream_fopen_tmpfile();
        !          1135:                entry.fp_type = PHAR_MOD;
        !          1136:                entry.is_modified = 1;
        !          1137: 
        !          1138:                PHAR_SET_32(sigbuf, phar->sig_flags);
        !          1139:                PHAR_SET_32(sigbuf + 4, signature_length);
        !          1140: 
        !          1141:                if (8 != (int)php_stream_write(entry.fp, sigbuf, 8) || signature_length != (int)php_stream_write(entry.fp, signature, signature_length)) {
        !          1142:                        efree(signature);
        !          1143:                        if (pass->error) {
        !          1144:                                spprintf(pass->error, 0, "phar error: unable to write signature to zip-based phar %s", phar->fname);
        !          1145:                        }
        !          1146: 
        !          1147:                        php_stream_close(newfile);
        !          1148:                        return FAILURE;
        !          1149:                }
        !          1150: 
        !          1151:                efree(signature);
        !          1152:                entry.uncompressed_filesize = entry.compressed_filesize = signature_length + 8;
        !          1153:                entry.phar = phar;
        !          1154:                /* throw out return value and write the signature */
        !          1155:                phar_zip_changed_apply((void *)&entry, (void *)pass TSRMLS_CC);
        !          1156:                php_stream_close(newfile);
        !          1157: 
        !          1158:                if (pass->error && *(pass->error)) {
        !          1159:                        /* error is set by writeheaders */
        !          1160:                        php_stream_close(newfile);
        !          1161:                        return FAILURE;
        !          1162:                }
        !          1163:        } /* signature */
        !          1164:        return SUCCESS;
        !          1165: }
        !          1166: /* }}} */
        !          1167: 
        !          1168: int phar_zip_flush(phar_archive_data *phar, char *user_stub, long len, int defaultstub, char **error TSRMLS_DC) /* {{{ */
        !          1169: {
        !          1170:        char *pos;
        !          1171:        smart_str main_metadata_str = {0};
        !          1172:        static const char newstub[] = "<?php // zip-based phar archive stub file\n__HALT_COMPILER();";
        !          1173:        char halt_stub[] = "__HALT_COMPILER();";
        !          1174:        char *tmp;
        !          1175:        
        !          1176:        php_stream *stubfile, *oldfile;
        !          1177:        php_serialize_data_t metadata_hash;
        !          1178:        int free_user_stub, closeoldfile = 0;
        !          1179:        phar_entry_info entry = {0};
        !          1180:        char *temperr = NULL;
        !          1181:        struct _phar_zip_pass pass;
        !          1182:        phar_zip_dir_end eocd;
        !          1183:        php_uint32 cdir_size, cdir_offset;
        !          1184: 
        !          1185:        pass.error = &temperr;
        !          1186:        entry.flags = PHAR_ENT_PERM_DEF_FILE;
        !          1187:        entry.timestamp = time(NULL);
        !          1188:        entry.is_modified = 1;
        !          1189:        entry.is_zip = 1;
        !          1190:        entry.phar = phar;
        !          1191:        entry.fp_type = PHAR_MOD;
        !          1192: 
        !          1193:        if (phar->is_persistent) {
        !          1194:                if (error) {
        !          1195:                        spprintf(error, 0, "internal error: attempt to flush cached zip-based phar \"%s\"", phar->fname);
        !          1196:                }
        !          1197:                return EOF;
        !          1198:        }
        !          1199: 
        !          1200:        if (phar->is_data) {
        !          1201:                goto nostub;
        !          1202:        }
        !          1203: 
        !          1204:        /* set alias */
        !          1205:        if (!phar->is_temporary_alias && phar->alias_len) {
        !          1206:                entry.fp = php_stream_fopen_tmpfile();
        !          1207: 
        !          1208:                if (phar->alias_len != (int)php_stream_write(entry.fp, phar->alias, phar->alias_len)) {
        !          1209:                        if (error) {
        !          1210:                                spprintf(error, 0, "unable to set alias in zip-based phar \"%s\"", phar->fname);
        !          1211:                        }
        !          1212:                        return EOF;
        !          1213:                }
        !          1214: 
        !          1215:                entry.uncompressed_filesize = entry.compressed_filesize = phar->alias_len;
        !          1216:                entry.filename = estrndup(".phar/alias.txt", sizeof(".phar/alias.txt")-1);
        !          1217:                entry.filename_len = sizeof(".phar/alias.txt")-1;
        !          1218: 
        !          1219:                if (SUCCESS != zend_hash_update(&phar->manifest, entry.filename, entry.filename_len, (void*)&entry, sizeof(phar_entry_info), NULL)) {
        !          1220:                        if (error) {
        !          1221:                                spprintf(error, 0, "unable to set alias in zip-based phar \"%s\"", phar->fname);
        !          1222:                        }
        !          1223:                        return EOF;
        !          1224:                }
        !          1225:        } else {
        !          1226:                zend_hash_del(&phar->manifest, ".phar/alias.txt", sizeof(".phar/alias.txt")-1);
        !          1227:        }
        !          1228: 
        !          1229:        /* register alias */
        !          1230:        if (phar->alias_len) {
        !          1231:                if (FAILURE == phar_get_archive(&phar, phar->fname, phar->fname_len, phar->alias, phar->alias_len, error TSRMLS_CC)) {
        !          1232:                        return EOF;
        !          1233:                }
        !          1234:        }
        !          1235: 
        !          1236:        /* set stub */
        !          1237:        if (user_stub && !defaultstub) {
        !          1238:                if (len < 0) {
        !          1239:                        /* resource passed in */
        !          1240:                        if (!(php_stream_from_zval_no_verify(stubfile, (zval **)user_stub))) {
        !          1241:                                if (error) {
        !          1242:                                        spprintf(error, 0, "unable to access resource to copy stub to new zip-based phar \"%s\"", phar->fname);
        !          1243:                                }
        !          1244:                                return EOF;
        !          1245:                        }
        !          1246: 
        !          1247:                        if (len == -1) {
        !          1248:                                len = PHP_STREAM_COPY_ALL;
        !          1249:                        } else {
        !          1250:                                len = -len;
        !          1251:                        }
        !          1252: 
        !          1253:                        user_stub = 0;
        !          1254: 
        !          1255: #if PHP_MAJOR_VERSION >= 6
        !          1256:                        if (!(len = php_stream_copy_to_mem(stubfile, (void **) &user_stub, len, 0)) || !user_stub) {
        !          1257: #else
        !          1258:                        if (!(len = php_stream_copy_to_mem(stubfile, &user_stub, len, 0)) || !user_stub) {
        !          1259: #endif
        !          1260:                                if (error) {
        !          1261:                                        spprintf(error, 0, "unable to read resource to copy stub to new zip-based phar \"%s\"", phar->fname);
        !          1262:                                }
        !          1263:                                return EOF;
        !          1264:                        }
        !          1265:                        free_user_stub = 1;
        !          1266:                } else {
        !          1267:                        free_user_stub = 0;
        !          1268:                }
        !          1269: 
        !          1270:                tmp = estrndup(user_stub, len);
        !          1271:                if ((pos = php_stristr(tmp, halt_stub, len, sizeof(halt_stub) - 1)) == NULL) {
        !          1272:                        efree(tmp);
        !          1273:                        if (error) {
        !          1274:                                spprintf(error, 0, "illegal stub for zip-based phar \"%s\"", phar->fname);
        !          1275:                        }
        !          1276:                        if (free_user_stub) {
        !          1277:                                efree(user_stub);
        !          1278:                        }
        !          1279:                        return EOF;
        !          1280:                }
        !          1281:                pos = user_stub + (pos - tmp);
        !          1282:                efree(tmp);
        !          1283: 
        !          1284:                len = pos - user_stub + 18;
        !          1285:                entry.fp = php_stream_fopen_tmpfile();
        !          1286:                entry.uncompressed_filesize = len + 5;
        !          1287: 
        !          1288:                if ((size_t)len != php_stream_write(entry.fp, user_stub, len)
        !          1289:                ||            5 != php_stream_write(entry.fp, " ?>\r\n", 5)) {
        !          1290:                        if (error) {
        !          1291:                                spprintf(error, 0, "unable to create stub from string in new zip-based phar \"%s\"", phar->fname);
        !          1292:                        }
        !          1293:                        if (free_user_stub) {
        !          1294:                                efree(user_stub);
        !          1295:                        }
        !          1296:                        php_stream_close(entry.fp);
        !          1297:                        return EOF;
        !          1298:                }
        !          1299: 
        !          1300:                entry.filename = estrndup(".phar/stub.php", sizeof(".phar/stub.php")-1);
        !          1301:                entry.filename_len = sizeof(".phar/stub.php")-1;
        !          1302: 
        !          1303:                if (SUCCESS != zend_hash_update(&phar->manifest, entry.filename, entry.filename_len, (void*)&entry, sizeof(phar_entry_info), NULL)) {
        !          1304:                        if (free_user_stub) {
        !          1305:                                efree(user_stub);
        !          1306:                        }
        !          1307:                        if (error) {
        !          1308:                                spprintf(error, 0, "unable to set stub in zip-based phar \"%s\"", phar->fname);
        !          1309:                        }
        !          1310:                        return EOF;
        !          1311:                }
        !          1312: 
        !          1313:                if (free_user_stub) {
        !          1314:                        efree(user_stub);
        !          1315:                }
        !          1316:        } else {
        !          1317:                /* Either this is a brand new phar (add the stub), or the default stub is required (overwrite the stub) */
        !          1318:                entry.fp = php_stream_fopen_tmpfile();
        !          1319: 
        !          1320:                if (sizeof(newstub)-1 != php_stream_write(entry.fp, newstub, sizeof(newstub)-1)) {
        !          1321:                        php_stream_close(entry.fp);
        !          1322:                        if (error) {
        !          1323:                                spprintf(error, 0, "unable to %s stub in%szip-based phar \"%s\", failed", user_stub ? "overwrite" : "create", user_stub ? " " : " new ", phar->fname);
        !          1324:                        }
        !          1325:                        return EOF;
        !          1326:                }
        !          1327: 
        !          1328:                entry.uncompressed_filesize = entry.compressed_filesize = sizeof(newstub) - 1;
        !          1329:                entry.filename = estrndup(".phar/stub.php", sizeof(".phar/stub.php")-1);
        !          1330:                entry.filename_len = sizeof(".phar/stub.php")-1;
        !          1331: 
        !          1332:                if (!defaultstub) {
        !          1333:                        if (!zend_hash_exists(&phar->manifest, ".phar/stub.php", sizeof(".phar/stub.php")-1)) {
        !          1334:                                if (SUCCESS != zend_hash_add(&phar->manifest, entry.filename, entry.filename_len, (void*)&entry, sizeof(phar_entry_info), NULL)) {
        !          1335:                                        php_stream_close(entry.fp);
        !          1336:                                        efree(entry.filename);
        !          1337:                                        if (error) {
        !          1338:                                                spprintf(error, 0, "unable to create stub in zip-based phar \"%s\"", phar->fname);
        !          1339:                                        }
        !          1340:                                        return EOF;
        !          1341:                                }
        !          1342:                        } else {
        !          1343:                                php_stream_close(entry.fp);
        !          1344:                                efree(entry.filename);
        !          1345:                        }
        !          1346:                } else {
        !          1347:                        if (SUCCESS != zend_hash_update(&phar->manifest, entry.filename, entry.filename_len, (void*)&entry, sizeof(phar_entry_info), NULL)) {
        !          1348:                                php_stream_close(entry.fp);
        !          1349:                                efree(entry.filename);
        !          1350:                                if (error) {
        !          1351:                                        spprintf(error, 0, "unable to overwrite stub in zip-based phar \"%s\"", phar->fname);
        !          1352:                                }
        !          1353:                                return EOF;
        !          1354:                        }
        !          1355:                }
        !          1356:        }
        !          1357: nostub:
        !          1358:        if (phar->fp && !phar->is_brandnew) {
        !          1359:                oldfile = phar->fp;
        !          1360:                closeoldfile = 0;
        !          1361:                php_stream_rewind(oldfile);
        !          1362:        } else {
        !          1363:                oldfile = php_stream_open_wrapper(phar->fname, "rb", 0, NULL);
        !          1364:                closeoldfile = oldfile != NULL;
        !          1365:        }
        !          1366: 
        !          1367:        /* save modified files to the zip */
        !          1368:        pass.old = oldfile;
        !          1369:        pass.filefp = php_stream_fopen_tmpfile();
        !          1370: 
        !          1371:        if (!pass.filefp) {
        !          1372: fperror:
        !          1373:                if (closeoldfile) {
        !          1374:                        php_stream_close(oldfile);
        !          1375:                }
        !          1376:                if (error) {
        !          1377:                        spprintf(error, 4096, "phar zip flush of \"%s\" failed: unable to open temporary file", phar->fname);
        !          1378:                }
        !          1379:                return EOF;
        !          1380:        }
        !          1381: 
        !          1382:        pass.centralfp = php_stream_fopen_tmpfile();
        !          1383: 
        !          1384:        if (!pass.centralfp) {
        !          1385:                goto fperror;
        !          1386:        }
        !          1387: 
        !          1388:        pass.free_fp = pass.free_ufp = 1;
        !          1389:        memset(&eocd, 0, sizeof(eocd));
        !          1390: 
        !          1391:        strncpy(eocd.signature, "PK\5\6", 4);
        !          1392:        if (!phar->is_data && !phar->sig_flags) {
        !          1393:                phar->sig_flags = PHAR_SIG_SHA1;
        !          1394:        }
        !          1395:        if (phar->sig_flags) {
        !          1396:                PHAR_SET_16(eocd.counthere, zend_hash_num_elements(&phar->manifest) + 1);
        !          1397:                PHAR_SET_16(eocd.count, zend_hash_num_elements(&phar->manifest) + 1);
        !          1398:        } else {
        !          1399:                PHAR_SET_16(eocd.counthere, zend_hash_num_elements(&phar->manifest));
        !          1400:                PHAR_SET_16(eocd.count, zend_hash_num_elements(&phar->manifest));
        !          1401:        }
        !          1402:        zend_hash_apply_with_argument(&phar->manifest, phar_zip_changed_apply, (void *) &pass TSRMLS_CC);
        !          1403: 
        !          1404:        if (phar->metadata) {
        !          1405:                /* set phar metadata */
        !          1406:                PHP_VAR_SERIALIZE_INIT(metadata_hash);
        !          1407:                php_var_serialize(&main_metadata_str, &phar->metadata, &metadata_hash TSRMLS_CC);
        !          1408:                PHP_VAR_SERIALIZE_DESTROY(metadata_hash);
        !          1409:        }
        !          1410:        if (temperr) {
        !          1411:                if (error) {
        !          1412:                        spprintf(error, 4096, "phar zip flush of \"%s\" failed: %s", phar->fname, temperr);
        !          1413:                }
        !          1414:                efree(temperr);
        !          1415: temperror:
        !          1416:                php_stream_close(pass.centralfp);
        !          1417: nocentralerror:
        !          1418:                if (phar->metadata) {
        !          1419:                        smart_str_free(&main_metadata_str);
        !          1420:                }
        !          1421:                php_stream_close(pass.filefp);
        !          1422:                if (closeoldfile) {
        !          1423:                        php_stream_close(oldfile);
        !          1424:                }
        !          1425:                return EOF;
        !          1426:        }
        !          1427: 
        !          1428:        if (FAILURE == phar_zip_applysignature(phar, &pass, &main_metadata_str TSRMLS_CC)) {
        !          1429:                goto temperror;
        !          1430:        }
        !          1431: 
        !          1432:        /* save zip */
        !          1433:        cdir_size = php_stream_tell(pass.centralfp);
        !          1434:        cdir_offset = php_stream_tell(pass.filefp);
        !          1435:        PHAR_SET_32(eocd.cdir_size, cdir_size);
        !          1436:        PHAR_SET_32(eocd.cdir_offset, cdir_offset);
        !          1437:        php_stream_seek(pass.centralfp, 0, SEEK_SET);
        !          1438: 
        !          1439:        {
        !          1440:                size_t clen;
        !          1441:                int ret = phar_stream_copy_to_stream(pass.centralfp, pass.filefp, PHP_STREAM_COPY_ALL, &clen);
        !          1442:                if (SUCCESS != ret || clen != cdir_size) {
        !          1443:                        if (error) {
        !          1444:                                spprintf(error, 4096, "phar zip flush of \"%s\" failed: unable to write central-directory", phar->fname);
        !          1445:                        }
        !          1446:                        goto temperror;
        !          1447:                }
        !          1448:        }
        !          1449: 
        !          1450:        php_stream_close(pass.centralfp);
        !          1451: 
        !          1452:        if (phar->metadata) {
        !          1453:                /* set phar metadata */
        !          1454:                PHAR_SET_16(eocd.comment_len, main_metadata_str.len);
        !          1455: 
        !          1456:                if (sizeof(eocd) != php_stream_write(pass.filefp, (char *)&eocd, sizeof(eocd))) {
        !          1457:                        if (error) {
        !          1458:                                spprintf(error, 4096, "phar zip flush of \"%s\" failed: unable to write end of central-directory", phar->fname);
        !          1459:                        }
        !          1460:                        goto nocentralerror;
        !          1461:                }
        !          1462: 
        !          1463:                if (main_metadata_str.len != php_stream_write(pass.filefp, main_metadata_str.c, main_metadata_str.len)) {
        !          1464:                        if (error) {
        !          1465:                                spprintf(error, 4096, "phar zip flush of \"%s\" failed: unable to write metadata to zip comment", phar->fname);
        !          1466:                        }
        !          1467:                        goto nocentralerror;
        !          1468:                }
        !          1469: 
        !          1470:                smart_str_free(&main_metadata_str);
        !          1471: 
        !          1472:        } else {
        !          1473:                if (sizeof(eocd) != php_stream_write(pass.filefp, (char *)&eocd, sizeof(eocd))) {
        !          1474:                        if (error) {
        !          1475:                                spprintf(error, 4096, "phar zip flush of \"%s\" failed: unable to write end of central-directory", phar->fname);
        !          1476:                        }
        !          1477:                        goto nocentralerror;
        !          1478:                }
        !          1479:        }
        !          1480: 
        !          1481:        if (phar->fp && pass.free_fp) {
        !          1482:                php_stream_close(phar->fp);
        !          1483:        }
        !          1484: 
        !          1485:        if (phar->ufp) {
        !          1486:                if (pass.free_ufp) {
        !          1487:                        php_stream_close(phar->ufp);
        !          1488:                }
        !          1489:                phar->ufp = NULL;
        !          1490:        }
        !          1491: 
        !          1492:        /* re-open */
        !          1493:        phar->is_brandnew = 0;
        !          1494: 
        !          1495:        if (phar->donotflush) {
        !          1496:                /* deferred flush */
        !          1497:                phar->fp = pass.filefp;
        !          1498:        } else {
        !          1499:                phar->fp = php_stream_open_wrapper(phar->fname, "w+b", IGNORE_URL|STREAM_MUST_SEEK|REPORT_ERRORS, NULL);
        !          1500:                if (!phar->fp) {
        !          1501:                        if (closeoldfile) {
        !          1502:                                php_stream_close(oldfile);
        !          1503:                        }
        !          1504:                        phar->fp = pass.filefp;
        !          1505:                        if (error) {
        !          1506:                                spprintf(error, 4096, "unable to open new phar \"%s\" for writing", phar->fname);
        !          1507:                        }
        !          1508:                        return EOF;
        !          1509:                }
        !          1510:                php_stream_rewind(pass.filefp);
        !          1511:                phar_stream_copy_to_stream(pass.filefp, phar->fp, PHP_STREAM_COPY_ALL, NULL);
        !          1512:                /* we could also reopen the file in "rb" mode but there is no need for that */
        !          1513:                php_stream_close(pass.filefp);
        !          1514:        }
        !          1515: 
        !          1516:        if (closeoldfile) {
        !          1517:                php_stream_close(oldfile);
        !          1518:        }
        !          1519:        return EOF;
        !          1520: }
        !          1521: /* }}} */
        !          1522: 
        !          1523: /*
        !          1524:  * Local variables:
        !          1525:  * tab-width: 4
        !          1526:  * c-basic-offset: 4
        !          1527:  * End:
        !          1528:  * vim600: noet sw=4 ts=4 fdm=marker
        !          1529:  * vim<600: noet sw=4 ts=4
        !          1530:  */

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>