input.c 40.5 KB
Newer Older
1 2
/*****************************************************************************
 * input.c: input thread
Michel Kaempf's avatar
Michel Kaempf committed
3 4
 * Read an MPEG2 stream, demultiplex and parse it before sending it to
 * 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 12 13 14
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
15
 * 
16 17
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
18 19
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
20
 *
21 22 23
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
24
 *****************************************************************************/
Michel Kaempf's avatar
Michel Kaempf committed
25

26
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
27
 * Preamble
28
 *****************************************************************************/
29 30
#include "defs.h"

31 32 33 34
#include <stdlib.h>
#include <sys/types.h>
#include <sys/stat.h>
#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 41
#endif

42
#include <string.h>
43 44
#include <errno.h>

45 46 47
#ifdef STRNCASECMP_IN_STRINGS_H
#   include <strings.h>
#endif
48 49

#ifdef WIN32
50
#   include <winsock2.h>
51
#   include <ws2tcpip.h>
52 53 54 55
#elif !defined( SYS_BEOS ) && !defined( SYS_NTO )
#   include <netdb.h>                                         /* hostent ... */
#   include <sys/socket.h>
#   include <netinet/in.h>
56 57 58
#   ifdef HAVE_ARPA_INET_H
#       include <arpa/inet.h>                    /* inet_ntoa(), inet_aton() */
#   endif
59
#endif
60

61 62
#ifdef HAVE_SYS_TIMES_H
#   include <sys/times.h>
63
#endif
64

65
#include "common.h"
66
#include "intf_msg.h"
67
#include "threads.h"
Michel Kaempf's avatar
Michel Kaempf committed
68
#include "mtime.h"
69
#include "tests.h"
70
#include "netutils.h"
71
#include "modules.h"
72

73
#include "intf_playlist.h"
74

75 76 77
#include "stream_control.h"
#include "input_ext-intf.h"
#include "input_ext-dec.h"
78
#include "input_ext-plugins.h"
Michel Lespinasse's avatar
Yop,  
Michel Lespinasse committed
79

80 81
#include "interface.h"

82
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
83
 * Local prototypes
84
 *****************************************************************************/
85 86 87
static void RunThread       ( input_thread_t *p_input );
static  int InitThread      ( input_thread_t *p_input );
static void ErrorThread     ( input_thread_t *p_input );
88
static void CloseThread     ( input_thread_t *p_input );
89 90
static void DestroyThread   ( input_thread_t *p_input );
static void EndThread       ( input_thread_t *p_input );
Michel Kaempf's avatar
Michel Kaempf committed
91

92
static void FileOpen        ( input_thread_t *p_input );
Christophe Massiot's avatar
Christophe Massiot committed
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 105 106 107
 * This function creates a new input, and returns a pointer
 * to its description. On error, it returns NULL.
 * If pi_status is NULL, then the function will block until the thread is ready.
 * 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 )
