react-native-update 10.28.10 → 10.29.0-beta.0

package/harmony/src/main/cpp/lzma/C/7zArcIn.c

@@ -1,1771 +0,0 @@
-/* 7zArcIn.c -- 7z Input functions
-2018-12-31 : Igor Pavlov : Public domain */
-
-#include "Precomp.h"
-
-#include <string.h>
-
-#include "7z.h"
-#include "7zBuf.h"
-#include "7zCrc.h"
-#include "CpuArch.h"
-
-#define MY_ALLOC(T, p, size, alloc) { \
-  if ((p = (T *)ISzAlloc_Alloc(alloc, (size) * sizeof(T))) == NULL) return SZ_ERROR_MEM; }
-
-#define MY_ALLOC_ZE(T, p, size, alloc) { if ((size) == 0) p = NULL; else MY_ALLOC(T, p, size, alloc) }
-
-#define MY_ALLOC_AND_CPY(to, size, from, alloc) \
-  { MY_ALLOC(Byte, to, size, alloc); memcpy(to, from, size); }
-
-#define MY_ALLOC_ZE_AND_CPY(to, size, from, alloc) \
-  { if ((size) == 0) to = NULL; else { MY_ALLOC_AND_CPY(to, size, from, alloc) } }
-
-#define k7zMajorVersion 0
-
-enum EIdEnum
-{
-  k7zIdEnd,
-  k7zIdHeader,
-  k7zIdArchiveProperties,
-  k7zIdAdditionalStreamsInfo,
-  k7zIdMainStreamsInfo,
-  k7zIdFilesInfo,
-  k7zIdPackInfo,
-  k7zIdUnpackInfo,
-  k7zIdSubStreamsInfo,
-  k7zIdSize,
-  k7zIdCRC,
-  k7zIdFolder,
-  k7zIdCodersUnpackSize,
-  k7zIdNumUnpackStream,
-  k7zIdEmptyStream,
-  k7zIdEmptyFile,
-  k7zIdAnti,
-  k7zIdName,
-  k7zIdCTime,
-  k7zIdATime,
-  k7zIdMTime,
-  k7zIdWinAttrib,
-  k7zIdComment,
-  k7zIdEncodedHeader,
-  k7zIdStartPos,
-  k7zIdDummy
-  // k7zNtSecure,
-  // k7zParent,
-  // k7zIsReal
-};
-
-const Byte k7zSignature[k7zSignatureSize] = {'7', 'z', 0xBC, 0xAF, 0x27, 0x1C};
-
-#define SzBitUi32s_Init(p) { (p)->Defs = NULL; (p)->Vals = NULL; }
-
-static SRes SzBitUi32s_Alloc(CSzBitUi32s *p, size_t num, ISzAllocPtr alloc)
-{
-  if (num == 0)
-  {
-    p->Defs = NULL;
-    p->Vals = NULL;
-  }
-  else
-  {
-    MY_ALLOC(Byte, p->Defs, (num + 7) >> 3, alloc);
-    MY_ALLOC(UInt32, p->Vals, num, alloc);
-  }
-  return SZ_OK;
-}
-
-void SzBitUi32s_Free(CSzBitUi32s *p, ISzAllocPtr alloc)
-{
-  ISzAlloc_Free(alloc, p->Defs); p->Defs = NULL;
-  ISzAlloc_Free(alloc, p->Vals); p->Vals = NULL;
-}
-
-#define SzBitUi64s_Init(p) { (p)->Defs = NULL; (p)->Vals = NULL; }
-
-void SzBitUi64s_Free(CSzBitUi64s *p, ISzAllocPtr alloc)
-{
-  ISzAlloc_Free(alloc, p->Defs); p->Defs = NULL;
-  ISzAlloc_Free(alloc, p->Vals); p->Vals = NULL;
-}
-
-
-static void SzAr_Init(CSzAr *p)
-{
-  p->NumPackStreams = 0;
-  p->NumFolders = 0;
-  
-  p->PackPositions = NULL;
-  SzBitUi32s_Init(&p->FolderCRCs);
-
-  p->FoCodersOffsets = NULL;
-  p->FoStartPackStreamIndex = NULL;
-  p->FoToCoderUnpackSizes = NULL;
-  p->FoToMainUnpackSizeIndex = NULL;
-  p->CoderUnpackSizes = NULL;
-
-  p->CodersData = NULL;
-}
-
-static void SzAr_Free(CSzAr *p, ISzAllocPtr alloc)
-{
-  ISzAlloc_Free(alloc, p->PackPositions);
-  SzBitUi32s_Free(&p->FolderCRCs, alloc);
- 
-  ISzAlloc_Free(alloc, p->FoCodersOffsets);
-  ISzAlloc_Free(alloc, p->FoStartPackStreamIndex);
-  ISzAlloc_Free(alloc, p->FoToCoderUnpackSizes);
-  ISzAlloc_Free(alloc, p->FoToMainUnpackSizeIndex);
-  ISzAlloc_Free(alloc, p->CoderUnpackSizes);
-  
-  ISzAlloc_Free(alloc, p->CodersData);
-
-  SzAr_Init(p);
-}
-
-
-void SzArEx_Init(CSzArEx *p)
-{
-  SzAr_Init(&p->db);
-  
-  p->NumFiles = 0;
-  p->dataPos = 0;
-  
-  p->UnpackPositions = NULL;
-  p->IsDirs = NULL;
-  
-  p->FolderToFile = NULL;
-  p->FileToFolder = NULL;
-  
-  p->FileNameOffsets = NULL;
-  p->FileNames = NULL;
-  
-  SzBitUi32s_Init(&p->CRCs);
-  SzBitUi32s_Init(&p->Attribs);
-  // SzBitUi32s_Init(&p->Parents);
-  SzBitUi64s_Init(&p->MTime);
-  SzBitUi64s_Init(&p->CTime);
-}
-
-void SzArEx_Free(CSzArEx *p, ISzAllocPtr alloc)
-{
-  ISzAlloc_Free(alloc, p->UnpackPositions);
-  ISzAlloc_Free(alloc, p->IsDirs);
-
-  ISzAlloc_Free(alloc, p->FolderToFile);
-  ISzAlloc_Free(alloc, p->FileToFolder);
-
-  ISzAlloc_Free(alloc, p->FileNameOffsets);
-  ISzAlloc_Free(alloc, p->FileNames);
-
-  SzBitUi32s_Free(&p->CRCs, alloc);
-  SzBitUi32s_Free(&p->Attribs, alloc);
-  // SzBitUi32s_Free(&p->Parents, alloc);
-  SzBitUi64s_Free(&p->MTime, alloc);
-  SzBitUi64s_Free(&p->CTime, alloc);
-  
-  SzAr_Free(&p->db, alloc);
-  SzArEx_Init(p);
-}
-
-
-static int TestSignatureCandidate(const Byte *testBytes)
-{
-  unsigned i;
-  for (i = 0; i < k7zSignatureSize; i++)
-    if (testBytes[i] != k7zSignature[i])
-      return 0;
-  return 1;
-}
-
-#define SzData_Clear(p) { (p)->Data = NULL; (p)->Size = 0; }
-
-#define SZ_READ_BYTE_SD(_sd_, dest) if ((_sd_)->Size == 0) return SZ_ERROR_ARCHIVE; (_sd_)->Size--; dest = *(_sd_)->Data++;
-#define SZ_READ_BYTE(dest) SZ_READ_BYTE_SD(sd, dest)
-#define SZ_READ_BYTE_2(dest) if (sd.Size == 0) return SZ_ERROR_ARCHIVE; sd.Size--; dest = *sd.Data++;
-
-#define SKIP_DATA(sd, size) { sd->Size -= (size_t)(size); sd->Data += (size_t)(size); }
-#define SKIP_DATA2(sd, size) { sd.Size -= (size_t)(size); sd.Data += (size_t)(size); }
-
-#define SZ_READ_32(dest) if (sd.Size < 4) return SZ_ERROR_ARCHIVE; \
-   dest = GetUi32(sd.Data); SKIP_DATA2(sd, 4);
-
-static MY_NO_INLINE SRes ReadNumber(CSzData *sd, UInt64 *value)
-{
-  Byte firstByte, mask;
-  unsigned i;
-  UInt32 v;
-
-  SZ_READ_BYTE(firstByte);
-  if ((firstByte & 0x80) == 0)
-  {
-    *value = firstByte;
-    return SZ_OK;
-  }
-  SZ_READ_BYTE(v);
-  if ((firstByte & 0x40) == 0)
-  {
-    *value = (((UInt32)firstByte & 0x3F) << 8) | v;
-    return SZ_OK;
-  }
-  SZ_READ_BYTE(mask);
-  *value = v | ((UInt32)mask << 8);
-  mask = 0x20;
-  for (i = 2; i < 8; i++)
-  {
-    Byte b;
-    if ((firstByte & mask) == 0)
-    {
-      UInt64 highPart = (unsigned)firstByte & (unsigned)(mask - 1);
-      *value |= (highPart << (8 * i));
-      return SZ_OK;
-    }
-    SZ_READ_BYTE(b);
-    *value |= ((UInt64)b << (8 * i));
-    mask >>= 1;
-  }
-  return SZ_OK;
-}
-
-
-static MY_NO_INLINE SRes SzReadNumber32(CSzData *sd, UInt32 *value)
-{
-  Byte firstByte;
-  UInt64 value64;
-  if (sd->Size == 0)
-    return SZ_ERROR_ARCHIVE;
-  firstByte = *sd->Data;
-  if ((firstByte & 0x80) == 0)
-  {
-    *value = firstByte;
-    sd->Data++;
-    sd->Size--;
-    return SZ_OK;
-  }
-  RINOK(ReadNumber(sd, &value64));
-  if (value64 >= (UInt32)0x80000000 - 1)
-    return SZ_ERROR_UNSUPPORTED;
-  if (value64 >= ((UInt64)(1) << ((sizeof(size_t) - 1) * 8 + 4)))
-    return SZ_ERROR_UNSUPPORTED;
-  *value = (UInt32)value64;
-  return SZ_OK;
-}
-
-#define ReadID(sd, value) ReadNumber(sd, value)
-
-static SRes SkipData(CSzData *sd)
-{
-  UInt64 size;
-  RINOK(ReadNumber(sd, &size));
-  if (size > sd->Size)
-    return SZ_ERROR_ARCHIVE;
-  SKIP_DATA(sd, size);
-  return SZ_OK;
-}
-
-static SRes WaitId(CSzData *sd, UInt32 id)
-{
-  for (;;)
-  {
-    UInt64 type;
-    RINOK(ReadID(sd, &type));
-    if (type == id)
-      return SZ_OK;
-    if (type == k7zIdEnd)
-      return SZ_ERROR_ARCHIVE;
-    RINOK(SkipData(sd));
-  }
-}
-
-static SRes RememberBitVector(CSzData *sd, UInt32 numItems, const Byte **v)
-{
-  UInt32 numBytes = (numItems + 7) >> 3;
-  if (numBytes > sd->Size)
-    return SZ_ERROR_ARCHIVE;
-  *v = sd->Data;
-  SKIP_DATA(sd, numBytes);
-  return SZ_OK;
-}
-
-static UInt32 CountDefinedBits(const Byte *bits, UInt32 numItems)
-{
-  Byte b = 0;
-  unsigned m = 0;
-  UInt32 sum = 0;
-  for (; numItems != 0; numItems--)
-  {
-    if (m == 0)
-    {
-      b = *bits++;
-      m = 8;
-    }
-    m--;
-    sum += ((b >> m) & 1);
-  }
-  return sum;
-}
-
-static MY_NO_INLINE SRes ReadBitVector(CSzData *sd, UInt32 numItems, Byte **v, ISzAllocPtr alloc)
-{
-  Byte allAreDefined;
-  Byte *v2;
-  UInt32 numBytes = (numItems + 7) >> 3;
-  *v = NULL;
-  SZ_READ_BYTE(allAreDefined);
-  if (numBytes == 0)
-    return SZ_OK;
-  if (allAreDefined == 0)
-  {
-    if (numBytes > sd->Size)
-      return SZ_ERROR_ARCHIVE;
-    MY_ALLOC_AND_CPY(*v, numBytes, sd->Data, alloc);
-    SKIP_DATA(sd, numBytes);
-    return SZ_OK;
-  }
-  MY_ALLOC(Byte, *v, numBytes, alloc);
-  v2 = *v;
-  memset(v2, 0xFF, (size_t)numBytes);
-  {
-    unsigned numBits = (unsigned)numItems & 7;
-    if (numBits != 0)
-      v2[(size_t)numBytes - 1] = (Byte)((((UInt32)1 << numBits) - 1) << (8 - numBits));
-  }
-  return SZ_OK;
-}
-
-static MY_NO_INLINE SRes ReadUi32s(CSzData *sd2, UInt32 numItems, CSzBitUi32s *crcs, ISzAllocPtr alloc)
-{
-  UInt32 i;
-  CSzData sd;
-  UInt32 *vals;
-  const Byte *defs;
-  MY_ALLOC_ZE(UInt32, crcs->Vals, numItems, alloc);
-  sd = *sd2;
-  defs = crcs->Defs;
-  vals = crcs->Vals;
-  for (i = 0; i < numItems; i++)
-    if (SzBitArray_Check(defs, i))
-    {
-      SZ_READ_32(vals[i]);
-    }
-    else
-      vals[i] = 0;
-  *sd2 = sd;
-  return SZ_OK;
-}
-
-static SRes ReadBitUi32s(CSzData *sd, UInt32 numItems, CSzBitUi32s *crcs, ISzAllocPtr alloc)
-{
-  SzBitUi32s_Free(crcs, alloc);
-  RINOK(ReadBitVector(sd, numItems, &crcs->Defs, alloc));
-  return ReadUi32s(sd, numItems, crcs, alloc);
-}
-
-static SRes SkipBitUi32s(CSzData *sd, UInt32 numItems)
-{
-  Byte allAreDefined;
-  UInt32 numDefined = numItems;
-  SZ_READ_BYTE(allAreDefined);
-  if (!allAreDefined)
-  {
-    size_t numBytes = (numItems + 7) >> 3;
-    if (numBytes > sd->Size)
-      return SZ_ERROR_ARCHIVE;
-    numDefined = CountDefinedBits(sd->Data, numItems);
-    SKIP_DATA(sd, numBytes);
-  }
-  if (numDefined > (sd->Size >> 2))
-    return SZ_ERROR_ARCHIVE;
-  SKIP_DATA(sd, (size_t)numDefined * 4);
-  return SZ_OK;
-}
-
-static SRes ReadPackInfo(CSzAr *p, CSzData *sd, ISzAllocPtr alloc)
-{
-  RINOK(SzReadNumber32(sd, &p->NumPackStreams));
-
-  RINOK(WaitId(sd, k7zIdSize));
-  MY_ALLOC(UInt64, p->PackPositions, (size_t)p->NumPackStreams + 1, alloc);
-  {
-    UInt64 sum = 0;
-    UInt32 i;
-    UInt32 numPackStreams = p->NumPackStreams;
-    for (i = 0; i < numPackStreams; i++)
-    {
-      UInt64 packSize;
-      p->PackPositions[i] = sum;
-      RINOK(ReadNumber(sd, &packSize));
-      sum += packSize;
-      if (sum < packSize)
-        return SZ_ERROR_ARCHIVE;
-    }
-    p->PackPositions[i] = sum;
-  }
-
-  for (;;)
-  {
-    UInt64 type;
-    RINOK(ReadID(sd, &type));
-    if (type == k7zIdEnd)
-      return SZ_OK;
-    if (type == k7zIdCRC)
-    {
-      /* CRC of packed streams is unused now */
-      RINOK(SkipBitUi32s(sd, p->NumPackStreams));
-      continue;
-    }
-    RINOK(SkipData(sd));
-  }
-}
-
-/*
-static SRes SzReadSwitch(CSzData *sd)
-{
-  Byte external;
-  RINOK(SzReadByte(sd, &external));
-  return (external == 0) ? SZ_OK: SZ_ERROR_UNSUPPORTED;
-}
-*/
-
-#define k_NumCodersStreams_in_Folder_MAX (SZ_NUM_BONDS_IN_FOLDER_MAX + SZ_NUM_PACK_STREAMS_IN_FOLDER_MAX)
-
-SRes SzGetNextFolderItem(CSzFolder *f, CSzData *sd)
-{
-  UInt32 numCoders, i;
-  UInt32 numInStreams = 0;
-  const Byte *dataStart = sd->Data;
-
-  f->NumCoders = 0;
-  f->NumBonds = 0;
-  f->NumPackStreams = 0;
-  f->UnpackStream = 0;
-  
-  RINOK(SzReadNumber32(sd, &numCoders));
-  if (numCoders == 0 || numCoders > SZ_NUM_CODERS_IN_FOLDER_MAX)
-    return SZ_ERROR_UNSUPPORTED;
-  
-  for (i = 0; i < numCoders; i++)
-  {
-    Byte mainByte;
-    CSzCoderInfo *coder = f->Coders + i;
-    unsigned idSize, j;
-    UInt64 id;
-    
-    SZ_READ_BYTE(mainByte);
-    if ((mainByte & 0xC0) != 0)
-      return SZ_ERROR_UNSUPPORTED;
-    
-    idSize = (unsigned)(mainByte & 0xF);
-    if (idSize > sizeof(id))
-      return SZ_ERROR_UNSUPPORTED;
-    if (idSize > sd->Size)
-      return SZ_ERROR_ARCHIVE;
-    id = 0;
-    for (j = 0; j < idSize; j++)
-    {
-      id = ((id << 8) | *sd->Data);
-      sd->Data++;
-      sd->Size--;
-    }
-    if (id > (UInt32)0xFFFFFFFF)
-      return SZ_ERROR_UNSUPPORTED;
-    coder->MethodID = (UInt32)id;
-    
-    coder->NumStreams = 1;
-    coder->PropsOffset = 0;
-    coder->PropsSize = 0;
-    
-    if ((mainByte & 0x10) != 0)
-    {
-      UInt32 numStreams;
-      
-      RINOK(SzReadNumber32(sd, &numStreams));
-      if (numStreams > k_NumCodersStreams_in_Folder_MAX)
-        return SZ_ERROR_UNSUPPORTED;
-      coder->NumStreams = (Byte)numStreams;
-
-      RINOK(SzReadNumber32(sd, &numStreams));
-      if (numStreams != 1)
-        return SZ_ERROR_UNSUPPORTED;
-    }
-
-    numInStreams += coder->NumStreams;
-
-    if (numInStreams > k_NumCodersStreams_in_Folder_MAX)
-      return SZ_ERROR_UNSUPPORTED;
-
-    if ((mainByte & 0x20) != 0)
-    {
-      UInt32 propsSize = 0;
-      RINOK(SzReadNumber32(sd, &propsSize));
-      if (propsSize > sd->Size)
-        return SZ_ERROR_ARCHIVE;
-      if (propsSize >= 0x80)
-        return SZ_ERROR_UNSUPPORTED;
-      coder->PropsOffset = sd->Data - dataStart;
-      coder->PropsSize = (Byte)propsSize;
-      sd->Data += (size_t)propsSize;
-      sd->Size -= (size_t)propsSize;
-    }
-  }
-
-  /*
-  if (numInStreams == 1 && numCoders == 1)
-  {
-    f->NumPackStreams = 1;
-    f->PackStreams[0] = 0;
-  }
-  else
-  */
-  {
-    Byte streamUsed[k_NumCodersStreams_in_Folder_MAX];
-    UInt32 numBonds, numPackStreams;
-    
-    numBonds = numCoders - 1;
-    if (numInStreams < numBonds)
-      return SZ_ERROR_ARCHIVE;
-    if (numBonds > SZ_NUM_BONDS_IN_FOLDER_MAX)
-      return SZ_ERROR_UNSUPPORTED;
-    f->NumBonds = numBonds;
-    
-    numPackStreams = numInStreams - numBonds;
-    if (numPackStreams > SZ_NUM_PACK_STREAMS_IN_FOLDER_MAX)
-      return SZ_ERROR_UNSUPPORTED;
-    f->NumPackStreams = numPackStreams;
-  
-    for (i = 0; i < numInStreams; i++)
-      streamUsed[i] = False;
-    
-    if (numBonds != 0)
-    {
-      Byte coderUsed[SZ_NUM_CODERS_IN_FOLDER_MAX];
-
-      for (i = 0; i < numCoders; i++)
-        coderUsed[i] = False;
-      
-      for (i = 0; i < numBonds; i++)
-      {
-        CSzBond *bp = f->Bonds + i;
-        
-        RINOK(SzReadNumber32(sd, &bp->InIndex));
-        if (bp->InIndex >= numInStreams || streamUsed[bp->InIndex])
-          return SZ_ERROR_ARCHIVE;
-        streamUsed[bp->InIndex] = True;
-        
-        RINOK(SzReadNumber32(sd, &bp->OutIndex));
-        if (bp->OutIndex >= numCoders || coderUsed[bp->OutIndex])
-          return SZ_ERROR_ARCHIVE;
-        coderUsed[bp->OutIndex] = True;
-      }
-      
-      for (i = 0; i < numCoders; i++)
-        if (!coderUsed[i])
-        {
-          f->UnpackStream = i;
-          break;
-        }
-      
-      if (i == numCoders)
-        return SZ_ERROR_ARCHIVE;
-    }
-    
-    if (numPackStreams == 1)
-    {
-      for (i = 0; i < numInStreams; i++)
-        if (!streamUsed[i])
-          break;
-      if (i == numInStreams)
-        return SZ_ERROR_ARCHIVE;
-      f->PackStreams[0] = i;
-    }
-    else
-      for (i = 0; i < numPackStreams; i++)
-      {
-        UInt32 index;
-        RINOK(SzReadNumber32(sd, &index));
-        if (index >= numInStreams || streamUsed[index])
-          return SZ_ERROR_ARCHIVE;
-        streamUsed[index] = True;
-        f->PackStreams[i] = index;
-      }
-  }
-
-  f->NumCoders = numCoders;
-
-  return SZ_OK;
-}
-
-
-static MY_NO_INLINE SRes SkipNumbers(CSzData *sd2, UInt32 num)
-{
-  CSzData sd;
-  sd = *sd2;
-  for (; num != 0; num--)
-  {
-    Byte firstByte, mask;
-    unsigned i;
-    SZ_READ_BYTE_2(firstByte);
-    if ((firstByte & 0x80) == 0)
-      continue;
-    if ((firstByte & 0x40) == 0)
-    {
-      if (sd.Size == 0)
-        return SZ_ERROR_ARCHIVE;
-      sd.Size--;
-      sd.Data++;
-      continue;
-    }
-    mask = 0x20;
-    for (i = 2; i < 8 && (firstByte & mask) != 0; i++)
-      mask >>= 1;
-    if (i > sd.Size)
-      return SZ_ERROR_ARCHIVE;
-    SKIP_DATA2(sd, i);
-  }
-  *sd2 = sd;
-  return SZ_OK;
-}
-
-
-#define k_Scan_NumCoders_MAX 64
-#define k_Scan_NumCodersStreams_in_Folder_MAX 64
-
-
-static SRes ReadUnpackInfo(CSzAr *p,
-    CSzData *sd2,
-    UInt32 numFoldersMax,
-    const CBuf *tempBufs, UInt32 numTempBufs,
-    ISzAllocPtr alloc)
-{
-  CSzData sd;
-  
-  UInt32 fo, numFolders, numCodersOutStreams, packStreamIndex;
-  const Byte *startBufPtr;
-  Byte external;
-  
-  RINOK(WaitId(sd2, k7zIdFolder));
-  
-  RINOK(SzReadNumber32(sd2, &numFolders));
-  if (numFolders > numFoldersMax)
-    return SZ_ERROR_UNSUPPORTED;
-  p->NumFolders = numFolders;
-
-  SZ_READ_BYTE_SD(sd2, external);
-  if (external == 0)
-    sd = *sd2;
-  else
-  {
-    UInt32 index;
-    RINOK(SzReadNumber32(sd2, &index));
-    if (index >= numTempBufs)
-      return SZ_ERROR_ARCHIVE;
-    sd.Data = tempBufs[index].data;
-    sd.Size = tempBufs[index].size;
-  }
-  
-  MY_ALLOC(size_t, p->FoCodersOffsets, (size_t)numFolders + 1, alloc);
-  MY_ALLOC(UInt32, p->FoStartPackStreamIndex, (size_t)numFolders + 1, alloc);
-  MY_ALLOC(UInt32, p->FoToCoderUnpackSizes, (size_t)numFolders + 1, alloc);
-  MY_ALLOC_ZE(Byte, p->FoToMainUnpackSizeIndex, (size_t)numFolders, alloc);
-  
-  startBufPtr = sd.Data;
-  
-  packStreamIndex = 0;
-  numCodersOutStreams = 0;
-
-  for (fo = 0; fo < numFolders; fo++)
-  {
-    UInt32 numCoders, ci, numInStreams = 0;
-    
-    p->FoCodersOffsets[fo] = sd.Data - startBufPtr;
-    
-    RINOK(SzReadNumber32(&sd, &numCoders));
-    if (numCoders == 0 || numCoders > k_Scan_NumCoders_MAX)
-      return SZ_ERROR_UNSUPPORTED;
-    
-    for (ci = 0; ci < numCoders; ci++)
-    {
-      Byte mainByte;
-      unsigned idSize;
-      UInt32 coderInStreams;
-      
-      SZ_READ_BYTE_2(mainByte);
-      if ((mainByte & 0xC0) != 0)
-        return SZ_ERROR_UNSUPPORTED;
-      idSize = (mainByte & 0xF);
-      if (idSize > 8)
-        return SZ_ERROR_UNSUPPORTED;
-      if (idSize > sd.Size)
-        return SZ_ERROR_ARCHIVE;
-      SKIP_DATA2(sd, idSize);
-      
-      coderInStreams = 1;
-      
-      if ((mainByte & 0x10) != 0)
-      {
-        UInt32 coderOutStreams;
-        RINOK(SzReadNumber32(&sd, &coderInStreams));
-        RINOK(SzReadNumber32(&sd, &coderOutStreams));
-        if (coderInStreams > k_Scan_NumCodersStreams_in_Folder_MAX || coderOutStreams != 1)
-          return SZ_ERROR_UNSUPPORTED;
-      }
-      
-      numInStreams += coderInStreams;
-
-      if ((mainByte & 0x20) != 0)
-      {
-        UInt32 propsSize;
-        RINOK(SzReadNumber32(&sd, &propsSize));
-        if (propsSize > sd.Size)
-          return SZ_ERROR_ARCHIVE;
-        SKIP_DATA2(sd, propsSize);
-      }
-    }
-    
-    {
-      UInt32 indexOfMainStream = 0;
-      UInt32 numPackStreams = 1;
-      
-      if (numCoders != 1 || numInStreams != 1)
-      {
-        Byte streamUsed[k_Scan_NumCodersStreams_in_Folder_MAX];
-        Byte coderUsed[k_Scan_NumCoders_MAX];
-    
-        UInt32 i;
-        UInt32 numBonds = numCoders - 1;
-        if (numInStreams < numBonds)
-          return SZ_ERROR_ARCHIVE;
-        
-        if (numInStreams > k_Scan_NumCodersStreams_in_Folder_MAX)
-          return SZ_ERROR_UNSUPPORTED;
-        
-        for (i = 0; i < numInStreams; i++)
-          streamUsed[i] = False;
-        for (i = 0; i < numCoders; i++)
-          coderUsed[i] = False;
-        
-        for (i = 0; i < numBonds; i++)
-        {
-          UInt32 index;
-          
-          RINOK(SzReadNumber32(&sd, &index));
-          if (index >= numInStreams || streamUsed[index])
-            return SZ_ERROR_ARCHIVE;
-          streamUsed[index] = True;
-          
-          RINOK(SzReadNumber32(&sd, &index));
-          if (index >= numCoders || coderUsed[index])
-            return SZ_ERROR_ARCHIVE;
-          coderUsed[index] = True;
-        }
-        
-        numPackStreams = numInStreams - numBonds;
-        
-        if (numPackStreams != 1)
-          for (i = 0; i < numPackStreams; i++)
-          {
-            UInt32 index;
-            RINOK(SzReadNumber32(&sd, &index));
-            if (index >= numInStreams || streamUsed[index])
-              return SZ_ERROR_ARCHIVE;
-            streamUsed[index] = True;
-          }
-          
-        for (i = 0; i < numCoders; i++)
-          if (!coderUsed[i])
-          {
-            indexOfMainStream = i;
-            break;
-          }
- 
-        if (i == numCoders)
-          return SZ_ERROR_ARCHIVE;
-      }
-      
-      p->FoStartPackStreamIndex[fo] = packStreamIndex;
-      p->FoToCoderUnpackSizes[fo] = numCodersOutStreams;
-      p->FoToMainUnpackSizeIndex[fo] = (Byte)indexOfMainStream;
-      numCodersOutStreams += numCoders;
-      if (numCodersOutStreams < numCoders)
-        return SZ_ERROR_UNSUPPORTED;
-      if (numPackStreams > p->NumPackStreams - packStreamIndex)
-        return SZ_ERROR_ARCHIVE;
-      packStreamIndex += numPackStreams;
-    }
-  }
-
-  p->FoToCoderUnpackSizes[fo] = numCodersOutStreams;
-  
-  {
-    size_t dataSize = sd.Data - startBufPtr;
-    p->FoStartPackStreamIndex[fo] = packStreamIndex;
-    p->FoCodersOffsets[fo] = dataSize;
-    MY_ALLOC_ZE_AND_CPY(p->CodersData, dataSize, startBufPtr, alloc);
-  }
-  
-  if (external != 0)
-  {
-    if (sd.Size != 0)
-      return SZ_ERROR_ARCHIVE;
-    sd = *sd2;
-  }
-  
-  RINOK(WaitId(&sd, k7zIdCodersUnpackSize));
-  
-  MY_ALLOC_ZE(UInt64, p->CoderUnpackSizes, (size_t)numCodersOutStreams, alloc);
-  {
-    UInt32 i;
-    for (i = 0; i < numCodersOutStreams; i++)
-    {
-      RINOK(ReadNumber(&sd, p->CoderUnpackSizes + i));
-    }
-  }
-
-  for (;;)
-  {
-    UInt64 type;
-    RINOK(ReadID(&sd, &type));
-    if (type == k7zIdEnd)
-    {
-      *sd2 = sd;
-      return SZ_OK;
-    }
-    if (type == k7zIdCRC)
-    {
-      RINOK(ReadBitUi32s(&sd, numFolders, &p->FolderCRCs, alloc));
-      continue;
-    }
-    RINOK(SkipData(&sd));
-  }
-}
-
-
-UInt64 SzAr_GetFolderUnpackSize(const CSzAr *p, UInt32 folderIndex)
-{
-  return p->CoderUnpackSizes[p->FoToCoderUnpackSizes[folderIndex] + p->FoToMainUnpackSizeIndex[folderIndex]];
-}
-
-
-typedef struct
-{
-  UInt32 NumTotalSubStreams;
-  UInt32 NumSubDigests;
-  CSzData sdNumSubStreams;
-  CSzData sdSizes;
-  CSzData sdCRCs;
-} CSubStreamInfo;
-
-
-static SRes ReadSubStreamsInfo(CSzAr *p, CSzData *sd, CSubStreamInfo *ssi)
-{
-  UInt64 type = 0;
-  UInt32 numSubDigests = 0;
-  UInt32 numFolders = p->NumFolders;
-  UInt32 numUnpackStreams = numFolders;
-  UInt32 numUnpackSizesInData = 0;
-
-  for (;;)
-  {
-    RINOK(ReadID(sd, &type));
-    if (type == k7zIdNumUnpackStream)
-    {
-      UInt32 i;
-      ssi->sdNumSubStreams.Data = sd->Data;
-      numUnpackStreams = 0;
-      numSubDigests = 0;
-      for (i = 0; i < numFolders; i++)
-      {
-        UInt32 numStreams;
-        RINOK(SzReadNumber32(sd, &numStreams));
-        if (numUnpackStreams > numUnpackStreams + numStreams)
-          return SZ_ERROR_UNSUPPORTED;
-        numUnpackStreams += numStreams;
-        if (numStreams != 0)
-          numUnpackSizesInData += (numStreams - 1);
-        if (numStreams != 1 || !SzBitWithVals_Check(&p->FolderCRCs, i))
-          numSubDigests += numStreams;
-      }
-      ssi->sdNumSubStreams.Size = sd->Data - ssi->sdNumSubStreams.Data;
-      continue;
-    }
-    if (type == k7zIdCRC || type == k7zIdSize || type == k7zIdEnd)
-      break;
-    RINOK(SkipData(sd));
-  }
-
-  if (!ssi->sdNumSubStreams.Data)
-  {
-    numSubDigests = numFolders;
-    if (p->FolderCRCs.Defs)
-      numSubDigests = numFolders - CountDefinedBits(p->FolderCRCs.Defs, numFolders);
-  }
-  
-  ssi->NumTotalSubStreams = numUnpackStreams;
-  ssi->NumSubDigests = numSubDigests;
-
-  if (type == k7zIdSize)
-  {
-    ssi->sdSizes.Data = sd->Data;
-    RINOK(SkipNumbers(sd, numUnpackSizesInData));
-    ssi->sdSizes.Size = sd->Data - ssi->sdSizes.Data;
-    RINOK(ReadID(sd, &type));
-  }
-
-  for (;;)
-  {
-    if (type == k7zIdEnd)
-      return SZ_OK;
-    if (type == k7zIdCRC)
-    {
-      ssi->sdCRCs.Data = sd->Data;
-      RINOK(SkipBitUi32s(sd, numSubDigests));
-      ssi->sdCRCs.Size = sd->Data - ssi->sdCRCs.Data;
-    }
-    else
-    {
-      RINOK(SkipData(sd));
-    }
-    RINOK(ReadID(sd, &type));
-  }
-}
-
-static SRes SzReadStreamsInfo(CSzAr *p,
-    CSzData *sd,
-    UInt32 numFoldersMax, const CBuf *tempBufs, UInt32 numTempBufs,
-    UInt64 *dataOffset,
-    CSubStreamInfo *ssi,
-    ISzAllocPtr alloc)
-{
-  UInt64 type;
-
-  SzData_Clear(&ssi->sdSizes);
-  SzData_Clear(&ssi->sdCRCs);
-  SzData_Clear(&ssi->sdNumSubStreams);
-
-  *dataOffset = 0;
-  RINOK(ReadID(sd, &type));
-  if (type == k7zIdPackInfo)
-  {
-    RINOK(ReadNumber(sd, dataOffset));
-    RINOK(ReadPackInfo(p, sd, alloc));
-    RINOK(ReadID(sd, &type));
-  }
-  if (type == k7zIdUnpackInfo)
-  {
-    RINOK(ReadUnpackInfo(p, sd, numFoldersMax, tempBufs, numTempBufs, alloc));
-    RINOK(ReadID(sd, &type));
-  }
-  if (type == k7zIdSubStreamsInfo)
-  {
-    RINOK(ReadSubStreamsInfo(p, sd, ssi));
-    RINOK(ReadID(sd, &type));
-  }
-  else
-  {
-    ssi->NumTotalSubStreams = p->NumFolders;
-    // ssi->NumSubDigests = 0;
-  }
-
-  return (type == k7zIdEnd ? SZ_OK : SZ_ERROR_UNSUPPORTED);
-}
-
-static SRes SzReadAndDecodePackedStreams(
-    ILookInStream *inStream,
-    CSzData *sd,
-    CBuf *tempBufs,
-    UInt32 numFoldersMax,
-    UInt64 baseOffset,
-    CSzAr *p,
-    ISzAllocPtr allocTemp)
-{
-  UInt64 dataStartPos;
-  UInt32 fo;
-  CSubStreamInfo ssi;
-
-  RINOK(SzReadStreamsInfo(p, sd, numFoldersMax, NULL, 0, &dataStartPos, &ssi, allocTemp));
-  
-  dataStartPos += baseOffset;
-  if (p->NumFolders == 0)
-    return SZ_ERROR_ARCHIVE;
- 
-  for (fo = 0; fo < p->NumFolders; fo++)
-    Buf_Init(tempBufs + fo);
-  
-  for (fo = 0; fo < p->NumFolders; fo++)
-  {
-    CBuf *tempBuf = tempBufs + fo;
-    UInt64 unpackSize = SzAr_GetFolderUnpackSize(p, fo);
-    if ((size_t)unpackSize != unpackSize)
-      return SZ_ERROR_MEM;
-    if (!Buf_Create(tempBuf, (size_t)unpackSize, allocTemp))
-      return SZ_ERROR_MEM;
-  }
-  
-  for (fo = 0; fo < p->NumFolders; fo++)
-  {
-    const CBuf *tempBuf = tempBufs + fo;
-    RINOK(LookInStream_SeekTo(inStream, dataStartPos));
-    RINOK(SzAr_DecodeFolder(p, fo, inStream, dataStartPos, tempBuf->data, tempBuf->size, allocTemp));
-  }
-  
-  return SZ_OK;
-}
-
-static SRes SzReadFileNames(const Byte *data, size_t size, UInt32 numFiles, size_t *offsets)
-{
-  size_t pos = 0;
-  *offsets++ = 0;
-  if (numFiles == 0)
-    return (size == 0) ? SZ_OK : SZ_ERROR_ARCHIVE;
-  if (size < 2)
-    return SZ_ERROR_ARCHIVE;
-  if (data[size - 2] != 0 || data[size - 1] != 0)
-    return SZ_ERROR_ARCHIVE;
-  do
-  {
-    const Byte *p;
-    if (pos == size)
-      return SZ_ERROR_ARCHIVE;
-    for (p = data + pos;
-      #ifdef _WIN32
-      *(const UInt16 *)p != 0
-      #else
-      p[0] != 0 || p[1] != 0
-      #endif
-      ; p += 2);
-    pos = p - data + 2;
-    *offsets++ = (pos >> 1);
-  }
-  while (--numFiles);
-  return (pos == size) ? SZ_OK : SZ_ERROR_ARCHIVE;
-}
-
-static MY_NO_INLINE SRes ReadTime(CSzBitUi64s *p, UInt32 num,
-    CSzData *sd2,
-    const CBuf *tempBufs, UInt32 numTempBufs,
-    ISzAllocPtr alloc)
-{
-  CSzData sd;
-  UInt32 i;
-  CNtfsFileTime *vals;
-  Byte *defs;
-  Byte external;
-  
-  RINOK(ReadBitVector(sd2, num, &p->Defs, alloc));
-  
-  SZ_READ_BYTE_SD(sd2, external);
-  if (external == 0)
-    sd = *sd2;
-  else
-  {
-    UInt32 index;
-    RINOK(SzReadNumber32(sd2, &index));
-    if (index >= numTempBufs)
-      return SZ_ERROR_ARCHIVE;
-    sd.Data = tempBufs[index].data;
-    sd.Size = tempBufs[index].size;
-  }
-  
-  MY_ALLOC_ZE(CNtfsFileTime, p->Vals, num, alloc);
-  vals = p->Vals;
-  defs = p->Defs;
-  for (i = 0; i < num; i++)
-    if (SzBitArray_Check(defs, i))
-    {
-      if (sd.Size < 8)
-        return SZ_ERROR_ARCHIVE;
-      vals[i].Low = GetUi32(sd.Data);
-      vals[i].High = GetUi32(sd.Data + 4);
-      SKIP_DATA2(sd, 8);
-    }
-    else
-      vals[i].High = vals[i].Low = 0;
-  
-  if (external == 0)
-    *sd2 = sd;
-  
-  return SZ_OK;
-}
-
-
-#define NUM_ADDITIONAL_STREAMS_MAX 8
-
-
-static SRes SzReadHeader2(
-    CSzArEx *p,   /* allocMain */
-    CSzData *sd,
-    ILookInStream *inStream,
-    CBuf *tempBufs, UInt32 *numTempBufs,
-    ISzAllocPtr allocMain,
-    ISzAllocPtr allocTemp
-    )
-{
-  CSubStreamInfo ssi;
-
-{
-  UInt64 type;
-  
-  SzData_Clear(&ssi.sdSizes);
-  SzData_Clear(&ssi.sdCRCs);
-  SzData_Clear(&ssi.sdNumSubStreams);
-
-  ssi.NumSubDigests = 0;
-  ssi.NumTotalSubStreams = 0;
-
-  RINOK(ReadID(sd, &type));
-
-  if (type == k7zIdArchiveProperties)
-  {
-    for (;;)
-    {
-      UInt64 type2;
-      RINOK(ReadID(sd, &type2));
-      if (type2 == k7zIdEnd)
-        break;
-      RINOK(SkipData(sd));
-    }
-    RINOK(ReadID(sd, &type));
-  }
-
-  if (type == k7zIdAdditionalStreamsInfo)
-  {
-    CSzAr tempAr;
-    SRes res;
-    
-    SzAr_Init(&tempAr);
-    res = SzReadAndDecodePackedStreams(inStream, sd, tempBufs, NUM_ADDITIONAL_STREAMS_MAX,
-        p->startPosAfterHeader, &tempAr, allocTemp);
-    *numTempBufs = tempAr.NumFolders;
-    SzAr_Free(&tempAr, allocTemp);
-    
-    if (res != SZ_OK)
-      return res;
-    RINOK(ReadID(sd, &type));
-  }
-
-  if (type == k7zIdMainStreamsInfo)
-  {
-    RINOK(SzReadStreamsInfo(&p->db, sd, (UInt32)1 << 30, tempBufs, *numTempBufs,
-        &p->dataPos, &ssi, allocMain));
-    p->dataPos += p->startPosAfterHeader;
-    RINOK(ReadID(sd, &type));
-  }
-
-  if (type == k7zIdEnd)
-  {
-    return SZ_OK;
-  }
-
-  if (type != k7zIdFilesInfo)
-    return SZ_ERROR_ARCHIVE;
-}
-
-{
-  UInt32 numFiles = 0;
-  UInt32 numEmptyStreams = 0;
-  const Byte *emptyStreams = NULL;
-  const Byte *emptyFiles = NULL;
-  
-  RINOK(SzReadNumber32(sd, &numFiles));
-  p->NumFiles = numFiles;
-
-  for (;;)
-  {
-    UInt64 type;
-    UInt64 size;
-    RINOK(ReadID(sd, &type));
-    if (type == k7zIdEnd)
-      break;
-    RINOK(ReadNumber(sd, &size));
-    if (size > sd->Size)
-      return SZ_ERROR_ARCHIVE;
-    
-    if (type >= ((UInt32)1 << 8))
-    {
-      SKIP_DATA(sd, size);
-    }
-    else switch ((unsigned)type)
-    {
-      case k7zIdName:
-      {
-        size_t namesSize;
-        const Byte *namesData;
-        Byte external;
-
-        SZ_READ_BYTE(external);
-        if (external == 0)
-        {
-          namesSize = (size_t)size - 1;
-          namesData = sd->Data;
-        }
-        else
-        {
-          UInt32 index;
-          RINOK(SzReadNumber32(sd, &index));
-          if (index >= *numTempBufs)
-            return SZ_ERROR_ARCHIVE;
-          namesData = (tempBufs)[index].data;
-          namesSize = (tempBufs)[index].size;
-        }
-
-        if ((namesSize & 1) != 0)
-          return SZ_ERROR_ARCHIVE;
-        MY_ALLOC(size_t, p->FileNameOffsets, numFiles + 1, allocMain);
-        MY_ALLOC_ZE_AND_CPY(p->FileNames, namesSize, namesData, allocMain);
-        RINOK(SzReadFileNames(p->FileNames, namesSize, numFiles, p->FileNameOffsets))
-        if (external == 0)
-        {
-          SKIP_DATA(sd, namesSize);
-        }
-        break;
-      }
-      case k7zIdEmptyStream:
-      {
-        RINOK(RememberBitVector(sd, numFiles, &emptyStreams));
-        numEmptyStreams = CountDefinedBits(emptyStreams, numFiles);
-        emptyFiles = NULL;
-        break;
-      }
-      case k7zIdEmptyFile:
-      {
-        RINOK(RememberBitVector(sd, numEmptyStreams, &emptyFiles));
-        break;
-      }
-      case k7zIdWinAttrib:
-      {
-        Byte external;
-        CSzData sdSwitch;
-        CSzData *sdPtr;
-        SzBitUi32s_Free(&p->Attribs, allocMain);
-        RINOK(ReadBitVector(sd, numFiles, &p->Attribs.Defs, allocMain));
-
-        SZ_READ_BYTE(external);
-        if (external == 0)
-          sdPtr = sd;
-        else
-        {
-          UInt32 index;
-          RINOK(SzReadNumber32(sd, &index));
-          if (index >= *numTempBufs)
-            return SZ_ERROR_ARCHIVE;
-          sdSwitch.Data = (tempBufs)[index].data;
-          sdSwitch.Size = (tempBufs)[index].size;
-          sdPtr = &sdSwitch;
-        }
-        RINOK(ReadUi32s(sdPtr, numFiles, &p->Attribs, allocMain));
-        break;
-      }
-      /*
-      case k7zParent:
-      {
-        SzBitUi32s_Free(&p->Parents, allocMain);
-        RINOK(ReadBitVector(sd, numFiles, &p->Parents.Defs, allocMain));
-        RINOK(SzReadSwitch(sd));
-        RINOK(ReadUi32s(sd, numFiles, &p->Parents, allocMain));
-        break;
-      }
-      */
-      case k7zIdMTime: RINOK(ReadTime(&p->MTime, numFiles, sd, tempBufs, *numTempBufs, allocMain)); break;
-      case k7zIdCTime: RINOK(ReadTime(&p->CTime, numFiles, sd, tempBufs, *numTempBufs, allocMain)); break;
-      default:
-      {
-        SKIP_DATA(sd, size);
-      }
-    }
-  }
-
-  if (numFiles - numEmptyStreams != ssi.NumTotalSubStreams)
-    return SZ_ERROR_ARCHIVE;
-
-  for (;;)
-  {
-    UInt64 type;
-    RINOK(ReadID(sd, &type));
-    if (type == k7zIdEnd)
-      break;
-    RINOK(SkipData(sd));
-  }
-
-  {
-    UInt32 i;
-    UInt32 emptyFileIndex = 0;
-    UInt32 folderIndex = 0;
-    UInt32 remSubStreams = 0;
-    UInt32 numSubStreams = 0;
-    UInt64 unpackPos = 0;
-    const Byte *digestsDefs = NULL;
-    const Byte *digestsVals = NULL;
-    UInt32 digestsValsIndex = 0;
-    UInt32 digestIndex;
-    Byte allDigestsDefined = 0;
-    Byte isDirMask = 0;
-    Byte crcMask = 0;
-    Byte mask = 0x80;
-    
-    MY_ALLOC(UInt32, p->FolderToFile, p->db.NumFolders + 1, allocMain);
-    MY_ALLOC_ZE(UInt32, p->FileToFolder, p->NumFiles, allocMain);
-    MY_ALLOC(UInt64, p->UnpackPositions, p->NumFiles + 1, allocMain);
-    MY_ALLOC_ZE(Byte, p->IsDirs, (p->NumFiles + 7) >> 3, allocMain);
-
-    RINOK(SzBitUi32s_Alloc(&p->CRCs, p->NumFiles, allocMain));
-
-    if (ssi.sdCRCs.Size != 0)
-    {
-      SZ_READ_BYTE_SD(&ssi.sdCRCs, allDigestsDefined);
-      if (allDigestsDefined)
-        digestsVals = ssi.sdCRCs.Data;
-      else
-      {
-        size_t numBytes = (ssi.NumSubDigests + 7) >> 3;
-        digestsDefs = ssi.sdCRCs.Data;
-        digestsVals = digestsDefs + numBytes;
-      }
-    }
-
-    digestIndex = 0;
-    
-    for (i = 0; i < numFiles; i++, mask >>= 1)
-    {
-      if (mask == 0)
-      {
-        UInt32 byteIndex = (i - 1) >> 3;
-        p->IsDirs[byteIndex] = isDirMask;
-        p->CRCs.Defs[byteIndex] = crcMask;
-        isDirMask = 0;
-        crcMask = 0;
-        mask = 0x80;
-      }
-
-      p->UnpackPositions[i] = unpackPos;
-      p->CRCs.Vals[i] = 0;
-      
-      if (emptyStreams && SzBitArray_Check(emptyStreams, i))
-      {
-        if (emptyFiles)
-        {
-          if (!SzBitArray_Check(emptyFiles, emptyFileIndex))
-            isDirMask |= mask;
-          emptyFileIndex++;
-        }
-        else
-          isDirMask |= mask;
-        if (remSubStreams == 0)
-        {
-          p->FileToFolder[i] = (UInt32)-1;
-          continue;
-        }
-      }
-      
-      if (remSubStreams == 0)
-      {
-        for (;;)
-        {
-          if (folderIndex >= p->db.NumFolders)
-            return SZ_ERROR_ARCHIVE;
-          p->FolderToFile[folderIndex] = i;
-          numSubStreams = 1;
-          if (ssi.sdNumSubStreams.Data)
-          {
-            RINOK(SzReadNumber32(&ssi.sdNumSubStreams, &numSubStreams));
-          }
-          remSubStreams = numSubStreams;
-          if (numSubStreams != 0)
-            break;
-          {
-            UInt64 folderUnpackSize = SzAr_GetFolderUnpackSize(&p->db, folderIndex);
-            unpackPos += folderUnpackSize;
-            if (unpackPos < folderUnpackSize)
-              return SZ_ERROR_ARCHIVE;
-          }
-
-          folderIndex++;
-        }
-      }
-      
-      p->FileToFolder[i] = folderIndex;
-      
-      if (emptyStreams && SzBitArray_Check(emptyStreams, i))
-        continue;
-      
-      if (--remSubStreams == 0)
-      {
-        UInt64 folderUnpackSize = SzAr_GetFolderUnpackSize(&p->db, folderIndex);
-        UInt64 startFolderUnpackPos = p->UnpackPositions[p->FolderToFile[folderIndex]];
-        if (folderUnpackSize < unpackPos - startFolderUnpackPos)
-          return SZ_ERROR_ARCHIVE;
-        unpackPos = startFolderUnpackPos + folderUnpackSize;
-        if (unpackPos < folderUnpackSize)
-          return SZ_ERROR_ARCHIVE;
-
-        if (numSubStreams == 1 && SzBitWithVals_Check(&p->db.FolderCRCs, i))
-        {
-          p->CRCs.Vals[i] = p->db.FolderCRCs.Vals[folderIndex];
-          crcMask |= mask;
-        }
-        else if (allDigestsDefined || (digestsDefs && SzBitArray_Check(digestsDefs, digestIndex)))
-        {
-          p->CRCs.Vals[i] = GetUi32(digestsVals + (size_t)digestsValsIndex * 4);
-          digestsValsIndex++;
-          crcMask |= mask;
-        }
-        
-        folderIndex++;
-      }
-      else
-      {
-        UInt64 v;
-        RINOK(ReadNumber(&ssi.sdSizes, &v));
-        unpackPos += v;
-        if (unpackPos < v)
-          return SZ_ERROR_ARCHIVE;
-        if (allDigestsDefined || (digestsDefs && SzBitArray_Check(digestsDefs, digestIndex)))
-        {
-          p->CRCs.Vals[i] = GetUi32(digestsVals + (size_t)digestsValsIndex * 4);
-          digestsValsIndex++;
-          crcMask |= mask;
-        }
-      }
-    }
-
-    if (mask != 0x80)
-    {
-      UInt32 byteIndex = (i - 1) >> 3;
-      p->IsDirs[byteIndex] = isDirMask;
-      p->CRCs.Defs[byteIndex] = crcMask;
-    }
-    
-    p->UnpackPositions[i] = unpackPos;
-
-    if (remSubStreams != 0)
-      return SZ_ERROR_ARCHIVE;
-
-    for (;;)
-    {
-      p->FolderToFile[folderIndex] = i;
-      if (folderIndex >= p->db.NumFolders)
-        break;
-      if (!ssi.sdNumSubStreams.Data)
-        return SZ_ERROR_ARCHIVE;
-      RINOK(SzReadNumber32(&ssi.sdNumSubStreams, &numSubStreams));
-      if (numSubStreams != 0)
-        return SZ_ERROR_ARCHIVE;
-      /*
-      {
-        UInt64 folderUnpackSize = SzAr_GetFolderUnpackSize(&p->db, folderIndex);
-        unpackPos += folderUnpackSize;
-        if (unpackPos < folderUnpackSize)
-          return SZ_ERROR_ARCHIVE;
-      }
-      */
-      folderIndex++;
-    }
-
-    if (ssi.sdNumSubStreams.Data && ssi.sdNumSubStreams.Size != 0)
-      return SZ_ERROR_ARCHIVE;
-  }
-}
-  return SZ_OK;
-}
-
-
-static SRes SzReadHeader(
-    CSzArEx *p,
-    CSzData *sd,
-    ILookInStream *inStream,
-    ISzAllocPtr allocMain,
-    ISzAllocPtr allocTemp)
-{
-  UInt32 i;
-  UInt32 numTempBufs = 0;
-  SRes res;
-  CBuf tempBufs[NUM_ADDITIONAL_STREAMS_MAX];
-
-  for (i = 0; i < NUM_ADDITIONAL_STREAMS_MAX; i++)
-    Buf_Init(tempBufs + i);
-  
-  res = SzReadHeader2(p, sd, inStream,
-      tempBufs, &numTempBufs,
-      allocMain, allocTemp);
-  
-  for (i = 0; i < NUM_ADDITIONAL_STREAMS_MAX; i++)
-    Buf_Free(tempBufs + i, allocTemp);
-
-  RINOK(res);
-
-  if (sd->Size != 0)
-    return SZ_ERROR_FAIL;
-
-  return res;
-}
-
-static SRes SzArEx_Open2(
-    CSzArEx *p,
-    ILookInStream *inStream,
-    ISzAllocPtr allocMain,
-    ISzAllocPtr allocTemp)
-{
-  Byte header[k7zStartHeaderSize];
-  Int64 startArcPos;
-  UInt64 nextHeaderOffset, nextHeaderSize;
-  size_t nextHeaderSizeT;
-  UInt32 nextHeaderCRC;
-  CBuf buf;
-  SRes res;
-
-  startArcPos = 0;
-  RINOK(ILookInStream_Seek(inStream, &startArcPos, SZ_SEEK_CUR));
-
-  RINOK(LookInStream_Read2(inStream, header, k7zStartHeaderSize, SZ_ERROR_NO_ARCHIVE));
-
-  if (!TestSignatureCandidate(header))
-    return SZ_ERROR_NO_ARCHIVE;
-  if (header[6] != k7zMajorVersion)
-    return SZ_ERROR_UNSUPPORTED;
-
-  nextHeaderOffset = GetUi64(header + 12);
-  nextHeaderSize = GetUi64(header + 20);
-  nextHeaderCRC = GetUi32(header + 28);
-
-  p->startPosAfterHeader = startArcPos + k7zStartHeaderSize;
-  
-  if (CrcCalc(header + 12, 20) != GetUi32(header + 8))
-    return SZ_ERROR_CRC;
-
-  nextHeaderSizeT = (size_t)nextHeaderSize;
-  if (nextHeaderSizeT != nextHeaderSize)
-    return SZ_ERROR_MEM;
-  if (nextHeaderSizeT == 0)
-    return SZ_OK;
-  if (nextHeaderOffset > nextHeaderOffset + nextHeaderSize ||
-      nextHeaderOffset > nextHeaderOffset + nextHeaderSize + k7zStartHeaderSize)
-    return SZ_ERROR_NO_ARCHIVE;
-
-  {
-    Int64 pos = 0;
-    RINOK(ILookInStream_Seek(inStream, &pos, SZ_SEEK_END));
-    if ((UInt64)pos < startArcPos + nextHeaderOffset ||
-        (UInt64)pos < startArcPos + k7zStartHeaderSize + nextHeaderOffset ||
-        (UInt64)pos < startArcPos + k7zStartHeaderSize + nextHeaderOffset + nextHeaderSize)
-      return SZ_ERROR_INPUT_EOF;
-  }
-
-  RINOK(LookInStream_SeekTo(inStream, startArcPos + k7zStartHeaderSize + nextHeaderOffset));
-
-  if (!Buf_Create(&buf, nextHeaderSizeT, allocTemp))
-    return SZ_ERROR_MEM;
-
-  res = LookInStream_Read(inStream, buf.data, nextHeaderSizeT);
-  
-  if (res == SZ_OK)
-  {
-    res = SZ_ERROR_ARCHIVE;
-    if (CrcCalc(buf.data, nextHeaderSizeT) == nextHeaderCRC)
-    {
-      CSzData sd;
-      UInt64 type;
-      sd.Data = buf.data;
-      sd.Size = buf.size;
-      
-      res = ReadID(&sd, &type);
-      
-      if (res == SZ_OK && type == k7zIdEncodedHeader)
-      {
-        CSzAr tempAr;
-        CBuf tempBuf;
-        Buf_Init(&tempBuf);
-        
-        SzAr_Init(&tempAr);
-        res = SzReadAndDecodePackedStreams(inStream, &sd, &tempBuf, 1, p->startPosAfterHeader, &tempAr, allocTemp);
-        SzAr_Free(&tempAr, allocTemp);
-       
-        if (res != SZ_OK)
-        {
-          Buf_Free(&tempBuf, allocTemp);
-        }
-        else
-        {
-          Buf_Free(&buf, allocTemp);
-          buf.data = tempBuf.data;
-          buf.size = tempBuf.size;
-          sd.Data = buf.data;
-          sd.Size = buf.size;
-          res = ReadID(&sd, &type);
-        }
-      }
-  
-      if (res == SZ_OK)
-      {
-        if (type == k7zIdHeader)
-        {
-          /*
-          CSzData sd2;
-          unsigned ttt;
-          for (ttt = 0; ttt < 40000; ttt++)
-          {
-            SzArEx_Free(p, allocMain);
-            sd2 = sd;
-            res = SzReadHeader(p, &sd2, inStream, allocMain, allocTemp);
-            if (res != SZ_OK)
-              break;
-          }
-          */
-          res = SzReadHeader(p, &sd, inStream, allocMain, allocTemp);
-        }
-        else
-          res = SZ_ERROR_UNSUPPORTED;
-      }
-    }
-  }
- 
-  Buf_Free(&buf, allocTemp);
-  return res;
-}
-
-
-SRes SzArEx_Open(CSzArEx *p, ILookInStream *inStream,
-    ISzAllocPtr allocMain, ISzAllocPtr allocTemp)
-{
-  SRes res = SzArEx_Open2(p, inStream, allocMain, allocTemp);
-  if (res != SZ_OK)
-    SzArEx_Free(p, allocMain);
-  return res;
-}
-
-
-SRes SzArEx_Extract(
-    const CSzArEx *p,
-    ILookInStream *inStream,
-    UInt32 fileIndex,
-    UInt32 *blockIndex,
-    Byte **tempBuf,
-    size_t *outBufferSize,
-    size_t *offset,
-    size_t *outSizeProcessed,
-    ISzAllocPtr allocMain,
-    ISzAllocPtr allocTemp)
-{
-  UInt32 folderIndex = p->FileToFolder[fileIndex];
-  SRes res = SZ_OK;
-  
-  *offset = 0;
-  *outSizeProcessed = 0;
-  
-  if (folderIndex == (UInt32)-1)
-  {
-    ISzAlloc_Free(allocMain, *tempBuf);
-    *blockIndex = folderIndex;
-    *tempBuf = NULL;
-    *outBufferSize = 0;
-    return SZ_OK;
-  }
-
-  if (*tempBuf == NULL || *blockIndex != folderIndex)
-  {
-    UInt64 unpackSizeSpec = SzAr_GetFolderUnpackSize(&p->db, folderIndex);
-    /*
-    UInt64 unpackSizeSpec =
-        p->UnpackPositions[p->FolderToFile[(size_t)folderIndex + 1]] -
-        p->UnpackPositions[p->FolderToFile[folderIndex]];
-    */
-    size_t unpackSize = (size_t)unpackSizeSpec;
-
-    if (unpackSize != unpackSizeSpec)
-      return SZ_ERROR_MEM;
-    *blockIndex = folderIndex;
-    ISzAlloc_Free(allocMain, *tempBuf);
-    *tempBuf = NULL;
-    
-    if (res == SZ_OK)
-    {
-      *outBufferSize = unpackSize;
-      if (unpackSize != 0)
-      {
-        *tempBuf = (Byte *)ISzAlloc_Alloc(allocMain, unpackSize);
-        if (*tempBuf == NULL)
-          res = SZ_ERROR_MEM;
-      }
-  
-      if (res == SZ_OK)
-      {
-        res = SzAr_DecodeFolder(&p->db, folderIndex,
-            inStream, p->dataPos, *tempBuf, unpackSize, allocTemp);
-      }
-    }
-  }
-
-  if (res == SZ_OK)
-  {
-    UInt64 unpackPos = p->UnpackPositions[fileIndex];
-    *offset = (size_t)(unpackPos - p->UnpackPositions[p->FolderToFile[folderIndex]]);
-    *outSizeProcessed = (size_t)(p->UnpackPositions[(size_t)fileIndex + 1] - unpackPos);
-    if (*offset + *outSizeProcessed > *outBufferSize)
-      return SZ_ERROR_FAIL;
-    if (SzBitWithVals_Check(&p->CRCs, fileIndex))
-      if (CrcCalc(*tempBuf + *offset, *outSizeProcessed) != p->CRCs.Vals[fileIndex])
-        res = SZ_ERROR_CRC;
-  }
-
-  return res;
-}
-
-
-size_t SzArEx_GetFileNameUtf16(const CSzArEx *p, size_t fileIndex, UInt16 *dest)
-{
-  size_t offs = p->FileNameOffsets[fileIndex];
-  size_t len = p->FileNameOffsets[fileIndex + 1] - offs;
-  if (dest != 0)
-  {
-    size_t i;
-    const Byte *src = p->FileNames + offs * 2;
-    for (i = 0; i < len; i++)
-      dest[i] = GetUi16(src + i * 2);
-  }
-  return len;
-}
-
-/*
-size_t SzArEx_GetFullNameLen(const CSzArEx *p, size_t fileIndex)
-{
-  size_t len;
-  if (!p->FileNameOffsets)
-    return 1;
-  len = 0;
-  for (;;)
-  {
-    UInt32 parent = (UInt32)(Int32)-1;
-    len += p->FileNameOffsets[fileIndex + 1] - p->FileNameOffsets[fileIndex];
-    if SzBitWithVals_Check(&p->Parents, fileIndex)
-      parent = p->Parents.Vals[fileIndex];
-    if (parent == (UInt32)(Int32)-1)
-      return len;
-    fileIndex = parent;
-  }
-}
-
-UInt16 *SzArEx_GetFullNameUtf16_Back(const CSzArEx *p, size_t fileIndex, UInt16 *dest)
-{
-  BoolInt needSlash;
-  if (!p->FileNameOffsets)
-  {
-    *(--dest) = 0;
-    return dest;
-  }
-  needSlash = False;
-  for (;;)
-  {
-    UInt32 parent = (UInt32)(Int32)-1;
-    size_t curLen = p->FileNameOffsets[fileIndex + 1] - p->FileNameOffsets[fileIndex];
-    SzArEx_GetFileNameUtf16(p, fileIndex, dest - curLen);
-    if (needSlash)
-      *(dest - 1) = '/';
-    needSlash = True;
-    dest -= curLen;
-
-    if SzBitWithVals_Check(&p->Parents, fileIndex)
-      parent = p->Parents.Vals[fileIndex];
-    if (parent == (UInt32)(Int32)-1)
-      return dest;
-    fileIndex = parent;
-  }
-}
-*/