input.c 86.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
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
Antoine Cellerier's avatar
Antoine Cellerier committed
22
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, 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
#include "vlc_meta_engine.h"
43

44 45
#include "charset.h"

46 47 48 49
#ifdef HAVE_SYS_STAT_H
#   include <sys/stat.h>
#endif

50
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
51
 * Local prototypes
52
 *****************************************************************************/
53
static  int Run  ( input_thread_t *p_input );
54
static  int RunAndClean  ( input_thread_t *p_input );
55

56 57
static input_thread_t * Create  ( vlc_object_t *, input_item_t *, char *,
                                  vlc_bool_t );
58 59 60 61
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 );
62 63 64 65

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

67 68
static int  UpdateFromAccess( input_thread_t * );
static int  UpdateFromDemux( input_thread_t * );
69
static int  UpdateMeta( input_thread_t *, vlc_bool_t );
Michel Kaempf's avatar
Michel Kaempf committed
70

71
static void UpdateItemLength( input_thread_t *, int64_t i_length, vlc_bool_t );
72

73
static void DecodeUrl( char * );
74
static void MRLSections( input_thread_t *, char *, int *, int *, int *, int *);
75 76

static input_source_t *InputSourceNew( input_thread_t *);
77
static int  InputSourceInit( input_thread_t *, input_source_t *,
78 79
                             char *, char *psz_forced_demux,
                             vlc_bool_t b_quick );
80 81 82 83
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 );
84

85
static void InputMetaUser( input_thread_t *p_input );
86

87 88
int input_DownloadAndCacheArt( vlc_object_t *p_parent, input_item_t *p_item );

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

120
    /* Allocate descriptor */
121
    p_input = vlc_object_create( p_parent, VLC_OBJECT_INPUT );
122
    if( p_input == NULL )
Michel Kaempf's avatar
Michel Kaempf committed
123
    {
124
        msg_Err( p_parent, "out of memory" );
125
        return NULL;
Michel Kaempf's avatar
Michel Kaempf committed
126
    }
127
    p_input->psz_header = psz_header ? strdup( psz_header ) : NULL;
128

129 130 131 132 133 134 135 136
    /* 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;
137
    p_input->i_title_offset = p_input->i_seekpoint_offset = 0;
138 139 140 141
    p_input->i_state = INIT_S;
    p_input->i_rate  = INPUT_RATE_DEFAULT;
    p_input->i_bookmark = 0;
    p_input->bookmark = NULL;
142
    p_input->p_meta  = NULL;
143 144
    p_input->p_es_out = NULL;
    p_input->p_sout  = NULL;
145
    p_input->b_out_pace_control = VLC_FALSE;
146 147 148 149 150 151 152 153 154 155
    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;
156
    p_input->input.i_title_offset = p_input->input.i_seekpoint_offset = 0;
157 158 159 160
    p_input->input.b_can_pace_control = VLC_TRUE;
    p_input->input.b_eof = VLC_FALSE;
    p_input->input.i_cr_average = 0;

161 162
    if( !p_input->input.p_item->p_meta )
        p_input->input.p_item->p_meta = vlc_meta_New();
163 164
    stats_ReinitInputStats( p_item->p_stats );

165 166 167 168
    /* No slave */
    p_input->i_slave = 0;
    p_input->slave   = NULL;

169 170 171
    /* Init control buffer */
    vlc_mutex_init( p_input, &p_input->lock_control );
    p_input->i_control = 0;
172

173
    /* Parse input options */
174 175
    vlc_mutex_lock( &p_item->lock );
    for( i = 0; i < p_item->i_options; i++ )
176
    {
177
        var_OptionParse( p_input, p_item->ppsz_options[i] );
178
    }
179
    vlc_mutex_unlock( &p_item->lock );
180

181 182
    /* Create Object Variables for private use only */
    input_ConfigVarInit( p_input );
Michel Kaempf's avatar
Michel Kaempf committed
183

184 185 186
    /* 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
187

188
    if( !b_quick )
Gildas Bazin's avatar
Gildas Bazin committed
189
    {
190 191
        var_Get( p_input, "bookmarks", &val );
        if( val.psz_string )
Gildas Bazin's avatar
Gildas Bazin committed
192
        {
193 194 195 196
            /* 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
197
            {
198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219
                 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 ) )
                     {
220 221
                         p_seekpoint->i_time_offset = atoll(psz_start + 5) *
                                                        1000000;
222 223
                     }
                     psz_start = psz_end + 1;
Gildas Bazin's avatar
Gildas Bazin committed
224
                }
225 226 227 228 229 230
                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
231
            }
232
            free( val.psz_string );
Gildas Bazin's avatar
Gildas Bazin committed
233 234 235
        }
    }

236
    /* Remove 'Now playing' info as it is probably outdated */
