input.c 26.4 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, 1999, 2000 VideoLAN
7
 * $Id: input.c,v 1.128 2001/08/05 15:32:46 gbazin 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 51 52 53 54 55 56 57
#   include <winsock2.h>
#elif !defined( SYS_BEOS ) && !defined( SYS_NTO )
#   include <netdb.h>                                         /* hostent ... */
#   include <sys/socket.h>
#   include <netinet/in.h>
#   include <arpa/inet.h>
#   include <sys/types.h>
#   include <sys/socket.h>
58
#endif
59

60 61 62 63
#ifdef STATS
#   include <sys/times.h>
#endif

Michel Kaempf's avatar
Michel Kaempf committed
64
#include "config.h"
65 66
#include "common.h"
#include "threads.h"
Michel Kaempf's avatar
Michel Kaempf committed
67
#include "mtime.h"
68
#include "netutils.h"
69
#include "modules.h"
70

71
#include "intf_msg.h"
72
#include "intf_playlist.h"
73

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

79 80 81
#include "interface.h"

#include "main.h"
Michel Kaempf's avatar
Michel Kaempf committed
82

83
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
84
 * Local prototypes
85
 *****************************************************************************/
86 87 88 89 90
static void RunThread       ( input_thread_t *p_input );
static  int InitThread      ( input_thread_t *p_input );
static void ErrorThread     ( input_thread_t *p_input );
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 93
static void FileOpen        ( input_thread_t *p_input );
static void FileClose       ( input_thread_t *p_input );
94
#if !defined( SYS_BEOS ) && !defined( SYS_NTO )
95 96
static void NetworkOpen     ( input_thread_t *p_input );
static void NetworkClose    ( input_thread_t *p_input );
97
#endif
98

99
/*****************************************************************************
100
 * input_CreateThread: creates a new input thread
101
 *****************************************************************************
102 103 104 105
 * 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.
106
 *****************************************************************************/
107
input_thread_t *input_CreateThread ( playlist_item_t *p_item, int *pi_status )
Michel Kaempf's avatar
Michel Kaempf committed
108
{
109 110 111
    input_thread_t *    p_input;                        /* thread descriptor */
    int                 i_status;                           /* thread status */

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

121 122 123
    /* Packets read once */
    p_input->i_read_once = INPUT_READ_ONCE;

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

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

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

136
    /* Initialize stream description */
137 138
    p_input->stream.i_es_number = 0;
    p_input->stream.i_selected_es_number = 0;
139
    p_input->stream.i_pgrm_number = 0;
140
    p_input->stream.i_new_status = p_input->stream.i_new_rate = 0;
141
    p_input->stream.b_new_mute = MUTE_NO_CHANGE;
Christophe Massiot's avatar
Christophe Massiot committed
142
    p_input->stream.i_mux_rate = 0;
Michel Kaempf's avatar
Michel Kaempf committed
143

144
    /* no stream, no area */
145 146
    p_input->stream.i_area_nb = 0;
    p_input->stream.pp_areas = NULL;
147
    p_input->stream.p_selected_area = NULL;
148
    p_input->stream.p_new_area = NULL;
149 150

    /* By default there is one area in a stream */
151
    input_AddArea( p_input );
152
    p_input->stream.p_selected_area = p_input->stream.pp_areas[0];
153

154 155 156 157
    /* 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;
158 159 160 161
    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
162

163 164 165 166 167 168 169 170
    /* Setup callbacks */
    p_input->pf_file_open     = FileOpen;
    p_input->pf_file_close    = FileClose;
#if !defined( SYS_BEOS ) && !defined( SYS_NTO )
    p_input->pf_network_open  = NetworkOpen;
    p_input->pf_network_close = NetworkClose;
#endif

171
    /* Create thread. */
172 173
    if( vlc_thread_create( &p_input->thread_id, "input", (void *) RunThread,
                           (void *) p_input ) )
Michel Kaempf's avatar
Michel Kaempf committed
174
    {
175 176
        intf_ErrMsg( "input error: can't create input thread (%s)",
                     strerror(errno) );
Michel Kaempf's avatar
Michel Kaempf committed
177 178 179
        free( p_input );
        return( NULL );
    }
180

181 182 183 184
    /* If status is NULL, wait until the thread is created */
    if( pi_status == NULL )
    {
        do
185
        {
186
            msleep( THREAD_SLEEP );
187
        } while( (i_status != THREAD_READY) && (i_status != THREAD_ERROR)
188
                && (i_status != THREAD_FATAL) );
189 190
        if( i_status != THREAD_READY )
        {
191 192
            return( NULL );
        }
193
    }
Michel Kaempf's avatar
Michel Kaempf committed
194 195 196
    return( p_input );
}

