Annotation of embedaddon/php/ext/zip/lib/zip_source_filep.c, revision 1.1.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>