dshow.cpp 76.8 KB
Newer Older
Gildas Bazin's avatar
 
Gildas Bazin committed
1
/*****************************************************************************
2
 * dshow.cpp : DirectShow access module for vlc
Gildas Bazin's avatar
 
Gildas Bazin committed
3
 *****************************************************************************
Rocky Bernstein's avatar
Rocky Bernstein committed
4
 * Copyright (C) 2002, 2003 VideoLAN
5
 * $Id$
Gildas Bazin's avatar
 
Gildas Bazin committed
6
 *
7
 * Author: Gildas Bazin <gbazin@videolan.org>
Gildas Bazin's avatar
 
Gildas Bazin committed
8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
 *****************************************************************************/

/*****************************************************************************
 * Preamble
 *****************************************************************************/
#include <stdlib.h>
#include <stdio.h>
#include <string.h>

#include <vlc/vlc.h>
#include <vlc/input.h>
#include <vlc/vout.h>

#include "filter.h"

Gildas Bazin's avatar
 
Gildas Bazin committed
37 38 39
/*****************************************************************************
 * Access: local prototypes
 *****************************************************************************/
Gildas Bazin's avatar
 
Gildas Bazin committed
40 41
static ssize_t Read          ( input_thread_t *, byte_t *, size_t );
static ssize_t ReadCompressed( input_thread_t *, byte_t *, size_t );
Gildas Bazin's avatar
 
Gildas Bazin committed
42 43 44 45 46 47

static int OpenDevice( input_thread_t *, string, vlc_bool_t );
static IBaseFilter *FindCaptureDevice( vlc_object_t *, string *,
                                       list<string> *, vlc_bool_t );
static AM_MEDIA_TYPE EnumDeviceCaps( vlc_object_t *, IBaseFilter *,
                                     int, int, int, int, int, int );
48
static bool ConnectFilters( vlc_object_t *, IBaseFilter *, CaptureFilter * );
Gildas Bazin's avatar
 
Gildas Bazin committed
49 50 51

static int FindDevicesCallback( vlc_object_t *, char const *,
                                vlc_value_t, vlc_value_t, void * );
52 53
static int ConfigDevicesCallback( vlc_object_t *, char const *,
                                  vlc_value_t, vlc_value_t, void * );
Gildas Bazin's avatar
 
Gildas Bazin committed
54

55 56
static void PropertiesPage( vlc_object_t *, IBaseFilter *,
                            ICaptureGraphBuilder2 *, vlc_bool_t );
Gildas Bazin's avatar
 
Gildas Bazin committed
57

Gildas Bazin's avatar
 
Gildas Bazin committed
58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99
#if 0
    /* Debug only, use this to find out GUIDs */
    unsigned char p_st[];
    UuidToString( (IID *)&IID_IAMBufferNegotiation, &p_st );
    msg_Err( p_input, "BufferNegotiation: %s" , p_st );
#endif

/*
 * header:
 *  fcc  ".dsh"
 *  u32    stream count
 *      fcc "auds"|"vids"       0
 *      fcc codec               4
 *      if vids
 *          u32 width           8
 *          u32 height          12
 *          u32 padding         16
 *      if auds
 *          u32 channels        12
 *          u32 samplerate      8
 *          u32 samplesize      16
 *
 * data:
 *  u32     stream number
 *  u32     data size
 *  u8      data
 */

static void SetDWBE( uint8_t *p, uint32_t dw )
{
    p[0] = (dw >> 24)&0xff;
    p[1] = (dw >> 16)&0xff;
    p[2] = (dw >>  8)&0xff;
    p[3] = (dw      )&0xff;
}

static void SetQWBE( uint8_t *p, uint64_t qw )
{
    SetDWBE( p, (qw >> 32)&0xffffffff );
    SetDWBE( &p[4], qw&0xffffffff );
}

Gildas Bazin's avatar
 
Gildas Bazin committed
100
/*****************************************************************************
101
 * Module descriptor
Gildas Bazin's avatar
 
Gildas Bazin committed
102
 *****************************************************************************/
103 104 105 106 107
static char *ppsz_vdev[] = { "", "none" };
static char *ppsz_vdev_text[] = { N_("Default"), N_("None") };
static char *ppsz_adev[] = { "", "none" };
static char *ppsz_adev_text[] = { N_("Default"), N_("None") };

Gildas Bazin's avatar
 
Gildas Bazin committed
108 109
#define CACHING_TEXT N_("Caching value in ms")
#define CACHING_LONGTEXT N_( \
110
    "Allows you to modify the default caching value for DirectShow streams. " \
Rocky Bernstein's avatar
Rocky Bernstein committed
111
    "This value should be set in milliseconds units." )
112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129
#define VDEV_TEXT N_("Video device name")
#define VDEV_LONGTEXT N_( \
    "You can specify the name of the video device that will be used by the " \
    "DirectShow plugin. If you don't specify anything, the default device " \
    "will be used.")
#define ADEV_TEXT N_("Audio device name")
#define ADEV_LONGTEXT N_( \
    "You can specify the name of the audio device that will be used by the " \
    "DirectShow plugin. If you don't specify anything, the default device " \
    "will be used.")
#define SIZE_TEXT N_("Video size")
#define SIZE_LONGTEXT N_( \
    "You can specify the size of the video that will be displayed by the " \
    "DirectShow plugin. If you don't specify anything the default size for " \
    "your device will be used.")
#define CHROMA_TEXT N_("Video input chroma format")
#define CHROMA_LONGTEXT N_( \
    "Force the DirectShow video input to use a specific chroma format " \
130 131
    "(eg. I420 (default), RV24, etc.)")
#define CONFIG_TEXT N_("Device properties")
Gildas Bazin's avatar
 
Gildas Bazin committed
132
#define CONFIG_LONGTEXT N_( \
133 134
    "Show the properties dialog of the selected device before starting the " \
    "stream.")
Gildas Bazin's avatar
 
Gildas Bazin committed
135

136 137 138 139 140 141
static int  AccessOpen ( vlc_object_t * );
static void AccessClose( vlc_object_t * );

static int  DemuxOpen  ( vlc_object_t * );
static void DemuxClose ( vlc_object_t * );

Gildas Bazin's avatar
 
Gildas Bazin committed
142 143
vlc_module_begin();
    set_description( _("DirectShow input") );
144
    add_integer( "dshow-caching", (mtime_t)(0.2*CLOCK_FREQ) / 1000, NULL,
Gildas Bazin's avatar
 
Gildas Bazin committed
145
                 CACHING_TEXT, CACHING_LONGTEXT, VLC_TRUE );
146

147
    add_string( "dshow-vdev", NULL, NULL, VDEV_TEXT, VDEV_LONGTEXT, VLC_FALSE);
148
        change_string_list( ppsz_vdev, ppsz_vdev_text, FindDevicesCallback );
149 150
        change_action_add( FindDevicesCallback, N_("Refresh list") );
        change_action_add( ConfigDevicesCallback, N_("Configure") );
151

152
    add_string( "dshow-adev", NULL, NULL, ADEV_TEXT, ADEV_LONGTEXT, VLC_FALSE);
153
        change_string_list( ppsz_adev, ppsz_adev_text, FindDevicesCallback );
154 155
        change_action_add( FindDevicesCallback, N_("Refresh list") );
        change_action_add( ConfigDevicesCallback, N_("Configure") );
156

157
    add_string( "dshow-size", NULL, NULL, SIZE_TEXT, SIZE_LONGTEXT, VLC_FALSE);
158

159 160
    add_string( "dshow-chroma", NULL, NULL, CHROMA_TEXT, CHROMA_LONGTEXT,
                VLC_TRUE );
Gildas Bazin's avatar
 
Gildas Bazin committed
161 162

    add_bool( "dshow-config", VLC_FALSE, NULL, CONFIG_TEXT, CONFIG_LONGTEXT,
163
              VLC_FALSE );
Gildas Bazin's avatar
 
Gildas Bazin committed
164

Gildas Bazin's avatar
 
Gildas Bazin committed
165
    add_shortcut( "dshow" );
Gildas Bazin's avatar
 
Gildas Bazin committed
166
    set_capability( "access", 0 );
Gildas Bazin's avatar
 
Gildas Bazin committed
167 168 169 170 171 172 173 174 175 176
    set_callbacks( AccessOpen, AccessClose );

    add_submodule();
    set_description( _("DirectShow demuxer") );
    add_shortcut( "dshow" );
    set_capability( "demux", 200 );
    set_callbacks( DemuxOpen, DemuxClose );

vlc_module_end();

Gildas Bazin's avatar
 