197
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
198
 * input_DestroyThread: mark an input thread as zombie
199
 *****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
200
 * This function should not return until the thread is effectively cancelled.
201
 *****************************************************************************/
202
void input_DestroyThread( input_thread_t *p_input, int *pi_status )
Michel Kaempf's avatar
Michel Kaempf committed
203
{
204
    int         i_status;                                   /* thread status */
205 206 207

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

210 211
    /* Request thread destruction */
    p_input->b_die = 1;
Michel Kaempf's avatar
Michel Kaempf committed
212

213 214 215 216 217
    /* 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 );

218 219 220 221 222 223
    /* If status is NULL, wait until thread has been destroyed */
    if( pi_status == NULL )
    {
        do
        {
            msleep( THREAD_SLEEP );
224 225
        } while ( (i_status != THREAD_OVER) && (i_status != THREAD_ERROR)
                  && (i_status != THREAD_FATAL) );
226
    }
Michel Kaempf's avatar
Michel Kaempf committed
227 228
}

229
/*****************************************************************************
230
 * RunThread: main thread loop
231
 *****************************************************************************
232
 * Thread in charge of processing the network packets and demultiplexing.
233
 *****************************************************************************/
234
static void RunThread( input_thread_t *p_input )
Michel Kaempf's avatar
Michel Kaempf committed
235
{
236
    int                     i_error, i;
237
    data_packet_t **        pp_packets;
Michel Kaempf's avatar
Michel Kaempf committed
238

239 240 241 242 243 244 245 246
    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 );
247
        free( p_input );
248 249
        return;
    }
Michel Kaempf's avatar
Michel Kaempf committed
250

251 252 253 254 255
    /* initialization is completed */
    vlc_mutex_lock( &p_input->stream.stream_lock );
    p_input->stream.b_changed = 1;
    vlc_mutex_unlock( &p_input->stream.stream_lock );

256 257 258
    pp_packets = (data_packet_t **) malloc( p_input->i_read_once *
                                        sizeof( data_packet_t * ) );
    if( pp_packets == NULL )
259
    {
260
        intf_ErrMsg( "input error: out of memory" );
261
        free( pp_packets );
262 263
        p_input->b_error = 1;
    }
264

265 266
    while( !p_input->b_die && !p_input->b_error && !p_input->b_eof )
    {
267
#ifdef STATS
268
        p_input->c_loops++;
269 270
#endif

271
        vlc_mutex_lock( &p_input->stream.stream_lock );
272

273 274
        if( p_input->stream.p_new_area )
        {
275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291
            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;
                }
            }
292 293 294
            p_input->stream.p_new_area = NULL;
        }

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

                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;
                }
            }
314
            p_input->stream.p_selected_area->i_seek = NO_SEEK;
315
        }
316

317 318 319 320 321 322 323 324 325 326 327 328
        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;
        }

329 330 331 332 333 334 335 336 337 338 339 340 341 342
        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;
        }

343
        vlc_mutex_unlock( &p_input->stream.stream_lock );
344 345

        i_error = p_input->pf_read( p_input, pp_packets );
346

347
        /* Demultiplex read packets. */
348
        for( i = 0; i < p_input->i_read_once && pp_packets[i] != NULL; i++ )
349 350 351
        {
            p_input->pf_demux( p_input, pp_packets[i] );
        }
352

353 354 355
        if( i_error )
        {
            if( i_error == 1 )
356
            {
357 358
                /* End of file - we do not set b_die because only the
                 * interface is allowed to do so. */
359
                intf_WarnMsg( 3, "input: EOF reached" );
360
                p_input->b_eof = 1;
361
            }
362
            else
363
            {
364
                p_input->b_error = 1;
365
            }
366 367 368
        }
    }

369 370
    free( pp_packets );

371
    if( p_input->b_error || p_input->b_eof )
372 373 374
    {
        ErrorThread( p_input );
    }
375

376
    EndThread( p_input );
377 378 379

    DestroyThread( p_input );

380
    intf_DbgMsg("input: Thread end");
381 382
}

383
/*****************************************************************************
384
 * InitThread: init the input Thread
385
 *****************************************************************************/
