dbf-halloween2015

annotate libs/libjpeg/jcapimin.c @ 1:c3f5c32cb210

find changesets by author, revision, files, or words in the commit message
barfed all the libraries in the source tree to make porting easier
author John Tsiombikas <nuclear@member.fsf.org>
date Sun, 01 Nov 2015 00:36:56 +0200
parents
children
rev   line source
nuclear@1 1 /*
nuclear@1 2 * jcapimin.c
nuclear@1 3 *
nuclear@1 4 * Copyright (C) 1994-1998, Thomas G. Lane.
nuclear@1 5 * This file is part of the Independent JPEG Group's software.
nuclear@1 6 * For conditions of distribution and use, see the accompanying README file.
nuclear@1 7 *
nuclear@1 8 * This file contains application interface code for the compression half
nuclear@1 9 * of the JPEG library. These are the "minimum" API routines that may be
nuclear@1 10 * needed in either the normal full-compression case or the transcoding-only
nuclear@1 11 * case.
nuclear@1 12 *
nuclear@1 13 * Most of the routines intended to be called directly by an application
nuclear@1 14 * are in this file or in jcapistd.c. But also see jcparam.c for
nuclear@1 15 * parameter-setup helper routines, jcomapi.c for routines shared by
nuclear@1 16 * compression and decompression, and jctrans.c for the transcoding case.
nuclear@1 17 */
nuclear@1 18
nuclear@1 19 #define JPEG_INTERNALS
nuclear@1 20 #include "jinclude.h"
nuclear@1 21 #include "jpeglib.h"
nuclear@1 22
nuclear@1 23
nuclear@1 24 /*
nuclear@1 25 * Initialization of a JPEG compression object.
nuclear@1 26 * The error manager must already be set up (in case memory manager fails).
nuclear@1 27 */
nuclear@1 28
nuclear@1 29 GLOBAL(void)
nuclear@1 30 jpeg_CreateCompress (j_compress_ptr cinfo, int version, size_t structsize)
nuclear@1 31 {
nuclear@1 32 int i;
nuclear@1 33
nuclear@1 34 /* Guard against version mismatches between library and caller. */
nuclear@1 35 cinfo->mem = NULL; /* so jpeg_destroy knows mem mgr not called */
nuclear@1 36 if (version != JPEG_LIB_VERSION)
nuclear@1 37 ERREXIT2(cinfo, JERR_BAD_LIB_VERSION, JPEG_LIB_VERSION, version);
nuclear@1 38 if (structsize != SIZEOF(struct jpeg_compress_struct))
nuclear@1 39 ERREXIT2(cinfo, JERR_BAD_STRUCT_SIZE,
nuclear@1 40 (int) SIZEOF(struct jpeg_compress_struct), (int) structsize);
nuclear@1 41
nuclear@1 42 /* For debugging purposes, we zero the whole master structure.
nuclear@1 43 * But the application has already set the err pointer, and may have set
nuclear@1 44 * client_data, so we have to save and restore those fields.
nuclear@1 45 * Note: if application hasn't set client_data, tools like Purify may
nuclear@1 46 * complain here.
nuclear@1 47 */
nuclear@1 48 {
nuclear@1 49 struct jpeg_error_mgr * err = cinfo->err;
nuclear@1 50 void * client_data = cinfo->client_data; /* ignore Purify complaint here */
nuclear@1 51 MEMZERO(cinfo, SIZEOF(struct jpeg_compress_struct));
nuclear@1 52 cinfo->err = err;
nuclear@1 53 cinfo->client_data = client_data;
nuclear@1 54 }
nuclear@1 55 cinfo->is_decompressor = FALSE;
nuclear@1 56
nuclear@1 57 /* Initialize a memory manager instance for this object */
nuclear@1 58 jinit_memory_mgr((j_common_ptr) cinfo);
nuclear@1 59
nuclear@1 60 /* Zero out pointers to permanent structures. */
nuclear@1 61 cinfo->progress = NULL;
nuclear@1 62 cinfo->dest = NULL;
nuclear@1 63
nuclear@1 64 cinfo->comp_info = NULL;
nuclear@1 65
nuclear@1 66 for (i = 0; i < NUM_QUANT_TBLS; i++)
nuclear@1 67 cinfo->quant_tbl_ptrs[i] = NULL;
nuclear@1 68
nuclear@1 69 for (i = 0; i < NUM_HUFF_TBLS; i++) {
nuclear@1 70 cinfo->dc_huff_tbl_ptrs[i] = NULL;
nuclear@1 71 cinfo->ac_huff_tbl_ptrs[i] = NULL;
nuclear@1 72 }
nuclear@1 73
nuclear@1 74 cinfo->script_space = NULL;
nuclear@1 75
nuclear@1 76 cinfo->input_gamma = 1.0; /* in case application forgets */
nuclear@1 77
nuclear@1 78 /* OK, I'm ready */
nuclear@1 79 cinfo->global_state = CSTATE_START;
nuclear@1 80 }
nuclear@1 81
nuclear@1 82
nuclear@1 83 /*
nuclear@1 84 * Destruction of a JPEG compression object
nuclear@1 85 */
nuclear@1 86
nuclear@1 87 GLOBAL(void)
nuclear@1 88 jpeg_destroy_compress (j_compress_ptr cinfo)
nuclear@1 89 {
nuclear@1 90 jpeg_destroy((j_common_ptr) cinfo); /* use common routine */
nuclear@1 91 }
nuclear@1 92
nuclear@1 93
nuclear@1 94 /*
nuclear@1 95 * Abort processing of a JPEG compression operation,
nuclear@1 96 * but don't destroy the object itself.
nuclear@1 97 */
nuclear@1 98
nuclear@1 99 GLOBAL(void)
nuclear@1 100 jpeg_abort_compress (j_compress_ptr cinfo)
nuclear@1 101 {
nuclear@1 102 jpeg_abort((j_common_ptr) cinfo); /* use common routine */
nuclear@1 103 }
nuclear@1 104
nuclear@1 105
nuclear@1 106 /*
nuclear@1 107 * Forcibly suppress or un-suppress all quantization and Huffman tables.
nuclear@1 108 * Marks all currently defined tables as already written (if suppress)
nuclear@1 109 * or not written (if !suppress). This will control whether they get emitted
nuclear@1 110 * by a subsequent jpeg_start_compress call.
nuclear@1 111 *
nuclear@1 112 * This routine is exported for use by applications that want to produce
nuclear@1 113 * abbreviated JPEG datastreams. It logically belongs in jcparam.c, but
nuclear@1 114 * since it is called by jpeg_start_compress, we put it here --- otherwise
nuclear@1 115 * jcparam.o would be linked whether the application used it or not.
nuclear@1 116 */
nuclear@1 117
nuclear@1 118 GLOBAL(void)
nuclear@1 119 jpeg_suppress_tables (j_compress_ptr cinfo, boolean suppress)
nuclear@1 120 {
nuclear@1 121 int i;
nuclear@1 122 JQUANT_TBL * qtbl;
nuclear@1 123 JHUFF_TBL * htbl;
nuclear@1 124
nuclear@1 125 for (i = 0; i < NUM_QUANT_TBLS; i++) {
nuclear@1 126 if ((qtbl = cinfo->quant_tbl_ptrs[i]) != NULL)
nuclear@1 127 qtbl->sent_table = suppress;
nuclear@1 128 }
nuclear@1 129
nuclear@1 130 for (i = 0; i < NUM_HUFF_TBLS; i++) {
nuclear@1 131 if ((htbl = cinfo->dc_huff_tbl_ptrs[i]) != NULL)
nuclear@1 132 htbl->sent_table = suppress;
nuclear@1 133 if ((htbl = cinfo->ac_huff_tbl_ptrs[i]) != NULL)
nuclear@1 134 htbl->sent_table = suppress;
nuclear@1 135 }
nuclear@1 136 }
nuclear@1 137
nuclear@1 138
nuclear@1 139 /*
nuclear@1 140 * Finish JPEG compression.
nuclear@1 141 *
nuclear@1 142 * If a multipass operating mode was selected, this may do a great deal of
nuclear@1 143 * work including most of the actual output.
nuclear@1 144 */
nuclear@1 145
nuclear@1 146 GLOBAL(void)
nuclear@1 147 jpeg_finish_compress (j_compress_ptr cinfo)
nuclear@1 148 {
nuclear@1 149 JDIMENSION iMCU_row;
nuclear@1 150
nuclear@1 151 if (cinfo->global_state == CSTATE_SCANNING ||
nuclear@1 152 cinfo->global_state == CSTATE_RAW_OK) {
nuclear@1 153 /* Terminate first pass */
nuclear@1 154 if (cinfo->next_scanline < cinfo->image_height)
nuclear@1 155 ERREXIT(cinfo, JERR_TOO_LITTLE_DATA);
nuclear@1 156 (*cinfo->master->finish_pass) (cinfo);
nuclear@1 157 } else if (cinfo->global_state != CSTATE_WRCOEFS)
nuclear@1 158 ERREXIT1(cinfo, JERR_BAD_STATE, cinfo->global_state);
nuclear@1 159 /* Perform any remaining passes */
nuclear@1 160 while (! cinfo->master->is_last_pass) {
nuclear@1 161 (*cinfo->master->prepare_for_pass) (cinfo);
nuclear@1 162 for (iMCU_row = 0; iMCU_row < cinfo->total_iMCU_rows; iMCU_row++) {
nuclear@1 163 if (cinfo->progress != NULL) {
nuclear@1 164 cinfo->progress->pass_counter = (long) iMCU_row;
nuclear@1 165 cinfo->progress->pass_limit = (long) cinfo->total_iMCU_rows;
nuclear@1 166 (*cinfo->progress->progress_monitor) ((j_common_ptr) cinfo);
nuclear@1 167 }
nuclear@1 168 /* We bypass the main controller and invoke coef controller directly;
nuclear@1 169 * all work is being done from the coefficient buffer.
nuclear@1 170 */
nuclear@1 171 if (! (*cinfo->coef->compress_data) (cinfo, (JSAMPIMAGE) NULL))
nuclear@1 172 ERREXIT(cinfo, JERR_CANT_SUSPEND);
nuclear@1 173 }
nuclear@1 174 (*cinfo->master->finish_pass) (cinfo);
nuclear@1 175 }
nuclear@1 176 /* Write EOI, do final cleanup */
nuclear@1 177 (*cinfo->marker->write_file_trailer) (cinfo);
nuclear@1 178 (*cinfo->dest->term_destination) (cinfo);
nuclear@1 179 /* We can use jpeg_abort to release memory and reset global_state */
nuclear@1 180 jpeg_abort((j_common_ptr) cinfo);
nuclear@1 181 }
nuclear@1 182
nuclear@1 183
nuclear@1 184 /*
nuclear@1 185 * Write a special marker.
nuclear@1 186 * This is only recommended for writing COM or APPn markers.
nuclear@1 187 * Must be called after jpeg_start_compress() and before
nuclear@1 188 * first call to jpeg_write_scanlines() or jpeg_write_raw_data().
nuclear@1 189 */
nuclear@1 190
nuclear@1 191 GLOBAL(void)
nuclear@1 192 jpeg_write_marker (j_compress_ptr cinfo, int marker,
nuclear@1 193 const JOCTET *dataptr, unsigned int datalen)
nuclear@1 194 {
nuclear@1 195 JMETHOD(void, write_marker_byte, (j_compress_ptr info, int val));
nuclear@1 196
nuclear@1 197 if (cinfo->next_scanline != 0 ||
nuclear@1 198 (cinfo->global_state != CSTATE_SCANNING &&
nuclear@1 199 cinfo->global_state != CSTATE_RAW_OK &&
nuclear@1 200 cinfo->global_state != CSTATE_WRCOEFS))
nuclear@1 201 ERREXIT1(cinfo, JERR_BAD_STATE, cinfo->global_state);
nuclear@1 202
nuclear@1 203 (*cinfo->marker->write_marker_header) (cinfo, marker, datalen);
nuclear@1 204 write_marker_byte = cinfo->marker->write_marker_byte; /* copy for speed */
nuclear@1 205 while (datalen--) {
nuclear@1 206 (*write_marker_byte) (cinfo, *dataptr);
nuclear@1 207 dataptr++;
nuclear@1 208 }
nuclear@1 209 }
nuclear@1 210
nuclear@1 211 /* Same, but piecemeal. */
nuclear@1 212
nuclear@1 213 GLOBAL(void)
nuclear@1 214 jpeg_write_m_header (j_compress_ptr cinfo, int marker, unsigned int datalen)
nuclear@1 215 {
nuclear@1 216 if (cinfo->next_scanline != 0 ||
nuclear@1 217 (cinfo->global_state != CSTATE_SCANNING &&
nuclear@1 218 cinfo->global_state != CSTATE_RAW_OK &&
nuclear@1 219 cinfo->global_state != CSTATE_WRCOEFS))
nuclear@1 220 ERREXIT1(cinfo, JERR_BAD_STATE, cinfo->global_state);
nuclear@1 221
nuclear@1 222 (*cinfo->marker->write_marker_header) (cinfo, marker, datalen);
nuclear@1 223 }
nuclear@1 224
nuclear@1 225 GLOBAL(void)
nuclear@1 226 jpeg_write_m_byte (j_compress_ptr cinfo, int val)
nuclear@1 227 {
nuclear@1 228 (*cinfo->marker->write_marker_byte) (cinfo, val);
nuclear@1 229 }
nuclear@1 230
nuclear@1 231
nuclear@1 232 /*
nuclear@1 233 * Alternate compression function: just write an abbreviated table file.
nuclear@1 234 * Before calling this, all parameters and a data destination must be set up.
nuclear@1 235 *
nuclear@1 236 * To produce a pair of files containing abbreviated tables and abbreviated
nuclear@1 237 * image data, one would proceed as follows:
nuclear@1 238 *
nuclear@1 239 * initialize JPEG object
nuclear@1 240 * set JPEG parameters
nuclear@1 241 * set destination to table file
nuclear@1 242 * jpeg_write_tables(cinfo);
nuclear@1 243 * set destination to image file
nuclear@1 244 * jpeg_start_compress(cinfo, FALSE);
nuclear@1 245 * write data...
nuclear@1 246 * jpeg_finish_compress(cinfo);
nuclear@1 247 *
nuclear@1 248 * jpeg_write_tables has the side effect of marking all tables written
nuclear@1 249 * (same as jpeg_suppress_tables(..., TRUE)). Thus a subsequent start_compress
nuclear@1 250 * will not re-emit the tables unless it is passed write_all_tables=TRUE.
nuclear@1 251 */
nuclear@1 252
nuclear@1 253 GLOBAL(void)
nuclear@1 254 jpeg_write_tables (j_compress_ptr cinfo)
nuclear@1 255 {
nuclear@1 256 if (cinfo->global_state != CSTATE_START)
nuclear@1 257 ERREXIT1(cinfo, JERR_BAD_STATE, cinfo->global_state);
nuclear@1 258
nuclear@1 259 /* (Re)initialize error mgr and destination modules */
nuclear@1 260 (*cinfo->err->reset_error_mgr) ((j_common_ptr) cinfo);
nuclear@1 261 (*cinfo->dest->init_destination) (cinfo);
nuclear@1 262 /* Initialize the marker writer ... bit of a crock to do it here. */
nuclear@1 263 jinit_marker_writer(cinfo);
nuclear@1 264 /* Write them tables! */
nuclear@1 265 (*cinfo->marker->write_tables_only) (cinfo);
nuclear@1 266 /* And clean up. */
nuclear@1 267 (*cinfo->dest->term_destination) (cinfo);
nuclear@1 268 /*
nuclear@1 269 * In library releases up through v6a, we called jpeg_abort() here to free
nuclear@1 270 * any working memory allocated by the destination manager and marker
nuclear@1 271 * writer. Some applications had a problem with that: they allocated space
nuclear@1 272 * of their own from the library memory manager, and didn't want it to go
nuclear@1 273 * away during write_tables. So now we do nothing. This will cause a
nuclear@1 274 * memory leak if an app calls write_tables repeatedly without doing a full
nuclear@1 275 * compression cycle or otherwise resetting the JPEG object. However, that
nuclear@1 276 * seems less bad than unexpectedly freeing memory in the normal case.
nuclear@1 277 * An app that prefers the old behavior can call jpeg_abort for itself after
nuclear@1 278 * each call to jpeg_write_tables().
nuclear@1 279 */
nuclear@1 280 }