123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396 |
- #include <stdio.h>
- #include <stdlib.h>
- #include <string.h>
- #include <errno.h>
- #include <turbojpeg.h>
- #ifdef _WIN32
- #define strcasecmp stricmp
- #define strncasecmp strnicmp
- #endif
- #define THROW(action, message) { \
- printf("ERROR in line %d while %s:\n%s\n", __LINE__, action, message); \
- retval = -1; goto bailout; \
- }
- #define THROW_TJ(action) THROW(action, tjGetErrorStr2(tjInstance))
- #define THROW_UNIX(action) THROW(action, strerror(errno))
- #define DEFAULT_SUBSAMP TJSAMP_444
- #define DEFAULT_QUALITY 95
- const char *subsampName[TJ_NUMSAMP] = {
- "4:4:4", "4:2:2", "4:2:0", "Grayscale", "4:4:0", "4:1:1"
- };
- const char *colorspaceName[TJ_NUMCS] = {
- "RGB", "YCbCr", "GRAY", "CMYK", "YCCK"
- };
- tjscalingfactor *scalingFactors = NULL;
- int numScalingFactors = 0;
- static int customFilter(short *coeffs, tjregion arrayRegion,
- tjregion planeRegion, int componentIndex,
- int transformIndex, tjtransform *transform)
- {
- int i;
- for (i = 0; i < arrayRegion.w * arrayRegion.h; i++)
- coeffs[i] = -coeffs[i];
- return 0;
- }
- static void usage(char *programName)
- {
- int i;
- printf("\nUSAGE: %s <Input image> <Output image> [options]\n\n",
- programName);
- printf("Input and output images can be in Windows BMP or PBMPLUS (PPM/PGM) format. If\n");
- printf("either filename ends in a .jpg extension, then the TurboJPEG API will be used\n");
- printf("to compress or decompress the image.\n\n");
- printf("Compression Options (used if the output image is a JPEG image)\n");
- printf("--------------------------------------------------------------\n\n");
- printf("-subsamp <444|422|420|gray> = Apply this level of chrominance subsampling when\n");
- printf(" compressing the output image. The default is to use the same level of\n");
- printf(" subsampling as in the input image, if the input image is also a JPEG\n");
- printf(" image, or to use grayscale if the input image is a grayscale non-JPEG\n");
- printf(" image, or to use %s subsampling otherwise.\n\n",
- subsampName[DEFAULT_SUBSAMP]);
- printf("-q <1-100> = Compress the output image with this JPEG quality level\n");
- printf(" (default = %d).\n\n", DEFAULT_QUALITY);
- printf("Decompression Options (used if the input image is a JPEG image)\n");
- printf("---------------------------------------------------------------\n\n");
- printf("-scale M/N = Scale the input image by a factor of M/N when decompressing it.\n");
- printf("(M/N = ");
- for (i = 0; i < numScalingFactors; i++) {
- printf("%d/%d", scalingFactors[i].num, scalingFactors[i].denom);
- if (numScalingFactors == 2 && i != numScalingFactors - 1)
- printf(" or ");
- else if (numScalingFactors > 2) {
- if (i != numScalingFactors - 1)
- printf(", ");
- if (i == numScalingFactors - 2)
- printf("or ");
- }
- }
- printf(")\n\n");
- printf("-hflip, -vflip, -transpose, -transverse, -rot90, -rot180, -rot270 =\n");
- printf(" Perform one of these lossless transform operations on the input image\n");
- printf(" prior to decompressing it (these options are mutually exclusive.)\n\n");
- printf("-grayscale = Perform lossless grayscale conversion on the input image prior\n");
- printf(" to decompressing it (can be combined with the other transform operations\n");
- printf(" above.)\n\n");
- printf("-crop WxH+X+Y = Perform lossless cropping on the input image prior to\n");
- printf(" decompressing it. X and Y specify the upper left corner of the cropping\n");
- printf(" region, and W and H specify the width and height of the cropping region.\n");
- printf(" X and Y must be evenly divible by the MCU block size (8x8 if the input\n");
- printf(" image was compressed using no subsampling or grayscale, 16x8 if it was\n");
- printf(" compressed using 4:2:2 subsampling, or 16x16 if it was compressed using\n");
- printf(" 4:2:0 subsampling.)\n\n");
- printf("General Options\n");
- printf("---------------\n\n");
- printf("-fastupsample = Use the fastest chrominance upsampling algorithm available in\n");
- printf(" the underlying codec.\n\n");
- printf("-fastdct = Use the fastest DCT/IDCT algorithms available in the underlying\n");
- printf(" codec.\n\n");
- printf("-accuratedct = Use the most accurate DCT/IDCT algorithms available in the\n");
- printf(" underlying codec.\n\n");
- exit(1);
- }
- int main(int argc, char **argv)
- {
- tjscalingfactor scalingFactor = { 1, 1 };
- int outSubsamp = -1, outQual = -1;
- tjtransform xform;
- int flags = 0;
- int width, height;
- char *inFormat, *outFormat;
- FILE *jpegFile = NULL;
- unsigned char *imgBuf = NULL, *jpegBuf = NULL;
- int retval = 0, i, pixelFormat = TJPF_UNKNOWN;
- tjhandle tjInstance = NULL;
- if ((scalingFactors = tjGetScalingFactors(&numScalingFactors)) == NULL)
- THROW_TJ("getting scaling factors");
- memset(&xform, 0, sizeof(tjtransform));
- if (argc < 3)
- usage(argv[0]);
-
- for (i = 3; i < argc; i++) {
- if (!strncasecmp(argv[i], "-sc", 3) && i < argc - 1) {
- int match = 0, temp1 = 0, temp2 = 0, j;
- if (sscanf(argv[++i], "%d/%d", &temp1, &temp2) < 2)
- usage(argv[0]);
- for (j = 0; j < numScalingFactors; j++) {
- if ((double)temp1 / (double)temp2 == (double)scalingFactors[j].num /
- (double)scalingFactors[j].denom) {
- scalingFactor = scalingFactors[j];
- match = 1;
- break;
- }
- }
- if (match != 1)
- usage(argv[0]);
- } else if (!strncasecmp(argv[i], "-su", 3) && i < argc - 1) {
- i++;
- if (!strncasecmp(argv[i], "g", 1))
- outSubsamp = TJSAMP_GRAY;
- else if (!strcasecmp(argv[i], "444"))
- outSubsamp = TJSAMP_444;
- else if (!strcasecmp(argv[i], "422"))
- outSubsamp = TJSAMP_422;
- else if (!strcasecmp(argv[i], "420"))
- outSubsamp = TJSAMP_420;
- else
- usage(argv[0]);
- } else if (!strncasecmp(argv[i], "-q", 2) && i < argc - 1) {
- outQual = atoi(argv[++i]);
- if (outQual < 1 || outQual > 100)
- usage(argv[0]);
- } else if (!strncasecmp(argv[i], "-g", 2))
- xform.options |= TJXOPT_GRAY;
- else if (!strcasecmp(argv[i], "-hflip"))
- xform.op = TJXOP_HFLIP;
- else if (!strcasecmp(argv[i], "-vflip"))
- xform.op = TJXOP_VFLIP;
- else if (!strcasecmp(argv[i], "-transpose"))
- xform.op = TJXOP_TRANSPOSE;
- else if (!strcasecmp(argv[i], "-transverse"))
- xform.op = TJXOP_TRANSVERSE;
- else if (!strcasecmp(argv[i], "-rot90"))
- xform.op = TJXOP_ROT90;
- else if (!strcasecmp(argv[i], "-rot180"))
- xform.op = TJXOP_ROT180;
- else if (!strcasecmp(argv[i], "-rot270"))
- xform.op = TJXOP_ROT270;
- else if (!strcasecmp(argv[i], "-custom"))
- xform.customFilter = customFilter;
- else if (!strncasecmp(argv[i], "-c", 2) && i < argc - 1) {
- if (sscanf(argv[++i], "%dx%d+%d+%d", &xform.r.w, &xform.r.h, &xform.r.x,
- &xform.r.y) < 4 ||
- xform.r.x < 0 || xform.r.y < 0 || xform.r.w < 1 || xform.r.h < 1)
- usage(argv[0]);
- xform.options |= TJXOPT_CROP;
- } else if (!strcasecmp(argv[i], "-fastupsample")) {
- printf("Using fast upsampling code\n");
- flags |= TJFLAG_FASTUPSAMPLE;
- } else if (!strcasecmp(argv[i], "-fastdct")) {
- printf("Using fastest DCT/IDCT algorithm\n");
- flags |= TJFLAG_FASTDCT;
- } else if (!strcasecmp(argv[i], "-accuratedct")) {
- printf("Using most accurate DCT/IDCT algorithm\n");
- flags |= TJFLAG_ACCURATEDCT;
- } else usage(argv[0]);
- }
-
- inFormat = strrchr(argv[1], '.');
- outFormat = strrchr(argv[2], '.');
- if (inFormat == NULL || outFormat == NULL || strlen(inFormat) < 2 ||
- strlen(outFormat) < 2)
- usage(argv[0]);
- inFormat = &inFormat[1];
- outFormat = &outFormat[1];
- if (!strcasecmp(inFormat, "jpg")) {
-
- long size;
- int inSubsamp, inColorspace;
- int doTransform = (xform.op != TJXOP_NONE || xform.options != 0 ||
- xform.customFilter != NULL);
- unsigned long jpegSize;
-
- if ((jpegFile = fopen(argv[1], "rb")) == NULL)
- THROW_UNIX("opening input file");
- if (fseek(jpegFile, 0, SEEK_END) < 0 || ((size = ftell(jpegFile)) < 0) ||
- fseek(jpegFile, 0, SEEK_SET) < 0)
- THROW_UNIX("determining input file size");
- if (size == 0)
- THROW("determining input file size", "Input file contains no data");
- jpegSize = (unsigned long)size;
- if ((jpegBuf = (unsigned char *)tjAlloc(jpegSize)) == NULL)
- THROW_UNIX("allocating JPEG buffer");
- if (fread(jpegBuf, jpegSize, 1, jpegFile) < 1)
- THROW_UNIX("reading input file");
- fclose(jpegFile); jpegFile = NULL;
- if (doTransform) {
-
- unsigned char *dstBuf = NULL;
- unsigned long dstSize = 0;
- if ((tjInstance = tjInitTransform()) == NULL)
- THROW_TJ("initializing transformer");
- xform.options |= TJXOPT_TRIM;
- if (tjTransform(tjInstance, jpegBuf, jpegSize, 1, &dstBuf, &dstSize,
- &xform, flags) < 0)
- THROW_TJ("transforming input image");
- tjFree(jpegBuf);
- jpegBuf = dstBuf;
- jpegSize = dstSize;
- } else {
- if ((tjInstance = tjInitDecompress()) == NULL)
- THROW_TJ("initializing decompressor");
- }
- if (tjDecompressHeader3(tjInstance, jpegBuf, jpegSize, &width, &height,
- &inSubsamp, &inColorspace) < 0)
- THROW_TJ("reading JPEG header");
- printf("%s Image: %d x %d pixels, %s subsampling, %s colorspace\n",
- (doTransform ? "Transformed" : "Input"), width, height,
- subsampName[inSubsamp], colorspaceName[inColorspace]);
- if (!strcasecmp(outFormat, "jpg") && doTransform &&
- scalingFactor.num == 1 && scalingFactor.denom == 1 && outSubsamp < 0 &&
- outQual < 0) {
-
- if ((jpegFile = fopen(argv[2], "wb")) == NULL)
- THROW_UNIX("opening output file");
- if (fwrite(jpegBuf, jpegSize, 1, jpegFile) < 1)
- THROW_UNIX("writing output file");
- fclose(jpegFile); jpegFile = NULL;
- goto bailout;
- }
-
- width = TJSCALED(width, scalingFactor);
- height = TJSCALED(height, scalingFactor);
- if (outSubsamp < 0)
- outSubsamp = inSubsamp;
- pixelFormat = TJPF_BGRX;
- if ((imgBuf = (unsigned char *)tjAlloc(width * height *
- tjPixelSize[pixelFormat])) == NULL)
- THROW_UNIX("allocating uncompressed image buffer");
- if (tjDecompress2(tjInstance, jpegBuf, jpegSize, imgBuf, width, 0, height,
- pixelFormat, flags) < 0)
- THROW_TJ("decompressing JPEG image");
- tjFree(jpegBuf); jpegBuf = NULL;
- tjDestroy(tjInstance); tjInstance = NULL;
- } else {
-
- if ((imgBuf = tjLoadImage(argv[1], &width, 1, &height, &pixelFormat,
- 0)) == NULL)
- THROW_TJ("loading input image");
- if (outSubsamp < 0) {
- if (pixelFormat == TJPF_GRAY)
- outSubsamp = TJSAMP_GRAY;
- else
- outSubsamp = TJSAMP_444;
- }
- printf("Input Image: %d x %d pixels\n", width, height);
- }
- printf("Output Image (%s): %d x %d pixels", outFormat, width, height);
- if (!strcasecmp(outFormat, "jpg")) {
-
- unsigned long jpegSize = 0;
- jpegBuf = NULL;
- if (outQual < 0)
- outQual = DEFAULT_QUALITY;
- printf(", %s subsampling, quality = %d\n", subsampName[outSubsamp],
- outQual);
- if ((tjInstance = tjInitCompress()) == NULL)
- THROW_TJ("initializing compressor");
- if (tjCompress2(tjInstance, imgBuf, width, 0, height, pixelFormat,
- &jpegBuf, &jpegSize, outSubsamp, outQual, flags) < 0)
- THROW_TJ("compressing image");
- tjDestroy(tjInstance); tjInstance = NULL;
-
- if ((jpegFile = fopen(argv[2], "wb")) == NULL)
- THROW_UNIX("opening output file");
- if (fwrite(jpegBuf, jpegSize, 1, jpegFile) < 1)
- THROW_UNIX("writing output file");
- tjDestroy(tjInstance); tjInstance = NULL;
- fclose(jpegFile); jpegFile = NULL;
- tjFree(jpegBuf); jpegBuf = NULL;
- } else {
-
- printf("\n");
- if (tjSaveImage(argv[2], imgBuf, width, 0, height, pixelFormat, 0) < 0)
- THROW_TJ("saving output image");
- }
- bailout:
- tjFree(imgBuf);
- if (tjInstance) tjDestroy(tjInstance);
- tjFree(jpegBuf);
- if (jpegFile) fclose(jpegFile);
- return retval;
- }
|