386
static int InitThread( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
387 388 389
{

#ifdef STATS
390 391 392 393 394 395
    /* Initialize statistics */
    p_input->c_loops                    = 0;
    p_input->c_bytes                    = 0;
    p_input->c_payload_bytes            = 0;
    p_input->c_packets_read             = 0;
    p_input->c_packets_trashed          = 0;
Michel Kaempf's avatar
Michel Kaempf committed
396
#endif
397

398 399 400 401 402
    /* 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 );

403 404 405 406
    /* Default, might get overwritten */
    p_input->pf_open = p_input->pf_file_open;
    p_input->pf_close = p_input->pf_file_close;

407
    p_input->p_input_module = module_Need( MODULE_CAPABILITY_INPUT,
408
                                           (probedata_t *)p_input );
409 410

    if( p_input->p_input_module == NULL )
411
    {
412 413
        intf_ErrMsg( "input error: no suitable input module for `%s'",
                     p_input->p_source );
414
        return( -1 );
Michel Kaempf's avatar
Michel Kaempf committed
415
    }
416

417 418
#define f p_input->p_input_module->p_functions->input.functions.input
    p_input->pf_init          = f.pf_init;
419 420 421 422 423 424 425 426
    if( f.pf_open != NULL )
    {
        p_input->pf_open          = f.pf_open;
    }
    if( f.pf_close != NULL )
    {
        p_input->pf_close         = f.pf_close;
    }
427
    p_input->pf_end           = f.pf_end;
428
    p_input->pf_init_bit_stream= f.pf_init_bit_stream;
429
    p_input->pf_read          = f.pf_read;
430
    p_input->pf_set_area      = f.pf_set_area;
431 432 433 434 435 436 437 438
    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;
#undef f
439 440

    /* We found the appropriate plugin, open the target */
441
    p_input->pf_open( p_input );
442

443
    if( p_input->b_error )
444
    {
445
        /* We barfed -- exit nicely */
446
        module_Unneed( p_input->p_input_module );
447
        return( -1 );
448
    }
449 450

    p_input->pf_init( p_input );
451

452 453 454 455
    if( p_input->b_error )
    {
        /* We barfed -- exit nicely */
        p_input->pf_close( p_input );
456
        module_Unneed( p_input->p_input_module );
457 458 459
        return( -1 );
    }

460
    *p_input->pi_status = THREAD_READY;
461 462

    return( 0 );
Michel Kaempf's avatar
Michel Kaempf committed
463 464
}

465
/*****************************************************************************
466
 * ErrorThread: RunThread() error loop
467
 *****************************************************************************
468
 * This function is called when an error occured during thread main's loop.
469
 *****************************************************************************/
470
static void ErrorThread( input_thread_t *p_input )
Michel Kaempf's avatar
Michel Kaempf committed
471
{
472
    while( !p_input->b_die )
Michel Kaempf's avatar
Michel Kaempf committed
473
    {
474 475
        /* Sleep a while */
        msleep( INPUT_IDLE_SLEEP );
Michel Kaempf's avatar
Michel Kaempf committed
476 477 478
    }
}

479
/*****************************************************************************
480
 * EndThread: end the input thread
481
 *****************************************************************************/
482
static void EndThread( input_thread_t * p_input )
483
{
484
    int *       pi_status;                                  /* thread status */
485

486 487 488
    /* Store status */
    pi_status = p_input->pi_status;
    *pi_status = THREAD_END;
489

490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505
#ifdef STATS
    {
        struct tms cpu_usage;
        times( &cpu_usage );

        intf_Msg("input stats: cpu usage (user: %d, system: %d)",
                 cpu_usage.tms_utime, cpu_usage.tms_stime);
    }
#endif

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

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

506 507 508
    /* Close stream */
    p_input->pf_close( p_input );

509
    /* Release modules */
510
    module_Unneed( p_input->p_input_module );
511

512 513 514 515 516 517 518 519 520 521 522
}

/*****************************************************************************
 * 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;
523

524 525
    /* Destroy Mutex locks */
    vlc_mutex_destroy( &p_input->stream.control.control_lock );
526
    vlc_mutex_destroy( &p_input->stream.stream_lock );
527
    
528
    /* Free input structure */
529
    free( p_input );
530

531 532
    /* Update status */
    *pi_status = THREAD_OVER;
533
}
534

535
/*****************************************************************************
536
 * FileOpen : open a file descriptor
537
 *****************************************************************************/
