/src/lzma-fuzz/sdk/C/Lzma2Dec.c

Source
/* Lzma2Dec.c -- LZMA2 Decoder
2019-02-02 : Igor Pavlov : Public domain */

/* #define SHOW_DEBUG_INFO */

#include "Precomp.h"

#ifdef SHOW_DEBUG_INFO
#include <stdio.h>
#endif

#include <string.h>

#include "Lzma2Dec.h"

/*
00000000  -  End of data
00000001 U U  -  Uncompressed, reset dic, need reset state and set new prop
00000010 U U  -  Uncompressed, no reset
100uuuuu U U P P  -  LZMA, no reset
101uuuuu U U P P  -  LZMA, reset state
110uuuuu U U P P S  -  LZMA, reset state + set new prop
111uuuuu U U P P S  -  LZMA, reset state + set new prop, reset dic

  u, U - Unpack Size
  P - Pack Size
  S - Props
*/

#define LZMA2_CONTROL_COPY_RESET_DIC 1

#define LZMA2_IS_UNCOMPRESSED_STATE(p) (((p)->control & (1 << 7)) == 0)

#define LZMA2_LCLP_MAX 4
#define LZMA2_DIC_SIZE_FROM_PROP(p) (((UInt32)2 | ((p) & 1)) << ((p) / 2 + 11))

#ifdef SHOW_DEBUG_INFO
#define PRF(x) x
#else
#define PRF(x)
#endif

typedef enum
{
  LZMA2_STATE_CONTROL,
  LZMA2_STATE_UNPACK0,
  LZMA2_STATE_UNPACK1,
  LZMA2_STATE_PACK0,
  LZMA2_STATE_PACK1,
  LZMA2_STATE_PROP,
  LZMA2_STATE_DATA,
  LZMA2_STATE_DATA_CONT,
  LZMA2_STATE_FINISHED,
  LZMA2_STATE_ERROR
} ELzma2State;

static SRes Lzma2Dec_GetOldProps(Byte prop, Byte *props)
{
  UInt32 dicSize;
  if (prop > 40)
    return SZ_ERROR_UNSUPPORTED;
  dicSize = (prop == 40) ? 0xFFFFFFFF : LZMA2_DIC_SIZE_FROM_PROP(prop);
  props[0] = (Byte)LZMA2_LCLP_MAX;
  props[1] = (Byte)(dicSize);
  props[2] = (Byte)(dicSize >> 8);
  props[3] = (Byte)(dicSize >> 16);
  props[4] = (Byte)(dicSize >> 24);
  return SZ_OK;
}

SRes Lzma2Dec_AllocateProbs(CLzma2Dec *p, Byte prop, ISzAllocPtr alloc)
{
  Byte props[LZMA_PROPS_SIZE];
  RINOK(Lzma2Dec_GetOldProps(prop, props));
  return LzmaDec_AllocateProbs(&p->decoder, props, LZMA_PROPS_SIZE, alloc);
}

SRes Lzma2Dec_Allocate(CLzma2Dec *p, Byte prop, ISzAllocPtr alloc)
{
  Byte props[LZMA_PROPS_SIZE];
  RINOK(Lzma2Dec_GetOldProps(prop, props));
  return LzmaDec_Allocate(&p->decoder, props, LZMA_PROPS_SIZE, alloc);
}

void Lzma2Dec_Init(CLzma2Dec *p)
{
  p->state = LZMA2_STATE_CONTROL;
  p->needInitLevel = 0xE0;
  p->isExtraMode = False;
  p->unpackSize = 0;
  
  // p->decoder.dicPos = 0; // we can use it instead of full init
  LzmaDec_Init(&p->decoder);
}

