udp.c 18.4 KB
Newer Older
1
2
3
/*****************************************************************************
 * udp.c
 *****************************************************************************
4
 * Copyright (C) 2001-2005 the VideoLAN team
5
 * $Id$
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 *
 * Authors: Laurent Aimar <fenrir@via.ecp.fr>
 *          Eric Petit <titer@videolan.org>
 *
 * 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.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
dionoea's avatar
dionoea committed
22
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
 *****************************************************************************/

/*****************************************************************************
 * Preamble
 *****************************************************************************/
#include <stdlib.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <string.h>
#include <errno.h>
#include <fcntl.h>

#include <vlc/vlc.h>
#include <vlc/sout.h>

#ifdef HAVE_UNISTD_H
#   include <unistd.h>
#endif

#ifdef WIN32
#   include <winsock2.h>
#   include <ws2tcpip.h>
#   ifndef IN_MULTICAST
#       define IN_MULTICAST(a) IN_CLASSD(a)
#   endif
#else
#   include <sys/socket.h>
#endif

#include "network.h"

54
#define MAX_EMPTY_BLOCKS 200
55

56
57
58
59
60
61
62
63
64
65
66
#if defined(WIN32) || defined(UNDER_CE)
# define WINSOCK_STRERROR_SIZE 20
static const char *winsock_strerror( char *buf )
{
    snprintf( buf, WINSOCK_STRERROR_SIZE, "Winsock error %d",
              WSAGetLastError( ) );
    buf[WINSOCK_STRERROR_SIZE - 1] = '\0';
    return buf;
}
#endif

67
68
69
/*****************************************************************************
 * Module descriptor
 *****************************************************************************/
70
71
72
static int  Open ( vlc_object_t * );
static void Close( vlc_object_t * );

Laurent Aimar's avatar
Laurent Aimar committed
73
74
#define SOUT_CFG_PREFIX "sout-udp-"

75
#define CACHING_TEXT N_("Caching value (ms)")
gbazin's avatar
   
gbazin committed
76
#define CACHING_LONGTEXT N_( \
zorglub's avatar
zorglub committed
77
78
    "Default caching value for outbound UDP streams. This " \
    "value should be set in milliseconds." )
gbazin's avatar
   
gbazin committed
79

Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
80
81
82
83
84
#define TTL_TEXT N_("Hop limit (TTL)")
#define TTL_LONGTEXT N_( \
    "This is the hop limit (also known as \"Time-To-Live\" or TTL) of " \
    "the multicast packets sent by the stream output (0 = use operating " \
    "system built-in default).")
85

zorglub's avatar
zorglub committed
86
87
#define GROUP_TEXT N_("Group packets")
#define GROUP_LONGTEXT N_("Packets can be sent one by one at the right time " \
zorglub's avatar
zorglub committed
88
                          "or by groups. You can choose the number " \
89
90
91
                          "of packets that will be sent at a time. It " \
                          "helps reducing the scheduling load on " \
                          "heavily-loaded systems." )
zorglub's avatar
zorglub committed
92
#define RAW_TEXT N_("Raw write")
zorglub's avatar
zorglub committed
93
#define RAW_LONGTEXT N_("Packets will be sent " \
zorglub's avatar
zorglub committed
94
95
96
97
                       "directly, without trying to fill the MTU (ie, " \
                       "without trying to make the biggest possible packets " \
                       "in order to improve streaming)." )

98
vlc_module_begin();
99
    set_description( _("UDP stream output") );
Felix Paul Kühne's avatar
Felix Paul Kühne committed
100
    set_shortname( "UDP" );
zorglub's avatar
zorglub committed
101
102
    set_category( CAT_SOUT );
    set_subcategory( SUBCAT_SOUT_ACO );
Laurent Aimar's avatar
Laurent Aimar committed
103
    add_integer( SOUT_CFG_PREFIX "caching", DEFAULT_PTS_DELAY / 1000, NULL, CACHING_TEXT, CACHING_LONGTEXT, VLC_TRUE );
104
105
    add_integer( SOUT_CFG_PREFIX "ttl", 0, NULL,TTL_TEXT, TTL_LONGTEXT,
                                 VLC_TRUE );
zorglub's avatar
zorglub committed
106
107
    add_integer( SOUT_CFG_PREFIX "group", 1, NULL, GROUP_TEXT, GROUP_LONGTEXT,
                                 VLC_TRUE );
108
    add_suppressed_integer( SOUT_CFG_PREFIX "late" );
