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, 1999, 2000 VideoLAN
   7  * $Id: input.c,v 1.98 2001/04/15 04:19:58 sam 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 #include <unistd.h>
  36 #include <string.h>
  37 #include <errno.h>
  38
  39 /* Network functions */
  40
  41 #if !defined( SYS_BEOS ) && !defined( SYS_NTO )
  42 #include <netdb.h>                                             /* hostent ... */
  43 #include <sys/socket.h>
  44 #include <netinet/in.h>
  45 #include <arpa/inet.h>
  46 #include <sys/types.h>
  47 #include <sys/socket.h>
  48 #endif
  49
  50 #ifdef STATS
  51 #   include <sys/times.h>
  52 #endif
  53
  54 #include "config.h"
  55 #include "common.h"
  56 #include "threads.h"
  57 #include "mtime.h"
  58 #include "netutils.h"
  59 #include "modules.h"
  60
  61 #include "intf_msg.h"
  62 #include "intf_playlist.h"
  63
  64 #include "stream_control.h"
  65 #include "input_ext-intf.h"
  66 #include "input_ext-dec.h"
  67
  68 #include "input.h"
  69 #include "interface.h"
  70
  71 #include "main.h"
  72
  73  /* #include <netutils.h> */
  74
  75
  76 /*****************************************************************************
  77  * Local prototypes
  78  *****************************************************************************/
  79 static void RunThread       ( input_thread_t *p_input );
  80 static  int InitThread      ( input_thread_t *p_input );
  81 static void ErrorThread     ( input_thread_t *p_input );
  82 static void DestroyThread   ( input_thread_t *p_input );
  83 static void EndThread       ( input_thread_t *p_input );
  84
  85 /*****************************************************************************
  86  * input_CreateThread: creates a new input thread
  87  *****************************************************************************
  88  * This function creates a new input, and returns a pointer
  89  * to its description. On error, it returns NULL.
  90  * If pi_status is NULL, then the function will block until the thread is ready.
  91  * If not, it will be updated using one of the THREAD_* constants.
  92  *****************************************************************************/
  93 input_thread_t *input_CreateThread ( playlist_item_t *p_item, int *pi_status )
  94 {
  95     input_thread_t *    p_input;                        /* thread descriptor */
  96     int                 i_status;                           /* thread status */
  97
  98     /* Allocate descriptor */
  99     p_input = (input_thread_t *)malloc( sizeof(input_thread_t) );
 100     if( p_input == NULL )
 101     {
 102         intf_ErrMsg( "input error: can't allocate input thread (%s)",
 103                      strerror(errno) );
 104         return( NULL );
 105     }
 106
 107     /* Packets read once */
 108     p_input->i_read_once = INPUT_READ_ONCE;
 109
 110     /* Initialize thread properties */
 111     p_input->b_die              = 0;
 112     p_input->b_error            = 0;
 113     p_input->b_eof              = 0;
 114
 115     /* Set target */
 116     p_input->p_source           = p_item->psz_name;
 117
 118     /* I have never understood that stuff --Meuuh */
 119     p_input->pi_status          = (pi_status != NULL) ? pi_status : &i_status;
 120     *p_input->pi_status         = THREAD_CREATE;
 121
 122     /* Initialize stream description */
 123     p_input->stream.i_es_number = 0;
 124     p_input->stream.i_selected_es_number = 0;
 125     p_input->stream.i_pgrm_number = 0;
 126     p_input->stream.i_new_status = p_input->stream.i_new_rate = 0;
 127     p_input->stream.i_mux_rate = 0;
 128
 129     /* no stream, no area */
 130     p_input->stream.i_area_nb = 0;
 131     p_input->stream.pp_areas = NULL;
 132     p_input->stream.p_selected_area = NULL;
 133     /* By default there is one areas in a stream */
 134     input_AddArea( p_input );
 135     p_input->stream.p_selected_area = p_input->stream.pp_areas[0];
 136
 137     /* Initialize stream control properties. */
 138     p_input->stream.control.i_status = PLAYING_S;
 139     p_input->stream.control.i_rate = DEFAULT_RATE;
 140     p_input->stream.control.b_mute = 0;
 141     p_input->stream.control.b_bw = 0;
 142
 143     /* Initialize default settings for spawned decoders */
 144     p_input->p_default_aout = p_main->p_aout;
 145     p_input->p_default_vout = p_main->p_vout;
 146
 147     /* Create thread and set locks. */
 148     vlc_mutex_init( &p_input->stream.stream_lock );
 149     vlc_cond_init( &p_input->stream.stream_wait );
 150     vlc_mutex_init( &p_input->stream.control.control_lock );
 151     if( vlc_thread_create( &p_input->thread_id, "input", (void *) RunThread,
 152                            (void *) p_input ) )
 153     {
 154         intf_ErrMsg( "input error: can't create input thread (%s)",
 155                      strerror(errno) );
 156         free( p_input );
 157         return( NULL );
 158     }
 159
 160     /* If status is NULL, wait until the thread is created */
 161     if( pi_status == NULL )
 162     {
 163         do
 164         {
 165             msleep( THREAD_SLEEP );
 166         } while( (i_status != THREAD_READY) && (i_status != THREAD_ERROR)
 167                 && (i_status != THREAD_FATAL) );
 168         if( i_status != THREAD_READY )
 169         {
 170             return( NULL );
 171         }
 172     }
 173     return( p_input );
 174 }
 175
 176 /*****************************************************************************
 177  * input_DestroyThread: mark an input thread as zombie
 178  *****************************************************************************
 179  * This function should not return until the thread is effectively cancelled.
 180  *****************************************************************************/
 181 void input_DestroyThread( input_thread_t *p_input, int *pi_status )
 182 {
 183     int         i_status;                                   /* thread status */
 184
 185     /* Set status */
 186     p_input->pi_status = (pi_status != NULL) ? pi_status : &i_status;
 187     *p_input->pi_status = THREAD_DESTROY;
 188
 189     /* Request thread destruction */
 190     p_input->b_die = 1;
 191
 192     /* Make the thread exit of an eventual vlc_cond_wait() */
 193     vlc_mutex_lock( &p_input->stream.stream_lock );
 194     vlc_cond_signal( &p_input->stream.stream_wait );
 195     vlc_mutex_unlock( &p_input->stream.stream_lock );
 196
 197     /* If status is NULL, wait until thread has been destroyed */
 198     if( pi_status == NULL )
 199     {
 200         do
 201         {
 202             msleep( THREAD_SLEEP );
 203         } while ( (i_status != THREAD_OVER) && (i_status != THREAD_ERROR)
 204                   && (i_status != THREAD_FATAL) );
 205     }
 206 }
 207
 208 /*****************************************************************************
 209  * RunThread: main thread loop
 210  *****************************************************************************
 211  * Thread in charge of processing the network packets and demultiplexing.
 212  *****************************************************************************/
 213 static void RunThread( input_thread_t *p_input )
 214 {
 215     int                     i_error, i;
 216
 217     if( InitThread( p_input ) )
 218     {
 219
 220         /* If we failed, wait before we are killed, and exit */
 221         *p_input->pi_status = THREAD_ERROR;
 222         p_input->b_error = 1;
 223         ErrorThread( p_input );
 224         DestroyThread( p_input );
 225         return;
 226     }
 227
 228     while( !p_input->b_die && !p_input->b_error && !p_input->b_eof )
 229     {
 230         data_packet_t *         pp_packets[p_input->i_read_once];
 231
 232 #ifdef STATS
 233         p_input->c_loops++;
 234 #endif
 235
 236         vlc_mutex_lock( &p_input->stream.stream_lock );
 237
 238         if( p_input->stream.p_selected_area->i_seek != NO_SEEK )
 239         {
 240             if( p_input->stream.b_seekable && p_input->pf_seek != NULL )
 241             {
 242                 p_input->pf_seek( p_input,
 243                                   p_input->stream.p_selected_area->i_seek );
 244
 245                 for( i = 0; i < p_input->stream.i_pgrm_number; i++ )
 246                 {
 247                     pgrm_descriptor_t * p_pgrm
 248                                             = p_input->stream.pp_programs[i];
 249                     /* Escape all decoders for the stream discontinuity they
 250                      * will encounter. */
 251                     input_EscapeDiscontinuity( p_input, p_pgrm );
 252
 253                     /* Reinitialize synchro. */
 254                     p_pgrm->i_synchro_state = SYNCHRO_REINIT;
 255                 }
 256             }
 257             p_input->stream.p_selected_area->i_seek = NO_SEEK;
 258         }
 259
 260         vlc_mutex_unlock( &p_input->stream.stream_lock );
 261
 262         i_error = p_input->pf_read( p_input, pp_packets );
 263
 264         /* Demultiplex read packets. */
 265         for( i = 0; i < p_input->i_read_once && pp_packets[i] != NULL; i++ )
 266         {
 267             p_input->pf_demux( p_input, pp_packets[i] );
 268         }
 269
 270         if( i_error )
 271         {
 272             if( i_error == 1 )
 273             {
 274                 /* End of file - we do not set b_die because only the
 275                  * interface is allowed to do so. */
 276                 intf_WarnMsg( 1, "input: EOF reached" );
 277                 p_input->b_eof = 1;
 278             }
 279             else
 280             {
 281                 p_input->b_error = 1;
 282             }
 283         }
 284     }
 285
 286     if( p_input->b_error || p_input->b_eof )
 287     {
 288         ErrorThread( p_input );
 289     }
 290
 291     EndThread( p_input );
 292
 293     DestroyThread( p_input );
 294
 295     intf_DbgMsg("input: Thread end");
 296 }
 297
 298 /*****************************************************************************
 299  * InitThread: init the input Thread
 300  *****************************************************************************/
 301 static int InitThread( input_thread_t * p_input )
 302 {
 303
 304 #ifdef STATS
 305     /* Initialize statistics */
 306     p_input->c_loops                    = 0;
 307     p_input->c_bytes                    = 0;
 308     p_input->c_payload_bytes            = 0;
 309     p_input->c_packets_read             = 0;
 310     p_input->c_packets_trashed          = 0;
 311 #endif
 312
 313     p_input->p_input_module = module_Need( p_main->p_bank,
 314                                            MODULE_CAPABILITY_INPUT,
 315                                            (probedata_t *)p_input );
 316
 317     if( p_input->p_input_module == NULL )
 318     {
 319         intf_ErrMsg( "input error: no suitable input module for `%s'",
 320                      p_input->p_source );
 321         return( -1 );
 322     }
 323
 324 #define f p_input->p_input_module->p_functions->input.functions.input
 325     p_input->pf_init          = f.pf_init;
 326     p_input->pf_open          = f.pf_open;
 327     p_input->pf_close         = f.pf_close;
 328     p_input->pf_end           = f.pf_end;
 329     p_input->pf_read          = f.pf_read;
 330     p_input->pf_set_area      = f.pf_set_area;
 331     p_input->pf_demux         = f.pf_demux;
 332     p_input->pf_new_packet    = f.pf_new_packet;
 333     p_input->pf_new_pes       = f.pf_new_pes;
 334     p_input->pf_delete_packet = f.pf_delete_packet;
 335     p_input->pf_delete_pes    = f.pf_delete_pes;
 336     p_input->pf_rewind        = f.pf_rewind;
 337     p_input->pf_seek          = f.pf_seek;
 338 #undef f
 339     p_input->pf_open( p_input );
 340
 341     if( p_input->b_error )
 342     {
 343         /* We barfed -- exit nicely */
 344         p_input->pf_close( p_input );
 345         module_Unneed( p_main->p_bank, p_input->p_input_module );
 346         return( -1 );
 347     }
 348
 349     p_input->pf_init( p_input );
 350
 351     if( p_input->b_error )
 352     {
 353         /* We barfed -- exit nicely */
 354         p_input->pf_close( p_input );
 355         module_Unneed( p_main->p_bank, p_input->p_input_module );
 356         return( -1 );
 357     }
 358
 359     *p_input->pi_status = THREAD_READY;
 360
 361     return( 0 );
 362 }
 363
 364 /*****************************************************************************
 365  * ErrorThread: RunThread() error loop
 366  *****************************************************************************
 367  * This function is called when an error occured during thread main's loop.
 368  *****************************************************************************/
 369 static void ErrorThread( input_thread_t *p_input )
 370 {
 371     while( !p_input->b_die )
 372     {
 373         /* Sleep a while */
 374         msleep( INPUT_IDLE_SLEEP );
 375     }
 376 }
 377
 378 /*****************************************************************************
 379  * EndThread: end the input thread
 380  *****************************************************************************/
 381 static void EndThread( input_thread_t * p_input )
 382 {
 383     int *       pi_status;                                  /* thread status */
 384
 385     /* Store status */
 386     pi_status = p_input->pi_status;
 387     *pi_status = THREAD_END;
 388
 389 #ifdef STATS
 390     {
 391         struct tms cpu_usage;
 392         times( &cpu_usage );
 393
 394         intf_Msg("input stats: cpu usage (user: %d, system: %d)",
 395                  cpu_usage.tms_utime, cpu_usage.tms_stime);
 396     }
 397 #endif
 398
 399     /* Free all ES and destroy all decoder threads */
 400     input_EndStream( p_input );
 401
 402     /* Free demultiplexer's data */
 403     p_input->pf_end( p_input );
 404
 405     /* Close stream */
 406     p_input->pf_close( p_input );
 407
 408     /* Release modules */
 409     module_Unneed( p_main->p_bank, p_input->p_input_module );
 410
 411 }
 412
 413 /*****************************************************************************
 414  * DestroyThread: destroy the input thread
 415  *****************************************************************************/
 416 static void DestroyThread( input_thread_t * p_input )
 417 {
 418     int *       pi_status;                                  /* thread status */
 419
 420     /* Store status */
 421     pi_status = p_input->pi_status;
 422
 423     /* Destroy Mutex locks */
 424     vlc_mutex_destroy( &p_input->stream.control.control_lock );
 425     vlc_mutex_destroy( &p_input->stream.stream_lock );
 426
 427     /* Free input structure */
 428     free( p_input );
 429
 430     /* Update status */
 431     *pi_status = THREAD_OVER;
 432 }
 433
 434 /*****************************************************************************
 435  * input_FileOpen : open a file descriptor
 436  *****************************************************************************/
 437 void input_FileOpen( input_thread_t * p_input )
 438 {
 439     struct stat         stat_info;
 440     int                 i_stat;
 441
 442     char *psz_name = p_input->p_source;
 443
 444     /* FIXME: this code ought to be in the plugin so that code can
 445      * be shared with the *_Probe function */
 446     if( ( i_stat = stat( psz_name, &stat_info ) ) == (-1) )
 447     {
 448         int i_size = strlen( psz_name );
 449
 450         if( ( i_size > 4 )
 451             && !strncasecmp( psz_name, "dvd:", 4 ) )
 452         {
 453             /* get rid of the 'dvd:' stuff and try again */
 454             psz_name += 4;
 455             i_stat = stat( psz_name, &stat_info );
 456         }
 457         else if( ( i_size > 5 )
 458                  && !strncasecmp( psz_name, "file:", 5 ) )
 459         {
 460             /* get rid of the 'file:' stuff and try again */
 461             psz_name += 5;
 462             i_stat = stat( psz_name, &stat_info );
 463         }
 464
 465         if( i_stat == (-1) )
 466         {
 467             intf_ErrMsg( "input error: cannot stat() file `%s' (%s)",
 468                          psz_name, strerror(errno));
 469             p_input->b_error = 1;
 470             return;
 471         }
 472     }
 473
 474     vlc_mutex_lock( &p_input->stream.stream_lock );
 475
 476     /* If we are here we can control the pace... */
 477     p_input->stream.b_pace_control = 1;
 478
 479     if( S_ISREG(stat_info.st_mode) || S_ISCHR(stat_info.st_mode)
 480          || S_ISBLK(stat_info.st_mode) )
 481     {
 482         p_input->stream.b_seekable = 1;
 483         p_input->stream.p_selected_area->i_size = stat_info.st_size;
 484     }
 485     else if( S_ISFIFO(stat_info.st_mode)
 486 #ifndef SYS_BEOS
 487              || S_ISSOCK(stat_info.st_mode)
 488 #endif
 489              )
 490     {
 491         p_input->stream.b_seekable = 0;
 492         p_input->stream.p_selected_area->i_size = 0;
 493     }
 494     else
 495     {
 496         vlc_mutex_unlock( &p_input->stream.stream_lock );
 497         intf_ErrMsg( "input error: unknown file type for `%s'",
 498                      psz_name );
 499         p_input->b_error = 1;
 500         return;
 501     }
 502
 503     p_input->stream.p_selected_area->i_tell = 0;
 504     vlc_mutex_unlock( &p_input->stream.stream_lock );
 505
 506     intf_Msg( "input: opening %s", p_input->p_source );
 507     if( (p_input->i_handle = open( psz_name,
 508                                    /*O_NONBLOCK | O_LARGEFILE*/0 )) == (-1) )
 509     {
 510         intf_ErrMsg( "input error: cannot open file (%s)", strerror(errno) );
 511         p_input->b_error = 1;
 512         return;
 513     }
 514
 515 }
 516
 517 /*****************************************************************************
 518  * input_FileClose : close a file descriptor
 519  *****************************************************************************/
 520 void input_FileClose( input_thread_t * p_input )
 521 {
 522     intf_Msg( "input: closing %s", p_input->p_source );
 523     close( p_input->i_handle );
 524
 525     return;
 526 }
 527
 528
 529 #if !defined( SYS_BEOS ) && !defined( SYS_NTO )
 530 /*****************************************************************************
 531  * input_NetworkOpen : open a network socket
 532  *****************************************************************************/
 533 void input_NetworkOpen( input_thread_t * p_input )
 534 {
 535
 536     int                 i_option_value, i_port;
 537     struct sockaddr_in  s_socket;
 538     boolean_t           b_broadcast;
 539
 540     /* FIXME : we don't handle channels for the moment */
 541
 542     /* Get the remote server */
 543     if( p_input->p_source == NULL )
 544     {
 545         p_input->p_source = main_GetPszVariable( INPUT_SERVER_VAR,
 546                                                  INPUT_SERVER_DEFAULT );
 547     }
 548
 549     /* Open a SOCK_DGRAM (UDP) socket, in the AF_INET domain, automatic (0)
 550      * protocol */
 551     p_input->i_handle = socket( AF_INET, SOCK_DGRAM, 0 );
 552     if( p_input->i_handle == -1 )
 553     {
 554         intf_ErrMsg("NetworkOpen : can't create socket : %s", strerror(errno));
 555         p_input->b_error = 1;
 556         return;
 557     }
 558
 559     /* We may want to reuse an already used socket */
 560     i_option_value = 1;
 561     if( setsockopt( p_input->i_handle, SOL_SOCKET, SO_REUSEADDR,
 562                     &i_option_value,sizeof( i_option_value ) ) == -1 )
 563     {
 564         intf_ErrMsg("NetworkOpen : can't configure socket (SO_REUSEADDR: %s)",
 565                     strerror(errno));
 566         close( p_input->i_handle );
 567         p_input->b_error = 1;
 568         return;
 569     }
 570
 571     /* Increase the receive buffer size to 1/2MB (8Mb/s during 1/2s) to avoid
 572      * packet loss caused by scheduling problems */
 573     i_option_value = 524288;
 574     if( setsockopt( p_input->i_handle, SOL_SOCKET, SO_RCVBUF, &i_option_value,
 575                     sizeof( i_option_value ) ) == -1 )
 576     {
 577         intf_ErrMsg("NetworkOpen : can't configure socket (SO_RCVBUF: %s)",
 578                     strerror(errno));
 579         close( p_input->i_handle );
 580         p_input->b_error = 1;
 581         return;
 582     }
 583
 584     /* Get details about what we are supposed to do */
 585     b_broadcast = (boolean_t)main_GetIntVariable( INPUT_BROADCAST_VAR, 0 );
 586     i_port = main_GetIntVariable( INPUT_PORT_VAR, INPUT_PORT_DEFAULT );
 587
 588     /* TODO : here deal with channel stufs */
 589
 590     /* Build the local socket */
 591     if ( network_BuildLocalAddr( &s_socket, i_port, b_broadcast )
 592          == -1 )
 593     {
 594         close( p_input->i_handle );
 595         p_input->b_error = 1;
 596         return;
 597     }
 598
 599     /* Bind it */
 600     if( bind( p_input->i_handle, (struct sockaddr *)&s_socket,
 601               sizeof( s_socket ) ) < 0 )
 602     {
 603         intf_ErrMsg("NetworkOpen: can't bind socket (%s)", strerror(errno));
 604         close( p_input->i_handle );
 605         p_input->b_error = 1;
 606         return;
 607     }
 608
 609     /* Build socket for remote connection */
 610     if ( network_BuildRemoteAddr( &s_socket, p_input->p_source )
 611          == -1 )
 612     {
 613         close( p_input->i_handle );
 614         p_input->b_error = 1;
 615         return;
 616     }
 617
 618     /* And connect it ... should we really connect ? */
 619     if( connect( p_input->i_handle, (struct sockaddr *) &s_socket,
 620                  sizeof( s_socket ) ) == (-1) )
 621     {
 622         intf_ErrMsg("NetworkOpen: can't connect socket" );
 623         close( p_input->i_handle );
 624         p_input->b_error = 1;
 625         return;
 626     }
 627
 628     /* We can't pace control, but FIXME : bug in meuuh's code to sync PCR
 629      * with the server. */
 630     p_input->stream.b_pace_control = 1;
 631
 632     return;
 633 }
 634
 635 /*****************************************************************************
 636  * input_NetworkClose : close a network socket
 637  *****************************************************************************/
 638 void input_NetworkClose( input_thread_t * p_input )
 639 {
 640     close( p_input->i_handle );
 641     /* FIXME: deal with channels */
 642 }
 643 #endif