static ELzma2State Lzma2Dec_UpdateState(CLzma2Dec *p, Byte b)
{
  switch (p->state)
  {
    case LZMA2_STATE_CONTROL:
      p->isExtraMode = False;
      p->control = b;
      PRF(printf("\n %8X", (unsigned)p->decoder.dicPos));
      PRF(printf(" %02X", (unsigned)b));
      if (b == 0)
        return LZMA2_STATE_FINISHED;
      if (LZMA2_IS_UNCOMPRESSED_STATE(p))
      {
        if (b == LZMA2_CONTROL_COPY_RESET_DIC)
          p->needInitLevel = 0xC0;
        else if (b > 2 || p->needInitLevel == 0xE0)
          return LZMA2_STATE_ERROR;
      }
      else
      {
        if (b < p->needInitLevel)
          return LZMA2_STATE_ERROR;
        p->needInitLevel = 0;
        p->unpackSize = (UInt32)(b & 0x1F) << 16;
      }
      return LZMA2_STATE_UNPACK0;
    
    case LZMA2_STATE_UNPACK0:
      p->unpackSize |= (UInt32)b << 8;
      return LZMA2_STATE_UNPACK1;
    
    case LZMA2_STATE_UNPACK1:
      p->unpackSize |= (UInt32)b;
      p->unpackSize++;
      PRF(printf(" %7u", (unsigned)p->unpackSize));
      return LZMA2_IS_UNCOMPRESSED_STATE(p) ? LZMA2_STATE_DATA : LZMA2_STATE_PACK0;
    
    case LZMA2_STATE_PACK0:
      p->packSize = (UInt32)b << 8;
      return LZMA2_STATE_PACK1;

    case LZMA2_STATE_PACK1:
      p->packSize |= (UInt32)b;
      p->packSize++;
      // if (p->packSize < 5) return LZMA2_STATE_ERROR;
      PRF(printf(" %5u", (unsigned)p->packSize));
      return (p->control & 0x40) ? LZMA2_STATE_PROP : LZMA2_STATE_DATA;

    case LZMA2_STATE_PROP:
    {
      unsigned lc, lp;
      if (b >= (9 * 5 * 5))
        return LZMA2_STATE_ERROR;
      lc = b % 9;
      b /= 9;
      p->decoder.prop.pb = (Byte)(b / 5);
      lp = b % 5;
      if (lc + lp > LZMA2_LCLP_MAX)
        return LZMA2_STATE_ERROR;
      p->decoder.prop.lc = (Byte)lc;
      p->decoder.prop.lp = (Byte)lp;
      return LZMA2_STATE_DATA;
    }
  }
  return LZMA2_STATE_ERROR;
}

static void LzmaDec_UpdateWithUncompressed(CLzmaDec *p, const Byte *src, SizeT size)
{
  memcpy(p->dic + p->dicPos, src, size);
  p->dicPos += size;
  if (p->checkDicSize == 0 && p->prop.dicSize - p->processedPos <= size)
    p->checkDicSize = p->prop.dicSize;
  p->processedPos += (UInt32)size;
}

void LzmaDec_InitDicAndState(CLzmaDec *p, BoolInt initDic, BoolInt initState);


SRes Lzma2Dec_DecodeToDic(CLzma2Dec *p, SizeT dicLimit,
    const Byte *src, SizeT *srcLen, ELzmaFinishMode finishMode, ELzmaStatus *status)
{
  SizeT inSize = *srcLen;
  *srcLen = 0;
  *status = LZMA_STATUS_NOT_SPECIFIED;

  while (p->state != LZMA2_STATE_ERROR)
  {
    SizeT dicPos;

    if (p->state == LZMA2_STATE_FINISHED)
    {
      *status = LZMA_STATUS_FINISHED_WITH_MARK;
      return SZ_OK;
    }
    
    dicPos = p->decoder.dicPos;
    
    if (dicPos == dicLimit && finishMode == LZMA_FINISH_ANY)
    {
      *status = LZMA_STATUS_NOT_FINISHED;
      return SZ_OK;
    }

    if (p->state != LZMA2_STATE_DATA && p->state != LZMA2_STATE_DATA_CONT)
    {
      if (*srcLen == inSize)
      {
        *status = LZMA_STATUS_NEEDS_MORE_INPUT;
        return SZ_OK;
      }
      (*srcLen)++;
      p->state = Lzma2Dec_UpdateState(p, *src++);
      if (dicPos == dicLimit && p->state != LZMA2_STATE_FINISHED)
        break;
      continue;
    }
    
    {
      SizeT inCur = inSize - *srcLen;
      SizeT outCur = dicLimit - dicPos;
      ELzmaFinishMode curFinishMode = LZMA_FINISH_ANY;
      
      if (outCur >= p->unpackSize)
      {
        outCur = (SizeT)p->unpackSize;
        curFinishMode = LZMA_FINISH_END;
      }

      if (LZMA2_IS_UNCOMPRESSED_STATE(p))
      {
        if (inCur == 0)
        {
          *status = LZMA_STATUS_NEEDS_MORE_INPUT;
          return SZ_OK;
        }

        if (p->state == LZMA2_STATE_DATA)
        {
          BoolInt initDic = (p->control == LZMA2_CONTROL_COPY_RESET_DIC);
          LzmaDec_InitDicAndState(&p->decoder, initDic, False);
        }

        if (inCur > outCur)
          inCur = outCur;
        if (inCur == 0)
          break;

        LzmaDec_UpdateWithUncompressed(&p->decoder, src, inCur);

        src += inCur;
        *srcLen += inCur;
        p->unpackSize -= (UInt32)inCur;
        p->state = (p->unpackSize == 0) ? LZMA2_STATE_CONTROL : LZMA2_STATE_DATA_CONT;
      }
      else
      {
        SRes res;

        if (p->state == LZMA2_STATE_DATA)
        {
          BoolInt initDic = (p->control >= 0xE0);
          BoolInt initState = (p->control >= 0xA0);
          LzmaDec_InitDicAndState(&p->decoder, initDic, initState);
          p->state = LZMA2_STATE_DATA_CONT;
        }
  
        if (inCur > p->packSize)
          inCur = (SizeT)p->packSize;
        
        res = LzmaDec_DecodeToDic(&p->decoder, dicPos + outCur, src, &inCur, curFinishMode, status);

        src += inCur;
        *srcLen += inCur;
        p->packSize -= (UInt32)inCur;
        outCur = p->decoder.dicPos - dicPos;
        p->unpackSize -= (UInt32)outCur;

        if (res != 0)
          break;
        
        if (*status == LZMA_STATUS_NEEDS_MORE_INPUT)
        {
          if (p->packSize == 0)
            break;
          return SZ_OK;
        }

        if (inCur == 0 && outCur == 0)
        {
          if (*status != LZMA_STATUS_MAYBE_FINISHED_WITHOUT_MARK
              || p->unpackSize != 0
              || p->packSize != 0)
            break;
          p->state = LZMA2_STATE_CONTROL;
        }
        
        *status = LZMA_STATUS_NOT_SPECIFIED;
      }
    }
  }
  
  *status = LZMA_STATUS_NOT_SPECIFIED;
  p->state = LZMA2_STATE_ERROR;
  return SZ_ERROR_DATA;
}