zorglub's avatar
zorglub committed
109
110
    add_bool( SOUT_CFG_PREFIX "raw",  0, NULL, RAW_TEXT, RAW_LONGTEXT,
                                 VLC_TRUE );
Laurent Aimar's avatar
Laurent Aimar committed
111

112
113
114
115
116
117
    set_capability( "sout access", 100 );
    add_shortcut( "udp" );
    add_shortcut( "rtp" ); // Will work only with ts muxer
    set_callbacks( Open, Close );
vlc_module_end();

118
119
120
/*****************************************************************************
 * Exported prototypes
 *****************************************************************************/
Laurent Aimar's avatar
Laurent Aimar committed
121
122
123

static const char *ppsz_sout_options[] = {
    "caching",
124
    "ttl",
Laurent Aimar's avatar
Laurent Aimar committed
125
126
127
128
129
    "group",
    "raw",
    NULL
};

130
131
132
133
134
135
136
static int  Write   ( sout_access_out_t *, block_t * );
static int  WriteRaw( sout_access_out_t *, block_t * );
static int  Seek    ( sout_access_out_t *, off_t  );

static void ThreadWrite( vlc_object_t * );
static block_t *NewUDPPacket( sout_access_out_t *, mtime_t );

137
typedef struct sout_access_thread_t
138
139
140
141
142
{
    VLC_COMMON_MEMBERS

    sout_instance_t *p_sout;

143
    block_fifo_t *p_fifo;
144
145
146

    int         i_handle;

147
    int64_t     i_caching;
148
    int         i_group;
149

150
    block_fifo_t *p_empty_blocks;
151

152
153
} sout_access_thread_t;

Laurent Aimar's avatar
Laurent Aimar committed
154
struct sout_access_out_sys_t
155
156
157
158
159
{
    int                 b_rtpts;  // 1 if add rtp/ts header
    uint16_t            i_sequence_number;
    uint32_t            i_ssrc;

160
    int                 i_mtu;
161

162
    block_t             *p_buffer;
163
164
165

    sout_access_thread_t *p_thread;

166
    vlc_bool_t          b_mtu_warning;
Laurent Aimar's avatar
Laurent Aimar committed
167
};
168

169
170
#define DEFAULT_PORT 1234

171
172
173
174
175
/*****************************************************************************
 * Open: open the file
 *****************************************************************************/
