input.c 25.6 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.119 2001/06/07 01:10:33 sam 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"
Michel Lespinasse's avatar
Yop,  
Michel Lespinasse committed
77

78
#include "input.h"
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;
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 areas in a stream */
    input_AddArea( p_input );
150
    p_input->stream.p_selected_area = p_input->stream.pp_areas[0];
151

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;
    p_input->stream.control.b_bw = 0;
Michel Kaempf's avatar
Michel Kaempf committed
157

158 159 160 161 162 163 164 165
    /* 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

Michel Kaempf's avatar
Michel Kaempf committed
166
    /* Create thread and set locks. */
167
    vlc_mutex_init( &p_input->stream.stream_lock );
168
    vlc_cond_init( &p_input->stream.stream_wait );
169 170 171
    vlc_mutex_init( &p_input->stream.control.control_lock );
    if( vlc_thread_create( &p_input->thread_id, "input", (void *) RunThread,
                           (void *) p_input ) )
Michel Kaempf's avatar
Michel Kaempf committed
172
    {
173 174
        intf_ErrMsg( "input error: can't create input thread (%s)",
                     strerror(errno) );
Michel Kaempf's avatar
Michel Kaempf committed
175 176 177
        free( p_input );
        return( NULL );
    }
178

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

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

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

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

211 212 213 214 215
    /* 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 );

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

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

237 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 );
        return;
    }
Michel Kaempf's avatar
Michel Kaempf committed
247

248 249 250 251 252
    /* 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 );

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

262 263
    while( !p_input->b_die && !p_input->b_error && !p_input->b_eof )
    {
264
#ifdef STATS
265
        p_input->c_loops++;
266 267
#endif

268
        vlc_mutex_lock( &p_input->stream.stream_lock );
269

270 271 272 273 274 275
        if( p_input->stream.p_new_area )
        {
            p_input->pf_set_area( p_input, p_input->stream.p_new_area );
            p_input->stream.p_new_area = NULL;
        }

276
        if( p_input->stream.p_selected_area->i_seek != NO_SEEK )
277
        {
278 279
            if( p_input->stream.b_seekable && p_input->pf_seek != NULL )
            {
280 281
                p_input->pf_seek( p_input,
                                  p_input->stream.p_selected_area->i_seek );
282 283 284 285 286 287 288 289 290 291 292 293 294

                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
            p_input->stream.p_selected_area->i_seek = NO_SEEK;
296
        }
297

298 299 300 301 302 303 304 305 306 307 308 309
        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;
        }

310
        vlc_mutex_unlock( &p_input->stream.stream_lock );
311 312

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

314
        /* Demultiplex read packets. */
315
        for( i = 0; i < p_input->i_read_once && pp_packets[i] != NULL; i++ )
316 317 318
        {
            p_input->pf_demux( p_input, pp_packets[i] );
        }
319

320 321 322
        if( i_error )
        {
            if( i_error == 1 )
323
            {
324 325
                /* End of file - we do not set b_die because only the
                 * interface is allowed to do so. */
326
                intf_WarnMsg( 3, "input: EOF reached" );
327
                p_input->b_eof = 1;
328
            }
329
            else
330
            {
331
                p_input->b_error = 1;
332
            }
333 334 335
        }
    }

336 337
    free( pp_packets );

338
    if( p_input->b_error || p_input->b_eof )
339 340 341
    {
        ErrorThread( p_input );
    }
342

343
    EndThread( p_input );
344 345 346

    DestroyThread( p_input );

347
    intf_DbgMsg("input: Thread end");
348 349
}

350
/*****************************************************************************
351
 * InitThread: init the input Thread
352
 *****************************************************************************/
