input.c 88.6 KB
Newer Older
1 2
/*****************************************************************************
 * input.c: input thread
3
 *****************************************************************************
4
 * Copyright (C) 1998-2004 the VideoLAN team
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
#include <ctype.h>
30

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

36
#include "input_internal.h"
37

38
#include "stream_output.h"
39
#include "vlc_playlist.h"
40
#include "vlc_interface.h"
41
#include "vlc_interaction.h"
42

43
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
44
 * Local prototypes
45
 *****************************************************************************/
46
static  int Run  ( input_thread_t *p_input );
47
static  int RunAndClean  ( input_thread_t *p_input );
48

49 50 51 52 53
static input_thread_t * Create  ( vlc_object_t *, input_item_t *, vlc_bool_t );
static  int             Init    ( input_thread_t *p_input, vlc_bool_t b_quick );
static void             Error   ( input_thread_t *p_input );
static void             End     ( input_thread_t *p_input );
static void             MainLoop( input_thread_t *p_input );
54 55 56 57

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 );
58

59

60 61
static int  UpdateFromAccess( input_thread_t * );
static int  UpdateFromDemux( input_thread_t * );
62
static int  UpdateMeta( input_thread_t *, vlc_bool_t );
Michel Kaempf's avatar
Michel Kaempf committed
63

64
static void UpdateItemLength( input_thread_t *, int64_t i_length, vlc_bool_t );
65

66 67
static void ParseOption( input_thread_t *p_input, const char *psz_option );

68
static void DecodeUrl( char * );
69
static void MRLSections( input_thread_t *, char *, int *, int *, int *, int *);
70 71

static input_source_t *InputSourceNew( input_thread_t *);
72
static int  InputSourceInit( input_thread_t *, input_source_t *,
73 74
                             char *, char *psz_forced_demux,
                             vlc_bool_t b_quick );
75 76 77 78
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 );
79

80 81
static vlc_meta_t *InputMetaUser( input_thread_t *p_input );

82
/*****************************************************************************
83 84
 * This function creates a new input, and returns a pointer
 * to its description. On error, it returns NULL.
85 86 87 88 89 90 91 92 93 94
 *
 * 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
95
 *  - audio-delay, spu-delay
96 97 98 99
 *  - bookmark
 * * Get only:
 *  - length
 *  - bookmarks
100
 *  - seekable (if you can seek, it doesn't say if 'bar display' has be shown or not, for that check position != 0.0)
101 102 103 104
 * * For intf callback upon changes
 *  - intf-change
 * TODO explain when Callback is called
 * TODO complete this list (?)
105
 *****************************************************************************/
106 107
static input_thread_t *Create( vlc_object_t *p_parent, input_item_t *p_item,
                               vlc_bool_t b_quick )
