2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
13 % Read/Write JPEG-2000 Image Format %
20 % Copyright 1999-2014 ImageMagick Studio LLC, a non-profit organization %
21 % dedicated to making software imaging solutions freely available. %
23 % You may not use this file except in compliance with the License. You may %
24 % obtain a copy of the License at %
26 % http://www.imagemagick.org/script/license.php %
28 % Unless required by applicable law or agreed to in writing, software %
29 % distributed under the License is distributed on an "AS IS" BASIS, %
30 % WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. %
31 % See the License for the specific language governing permissions and %
32 % limitations under the License. %
34 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
42 #include "MagickCore/studio.h"
43 #include "MagickCore/artifact.h"
44 #include "MagickCore/attribute.h"
45 #include "MagickCore/blob.h"
46 #include "MagickCore/blob-private.h"
47 #include "MagickCore/cache.h"
48 #include "MagickCore/colorspace.h"
49 #include "MagickCore/colorspace-private.h"
50 #include "MagickCore/color.h"
51 #include "MagickCore/color-private.h"
52 #include "MagickCore/exception.h"
53 #include "MagickCore/exception-private.h"
54 #include "MagickCore/image.h"
55 #include "MagickCore/image-private.h"
56 #include "MagickCore/list.h"
57 #include "MagickCore/magick.h"
58 #include "MagickCore/memory_.h"
59 #include "MagickCore/monitor.h"
60 #include "MagickCore/monitor-private.h"
61 #include "MagickCore/option.h"
62 #include "MagickCore/pixel-accessor.h"
63 #include "MagickCore/profile.h"
64 #include "MagickCore/property.h"
65 #include "MagickCore/quantum-private.h"
66 #include "MagickCore/static.h"
67 #include "MagickCore/statistic.h"
68 #include "MagickCore/string_.h"
69 #include "MagickCore/string-private.h"
70 #include "MagickCore/module.h"
71 #if defined(MAGICKCORE_LIBOPENJP2_DELEGATE)
78 #if defined(MAGICKCORE_LIBOPENJP2_DELEGATE)
79 static MagickBooleanType
80 WriteJP2Image(const ImageInfo *,Image *,ExceptionInfo *);
84 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
92 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
94 % IsJ2K() returns MagickTrue if the image format type, identified by the
95 % magick string, is J2K.
97 % The format of the IsJ2K method is:
99 % MagickBooleanType IsJP2(const unsigned char *magick,const size_t length)
101 % A description of each parameter follows:
103 % o magick: compare image format pattern against these bytes.
105 % o length: Specifies the length of the magick string.
108 static MagickBooleanType IsJ2K(const unsigned char *magick,const size_t length)
112 if (memcmp(magick,"\xff\x4f\xff\x51",4) == 0)
118 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
126 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
128 % IsJP2() returns MagickTrue if the image format type, identified by the
129 % magick string, is JP2.
131 % The format of the IsJP2 method is:
133 % MagickBooleanType IsJP2(const unsigned char *magick,const size_t length)
135 % A description of each parameter follows:
137 % o magick: compare image format pattern against these bytes.
139 % o length: Specifies the length of the magick string.
142 static MagickBooleanType IsJP2(const unsigned char *magick,const size_t length)
146 if (memcmp(magick,"\x00\x00\x00\x0c\x6a\x50\x20\x20\x0d\x0a\x87\x0a",12) == 0)
148 if (memcmp(magick,"\x0d\x0a\x87\x0a",12) == 0)
154 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
162 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
164 % IsJPC()() returns MagickTrue if the image format type, identified by the
165 % magick string, is JPC.
167 % The format of the IsJPC method is:
169 % MagickBooleanType IsJPC(const unsigned char *magick,const size_t length)
171 % A description of each parameter follows:
173 % o magick: compare image format pattern against these bytes.
175 % o length: Specifies the length of the magick string.
178 static MagickBooleanType IsJPC(const unsigned char *magick,const size_t length)
182 if (memcmp(magick,"\x00\x00\x00\x0c\x6a\x50\x20\x20\x0d\x0a\x87\x0a",12) == 0)
184 if (memcmp(magick,"\x0d\x0a\x87\x0a",12) == 0)
190 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
194 % R e a d J P 2 I m a g e %
198 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
200 % ReadJP2Image() reads a JPEG 2000 Image file (JP2) or JPEG 2000
201 % codestream (JPC) image file and returns it. It allocates the memory
202 % necessary for the new Image structure and returns a pointer to the new
203 % image or set of images.
205 % JP2 support is originally written by Nathan Brown, nathanbrown@letu.edu.
207 % The format of the ReadJP2Image method is:
209 % Image *ReadJP2Image(const ImageInfo *image_info,
210 % ExceptionInfo *exception)
212 % A description of each parameter follows:
214 % o image_info: the image info.
216 % o exception: return any errors or warnings in this structure.
219 #if defined(MAGICKCORE_LIBOPENJP2_DELEGATE)
220 static void JP2ErrorHandler(const char *message,void *client_data)
225 exception=(ExceptionInfo *) client_data;
226 (void) ThrowMagickException(exception,GetMagickModule(),CoderError,
227 message,"`%s'","OpenJP2");
230 static OPJ_SIZE_T JP2ReadHandler(void *buffer,OPJ_SIZE_T length,void *context)
238 image=(Image *) context;
239 count=ReadBlob(image,(ssize_t) length,(unsigned char *) buffer);
242 return((OPJ_SIZE_T) count);
245 static OPJ_BOOL JP2SeekHandler(OPJ_OFF_T offset,void *context)
250 image=(Image *) context;
251 return(SeekBlob(image,offset,SEEK_SET) < 0 ? 0 : 1);
254 static OPJ_OFF_T JP2SkipHandler(OPJ_OFF_T offset,void *context)
259 image=(Image *) context;
260 return(SeekBlob(image,offset,SEEK_CUR) < 0 ? 0 : offset);
263 static void JP2WarningHandler(const char *message,void *client_data)
268 exception=(ExceptionInfo *) client_data;
269 (void) ThrowMagickException(exception,GetMagickModule(),CoderWarning,
270 message,"`%s'","OpenJP2");
273 static OPJ_SIZE_T JP2WriteHandler(void *buffer,OPJ_SIZE_T length,void *context)
281 image=(Image *) context;
282 count=WriteBlob(image,(ssize_t) length,(unsigned char *) buffer);
283 return((OPJ_SIZE_T) count);
286 static Image *ReadJP2Image(const ImageInfo *image_info,ExceptionInfo *exception)
303 opj_codestream_index_t
304 *codestream_index = (opj_codestream_index_t *) NULL;
324 assert(image_info != (const ImageInfo *) NULL);
325 assert(image_info->signature == MagickSignature);
326 if (image_info->debug != MagickFalse)
327 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
328 image_info->filename);
329 assert(exception != (ExceptionInfo *) NULL);
330 assert(exception->signature == MagickSignature);
331 image=AcquireImage(image_info,exception);
332 status=OpenBlob(image_info,image,ReadBinaryBlobMode,exception);
333 if (status == MagickFalse)
335 image=DestroyImageList(image);
336 return((Image *) NULL);
339 Initialize JP2 codec.
341 if (LocaleCompare(image_info->magick,"JPT") == 0)
342 jp2_codec=opj_create_decompress(OPJ_CODEC_JPT);
344 if (LocaleCompare(image_info->magick,"J2K") == 0)
345 jp2_codec=opj_create_decompress(OPJ_CODEC_J2K);
347 jp2_codec=opj_create_decompress(OPJ_CODEC_JP2);
348 opj_set_warning_handler(jp2_codec,JP2WarningHandler,exception);
349 opj_set_error_handler(jp2_codec,JP2ErrorHandler,exception);
350 opj_set_default_decoder_parameters(¶meters);
351 option=GetImageOption(image_info,"jp2:reduce-factor");
352 if (option != (const char *) NULL)
353 parameters.cp_reduce=StringToInteger(option);
354 option=GetImageOption(image_info,"jp2:quality-layers");
355 if (option != (const char *) NULL)
356 parameters.cp_layer=StringToInteger(option);
357 if (opj_setup_decoder(jp2_codec,¶meters) == 0)
359 opj_destroy_codec(jp2_codec);
360 ThrowReaderException(DelegateError,"UnableToManageJP2Stream");
362 jp2_stream=opj_stream_create(OPJ_J2K_STREAM_CHUNK_SIZE,1);
363 opj_stream_set_read_function(jp2_stream,JP2ReadHandler);
364 opj_stream_set_write_function(jp2_stream,JP2WriteHandler);
365 opj_stream_set_seek_function(jp2_stream,JP2SeekHandler);
366 opj_stream_set_skip_function(jp2_stream,JP2SkipHandler);
367 opj_stream_set_user_data(jp2_stream,image);
368 opj_stream_set_user_data_length(jp2_stream,GetBlobSize(image));
369 if (opj_read_header(jp2_stream,jp2_codec,&jp2_image) == 0)
371 opj_stream_set_user_data(jp2_stream,NULL);
372 opj_stream_destroy_v3(jp2_stream);
373 opj_destroy_codec(jp2_codec);
374 ThrowReaderException(DelegateError,"UnableToDecodeImageFile");
376 if ((image->columns != 0) && (image->rows != 0))
379 Extract an area from the image.
381 jp2_status=opj_set_decode_area(jp2_codec,jp2_image,image->extract_info.x,
382 image->extract_info.y,image->extract_info.x+image->columns,
383 image->extract_info.y+image->rows);
386 opj_stream_set_user_data(jp2_stream,NULL);
387 opj_stream_destroy_v3(jp2_stream);
388 opj_destroy_codec(jp2_codec);
389 opj_image_destroy(jp2_image);
390 ThrowReaderException(DelegateError,"UnableToDecodeImageFile");
393 if ((opj_decode(jp2_codec,jp2_stream,jp2_image) == 0) ||
394 (opj_end_decompress(jp2_codec,jp2_stream) == 0))
396 opj_stream_set_user_data(jp2_stream,NULL);
397 opj_stream_destroy_v3(jp2_stream);
398 opj_destroy_codec(jp2_codec);
399 opj_image_destroy(jp2_image);
400 ThrowReaderException(DelegateError,"UnableToDecodeImageFile");
402 opj_stream_set_user_data(jp2_stream,NULL);
403 opj_stream_destroy_v3(jp2_stream);
404 for (i=0; i < (ssize_t) jp2_image->numcomps; i++)
406 if ((jp2_image->comps[i].dx == 0) || (jp2_image->comps[i].dy == 0))
408 opj_stream_set_user_data(jp2_stream,NULL);
409 opj_destroy_codec(jp2_codec);
410 opj_image_destroy(jp2_image);
411 ThrowReaderException(CoderError,"IrregularChannelGeometryNotSupported")
417 image->columns=(size_t) jp2_image->comps[0].w;
418 image->rows=(size_t) jp2_image->comps[0].h;
419 image->depth=jp2_image->comps[0].prec;
420 image->compression=JPEG2000Compression;
421 if (jp2_image->numcomps <= 2)
423 SetImageColorspace(image,GRAYColorspace,exception);
424 if (jp2_image->numcomps > 1)
425 image->alpha_trait=BlendPixelTrait;
427 if (jp2_image->numcomps > 3)
428 image->alpha_trait=BlendPixelTrait;
429 for (i=0; i < (ssize_t) jp2_image->numcomps; i++)
431 if ((jp2_image->comps[i].dx == 0) || (jp2_image->comps[i].dy == 0))
433 opj_stream_set_user_data(jp2_stream,NULL);
434 opj_destroy_codec(jp2_codec);
435 opj_image_destroy(jp2_image);
436 ThrowReaderException(CoderError,"IrregularChannelGeometryNotSupported")
438 if ((jp2_image->comps[i].dx > 1) || (jp2_image->comps[i].dy > 1))
439 image->colorspace=YUVColorspace;
441 if (jp2_image->icc_profile_buf != (unsigned char *) NULL)
446 profile=BlobToStringInfo(jp2_image->icc_profile_buf,
447 jp2_image->icc_profile_len);
448 if (profile != (StringInfo *) NULL)
449 SetImageProfile(image,"icc",profile,exception);
451 for (y=0; y < (ssize_t) image->rows; y++)
459 q=GetAuthenticPixels(image,0,y,image->columns,1,exception);
460 if (q == (Quantum *) NULL)
462 for (x=0; x < (ssize_t) image->columns; x++)
467 for (i=0; i < (ssize_t) jp2_image->numcomps; i++)
473 scale=QuantumRange/(double) ((1UL << jp2_image->comps[i].prec)-1);
474 pixel=scale*(jp2_image->comps[i].data[y/jp2_image->comps[i].dy*
475 image->columns/jp2_image->comps[i].dx+x/jp2_image->comps[i].dx]+
476 (jp2_image->comps[i].sgnd ? 1UL << (jp2_image->comps[i].prec-1) : 0));
481 SetPixelRed(image,ClampToQuantum(pixel),q);
482 SetPixelGreen(image,ClampToQuantum(pixel),q);
483 SetPixelBlue(image,ClampToQuantum(pixel),q);
484 SetPixelAlpha(image,OpaqueAlpha,q);
489 if (jp2_image->numcomps == 2)
491 SetPixelAlpha(image,ClampToQuantum(pixel),q);
494 SetPixelGreen(image,ClampToQuantum(pixel),q);
499 SetPixelBlue(image,ClampToQuantum(pixel),q);
504 SetPixelAlpha(image,ClampToQuantum(pixel),q);
509 q+=GetPixelChannels(image);
511 if (SyncAuthenticPixels(image,exception) == MagickFalse)
513 status=SetImageProgress(image,LoadImageTag,(MagickOffsetType) y,
515 if (status == MagickFalse)
521 opj_destroy_codec(jp2_codec);
522 opj_image_destroy(jp2_image);
523 opj_destroy_cstr_index(&codestream_index);
524 return(GetFirstImageInList(image));
529 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
533 % R e g i s t e r J P 2 I m a g e %
537 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
539 % RegisterJP2Image() adds attributes for the JP2 image format to the list of
540 % supported formats. The attributes include the image format tag, a method
541 % method to read and/or write the format, whether the format supports the
542 % saving of more than one frame to the same file or blob, whether the format
543 % supports native in-memory I/O, and a brief description of the format.
545 % The format of the RegisterJP2Image method is:
547 % size_t RegisterJP2Image(void)
550 ModuleExport size_t RegisterJP2Image(void)
553 version[MaxTextExtent];
559 #if defined(MAGICKCORE_LIBOPENJP2_DELEGATE)
560 (void) FormatLocaleString(version,MaxTextExtent,"%s",opj_version());
562 entry=SetMagickInfo("JP2");
563 entry->description=ConstantString("JPEG-2000 File Format Syntax");
564 if (*version != '\0')
565 entry->version=ConstantString(version);
566 entry->mime_type=ConstantString("image/jp2");
567 entry->module=ConstantString("JP2");
568 entry->magick=(IsImageFormatHandler *) IsJP2;
569 entry->adjoin=MagickFalse;
570 entry->seekable_stream=MagickTrue;
571 entry->thread_support=NoThreadSupport;
572 #if defined(MAGICKCORE_LIBOPENJP2_DELEGATE)
573 entry->decoder=(DecodeImageHandler *) ReadJP2Image;
574 entry->encoder=(EncodeImageHandler *) WriteJP2Image;
576 (void) RegisterMagickInfo(entry);
577 entry=SetMagickInfo("J2K");
578 entry->description=ConstantString("JPEG-2000 Code Stream Syntax");
579 if (*version != '\0')
580 entry->version=ConstantString(version);
581 entry->mime_type=ConstantString("image/jp2");
582 entry->module=ConstantString("JP2");
583 entry->magick=(IsImageFormatHandler *) IsJ2K;
584 entry->adjoin=MagickFalse;
585 entry->seekable_stream=MagickTrue;
586 entry->thread_support=NoThreadSupport;
587 #if defined(MAGICKCORE_LIBOPENJP2_DELEGATE)
588 entry->decoder=(DecodeImageHandler *) ReadJP2Image;
589 entry->encoder=(EncodeImageHandler *) WriteJP2Image;
591 (void) RegisterMagickInfo(entry);
592 entry=SetMagickInfo("JPT");
593 entry->description=ConstantString("JPEG-2000 File Format Syntax");
594 if (*version != '\0')
595 entry->version=ConstantString(version);
596 entry->mime_type=ConstantString("image/jp2");
597 entry->module=ConstantString("JP2");
598 entry->magick=(IsImageFormatHandler *) IsJP2;
599 entry->adjoin=MagickFalse;
600 entry->seekable_stream=MagickTrue;
601 entry->thread_support=NoThreadSupport;
602 #if defined(MAGICKCORE_LIBOPENJP2_DELEGATE)
603 entry->decoder=(DecodeImageHandler *) ReadJP2Image;
604 entry->encoder=(EncodeImageHandler *) WriteJP2Image;
606 (void) RegisterMagickInfo(entry);
607 entry=SetMagickInfo("JPC");
608 entry->description=ConstantString("JPEG-2000 Code Stream Syntax");
609 if (*version != '\0')
610 entry->version=ConstantString(version);
611 entry->mime_type=ConstantString("image/jp2");
612 entry->module=ConstantString("JP2");
613 entry->magick=(IsImageFormatHandler *) IsJPC;
614 entry->adjoin=MagickFalse;
615 entry->seekable_stream=MagickTrue;
616 entry->thread_support=NoThreadSupport;
617 #if defined(MAGICKCORE_LIBOPENJP2_DELEGATE)
618 entry->decoder=(DecodeImageHandler *) ReadJP2Image;
619 entry->encoder=(EncodeImageHandler *) WriteJP2Image;
621 (void) RegisterMagickInfo(entry);
622 return(MagickImageCoderSignature);
626 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
630 % U n r e g i s t e r J P 2 I m a g e %
634 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
636 % UnregisterJP2Image() removes format registrations made by the JP2 module
637 % from the list of supported formats.
639 % The format of the UnregisterJP2Image method is:
641 % UnregisterJP2Image(void)
644 ModuleExport void UnregisterJP2Image(void)
646 (void) UnregisterMagickInfo("JPC");
647 (void) UnregisterMagickInfo("JPT");
648 (void) UnregisterMagickInfo("JP2");
649 (void) UnregisterMagickInfo("J2K");
652 #if defined(MAGICKCORE_LIBOPENJP2_DELEGATE)
654 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
658 % W r i t e J P 2 I m a g e %
662 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
664 % WriteJP2Image() writes an image in the JPEG 2000 image format.
666 % JP2 support originally written by Nathan Brown, nathanbrown@letu.edu
668 % The format of the WriteJP2Image method is:
670 % MagickBooleanType WriteJP2Image(const ImageInfo *image_info,Image *image,
671 % ExceptionInfo *exception)
673 % A description of each parameter follows.
675 % o image_info: the image info.
677 % o image: The image.
680 static MagickBooleanType WriteJP2Image(const ImageInfo *image_info,Image *image,
681 ExceptionInfo *exception)
722 assert(image_info != (const ImageInfo *) NULL);
723 assert(image_info->signature == MagickSignature);
724 assert(image != (Image *) NULL);
725 assert(image->signature == MagickSignature);
726 if (image->debug != MagickFalse)
727 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
728 assert(exception != (ExceptionInfo *) NULL);
729 assert(exception->signature == MagickSignature);
730 status=OpenBlob(image_info,image,WriteBinaryBlobMode,exception);
731 if (status == MagickFalse)
734 Initialize JPEG 2000 API.
736 opj_set_default_encoder_parameters(¶meters);
737 for (i=1; i < 6; i++)
738 if (((1UL << (i+2)) > image->columns) && ((1UL << (i+2)) > image->rows))
740 parameters.numresolution=i;
741 parameters.tcp_numlayers=1;
742 parameters.tcp_distoratio[0]=(double) image->quality;
743 parameters.cp_fixed_quality=OPJ_TRUE;
744 if (image_info->extract != (char *) NULL)
755 flags=ParseAbsoluteGeometry(image_info->extract,&geometry);
756 parameters.cp_tdx=geometry.width;
757 parameters.cp_tdy=geometry.width;
758 if ((flags & HeightValue) != 0)
759 parameters.cp_tdy=geometry.height;
760 if ((flags & XValue) != 0)
761 parameters.cp_tx0=geometry.x;
762 if ((flags & YValue) != 0)
763 parameters.cp_ty0=geometry.y;
764 parameters.tile_size_on=OPJ_TRUE;
766 value=GetImageArtifact(image,"jp2:quality");
767 if (value != (const char *) NULL)
776 for (i=1; sscanf(p,"%f",¶meters.tcp_distoratio[i]) == 1; i++)
780 while ((*p != '\0') && (*p != ','))
786 parameters.tcp_numlayers=i;
787 parameters.cp_fixed_quality=OPJ_TRUE;
789 value=GetImageArtifact(image,"jp2:rate");
790 if (value != (const char *) NULL)
796 Set compression rate.
799 for (i=1; sscanf(p,"%f",¶meters.tcp_rates[i]) == 1; i++)
803 while ((*p != '\0') && (*p != ','))
809 parameters.tcp_numlayers=i;
810 parameters.cp_disto_alloc=OPJ_TRUE;
812 #if defined(BUGINOPENJPEG)
813 if ((image->depth == 12) &&
814 ((image->columns == 2048) || (image->rows == 1080) ||
815 (image->columns == 4096) || (image->rows == 2160)))
818 Digital Cinema profile compliance.
820 if ((image->columns == 2048) || (image->rows == 1080))
825 parameters.cp_cinema=OPJ_CINEMA2K_48;
826 parameters.cp_rsiz=OPJ_CINEMA2K;
828 if ((image->columns == 4096) || (image->rows == 2160))
833 parameters.cp_cinema=OPJ_CINEMA4K_24;
834 parameters.cp_rsiz=OPJ_CINEMA4K;
838 value=GetImageProperty(image,"comment",exception);
839 if (value != (const char *) NULL)
840 parameters.cp_comment=ConstantString(value);
842 jp2_colorspace=OPJ_CLRSPC_SRGB;
843 if (image->colorspace == YUVColorspace)
845 jp2_colorspace=OPJ_CLRSPC_SYCC;
846 parameters.subsampling_dx=2;
850 if (IssRGBCompatibleColorspace(image->colorspace) == MagickFalse)
851 (void) TransformImageColorspace(image,sRGBColorspace,exception);
852 if (IsGrayColorspace(image->colorspace) != MagickFalse)
855 jp2_colorspace=OPJ_CLRSPC_GRAY;
857 if (image->alpha_trait == BlendPixelTrait)
860 ResetMagickMemory(jp2_info,0,sizeof(jp2_info));
861 for (i=0; i < (ssize_t) channels; i++)
863 jp2_info[i].prec=image->depth;
864 jp2_info[i].bpp=image->depth;
865 if ((image->depth == 1) &&
866 ((LocaleCompare(image_info->magick,"JPT") == 0) ||
867 (LocaleCompare(image_info->magick,"JP2") == 0)))
869 jp2_info[i].prec++; /* OpenJPEG returns exception for depth @ 1 */
873 jp2_info[i].dx=parameters.subsampling_dx;
874 jp2_info[i].dy=parameters.subsampling_dy;
875 jp2_info[i].w=image->columns;
876 jp2_info[i].h=image->rows;
878 jp2_image=opj_image_create(channels,jp2_info,jp2_colorspace);
879 if (jp2_image == (opj_image_t *) NULL)
880 ThrowWriterException(DelegateError,"UnableToEncodeImageFile");
881 jp2_image->x0=parameters.image_offset_x0;
882 jp2_image->y0=parameters.image_offset_y0;
883 jp2_image->x1=2*parameters.image_offset_x0+(image->columns-1)*
884 parameters.subsampling_dx+1;
885 jp2_image->y1=2*parameters.image_offset_y0+(image->rows-1)*
886 parameters.subsampling_dx+1;
888 Convert to JP2 pixels.
890 for (y=0; y < (ssize_t) image->rows; y++)
892 register const Quantum
898 p=GetVirtualPixels(image,0,y,image->columns,1,exception);
899 if (p == (const Quantum *) NULL)
901 for (x=0; x < (ssize_t) image->columns; x++)
903 for (i=0; i < (ssize_t) channels; i++)
911 scale=(double) ((1UL << jp2_image->comps[i].prec)-1)/QuantumRange;
912 q=jp2_image->comps[i].data+(y/jp2_image->comps[i].dy*
913 image->columns/jp2_image->comps[i].dx+x/jp2_image->comps[i].dx);
918 if (jp2_colorspace == OPJ_CLRSPC_GRAY)
920 *q=(int) (scale*GetPixelLuma(image,p));
923 *q=(int) (scale*GetPixelRed(image,p));
928 if (jp2_colorspace == OPJ_CLRSPC_GRAY)
930 *q=(int) (scale*GetPixelAlpha(image,p));
933 *q=(int) (scale*GetPixelGreen(image,p));
938 *q=(int) (scale*GetPixelBlue(image,p));
943 *q=(int) (scale*GetPixelAlpha(image,p));
950 status=SetImageProgress(image,SaveImageTag,(MagickOffsetType) y,
952 if (status == MagickFalse)
955 if (LocaleCompare(image_info->magick,"JPT") == 0)
956 jp2_codec=opj_create_compress(OPJ_CODEC_JPT);
958 if (LocaleCompare(image_info->magick,"J2K") == 0)
959 jp2_codec=opj_create_compress(OPJ_CODEC_J2K);
961 jp2_codec=opj_create_compress(OPJ_CODEC_JP2);
962 opj_set_warning_handler(jp2_codec,JP2WarningHandler,exception);
963 opj_set_error_handler(jp2_codec,JP2ErrorHandler,exception);
964 opj_setup_encoder(jp2_codec,¶meters,jp2_image);
965 jp2_stream=opj_stream_create(OPJ_J2K_STREAM_CHUNK_SIZE,OPJ_FALSE);
966 opj_stream_set_read_function(jp2_stream,JP2ReadHandler);
967 opj_stream_set_write_function(jp2_stream,JP2WriteHandler);
968 opj_stream_set_seek_function(jp2_stream,JP2SeekHandler);
969 opj_stream_set_skip_function(jp2_stream,JP2SkipHandler);
970 opj_stream_set_user_data(jp2_stream,image);
971 if (jp2_stream == (opj_stream_t *) NULL)
972 ThrowWriterException(DelegateError,"UnableToEncodeImageFile");
973 jp2_status=opj_start_compress(jp2_codec,jp2_image,jp2_stream);
975 ThrowWriterException(DelegateError,"UnableToEncodeImageFile");
976 if ((opj_encode(jp2_codec,jp2_stream) == 0) ||
977 (opj_end_compress(jp2_codec,jp2_stream) == 0))
979 opj_stream_set_user_data(jp2_stream,NULL);
980 opj_stream_destroy_v3(jp2_stream);
981 opj_destroy_codec(jp2_codec);
982 opj_image_destroy(jp2_image);
983 ThrowWriterException(DelegateError,"UnableToEncodeImageFile");
988 opj_stream_set_user_data(jp2_stream,NULL);
989 opj_stream_destroy_v3(jp2_stream);
990 opj_destroy_codec(jp2_codec);
991 opj_image_destroy(jp2_image);
992 (void) CloseBlob(image);