Gildas Bazin committed
177 178 179 180 181 182 183 184 185 186
/****************************************************************************
 * DirectShow elementary stream descriptor
 ****************************************************************************/
typedef struct dshow_stream_t
{
    string          devicename;
    IBaseFilter     *p_device_filter;
    CaptureFilter   *p_capture_filter;
    AM_MEDIA_TYPE   mt;
    int             i_fourcc;
Gildas Bazin's avatar
 
Gildas Bazin committed
187
    vlc_bool_t      b_invert;
Gildas Bazin's avatar
 
Gildas Bazin committed
188 189 190 191 192 193 194 195

    union
    {
      VIDEOINFOHEADER video;
      WAVEFORMATEX    audio;

    } header;

196
    vlc_bool_t      b_pts;
Gildas Bazin's avatar
 
Gildas Bazin committed
197 198 199

} dshow_stream_t;

Gildas Bazin's avatar
 
Gildas Bazin committed
200 201 202
/****************************************************************************
 * Access descriptor declaration
 ****************************************************************************/
203 204 205 206 207 208 209 210 211 212
#define MAX_CROSSBAR_DEPTH 10

typedef struct CrossbarRouteRec {
    IAMCrossbar *pXbar;
    LONG        VideoInputIndex;
    LONG        VideoOutputIndex;
    LONG        AudioInputIndex;
    LONG        AudioOutputIndex;
} CrossbarRoute;

Gildas Bazin's avatar
 
Gildas Bazin committed
213 214
struct access_sys_t
{
215 216 217
    vlc_mutex_t lock;
    vlc_cond_t  wait;

218 219 220 221 222 223
    IFilterGraph           *p_graph;
    ICaptureGraphBuilder2  *p_capture_graph_builder2;
    IMediaControl          *p_control;

    int                     i_crossbar_route_depth;
    CrossbarRoute           crossbar_routes[MAX_CROSSBAR_DEPTH];
Gildas Bazin's avatar
 
Gildas Bazin committed
224 225 226 227

    /* header */
    int     i_header_size;
    int     i_header_pos;
Gildas Bazin's avatar
 
Gildas Bazin committed
228
    uint8_t *p_header;
Gildas Bazin's avatar
 
Gildas Bazin committed
229

Gildas Bazin's avatar
 
Gildas Bazin committed
230
    /* list of elementary streams */
Gildas Bazin's avatar
 
Gildas Bazin committed
231 232 233
    dshow_stream_t **pp_streams;
    int            i_streams;
    int            i_current_stream;
Gildas Bazin's avatar
 
Gildas Bazin committed
234 235 236 237 238

    /* misc properties */
    int            i_width;
    int            i_height;
    int            i_chroma;
Gildas Bazin's avatar
 
Gildas Bazin committed
239
    int            b_audio;
Gildas Bazin's avatar
 
Gildas Bazin committed
240 241
};

242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331
/****************************************************************************
 * DirectShow utility functions
 ****************************************************************************/
static void CreateDirectShowGraph( access_sys_t *p_sys )
{
    p_sys->i_crossbar_route_depth = 0;

    /* Create directshow filter graph */
    if( SUCCEEDED( CoCreateInstance( CLSID_FilterGraph, 0, CLSCTX_INPROC,
                       (REFIID)IID_IFilterGraph, (void **)&p_sys->p_graph) ) )
    {
        /* Create directshow capture graph builder if available */
        if( SUCCEEDED( CoCreateInstance( CLSID_CaptureGraphBuilder2, 0,
                         CLSCTX_INPROC, (REFIID)IID_ICaptureGraphBuilder2,
                         (void **)&p_sys->p_capture_graph_builder2 ) ) )
        {
            p_sys->p_capture_graph_builder2->
                SetFiltergraph((IGraphBuilder *)p_sys->p_graph);
        }

        p_sys->p_graph->QueryInterface( IID_IMediaControl,
                                        (void **)&p_sys->p_control );
    }
}

static void DeleteCrossbarRoutes( access_sys_t *p_sys )
{
    /* Remove crossbar filters from graph */
    for( int i = 0; i < p_sys->i_crossbar_route_depth; i++ )
    {
        p_sys->crossbar_routes[i].pXbar->Release();
    }
    p_sys->i_crossbar_route_depth = 0;
}

static void DeleteDirectShowGraph( access_sys_t *p_sys )
{
    DeleteCrossbarRoutes( p_sys );

    /* Remove filters from graph */
    for( int i = 0; i < p_sys->i_streams; i++ )
    {
        p_sys->p_graph->RemoveFilter( p_sys->pp_streams[i]->p_capture_filter );
        p_sys->p_graph->RemoveFilter( p_sys->pp_streams[i]->p_device_filter );
        p_sys->pp_streams[i]->p_capture_filter->Release();
        p_sys->pp_streams[i]->p_device_filter->Release();
    }

    /* Release directshow objects */
    if( p_sys->p_control )
    {
        p_sys->p_control->Release();
        p_sys->p_control = NULL;
    }
    if( p_sys->p_capture_graph_builder2 )
    {
        p_sys->p_capture_graph_builder2->Release();
        p_sys->p_capture_graph_builder2 = NULL;
    }

    if( p_sys->p_graph )
    {
        p_sys->p_graph->Release();
        p_sys->p_graph = NULL;
    }
}

static void ReleaseDirectShow( input_thread_t *p_input )
{
    msg_Dbg( p_input, "Releasing DirectShow");

    access_sys_t *p_sys = p_input->p_access_data;

    DeleteDirectShowGraph( p_sys );

    /* Uninitialize OLE/COM */
    CoUninitialize();

    free( p_sys->p_header );
    /* Remove filters from graph */
    for( int i = 0; i < p_sys->i_streams; i++ )
    {
        delete p_sys->pp_streams[i];
    }
    free( p_sys->pp_streams );
    free( p_sys );

    p_input->p_access_data = NULL;
}

Gildas Bazin's avatar
 
Gildas Bazin committed
332 333 334 335 336 337 338
/*****************************************************************************
 * Open: open direct show device
 *****************************************************************************/