Michel Kaempf's avatar
Michel Kaempf committed
108
{
109
    input_thread_t *p_input;                        /* thread descriptor */
110 111
    vlc_value_t val;
    int i;
112

113
    /* Allocate descriptor */
114
    p_input = vlc_object_create( p_parent, VLC_OBJECT_INPUT );
115
    if( p_input == NULL )
Michel Kaempf's avatar
Michel Kaempf committed
116
    {
117
        msg_Err( p_parent, "out of memory" );
118
        return NULL;
Michel Kaempf's avatar
Michel Kaempf committed
119
    }
120

121 122 123 124 125 126 127 128
    /* 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;
129
    p_input->i_title_offset = p_input->i_seekpoint_offset = 0;
130 131 132 133
    p_input->i_state = INIT_S;
    p_input->i_rate  = INPUT_RATE_DEFAULT;
    p_input->i_bookmark = 0;
    p_input->bookmark = NULL;
134
    p_input->p_meta  = NULL;
135 136
    p_input->p_es_out = NULL;
    p_input->p_sout  = NULL;
137
    p_input->b_out_pace_control = VLC_FALSE;
138 139 140 141 142 143 144 145 146 147
    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;
148
    p_input->input.i_title_offset = p_input->input.i_seekpoint_offset = 0;
149 150 151 152
    p_input->input.b_can_pace_control = VLC_TRUE;
    p_input->input.b_eof = VLC_FALSE;
    p_input->input.i_cr_average = 0;

153 154 155 156
    /* No slave */
    p_input->i_slave = 0;
    p_input->slave   = NULL;

157 158 159
    /* Init control buffer */
    vlc_mutex_init( p_input, &p_input->lock_control );
    p_input->i_control = 0;
160

161
    /* Parse input options */
162 163
    vlc_mutex_lock( &p_item->lock );
    for( i = 0; i < p_item->i_options; i++ )
164
    {
165
        ParseOption( p_input, p_item->ppsz_options[i] );
166
    }
167
    vlc_mutex_unlock( &p_item->lock );
168

169 170
    /* Create Object Variables for private use only */
    input_ConfigVarInit( p_input );
Michel Kaempf's avatar
Michel Kaempf committed
171

172 173 174
    /* 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
175

176
    if( !b_quick )
Gildas Bazin's avatar
Gildas Bazin committed
177
    {
178 179
        var_Get( p_input, "bookmarks", &val );
        if( val.psz_string )
Gildas Bazin's avatar
Gildas Bazin committed
180
        {
181 182 183 184
            /* 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, '{' ) ) )
Gildas Bazin's avatar
Gildas Bazin committed
185
            {
186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210
                 seekpoint_t *p_seekpoint = vlc_seekpoint_New();
                 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 = ',';
                 while( (psz_end = strchr( psz_start, ',' ) ) )
                 {
                     *psz_end = 0;
                     if( !strncmp( psz_start, "name=", 5 ) )
                     {
                         p_seekpoint->psz_name = psz_start + 5;
                     }
                     else if( !strncmp( psz_start, "bytes=", 6 ) )
                     {
                         p_seekpoint->i_byte_offset = atoll(psz_start + 6);
                     }
                     else if( !strncmp( psz_start, "time=", 5 ) )
                     {
                         p_seekpoint->i_time_offset = atoll(psz_start + 5) * 1000000;
                     }
                     psz_start = psz_end + 1;
Gildas Bazin's avatar
Gildas Bazin committed
211
                }
212 213 214 215 216 217
                msg_Dbg( p_input, "adding bookmark: %s, bytes="I64Fd", time="I64Fd,
                                  p_seekpoint->psz_name, p_seekpoint->i_byte_offset,
                                  p_seekpoint->i_time_offset );
                input_Control( p_input, INPUT_ADD_BOOKMARK, p_seekpoint );
                vlc_seekpoint_Delete( p_seekpoint );
                *psz_parser = backup;
Gildas Bazin's avatar
Gildas Bazin committed
218
            }
219
            free( val.psz_string );
Gildas Bazin's avatar
Gildas Bazin committed
220 221 222
        }
    }

223 224
    /* Remove 'Now playing' info as it is probably outdated */
    input_Control( p_input, INPUT_DEL_INFO, _("Meta-information"),
225 226 227 228 229 230 231 232 233 234 235 236 237 238 239
                    VLC_META_NOW_PLAYING );

    return p_input;
}

/**
 * Initialize an input thread and run it. You will need to monitor the thread to clean
 * up after it is done
 *
 * \param p_parent a vlc_object
 * \param p_item an input item
 * \return a pointer to the spawned input thread
 */
input_thread_t *__input_CreateThread( vlc_object_t *p_parent,
                                      input_item_t *p_item )
240

241 242 243 244
{
    input_thread_t *p_input;                        /* thread descriptor */

    p_input = Create( p_parent, p_item, VLC_FALSE );
245
    /* Now we can attach our new input */
246
    vlc_object_attach( p_input, p_parent );
247

Sam Hocevar's avatar
Sam Hocevar committed
248
    /* Create thread and wait for its readiness. */
249
    if( vlc_thread_create( p_input, "input", Run,
250
                            VLC_THREAD_PRIORITY_INPUT, VLC_TRUE ) )
Michel Kaempf's avatar
Michel Kaempf committed
251
    {
252
        msg_Err( p_input, "cannot create input thread" );
253 254
        vlc_object_detach( p_input );
        vlc_object_destroy( p_input );
255
        return NULL;
Michel Kaempf's avatar
Michel Kaempf committed
256
    }
257

258
    return p_input;
Michel Kaempf's avatar
Michel Kaempf committed
259 260
}

261 262 263 264 265 266 267 268

/**
 * Initialize an input thread and run it. This thread will clean after himself,
 * you can forget about it. It can work either in blocking or non-blocking mode
 *
 * \param p_parent a vlc_object
 * \param p_item an input item
 * \param b_block should we block until read is finished ?
269
 * \return the input object id if non blocking, 0 else
270
 */
