]> git.sesse.net Git - vlc/blob - modules/control/netsync.c
32756c6cd45310e0eb69896ec3f893b1e5b033d3
[vlc] / modules / control / netsync.c
1 /*****************************************************************************
2  * netsync.c: synchronisation between several network clients.
3  *****************************************************************************
4  * Copyright (C) 2004 VideoLAN
5  * $Id$
6  *
7  * Authors: Gildas Bazin <gbazin@videolan.org>
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 2 of the License, or
12  * (at your option) any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software
21  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
22  *****************************************************************************/
23
24 /*****************************************************************************
25  * Preamble
26  *****************************************************************************/
27 #include <stdlib.h>
28 #include <vlc/vlc.h>
29 #include <vlc/intf.h>
30 #include <vlc/input.h>
31
32 #ifdef HAVE_UNISTD_H
33 #    include <unistd.h>
34 #endif
35
36 #ifdef HAVE_SYS_TIME_H
37 #    include <sys/time.h>
38 #endif
39 #include <sys/types.h>
40
41 #ifdef WIN32
42 #   include <winsock2.h>
43 #   include <ws2tcpip.h>
44 #   ifndef IN_MULTICAST
45 #       define IN_MULTICAST(a) IN_CLASSD(a)
46 #   endif
47 #else
48 #   include <sys/socket.h>
49 #   include <netinet/in.h>
50 #   if HAVE_ARPA_INET_H
51 #      include <arpa/inet.h>
52 #   elif defined( SYS_BEOS )
53 #      include <net/netdb.h>
54 #   endif
55 #endif
56
57 #ifdef UNDER_CE
58 #   define close(a) CloseHandle(a);
59 #elif defined( WIN32 )
60 #   define close(a) closesocket(a);
61 #endif
62
63 #include "network.h"
64
65 #define NETSYNC_PORT_MASTER 9875
66 #define NETSYNC_PORT_SLAVE  9876
67
68 /* Needed for Solaris */
69 #ifndef INADDR_NONE
70 #define INADDR_NONE 0xffffffff
71 #endif
72
73 /*****************************************************************************
74  * Module descriptor
75  *****************************************************************************/
76 static int  Activate( vlc_object_t * );
77 static void Close   ( vlc_object_t * );
78
79 static mtime_t GetClockRef( intf_thread_t *, mtime_t );
80
81 #define NETSYNC_TEXT N_( "Act as master for network synchronisation" )
82 #define NETSYNC_LONGTEXT N_( "Allows you to specify if this client should " \
83   "act as the master client for the network synchronisation." )
84
85 #define MIP_TEXT N_( "Master client ip address" )
86 #define MIP_LONGTEXT N_( "Allows you to specify the ip address of " \
87   "the master client used for the network synchronisation." )
88
89 vlc_module_begin();
90     set_description( _("Network synchronisation") );
91
92     add_bool( "netsync-master", 0, NULL,
93               NETSYNC_TEXT, NETSYNC_LONGTEXT, VLC_TRUE );
94     add_string( "netsync-master-ip", NULL, NULL, MIP_TEXT, MIP_LONGTEXT,
95                 VLC_TRUE );
96
97     set_capability( "interface", 0 );
98     set_callbacks( Activate, Close );
99 vlc_module_end();
100
101 struct intf_sys_t
102 {
103     input_thread_t *p_input;
104 };
105
106 /*****************************************************************************
107  * Local prototypes
108  *****************************************************************************/
109 static void Run( intf_thread_t *p_intf );
110
111 /*****************************************************************************
112  * Activate: initialize and create stuff
113  *****************************************************************************/
114 static int Activate( vlc_object_t *p_this )
115 {
116     intf_thread_t *p_intf = (intf_thread_t*)p_this;
117
118     msg_Info( p_intf, "Using the netsync interface module..." );
119
120     p_intf->p_sys = malloc( sizeof( intf_sys_t ) );
121     if( !p_intf->p_sys )
122     {
123         msg_Err( p_intf, "no memory" );
124         return VLC_ENOMEM;
125     }
126
127     p_intf->p_sys->p_input = NULL;
128
129     p_intf->pf_run = Run;
130     return VLC_SUCCESS;
131 }
132
133 /*****************************************************************************
134  * Close: destroy interface
135  *****************************************************************************/
136 void Close( vlc_object_t *p_this )
137 {
138     intf_thread_t *p_intf = (intf_thread_t*)p_this;
139
140     free( p_intf->p_sys );
141 }
142
143 /*****************************************************************************
144  * Run: interface thread
145  *****************************************************************************/
146 static void Run( intf_thread_t *p_intf )
147 {
148 #define MAX_MSG_LENGTH (2 * sizeof(int64_t))
149
150     vlc_bool_t b_master = config_GetInt( p_intf, "netsync-master" );
151     char *psz_master = NULL;
152     char p_data[MAX_MSG_LENGTH];
153     int i_socket;
154
155     if( !b_master )
156     {
157         psz_master = config_GetPsz( p_intf, "netsync-master-ip" );
158         if( psz_master == NULL )
159         {
160             msg_Err( p_intf, "master address not specified" );
161             return;
162         }
163     }
164
165     i_socket = net_OpenUDP( p_intf, NULL,
166                    b_master ? NETSYNC_PORT_MASTER : NETSYNC_PORT_SLAVE,
167                    b_master ? NULL : psz_master,
168                    b_master ? 0 : NETSYNC_PORT_MASTER );
169
170     if( psz_master ) free( psz_master );
171
172     if( i_socket < 0 )
173     {
174         msg_Err( p_intf, "failed opening UDP socket." );
175         return;
176     }
177
178     /* High priority thread */
179     vlc_thread_set_priority( p_intf, VLC_THREAD_PRIORITY_INPUT );
180
181     while( !p_intf->b_die )
182     {
183         struct timeval timeout;
184         fd_set fds_r;
185
186         /* Update the input */
187         if( p_intf->p_sys->p_input == NULL )
188         {
189             p_intf->p_sys->p_input =
190                 (input_thread_t *)vlc_object_find( p_intf, VLC_OBJECT_INPUT,
191                                                    FIND_ANYWHERE );
192         }
193         else if( p_intf->p_sys->p_input->b_dead )
194         {
195             vlc_object_release( p_intf->p_sys->p_input );
196             p_intf->p_sys->p_input = NULL;
197         }
198
199         if( p_intf->p_sys->p_input == NULL )
200         {
201             /* Wait a bit */
202             msleep( INTF_IDLE_SLEEP );
203             continue;
204         }
205
206         /*
207          * We now have an input
208          */
209
210         /* Initialize file descriptor set and timeout (0.5s) */
211         FD_ZERO( &fds_r );
212         FD_SET( i_socket, &fds_r );
213         timeout.tv_sec = 0;
214         timeout.tv_usec = 500000;
215
216         if( b_master )
217         {
218             struct sockaddr_storage from;
219             mtime_t i_date, i_clockref, i_master_clockref;
220             int i_struct_size, i_read, i_ret;
221
222             /* Don't block */
223             i_ret = select( i_socket + 1, &fds_r, 0, 0, &timeout );
224             if( i_ret == 0 ) continue;
225             if( i_ret < 0 )
226             {
227                 /* Wait a bit */
228                 msleep( INTF_IDLE_SLEEP );
229                 continue;
230             }
231
232             /* We received something */
233             i_struct_size = sizeof( from );
234             i_read = recvfrom( i_socket, p_data, MAX_MSG_LENGTH, 0,
235                                (struct sockaddr*)&from, &i_struct_size );
236
237             i_clockref = ntoh64(*(int64_t *)p_data);
238
239             i_date = mdate();
240             *(int64_t *)p_data = hton64( i_date );
241
242             i_master_clockref = GetClockRef( p_intf, i_clockref );
243             *(((int64_t *)p_data)+1) = hton64( i_master_clockref );
244
245             /* Reply to the sender */
246             sendto( i_socket, p_data, 2 * sizeof(int64_t), 0,
247                     (struct sockaddr *)&from, i_struct_size );
248
249             msg_Dbg( p_intf, "Master clockref: "I64Fd" -> "I64Fd", from %s "
250                      "(date: "I64Fd")", i_clockref, i_master_clockref,
251                      from.ss_family == AF_INET
252                      ? inet_ntoa(((struct sockaddr_in *)&from)->sin_addr)
253                      : "non-IPv4", i_date );
254         }
255         else
256         {
257             mtime_t i_send_date, i_receive_date, i_master_date, i_diff_date;
258             mtime_t i_master_clockref, i_client_clockref, i_drift;
259             mtime_t i_clockref = 0;
260             int i_sent, i_read, i_ret;
261
262             /* Send clock request to the master */
263             *(int64_t *)p_data = hton64( i_clockref );
264             i_send_date = mdate();
265
266             i_sent = send( i_socket, p_data, sizeof(int64_t), 0 );
267             if( i_sent <= 0 )
268             {
269                 /* Wait a bit */
270                 msleep( INTF_IDLE_SLEEP );
271                 continue;
272             }
273
274             /* Don't block */
275             i_ret = select(i_socket + 1, &fds_r, 0, 0, &timeout);
276             if( i_ret == 0 ) continue;
277             if( i_ret < 0 )
278             {
279                 /* Wait a bit */
280                 msleep( INTF_IDLE_SLEEP );
281                 continue;
282             }
283
284             i_receive_date = mdate();
285
286             i_read = recv( i_socket, p_data, MAX_MSG_LENGTH, 0 );
287             if( i_read <= 0 )
288             {
289                 /* Wait a bit */
290                 msleep( INTF_IDLE_SLEEP );
291                 continue;
292             }
293
294             i_master_date = ntoh64(*(int64_t *)p_data);
295             i_master_clockref = ntoh64(*(((int64_t *)p_data)+1));
296
297             i_diff_date = i_receive_date -
298                           ((i_receive_date - i_send_date) / 2 + i_master_date);
299
300             i_client_clockref = i_drift = 0;
301             if( p_intf->p_sys->p_input && i_master_clockref )
302             {
303                 i_client_clockref = GetClockRef( p_intf, i_clockref );
304                 i_drift = i_client_clockref - i_master_clockref - i_diff_date;
305
306                 /* Update our clock to match the master's one */
307                 if( i_client_clockref )
308                     p_intf->p_sys->p_input->i_pts_delay -= i_drift;
309             }
310
311             msg_Dbg( p_intf, "Slave clockref: "I64Fd" -> "I64Fd" -> "I64Fd", "
312                      "clock diff: "I64Fd" drift: "I64Fd,
313                      i_clockref, i_master_clockref, 
314                      i_client_clockref, i_diff_date, i_drift );
315
316             /* Wait a bit */
317             msleep( INTF_IDLE_SLEEP );
318         }
319     }
320
321     if( p_intf->p_sys->p_input ) vlc_object_release( p_intf->p_sys->p_input );
322     net_Close( i_socket );
323 }
324
325 static mtime_t GetClockRef( intf_thread_t *p_intf, mtime_t i_pts )
326 {
327     input_thread_t *p_input = p_intf->p_sys->p_input;
328     mtime_t i_ts;
329
330     if( !p_input || !p_input->p_es_out ) return 0;
331
332     if( es_out_Control( p_input->p_es_out, ES_OUT_GET_TS, i_pts, &i_ts ) ==
333         VLC_SUCCESS )
334     {
335         return i_ts;
336     }
337
338     return 0;
339 }