diff options
Diffstat (limited to 'src/3rdparty/jasper/src/libjasper/pgx/pgx_dec.c')
| -rw-r--r-- | src/3rdparty/jasper/src/libjasper/pgx/pgx_dec.c | 414 |
1 files changed, 0 insertions, 414 deletions
diff --git a/src/3rdparty/jasper/src/libjasper/pgx/pgx_dec.c b/src/3rdparty/jasper/src/libjasper/pgx/pgx_dec.c deleted file mode 100644 index 1f2b1b0..0000000 --- a/src/3rdparty/jasper/src/libjasper/pgx/pgx_dec.c +++ /dev/null @@ -1,414 +0,0 @@ -/* - * 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 <ctype.h> - -#include "jasper/jas_tvp.h" -#include "jasper/jas_stream.h" -#include "jasper/jas_image.h" -#include "jasper/jas_string.h" - -#include "pgx_cod.h" - -/******************************************************************************\ -* Local prototypes. -\******************************************************************************/ - -static int pgx_gethdr(jas_stream_t *in, pgx_hdr_t *hdr); -static int pgx_getdata(jas_stream_t *in, pgx_hdr_t *hdr, jas_image_t *image); -static int_fast32_t pgx_getword(jas_stream_t *in, bool bigendian, int prec); -static int pgx_getsgnd(jas_stream_t *in, bool *sgnd); -static int pgx_getbyteorder(jas_stream_t *in, bool *bigendian); -static int pgx_getc(jas_stream_t *in); -static int pgx_getuint32(jas_stream_t *in, uint_fast32_t *val); -static jas_seqent_t pgx_wordtoint(uint_fast32_t word, int prec, bool sgnd); - -/******************************************************************************\ -* Code for load operation. -\******************************************************************************/ - -/* Load an image from a stream in the PGX format. */ - -jas_image_t *pgx_decode(jas_stream_t *in, char *optstr) -{ - jas_image_t *image; - pgx_hdr_t hdr; - jas_image_cmptparm_t cmptparm; - - /* Avoid compiler warnings about unused parameters. */ - optstr = 0; - - image = 0; - - if (pgx_gethdr(in, &hdr)) { - goto error; - } - -#ifdef PGX_DEBUG - pgx_dumphdr(stderr, &hdr); -#endif - - if (!(image = jas_image_create0())) { - goto error; - } - cmptparm.tlx = 0; - cmptparm.tly = 0; - cmptparm.hstep = 1; - cmptparm.vstep = 1; - cmptparm.width = hdr.width; - cmptparm.height = hdr.height; - cmptparm.prec = hdr.prec; - cmptparm.sgnd = hdr.sgnd; - if (jas_image_addcmpt(image, 0, &cmptparm)) { - goto error; - } - if (pgx_getdata(in, &hdr, image)) { - goto error; - } - - jas_image_setclrspc(image, JAS_CLRSPC_SGRAY); - jas_image_setcmpttype(image, 0, - JAS_IMAGE_CT_COLOR(JAS_CLRSPC_CHANIND_GRAY_Y)); - - return image; - -error: - if (image) { - jas_image_destroy(image); - } - return 0; -} - -/******************************************************************************\ -* Code for validate operation. -\******************************************************************************/ - -int pgx_validate(jas_stream_t *in) -{ - uchar buf[PGX_MAGICLEN]; - uint_fast32_t magic; - int i; - int n; - - assert(JAS_STREAM_MAXPUTBACK >= PGX_MAGICLEN); - - /* Read the validation data (i.e., the data used for detecting - the format). */ - if ((n = jas_stream_read(in, buf, PGX_MAGICLEN)) < 0) { - return -1; - } - - /* Put the validation data back onto the stream, so that the - stream position will not be changed. */ - for (i = n - 1; i >= 0; --i) { - if (jas_stream_ungetc(in, buf[i]) == EOF) { - return -1; - } - } - - /* Did we read enough data? */ - if (n < PGX_MAGICLEN) { - return -1; - } - - /* Compute the signature value. */ - magic = (buf[0] << 8) | buf[1]; - - /* Ensure that the signature is correct for this format. */ - if (magic != PGX_MAGIC) { - return -1; - } - - return 0; -} - -/******************************************************************************\ -* -\******************************************************************************/ - -static int pgx_gethdr(jas_stream_t *in, pgx_hdr_t *hdr) -{ - int c; - uchar buf[2]; - - if ((c = jas_stream_getc(in)) == EOF) { - goto error; - } - buf[0] = c; - if ((c = jas_stream_getc(in)) == EOF) { - goto error; - } - buf[1] = c; - hdr->magic = buf[0] << 8 | buf[1]; - if (hdr->magic != PGX_MAGIC) { - goto error; - } - if ((c = pgx_getc(in)) == EOF || !isspace(c)) { - goto error; - } - if (pgx_getbyteorder(in, &hdr->bigendian)) { - goto error; - } - if (pgx_getsgnd(in, &hdr->sgnd)) { - goto error; - } - if (pgx_getuint32(in, &hdr->prec)) { - goto error; - } - if (pgx_getuint32(in, &hdr->width)) { - goto error; - } - if (pgx_getuint32(in, &hdr->height)) { - goto error; - } - return 0; - -error: - return -1; -} - -static int pgx_getdata(jas_stream_t *in, pgx_hdr_t *hdr, jas_image_t *image) -{ - jas_matrix_t *data; - uint_fast32_t x; - uint_fast32_t y; - uint_fast32_t word; - int_fast32_t v; - - data = 0; - - if (!(data = jas_matrix_create(1, hdr->width))) { - goto error; - } - for (y = 0; y < hdr->height; ++y) { - for (x = 0; x < hdr->width; ++x) { - /* Need to adjust signed value. */ - if ((v = pgx_getword(in, hdr->bigendian, hdr->prec)) < 0) { - goto error; - } - word = v; - v = pgx_wordtoint(word, hdr->prec, hdr->sgnd); - jas_matrix_set(data, 0, x, v); - } - if (jas_image_writecmpt(image, 0, 0, y, hdr->width, 1, data)) { - goto error; - } - } - jas_matrix_destroy(data); - return 0; - -error: - if (data) { - jas_matrix_destroy(data); - } - return -1; -} - -static int_fast32_t pgx_getword(jas_stream_t *in, bool bigendian, int prec) -{ - uint_fast32_t val; - int i; - int j; - int c; - int wordsize; - - wordsize = (prec + 7) / 8; - - if (prec > 32) { - goto error; - } - - val = 0; - for (i = 0; i < wordsize; ++i) { - if ((c = jas_stream_getc(in)) == EOF) { - goto error; - } - j = bigendian ? (wordsize - 1 - i) : i; - val = val | ((c & 0xff) << (8 * j)); - } - val &= (1 << prec) - 1; - return val; - -error: - return -1; -} - -static int pgx_getc(jas_stream_t *in) -{ - int c; - for (;;) { - if ((c = jas_stream_getc(in)) == EOF) { - return -1; - } - if (c != '#') { - return c; - } - do { - if ((c = jas_stream_getc(in)) == EOF) { - return -1; - } - } while (c != '\n' && c != '\r'); - } -} - -static int pgx_getbyteorder(jas_stream_t *in, bool *bigendian) -{ - int c; - char buf[2]; - - do { - if ((c = pgx_getc(in)) == EOF) { - return -1; - } - } while (isspace(c)); - - buf[0] = c; - if ((c = pgx_getc(in)) == EOF) { - goto error; - } - buf[1] = c; - if (buf[0] == 'M' && buf[1] == 'L') { - *bigendian = true; - } else if (buf[0] == 'L' && buf[1] == 'M') { - *bigendian = false; - } else { - goto error; - } - - while ((c = pgx_getc(in)) != EOF && !isspace(c)) { - ; - } - if (c == EOF) { - goto error; - } - return 0; - -error: - return -1; -} - -static int pgx_getsgnd(jas_stream_t *in, bool *sgnd) -{ - int c; - - do { - if ((c = pgx_getc(in)) == EOF) { - return -1; - } - } while (isspace(c)); - - if (c == '+') { - *sgnd = false; - } else if (c == '-') { - *sgnd = true; - } else { - goto error; - } - while ((c = pgx_getc(in)) != EOF && !isspace(c)) { - ; - } - if (c == EOF) { - goto error; - } - return 0; - -error: - return -1; -} - -static int pgx_getuint32(jas_stream_t *in, uint_fast32_t *val) -{ - int c; - uint_fast32_t v; - - do { - if ((c = pgx_getc(in)) == EOF) { - return -1; - } - } while (isspace(c)); - - v = 0; - while (isdigit(c)) { - v = 10 * v + c - '0'; - if ((c = pgx_getc(in)) < 0) { - return -1; - } - } - if (!isspace(c)) { - return -1; - } - *val = v; - - return 0; -} - -static jas_seqent_t pgx_wordtoint(uint_fast32_t v, int prec, bool sgnd) -{ - jas_seqent_t ret; - v &= (1 << prec) - 1; - ret = (sgnd && (v & (1 << (prec - 1)))) ? (v - (1 << prec)) : v; - return ret; -} |