271
int __input_Read( vlc_object_t *p_parent, input_item_t *p_item,
272
                   vlc_bool_t b_block )
273 274 275
{
    input_thread_t *p_input;                        /* thread descriptor */

276 277 278 279 280
    p_input = Create( p_parent, p_item, VLC_FALSE );
    /* Now we can attach our new input */
    vlc_object_attach( p_input, p_parent );

    if( b_block )
281
    {
282
        RunAndClean( p_input );
283
        return 0;
284
    }
285
    else
286
    {
287 288 289 290 291 292 293 294
        if( vlc_thread_create( p_input, "input", RunAndClean,
                               VLC_THREAD_PRIORITY_INPUT, VLC_TRUE ) )
        {
            msg_Err( p_input, "cannot create input thread" );
            vlc_object_detach( p_input );
            vlc_object_destroy( p_input );
            return;
        }
295
    }
296
    return p_input->i_object_id;
297
}
298

299 300 301 302 303 304 305 306 307 308 309
/**
 * Initialize an input and initialize it to preparse the item
 * This function is blocking. It will only accept to parse files
 *
 * \param p_parent a vlc_object_t
 * \param p_item an input item
 * \return VLC_SUCCESS or an error
 */
int __input_Preparse( vlc_object_t *p_parent, input_item_t *p_item )
{
    input_thread_t *p_input;                        /* thread descriptor */
310

311 312
    /* Allocate descriptor */
    p_input = Create( p_parent, p_item, VLC_TRUE );
313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337

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

    Init( p_input, VLC_TRUE );

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

    /* Kill access and demux */
    if( p_input->input.p_access ) p_input->input.p_access->b_die = VLC_TRUE;
    if( p_input->input.p_demux ) p_input->input.p_access->b_die = VLC_TRUE;

    /* Unload all modules */
    if( p_input->p_es_out ) input_EsOutDelete( p_input->p_es_out );

    /* Delete meta */
    if( p_input->p_meta ) vlc_meta_Delete( p_input->p_meta );

    vlc_object_detach( p_input );
    vlc_object_destroy( p_input );

    return VLC_SUCCESS;
}

338 339 340 341 342
/**
 * Request a running input thread to stop and die
 *
 * \param the input thread to stop
 */
