1 /*****************************************************************************
2 * qtcapture.m: qtkit (Mac OS X) based capture module
3 *****************************************************************************
4 * Copyright (C) 2008-2011 the VideoLAN team
6 * Authors: Pierre d'Herbemont <pdherbemont@videolan.org>
8 *****************************************************************************
9 * This library is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU Lesser General Public
11 * License as published by the Free Software Foundation;
12 * version 2 of the License.
14 * This library is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 * Lesser General Public License for more details.
19 * You should have received a copy of the GNU Lesser General Public
20 * License along with this library; if not, write to the Free Software
21 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
23 *****************************************************************************/
25 /*****************************************************************************
27 *****************************************************************************/
33 #include <vlc_common.h>
34 #include <vlc_plugin.h>
35 #include <vlc_input.h>
36 #include <vlc_demux.h>
37 #include <vlc_interface.h>
38 #include <vlc_dialog.h>
39 #include <vlc_access.h>
41 #import <QTKit/QTKit.h>
42 #import <CoreAudio/CoreAudio.h>
44 #define QTKIT_WIDTH_TEXT N_("Video Capture width")
45 #define QTKIT_WIDTH_LONGTEXT N_("Video Capture width in pixel")
46 #define QTKIT_HEIGHT_TEXT N_("Video Capture height")
47 #define QTKIT_HEIGHT_LONGTEXT N_("Video Capture height in pixel")
49 /*****************************************************************************
51 *****************************************************************************/
52 static int Open( vlc_object_t *p_this );
53 static void Close( vlc_object_t *p_this );
54 static int Demux( demux_t *p_demux );
55 static int Control( demux_t *, int, va_list );
57 /*****************************************************************************
59 *****************************************************************************/
61 set_shortname( N_("Quicktime Capture") )
62 set_description( N_("Quicktime Capture") )
63 set_category( CAT_INPUT )
64 set_subcategory( SUBCAT_INPUT_ACCESS )
65 add_shortcut( "qtcapture" )
66 set_capability( "access_demux", 10 )
67 set_callbacks( Open, Close )
68 add_integer("qtcapture-width", 640, QTKIT_WIDTH_TEXT, QTKIT_WIDTH_LONGTEXT, true)
69 change_integer_range (80, 1280)
70 add_integer("qtcapture-height", 480, QTKIT_HEIGHT_TEXT, QTKIT_HEIGHT_LONGTEXT, true)
71 change_integer_range (60, 480)
75 /*****************************************************************************
77 *****************************************************************************/
78 @interface VLCDecompressedVideoOutput : QTCaptureDecompressedVideoOutput
80 CVImageBufferRef currentImageBuffer;
85 - (void)outputVideoFrame:(CVImageBufferRef)videoFrame withSampleBuffer:(QTSampleBuffer *)sampleBuffer fromConnection:(QTCaptureConnection *)connection;
86 - (mtime_t)copyCurrentFrameToBuffer:(void *)buffer;
89 /* Apple sample code */
90 @implementation VLCDecompressedVideoOutput : QTCaptureDecompressedVideoOutput
93 if( self = [super init] )
95 currentImageBuffer = nil;
105 CVBufferRelease(currentImageBuffer);
106 currentImageBuffer = nil;
111 - (void)outputVideoFrame:(CVImageBufferRef)videoFrame withSampleBuffer:(QTSampleBuffer *)sampleBuffer fromConnection:(QTCaptureConnection *)connection
113 // Store the latest frame
114 // This must be done in a @synchronized block because this delegate method is not called on the main thread
115 CVImageBufferRef imageBufferToRelease;
117 CVBufferRetain(videoFrame);
121 imageBufferToRelease = currentImageBuffer;
122 currentImageBuffer = videoFrame;
123 currentPts = (mtime_t)(1000000L / [sampleBuffer presentationTime].timeScale * [sampleBuffer presentationTime].timeValue);
125 /* Try to use hosttime of the sample if available, because iSight Pts seems broken */
126 NSNumber *hosttime = (NSNumber *)[sampleBuffer attributeForKey:QTSampleBufferHostTimeAttribute];
127 if( hosttime ) currentPts = (mtime_t)AudioConvertHostTimeToNanos([hosttime unsignedLongLongValue])/1000;
129 CVBufferRelease(imageBufferToRelease);
132 - (mtime_t)copyCurrentFrameToBuffer:(void *)buffer
134 CVImageBufferRef imageBuffer;
138 if(!currentImageBuffer || currentPts == previousPts )
143 imageBuffer = CVBufferRetain(currentImageBuffer);
145 pts = previousPts = currentPts;
146 CVPixelBufferLockBaseAddress(imageBuffer, 0);
147 pixels = CVPixelBufferGetBaseAddress(imageBuffer);
149 memcpy( buffer, pixels, CVPixelBufferGetBytesPerRow(imageBuffer) * CVPixelBufferGetHeight(imageBuffer));
150 CVPixelBufferUnlockBaseAddress(imageBuffer, 0);
154 CVBufferRelease(imageBuffer);
164 /*****************************************************************************
166 *****************************************************************************/
169 QTCaptureSession * session;
170 QTCaptureDevice * device;
171 VLCDecompressedVideoOutput * output;
173 es_out_id_t * p_es_video;
177 /*****************************************************************************
179 *****************************************************************************/
180 static int qtchroma_to_fourcc( int i_qt )
186 } qtchroma_to_fourcc[] =
189 { '2vuy', VLC_CODEC_UYVY },
190 { 'yuv2',VLC_CODEC_YUYV },
191 { 'yuvs', VLC_CODEC_YUYV },
195 for( i = 0; qtchroma_to_fourcc[i].i_qt; i++ )
197 if( qtchroma_to_fourcc[i].i_qt == i_qt )
198 return qtchroma_to_fourcc[i].i_fourcc;
203 /*****************************************************************************
205 *****************************************************************************/
206 static int Open( vlc_object_t *p_this )
208 demux_t *p_demux = (demux_t*)p_this;
209 demux_sys_t *p_sys = NULL;
215 char *psz_uid = NULL;
217 /* Only when selected */
218 if( *p_demux->psz_access == '\0' )
221 NSAutoreleasePool * pool = [[NSAutoreleasePool alloc] init];
223 if( p_demux->psz_location && *p_demux->psz_location )
224 psz_uid = strdup(p_demux->psz_location);
225 msg_Dbg( p_demux, "qtcapture uid = %s", psz_uid );
226 NSString *qtk_currdevice_uid = [[NSString alloc] initWithFormat:@"%s", psz_uid];
229 p_demux->pf_demux = Demux;
230 p_demux->pf_control = Control;
231 p_demux->info.i_update = 0;
232 p_demux->info.i_title = 0;
233 p_demux->info.i_seekpoint = 0;
235 p_demux->p_sys = p_sys = calloc( 1, sizeof( demux_sys_t ) );
239 NSArray *myVideoDevices = [[[QTCaptureDevice inputDevicesWithMediaType:QTMediaTypeVideo] arrayByAddingObjectsFromArray:[QTCaptureDevice inputDevicesWithMediaType:QTMediaTypeMuxed]] retain];
240 if([myVideoDevices count] == 0)
242 dialog_FatalWait( p_demux, _("No Input device found"),
243 _("Your Mac does not seem to be equipped with a suitable input device. "
244 "Please check your connectors and drivers.") );
245 msg_Err( p_demux, "Can't find any Video device" );
250 for(ivideo = 0; ivideo < [myVideoDevices count]; ivideo++){
251 QTCaptureDevice *qtk_device;
252 qtk_device = [myVideoDevices objectAtIndex:ivideo];
253 msg_Dbg( p_demux, "qtcapture %d/%lu %s %s", ivideo, [myVideoDevices count], [[qtk_device localizedDisplayName] UTF8String], [[qtk_device uniqueID] UTF8String]);
254 if([[[qtk_device uniqueID]stringByTrimmingCharactersInSet:[NSCharacterSet whitespaceCharacterSet]] isEqualToString:qtk_currdevice_uid]){
259 memset( &fmt, 0, sizeof( es_format_t ) );
261 QTCaptureDeviceInput * input = nil;
262 NSError *o_returnedError;
263 if( ivideo < [myVideoDevices count] )
264 p_sys->device = [myVideoDevices objectAtIndex:ivideo];
267 /* cannot found designated device, fall back to open default device */
268 msg_Dbg(p_demux, "Cannot find designated uid device as %s, falling back to default.", [qtk_currdevice_uid UTF8String]);
269 p_sys->device = [QTCaptureDevice defaultInputDeviceWithMediaType: QTMediaTypeVideo];
273 dialog_FatalWait( p_demux, _("No Input device found"),
274 _("Your Mac does not seem to be equipped with a suitable input device. "
275 "Please check your connectors and drivers.") );
276 msg_Err( p_demux, "Can't find any Video device" );
281 if( ![p_sys->device open: &o_returnedError] )
283 msg_Err( p_demux, "Unable to open the capture device (%ld)", [o_returnedError code] );
287 if( [p_sys->device isInUseByAnotherApplication] == YES )
289 msg_Err( p_demux, "default capture device is exclusively in use by another application" );
293 input = [[QTCaptureDeviceInput alloc] initWithDevice: p_sys->device];
296 msg_Err( p_demux, "can't create a valid capture input facility" );
300 p_sys->output = [[VLCDecompressedVideoOutput alloc] init];
302 /* Get the formats */
303 NSArray *format_array = [p_sys->device formatDescriptions];
304 QTFormatDescription* camera_format = NULL;
305 for( int k = 0; k < [format_array count]; k++ )
307 camera_format = [format_array objectAtIndex: k];
309 msg_Dbg(p_demux, "localized Format: %s", [[camera_format localizedFormatSummary] UTF8String] );
310 msg_Dbg(p_demux, "format description: %s", [[[camera_format formatDescriptionAttributes] description] UTF8String] );
312 if( [format_array count] )
313 camera_format = [format_array objectAtIndex: 0];
316 int qtchroma = [camera_format formatType];
317 int chroma = VLC_CODEC_UYVY;
319 /* Now we can init */
320 es_format_Init( &fmt, VIDEO_ES, chroma );
322 NSSize encoded_size = [[camera_format attributeForKey:QTFormatDescriptionVideoEncodedPixelsSizeAttribute] sizeValue];
323 NSSize display_size = [[camera_format attributeForKey:QTFormatDescriptionVideoCleanApertureDisplaySizeAttribute] sizeValue];
324 NSSize par_size = [[camera_format attributeForKey:QTFormatDescriptionVideoProductionApertureDisplaySizeAttribute] sizeValue];
326 par_size.width = display_size.width = encoded_size.width
327 = var_CreateGetInteger (p_this, "qtcapture-width");
328 par_size.height = display_size.height = encoded_size.height
329 = var_CreateGetInteger (p_this, "qtcapture-height");
331 fmt.video.i_width = p_sys->width = encoded_size.width;
332 fmt.video.i_height = p_sys->height = encoded_size.height;
333 if( par_size.width != encoded_size.width )
335 fmt.video.i_sar_num = (int64_t)encoded_size.height * par_size.width / encoded_size.width;
336 fmt.video.i_sar_den = encoded_size.width;
339 msg_Dbg(p_demux, "encoded_size %i %i", (int)encoded_size.width, (int)encoded_size.height );
340 msg_Dbg(p_demux, "display_size %i %i", (int)display_size.width, (int)display_size.height );
341 msg_Dbg(p_demux, "PAR size %i %i", (int)par_size.width, (int)par_size.height );
343 [p_sys->output setPixelBufferAttributes: [NSDictionary dictionaryWithObjectsAndKeys:
344 [NSNumber numberWithUnsignedInt:kCVPixelFormatType_422YpCbCr8], (id)kCVPixelBufferPixelFormatTypeKey,
345 [NSNumber numberWithInt: p_sys->height], kCVPixelBufferHeightKey,
346 [NSNumber numberWithInt: p_sys->width], kCVPixelBufferWidthKey,
347 [NSNumber numberWithBool:YES], (id)kCVPixelBufferOpenGLCompatibilityKey,
350 p_sys->session = [[QTCaptureSession alloc] init];
352 bool ret = [p_sys->session addInput:input error: &o_returnedError];
355 msg_Err( p_demux, "default video capture device could not be added to capture session (%ld)", [o_returnedError code] );
359 ret = [p_sys->session addOutput:p_sys->output error: &o_returnedError];
362 msg_Err( p_demux, "output could not be added to capture session (%ld)", [o_returnedError code] );
366 [p_sys->session startRunning];
368 msg_Dbg( p_demux, "added new video es %4.4s %dx%d",
369 (char*)&fmt.i_codec, fmt.video.i_width, fmt.video.i_height );
371 p_sys->p_es_video = es_out_Add( p_demux->out, &fmt );
376 msg_Dbg( p_demux, "QTCapture: We have a video device ready!" );
388 /*****************************************************************************
390 *****************************************************************************/
391 static void Close( vlc_object_t *p_this )
393 NSAutoreleasePool * pool = [[NSAutoreleasePool alloc] init];
395 demux_t *p_demux = (demux_t*)p_this;
396 demux_sys_t *p_sys = p_demux->p_sys;
398 /* Hack: if libvlc was killed, main interface thread was,
399 * and poor QTKit needs it, so don't tell him.
400 * Else we dead lock. */
401 if( vlc_object_alive(p_this->p_libvlc))
403 // Perform this on main thread, as the framework itself will sometimes try to synchronously
404 // work on main thread. And this will create a dead lock.
405 [p_sys->session performSelectorOnMainThread:@selector(stopRunning) withObject:nil waitUntilDone:NO];
406 [p_sys->output performSelectorOnMainThread:@selector(release) withObject:nil waitUntilDone:NO];
407 [p_sys->session performSelectorOnMainThread:@selector(release) withObject:nil waitUntilDone:NO];
415 /*****************************************************************************
417 *****************************************************************************/
418 static int Demux( demux_t *p_demux )
420 demux_sys_t *p_sys = p_demux->p_sys;
423 p_block = block_New( p_demux, p_sys->width *
424 p_sys->height * 2 /* FIXME */ );
427 msg_Err( p_demux, "cannot get block" );
431 NSAutoreleasePool * pool = [[NSAutoreleasePool alloc] init];
433 @synchronized (p_sys->output)
435 p_block->i_pts = [p_sys->output copyCurrentFrameToBuffer: p_block->p_buffer];
438 if( !p_block->i_pts )
440 /* Nothing to display yet, just forget */
441 block_Release( p_block );
447 es_out_Control( p_demux->out, ES_OUT_SET_PCR, p_block->i_pts );
448 es_out_Send( p_demux->out, p_sys->p_es_video, p_block );
454 /*****************************************************************************
456 *****************************************************************************/
457 static int Control( demux_t *p_demux, int i_query, va_list args )
464 /* Special for access_demux */
465 case DEMUX_CAN_PAUSE:
467 case DEMUX_SET_PAUSE_STATE:
468 case DEMUX_CAN_CONTROL_PACE:
469 pb = (bool*)va_arg( args, bool * );
473 case DEMUX_GET_PTS_DELAY:
474 pi64 = (int64_t*)va_arg( args, int64_t * );
475 *pi64 = (int64_t)DEFAULT_PTS_DELAY;