538
static void FileOpen( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
539
{
540
    struct stat         stat_info;
541 542 543
    int                 i_stat;

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

545 546 547
    /* FIXME: this code ought to be in the plugin so that code can
     * be shared with the *_Probe function */
    if( ( i_stat = stat( psz_name, &stat_info ) ) == (-1) )
548
    {
549 550 551 552 553 554 555 556
        int i_size = strlen( psz_name );

        if( ( i_size > 4 )
            && !strncasecmp( psz_name, "dvd:", 4 ) )
        {
            /* get rid of the 'dvd:' stuff and try again */
            psz_name += 4;
            i_stat = stat( psz_name, &stat_info );
557
        }
558
        else if( ( i_size > 5 )
559 560 561 562 563
                 && !strncasecmp( psz_name, "file:", 5 ) )
        {
            /* get rid of the 'file:' stuff and try again */
            psz_name += 5;
            i_stat = stat( psz_name, &stat_info );
564
        }
565

566
        if( i_stat == (-1) )
567 568 569 570 571 572
        {
            intf_ErrMsg( "input error: cannot stat() file `%s' (%s)",
                         psz_name, strerror(errno));
            p_input->b_error = 1;
            return;
        }
573 574 575 576 577 578 579 580
    }

    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)
581
         || S_ISBLK(stat_info.st_mode) )
582 583
    {
        p_input->stream.b_seekable = 1;
584
        p_input->stream.p_selected_area->i_size = stat_info.st_size;
585
    }
586
    else if( S_ISFIFO(stat_info.st_mode)
587
#if !defined( SYS_BEOS ) && !defined( WIN32 )
588 589 590
             || S_ISSOCK(stat_info.st_mode)
#endif
             )
591
    {
592
        p_input->stream.b_seekable = 0;
593
        p_input->stream.p_selected_area->i_size = 0;
Benoit Steiner's avatar
Benoit Steiner committed
594 595 596
    }
    else
    {
597
        vlc_mutex_unlock( &p_input->stream.stream_lock );
598
        intf_ErrMsg( "input error: unknown file type for `%s'",
599
                     psz_name );
600 601 602
        p_input->b_error = 1;
        return;
    }
603

604
    p_input->stream.p_selected_area->i_tell = 0;
605 606
    vlc_mutex_unlock( &p_input->stream.stream_lock );

607
    intf_WarnMsg( 1, "input: opening file `%s'", p_input->p_source );
608
    if( (p_input->i_handle = open( psz_name,
609 610
                                   /*O_NONBLOCK | O_LARGEFILE*/0 )) == (-1) )
    {
611
        intf_ErrMsg( "input error: cannot open file (%s)", strerror(errno) );
612 613
        p_input->b_error = 1;
        return;
Michel Kaempf's avatar
Michel Kaempf committed
614 615 616
    }

}
Stéphane Borel's avatar
Stéphane Borel committed
617 618

/*****************************************************************************
619
 * FileClose : close a file descriptor
Stéphane Borel's avatar
Stéphane Borel committed
620
 *****************************************************************************/
621
static void FileClose( input_thread_t * p_input )
Stéphane Borel's avatar
Stéphane Borel committed
622
{
623
    intf_WarnMsg( 1, "input: closing file `%s'", p_input->p_source );
624

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

627
    return;
Stéphane Borel's avatar
Stéphane Borel committed
628
}
629

630
#if !defined( SYS_BEOS ) && !defined( SYS_NTO )
631
/*****************************************************************************
632
 * NetworkOpen : open a network socket 
633
 *****************************************************************************/