static int AccessOpen( vlc_object_t *p_this )
{
    input_thread_t *p_input = (input_thread_t *)p_this;
    access_sys_t   *p_sys;
339
    vlc_value_t    val;
Gildas Bazin's avatar
 
Gildas Bazin committed
340

341
    /* Get/parse options and open device(s) */
Gildas Bazin's avatar
 
Gildas Bazin committed
342
    string vdevname, adevname;
343
    int i_width = 0, i_height = 0, i_chroma = 0;
Gildas Bazin's avatar
 
Gildas Bazin committed
344

345 346
    var_Create( p_input, "dshow-config", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );

347 348 349 350
    var_Create( p_input, "dshow-vdev", VLC_VAR_STRING | VLC_VAR_DOINHERIT);
    var_Get( p_input, "dshow-vdev", &val );
    if( val.psz_string ) vdevname = string( val.psz_string );
    if( val.psz_string ) free( val.psz_string );
Gildas Bazin's avatar
 
Gildas Bazin committed
351

352 353 354 355 356 357 358 359
    var_Create( p_input, "dshow-adev", VLC_VAR_STRING | VLC_VAR_DOINHERIT);
    var_Get( p_input, "dshow-adev", &val );
    if( val.psz_string ) adevname = string( val.psz_string );
    if( val.psz_string ) free( val.psz_string );

    var_Create( p_input, "dshow-size", VLC_VAR_STRING | VLC_VAR_DOINHERIT);
    var_Get( p_input, "dshow-size", &val );
    if( val.psz_string && *val.psz_string )
Gildas Bazin's avatar
 
Gildas Bazin committed
360
    {
361
        if( !strcmp( val.psz_string, "subqcif" ) )
Gildas Bazin's avatar
 
Gildas Bazin committed
362
        {
363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390
            i_width  = 128; i_height = 96;
        }
        else if( !strcmp( val.psz_string, "qsif" ) )
        {
            i_width  = 160; i_height = 120;
        }
        else if( !strcmp( val.psz_string, "qcif" ) )
        {
            i_width  = 176; i_height = 144;
        }
        else if( !strcmp( val.psz_string, "sif" ) )
        {
            i_width  = 320; i_height = 240;
        }
        else if( !strcmp( val.psz_string, "cif" ) )
        {
            i_width  = 352; i_height = 288;
        }
        else if( !strcmp( val.psz_string, "vga" ) )
        {
            i_width  = 640; i_height = 480;
        }
        else
        {
            /* Width x Height */
            char *psz_parser;
            i_width = strtol( val.psz_string, &psz_parser, 0 );
            if( *psz_parser == 'x' || *psz_parser == 'X')
Gildas Bazin's avatar
 
Gildas Bazin committed
391
            {
392
                i_height = strtol( psz_parser + 1, &psz_parser, 0 );
Gildas Bazin's avatar
 
Gildas Bazin committed
393
            }
394
            msg_Dbg( p_input, "Width x Height %dx%d", i_width, i_height );
Gildas Bazin's avatar
 
Gildas Bazin committed
395 396
        }
    }
397
    if( val.psz_string ) free( val.psz_string );
Gildas Bazin's avatar
 
Gildas Bazin committed
398

399 400 401 402 403 404 405 406
    var_Create( p_input, "dshow-chroma", VLC_VAR_STRING | VLC_VAR_DOINHERIT);
    var_Get( p_input, "dshow-chroma", &val );
    if( val.psz_string && strlen( val.psz_string ) >= 4 )
    {
        i_chroma = VLC_FOURCC( val.psz_string[0], val.psz_string[1],
                               val.psz_string[2], val.psz_string[3] );
    }
    if( val.psz_string ) free( val.psz_string );
Gildas Bazin's avatar
 
Gildas Bazin committed
407 408 409 410 411 412 413 414 415 416 417 418 419

    p_input->pf_read        = Read;
    p_input->pf_seek        = NULL;
    p_input->pf_set_area    = NULL;
    p_input->pf_set_program = NULL;

    vlc_mutex_lock( &p_input->stream.stream_lock );
    p_input->stream.b_pace_control = 0;
    p_input->stream.b_seekable = 0;
    p_input->stream.p_selected_area->i_size = 0;
    p_input->stream.p_selected_area->i_tell = 0;
    p_input->stream.i_method = INPUT_METHOD_FILE;
    vlc_mutex_unlock( &p_input->stream.stream_lock );
Sam Hocevar's avatar
Sam Hocevar committed
420

421 422 423
    var_Create( p_input, "dshow-caching", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT);
    var_Get( p_input, "dshow-caching", &val );
    p_input->i_pts_delay = val.i_int * 1000;
Gildas Bazin's avatar
 
Gildas Bazin committed
424 425

    /* Initialize OLE/COM */
426
    CoInitialize( 0 );
Gildas Bazin's avatar
 
Gildas Bazin committed
427 428 429 430

    /* create access private data */
    p_input->p_access_data = p_sys =
        (access_sys_t *)malloc( sizeof( access_sys_t ) );
Gildas Bazin's avatar
 
Gildas Bazin committed
431 432 433 434

    /* Initialize some data */
    p_sys->i_streams = 0;
    p_sys->pp_streams = (dshow_stream_t **)malloc( 1 );
Gildas Bazin's avatar
 
Gildas Bazin committed
435 436 437
    p_sys->i_width = i_width;
    p_sys->i_height = i_height;
    p_sys->i_chroma = i_chroma;
Gildas Bazin's avatar
 
Gildas Bazin committed
438
    p_sys->b_audio = VLC_TRUE;
Gildas Bazin's avatar
 
Gildas Bazin committed
439

Gildas Bazin's avatar
 
Gildas Bazin committed
440 441 442 443 444 445
    /* Create header */
    p_sys->i_header_size = 8;
    p_sys->p_header      = (uint8_t *)malloc( p_sys->i_header_size );
    memcpy(  &p_sys->p_header[0], ".dsh", 4 );
    SetDWBE( &p_sys->p_header[4], 1 );
    p_sys->i_header_pos = p_sys->i_header_size;
Gildas Bazin's avatar
 
Gildas Bazin committed
446

447 448 449
    p_sys->p_graph = NULL;
    p_sys->p_capture_graph_builder2 = NULL;
    p_sys->p_control = NULL;
Gildas Bazin's avatar
 
Gildas Bazin committed
450

451 452
    /* Build directshow graph */
    CreateDirectShowGraph( p_sys );
Gildas Bazin's avatar
 
Gildas Bazin committed
453

Gildas Bazin's avatar
 
Gildas Bazin committed
454
    if( OpenDevice( p_input, vdevname, 0 ) != VLC_SUCCESS )
Gildas Bazin's avatar
 
Gildas Bazin committed
455 456 457 458
    {
        msg_Err( p_input, "can't open video");
    }

Gildas Bazin's avatar
 
Gildas Bazin committed
459
    if( p_sys->b_audio && OpenDevice( p_input, adevname, 1 ) != VLC_SUCCESS )
Gildas Bazin's avatar
 
Gildas Bazin committed
460 461 462
    {
        msg_Err( p_input, "can't open audio");
    }
463 464
    
    for( int i = 0; i < p_sys->i_crossbar_route_depth; i++ )
Gildas Bazin's avatar
 
Gildas Bazin committed
465
    {
466 467 468 469 470
        IAMCrossbar *pXbar = p_sys->crossbar_routes[i].pXbar;
        LONG VideoInputIndex = p_sys->crossbar_routes[i].VideoInputIndex;
        LONG VideoOutputIndex = p_sys->crossbar_routes[i].VideoOutputIndex;
        LONG AudioInputIndex = p_sys->crossbar_routes[i].AudioInputIndex;
        LONG AudioOutputIndex = p_sys->crossbar_routes[i].AudioOutputIndex;
Gildas Bazin's avatar
 
Gildas Bazin committed
471

472 473 474 475
        if( SUCCEEDED(pXbar->Route(VideoOutputIndex, VideoInputIndex)) )
        {
            msg_Dbg( p_input, "Crossbar at depth %d, Routed video ouput %d to "
                     "video input %d", i, VideoOutputIndex, VideoInputIndex );
Gildas Bazin's avatar
 
Gildas Bazin committed
476

477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492
            if( AudioOutputIndex != -1 && AudioInputIndex != -1 )
            {
                if( SUCCEEDED( pXbar->Route(AudioOutputIndex,
                                            AudioInputIndex)) )
                {
                    msg_Dbg(p_input, "Crossbar at depth %d, Routed audio "
                            "ouput %d to audio input %d", i,
                            AudioOutputIndex, AudioInputIndex );
                }
            }
        }
    }

    if( !p_sys->i_streams )
    {
        ReleaseDirectShow( p_input );
Gildas Bazin's avatar
 
Gildas Bazin committed
493 494 495
        return VLC_EGENERIC;
    }

Gildas Bazin's avatar
 
Gildas Bazin committed
496 497
    /* Initialize some data */
    p_sys->i_current_stream = 0;
498 499 500 501
    p_input->i_mtu += p_sys->i_header_size + 16 /* data header size */;

    vlc_mutex_init( p_input, &p_sys->lock );
    vlc_cond_init( p_input, &p_sys->wait );
Gildas Bazin's avatar
 
Gildas Bazin committed
502

503 504
    msg_Dbg( p_input, "Playing...");

Gildas Bazin's avatar
 
Gildas Bazin committed
505 506 507
    /* Everything is ready. Let's rock baby */
    p_sys->p_control->Run();

Gildas Bazin's avatar
 
Gildas Bazin committed
508 509 510 511 512 513 514 515 516
    return VLC_SUCCESS;
}

/*****************************************************************************
 * AccessClose: close device
 *****************************************************************************/
static void AccessClose( vlc_object_t *p_this )
{
    input_thread_t *p_input = (input_thread_t *)p_this;
517
    access_sys_t   *p_sys   = p_input->p_access_data;
Gildas Bazin's avatar
 
Gildas Bazin committed
518 519

    /* Stop capturing stuff */
520
    p_sys->p_control->Stop();
Gildas Bazin's avatar
 
Gildas Bazin committed
521

522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545
    ReleaseDirectShow(p_input);
}

/****************************************************************************
 * RouteCrossbars (Does not AddRef the returned *Pin)
 ****************************************************************************/
static HRESULT GetCrossbarIPinAtIndex( IAMCrossbar *pXbar, LONG PinIndex,
                                       BOOL IsInputPin, IPin ** ppPin )
{
    LONG         cntInPins, cntOutPins;
    IPin        *pP = 0;
    IBaseFilter *pFilter = NULL;
    IEnumPins   *pins=0;
    ULONG        n;

    if( !pXbar || !ppPin ) return E_POINTER;

    *ppPin = 0;

    if( S_OK != pXbar->get_PinCounts(&cntOutPins, &cntInPins) ) return E_FAIL;

    LONG TrueIndex = IsInputPin ? PinIndex : PinIndex + cntInPins;

    if( pXbar->QueryInterface(IID_IBaseFilter, (void **)&pFilter) == S_OK )
Gildas Bazin's avatar
 
Gildas Bazin committed
546
    {
547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562
        if( SUCCEEDED(pFilter->EnumPins(&pins)) ) 
        {
            LONG i = 0;
            while( pins->Next(1, &pP, &n) == S_OK ) 
            {
                pP->Release();
                if( i == TrueIndex ) 
                {
                    *ppPin = pP;
                    break;
                }
                i++;
            }
            pins->Release();
        }
        pFilter->Release();
Gildas Bazin's avatar
 
Gildas Bazin committed
563
    }
Gildas Bazin's avatar
 
Gildas Bazin committed
564

565 566
    return *ppPin ? S_OK : E_FAIL; 
}
Gildas Bazin's avatar
 
