diff options
Diffstat (limited to 'src/3rdparty/jasper/src/libjasper/jpg/jpg_enc.c')
-rw-r--r-- | src/3rdparty/jasper/src/libjasper/jpg/jpg_enc.c | 414 |
1 files changed, 414 insertions, 0 deletions
diff --git a/src/3rdparty/jasper/src/libjasper/jpg/jpg_enc.c b/src/3rdparty/jasper/src/libjasper/jpg/jpg_enc.c new file mode 100644 index 0000000..5663076 --- /dev/null +++ b/src/3rdparty/jasper/src/libjasper/jpg/jpg_enc.c @@ -0,0 +1,414 @@ +/* + * Copyright (c) 2001-2003 Michael David Adams. + * All rights reserved. + */ + +/* __START_OF_JASPER_LICENSE__ + * + * JasPer License Version 2.0 + * + * Copyright (c) 2001-2006 Michael David Adams + * Copyright (c) 1999-2000 Image Power, Inc. + * Copyright (c) 1999-2000 The University of British Columbia + * + * All rights reserved. + * + * Permission is hereby granted, free of charge, to any person (the + * "User") 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, 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: + * + * 1. The above copyright notices and this permission notice (which + * includes the disclaimer below) shall be included in all copies or + * substantial portions of the Software. + * + * 2. The name of a copyright holder shall not be used to endorse or + * promote products derived from the Software without specific prior + * written permission. + * + * THIS DISCLAIMER OF WARRANTY CONSTITUTES AN ESSENTIAL PART OF THIS + * LICENSE. NO USE OF THE SOFTWARE IS AUTHORIZED HEREUNDER EXCEPT UNDER + * THIS DISCLAIMER. THE SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS + * "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 OF THIRD PARTY RIGHTS. IN NO + * EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, OR ANY SPECIAL + * INDIRECT OR CONSEQUENTIAL DAMAGES, OR ANY DAMAGES WHATSOEVER RESULTING + * FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, + * NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION + * WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. NO ASSURANCES ARE + * PROVIDED BY THE COPYRIGHT HOLDERS THAT THE SOFTWARE DOES NOT INFRINGE + * THE PATENT OR OTHER INTELLECTUAL PROPERTY RIGHTS OF ANY OTHER ENTITY. + * EACH COPYRIGHT HOLDER DISCLAIMS ANY LIABILITY TO THE USER FOR CLAIMS + * BROUGHT BY ANY OTHER ENTITY BASED ON INFRINGEMENT OF INTELLECTUAL + * PROPERTY RIGHTS OR OTHERWISE. AS A CONDITION TO EXERCISING THE RIGHTS + * GRANTED HEREUNDER, EACH USER HEREBY ASSUMES SOLE RESPONSIBILITY TO SECURE + * ANY OTHER INTELLECTUAL PROPERTY RIGHTS NEEDED, IF ANY. THE SOFTWARE + * IS NOT FAULT-TOLERANT AND IS NOT INTENDED FOR USE IN MISSION-CRITICAL + * SYSTEMS, SUCH AS THOSE USED IN THE OPERATION OF NUCLEAR FACILITIES, + * AIRCRAFT NAVIGATION OR COMMUNICATION SYSTEMS, AIR TRAFFIC CONTROL + * SYSTEMS, DIRECT LIFE SUPPORT MACHINES, OR WEAPONS SYSTEMS, IN WHICH + * THE FAILURE OF THE SOFTWARE OR SYSTEM COULD LEAD DIRECTLY TO DEATH, + * PERSONAL INJURY, OR SEVERE PHYSICAL OR ENVIRONMENTAL DAMAGE ("HIGH + * RISK ACTIVITIES"). THE COPYRIGHT HOLDERS SPECIFICALLY DISCLAIM ANY + * EXPRESS OR IMPLIED WARRANTY OF FITNESS FOR HIGH RISK ACTIVITIES. + * + * __END_OF_JASPER_LICENSE__ + */ + +/******************************************************************************\ +* Includes. +\******************************************************************************/ + +#include <assert.h> +#include "jasper/jas_types.h" + +#include "jasper/jas_tvp.h" +#include "jasper/jas_stream.h" +#include "jasper/jas_image.h" +#include "jasper/jas_string.h" +#include "jasper/jas_debug.h" + +#include "jpg_jpeglib.h" +#include "jpg_cod.h" +#include "jpg_enc.h" + +/******************************************************************************\ +* Types. +\******************************************************************************/ + +typedef struct jpg_src_s { + + /* Output buffer. */ + JSAMPARRAY buffer; + + /* Height of output buffer. */ + JDIMENSION buffer_height; + + /* The current row. */ + JDIMENSION row; + + /* The image used to hold the decompressed sample data. */ + jas_image_t *image; + + /* The row buffer. */ + jas_matrix_t *data; + + /* The error indicator. If this is nonzero, something has gone wrong + during decompression. */ + int error; + + jpg_enc_t *enc; + +} jpg_src_t; + +typedef struct { + int qual; +} jpg_encopts_t; + +typedef enum { + OPT_QUAL +} jpg_optid_t; + +jas_taginfo_t jpg_opttab[] = { + {OPT_QUAL, "quality"}, + {-1, 0} +}; + +/******************************************************************************\ +* Local prototypes. +\******************************************************************************/ + +static int jpg_copyfiletostream(jas_stream_t *out, FILE *in); +static void jpg_start_input(j_compress_ptr cinfo, struct jpg_src_s *sinfo); +static JDIMENSION jpg_get_pixel_rows(j_compress_ptr cinfo, struct jpg_src_s *sinfo); +static void jpg_finish_input(j_compress_ptr cinfo, struct jpg_src_s *sinfo); +static J_COLOR_SPACE tojpgcs(int colorspace); +static int jpg_parseencopts(char *optstr, jpg_encopts_t *encopts); + +/******************************************************************************\ +* +\******************************************************************************/ + +static int jpg_copyfiletostream(jas_stream_t *out, FILE *in) +{ + int c; + while ((c = fgetc(in)) != EOF) { + if (jas_stream_putc(out, c) == EOF) { + return -1; + } + } + return 0; +} + +static void jpg_start_input(j_compress_ptr cinfo, struct jpg_src_s *sinfo) +{ + /* Avoid compiler warnings about unused parameters. */ + cinfo = 0; + + sinfo->row = 0; +} + +static JDIMENSION jpg_get_pixel_rows(j_compress_ptr cinfo, struct jpg_src_s *sinfo) +{ + JSAMPLE *bufptr; + int i; + int cmptno; + int width; + int *cmpts; + + cmpts = sinfo->enc->cmpts; + + width = jas_image_width(sinfo->image); + + if (sinfo->error) { + return 0; + } + for (cmptno = 0; cmptno < cinfo->input_components; ++cmptno) { + if (jas_image_readcmpt(sinfo->image, cmpts[cmptno], 0, sinfo->row, width, 1, sinfo->data)) { + ; + } + bufptr = (sinfo->buffer[0]) + cmptno; + for (i = 0; i < width; ++i) { + *bufptr = jas_matrix_get(sinfo->data, 0, i); + bufptr += cinfo->input_components; + } + } + ++sinfo->row; + return 1; +} + +static void jpg_finish_input(j_compress_ptr cinfo, struct jpg_src_s *sinfo) +{ + /* Avoid compiler warnings about unused parameters. */ + cinfo = 0; + sinfo = 0; +} + +/******************************************************************************\ +* Code for save operation. +\******************************************************************************/ + +/* Save an image to a stream in the the JPG format. */ + +int jpg_encode(jas_image_t *image, jas_stream_t *out, char *optstr) +{ + JDIMENSION numscanlines; + struct jpeg_compress_struct cinfo; + struct jpeg_error_mgr jerr; + jas_image_coord_t width; + jas_image_coord_t height; + jpg_src_t src_mgr_buf; + jpg_src_t *src_mgr = &src_mgr_buf; + FILE *output_file; + int cmptno; + jpg_enc_t encbuf; + jpg_enc_t *enc = &encbuf; + jpg_encopts_t encopts; + + output_file = 0; + + if (jpg_parseencopts(optstr, &encopts)) + goto error; + + switch (jas_clrspc_fam(jas_image_clrspc(image))) { + case JAS_CLRSPC_FAM_RGB: + if (jas_image_clrspc(image) != JAS_CLRSPC_SRGB) + jas_eprintf("warning: inaccurate color\n"); + enc->numcmpts = 3; + if ((enc->cmpts[0] = jas_image_getcmptbytype(image, + JAS_IMAGE_CT_COLOR(JAS_CLRSPC_CHANIND_RGB_R))) < 0 || + (enc->cmpts[1] = jas_image_getcmptbytype(image, + JAS_IMAGE_CT_COLOR(JAS_CLRSPC_CHANIND_RGB_G))) < 0 || + (enc->cmpts[2] = jas_image_getcmptbytype(image, + JAS_IMAGE_CT_COLOR(JAS_CLRSPC_CHANIND_RGB_B))) < 0) { + jas_eprintf("error: missing color component\n"); + goto error; + } + break; + case JAS_CLRSPC_FAM_YCBCR: + if (jas_image_clrspc(image) != JAS_CLRSPC_SYCBCR) + jas_eprintf("warning: inaccurate color\n"); + enc->numcmpts = 3; + if ((enc->cmpts[0] = jas_image_getcmptbytype(image, + JAS_IMAGE_CT_COLOR(JAS_CLRSPC_CHANIND_YCBCR_Y))) < 0 || + (enc->cmpts[1] = jas_image_getcmptbytype(image, + JAS_IMAGE_CT_COLOR(JAS_CLRSPC_CHANIND_YCBCR_CB))) < 0 || + (enc->cmpts[2] = jas_image_getcmptbytype(image, + JAS_IMAGE_CT_COLOR(JAS_CLRSPC_CHANIND_YCBCR_CR))) < 0) { + jas_eprintf("error: missing color component\n"); + goto error; + } + break; + case JAS_CLRSPC_FAM_GRAY: + if (jas_image_clrspc(image) != JAS_CLRSPC_SGRAY) + jas_eprintf("warning: inaccurate color\n"); + enc->numcmpts = 1; + if ((enc->cmpts[0] = jas_image_getcmptbytype(image, + JAS_IMAGE_CT_COLOR(JAS_CLRSPC_CHANIND_GRAY_Y))) < 0) { + jas_eprintf("error: missing color component\n"); + goto error; + } + break; + default: + jas_eprintf("error: JPG format does not support color space\n"); + goto error; + break; + } + + width = jas_image_width(image); + height = jas_image_height(image); + + for (cmptno = 0; cmptno < enc->numcmpts; ++cmptno) { + if (jas_image_cmptwidth(image, enc->cmpts[cmptno]) != width || + jas_image_cmptheight(image, enc->cmpts[cmptno]) != height || + jas_image_cmpttlx(image, enc->cmpts[cmptno]) != 0 || + jas_image_cmpttly(image, enc->cmpts[cmptno]) != 0 || + jas_image_cmpthstep(image, enc->cmpts[cmptno]) != 1 || + jas_image_cmptvstep(image, enc->cmpts[cmptno]) != 1 || + jas_image_cmptprec(image, enc->cmpts[cmptno]) != 8 || + jas_image_cmptsgnd(image, enc->cmpts[cmptno]) != false) { + jas_eprintf("error: The JPG encoder cannot handle an image with this geometry.\n"); + goto error; + } + } + + if (!(output_file = tmpfile())) { + goto error; + } + + /* Create a JPEG compression object. */ + cinfo.err = jpeg_std_error(&jerr); + jpeg_create_compress(&cinfo); + + /* Specify data destination for compression */ + jpeg_stdio_dest(&cinfo, output_file); + + cinfo.in_color_space = tojpgcs(jas_image_clrspc(image)); + cinfo.image_width = width; + cinfo.image_height = height; + cinfo.input_components = enc->numcmpts; + jpeg_set_defaults(&cinfo); + + src_mgr->error = 0; + src_mgr->image = image; + src_mgr->data = jas_matrix_create(1, width); + assert(src_mgr->data); + src_mgr->buffer = (*cinfo.mem->alloc_sarray)((j_common_ptr) &cinfo, + JPOOL_IMAGE, (JDIMENSION) width * cinfo.input_components, + (JDIMENSION) 1); + src_mgr->buffer_height = 1; + src_mgr->enc = enc; + + /* Read the input file header to obtain file size & colorspace. */ + jpg_start_input(&cinfo, src_mgr); + + if (encopts.qual >= 0) { + jpeg_set_quality(&cinfo, encopts.qual, TRUE); + } + + /* Now that we know input colorspace, fix colorspace-dependent defaults */ + jpeg_default_colorspace(&cinfo); + + /* Start compressor */ + jpeg_start_compress(&cinfo, TRUE); + + /* Process data */ + while (cinfo.next_scanline < cinfo.image_height) { + if ((numscanlines = jpg_get_pixel_rows(&cinfo, src_mgr)) <= 0) { + break; + } + jpeg_write_scanlines(&cinfo, src_mgr->buffer, numscanlines); + } + + /* Finish compression and release memory */ + jpg_finish_input(&cinfo, src_mgr); + jpeg_finish_compress(&cinfo); + jpeg_destroy_compress(&cinfo); + jas_matrix_destroy(src_mgr->data); + + rewind(output_file); + jpg_copyfiletostream(out, output_file); + fclose(output_file); + output_file = 0; + + return 0; + +error: + if (output_file) { + fclose(output_file); + } + return -1; +} + +static J_COLOR_SPACE tojpgcs(int colorspace) +{ + switch (jas_clrspc_fam(colorspace)) { + case JAS_CLRSPC_FAM_RGB: + return JCS_RGB; + break; + case JAS_CLRSPC_FAM_YCBCR: + return JCS_YCbCr; + break; + case JAS_CLRSPC_FAM_GRAY: + return JCS_GRAYSCALE; + break; + default: + abort(); + break; + } +} + +/* Parse the encoder options string. */ +static int jpg_parseencopts(char *optstr, jpg_encopts_t *encopts) +{ + jas_tvparser_t *tvp; + char *qual_str; + int ret; + + tvp = 0; + + /* Initialize default values for encoder options. */ + encopts->qual = -1; + + /* Create the tag-value parser. */ + if (!(tvp = jas_tvparser_create(optstr ? optstr : ""))) { + goto error; + } + + /* Get tag-value pairs, and process as necessary. */ + while (!(ret = jas_tvparser_next(tvp))) { + switch (jas_taginfo_nonull(jas_taginfos_lookup(jpg_opttab, + jas_tvparser_gettag(tvp)))->id) { + case OPT_QUAL: + qual_str = jas_tvparser_getval(tvp); + if (sscanf(qual_str, "%d", &encopts->qual) != 1) { + jas_eprintf("ignoring bad quality specifier %s\n", + jas_tvparser_getval(tvp)); + encopts->qual = -1; + } + break; + default: + jas_eprintf("warning: ignoring invalid option %s\n", + jas_tvparser_gettag(tvp)); + break; + } + } + if (ret < 0) { + goto error; + } + + /* Destroy the tag-value parser. */ + jas_tvparser_destroy(tvp); + + return 0; + +error: + if (tvp) { + jas_tvparser_destroy(tvp); + } + return -1; +} |