Files
FC1/RenderDll/Common/Textures/Image/JpgImage.cpp
romkazvo 34d6c5d489 123
2023-08-07 19:29:24 +08:00

430 lines
11 KiB
C++

/*=============================================================================
JpgImage.cpp : JPG image file format implementation.
Copyright (c) 2001 Crytek Studios. All Rights Reserved.
Revision history:
* Created by Khonich Andrey
=============================================================================*/
#include "RenderPCH.h"
#include "CImage.h"
#include "JpgImage.h"
#if !defined(WIN64) && !defined(LINUX)
#if defined(PS2)
#include "jpeglib.h"
#include "PS2GDriver.h"
#else
extern "C" {
#include "ijl.h"
}
#endif
/* ==== Constructor ==== */
CImageJpgFile::~CImageJpgFile () {
/* do nothing */
}
CImageJpgFile::CImageJpgFile (byte* ptr, long filesize) : CImageFile ()
{
#ifdef PS2
struct jpeg_decompress_struct cinfo;
u_char *pImage=NULL;
pImage=(u_char *)PS2GDRV_LoadJpegImage(mCurFileName, cinfo);
if(pImage)
{
m_eFormat = eIF_Jpg;
mfSet_bps(32);
mfSet_dimensions (cinfo.image_width,cinfo.image_height);
mfSet_ImageSize(m_Width * m_Height * 4);
SRGBPixel *pixels = mfGet_image ();
u_char *pix=pImage;
for(int j=0; j<cinfo.image_height; j++)
{
for(int i=0; i<cinfo.image_width; i++)
{
pixels[0].red=*pix++;
pixels[0].green=*pix++;
pixels[0].blue=*pix++;
pixels[0].alpha=255;
pixels++;
}
}
delete [] pImage;
}
else
{
mfSet_error (eIFE_BadFormat,"Cannot read JPEG file header");
return;
}
#else
JPEG_CORE_PROPERTIES image;
ZeroStruct( image );
SRGBPixel *pixels;
m_eFormat = eIF_Jpg;
if( ijlInit( &image ) != IJL_OK )
{
mfSet_error (eIFE_BadFormat,"Cannot initialize Intel JPEG library");
return;
}
image.JPGBytes = ptr;
image.JPGSizeBytes = filesize;
if( ijlRead( &image, IJL_JBUFF_READPARAMS ) != IJL_OK )
{
mfSet_error (eIFE_BadFormat,"Cannot read JPEG file header");
return;
}
// Set the JPG color space ... this will always be
// somewhat of an educated guess at best because JPEG
// is "color blind" (i.e., nothing in the bit stream
// tells you what color space the data was encoded from).
// However, in this example we assume that we are
// reading JFIF files which means that 3 channel images
// are in the YCbCr color space and 1 channel images are
// in the Y color space.
switch(image.JPGChannels)
{
case 1:
image.JPGColor = IJL_G;
image.DIBChannels = 3;
image.DIBColor = IJL_RGB;
mfSet_bps(24);
break;
case 3:
image.JPGColor = IJL_YCBCR;
image.DIBChannels = 3;
image.DIBColor = IJL_RGB;
mfSet_bps(24);
break;
case 4:
image.JPGColor = IJL_YCBCRA_FPX;
image.DIBChannels = 4;
image.DIBColor = IJL_RGBA_FPX;
mfSet_bps(32);
break;
default:
// This catches everything else, but no
// color twist will be performed by the IJL.
image.DIBColor = (IJL_COLOR)IJL_OTHER;
image.JPGColor = (IJL_COLOR)IJL_OTHER;
image.DIBChannels = image.JPGChannels;
break;
}
image.DIBWidth = image.JPGWidth;
image.DIBHeight = image.JPGHeight;
image.DIBPadBytes = IJL_DIB_PAD_BYTES(image.DIBWidth,image.DIBChannels);
mfSet_dimensions (image.DIBWidth, image.DIBHeight);
mfSet_ImageSize(m_Width * m_Height * 4);
pixels = (SRGBPixel *)mfGet_image ();
int imageSize = (image.DIBWidth * image.DIBChannels + image.DIBPadBytes) * image.DIBHeight;
byte *imageData = new BYTE[ imageSize ];
if( imageData == NULL )
{
mfSet_error (eIFE_OutOfMemory,"Cannot allocate memory for image");
ijlFree( &image );
return;
}
image.DIBBytes = imageData;
if( ijlRead( &image, IJL_JBUFF_READWHOLEIMAGE ) != IJL_OK )
{
mfSet_error (eIFE_IOerror,"Cannot read image data");
ijlFree( &image );
return;
}
if( ijlFree( &image ) != IJL_OK )
{
mfSet_error (eIFE_IOerror,"Cannot free Intel(R) JPEG library");
return;
}
byte *src = imageData;
int width = image.DIBWidth;
int height = image.DIBHeight;
int pad = IJL_DIB_PAD_BYTES(width,4);
if (image.DIBColor == IJL_RGBA_FPX)
{
int line_width = image.DIBWidth * 4 + pad;
for(int i=0; i<height; i++)
{
src = imageData + line_width*i;
for(int j=0; j<width; j++)
{
pixels->red = src[0];
pixels->green = src[1];
pixels->blue = src[2];
pixels->alpha = src[3];
pixels++;
src += 4;
}
}
}
else
{
SRGBPixel *pix = pixels;
int line_width = image.DIBWidth * 3 + pad;
for(int i=0; i<height; i++)
{
src = imageData + line_width*i;
for(int j=0; j<width; j++)
{
pixels->red = src[0];
pixels->green = src[1];
pixels->blue = src[2];
pixels->alpha = 255;
pixels++;
src += 3;
}
}
}
delete [] imageData;
/* And we're done! */
#endif //PS2
}
#endif // WIN64
#ifdef WIN64
extern "C"
{
#include "Jpeg6/Jpeglib.h"
#include "Jmemsrc.c" // include buffer source input code
}
#include <setjmp.h>
/* ==== Error mgmnt ==== */
static char jpg_err_msg[256];
struct my_error_mgr {
struct jpeg_error_mgr pub; /* "public" fields */
jmp_buf setjmp_buffer; /* for return to caller */
};
typedef struct my_error_mgr *my_error_ptr;
static void my_error_exit (j_common_ptr cinfo)
{
char errmsg [256];
/* cinfo->err really points to a my_error_mgr struct, so coerce pointer */
my_error_ptr myerr = (my_error_ptr) cinfo->err;
/* Always display the message. */
/* We could postpone this until after returning, if we chose. */
(*cinfo->err->format_message) (cinfo,errmsg);
strcpy (jpg_err_msg,errmsg);
/* Return control to the setjmp point */
longjmp(myerr->setjmp_buffer, 1);
}
/* ==== Constructor ==== */
CImageJpgFile::~CImageJpgFile () {
/* do nothing */
}
CImageJpgFile::CImageJpgFile (byte* ptr, long filesize) : CImageFile () {
struct jpeg_decompress_struct cinfo;
struct my_error_mgr jerr;
JSAMPARRAY buffer; /* Output row buffer */
int row_stride; /* physical row width in output buffer */
int bufp;
int i;
SRGBPixel *pixels;
m_eFormat = eIF_Jpg;
/* ==== Step 1: allocate and initialize JPEG decompression object */
/* We set up the normal JPEG error routines, then override error_exit. */
cinfo.err = my_jpeg_std_error(&jerr.pub);
jerr.pub.error_exit = my_error_exit;
if (setjmp(jerr.setjmp_buffer)) {
my_jpeg_destroy_decompress(&cinfo);
mfSet_error (eIFE_BadFormat,jpg_err_msg);
return;
}
/* Now we can initialize the JPEG decompression object. */
my_jpeg_create_decompress(&cinfo);
/* ==== Step 2: specify data source (memory buffer, in this case) */
my_jpeg_memory_src(&cinfo, (char *)ptr, filesize);
/* ==== Step 3: read file parameters with jpeg_read_header() */
(void) my_jpeg_read_header(&cinfo, TRUE);
/* ==== Step 4: set parameters for decompression */
/* In this example, we don't need to change any of the defaults set by
* jpeg_read_header(), so we do nothing here.
*/
/* ==== Step 5: Start decompressor */
(void) my_jpeg_start_decompress(&cinfo);
/* We may need to do some setup of our own at this point before reading
* the data. After jpeg_start_decompress() we have the correct scaled
* output image dimensions available, as well as the output colormap
* if we asked for color quantization.
* In this example, we need to make an output work buffer of the right size.
*/
mfSet_dimensions (cinfo.output_width, cinfo.output_height);
mfSet_ImageSize(cinfo.output_width * cinfo.output_height * 4);
pixels = (SRGBPixel *)mfGet_image();
bufp = 0;
/* JSAMPLEs per row in output buffer */
row_stride = cinfo.output_width * cinfo.output_components;
/* Make a one-row-high sample array that will go away when done with image */
buffer = (*cinfo.mem->alloc_sarray)
((j_common_ptr) &cinfo, JPOOL_IMAGE, row_stride, 1);
/* ==== Step 6: while (scan lines remain to be read) */
/* jpeg_read_scanlines(...); */
/* Here we use the library's state variable cinfo.output_scanline as the
* loop counter, so that we don't have to keep track ourselves.
*/
while (cinfo.output_scanline < cinfo.output_height) {
/* jpeg_read_scanlines expects an array of pointers to scanlines.
* Here the array is only one element long, but you could ask for
* more than one scanline at a time if that's more convenient.
*/
(void) my_jpeg_read_scanlines(&cinfo, buffer, 1);
/* Assume put_scanline_someplace wants a pointer and sample count. */
/* put_scanline_someplace(buffer[0], row_stride); */
if (cinfo.output_components == 1)
{ /* grey scale */
for (i=0;i<row_stride;i++)
{
pixels[bufp].red = buffer[0][i];
pixels[bufp].green = buffer[0][i];
pixels[bufp].blue = buffer[0][i];
pixels[bufp].alpha = 255;
bufp ++;
}
}
else
if (cinfo.output_components == 3)
{ /* rgb triplets */
for (i = 0; i < (int)cinfo.output_width; i++)
{
pixels[bufp].red = buffer[0][i*3+0];
pixels[bufp].green = buffer[0][i*3+1];
pixels[bufp].blue = buffer[0][i*3+2];
pixels[bufp].alpha = 255;
bufp ++;
}
}
else
{
for (i = 0; i < (int)cinfo.output_width; i++)
{
pixels[bufp].red = buffer[0][i*4+0];
pixels[bufp].green = buffer[0][i*4+1];
pixels[bufp].blue = buffer[0][i*4+2];
pixels[bufp].alpha = 255;
bufp ++;
}
}
}
/* ==== Step 7: Finish decompression */
(void) my_jpeg_finish_decompress(&cinfo);
/* We can ignore the return value since suspension is not possible
* with the buffer data source.
*/
/* ==== Step 8: Release JPEG decompression object */
/* This is an important step since it will release a good deal of memory. */
my_jpeg_destroy_decompress(&cinfo);
/* At this point you may want to check to see whether any corrupt-data
* warnings occurred (test whether jerr.pub.num_warnings is nonzero).
*/
/* And we're done! */
}
#endif //WIN64
void WriteJPG(byte *dat, int wdt, int hgt, char *name)
{
#if !defined(PS2) && !defined(WIN64) && !defined(NULL_RENDERER)
JPEG_CORE_PROPERTIES image;
ZeroMemory( &image, sizeof( JPEG_CORE_PROPERTIES ) );
if( ijlInit( &image ) != IJL_OK )
return;
byte *data = new byte [wdt*hgt*3];
for (int i=0; i<wdt*hgt; i++)
{
data[i*3+0] = dat[i*4+0];
data[i*3+1] = dat[i*4+1];
data[i*3+2] = dat[i*4+2];
}
// Setup DIB
image.DIBWidth = wdt;
image.DIBHeight = hgt;
image.DIBBytes = data;
image.DIBPadBytes = 0; //IJL_DIB_PAD_BYTES(image.DIBWidth,3);
// Setup JPEG
image.JPGFile = name;
image.JPGWidth = wdt;
image.JPGHeight = hgt;
image.jquality = 100;
image.DIBColor = IJL_RGB;
if( ijlWrite( &image, IJL_JFILE_WRITEWHOLEIMAGE ) != IJL_OK )
{
delete [] data;
return;
}
if( ijlFree( &image ) != IJL_OK )
{
delete [] data;
return;
}
delete [] data;
#else
OutputDebugString("Not Implemented");
#endif //!defined(PS2) && !defined(WIN64)
}