Gildas Bazin committed
567

568 569 570 571 572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713
/****************************************************************************
 * GetCrossbarIndexFromIPin: Find corresponding index of an IPin on a crossbar
 ****************************************************************************/
static HRESULT GetCrossbarIndexFromIPin( IAMCrossbar * pXbar, LONG * PinIndex,
                                         BOOL IsInputPin, IPin * pPin )
{
    LONG         cntInPins, cntOutPins;
    IPin        *pP = 0;
    IBaseFilter *pFilter = NULL;
    IEnumPins   *pins = 0;
    ULONG        n;
    BOOL         fOK = FALSE;

    if(!pXbar || !PinIndex || !pPin )
        return E_POINTER;

    if( S_OK != pXbar->get_PinCounts(&cntOutPins, &cntInPins) )
        return E_FAIL;

    if( pXbar->QueryInterface(IID_IBaseFilter, (void **)&pFilter) == S_OK )
    {
        if( SUCCEEDED(pFilter->EnumPins(&pins)) )
        {
            LONG i=0;

            while( pins->Next(1, &pP, &n) == S_OK )
            {
                pP->Release();
                if( pPin == pP )
                {
                    *PinIndex = IsInputPin ? i : i - cntInPins;
                    fOK = TRUE;
                    break;
                }
                i++;
            }
            pins->Release();
        }
        pFilter->Release();
    }

    return fOK ? S_OK : E_FAIL; 
}

/****************************************************************************
 * FindCrossbarRoutes
 ****************************************************************************/
static HRESULT FindCrossbarRoutes( vlc_object_t *p_this, IPin *p_input_pin,
                                   LONG physicalType, int depth = 0 )
{
    access_sys_t *p_sys = ((input_thread_t *)p_this)->p_access_data;
    HRESULT result = S_FALSE;

    IPin *p_output_pin;
    if( FAILED(p_input_pin->ConnectedTo(&p_output_pin)) ) return S_FALSE;

    // It is connected, so now find out if the filter supports IAMCrossbar
    PIN_INFO pinInfo;
    if( FAILED(p_output_pin->QueryPinInfo(&pinInfo)) ||
        PINDIR_OUTPUT != pinInfo.dir )
    {
        p_output_pin->Release ();
        return S_FALSE;
    }

    IAMCrossbar *pXbar=0;
    if( FAILED(pinInfo.pFilter->QueryInterface(IID_IAMCrossbar,
                                               (void **)&pXbar)) )
    {
        pinInfo.pFilter->Release();
        p_output_pin->Release ();
        return S_FALSE;
    }

    LONG inputPinCount, outputPinCount;
    if( FAILED(pXbar->get_PinCounts(&outputPinCount, &inputPinCount)) )
    {
        pXbar->Release();
        pinInfo.pFilter->Release();
        p_output_pin->Release ();
        return S_FALSE;
    }

    LONG inputPinIndexRelated, outputPinIndexRelated;
    LONG inputPinPhysicalType, outputPinPhysicalType;
    LONG inputPinIndex, outputPinIndex;
    if( FAILED(GetCrossbarIndexFromIPin( pXbar, &outputPinIndex,
                                         FALSE, p_output_pin )) ||
        FAILED(pXbar->get_CrossbarPinInfo( FALSE, outputPinIndex,
                                           &outputPinIndexRelated,
                                           &outputPinPhysicalType )) )
    {
        pXbar->Release();
        pinInfo.pFilter->Release();
        p_output_pin->Release ();
        return S_FALSE;
    }

    //
    // for all input pins
    //
    for( inputPinIndex = 0; S_OK != result && inputPinIndex < inputPinCount;
         inputPinIndex++ ) 
    {
        if( FAILED(pXbar->get_CrossbarPinInfo( TRUE,  inputPinIndex,
                &inputPinIndexRelated, &inputPinPhysicalType )) ) continue;
   
        // Is the pin a video pin?
        if( inputPinPhysicalType != physicalType ) continue;

        // Can we route it?
        if( FAILED(pXbar->CanRoute(outputPinIndex, inputPinIndex)) ) continue;

        IPin *pPin;
        if( FAILED(GetCrossbarIPinAtIndex( pXbar, inputPinIndex,
                                           TRUE, &pPin)) ) continue;

        result = FindCrossbarRoutes( p_this, pPin, physicalType, depth+1 );
        if( S_OK == result || (S_FALSE == result &&
              physicalType == inputPinPhysicalType &&
              (p_sys->i_crossbar_route_depth = depth+1) < MAX_CROSSBAR_DEPTH) )
        {
            // hold on crossbar
            pXbar->AddRef();

            // remember crossbar route
            p_sys->crossbar_routes[depth].pXbar = pXbar;
            p_sys->crossbar_routes[depth].VideoInputIndex = inputPinIndex;
            p_sys->crossbar_routes[depth].VideoOutputIndex = outputPinIndex;
            p_sys->crossbar_routes[depth].AudioInputIndex = inputPinIndexRelated;
            p_sys->crossbar_routes[depth].AudioOutputIndex = outputPinIndexRelated;

            msg_Dbg( p_this, "Crossbar at depth %d, Found Route For ouput %ld "
                     "(type %ld) to input %d (type %ld)", depth,
                     outputPinIndex, outputPinPhysicalType, inputPinIndex,
                     inputPinPhysicalType );

            result = S_OK;
        }
    }

    pXbar->Release();
    pinInfo.pFilter->Release();
    p_output_pin->Release ();

    return result;
Gildas Bazin's avatar
 
Gildas Bazin committed
714 715 716 717 718
}

/****************************************************************************
 * ConnectFilters
 ****************************************************************************/
719 720
static bool ConnectFilters( vlc_object_t *p_this, IBaseFilter *p_filter,
                            CaptureFilter *p_capture_filter )
Gildas Bazin's avatar
 
Gildas Bazin committed
721
{
722 723
    access_sys_t *p_sys = ((input_thread_t *)p_this)->p_access_data;
    CapturePin *p_input_pin = p_capture_filter->CustomGetPin();
Gildas Bazin's avatar
 
Gildas Bazin committed
724

725
    AM_MEDIA_TYPE mediaType = p_input_pin->CustomGetMediaType();
Gildas Bazin's avatar
 
Gildas Bazin committed
726

727
    if( p_sys->p_capture_graph_builder2 )
Gildas Bazin's avatar
 
Gildas Bazin committed
728
    {
729 730 731 732 733 734 735
        if( FAILED(p_sys->p_capture_graph_builder2->
                     RenderStream( &PIN_CATEGORY_CAPTURE, &mediaType.majortype,
                                   p_filter, NULL,
                                   (IBaseFilter *)p_capture_filter )) )
        {
            return false;
        }
736

737 738 739 740 741
        // Sort out all the possible video inputs
        // The class needs to be given the capture filters ANALOGVIDEO input pin
        IEnumPins *pins = 0;
        if( mediaType.majortype == MEDIATYPE_Video &&
            SUCCEEDED(p_filter->EnumPins(&pins)) )
Gildas Bazin's avatar
 
Gildas Bazin committed
742
        {
743 744 745 746 747 748 749 750 751 752 753 754 755 756 757 758 759 760 761 762 763 764 765 766 767 768 769 770 771 772 773 774 775 776 777 778 779 780 781
            IPin        *pP = 0;
            ULONG        n;
            PIN_INFO     pinInfo;
            BOOL         Found = FALSE;
            IKsPropertySet *pKs=0;
            GUID guid;
            DWORD dw;

            while( !Found && (S_OK == pins->Next(1, &pP, &n)) )
            {
                if(S_OK == pP->QueryPinInfo(&pinInfo))
                {
                    if(pinInfo.dir == PINDIR_INPUT)
                    {
                        // is this pin an ANALOGVIDEOIN input pin?
                        if( pP->QueryInterface(IID_IKsPropertySet,
                                               (void **)&pKs) == S_OK )
                        {
                            if( pKs->Get(AMPROPSETID_Pin,
                                         AMPROPERTY_PIN_CATEGORY, NULL, 0,
                                         &guid, sizeof(GUID), &dw) == S_OK )
                            {
                                if( guid == PIN_CATEGORY_ANALOGVIDEOIN )
                                {
                                    // recursively search crossbar routes
                                    FindCrossbarRoutes( p_this, pP,
                                                        PhysConn_Video_Tuner );
                                    // found it
                                    Found = TRUE;
                                }
                            }
                            pKs->Release();
                        }
                    }
                    pinInfo.pFilter->Release();
                }
                pP->Release();
            }
            pins->Release();
Gildas Bazin's avatar
 
Gildas Bazin committed
782
        }
783
        return true;
Gildas Bazin's avatar
 
Gildas Bazin committed
784
    }
785 786 787 788
    else
    {
        IEnumPins *p_enumpins;
        IPin *p_pin;
Gildas Bazin's avatar
 
Gildas Bazin committed
789

790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807 808 809 810
        if( S_OK != p_filter->EnumPins( &p_enumpins ) ) return false;

        while( S_OK == p_enumpins->Next( 1, &p_pin, NULL ) )
        {
            PIN_DIRECTION pin_dir;
            p_pin->QueryDirection( &pin_dir );

            if( pin_dir == PINDIR_OUTPUT &&
                p_sys->p_graph->ConnectDirect( p_pin, (IPin *)p_input_pin,
                                               0 ) == S_OK )
            {
                p_pin->Release();
                p_enumpins->Release();
                return true;
            }
            p_pin->Release();
        }

        p_enumpins->Release();
        return false;
    }
Gildas Bazin's avatar
 
Gildas Bazin committed
811 812
}

