input.c 65.1 KB
Newer Older
1 2
/*****************************************************************************
 * input.c: input thread
3
 *****************************************************************************
4
 * Copyright (C) 1998-2004 VideoLAN
5
 * $Id$
6
 *
7
 * Authors: Christophe Massiot <massiot@via.ecp.fr>
8
 *          Laurent Aimar <fenrir@via.ecp.fr>
9 10 11 12 13
 *
 * 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.
14
 *
15 16
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 18
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
19
 *
20 21 22
 * 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.
23
 *****************************************************************************/
Michel Kaempf's avatar
Michel Kaempf committed
24

25
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
26
 * Preamble
27
 *****************************************************************************/
28
#include <stdlib.h>
29

30
#include <vlc/vlc.h>
31
#include <vlc/input.h>
32
#include <vlc/decoder.h>
33
#include <vlc/vout.h>
34

35
#include "input_internal.h"
36

37 38
#include "stream_output.h"

39
#include "vlc_interface.h"
40
#include "vlc_meta.h"
41

42
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
43
 * Local prototypes
44
 *****************************************************************************/
45 46 47 48 49 50 51 52 53
static  int Run  ( input_thread_t *p_input );

static  int Init ( input_thread_t *p_input );
static void Error( input_thread_t *p_input );
static void End  ( input_thread_t *p_input );

static inline int ControlPopNoLock( input_thread_t *, int *, vlc_value_t * );
static void       ControlReduce( input_thread_t * );
static vlc_bool_t Control( input_thread_t *, int, vlc_value_t );
54

55

56 57
static void UpdateFromAccess( input_thread_t * );
static void UpdateFromDemux( input_thread_t * );
Michel Kaempf's avatar
Michel Kaempf committed
58

59 60 61
static void ParseOption( input_thread_t *p_input, const char *psz_option );

static void DecodeUrl  ( char * );
62
static void MRLSplit( input_thread_t *, char *, char **, char **, char ** );
63 64

static input_source_t *InputSourceNew( input_thread_t *);
65 66
static int  InputSourceInit( input_thread_t *, input_source_t *,
                             char *, char *psz_forced_demux );
67 68 69 70
static void InputSourceClean( input_thread_t *, input_source_t * );

static void SlaveDemux( input_thread_t *p_input );
static void SlaveSeek( input_thread_t *p_input );
71

72
/*****************************************************************************
73
 * input_CreateThread: creates a new input thread
74
 *****************************************************************************
75 76
 * This function creates a new input, and returns a pointer
 * to its description. On error, it returns NULL.
77 78 79 80 81 82 83 84 85 86
 *
 * Variables for _public_ use:
 * * Get and Set:
 *  - state
 *  - rate,rate-slower, rate-faster
 *  - position, position-offset
 *  - time, time-offset
 *  - title,title-next,title-prev
 *  - chapter,chapter-next, chapter-prev
 *  - program, audio-es, video-es, spu-es
87
 *  - audio-delay, spu-delay
88 89 90 91
 *  - bookmark
 * * Get only:
 *  - length
 *  - bookmarks
92
 *  - seekable (if you can seek, it doesn't say if 'bar display' has be shown or not, for that check position != 0.0)
93 94 95 96
 * * For intf callback upon changes
 *  - intf-change
 * TODO explain when Callback is called
 * TODO complete this list (?)
97
 *****************************************************************************/
98 99
input_thread_t *__input_CreateThread( vlc_object_t *p_parent,
                                      input_item_t *p_item )
100