Michel Kaempf's avatar
Michel Kaempf committed
110
{
111 112 113
    input_thread_t *    p_input;                        /* thread descriptor */
    int                 i_status;                           /* thread status */

114 115 116
    /* Allocate descriptor */
    p_input = (input_thread_t *)malloc( sizeof(input_thread_t) );
    if( p_input == NULL )
Michel Kaempf's avatar
Michel Kaempf committed
117
    {
118 119
        intf_ErrMsg( "input error: can't allocate input thread (%s)",
                     strerror(errno) );
Michel Kaempf's avatar
Michel Kaempf committed
120 121
        return( NULL );
    }
122 123 124 125

    /* Initialize thread properties */
    p_input->b_die              = 0;
    p_input->b_error            = 0;
126 127 128 129 130
    p_input->b_eof              = 0;

    /* Set target */
    p_input->p_source           = p_item->psz_name;

131
    /* I have never understood that stuff --Meuuh */
132 133
    p_input->pi_status          = (pi_status != NULL) ? pi_status : &i_status;
    *p_input->pi_status         = THREAD_CREATE;
Michel Kaempf's avatar
Michel Kaempf committed
134

135
    /* Initialize stream description */
136 137
    p_input->stream.i_es_number = 0;
    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;
Christophe Massiot's avatar
Christophe Massiot committed
141
    p_input->stream.i_mux_rate = 0;
Michel Kaempf's avatar
Michel Kaempf committed
142

143
    /* no stream, no area */
144 145
    p_input->stream.i_area_nb = 0;
    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 154 155 156
    /* Initialize stream control properties. */
    p_input->stream.control.i_status = PLAYING_S;
    p_input->stream.control.i_rate = DEFAULT_RATE;
    p_input->stream.control.b_mute = 0;
157 158 159 160
    p_input->stream.control.b_grayscale = main_GetIntVariable(
                            VOUT_GRAYSCALE_VAR, VOUT_GRAYSCALE_DEFAULT );
    p_input->stream.control.i_smp = main_GetIntVariable(
                            VDEC_SMP_VAR, VDEC_SMP_DEFAULT );
Michel Kaempf's avatar
Michel Kaempf committed
161

162 163
    intf_WarnMsg( 1, "input: playlist item `%s'", p_input->p_source );

164
    /* Create thread. */
165 166
    if( vlc_thread_create( &p_input->thread_id, "input", (void *) RunThread,
                           (void *) p_input ) )
Michel Kaempf's avatar
Michel Kaempf committed
167
    {
168 169
        intf_ErrMsg( "input error: can't create input thread (%s)",
                     strerror(errno) );
Michel Kaempf's avatar
Michel Kaempf committed
170 171 172
        free( p_input );
        return( NULL );
    }
173

174 175 176 177
    /* If status is NULL, wait until the thread is created */
    if( pi_status == NULL )
    {
        do
178
        {
179
            msleep( THREAD_SLEEP );
180
        } while( (i_status != THREAD_READY) && (i_status != THREAD_ERROR)
181
                && (i_status != THREAD_FATAL) );
182 183
        if( i_status != THREAD_READY )
        {
184 185
            return( NULL );
        }
186
    }
Michel Kaempf's avatar
Michel Kaempf committed
187 188 189
    return( p_input );
}

190
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
191
 * input_DestroyThread: mark an input thread as zombie
