|
Packit Service |
50c9f2 |
/*
|
|
Packit Service |
50c9f2 |
LodePNG version 20080927
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
Copyright (c) 2005-2008 Lode Vandevenne
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
This software is provided 'as-is', without any express or implied
|
|
Packit Service |
50c9f2 |
warranty. In no event will the authors be held liable for any damages
|
|
Packit Service |
50c9f2 |
arising from the use of this software.
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
Permission is granted to anyone to use this software for any purpose,
|
|
Packit Service |
50c9f2 |
including commercial applications, and to alter it and redistribute it
|
|
Packit Service |
50c9f2 |
freely, subject to the following restrictions:
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
1. The origin of this software must not be misrepresented; you must not
|
|
Packit Service |
50c9f2 |
claim that you wrote the original software. If you use this software
|
|
Packit Service |
50c9f2 |
in a product, an acknowledgment in the product documentation would be
|
|
Packit Service |
50c9f2 |
appreciated but is not required.
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
2. Altered source versions must be plainly marked as such, and must not be
|
|
Packit Service |
50c9f2 |
misrepresented as being the original software.
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
3. This notice may not be removed or altered from any source
|
|
Packit Service |
50c9f2 |
distribution.
|
|
Packit Service |
50c9f2 |
*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*
|
|
Packit Service |
50c9f2 |
The manual and changelog can be found in the header file "lodepng.h"
|
|
Packit Service |
50c9f2 |
You are free to name this file lodepng.cpp or lodepng.c depending on your usage.
|
|
Packit Service |
50c9f2 |
*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
#include "lodepng.h"
|
|
Packit Service |
50c9f2 |
#include "portable.h"
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
#define USE_BRUTE_FORCE_ENCODING 1
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
#define VERSION_STRING "20080927"
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* / Tools For C / */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*
|
|
Packit Service |
50c9f2 |
About these tools (vector, uivector, ucvector and string):
|
|
Packit Service |
50c9f2 |
-LodePNG was originally written in C++. The vectors replace the std::vectors that were used in the C++ version.
|
|
Packit Service |
50c9f2 |
-The string tools are made to avoid problems with compilers that declare things like strncat as deprecated.
|
|
Packit Service |
50c9f2 |
-They're not used in the interface, only internally in this file, so all their functions are made static.
|
|
Packit Service |
50c9f2 |
*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
//--------------------------------------------------------------------------------------------
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*LodePNG_chunk functions: These functions need as input a large enough amount of allocated memory.*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned LodePNG_chunk_length(const unsigned char* chunk); /*get the length of the data of the chunk. Total chunk length has 12 bytes more.*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void LodePNG_chunk_generate_crc(unsigned char* chunk); /*generates the correct CRC from the data and puts it in the last 4 bytes of the chunk*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*add chunks to out buffer. It reallocs the buffer to append the data. returns error code*/
|
|
Packit Service |
50c9f2 |
static unsigned LodePNG_create_chunk(unsigned char** out, size_t* outlength, unsigned length, const char* type, const unsigned char* data); /*appends new chunk to out. Returns pointer to start of appended chunk, or NULL if error happened; may change memory address of out buffer*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void LodePNG_InfoColor_init(LodePNG_InfoColor* info);
|
|
Packit Service |
50c9f2 |
static void LodePNG_InfoColor_cleanup(LodePNG_InfoColor* info);
|
|
Packit Service |
50c9f2 |
static unsigned LodePNG_InfoColor_copy(LodePNG_InfoColor* dest, const LodePNG_InfoColor* source);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*Use these functions instead of allocating palette manually*/
|
|
Packit Service |
50c9f2 |
static void LodePNG_InfoColor_clearPalette(LodePNG_InfoColor* info);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*additional color info*/
|
|
Packit Service |
50c9f2 |
static unsigned LodePNG_InfoColor_getBpp(const LodePNG_InfoColor* info); /*bits per pixel*/
|
|
Packit Service |
50c9f2 |
static unsigned LodePNG_InfoColor_isGreyscaleType(const LodePNG_InfoColor* info); /*is it a greyscale type? (colorType 0 or 4)*/
|
|
Packit Service |
50c9f2 |
static unsigned LodePNG_InfoColor_isAlphaType(const LodePNG_InfoColor* info); /*has it an alpha channel? (colorType 2 or 6)*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void LodePNG_InfoPng_init(LodePNG_InfoPng* info);
|
|
Packit Service |
50c9f2 |
static void LodePNG_InfoPng_cleanup(LodePNG_InfoPng* info);
|
|
Packit Service |
50c9f2 |
static unsigned LodePNG_InfoPng_copy(LodePNG_InfoPng* dest, const LodePNG_InfoPng* source);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void LodePNG_InfoRaw_init(LodePNG_InfoRaw* info);
|
|
Packit Service |
50c9f2 |
static void LodePNG_InfoRaw_cleanup(LodePNG_InfoRaw* info);
|
|
Packit Service |
50c9f2 |
static unsigned LodePNG_InfoRaw_copy(LodePNG_InfoRaw* dest, const LodePNG_InfoRaw* source);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*
|
|
Packit Service |
50c9f2 |
LodePNG_convert: Converts from any color type to 24-bit or 32-bit (later maybe more supported). return value = LodePNG error code
|
|
Packit Service |
50c9f2 |
The out buffer must have (w * h * bpp + 7) / 8, where bpp is the bits per pixel of the output color type (LodePNG_InfoColor_getBpp)
|
|
Packit Service |
50c9f2 |
*/
|
|
Packit Service |
50c9f2 |
static unsigned LodePNG_convert(unsigned char* out, const unsigned char* in, LodePNG_InfoColor* infoOut, LodePNG_InfoColor* infoIn, unsigned w, unsigned h);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void LodeZlib_DeflateSettings_init(LodeZlib_DeflateSettings* settings);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* LodeFlate & LodeZlib */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*This function reallocates the out buffer and appends the data.
|
|
Packit Service |
50c9f2 |
Either, *out must be NULL and *outsize must be 0, or, *out must be a valid buffer and *outsize its size in bytes.*/
|
|
Packit Service |
50c9f2 |
//unsigned LodeZlib_compress(unsigned char** out, size_t* outsize, const unsigned char* in, size_t insize, const LodeZlib_DeflateSettings* settings);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
//--------------------------------------------------------------------------------------------
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
typedef struct vector /*this one is used only by the deflate compressor*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
void* data;
|
|
Packit Service |
50c9f2 |
size_t size; /*in groups of bytes depending on type*/
|
|
Packit Service |
50c9f2 |
size_t allocsize; /*in bytes*/
|
|
Packit Service |
50c9f2 |
unsigned typesize; /*sizeof the type you store in data*/
|
|
Packit Service |
50c9f2 |
} vector;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned vector_resize(vector* p, size_t size) /*returns 1 if success, 0 if failure ==> nothing done*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(size * p->typesize > p->allocsize)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t newsize = size * p->typesize * 2;
|
|
Packit Service |
50c9f2 |
void* data = realloc(p->data, newsize);
|
|
Packit Service |
50c9f2 |
if(data)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
p->allocsize = newsize;
|
|
Packit Service |
50c9f2 |
p->data = data;
|
|
Packit Service |
50c9f2 |
p->size = size;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else return 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else p->size = size;
|
|
Packit Service |
50c9f2 |
return 1;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned vector_resized(vector* p, size_t size, void dtor(void*)) /*resize and use destructor on elements if it gets smaller*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t i;
|
|
Packit Service |
50c9f2 |
if(size < p->size) for(i = size; i < p->size; i++) dtor(&((char*)(p->data))[i * p->typesize]);
|
|
Packit Service |
50c9f2 |
return vector_resize(p, size);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void vector_cleanup(void* p)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
((vector*)p)->size = ((vector*)p)->allocsize = 0;
|
|
Packit Service |
50c9f2 |
free(((vector*)p)->data);
|
|
Packit Service |
50c9f2 |
((vector*)p)->data = NULL;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void vector_cleanupd(vector* p, void dtor(void*)) /*clear and use destructor on elements*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
vector_resized(p, 0, dtor);
|
|
Packit Service |
50c9f2 |
vector_cleanup(p);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void vector_init(vector* p, unsigned typesize)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
p->data = NULL;
|
|
Packit Service |
50c9f2 |
p->size = p->allocsize = 0;
|
|
Packit Service |
50c9f2 |
p->typesize = typesize;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void vector_swap(vector* p, vector* q) /*they're supposed to have the same typesize*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t tmp;
|
|
Packit Service |
50c9f2 |
void* tmpp;
|
|
Packit Service |
50c9f2 |
tmp = p->size; p->size = q->size; q->size = tmp;
|
|
Packit Service |
50c9f2 |
tmp = p->allocsize; p->allocsize = q->allocsize; q->allocsize = tmp;
|
|
Packit Service |
50c9f2 |
tmpp = p->data; p->data = q->data; q->data = tmpp;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void* vector_get(vector* p, size_t index)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
return &((char*)p->data)[index * p->typesize];
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* /////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
typedef struct uivector
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned* data;
|
|
Packit Service |
50c9f2 |
size_t size; /*size in number of unsigned longs*/
|
|
Packit Service |
50c9f2 |
size_t allocsize; /*allocated size in bytes*/
|
|
Packit Service |
50c9f2 |
} uivector;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void uivector_cleanup(void* p)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
((uivector*)p)->size = ((uivector*)p)->allocsize = 0;
|
|
Packit Service |
50c9f2 |
free(((uivector*)p)->data);
|
|
Packit Service |
50c9f2 |
((uivector*)p)->data = NULL;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned uivector_resize(uivector* p, size_t size) /*returns 1 if success, 0 if failure ==> nothing done*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(size * sizeof(unsigned) > p->allocsize)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t newsize = size * sizeof(unsigned) * 2;
|
|
Packit Service |
50c9f2 |
void* data = realloc(p->data, newsize);
|
|
Packit Service |
50c9f2 |
if(data)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
p->allocsize = newsize;
|
|
Packit Service |
50c9f2 |
p->data = (unsigned*)data;
|
|
Packit Service |
50c9f2 |
p->size = size;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else return 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else p->size = size;
|
|
Packit Service |
50c9f2 |
return 1;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned uivector_resizev(uivector* p, size_t size, unsigned value) /*resize and give all new elements the value*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t oldsize = p->size, i;
|
|
Packit Service |
50c9f2 |
if(!uivector_resize(p, size)) return 0;
|
|
Packit Service |
50c9f2 |
for(i = oldsize; i < size; i++) p->data[i] = value;
|
|
Packit Service |
50c9f2 |
return 1;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void uivector_init(uivector* p)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
p->data = NULL;
|
|
Packit Service |
50c9f2 |
p->size = p->allocsize = 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned uivector_push_back(uivector* p, unsigned c) /*returns 1 if success, 0 if failure ==> nothing done*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(!uivector_resize(p, p->size + 1)) return 0;
|
|
Packit Service |
50c9f2 |
p->data[p->size - 1] = c;
|
|
Packit Service |
50c9f2 |
return 1;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned uivector_copy(uivector* p, const uivector* q) /*copy q to p, returns 1 if success, 0 if failure ==> nothing done*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t i;
|
|
Packit Service |
50c9f2 |
if(!uivector_resize(p, q->size)) return 0;
|
|
Packit Service |
50c9f2 |
for(i = 0; i < q->size; i++) p->data[i] = q->data[i];
|
|
Packit Service |
50c9f2 |
return 1;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void uivector_swap(uivector* p, uivector* q)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t tmp;
|
|
Packit Service |
50c9f2 |
unsigned* tmpp;
|
|
Packit Service |
50c9f2 |
tmp = p->size; p->size = q->size; q->size = tmp;
|
|
Packit Service |
50c9f2 |
tmp = p->allocsize; p->allocsize = q->allocsize; q->allocsize = tmp;
|
|
Packit Service |
50c9f2 |
tmpp = p->data; p->data = q->data; q->data = tmpp;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* /////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
typedef struct ucvector
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned char* data;
|
|
Packit Service |
50c9f2 |
size_t size; /*used size*/
|
|
Packit Service |
50c9f2 |
size_t allocsize; /*allocated size*/
|
|
Packit Service |
50c9f2 |
} ucvector;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void ucvector_cleanup(void* p)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
((ucvector*)p)->size = ((ucvector*)p)->allocsize = 0;
|
|
Packit Service |
50c9f2 |
free(((ucvector*)p)->data);
|
|
Packit Service |
50c9f2 |
((ucvector*)p)->data = NULL;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned ucvector_resize(ucvector* p, size_t size) /*returns 1 if success, 0 if failure ==> nothing done*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(size * sizeof(unsigned) > p->allocsize)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t newsize = size * sizeof(unsigned) * 2;
|
|
Packit Service |
50c9f2 |
void* data = realloc(p->data, newsize);
|
|
Packit Service |
50c9f2 |
if(data)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
p->allocsize = newsize;
|
|
Packit Service |
50c9f2 |
p->data = (unsigned char*)data;
|
|
Packit Service |
50c9f2 |
p->size = size;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else return 0; /*error: not enough memory*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else p->size = size;
|
|
Packit Service |
50c9f2 |
return 1;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void ucvector_init(ucvector* p)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
p->data = NULL;
|
|
Packit Service |
50c9f2 |
p->size = p->allocsize = 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*you can both convert from vector to buffer&size and vica versa*/
|
|
Packit Service |
50c9f2 |
static void ucvector_init_buffer(ucvector* p, unsigned char* buffer, size_t size)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
p->data = buffer;
|
|
Packit Service |
50c9f2 |
p->allocsize = p->size = size;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned ucvector_push_back(ucvector* p, unsigned char c) /*returns 1 if success, 0 if failure ==> nothing done*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(!ucvector_resize(p, p->size + 1)) return 0;
|
|
Packit Service |
50c9f2 |
p->data[p->size - 1] = c;
|
|
Packit Service |
50c9f2 |
return 1;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* / Reading and writing single bits and bytes from/to stream for Deflate / */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void addBitToStream(size_t* bitpointer, ucvector* bitstream, unsigned char bit)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if((*bitpointer) % 8 == 0) ucvector_push_back(bitstream, 0); /*add a new byte at the end*/
|
|
Packit Service |
50c9f2 |
(bitstream->data[bitstream->size - 1]) |= (bit << ((*bitpointer) & 0x7)); /*earlier bit of huffman code is in a lesser significant bit of an earlier byte*/
|
|
Packit Service |
50c9f2 |
(*bitpointer)++;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void addBitsToStream(size_t* bitpointer, ucvector* bitstream, unsigned value, size_t nbits)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t i;
|
|
Packit Service |
50c9f2 |
for(i = 0; i < nbits; i++) addBitToStream(bitpointer, bitstream, (unsigned char)((value >> i) & 1));
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void addBitsToStreamReversed(size_t* bitpointer, ucvector* bitstream, unsigned value, size_t nbits)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t i;
|
|
Packit Service |
50c9f2 |
for(i = 0; i < nbits; i++) addBitToStream(bitpointer, bitstream, (unsigned char)((value >> (nbits - 1 - i)) & 1));
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* / Deflate - Huffman / */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
#define FIRST_LENGTH_CODE_INDEX 257
|
|
Packit Service |
50c9f2 |
#define LAST_LENGTH_CODE_INDEX 285
|
|
Packit Service |
50c9f2 |
#define NUM_DEFLATE_CODE_SYMBOLS 288 /*256 literals, the end code, some length codes, and 2 unused codes*/
|
|
Packit Service |
50c9f2 |
#define NUM_DISTANCE_SYMBOLS 32 /*the distance codes have their own symbols, 30 used, 2 unused*/
|
|
Packit Service |
50c9f2 |
#define NUM_CODE_LENGTH_CODES 19 /*the code length codes. 0-15: code lengths, 16: copy previous 3-6 times, 17: 3-10 zeros, 18: 11-138 zeros*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static const unsigned LENGTHBASE[29] /*the base lengths represented by codes 257-285*/
|
|
Packit Service |
50c9f2 |
= {3, 4, 5, 6, 7, 8, 9, 10, 11, 13, 15, 17, 19, 23, 27, 31, 35, 43, 51, 59, 67, 83, 99, 115, 131, 163, 195, 227, 258};
|
|
Packit Service |
50c9f2 |
static const unsigned LENGTHEXTRA[29] /*the extra bits used by codes 257-285 (added to base length)*/
|
|
Packit Service |
50c9f2 |
= {0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3, 4, 4, 4, 4, 5, 5, 5, 5, 0};
|
|
Packit Service |
50c9f2 |
static const unsigned DISTANCEBASE[30] /*the base backwards distances (the bits of distance codes appear after length codes and use their own huffman tree)*/
|
|
Packit Service |
50c9f2 |
= {1, 2, 3, 4, 5, 7, 9, 13, 17, 25, 33, 49, 65, 97, 129, 193, 257, 385, 513, 769, 1025, 1537, 2049, 3073, 4097, 6145, 8193, 12289, 16385, 24577};
|
|
Packit Service |
50c9f2 |
static const unsigned DISTANCEEXTRA[30] /*the extra bits of backwards distances (added to base)*/
|
|
Packit Service |
50c9f2 |
= {0, 0, 0, 0, 1, 1, 2, 2, 3, 3, 4, 4, 5, 5, 6, 6, 7, 7, 8, 8, 9, 9, 10, 10, 11, 11, 12, 12, 13, 13};
|
|
Packit Service |
50c9f2 |
static const unsigned CLCL[NUM_CODE_LENGTH_CODES] /*the order in which "code length alphabet code lengths" are stored, out of this the huffman tree of the dynamic huffman tree lengths is generated*/
|
|
Packit Service |
50c9f2 |
= {16, 17, 18, 0, 8, 7, 9, 6, 10, 5, 11, 4, 12, 3, 13, 2, 14, 1, 15};
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* /////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*terminology used for the package-merge algorithm and the coin collector's problem*/
|
|
Packit Service |
50c9f2 |
typedef struct Coin /*a coin can be multiple coins (when they're merged)*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
uivector symbols;
|
|
Packit Service |
50c9f2 |
float weight; /*the sum of all weights in this coin*/
|
|
Packit Service |
50c9f2 |
} Coin;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void Coin_init(Coin* c)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
uivector_init(&c->symbols);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void Coin_cleanup(void* c) /*void* so that this dtor can be given as function pointer to the vector resize function*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
uivector_cleanup(&((Coin*)c)->symbols);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void Coin_copy(Coin* c1, const Coin* c2)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
c1->weight = c2->weight;
|
|
Packit Service |
50c9f2 |
uivector_copy(&c1->symbols, &c2->symbols);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void addCoins(Coin* c1, const Coin* c2)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned i;
|
|
Packit Service |
50c9f2 |
for(i = 0; i < c2->symbols.size; i++) uivector_push_back(&c1->symbols, c2->symbols.data[i]);
|
|
Packit Service |
50c9f2 |
c1->weight += c2->weight;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void Coin_sort(Coin* data, size_t amount) /*combsort*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t gap = amount;
|
|
Packit Service |
50c9f2 |
unsigned char swapped = 0;
|
|
Packit Service |
50c9f2 |
while(gap > 1 || swapped)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t i;
|
|
Packit Service |
50c9f2 |
gap = (gap * 10) / 13; /*shrink factor 1.3*/
|
|
Packit Service |
50c9f2 |
if(gap == 9 || gap == 10) gap = 11; /*combsort11*/
|
|
Packit Service |
50c9f2 |
if(gap < 1) gap = 1;
|
|
Packit Service |
50c9f2 |
swapped = 0;
|
|
Packit Service |
50c9f2 |
for(i = 0; i < amount - gap; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t j = i + gap;
|
|
Packit Service |
50c9f2 |
if(data[j].weight < data[i].weight)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
float temp = data[j].weight; data[j].weight = data[i].weight; data[i].weight = temp;
|
|
Packit Service |
50c9f2 |
uivector_swap(&data[i].symbols, &data[j].symbols);
|
|
Packit Service |
50c9f2 |
swapped = 1;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
typedef struct HuffmanTree
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
uivector tree2d;
|
|
Packit Service |
50c9f2 |
uivector tree1d;
|
|
Packit Service |
50c9f2 |
uivector lengths; /*the lengths of the codes of the 1d-tree*/
|
|
Packit Service |
50c9f2 |
unsigned maxbitlen; /*maximum number of bits a single code can get*/
|
|
Packit Service |
50c9f2 |
unsigned numcodes; /*number of symbols in the alphabet = number of codes*/
|
|
Packit Service |
50c9f2 |
} HuffmanTree;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*function used for debug purposes*/
|
|
Packit Service |
50c9f2 |
/*#include <iostream>
|
|
Packit Service |
50c9f2 |
static void HuffmanTree_draw(HuffmanTree* tree)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
std::cout << "tree. length: " << tree->numcodes << " maxbitlen: " << tree->maxbitlen << std::endl;
|
|
Packit Service |
50c9f2 |
for(size_t i = 0; i < tree->tree1d.size; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(tree->lengths.data[i])
|
|
Packit Service |
50c9f2 |
std::cout << i << " " << tree->tree1d.data[i] << " " << tree->lengths.data[i] << std::endl;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
std::cout << std::endl;
|
|
Packit Service |
50c9f2 |
}*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void HuffmanTree_init(HuffmanTree* tree)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
uivector_init(&tree->tree2d);
|
|
Packit Service |
50c9f2 |
uivector_init(&tree->tree1d);
|
|
Packit Service |
50c9f2 |
uivector_init(&tree->lengths);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void HuffmanTree_cleanup(HuffmanTree* tree)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
uivector_cleanup(&tree->tree2d);
|
|
Packit Service |
50c9f2 |
uivector_cleanup(&tree->tree1d);
|
|
Packit Service |
50c9f2 |
uivector_cleanup(&tree->lengths);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*the tree representation used by the decoder. return value is error*/
|
|
Packit Service |
50c9f2 |
static unsigned HuffmanTree_make2DTree(HuffmanTree* tree)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned nodefilled = 0; /*up to which node it is filled*/
|
|
Packit Service |
50c9f2 |
unsigned treepos = 0; /*position in the tree (1 of the numcodes columns)*/
|
|
Packit Service |
50c9f2 |
unsigned n, i;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(!uivector_resize(&tree->tree2d, tree->numcodes * 2)) return 9901; /*if failed return not enough memory error*/
|
|
Packit Service |
50c9f2 |
/*convert tree1d[] to tree2d[][]. In the 2D array, a value of 32767 means uninited, a value >= numcodes is an address to another bit, a value < numcodes is a code. The 2 rows are the 2 possible bit values (0 or 1), there are as many columns as codes - 1
|
|
Packit Service |
50c9f2 |
a good huffmann tree has N * 2 - 1 nodes, of which N - 1 are internal nodes. Here, the internal nodes are stored (what their 0 and 1 option point to). There is only memory for such good tree currently, if there are more nodes (due to too long length codes), error 55 will happen*/
|
|
Packit Service |
50c9f2 |
for(n = 0; n < tree->numcodes * 2; n++) tree->tree2d.data[n] = 32767; /*32767 here means the tree2d isn't filled there yet*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
for(n = 0; n < tree->numcodes; n++) /*the codes*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < tree->lengths.data[n]; i++) /*the bits for this code*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned char bit = (unsigned char)((tree->tree1d.data[n] >> (tree->lengths.data[n] - i - 1)) & 1);
|
|
Packit Service |
50c9f2 |
if(treepos > tree->numcodes - 2) return 55; /*error 55: oversubscribed; see description in header*/
|
|
Packit Service |
50c9f2 |
if(tree->tree2d.data[2 * treepos + bit] == 32767) /*not yet filled in*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(i + 1 == tree->lengths.data[n]) /*last bit*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
tree->tree2d.data[2 * treepos + bit] = n; /*put the current code in it*/
|
|
Packit Service |
50c9f2 |
treepos = 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else /*put address of the next step in here, first that address has to be found of course (it's just nodefilled + 1)...*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
nodefilled++;
|
|
Packit Service |
50c9f2 |
tree->tree2d.data[2 * treepos + bit] = nodefilled + tree->numcodes; /*addresses encoded with numcodes added to it*/
|
|
Packit Service |
50c9f2 |
treepos = nodefilled;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else treepos = tree->tree2d.data[2 * treepos + bit] - tree->numcodes;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
for(n = 0; n < tree->numcodes * 2; n++) if(tree->tree2d.data[n] == 32767) tree->tree2d.data[n] = 0; /*remove possible remaining 32767's*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
return 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned HuffmanTree_makeFromLengths2(HuffmanTree* tree) /*given that numcodes, lengths and maxbitlen are already filled in correctly. return value is error.*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
uivector blcount;
|
|
Packit Service |
50c9f2 |
uivector nextcode;
|
|
Packit Service |
50c9f2 |
unsigned bits, n, error = 0;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
uivector_init(&blcount);
|
|
Packit Service |
50c9f2 |
uivector_init(&nextcode);
|
|
Packit Service |
50c9f2 |
if(!uivector_resize(&tree->tree1d, tree->numcodes)
|
|
Packit Service |
50c9f2 |
|| !uivector_resizev(&blcount, tree->maxbitlen + 1, 0)
|
|
Packit Service |
50c9f2 |
|| !uivector_resizev(&nextcode, tree->maxbitlen + 1, 0))
|
|
Packit Service |
50c9f2 |
error = 9902;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(!error)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*step 1: count number of instances of each code length*/
|
|
Packit Service |
50c9f2 |
for(bits = 0; bits < tree->numcodes; bits++) blcount.data[tree->lengths.data[bits]]++;
|
|
Packit Service |
50c9f2 |
/*step 2: generate the nextcode values*/
|
|
Packit Service |
50c9f2 |
for(bits = 1; bits <= tree->maxbitlen; bits++) nextcode.data[bits] = (nextcode.data[bits - 1] + blcount.data[bits - 1]) << 1;
|
|
Packit Service |
50c9f2 |
/*step 3: generate all the codes*/
|
|
Packit Service |
50c9f2 |
for(n = 0; n < tree->numcodes; n++) if(tree->lengths.data[n] != 0) tree->tree1d.data[n] = nextcode.data[tree->lengths.data[n]]++;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
uivector_cleanup(&blcount);
|
|
Packit Service |
50c9f2 |
uivector_cleanup(&nextcode);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(!error) return HuffmanTree_make2DTree(tree);
|
|
Packit Service |
50c9f2 |
else return error;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*given the code lengths (as stored in the PNG file), generate the tree as defined by Deflate. maxbitlen is the maximum bits that a code in the tree can have. return value is error.*/
|
|
Packit Service |
50c9f2 |
static unsigned HuffmanTree_makeFromLengths(HuffmanTree* tree, const unsigned* bitlen, size_t numcodes, unsigned maxbitlen)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned i;
|
|
Packit Service |
50c9f2 |
if(!uivector_resize(&tree->lengths, numcodes)) return 9903;
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numcodes; i++) tree->lengths.data[i] = bitlen[i];
|
|
Packit Service |
50c9f2 |
tree->numcodes = (unsigned)numcodes; /*number of symbols*/
|
|
Packit Service |
50c9f2 |
tree->maxbitlen = maxbitlen;
|
|
Packit Service |
50c9f2 |
return HuffmanTree_makeFromLengths2(tree);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned HuffmanTree_fillInCoins(vector* coins, const unsigned* frequencies, unsigned numcodes, size_t sum)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned i;
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numcodes; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
Coin* coin;
|
|
Packit Service |
50c9f2 |
if(frequencies[i] == 0) continue; /*it's important to exclude symbols that aren't present*/
|
|
Packit Service |
50c9f2 |
if(!vector_resize(coins, coins->size + 1)) { vector_cleanup(coins); return 9904; }
|
|
Packit Service |
50c9f2 |
coin = (Coin*)(vector_get(coins, coins->size - 1));
|
|
Packit Service |
50c9f2 |
Coin_init(coin);
|
|
Packit Service |
50c9f2 |
coin->weight = frequencies[i] / (float)sum;
|
|
Packit Service |
50c9f2 |
uivector_push_back(&coin->symbols, i);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
if(coins->size) Coin_sort((Coin*)coins->data, coins->size);
|
|
Packit Service |
50c9f2 |
return 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned HuffmanTree_makeFromFrequencies(HuffmanTree* tree, const unsigned* frequencies, size_t numcodes, unsigned maxbitlen)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned i, j;
|
|
Packit Service |
50c9f2 |
size_t sum = 0, numpresent = 0;
|
|
Packit Service |
50c9f2 |
unsigned error = 0;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
vector prev_row; /*type Coin, the previous row of coins*/
|
|
Packit Service |
50c9f2 |
vector coins; /*type Coin, the coins of the currently calculated row*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
tree->maxbitlen = maxbitlen;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numcodes; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(frequencies[i] > 0)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
numpresent++;
|
|
Packit Service |
50c9f2 |
sum += frequencies[i];
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(numcodes == 0) return 80; /*error: a tree of 0 symbols is not supposed to be made*/
|
|
Packit Service |
50c9f2 |
tree->numcodes = (unsigned)numcodes; /*number of symbols*/
|
|
Packit Service |
50c9f2 |
uivector_resize(&tree->lengths, 0);
|
|
Packit Service |
50c9f2 |
if(!uivector_resizev(&tree->lengths, tree->numcodes, 0)) return 9905;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(numpresent == 0) /*there are no symbols at all, in that case add one symbol of value 0 to the tree (see RFC 1951 section 3.2.7) */
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
tree->lengths.data[0] = 1;
|
|
Packit Service |
50c9f2 |
return HuffmanTree_makeFromLengths2(tree);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else if(numpresent == 1) /*the package merge algorithm gives wrong results if there's only one symbol (theoretically 0 bits would then suffice, but we need a proper symbol for zlib)*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numcodes; i++) if(frequencies[i]) tree->lengths.data[i] = 1;
|
|
Packit Service |
50c9f2 |
return HuffmanTree_makeFromLengths2(tree);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
vector_init(&coins, sizeof(Coin));
|
|
Packit Service |
50c9f2 |
vector_init(&prev_row, sizeof(Coin));
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*Package-Merge algorithm represented by coin collector's problem
|
|
Packit Service |
50c9f2 |
For every symbol, maxbitlen coins will be created*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*first row, lowest denominator*/
|
|
Packit Service |
50c9f2 |
error = HuffmanTree_fillInCoins(&coins, frequencies, tree->numcodes, sum);
|
|
Packit Service |
50c9f2 |
if(!error)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
for(j = 1; j <= maxbitlen && !error; j++) /*each of the remaining rows*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
vector_swap(&coins, &prev_row); /*swap instead of copying*/
|
|
Packit Service |
50c9f2 |
if(!vector_resized(&coins, 0, Coin_cleanup)) { error = 9906; break; }
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
for(i = 0; i + 1 < prev_row.size; i += 2)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(!vector_resize(&coins, coins.size + 1)) { error = 9907; break; }
|
|
Packit Service |
50c9f2 |
Coin_init((Coin*)vector_get(&coins, coins.size - 1));
|
|
Packit Service |
50c9f2 |
Coin_copy((Coin*)vector_get(&coins, coins.size - 1), (Coin*)vector_get(&prev_row, i));
|
|
Packit Service |
50c9f2 |
addCoins((Coin*)vector_get(&coins, coins.size - 1), (Coin*)vector_get(&prev_row, i + 1)); /*merge the coins into packages*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
if(j < maxbitlen)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
error = HuffmanTree_fillInCoins(&coins, frequencies, tree->numcodes, sum);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(!error)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*keep the coins with lowest weight, so that they add up to the amount of symbols - 1*/
|
|
Packit Service |
50c9f2 |
vector_resized(&coins, numpresent - 1, Coin_cleanup);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*calculate the lengths of each symbol, as the amount of times a coin of each symbol is used*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < coins.size; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
Coin* coin = (Coin*)vector_get(&coins, i);
|
|
Packit Service |
50c9f2 |
for(j = 0; j < coin->symbols.size; j++) tree->lengths.data[coin->symbols.data[j]]++;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
error = HuffmanTree_makeFromLengths2(tree);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
vector_cleanupd(&coins, Coin_cleanup);
|
|
Packit Service |
50c9f2 |
vector_cleanupd(&prev_row, Coin_cleanup);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
return error;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned HuffmanTree_getCode(const HuffmanTree* tree, unsigned index) { return tree->tree1d.data[index]; }
|
|
Packit Service |
50c9f2 |
static unsigned HuffmanTree_getLength(const HuffmanTree* tree, unsigned index) { return tree->lengths.data[index]; }
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*get the tree of a deflated block with fixed tree, as specified in the deflate specification*/
|
|
Packit Service |
50c9f2 |
static unsigned generateFixedTree(HuffmanTree* tree)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned i, error = 0;
|
|
Packit Service |
50c9f2 |
uivector bitlen;
|
|
Packit Service |
50c9f2 |
uivector_init(&bitlen);
|
|
Packit Service |
50c9f2 |
if(!uivector_resize(&bitlen, NUM_DEFLATE_CODE_SYMBOLS)) error = 9909;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(!error)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*288 possible codes: 0-255=literals, 256=endcode, 257-285=lengthcodes, 286-287=unused*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i <= 143; i++) bitlen.data[i] = 8;
|
|
Packit Service |
50c9f2 |
for(i = 144; i <= 255; i++) bitlen.data[i] = 9;
|
|
Packit Service |
50c9f2 |
for(i = 256; i <= 279; i++) bitlen.data[i] = 7;
|
|
Packit Service |
50c9f2 |
for(i = 280; i <= 287; i++) bitlen.data[i] = 8;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
error = HuffmanTree_makeFromLengths(tree, bitlen.data, NUM_DEFLATE_CODE_SYMBOLS, 15);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
uivector_cleanup(&bitlen);
|
|
Packit Service |
50c9f2 |
return error;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned generateDistanceTree(HuffmanTree* tree)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned i, error = 0;
|
|
Packit Service |
50c9f2 |
uivector bitlen;
|
|
Packit Service |
50c9f2 |
uivector_init(&bitlen);
|
|
Packit Service |
50c9f2 |
if(!uivector_resize(&bitlen, NUM_DISTANCE_SYMBOLS)) error = 9910;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*there are 32 distance codes, but 30-31 are unused*/
|
|
Packit Service |
50c9f2 |
if(!error)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
for(i = 0; i < NUM_DISTANCE_SYMBOLS; i++) bitlen.data[i] = 5;
|
|
Packit Service |
50c9f2 |
error = HuffmanTree_makeFromLengths(tree, bitlen.data, NUM_DISTANCE_SYMBOLS, 15);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
uivector_cleanup(&bitlen);
|
|
Packit Service |
50c9f2 |
return error;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* / Deflator / */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static const size_t MAX_SUPPORTED_DEFLATE_LENGTH = 258;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*bitlen is the size in bits of the code*/
|
|
Packit Service |
50c9f2 |
static void addHuffmanSymbol(size_t* bp, ucvector* compressed, unsigned code, unsigned bitlen)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
addBitsToStreamReversed(bp, compressed, code, bitlen);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*search the index in the array, that has the largest value smaller than or equal to the given value, given array must be sorted (if no value is smaller, it returns the size of the given array)*/
|
|
Packit Service |
50c9f2 |
static size_t searchCodeIndex(const unsigned* array, size_t array_size, size_t value)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*linear search implementation*/
|
|
Packit Service |
50c9f2 |
/*for(size_t i = 1; i < array_size; i++) if(array[i] > value) return i - 1;
|
|
Packit Service |
50c9f2 |
return array_size - 1;*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*binary search implementation (not that much faster) (precondition: array_size > 0)*/
|
|
Packit Service |
50c9f2 |
size_t left = 1;
|
|
Packit Service |
50c9f2 |
size_t right = array_size - 1;
|
|
Packit Service |
50c9f2 |
while(left <= right)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t mid = (left + right) / 2;
|
|
Packit Service |
50c9f2 |
if(array[mid] <= value) left = mid + 1; /*the value to find is more to the right*/
|
|
Packit Service |
50c9f2 |
else if(array[mid - 1] > value) right = mid - 1; /*the value to find is more to the left*/
|
|
Packit Service |
50c9f2 |
else return mid - 1;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
return array_size - 1;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void addLengthDistance(uivector* values, size_t length, size_t distance)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*values in encoded vector are those used by deflate:
|
|
Packit Service |
50c9f2 |
0-255: literal bytes
|
|
Packit Service |
50c9f2 |
256: end
|
|
Packit Service |
50c9f2 |
257-285: length/distance pair (length code, followed by extra length bits, distance code, extra distance bits)
|
|
Packit Service |
50c9f2 |
286-287: invalid*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
unsigned length_code = (unsigned)searchCodeIndex(LENGTHBASE, 29, length);
|
|
Packit Service |
50c9f2 |
unsigned extra_length = (unsigned)(length - LENGTHBASE[length_code]);
|
|
Packit Service |
50c9f2 |
unsigned dist_code = (unsigned)searchCodeIndex(DISTANCEBASE, 30, distance);
|
|
Packit Service |
50c9f2 |
unsigned extra_distance = (unsigned)(distance - DISTANCEBASE[dist_code]);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
uivector_push_back(values, length_code + FIRST_LENGTH_CODE_INDEX);
|
|
Packit Service |
50c9f2 |
uivector_push_back(values, extra_length);
|
|
Packit Service |
50c9f2 |
uivector_push_back(values, dist_code);
|
|
Packit Service |
50c9f2 |
uivector_push_back(values, extra_distance);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
#if USE_BRUTE_FORCE_ENCODING
|
|
Packit Service |
50c9f2 |
#define encodeLZ77 encodeLZ77_brute
|
|
Packit Service |
50c9f2 |
/*the "brute force" version of the encodeLZ7 algorithm, not used anymore, kept here for reference*/
|
|
Packit Service |
50c9f2 |
static unsigned encodeLZ77_brute(uivector* out, const unsigned char* in, size_t size, unsigned windowSize)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t pos;
|
|
Packit Service |
50c9f2 |
/*using pointer instead of vector for input makes it faster when NOT using optimization when compiling; no influence if optimization is used*/
|
|
Packit Service |
50c9f2 |
for(pos = 0; pos < size; pos++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*Phase 1: doxygen images often have long runs of the same color, try to find them*/
|
|
Packit Service |
50c9f2 |
const int minLength = 4; // Minimum length for a run to make sense
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(pos < size - minLength * 4)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t p, fp;
|
|
Packit Service |
50c9f2 |
size_t current_length;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*RGBA pixel run?*/
|
|
Packit Service |
50c9f2 |
p = pos;
|
|
Packit Service |
50c9f2 |
fp = pos + 4;
|
|
Packit Service |
50c9f2 |
current_length = 0;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
while(fp < size && in[p] == in[fp] && current_length < MAX_SUPPORTED_DEFLATE_LENGTH)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
++p;
|
|
Packit Service |
50c9f2 |
++fp;
|
|
Packit Service |
50c9f2 |
++current_length;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if (current_length > (minLength - 1 ) * 4) /*worth using?*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
uivector_push_back(out, in[pos ]);
|
|
Packit Service |
50c9f2 |
uivector_push_back(out, in[pos + 1]);
|
|
Packit Service |
50c9f2 |
uivector_push_back(out, in[pos + 2]);
|
|
Packit Service |
50c9f2 |
uivector_push_back(out, in[pos + 3]);
|
|
Packit Service |
50c9f2 |
addLengthDistance(out, current_length, 4);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
pos += current_length + 4 - 1; /*-1 for loop's pos++*/
|
|
Packit Service |
50c9f2 |
continue;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*RGB pixel run?*/
|
|
Packit Service |
50c9f2 |
p = pos;
|
|
Packit Service |
50c9f2 |
fp = pos + 3;
|
|
Packit Service |
50c9f2 |
current_length = 0;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
while(fp < size && in[p] == in[fp] && current_length < MAX_SUPPORTED_DEFLATE_LENGTH)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
++p;
|
|
Packit Service |
50c9f2 |
++fp;
|
|
Packit Service |
50c9f2 |
++current_length;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if (current_length > (minLength - 1 ) * 3) /*worth using?*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
uivector_push_back(out, in[pos ]);
|
|
Packit Service |
50c9f2 |
uivector_push_back(out, in[pos + 1]);
|
|
Packit Service |
50c9f2 |
uivector_push_back(out, in[pos + 2]);
|
|
Packit Service |
50c9f2 |
addLengthDistance(out, current_length, 3);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
pos += current_length + 3 - 1; /*-1 for loop's pos++*/
|
|
Packit Service |
50c9f2 |
continue;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
size_t length = 0, offset = 0; /*the length and offset found for the current position*/
|
|
Packit Service |
50c9f2 |
size_t max_offset = pos < windowSize ? pos : windowSize; /*how far back to test*/
|
|
Packit Service |
50c9f2 |
size_t current_offset;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/**search for the longest string**/
|
|
Packit Service |
50c9f2 |
for(current_offset = 1; current_offset < max_offset; current_offset++) /*search backwards through all possible distances (=offsets)*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t backpos = pos - current_offset;
|
|
Packit Service |
50c9f2 |
if(in[backpos] == in[pos])
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*test the next characters*/
|
|
Packit Service |
50c9f2 |
size_t current_length = 1;
|
|
Packit Service |
50c9f2 |
size_t backtest = backpos + 1;
|
|
Packit Service |
50c9f2 |
size_t foretest = pos + 1;
|
|
Packit Service |
50c9f2 |
while(foretest < size && in[backtest] == in[foretest] && current_length < MAX_SUPPORTED_DEFLATE_LENGTH) /*maximum support length by deflate is max length*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(backpos >= pos) backpos -= current_offset; /*continue as if we work on the decoded bytes after pos by jumping back before pos*/
|
|
Packit Service |
50c9f2 |
current_length++;
|
|
Packit Service |
50c9f2 |
backtest++;
|
|
Packit Service |
50c9f2 |
foretest++;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
if(current_length > length)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
length = current_length; /*the longest length*/
|
|
Packit Service |
50c9f2 |
offset = current_offset; /*the offset that is related to this longest length*/
|
|
Packit Service |
50c9f2 |
if(current_length == MAX_SUPPORTED_DEFLATE_LENGTH) break; /*you can jump out of this for loop once a length of max length is found (gives significant speed gain)*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/**encode it as length/distance pair or literal value**/
|
|
Packit Service |
50c9f2 |
if(length < 3) /*only lengths of 3 or higher are supported as length/distance pair*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
uivector_push_back(out, in[pos]);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
addLengthDistance(out, length, offset);
|
|
Packit Service |
50c9f2 |
pos += (length - 1);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
} /*end of the loop through each character of input*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
return 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
#endif
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*
|
|
Packit Service |
50c9f2 |
static const unsigned HASH_NUM_VALUES = 65536;
|
|
Packit Service |
50c9f2 |
static const unsigned HASH_NUM_CHARACTERS = 6;
|
|
Packit Service |
50c9f2 |
static const unsigned HASH_SHIFT = 2;
|
|
Packit Service |
50c9f2 |
Good and fast values: HASH_NUM_VALUES=65536, HASH_NUM_CHARACTERS=6, HASH_SHIFT=2
|
|
Packit Service |
50c9f2 |
making HASH_NUM_CHARACTERS larger (like 8), makes the file size larger but is a bit faster
|
|
Packit Service |
50c9f2 |
making HASH_NUM_CHARACTERS smaller (like 3), makes the file size smaller but is slower
|
|
Packit Service |
50c9f2 |
*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
#if !defined(USE_BRUTE_FORCE_ENCODING)
|
|
Packit Service |
50c9f2 |
static unsigned getHash(const unsigned char* data, size_t size, size_t pos)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned result = 0;
|
|
Packit Service |
50c9f2 |
size_t amount, i;
|
|
Packit Service |
50c9f2 |
if(pos >= size) return 0;
|
|
Packit Service |
50c9f2 |
amount = HASH_NUM_CHARACTERS; if(pos + amount >= size) amount = size - pos;
|
|
Packit Service |
50c9f2 |
for(i = 0; i < amount; i++) result ^= (data[pos + i] << (i * HASH_SHIFT));
|
|
Packit Service |
50c9f2 |
return result % HASH_NUM_VALUES;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*LZ77-encode the data using a hash table technique to let it encode faster. Return value is error code*/
|
|
Packit Service |
50c9f2 |
static unsigned encodeLZ77(uivector* out, const unsigned char* in, size_t size, unsigned windowSize)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/**generate hash table**/
|
|
Packit Service |
50c9f2 |
vector table; /*HASH_NUM_VALUES uivectors; this represents what would be an std::vector<std::vector<unsigned> > in C++*/
|
|
Packit Service |
50c9f2 |
uivector tablepos1, tablepos2;
|
|
Packit Service |
50c9f2 |
unsigned pos, i, error = 0;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
vector_init(&table, sizeof(uivector));
|
|
Packit Service |
50c9f2 |
if(!vector_resize(&table, HASH_NUM_VALUES)) return 9917;
|
|
Packit Service |
50c9f2 |
for(i = 0; i < HASH_NUM_VALUES; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
uivector* v = (uivector*)vector_get(&table, i);
|
|
Packit Service |
50c9f2 |
uivector_init(v);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*remember start and end positions in the tables to searching in*/
|
|
Packit Service |
50c9f2 |
uivector_init(&tablepos1);
|
|
Packit Service |
50c9f2 |
uivector_init(&tablepos2);
|
|
Packit Service |
50c9f2 |
if(!uivector_resizev(&tablepos1, HASH_NUM_VALUES, 0)) error = 9918;
|
|
Packit Service |
50c9f2 |
if(!uivector_resizev(&tablepos2, HASH_NUM_VALUES, 0)) error = 9919;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(!error)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
for(pos = 0; pos < size; pos++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned length = 0, offset = 0; /*the length and offset found for the current position*/
|
|
Packit Service |
50c9f2 |
unsigned max_offset = pos < windowSize ? pos : windowSize; /*how far back to test*/
|
|
Packit Service |
50c9f2 |
unsigned tablepos;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*/search for the longest string*/
|
|
Packit Service |
50c9f2 |
/*first find out where in the table to start (the first value that is in the range from "pos - max_offset" to "pos")*/
|
|
Packit Service |
50c9f2 |
unsigned hash = getHash(in, size, pos);
|
|
Packit Service |
50c9f2 |
if(!uivector_push_back((uivector*)vector_get(&table, hash), pos)) { error = 9920; break; }
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
while(((uivector*)vector_get(&table, hash))->data[tablepos1.data[hash]] < pos - max_offset) tablepos1.data[hash]++; /*it now points to the first value in the table for which the index is larger than or equal to pos - max_offset*/
|
|
Packit Service |
50c9f2 |
while(((uivector*)vector_get(&table, hash))->data[tablepos2.data[hash]] < pos) tablepos2.data[hash]++; /*it now points to the first value in the table for which the index is larger than or equal to pos*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
for(tablepos = tablepos2.data[hash] - 1; tablepos >= tablepos1.data[hash] && tablepos < tablepos2.data[hash]; tablepos--)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned backpos = ((uivector*)vector_get(&table, hash))->data[tablepos];
|
|
Packit Service |
50c9f2 |
unsigned current_offset = pos - backpos;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*test the next characters*/
|
|
Packit Service |
50c9f2 |
unsigned current_length = 0;
|
|
Packit Service |
50c9f2 |
unsigned backtest = backpos;
|
|
Packit Service |
50c9f2 |
unsigned foretest = pos;
|
|
Packit Service |
50c9f2 |
while(foretest < size && in[backtest] == in[foretest] && current_length < MAX_SUPPORTED_DEFLATE_LENGTH) /*maximum support length by deflate is max length*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(backpos >= pos) backpos -= current_offset; /*continue as if we work on the decoded bytes after pos by jumping back before pos*/
|
|
Packit Service |
50c9f2 |
current_length++;
|
|
Packit Service |
50c9f2 |
backtest++;
|
|
Packit Service |
50c9f2 |
foretest++;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
if(current_length > length)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
length = current_length; /*the longest length*/
|
|
Packit Service |
50c9f2 |
offset = current_offset; /*the offset that is related to this longest length*/
|
|
Packit Service |
50c9f2 |
if(current_length == MAX_SUPPORTED_DEFLATE_LENGTH) break; /*you can jump out of this for loop once a length of max length is found (gives significant speed gain)*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/**encode it as length/distance pair or literal value**/
|
|
Packit Service |
50c9f2 |
if(length < 3) /*only lengths of 3 or higher are supported as length/distance pair*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(!uivector_push_back(out, in[pos])) { error = 9921; break; }
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned j;
|
|
Packit Service |
50c9f2 |
addLengthDistance(out, length, offset);
|
|
Packit Service |
50c9f2 |
for(j = 0; j < length - 1; j++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
pos++;
|
|
Packit Service |
50c9f2 |
if(!uivector_push_back((uivector*)vector_get(&table, getHash(in, size, pos)), pos)) { error = 9922; break; }
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
} /*end of the loop through each character of input*/
|
|
Packit Service |
50c9f2 |
} /*end of "if(!error)"*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*cleanup*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < table.size; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
uivector* v = (uivector*)vector_get(&table, i);
|
|
Packit Service |
50c9f2 |
uivector_cleanup(v);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
vector_cleanup(&table);
|
|
Packit Service |
50c9f2 |
uivector_cleanup(&tablepos1);
|
|
Packit Service |
50c9f2 |
uivector_cleanup(&tablepos2);
|
|
Packit Service |
50c9f2 |
return error;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
#endif
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* /////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned deflateNoCompression(ucvector* out, const unsigned char* data, size_t datasize)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*non compressed deflate block data: 1 bit BFINAL,2 bits BTYPE,(5 bits): it jumps to start of next byte, 2 bytes LEN, 2 bytes NLEN, LEN bytes literal DATA*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
size_t i, j, numdeflateblocks = datasize / 65536 + 1;
|
|
Packit Service |
50c9f2 |
unsigned datapos = 0;
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numdeflateblocks; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned BFINAL, BTYPE, LEN, NLEN;
|
|
Packit Service |
50c9f2 |
unsigned char firstbyte;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
BFINAL = (i == numdeflateblocks - 1);
|
|
Packit Service |
50c9f2 |
BTYPE = 0;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
firstbyte = (unsigned char)(BFINAL + ((BTYPE & 1) << 1) + ((BTYPE & 2) << 1));
|
|
Packit Service |
50c9f2 |
ucvector_push_back(out, firstbyte);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
LEN = 65535;
|
|
Packit Service |
50c9f2 |
if(datasize - datapos < 65535) LEN = (unsigned)datasize - datapos;
|
|
Packit Service |
50c9f2 |
NLEN = 65535 - LEN;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
ucvector_push_back(out, (unsigned char)(LEN % 256));
|
|
Packit Service |
50c9f2 |
ucvector_push_back(out, (unsigned char)(LEN / 256));
|
|
Packit Service |
50c9f2 |
ucvector_push_back(out, (unsigned char)(NLEN % 256));
|
|
Packit Service |
50c9f2 |
ucvector_push_back(out, (unsigned char)(NLEN / 256));
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*Decompressed data*/
|
|
Packit Service |
50c9f2 |
for(j = 0; j < 65535 && datapos < datasize; j++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
ucvector_push_back(out, data[datapos++]);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
return 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*write the encoded data, using lit/len as well as distance codes*/
|
|
Packit Service |
50c9f2 |
static void writeLZ77data(size_t* bp, ucvector* out, const uivector* lz77_encoded, const HuffmanTree* codes, const HuffmanTree* codesD)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t i = 0;
|
|
Packit Service |
50c9f2 |
for(i = 0; i < lz77_encoded->size; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned val = lz77_encoded->data[i];
|
|
Packit Service |
50c9f2 |
addHuffmanSymbol(bp, out, HuffmanTree_getCode(codes, val), HuffmanTree_getLength(codes, val));
|
|
Packit Service |
50c9f2 |
if(val > 256) /*for a length code, 3 more things have to be added*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned length_index = val - FIRST_LENGTH_CODE_INDEX;
|
|
Packit Service |
50c9f2 |
unsigned n_length_extra_bits = LENGTHEXTRA[length_index];
|
|
Packit Service |
50c9f2 |
unsigned length_extra_bits = lz77_encoded->data[++i];
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
unsigned distance_code = lz77_encoded->data[++i];
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
unsigned distance_index = distance_code;
|
|
Packit Service |
50c9f2 |
unsigned n_distance_extra_bits = DISTANCEEXTRA[distance_index];
|
|
Packit Service |
50c9f2 |
unsigned distance_extra_bits = lz77_encoded->data[++i];
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
addBitsToStream(bp, out, length_extra_bits, n_length_extra_bits);
|
|
Packit Service |
50c9f2 |
addHuffmanSymbol(bp, out, HuffmanTree_getCode(codesD, distance_code), HuffmanTree_getLength(codesD, distance_code));
|
|
Packit Service |
50c9f2 |
addBitsToStream(bp, out, distance_extra_bits, n_distance_extra_bits);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned deflateDynamic(ucvector* out, const unsigned char* data, size_t datasize, const LodeZlib_DeflateSettings* settings)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*
|
|
Packit Service |
50c9f2 |
after the BFINAL and BTYPE, the dynamic block consists out of the following:
|
|
Packit Service |
50c9f2 |
- 5 bits HLIT, 5 bits HDIST, 4 bits HCLEN
|
|
Packit Service |
50c9f2 |
- (HCLEN+4)*3 bits code lengths of code length alphabet
|
|
Packit Service |
50c9f2 |
- HLIT + 257 code lengths of lit/length alphabet (encoded using the code length alphabet, + possible repetition codes 16, 17, 18)
|
|
Packit Service |
50c9f2 |
- HDIST + 1 code lengths of distance alphabet (encoded using the code length alphabet, + possible repetition codes 16, 17, 18)
|
|
Packit Service |
50c9f2 |
- compressed data
|
|
Packit Service |
50c9f2 |
- 256 (end code)
|
|
Packit Service |
50c9f2 |
*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
unsigned error = 0;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
uivector lz77_encoded;
|
|
Packit Service |
50c9f2 |
HuffmanTree codes; /*tree for literal values and length codes*/
|
|
Packit Service |
50c9f2 |
HuffmanTree codesD; /*tree for distance codes*/
|
|
Packit Service |
50c9f2 |
HuffmanTree codelengthcodes;
|
|
Packit Service |
50c9f2 |
uivector frequencies;
|
|
Packit Service |
50c9f2 |
uivector frequenciesD;
|
|
Packit Service |
50c9f2 |
uivector amounts; /*the amounts in the "normal" order*/
|
|
Packit Service |
50c9f2 |
uivector lldl;
|
|
Packit Service |
50c9f2 |
uivector lldll; /*lit/len & dist code lengths*/
|
|
Packit Service |
50c9f2 |
uivector clcls;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
unsigned BFINAL = 1; /*make only one block... the first and final one*/
|
|
Packit Service |
50c9f2 |
size_t numcodes, numcodesD, i, bp = 0; /*the bit pointer*/
|
|
Packit Service |
50c9f2 |
unsigned HLIT, HDIST, HCLEN;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
uivector_init(&lz77_encoded);
|
|
Packit Service |
50c9f2 |
HuffmanTree_init(&codes);
|
|
Packit Service |
50c9f2 |
HuffmanTree_init(&codesD);
|
|
Packit Service |
50c9f2 |
HuffmanTree_init(&codelengthcodes);
|
|
Packit Service |
50c9f2 |
uivector_init(&frequencies);
|
|
Packit Service |
50c9f2 |
uivector_init(&frequenciesD);
|
|
Packit Service |
50c9f2 |
uivector_init(&amounts);
|
|
Packit Service |
50c9f2 |
uivector_init(&lldl);
|
|
Packit Service |
50c9f2 |
uivector_init(&lldll);
|
|
Packit Service |
50c9f2 |
uivector_init(&clcls);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
while(!error) /*the goto-avoiding while construct: break out to go to the cleanup phase, a break at the end makes sure the while is never repeated*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(settings->useLZ77)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
error = encodeLZ77(&lz77_encoded, data, datasize, settings->windowSize); /*LZ77 encoded*/
|
|
Packit Service |
50c9f2 |
if(error) break;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(!uivector_resize(&lz77_encoded, datasize)) { error = 9923; break; }
|
|
Packit Service |
50c9f2 |
for(i = 0; i < datasize; i++) lz77_encoded.data[i] = data[i]; /*no LZ77, but still will be Huffman compressed*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(!uivector_resizev(&frequencies, 286, 0)) { error = 9924; break; }
|
|
Packit Service |
50c9f2 |
if(!uivector_resizev(&frequenciesD, 30, 0)) { error = 9925; break; }
|
|
Packit Service |
50c9f2 |
for(i = 0; i < lz77_encoded.size; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned symbol = lz77_encoded.data[i];
|
|
Packit Service |
50c9f2 |
frequencies.data[symbol]++;
|
|
Packit Service |
50c9f2 |
if(symbol > 256)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned dist = lz77_encoded.data[i + 2];
|
|
Packit Service |
50c9f2 |
frequenciesD.data[dist]++;
|
|
Packit Service |
50c9f2 |
i += 3;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
frequencies.data[256] = 1; /*there will be exactly 1 end code, at the end of the block*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
error = HuffmanTree_makeFromFrequencies(&codes, frequencies.data, frequencies.size, 15);
|
|
Packit Service |
50c9f2 |
if(error) break;
|
|
Packit Service |
50c9f2 |
error = HuffmanTree_makeFromFrequencies(&codesD, frequenciesD.data, frequenciesD.size, 15);
|
|
Packit Service |
50c9f2 |
if(error) break;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
addBitToStream(&bp, out, BFINAL);
|
|
Packit Service |
50c9f2 |
addBitToStream(&bp, out, 0); /*first bit of BTYPE "dynamic"*/
|
|
Packit Service |
50c9f2 |
addBitToStream(&bp, out, 1); /*second bit of BTYPE "dynamic"*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
numcodes = codes.numcodes; if(numcodes > 286) numcodes = 286;
|
|
Packit Service |
50c9f2 |
numcodesD = codesD.numcodes; if(numcodesD > 30) numcodesD = 30;
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numcodes; i++) uivector_push_back(&lldll, HuffmanTree_getLength(&codes, (unsigned)i));
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numcodesD; i++) uivector_push_back(&lldll, HuffmanTree_getLength(&codesD, (unsigned)i));
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*make lldl smaller by using repeat codes 16 (copy length 3-6 times), 17 (3-10 zeros), 18 (11-138 zeros)*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < (unsigned)lldll.size; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned j = 0;
|
|
Packit Service |
50c9f2 |
while(i + j + 1 < (unsigned)lldll.size && lldll.data[i + j + 1] == lldll.data[i]) j++;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(lldll.data[i] == 0 && j >= 2)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
j++; /*include the first zero*/
|
|
Packit Service |
50c9f2 |
if(j <= 10) { uivector_push_back(&lldl, 17); uivector_push_back(&lldl, j - 3); }
|
|
Packit Service |
50c9f2 |
else
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(j > 138) j = 138;
|
|
Packit Service |
50c9f2 |
uivector_push_back(&lldl, 18); uivector_push_back(&lldl, j - 11);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
i += (j - 1);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else if(j >= 3)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t k;
|
|
Packit Service |
50c9f2 |
unsigned num = j / 6, rest = j % 6;
|
|
Packit Service |
50c9f2 |
uivector_push_back(&lldl, lldll.data[i]);
|
|
Packit Service |
50c9f2 |
for(k = 0; k < num; k++) { uivector_push_back(&lldl, 16); uivector_push_back(&lldl, 6 - 3); }
|
|
Packit Service |
50c9f2 |
if(rest >= 3) { uivector_push_back(&lldl, 16); uivector_push_back(&lldl, rest - 3); }
|
|
Packit Service |
50c9f2 |
else j -= rest;
|
|
Packit Service |
50c9f2 |
i += j;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else uivector_push_back(&lldl, lldll.data[i]);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*generate huffmantree for the length codes of lit/len and dist codes*/
|
|
Packit Service |
50c9f2 |
if(!uivector_resizev(&amounts, 19, 0)) { error = 9926; break; } /*16 possible lengths (0-15) and 3 repeat codes (16, 17 and 18)*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < lldl.size; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
amounts.data[lldl.data[i]]++;
|
|
Packit Service |
50c9f2 |
if(lldl.data[i] >= 16) i++; /*after a repeat code come the bits that specify the amount, those don't need to be in the amounts calculation*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
error = HuffmanTree_makeFromFrequencies(&codelengthcodes, amounts.data, amounts.size, 7);
|
|
Packit Service |
50c9f2 |
if(error) break;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(!uivector_resize(&clcls, 19)) { error = 9927; break; }
|
|
Packit Service |
50c9f2 |
for(i = 0; i < 19; i++) clcls.data[i] = HuffmanTree_getLength(&codelengthcodes, CLCL[i]); /*lengths of code length tree is in the order as specified by deflate*/
|
|
Packit Service |
50c9f2 |
while(clcls.data[clcls.size - 1] == 0 && clcls.size > 4)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(!uivector_resize(&clcls, clcls.size - 1)) { error = 9928; break; } /*remove zeros at the end, but minimum size must be 4*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
if(error) break;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*write the HLIT, HDIST and HCLEN values*/
|
|
Packit Service |
50c9f2 |
HLIT = (unsigned)(numcodes - 257);
|
|
Packit Service |
50c9f2 |
HDIST = (unsigned)(numcodesD - 1);
|
|
Packit Service |
50c9f2 |
HCLEN = (unsigned)clcls.size - 4;
|
|
Packit Service |
50c9f2 |
addBitsToStream(&bp, out, HLIT, 5);
|
|
Packit Service |
50c9f2 |
addBitsToStream(&bp, out, HDIST, 5);
|
|
Packit Service |
50c9f2 |
addBitsToStream(&bp, out, HCLEN, 4);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*write the code lengths of the code length alphabet*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < HCLEN + 4; i++) addBitsToStream(&bp, out, clcls.data[i], 3);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*write the lengths of the lit/len AND the dist alphabet*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < lldl.size; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
addHuffmanSymbol(&bp, out, HuffmanTree_getCode(&codelengthcodes, lldl.data[i]), HuffmanTree_getLength(&codelengthcodes, lldl.data[i]));
|
|
Packit Service |
50c9f2 |
/*extra bits of repeat codes*/
|
|
Packit Service |
50c9f2 |
if(lldl.data[i] == 16) addBitsToStream(&bp, out, lldl.data[++i], 2);
|
|
Packit Service |
50c9f2 |
else if(lldl.data[i] == 17) addBitsToStream(&bp, out, lldl.data[++i], 3);
|
|
Packit Service |
50c9f2 |
else if(lldl.data[i] == 18) addBitsToStream(&bp, out, lldl.data[++i], 7);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*write the compressed data symbols*/
|
|
Packit Service |
50c9f2 |
writeLZ77data(&bp, out, &lz77_encoded, &codes, &codesD);
|
|
Packit Service |
50c9f2 |
if(HuffmanTree_getLength(&codes, 256) == 0) { error = 64; break; } /*the length of the end code 256 must be larger than 0*/
|
|
Packit Service |
50c9f2 |
addHuffmanSymbol(&bp, out, HuffmanTree_getCode(&codes, 256), HuffmanTree_getLength(&codes, 256)); /*end code*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
break; /*end of error-while*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*cleanup*/
|
|
Packit Service |
50c9f2 |
uivector_cleanup(&lz77_encoded);
|
|
Packit Service |
50c9f2 |
HuffmanTree_cleanup(&codes);
|
|
Packit Service |
50c9f2 |
HuffmanTree_cleanup(&codesD);
|
|
Packit Service |
50c9f2 |
HuffmanTree_cleanup(&codelengthcodes);
|
|
Packit Service |
50c9f2 |
uivector_cleanup(&frequencies);
|
|
Packit Service |
50c9f2 |
uivector_cleanup(&frequenciesD);
|
|
Packit Service |
50c9f2 |
uivector_cleanup(&amounts);
|
|
Packit Service |
50c9f2 |
uivector_cleanup(&lldl);
|
|
Packit Service |
50c9f2 |
uivector_cleanup(&lldll);
|
|
Packit Service |
50c9f2 |
uivector_cleanup(&clcls);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
return error;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned deflateFixed(ucvector* out, const unsigned char* data, size_t datasize, const LodeZlib_DeflateSettings* settings)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
HuffmanTree codes; /*tree for literal values and length codes*/
|
|
Packit Service |
50c9f2 |
HuffmanTree codesD; /*tree for distance codes*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
unsigned BFINAL = 1; /*make only one block... the first and final one*/
|
|
Packit Service |
50c9f2 |
unsigned error = 0;
|
|
Packit Service |
50c9f2 |
size_t i, bp = 0; /*the bit pointer*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
HuffmanTree_init(&codes);
|
|
Packit Service |
50c9f2 |
HuffmanTree_init(&codesD);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
generateFixedTree(&codes);
|
|
Packit Service |
50c9f2 |
generateDistanceTree(&codesD);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
addBitToStream(&bp, out, BFINAL);
|
|
Packit Service |
50c9f2 |
addBitToStream(&bp, out, 1); /*first bit of BTYPE*/
|
|
Packit Service |
50c9f2 |
addBitToStream(&bp, out, 0); /*second bit of BTYPE*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(settings->useLZ77) /*LZ77 encoded*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
uivector lz77_encoded;
|
|
Packit Service |
50c9f2 |
uivector_init(&lz77_encoded);
|
|
Packit Service |
50c9f2 |
error = encodeLZ77(&lz77_encoded, data, datasize, settings->windowSize);
|
|
Packit Service |
50c9f2 |
if(!error) writeLZ77data(&bp, out, &lz77_encoded, &codes, &codesD);
|
|
Packit Service |
50c9f2 |
uivector_cleanup(&lz77_encoded);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else /*no LZ77, but still will be Huffman compressed*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
for(i = 0; i < datasize; i++) addHuffmanSymbol(&bp, out, HuffmanTree_getCode(&codes, data[i]), HuffmanTree_getLength(&codes, data[i]));
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
if(!error) addHuffmanSymbol(&bp, out, HuffmanTree_getCode(&codes, 256), HuffmanTree_getLength(&codes, 256)); /*"end" code*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*cleanup*/
|
|
Packit Service |
50c9f2 |
HuffmanTree_cleanup(&codes);
|
|
Packit Service |
50c9f2 |
HuffmanTree_cleanup(&codesD);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
return error;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
unsigned LodeFlate_deflate(ucvector* out, const unsigned char* data, size_t datasize, const LodeZlib_DeflateSettings* settings)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned error = 0;
|
|
Packit Service |
50c9f2 |
if(settings->btype == 0) error = deflateNoCompression(out, data, datasize);
|
|
Packit Service |
50c9f2 |
else if(settings->btype == 1) error = deflateFixed(out, data, datasize, settings);
|
|
Packit Service |
50c9f2 |
else if(settings->btype == 2) error = deflateDynamic(out, data, datasize, settings);
|
|
Packit Service |
50c9f2 |
else error = 61;
|
|
Packit Service |
50c9f2 |
return error;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* / Adler32 */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned update_adler32(unsigned adler, const unsigned char* data, unsigned len)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned s1 = adler & 0xffff;
|
|
Packit Service |
50c9f2 |
unsigned s2 = (adler >> 16) & 0xffff;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
while(len > 0)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*at least 5550 sums can be done before the sums overflow, saving us from a lot of module divisions*/
|
|
Packit Service |
50c9f2 |
unsigned amount = len > 5550 ? 5550 : len;
|
|
Packit Service |
50c9f2 |
len -= amount;
|
|
Packit Service |
50c9f2 |
while(amount > 0)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
s1 = (s1 + *data++);
|
|
Packit Service |
50c9f2 |
s2 = (s2 + s1);
|
|
Packit Service |
50c9f2 |
amount--;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
s1 %= 65521;
|
|
Packit Service |
50c9f2 |
s2 %= 65521;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
return (s2 << 16) | s1;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*Return the adler32 of the bytes data[0..len-1]*/
|
|
Packit Service |
50c9f2 |
static unsigned adler32(const unsigned char* data, unsigned len)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
return update_adler32(1L, data, len);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* / Reading and writing single bits and bytes from/to stream for Zlib / */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void LodeZlib_add32bitInt(ucvector* buffer, unsigned value)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
ucvector_push_back(buffer, (unsigned char)((value >> 24) & 0xff));
|
|
Packit Service |
50c9f2 |
ucvector_push_back(buffer, (unsigned char)((value >> 16) & 0xff));
|
|
Packit Service |
50c9f2 |
ucvector_push_back(buffer, (unsigned char)((value >> 8) & 0xff));
|
|
Packit Service |
50c9f2 |
ucvector_push_back(buffer, (unsigned char)((value ) & 0xff));
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* / Zlib / */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned LodeZlib_compress(unsigned char** out, size_t* outsize, const unsigned char* in, size_t insize, const LodeZlib_DeflateSettings* settings)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*initially, *out must be NULL and outsize 0, if you just give some random *out that's pointing to a non allocated buffer, this'll crash*/
|
|
Packit Service |
50c9f2 |
ucvector deflatedata, outv;
|
|
Packit Service |
50c9f2 |
size_t i;
|
|
Packit Service |
50c9f2 |
unsigned error;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
unsigned ADLER32;
|
|
Packit Service |
50c9f2 |
/*zlib data: 1 byte CMF (CM+CINFO), 1 byte FLG, deflate data, 4 byte ADLER32 checksum of the Decompressed data*/
|
|
Packit Service |
50c9f2 |
unsigned CMF = 120; /*0b01111000: CM 8, CINFO 7. With CINFO 7, any window size up to 32768 can be used.*/
|
|
Packit Service |
50c9f2 |
unsigned FLEVEL = 0;
|
|
Packit Service |
50c9f2 |
unsigned FDICT = 0;
|
|
Packit Service |
50c9f2 |
unsigned CMFFLG = 256 * CMF + FDICT * 32 + FLEVEL * 64;
|
|
Packit Service |
50c9f2 |
unsigned FCHECK = 31 - CMFFLG % 31;
|
|
Packit Service |
50c9f2 |
CMFFLG += FCHECK;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
ucvector_init_buffer(&outv, *out, *outsize); /*ucvector-controlled version of the output buffer, for dynamic array*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
ucvector_push_back(&outv, (unsigned char)(CMFFLG / 256));
|
|
Packit Service |
50c9f2 |
ucvector_push_back(&outv, (unsigned char)(CMFFLG % 256));
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
ucvector_init(&deflatedata);
|
|
Packit Service |
50c9f2 |
error = LodeFlate_deflate(&deflatedata, in, insize, settings);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(!error)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
ADLER32 = adler32(in, (unsigned)insize);
|
|
Packit Service |
50c9f2 |
for(i = 0; i < deflatedata.size; i++) ucvector_push_back(&outv, deflatedata.data[i]);
|
|
Packit Service |
50c9f2 |
ucvector_cleanup(&deflatedata);
|
|
Packit Service |
50c9f2 |
LodeZlib_add32bitInt(&outv, ADLER32);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
*out = outv.data;
|
|
Packit Service |
50c9f2 |
*outsize = outv.size;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
return error;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
void LodeZlib_DeflateSettings_init(LodeZlib_DeflateSettings* settings)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
settings->btype = 2; /*compress with dynamic huffman tree (not in the mathematical sense, just not the predefined one)*/
|
|
Packit Service |
50c9f2 |
settings->useLZ77 = 1;
|
|
Packit Service |
50c9f2 |
settings->windowSize = 2048; /*this is a good tradeoff between speed and compression ratio*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* // End of Zlib related code, now comes the PNG related code that uses it// */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*
|
|
Packit Service |
50c9f2 |
The two functions below (LodePNG_decompress and LodePNG_compress) directly call the
|
|
Packit Service |
50c9f2 |
LodeZlib_decompress and LodeZlib_compress functions. The only purpose of the functions
|
|
Packit Service |
50c9f2 |
below, is to provide the ability to let LodePNG use a different Zlib encoder by only
|
|
Packit Service |
50c9f2 |
changing the two functions below, instead of changing it inside the various places
|
|
Packit Service |
50c9f2 |
in the other LodePNG functions.
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
*out must be NULL and *outsize must be 0 initially, and after the function is done,
|
|
Packit Service |
50c9f2 |
*out must point to the decompressed data, *outsize must be the size of it, and must
|
|
Packit Service |
50c9f2 |
be the size of the useful data in bytes, not the alloc size.
|
|
Packit Service |
50c9f2 |
*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned LodePNG_compress(unsigned char** out, size_t* outsize, const unsigned char* in, size_t insize, const LodeZlib_DeflateSettings* settings)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
return LodeZlib_compress(out, outsize, in, insize, settings);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* / CRC32 / */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned Crc32_crc_table_computed = 0;
|
|
Packit Service |
50c9f2 |
static unsigned Crc32_crc_table[256];
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*Make the table for a fast CRC.*/
|
|
Packit Service |
50c9f2 |
static void Crc32_make_crc_table(void)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned int c, k, n;
|
|
Packit Service |
50c9f2 |
for(n = 0; n < 256; n++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
c = n;
|
|
Packit Service |
50c9f2 |
for(k = 0; k < 8; k++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(c & 1) c = (unsigned int)(0xedb88320L ^ (c >> 1));
|
|
Packit Service |
50c9f2 |
else c = c >> 1;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
Crc32_crc_table[n] = c;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
Crc32_crc_table_computed = 1;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*Update a running CRC with the bytes buf[0..len-1]--the CRC should be
|
|
Packit Service |
50c9f2 |
initialized to all 1's, and the transmitted value is the 1's complement of the
|
|
Packit Service |
50c9f2 |
final running CRC (see the crc() routine below).*/
|
|
Packit Service |
50c9f2 |
static unsigned Crc32_update_crc(const unsigned char* buf, unsigned int crc, size_t len)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned int c = crc;
|
|
Packit Service |
50c9f2 |
size_t n;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(!Crc32_crc_table_computed) Crc32_make_crc_table();
|
|
Packit Service |
50c9f2 |
for(n = 0; n < len; n++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
c = Crc32_crc_table[(c ^ buf[n]) & 0xff] ^ (c >> 8);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
return c;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*Return the CRC of the bytes buf[0..len-1].*/
|
|
Packit Service |
50c9f2 |
static unsigned Crc32_crc(const unsigned char* buf, size_t len)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
return Crc32_update_crc(buf, 0xffffffffu, len) ^ 0xffffffffu;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* / Reading and writing single bits and bytes from/to stream for LodePNG / */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned char readBitFromReversedStream(size_t* bitpointer, const unsigned char* bitstream)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned char result = (unsigned char)((bitstream[(*bitpointer) >> 3] >> (7 - ((*bitpointer) & 0x7))) & 1);
|
|
Packit Service |
50c9f2 |
(*bitpointer)++;
|
|
Packit Service |
50c9f2 |
return result;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned readBitsFromReversedStream(size_t* bitpointer, const unsigned char* bitstream, size_t nbits)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned result = 0;
|
|
Packit Service |
50c9f2 |
size_t i;
|
|
Packit Service |
50c9f2 |
for(i = nbits - 1; i < nbits; i--) result += (unsigned)readBitFromReversedStream(bitpointer, bitstream) << i;
|
|
Packit Service |
50c9f2 |
return result;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void setBitOfReversedStream(size_t* bitpointer, unsigned char* bitstream, unsigned char bit)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*the current bit in bitstream may be 0 or 1 for this to work*/
|
|
Packit Service |
50c9f2 |
if(bit == 0) bitstream[(*bitpointer) >> 3] &= (unsigned char)(~(1 << (7 - ((*bitpointer) & 0x7))));
|
|
Packit Service |
50c9f2 |
else bitstream[(*bitpointer) >> 3] |= (1 << (7 - ((*bitpointer) & 0x7)));
|
|
Packit Service |
50c9f2 |
(*bitpointer)++;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned LodePNG_read32bitInt(const unsigned char* buffer)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
return (buffer[0] << 24) | (buffer[1] << 16) | (buffer[2] << 8) | buffer[3];
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void LodePNG_set32bitInt(unsigned char* buffer, unsigned value) /*buffer must have at least 4 allocated bytes available*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
buffer[0] = (unsigned char)((value >> 24) & 0xff);
|
|
Packit Service |
50c9f2 |
buffer[1] = (unsigned char)((value >> 16) & 0xff);
|
|
Packit Service |
50c9f2 |
buffer[2] = (unsigned char)((value >> 8) & 0xff);
|
|
Packit Service |
50c9f2 |
buffer[3] = (unsigned char)((value ) & 0xff);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void LodePNG_add32bitInt(ucvector* buffer, unsigned value)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
ucvector_resize(buffer, buffer->size + 4);
|
|
Packit Service |
50c9f2 |
LodePNG_set32bitInt(&buffer->data[buffer->size - 4], value);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* / PNG chunks / */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned LodePNG_chunk_length(const unsigned char* chunk) /*get the length of the data of the chunk. Total chunk length has 12 bytes more.*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
return LodePNG_read32bitInt(&chunk[0]);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void LodePNG_chunk_generate_crc(unsigned char* chunk) /*generates the correct CRC from the data and puts it in the last 4 bytes of the chunk*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned length = LodePNG_chunk_length(chunk);
|
|
Packit Service |
50c9f2 |
unsigned CRC = Crc32_crc(&chunk[4], length + 4);
|
|
Packit Service |
50c9f2 |
LodePNG_set32bitInt(chunk + 8 + length, CRC);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned LodePNG_create_chunk(unsigned char** out, size_t* outlength, unsigned length, const char* type, const unsigned char* data) /*appends new chunk to out. Returns error code; may change memory address of out buffer*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned i;
|
|
Packit Service |
50c9f2 |
unsigned char *chunk, *new_buffer;
|
|
Packit Service |
50c9f2 |
size_t new_length = (*outlength) + length + 12;
|
|
Packit Service |
50c9f2 |
if(new_length < length + 12 || new_length < (*outlength)) return 77; /*integer overflow happened*/
|
|
Packit Service |
50c9f2 |
new_buffer = (unsigned char*)realloc(*out, new_length);
|
|
Packit Service |
50c9f2 |
if(!new_buffer) return 9930;
|
|
Packit Service |
50c9f2 |
(*out) = new_buffer;
|
|
Packit Service |
50c9f2 |
(*outlength) = new_length;
|
|
Packit Service |
50c9f2 |
chunk = &(*out)[(*outlength) - length - 12];
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*1: length*/
|
|
Packit Service |
50c9f2 |
LodePNG_set32bitInt(chunk, (unsigned)length);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*2: chunk name (4 letters)*/
|
|
Packit Service |
50c9f2 |
chunk[4] = type[0];
|
|
Packit Service |
50c9f2 |
chunk[5] = type[1];
|
|
Packit Service |
50c9f2 |
chunk[6] = type[2];
|
|
Packit Service |
50c9f2 |
chunk[7] = type[3];
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*3: the data*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < length; i++) chunk[8 + i] = data[i];
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*4: CRC (of the chunkname characters and the data)*/
|
|
Packit Service |
50c9f2 |
LodePNG_chunk_generate_crc(chunk);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
return 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* / Color types and such / */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*return type is a LodePNG error code*/
|
|
Packit Service |
50c9f2 |
static unsigned checkColorValidity(unsigned colorType, unsigned bd) /*bd = bitDepth*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
switch(colorType)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
case 0: if(!(bd == 1 || bd == 2 || bd == 4 || bd == 8 || bd == 16)) return 37; break; /*grey*/
|
|
Packit Service |
50c9f2 |
case 2: if(!( bd == 8 || bd == 16)) return 37; break; /*RGB*/
|
|
Packit Service |
50c9f2 |
case 3: if(!(bd == 1 || bd == 2 || bd == 4 || bd == 8 )) return 37; break; /*palette*/
|
|
Packit Service |
50c9f2 |
case 4: if(!( bd == 8 || bd == 16)) return 37; break; /*grey + alpha*/
|
|
Packit Service |
50c9f2 |
case 6: if(!( bd == 8 || bd == 16)) return 37; break; /*RGBA*/
|
|
Packit Service |
50c9f2 |
default: return 31;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
return 0; /*allowed color type / bits combination*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned getNumColorChannels(unsigned colorType)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
switch(colorType)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
case 0: return 1; /*grey*/
|
|
Packit Service |
50c9f2 |
case 2: return 3; /*RGB*/
|
|
Packit Service |
50c9f2 |
case 3: return 1; /*palette*/
|
|
Packit Service |
50c9f2 |
case 4: return 2; /*grey + alpha*/
|
|
Packit Service |
50c9f2 |
case 6: return 4; /*RGBA*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
return 0; /*unexisting color type*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned getBpp(unsigned colorType, unsigned bitDepth)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
return getNumColorChannels(colorType) * bitDepth; /*bits per pixel is amount of channels * bits per channel*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void LodePNG_InfoColor_init(LodePNG_InfoColor* info)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
info->key_defined = 0;
|
|
Packit Service |
50c9f2 |
info->key_r = info->key_g = info->key_b = 0;
|
|
Packit Service |
50c9f2 |
info->colorType = 6;
|
|
Packit Service |
50c9f2 |
info->bitDepth = 8;
|
|
Packit Service |
50c9f2 |
info->palette = 0;
|
|
Packit Service |
50c9f2 |
info->palettesize = 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void LodePNG_InfoColor_cleanup(LodePNG_InfoColor* info)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
LodePNG_InfoColor_clearPalette(info);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void LodePNG_InfoColor_clearPalette(LodePNG_InfoColor* info)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(info->palette) free(info->palette);
|
|
Packit Service |
50c9f2 |
info->palettesize = 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
unsigned LodePNG_InfoColor_addPalette(LodePNG_InfoColor* info, unsigned char r, unsigned char g, unsigned char b, unsigned char a)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned char* data;
|
|
Packit Service |
50c9f2 |
/*the same resize technique as C++ std::vectors is used, and here it's made so that for a palette with the max of 256 colors, it'll have the exact alloc size*/
|
|
Packit Service |
50c9f2 |
if(!(info->palettesize & (info->palettesize - 1))) /*if palettesize is 0 or a power of two*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*allocated data must be at least 4* palettesize (for 4 color bytes)*/
|
|
Packit Service |
50c9f2 |
size_t alloc_size = info->palettesize == 0 ? 4 : info->palettesize * 4 * 2;
|
|
Packit Service |
50c9f2 |
data = (unsigned char*)realloc(info->palette, alloc_size);
|
|
Packit Service |
50c9f2 |
if(!data) return 9931;
|
|
Packit Service |
50c9f2 |
else info->palette = data;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
info->palette[4 * info->palettesize + 0] = r;
|
|
Packit Service |
50c9f2 |
info->palette[4 * info->palettesize + 1] = g;
|
|
Packit Service |
50c9f2 |
info->palette[4 * info->palettesize + 2] = b;
|
|
Packit Service |
50c9f2 |
info->palette[4 * info->palettesize + 3] = a;
|
|
Packit Service |
50c9f2 |
info->palettesize++;
|
|
Packit Service |
50c9f2 |
return 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned LodePNG_InfoColor_getBpp(const LodePNG_InfoColor* info) { return getBpp(info->colorType, info->bitDepth); } /*calculate bits per pixel out of colorType and bitDepth*/
|
|
Packit Service |
50c9f2 |
static unsigned LodePNG_InfoColor_isGreyscaleType(const LodePNG_InfoColor* info) { return info->colorType == 0 || info->colorType == 4; }
|
|
Packit Service |
50c9f2 |
static unsigned LodePNG_InfoColor_isAlphaType(const LodePNG_InfoColor* info) { return (info->colorType & 4) != 0; }
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned LodePNG_InfoColor_equal(const LodePNG_InfoColor* info1, const LodePNG_InfoColor* info2)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
return info1->colorType == info2->colorType
|
|
Packit Service |
50c9f2 |
&& info1->bitDepth == info2->bitDepth; /*palette and color key not compared*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void LodePNG_InfoPng_init(LodePNG_InfoPng* info)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
info->width = info->height = 0;
|
|
Packit Service |
50c9f2 |
LodePNG_InfoColor_init(&info->color);
|
|
Packit Service |
50c9f2 |
info->interlaceMethod = 0;
|
|
Packit Service |
50c9f2 |
info->compressionMethod = 0;
|
|
Packit Service |
50c9f2 |
info->filterMethod = 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void LodePNG_InfoPng_cleanup(LodePNG_InfoPng* info)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
LodePNG_InfoColor_cleanup(&info->color);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned LodePNG_InfoPng_copy(LodePNG_InfoPng* dest, const LodePNG_InfoPng* source)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned error = 0;
|
|
Packit Service |
50c9f2 |
LodePNG_InfoPng_cleanup(dest);
|
|
Packit Service |
50c9f2 |
*dest = *source;
|
|
Packit Service |
50c9f2 |
LodePNG_InfoColor_init(&dest->color);
|
|
Packit Service |
50c9f2 |
error = LodePNG_InfoColor_copy(&dest->color, &source->color); if(error) return error;
|
|
Packit Service |
50c9f2 |
return error;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned LodePNG_InfoColor_copy(LodePNG_InfoColor* dest, const LodePNG_InfoColor* source)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t i;
|
|
Packit Service |
50c9f2 |
LodePNG_InfoColor_cleanup(dest);
|
|
Packit Service |
50c9f2 |
*dest = *source;
|
|
Packit Service |
50c9f2 |
dest->palette = (unsigned char*)malloc(source->palettesize * 4);
|
|
Packit Service |
50c9f2 |
if(!dest->palette && source->palettesize) return 9935;
|
|
Packit Service |
50c9f2 |
for(i = 0; i < source->palettesize * 4; i++) dest->palette[i] = source->palette[i];
|
|
Packit Service |
50c9f2 |
return 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void LodePNG_InfoRaw_init(LodePNG_InfoRaw* info)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
LodePNG_InfoColor_init(&info->color);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void LodePNG_InfoRaw_cleanup(LodePNG_InfoRaw* info)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
LodePNG_InfoColor_cleanup(&info->color);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned LodePNG_InfoRaw_copy(LodePNG_InfoRaw* dest, const LodePNG_InfoRaw* source)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned error = 0;
|
|
Packit Service |
50c9f2 |
LodePNG_InfoRaw_cleanup(dest);
|
|
Packit Service |
50c9f2 |
*dest = *source;
|
|
Packit Service |
50c9f2 |
LodePNG_InfoColor_init(&dest->color);
|
|
Packit Service |
50c9f2 |
error = LodePNG_InfoColor_copy(&dest->color, &source->color);
|
|
Packit Service |
50c9f2 |
return error;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*
|
|
Packit Service |
50c9f2 |
converts from any color type to 24-bit or 32-bit (later maybe more supported). return value = LodePNG error code
|
|
Packit Service |
50c9f2 |
the out buffer must have (w * h * bpp + 7) / 8 bytes, where bpp is the bits per pixel of the output color type (LodePNG_InfoColor_getBpp)
|
|
Packit Service |
50c9f2 |
for < 8 bpp images, there may _not_ be padding bits at the end of scanlines.
|
|
Packit Service |
50c9f2 |
*/
|
|
Packit Service |
50c9f2 |
static unsigned LodePNG_convert(unsigned char* out, const unsigned char* in, LodePNG_InfoColor* infoOut, LodePNG_InfoColor* infoIn, unsigned w, unsigned h)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
const size_t numpixels = w * h; /*amount of pixels*/
|
|
Packit Service |
50c9f2 |
const unsigned OUT_BYTES = LodePNG_InfoColor_getBpp(infoOut) / 8; /*bytes per pixel in the output image*/
|
|
Packit Service |
50c9f2 |
const unsigned OUT_ALPHA = LodePNG_InfoColor_isAlphaType(infoOut); /*use 8-bit alpha channel*/
|
|
Packit Service |
50c9f2 |
size_t i, c, bp = 0; /*bitpointer, used by less-than-8-bit color types*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*cases where in and out already have the same format*/
|
|
Packit Service |
50c9f2 |
if(LodePNG_InfoColor_equal(infoIn, infoOut))
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t i, size = (w * h * LodePNG_InfoColor_getBpp(infoIn) + 7) / 8;
|
|
Packit Service |
50c9f2 |
for(i = 0; i < size; i++) out[i] = in[i];
|
|
Packit Service |
50c9f2 |
return 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if((infoOut->colorType == 2 || infoOut->colorType == 6) && infoOut->bitDepth == 8)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(infoIn->bitDepth == 8)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
switch(infoIn->colorType)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
case 0: /*greyscale color*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numpixels; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA) out[OUT_BYTES * i + 3] = 255;
|
|
Packit Service |
50c9f2 |
out[OUT_BYTES * i + 0] = out[OUT_BYTES * i + 1] = out[OUT_BYTES * i + 2] = in[i];
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA && infoIn->key_defined && in[i] == infoIn->key_r) out[OUT_BYTES * i + 3] = 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
break;
|
|
Packit Service |
50c9f2 |
case 2: /*RGB color*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numpixels; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA) out[OUT_BYTES * i + 3] = 255;
|
|
Packit Service |
50c9f2 |
for(c = 0; c < 3; c++) out[OUT_BYTES * i + c] = in[3 * i + c];
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA && infoIn->key_defined == 1 && in[3 * i + 0] == infoIn->key_r && in[3 * i + 1] == infoIn->key_g && in[3 * i + 2] == infoIn->key_b) out[OUT_BYTES * i + 3] = 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
break;
|
|
Packit Service |
50c9f2 |
case 3: /*indexed color (palette)*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numpixels; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA) out[OUT_BYTES * i + 3] = 255;
|
|
Packit Service |
50c9f2 |
if(in[i] >= infoIn->palettesize) return 46;
|
|
Packit Service |
50c9f2 |
for(c = 0; c < OUT_BYTES; c++) out[OUT_BYTES * i + c] = infoIn->palette[4 * in[i] + c]; /*get rgb colors from the palette*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
break;
|
|
Packit Service |
50c9f2 |
case 4: /*greyscale with alpha*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numpixels; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
out[OUT_BYTES * i + 0] = out[OUT_BYTES * i + 1] = out[OUT_BYTES * i + 2] = in[2 * i + 0];
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA) out[OUT_BYTES * i + 3] = in[2 * i + 1];
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
break;
|
|
Packit Service |
50c9f2 |
case 6: /*RGB with alpha*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numpixels; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
for(c = 0; c < OUT_BYTES; c++) out[OUT_BYTES * i + c] = in[4 * i + c];
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
break;
|
|
Packit Service |
50c9f2 |
default: break;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else if(infoIn->bitDepth == 16)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
switch(infoIn->colorType)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
case 0: /*greyscale color*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numpixels; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA) out[OUT_BYTES * i + 3] = 255;
|
|
Packit Service |
50c9f2 |
out[OUT_BYTES * i + 0] = out[OUT_BYTES * i + 1] = out[OUT_BYTES * i + 2] = in[2 * i];
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA && infoIn->key_defined && 256U * in[i] + in[i + 1] == infoIn->key_r) out[OUT_BYTES * i + 3] = 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
break;
|
|
Packit Service |
50c9f2 |
case 2: /*RGB color*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numpixels; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA) out[OUT_BYTES * i + 3] = 255;
|
|
Packit Service |
50c9f2 |
for(c = 0; c < 3; c++) out[OUT_BYTES * i + c] = in[6 * i + 2 * c];
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA && infoIn->key_defined && 256U * in[6 * i + 0] + in[6 * i + 1] == infoIn->key_r && 256U * in[6 * i + 2] + in[6 * i + 3] == infoIn->key_g && 256U * in[6 * i + 4] + in[6 * i + 5] == infoIn->key_b) out[OUT_BYTES * i + 3] = 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
break;
|
|
Packit Service |
50c9f2 |
case 4: /*greyscale with alpha*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numpixels; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
out[OUT_BYTES * i + 0] = out[OUT_BYTES * i + 1] = out[OUT_BYTES * i + 2] = in[4 * i]; /*most significant byte*/
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA) out[OUT_BYTES * i + 3] = in[4 * i + 2];
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
break;
|
|
Packit Service |
50c9f2 |
case 6: /*RGB with alpha*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numpixels; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
for(c = 0; c < OUT_BYTES; c++) out[OUT_BYTES * i + c] = in[8 * i + 2 * c];
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
break;
|
|
Packit Service |
50c9f2 |
default: break;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else /*infoIn->bitDepth is less than 8 bit per channel*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
switch(infoIn->colorType)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
case 0: /*greyscale color*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numpixels; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned value = readBitsFromReversedStream(&bp, in, infoIn->bitDepth);
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA) out[OUT_BYTES * i + 3] = 255;
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA && infoIn->key_defined && value && ((1U << infoIn->bitDepth) - 1U) == infoIn->key_r && ((1U << infoIn->bitDepth) - 1U)) out[OUT_BYTES * i + 3] = 0;
|
|
Packit Service |
50c9f2 |
value = (value * 255) / ((1 << infoIn->bitDepth) - 1); /*scale value from 0 to 255*/
|
|
Packit Service |
50c9f2 |
out[OUT_BYTES * i + 0] = out[OUT_BYTES * i + 1] = out[OUT_BYTES * i + 2] = (unsigned char)(value);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
break;
|
|
Packit Service |
50c9f2 |
case 3: /*indexed color (palette)*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numpixels; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned value = readBitsFromReversedStream(&bp, in, infoIn->bitDepth);
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA) out[OUT_BYTES * i + 3] = 255;
|
|
Packit Service |
50c9f2 |
if(value >= infoIn->palettesize) return 47;
|
|
Packit Service |
50c9f2 |
for(c = 0; c < OUT_BYTES; c++) out[OUT_BYTES * i + c] = infoIn->palette[4 * value + c]; /*get rgb colors from the palette*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
break;
|
|
Packit Service |
50c9f2 |
default: break;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else if(LodePNG_InfoColor_isGreyscaleType(infoOut) && infoOut->bitDepth == 8) /*conversion from greyscale to greyscale*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(!LodePNG_InfoColor_isGreyscaleType(infoIn)) return 62;
|
|
Packit Service |
50c9f2 |
if(infoIn->bitDepth == 8)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
switch(infoIn->colorType)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
case 0: /*greyscale color*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numpixels; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA) out[OUT_BYTES * i + 1] = 255;
|
|
Packit Service |
50c9f2 |
out[OUT_BYTES * i] = in[i];
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA && infoIn->key_defined && in[i] == infoIn->key_r) out[OUT_BYTES * i + 1] = 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
break;
|
|
Packit Service |
50c9f2 |
case 4: /*greyscale with alpha*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numpixels; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
out[OUT_BYTES * i + 0] = in[2 * i + 0];
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA) out[OUT_BYTES * i + 1] = in[2 * i + 1];
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
break;
|
|
Packit Service |
50c9f2 |
default: return 31;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else if(infoIn->bitDepth == 16)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
switch(infoIn->colorType)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
case 0: /*greyscale color*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numpixels; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA) out[OUT_BYTES * i + 1] = 255;
|
|
Packit Service |
50c9f2 |
out[OUT_BYTES * i] = in[2 * i];
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA && infoIn->key_defined && 256U * in[i] + in[i + 1] == infoIn->key_r) out[OUT_BYTES * i + 1] = 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
break;
|
|
Packit Service |
50c9f2 |
case 4: /*greyscale with alpha*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numpixels; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
out[OUT_BYTES * i] = in[4 * i]; /*most significant byte*/
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA) out[OUT_BYTES * i + 1] = in[4 * i + 2]; /*most significant byte*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
break;
|
|
Packit Service |
50c9f2 |
default: return 31;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else /*infoIn->bitDepth is less than 8 bit per channel*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(infoIn->colorType != 0) return 31; /*colorType 0 is the only greyscale type with < 8 bits per channel*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numpixels; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned value = readBitsFromReversedStream(&bp, in, infoIn->bitDepth);
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA) out[OUT_BYTES * i + 1] = 255;
|
|
Packit Service |
50c9f2 |
if(OUT_ALPHA && infoIn->key_defined && value && ((1U << infoIn->bitDepth) - 1U) == infoIn->key_r && ((1U << infoIn->bitDepth) - 1U)) out[OUT_BYTES * i + 1] = 0;
|
|
Packit Service |
50c9f2 |
value = (value * 255) / ((1 << infoIn->bitDepth) - 1); /*scale value from 0 to 255*/
|
|
Packit Service |
50c9f2 |
out[OUT_BYTES * i] = (unsigned char)(value);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else return 59;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
return 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*Path predictor, used by PNG filter type 4*/
|
|
Packit Service |
50c9f2 |
static int paethPredictor(int a, int b, int c)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
int p = a + b - c;
|
|
Packit Service |
50c9f2 |
int pa = p > a ? p - a : a - p;
|
|
Packit Service |
50c9f2 |
int pb = p > b ? p - b : b - p;
|
|
Packit Service |
50c9f2 |
int pc = p > c ? p - c : c - p;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(pa <= pb && pa <= pc) return a;
|
|
Packit Service |
50c9f2 |
else if(pb <= pc) return b;
|
|
Packit Service |
50c9f2 |
else return c;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*shared values used by multiple Adam7 related functions*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static const unsigned ADAM7_IX[7] = { 0, 4, 0, 2, 0, 1, 0 }; /*x start values*/
|
|
Packit Service |
50c9f2 |
static const unsigned ADAM7_IY[7] = { 0, 0, 4, 0, 2, 0, 1 }; /*y start values*/
|
|
Packit Service |
50c9f2 |
static const unsigned ADAM7_DX[7] = { 8, 8, 4, 4, 2, 2, 1 }; /*x delta values*/
|
|
Packit Service |
50c9f2 |
static const unsigned ADAM7_DY[7] = { 8, 8, 8, 4, 4, 2, 2 }; /*y delta values*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void Adam7_getpassvalues(unsigned passw[7], unsigned passh[7], size_t filter_passstart[8], size_t padded_passstart[8], size_t passstart[8], unsigned w, unsigned h, unsigned bpp)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*the passstart values have 8 values: the 8th one actually indicates the byte after the end of the 7th (= last) pass*/
|
|
Packit Service |
50c9f2 |
unsigned i;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*calculate width and height in pixels of each pass*/
|
|
Packit Service |
50c9f2 |
for(i = 0; i < 7; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
passw[i] = (w + ADAM7_DX[i] - ADAM7_IX[i] - 1) / ADAM7_DX[i];
|
|
Packit Service |
50c9f2 |
passh[i] = (h + ADAM7_DY[i] - ADAM7_IY[i] - 1) / ADAM7_DY[i];
|
|
Packit Service |
50c9f2 |
if(passw[i] == 0) passh[i] = 0;
|
|
Packit Service |
50c9f2 |
if(passh[i] == 0) passw[i] = 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
filter_passstart[0] = padded_passstart[0] = passstart[0] = 0;
|
|
Packit Service |
50c9f2 |
for(i = 0; i < 7; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
filter_passstart[i + 1] = filter_passstart[i] + ((passw[i] && passh[i]) ? passh[i] * (1 + (passw[i] * bpp + 7) / 8) : 0); /*if passw[i] is 0, it's 0 bytes, not 1 (no filtertype-byte)*/
|
|
Packit Service |
50c9f2 |
padded_passstart[i + 1] = padded_passstart[i] + passh[i] * ((passw[i] * bpp + 7) / 8); /*bits padded if needed to fill full byte at end of each scanline*/
|
|
Packit Service |
50c9f2 |
passstart[i + 1] = passstart[i] + (passh[i] * passw[i] * bpp + 7) / 8; /*only padded at end of reduced image*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* / PNG Encoder / */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*chunkName must be string of 4 characters*/
|
|
Packit Service |
50c9f2 |
static unsigned addChunk(ucvector* out, const char* chunkName, const unsigned char* data, size_t length)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned error = LodePNG_create_chunk(&out->data, &out->size, (unsigned)length, chunkName, data);
|
|
Packit Service |
50c9f2 |
if(error) return error;
|
|
Packit Service |
50c9f2 |
out->allocsize = out->size; /*fix the allocsize again*/
|
|
Packit Service |
50c9f2 |
return 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void writeSignature(ucvector* out)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*8 bytes PNG signature*/
|
|
Packit Service |
50c9f2 |
ucvector_push_back(out, 137);
|
|
Packit Service |
50c9f2 |
ucvector_push_back(out, 80);
|
|
Packit Service |
50c9f2 |
ucvector_push_back(out, 78);
|
|
Packit Service |
50c9f2 |
ucvector_push_back(out, 71);
|
|
Packit Service |
50c9f2 |
ucvector_push_back(out, 13);
|
|
Packit Service |
50c9f2 |
ucvector_push_back(out, 10);
|
|
Packit Service |
50c9f2 |
ucvector_push_back(out, 26);
|
|
Packit Service |
50c9f2 |
ucvector_push_back(out, 10);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned addChunk_IHDR(ucvector* out, unsigned w, unsigned h, unsigned bitDepth, unsigned colorType, unsigned interlaceMethod)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned error = 0;
|
|
Packit Service |
50c9f2 |
ucvector header;
|
|
Packit Service |
50c9f2 |
ucvector_init(&header);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
LodePNG_add32bitInt(&header, w); /*width*/
|
|
Packit Service |
50c9f2 |
LodePNG_add32bitInt(&header, h); /*height*/
|
|
Packit Service |
50c9f2 |
ucvector_push_back(&header, (unsigned char)bitDepth); /*bit depth*/
|
|
Packit Service |
50c9f2 |
ucvector_push_back(&header, (unsigned char)colorType); /*color type*/
|
|
Packit Service |
50c9f2 |
ucvector_push_back(&header, 0); /*compression method*/
|
|
Packit Service |
50c9f2 |
ucvector_push_back(&header, 0); /*filter method*/
|
|
Packit Service |
50c9f2 |
ucvector_push_back(&header, interlaceMethod); /*interlace method*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
error = addChunk(out, "IHDR", header.data, header.size);
|
|
Packit Service |
50c9f2 |
ucvector_cleanup(&header);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
return error;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned addChunk_PLTE(ucvector* out, const LodePNG_InfoColor* info)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned error = 0;
|
|
Packit Service |
50c9f2 |
size_t i;
|
|
Packit Service |
50c9f2 |
ucvector PLTE;
|
|
Packit Service |
50c9f2 |
ucvector_init(&PLTE);
|
|
Packit Service |
50c9f2 |
for(i = 0; i < info->palettesize * 4; i++) if(i % 4 != 3) ucvector_push_back(&PLTE, info->palette[i]); /*add all channels except alpha channel*/
|
|
Packit Service |
50c9f2 |
error = addChunk(out, "PLTE", PLTE.data, PLTE.size);
|
|
Packit Service |
50c9f2 |
ucvector_cleanup(&PLTE);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
return error;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned addChunk_tRNS(ucvector* out, const LodePNG_InfoColor* info)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned error = 0;
|
|
Packit Service |
50c9f2 |
size_t i;
|
|
Packit Service |
50c9f2 |
ucvector tRNS;
|
|
Packit Service |
50c9f2 |
ucvector_init(&tRNS);
|
|
Packit Service |
50c9f2 |
if(info->colorType == 3)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
for(i = 0; i < info->palettesize; i++) ucvector_push_back(&tRNS, info->palette[4 * i + 3]); /*add only alpha channel*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else if(info->colorType == 0)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(info->key_defined)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
ucvector_push_back(&tRNS, (unsigned char)(info->key_r / 256));
|
|
Packit Service |
50c9f2 |
ucvector_push_back(&tRNS, (unsigned char)(info->key_r % 256));
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else if(info->colorType == 2)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(info->key_defined)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
ucvector_push_back(&tRNS, (unsigned char)(info->key_r / 256));
|
|
Packit Service |
50c9f2 |
ucvector_push_back(&tRNS, (unsigned char)(info->key_r % 256));
|
|
Packit Service |
50c9f2 |
ucvector_push_back(&tRNS, (unsigned char)(info->key_g / 256));
|
|
Packit Service |
50c9f2 |
ucvector_push_back(&tRNS, (unsigned char)(info->key_g % 256));
|
|
Packit Service |
50c9f2 |
ucvector_push_back(&tRNS, (unsigned char)(info->key_b / 256));
|
|
Packit Service |
50c9f2 |
ucvector_push_back(&tRNS, (unsigned char)(info->key_b % 256));
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
error = addChunk(out, "tRNS", tRNS.data, tRNS.size);
|
|
Packit Service |
50c9f2 |
ucvector_cleanup(&tRNS);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
return error;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned addChunk_IDAT(ucvector* out, const unsigned char* data, size_t datasize, LodeZlib_DeflateSettings* zlibsettings)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
ucvector zlibdata;
|
|
Packit Service |
50c9f2 |
unsigned error = 0;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*compress with the Zlib compressor*/
|
|
Packit Service |
50c9f2 |
ucvector_init(&zlibdata);
|
|
Packit Service |
50c9f2 |
error = LodePNG_compress(&zlibdata.data, &zlibdata.size, data, datasize, zlibsettings);
|
|
Packit Service |
50c9f2 |
if(!error) error = addChunk(out, "IDAT", zlibdata.data, zlibdata.size);
|
|
Packit Service |
50c9f2 |
ucvector_cleanup(&zlibdata);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
return error;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned addChunk_IEND(ucvector* out)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned error = 0;
|
|
Packit Service |
50c9f2 |
error = addChunk(out, "IEND", 0, 0);
|
|
Packit Service |
50c9f2 |
return error;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void filterScanline(unsigned char* out, const unsigned char* scanline, const unsigned char* prevline, size_t length, size_t bytewidth, unsigned char filterType)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t i;
|
|
Packit Service |
50c9f2 |
switch(filterType)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
case 0:
|
|
Packit Service |
50c9f2 |
for(i = 0; i < length; i++) out[i] = scanline[i];
|
|
Packit Service |
50c9f2 |
break;
|
|
Packit Service |
50c9f2 |
case 1:
|
|
Packit Service |
50c9f2 |
for(i = 0; i < bytewidth; i++) out[i] = scanline[i];
|
|
Packit Service |
50c9f2 |
for(i = bytewidth; i < length; i++) out[i] = scanline[i] - scanline[i - bytewidth];
|
|
Packit Service |
50c9f2 |
break;
|
|
Packit Service |
50c9f2 |
case 2:
|
|
Packit Service |
50c9f2 |
if(prevline) for(i = 0; i < length; i++) out[i] = scanline[i] - prevline[i];
|
|
Packit Service |
50c9f2 |
else for(i = 0; i < length; i++) out[i] = scanline[i];
|
|
Packit Service |
50c9f2 |
break;
|
|
Packit Service |
50c9f2 |
case 3:
|
|
Packit Service |
50c9f2 |
if(prevline)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
for(i = 0; i < bytewidth; i++) out[i] = scanline[i] - prevline[i] / 2;
|
|
Packit Service |
50c9f2 |
for(i = bytewidth; i < length; i++) out[i] = scanline[i] - ((scanline[i - bytewidth] + prevline[i]) / 2);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
for(i = 0; i < length; i++) out[i] = scanline[i];
|
|
Packit Service |
50c9f2 |
for(i = bytewidth; i < length; i++) out[i] = scanline[i] - scanline[i - bytewidth] / 2;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
break;
|
|
Packit Service |
50c9f2 |
case 4:
|
|
Packit Service |
50c9f2 |
if(prevline)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
for(i = 0; i < bytewidth; i++) out[i] = (unsigned char)(scanline[i] - paethPredictor(0, prevline[i], 0));
|
|
Packit Service |
50c9f2 |
for(i = bytewidth; i < length; i++) out[i] = (unsigned char)(scanline[i] - paethPredictor(scanline[i - bytewidth], prevline[i], prevline[i - bytewidth]));
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
for(i = 0; i < bytewidth; i++) out[i] = scanline[i];
|
|
Packit Service |
50c9f2 |
for(i = bytewidth; i < length; i++) out[i] = (unsigned char)(scanline[i] - paethPredictor(scanline[i - bytewidth], 0, 0));
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
break;
|
|
Packit Service |
50c9f2 |
default: return; /*unexisting filter type given*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static unsigned filter(unsigned char* out, const unsigned char* in, unsigned w, unsigned h, const LodePNG_InfoColor* info)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*
|
|
Packit Service |
50c9f2 |
For PNG filter method 0
|
|
Packit Service |
50c9f2 |
out must be a buffer with as size: h + (w * h * bpp + 7) / 8, because there are the scanlines with 1 extra byte per scanline
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
There is a nice heuristic described here: http://www.cs.toronto.edu/~cosmin/pngtech/optipng.html. It says:
|
|
Packit Service |
50c9f2 |
* If the image type is Palette, or the bit depth is smaller than 8, then do not filter the image (i.e. use fixed filtering, with the filter None).
|
|
Packit Service |
50c9f2 |
* (The other case) If the image type is Grayscale or RGB (with or without Alpha), and the bit depth is not smaller than 8, then use adaptive filtering heuristic as follows: independently for each row, apply all five filters and select the filter that produces the smallest sum of absolute values per row.
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
Here the above method is used mostly. Note though that it appears to be better to use the adaptive filtering on the plasma 8-bit palette example, but that image isn't the best reference for palette images in general.
|
|
Packit Service |
50c9f2 |
*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
unsigned bpp = LodePNG_InfoColor_getBpp(info);
|
|
Packit Service |
50c9f2 |
size_t linebytes = (w * bpp + 7) / 8; /*the width of a scanline in bytes, not including the filter type*/
|
|
Packit Service |
50c9f2 |
size_t bytewidth = (bpp + 7) / 8; /*bytewidth is used for filtering, is 1 when bpp < 8, number of bytes per pixel otherwise*/
|
|
Packit Service |
50c9f2 |
const unsigned char* prevline = 0;
|
|
Packit Service |
50c9f2 |
unsigned x, y;
|
|
Packit Service |
50c9f2 |
unsigned heuristic;
|
|
Packit Service |
50c9f2 |
unsigned error = 0;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(bpp == 0) return 31; /*invalid color type*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*choose heuristic as described above*/
|
|
Packit Service |
50c9f2 |
if(info->colorType == 3 || info->bitDepth < 8) heuristic = 0;
|
|
Packit Service |
50c9f2 |
else heuristic = 1;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(heuristic == 0) /*None filtertype for everything*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
for(y = 0; y < h; y++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t outindex = (1 + linebytes) * y; /*the extra filterbyte added to each row*/
|
|
Packit Service |
50c9f2 |
size_t inindex = linebytes * y;
|
|
Packit Service |
50c9f2 |
const unsigned TYPE = 0;
|
|
Packit Service |
50c9f2 |
out[outindex] = TYPE; /*filter type byte*/
|
|
Packit Service |
50c9f2 |
filterScanline(&out[outindex + 1], &in[inindex], prevline, linebytes, bytewidth, TYPE);
|
|
Packit Service |
50c9f2 |
prevline = &in[inindex];
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else if(heuristic == 1) /*adaptive filtering*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t sum[5];
|
|
Packit Service |
50c9f2 |
ucvector attempt[5]; /*five filtering attempts, one for each filter type*/
|
|
Packit Service |
50c9f2 |
size_t smallest = 0;
|
|
Packit Service |
50c9f2 |
unsigned type, bestType = 0;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
for(type = 0; type < 5; type++) ucvector_init(&attempt[type]);
|
|
Packit Service |
50c9f2 |
for(type = 0; type < 5; type++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(!ucvector_resize(&attempt[type], linebytes)) { error = 9949; break; }
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(!error)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
for(y = 0; y < h; y++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*try the 5 filter types*/
|
|
Packit Service |
50c9f2 |
for(type = 0; type < 5; type++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
filterScanline(attempt[type].data, &in[y * linebytes], prevline, linebytes, bytewidth, type);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*calculate the sum of the result*/
|
|
Packit Service |
50c9f2 |
sum[type] = 0;
|
|
Packit Service |
50c9f2 |
for(x = 0; x < attempt[type].size; x+=3) sum[type] += attempt[type].data[x]; /*note that not all pixels are checked to speed this up while still having probably the best choice*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*check if this is smallest sum (or if type == 0 it's the first case so always store the values)*/
|
|
Packit Service |
50c9f2 |
if(type == 0 || sum[type] < smallest)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
bestType = type;
|
|
Packit Service |
50c9f2 |
smallest = sum[type];
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
prevline = &in[y * linebytes];
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*now fill the out values*/
|
|
Packit Service |
50c9f2 |
out[y * (linebytes + 1)] = bestType; /*the first byte of a scanline will be the filter type*/
|
|
Packit Service |
50c9f2 |
for(x = 0; x < linebytes; x++) out[y * (linebytes + 1) + 1 + x] = attempt[bestType].data[x];
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
for(type = 0; type < 5; type++) ucvector_cleanup(&attempt[type]);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
return error;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void addPaddingBits(unsigned char* out, const unsigned char* in, size_t olinebits, size_t ilinebits, unsigned h)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*The opposite of the removePaddingBits function
|
|
Packit Service |
50c9f2 |
olinebits must be >= ilinebits*/
|
|
Packit Service |
50c9f2 |
unsigned y;
|
|
Packit Service |
50c9f2 |
size_t diff = olinebits - ilinebits;
|
|
Packit Service |
50c9f2 |
size_t obp = 0, ibp = 0; /*bit pointers*/
|
|
Packit Service |
50c9f2 |
for(y = 0; y < h; y++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t x;
|
|
Packit Service |
50c9f2 |
for(x = 0; x < ilinebits; x++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned char bit = readBitFromReversedStream(&ibp, in);
|
|
Packit Service |
50c9f2 |
setBitOfReversedStream(&obp, out, bit);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
/*obp += diff; --> no, fill in some value in the padding bits too, to avoid "Use of uninitialised value of size ###" warning from valgrind*/
|
|
Packit Service |
50c9f2 |
for(x = 0; x < diff; x++) setBitOfReversedStream(&obp, out, 0);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
static void Adam7_interlace(unsigned char* out, const unsigned char* in, unsigned w, unsigned h, unsigned bpp)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*Note: this function works on image buffers WITHOUT padding bits at end of scanlines with non-multiple-of-8 bit amounts, only between reduced images is padding*/
|
|
Packit Service |
50c9f2 |
unsigned passw[7], passh[7]; size_t filter_passstart[8], padded_passstart[8], passstart[8];
|
|
Packit Service |
50c9f2 |
unsigned i;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
Adam7_getpassvalues(passw, passh, filter_passstart, padded_passstart, passstart, w, h, bpp);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(bpp >= 8)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
for(i = 0; i < 7; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned x, y, b;
|
|
Packit Service |
50c9f2 |
size_t bytewidth = bpp / 8;
|
|
Packit Service |
50c9f2 |
for(y = 0; y < passh[i]; y++)
|
|
Packit Service |
50c9f2 |
for(x = 0; x < passw[i]; x++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t pixelinstart = ((ADAM7_IY[i] + y * ADAM7_DY[i]) * w + ADAM7_IX[i] + x * ADAM7_DX[i]) * bytewidth;
|
|
Packit Service |
50c9f2 |
size_t pixeloutstart = passstart[i] + (y * passw[i] + x) * bytewidth;
|
|
Packit Service |
50c9f2 |
for(b = 0; b < bytewidth; b++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
out[pixeloutstart + b] = in[pixelinstart + b];
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else /*bpp < 8: Adam7 with pixels < 8 bit is a bit trickier: with bit pointers*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
for(i = 0; i < 7; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned x, y, b;
|
|
Packit Service |
50c9f2 |
unsigned ilinebits = bpp * passw[i];
|
|
Packit Service |
50c9f2 |
unsigned olinebits = bpp * w;
|
|
Packit Service |
50c9f2 |
size_t obp, ibp; /*bit pointers (for out and in buffer)*/
|
|
Packit Service |
50c9f2 |
for(y = 0; y < passh[i]; y++)
|
|
Packit Service |
50c9f2 |
for(x = 0; x < passw[i]; x++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
ibp = (ADAM7_IY[i] + y * ADAM7_DY[i]) * olinebits + (ADAM7_IX[i] + x * ADAM7_DX[i]) * bpp;
|
|
Packit Service |
50c9f2 |
obp = (8 * passstart[i]) + (y * ilinebits + x * bpp);
|
|
Packit Service |
50c9f2 |
for(b = 0; b < bpp; b++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned char bit = readBitFromReversedStream(&ibp, in);
|
|
Packit Service |
50c9f2 |
setBitOfReversedStream(&obp, out, bit);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*out must be buffer big enough to contain uncompressed IDAT chunk data, and in must contain the full image*/
|
|
Packit Service |
50c9f2 |
static unsigned preProcessScanlines(unsigned char** out, size_t* outsize, const unsigned char* in, const LodePNG_InfoPng* infoPng) /*return value is error*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*
|
|
Packit Service |
50c9f2 |
This function converts the pure 2D image with the PNG's colortype, into filtered-padded-interlaced data. Steps:
|
|
Packit Service |
50c9f2 |
*) if no Adam7: 1) add padding bits (= possible extra bits per scanline if bpp < 8) 2) filter
|
|
Packit Service |
50c9f2 |
*) if adam7: 1) Adam7_interlace 2) 7x add padding bits 3) 7x filter
|
|
Packit Service |
50c9f2 |
*/
|
|
Packit Service |
50c9f2 |
unsigned bpp = LodePNG_InfoColor_getBpp(&infoPng->color);
|
|
Packit Service |
50c9f2 |
unsigned w = infoPng->width;
|
|
Packit Service |
50c9f2 |
unsigned h = infoPng->height;
|
|
Packit Service |
50c9f2 |
unsigned error = 0;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(infoPng->interlaceMethod == 0)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
*outsize = h + (h * ((w * bpp + 7) / 8)); /*image size plus an extra byte per scanline + possible padding bits*/
|
|
Packit Service |
50c9f2 |
*out = (unsigned char*)malloc(*outsize);
|
|
Packit Service |
50c9f2 |
if(!(*out) && (*outsize)) error = 9950;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(!error)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(bpp < 8 && w * bpp != ((w * bpp + 7) / 8) * 8) /*non multiple of 8 bits per scanline, padding bits needed per scanline*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
ucvector padded;
|
|
Packit Service |
50c9f2 |
ucvector_init(&padded);
|
|
Packit Service |
50c9f2 |
if(!ucvector_resize(&padded, h * ((w * bpp + 7) / 8))) error = 9951;
|
|
Packit Service |
50c9f2 |
if(!error)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
addPaddingBits(padded.data, in, ((w * bpp + 7) / 8) * 8, w * bpp, h);
|
|
Packit Service |
50c9f2 |
error = filter(*out, padded.data, w, h, &infoPng->color);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
ucvector_cleanup(&padded);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else error = filter(*out, in, w, h, &infoPng->color); /*we can immediately filter into the out buffer, no other steps needed*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else /*interlaceMethod is 1 (Adam7)*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned char* adam7 = (unsigned char*)malloc((h * w * bpp + 7) / 8);
|
|
Packit Service |
50c9f2 |
if(!adam7 && ((h * w * bpp + 7) / 8)) error = 9952; /*malloc failed*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
while(!error) /*not a real while loop, used to break out to cleanup to avoid a goto*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned passw[7], passh[7]; size_t filter_passstart[8], padded_passstart[8], passstart[8];
|
|
Packit Service |
50c9f2 |
unsigned i;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
Adam7_getpassvalues(passw, passh, filter_passstart, padded_passstart, passstart, w, h, bpp);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
*outsize = filter_passstart[7]; /*image size plus an extra byte per scanline + possible padding bits*/
|
|
Packit Service |
50c9f2 |
*out = (unsigned char*)malloc(*outsize);
|
|
Packit Service |
50c9f2 |
if(!(*out) && (*outsize)) { error = 9953; break; }
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
Adam7_interlace(adam7, in, w, h, bpp);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
for(i = 0; i < 7; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(bpp < 8)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
ucvector padded;
|
|
Packit Service |
50c9f2 |
ucvector_init(&padded);
|
|
Packit Service |
50c9f2 |
if(!ucvector_resize(&padded, h * ((w * bpp + 7) / 8))) error = 9954;
|
|
Packit Service |
50c9f2 |
if(!error)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
addPaddingBits(&padded.data[padded_passstart[i]], &adam7[passstart[i]], ((passw[i] * bpp + 7) / 8) * 8, passw[i] * bpp, passh[i]);
|
|
Packit Service |
50c9f2 |
error = filter(&(*out)[filter_passstart[i]], &padded.data[padded_passstart[i]], passw[i], passh[i], &infoPng->color);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
ucvector_cleanup(&padded);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
error = filter(&(*out)[filter_passstart[i]], &adam7[padded_passstart[i]], passw[i], passh[i], &infoPng->color);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
break;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
free(adam7);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
return error;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*palette must have 4 * palettesize bytes allocated*/
|
|
Packit Service |
50c9f2 |
static unsigned isPaletteFullyOpaque(const unsigned char* palette, size_t palettesize) /*palette given in format RGBARGBARGBARGBA...*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
size_t i;
|
|
Packit Service |
50c9f2 |
for(i = 0; i < palettesize; i++)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(palette[4 * i + 3] != 255) return 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
return 1;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*this function checks if the input image given by the user has no transparent pixels*/
|
|
Packit Service |
50c9f2 |
static unsigned isFullyOpaque(const unsigned char* image, unsigned w, unsigned h, const LodePNG_InfoColor* info)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*TODO: When the user specified a color key for the input image, then this function must also check for pixels that are the same as the color key and treat those as transparent.*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
unsigned i, numpixels = w * h;
|
|
Packit Service |
50c9f2 |
if(info->colorType == 6)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(info->bitDepth == 8)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numpixels; i++) if(image[i * 4 + 3] != 255) return 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numpixels; i++) if(image[i * 8 + 6] != 255 || image[i * 8 + 7] != 255) return 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
return 1; /*no single pixel with alpha channel other than 255 found*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else if(info->colorType == 4)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(info->bitDepth == 8)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numpixels; i++) if(image[i * 2 + 1] != 255) return 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
for(i = 0; i < numpixels; i++) if(image[i * 4 + 2] != 255 || image[i * 4 + 3] != 255) return 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
return 1; /*no single pixel with alpha channel other than 255 found*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else if(info->colorType == 3)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*when there's a palette, we could check every pixel for translucency, but much quicker is to just check the palette*/
|
|
Packit Service |
50c9f2 |
return(isPaletteFullyOpaque(info->palette, info->palettesize));
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
return 0; /*color type that isn't supported by this function yet, so assume there is transparency to be safe*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
void LodePNG_encode(LodePNG_Encoder* encoder, unsigned char** out, size_t* outsize, const unsigned char* image, unsigned w, unsigned h)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
LodePNG_InfoPng info;
|
|
Packit Service |
50c9f2 |
ucvector outv;
|
|
Packit Service |
50c9f2 |
unsigned char* data = 0; /*uncompressed version of the IDAT chunk data*/
|
|
Packit Service |
50c9f2 |
size_t datasize = 0;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*provide some proper output values if error will happen*/
|
|
Packit Service |
50c9f2 |
*out = 0;
|
|
Packit Service |
50c9f2 |
*outsize = 0;
|
|
Packit Service |
50c9f2 |
encoder->error = 0;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
info = encoder->infoPng; /*UNSAFE copy to avoid having to cleanup! but we will only change primitive parameters, and not invoke the cleanup function nor touch the palette's buffer so we use it safely*/
|
|
Packit Service |
50c9f2 |
info.width = w;
|
|
Packit Service |
50c9f2 |
info.height = h;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(encoder->settings.autoLeaveOutAlphaChannel && isFullyOpaque(image, w, h, &encoder->infoRaw.color))
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*go to a color type without alpha channel*/
|
|
Packit Service |
50c9f2 |
if(info.color.colorType == 6) info.color.colorType = 2;
|
|
Packit Service |
50c9f2 |
else if(info.color.colorType == 4) info.color.colorType = 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(encoder->settings.zlibsettings.windowSize > 32768) { encoder->error = 60; return; } /*error: windowsize larger than allowed*/
|
|
Packit Service |
50c9f2 |
if(encoder->settings.zlibsettings.btype > 2) { encoder->error = 61; return; } /*error: unexisting btype*/
|
|
Packit Service |
50c9f2 |
if(encoder->infoPng.interlaceMethod > 1) { encoder->error = 71; return; } /*error: unexisting interlace mode*/
|
|
Packit Service |
50c9f2 |
if((encoder->error = checkColorValidity(info.color.colorType, info.color.bitDepth))) return; /*error: unexisting color type given*/
|
|
Packit Service |
50c9f2 |
if((encoder->error = checkColorValidity(encoder->infoRaw.color.colorType, encoder->infoRaw.color.bitDepth))) return; /*error: unexisting color type given*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if(!LodePNG_InfoColor_equal(&encoder->infoRaw.color, &info.color))
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
unsigned char* converted;
|
|
Packit Service |
50c9f2 |
size_t size = (w * h * LodePNG_InfoColor_getBpp(&info.color) + 7) / 8;
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
if((info.color.colorType != 6 && info.color.colorType != 2) || (info.color.bitDepth != 8)) { encoder->error = 59; return; } /*for the output image, only these types are supported*/
|
|
Packit Service |
50c9f2 |
converted = (unsigned char*)malloc(size);
|
|
Packit Service |
50c9f2 |
if(!converted && size) encoder->error = 9955; /*error: malloc failed*/
|
|
Packit Service |
50c9f2 |
if(!encoder->error) encoder->error = LodePNG_convert(converted, image, &info.color, &encoder->infoRaw.color, w, h);
|
|
Packit Service |
50c9f2 |
if(!encoder->error) preProcessScanlines(&data, &datasize, converted, &info;;/*filter(data.data, converted.data, w, h, LodePNG_InfoColor_getBpp(&info.color));*/
|
|
Packit Service |
50c9f2 |
free(converted);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
else preProcessScanlines(&data, &datasize, image, &info;;/*filter(data.data, image, w, h, LodePNG_InfoColor_getBpp(&info.color));*/
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
ucvector_init(&outv);
|
|
Packit Service |
50c9f2 |
while(!encoder->error) /*not really a while loop, this is only used to break out if an error happens to avoid goto's to do the ucvector cleanup*/
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
/*write signature and chunks*/
|
|
Packit Service |
50c9f2 |
writeSignature(&outv);
|
|
Packit Service |
50c9f2 |
/*IHDR*/
|
|
Packit Service |
50c9f2 |
addChunk_IHDR(&outv, w, h, info.color.bitDepth, info.color.colorType, info.interlaceMethod);
|
|
Packit Service |
50c9f2 |
/*PLTE*/
|
|
Packit Service |
50c9f2 |
if(info.color.colorType == 3)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(info.color.palettesize == 0 || info.color.palettesize > 256) { encoder->error = 68; break; }
|
|
Packit Service |
50c9f2 |
addChunk_PLTE(&outv, &info.color);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
if(encoder->settings.force_palette && (info.color.colorType == 2 || info.color.colorType == 6))
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
if(info.color.palettesize == 0 || info.color.palettesize > 256) { encoder->error = 68; break; }
|
|
Packit Service |
50c9f2 |
addChunk_PLTE(&outv, &info.color);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
/*tRNS*/
|
|
Packit Service |
50c9f2 |
if(info.color.colorType == 3 && !isPaletteFullyOpaque(info.color.palette, info.color.palettesize)) addChunk_tRNS(&outv, &info.color);
|
|
Packit Service |
50c9f2 |
if((info.color.colorType == 0 || info.color.colorType == 2) && info.color.key_defined) addChunk_tRNS(&outv, &info.color);
|
|
Packit Service |
50c9f2 |
/*IDAT (multiple IDAT chunks must be consecutive)*/
|
|
Packit Service |
50c9f2 |
encoder->error = addChunk_IDAT(&outv, data, datasize, &encoder->settings.zlibsettings);
|
|
Packit Service |
50c9f2 |
if(encoder->error) break;
|
|
Packit Service |
50c9f2 |
/*IEND*/
|
|
Packit Service |
50c9f2 |
addChunk_IEND(&outv);
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
break; /*this isn't really a while loop; no error happened so break out now!*/
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
free(data);
|
|
Packit Service |
50c9f2 |
/*instead of cleaning the vector up, give it to the output*/
|
|
Packit Service |
50c9f2 |
*out = outv.data;
|
|
Packit Service |
50c9f2 |
*outsize = outv.size;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
void LodePNG_EncodeSettings_init(LodePNG_EncodeSettings* settings)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
LodeZlib_DeflateSettings_init(&settings->zlibsettings);
|
|
Packit Service |
50c9f2 |
settings->autoLeaveOutAlphaChannel = 1;
|
|
Packit Service |
50c9f2 |
settings->force_palette = 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
void LodePNG_Encoder_init(LodePNG_Encoder* encoder)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
LodePNG_EncodeSettings_init(&encoder->settings);
|
|
Packit Service |
50c9f2 |
LodePNG_InfoPng_init(&encoder->infoPng);
|
|
Packit Service |
50c9f2 |
LodePNG_InfoRaw_init(&encoder->infoRaw);
|
|
Packit Service |
50c9f2 |
encoder->error = 1;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
void LodePNG_Encoder_cleanup(LodePNG_Encoder* encoder)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
LodePNG_InfoPng_cleanup(&encoder->infoPng);
|
|
Packit Service |
50c9f2 |
LodePNG_InfoRaw_cleanup(&encoder->infoRaw);
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
void LodePNG_Encoder_copy(LodePNG_Encoder* dest, const LodePNG_Encoder* source)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
LodePNG_Encoder_cleanup(dest);
|
|
Packit Service |
50c9f2 |
*dest = *source;
|
|
Packit Service |
50c9f2 |
LodePNG_InfoPng_init(&dest->infoPng);
|
|
Packit Service |
50c9f2 |
LodePNG_InfoRaw_init(&dest->infoRaw);
|
|
Packit Service |
50c9f2 |
dest->error = LodePNG_InfoPng_copy(&dest->infoPng, &source->infoPng); if(dest->error) return;
|
|
Packit Service |
50c9f2 |
dest->error = LodePNG_InfoRaw_copy(&dest->infoRaw, &source->infoRaw); if(dest->error) return;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
/* / File IO / */
|
|
Packit Service |
50c9f2 |
/* ////////////////////////////////////////////////////////////////////////// */
|
|
Packit Service |
50c9f2 |
|
|
Packit Service |
50c9f2 |
/*write given buffer to the file, overwriting the file, it doesn't append to it.*/
|
|
Packit Service |
50c9f2 |
unsigned LodePNG_saveFile(const unsigned char* buffer, size_t buffersize, const char* filename)
|
|
Packit Service |
50c9f2 |
{
|
|
Packit Service |
50c9f2 |
FILE* file;
|
|
Packit Service |
50c9f2 |
file = portable_fopen(filename, "wb" );
|
|
Packit Service |
50c9f2 |
if(!file) return 79;
|
|
Packit Service |
50c9f2 |
fwrite((char*)buffer , 1 , buffersize, file);
|
|
Packit Service |
50c9f2 |
fclose(file);
|
|
Packit Service |
50c9f2 |
return 0;
|
|
Packit Service |
50c9f2 |
}
|
|
Packit Service |
50c9f2 |
|