237 238
    input_Control( p_input, INPUT_DEL_INFO, _(VLC_META_INFO_CAT),
                   VLC_META_NOW_PLAYING );     /* ? Don't translate as it might has been copied ? */
239 240 241 242 243

    return p_input;
}

/**
244 245
 * Initialize an input thread and run it. You will need to monitor the
 * thread to clean up after it is done
246 247 248 249 250 251 252
 *
 * \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 )
253
{
254
    return __input_CreateThread2( p_parent, p_item, NULL );
255 256
}

257

258 259 260 261
/* Gruik ! */
input_thread_t *__input_CreateThread2( vlc_object_t *p_parent,
                                       input_item_t *p_item,
                                       char *psz_header )
262
{
263
    input_thread_t *p_input = NULL;      /* thread descriptor */
264

265
    p_input = Create( p_parent, p_item, psz_header, VLC_FALSE );
266
    /* Now we can attach our new input */
267
    vlc_object_attach( p_input, p_parent );
268

Sam Hocevar's avatar
Sam Hocevar committed
269
    /* Create thread and wait for its readiness. */
270
    if( vlc_thread_create( p_input, "input", Run,
271
                            VLC_THREAD_PRIORITY_INPUT, VLC_TRUE ) )
Michel Kaempf's avatar
Michel Kaempf committed
272
    {
273
        msg_Err( p_input, "cannot create input thread" );
274 275
        vlc_object_detach( p_input );
        vlc_object_destroy( p_input );
276
        return NULL;
Michel Kaempf's avatar
Michel Kaempf committed
277
    }
278

279
    return p_input;
Michel Kaempf's avatar
Michel Kaempf committed
280 281
}

282 283 284 285 286 287 288 289

/**
 * 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 ?
Clément Stenac's avatar
Clément Stenac committed
290
 * \return the input object id if non blocking, an error code else
291
 */
292
int __input_Read( vlc_object_t *p_parent, input_item_t *p_item,
293
                   vlc_bool_t b_block )
294
{
295
    input_thread_t *p_input = NULL;         /* thread descriptor */
296

297
    p_input = Create( p_parent, p_item, NULL, VLC_FALSE );
298 299 300 301
    /* Now we can attach our new input */
    vlc_object_attach( p_input, p_parent );

    if( b_block )
302
    {
303
        RunAndClean( p_input );
Clément Stenac's avatar
Clément Stenac committed
304
        return VLC_SUCCESS;
305
    }
306
    else
307
    {
308 309 310 311 312 313
        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 );
Clément Stenac's avatar
Clément Stenac committed
314
            return VLC_EGENERIC;
315
        }
316
    }
317
    return p_input->i_object_id;
318
}
319

320 321 322 323 324 325 326 327 328 329
/**
 * 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 )
{
330
    input_thread_t *p_input = NULL;           /* thread descriptor */
331

332
    /* Allocate descriptor */
333
    p_input = Create( p_parent, p_item, NULL, VLC_TRUE );
334
    p_input->i_flags |= OBJECT_FLAGS_QUIET;
335
    p_input->i_flags |= OBJECT_FLAGS_NOINTERACT;
336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353

    /* 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 );

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

    vlc_object_detach( p_input );
    vlc_object_destroy( p_input );

    return VLC_SUCCESS;
}

354 355 356 357 358 359 360 361 362 363 364
int __input_SecondaryPreparse( vlc_object_t *p_parent, input_item_t *p_item )
{
    struct meta_engine_t *p_me;

    /* FIXME: don't launch any module if we already have all the needed
     * info. Easiest way to do this would be to add a dummy module.
     * I'll do that later */

    p_me = vlc_object_create( p_parent, VLC_OBJECT_META_ENGINE );
    p_me->i_flags |= OBJECT_FLAGS_NOINTERACT;
    p_me->i_mandatory =   VLC_META_ENGINE_TITLE
365
                        | VLC_META_ENGINE_ARTIST;
366
    p_me->i_optional = 0;
367 368 369 370 371 372 373 374
    if( var_CreateGetInteger( p_parent, "album-art" ) != ALBUM_ART_NEVER )
    {
        p_me->i_mandatory |= VLC_META_ENGINE_ART_URL;
    }
    else
    {
        p_me->i_optional |= VLC_META_ENGINE_ART_URL;
    }