353
static int InitThread( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
354 355 356
{

#ifdef STATS
357 358 359 360 361 362
    /* 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
363
#endif
364

365 366 367 368
    /* Default, might get overwritten */
    p_input->pf_open = p_input->pf_file_open;
    p_input->pf_close = p_input->pf_file_close;

369
    p_input->p_input_module = module_Need( MODULE_CAPABILITY_INPUT,
370
                                           (probedata_t *)p_input );
371 372

    if( p_input->p_input_module == NULL )
373
    {
374 375
        intf_ErrMsg( "input error: no suitable input module for `%s'",
                     p_input->p_source );
376
        return( -1 );
Michel Kaempf's avatar
Michel Kaempf committed
377
    }
378

379 380
#define f p_input->p_input_module->p_functions->input.functions.input
    p_input->pf_init          = f.pf_init;
381 382 383 384 385 386 387 388
    if( f.pf_open != NULL )
    {
        p_input->pf_open          = f.pf_open;
    }
    if( f.pf_close != NULL )
    {
        p_input->pf_close         = f.pf_close;
    }
389 390
    p_input->pf_end           = f.pf_end;
    p_input->pf_read          = f.pf_read;
391
    p_input->pf_set_area      = f.pf_set_area;
392 393 394 395 396 397 398 399
    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
400 401

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

404
    if( p_input->b_error )
405
    {
406 407
        /* We barfed -- exit nicely */
        p_input->pf_close( p_input );
408
        module_Unneed( p_input->p_input_module );
409
        return( -1 );
410
    }
411 412

    p_input->pf_init( p_input );
413

414 415 416 417
    if( p_input->b_error )
    {
        /* We barfed -- exit nicely */
        p_input->pf_close( p_input );
418
        module_Unneed( p_input->p_input_module );
419 420 421
        return( -1 );
    }

422
    *p_input->pi_status = THREAD_READY;
423 424

    return( 0 );
Michel Kaempf's avatar
Michel Kaempf committed
425 426
}

427
/*****************************************************************************
428
 * ErrorThread: RunThread() error loop
429
 *****************************************************************************
430
 * This function is called when an error occured during thread main's loop.
431
 *****************************************************************************/
432
static void ErrorThread( input_thread_t *p_input )
Michel Kaempf's avatar
Michel Kaempf committed
433
{
434
    while( !p_input->b_die )
Michel Kaempf's avatar
Michel Kaempf committed
435
    {
436 437
        /* Sleep a while */
        msleep( INPUT_IDLE_SLEEP );
Michel Kaempf's avatar
Michel Kaempf committed
438 439 440
    }
}

441
/*****************************************************************************
442
 * EndThread: end the input thread
443
 *****************************************************************************/
444
static void EndThread( input_thread_t * p_input )
445
{
446
    int *       pi_status;                                  /* thread status */
447

448 449 450
    /* Store status */
    pi_status = p_input->pi_status;
    *pi_status = THREAD_END;
451

452 453 454 455 456 457 458 459 460 461 462 463 464 465 466 467
#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 );

468 469 470
    /* Close stream */
    p_input->pf_close( p_input );

471
    /* Release modules */
472
    module_Unneed( p_input->p_input_module );
473

474 475 476 477 478 479 480 481 482 483 484
}

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

486 487
    /* Destroy Mutex locks */
    vlc_mutex_destroy( &p_input->stream.control.control_lock );
488
    vlc_mutex_destroy( &p_input->stream.stream_lock );
489
    
490
    /* Free input structure */
491
    free( p_input );
492

493 494
    /* Update status */
    *pi_status = THREAD_OVER;
495
}
496

497
/*****************************************************************************
498
 * FileOpen : open a file descriptor
499
 *****************************************************************************/