Michel Kaempf's avatar
Michel Kaempf committed
101
{
102 103
    input_thread_t *p_input;                        /* thread descriptor */
    int             i;
104

105
    /* Allocate descriptor */
106
    p_input = vlc_object_create( p_parent, VLC_OBJECT_INPUT );
107
    if( p_input == NULL )
Michel Kaempf's avatar
Michel Kaempf committed
108
    {
109
        msg_Err( p_parent, "out of memory" );
110
        return NULL;
Michel Kaempf's avatar
Michel Kaempf committed
111
    }
112

113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142
    /* Init Common fields */
    p_input->b_eof = VLC_FALSE;
    p_input->b_can_pace_control = VLC_TRUE;
    p_input->i_start = 0;
    p_input->i_time  = 0;
    p_input->i_stop  = 0;
    p_input->i_title = 0;
    p_input->title   = NULL;
    p_input->i_state = INIT_S;
    p_input->i_rate  = INPUT_RATE_DEFAULT;
    p_input->i_bookmark = 0;
    p_input->bookmark = NULL;
    p_input->p_es_out = NULL;
    p_input->p_sout  = NULL;
    p_input->b_out_pace_control = VLC_FALSE;
    p_input->i_pts_delay = 0;


    /* Init Input fields */
    p_input->input.p_item = p_item;
    p_input->input.p_access = NULL;
    p_input->input.p_stream = NULL;
    p_input->input.p_demux  = NULL;
    p_input->input.b_title_demux = VLC_FALSE;
    p_input->input.i_title  = 0;
    p_input->input.title    = NULL;
    p_input->input.b_can_pace_control = VLC_TRUE;
    p_input->input.b_eof = VLC_FALSE;
    p_input->input.i_cr_average = 0;

143 144 145 146
    /* No slave */
    p_input->i_slave = 0;
    p_input->slave   = NULL;

147 148 149
    /* Init control buffer */
    vlc_mutex_init( p_input, &p_input->lock_control );
    p_input->i_control = 0;
150

151
    /* Parse input options */
152 153
    vlc_mutex_lock( &p_item->lock );
    for( i = 0; i < p_item->i_options; i++ )
154
    {
155 156
        msg_Dbg( p_input, "option: %s", p_item->ppsz_options[i] );
        ParseOption( p_input, p_item->ppsz_options[i] );
157
    }
158
    vlc_mutex_unlock( &p_item->lock );
159

160 161
    /* Create Object Variables for private use only */
    input_ConfigVarInit( p_input );
Michel Kaempf's avatar
Michel Kaempf committed
162

163 164 165
    /* Create Objects variables for public Get and Set */
    input_ControlVarInit( p_input );
    p_input->input.i_cr_average = var_GetInteger( p_input, "cr-average" );
Gildas Bazin's avatar
Gildas Bazin committed
166

167 168
#if 0
    /* TODO */
Gildas Bazin's avatar
Gildas Bazin committed
169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198
    var_Get( p_input, "bookmarks", &val );
    if( val.psz_string )
    {
        /* FIXME: have a common cfg parsing routine used by sout and others */
        char *psz_parser, *psz_start, *psz_end;
        psz_parser = val.psz_string;
        while( (psz_start = strchr( psz_parser, '{' ) ) )
        {
            seekpoint_t seekpoint;
            char backup;
            psz_start++;
            psz_end = strchr( psz_start, '}' );
            if( !psz_end ) break;
            psz_parser = psz_end + 1;
            backup = *psz_parser;
            *psz_parser = 0;
            *psz_end = ',';

            seekpoint.psz_name = 0;
            seekpoint.i_byte_offset = 0;
            seekpoint.i_time_offset = 0;
            while( (psz_end = strchr( psz_start, ',' ) ) )
            {
                *psz_end = 0;
                if( !strncmp( psz_start, "name=", 5 ) )
                {
                    seekpoint.psz_name = psz_start + 5;
                }
                else if( !strncmp( psz_start, "bytes=", 6 ) )
                {
199
                    seekpoint.i_byte_offset = atoll(psz_start + 6);
Gildas Bazin's avatar
Gildas Bazin committed
200 201 202
                }
                else if( !strncmp( psz_start, "time=", 5 ) )
                {
203
                    seekpoint.i_time_offset = atoll(psz_start + 5) * 1000000;
Gildas Bazin's avatar
Gildas Bazin committed
204 205 206 207 208 209 210 211 212 213 214
                }
                psz_start = psz_end + 1;
            }
            msg_Dbg( p_input, "adding bookmark: %s, bytes="I64Fd", time="I64Fd,
                     seekpoint.psz_name, seekpoint.i_byte_offset,
                     seekpoint.i_time_offset );
            input_Control( p_input, INPUT_ADD_BOOKMARK, &seekpoint );
            *psz_parser = backup;
        }
        free( val.psz_string );
    }
215
#endif
Gildas Bazin's avatar
Gildas Bazin committed
216

217
    /* Now we can attach our new input */
218
    vlc_object_attach( p_input, p_parent );
219

Sam Hocevar's avatar
Sam Hocevar committed
220
    /* Create thread and wait for its readiness. */
221
    if( vlc_thread_create( p_input, "input", Run,
222
                           VLC_THREAD_PRIORITY_INPUT, VLC_TRUE ) )
Michel Kaempf's avatar
Michel Kaempf committed
223
    {
224
        msg_Err( p_input, "cannot create input thread" );
225 226
        vlc_object_detach( p_input );
        vlc_object_destroy( p_input );
227
        return NULL;
Michel Kaempf's avatar
Michel Kaempf committed
228
    }
229

230
    return p_input;
Michel Kaempf's avatar
Michel Kaempf committed
231 232
}

233
/*****************************************************************************
234
 * input_StopThread: mark an input thread as zombie
235
 *****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
236
 * This function should not return until the thread is effectively cancelled.
237
 *****************************************************************************/
Sam Hocevar's avatar
Sam Hocevar committed
238
void input_StopThread( input_thread_t *p_input )
Michel Kaempf's avatar
Michel Kaempf committed
239
{
240 241
    vlc_list_t *p_list;
    int i;
242

243 244
    /* Set die for input */
    p_input->b_die = VLC_TRUE;
245

246 247
    /* We cannot touch p_input fields directly (we can from another thread),
     * so use the vlc_object_find way, it's perfectly safe */
248

249 250 251
    /* Set die for all access */
    p_list = vlc_list_find( p_input, VLC_OBJECT_ACCESS, FIND_CHILD );
    for( i = 0; i < p_list->i_count; i++ )
252
    {
253
        p_list->p_values[i].p_object->b_die = VLC_TRUE;
254
    }
255
    vlc_list_release( p_list );
256

257 258 259
    /* Set die for all stream */
    p_list = vlc_list_find( p_input, VLC_OBJECT_STREAM, FIND_CHILD );
    for( i = 0; i < p_list->i_count; i++ )
260
    {
261
        p_list->p_values[i].p_object->b_die = VLC_TRUE;
262
    }
263
    vlc_list_release( p_list );
264

265 266 267 268 269 270 271
    /* Set die for all demux */
    p_list = vlc_list_find( p_input, VLC_OBJECT_DEMUX, FIND_CHILD );
    for( i = 0; i < p_list->i_count; i++ )
    {
        p_list->p_values[i].p_object->b_die = VLC_TRUE;
    }
    vlc_list_release( p_list );
Michel Kaempf's avatar
Michel Kaempf committed
272

273
    input_ControlPush( p_input, INPUT_CONTROL_SET_DIE, NULL );
274 275 276 277 278 279 280 281 282 283
}