375 376 377
    p_me->p_item = p_item;
    p_me->p_module = module_Need( p_me, "meta engine", 0, VLC_FALSE );

378

379 380 381
    if( !p_me->p_module )
    {
        msg_Err( p_parent, "no suitable meta engine module" );
382 383
        vlc_object_detach( p_me );
        vlc_object_destroy( p_me );
384 385 386 387 388
        return VLC_EGENERIC;
    }

    module_Unneed( p_me, p_me->p_module );

389
    vlc_object_destroy( p_me );
390 391 392 393

    return VLC_SUCCESS;
}

394 395 396 397 398
/**
 * Request a running input thread to stop and die
 *
 * \param the input thread to stop
 */
Sam Hocevar's avatar
Sam Hocevar committed
399
void input_StopThread( input_thread_t *p_input )
Michel Kaempf's avatar
Michel Kaempf committed
400
{
401 402
    vlc_list_t *p_list;
    int i;
403

404 405
    /* Set die for input */
    p_input->b_die = VLC_TRUE;
406

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

410 411 412
    /* 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++ )
413
    {
414
        p_list->p_values[i].p_object->b_die = VLC_TRUE;
415
    }
416
    vlc_list_release( p_list );
417

418 419 420
    /* 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++ )
421
    {
422
        p_list->p_values[i].p_object->b_die = VLC_TRUE;
423
    }
424
    vlc_list_release( p_list );
425

426 427 428 429 430 431 432
    /* 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
433

434
    input_ControlPush( p_input, INPUT_CONTROL_SET_DIE, NULL );
435 436
}

437 438 439 440 441 442
/**
 * Clean up a dead input thread
 * This function does not return until the thread is effectively cancelled.
 *
 * \param the input thread to kill
 */
443 444 445
void input_DestroyThread( input_thread_t *p_input )
{
    /* Join the thread */
446
    vlc_thread_join( p_input );
447

448 449 450 451 452
    /* 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
453 454
}

455
/*****************************************************************************
456
 * Run: main thread loop
457 458
 * This is the "normal" thread that spawns the input processing chain,
 * reads the stream, cleans up and waits
459
 *****************************************************************************/
460
static int Run( input_thread_t *p_input )
Michel Kaempf's avatar
Michel Kaempf committed
461
{
462
    /* Signal that the thread is launched */
Sam Hocevar's avatar
Sam Hocevar committed
463 464
    vlc_thread_ready( p_input );

465
    if( Init( p_input, VLC_FALSE ) )
466 467
    {
        /* If we failed, wait before we are killed, and exit */
468
        p_input->b_error = VLC_TRUE;
469

470
        Error( p_input );
471 472

        /* Tell we're dead */
473
        p_input->b_dead = VLC_TRUE;
474

475
        return 0;
476
    }
Michel Kaempf's avatar
Michel Kaempf committed
477

478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496
    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;
    }

497
    /* Wait until we are asked to die */
498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528
    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 )
    {
529
        /* We have finished demuxing data but not playing it */
530 531 532 533 534 535 536 537 538
        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 );
        }
539

540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558 559 560
        /* 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;
561
    while( !p_input->b_die && !p_input->b_error && !p_input->input.b_eof )
562
    {
563 564 565 566
        vlc_bool_t b_force_update = VLC_FALSE;
        int i_ret;
        int i_type;
        vlc_value_t val;
567

568 569
        /* Do the read */
        if( p_input->i_state != PAUSE_S  )
570
        {
571 572 573 574
            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 */
575

576 577 578 579 580 581
            if( i_ret > 0 )
            {
                /* TODO */
                if( p_input->input.b_title_demux &&
                    p_input->input.p_demux->info.i_update )
                {
582
                    i_ret = UpdateFromDemux( p_input );
583 584 585 586 587 588
                    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 )
                {
589
                    i_ret = UpdateFromAccess( p_input );
590 591 592
                    b_force_update = VLC_TRUE;
                }
            }
593 594

            if( i_ret == 0 )    /* EOF */
595 596
            {
                vlc_value_t repeat;
597

598 599 600 601 602 603 604 605 606
                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
607
                {
Gildas Bazin's avatar
Gildas Bazin committed
608 609
                    msg_Dbg( p_input, "repeating the same input (%d)",
                             repeat.i_int );
610 611 612 613 614
                    if( repeat.i_int > 0 )
                    {
                        repeat.i_int--;
                        var_Set( p_input, "input-repeat", repeat );
                    }
615

616 617 618 619 620 621 622 623 624 625 626 627 628 629 630
                    /* 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 */
631 632 633 634 635 636 637 638 639 640 641 642
                    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 );
                    }
643 644
                }
            }
