input.c 101 KB
Newer Older
1 2
/*****************************************************************************
 * input.c: input thread
3
 *****************************************************************************
4
 * Copyright (C) 1998-2007 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 29 30 31
#ifdef HAVE_CONFIG_H
# include "config.h"
#endif

32
#include <vlc_common.h>
Sam Hocevar's avatar
 
Sam Hocevar committed
33

34
#include <ctype.h>
Christophe Mutricy's avatar
Christophe Mutricy committed
35
#include <limits.h>
36
#include <assert.h>
37

38
#include "input_internal.h"
39

Clément Stenac's avatar
Clément Stenac committed
40 41
#include <vlc_sout.h>
#include "../stream_output/stream_output.h"
Sam Hocevar's avatar
 
Sam Hocevar committed
42

Clément Stenac's avatar
Clément Stenac committed
43 44 45
#include <vlc_interface.h>
#include <vlc_url.h>
#include <vlc_charset.h>
46
#include <vlc_strings.h>
47

48 49 50 51
#ifdef HAVE_SYS_STAT_H
#   include <sys/stat.h>
#endif

52
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
53
 * Local prototypes
54
 *****************************************************************************/
55 56
static void Destructor( input_thread_t * p_input );

57 58
static  void* Run            ( vlc_object_t *p_this );
static  void* RunAndDestroy  ( vlc_object_t *p_this );
59

Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
60
static input_thread_t * Create  ( vlc_object_t *, input_item_t *,
61
                                  const char *, bool, sout_instance_t * );
62
static  int             Init    ( input_thread_t *p_input );
63
static void             WaitDie   ( input_thread_t *p_input );
64 65
static void             End     ( input_thread_t *p_input );
static void             MainLoop( input_thread_t *p_input );
66

67
static inline int ControlPopNoLock( input_thread_t *, int *, vlc_value_t *, mtime_t i_deadline );
68
static void       ControlReduce( input_thread_t * );
69
static bool Control( input_thread_t *, int, vlc_value_t );
70

71 72
static int  UpdateFromAccess( input_thread_t * );
static int  UpdateFromDemux( input_thread_t * );
Michel Kaempf's avatar
Michel Kaempf committed
73

74
static void UpdateItemLength( input_thread_t *, int64_t i_length );
75

76
static void MRLSections( input_thread_t *, char *, int *, int *, int *, int *);
77 78

static input_source_t *InputSourceNew( input_thread_t *);
Laurent Aimar's avatar
 
Laurent Aimar committed
79
static int  InputSourceInit( input_thread_t *, input_source_t *,
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
80
                             const char *, const char *psz_forced_demux );
81
static void InputSourceClean( input_source_t * );
82 83
/* TODO */
//static void InputGetAttachments( input_thread_t *, input_source_t * );
84 85
static void SlaveDemux( input_thread_t *p_input );
static void SlaveSeek( input_thread_t *p_input );
86

87 88
static void InputMetaUser( input_thread_t *p_input, vlc_meta_t *p_meta );
static void InputUpdateMeta( input_thread_t *p_input, vlc_meta_t *p_meta );
89 90
static char *InputGetExtraFiles( input_thread_t *p_input,
                                 const char *psz_access, const char *psz_path );
91

92
static void DemuxMeta( input_thread_t *p_input, vlc_meta_t *p_meta, demux_t *p_demux );
93
static void AccessMeta( input_thread_t * p_input, vlc_meta_t *p_meta );
94 95 96
static void AppendAttachment( int *pi_attachment, input_attachment_t ***ppp_attachment,
                              int i_new, input_attachment_t **pp_new );

97 98
static void SubtitleAdd( input_thread_t *p_input, char *psz_subtitle, bool b_forced );

99
/*****************************************************************************
100 101
 * This function creates a new input, and returns a pointer
 * to its description. On error, it returns NULL.
102 103 104 105 106 107 108 109 110 111
 *
 * 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
112
 *  - audio-delay, spu-delay
113 114 115 116
 *  - bookmark
 * * Get only:
 *  - length
 *  - bookmarks
117 118
 *  - seekable (if you can seek, it doesn't say if 'bar display' has be shown
 *    or not, for that check position != 0.0)
119
 *  - can-pause
120
 *  - can-record (if a stream can be recorded while playing)
121
 *  - teletext-es to get the index of spu track that is teletext --1 if no teletext)
122
 * * For intf callback upon changes:
123
 *  - intf-change
124
 *  - intf-change-vout for when a vout is created or destroyed
125
 *  - rate-change for when playback rate changes
126 127
 * TODO explain when Callback is called
 * TODO complete this list (?)
128
 *****************************************************************************/
129
static input_thread_t *Create( vlc_object_t *p_parent, input_item_t *p_item,
130
                               const char *psz_header, bool b_quick,
131
                               sout_instance_t *p_sout )
