OLD | NEW |
| (Empty) |
1 /* 7zIn.c -- 7z Input functions | |
2 2010-10-29 : Igor Pavlov : Public domain */ | |
3 | |
4 #include <string.h> | |
5 | |
6 #include "7z.h" | |
7 #include "7zCrc.h" | |
8 #include "CpuArch.h" | |
9 | |
10 Byte k7zSignature[k7zSignatureSize] = {'7', 'z', 0xBC, 0xAF, 0x27, 0x1C}; | |
11 | |
12 #define RINOM(x) { if ((x) == 0) return SZ_ERROR_MEM; } | |
13 | |
14 #define NUM_FOLDER_CODERS_MAX 32 | |
15 #define NUM_CODER_STREAMS_MAX 32 | |
16 | |
17 void SzCoderInfo_Init(CSzCoderInfo *p) | |
18 { | |
19 Buf_Init(&p->Props); | |
20 } | |
21 | |
22 void SzCoderInfo_Free(CSzCoderInfo *p, ISzAlloc *alloc) | |
23 { | |
24 Buf_Free(&p->Props, alloc); | |
25 SzCoderInfo_Init(p); | |
26 } | |
27 | |
28 void SzFolder_Init(CSzFolder *p) | |
29 { | |
30 p->Coders = 0; | |
31 p->BindPairs = 0; | |
32 p->PackStreams = 0; | |
33 p->UnpackSizes = 0; | |
34 p->NumCoders = 0; | |
35 p->NumBindPairs = 0; | |
36 p->NumPackStreams = 0; | |
37 p->UnpackCRCDefined = 0; | |
38 p->UnpackCRC = 0; | |
39 p->NumUnpackStreams = 0; | |
40 } | |
41 | |
42 void SzFolder_Free(CSzFolder *p, ISzAlloc *alloc) | |
43 { | |
44 UInt32 i; | |
45 if (p->Coders) | |
46 for (i = 0; i < p->NumCoders; i++) | |
47 SzCoderInfo_Free(&p->Coders[i], alloc); | |
48 IAlloc_Free(alloc, p->Coders); | |
49 IAlloc_Free(alloc, p->BindPairs); | |
50 IAlloc_Free(alloc, p->PackStreams); | |
51 IAlloc_Free(alloc, p->UnpackSizes); | |
52 SzFolder_Init(p); | |
53 } | |
54 | |
55 UInt32 SzFolder_GetNumOutStreams(CSzFolder *p) | |
56 { | |
57 UInt32 result = 0; | |
58 UInt32 i; | |
59 for (i = 0; i < p->NumCoders; i++) | |
60 result += p->Coders[i].NumOutStreams; | |
61 return result; | |
62 } | |
63 | |
64 int SzFolder_FindBindPairForInStream(CSzFolder *p, UInt32 inStreamIndex) | |
65 { | |
66 UInt32 i; | |
67 for (i = 0; i < p->NumBindPairs; i++) | |
68 if (p->BindPairs[i].InIndex == inStreamIndex) | |
69 return i; | |
70 return -1; | |
71 } | |
72 | |
73 | |
74 int SzFolder_FindBindPairForOutStream(CSzFolder *p, UInt32 outStreamIndex) | |
75 { | |
76 UInt32 i; | |
77 for (i = 0; i < p->NumBindPairs; i++) | |
78 if (p->BindPairs[i].OutIndex == outStreamIndex) | |
79 return i; | |
80 return -1; | |
81 } | |
82 | |
83 UInt64 SzFolder_GetUnpackSize(CSzFolder *p) | |
84 { | |
85 int i = (int)SzFolder_GetNumOutStreams(p); | |
86 if (i == 0) | |
87 return 0; | |
88 for (i--; i >= 0; i--) | |
89 if (SzFolder_FindBindPairForOutStream(p, i) < 0) | |
90 return p->UnpackSizes[i]; | |
91 /* throw 1; */ | |
92 return 0; | |
93 } | |
94 | |
95 void SzFile_Init(CSzFileItem *p) | |
96 { | |
97 p->HasStream = 1; | |
98 p->IsDir = 0; | |
99 p->IsAnti = 0; | |
100 p->CrcDefined = 0; | |
101 p->MTimeDefined = 0; | |
102 } | |
103 | |
104 void SzAr_Init(CSzAr *p) | |
105 { | |
106 p->PackSizes = 0; | |
107 p->PackCRCsDefined = 0; | |
108 p->PackCRCs = 0; | |
109 p->Folders = 0; | |
110 p->Files = 0; | |
111 p->NumPackStreams = 0; | |
112 p->NumFolders = 0; | |
113 p->NumFiles = 0; | |
114 } | |
115 | |
116 void SzAr_Free(CSzAr *p, ISzAlloc *alloc) | |
117 { | |
118 UInt32 i; | |
119 if (p->Folders) | |
120 for (i = 0; i < p->NumFolders; i++) | |
121 SzFolder_Free(&p->Folders[i], alloc); | |
122 | |
123 IAlloc_Free(alloc, p->PackSizes); | |
124 IAlloc_Free(alloc, p->PackCRCsDefined); | |
125 IAlloc_Free(alloc, p->PackCRCs); | |
126 IAlloc_Free(alloc, p->Folders); | |
127 IAlloc_Free(alloc, p->Files); | |
128 SzAr_Init(p); | |
129 } | |
130 | |
131 | |
132 void SzArEx_Init(CSzArEx *p) | |
133 { | |
134 SzAr_Init(&p->db); | |
135 p->FolderStartPackStreamIndex = 0; | |
136 p->PackStreamStartPositions = 0; | |
137 p->FolderStartFileIndex = 0; | |
138 p->FileIndexToFolderIndexMap = 0; | |
139 p->FileNameOffsets = 0; | |
140 Buf_Init(&p->FileNames); | |
141 } | |
142 | |
143 void SzArEx_Free(CSzArEx *p, ISzAlloc *alloc) | |
144 { | |
145 IAlloc_Free(alloc, p->FolderStartPackStreamIndex); | |
146 IAlloc_Free(alloc, p->PackStreamStartPositions); | |
147 IAlloc_Free(alloc, p->FolderStartFileIndex); | |
148 IAlloc_Free(alloc, p->FileIndexToFolderIndexMap); | |
149 | |
150 IAlloc_Free(alloc, p->FileNameOffsets); | |
151 Buf_Free(&p->FileNames, alloc); | |
152 | |
153 SzAr_Free(&p->db, alloc); | |
154 SzArEx_Init(p); | |
155 } | |
156 | |
157 /* | |
158 UInt64 GetFolderPackStreamSize(int folderIndex, int streamIndex) const | |
159 { | |
160 return PackSizes[FolderStartPackStreamIndex[folderIndex] + streamIndex]; | |
161 } | |
162 | |
163 UInt64 GetFilePackSize(int fileIndex) const | |
164 { | |
165 int folderIndex = FileIndexToFolderIndexMap[fileIndex]; | |
166 if (folderIndex >= 0) | |
167 { | |
168 const CSzFolder &folderInfo = Folders[folderIndex]; | |
169 if (FolderStartFileIndex[folderIndex] == fileIndex) | |
170 return GetFolderFullPackSize(folderIndex); | |
171 } | |
172 return 0; | |
173 } | |
174 */ | |
175 | |
176 #define MY_ALLOC(T, p, size, alloc) { if ((size) == 0) p = 0; else \ | |
177 if ((p = (T *)IAlloc_Alloc(alloc, (size) * sizeof(T))) == 0) return SZ_ERROR_M
EM; } | |
178 | |
179 static SRes SzArEx_Fill(CSzArEx *p, ISzAlloc *alloc) | |
180 { | |
181 UInt32 startPos = 0; | |
182 UInt64 startPosSize = 0; | |
183 UInt32 i; | |
184 UInt32 folderIndex = 0; | |
185 UInt32 indexInFolder = 0; | |
186 MY_ALLOC(UInt32, p->FolderStartPackStreamIndex, p->db.NumFolders, alloc); | |
187 for (i = 0; i < p->db.NumFolders; i++) | |
188 { | |
189 p->FolderStartPackStreamIndex[i] = startPos; | |
190 startPos += p->db.Folders[i].NumPackStreams; | |
191 } | |
192 | |
193 MY_ALLOC(UInt64, p->PackStreamStartPositions, p->db.NumPackStreams, alloc); | |
194 | |
195 for (i = 0; i < p->db.NumPackStreams; i++) | |
196 { | |
197 p->PackStreamStartPositions[i] = startPosSize; | |
198 startPosSize += p->db.PackSizes[i]; | |
199 } | |
200 | |
201 MY_ALLOC(UInt32, p->FolderStartFileIndex, p->db.NumFolders, alloc); | |
202 MY_ALLOC(UInt32, p->FileIndexToFolderIndexMap, p->db.NumFiles, alloc); | |
203 | |
204 for (i = 0; i < p->db.NumFiles; i++) | |
205 { | |
206 CSzFileItem *file = p->db.Files + i; | |
207 int emptyStream = !file->HasStream; | |
208 if (emptyStream && indexInFolder == 0) | |
209 { | |
210 p->FileIndexToFolderIndexMap[i] = (UInt32)-1; | |
211 continue; | |
212 } | |
213 if (indexInFolder == 0) | |
214 { | |
215 /* | |
216 v3.13 incorrectly worked with empty folders | |
217 v4.07: Loop for skipping empty folders | |
218 */ | |
219 for (;;) | |
220 { | |
221 if (folderIndex >= p->db.NumFolders) | |
222 return SZ_ERROR_ARCHIVE; | |
223 p->FolderStartFileIndex[folderIndex] = i; | |
224 if (p->db.Folders[folderIndex].NumUnpackStreams != 0) | |
225 break; | |
226 folderIndex++; | |
227 } | |
228 } | |
229 p->FileIndexToFolderIndexMap[i] = folderIndex; | |
230 if (emptyStream) | |
231 continue; | |
232 indexInFolder++; | |
233 if (indexInFolder >= p->db.Folders[folderIndex].NumUnpackStreams) | |
234 { | |
235 folderIndex++; | |
236 indexInFolder = 0; | |
237 } | |
238 } | |
239 return SZ_OK; | |
240 } | |
241 | |
242 | |
243 UInt64 SzArEx_GetFolderStreamPos(const CSzArEx *p, UInt32 folderIndex, UInt32 in
dexInFolder) | |
244 { | |
245 return p->dataPos + | |
246 p->PackStreamStartPositions[p->FolderStartPackStreamIndex[folderIndex] + ind
exInFolder]; | |
247 } | |
248 | |
249 int SzArEx_GetFolderFullPackSize(const CSzArEx *p, UInt32 folderIndex, UInt64 *r
esSize) | |
250 { | |
251 UInt32 packStreamIndex = p->FolderStartPackStreamIndex[folderIndex]; | |
252 CSzFolder *folder = p->db.Folders + folderIndex; | |
253 UInt64 size = 0; | |
254 UInt32 i; | |
255 for (i = 0; i < folder->NumPackStreams; i++) | |
256 { | |
257 UInt64 t = size + p->db.PackSizes[packStreamIndex + i]; | |
258 if (t < size) /* check it */ | |
259 return SZ_ERROR_FAIL; | |
260 size = t; | |
261 } | |
262 *resSize = size; | |
263 return SZ_OK; | |
264 } | |
265 | |
266 | |
267 /* | |
268 SRes SzReadTime(const CObjectVector<CBuf> &dataVector, | |
269 CObjectVector<CSzFileItem> &files, UInt64 type) | |
270 { | |
271 CBoolVector boolVector; | |
272 RINOK(ReadBoolVector2(files.Size(), boolVector)) | |
273 | |
274 CStreamSwitch streamSwitch; | |
275 RINOK(streamSwitch.Set(this, &dataVector)); | |
276 | |
277 for (int i = 0; i < files.Size(); i++) | |
278 { | |
279 CSzFileItem &file = files[i]; | |
280 CArchiveFileTime fileTime; | |
281 bool defined = boolVector[i]; | |
282 if (defined) | |
283 { | |
284 UInt32 low, high; | |
285 RINOK(SzReadUInt32(low)); | |
286 RINOK(SzReadUInt32(high)); | |
287 fileTime.dwLowDateTime = low; | |
288 fileTime.dwHighDateTime = high; | |
289 } | |
290 switch(type) | |
291 { | |
292 case k7zIdCTime: file.IsCTimeDefined = defined; if (defined) file.CTime =
fileTime; break; | |
293 case k7zIdATime: file.IsATimeDefined = defined; if (defined) file.ATime =
fileTime; break; | |
294 case k7zIdMTime: file.IsMTimeDefined = defined; if (defined) file.MTime =
fileTime; break; | |
295 } | |
296 } | |
297 return SZ_OK; | |
298 } | |
299 */ | |
300 | |
301 static int TestSignatureCandidate(Byte *testBytes) | |
302 { | |
303 size_t i; | |
304 for (i = 0; i < k7zSignatureSize; i++) | |
305 if (testBytes[i] != k7zSignature[i]) | |
306 return 0; | |
307 return 1; | |
308 } | |
309 | |
310 typedef struct _CSzState | |
311 { | |
312 Byte *Data; | |
313 size_t Size; | |
314 }CSzData; | |
315 | |
316 static SRes SzReadByte(CSzData *sd, Byte *b) | |
317 { | |
318 if (sd->Size == 0) | |
319 return SZ_ERROR_ARCHIVE; | |
320 sd->Size--; | |
321 *b = *sd->Data++; | |
322 return SZ_OK; | |
323 } | |
324 | |
325 static SRes SzReadBytes(CSzData *sd, Byte *data, size_t size) | |
326 { | |
327 size_t i; | |
328 for (i = 0; i < size; i++) | |
329 { | |
330 RINOK(SzReadByte(sd, data + i)); | |
331 } | |
332 return SZ_OK; | |
333 } | |
334 | |
335 static SRes SzReadUInt32(CSzData *sd, UInt32 *value) | |
336 { | |
337 int i; | |
338 *value = 0; | |
339 for (i = 0; i < 4; i++) | |
340 { | |
341 Byte b; | |
342 RINOK(SzReadByte(sd, &b)); | |
343 *value |= ((UInt32)(b) << (8 * i)); | |
344 } | |
345 return SZ_OK; | |
346 } | |
347 | |
348 static SRes SzReadNumber(CSzData *sd, UInt64 *value) | |
349 { | |
350 Byte firstByte; | |
351 Byte mask = 0x80; | |
352 int i; | |
353 RINOK(SzReadByte(sd, &firstByte)); | |
354 *value = 0; | |
355 for (i = 0; i < 8; i++) | |
356 { | |
357 Byte b; | |
358 if ((firstByte & mask) == 0) | |
359 { | |
360 UInt64 highPart = firstByte & (mask - 1); | |
361 *value += (highPart << (8 * i)); | |
362 return SZ_OK; | |
363 } | |
364 RINOK(SzReadByte(sd, &b)); | |
365 *value |= ((UInt64)b << (8 * i)); | |
366 mask >>= 1; | |
367 } | |
368 return SZ_OK; | |
369 } | |
370 | |
371 static SRes SzReadNumber32(CSzData *sd, UInt32 *value) | |
372 { | |
373 UInt64 value64; | |
374 RINOK(SzReadNumber(sd, &value64)); | |
375 if (value64 >= 0x80000000) | |
376 return SZ_ERROR_UNSUPPORTED; | |
377 if (value64 >= ((UInt64)(1) << ((sizeof(size_t) - 1) * 8 + 2))) | |
378 return SZ_ERROR_UNSUPPORTED; | |
379 *value = (UInt32)value64; | |
380 return SZ_OK; | |
381 } | |
382 | |
383 static SRes SzReadID(CSzData *sd, UInt64 *value) | |
384 { | |
385 return SzReadNumber(sd, value); | |
386 } | |
387 | |
388 static SRes SzSkeepDataSize(CSzData *sd, UInt64 size) | |
389 { | |
390 if (size > sd->Size) | |
391 return SZ_ERROR_ARCHIVE; | |
392 sd->Size -= (size_t)size; | |
393 sd->Data += (size_t)size; | |
394 return SZ_OK; | |
395 } | |
396 | |
397 static SRes SzSkeepData(CSzData *sd) | |
398 { | |
399 UInt64 size; | |
400 RINOK(SzReadNumber(sd, &size)); | |
401 return SzSkeepDataSize(sd, size); | |
402 } | |
403 | |
404 static SRes SzReadArchiveProperties(CSzData *sd) | |
405 { | |
406 for (;;) | |
407 { | |
408 UInt64 type; | |
409 RINOK(SzReadID(sd, &type)); | |
410 if (type == k7zIdEnd) | |
411 break; | |
412 SzSkeepData(sd); | |
413 } | |
414 return SZ_OK; | |
415 } | |
416 | |
417 static SRes SzWaitAttribute(CSzData *sd, UInt64 attribute) | |
418 { | |
419 for (;;) | |
420 { | |
421 UInt64 type; | |
422 RINOK(SzReadID(sd, &type)); | |
423 if (type == attribute) | |
424 return SZ_OK; | |
425 if (type == k7zIdEnd) | |
426 return SZ_ERROR_ARCHIVE; | |
427 RINOK(SzSkeepData(sd)); | |
428 } | |
429 } | |
430 | |
431 static SRes SzReadBoolVector(CSzData *sd, size_t numItems, Byte **v, ISzAlloc *a
lloc) | |
432 { | |
433 Byte b = 0; | |
434 Byte mask = 0; | |
435 size_t i; | |
436 MY_ALLOC(Byte, *v, numItems, alloc); | |
437 for (i = 0; i < numItems; i++) | |
438 { | |
439 if (mask == 0) | |
440 { | |
441 RINOK(SzReadByte(sd, &b)); | |
442 mask = 0x80; | |
443 } | |
444 (*v)[i] = (Byte)(((b & mask) != 0) ? 1 : 0); | |
445 mask >>= 1; | |
446 } | |
447 return SZ_OK; | |
448 } | |
449 | |
450 static SRes SzReadBoolVector2(CSzData *sd, size_t numItems, Byte **v, ISzAlloc *
alloc) | |
451 { | |
452 Byte allAreDefined; | |
453 size_t i; | |
454 RINOK(SzReadByte(sd, &allAreDefined)); | |
455 if (allAreDefined == 0) | |
456 return SzReadBoolVector(sd, numItems, v, alloc); | |
457 MY_ALLOC(Byte, *v, numItems, alloc); | |
458 for (i = 0; i < numItems; i++) | |
459 (*v)[i] = 1; | |
460 return SZ_OK; | |
461 } | |
462 | |
463 static SRes SzReadHashDigests( | |
464 CSzData *sd, | |
465 size_t numItems, | |
466 Byte **digestsDefined, | |
467 UInt32 **digests, | |
468 ISzAlloc *alloc) | |
469 { | |
470 size_t i; | |
471 RINOK(SzReadBoolVector2(sd, numItems, digestsDefined, alloc)); | |
472 MY_ALLOC(UInt32, *digests, numItems, alloc); | |
473 for (i = 0; i < numItems; i++) | |
474 if ((*digestsDefined)[i]) | |
475 { | |
476 RINOK(SzReadUInt32(sd, (*digests) + i)); | |
477 } | |
478 return SZ_OK; | |
479 } | |
480 | |
481 static SRes SzReadPackInfo( | |
482 CSzData *sd, | |
483 UInt64 *dataOffset, | |
484 UInt32 *numPackStreams, | |
485 UInt64 **packSizes, | |
486 Byte **packCRCsDefined, | |
487 UInt32 **packCRCs, | |
488 ISzAlloc *alloc) | |
489 { | |
490 UInt32 i; | |
491 RINOK(SzReadNumber(sd, dataOffset)); | |
492 RINOK(SzReadNumber32(sd, numPackStreams)); | |
493 | |
494 RINOK(SzWaitAttribute(sd, k7zIdSize)); | |
495 | |
496 MY_ALLOC(UInt64, *packSizes, (size_t)*numPackStreams, alloc); | |
497 | |
498 for (i = 0; i < *numPackStreams; i++) | |
499 { | |
500 RINOK(SzReadNumber(sd, (*packSizes) + i)); | |
501 } | |
502 | |
503 for (;;) | |
504 { | |
505 UInt64 type; | |
506 RINOK(SzReadID(sd, &type)); | |
507 if (type == k7zIdEnd) | |
508 break; | |
509 if (type == k7zIdCRC) | |
510 { | |
511 RINOK(SzReadHashDigests(sd, (size_t)*numPackStreams, packCRCsDefined, pack
CRCs, alloc)); | |
512 continue; | |
513 } | |
514 RINOK(SzSkeepData(sd)); | |
515 } | |
516 if (*packCRCsDefined == 0) | |
517 { | |
518 MY_ALLOC(Byte, *packCRCsDefined, (size_t)*numPackStreams, alloc); | |
519 MY_ALLOC(UInt32, *packCRCs, (size_t)*numPackStreams, alloc); | |
520 for (i = 0; i < *numPackStreams; i++) | |
521 { | |
522 (*packCRCsDefined)[i] = 0; | |
523 (*packCRCs)[i] = 0; | |
524 } | |
525 } | |
526 return SZ_OK; | |
527 } | |
528 | |
529 static SRes SzReadSwitch(CSzData *sd) | |
530 { | |
531 Byte external; | |
532 RINOK(SzReadByte(sd, &external)); | |
533 return (external == 0) ? SZ_OK: SZ_ERROR_UNSUPPORTED; | |
534 } | |
535 | |
536 static SRes SzGetNextFolderItem(CSzData *sd, CSzFolder *folder, ISzAlloc *alloc) | |
537 { | |
538 UInt32 numCoders, numBindPairs, numPackStreams, i; | |
539 UInt32 numInStreams = 0, numOutStreams = 0; | |
540 | |
541 RINOK(SzReadNumber32(sd, &numCoders)); | |
542 if (numCoders > NUM_FOLDER_CODERS_MAX) | |
543 return SZ_ERROR_UNSUPPORTED; | |
544 folder->NumCoders = numCoders; | |
545 | |
546 MY_ALLOC(CSzCoderInfo, folder->Coders, (size_t)numCoders, alloc); | |
547 | |
548 for (i = 0; i < numCoders; i++) | |
549 SzCoderInfo_Init(folder->Coders + i); | |
550 | |
551 for (i = 0; i < numCoders; i++) | |
552 { | |
553 Byte mainByte; | |
554 CSzCoderInfo *coder = folder->Coders + i; | |
555 { | |
556 unsigned idSize, j; | |
557 Byte longID[15]; | |
558 RINOK(SzReadByte(sd, &mainByte)); | |
559 idSize = (unsigned)(mainByte & 0xF); | |
560 RINOK(SzReadBytes(sd, longID, idSize)); | |
561 if (idSize > sizeof(coder->MethodID)) | |
562 return SZ_ERROR_UNSUPPORTED; | |
563 coder->MethodID = 0; | |
564 for (j = 0; j < idSize; j++) | |
565 coder->MethodID |= (UInt64)longID[idSize - 1 - j] << (8 * j); | |
566 | |
567 if ((mainByte & 0x10) != 0) | |
568 { | |
569 RINOK(SzReadNumber32(sd, &coder->NumInStreams)); | |
570 RINOK(SzReadNumber32(sd, &coder->NumOutStreams)); | |
571 if (coder->NumInStreams > NUM_CODER_STREAMS_MAX || | |
572 coder->NumOutStreams > NUM_CODER_STREAMS_MAX) | |
573 return SZ_ERROR_UNSUPPORTED; | |
574 } | |
575 else | |
576 { | |
577 coder->NumInStreams = 1; | |
578 coder->NumOutStreams = 1; | |
579 } | |
580 if ((mainByte & 0x20) != 0) | |
581 { | |
582 UInt64 propertiesSize = 0; | |
583 RINOK(SzReadNumber(sd, &propertiesSize)); | |
584 if (!Buf_Create(&coder->Props, (size_t)propertiesSize, alloc)) | |
585 return SZ_ERROR_MEM; | |
586 RINOK(SzReadBytes(sd, coder->Props.data, (size_t)propertiesSize)); | |
587 } | |
588 } | |
589 while ((mainByte & 0x80) != 0) | |
590 { | |
591 RINOK(SzReadByte(sd, &mainByte)); | |
592 RINOK(SzSkeepDataSize(sd, (mainByte & 0xF))); | |
593 if ((mainByte & 0x10) != 0) | |
594 { | |
595 UInt32 n; | |
596 RINOK(SzReadNumber32(sd, &n)); | |
597 RINOK(SzReadNumber32(sd, &n)); | |
598 } | |
599 if ((mainByte & 0x20) != 0) | |
600 { | |
601 UInt64 propertiesSize = 0; | |
602 RINOK(SzReadNumber(sd, &propertiesSize)); | |
603 RINOK(SzSkeepDataSize(sd, propertiesSize)); | |
604 } | |
605 } | |
606 numInStreams += coder->NumInStreams; | |
607 numOutStreams += coder->NumOutStreams; | |
608 } | |
609 | |
610 if (numOutStreams == 0) | |
611 return SZ_ERROR_UNSUPPORTED; | |
612 | |
613 folder->NumBindPairs = numBindPairs = numOutStreams - 1; | |
614 MY_ALLOC(CSzBindPair, folder->BindPairs, (size_t)numBindPairs, alloc); | |
615 | |
616 for (i = 0; i < numBindPairs; i++) | |
617 { | |
618 CSzBindPair *bp = folder->BindPairs + i; | |
619 RINOK(SzReadNumber32(sd, &bp->InIndex)); | |
620 RINOK(SzReadNumber32(sd, &bp->OutIndex)); | |
621 } | |
622 | |
623 if (numInStreams < numBindPairs) | |
624 return SZ_ERROR_UNSUPPORTED; | |
625 | |
626 folder->NumPackStreams = numPackStreams = numInStreams - numBindPairs; | |
627 MY_ALLOC(UInt32, folder->PackStreams, (size_t)numPackStreams, alloc); | |
628 | |
629 if (numPackStreams == 1) | |
630 { | |
631 for (i = 0; i < numInStreams ; i++) | |
632 if (SzFolder_FindBindPairForInStream(folder, i) < 0) | |
633 break; | |
634 if (i == numInStreams) | |
635 return SZ_ERROR_UNSUPPORTED; | |
636 folder->PackStreams[0] = i; | |
637 } | |
638 else | |
639 for (i = 0; i < numPackStreams; i++) | |
640 { | |
641 RINOK(SzReadNumber32(sd, folder->PackStreams + i)); | |
642 } | |
643 return SZ_OK; | |
644 } | |
645 | |
646 static SRes SzReadUnpackInfo( | |
647 CSzData *sd, | |
648 UInt32 *numFolders, | |
649 CSzFolder **folders, /* for alloc */ | |
650 ISzAlloc *alloc, | |
651 ISzAlloc *allocTemp) | |
652 { | |
653 UInt32 i; | |
654 RINOK(SzWaitAttribute(sd, k7zIdFolder)); | |
655 RINOK(SzReadNumber32(sd, numFolders)); | |
656 { | |
657 RINOK(SzReadSwitch(sd)); | |
658 | |
659 MY_ALLOC(CSzFolder, *folders, (size_t)*numFolders, alloc); | |
660 | |
661 for (i = 0; i < *numFolders; i++) | |
662 SzFolder_Init((*folders) + i); | |
663 | |
664 for (i = 0; i < *numFolders; i++) | |
665 { | |
666 RINOK(SzGetNextFolderItem(sd, (*folders) + i, alloc)); | |
667 } | |
668 } | |
669 | |
670 RINOK(SzWaitAttribute(sd, k7zIdCodersUnpackSize)); | |
671 | |
672 for (i = 0; i < *numFolders; i++) | |
673 { | |
674 UInt32 j; | |
675 CSzFolder *folder = (*folders) + i; | |
676 UInt32 numOutStreams = SzFolder_GetNumOutStreams(folder); | |
677 | |
678 MY_ALLOC(UInt64, folder->UnpackSizes, (size_t)numOutStreams, alloc); | |
679 | |
680 for (j = 0; j < numOutStreams; j++) | |
681 { | |
682 RINOK(SzReadNumber(sd, folder->UnpackSizes + j)); | |
683 } | |
684 } | |
685 | |
686 for (;;) | |
687 { | |
688 UInt64 type; | |
689 RINOK(SzReadID(sd, &type)); | |
690 if (type == k7zIdEnd) | |
691 return SZ_OK; | |
692 if (type == k7zIdCRC) | |
693 { | |
694 SRes res; | |
695 Byte *crcsDefined = 0; | |
696 UInt32 *crcs = 0; | |
697 res = SzReadHashDigests(sd, *numFolders, &crcsDefined, &crcs, allocTemp); | |
698 if (res == SZ_OK) | |
699 { | |
700 for (i = 0; i < *numFolders; i++) | |
701 { | |
702 CSzFolder *folder = (*folders) + i; | |
703 folder->UnpackCRCDefined = crcsDefined[i]; | |
704 folder->UnpackCRC = crcs[i]; | |
705 } | |
706 } | |
707 IAlloc_Free(allocTemp, crcs); | |
708 IAlloc_Free(allocTemp, crcsDefined); | |
709 RINOK(res); | |
710 continue; | |
711 } | |
712 RINOK(SzSkeepData(sd)); | |
713 } | |
714 } | |
715 | |
716 static SRes SzReadSubStreamsInfo( | |
717 CSzData *sd, | |
718 UInt32 numFolders, | |
719 CSzFolder *folders, | |
720 UInt32 *numUnpackStreams, | |
721 UInt64 **unpackSizes, | |
722 Byte **digestsDefined, | |
723 UInt32 **digests, | |
724 ISzAlloc *allocTemp) | |
725 { | |
726 UInt64 type = 0; | |
727 UInt32 i; | |
728 UInt32 si = 0; | |
729 UInt32 numDigests = 0; | |
730 | |
731 for (i = 0; i < numFolders; i++) | |
732 folders[i].NumUnpackStreams = 1; | |
733 *numUnpackStreams = numFolders; | |
734 | |
735 for (;;) | |
736 { | |
737 RINOK(SzReadID(sd, &type)); | |
738 if (type == k7zIdNumUnpackStream) | |
739 { | |
740 *numUnpackStreams = 0; | |
741 for (i = 0; i < numFolders; i++) | |
742 { | |
743 UInt32 numStreams; | |
744 RINOK(SzReadNumber32(sd, &numStreams)); | |
745 folders[i].NumUnpackStreams = numStreams; | |
746 *numUnpackStreams += numStreams; | |
747 } | |
748 continue; | |
749 } | |
750 if (type == k7zIdCRC || type == k7zIdSize) | |
751 break; | |
752 if (type == k7zIdEnd) | |
753 break; | |
754 RINOK(SzSkeepData(sd)); | |
755 } | |
756 | |
757 if (*numUnpackStreams == 0) | |
758 { | |
759 *unpackSizes = 0; | |
760 *digestsDefined = 0; | |
761 *digests = 0; | |
762 } | |
763 else | |
764 { | |
765 *unpackSizes = (UInt64 *)IAlloc_Alloc(allocTemp, (size_t)*numUnpackStreams *
sizeof(UInt64)); | |
766 RINOM(*unpackSizes); | |
767 *digestsDefined = (Byte *)IAlloc_Alloc(allocTemp, (size_t)*numUnpackStreams
* sizeof(Byte)); | |
768 RINOM(*digestsDefined); | |
769 *digests = (UInt32 *)IAlloc_Alloc(allocTemp, (size_t)*numUnpackStreams * siz
eof(UInt32)); | |
770 RINOM(*digests); | |
771 } | |
772 | |
773 for (i = 0; i < numFolders; i++) | |
774 { | |
775 /* | |
776 v3.13 incorrectly worked with empty folders | |
777 v4.07: we check that folder is empty | |
778 */ | |
779 UInt64 sum = 0; | |
780 UInt32 j; | |
781 UInt32 numSubstreams = folders[i].NumUnpackStreams; | |
782 if (numSubstreams == 0) | |
783 continue; | |
784 if (type == k7zIdSize) | |
785 for (j = 1; j < numSubstreams; j++) | |
786 { | |
787 UInt64 size; | |
788 RINOK(SzReadNumber(sd, &size)); | |
789 (*unpackSizes)[si++] = size; | |
790 sum += size; | |
791 } | |
792 (*unpackSizes)[si++] = SzFolder_GetUnpackSize(folders + i) - sum; | |
793 } | |
794 if (type == k7zIdSize) | |
795 { | |
796 RINOK(SzReadID(sd, &type)); | |
797 } | |
798 | |
799 for (i = 0; i < *numUnpackStreams; i++) | |
800 { | |
801 (*digestsDefined)[i] = 0; | |
802 (*digests)[i] = 0; | |
803 } | |
804 | |
805 | |
806 for (i = 0; i < numFolders; i++) | |
807 { | |
808 UInt32 numSubstreams = folders[i].NumUnpackStreams; | |
809 if (numSubstreams != 1 || !folders[i].UnpackCRCDefined) | |
810 numDigests += numSubstreams; | |
811 } | |
812 | |
813 | |
814 si = 0; | |
815 for (;;) | |
816 { | |
817 if (type == k7zIdCRC) | |
818 { | |
819 int digestIndex = 0; | |
820 Byte *digestsDefined2 = 0; | |
821 UInt32 *digests2 = 0; | |
822 SRes res = SzReadHashDigests(sd, numDigests, &digestsDefined2, &digests2,
allocTemp); | |
823 if (res == SZ_OK) | |
824 { | |
825 for (i = 0; i < numFolders; i++) | |
826 { | |
827 CSzFolder *folder = folders + i; | |
828 UInt32 numSubstreams = folder->NumUnpackStreams; | |
829 if (numSubstreams == 1 && folder->UnpackCRCDefined) | |
830 { | |
831 (*digestsDefined)[si] = 1; | |
832 (*digests)[si] = folder->UnpackCRC; | |
833 si++; | |
834 } | |
835 else | |
836 { | |
837 UInt32 j; | |
838 for (j = 0; j < numSubstreams; j++, digestIndex++) | |
839 { | |
840 (*digestsDefined)[si] = digestsDefined2[digestIndex]; | |
841 (*digests)[si] = digests2[digestIndex]; | |
842 si++; | |
843 } | |
844 } | |
845 } | |
846 } | |
847 IAlloc_Free(allocTemp, digestsDefined2); | |
848 IAlloc_Free(allocTemp, digests2); | |
849 RINOK(res); | |
850 } | |
851 else if (type == k7zIdEnd) | |
852 return SZ_OK; | |
853 else | |
854 { | |
855 RINOK(SzSkeepData(sd)); | |
856 } | |
857 RINOK(SzReadID(sd, &type)); | |
858 } | |
859 } | |
860 | |
861 | |
862 static SRes SzReadStreamsInfo( | |
863 CSzData *sd, | |
864 UInt64 *dataOffset, | |
865 CSzAr *p, | |
866 UInt32 *numUnpackStreams, | |
867 UInt64 **unpackSizes, /* allocTemp */ | |
868 Byte **digestsDefined, /* allocTemp */ | |
869 UInt32 **digests, /* allocTemp */ | |
870 ISzAlloc *alloc, | |
871 ISzAlloc *allocTemp) | |
872 { | |
873 for (;;) | |
874 { | |
875 UInt64 type; | |
876 RINOK(SzReadID(sd, &type)); | |
877 if ((UInt64)(int)type != type) | |
878 return SZ_ERROR_UNSUPPORTED; | |
879 switch((int)type) | |
880 { | |
881 case k7zIdEnd: | |
882 return SZ_OK; | |
883 case k7zIdPackInfo: | |
884 { | |
885 RINOK(SzReadPackInfo(sd, dataOffset, &p->NumPackStreams, | |
886 &p->PackSizes, &p->PackCRCsDefined, &p->PackCRCs, alloc)); | |
887 break; | |
888 } | |
889 case k7zIdUnpackInfo: | |
890 { | |
891 RINOK(SzReadUnpackInfo(sd, &p->NumFolders, &p->Folders, alloc, allocTemp
)); | |
892 break; | |
893 } | |
894 case k7zIdSubStreamsInfo: | |
895 { | |
896 RINOK(SzReadSubStreamsInfo(sd, p->NumFolders, p->Folders, | |
897 numUnpackStreams, unpackSizes, digestsDefined, digests, allocTemp)); | |
898 break; | |
899 } | |
900 default: | |
901 return SZ_ERROR_UNSUPPORTED; | |
902 } | |
903 } | |
904 } | |
905 | |
906 size_t SzArEx_GetFileNameUtf16(const CSzArEx *p, size_t fileIndex, UInt16 *dest) | |
907 { | |
908 size_t len = p->FileNameOffsets[fileIndex + 1] - p->FileNameOffsets[fileIndex]
; | |
909 if (dest != 0) | |
910 { | |
911 size_t i; | |
912 const Byte *src = p->FileNames.data + (p->FileNameOffsets[fileIndex] * 2); | |
913 for (i = 0; i < len; i++) | |
914 dest[i] = GetUi16(src + i * 2); | |
915 } | |
916 return len; | |
917 } | |
918 | |
919 static SRes SzReadFileNames(const Byte *p, size_t size, UInt32 numFiles, size_t
*sizes) | |
920 { | |
921 UInt32 i; | |
922 size_t pos = 0; | |
923 for (i = 0; i < numFiles; i++) | |
924 { | |
925 sizes[i] = pos; | |
926 for (;;) | |
927 { | |
928 if (pos >= size) | |
929 return SZ_ERROR_ARCHIVE; | |
930 if (p[pos * 2] == 0 && p[pos * 2 + 1] == 0) | |
931 break; | |
932 pos++; | |
933 } | |
934 pos++; | |
935 } | |
936 sizes[i] = pos; | |
937 return (pos == size) ? SZ_OK : SZ_ERROR_ARCHIVE; | |
938 } | |
939 | |
940 static SRes SzReadHeader2( | |
941 CSzArEx *p, /* allocMain */ | |
942 CSzData *sd, | |
943 UInt64 **unpackSizes, /* allocTemp */ | |
944 Byte **digestsDefined, /* allocTemp */ | |
945 UInt32 **digests, /* allocTemp */ | |
946 Byte **emptyStreamVector, /* allocTemp */ | |
947 Byte **emptyFileVector, /* allocTemp */ | |
948 Byte **lwtVector, /* allocTemp */ | |
949 ISzAlloc *allocMain, | |
950 ISzAlloc *allocTemp) | |
951 { | |
952 UInt64 type; | |
953 UInt32 numUnpackStreams = 0; | |
954 UInt32 numFiles = 0; | |
955 CSzFileItem *files = 0; | |
956 UInt32 numEmptyStreams = 0; | |
957 UInt32 i; | |
958 | |
959 RINOK(SzReadID(sd, &type)); | |
960 | |
961 if (type == k7zIdArchiveProperties) | |
962 { | |
963 RINOK(SzReadArchiveProperties(sd)); | |
964 RINOK(SzReadID(sd, &type)); | |
965 } | |
966 | |
967 | |
968 if (type == k7zIdMainStreamsInfo) | |
969 { | |
970 RINOK(SzReadStreamsInfo(sd, | |
971 &p->dataPos, | |
972 &p->db, | |
973 &numUnpackStreams, | |
974 unpackSizes, | |
975 digestsDefined, | |
976 digests, allocMain, allocTemp)); | |
977 p->dataPos += p->startPosAfterHeader; | |
978 RINOK(SzReadID(sd, &type)); | |
979 } | |
980 | |
981 if (type == k7zIdEnd) | |
982 return SZ_OK; | |
983 if (type != k7zIdFilesInfo) | |
984 return SZ_ERROR_ARCHIVE; | |
985 | |
986 RINOK(SzReadNumber32(sd, &numFiles)); | |
987 p->db.NumFiles = numFiles; | |
988 | |
989 MY_ALLOC(CSzFileItem, files, (size_t)numFiles, allocMain); | |
990 | |
991 p->db.Files = files; | |
992 for (i = 0; i < numFiles; i++) | |
993 SzFile_Init(files + i); | |
994 | |
995 for (;;) | |
996 { | |
997 UInt64 type; | |
998 UInt64 size; | |
999 RINOK(SzReadID(sd, &type)); | |
1000 if (type == k7zIdEnd) | |
1001 break; | |
1002 RINOK(SzReadNumber(sd, &size)); | |
1003 if (size > sd->Size) | |
1004 return SZ_ERROR_ARCHIVE; | |
1005 if ((UInt64)(int)type != type) | |
1006 { | |
1007 RINOK(SzSkeepDataSize(sd, size)); | |
1008 } | |
1009 else | |
1010 switch((int)type) | |
1011 { | |
1012 case k7zIdName: | |
1013 { | |
1014 size_t namesSize; | |
1015 RINOK(SzReadSwitch(sd)); | |
1016 namesSize = (size_t)size - 1; | |
1017 if ((namesSize & 1) != 0) | |
1018 return SZ_ERROR_ARCHIVE; | |
1019 if (!Buf_Create(&p->FileNames, namesSize, allocMain)) | |
1020 return SZ_ERROR_MEM; | |
1021 MY_ALLOC(size_t, p->FileNameOffsets, numFiles + 1, allocMain); | |
1022 memcpy(p->FileNames.data, sd->Data, namesSize); | |
1023 RINOK(SzReadFileNames(sd->Data, namesSize >> 1, numFiles, p->FileNameOff
sets)) | |
1024 RINOK(SzSkeepDataSize(sd, namesSize)); | |
1025 break; | |
1026 } | |
1027 case k7zIdEmptyStream: | |
1028 { | |
1029 RINOK(SzReadBoolVector(sd, numFiles, emptyStreamVector, allocTemp)); | |
1030 numEmptyStreams = 0; | |
1031 for (i = 0; i < numFiles; i++) | |
1032 if ((*emptyStreamVector)[i]) | |
1033 numEmptyStreams++; | |
1034 break; | |
1035 } | |
1036 case k7zIdEmptyFile: | |
1037 { | |
1038 RINOK(SzReadBoolVector(sd, numEmptyStreams, emptyFileVector, allocTemp))
; | |
1039 break; | |
1040 } | |
1041 case k7zIdWinAttributes: | |
1042 { | |
1043 RINOK(SzReadBoolVector2(sd, numFiles, lwtVector, allocTemp)); | |
1044 RINOK(SzReadSwitch(sd)); | |
1045 for (i = 0; i < numFiles; i++) | |
1046 { | |
1047 CSzFileItem *f = &files[i]; | |
1048 Byte defined = (*lwtVector)[i]; | |
1049 f->AttribDefined = defined; | |
1050 f->Attrib = 0; | |
1051 if (defined) | |
1052 { | |
1053 RINOK(SzReadUInt32(sd, &f->Attrib)); | |
1054 } | |
1055 } | |
1056 IAlloc_Free(allocTemp, *lwtVector); | |
1057 *lwtVector = NULL; | |
1058 break; | |
1059 } | |
1060 case k7zIdMTime: | |
1061 { | |
1062 RINOK(SzReadBoolVector2(sd, numFiles, lwtVector, allocTemp)); | |
1063 RINOK(SzReadSwitch(sd)); | |
1064 for (i = 0; i < numFiles; i++) | |
1065 { | |
1066 CSzFileItem *f = &files[i]; | |
1067 Byte defined = (*lwtVector)[i]; | |
1068 f->MTimeDefined = defined; | |
1069 f->MTime.Low = f->MTime.High = 0; | |
1070 if (defined) | |
1071 { | |
1072 RINOK(SzReadUInt32(sd, &f->MTime.Low)); | |
1073 RINOK(SzReadUInt32(sd, &f->MTime.High)); | |
1074 } | |
1075 } | |
1076 IAlloc_Free(allocTemp, *lwtVector); | |
1077 *lwtVector = NULL; | |
1078 break; | |
1079 } | |
1080 default: | |
1081 { | |
1082 RINOK(SzSkeepDataSize(sd, size)); | |
1083 } | |
1084 } | |
1085 } | |
1086 | |
1087 { | |
1088 UInt32 emptyFileIndex = 0; | |
1089 UInt32 sizeIndex = 0; | |
1090 for (i = 0; i < numFiles; i++) | |
1091 { | |
1092 CSzFileItem *file = files + i; | |
1093 file->IsAnti = 0; | |
1094 if (*emptyStreamVector == 0) | |
1095 file->HasStream = 1; | |
1096 else | |
1097 file->HasStream = (Byte)((*emptyStreamVector)[i] ? 0 : 1); | |
1098 if (file->HasStream) | |
1099 { | |
1100 file->IsDir = 0; | |
1101 file->Size = (*unpackSizes)[sizeIndex]; | |
1102 file->Crc = (*digests)[sizeIndex]; | |
1103 file->CrcDefined = (Byte)(*digestsDefined)[sizeIndex]; | |
1104 sizeIndex++; | |
1105 } | |
1106 else | |
1107 { | |
1108 if (*emptyFileVector == 0) | |
1109 file->IsDir = 1; | |
1110 else | |
1111 file->IsDir = (Byte)((*emptyFileVector)[emptyFileIndex] ? 0 : 1); | |
1112 emptyFileIndex++; | |
1113 file->Size = 0; | |
1114 file->Crc = 0; | |
1115 file->CrcDefined = 0; | |
1116 } | |
1117 } | |
1118 } | |
1119 return SzArEx_Fill(p, allocMain); | |
1120 } | |
1121 | |
1122 static SRes SzReadHeader( | |
1123 CSzArEx *p, | |
1124 CSzData *sd, | |
1125 ISzAlloc *allocMain, | |
1126 ISzAlloc *allocTemp) | |
1127 { | |
1128 UInt64 *unpackSizes = 0; | |
1129 Byte *digestsDefined = 0; | |
1130 UInt32 *digests = 0; | |
1131 Byte *emptyStreamVector = 0; | |
1132 Byte *emptyFileVector = 0; | |
1133 Byte *lwtVector = 0; | |
1134 SRes res = SzReadHeader2(p, sd, | |
1135 &unpackSizes, &digestsDefined, &digests, | |
1136 &emptyStreamVector, &emptyFileVector, &lwtVector, | |
1137 allocMain, allocTemp); | |
1138 IAlloc_Free(allocTemp, unpackSizes); | |
1139 IAlloc_Free(allocTemp, digestsDefined); | |
1140 IAlloc_Free(allocTemp, digests); | |
1141 IAlloc_Free(allocTemp, emptyStreamVector); | |
1142 IAlloc_Free(allocTemp, emptyFileVector); | |
1143 IAlloc_Free(allocTemp, lwtVector); | |
1144 return res; | |
1145 } | |
1146 | |
1147 static SRes SzReadAndDecodePackedStreams2( | |
1148 ILookInStream *inStream, | |
1149 CSzData *sd, | |
1150 CBuf *outBuffer, | |
1151 UInt64 baseOffset, | |
1152 CSzAr *p, | |
1153 UInt64 **unpackSizes, | |
1154 Byte **digestsDefined, | |
1155 UInt32 **digests, | |
1156 ISzAlloc *allocTemp) | |
1157 { | |
1158 | |
1159 UInt32 numUnpackStreams = 0; | |
1160 UInt64 dataStartPos; | |
1161 CSzFolder *folder; | |
1162 UInt64 unpackSize; | |
1163 SRes res; | |
1164 | |
1165 RINOK(SzReadStreamsInfo(sd, &dataStartPos, p, | |
1166 &numUnpackStreams, unpackSizes, digestsDefined, digests, | |
1167 allocTemp, allocTemp)); | |
1168 | |
1169 dataStartPos += baseOffset; | |
1170 if (p->NumFolders != 1) | |
1171 return SZ_ERROR_ARCHIVE; | |
1172 | |
1173 folder = p->Folders; | |
1174 unpackSize = SzFolder_GetUnpackSize(folder); | |
1175 | |
1176 RINOK(LookInStream_SeekTo(inStream, dataStartPos)); | |
1177 | |
1178 if (!Buf_Create(outBuffer, (size_t)unpackSize, allocTemp)) | |
1179 return SZ_ERROR_MEM; | |
1180 | |
1181 res = SzFolder_Decode(folder, p->PackSizes, | |
1182 inStream, dataStartPos, | |
1183 outBuffer->data, (size_t)unpackSize, allocTemp); | |
1184 RINOK(res); | |
1185 if (folder->UnpackCRCDefined) | |
1186 if (CrcCalc(outBuffer->data, (size_t)unpackSize) != folder->UnpackCRC) | |
1187 return SZ_ERROR_CRC; | |
1188 return SZ_OK; | |
1189 } | |
1190 | |
1191 static SRes SzReadAndDecodePackedStreams( | |
1192 ILookInStream *inStream, | |
1193 CSzData *sd, | |
1194 CBuf *outBuffer, | |
1195 UInt64 baseOffset, | |
1196 ISzAlloc *allocTemp) | |
1197 { | |
1198 CSzAr p; | |
1199 UInt64 *unpackSizes = 0; | |
1200 Byte *digestsDefined = 0; | |
1201 UInt32 *digests = 0; | |
1202 SRes res; | |
1203 SzAr_Init(&p); | |
1204 res = SzReadAndDecodePackedStreams2(inStream, sd, outBuffer, baseOffset, | |
1205 &p, &unpackSizes, &digestsDefined, &digests, | |
1206 allocTemp); | |
1207 SzAr_Free(&p, allocTemp); | |
1208 IAlloc_Free(allocTemp, unpackSizes); | |
1209 IAlloc_Free(allocTemp, digestsDefined); | |
1210 IAlloc_Free(allocTemp, digests); | |
1211 return res; | |
1212 } | |
1213 | |
1214 static SRes SzArEx_Open2( | |
1215 CSzArEx *p, | |
1216 ILookInStream *inStream, | |
1217 ISzAlloc *allocMain, | |
1218 ISzAlloc *allocTemp) | |
1219 { | |
1220 Byte header[k7zStartHeaderSize]; | |
1221 Int64 startArcPos; | |
1222 UInt64 nextHeaderOffset, nextHeaderSize; | |
1223 size_t nextHeaderSizeT; | |
1224 UInt32 nextHeaderCRC; | |
1225 CBuf buffer; | |
1226 SRes res; | |
1227 | |
1228 startArcPos = 0; | |
1229 RINOK(inStream->Seek(inStream, &startArcPos, SZ_SEEK_CUR)); | |
1230 | |
1231 RINOK(LookInStream_Read2(inStream, header, k7zStartHeaderSize, SZ_ERROR_NO_ARC
HIVE)); | |
1232 | |
1233 if (!TestSignatureCandidate(header)) | |
1234 return SZ_ERROR_NO_ARCHIVE; | |
1235 if (header[6] != k7zMajorVersion) | |
1236 return SZ_ERROR_UNSUPPORTED; | |
1237 | |
1238 nextHeaderOffset = GetUi64(header + 12); | |
1239 nextHeaderSize = GetUi64(header + 20); | |
1240 nextHeaderCRC = GetUi32(header + 28); | |
1241 | |
1242 p->startPosAfterHeader = startArcPos + k7zStartHeaderSize; | |
1243 | |
1244 if (CrcCalc(header + 12, 20) != GetUi32(header + 8)) | |
1245 return SZ_ERROR_CRC; | |
1246 | |
1247 nextHeaderSizeT = (size_t)nextHeaderSize; | |
1248 if (nextHeaderSizeT != nextHeaderSize) | |
1249 return SZ_ERROR_MEM; | |
1250 if (nextHeaderSizeT == 0) | |
1251 return SZ_OK; | |
1252 if (nextHeaderOffset > nextHeaderOffset + nextHeaderSize || | |
1253 nextHeaderOffset > nextHeaderOffset + nextHeaderSize + k7zStartHeaderSize) | |
1254 return SZ_ERROR_NO_ARCHIVE; | |
1255 | |
1256 { | |
1257 Int64 pos = 0; | |
1258 RINOK(inStream->Seek(inStream, &pos, SZ_SEEK_END)); | |
1259 if ((UInt64)pos < startArcPos + nextHeaderOffset || | |
1260 (UInt64)pos < startArcPos + k7zStartHeaderSize + nextHeaderOffset || | |
1261 (UInt64)pos < startArcPos + k7zStartHeaderSize + nextHeaderOffset + next
HeaderSize) | |
1262 return SZ_ERROR_INPUT_EOF; | |
1263 } | |
1264 | |
1265 RINOK(LookInStream_SeekTo(inStream, startArcPos + k7zStartHeaderSize + nextHea
derOffset)); | |
1266 | |
1267 if (!Buf_Create(&buffer, nextHeaderSizeT, allocTemp)) | |
1268 return SZ_ERROR_MEM; | |
1269 | |
1270 res = LookInStream_Read(inStream, buffer.data, nextHeaderSizeT); | |
1271 if (res == SZ_OK) | |
1272 { | |
1273 res = SZ_ERROR_ARCHIVE; | |
1274 if (CrcCalc(buffer.data, nextHeaderSizeT) == nextHeaderCRC) | |
1275 { | |
1276 CSzData sd; | |
1277 UInt64 type; | |
1278 sd.Data = buffer.data; | |
1279 sd.Size = buffer.size; | |
1280 res = SzReadID(&sd, &type); | |
1281 if (res == SZ_OK) | |
1282 { | |
1283 if (type == k7zIdEncodedHeader) | |
1284 { | |
1285 CBuf outBuffer; | |
1286 Buf_Init(&outBuffer); | |
1287 res = SzReadAndDecodePackedStreams(inStream, &sd, &outBuffer, p->start
PosAfterHeader, allocTemp); | |
1288 if (res != SZ_OK) | |
1289 Buf_Free(&outBuffer, allocTemp); | |
1290 else | |
1291 { | |
1292 Buf_Free(&buffer, allocTemp); | |
1293 buffer.data = outBuffer.data; | |
1294 buffer.size = outBuffer.size; | |
1295 sd.Data = buffer.data; | |
1296 sd.Size = buffer.size; | |
1297 res = SzReadID(&sd, &type); | |
1298 } | |
1299 } | |
1300 } | |
1301 if (res == SZ_OK) | |
1302 { | |
1303 if (type == k7zIdHeader) | |
1304 res = SzReadHeader(p, &sd, allocMain, allocTemp); | |
1305 else | |
1306 res = SZ_ERROR_UNSUPPORTED; | |
1307 } | |
1308 } | |
1309 } | |
1310 Buf_Free(&buffer, allocTemp); | |
1311 return res; | |
1312 } | |
1313 | |
1314 SRes SzArEx_Open(CSzArEx *p, ILookInStream *inStream, ISzAlloc *allocMain, ISzAl
loc *allocTemp) | |
1315 { | |
1316 SRes res = SzArEx_Open2(p, inStream, allocMain, allocTemp); | |
1317 if (res != SZ_OK) | |
1318 SzArEx_Free(p, allocMain); | |
1319 return res; | |
1320 } | |
1321 | |
1322 SRes SzArEx_Extract( | |
1323 const CSzArEx *p, | |
1324 ILookInStream *inStream, | |
1325 UInt32 fileIndex, | |
1326 UInt32 *blockIndex, | |
1327 Byte **outBuffer, | |
1328 size_t *outBufferSize, | |
1329 size_t *offset, | |
1330 size_t *outSizeProcessed, | |
1331 ISzAlloc *allocMain, | |
1332 ISzAlloc *allocTemp) | |
1333 { | |
1334 UInt32 folderIndex = p->FileIndexToFolderIndexMap[fileIndex]; | |
1335 SRes res = SZ_OK; | |
1336 *offset = 0; | |
1337 *outSizeProcessed = 0; | |
1338 if (folderIndex == (UInt32)-1) | |
1339 { | |
1340 IAlloc_Free(allocMain, *outBuffer); | |
1341 *blockIndex = folderIndex; | |
1342 *outBuffer = 0; | |
1343 *outBufferSize = 0; | |
1344 return SZ_OK; | |
1345 } | |
1346 | |
1347 if (*outBuffer == 0 || *blockIndex != folderIndex) | |
1348 { | |
1349 CSzFolder *folder = p->db.Folders + folderIndex; | |
1350 UInt64 unpackSizeSpec = SzFolder_GetUnpackSize(folder); | |
1351 size_t unpackSize = (size_t)unpackSizeSpec; | |
1352 UInt64 startOffset = SzArEx_GetFolderStreamPos(p, folderIndex, 0); | |
1353 | |
1354 if (unpackSize != unpackSizeSpec) | |
1355 return SZ_ERROR_MEM; | |
1356 *blockIndex = folderIndex; | |
1357 IAlloc_Free(allocMain, *outBuffer); | |
1358 *outBuffer = 0; | |
1359 | |
1360 RINOK(LookInStream_SeekTo(inStream, startOffset)); | |
1361 | |
1362 if (res == SZ_OK) | |
1363 { | |
1364 *outBufferSize = unpackSize; | |
1365 if (unpackSize != 0) | |
1366 { | |
1367 *outBuffer = (Byte *)IAlloc_Alloc(allocMain, unpackSize); | |
1368 if (*outBuffer == 0) | |
1369 res = SZ_ERROR_MEM; | |
1370 } | |
1371 if (res == SZ_OK) | |
1372 { | |
1373 res = SzFolder_Decode(folder, | |
1374 p->db.PackSizes + p->FolderStartPackStreamIndex[folderIndex], | |
1375 inStream, startOffset, | |
1376 *outBuffer, unpackSize, allocTemp); | |
1377 if (res == SZ_OK) | |
1378 { | |
1379 if (folder->UnpackCRCDefined) | |
1380 { | |
1381 if (CrcCalc(*outBuffer, unpackSize) != folder->UnpackCRC) | |
1382 res = SZ_ERROR_CRC; | |
1383 } | |
1384 } | |
1385 } | |
1386 } | |
1387 } | |
1388 if (res == SZ_OK) | |
1389 { | |
1390 UInt32 i; | |
1391 CSzFileItem *fileItem = p->db.Files + fileIndex; | |
1392 *offset = 0; | |
1393 for (i = p->FolderStartFileIndex[folderIndex]; i < fileIndex; i++) | |
1394 *offset += (UInt32)p->db.Files[i].Size; | |
1395 *outSizeProcessed = (size_t)fileItem->Size; | |
1396 if (*offset + *outSizeProcessed > *outBufferSize) | |
1397 return SZ_ERROR_FAIL; | |
1398 if (fileItem->CrcDefined && CrcCalc(*outBuffer + *offset, *outSizeProcessed)
!= fileItem->Crc) | |
1399 res = SZ_ERROR_CRC; | |
1400 } | |
1401 return res; | |
1402 } | |
OLD | NEW |