192
 *****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
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 )
Michel Kaempf's avatar
Michel Kaempf committed
196
{
197
    int         i_status;                                   /* thread status */
198 199 200

    /* Set status */
    p_input->pi_status = (pi_status != NULL) ? pi_status : &i_status;
201 202
    *p_input->pi_status = THREAD_DESTROY;

203 204
    /* Request thread destruction */
    p_input->b_die = 1;
Michel Kaempf's avatar
Michel Kaempf committed
205

206 207 208 209 210
    /* Make the thread exit of an eventual vlc_cond_wait() */
    vlc_mutex_lock( &p_input->stream.stream_lock );
    vlc_cond_signal( &p_input->stream.stream_wait );
    vlc_mutex_unlock( &p_input->stream.stream_lock );

211 212 213 214 215 216
    /* If status is NULL, wait until thread has been destroyed */
    if( pi_status == NULL )
    {
        do
        {
            msleep( THREAD_SLEEP );
217 218
        } while ( (i_status != THREAD_OVER) && (i_status != THREAD_ERROR)
                  && (i_status != THREAD_FATAL) );
219
    }
Michel Kaempf's avatar
Michel Kaempf committed
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 )
Michel Kaempf's avatar
Michel Kaempf committed
228
{
229 230 231 232 233 234 235 236 237
    if( InitThread( p_input ) )
    {
        /* If we failed, wait before we are killed, and exit */
        *p_input->pi_status = THREAD_ERROR;
        p_input->b_error = 1;
        ErrorThread( p_input );
        DestroyThread( p_input );
        return;
    }
Michel Kaempf's avatar
Michel Kaempf committed
238

239
    /* initialization is complete */
240 241 242 243
    vlc_mutex_lock( &p_input->stream.stream_lock );
    p_input->stream.b_changed = 1;
    vlc_mutex_unlock( &p_input->stream.stream_lock );

244 245
    while( !p_input->b_die && !p_input->b_error && !p_input->b_eof )
    {
246 247 248
        data_packet_t * p_data;
        int i_count, i;

249
        p_input->c_loops++;
250

251
        vlc_mutex_lock( &p_input->stream.stream_lock );
252

253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275
        if( p_input->stream.p_new_program )
        {
            if( p_input->pf_set_program != NULL )
            {

                p_input->pf_set_program( p_input, 
                        p_input->stream.p_new_program );

                for( i = 0; i < p_input->stream.i_pgrm_number; i++ )
                {
                    pgrm_descriptor_t * p_pgrm
                                            = p_input->stream.pp_programs[i];
                    /* Escape all decoders for the stream discontinuity they
                     * will encounter. */
                    input_EscapeDiscontinuity( p_input, p_pgrm );

                    /* Reinitialize synchro. */
                    p_pgrm->i_synchro_state = SYNCHRO_REINIT;
                }
            }
            p_input->stream.p_new_program = NULL;
        }
        
276 277
        if( p_input->stream.p_new_area )
        {
278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294
            if( p_input->stream.b_seekable && p_input->pf_set_area != NULL )
            {

                p_input->pf_set_area( p_input, p_input->stream.p_new_area );

                for( i = 0; i < p_input->stream.i_pgrm_number; i++ )
                {
                    pgrm_descriptor_t * p_pgrm
                                            = p_input->stream.pp_programs[i];
                    /* Escape all decoders for the stream discontinuity they
                     * will encounter. */
                    input_EscapeDiscontinuity( p_input, p_pgrm );

                    /* Reinitialize synchro. */
                    p_pgrm->i_synchro_state = SYNCHRO_REINIT;
                }
            }
295 296 297
            p_input->stream.p_new_area = NULL;
        }

298
        if( p_input->stream.p_selected_area->i_seek != NO_SEEK )
299
        {
300 301
            if( p_input->stream.b_seekable && p_input->pf_seek != NULL )
            {
302 303
                p_input->pf_seek( p_input,
                                  p_input->stream.p_selected_area->i_seek );
304 305 306 307 308 309 310 311 312 313 314 315 316

                for( i = 0; i < p_input->stream.i_pgrm_number; i++ )
                {
                    pgrm_descriptor_t * p_pgrm
                                            = p_input->stream.pp_programs[i];
                    /* Escape all decoders for the stream discontinuity they
                     * will encounter. */
                    input_EscapeDiscontinuity( p_input, p_pgrm );

                    /* Reinitialize synchro. */
                    p_pgrm->i_synchro_state = SYNCHRO_REINIT;
                }
            }
317
            p_input->stream.p_selected_area->i_seek = NO_SEEK;
318
        }
319

320 321 322 323 324 325 326 327 328 329 330 331
        if( p_input->stream.p_removed_es )
        {
            input_UnselectES( p_input, p_input->stream.p_removed_es );
            p_input->stream.p_removed_es = NULL;
        }

        if( p_input->stream.p_newly_selected_es )
        {
            input_SelectES( p_input, p_input->stream.p_newly_selected_es );
            p_input->stream.p_newly_selected_es = NULL;
        }

332 333 334 335 336 337 338 339 340 341 342 343 344 345
        if( p_input->stream.b_new_mute != MUTE_NO_CHANGE )
        {
            if( p_input->stream.b_new_mute )
            {
                input_EscapeAudioDiscontinuity( p_input );
            }

            vlc_mutex_lock( &p_input->stream.control.control_lock );
            p_input->stream.control.b_mute = p_input->stream.b_new_mute;
            vlc_mutex_unlock( &p_input->stream.control.control_lock );

            p_input->stream.b_new_mute = MUTE_NO_CHANGE;
        }

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 354 355
            data_packet_t * p_next = p_data->p_next;
            p_data->p_next = NULL;

356
            p_input->stream.c_packets_read++;
357 358 359
            p_input->pf_demux( p_input, p_data );

            p_data = p_next;
360
        }
361

362
        if( i_count == 0 && p_input->stream.b_seekable )
363
        {
364 365 366 367 368 369 370 371
            /* End of file - we do not set b_die because only the
             * interface is allowed to do so. */
            intf_WarnMsg( 3, "input: EOF reached" );
            p_input->b_eof = 1;
        }
        else if( i_count < 0 )
        {
            p_input->b_error = 1;
372 373 374
        }
    }