static int Open( vlc_object_t *p_this )
{
Laurent Aimar's avatar
Laurent Aimar committed
176
177
    sout_access_out_t       *p_access = (sout_access_out_t*)p_this;
    sout_access_out_sys_t   *p_sys;
178
179
180
181
182

    char                *psz_parser;
    char                *psz_dst_addr;
    int                 i_dst_port;

Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
183
    int                 i_handle;
184

gbazin's avatar
   
gbazin committed
185
    vlc_value_t         val;
Laurent Aimar's avatar
Laurent Aimar committed
186

187
    config_ChainParse( p_access, SOUT_CFG_PREFIX,
188
                   ppsz_sout_options, p_access->p_cfg );
189

190
    if( !( p_sys = malloc( sizeof( sout_access_out_sys_t ) ) ) )
191
    {
192
        msg_Err( p_access, "not enough memory" );
gbazin's avatar
   
gbazin committed
193
        return VLC_EGENERIC;
194
    }
195
196
    memset( p_sys, 0, sizeof(sout_access_out_sys_t) );
    p_access->p_sys = p_sys;
197

Laurent Aimar's avatar
Laurent Aimar committed
198
199
    if( p_access->psz_access != NULL &&
        !strcmp( p_access->psz_access, "rtp" ) )
200
    {
Laurent Aimar's avatar
Laurent Aimar committed
201
        p_sys->b_rtpts = 1;
202
203
204
    }
    else
    {
Laurent Aimar's avatar
Laurent Aimar committed
205
        p_sys->b_rtpts = 0;
206
207
    }

Laurent Aimar's avatar
Laurent Aimar committed
208
    psz_parser = strdup( p_access->psz_name );
209
210
211
212

    psz_dst_addr = psz_parser;
    i_dst_port = 0;

213
214
215
216
217
218
219
    if ( *psz_parser == '[' )
    {
        while( *psz_parser && *psz_parser != ']' )
        {
            psz_parser++;
        }
    }
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
    while( *psz_parser && *psz_parser != ':' )
    {
        psz_parser++;
    }
    if( *psz_parser == ':' )
    {
        *psz_parser = '\0';
        psz_parser++;
        i_dst_port = atoi( psz_parser );
    }
    if( i_dst_port <= 0 )
    {
        i_dst_port = DEFAULT_PORT;
    }

Laurent Aimar's avatar
Laurent Aimar committed
235
    p_sys->p_thread =
gbazin's avatar
   
gbazin committed
236
        vlc_object_create( p_access, sizeof( sout_access_thread_t ) );
Laurent Aimar's avatar
Laurent Aimar committed
237
    if( !p_sys->p_thread )
238
    {
Laurent Aimar's avatar
Laurent Aimar committed
239
        msg_Err( p_access, "out of memory" );
gbazin's avatar
   
gbazin committed
240
        return VLC_EGENERIC;
241
242
    }

243
    vlc_object_attach( p_sys->p_thread, p_access );
Laurent Aimar's avatar
Laurent Aimar committed
244
245
246
    p_sys->p_thread->p_sout = p_access->p_sout;
    p_sys->p_thread->b_die  = 0;
    p_sys->p_thread->b_error= 0;
247
    p_sys->p_thread->p_fifo = block_FifoNew( p_access );
248
    p_sys->p_thread->p_empty_blocks = block_FifoNew( p_access );
249

250
    var_Get( p_access, SOUT_CFG_PREFIX "ttl", &val );
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
251
252
    i_handle = net_ConnectUDP( p_this, psz_dst_addr, i_dst_port, val.i_int );
    if( i_handle == -1 )
253
    {
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
254
255
         msg_Err( p_access, "failed to open a connection (udp)" );
         return VLC_EGENERIC;
256
257
    }

Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
258
259
    p_sys->p_thread->i_handle = i_handle;
    net_StopRecv( i_handle );
gbazin's avatar
   
gbazin committed
260

Laurent Aimar's avatar
Laurent Aimar committed
261
262
    var_Get( p_access, SOUT_CFG_PREFIX "caching", &val );
    p_sys->p_thread->i_caching = (int64_t)val.i_int * 1000;
263

Laurent Aimar's avatar
Laurent Aimar committed
264
265
    var_Get( p_access, SOUT_CFG_PREFIX "group", &val );
    p_sys->p_thread->i_group = val.i_int;
266

Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
267
    p_sys->i_mtu = var_CreateGetInteger( p_this, "mtu" );
268

gbazin's avatar
gbazin committed
269
270
    if( vlc_thread_create( p_sys->p_thread, "sout write thread", ThreadWrite,
                           VLC_THREAD_PRIORITY_HIGHEST, VLC_FALSE ) )
271
    {
Laurent Aimar's avatar
Laurent Aimar committed
272
273
        msg_Err( p_access->p_sout, "cannot spawn sout access thread" );
        vlc_object_destroy( p_sys->p_thread );
gbazin's avatar
   
gbazin committed
274
        return VLC_EGENERIC;
275
276
    }

277
    srand( (uint32_t)mdate());
Laurent Aimar's avatar
Laurent Aimar committed
278
    p_sys->p_buffer          = NULL;
279
280
    p_sys->i_sequence_number = rand()&0xffff;
    p_sys->i_ssrc            = rand()&0xffffffff;
281

Laurent Aimar's avatar
Laurent Aimar committed
282
    var_Get( p_access, SOUT_CFG_PREFIX "raw", &val );
283
284
    if( val.b_bool )  p_access->pf_write = WriteRaw;
    else p_access->pf_write = Write;
285

gbazin's avatar
   
gbazin committed
286
287
    p_access->pf_seek = Seek;

288
289
    msg_Dbg( p_access, "udp access output opened(%s:%d)",
             psz_dst_addr, i_dst_port );
290
291

    free( psz_dst_addr );
292
293
294
295

    /* update p_sout->i_out_pace_nocontrol */
    p_access->p_sout->i_out_pace_nocontrol++;

296
297
298
299
300
301
302
303
    return VLC_SUCCESS;
}

/*****************************************************************************
 * Close: close the target
 *****************************************************************************/