Gildas Bazin's avatar
 
Gildas Bazin committed
813 814
static int OpenDevice( input_thread_t *p_input, string devicename,
                       vlc_bool_t b_audio )
Gildas Bazin's avatar
 
Gildas Bazin committed
815 816
{
    access_sys_t *p_sys = p_input->p_access_data;
817 818 819 820 821 822 823 824 825 826 827

    /* See if device is already opened */
    for( int i = 0; i < p_sys->i_streams; i++ )
    {
        if( p_sys->pp_streams[i]->devicename == devicename )
        {
            /* Already opened */
            return VLC_SUCCESS;
        }
    }

Gildas Bazin's avatar
 
Gildas Bazin committed
828 829
    list<string> list_devices;

830
    /* Enumerate devices and display their names */
Gildas Bazin's avatar
 
Gildas Bazin committed
831
    FindCaptureDevice( (vlc_object_t *)p_input, NULL, &list_devices, b_audio );
Gildas Bazin's avatar
 
Gildas Bazin committed
832

833 834 835
    if( !list_devices.size() )
        return VLC_EGENERIC;

Gildas Bazin's avatar
 
Gildas Bazin committed
836 837
    list<string>::iterator iter;
    for( iter = list_devices.begin(); iter != list_devices.end(); iter++ )
Gildas Bazin's avatar
 
Gildas Bazin committed
838
        msg_Dbg( p_input, "found device: %s", iter->c_str() );
Gildas Bazin's avatar
 
Gildas Bazin committed
839 840 841 842 843 844 845 846

    /* If no device name was specified, pick the 1st one */
    if( devicename.size() == 0 )
    {
        devicename = *list_devices.begin();
    }

    // Use the system device enumerator and class enumerator to find
Gildas Bazin's avatar
 
Gildas Bazin committed
847 848 849 850 851 852 853 854 855 856 857
    // a capture/preview device, such as a desktop USB video camera.
    IBaseFilter *p_device_filter =
        FindCaptureDevice( (vlc_object_t *)p_input, &devicename,
                           NULL, b_audio );
    if( p_device_filter )
        msg_Dbg( p_input, "using device: %s", devicename.c_str() );
    else
    {
        msg_Err( p_input, "can't use device: %s", devicename.c_str() );
        return VLC_EGENERIC;
    }
Gildas Bazin's avatar
 
Gildas Bazin committed
858

Gildas Bazin's avatar
 
Gildas Bazin committed
859
    AM_MEDIA_TYPE media_type =
860 861 862
        EnumDeviceCaps( (vlc_object_t *)p_input, p_device_filter,
                        p_sys->i_chroma, p_sys->i_width, p_sys->i_height,
                        0, 0, 0 );
Gildas Bazin's avatar
 
Gildas Bazin committed
863

Gildas Bazin's avatar
 
Gildas Bazin committed
864
    /* Create and add our capture filter */
Gildas Bazin's avatar
 
Gildas Bazin committed
865
    CaptureFilter *p_capture_filter = new CaptureFilter( p_input, media_type );
Gildas Bazin's avatar
 
Gildas Bazin committed
866
    p_sys->p_graph->AddFilter( p_capture_filter, 0 );
Gildas Bazin's avatar
 
Gildas Bazin committed
867 868 869

    /* Add the device filter to the graph (seems necessary with VfW before
     * accessing pin attributes). */
Gildas Bazin's avatar
 
Gildas Bazin committed
870
    p_sys->p_graph->AddFilter( p_device_filter, 0 );
Gildas Bazin's avatar
 
Gildas Bazin committed
871

Gildas Bazin's avatar
 
Gildas Bazin committed
872
    /* Attempt to connect one of this device's capture output pins */
Gildas Bazin's avatar
 
Gildas Bazin committed
873
    msg_Dbg( p_input, "connecting filters" );
874 875
    if( ConnectFilters( VLC_OBJECT(p_input), p_device_filter,
                        p_capture_filter ) )
Gildas Bazin's avatar
 
Gildas Bazin committed
876 877
    {
        /* Success */
878 879
        msg_Dbg( p_input, "filters connected successfully !" );

Gildas Bazin's avatar
 
Gildas Bazin committed
880
        dshow_stream_t dshow_stream;
Gildas Bazin's avatar
 
Gildas Bazin committed
881
        dshow_stream.b_invert = VLC_FALSE;
882
        dshow_stream.b_pts = VLC_FALSE;
883 884 885 886 887 888 889 890 891 892 893 894 895 896 897
        dshow_stream.mt =
            p_capture_filter->CustomGetPin()->CustomGetMediaType();

        /* Show properties. Done here so the VLC stream is setup with the
         * proper parameters. */
        vlc_value_t val;
        var_Get( p_input, "dshow-config", &val );
        if( val.i_int )
        {
            PropertiesPage( VLC_OBJECT(p_input), p_device_filter,
                            p_sys->p_capture_graph_builder2,
                            dshow_stream.mt.majortype == MEDIATYPE_Audio ||
                            dshow_stream.mt.formattype == FORMAT_WaveFormatEx);
        }

Gildas Bazin's avatar
 
Gildas Bazin committed
898 899
        dshow_stream.mt =
            p_capture_filter->CustomGetPin()->CustomGetMediaType();
Gildas Bazin's avatar
 
Gildas Bazin committed
900

Gildas Bazin's avatar
 
Gildas Bazin committed
901
        if( dshow_stream.mt.majortype == MEDIATYPE_Video )
Gildas Bazin's avatar
 
Gildas Bazin committed
902
        {
Gildas Bazin's avatar
 
Gildas Bazin committed
903 904
            msg_Dbg( p_input, "MEDIATYPE_Video");

Gildas Bazin's avatar
 
Gildas Bazin committed
905 906 907 908 909
            /* Packed RGB formats */
            if( dshow_stream.mt.subtype == MEDIASUBTYPE_RGB1 )
                dshow_stream.i_fourcc = VLC_FOURCC( 'R', 'G', 'B', '1' );
            if( dshow_stream.mt.subtype == MEDIASUBTYPE_RGB4 )
                dshow_stream.i_fourcc = VLC_FOURCC( 'R', 'G', 'B', '4' );
Gildas Bazin's avatar
 
Gildas Bazin committed
910
            if( dshow_stream.mt.subtype == MEDIASUBTYPE_RGB8 )
Gildas Bazin's avatar
 
Gildas Bazin committed
911
                dshow_stream.i_fourcc = VLC_FOURCC( 'R', 'G', 'B', '8' );
Gildas Bazin's avatar
 
Gildas Bazin committed
912 913 914 915 916 917 918 919 920 921
            else if( dshow_stream.mt.subtype == MEDIASUBTYPE_RGB555 )
                dshow_stream.i_fourcc = VLC_FOURCC( 'R', 'V', '1', '5' );
            else if( dshow_stream.mt.subtype == MEDIASUBTYPE_RGB565 )
                dshow_stream.i_fourcc = VLC_FOURCC( 'R', 'V', '1', '6' );
            else if( dshow_stream.mt.subtype == MEDIASUBTYPE_RGB24 )
                dshow_stream.i_fourcc = VLC_FOURCC( 'R', 'V', '2', '4' );
            else if( dshow_stream.mt.subtype == MEDIASUBTYPE_RGB32 )
                dshow_stream.i_fourcc = VLC_FOURCC( 'R', 'V', '3', '2' );
            else if( dshow_stream.mt.subtype == MEDIASUBTYPE_ARGB32 )
                dshow_stream.i_fourcc = VLC_FOURCC( 'R', 'G', 'B', 'A' );
Gildas Bazin's avatar
 
Gildas Bazin committed
922 923 924 925

            /* Packed YUV formats */
            else if( dshow_stream.mt.subtype == MEDIASUBTYPE_YVYU )
                dshow_stream.i_fourcc = VLC_FOURCC( 'Y', 'V', 'Y', 'U' );
Gildas Bazin's avatar
 
Gildas Bazin committed
926 927 928 929
            else if( dshow_stream.mt.subtype == MEDIASUBTYPE_YUYV )
                dshow_stream.i_fourcc = VLC_FOURCC( 'Y', 'U', 'Y', 'V' );
            else if( dshow_stream.mt.subtype == MEDIASUBTYPE_Y411 )
                dshow_stream.i_fourcc = VLC_FOURCC( 'I', '4', '1', 'N' );
Gildas Bazin's avatar
 
Gildas Bazin committed
930 931 932 933 934 935 936 937 938
            else if( dshow_stream.mt.subtype == MEDIASUBTYPE_Y211 )
                dshow_stream.i_fourcc = VLC_FOURCC( 'Y', '2', '1', '1' );
            else if( dshow_stream.mt.subtype == MEDIASUBTYPE_YUY2 ||
                     dshow_stream.mt.subtype == MEDIASUBTYPE_UYVY )
                dshow_stream.i_fourcc = VLC_FOURCC( 'Y', 'U', 'Y', '2' );

            /* Planar YUV formats */
            else if( dshow_stream.mt.subtype == MEDIASUBTYPE_I420 )
                dshow_stream.i_fourcc = VLC_FOURCC( 'I', '4', '2', '0' );
Gildas Bazin's avatar
 
Gildas Bazin committed
939 940
            else if( dshow_stream.mt.subtype == MEDIASUBTYPE_Y41P )
                dshow_stream.i_fourcc = VLC_FOURCC( 'I', '4', '1', '1' );
Gildas Bazin's avatar
 
Gildas Bazin committed
941 942
            else if( dshow_stream.mt.subtype == MEDIASUBTYPE_YV12 ||
                     dshow_stream.mt.subtype == MEDIASUBTYPE_IYUV )
Gildas Bazin's avatar
 
Gildas Bazin committed
943
                dshow_stream.i_fourcc = VLC_FOURCC( 'Y', 'V', '1', '2' );
Gildas Bazin's avatar
 
Gildas Bazin committed
944 945 946
            else if( dshow_stream.mt.subtype == MEDIASUBTYPE_YVU9 )
                dshow_stream.i_fourcc = VLC_FOURCC( 'Y', 'V', 'U', '9' );

Gildas Bazin's avatar
 
Gildas Bazin committed
947 948 949 950 951 952 953 954
            /* DV formats */
            else if( dshow_stream.mt.subtype == MEDIASUBTYPE_dvsl )
                dshow_stream.i_fourcc = VLC_FOURCC( 'd', 'v', 's', 'l' );
            else if( dshow_stream.mt.subtype == MEDIASUBTYPE_dvsd )
                dshow_stream.i_fourcc = VLC_FOURCC( 'd', 'v', 's', 'd' );
            else if( dshow_stream.mt.subtype == MEDIASUBTYPE_dvhd )
                dshow_stream.i_fourcc = VLC_FOURCC( 'd', 'v', 'h', 'd' );

Gildas Bazin's avatar
 
Gildas Bazin committed
955 956 957 958
            /* MPEG video formats */
            else if( dshow_stream.mt.subtype == MEDIASUBTYPE_MPEG2_VIDEO )
                dshow_stream.i_fourcc = VLC_FOURCC( 'm', 'p', '2', 'v' );

Gildas Bazin's avatar
 
Gildas Bazin committed
959 960 961 962 963
            else goto fail;

            dshow_stream.header.video =
                *(VIDEOINFOHEADER *)dshow_stream.mt.pbFormat;

Gildas Bazin's avatar
 
Gildas Bazin committed
964 965 966
            int i_height = dshow_stream.header.video.bmiHeader.biHeight;

            /* Check if the image is inverted (bottom to top) */
Gildas Bazin's avatar
 
Gildas Bazin committed
967 968 969 970
            if( dshow_stream.i_fourcc == VLC_FOURCC( 'R', 'G', 'B', '1' ) ||
                dshow_stream.i_fourcc == VLC_FOURCC( 'R', 'G', 'B', '4' ) ||
                dshow_stream.i_fourcc == VLC_FOURCC( 'R', 'G', 'B', '8' ) ||
                dshow_stream.i_fourcc == VLC_FOURCC( 'R', 'V', '1', '5' ) ||
Gildas Bazin's avatar
 
Gildas Bazin committed
971 972 973 974 975 976 977 978 979
                dshow_stream.i_fourcc == VLC_FOURCC( 'R', 'V', '1', '6' ) ||
                dshow_stream.i_fourcc == VLC_FOURCC( 'R', 'V', '2', '4' ) ||
                dshow_stream.i_fourcc == VLC_FOURCC( 'R', 'V', '3', '2' ) ||
                dshow_stream.i_fourcc == VLC_FOURCC( 'R', 'G', 'B', 'A' ) )
            {
                if( i_height > 0 ) dshow_stream.b_invert = VLC_TRUE;
                else i_height = - i_height;
            }

Gildas Bazin's avatar
 
Gildas Bazin committed
980 981 982 983 984
            /* Check if we are dealing with a DV stream */
            if( dshow_stream.i_fourcc == VLC_FOURCC( 'd', 'v', 's', 'l' ) ||
                dshow_stream.i_fourcc == VLC_FOURCC( 'd', 'v', 's', 'd' ) ||
                dshow_stream.i_fourcc == VLC_FOURCC( 'd', 'v', 'h', 'd' ) )
            {
Gildas Bazin's avatar
 
Gildas Bazin committed
985
                p_input->pf_read = ReadCompressed;
Gildas Bazin's avatar
 
Gildas Bazin committed
986 987 988 989
                if( !p_input->psz_demux || !*p_input->psz_demux )
                {
                    p_input->psz_demux = "rawdv";
                }
Gildas Bazin's avatar
 
Gildas Bazin committed
990
                p_sys->b_audio = VLC_FALSE;
Gildas Bazin's avatar
 
Gildas Bazin committed
991 992
            }

Gildas Bazin's avatar
 
Gildas Bazin committed
993 994 995 996 997 998 999 1000 1001 1002
            /* Check if we are dealing with an MPEG video stream */
            if( dshow_stream.i_fourcc == VLC_FOURCC( 'm', 'p', '2', 'v' ) )
            {
                p_input->pf_read = ReadCompressed;
                if( !p_input->psz_demux || !*p_input->psz_demux )
                {
                    p_input->psz_demux = "mpgv";
                }
                p_sys->b_audio = VLC_FALSE;
            }
Gildas Bazin's avatar
 
Gildas Bazin committed
1003

Gildas Bazin's avatar
 
Gildas Bazin committed
1004 1005 1006 1007 1008 1009 1010 1011 1012
            /* Add video stream to header */
            p_sys->i_header_size += 20;
            p_sys->p_header = (uint8_t *)realloc( p_sys->p_header,
                                                  p_sys->i_header_size );
            memcpy(  &p_sys->p_header[p_sys->i_header_pos], "vids", 4 );
            memcpy(  &p_sys->p_header[p_sys->i_header_pos + 4],
                     &dshow_stream.i_fourcc, 4 );
            SetDWBE( &p_sys->p_header[p_sys->i_header_pos + 8],
                     dshow_stream.header.video.bmiHeader.biWidth );
Gildas Bazin's avatar
 
Gildas Bazin committed
1013
            SetDWBE( &p_sys->p_header[p_sys->i_header_pos + 12], i_height );
Gildas Bazin's avatar
 
Gildas Bazin committed
1014 1015
            SetDWBE( &p_sys->p_header[p_sys->i_header_pos + 16], 0 );
            p_sys->i_header_pos = p_sys->i_header_size;
1016 1017 1018

            /* Greatly simplifies the reading routine */
            int i_mtu = dshow_stream.header.video.bmiHeader.biWidth *
Gildas Bazin's avatar
 
Gildas Bazin committed
1019 1020
                i_height * 4;
            p_input->i_mtu = __MAX( p_input->i_mtu, (unsigned int)i_mtu );
Gildas Bazin's avatar
 
Gildas Bazin committed
1021 1022
        }

Gildas Bazin's avatar
 
Gildas Bazin committed
1023 1024 1025 1026 1027 1028 1029 1030 1031 1032 1033 1034 1035 1036 1037 1038 1039 1040 1041 1042 1043 1044 1045 1046 1047 1048 1049 1050
        else if( dshow_stream.mt.majortype == MEDIATYPE_Audio &&
                 dshow_stream.mt.formattype == FORMAT_WaveFormatEx )
        {
            msg_Dbg( p_input, "MEDIATYPE_Audio");

            if( dshow_stream.mt.subtype == MEDIASUBTYPE_PCM )
                dshow_stream.i_fourcc = VLC_FOURCC( 'a', 'r', 'a', 'w' );
            else if( dshow_stream.mt.subtype == MEDIASUBTYPE_IEEE_FLOAT )
                dshow_stream.i_fourcc = VLC_FOURCC( 'f', 'l', '3', '2' );
            else goto fail;

            dshow_stream.header.audio =
                *(WAVEFORMATEX *)dshow_stream.mt.pbFormat;

            /* Add audio stream to header */
            p_sys->i_header_size += 20;
            p_sys->p_header = (uint8_t *)realloc( p_sys->p_header,
                                                  p_sys->i_header_size );
            memcpy(  &p_sys->p_header[p_sys->i_header_pos], "auds", 4 );
            memcpy(  &p_sys->p_header[p_sys->i_header_pos + 4],
                     &dshow_stream.i_fourcc, 4 );
            SetDWBE( &p_sys->p_header[p_sys->i_header_pos + 8],
                     dshow_stream.header.audio.nChannels );
            SetDWBE( &p_sys->p_header[p_sys->i_header_pos + 12],
                     dshow_stream.header.audio.nSamplesPerSec );
            SetDWBE( &p_sys->p_header[p_sys->i_header_pos + 16],
                     dshow_stream.header.audio.wBitsPerSample );
            p_sys->i_header_pos = p_sys->i_header_size;
1051 1052 1053 1054 1055 1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068 1069 1070 1071 1072 1073 1074

            /* Greatly simplifies the reading routine */
            IAMBufferNegotiation *p_ambuf;
            IPin *p_pin;
            int i_mtu;

            p_capture_filter->CustomGetPin()->ConnectedTo( &p_pin );
            if( SUCCEEDED( p_pin->QueryInterface(
                  IID_IAMBufferNegotiation, (void **)&p_ambuf ) ) )
            {
                ALLOCATOR_PROPERTIES AllocProp;
                memset( &AllocProp, 0, sizeof( ALLOCATOR_PROPERTIES ) );
                p_ambuf->GetAllocatorProperties( &AllocProp );
                p_ambuf->Release();
                i_mtu = AllocProp.cbBuffer;
            }
            else
            {
                /* Worst case */
                i_mtu = dshow_stream.header.audio.nSamplesPerSec *
                        dshow_stream.header.audio.nChannels *
                        dshow_stream.header.audio.wBitsPerSample / 8;
            }
            p_pin->Release();
Gildas Bazin's avatar
 
Gildas Bazin committed
1075
            p_input->i_mtu = __MAX( p_input->i_mtu, (unsigned int)i_mtu );
Gildas Bazin's avatar
 
Gildas Bazin committed
1076
        }
Gildas Bazin's avatar
 
Gildas Bazin committed
1077 1078 1079 1080 1081 1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092 1093 1094 1095 1096 1097 1098 1099 1100 1101 1102 1103 1104

        else if( dshow_stream.mt.majortype == MEDIATYPE_Stream )
        {
            msg_Dbg( p_input, "MEDIATYPE_Stream" );

            if( dshow_stream.mt.subtype == MEDIASUBTYPE_MPEG2_PROGRAM )
                dshow_stream.i_fourcc = VLC_FOURCC( 'm', 'p', '2', 'p' );
            else if( dshow_stream.mt.subtype == MEDIASUBTYPE_MPEG2_TRANSPORT )
                dshow_stream.i_fourcc = VLC_FOURCC( 'm', 'p', '2', 't' );

            msg_Dbg( p_input, "selected stream pin accepts format: %4.4s",
                     (char *)&dshow_stream.i_fourcc);

            p_sys->b_audio = VLC_FALSE;
            p_sys->i_header_size = 0;
            p_sys->i_header_pos = 0;
            p_input->i_mtu = INPUT_DEFAULT_BUFSIZE;

            p_input->pf_read = ReadCompressed;
            p_input->pf_set_program = input_SetProgram;
        }

        else
        {
            msg_Dbg( p_input, "unknown stream majortype" );
            goto fail;
        }

Gildas Bazin's avatar
 
Gildas Bazin committed
1105 1106 1107
        /* Add directshow elementary stream to our list */
        dshow_stream.p_device_filter = p_device_filter;
        dshow_stream.p_capture_filter = p_capture_filter;
Gildas Bazin's avatar
 
Gildas Bazin committed
1108

Gildas Bazin's avatar
 
Gildas Bazin committed
1109 1110 1111 1112 1113 1114 1115
        p_sys->pp_streams =
            (dshow_stream_t **)realloc( p_sys->pp_streams,
                                        sizeof(dshow_stream_t *)
                                        * (p_sys->i_streams + 1) );
        p_sys->pp_streams[p_sys->i_streams] = new dshow_stream_t;
        *p_sys->pp_streams[p_sys->i_streams++] = dshow_stream;
        SetDWBE( &p_sys->p_header[4], (uint32_t)p_sys->i_streams );
Gildas Bazin's avatar
 
Gildas Bazin committed
1116 1117 1118 1119

        return VLC_SUCCESS;
    }

Gildas Bazin's avatar
 
Gildas Bazin committed
1120
 fail:
Gildas Bazin's avatar
 
Gildas Bazin committed
1121
    /* Remove filters from graph */
Gildas Bazin's avatar
 
Gildas Bazin committed
1122 1123
    p_sys->p_graph->RemoveFilter( p_device_filter );
    p_sys->p_graph->RemoveFilter( p_capture_filter );
Gildas Bazin's avatar
 
Gildas Bazin committed
1124 1125

    /* Release objects */
Gildas Bazin's avatar
 
Gildas Bazin committed
1126 1127
    p_device_filter->Release();
    p_capture_filter->Release();
Gildas Bazin's avatar
 
Gildas Bazin committed
1128 1129 1130 1131 1132 1133

    return VLC_EGENERIC;
}

