git.sesse.net Git - vlc/blob - src/input/input.c

   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  * This program is free software; you can redistribute it and/or modify
  11  * it under the terms of the GNU General Public License as published by
  12  * the Free Software Foundation; either version 2 of the License, or
  13  * (at your option) any later version.
  14  *
  15  * This program is distributed in the hope that it will be useful,
  16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18  * GNU General Public License for more details.
  19  *
  20  * You should have received a copy of the GNU General Public License
  21  * along with this program; if not, write to the Free Software
  22  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  23  *****************************************************************************/
  24
  25 /*****************************************************************************
  26  * Preamble
  27  *****************************************************************************/
  28 #ifdef HAVE_CONFIG_H
  29 # include "config.h"
  30 #endif
  31
  32 #include <vlc_common.h>
  33
  34 #include <ctype.h>
  35 #include <limits.h>
  36 #include <assert.h>
  37 #include <errno.h>
  38
  39 #include "input_internal.h"
  40 #include "event.h"
  41 #include "es_out.h"
  42 #include "es_out_timeshift.h"
  43 #include "access.h"
  44 #include "demux.h"
  45 #include "stream.h"
  46 #include "item.h"
  47 #include "resource.h"
  48
  49 #include <vlc_sout.h>
  50 #include "../stream_output/stream_output.h"
  51
  52 #include <vlc_dialog.h>
  53 #include <vlc_url.h>
  54 #include <vlc_charset.h>
  55 #include <vlc_strings.h>
  56
  57 #ifdef HAVE_SYS_STAT_H
  58 #   include <sys/stat.h>
  59 #endif
  60
  61 /*****************************************************************************
  62  * Local prototypes
  63  *****************************************************************************/
  64 static void Destructor( input_thread_t * p_input );
  65
  66 static  void *Run            ( vlc_object_t *p_this );
  67
  68 static input_thread_t * Create  ( vlc_object_t *, input_item_t *,
  69                                   const char *, bool, input_resource_t * );
  70 static  int             Init    ( input_thread_t *p_input );
  71 static void             End     ( input_thread_t *p_input );
  72 static void             MainLoop( input_thread_t *p_input );
  73
  74 static void ObjectKillChildrens( input_thread_t *, vlc_object_t * );
  75
  76 static inline int ControlPop( input_thread_t *, int *, vlc_value_t *, mtime_t i_deadline );
  77 static void       ControlReduce( input_thread_t * );
  78 static void       ControlRelease( int i_type, vlc_value_t val );
  79 static bool       Control( input_thread_t *, int, vlc_value_t );
  80
  81 static int  UpdateTitleSeekpointFromAccess( input_thread_t * );
  82 static void UpdateGenericFromAccess( input_thread_t * );
  83
  84 static int  UpdateTitleSeekpointFromDemux( input_thread_t * );
  85 static void UpdateGenericFromDemux( input_thread_t * );
  86
  87 static void MRLSections( input_thread_t *, char *, int *, int *, int *, int *);
  88
  89 static input_source_t *InputSourceNew( input_thread_t *);
  90 static int  InputSourceInit( input_thread_t *, input_source_t *,
  91                              const char *, const char *psz_forced_demux );
  92 static void InputSourceClean( input_source_t * );
  93 static void InputSourceMeta( input_thread_t *, input_source_t *, vlc_meta_t * );
  94
  95 /* TODO */
  96 //static void InputGetAttachments( input_thread_t *, input_source_t * );
  97 static void SlaveDemux( input_thread_t *p_input, bool *pb_demux_polled );
  98 static void SlaveSeek( input_thread_t *p_input );
  99
 100 static void InputMetaUser( input_thread_t *p_input, vlc_meta_t *p_meta );
 101 static void InputUpdateMeta( input_thread_t *p_input, vlc_meta_t *p_meta );
 102 static void InputGetExtraFiles( input_thread_t *p_input,
 103                                 int *pi_list, char ***pppsz_list,
 104                                 const char *psz_access, const char *psz_path );
 105
 106 static void AppendAttachment( int *pi_attachment, input_attachment_t ***ppp_attachment,
 107                               int i_new, input_attachment_t **pp_new );
 108
 109 static void SubtitleAdd( input_thread_t *p_input, char *psz_subtitle, bool b_forced );
 110
 111 static void input_ChangeState( input_thread_t *p_input, int i_state ); /* TODO fix name */
 112
 113 /* Do not let a pts_delay from access/demux go beyong 60s */
 114 #define INPUT_PTS_DELAY_MAX INT64_C(60000000)
 115
 116 /**
 117  * Create a new input_thread_t.
 118  *
 119  * You need to call input_Start on it when you are done
 120  * adding callback on the variables/events you want to monitor.
 121  *
 122  * \param p_parent a vlc_object
 123  * \param p_item an input item
 124  * \param psz_log an optional prefix for this input logs
 125  * \param p_resource an optional input ressource
 126  * \return a pointer to the spawned input thread
 127  */
 128
 129 input_thread_t *__input_Create( vlc_object_t *p_parent,
 130                                 input_item_t *p_item,
 131                                 const char *psz_log, input_resource_t *p_resource )
 132 {
 133
 134     return Create( p_parent, p_item, psz_log, false, p_resource );
 135 }
 136
 137 /**
 138  * Create a new input_thread_t and start it.
 139  *
 140  * Provided for convenience.
 141  *
 142  * \see input_Create
 143  */
 144 input_thread_t *__input_CreateAndStart( vlc_object_t *p_parent,
 145                                         input_item_t *p_item, const char *psz_log )
 146 {
 147     input_thread_t *p_input = __input_Create( p_parent, p_item, psz_log, NULL );
 148
 149     if( input_Start( p_input ) )
 150     {
 151         vlc_object_release( p_input );
 152         return NULL;
 153     }
 154     return p_input;
 155 }
 156
 157 /**
 158  * Initialize an input thread and run it until it stops by itself.
 159  *
 160  * \param p_parent a vlc_object
 161  * \param p_item an input item
 162  * \return an error code, VLC_SUCCESS on success
 163  */
 164 int __input_Read( vlc_object_t *p_parent, input_item_t *p_item )
 165 {
 166     input_thread_t *p_input = Create( p_parent, p_item, NULL, false, NULL );
 167     if( !p_input )
 168         return VLC_EGENERIC;
 169
 170     if( !Init( p_input ) )
 171     {
 172         MainLoop( p_input );
 173         End( p_input );
 174     }
 175
 176     vlc_object_release( p_input );
 177     return VLC_SUCCESS;
 178 }
 179
 180 /**
 181  * Initialize an input and initialize it to preparse the item
 182  * This function is blocking. It will only accept parsing regular files.
 183  *
 184  * \param p_parent a vlc_object_t
 185  * \param p_item an input item
 186  * \return VLC_SUCCESS or an error
 187  */
 188 int input_Preparse( vlc_object_t *p_parent, input_item_t *p_item )
 189 {
 190     input_thread_t *p_input;
 191
 192     /* Allocate descriptor */
 193     p_input = Create( p_parent, p_item, NULL, true, NULL );
 194     if( !p_input )
 195         return VLC_EGENERIC;
 196
 197     if( !Init( p_input ) )
 198         End( p_input );
 199
 200     vlc_object_release( p_input );
 201
 202     return VLC_SUCCESS;
 203 }
 204
 205 /**
 206  * Start a input_thread_t created by input_Create.
 207  *
 208  * You must not start an already running input_thread_t.
 209  *
 210  * \param the input thread to start
 211  */
 212 int input_Start( input_thread_t *p_input )
 213 {
 214     /* Create thread and wait for its readiness. */
 215     if( vlc_thread_create( p_input, "input", Run,
 216                            VLC_THREAD_PRIORITY_INPUT ) )
 217     {
 218         input_ChangeState( p_input, ERROR_S );
 219         msg_Err( p_input, "cannot create input thread" );
 220         return VLC_EGENERIC;
 221     }
 222     return VLC_SUCCESS;
 223 }
 224
 225 /**
 226  * Request a running input thread to stop and die
 227  *
 228  * b_abort must be true when a user stop is requested and not because you have
 229  * detected an error or an eof. It will be used to properly send the
 230  * INPUT_EVENT_ABORT event.
 231  *
 232  * \param p_input the input thread to stop
 233  * \param b_abort true if the input has been aborted by a user request
 234  */
 235 void input_Stop( input_thread_t *p_input, bool b_abort )
 236 {
 237     /* Set die for input and ALL of this childrens (even (grand-)grand-childrens)
 238      * It is needed here even if it is done in INPUT_CONTROL_SET_DIE handler to
 239      * unlock the control loop */
 240     ObjectKillChildrens( p_input, VLC_OBJECT(p_input) );
 241
 242     vlc_mutex_lock( &p_input->p->lock_control );
 243     p_input->p->b_abort |= b_abort;
 244     vlc_mutex_unlock( &p_input->p->lock_control );
 245
 246     input_ControlPush( p_input, INPUT_CONTROL_SET_DIE, NULL );
 247 }
 248
 249 input_resource_t *input_DetachResource( input_thread_t *p_input )
 250 {
 251     assert( p_input->b_dead );
 252
 253     input_resource_SetInput( p_input->p->p_resource, NULL );
 254
 255     input_resource_t *p_resource = input_resource_Detach( p_input->p->p_resource );
 256     p_input->p->p_sout = NULL;
 257
 258     return p_resource;
 259 }
 260
 261 /**
 262  * Get the item from an input thread
 263  * FIXME it does not increase ref count of the item.
 264  * if it is used after p_input is destroyed nothing prevent it from
 265  * being freed.
 266  */
 267 input_item_t *input_GetItem( input_thread_t *p_input )
 268 {
 269     assert( p_input && p_input->p );
 270     return p_input->p->p_item;
 271 }
 272
 273 /*****************************************************************************
 274  * ObjectKillChildrens
 275  *****************************************************************************/
 276 static void ObjectKillChildrens( input_thread_t *p_input, vlc_object_t *p_obj )
 277 {
 278     vlc_list_t *p_list;
 279     int i;
 280
 281     /* FIXME ObjectKillChildrens seems a very bad idea in fact */
 282     i = vlc_internals( p_obj )->i_object_type;
 283     if( i == VLC_OBJECT_VOUT ||i == VLC_OBJECT_AOUT ||
 284         p_obj == VLC_OBJECT(p_input->p->p_sout) ||
 285         i == VLC_OBJECT_DECODER )
 286         return;
 287
 288     vlc_object_kill( p_obj );
 289
 290     p_list = vlc_list_children( p_obj );
 291     for( i = 0; i < p_list->i_count; i++ )
 292         ObjectKillChildrens( p_input, p_list->p_values[i].p_object );
 293     vlc_list_release( p_list );
 294 }
 295
 296 /*****************************************************************************
 297  * This function creates a new input, and returns a pointer
 298  * to its description. On error, it returns NULL.
 299  *
 300  * XXX Do not forget to update vlc_input.h if you add new variables.
 301  *****************************************************************************/
 302 static input_thread_t *Create( vlc_object_t *p_parent, input_item_t *p_item,
 303                                const char *psz_header, bool b_quick,
 304                                input_resource_t *p_resource )
 305 {
 306     static const char input_name[] = "input";
 307     input_thread_t *p_input = NULL;                 /* thread descriptor */
 308     int i;
 309
 310     /* Allocate descriptor */
 311     p_input = vlc_custom_create( p_parent, sizeof( *p_input ),
 312                                  VLC_OBJECT_INPUT, input_name );
 313     if( p_input == NULL )
 314         return NULL;
 315
 316     /* Construct a nice name for the input timer */
 317     char psz_timer_name[255];
 318     char * psz_name = input_item_GetName( p_item );
 319     snprintf( psz_timer_name, sizeof(psz_timer_name),
 320               "input launching for '%s'", psz_name );
 321
 322     msg_Dbg( p_input, "Creating an input for '%s'", psz_name);
 323
 324     free( psz_name );
 325
 326     /* Start a timer to mesure how long it takes
 327      * to launch an input */
 328     stats_TimerStart( p_input, psz_timer_name,
 329         STATS_TIMER_INPUT_LAUNCHING );
 330
 331     p_input->p = calloc( 1, sizeof( input_thread_private_t ) );
 332     if( !p_input->p )
 333         return NULL;
 334
 335     p_input->b_preparsing = b_quick;
 336     p_input->psz_header = psz_header ? strdup( psz_header ) : NULL;
 337
 338     /* Init Common fields */
 339     p_input->b_eof = false;
 340     p_input->p->b_can_pace_control = true;
 341     p_input->p->i_start = 0;
 342     p_input->p->i_time  = 0;
 343     p_input->p->i_stop  = 0;
 344     p_input->p->i_run   = 0;
 345     p_input->p->i_title = 0;
 346     p_input->p->title = NULL;
 347     p_input->p->i_title_offset = p_input->p->i_seekpoint_offset = 0;
 348     p_input->p->i_state = INIT_S;
 349     p_input->p->i_rate = INPUT_RATE_DEFAULT;
 350     p_input->p->b_recording = false;
 351     memset( &p_input->p->bookmark, 0, sizeof(p_input->p->bookmark) );
 352     TAB_INIT( p_input->p->i_bookmark, p_input->p->pp_bookmark );
 353     TAB_INIT( p_input->p->i_attachment, p_input->p->attachment );
 354     p_input->p->p_es_out_display = NULL;
 355     p_input->p->p_es_out = NULL;
 356     p_input->p->p_sout   = NULL;
 357     p_input->p->b_out_pace_control = false;
 358
 359     vlc_gc_incref( p_item ); /* Released in Destructor() */
 360     p_input->p->p_item = p_item;
 361
 362     /* Init Input fields */
 363     p_input->p->input.p_access = NULL;
 364     p_input->p->input.p_stream = NULL;
 365     p_input->p->input.p_demux  = NULL;
 366     p_input->p->input.b_title_demux = false;
 367     p_input->p->input.i_title  = 0;
 368     p_input->p->input.title    = NULL;
 369     p_input->p->input.i_title_offset = p_input->p->input.i_seekpoint_offset = 0;
 370     p_input->p->input.b_can_pace_control = true;
 371     p_input->p->input.b_can_rate_control = true;
 372     p_input->p->input.b_rescale_ts = true;
 373     p_input->p->input.b_eof = false;
 374
 375     vlc_mutex_lock( &p_item->lock );
 376
 377     if( !p_item->p_stats )
 378         p_item->p_stats = stats_NewInputStats( p_input );
 379     vlc_mutex_unlock( &p_item->lock );
 380
 381     /* No slave */
 382     p_input->p->i_slave = 0;
 383     p_input->p->slave   = NULL;
 384
 385     /* */
 386     if( p_resource )
 387         p_input->p->p_resource = p_resource;
 388     else
 389         p_input->p->p_resource = input_resource_New();
 390     input_resource_SetInput( p_input->p->p_resource, p_input );
 391
 392     /* Init control buffer */
 393     vlc_mutex_init( &p_input->p->lock_control );
 394     vlc_cond_init( &p_input->p->wait_control );
 395     p_input->p->i_control = 0;
 396     p_input->p->b_abort = false;
 397
 398     /* Parse input options */
 399     vlc_mutex_lock( &p_item->lock );
 400     assert( (int)p_item->optflagc == p_item->i_options );
 401     for( i = 0; i < p_item->i_options; i++ )
 402         var_OptionParse( VLC_OBJECT(p_input), p_item->ppsz_options[i],
 403                          !!(p_item->optflagv[i] & VLC_INPUT_OPTION_TRUSTED) );
 404     vlc_mutex_unlock( &p_item->lock );
 405
 406     /* Create Object Variables for private use only */
 407     input_ConfigVarInit( p_input );
 408
 409     /* Create Objects variables for public Get and Set */
 410     input_ControlVarInit( p_input );
 411
 412     /* */
 413     if( !p_input->b_preparsing )
 414     {
 415         char *psz_bookmarks = var_GetNonEmptyString( p_input, "bookmarks" );
 416         if( psz_bookmarks )
 417         {
 418             /* FIXME: have a common cfg parsing routine used by sout and others */
 419             char *psz_parser, *psz_start, *psz_end;
 420             psz_parser = psz_bookmarks;
 421             while( (psz_start = strchr( psz_parser, '{' ) ) )
 422             {
 423                  seekpoint_t *p_seekpoint;
 424                  char backup;
 425                  psz_start++;
 426                  psz_end = strchr( psz_start, '}' );
 427                  if( !psz_end ) break;
 428                  psz_parser = psz_end + 1;
 429                  backup = *psz_parser;
 430                  *psz_parser = 0;
 431                  *psz_end = ',';
 432
 433                  p_seekpoint = vlc_seekpoint_New();
 434                  while( (psz_end = strchr( psz_start, ',' ) ) )
 435                  {
 436                      *psz_end = 0;
 437                      if( !strncmp( psz_start, "name=", 5 ) )
 438                      {
 439                          p_seekpoint->psz_name = strdup(psz_start + 5);
 440                      }
 441                      else if( !strncmp( psz_start, "bytes=", 6 ) )
 442                      {
 443                          p_seekpoint->i_byte_offset = atoll(psz_start + 6);
 444                      }
 445                      else if( !strncmp( psz_start, "time=", 5 ) )
 446                      {
 447                          p_seekpoint->i_time_offset = atoll(psz_start + 5) *
 448                                                         1000000;
 449                      }
 450                      psz_start = psz_end + 1;
 451                 }
 452                 msg_Dbg( p_input, "adding bookmark: %s, bytes=%"PRId64", time=%"PRId64,
 453                                   p_seekpoint->psz_name, p_seekpoint->i_byte_offset,
 454                                   p_seekpoint->i_time_offset );
 455                 input_Control( p_input, INPUT_ADD_BOOKMARK, p_seekpoint );
 456                 vlc_seekpoint_Delete( p_seekpoint );
 457                 *psz_parser = backup;
 458             }
 459             free( psz_bookmarks );
 460         }
 461     }
 462
 463     /* Remove 'Now playing' info as it is probably outdated */
 464     input_item_SetNowPlaying( p_item, NULL );
 465     input_SendEventMeta( p_input );
 466
 467     /* */
 468     if( p_input->b_preparsing )
 469         p_input->i_flags |= OBJECT_FLAGS_QUIET | OBJECT_FLAGS_NOINTERACT;
 470
 471     /* */
 472     memset( &p_input->p->counters, 0, sizeof( p_input->p->counters ) );
 473     vlc_mutex_init( &p_input->p->counters.counters_lock );
 474
 475     /* Set the destructor when we are sure we are initialized */
 476     vlc_object_set_destructor( p_input, (vlc_destructor_t)Destructor );
 477
 478     /* Attach only once we are ready */
 479     vlc_object_attach( p_input, p_parent );
 480
 481     return p_input;
 482 }
 483
 484 /**
 485  * Input destructor (called when the object's refcount reaches 0).
 486  */
 487 static void Destructor( input_thread_t * p_input )
 488 {
 489 #ifndef NDEBUG
 490     char * psz_name = input_item_GetName( p_input->p->p_item );
 491     msg_Dbg( p_input, "Destroying the input for '%s'", psz_name);
 492     free( psz_name );
 493 #endif
 494
 495     stats_TimerDump( p_input, STATS_TIMER_INPUT_LAUNCHING );
 496     stats_TimerClean( p_input, STATS_TIMER_INPUT_LAUNCHING );
 497
 498     if( p_input->p->p_resource )
 499         input_resource_Delete( p_input->p->p_resource );
 500
 501     vlc_gc_decref( p_input->p->p_item );
 502
 503     vlc_mutex_destroy( &p_input->p->counters.counters_lock );
 504
 505     for( int i = 0; i < p_input->p->i_control; i++ )
 506     {
 507         input_control_t *p_ctrl = &p_input->p->control[i];
 508         ControlRelease( p_ctrl->i_type, p_ctrl->val );
 509     }
 510
 511     vlc_cond_destroy( &p_input->p->wait_control );
 512     vlc_mutex_destroy( &p_input->p->lock_control );
 513     free( p_input->p );
 514 }
 515
 516 /*****************************************************************************
 517  * Run: main thread loop
 518  * This is the "normal" thread that spawns the input processing chain,
 519  * reads the stream, cleans up and waits
 520  *****************************************************************************/
 521 static void *Run( vlc_object_t *p_this )
 522 {
 523     input_thread_t *p_input = (input_thread_t *)p_this;
 524     const int canc = vlc_savecancel();
 525
 526     if( Init( p_input ) )
 527         goto exit;
 528
 529     MainLoop( p_input );
 530
 531     /* Clean up */
 532     End( p_input );
 533
 534 exit:
 535     /* Tell we're dead */
 536     vlc_mutex_lock( &p_input->p->lock_control );
 537     const bool b_abort = p_input->p->b_abort;
 538     vlc_mutex_unlock( &p_input->p->lock_control );
 539
 540     if( b_abort )
 541         input_SendEventAbort( p_input );
 542     input_SendEventDead( p_input );
 543
 544     vlc_restorecancel( canc );
 545     return NULL;
 546 }
 547
 548 /*****************************************************************************
 549  * Main loop: Fill buffers from access, and demux
 550  *****************************************************************************/
 551
 552 /**
 553  * MainLoopDemux
 554  * It asks the demuxer to demux some data
 555  */
 556 static void MainLoopDemux( input_thread_t *p_input, bool *pb_changed, bool *pb_demux_polled, mtime_t i_start_mdate )
 557 {
 558     int i_ret;
 559
 560     *pb_changed = false;
 561     *pb_demux_polled = p_input->p->input.p_demux->pf_demux != NULL;
 562
 563     if( ( p_input->p->i_stop > 0 && p_input->p->i_time >= p_input->p->i_stop ) ||
 564         ( p_input->p->i_run > 0 && i_start_mdate+p_input->p->i_run < mdate() ) )
 565         i_ret = 0; /* EOF */
 566     else
 567         i_ret = demux_Demux( p_input->p->input.p_demux );
 568
 569     if( i_ret > 0 )
 570     {
 571         if( p_input->p->input.p_demux->info.i_update )
 572         {
 573             if( p_input->p->input.b_title_demux )
 574             {
 575                 i_ret = UpdateTitleSeekpointFromDemux( p_input );
 576                 *pb_changed = true;
 577             }
 578             UpdateGenericFromDemux( p_input );
 579         }
 580         else if( p_input->p->input.p_access &&
 581                  p_input->p->input.p_access->info.i_update )
 582         {
 583             if( !p_input->p->input.b_title_demux )
 584             {
 585                 i_ret = UpdateTitleSeekpointFromAccess( p_input );
 586                 *pb_changed = true;
 587             }
 588             UpdateGenericFromAccess( p_input );
 589         }
 590     }
 591
 592     if( i_ret == 0 )    /* EOF */
 593     {
 594         msg_Dbg( p_input, "EOF reached" );
 595         p_input->p->input.b_eof = true;
 596     }
 597     else if( i_ret < 0 )
 598     {
 599         input_ChangeState( p_input, ERROR_S );
 600     }
 601
 602     if( i_ret > 0 && p_input->p->i_slave > 0 )
 603     {
 604         bool b_demux_polled;
 605         SlaveDemux( p_input, &b_demux_polled );
 606
 607         *pb_demux_polled |= b_demux_polled;
 608     }
 609 }
 610
 611 static int MainLoopTryRepeat( input_thread_t *p_input, mtime_t *pi_start_mdate )
 612 {
 613     int i_repeat = var_GetInteger( p_input, "input-repeat" );
 614     if( i_repeat == 0 )
 615         return VLC_EGENERIC;
 616
 617     vlc_value_t val;
 618
 619     msg_Dbg( p_input, "repeating the same input (%d)", i_repeat );
 620     if( i_repeat > 0 )
 621     {
 622         i_repeat--;
 623         var_SetInteger( p_input, "input-repeat", i_repeat );
 624     }
 625
 626     /* Seek to start title/seekpoint */
 627     val.i_int = p_input->p->input.i_title_start -
 628         p_input->p->input.i_title_offset;
 629     if( val.i_int < 0 || val.i_int >= p_input->p->input.i_title )
 630         val.i_int = 0;
 631     input_ControlPush( p_input,
 632                        INPUT_CONTROL_SET_TITLE, &val );
 633
 634     val.i_int = p_input->p->input.i_seekpoint_start -
 635         p_input->p->input.i_seekpoint_offset;
 636     if( val.i_int > 0 /* TODO: check upper boundary */ )
 637         input_ControlPush( p_input,
 638                            INPUT_CONTROL_SET_SEEKPOINT, &val );
 639
 640     /* Seek to start position */
 641     if( p_input->p->i_start > 0 )
 642     {
 643         val.i_time = p_input->p->i_start;
 644         input_ControlPush( p_input, INPUT_CONTROL_SET_TIME, &val );
 645     }
 646     else
 647     {
 648         val.f_float = 0.0;
 649         input_ControlPush( p_input, INPUT_CONTROL_SET_POSITION, &val );
 650     }
 651
 652     /* */
 653     *pi_start_mdate = mdate();
 654     return VLC_SUCCESS;
 655 }
 656
 657 /**
 658  * MainLoopInterface
 659  * It update the variables used by the interfaces
 660  */
 661 static void MainLoopInterface( input_thread_t *p_input )
 662 {
 663     double f_position = 0.0;
 664     mtime_t i_time = 0;
 665     mtime_t i_length = 0;
 666
 667     /* update input status variables */
 668     if( demux_Control( p_input->p->input.p_demux,
 669                        DEMUX_GET_POSITION, &f_position ) )
 670         f_position = 0.0;
 671
 672     if( demux_Control( p_input->p->input.p_demux,
 673                        DEMUX_GET_TIME, &i_time ) )
 674         i_time = 0;
 675     p_input->p->i_time = i_time;
 676
 677     if( demux_Control( p_input->p->input.p_demux,
 678                        DEMUX_GET_LENGTH, &i_length ) )
 679         i_length = 0;
 680
 681     es_out_SetTimes( p_input->p->p_es_out, f_position, i_time, i_length );
 682
 683     /* update current bookmark */
 684     vlc_mutex_lock( &p_input->p->p_item->lock );
 685     p_input->p->bookmark.i_time_offset = i_time;
 686     if( p_input->p->input.p_stream )
 687         p_input->p->bookmark.i_byte_offset = stream_Tell( p_input->p->input.p_stream );
 688     vlc_mutex_unlock( &p_input->p->p_item->lock );
 689 }
 690
 691 /**
 692  * MainLoopStatistic
 693  * It updates the globals statics
 694  */
 695 static void MainLoopStatistic( input_thread_t *p_input )
 696 {
 697     stats_ComputeInputStats( p_input, p_input->p->p_item->p_stats );
 698     input_SendEventStatistics( p_input );
 699 }
 700
 701 /**
 702  * MainLoop
 703  * The main input loop.
 704  */
 705 static void MainLoop( input_thread_t *p_input )
 706 {
 707     mtime_t i_start_mdate = mdate();
 708     mtime_t i_intf_update = 0;
 709     mtime_t i_statistic_update = 0;
 710     bool b_pause_after_eof = var_CreateGetBool( p_input, "play-and-pause" );
 711
 712     /* Start the timer */
 713     stats_TimerStop( p_input, STATS_TIMER_INPUT_LAUNCHING );
 714
 715     while( vlc_object_alive( p_input ) && !p_input->b_error )
 716     {
 717         bool b_force_update;
 718         int i_type;
 719         vlc_value_t val;
 720         mtime_t i_current;
 721         mtime_t i_deadline;
 722         mtime_t i_wakeup;
 723         bool b_paused;
 724         bool b_demux_polled;
 725
 726         /* Demux data */
 727         b_force_update = false;
 728         i_wakeup = 0;
 729         /* FIXME if p_input->p->i_state == PAUSE_S the access/access_demux
 730          * is paused -> this may cause problem with some of them
 731          * The same problem can be seen when seeking while paused */
 732         b_paused = p_input->p->i_state == PAUSE_S &&
 733                    ( !es_out_GetBuffering( p_input->p->p_es_out ) || p_input->p->input.b_eof );
 734
 735         b_demux_polled = true;
 736         if( !b_paused )
 737         {
 738             if( !p_input->p->input.b_eof )
 739             {
 740                 MainLoopDemux( p_input, &b_force_update, &b_demux_polled, i_start_mdate );
 741
 742                 i_wakeup = es_out_GetWakeup( p_input->p->p_es_out );
 743             }
 744             else if( !es_out_GetEmpty( p_input->p->p_es_out ) )
 745             {
 746                 msg_Dbg( p_input, "waiting decoder fifos to empty" );
 747                 i_wakeup = mdate() + INPUT_IDLE_SLEEP;
 748             }
 749             else if( b_pause_after_eof )
 750             {
 751                 msg_Dbg( p_input, "pausing at EOF (pause after each)");
 752                 val.i_int = PAUSE_S;
 753                 Control( p_input, INPUT_CONTROL_SET_STATE, val );
 754
 755                 b_pause_after_eof = false;
 756                 b_paused = true;
 757             }
 758             else
 759             {
 760                 if( MainLoopTryRepeat( p_input, &i_start_mdate ) )
 761                     break;
 762                 b_pause_after_eof = var_GetBool( p_input, "play-and-pause" );
 763             }
 764         }
 765
 766         /* */
 767         do {
 768             i_deadline = i_wakeup;
 769             if( b_paused || !b_demux_polled )
 770                 i_deadline = __MIN( i_intf_update, i_statistic_update );
 771
 772             /* Handle control */
 773             ControlReduce( p_input );
 774             while( !ControlPop( p_input, &i_type, &val, i_deadline ) )
 775             {
 776
 777                 msg_Dbg( p_input, "control type=%d", i_type );
 778
 779                 if( Control( p_input, i_type, val ) )
 780                     b_force_update = true;
 781             }
 782
 783             /* Update interface and statistics */
 784             i_current = mdate();
 785             if( i_intf_update < i_current || b_force_update )
 786             {
 787                 MainLoopInterface( p_input );
 788                 i_intf_update = i_current + INT64_C(250000);
 789                 b_force_update = false;
 790             }
 791             if( i_statistic_update < i_current )
 792             {
 793                 MainLoopStatistic( p_input );
 794                 i_statistic_update = i_current + INT64_C(1000000);
 795             }
 796
 797             /* Update the wakeup time */
 798             if( i_wakeup != 0 )
 799                 i_wakeup = es_out_GetWakeup( p_input->p->p_es_out );
 800         } while( i_current < i_wakeup );
 801     }
 802
 803     if( !p_input->b_error )
 804         input_ChangeState( p_input, END_S );
 805 }
 806
 807 static void InitStatistics( input_thread_t * p_input )
 808 {
 809     if( p_input->b_preparsing ) return;
 810
 811     /* Prepare statistics */
 812 #define INIT_COUNTER( c, type, compute ) p_input->p->counters.p_##c = \
 813  stats_CounterCreate( p_input, VLC_VAR_##type, STATS_##compute);
 814     if( libvlc_stats( p_input ) )
 815     {
 816         INIT_COUNTER( read_bytes, INTEGER, COUNTER );
 817         INIT_COUNTER( read_packets, INTEGER, COUNTER );
 818         INIT_COUNTER( demux_read, INTEGER, COUNTER );
 819         INIT_COUNTER( input_bitrate, FLOAT, DERIVATIVE );
 820         INIT_COUNTER( demux_bitrate, FLOAT, DERIVATIVE );
 821         INIT_COUNTER( demux_corrupted, INTEGER, COUNTER );
 822         INIT_COUNTER( demux_discontinuity, INTEGER, COUNTER );
 823         INIT_COUNTER( played_abuffers, INTEGER, COUNTER );
 824         INIT_COUNTER( lost_abuffers, INTEGER, COUNTER );
 825         INIT_COUNTER( displayed_pictures, INTEGER, COUNTER );
 826         INIT_COUNTER( lost_pictures, INTEGER, COUNTER );
 827         INIT_COUNTER( decoded_audio, INTEGER, COUNTER );
 828         INIT_COUNTER( decoded_video, INTEGER, COUNTER );
 829         INIT_COUNTER( decoded_sub, INTEGER, COUNTER );
 830         p_input->p->counters.p_sout_send_bitrate = NULL;
 831         p_input->p->counters.p_sout_sent_packets = NULL;
 832         p_input->p->counters.p_sout_sent_bytes = NULL;
 833         if( p_input->p->counters.p_demux_bitrate )
 834             p_input->p->counters.p_demux_bitrate->update_interval = 1000000;
 835         if( p_input->p->counters.p_input_bitrate )
 836             p_input->p->counters.p_input_bitrate->update_interval = 1000000;
 837     }
 838 }
 839
 840 #ifdef ENABLE_SOUT
 841 static int InitSout( input_thread_t * p_input )
 842 {
 843     if( p_input->b_preparsing )
 844         return VLC_SUCCESS;
 845
 846     /* Find a usable sout and attach it to p_input */
 847     char *psz = var_GetNonEmptyString( p_input, "sout" );
 848     if( psz && strncasecmp( p_input->p->p_item->psz_uri, "vlc:", 4 ) )
 849     {
 850         p_input->p->p_sout  = input_resource_RequestSout( p_input->p->p_resource, NULL, psz );
 851         if( !p_input->p->p_sout )
 852         {
 853             input_ChangeState( p_input, ERROR_S );
 854             msg_Err( p_input, "cannot start stream output instance, " \
 855                               "aborting" );
 856             free( psz );
 857             return VLC_EGENERIC;
 858         }
 859         if( libvlc_stats( p_input ) )
 860         {
 861             INIT_COUNTER( sout_sent_packets, INTEGER, COUNTER );
 862             INIT_COUNTER( sout_sent_bytes, INTEGER, COUNTER );
 863             INIT_COUNTER( sout_send_bitrate, FLOAT, DERIVATIVE );
 864             if( p_input->p->counters.p_sout_send_bitrate )
 865                  p_input->p->counters.p_sout_send_bitrate->update_interval =
 866                          1000000;
 867         }
 868     }
 869     else
 870     {
 871         input_resource_RequestSout( p_input->p->p_resource, NULL, NULL );
 872     }
 873     free( psz );
 874
 875     return VLC_SUCCESS;
 876 }
 877 #endif
 878
 879 static void InitTitle( input_thread_t * p_input )
 880 {
 881     input_source_t *p_master = &p_input->p->input;
 882
 883     if( p_input->b_preparsing )
 884         return;
 885
 886     /* Create global title (from master) */
 887     p_input->p->i_title = p_master->i_title;
 888     p_input->p->title   = p_master->title;
 889     p_input->p->i_title_offset = p_master->i_title_offset;
 890     p_input->p->i_seekpoint_offset = p_master->i_seekpoint_offset;
 891     if( p_input->p->i_title > 0 )
 892     {
 893         /* Setup variables */
 894         input_ControlVarNavigation( p_input );
 895         input_SendEventTitle( p_input, 0 );
 896     }
 897
 898     /* Global flag */
 899     p_input->p->b_can_pace_control    = p_master->b_can_pace_control;
 900     p_input->p->b_can_pause        = p_master->b_can_pause;
 901     p_input->p->b_can_rate_control = p_master->b_can_rate_control;
 902 }
 903
 904 static void StartTitle( input_thread_t * p_input )
 905 {
 906     vlc_value_t val;
 907
 908     /* Start title/chapter */
 909     val.i_int = p_input->p->input.i_title_start -
 910                 p_input->p->input.i_title_offset;
 911     if( val.i_int > 0 && val.i_int < p_input->p->input.i_title )
 912         input_ControlPush( p_input, INPUT_CONTROL_SET_TITLE, &val );
 913
 914     val.i_int = p_input->p->input.i_seekpoint_start -
 915                 p_input->p->input.i_seekpoint_offset;
 916     if( val.i_int > 0 /* TODO: check upper boundary */ )
 917         input_ControlPush( p_input, INPUT_CONTROL_SET_SEEKPOINT, &val );
 918
 919     /* Start/stop/run time */
 920     p_input->p->i_start = (int64_t)(1000000.0
 921                                      * var_GetFloat( p_input, "start-time" ));
 922     p_input->p->i_stop  = (int64_t)(1000000.0
 923                                      * var_GetFloat( p_input, "stop-time" ));
 924     p_input->p->i_run   = (int64_t)(1000000.0
 925                                      * var_GetFloat( p_input, "run-time" ));
 926     if( p_input->p->i_run < 0 )
 927     {
 928         msg_Warn( p_input, "invalid run-time ignored" );
 929         p_input->p->i_run = 0;
 930     }
 931
 932     if( p_input->p->i_start > 0 )
 933     {
 934         vlc_value_t s;
 935
 936         msg_Dbg( p_input, "starting at time: %ds",
 937                  (int)( p_input->p->i_start / INT64_C(1000000) ) );
 938
 939         s.i_time = p_input->p->i_start;
 940         input_ControlPush( p_input, INPUT_CONTROL_SET_TIME, &s );
 941     }
 942     if( p_input->p->i_stop > 0 && p_input->p->i_stop <= p_input->p->i_start )
 943     {
 944         msg_Warn( p_input, "invalid stop-time ignored" );
 945         p_input->p->i_stop = 0;
 946     }
 947     p_input->p->b_fast_seek = var_GetBool( p_input, "input-fast-seek" );
 948 }
 949
 950 static void LoadSubtitles( input_thread_t *p_input )
 951 {
 952     /* Load subtitles */
 953     /* Get fps and set it if not already set */
 954     const double f_fps = p_input->p->f_fps;
 955     if( f_fps > 1.0 )
 956     {
 957         float f_requested_fps;
 958
 959         var_Create( p_input, "sub-original-fps", VLC_VAR_FLOAT );
 960         var_SetFloat( p_input, "sub-original-fps", f_fps );
 961
 962         f_requested_fps = var_CreateGetFloat( p_input, "sub-fps" );
 963         if( f_requested_fps != f_fps )
 964         {
 965             var_Create( p_input, "sub-fps", VLC_VAR_FLOAT|
 966                                             VLC_VAR_DOINHERIT );
 967             var_SetFloat( p_input, "sub-fps", f_requested_fps );
 968         }
 969     }
 970
 971     const int i_delay = var_CreateGetInteger( p_input, "sub-delay" );
 972     if( i_delay != 0 )
 973         var_SetTime( p_input, "spu-delay", (mtime_t)i_delay * 100000 );
 974
 975     /* Look for and add subtitle files */
 976     char *psz_subtitle = var_GetNonEmptyString( p_input, "sub-file" );
 977     if( psz_subtitle != NULL )
 978     {
 979         msg_Dbg( p_input, "forced subtitle: %s", psz_subtitle );
 980         SubtitleAdd( p_input, psz_subtitle, true );
 981     }
 982
 983     if( var_GetBool( p_input, "sub-autodetect-file" ) )
 984     {
 985         char *psz_autopath = var_GetNonEmptyString( p_input, "sub-autodetect-path" );
 986         char **ppsz_subs = subtitles_Detect( p_input, psz_autopath,
 987                                              p_input->p->p_item->psz_uri );
 988         free( psz_autopath );
 989
 990         for( int i = 0; ppsz_subs && ppsz_subs[i]; i++ )
 991         {
 992             /* Try to autoselect the first autodetected subtitles file
 993              * if no subtitles file was specified */
 994             bool b_forced = i == 0 && !psz_subtitle;
 995
 996             if( !psz_subtitle || strcmp( psz_subtitle, ppsz_subs[i] ) )
 997                 SubtitleAdd( p_input, ppsz_subs[i], b_forced );
 998
 999             free( ppsz_subs[i] );
1000         }
1001         free( ppsz_subs );
1002     }
1003     free( psz_subtitle );
1004 }
1005
1006 static void LoadSlaves( input_thread_t *p_input )
1007 {
1008     char *psz = var_GetNonEmptyString( p_input, "input-slave" );
1009     if( !psz )
1010         return;
1011
1012     char *psz_org = psz;
1013     while( psz && *psz )
1014     {
1015         while( *psz == ' ' || *psz == '#' )
1016             psz++;
1017
1018         char *psz_delim = strchr( psz, '#' );
1019         if( psz_delim )
1020             *psz_delim++ = '\0';
1021
1022         if( *psz == 0 )
1023             break;
1024
1025         msg_Dbg( p_input, "adding slave input '%s'", psz );
1026
1027         input_source_t *p_slave = InputSourceNew( p_input );
1028         if( p_slave && !InputSourceInit( p_input, p_slave, psz, NULL ) )
1029             TAB_APPEND( p_input->p->i_slave, p_input->p->slave, p_slave );
1030         else
1031             free( p_slave );
1032
1033         psz = psz_delim;
1034     }
1035     free( psz_org );
1036 }
1037
1038 static void UpdatePtsDelay( input_thread_t *p_input )
1039 {
1040     input_thread_private_t *p_sys = p_input->p;
1041
1042     /* Get max pts delay from input source */
1043     mtime_t i_pts_delay = p_sys->input.i_pts_delay;
1044     for( int i = 0; i < p_sys->i_slave; i++ )
1045         i_pts_delay = __MAX( i_pts_delay, p_sys->slave[i]->i_pts_delay );
1046
1047     if( i_pts_delay < 0 )
1048         i_pts_delay = 0;
1049
1050     /* Take care of audio/spu delay */
1051     const mtime_t i_audio_delay = var_GetTime( p_input, "audio-delay" );
1052     const mtime_t i_spu_delay   = var_GetTime( p_input, "spu-delay" );
1053     const mtime_t i_extra_delay = __MIN( i_audio_delay, i_spu_delay );
1054     if( i_extra_delay < 0 )
1055         i_pts_delay -= i_extra_delay;
1056
1057     /* Update cr_average depending on the caching */
1058     const int i_cr_average = var_GetInteger( p_input, "cr-average" ) * i_pts_delay / DEFAULT_PTS_DELAY;
1059
1060     /* */
1061     es_out_SetJitter( p_input->p->p_es_out, i_pts_delay, i_cr_average );
1062 }
1063
1064 static void InitPrograms( input_thread_t * p_input )
1065 {
1066     int i_es_out_mode;
1067     vlc_value_t val;
1068
1069     /* Compute correct pts_delay */
1070     UpdatePtsDelay( p_input );
1071
1072     /* Set up es_out */
1073     es_out_Control( p_input->p->p_es_out, ES_OUT_SET_ACTIVE, true );
1074     i_es_out_mode = ES_OUT_MODE_AUTO;
1075     if( p_input->p->p_sout )
1076     {
1077         if( var_GetBool( p_input, "sout-all" ) )
1078         {
1079             i_es_out_mode = ES_OUT_MODE_ALL;
1080         }
1081         else
1082         {
1083             var_Get( p_input, "programs", &val );
1084             if( val.p_list && val.p_list->i_count )
1085             {
1086                 i_es_out_mode = ES_OUT_MODE_PARTIAL;
1087                 /* Note : we should remove the "program" callback. */
1088             }
1089             else
1090             {
1091                 var_FreeList( &val, NULL );
1092             }
1093         }
1094     }
1095     es_out_Control( p_input->p->p_es_out, ES_OUT_SET_MODE, i_es_out_mode );
1096
1097     /* Inform the demuxer about waited group (needed only for DVB) */
1098     if( i_es_out_mode == ES_OUT_MODE_ALL )
1099     {
1100         demux_Control( p_input->p->input.p_demux, DEMUX_SET_GROUP, -1, NULL );
1101     }
1102     else if( i_es_out_mode == ES_OUT_MODE_PARTIAL )
1103     {
1104         demux_Control( p_input->p->input.p_demux, DEMUX_SET_GROUP, -1,
1105                         val.p_list );
1106     }
1107     else
1108     {
1109         demux_Control( p_input->p->input.p_demux, DEMUX_SET_GROUP,
1110                        (int) var_GetInteger( p_input, "program" ), NULL );
1111     }
1112 }
1113
1114 static int Init( input_thread_t * p_input )
1115 {
1116     vlc_meta_t *p_meta;
1117     int i, ret;
1118
1119     for( i = 0; i < p_input->p->p_item->i_options; i++ )
1120     {
1121         if( !strncmp( p_input->p->p_item->ppsz_options[i], "meta-file", 9 ) )
1122         {
1123             msg_Dbg( p_input, "Input is a meta file: disabling unneeded options" );
1124             var_SetString( p_input, "sout", "" );
1125             var_SetBool( p_input, "sout-all", false );
1126             var_SetString( p_input, "input-slave", "" );
1127             var_SetInteger( p_input, "input-repeat", 0 );
1128             var_SetString( p_input, "sub-file", "" );
1129             var_SetBool( p_input, "sub-autodetect-file", false );
1130         }
1131     }
1132
1133     InitStatistics( p_input );
1134 #ifdef ENABLE_SOUT
1135     ret = InitSout( p_input );
1136     if( ret != VLC_SUCCESS )
1137         goto error_stats;
1138 #endif
1139
1140     /* Create es out */
1141     p_input->p->p_es_out_display = input_EsOutNew( p_input, p_input->p->i_rate );
1142     p_input->p->p_es_out         = input_EsOutTimeshiftNew( p_input, p_input->p->p_es_out_display, p_input->p->i_rate );
1143     es_out_Control( p_input->p->p_es_out, ES_OUT_SET_ACTIVE, false );
1144     es_out_Control( p_input->p->p_es_out, ES_OUT_SET_MODE, ES_OUT_MODE_NONE );
1145
1146     var_Create( p_input, "bit-rate", VLC_VAR_INTEGER );
1147     var_Create( p_input, "sample-rate", VLC_VAR_INTEGER );
1148
1149     /* */
1150     input_ChangeState( p_input, OPENING_S );
1151     input_SendEventCache( p_input, 0.0 );
1152
1153     /* */
1154     if( InputSourceInit( p_input, &p_input->p->input,
1155                          p_input->p->p_item->psz_uri, NULL ) )
1156     {
1157         goto error;
1158     }
1159
1160     InitTitle( p_input );
1161
1162     /* Load master infos */
1163     /* Init length */
1164     mtime_t i_length;
1165     if( demux_Control( p_input->p->input.p_demux, DEMUX_GET_LENGTH,
1166                          &i_length ) )
1167         i_length = 0;
1168     if( i_length <= 0 )
1169         i_length = input_item_GetDuration( p_input->p->p_item );
1170     input_SendEventLength( p_input, i_length );
1171
1172     input_SendEventPosition( p_input, 0.0, 0 );
1173
1174     if( !p_input->b_preparsing )
1175     {
1176         StartTitle( p_input );
1177         LoadSubtitles( p_input );
1178         LoadSlaves( p_input );
1179         InitPrograms( p_input );
1180     }
1181
1182     if( !p_input->b_preparsing && p_input->p->p_sout )
1183     {
1184         p_input->p->b_out_pace_control = (p_input->p->p_sout->i_out_pace_nocontrol > 0);
1185
1186         if( p_input->p->b_can_pace_control && p_input->p->b_out_pace_control )
1187         {
1188             /* We don't want a high input priority here or we'll
1189              * end-up sucking up all the CPU time */
1190             vlc_thread_set_priority( p_input, VLC_THREAD_PRIORITY_LOW );
1191         }
1192
1193         msg_Dbg( p_input, "starting in %s mode",
1194                  p_input->p->b_out_pace_control ? "async" : "sync" );
1195     }
1196
1197     p_meta = vlc_meta_New();
1198     if( p_meta )
1199     {
1200         /* Get meta data from users */
1201         InputMetaUser( p_input, p_meta );
1202
1203         /* Get meta data from master input */
1204         InputSourceMeta( p_input, &p_input->p->input, p_meta );
1205
1206         /* And from slave */
1207         for( int i = 0; i < p_input->p->i_slave; i++ )
1208             InputSourceMeta( p_input, p_input->p->slave[i], p_meta );
1209
1210         /* */
1211         InputUpdateMeta( p_input, p_meta );
1212     }
1213
1214     msg_Dbg( p_input, "`%s' successfully opened",
1215              p_input->p->p_item->psz_uri );
1216
1217     /* initialization is complete */
1218     input_ChangeState( p_input, PLAYING_S );
1219
1220     return VLC_SUCCESS;
1221
1222 error:
1223     input_ChangeState( p_input, ERROR_S );
1224
1225     if( p_input->p->p_es_out )
1226         es_out_Delete( p_input->p->p_es_out );
1227     if( p_input->p->p_es_out_display )
1228         es_out_Delete( p_input->p->p_es_out_display );
1229     if( p_input->p->p_resource )
1230     {
1231         if( p_input->p->p_sout )
1232             input_resource_RequestSout( p_input->p->p_resource,
1233                                          p_input->p->p_sout, NULL );
1234         input_resource_SetInput( p_input->p->p_resource, NULL );
1235     }
1236
1237 #ifdef ENABLE_SOUT
1238 error_stats:
1239 #endif
1240     if( !p_input->b_preparsing && libvlc_stats( p_input ) )
1241     {
1242 #define EXIT_COUNTER( c ) do { if( p_input->p->counters.p_##c ) \
1243                                    stats_CounterClean( p_input->p->counters.p_##c );\
1244                                p_input->p->counters.p_##c = NULL; } while(0)
1245         EXIT_COUNTER( read_bytes );
1246         EXIT_COUNTER( read_packets );
1247         EXIT_COUNTER( demux_read );
1248         EXIT_COUNTER( input_bitrate );
1249         EXIT_COUNTER( demux_bitrate );
1250         EXIT_COUNTER( demux_corrupted );
1251         EXIT_COUNTER( demux_discontinuity );
1252         EXIT_COUNTER( played_abuffers );
1253         EXIT_COUNTER( lost_abuffers );
1254         EXIT_COUNTER( displayed_pictures );
1255         EXIT_COUNTER( lost_pictures );
1256         EXIT_COUNTER( decoded_audio );
1257         EXIT_COUNTER( decoded_video );
1258         EXIT_COUNTER( decoded_sub );
1259
1260         if( p_input->p->p_sout )
1261         {
1262             EXIT_COUNTER( sout_sent_packets );
1263             EXIT_COUNTER( sout_sent_bytes );
1264             EXIT_COUNTER( sout_send_bitrate );
1265         }
1266 #undef EXIT_COUNTER
1267     }
1268
1269     /* Mark them deleted */
1270     p_input->p->input.p_demux = NULL;
1271     p_input->p->input.p_stream = NULL;
1272     p_input->p->input.p_access = NULL;
1273     p_input->p->p_es_out = NULL;
1274     p_input->p->p_es_out_display = NULL;
1275     p_input->p->p_sout = NULL;
1276
1277     return VLC_EGENERIC;
1278 }
1279
1280 /*****************************************************************************
1281  * End: end the input thread
1282  *****************************************************************************/
1283 static void End( input_thread_t * p_input )
1284 {
1285     int i;
1286
1287     /* We are at the end */
1288     input_ChangeState( p_input, END_S );
1289
1290     /* Clean control variables */
1291     input_ControlVarStop( p_input );
1292
1293     /* Stop es out activity */
1294     es_out_Control( p_input->p->p_es_out, ES_OUT_SET_ACTIVE, false );
1295     es_out_Control( p_input->p->p_es_out, ES_OUT_SET_MODE, ES_OUT_MODE_NONE );
1296
1297     /* Clean up master */
1298     InputSourceClean( &p_input->p->input );
1299
1300     /* Delete slave */
1301     for( i = 0; i < p_input->p->i_slave; i++ )
1302     {
1303         InputSourceClean( p_input->p->slave[i] );
1304         free( p_input->p->slave[i] );
1305     }
1306     free( p_input->p->slave );
1307
1308     /* Unload all modules */
1309     if( p_input->p->p_es_out )
1310         es_out_Delete( p_input->p->p_es_out );
1311     if( p_input->p->p_es_out_display )
1312         es_out_Delete( p_input->p->p_es_out_display );
1313
1314     if( !p_input->b_preparsing )
1315     {
1316 #define CL_CO( c ) stats_CounterClean( p_input->p->counters.p_##c ); p_input->p->counters.p_##c = NULL;
1317         if( libvlc_stats( p_input ) )
1318         {
1319             /* make sure we are up to date */
1320             stats_ComputeInputStats( p_input, p_input->p->p_item->p_stats );
1321             CL_CO( read_bytes );
1322             CL_CO( read_packets );
1323             CL_CO( demux_read );
1324             CL_CO( input_bitrate );
1325             CL_CO( demux_bitrate );
1326             CL_CO( demux_corrupted );
1327             CL_CO( demux_discontinuity );
1328             CL_CO( played_abuffers );
1329             CL_CO( lost_abuffers );
1330             CL_CO( displayed_pictures );
1331             CL_CO( lost_pictures );
1332             CL_CO( decoded_audio) ;
1333             CL_CO( decoded_video );
1334             CL_CO( decoded_sub) ;
1335         }
1336
1337         /* Close optional stream output instance */
1338         if( p_input->p->p_sout )
1339         {
1340             CL_CO( sout_sent_packets );
1341             CL_CO( sout_sent_bytes );
1342             CL_CO( sout_send_bitrate );
1343         }
1344 #undef CL_CO
1345     }
1346
1347     vlc_mutex_lock( &p_input->p->p_item->lock );
1348     if( p_input->p->i_attachment > 0 )
1349     {
1350         for( i = 0; i < p_input->p->i_attachment; i++ )
1351             vlc_input_attachment_Delete( p_input->p->attachment[i] );
1352         TAB_CLEAN( p_input->p->i_attachment, p_input->p->attachment );
1353     }
1354     vlc_mutex_unlock( &p_input->p->p_item->lock );
1355
1356     /* */
1357     input_resource_RequestSout( p_input->p->p_resource,
1358                                  p_input->p->p_sout, NULL );
1359     input_resource_SetInput( p_input->p->p_resource, NULL );
1360 }
1361
1362 /*****************************************************************************
1363  * Control
1364  *****************************************************************************/
1365 void input_ControlPush( input_thread_t *p_input,
1366                         int i_type, vlc_value_t *p_val )
1367 {
1368     vlc_mutex_lock( &p_input->p->lock_control );
1369     if( i_type == INPUT_CONTROL_SET_DIE )
1370     {
1371         /* Special case, empty the control */
1372         for( int i = 0; i < p_input->p->i_control; i++ )
1373         {
1374             input_control_t *p_ctrl = &p_input->p->control[i];
1375             ControlRelease( p_ctrl->i_type, p_ctrl->val );
1376         }
1377         p_input->p->i_control = 0;
1378     }
1379
1380     if( p_input->p->i_control >= INPUT_CONTROL_FIFO_SIZE )
1381     {
1382         msg_Err( p_input, "input control fifo overflow, trashing type=%d",
1383                  i_type );
1384         if( p_val )
1385             ControlRelease( i_type, *p_val );
1386     }
1387     else
1388     {
1389         input_control_t c;
1390         c.i_type = i_type;
1391         if( p_val )
1392             c.val = *p_val;
1393         else
1394             memset( &c.val, 0, sizeof(c.val) );
1395
1396         p_input->p->control[p_input->p->i_control++] = c;
1397     }
1398     vlc_cond_signal( &p_input->p->wait_control );
1399     vlc_mutex_unlock( &p_input->p->lock_control );
1400 }
1401
1402 static inline int ControlPop( input_thread_t *p_input,
1403                               int *pi_type, vlc_value_t *p_val,
1404                               mtime_t i_deadline )
1405 {
1406     input_thread_private_t *p_sys = p_input->p;
1407
1408     vlc_mutex_lock( &p_sys->lock_control );
1409     while( p_sys->i_control <= 0 )
1410     {
1411         if( !vlc_object_alive( p_input ) || i_deadline < 0 )
1412         {
1413             vlc_mutex_unlock( &p_sys->lock_control );
1414             return VLC_EGENERIC;
1415         }
1416
1417         if( vlc_cond_timedwait( &p_sys->wait_control, &p_sys->lock_control,
1418                                 i_deadline ) )
1419         {
1420             vlc_mutex_unlock( &p_sys->lock_control );
1421             return VLC_EGENERIC;
1422         }
1423     }
1424
1425     /* */
1426     *pi_type = p_sys->control[0].i_type;
1427     *p_val   = p_sys->control[0].val;
1428
1429     p_sys->i_control--;
1430     if( p_sys->i_control > 0 )
1431         memmove( &p_sys->control[0], &p_sys->control[1],
1432                  sizeof(*p_sys->control) * p_sys->i_control );
1433     vlc_mutex_unlock( &p_sys->lock_control );
1434
1435     return VLC_SUCCESS;
1436 }
1437
1438 static void ControlReduce( input_thread_t *p_input )
1439 {
1440     vlc_mutex_lock( &p_input->p->lock_control );
1441
1442     for( int i = 1; i < p_input->p->i_control; i++ )
1443     {
1444         const int i_lt = p_input->p->control[i-1].i_type;
1445         const int i_ct = p_input->p->control[i].i_type;
1446
1447         /* XXX We can't merge INPUT_CONTROL_SET_ES */
1448 /*        msg_Dbg( p_input, "[%d/%d] l=%d c=%d", i, p_input->p->i_control,
1449                  i_lt, i_ct );
1450 */
1451         if( i_lt == i_ct &&
1452             ( i_ct == INPUT_CONTROL_SET_STATE ||
1453               i_ct == INPUT_CONTROL_SET_RATE ||
1454               i_ct == INPUT_CONTROL_SET_POSITION ||
1455               i_ct == INPUT_CONTROL_SET_TIME ||
1456               i_ct == INPUT_CONTROL_SET_PROGRAM ||
1457               i_ct == INPUT_CONTROL_SET_TITLE ||
1458               i_ct == INPUT_CONTROL_SET_SEEKPOINT ||
1459               i_ct == INPUT_CONTROL_SET_BOOKMARK ) )
1460         {
1461             int j;
1462 //            msg_Dbg( p_input, "merged at %d", i );
1463             /* Remove the i-1 */
1464             for( j = i; j <  p_input->p->i_control; j++ )
1465                 p_input->p->control[j-1] = p_input->p->control[j];
1466             p_input->p->i_control--;
1467         }
1468         else
1469         {
1470             /* TODO but that's not that important
1471                 - merge SET_X with SET_X_CMD
1472                 - remove SET_SEEKPOINT/SET_POSITION/SET_TIME before a SET_TITLE
1473                 - remove SET_SEEKPOINT/SET_POSITION/SET_TIME before another among them
1474                 - ?
1475                 */
1476         }
1477     }
1478     vlc_mutex_unlock( &p_input->p->lock_control );
1479 }
1480
1481 static void ControlRelease( int i_type, vlc_value_t val )
1482 {
1483     switch( i_type )
1484     {
1485     case INPUT_CONTROL_ADD_SUBTITLE:
1486     case INPUT_CONTROL_ADD_SLAVE:
1487         free( val.psz_string );
1488         break;
1489
1490     default:
1491         break;
1492     }
1493 }
1494
1495 /* Pause input */
1496 static void ControlPause( input_thread_t *p_input, mtime_t i_control_date )
1497 {
1498     int i_ret = VLC_SUCCESS;
1499     int i_state = PAUSE_S;
1500
1501     if( p_input->p->b_can_pause )
1502     {
1503         if( p_input->p->input.p_access )
1504             i_ret = access_Control( p_input->p->input.p_access,
1505                                      ACCESS_SET_PAUSE_STATE, true );
1506         else
1507             i_ret = demux_Control( p_input->p->input.p_demux,
1508                                     DEMUX_SET_PAUSE_STATE, true );
1509
1510         if( i_ret )
1511         {
1512             msg_Warn( p_input, "cannot set pause state" );
1513             return;
1514         }
1515     }
1516
1517     /* */
1518     i_ret = es_out_SetPauseState( p_input->p->p_es_out,
1519                                   p_input->p->b_can_pause, true,
1520                                   i_control_date );
1521     if( i_ret )
1522     {
1523         msg_Warn( p_input, "cannot set pause state at es_out level" );
1524         return;
1525     }
1526
1527     /* Switch to new state */
1528     input_ChangeState( p_input, i_state );
1529 }
1530
1531 static void ControlUnpause( input_thread_t *p_input, mtime_t i_control_date )
1532 {
1533     int i_ret = VLC_SUCCESS;
1534
1535     if( p_input->p->b_can_pause )
1536     {
1537         if( p_input->p->input.p_access )
1538             i_ret = access_Control( p_input->p->input.p_access,
1539                                      ACCESS_SET_PAUSE_STATE, false );
1540         else
1541             i_ret = demux_Control( p_input->p->input.p_demux,
1542                                     DEMUX_SET_PAUSE_STATE, false );
1543         if( i_ret )
1544         {
1545             /* FIXME What to do ? */
1546             msg_Warn( p_input, "cannot unset pause -> EOF" );
1547             input_ControlPush( p_input, INPUT_CONTROL_SET_DIE, NULL );
1548         }
1549     }
1550
1551     /* Switch to play */
1552     input_ChangeState( p_input, PLAYING_S );
1553
1554     /* */
1555     if( !i_ret )
1556         es_out_SetPauseState( p_input->p->p_es_out, false, false, i_control_date );
1557 }
1558
1559 static bool Control( input_thread_t *p_input,
1560                      int i_type, vlc_value_t val )
1561 {
1562     const mtime_t i_control_date = mdate();
1563     /* FIXME b_force_update is abused, it should be carefully checked */
1564     bool b_force_update = false;
1565
1566     if( !p_input )
1567         return b_force_update;
1568
1569     switch( i_type )
1570     {
1571         case INPUT_CONTROL_SET_DIE:
1572             msg_Dbg( p_input, "control: stopping input" );
1573
1574             /* Mark all submodules to die */
1575             ObjectKillChildrens( p_input, VLC_OBJECT(p_input) );
1576             break;
1577
1578         case INPUT_CONTROL_SET_POSITION:
1579         case INPUT_CONTROL_SET_POSITION_OFFSET:
1580         {
1581             double f_pos;
1582
1583             if( p_input->p->b_recording )
1584             {
1585                 msg_Err( p_input, "INPUT_CONTROL_SET_POSITION(_OFFSET) ignored while recording" );
1586                 break;
1587             }
1588             f_pos = val.f_float;
1589             if( i_type != INPUT_CONTROL_SET_POSITION )
1590                 f_pos += var_GetFloat( p_input, "position" );
1591             if( f_pos < 0.0 )
1592                 f_pos = 0.0;
1593             else if( f_pos > 1.0 )
1594                 f_pos = 1.0;
1595             /* Reset the decoders states and clock sync (before calling the demuxer */
1596             es_out_SetTime( p_input->p->p_es_out, -1 );
1597             if( demux_Control( p_input->p->input.p_demux, DEMUX_SET_POSITION,
1598                                 f_pos, !p_input->p->b_fast_seek ) )
1599             {
1600                 msg_Err( p_input, "INPUT_CONTROL_SET_POSITION(_OFFSET) "
1601                          "%2.1f%% failed", f_pos * 100 );
1602             }
1603             else
1604             {
1605                 if( p_input->p->i_slave > 0 )
1606                     SlaveSeek( p_input );
1607                 p_input->p->input.b_eof = false;
1608
1609                 b_force_update = true;
1610             }
1611             break;
1612         }
1613
1614         case INPUT_CONTROL_SET_TIME:
1615         case INPUT_CONTROL_SET_TIME_OFFSET:
1616         {
1617             int64_t i_time;
1618             int i_ret;
1619
1620             if( p_input->p->b_recording )
1621             {
1622                 msg_Err( p_input, "INPUT_CONTROL_SET_TIME(_OFFSET) ignored while recording" );
1623                 break;
1624             }
1625
1626             i_time = val.i_time;
1627             if( i_type != INPUT_CONTROL_SET_TIME )
1628                 i_time += var_GetTime( p_input, "time" );
1629
1630             if( i_time < 0 )
1631                 i_time = 0;
1632
1633             /* Reset the decoders states and clock sync (before calling the demuxer */
1634             es_out_SetTime( p_input->p->p_es_out, -1 );
1635
1636             i_ret = demux_Control( p_input->p->input.p_demux,
1637                                    DEMUX_SET_TIME, i_time,
1638                                    !p_input->p->b_fast_seek );
1639             if( i_ret )
1640             {
1641                 int64_t i_length;
1642
1643                 /* Emulate it with a SET_POS */
1644                 if( !demux_Control( p_input->p->input.p_demux,
1645                                     DEMUX_GET_LENGTH, &i_length ) && i_length > 0 )
1646                 {
1647                     double f_pos = (double)i_time / (double)i_length;
1648                     i_ret = demux_Control( p_input->p->input.p_demux,
1649                                             DEMUX_SET_POSITION, f_pos,
1650                                             !p_input->p->b_fast_seek );
1651                 }
1652             }
1653             if( i_ret )
1654             {
1655                 msg_Warn( p_input, "INPUT_CONTROL_SET_TIME(_OFFSET) %"PRId64
1656                          " failed or not possible", i_time );
1657             }
1658             else
1659             {
1660                 if( p_input->p->i_slave > 0 )
1661                     SlaveSeek( p_input );
1662                 p_input->p->input.b_eof = false;
1663
1664                 b_force_update = true;
1665             }
1666             break;
1667         }
1668
1669         case INPUT_CONTROL_SET_STATE:
1670             if( val.i_int != PLAYING_S && val.i_int != PAUSE_S )
1671                 msg_Err( p_input, "invalid state in INPUT_CONTROL_SET_STATE" );
1672             else if( p_input->p->i_state == PAUSE_S )
1673             {
1674                 ControlUnpause( p_input, i_control_date );
1675
1676                 b_force_update = true;
1677             }
1678             else if( val.i_int == PAUSE_S && p_input->p->i_state == PLAYING_S /* &&
1679                      p_input->p->b_can_pause */ )
1680             {
1681                 ControlPause( p_input, i_control_date );
1682
1683                 b_force_update = true;
1684             }
1685             else if( val.i_int == PAUSE_S && !p_input->p->b_can_pause && 0 )
1686             {
1687                 b_force_update = true;
1688
1689                 /* Correct "state" value */
1690                 input_ChangeState( p_input, p_input->p->i_state );
1691             }
1692             break;
1693
1694         case INPUT_CONTROL_SET_RATE:
1695         case INPUT_CONTROL_SET_RATE_SLOWER:
1696         case INPUT_CONTROL_SET_RATE_FASTER:
1697         {
1698             int i_rate;
1699             int i_rate_sign;
1700
1701             /* Get rate and direction */
1702             if( i_type == INPUT_CONTROL_SET_RATE )
1703             {
1704                 i_rate = abs( val.i_int );
1705                 i_rate_sign = val.i_int < 0 ? -1 : 1;
1706             }
1707             else
1708             {
1709                 static const int ppi_factor[][2] = {
1710                     {1,64}, {1,32}, {1,16}, {1,8}, {1,4}, {1,3}, {1,2}, {2,3},
1711                     {1,1},
1712                     {3,2}, {2,1}, {3,1}, {4,1}, {8,1}, {16,1}, {32,1}, {64,1},
1713                     {0,0}
1714                 };
1715                 int i_error;
1716                 int i_idx;
1717                 int i;
1718
1719                 i_rate_sign = p_input->p->i_rate < 0 ? -1 : 1;
1720
1721                 i_error = INT_MAX;
1722                 i_idx = -1;
1723                 for( i = 0; ppi_factor[i][0] != 0; i++ )
1724                 {
1725                     const int i_test_r = INPUT_RATE_DEFAULT * ppi_factor[i][0] / ppi_factor[i][1];
1726                     const int i_test_e = abs( abs( p_input->p->i_rate ) - i_test_r );
1727                     if( i_test_e < i_error )
1728                     {
1729                         i_idx = i;
1730                         i_error = i_test_e;
1731                     }
1732                 }
1733
1734                 assert( i_idx >= 0 && ppi_factor[i_idx][0] != 0 );
1735
1736                 if( i_type == INPUT_CONTROL_SET_RATE_SLOWER )
1737                 {
1738                     if( ppi_factor[i_idx+1][0] > 0 )
1739                         i_rate = INPUT_RATE_DEFAULT * ppi_factor[i_idx+1][0] / ppi_factor[i_idx+1][1];
1740                     else
1741                         i_rate = INPUT_RATE_MAX+1;
1742                 }
1743                 else
1744                 {
1745                     assert( i_type == INPUT_CONTROL_SET_RATE_FASTER );
1746                     if( i_idx > 0 )
1747                         i_rate = INPUT_RATE_DEFAULT * ppi_factor[i_idx-1][0] / ppi_factor[i_idx-1][1];
1748                     else
1749                         i_rate = INPUT_RATE_MIN-1;
1750                 }
1751             }
1752
1753             /* Check rate bound */
1754             if( i_rate < INPUT_RATE_MIN )
1755             {
1756                 msg_Dbg( p_input, "cannot set rate faster" );
1757                 i_rate = INPUT_RATE_MIN;
1758             }
1759             else if( i_rate > INPUT_RATE_MAX )
1760             {
1761                 msg_Dbg( p_input, "cannot set rate slower" );
1762                 i_rate = INPUT_RATE_MAX;
1763             }
1764
1765             /* Apply direction */
1766             if( i_rate_sign < 0 )
1767             {
1768                 if( p_input->p->input.b_rescale_ts )
1769                 {
1770                     msg_Dbg( p_input, "cannot set negative rate" );
1771                     i_rate = p_input->p->i_rate;
1772                     assert( i_rate > 0 );
1773                 }
1774                 else
1775                 {
1776                     i_rate *= i_rate_sign;
1777                 }
1778             }
1779
1780             if( i_rate != INPUT_RATE_DEFAULT &&
1781                 ( ( !p_input->p->b_can_rate_control && !p_input->p->input.b_rescale_ts ) ||
1782                   ( p_input->p->p_sout && !p_input->p->b_out_pace_control ) ) )
1783             {
1784                 msg_Dbg( p_input, "cannot change rate" );
1785                 i_rate = INPUT_RATE_DEFAULT;
1786             }
1787             if( i_rate != p_input->p->i_rate &&
1788                 !p_input->p->b_can_pace_control && p_input->p->b_can_rate_control )
1789             {
1790                 int i_ret;
1791                 if( p_input->p->input.p_access )
1792                 {
1793                     i_ret = VLC_EGENERIC;
1794                 }
1795                 else
1796                 {
1797                     if( !p_input->p->input.b_rescale_ts )
1798                         es_out_Control( p_input->p->p_es_out, ES_OUT_RESET_PCR );
1799
1800                     i_ret = demux_Control( p_input->p->input.p_demux,
1801                                             DEMUX_SET_RATE, &i_rate );
1802                 }
1803                 if( i_ret )
1804                 {
1805                     msg_Warn( p_input, "ACCESS/DEMUX_SET_RATE failed" );
1806                     i_rate = p_input->p->i_rate;
1807                 }
1808             }
1809
1810             /* */
1811             if( i_rate != p_input->p->i_rate )
1812             {
1813                 p_input->p->i_rate = i_rate;
1814                 input_SendEventRate( p_input, i_rate );
1815
1816                 if( p_input->p->input.b_rescale_ts )
1817                 {
1818                     const int i_rate_source = (p_input->p->b_can_pace_control || p_input->p->b_can_rate_control ) ? i_rate : INPUT_RATE_DEFAULT;
1819                     es_out_SetRate( p_input->p->p_es_out, i_rate_source, i_rate );
1820                 }
1821
1822                 b_force_update = true;
1823             }
1824             break;
1825         }
1826
1827         case INPUT_CONTROL_SET_PROGRAM:
1828             /* No need to force update, es_out does it if needed */
1829             es_out_Control( p_input->p->p_es_out,
1830                             ES_OUT_SET_GROUP, val.i_int );
1831
1832             demux_Control( p_input->p->input.p_demux, DEMUX_SET_GROUP, val.i_int,
1833                             NULL );
1834             break;
1835
1836         case INPUT_CONTROL_SET_ES:
1837             /* No need to force update, es_out does it if needed */
1838             es_out_Control( p_input->p->p_es_out_display, ES_OUT_SET_ES_BY_ID, val.i_int );
1839             break;
1840
1841         case INPUT_CONTROL_RESTART_ES:
1842             es_out_Control( p_input->p->p_es_out_display, ES_OUT_RESTART_ES_BY_ID, val.i_int );
1843             break;
1844
1845         case INPUT_CONTROL_SET_AUDIO_DELAY:
1846             if( !es_out_SetDelay( p_input->p->p_es_out_display, AUDIO_ES, val.i_time ) )
1847             {
1848                 input_SendEventAudioDelay( p_input, val.i_time );
1849                 UpdatePtsDelay( p_input );
1850             }
1851             break;
1852
1853         case INPUT_CONTROL_SET_SPU_DELAY:
1854             if( !es_out_SetDelay( p_input->p->p_es_out_display, SPU_ES, val.i_time ) )
1855             {
1856                 input_SendEventSubtitleDelay( p_input, val.i_time );
1857                 UpdatePtsDelay( p_input );
1858             }
1859             break;
1860
1861         case INPUT_CONTROL_SET_TITLE:
1862         case INPUT_CONTROL_SET_TITLE_NEXT:
1863         case INPUT_CONTROL_SET_TITLE_PREV:
1864             if( p_input->p->b_recording )
1865             {
1866                 msg_Err( p_input, "INPUT_CONTROL_SET_TITLE(*) ignored while recording" );
1867                 break;
1868             }
1869             if( p_input->p->input.b_title_demux &&
1870                 p_input->p->input.i_title > 0 )
1871             {
1872                 /* TODO */
1873                 /* FIXME handle demux title */
1874                 demux_t *p_demux = p_input->p->input.p_demux;
1875                 int i_title;
1876
1877                 if( i_type == INPUT_CONTROL_SET_TITLE_PREV )
1878                     i_title = p_demux->info.i_title - 1;
1879                 else if( i_type == INPUT_CONTROL_SET_TITLE_NEXT )
1880                     i_title = p_demux->info.i_title + 1;
1881                 else
1882                     i_title = val.i_int;
1883
1884                 if( i_title >= 0 && i_title < p_input->p->input.i_title )
1885                 {
1886                     es_out_SetTime( p_input->p->p_es_out, -1 );
1887
1888                     demux_Control( p_demux, DEMUX_SET_TITLE, i_title );
1889                     input_SendEventTitle( p_input, i_title );
1890                 }
1891             }
1892             else if( p_input->p->input.i_title > 0 )
1893             {
1894                 access_t *p_access = p_input->p->input.p_access;
1895                 int i_title;
1896
1897                 if( i_type == INPUT_CONTROL_SET_TITLE_PREV )
1898                     i_title = p_access->info.i_title - 1;
1899                 else if( i_type == INPUT_CONTROL_SET_TITLE_NEXT )
1900                     i_title = p_access->info.i_title + 1;
1901                 else
1902                     i_title = val.i_int;
1903
1904                 if( i_title >= 0 && i_title < p_input->p->input.i_title )
1905                 {
1906                     es_out_SetTime( p_input->p->p_es_out, -1 );
1907
1908                     stream_Control( p_input->p->input.p_stream, STREAM_CONTROL_ACCESS,
1909                                     ACCESS_SET_TITLE, i_title );
1910                     input_SendEventTitle( p_input, i_title );
1911                 }
1912             }
1913             break;
1914         case INPUT_CONTROL_SET_SEEKPOINT:
1915         case INPUT_CONTROL_SET_SEEKPOINT_NEXT:
1916         case INPUT_CONTROL_SET_SEEKPOINT_PREV:
1917             if( p_input->p->b_recording )
1918             {
1919                 msg_Err( p_input, "INPUT_CONTROL_SET_SEEKPOINT(*) ignored while recording" );
1920                 break;
1921             }
1922
1923             if( p_input->p->input.b_title_demux &&
1924                 p_input->p->input.i_title > 0 )
1925             {
1926                 demux_t *p_demux = p_input->p->input.p_demux;
1927                 int i_seekpoint;
1928                 int64_t i_input_time;
1929                 int64_t i_seekpoint_time;
1930
1931                 if( i_type == INPUT_CONTROL_SET_SEEKPOINT_PREV )
1932                 {
1933                     i_seekpoint = p_demux->info.i_seekpoint;
1934                     i_seekpoint_time = p_input->p->input.title[p_demux->info.i_title]->seekpoint[i_seekpoint]->i_time_offset;
1935                     i_input_time = var_GetTime( p_input, "time" );
1936                     if( i_seekpoint_time >= 0 && i_input_time >= 0 )
1937                     {
1938                         if( i_input_time < i_seekpoint_time + 3000000 )
1939                             i_seekpoint--;
1940                     }
1941                     else
1942                         i_seekpoint--;
1943                 }
1944                 else if( i_type == INPUT_CONTROL_SET_SEEKPOINT_NEXT )
1945                     i_seekpoint = p_demux->info.i_seekpoint + 1;
1946                 else
1947                     i_seekpoint = val.i_int;
1948
1949                 if( i_seekpoint >= 0 && i_seekpoint <
1950                     p_input->p->input.title[p_demux->info.i_title]->i_seekpoint )
1951                 {
1952
1953                     es_out_SetTime( p_input->p->p_es_out, -1 );
1954
1955                     demux_Control( p_demux, DEMUX_SET_SEEKPOINT, i_seekpoint );
1956                     input_SendEventSeekpoint( p_input, p_demux->info.i_title, i_seekpoint );
1957                 }
1958             }
1959             else if( p_input->p->input.i_title > 0 )
1960             {
1961                 access_t *p_access = p_input->p->input.p_access;
1962                 int i_seekpoint;
1963                 int64_t i_input_time;
1964                 int64_t i_seekpoint_time;
1965
1966                 if( i_type == INPUT_CONTROL_SET_SEEKPOINT_PREV )
1967                 {
1968                     i_seekpoint = p_access->info.i_seekpoint;
1969                     i_seekpoint_time = p_input->p->input.title[p_access->info.i_title]->seekpoint[i_seekpoint]->i_time_offset;
1970                     i_input_time = var_GetTime( p_input, "time" );
1971                     if( i_seekpoint_time >= 0 && i_input_time >= 0 )
1972                     {
1973                         if( i_input_time < i_seekpoint_time + 3000000 )
1974                             i_seekpoint--;
1975                     }
1976                     else
1977                         i_seekpoint--;
1978                 }
1979                 else if( i_type == INPUT_CONTROL_SET_SEEKPOINT_NEXT )
1980                     i_seekpoint = p_access->info.i_seekpoint + 1;
1981                 else
1982                     i_seekpoint = val.i_int;
1983
1984                 if( i_seekpoint >= 0 && i_seekpoint <
1985                     p_input->p->input.title[p_access->info.i_title]->i_seekpoint )
1986                 {
1987                     es_out_SetTime( p_input->p->p_es_out, -1 );
1988
1989                     stream_Control( p_input->p->input.p_stream, STREAM_CONTROL_ACCESS,
1990                                     ACCESS_SET_SEEKPOINT, i_seekpoint );
1991                     input_SendEventSeekpoint( p_input, p_access->info.i_title, i_seekpoint );
1992                 }
1993             }
1994             break;
1995
1996         case INPUT_CONTROL_ADD_SUBTITLE:
1997             if( val.psz_string )
1998                 SubtitleAdd( p_input, val.psz_string, true );
1999             break;
2000
2001         case INPUT_CONTROL_ADD_SLAVE:
2002             if( val.psz_string )
2003             {
2004                 input_source_t *slave = InputSourceNew( p_input );
2005
2006                 if( slave && !InputSourceInit( p_input, slave, val.psz_string, NULL ) )
2007                 {
2008                     vlc_meta_t *p_meta;
2009                     int64_t i_time;
2010
2011                     /* Add the slave */
2012                     msg_Dbg( p_input, "adding %s as slave on the fly",
2013                              val.psz_string );
2014
2015                     /* Set position */
2016                     if( demux_Control( p_input->p->input.p_demux,
2017                                         DEMUX_GET_TIME, &i_time ) )
2018                     {
2019                         msg_Err( p_input, "demux doesn't like DEMUX_GET_TIME" );
2020                         InputSourceClean( slave );
2021                         free( slave );
2022                         break;
2023                     }
2024                     if( demux_Control( slave->p_demux,
2025                                        DEMUX_SET_TIME, i_time, true ) )
2026                     {
2027                         msg_Err( p_input, "seek failed for new slave" );
2028                         InputSourceClean( slave );
2029                         free( slave );
2030                         break;
2031                     }
2032
2033                     /* Get meta (access and demux) */
2034                     p_meta = vlc_meta_New();
2035                     if( p_meta )
2036                     {
2037                         access_Control( slave->p_access, ACCESS_GET_META, p_meta );
2038                         demux_Control( slave->p_demux, DEMUX_GET_META, p_meta );
2039                         InputUpdateMeta( p_input, p_meta );
2040                     }
2041
2042                     TAB_APPEND( p_input->p->i_slave, p_input->p->slave, slave );
2043                 }
2044                 else
2045                 {
2046                     free( slave );
2047                     msg_Warn( p_input, "failed to add %s as slave",
2048                               val.psz_string );
2049                 }
2050             }
2051             break;
2052
2053         case INPUT_CONTROL_SET_RECORD_STATE:
2054             if( !!p_input->p->b_recording != !!val.b_bool )
2055             {
2056                 if( p_input->p->input.b_can_stream_record )
2057                 {
2058                     if( demux_Control( p_input->p->input.p_demux,
2059                                        DEMUX_SET_RECORD_STATE, val.b_bool ) )
2060                         val.b_bool = false;
2061                 }
2062                 else
2063                 {
2064                     if( es_out_SetRecordState( p_input->p->p_es_out_display, val.b_bool ) )
2065                         val.b_bool = false;
2066                 }
2067                 p_input->p->b_recording = val.b_bool;
2068
2069                 input_SendEventRecord( p_input, val.b_bool );
2070
2071                 b_force_update = true;
2072             }
2073             break;
2074
2075         case INPUT_CONTROL_SET_FRAME_NEXT:
2076             if( p_input->p->i_state == PAUSE_S )
2077             {
2078                 es_out_SetFrameNext( p_input->p->p_es_out );
2079             }
2080             else if( p_input->p->i_state == PLAYING_S )
2081             {
2082                 ControlPause( p_input, i_control_date );
2083             }
2084             else
2085             {
2086                 msg_Err( p_input, "invalid state for frame next" );
2087             }
2088             b_force_update = true;
2089             break;
2090
2091         case INPUT_CONTROL_SET_BOOKMARK:
2092         {
2093             seekpoint_t bookmark;
2094
2095             bookmark.i_time_offset = -1;
2096             bookmark.i_byte_offset = -1;
2097
2098             vlc_mutex_lock( &p_input->p->p_item->lock );
2099             if( val.i_int >= 0 && val.i_int < p_input->p->i_bookmark )
2100             {
2101                 const seekpoint_t *p_bookmark = p_input->p->pp_bookmark[val.i_int];
2102                 bookmark.i_time_offset = p_bookmark->i_time_offset;
2103                 bookmark.i_byte_offset = p_bookmark->i_byte_offset;
2104             }
2105             vlc_mutex_unlock( &p_input->p->p_item->lock );
2106
2107             if( bookmark.i_time_offset < 0 && bookmark.i_byte_offset < 0 )
2108             {
2109                 msg_Err( p_input, "invalid bookmark %d", val.i_int );
2110                 break;
2111             }
2112
2113             if( bookmark.i_time_offset >= 0 )
2114             {
2115                 val.i_time = bookmark.i_time_offset;
2116                 b_force_update = Control( p_input, INPUT_CONTROL_SET_TIME, val );
2117             }
2118             else if( bookmark.i_byte_offset >= 0 &&
2119                      p_input->p->input.p_stream )
2120             {
2121                 const int64_t i_size = stream_Size( p_input->p->input.p_stream );
2122                 if( i_size > 0 && bookmark.i_byte_offset <= i_size )
2123                 {
2124                     val.f_float = (double)bookmark.i_byte_offset / i_size;
2125                     b_force_update = Control( p_input, INPUT_CONTROL_SET_POSITION, val );
2126                 }
2127             }
2128             break;
2129         }
2130
2131         default:
2132             msg_Err( p_input, "not yet implemented" );
2133             break;
2134     }
2135
2136     ControlRelease( i_type, val );
2137     return b_force_update;
2138 }
2139
2140 /*****************************************************************************
2141  * UpdateTitleSeekpoint
2142  *****************************************************************************/
2143 static int UpdateTitleSeekpoint( input_thread_t *p_input,
2144                                  int i_title, int i_seekpoint )
2145 {
2146     int i_title_end = p_input->p->input.i_title_end -
2147                         p_input->p->input.i_title_offset;
2148     int i_seekpoint_end = p_input->p->input.i_seekpoint_end -
2149                             p_input->p->input.i_seekpoint_offset;
2150
2151     if( i_title_end >= 0 && i_seekpoint_end >= 0 )
2152     {
2153         if( i_title > i_title_end ||
2154             ( i_title == i_title_end && i_seekpoint > i_seekpoint_end ) )
2155             return 0;
2156     }
2157     else if( i_seekpoint_end >= 0 )
2158     {
2159         if( i_seekpoint > i_seekpoint_end )
2160             return 0;
2161     }
2162     else if( i_title_end >= 0 )
2163     {
2164         if( i_title > i_title_end )
2165             return 0;
2166     }
2167     return 1;
2168 }
2169 /*****************************************************************************
2170  * Update*FromDemux:
2171  *****************************************************************************/
2172 static int UpdateTitleSeekpointFromDemux( input_thread_t *p_input )
2173 {
2174     demux_t *p_demux = p_input->p->input.p_demux;
2175
2176     /* TODO event-like */
2177     if( p_demux->info.i_update & INPUT_UPDATE_TITLE )
2178     {
2179         input_SendEventTitle( p_input, p_demux->info.i_title );
2180
2181         p_demux->info.i_update &= ~INPUT_UPDATE_TITLE;
2182     }
2183     if( p_demux->info.i_update & INPUT_UPDATE_SEEKPOINT )
2184     {
2185         input_SendEventSeekpoint( p_input,
2186                                   p_demux->info.i_title, p_demux->info.i_seekpoint );
2187
2188         p_demux->info.i_update &= ~INPUT_UPDATE_SEEKPOINT;
2189     }
2190
2191     /* Hmmm only works with master input */
2192     if( p_input->p->input.p_demux == p_demux )
2193         return UpdateTitleSeekpoint( p_input,
2194                                      p_demux->info.i_title,
2195                                      p_demux->info.i_seekpoint );
2196     return 1;
2197 }
2198
2199 static void UpdateGenericFromDemux( input_thread_t *p_input )
2200 {
2201     demux_t *p_demux = p_input->p->input.p_demux;
2202
2203     if( p_demux->info.i_update & INPUT_UPDATE_META )
2204     {
2205         vlc_meta_t *p_meta = vlc_meta_New();
2206         if( p_meta )
2207         {
2208             demux_Control( p_input->p->input.p_demux, DEMUX_GET_META, p_meta );
2209             InputUpdateMeta( p_input, p_meta );
2210         }
2211         p_demux->info.i_update &= ~INPUT_UPDATE_META;
2212     }
2213
2214     p_demux->info.i_update &= ~INPUT_UPDATE_SIZE;
2215 }
2216
2217
2218 /*****************************************************************************
2219  * Update*FromAccess:
2220  *****************************************************************************/
2221 static int UpdateTitleSeekpointFromAccess( input_thread_t *p_input )
2222 {
2223     access_t *p_access = p_input->p->input.p_access;
2224
2225     if( p_access->info.i_update & INPUT_UPDATE_TITLE )
2226     {
2227         input_SendEventTitle( p_input, p_access->info.i_title );
2228
2229         stream_Control( p_input->p->input.p_stream, STREAM_UPDATE_SIZE );
2230
2231         p_access->info.i_update &= ~INPUT_UPDATE_TITLE;
2232     }
2233     if( p_access->info.i_update & INPUT_UPDATE_SEEKPOINT )
2234     {
2235         input_SendEventSeekpoint( p_input,
2236                                   p_access->info.i_title, p_access->info.i_seekpoint );
2237
2238         p_access->info.i_update &= ~INPUT_UPDATE_SEEKPOINT;
2239     }
2240     /* Hmmm only works with master input */
2241     if( p_input->p->input.p_access == p_access )
2242         return UpdateTitleSeekpoint( p_input,
2243                                      p_access->info.i_title,
2244                                      p_access->info.i_seekpoint );
2245     return 1;
2246 }
2247 static void UpdateGenericFromAccess( input_thread_t *p_input )
2248 {
2249     access_t *p_access = p_input->p->input.p_access;
2250
2251     if( p_access->info.i_update & INPUT_UPDATE_META )
2252     {
2253         /* TODO maybe multi - access ? */
2254         vlc_meta_t *p_meta = vlc_meta_New();
2255         if( p_meta )
2256         {
2257             access_Control( p_input->p->input.p_access, ACCESS_GET_META, p_meta );
2258             InputUpdateMeta( p_input, p_meta );
2259         }
2260         p_access->info.i_update &= ~INPUT_UPDATE_META;
2261     }
2262     if( p_access->info.i_update & INPUT_UPDATE_SIGNAL )
2263     {
2264         double f_quality;
2265         double f_strength;
2266
2267         if( access_Control( p_access, ACCESS_GET_SIGNAL, &f_quality, &f_strength ) )
2268             f_quality = f_strength = -1;
2269
2270         input_SendEventSignal( p_input, f_quality, f_strength );
2271
2272         p_access->info.i_update &= ~INPUT_UPDATE_SIGNAL;
2273     }
2274
2275     p_access->info.i_update &= ~INPUT_UPDATE_SIZE;
2276 }
2277
2278 /*****************************************************************************
2279  * InputSourceNew:
2280  *****************************************************************************/
2281 static input_source_t *InputSourceNew( input_thread_t *p_input )
2282 {
2283     VLC_UNUSED(p_input);
2284
2285     return calloc( 1,  sizeof( input_source_t ) );
2286 }
2287
2288 /*****************************************************************************
2289  * InputSourceInit:
2290  *****************************************************************************/
2291 static int InputSourceInit( input_thread_t *p_input,
2292                             input_source_t *in, const char *psz_mrl,
2293                             const char *psz_forced_demux )
2294 {
2295     const char *psz_access;
2296     const char *psz_demux;
2297     char *psz_path;
2298     char *psz_var_demux = NULL;
2299     double f_fps;
2300
2301     assert( psz_mrl );
2302     char *psz_dup = strdup( psz_mrl );
2303
2304     if( psz_dup == NULL )
2305         goto error;
2306
2307     /* Split uri */
2308     input_SplitMRL( &psz_access, &psz_demux, &psz_path, psz_dup );
2309
2310     /* FIXME: file:// handling plugins do not support URIs properly...
2311      * So we pre-decoded the URI to a path for them. Note that we do not do it
2312      * for non-standard VLC-specific schemes. */
2313     if( !strcmp( psz_access, "file" ) )
2314     {
2315         if( psz_path[0] != '/'
2316 #if (DIR_SEP_CHAR != '/')
2317             /* We accept invalid URIs too. */
2318             && psz_path[0] != DIR_SEP_CHAR
2319 #endif
2320           )
2321         {   /* host specified -> only localhost is supported */
2322             static const size_t i_localhost = sizeof("localhost")-1;
2323             if( strncmp( psz_path, "localhost/", i_localhost + 1) != 0 )
2324             {
2325                 msg_Err( p_input, "cannot open remote file `%s://%s'",
2326                          psz_access, psz_path );
2327                 msg_Info( p_input, "Did you mean `%s:///%s'?",
2328                           psz_access, psz_path );
2329                 goto error;
2330             }
2331             psz_path += i_localhost;
2332         }
2333         /* Remove HTML anchor if present (not supported). */
2334         char *p = strchr( psz_path, '#' );
2335         if( p )
2336             *p = '\0';
2337         /* Then URI-decode the path. */
2338         decode_URI( psz_path );
2339 #if defined( WIN32 ) && !defined( UNDER_CE )
2340         /* Strip leading slash in front of the drive letter */
2341         psz_path++;
2342 #endif
2343 #if (DIR_SEP_CHAR != '/')
2344         /* Turn slashes into anti-slashes */
2345         for( char *s = strchr( psz_path, '/' ); s; s = strchr( s + 1, '/' ) )
2346             *s = DIR_SEP_CHAR;
2347 #endif
2348     }
2349
2350     msg_Dbg( p_input, "`%s' gives access `%s' demux `%s' path `%s'",
2351              psz_mrl, psz_access, psz_demux, psz_path );
2352     if( !p_input->b_preparsing )
2353     {
2354         /* Hack to allow udp://@:port syntax */
2355         if( !psz_access ||
2356             (strncmp( psz_access, "udp", 3 ) &&
2357              strncmp( psz_access, "rtp", 3 )) )
2358         {
2359             /* Find optional titles and seekpoints */
2360             MRLSections( p_input, psz_path, &in->i_title_start, &in->i_title_end,
2361                      &in->i_seekpoint_start, &in->i_seekpoint_end );
2362         }
2363
2364         if( psz_forced_demux && *psz_forced_demux )
2365         {
2366             psz_demux = psz_forced_demux;
2367         }
2368         else if( *psz_demux == '\0' )
2369         {
2370             /* special hack for forcing a demuxer with --demux=module
2371              * (and do nothing with a list) */
2372             psz_var_demux = var_GetNonEmptyString( p_input, "demux" );
2373
2374             if( psz_var_demux != NULL &&
2375                 !strchr(psz_var_demux, ',' ) &&
2376                 !strchr(psz_var_demux, ':' ) )
2377             {
2378                 psz_demux = psz_var_demux;
2379
2380                 msg_Dbg( p_input, "enforced demux ` %s'", psz_demux );
2381             }
2382         }
2383
2384         /* Try access_demux first */
2385         in->p_demux = demux_New( p_input, p_input, psz_access, psz_demux, psz_path,
2386                                   NULL, p_input->p->p_es_out, false );
2387     }
2388     else
2389     {
2390         /* Preparsing is only for file:// */
2391         if( *psz_demux )
2392             goto error;
2393         if( !*psz_access ) /* path without scheme:// */
2394             psz_access = "file";
2395         if( strcmp( psz_access, "file" ) )
2396             goto error;
2397         msg_Dbg( p_input, "trying to pre-parse %s",  psz_path );
2398     }
2399
2400     if( in->p_demux )
2401     {
2402         /* Get infos from access_demux */
2403         int i_ret = demux_Control( in->p_demux,
2404                                    DEMUX_GET_PTS_DELAY, &in->i_pts_delay );
2405         assert( !i_ret );
2406         in->i_pts_delay = __MAX( 0, __MIN( in->i_pts_delay, INPUT_PTS_DELAY_MAX ) );
2407
2408
2409         in->b_title_demux = true;
2410         if( demux_Control( in->p_demux, DEMUX_GET_TITLE_INFO,
2411                             &in->title, &in->i_title,
2412                             &in->i_title_offset, &in->i_seekpoint_offset ) )
2413         {
2414             TAB_INIT( in->i_title, in->title );
2415         }
2416         if( demux_Control( in->p_demux, DEMUX_CAN_CONTROL_PACE,
2417                             &in->b_can_pace_control ) )
2418             in->b_can_pace_control = false;
2419
2420         assert( in->p_demux->pf_demux != NULL || !in->b_can_pace_control );
2421
2422         if( !in->b_can_pace_control )
2423         {
2424             if( demux_Control( in->p_demux, DEMUX_CAN_CONTROL_RATE,
2425                                 &in->b_can_rate_control, &in->b_rescale_ts ) )
2426             {
2427                 in->b_can_rate_control = false;
2428                 in->b_rescale_ts = true; /* not used */
2429             }
2430         }
2431         else
2432         {
2433             in->b_can_rate_control = true;
2434             in->b_rescale_ts = true;
2435         }
2436         if( demux_Control( in->p_demux, DEMUX_CAN_PAUSE,
2437                             &in->b_can_pause ) )
2438             in->b_can_pause = false;
2439         var_SetBool( p_input, "can-pause", in->b_can_pause || !in->b_can_pace_control ); /* XXX temporary because of es_out_timeshift*/
2440         var_SetBool( p_input, "can-rate", !in->b_can_pace_control || in->b_can_rate_control ); /* XXX temporary because of es_out_timeshift*/
2441         var_SetBool( p_input, "can-rewind", !in->b_rescale_ts && !in->b_can_pace_control && in->b_can_rate_control );
2442
2443         bool b_can_seek;
2444         if( demux_Control( in->p_demux, DEMUX_CAN_SEEK, &b_can_seek ) )
2445             b_can_seek = false;
2446         var_SetBool( p_input, "can-seek", b_can_seek );
2447     }
2448     else
2449     {
2450         /* Now try a real access */
2451         in->p_access = access_New( p_input, p_input, psz_access, psz_demux, psz_path );
2452         if( in->p_access == NULL )
2453         {
2454             if( vlc_object_alive( p_input ) )
2455             {
2456                 msg_Err( p_input, "open of `%s' failed: %s", psz_mrl,
2457                                                              msg_StackMsg() );
2458                 dialog_Fatal( p_input, _("Your input can't be opened"),
2459                               _("VLC is unable to open the MRL '%s'."
2460                                 " Check the log for details."), psz_mrl );
2461             }
2462             goto error;
2463         }
2464
2465         /* Get infos from access */
2466         if( !p_input->b_preparsing )
2467         {
2468             bool b_can_seek;
2469             access_Control( in->p_access,
2470                              ACCESS_GET_PTS_DELAY, &in->i_pts_delay );
2471             in->i_pts_delay = __MAX( 0, __MIN( in->i_pts_delay, INPUT_PTS_DELAY_MAX ) );
2472
2473             in->b_title_demux = false;
2474             if( access_Control( in->p_access, ACCESS_GET_TITLE_INFO,
2475                                  &in->title, &in->i_title,
2476                                 &in->i_title_offset, &in->i_seekpoint_offset ) )
2477
2478             {
2479                 TAB_INIT( in->i_title, in->title );
2480             }
2481             access_Control( in->p_access, ACCESS_CAN_CONTROL_PACE,
2482                              &in->b_can_pace_control );
2483             in->b_can_rate_control = in->b_can_pace_control;
2484             in->b_rescale_ts = true;
2485
2486             access_Control( in->p_access, ACCESS_CAN_PAUSE, &in->b_can_pause );
2487             var_SetBool( p_input, "can-pause", in->b_can_pause || !in->b_can_pace_control ); /* XXX temporary because of es_out_timeshift*/
2488             var_SetBool( p_input, "can-rate", !in->b_can_pace_control || in->b_can_rate_control ); /* XXX temporary because of es_out_timeshift*/
2489             var_SetBool( p_input, "can-rewind", !in->b_rescale_ts && !in->b_can_pace_control );
2490
2491             access_Control( in->p_access, ACCESS_CAN_SEEK, &b_can_seek );
2492             var_SetBool( p_input, "can-seek", b_can_seek );
2493         }
2494
2495         /* */
2496         int  i_input_list;
2497         char **ppsz_input_list;
2498
2499         TAB_INIT( i_input_list, ppsz_input_list );
2500
2501         /* On master stream only, use input-list */
2502         if( &p_input->p->input == in )
2503         {
2504             char *psz_list;
2505             char *psz_parser;
2506
2507             psz_list =
2508             psz_parser = var_CreateGetNonEmptyString( p_input, "input-list" );
2509
2510             while( psz_parser && *psz_parser )
2511             {
2512                 char *p = strchr( psz_parser, ',' );
2513                 if( p )
2514                     *p++ = '\0';
2515
2516                 if( *psz_parser )
2517                 {
2518                     char *psz_name = strdup( psz_parser );
2519                     if( psz_name )
2520                         TAB_APPEND( i_input_list, ppsz_input_list, psz_name );
2521                 }
2522
2523                 psz_parser = p;
2524             }
2525             free( psz_list );
2526         }
2527         /* Autodetect extra files if none specified */
2528         if( i_input_list <= 0 )
2529         {
2530             InputGetExtraFiles( p_input, &i_input_list, &ppsz_input_list,
2531                                 psz_access, psz_path );
2532         }
2533         if( i_input_list > 0 )
2534             TAB_APPEND( i_input_list, ppsz_input_list, NULL );
2535
2536         /* Create the stream_t */
2537         in->p_stream = stream_AccessNew( in->p_access, ppsz_input_list );
2538         if( ppsz_input_list )
2539         {
2540             for( int i = 0; ppsz_input_list[i] != NULL; i++ )
2541                 free( ppsz_input_list[i] );
2542             TAB_CLEAN( i_input_list, ppsz_input_list );
2543         }
2544
2545         if( in->p_stream == NULL )
2546         {
2547             msg_Warn( p_input, "cannot create a stream_t from access" );
2548             goto error;
2549         }
2550
2551         /* Add stream filters */
2552         char *psz_stream_filter = var_GetNonEmptyString( p_input,
2553                                                          "stream-filter" );
2554         in->p_stream = stream_FilterChainNew( in->p_stream,
2555                                               psz_stream_filter,
2556                                               var_GetBool( p_input, "input-record-native" ) );
2557         free( psz_stream_filter );
2558
2559         /* Open a demuxer */
2560         if( *psz_demux == '\0' && *in->p_access->psz_demux )
2561         {
2562             psz_demux = in->p_access->psz_demux;
2563         }
2564
2565         {
2566             /* Take access/stream redirections into account */
2567             char *psz_real_path;
2568             char *psz_buf = NULL;
2569             if( in->p_stream->psz_path )
2570             {
2571                 const char *psz_a, *psz_d;
2572                 psz_buf = strdup( in->p_stream->psz_path );
2573                 input_SplitMRL( &psz_a, &psz_d, &psz_real_path, psz_buf );
2574             }
2575             else
2576             {
2577                 psz_real_path = psz_path;
2578             }
2579             in->p_demux = demux_New( p_input, p_input, psz_access, psz_demux,
2580                                       psz_real_path,
2581                                       in->p_stream, p_input->p->p_es_out,
2582                                       p_input->b_preparsing );
2583             free( psz_buf );
2584         }
2585
2586         if( in->p_demux == NULL )
2587         {
2588             if( vlc_object_alive( p_input ) )
2589             {
2590                 msg_Err( p_input, "no suitable demux module for `%s/%s://%s'",
2591                          psz_access, psz_demux, psz_path );
2592                 dialog_Fatal( VLC_OBJECT( p_input ),
2593                               _("VLC can't recognize the input's format"),
2594                               _("The format of '%s' cannot be detected. "
2595                                 "Have a look at the log for details."), psz_mrl );
2596             }
2597             goto error;
2598         }
2599         assert( in->p_demux->pf_demux != NULL );
2600
2601         /* Get title from demux */
2602         if( !p_input->b_preparsing && in->i_title <= 0 )
2603         {
2604             if( demux_Control( in->p_demux, DEMUX_GET_TITLE_INFO,
2605                                 &in->title, &in->i_title,
2606                                 &in->i_title_offset, &in->i_seekpoint_offset ))
2607             {
2608                 TAB_INIT( in->i_title, in->title );
2609             }
2610             else
2611             {
2612                 in->b_title_demux = true;
2613             }
2614         }
2615     }
2616
2617     free( psz_var_demux );
2618     free( psz_dup );
2619
2620     /* Set record capabilities */
2621     if( demux_Control( in->p_demux, DEMUX_CAN_RECORD, &in->b_can_stream_record ) )
2622         in->b_can_stream_record = false;
2623 #ifdef ENABLE_SOUT
2624     if( !var_GetBool( p_input, "input-record-native" ) )
2625         in->b_can_stream_record = false;
2626     var_SetBool( p_input, "can-record", true );
2627 #else
2628     var_SetBool( p_input, "can-record", in->b_can_stream_record );
2629 #endif
2630
2631     /* get attachment
2632      * FIXME improve for b_preparsing: move it after GET_META and check psz_arturl */
2633     if( 1 || !p_input->b_preparsing )
2634     {
2635         int i_attachment;
2636         input_attachment_t **attachment;
2637         if( !demux_Control( in->p_demux, DEMUX_GET_ATTACHMENTS,
2638                              &attachment, &i_attachment ) )
2639         {
2640             vlc_mutex_lock( &p_input->p->p_item->lock );
2641             AppendAttachment( &p_input->p->i_attachment, &p_input->p->attachment,
2642                               i_attachment, attachment );
2643             vlc_mutex_unlock( &p_input->p->p_item->lock );
2644         }
2645     }
2646     if( !demux_Control( in->p_demux, DEMUX_GET_FPS, &f_fps ) && f_fps > 0.0 )
2647     {
2648         vlc_mutex_lock( &p_input->p->p_item->lock );
2649         p_input->p->f_fps = f_fps;
2650         vlc_mutex_unlock( &p_input->p->p_item->lock );
2651     }
2652
2653     if( var_GetInteger( p_input, "clock-synchro" ) != -1 )
2654         in->b_can_pace_control = !var_GetInteger( p_input, "clock-synchro" );
2655
2656     return VLC_SUCCESS;
2657
2658 error:
2659     if( in->p_demux )
2660         demux_Delete( in->p_demux );
2661
2662     if( in->p_stream )
2663         stream_Delete( in->p_stream );
2664
2665     if( in->p_access )
2666         access_Delete( in->p_access );
2667
2668     free( psz_var_demux );
2669     free( psz_dup );
2670
2671     return VLC_EGENERIC;
2672 }
2673
2674 /*****************************************************************************
2675  * InputSourceClean:
2676  *****************************************************************************/
2677 static void InputSourceClean( input_source_t *in )
2678 {
2679     int i;
2680
2681     if( in->p_demux )
2682         demux_Delete( in->p_demux );
2683
2684     if( in->p_stream )
2685         stream_Delete( in->p_stream );
2686
2687     if( in->p_access )
2688         access_Delete( in->p_access );
2689
2690     if( in->i_title > 0 )
2691     {
2692         for( i = 0; i < in->i_title; i++ )
2693             vlc_input_title_Delete( in->title[i] );
2694         TAB_CLEAN( in->i_title, in->title );
2695     }
2696 }
2697
2698 /*****************************************************************************
2699  * InputSourceMeta:
2700  *****************************************************************************/
2701 static void InputSourceMeta( input_thread_t *p_input,
2702                              input_source_t *p_source, vlc_meta_t *p_meta )
2703 {
2704     access_t *p_access = p_source->p_access;
2705     demux_t *p_demux = p_source->p_demux;
2706
2707     /* XXX Remember that checking against p_item->p_meta->i_status & ITEM_PREPARSED
2708      * is a bad idea */
2709
2710     /* Read access meta */
2711     if( p_access )
2712         access_Control( p_access, ACCESS_GET_META, p_meta );
2713
2714     /* Read demux meta */
2715     demux_Control( p_demux, DEMUX_GET_META, p_meta );
2716
2717     /* If the demux report unsupported meta data, try an external "meta reader" */
2718     bool b_bool;
2719     if( demux_Control( p_demux, DEMUX_HAS_UNSUPPORTED_META, &b_bool ) )
2720         return;
2721     if( !b_bool )
2722         return;
2723
2724     demux_meta_t *p_demux_meta =
2725         vlc_custom_create( p_demux, sizeof( *p_demux_meta ),
2726                            VLC_OBJECT_GENERIC, "demux meta" );
2727     if( !p_demux_meta )
2728         return;
2729     p_demux_meta->p_demux = p_demux;
2730
2731     module_t *p_id3 = module_need( p_demux_meta, "meta reader", NULL, false );
2732     if( p_id3 )
2733     {
2734         if( p_demux_meta->p_meta )
2735         {
2736             vlc_meta_Merge( p_meta, p_demux_meta->p_meta );
2737             vlc_meta_Delete( p_demux_meta->p_meta );
2738         }
2739
2740         if( p_demux_meta->i_attachments > 0 )
2741         {
2742             vlc_mutex_lock( &p_input->p->p_item->lock );
2743             AppendAttachment( &p_input->p->i_attachment, &p_input->p->attachment,
2744                               p_demux_meta->i_attachments, p_demux_meta->attachments );
2745             vlc_mutex_unlock( &p_input->p->p_item->lock );
2746         }
2747         module_unneed( p_demux, p_id3 );
2748     }
2749     vlc_object_release( p_demux_meta );
2750 }
2751
2752
2753 static void SlaveDemux( input_thread_t *p_input, bool *pb_demux_polled )
2754 {
2755     int64_t i_time;
2756     int i;
2757
2758     *pb_demux_polled = false;
2759     if( demux_Control( p_input->p->input.p_demux, DEMUX_GET_TIME, &i_time ) )
2760     {
2761         msg_Err( p_input, "demux doesn't like DEMUX_GET_TIME" );
2762         return;
2763     }
2764
2765     for( i = 0; i < p_input->p->i_slave; i++ )
2766     {
2767         input_source_t *in = p_input->p->slave[i];
2768         int i_ret;
2769
2770         if( in->b_eof )
2771             continue;
2772
2773         const bool b_demux_polled = in->p_demux->pf_demux != NULL;
2774         if( !b_demux_polled )
2775             continue;
2776
2777         *pb_demux_polled = true;
2778
2779         /* Call demux_Demux until we have read enough data */
2780         if( demux_Control( in->p_demux, DEMUX_SET_NEXT_DEMUX_TIME, i_time ) )
2781         {
2782             for( ;; )
2783             {
2784                 int64_t i_stime;
2785                 if( demux_Control( in->p_demux, DEMUX_GET_TIME, &i_stime ) )
2786                 {
2787                     msg_Err( p_input, "slave[%d] doesn't like "
2788                              "DEMUX_GET_TIME -> EOF", i );
2789                     i_ret = 0;
2790                     break;
2791                 }
2792
2793                 if( i_stime >= i_time )
2794                 {
2795                     i_ret = 1;
2796                     break;
2797                 }
2798
2799                 if( ( i_ret = demux_Demux( in->p_demux ) ) <= 0 )
2800                     break;
2801             }
2802         }
2803         else
2804         {
2805             i_ret = demux_Demux( in->p_demux );
2806         }
2807
2808         if( i_ret <= 0 )
2809         {
2810             msg_Dbg( p_input, "slave %d EOF", i );
2811             in->b_eof = true;
2812         }
2813     }
2814 }
2815
2816 static void SlaveSeek( input_thread_t *p_input )
2817 {
2818     int64_t i_time;
2819     int i;
2820
2821     if( demux_Control( p_input->p->input.p_demux, DEMUX_GET_TIME, &i_time ) )
2822     {
2823         msg_Err( p_input, "demux doesn't like DEMUX_GET_TIME" );
2824         return;
2825     }
2826
2827     for( i = 0; i < p_input->p->i_slave; i++ )
2828     {
2829         input_source_t *in = p_input->p->slave[i];
2830
2831         if( demux_Control( in->p_demux, DEMUX_SET_TIME, i_time, true ) )
2832         {
2833             if( !in->b_eof )
2834                 msg_Err( p_input, "seek failed for slave %d -> EOF", i );
2835             in->b_eof = true;
2836         }
2837         else
2838         {
2839             in->b_eof = false;
2840         }
2841     }
2842 }
2843
2844 /*****************************************************************************
2845  * InputMetaUser:
2846  *****************************************************************************/
2847 static void InputMetaUser( input_thread_t *p_input, vlc_meta_t *p_meta )
2848 {
2849     static const struct { int i_meta; const char *psz_name; } p_list[] = {
2850         { vlc_meta_Title,       "meta-title" },
2851         { vlc_meta_Artist,      "meta-artist" },
2852         { vlc_meta_Genre,       "meta-genre" },
2853         { vlc_meta_Copyright,   "meta-copyright" },
2854         { vlc_meta_Description, "meta-description" },
2855         { vlc_meta_Date,        "meta-date" },
2856         { vlc_meta_URL,         "meta-url" },
2857         { 0, NULL }
2858     };
2859
2860     /* Get meta information from user */
2861     for( int i = 0; p_list[i].psz_name; i++ )
2862     {
2863         char *psz_string = var_GetNonEmptyString( p_input, p_list[i].psz_name );
2864         if( !psz_string )
2865             continue;
2866
2867         EnsureUTF8( psz_string );
2868         vlc_meta_Set( p_meta, p_list[i].i_meta, psz_string );
2869         free( psz_string );
2870     }
2871 }
2872
2873 /*****************************************************************************
2874  * InputUpdateMeta: merge p_item meta data with p_meta taking care of
2875  * arturl and locking issue.
2876  *****************************************************************************/
2877 static void InputUpdateMeta( input_thread_t *p_input, vlc_meta_t *p_meta )
2878 {
2879     es_out_ControlSetMeta( p_input->p->p_es_out, p_meta );
2880     vlc_meta_Delete( p_meta );
2881 }
2882
2883 static void AppendAttachment( int *pi_attachment, input_attachment_t ***ppp_attachment,
2884                               int i_new, input_attachment_t **pp_new )
2885 {
2886     int i_attachment = *pi_attachment;
2887     input_attachment_t **attachment = *ppp_attachment;
2888     int i;
2889
2890     attachment = realloc( attachment,
2891                           sizeof(input_attachment_t**) * ( i_attachment + i_new ) );
2892     for( i = 0; i < i_new; i++ )
2893         attachment[i_attachment++] = pp_new[i];
2894     free( pp_new );
2895
2896     /* */
2897     *pi_attachment = i_attachment;
2898     *ppp_attachment = attachment;
2899 }
2900 /*****************************************************************************
2901  * InputGetExtraFiles
2902  *  Autodetect extra input list
2903  *****************************************************************************/
2904 static void InputGetExtraFilesPattern( input_thread_t *p_input,
2905                                        int *pi_list, char ***pppsz_list,
2906                                        const char *psz_path,
2907                                        const char *psz_match,
2908                                        const char *psz_format,
2909                                        int i_start, int i_stop )
2910 {
2911     int i_list;
2912     char **ppsz_list;
2913
2914     TAB_INIT( i_list, ppsz_list );
2915
2916     char *psz_base = strdup( psz_path );
2917     if( !psz_base )
2918         goto exit;
2919
2920     /* Remove the extension */
2921     char *psz_end = &psz_base[strlen(psz_base)-strlen(psz_match)];
2922     assert( psz_end >= psz_base);
2923     *psz_end = '\0';
2924
2925     /* Try to list files */
2926     for( int i = i_start; i <= i_stop; i++ )
2927     {
2928         struct stat st;
2929         char *psz_file;
2930
2931         if( asprintf( &psz_file, psz_format, psz_base, i ) < 0 )
2932             break;
2933
2934         if( utf8_stat( psz_file, &st ) || !S_ISREG( st.st_mode ) || !st.st_size )
2935         {
2936             free( psz_file );
2937             break;
2938         }
2939
2940         msg_Dbg( p_input, "Detected extra file `%s'", psz_file );
2941         TAB_APPEND( i_list, ppsz_list, psz_file );
2942     }
2943     free( psz_base );
2944 exit:
2945     *pi_list = i_list;
2946     *pppsz_list = ppsz_list;
2947 }
2948
2949 static void InputGetExtraFiles( input_thread_t *p_input,
2950                                 int *pi_list, char ***pppsz_list,
2951                                 const char *psz_access, const char *psz_path )
2952 {
2953     static const struct
2954     {
2955         const char *psz_match;
2956         const char *psz_format;
2957         int i_start;
2958         int i_stop;
2959     } p_pattern[] = {
2960         /* XXX the order is important */
2961         { ".001",         "%s.%.3d",        2, 999 },
2962         { ".part1.rar",   "%s.part%.1d.rar",2, 9 },
2963         { ".part01.rar",  "%s.part%.2d.rar",2, 99, },
2964         { ".part001.rar", "%s.part%.3d.rar",2, 999 },
2965         { ".rar",         "%s.r%.2d",       0, 99 },
2966         { NULL, NULL, 0, 0 }
2967     };
2968
2969     TAB_INIT( *pi_list, *pppsz_list );
2970
2971     if( ( psz_access && *psz_access && strcmp( psz_access, "file" ) ) || !psz_path )
2972         return;
2973
2974     const size_t i_path = strlen(psz_path);
2975
2976     for( int i = 0; p_pattern[i].psz_match != NULL; i++ )
2977     {
2978         const size_t i_ext = strlen(p_pattern[i].psz_match );
2979
2980         if( i_path < i_ext )
2981             continue;
2982         if( !strcmp( &psz_path[i_path-i_ext], p_pattern[i].psz_match ) )
2983         {
2984             InputGetExtraFilesPattern( p_input, pi_list, pppsz_list,
2985                                        psz_path,
2986                                        p_pattern[i].psz_match, p_pattern[i].psz_format,
2987                                        p_pattern[i].i_start, p_pattern[i].i_stop );
2988             return;
2989         }
2990     }
2991 }
2992
2993 /* */
2994 static void input_ChangeState( input_thread_t *p_input, int i_state )
2995 {
2996     const bool b_changed = p_input->p->i_state != i_state;
2997
2998     p_input->p->i_state = i_state;
2999     if( i_state == ERROR_S )
3000         p_input->b_error = true;
3001     else if( i_state == END_S )
3002         p_input->b_eof = true;
3003
3004     if( b_changed )
3005     {
3006         input_item_SetErrorWhenReading( p_input->p->p_item, p_input->b_error );
3007         input_SendEventState( p_input, i_state );
3008     }
3009 }
3010
3011
3012 /*****************************************************************************
3013  * MRLSplit: parse the access, demux and url part of the
3014  *           Media Resource Locator.
3015  *****************************************************************************/
3016 void input_SplitMRL( const char **ppsz_access, const char **ppsz_demux, char **ppsz_path,
3017                      char *psz_dup )
3018 {
3019     char *psz_access = NULL;
3020     char *psz_demux  = NULL;
3021     char *psz_path;
3022
3023     /* Either there is an access/demux specification before ://
3024      * or we have a plain local file path. */
3025     psz_path = strstr( psz_dup, "://" );
3026     if( psz_path != NULL )
3027     {
3028         *psz_path = '\0';
3029         psz_path += 3; /* skips "://" */
3030
3031         /* Separate access from demux (<access>/<demux>://<path>) */
3032         psz_access = psz_dup;
3033         psz_demux = strchr( psz_access, '/' );
3034         if( psz_demux )
3035             *psz_demux++ = '\0';
3036
3037         /* We really don't want module name substitution here! */
3038         if( psz_access[0] == '$' )
3039             psz_access++;
3040         if( psz_demux && psz_demux[0] == '$' )
3041             psz_demux++;
3042     }
3043     else
3044     {
3045         psz_path = psz_dup;
3046     }
3047     *ppsz_access = psz_access ? psz_access : (char*)"";
3048     *ppsz_demux = psz_demux ? psz_demux : (char*)"";
3049     *ppsz_path = psz_path;
3050 }
3051
3052 static inline bool next(char ** src)
3053 {
3054     char *end;
3055     errno = 0;
3056     long result = strtol( *src, &end, 0 );
3057     if( errno != 0 || result >= LONG_MAX || result <= LONG_MIN ||
3058         end == *src )
3059     {
3060         return false;
3061     }
3062     *src = end;
3063     return true;
3064 }
3065
3066 /*****************************************************************************
3067  * MRLSections: parse title and seekpoint info from the Media Resource Locator.
3068  *
3069  * Syntax:
3070  * [url][@[title-start][:chapter-start][-[title-end][:chapter-end]]]
3071  *****************************************************************************/
3072 static void MRLSections( input_thread_t *p_input, char *psz_source,
3073                          int *pi_title_start, int *pi_title_end,
3074                          int *pi_chapter_start, int *pi_chapter_end )
3075 {
3076     char *psz, *psz_end, *psz_next, *psz_check;
3077
3078     *pi_title_start = *pi_title_end = -1;
3079     *pi_chapter_start = *pi_chapter_end = -1;
3080
3081     /* Start by parsing titles and chapters */
3082     if( !psz_source || !( psz = strrchr( psz_source, '@' ) ) ) return;
3083
3084
3085     /* Check we are really dealing with a title/chapter section */
3086     psz_check = psz + 1;
3087     if( !*psz_check ) return;
3088     if( isdigit(*psz_check) )
3089         if(!next(&psz_check)) return;
3090     if( *psz_check != ':' && *psz_check != '-' && *psz_check ) return;
3091     if( *psz_check == ':' && ++psz_check )
3092     {
3093         if( isdigit(*psz_check) )
3094             if(!next(&psz_check)) return;
3095     }
3096     if( *psz_check != '-' && *psz_check ) return;
3097     if( *psz_check == '-' && ++psz_check )
3098     {
3099         if( isdigit(*psz_check) )
3100             if(!next(&psz_check)) return;
3101     }
3102     if( *psz_check != ':' && *psz_check ) return;
3103     if( *psz_check == ':' && ++psz_check )
3104     {
3105         if( isdigit(*psz_check) )
3106             if(!next(&psz_check)) return;
3107     }
3108     if( *psz_check ) return;
3109
3110     /* Separate start and end */
3111     *psz++ = 0;
3112     if( ( psz_end = strchr( psz, '-' ) ) ) *psz_end++ = 0;
3113
3114     /* Look for the start title */
3115     *pi_title_start = strtol( psz, &psz_next, 0 );
3116     if( !*pi_title_start && psz == psz_next ) *pi_title_start = -1;
3117     *pi_title_end = *pi_title_start;
3118     psz = psz_next;
3119
3120     /* Look for the start chapter */
3121     if( *psz ) psz++;
3122     *pi_chapter_start = strtol( psz, &psz_next, 0 );
3123     if( !*pi_chapter_start && psz == psz_next ) *pi_chapter_start = -1;
3124     *pi_chapter_end = *pi_chapter_start;
3125
3126     if( psz_end )
3127     {
3128         /* Look for the end title */
3129         *pi_title_end = strtol( psz_end, &psz_next, 0 );
3130         if( !*pi_title_end && psz_end == psz_next ) *pi_title_end = -1;
3131         psz_end = psz_next;
3132
3133         /* Look for the end chapter */
3134         if( *psz_end ) psz_end++;
3135         *pi_chapter_end = strtol( psz_end, &psz_next, 0 );
3136         if( !*pi_chapter_end && psz_end == psz_next ) *pi_chapter_end = -1;
3137     }
3138
3139     msg_Dbg( p_input, "source=`%s' title=%d/%d seekpoint=%d/%d",
3140              psz_source, *pi_title_start, *pi_chapter_start,
3141              *pi_title_end, *pi_chapter_end );
3142 }
3143
3144 /*****************************************************************************
3145  * input_AddSubtitles: add a subtitles file and enable it
3146  *****************************************************************************/
3147 static void SubtitleAdd( input_thread_t *p_input, char *psz_subtitle, bool b_forced )
3148 {
3149     input_source_t *sub;
3150     vlc_value_t count;
3151     vlc_value_t list;
3152     char *psz_path, *psz_extension;
3153
3154     /* if we are provided a subtitle.sub file,
3155      * see if we don't have a subtitle.idx and use it instead */
3156     psz_path = strdup( psz_subtitle );
3157     if( psz_path )
3158     {
3159         psz_extension = strrchr( psz_path, '.');
3160         if( psz_extension && strcmp( psz_extension, ".sub" ) == 0 )
3161         {
3162             struct stat st;
3163
3164             strcpy( psz_extension, ".idx" );
3165
3166             if( !utf8_stat( psz_path, &st ) && S_ISREG( st.st_mode ) )
3167             {
3168                 msg_Dbg( p_input, "using %s subtitles file instead of %s",
3169                          psz_path, psz_subtitle );
3170                 strcpy( psz_subtitle, psz_path );
3171             }
3172         }
3173         free( psz_path );
3174     }
3175
3176     var_Change( p_input, "spu-es", VLC_VAR_CHOICESCOUNT, &count, NULL );
3177
3178     sub = InputSourceNew( p_input );
3179     if( !sub || InputSourceInit( p_input, sub, psz_subtitle, "subtitle" ) )
3180     {
3181         free( sub );
3182         return;
3183     }
3184     TAB_APPEND( p_input->p->i_slave, p_input->p->slave, sub );
3185
3186     /* Select the ES */
3187     if( b_forced && !var_Change( p_input, "spu-es", VLC_VAR_GETLIST, &list, NULL ) )
3188     {
3189         if( count.i_int == 0 )
3190             count.i_int++;
3191         /* if it was first one, there is disable too */
3192
3193         if( count.i_int < list.p_list->i_count )
3194         {
3195             const int i_id = list.p_list->p_values[count.i_int].i_int;
3196
3197             es_out_Control( p_input->p->p_es_out_display, ES_OUT_SET_ES_DEFAULT_BY_ID, i_id );
3198             es_out_Control( p_input->p->p_es_out_display, ES_OUT_SET_ES_BY_ID, i_id );
3199         }
3200         var_FreeList( &list, NULL );
3201     }
3202 }
3203
3204 /*****************************************************************************
3205  * Statistics
3206  *****************************************************************************/
3207 void input_UpdateStatistic( input_thread_t *p_input,
3208                             input_statistic_t i_type, int i_delta )
3209 {
3210     assert( p_input->p->i_state != INIT_S );
3211
3212     vlc_mutex_lock( &p_input->p->counters.counters_lock);
3213     switch( i_type )
3214     {
3215 #define I(c) stats_UpdateInteger( p_input, p_input->p->counters.c, i_delta, NULL )
3216     case INPUT_STATISTIC_DECODED_VIDEO:
3217         I(p_decoded_video);
3218         break;
3219     case INPUT_STATISTIC_DECODED_AUDIO:
3220         I(p_decoded_audio);
3221         break;
3222     case INPUT_STATISTIC_DECODED_SUBTITLE:
3223         I(p_decoded_sub);
3224         break;
3225     case INPUT_STATISTIC_SENT_PACKET:
3226         I(p_sout_sent_packets);
3227         break;
3228 #undef I
3229     case INPUT_STATISTIC_SENT_BYTE:
3230     {
3231         int i_bytes; /* That's pretty stupid to define it as an integer, it will overflow
3232                         really fast ... */
3233         if( !stats_UpdateInteger( p_input, p_input->p->counters.p_sout_sent_bytes, i_delta, &i_bytes ) )
3234             stats_UpdateFloat( p_input, p_input->p->counters.p_sout_send_bitrate, i_bytes, NULL );
3235         break;
3236     }
3237     default:
3238         msg_Err( p_input, "Invalid statistic type %d (internal error)", i_type );
3239         break;
3240     }
3241     vlc_mutex_unlock( &p_input->p->counters.counters_lock);
3242 }
3243
3244 /**/
3245 /* TODO FIXME nearly the same logic that snapshot code */
3246 char *input_CreateFilename( vlc_object_t *p_obj, const char *psz_path, const char *psz_prefix, const char *psz_extension )
3247 {
3248     char *psz_file;
3249     DIR *path;
3250
3251     path = utf8_opendir( psz_path );
3252     if( path )
3253     {
3254         closedir( path );
3255
3256         char *psz_tmp = str_format( p_obj, psz_prefix );
3257         if( !psz_tmp )
3258             return NULL;
3259
3260         char *psz_tmp2 = filename_sanitize( psz_tmp );
3261         free( psz_tmp );
3262
3263         if( !psz_tmp2 ||
3264             asprintf( &psz_file, "%s"DIR_SEP"%s%s%s",
3265                       psz_path, psz_tmp2,
3266                       psz_extension ? "." : "",
3267                       psz_extension ? psz_extension : "" ) < 0 )
3268             psz_file = NULL;
3269         free( psz_tmp2 );
3270         return psz_file;
3271     }
3272     else
3273     {
3274         psz_file = str_format( p_obj, psz_path );
3275         path_sanitize( psz_file );
3276         return psz_file;
3277     }
3278 }
3279