645 646 647 648
            else if( i_ret < 0 )
            {
                p_input->b_error = VLC_TRUE;
            }
649 650 651 652 653

            if( i_ret > 0 && p_input->i_slave > 0 )
            {
                SlaveDemux( p_input );
            }
654
        }
655
        else
656
        {
657 658 659
            /* Small wait */
            msleep( 10*1000 );
        }
660

661 662 663 664 665 666 667 668 669 670
        /* 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 );
671

672
        if( b_force_update || i_intf_update < mdate() )
673 674 675 676 677
        {
            vlc_value_t val;
            double f_pos;
            int64_t i_time, i_length;
            /* update input status variables */
Gildas Bazin's avatar
Gildas Bazin committed
678 679
            if( !demux2_Control( p_input->input.p_demux,
                                 DEMUX_GET_POSITION, &f_pos ) )
680 681 682 683
            {
                val.f_float = (float)f_pos;
                var_Change( p_input, "position", VLC_VAR_SETVALUE, &val, NULL );
            }
Gildas Bazin's avatar
Gildas Bazin committed
684 685
            if( !demux2_Control( p_input->input.p_demux,
                                 DEMUX_GET_TIME, &i_time ) )
686 687 688 689 690
            {
                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
691 692
            if( !demux2_Control( p_input->input.p_demux,
                                 DEMUX_GET_LENGTH, &i_length ) )
693 694 695 696 697
            {
                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 );
698

699
                if( old_val.i_time != val.i_time )
700
                {
701
                    UpdateItemLength( p_input, i_length, VLC_TRUE );
702 703
                }
            }
704 705 706

            var_SetBool( p_input, "intf-change", VLC_TRUE );
            i_intf_update = mdate() + I64C(150000);
707
        }
708
    }
709 710
}

711 712

static int Init( input_thread_t * p_input, vlc_bool_t b_quick )
Michel Kaempf's avatar
Michel Kaempf committed
713
{
714
    char *psz;
715
    char *psz_subtitle;
716
    vlc_value_t val;
717
    double f_fps;
718
    vlc_meta_t *p_meta;
719
    int i_es_out_mode;
720
    int i, i_delay;
721

722 723 724 725 726 727 728
    /* 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 ;)
     */
Clément Stenac's avatar
Clément Stenac committed
729
    memset( &p_input->counters, 0, sizeof( p_input->counters ) );
730
    if( !b_quick )
731
    {
Clément Stenac's avatar
Clément Stenac committed
732
        /* Prepare statistics */
733 734
#define INIT_COUNTER( p, type, compute ) p_input->counters.p_##p = \
     stats_CounterCreate( p_input, VLC_VAR_##type, STATS_##compute);
735
        if( p_input->p_libvlc->b_stats )
Clément Stenac's avatar
Clément Stenac committed
736 737 738 739 740 741 742 743 744 745 746 747 748 749 750 751 752 753 754 755 756
        {
            INIT_COUNTER( read_bytes, INTEGER, COUNTER );
            INIT_COUNTER( read_packets, INTEGER, COUNTER );
            INIT_COUNTER( demux_read, INTEGER, COUNTER );
            INIT_COUNTER( input_bitrate, FLOAT, DERIVATIVE );
            INIT_COUNTER( demux_bitrate, FLOAT, DERIVATIVE );
            INIT_COUNTER( played_abuffers, INTEGER, COUNTER );
            INIT_COUNTER( lost_abuffers, INTEGER, COUNTER );
            INIT_COUNTER( displayed_pictures, INTEGER, COUNTER );
            INIT_COUNTER( lost_pictures, INTEGER, COUNTER );
            INIT_COUNTER( decoded_audio, INTEGER, COUNTER );
            INIT_COUNTER( decoded_video, INTEGER, COUNTER );
            INIT_COUNTER( decoded_sub, INTEGER, COUNTER );
            p_input->counters.p_sout_send_bitrate = NULL;
            p_input->counters.p_sout_sent_packets = NULL;
            p_input->counters.p_sout_sent_bytes = NULL;
            if( p_input->counters.p_demux_bitrate )
                p_input->counters.p_demux_bitrate->update_interval = 1000000;
            if( p_input->counters.p_input_bitrate )
                p_input->counters.p_input_bitrate->update_interval = 1000000;
        }
757
        vlc_mutex_init( p_input, &p_input->counters.counters_lock );
Clément Stenac's avatar
Clément Stenac committed
758 759

        /* handle sout */
760
        psz = var_GetString( p_input, "sout" );
761
        if( *psz && strncasecmp( p_input->input.p_item->psz_uri, "vlc:", 4 ) )
762
        {
763 764 765
            p_input->p_sout = sout_NewInstance( p_input, psz );
            if( p_input->p_sout == NULL )
            {
Gildas Bazin's avatar
Gildas Bazin committed
766
                msg_Err( p_input, "cannot start stream output instance, " \
767 768 769 770
                                  "aborting" );
                free( psz );
                return VLC_EGENERIC;
            }
771
            if( p_input->p_libvlc->b_stats )
Clément Stenac's avatar
Clément Stenac committed
772 773 774 775 776 777 778 779
            {
                INIT_COUNTER( sout_sent_packets, INTEGER, COUNTER );
                INIT_COUNTER (sout_sent_bytes, INTEGER, COUNTER );
                INIT_COUNTER( sout_send_bitrate, FLOAT, DERIVATIVE );
                if( p_input->counters.p_sout_send_bitrate )
                     p_input->counters.p_sout_send_bitrate->update_interval =
                             1000000;
            }
780
        }
781
        free( psz );
782
    }
Christophe Massiot's avatar
Christophe Massiot committed
783

784
    /* Create es out */
785
    p_input->p_es_out = input_EsOutNew( p_input );
786 787
    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 );
788

789 790 791
    var_Create( p_input, "bit-rate", VLC_VAR_INTEGER );
    var_Create( p_input, "sample-rate", VLC_VAR_INTEGER );

792
    if( InputSourceInit( p_input, &p_input->input,
793
                         p_input->input.p_item->psz_uri, NULL, b_quick ) )
794
    {
795
        goto error;
796
    }
797

798
    /* Create global title (from master) */
799
    if( !b_quick )
800
    {
801 802 803 804 805 806 807 808 809 810
        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 );
        }
