2 * Copyright 2010 Vincent Povirk for CodeWeavers
4 * This library is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU Lesser General Public
6 * License as published by the Free Software Foundation; either
7 * version 2.1 of the License, or (at your option) any later version.
9 * This library is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * Lesser General Public License for more details.
14 * You should have received a copy of the GNU Lesser General Public
15 * License along with this library; if not, write to the Free Software
16 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20 #include "wine/port.h"
37 #include "wincodecs_private.h"
39 #include "wine/debug.h"
40 #include "wine/library.h"
42 WINE_DEFAULT_DEBUG_CHANNEL(wincodecs
);
46 static CRITICAL_SECTION init_tiff_cs
;
47 static CRITICAL_SECTION_DEBUG init_tiff_cs_debug
=
50 { &init_tiff_cs_debug
.ProcessLocksList
,
51 &init_tiff_cs_debug
.ProcessLocksList
},
52 0, 0, { (DWORD_PTR
)(__FILE__
": init_tiff_cs") }
54 static CRITICAL_SECTION init_tiff_cs
= { &init_tiff_cs_debug
, -1, 0, 0, 0, 0 };
56 static void *libtiff_handle
;
57 #define MAKE_FUNCPTR(f) static typeof(f) * p##f
58 MAKE_FUNCPTR(TIFFClientOpen
);
59 MAKE_FUNCPTR(TIFFClose
);
60 MAKE_FUNCPTR(TIFFCurrentDirectory
);
61 MAKE_FUNCPTR(TIFFGetField
);
62 MAKE_FUNCPTR(TIFFIsByteSwapped
);
63 MAKE_FUNCPTR(TIFFReadDirectory
);
64 MAKE_FUNCPTR(TIFFReadEncodedStrip
);
65 MAKE_FUNCPTR(TIFFReadEncodedTile
);
66 MAKE_FUNCPTR(TIFFSetDirectory
);
69 static void *load_libtiff(void)
73 EnterCriticalSection(&init_tiff_cs
);
75 if (!libtiff_handle
&&
76 (libtiff_handle
= wine_dlopen(SONAME_LIBTIFF
, RTLD_NOW
, NULL
, 0)) != NULL
)
79 #define LOAD_FUNCPTR(f) \
80 if((p##f = wine_dlsym(libtiff_handle, #f, NULL, 0)) == NULL) { \
81 ERR("failed to load symbol %s\n", #f); \
82 libtiff_handle = NULL; \
83 LeaveCriticalSection(&init_tiff_cs); \
86 LOAD_FUNCPTR(TIFFClientOpen
);
87 LOAD_FUNCPTR(TIFFClose
);
88 LOAD_FUNCPTR(TIFFCurrentDirectory
);
89 LOAD_FUNCPTR(TIFFGetField
);
90 LOAD_FUNCPTR(TIFFIsByteSwapped
);
91 LOAD_FUNCPTR(TIFFReadDirectory
);
92 LOAD_FUNCPTR(TIFFReadEncodedStrip
);
93 LOAD_FUNCPTR(TIFFReadEncodedTile
);
94 LOAD_FUNCPTR(TIFFSetDirectory
);
99 result
= libtiff_handle
;
101 LeaveCriticalSection(&init_tiff_cs
);
105 static tsize_t
tiff_stream_read(thandle_t client_data
, tdata_t data
, tsize_t size
)
107 IStream
*stream
= (IStream
*)client_data
;
111 hr
= IStream_Read(stream
, data
, size
, &bytes_read
);
112 if (FAILED(hr
)) bytes_read
= 0;
116 static tsize_t
tiff_stream_write(thandle_t client_data
, tdata_t data
, tsize_t size
)
118 IStream
*stream
= (IStream
*)client_data
;
122 hr
= IStream_Write(stream
, data
, size
, &bytes_written
);
123 if (FAILED(hr
)) bytes_written
= 0;
124 return bytes_written
;
127 static toff_t
tiff_stream_seek(thandle_t client_data
, toff_t offset
, int whence
)
129 IStream
*stream
= (IStream
*)client_data
;
132 ULARGE_INTEGER new_position
;
135 move
.QuadPart
= offset
;
139 origin
= STREAM_SEEK_SET
;
142 origin
= STREAM_SEEK_CUR
;
145 origin
= STREAM_SEEK_END
;
148 ERR("unknown whence value %i\n", whence
);
152 hr
= IStream_Seek(stream
, move
, origin
, &new_position
);
153 if (SUCCEEDED(hr
)) return new_position
.QuadPart
;
157 static int tiff_stream_close(thandle_t client_data
)
159 /* Caller is responsible for releasing the stream object. */
163 static toff_t
tiff_stream_size(thandle_t client_data
)
165 IStream
*stream
= (IStream
*)client_data
;
169 hr
= IStream_Stat(stream
, &statstg
, STATFLAG_NONAME
);
171 if (SUCCEEDED(hr
)) return statstg
.cbSize
.QuadPart
;
175 static int tiff_stream_map(thandle_t client_data
, tdata_t
*addr
, toff_t
*size
)
177 /* Cannot mmap streams */
181 static void tiff_stream_unmap(thandle_t client_data
, tdata_t addr
, toff_t size
)
183 /* No need to ever do this, since we can't map things. */
186 static TIFF
* tiff_open_stream(IStream
*stream
, const char *mode
)
191 IStream_Seek(stream
, zero
, STREAM_SEEK_SET
, NULL
);
193 return pTIFFClientOpen("<IStream object>", mode
, stream
, tiff_stream_read
,
194 tiff_stream_write
, tiff_stream_seek
, tiff_stream_close
,
195 tiff_stream_size
, tiff_stream_map
, tiff_stream_unmap
);
199 IWICBitmapDecoder IWICBitmapDecoder_iface
;
202 CRITICAL_SECTION lock
; /* Must be held when tiff is used or initiailzed is set */
208 const WICPixelFormatGUID
*format
;
215 int invert_grayscale
;
217 UINT tile_width
, tile_height
;
222 UINT resolution_unit
;
227 IWICBitmapFrameDecode IWICBitmapFrameDecode_iface
;
231 tiff_decode_info decode_info
;
232 INT cached_tile_x
, cached_tile_y
;
236 static const IWICBitmapFrameDecodeVtbl TiffFrameDecode_Vtbl
;
238 static inline TiffDecoder
*impl_from_IWICBitmapDecoder(IWICBitmapDecoder
*iface
)
240 return CONTAINING_RECORD(iface
, TiffDecoder
, IWICBitmapDecoder_iface
);
243 static inline TiffFrameDecode
*impl_from_IWICBitmapFrameDecode(IWICBitmapFrameDecode
*iface
)
245 return CONTAINING_RECORD(iface
, TiffFrameDecode
, IWICBitmapFrameDecode_iface
);
248 static HRESULT
tiff_get_decode_info(TIFF
*tiff
, tiff_decode_info
*decode_info
)
250 uint16 photometric
, bps
, samples
, planar
;
251 uint16 extra_sample_count
, *extra_samples
;
254 decode_info
->indexed
= 0;
255 decode_info
->reverse_bgr
= 0;
256 decode_info
->invert_grayscale
= 0;
257 decode_info
->tiled
= 0;
259 ret
= pTIFFGetField(tiff
, TIFFTAG_PHOTOMETRIC
, &photometric
);
262 WARN("missing PhotometricInterpretation tag\n");
266 ret
= pTIFFGetField(tiff
, TIFFTAG_BITSPERSAMPLE
, &bps
);
268 decode_info
->bps
= bps
;
270 ret
= pTIFFGetField(tiff
, TIFFTAG_SAMPLESPERPIXEL
, &samples
);
271 if (!ret
) samples
= 1;
272 decode_info
->samples
= samples
;
278 ret
= pTIFFGetField(tiff
, TIFFTAG_PLANARCONFIG
, &planar
);
279 if (!ret
) planar
= 1;
282 FIXME("unhandled planar configuration %u\n", planar
);
286 decode_info
->planar
= planar
;
290 case 0: /* WhiteIsZero */
291 decode_info
->invert_grayscale
= 1;
292 case 1: /* BlackIsZero */
295 FIXME("unhandled grayscale sample count %u\n", samples
);
299 decode_info
->bpp
= bps
;
303 decode_info
->format
= &GUID_WICPixelFormatBlackWhite
;
306 decode_info
->format
= &GUID_WICPixelFormat4bppGray
;
309 decode_info
->format
= &GUID_WICPixelFormat8bppGray
;
312 FIXME("unhandled greyscale bit count %u\n", bps
);
317 decode_info
->bpp
= bps
* samples
;
321 ret
= pTIFFGetField(tiff
, TIFFTAG_EXTRASAMPLES
, &extra_sample_count
, &extra_samples
);
324 WARN("Cannot get extra sample type for RGB data, ret=%i count=%i\n", ret
, extra_sample_count
);
328 else if (samples
!= 3)
330 FIXME("unhandled RGB sample count %u\n", samples
);
337 decode_info
->reverse_bgr
= 1;
339 decode_info
->format
= &GUID_WICPixelFormat24bppBGR
;
341 switch(extra_samples
[0])
343 case 0: /* Unspecified data */
344 decode_info
->format
= &GUID_WICPixelFormat32bppBGR
;
346 case 1: /* Associated (pre-multiplied) alpha data */
347 decode_info
->format
= &GUID_WICPixelFormat32bppPBGRA
;
349 case 2: /* Unassociated alpha data */
350 decode_info
->format
= &GUID_WICPixelFormat32bppBGRA
;
353 FIXME("unhandled extra sample type %i\n", extra_samples
[0]);
359 decode_info
->format
= &GUID_WICPixelFormat48bppRGB
;
361 switch(extra_samples
[0])
363 case 0: /* Unspecified data */
364 /* decode_info->format = &GUID_WICPixelFormat64bppRGB; */
365 FIXME("64-bit RGB is unsupported\n");
367 case 1: /* Associated (pre-multiplied) alpha data */
368 decode_info
->format
= &GUID_WICPixelFormat64bppPRGBA
;
370 case 2: /* Unassociated alpha data */
371 decode_info
->format
= &GUID_WICPixelFormat64bppRGBA
;
374 FIXME("unhandled extra sample type %i\n", extra_samples
[0]);
379 FIXME("unhandled RGB bit count %u\n", bps
);
383 case 3: /* RGB Palette */
386 FIXME("unhandled indexed sample count %u\n", samples
);
390 decode_info
->indexed
= 1;
391 decode_info
->bpp
= bps
;
395 decode_info
->format
= &GUID_WICPixelFormat4bppIndexed
;
398 decode_info
->format
= &GUID_WICPixelFormat8bppIndexed
;
401 FIXME("unhandled indexed bit count %u\n", bps
);
405 case 4: /* Transparency mask */
410 FIXME("unhandled PhotometricInterpretation %u\n", photometric
);
414 ret
= pTIFFGetField(tiff
, TIFFTAG_IMAGEWIDTH
, &decode_info
->width
);
417 WARN("missing image width\n");
421 ret
= pTIFFGetField(tiff
, TIFFTAG_IMAGELENGTH
, &decode_info
->height
);
424 WARN("missing image length\n");
428 if ((ret
= pTIFFGetField(tiff
, TIFFTAG_TILEWIDTH
, &decode_info
->tile_width
)))
430 decode_info
->tiled
= 1;
434 WARN("missing tile width\n");
438 ret
= pTIFFGetField(tiff
, TIFFTAG_TILELENGTH
, &decode_info
->tile_height
);
441 WARN("missing tile height\n");
445 decode_info
->tile_stride
= ((decode_info
->bpp
* decode_info
->tile_width
+ 7)/8);
446 decode_info
->tile_size
= decode_info
->tile_height
* decode_info
->tile_stride
;
447 decode_info
->tiles_across
= (decode_info
->width
+ decode_info
->tile_width
- 1) / decode_info
->tile_width
;
449 else if ((ret
= pTIFFGetField(tiff
, TIFFTAG_ROWSPERSTRIP
, &decode_info
->tile_height
)))
451 if (decode_info
->tile_height
> decode_info
->height
)
452 decode_info
->tile_height
= decode_info
->height
;
453 decode_info
->tile_width
= decode_info
->width
;
454 decode_info
->tile_stride
= ((decode_info
->bpp
* decode_info
->tile_width
+ 7)/8);
455 decode_info
->tile_size
= decode_info
->tile_height
* decode_info
->tile_stride
;
459 FIXME("missing RowsPerStrip value\n");
463 decode_info
->resolution_unit
= 0;
464 pTIFFGetField(tiff
, TIFFTAG_RESOLUTIONUNIT
, &decode_info
->resolution_unit
);
465 if (decode_info
->resolution_unit
!= 0)
467 ret
= pTIFFGetField(tiff
, TIFFTAG_XRESOLUTION
, &decode_info
->xres
);
470 WARN("missing X resolution\n");
471 decode_info
->resolution_unit
= 0;
474 ret
= pTIFFGetField(tiff
, TIFFTAG_YRESOLUTION
, &decode_info
->yres
);
477 WARN("missing Y resolution\n");
478 decode_info
->resolution_unit
= 0;
485 static HRESULT WINAPI
TiffDecoder_QueryInterface(IWICBitmapDecoder
*iface
, REFIID iid
,
488 TiffDecoder
*This
= impl_from_IWICBitmapDecoder(iface
);
489 TRACE("(%p,%s,%p)\n", iface
, debugstr_guid(iid
), ppv
);
491 if (!ppv
) return E_INVALIDARG
;
493 if (IsEqualIID(&IID_IUnknown
, iid
) || IsEqualIID(&IID_IWICBitmapDecoder
, iid
))
500 return E_NOINTERFACE
;
503 IUnknown_AddRef((IUnknown
*)*ppv
);
507 static ULONG WINAPI
TiffDecoder_AddRef(IWICBitmapDecoder
*iface
)
509 TiffDecoder
*This
= impl_from_IWICBitmapDecoder(iface
);
510 ULONG ref
= InterlockedIncrement(&This
->ref
);
512 TRACE("(%p) refcount=%u\n", iface
, ref
);
517 static ULONG WINAPI
TiffDecoder_Release(IWICBitmapDecoder
*iface
)
519 TiffDecoder
*This
= impl_from_IWICBitmapDecoder(iface
);
520 ULONG ref
= InterlockedDecrement(&This
->ref
);
522 TRACE("(%p) refcount=%u\n", iface
, ref
);
526 if (This
->tiff
) pTIFFClose(This
->tiff
);
527 if (This
->stream
) IStream_Release(This
->stream
);
528 This
->lock
.DebugInfo
->Spare
[0] = 0;
529 DeleteCriticalSection(&This
->lock
);
530 HeapFree(GetProcessHeap(), 0, This
);
536 static HRESULT WINAPI
TiffDecoder_QueryCapability(IWICBitmapDecoder
*iface
, IStream
*pIStream
,
537 DWORD
*pdwCapability
)
539 FIXME("(%p,%p,%p): stub\n", iface
, pIStream
, pdwCapability
);
543 static HRESULT WINAPI
TiffDecoder_Initialize(IWICBitmapDecoder
*iface
, IStream
*pIStream
,
544 WICDecodeOptions cacheOptions
)
546 TiffDecoder
*This
= impl_from_IWICBitmapDecoder(iface
);
550 TRACE("(%p,%p,%x): stub\n", iface
, pIStream
, cacheOptions
);
552 EnterCriticalSection(&This
->lock
);
554 if (This
->initialized
)
556 hr
= WINCODEC_ERR_WRONGSTATE
;
560 tiff
= tiff_open_stream(pIStream
, "r");
569 This
->stream
= pIStream
;
570 IStream_AddRef(pIStream
);
571 This
->initialized
= TRUE
;
574 LeaveCriticalSection(&This
->lock
);
578 static HRESULT WINAPI
TiffDecoder_GetContainerFormat(IWICBitmapDecoder
*iface
,
579 GUID
*pguidContainerFormat
)
581 memcpy(pguidContainerFormat
, &GUID_ContainerFormatTiff
, sizeof(GUID
));
585 static HRESULT WINAPI
TiffDecoder_GetDecoderInfo(IWICBitmapDecoder
*iface
,
586 IWICBitmapDecoderInfo
**ppIDecoderInfo
)
588 FIXME("(%p,%p): stub\n", iface
, ppIDecoderInfo
);
592 static HRESULT WINAPI
TiffDecoder_CopyPalette(IWICBitmapDecoder
*iface
,
593 IWICPalette
*pIPalette
)
595 FIXME("(%p,%p): stub\n", iface
, pIPalette
);
599 static HRESULT WINAPI
TiffDecoder_GetMetadataQueryReader(IWICBitmapDecoder
*iface
,
600 IWICMetadataQueryReader
**ppIMetadataQueryReader
)
602 FIXME("(%p,%p): stub\n", iface
, ppIMetadataQueryReader
);
606 static HRESULT WINAPI
TiffDecoder_GetPreview(IWICBitmapDecoder
*iface
,
607 IWICBitmapSource
**ppIBitmapSource
)
609 FIXME("(%p,%p): stub\n", iface
, ppIBitmapSource
);
613 static HRESULT WINAPI
TiffDecoder_GetColorContexts(IWICBitmapDecoder
*iface
,
614 UINT cCount
, IWICColorContext
**ppIColorContexts
, UINT
*pcActualCount
)
616 FIXME("(%p,%u,%p,%p)\n", iface
, cCount
, ppIColorContexts
, pcActualCount
);
620 static HRESULT WINAPI
TiffDecoder_GetThumbnail(IWICBitmapDecoder
*iface
,
621 IWICBitmapSource
**ppIThumbnail
)
623 TRACE("(%p,%p)\n", iface
, ppIThumbnail
);
624 return WINCODEC_ERR_CODECNOTHUMBNAIL
;
627 static HRESULT WINAPI
TiffDecoder_GetFrameCount(IWICBitmapDecoder
*iface
,
630 TiffDecoder
*This
= impl_from_IWICBitmapDecoder(iface
);
634 WARN("(%p) <-- WINCODEC_ERR_WRONGSTATE\n", iface
);
635 return WINCODEC_ERR_WRONGSTATE
;
638 EnterCriticalSection(&This
->lock
);
639 while (pTIFFReadDirectory(This
->tiff
)) { }
640 *pCount
= pTIFFCurrentDirectory(This
->tiff
)+1;
641 LeaveCriticalSection(&This
->lock
);
643 TRACE("(%p) <-- %i\n", iface
, *pCount
);
648 static HRESULT WINAPI
TiffDecoder_GetFrame(IWICBitmapDecoder
*iface
,
649 UINT index
, IWICBitmapFrameDecode
**ppIBitmapFrame
)
651 TiffDecoder
*This
= impl_from_IWICBitmapDecoder(iface
);
652 TiffFrameDecode
*result
;
654 tiff_decode_info decode_info
;
657 TRACE("(%p,%u,%p)\n", iface
, index
, ppIBitmapFrame
);
660 return WINCODEC_ERR_WRONGSTATE
;
662 EnterCriticalSection(&This
->lock
);
663 res
= pTIFFSetDirectory(This
->tiff
, index
);
664 if (!res
) hr
= E_INVALIDARG
;
665 else hr
= tiff_get_decode_info(This
->tiff
, &decode_info
);
666 LeaveCriticalSection(&This
->lock
);
670 result
= HeapAlloc(GetProcessHeap(), 0, sizeof(TiffFrameDecode
));
674 result
->IWICBitmapFrameDecode_iface
.lpVtbl
= &TiffFrameDecode_Vtbl
;
676 result
->parent
= This
;
677 result
->index
= index
;
678 result
->decode_info
= decode_info
;
679 result
->cached_tile_x
= -1;
680 result
->cached_tile
= HeapAlloc(GetProcessHeap(), 0, decode_info
.tile_size
);
682 if (result
->cached_tile
)
683 *ppIBitmapFrame
= (IWICBitmapFrameDecode
*)result
;
687 HeapFree(GetProcessHeap(), 0, result
);
690 else hr
= E_OUTOFMEMORY
;
693 if (FAILED(hr
)) *ppIBitmapFrame
= NULL
;
698 static const IWICBitmapDecoderVtbl TiffDecoder_Vtbl
= {
699 TiffDecoder_QueryInterface
,
702 TiffDecoder_QueryCapability
,
703 TiffDecoder_Initialize
,
704 TiffDecoder_GetContainerFormat
,
705 TiffDecoder_GetDecoderInfo
,
706 TiffDecoder_CopyPalette
,
707 TiffDecoder_GetMetadataQueryReader
,
708 TiffDecoder_GetPreview
,
709 TiffDecoder_GetColorContexts
,
710 TiffDecoder_GetThumbnail
,
711 TiffDecoder_GetFrameCount
,
715 static HRESULT WINAPI
TiffFrameDecode_QueryInterface(IWICBitmapFrameDecode
*iface
, REFIID iid
,
718 TiffFrameDecode
*This
= impl_from_IWICBitmapFrameDecode(iface
);
719 TRACE("(%p,%s,%p)\n", iface
, debugstr_guid(iid
), ppv
);
721 if (!ppv
) return E_INVALIDARG
;
723 if (IsEqualIID(&IID_IUnknown
, iid
) ||
724 IsEqualIID(&IID_IWICBitmapSource
, iid
) ||
725 IsEqualIID(&IID_IWICBitmapFrameDecode
, iid
))
732 return E_NOINTERFACE
;
735 IUnknown_AddRef((IUnknown
*)*ppv
);
739 static ULONG WINAPI
TiffFrameDecode_AddRef(IWICBitmapFrameDecode
*iface
)
741 TiffFrameDecode
*This
= impl_from_IWICBitmapFrameDecode(iface
);
742 ULONG ref
= InterlockedIncrement(&This
->ref
);
744 TRACE("(%p) refcount=%u\n", iface
, ref
);
749 static ULONG WINAPI
TiffFrameDecode_Release(IWICBitmapFrameDecode
*iface
)
751 TiffFrameDecode
*This
= impl_from_IWICBitmapFrameDecode(iface
);
752 ULONG ref
= InterlockedDecrement(&This
->ref
);
754 TRACE("(%p) refcount=%u\n", iface
, ref
);
758 HeapFree(GetProcessHeap(), 0, This
->cached_tile
);
759 HeapFree(GetProcessHeap(), 0, This
);
765 static HRESULT WINAPI
TiffFrameDecode_GetSize(IWICBitmapFrameDecode
*iface
,
766 UINT
*puiWidth
, UINT
*puiHeight
)
768 TiffFrameDecode
*This
= impl_from_IWICBitmapFrameDecode(iface
);
770 *puiWidth
= This
->decode_info
.width
;
771 *puiHeight
= This
->decode_info
.height
;
773 TRACE("(%p) <-- %ux%u\n", iface
, *puiWidth
, *puiHeight
);
778 static HRESULT WINAPI
TiffFrameDecode_GetPixelFormat(IWICBitmapFrameDecode
*iface
,
779 WICPixelFormatGUID
*pPixelFormat
)
781 TiffFrameDecode
*This
= impl_from_IWICBitmapFrameDecode(iface
);
783 memcpy(pPixelFormat
, This
->decode_info
.format
, sizeof(GUID
));
785 TRACE("(%p) <-- %s\n", This
, debugstr_guid(This
->decode_info
.format
));
790 static HRESULT WINAPI
TiffFrameDecode_GetResolution(IWICBitmapFrameDecode
*iface
,
791 double *pDpiX
, double *pDpiY
)
793 TiffFrameDecode
*This
= impl_from_IWICBitmapFrameDecode(iface
);
795 switch (This
->decode_info
.resolution_unit
)
798 FIXME("unknown resolution unit %i\n", This
->decode_info
.resolution_unit
);
800 case 0: /* Not set */
801 *pDpiX
= *pDpiY
= 96.0;
803 case 1: /* Relative measurements */
805 *pDpiY
= 96.0 * This
->decode_info
.yres
/ This
->decode_info
.xres
;
808 *pDpiX
= This
->decode_info
.xres
;
809 *pDpiY
= This
->decode_info
.yres
;
811 case 3: /* Centimeter */
812 *pDpiX
= This
->decode_info
.xres
/ 2.54;
813 *pDpiY
= This
->decode_info
.yres
/ 2.54;
817 TRACE("(%p) <-- %f,%f unit=%i\n", iface
, *pDpiX
, *pDpiY
, This
->decode_info
.resolution_unit
);
822 static HRESULT WINAPI
TiffFrameDecode_CopyPalette(IWICBitmapFrameDecode
*iface
,
823 IWICPalette
*pIPalette
)
825 TiffFrameDecode
*This
= impl_from_IWICBitmapFrameDecode(iface
);
826 uint16
*red
, *green
, *blue
;
827 WICColor colors
[256];
828 int color_count
, ret
, i
;
830 TRACE("(%p,%p)\n", iface
, pIPalette
);
832 color_count
= 1<<This
->decode_info
.bps
;
834 EnterCriticalSection(&This
->parent
->lock
);
835 ret
= pTIFFGetField(This
->parent
->tiff
, TIFFTAG_COLORMAP
, &red
, &green
, &blue
);
836 LeaveCriticalSection(&This
->parent
->lock
);
840 WARN("Couldn't read color map\n");
844 for (i
=0; i
<color_count
; i
++)
846 colors
[i
] = 0xff000000 |
847 ((red
[i
]<<8) & 0xff0000) |
848 (green
[i
] & 0xff00) |
849 ((blue
[i
]>>8) & 0xff);
852 return IWICPalette_InitializeCustom(pIPalette
, colors
, color_count
);
855 static HRESULT
TiffFrameDecode_ReadTile(TiffFrameDecode
*This
, UINT tile_x
, UINT tile_y
)
861 swap_bytes
= pTIFFIsByteSwapped(This
->parent
->tiff
);
863 ret
= pTIFFSetDirectory(This
->parent
->tiff
, This
->index
);
870 if (This
->decode_info
.tiled
)
872 ret
= pTIFFReadEncodedTile(This
->parent
->tiff
, tile_x
+ tile_y
* This
->decode_info
.tiles_across
, This
->cached_tile
, This
->decode_info
.tile_size
);
876 ret
= pTIFFReadEncodedStrip(This
->parent
->tiff
, tile_y
, This
->cached_tile
, This
->decode_info
.tile_size
);
883 if (hr
== S_OK
&& This
->decode_info
.reverse_bgr
)
885 if (This
->decode_info
.bps
== 8)
887 UINT sample_count
= This
->decode_info
.samples
;
889 reverse_bgr8(sample_count
, This
->cached_tile
, This
->decode_info
.tile_width
,
890 This
->decode_info
.tile_height
, This
->decode_info
.tile_width
* sample_count
);
894 if (hr
== S_OK
&& swap_bytes
&& This
->decode_info
.bps
> 8)
896 UINT row
, i
, samples_per_row
;
899 samples_per_row
= This
->decode_info
.tile_width
* This
->decode_info
.samples
;
901 switch(This
->decode_info
.bps
)
904 for (row
=0; row
<This
->decode_info
.tile_height
; row
++)
906 sample
= This
->cached_tile
+ row
* This
->decode_info
.tile_stride
;
907 for (i
=0; i
<samples_per_row
; i
++)
910 sample
[1] = sample
[0];
917 ERR("unhandled bps for byte swap %u\n", This
->decode_info
.bps
);
922 if (hr
== S_OK
&& This
->decode_info
.invert_grayscale
)
926 if (This
->decode_info
.samples
!= 1)
928 ERR("cannot invert grayscale image with %u samples\n", This
->decode_info
.samples
);
932 end
= This
->cached_tile
+This
->decode_info
.tile_size
;
934 for (byte
= This
->cached_tile
; byte
!= end
; byte
++)
940 This
->cached_tile_x
= tile_x
;
941 This
->cached_tile_y
= tile_y
;
947 static HRESULT WINAPI
TiffFrameDecode_CopyPixels(IWICBitmapFrameDecode
*iface
,
948 const WICRect
*prc
, UINT cbStride
, UINT cbBufferSize
, BYTE
*pbBuffer
)
950 TiffFrameDecode
*This
= impl_from_IWICBitmapFrameDecode(iface
);
951 UINT min_tile_x
, max_tile_x
, min_tile_y
, max_tile_y
;
959 TRACE("(%p,%p,%u,%u,%p)\n", iface
, prc
, cbStride
, cbBufferSize
, pbBuffer
);
965 rect
.Width
= This
->decode_info
.width
;
966 rect
.Height
= This
->decode_info
.height
;
971 if (prc
->X
< 0 || prc
->Y
< 0 || prc
->X
+prc
->Width
> This
->decode_info
.width
||
972 prc
->Y
+prc
->Height
> This
->decode_info
.height
)
976 bytesperrow
= ((This
->decode_info
.bpp
* prc
->Width
)+7)/8;
978 if (cbStride
< bytesperrow
)
981 if ((cbStride
* prc
->Height
) > cbBufferSize
)
984 min_tile_x
= prc
->X
/ This
->decode_info
.tile_width
;
985 min_tile_y
= prc
->Y
/ This
->decode_info
.tile_height
;
986 max_tile_x
= (prc
->X
+prc
->Width
-1) / This
->decode_info
.tile_width
;
987 max_tile_y
= (prc
->Y
+prc
->Height
-1) / This
->decode_info
.tile_height
;
989 EnterCriticalSection(&This
->parent
->lock
);
991 for (tile_x
=min_tile_x
; tile_x
<= max_tile_x
; tile_x
++)
993 for (tile_y
=min_tile_y
; tile_y
<= max_tile_y
; tile_y
++)
995 if (tile_x
!= This
->cached_tile_x
|| tile_y
!= This
->cached_tile_y
)
997 hr
= TiffFrameDecode_ReadTile(This
, tile_x
, tile_y
);
1002 if (prc
->X
< tile_x
* This
->decode_info
.tile_width
)
1005 rc
.X
= prc
->X
- tile_x
* This
->decode_info
.tile_width
;
1007 if (prc
->Y
< tile_y
* This
->decode_info
.tile_height
)
1010 rc
.Y
= prc
->Y
- tile_y
* This
->decode_info
.tile_height
;
1012 if (prc
->X
+prc
->Width
> (tile_x
+1) * This
->decode_info
.tile_width
)
1013 rc
.Width
= This
->decode_info
.tile_width
- rc
.X
;
1014 else if (prc
->X
< tile_x
* This
->decode_info
.tile_width
)
1015 rc
.Width
= prc
->Width
+ prc
->X
- tile_x
* This
->decode_info
.tile_width
;
1017 rc
.Width
= prc
->Width
;
1019 if (prc
->Y
+prc
->Height
> (tile_y
+1) * This
->decode_info
.tile_height
)
1020 rc
.Height
= This
->decode_info
.tile_height
- rc
.Y
;
1021 else if (prc
->Y
< tile_y
* This
->decode_info
.tile_height
)
1022 rc
.Height
= prc
->Height
+ prc
->Y
- tile_y
* This
->decode_info
.tile_height
;
1024 rc
.Height
= prc
->Height
;
1026 dst_tilepos
= pbBuffer
+ (cbStride
* ((rc
.Y
+ tile_y
* This
->decode_info
.tile_height
) - prc
->Y
)) +
1027 ((This
->decode_info
.bpp
* ((rc
.X
+ tile_x
* This
->decode_info
.tile_width
) - prc
->X
) + 7) / 8);
1029 hr
= copy_pixels(This
->decode_info
.bpp
, This
->cached_tile
,
1030 This
->decode_info
.tile_width
, This
->decode_info
.tile_height
, This
->decode_info
.tile_stride
,
1031 &rc
, cbStride
, cbBufferSize
, dst_tilepos
);
1036 LeaveCriticalSection(&This
->parent
->lock
);
1037 TRACE("<-- 0x%x\n", hr
);
1043 LeaveCriticalSection(&This
->parent
->lock
);
1048 static HRESULT WINAPI
TiffFrameDecode_GetMetadataQueryReader(IWICBitmapFrameDecode
*iface
,
1049 IWICMetadataQueryReader
**ppIMetadataQueryReader
)
1051 FIXME("(%p,%p): stub\n", iface
, ppIMetadataQueryReader
);
1055 static HRESULT WINAPI
TiffFrameDecode_GetColorContexts(IWICBitmapFrameDecode
*iface
,
1056 UINT cCount
, IWICColorContext
**ppIColorContexts
, UINT
*pcActualCount
)
1058 FIXME("(%p,%u,%p,%p): stub\n", iface
, cCount
, ppIColorContexts
, pcActualCount
);
1062 static HRESULT WINAPI
TiffFrameDecode_GetThumbnail(IWICBitmapFrameDecode
*iface
,
1063 IWICBitmapSource
**ppIThumbnail
)
1065 FIXME("(%p,%p): stub\n", iface
, ppIThumbnail
);
1069 static const IWICBitmapFrameDecodeVtbl TiffFrameDecode_Vtbl
= {
1070 TiffFrameDecode_QueryInterface
,
1071 TiffFrameDecode_AddRef
,
1072 TiffFrameDecode_Release
,
1073 TiffFrameDecode_GetSize
,
1074 TiffFrameDecode_GetPixelFormat
,
1075 TiffFrameDecode_GetResolution
,
1076 TiffFrameDecode_CopyPalette
,
1077 TiffFrameDecode_CopyPixels
,
1078 TiffFrameDecode_GetMetadataQueryReader
,
1079 TiffFrameDecode_GetColorContexts
,
1080 TiffFrameDecode_GetThumbnail
1083 HRESULT
TiffDecoder_CreateInstance(IUnknown
*pUnkOuter
, REFIID iid
, void** ppv
)
1088 TRACE("(%p,%s,%p)\n", pUnkOuter
, debugstr_guid(iid
), ppv
);
1092 if (pUnkOuter
) return CLASS_E_NOAGGREGATION
;
1094 if (!load_libtiff())
1096 ERR("Failed reading TIFF because unable to load %s\n",SONAME_LIBTIFF
);
1100 This
= HeapAlloc(GetProcessHeap(), 0, sizeof(TiffDecoder
));
1101 if (!This
) return E_OUTOFMEMORY
;
1103 This
->IWICBitmapDecoder_iface
.lpVtbl
= &TiffDecoder_Vtbl
;
1105 This
->stream
= NULL
;
1106 InitializeCriticalSection(&This
->lock
);
1107 This
->lock
.DebugInfo
->Spare
[0] = (DWORD_PTR
)(__FILE__
": TiffDecoder.lock");
1109 This
->initialized
= FALSE
;
1111 ret
= IUnknown_QueryInterface((IUnknown
*)This
, iid
, ppv
);
1112 IUnknown_Release((IUnknown
*)This
);
1117 typedef struct TiffEncoder
{
1118 IWICBitmapEncoder IWICBitmapEncoder_iface
;
1122 static inline TiffEncoder
*impl_from_IWICBitmapEncoder(IWICBitmapEncoder
*iface
)
1124 return CONTAINING_RECORD(iface
, TiffEncoder
, IWICBitmapEncoder_iface
);
1127 static HRESULT WINAPI
TiffEncoder_QueryInterface(IWICBitmapEncoder
*iface
, REFIID iid
,
1130 TiffEncoder
*This
= impl_from_IWICBitmapEncoder(iface
);
1131 TRACE("(%p,%s,%p)\n", iface
, debugstr_guid(iid
), ppv
);
1133 if (!ppv
) return E_INVALIDARG
;
1135 if (IsEqualIID(&IID_IUnknown
, iid
) ||
1136 IsEqualIID(&IID_IWICBitmapEncoder
, iid
))
1143 return E_NOINTERFACE
;
1146 IUnknown_AddRef((IUnknown
*)*ppv
);
1150 static ULONG WINAPI
TiffEncoder_AddRef(IWICBitmapEncoder
*iface
)
1152 TiffEncoder
*This
= impl_from_IWICBitmapEncoder(iface
);
1153 ULONG ref
= InterlockedIncrement(&This
->ref
);
1155 TRACE("(%p) refcount=%u\n", iface
, ref
);
1160 static ULONG WINAPI
TiffEncoder_Release(IWICBitmapEncoder
*iface
)
1162 TiffEncoder
*This
= impl_from_IWICBitmapEncoder(iface
);
1163 ULONG ref
= InterlockedDecrement(&This
->ref
);
1165 TRACE("(%p) refcount=%u\n", iface
, ref
);
1169 HeapFree(GetProcessHeap(), 0, This
);
1175 static HRESULT WINAPI
TiffEncoder_Initialize(IWICBitmapEncoder
*iface
,
1176 IStream
*pIStream
, WICBitmapEncoderCacheOption cacheOption
)
1178 FIXME("(%p,%p,%u): stub\n", iface
, pIStream
, cacheOption
);
1182 static HRESULT WINAPI
TiffEncoder_GetContainerFormat(IWICBitmapEncoder
*iface
,
1183 GUID
*pguidContainerFormat
)
1185 FIXME("(%p,%s): stub\n", iface
, debugstr_guid(pguidContainerFormat
));
1189 static HRESULT WINAPI
TiffEncoder_GetEncoderInfo(IWICBitmapEncoder
*iface
,
1190 IWICBitmapEncoderInfo
**ppIEncoderInfo
)
1192 FIXME("(%p,%p): stub\n", iface
, ppIEncoderInfo
);
1196 static HRESULT WINAPI
TiffEncoder_SetColorContexts(IWICBitmapEncoder
*iface
,
1197 UINT cCount
, IWICColorContext
**ppIColorContext
)
1199 FIXME("(%p,%u,%p): stub\n", iface
, cCount
, ppIColorContext
);
1203 static HRESULT WINAPI
TiffEncoder_SetPalette(IWICBitmapEncoder
*iface
, IWICPalette
*pIPalette
)
1205 TRACE("(%p,%p)\n", iface
, pIPalette
);
1206 return WINCODEC_ERR_UNSUPPORTEDOPERATION
;
1209 static HRESULT WINAPI
TiffEncoder_SetThumbnail(IWICBitmapEncoder
*iface
, IWICBitmapSource
*pIThumbnail
)
1211 TRACE("(%p,%p)\n", iface
, pIThumbnail
);
1212 return WINCODEC_ERR_UNSUPPORTEDOPERATION
;
1215 static HRESULT WINAPI
TiffEncoder_SetPreview(IWICBitmapEncoder
*iface
, IWICBitmapSource
*pIPreview
)
1217 TRACE("(%p,%p)\n", iface
, pIPreview
);
1218 return WINCODEC_ERR_UNSUPPORTEDOPERATION
;
1221 static HRESULT WINAPI
TiffEncoder_CreateNewFrame(IWICBitmapEncoder
*iface
,
1222 IWICBitmapFrameEncode
**ppIFrameEncode
, IPropertyBag2
**ppIEncoderOptions
)
1224 FIXME("(%p,%p,%p): stub\n", iface
, ppIFrameEncode
, ppIEncoderOptions
);
1228 static HRESULT WINAPI
TiffEncoder_Commit(IWICBitmapEncoder
*iface
)
1230 FIXME("(%p): stub\n", iface
);
1234 static HRESULT WINAPI
TiffEncoder_GetMetadataQueryWriter(IWICBitmapEncoder
*iface
,
1235 IWICMetadataQueryWriter
**ppIMetadataQueryWriter
)
1237 FIXME("(%p,%p): stub\n", iface
, ppIMetadataQueryWriter
);
1241 static const IWICBitmapEncoderVtbl TiffEncoder_Vtbl
= {
1242 TiffEncoder_QueryInterface
,
1244 TiffEncoder_Release
,
1245 TiffEncoder_Initialize
,
1246 TiffEncoder_GetContainerFormat
,
1247 TiffEncoder_GetEncoderInfo
,
1248 TiffEncoder_SetColorContexts
,
1249 TiffEncoder_SetPalette
,
1250 TiffEncoder_SetThumbnail
,
1251 TiffEncoder_SetPreview
,
1252 TiffEncoder_CreateNewFrame
,
1254 TiffEncoder_GetMetadataQueryWriter
1257 HRESULT
TiffEncoder_CreateInstance(IUnknown
*pUnkOuter
, REFIID iid
, void** ppv
)
1262 TRACE("(%p,%s,%p)\n", pUnkOuter
, debugstr_guid(iid
), ppv
);
1266 if (pUnkOuter
) return CLASS_E_NOAGGREGATION
;
1268 if (!load_libtiff())
1270 ERR("Failed writing TIFF because unable to load %s\n",SONAME_LIBTIFF
);
1274 This
= HeapAlloc(GetProcessHeap(), 0, sizeof(TiffEncoder
));
1275 if (!This
) return E_OUTOFMEMORY
;
1277 This
->IWICBitmapEncoder_iface
.lpVtbl
= &TiffEncoder_Vtbl
;
1280 ret
= IUnknown_QueryInterface((IUnknown
*)This
, iid
, ppv
);
1281 IUnknown_Release((IUnknown
*)This
);
1286 #else /* !SONAME_LIBTIFF */
1288 HRESULT
TiffDecoder_CreateInstance(IUnknown
*pUnkOuter
, REFIID iid
, void** ppv
)
1290 ERR("Trying to load TIFF picture, but Wine was compiled without TIFF support.\n");
1294 HRESULT
TiffEncoder_CreateInstance(IUnknown
*pUnkOuter
, REFIID iid
, void** ppv
)
1296 ERR("Trying to save TIFF picture, but Wine was compiled without TIFF support.\n");