static IBaseFilter *
FindCaptureDevice( vlc_object_t *p_this, string *p_devicename,
Gildas Bazin's avatar
 
Gildas Bazin committed
1134
                   list<string> *p_listdevices, vlc_bool_t b_audio )
Gildas Bazin's avatar
 
Gildas Bazin committed
1135
{
Gildas Bazin's avatar
 
Gildas Bazin committed
1136 1137 1138
    IBaseFilter *p_base_filter = NULL;
    IMoniker *p_moniker = NULL;
    ULONG i_fetched;
Gildas Bazin's avatar
 
Gildas Bazin committed
1139 1140 1141
    HRESULT hr;

    /* Create the system device enumerator */
Gildas Bazin's avatar
 
Gildas Bazin committed
1142
    ICreateDevEnum *p_dev_enum = NULL;
Gildas Bazin's avatar
 
Gildas Bazin committed
1143 1144

    hr = CoCreateInstance( CLSID_SystemDeviceEnum, NULL, CLSCTX_INPROC,
Gildas Bazin's avatar
 
Gildas Bazin committed
1145
                           IID_ICreateDevEnum, (void **)&p_dev_enum );
Gildas Bazin's avatar
 
Gildas Bazin committed
1146 1147 1148 1149 1150 1151 1152
    if( FAILED(hr) )
    {
        msg_Err( p_this, "failed to create the device enumerator (0x%x)", hr);
        return NULL;
    }

    /* Create an enumerator for the video capture devices */
Gildas Bazin's avatar
 
Gildas Bazin committed
1153 1154 1155 1156 1157 1158 1159 1160
    IEnumMoniker *p_class_enum = NULL;
    if( !b_audio )
        hr = p_dev_enum->CreateClassEnumerator( CLSID_VideoInputDeviceCategory,
                                                &p_class_enum, 0 );
    else
        hr = p_dev_enum->CreateClassEnumerator( CLSID_AudioInputDeviceCategory,
                                                &p_class_enum, 0 );
    p_dev_enum->Release();
Gildas Bazin's avatar
 
Gildas Bazin committed
1161 1162 1163 1164 1165 1166
    if( FAILED(hr) )
    {
        msg_Err( p_this, "failed to create the class enumerator (0x%x)", hr );
        return NULL;
    }

Sam Hocevar's avatar
Sam Hocevar committed
1167
    /* If there are no enumerators for the requested type, then
Gildas Bazin's avatar
 
Gildas Bazin committed
1168 1169
     * CreateClassEnumerator will succeed, but p_class_enum will be NULL */
    if( p_class_enum == NULL )
Gildas Bazin's avatar
 
Gildas Bazin committed
1170
    {
1171
        msg_Err( p_this, "no capture device was detected" );
Gildas Bazin's avatar
 
Gildas Bazin committed
1172 1173 1174 1175 1176 1177 1178 1179 1180
        return NULL;
    }

    /* Enumerate the devices */

    /* Note that if the Next() call succeeds but there are no monikers,
     * it will return S_FALSE (which is not a failure). Therefore, we check
     * that the return code is S_OK instead of using SUCCEEDED() macro. */

Gildas Bazin's avatar
 
Gildas Bazin committed
1181
    while( p_class_enum->Next( 1, &p_moniker, &i_fetched ) == S_OK )
Gildas Bazin's avatar
 
Gildas Bazin committed
1182 1183
    {
        /* Getting the property page to get the device name */
Gildas Bazin's avatar
 
Gildas Bazin committed
1184 1185 1186
        IPropertyBag *p_bag;
        hr = p_moniker->BindToStorage( 0, 0, IID_IPropertyBag,
                                       (void **)&p_bag );
Gildas Bazin's avatar
 
Gildas Bazin committed
1187 1188 1189 1190
        if( SUCCEEDED(hr) )
        {
            VARIANT var;
            var.vt = VT_BSTR;
Gildas Bazin's avatar
 
Gildas Bazin committed
1191 1192
            hr = p_bag->Read( L"FriendlyName", &var, NULL );
            p_bag->Release();
Gildas Bazin's avatar
 
Gildas Bazin committed
1193 1194 1195 1196 1197 1198 1199 1200 1201 1202 1203 1204 1205
            if( SUCCEEDED(hr) )
            {
                int i_convert = ( lstrlenW( var.bstrVal ) + 1 ) * 2;
                char *p_buf = (char *)alloca( i_convert ); p_buf[0] = 0;
                WideCharToMultiByte( CP_ACP, 0, var.bstrVal, -1, p_buf,
                                     i_convert, NULL, NULL );
                SysFreeString(var.bstrVal);

                if( p_listdevices ) p_listdevices->push_back( p_buf );

                if( p_devicename && *p_devicename == string(p_buf) )
                {
                    /* Bind Moniker to a filter object */
Gildas Bazin's avatar
 
Gildas Bazin committed
1206 1207
                    hr = p_moniker->BindToObject( 0, 0, IID_IBaseFilter,
                                                  (void **)&p_base_filter );
Gildas Bazin's avatar
 
Gildas Bazin committed
1208 1209 1210 1211
                    if( FAILED(hr) )
                    {
                        msg_Err( p_this, "couldn't bind moniker to filter "
                                 "object (0x%x)", hr );
Gildas Bazin's avatar
 
Gildas Bazin committed
1212 1213
                        p_moniker->Release();
                        p_class_enum->Release();
Gildas Bazin's avatar
 
Gildas Bazin committed
1214 1215
                        return NULL;
                    }
Gildas Bazin's avatar
 
Gildas Bazin committed
1216 1217 1218
                    p_moniker->Release();
                    p_class_enum->Release();
                    return p_base_filter;
Gildas Bazin's avatar
 
Gildas Bazin committed
1219 1220 1221
                }
            }
        }
Gildas Bazin's avatar
 
Gildas Bazin committed
1222 1223

        p_moniker->Release();
Gildas Bazin's avatar
 
Gildas Bazin committed
1224 1225
    }

Gildas Bazin's avatar
 
Gildas Bazin committed
1226
    p_class_enum->Release();
Gildas Bazin's avatar
 
Gildas Bazin committed
1227 1228 1229
    return NULL;
}

