| Index: third_party/lzma_sdk/C/Lzma2Enc.c
|
| ===================================================================
|
| --- third_party/lzma_sdk/C/Lzma2Enc.c (revision 0)
|
| +++ third_party/lzma_sdk/C/Lzma2Enc.c (revision 0)
|
| @@ -0,0 +1,477 @@
|
| +/* Lzma2Enc.c -- LZMA2 Encoder
|
| +2010-09-24 : Igor Pavlov : Public domain */
|
| +
|
| +/* #include <stdio.h> */
|
| +#include <string.h>
|
| +
|
| +/* #define _7ZIP_ST */
|
| +
|
| +#include "Lzma2Enc.h"
|
| +
|
| +#ifndef _7ZIP_ST
|
| +#include "MtCoder.h"
|
| +#else
|
| +#define NUM_MT_CODER_THREADS_MAX 1
|
| +#endif
|
| +
|
| +#define LZMA2_CONTROL_LZMA (1 << 7)
|
| +#define LZMA2_CONTROL_COPY_NO_RESET 2
|
| +#define LZMA2_CONTROL_COPY_RESET_DIC 1
|
| +#define LZMA2_CONTROL_EOF 0
|
| +
|
| +#define LZMA2_LCLP_MAX 4
|
| +
|
| +#define LZMA2_DIC_SIZE_FROM_PROP(p) (((UInt32)2 | ((p) & 1)) << ((p) / 2 + 11))
|
| +
|
| +#define LZMA2_PACK_SIZE_MAX (1 << 16)
|
| +#define LZMA2_COPY_CHUNK_SIZE LZMA2_PACK_SIZE_MAX
|
| +#define LZMA2_UNPACK_SIZE_MAX (1 << 21)
|
| +#define LZMA2_KEEP_WINDOW_SIZE LZMA2_UNPACK_SIZE_MAX
|
| +
|
| +#define LZMA2_CHUNK_SIZE_COMPRESSED_MAX ((1 << 16) + 16)
|
| +
|
| +
|
| +#define PRF(x) /* x */
|
| +
|
| +/* ---------- CLzma2EncInt ---------- */
|
| +
|
| +typedef struct
|
| +{
|
| + CLzmaEncHandle enc;
|
| + UInt64 srcPos;
|
| + Byte props;
|
| + Bool needInitState;
|
| + Bool needInitProp;
|
| +} CLzma2EncInt;
|
| +
|
| +static SRes Lzma2EncInt_Init(CLzma2EncInt *p, const CLzma2EncProps *props)
|
| +{
|
| + Byte propsEncoded[LZMA_PROPS_SIZE];
|
| + SizeT propsSize = LZMA_PROPS_SIZE;
|
| + RINOK(LzmaEnc_SetProps(p->enc, &props->lzmaProps));
|
| + RINOK(LzmaEnc_WriteProperties(p->enc, propsEncoded, &propsSize));
|
| + p->srcPos = 0;
|
| + p->props = propsEncoded[0];
|
| + p->needInitState = True;
|
| + p->needInitProp = True;
|
| + return SZ_OK;
|
| +}
|
| +
|
| +SRes LzmaEnc_PrepareForLzma2(CLzmaEncHandle pp, ISeqInStream *inStream, UInt32 keepWindowSize,
|
| + ISzAlloc *alloc, ISzAlloc *allocBig);
|
| +SRes LzmaEnc_MemPrepare(CLzmaEncHandle pp, const Byte *src, SizeT srcLen,
|
| + UInt32 keepWindowSize, ISzAlloc *alloc, ISzAlloc *allocBig);
|
| +SRes LzmaEnc_CodeOneMemBlock(CLzmaEncHandle pp, Bool reInit,
|
| + Byte *dest, size_t *destLen, UInt32 desiredPackSize, UInt32 *unpackSize);
|
| +const Byte *LzmaEnc_GetCurBuf(CLzmaEncHandle pp);
|
| +void LzmaEnc_Finish(CLzmaEncHandle pp);
|
| +void LzmaEnc_SaveState(CLzmaEncHandle pp);
|
| +void LzmaEnc_RestoreState(CLzmaEncHandle pp);
|
| +
|
| +
|
| +static SRes Lzma2EncInt_EncodeSubblock(CLzma2EncInt *p, Byte *outBuf,
|
| + size_t *packSizeRes, ISeqOutStream *outStream)
|
| +{
|
| + size_t packSizeLimit = *packSizeRes;
|
| + size_t packSize = packSizeLimit;
|
| + UInt32 unpackSize = LZMA2_UNPACK_SIZE_MAX;
|
| + unsigned lzHeaderSize = 5 + (p->needInitProp ? 1 : 0);
|
| + Bool useCopyBlock;
|
| + SRes res;
|
| +
|
| + *packSizeRes = 0;
|
| + if (packSize < lzHeaderSize)
|
| + return SZ_ERROR_OUTPUT_EOF;
|
| + packSize -= lzHeaderSize;
|
| +
|
| + LzmaEnc_SaveState(p->enc);
|
| + res = LzmaEnc_CodeOneMemBlock(p->enc, p->needInitState,
|
| + outBuf + lzHeaderSize, &packSize, LZMA2_PACK_SIZE_MAX, &unpackSize);
|
| +
|
| + PRF(printf("\npackSize = %7d unpackSize = %7d ", packSize, unpackSize));
|
| +
|
| + if (unpackSize == 0)
|
| + return res;
|
| +
|
| + if (res == SZ_OK)
|
| + useCopyBlock = (packSize + 2 >= unpackSize || packSize > (1 << 16));
|
| + else
|
| + {
|
| + if (res != SZ_ERROR_OUTPUT_EOF)
|
| + return res;
|
| + res = SZ_OK;
|
| + useCopyBlock = True;
|
| + }
|
| +
|
| + if (useCopyBlock)
|
| + {
|
| + size_t destPos = 0;
|
| + PRF(printf("################# COPY "));
|
| + while (unpackSize > 0)
|
| + {
|
| + UInt32 u = (unpackSize < LZMA2_COPY_CHUNK_SIZE) ? unpackSize : LZMA2_COPY_CHUNK_SIZE;
|
| + if (packSizeLimit - destPos < u + 3)
|
| + return SZ_ERROR_OUTPUT_EOF;
|
| + outBuf[destPos++] = (Byte)(p->srcPos == 0 ? LZMA2_CONTROL_COPY_RESET_DIC : LZMA2_CONTROL_COPY_NO_RESET);
|
| + outBuf[destPos++] = (Byte)((u - 1) >> 8);
|
| + outBuf[destPos++] = (Byte)(u - 1);
|
| + memcpy(outBuf + destPos, LzmaEnc_GetCurBuf(p->enc) - unpackSize, u);
|
| + unpackSize -= u;
|
| + destPos += u;
|
| + p->srcPos += u;
|
| + if (outStream)
|
| + {
|
| + *packSizeRes += destPos;
|
| + if (outStream->Write(outStream, outBuf, destPos) != destPos)
|
| + return SZ_ERROR_WRITE;
|
| + destPos = 0;
|
| + }
|
| + else
|
| + *packSizeRes = destPos;
|
| + /* needInitState = True; */
|
| + }
|
| + LzmaEnc_RestoreState(p->enc);
|
| + return SZ_OK;
|
| + }
|
| + {
|
| + size_t destPos = 0;
|
| + UInt32 u = unpackSize - 1;
|
| + UInt32 pm = (UInt32)(packSize - 1);
|
| + unsigned mode = (p->srcPos == 0) ? 3 : (p->needInitState ? (p->needInitProp ? 2 : 1) : 0);
|
| +
|
| + PRF(printf(" "));
|
| +
|
| + outBuf[destPos++] = (Byte)(LZMA2_CONTROL_LZMA | (mode << 5) | ((u >> 16) & 0x1F));
|
| + outBuf[destPos++] = (Byte)(u >> 8);
|
| + outBuf[destPos++] = (Byte)u;
|
| + outBuf[destPos++] = (Byte)(pm >> 8);
|
| + outBuf[destPos++] = (Byte)pm;
|
| +
|
| + if (p->needInitProp)
|
| + outBuf[destPos++] = p->props;
|
| +
|
| + p->needInitProp = False;
|
| + p->needInitState = False;
|
| + destPos += packSize;
|
| + p->srcPos += unpackSize;
|
| +
|
| + if (outStream)
|
| + if (outStream->Write(outStream, outBuf, destPos) != destPos)
|
| + return SZ_ERROR_WRITE;
|
| + *packSizeRes = destPos;
|
| + return SZ_OK;
|
| + }
|
| +}
|
| +
|
| +/* ---------- Lzma2 Props ---------- */
|
| +
|
| +void Lzma2EncProps_Init(CLzma2EncProps *p)
|
| +{
|
| + LzmaEncProps_Init(&p->lzmaProps);
|
| + p->numTotalThreads = -1;
|
| + p->numBlockThreads = -1;
|
| + p->blockSize = 0;
|
| +}
|
| +
|
| +void Lzma2EncProps_Normalize(CLzma2EncProps *p)
|
| +{
|
| + int t1, t1n, t2, t3;
|
| + {
|
| + CLzmaEncProps lzmaProps = p->lzmaProps;
|
| + LzmaEncProps_Normalize(&lzmaProps);
|
| + t1n = lzmaProps.numThreads;
|
| + }
|
| +
|
| + t1 = p->lzmaProps.numThreads;
|
| + t2 = p->numBlockThreads;
|
| + t3 = p->numTotalThreads;
|
| +
|
| + if (t2 > NUM_MT_CODER_THREADS_MAX)
|
| + t2 = NUM_MT_CODER_THREADS_MAX;
|
| +
|
| + if (t3 <= 0)
|
| + {
|
| + if (t2 <= 0)
|
| + t2 = 1;
|
| + t3 = t1n * t2;
|
| + }
|
| + else if (t2 <= 0)
|
| + {
|
| + t2 = t3 / t1n;
|
| + if (t2 == 0)
|
| + {
|
| + t1 = 1;
|
| + t2 = t3;
|
| + }
|
| + if (t2 > NUM_MT_CODER_THREADS_MAX)
|
| + t2 = NUM_MT_CODER_THREADS_MAX;
|
| + }
|
| + else if (t1 <= 0)
|
| + {
|
| + t1 = t3 / t2;
|
| + if (t1 == 0)
|
| + t1 = 1;
|
| + }
|
| + else
|
| + t3 = t1n * t2;
|
| +
|
| + p->lzmaProps.numThreads = t1;
|
| + p->numBlockThreads = t2;
|
| + p->numTotalThreads = t3;
|
| + LzmaEncProps_Normalize(&p->lzmaProps);
|
| +
|
| + if (p->blockSize == 0)
|
| + {
|
| + UInt32 dictSize = p->lzmaProps.dictSize;
|
| + UInt64 blockSize = (UInt64)dictSize << 2;
|
| + const UInt32 kMinSize = (UInt32)1 << 20;
|
| + const UInt32 kMaxSize = (UInt32)1 << 28;
|
| + if (blockSize < kMinSize) blockSize = kMinSize;
|
| + if (blockSize > kMaxSize) blockSize = kMaxSize;
|
| + if (blockSize < dictSize) blockSize = dictSize;
|
| + p->blockSize = (size_t)blockSize;
|
| + }
|
| +}
|
| +
|
| +static SRes Progress(ICompressProgress *p, UInt64 inSize, UInt64 outSize)
|
| +{
|
| + return (p && p->Progress(p, inSize, outSize) != SZ_OK) ? SZ_ERROR_PROGRESS : SZ_OK;
|
| +}
|
| +
|
| +/* ---------- Lzma2 ---------- */
|
| +
|
| +typedef struct
|
| +{
|
| + Byte propEncoded;
|
| + CLzma2EncProps props;
|
| +
|
| + Byte *outBuf;
|
| +
|
| + ISzAlloc *alloc;
|
| + ISzAlloc *allocBig;
|
| +
|
| + CLzma2EncInt coders[NUM_MT_CODER_THREADS_MAX];
|
| +
|
| + #ifndef _7ZIP_ST
|
| + CMtCoder mtCoder;
|
| + #endif
|
| +
|
| +} CLzma2Enc;
|
| +
|
| +
|
| +/* ---------- Lzma2EncThread ---------- */
|
| +
|
| +static SRes Lzma2Enc_EncodeMt1(CLzma2EncInt *p, CLzma2Enc *mainEncoder,
|
| + ISeqOutStream *outStream, ISeqInStream *inStream, ICompressProgress *progress)
|
| +{
|
| + UInt64 packTotal = 0;
|
| + SRes res = SZ_OK;
|
| +
|
| + if (mainEncoder->outBuf == 0)
|
| + {
|
| + mainEncoder->outBuf = (Byte *)IAlloc_Alloc(mainEncoder->alloc, LZMA2_CHUNK_SIZE_COMPRESSED_MAX);
|
| + if (mainEncoder->outBuf == 0)
|
| + return SZ_ERROR_MEM;
|
| + }
|
| + RINOK(Lzma2EncInt_Init(p, &mainEncoder->props));
|
| + RINOK(LzmaEnc_PrepareForLzma2(p->enc, inStream, LZMA2_KEEP_WINDOW_SIZE,
|
| + mainEncoder->alloc, mainEncoder->allocBig));
|
| + for (;;)
|
| + {
|
| + size_t packSize = LZMA2_CHUNK_SIZE_COMPRESSED_MAX;
|
| + res = Lzma2EncInt_EncodeSubblock(p, mainEncoder->outBuf, &packSize, outStream);
|
| + if (res != SZ_OK)
|
| + break;
|
| + packTotal += packSize;
|
| + res = Progress(progress, p->srcPos, packTotal);
|
| + if (res != SZ_OK)
|
| + break;
|
| + if (packSize == 0)
|
| + break;
|
| + }
|
| + LzmaEnc_Finish(p->enc);
|
| + if (res == SZ_OK)
|
| + {
|
| + Byte b = 0;
|
| + if (outStream->Write(outStream, &b, 1) != 1)
|
| + return SZ_ERROR_WRITE;
|
| + }
|
| + return res;
|
| +}
|
| +
|
| +#ifndef _7ZIP_ST
|
| +
|
| +typedef struct
|
| +{
|
| + IMtCoderCallback funcTable;
|
| + CLzma2Enc *lzma2Enc;
|
| +} CMtCallbackImp;
|
| +
|
| +static SRes MtCallbackImp_Code(void *pp, unsigned index, Byte *dest, size_t *destSize,
|
| + const Byte *src, size_t srcSize, int finished)
|
| +{
|
| + CMtCallbackImp *imp = (CMtCallbackImp *)pp;
|
| + CLzma2Enc *mainEncoder = imp->lzma2Enc;
|
| + CLzma2EncInt *p = &mainEncoder->coders[index];
|
| +
|
| + SRes res = SZ_OK;
|
| + {
|
| + size_t destLim = *destSize;
|
| + *destSize = 0;
|
| +
|
| + if (srcSize != 0)
|
| + {
|
| + RINOK(Lzma2EncInt_Init(p, &mainEncoder->props));
|
| +
|
| + RINOK(LzmaEnc_MemPrepare(p->enc, src, srcSize, LZMA2_KEEP_WINDOW_SIZE,
|
| + mainEncoder->alloc, mainEncoder->allocBig));
|
| +
|
| + while (p->srcPos < srcSize)
|
| + {
|
| + size_t packSize = destLim - *destSize;
|
| + res = Lzma2EncInt_EncodeSubblock(p, dest + *destSize, &packSize, NULL);
|
| + if (res != SZ_OK)
|
| + break;
|
| + *destSize += packSize;
|
| +
|
| + if (packSize == 0)
|
| + {
|
| + res = SZ_ERROR_FAIL;
|
| + break;
|
| + }
|
| +
|
| + if (MtProgress_Set(&mainEncoder->mtCoder.mtProgress, index, p->srcPos, *destSize) != SZ_OK)
|
| + {
|
| + res = SZ_ERROR_PROGRESS;
|
| + break;
|
| + }
|
| + }
|
| + LzmaEnc_Finish(p->enc);
|
| + if (res != SZ_OK)
|
| + return res;
|
| + }
|
| + if (finished)
|
| + {
|
| + if (*destSize == destLim)
|
| + return SZ_ERROR_OUTPUT_EOF;
|
| + dest[(*destSize)++] = 0;
|
| + }
|
| + }
|
| + return res;
|
| +}
|
| +
|
| +#endif
|
| +
|
| +/* ---------- Lzma2Enc ---------- */
|
| +
|
| +CLzma2EncHandle Lzma2Enc_Create(ISzAlloc *alloc, ISzAlloc *allocBig)
|
| +{
|
| + CLzma2Enc *p = (CLzma2Enc *)alloc->Alloc(alloc, sizeof(CLzma2Enc));
|
| + if (p == 0)
|
| + return NULL;
|
| + Lzma2EncProps_Init(&p->props);
|
| + Lzma2EncProps_Normalize(&p->props);
|
| + p->outBuf = 0;
|
| + p->alloc = alloc;
|
| + p->allocBig = allocBig;
|
| + {
|
| + unsigned i;
|
| + for (i = 0; i < NUM_MT_CODER_THREADS_MAX; i++)
|
| + p->coders[i].enc = 0;
|
| + }
|
| + #ifndef _7ZIP_ST
|
| + MtCoder_Construct(&p->mtCoder);
|
| + #endif
|
| +
|
| + return p;
|
| +}
|
| +
|
| +void Lzma2Enc_Destroy(CLzma2EncHandle pp)
|
| +{
|
| + CLzma2Enc *p = (CLzma2Enc *)pp;
|
| + unsigned i;
|
| + for (i = 0; i < NUM_MT_CODER_THREADS_MAX; i++)
|
| + {
|
| + CLzma2EncInt *t = &p->coders[i];
|
| + if (t->enc)
|
| + {
|
| + LzmaEnc_Destroy(t->enc, p->alloc, p->allocBig);
|
| + t->enc = 0;
|
| + }
|
| + }
|
| +
|
| + #ifndef _7ZIP_ST
|
| + MtCoder_Destruct(&p->mtCoder);
|
| + #endif
|
| +
|
| + IAlloc_Free(p->alloc, p->outBuf);
|
| + IAlloc_Free(p->alloc, pp);
|
| +}
|
| +
|
| +SRes Lzma2Enc_SetProps(CLzma2EncHandle pp, const CLzma2EncProps *props)
|
| +{
|
| + CLzma2Enc *p = (CLzma2Enc *)pp;
|
| + CLzmaEncProps lzmaProps = props->lzmaProps;
|
| + LzmaEncProps_Normalize(&lzmaProps);
|
| + if (lzmaProps.lc + lzmaProps.lp > LZMA2_LCLP_MAX)
|
| + return SZ_ERROR_PARAM;
|
| + p->props = *props;
|
| + Lzma2EncProps_Normalize(&p->props);
|
| + return SZ_OK;
|
| +}
|
| +
|
| +Byte Lzma2Enc_WriteProperties(CLzma2EncHandle pp)
|
| +{
|
| + CLzma2Enc *p = (CLzma2Enc *)pp;
|
| + unsigned i;
|
| + UInt32 dicSize = LzmaEncProps_GetDictSize(&p->props.lzmaProps);
|
| + for (i = 0; i < 40; i++)
|
| + if (dicSize <= LZMA2_DIC_SIZE_FROM_PROP(i))
|
| + break;
|
| + return (Byte)i;
|
| +}
|
| +
|
| +SRes Lzma2Enc_Encode(CLzma2EncHandle pp,
|
| + ISeqOutStream *outStream, ISeqInStream *inStream, ICompressProgress *progress)
|
| +{
|
| + CLzma2Enc *p = (CLzma2Enc *)pp;
|
| + int i;
|
| +
|
| + for (i = 0; i < p->props.numBlockThreads; i++)
|
| + {
|
| + CLzma2EncInt *t = &p->coders[i];
|
| + if (t->enc == NULL)
|
| + {
|
| + t->enc = LzmaEnc_Create(p->alloc);
|
| + if (t->enc == NULL)
|
| + return SZ_ERROR_MEM;
|
| + }
|
| + }
|
| +
|
| + #ifndef _7ZIP_ST
|
| + if (p->props.numBlockThreads <= 1)
|
| + #endif
|
| + return Lzma2Enc_EncodeMt1(&p->coders[0], p, outStream, inStream, progress);
|
| +
|
| + #ifndef _7ZIP_ST
|
| +
|
| + {
|
| + CMtCallbackImp mtCallback;
|
| +
|
| + mtCallback.funcTable.Code = MtCallbackImp_Code;
|
| + mtCallback.lzma2Enc = p;
|
| +
|
| + p->mtCoder.progress = progress;
|
| + p->mtCoder.inStream = inStream;
|
| + p->mtCoder.outStream = outStream;
|
| + p->mtCoder.alloc = p->alloc;
|
| + p->mtCoder.mtCallback = &mtCallback.funcTable;
|
| +
|
| + p->mtCoder.blockSize = p->props.blockSize;
|
| + p->mtCoder.destBlockSize = p->props.blockSize + (p->props.blockSize >> 10) + 16;
|
| + p->mtCoder.numThreads = p->props.numBlockThreads;
|
| +
|
| + return MtCoder_Code(&p->mtCoder);
|
| + }
|
| + #endif
|
| +}
|
|
|
| Property changes on: third_party\lzma_sdk\C\Lzma2Enc.c
|
| ___________________________________________________________________
|
| Added: svn:executable
|
| + *
|
| Added: svn:eol-style
|
| + LF
|
|
|
|
|