811

812 813 814
        /* 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;
815

816
        /* Fix pts delay */
817 818
        if( p_input->i_pts_delay < 0 )
            p_input->i_pts_delay = 0;
819

820 821 822 823
        /* 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);
824

825 826 827
        /* 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;
828
        if( p_input->input.i_cr_average < 10 ) p_input->input.i_cr_average = 10;
829
    }
830

831
    /* Load master infos */
832
    /* Init length */
Gildas Bazin's avatar
Gildas Bazin committed
833 834
    if( !demux2_Control( p_input->input.p_demux, DEMUX_GET_LENGTH,
                         &val.i_time ) && val.i_time > 0 )
835 836
    {
        var_Change( p_input, "length", VLC_VAR_SETVALUE, &val, NULL );
837
        UpdateItemLength( p_input, val.i_time, b_quick );
838
        p_input->input.p_item->i_duration = val.i_time;
839
    }
840 841

    /* Start title/chapter */
842
    if( !b_quick )
843
    {
844 845 846 847 848 849 850 851 852 853 854 855 856 857 858 859 860
        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 )
861
        {
862 863 864 865 866 867 868
            if( p_input->i_start >= val.i_time )
            {
                msg_Warn( p_input, "invalid start-time ignored" );
            }
            else
            {
                vlc_value_t s;
869

870
                msg_Dbg( p_input, "starting at time: %ds",
871
                                  (int)( p_input->i_start / I64C(1000000) ) );
872

873 874 875
                s.i_time = p_input->i_start;
                input_ControlPush( p_input, INPUT_CONTROL_SET_TIME, &s );
            }
876
        }
877
        if( p_input->i_stop > 0 && p_input->i_stop <= p_input->i_start )
878
        {
879 880
            msg_Warn( p_input, "invalid stop-time ignored" );
            p_input->i_stop = 0;
881 882
        }

883

884 885 886 887 888 889
        /* 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;
890

891 892
            var_Create( p_input, "sub-original-fps", VLC_VAR_FLOAT );
            var_SetFloat( p_input, "sub-original-fps", f_fps );
893

894 895 896 897 898 899 900 901
            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 );
            }
        }
902

903 904 905 906 907
        i_delay = var_CreateGetInteger( p_input, "sub-delay" );
        if( i_delay != 0 )
        {
            var_SetTime( p_input, "spu-delay", (mtime_t)i_delay * 100000 );
        }
908 909


910 911 912
        /* Look for and add subtitle files */
        psz_subtitle = var_GetString( p_input, "sub-file" );
        if( *psz_subtitle )
