granicus.if.org Git - imagemagick/blob - coders/dpx.c

   1 /*
   2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
   3 %                                                                             %
   4 %                                                                             %
   5 %                                                                             %
   6 %                            DDDD   PPPP   X   X                              %
   7 %                            D   D  P   P   X X                               %
   8 %                            D   D  PPPP    XXX                               %
   9 %                            D   D  P       X X                               %
  10 %                            DDDD   P      X   X                              %
  11 %                                                                             %
  12 %                                                                             %
  13 %                     Read/Write SMTPE DPX Image Format                       %
  14 %                                                                             %
  15 %                              Software Design                                %
  16 %                                   Cristy                                    %
  17 %                                March 2001                                   %
  18 %                                                                             %
  19 %                                                                             %
  20 %  Copyright 1999-2015 ImageMagick Studio LLC, a non-profit organization      %
  21 %  dedicated to making software imaging solutions freely available.           %
  22 %                                                                             %
  23 %  You may not use this file except in compliance with the License.  You may  %
  24 %  obtain a copy of the License at                                            %
  25 %                                                                             %
  26 %    http://www.imagemagick.org/script/license.php                            %
  27 %                                                                             %
  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.                                             %
  33 %                                                                             %
  34 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  35 %
  36 %
  37 */
  38 \f
  39 /*
  40   Include declarations.
  41 */
  42 #include "MagickCore/studio.h"
  43 #include "MagickCore/attribute.h"
  44 #include "MagickCore/artifact.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/exception.h"
  50 #include "MagickCore/exception-private.h"
  51 #include "MagickCore/geometry.h"
  52 #include "MagickCore/image.h"
  53 #include "MagickCore/image-private.h"
  54 #include "MagickCore/list.h"
  55 #include "MagickCore/magick.h"
  56 #include "MagickCore/memory_.h"
  57 #include "MagickCore/module.h"
  58 #include "MagickCore/monitor.h"
  59 #include "MagickCore/monitor-private.h"
  60 #include "MagickCore/option.h"
  61 #include "MagickCore/pixel-accessor.h"
  62 #include "MagickCore/profile.h"
  63 #include "MagickCore/property.h"
  64 #include "MagickCore/quantum-private.h"
  65 #include "MagickCore/static.h"
  66 #include "MagickCore/string_.h"
  67 #include "MagickCore/string-private.h"
  68 \f
  69 /*
  70   Define declaration.
  71 */
  72 #define MaxNumberImageElements  8
  73 \f
  74 /*
  75   Typedef declaration.
  76 */
  77 typedef enum
  78 {
  79   UserDefinedColorimetric = 0,
  80   PrintingDensityColorimetric = 1,
  81   LinearColorimetric = 2,
  82   LogarithmicColorimetric = 3,
  83   UnspecifiedVideoColorimetric = 4,
  84   SMTPE_274MColorimetric = 5,
  85   ITU_R709Colorimetric = 6,
  86   ITU_R601_625LColorimetric = 7,
  87   ITU_R601_525LColorimetric = 8,
  88   NTSCCompositeVideoColorimetric = 9,
  89   PALCompositeVideoColorimetric = 10,
  90   ZDepthLinearColorimetric = 11,
  91   DepthHomogeneousColorimetric = 12
  92 } DPXColorimetric;
  93
  94 typedef enum
  95 {
  96   UndefinedComponentType = 0,
  97   RedComponentType = 1,
  98   GreenComponentType = 2,
  99   BlueComponentType = 3,
 100   AlphaComponentType = 4,
 101   LumaComponentType = 6,
 102   ColorDifferenceCbCrComponentType = 7,
 103   DepthComponentType = 8,
 104   CompositeVideoComponentType = 9,
 105   RGBComponentType = 50,
 106   RGBAComponentType = 51,
 107   ABGRComponentType = 52,
 108   CbYCrY422ComponentType = 100,
 109   CbYACrYA4224ComponentType = 101,
 110   CbYCr444ComponentType = 102,
 111   CbYCrA4444ComponentType = 103,
 112   UserDef2ElementComponentType = 150,
 113   UserDef3ElementComponentType = 151,
 114   UserDef4ElementComponentType = 152,
 115   UserDef5ElementComponentType = 153,
 116   UserDef6ElementComponentType = 154,
 117   UserDef7ElementComponentType = 155,
 118   UserDef8ElementComponentType = 156
 119 } DPXComponentType;
 120
 121 typedef enum
 122 {
 123   TransferCharacteristicUserDefined = 0,
 124   TransferCharacteristicPrintingDensity = 1,
 125   TransferCharacteristicLinear = 2,
 126   TransferCharacteristicLogarithmic = 3,
 127   TransferCharacteristicUnspecifiedVideo = 4,
 128   TransferCharacteristicSMTPE274M = 5,     /* 1920x1080 TV */
 129   TransferCharacteristicITU_R709 = 6,      /* ITU R709 */
 130   TransferCharacteristicITU_R601_625L = 7, /* 625 Line */
 131   TransferCharacteristicITU_R601_525L = 8, /* 525 Line */
 132   TransferCharacteristicNTSCCompositeVideo = 9,
 133   TransferCharacteristicPALCompositeVideo = 10,
 134   TransferCharacteristicZDepthLinear = 11,
 135   TransferCharacteristicZDepthHomogeneous = 12
 136 } DPXTransferCharacteristic;
 137
 138 typedef struct _DPXFileInfo
 139 {
 140   unsigned int
 141     magic,
 142     image_offset;
 143
 144   char
 145     version[8];
 146
 147   unsigned int
 148     file_size,
 149     ditto_key,
 150     generic_size,
 151     industry_size,
 152     user_size;
 153
 154   char
 155     filename[100],
 156     timestamp[24],
 157     creator[100],
 158     project[200],
 159     copyright[200];
 160
 161   unsigned int
 162     encrypt_key;
 163
 164   char
 165     reserve[104];
 166 } DPXFileInfo;
 167
 168 typedef struct _DPXFilmInfo
 169 {
 170   char
 171     id[2],
 172     type[2],
 173     offset[2],
 174     prefix[6],
 175     count[4],
 176     format[32];
 177
 178   unsigned int
 179     frame_position,
 180     sequence_extent,
 181     held_count;
 182
 183   float
 184     frame_rate,
 185     shutter_angle;
 186
 187   char
 188     frame_id[32],
 189     slate[100],
 190     reserve[56];
 191 } DPXFilmInfo;
 192
 193 typedef struct _DPXImageElement
 194 {
 195   unsigned int
 196     data_sign,
 197     low_data;
 198
 199   float
 200     low_quantity;
 201
 202   unsigned int
 203     high_data;
 204
 205   float
 206     high_quantity;
 207
 208   unsigned char
 209     descriptor,
 210     transfer_characteristic,
 211     colorimetric,
 212     bit_size;
 213
 214   unsigned short
 215     packing,
 216     encoding;
 217
 218   unsigned int
 219     data_offset,
 220     end_of_line_padding,
 221     end_of_image_padding;
 222
 223   unsigned char
 224     description[32];
 225 } DPXImageElement;
 226
 227 typedef struct _DPXImageInfo
 228 {
 229   unsigned short
 230     orientation,
 231     number_elements;
 232
 233   unsigned int
 234     pixels_per_line,
 235     lines_per_element;
 236
 237   DPXImageElement
 238     image_element[MaxNumberImageElements];
 239
 240   unsigned char
 241     reserve[52];
 242 } DPXImageInfo;
 243
 244 typedef struct _DPXOrientationInfo
 245 {
 246   unsigned int
 247     x_offset,
 248     y_offset;
 249
 250   float
 251     x_center,
 252     y_center;
 253
 254   unsigned int
 255     x_size,
 256     y_size;
 257
 258   char
 259     filename[100],
 260     timestamp[24],
 261     device[32],
 262     serial[32];
 263
 264   unsigned short
 265     border[4];
 266
 267   unsigned int
 268     aspect_ratio[2];
 269
 270   unsigned char
 271     reserve[28];
 272 } DPXOrientationInfo;
 273
 274 typedef struct _DPXTelevisionInfo
 275 {
 276   unsigned int
 277     time_code,
 278     user_bits;
 279
 280   unsigned char
 281     interlace,
 282     field_number,
 283     video_signal,
 284     padding;
 285
 286   float
 287     horizontal_sample_rate,
 288     vertical_sample_rate,
 289     frame_rate,
 290     time_offset,
 291     gamma,
 292     black_level,
 293     black_gain,
 294     break_point,
 295     white_level,
 296     integration_times;
 297
 298   char
 299     reserve[76];
 300 } DPXTelevisionInfo;
 301
 302 typedef struct _DPXUserInfo
 303 {
 304   char
 305     id[32];
 306 } DPXUserInfo;
 307
 308 typedef struct DPXInfo
 309 {
 310   DPXFileInfo
 311     file;
 312
 313   DPXImageInfo
 314     image;
 315
 316   DPXOrientationInfo
 317     orientation;
 318
 319   DPXFilmInfo
 320     film;
 321
 322   DPXTelevisionInfo
 323     television;
 324
 325   DPXUserInfo
 326     user;
 327 } DPXInfo;
 328 \f
 329 /*
 330   Forward declaractions.
 331 */
 332 static MagickBooleanType
 333   WriteDPXImage(const ImageInfo *,Image *,ExceptionInfo *);
 334 \f
 335 /*
 336 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 337 %                                                                             %
 338 %                                                                             %
 339 %                                                                             %
 340 %   I s D P X                                                                 %
 341 %                                                                             %
 342 %                                                                             %
 343 %                                                                             %
 344 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 345 %
 346 %  IsDPX() returns MagickTrue if the image format type, identified by the
 347 %  magick string, is DPX.
 348 %
 349 %  The format of the IsDPX method is:
 350 %
 351 %      MagickBooleanType IsDPX(const unsigned char *magick,const size_t extent)
 352 %
 353 %  A description of each parameter follows:
 354 %
 355 %    o magick: compare image format pattern against these bytes.
 356 %
 357 %    o extent: Specifies the extent of the magick string.
 358 %
 359 */
 360 static MagickBooleanType IsDPX(const unsigned char *magick,const size_t extent)
 361 {
 362   if (extent < 4)
 363     return(MagickFalse);
 364   if (memcmp(magick,"SDPX",4) == 0)
 365     return(MagickTrue);
 366   if (memcmp(magick,"XPDS",4) == 0)
 367     return(MagickTrue);
 368   return(MagickFalse);
 369 }
 370 \f
 371 /*
 372 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 373 %                                                                             %
 374 %                                                                             %
 375 %                                                                             %
 376 %   R e a d D P X I m a g e                                                   %
 377 %                                                                             %
 378 %                                                                             %
 379 %                                                                             %
 380 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 381 %
 382 %  ReadDPXImage() reads an DPX X image file and returns it.  It
 383 %  allocates the memory necessary for the new Image structure and returns a
 384 %  pointer to the new image.
 385 %
 386 %  The format of the ReadDPXImage method is:
 387 %
 388 %      Image *ReadDPXImage(const ImageInfo *image_info,ExceptionInfo *exception)
 389 %
 390 %  A description of each parameter follows:
 391 %
 392 %    o image_info: the image info.
 393 %
 394 %    o exception: return any errors or warnings in this structure.
 395 %
 396 */
 397
 398 static size_t GetBytesPerRow(const size_t columns,
 399   const size_t samples_per_pixel,const size_t bits_per_pixel,
 400   const MagickBooleanType pad)
 401 {
 402   size_t
 403     bytes_per_row;
 404
 405   switch (bits_per_pixel)
 406   {
 407     case 1:
 408     {
 409       bytes_per_row=4*(((size_t) samples_per_pixel*columns*bits_per_pixel+31)/
 410         32);
 411       break;
 412     }
 413     case 8:
 414     default:
 415     {
 416       bytes_per_row=4*(((size_t) samples_per_pixel*columns*bits_per_pixel+31)/
 417         32);
 418       break;
 419     }
 420     case 10:
 421     {
 422       if (pad == MagickFalse)
 423         {
 424           bytes_per_row=4*(((size_t) samples_per_pixel*columns*bits_per_pixel+
 425             31)/32);
 426           break;
 427         }
 428       bytes_per_row=4*(((size_t) (32*((samples_per_pixel*columns+2)/3))+31)/32);
 429       break;
 430     }
 431     case 12:
 432     {
 433       if (pad == MagickFalse)
 434         {
 435           bytes_per_row=4*(((size_t) samples_per_pixel*columns*bits_per_pixel+
 436             31)/32);
 437           break;
 438         }
 439       bytes_per_row=2*(((size_t) (16*samples_per_pixel*columns)+15)/16);
 440       break;
 441     }
 442     case 16:
 443     {
 444       bytes_per_row=2*(((size_t) samples_per_pixel*columns*bits_per_pixel+8)/
 445         16);
 446       break;
 447     }
 448     case 32:
 449     {
 450       bytes_per_row=4*(((size_t) samples_per_pixel*columns*bits_per_pixel+31)/
 451         32);
 452       break;
 453     }
 454     case 64:
 455     {
 456       bytes_per_row=8*(((size_t) samples_per_pixel*columns*bits_per_pixel+63)/
 457         64);
 458       break;
 459     }
 460   }
 461   return(bytes_per_row);
 462 }
 463
 464 static const char *GetImageTransferCharacteristic(
 465   const DPXTransferCharacteristic characteristic)
 466 {
 467   const char
 468     *transfer;
 469
 470   /*
 471     Get the element transfer characteristic.
 472   */
 473   switch(characteristic)
 474   {
 475     case TransferCharacteristicUserDefined:
 476     {
 477       transfer="UserDefined";
 478       break;
 479     }
 480     case TransferCharacteristicPrintingDensity:
 481     {
 482       transfer="PrintingDensity";
 483       break;
 484     }
 485     case TransferCharacteristicLinear:
 486     {
 487       transfer="Linear";
 488       break;
 489     }
 490     case TransferCharacteristicLogarithmic:
 491     {
 492       transfer="Logarithmic";
 493       break;
 494     }
 495     case TransferCharacteristicUnspecifiedVideo:
 496     {
 497       transfer="UnspecifiedVideo";
 498       break;
 499     }
 500     case TransferCharacteristicSMTPE274M:
 501     {
 502       transfer="SMTPE274M";
 503       break;
 504     }
 505     case TransferCharacteristicITU_R709:
 506     {
 507       transfer="ITU-R709";
 508       break;
 509     }
 510     case TransferCharacteristicITU_R601_625L:
 511     {
 512       transfer="ITU-R601-625L";
 513       break;
 514     }
 515     case TransferCharacteristicITU_R601_525L:
 516     {
 517       transfer="ITU-R601-525L";
 518       break;
 519     }
 520     case TransferCharacteristicNTSCCompositeVideo:
 521     {
 522       transfer="NTSCCompositeVideo";
 523       break;
 524     }
 525     case TransferCharacteristicPALCompositeVideo:
 526     {
 527       transfer="PALCompositeVideo";
 528       break;
 529     }
 530     case TransferCharacteristicZDepthLinear:
 531     {
 532       transfer="ZDepthLinear";
 533       break;
 534     }
 535     case TransferCharacteristicZDepthHomogeneous:
 536     {
 537       transfer="ZDepthHomogeneous";
 538       break;
 539     }
 540     default:
 541       transfer="Reserved";
 542   }
 543   return(transfer);
 544 }
 545
 546 static inline MagickBooleanType IsFloatDefined(const float value)
 547 {
 548   union
 549   {
 550     unsigned int
 551       unsigned_value;
 552
 553     float
 554       float_value;
 555   } quantum;
 556
 557   quantum.unsigned_value=0U;
 558   quantum.float_value=(float) value;
 559   if (quantum.unsigned_value == 0U)
 560     return(MagickFalse);
 561   return(MagickTrue);
 562 }
 563
 564 static void SetPrimaryChromaticity(const DPXColorimetric colorimetric,
 565   ChromaticityInfo *chromaticity_info)
 566 {
 567   switch(colorimetric)
 568   {
 569     case SMTPE_274MColorimetric:
 570     case ITU_R709Colorimetric:
 571     {
 572       chromaticity_info->red_primary.x=0.640;
 573       chromaticity_info->red_primary.y=0.330;
 574       chromaticity_info->red_primary.z=0.030;
 575       chromaticity_info->green_primary.x=0.300;
 576       chromaticity_info->green_primary.y=0.600;
 577       chromaticity_info->green_primary.z=0.100;
 578       chromaticity_info->blue_primary.x=0.150;
 579       chromaticity_info->blue_primary.y=0.060;
 580       chromaticity_info->blue_primary.z=0.790;
 581       chromaticity_info->white_point.x=0.3127;
 582       chromaticity_info->white_point.y=0.3290;
 583       chromaticity_info->white_point.z=0.3582;
 584       break;
 585     }
 586     case NTSCCompositeVideoColorimetric:
 587     {
 588       chromaticity_info->red_primary.x=0.67;
 589       chromaticity_info->red_primary.y=0.33;
 590       chromaticity_info->red_primary.z=0.00;
 591       chromaticity_info->green_primary.x=0.21;
 592       chromaticity_info->green_primary.y=0.71;
 593       chromaticity_info->green_primary.z=0.08;
 594       chromaticity_info->blue_primary.x=0.14;
 595       chromaticity_info->blue_primary.y=0.08;
 596       chromaticity_info->blue_primary.z=0.78;
 597       chromaticity_info->white_point.x=0.310;
 598       chromaticity_info->white_point.y=0.316;
 599       chromaticity_info->white_point.z=0.374;
 600       break;
 601     }
 602     case PALCompositeVideoColorimetric:
 603     {
 604       chromaticity_info->red_primary.x=0.640;
 605       chromaticity_info->red_primary.y=0.330;
 606       chromaticity_info->red_primary.z=0.030;
 607       chromaticity_info->green_primary.x=0.290;
 608       chromaticity_info->green_primary.y=0.600;
 609       chromaticity_info->green_primary.z=0.110;
 610       chromaticity_info->blue_primary.x=0.150;
 611       chromaticity_info->blue_primary.y=0.060;
 612       chromaticity_info->blue_primary.z=0.790;
 613       chromaticity_info->white_point.x=0.3127;
 614       chromaticity_info->white_point.y=0.3290;
 615       chromaticity_info->white_point.z=0.3582;
 616       break;
 617     }
 618     default:
 619       break;
 620   }
 621 }
 622
 623 static void TimeCodeToString(const size_t timestamp,char *code)
 624 {
 625 #define TimeFields  7
 626
 627   unsigned int
 628     shift;
 629
 630   register ssize_t
 631     i;
 632
 633   *code='\0';
 634   shift=4*TimeFields;
 635   for (i=0; i <= TimeFields; i++)
 636   {
 637     (void) FormatLocaleString(code,MaxTextExtent-strlen(code),"%x",
 638       (unsigned int) ((timestamp >> shift) & 0x0fU));
 639     code++;
 640     if (((i % 2) != 0) && (i < TimeFields))
 641       *code++=':';
 642     shift-=4;
 643     *code='\0';
 644   }
 645 }
 646
 647 static Image *ReadDPXImage(const ImageInfo *image_info,ExceptionInfo *exception)
 648 {
 649   char
 650     magick[4],
 651     value[MaxTextExtent];
 652
 653   DPXInfo
 654     dpx;
 655
 656   Image
 657     *image;
 658
 659   MagickBooleanType
 660     status;
 661
 662   MagickOffsetType
 663     offset;
 664
 665   QuantumInfo
 666     *quantum_info;
 667
 668   QuantumType
 669     quantum_type;
 670
 671   register ssize_t
 672     i;
 673
 674   size_t
 675     extent,
 676     samples_per_pixel;
 677
 678   ssize_t
 679     count,
 680     n,
 681     row,
 682     y;
 683
 684   unsigned char
 685     component_type;
 686
 687   /*
 688     Open image file.
 689   */
 690   assert(image_info != (const ImageInfo *) NULL);
 691   assert(image_info->signature == MagickSignature);
 692   if (image_info->debug != MagickFalse)
 693     (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
 694       image_info->filename);
 695   assert(exception != (ExceptionInfo *) NULL);
 696   assert(exception->signature == MagickSignature);
 697   image=AcquireImage(image_info,exception);
 698   status=OpenBlob(image_info,image,ReadBinaryBlobMode,exception);
 699   if (status == MagickFalse)
 700     {
 701       image=DestroyImageList(image);
 702       return((Image *) NULL);
 703     }
 704   /*
 705     Read DPX file header.
 706   */
 707   offset=0;
 708   count=ReadBlob(image,4,(unsigned char *) magick);
 709   offset+=count;
 710   if ((count != 4) || ((LocaleNCompare(magick,"SDPX",4) != 0) &&
 711       (LocaleNCompare((char *) magick,"XPDS",4) != 0)))
 712     ThrowReaderException(CorruptImageError,"ImproperImageHeader");
 713   image->endian=LSBEndian;
 714   if (LocaleNCompare(magick,"SDPX",4) == 0)
 715     image->endian=MSBEndian;
 716   (void) ResetMagickMemory(&dpx,0,sizeof(dpx));
 717   dpx.file.image_offset=ReadBlobLong(image);
 718   offset+=4;
 719   offset+=ReadBlob(image,sizeof(dpx.file.version),(unsigned char *)
 720     dpx.file.version);
 721   (void) FormatImageProperty(image,"dpx:file.version","%.8s",dpx.file.version);
 722   dpx.file.file_size=ReadBlobLong(image);
 723   offset+=4;
 724   dpx.file.ditto_key=ReadBlobLong(image);
 725   offset+=4;
 726   if (dpx.file.ditto_key != ~0U)
 727     (void) FormatImageProperty(image,"dpx:file.ditto.key","%u",
 728       dpx.file.ditto_key);
 729   dpx.file.generic_size=ReadBlobLong(image);
 730   offset+=4;
 731   dpx.file.industry_size=ReadBlobLong(image);
 732   offset+=4;
 733   dpx.file.user_size=ReadBlobLong(image);
 734   offset+=4;
 735   offset+=ReadBlob(image,sizeof(dpx.file.filename),(unsigned char *)
 736     dpx.file.filename);
 737   (void) FormatImageProperty(image,"dpx:file.filename","%.100s",
 738     dpx.file.filename);
 739   (void) FormatImageProperty(image,"document","%.100s",dpx.file.filename);
 740   offset+=ReadBlob(image,sizeof(dpx.file.timestamp),(unsigned char *)
 741     dpx.file.timestamp);
 742   if (*dpx.file.timestamp != '\0')
 743     (void) FormatImageProperty(image,"dpx:file.timestamp","%.24s",
 744       dpx.file.timestamp);
 745   offset+=ReadBlob(image,sizeof(dpx.file.creator),(unsigned char *)
 746     dpx.file.creator);
 747   if (*dpx.file.creator != '\0')
 748     {
 749       (void) FormatImageProperty(image,"dpx:file.creator","%.100s",
 750         dpx.file.creator);
 751       (void) FormatImageProperty(image,"software","%.100s",dpx.file.creator);
 752     }
 753   offset+=ReadBlob(image,sizeof(dpx.file.project),(unsigned char *)
 754     dpx.file.project);
 755   if (*dpx.file.project != '\0')
 756     {
 757       (void) FormatImageProperty(image,"dpx:file.project","%.200s",
 758         dpx.file.project);
 759       (void) FormatImageProperty(image,"comment","%.100s",dpx.file.project);
 760     }
 761   offset+=ReadBlob(image,sizeof(dpx.file.copyright),(unsigned char *)
 762     dpx.file.copyright);
 763   if (*dpx.file.copyright != '\0')
 764     {
 765       (void) FormatImageProperty(image,"dpx:file.copyright","%.200s",
 766         dpx.file.copyright);
 767       (void) FormatImageProperty(image,"copyright","%.100s",
 768         dpx.file.copyright);
 769     }
 770   dpx.file.encrypt_key=ReadBlobLong(image);
 771   offset+=4;
 772   if (dpx.file.encrypt_key != ~0U)
 773     (void) FormatImageProperty(image,"dpx:file.encrypt_key","%u",
 774       dpx.file.encrypt_key);
 775   offset+=ReadBlob(image,sizeof(dpx.file.reserve),(unsigned char *)
 776     dpx.file.reserve);
 777   /*
 778     Read DPX image header.
 779   */
 780   dpx.image.orientation=ReadBlobShort(image);
 781   if (dpx.image.orientation > 7)
 782     ThrowReaderException(CorruptImageError,"ImproperImageHeader");
 783   offset+=2;
 784   if (dpx.image.orientation != (unsigned short) ~0)
 785     (void) FormatImageProperty(image,"dpx:image.orientation","%d",
 786       dpx.image.orientation);
 787   switch (dpx.image.orientation)
 788   {
 789     default:
 790     case 0: image->orientation=TopLeftOrientation; break;
 791     case 1: image->orientation=TopRightOrientation; break;
 792     case 2: image->orientation=BottomLeftOrientation; break;
 793     case 3: image->orientation=BottomRightOrientation; break;
 794     case 4: image->orientation=LeftTopOrientation; break;
 795     case 5: image->orientation=RightTopOrientation; break;
 796     case 6: image->orientation=LeftBottomOrientation; break;
 797     case 7: image->orientation=RightBottomOrientation; break;
 798   }
 799   dpx.image.number_elements=ReadBlobShort(image);
 800   if (dpx.image.number_elements > MaxNumberImageElements)
 801     ThrowReaderException(CorruptImageError,"ImproperImageHeader");
 802   offset+=2;
 803   dpx.image.pixels_per_line=ReadBlobLong(image);
 804   offset+=4;
 805   image->columns=dpx.image.pixels_per_line;
 806   dpx.image.lines_per_element=ReadBlobLong(image);
 807   offset+=4;
 808   image->rows=dpx.image.lines_per_element;
 809   for (i=0; i < 8; i++)
 810   {
 811     char
 812       property[MaxTextExtent];
 813
 814     dpx.image.image_element[i].data_sign=ReadBlobLong(image);
 815     offset+=4;
 816     dpx.image.image_element[i].low_data=ReadBlobLong(image);
 817     offset+=4;
 818     dpx.image.image_element[i].low_quantity=ReadBlobFloat(image);
 819     offset+=4;
 820     dpx.image.image_element[i].high_data=ReadBlobLong(image);
 821     offset+=4;
 822     dpx.image.image_element[i].high_quantity=ReadBlobFloat(image);
 823     offset+=4;
 824     dpx.image.image_element[i].descriptor=(unsigned char) ReadBlobByte(image);
 825     offset++;
 826     dpx.image.image_element[i].transfer_characteristic=(unsigned char)
 827       ReadBlobByte(image);
 828     (void) FormatLocaleString(property,MaxTextExtent,
 829       "dpx:image.element[%lu].transfer-characteristic",(long) i);
 830     (void) FormatImageProperty(image,property,"%s",
 831       GetImageTransferCharacteristic((DPXTransferCharacteristic)
 832       dpx.image.image_element[i].transfer_characteristic));
 833     offset++;
 834     dpx.image.image_element[i].colorimetric=(unsigned char) ReadBlobByte(image);
 835     offset++;
 836     dpx.image.image_element[i].bit_size=(unsigned char) ReadBlobByte(image);
 837     offset++;
 838     dpx.image.image_element[i].packing=ReadBlobShort(image);
 839     offset+=2;
 840     dpx.image.image_element[i].encoding=ReadBlobShort(image);
 841     offset+=2;
 842     dpx.image.image_element[i].data_offset=ReadBlobLong(image);
 843     offset+=4;
 844     dpx.image.image_element[i].end_of_line_padding=ReadBlobLong(image);
 845     offset+=4;
 846     dpx.image.image_element[i].end_of_image_padding=ReadBlobLong(image);
 847     offset+=4;
 848     offset+=ReadBlob(image,sizeof(dpx.image.image_element[i].description),
 849       (unsigned char *) dpx.image.image_element[i].description);
 850   }
 851   SetImageColorspace(image,RGBColorspace,exception);
 852   offset+=ReadBlob(image,sizeof(dpx.image.reserve),(unsigned char *)
 853     dpx.image.reserve);
 854   if (dpx.file.image_offset >= 1664U)
 855     {
 856       /*
 857         Read DPX orientation header.
 858       */
 859       dpx.orientation.x_offset=ReadBlobLong(image);
 860       offset+=4;
 861       if (dpx.orientation.x_offset != ~0U)
 862         (void) FormatImageProperty(image,"dpx:orientation.x_offset","%u",
 863           dpx.orientation.x_offset);
 864       dpx.orientation.y_offset=ReadBlobLong(image);
 865       offset+=4;
 866       if (dpx.orientation.y_offset != ~0U)
 867         (void) FormatImageProperty(image,"dpx:orientation.y_offset","%u",
 868           dpx.orientation.y_offset);
 869       dpx.orientation.x_center=ReadBlobFloat(image);
 870       offset+=4;
 871       if (IsFloatDefined(dpx.orientation.x_center) != MagickFalse)
 872         (void) FormatImageProperty(image,"dpx:orientation.x_center","%g",
 873           dpx.orientation.x_center);
 874       dpx.orientation.y_center=ReadBlobFloat(image);
 875       offset+=4;
 876       if (IsFloatDefined(dpx.orientation.y_center) != MagickFalse)
 877         (void) FormatImageProperty(image,"dpx:orientation.y_center","%g",
 878           dpx.orientation.y_center);
 879       dpx.orientation.x_size=ReadBlobLong(image);
 880       offset+=4;
 881       if (dpx.orientation.x_size != ~0U)
 882         (void) FormatImageProperty(image,"dpx:orientation.x_size","%u",
 883           dpx.orientation.x_size);
 884       dpx.orientation.y_size=ReadBlobLong(image);
 885       offset+=4;
 886       if (dpx.orientation.y_size != ~0U)
 887         (void) FormatImageProperty(image,"dpx:orientation.y_size","%u",
 888           dpx.orientation.y_size);
 889       offset+=ReadBlob(image,sizeof(dpx.orientation.filename),(unsigned char *)
 890         dpx.orientation.filename);
 891       if (*dpx.orientation.filename != '\0')
 892         (void) FormatImageProperty(image,"dpx:orientation.filename","%.100s",
 893           dpx.orientation.filename);
 894       offset+=ReadBlob(image,sizeof(dpx.orientation.timestamp),(unsigned char *)
 895         dpx.orientation.timestamp);
 896       if (*dpx.orientation.timestamp != '\0')
 897         (void) FormatImageProperty(image,"dpx:orientation.timestamp","%.24s",
 898           dpx.orientation.timestamp);
 899       offset+=ReadBlob(image,sizeof(dpx.orientation.device),(unsigned char *)
 900         dpx.orientation.device);
 901       if (*dpx.orientation.device != '\0')
 902         (void) FormatImageProperty(image,"dpx:orientation.device","%.32s",
 903           dpx.orientation.device);
 904       offset+=ReadBlob(image,sizeof(dpx.orientation.serial),(unsigned char *)
 905         dpx.orientation.serial);
 906       if (*dpx.orientation.serial != '\0')
 907         (void) FormatImageProperty(image,"dpx:orientation.serial","%.32s",
 908           dpx.orientation.serial);
 909       for (i=0; i < 4; i++)
 910       {
 911         dpx.orientation.border[i]=ReadBlobShort(image);
 912         offset+=2;
 913       }
 914       if ((dpx.orientation.border[0] != (unsigned short) (~0)) &&
 915           (dpx.orientation.border[1] != (unsigned short) (~0)))
 916         (void) FormatImageProperty(image,"dpx:orientation.border","%dx%d%+d%+d",
 917           dpx.orientation.border[0],dpx.orientation.border[1],
 918           dpx.orientation.border[2],dpx.orientation.border[3]);
 919       for (i=0; i < 2; i++)
 920       {
 921         dpx.orientation.aspect_ratio[i]=ReadBlobLong(image);
 922         offset+=4;
 923       }
 924       if ((dpx.orientation.aspect_ratio[0] != ~0U) &&
 925           (dpx.orientation.aspect_ratio[1] != ~0U))
 926         (void) FormatImageProperty(image,"dpx:orientation.aspect_ratio",
 927           "%ux%u",dpx.orientation.aspect_ratio[0],
 928           dpx.orientation.aspect_ratio[1]);
 929       offset+=ReadBlob(image,sizeof(dpx.orientation.reserve),(unsigned char *)
 930         dpx.orientation.reserve);
 931     }
 932   if (dpx.file.image_offset >= 1920U)
 933     {
 934       /*
 935         Read DPX film header.
 936       */
 937       offset+=ReadBlob(image,sizeof(dpx.film.id),(unsigned char *) dpx.film.id);
 938       if (*dpx.film.id != '\0')
 939         (void) FormatImageProperty(image,"dpx:film.id","%.2s",dpx.film.id);
 940       offset+=ReadBlob(image,sizeof(dpx.film.type),(unsigned char *)
 941         dpx.film.type);
 942       if (*dpx.film.type != '\0')
 943         (void) FormatImageProperty(image,"dpx:film.type","%.2s",dpx.film.type);
 944       offset+=ReadBlob(image,sizeof(dpx.film.offset),(unsigned char *)
 945         dpx.film.offset);
 946       if (*dpx.film.offset != '\0')
 947         (void) FormatImageProperty(image,"dpx:film.offset","%.2s",
 948           dpx.film.offset);
 949       offset+=ReadBlob(image,sizeof(dpx.film.prefix),(unsigned char *)
 950         dpx.film.prefix);
 951       if (*dpx.film.prefix != '\0')
 952         (void) FormatImageProperty(image,"dpx:film.prefix","%.6s",
 953           dpx.film.prefix);
 954       offset+=ReadBlob(image,sizeof(dpx.film.count),(unsigned char *)
 955         dpx.film.count);
 956       if (*dpx.film.count != '\0')
 957         (void) FormatImageProperty(image,"dpx:film.count","%.4s",
 958           dpx.film.count);
 959       offset+=ReadBlob(image,sizeof(dpx.film.format),(unsigned char *)
 960         dpx.film.format);
 961       if (*dpx.film.format != '\0')
 962         (void) FormatImageProperty(image,"dpx:film.format","%.4s",
 963           dpx.film.format);
 964       dpx.film.frame_position=ReadBlobLong(image);
 965       offset+=4;
 966       if (dpx.film.frame_position != ~0U)
 967         (void) FormatImageProperty(image,"dpx:film.frame_position","%u",
 968           dpx.film.frame_position);
 969       dpx.film.sequence_extent=ReadBlobLong(image);
 970       offset+=4;
 971       if (dpx.film.sequence_extent != ~0U)
 972         (void) FormatImageProperty(image,"dpx:film.sequence_extent","%u",
 973           dpx.film.sequence_extent);
 974       dpx.film.held_count=ReadBlobLong(image);
 975       offset+=4;
 976       if (dpx.film.held_count != ~0U)
 977         (void) FormatImageProperty(image,"dpx:film.held_count","%u",
 978           dpx.film.held_count);
 979       dpx.film.frame_rate=ReadBlobFloat(image);
 980       offset+=4;
 981       if (IsFloatDefined(dpx.film.frame_rate) != MagickFalse)
 982         (void) FormatImageProperty(image,"dpx:film.frame_rate","%g",
 983           dpx.film.frame_rate);
 984       dpx.film.shutter_angle=ReadBlobFloat(image);
 985       offset+=4;
 986       if (IsFloatDefined(dpx.film.shutter_angle) != MagickFalse)
 987         (void) FormatImageProperty(image,"dpx:film.shutter_angle","%g",
 988           dpx.film.shutter_angle);
 989       offset+=ReadBlob(image,sizeof(dpx.film.frame_id),(unsigned char *)
 990         dpx.film.frame_id);
 991       if (*dpx.film.frame_id != '\0')
 992         (void) FormatImageProperty(image,"dpx:film.frame_id","%.32s",
 993           dpx.film.frame_id);
 994       offset+=ReadBlob(image,sizeof(dpx.film.slate),(unsigned char *)
 995         dpx.film.slate);
 996       if (*dpx.film.slate != '\0')
 997         (void) FormatImageProperty(image,"dpx:film.slate","%.100s",
 998           dpx.film.slate);
 999       offset+=ReadBlob(image,sizeof(dpx.film.reserve),(unsigned char *)
1000         dpx.film.reserve);
1001     }
1002   if (dpx.file.image_offset >= 2048U)
1003     {
1004       /*
1005         Read DPX television header.
1006       */
1007       dpx.television.time_code=(unsigned int) ReadBlobLong(image);
1008       offset+=4;
1009       TimeCodeToString(dpx.television.time_code,value);
1010       (void) SetImageProperty(image,"dpx:television.time.code",value,exception);
1011       dpx.television.user_bits=(unsigned int) ReadBlobLong(image);
1012       offset+=4;
1013       TimeCodeToString(dpx.television.user_bits,value);
1014       (void) SetImageProperty(image,"dpx:television.user.bits",value,exception);
1015       dpx.television.interlace=(unsigned char) ReadBlobByte(image);
1016       offset++;
1017       if (dpx.television.interlace != 0)
1018         (void) FormatImageProperty(image,"dpx:television.interlace","%.20g",
1019           (double) dpx.television.interlace);
1020       dpx.television.field_number=(unsigned char) ReadBlobByte(image);
1021       offset++;
1022       if (dpx.television.field_number != 0)
1023         (void) FormatImageProperty(image,"dpx:television.field_number","%.20g",
1024           (double) dpx.television.field_number);
1025       dpx.television.video_signal=(unsigned char) ReadBlobByte(image);
1026       offset++;
1027       if (dpx.television.video_signal != 0)
1028         (void) FormatImageProperty(image,"dpx:television.video_signal","%.20g",
1029           (double) dpx.television.video_signal);
1030       dpx.television.padding=(unsigned char) ReadBlobByte(image);
1031       offset++;
1032       if (dpx.television.padding != 0)
1033         (void) FormatImageProperty(image,"dpx:television.padding","%d",
1034           dpx.television.padding);
1035       dpx.television.horizontal_sample_rate=ReadBlobFloat(image);
1036       offset+=4;
1037       if (IsFloatDefined(dpx.television.horizontal_sample_rate) != MagickFalse)
1038         (void) FormatImageProperty(image,
1039           "dpx:television.horizontal_sample_rate","%g",
1040           dpx.television.horizontal_sample_rate);
1041       dpx.television.vertical_sample_rate=ReadBlobFloat(image);
1042       offset+=4;
1043       if (IsFloatDefined(dpx.television.vertical_sample_rate) != MagickFalse)
1044         (void) FormatImageProperty(image,"dpx:television.vertical_sample_rate",
1045           "%g",dpx.television.vertical_sample_rate);
1046       dpx.television.frame_rate=ReadBlobFloat(image);
1047       offset+=4;
1048       if (IsFloatDefined(dpx.television.frame_rate) != MagickFalse)
1049         (void) FormatImageProperty(image,"dpx:television.frame_rate","%g",
1050           dpx.television.frame_rate);
1051       dpx.television.time_offset=ReadBlobFloat(image);
1052       offset+=4;
1053       if (IsFloatDefined(dpx.television.time_offset) != MagickFalse)
1054         (void) FormatImageProperty(image,"dpx:television.time_offset","%g",
1055           dpx.television.time_offset);
1056       dpx.television.gamma=ReadBlobFloat(image);
1057       offset+=4;
1058       if (IsFloatDefined(dpx.television.gamma) != MagickFalse)
1059         (void) FormatImageProperty(image,"dpx:television.gamma","%g",
1060           dpx.television.gamma);
1061       dpx.television.black_level=ReadBlobFloat(image);
1062       offset+=4;
1063       if (IsFloatDefined(dpx.television.black_level) != MagickFalse)
1064         (void) FormatImageProperty(image,"dpx:television.black_level","%g",
1065           dpx.television.black_level);
1066       dpx.television.black_gain=ReadBlobFloat(image);
1067       offset+=4;
1068       if (IsFloatDefined(dpx.television.black_gain) != MagickFalse)
1069         (void) FormatImageProperty(image,"dpx:television.black_gain","%g",
1070           dpx.television.black_gain);
1071       dpx.television.break_point=ReadBlobFloat(image);
1072       offset+=4;
1073       if (IsFloatDefined(dpx.television.break_point) != MagickFalse)
1074         (void) FormatImageProperty(image,"dpx:television.break_point","%g",
1075           dpx.television.break_point);
1076       dpx.television.white_level=ReadBlobFloat(image);
1077       offset+=4;
1078       if (IsFloatDefined(dpx.television.white_level) != MagickFalse)
1079         (void) FormatImageProperty(image,"dpx:television.white_level","%g",
1080           dpx.television.white_level);
1081       dpx.television.integration_times=ReadBlobFloat(image);
1082       offset+=4;
1083       if (IsFloatDefined(dpx.television.integration_times) != MagickFalse)
1084         (void) FormatImageProperty(image,"dpx:television.integration_times",
1085           "%g",dpx.television.integration_times);
1086       offset+=ReadBlob(image,sizeof(dpx.television.reserve),(unsigned char *)
1087         dpx.television.reserve);
1088     }
1089   if (dpx.file.image_offset > 2080U)
1090     {
1091       /*
1092         Read DPX user header.
1093       */
1094       offset+=ReadBlob(image,sizeof(dpx.user.id),(unsigned char *) dpx.user.id);
1095       if (*dpx.user.id != '\0')
1096         (void) FormatImageProperty(image,"dpx:user.id","%.32s",dpx.user.id);
1097       if ((dpx.file.user_size != ~0U) &&
1098           ((size_t) dpx.file.user_size > sizeof(dpx.user.id)))
1099         {
1100           StringInfo
1101             *profile;
1102
1103            profile=BlobToStringInfo((const void *) NULL,
1104              dpx.file.user_size-sizeof(dpx.user.id));
1105            if (profile == (StringInfo *) NULL)
1106              ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
1107            offset+=ReadBlob(image,GetStringInfoLength(profile),
1108              GetStringInfoDatum(profile));
1109            (void) SetImageProfile(image,"dpx:user-data",profile,exception);
1110            profile=DestroyStringInfo(profile);
1111         }
1112     }
1113   for ( ; offset < (MagickOffsetType) dpx.file.image_offset; offset++)
1114     (void) ReadBlobByte(image);
1115   if (image_info->ping != MagickFalse)
1116     {
1117       (void) CloseBlob(image);
1118       return(GetFirstImageInList(image));
1119     }
1120   for (n=0; n < (ssize_t) dpx.image.number_elements; n++)
1121   {
1122     /*
1123       Convert DPX raster image to pixel packets.
1124     */
1125     if ((dpx.image.image_element[n].data_offset != ~0U) &&
1126         (dpx.image.image_element[n].data_offset != 0U))
1127       {
1128          MagickOffsetType
1129            data_offset;
1130
1131          data_offset=(MagickOffsetType) dpx.image.image_element[n].data_offset;
1132          if (data_offset < offset)
1133            offset=SeekBlob(image,data_offset,SEEK_SET);
1134          else
1135            for ( ; offset < data_offset; offset++)
1136              (void) ReadBlobByte(image);
1137           if (offset != data_offset)
1138             ThrowReaderException(CorruptImageError,"UnableToReadImageData");
1139        }
1140     SetPrimaryChromaticity((DPXColorimetric)
1141       dpx.image.image_element[n].colorimetric,&image->chromaticity);
1142     image->depth=dpx.image.image_element[n].bit_size;
1143     samples_per_pixel=1;
1144     quantum_type=GrayQuantum;
1145     component_type=dpx.image.image_element[n].descriptor;
1146     switch (component_type)
1147     {
1148       case CbYCrY422ComponentType:
1149       {
1150         samples_per_pixel=2;
1151         quantum_type=CbYCrYQuantum;
1152         break;
1153       }
1154       case CbYACrYA4224ComponentType:
1155       case CbYCr444ComponentType:
1156       {
1157         samples_per_pixel=3;
1158         quantum_type=CbYCrQuantum;
1159         break;
1160       }
1161       case RGBComponentType:
1162       {
1163         samples_per_pixel=3;
1164         quantum_type=RGBQuantum;
1165         break;
1166       }
1167       case ABGRComponentType:
1168       case RGBAComponentType:
1169       {
1170         image->alpha_trait=BlendPixelTrait;
1171         samples_per_pixel=4;
1172         quantum_type=RGBAQuantum;
1173         break;
1174       }
1175       default:
1176         break;
1177     }
1178     switch (component_type)
1179     {
1180       case CbYCrY422ComponentType:
1181       case CbYACrYA4224ComponentType:
1182       case CbYCr444ComponentType:
1183       {
1184         SetImageColorspace(image,Rec709YCbCrColorspace,exception);
1185         break;
1186       }
1187       case LumaComponentType:
1188       {
1189         SetImageColorspace(image,GRAYColorspace,exception);
1190         break;
1191       }
1192       default:
1193       {
1194         SetImageColorspace(image,sRGBColorspace,exception);
1195         if (dpx.image.image_element[n].transfer_characteristic == LogarithmicColorimetric)
1196           SetImageColorspace(image,LogColorspace,exception);
1197         if (dpx.image.image_element[n].transfer_characteristic == PrintingDensityColorimetric)
1198           SetImageColorspace(image,LogColorspace,exception);
1199         break;
1200       }
1201     }
1202     extent=GetBytesPerRow(image->columns,samples_per_pixel,image->depth,
1203       dpx.image.image_element[n].packing == 0 ? MagickFalse : MagickTrue);
1204     /*
1205       DPX any-bit pixel format.
1206     */
1207     status=MagickTrue;
1208     row=0;
1209     quantum_info=AcquireQuantumInfo(image_info,image);
1210     if (quantum_info == (QuantumInfo *) NULL)
1211       ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
1212     SetQuantumQuantum(quantum_info,32);
1213     SetQuantumPack(quantum_info,dpx.image.image_element[n].packing == 0 ?
1214       MagickTrue : MagickFalse);
1215     for (y=0; y < (ssize_t) image->rows; y++)
1216     {
1217       MagickBooleanType
1218         sync;
1219
1220       register Quantum
1221         *q;
1222
1223       size_t
1224         length;
1225
1226       ssize_t
1227         count,
1228         offset;
1229
1230       unsigned char
1231         *pixels;
1232
1233       if (status == MagickFalse)
1234         continue;
1235       pixels=GetQuantumPixels(quantum_info);
1236       {
1237         count=ReadBlob(image,extent,pixels);
1238         if ((image->progress_monitor != (MagickProgressMonitor) NULL) &&
1239             (image->previous == (Image *) NULL))
1240           {
1241             MagickBooleanType
1242               proceed;
1243
1244             proceed=SetImageProgress(image,LoadImageTag,(MagickOffsetType) row,
1245               image->rows);
1246             if (proceed == MagickFalse)
1247               status=MagickFalse;
1248           }
1249         offset=row++;
1250       }
1251       if (count != (ssize_t) extent)
1252         status=MagickFalse;
1253       q=QueueAuthenticPixels(image,0,offset,image->columns,1,exception);
1254       if (q == (Quantum *) NULL)
1255         {
1256           status=MagickFalse;
1257           continue;
1258         }
1259       length=ImportQuantumPixels(image,(CacheView *) NULL,quantum_info,
1260         quantum_type,pixels,exception);
1261       (void) length;
1262       sync=SyncAuthenticPixels(image,exception);
1263       if (sync == MagickFalse)
1264         status=MagickFalse;
1265     }
1266     quantum_info=DestroyQuantumInfo(quantum_info);
1267     if (status == MagickFalse)
1268       ThrowReaderException(CorruptImageError,"UnableToReadImageData");
1269     SetQuantumImageType(image,quantum_type);
1270     if (EOFBlob(image) != MagickFalse)
1271       ThrowFileException(exception,CorruptImageError,"UnexpectedEndOfFile",
1272         image->filename);
1273     if ((i+1) < (ssize_t) dpx.image.number_elements)
1274       {
1275         /*
1276           Allocate next image structure.
1277         */
1278         AcquireNextImage(image_info,image,exception);
1279         if (GetNextImageInList(image) == (Image *) NULL)
1280           {
1281             image=DestroyImageList(image);
1282             return((Image *) NULL);
1283           }
1284         image=SyncNextImageInList(image);
1285         status=SetImageProgress(image,LoadImagesTag,TellBlob(image),
1286           GetBlobSize(image));
1287         if (status == MagickFalse)
1288           break;
1289       }
1290   }
1291   (void) CloseBlob(image);
1292   return(GetFirstImageInList(image));
1293 }
1294 \f
1295 /*
1296 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1297 %                                                                             %
1298 %                                                                             %
1299 %                                                                             %
1300 %   R e g i s t e r D P X I m a g e                                           %
1301 %                                                                             %
1302 %                                                                             %
1303 %                                                                             %
1304 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1305 %
1306 %  RegisterDPXImage() adds properties for the DPX image format to
1307 %  the list of supported formats.  The properties include the image format
1308 %  tag, a method to read and/or write the format, whether the format
1309 %  supports the saving of more than one frame to the same file or blob,
1310 %  whether the format supports native in-memory I/O, and a brief
1311 %  description of the format.
1312 %
1313 %  The format of the RegisterDPXImage method is:
1314 %
1315 %      size_t RegisterDPXImage(void)
1316 %
1317 */
1318 ModuleExport size_t RegisterDPXImage(void)
1319 {
1320   MagickInfo
1321     *entry;
1322
1323   static const char
1324     *DPXNote =
1325     {
1326       "Digital Moving Picture Exchange Bitmap, Version 2.0.\n"
1327       "See SMPTE 268M-2003 specification at http://www.smtpe.org\n"
1328     };
1329
1330   entry=SetMagickInfo("DPX");
1331   entry->decoder=(DecodeImageHandler *) ReadDPXImage;
1332   entry->encoder=(EncodeImageHandler *) WriteDPXImage;
1333   entry->magick=(IsImageFormatHandler *) IsDPX;
1334   entry->adjoin=MagickFalse;
1335   entry->seekable_stream=MagickTrue;
1336   entry->description=ConstantString("SMPTE 268M-2003 (DPX 2.0)");
1337   entry->note=ConstantString(DPXNote);
1338   entry->module=ConstantString("DPX");
1339   (void) RegisterMagickInfo(entry);
1340   return(MagickImageCoderSignature);
1341 }
1342 \f
1343 /*
1344 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1345 %                                                                             %
1346 %                                                                             %
1347 %                                                                             %
1348 %   U n r e g i s t e r D P X I m a g e                                       %
1349 %                                                                             %
1350 %                                                                             %
1351 %                                                                             %
1352 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1353 %
1354 %  UnregisterDPXImage() removes format registrations made by the
1355 %  DPX module from the list of supported formats.
1356 %
1357 %  The format of the UnregisterDPXImage method is:
1358 %
1359 %      UnregisterDPXImage(void)
1360 %
1361 */
1362 ModuleExport void UnregisterDPXImage(void)
1363 {
1364   (void) UnregisterMagickInfo("DPX");
1365 }
1366 \f
1367 /*
1368 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1369 %                                                                             %
1370 %                                                                             %
1371 %                                                                             %
1372 %   W r i t e D P X I m a g e                                                 %
1373 %                                                                             %
1374 %                                                                             %
1375 %                                                                             %
1376 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1377 %
1378 %  WriteDPXImage() writes an image in DPX encoded image format.
1379 %
1380 %  The format of the WriteDPXImage method is:
1381 %
1382 %      MagickBooleanType WriteDPXImage(const ImageInfo *image_info,
1383 %        Image *image,ExceptionInfo *exception)
1384 %
1385 %  A description of each parameter follows.
1386 %
1387 %    o image_info: the image info.
1388 %
1389 %    o image:  The image.
1390 %
1391 %    o exception: return any errors or warnings in this structure.
1392 %
1393 */
1394
1395 static unsigned int StringToTimeCode(const char *key)
1396 {
1397   char
1398     buffer[2];
1399
1400   register ssize_t
1401     i;
1402
1403   unsigned int
1404     shift,
1405     value;
1406
1407   value=0;
1408   shift=28;
1409   buffer[1]='\0';
1410   for (i=0; (*key != 0) && (i < 11); i++)
1411   {
1412     if (isxdigit((int) ((unsigned char) *key)) == 0)
1413       {
1414         key++;
1415         continue;
1416       }
1417     buffer[0]=(*key++);
1418     value|=(unsigned int) ((strtol(buffer,(char **) NULL,16)) << shift);
1419     shift-=4;
1420   }
1421   return(value);
1422 }
1423
1424 static MagickBooleanType WriteDPXImage(const ImageInfo *image_info,Image *image,
1425   ExceptionInfo *exception)
1426 {
1427   const char
1428     *value;
1429
1430   const StringInfo
1431     *profile;
1432
1433   DPXInfo
1434     dpx;
1435
1436   GeometryInfo
1437     geometry_info;
1438
1439   MagickBooleanType
1440     status;
1441
1442   MagickOffsetType
1443     offset;
1444
1445   MagickStatusType
1446     flags;
1447
1448   QuantumInfo
1449     *quantum_info;
1450
1451   QuantumType
1452     quantum_type;
1453
1454   register const Quantum
1455     *p;
1456
1457   register ssize_t
1458     i;
1459
1460   size_t
1461     extent;
1462
1463   ssize_t
1464     count,
1465     horizontal_factor,
1466     vertical_factor,
1467     y;
1468
1469   time_t
1470     seconds;
1471
1472   unsigned char
1473     *pixels;
1474
1475   /*
1476     Open output image file.
1477   */
1478   assert(image_info != (const ImageInfo *) NULL);
1479   assert(image_info->signature == MagickSignature);
1480   assert(image != (Image *) NULL);
1481   assert(image->signature == MagickSignature);
1482   if (image->debug != MagickFalse)
1483     (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
1484   horizontal_factor=4;
1485   vertical_factor=4;
1486   if (image_info->sampling_factor != (char *) NULL)
1487     {
1488       GeometryInfo
1489         geometry_info;
1490
1491       MagickStatusType
1492         flags;
1493
1494       flags=ParseGeometry(image_info->sampling_factor,&geometry_info);
1495       horizontal_factor=(ssize_t) geometry_info.rho;
1496       vertical_factor=(ssize_t) geometry_info.sigma;
1497       if ((flags & SigmaValue) == 0)
1498         vertical_factor=horizontal_factor;
1499       if ((horizontal_factor != 1) && (horizontal_factor != 2) &&
1500           (horizontal_factor != 4) && (vertical_factor != 1) &&
1501           (vertical_factor != 2) && (vertical_factor != 4))
1502         ThrowWriterException(CorruptImageError,"UnexpectedSamplingFactor");
1503     }
1504   if ((image->colorspace == YCbCrColorspace) &&
1505       ((horizontal_factor == 2) || (vertical_factor == 2)))
1506     if ((image->columns % 2) != 0)
1507       image->columns++;
1508   assert(exception != (ExceptionInfo *) NULL);
1509   assert(exception->signature == MagickSignature);
1510   status=OpenBlob(image_info,image,WriteBinaryBlobMode,exception);
1511   if (status == MagickFalse)
1512     return(status);
1513   /*
1514     Write file header.
1515   */
1516   (void) ResetMagickMemory(&dpx,0,sizeof(dpx));
1517   offset=0;
1518   dpx.file.magic=0x53445058U;
1519   offset+=WriteBlobLong(image,dpx.file.magic);
1520   dpx.file.image_offset=0x2000U;
1521   profile=GetImageProfile(image,"dpx:user-data");
1522   if (profile != (StringInfo *) NULL)
1523     {
1524       if (GetStringInfoLength(profile) > 1048576)
1525         ThrowWriterException(ImageError,"WidthOrHeightExceedsLimit");
1526       dpx.file.image_offset+=(unsigned int) GetStringInfoLength(profile);
1527       dpx.file.image_offset=(((dpx.file.image_offset+0x2000-1)/0x2000)*0x2000);
1528     }
1529   offset+=WriteBlobLong(image,dpx.file.image_offset);
1530   (void) strncpy(dpx.file.version,"V2.0",sizeof(dpx.file.version)-1);
1531   offset+=WriteBlob(image,8,(unsigned char *) &dpx.file.version);
1532   dpx.file.file_size=(unsigned int) (4U*image->columns*image->rows+
1533     dpx.file.image_offset);
1534   offset+=WriteBlobLong(image,dpx.file.file_size);
1535   dpx.file.ditto_key=1U;  /* new frame */
1536   offset+=WriteBlobLong(image,dpx.file.ditto_key);
1537   dpx.file.generic_size=0x00000680U;
1538   offset+=WriteBlobLong(image,dpx.file.generic_size);
1539   dpx.file.industry_size=0x00000180U;
1540   offset+=WriteBlobLong(image,dpx.file.industry_size);
1541   dpx.file.user_size=0;
1542   if (profile != (StringInfo *) NULL)
1543     {
1544       dpx.file.user_size+=(unsigned int) GetStringInfoLength(profile);
1545       dpx.file.user_size=(((dpx.file.user_size+0x2000-1)/0x2000)*0x2000);
1546     }
1547   offset+=WriteBlobLong(image,dpx.file.user_size);
1548   value=GetImageArtifact(image,"dpx:file.filename");
1549   if (value != (const char *) NULL)
1550     (void) strncpy(dpx.file.filename,value,sizeof(dpx.file.filename)-1);
1551   offset+=WriteBlob(image,sizeof(dpx.file.filename),(unsigned char *)
1552     dpx.file.filename);
1553   seconds=time((time_t *) NULL);
1554   (void) FormatMagickTime(seconds,sizeof(dpx.file.timestamp),
1555     dpx.file.timestamp);
1556   offset+=WriteBlob(image,sizeof(dpx.file.timestamp),(unsigned char *)
1557     dpx.file.timestamp);
1558   (void) strncpy(dpx.file.creator,GetMagickVersion((size_t *) NULL),
1559     sizeof(dpx.file.creator)-1);
1560   value=GetImageArtifact(image,"dpx:file.creator");
1561   if (value != (const char *) NULL)
1562     (void) strncpy(dpx.file.creator,value,sizeof(dpx.file.creator)-1);
1563   offset+=WriteBlob(image,sizeof(dpx.file.creator),(unsigned char *)
1564     dpx.file.creator);
1565   value=GetImageArtifact(image,"dpx:file.project");
1566   if (value != (const char *) NULL)
1567     (void) strncpy(dpx.file.project,value,sizeof(dpx.file.project)-1);
1568   offset+=WriteBlob(image,sizeof(dpx.file.project),(unsigned char *)
1569     dpx.file.project);
1570   value=GetImageArtifact(image,"dpx:file.copyright");
1571   if (value != (const char *) NULL)
1572     (void) strncpy(dpx.file.copyright,value,sizeof(dpx.file.copyright)-1);
1573   offset+=WriteBlob(image,sizeof(dpx.file.copyright),(unsigned char *)
1574     dpx.file.copyright);
1575   dpx.file.encrypt_key=(~0U);
1576   offset+=WriteBlobLong(image,dpx.file.encrypt_key);
1577   offset+=WriteBlob(image,sizeof(dpx.file.reserve),(unsigned char *)
1578     dpx.file.reserve);
1579   /*
1580     Write image header.
1581   */
1582   switch (image->orientation)
1583   {
1584     default:
1585     case TopLeftOrientation: dpx.image.orientation=0; break;
1586     case TopRightOrientation: dpx.image.orientation=1; break;
1587     case BottomLeftOrientation: dpx.image.orientation=2; break;
1588     case BottomRightOrientation: dpx.image.orientation=3; break;
1589     case LeftTopOrientation: dpx.image.orientation=4; break;
1590     case RightTopOrientation: dpx.image.orientation=5; break;
1591     case LeftBottomOrientation: dpx.image.orientation=6; break;
1592     case RightBottomOrientation: dpx.image.orientation=7; break;
1593   }
1594   offset+=WriteBlobShort(image,dpx.image.orientation);
1595   dpx.image.number_elements=1;
1596   offset+=WriteBlobShort(image,dpx.image.number_elements);
1597   if ((image->columns != (unsigned int) image->columns) ||
1598       (image->rows != (unsigned int) image->rows))
1599     ThrowWriterException(ImageError,"WidthOrHeightExceedsLimit");
1600   offset+=WriteBlobLong(image,(unsigned int) image->columns);
1601   offset+=WriteBlobLong(image,(unsigned int) image->rows);
1602   for (i=0; i < 8; i++)
1603   {
1604     dpx.image.image_element[i].data_sign=0U;
1605     offset+=WriteBlobLong(image,dpx.image.image_element[i].data_sign);
1606     dpx.image.image_element[i].low_data=0U;
1607     offset+=WriteBlobLong(image,dpx.image.image_element[i].low_data);
1608     dpx.image.image_element[i].low_quantity=0.0f;
1609     offset+=WriteBlobFloat(image,dpx.image.image_element[i].low_quantity);
1610     dpx.image.image_element[i].high_data=0U;
1611     offset+=WriteBlobLong(image,dpx.image.image_element[i].high_data);
1612     dpx.image.image_element[i].high_quantity=0.0f;
1613     offset+=WriteBlobFloat(image,dpx.image.image_element[i].high_quantity);
1614     dpx.image.image_element[i].descriptor=0;
1615     if (i == 0)
1616       switch (image->colorspace)
1617       {
1618         case Rec601YCbCrColorspace:
1619         case Rec709YCbCrColorspace:
1620         case YCbCrColorspace:
1621         {
1622           dpx.image.image_element[i].descriptor=CbYCr444ComponentType;
1623           if (image->alpha_trait == BlendPixelTrait)
1624             dpx.image.image_element[i].descriptor=CbYCrA4444ComponentType;
1625           break;
1626         }
1627         default:
1628         {
1629           dpx.image.image_element[i].descriptor=RGBComponentType;
1630           if (image->alpha_trait == BlendPixelTrait)
1631             dpx.image.image_element[i].descriptor=RGBAComponentType;
1632           if ((image_info->type != TrueColorType) &&
1633               (image->alpha_trait != BlendPixelTrait) &&
1634               (IsImageGray(image,exception) != MagickFalse))
1635             dpx.image.image_element[i].descriptor=LumaComponentType;
1636           break;
1637         }
1638       }
1639     offset+=WriteBlobByte(image,dpx.image.image_element[i].descriptor);
1640     dpx.image.image_element[i].transfer_characteristic=0;
1641     if (image->colorspace == LogColorspace)
1642       dpx.image.image_element[0].transfer_characteristic=
1643         PrintingDensityColorimetric;
1644     offset+=WriteBlobByte(image,
1645       dpx.image.image_element[i].transfer_characteristic);
1646     dpx.image.image_element[i].colorimetric=0;
1647     offset+=WriteBlobByte(image,dpx.image.image_element[i].colorimetric);
1648     dpx.image.image_element[i].bit_size=0;
1649     if (i == 0)
1650       dpx.image.image_element[i].bit_size=(unsigned char) image->depth;
1651     offset+=WriteBlobByte(image,dpx.image.image_element[i].bit_size);
1652     dpx.image.image_element[i].packing=0;
1653     if ((image->depth == 10) || (image->depth == 12))
1654       dpx.image.image_element[i].packing=1;
1655     offset+=WriteBlobShort(image,dpx.image.image_element[i].packing);
1656     dpx.image.image_element[i].encoding=0;
1657     offset+=WriteBlobShort(image,dpx.image.image_element[i].encoding);
1658     dpx.image.image_element[i].data_offset=0U;
1659     if (i == 0)
1660       dpx.image.image_element[i].data_offset=dpx.file.image_offset;
1661     offset+=WriteBlobLong(image,dpx.image.image_element[i].data_offset);
1662     dpx.image.image_element[i].end_of_line_padding=0U;
1663     offset+=WriteBlobLong(image,dpx.image.image_element[i].end_of_line_padding);
1664     offset+=WriteBlobLong(image,
1665       dpx.image.image_element[i].end_of_image_padding);
1666     offset+=WriteBlob(image,sizeof(dpx.image.image_element[i].description),
1667       (unsigned char *) dpx.image.image_element[i].description);
1668   }
1669   offset+=WriteBlob(image,sizeof(dpx.image.reserve),(unsigned char *)
1670     dpx.image.reserve);
1671   /*
1672     Write orientation header.
1673   */
1674   if ((image->rows != image->magick_rows) ||
1675       (image->columns != image->magick_columns))
1676     {
1677       /*
1678         These properties are not valid if image size changed.
1679       */
1680       (void) DeleteImageProperty(image,"dpx:orientation.x_offset");
1681       (void) DeleteImageProperty(image,"dpx:orientation.y_offset");
1682       (void) DeleteImageProperty(image,"dpx:orientation.x_center");
1683       (void) DeleteImageProperty(image,"dpx:orientation.y_center");
1684       (void) DeleteImageProperty(image,"dpx:orientation.x_size");
1685       (void) DeleteImageProperty(image,"dpx:orientation.y_size");
1686     }
1687   dpx.orientation.x_offset=0U;
1688   value=GetImageArtifact(image,"dpx:orientation.x_offset");
1689   if (value != (const char *) NULL)
1690     dpx.orientation.x_offset=(unsigned int) StringToUnsignedLong(value);
1691   offset+=WriteBlobLong(image,dpx.orientation.x_offset);
1692   dpx.orientation.y_offset=0U;
1693   value=GetImageArtifact(image,"dpx:orientation.y_offset");
1694   if (value != (const char *) NULL)
1695     dpx.orientation.y_offset=(unsigned int) StringToUnsignedLong(value);
1696   offset+=WriteBlobLong(image,dpx.orientation.y_offset);
1697   dpx.orientation.x_center=0.0f;
1698   value=GetImageArtifact(image,"dpx:orientation.x_center");
1699   if (value != (const char *) NULL)
1700     dpx.orientation.x_center=StringToDouble(value,(char **) NULL);
1701   offset+=WriteBlobFloat(image,dpx.orientation.x_center);
1702   dpx.orientation.y_center=0.0f;
1703   value=GetImageArtifact(image,"dpx:orientation.y_center");
1704   if (value != (const char *) NULL)
1705     dpx.orientation.y_center=StringToDouble(value,(char **) NULL);
1706   offset+=WriteBlobFloat(image,dpx.orientation.y_center);
1707   dpx.orientation.x_size=0U;
1708   value=GetImageArtifact(image,"dpx:orientation.x_size");
1709   if (value != (const char *) NULL)
1710     dpx.orientation.x_size=(unsigned int) StringToUnsignedLong(value);
1711   offset+=WriteBlobLong(image,dpx.orientation.x_size);
1712   dpx.orientation.y_size=0U;
1713   value=GetImageArtifact(image,"dpx:orientation.y_size");
1714   if (value != (const char *) NULL)
1715     dpx.orientation.y_size=(unsigned int) StringToUnsignedLong(value);
1716   offset+=WriteBlobLong(image,dpx.orientation.y_size);
1717   value=GetImageArtifact(image,"dpx:orientation.filename");
1718   if (value != (const char *) NULL)
1719     (void) strncpy(dpx.orientation.filename,value,
1720       sizeof(dpx.orientation.filename)-1);
1721   offset+=WriteBlob(image,sizeof(dpx.orientation.filename),(unsigned char *)
1722     dpx.orientation.filename);
1723   offset+=WriteBlob(image,sizeof(dpx.orientation.timestamp),(unsigned char *)
1724     dpx.orientation.timestamp);
1725   value=GetImageArtifact(image,"dpx:orientation.device");
1726   if (value != (const char *) NULL)
1727     (void) strncpy(dpx.orientation.device,value,
1728       sizeof(dpx.orientation.device)-1);
1729   offset+=WriteBlob(image,sizeof(dpx.orientation.device),(unsigned char *)
1730     dpx.orientation.device);
1731   value=GetImageArtifact(image,"dpx:orientation.serial");
1732   if (value != (const char *) NULL)
1733     (void) strncpy(dpx.orientation.serial,value,
1734       sizeof(dpx.orientation.serial)-1);
1735   offset+=WriteBlob(image,sizeof(dpx.orientation.serial),(unsigned char *)
1736     dpx.orientation.serial);
1737   for (i=0; i < 4; i++)
1738     dpx.orientation.border[i]=0;
1739   value=GetImageArtifact(image,"dpx:orientation.border");
1740   if (value != (const char *) NULL)
1741     {
1742       flags=ParseGeometry(value,&geometry_info);
1743       if ((flags & SigmaValue) == 0)
1744         geometry_info.sigma=geometry_info.rho;
1745       dpx.orientation.border[0]=(unsigned short) (geometry_info.rho+0.5);
1746       dpx.orientation.border[1]=(unsigned short) (geometry_info.sigma+0.5);
1747       dpx.orientation.border[2]=(unsigned short) (geometry_info.xi+0.5);
1748       dpx.orientation.border[3]=(unsigned short) (geometry_info.psi+0.5);
1749     }
1750   for (i=0; i < 4; i++)
1751     offset+=WriteBlobShort(image,dpx.orientation.border[i]);
1752   for (i=0; i < 2; i++)
1753     dpx.orientation.aspect_ratio[i]=0U;
1754   value=GetImageArtifact(image,"dpx:orientation.aspect_ratio");
1755   if (value != (const char *) NULL)
1756     {
1757       flags=ParseGeometry(value,&geometry_info);
1758       if ((flags & SigmaValue) == 0)
1759         geometry_info.sigma=geometry_info.rho;
1760       dpx.orientation.aspect_ratio[0]=(unsigned int) (geometry_info.rho+0.5);
1761       dpx.orientation.aspect_ratio[1]=(unsigned int) (geometry_info.sigma+0.5);
1762     }
1763   for (i=0; i < 2; i++)
1764     offset+=WriteBlobLong(image,dpx.orientation.aspect_ratio[i]);
1765   offset+=WriteBlob(image,sizeof(dpx.orientation.reserve),(unsigned char *)
1766     dpx.orientation.reserve);
1767   /*
1768     Write film header.
1769   */
1770   (void) ResetMagickMemory(dpx.film.id,0,sizeof(dpx.film.id));
1771   value=GetImageArtifact(image,"dpx:film.id");
1772   if (value != (const char *) NULL)
1773     (void) strncpy(dpx.film.id,value,sizeof(dpx.film.id)-1);
1774   offset+=WriteBlob(image,sizeof(dpx.film.id),(unsigned char *) dpx.film.id);
1775   (void) ResetMagickMemory(dpx.film.type,0,sizeof(dpx.film.type));
1776   value=GetImageArtifact(image,"dpx:film.type");
1777   if (value != (const char *) NULL)
1778     (void) strncpy(dpx.film.type,value,sizeof(dpx.film.type)-1);
1779   offset+=WriteBlob(image,sizeof(dpx.film.type),(unsigned char *)
1780     dpx.film.type);
1781   (void) ResetMagickMemory(dpx.film.offset,0,sizeof(dpx.film.offset));
1782   value=GetImageArtifact(image,"dpx:film.offset");
1783   if (value != (const char *) NULL)
1784     (void) strncpy(dpx.film.offset,value,sizeof(dpx.film.offset)-1);
1785   offset+=WriteBlob(image,sizeof(dpx.film.offset),(unsigned char *)
1786     dpx.film.offset);
1787   (void) ResetMagickMemory(dpx.film.prefix,0,sizeof(dpx.film.prefix));
1788   value=GetImageArtifact(image,"dpx:film.prefix");
1789   if (value != (const char *) NULL)
1790     (void) strncpy(dpx.film.prefix,value,sizeof(dpx.film.prefix)-1);
1791   offset+=WriteBlob(image,sizeof(dpx.film.prefix),(unsigned char *)
1792     dpx.film.prefix);
1793   (void) ResetMagickMemory(dpx.film.count,0,sizeof(dpx.film.count));
1794   value=GetImageArtifact(image,"dpx:film.count");
1795   if (value != (const char *) NULL)
1796     (void) strncpy(dpx.film.count,value,sizeof(dpx.film.count)-1);
1797   offset+=WriteBlob(image,sizeof(dpx.film.count),(unsigned char *)
1798     dpx.film.count);
1799   (void) ResetMagickMemory(dpx.film.format,0,sizeof(dpx.film.format));
1800   value=GetImageArtifact(image,"dpx:film.format");
1801   if (value != (const char *) NULL)
1802     (void) strncpy(dpx.film.format,value,sizeof(dpx.film.format)-1);
1803   offset+=WriteBlob(image,sizeof(dpx.film.format),(unsigned char *)
1804     dpx.film.format);
1805   dpx.film.frame_position=0U;
1806   value=GetImageArtifact(image,"dpx:film.frame_position");
1807   if (value != (const char *) NULL)
1808     dpx.film.frame_position=(unsigned int) StringToUnsignedLong(value);
1809   offset+=WriteBlobLong(image,dpx.film.frame_position);
1810   dpx.film.sequence_extent=0U;
1811   value=GetImageArtifact(image,"dpx:film.sequence_extent");
1812   if (value != (const char *) NULL)
1813     dpx.film.sequence_extent=(unsigned int) StringToUnsignedLong(value);
1814   offset+=WriteBlobLong(image,dpx.film.sequence_extent);
1815   dpx.film.held_count=0U;
1816   value=GetImageArtifact(image,"dpx:film.held_count");
1817   if (value != (const char *) NULL)
1818     dpx.film.held_count=(unsigned int) StringToUnsignedLong(value);
1819   offset+=WriteBlobLong(image,dpx.film.held_count);
1820   dpx.film.frame_rate=0.0f;
1821   value=GetImageArtifact(image,"dpx:film.frame_rate");
1822   if (value != (const char *) NULL)
1823     dpx.film.frame_rate=StringToDouble(value,(char **) NULL);
1824   offset+=WriteBlobFloat(image,dpx.film.frame_rate);
1825   dpx.film.shutter_angle=0.0f;
1826   value=GetImageArtifact(image,"dpx:film.shutter_angle");
1827   if (value != (const char *) NULL)
1828     dpx.film.shutter_angle=StringToDouble(value,(char **) NULL);
1829   offset+=WriteBlobFloat(image,dpx.film.shutter_angle);
1830   (void) ResetMagickMemory(dpx.film.frame_id,0,sizeof(dpx.film.frame_id));
1831   value=GetImageArtifact(image,"dpx:film.frame_id");
1832   if (value != (const char *) NULL)
1833     (void) strncpy(dpx.film.frame_id,value,sizeof(dpx.film.frame_id)-1);
1834   offset+=WriteBlob(image,sizeof(dpx.film.frame_id),(unsigned char *)
1835     dpx.film.frame_id);
1836   value=GetImageArtifact(image,"dpx:film.slate");
1837   if (value != (const char *) NULL)
1838     (void) strncpy(dpx.film.slate,value,sizeof(dpx.film.slate)-1);
1839   offset+=WriteBlob(image,sizeof(dpx.film.slate),(unsigned char *)
1840     dpx.film.slate);
1841   offset+=WriteBlob(image,sizeof(dpx.film.reserve),(unsigned char *)
1842     dpx.film.reserve);
1843   /*
1844     Write television header.
1845   */
1846   value=GetImageArtifact(image,"dpx:television.time.code");
1847   if (value != (const char *) NULL)
1848     dpx.television.time_code=StringToTimeCode(value);
1849   offset+=WriteBlobLong(image,dpx.television.time_code);
1850   value=GetImageArtifact(image,"dpx:television.user.bits");
1851   if (value != (const char *) NULL)
1852     dpx.television.user_bits=StringToTimeCode(value);
1853   offset+=WriteBlobLong(image,dpx.television.user_bits);
1854   value=GetImageArtifact(image,"dpx:television.interlace");
1855   if (value != (const char *) NULL)
1856     dpx.television.interlace=(unsigned char) StringToLong(value);
1857   offset+=WriteBlobByte(image,dpx.television.interlace);
1858   value=GetImageArtifact(image,"dpx:television.field_number");
1859   if (value != (const char *) NULL)
1860     dpx.television.field_number=(unsigned char) StringToLong(value);
1861   offset+=WriteBlobByte(image,dpx.television.field_number);
1862   dpx.television.video_signal=0;
1863   value=GetImageArtifact(image,"dpx:television.video_signal");
1864   if (value != (const char *) NULL)
1865     dpx.television.video_signal=(unsigned char) StringToLong(value);
1866   offset+=WriteBlobByte(image,dpx.television.video_signal);
1867   dpx.television.padding=0;
1868   value=GetImageArtifact(image,"dpx:television.padding");
1869   if (value != (const char *) NULL)
1870     dpx.television.padding=(unsigned char) StringToLong(value);
1871   offset+=WriteBlobByte(image,dpx.television.padding);
1872   dpx.television.horizontal_sample_rate=0.0f;
1873   value=GetImageArtifact(image,"dpx:television.horizontal_sample_rate");
1874   if (value != (const char *) NULL)
1875     dpx.television.horizontal_sample_rate=StringToDouble(value,(char **) NULL);
1876   offset+=WriteBlobFloat(image,dpx.television.horizontal_sample_rate);
1877   dpx.television.vertical_sample_rate=0.0f;
1878   value=GetImageArtifact(image,"dpx:television.vertical_sample_rate");
1879   if (value != (const char *) NULL)
1880     dpx.television.vertical_sample_rate=StringToDouble(value,(char **) NULL);
1881   offset+=WriteBlobFloat(image,dpx.television.vertical_sample_rate);
1882   dpx.television.frame_rate=0.0f;
1883   value=GetImageArtifact(image,"dpx:television.frame_rate");
1884   if (value != (const char *) NULL)
1885     dpx.television.frame_rate=StringToDouble(value,(char **) NULL);
1886   offset+=WriteBlobFloat(image,dpx.television.frame_rate);
1887   dpx.television.time_offset=0.0f;
1888   value=GetImageArtifact(image,"dpx:television.time_offset");
1889   if (value != (const char *) NULL)
1890     dpx.television.time_offset=StringToDouble(value,(char **) NULL);
1891   offset+=WriteBlobFloat(image,dpx.television.time_offset);
1892   dpx.television.gamma=0.0f;
1893   value=GetImageArtifact(image,"dpx:television.gamma");
1894   if (value != (const char *) NULL)
1895     dpx.television.gamma=StringToDouble(value,(char **) NULL);
1896   offset+=WriteBlobFloat(image,dpx.television.gamma);
1897   dpx.television.black_level=0.0f;
1898   value=GetImageArtifact(image,"dpx:television.black_level");
1899   if (value != (const char *) NULL)
1900     dpx.television.black_level=StringToDouble(value,(char **) NULL);
1901   offset+=WriteBlobFloat(image,dpx.television.black_level);
1902   dpx.television.black_gain=0.0f;
1903   value=GetImageArtifact(image,"dpx:television.black_gain");
1904   if (value != (const char *) NULL)
1905     dpx.television.black_gain=StringToDouble(value,(char **) NULL);
1906   offset+=WriteBlobFloat(image,dpx.television.black_gain);
1907   dpx.television.break_point=0.0f;
1908   value=GetImageArtifact(image,"dpx:television.break_point");
1909   if (value != (const char *) NULL)
1910     dpx.television.break_point=StringToDouble(value,(char **) NULL);
1911   offset+=WriteBlobFloat(image,dpx.television.break_point);
1912   dpx.television.white_level=0.0f;
1913   value=GetImageArtifact(image,"dpx:television.white_level");
1914   if (value != (const char *) NULL)
1915     dpx.television.white_level=StringToDouble(value,(char **) NULL);
1916   offset+=WriteBlobFloat(image,dpx.television.white_level);
1917   dpx.television.integration_times=0.0f;
1918   value=GetImageArtifact(image,"dpx:television.integration_times");
1919   if (value != (const char *) NULL)
1920     dpx.television.integration_times=StringToDouble(value,(char **) NULL);
1921   offset+=WriteBlobFloat(image,dpx.television.integration_times);
1922   offset+=WriteBlob(image,sizeof(dpx.television.reserve),(unsigned char *)
1923     dpx.television.reserve);
1924   /*
1925     Write user header.
1926   */
1927   value=GetImageArtifact(image,"dpx:user.id");
1928   if (value != (const char *) NULL)
1929     (void) strncpy(dpx.user.id,value,sizeof(dpx.user.id)-1);
1930   offset+=WriteBlob(image,sizeof(dpx.user.id),(unsigned char *) dpx.user.id);
1931   if (profile != (StringInfo *) NULL)
1932     offset+=WriteBlob(image,GetStringInfoLength(profile),
1933       GetStringInfoDatum(profile));
1934   while (offset < (MagickOffsetType) dpx.image.image_element[0].data_offset)
1935   {
1936     count=WriteBlobByte(image,0x00);
1937     if (count != 1)
1938       {
1939         ThrowFileException(exception,FileOpenError,"UnableToWriteFile",
1940           image->filename);
1941         break;
1942       }
1943     offset+=count;
1944   }
1945   /*
1946     Convert pixel packets to DPX raster image.
1947   */
1948   quantum_info=AcquireQuantumInfo(image_info,image);
1949   SetQuantumQuantum(quantum_info,32);
1950   SetQuantumPack(quantum_info,dpx.image.image_element[0].packing == 0 ?
1951     MagickTrue : MagickFalse);
1952   quantum_type=RGBQuantum;
1953   if (image->alpha_trait == BlendPixelTrait)
1954     quantum_type=RGBAQuantum;
1955   if (image->colorspace == YCbCrColorspace)
1956     {
1957       quantum_type=CbYCrQuantum;
1958       if (image->alpha_trait == BlendPixelTrait)
1959         quantum_type=CbYCrAQuantum;
1960       if ((horizontal_factor == 2) || (vertical_factor == 2))
1961         quantum_type=CbYCrYQuantum;
1962     }
1963   extent=GetBytesPerRow(image->columns,image->alpha_trait == BlendPixelTrait ?
1964     4UL : 3UL,image->depth,MagickTrue);
1965   if ((image_info->type != TrueColorType) &&
1966       (image->alpha_trait != BlendPixelTrait) &&
1967       (IsImageGray(image,exception) != MagickFalse))
1968     {
1969       quantum_type=GrayQuantum;
1970       extent=GetBytesPerRow(image->columns,1UL,image->depth,MagickTrue);
1971     }
1972   pixels=GetQuantumPixels(quantum_info);
1973   for (y=0; y < (ssize_t) image->rows; y++)
1974   {
1975     p=GetVirtualPixels(image,0,y,image->columns,1,exception);
1976     if (p == (const Quantum *) NULL)
1977       break;
1978     (void) ExportQuantumPixels(image,(CacheView *) NULL,quantum_info,
1979       quantum_type,pixels,exception);
1980     count=WriteBlob(image,extent,pixels);
1981     if (count != (ssize_t) extent)
1982       break;
1983     status=SetImageProgress(image,SaveImageTag,(MagickOffsetType) y,
1984       image->rows);
1985     if (status == MagickFalse)
1986       break;
1987   }
1988   quantum_info=DestroyQuantumInfo(quantum_info);
1989   (void) CloseBlob(image);
1990   return(status);
1991 }