static void Close( vlc_object_t * p_this )
{
gbazin's avatar
   
gbazin committed
304
305
306
    sout_access_out_t     *p_access = (sout_access_out_t*)p_this;
    sout_access_out_sys_t *p_sys = p_access->p_sys;
    int i;
307

Laurent Aimar's avatar
Laurent Aimar committed
308
    p_sys->p_thread->b_die = 1;
309
310
    for( i = 0; i < 10; i++ )
    {
311
        block_t *p_dummy = block_New( p_access, p_sys->i_mtu );
312
313
314
        p_dummy->i_dts = 0;
        p_dummy->i_pts = 0;
        p_dummy->i_length = 0;
315
        memset( p_dummy->p_buffer, 0, p_dummy->i_buffer );
316
        block_FifoPut( p_sys->p_thread->p_fifo, p_dummy );
317
    }
Laurent Aimar's avatar
Laurent Aimar committed
318
    vlc_thread_join( p_sys->p_thread );
319

320
    block_FifoRelease( p_sys->p_thread->p_fifo );
321
    block_FifoRelease( p_sys->p_thread->p_empty_blocks );
322

323
    if( p_sys->p_buffer ) block_Release( p_sys->p_buffer );
324

325
326
    net_Close( p_sys->p_thread->i_handle );

327
    vlc_object_detach( p_sys->p_thread );
328
    vlc_object_destroy( p_sys->p_thread );
329
330
    /* update p_sout->i_out_pace_nocontrol */
    p_access->p_sout->i_out_pace_nocontrol--;
Laurent Aimar's avatar
Laurent Aimar committed
331

332
    msg_Dbg( p_access, "udp access output closed" );
Laurent Aimar's avatar
Laurent Aimar committed
333
    free( p_sys );
334
335
336
}

/*****************************************************************************
337
 * Write: standard write on a file descriptor.
338
 *****************************************************************************/
339
static int Write( sout_access_out_t *p_access, block_t *p_buffer )
340
{
gbazin's avatar
   
gbazin committed
341
    sout_access_out_sys_t *p_sys = p_access->p_sys;
342
343
344

    while( p_buffer )
    {
345
        block_t *p_next;
346
347
348
        int i_packets = 0;

        if( !p_sys->b_mtu_warning && p_buffer->i_buffer > p_sys->i_mtu )
349
        {
350
351
352
            msg_Warn( p_access, "packet size > MTU, you should probably "
                      "increase the MTU" );
            p_sys->b_mtu_warning = VLC_TRUE;
353
354
        }

355
        /* Check if there is enough space in the buffer */
Laurent Aimar's avatar
Laurent Aimar committed
356
        if( p_sys->p_buffer &&
357
            p_sys->p_buffer->i_buffer + p_buffer->i_buffer > p_sys->i_mtu )
358
        {
359
360
361
362
363
364
            if( p_sys->p_buffer->i_dts + p_sys->p_thread->i_caching < mdate() )
            {
                msg_Dbg( p_access, "late packet for udp input (" I64Fd ")",
                         mdate() - p_sys->p_buffer->i_dts
                          - p_sys->p_thread->i_caching );
            }
365
            block_FifoPut( p_sys->p_thread->p_fifo, p_sys->p_buffer );
Laurent Aimar's avatar
Laurent Aimar committed
366
            p_sys->p_buffer = NULL;
367
368
        }

369
        while( p_buffer->i_buffer )
370
        {
371
372
373
374
375
376
377
378
379
            int i_write = __MIN( p_buffer->i_buffer, p_sys->i_mtu );

            i_packets++;

            if( !p_sys->p_buffer )
            {
                p_sys->p_buffer = NewUDPPacket( p_access, p_buffer->i_dts );
                if( !p_sys->p_buffer ) break;
            }
380

381
            memcpy( p_sys->p_buffer->p_buffer + p_sys->p_buffer->i_buffer,
gbazin's avatar
   
gbazin committed
382
                    p_buffer->p_buffer, i_write );
383

384
            p_sys->p_buffer->i_buffer += i_write;
385
386
            p_buffer->p_buffer += i_write;
            p_buffer->i_buffer -= i_write;
387
            if ( p_buffer->i_flags & BLOCK_FLAG_CLOCK )
388
389
390
            {
                if ( p_sys->p_buffer->i_flags & BLOCK_FLAG_CLOCK )
                    msg_Warn( p_access, "putting two PCRs at once" );
391
                p_sys->p_buffer->i_flags |= BLOCK_FLAG_CLOCK;
392
            }
393
394
395
396

            if( p_sys->p_buffer->i_buffer == p_sys->i_mtu || i_packets > 1 )
            {
                /* Flush */
397
398
399
400
401
402
403
                if( p_sys->p_buffer->i_dts + p_sys->p_thread->i_caching
                      < mdate() )
                {
                    msg_Dbg( p_access, "late packet for udp input (" I64Fd ")",
                             mdate() - p_sys->p_buffer->i_dts
                              - p_sys->p_thread->i_caching );
                }
404
405
406
                block_FifoPut( p_sys->p_thread->p_fifo, p_sys->p_buffer );
                p_sys->p_buffer = NULL;
            }
407
        }
408

409
        p_next = p_buffer->p_next;
410
        block_Release( p_buffer );
411
412
413
        p_buffer = p_next;
    }

Laurent Aimar's avatar
Laurent Aimar committed
414
    return( p_sys->p_thread->b_error ? -1 : 0 );
415
416
}