/*****************************************************************************
 * input_DestroyThread: mark an input thread as zombie
 *****************************************************************************
 * This function should not return until the thread is effectively cancelled.
 *****************************************************************************/
void input_DestroyThread( input_thread_t *p_input )
{
    /* Join the thread */
284
    vlc_thread_join( p_input );
285

286 287 288 289 290
    /* Delete input lock (only after thread joined) */
    vlc_mutex_destroy( &p_input->lock_control );

    /* TODO: maybe input_DestroyThread should also delete p_input instead
     * of the playlist but I'm not sure if it's possible */
Michel Kaempf's avatar
Michel Kaempf committed
291 292
}

293
/*****************************************************************************
294
 * Run: main thread loop
295
 *****************************************************************************
296
 * Thread in charge of processing the network packets and demultiplexing.
297 298 299 300
 *
 * TODO:
 *  read subtitle support (XXX take care of spu-delay in the right way).
 *  multi-input support (XXX may be done with subs)
301
 *****************************************************************************/
302
static int Run( input_thread_t *p_input )
Michel Kaempf's avatar
Michel Kaempf committed
303
{
304
    int64_t i_intf_update = 0;
305

306
    /* Signal that the thread is launched */
Sam Hocevar's avatar
Sam Hocevar committed
307 308
    vlc_thread_ready( p_input );

309
    if( Init( p_input ) )
310 311
    {
        /* If we failed, wait before we are killed, and exit */
312
        p_input->b_error = VLC_TRUE;
313

314
        Error( p_input );
315 316

        /* Tell we're dead */
317
        p_input->b_dead = VLC_TRUE;
318

319
        return 0;
320
    }
Michel Kaempf's avatar
Michel Kaempf committed
321

322
    /* Main loop */
323
    while( !p_input->b_die && !p_input->b_error && !p_input->input.b_eof )
324
    {
325 326 327 328
        vlc_bool_t b_force_update = VLC_FALSE;
        int i_ret;
        int i_type;
        vlc_value_t val;
329

330 331
        /* Do the read */
        if( p_input->i_state != PAUSE_S  )
332
        {
333 334 335 336
            if( p_input->i_stop <= 0 || p_input->i_time < p_input->i_stop )
                i_ret=p_input->input.p_demux->pf_demux(p_input->input.p_demux);
            else
                i_ret = 0;  /* EOF */
337

338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357
            if( i_ret > 0 )
            {
                /* TODO */
                if( p_input->input.b_title_demux &&
                    p_input->input.p_demux->info.i_update )
                {
                    UpdateFromDemux( p_input );
                    b_force_update = VLC_TRUE;
                }
                else if( !p_input->input.b_title_demux &&
                          p_input->input.p_access &&
                          p_input->input.p_access->info.i_update )
                {
                    UpdateFromAccess( p_input );
                    b_force_update = VLC_TRUE;
                }
            }
            else if( i_ret == 0 )    /* EOF */
            {
                vlc_value_t repeat;
358

359 360 361 362 363 364 365 366 367
                var_Get( p_input, "input-repeat", &repeat );
                if( repeat.i_int == 0 )
                {
                    /* End of file - we do not set b_die because only the
                     * playlist is allowed to do so. */
                    msg_Dbg( p_input, "EOF reached" );
                    p_input->input.b_eof = VLC_TRUE;
                }
                else
368
                {
Gildas Bazin's avatar
Gildas Bazin committed
369 370
                    msg_Dbg( p_input, "repeating the same input (%d)",
                             repeat.i_int );
371 372 373 374 375
                    if( repeat.i_int > 0 )
                    {
                        repeat.i_int--;
                        var_Set( p_input, "input-repeat", repeat );
                    }
376

377 378 379 380 381 382 383 384 385 386 387 388 389 390 391
                    /* Seek to title 0 position 0(start) */
                    val.i_int = 0;
                    input_ControlPush( p_input, INPUT_CONTROL_SET_TITLE, &val );
                    if( p_input->i_start > 0 )
                    {
                        val.i_time = p_input->i_start;
                        input_ControlPush( p_input, INPUT_CONTROL_SET_TIME,
                                           &val );
                    }
                    else
                    {
                        val.f_float = 0.0;
                        input_ControlPush( p_input, INPUT_CONTROL_SET_POSITION,
                                           &val );
                    }
392 393
                }
            }
394 395 396 397
            else if( i_ret < 0 )
            {
                p_input->b_error = VLC_TRUE;
            }
398 399 400 401 402

            if( i_ret > 0 && p_input->i_slave > 0 )
            {
                SlaveDemux( p_input );
            }
403
        }
404
        else
405
        {
406 407 408
            /* Small wait */
            msleep( 10*1000 );
        }
409

410 411 412 413 414 415 416 417 418 419
        /* Handle control */
        vlc_mutex_lock( &p_input->lock_control );
        ControlReduce( p_input );
        while( !ControlPopNoLock( p_input, &i_type, &val ) )
        {
            msg_Dbg( p_input, "control type=%d", i_type );
            if( Control( p_input, i_type, val ) )
                b_force_update = VLC_TRUE;
        }
        vlc_mutex_unlock( &p_input->lock_control );
420

421 422 423 424 425 426 427
        if( b_force_update ||
            i_intf_update < mdate() )
        {
            vlc_value_t val;
            double f_pos;
            int64_t i_time, i_length;
            /* update input status variables */
Gildas Bazin's avatar
Gildas Bazin committed
428 429
            if( !demux2_Control( p_input->input.p_demux,
                                 DEMUX_GET_POSITION, &f_pos ) )
430 431 432 433
            {
                val.f_float = (float)f_pos;
                var_Change( p_input, "position", VLC_VAR_SETVALUE, &val, NULL );
            }
Gildas Bazin's avatar
Gildas Bazin committed
434 435
            if( !demux2_Control( p_input->input.p_demux,
                                 DEMUX_GET_TIME, &i_time ) )
436 437 438 439 440
            {
                p_input->i_time = i_time;
                val.i_time = i_time;
                var_Change( p_input, "time", VLC_VAR_SETVALUE, &val, NULL );
            }
Gildas Bazin's avatar
Gildas Bazin committed
441 442
            if( !demux2_Control( p_input->input.p_demux,
                                 DEMUX_GET_LENGTH, &i_length ) )
443 444 445 446 447
            {
                vlc_value_t old_val;
                var_Get( p_input, "length", &old_val );
                val.i_time = i_length;
                var_Change( p_input, "length", VLC_VAR_SETVALUE, &val, NULL );
448

449
                if( old_val.i_time != val.i_time )
450
                {
451
                    char psz_buffer[MSTRTIME_MAX_SIZE];
452

453 454 455
                    vlc_mutex_lock( &p_input->input.p_item->lock );
                    p_input->input.p_item->i_duration = i_length;
                    vlc_mutex_unlock( &p_input->input.p_item->lock );
456

457 458 459
                    input_Control( p_input, INPUT_ADD_INFO,
                                   _("General"), _("Duration"),
                    msecstotimestr( psz_buffer, i_length / 1000 ) );
460 461
                }
            }
462 463 464

            var_SetBool( p_input, "intf-change", VLC_TRUE );
            i_intf_update = mdate() + I64C(150000);
465
        }
466 467
    }

468
    if( !p_input->b_eof && !p_input->b_error && p_input->input.b_eof )
469
    {
470 471
        /* We have finish to demux data but not to play them */
        while( !p_input->b_die )
472
        {
473
#if 0
474
            if( input_EsOutDecodersEmpty( p_input->p_es_out ) )
475
#endif
476
                break;
477

478
            msg_Dbg( p_input, "waiting decoder fifos to empty" );
479

480
            msleep( INPUT_IDLE_SLEEP );
481
        }
482

483 484
        /* We have finished */
        p_input->b_eof = VLC_TRUE;
485 486
    }

487 488
    /* Wait we are asked to die */
    if( !p_input->b_die )
489
    {
490
        Error( p_input );
491
    }
492

493 494
    /* Clean up */
    End( p_input );
495

496
    return 0;
497 498
}