Sam Hocevar's avatar
Sam Hocevar committed
343
void input_StopThread( input_thread_t *p_input )
Michel Kaempf's avatar
Michel Kaempf committed
344
{
345 346
    vlc_list_t *p_list;
    int i;
347

348 349
    /* Set die for input */
    p_input->b_die = VLC_TRUE;
350

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

354 355 356
    /* 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++ )
357
    {
358
        p_list->p_values[i].p_object->b_die = VLC_TRUE;
359
    }
360
    vlc_list_release( p_list );
361

362 363 364
    /* 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++ )
365
    {
366
        p_list->p_values[i].p_object->b_die = VLC_TRUE;
367
    }
368
    vlc_list_release( p_list );
369

370 371 372 373 374 375 376
    /* 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
377

378
    input_ControlPush( p_input, INPUT_CONTROL_SET_DIE, NULL );
379 380
}

381 382 383 384 385 386
/**
 * Clean up a dead input thread
 * This function does not return until the thread is effectively cancelled.
 *
 * \param the input thread to kill
 */
387 388 389
void input_DestroyThread( input_thread_t *p_input )
{
    /* Join the thread */
390
    vlc_thread_join( p_input );
391

392 393 394 395 396
    /* 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
397 398
}

399
/*****************************************************************************
400
 * Run: main thread loop
401 402
 * This is the "normal" thread that spawns the input processing chain,
 * reads the stream, cleans up and waits
403
 *****************************************************************************/
404
static int Run( input_thread_t *p_input )
Michel Kaempf's avatar
Michel Kaempf committed
405
{
406

407
    /* Signal that the thread is launched */
Sam Hocevar's avatar
Sam Hocevar committed
408 409
    vlc_thread_ready( p_input );

410
    if( Init( p_input, VLC_FALSE ) )
411 412
    {
        /* If we failed, wait before we are killed, and exit */
413
        p_input->b_error = VLC_TRUE;
414

415
        Error( p_input );
416 417

        /* Tell we're dead */
418
        p_input->b_dead = VLC_TRUE;
419

420
        return 0;
421
    }
Michel Kaempf's avatar
Michel Kaempf committed
422

423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504
    MainLoop( p_input );

    if( !p_input->b_eof && !p_input->b_error && p_input->input.b_eof )
    {
        /* We have finish to demux data but not to play them */
        while( !p_input->b_die )
        {
            if( input_EsOutDecodersEmpty( p_input->p_es_out ) )
                break;

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

            msleep( INPUT_IDLE_SLEEP );
        }

        /* We have finished */
        p_input->b_eof = VLC_TRUE;
    }

    /* Wait we are asked to die */
    if( !p_input->b_die )
    {
        Error( p_input );
    }

    /* Clean up */
    End( p_input );

    return 0;
}

/*****************************************************************************
 * RunAndClean: main thread loop
 * This is the "just forget me" thread that spawns the input processing chain,
 * reads the stream, cleans up and releases memory
 *****************************************************************************/
static int RunAndClean( input_thread_t *p_input )
{
    /* Signal that the thread is launched */
    vlc_thread_ready( p_input );

    if( Init( p_input, VLC_FALSE ) )
    {
        /* If we failed, just exit */
        return 0;
    }

    MainLoop( p_input );

    if( !p_input->b_eof && !p_input->b_error && p_input->input.b_eof )
    {
        /* We have finish to demux data but not to play them */
        while( !p_input->b_die )
        {
            if( input_EsOutDecodersEmpty( p_input->p_es_out ) )
                break;

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

            msleep( INPUT_IDLE_SLEEP );
        }
        /* We have finished */
        p_input->b_eof = VLC_TRUE;
    }

    /* Clean up */
    End( p_input );

    /* Release memory */
    vlc_object_detach( p_input );
    vlc_object_destroy( p_input );

    return 0;
}


/*****************************************************************************
 * Main loop: Fill buffers from access, and demux
 *****************************************************************************/
static void MainLoop( input_thread_t *p_input )
{
    int64_t i_intf_update = 0;
505
    while( !p_input->b_die && !p_input->b_error && !p_input->input.b_eof )
506
    {
507 508 509 510
        vlc_bool_t b_force_update = VLC_FALSE;
        int i_ret;
        int i_type;
        vlc_value_t val;
511

512 513
        /* Do the read */
        if( p_input->i_state != PAUSE_S  )
514
        {
515 516 517 518
            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 */
519

520 521 522 523 524 525
            if( i_ret > 0 )
            {
                /* TODO */
                if( p_input->input.b_title_demux &&
                    p_input->input.p_demux->info.i_update )
                {
526
                    i_ret = UpdateFromDemux( p_input );
527 528 529 530 531 532
                    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 )
                {
533
                    i_ret = UpdateFromAccess( p_input );
534 535 536
                    b_force_update = VLC_TRUE;
                }
            }
537 538

            if( i_ret == 0 )    /* EOF */
539 540
            {
                vlc_value_t repeat;
541

542 543 544 545 546 547 548 549 550
                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
551
                {
Gildas Bazin's avatar
Gildas Bazin committed
552 553
                    msg_Dbg( p_input, "repeating the same input (%d)",
                             repeat.i_int );
554 555 556 557 558
                    if( repeat.i_int > 0 )
                    {
                        repeat.i_int--;
                        var_Set( p_input, "input-repeat", repeat );
                    }
559

560 561 562 563 564 565 566 567 568 569 570 571 572 573 574
                    /* Seek to start title/seekpoint */
                    val.i_int = p_input->input.i_title_start -
                        p_input->input.i_title_offset;
                    if( val.i_int < 0 || val.i_int >= p_input->input.i_title )
                        val.i_int = 0;
                    input_ControlPush( p_input,
                                       INPUT_CONTROL_SET_TITLE, &val );

                    val.i_int = p_input->input.i_seekpoint_start -
                        p_input->input.i_seekpoint_offset;
                    if( val.i_int > 0 /* TODO: check upper boundary */ )
                        input_ControlPush( p_input,
                                           INPUT_CONTROL_SET_SEEKPOINT, &val );

                    /* Seek to start position */
575 576 577 578 579 580 581 582 583 584 585 586
                    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 );
                    }
587 588
                }
            }
589 590 591 592
            else if( i_ret < 0 )
            {
                p_input->b_error = VLC_TRUE;
            }
593 594 595 596 597

            if( i_ret > 0 && p_input->i_slave > 0 )
            {
                SlaveDemux( p_input );
            }
598
        }
599
        else
600
        {
601 602 603
            /* Small wait */
            msleep( 10*1000 );
        }
604

605 606 607 608 609 610 611 612 613 614
        /* 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 );
615

616
        if( b_force_update || i_intf_update < mdate() )
617 618 619 620 621
        {
            vlc_value_t val;
            double f_pos;
            int64_t i_time, i_length;
            /* update input status variables */
Gildas Bazin's avatar
Gildas Bazin committed
622 623
            if( !demux2_Control( p_input->input.p_demux,
                                 DEMUX_GET_POSITION, &f_pos ) )
624 625 626 627
            {
                val.f_float = (float)f_pos;
                var_Change( p_input, "position", VLC_VAR_SETVALUE, &val, NULL );
            }
Gildas Bazin's avatar
Gildas Bazin committed
628 629
            if( !demux2_Control( p_input->input.p_demux,
                                 DEMUX_GET_TIME, &i_time ) )
630 631 632 633 634
            {
                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
635 636
            if( !demux2_Control( p_input->input.p_demux,
                                 DEMUX_GET_LENGTH, &i_length ) )
637 638 639 640 641
            {
                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 );
642

643
                if( old_val.i_time != val.i_time )
644
                {
645
                    UpdateItemLength( p_input, i_length, VLC_TRUE );
646 647
                }
            }
648 649 650

            var_SetBool( p_input, "intf-change", VLC_TRUE );
            i_intf_update = mdate() + I64C(150000);
651
        }
652
    }
