| File: | jdk/src/java.base/share/native/libzip/zip_util.c |
| Warning: | line 760, column 12 Potential leak of memory pointed to by 'cenbuf' |
Press '?' to see keyboard shortcuts
Keyboard shortcuts:
| 1 | /* | ||||
| 2 | * Copyright (c) 1995, 2020, Oracle and/or its affiliates. All rights reserved. | ||||
| 3 | * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. | ||||
| 4 | * | ||||
| 5 | * This code is free software; you can redistribute it and/or modify it | ||||
| 6 | * under the terms of the GNU General Public License version 2 only, as | ||||
| 7 | * published by the Free Software Foundation. Oracle designates this | ||||
| 8 | * particular file as subject to the "Classpath" exception as provided | ||||
| 9 | * by Oracle in the LICENSE file that accompanied this code. | ||||
| 10 | * | ||||
| 11 | * This code is distributed in the hope that it will be useful, but WITHOUT | ||||
| 12 | * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | ||||
| 13 | * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | ||||
| 14 | * version 2 for more details (a copy is included in the LICENSE file that | ||||
| 15 | * accompanied this code). | ||||
| 16 | * | ||||
| 17 | * You should have received a copy of the GNU General Public License version | ||||
| 18 | * 2 along with this work; if not, write to the Free Software Foundation, | ||||
| 19 | * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. | ||||
| 20 | * | ||||
| 21 | * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA | ||||
| 22 | * or visit www.oracle.com if you need additional information or have any | ||||
| 23 | * questions. | ||||
| 24 | */ | ||||
| 25 | |||||
| 26 | /* | ||||
| 27 | * Support for reading ZIP/JAR files. | ||||
| 28 | */ | ||||
| 29 | |||||
| 30 | #include <stdio.h> | ||||
| 31 | #include <stdlib.h> | ||||
| 32 | #include <stddef.h> | ||||
| 33 | #include <string.h> | ||||
| 34 | #include <fcntl.h> | ||||
| 35 | #include <limits.h> | ||||
| 36 | #include <time.h> | ||||
| 37 | #include <ctype.h> | ||||
| 38 | #include <assert.h> | ||||
| 39 | |||||
| 40 | #include "jni.h" | ||||
| 41 | #include "jni_util.h" | ||||
| 42 | #include "jlong.h" | ||||
| 43 | #include "jvm.h" | ||||
| 44 | #include "io_util.h" | ||||
| 45 | #include "io_util_md.h" | ||||
| 46 | #include "zip_util.h" | ||||
| 47 | #include <zlib.h> | ||||
| 48 | |||||
| 49 | #ifdef _ALLBSD_SOURCE | ||||
| 50 | #define off64_t off_t | ||||
| 51 | #define mmap64 mmap | ||||
| 52 | #endif | ||||
| 53 | |||||
| 54 | /* USE_MMAP means mmap the CEN & ENDHDR part of the zip file. */ | ||||
| 55 | #ifdef USE_MMAP1 | ||||
| 56 | #include <sys/mman.h> | ||||
| 57 | #endif | ||||
| 58 | |||||
| 59 | #define MAXREFS0xFFFF 0xFFFF /* max number of open zip file references */ | ||||
| 60 | |||||
| 61 | #define MCREATE()JVM_RawMonitorCreate() JVM_RawMonitorCreate() | ||||
| 62 | #define MLOCK(lock)JVM_RawMonitorEnter(lock) JVM_RawMonitorEnter(lock) | ||||
| 63 | #define MUNLOCK(lock)JVM_RawMonitorExit(lock) JVM_RawMonitorExit(lock) | ||||
| 64 | #define MDESTROY(lock)JVM_RawMonitorDestroy(lock) JVM_RawMonitorDestroy(lock) | ||||
| 65 | |||||
| 66 | #define CENSIZE(cen)(46 + ((((unsigned char *)(cen))[28]) | ((((unsigned char *)( cen))[28 +1]) << 8)) + ((((unsigned char *)(cen))[30]) | ((((unsigned char *)(cen))[30 +1]) << 8)) + ((((unsigned char *)(cen))[32]) | ((((unsigned char *)(cen))[32 +1]) << 8))) (CENHDR46 + CENNAM(cen)((((unsigned char *)(cen))[28]) | ((((unsigned char *)(cen))[ 28 +1]) << 8)) + CENEXT(cen)((((unsigned char *)(cen))[30]) | ((((unsigned char *)(cen))[ 30 +1]) << 8)) + CENCOM(cen)((((unsigned char *)(cen))[32]) | ((((unsigned char *)(cen))[ 32 +1]) << 8))) | ||||
| 67 | |||||
| 68 | static jzfile *zfiles = 0; /* currently open zip files */ | ||||
| 69 | static void *zfiles_lock = 0; | ||||
| 70 | |||||
| 71 | static void freeCEN(jzfile *); | ||||
| 72 | |||||
| 73 | #ifndef PATH_MAX4096 | ||||
| 74 | #define PATH_MAX4096 1024 | ||||
| 75 | #endif | ||||
| 76 | |||||
| 77 | static jint INITIAL_META_COUNT = 2; /* initial number of entries in meta name array */ | ||||
| 78 | |||||
| 79 | /* | ||||
| 80 | * Declare library specific JNI_Onload entry if static build | ||||
| 81 | */ | ||||
| 82 | #ifdef STATIC_BUILD | ||||
| 83 | DEF_STATIC_JNI_OnLoad | ||||
| 84 | #endif | ||||
| 85 | |||||
| 86 | /* | ||||
| 87 | * The ZFILE_* functions exist to provide some platform-independence with | ||||
| 88 | * respect to file access needs. | ||||
| 89 | */ | ||||
| 90 | |||||
| 91 | /* | ||||
| 92 | * Opens the named file for reading, returning a ZFILE. | ||||
| 93 | * | ||||
| 94 | * Compare this with winFileHandleOpen in windows/native/java/io/io_util_md.c. | ||||
| 95 | * This function does not take JNIEnv* and uses CreateFile (instead of | ||||
| 96 | * CreateFileW). The expectation is that this function will be called only | ||||
| 97 | * from ZIP_Open_Generic, which in turn is used by the JVM, where we do not | ||||
| 98 | * need to concern ourselves with wide chars. | ||||
| 99 | */ | ||||
| 100 | static ZFILEint | ||||
| 101 | ZFILE_Open(const char *fname, int flags) { | ||||
| 102 | #ifdef WIN32 | ||||
| 103 | WCHAR *wfname, *wprefixed_fname; | ||||
| 104 | size_t fname_length; | ||||
| 105 | jlong fhandle; | ||||
| 106 | const DWORD access = | ||||
| 107 | (flags & O_RDWR02) ? (GENERIC_WRITE | GENERIC_READ) : | ||||
| 108 | (flags & O_WRONLY01) ? GENERIC_WRITE : | ||||
| 109 | GENERIC_READ; | ||||
| 110 | const DWORD sharing = | ||||
| 111 | FILE_SHARE_READ | FILE_SHARE_WRITE; | ||||
| 112 | const DWORD disposition = | ||||
| 113 | /* Note: O_TRUNC overrides O_CREAT */ | ||||
| 114 | (flags & O_TRUNC01000) ? CREATE_ALWAYS : | ||||
| 115 | (flags & O_CREAT0100) ? OPEN_ALWAYS : | ||||
| 116 | OPEN_EXISTING; | ||||
| 117 | const DWORD maybeWriteThrough = | ||||
| 118 | (flags & (O_SYNC04010000 | O_DSYNC010000)) ? | ||||
| 119 | FILE_FLAG_WRITE_THROUGH : | ||||
| 120 | FILE_ATTRIBUTE_NORMAL; | ||||
| 121 | const DWORD maybeDeleteOnClose = | ||||
| 122 | (flags & O_TEMPORARY) ? | ||||
| 123 | FILE_FLAG_DELETE_ON_CLOSE : | ||||
| 124 | FILE_ATTRIBUTE_NORMAL; | ||||
| 125 | const DWORD flagsAndAttributes = maybeWriteThrough | maybeDeleteOnClose; | ||||
| 126 | |||||
| 127 | fname_length = strlen(fname); | ||||
| 128 | if (fname_length < MAX_PATH) { | ||||
| 129 | return (jlong)CreateFile( | ||||
| 130 | fname, /* path name in multibyte char */ | ||||
| 131 | access, /* Read and/or write permission */ | ||||
| 132 | sharing, /* File sharing flags */ | ||||
| 133 | NULL((void*)0), /* Security attributes */ | ||||
| 134 | disposition, /* creation disposition */ | ||||
| 135 | flagsAndAttributes, /* flags and attributes */ | ||||
| 136 | NULL((void*)0)); | ||||
| 137 | } else { | ||||
| 138 | /* Get required buffer size to convert to Unicode */ | ||||
| 139 | int wfname_len = MultiByteToWideChar(CP_ACP, MB_ERR_INVALID_CHARS, | ||||
| 140 | fname, -1, NULL((void*)0), 0); | ||||
| 141 | if (wfname_len == 0) { | ||||
| 142 | return (jlong)INVALID_HANDLE_VALUE; | ||||
| 143 | } | ||||
| 144 | if ((wfname = (WCHAR*)malloc(wfname_len * sizeof(WCHAR))) == NULL((void*)0)) { | ||||
| 145 | return (jlong)INVALID_HANDLE_VALUE; | ||||
| 146 | } | ||||
| 147 | if (MultiByteToWideChar(CP_ACP, MB_ERR_INVALID_CHARS, | ||||
| 148 | fname, -1, wfname, wfname_len) == 0) { | ||||
| 149 | free(wfname); | ||||
| 150 | return (jlong)INVALID_HANDLE_VALUE; | ||||
| 151 | } | ||||
| 152 | wprefixed_fname = getPrefixed(wfname, (int)fname_length); | ||||
| 153 | fhandle = (jlong)CreateFileW( | ||||
| 154 | wprefixed_fname, /* Wide char path name */ | ||||
| 155 | access, /* Read and/or write permission */ | ||||
| 156 | sharing, /* File sharing flags */ | ||||
| 157 | NULL((void*)0), /* Security attributes */ | ||||
| 158 | disposition, /* creation disposition */ | ||||
| 159 | flagsAndAttributes, /* flags and attributes */ | ||||
| 160 | NULL((void*)0)); | ||||
| 161 | free(wfname); | ||||
| 162 | free(wprefixed_fname); | ||||
| 163 | return fhandle; | ||||
| 164 | } | ||||
| 165 | #else | ||||
| 166 | return open(fname, flags, 0); | ||||
| 167 | #endif | ||||
| 168 | } | ||||
| 169 | |||||
| 170 | /* | ||||
| 171 | * The io_util_md.h files do not provide IO_CLOSE, hence we use platform | ||||
| 172 | * specifics. | ||||
| 173 | */ | ||||
| 174 | static void | ||||
| 175 | ZFILE_Close(ZFILEint zfd) { | ||||
| 176 | #ifdef WIN32 | ||||
| 177 | CloseHandle((HANDLE) zfd); | ||||
| 178 | #else | ||||
| 179 | close(zfd); | ||||
| 180 | #endif | ||||
| 181 | } | ||||
| 182 | |||||
| 183 | static int | ||||
| 184 | ZFILE_read(ZFILEint zfd, char *buf, jint nbytes) { | ||||
| 185 | #ifdef WIN32 | ||||
| 186 | return (int) IO_ReadhandleRead(zfd, buf, nbytes); | ||||
| 187 | #else | ||||
| 188 | return read(zfd, buf, nbytes); | ||||
| 189 | #endif | ||||
| 190 | } | ||||
| 191 | |||||
| 192 | /* | ||||
| 193 | * Initialize zip file support. Return 0 if successful otherwise -1 | ||||
| 194 | * if could not be initialized. | ||||
| 195 | */ | ||||
| 196 | static jint | ||||
| 197 | InitializeZip() | ||||
| 198 | { | ||||
| 199 | static jboolean inited = JNI_FALSE0; | ||||
| 200 | |||||
| 201 | // Initialize errno to 0. It may be set later (e.g. during memory | ||||
| 202 | // allocation) but we can disregard previous values. | ||||
| 203 | errno(*__errno_location ()) = 0; | ||||
| 204 | |||||
| 205 | if (inited) | ||||
| 206 | return 0; | ||||
| 207 | zfiles_lock = MCREATE()JVM_RawMonitorCreate(); | ||||
| 208 | if (zfiles_lock == 0) { | ||||
| 209 | return -1; | ||||
| 210 | } | ||||
| 211 | inited = JNI_TRUE1; | ||||
| 212 | |||||
| 213 | return 0; | ||||
| 214 | } | ||||
| 215 | |||||
| 216 | /* | ||||
| 217 | * Reads len bytes of data into buf. | ||||
| 218 | * Returns 0 if all bytes could be read, otherwise returns -1. | ||||
| 219 | */ | ||||
| 220 | static int | ||||
| 221 | readFully(ZFILEint zfd, void *buf, jlong len) { | ||||
| 222 | char *bp = (char *) buf; | ||||
| 223 | |||||
| 224 | while (len > 0) { | ||||
| 225 | jlong limit = ((((jlong) 1) << 31) - 1); | ||||
| 226 | jint count = (len < limit) ? | ||||
| 227 | (jint) len : | ||||
| 228 | (jint) limit; | ||||
| 229 | jint n = ZFILE_read(zfd, bp, count); | ||||
| 230 | if (n > 0) { | ||||
| 231 | bp += n; | ||||
| 232 | len -= n; | ||||
| 233 | } else if (n == -1 && errno(*__errno_location ()) == EINTR4) { | ||||
| 234 | /* Retry after EINTR (interrupted by signal). */ | ||||
| 235 | continue; | ||||
| 236 | } else { /* EOF or IO error */ | ||||
| 237 | return -1; | ||||
| 238 | } | ||||
| 239 | } | ||||
| 240 | return 0; | ||||
| 241 | } | ||||
| 242 | |||||
| 243 | /* | ||||
| 244 | * Reads len bytes of data from the specified offset into buf. | ||||
| 245 | * Returns 0 if all bytes could be read, otherwise returns -1. | ||||
| 246 | */ | ||||
| 247 | static int | ||||
| 248 | readFullyAt(ZFILEint zfd, void *buf, jlong len, jlong offset) | ||||
| 249 | { | ||||
| 250 | if (IO_Lseeklseek64(zfd, offset, SEEK_SET0) == -1) { | ||||
| 251 | return -1; /* lseek failure. */ | ||||
| 252 | } | ||||
| 253 | |||||
| 254 | return readFully(zfd, buf, len); | ||||
| 255 | } | ||||
| 256 | |||||
| 257 | /* | ||||
| 258 | * Allocates a new zip file object for the specified file name. | ||||
| 259 | * Returns the zip file object or NULL if not enough memory. | ||||
| 260 | */ | ||||
| 261 | static jzfile * | ||||
| 262 | allocZip(const char *name) | ||||
| 263 | { | ||||
| 264 | jzfile *zip; | ||||
| 265 | if (((zip = calloc(1, sizeof(jzfile))) != NULL((void*)0)) && | ||||
| 266 | ((zip->name = strdup(name)) != NULL((void*)0)) && | ||||
| 267 | ((zip->lock = MCREATE()JVM_RawMonitorCreate()) != NULL((void*)0))) { | ||||
| 268 | zip->zfd = -1; | ||||
| 269 | return zip; | ||||
| 270 | } | ||||
| 271 | |||||
| 272 | if (zip != NULL((void*)0)) { | ||||
| 273 | free(zip->name); | ||||
| 274 | free(zip); | ||||
| 275 | } | ||||
| 276 | return NULL((void*)0); | ||||
| 277 | } | ||||
| 278 | |||||
| 279 | /* | ||||
| 280 | * Frees all native resources owned by the specified zip file object. | ||||
| 281 | */ | ||||
| 282 | static void | ||||
| 283 | freeZip(jzfile *zip) | ||||
| 284 | { | ||||
| 285 | /* First free any cached jzentry */ | ||||
| 286 | ZIP_FreeEntry(zip,0); | ||||
| 287 | if (zip->lock != NULL((void*)0)) MDESTROY(zip->lock)JVM_RawMonitorDestroy(zip->lock); | ||||
| 288 | free(zip->name); | ||||
| 289 | freeCEN(zip); | ||||
| 290 | |||||
| 291 | #ifdef USE_MMAP1 | ||||
| 292 | if (zip->usemmap) { | ||||
| 293 | if (zip->maddr != NULL((void*)0)) | ||||
| 294 | munmap((char *)zip->maddr, zip->mlen); | ||||
| 295 | } else | ||||
| 296 | #endif | ||||
| 297 | { | ||||
| 298 | free(zip->cencache.data); | ||||
| 299 | } | ||||
| 300 | if (zip->comment != NULL((void*)0)) | ||||
| 301 | free(zip->comment); | ||||
| 302 | if (zip->zfd != -1) ZFILE_Close(zip->zfd); | ||||
| 303 | free(zip); | ||||
| 304 | } | ||||
| 305 | |||||
| 306 | /* The END header is followed by a variable length comment of size < 64k. */ | ||||
| 307 | static const jlong END_MAXLEN = 0xFFFF + ENDHDR22; | ||||
| 308 | |||||
| 309 | #define READBLOCKSZ128 128 | ||||
| 310 | |||||
| 311 | static jboolean verifyEND(jzfile *zip, jlong endpos, char *endbuf) { | ||||
| 312 | /* ENDSIG matched, however the size of file comment in it does not | ||||
| 313 | match the real size. One "common" cause for this problem is some | ||||
| 314 | "extra" bytes are padded at the end of the zipfile. | ||||
| 315 | Let's do some extra verification, we don't care about the performance | ||||
| 316 | in this situation. | ||||
| 317 | */ | ||||
| 318 | jlong cenpos = endpos - ENDSIZ(endbuf)((((((unsigned char *)(endbuf))[12]) | ((((unsigned char *)(endbuf ))[12 +1]) << 8)) | (((((unsigned char *)(endbuf))[12 + 2]) | ((((unsigned char *)(endbuf))[12 +2 +1]) << 8)) << 16)) &0xffffffffUL); | ||||
| 319 | jlong locpos = cenpos - ENDOFF(endbuf)((((((unsigned char *)(endbuf))[16]) | ((((unsigned char *)(endbuf ))[16 +1]) << 8)) | (((((unsigned char *)(endbuf))[16 + 2]) | ((((unsigned char *)(endbuf))[16 +2 +1]) << 8)) << 16)) &0xffffffffUL); | ||||
| 320 | char buf[4]; | ||||
| 321 | return (cenpos >= 0 && | ||||
| 322 | locpos >= 0 && | ||||
| 323 | readFullyAt(zip->zfd, buf, sizeof(buf), cenpos) != -1 && | ||||
| 324 | CENSIG_AT(buf)(((buf)[0] == 'P') & ((buf)[1] == 'K') & ((buf)[2] == 1) & ((buf)[3] == 2)) && | ||||
| 325 | readFullyAt(zip->zfd, buf, sizeof(buf), locpos) != -1 && | ||||
| 326 | LOCSIG_AT(buf)(((buf)[0] == 'P') & ((buf)[1] == 'K') & ((buf)[2] == 3) & ((buf)[3] == 4))); | ||||
| 327 | } | ||||
| 328 | |||||
| 329 | /* | ||||
| 330 | * Searches for end of central directory (END) header. The contents of | ||||
| 331 | * the END header will be read and placed in endbuf. Returns the file | ||||
| 332 | * position of the END header, otherwise returns -1 if the END header | ||||
| 333 | * was not found or an error occurred. | ||||
| 334 | */ | ||||
| 335 | static jlong | ||||
| 336 | findEND(jzfile *zip, void *endbuf) | ||||
| 337 | { | ||||
| 338 | char buf[READBLOCKSZ128]; | ||||
| 339 | jlong pos; | ||||
| 340 | const jlong len = zip->len; | ||||
| 341 | const ZFILEint zfd = zip->zfd; | ||||
| 342 | const jlong minHDR = len - END_MAXLEN > 0 ? len - END_MAXLEN : 0; | ||||
| 343 | const jlong minPos = minHDR - (sizeof(buf)-ENDHDR22); | ||||
| 344 | jint clen; | ||||
| 345 | |||||
| 346 | for (pos = len - sizeof(buf); pos >= minPos; pos -= (sizeof(buf)-ENDHDR22)) { | ||||
| 347 | |||||
| 348 | int i; | ||||
| 349 | jlong off = 0; | ||||
| 350 | if (pos < 0) { | ||||
| 351 | /* Pretend there are some NUL bytes before start of file */ | ||||
| 352 | off = -pos; | ||||
| 353 | memset(buf, '\0', (size_t)off); | ||||
| 354 | } | ||||
| 355 | |||||
| 356 | if (readFullyAt(zfd, buf + off, sizeof(buf) - off, | ||||
| 357 | pos + off) == -1) { | ||||
| 358 | return -1; /* System error */ | ||||
| 359 | } | ||||
| 360 | |||||
| 361 | /* Now scan the block backwards for END header signature */ | ||||
| 362 | for (i = sizeof(buf) - ENDHDR22; i >= 0; i--) { | ||||
| 363 | if (buf[i+0] == 'P' && | ||||
| 364 | buf[i+1] == 'K' && | ||||
| 365 | buf[i+2] == '\005' && | ||||
| 366 | buf[i+3] == '\006' && | ||||
| 367 | ((pos + i + ENDHDR22 + ENDCOM(buf + i)((((unsigned char *)(buf + i))[20]) | ((((unsigned char *)(buf + i))[20 +1]) << 8)) == len) | ||||
| 368 | || verifyEND(zip, pos + i, buf + i))) { | ||||
| 369 | /* Found END header */ | ||||
| 370 | memcpy(endbuf, buf + i, ENDHDR22); | ||||
| 371 | |||||
| 372 | clen = ENDCOM(endbuf)((((unsigned char *)(endbuf))[20]) | ((((unsigned char *)(endbuf ))[20 +1]) << 8)); | ||||
| 373 | if (clen != 0) { | ||||
| 374 | zip->comment = malloc(clen + 1); | ||||
| 375 | if (zip->comment == NULL((void*)0)) { | ||||
| 376 | return -1; | ||||
| 377 | } | ||||
| 378 | if (readFullyAt(zfd, zip->comment, clen, pos + i + ENDHDR22) | ||||
| 379 | == -1) { | ||||
| 380 | free(zip->comment); | ||||
| 381 | zip->comment = NULL((void*)0); | ||||
| 382 | return -1; | ||||
| 383 | } | ||||
| 384 | zip->comment[clen] = '\0'; | ||||
| 385 | zip->clen = clen; | ||||
| 386 | } | ||||
| 387 | return pos + i; | ||||
| 388 | } | ||||
| 389 | } | ||||
| 390 | } | ||||
| 391 | |||||
| 392 | return -1; /* END header not found */ | ||||
| 393 | } | ||||
| 394 | |||||
| 395 | /* | ||||
| 396 | * Searches for the ZIP64 end of central directory (END) header. The | ||||
| 397 | * contents of the ZIP64 END header will be read and placed in end64buf. | ||||
| 398 | * Returns the file position of the ZIP64 END header, otherwise returns | ||||
| 399 | * -1 if the END header was not found or an error occurred. | ||||
| 400 | * | ||||
| 401 | * The ZIP format specifies the "position" of each related record as | ||||
| 402 | * ... | ||||
| 403 | * [central directory] | ||||
| 404 | * [zip64 end of central directory record] | ||||
| 405 | * [zip64 end of central directory locator] | ||||
| 406 | * [end of central directory record] | ||||
| 407 | * | ||||
| 408 | * The offset of zip64 end locator can be calculated from endpos as | ||||
| 409 | * "endpos - ZIP64_LOCHDR". | ||||
| 410 | * The "offset" of zip64 end record is stored in zip64 end locator. | ||||
| 411 | */ | ||||
| 412 | static jlong | ||||
| 413 | findEND64(jzfile *zip, void *end64buf, jlong endpos) | ||||
| 414 | { | ||||
| 415 | char loc64[ZIP64_LOCHDR20]; | ||||
| 416 | jlong end64pos; | ||||
| 417 | if (readFullyAt(zip->zfd, loc64, ZIP64_LOCHDR20, endpos - ZIP64_LOCHDR20) == -1) { | ||||
| 418 | return -1; // end64 locator not found | ||||
| 419 | } | ||||
| 420 | end64pos = ZIP64_LOCOFF(loc64)(((jlong)((((((unsigned char *)(loc64))[8]) | ((((unsigned char *)(loc64))[8 +1]) << 8)) | (((((unsigned char *)(loc64 ))[8 +2]) | ((((unsigned char *)(loc64))[8 +2 +1]) << 8 )) << 16)) &0xffffffffUL)) | (((jlong)((((((unsigned char *)(loc64))[8 +4]) | ((((unsigned char *)(loc64))[8 +4 + 1]) << 8)) | (((((unsigned char *)(loc64))[8 +4 +2]) | ( (((unsigned char *)(loc64))[8 +4 +2 +1]) << 8)) << 16)) &0xffffffffUL)) << 32)); | ||||
| 421 | if (readFullyAt(zip->zfd, end64buf, ZIP64_ENDHDR56, end64pos) == -1) { | ||||
| 422 | return -1; // end64 record not found | ||||
| 423 | } | ||||
| 424 | return end64pos; | ||||
| 425 | } | ||||
| 426 | |||||
| 427 | /* | ||||
| 428 | * Returns a hash code value for a C-style NUL-terminated string. | ||||
| 429 | */ | ||||
| 430 | static unsigned int | ||||
| 431 | hash(const char *s) | ||||
| 432 | { | ||||
| 433 | int h = 0; | ||||
| 434 | while (*s != '\0') | ||||
| 435 | h = 31*h + *s++; | ||||
| 436 | return h; | ||||
| 437 | } | ||||
| 438 | |||||
| 439 | /* | ||||
| 440 | * Returns a hash code value for a string of a specified length. | ||||
| 441 | */ | ||||
| 442 | static unsigned int | ||||
| 443 | hashN(const char *s, int length) | ||||
| 444 | { | ||||
| 445 | int h = 0; | ||||
| 446 | while (length-- > 0) | ||||
| 447 | h = 31*h + *s++; | ||||
| 448 | return h; | ||||
| 449 | } | ||||
| 450 | |||||
| 451 | static unsigned int | ||||
| 452 | hash_append(unsigned int hash, char c) | ||||
| 453 | { | ||||
| 454 | return ((int)hash)*31 + c; | ||||
| 455 | } | ||||
| 456 | |||||
| 457 | /* | ||||
| 458 | * Returns true if the specified entry's name begins with the string | ||||
| 459 | * "META-INF/" irrespective of case. | ||||
| 460 | */ | ||||
| 461 | static int | ||||
| 462 | isMetaName(const char *name, int length) | ||||
| 463 | { | ||||
| 464 | const char *s; | ||||
| 465 | if (length < (int)sizeof("META-INF/") - 1) | ||||
| 466 | return 0; | ||||
| 467 | for (s = "META-INF/"; *s != '\0'; s++) { | ||||
| 468 | char c = *name++; | ||||
| 469 | // Avoid toupper; it's locale-dependent | ||||
| 470 | if (c >= 'a' && c <= 'z') c += 'A' - 'a'; | ||||
| 471 | if (*s != c) | ||||
| 472 | return 0; | ||||
| 473 | } | ||||
| 474 | return 1; | ||||
| 475 | } | ||||
| 476 | |||||
| 477 | /* | ||||
| 478 | * Increases the capacity of zip->metanames. | ||||
| 479 | * Returns non-zero in case of allocation error. | ||||
| 480 | */ | ||||
| 481 | static int | ||||
| 482 | growMetaNames(jzfile *zip) | ||||
| 483 | { | ||||
| 484 | jint i; | ||||
| 485 | /* double the meta names array */ | ||||
| 486 | const jint new_metacount = zip->metacount << 1; | ||||
| 487 | zip->metanames = | ||||
| 488 | realloc(zip->metanames, new_metacount * sizeof(zip->metanames[0])); | ||||
| 489 | if (zip->metanames == NULL((void*)0)) return -1; | ||||
| 490 | for (i = zip->metacount; i < new_metacount; i++) | ||||
| 491 | zip->metanames[i] = NULL((void*)0); | ||||
| 492 | zip->metacurrent = zip->metacount; | ||||
| 493 | zip->metacount = new_metacount; | ||||
| 494 | return 0; | ||||
| 495 | } | ||||
| 496 | |||||
| 497 | /* | ||||
| 498 | * Adds name to zip->metanames. | ||||
| 499 | * Returns non-zero in case of allocation error. | ||||
| 500 | */ | ||||
| 501 | static int | ||||
| 502 | addMetaName(jzfile *zip, const char *name, int length) | ||||
| 503 | { | ||||
| 504 | jint i; | ||||
| 505 | if (zip->metanames == NULL((void*)0)) { | ||||
| 506 | zip->metacount = INITIAL_META_COUNT; | ||||
| 507 | zip->metanames = calloc(zip->metacount, sizeof(zip->metanames[0])); | ||||
| 508 | if (zip->metanames == NULL((void*)0)) return -1; | ||||
| 509 | zip->metacurrent = 0; | ||||
| 510 | } | ||||
| 511 | |||||
| 512 | i = zip->metacurrent; | ||||
| 513 | |||||
| 514 | /* current meta name array isn't full yet. */ | ||||
| 515 | if (i < zip->metacount) { | ||||
| 516 | zip->metanames[i] = (char *) malloc(length+1); | ||||
| 517 | if (zip->metanames[i] == NULL((void*)0)) return -1; | ||||
| 518 | memcpy(zip->metanames[i], name, length); | ||||
| 519 | zip->metanames[i][length] = '\0'; | ||||
| 520 | zip->metacurrent++; | ||||
| 521 | return 0; | ||||
| 522 | } | ||||
| 523 | |||||
| 524 | /* No free entries in zip->metanames? */ | ||||
| 525 | if (growMetaNames(zip) != 0) return -1; | ||||
| 526 | return addMetaName(zip, name, length); | ||||
| 527 | } | ||||
| 528 | |||||
| 529 | static void | ||||
| 530 | freeMetaNames(jzfile *zip) | ||||
| 531 | { | ||||
| 532 | if (zip->metanames) { | ||||
| 533 | jint i; | ||||
| 534 | for (i = 0; i < zip->metacount; i++) | ||||
| 535 | free(zip->metanames[i]); | ||||
| 536 | free(zip->metanames); | ||||
| 537 | zip->metanames = NULL((void*)0); | ||||
| 538 | } | ||||
| 539 | } | ||||
| 540 | |||||
| 541 | /* Free Zip data allocated by readCEN() */ | ||||
| 542 | static void | ||||
| 543 | freeCEN(jzfile *zip) | ||||
| 544 | { | ||||
| 545 | free(zip->entries); zip->entries = NULL((void*)0); | ||||
| 546 | free(zip->table); zip->table = NULL((void*)0); | ||||
| 547 | freeMetaNames(zip); | ||||
| 548 | } | ||||
| 549 | |||||
| 550 | /* | ||||
| 551 | * Counts the number of CEN headers in a central directory extending | ||||
| 552 | * from BEG to END. Might return a bogus answer if the zip file is | ||||
| 553 | * corrupt, but will not crash. | ||||
| 554 | */ | ||||
| 555 | static jint | ||||
| 556 | countCENHeaders(unsigned char *beg, unsigned char *end) | ||||
| 557 | { | ||||
| 558 | jint count = 0; | ||||
| 559 | ptrdiff_t i; | ||||
| 560 | for (i = 0; i + CENHDR46 <= end - beg; i += CENSIZE(beg + i)(46 + ((((unsigned char *)(beg + i))[28]) | ((((unsigned char *)(beg + i))[28 +1]) << 8)) + ((((unsigned char *)(beg + i))[30]) | ((((unsigned char *)(beg + i))[30 +1]) << 8)) + ((((unsigned char *)(beg + i))[32]) | ((((unsigned char *)(beg + i))[32 +1]) << 8)))) | ||||
| 561 | count++; | ||||
| 562 | return count; | ||||
| 563 | } | ||||
| 564 | |||||
| 565 | #define ZIP_FORMAT_ERROR(message)if (1) { zip->msg = message; goto Catch; } else ((void)0) \ | ||||
| 566 | if (1) { zip->msg = message; goto Catch; } else ((void)0) | ||||
| 567 | |||||
| 568 | /* | ||||
| 569 | * Reads zip file central directory. Returns the file position of first | ||||
| 570 | * CEN header, otherwise returns -1 if an error occurred. If zip->msg != NULL | ||||
| 571 | * then the error was a zip format error and zip->msg has the error text. | ||||
| 572 | * Always pass in -1 for knownTotal; it's used for a recursive call. | ||||
| 573 | */ | ||||
| 574 | static jlong | ||||
| 575 | readCEN(jzfile *zip, jint knownTotal) | ||||
| 576 | { | ||||
| 577 | /* Following are unsigned 32-bit */ | ||||
| 578 | jlong endpos, end64pos, cenpos, cenlen, cenoff; | ||||
| 579 | /* Following are unsigned 16-bit */ | ||||
| 580 | jint total, tablelen, i, j; | ||||
| 581 | unsigned char *cenbuf = NULL((void*)0); | ||||
| 582 | unsigned char *cenend; | ||||
| 583 | unsigned char *cp; | ||||
| 584 | #ifdef USE_MMAP1 | ||||
| 585 | static jlong pagesize; | ||||
| 586 | jlong offset; | ||||
| 587 | #endif | ||||
| 588 | unsigned char endbuf[ENDHDR22]; | ||||
| 589 | jint endhdrlen = ENDHDR22; | ||||
| 590 | jzcell *entries; | ||||
| 591 | jint *table; | ||||
| 592 | |||||
| 593 | /* Clear previous zip error */ | ||||
| 594 | zip->msg = NULL((void*)0); | ||||
| 595 | /* Get position of END header */ | ||||
| 596 | if ((endpos = findEND(zip, endbuf)) == -1) | ||||
| 597 | return -1; /* no END header or system error */ | ||||
| 598 | |||||
| 599 | if (endpos == 0) return 0; /* only END header present */ | ||||
| 600 | |||||
| 601 | freeCEN(zip); | ||||
| 602 | /* Get position and length of central directory */ | ||||
| 603 | cenlen = ENDSIZ(endbuf)((((((unsigned char *)(endbuf))[12]) | ((((unsigned char *)(endbuf ))[12 +1]) << 8)) | (((((unsigned char *)(endbuf))[12 + 2]) | ((((unsigned char *)(endbuf))[12 +2 +1]) << 8)) << 16)) &0xffffffffUL); | ||||
| 604 | cenoff = ENDOFF(endbuf)((((((unsigned char *)(endbuf))[16]) | ((((unsigned char *)(endbuf ))[16 +1]) << 8)) | (((((unsigned char *)(endbuf))[16 + 2]) | ((((unsigned char *)(endbuf))[16 +2 +1]) << 8)) << 16)) &0xffffffffUL); | ||||
| 605 | total = ENDTOT(endbuf)((((unsigned char *)(endbuf))[10]) | ((((unsigned char *)(endbuf ))[10 +1]) << 8)); | ||||
| 606 | if (cenlen == ZIP64_MAGICVAL0xffffffffLL || cenoff == ZIP64_MAGICVAL0xffffffffLL || | ||||
| 607 | total == ZIP64_MAGICCOUNT0xffff) { | ||||
| 608 | unsigned char end64buf[ZIP64_ENDHDR56]; | ||||
| 609 | if ((end64pos = findEND64(zip, end64buf, endpos)) != -1) { | ||||
| 610 | cenlen = ZIP64_ENDSIZ(end64buf)(((jlong)((((((unsigned char *)(end64buf))[40]) | ((((unsigned char *)(end64buf))[40 +1]) << 8)) | (((((unsigned char *)(end64buf))[40 +2]) | ((((unsigned char *)(end64buf))[40 + 2 +1]) << 8)) << 16)) &0xffffffffUL)) | (((jlong )((((((unsigned char *)(end64buf))[40 +4]) | ((((unsigned char *)(end64buf))[40 +4 +1]) << 8)) | (((((unsigned char * )(end64buf))[40 +4 +2]) | ((((unsigned char *)(end64buf))[40 + 4 +2 +1]) << 8)) << 16)) &0xffffffffUL)) << 32)); | ||||
| 611 | cenoff = ZIP64_ENDOFF(end64buf)(((jlong)((((((unsigned char *)(end64buf))[48]) | ((((unsigned char *)(end64buf))[48 +1]) << 8)) | (((((unsigned char *)(end64buf))[48 +2]) | ((((unsigned char *)(end64buf))[48 + 2 +1]) << 8)) << 16)) &0xffffffffUL)) | (((jlong )((((((unsigned char *)(end64buf))[48 +4]) | ((((unsigned char *)(end64buf))[48 +4 +1]) << 8)) | (((((unsigned char * )(end64buf))[48 +4 +2]) | ((((unsigned char *)(end64buf))[48 + 4 +2 +1]) << 8)) << 16)) &0xffffffffUL)) << 32)); | ||||
| 612 | total = (jint)ZIP64_ENDTOT(end64buf)(((jlong)((((((unsigned char *)(end64buf))[32]) | ((((unsigned char *)(end64buf))[32 +1]) << 8)) | (((((unsigned char *)(end64buf))[32 +2]) | ((((unsigned char *)(end64buf))[32 + 2 +1]) << 8)) << 16)) &0xffffffffUL)) | (((jlong )((((((unsigned char *)(end64buf))[32 +4]) | ((((unsigned char *)(end64buf))[32 +4 +1]) << 8)) | (((((unsigned char * )(end64buf))[32 +4 +2]) | ((((unsigned char *)(end64buf))[32 + 4 +2 +1]) << 8)) << 16)) &0xffffffffUL)) << 32)); | ||||
| 613 | endpos = end64pos; | ||||
| 614 | endhdrlen = ZIP64_ENDHDR56; | ||||
| 615 | } | ||||
| 616 | } | ||||
| 617 | |||||
| 618 | if (cenlen > endpos) { | ||||
| 619 | ZIP_FORMAT_ERROR("invalid END header (bad central directory size)")if (1) { zip->msg = "invalid END header (bad central directory size)" ; goto Catch; } else ((void)0); | ||||
| 620 | } | ||||
| 621 | cenpos = endpos - cenlen; | ||||
| 622 | |||||
| 623 | /* Get position of first local file (LOC) header, taking into | ||||
| 624 | * account that there may be a stub prefixed to the zip file. */ | ||||
| 625 | zip->locpos = cenpos - cenoff; | ||||
| 626 | if (zip->locpos < 0) { | ||||
| 627 | ZIP_FORMAT_ERROR("invalid END header (bad central directory offset)")if (1) { zip->msg = "invalid END header (bad central directory offset)" ; goto Catch; } else ((void)0); | ||||
| 628 | } | ||||
| 629 | #ifdef USE_MMAP1 | ||||
| 630 | if (zip->usemmap) { | ||||
| 631 | /* On Solaris & Linux prior to JDK 6, we used to mmap the whole jar file to | ||||
| 632 | * read the jar file contents. However, this greatly increased the perceived | ||||
| 633 | * footprint numbers because the mmap'ed pages were adding into the totals shown | ||||
| 634 | * by 'ps' and 'top'. We switched to mmaping only the central directory of jar | ||||
| 635 | * file while calling 'read' to read the rest of jar file. Here are a list of | ||||
| 636 | * reasons apart from above of why we are doing so: | ||||
| 637 | * 1. Greatly reduces mmap overhead after startup complete; | ||||
| 638 | * 2. Avoids dual path code maintainance; | ||||
| 639 | * 3. Greatly reduces risk of address space (not virtual memory) exhaustion. | ||||
| 640 | */ | ||||
| 641 | if (pagesize == 0) { | ||||
| 642 | pagesize = (jlong)sysconf(_SC_PAGESIZE_SC_PAGESIZE); | ||||
| 643 | if (pagesize == 0) goto Catch; | ||||
| 644 | } | ||||
| 645 | if (cenpos > pagesize) { | ||||
| 646 | offset = cenpos & ~(pagesize - 1); | ||||
| 647 | } else { | ||||
| 648 | offset = 0; | ||||
| 649 | } | ||||
| 650 | /* When we are not calling recursively, knownTotal is -1. */ | ||||
| 651 | if (knownTotal == -1) { | ||||
| 652 | void* mappedAddr; | ||||
| 653 | /* Mmap the CEN and END part only. We have to figure | ||||
| 654 | out the page size in order to make offset to be multiples of | ||||
| 655 | page size. | ||||
| 656 | */ | ||||
| 657 | zip->mlen = cenpos - offset + cenlen + endhdrlen; | ||||
| 658 | zip->offset = offset; | ||||
| 659 | mappedAddr = mmap64(0, zip->mlen, PROT_READ0x1, MAP_SHARED0x01, zip->zfd, (off64_t) offset); | ||||
| 660 | zip->maddr = (mappedAddr == (void*) MAP_FAILED((void *) -1)) ? NULL((void*)0) : | ||||
| 661 | (unsigned char*)mappedAddr; | ||||
| 662 | |||||
| 663 | if (zip->maddr == NULL((void*)0)) { | ||||
| 664 | jio_fprintf(stderrstderr, "mmap failed for CEN and END part of zip file\n"); | ||||
| 665 | goto Catch; | ||||
| 666 | } | ||||
| 667 | } | ||||
| 668 | cenbuf = zip->maddr + cenpos - offset; | ||||
| 669 | } else | ||||
| 670 | #endif | ||||
| 671 | { | ||||
| 672 | if ((cenbuf = malloc((size_t) cenlen)) == NULL((void*)0) || | ||||
| 673 | (readFullyAt(zip->zfd, cenbuf, cenlen, cenpos) == -1)) | ||||
| 674 | goto Catch; | ||||
| 675 | } | ||||
| 676 | |||||
| 677 | cenend = cenbuf + cenlen; | ||||
| 678 | |||||
| 679 | /* Initialize zip file data structures based on the total number | ||||
| 680 | * of central directory entries as stored in ENDTOT. Since this | ||||
| 681 | * is a 2-byte field, but we (and other zip implementations) | ||||
| 682 | * support approx. 2**31 entries, we do not trust ENDTOT, but | ||||
| 683 | * treat it only as a strong hint. When we call ourselves | ||||
| 684 | * recursively, knownTotal will have the "true" value. | ||||
| 685 | * | ||||
| 686 | * Keep this path alive even with the Zip64 END support added, just | ||||
| 687 | * for zip files that have more than 0xffff entries but don't have | ||||
| 688 | * the Zip64 enabled. | ||||
| 689 | */ | ||||
| 690 | total = (knownTotal != -1) ? knownTotal : total; | ||||
| 691 | entries = zip->entries = calloc(total, sizeof(entries[0])); | ||||
| 692 | tablelen = zip->tablelen = ((total/2) | 1); // Odd -> fewer collisions | ||||
| 693 | table = zip->table = malloc(tablelen * sizeof(table[0])); | ||||
| 694 | /* According to ISO C it is perfectly legal for malloc to return zero | ||||
| 695 | * if called with a zero argument. We check this for 'entries' but not | ||||
| 696 | * for 'table' because 'tablelen' can't be zero (see computation above). */ | ||||
| 697 | if ((entries == NULL((void*)0) && total != 0) || table == NULL((void*)0)) goto Catch; | ||||
| 698 | for (j = 0; j < tablelen; j++) | ||||
| 699 | table[j] = ZIP_ENDCHAIN((jint)-1); | ||||
| 700 | |||||
| 701 | /* Iterate through the entries in the central directory */ | ||||
| 702 | for (i = 0, cp = cenbuf; cp <= cenend - CENHDR46; i++, cp += CENSIZE(cp)(46 + ((((unsigned char *)(cp))[28]) | ((((unsigned char *)(cp ))[28 +1]) << 8)) + ((((unsigned char *)(cp))[30]) | (( ((unsigned char *)(cp))[30 +1]) << 8)) + ((((unsigned char *)(cp))[32]) | ((((unsigned char *)(cp))[32 +1]) << 8) ))) { | ||||
| 703 | /* Following are unsigned 16-bit */ | ||||
| 704 | jint method, nlen; | ||||
| 705 | unsigned int hsh; | ||||
| 706 | |||||
| 707 | if (i >= total) { | ||||
| 708 | /* This will only happen if the zip file has an incorrect | ||||
| 709 | * ENDTOT field, which usually means it contains more than | ||||
| 710 | * 65535 entries. */ | ||||
| 711 | cenpos = readCEN(zip, countCENHeaders(cenbuf, cenend)); | ||||
| 712 | goto Finally; | ||||
| 713 | } | ||||
| 714 | |||||
| 715 | method = CENHOW(cp)((((unsigned char *)(cp))[10]) | ((((unsigned char *)(cp))[10 +1]) << 8)); | ||||
| 716 | nlen = CENNAM(cp)((((unsigned char *)(cp))[28]) | ((((unsigned char *)(cp))[28 +1]) << 8)); | ||||
| 717 | |||||
| 718 | if (!CENSIG_AT(cp)(((cp)[0] == 'P') & ((cp)[1] == 'K') & ((cp)[2] == 1) & ((cp)[3] == 2))) { | ||||
| 719 | ZIP_FORMAT_ERROR("invalid CEN header (bad signature)")if (1) { zip->msg = "invalid CEN header (bad signature)"; goto Catch; } else ((void)0); | ||||
| 720 | } | ||||
| 721 | if (CENFLG(cp)((((unsigned char *)(cp))[8]) | ((((unsigned char *)(cp))[8 + 1]) << 8)) & 1) { | ||||
| 722 | ZIP_FORMAT_ERROR("invalid CEN header (encrypted entry)")if (1) { zip->msg = "invalid CEN header (encrypted entry)" ; goto Catch; } else ((void)0); | ||||
| 723 | } | ||||
| 724 | if (method != STORED0 && method != DEFLATED8) { | ||||
| 725 | ZIP_FORMAT_ERROR("invalid CEN header (bad compression method)")if (1) { zip->msg = "invalid CEN header (bad compression method)" ; goto Catch; } else ((void)0); | ||||
| 726 | } | ||||
| 727 | if (cp + CENHDR46 + nlen > cenend) { | ||||
| 728 | ZIP_FORMAT_ERROR("invalid CEN header (bad header size)")if (1) { zip->msg = "invalid CEN header (bad header size)" ; goto Catch; } else ((void)0); | ||||
| 729 | } | ||||
| 730 | /* if the entry is metadata add it to our metadata names */ | ||||
| 731 | if (isMetaName((char *)cp+CENHDR46, nlen)) | ||||
| 732 | if (addMetaName(zip, (char *)cp+CENHDR46, nlen) != 0) | ||||
| 733 | goto Catch; | ||||
| 734 | |||||
| 735 | /* Record the CEN offset and the name hash in our hash cell. */ | ||||
| 736 | entries[i].cenpos = cenpos + (cp - cenbuf); | ||||
| 737 | entries[i].hash = hashN((char *)cp+CENHDR46, nlen); | ||||
| 738 | |||||
| 739 | /* Add the entry to the hash table */ | ||||
| 740 | hsh = entries[i].hash % tablelen; | ||||
| 741 | entries[i].next = table[hsh]; | ||||
| 742 | table[hsh] = i; | ||||
| 743 | } | ||||
| 744 | if (cp != cenend) { | ||||
| 745 | ZIP_FORMAT_ERROR("invalid CEN header (bad header size)")if (1) { zip->msg = "invalid CEN header (bad header size)" ; goto Catch; } else ((void)0); | ||||
| 746 | } | ||||
| 747 | zip->total = i; | ||||
| 748 | goto Finally; | ||||
| 749 | |||||
| 750 | Catch: | ||||
| 751 | freeCEN(zip); | ||||
| 752 | cenpos = -1; | ||||
| 753 | |||||
| 754 | Finally: | ||||
| 755 | #ifdef USE_MMAP1 | ||||
| 756 | if (!zip->usemmap) | ||||
| 757 | #endif | ||||
| 758 | free(cenbuf); | ||||
| 759 | |||||
| 760 | return cenpos; | ||||
| |||||
| 761 | } | ||||
| 762 | |||||
| 763 | /* | ||||
| 764 | * Opens a zip file with the specified mode. Returns the jzfile object | ||||
| 765 | * or NULL if an error occurred. If a zip error occurred then *pmsg will | ||||
| 766 | * be set to the error message text if pmsg != 0. Otherwise, *pmsg will be | ||||
| 767 | * set to NULL. Caller is responsible to free the error message. | ||||
| 768 | */ | ||||
| 769 | jzfile * | ||||
| 770 | ZIP_Open_Generic(const char *name, char **pmsg, int mode, jlong lastModified) | ||||
| 771 | { | ||||
| 772 | jzfile *zip = NULL((void*)0); | ||||
| 773 | |||||
| 774 | /* Clear zip error message */ | ||||
| 775 | if (pmsg != NULL((void*)0)) { | ||||
| 776 | *pmsg = NULL((void*)0); | ||||
| 777 | } | ||||
| 778 | |||||
| 779 | zip = ZIP_Get_From_Cache(name, pmsg, lastModified); | ||||
| 780 | |||||
| 781 | if (zip
| ||||
| 782 | ZFILEint zfd = ZFILE_Open(name, mode); | ||||
| 783 | zip = ZIP_Put_In_Cache(name, zfd, pmsg, lastModified); | ||||
| 784 | } | ||||
| 785 | return zip; | ||||
| 786 | } | ||||
| 787 | |||||
| 788 | /* | ||||
| 789 | * Returns the jzfile corresponding to the given file name from the cache of | ||||
| 790 | * zip files, or NULL if the file is not in the cache. If the name is longer | ||||
| 791 | * than PATH_MAX or a zip error occurred then *pmsg will be set to the error | ||||
| 792 | * message text if pmsg != 0. Otherwise, *pmsg will be set to NULL. Caller | ||||
| 793 | * is responsible to free the error message. | ||||
| 794 | */ | ||||
| 795 | jzfile * | ||||
| 796 | ZIP_Get_From_Cache(const char *name, char **pmsg, jlong lastModified) | ||||
| 797 | { | ||||
| 798 | char buf[PATH_MAX4096]; | ||||
| 799 | jzfile *zip; | ||||
| 800 | |||||
| 801 | if (InitializeZip()) { | ||||
| 802 | return NULL((void*)0); | ||||
| 803 | } | ||||
| 804 | |||||
| 805 | /* Clear zip error message */ | ||||
| 806 | if (pmsg != 0) { | ||||
| 807 | *pmsg = NULL((void*)0); | ||||
| 808 | } | ||||
| 809 | |||||
| 810 | if (strlen(name) >= PATH_MAX4096) { | ||||
| 811 | if (pmsg) { | ||||
| 812 | *pmsg = strdup("zip file name too long"); | ||||
| 813 | } | ||||
| 814 | return NULL((void*)0); | ||||
| 815 | } | ||||
| 816 | strcpy(buf, name); | ||||
| 817 | JVM_NativePath(buf); | ||||
| 818 | name = buf; | ||||
| 819 | |||||
| 820 | MLOCK(zfiles_lock)JVM_RawMonitorEnter(zfiles_lock); | ||||
| 821 | for (zip = zfiles; zip != NULL((void*)0); zip = zip->next) { | ||||
| 822 | if (strcmp(name, zip->name) == 0 | ||||
| 823 | && (zip->lastModified == lastModified || zip->lastModified == 0) | ||||
| 824 | && zip->refs < MAXREFS0xFFFF) { | ||||
| 825 | zip->refs++; | ||||
| 826 | break; | ||||
| 827 | } | ||||
| 828 | } | ||||
| 829 | MUNLOCK(zfiles_lock)JVM_RawMonitorExit(zfiles_lock); | ||||
| 830 | return zip; | ||||
| 831 | } | ||||
| 832 | |||||
| 833 | /* | ||||
| 834 | * Reads data from the given file descriptor to create a jzfile, puts the | ||||
| 835 | * jzfile in a cache, and returns that jzfile. Returns NULL in case of error. | ||||
| 836 | * If a zip error occurs, then *pmsg will be set to the error message text if | ||||
| 837 | * pmsg != 0. Otherwise, *pmsg will be set to NULL. Caller is responsible to | ||||
| 838 | * free the error message. | ||||
| 839 | */ | ||||
| 840 | |||||
| 841 | jzfile * | ||||
| 842 | ZIP_Put_In_Cache(const char *name, ZFILEint zfd, char **pmsg, jlong lastModified) | ||||
| 843 | { | ||||
| 844 | return ZIP_Put_In_Cache0(name, zfd, pmsg, lastModified, JNI_TRUE1); | ||||
| 845 | } | ||||
| 846 | |||||
| 847 | jzfile * | ||||
| 848 | ZIP_Put_In_Cache0(const char *name, ZFILEint zfd, char **pmsg, jlong lastModified, | ||||
| 849 | jboolean usemmap) | ||||
| 850 | { | ||||
| 851 | char errbuf[256]; | ||||
| 852 | jlong len; | ||||
| 853 | jzfile *zip; | ||||
| 854 | |||||
| 855 | if ((zip = allocZip(name)) == NULL((void*)0)) { | ||||
| 856 | return NULL((void*)0); | ||||
| 857 | } | ||||
| 858 | |||||
| 859 | #ifdef USE_MMAP1 | ||||
| 860 | zip->usemmap = usemmap; | ||||
| 861 | #endif | ||||
| 862 | zip->refs = 1; | ||||
| 863 | zip->lastModified = lastModified; | ||||
| 864 | |||||
| 865 | if (zfd == -1) { | ||||
| 866 | if (pmsg && getLastErrorString(errbuf, sizeof(errbuf)) > 0) | ||||
| 867 | *pmsg = strdup(errbuf); | ||||
| 868 | freeZip(zip); | ||||
| 869 | return NULL((void*)0); | ||||
| 870 | } | ||||
| 871 | |||||
| 872 | // Assumption, zfd refers to start of file. Trivially, reuse errbuf. | ||||
| 873 | if (readFully(zfd, errbuf, 4) != -1) { // errors will be handled later | ||||
| 874 | zip->locsig = LOCSIG_AT(errbuf)(((errbuf)[0] == 'P') & ((errbuf)[1] == 'K') & ((errbuf )[2] == 3) & ((errbuf)[3] == 4)) ? JNI_TRUE1 : JNI_FALSE0; | ||||
| 875 | } | ||||
| 876 | |||||
| 877 | len = zip->len = IO_Lseeklseek64(zfd, 0, SEEK_END2); | ||||
| 878 | if (len <= 0) { | ||||
| 879 | if (len == 0) { /* zip file is empty */ | ||||
| 880 | if (pmsg) { | ||||
| 881 | *pmsg = strdup("zip file is empty"); | ||||
| 882 | } | ||||
| 883 | } else { /* error */ | ||||
| 884 | if (pmsg && getLastErrorString(errbuf, sizeof(errbuf)) > 0) | ||||
| 885 | *pmsg = strdup(errbuf); | ||||
| 886 | } | ||||
| 887 | ZFILE_Close(zfd); | ||||
| 888 | freeZip(zip); | ||||
| 889 | return NULL((void*)0); | ||||
| 890 | } | ||||
| 891 | |||||
| 892 | zip->zfd = zfd; | ||||
| 893 | if (readCEN(zip, -1) < 0) { | ||||
| 894 | /* An error occurred while trying to read the zip file */ | ||||
| 895 | if (pmsg != 0) { | ||||
| 896 | /* Set the zip error message */ | ||||
| 897 | if (zip->msg != NULL((void*)0)) | ||||
| 898 | *pmsg = strdup(zip->msg); | ||||
| 899 | } | ||||
| 900 | freeZip(zip); | ||||
| 901 | return NULL((void*)0); | ||||
| 902 | } | ||||
| 903 | MLOCK(zfiles_lock)JVM_RawMonitorEnter(zfiles_lock); | ||||
| 904 | zip->next = zfiles; | ||||
| 905 | zfiles = zip; | ||||
| 906 | MUNLOCK(zfiles_lock)JVM_RawMonitorExit(zfiles_lock); | ||||
| 907 | |||||
| 908 | return zip; | ||||
| 909 | } | ||||
| 910 | |||||
| 911 | /* | ||||
| 912 | * Opens a zip file for reading. Returns the jzfile object or NULL | ||||
| 913 | * if an error occurred. If a zip error occurred then *msg will be | ||||
| 914 | * set to the error message text if msg != 0. Otherwise, *msg will be | ||||
| 915 | * set to NULL. Caller doesn't need to free the error message. | ||||
| 916 | */ | ||||
| 917 | JNIEXPORT__attribute__((visibility("default"))) jzfile * | ||||
| 918 | ZIP_Open(const char *name, char **pmsg) | ||||
| 919 | { | ||||
| 920 | jzfile *file = ZIP_Open_Generic(name, pmsg, O_RDONLY00, 0); | ||||
| |||||
| 921 | if (file == NULL((void*)0) && pmsg != NULL((void*)0) && *pmsg != NULL((void*)0)) { | ||||
| 922 | free(*pmsg); | ||||
| 923 | *pmsg = "Zip file open error"; | ||||
| 924 | } | ||||
| 925 | return file; | ||||
| 926 | } | ||||
| 927 | |||||
| 928 | /* | ||||
| 929 | * Closes the specified zip file object. | ||||
| 930 | */ | ||||
| 931 | JNIEXPORT__attribute__((visibility("default"))) void | ||||
| 932 | ZIP_Close(jzfile *zip) | ||||
| 933 | { | ||||
| 934 | MLOCK(zfiles_lock)JVM_RawMonitorEnter(zfiles_lock); | ||||
| 935 | if (--zip->refs > 0) { | ||||
| 936 | /* Still more references so just return */ | ||||
| 937 | MUNLOCK(zfiles_lock)JVM_RawMonitorExit(zfiles_lock); | ||||
| 938 | return; | ||||
| 939 | } | ||||
| 940 | /* No other references so close the file and remove from list */ | ||||
| 941 | if (zfiles == zip) { | ||||
| 942 | zfiles = zfiles->next; | ||||
| 943 | } else { | ||||
| 944 | jzfile *zp; | ||||
| 945 | for (zp = zfiles; zp->next != 0; zp = zp->next) { | ||||
| 946 | if (zp->next == zip) { | ||||
| 947 | zp->next = zip->next; | ||||
| 948 | break; | ||||
| 949 | } | ||||
| 950 | } | ||||
| 951 | } | ||||
| 952 | MUNLOCK(zfiles_lock)JVM_RawMonitorExit(zfiles_lock); | ||||
| 953 | freeZip(zip); | ||||
| 954 | return; | ||||
| 955 | } | ||||
| 956 | |||||
| 957 | /* Empirically, most CEN headers are smaller than this. */ | ||||
| 958 | #define AMPLE_CEN_HEADER_SIZE160 160 | ||||
| 959 | |||||
| 960 | /* A good buffer size when we want to read CEN headers sequentially. */ | ||||
| 961 | #define CENCACHE_PAGESIZE8192 8192 | ||||
| 962 | |||||
| 963 | static char * | ||||
| 964 | readCENHeader(jzfile *zip, jlong cenpos, jint bufsize) | ||||
| 965 | { | ||||
| 966 | jint censize; | ||||
| 967 | ZFILEint zfd = zip->zfd; | ||||
| 968 | char *cen; | ||||
| 969 | if (bufsize > zip->len - cenpos) | ||||
| 970 | bufsize = (jint)(zip->len - cenpos); | ||||
| 971 | if ((cen = malloc(bufsize)) == NULL((void*)0)) goto Catch; | ||||
| 972 | if (readFullyAt(zfd, cen, bufsize, cenpos) == -1) goto Catch; | ||||
| 973 | censize = CENSIZE(cen)(46 + ((((unsigned char *)(cen))[28]) | ((((unsigned char *)( cen))[28 +1]) << 8)) + ((((unsigned char *)(cen))[30]) | ((((unsigned char *)(cen))[30 +1]) << 8)) + ((((unsigned char *)(cen))[32]) | ((((unsigned char *)(cen))[32 +1]) << 8))); | ||||
| 974 | if (censize <= bufsize) return cen; | ||||
| 975 | if ((cen = realloc(cen, censize)) == NULL((void*)0)) goto Catch; | ||||
| 976 | if (readFully(zfd, cen+bufsize, censize-bufsize) == -1) goto Catch; | ||||
| 977 | return cen; | ||||
| 978 | |||||
| 979 | Catch: | ||||
| 980 | free(cen); | ||||
| 981 | return NULL((void*)0); | ||||
| 982 | } | ||||
| 983 | |||||
| 984 | static char * | ||||
| 985 | sequentialAccessReadCENHeader(jzfile *zip, jlong cenpos) | ||||
| 986 | { | ||||
| 987 | cencache *cache = &zip->cencache; | ||||
| 988 | char *cen; | ||||
| 989 | if (cache->data != NULL((void*)0) | ||||
| 990 | && (cenpos >= cache->pos) | ||||
| 991 | && (cenpos + CENHDR46 <= cache->pos + CENCACHE_PAGESIZE8192)) | ||||
| 992 | { | ||||
| 993 | cen = cache->data + cenpos - cache->pos; | ||||
| 994 | if (cenpos + CENSIZE(cen)(46 + ((((unsigned char *)(cen))[28]) | ((((unsigned char *)( cen))[28 +1]) << 8)) + ((((unsigned char *)(cen))[30]) | ((((unsigned char *)(cen))[30 +1]) << 8)) + ((((unsigned char *)(cen))[32]) | ((((unsigned char *)(cen))[32 +1]) << 8))) <= cache->pos + CENCACHE_PAGESIZE8192) | ||||
| 995 | /* A cache hit */ | ||||
| 996 | return cen; | ||||
| 997 | } | ||||
| 998 | |||||
| 999 | if ((cen = readCENHeader(zip, cenpos, CENCACHE_PAGESIZE8192)) == NULL((void*)0)) | ||||
| 1000 | return NULL((void*)0); | ||||
| 1001 | free(cache->data); | ||||
| 1002 | cache->data = cen; | ||||
| 1003 | cache->pos = cenpos; | ||||
| 1004 | return cen; | ||||
| 1005 | } | ||||
| 1006 | |||||
| 1007 | typedef enum { ACCESS_RANDOM, ACCESS_SEQUENTIAL } AccessHint; | ||||
| 1008 | |||||
| 1009 | /* | ||||
| 1010 | * Return a new initialized jzentry corresponding to a given hash cell. | ||||
| 1011 | * In case of error, returns NULL. | ||||
| 1012 | * We already sanity-checked all the CEN headers for ZIP format errors | ||||
| 1013 | * in readCEN(), so we don't check them again here. | ||||
| 1014 | * The ZIP lock should be held here. | ||||
| 1015 | */ | ||||
| 1016 | static jzentry * | ||||
| 1017 | newEntry(jzfile *zip, jzcell *zc, AccessHint accessHint) | ||||
| 1018 | { | ||||
| 1019 | jlong locoff; | ||||
| 1020 | jint nlen, elen, clen; | ||||
| 1021 | jzentry *ze; | ||||
| 1022 | char *cen; | ||||
| 1023 | |||||
| 1024 | if ((ze = (jzentry *) malloc(sizeof(jzentry))) == NULL((void*)0)) return NULL((void*)0); | ||||
| 1025 | ze->name = NULL((void*)0); | ||||
| 1026 | ze->extra = NULL((void*)0); | ||||
| 1027 | ze->comment = NULL((void*)0); | ||||
| 1028 | |||||
| 1029 | #ifdef USE_MMAP1 | ||||
| 1030 | if (zip->usemmap) { | ||||
| 1031 | cen = (char*) zip->maddr + zc->cenpos - zip->offset; | ||||
| 1032 | } else | ||||
| 1033 | #endif | ||||
| 1034 | { | ||||
| 1035 | if (accessHint == ACCESS_RANDOM) | ||||
| 1036 | cen = readCENHeader(zip, zc->cenpos, AMPLE_CEN_HEADER_SIZE160); | ||||
| 1037 | else | ||||
| 1038 | cen = sequentialAccessReadCENHeader(zip, zc->cenpos); | ||||
| 1039 | if (cen == NULL((void*)0)) goto Catch; | ||||
| 1040 | } | ||||
| 1041 | |||||
| 1042 | nlen = CENNAM(cen)((((unsigned char *)(cen))[28]) | ((((unsigned char *)(cen))[ 28 +1]) << 8)); | ||||
| 1043 | elen = CENEXT(cen)((((unsigned char *)(cen))[30]) | ((((unsigned char *)(cen))[ 30 +1]) << 8)); | ||||
| 1044 | clen = CENCOM(cen)((((unsigned char *)(cen))[32]) | ((((unsigned char *)(cen))[ 32 +1]) << 8)); | ||||
| 1045 | ze->time = CENTIM(cen)((((((unsigned char *)(cen))[12]) | ((((unsigned char *)(cen) )[12 +1]) << 8)) | (((((unsigned char *)(cen))[12 +2]) | ((((unsigned char *)(cen))[12 +2 +1]) << 8)) << 16 )) &0xffffffffUL); | ||||
| 1046 | ze->size = CENLEN(cen)((((((unsigned char *)(cen))[24]) | ((((unsigned char *)(cen) )[24 +1]) << 8)) | (((((unsigned char *)(cen))[24 +2]) | ((((unsigned char *)(cen))[24 +2 +1]) << 8)) << 16 )) &0xffffffffUL); | ||||
| 1047 | ze->csize = (CENHOW(cen)((((unsigned char *)(cen))[10]) | ((((unsigned char *)(cen))[ 10 +1]) << 8)) == STORED0) ? 0 : CENSIZ(cen)((((((unsigned char *)(cen))[20]) | ((((unsigned char *)(cen) )[20 +1]) << 8)) | (((((unsigned char *)(cen))[20 +2]) | ((((unsigned char *)(cen))[20 +2 +1]) << 8)) << 16 )) &0xffffffffUL); | ||||
| 1048 | ze->crc = CENCRC(cen)((((((unsigned char *)(cen))[16]) | ((((unsigned char *)(cen) )[16 +1]) << 8)) | (((((unsigned char *)(cen))[16 +2]) | ((((unsigned char *)(cen))[16 +2 +1]) << 8)) << 16 )) &0xffffffffUL); | ||||
| 1049 | locoff = CENOFF(cen)((((((unsigned char *)(cen))[42]) | ((((unsigned char *)(cen) )[42 +1]) << 8)) | (((((unsigned char *)(cen))[42 +2]) | ((((unsigned char *)(cen))[42 +2 +1]) << 8)) << 16 )) &0xffffffffUL); | ||||
| 1050 | ze->pos = -(zip->locpos + locoff); | ||||
| 1051 | ze->flag = CENFLG(cen)((((unsigned char *)(cen))[8]) | ((((unsigned char *)(cen))[8 +1]) << 8)); | ||||
| 1052 | |||||
| 1053 | if ((ze->name = malloc(nlen + 1)) == NULL((void*)0)) goto Catch; | ||||
| 1054 | memcpy(ze->name, cen + CENHDR46, nlen); | ||||
| 1055 | ze->name[nlen] = '\0'; | ||||
| 1056 | ze->nlen = nlen; | ||||
| 1057 | if (elen > 0) { | ||||
| 1058 | char *extra = cen + CENHDR46 + nlen; | ||||
| 1059 | |||||
| 1060 | /* This entry has "extra" data */ | ||||
| 1061 | if ((ze->extra = malloc(elen + 2)) == NULL((void*)0)) goto Catch; | ||||
| 1062 | ze->extra[0] = (unsigned char) elen; | ||||
| 1063 | ze->extra[1] = (unsigned char) (elen >> 8); | ||||
| 1064 | memcpy(ze->extra+2, extra, elen); | ||||
| 1065 | if (ze->csize == ZIP64_MAGICVAL0xffffffffLL || ze->size == ZIP64_MAGICVAL0xffffffffLL || | ||||
| 1066 | locoff == ZIP64_MAGICVAL0xffffffffLL) { | ||||
| 1067 | jint off = 0; | ||||
| 1068 | while ((off + 4) < elen) { // spec: HeaderID+DataSize+Data | ||||
| 1069 | jint sz = SH(extra, off + 2)((((unsigned char *)(extra))[off + 2]) | ((((unsigned char *) (extra))[off + 2 +1]) << 8)); | ||||
| 1070 | if (SH(extra, off)((((unsigned char *)(extra))[off]) | ((((unsigned char *)(extra ))[off+1]) << 8)) == ZIP64_EXTID1) { | ||||
| 1071 | off += 4; | ||||
| 1072 | if (ze->size == ZIP64_MAGICVAL0xffffffffLL) { | ||||
| 1073 | // if invalid zip64 extra fields, just skip | ||||
| 1074 | if (sz < 8 || (off + 8) > elen) | ||||
| 1075 | break; | ||||
| 1076 | ze->size = LL(extra, off)(((jlong)((((((unsigned char *)(extra))[off]) | ((((unsigned char *)(extra))[off+1]) << 8)) | (((((unsigned char *)(extra ))[off+2]) | ((((unsigned char *)(extra))[off+2 +1]) << 8)) << 16)) &0xffffffffUL)) | (((jlong)((((((unsigned char *)(extra))[off+4]) | ((((unsigned char *)(extra))[off+4 +1]) << 8)) | (((((unsigned char *)(extra))[off+4 +2]) | ((((unsigned char *)(extra))[off+4 +2 +1]) << 8)) << 16)) &0xffffffffUL)) << 32)); | ||||
| 1077 | sz -= 8; | ||||
| 1078 | off += 8; | ||||
| 1079 | } | ||||
| 1080 | if (ze->csize == ZIP64_MAGICVAL0xffffffffLL) { | ||||
| 1081 | if (sz < 8 || (off + 8) > elen) | ||||
| 1082 | break; | ||||
| 1083 | ze->csize = LL(extra, off)(((jlong)((((((unsigned char *)(extra))[off]) | ((((unsigned char *)(extra))[off+1]) << 8)) | (((((unsigned char *)(extra ))[off+2]) | ((((unsigned char *)(extra))[off+2 +1]) << 8)) << 16)) &0xffffffffUL)) | (((jlong)((((((unsigned char *)(extra))[off+4]) | ((((unsigned char *)(extra))[off+4 +1]) << 8)) | (((((unsigned char *)(extra))[off+4 +2]) | ((((unsigned char *)(extra))[off+4 +2 +1]) << 8)) << 16)) &0xffffffffUL)) << 32)); | ||||
| 1084 | sz -= 8; | ||||
| 1085 | off += 8; | ||||
| 1086 | } | ||||
| 1087 | if (locoff == ZIP64_MAGICVAL0xffffffffLL) { | ||||
| 1088 | if (sz < 8 || (off + 8) > elen) | ||||
| 1089 | break; | ||||
| 1090 | ze->pos = -(zip->locpos + LL(extra, off)(((jlong)((((((unsigned char *)(extra))[off]) | ((((unsigned char *)(extra))[off+1]) << 8)) | (((((unsigned char *)(extra ))[off+2]) | ((((unsigned char *)(extra))[off+2 +1]) << 8)) << 16)) &0xffffffffUL)) | (((jlong)((((((unsigned char *)(extra))[off+4]) | ((((unsigned char *)(extra))[off+4 +1]) << 8)) | (((((unsigned char *)(extra))[off+4 +2]) | ((((unsigned char *)(extra))[off+4 +2 +1]) << 8)) << 16)) &0xffffffffUL)) << 32))); | ||||
| 1091 | sz -= 8; | ||||
| 1092 | off += 8; | ||||
| 1093 | } | ||||
| 1094 | break; | ||||
| 1095 | } | ||||
| 1096 | off += (sz + 4); | ||||
| 1097 | } | ||||
| 1098 | } | ||||
| 1099 | } | ||||
| 1100 | |||||
| 1101 | if (clen > 0) { | ||||
| 1102 | /* This entry has a comment */ | ||||
| 1103 | if ((ze->comment = malloc(clen + 1)) == NULL((void*)0)) goto Catch; | ||||
| 1104 | memcpy(ze->comment, cen + CENHDR46 + nlen + elen, clen); | ||||
| 1105 | ze->comment[clen] = '\0'; | ||||
| 1106 | } | ||||
| 1107 | goto Finally; | ||||
| 1108 | |||||
| 1109 | Catch: | ||||
| 1110 | free(ze->name); | ||||
| 1111 | free(ze->extra); | ||||
| 1112 | free(ze->comment); | ||||
| 1113 | free(ze); | ||||
| 1114 | ze = NULL((void*)0); | ||||
| 1115 | |||||
| 1116 | Finally: | ||||
| 1117 | #ifdef USE_MMAP1 | ||||
| 1118 | if (!zip->usemmap) | ||||
| 1119 | #endif | ||||
| 1120 | if (cen != NULL((void*)0) && accessHint == ACCESS_RANDOM) free(cen); | ||||
| 1121 | return ze; | ||||
| 1122 | } | ||||
| 1123 | |||||
| 1124 | /* | ||||
| 1125 | * Free the given jzentry. | ||||
| 1126 | * In fact we maintain a one-entry cache of the most recently used | ||||
| 1127 | * jzentry for each zip. This optimizes a common access pattern. | ||||
| 1128 | */ | ||||
| 1129 | |||||
| 1130 | void | ||||
| 1131 | ZIP_FreeEntry(jzfile *jz, jzentry *ze) | ||||
| 1132 | { | ||||
| 1133 | jzentry *last; | ||||
| 1134 | ZIP_Lock(jz); | ||||
| 1135 | last = jz->cache; | ||||
| 1136 | jz->cache = ze; | ||||
| 1137 | ZIP_Unlock(jz); | ||||
| 1138 | if (last != NULL((void*)0)) { | ||||
| 1139 | /* Free the previously cached jzentry */ | ||||
| 1140 | free(last->name); | ||||
| 1141 | if (last->extra) free(last->extra); | ||||
| 1142 | if (last->comment) free(last->comment); | ||||
| 1143 | free(last); | ||||
| 1144 | } | ||||
| 1145 | } | ||||
| 1146 | |||||
| 1147 | /* | ||||
| 1148 | * Returns the zip entry corresponding to the specified name, or | ||||
| 1149 | * NULL if not found. | ||||
| 1150 | */ | ||||
| 1151 | jzentry * | ||||
| 1152 | ZIP_GetEntry(jzfile *zip, char *name, jint ulen) | ||||
| 1153 | { | ||||
| 1154 | if (ulen == 0) { | ||||
| 1155 | return ZIP_GetEntry2(zip, name, (jint)strlen(name), JNI_FALSE0); | ||||
| 1156 | } | ||||
| 1157 | return ZIP_GetEntry2(zip, name, ulen, JNI_TRUE1); | ||||
| 1158 | } | ||||
| 1159 | |||||
| 1160 | jboolean equals(char* name1, int len1, char* name2, int len2) { | ||||
| 1161 | if (len1 != len2) { | ||||
| 1162 | return JNI_FALSE0; | ||||
| 1163 | } | ||||
| 1164 | while (len1-- > 0) { | ||||
| 1165 | if (*name1++ != *name2++) { | ||||
| 1166 | return JNI_FALSE0; | ||||
| 1167 | } | ||||
| 1168 | } | ||||
| 1169 | return JNI_TRUE1; | ||||
| 1170 | } | ||||
| 1171 | |||||
| 1172 | /* | ||||
| 1173 | * Returns the zip entry corresponding to the specified name, or | ||||
| 1174 | * NULL if not found. | ||||
| 1175 | * This method supports embedded null character in "name", use ulen | ||||
| 1176 | * for the length of "name". | ||||
| 1177 | */ | ||||
| 1178 | jzentry * | ||||
| 1179 | ZIP_GetEntry2(jzfile *zip, char *name, jint ulen, jboolean addSlash) | ||||
| 1180 | { | ||||
| 1181 | unsigned int hsh = hashN(name, ulen); | ||||
| 1182 | jint idx; | ||||
| 1183 | jzentry *ze = 0; | ||||
| 1184 | |||||
| 1185 | ZIP_Lock(zip); | ||||
| 1186 | if (zip->total == 0) { | ||||
| 1187 | goto Finally; | ||||
| 1188 | } | ||||
| 1189 | |||||
| 1190 | idx = zip->table[hsh % zip->tablelen]; | ||||
| 1191 | |||||
| 1192 | /* | ||||
| 1193 | * This while loop is an optimization where a double lookup | ||||
| 1194 | * for name and name+/ is being performed. The name char | ||||
| 1195 | * array has enough room at the end to try again with a | ||||
| 1196 | * slash appended if the first table lookup does not succeed. | ||||
| 1197 | */ | ||||
| 1198 | while(1) { | ||||
| 1199 | |||||
| 1200 | /* Check the cached entry first */ | ||||
| 1201 | ze = zip->cache; | ||||
| 1202 | if (ze && equals(ze->name, ze->nlen, name, ulen)) { | ||||
| 1203 | /* Cache hit! Remove and return the cached entry. */ | ||||
| 1204 | zip->cache = 0; | ||||
| 1205 | ZIP_Unlock(zip); | ||||
| 1206 | return ze; | ||||
| 1207 | } | ||||
| 1208 | ze = 0; | ||||
| 1209 | |||||
| 1210 | /* | ||||
| 1211 | * Search down the target hash chain for a cell whose | ||||
| 1212 | * 32 bit hash matches the hashed name. | ||||
| 1213 | */ | ||||
| 1214 | while (idx != ZIP_ENDCHAIN((jint)-1)) { | ||||
| 1215 | jzcell *zc = &zip->entries[idx]; | ||||
| 1216 | |||||
| 1217 | if (zc->hash == hsh) { | ||||
| 1218 | /* | ||||
| 1219 | * OK, we've found a ZIP entry whose 32 bit hashcode | ||||
| 1220 | * matches the name we're looking for. Try to read | ||||
| 1221 | * its entry information from the CEN. If the CEN | ||||
| 1222 | * name matches the name we're looking for, we're | ||||
| 1223 | * done. | ||||
| 1224 | * If the names don't match (which should be very rare) | ||||
| 1225 | * we keep searching. | ||||
| 1226 | */ | ||||
| 1227 | ze = newEntry(zip, zc, ACCESS_RANDOM); | ||||
| 1228 | if (ze && equals(ze->name, ze->nlen, name, ulen)) { | ||||
| 1229 | break; | ||||
| 1230 | } | ||||
| 1231 | if (ze != 0) { | ||||
| 1232 | /* We need to release the lock across the free call */ | ||||
| 1233 | ZIP_Unlock(zip); | ||||
| 1234 | ZIP_FreeEntry(zip, ze); | ||||
| 1235 | ZIP_Lock(zip); | ||||
| 1236 | } | ||||
| 1237 | ze = 0; | ||||
| 1238 | } | ||||
| 1239 | idx = zc->next; | ||||
| 1240 | } | ||||
| 1241 | |||||
| 1242 | /* Entry found, return it */ | ||||
| 1243 | if (ze != 0) { | ||||
| 1244 | break; | ||||
| 1245 | } | ||||
| 1246 | |||||
| 1247 | /* If no need to try appending slash, we are done */ | ||||
| 1248 | if (!addSlash) { | ||||
| 1249 | break; | ||||
| 1250 | } | ||||
| 1251 | |||||
| 1252 | /* Slash is already there? */ | ||||
| 1253 | if (ulen > 0 && name[ulen - 1] == '/') { | ||||
| 1254 | break; | ||||
| 1255 | } | ||||
| 1256 | |||||
| 1257 | /* Add slash and try once more */ | ||||
| 1258 | name[ulen++] = '/'; | ||||
| 1259 | name[ulen] = '\0'; | ||||
| 1260 | hsh = hash_append(hsh, '/'); | ||||
| 1261 | idx = zip->table[hsh % zip->tablelen]; | ||||
| 1262 | addSlash = JNI_FALSE0; | ||||
| 1263 | } | ||||
| 1264 | |||||
| 1265 | Finally: | ||||
| 1266 | ZIP_Unlock(zip); | ||||
| 1267 | return ze; | ||||
| 1268 | } | ||||
| 1269 | |||||
| 1270 | /* | ||||
| 1271 | * Returns the n'th (starting at zero) zip file entry, or NULL if the | ||||
| 1272 | * specified index was out of range. | ||||
| 1273 | */ | ||||
| 1274 | JNIEXPORT__attribute__((visibility("default"))) jzentry * | ||||
| 1275 | ZIP_GetNextEntry(jzfile *zip, jint n) | ||||
| 1276 | { | ||||
| 1277 | jzentry *result; | ||||
| 1278 | if (n < 0 || n >= zip->total) { | ||||
| 1279 | return 0; | ||||
| 1280 | } | ||||
| 1281 | ZIP_Lock(zip); | ||||
| 1282 | result = newEntry(zip, &zip->entries[n], ACCESS_SEQUENTIAL); | ||||
| 1283 | ZIP_Unlock(zip); | ||||
| 1284 | return result; | ||||
| 1285 | } | ||||
| 1286 | |||||
| 1287 | /* | ||||
| 1288 | * Locks the specified zip file for reading. | ||||
| 1289 | */ | ||||
| 1290 | void | ||||
| 1291 | ZIP_Lock(jzfile *zip) | ||||
| 1292 | { | ||||
| 1293 | MLOCK(zip->lock)JVM_RawMonitorEnter(zip->lock); | ||||
| 1294 | } | ||||
| 1295 | |||||
| 1296 | /* | ||||
| 1297 | * Unlocks the specified zip file. | ||||
| 1298 | */ | ||||
| 1299 | void | ||||
| 1300 | ZIP_Unlock(jzfile *zip) | ||||
| 1301 | { | ||||
| 1302 | MUNLOCK(zip->lock)JVM_RawMonitorExit(zip->lock); | ||||
| 1303 | } | ||||
| 1304 | |||||
| 1305 | /* | ||||
| 1306 | * Returns the offset of the entry data within the zip file. | ||||
| 1307 | * Returns -1 if an error occurred, in which case zip->msg will | ||||
| 1308 | * contain the error text. | ||||
| 1309 | */ | ||||
| 1310 | jlong | ||||
| 1311 | ZIP_GetEntryDataOffset(jzfile *zip, jzentry *entry) | ||||
| 1312 | { | ||||
| 1313 | /* The Zip file spec explicitly allows the LOC extra data size to | ||||
| 1314 | * be different from the CEN extra data size, although the JDK | ||||
| 1315 | * never creates such zip files. Since we cannot trust the CEN | ||||
| 1316 | * extra data size, we need to read the LOC to determine the entry | ||||
| 1317 | * data offset. We do this lazily to avoid touching the virtual | ||||
| 1318 | * memory page containing the LOC when initializing jzentry | ||||
| 1319 | * objects. (This speeds up javac by a factor of 10 when the JDK | ||||
| 1320 | * is installed on a very slow filesystem.) | ||||
| 1321 | */ | ||||
| 1322 | if (entry->pos <= 0) { | ||||
| 1323 | unsigned char loc[LOCHDR30]; | ||||
| 1324 | if (readFullyAt(zip->zfd, loc, LOCHDR30, -(entry->pos)) == -1) { | ||||
| 1325 | zip->msg = "error reading zip file"; | ||||
| 1326 | return -1; | ||||
| 1327 | } | ||||
| 1328 | if (!LOCSIG_AT(loc)(((loc)[0] == 'P') & ((loc)[1] == 'K') & ((loc)[2] == 3) & ((loc)[3] == 4))) { | ||||
| 1329 | zip->msg = "invalid LOC header (bad signature)"; | ||||
| 1330 | return -1; | ||||
| 1331 | } | ||||
| 1332 | entry->pos = (- entry->pos) + LOCHDR30 + LOCNAM(loc)((((unsigned char *)(loc))[26]) | ((((unsigned char *)(loc))[ 26 +1]) << 8)) + LOCEXT(loc)((((unsigned char *)(loc))[28]) | ((((unsigned char *)(loc))[ 28 +1]) << 8)); | ||||
| 1333 | } | ||||
| 1334 | return entry->pos; | ||||
| 1335 | } | ||||
| 1336 | |||||
| 1337 | /* | ||||
| 1338 | * Reads bytes from the specified zip entry. Assumes that the zip | ||||
| 1339 | * file had been previously locked with ZIP_Lock(). Returns the | ||||
| 1340 | * number of bytes read, or -1 if an error occurred. If zip->msg != 0 | ||||
| 1341 | * then a zip error occurred and zip->msg contains the error text. | ||||
| 1342 | * | ||||
| 1343 | * The current implementation does not support reading an entry that | ||||
| 1344 | * has the size bigger than 2**32 bytes in ONE invocation. | ||||
| 1345 | */ | ||||
| 1346 | jint | ||||
| 1347 | ZIP_Read(jzfile *zip, jzentry *entry, jlong pos, void *buf, jint len) | ||||
| 1348 | { | ||||
| 1349 | jlong entry_size; | ||||
| 1350 | jlong start; | ||||
| 1351 | |||||
| 1352 | if (zip == 0) { | ||||
| 1353 | return -1; | ||||
| 1354 | } | ||||
| 1355 | |||||
| 1356 | /* Clear previous zip error */ | ||||
| 1357 | zip->msg = NULL((void*)0); | ||||
| 1358 | |||||
| 1359 | if (entry == 0) { | ||||
| 1360 | zip->msg = "ZIP_Read: jzentry is NULL"; | ||||
| 1361 | return -1; | ||||
| 1362 | } | ||||
| 1363 | |||||
| 1364 | entry_size = (entry->csize != 0) ? entry->csize : entry->size; | ||||
| 1365 | |||||
| 1366 | /* Check specified position */ | ||||
| 1367 | if (pos < 0 || pos > entry_size - 1) { | ||||
| 1368 | zip->msg = "ZIP_Read: specified offset out of range"; | ||||
| 1369 | return -1; | ||||
| 1370 | } | ||||
| 1371 | |||||
| 1372 | /* Check specified length */ | ||||
| 1373 | if (len <= 0) | ||||
| 1374 | return 0; | ||||
| 1375 | if (len > entry_size - pos) | ||||
| 1376 | len = (jint)(entry_size - pos); | ||||
| 1377 | |||||
| 1378 | /* Get file offset to start reading data */ | ||||
| 1379 | start = ZIP_GetEntryDataOffset(zip, entry); | ||||
| 1380 | if (start < 0) | ||||
| 1381 | return -1; | ||||
| 1382 | start += pos; | ||||
| 1383 | |||||
| 1384 | if (start + len > zip->len) { | ||||
| 1385 | zip->msg = "ZIP_Read: corrupt zip file: invalid entry size"; | ||||
| 1386 | return -1; | ||||
| 1387 | } | ||||
| 1388 | |||||
| 1389 | if (readFullyAt(zip->zfd, buf, len, start) == -1) { | ||||
| 1390 | zip->msg = "ZIP_Read: error reading zip file"; | ||||
| 1391 | return -1; | ||||
| 1392 | } | ||||
| 1393 | return len; | ||||
| 1394 | } | ||||
| 1395 | |||||
| 1396 | |||||
| 1397 | /* The maximum size of a stack-allocated buffer. | ||||
| 1398 | */ | ||||
| 1399 | #define BUF_SIZE4096 4096 | ||||
| 1400 | |||||
| 1401 | /* | ||||
| 1402 | * This function is used by the runtime system to load compressed entries | ||||
| 1403 | * from ZIP/JAR files specified in the class path. It is defined here | ||||
| 1404 | * so that it can be dynamically loaded by the runtime if the zip library | ||||
| 1405 | * is found. | ||||
| 1406 | * | ||||
| 1407 | * The current implementation does not support reading an entry that | ||||
| 1408 | * has the size bigger than 2**32 bytes in ONE invocation. | ||||
| 1409 | */ | ||||
| 1410 | jboolean | ||||
| 1411 | InflateFully(jzfile *zip, jzentry *entry, void *buf, char **msg) | ||||
| 1412 | { | ||||
| 1413 | z_stream strm; | ||||
| 1414 | char tmp[BUF_SIZE4096]; | ||||
| 1415 | jlong pos = 0; | ||||
| 1416 | jlong count = entry->csize; | ||||
| 1417 | |||||
| 1418 | *msg = 0; /* Reset error message */ | ||||
| 1419 | |||||
| 1420 | if (count == 0) { | ||||
| 1421 | *msg = "inflateFully: entry not compressed"; | ||||
| 1422 | return JNI_FALSE0; | ||||
| 1423 | } | ||||
| 1424 | |||||
| 1425 | memset(&strm, 0, sizeof(z_stream)); | ||||
| 1426 | if (inflateInit2(&strm, -MAX_WBITS)inflateInit2_((&strm), (-15), "1.2.11", (int)sizeof(z_stream )) != Z_OK0) { | ||||
| 1427 | *msg = strm.msg; | ||||
| 1428 | return JNI_FALSE0; | ||||
| 1429 | } | ||||
| 1430 | |||||
| 1431 | strm.next_out = buf; | ||||
| 1432 | strm.avail_out = (uInt)entry->size; | ||||
| 1433 | |||||
| 1434 | while (count > 0) { | ||||
| 1435 | jint n = count > (jlong)sizeof(tmp) ? (jint)sizeof(tmp) : (jint)count; | ||||
| 1436 | ZIP_Lock(zip); | ||||
| 1437 | n = ZIP_Read(zip, entry, pos, tmp, n); | ||||
| 1438 | ZIP_Unlock(zip); | ||||
| 1439 | if (n <= 0) { | ||||
| 1440 | if (n == 0) { | ||||
| 1441 | *msg = "inflateFully: Unexpected end of file"; | ||||
| 1442 | } | ||||
| 1443 | inflateEnd(&strm); | ||||
| 1444 | return JNI_FALSE0; | ||||
| 1445 | } | ||||
| 1446 | pos += n; | ||||
| 1447 | count -= n; | ||||
| 1448 | strm.next_in = (Bytef *)tmp; | ||||
| 1449 | strm.avail_in = n; | ||||
| 1450 | do { | ||||
| 1451 | switch (inflate(&strm, Z_PARTIAL_FLUSH1)) { | ||||
| 1452 | case Z_OK0: | ||||
| 1453 | break; | ||||
| 1454 | case Z_STREAM_END1: | ||||
| 1455 | if (count != 0 || strm.total_out != (uInt)entry->size) { | ||||
| 1456 | *msg = "inflateFully: Unexpected end of stream"; | ||||
| 1457 | inflateEnd(&strm); | ||||
| 1458 | return JNI_FALSE0; | ||||
| 1459 | } | ||||
| 1460 | break; | ||||
| 1461 | default: | ||||
| 1462 | break; | ||||
| 1463 | } | ||||
| 1464 | } while (strm.avail_in > 0); | ||||
| 1465 | } | ||||
| 1466 | |||||
| 1467 | inflateEnd(&strm); | ||||
| 1468 | return JNI_TRUE1; | ||||
| 1469 | } | ||||
| 1470 | |||||
| 1471 | /* | ||||
| 1472 | * The current implementation does not support reading an entry that | ||||
| 1473 | * has the size bigger than 2**32 bytes in ONE invocation. | ||||
| 1474 | */ | ||||
| 1475 | JNIEXPORT__attribute__((visibility("default"))) jzentry * | ||||
| 1476 | ZIP_FindEntry(jzfile *zip, char *name, jint *sizeP, jint *nameLenP) | ||||
| 1477 | { | ||||
| 1478 | jzentry *entry = ZIP_GetEntry(zip, name, 0); | ||||
| 1479 | if (entry) { | ||||
| 1480 | *sizeP = (jint)entry->size; | ||||
| 1481 | *nameLenP = (jint)strlen(entry->name); | ||||
| 1482 | } | ||||
| 1483 | return entry; | ||||
| 1484 | } | ||||
| 1485 | |||||
| 1486 | /* | ||||
| 1487 | * Reads a zip file entry into the specified byte array | ||||
| 1488 | * When the method completes, it releases the jzentry. | ||||
| 1489 | * Note: this is called from the separately delivered VM (hotspot/classic) | ||||
| 1490 | * so we have to be careful to maintain the expected behaviour. | ||||
| 1491 | */ | ||||
| 1492 | JNIEXPORT__attribute__((visibility("default"))) jboolean | ||||
| 1493 | ZIP_ReadEntry(jzfile *zip, jzentry *entry, unsigned char *buf, char *entryname) | ||||
| 1494 | { | ||||
| 1495 | char *msg; | ||||
| 1496 | char tmpbuf[1024]; | ||||
| 1497 | |||||
| 1498 | if (entry == 0) { | ||||
| 1499 | jio_fprintf(stderrstderr, "jzentry was invalid"); | ||||
| 1500 | return JNI_FALSE0; | ||||
| 1501 | } | ||||
| 1502 | |||||
| 1503 | strcpy(entryname, entry->name); | ||||
| 1504 | if (entry->csize == 0) { | ||||
| 1505 | /* Entry is stored */ | ||||
| 1506 | jlong pos = 0; | ||||
| 1507 | jlong size = entry->size; | ||||
| 1508 | while (pos < size) { | ||||
| 1509 | jint n; | ||||
| 1510 | jlong limit = ((((jlong) 1) << 31) - 1); | ||||
| 1511 | jint count = (size - pos < limit) ? | ||||
| 1512 | /* These casts suppress a VC++ Internal Compiler Error */ | ||||
| 1513 | (jint) (size - pos) : | ||||
| 1514 | (jint) limit; | ||||
| 1515 | ZIP_Lock(zip); | ||||
| 1516 | n = ZIP_Read(zip, entry, pos, buf, count); | ||||
| 1517 | msg = zip->msg; | ||||
| 1518 | ZIP_Unlock(zip); | ||||
| 1519 | if (n == -1) { | ||||
| 1520 | if (msg == 0) { | ||||
| 1521 | getErrorString(errno(*__errno_location ()), tmpbuf, sizeof(tmpbuf)); | ||||
| 1522 | msg = tmpbuf; | ||||
| 1523 | } | ||||
| 1524 | jio_fprintf(stderrstderr, "%s: %s\n", zip->name, msg); | ||||
| 1525 | return JNI_FALSE0; | ||||
| 1526 | } | ||||
| 1527 | buf += n; | ||||
| 1528 | pos += n; | ||||
| 1529 | } | ||||
| 1530 | } else { | ||||
| 1531 | /* Entry is compressed */ | ||||
| 1532 | int ok = InflateFully(zip, entry, buf, &msg); | ||||
| 1533 | if (!ok) { | ||||
| 1534 | if ((msg == NULL((void*)0)) || (*msg == 0)) { | ||||
| 1535 | msg = zip->msg; | ||||
| 1536 | } | ||||
| 1537 | if (msg == 0) { | ||||
| 1538 | getErrorString(errno(*__errno_location ()), tmpbuf, sizeof(tmpbuf)); | ||||
| 1539 | msg = tmpbuf; | ||||
| 1540 | } | ||||
| 1541 | jio_fprintf(stderrstderr, "%s: %s\n", zip->name, msg); | ||||
| 1542 | return JNI_FALSE0; | ||||
| 1543 | } | ||||
| 1544 | } | ||||
| 1545 | |||||
| 1546 | ZIP_FreeEntry(zip, entry); | ||||
| 1547 | |||||
| 1548 | return JNI_TRUE1; | ||||
| 1549 | } | ||||
| 1550 | |||||
| 1551 | JNIEXPORT__attribute__((visibility("default"))) jboolean | ||||
| 1552 | ZIP_InflateFully(void *inBuf, jlong inLen, void *outBuf, jlong outLen, char **pmsg) | ||||
| 1553 | { | ||||
| 1554 | z_stream strm; | ||||
| 1555 | int i = 0; | ||||
| 1556 | memset(&strm, 0, sizeof(z_stream)); | ||||
| 1557 | |||||
| 1558 | *pmsg = 0; /* Reset error message */ | ||||
| 1559 | |||||
| 1560 | if (inflateInit2(&strm, MAX_WBITS)inflateInit2_((&strm), (15), "1.2.11", (int)sizeof(z_stream )) != Z_OK0) { | ||||
| 1561 | *pmsg = strm.msg; | ||||
| 1562 | return JNI_FALSE0; | ||||
| 1563 | } | ||||
| 1564 | |||||
| 1565 | strm.next_out = (Bytef *) outBuf; | ||||
| 1566 | strm.avail_out = (uInt)outLen; | ||||
| 1567 | strm.next_in = (Bytef *) inBuf; | ||||
| 1568 | strm.avail_in = (uInt)inLen; | ||||
| 1569 | |||||
| 1570 | do { | ||||
| 1571 | switch (inflate(&strm, Z_PARTIAL_FLUSH1)) { | ||||
| 1572 | case Z_OK0: | ||||
| 1573 | break; | ||||
| 1574 | case Z_STREAM_END1: | ||||
| 1575 | if (strm.total_out != (uInt)outLen) { | ||||
| 1576 | *pmsg = "INFLATER_inflateFully: Unexpected end of stream"; | ||||
| 1577 | inflateEnd(&strm); | ||||
| 1578 | return JNI_FALSE0; | ||||
| 1579 | } | ||||
| 1580 | break; | ||||
| 1581 | case Z_DATA_ERROR(-3): | ||||
| 1582 | *pmsg = "INFLATER_inflateFully: Compressed data corrupted"; | ||||
| 1583 | inflateEnd(&strm); | ||||
| 1584 | return JNI_FALSE0; | ||||
| 1585 | case Z_MEM_ERROR(-4): | ||||
| 1586 | *pmsg = "INFLATER_inflateFully: out of memory"; | ||||
| 1587 | inflateEnd(&strm); | ||||
| 1588 | return JNI_FALSE0; | ||||
| 1589 | default: | ||||
| 1590 | *pmsg = "INFLATER_inflateFully: internal error"; | ||||
| 1591 | inflateEnd(&strm); | ||||
| 1592 | return JNI_FALSE0; | ||||
| 1593 | } | ||||
| 1594 | } while (strm.avail_in > 0); | ||||
| 1595 | |||||
| 1596 | inflateEnd(&strm); | ||||
| 1597 | return JNI_TRUE1; | ||||
| 1598 | } | ||||
| 1599 | |||||
| 1600 | static voidpf tracking_zlib_alloc(voidpf opaque, uInt items, uInt size) { | ||||
| 1601 | size_t* needed = (size_t*) opaque; | ||||
| 1602 | *needed += (size_t) items * (size_t) size; | ||||
| 1603 | return (voidpf) calloc((size_t) items, (size_t) size); | ||||
| 1604 | } | ||||
| 1605 | |||||
| 1606 | static void tracking_zlib_free(voidpf opaque, voidpf address) { | ||||
| 1607 | free((void*) address); | ||||
| 1608 | } | ||||
| 1609 | |||||
| 1610 | static voidpf zlib_block_alloc(voidpf opaque, uInt items, uInt size) { | ||||
| 1611 | char** range = (char**) opaque; | ||||
| 1612 | voidpf result = NULL((void*)0); | ||||
| 1613 | size_t needed = (size_t) items * (size_t) size; | ||||
| 1614 | |||||
| 1615 | if (range[1] - range[0] >= (ptrdiff_t) needed) { | ||||
| 1616 | result = (voidpf) range[0]; | ||||
| 1617 | range[0] += needed; | ||||
| 1618 | } | ||||
| 1619 | |||||
| 1620 | return result; | ||||
| 1621 | } | ||||
| 1622 | |||||
| 1623 | static void zlib_block_free(voidpf opaque, voidpf address) { | ||||
| 1624 | /* Nothing to do. */ | ||||
| 1625 | } | ||||
| 1626 | |||||
| 1627 | static char const* deflateInit2Wrapper(z_stream* strm, int level) { | ||||
| 1628 | int err = deflateInit2(strm, level >= 0 && level <= 9 ? level : Z_DEFAULT_COMPRESSION,deflateInit2_((strm),(level >= 0 && level <= 9 ? level : (-1)),(8),(31),(8), (0), "1.2.11", (int)sizeof(z_stream )) | ||||
| 1629 | Z_DEFLATED, 31, 8, Z_DEFAULT_STRATEGY)deflateInit2_((strm),(level >= 0 && level <= 9 ? level : (-1)),(8),(31),(8), (0), "1.2.11", (int)sizeof(z_stream )); | ||||
| 1630 | if (err == Z_MEM_ERROR(-4)) { | ||||
| 1631 | return "Out of memory in deflateInit2"; | ||||
| 1632 | } | ||||
| 1633 | |||||
| 1634 | if (err != Z_OK0) { | ||||
| 1635 | return "Internal error in deflateInit2"; | ||||
| 1636 | } | ||||
| 1637 | |||||
| 1638 | return NULL((void*)0); | ||||
| 1639 | } | ||||
| 1640 | |||||
| 1641 | JNIEXPORT__attribute__((visibility("default"))) char const* | ||||
| 1642 | ZIP_GZip_InitParams(size_t inLen, size_t* outLen, size_t* tmpLen, int level) { | ||||
| 1643 | z_stream strm; | ||||
| 1644 | *tmpLen = 0; | ||||
| 1645 | char const* errorMsg; | ||||
| 1646 | |||||
| 1647 | memset(&strm, 0, sizeof(z_stream)); | ||||
| 1648 | strm.zalloc = tracking_zlib_alloc; | ||||
| 1649 | strm.zfree = tracking_zlib_free; | ||||
| 1650 | strm.opaque = (voidpf) tmpLen; | ||||
| 1651 | |||||
| 1652 | errorMsg = deflateInit2Wrapper(&strm, level); | ||||
| 1653 | |||||
| 1654 | if (errorMsg == NULL((void*)0)) { | ||||
| 1655 | *outLen = (size_t) deflateBound(&strm, (uLong) inLen); | ||||
| 1656 | deflateEnd(&strm); | ||||
| 1657 | } | ||||
| 1658 | |||||
| 1659 | return errorMsg; | ||||
| 1660 | } | ||||
| 1661 | |||||
| 1662 | JNIEXPORT__attribute__((visibility("default"))) size_t | ||||
| 1663 | ZIP_GZip_Fully(char* inBuf, size_t inLen, char* outBuf, size_t outLen, char* tmp, size_t tmpLen, | ||||
| 1664 | int level, char* comment, char const** pmsg) { | ||||
| 1665 | z_stream strm; | ||||
| 1666 | gz_header hdr; | ||||
| 1667 | int err; | ||||
| 1668 | char* block[] = {tmp, tmpLen + tmp}; | ||||
| 1669 | size_t result = 0; | ||||
| 1670 | |||||
| 1671 | memset(&strm, 0, sizeof(z_stream)); | ||||
| 1672 | strm.zalloc = zlib_block_alloc; | ||||
| 1673 | strm.zfree = zlib_block_free; | ||||
| 1674 | strm.opaque = (voidpf) block; | ||||
| 1675 | |||||
| 1676 | *pmsg = deflateInit2Wrapper(&strm, level); | ||||
| 1677 | |||||
| 1678 | if (*pmsg == NULL((void*)0)) { | ||||
| 1679 | strm.next_out = (Bytef *) outBuf; | ||||
| 1680 | strm.avail_out = (uInt) outLen; | ||||
| 1681 | strm.next_in = (Bytef *) inBuf; | ||||
| 1682 | strm.avail_in = (uInt) inLen; | ||||
| 1683 | |||||
| 1684 | if (comment != NULL((void*)0)) { | ||||
| 1685 | memset(&hdr, 0, sizeof(hdr)); | ||||
| 1686 | hdr.comment = (Bytef*) comment; | ||||
| 1687 | deflateSetHeader(&strm, &hdr); | ||||
| 1688 | } | ||||
| 1689 | |||||
| 1690 | err = deflate(&strm, Z_FINISH4); | ||||
| 1691 | |||||
| 1692 | if (err == Z_OK0 || err == Z_BUF_ERROR(-5)) { | ||||
| 1693 | *pmsg = "Buffer too small"; | ||||
| 1694 | } else if (err != Z_STREAM_END1) { | ||||
| 1695 | *pmsg = "Intern deflate error"; | ||||
| 1696 | } else { | ||||
| 1697 | result = (size_t) strm.total_out; | ||||
| 1698 | } | ||||
| 1699 | |||||
| 1700 | deflateEnd(&strm); | ||||
| 1701 | } | ||||
| 1702 | |||||
| 1703 | return result; | ||||
| 1704 | } |