375
    if( p_input->b_error || p_input->b_eof )
376 377 378
    {
        ErrorThread( p_input );
    }
379

380
    EndThread( p_input );
381 382 383

    DestroyThread( p_input );

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 )
Michel Kaempf's avatar
Michel Kaempf committed
391 392
{

393 394
    /* Initialize statistics */
    p_input->c_loops                    = 0;
395 396
    p_input->stream.c_packets_read      = 0;
    p_input->stream.c_packets_trashed   = 0;
397
    p_input->p_stream                   = NULL;
398

399 400 401 402 403
    /* Set locks. */
    vlc_mutex_init( &p_input->stream.stream_lock );
    vlc_cond_init( &p_input->stream.stream_wait );
    vlc_mutex_init( &p_input->stream.control.control_lock );

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 411
        intf_ErrMsg( "input error: no suitable input module for `%s'",
                     p_input->p_source );
412
        return( -1 );
Michel Kaempf's avatar
Michel Kaempf committed
413
    }
414

415 416 417
#define f p_input->p_input_module->p_functions->input.functions.input
    p_input->pf_init          = f.pf_init;
    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 423 424 425 426 427 428
    p_input->pf_demux         = f.pf_demux;
    p_input->pf_new_packet    = f.pf_new_packet;
    p_input->pf_new_pes       = f.pf_new_pes;
    p_input->pf_delete_packet = f.pf_delete_packet;
    p_input->pf_delete_pes    = f.pf_delete_pes;
    p_input->pf_rewind        = f.pf_rewind;
    p_input->pf_seek          = f.pf_seek;
429

430
#if !defined( SYS_BEOS ) && !defined( SYS_NTO )
431
    /* FIXME : this is waaaay too kludgy */
432 433 434 435
    if( ( strlen( p_input->p_source ) >= 10
          && !strncasecmp( p_input->p_source, "udpstream:", 10 ) )
          || ( strlen( p_input->p_source ) >= 4
                && !strncasecmp( p_input->p_source, "udp:", 4 ) ) )
436 437 438 439 440
    {
        /* Network stream */
        NetworkOpen( p_input );
        p_input->stream.i_method = INPUT_METHOD_NETWORK;
    }
441 442
    else if( ( strlen( p_input->p_source ) > 5 )
               && !strncasecmp( p_input->p_source, "http:", 5 ) )
443 444 445 446 447
    {
        /* HTTP stream */
        HTTPOpen( p_input );
        p_input->stream.i_method = INPUT_METHOD_NETWORK;
    }
448 449
    else 
#endif
450 451 452 453
        if( ( ( ( strlen( p_input->p_source ) > 4 )
                  && !strncasecmp( p_input->p_source, "dvd:", 4 ) )
              || TestMethod( INPUT_METHOD_VAR, "dvd" ) ) 
             && f.pf_open != NULL )
454 455
    {
        /* DVD - this is THE kludge */
456
        f.pf_open( p_input );
457 458
        p_input->stream.i_method = INPUT_METHOD_DVD;
    }
459 460 461 462
    else if( ( ( ( strlen( p_input->p_source ) > 8 )
                   && !strncasecmp( p_input->p_source, "dvdread:", 8 ) )
                || TestMethod( INPUT_METHOD_VAR, "dvdread" ) )
             && f.pf_open != NULL )
Stéphane Borel's avatar
Stéphane Borel committed
463 464 465 466 467
    {
        /* DVDRead - this is THE kludge */
        f.pf_open( p_input );
        p_input->stream.i_method = INPUT_METHOD_DVD;
    }