653 654
}

655 656

static int Init( input_thread_t * p_input, vlc_bool_t b_quick )
Michel Kaempf's avatar
Michel Kaempf committed
657
{
658
    char *psz;
659
    char *psz_subtitle;
660
    vlc_value_t val;
661
    double f_fps;
662
    vlc_meta_t *p_meta, *p_meta_tmp;
663
    int i_es_out_mode;
664
    int i, i_delay;
665

666 667 668 669 670 671 672
    /* Initialize optional stream output. (before access/demuxer)
     * XXX: we add a special case if the uri starts by vlc.
     * else 'vlc in.file --sout "" vlc:quit'  cannot work (the output will
     * be destroyed in case of a file).
     * (this will break playing of file starting by 'vlc:' but I don't
     * want to add more logic, just force file by file:// or code it ;)
     */
673
    if( !b_quick )
674
    {
675
        psz = var_GetString( p_input, "sout" );
676
        if( *psz && strncasecmp( p_input->input.p_item->psz_uri, "vlc:", 4 ) )
677
        {
678 679 680
            p_input->p_sout = sout_NewInstance( p_input, psz );
            if( p_input->p_sout == NULL )
            {
Gildas Bazin's avatar
Gildas Bazin committed
681
                msg_Err( p_input, "cannot start stream output instance, " \
682 683 684 685
                                  "aborting" );
                free( psz );
                return VLC_EGENERIC;
            }
686
        }
687
        free( psz );
688
    }
Christophe Massiot's avatar
Christophe Massiot committed
689

690
    /* Create es out */
691
    p_input->p_es_out = input_EsOutNew( p_input );
692 693
    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 );
694

695
    if( InputSourceInit( p_input, &p_input->input,
696
                         p_input->input.p_item->psz_uri, NULL, b_quick ) )
697
    {
698
        goto error;
699
    }
700

701
    /* Create global title (from master) */
702
    if( !b_quick )
703
    {
704 705 706 707 708 709 710 711 712 713
        p_input->i_title = p_input->input.i_title;
        p_input->title   = p_input->input.title;
        p_input->i_title_offset = p_input->input.i_title_offset;
        p_input->i_seekpoint_offset = p_input->input.i_seekpoint_offset;
        if( p_input->i_title > 0 )
        {
            /* Setup variables */
            input_ControlVarNavigation( p_input );
            input_ControlVarTitle( p_input, 0 );
        }
714

715 716 717
        /* 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;
718

719
        /* Fix pts delay */
720 721
        if( p_input->i_pts_delay < 0 )
            p_input->i_pts_delay = 0;
722

723 724 725 726
        /* If the desynchronisation requested by the user is < 0, we need to
         * cache more data. */
        var_Get( p_input, "audio-desync", &val );
        if( val.i_int < 0 ) p_input->i_pts_delay -= (val.i_int * 1000);
727

728 729 730
        /* Update cr_average depending on the caching */
        p_input->input.i_cr_average *= (10 * p_input->i_pts_delay / 200000);
        p_input->input.i_cr_average /= 10;
731
        if( p_input->input.i_cr_average < 10 ) p_input->input.i_cr_average = 10;
732
    }