417
418
419
/*****************************************************************************
 * WriteRaw: write p_buffer without trying to fill mtu
 *****************************************************************************/
420
static int WriteRaw( sout_access_out_t *p_access, block_t *p_buffer )
421
422
{
    sout_access_out_sys_t   *p_sys = p_access->p_sys;
423
424
    block_t *p_buf;

425
    while ( p_sys->p_thread->p_empty_blocks->i_depth >= MAX_EMPTY_BLOCKS )
426
    {
427
        p_buf = block_FifoGet(p_sys->p_thread->p_empty_blocks);
428
429
        block_Release( p_buf );
    }
430

431
    block_FifoPut( p_sys->p_thread->p_fifo, p_buffer );
432
433
434
435

    return( p_sys->p_thread->b_error ? -1 : 0 );
}

436
437
438
/*****************************************************************************
 * Seek: seek to a specific location in a file
 *****************************************************************************/
Laurent Aimar's avatar
Laurent Aimar committed
439
static int Seek( sout_access_out_t *p_access, off_t i_pos )
440
{
441
    msg_Err( p_access, "UDP sout access cannot seek" );
442
    return -1;
443
444
}

gbazin's avatar
   
gbazin committed
445
446
447
/*****************************************************************************
 * NewUDPPacket: allocate a new UDP packet of size p_sys->i_mtu
 *****************************************************************************/
448
static block_t *NewUDPPacket( sout_access_out_t *p_access, mtime_t i_dts)
gbazin's avatar
   
gbazin committed
449
450
{
    sout_access_out_sys_t *p_sys = p_access->p_sys;
451
    block_t *p_buffer;
gbazin's avatar
   
gbazin committed
452

453
    while ( p_sys->p_thread->p_empty_blocks->i_depth > MAX_EMPTY_BLOCKS )
454
    {
455
        p_buffer = block_FifoGet( p_sys->p_thread->p_empty_blocks );
456
457
        block_Release( p_buffer );
    }
458
459

    if( p_sys->p_thread->p_empty_blocks->i_depth == 0 )
460
    {
461
        p_buffer = block_New( p_access->p_sout, p_sys->i_mtu );
462
463
464
    }
    else
    {
465
466
467
        p_buffer = block_FifoGet(p_sys->p_thread->p_empty_blocks );       
        p_buffer->i_flags = 0;
        p_buffer = block_Realloc( p_buffer, 0, p_sys->i_mtu );
468
469
    }

gbazin's avatar
   
gbazin committed
470
    p_buffer->i_dts = i_dts;
471
    p_buffer->i_buffer = 0;
gbazin's avatar
   
gbazin committed
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494

    if( p_sys->b_rtpts )
    {
        mtime_t i_timestamp = p_buffer->i_dts * 9 / 100;

        /* add rtp/ts header */
        p_buffer->p_buffer[0] = 0x80;
        p_buffer->p_buffer[1] = 0x21; // mpeg2-ts

        p_buffer->p_buffer[2] = ( p_sys->i_sequence_number >> 8 )&0xff;
        p_buffer->p_buffer[3] = p_sys->i_sequence_number&0xff;
        p_sys->i_sequence_number++;

        p_buffer->p_buffer[4] = ( i_timestamp >> 24 )&0xff;
        p_buffer->p_buffer[5] = ( i_timestamp >> 16 )&0xff;
        p_buffer->p_buffer[6] = ( i_timestamp >>  8 )&0xff;
        p_buffer->p_buffer[7] = i_timestamp&0xff;

        p_buffer->p_buffer[ 8] = ( p_sys->i_ssrc >> 24 )&0xff;
        p_buffer->p_buffer[ 9] = ( p_sys->i_ssrc >> 16 )&0xff;
        p_buffer->p_buffer[10] = ( p_sys->i_ssrc >>  8 )&0xff;
        p_buffer->p_buffer[11] = p_sys->i_ssrc&0xff;

495
        p_buffer->i_buffer = 12;
gbazin's avatar
   
gbazin committed
496
497
498
499
500
    }

    return p_buffer;
}