499
/*****************************************************************************
500
 * Init: init the input Thread
501
 *****************************************************************************/
502
static int Init( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
503
{
504
    char *psz;
505
    char *psz_subtitle;
506
    vlc_value_t val;
507
    double f_fps;
508

509 510 511
    /* Initialize optional stream output. (before access/demuxer) */
    psz = var_GetString( p_input, "sout" );
    if( *psz )
512
    {
513 514
        p_input->p_sout = sout_NewInstance( p_input, psz );
        if( p_input->p_sout == NULL )
515 516
        {
            msg_Err( p_input, "cannot start stream output instance, aborting" );
517
            free( psz );
518 519
            return VLC_EGENERIC;
        }
520
    }
521
    free( psz );
Christophe Massiot's avatar
Christophe Massiot committed
522

523
    /* Create es out */
524
    p_input->p_es_out = input_EsOutNew( p_input );
525 526
    es_out_Control( p_input->p_es_out, ES_OUT_SET_ACTIVE, VLC_FALSE );
    es_out_Control( p_input->p_es_out, ES_OUT_SET_MODE, ES_OUT_MODE_NONE );
527

528
    if( InputSourceInit( p_input, &p_input->input,
529
                         p_input->input.p_item->psz_uri, NULL ) )
530
    {
531
        goto error;
532
    }
533

534
#if 0
535
    {
536 537
        input_source_t *extra;
        char *psz_extra = "/home/fenrir/a.avi";
538

539 540
        extra = InputSourceNew( p_input );
        if( !InputSourceInit( p_input, extra, psz_extra ) )
541
        {
542
            TAB_APPEND( p_input->i_slave, p_input->slave, extra );
543
        }
544
    }
545
#endif
546

547
    /* Create global title (from master) */
548
    p_input->i_title = p_input->input.i_title;
549
    p_input->title   = p_input->input.title;
550
    if( p_input->i_title > 0 )
551
    {
552 553 554
        /* Setup variables */
        input_ControlVarNavigation( p_input );
        input_ControlVarTitle( p_input, 0 );
555
    }
556

557 558 559 560 561 562 563
    /* Global flag */
    p_input->b_can_pace_control = p_input->input.b_can_pace_control;
    p_input->b_can_pause        = p_input->input.b_can_pause;

    /* Fix pts delay */
    if( p_input->i_pts_delay <= 0 )
        p_input->i_pts_delay = DEFAULT_PTS_DELAY;
564

565 566
    /* If the desynchronisation requested by the user is < 0, we need to
     * cache more data. */
567 568 569
    var_Get( p_input, "audio-desync", &val );
    if( val.i_int < 0 )
        p_input->i_pts_delay -= (val.i_int * 1000);
570

571
    /* TODO: check meta data from users */
572

573
    /* TODO: get meta data from demuxer */
574

575
    /* Load master infos */
576
    /* Init length */
Gildas Bazin's avatar
Gildas Bazin committed
577 578
    if( !demux2_Control( p_input->input.p_demux, DEMUX_GET_LENGTH,
                         &val.i_time ) && val.i_time > 0 )
579 580 581 582 583 584 585 586 587 588 589 590 591 592
    {
        var_Change( p_input, "length", VLC_VAR_SETVALUE, &val, NULL );
        /* TODO update playlist meta data */
    }
    /* Start time*/
    /* Set start time */
    p_input->i_start = (int64_t)var_GetInteger( p_input, "start-time" ) *
                       I64C(1000000);
    p_input->i_stop  = (int64_t)var_GetInteger( p_input, "stop-time" ) *
                       I64C(1000000);

    if( p_input->i_start > 0 )
    {
        if( p_input->i_start >= val.i_time )
593
        {
594
            msg_Warn( p_input, "invalid start-time ignored" );
595
        }
596
        else
597
        {
598 599 600 601 602 603 604
            vlc_value_t s;

            msg_Dbg( p_input, "start-time: %ds",
                     (int)( p_input->i_start / I64C(1000000) ) );

            s.i_time = p_input->i_start;
            input_ControlPush( p_input, INPUT_CONTROL_SET_TIME, &s );
605
        }
606 607 608 609 610
    }
    if( p_input->i_stop > 0 && p_input->i_stop <= p_input->i_start )
    {
        msg_Warn( p_input, "invalid stop-time ignored" );
        p_input->i_stop = 0;
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
    /* Load subtitles */
    /* Get fps and set it if not already set */
    if( !demux2_Control( p_input->input.p_demux, DEMUX_GET_FPS, &f_fps ) &&
        f_fps > 1.0 )
    {
        vlc_value_t fps;

        if( var_Get( p_input, "sub-fps", &fps ) )
        {
            var_Create( p_input, "sub-fps", VLC_VAR_FLOAT| VLC_VAR_DOINHERIT );
            var_SetFloat( p_input, "sub-fps", f_fps );
        }
    }

    /* Look for and add subtitle files */
    psz_subtitle = var_GetString( p_input, "sub-file" );
    if( *psz_subtitle )
    {
        input_source_t *sub;
        vlc_value_t count;
        vlc_value_t list;

        msg_Dbg( p_input, "forced subtitle: %s", psz_subtitle );

        var_Change( p_input, "spu-es", VLC_VAR_CHOICESCOUNT, &count, NULL );

        /* */
        sub = InputSourceNew( p_input );
        if( !InputSourceInit( p_input, sub, psz_subtitle, "subtitle" ) )
        {
            TAB_APPEND( p_input->i_slave, p_input->slave, sub );

            /* Select the ES */
            if( !var_Change( p_input, "spu-es", VLC_VAR_GETLIST, &list, NULL ) )
            {
                if( count.i_int == 0 )
                    count.i_int++;  /* if it was first one, there is disable too */

                if( count.i_int < list.p_list->i_count )
                {
Gildas Bazin's avatar
Gildas Bazin committed
654 655
                    input_ControlPush( p_input, INPUT_CONTROL_SET_ES,
                                       &list.p_list->p_values[count.i_int] );
656 657 658 659 660 661 662 663 664 665 666 667 668 669
                }
                var_Change( p_input, "spu-es", VLC_VAR_FREELIST, &list, NULL );
            }
        }
    }

    var_Get( p_input, "sub-autodetect-file", &val );
    if( val.b_bool )
    {
        char *psz_autopath = var_GetString( p_input, "sub-autodetect-path" );
        char **subs = subtitles_Detect( p_input, psz_autopath,
                                        p_input->input.p_item->psz_uri );
        input_source_t *sub;
        int i;
670

671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686
        for( i = 0; subs[i] != NULL; i++ )
        {
            if( strcmp( psz_subtitle, subs[i] ) )
            {
                sub = InputSourceNew( p_input );
                if( !InputSourceInit( p_input, sub, subs[i], "subtitle" ) )
                {
                    TAB_APPEND( p_input->i_slave, p_input->slave, sub );
                }
            }
            free( subs[i] );
        }
        free( subs );
        free( psz_autopath );
    }
    free( psz_subtitle );
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 714 715 716 717 718 719 720 721

    /* Look for slave */
    psz = var_GetString( p_input, "input-slave" );
    if( *psz )
    {
        char *psz_delim = strchr( psz, '#' );

        for( ;; )
        {
            input_source_t *slave;

            if( psz_delim )
            {
                *psz_delim++ = '\0';
            }

            if( *psz == '\0' )
            {
                if( psz_delim )
                    continue;
                else
                    break;
            }

            msg_Dbg( p_input, "adding slave '%s'", psz );
            slave = InputSourceNew( p_input );
            if( !InputSourceInit( p_input, slave, psz, NULL ) )
            {
                TAB_APPEND( p_input->i_slave, p_input->slave, slave );
            }
            if( !psz_delim )
                break;
        }
    }
    free( psz );
722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745 746

    /* Set up es_out */
    es_out_Control( p_input->p_es_out, ES_OUT_SET_ACTIVE, VLC_TRUE );
    val.b_bool =  VLC_FALSE;
    if( p_input->p_sout )
    {
        var_Get( p_input, "sout-all", &val );
    }
    es_out_Control( p_input->p_es_out, ES_OUT_SET_MODE,
                    val.b_bool ? ES_OUT_MODE_ALL : ES_OUT_MODE_AUTO );

    /* TODO select forced subs */
#if 0
    if( p_sub_toselect )
    {
        es_out_Control( p_input->p_es_out, ES_OUT_SET_ES,
                        p_sub_toselect->p_es, VLC_TRUE );
    }
#endif

    if( p_input->p_sout )
    {
        if( p_input->p_sout->i_out_pace_nocontrol > 0 )
        {
            p_input->b_out_pace_control = VLC_FALSE;
747
        }
748 749 750 751 752 753
        else
        {
            p_input->b_out_pace_control = VLC_TRUE;
        }
        msg_Dbg( p_input, "starting in %s mode",
                 p_input->b_out_pace_control ? "asynch" : "synch" );
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 782 783 784 785 786 787 788 789 790 791 792 793 794
    msg_Dbg( p_input, "`%s' sucessfully opened",
             p_input->input.p_item->psz_uri );

    /* initialization is complete */
    p_input->i_state = PLAYING_S;

    val.i_int = PLAYING_S;
    var_Change( p_input, "state", VLC_VAR_SETVALUE, &val, NULL );

    return VLC_SUCCESS;

error:
    if( p_input->p_es_out )
        input_EsOutDelete( p_input->p_es_out );

    if( p_input->p_sout )
        sout_DeleteInstance( p_input->p_sout );

    /* Mark them deleted */
    p_input->input.p_demux = NULL;
    p_input->input.p_stream = NULL;
    p_input->input.p_access = NULL;
    p_input->p_es_out = NULL;
    p_input->p_sout = NULL;

    return VLC_EGENERIC;

#if 0
    vlc_meta_t *p_meta = NULL, *p_meta_user = NULL;
//    float f_fps;
    double f_fps;
    mtime_t i_length;

    FIXME
    p_input->input.i_cr_average = config_GetInt( p_input, "cr-average" );
    p_input->stream.control.i_status = INIT_S;
    p_input->stream.control.i_rate = DEFAULT_RATE;


795 796 797 798 799
    /* Init input_thread_sys_t */
    p_input->p_sys = malloc( sizeof( input_thread_sys_t ) );
    p_input->p_sys->i_sub = 0;
    p_input->p_sys->sub   = NULL;

800 801 802 803 804 805 806 807 808 809 810 811 812 813
    /* Get meta information from user */
    var_Create( p_input, "meta-title", VLC_VAR_STRING | VLC_VAR_DOINHERIT );
    var_Create( p_input, "meta-author", VLC_VAR_STRING | VLC_VAR_DOINHERIT );
    var_Create( p_input, "meta-artist", VLC_VAR_STRING | VLC_VAR_DOINHERIT );
    var_Create( p_input, "meta-genre", VLC_VAR_STRING | VLC_VAR_DOINHERIT );
    var_Create( p_input, "meta-copyright", VLC_VAR_STRING | VLC_VAR_DOINHERIT);
    var_Create( p_input, "meta-description", VLC_VAR_STRING|VLC_VAR_DOINHERIT);
    var_Create( p_input, "meta-date", VLC_VAR_STRING | VLC_VAR_DOINHERIT );
    var_Create( p_input, "meta-url", VLC_VAR_STRING | VLC_VAR_DOINHERIT );
    if( (p_meta_user = vlc_meta_New()) )
    {
        vlc_value_t val;

        var_Get( p_input, "meta-title", &val );
814
        if( *val.psz_string )
815
            vlc_meta_Add( p_meta_user, VLC_META_TITLE, val.psz_string );
816
        free( val.psz_string );
817
        var_Get( p_input, "meta-author", &val );
818
        if( *val.psz_string )
819
            vlc_meta_Add( p_meta_user, VLC_META_AUTHOR, val.psz_string );
820
        free( val.psz_string );
821
        var_Get( p_input, "meta-artist", &val );
822
        if( *val.psz_string )
823
            vlc_meta_Add( p_meta_user, VLC_META_ARTIST, val.psz_string );
824
        free( val.psz_string );
825
        var_Get( p_input, "meta-genre", &val );
826
        if( *val.psz_string )
827
            vlc_meta_Add( p_meta_user, VLC_META_GENRE, val.psz_string );
828
        free( val.psz_string );
829
        var_Get( p_input, "meta-copyright", &val );
830
        if( *val.psz_string )
831
            vlc_meta_Add( p_meta_user, VLC_META_COPYRIGHT, val.psz_string );
832
        free( val.psz_string );
833
        var_Get( p_input, "meta-description", &val );
834
        if( *val.psz_string )
835
            vlc_meta_Add( p_meta_user, VLC_META_DESCRIPTION, val.psz_string );
836
        free( val.psz_string );
837
        var_Get( p_input, "meta-date", &val );
838
        if( *val.psz_string )
839
            vlc_meta_Add( p_meta_user, VLC_META_DATE, val.psz_string );
840
        free( val.psz_string );
841
        var_Get( p_input, "meta-url", &val );
842
        if( *val.psz_string )
843
            vlc_meta_Add( p_meta_user, VLC_META_URL, val.psz_string );
844
        free( val.psz_string );
845 846 847 848 849
    }

    /* Get meta informations from demuxer */
    if( !demux_Control( p_input, DEMUX_GET_META, &p_meta ) ||
        ( p_meta_user && p_meta_user->i_meta ) )
850 851 852
    {
        int i;

853 854 855 856
        /* Merge demux and user metadata */
        if( !p_meta ){ p_meta = p_meta_user; p_meta_user = NULL; }
        else if( p_meta && p_meta_user ) vlc_meta_Merge( p_meta, p_meta_user );

857
        msg_Dbg( p_input, "meta informations:" );
858
        if( p_meta->i_meta > 0 )
859
        {
860
            for( i = 0; i < p_meta->i_meta; i++ )
861
            {
862 863
                msg_Dbg( p_input, "  - '%s' = '%s'", _(p_meta->name[i]),
                         p_meta->value[i] );
864 865 866 867
                if( !strcmp( p_meta->name[i], VLC_META_TITLE ) &&
                    p_meta->value[i] )
                    input_Control( p_input, INPUT_SET_NAME, p_meta->value[i] );

868
                if( !strcmp( p_meta->name[i], VLC_META_AUTHOR ) )
869 870 871 872 873
                    input_Control( p_input, INPUT_ADD_INFO, _("General"),
                                   _("Author"), p_meta->value[i] );

                input_Control( p_input, INPUT_ADD_INFO, _("File"),
                              _(p_meta->name[i]), "%s", p_meta->value[i] );
874 875
            }
        }
876
        for( i = 0; i < p_meta->i_track; i++ )
877
        {
878
            vlc_meta_t *tk = p_meta->track[i];
879 880 881 882 883 884 885 886 887 888
            int j;

            msg_Dbg( p_input, "  - track[%d]:", i );
            if( tk->i_meta > 0 )
            {
                char *psz_cat = malloc( strlen(_("Stream")) + 10 );
                sprintf( psz_cat, "%s %d", _("Stream"), i );

                for( j = 0; j < tk->i_meta; j++ )
                {
889 890
                    msg_Dbg( p_input, "     - '%s' = '%s'", _(tk->name[j]),
                             tk->value[j] );
891 892 893

                    input_Control( p_input, INPUT_ADD_INFO, psz_cat,
                                   _(tk->name[j]), "%s", tk->value[j] );
894 895 896 897
                }
            }
        }

898 899
        if( p_input->stream.p_sout && p_input->stream.p_sout->p_meta == NULL )
        {
900
            p_input->stream.p_sout->p_meta = p_meta;
901 902 903
        }
        else
        {
904
            vlc_meta_Delete( p_meta );
905
        }
906
    }
907
    if( p_meta_user ) vlc_meta_Delete( p_meta_user );
908

909 910 911
    /* Get length */
    if( !demux_Control( p_input, DEMUX_GET_LENGTH, &i_length ) &&
        i_length > 0 )
Sigmund Augdal Helberg's avatar
Sigmund Augdal Helberg committed
912
    {
913 914 915 916 917 918 919 920
        char psz_buffer[MSTRTIME_MAX_SIZE];

        vlc_mutex_lock( &p_input->p_item->lock );
        p_input->p_item->i_duration = i_length;
        vlc_mutex_unlock( &p_input->p_item->lock );

        input_Control( p_input, INPUT_ADD_INFO, _("General"), _("Duration"),
                       msecstotimestr( psz_buffer, i_length / 1000 ) );
921 922 923 924 925

        /* Set start time */
        var_Get( p_input, "start-time", &val );
        if(  val.i_int > 0 )
        {
926
            double f_pos = val.i_int * I64C(1000000) / (double)i_length;
927 928 929

            if( f_pos >= 1.0 )
            {
930 931
                msg_Warn( p_input, "invalid start-time, ignored (start-time "
                          ">= media length)" );
932 933 934 935 936 937 938 939 940
            }
            else
            {
                p_input->stream.p_selected_area->i_seek =
                    (int64_t)( f_pos * (double)p_input->stream.p_selected_area->i_size );

                msg_Dbg( p_input, "start-time %ds (%2.2f)", val.i_int, f_pos );
            }
        }
941
    }
942 943

    /* Get fps */
944 945
    if( demux_Control( p_input, DEMUX_GET_FPS, &f_fps ) || f_fps < 0.1 )
    {
946
        i_microsecondperframe = 0;
947 948 949 950 951 952
    }
    else
    {
        i_microsecondperframe = (int64_t)( (double)1000000.0 / (double)f_fps );
    }

953
    /* Look for and add subtitle files */
954 955 956
    var_Get( p_input, "sub-file", &val );
    if( val.psz_string && *val.psz_string )
    {
957
        subtitle_demux_t *p_sub;
Laurent Aimar's avatar
Laurent Aimar committed
958 959

        msg_Dbg( p_input, "force subtitle: %s", val.psz_string );
Clément Stenac's avatar
Clément Stenac committed
960
        if( ( p_sub = subtitle_New( p_input, strdup(val.psz_string),
Derk-Jan Hartman's avatar
Derk-Jan Hartman committed
961
                                    i_microsecondperframe ) ) )
962
        {
963
            p_sub_toselect = p_sub;
964 965 966
            TAB_APPEND( p_input->p_sys->i_sub, p_input->p_sys->sub, p_sub );
        }
    }
967
    psz_sub_file = val.psz_string;
968

969
    var_Get( p_input, "sub-autodetect-file", &val );
970
    var_Get( p_input, "sub-autodetect-path", &val1 );
971
    if( val.b_bool )
972
    {
973
        subtitle_demux_t *p_sub;
974
        int i;
Gildas Bazin's avatar
Gildas Bazin committed
975 976
        char **tmp = subtitles_Detect( p_input, val1.psz_string,
                                       p_input->psz_name );
977
        char **tmp2 = tmp;
978
        for( i = 0; *tmp2 != NULL; i++ )
979
        {
980
            if( psz_sub_file == NULL || strcmp( psz_sub_file, *tmp2 ) )
981
            {
982 983 984
                if( ( p_sub = subtitle_New( p_input, *tmp2,
                                            i_microsecondperframe ) ) )
                {
985 986
                    TAB_APPEND( p_input->p_sys->i_sub, p_input->p_sys->sub,
                                p_sub );
987
                }
988
            }
989
            free( *tmp2++ );
990
        }
991
        free( tmp );
992
        free( val1.psz_string );
993
    }
994
    if( psz_sub_file ) free( psz_sub_file );
995

996
    es_out_Control( p_input->p_es_out, ES_OUT_SET_ACTIVE, VLC_TRUE );
997 998 999 1000 1001 1002 1003
    val.b_bool =  VLC_FALSE;
    if( p_input->stream.p_sout )
    {
        var_Get( p_input, "sout-all", &val );
    }
    es_out_Control( p_input->p_es_out, ES_OUT_SET_MODE,
                    val.b_bool ? ES_OUT_MODE_ALL : ES_OUT_MODE_AUTO );
1004 1005
    if( p_sub_toselect )
    {
Clément Stenac's avatar
Clément Stenac committed
1006 1007
        es_out_Control( p_input->p_es_out, ES_OUT_SET_ES,
                        p_sub_toselect->p_es, VLC_TRUE );
1008
    }
1009
#endif
Michel Kaempf's avatar
Michel Kaempf committed
1010 1011
}

1012
/*****************************************************************************
1013
 * Error: RunThread() error loop
1014
 *****************************************************************************
1015
 * This function is called when an error occured during thread main's loop.
1016
 *****************************************************************************/
1017
static void Error( input_thread_t *p_input )
Michel Kaempf's avatar
Michel Kaempf committed
1018
{
1019
    while( !p_input->b_die )
Michel Kaempf's avatar
Michel Kaempf committed
1020
    {
1021 1022
        /* Sleep a while */
        msleep( INPUT_IDLE_SLEEP );
Michel Kaempf's avatar
Michel Kaempf committed
1023 1024 1025
    }
}

1026
/*****************************************************************************
1027
 * End: end the input thread
1028
 *****************************************************************************/
1029
static void End( input_thread_t * p_input )
1030
{
1031
    vlc_value_t val;
1032
    int i;
1033

1034 1035
    msg_Dbg( p_input, "closing `%s'",
             p_input->input.p_item->psz_uri );
1036

1037 1038 1039 1040 1041 1042 1043 1044
    /* We are at the end */
    p_input->i_state = END_S;

    val.i_int = END_S;
    var_Change( p_input, "state", VLC_VAR_SETVALUE, &val, NULL );

    /* Clean control variables */
    input_ControlVarClean( p_input );
1045

1046 1047
    /* Clean up master */
    InputSourceClean( p_input, &p_input->input );
1048

1049 1050 1051 1052 1053 1054 1055
    /* Delete slave */
    for( i = 0; i < p_input->i_slave; i++ )
    {
        InputSourceClean( p_input, p_input->slave[i] );
        free( p_input->slave[i] );
    }
    if( p_input->slave ) free( p_input->slave );
1056

1057
    /* Unload all modules */
1058 1059
    if( p_input->p_es_out )
        input_EsOutDelete( p_input->p_es_out );
1060

1061
    /* Close optional stream output instance */
1062
    if( p_input->p_sout )
1063
    {
1064 1065
        vlc_object_t *p_pl =
            vlc_object_find( p_input, VLC_OBJECT_PLAYLIST, FIND_ANYWHERE );
1066 1067 1068 1069 1070 1071
        vlc_value_t keep;

        if( var_Get( p_input, "sout-keep", &keep ) >= 0 && keep.b_bool && p_pl )
        {
            /* attach sout to the playlist */
            msg_Warn( p_input, "keeping sout" );
1072 1073
            vlc_object_detach( p_input->p_sout );
            vlc_object_attach( p_input->p_sout, p_pl );
1074 1075 1076 1077
        }
        else
        {
            msg_Warn( p_input, "destroying sout" );
1078
            sout_DeleteInstance( p_input->p_sout );
1079 1080 1081
        }
        if( p_pl )
            vlc_object_release( p_pl );
1082 1083
    }

1084 1085 1086
    /* Tell we're dead */
    p_input->b_dead = VLC_TRUE;
}
1087

1088 1089 1090 1091 1092 1093 1094 1095 1096 1097
/*****************************************************************************
 * Control
 *****************************************************************************/
static inline int ControlPopNoLock( input_thread_t *p_input,
                                    int *pi_type, vlc_value_t *p_val )
{
    if( p_input->i_control <= 0 )
    {
        return VLC_EGENERIC;
    }
1098

1099 1100
    *pi_type = p_input->control[0].i_type;
    *p_val   = p_input->control[0].val;
1101

1102 1103 1104 1105
    p_input->i_control--;
    if( p_input->i_control > 0 )
    {
        int i;
Christophe Massiot's avatar
Christophe Massiot committed
1106

1107 1108 1109 1110 1111 1112
        for( i = 0; i < p_input->i_control; i++ )
        {
            p_input->control[i].i_type = p_input->control[i+1].i_type;
            p_input->control[i].val    = p_input->control[i+1].val;
        }
    }
1113

1114 1115
    return VLC_SUCCESS;
}
1116

1117 1118