733

734
    /* Load master infos */
735
    /* Init length */
Gildas Bazin's avatar
Gildas Bazin committed
736 737
    if( !demux2_Control( p_input->input.p_demux, DEMUX_GET_LENGTH,
                         &val.i_time ) && val.i_time > 0 )
738 739
    {
        var_Change( p_input, "length", VLC_VAR_SETVALUE, &val, NULL );
740
        UpdateItemLength( p_input, val.i_time, b_quick );
741
        p_input->input.p_item->i_duration = val.i_time;
742
    }
743 744

    /* Start title/chapter */
745
    if( !b_quick )
746
    {
747 748 749 750 751 752 753 754 755 756 757 758 759 760 761 762 763
        val.i_int = p_input->input.i_title_start -
                    p_input->input.i_title_offset;
        if( val.i_int > 0 && val.i_int < p_input->input.i_title )
            input_ControlPush( p_input, INPUT_CONTROL_SET_TITLE, &val );
        val.i_int = p_input->input.i_seekpoint_start -
                    p_input->input.i_seekpoint_offset;
        if( val.i_int > 0 /* TODO: check upper boundary */ )
            input_ControlPush( p_input, INPUT_CONTROL_SET_SEEKPOINT, &val );

        /* 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 )
764
        {
765 766 767 768 769 770 771
            if( p_input->i_start >= val.i_time )
            {
                msg_Warn( p_input, "invalid start-time ignored" );
            }
            else
            {
                vlc_value_t s;
772

773
                msg_Dbg( p_input, "starting at time: %ds",
774
                                  (int)( p_input->i_start / I64C(1000000) ) );
775

776 777 778
                s.i_time = p_input->i_start;
                input_ControlPush( p_input, INPUT_CONTROL_SET_TIME, &s );
            }
779
        }
780
        if( p_input->i_stop > 0 && p_input->i_stop <= p_input->i_start )
781
        {
782 783
            msg_Warn( p_input, "invalid stop-time ignored" );
            p_input->i_stop = 0;
784 785
        }

786

787 788 789 790 791 792
        /* 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 )
        {
            float f_requested_fps;
793

794 795
            var_Create( p_input, "sub-original-fps", VLC_VAR_FLOAT );
            var_SetFloat( p_input, "sub-original-fps", f_fps );
796

797 798 799 800 801 802 803 804
            f_requested_fps = var_CreateGetFloat( p_input, "sub-fps" );
            if( f_requested_fps != f_fps )
            {
                var_Create( p_input, "sub-fps", VLC_VAR_FLOAT|
                                                VLC_VAR_DOINHERIT );
                var_SetFloat( p_input, "sub-fps", f_requested_fps );
            }
        }
805

806 807 808 809 810
        i_delay = var_CreateGetInteger( p_input, "sub-delay" );
        if( i_delay != 0 )
        {
            var_SetTime( p_input, "spu-delay", (mtime_t)i_delay * 100000 );
        }
811 812


813 814 815
        /* Look for and add subtitle files */
        psz_subtitle = var_GetString( p_input, "sub-file" );
        if( *psz_subtitle )
816
        {
817 818 819 820 821
            input_source_t *sub;
            vlc_value_t count;
            vlc_value_t list;

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

823 824 825 826 827 828
            var_Change( p_input, "spu-es", VLC_VAR_CHOICESCOUNT, &count, NULL );

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

832 833 834
                /* Select the ES */
                if( !var_Change( p_input, "spu-es", VLC_VAR_GETLIST, &list,
                                 NULL ) )
835
                {
836 837 838 839 840 841 842 843 844 845 846
                    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 )
                    {
                        input_ControlPush( p_input, INPUT_CONTROL_SET_ES,
                                          &list.p_list->p_values[count.i_int] );
                    }
                    var_Change( p_input, "spu-es", VLC_VAR_FREELIST, &list,
                                NULL );
847 848 849
                }
            }
        }
850

851 852
        var_Get( p_input, "sub-autodetect-file", &val );
        if( val.b_bool )
