Annotation of embedaddon/php/ext/zip/lib/zip_source_filep.c, revision 1.1
1.1 ! misho 1: /*
! 2: zip_source_filep.c -- create data source from FILE *
! 3: Copyright (C) 1999-2009 Dieter Baron and Thomas Klausner
! 4:
! 5: This file is part of libzip, a library to manipulate ZIP archives.
! 6: The authors can be contacted at <libzip@nih.at>
! 7:
! 8: Redistribution and use in source and binary forms, with or without
! 9: modification, are permitted provided that the following conditions
! 10: are met:
! 11: 1. Redistributions of source code must retain the above copyright
! 12: notice, this list of conditions and the following disclaimer.
! 13: 2. Redistributions in binary form must reproduce the above copyright
! 14: notice, this list of conditions and the following disclaimer in
! 15: the documentation and/or other materials provided with the
! 16: distribution.
! 17: 3. The names of the authors may not be used to endorse or promote
! 18: products derived from this software without specific prior
! 19: written permission.
! 20:
! 21: THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS
! 22: OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
! 23: WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
! 24: ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY
! 25: DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
! 26: DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
! 27: GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
! 28: INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER
! 29: IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
! 30: OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN
! 31: IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
! 32: */
! 33:
! 34:
! 35:
! 36: #include <sys/stat.h>
! 37: #include <errno.h>
! 38: #include <stdio.h>
! 39: #include <stdlib.h>
! 40: #include <string.h>
! 41:
! 42: #include "zipint.h"
! 43:
! 44: struct read_file {
! 45: char *fname; /* name of file to copy from */
! 46: FILE *f; /* file to copy from */
! 47: off_t off; /* start offset of */
! 48: off_t len; /* lengt of data to copy */
! 49: off_t remain; /* bytes remaining to be copied */
! 50: int e[2]; /* error codes */
! 51: };
! 52:
! 53: static ssize_t read_file(void *state, void *data, size_t len,
! 54: enum zip_source_cmd cmd);
! 55:
! 56:
! 57:
! 58: ZIP_EXTERN(struct zip_source *)
! 59: zip_source_filep(struct zip *za, FILE *file, off_t start, off_t len)
! 60: {
! 61: if (za == NULL)
! 62: return NULL;
! 63:
! 64: if (file == NULL || start < 0 || len < -1) {
! 65: _zip_error_set(&za->error, ZIP_ER_INVAL, 0);
! 66: return NULL;
! 67: }
! 68:
! 69: return _zip_source_file_or_p(za, NULL, file, start, len);
! 70: }
! 71:
! 72:
! 73:
! 74: struct zip_source *
! 75: _zip_source_file_or_p(struct zip *za, const char *fname, FILE *file,
! 76: off_t start, off_t len)
! 77: {
! 78: struct read_file *f;
! 79: struct zip_source *zs;
! 80:
! 81: if (file == NULL && fname == NULL) {
! 82: _zip_error_set(&za->error, ZIP_ER_INVAL, 0);
! 83: return NULL;
! 84: }
! 85:
! 86: if ((f=(struct read_file *)malloc(sizeof(struct read_file))) == NULL) {
! 87: _zip_error_set(&za->error, ZIP_ER_MEMORY, 0);
! 88: return NULL;
! 89: }
! 90:
! 91: f->fname = NULL;
! 92: if (fname) {
! 93: if ((f->fname=strdup(fname)) == NULL) {
! 94: _zip_error_set(&za->error, ZIP_ER_MEMORY, 0);
! 95: free(f);
! 96: return NULL;
! 97: }
! 98: }
! 99: f->f = file;
! 100: f->off = start;
! 101: f->len = (len ? len : -1);
! 102:
! 103: if ((zs=zip_source_function(za, read_file, f)) == NULL) {
! 104: free(f);
! 105: return NULL;
! 106: }
! 107:
! 108: return zs;
! 109: }
! 110:
! 111:
! 112:
! 113: static ssize_t
! 114: read_file(void *state, void *data, size_t len, enum zip_source_cmd cmd)
! 115: {
! 116: struct read_file *z;
! 117: char *buf;
! 118: int i, n;
! 119:
! 120: z = (struct read_file *)state;
! 121: buf = (char *)data;
! 122:
! 123: switch (cmd) {
! 124: case ZIP_SOURCE_OPEN:
! 125: if (z->fname) {
! 126: if ((z->f=fopen(z->fname, "rb")) == NULL) {
! 127: z->e[0] = ZIP_ER_OPEN;
! 128: z->e[1] = errno;
! 129: return -1;
! 130: }
! 131: }
! 132:
! 133: if (fseeko(z->f, z->off, SEEK_SET) < 0) {
! 134: z->e[0] = ZIP_ER_SEEK;
! 135: z->e[1] = errno;
! 136: return -1;
! 137: }
! 138: z->remain = z->len;
! 139: return 0;
! 140:
! 141: case ZIP_SOURCE_READ:
! 142: if (z->remain != -1)
! 143: n = len > z->remain ? z->remain : len;
! 144: else
! 145: n = len;
! 146:
! 147: if ((i=fread(buf, 1, n, z->f)) < 0) {
! 148: z->e[0] = ZIP_ER_READ;
! 149: z->e[1] = errno;
! 150: return -1;
! 151: }
! 152:
! 153: if (z->remain != -1)
! 154: z->remain -= i;
! 155:
! 156: return i;
! 157:
! 158: case ZIP_SOURCE_CLOSE:
! 159: if (z->fname) {
! 160: fclose(z->f);
! 161: z->f = NULL;
! 162: }
! 163: return 0;
! 164:
! 165: case ZIP_SOURCE_STAT:
! 166: {
! 167: struct zip_stat *st;
! 168: struct stat fst;
! 169: int err;
! 170:
! 171: if (len < sizeof(*st))
! 172: return -1;
! 173:
! 174: if (z->f)
! 175: err = fstat(fileno(z->f), &fst);
! 176: else
! 177: err = stat(z->fname, &fst);
! 178:
! 179: if (err != 0) {
! 180: z->e[0] = ZIP_ER_READ; /* best match */
! 181: z->e[1] = errno;
! 182: return -1;
! 183: }
! 184:
! 185: st = (struct zip_stat *)data;
! 186:
! 187: zip_stat_init(st);
! 188: st->mtime = fst.st_mtime;
! 189: if (z->len != -1)
! 190: st->size = z->len;
! 191: else if ((fst.st_mode&S_IFMT) == S_IFREG)
! 192: st->size = fst.st_size;
! 193:
! 194: return sizeof(*st);
! 195: }
! 196:
! 197: case ZIP_SOURCE_ERROR:
! 198: if (len < sizeof(int)*2)
! 199: return -1;
! 200:
! 201: memcpy(data, z->e, sizeof(int)*2);
! 202: return sizeof(int)*2;
! 203:
! 204: case ZIP_SOURCE_FREE:
! 205: free(z->fname);
! 206: if (z->f)
! 207: fclose(z->f);
! 208: free(z);
! 209: return 0;
! 210:
! 211: default:
! 212: ;
! 213: }
! 214:
! 215: return -1;
! 216: }
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>