ELzma2ParseStatus Lzma2Dec_Parse(CLzma2Dec *p,
    SizeT outSize,
    const Byte *src, SizeT *srcLen,
    int checkFinishBlock)
{
  SizeT inSize = *srcLen;
  *srcLen = 0;

  while (p->state != LZMA2_STATE_ERROR)
  {
    if (p->state == LZMA2_STATE_FINISHED)
      return (ELzma2ParseStatus)LZMA_STATUS_FINISHED_WITH_MARK;

    if (outSize == 0 && !checkFinishBlock)
      return (ELzma2ParseStatus)LZMA_STATUS_NOT_FINISHED;
    
    if (p->state != LZMA2_STATE_DATA && p->state != LZMA2_STATE_DATA_CONT)
    {
      if (*srcLen == inSize)
        return (ELzma2ParseStatus)LZMA_STATUS_NEEDS_MORE_INPUT;
      (*srcLen)++;

      p->state = Lzma2Dec_UpdateState(p, *src++);

      if (p->state == LZMA2_STATE_UNPACK0)
      {
        // if (p->decoder.dicPos != 0)
        if (p->control == LZMA2_CONTROL_COPY_RESET_DIC || p->control >= 0xE0)
          return LZMA2_PARSE_STATUS_NEW_BLOCK;
        // if (outSize == 0) return LZMA_STATUS_NOT_FINISHED;
      }

      // The following code can be commented.
      // It's not big problem, if we read additional input bytes.
      // It will be stopped later in LZMA2_STATE_DATA / LZMA2_STATE_DATA_CONT state.

      if (outSize == 0 && p->state != LZMA2_STATE_FINISHED)
      {
        // checkFinishBlock is true. So we expect that block must be finished,
        // We can return LZMA_STATUS_NOT_SPECIFIED or LZMA_STATUS_NOT_FINISHED here
        // break;
        return (ELzma2ParseStatus)LZMA_STATUS_NOT_FINISHED;
      }

      if (p->state == LZMA2_STATE_DATA)
        return LZMA2_PARSE_STATUS_NEW_CHUNK;

      continue;
    }

    if (outSize == 0)
      return (ELzma2ParseStatus)LZMA_STATUS_NOT_FINISHED;

    {
      SizeT inCur = inSize - *srcLen;

      if (LZMA2_IS_UNCOMPRESSED_STATE(p))
      {
        if (inCur == 0)
          return (ELzma2ParseStatus)LZMA_STATUS_NEEDS_MORE_INPUT;
        if (inCur > p->unpackSize)
          inCur = p->unpackSize;
        if (inCur > outSize)
          inCur = outSize;
        p->decoder.dicPos += inCur;
        src += inCur;
        *srcLen += inCur;
        outSize -= inCur;
        p->unpackSize -= (UInt32)inCur;
        p->state = (p->unpackSize == 0) ? LZMA2_STATE_CONTROL : LZMA2_STATE_DATA_CONT;
      }
      else
      {
        p->isExtraMode = True;

        if (inCur == 0)
        {
          if (p->packSize != 0)
            return (ELzma2ParseStatus)LZMA_STATUS_NEEDS_MORE_INPUT;
        }
        else if (p->state == LZMA2_STATE_DATA)
        {
          p->state = LZMA2_STATE_DATA_CONT;
          if (*src != 0)
          {
            // first byte of lzma chunk must be Zero
            *srcLen += 1;
            p->packSize--;
            break;
          }
        }
  
        if (inCur > p->packSize)
          inCur = (SizeT)p->packSize;

        src += inCur;
        *srcLen += inCur;
        p->packSize -= (UInt32)inCur;

        if (p->packSize == 0)
        {
          SizeT rem = outSize;
          if (rem > p->unpackSize)
            rem = p->unpackSize;
          p->decoder.dicPos += rem;
          p->unpackSize -= (UInt32)rem;
          outSize -= rem;
          if (p->unpackSize == 0)
            p->state = LZMA2_STATE_CONTROL;
        }
      }
    }
  }
  
  p->state = LZMA2_STATE_ERROR;
  return (ELzma2ParseStatus)LZMA_STATUS_NOT_SPECIFIED;
}




