7c6025a65565865697a1dfdcb8629998b8224e89
[vlc.git] / modules / codec / quicktime.c
1 /*****************************************************************************
2  * quicktime.c: a quicktime decoder that uses the QT library/dll
3  *****************************************************************************
4  * Copyright (C) 2003 the VideoLAN team
5  * $Id$
6  *
7  * Authors: Laurent Aimar <fenrir at via.ecp.fr>
8  *          Derk-Jan Hartman <thedj at users.sf.net>
9  *
10  * This program is free software; you can redistribute it and/or modify
11  * it under the terms of the GNU General Public License as published by
12  * the Free Software Foundation; either version 2 of the License, or
13  * (at your option) any later version.
14  *
15  * This program is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  * GNU General Public License for more details.
19  *
20  * You should have received a copy of the GNU General Public License
21  * along with this program; if not, write to the Free Software
22  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
23  *****************************************************************************/
24
25 /*****************************************************************************
26  * Preamble
27  *****************************************************************************/
28
29 #ifdef HAVE_CONFIG_H
30 # include "config.h"
31 #endif
32
33 #include <vlc_common.h>
34 #include <vlc_plugin.h>
35 #include <vlc_aout.h>
36 #include <vlc_vout.h>
37 #include <vlc_codec.h>
38
39 #if !defined (__APPLE__) && !defined(WIN32)
40 # define LOADER 1
41 #endif
42
43 #ifdef __APPLE__
44 #include <QuickTime/QuickTimeComponents.h>
45 #include <QuickTime/Movies.h>
46 #include <QuickTime/ImageCodec.h>
47 #endif
48
49 /* for windows do we require Quicktime compents header? */
50 #ifdef LOADER
51 #include "qtx/qtxsdk/components.h"
52 #include "wine/windef.h"
53 #include "ldt_keeper.h"
54
55 HMODULE   WINAPI LoadLibraryA(LPCSTR);
56 FARPROC   WINAPI GetProcAddress(HMODULE,LPCSTR);
57 int       WINAPI FreeLibrary(HMODULE);
58
59 #endif
60
61 /*****************************************************************************
62  * Module descriptor
63  *****************************************************************************/
64 static int  Open ( vlc_object_t * );
65 static void Close( vlc_object_t * );
66
67 vlc_module_begin();
68     set_description( N_("QuickTime library decoder") );
69     set_capability( "decoder", 100 );
70     set_category( CAT_INPUT );
71     set_subcategory( SUBCAT_INPUT_VCODEC );
72     set_callbacks( Open, Close );
73
74 vlc_module_end();
75
76
77 /*****************************************************************************
78  * Local prototypes
79  *****************************************************************************/
80 static int           OpenAudio( decoder_t * );
81 static int           OpenVideo( decoder_t * );
82
83 static aout_buffer_t *DecodeAudio( decoder_t *, block_t ** );
84 static picture_t     *DecodeVideo( decoder_t *, block_t ** );
85
86 #define FCC( a, b , c, d ) \
87     ((uint32_t)( ((a)<<24)|((b)<<16)|((c)<<8)|(d)))
88
89 #ifndef __APPLE__
90 typedef struct OpaqueSoundConverter*    SoundConverter;
91 #ifndef LOADER
92 typedef long                            OSType;
93 typedef int                             OSErr;
94 #endif
95 typedef unsigned long                   UnsignedFixed;
96 typedef uint8_t                         Byte;
97
98 typedef struct SoundComponentData {
99     long                            flags;
100     OSType                          format;
101     short                           numChannels;
102     short                           sampleSize;
103     UnsignedFixed                   sampleRate;
104     long                            sampleCount;
105     Byte *                          buffer;
106     long                            reserved;
107 } SoundComponentData;
108
109 #endif /* __APPLE__ */
110
111 struct decoder_sys_t
112 {
113     /* library */
114 #ifndef __APPLE__
115 #ifdef LOADER
116     ldt_fs_t    *ldt_fs;
117 #endif /* LOADER */
118
119     HMODULE qtml;
120     HINSTANCE qts;
121     OSErr (*InitializeQTML)             ( long flags );
122     OSErr (*TerminateQTML)              ( void );
123 #endif /* __APPLE__ */
124
125     /* Audio */
126     int (*SoundConverterOpen)           ( const SoundComponentData *,
127                                           const SoundComponentData *,
128                                           SoundConverter* );
129     int (*SoundConverterClose)          ( SoundConverter );
130     int (*SoundConverterSetInfo)        ( SoundConverter , OSType, void * );
131     int (*SoundConverterGetBufferSizes) ( SoundConverter, unsigned long,
132                                           unsigned long*, unsigned long*,
133                                           unsigned long* );
134     int (*SoundConverterBeginConversion)( SoundConverter );
135     int (*SoundConverterEndConversion)  ( SoundConverter, void *,
136                                           unsigned long *, unsigned long *);
137     int (*SoundConverterConvertBuffer)  ( SoundConverter, const void *,
138                                           unsigned long, void *,
139                                           unsigned long *, unsigned long * );
140     SoundConverter      myConverter;
141     SoundComponentData  InputFormatInfo, OutputFormatInfo;
142
143     unsigned long   FramesToGet;
144     unsigned int    InFrameSize;
145     unsigned int    OutFrameSize;
146
147 #ifndef WIN32
148     /* Video */
149     Component         (*FindNextComponent)
150         ( Component prev, ComponentDescription* desc );
151
152     ComponentInstance (*OpenComponent)
153         ( Component c );
154
155     ComponentResult   (*ImageCodecInitialize)
156         ( ComponentInstance ci, ImageSubCodecDecompressCapabilities * cap);
157
158     ComponentResult   (*ImageCodecGetCodecInfo)
159         ( ComponentInstance ci, CodecInfo *info );
160
161     ComponentResult   (*ImageCodecPreDecompress)
162         ( ComponentInstance ci, CodecDecompressParams * params );
163
164     ComponentResult   (*ImageCodecBandDecompress)
165         ( ComponentInstance ci, CodecDecompressParams * params );
166
167     PixMapHandle      (*GetGWorldPixMap)
168         ( GWorldPtr offscreenGWorld );
169
170     OSErr             (*QTNewGWorldFromPtr)
171         ( GWorldPtr *gw, OSType pixelFormat, const Rect *boundsRect,
172           CTabHandle cTable, /*GDHandle*/ void *aGDevice, /*unused*/
173           GWorldFlags flags, void *baseAddr, long rowBytes );
174
175     OSErr             (*NewHandleClear)( Size byteCount );
176
177     ComponentInstance       ci;
178     Rect                    OutBufferRect;   /* the dimensions of our GWorld */
179     GWorldPtr               OutBufferGWorld; /* a GWorld is some kind of
180                                                 description for a drawing
181                                                 environment */
182     ImageDescriptionHandle  framedescHandle;
183
184     CodecDecompressParams   decpar;          /* for ImageCodecPreDecompress()*/
185     CodecCapabilities       codeccap;        /* for decpar */
186 #endif
187
188     /* Output properties */
189     uint8_t *           plane;
190     mtime_t             pts;
191     audio_date_t        date;
192
193     int                 i_late; /* video */
194
195     /* buffer */
196     unsigned int        i_buffer;
197     unsigned int        i_buffer_size;
198     uint8_t             *p_buffer;
199
200     /* Audio only */
201     uint8_t             out_buffer[1000000];    /* FIXME */
202     int                 i_out_frames;
203     int                 i_out;
204 };
205
206 static int pi_channels_maps[6] =
207 {
208     0,
209     AOUT_CHAN_CENTER,
210     AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT,
211     AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT | AOUT_CHAN_CENTER,
212     AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT | AOUT_CHAN_REARLEFT | AOUT_CHAN_REARLEFT,
213     AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT | AOUT_CHAN_CENTER
214      | AOUT_CHAN_REARLEFT | AOUT_CHAN_REARLEFT
215 };
216
217 static int QTAudioInit( decoder_t * );
218 static int QTVideoInit( decoder_t * );
219
220 /*****************************************************************************
221  * Open: probe the decoder and return score
222  *****************************************************************************
223  * Tries to launch a decoder and return score so that the interface is able
224  * to choose.
225  *****************************************************************************/
226 static int Open( vlc_object_t *p_this )
227 {
228     decoder_t *p_dec = (decoder_t*)p_this;
229
230 #ifdef __APPLE__
231     OSErr err;
232     SInt32 qtVersion;
233     
234     err = Gestalt(gestaltQuickTimeVersion, &qtVersion);
235 #endif
236
237     switch( p_dec->fmt_in.i_codec )
238     {
239         case VLC_FOURCC('h','2','6','4'): /* H.264 */
240         case VLC_FOURCC('S','V','Q','3'): /* Sorenson v3 */
241     /*    case VLC_FOURCC('S','V','Q','1'):  Sorenson v1
242         case VLC_FOURCC('Z','y','G','o'):
243         case VLC_FOURCC('V','P','3','1'):
244         case VLC_FOURCC('3','I','V','1'): */
245         case VLC_FOURCC('r','l','e',' '): /* QuickTime animation (RLE) */
246         case VLC_FOURCC('r','p','z','a'): /* QuickTime Apple Video */
247         case VLC_FOURCC('a','z','p','r'): /* QuickTime animation (RLE) */
248 #ifdef LOADER
249             p_dec->p_sys = NULL;
250             p_dec->pf_decode_video = DecodeVideo;
251             return VLC_SUCCESS;
252 #else
253             return OpenVideo( p_dec );
254 #endif
255
256 #ifdef __APPLE__
257         case VLC_FOURCC('I','L','B','C'): /* iLBC */
258             if ((err == noErr) || (qtVersion < 0x07500000)) 
259                 return VLC_EGENERIC;
260         case VLC_FOURCC('i','l','b','c'): /* iLBC */
261             if ((err == noErr) || (qtVersion < 0x07500000)) 
262                 return VLC_EGENERIC;
263 #endif
264         case VLC_FOURCC('s','a','m','r'): /* 3GPP AMR audio */
265         case VLC_FOURCC('s','a','m','b'): /* 3GPP AMR-WB audio */
266         case VLC_FOURCC('m','p','4','a'): /* MPEG-4 audio */
267         case VLC_FOURCC('Q','D','M','C'): /* QDesign */
268         case VLC_FOURCC('Q','D','M','2'): /* QDesign* 2 */
269         case VLC_FOURCC('Q','c','l','p'): /* Qualcomm Purevoice Codec */
270         case VLC_FOURCC('Q','C','L','P'): /* Qualcomm Purevoice Codec */
271         case VLC_FOURCC('M','A','C','3'): /* MACE3 audio decoder */
272         case VLC_FOURCC('M','A','C','6'): /* MACE6 audio decoder */
273         case VLC_FOURCC('d','v','c','a'): /* DV Audio */
274         case VLC_FOURCC('s','o','w','t'): /* 16-bit Little Endian */
275         case VLC_FOURCC('t','w','o','s'): /* 16-bit Big Endian */
276         case VLC_FOURCC('a','l','a','w'): /* ALaw 2:1 */
277         case VLC_FOURCC('u','l','a','w'): /* mu-Law 2:1 */
278         case VLC_FOURCC('r','a','w',' '): /* 8-bit offset binaries */
279         case VLC_FOURCC('f','l','3','2'): /* 32-bit Floating Point */
280         case VLC_FOURCC('f','l','6','4'): /* 64-bit Floating Point */
281         case VLC_FOURCC('i','n','2','4'): /* 24-bit Interger */
282         case VLC_FOURCC('i','n','3','2'): /* 32-bit Integer */
283         case 0x0011:                            /* DVI IMA */
284         case 0x6D730002:                        /* Microsoft ADPCM-ACM */
285         case 0x6D730011:                        /* DVI Intel IMAADPCM-ACM */
286 #ifdef LOADER
287             p_dec->p_sys = NULL;
288             p_dec->pf_decode_audio = DecodeAudio;
289             return VLC_SUCCESS;
290 #else
291             return OpenAudio( p_dec );
292 #endif
293
294         default:
295             return VLC_EGENERIC;
296     }
297 }
298
299 /*****************************************************************************
300  * Close:
301  *****************************************************************************/
302 static void Close( vlc_object_t *p_this )
303 {
304     decoder_t     *p_dec = (decoder_t*)p_this;
305     decoder_sys_t *p_sys = p_dec->p_sys;
306     vlc_mutex_t   *lock;
307
308     /* get lock, avoid segfault */
309     lock = var_AcquireMutex( "qt_mutex" );
310
311     if( p_dec->fmt_out.i_cat == AUDIO_ES )
312     {
313         int i_error;
314         unsigned long ConvertedFrames=0;
315         unsigned long ConvertedBytes=0;
316
317         i_error = p_sys->SoundConverterEndConversion( p_sys->myConverter, NULL,
318                                                       &ConvertedFrames,
319                                                       &ConvertedBytes );
320         msg_Dbg( p_dec, "SoundConverterEndConversion => %d", i_error );
321
322         i_error = p_sys->SoundConverterClose( p_sys->myConverter );
323         msg_Dbg( p_dec, "SoundConverterClose => %d", i_error );
324
325         free( p_sys->p_buffer );
326     }
327     else if( p_dec->fmt_out.i_cat == VIDEO_ES )
328     {
329         free( p_sys->plane );
330     }
331
332 #ifndef __APPLE__
333     FreeLibrary( p_sys->qtml );
334     FreeLibrary( p_sys->qts );
335     msg_Dbg( p_dec, "FreeLibrary ok." );
336 #else
337     ExitMovies();
338 #endif
339
340 #if 0
341     /* Segfault */
342 #ifdef LOADER
343     Restore_LDT_Keeper( p_sys->ldt_fs );
344     msg_Dbg( p_dec, "Restore_LDT_Keeper" );
345 #endif
346 #endif
347
348     vlc_mutex_unlock( lock );
349
350     free( p_sys );
351 }
352
353 /*****************************************************************************
354  * OpenAudio:
355  *****************************************************************************/
356 static int OpenAudio( decoder_t *p_dec )
357 {
358     decoder_sys_t *p_sys;
359
360     int             i_error;
361     char            fcc[4];
362     unsigned long   WantedBufferSize;
363     unsigned long   InputBufferSize = 0;
364     unsigned long   OutputBufferSize = 0;
365
366     /* get lock, avoid segfault */
367     vlc_mutex_t    *lock = var_AcquireMutex( "qt_mutex" );
368     if( lock == NULL )
369         return VLC_EGENERIC;
370
371     p_sys = calloc( sizeof( decoder_sys_t ), 1 );
372     p_dec->p_sys = p_sys;
373     p_dec->pf_decode_audio = DecodeAudio;
374
375     memcpy( fcc, &p_dec->fmt_in.i_codec, 4 );
376
377 #ifdef __APPLE__
378     EnterMovies();
379 #endif
380
381     if( QTAudioInit( p_dec ) )
382     {
383         msg_Err( p_dec, "cannot initialize QT");
384         goto exit_error;
385     }
386
387 #ifndef __APPLE__
388     if( ( i_error = p_sys->InitializeQTML( 6 + 16 ) ) )
389     {
390         msg_Dbg( p_dec, "error on InitializeQTML = %d", i_error );
391         goto exit_error;
392     }
393 #endif
394
395     /* input format settings */
396     p_sys->InputFormatInfo.flags       = 0;
397     p_sys->InputFormatInfo.sampleCount = 0;
398     p_sys->InputFormatInfo.buffer      = NULL;
399     p_sys->InputFormatInfo.reserved    = 0;
400     p_sys->InputFormatInfo.numChannels = p_dec->fmt_in.audio.i_channels;
401     p_sys->InputFormatInfo.sampleSize  = p_dec->fmt_in.audio.i_bitspersample;
402     p_sys->InputFormatInfo.sampleRate  = p_dec->fmt_in.audio.i_rate;
403     p_sys->InputFormatInfo.format      = FCC( fcc[0], fcc[1], fcc[2], fcc[3] );
404
405     /* output format settings */
406     p_sys->OutputFormatInfo.flags       = 0;
407     p_sys->OutputFormatInfo.sampleCount = 0;
408     p_sys->OutputFormatInfo.buffer      = NULL;
409     p_sys->OutputFormatInfo.reserved    = 0;
410     p_sys->OutputFormatInfo.numChannels = p_dec->fmt_in.audio.i_channels;
411     p_sys->OutputFormatInfo.sampleSize  = 16;
412     p_sys->OutputFormatInfo.sampleRate  = p_dec->fmt_in.audio.i_rate;
413     p_sys->OutputFormatInfo.format      = FCC( 'N', 'O', 'N', 'E' );
414
415
416     i_error = p_sys->SoundConverterOpen( &p_sys->InputFormatInfo,
417                                          &p_sys->OutputFormatInfo,
418                                          &p_sys->myConverter );
419     if( i_error )
420     {
421         msg_Err( p_dec, "error on SoundConverterOpen = %d", i_error );
422         goto exit_error;
423     }
424
425 #if 0
426     /* tell the sound converter we accept VBR formats */
427     i_error = SoundConverterSetInfo( p_dec->myConverter, siClientAcceptsVBR,
428                                      (void *)true );
429 #endif
430
431     if( p_dec->fmt_in.i_extra > 36 + 8 )
432     {
433         i_error = p_sys->SoundConverterSetInfo( p_sys->myConverter,
434                                                 FCC( 'w', 'a', 'v', 'e' ),
435                                                 ((uint8_t*)p_dec->fmt_in.p_extra) + 36 + 8 );
436
437         msg_Dbg( p_dec, "error on SoundConverterSetInfo = %d", i_error );
438     }
439
440     WantedBufferSize = p_sys->OutputFormatInfo.numChannels *
441                        p_sys->OutputFormatInfo.sampleRate * 2;
442     p_sys->FramesToGet = 0;
443
444     i_error = p_sys->SoundConverterGetBufferSizes( p_sys->myConverter,
445                                                    WantedBufferSize,
446                                                    &p_sys->FramesToGet,
447                                                    &InputBufferSize,
448                                                    &OutputBufferSize );
449
450     msg_Dbg( p_dec, "WantedBufferSize=%li InputBufferSize=%li "
451              "OutputBufferSize=%li FramesToGet=%li",
452              WantedBufferSize, InputBufferSize, OutputBufferSize,
453              p_sys->FramesToGet );
454
455     p_sys->InFrameSize  = (InputBufferSize + p_sys->FramesToGet - 1 ) /
456                             p_sys->FramesToGet;
457     p_sys->OutFrameSize = OutputBufferSize / p_sys->FramesToGet;
458
459     msg_Dbg( p_dec, "frame size %d -> %d",
460              p_sys->InFrameSize, p_sys->OutFrameSize );
461
462     if( (i_error = p_sys->SoundConverterBeginConversion(p_sys->myConverter)) )
463     {
464         msg_Err( p_dec,
465                  "error on SoundConverterBeginConversion = %d", i_error );
466         goto exit_error;
467     }
468
469
470     es_format_Init( &p_dec->fmt_out, AUDIO_ES, AOUT_FMT_S16_NE );
471     p_dec->fmt_out.audio.i_rate = p_sys->OutputFormatInfo.sampleRate;
472     p_dec->fmt_out.audio.i_channels = p_sys->OutputFormatInfo.numChannels;
473     p_dec->fmt_out.audio.i_physical_channels =
474     p_dec->fmt_out.audio.i_original_channels =
475         pi_channels_maps[p_sys->OutputFormatInfo.numChannels];
476
477     aout_DateInit( &p_sys->date, p_dec->fmt_out.audio.i_rate );
478
479     p_sys->i_buffer      = 0;
480     p_sys->i_buffer_size = 100*1000;
481     p_sys->p_buffer      = malloc( p_sys->i_buffer_size );
482     if( !p_sys->p_buffer )
483         goto exit_error;
484
485     p_sys->i_out = 0;
486     p_sys->i_out_frames = 0;
487
488     vlc_mutex_unlock( lock );
489     return VLC_SUCCESS;
490
491 exit_error:
492
493 #ifdef LOADER
494     Restore_LDT_Keeper( p_sys->ldt_fs );
495 #endif
496     vlc_mutex_unlock( lock );
497
498     free( p_sys );
499     return VLC_EGENERIC;
500 }
501
502 /*****************************************************************************
503  * DecodeAudio:
504  *****************************************************************************/
505 static aout_buffer_t *DecodeAudio( decoder_t *p_dec, block_t **pp_block )
506 {
507     decoder_sys_t *p_sys = p_dec->p_sys;
508
509     block_t     *p_block;
510     int         i_error;
511
512 #ifdef LOADER
513     /* We must do open and close in the same thread (unless we do
514      * Setup_LDT_Keeper in the main thread before all others */
515     if( p_sys == NULL )
516     {
517         if( OpenAudio( p_dec ) )
518         {
519             /* Fatal */
520             p_dec->b_error = true;
521             return NULL;
522         }
523
524         p_sys = p_dec->p_sys;
525     }
526 #endif
527
528     if( pp_block == NULL || *pp_block == NULL )
529     {
530         return NULL;
531     }
532     p_block = *pp_block;
533
534     if( p_sys->i_out_frames > 0 && p_sys->i_out >= p_sys->i_out_frames )
535     {
536         /* Ask new data */
537         p_sys->i_out = 0;
538         p_sys->i_out_frames = 0;
539
540         *pp_block = NULL;
541         return NULL;
542     }
543
544     if( p_sys->i_out_frames <= 0 )
545     {
546         p_sys->pts = p_block->i_pts;
547         if( decoder_GetDisplayDate( p_dec, p_block->i_pts ) < mdate() )
548         {
549             block_Release( p_block );
550             *pp_block = NULL;
551             return NULL;
552         }
553
554         /* Append data */
555         if( p_sys->i_buffer_size < p_sys->i_buffer + p_block->i_buffer )
556         {
557             p_sys->i_buffer_size = p_sys->i_buffer + p_block->i_buffer + 1024;
558             p_sys->p_buffer = realloc( p_sys->p_buffer, p_sys->i_buffer_size );
559         }
560         memcpy( &p_sys->p_buffer[p_sys->i_buffer], p_block->p_buffer,
561                 p_block->i_buffer );
562         p_sys->i_buffer += p_block->i_buffer;
563
564         if( p_sys->i_buffer > p_sys->InFrameSize )
565         {
566             int i_frames = p_sys->i_buffer / p_sys->InFrameSize;
567             unsigned long i_out_frames, i_out_bytes;
568             vlc_mutex_t *lock = var_AcquireMutex( "qt_mutex ");
569
570             i_error = p_sys->SoundConverterConvertBuffer( p_sys->myConverter,
571                                                           p_sys->p_buffer,
572                                                           i_frames,
573                                                           p_sys->out_buffer,
574                                                           &i_out_frames,
575                                                           &i_out_bytes );
576             vlc_mutex_unlock( lock );
577
578             /*
579             msg_Dbg( p_dec, "decoded %d frames -> %ld frames (error=%d)",
580                      i_frames, i_out_frames, i_error );
581
582             msg_Dbg( p_dec, "decoded %ld frames = %ld bytes",
583                      i_out_frames, i_out_bytes );
584             */
585
586             p_sys->i_buffer -= i_frames * p_sys->InFrameSize;
587             if( p_sys->i_buffer > 0 )
588             {
589                 memmove( &p_sys->p_buffer[0],
590                          &p_sys->p_buffer[i_frames * p_sys->InFrameSize],
591                          p_sys->i_buffer );
592             }
593
594             if( p_sys->pts != 0 &&
595                 p_sys->pts != aout_DateGet( &p_sys->date ) )
596             {
597                 aout_DateSet( &p_sys->date, p_sys->pts );
598             }
599             else if( !aout_DateGet( &p_sys->date ) )
600             {
601                 return NULL;
602             }
603
604             if( !i_error && i_out_frames > 0 )
605             {
606                 /* we have others samples */
607                 p_sys->i_out_frames = i_out_frames;
608                 p_sys->i_out = 0;
609             }
610         }
611     }
612
613     if( p_sys->i_out < p_sys->i_out_frames )
614     {
615         aout_buffer_t *p_out;
616         int  i_frames = __MIN( p_sys->i_out_frames - p_sys->i_out, 1000 );
617
618         p_out = p_dec->pf_aout_buffer_new( p_dec, i_frames );
619
620         if( p_out )
621         {
622             p_out->start_date = aout_DateGet( &p_sys->date );
623             p_out->end_date = aout_DateIncrement( &p_sys->date, i_frames );
624
625             memcpy( p_out->p_buffer,
626                     &p_sys->out_buffer[2 * p_sys->i_out * p_dec->fmt_out.audio.i_channels],
627                     p_out->i_nb_bytes );
628
629             p_sys->i_out += i_frames;
630         }
631         return p_out;
632     }
633
634     return NULL;
635 }
636
637 /*****************************************************************************
638  * OpenVideo:
639  *****************************************************************************/
640 static int OpenVideo( decoder_t *p_dec )
641 {
642     decoder_sys_t *p_sys = malloc( sizeof( decoder_sys_t ) );
643     if( !p_sys )
644         return VLC_ENOMEM;
645
646 #ifndef WIN32
647     vlc_mutex_t                        *lock;
648     long                                i_result;
649     ComponentDescription                desc;
650     Component                           prev;
651     ComponentResult                     cres;
652     ImageSubCodecDecompressCapabilities icap;   /* for ImageCodecInitialize() */
653     CodecInfo                           cinfo;  /* for ImageCodecGetCodecInfo() */
654     ImageDescription                    *id;
655
656     char                fcc[4];
657     int     i_vide = p_dec->fmt_in.i_extra;
658     uint8_t *p_vide = p_dec->fmt_in.p_extra;
659
660     p_dec->p_sys = p_sys;
661     p_dec->pf_decode_video = DecodeVideo;
662     p_sys->i_late = 0;
663
664     if( i_vide <= 0 )
665     {
666         msg_Err( p_dec, "missing extra info" );
667         free( p_sys );
668         return VLC_EGENERIC;
669     }
670
671     memcpy( fcc, &p_dec->fmt_in.i_codec, 4 );
672     msg_Dbg( p_dec, "quicktime_video %4.4s %dx%d",
673              fcc, p_dec->fmt_in.video.i_width, p_dec->fmt_in.video.i_height );
674
675     /* get lock, avoid segfault */
676     lock = var_AcquireMutex( "qt_mutex" );
677
678 #ifdef __APPLE__
679     EnterMovies();
680 #endif
681
682     if( QTVideoInit( p_dec ) )
683     {
684         msg_Err( p_dec, "cannot initialize QT");
685         goto exit_error;
686     }
687
688 #ifndef __APPLE__
689     if( ( i_result = p_sys->InitializeQTML( 6 + 16 ) ) )
690     {
691         msg_Dbg( p_dec, "error on InitializeQTML = %d", (int)i_result );
692         goto exit_error;
693     }
694 #endif
695
696     /* init ComponentDescription */
697     memset( &desc, 0, sizeof( ComponentDescription ) );
698     desc.componentType      = FCC( 'i', 'm', 'd', 'c' );
699     desc.componentSubType   = FCC( fcc[0], fcc[1], fcc[2], fcc[3] );
700     desc.componentManufacturer = 0;
701     desc.componentFlags        = 0;
702     desc.componentFlagsMask    = 0;
703
704     if( !( prev = p_sys->FindNextComponent( NULL, &desc ) ) )
705     {
706         msg_Err( p_dec, "cannot find requested component" );
707         goto exit_error;
708     }
709     msg_Dbg( p_dec, "component id=0x%p", prev );
710
711     p_sys->ci =  p_sys->OpenComponent( prev );
712     msg_Dbg( p_dec, "component instance p=0x%p", p_sys->ci );
713
714     memset( &icap, 0, sizeof( ImageSubCodecDecompressCapabilities ) );
715     cres =  p_sys->ImageCodecInitialize( p_sys->ci, &icap );
716     msg_Dbg( p_dec, "ImageCodecInitialize->0x%X size=%d (%d)\n",
717              (int)cres, (int)icap.recordSize, (int)icap.decompressRecordSize);
718
719     memset( &cinfo, 0, sizeof( CodecInfo ) );
720     cres =  p_sys->ImageCodecGetCodecInfo( p_sys->ci, &cinfo );
721     msg_Dbg( p_dec,
722              "Flags: compr: 0x%x decomp: 0x%x format: 0x%x\n",
723              (unsigned int)cinfo.compressFlags,
724              (unsigned int)cinfo.decompressFlags,
725              (unsigned int)cinfo.formatFlags );
726     msg_Dbg( p_dec, "quicktime_video: Codec name: %.*s\n",
727              ((unsigned char*)&cinfo.typeName)[0],
728              ((unsigned char*)&cinfo.typeName)+1 );
729
730     /* make a yuy2 gworld */
731     p_sys->OutBufferRect.top    = 0;
732     p_sys->OutBufferRect.left   = 0;
733     p_sys->OutBufferRect.right  = p_dec->fmt_in.video.i_width;
734     p_sys->OutBufferRect.bottom = p_dec->fmt_in.video.i_height;
735
736
737     /* codec data FIXME use codec not SVQ3 */
738     msg_Dbg( p_dec, "vide = %d", i_vide  );
739     id = malloc( sizeof( ImageDescription ) + ( i_vide - 70 ) );
740     if( !id )
741         goto exit_error;
742     id->idSize          = sizeof( ImageDescription ) + ( i_vide - 70 );
743     id->cType           = FCC( fcc[0], fcc[1], fcc[2], fcc[3] );
744     id->version         = GetWBE ( p_vide +  0 );
745     id->revisionLevel   = GetWBE ( p_vide +  2 );
746     id->vendor          = GetDWBE( p_vide +  4 );
747     id->temporalQuality = GetDWBE( p_vide +  8 );
748     id->spatialQuality  = GetDWBE( p_vide + 12 );
749     id->width           = GetWBE ( p_vide + 16 );
750     id->height          = GetWBE ( p_vide + 18 );
751     id->hRes            = GetDWBE( p_vide + 20 );
752     id->vRes            = GetDWBE( p_vide + 24 );
753     id->dataSize        = GetDWBE( p_vide + 28 );
754     id->frameCount      = GetWBE ( p_vide + 32 );
755     memcpy( &id->name, p_vide + 34, 32 );
756     id->depth           = GetWBE ( p_vide + 66 );
757     id->clutID          = GetWBE ( p_vide + 68 );
758     if( i_vide > 70 )
759     {
760         memcpy( ((char*)&id->clutID) + 2, p_vide + 70, i_vide - 70 );
761     }
762
763     msg_Dbg( p_dec, "idSize=%d ver=%d rev=%d vendor=%d tempQ=%d "
764              "spaQ=%d w=%d h=%d dpi=%d%d dataSize=%d depth=%d frameCount=%d clutID=%d",
765              (int)id->idSize, id->version, id->revisionLevel, (int)id->vendor,
766              (int)id->temporalQuality, (int)id->spatialQuality,
767              (int)id->width, (int)id->height,
768              (int)id->hRes, (int)id->vRes,
769              (int)id->dataSize,
770              id->depth,
771              id->frameCount,
772              id->clutID );
773
774     p_sys->framedescHandle = (ImageDescriptionHandle) NewHandleClear( id->idSize );
775     memcpy( *p_sys->framedescHandle, id, id->idSize );
776
777     p_sys->plane = malloc( p_dec->fmt_in.video.i_width * p_dec->fmt_in.video.i_height * 3 );
778     if( !p_sys->plane )
779         goto exit_error;
780
781     i_result = p_sys->QTNewGWorldFromPtr( &p_sys->OutBufferGWorld,
782                                           /*pixel format of new GWorld==YUY2 */
783                                           kYUVSPixelFormat,
784                                           /* we should benchmark if yvu9 is
785                                            * faster for svq3, too */
786                                           &p_sys->OutBufferRect,
787                                           0, 0, 0,
788                                           p_sys->plane,
789                                           p_dec->fmt_in.video.i_width * 2 );
790
791     msg_Dbg( p_dec, "NewGWorldFromPtr returned:%ld\n",
792              65536 - ( i_result&0xffff ) );
793
794     memset( &p_sys->decpar, 0, sizeof( CodecDecompressParams ) );
795     p_sys->decpar.imageDescription = p_sys->framedescHandle;
796     p_sys->decpar.startLine        = 0;
797     p_sys->decpar.stopLine         = ( **p_sys->framedescHandle ).height;
798     p_sys->decpar.frameNumber      = 1;
799     p_sys->decpar.matrixFlags      = 0;
800     p_sys->decpar.matrixType       = 0;
801     p_sys->decpar.matrix           = 0;
802     p_sys->decpar.capabilities     = &p_sys->codeccap;
803     p_sys->decpar.accuracy         = codecNormalQuality;
804     p_sys->decpar.srcRect          = p_sys->OutBufferRect;
805     p_sys->decpar.transferMode     = srcCopy;
806     p_sys->decpar.dstPixMap        = **p_sys->GetGWorldPixMap( p_sys->OutBufferGWorld );/*destPixmap;  */
807
808     cres =  p_sys->ImageCodecPreDecompress( p_sys->ci, &p_sys->decpar );
809     msg_Dbg( p_dec, "quicktime_video: ImageCodecPreDecompress cres=0x%X\n",
810              (int)cres );
811
812     es_format_Init( &p_dec->fmt_out, VIDEO_ES, VLC_FOURCC( 'Y', 'U', 'Y', '2' ));
813     p_dec->fmt_out.video.i_width = p_dec->fmt_in.video.i_width;
814     p_dec->fmt_out.video.i_height= p_dec->fmt_in.video.i_height;
815     p_dec->fmt_out.video.i_aspect = VOUT_ASPECT_FACTOR * p_dec->fmt_in.video.i_width / p_dec->fmt_in.video.i_height;
816  
817     vlc_mutex_unlock( lock );
818     return VLC_SUCCESS;
819
820 exit_error:
821 #ifdef LOADER
822     Restore_LDT_Keeper( p_sys->ldt_fs );
823 #endif
824     vlc_mutex_unlock( lock );
825
826 #endif /* !WIN32 */
827
828     return VLC_EGENERIC;
829 }
830
831 #ifndef WIN32
832 /*****************************************************************************
833  * DecodeVideo:
834  *****************************************************************************/
835 static picture_t *DecodeVideo( decoder_t *p_dec, block_t **pp_block )
836 {
837     decoder_sys_t *p_sys = p_dec->p_sys;
838     vlc_mutex_t   *lock;
839     block_t       *p_block;
840     picture_t     *p_pic;
841     mtime_t       i_pts;
842
843     ComponentResult cres;
844
845 #ifdef LOADER
846     /* We must do open and close in the same thread (unless we do
847      * Setup_LDT_Keeper in the main thread before all others */
848     if( p_sys == NULL )
849     {
850         if( OpenVideo( p_dec ) )
851         {
852             /* Fatal */
853             p_dec->b_error = true;
854             return NULL;
855         }
856         p_sys = p_dec->p_sys;
857     }
858 #endif
859
860     if( pp_block == NULL || *pp_block == NULL )
861     {
862         return NULL;
863     }
864     p_block = *pp_block;
865     *pp_block = NULL;
866  
867     i_pts = p_block->i_pts ? p_block->i_pts : p_block->i_dts;
868
869     if( decoder_GetDisplayDate( p_dec, i_pts ) < mdate() )
870     {
871         p_sys->i_late++;
872     }
873     else
874     {
875         p_sys->i_late = 0;
876     }
877     msg_Dbg( p_dec, "bufsize: %d", p_block->i_buffer);
878
879     if( p_sys->i_late > 10 )
880     {
881         msg_Dbg( p_dec, "too late buffer -> dropped" );
882         block_Release( p_block );
883         return NULL;
884     }
885  
886     lock = var_AcquireMutex( "qt_mutex" );
887
888     if( ( p_pic = p_dec->pf_vout_buffer_new( p_dec ) ) )
889     {
890         p_sys->decpar.data                  = (Ptr)p_block->p_buffer;
891         p_sys->decpar.bufferSize            = p_block->i_buffer;
892         (**p_sys->framedescHandle).dataSize = p_block->i_buffer;
893
894         cres = p_sys->ImageCodecBandDecompress( p_sys->ci, &p_sys->decpar );
895
896         ++p_sys->decpar.frameNumber;
897
898         if( cres &0xFFFF )
899         {
900             msg_Dbg( p_dec, "quicktime_video: ImageCodecBandDecompress"
901                      " cres=0x%X (-0x%X) %d :(\n",
902                      (int)cres,(int)-cres, (int)cres );
903         }
904
905         memcpy( p_pic->p[0].p_pixels, p_sys->plane,
906                 p_dec->fmt_in.video.i_width * p_dec->fmt_in.video.i_height * 2 );
907         p_pic->date = i_pts;
908     }
909  
910     vlc_mutex_unlock( lock );
911
912     block_Release( p_block );
913     return p_pic;
914 }
915 #endif /* !WIN32 */
916
917 /*****************************************************************************
918  * QTAudioInit:
919  *****************************************************************************/
920 static int QTAudioInit( decoder_t *p_dec )
921 {
922     decoder_sys_t *p_sys = p_dec->p_sys;
923
924 #ifdef __APPLE__
925     p_sys->SoundConverterOpen       = (void*)SoundConverterOpen;
926     p_sys->SoundConverterClose      = (void*)SoundConverterClose;
927     p_sys->SoundConverterSetInfo    = (void*)SoundConverterSetInfo;
928     p_sys->SoundConverterGetBufferSizes = (void*)SoundConverterGetBufferSizes;
929     p_sys->SoundConverterConvertBuffer  = (void*)SoundConverterConvertBuffer;
930     p_sys->SoundConverterBeginConversion= (void*)SoundConverterBeginConversion;
931     p_sys->SoundConverterEndConversion  = (void*)SoundConverterEndConversion;
932 #else
933
934 #ifdef LOADER
935     p_sys->ldt_fs = Setup_LDT_Keeper();
936 #endif /* LOADER */
937
938     p_sys->qts = LoadLibraryA( "QuickTime.qts" );
939     if( p_sys->qts == NULL )
940     {
941         msg_Dbg( p_dec, "failed loading QuickTime.qts" );
942         return VLC_EGENERIC;
943     }
944     p_sys->qtml = LoadLibraryA( "qtmlClient.dll" );
945     if( p_sys->qtml == NULL )
946     {
947         msg_Dbg( p_dec, "failed loading qtmlClient.dll" );
948         return VLC_EGENERIC;
949     }
950
951     p_sys->InitializeQTML               = (void *)GetProcAddress( p_sys->qtml, "InitializeQTML" );
952     p_sys->TerminateQTML                = (void *)GetProcAddress( p_sys->qtml, "TerminateQTML" );
953     p_sys->SoundConverterOpen           = (void *)GetProcAddress( p_sys->qtml, "SoundConverterOpen" );
954     p_sys->SoundConverterClose          = (void *)GetProcAddress( p_sys->qtml, "SoundConverterClose" );
955     p_sys->SoundConverterSetInfo        = (void *)GetProcAddress( p_sys->qtml, "SoundConverterSetInfo" );
956     p_sys->SoundConverterGetBufferSizes = (void *)GetProcAddress( p_sys->qtml, "SoundConverterGetBufferSizes" );
957     p_sys->SoundConverterConvertBuffer  = (void *)GetProcAddress( p_sys->qtml, "SoundConverterConvertBuffer" );
958     p_sys->SoundConverterEndConversion  = (void *)GetProcAddress( p_sys->qtml, "SoundConverterEndConversion" );
959     p_sys->SoundConverterBeginConversion= (void *)GetProcAddress( p_sys->qtml, "SoundConverterBeginConversion");
960
961     if( p_sys->InitializeQTML == NULL )
962     {
963         msg_Err( p_dec, "failed getting proc address InitializeQTML" );
964         return VLC_EGENERIC;
965     }
966     if( p_sys->SoundConverterOpen == NULL ||
967         p_sys->SoundConverterClose == NULL ||
968         p_sys->SoundConverterSetInfo == NULL ||
969         p_sys->SoundConverterGetBufferSizes == NULL ||
970         p_sys->SoundConverterConvertBuffer == NULL ||
971         p_sys->SoundConverterEndConversion == NULL ||
972         p_sys->SoundConverterBeginConversion == NULL )
973     {
974         msg_Err( p_dec, "failed getting proc address" );
975         return VLC_EGENERIC;
976     }
977
978     msg_Dbg( p_dec, "standard init done" );
979 #endif /* else __APPLE__ */
980
981     return VLC_SUCCESS;
982 }
983
984 #ifndef WIN32
985 /*****************************************************************************
986  * QTVideoInit:
987  *****************************************************************************/
988 static int QTVideoInit( decoder_t *p_dec )
989 {
990     decoder_sys_t *p_sys = p_dec->p_sys;
991
992 #ifdef __APPLE__
993     p_sys->FindNextComponent        = (void*)FindNextComponent;
994     p_sys->OpenComponent            = (void*)OpenComponent;
995     p_sys->ImageCodecInitialize     = (void*)ImageCodecInitialize;
996     p_sys->ImageCodecGetCodecInfo   = (void*)ImageCodecGetCodecInfo;
997     p_sys->ImageCodecPreDecompress  = (void*)ImageCodecPreDecompress;
998     p_sys->ImageCodecBandDecompress = (void*)ImageCodecBandDecompress;
999     p_sys->GetGWorldPixMap          = (void*)GetGWorldPixMap;
1000     p_sys->QTNewGWorldFromPtr       = (void*)QTNewGWorldFromPtr;
1001     p_sys->NewHandleClear           = (void*)NewHandleClear;
1002 #else
1003
1004 #ifdef LOADER
1005     p_sys->ldt_fs = Setup_LDT_Keeper();
1006 #endif /* LOADER */
1007     p_sys->qts = LoadLibraryA( "QuickTime.qts" );
1008     if( p_sys->qts == NULL )
1009     {
1010         msg_Dbg( p_dec, "failed loading QuickTime.qts" );
1011         return VLC_EGENERIC;
1012     }
1013     msg_Dbg( p_dec, "QuickTime.qts loaded" );
1014     p_sys->qtml = LoadLibraryA( "qtmlClient.dll" );
1015     if( p_sys->qtml == NULL )
1016     {
1017         msg_Dbg( p_dec, "failed loading qtmlClient.dll" );
1018         return VLC_EGENERIC;
1019     }
1020     msg_Dbg( p_dec, "qtmlClient.dll loaded" );
1021
1022     /* (void*) to shut up gcc */
1023     p_sys->InitializeQTML           = (void*)GetProcAddress( p_sys->qtml, "InitializeQTML" );
1024     p_sys->FindNextComponent        = (void*)GetProcAddress( p_sys->qtml, "FindNextComponent" );
1025     p_sys->OpenComponent            = (void*)GetProcAddress( p_sys->qtml, "OpenComponent" );
1026     p_sys->ImageCodecInitialize     = (void*)GetProcAddress( p_sys->qtml, "ImageCodecInitialize" );
1027     p_sys->ImageCodecGetCodecInfo   = (void*)GetProcAddress( p_sys->qtml, "ImageCodecGetCodecInfo" );
1028     p_sys->ImageCodecPreDecompress  = (void*)GetProcAddress( p_sys->qtml, "ImageCodecPreDecompress" );
1029     p_sys->ImageCodecBandDecompress = (void*)GetProcAddress( p_sys->qtml, "ImageCodecBandDecompress" );
1030     p_sys->GetGWorldPixMap          = (void*)GetProcAddress( p_sys->qtml, "GetGWorldPixMap" );
1031     p_sys->QTNewGWorldFromPtr       = (void*)GetProcAddress( p_sys->qtml, "QTNewGWorldFromPtr" );
1032     p_sys->NewHandleClear           = (void*)GetProcAddress( p_sys->qtml, "NewHandleClear" );
1033
1034     if( p_sys->InitializeQTML == NULL )
1035     {
1036         msg_Dbg( p_dec, "failed getting proc address InitializeQTML" );
1037         return VLC_EGENERIC;
1038     }
1039     if( p_sys->FindNextComponent == NULL ||
1040         p_sys->OpenComponent == NULL ||
1041         p_sys->ImageCodecInitialize == NULL ||
1042         p_sys->ImageCodecGetCodecInfo == NULL ||
1043         p_sys->ImageCodecPreDecompress == NULL ||
1044         p_sys->ImageCodecBandDecompress == NULL ||
1045         p_sys->GetGWorldPixMap == NULL ||
1046         p_sys->QTNewGWorldFromPtr == NULL ||
1047         p_sys->NewHandleClear == NULL )
1048     {
1049         msg_Err( p_dec, "failed getting proc address" );
1050         return VLC_EGENERIC;
1051     }
1052 #endif /* __APPLE__ */
1053
1054     return VLC_SUCCESS;
1055 }
1056 #endif /* !WIN32 */