#include <stdlib.h>
#include "zipint.h"
zip_source_t *
_zip_source_zip_new(zip_t *za, zip_t *srcza, zip_uint64_t srcidx, zip_flags_t flags, zip_uint64_t start, zip_uint64_t len, const char *password) {
zip_source_t *src, *s2;
struct zip_stat st;
bool partial_data, needs_crc, needs_decrypt, needs_decompress;
if (za == NULL)
return NULL;
if (srcza == NULL || srcidx >= srcza->nentry) {
zip_error_set(&za->error, ZIP_ER_INVAL, 0);
return NULL;
}
if ((flags & ZIP_FL_UNCHANGED) == 0 && (ZIP_ENTRY_DATA_CHANGED(srcza->entry + srcidx) || srcza->entry[srcidx].deleted)) {
zip_error_set(&za->error, ZIP_ER_CHANGED, 0);
return NULL;
}
if (zip_stat_index(srcza, srcidx, flags | ZIP_FL_UNCHANGED, &st) < 0) {
zip_error_set(&za->error, ZIP_ER_INTERNAL, 0);
return NULL;
}
if (flags & ZIP_FL_ENCRYPTED)
flags |= ZIP_FL_COMPRESSED;
if ((start > 0 || len > 0) && (flags & ZIP_FL_COMPRESSED)) {
zip_error_set(&za->error, ZIP_ER_INVAL, 0);
return NULL;
}
if ((start > 0 || len > 0) && (start + len < start || start + len > st.size)) {
zip_error_set(&za->error, ZIP_ER_INVAL, 0);
return NULL;
}
if (len == 0) {
len = st.size - start;
}
partial_data = len < st.size;
needs_decrypt = ((flags & ZIP_FL_ENCRYPTED) == 0) && (st.encryption_method != ZIP_EM_NONE);
needs_decompress = ((flags & ZIP_FL_COMPRESSED) == 0) && (st.comp_method != ZIP_CM_STORE);
needs_crc = ((flags & ZIP_FL_COMPRESSED) == 0 || st.comp_method == ZIP_CM_STORE) && !partial_data;
if (needs_decrypt) {
if (password == NULL) {
password = za->default_password;
}
if (password == NULL) {
zip_error_set(&za->error, ZIP_ER_NOPASSWD, 0);
return NULL;
}
}
if (st.comp_size == 0) {
return zip_source_buffer(za, NULL, 0, 0);
}
if (partial_data && !needs_decrypt && !needs_decompress) {
struct zip_stat st2;
st2.size = len;
st2.comp_size = len;
st2.comp_method = ZIP_CM_STORE;
st2.mtime = st.mtime;
st2.valid = ZIP_STAT_SIZE | ZIP_STAT_COMP_SIZE | ZIP_STAT_COMP_METHOD | ZIP_STAT_MTIME;
if ((src = _zip_source_window_new(srcza->src, start, len, &st2, 0, srcza, srcidx, &za->error)) == NULL) {
return NULL;
}
}
else {
zip_dirent_t *de;
if ((de = _zip_get_dirent(srcza, srcidx, flags, &za->error)) == NULL) {
return NULL;
}
if ((src = _zip_source_window_new(srcza->src, 0, st.comp_size, &st, (de->bitflags >> 1) & 3, srcza, srcidx, &za->error)) == NULL) {
return NULL;
}
}
if (_zip_source_set_source_archive(src, srcza) < 0) {
zip_source_free(src);
return NULL;
}
if (needs_decrypt) {
zip_encryption_implementation enc_impl;
if ((enc_impl = _zip_get_encryption_implementation(st.encryption_method, ZIP_CODEC_DECODE)) == NULL) {
zip_error_set(&za->error, ZIP_ER_ENCRNOTSUPP, 0);
return NULL;
}
s2 = enc_impl(za, src, st.encryption_method, 0, password);
zip_source_free(src);
if (s2 == NULL) {
return NULL;
}
src = s2;
}
if (needs_decompress) {
s2 = zip_source_decompress(za, src, st.comp_method);
zip_source_free(src);
if (s2 == NULL) {
return NULL;
}
src = s2;
}
if (needs_crc) {
s2 = zip_source_crc(za, src, 1);
zip_source_free(src);
if (s2 == NULL) {
return NULL;
}
src = s2;
}
if (partial_data && (needs_decrypt || needs_decompress)) {
s2 = zip_source_window(za, src, start, len);
zip_source_free(src);
if (s2 == NULL) {
return NULL;
}
src = s2;
}
return src;
}