468
    else if( ( strlen( p_input->p_source ) > 4 )
469 470
               && !strncasecmp( p_input->p_source, "vlc:", 4 )
               && f.pf_open != NULL )
471 472
    {
        /* Dummy input - very kludgy */
473
        f.pf_open( p_input );
474
    }
475 476
    else if( ( strlen( p_input->p_source ) == 1 )
               && *p_input->p_source == '-' )
Christophe Massiot's avatar
Christophe Massiot committed
477 478 479 480
    {
        /* Stdin */
        StdOpen( p_input );
    }
481 482 483 484 485 486
    else
    {
        /* File input */
        FileOpen( p_input );
        p_input->stream.i_method = INPUT_METHOD_FILE;
    }
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 499 500
    if( p_input->b_error )
    {
        /* We barfed -- exit nicely */
501
        CloseThread( p_input );
502
        module_Unneed( p_input->p_input_module );
503 504 505
        return( -1 );
    }

506
    *p_input->pi_status = THREAD_READY;
507 508

    return( 0 );
Michel Kaempf's avatar
Michel Kaempf committed
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 )
Michel Kaempf's avatar
Michel Kaempf committed
517
{
518
    while( !p_input->b_die )
Michel Kaempf's avatar
Michel Kaempf committed
519
    {
520 521
        /* Sleep a while */
        msleep( INPUT_IDLE_SLEEP );
Michel Kaempf's avatar
Michel Kaempf committed
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 533 534
    /* Store status */
    pi_status = p_input->pi_status;
    *pi_status = THREAD_END;
535

536
    if( p_main->b_stats )
537
    {
538
#ifdef HAVE_SYS_TIMES_H
539 540
        /* Display statistics */
        struct tms  cpu_usage;
541 542
        times( &cpu_usage );

543 544 545
        intf_StatMsg( "input stats: %d loops consuming user: %d, system: %d",
                      p_input->c_loops,
                      cpu_usage.tms_utime, cpu_usage.tms_stime );
546 547 548
#else
        intf_StatMsg( "input stats: %d loops", p_input->c_loops );
#endif
549 550

        input_DumpStream( p_input );
551 552 553 554 555 556 557 558
    }

    /* Free all ES and destroy all decoder threads */
    input_EndStream( p_input );

    /* Free demultiplexer's data */
    p_input->pf_end( p_input );

559 560 561 562 563 564 565 566 567 568 569 570 571 572
    /* Close the input method */
    CloseThread( p_input );

    /* Release modules */
    module_Unneed( p_input->p_input_module );
}

/*****************************************************************************
 * CloseThread: close the target
 *****************************************************************************/
static void CloseThread( input_thread_t * p_input )
{
#define f p_input->p_input_module->p_functions->input.functions.input

573
#if !defined( SYS_BEOS ) && !defined( SYS_NTO )
574
    /* Close stream */
575 576 577 578
    if( ( strlen( p_input->p_source ) > 10
          && !strncasecmp( p_input->p_source, "udpstream:", 10 ) )
          || ( strlen( p_input->p_source ) > 4
                && !strncasecmp( p_input->p_source, "udp:", 4 ) ) )
579 580 581
    {
        NetworkClose( p_input );
    }
582 583
    else if( ( strlen( p_input->p_source ) > 5 )
               && !strncasecmp( p_input->p_source, "http:", 5 ) )
584 585 586
    {
        NetworkClose( p_input );
    }
587 588
    else 
#endif
589 590 591
    if( ( ( strlen( p_input->p_source ) > 4 )
            && !strncasecmp( p_input->p_source, "dvd:", 4 ) )
        || TestMethod( INPUT_METHOD_VAR, "dvd" ) )
592
    {
593
        f.pf_close( p_input );
594
    }
595 596 597 598 599 600
    else if( ( ( strlen( p_input->p_source ) > 8 )
                 && !strncasecmp( p_input->p_source, "dvdread:", 8 ) )
             || TestMethod( INPUT_METHOD_VAR, "dvdread" ) )
    {
        f.pf_close( p_input );
    }
601 602
    else if( ( strlen( p_input->p_source ) > 4 )
               && !strncasecmp( p_input->p_source, "vlc:", 4 ) )
603
    {
604
        f.pf_close( p_input );
605
    }
606 607 608 609
    else
    {
        FileClose( p_input );
    }
610
#undef f
611 612 613 614 615 616 617 618 619 620 621
}

/*****************************************************************************
 * DestroyThread: destroy the input thread
 *****************************************************************************/
static void DestroyThread( input_thread_t * p_input )
{
    int *       pi_status;                                  /* thread status */

    /* Store status */
    pi_status = p_input->pi_status;
622

623 624
    /* Destroy Mutex locks */
    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 631
    /* Update status */
    *pi_status = THREAD_OVER;
632
}
633

Christophe Massiot's avatar
Christophe Massiot committed
634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652
/*****************************************************************************
 * StdOpen : open standard input
 *****************************************************************************/
static void StdOpen( input_thread_t * p_input )
{
    vlc_mutex_lock( &p_input->stream.stream_lock );

    /* Suppose we can control the pace - this won't work in some cases ! */
    p_input->stream.b_pace_control = 1;

    p_input->stream.b_seekable = 0;
    p_input->stream.p_selected_area->i_size = 0;
    p_input->stream.p_selected_area->i_tell = 0;
    vlc_mutex_unlock( &p_input->stream.stream_lock );

    intf_WarnMsg( 2, "input: opening stdin" );
    p_input->i_handle = 0;
}

653
/*****************************************************************************
654
 * FileOpen : open a file descriptor
655
 *****************************************************************************/
656
static void FileOpen( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
657
{
658
    struct stat         stat_info;
659 660 661
    int                 i_stat;

    char *psz_name = p_input->p_source;
Michel Kaempf's avatar
Michel Kaempf committed
662

663
    if( ( i_stat = stat( psz_name, &stat_info ) ) == (-1) )
664
    {
665 666
        int i_size = strlen( psz_name );

Stéphane Borel's avatar
Stéphane Borel committed
667 668 669 670 671 672 673
        if( ( i_size > 8 )
            && !strncasecmp( psz_name, "dvdread:", 8 ) )
        {
            /* get rid of the 'dvdread:' stuff and try again */
            psz_name += 8;
            i_stat = stat( psz_name, &stat_info );
        }
674
        else if( ( i_size > 4 )
675 676 677 678 679
            && !strncasecmp( psz_name, "dvd:", 4 ) )
        {
            /* get rid of the 'dvd:' stuff and try again */
            psz_name += 4;
            i_stat = stat( psz_name, &stat_info );
680
        }
681 682
        else if( ( i_size > 4 )
                 && !strncasecmp( psz_name, "vcd:", 4 ) )
683 684 685 686 687
        {
            /* get rid of the 'vcd:' stuff and try again */
            psz_name += 4;
            i_stat = stat( psz_name, &stat_info );
        }
688
        else if( ( i_size > 5 )
689 690 691 692 693
                 && !strncasecmp( psz_name, "file:", 5 ) )
        {
            /* get rid of the 'file:' stuff and try again */
            psz_name += 5;
            i_stat = stat( psz_name, &stat_info );
694
        }
695

696
        if( i_stat == (-1) )
697 698 699 700 701 702
        {
            intf_ErrMsg( "input error: cannot stat() file `%s' (%s)",
                         psz_name, strerror(errno));
            p_input->b_error = 1;
            return;
        }
703 704 705 706 707 708 709 710
    }

    vlc_mutex_lock( &p_input->stream.stream_lock );

    /* If we are here we can control the pace... */
    p_input->stream.b_pace_control = 1;

    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 719 720
             || S_ISSOCK(stat_info.st_mode)
#endif
             )
721
    {
722
        p_input->stream.b_seekable = 0;
723
        p_input->stream.p_selected_area->i_size = 0;
Benoit Steiner's avatar
Benoit Steiner committed
724 725 726
    }
    else
    {
727
        vlc_mutex_unlock( &p_input->stream.stream_lock );
728
        intf_ErrMsg( "input error: unknown file type for `%s'",
729
                     psz_name );
730 731 732
        p_input->b_error = 1;
        return;
    }
733

734
    p_input->stream.p_selected_area->i_tell = 0;
735 736
    vlc_mutex_unlock( &p_input->stream.stream_lock );

737
    intf_WarnMsg( 2, "input: opening file `%s'", p_input->p_source );
738
    if( (p_input->i_handle = open( psz_name,
739 740
                                   /*O_NONBLOCK | O_LARGEFILE*/0 )) == (-1) )
    {
741
        intf_ErrMsg( "input error: cannot open file (%s)", strerror(errno) );
742 743
        p_input->b_error = 1;
        return;
Michel Kaempf's avatar
Michel Kaempf committed
744 745 746
    }

}
Stéphane Borel's avatar
Stéphane Borel committed
747 748

/*****************************************************************************
749
 * FileClose : close a file descriptor
Stéphane Borel's avatar
Stéphane Borel committed
750
 *****************************************************************************/
751
static void FileClose( input_thread_t * p_input )
Stéphane Borel's avatar
Stéphane Borel committed
752
{
753
    intf_WarnMsg( 2, "input: closing file `%s'", p_input->p_source );
754

755
    close( p_input->i_handle );
Stéphane Borel's avatar
Stéphane Borel committed
756

757
    return;
Stéphane Borel's avatar
Stéphane Borel committed
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 768 769
    char                *psz_bind = NULL;
    int                 i_server_port = 0;
    int                 i_bind_port = 0;
770
    int                 i_opt;
771
    int                 i_opt_size;
772
    struct sockaddr_in  sock;
773

774 775
    /* Get the remote server. Syntax is :
     * udp[stream]:[/][/][serveraddr[:serverport]][@[bindaddr]:[bindport]] */
776 777
    if( p_input->p_source != NULL )
    {
778 779 780
        char * psz_parser = p_input->p_source;
        char * psz_server_port = NULL;
        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 797
            /* Found server */
            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 807 808 809
                /* Found server port */
                *psz_parser = '\0'; /* Terminate server name */
                psz_parser++;
                psz_server_port = psz_parser;
810

811
                while( *psz_parser && *psz_parser != '@' )
812
                {
813
                    psz_parser++;
814
                }
815 816
            }
        }
817

818 819 820 821 822 823 824 825 826 827 828 829
        if( *psz_parser == '@' )
        {
            /* Found bind address or bind port */
            *psz_parser = '\0'; /* Terminate server port or name if necessary */
            psz_parser++;

            if( *psz_parser && *psz_parser != ':' )
            {
                /* Found bind address */
                psz_bind = psz_parser;

                while( *psz_parser && *psz_parser != ':' )
830
                {
831
                    psz_parser++;
832
                }
833
            }
834 835 836 837 838 839 840 841 842

            if( *psz_parser == ':' )
            {
                /* Found bind port */
                *psz_parser = '\0'; /* Terminate bind address if necessary */
                psz_parser++;

                psz_bind_port = psz_parser;
            }
843
        }
844 845 846

        /* Convert ports format */
        if( psz_server_port != NULL )
847
        {
848 849 850 851 852 853 854 855 856 857 858 859 860 861 862 863 864 865 866 867
            i_server_port = strtol( psz_server_port, &psz_parser, 10 );
            if( *psz_parser )
            {
                intf_ErrMsg( "input error: cannot parse server port near %s",
                             psz_parser );
                p_input->b_error = 1;
                return;
            }
        }

        if( psz_bind_port != NULL )
        {
            i_bind_port = strtol( psz_bind_port, &psz_parser, 10 );
            if( *psz_parser )
            {
                intf_ErrMsg( "input error: cannot parse bind port near %s",
                             psz_parser );
                p_input->b_error = 1;
                return;
            }
868 869
        }
    }