913
        {
914
            msg_Dbg( p_input, "forced subtitle: %s", psz_subtitle );
915
            input_AddSubtitles( p_input, psz_subtitle, VLC_FALSE );
916
        }
917

918 919
        var_Get( p_input, "sub-autodetect-file", &val );
        if( val.b_bool )
920
        {
921
            char *psz_autopath = var_GetString( p_input, "sub-autodetect-path" );
922 923 924
            char **subs = subtitles_Detect( p_input, psz_autopath,
                                            p_input->input.p_item->psz_uri );
            input_source_t *sub;
925

926
            i = 0;
927

928 929 930 931 932 933 934 935 936 937 938
            /* Try to autoselect the first autodetected subtitles file
             * if no subtitles file was specified */
            if( *psz_subtitle == 0 && subs && subs[0] )
            {
                input_AddSubtitles( p_input, subs[0], VLC_FALSE );
                free( subs[0] );
                i = 1;
            }

            /* Then, just add the following subtitles files */
            for( ; subs && subs[i]; i++ )
939
            {
940
                if( strcmp( psz_subtitle, subs[i] ) )
941
                {
942 943 944 945
                    sub = InputSourceNew( p_input );
                    if( !InputSourceInit( p_input, sub, subs[i], "subtitle",
                                          VLC_FALSE ) )
                    {
946
                        TAB_APPEND( p_input->i_slave, p_input->slave, sub );
947
                    }
948
                }
949
                free( subs[i] );
950
            }
951 952
            if( subs ) free( subs );
            if( psz_autopath ) free( psz_autopath );
953
        }
954
        free( psz_subtitle );
955

956 957 958
        /* Look for slave */
        psz = var_GetString( p_input, "input-slave" );
        if( *psz )
959
        {
960 961 962
            char *psz_delim;
            input_source_t *slave;
            while( psz && *psz )
963
            {
964 965 966 967 968 969 970 971 972 973 974 975
                while( *psz == ' ' || *psz == '#' )
                {
                    psz++;
                }
                if( ( psz_delim = strchr( psz, '#' ) ) )
                {
                    *psz_delim++ = '\0';
                }
                if( *psz == 0 )
                {
                    break;
                }
976

977
                msg_Dbg( p_input, "adding slave input '%s'", psz );
978 979 980 981 982 983
                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;
984 985
            }
        }
986 987 988 989 990 991
        if( psz ) free( psz );
    }
    else
    {
        p_input->i_start = 0;
        p_input->i_start = 0;
992
    }
993 994

    /* Set up es_out */
995
    if( !b_quick )
996
    {
997 998 999 1000
        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 )
1001
        {
1002 1003
            var_Get( p_input, "sout-all", &val );
            if ( val.b_bool )
1004
            {
1005 1006
                i_es_out_mode = ES_OUT_MODE_ALL;
                val.p_list = NULL;
1007 1008
            }
            else
1009 1010 1011 1012 1013 1014 1015 1016 1017 1018 1019
            {
                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 );
            }
1020
        }
1021
        es_out_Control( p_input->p_es_out, ES_OUT_SET_MODE, i_es_out_mode );
1022

1023 1024
        /* Inform the demuxer about waited group (needed only for DVB) */
        if( i_es_out_mode == ES_OUT_MODE_ALL )
1025
        {
1026 1027 1028 1029 1030 1031
            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 );
1032
        }
1033 1034
        else
        {
1035 1036 1037 1038 1039 1040 1041 1042 1043 1044 1045 1046 1047 1048
            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;
            }
1049 1050 1051 1052 1053 1054 1055 1056

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

1057
            msg_Dbg( p_input, "starting in %s mode",
1058
                     p_input->b_out_pace_control ? "async" : "sync" );
1059
        }
1060 1061
    }

1062
    p_meta = p_input->input.p_item->p_meta;
1063
    /* Get meta data from users */
1064
    InputMetaUser( p_input );
1065
    /* Get meta data from master input */
1066
    demux2_Control( p_input->input.p_demux, DEMUX_GET_META, p_meta );
1067

1068 1069
    /* Access_file does not give any meta, and there are no slave */
    if( !b_quick )
1070
    {
1071
        if( p_input->input.p_access )
1072
            access2_Control( p_input->input.p_access, ACCESS_GET_META,
1073
                             p_meta );
1074

Clément Stenac's avatar