applications/codec/j2k_to_image.c

   1 /*
   2  * Copyright (c) 2002-2007, Communications and Remote Sensing Laboratory, Universite catholique de Louvain (UCL), Belgium
   3  * Copyright (c) 2002-2007, Professor Benoit Macq
   4  * Copyright (c) 2001-2003, David Janssens
   5  * Copyright (c) 2002-2003, Yannick Verschueren
   6  * Copyright (c) 2003-2007, Francois-Olivier Devaux and Antonin Descampe
   7  * Copyright (c) 2005, Herve Drolon, FreeImage Team
   8  * Copyright (c) 2006-2007, Parvatha Elangovan
   9  * All rights reserved.
  10  *
  11  * Redistribution and use in source and binary forms, with or without
  12  * modification, are permitted provided that the following conditions
  13  * are met:
  14  * 1. Redistributions of source code must retain the above copyright
  15  *    notice, this list of conditions and the following disclaimer.
  16  * 2. Redistributions in binary form must reproduce the above copyright
  17  *    notice, this list of conditions and the following disclaimer in the
  18  *    documentation and/or other materials provided with the distribution.
  19  *
  20  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS `AS IS'
  21  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  23  * ARE DISCLAIMED.  IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
  24  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  25  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  26  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  27  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  28  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  29  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  30  * POSSIBILITY OF SUCH DAMAGE.
  31  */
  32 #include "opj_config.h"
  33
  34 #include <stdio.h>
  35 #include <string.h>
  36 #include <stdlib.h>
  37 #include <math.h>
  38
  39 #ifdef _WIN32
  40 #include "windirent.h"
  41 #else
  42 #include <dirent.h>
  43 #endif /* _WIN32 */
  44
  45 #ifdef _WIN32
  46 #include <windows.h>
  47 #else
  48 #include <strings.h>
  49 #define _stricmp strcasecmp
  50 #define _strnicmp strncasecmp
  51 #endif /* _WIN32 */
  52
  53 #include "opj_config.h"
  54 #include "openjpeg.h"
  55 #include "opj_getopt.h"
  56 #include "convert.h"
  57 #include "index.h"
  58
  59 #ifdef HAVE_LIBLCMS2
  60 #include <lcms2.h>
  61 #endif
  62 #ifdef HAVE_LIBLCMS1
  63 #include <lcms.h>
  64 #endif
  65 #include "color.h"
  66
  67 #include "format_defs.h"
  68
  69 typedef struct dircnt{
  70         /** Buffer for holding images read from Directory*/
  71         char *filename_buf;
  72         /** Pointer to the buffer*/
  73         char **filename;
  74 }dircnt_t;
  75
  76
  77 typedef struct img_folder{
  78         /** The directory path of the folder containing input images*/
  79         char *imgdirpath;
  80         /** Output format*/
  81         const char *out_format;
  82         /** Enable option*/
  83         char set_imgdir;
  84         /** Enable Cod Format for output*/
  85         char set_out_format;
  86
  87 }img_fol_t;
  88
  89 void decode_help_display(void) {
  90         fprintf(stdout,"HELP for j2k_to_image\n----\n\n");
  91         fprintf(stdout,"- the -h option displays this help information on screen\n\n");
  92
  93 /* UniPG>> */
  94         fprintf(stdout,"List of parameters for the JPEG 2000 "
  95 #ifdef USE_JPWL
  96                 "+ JPWL "
  97 #endif /* USE_JPWL */
  98                 "decoder:\n");
  99 /* <<UniPG */
 100         fprintf(stdout,"\n");
 101         fprintf(stdout,"\n");
 102         fprintf(stdout,"  -ImgDir \n");
 103         fprintf(stdout,"        Image file Directory path \n");
 104         fprintf(stdout,"  -OutFor \n");
 105         fprintf(stdout,"    REQUIRED only if -ImgDir is used\n");
 106         fprintf(stdout,"          Need to specify only format without filename <BMP>  \n");
 107         fprintf(stdout,"    Currently accepts PGM, PPM, PNM, PGX, PNG, BMP, TIF, RAW and TGA formats\n");
 108         fprintf(stdout,"  -i <compressed file>\n");
 109         fprintf(stdout,"    REQUIRED only if an Input image directory not specified\n");
 110         fprintf(stdout,"    Currently accepts J2K-files, JP2-files and JPT-files. The file type\n");
 111         fprintf(stdout,"    is identified based on its suffix.\n");
 112         fprintf(stdout,"  -o <decompressed file>\n");
 113         fprintf(stdout,"    REQUIRED\n");
 114         fprintf(stdout,"    Currently accepts PGM, PPM, PNM, PGX, PNG, BMP, TIF, RAW and TGA files\n");
 115         fprintf(stdout,"    Binary data is written to the file (not ascii). If a PGX\n");
 116         fprintf(stdout,"    filename is given, there will be as many output files as there are\n");
 117         fprintf(stdout,"    components: an indice starting from 0 will then be appended to the\n");
 118         fprintf(stdout,"    output filename, just before the \"pgx\" extension. If a PGM filename\n");
 119         fprintf(stdout,"    is given and there are more than one component, only the first component\n");
 120         fprintf(stdout,"    will be written to the file.\n");
 121         fprintf(stdout,"  -r <reduce factor>\n");
 122         fprintf(stdout,"    Set the number of highest resolution levels to be discarded. The\n");
 123         fprintf(stdout,"    image resolution is effectively divided by 2 to the power of the\n");
 124         fprintf(stdout,"    number of discarded levels. The reduce factor is limited by the\n");
 125         fprintf(stdout,"    smallest total number of decomposition levels among tiles.\n");
 126         fprintf(stdout,"  -l <number of quality layers to decode>\n");
 127         fprintf(stdout,"    Set the maximum number of quality layers to decode. If there are\n");
 128         fprintf(stdout,"    less quality layers than the specified number, all the quality layers\n");
 129         fprintf(stdout,"    are decoded.\n");
 130         fprintf(stdout,"  -x  \n");
 131         fprintf(stdout,"    Create an index file *.Idx (-x index_name.Idx) \n");
 132         fprintf(stdout,"\n");
 133 /* UniPG>> */
 134 #ifdef USE_JPWL
 135         fprintf(stdout,"  -W <options>\n");
 136         fprintf(stdout,"    Activates the JPWL correction capability, if the codestream complies.\n");
 137         fprintf(stdout,"    Options can be a comma separated list of <param=val> tokens:\n");
 138         fprintf(stdout,"    c, c=numcomps\n");
 139         fprintf(stdout,"       numcomps is the number of expected components in the codestream\n");
 140         fprintf(stdout,"       (search of first EPB rely upon this, default is %d)\n", JPWL_EXPECTED_COMPONENTS);
 141 #endif /* USE_JPWL */
 142 /* <<UniPG */
 143         fprintf(stdout,"\n");
 144 }
 145
 146 /* -------------------------------------------------------------------------- */
 147
 148 int get_num_images(char *imgdirpath){
 149         DIR *dir;
 150         struct dirent* content;
 151         int num_images = 0;
 152
 153         /*Reading the input images from given input directory*/
 154
 155         dir= opendir(imgdirpath);
 156         if(!dir){
 157                 fprintf(stderr,"Could not open Folder %s\n",imgdirpath);
 158                 return 0;
 159         }
 160
 161         while((content=readdir(dir))!=NULL){
 162                 if(strcmp(".",content->d_name)==0 || strcmp("..",content->d_name)==0 )
 163                         continue;
 164                 num_images++;
 165         }
 166         return num_images;
 167 }
 168
 169 int load_images(dircnt_t *dirptr, char *imgdirpath){
 170         DIR *dir;
 171         struct dirent* content;
 172         int i = 0;
 173
 174         /*Reading the input images from given input directory*/
 175
 176         dir= opendir(imgdirpath);
 177         if(!dir){
 178                 fprintf(stderr,"Could not open Folder %s\n",imgdirpath);
 179                 return 1;
 180         }else   {
 181                 fprintf(stderr,"Folder opened successfully\n");
 182         }
 183
 184         while((content=readdir(dir))!=NULL){
 185                 if(strcmp(".",content->d_name)==0 || strcmp("..",content->d_name)==0 )
 186                         continue;
 187
 188                 strcpy(dirptr->filename[i],content->d_name);
 189                 i++;
 190         }
 191         return 0;
 192 }
 193
 194 int get_file_format(char *filename) {
 195         unsigned int i;
 196         static const char *extension[] = {"pgx", "pnm", "pgm", "ppm", "bmp","tif", "raw", "tga", "png", "j2k", "jp2", "jpt", "j2c", "jpc" };
 197         static const int format[] = { PGX_DFMT, PXM_DFMT, PXM_DFMT, PXM_DFMT, BMP_DFMT, TIF_DFMT, RAW_DFMT, TGA_DFMT, PNG_DFMT, J2K_CFMT, JP2_CFMT, JPT_CFMT, J2K_CFMT, J2K_CFMT };
 198         char * ext = strrchr(filename, '.');
 199         if (ext == NULL)
 200                 return -1;
 201         ext++;
 202         if(ext) {
 203                 for(i = 0; i < sizeof(format)/sizeof(*format); i++) {
 204                         if(_strnicmp(ext, extension[i], 3) == 0) {
 205                                 return format[i];
 206                         }
 207                 }
 208         }
 209
 210         return -1;
 211 }
 212
 213 char get_next_file(int imageno,dircnt_t *dirptr,img_fol_t *img_fol, opj_dparameters_t *parameters){
 214         char image_filename[OPJ_PATH_LEN], infilename[OPJ_PATH_LEN],outfilename[OPJ_PATH_LEN],temp_ofname[OPJ_PATH_LEN];
 215         char *temp_p, temp1[OPJ_PATH_LEN]="";
 216
 217         strcpy(image_filename,dirptr->filename[imageno]);
 218         fprintf(stderr,"File Number %d \"%s\"\n",imageno,image_filename);
 219         parameters->decod_format = get_file_format(image_filename);
 220         if (parameters->decod_format == -1)
 221                 return 1;
 222         sprintf(infilename,"%s/%s",img_fol->imgdirpath,image_filename);
 223         strncpy(parameters->infile, infilename, sizeof(infilename));
 224
 225         //Set output file
 226         strcpy(temp_ofname,strtok(image_filename,"."));
 227         while((temp_p = strtok(NULL,".")) != NULL){
 228                 strcat(temp_ofname,temp1);
 229                 sprintf(temp1,".%s",temp_p);
 230         }
 231         if(img_fol->set_out_format==1){
 232                 sprintf(outfilename,"%s/%s.%s",img_fol->imgdirpath,temp_ofname,img_fol->out_format);
 233                 strncpy(parameters->outfile, outfilename, sizeof(outfilename));
 234         }
 235         return 0;
 236 }
 237
 238 /* -------------------------------------------------------------------------- */
 239 int parse_cmdline_decoder(int argc, char **argv, opj_dparameters_t *parameters,img_fol_t *img_fol, char *indexfilename) {
 240         /* parse the command line */
 241         int totlen, c;
 242         opj_option_t long_option[]={
 243                 {"ImgDir",REQ_ARG, NULL ,'y'},
 244                 {"OutFor",REQ_ARG, NULL ,'O'},
 245         };
 246
 247         const char optlist[] = "i:o:r:l:x:"
 248
 249 /* UniPG>> */
 250 #ifdef USE_JPWL
 251                                         "W:"
 252 #endif /* USE_JPWL */
 253 /* <<UniPG */
 254                         "h"             ;
 255         totlen=sizeof(long_option);
 256         img_fol->set_out_format = 0;
 257         do {
 258                 c = opj_getopt_long(argc, argv,optlist,long_option,totlen);
 259                 if (c == -1)
 260                         break;
 261                 switch (c) {
 262                         case 'i':                       /* input file */
 263                         {
 264                                 char *infile = opj_optarg;
 265                                 parameters->decod_format = get_file_format(infile);
 266                                 switch(parameters->decod_format) {
 267                                         case J2K_CFMT:
 268                                         case JP2_CFMT:
 269                                         case JPT_CFMT:
 270                                                 break;
 271                                         default:
 272                                                 fprintf(stderr,
 273                                                         "!! Unrecognized format for infile : %s [accept only *.j2k, *.jp2, *.jpc or *.jpt] !!\n\n",
 274                                                         infile);
 275                                                 return 1;
 276                                 }
 277                                 strncpy(parameters->infile, infile, sizeof(parameters->infile)-1);
 278                         }
 279                         break;
 280
 281                                 /* ----------------------------------------------------- */
 282
 283                         case 'o':                       /* output file */
 284                         {
 285                                 char *outfile = opj_optarg;
 286                                 parameters->cod_format = get_file_format(outfile);
 287                                 switch(parameters->cod_format) {
 288                                         case PGX_DFMT:
 289                                         case PXM_DFMT:
 290                                         case BMP_DFMT:
 291                                         case TIF_DFMT:
 292                                         case RAW_DFMT:
 293                                         case TGA_DFMT:
 294                                         case PNG_DFMT:
 295                                                 break;
 296                                         default:
 297                                                 fprintf(stderr, "Unknown output format image %s [only *.pnm, *.pgm, *.ppm, *.pgx, *.bmp, *.tif, *.raw or *.tga]!! \n", outfile);
 298                                                 return 1;
 299                                 }
 300                                 strncpy(parameters->outfile, outfile, sizeof(parameters->outfile)-1);
 301                         }
 302                         break;
 303
 304                                 /* ----------------------------------------------------- */
 305
 306                         case 'O':                       /* output format */
 307                         {
 308                                 char outformat[50];
 309                                 char *of = opj_optarg;
 310                                 sprintf(outformat,".%s",of);
 311                                 img_fol->set_out_format = 1;
 312                                 parameters->cod_format = get_file_format(outformat);
 313                                 switch(parameters->cod_format) {
 314                                         case PGX_DFMT:
 315                                                 img_fol->out_format = "pgx";
 316                                                 break;
 317                                         case PXM_DFMT:
 318                                                 img_fol->out_format = "ppm";
 319                                                 break;
 320                                         case BMP_DFMT:
 321                                                 img_fol->out_format = "bmp";
 322                                                 break;
 323                                         case TIF_DFMT:
 324                                                 img_fol->out_format = "tif";
 325                                                 break;
 326                                         case RAW_DFMT:
 327                                                 img_fol->out_format = "raw";
 328                                                 break;
 329                                         case TGA_DFMT:
 330                                                 img_fol->out_format = "raw";
 331                                                 break;
 332                                         case PNG_DFMT:
 333                                                 img_fol->out_format = "png";
 334                                                 break;
 335                                         default:
 336                                                 fprintf(stderr, "Unknown output format image %s [only *.pnm, *.pgm, *.ppm, *.pgx, *.bmp, *.tif, *.raw or *.tga]!! \n", outformat);
 337                                                 return 1;
 338                                                 break;
 339                                 }
 340                         }
 341                         break;
 342
 343                                 /* ----------------------------------------------------- */
 344
 345
 346                         case 'r':               /* reduce option */
 347                         {
 348                                 sscanf(opj_optarg, "%d", &parameters->cp_reduce);
 349                         }
 350                         break;
 351
 352                                 /* ----------------------------------------------------- */
 353
 354
 355                         case 'l':               /* layering option */
 356                         {
 357                                 sscanf(opj_optarg, "%d", &parameters->cp_layer);
 358                         }
 359                         break;
 360
 361                                 /* ----------------------------------------------------- */
 362
 363                         case 'h':                       /* display an help description */
 364                                 decode_help_display();
 365                                 return 1;
 366
 367                                 /* ------------------------------------------------------ */
 368
 369                         case 'y':                       /* Image Directory path */
 370                                 {
 371                                         img_fol->imgdirpath = (char*)malloc(strlen(opj_optarg) + 1);
 372                                         strcpy(img_fol->imgdirpath,opj_optarg);
 373                                         img_fol->set_imgdir=1;
 374                                 }
 375                                 break;
 376                                 /* ----------------------------------------------------- */
 377                         case 'x':                       /* Creation of index file */
 378                                 {
 379                                         char *index = opj_optarg;
 380                                         strncpy(indexfilename, index, OPJ_PATH_LEN);
 381                                 }
 382                                 break;
 383                                 /* ----------------------------------------------------- */
 384                                 /* UniPG>> */
 385 #ifdef USE_JPWL
 386
 387                         case 'W':                       /* activate JPWL correction */
 388                         {
 389                                 char *token = NULL;
 390
 391                                 token = strtok(opj_optarg, ",");
 392                                 while(token != NULL) {
 393
 394                                         /* search expected number of components */
 395                                         if (*token == 'c') {
 396
 397                                                 static int compno;
 398
 399                                                 compno = JPWL_EXPECTED_COMPONENTS; /* predefined no. of components */
 400
 401                                                 if(sscanf(token, "c=%d", &compno) == 1) {
 402                                                         /* Specified */
 403                                                         if ((compno < 1) || (compno > 256)) {
 404                                                                 fprintf(stderr, "ERROR -> invalid number of components c = %d\n", compno);
 405                                                                 return 1;
 406                                                         }
 407                                                         parameters->jpwl_exp_comps = compno;
 408
 409                                                 } else if (!strcmp(token, "c")) {
 410                                                         /* default */
 411                                                         parameters->jpwl_exp_comps = compno; /* auto for default size */
 412
 413                                                 } else {
 414                                                         fprintf(stderr, "ERROR -> invalid components specified = %s\n", token);
 415                                                         return 1;
 416                                                 };
 417                                         }
 418
 419                                         /* search maximum number of tiles */
 420                                         if (*token == 't') {
 421
 422                                                 static int tileno;
 423
 424                                                 tileno = JPWL_MAXIMUM_TILES; /* maximum no. of tiles */
 425
 426                                                 if(sscanf(token, "t=%d", &tileno) == 1) {
 427                                                         /* Specified */
 428                                                         if ((tileno < 1) || (tileno > JPWL_MAXIMUM_TILES)) {
 429                                                                 fprintf(stderr, "ERROR -> invalid number of tiles t = %d\n", tileno);
 430                                                                 return 1;
 431                                                         }
 432                                                         parameters->jpwl_max_tiles = tileno;
 433
 434                                                 } else if (!strcmp(token, "t")) {
 435                                                         /* default */
 436                                                         parameters->jpwl_max_tiles = tileno; /* auto for default size */
 437
 438                                                 } else {
 439                                                         fprintf(stderr, "ERROR -> invalid tiles specified = %s\n", token);
 440                                                         return 1;
 441                                                 };
 442                                         }
 443
 444                                         /* next token or bust */
 445                                         token = strtok(NULL, ",");
 446                                 };
 447                                 parameters->jpwl_correct = OPJ_TRUE;
 448                                 fprintf(stdout, "JPWL correction capability activated\n");
 449                                 fprintf(stdout, "- expecting %d components\n", parameters->jpwl_exp_comps);
 450                         }
 451                         break;
 452 #endif /* USE_JPWL */
 453 /* <<UniPG */
 454
 455                                 /* ----------------------------------------------------- */
 456
 457                         default:
 458                                 fprintf(stderr,"WARNING -> this option is not valid \"-%c %s\"\n",c, opj_optarg);
 459                                 break;
 460                 }
 461         }while(c != -1);
 462
 463         /* check for possible errors */
 464         if(img_fol->set_imgdir==1){
 465                 if(!(parameters->infile[0]==0)){
 466                         fprintf(stderr, "Error: options -ImgDir and -i cannot be used together !!\n");
 467                         return 1;
 468                 }
 469                 if(img_fol->set_out_format == 0){
 470                         fprintf(stderr, "Error: When -ImgDir is used, -OutFor <FORMAT> must be used !!\n");
 471                         fprintf(stderr, "Only one format allowed! Valid format PGM, PPM, PNM, PGX, BMP, TIF, RAW and TGA!!\n");
 472                         return 1;
 473                 }
 474                 if(!((parameters->outfile[0] == 0))){
 475                         fprintf(stderr, "Error: options -ImgDir and -o cannot be used together !!\n");
 476                         return 1;
 477                 }
 478         }else{
 479                 if((parameters->infile[0] == 0) || (parameters->outfile[0] == 0)) {
 480                         fprintf(stderr, "Example: %s -i image.j2k -o image.pgm\n",argv[0]);
 481                         fprintf(stderr, "    Try: %s -h\n",argv[0]);
 482                         return 1;
 483                 }
 484         }
 485
 486         return 0;
 487 }
 488
 489 /* -------------------------------------------------------------------------- */
 490
 491 /**
 492 sample error callback expecting a FILE* client object
 493 */
 494 void error_callback(const char *msg, void *client_data) {
 495         FILE *stream = (FILE*)client_data;
 496         fprintf(stream, "[ERROR] %s", msg);
 497 }
 498 /**
 499 sample warning callback expecting a FILE* client object
 500 */
 501 void warning_callback(const char *msg, void *client_data) {
 502         FILE *stream = (FILE*)client_data;
 503         fprintf(stream, "[WARNING] %s", msg);
 504 }
 505 /**
 506 sample debug callback expecting no client object
 507 */
 508 void info_callback(const char *msg, void *client_data) {
 509         (void)client_data;
 510         fprintf(stdout, "[INFO] %s", msg);
 511 }
 512
 513 /* -------------------------------------------------------------------------- */
 514
 515 int main(int argc, char **argv) {
 516         opj_dparameters_t parameters;   /* decompression parameters */
 517         img_fol_t img_fol;
 518         opj_event_mgr_t event_mgr;              /* event manager */
 519         opj_image_t *image = NULL;
 520         FILE *fsrc = NULL;
 521         unsigned char *src = NULL;
 522         int file_length;
 523         int num_images;
 524         int i,imageno;
 525         dircnt_t *dirptr = NULL;
 526         opj_dinfo_t* dinfo = NULL;      /* handle to a decompressor */
 527         opj_cio_t *cio = NULL;
 528         opj_codestream_info_t cstr_info;  /* Codestream information structure */
 529         char indexfilename[OPJ_PATH_LEN];       /* index file name */
 530
 531         /* configure the event callbacks (not required) */
 532         memset(&event_mgr, 0, sizeof(opj_event_mgr_t));
 533         event_mgr.error_handler = error_callback;
 534         event_mgr.warning_handler = warning_callback;
 535         event_mgr.info_handler = info_callback;
 536
 537         /* set decoding parameters to default values */
 538         opj_set_default_decoder_parameters(&parameters);
 539
 540         /* Initialize indexfilename and img_fol */
 541         *indexfilename = 0;
 542         memset(&img_fol,0,sizeof(img_fol_t));
 543
 544         /* parse input and get user encoding parameters */
 545         if(parse_cmdline_decoder(argc, argv, &parameters,&img_fol, indexfilename) == 1) {
 546                 return 1;
 547         }
 548
 549         /* Initialize reading of directory */
 550         if(img_fol.set_imgdir==1){
 551                 num_images=get_num_images(img_fol.imgdirpath);
 552
 553                 dirptr=(dircnt_t*)malloc(sizeof(dircnt_t));
 554                 if(dirptr){
 555                         dirptr->filename_buf = (char*)malloc(num_images*OPJ_PATH_LEN*sizeof(char));     // Stores at max 10 image file names
 556                         dirptr->filename = (char**) malloc(num_images*sizeof(char*));
 557
 558                         if(!dirptr->filename_buf){
 559                                 return 1;
 560                         }
 561                         for(i=0;i<num_images;i++){
 562                                 dirptr->filename[i] = dirptr->filename_buf + i*OPJ_PATH_LEN;
 563                         }
 564                 }
 565                 if(load_images(dirptr,img_fol.imgdirpath)==1){
 566                         return 1;
 567                 }
 568                 if (num_images==0){
 569                         fprintf(stdout,"Folder is empty\n");
 570                         return 1;
 571                 }
 572         }else{
 573                 num_images=1;
 574         }
 575
 576         /*Encoding image one by one*/
 577         for(imageno = 0; imageno < num_images ; imageno++)      {
 578                 image = NULL;
 579                 fprintf(stderr,"\n");
 580
 581                 if(img_fol.set_imgdir==1){
 582                         if (get_next_file(imageno, dirptr,&img_fol, &parameters)) {
 583                                 fprintf(stderr,"skipping file...\n");
 584                                 continue;
 585                         }
 586                 }
 587
 588                 /* read the input file and put it in memory */
 589                 /* ---------------------------------------- */
 590                 fsrc = fopen(parameters.infile, "rb");
 591                 if (!fsrc) {
 592                         fprintf(stderr, "ERROR -> failed to open %s for reading\n", parameters.infile);
 593                         return 1;
 594                 }
 595                 fseek(fsrc, 0, SEEK_END);
 596                 file_length = ftell(fsrc);
 597                 fseek(fsrc, 0, SEEK_SET);
 598                 src = (unsigned char *) malloc(file_length);
 599                 if (fread(src, 1, file_length, fsrc) != (size_t)file_length)
 600                 {
 601                         free(src);
 602                         fclose(fsrc);
 603                         fprintf(stderr, "\nERROR: fread return a number of element different from the expected.\n");
 604                         return 1;
 605                 }
 606                 fclose(fsrc);
 607
 608                 /* decode the code-stream */
 609                 /* ---------------------- */
 610
 611                 switch(parameters.decod_format) {
 612                 case J2K_CFMT:
 613                 {
 614                         /* JPEG-2000 codestream */
 615
 616                         /* get a decoder handle */
 617                         dinfo = opj_create_decompress(CODEC_J2K);
 618
 619                         /* catch events using our callbacks and give a local context */
 620                         opj_set_event_mgr((opj_common_ptr)dinfo, &event_mgr, stderr);
 621
 622                         /* setup the decoder decoding parameters using user parameters */
 623                         opj_setup_decoder(dinfo, &parameters);
 624
 625                         /* open a byte stream */
 626                         cio = opj_cio_open((opj_common_ptr)dinfo, src, file_length);
 627
 628                         /* decode the stream and fill the image structure */
 629                         if (*indexfilename)                             // If need to extract codestream information
 630                                 image = opj_decode_with_info(dinfo, cio, &cstr_info);
 631                         else
 632                                 image = opj_decode(dinfo, cio);
 633                         if(!image) {
 634                                 fprintf(stderr, "ERROR -> j2k_to_image: failed to decode image!\n");
 635                                 opj_destroy_decompress(dinfo);
 636                                 opj_cio_close(cio);
 637                                 return 1;
 638                         }
 639
 640                         /* close the byte stream */
 641                         opj_cio_close(cio);
 642
 643                         /* Write the index to disk */
 644                         if (*indexfilename) {
 645                                 opj_bool bSuccess;
 646                                 bSuccess = write_index_file(&cstr_info, indexfilename);
 647                                 if (bSuccess) {
 648                                         fprintf(stderr, "Failed to output index file\n");
 649                                 }
 650                         }
 651                 }
 652                 break;
 653
 654                 case JP2_CFMT:
 655                 {
 656                         /* JPEG 2000 compressed image data */
 657
 658                         /* get a decoder handle */
 659                         dinfo = opj_create_decompress(CODEC_JP2);
 660
 661                         /* catch events using our callbacks and give a local context */
 662                         opj_set_event_mgr((opj_common_ptr)dinfo, &event_mgr, stderr);
 663
 664                         /* setup the decoder decoding parameters using the current image and user parameters */
 665                         opj_setup_decoder(dinfo, &parameters);
 666
 667                         /* open a byte stream */
 668                         cio = opj_cio_open((opj_common_ptr)dinfo, src, file_length);
 669
 670                         /* decode the stream and fill the image structure */
 671                         if (*indexfilename)                             // If need to extract codestream information
 672                                 image = opj_decode_with_info(dinfo, cio, &cstr_info);
 673                         else
 674                                 image = opj_decode(dinfo, cio);
 675                         if(!image) {
 676                                 fprintf(stderr, "ERROR -> j2k_to_image: failed to decode image!\n");
 677                                 opj_destroy_decompress(dinfo);
 678                                 opj_cio_close(cio);
 679                                 return 1;
 680                         }
 681
 682                         /* close the byte stream */
 683                         opj_cio_close(cio);
 684
 685                         /* Write the index to disk */
 686                         if (*indexfilename) {
 687                                 opj_bool bSuccess;
 688                                 bSuccess = write_index_file(&cstr_info, indexfilename);
 689                                 if (bSuccess) {
 690                                         fprintf(stderr, "Failed to output index file\n");
 691                                 }
 692                         }
 693                 }
 694                 break;
 695
 696                 case JPT_CFMT:
 697                 {
 698                         /* JPEG 2000, JPIP */
 699
 700                         /* get a decoder handle */
 701                         dinfo = opj_create_decompress(CODEC_JPT);
 702
 703                         /* catch events using our callbacks and give a local context */
 704                         opj_set_event_mgr((opj_common_ptr)dinfo, &event_mgr, stderr);
 705
 706                         /* setup the decoder decoding parameters using user parameters */
 707                         opj_setup_decoder(dinfo, &parameters);
 708
 709                         /* open a byte stream */
 710                         cio = opj_cio_open((opj_common_ptr)dinfo, src, file_length);
 711
 712                         /* decode the stream and fill the image structure */
 713                         if (*indexfilename)                             // If need to extract codestream information
 714                                 image = opj_decode_with_info(dinfo, cio, &cstr_info);
 715                         else
 716                                 image = opj_decode(dinfo, cio);
 717                         if(!image) {
 718                                 fprintf(stderr, "ERROR -> j2k_to_image: failed to decode image!\n");
 719                                 opj_destroy_decompress(dinfo);
 720                                 opj_cio_close(cio);
 721                                 return 1;
 722                         }
 723
 724                         /* close the byte stream */
 725                         opj_cio_close(cio);
 726
 727                         /* Write the index to disk */
 728                         if (*indexfilename) {
 729                                 opj_bool bSuccess;
 730                                 bSuccess = write_index_file(&cstr_info, indexfilename);
 731                                 if (bSuccess) {
 732                                         fprintf(stderr, "Failed to output index file\n");
 733                                 }
 734                         }
 735                 }
 736                 break;
 737
 738                 default:
 739                         fprintf(stderr, "skipping file..\n");
 740                         continue;
 741         }
 742
 743                 /* free the memory containing the code-stream */
 744                 free(src);
 745                 src = NULL;
 746
 747         if(image->color_space == CLRSPC_SYCC)
 748    {
 749         color_sycc_to_rgb(image);
 750    }
 751
 752         if(image->icc_profile_buf)
 753    {
 754 #if defined(HAVE_LIBLCMS1) || defined(HAVE_LIBLCMS2)
 755         color_apply_icc_profile(image);
 756 #endif
 757
 758         free(image->icc_profile_buf);
 759         image->icc_profile_buf = NULL; image->icc_profile_len = 0;
 760    }
 761
 762                 /* create output image */
 763                 /* ------------------- */
 764                 switch (parameters.cod_format) {
 765                 case PXM_DFMT:                  /* PNM PGM PPM */
 766                         if (imagetopnm(image, parameters.outfile)) {
 767                                 fprintf(stdout,"Outfile %s not generated\n",parameters.outfile);
 768                         }
 769                         else {
 770                                 fprintf(stdout,"Generated Outfile %s\n",parameters.outfile);
 771                         }
 772                         break;
 773
 774                 case PGX_DFMT:                  /* PGX */
 775                         if(imagetopgx(image, parameters.outfile)){
 776                                 fprintf(stdout,"Outfile %s not generated\n",parameters.outfile);
 777                         }
 778                         else {
 779                                 fprintf(stdout,"Generated Outfile %s\n",parameters.outfile);
 780                         }
 781                         break;
 782
 783                 case BMP_DFMT:                  /* BMP */
 784                         if(imagetobmp(image, parameters.outfile)){
 785                                 fprintf(stdout,"Outfile %s not generated\n",parameters.outfile);
 786                         }
 787                         else {
 788                                 fprintf(stdout,"Generated Outfile %s\n",parameters.outfile);
 789                         }
 790                         break;
 791 #ifdef HAVE_LIBTIFF
 792                 case TIF_DFMT:                  /* TIFF */
 793                         if(imagetotif(image, parameters.outfile)){
 794                                 fprintf(stdout,"Outfile %s not generated\n",parameters.outfile);
 795                         }
 796                         else {
 797                                 fprintf(stdout,"Generated Outfile %s\n",parameters.outfile);
 798                         }
 799                         break;
 800 #endif /* HAVE_LIBTIFF */
 801                 case RAW_DFMT:                  /* RAW */
 802                         if(imagetoraw(image, parameters.outfile)){
 803                                 fprintf(stdout,"Error generating raw file. Outfile %s not generated\n",parameters.outfile);
 804                         }
 805                         else {
 806                                 fprintf(stdout,"Successfully generated Outfile %s\n",parameters.outfile);
 807                         }
 808                         break;
 809
 810                 case TGA_DFMT:                  /* TGA */
 811                         if(imagetotga(image, parameters.outfile)){
 812                                 fprintf(stdout,"Error generating tga file. Outfile %s not generated\n",parameters.outfile);
 813                         }
 814                         else {
 815                                 fprintf(stdout,"Successfully generated Outfile %s\n",parameters.outfile);
 816                         }
 817                         break;
 818 #ifdef HAVE_LIBPNG
 819                 case PNG_DFMT:                  /* PNG */
 820                         if(imagetopng(image, parameters.outfile)){
 821                                 fprintf(stdout,"Error generating png file. Outfile %s not generated\n",parameters.outfile);
 822                         }
 823                         else {
 824                                 fprintf(stdout,"Successfully generated Outfile %s\n",parameters.outfile);
 825                         }
 826                         break;
 827 #endif /* HAVE_LIBPNG */
 828 /* Can happen if output file is TIFF or PNG
 829  * and HAVE_LIBTIF or HAVE_LIBPNG is undefined
 830 */
 831                         default:
 832                                 fprintf(stderr,"Outfile %s not generated\n",parameters.outfile);
 833                 }
 834
 835                 /* free remaining structures */
 836                 if(dinfo) {
 837                         opj_destroy_decompress(dinfo);
 838                 }
 839                 /* free codestream information structure */
 840                 if (*indexfilename)
 841                         opj_destroy_cstr_info(&cstr_info);
 842                 /* free image data structure */
 843                 opj_image_destroy(image);
 844
 845         }
 846         return 0;
 847 }
 848 //end main
 849
 850
 851
 852