870 871 872 873 874
    else
    {
        /* This is required or NetworkClose will never be called */
        p_input->p_source = "ts: network input";
    }
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 883
    intf_WarnMsg( 2, "input: server=%s:%d local=%s:%d",
                     psz_server, i_server_port, psz_bind, i_bind_port );
884

885 886 887 888 889
    /* Open a SOCK_DGRAM (UDP) socket, in the AF_INET domain, automatic (0)
     * protocol */
    p_input->i_handle = socket( AF_INET, SOCK_DGRAM, 0 );
    if( p_input->i_handle == -1 )
    {
890
        intf_ErrMsg( "input error: can't create socket (%s)", strerror(errno) );
891 892 893 894 895
        p_input->b_error = 1;
        return;
    }

    /* 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 901
        intf_ErrMsg( "input error: can't configure socket (SO_REUSEADDR: %s)",
                     strerror(errno));
902 903 904 905 906 907 908
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }

    /* Increase the receive buffer size to 1/2MB (8Mb/s during 1/2s) to avoid
     * packet loss caused by scheduling problems */
909 910
    i_opt = 0x80000;
    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 918 919 920 921 922 923 924
    /* Check if we really got what we have asked for, because Linux, etc.
     * will silently limit the max buffer size to net.core.rmem_max which
     * is typically only 65535 bytes */
    i_opt = 0;
    i_opt_size = sizeof( i_opt );
    if( getsockopt( p_input->i_handle, SOL_SOCKET, SO_RCVBUF,
                    (void*) &i_opt, &i_opt_size ) == -1 )
    {
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 931
        intf_WarnMsg( 1, "input warning: socket buffer size is 0x%x"
                         " 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 939 940 941
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }
942

943
    /* Bind it */
944 945
    if( bind( p_input->i_handle, (struct sockaddr *)&sock, 
              sizeof( sock ) ) < 0 )
946
    {
947
        intf_ErrMsg( "input error: can't bind socket (%s)", strerror(errno) );
948 949 950 951 952
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }

953 954 955 956 957 958 959 960 961 962 963
    /* Allow broadcast reception if we bound on INADDR_ANY */
    if( psz_bind == NULL )
    {
        i_opt = 1;
        if( setsockopt( p_input->i_handle, SOL_SOCKET, SO_BROADCAST,
                        (void*) &i_opt, sizeof( i_opt ) ) == -1 )
        {
            intf_WarnMsg( 1, "input warning: can't configure socket (SO_BROADCAST: %s)", 
                             strerror(errno));
        }
    }
964

965 966
    /* Join the multicast group if the socket is a multicast address */
#ifndef IN_MULTICAST
967 968 969 970
#   define IN_MULTICAST(a)         IN_CLASSD(a)
#endif

    if( IN_MULTICAST( ntohl(sock.sin_addr.s_addr) ) )
971 972 973
    {
        struct ip_mreq imr;

974 975
        imr.imr_interface.s_addr = INADDR_ANY;
        imr.imr_multiaddr.s_addr = sock.sin_addr.s_addr;
976
        if( setsockopt( p_input->i_handle, IPPROTO_IP, IP_ADD_MEMBERSHIP,
977 978 979 980
                        (char*)&imr, sizeof(struct ip_mreq) ) == -1 )
        {
            intf_ErrMsg( "input error: failed to join IP multicast group (%s)",
                         strerror(errno) );
981
            close( p_input->i_handle );
982 983 984 985
            p_input->b_error = 1;
            return;
        }
    }
986
    
987
    if( psz_server != NULL )
988
    {
989 990 991 992 993 994 995 996
        /* Build socket for remote connection */
        if ( network_BuildAddr( &sock, psz_server, i_server_port ) == -1 )
        {
            intf_ErrMsg( "input error: can't build remote address" );
            close( p_input->i_handle );
            p_input->b_error = 1;
            return;
        }
997

998 999 1000 1001 1002 1003 1004 1005 1006 1007
        /* Connect the socket */
        if( connect( p_input->i_handle, (struct sockaddr *) &sock,
                     sizeof( sock