Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 1 | /* |
| 2 | * wrppm.c |
| 3 | * |
DRC | 5033f3e | 2014-05-18 18:33:44 +0000 | [diff] [blame] | 4 | * This file was part of the Independent JPEG Group's software: |
Thomas G. Lane | 489583f | 1996-02-07 00:00:00 +0000 | [diff] [blame] | 5 | * Copyright (C) 1991-1996, Thomas G. Lane. |
Guido Vollbeding | 5996a25 | 2009-06-27 00:00:00 +0000 | [diff] [blame] | 6 | * Modified 2009 by Guido Vollbeding. |
DRC | 5de454b | 2014-05-18 19:04:03 +0000 | [diff] [blame] | 7 | * It was modified by The libjpeg-turbo Project to include only code and |
| 8 | * information relevant to libjpeg-turbo. |
DRC | 7e3acc0 | 2015-10-10 10:25:46 -0500 | [diff] [blame] | 9 | * For conditions of distribution and use, see the accompanying README.ijg |
| 10 | * file. |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 11 | * |
| 12 | * This file contains routines to write output images in PPM/PGM format. |
Thomas G. Lane | 9ba2f5e | 1994-12-07 00:00:00 +0000 | [diff] [blame] | 13 | * The extended 2-byte-per-sample raw PPM/PGM formats are supported. |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 14 | * The PBMPLUS library is NOT required to compile this software |
| 15 | * (but it is highly useful as a set of PPM image manipulation programs). |
| 16 | * |
| 17 | * These routines may need modification for non-Unix environments or |
| 18 | * specialized applications. As they stand, they assume output to |
| 19 | * an ordinary stdio stream. |
| 20 | */ |
| 21 | |
DRC | e5eaf37 | 2014-05-09 18:00:32 +0000 | [diff] [blame] | 22 | #include "cdjpeg.h" /* Common decls for cjpeg/djpeg applications */ |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 23 | |
| 24 | #ifdef PPM_SUPPORTED |
| 25 | |
| 26 | |
| 27 | /* |
Thomas G. Lane | 9ba2f5e | 1994-12-07 00:00:00 +0000 | [diff] [blame] | 28 | * For 12-bit JPEG data, we either downscale the values to 8 bits |
| 29 | * (to write standard byte-per-sample PPM/PGM files), or output |
| 30 | * nonstandard word-per-sample PPM/PGM files. Downscaling is done |
| 31 | * if PPM_NORAWWORD is defined (this can be done in the Makefile |
| 32 | * or in jconfig.h). |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 33 | * (When the core library supports data precision reduction, a cleaner |
| 34 | * implementation will be to ask for that instead.) |
| 35 | */ |
| 36 | |
| 37 | #if BITS_IN_JSAMPLE == 8 |
Thomas G. Lane | 9ba2f5e | 1994-12-07 00:00:00 +0000 | [diff] [blame] | 38 | #define PUTPPMSAMPLE(ptr,v) *ptr++ = (char) (v) |
| 39 | #define BYTESPERSAMPLE 1 |
| 40 | #define PPM_MAXVAL 255 |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 41 | #else |
Thomas G. Lane | 9ba2f5e | 1994-12-07 00:00:00 +0000 | [diff] [blame] | 42 | #ifdef PPM_NORAWWORD |
| 43 | #define PUTPPMSAMPLE(ptr,v) *ptr++ = (char) ((v) >> (BITS_IN_JSAMPLE-8)) |
| 44 | #define BYTESPERSAMPLE 1 |
| 45 | #define PPM_MAXVAL 255 |
| 46 | #else |
Guido Vollbeding | 5996a25 | 2009-06-27 00:00:00 +0000 | [diff] [blame] | 47 | /* The word-per-sample format always puts the MSB first. */ |
DRC | e5eaf37 | 2014-05-09 18:00:32 +0000 | [diff] [blame] | 48 | #define PUTPPMSAMPLE(ptr,v) \ |
| 49 | { register int val_ = v; \ |
| 50 | *ptr++ = (char) ((val_ >> 8) & 0xFF); \ |
| 51 | *ptr++ = (char) (val_ & 0xFF); \ |
| 52 | } |
Thomas G. Lane | 9ba2f5e | 1994-12-07 00:00:00 +0000 | [diff] [blame] | 53 | #define BYTESPERSAMPLE 2 |
| 54 | #define PPM_MAXVAL ((1<<BITS_IN_JSAMPLE)-1) |
| 55 | #endif |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 56 | #endif |
| 57 | |
| 58 | |
| 59 | /* |
| 60 | * When JSAMPLE is the same size as char, we can just fwrite() the |
DRC | 5033f3e | 2014-05-18 18:33:44 +0000 | [diff] [blame] | 61 | * decompressed data to the PPM or PGM file. |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 62 | */ |
| 63 | |
| 64 | |
| 65 | /* Private version of data destination object */ |
| 66 | |
| 67 | typedef struct { |
DRC | e5eaf37 | 2014-05-09 18:00:32 +0000 | [diff] [blame] | 68 | struct djpeg_dest_struct pub; /* public fields */ |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 69 | |
| 70 | /* Usually these two pointers point to the same place: */ |
DRC | e5eaf37 | 2014-05-09 18:00:32 +0000 | [diff] [blame] | 71 | char *iobuffer; /* fwrite's I/O buffer */ |
| 72 | JSAMPROW pixrow; /* decompressor output buffer */ |
| 73 | size_t buffer_width; /* width of I/O buffer */ |
| 74 | JDIMENSION samples_per_row; /* JSAMPLEs per output row */ |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 75 | } ppm_dest_struct; |
| 76 | |
DRC | bd49803 | 2016-02-19 08:53:33 -0600 | [diff] [blame^] | 77 | typedef ppm_dest_struct *ppm_dest_ptr; |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 78 | |
| 79 | |
| 80 | /* |
| 81 | * Write some pixel data. |
| 82 | * In this module rows_supplied will always be 1. |
| 83 | * |
| 84 | * put_pixel_rows handles the "normal" 8-bit case where the decompressor |
| 85 | * output buffer is physically the same as the fwrite buffer. |
| 86 | */ |
| 87 | |
Thomas G. Lane | 489583f | 1996-02-07 00:00:00 +0000 | [diff] [blame] | 88 | METHODDEF(void) |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 89 | put_pixel_rows (j_decompress_ptr cinfo, djpeg_dest_ptr dinfo, |
DRC | e5eaf37 | 2014-05-09 18:00:32 +0000 | [diff] [blame] | 90 | JDIMENSION rows_supplied) |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 91 | { |
| 92 | ppm_dest_ptr dest = (ppm_dest_ptr) dinfo; |
| 93 | |
| 94 | (void) JFWRITE(dest->pub.output_file, dest->iobuffer, dest->buffer_width); |
| 95 | } |
| 96 | |
| 97 | |
| 98 | /* |
Thomas G. Lane | 9ba2f5e | 1994-12-07 00:00:00 +0000 | [diff] [blame] | 99 | * This code is used when we have to copy the data and apply a pixel |
| 100 | * format translation. Typically this only happens in 12-bit mode. |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 101 | */ |
| 102 | |
Thomas G. Lane | 489583f | 1996-02-07 00:00:00 +0000 | [diff] [blame] | 103 | METHODDEF(void) |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 104 | copy_pixel_rows (j_decompress_ptr cinfo, djpeg_dest_ptr dinfo, |
DRC | e5eaf37 | 2014-05-09 18:00:32 +0000 | [diff] [blame] | 105 | JDIMENSION rows_supplied) |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 106 | { |
| 107 | ppm_dest_ptr dest = (ppm_dest_ptr) dinfo; |
DRC | bd49803 | 2016-02-19 08:53:33 -0600 | [diff] [blame^] | 108 | register char *bufferptr; |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 109 | register JSAMPROW ptr; |
| 110 | register JDIMENSION col; |
| 111 | |
| 112 | ptr = dest->pub.buffer[0]; |
| 113 | bufferptr = dest->iobuffer; |
Thomas G. Lane | 9ba2f5e | 1994-12-07 00:00:00 +0000 | [diff] [blame] | 114 | for (col = dest->samples_per_row; col > 0; col--) { |
| 115 | PUTPPMSAMPLE(bufferptr, GETJSAMPLE(*ptr++)); |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 116 | } |
| 117 | (void) JFWRITE(dest->pub.output_file, dest->iobuffer, dest->buffer_width); |
| 118 | } |
| 119 | |
| 120 | |
| 121 | /* |
| 122 | * Write some pixel data when color quantization is in effect. |
| 123 | * We have to demap the color index values to straight data. |
| 124 | */ |
| 125 | |
Thomas G. Lane | 489583f | 1996-02-07 00:00:00 +0000 | [diff] [blame] | 126 | METHODDEF(void) |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 127 | put_demapped_rgb (j_decompress_ptr cinfo, djpeg_dest_ptr dinfo, |
DRC | e5eaf37 | 2014-05-09 18:00:32 +0000 | [diff] [blame] | 128 | JDIMENSION rows_supplied) |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 129 | { |
| 130 | ppm_dest_ptr dest = (ppm_dest_ptr) dinfo; |
DRC | bd49803 | 2016-02-19 08:53:33 -0600 | [diff] [blame^] | 131 | register char *bufferptr; |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 132 | register int pixval; |
| 133 | register JSAMPROW ptr; |
| 134 | register JSAMPROW color_map0 = cinfo->colormap[0]; |
| 135 | register JSAMPROW color_map1 = cinfo->colormap[1]; |
| 136 | register JSAMPROW color_map2 = cinfo->colormap[2]; |
| 137 | register JDIMENSION col; |
| 138 | |
| 139 | ptr = dest->pub.buffer[0]; |
| 140 | bufferptr = dest->iobuffer; |
| 141 | for (col = cinfo->output_width; col > 0; col--) { |
| 142 | pixval = GETJSAMPLE(*ptr++); |
Thomas G. Lane | 9ba2f5e | 1994-12-07 00:00:00 +0000 | [diff] [blame] | 143 | PUTPPMSAMPLE(bufferptr, GETJSAMPLE(color_map0[pixval])); |
| 144 | PUTPPMSAMPLE(bufferptr, GETJSAMPLE(color_map1[pixval])); |
| 145 | PUTPPMSAMPLE(bufferptr, GETJSAMPLE(color_map2[pixval])); |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 146 | } |
| 147 | (void) JFWRITE(dest->pub.output_file, dest->iobuffer, dest->buffer_width); |
| 148 | } |
| 149 | |
| 150 | |
Thomas G. Lane | 489583f | 1996-02-07 00:00:00 +0000 | [diff] [blame] | 151 | METHODDEF(void) |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 152 | put_demapped_gray (j_decompress_ptr cinfo, djpeg_dest_ptr dinfo, |
DRC | e5eaf37 | 2014-05-09 18:00:32 +0000 | [diff] [blame] | 153 | JDIMENSION rows_supplied) |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 154 | { |
| 155 | ppm_dest_ptr dest = (ppm_dest_ptr) dinfo; |
DRC | bd49803 | 2016-02-19 08:53:33 -0600 | [diff] [blame^] | 156 | register char *bufferptr; |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 157 | register JSAMPROW ptr; |
| 158 | register JSAMPROW color_map = cinfo->colormap[0]; |
| 159 | register JDIMENSION col; |
| 160 | |
| 161 | ptr = dest->pub.buffer[0]; |
| 162 | bufferptr = dest->iobuffer; |
| 163 | for (col = cinfo->output_width; col > 0; col--) { |
Thomas G. Lane | 9ba2f5e | 1994-12-07 00:00:00 +0000 | [diff] [blame] | 164 | PUTPPMSAMPLE(bufferptr, GETJSAMPLE(color_map[GETJSAMPLE(*ptr++)])); |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 165 | } |
| 166 | (void) JFWRITE(dest->pub.output_file, dest->iobuffer, dest->buffer_width); |
| 167 | } |
| 168 | |
| 169 | |
| 170 | /* |
| 171 | * Startup: write the file header. |
| 172 | */ |
| 173 | |
Thomas G. Lane | 489583f | 1996-02-07 00:00:00 +0000 | [diff] [blame] | 174 | METHODDEF(void) |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 175 | start_output_ppm (j_decompress_ptr cinfo, djpeg_dest_ptr dinfo) |
| 176 | { |
| 177 | ppm_dest_ptr dest = (ppm_dest_ptr) dinfo; |
| 178 | |
| 179 | /* Emit file header */ |
| 180 | switch (cinfo->out_color_space) { |
| 181 | case JCS_GRAYSCALE: |
| 182 | /* emit header for raw PGM format */ |
| 183 | fprintf(dest->pub.output_file, "P5\n%ld %ld\n%d\n", |
DRC | e5eaf37 | 2014-05-09 18:00:32 +0000 | [diff] [blame] | 184 | (long) cinfo->output_width, (long) cinfo->output_height, |
| 185 | PPM_MAXVAL); |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 186 | break; |
| 187 | case JCS_RGB: |
| 188 | /* emit header for raw PPM format */ |
| 189 | fprintf(dest->pub.output_file, "P6\n%ld %ld\n%d\n", |
DRC | e5eaf37 | 2014-05-09 18:00:32 +0000 | [diff] [blame] | 190 | (long) cinfo->output_width, (long) cinfo->output_height, |
| 191 | PPM_MAXVAL); |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 192 | break; |
| 193 | default: |
| 194 | ERREXIT(cinfo, JERR_PPM_COLORSPACE); |
| 195 | } |
| 196 | } |
| 197 | |
| 198 | |
| 199 | /* |
| 200 | * Finish up at the end of the file. |
| 201 | */ |
| 202 | |
Thomas G. Lane | 489583f | 1996-02-07 00:00:00 +0000 | [diff] [blame] | 203 | METHODDEF(void) |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 204 | finish_output_ppm (j_decompress_ptr cinfo, djpeg_dest_ptr dinfo) |
| 205 | { |
| 206 | /* Make sure we wrote the output file OK */ |
| 207 | fflush(dinfo->output_file); |
| 208 | if (ferror(dinfo->output_file)) |
| 209 | ERREXIT(cinfo, JERR_FILE_WRITE); |
| 210 | } |
| 211 | |
| 212 | |
| 213 | /* |
| 214 | * The module selection routine for PPM format output. |
| 215 | */ |
| 216 | |
Thomas G. Lane | 489583f | 1996-02-07 00:00:00 +0000 | [diff] [blame] | 217 | GLOBAL(djpeg_dest_ptr) |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 218 | jinit_write_ppm (j_decompress_ptr cinfo) |
| 219 | { |
| 220 | ppm_dest_ptr dest; |
| 221 | |
| 222 | /* Create module interface object, fill in method pointers */ |
| 223 | dest = (ppm_dest_ptr) |
| 224 | (*cinfo->mem->alloc_small) ((j_common_ptr) cinfo, JPOOL_IMAGE, |
DRC | 5de454b | 2014-05-18 19:04:03 +0000 | [diff] [blame] | 225 | sizeof(ppm_dest_struct)); |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 226 | dest->pub.start_output = start_output_ppm; |
| 227 | dest->pub.finish_output = finish_output_ppm; |
| 228 | |
| 229 | /* Calculate output image dimensions so we can allocate space */ |
| 230 | jpeg_calc_output_dimensions(cinfo); |
| 231 | |
DRC | 5033f3e | 2014-05-18 18:33:44 +0000 | [diff] [blame] | 232 | /* Create physical I/O buffer */ |
Thomas G. Lane | 9ba2f5e | 1994-12-07 00:00:00 +0000 | [diff] [blame] | 233 | dest->samples_per_row = cinfo->output_width * cinfo->out_color_components; |
DRC | 5de454b | 2014-05-18 19:04:03 +0000 | [diff] [blame] | 234 | dest->buffer_width = dest->samples_per_row * (BYTESPERSAMPLE * sizeof(char)); |
Thomas G. Lane | 9ba2f5e | 1994-12-07 00:00:00 +0000 | [diff] [blame] | 235 | dest->iobuffer = (char *) (*cinfo->mem->alloc_small) |
| 236 | ((j_common_ptr) cinfo, JPOOL_IMAGE, dest->buffer_width); |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 237 | |
Thomas G. Lane | 9ba2f5e | 1994-12-07 00:00:00 +0000 | [diff] [blame] | 238 | if (cinfo->quantize_colors || BITS_IN_JSAMPLE != 8 || |
DRC | 5de454b | 2014-05-18 19:04:03 +0000 | [diff] [blame] | 239 | sizeof(JSAMPLE) != sizeof(char)) { |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 240 | /* When quantizing, we need an output buffer for colormap indexes |
| 241 | * that's separate from the physical I/O buffer. We also need a |
Thomas G. Lane | 9ba2f5e | 1994-12-07 00:00:00 +0000 | [diff] [blame] | 242 | * separate buffer if pixel format translation must take place. |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 243 | */ |
| 244 | dest->pub.buffer = (*cinfo->mem->alloc_sarray) |
| 245 | ((j_common_ptr) cinfo, JPOOL_IMAGE, |
| 246 | cinfo->output_width * cinfo->output_components, (JDIMENSION) 1); |
| 247 | dest->pub.buffer_height = 1; |
| 248 | if (! cinfo->quantize_colors) |
| 249 | dest->pub.put_pixel_rows = copy_pixel_rows; |
| 250 | else if (cinfo->out_color_space == JCS_GRAYSCALE) |
| 251 | dest->pub.put_pixel_rows = put_demapped_gray; |
| 252 | else |
| 253 | dest->pub.put_pixel_rows = put_demapped_rgb; |
| 254 | } else { |
| 255 | /* We will fwrite() directly from decompressor output buffer. */ |
| 256 | /* Synthesize a JSAMPARRAY pointer structure */ |
Thomas G. Lane | 36a4ccc | 1994-09-24 00:00:00 +0000 | [diff] [blame] | 257 | dest->pixrow = (JSAMPROW) dest->iobuffer; |
| 258 | dest->pub.buffer = & dest->pixrow; |
| 259 | dest->pub.buffer_height = 1; |
| 260 | dest->pub.put_pixel_rows = put_pixel_rows; |
| 261 | } |
| 262 | |
| 263 | return (djpeg_dest_ptr) dest; |
| 264 | } |
| 265 | |
| 266 | #endif /* PPM_SUPPORTED */ |