123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693 |
- #include "cdjpeg.h"
- #include "jversion.h"
- #include "jconfigint.h"
- #ifndef HAVE_STDLIB_H
- extern void *malloc(size_t size);
- extern void free(void *ptr);
- #endif
- #ifdef USE_CCOMMAND
- #ifdef __MWERKS__
- #include <SIOUX.h> /* Metrowerks needs this */
- #include <console.h> /* ... and this */
- #endif
- #ifdef THINK_C
- #include <console.h> /* Think declares it here */
- #endif
- #endif
- #define JMESSAGE(code, string) string,
- static const char * const cdjpeg_message_table[] = {
- #include "cderror.h"
- NULL
- };
- static boolean is_targa;
- LOCAL(cjpeg_source_ptr)
- select_file_type(j_compress_ptr cinfo, FILE *infile)
- {
- int c;
- if (is_targa) {
- #ifdef TARGA_SUPPORTED
- return jinit_read_targa(cinfo);
- #else
- ERREXIT(cinfo, JERR_TGA_NOTCOMP);
- #endif
- }
- if ((c = getc(infile)) == EOF)
- ERREXIT(cinfo, JERR_INPUT_EMPTY);
- if (ungetc(c, infile) == EOF)
- ERREXIT(cinfo, JERR_UNGETC_FAILED);
- switch (c) {
- #ifdef BMP_SUPPORTED
- case 'B':
- return jinit_read_bmp(cinfo, TRUE);
- #endif
- #ifdef GIF_SUPPORTED
- case 'G':
- return jinit_read_gif(cinfo);
- #endif
- #ifdef PPM_SUPPORTED
- case 'P':
- return jinit_read_ppm(cinfo);
- #endif
- #ifdef RLE_SUPPORTED
- case 'R':
- return jinit_read_rle(cinfo);
- #endif
- #ifdef TARGA_SUPPORTED
- case 0x00:
- return jinit_read_targa(cinfo);
- #endif
- default:
- ERREXIT(cinfo, JERR_UNKNOWN_FORMAT);
- break;
- }
- return NULL;
- }
- static const char *progname;
- static char *icc_filename;
- static char *outfilename;
- boolean memdst;
- LOCAL(void)
- usage(void)
- {
- fprintf(stderr, "usage: %s [switches] ", progname);
- #ifdef TWO_FILE_COMMANDLINE
- fprintf(stderr, "inputfile outputfile\n");
- #else
- fprintf(stderr, "[inputfile]\n");
- #endif
- fprintf(stderr, "Switches (names may be abbreviated):\n");
- fprintf(stderr, " -quality N[,...] Compression quality (0..100; 5-95 is most useful range,\n");
- fprintf(stderr, " default is 75)\n");
- fprintf(stderr, " -grayscale Create monochrome JPEG file\n");
- fprintf(stderr, " -rgb Create RGB JPEG file\n");
- #ifdef ENTROPY_OPT_SUPPORTED
- fprintf(stderr, " -optimize Optimize Huffman table (smaller file, but slow compression)\n");
- #endif
- #ifdef C_PROGRESSIVE_SUPPORTED
- fprintf(stderr, " -progressive Create progressive JPEG file\n");
- #endif
- #ifdef TARGA_SUPPORTED
- fprintf(stderr, " -targa Input file is Targa format (usually not needed)\n");
- #endif
- fprintf(stderr, "Switches for advanced users:\n");
- #ifdef C_ARITH_CODING_SUPPORTED
- fprintf(stderr, " -arithmetic Use arithmetic coding\n");
- #endif
- #ifdef DCT_ISLOW_SUPPORTED
- fprintf(stderr, " -dct int Use integer DCT method%s\n",
- (JDCT_DEFAULT == JDCT_ISLOW ? " (default)" : ""));
- #endif
- #ifdef DCT_IFAST_SUPPORTED
- fprintf(stderr, " -dct fast Use fast integer DCT (less accurate)%s\n",
- (JDCT_DEFAULT == JDCT_IFAST ? " (default)" : ""));
- #endif
- #ifdef DCT_FLOAT_SUPPORTED
- fprintf(stderr, " -dct float Use floating-point DCT method%s\n",
- (JDCT_DEFAULT == JDCT_FLOAT ? " (default)" : ""));
- #endif
- fprintf(stderr, " -icc FILE Embed ICC profile contained in FILE\n");
- fprintf(stderr, " -restart N Set restart interval in rows, or in blocks with B\n");
- #ifdef INPUT_SMOOTHING_SUPPORTED
- fprintf(stderr, " -smooth N Smooth dithered input (N=1..100 is strength)\n");
- #endif
- fprintf(stderr, " -maxmemory N Maximum memory to use (in kbytes)\n");
- fprintf(stderr, " -outfile name Specify name for output file\n");
- #if JPEG_LIB_VERSION >= 80 || defined(MEM_SRCDST_SUPPORTED)
- fprintf(stderr, " -memdst Compress to memory instead of file (useful for benchmarking)\n");
- #endif
- fprintf(stderr, " -verbose or -debug Emit debug output\n");
- fprintf(stderr, " -version Print version information and exit\n");
- fprintf(stderr, "Switches for wizards:\n");
- fprintf(stderr, " -baseline Force baseline quantization tables\n");
- fprintf(stderr, " -qtables FILE Use quantization tables given in FILE\n");
- fprintf(stderr, " -qslots N[,...] Set component quantization tables\n");
- fprintf(stderr, " -sample HxV[,...] Set component sampling factors\n");
- #ifdef C_MULTISCAN_FILES_SUPPORTED
- fprintf(stderr, " -scans FILE Create multi-scan JPEG per script FILE\n");
- #endif
- exit(EXIT_FAILURE);
- }
- LOCAL(int)
- parse_switches(j_compress_ptr cinfo, int argc, char **argv,
- int last_file_arg_seen, boolean for_real)
- {
- int argn;
- char *arg;
- boolean force_baseline;
- boolean simple_progressive;
- char *qualityarg = NULL;
- char *qtablefile = NULL;
- char *qslotsarg = NULL;
- char *samplearg = NULL;
- char *scansarg = NULL;
-
- force_baseline = FALSE;
- simple_progressive = FALSE;
- is_targa = FALSE;
- icc_filename = NULL;
- outfilename = NULL;
- memdst = FALSE;
- cinfo->err->trace_level = 0;
-
- for (argn = 1; argn < argc; argn++) {
- arg = argv[argn];
- if (*arg != '-') {
-
- if (argn <= last_file_arg_seen) {
- outfilename = NULL;
- continue;
- }
- break;
- }
- arg++;
- if (keymatch(arg, "arithmetic", 1)) {
-
- #ifdef C_ARITH_CODING_SUPPORTED
- cinfo->arith_code = TRUE;
- #else
- fprintf(stderr, "%s: sorry, arithmetic coding not supported\n",
- progname);
- exit(EXIT_FAILURE);
- #endif
- } else if (keymatch(arg, "baseline", 1)) {
-
- force_baseline = TRUE;
- } else if (keymatch(arg, "dct", 2)) {
-
- if (++argn >= argc)
- usage();
- if (keymatch(argv[argn], "int", 1)) {
- cinfo->dct_method = JDCT_ISLOW;
- } else if (keymatch(argv[argn], "fast", 2)) {
- cinfo->dct_method = JDCT_IFAST;
- } else if (keymatch(argv[argn], "float", 2)) {
- cinfo->dct_method = JDCT_FLOAT;
- } else
- usage();
- } else if (keymatch(arg, "debug", 1) || keymatch(arg, "verbose", 1)) {
-
-
- static boolean printed_version = FALSE;
- if (!printed_version) {
- fprintf(stderr, "%s version %s (build %s)\n",
- PACKAGE_NAME, VERSION, BUILD);
- fprintf(stderr, "%s\n\n", JCOPYRIGHT);
- fprintf(stderr, "Emulating The Independent JPEG Group's software, version %s\n\n",
- JVERSION);
- printed_version = TRUE;
- }
- cinfo->err->trace_level++;
- } else if (keymatch(arg, "version", 4)) {
- fprintf(stderr, "%s version %s (build %s)\n",
- PACKAGE_NAME, VERSION, BUILD);
- exit(EXIT_SUCCESS);
- } else if (keymatch(arg, "grayscale", 2) ||
- keymatch(arg, "greyscale", 2)) {
-
- jpeg_set_colorspace(cinfo, JCS_GRAYSCALE);
- } else if (keymatch(arg, "rgb", 3)) {
-
- jpeg_set_colorspace(cinfo, JCS_RGB);
- } else if (keymatch(arg, "icc", 1)) {
-
- if (++argn >= argc)
- usage();
- icc_filename = argv[argn];
- } else if (keymatch(arg, "maxmemory", 3)) {
-
- long lval;
- char ch = 'x';
- if (++argn >= argc)
- usage();
- if (sscanf(argv[argn], "%ld%c", &lval, &ch) < 1)
- usage();
- if (ch == 'm' || ch == 'M')
- lval *= 1000L;
- cinfo->mem->max_memory_to_use = lval * 1000L;
- } else if (keymatch(arg, "optimize", 1) || keymatch(arg, "optimise", 1)) {
-
- #ifdef ENTROPY_OPT_SUPPORTED
- cinfo->optimize_coding = TRUE;
- #else
- fprintf(stderr, "%s: sorry, entropy optimization was not compiled in\n",
- progname);
- exit(EXIT_FAILURE);
- #endif
- } else if (keymatch(arg, "outfile", 4)) {
-
- if (++argn >= argc)
- usage();
- outfilename = argv[argn];
- } else if (keymatch(arg, "progressive", 1)) {
-
- #ifdef C_PROGRESSIVE_SUPPORTED
- simple_progressive = TRUE;
-
- #else
- fprintf(stderr, "%s: sorry, progressive output was not compiled in\n",
- progname);
- exit(EXIT_FAILURE);
- #endif
- } else if (keymatch(arg, "memdst", 2)) {
-
- #if JPEG_LIB_VERSION >= 80 || defined(MEM_SRCDST_SUPPORTED)
- memdst = TRUE;
- #else
- fprintf(stderr, "%s: sorry, in-memory destination manager was not compiled in\n",
- progname);
- exit(EXIT_FAILURE);
- #endif
- } else if (keymatch(arg, "quality", 1)) {
-
- if (++argn >= argc)
- usage();
- qualityarg = argv[argn];
- } else if (keymatch(arg, "qslots", 2)) {
-
- if (++argn >= argc)
- usage();
- qslotsarg = argv[argn];
-
- } else if (keymatch(arg, "qtables", 2)) {
-
- if (++argn >= argc)
- usage();
- qtablefile = argv[argn];
-
- } else if (keymatch(arg, "restart", 1)) {
-
- long lval;
- char ch = 'x';
- if (++argn >= argc)
- usage();
- if (sscanf(argv[argn], "%ld%c", &lval, &ch) < 1)
- usage();
- if (lval < 0 || lval > 65535L)
- usage();
- if (ch == 'b' || ch == 'B') {
- cinfo->restart_interval = (unsigned int)lval;
- cinfo->restart_in_rows = 0;
- } else {
- cinfo->restart_in_rows = (int)lval;
-
- }
- } else if (keymatch(arg, "sample", 2)) {
-
- if (++argn >= argc)
- usage();
- samplearg = argv[argn];
-
- } else if (keymatch(arg, "scans", 4)) {
-
- #ifdef C_MULTISCAN_FILES_SUPPORTED
- if (++argn >= argc)
- usage();
- scansarg = argv[argn];
-
- #else
- fprintf(stderr, "%s: sorry, multi-scan output was not compiled in\n",
- progname);
- exit(EXIT_FAILURE);
- #endif
- } else if (keymatch(arg, "smooth", 2)) {
-
- int val;
- if (++argn >= argc)
- usage();
- if (sscanf(argv[argn], "%d", &val) != 1)
- usage();
- if (val < 0 || val > 100)
- usage();
- cinfo->smoothing_factor = val;
- } else if (keymatch(arg, "targa", 1)) {
-
- is_targa = TRUE;
- } else {
- usage();
- }
- }
-
- if (for_real) {
-
-
- if (qualityarg != NULL)
- if (!set_quality_ratings(cinfo, qualityarg, force_baseline))
- usage();
- if (qtablefile != NULL)
- if (!read_quant_tables(cinfo, qtablefile, force_baseline))
- usage();
- if (qslotsarg != NULL)
- if (!set_quant_slots(cinfo, qslotsarg))
- usage();
- if (samplearg != NULL)
- if (!set_sample_factors(cinfo, samplearg))
- usage();
- #ifdef C_PROGRESSIVE_SUPPORTED
- if (simple_progressive)
- jpeg_simple_progression(cinfo);
- #endif
- #ifdef C_MULTISCAN_FILES_SUPPORTED
- if (scansarg != NULL)
- if (!read_scan_script(cinfo, scansarg))
- usage();
- #endif
- }
- return argn;
- }
- int
- main(int argc, char **argv)
- {
- struct jpeg_compress_struct cinfo;
- struct jpeg_error_mgr jerr;
- #ifdef PROGRESS_REPORT
- struct cdjpeg_progress_mgr progress;
- #endif
- int file_index;
- cjpeg_source_ptr src_mgr;
- FILE *input_file;
- FILE *icc_file;
- JOCTET *icc_profile = NULL;
- long icc_len = 0;
- FILE *output_file = NULL;
- unsigned char *outbuffer = NULL;
- unsigned long outsize = 0;
- JDIMENSION num_scanlines;
-
- #ifdef USE_CCOMMAND
- argc = ccommand(&argv);
- #endif
- progname = argv[0];
- if (progname == NULL || progname[0] == 0)
- progname = "cjpeg";
-
- cinfo.err = jpeg_std_error(&jerr);
- jpeg_create_compress(&cinfo);
-
- jerr.addon_message_table = cdjpeg_message_table;
- jerr.first_addon_message = JMSG_FIRSTADDONCODE;
- jerr.last_addon_message = JMSG_LASTADDONCODE;
-
- cinfo.in_color_space = JCS_RGB;
- jpeg_set_defaults(&cinfo);
-
- file_index = parse_switches(&cinfo, argc, argv, 0, FALSE);
- #ifdef TWO_FILE_COMMANDLINE
- if (!memdst) {
-
- if (outfilename == NULL) {
- if (file_index != argc - 2) {
- fprintf(stderr, "%s: must name one input and one output file\n",
- progname);
- usage();
- }
- outfilename = argv[file_index + 1];
- } else {
- if (file_index != argc - 1) {
- fprintf(stderr, "%s: must name one input and one output file\n",
- progname);
- usage();
- }
- }
- }
- #else
-
- if (file_index < argc - 1) {
- fprintf(stderr, "%s: only one input file\n", progname);
- usage();
- }
- #endif
-
- if (file_index < argc) {
- if ((input_file = fopen(argv[file_index], READ_BINARY)) == NULL) {
- fprintf(stderr, "%s: can't open %s\n", progname, argv[file_index]);
- exit(EXIT_FAILURE);
- }
- } else {
-
- input_file = read_stdin();
- }
-
- if (outfilename != NULL) {
- if ((output_file = fopen(outfilename, WRITE_BINARY)) == NULL) {
- fprintf(stderr, "%s: can't open %s\n", progname, outfilename);
- exit(EXIT_FAILURE);
- }
- } else if (!memdst) {
-
- output_file = write_stdout();
- }
- if (icc_filename != NULL) {
- if ((icc_file = fopen(icc_filename, READ_BINARY)) == NULL) {
- fprintf(stderr, "%s: can't open %s\n", progname, icc_filename);
- exit(EXIT_FAILURE);
- }
- if (fseek(icc_file, 0, SEEK_END) < 0 ||
- (icc_len = ftell(icc_file)) < 1 ||
- fseek(icc_file, 0, SEEK_SET) < 0) {
- fprintf(stderr, "%s: can't determine size of %s\n", progname,
- icc_filename);
- exit(EXIT_FAILURE);
- }
- if ((icc_profile = (JOCTET *)malloc(icc_len)) == NULL) {
- fprintf(stderr, "%s: can't allocate memory for ICC profile\n", progname);
- fclose(icc_file);
- exit(EXIT_FAILURE);
- }
- if (fread(icc_profile, icc_len, 1, icc_file) < 1) {
- fprintf(stderr, "%s: can't read ICC profile from %s\n", progname,
- icc_filename);
- free(icc_profile);
- fclose(icc_file);
- exit(EXIT_FAILURE);
- }
- fclose(icc_file);
- }
- #ifdef PROGRESS_REPORT
- start_progress_monitor((j_common_ptr)&cinfo, &progress);
- #endif
-
- src_mgr = select_file_type(&cinfo, input_file);
- src_mgr->input_file = input_file;
-
- (*src_mgr->start_input) (&cinfo, src_mgr);
-
- jpeg_default_colorspace(&cinfo);
-
- file_index = parse_switches(&cinfo, argc, argv, 0, TRUE);
-
- #if JPEG_LIB_VERSION >= 80 || defined(MEM_SRCDST_SUPPORTED)
- if (memdst)
- jpeg_mem_dest(&cinfo, &outbuffer, &outsize);
- else
- #endif
- jpeg_stdio_dest(&cinfo, output_file);
-
- jpeg_start_compress(&cinfo, TRUE);
- if (icc_profile != NULL)
- jpeg_write_icc_profile(&cinfo, icc_profile, (unsigned int)icc_len);
-
- while (cinfo.next_scanline < cinfo.image_height) {
- num_scanlines = (*src_mgr->get_pixel_rows) (&cinfo, src_mgr);
- (void)jpeg_write_scanlines(&cinfo, src_mgr->buffer, num_scanlines);
- }
-
- (*src_mgr->finish_input) (&cinfo, src_mgr);
- jpeg_finish_compress(&cinfo);
- jpeg_destroy_compress(&cinfo);
-
- if (input_file != stdin)
- fclose(input_file);
- if (output_file != stdout && output_file != NULL)
- fclose(output_file);
- #ifdef PROGRESS_REPORT
- end_progress_monitor((j_common_ptr)&cinfo);
- #endif
- if (memdst) {
- fprintf(stderr, "Compressed size: %lu bytes\n", outsize);
- free(outbuffer);
- }
- free(icc_profile);
-
- exit(jerr.num_warnings ? EXIT_WARNING : EXIT_SUCCESS);
- return 0;
- }
|