Michel Kaempf's avatar
Michel Kaempf committed
132
{
133
    static const char input_name[] = "input";
134
    input_thread_t *p_input = NULL;                 /* thread descriptor */
135 136
    vlc_value_t val;
    int i;
137

138
    /* Allocate descriptor */
139 140
    p_input = vlc_custom_create( p_parent, sizeof( *p_input ),
                                 VLC_OBJECT_INPUT, input_name );
141
    if( p_input == NULL )
142
        return NULL;
143 144 145 146 147 148

    /* Construct a nice name for the input timer */
    char psz_timer_name[255];
    char * psz_name = input_item_GetName( p_item );
    snprintf( psz_timer_name, sizeof(psz_timer_name),
              "input launching for '%s'", psz_name );
149 150 151

    msg_Dbg( p_input, "Creating an input for '%s'", psz_name);

152 153 154 155 156 157 158
    free( psz_name );

    /* Start a timer to mesure how long it takes
     * to launch an input */
    stats_TimerStart( p_input, psz_timer_name,
        STATS_TIMER_INPUT_LAUNCHING );

Clément Stenac's avatar
Clément Stenac committed
159
    MALLOC_NULL( p_input->p, input_thread_private_t );
Rafaël Carré's avatar
Rafaël Carré committed
160
    memset( p_input->p, 0, sizeof( input_thread_private_t ) );
161 162 163

    /* One "randomly" selected input thread is responsible for computing
     * the global stats. Check if there is already someone doing this */
164
    if( p_input->p_libvlc->p_stats && !b_quick )
165
    {
166
        libvlc_priv_t *p_private = libvlc_priv( p_input->p_libvlc );
167
        vlc_mutex_lock( &p_input->p_libvlc->p_stats->lock );
168 169
        if( p_private->p_stats_computer == NULL )
            p_private->p_stats_computer = p_input;
170
        vlc_mutex_unlock( &p_input->p_libvlc->p_stats->lock );
171 172
    }

173
    p_input->b_preparsing = b_quick;
174
    p_input->psz_header = psz_header ? strdup( psz_header ) : NULL;
175

176
    /* Init events */
177 178 179
    vlc_event_manager_t * p_em = &p_input->p->event_manager;
    vlc_event_manager_init_with_vlc_object( p_em, p_input );
    vlc_event_manager_register_event_type( p_em, vlc_InputStateChanged );
180
    vlc_event_manager_register_event_type( p_em, vlc_InputSelectedStreamChanged );
181

182
    /* Init Common fields */
183 184
    p_input->b_eof = false;
    p_input->b_can_pace_control = true;
Clément Stenac's avatar
Clément Stenac committed
185
    p_input->p->i_start = 0;
186
    p_input->i_time  = 0;
Clément Stenac's avatar
Clément Stenac committed
187
    p_input->p->i_stop  = 0;
188
    p_input->p->i_run  = 0;
Clément Stenac's avatar
Clément Stenac committed
189 190 191
    p_input->p->i_title = 0;
    p_input->p->title   = NULL;
    p_input->p->i_title_offset = p_input->p->i_seekpoint_offset = 0;
192
    p_input->i_state = INIT_S;
Clément Stenac's avatar
Clément Stenac committed
193
    p_input->p->i_rate  = INPUT_RATE_DEFAULT;
194
    p_input->p->b_recording = false;
195 196
    TAB_INIT( p_input->p->i_bookmark, p_input->p->bookmark );
    TAB_INIT( p_input->p->i_attachment, p_input->p->attachment );
Clément Stenac's avatar
Clément Stenac committed
197 198
    p_input->p->p_es_out = NULL;
    p_input->p->p_sout  = NULL;
199
    p_input->p->b_out_pace_control = false;
200 201 202
    p_input->i_pts_delay = 0;

    /* Init Input fields */
Pierre's avatar
Pierre committed
203
    vlc_gc_incref( p_item ); /* Released in Destructor() */
Clément Stenac's avatar
Clément Stenac committed
204 205 206 207
    p_input->p->input.p_item = p_item;
    p_input->p->input.p_access = NULL;
    p_input->p->input.p_stream = NULL;
    p_input->p->input.p_demux  = NULL;
208
    p_input->p->input.b_title_demux = false;
Clément Stenac's avatar
Clément Stenac committed
209 210 211
    p_input->p->input.i_title  = 0;
    p_input->p->input.title    = NULL;
    p_input->p->input.i_title_offset = p_input->p->input.i_seekpoint_offset = 0;
212 213 214 215
    p_input->p->input.b_can_pace_control = true;
    p_input->p->input.b_can_rate_control = true;
    p_input->p->input.b_rescale_ts = true;
    p_input->p->input.b_eof = false;
Clément Stenac's avatar
Clément Stenac committed
216 217
    p_input->p->input.i_cr_average = 0;

218
    vlc_mutex_lock( &p_item->lock );
219 220

    if( !p_item->p_stats )
221 222
        p_item->p_stats = stats_NewInputStats( p_input );
    vlc_mutex_unlock( &p_item->lock );
223

224
    /* No slave */
Clément Stenac's avatar
Clément Stenac committed
225 226
    p_input->p->i_slave = 0;
    p_input->p->slave   = NULL;
227

228
    /* Init control buffer */
229
    vlc_mutex_init( &p_input->p->lock_control );
230
    vlc_cond_init( &p_input->p->wait_control );
Clément Stenac's avatar
Clément Stenac committed
231
    p_input->p->i_control = 0;
232

Gildas Bazin's avatar
 
Gildas Bazin committed
233
    /* Parse input options */
234
    vlc_mutex_lock( &p_item->lock );
Pierre d'Herbemont's avatar
Pierre d'Herbemont committed
235
    assert( (int)p_item->optflagc == p_item->i_options );
236
    for( i = 0; i < p_item->i_options; i++ )
237 238
        var_OptionParse( VLC_OBJECT(p_input), p_item->ppsz_options[i],
                         !!(p_item->optflagv[i] & VLC_INPUT_OPTION_TRUSTED) );
239
    vlc_mutex_unlock( &p_item->lock );
Gildas Bazin's avatar
 
Gildas Bazin committed
240

241 242
    /* Create Object Variables for private use only */
    input_ConfigVarInit( p_input );
Michel Kaempf's avatar
Michel Kaempf committed
243

244
    /* Create Objects variables for public Get and Set */
245
    input_ControlVarInit( p_input );
246

247 248
    /* */
    p_input->p->pts_adjust.b_auto_adjust = var_GetBool( p_input, "auto-adjust-pts-delay" );
Clément Stenac's avatar
Clément Stenac committed
249
    p_input->p->input.i_cr_average = var_GetInteger( p_input, "cr-average" );
Gildas Bazin's avatar
Gildas Bazin committed
250

251
    if( !p_input->b_preparsing )
Gildas Bazin's avatar
Gildas Bazin committed
252
    {
253 254
        var_Get( p_input, "bookmarks", &val );
        if( val.psz_string )
Gildas Bazin's avatar
Gildas Bazin committed
255
        {
256 257 258 259
            /* 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
260
            {
261 262 263 264 265 266 267 268 269 270 271 272 273 274
                 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 ) )
                     {
275
                         p_seekpoint->psz_name = strdup(psz_start + 5);
276 277 278 279 280 281 282
                     }
                     else if( !strncmp( psz_start, "bytes=", 6 ) )
                     {
                         p_seekpoint->i_byte_offset = atoll(psz_start + 6);
                     }
                     else if( !strncmp( psz_start, "time=", 5 ) )
                     {
283 284
                         p_seekpoint->i_time_offset = atoll(psz_start + 5) *
                                                        1000000;
285 286
                     }
                     psz_start = psz_end + 1;
Gildas Bazin's avatar
Gildas Bazin committed
287
                }
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
288
                msg_Dbg( p_input, "adding bookmark: %s, bytes=%"PRId64", time=%"PRId64,
289 290 291 292 293
                                  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
294
            }
295
            free( val.psz_string );
Gildas Bazin's avatar
Gildas Bazin committed
296 297 298
        }
    }

299
    /* Remove 'Now playing' info as it is probably outdated */
300
    input_item_SetNowPlaying( p_item, NULL );
301

302 303 304 305
    /* */
    if( p_input->b_preparsing )
        p_input->i_flags |= OBJECT_FLAGS_QUIET | OBJECT_FLAGS_NOINTERACT;

306 307 308 309
    /* */
    if( p_sout )
        p_input->p->p_sout = p_sout;

310
    memset( &p_input->p->counters, 0, sizeof( p_input->p->counters ) );
311
    vlc_mutex_init( &p_input->p->counters.counters_lock );
312

313 314 315
    /* Set the destructor when we are sure we are initialized */
    vlc_object_set_destructor( p_input, (vlc_destructor_t)Destructor );

316 317 318
    /* Attach only once we are ready */
    vlc_object_attach( p_input, p_parent );

319 320 321
    return p_input;
}

322 323 324 325
/**
 * Input destructor (called when the object's refcount reaches 0).
 */
static void Destructor( input_thread_t * p_input )
326
{
327 328 329 330 331 332
#ifndef NDEBUG
    char * psz_name = input_item_GetName( p_input->p->input.p_item );
    msg_Dbg( p_input, "Destroying the input for '%s'", psz_name);
    free( psz_name );
#endif

333 334
    vlc_event_manager_fini( &p_input->p->event_manager );

335 336
    stats_TimerDump( p_input, STATS_TIMER_INPUT_LAUNCHING );
    stats_TimerClean( p_input, STATS_TIMER_INPUT_LAUNCHING );
337
#ifdef ENABLE_SOUT
338 339
    if( p_input->p->p_sout )
        sout_DeleteInstance( p_input->p->p_sout );
340
#endif
Pierre's avatar
Pierre committed
341 342
    vlc_gc_decref( p_input->p->input.p_item );

343 344
    vlc_mutex_destroy( &p_input->p->counters.counters_lock );

345
    vlc_cond_destroy( &p_input->p->wait_control );
346 347
    vlc_mutex_destroy( &p_input->p->lock_control );
    free( p_input->p );
348
}
349

350
/**
351 352
 * Initialize an input thread and run it. You will need to monitor the
 * thread to clean up after it is done
353 354 355 356 357 358 359
 *
 * \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 )
360
{
361
    return __input_CreateThreadExtended( p_parent, p_item, NULL, NULL );
362 363
}

364 365 366 367
/* */
input_thread_t *__input_CreateThreadExtended( vlc_object_t *p_parent,
                                              input_item_t *p_item,
                                              const char *psz_log, sout_instance_t *p_sout )
368
{
369
    input_thread_t *p_input;
370

371
    p_input = Create( p_parent, p_item, psz_log, false, p_sout );
372 373 374
    if( !p_input )
        return NULL;

Sam Hocevar's avatar
Sam Hocevar committed
375
    /* Create thread and wait for its readiness. */
376
    if( vlc_thread_create( p_input, "input", Run,
377
                           VLC_THREAD_PRIORITY_INPUT, false ) )
Michel Kaempf's avatar
Michel Kaempf committed
378
    {
379
        input_ChangeState( p_input, ERROR_S );
380
        msg_Err( p_input, "cannot create input thread" );
381 382
        vlc_object_detach( p_input );
        vlc_object_release( p_input );
383
        return NULL;
Michel Kaempf's avatar
Michel Kaempf committed
384
    }
385

386
    return p_input;
Michel Kaempf's avatar
Michel Kaempf committed
387 388
}

389
/**
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
390
 * Initialize an input thread and run it. This thread will clean after itself,
391 392 393 394 395
 * 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 ?
396
 * \return an error code, VLC_SUCCESS on success
397
 */
398
int __input_Read( vlc_object_t *p_parent, input_item_t *p_item,
399
                   bool b_block )
400
{
401
    input_thread_t *p_input;
402

403
    p_input = Create( p_parent, p_item, NULL, false, NULL );
404
    if( !p_input )
405 406
        return VLC_EGENERIC;

407
    if( b_block )
408
    {
409
        RunAndDestroy( VLC_OBJECT(p_input) );
Clément Stenac's avatar
Clément Stenac committed
410
        return VLC_SUCCESS;
411
    }
412
    else
413
    {
414
        if( vlc_thread_create( p_input, "input", RunAndDestroy,
415
                               VLC_THREAD_PRIORITY_INPUT, false ) )
416
        {
417
            input_ChangeState( p_input, ERROR_S );
418
            msg_Err( p_input, "cannot create input thread" );
419
            vlc_object_release( p_input );
Clément Stenac's avatar
Clément Stenac committed
420
            return VLC_EGENERIC;
421
        }
422
    }
423
    return VLC_SUCCESS;
424
}
425

426 427 428 429 430 431 432 433 434 435
/**
 * 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 )
{
436
    input_thread_t *p_input;
437

438
    /* Allocate descriptor */
439
    p_input = Create( p_parent, p_item, NULL, true, NULL );
440 441 442
    if( !p_input )
        return VLC_EGENERIC;

443 444
    if( !Init( p_input ) )
        End( p_input );
445

446 447
    vlc_object_detach( p_input );
    vlc_object_release( p_input );
448 449 450 451

    return VLC_SUCCESS;
}

452 453 454 455 456
/**
 * Request a running input thread to stop and die
 *
 * \param the input thread to stop
 */
457
static void ObjectKillChildrens( input_thread_t *p_input, vlc_object_t *p_obj )
Michel Kaempf's avatar
Michel Kaempf committed
458
{
459 460
    vlc_list_t *p_list;
    int i;
461 462 463 464 465 466

    if( p_obj->i_object_type == VLC_OBJECT_VOUT ||
        p_obj->i_object_type == VLC_OBJECT_AOUT ||
        p_obj == VLC_OBJECT(p_input->p->p_sout) )
        return;

467
    vlc_object_kill( p_obj );
468

469
    p_list = vlc_list_children( p_obj );
470
    for( i = 0; i < p_list->i_count; i++ )
471
        ObjectKillChildrens( p_input, p_list->p_values[i].p_object );
472
    vlc_list_release( p_list );
473 474 475 476 477 478
}
void input_StopThread( input_thread_t *p_input )
{
    /* Set die for input and ALL of this childrens (even (grand-)grand-childrens)
     * It is needed here even if it is done in INPUT_CONTROL_SET_DIE handler to
     * unlock the control loop */
479
    ObjectKillChildrens( p_input, VLC_OBJECT(p_input) );
Michel Kaempf's avatar
Michel Kaempf committed
480

481
    input_ControlPush( p_input, INPUT_CONTROL_SET_DIE, NULL );
Sam Hocevar's avatar
 
Sam Hocevar committed
482 483
}

484 485
sout_instance_t * input_DetachSout( input_thread_t *p_input )
{
486 487 488 489
    sout_instance_t *p_sout = p_input->p->p_sout;
    vlc_object_detach( p_sout );
    p_input->p->p_sout = NULL;
    return p_sout;
490 491
}

492
/*****************************************************************************
493
 * Run: main thread loop
494 495
 * This is the "normal" thread that spawns the input processing chain,
 * reads the stream, cleans up and waits
496
 *****************************************************************************/
497
static void* Run( vlc_object_t *p_this )
Michel Kaempf's avatar
Michel Kaempf committed
498
{
499
    input_thread_t *p_input = (input_thread_t *)p_this;
500
    const int canc = vlc_savecancel();
501

502
    if( Init( p_input ) )
Sam Hocevar's avatar
 
Sam Hocevar committed
503 504
    {
        /* If we failed, wait before we are killed, and exit */
505
        WaitDie( p_input );
506
        goto exit;
Sam Hocevar's avatar
 
Sam Hocevar committed
507
    }
Michel Kaempf's avatar
Michel Kaempf committed
508

509 510
    MainLoop( p_input );

511
    /* Wait until we are asked to die */
512
    if( !p_input->b_die )
513
        WaitDie( p_input );
514 515 516

    /* Clean up */
    End( p_input );
517 518 519

exit:
    p_input->b_dead = true;
520
    vlc_restorecancel( canc );
521
    return NULL;
522 523 524
}

/*****************************************************************************
525
 * RunAndDestroy: main thread loop
526 527 528
 * This is the "just forget me" thread that spawns the input processing chain,
 * reads the stream, cleans up and releases memory
 *****************************************************************************/
529
static void* RunAndDestroy( vlc_object_t *p_this )
530
{
531
    input_thread_t *p_input = (input_thread_t *)p_this;
532
    const int canc = vlc_savecancel();
533

534
    if( Init( p_input ) )
535
        goto exit;
536 537 538 539 540 541

    MainLoop( p_input );

    /* Clean up */
    End( p_input );

542
exit:
543
    /* Release memory */
544
    vlc_object_release( p_input );
545 546
    vlc_restorecancel( canc );
    return NULL;
547 548 549 550 551
}

/*****************************************************************************
 * Main loop: Fill buffers from access, and demux
 *****************************************************************************/
552 553 554 555 556 557

/**
 * MainLoopDemux
 * It asks the demuxer to demux some data
 */
static void MainLoopDemux( input_thread_t *p_input, bool *pb_changed, mtime_t *pi_start_mdate )
558
{
559
    int i_ret;
560

561
    *pb_changed = false;
562

563 564 565 566 567 568 569
    if( ( p_input->p->i_stop > 0 && p_input->i_time >= p_input->p->i_stop ) ||
        ( p_input->p->i_run > 0 && *pi_start_mdate+p_input->p->i_run < mdate() ) )
        i_ret = 0; /* EOF */
    else
        i_ret = p_input->p->input.p_demux->pf_demux(p_input->p->input.p_demux);

    if( i_ret > 0 )
Sam Hocevar's avatar
 
Sam Hocevar committed
570
    {
571 572 573 574 575 576 577 578 579 580 581 582 583 584 585
        /* TODO */
        if( p_input->p->input.b_title_demux &&
            p_input->p->input.p_demux->info.i_update )
        {
            i_ret = UpdateFromDemux( p_input );
            *pb_changed = true;
        }
        else if( !p_input->p->input.b_title_demux &&
                  p_input->p->input.p_access &&
                  p_input->p->input.p_access->info.i_update )
        {
            i_ret = UpdateFromAccess( p_input );
            *pb_changed = true;
        }
    }
586

587 588 589 590 591 592
    if( i_ret == 0 )    /* EOF */
    {
        vlc_value_t repeat;

        var_Get( p_input, "input-repeat", &repeat );
        if( repeat.i_int == 0 )
593
        {
594 595 596 597 598 599 600 601
            /* 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->p->input.b_eof = true;
        }
        else
        {
            vlc_value_t val;
602

603 604 605
            msg_Dbg( p_input, "repeating the same input (%d)",
                     repeat.i_int );
            if( repeat.i_int > 0 )
606
            {
607 608
                repeat.i_int--;
                var_Set( p_input, "input-repeat", repeat );
609
            }
610

611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626
            /* Seek to start title/seekpoint */
            val.i_int = p_input->p->input.i_title_start -
                p_input->p->input.i_title_offset;
            if( val.i_int < 0 || val.i_int >= p_input->p->input.i_title )
                val.i_int = 0;
            input_ControlPush( p_input,
                               INPUT_CONTROL_SET_TITLE, &val );

            val.i_int = p_input->p->input.i_seekpoint_start -
                p_input->p->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 */
            if( p_input->p->i_start > 0 )
627
            {
628 629 630
                val.i_time = p_input->p->i_start;
                input_ControlPush( p_input, INPUT_CONTROL_SET_TIME,
                                   &val );
631
            }
632
            else
633
            {
634 635 636
                val.f_float = 0.0;
                input_ControlPush( p_input, INPUT_CONTROL_SET_POSITION,
                                   &val );
637
            }
638

639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716
            /* */
            *pi_start_mdate = mdate();
        }
    }
    else if( i_ret < 0 )
    {
        input_ChangeState( p_input, ERROR_S );
    }

    if( i_ret > 0 && p_input->p->i_slave > 0 )
    {
        SlaveDemux( p_input );
    }
}

/**
 * MainLoopInterface
 * It update the variables used by the interfaces
 */
static void MainLoopInterface( input_thread_t *p_input )
{
    vlc_value_t val;
    double f_pos;
    int64_t i_time, i_length;

    /* update input status variables */
    if( !demux_Control( p_input->p->input.p_demux,
                         DEMUX_GET_POSITION, &f_pos ) )
    {
        val.f_float = (float)f_pos;
        var_Change( p_input, "position", VLC_VAR_SETVALUE, &val, NULL );
    }
    if( !demux_Control( p_input->p->input.p_demux,
                         DEMUX_GET_TIME, &i_time ) )
    {
        p_input->i_time = i_time;
        val.i_time = i_time;
        var_Change( p_input, "time", VLC_VAR_SETVALUE, &val, NULL );
    }
    if( !demux_Control( p_input->p->input.p_demux,
                         DEMUX_GET_LENGTH, &i_length ) )
    {
        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 );

        if( old_val.i_time != val.i_time )
        {
            UpdateItemLength( p_input, i_length );
        }
    }

    var_SetBool( p_input, "intf-change", true );
}