853
        {
854
            char *psz_autopath = var_GetString( p_input, "sub-autodetect-path" );
855 856 857 858
            char **subs = subtitles_Detect( p_input, psz_autopath,
                                            p_input->input.p_item->psz_uri );
            input_source_t *sub;

859
            for( i = 0; subs && subs[i]; i++ )
860
            {
861
                if( strcmp( psz_subtitle, subs[i] ) )
862
                {
863 864 865 866 867 868
                    sub = InputSourceNew( p_input );
                    if( !InputSourceInit( p_input, sub, subs[i], "subtitle",
                                          VLC_FALSE ) )
                    {
                         TAB_APPEND( p_input->i_slave, p_input->slave, sub );
                    }
869
                }
870
                free( subs[i] );
871
            }
872 873
            if( subs ) free( subs );
            if( psz_autopath ) free( psz_autopath );
874
        }
875
        free( psz_subtitle );
876

877 878 879
        /* Look for slave */
        psz = var_GetString( p_input, "input-slave" );
        if( *psz )
880
        {
881 882 883
            char *psz_delim;
            input_source_t *slave;
            while( psz && *psz )
884
            {
885 886 887 888 889 890 891 892 893 894 895 896
                while( *psz == ' ' || *psz == '#' )
                {
                    psz++;
                }
                if( ( psz_delim = strchr( psz, '#' ) ) )
                {
                    *psz_delim++ = '\0';
                }
                if( *psz == 0 )
                {
                    break;
                }
897

898
                msg_Dbg( p_input, "adding slave input '%s'", psz );
899 900 901 902 903 904
                slave = InputSourceNew( p_input );
                if( !InputSourceInit( p_input, slave, psz, NULL, VLC_FALSE ) )
                {
                    TAB_APPEND( p_input->i_slave, p_input->slave, slave );
                }
                psz = psz_delim;
905 906
            }
        }
907 908 909 910 911 912
        if( psz ) free( psz );
    }
    else
    {
        p_input->i_start = 0;
        p_input->i_start = 0;
913
    }
914 915

    /* Set up es_out */
916
    if( !b_quick )
917
    {
918 919 920 921
        es_out_Control( p_input->p_es_out, ES_OUT_SET_ACTIVE, VLC_TRUE );
        i_es_out_mode = ES_OUT_MODE_AUTO;
        val.p_list = NULL;
        if( p_input->p_sout )
922
        {
923 924
            var_Get( p_input, "sout-all", &val );
            if ( val.b_bool )
925
            {
926 927
                i_es_out_mode = ES_OUT_MODE_ALL;
                val.p_list = NULL;
928 929
            }
            else
930 931 932 933 934 935 936 937 938 939 940
            {
                var_Get( p_input, "programs", &val );
                if ( val.p_list && val.p_list->i_count )
                {
                    i_es_out_mode = ES_OUT_MODE_PARTIAL;
                    /* Note : we should remove the "program" callback. */
                }
                else
                    var_Change( p_input, "programs", VLC_VAR_FREELIST, &val,
                                NULL );
            }
941
        }
942
        es_out_Control( p_input->p_es_out, ES_OUT_SET_MODE, i_es_out_mode );
943

944 945
        /* Inform the demuxer about waited group (needed only for DVB) */
        if( i_es_out_mode == ES_OUT_MODE_ALL )
946
        {
947 948 949 950 951 952
            demux2_Control( p_input->input.p_demux, DEMUX_SET_GROUP, -1, NULL );
        }
        else if( i_es_out_mode == ES_OUT_MODE_PARTIAL )
        {
            demux2_Control( p_input->input.p_demux, DEMUX_SET_GROUP, -1,
                            val.p_list );
953
        }
954 955
        else
        {
956 957 958 959 960 961 962 963 964 965 966 967 968 969
            demux2_Control( p_input->input.p_demux, DEMUX_SET_GROUP,
                           (int) var_GetInteger( p_input, "program" ), NULL );
        }

        if( p_input->p_sout )
        {
            if( p_input->p_sout->i_out_pace_nocontrol > 0 )
            {
                p_input->b_out_pace_control = VLC_FALSE;
            }
            else
            {
                p_input->b_out_pace_control = VLC_TRUE;
            }
970 971 972 973 974 975 976 977

            if( p_input->b_can_pace_control && p_input->b_out_pace_control )
            {
                /* We don't want a high input priority here or we'll
                 * end-up sucking up all the CPU time */
                vlc_thread_set_priority( p_input, VLC_THREAD_PRIORITY_LOW );
            }

978 979
            msg_Dbg( p_input, "starting in %s mode",
                     p_input->b_out_pace_control ? "asynch" : "synch" );
980
        }
981 982
    }