501
502
503
504
505
506
/*****************************************************************************
 * ThreadWrite: Write a packet on the network at the good time.
 *****************************************************************************/
static void ThreadWrite( vlc_object_t *p_this )
{
    sout_access_thread_t *p_thread = (sout_access_thread_t*)p_this;
Laurent Aimar's avatar
Laurent Aimar committed
507
    mtime_t              i_date_last = -1;
508
    mtime_t              i_to_send = p_thread->i_group;
gbazin's avatar
gbazin committed
509
    int                  i_dropped_packets = 0;
510
511
512
513
#if defined(WIN32) || defined(UNDER_CE)
    char strerror_buf[WINSOCK_STRERROR_SIZE];
# define strerror( x ) winsock_strerror( strerror_buf )
#endif
gbazin's avatar
   
gbazin committed
514

515
    while( !p_thread->b_die )
516
    {
517
        block_t *p_pk;
518
        mtime_t       i_date, i_sent;
519
520
521
#if 0
        if( (i++ % 1000)==0 ) {
          int i = 0;
522
          int j = 0;
523
524
          block_t *p_tmp = p_thread->p_empty_blocks->p_first;
          while( p_tmp ) { p_tmp = p_tmp->p_next; i++;}
525
526
527
528
          p_tmp = p_thread->p_fifo->p_first;
          while( p_tmp ) { p_tmp = p_tmp->p_next; j++;}
	  msg_Err( p_thread, "fifo depth: %d/%d, empty blocks: %d/%d",
                   p_thread->p_fifo->i_depth, j,p_thread->p_empty_blocks->i_depth,i );
529
530
	}
#endif
531
        p_pk = block_FifoGet( p_thread->p_fifo );
532

533
        i_date = p_thread->i_caching + p_pk->i_dts;
Laurent Aimar's avatar
Laurent Aimar committed
534
        if( i_date_last > 0 )
535
        {
Laurent Aimar's avatar
Laurent Aimar committed
536
537
            if( i_date - i_date_last > 2000000 )
            {
gbazin's avatar
gbazin committed
538
                if( !i_dropped_packets )
539
540
                    msg_Dbg( p_thread, "mmh, hole ("I64Fd" > 2s) -> drop",
                             i_date - i_date_last );
Laurent Aimar's avatar
Laurent Aimar committed
541

542
                block_FifoPut( p_thread->p_empty_blocks, p_pk );
Laurent Aimar's avatar
Laurent Aimar committed
543
544

                i_date_last = i_date;
gbazin's avatar
gbazin committed
545
                i_dropped_packets++;
Laurent Aimar's avatar
Laurent Aimar committed
546
547
                continue;
            }
548
            else if( i_date - i_date_last < -1000 )
549
            {
550
551
552
                if( !i_dropped_packets )
                    msg_Dbg( p_thread, "mmh, packets in the past ("I64Fd")",
                             i_date_last - i_date );
553
            }
554
555
        }

556
        i_to_send--;
557
        if( !i_to_send || (p_pk->i_flags & BLOCK_FLAG_CLOCK) )
558
559
560
561
        {
            mwait( i_date );
            i_to_send = p_thread->i_group;
        }
562
563
564
565
566
        if( send( p_thread->i_handle, p_pk->p_buffer, p_pk->i_buffer, 0 )
              == -1 )
        {
            msg_Warn( p_thread, "send error: %s", strerror(errno) );
        }
567

gbazin's avatar
gbazin committed
568
569
570
571
572
573
        if( i_dropped_packets )
        {
            msg_Dbg( p_thread, "dropped %i packets", i_dropped_packets );
            i_dropped_packets = 0;
        }

574
#if 1
575
576
577
578
579
580
        i_sent = mdate();
        if ( i_sent > i_date + 20000 )
        {
            msg_Dbg( p_thread, "packet has been sent too late (" I64Fd ")",
                     i_sent - i_date );
        }
gbazin's avatar
gbazin committed
581
582
#endif

583
        block_FifoPut( p_thread->p_empty_blocks, p_pk );
584

Laurent Aimar's avatar
Laurent Aimar committed
585
        i_date_last = i_date;
586
587
    }
}