/**
 * MainLoopStatistic
 * It updates the globals statics
 */
static void MainLoopStatistic( input_thread_t *p_input )
{
    stats_ComputeInputStats( p_input, p_input->p->input.p_item->p_stats );
    /* Are we the thread responsible for computing global stats ? */
    if( libvlc_priv( p_input->p_libvlc )->p_stats_computer == p_input )
    {
        stats_ComputeGlobalStats( p_input->p_libvlc,
                                  p_input->p_libvlc->p_stats );
    }
}

/**
 * MainLoop
 * The main input loop.
 */
static void MainLoop( input_thread_t *p_input )
{
    mtime_t i_start_mdate = mdate();
717 718
    mtime_t i_intf_update = 0;
    mtime_t i_statistic_update = 0;
719 720 721 722 723 724 725 726 727

    /* Start the timer */
    stats_TimerStop( p_input, STATS_TIMER_INPUT_LAUNCHING );

    while( !p_input->b_die && !p_input->b_error && !p_input->p->input.b_eof )
    {
        bool b_force_update;
        int i_type;
        vlc_value_t val;
728
        mtime_t i_current;
729
        mtime_t i_deadline;
730
        mtime_t i_wakeup;
731

732 733
        /* Demux data */
        b_force_update = false;
734
        i_wakeup = 0;
735
        if( p_input->i_state != PAUSE_S )
736
        {
737
            MainLoopDemux( p_input, &b_force_update, &i_start_mdate );
738 739
            i_wakeup = input_EsOutGetWakeup( p_input->p->p_es_out );
        }
740 741

        /* */
742 743 744 745 746 747 748 749 750 751 752 753 754 755 756
        do {
            i_deadline = i_wakeup;
            if( p_input->i_state == PAUSE_S )
                i_deadline = __MIN( i_intf_update, i_statistic_update );

            /* Handle control */
            vlc_mutex_lock( &p_input->p->lock_control );
            ControlReduce( p_input );
            while( !ControlPopNoLock( p_input, &i_type, &val, i_deadline ) )
            {
                msg_Dbg( p_input, "control type=%d", i_type );
                if( Control( p_input, i_type, val ) )
                    b_force_update = true;
            }
            vlc_mutex_unlock( &p_input->p->lock_control );
757

758 759 760 761 762 763 764 765 766 767 768 769 770
            /* Update interface and statistics */
            i_current = mdate();
            if( i_intf_update < i_current || b_force_update )
            {
                MainLoopInterface( p_input );
                i_intf_update = i_current + INT64_C(250000);
                b_force_update = false;
            }
            if( i_statistic_update < i_current )
            {
                MainLoopStatistic( p_input );
                i_statistic_update = i_current + INT64_C(1000000);
            }
771 772 773 774 775 776 777 778

            /* Check if i_wakeup is still valid */
            if( i_wakeup != 0 )
            {
                mtime_t i_new_wakeup = input_EsOutGetWakeup( p_input->p->p_es_out );
                if( !i_new_wakeup )
                    i_wakeup = 0;
            }
779
        } while( i_current < i_wakeup );
780
    }
781 782 783 784 785 786 787 788 789 790 791 792 793 794 795 796 797

    if( !p_input->b_eof && !p_input->b_error && p_input->p->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->p_es_out ) )
                break;

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

            msleep( INPUT_IDLE_SLEEP );
        }

        /* We have finished */
        input_ChangeState( p_input, END_S );
    }