Gildas Bazin's avatar
 
Gildas Bazin committed
1230
static AM_MEDIA_TYPE EnumDeviceCaps( vlc_object_t *p_this,
1231
                                     IBaseFilter *p_filter,
Gildas Bazin's avatar
 
Gildas Bazin committed
1232
                                     int i_fourcc, int i_width, int i_height,
1233 1234
                                     int i_channels, int i_samplespersec,
                                     int i_bitspersample )
Gildas Bazin's avatar
 
Gildas Bazin committed
1235 1236 1237 1238
{
    IEnumPins *p_enumpins;
    IPin *p_output_pin;
    IEnumMediaTypes *p_enummt;
Gildas Bazin's avatar
 
Gildas Bazin committed
1239 1240
    int i_orig_fourcc = i_fourcc;
    vlc_bool_t b_found = VLC_FALSE;
Gildas Bazin's avatar
 
Gildas Bazin committed
1241 1242 1243 1244 1245 1246 1247 1248 1249 1250 1251

    AM_MEDIA_TYPE media_type;
    media_type.majortype = GUID_NULL;
    media_type.subtype = GUID_NULL;
    media_type.formattype = GUID_NULL;
    media_type.pUnk = NULL;
    media_type.cbFormat = 0;
    media_type.pbFormat = NULL;

    if( S_OK != p_filter->EnumPins( &p_enumpins ) ) return media_type;

1252 1253 1254 1255 1256 1257 1258 1259 1260 1261 1262 1263 1264 1265 1266 1267
    while( S_OK == p_enumpins->Next( 1, &p_output_pin, NULL ) )
    {
        PIN_INFO info;

        if( S_OK == p_output_pin->QueryPinInfo( &info ) )
        {
            msg_Dbg( p_this, "EnumDeviceCaps: %s pin: %S",
                     info.dir == PINDIR_INPUT ? "input" : "output",
                     info.achName );
            if( info.pFilter ) info.pFilter->Release();
        }

        p_output_pin->Release();
    }
    p_enumpins->Reset();

Gildas Bazin's avatar
 
Gildas Bazin committed
1268
    while( !b_found && p_enumpins->Next( 1, &p_output_pin, NULL ) == S_OK )
Gildas Bazin's avatar
 
Gildas Bazin committed
1269
    {
Gildas Bazin's avatar
 
Gildas Bazin committed
1270 1271 1272 1273 1274
        PIN_INFO info;

        if( S_OK == p_output_pin->QueryPinInfo( &info ) )
        {
            if( info.pFilter ) info.pFilter->Release();
1275 1276 1277 1278 1279 1280
            if( info.dir == PINDIR_INPUT )
            {
                p_output_pin->Release();
                continue;
            }
            msg_Dbg( p_this, "EnumDeviceCaps: trying pin %S", info.achName );
Gildas Bazin's avatar
 
Gildas Bazin committed
1281 1282
        }

Gildas Bazin's avatar
 
Gildas Bazin committed
1283
        /* Probe pin */
1284
        if( SUCCEEDED( p_output_pin->EnumMediaTypes( &p_enummt ) ) )
Gildas Bazin's avatar
 
Gildas Bazin committed
1285 1286 1287 1288 1289
        {
            AM_MEDIA_TYPE *p_mt;
            while( p_enummt->Next( 1, &p_mt, NULL ) == S_OK )
            {

1290
                if( p_mt->majortype == MEDIATYPE_Video )
Gildas Bazin's avatar
 
Gildas Bazin committed
1291
                {
Gildas Bazin's avatar
 
Gildas Bazin committed
1292
                    int i_current_fourcc = VLC_FOURCC(' ', ' ', ' ', ' ');
1293 1294 1295

                    /* Packed RGB formats */
                    if( p_mt->subtype == MEDIASUBTYPE_RGB1 )
Gildas Bazin's avatar
 
Gildas Bazin committed
1296
                        i_current_fourcc = VLC_FOURCC( 'R', 'G', 'B', '1' );
1297
                    if( p_mt->subtype == MEDIASUBTYPE_RGB4 )
Gildas Bazin's avatar
 
Gildas Bazin committed
1298
                        i_current_fourcc = VLC_FOURCC( 'R', 'G', 'B', '4' );
1299
                    if( p_mt->subtype == MEDIASUBTYPE_RGB8 )
Gildas Bazin's avatar
 
Gildas Bazin committed
1300
                        i_current_fourcc = VLC_FOURCC( 'R', 'G', 'B', '8' );
1301
                    else if( p_mt->subtype == MEDIASUBTYPE_RGB555 )
Gildas Bazin's avatar
 
Gildas Bazin committed
1302