983
    /* Get meta data from users */
984
    p_meta_tmp = InputMetaUser( p_input );
985

986 987 988
    /* Get meta data from master input */
    if( demux2_Control( p_input->input.p_demux, DEMUX_GET_META, &p_meta ) )
        p_meta = NULL;
989

990 991
    /* Merge them */
    if( p_meta == NULL )
992
    {
993
        p_meta = p_meta_tmp;
994
    }
995
    else if( p_meta_tmp )
996
    {
997 998 999 1000
        vlc_meta_Merge( p_meta, p_meta_tmp );
        vlc_meta_Delete( p_meta_tmp );
    }

1001 1002
    /* Access_file does not give any meta, and there are no slave */
    if( !b_quick )
1003
    {
1004 1005 1006 1007
        if( !p_input->input.p_access ||
            access2_Control( p_input->input.p_access, ACCESS_GET_META,
                             &p_meta_tmp))
            p_meta_tmp = NULL;
1008

1009
        if( p_meta == NULL )
1010
        {
1011 1012 1013 1014 1015 1016
            p_meta = p_meta_tmp;
        }
        else if( p_meta_tmp )
        {
            vlc_meta_Merge( p_meta, p_meta_tmp );
            vlc_meta_Delete( p_meta_tmp );
1017 1018
        }

1019 1020
        /* Get meta data from slave input */
        for( i = 0; i < p_input->i_slave; i++ )
1021
        {
1022 1023 1024 1025
            vlc_meta_t *p_meta_slave;

            if( !demux2_Control( p_input->slave[i]->p_demux,
                                 DEMUX_GET_META, &p_meta_slave ) )
1026
            {
1027 1028 1029 1030 1031 1032 1033 1034 1035
                if( p_meta == NULL )
                {
                    p_meta = p_meta_slave;
                }
                else if( p_meta_slave )
                {
                    vlc_meta_Merge( p_meta, p_meta_slave );
                    vlc_meta_Delete( p_meta_slave );
                }
1036
            }
1037 1038 1039 1040

            if( p_input->slave[i]->p_access &&
                !access2_Control( p_input->slave[i]->p_access,
                                  ACCESS_GET_META, &p_meta_slave ) )
1041
            {
1042 1043 1044 1045 1046 1047 1048 1049 1050
                if( p_meta == NULL )
                {
                    p_meta = p_meta_slave;
                }
                else if( p_meta_slave )
                {
                    vlc_meta_Merge( p_meta, p_meta_slave );
                    vlc_meta_Delete( p_meta_slave );
                }
1051 1052 1053
            }
        }
    }
1054 1055

    p_input->p_meta = p_meta;
1056
    UpdateMeta( p_input, b_quick );
1057

1058 1059
    if( !b_quick )
    {
1060
        msg_Dbg( p_input, "`%s' successfully opened",
1061 1062 1063
                 p_input->input.p_item->psz_uri );

    }
1064

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

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

1071
    return VLC_SUCCESS;
1072

1073 1074 1075
error:
    if( p_input->p_es_out )
        input_EsOutDelete( p_input->p_es_out );
Laurent Aimar's avatar
Laurent Aimar committed
1076

1077 1078
    if( p_input->p_sout )
        sout_DeleteInstance( p_input->p_sout );
1079

1080 1081 1082 1083 1084 1085
    /* 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;
1086

1087
    return VLC_EGENERIC;
Michel Kaempf's avatar
Michel Kaempf committed
1088 1089
}

1090
/*****************************************************************************
1091
 * Error: RunThread() error loop
1092
 *****************************************************************************
Sam Hocevar's avatar
Sam Hocevar committed
1093
 * This function is called when an error occurred during thread main's loop.
1094
 *****************************************************************************/
1095
static void Error( input_thread_t *p_input )
Michel Kaempf's avatar
Michel Kaempf committed
1096
{
1097
    while( !p_input->b_die )
Michel Kaempf's avatar
Michel Kaempf committed
1098
    {
1099 1100
        /* Sleep a while */
        msleep( INPUT_IDLE_SLEEP );
Michel Kaempf's avatar
Michel Kaempf committed
1101 1102 1103
    }
}

1104
/*****************************************************************************
1105
 * End: end the input thread
1106
 *****************************************************************************/
1107
static void End( input_thread_t * p_input )