798 799
}

800
static void InitStatistics( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
801
{
802
    if( p_input->b_preparsing ) return;
803

804 805 806
    /* Prepare statistics */
#define INIT_COUNTER( c, type, compute ) p_input->p->counters.p_##c = \
 stats_CounterCreate( p_input, VLC_VAR_##type, STATS_##compute);
807
    if( libvlc_stats( p_input ) )
808 809 810 811 812 813 814 815 816 817 818 819 820 821 822 823 824 825 826 827
    {
        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->p->counters.p_sout_send_bitrate = NULL;
        p_input->p->counters.p_sout_sent_packets = NULL;
        p_input->p->counters.p_sout_sent_bytes = NULL;
        if( p_input->p->counters.p_demux_bitrate )
            p_input->p->counters.p_demux_bitrate->update_interval = 1000000;
        if( p_input->p->counters.p_input_bitrate )
            p_input->p->counters.p_input_bitrate->update_interval = 1000000;
828
    }
829
}
830

831
#ifdef ENABLE_SOUT
832 833 834 835 836 837 838 839 840
static int InitSout( input_thread_t * p_input )
{
    char *psz;

    if( p_input->b_preparsing ) return VLC_SUCCESS;

    /* Find a usable sout and attach it to p_input */
    psz = var_GetNonEmptyString( p_input, "sout" );
    if( psz && strncasecmp( p_input->p->input.p_item->psz_uri, "vlc:", 4 ) )
841
    {
842 843
        /* Check the validity of the provided sout */
        if( p_input->p->p_sout )
Clément Stenac's avatar
Clément Stenac committed
844
        {
845
            if( strcmp( p_input->p->p_sout->psz_sout, psz ) )
846
            {
847
                msg_Dbg( p_input, "destroying unusable sout" );
848

849 850
                sout_DeleteInstance( p_input->p->p_sout );
                p_input->p->p_sout = NULL;
851
            }
852
        }
853

854 855 856 857 858 859 860 861 862 863 864 865 866
        if( p_input->p->p_sout )
        {
            /* Reuse it */
            msg_Dbg( p_input, "sout keep: reusing sout" );
            msg_Dbg( p_input, "sout keep: you probably want to use "
                              "gather stream_out" );
            vlc_object_attach( p_input->p->p_sout, p_input );
        }
        else
        {
            /* Create a new one */
            p_input->p->p_sout = sout_NewInstance( p_input, psz );
            if( !p_input->p->p_sout )
Clément Stenac's avatar
Clément Stenac committed
867
            {
868 869 870 871 872
                input_ChangeState( p_input, ERROR_S );
                msg_Err( p_input, "cannot start stream output instance, " \
                                  "aborting" );
                free( psz );
                return VLC_EGENERIC;
Clément Stenac's avatar
Clément Stenac committed
873
            }
874
        }
875
        if( libvlc_stats( p_input ) )
876
        {
877
            INIT_COUNTER( sout_sent_packets, INTEGER, COUNTER );
878
            INIT_COUNTER( sout_sent_bytes, INTEGER, COUNTER );
879 880 881 882
            INIT_COUNTER( sout_send_bitrate, FLOAT, DERIVATIVE );
            if( p_input->p->counters.p_sout_send_bitrate )
                 p_input->p->counters.p_sout_send_bitrate->update_interval =
                         1000000;
883
        }
884
    }
885
    else if( p_input->p->p_sout )
886
    {
887 888 889 890
        msg_Dbg( p_input, "destroying useless sout" );

        sout_DeleteInstance( p_input->p->p_sout );
        p_input->p->p_sout = NULL;
891
    }
892
    free( psz );
893

894 895
    return VLC_SUCCESS;
}
896
#endif
897

898 899 900
static void InitTitle( input_thread_t * p_input )
{
    vlc_value_t val;
901

902
    if( p_input->b_preparsing ) return;
903

904 905 906 907 908 909 910 911 912 913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933 934
    /* Create global title (from master) */
    p_input->p->i_title = p_input->p->input.i_title;
    p_input->p->title   = p_input->p->input.title;
    p_input->p->i_title_offset = p_input->p->input.i_title_offset;
    p_input->p->i_seekpoint_offset = p_input->p->input.i_seekpoint_offset;
    if( p_input->p->i_title > 0 )
    {
        /* Setup variables */
        input_ControlVarNavigation( p_input );
        input_ControlVarTitle( p_input, 0 );
    }

    /* Global flag */
    p_input->b_can_pace_control = p_input->p->input.b_can_pace_control;
    p_input->p->b_can_pause        = p_input->p->input.b_can_pause;
    p_input->p->b_can_rate_control = p_input->p->input.b_can_rate_control;

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

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

    /* Update cr_average depending on the caching */
    p_input->p->input.i_cr_average *= (10 * p_input->i_pts_delay / 200000);
    p_input->p->input.i_cr_average /= 10;
    if( p_input->p->input.i_cr_average < 10 ) p_input->p->input.i_cr_average = 10;
}
Gildas Bazin's avatar
 
Gildas Bazin committed
935

936 937 938 939
static void StartTitle( input_thread_t * p_input )
{
    double f_fps;
    vlc_value_t val;
940
    int i_delay;
941 942
    char *psz;
    char *psz_subtitle;
943
    int64_t i_length;
944

945 946 947
    /* Start title/chapter */

    if( p_input->b_preparsing )
948
    {
949 950
        p_input->p->i_start = 0;
        return;
951
    }
952 953 954 955 956 957 958 959 960 961 962 963

    val.i_int = p_input->p->input.i_title_start -
                p_input->p->input.i_title_offset;
    if( val.i_int > 0 && val.i_int < p_input->p->input.i_title )
        input_ControlPush( p_input, INPUT_CONTROL_SET_TITLE, &val );
    val.i_int = p_input->p->input.i_seekpoint_start -
                p_input->p->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 */
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
964 965 966
    p_input->p->i_start = INT64_C(1000000) * var_GetInteger( p_input, "start-time" );
    p_input->p->i_stop  = INT64_C(1000000) * var_GetInteger( p_input, "stop-time" );
    p_input->p->i_run   = INT64_C(1000000) * var_GetInteger( p_input, "run-time" );
967
    i_length = var_GetTime( p_input, "length" );
968
    if( p_input->p->i_run < 0 )
969
    {
970 971
        msg_Warn( p_input, "invalid run-time ignored" );
        p_input->p->i_run = 0;
Rafaël Carré's avatar
Rafaël Carré committed
972
    }
973

974
    if( p_input->p->i_start > 0 )
975
    {
976
        if( p_input->p->i_start >= i_length )
977
        {
978
            msg_Warn( p_input, "invalid start-time ignored" );
979
        }
980
        else
981
        {
982
            vlc_value_t s;
983

984
            msg_Dbg( p_input, "starting at time: %ds",
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
985
                              (int)( p_input->p->i_start / INT64_C(1000000) ) );
986

987 988
            s.i_time = p_input->p->i_start;
            input_ControlPush( p_input, INPUT_CONTROL_SET_TIME, &s );
989
        }
990 991 992 993 994 995
    }
    if( p_input->p->i_stop > 0 && p_input->p->i_stop <= p_input->p->i_start )
    {
        msg_Warn( p_input, "invalid stop-time ignored" );
        p_input->p->i_stop = 0;
    }
996

997 998 999 1000 1001 1002
    /* Load subtitles */
    /* Get fps and set it if not already set */
    if( !demux_Control( p_input->p->input.p_demux, DEMUX_GET_FPS, &f_fps ) &&
        f_fps > 1.0 )
    {
        float f_requested_fps;
1003

1004 1005
        var_Create( p_input, "sub-original-fps", VLC_VAR_FLOAT );
        var_SetFloat( p_input, "sub-original-fps", f_fps );
Laurent Aimar's avatar
 
Laurent Aimar committed
1006

1007 1008
        f_requested_fps = var_CreateGetFloat( p_input, "sub-fps" );
        if( f_requested_fps != f_fps )
1009
        {
1010 1011 1012
            var_Create( p_input, "sub-fps", VLC_VAR_FLOAT|
                                            VLC_VAR_DOINHERIT );
            var_SetFloat( p_input, "sub-fps", f_requested_fps );