500
static void FileOpen( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
501
{
502
    struct stat         stat_info;
503 504
    int                 i_stat;

505 506 507 508
#if defined( WIN32 )
    char buf[7] = { 0 };
#endif

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

511 512 513
    /* 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) )
514
    {
515 516 517 518 519 520 521 522
        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 );
523
#if defined( WIN32 )
524
            _snprintf( buf, 7, "\\\\.\\%c:", psz_name[0] );
525
#endif
526
        }
527
        else if( ( i_size > 5 )
528 529 530 531 532
                 && !strncasecmp( psz_name, "file:", 5 ) )
        {
            /* get rid of the 'file:' stuff and try again */
            psz_name += 5;
            i_stat = stat( psz_name, &stat_info );
533
        }
534

535 536 537 538 539
        if( i_stat == (-1) 
#if defined( WIN32 )
        && !buf[0]      
#endif
            )
540 541 542 543 544 545
        {
            intf_ErrMsg( "input error: cannot stat() file `%s' (%s)",
                         psz_name, strerror(errno));
            p_input->b_error = 1;
            return;
        }
546 547 548 549 550 551 552 553
    }

    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)
554 555 556 557 558
         || S_ISBLK(stat_info.st_mode)
#if defined( WIN32 )
         || ( buf[0] && ( ( stat_info.st_size = 0 ) == 0 ) )
#endif
         )
559 560
    {
        p_input->stream.b_seekable = 1;
561
        p_input->stream.p_selected_area->i_size = stat_info.st_size;
562
    }
563
    else if( S_ISFIFO(stat_info.st_mode)
564
#if !defined( SYS_BEOS ) && !defined( WIN32 )
565 566 567
             || S_ISSOCK(stat_info.st_mode)
#endif
             )
568
    {
569
        p_input->stream.b_seekable = 0;
570
        p_input->stream.p_selected_area->i_size = 0;
Benoit Steiner's avatar
Benoit Steiner committed
571 572 573
    }
    else
    {
574
        vlc_mutex_unlock( &p_input->stream.stream_lock );
575
        intf_ErrMsg( "input error: unknown file type for `%s'",
576
                     psz_name );
577 578 579
        p_input->b_error = 1;
        return;
    }
580

581
    p_input->stream.p_selected_area->i_tell = 0;
582 583
    vlc_mutex_unlock( &p_input->stream.stream_lock );

584
    intf_WarnMsg( 1, "input: opening file `%s'", p_input->p_source );
585
#ifndef WIN32
586
    if( (p_input->i_handle = open( psz_name,
587
                                   /*O_NONBLOCK | O_LARGEFILE*/0 )) == (-1) )
588
#else
589 590 591 592
    if( ( buf[0] && ( (HANDLE) p_input->i_handle = CreateFile( buf, 
        GENERIC_READ | GENERIC_WRITE, FILE_SHARE_READ | FILE_SHARE_WRITE, 
        NULL, OPEN_EXISTING, 0, NULL ) ) == INVALID_HANDLE_VALUE ) ||
        ( !buf[0] && (p_input->i_handle = open( psz_name, O_BINARY ) ) == (-1) ) )
593
#endif
594
    {
595
        intf_ErrMsg( "input error: cannot open file (%s)", strerror(errno) );
596 597
        p_input->b_error = 1;
        return;
Michel Kaempf's avatar
Michel Kaempf committed
598 599 600
    }

}
Stéphane Borel's avatar
Stéphane Borel committed
601 602

/*****************************************************************************
603
 * FileClose : close a file descriptor
Stéphane Borel's avatar
Stéphane Borel committed
604
 *****************************************************************************/
605
static void FileClose( input_thread_t * p_input )
Stéphane Borel's avatar
Stéphane Borel committed
606
{
607
    intf_WarnMsg( 1, "input: closing file `%s'", p_input->p_source );
608 609 610 611 612 613 614 615
#if defined( WIN32 )
    if( ( strlen( p_input->p_source ) > 4 ) &&
        !strncasecmp( p_input->p_source, "dvd:", 4 ) )
    {
        CloseHandle( (HANDLE) p_input->i_handle );
    }
    else
#endif
616
    close( p_input->i_handle );
Stéphane Borel's avatar
Stéphane Borel committed
617

618
    return;
Stéphane Borel's avatar
Stéphane Borel committed
619
}
620

621
#if !defined( SYS_BEOS ) && !defined( SYS_NTO )
622
/*****************************************************************************
623
 * NetworkOpen : open a network socket 
624
 *****************************************************************************/