634
static void NetworkOpen( input_thread_t * p_input )
635
{
636
    char                *psz_server = NULL;
637
    char                *psz_broadcast = NULL;
638
    int                 i_port = 0;
639 640
    int                 i_opt;
    struct sockaddr_in  sock;
641 642
#ifdef WIN32
    WSADATA Data;
643 644 645 646 647 648
    int i_err;
#endif
    
#ifdef WIN32
    /* WinSock Library Init. */
    i_err = WSAStartup( MAKEWORD( 1, 1 ), &Data );
649 650 651 652 653 654 655

    if( i_err )
    {
        intf_ErrMsg( "input: can't initiate WinSocks, error %i", i_err );
        return ;
    }
#endif
656 657
    
    /* Get the remote server */
658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691
    if( p_input->p_source != NULL )
    {
        psz_server = p_input->p_source;

        /* Skip the protocol name */
        while( *psz_server && *psz_server != ':' )
        {
            psz_server++;
        }

        /* Skip the "://" part */
        while( *psz_server && (*psz_server == ':' || *psz_server == '/') )
        {
            psz_server++;
        }

        /* Found a server name */
        if( *psz_server )
        {
            char *psz_port = psz_server;

            /* Skip the hostname part */
            while( *psz_port && *psz_port != ':' )
            {
                psz_port++;
            }

            /* Found a port name */
            if( *psz_port )
            {
                /* Replace ':' with '\0' */
                *psz_port = '\0';
                psz_port++;

692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716
                psz_broadcast = psz_port;
                while( *psz_broadcast && *psz_broadcast != ':' )
                {
                    psz_broadcast++;
                }

                if( *psz_broadcast )
                {
                    *psz_broadcast = '\0';
                    psz_broadcast++;
                    while( *psz_broadcast && *psz_broadcast == ':' )
                    {
                        psz_broadcast++;
                    }
                }
                else
                {
                    psz_broadcast = NULL;
                }

                /* port before broadcast address */
                if( *psz_port != ':' )
                {
                    i_port = atoi( psz_port );
                }
717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733
            }
        }
        else
        {
            psz_server = NULL;
        }
    }

    /* Check that we got a valid server */
    if( psz_server == NULL )
    {
        psz_server = main_GetPszVariable( INPUT_SERVER_VAR, 
                                          INPUT_SERVER_DEFAULT );
    }

    /* Check that we got a valid port */
    if( i_port == 0 )
734
    {
735
        i_port = main_GetIntVariable( INPUT_PORT_VAR, INPUT_PORT_DEFAULT );
736
    }
737 738 739 740

    if( psz_broadcast == NULL )
    {
        /* Are we broadcasting ? */
741 742 743 744 745 746 747 748 749 750
        if( main_GetIntVariable( INPUT_BROADCAST_VAR,
                                 INPUT_BROADCAST_DEFAULT ) )
        {
            psz_broadcast = main_GetPszVariable( INPUT_BCAST_ADDR_VAR,
                                                 INPUT_BCAST_ADDR_DEFAULT );
        }
        else
        {
           psz_broadcast = NULL; 
        }
751 752 753 754 755
    }

    intf_WarnMsg( 2, "input: server: %s port: %d broadcast: %s",
                     psz_server, i_port, psz_broadcast );

756 757 758 759 760
    /* 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 )
    {
761
        intf_ErrMsg("input error: can't create socket : %s", strerror(errno));
762 763 764 765 766
        p_input->b_error = 1;
        return;
    }

    /* We may want to reuse an already used socket */
767
    i_opt = 1;
768
    if( setsockopt( p_input->i_handle, SOL_SOCKET, SO_REUSEADDR,
769
                    (void*) &i_opt, sizeof( i_opt ) ) == -1 )
770
    {
771 772
        intf_ErrMsg( "input error: can't configure socket (SO_REUSEADDR: %s)",
                     strerror(errno));
773 774 775 776 777 778 779
        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 */
780 781
    i_opt = 0x80000;
    if( setsockopt( p_input->i_handle, SOL_SOCKET, SO_RCVBUF,
782
                    (void*) &i_opt, sizeof( i_opt ) ) == -1 )
783
    {
784 785
        intf_ErrMsg( "input error: can't configure socket (SO_RCVBUF: %s)", 
                     strerror(errno));
786 787 788 789 790 791
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }

    /* Build the local socket */
792
    if ( network_BuildLocalAddr( &sock, i_port, psz_broadcast ) == -1 )
793
    {
794
        intf_ErrMsg( "input error: can't build local address" );
795 796 797 798
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }
799 800 801 802 803 804 805

#if defined( WIN32 )
    if ( psz_broadcast != NULL )
    {
        sock.sin_addr.s_addr = INADDR_ANY;
    }
#endif
806 807
    
    /* Bind it */
808 809
    if( bind( p_input->i_handle, (struct sockaddr *)&sock, 
              sizeof( sock ) ) < 0 )
810
    {
811
        intf_ErrMsg("input error: can't bind socket (%s)", strerror(errno));
812 813 814 815 816 817
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }

    /* Build socket for remote connection */
818
    if ( network_BuildRemoteAddr( &sock, psz_server ) == -1 )
819
    {
820
        intf_ErrMsg( "input error: can't build remote address" );
821 822 823 824 825 826
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }

    /* And connect it ... should we really connect ? */
827 828
    if( connect( p_input->i_handle, (struct sockaddr *) &sock,
                 sizeof( sock ) ) == (-1) )
829
    {
830
        intf_ErrMsg( "input error: can't connect socket, %s", 
831
                     strerror(errno) );
832 833 834 835 836 837 838
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }

    /* We can't pace control, but FIXME : bug in meuuh's code to sync PCR
     * with the server. */
839
    p_input->stream.b_pace_control = 0;
840
    p_input->stream.b_seekable = 0;
841 842

    intf_WarnMsg( 3, "input: successfully opened network mode" );
843 844 845 846 847
    
    return;
}

/*****************************************************************************
848
 * NetworkClose : close a network socket
849
 *****************************************************************************/
850
static void NetworkClose( input_thread_t * p_input )
851 852
{
    close( p_input->i_handle );
853

854 855 856
#ifdef WIN32 
    WSACleanup();
#endif
857

858
}
859
#endif
860