707 lines
30 KiB
C
707 lines
30 KiB
C
/* QuakeSpasm: kept only the jpg writer, the only thing we use, and removed all others. */
|
|
|
|
/* stb_image_write - v1.07 - public domain - http://nothings.org/stb/stb_image_write.h
|
|
writes out PNG/BMP/TGA/JPEG/HDR images to C stdio - Sean Barrett 2010-2015
|
|
no warranty implied; use at your own risk
|
|
|
|
Before #including,
|
|
|
|
#define STB_IMAGE_WRITE_IMPLEMENTATION
|
|
|
|
in the file that you want to have the implementation.
|
|
|
|
Will probably not work correctly with strict-aliasing optimizations.
|
|
|
|
ABOUT:
|
|
|
|
This header file is a library for writing images to C stdio. It could be
|
|
adapted to write to memory or a general streaming interface; let me know.
|
|
|
|
The PNG output is not optimal; it is 20-50% larger than the file
|
|
written by a decent optimizing implementation. This library is designed
|
|
for source code compactness and simplicity, not optimal image file size
|
|
or run-time performance.
|
|
|
|
BUILDING:
|
|
|
|
You can #define STBIW_ASSERT(x) before the #include to avoid using assert.h.
|
|
You can #define STBIW_MALLOC(), STBIW_REALLOC(), and STBIW_FREE() to replace
|
|
malloc,realloc,free.
|
|
You can define STBIW_MEMMOVE() to replace memmove()
|
|
|
|
USAGE:
|
|
|
|
There are four functions, one for each image file format:
|
|
|
|
int32_t stbi_write_png(char const *filename, int32_t w, int32_t h, int32_t comp, const void *data, int32_t stride_in_bytes);
|
|
int32_t stbi_write_bmp(char const *filename, int32_t w, int32_t h, int32_t comp, const void *data);
|
|
int32_t stbi_write_tga(char const *filename, int32_t w, int32_t h, int32_t comp, const void *data);
|
|
int32_t stbi_write_hdr(char const *filename, int32_t w, int32_t h, int32_t comp, const float *data);
|
|
int32_t stbi_write_jpg(char const *filename, int32_t w, int32_t h, int32_t comp, const float *data);
|
|
|
|
There are also four equivalent functions that use an arbitrary write function. You are
|
|
expected to open/close your file-equivalent before and after calling these:
|
|
|
|
int32_t stbi_write_png_to_func(stbi_write_func *func, void *context, int32_t w, int32_t h, int32_t comp, const void *data, int32_t stride_in_bytes);
|
|
int32_t stbi_write_bmp_to_func(stbi_write_func *func, void *context, int32_t w, int32_t h, int32_t comp, const void *data);
|
|
int32_t stbi_write_tga_to_func(stbi_write_func *func, void *context, int32_t w, int32_t h, int32_t comp, const void *data);
|
|
int32_t stbi_write_hdr_to_func(stbi_write_func *func, void *context, int32_t w, int32_t h, int32_t comp, const float *data);
|
|
int32_t stbi_write_jpg_to_func(stbi_write_func *func, void *context, int32_t x, int32_t y, int32_t comp, const void *data, int32_t quality);
|
|
|
|
where the callback is:
|
|
void stbi_write_func(void *context, void *data, int32_t size);
|
|
|
|
You can define STBI_WRITE_NO_STDIO to disable the file variant of these
|
|
functions, so the library will not use stdio.h at all. However, this will
|
|
also disable HDR writing, because it requires stdio for formatted output.
|
|
|
|
Each function returns 0 on failure and non-0 on success.
|
|
|
|
The functions create an image file defined by the parameters. The image
|
|
is a rectangle of pixels stored from left-to-right, top-to-bottom.
|
|
Each pixel contains 'comp' channels of data stored interleaved with 8-bits
|
|
per channel, in the following order: 1=Y, 2=YA, 3=RGB, 4=RGBA. (Y is
|
|
monochrome color.) The rectangle is 'w' pixels wide and 'h' pixels tall.
|
|
The *data pointer points to the first byte of the top-left-most pixel.
|
|
For PNG, "stride_in_bytes" is the distance in bytes from the first byte of
|
|
a row of pixels to the first byte of the next row of pixels.
|
|
|
|
PNG creates output files with the same number of components as the input.
|
|
The BMP format expands Y to RGB in the file format and does not
|
|
output alpha.
|
|
|
|
PNG supports writing rectangles of data even when the bytes storing rows of
|
|
data are not consecutive in memory (e.g. sub-rectangles of a larger image),
|
|
by supplying the stride between the beginning of adjacent rows. The other
|
|
formats do not. (Thus you cannot write a native-format BMP through the BMP
|
|
writer, both because it is in BGR order and because it may have padding
|
|
at the end of the line.)
|
|
|
|
HDR expects linear float data. Since the format is always 32-bit rgb(e)
|
|
data, alpha (if provided) is discarded, and for monochrome data it is
|
|
replicated across all three channels.
|
|
|
|
TGA supports RLE or non-RLE compressed data. To use non-RLE-compressed
|
|
data, set the global variable 'stbi_write_tga_with_rle' to 0.
|
|
|
|
JPEG does ignore alpha channels in input data; quality is between 1 and 100.
|
|
Higher quality looks better but results in a bigger image.
|
|
JPEG baseline (no JPEG progressive).
|
|
|
|
CREDITS:
|
|
|
|
PNG/BMP/TGA
|
|
Sean Barrett
|
|
HDR
|
|
Baldur Karlsson
|
|
TGA monochrome:
|
|
Jean-Sebastien Guay
|
|
misc enhancements:
|
|
Tim Kelsey
|
|
TGA RLE
|
|
Alan Hickman
|
|
initial file IO callback implementation
|
|
Emmanuel Julien
|
|
JPEG
|
|
Jon Olick (original jo_jpeg.cpp code)
|
|
Daniel Gibson
|
|
bugfixes:
|
|
github:Chribba
|
|
Guillaume Chereau
|
|
github:jry2
|
|
github:romigrou
|
|
Sergio Gonzalez
|
|
Jonas Karlsson
|
|
Filip Wasil
|
|
Thatcher Ulrich
|
|
github:poppolopoppo
|
|
Patrick Boettcher
|
|
|
|
LICENSE
|
|
|
|
See end of file for license information.
|
|
|
|
*/
|
|
|
|
#ifndef spingle__stb_image_write_h
|
|
#define spingle__stb_image_write_h
|
|
|
|
#if defined(STB_IMAGE_WRITE_STATIC)
|
|
#define STBIWDEF static
|
|
#else
|
|
#define STBIWDEF extern
|
|
#endif
|
|
|
|
#if !defined(STBI_WRITE_NO_STDIO)
|
|
STBIWDEF int32_t stbi_write_jpg(char const *filename, int32_t x, int32_t y, int32_t comp, const void *data, int32_t quality);
|
|
#endif
|
|
|
|
typedef void stbi_write_func(void *context, void *data, int32_t size);
|
|
|
|
#endif
|
|
|
|
#if defined(STB_IMAGE_WRITE_IMPLEMENTATION)
|
|
|
|
#if defined(_WIN32)
|
|
#if !defined(_CRT_SECURE_NO_WARNINGS)
|
|
#define _CRT_SECURE_NO_WARNINGS
|
|
#endif
|
|
#if !defined(_CRT_NONSTDC_NO_DEPRECATE)
|
|
#define _CRT_NONSTDC_NO_DEPRECATE
|
|
#endif
|
|
#endif
|
|
|
|
#if !defined(STBI_WRITE_NO_STDIO)
|
|
#include <stdio.h>
|
|
#endif // STBI_WRITE_NO_STDIO
|
|
|
|
#include <stdarg.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <math.h>
|
|
|
|
#if defined(STBIW_MALLOC) && defined(STBIW_FREE) && (defined(STBIW_REALLOC) || defined(STBIW_REALLOC_SIZED))
|
|
// ok
|
|
#elif !defined(STBIW_MALLOC) && !defined(STBIW_FREE) && !defined(STBIW_REALLOC) && !defined(STBIW_REALLOC_SIZED)
|
|
// ok
|
|
#else
|
|
#error "Must define all or none of STBIW_MALLOC, STBIW_FREE, and STBIW_REALLOC (or STBIW_REALLOC_SIZED)."
|
|
#endif
|
|
|
|
#if !defined(STBIW_MALLOC)
|
|
#define STBIW_MALLOC(sz) malloc(sz)
|
|
#define STBIW_REALLOC(p,newsz) realloc(p,newsz)
|
|
#define STBIW_FREE(p) free(p)
|
|
#endif
|
|
|
|
#if !defined(STBIW_REALLOC_SIZED)
|
|
#define STBIW_REALLOC_SIZED(p,oldsz,newsz) STBIW_REALLOC(p,newsz)
|
|
#endif
|
|
|
|
|
|
#if !defined(STBIW_MEMMOVE)
|
|
#define STBIW_MEMMOVE(a,b,sz) memmove(a,b,sz)
|
|
#endif
|
|
|
|
|
|
#if !defined(STBIW_ASSERT)
|
|
#include <assert.h>
|
|
#define STBIW_ASSERT(x) assert(x)
|
|
#endif
|
|
|
|
#define STBIW_UCHAR(x) (uint8_t) ((x) & 0xff)
|
|
|
|
typedef struct
|
|
{
|
|
stbi_write_func *func;
|
|
void *context;
|
|
} stbi__write_context;
|
|
|
|
// initialize a callback-based context
|
|
static void stbi__start_write_callbacks(stbi__write_context *s, stbi_write_func *c, void *context)
|
|
{
|
|
s->func = c;
|
|
s->context = context;
|
|
}
|
|
|
|
#if !defined(STBI_WRITE_NO_STDIO)
|
|
|
|
static void stbi__stdio_write(void *context, void *data, int32_t size)
|
|
{
|
|
fwrite(data, 1, size, (FILE*) context);
|
|
}
|
|
|
|
static int32_t stbi__start_write_file(stbi__write_context *s, const char *filename)
|
|
{
|
|
FILE *f = fopen(filename, "wb");
|
|
stbi__start_write_callbacks(s, stbi__stdio_write, f);
|
|
return f != NULL;
|
|
}
|
|
|
|
static void stbi__end_write_file(stbi__write_context *s)
|
|
{
|
|
fclose((FILE *)s->context);
|
|
}
|
|
|
|
#endif // !STBI_WRITE_NO_STDIO
|
|
|
|
typedef uint32_t stbiw_uint32;
|
|
typedef int32_t stb_image_write_test[sizeof(stbiw_uint32) == 4 ? 1 : -1];
|
|
|
|
static void stbiw__putc(stbi__write_context *s, uint8_t c)
|
|
{
|
|
s->func(s->context, &c, 1);
|
|
}
|
|
|
|
/* ***************************************************************************
|
|
*
|
|
* JPEG writer
|
|
*
|
|
* This is based on Jon Olick's jo_jpeg.cpp:
|
|
* public domain Simple, Minimalistic JPEG writer - http://www.jonolick.com/code.html
|
|
*/
|
|
|
|
static const uint8_t stbiw__jpg_ZigZag[] = { 0, 1, 5, 6, 14, 15, 27, 28, 2, 4, 7, 13, 16, 26, 29, 42, 3, 8, 12, 17, 25, 30, 41, 43, 9, 11, 18,
|
|
24, 31, 40, 44, 53, 10, 19, 23, 32, 39, 45, 52, 54, 20, 22, 33, 38, 46, 51, 55, 60, 21, 34, 37, 47, 50, 56, 59, 61, 35, 36, 48, 49, 57, 58, 62, 63
|
|
};
|
|
|
|
static void stbiw__jpg_writeBits(stbi__write_context *s, int32_t *bitBufP, int32_t *bitCntP, const uint16_t *bs)
|
|
{
|
|
int32_t bitBuf = *bitBufP, bitCnt = *bitCntP;
|
|
bitCnt += bs[1];
|
|
bitBuf |= bs[0] << (24 - bitCnt);
|
|
while(bitCnt >= 8)
|
|
{
|
|
uint8_t c = (bitBuf >> 16) & 255;
|
|
stbiw__putc(s, c);
|
|
if(c == 255)
|
|
{
|
|
stbiw__putc(s, 0);
|
|
}
|
|
bitBuf <<= 8;
|
|
bitCnt -= 8;
|
|
}
|
|
*bitBufP = bitBuf;
|
|
*bitCntP = bitCnt;
|
|
}
|
|
|
|
static void stbiw__jpg_DCT(float *d0p, float *d1p, float *d2p, float *d3p, float *d4p, float *d5p, float *d6p, float *d7p)
|
|
{
|
|
float d0 = *d0p, d1 = *d1p, d2 = *d2p, d3 = *d3p, d4 = *d4p, d5 = *d5p, d6 = *d6p, d7 = *d7p;
|
|
float z1, z2, z3, z4, z5, z11, z13;
|
|
|
|
float tmp0 = d0 + d7;
|
|
float tmp7 = d0 - d7;
|
|
float tmp1 = d1 + d6;
|
|
float tmp6 = d1 - d6;
|
|
float tmp2 = d2 + d5;
|
|
float tmp5 = d2 - d5;
|
|
float tmp3 = d3 + d4;
|
|
float tmp4 = d3 - d4;
|
|
|
|
// Even part
|
|
float tmp10 = tmp0 + tmp3; // phase 2
|
|
float tmp13 = tmp0 - tmp3;
|
|
float tmp11 = tmp1 + tmp2;
|
|
float tmp12 = tmp1 - tmp2;
|
|
|
|
d0 = tmp10 + tmp11; // phase 3
|
|
d4 = tmp10 - tmp11;
|
|
|
|
z1 = (tmp12 + tmp13) * 0.707106781f; // c4
|
|
d2 = tmp13 + z1; // phase 5
|
|
d6 = tmp13 - z1;
|
|
|
|
// Odd part
|
|
tmp10 = tmp4 + tmp5; // phase 2
|
|
tmp11 = tmp5 + tmp6;
|
|
tmp12 = tmp6 + tmp7;
|
|
|
|
// The rotator is modified from fig 4-8 to avoid extra negations.
|
|
z5 = (tmp10 - tmp12) * 0.382683433f; // c6
|
|
z2 = tmp10 * 0.541196100f + z5; // c2-c6
|
|
z4 = tmp12 * 1.306562965f + z5; // c2+c6
|
|
z3 = tmp11 * 0.707106781f; // c4
|
|
|
|
z11 = tmp7 + z3; // phase 5
|
|
z13 = tmp7 - z3;
|
|
|
|
*d5p = z13 + z2; // phase 6
|
|
*d3p = z13 - z2;
|
|
*d1p = z11 + z4;
|
|
*d7p = z11 - z4;
|
|
|
|
*d0p = d0;
|
|
*d2p = d2;
|
|
*d4p = d4;
|
|
*d6p = d6;
|
|
}
|
|
|
|
static void stbiw__jpg_calcBits(int32_t val, uint16_t bits[2])
|
|
{
|
|
int32_t tmp1 = val < 0 ? -val : val;
|
|
val = val < 0 ? val - 1 : val;
|
|
bits[1] = 1;
|
|
while(tmp1 >>= 1)
|
|
{
|
|
++bits[1];
|
|
}
|
|
bits[0] = val & ((1 << bits[1]) - 1);
|
|
}
|
|
|
|
static int32_t stbiw__jpg_processDU(stbi__write_context *s, int32_t *bitBuf, int32_t *bitCnt, float *CDU, float *fdtbl, int32_t DC, const uint16_t HTDC[256][2], const uint16_t HTAC[256][2])
|
|
{
|
|
uint16_t EOB[2];
|
|
uint16_t M16zeroes[2];
|
|
int32_t dataOff, i, diff, end0pos;
|
|
int32_t DU[64];
|
|
|
|
EOB[0] = HTAC[0x00][0];
|
|
EOB[1] = HTAC[0x00][1];
|
|
M16zeroes[0] = HTAC[0xF0][0];
|
|
M16zeroes[1] = HTAC[0xF0][1];
|
|
|
|
// DCT rows
|
|
for(dataOff = 0; dataOff < 64; dataOff += 8)
|
|
{
|
|
stbiw__jpg_DCT(&CDU[dataOff], &CDU[dataOff + 1], &CDU[dataOff + 2], &CDU[dataOff + 3], &CDU[dataOff + 4], &CDU[dataOff + 5], &CDU[dataOff + 6], &CDU[dataOff + 7]);
|
|
}
|
|
// DCT columns
|
|
for(dataOff = 0; dataOff < 8; ++dataOff)
|
|
{
|
|
stbiw__jpg_DCT(&CDU[dataOff], &CDU[dataOff + 8], &CDU[dataOff + 16], &CDU[dataOff + 24], &CDU[dataOff + 32], &CDU[dataOff + 40], &CDU[dataOff + 48], &CDU[dataOff + 56]);
|
|
}
|
|
// Quantize/descale/zigzag the coefficients
|
|
for(i = 0; i < 64; ++i)
|
|
{
|
|
float v = CDU[i] * fdtbl[i];
|
|
// DU[stbiw__jpg_ZigZag[i]] = (int32_t)(v < 0 ? ceilf(v - 0.5f) : floorf(v + 0.5f));
|
|
// ceilf() and floorf() are C99, not C89, but I /think/ they're not needed here anyway?
|
|
DU[stbiw__jpg_ZigZag[i]] = (int32_t)(v < 0 ? v - 0.5f : v + 0.5f);
|
|
}
|
|
|
|
// Encode DC
|
|
diff = DU[0] - DC;
|
|
if(diff == 0)
|
|
{
|
|
stbiw__jpg_writeBits(s, bitBuf, bitCnt, HTDC[0]);
|
|
}
|
|
else
|
|
{
|
|
uint16_t bits[2];
|
|
stbiw__jpg_calcBits(diff, bits);
|
|
stbiw__jpg_writeBits(s, bitBuf, bitCnt, HTDC[bits[1]]);
|
|
stbiw__jpg_writeBits(s, bitBuf, bitCnt, bits);
|
|
}
|
|
// Encode ACs
|
|
end0pos = 63;
|
|
for(; (end0pos > 0) && (DU[end0pos] == 0); --end0pos)
|
|
{
|
|
}
|
|
// end0pos = first element in reverse order !=0
|
|
if(end0pos == 0)
|
|
{
|
|
stbiw__jpg_writeBits(s, bitBuf, bitCnt, EOB);
|
|
return DU[0];
|
|
}
|
|
for(i = 1; i <= end0pos; ++i)
|
|
{
|
|
int32_t startpos = i;
|
|
int32_t nrzeroes;
|
|
uint16_t bits[2];
|
|
for(; DU[i] == 0 && i <= end0pos; ++i)
|
|
{
|
|
}
|
|
nrzeroes = i - startpos;
|
|
if(nrzeroes >= 16)
|
|
{
|
|
int32_t lng = nrzeroes >> 4;
|
|
int32_t nrmarker;
|
|
for(nrmarker = 1; nrmarker <= lng; ++nrmarker)
|
|
stbiw__jpg_writeBits(s, bitBuf, bitCnt, M16zeroes);
|
|
nrzeroes &= 15;
|
|
}
|
|
stbiw__jpg_calcBits(DU[i], bits);
|
|
stbiw__jpg_writeBits(s, bitBuf, bitCnt, HTAC[(nrzeroes << 4) + bits[1]]);
|
|
stbiw__jpg_writeBits(s, bitBuf, bitCnt, bits);
|
|
}
|
|
if(end0pos != 63)
|
|
{
|
|
stbiw__jpg_writeBits(s, bitBuf, bitCnt, EOB);
|
|
}
|
|
return DU[0];
|
|
}
|
|
|
|
static int32_t stbi_write_jpg_core(stbi__write_context *s, int32_t width, int32_t height, int32_t comp, const void* data, int32_t quality)
|
|
{
|
|
// Constants that don't pollute global namespace
|
|
static const uint8_t std_dc_luminance_nrcodes[] = {0, 0, 1, 5, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0};
|
|
static const uint8_t std_dc_luminance_values[] = {0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11};
|
|
static const uint8_t std_ac_luminance_nrcodes[] = {0, 0, 2, 1, 3, 3, 2, 4, 3, 5, 5, 4, 4, 0, 0, 1, 0x7d};
|
|
static const uint8_t std_ac_luminance_values[] =
|
|
{
|
|
0x01, 0x02, 0x03, 0x00, 0x04, 0x11, 0x05, 0x12, 0x21, 0x31, 0x41, 0x06, 0x13, 0x51, 0x61, 0x07, 0x22, 0x71, 0x14, 0x32, 0x81, 0x91, 0xa1, 0x08,
|
|
0x23, 0x42, 0xb1, 0xc1, 0x15, 0x52, 0xd1, 0xf0, 0x24, 0x33, 0x62, 0x72, 0x82, 0x09, 0x0a, 0x16, 0x17, 0x18, 0x19, 0x1a, 0x25, 0x26, 0x27, 0x28,
|
|
0x29, 0x2a, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39, 0x3a, 0x43, 0x44, 0x45, 0x46, 0x47, 0x48, 0x49, 0x4a, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58, 0x59,
|
|
0x5a, 0x63, 0x64, 0x65, 0x66, 0x67, 0x68, 0x69, 0x6a, 0x73, 0x74, 0x75, 0x76, 0x77, 0x78, 0x79, 0x7a, 0x83, 0x84, 0x85, 0x86, 0x87, 0x88, 0x89,
|
|
0x8a, 0x92, 0x93, 0x94, 0x95, 0x96, 0x97, 0x98, 0x99, 0x9a, 0xa2, 0xa3, 0xa4, 0xa5, 0xa6, 0xa7, 0xa8, 0xa9, 0xaa, 0xb2, 0xb3, 0xb4, 0xb5, 0xb6,
|
|
0xb7, 0xb8, 0xb9, 0xba, 0xc2, 0xc3, 0xc4, 0xc5, 0xc6, 0xc7, 0xc8, 0xc9, 0xca, 0xd2, 0xd3, 0xd4, 0xd5, 0xd6, 0xd7, 0xd8, 0xd9, 0xda, 0xe1, 0xe2,
|
|
0xe3, 0xe4, 0xe5, 0xe6, 0xe7, 0xe8, 0xe9, 0xea, 0xf1, 0xf2, 0xf3, 0xf4, 0xf5, 0xf6, 0xf7, 0xf8, 0xf9, 0xfa
|
|
};
|
|
static const uint8_t std_dc_chrominance_nrcodes[] = {0, 0, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0};
|
|
static const uint8_t std_dc_chrominance_values[] = {0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11};
|
|
static const uint8_t std_ac_chrominance_nrcodes[] = {0, 0, 2, 1, 2, 4, 4, 3, 4, 7, 5, 4, 4, 0, 1, 2, 0x77};
|
|
static const uint8_t std_ac_chrominance_values[] =
|
|
{
|
|
0x00, 0x01, 0x02, 0x03, 0x11, 0x04, 0x05, 0x21, 0x31, 0x06, 0x12, 0x41, 0x51, 0x07, 0x61, 0x71, 0x13, 0x22, 0x32, 0x81, 0x08, 0x14, 0x42, 0x91,
|
|
0xa1, 0xb1, 0xc1, 0x09, 0x23, 0x33, 0x52, 0xf0, 0x15, 0x62, 0x72, 0xd1, 0x0a, 0x16, 0x24, 0x34, 0xe1, 0x25, 0xf1, 0x17, 0x18, 0x19, 0x1a, 0x26,
|
|
0x27, 0x28, 0x29, 0x2a, 0x35, 0x36, 0x37, 0x38, 0x39, 0x3a, 0x43, 0x44, 0x45, 0x46, 0x47, 0x48, 0x49, 0x4a, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58,
|
|
0x59, 0x5a, 0x63, 0x64, 0x65, 0x66, 0x67, 0x68, 0x69, 0x6a, 0x73, 0x74, 0x75, 0x76, 0x77, 0x78, 0x79, 0x7a, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87,
|
|
0x88, 0x89, 0x8a, 0x92, 0x93, 0x94, 0x95, 0x96, 0x97, 0x98, 0x99, 0x9a, 0xa2, 0xa3, 0xa4, 0xa5, 0xa6, 0xa7, 0xa8, 0xa9, 0xaa, 0xb2, 0xb3, 0xb4,
|
|
0xb5, 0xb6, 0xb7, 0xb8, 0xb9, 0xba, 0xc2, 0xc3, 0xc4, 0xc5, 0xc6, 0xc7, 0xc8, 0xc9, 0xca, 0xd2, 0xd3, 0xd4, 0xd5, 0xd6, 0xd7, 0xd8, 0xd9, 0xda,
|
|
0xe2, 0xe3, 0xe4, 0xe5, 0xe6, 0xe7, 0xe8, 0xe9, 0xea, 0xf2, 0xf3, 0xf4, 0xf5, 0xf6, 0xf7, 0xf8, 0xf9, 0xfa
|
|
};
|
|
// Huffman tables
|
|
static const uint16_t YDC_HT[256][2] = { {0, 2}, {2, 3}, {3, 3}, {4, 3}, {5, 3}, {6, 3}, {14, 4}, {30, 5}, {62, 6}, {126, 7}, {254, 8}, {510, 9}};
|
|
static const uint16_t UVDC_HT[256][2] = { {0, 2}, {1, 2}, {2, 2}, {6, 3}, {14, 4}, {30, 5}, {62, 6}, {126, 7}, {254, 8}, {510, 9}, {1022, 10}, {2046, 11}};
|
|
static const uint16_t YAC_HT[256][2] =
|
|
{
|
|
{10, 4}, {0, 2}, {1, 2}, {4, 3}, {11, 4}, {26, 5}, {120, 7}, {248, 8}, {1014, 10}, {65410, 16}, {65411, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{12, 4}, {27, 5}, {121, 7}, {502, 9}, {2038, 11}, {65412, 16}, {65413, 16}, {65414, 16}, {65415, 16}, {65416, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{28, 5}, {249, 8}, {1015, 10}, {4084, 12}, {65417, 16}, {65418, 16}, {65419, 16}, {65420, 16}, {65421, 16}, {65422, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{58, 6}, {503, 9}, {4085, 12}, {65423, 16}, {65424, 16}, {65425, 16}, {65426, 16}, {65427, 16}, {65428, 16}, {65429, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{59, 6}, {1016, 10}, {65430, 16}, {65431, 16}, {65432, 16}, {65433, 16}, {65434, 16}, {65435, 16}, {65436, 16}, {65437, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{122, 7}, {2039, 11}, {65438, 16}, {65439, 16}, {65440, 16}, {65441, 16}, {65442, 16}, {65443, 16}, {65444, 16}, {65445, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{123, 7}, {4086, 12}, {65446, 16}, {65447, 16}, {65448, 16}, {65449, 16}, {65450, 16}, {65451, 16}, {65452, 16}, {65453, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{250, 8}, {4087, 12}, {65454, 16}, {65455, 16}, {65456, 16}, {65457, 16}, {65458, 16}, {65459, 16}, {65460, 16}, {65461, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{504, 9}, {32704, 15}, {65462, 16}, {65463, 16}, {65464, 16}, {65465, 16}, {65466, 16}, {65467, 16}, {65468, 16}, {65469, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{505, 9}, {65470, 16}, {65471, 16}, {65472, 16}, {65473, 16}, {65474, 16}, {65475, 16}, {65476, 16}, {65477, 16}, {65478, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{506, 9}, {65479, 16}, {65480, 16}, {65481, 16}, {65482, 16}, {65483, 16}, {65484, 16}, {65485, 16}, {65486, 16}, {65487, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{1017, 10}, {65488, 16}, {65489, 16}, {65490, 16}, {65491, 16}, {65492, 16}, {65493, 16}, {65494, 16}, {65495, 16}, {65496, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{1018, 10}, {65497, 16}, {65498, 16}, {65499, 16}, {65500, 16}, {65501, 16}, {65502, 16}, {65503, 16}, {65504, 16}, {65505, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{2040, 11}, {65506, 16}, {65507, 16}, {65508, 16}, {65509, 16}, {65510, 16}, {65511, 16}, {65512, 16}, {65513, 16}, {65514, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{65515, 16}, {65516, 16}, {65517, 16}, {65518, 16}, {65519, 16}, {65520, 16}, {65521, 16}, {65522, 16}, {65523, 16}, {65524, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{2041, 11}, {65525, 16}, {65526, 16}, {65527, 16}, {65528, 16}, {65529, 16}, {65530, 16}, {65531, 16}, {65532, 16}, {65533, 16}, {65534, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}
|
|
};
|
|
static const uint16_t UVAC_HT[256][2] =
|
|
{
|
|
{0, 2}, {1, 2}, {4, 3}, {10, 4}, {24, 5}, {25, 5}, {56, 6}, {120, 7}, {500, 9}, {1014, 10}, {4084, 12}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{11, 4}, {57, 6}, {246, 8}, {501, 9}, {2038, 11}, {4085, 12}, {65416, 16}, {65417, 16}, {65418, 16}, {65419, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{26, 5}, {247, 8}, {1015, 10}, {4086, 12}, {32706, 15}, {65420, 16}, {65421, 16}, {65422, 16}, {65423, 16}, {65424, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{27, 5}, {248, 8}, {1016, 10}, {4087, 12}, {65425, 16}, {65426, 16}, {65427, 16}, {65428, 16}, {65429, 16}, {65430, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{58, 6}, {502, 9}, {65431, 16}, {65432, 16}, {65433, 16}, {65434, 16}, {65435, 16}, {65436, 16}, {65437, 16}, {65438, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{59, 6}, {1017, 10}, {65439, 16}, {65440, 16}, {65441, 16}, {65442, 16}, {65443, 16}, {65444, 16}, {65445, 16}, {65446, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{121, 7}, {2039, 11}, {65447, 16}, {65448, 16}, {65449, 16}, {65450, 16}, {65451, 16}, {65452, 16}, {65453, 16}, {65454, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{122, 7}, {2040, 11}, {65455, 16}, {65456, 16}, {65457, 16}, {65458, 16}, {65459, 16}, {65460, 16}, {65461, 16}, {65462, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{249, 8}, {65463, 16}, {65464, 16}, {65465, 16}, {65466, 16}, {65467, 16}, {65468, 16}, {65469, 16}, {65470, 16}, {65471, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{503, 9}, {65472, 16}, {65473, 16}, {65474, 16}, {65475, 16}, {65476, 16}, {65477, 16}, {65478, 16}, {65479, 16}, {65480, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{504, 9}, {65481, 16}, {65482, 16}, {65483, 16}, {65484, 16}, {65485, 16}, {65486, 16}, {65487, 16}, {65488, 16}, {65489, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{505, 9}, {65490, 16}, {65491, 16}, {65492, 16}, {65493, 16}, {65494, 16}, {65495, 16}, {65496, 16}, {65497, 16}, {65498, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{506, 9}, {65499, 16}, {65500, 16}, {65501, 16}, {65502, 16}, {65503, 16}, {65504, 16}, {65505, 16}, {65506, 16}, {65507, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{2041, 11}, {65508, 16}, {65509, 16}, {65510, 16}, {65511, 16}, {65512, 16}, {65513, 16}, {65514, 16}, {65515, 16}, {65516, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{16352, 14}, {65517, 16}, {65518, 16}, {65519, 16}, {65520, 16}, {65521, 16}, {65522, 16}, {65523, 16}, {65524, 16}, {65525, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0},
|
|
{1018, 10}, {32707, 15}, {65526, 16}, {65527, 16}, {65528, 16}, {65529, 16}, {65530, 16}, {65531, 16}, {65532, 16}, {65533, 16}, {65534, 16}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}
|
|
};
|
|
static const int32_t YQT[] = {16, 11, 10, 16, 24, 40, 51, 61, 12, 12, 14, 19, 26, 58, 60, 55, 14, 13, 16, 24, 40, 57, 69, 56, 14, 17, 22, 29, 51, 87, 80, 62, 18, 22,
|
|
37, 56, 68, 109, 103, 77, 24, 35, 55, 64, 81, 104, 113, 92, 49, 64, 78, 87, 103, 121, 120, 101, 72, 92, 95, 98, 112, 100, 103, 99
|
|
};
|
|
static const int32_t UVQT[] = {17, 18, 24, 47, 99, 99, 99, 99, 18, 21, 26, 66, 99, 99, 99, 99, 24, 26, 56, 99, 99, 99, 99, 99, 47, 66, 99, 99, 99, 99, 99, 99,
|
|
99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99
|
|
};
|
|
static const float aasf[] = { 1.0f * 2.828427125f, 1.387039845f * 2.828427125f, 1.306562965f * 2.828427125f, 1.175875602f * 2.828427125f,
|
|
1.0f * 2.828427125f, 0.785694958f * 2.828427125f, 0.541196100f * 2.828427125f, 0.275899379f * 2.828427125f
|
|
};
|
|
|
|
int32_t row, col, i, k;
|
|
float fdtbl_Y[64], fdtbl_UV[64];
|
|
uint8_t YTable[64], UVTable[64];
|
|
|
|
if(!data || !width || !height || comp > 4 || comp < 1)
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
quality = quality ? quality : 90;
|
|
quality = quality < 1 ? 1 : quality > 100 ? 100 : quality;
|
|
quality = quality < 50 ? 5000 / quality : 200 - quality * 2;
|
|
|
|
for(i = 0; i < 64; ++i)
|
|
{
|
|
int32_t uvti, yti = (YQT[i] * quality + 50) / 100;
|
|
YTable[stbiw__jpg_ZigZag[i]] = (uint8_t)(yti < 1 ? 1 : yti > 255 ? 255 : yti);
|
|
uvti = (UVQT[i] * quality + 50) / 100;
|
|
UVTable[stbiw__jpg_ZigZag[i]] = (uint8_t)(uvti < 1 ? 1 : uvti > 255 ? 255 : uvti);
|
|
}
|
|
|
|
for(row = 0, k = 0; row < 8; ++row)
|
|
{
|
|
for(col = 0; col < 8; ++col, ++k)
|
|
{
|
|
fdtbl_Y[k] = 1 / (YTable [stbiw__jpg_ZigZag[k]] * aasf[row] * aasf[col]);
|
|
fdtbl_UV[k] = 1 / (UVTable[stbiw__jpg_ZigZag[k]] * aasf[row] * aasf[col]);
|
|
}
|
|
}
|
|
|
|
// Write Headers
|
|
{
|
|
static const uint8_t head0[] = { 0xFF, 0xD8, 0xFF, 0xE0, 0, 0x10, 'J', 'F', 'I', 'F', 0, 1, 1, 0, 0, 1, 0, 1, 0, 0, 0xFF, 0xDB, 0, 0x84, 0 };
|
|
static const uint8_t head2[] = { 0xFF, 0xDA, 0, 0xC, 3, 1, 0, 2, 0x11, 3, 0x11, 0, 0x3F, 0 };
|
|
uint8_t head1[] = { 0xFF, 0xC0, 0, 0x11, 8, /*[5]*/0,/*[6]*/0,/*[7]*/0,/*[8]*/0,
|
|
3, 1, 0x11, 0, 2, 0x11, 1, 3, 0x11, 1, 0xFF, 0xC4, 0x01, 0xA2, 0
|
|
};
|
|
head1[5] = (uint8_t)(height >> 8);
|
|
head1[6] = STBIW_UCHAR(height);
|
|
head1[7] = (uint8_t)(width >> 8);
|
|
head1[8] = STBIW_UCHAR(width);
|
|
s->func(s->context, (void*)head0, sizeof(head0));
|
|
s->func(s->context, (void*)YTable, sizeof(YTable));
|
|
stbiw__putc(s, 1);
|
|
s->func(s->context, UVTable, sizeof(UVTable));
|
|
s->func(s->context, (void*)head1, sizeof(head1));
|
|
s->func(s->context, (void*)(std_dc_luminance_nrcodes + 1), sizeof(std_dc_luminance_nrcodes) - 1);
|
|
s->func(s->context, (void*)std_dc_luminance_values, sizeof(std_dc_luminance_values));
|
|
stbiw__putc(s, 0x10); // HTYACinfo
|
|
s->func(s->context, (void*)(std_ac_luminance_nrcodes + 1), sizeof(std_ac_luminance_nrcodes) - 1);
|
|
s->func(s->context, (void*)std_ac_luminance_values, sizeof(std_ac_luminance_values));
|
|
stbiw__putc(s, 1); // HTUDCinfo
|
|
s->func(s->context, (void*)(std_dc_chrominance_nrcodes + 1), sizeof(std_dc_chrominance_nrcodes) - 1);
|
|
s->func(s->context, (void*)std_dc_chrominance_values, sizeof(std_dc_chrominance_values));
|
|
stbiw__putc(s, 0x11); // HTUACinfo
|
|
s->func(s->context, (void*)(std_ac_chrominance_nrcodes + 1), sizeof(std_ac_chrominance_nrcodes) - 1);
|
|
s->func(s->context, (void*)std_ac_chrominance_values, sizeof(std_ac_chrominance_values));
|
|
s->func(s->context, (void*)head2, sizeof(head2));
|
|
}
|
|
|
|
// Encode 8x8 macroblocks
|
|
{
|
|
static const uint16_t fillBits[] = {0x7F, 7};
|
|
const uint8_t *imageData = (const uint8_t *)data;
|
|
int32_t DCY = 0, DCU = 0, DCV = 0;
|
|
int32_t bitBuf = 0, bitCnt = 0;
|
|
// comp == 2 is grey+alpha (alpha is ignored)
|
|
int32_t ofsG = comp > 2 ? 1 : 0, ofsB = comp > 2 ? 2 : 0;
|
|
int32_t x, y, pos;
|
|
for(y = 0; y < height; y += 8)
|
|
{
|
|
for(x = 0; x < width; x += 8)
|
|
{
|
|
float YDU[64], UDU[64], VDU[64];
|
|
for(row = y, pos = 0; row < y + 8; ++row)
|
|
{
|
|
for(col = x; col < x + 8; ++col, ++pos)
|
|
{
|
|
int32_t p = row * width * comp + col * comp;
|
|
float r, g, b;
|
|
if(row >= height)
|
|
{
|
|
p -= width * comp * (row + 1 - height);
|
|
}
|
|
if(col >= width)
|
|
{
|
|
p -= comp * (col + 1 - width);
|
|
}
|
|
|
|
r = imageData[p + 0];
|
|
g = imageData[p + ofsG];
|
|
b = imageData[p + ofsB];
|
|
YDU[pos] = +0.29900f * r + 0.58700f * g + 0.11400f * b - 128;
|
|
UDU[pos] = -0.16874f * r - 0.33126f * g + 0.50000f * b;
|
|
VDU[pos] = +0.50000f * r - 0.41869f * g - 0.08131f * b;
|
|
}
|
|
}
|
|
|
|
DCY = stbiw__jpg_processDU(s, &bitBuf, &bitCnt, YDU, fdtbl_Y, DCY, YDC_HT, YAC_HT);
|
|
DCU = stbiw__jpg_processDU(s, &bitBuf, &bitCnt, UDU, fdtbl_UV, DCU, UVDC_HT, UVAC_HT);
|
|
DCV = stbiw__jpg_processDU(s, &bitBuf, &bitCnt, VDU, fdtbl_UV, DCV, UVDC_HT, UVAC_HT);
|
|
}
|
|
}
|
|
|
|
// Do the bit alignment of the EOI marker
|
|
stbiw__jpg_writeBits(s, &bitBuf, &bitCnt, fillBits);
|
|
}
|
|
|
|
// EOI
|
|
stbiw__putc(s, 0xFF);
|
|
stbiw__putc(s, 0xD9);
|
|
|
|
return 1;
|
|
}
|
|
|
|
#if !defined(STBI_WRITE_NO_STDIO)
|
|
STBIWDEF int32_t stbi_write_jpg(char const *filename, int32_t x, int32_t y, int32_t comp, const void *data, int32_t quality)
|
|
{
|
|
stbi__write_context s;
|
|
if(stbi__start_write_file(&s, filename))
|
|
{
|
|
int32_t r = stbi_write_jpg_core(&s, x, y, comp, data, quality);
|
|
stbi__end_write_file(&s);
|
|
return r;
|
|
}
|
|
else
|
|
return 0;
|
|
}
|
|
#endif
|
|
|
|
#endif // STB_IMAGE_WRITE_IMPLEMENTATION
|
|
|
|
/* Revision history
|
|
1.07 (2017-07-24)
|
|
doc fix
|
|
1.06 (2017-07-23)
|
|
writing JPEG (using Jon Olick's code)
|
|
1.05 ???
|
|
1.04 (2017-03-03)
|
|
monochrome BMP expansion
|
|
1.03 ???
|
|
1.02 (2016-04-02)
|
|
avoid allocating large structures on the stack
|
|
1.01 (2016-01-16)
|
|
STBIW_REALLOC_SIZED: support allocators with no realloc support
|
|
avoid race-condition in crc initialization
|
|
minor compile issues
|
|
1.00 (2015-09-14)
|
|
installable file IO function
|
|
0.99 (2015-09-13)
|
|
warning fixes; TGA rle support
|
|
0.98 (2015-04-08)
|
|
added STBIW_MALLOC, STBIW_ASSERT etc
|
|
0.97 (2015-01-18)
|
|
fixed HDR asserts, rewrote HDR rle logic
|
|
0.96 (2015-01-17)
|
|
add HDR output
|
|
fix monochrome BMP
|
|
0.95 (2014-08-17)
|
|
add monochrome TGA output
|
|
0.94 (2014-05-31)
|
|
rename private functions to avoid conflicts with stb_image.h
|
|
0.93 (2014-05-27)
|
|
warning fixes
|
|
0.92 (2010-08-01)
|
|
casts to uint8_t to fix warnings
|
|
0.91 (2010-07-17)
|
|
first public release
|
|
0.90 first internal release
|
|
*/
|
|
|
|
/*
|
|
------------------------------------------------------------------------------
|
|
This software is available under 2 licenses -- choose whichever you prefer.
|
|
------------------------------------------------------------------------------
|
|
ALTERNATIVE A - MIT License
|
|
Copyright (c) 2017 Sean Barrett
|
|
Permission is hereby granted, free of charge, to any person obtaining a copy of
|
|
this software and associated documentation files (the "Software"), to deal in
|
|
the Software without restriction, including without limitation the rights to
|
|
use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies
|
|
of the Software, and to permit persons to whom the Software is furnished to do
|
|
so, subject to the following conditions:
|
|
The above copyright notice and this permission notice shall be included in all
|
|
copies or substantial portions of the Software.
|
|
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
|
AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
|
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
|
OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
|
|
SOFTWARE.
|
|
------------------------------------------------------------------------------
|
|
ALTERNATIVE B - Public Domain (www.unlicense.org)
|
|
This is free and unencumbered software released into the public domain.
|
|
Anyone is free to copy, modify, publish, use, compile, sell, or distribute this
|
|
software, either in source code form or as a compiled binary, for any purpose,
|
|
commercial or non-commercial, and by any means.
|
|
In jurisdictions that recognize copyright laws, the author or authors of this
|
|
software dedicate any and all copyright interest in the software to the public
|
|
domain. We make this dedication for the benefit of the public at large and to
|
|
the detriment of our heirs and successors. We intend this dedication to be an
|
|
overt act of relinquishment in perpetuity of all present and future rights to
|
|
this software under copyright law.
|
|
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
|
AUTHORS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
|
|
ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
|
|
WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
|
|
------------------------------------------------------------------------------
|
|
*/
|