SRes Lzma2Dec_DecodeToBuf(CLzma2Dec *p, Byte *dest, SizeT *destLen, const Byte *src, SizeT *srcLen, ELzmaFinishMode finishMode, ELzmaStatus *status)
{
  SizeT outSize = *destLen, inSize = *srcLen;
  *srcLen = *destLen = 0;
  
  for (;;)
  {
    SizeT inCur = inSize, outCur, dicPos;
    ELzmaFinishMode curFinishMode;
    SRes res;
    
    if (p->decoder.dicPos == p->decoder.dicBufSize)
      p->decoder.dicPos = 0;
    dicPos = p->decoder.dicPos;
    curFinishMode = LZMA_FINISH_ANY;
    outCur = p->decoder.dicBufSize - dicPos;
    
    if (outCur >= outSize)
    {
      outCur = outSize;
      curFinishMode = finishMode;
    }

    res = Lzma2Dec_DecodeToDic(p, dicPos + outCur, src, &inCur, curFinishMode, status);
    
    src += inCur;
    inSize -= inCur;
    *srcLen += inCur;
    outCur = p->decoder.dicPos - dicPos;
    memcpy(dest, p->decoder.dic + dicPos, outCur);
    dest += outCur;
    outSize -= outCur;
    *destLen += outCur;
    if (res != 0)
      return res;
    if (outCur == 0 || outSize == 0)
      return SZ_OK;
  }
}


SRes Lzma2Decode(Byte *dest, SizeT *destLen, const Byte *src, SizeT *srcLen,
    Byte prop, ELzmaFinishMode finishMode, ELzmaStatus *status, ISzAllocPtr alloc)
{
  CLzma2Dec p;
  SRes res;
  SizeT outSize = *destLen, inSize = *srcLen;
  *destLen = *srcLen = 0;
  *status = LZMA_STATUS_NOT_SPECIFIED;
  Lzma2Dec_Construct(&p);
  RINOK(Lzma2Dec_AllocateProbs(&p, prop, alloc));
  p.decoder.dic = dest;
  p.decoder.dicBufSize = outSize;
  Lzma2Dec_Init(&p);
  *srcLen = inSize;
  res = Lzma2Dec_DecodeToDic(&p, outSize, src, srcLen, finishMode, status);
  *destLen = p.decoder.dicPos;
  if (res == SZ_OK && *status == LZMA_STATUS_NEEDS_MORE_INPUT)
    res = SZ_ERROR_INPUT_EOF;
  Lzma2Dec_FreeProbs(&p, alloc);
  return res;
}

Coverage Report

Created: 2026-04-01 07:01

