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, bool b_interactive );
  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, false );
 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                          / var_CreateGetFloat( p_input, "rate" );
 351     /* Currently, the input rate variable is an integer. So we need to destroy
 352      * the float variable inherited from the configuration. */
 353     var_Destroy( p_input, "rate" );
 354     p_input->p->b_recording = false;
 355     memset( &p_input->p->bookmark, 0, sizeof(p_input->p->bookmark) );
 356     TAB_INIT( p_input->p->i_bookmark, p_input->p->pp_bookmark );
 357     TAB_INIT( p_input->p->i_attachment, p_input->p->attachment );
 358     p_input->p->p_es_out_display = NULL;
 359     p_input->p->p_es_out = NULL;
 360     p_input->p->p_sout   = NULL;
 361     p_input->p->b_out_pace_control = false;
 362
 363     vlc_gc_incref( p_item ); /* Released in Destructor() */
 364     p_input->p->p_item = p_item;
 365
 366     /* Init Input fields */
 367     p_input->p->input.p_access = NULL;
 368     p_input->p->input.p_stream = NULL;
 369     p_input->p->input.p_demux  = NULL;
 370     p_input->p->input.b_title_demux = false;
 371     p_input->p->input.i_title  = 0;
 372     p_input->p->input.title    = NULL;
 373     p_input->p->input.i_title_offset = p_input->p->input.i_seekpoint_offset = 0;
 374     p_input->p->input.b_can_pace_control = true;
 375     p_input->p->input.b_can_rate_control = true;
 376     p_input->p->input.b_rescale_ts = true;
 377     p_input->p->input.b_eof = false;
 378
 379     vlc_mutex_lock( &p_item->lock );
 380
 381     if( !p_item->p_stats )
 382         p_item->p_stats = stats_NewInputStats( p_input );
 383     vlc_mutex_unlock( &p_item->lock );
 384
 385     /* No slave */
 386     p_input->p->i_slave = 0;
 387     p_input->p->slave   = NULL;
 388
 389     /* */
 390     if( p_resource )
 391         p_input->p->p_resource = p_resource;
 392     else
 393         p_input->p->p_resource = input_resource_New();
 394     input_resource_SetInput( p_input->p->p_resource, p_input );
 395
 396     /* Init control buffer */
 397     vlc_mutex_init( &p_input->p->lock_control );
 398     vlc_cond_init( &p_input->p->wait_control );
 399     p_input->p->i_control = 0;
 400     p_input->p->b_abort = false;
 401
 402     /* Parse input options */
 403     vlc_mutex_lock( &p_item->lock );
 404     assert( (int)p_item->optflagc == p_item->i_options );
 405     for( i = 0; i < p_item->i_options; i++ )
 406         var_OptionParse( VLC_OBJECT(p_input), p_item->ppsz_options[i],
 407                          !!(p_item->optflagv[i] & VLC_INPUT_OPTION_TRUSTED) );
 408     vlc_mutex_unlock( &p_item->lock );
 409
 410     /* Create Object Variables for private use only */
 411     input_ConfigVarInit( p_input );
 412
 413     /* Create Objects variables for public Get and Set */
 414     input_ControlVarInit( p_input );
 415
 416     /* */
 417     if( !p_input->b_preparsing )
 418     {
 419         char *psz_bookmarks = var_GetNonEmptyString( p_input, "bookmarks" );
 420         if( psz_bookmarks )
 421         {
 422             /* FIXME: have a common cfg parsing routine used by sout and others */
 423             char *psz_parser, *psz_start, *psz_end;
 424             psz_parser = psz_bookmarks;
 425             while( (psz_start = strchr( psz_parser, '{' ) ) )
 426             {
 427                  seekpoint_t *p_seekpoint;
 428                  char backup;
 429                  psz_start++;
 430                  psz_end = strchr( psz_start, '}' );
 431                  if( !psz_end ) break;
 432                  psz_parser = psz_end + 1;
 433                  backup = *psz_parser;
 434                  *psz_parser = 0;
 435                  *psz_end = ',';
 436
 437                  p_seekpoint = vlc_seekpoint_New();
 438                  while( (psz_end = strchr( psz_start, ',' ) ) )
 439                  {
 440                      *psz_end = 0;
 441                      if( !strncmp( psz_start, "name=", 5 ) )
 442                      {
 443                          p_seekpoint->psz_name = strdup(psz_start + 5);
 444                      }
 445                      else if( !strncmp( psz_start, "bytes=", 6 ) )
 446                      {
 447                          p_seekpoint->i_byte_offset = atoll(psz_start + 6);
 448                      }
 449                      else if( !strncmp( psz_start, "time=", 5 ) )
 450                      {
 451                          p_seekpoint->i_time_offset = atoll(psz_start + 5) *
 452                                                         1000000;
 453                      }
 454                      psz_start = psz_end + 1;
 455                 }
 456                 msg_Dbg( p_input, "adding bookmark: %s, bytes=%"PRId64", time=%"PRId64,
 457                                   p_seekpoint->psz_name, p_seekpoint->i_byte_offset,
 458                                   p_seekpoint->i_time_offset );
 459                 input_Control( p_input, INPUT_ADD_BOOKMARK, p_seekpoint );
 460                 vlc_seekpoint_Delete( p_seekpoint );
 461                 *psz_parser = backup;
 462             }
 463             free( psz_bookmarks );
 464         }
 465     }
 466
 467     /* Remove 'Now playing' info as it is probably outdated */
 468     input_item_SetNowPlaying( p_item, NULL );
 469     input_SendEventMeta( p_input );
 470
 471     /* */
 472     if( p_input->b_preparsing )
 473         p_input->i_flags |= OBJECT_FLAGS_QUIET | OBJECT_FLAGS_NOINTERACT;
 474
 475     /* */
 476     memset( &p_input->p->counters, 0, sizeof( p_input->p->counters ) );
 477     vlc_mutex_init( &p_input->p->counters.counters_lock );
 478
 479     /* Set the destructor when we are sure we are initialized */
 480     vlc_object_set_destructor( p_input, (vlc_destructor_t)Destructor );
 481
 482     /* Attach only once we are ready */
 483     vlc_object_attach( p_input, p_parent );
 484
 485     return p_input;
 486 }
 487
 488 /**
 489  * Input destructor (called when the object's refcount reaches 0).
 490  */
 491 static void Destructor( input_thread_t * p_input )
 492 {
 493 #ifndef NDEBUG
 494     char * psz_name = input_item_GetName( p_input->p->p_item );
 495     msg_Dbg( p_input, "Destroying the input for '%s'", psz_name);
 496     free( psz_name );
 497 #endif
 498
 499     stats_TimerDump( p_input, STATS_TIMER_INPUT_LAUNCHING );
 500     stats_TimerClean( p_input, STATS_TIMER_INPUT_LAUNCHING );
 501
 502     if( p_input->p->p_resource )
 503         input_resource_Delete( p_input->p->p_resource );
 504
 505     vlc_gc_decref( p_input->p->p_item );
 506
 507     vlc_mutex_destroy( &p_input->p->counters.counters_lock );
 508
 509     for( int i = 0; i < p_input->p->i_control; i++ )
 510     {
 511         input_control_t *p_ctrl = &p_input->p->control[i];
 512         ControlRelease( p_ctrl->i_type, p_ctrl->val );
 513     }
 514
 515     vlc_cond_destroy( &p_input->p->wait_control );
 516     vlc_mutex_destroy( &p_input->p->lock_control );
 517     free( p_input->p );
 518 }
 519
 520 /*****************************************************************************
 521  * Run: main thread loop
 522  * This is the "normal" thread that spawns the input processing chain,
 523  * reads the stream, cleans up and waits
 524  *****************************************************************************/
 525 static void *Run( vlc_object_t *p_this )
 526 {
 527     input_thread_t *p_input = (input_thread_t *)p_this;
 528     const int canc = vlc_savecancel();
 529
 530     if( Init( p_input ) )
 531         goto exit;
 532
 533     MainLoop( p_input, true ); /* FIXME it can be wrong (like with VLM) */
 534
 535     /* Clean up */
 536     End( p_input );
 537
 538 exit:
 539     /* Tell we're dead */
 540     vlc_mutex_lock( &p_input->p->lock_control );
 541     const bool b_abort = p_input->p->b_abort;
 542     vlc_mutex_unlock( &p_input->p->lock_control );
 543
 544     if( b_abort )
 545         input_SendEventAbort( p_input );
 546     input_SendEventDead( p_input );
 547
 548     vlc_restorecancel( canc );
 549     return NULL;
 550 }
 551
 552 /*****************************************************************************
 553  * Main loop: Fill buffers from access, and demux
 554  *****************************************************************************/
 555
 556 /**
 557  * MainLoopDemux
 558  * It asks the demuxer to demux some data
 559  */
 560 static void MainLoopDemux( input_thread_t *p_input, bool *pb_changed, bool *pb_demux_polled, mtime_t i_start_mdate )
 561 {
 562     int i_ret;
 563
 564     *pb_changed = false;
 565     *pb_demux_polled = p_input->p->input.p_demux->pf_demux != NULL;
 566
 567     if( ( p_input->p->i_stop > 0 && p_input->p->i_time >= p_input->p->i_stop ) ||
 568         ( p_input->p->i_run > 0 && i_start_mdate+p_input->p->i_run < mdate() ) )
 569         i_ret = 0; /* EOF */
 570     else
 571         i_ret = demux_Demux( p_input->p->input.p_demux );
 572
 573     if( i_ret > 0 )
 574     {
 575         if( p_input->p->input.p_demux->info.i_update )
 576         {
 577             if( p_input->p->input.b_title_demux )
 578             {
 579                 i_ret = UpdateTitleSeekpointFromDemux( p_input );
 580                 *pb_changed = true;
 581             }
 582             UpdateGenericFromDemux( p_input );
 583         }
 584         else if( p_input->p->input.p_access &&
 585                  p_input->p->input.p_access->info.i_update )
 586         {
 587             if( !p_input->p->input.b_title_demux )
 588             {
 589                 i_ret = UpdateTitleSeekpointFromAccess( p_input );
 590                 *pb_changed = true;
 591             }
 592             UpdateGenericFromAccess( p_input );
 593         }
 594     }
 595
 596     if( i_ret == 0 )    /* EOF */
 597     {
 598         msg_Dbg( p_input, "EOF reached" );
 599         p_input->p->input.b_eof = true;
 600     }
 601     else if( i_ret < 0 )
 602     {
 603         input_ChangeState( p_input, ERROR_S );
 604     }
 605
 606     if( i_ret > 0 && p_input->p->i_slave > 0 )
 607     {
 608         bool b_demux_polled;
 609         SlaveDemux( p_input, &b_demux_polled );
 610
 611         *pb_demux_polled |= b_demux_polled;
 612     }
 613 }
 614
 615 static int MainLoopTryRepeat( input_thread_t *p_input, mtime_t *pi_start_mdate )
 616 {
 617     int i_repeat = var_GetInteger( p_input, "input-repeat" );
 618     if( i_repeat == 0 )
 619         return VLC_EGENERIC;
 620
 621     vlc_value_t val;
 622
 623     msg_Dbg( p_input, "repeating the same input (%d)", i_repeat );
 624     if( i_repeat > 0 )
 625     {
 626         i_repeat--;
 627         var_SetInteger( p_input, "input-repeat", i_repeat );
 628     }
 629
 630     /* Seek to start title/seekpoint */
 631     val.i_int = p_input->p->input.i_title_start -
 632         p_input->p->input.i_title_offset;
 633     if( val.i_int < 0 || val.i_int >= p_input->p->input.i_title )
 634         val.i_int = 0;
 635     input_ControlPush( p_input,
 636                        INPUT_CONTROL_SET_TITLE, &val );
 637
 638     val.i_int = p_input->p->input.i_seekpoint_start -
 639         p_input->p->input.i_seekpoint_offset;
 640     if( val.i_int > 0 /* TODO: check upper boundary */ )
 641         input_ControlPush( p_input,
 642                            INPUT_CONTROL_SET_SEEKPOINT, &val );
 643
 644     /* Seek to start position */
 645     if( p_input->p->i_start > 0 )
 646     {
 647         val.i_time = p_input->p->i_start;
 648         input_ControlPush( p_input, INPUT_CONTROL_SET_TIME, &val );
 649     }
 650     else
 651     {
 652         val.f_float = 0.0;
 653         input_ControlPush( p_input, INPUT_CONTROL_SET_POSITION, &val );
 654     }
 655
 656     /* */
 657     *pi_start_mdate = mdate();
 658     return VLC_SUCCESS;
 659 }
 660
 661 /**
 662  * MainLoopInterface
 663  * It update the variables used by the interfaces
 664  */
 665 static void MainLoopInterface( input_thread_t *p_input )
 666 {
 667     double f_position = 0.0;
 668     mtime_t i_time = 0;
 669     mtime_t i_length = 0;
 670
 671     /* update input status variables */
 672     if( demux_Control( p_input->p->input.p_demux,
 673                        DEMUX_GET_POSITION, &f_position ) )
 674         f_position = 0.0;
 675
 676     if( demux_Control( p_input->p->input.p_demux,
 677                        DEMUX_GET_TIME, &i_time ) )
 678         i_time = 0;
 679     p_input->p->i_time = i_time;
 680
 681     if( demux_Control( p_input->p->input.p_demux,
 682                        DEMUX_GET_LENGTH, &i_length ) )
 683         i_length = 0;
 684
 685     es_out_SetTimes( p_input->p->p_es_out, f_position, i_time, i_length );
 686
 687     /* update current bookmark */
 688     vlc_mutex_lock( &p_input->p->p_item->lock );
 689     p_input->p->bookmark.i_time_offset = i_time;
 690     if( p_input->p->input.p_stream )
 691         p_input->p->bookmark.i_byte_offset = stream_Tell( p_input->p->input.p_stream );
 692     vlc_mutex_unlock( &p_input->p->p_item->lock );
 693 }
 694
 695 /**
 696  * MainLoopStatistic
 697  * It updates the globals statics
 698  */
 699 static void MainLoopStatistic( input_thread_t *p_input )
 700 {
 701     stats_ComputeInputStats( p_input, p_input->p->p_item->p_stats );
 702     input_SendEventStatistics( p_input );
 703 }
 704
 705 /**
 706  * MainLoop
 707  * The main input loop.
 708  */
 709 static void MainLoop( input_thread_t *p_input, bool b_interactive )
 710 {
 711     mtime_t i_start_mdate = mdate();
 712     mtime_t i_intf_update = 0;
 713     mtime_t i_statistic_update = 0;
 714     bool b_pause_after_eof = b_interactive &&
 715                              var_CreateGetBool( p_input, "play-and-pause" );
 716
 717     /* Start the timer */
 718     stats_TimerStop( p_input, STATS_TIMER_INPUT_LAUNCHING );
 719
 720     while( vlc_object_alive( p_input ) && !p_input->b_error )
 721     {
 722         bool b_force_update;
 723         int i_type;
 724         vlc_value_t val;
 725         mtime_t i_current;
 726         mtime_t i_deadline;
 727         mtime_t i_wakeup;
 728         bool b_paused;
 729         bool b_demux_polled;
 730
 731         /* Demux data */
 732         b_force_update = false;
 733         i_wakeup = 0;
 734         /* FIXME if p_input->p->i_state == PAUSE_S the access/access_demux
 735          * is paused -> this may cause problem with some of them
 736          * The same problem can be seen when seeking while paused */
 737         b_paused = p_input->p->i_state == PAUSE_S &&
 738                    ( !es_out_GetBuffering( p_input->p->p_es_out ) || p_input->p->input.b_eof );
 739
 740         b_demux_polled = true;
 741         if( !b_paused )
 742         {
 743             if( !p_input->p->input.b_eof )
 744             {
 745                 MainLoopDemux( p_input, &b_force_update, &b_demux_polled, i_start_mdate );
 746
 747                 i_wakeup = es_out_GetWakeup( p_input->p->p_es_out );
 748             }
 749             else if( !es_out_GetEmpty( p_input->p->p_es_out ) )
 750             {
 751                 msg_Dbg( p_input, "waiting decoder fifos to empty" );
 752                 i_wakeup = mdate() + INPUT_IDLE_SLEEP;
 753             }
 754             else if( b_pause_after_eof )
 755             {
 756                 msg_Dbg( p_input, "pausing at EOF (pause after each)");
 757                 val.i_int = PAUSE_S;
 758                 Control( p_input, INPUT_CONTROL_SET_STATE, val );
 759
 760                 b_pause_after_eof = false;
 761                 b_paused = true;
 762             }
 763             else
 764             {
 765                 if( MainLoopTryRepeat( p_input, &i_start_mdate ) )
 766                     break;
 767                 b_pause_after_eof = var_GetBool( p_input, "play-and-pause" );
 768             }
 769         }
 770
 771         /* */
 772         do {
 773             i_deadline = i_wakeup;
 774             if( b_paused || !b_demux_polled )
 775                 i_deadline = __MIN( i_intf_update, i_statistic_update );
 776
 777             /* Handle control */
 778             ControlReduce( p_input );
 779             while( !ControlPop( p_input, &i_type, &val, i_deadline ) )
 780             {
 781
 782                 msg_Dbg( p_input, "control type=%d", i_type );
 783
 784                 if( Control( p_input, i_type, val ) )
 785                     b_force_update = true;
 786             }
 787
 788             /* Update interface and statistics */
 789             i_current = mdate();
 790             if( i_intf_update < i_current || b_force_update )
 791             {
 792                 MainLoopInterface( p_input );
 793                 i_intf_update = i_current + INT64_C(250000);
 794                 b_force_update = false;
 795             }
 796             if( i_statistic_update < i_current )
 797             {
 798                 MainLoopStatistic( p_input );
 799                 i_statistic_update = i_current + INT64_C(1000000);
 800             }
 801
 802             /* Update the wakeup time */
 803             if( i_wakeup != 0 )
 804                 i_wakeup = es_out_GetWakeup( p_input->p->p_es_out );
 805         } while( i_current < i_wakeup );
 806     }
 807
 808     if( !p_input->b_error )
 809         input_ChangeState( p_input, END_S );
 810 }
 811
 812 static void InitStatistics( input_thread_t * p_input )
 813 {
 814     if( p_input->b_preparsing ) return;
 815
 816     /* Prepare statistics */
 817 #define INIT_COUNTER( c, type, compute ) p_input->p->counters.p_##c = \
 818  stats_CounterCreate( p_input, VLC_VAR_##type, STATS_##compute);
 819     if( libvlc_stats( p_input ) )
 820     {
 821         INIT_COUNTER( read_bytes, INTEGER, COUNTER );
 822         INIT_COUNTER( read_packets, INTEGER, COUNTER );
 823         INIT_COUNTER( demux_read, INTEGER, COUNTER );
 824         INIT_COUNTER( input_bitrate, FLOAT, DERIVATIVE );
 825         INIT_COUNTER( demux_bitrate, FLOAT, DERIVATIVE );
 826         INIT_COUNTER( demux_corrupted, INTEGER, COUNTER );
 827         INIT_COUNTER( demux_discontinuity, INTEGER, COUNTER );
 828         INIT_COUNTER( played_abuffers, INTEGER, COUNTER );
 829         INIT_COUNTER( lost_abuffers, INTEGER, COUNTER );
 830         INIT_COUNTER( displayed_pictures, INTEGER, COUNTER );
 831         INIT_COUNTER( lost_pictures, INTEGER, COUNTER );
 832         INIT_COUNTER( decoded_audio, INTEGER, COUNTER );
 833         INIT_COUNTER( decoded_video, INTEGER, COUNTER );
 834         INIT_COUNTER( decoded_sub, INTEGER, COUNTER );
 835         p_input->p->counters.p_sout_send_bitrate = NULL;
 836         p_input->p->counters.p_sout_sent_packets = NULL;
 837         p_input->p->counters.p_sout_sent_bytes = NULL;
 838         if( p_input->p->counters.p_demux_bitrate )
 839             p_input->p->counters.p_demux_bitrate->update_interval = 1000000;
 840         if( p_input->p->counters.p_input_bitrate )
 841             p_input->p->counters.p_input_bitrate->update_interval = 1000000;
 842     }
 843 }
 844
 845 #ifdef ENABLE_SOUT
 846 static int InitSout( input_thread_t * p_input )
 847 {
 848     if( p_input->b_preparsing )
 849         return VLC_SUCCESS;
 850
 851     /* Find a usable sout and attach it to p_input */
 852     char *psz = var_GetNonEmptyString( p_input, "sout" );
 853     if( psz && strncasecmp( p_input->p->p_item->psz_uri, "vlc:", 4 ) )
 854     {
 855         p_input->p->p_sout  = input_resource_RequestSout( p_input->p->p_resource, NULL, psz );
 856         if( !p_input->p->p_sout )
 857         {
 858             input_ChangeState( p_input, ERROR_S );
 859             msg_Err( p_input, "cannot start stream output instance, " \
 860                               "aborting" );
 861             free( psz );
 862             return VLC_EGENERIC;
 863         }
 864         if( libvlc_stats( p_input ) )
 865         {
 866             INIT_COUNTER( sout_sent_packets, INTEGER, COUNTER );
 867             INIT_COUNTER( sout_sent_bytes, INTEGER, COUNTER );
 868             INIT_COUNTER( sout_send_bitrate, FLOAT, DERIVATIVE );
 869             if( p_input->p->counters.p_sout_send_bitrate )
 870                  p_input->p->counters.p_sout_send_bitrate->update_interval =
 871                          1000000;
 872         }
 873     }
 874     else
 875     {
 876         input_resource_RequestSout( p_input->p->p_resource, NULL, NULL );
 877     }
 878     free( psz );
 879
 880     return VLC_SUCCESS;
 881 }
 882 #endif
 883
 884 static void InitTitle( input_thread_t * p_input )
 885 {
 886     input_source_t *p_master = &p_input->p->input;
 887
 888     if( p_input->b_preparsing )
 889         return;
 890
 891     /* Create global title (from master) */
 892     p_input->p->i_title = p_master->i_title;
 893     p_input->p->title   = p_master->title;
 894     p_input->p->i_title_offset = p_master->i_title_offset;
 895     p_input->p->i_seekpoint_offset = p_master->i_seekpoint_offset;
 896     if( p_input->p->i_title > 0 )
 897     {
 898         /* Setup variables */
 899         input_ControlVarNavigation( p_input );
 900         input_SendEventTitle( p_input, 0 );
 901     }
 902
 903     /* Global flag */
 904     p_input->p->b_can_pace_control    = p_master->b_can_pace_control;
 905     p_input->p->b_can_pause        = p_master->b_can_pause;
 906     p_input->p->b_can_rate_control = p_master->b_can_rate_control;
 907 }
 908
 909 static void StartTitle( input_thread_t * p_input )
 910 {
 911     vlc_value_t val;
 912
 913     /* Start title/chapter */
 914     val.i_int = p_input->p->input.i_title_start -
 915                 p_input->p->input.i_title_offset;
 916     if( val.i_int > 0 && val.i_int < p_input->p->input.i_title )
 917         input_ControlPush( p_input, INPUT_CONTROL_SET_TITLE, &val );
 918
 919     val.i_int = p_input->p->input.i_seekpoint_start -
 920                 p_input->p->input.i_seekpoint_offset;
 921     if( val.i_int > 0 /* TODO: check upper boundary */ )
 922         input_ControlPush( p_input, INPUT_CONTROL_SET_SEEKPOINT, &val );
 923
 924     /* Start/stop/run time */
 925     p_input->p->i_start = (int64_t)(1000000.0
 926                                      * var_GetFloat( p_input, "start-time" ));
 927     p_input->p->i_stop  = (int64_t)(1000000.0
 928                                      * var_GetFloat( p_input, "stop-time" ));
 929     p_input->p->i_run   = (int64_t)(1000000.0
 930                                      * var_GetFloat( p_input, "run-time" ));
 931     if( p_input->p->i_run < 0 )
 932     {
 933         msg_Warn( p_input, "invalid run-time ignored" );
 934         p_input->p->i_run = 0;
 935     }
 936
 937     if( p_input->p->i_start > 0 )
 938     {
 939         vlc_value_t s;
 940
 941         msg_Dbg( p_input, "starting at time: %ds",
 942                  (int)( p_input->p->i_start / INT64_C(1000000) ) );
 943
 944         s.i_time = p_input->p->i_start;
 945         input_ControlPush( p_input, INPUT_CONTROL_SET_TIME, &s );
 946     }
 947     if( p_input->p->i_stop > 0 && p_input->p->i_stop <= p_input->p->i_start )
 948     {
 949         msg_Warn( p_input, "invalid stop-time ignored" );
 950         p_input->p->i_stop = 0;
 951     }
 952     p_input->p->b_fast_seek = var_GetBool( p_input, "input-fast-seek" );
 953 }
 954
 955 static void LoadSubtitles( input_thread_t *p_input )
 956 {
 957     /* Load subtitles */
 958     /* Get fps and set it if not already set */
 959     const double f_fps = p_input->p->f_fps;
 960     if( f_fps > 1.0 )
 961     {
 962         float f_requested_fps;
 963
 964         var_Create( p_input, "sub-original-fps", VLC_VAR_FLOAT );
 965         var_SetFloat( p_input, "sub-original-fps", f_fps );
 966
 967         f_requested_fps = var_CreateGetFloat( p_input, "sub-fps" );
 968         if( f_requested_fps != f_fps )
 969         {
 970             var_Create( p_input, "sub-fps", VLC_VAR_FLOAT|
 971                                             VLC_VAR_DOINHERIT );
 972             var_SetFloat( p_input, "sub-fps", f_requested_fps );
 973         }
 974     }
 975
 976     const int i_delay = var_CreateGetInteger( p_input, "sub-delay" );
 977     if( i_delay != 0 )
 978         var_SetTime( p_input, "spu-delay", (mtime_t)i_delay * 100000 );
 979
 980     /* Look for and add subtitle files */
 981     char *psz_subtitle = var_GetNonEmptyString( p_input, "sub-file" );
 982     if( psz_subtitle != NULL )
 983     {
 984         msg_Dbg( p_input, "forced subtitle: %s", psz_subtitle );
 985         SubtitleAdd( p_input, psz_subtitle, true );
 986     }
 987
 988     if( var_GetBool( p_input, "sub-autodetect-file" ) )
 989     {
 990         char *psz_autopath = var_GetNonEmptyString( p_input, "sub-autodetect-path" );
 991         char **ppsz_subs = subtitles_Detect( p_input, psz_autopath,
 992                                              p_input->p->p_item->psz_uri );
 993         free( psz_autopath );
 994
 995         for( int i = 0; ppsz_subs && ppsz_subs[i]; i++ )
 996         {
 997             /* Try to autoselect the first autodetected subtitles file
 998              * if no subtitles file was specified */
 999             bool b_forced = i == 0 && !psz_subtitle;
1000
1001             if( !psz_subtitle || strcmp( psz_subtitle, ppsz_subs[i] ) )
1002                 SubtitleAdd( p_input, ppsz_subs[i], b_forced );
1003
1004             free( ppsz_subs[i] );
1005         }
1006         free( ppsz_subs );
1007     }
1008     free( psz_subtitle );
1009 }
1010
1011 static void LoadSlaves( input_thread_t *p_input )
1012 {
1013     char *psz = var_GetNonEmptyString( p_input, "input-slave" );
1014     if( !psz )
1015         return;
1016
1017     char *psz_org = psz;
1018     while( psz && *psz )
1019     {
1020         while( *psz == ' ' || *psz == '#' )
1021             psz++;
1022
1023         char *psz_delim = strchr( psz, '#' );
1024         if( psz_delim )
1025             *psz_delim++ = '\0';
1026
1027         if( *psz == 0 )
1028             break;
1029
1030         msg_Dbg( p_input, "adding slave input '%s'", psz );
1031
1032         input_source_t *p_slave = InputSourceNew( p_input );
1033         if( p_slave && !InputSourceInit( p_input, p_slave, psz, NULL ) )
1034             TAB_APPEND( p_input->p->i_slave, p_input->p->slave, p_slave );
1035         else
1036             free( p_slave );
1037
1038         psz = psz_delim;
1039     }
1040     free( psz_org );
1041 }
1042
1043 static void UpdatePtsDelay( input_thread_t *p_input )
1044 {
1045     input_thread_private_t *p_sys = p_input->p;
1046
1047     /* Get max pts delay from input source */
1048     mtime_t i_pts_delay = p_sys->input.i_pts_delay;
1049     for( int i = 0; i < p_sys->i_slave; i++ )
1050         i_pts_delay = __MAX( i_pts_delay, p_sys->slave[i]->i_pts_delay );
1051
1052     if( i_pts_delay < 0 )
1053         i_pts_delay = 0;
1054
1055     /* Take care of audio/spu delay */
1056     const mtime_t i_audio_delay = var_GetTime( p_input, "audio-delay" );
1057     const mtime_t i_spu_delay   = var_GetTime( p_input, "spu-delay" );
1058     const mtime_t i_extra_delay = __MIN( i_audio_delay, i_spu_delay );
1059     if( i_extra_delay < 0 )
1060         i_pts_delay -= i_extra_delay;
1061
1062     /* Update cr_average depending on the caching */
1063     const int i_cr_average = var_GetInteger( p_input, "cr-average" ) * i_pts_delay / DEFAULT_PTS_DELAY;
1064
1065     /* */
1066     es_out_SetJitter( p_input->p->p_es_out, i_pts_delay, i_cr_average );
1067 }
1068
1069 static void InitPrograms( input_thread_t * p_input )
1070 {
1071     int i_es_out_mode;
1072     vlc_value_t val;
1073
1074     /* Compute correct pts_delay */
1075     UpdatePtsDelay( p_input );
1076
1077     /* Set up es_out */
1078     es_out_Control( p_input->p->p_es_out, ES_OUT_SET_ACTIVE, true );
1079     i_es_out_mode = ES_OUT_MODE_AUTO;
1080     if( p_input->p->p_sout )
1081     {
1082         if( var_GetBool( p_input, "sout-all" ) )
1083         {
1084             i_es_out_mode = ES_OUT_MODE_ALL;
1085         }
1086         else
1087         {
1088             var_Get( p_input, "programs", &val );
1089             if( val.p_list && val.p_list->i_count )
1090             {
1091                 i_es_out_mode = ES_OUT_MODE_PARTIAL;
1092                 /* Note : we should remove the "program" callback. */
1093             }
1094             else
1095             {
1096                 var_FreeList( &val, NULL );
1097             }
1098         }
1099     }
1100     es_out_Control( p_input->p->p_es_out, ES_OUT_SET_MODE, i_es_out_mode );
1101
1102     /* Inform the demuxer about waited group (needed only for DVB) */
1103     if( i_es_out_mode == ES_OUT_MODE_ALL )
1104     {
1105         demux_Control( p_input->p->input.p_demux, DEMUX_SET_GROUP, -1, NULL );
1106     }
1107     else if( i_es_out_mode == ES_OUT_MODE_PARTIAL )
1108     {
1109         demux_Control( p_input->p->input.p_demux, DEMUX_SET_GROUP, -1,
1110                         val.p_list );
1111     }
1112     else
1113     {
1114         demux_Control( p_input->p->input.p_demux, DEMUX_SET_GROUP,
1115                        (int) var_GetInteger( p_input, "program" ), NULL );
1116     }
1117 }
1118
1119 static int Init( input_thread_t * p_input )
1120 {
1121     vlc_meta_t *p_meta;
1122     int i, ret;
1123
1124     for( i = 0; i < p_input->p->p_item->i_options; i++ )
1125     {
1126         if( !strncmp( p_input->p->p_item->ppsz_options[i], "meta-file", 9 ) )
1127         {
1128             msg_Dbg( p_input, "Input is a meta file: disabling unneeded options" );
1129             var_SetString( p_input, "sout", "" );
1130             var_SetBool( p_input, "sout-all", false );
1131             var_SetString( p_input, "input-slave", "" );
1132             var_SetInteger( p_input, "input-repeat", 0 );
1133             var_SetString( p_input, "sub-file", "" );
1134             var_SetBool( p_input, "sub-autodetect-file", false );
1135         }
1136     }
1137
1138     InitStatistics( p_input );
1139 #ifdef ENABLE_SOUT
1140     ret = InitSout( p_input );
1141     if( ret != VLC_SUCCESS )
1142         goto error_stats;
1143 #endif
1144
1145     /* Create es out */
1146     p_input->p->p_es_out_display = input_EsOutNew( p_input, p_input->p->i_rate );
1147     p_input->p->p_es_out         = input_EsOutTimeshiftNew( p_input, p_input->p->p_es_out_display, p_input->p->i_rate );
1148     es_out_Control( p_input->p->p_es_out, ES_OUT_SET_ACTIVE, false );
1149     es_out_Control( p_input->p->p_es_out, ES_OUT_SET_MODE, ES_OUT_MODE_NONE );
1150
1151     /* */
1152     input_ChangeState( p_input, OPENING_S );
1153     input_SendEventCache( p_input, 0.0 );
1154
1155     /* */
1156     if( InputSourceInit( p_input, &p_input->p->input,
1157                          p_input->p->p_item->psz_uri, NULL ) )
1158     {
1159         goto error;
1160     }
1161
1162     InitTitle( p_input );
1163
1164     /* Load master infos */
1165     /* Init length */
1166     mtime_t i_length;
1167     if( demux_Control( p_input->p->input.p_demux, DEMUX_GET_LENGTH,
1168                          &i_length ) )
1169         i_length = 0;
1170     if( i_length <= 0 )
1171         i_length = input_item_GetDuration( p_input->p->p_item );
1172     input_SendEventLength( p_input, i_length );
1173
1174     input_SendEventPosition( p_input, 0.0, 0 );
1175
1176     if( !p_input->b_preparsing )
1177     {
1178         StartTitle( p_input );
1179         LoadSubtitles( p_input );
1180         LoadSlaves( p_input );
1181         InitPrograms( p_input );
1182     }
1183
1184     if( !p_input->b_preparsing && p_input->p->p_sout )
1185     {
1186         p_input->p->b_out_pace_control = (p_input->p->p_sout->i_out_pace_nocontrol > 0);
1187
1188         if( p_input->p->b_can_pace_control && p_input->p->b_out_pace_control )
1189         {
1190             /* We don't want a high input priority here or we'll
1191              * end-up sucking up all the CPU time */
1192             vlc_thread_set_priority( p_input, VLC_THREAD_PRIORITY_LOW );
1193         }
1194
1195         msg_Dbg( p_input, "starting in %s mode",
1196                  p_input->p->b_out_pace_control ? "async" : "sync" );
1197     }
1198
1199     p_meta = vlc_meta_New();
1200     if( p_meta )
1201     {
1202         /* Get meta data from users */
1203         InputMetaUser( p_input, p_meta );
1204
1205         /* Get meta data from master input */
1206         InputSourceMeta( p_input, &p_input->p->input, p_meta );
1207
1208         /* And from slave */
1209         for( int i = 0; i < p_input->p->i_slave; i++ )
1210             InputSourceMeta( p_input, p_input->p->slave[i], p_meta );
1211
1212         /* */
1213         InputUpdateMeta( p_input, p_meta );
1214     }
1215
1216     msg_Dbg( p_input, "`%s' successfully opened",
1217              p_input->p->p_item->psz_uri );
1218
1219     /* initialization is complete */
1220     input_ChangeState( p_input, PLAYING_S );
1221
1222     return VLC_SUCCESS;
1223
1224 error:
1225     input_ChangeState( p_input, ERROR_S );
1226
1227     if( p_input->p->p_es_out )
1228         es_out_Delete( p_input->p->p_es_out );
1229     if( p_input->p->p_es_out_display )
1230         es_out_Delete( p_input->p->p_es_out_display );
1231     if( p_input->p->p_resource )
1232     {
1233         if( p_input->p->p_sout )
1234             input_resource_RequestSout( p_input->p->p_resource,
1235                                          p_input->p->p_sout, NULL );
1236         input_resource_SetInput( p_input->p->p_resource, NULL );
1237     }
1238
1239 #ifdef ENABLE_SOUT
1240 error_stats:
1241 #endif
1242     if( !p_input->b_preparsing && libvlc_stats( p_input ) )
1243     {
1244 #define EXIT_COUNTER( c ) do { if( p_input->p->counters.p_##c ) \
1245                                    stats_CounterClean( p_input->p->counters.p_##c );\
1246                                p_input->p->counters.p_##c = NULL; } while(0)
1247         EXIT_COUNTER( read_bytes );
1248         EXIT_COUNTER( read_packets );
1249         EXIT_COUNTER( demux_read );
1250         EXIT_COUNTER( input_bitrate );
1251         EXIT_COUNTER( demux_bitrate );
1252         EXIT_COUNTER( demux_corrupted );
1253         EXIT_COUNTER( demux_discontinuity );
1254         EXIT_COUNTER( played_abuffers );
1255         EXIT_COUNTER( lost_abuffers );
1256         EXIT_COUNTER( displayed_pictures );
1257         EXIT_COUNTER( lost_pictures );
1258         EXIT_COUNTER( decoded_audio );
1259         EXIT_COUNTER( decoded_video );
1260         EXIT_COUNTER( decoded_sub );
1261
1262         if( p_input->p->p_sout )
1263         {
1264             EXIT_COUNTER( sout_sent_packets );
1265             EXIT_COUNTER( sout_sent_bytes );
1266             EXIT_COUNTER( sout_send_bitrate );
1267         }
1268 #undef EXIT_COUNTER
1269     }
1270
1271     /* Mark them deleted */
1272     p_input->p->input.p_demux = NULL;
1273     p_input->p->input.p_stream = NULL;
1274     p_input->p->input.p_access = NULL;
1275     p_input->p->p_es_out = NULL;
1276     p_input->p->p_es_out_display = NULL;
1277     p_input->p->p_sout = NULL;
1278
1279     return VLC_EGENERIC;
1280 }
1281
1282 /*****************************************************************************
1283  * End: end the input thread
1284  *****************************************************************************/
1285 static void End( input_thread_t * p_input )
1286 {
1287     int i;
1288
1289     /* We are at the end */
1290     input_ChangeState( p_input, END_S );
1291
1292     /* Clean control variables */
1293     input_ControlVarStop( p_input );
1294
1295     /* Stop es out activity */
1296     es_out_Control( p_input->p->p_es_out, ES_OUT_SET_ACTIVE, false );
1297     es_out_Control( p_input->p->p_es_out, ES_OUT_SET_MODE, ES_OUT_MODE_NONE );
1298
1299     /* Clean up master */
1300     InputSourceClean( &p_input->p->input );
1301
1302     /* Delete slave */
1303     for( i = 0; i < p_input->p->i_slave; i++ )
1304     {
1305         InputSourceClean( p_input->p->slave[i] );
1306         free( p_input->p->slave[i] );
1307     }
1308     free( p_input->p->slave );
1309
1310     /* Unload all modules */
1311     if( p_input->p->p_es_out )
1312         es_out_Delete( p_input->p->p_es_out );
1313     if( p_input->p->p_es_out_display )
1314         es_out_Delete( p_input->p->p_es_out_display );
1315
1316     if( !p_input->b_preparsing )
1317     {
1318 #define CL_CO( c ) stats_CounterClean( p_input->p->counters.p_##c ); p_input->p->counters.p_##c = NULL;
1319         if( libvlc_stats( p_input ) )
1320         {
1321             /* make sure we are up to date */
1322             stats_ComputeInputStats( p_input, p_input->p->p_item->p_stats );
1323             CL_CO( read_bytes );
1324             CL_CO( read_packets );
1325             CL_CO( demux_read );
1326             CL_CO( input_bitrate );
1327             CL_CO( demux_bitrate );
1328             CL_CO( demux_corrupted );
1329             CL_CO( demux_discontinuity );
1330             CL_CO( played_abuffers );
1331             CL_CO( lost_abuffers );
1332             CL_CO( displayed_pictures );
1333             CL_CO( lost_pictures );
1334             CL_CO( decoded_audio) ;
1335             CL_CO( decoded_video );
1336             CL_CO( decoded_sub) ;
1337         }
1338
1339         /* Close optional stream output instance */
1340         if( p_input->p->p_sout )
1341         {
1342             CL_CO( sout_sent_packets );
1343             CL_CO( sout_sent_bytes );
1344             CL_CO( sout_send_bitrate );
1345         }
1346 #undef CL_CO
1347     }
1348
1349     vlc_mutex_lock( &p_input->p->p_item->lock );
1350     if( p_input->p->i_attachment > 0 )
1351     {
1352         for( i = 0; i < p_input->p->i_attachment; i++ )
1353             vlc_input_attachment_Delete( p_input->p->attachment[i] );
1354         TAB_CLEAN( p_input->p->i_attachment, p_input->p->attachment );
1355     }
1356     vlc_mutex_unlock( &p_input->p->p_item->lock );
1357
1358     /* */
1359     input_resource_RequestSout( p_input->p->p_resource,
1360                                  p_input->p->p_sout, NULL );
1361     input_resource_SetInput( p_input->p->p_resource, NULL );
1362 }
1363
1364 /*****************************************************************************
1365  * Control
1366  *****************************************************************************/
1367 void input_ControlPush( input_thread_t *p_input,
1368                         int i_type, vlc_value_t *p_val )
1369 {
1370     vlc_mutex_lock( &p_input->p->lock_control );
1371     if( i_type == INPUT_CONTROL_SET_DIE )
1372     {
1373         /* Special case, empty the control */
1374         for( int i = 0; i < p_input->p->i_control; i++ )
1375         {
1376             input_control_t *p_ctrl = &p_input->p->control[i];
1377             ControlRelease( p_ctrl->i_type, p_ctrl->val );
1378         }
1379         p_input->p->i_control = 0;
1380     }
1381
1382     if( p_input->p->i_control >= INPUT_CONTROL_FIFO_SIZE )
1383     {
1384         msg_Err( p_input, "input control fifo overflow, trashing type=%d",
1385                  i_type );
1386         if( p_val )
1387             ControlRelease( i_type, *p_val );
1388     }
1389     else
1390     {
1391         input_control_t c;
1392         c.i_type = i_type;
1393         if( p_val )
1394             c.val = *p_val;
1395         else
1396             memset( &c.val, 0, sizeof(c.val) );
1397
1398         p_input->p->control[p_input->p->i_control++] = c;
1399     }
1400     vlc_cond_signal( &p_input->p->wait_control );
1401     vlc_mutex_unlock( &p_input->p->lock_control );
1402 }
1403
1404 static inline int ControlPop( input_thread_t *p_input,
1405                               int *pi_type, vlc_value_t *p_val,
1406                               mtime_t i_deadline )
1407 {
1408     input_thread_private_t *p_sys = p_input->p;
1409
1410     vlc_mutex_lock( &p_sys->lock_control );
1411     while( p_sys->i_control <= 0 )
1412     {
1413         if( !vlc_object_alive( p_input ) || i_deadline < 0 )
1414         {
1415             vlc_mutex_unlock( &p_sys->lock_control );
1416             return VLC_EGENERIC;
1417         }
1418
1419         if( vlc_cond_timedwait( &p_sys->wait_control, &p_sys->lock_control,
1420                                 i_deadline ) )
1421         {
1422             vlc_mutex_unlock( &p_sys->lock_control );
1423             return VLC_EGENERIC;
1424         }
1425     }
1426
1427     /* */
1428     *pi_type = p_sys->control[0].i_type;
1429     *p_val   = p_sys->control[0].val;
1430
1431     p_sys->i_control--;
1432     if( p_sys->i_control > 0 )
1433         memmove( &p_sys->control[0], &p_sys->control[1],
1434                  sizeof(*p_sys->control) * p_sys->i_control );
1435     vlc_mutex_unlock( &p_sys->lock_control );
1436
1437     return VLC_SUCCESS;
1438 }
1439
1440 static void ControlReduce( input_thread_t *p_input )
1441 {
1442     vlc_mutex_lock( &p_input->p->lock_control );
1443
1444     for( int i = 1; i < p_input->p->i_control; i++ )
1445     {
1446         const int i_lt = p_input->p->control[i-1].i_type;
1447         const int i_ct = p_input->p->control[i].i_type;
1448
1449         /* XXX We can't merge INPUT_CONTROL_SET_ES */
1450 /*        msg_Dbg( p_input, "[%d/%d] l=%d c=%d", i, p_input->p->i_control,
1451                  i_lt, i_ct );
1452 */
1453         if( i_lt == i_ct &&
1454             ( i_ct == INPUT_CONTROL_SET_STATE ||
1455               i_ct == INPUT_CONTROL_SET_RATE ||
1456               i_ct == INPUT_CONTROL_SET_POSITION ||
1457               i_ct == INPUT_CONTROL_SET_TIME ||
1458               i_ct == INPUT_CONTROL_SET_PROGRAM ||
1459               i_ct == INPUT_CONTROL_SET_TITLE ||
1460               i_ct == INPUT_CONTROL_SET_SEEKPOINT ||
1461               i_ct == INPUT_CONTROL_SET_BOOKMARK ) )
1462         {
1463             int j;
1464 //            msg_Dbg( p_input, "merged at %d", i );
1465             /* Remove the i-1 */
1466             for( j = i; j <  p_input->p->i_control; j++ )
1467                 p_input->p->control[j-1] = p_input->p->control[j];
1468             p_input->p->i_control--;
1469         }
1470         else
1471         {
1472             /* TODO but that's not that important
1473                 - merge SET_X with SET_X_CMD
1474                 - remove SET_SEEKPOINT/SET_POSITION/SET_TIME before a SET_TITLE
1475                 - remove SET_SEEKPOINT/SET_POSITION/SET_TIME before another among them
1476                 - ?
1477                 */
1478         }
1479     }
1480     vlc_mutex_unlock( &p_input->p->lock_control );
1481 }
1482
1483 static void ControlRelease( int i_type, vlc_value_t val )
1484 {
1485     switch( i_type )
1486     {
1487     case INPUT_CONTROL_ADD_SUBTITLE:
1488     case INPUT_CONTROL_ADD_SLAVE:
1489         free( val.psz_string );
1490         break;
1491
1492     default:
1493         break;
1494     }
1495 }
1496
1497 /* Pause input */
1498 static void ControlPause( input_thread_t *p_input, mtime_t i_control_date )
1499 {
1500     int i_ret = VLC_SUCCESS;
1501     int i_state = PAUSE_S;
1502
1503     if( p_input->p->b_can_pause )
1504     {
1505         if( p_input->p->input.p_access )
1506             i_ret = access_Control( p_input->p->input.p_access,
1507                                      ACCESS_SET_PAUSE_STATE, true );
1508         else
1509             i_ret = demux_Control( p_input->p->input.p_demux,
1510                                     DEMUX_SET_PAUSE_STATE, true );
1511
1512         if( i_ret )
1513         {
1514             msg_Warn( p_input, "cannot set pause state" );
1515             return;
1516         }
1517     }
1518
1519     /* */
1520     i_ret = es_out_SetPauseState( p_input->p->p_es_out,
1521                                   p_input->p->b_can_pause, true,
1522                                   i_control_date );
1523     if( i_ret )
1524     {
1525         msg_Warn( p_input, "cannot set pause state at es_out level" );
1526         return;
1527     }
1528
1529     /* Switch to new state */
1530     input_ChangeState( p_input, i_state );
1531 }
1532
1533 static void ControlUnpause( input_thread_t *p_input, mtime_t i_control_date )
1534 {
1535     int i_ret = VLC_SUCCESS;
1536
1537     if( p_input->p->b_can_pause )
1538     {
1539         if( p_input->p->input.p_access )
1540             i_ret = access_Control( p_input->p->input.p_access,
1541                                      ACCESS_SET_PAUSE_STATE, false );
1542         else
1543             i_ret = demux_Control( p_input->p->input.p_demux,
1544                                     DEMUX_SET_PAUSE_STATE, false );
1545         if( i_ret )
1546         {
1547             /* FIXME What to do ? */
1548             msg_Warn( p_input, "cannot unset pause -> EOF" );
1549             input_ControlPush( p_input, INPUT_CONTROL_SET_DIE, NULL );
1550         }
1551     }
1552
1553     /* Switch to play */
1554     input_ChangeState( p_input, PLAYING_S );
1555
1556     /* */
1557     if( !i_ret )
1558         es_out_SetPauseState( p_input->p->p_es_out, false, false, i_control_date );
1559 }
1560
1561 static bool Control( input_thread_t *p_input,
1562                      int i_type, vlc_value_t val )
1563 {
1564     const mtime_t i_control_date = mdate();
1565     /* FIXME b_force_update is abused, it should be carefully checked */
1566     bool b_force_update = false;
1567
1568     if( !p_input )
1569         return b_force_update;
1570
1571     switch( i_type )
1572     {
1573         case INPUT_CONTROL_SET_DIE:
1574             msg_Dbg( p_input, "control: stopping input" );
1575
1576             /* Mark all submodules to die */
1577             ObjectKillChildrens( p_input, VLC_OBJECT(p_input) );
1578             break;
1579
1580         case INPUT_CONTROL_SET_POSITION:
1581         {
1582             double f_pos;
1583
1584             if( p_input->p->b_recording )
1585             {
1586                 msg_Err( p_input, "INPUT_CONTROL_SET_POSITION(_OFFSET) ignored while recording" );
1587                 break;
1588             }
1589             f_pos = val.f_float;
1590             if( i_type != INPUT_CONTROL_SET_POSITION )
1591                 f_pos += var_GetFloat( p_input, "position" );
1592             if( f_pos < 0.0 )
1593                 f_pos = 0.0;
1594             else if( f_pos > 1.0 )
1595                 f_pos = 1.0;
1596             /* Reset the decoders states and clock sync (before calling the demuxer */
1597             es_out_SetTime( p_input->p->p_es_out, -1 );
1598             if( demux_Control( p_input->p->input.p_demux, DEMUX_SET_POSITION,
1599                                 f_pos, !p_input->p->b_fast_seek ) )
1600             {
1601                 msg_Err( p_input, "INPUT_CONTROL_SET_POSITION(_OFFSET) "
1602                          "%2.1f%% failed", f_pos * 100 );
1603             }
1604             else
1605             {
1606                 if( p_input->p->i_slave > 0 )
1607                     SlaveSeek( p_input );
1608                 p_input->p->input.b_eof = false;
1609
1610                 b_force_update = true;
1611             }
1612             break;
1613         }
1614
1615         case INPUT_CONTROL_SET_TIME:
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