625
static void NetworkOpen( input_thread_t * p_input )
626
{
627
    char                *psz_server = NULL;
628
    char                *psz_broadcast = NULL;
629
    int                 i_port = 0;
630 631
    int                 i_opt;
    struct sockaddr_in  sock;
632

633 634 635 636 637 638 639 640 641 642 643
#ifdef WIN32
    /* WinSock Library Init. */
    WSADATA Data;
    int i_err = WSAStartup( MAKEWORD( 1, 1 ), &Data );

    if( i_err )
    {
        intf_ErrMsg( "input: can't initiate WinSocks, error %i", i_err );
        return ;
    }
#endif
644 645
    
    /* Get the remote server */
646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679
    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++;

680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704
                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 );
                }
705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721
            }
        }
        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 )
722
    {
723
        i_port = main_GetIntVariable( INPUT_PORT_VAR, INPUT_PORT_DEFAULT );
724
    }
725 726 727 728

    if( psz_broadcast == NULL )
    {
        /* Are we broadcasting ? */
729 730 731 732 733 734 735 736 737 738
        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; 
        }
739 740 741 742 743
    }

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

744 745 746 747 748
    /* 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 )
    {
749
        intf_ErrMsg("input error: can't create socket : %s", strerror(errno));
750 751 752 753 754
        p_input->b_error = 1;
        return;
    }

    /* We may want to reuse an already used socket */
755
    i_opt = 1;
756
    if( setsockopt( p_input->i_handle, SOL_SOCKET, SO_REUSEADDR,
757
                    (void*) &i_opt, sizeof( i_opt ) ) == -1 )
758
    {
759 760
        intf_ErrMsg( "input error: can't configure socket (SO_REUSEADDR: %s)",
                     strerror(errno));
761 762 763 764 765 766 767
        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 */
768 769
    i_opt = 0x80000;
    if( setsockopt( p_input->i_handle, SOL_SOCKET, SO_RCVBUF,
770
                    (void*) &i_opt, sizeof( i_opt ) ) == -1 )
771
    {
772 773
        intf_ErrMsg( "input error: can't configure socket (SO_RCVBUF: %s)", 
                     strerror(errno));
774 775 776 777 778 779
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }

    /* Build the local socket */
780
    if ( network_BuildLocalAddr( &sock, i_port, psz_broadcast ) == -1 )
781
    {
782
        intf_ErrMsg( "input error: can't build local address" );
783 784 785 786 787 788
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }
    
    /* Bind it */
789 790
    if( bind( p_input->i_handle, (struct sockaddr *)&sock, 
              sizeof( sock ) ) < 0 )
791
    {
792
        intf_ErrMsg("input error: can't bind socket (%s)", strerror(errno));
793 794 795 796 797 798
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }

    /* Build socket for remote connection */
799
    if ( network_BuildRemoteAddr( &sock, psz_server ) == -1 )
800
    {
801
        intf_ErrMsg( "input error: can't build remote address" );
802 803 804 805 806 807
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }

    /* And connect it ... should we really connect ? */
808 809
    if( connect( p_input->i_handle, (struct sockaddr *) &sock,
                 sizeof( sock ) ) == (-1) )
810
    {
811
        intf_ErrMsg( "input error: can't connect socket, %s", 
812
                     strerror(errno) );
813 814 815 816 817 818 819
        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. */
820
    p_input->stream.b_pace_control = 0;
821
    p_input->stream.b_seekable = 0;
822 823

    intf_WarnMsg( 3, "input: successfully opened network mode" );
824 825 826 827 828
    
    return;
}

/*****************************************************************************
829
 * NetworkClose : close a network socket
830
 *****************************************************************************/
831
static void NetworkClose( input_thread_t * p_input )
832 833
{
    close( p_input->i_handle );
834

835 836 837
#ifdef WIN32 
    WSACleanup();
#endif
838

839
}
840
#endif
841