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

   1 /*****************************************************************************
   2  * input.c: input thread
   3  * Read an MPEG2 stream, demultiplex and parse it before sending it to
   4  * decoders.
   5  *****************************************************************************
   6  * Copyright (C) 1998-2001 VideoLAN
   7  * $Id: input.c,v 1.166 2001/12/27 03:47:09 massiot Exp $
   8  *
   9  * Authors: Christophe Massiot <massiot@via.ecp.fr>
  10  *
  11  * This program is free software; you can redistribute it and/or modify
  12  * it under the terms of the GNU General Public License as published by
  13  * the Free Software Foundation; either version 2 of the License, or
  14  * (at your option) any later version.
  15  *
  16  * This program is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19  * GNU General Public License for more details.
  20  *
  21  * You should have received a copy of the GNU General Public License
  22  * along with this program; if not, write to the Free Software
  23  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
  24  *****************************************************************************/
  25
  26 /*****************************************************************************
  27  * Preamble
  28  *****************************************************************************/
  29 #include "defs.h"
  30
  31 #include <stdlib.h>
  32 #include <sys/types.h>
  33 #include <sys/stat.h>
  34 #include <fcntl.h>
  35
  36 #ifdef HAVE_UNISTD_H
  37 #   include <unistd.h>
  38 #elif defined( _MSC_VER ) && defined( _WIN32 )
  39 #   include <io.h>
  40 #endif
  41
  42 #include <string.h>
  43 #include <errno.h>
  44
  45 #ifdef STRNCASECMP_IN_STRINGS_H
  46 #   include <strings.h>
  47 #endif
  48
  49 #ifdef WIN32
  50 #   include <winsock2.h>
  51 #   include <ws2tcpip.h>
  52 #elif !defined( SYS_BEOS ) && !defined( SYS_NTO )
  53 #   include <netdb.h>                                         /* hostent ... */
  54 #   include <sys/socket.h>
  55 #   include <netinet/in.h>
  56 #   ifdef HAVE_ARPA_INET_H
  57 #       include <arpa/inet.h>                    /* inet_ntoa(), inet_aton() */
  58 #   endif
  59 #endif
  60
  61 #ifdef HAVE_SYS_TIMES_H
  62 #   include <sys/times.h>
  63 #endif
  64
  65 #include "common.h"
  66 #include "intf_msg.h"
  67 #include "threads.h"
  68 #include "mtime.h"
  69 #include "tests.h"
  70 #include "netutils.h"
  71 #include "modules.h"
  72
  73 #include "intf_playlist.h"
  74
  75 #include "stream_control.h"
  76 #include "input_ext-intf.h"
  77 #include "input_ext-dec.h"
  78 #include "input_ext-plugins.h"
  79
  80 #include "interface.h"
  81
  82 /*****************************************************************************
  83  * Local prototypes
  84  *****************************************************************************/
  85 static void RunThread       ( input_thread_t *p_input );
  86 static  int InitThread      ( input_thread_t *p_input );
  87 static void ErrorThread     ( input_thread_t *p_input );
  88 static void CloseThread     ( input_thread_t *p_input );
  89 static void DestroyThread   ( input_thread_t *p_input );
  90 static void EndThread       ( input_thread_t *p_input );
  91
  92 static void FileOpen        ( input_thread_t *p_input );
  93 static void StdOpen         ( input_thread_t *p_input );
  94 static void FileClose       ( input_thread_t *p_input );
  95 #if !defined( SYS_BEOS ) && !defined( SYS_NTO )
  96 static void NetworkOpen     ( input_thread_t *p_input );
  97 static void HTTPOpen        ( input_thread_t *p_input );
  98 static void NetworkClose    ( input_thread_t *p_input );
  99 #endif
 100
 101 /*****************************************************************************
 102  * input_CreateThread: creates a new input thread
 103  *****************************************************************************
 104  * This function creates a new input, and returns a pointer
 105  * to its description. On error, it returns NULL.
 106  * If pi_status is NULL, then the function will block until the thread is ready.
 107  * If not, it will be updated using one of the THREAD_* constants.
 108  *****************************************************************************/
 109 input_thread_t *input_CreateThread ( playlist_item_t *p_item, int *pi_status )
 110 {
 111     input_thread_t *    p_input;                        /* thread descriptor */
 112     int                 i_status;                           /* thread status */
 113
 114     /* Allocate descriptor */
 115     p_input = (input_thread_t *)malloc( sizeof(input_thread_t) );
 116     if( p_input == NULL )
 117     {
 118         intf_ErrMsg( "input error: can't allocate input thread (%s)",
 119                      strerror(errno) );
 120         return( NULL );
 121     }
 122
 123     /* Initialize thread properties */
 124     p_input->b_die              = 0;
 125     p_input->b_error            = 0;
 126     p_input->b_eof              = 0;
 127
 128     /* Set target */
 129     p_input->p_source           = p_item->psz_name;
 130
 131     /* I have never understood that stuff --Meuuh */
 132     p_input->pi_status          = (pi_status != NULL) ? pi_status : &i_status;
 133     *p_input->pi_status         = THREAD_CREATE;
 134
 135     /* Initialize stream description */
 136     p_input->stream.i_es_number = 0;
 137     p_input->stream.i_selected_es_number = 0;
 138     p_input->stream.i_pgrm_number = 0;
 139     p_input->stream.i_new_status = p_input->stream.i_new_rate = 0;
 140     p_input->stream.b_new_mute = MUTE_NO_CHANGE;
 141     p_input->stream.i_mux_rate = 0;
 142
 143     /* no stream, no area */
 144     p_input->stream.i_area_nb = 0;
 145     p_input->stream.pp_areas = NULL;
 146     p_input->stream.p_selected_area = NULL;
 147     p_input->stream.p_new_area = NULL;
 148
 149     /* By default there is one area in a stream */
 150     input_AddArea( p_input );
 151     p_input->stream.p_selected_area = p_input->stream.pp_areas[0];
 152
 153     /* Initialize stream control properties. */
 154     p_input->stream.control.i_status = PLAYING_S;
 155     p_input->stream.control.i_rate = DEFAULT_RATE;
 156     p_input->stream.control.b_mute = 0;
 157     p_input->stream.control.b_grayscale = main_GetIntVariable(
 158                             VOUT_GRAYSCALE_VAR, VOUT_GRAYSCALE_DEFAULT );
 159     p_input->stream.control.i_smp = main_GetIntVariable(
 160                             VDEC_SMP_VAR, VDEC_SMP_DEFAULT );
 161
 162     intf_WarnMsg( 1, "input: playlist item `%s'", p_input->p_source );
 163
 164     /* Create thread. */
 165     if( vlc_thread_create( &p_input->thread_id, "input", (void *) RunThread,
 166                            (void *) p_input ) )
 167     {
 168         intf_ErrMsg( "input error: can't create input thread (%s)",
 169                      strerror(errno) );
 170         free( p_input );
 171         return( NULL );
 172     }
 173
 174     /* If status is NULL, wait until the thread is created */
 175     if( pi_status == NULL )
 176     {
 177         do
 178         {
 179             msleep( THREAD_SLEEP );
 180         } while( (i_status != THREAD_READY) && (i_status != THREAD_ERROR)
 181                 && (i_status != THREAD_FATAL) );
 182         if( i_status != THREAD_READY )
 183         {
 184             return( NULL );
 185         }
 186     }
 187     return( p_input );
 188 }
 189
 190 /*****************************************************************************
 191  * input_DestroyThread: mark an input thread as zombie
 192  *****************************************************************************
 193  * This function should not return until the thread is effectively cancelled.
 194  *****************************************************************************/
 195 void input_DestroyThread( input_thread_t *p_input, int *pi_status )
 196 {
 197     int         i_status;                                   /* thread status */
 198
 199     /* Set status */
 200     p_input->pi_status = (pi_status != NULL) ? pi_status : &i_status;
 201     *p_input->pi_status = THREAD_DESTROY;
 202
 203     /* Request thread destruction */
 204     p_input->b_die = 1;
 205
 206     /* Make the thread exit of an eventual vlc_cond_wait() */
 207     vlc_mutex_lock( &p_input->stream.stream_lock );
 208     vlc_cond_signal( &p_input->stream.stream_wait );
 209     vlc_mutex_unlock( &p_input->stream.stream_lock );
 210
 211     /* If status is NULL, wait until thread has been destroyed */
 212     if( pi_status == NULL )
 213     {
 214         do
 215         {
 216             msleep( THREAD_SLEEP );
 217         } while ( (i_status != THREAD_OVER) && (i_status != THREAD_ERROR)
 218                   && (i_status != THREAD_FATAL) );
 219     }
 220 }
 221
 222 /*****************************************************************************
 223  * RunThread: main thread loop
 224  *****************************************************************************
 225  * Thread in charge of processing the network packets and demultiplexing.
 226  *****************************************************************************/
 227 static void RunThread( input_thread_t *p_input )
 228 {
 229     if( InitThread( p_input ) )
 230     {
 231         /* If we failed, wait before we are killed, and exit */
 232         *p_input->pi_status = THREAD_ERROR;
 233         p_input->b_error = 1;
 234         ErrorThread( p_input );
 235         DestroyThread( p_input );
 236         return;
 237     }
 238
 239     /* initialization is complete */
 240     vlc_mutex_lock( &p_input->stream.stream_lock );
 241     p_input->stream.b_changed = 1;
 242     vlc_mutex_unlock( &p_input->stream.stream_lock );
 243
 244     while( !p_input->b_die && !p_input->b_error && !p_input->b_eof )
 245     {
 246         data_packet_t * p_data;
 247         int i_count, i;
 248
 249         p_input->c_loops++;
 250
 251         vlc_mutex_lock( &p_input->stream.stream_lock );
 252
 253         if( p_input->stream.p_new_program )
 254         {
 255             if( p_input->pf_set_program != NULL )
 256             {
 257
 258                 p_input->pf_set_program( p_input,
 259                         p_input->stream.p_new_program );
 260
 261                 for( i = 0; i < p_input->stream.i_pgrm_number; i++ )
 262                 {
 263                     pgrm_descriptor_t * p_pgrm
 264                                             = p_input->stream.pp_programs[i];
 265                     /* Escape all decoders for the stream discontinuity they
 266                      * will encounter. */
 267                     input_EscapeDiscontinuity( p_input, p_pgrm );
 268
 269                     /* Reinitialize synchro. */
 270                     p_pgrm->i_synchro_state = SYNCHRO_REINIT;
 271                 }
 272             }
 273             p_input->stream.p_new_program = NULL;
 274         }
 275
 276         if( p_input->stream.p_new_area )
 277         {
 278             if( p_input->stream.b_seekable && p_input->pf_set_area != NULL )
 279             {
 280
 281                 p_input->pf_set_area( p_input, p_input->stream.p_new_area );
 282
 283                 for( i = 0; i < p_input->stream.i_pgrm_number; i++ )
 284                 {
 285                     pgrm_descriptor_t * p_pgrm
 286                                             = p_input->stream.pp_programs[i];
 287                     /* Escape all decoders for the stream discontinuity they
 288                      * will encounter. */
 289                     input_EscapeDiscontinuity( p_input, p_pgrm );
 290
 291                     /* Reinitialize synchro. */
 292                     p_pgrm->i_synchro_state = SYNCHRO_REINIT;
 293                 }
 294             }
 295             p_input->stream.p_new_area = NULL;
 296         }
 297
 298         if( p_input->stream.p_selected_area->i_seek != NO_SEEK )
 299         {
 300             if( p_input->stream.b_seekable && p_input->pf_seek != NULL )
 301             {
 302                 p_input->pf_seek( p_input,
 303                                   p_input->stream.p_selected_area->i_seek );
 304
 305                 for( i = 0; i < p_input->stream.i_pgrm_number; i++ )
 306                 {
 307                     pgrm_descriptor_t * p_pgrm
 308                                             = p_input->stream.pp_programs[i];
 309                     /* Escape all decoders for the stream discontinuity they
 310                      * will encounter. */
 311                     input_EscapeDiscontinuity( p_input, p_pgrm );
 312
 313                     /* Reinitialize synchro. */
 314                     p_pgrm->i_synchro_state = SYNCHRO_REINIT;
 315                 }
 316             }
 317             p_input->stream.p_selected_area->i_seek = NO_SEEK;
 318         }
 319
 320         if( p_input->stream.p_removed_es )
 321         {
 322             input_UnselectES( p_input, p_input->stream.p_removed_es );
 323             p_input->stream.p_removed_es = NULL;
 324         }
 325
 326         if( p_input->stream.p_newly_selected_es )
 327         {
 328             input_SelectES( p_input, p_input->stream.p_newly_selected_es );
 329             p_input->stream.p_newly_selected_es = NULL;
 330         }
 331
 332         if( p_input->stream.b_new_mute != MUTE_NO_CHANGE )
 333         {
 334             if( p_input->stream.b_new_mute )
 335             {
 336                 input_EscapeAudioDiscontinuity( p_input );
 337             }
 338
 339             vlc_mutex_lock( &p_input->stream.control.control_lock );
 340             p_input->stream.control.b_mute = p_input->stream.b_new_mute;
 341             vlc_mutex_unlock( &p_input->stream.control.control_lock );
 342
 343             p_input->stream.b_new_mute = MUTE_NO_CHANGE;
 344         }
 345
 346         vlc_mutex_unlock( &p_input->stream.stream_lock );
 347
 348         i_count = p_input->pf_read( p_input, &p_data );
 349
 350         /* Demultiplex read packets. */
 351         while( p_data != NULL )
 352         {
 353             data_packet_t * p_next = p_data->p_next;
 354             p_data->p_next = NULL;
 355
 356             p_input->stream.c_packets_read++;
 357             p_input->pf_demux( p_input, p_data );
 358
 359             p_data = p_next;
 360         }
 361
 362         if( i_count == 0 && p_input->stream.b_seekable )
 363         {
 364             /* End of file - we do not set b_die because only the
 365              * interface is allowed to do so. */
 366             intf_WarnMsg( 3, "input: EOF reached" );
 367             p_input->b_eof = 1;
 368         }
 369         else if( i_count < 0 )
 370         {
 371             p_input->b_error = 1;
 372         }
 373     }
 374
 375     if( p_input->b_error || p_input->b_eof )
 376     {
 377         ErrorThread( p_input );
 378     }
 379
 380     EndThread( p_input );
 381
 382     DestroyThread( p_input );
 383
 384     intf_DbgMsg("input: Thread end");
 385 }
 386
 387 /*****************************************************************************
 388  * InitThread: init the input Thread
 389  *****************************************************************************/
 390 static int InitThread( input_thread_t * p_input )
 391 {
 392
 393     /* Initialize statistics */
 394     p_input->c_loops                    = 0;
 395     p_input->stream.c_packets_read      = 0;
 396     p_input->stream.c_packets_trashed   = 0;
 397     p_input->p_stream                   = NULL;
 398
 399     /* Set locks. */
 400     vlc_mutex_init( &p_input->stream.stream_lock );
 401     vlc_cond_init( &p_input->stream.stream_wait );
 402     vlc_mutex_init( &p_input->stream.control.control_lock );
 403
 404     /* Find appropriate module. */
 405     p_input->p_input_module = module_Need( MODULE_CAPABILITY_INPUT,
 406                                            (probedata_t *)p_input );
 407
 408     if( p_input->p_input_module == NULL )
 409     {
 410         intf_ErrMsg( "input error: no suitable input module for `%s'",
 411                      p_input->p_source );
 412         return( -1 );
 413     }
 414
 415 #define f p_input->p_input_module->p_functions->input.functions.input
 416     p_input->pf_init          = f.pf_init;
 417     p_input->pf_end           = f.pf_end;
 418     p_input->pf_init_bit_stream= f.pf_init_bit_stream;
 419     p_input->pf_read          = f.pf_read;
 420     p_input->pf_set_area      = f.pf_set_area;
 421     p_input->pf_set_program   = f.pf_set_program;
 422     p_input->pf_demux         = f.pf_demux;
 423     p_input->pf_new_packet    = f.pf_new_packet;
 424     p_input->pf_new_pes       = f.pf_new_pes;
 425     p_input->pf_delete_packet = f.pf_delete_packet;
 426     p_input->pf_delete_pes    = f.pf_delete_pes;
 427     p_input->pf_rewind        = f.pf_rewind;
 428     p_input->pf_seek          = f.pf_seek;
 429
 430 #if !defined( SYS_BEOS ) && !defined( SYS_NTO )
 431     /* FIXME : this is waaaay too kludgy */
 432     if( ( strlen( p_input->p_source ) >= 10
 433           && !strncasecmp( p_input->p_source, "udpstream:", 10 ) )
 434           || ( strlen( p_input->p_source ) >= 4
 435                 && !strncasecmp( p_input->p_source, "udp:", 4 ) ) )
 436     {
 437         /* Network stream */
 438         NetworkOpen( p_input );
 439         p_input->stream.i_method = INPUT_METHOD_NETWORK;
 440     }
 441     else if( ( strlen( p_input->p_source ) > 5 )
 442                && !strncasecmp( p_input->p_source, "http:", 5 ) )
 443     {
 444         /* HTTP stream */
 445         HTTPOpen( p_input );
 446         p_input->stream.i_method = INPUT_METHOD_NETWORK;
 447     }
 448     else
 449 #endif
 450         if( ( ( ( strlen( p_input->p_source ) > 4 )
 451                   && !strncasecmp( p_input->p_source, "dvd:", 4 ) )
 452               || TestMethod( INPUT_METHOD_VAR, "dvd" ) )
 453              && f.pf_open != NULL )
 454     {
 455         /* DVD - this is THE kludge */
 456         f.pf_open( p_input );
 457         p_input->stream.i_method = INPUT_METHOD_DVD;
 458     }
 459     else if( ( ( ( strlen( p_input->p_source ) > 8 )
 460                    && !strncasecmp( p_input->p_source, "dvdread:", 8 ) )
 461                 || TestMethod( INPUT_METHOD_VAR, "dvdread" ) )
 462              && f.pf_open != NULL )
 463     {
 464         /* DVDRead - this is THE kludge */
 465         f.pf_open( p_input );
 466         p_input->stream.i_method = INPUT_METHOD_DVD;
 467     }
 468     else if( ( strlen( p_input->p_source ) > 4 )
 469                && !strncasecmp( p_input->p_source, "vlc:", 4 )
 470                && f.pf_open != NULL )
 471     {
 472         /* Dummy input - very kludgy */
 473         f.pf_open( p_input );
 474     }
 475     else if( ( strlen( p_input->p_source ) == 1 )
 476                && *p_input->p_source == '-' )
 477     {
 478         /* Stdin */
 479         StdOpen( p_input );
 480     }
 481     else
 482     {
 483         /* File input */
 484         FileOpen( p_input );
 485         p_input->stream.i_method = INPUT_METHOD_FILE;
 486     }
 487 #undef f
 488
 489     if( p_input->b_error )
 490     {
 491         /* We barfed -- exit nicely */
 492         module_Unneed( p_input->p_input_module );
 493         return( -1 );
 494     }
 495
 496     p_input->pf_init( p_input );
 497
 498     if( p_input->b_error )
 499     {
 500         /* We barfed -- exit nicely */
 501         CloseThread( p_input );
 502         module_Unneed( p_input->p_input_module );
 503         return( -1 );
 504     }
 505
 506     *p_input->pi_status = THREAD_READY;
 507
 508     return( 0 );
 509 }
 510
 511 /*****************************************************************************
 512  * ErrorThread: RunThread() error loop
 513  *****************************************************************************
 514  * This function is called when an error occured during thread main's loop.
 515  *****************************************************************************/
 516 static void ErrorThread( input_thread_t *p_input )
 517 {
 518     while( !p_input->b_die )
 519     {
 520         /* Sleep a while */
 521         msleep( INPUT_IDLE_SLEEP );
 522     }
 523 }
 524
 525 /*****************************************************************************
 526  * EndThread: end the input thread
 527  *****************************************************************************/
 528 static void EndThread( input_thread_t * p_input )
 529 {
 530     int *       pi_status;                                  /* thread status */
 531
 532     /* Store status */
 533     pi_status = p_input->pi_status;
 534     *pi_status = THREAD_END;
 535
 536     if( p_main->b_stats )
 537     {
 538 #ifdef HAVE_SYS_TIMES_H
 539         /* Display statistics */
 540         struct tms  cpu_usage;
 541         times( &cpu_usage );
 542
 543         intf_StatMsg( "input stats: %d loops consuming user: %d, system: %d",
 544                       p_input->c_loops,
 545                       cpu_usage.tms_utime, cpu_usage.tms_stime );
 546 #else
 547         intf_StatMsg( "input stats: %d loops", p_input->c_loops );
 548 #endif
 549
 550         input_DumpStream( p_input );
 551     }
 552
 553     /* Free all ES and destroy all decoder threads */
 554     input_EndStream( p_input );
 555
 556     /* Free demultiplexer's data */
 557     p_input->pf_end( p_input );
 558
 559     /* Close the input method */
 560     CloseThread( p_input );
 561
 562     /* Release modules */
 563     module_Unneed( p_input->p_input_module );
 564 }
 565
 566 /*****************************************************************************
 567  * CloseThread: close the target
 568  *****************************************************************************/
 569 static void CloseThread( input_thread_t * p_input )
 570 {
 571 #define f p_input->p_input_module->p_functions->input.functions.input
 572
 573 #if !defined( SYS_BEOS ) && !defined( SYS_NTO )
 574     /* Close stream */
 575     if( ( strlen( p_input->p_source ) > 10
 576           && !strncasecmp( p_input->p_source, "udpstream:", 10 ) )
 577           || ( strlen( p_input->p_source ) > 4
 578                 && !strncasecmp( p_input->p_source, "udp:", 4 ) ) )
 579     {
 580         NetworkClose( p_input );
 581     }
 582     else if( ( strlen( p_input->p_source ) > 5 )
 583                && !strncasecmp( p_input->p_source, "http:", 5 ) )
 584     {
 585         NetworkClose( p_input );
 586     }
 587     else
 588 #endif
 589     if( ( ( strlen( p_input->p_source ) > 4 )
 590             && !strncasecmp( p_input->p_source, "dvd:", 4 ) )
 591         || TestMethod( INPUT_METHOD_VAR, "dvd" ) )
 592     {
 593         f.pf_close( p_input );
 594     }
 595     else if( ( ( strlen( p_input->p_source ) > 8 )
 596                  && !strncasecmp( p_input->p_source, "dvdread:", 8 ) )
 597              || TestMethod( INPUT_METHOD_VAR, "dvdread" ) )
 598     {
 599         f.pf_close( p_input );
 600     }
 601     else if( ( strlen( p_input->p_source ) > 4 )
 602                && !strncasecmp( p_input->p_source, "vlc:", 4 ) )
 603     {
 604         f.pf_close( p_input );
 605     }
 606     else
 607     {
 608         FileClose( p_input );
 609     }
 610 #undef f
 611 }
 612
 613 /*****************************************************************************
 614  * DestroyThread: destroy the input thread
 615  *****************************************************************************/
 616 static void DestroyThread( input_thread_t * p_input )
 617 {
 618     int *       pi_status;                                  /* thread status */
 619
 620     /* Store status */
 621     pi_status = p_input->pi_status;
 622
 623     /* Destroy Mutex locks */
 624     vlc_mutex_destroy( &p_input->stream.control.control_lock );
 625     vlc_mutex_destroy( &p_input->stream.stream_lock );
 626
 627     /* Free input structure */
 628     free( p_input );
 629
 630     /* Update status */
 631     *pi_status = THREAD_OVER;
 632 }
 633
 634 /*****************************************************************************
 635  * StdOpen : open standard input
 636  *****************************************************************************/
 637 static void StdOpen( input_thread_t * p_input )
 638 {
 639     vlc_mutex_lock( &p_input->stream.stream_lock );
 640
 641     /* Suppose we can control the pace - this won't work in some cases ! */
 642     p_input->stream.b_pace_control = 1;
 643
 644     p_input->stream.b_seekable = 0;
 645     p_input->stream.p_selected_area->i_size = 0;
 646     p_input->stream.p_selected_area->i_tell = 0;
 647     vlc_mutex_unlock( &p_input->stream.stream_lock );
 648
 649     intf_WarnMsg( 2, "input: opening stdin" );
 650     p_input->i_handle = 0;
 651 }
 652
 653 /*****************************************************************************
 654  * FileOpen : open a file descriptor
 655  *****************************************************************************/
 656 static void FileOpen( input_thread_t * p_input )
 657 {
 658     struct stat         stat_info;
 659     int                 i_stat;
 660
 661     char *psz_name = p_input->p_source;
 662
 663     if( ( i_stat = stat( psz_name, &stat_info ) ) == (-1) )
 664     {
 665         int i_size = strlen( psz_name );
 666
 667         if( ( i_size > 8 )
 668             && !strncasecmp( psz_name, "dvdread:", 8 ) )
 669         {
 670             /* get rid of the 'dvdread:' stuff and try again */
 671             psz_name += 8;
 672             i_stat = stat( psz_name, &stat_info );
 673         }
 674         else if( ( i_size > 4 )
 675             && !strncasecmp( psz_name, "dvd:", 4 ) )
 676         {
 677             /* get rid of the 'dvd:' stuff and try again */
 678             psz_name += 4;
 679             i_stat = stat( psz_name, &stat_info );
 680         }
 681         else if( ( i_size > 4 )
 682                  && !strncasecmp( psz_name, "vcd:", 4 ) )
 683         {
 684             /* get rid of the 'vcd:' stuff and try again */
 685             psz_name += 4;
 686             i_stat = stat( psz_name, &stat_info );
 687         }
 688         else if( ( i_size > 5 )
 689                  && !strncasecmp( psz_name, "file:", 5 ) )
 690         {
 691             /* get rid of the 'file:' stuff and try again */
 692             psz_name += 5;
 693             i_stat = stat( psz_name, &stat_info );
 694         }
 695
 696         if( i_stat == (-1) )
 697         {
 698             intf_ErrMsg( "input error: cannot stat() file `%s' (%s)",
 699                          psz_name, strerror(errno));
 700             p_input->b_error = 1;
 701             return;
 702         }
 703     }
 704
 705     vlc_mutex_lock( &p_input->stream.stream_lock );
 706
 707     /* If we are here we can control the pace... */
 708     p_input->stream.b_pace_control = 1;
 709
 710     if( S_ISREG(stat_info.st_mode) || S_ISCHR(stat_info.st_mode)
 711          || S_ISBLK(stat_info.st_mode) )
 712     {
 713         p_input->stream.b_seekable = 1;
 714         p_input->stream.p_selected_area->i_size = stat_info.st_size;
 715     }
 716     else if( S_ISFIFO(stat_info.st_mode)
 717 #if !defined( SYS_BEOS ) && !defined( WIN32 )
 718              || S_ISSOCK(stat_info.st_mode)
 719 #endif
 720              )
 721     {
 722         p_input->stream.b_seekable = 0;
 723         p_input->stream.p_selected_area->i_size = 0;
 724     }
 725     else
 726     {
 727         vlc_mutex_unlock( &p_input->stream.stream_lock );
 728         intf_ErrMsg( "input error: unknown file type for `%s'",
 729                      psz_name );
 730         p_input->b_error = 1;
 731         return;
 732     }
 733
 734     p_input->stream.p_selected_area->i_tell = 0;
 735     vlc_mutex_unlock( &p_input->stream.stream_lock );
 736
 737     intf_WarnMsg( 2, "input: opening file `%s'", p_input->p_source );
 738     if( (p_input->i_handle = open( psz_name,
 739                                    /*O_NONBLOCK | O_LARGEFILE*/0 )) == (-1) )
 740     {
 741         intf_ErrMsg( "input error: cannot open file (%s)", strerror(errno) );
 742         p_input->b_error = 1;
 743         return;
 744     }
 745
 746 }
 747
 748 /*****************************************************************************
 749  * FileClose : close a file descriptor
 750  *****************************************************************************/
 751 static void FileClose( input_thread_t * p_input )
 752 {
 753     intf_WarnMsg( 2, "input: closing file `%s'", p_input->p_source );
 754
 755     close( p_input->i_handle );
 756
 757     return;
 758 }
 759
 760 #if !defined( SYS_BEOS ) && !defined( SYS_NTO )
 761 /*****************************************************************************
 762  * NetworkOpen : open a network socket
 763  *****************************************************************************/
 764 static void NetworkOpen( input_thread_t * p_input )
 765 {
 766     char                *psz_server = NULL;
 767     char                *psz_bind = NULL;
 768     int                 i_server_port = 0;
 769     int                 i_bind_port = 0;
 770     int                 i_opt;
 771     int                 i_opt_size;
 772     struct sockaddr_in  sock;
 773
 774     /* Get the remote server. Syntax is :
 775      * udp[stream]:[/][/][serveraddr[:serverport]][@[bindaddr]:[bindport]] */
 776     if( p_input->p_source != NULL )
 777     {
 778         char * psz_parser = p_input->p_source;
 779         char * psz_server_port = NULL;
 780         char * psz_bind_port = NULL;
 781
 782         /* Skip the protocol name */
 783         while( *psz_parser && *psz_parser != ':' )
 784         {
 785             psz_parser++;
 786         }
 787
 788         /* Skip the "://" part */
 789         while( *psz_parser && (*psz_parser == ':' || *psz_parser == '/') )
 790         {
 791             psz_parser++;
 792         }
 793
 794         if( *psz_parser && *psz_parser != '@' )
 795         {
 796             /* Found server */
 797             psz_server = psz_parser;
 798
 799             while( *psz_parser && *psz_parser != ':' && *psz_parser != '@' )
 800             {
 801                 psz_parser++;
 802             }
 803
 804             if( *psz_parser == ':' )
 805             {
 806                 /* Found server port */
 807                 *psz_parser = '\0'; /* Terminate server name */
 808                 psz_parser++;
 809                 psz_server_port = psz_parser;
 810
 811                 while( *psz_parser && *psz_parser != '@' )
 812                 {
 813                     psz_parser++;
 814                 }
 815             }
 816         }
 817
 818         if( *psz_parser == '@' )
 819         {
 820             /* Found bind address or bind port */
 821             *psz_parser = '\0'; /* Terminate server port or name if necessary */
 822             psz_parser++;
 823
 824             if( *psz_parser && *psz_parser != ':' )
 825             {
 826                 /* Found bind address */
 827                 psz_bind = psz_parser;
 828
 829                 while( *psz_parser && *psz_parser != ':' )
 830                 {
 831                     psz_parser++;
 832                 }
 833             }
 834
 835             if( *psz_parser == ':' )
 836             {
 837                 /* Found bind port */
 838                 *psz_parser = '\0'; /* Terminate bind address if necessary */
 839                 psz_parser++;
 840
 841                 psz_bind_port = psz_parser;
 842             }
 843         }
 844
 845         /* Convert ports format */
 846         if( psz_server_port != NULL )
 847         {
 848             i_server_port = strtol( psz_server_port, &psz_parser, 10 );
 849             if( *psz_parser )
 850             {
 851                 intf_ErrMsg( "input error: cannot parse server port near %s",
 852                              psz_parser );
 853                 p_input->b_error = 1;
 854                 return;
 855             }
 856         }
 857
 858         if( psz_bind_port != NULL )
 859         {
 860             i_bind_port = strtol( psz_bind_port, &psz_parser, 10 );
 861             if( *psz_parser )
 862             {
 863                 intf_ErrMsg( "input error: cannot parse bind port near %s",
 864                              psz_parser );
 865                 p_input->b_error = 1;
 866                 return;
 867             }
 868         }
 869     }
 870     else
 871     {
 872         /* This is required or NetworkClose will never be called */
 873         p_input->p_source = "ts: network input";
 874     }
 875
 876     /* Check that we got a valid port */
 877     if( i_bind_port == 0 )
 878     {
 879         i_bind_port = main_GetIntVariable( INPUT_PORT_VAR, INPUT_PORT_DEFAULT );
 880     }
 881
 882     intf_WarnMsg( 2, "input: server=%s:%d local=%s:%d",
 883                      psz_server, i_server_port, psz_bind, i_bind_port );
 884
 885     /* Open a SOCK_DGRAM (UDP) socket, in the AF_INET domain, automatic (0)
 886      * protocol */
 887     p_input->i_handle = socket( AF_INET, SOCK_DGRAM, 0 );
 888     if( p_input->i_handle == -1 )
 889     {
 890         intf_ErrMsg( "input error: can't create socket (%s)", strerror(errno) );
 891         p_input->b_error = 1;
 892         return;
 893     }
 894
 895     /* We may want to reuse an already used socket */
 896     i_opt = 1;
 897     if( setsockopt( p_input->i_handle, SOL_SOCKET, SO_REUSEADDR,
 898                     (void *) &i_opt, sizeof( i_opt ) ) == -1 )
 899     {
 900         intf_ErrMsg( "input error: can't configure socket (SO_REUSEADDR: %s)",
 901                      strerror(errno));
 902         close( p_input->i_handle );
 903         p_input->b_error = 1;
 904         return;
 905     }
 906
 907     /* Increase the receive buffer size to 1/2MB (8Mb/s during 1/2s) to avoid
 908      * packet loss caused by scheduling problems */
 909     i_opt = 0x80000;
 910     if( setsockopt( p_input->i_handle, SOL_SOCKET, SO_RCVBUF,
 911                     (void *) &i_opt, sizeof( i_opt ) ) == -1 )
 912     {
 913         intf_WarnMsg( 1, "input warning: can't configure socket (SO_RCVBUF: %s)",
 914                          strerror(errno));
 915     }
 916
 917     /* Check if we really got what we have asked for, because Linux, etc.
 918      * will silently limit the max buffer size to net.core.rmem_max which
 919      * is typically only 65535 bytes */
 920     i_opt = 0;
 921     i_opt_size = sizeof( i_opt );
 922     if( getsockopt( p_input->i_handle, SOL_SOCKET, SO_RCVBUF,
 923                     (void*) &i_opt, &i_opt_size ) == -1 )
 924     {
 925         intf_WarnMsg( 1, "input warning: can't query socket (SO_RCVBUF: %s)",
 926                          strerror(errno));
 927     }
 928     else if( i_opt < 0x80000 )
 929     {
 930         intf_WarnMsg( 1, "input warning: socket buffer size is 0x%x"
 931                          " instead of 0x%x", i_opt, 0x80000 );
 932     }
 933
 934     /* Build the local socket */
 935     if ( network_BuildAddr( &sock, psz_bind, i_bind_port ) == -1 )
 936     {
 937         intf_ErrMsg( "input error: can't build local address" );
 938         close( p_input->i_handle );
 939         p_input->b_error = 1;
 940         return;
 941     }
 942
 943     /* Bind it */
 944     if( bind( p_input->i_handle, (struct sockaddr *)&sock,
 945               sizeof( sock ) ) < 0 )
 946     {
 947         intf_ErrMsg( "input error: can't bind socket (%s)", strerror(errno) );
 948         close( p_input->i_handle );
 949         p_input->b_error = 1;
 950         return;
 951     }
 952
 953     /* Allow broadcast reception if we bound on INADDR_ANY */
 954     if( psz_bind == NULL )
 955     {
 956         i_opt = 1;
 957         if( setsockopt( p_input->i_handle, SOL_SOCKET, SO_BROADCAST,
 958                         (void*) &i_opt, sizeof( i_opt ) ) == -1 )
 959         {
 960             intf_WarnMsg( 1, "input warning: can't configure socket (SO_BROADCAST: %s)",
 961                              strerror(errno));
 962         }
 963     }
 964
 965     /* Join the multicast group if the socket is a multicast address */
 966 #ifndef IN_MULTICAST
 967 #   define IN_MULTICAST(a)         IN_CLASSD(a)
 968 #endif
 969
 970     if( IN_MULTICAST( ntohl(sock.sin_addr.s_addr) ) )
 971     {
 972         struct ip_mreq imr;
 973
 974         imr.imr_interface.s_addr = INADDR_ANY;
 975         imr.imr_multiaddr.s_addr = sock.sin_addr.s_addr;
 976         if( setsockopt( p_input->i_handle, IPPROTO_IP, IP_ADD_MEMBERSHIP,
 977                         (char*)&imr, sizeof(struct ip_mreq) ) == -1 )
 978         {
 979             intf_ErrMsg( "input error: failed to join IP multicast group (%s)",
 980                          strerror(errno) );
 981             close( p_input->i_handle );
 982             p_input->b_error = 1;
 983             return;
 984         }
 985     }
 986
 987     if( psz_server != NULL )
 988     {
 989         /* Build socket for remote connection */
 990         if ( network_BuildAddr( &sock, psz_server, i_server_port ) == -1 )
 991         {
 992             intf_ErrMsg( "input error: can't build remote address" );
 993             close( p_input->i_handle );
 994             p_input->b_error = 1;
 995             return;
 996         }
 997
 998         /* Connect the socket */
 999         if( connect( p_input->i_handle, (struct sockaddr *) &sock,
1000                      sizeof( sock ) ) == (-1) )
1001         {
1002             intf_ErrMsg( "input error: can't connect socket (%s)",
1003                          strerror(errno) );
1004             close( p_input->i_handle );
1005             p_input->b_error = 1;
1006             return;
1007         }
1008     }
1009
1010     p_input->stream.b_pace_control = 0;
1011     p_input->stream.b_seekable = 0;
1012
1013     intf_WarnMsg( 3, "input: successfully opened network mode" );
1014
1015     return;
1016 }
1017
1018 /*****************************************************************************
1019  * NetworkClose : close a network socket
1020  *****************************************************************************/
1021 static void NetworkClose( input_thread_t * p_input )
1022 {
1023     intf_WarnMsg( 2, "input: closing network target `%s'", p_input->p_source );
1024
1025     close( p_input->i_handle );
1026 }
1027
1028 /*****************************************************************************
1029  * HTTPOpen : make an HTTP request
1030  *****************************************************************************/
1031 static void HTTPOpen( input_thread_t * p_input )
1032 {
1033     char                *psz_server = NULL;
1034     char                *psz_path = NULL;
1035     char                *psz_proxy;
1036     int                 i_port = 0;
1037     int                 i_opt;
1038     struct sockaddr_in  sock;
1039     char                psz_buffer[256];
1040
1041     /* Get the remote server */
1042     if( p_input->p_source != NULL )
1043     {
1044         psz_server = p_input->p_source;
1045
1046         /* Skip the protocol name */
1047         while( *psz_server && *psz_server != ':' )
1048         {
1049             psz_server++;
1050         }
1051
1052         /* Skip the "://" part */
1053         while( *psz_server && (*psz_server == ':' || *psz_server == '/') )
1054         {
1055             psz_server++;
1056         }
1057
1058         /* Found a server name */
1059         if( *psz_server )
1060         {
1061             char *psz_port = psz_server;
1062
1063             /* Skip the hostname part */
1064             while( *psz_port && *psz_port != ':' && *psz_port != '/' )
1065             {
1066                 psz_port++;
1067             }
1068
1069             /* Found a port name */
1070             if( *psz_port )
1071             {
1072                 if( *psz_port == ':' )
1073                 {
1074                     /* Replace ':' with '\0' */
1075                     *psz_port = '\0';
1076                     psz_port++;
1077                 }
1078
1079                 psz_path = psz_port;
1080                 while( *psz_path && *psz_path != '/' )
1081                 {
1082                     psz_path++;
1083                 }
1084
1085                 if( *psz_path )
1086                 {
1087                     *psz_path = '\0';
1088                     psz_path++;
1089                 }
1090                 else
1091                 {
1092                     psz_path = NULL;
1093                 }
1094
1095                 if( *psz_port != '\0' )
1096                 {
1097                     i_port = atoi( psz_port );
1098                 }
1099             }
1100         }
1101         else
1102         {
1103             psz_server = NULL;
1104         }
1105     }
1106
1107     /* Check that we got a valid server */
1108     if( psz_server == NULL )
1109     {
1110         intf_ErrMsg( "input error: No server given" );
1111         p_input->b_error = 1;
1112         return;
1113     }
1114
1115     /* Check that we got a valid port */
1116     if( i_port == 0 )
1117     {
1118         i_port = 80; /* FIXME */
1119     }
1120
1121     intf_WarnMsg( 2, "input: server=%s port=%d path=%s", psz_server,
1122                   i_port, psz_path );
1123
1124     /* Open a SOCK_STREAM (TCP) socket, in the AF_INET domain, automatic (0)
1125      *      * protocol */
1126     p_input->i_handle = socket( AF_INET, SOCK_STREAM, 0 );
1127     if( p_input->i_handle == -1 )
1128     {
1129         intf_ErrMsg( "input error: can't create socket (%s)", strerror(errno) );        p_input->b_error = 1;
1130         return;
1131     }
1132
1133     /* We may want to reuse an already used socket */
1134     i_opt = 1;
1135     if( setsockopt( p_input->i_handle, SOL_SOCKET, SO_REUSEADDR,
1136                     (void *) &i_opt, sizeof( i_opt ) ) == -1 )
1137     {
1138         intf_ErrMsg( "input error: can't configure socket (SO_REUSEADDR: %s)",
1139                      strerror(errno));
1140         close( p_input->i_handle );
1141         p_input->b_error = 1;
1142         return;
1143     }
1144
1145     /* Check proxy */
1146     if( (psz_proxy = main_GetPszVariable( "http_proxy", NULL )) != NULL )
1147     {
1148         /* http://myproxy.mydomain:myport/ */
1149         int                 i_proxy_port = 0;
1150
1151         /* Skip the protocol name */
1152         while( *psz_proxy && *psz_proxy != ':' )
1153         {
1154             psz_proxy++;
1155         }
1156
1157         /* Skip the "://" part */
1158         while( *psz_proxy && (*psz_proxy == ':' || *psz_proxy == '/') )
1159         {
1160             psz_proxy++;
1161         }
1162
1163         /* Found a proxy name */
1164         if( *psz_proxy )
1165         {
1166             char *psz_port = psz_proxy;
1167
1168             /* Skip the hostname part */
1169             while( *psz_port && *psz_port != ':' && *psz_port != '/' )
1170             {
1171                 psz_port++;
1172             }
1173
1174             /* Found a port name */
1175             if( *psz_port )
1176             {
1177                 char * psz_junk;
1178
1179                 /* Replace ':' with '\0' */
1180                 *psz_port = '\0';
1181                 psz_port++;
1182
1183                 psz_junk = psz_port;
1184                 while( *psz_junk && *psz_junk != '/' )
1185                 {
1186                     psz_junk++;
1187                 }
1188
1189                 if( *psz_junk )
1190                 {
1191                     *psz_junk = '\0';
1192                 }
1193
1194                 if( *psz_port != '\0' )
1195                 {
1196                     i_proxy_port = atoi( psz_port );
1197                 }
1198             }
1199         }
1200         else
1201         {
1202             intf_ErrMsg( "input error: http_proxy environment variable is invalid !" );
1203             close( p_input->i_handle );
1204             p_input->b_error = 1;
1205             return;
1206         }
1207
1208         /* Build socket for proxy connection */
1209         if ( network_BuildAddr( &sock, psz_proxy, i_proxy_port ) == -1 )
1210         {
1211             intf_ErrMsg( "input error: can't build remote address" );
1212             close( p_input->i_handle );
1213             p_input->b_error = 1;
1214             return;
1215         }
1216     }
1217     else
1218     {
1219         /* No proxy, direct connection */
1220         if ( network_BuildAddr( &sock, psz_server, i_port ) == -1 )
1221         {
1222             intf_ErrMsg( "input error: can't build remote address" );
1223             close( p_input->i_handle );
1224             p_input->b_error = 1;
1225             return;
1226         }
1227     }
1228
1229     /* Connect the socket */
1230     if( connect( p_input->i_handle, (struct sockaddr *) &sock,
1231                  sizeof( sock ) ) == (-1) )
1232     {
1233         intf_ErrMsg( "input error: can't connect socket (%s)",
1234                      strerror(errno) );
1235         close( p_input->i_handle );
1236         p_input->b_error = 1;
1237         return;
1238     }
1239
1240     p_input->stream.b_seekable = 0;
1241     p_input->stream.b_pace_control = 1; /* TCP/IP... */
1242
1243 #   define HTTP_USERAGENT "User-Agent: " COPYRIGHT_MESSAGE "\r\n"
1244 #   define HTTP_END       "\r\n"
1245
1246     /* Prepare GET ... */
1247     if( psz_proxy != NULL )
1248     {
1249         snprintf( psz_buffer, sizeof(psz_buffer),
1250                   "GET http://%s:%d/%s HTTP/1.0\r\n"
1251                   HTTP_USERAGENT HTTP_END,
1252                   psz_server, i_port, psz_path );
1253     }
1254     else
1255     {
1256         snprintf( psz_buffer, sizeof(psz_buffer),
1257                   "GET /%s HTTP/1.0\r\nHost: %s\r\n"
1258                   HTTP_USERAGENT HTTP_END,
1259                   psz_path, psz_server );
1260     }
1261     psz_buffer[sizeof(psz_buffer) - 1] = '\0';
1262
1263     /* Send GET ... */
1264     if( write( p_input->i_handle, psz_buffer, strlen( psz_buffer ) ) == (-1) )
1265     {
1266         intf_ErrMsg( "input error: can't send request (%s)", strerror(errno) );
1267         close( p_input->i_handle );
1268         p_input->b_error = 1;
1269         return;
1270     }
1271
1272     /* Read HTTP header - this is gonna be fun with plug-ins which do not
1273      * use p_input->p_stream :-( */
1274     if( (p_input->p_stream = fdopen( p_input->i_handle, "r+" )) == NULL )
1275     {
1276         intf_ErrMsg( "input error: can't reopen socket (%s)", strerror(errno) );
1277         close( p_input->i_handle );
1278         p_input->b_error = 1;
1279         return;
1280     }
1281
1282     while( !feof( p_input->p_stream ) && !ferror( p_input->p_stream ) )
1283     {
1284         if( fgets( psz_buffer, sizeof(psz_buffer), p_input->p_stream ) == NULL
1285              || *psz_buffer == '\r' || *psz_buffer == '\0' )
1286         {
1287             break;
1288         }
1289         /* FIXME : check Content-Type one day */
1290     }
1291
1292     intf_WarnMsg( 3, "input: successfully opened HTTP mode" );
1293 }
1294
1295 #endif /* !defined( SYS_BEOS ) && !defined( SYS_NTO ) */
1296