Line	Count	Source
1		/* Lzma2Dec.c -- LZMA2 Decoder
2		2019-02-02 : Igor Pavlov : Public domain */
3
4		/* #define SHOW_DEBUG_INFO */
5
6		#include "Precomp.h"
7
8		#ifdef SHOW_DEBUG_INFO
9		#include <stdio.h>
10		#endif
11
12		#include <string.h>
13
14		#include "Lzma2Dec.h"
15
16		/*
17		00000000 - End of data
18		00000001 U U - Uncompressed, reset dic, need reset state and set new prop
19		00000010 U U - Uncompressed, no reset
20		100uuuuu U U P P - LZMA, no reset
21		101uuuuu U U P P - LZMA, reset state
22		110uuuuu U U P P S - LZMA, reset state + set new prop
23		111uuuuu U U P P S - LZMA, reset state + set new prop, reset dic
24
25		u, U - Unpack Size
26		P - Pack Size
27		S - Props
28		*/
29
30	857	#define LZMA2_CONTROL_COPY_RESET_DIC 1
31
32	3.43k	#define LZMA2_IS_UNCOMPRESSED_STATE(p) (((p)->control & (1 << 7)) == 0)
33
34	976	#define LZMA2_LCLP_MAX 4
35	1.00k	#define LZMA2_DIC_SIZE_FROM_PROP(p) (((UInt32)2 \| ((p) & 1)) << ((p) / 2 + 11))
36
37		#ifdef SHOW_DEBUG_INFO
38		#define PRF(x) x
39		#else
40		#define PRF(x)
41		#endif
42
43		typedef enum
44		{
45		LZMA2_STATE_CONTROL,
46		LZMA2_STATE_UNPACK0,
47		LZMA2_STATE_UNPACK1,
48		LZMA2_STATE_PACK0,
49		LZMA2_STATE_PACK1,
50		LZMA2_STATE_PROP,
51		LZMA2_STATE_DATA,
52		LZMA2_STATE_DATA_CONT,
53		LZMA2_STATE_FINISHED,
54		LZMA2_STATE_ERROR
55		} ELzma2State;
56
57		static SRes Lzma2Dec_GetOldProps(Byte prop, Byte *props)
58	503	{
59	503	UInt32 dicSize;
60	503	if (prop > 40)
61	0	return SZ_ERROR_UNSUPPORTED;
62	503	dicSize = (prop == 40) ? 0xFFFFFFFF : LZMA2_DIC_SIZE_FROM_PROP(prop);
63	503	props[0] = (Byte)LZMA2_LCLP_MAX;
64	503	props[1] = (Byte)(dicSize);
65	503	props[2] = (Byte)(dicSize >> 8);
66	503	props[3] = (Byte)(dicSize >> 16);
67	503	props[4] = (Byte)(dicSize >> 24);
68	503	return SZ_OK;
69	503	}
70
71		SRes Lzma2Dec_AllocateProbs(CLzma2Dec *p, Byte prop, ISzAllocPtr alloc)
72	503	{
73	503	Byte props[LZMA_PROPS_SIZE];
74	503	RINOK(Lzma2Dec_GetOldProps(prop, props));
75	503	return LzmaDec_AllocateProbs(&p->decoder, props, LZMA_PROPS_SIZE, alloc);
76	503	}
77
78		SRes Lzma2Dec_Allocate(CLzma2Dec *p, Byte prop, ISzAllocPtr alloc)
79	0	{
80	0	Byte props[LZMA_PROPS_SIZE];
81	0	RINOK(Lzma2Dec_GetOldProps(prop, props));
82	0	return LzmaDec_Allocate(&p->decoder, props, LZMA_PROPS_SIZE, alloc);
83	0	}
84
85		void Lzma2Dec_Init(CLzma2Dec *p)
86	503	{
87	503	p->state = LZMA2_STATE_CONTROL;
88	503	p->needInitLevel = 0xE0;
89	503	p->isExtraMode = False;
90	503	p->unpackSize = 0;
91
92		// p->decoder.dicPos = 0; // we can use it instead of full init
93	503	LzmaDec_Init(&p->decoder);
94	503	}
95
96		static ELzma2State Lzma2Dec_UpdateState(CLzma2Dec *p, Byte b)
97	4.64k	{
98	4.64k	switch (p->state)
99	4.64k	{
100	1.15k	case LZMA2_STATE_CONTROL:
101	1.15k	p->isExtraMode = False;
102	1.15k	p->control = b;
103	1.15k	PRF(printf("\n %8X", (unsigned)p->decoder.dicPos));
104	1.15k	PRF(printf(" %02X", (unsigned)b));
105	1.15k	if (b == 0)
106	163	return LZMA2_STATE_FINISHED;
107	987	if (LZMA2_IS_UNCOMPRESSED_STATE(p))
108	437	{
109	437	if (b == LZMA2_CONTROL_COPY_RESET_DIC)
110	269	p->needInitLevel = 0xC0;
111	168	else if (b > 2 \|\| p->needInitLevel == 0xE0)
112	12	return LZMA2_STATE_ERROR;
113	437	}
114	550	else
115	550	{
116	550	if (b < p->needInitLevel)
117	3	return LZMA2_STATE_ERROR;
118	547	p->needInitLevel = 0;
119	547	p->unpackSize = (UInt32)(b & 0x1F) << 16;
120	547	}
121	972	return LZMA2_STATE_UNPACK0;
122
123	966	case LZMA2_STATE_UNPACK0:
124	966	p->unpackSize \|= (UInt32)b << 8;
125	966	return LZMA2_STATE_UNPACK1;
126
127	965	case LZMA2_STATE_UNPACK1:
128	965	p->unpackSize \|= (UInt32)b;
129	965	p->unpackSize++;
130	965	PRF(printf(" %7u", (unsigned)p->unpackSize));
131	965	return LZMA2_IS_UNCOMPRESSED_STATE(p) ? LZMA2_STATE_DATA : LZMA2_STATE_PACK0;
132
133	543	case LZMA2_STATE_PACK0:
134	543	p->packSize = (UInt32)b << 8;
135	543	return LZMA2_STATE_PACK1;
136
137	540	case LZMA2_STATE_PACK1:
138	540	p->packSize \|= (UInt32)b;
139	540	p->packSize++;
140		// if (p->packSize < 5) return LZMA2_STATE_ERROR;
141	540	PRF(printf(" %5u", (unsigned)p->packSize));
142	540	return (p->control & 0x40) ? LZMA2_STATE_PROP : LZMA2_STATE_DATA;
143
144	476	case LZMA2_STATE_PROP:
145	476	{
146	476	unsigned lc, lp;
147	476	if (b >= (9 * 5 * 5))
148	3	return LZMA2_STATE_ERROR;
149	473	lc = b % 9;
150	473	b /= 9;
151	473	p->decoder.prop.pb = (Byte)(b / 5);
152	473	lp = b % 5;
153	473	if (lc + lp > LZMA2_LCLP_MAX)
154	3	return LZMA2_STATE_ERROR;
155	470	p->decoder.prop.lc = (Byte)lc;
156	470	p->decoder.prop.lp = (Byte)lp;
157	470	return LZMA2_STATE_DATA;
158	473	}
159	4.64k	}
160	0	return LZMA2_STATE_ERROR;
161	4.64k	}
162
163		static void LzmaDec_UpdateWithUncompressed(CLzmaDec p, const Byte src, SizeT size)
164	420	{
165	420	memcpy(p->dic + p->dicPos, src, size);
166	420	p->dicPos += size;
167	420	if (p->checkDicSize == 0 && p->prop.dicSize - p->processedPos <= size)
168	0	p->checkDicSize = p->prop.dicSize;
169	420	p->processedPos += (UInt32)size;
170	420	}
171
172		void LzmaDec_InitDicAndState(CLzmaDec *p, BoolInt initDic, BoolInt initState);
173
174
175		SRes Lzma2Dec_DecodeToDic(CLzma2Dec *p, SizeT dicLimit,
176		const Byte src, SizeT srcLen, ELzmaFinishMode finishMode, ELzmaStatus *status)
177	634	{
178	634	SizeT inSize = *srcLen;
179	634	*srcLen = 0;
180	634	*status = LZMA_STATUS_NOT_SPECIFIED;
181
182	6.32k	while (p->state != LZMA2_STATE_ERROR)
183	6.31k	{
184	6.31k	SizeT dicPos;
185
186	6.31k	if (p->state == LZMA2_STATE_FINISHED)
187	163	{
188	163	*status = LZMA_STATUS_FINISHED_WITH_MARK;
189	163	return SZ_OK;
190	163	}
191
192	6.14k	dicPos = p->decoder.dicPos;
193
194	6.14k	if (dicPos == dicLimit && finishMode == LZMA_FINISH_ANY)
195	0	{
196	0	*status = LZMA_STATUS_NOT_FINISHED;
197	0	return SZ_OK;
198	0	}
199
200	6.14k	if (p->state != LZMA2_STATE_DATA && p->state != LZMA2_STATE_DATA_CONT)
201	4.66k	{
202	4.66k	if (*srcLen == inSize)
203	28	{
204	28	*status = LZMA_STATUS_NEEDS_MORE_INPUT;
205	28	return SZ_OK;
206	28	}
207	4.64k	(*srcLen)++;
208	4.64k	p->state = Lzma2Dec_UpdateState(p, *src++);
209	4.64k	if (dicPos == dicLimit && p->state != LZMA2_STATE_FINISHED)
210	4	break;
211	4.63k	continue;
212	4.64k	}
213
214	1.47k	{
215	1.47k	SizeT inCur = inSize - *srcLen;
216	1.47k	SizeT outCur = dicLimit - dicPos;
217	1.47k	ELzmaFinishMode curFinishMode = LZMA_FINISH_ANY;
218
219	1.47k	if (outCur >= p->unpackSize)
220	1.04k	{
221	1.04k	outCur = (SizeT)p->unpackSize;
222	1.04k	curFinishMode = LZMA_FINISH_END;
223	1.04k	}
224
225	1.47k	if (LZMA2_IS_UNCOMPRESSED_STATE(p))
226	491	{
227	491	if (inCur == 0)
228	52	{
229	52	*status = LZMA_STATUS_NEEDS_MORE_INPUT;
230	52	return SZ_OK;
231	52	}
232
233	439	if (p->state == LZMA2_STATE_DATA)
234	420	{
235	420	BoolInt initDic = (p->control == LZMA2_CONTROL_COPY_RESET_DIC);
236	420	LzmaDec_InitDicAndState(&p->decoder, initDic, False);
237	420	}
238
239	439	if (inCur > outCur)
240	414	inCur = outCur;
241	439	if (inCur == 0)
242	19	break;
243
244	420	LzmaDec_UpdateWithUncompressed(&p->decoder, src, inCur);
245
246	420	src += inCur;
247	420	*srcLen += inCur;
248	420	p->unpackSize -= (UInt32)inCur;
249	420	p->state = (p->unpackSize == 0) ? LZMA2_STATE_CONTROL : LZMA2_STATE_DATA_CONT;
250	420	}
251	988	else
252	988	{
253	988	SRes res;
254
255	988	if (p->state == LZMA2_STATE_DATA)
256	531	{
257	531	BoolInt initDic = (p->control >= 0xE0);
258	531	BoolInt initState = (p->control >= 0xA0);
259	531	LzmaDec_InitDicAndState(&p->decoder, initDic, initState);
260	531	p->state = LZMA2_STATE_DATA_CONT;
261	531	}
262
263	988	if (inCur > p->packSize)
264	640	inCur = (SizeT)p->packSize;
265
266	988	res = LzmaDec_DecodeToDic(&p->decoder, dicPos + outCur, src, &inCur, curFinishMode, status);
267
268	988	src += inCur;
269	988	*srcLen += inCur;
270	988	p->packSize -= (UInt32)inCur;
271	988	outCur = p->decoder.dicPos - dicPos;
272	988	p->unpackSize -= (UInt32)outCur;
273
274	988	if (res != 0)
275	32	break;
276
277	956	if (*status == LZMA_STATUS_NEEDS_MORE_INPUT)
278	224	{
279	224	if (p->packSize == 0)
280	42	break;
281	182	return SZ_OK;
282	224	}
283
284	732	if (inCur == 0 && outCur == 0)
285	366	{
286	366	if (*status != LZMA_STATUS_MAYBE_FINISHED_WITHOUT_MARK
287	328	\|\| p->unpackSize != 0
288	298	\|\| p->packSize != 0)
289	94	break;
290	272	p->state = LZMA2_STATE_CONTROL;
291	272	}
292
293	638	*status = LZMA_STATUS_NOT_SPECIFIED;
294	638	}
295	1.47k	}
296	1.47k	}
297
298	209	*status = LZMA_STATUS_NOT_SPECIFIED;
299	209	p->state = LZMA2_STATE_ERROR;
300	209	return SZ_ERROR_DATA;
301	634	}
302
303
304
305
306		ELzma2ParseStatus Lzma2Dec_Parse(CLzma2Dec *p,
307		SizeT outSize,
308		const Byte src, SizeT srcLen,
309		int checkFinishBlock)
310	0	{
311	0	SizeT inSize = *srcLen;
312	0	*srcLen = 0;
313
314	0	while (p->state != LZMA2_STATE_ERROR)
315	0	{
316	0	if (p->state == LZMA2_STATE_FINISHED)
317	0	return (ELzma2ParseStatus)LZMA_STATUS_FINISHED_WITH_MARK;
318
319	0	if (outSize == 0 && !checkFinishBlock)
320	0	return (ELzma2ParseStatus)LZMA_STATUS_NOT_FINISHED;
321
322	0	if (p->state != LZMA2_STATE_DATA && p->state != LZMA2_STATE_DATA_CONT)
323	0	{
324	0	if (*srcLen == inSize)
325	0	return (ELzma2ParseStatus)LZMA_STATUS_NEEDS_MORE_INPUT;
326	0	(*srcLen)++;
327
328	0	p->state = Lzma2Dec_UpdateState(p, *src++);
329
330	0	if (p->state == LZMA2_STATE_UNPACK0)
331	0	{
332		// if (p->decoder.dicPos != 0)
333	0	if (p->control == LZMA2_CONTROL_COPY_RESET_DIC \|\| p->control >= 0xE0)
334	0	return LZMA2_PARSE_STATUS_NEW_BLOCK;
335		// if (outSize == 0) return LZMA_STATUS_NOT_FINISHED;
336	0	}
337
338		// The following code can be commented.
339		// It's not big problem, if we read additional input bytes.
340		// It will be stopped later in LZMA2_STATE_DATA / LZMA2_STATE_DATA_CONT state.
341
342	0	if (outSize == 0 && p->state != LZMA2_STATE_FINISHED)
343	0	{
344		// checkFinishBlock is true. So we expect that block must be finished,
345		// We can return LZMA_STATUS_NOT_SPECIFIED or LZMA_STATUS_NOT_FINISHED here
346		// break;
347	0	return (ELzma2ParseStatus)LZMA_STATUS_NOT_FINISHED;
348	0	}
349
350	0	if (p->state == LZMA2_STATE_DATA)
351	0	return LZMA2_PARSE_STATUS_NEW_CHUNK;
352
353	0	continue;
354	0	}
355
356	0	if (outSize == 0)
357	0	return (ELzma2ParseStatus)LZMA_STATUS_NOT_FINISHED;
358
359	0	{
360	0	SizeT inCur = inSize - *srcLen;
361
362	0	if (LZMA2_IS_UNCOMPRESSED_STATE(p))
363	0	{
364	0	if (inCur == 0)
365	0	return (ELzma2ParseStatus)LZMA_STATUS_NEEDS_MORE_INPUT;
366	0	if (inCur > p->unpackSize)
367	0	inCur = p->unpackSize;
368	0	if (inCur > outSize)
369	0	inCur = outSize;
370	0	p->decoder.dicPos += inCur;
371	0	src += inCur;
372	0	*srcLen += inCur;
373	0	outSize -= inCur;
374	0	p->unpackSize -= (UInt32)inCur;
375	0	p->state = (p->unpackSize == 0) ? LZMA2_STATE_CONTROL : LZMA2_STATE_DATA_CONT;
376	0	}
377	0	else
378	0	{
379	0	p->isExtraMode = True;
380
381	0	if (inCur == 0)
382	0	{
383	0	if (p->packSize != 0)
384	0	return (ELzma2ParseStatus)LZMA_STATUS_NEEDS_MORE_INPUT;
385	0	}
386	0	else if (p->state == LZMA2_STATE_DATA)
387	0	{
388	0	p->state = LZMA2_STATE_DATA_CONT;
389	0	if (*src != 0)
390	0	{
391		// first byte of lzma chunk must be Zero
392	0	*srcLen += 1;
393	0	p->packSize--;
394	0	break;
395	0	}
396	0	}
397
398	0	if (inCur > p->packSize)
399	0	inCur = (SizeT)p->packSize;
400
401	0	src += inCur;
402	0	*srcLen += inCur;
403	0	p->packSize -= (UInt32)inCur;
404
405	0	if (p->packSize == 0)
406	0	{
407	0	SizeT rem = outSize;
408	0	if (rem > p->unpackSize)
409	0	rem = p->unpackSize;
410	0	p->decoder.dicPos += rem;
411	0	p->unpackSize -= (UInt32)rem;
412	0	outSize -= rem;
413	0	if (p->unpackSize == 0)
414	0	p->state = LZMA2_STATE_CONTROL;
415	0	}
416	0	}
417	0	}
418	0	}
419
420	0	p->state = LZMA2_STATE_ERROR;
421	0	return (ELzma2ParseStatus)LZMA_STATUS_NOT_SPECIFIED;
422	0	}
423
424
425
426
427		SRes Lzma2Dec_DecodeToBuf(CLzma2Dec p, Byte dest, SizeT destLen, const Byte src, SizeT srcLen, ELzmaFinishMode finishMode, ELzmaStatus status)
428	0	{
429	0	SizeT outSize = destLen, inSize = srcLen;
430	0	srcLen = destLen = 0;
431
432	0	for (;;)
433	0	{
434	0	SizeT inCur = inSize, outCur, dicPos;
435	0	ELzmaFinishMode curFinishMode;
436	0	SRes res;
437
438	0	if (p->decoder.dicPos == p->decoder.dicBufSize)
439	0	p->decoder.dicPos = 0;
440	0	dicPos = p->decoder.dicPos;
441	0	curFinishMode = LZMA_FINISH_ANY;
442	0	outCur = p->decoder.dicBufSize - dicPos;
443
444	0	if (outCur >= outSize)
445	0	{
446	0	outCur = outSize;
447	0	curFinishMode = finishMode;
448	0	}
449
450	0	res = Lzma2Dec_DecodeToDic(p, dicPos + outCur, src, &inCur, curFinishMode, status);
451
452	0	src += inCur;
453	0	inSize -= inCur;
454	0	*srcLen += inCur;
455	0	outCur = p->decoder.dicPos - dicPos;
456	0	memcpy(dest, p->decoder.dic + dicPos, outCur);
457	0	dest += outCur;
458	0	outSize -= outCur;
459	0	*destLen += outCur;
460	0	if (res != 0)
461	0	return res;
462	0	if (outCur == 0 \|\| outSize == 0)
463	0	return SZ_OK;
464	0	}
465	0	}
466
467
468		SRes Lzma2Decode(Byte dest, SizeT destLen, const Byte src, SizeT srcLen,
469		Byte prop, ELzmaFinishMode finishMode, ELzmaStatus *status, ISzAllocPtr alloc)
470	0	{
471	0	CLzma2Dec p;
472	0	SRes res;
473	0	SizeT outSize = destLen, inSize = srcLen;
474	0	destLen = srcLen = 0;
475	0	*status = LZMA_STATUS_NOT_SPECIFIED;
476	0	Lzma2Dec_Construct(&p);
477	0	RINOK(Lzma2Dec_AllocateProbs(&p, prop, alloc));
478	0	p.decoder.dic = dest;
479	0	p.decoder.dicBufSize = outSize;
480	0	Lzma2Dec_Init(&p);
481	0	*srcLen = inSize;
482	0	res = Lzma2Dec_DecodeToDic(&p, outSize, src, srcLen, finishMode, status);
483	0	*destLen = p.decoder.dicPos;
484	0	if (res == SZ_OK && *status == LZMA_STATUS_NEEDS_MORE_INPUT)
485	0	res = SZ_ERROR_INPUT_EOF;
486	0	Lzma2Dec_FreeProbs(&p, alloc);
487	0	return res;
488	0	}