src/misc/win32_specific.c

   1 /*****************************************************************************
   2  * win32_specific.c: Win32 specific features
   3  *****************************************************************************
   4  * Copyright (C) 2001-2004 the VideoLAN team
   5  * $Id$
   6  *
   7  * Authors: Samuel Hocevar <sam@zoy.org>
   8  *          Gildas Bazin <gbazin@videolan.org>
   9  *
  10  * This program is free software; you can redistribute it and/or modify
  11  * it under the terms of the GNU General Public License as published by
  12  * the Free Software Foundation; either version 2 of the License, or
  13  * (at your option) any later version.
  14  *
  15  * This program is distributed in the hope that it will be useful,
  16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18  * GNU General Public License for more details.
  19  *
  20  * You should have received a copy of the GNU General Public License
  21  * along with this program; if not, write to the Free Software
  22  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  23  *****************************************************************************/
  24
  25 #ifdef HAVE_CONFIG_H
  26 # include "config.h"
  27 #endif
  28
  29 #define UNICODE
  30 #include <vlc_common.h>
  31 #include "../libvlc.h"
  32 #include <vlc_playlist.h>
  33 #include <vlc_charset.h>
  34
  35 #include "../extras/getopt.h"
  36
  37 #if !defined( UNDER_CE )
  38 #   include <io.h>
  39 #   include <fcntl.h>
  40 #   include  <mmsystem.h>
  41 #endif
  42
  43 #include <winsock.h>
  44
  45 /*****************************************************************************
  46  * system_Init: initialize winsock and misc other things.
  47  *****************************************************************************/
  48 void system_Init( libvlc_int_t *p_this, int *pi_argc, const char *ppsz_argv[] )
  49 {
  50     VLC_UNUSED( p_this ); VLC_UNUSED( pi_argc ); VLC_UNUSED( ppsz_argv );
  51     WSADATA Data;
  52
  53     /* Get our full path */
  54     char psz_path[MAX_PATH];
  55     char *psz_vlc;
  56
  57     wchar_t psz_wpath[MAX_PATH];
  58     if( GetModuleFileName( NULL, psz_wpath, MAX_PATH ) )
  59     {
  60         WideCharToMultiByte( CP_ACP, 0, psz_wpath, -1,
  61                              psz_path, MAX_PATH, NULL, NULL );
  62     }
  63     else psz_path[0] = '\0';
  64
  65     if( (psz_vlc = strrchr( psz_path, '\\' )) ) *psz_vlc = '\0';
  66
  67 #ifndef HAVE_RELEASE
  68     {
  69         /* remove trailing \.libs from executable dir path if seen,
  70            we assume we are running vlc through libtool wrapper in build dir */
  71         int offset  = strlen(psz_path)-sizeof("\\.libs")+1;
  72         if( offset > 0 )
  73         {
  74             psz_vlc = psz_path+offset;
  75             if( ! strcmp(psz_vlc, "\\.libs") ) *psz_vlc = '\0';
  76         }
  77     }
  78 #endif
  79
  80     psz_vlcpath = strdup( psz_path );
  81
  82     /* Set the default file-translation mode */
  83 #if !defined( UNDER_CE )
  84     _fmode = _O_BINARY;
  85     _setmode( _fileno( stdin ), _O_BINARY ); /* Needed for pipes */
  86
  87     timeBeginPeriod(5);
  88 #endif
  89
  90     /* Call mdate() once to make sure it is initialized properly */
  91     mdate();
  92
  93     /* WinSock Library Init. */
  94     if( !WSAStartup( MAKEWORD( 2, 2 ), &Data ) )
  95     {
  96         /* Aah, pretty useless check, we should always have Winsock 2.2
  97          * since it appeared in Win98. */
  98         if( LOBYTE( Data.wVersion ) != 2 || HIBYTE( Data.wVersion ) != 2 )
  99             /* We could not find a suitable WinSock DLL. */
 100             WSACleanup( );
 101         else
 102             /* Everything went ok. */
 103             return;
 104     }
 105
 106     /* Let's try with WinSock 1.1 */
 107     if( !WSAStartup( MAKEWORD( 1, 1 ), &Data ) )
 108     {
 109         /* Confirm that the WinSock DLL supports 1.1.*/
 110         if( LOBYTE( Data.wVersion ) != 1 || HIBYTE( Data.wVersion ) != 1 )
 111             /* We could not find a suitable WinSock DLL. */
 112             WSACleanup( );
 113         else
 114             /* Everything went ok. */
 115             return;
 116     }
 117
 118     fprintf( stderr, "error: can't initialize WinSocks\n" );
 119 }
 120
 121 /*****************************************************************************
 122  * system_Configure: check for system specific configuration options.
 123  *****************************************************************************/
 124 static unsigned __stdcall IPCHelperThread( void * );
 125 LRESULT CALLBACK WMCOPYWNDPROC( HWND, UINT, WPARAM, LPARAM );
 126 static vlc_object_t *p_helper = NULL;
 127 static unsigned long hIPCHelper;
 128 static HANDLE hIPCHelperReady;
 129
 130 typedef struct
 131 {
 132   int argc;
 133   int enqueue;
 134   char data[];
 135 } vlc_ipc_data_t;
 136
 137 void system_Configure( libvlc_int_t *p_this, int *pi_argc, const char *ppsz_argv[] )
 138 {
 139 #if !defined( UNDER_CE )
 140     /* Raise default priority of the current process */
 141 #ifndef ABOVE_NORMAL_PRIORITY_CLASS
 142 #   define ABOVE_NORMAL_PRIORITY_CLASS 0x00008000
 143 #endif
 144     if( config_GetInt( p_this, "high-priority" ) )
 145     {
 146         if( SetPriorityClass( GetCurrentProcess(), ABOVE_NORMAL_PRIORITY_CLASS )
 147              || SetPriorityClass( GetCurrentProcess(), HIGH_PRIORITY_CLASS ) )
 148         {
 149             msg_Dbg( p_this, "raised process priority" );
 150         }
 151         else
 152         {
 153             msg_Dbg( p_this, "could not raise process priority" );
 154         }
 155     }
 156
 157     if( config_GetInt( p_this, "one-instance" )
 158         || ( config_GetInt( p_this, "one-instance-when-started-from-file" )
 159              && config_GetInt( p_this, "started-from-file" ) ) )
 160     {
 161         HANDLE hmutex;
 162
 163         msg_Info( p_this, "one instance mode ENABLED");
 164
 165         /* Use a named mutex to check if another instance is already running */
 166         if( !( hmutex = CreateMutex( 0, TRUE, L"VLC ipc "VERSION ) ) )
 167         {
 168             /* Failed for some reason. Just ignore the option and go on as
 169              * normal. */
 170             msg_Err( p_this, "one instance mode DISABLED "
 171                      "(mutex couldn't be created)" );
 172             return;
 173         }
 174
 175         if( GetLastError() != ERROR_ALREADY_EXISTS )
 176         {
 177             /* We are the 1st instance. */
 178             static const char typename[] = "ipc helper";
 179             p_helper =
 180                 vlc_custom_create( p_this, sizeof(vlc_object_t),
 181                                    VLC_OBJECT_GENERIC, typename );
 182
 183             /* Run the helper thread */
 184             hIPCHelperReady = CreateEvent( NULL, FALSE, FALSE, NULL );
 185             hIPCHelper = _beginthreadex( NULL, 0, IPCHelperThread, p_helper,
 186                                          0, NULL );
 187             if( hIPCHelper )
 188                 WaitForSingleObject( hIPCHelperReady, INFINITE );
 189             else
 190             {
 191                 msg_Err( p_this, "one instance mode DISABLED "
 192                          "(IPC helper thread couldn't be created)" );
 193                 vlc_object_release (p_helper);
 194                 p_helper = NULL;
 195             }
 196             vlc_object_attach (p_helper, p_this);
 197             CloseHandle( hIPCHelperReady );
 198
 199             /* Initialization done.
 200              * Release the mutex to unblock other instances */
 201             ReleaseMutex( hmutex );
 202         }
 203         else
 204         {
 205             /* Another instance is running */
 206
 207             HWND ipcwindow;
 208
 209             /* Wait until the 1st instance is initialized */
 210             WaitForSingleObject( hmutex, INFINITE );
 211
 212             /* Locate the window created by the IPC helper thread of the
 213              * 1st instance */
 214             if( !( ipcwindow = FindWindow( 0, L"VLC ipc "VERSION ) ) )
 215             {
 216                 msg_Err( p_this, "one instance mode DISABLED "
 217                          "(couldn't find 1st instance of program)" );
 218                 ReleaseMutex( hmutex );
 219                 return;
 220             }
 221
 222             /* We assume that the remaining parameters are filenames
 223              * and their input options */
 224             if( *pi_argc - 1 >= optind )
 225             {
 226                 COPYDATASTRUCT wm_data;
 227                 int i_opt;
 228                 vlc_ipc_data_t *p_data;
 229                 size_t i_data = sizeof (*p_data);
 230
 231                 for( i_opt = optind; i_opt < *pi_argc; i_opt++ )
 232                 {
 233                     i_data += sizeof (size_t);
 234                     i_data += strlen( ppsz_argv[ i_opt ] ) + 1;
 235                 }
 236
 237                 p_data = malloc( i_data );
 238                 p_data->argc = *pi_argc - optind;
 239                 p_data->enqueue = config_GetInt( p_this, "playlist-enqueue" );
 240                 i_data = 0;
 241                 for( i_opt = optind; i_opt < *pi_argc; i_opt++ )
 242                 {
 243                     size_t i_len = strlen( ppsz_argv[ i_opt ] ) + 1;
 244                     /* Windows will never switch to an architecture
 245                      * with stronger alignment requirements, right. */
 246                     *((size_t *)(p_data->data + i_data)) = i_len;
 247                     i_data += sizeof (size_t);
 248                     memcpy( &p_data->data[i_data], ppsz_argv[ i_opt ], i_len );
 249                     i_data += i_len;
 250                 }
 251                 i_data += sizeof (*p_data);
 252
 253                 /* Send our playlist items to the 1st instance */
 254                 wm_data.dwData = 0;
 255                 wm_data.cbData = i_data;
 256                 wm_data.lpData = p_data;
 257                 SendMessage( ipcwindow, WM_COPYDATA, 0, (LPARAM)&wm_data );
 258             }
 259
 260             /* Initialization done.
 261              * Release the mutex to unblock other instances */
 262             ReleaseMutex( hmutex );
 263
 264             /* Bye bye */
 265             system_End( p_this );
 266             exit( 0 );
 267         }
 268     }
 269
 270 #endif
 271 }
 272
 273 static unsigned __stdcall IPCHelperThread( void *data )
 274 {
 275     vlc_object_t *p_this = data;
 276     HWND ipcwindow;
 277     MSG message;
 278
 279     ipcwindow =
 280         CreateWindow( L"STATIC",                     /* name of window class */
 281                   L"VLC ipc "VERSION,               /* window title bar text */
 282                   0,                                         /* window style */
 283                   0,                                 /* default X coordinate */
 284                   0,                                 /* default Y coordinate */
 285                   0,                                         /* window width */
 286                   0,                                        /* window height */
 287                   NULL,                                  /* no parent window */
 288                   NULL,                            /* no menu in this window */
 289                   GetModuleHandle(NULL),  /* handle of this program instance */
 290                   NULL );                               /* sent to WM_CREATE */
 291
 292     SetWindowLongPtr( ipcwindow, GWLP_WNDPROC, (LRESULT)WMCOPYWNDPROC );
 293     SetWindowLongPtr( ipcwindow, GWLP_USERDATA, (LONG_PTR)p_this );
 294
 295     /* Signal the creation of the thread and events queue */
 296     SetEvent( hIPCHelperReady );
 297
 298     while( GetMessage( &message, NULL, 0, 0 ) )
 299     {
 300         TranslateMessage( &message );
 301         DispatchMessage( &message );
 302     }
 303     return 0;
 304 }
 305
 306 LRESULT CALLBACK WMCOPYWNDPROC( HWND hwnd, UINT uMsg, WPARAM wParam,
 307                                 LPARAM lParam )
 308 {
 309     if( uMsg == WM_COPYDATA )
 310     {
 311         COPYDATASTRUCT *pwm_data = (COPYDATASTRUCT*)lParam;
 312         vlc_object_t *p_this;
 313         playlist_t *p_playlist;
 314
 315         p_this = (vlc_object_t *)
 316             (uintptr_t)GetWindowLongPtr( hwnd, GWLP_USERDATA );
 317
 318         if( !p_this ) return 0;
 319
 320         /* Add files to the playlist */
 321         p_playlist = pl_Hold( p_this );
 322         if( !p_playlist ) return 0;
 323
 324         if( pwm_data->lpData )
 325         {
 326             char **ppsz_argv;
 327             vlc_ipc_data_t *p_data = (vlc_ipc_data_t *)pwm_data->lpData;
 328             size_t i_data = 0;
 329             int i_argc = p_data->argc, i_opt, i_options;
 330
 331             ppsz_argv = (char **)malloc( i_argc * sizeof(char *) );
 332             for( i_opt = 0; i_opt < i_argc; i_opt++ )
 333             {
 334                 ppsz_argv[i_opt] = p_data->data + i_data + sizeof(int);
 335                 i_data += sizeof(int) + *((int *)(p_data->data + i_data));
 336             }
 337
 338             for( i_opt = 0; i_opt < i_argc; i_opt++ )
 339             {
 340                 i_options = 0;
 341
 342                 /* Count the input options */
 343                 while( i_opt + i_options + 1 < i_argc &&
 344                        *ppsz_argv[ i_opt + i_options + 1 ] == ':' )
 345                 {
 346                     i_options++;
 347                 }
 348                 playlist_AddExt( p_playlist, ppsz_argv[i_opt],
 349                   NULL, PLAYLIST_APPEND |
 350                         ( ( i_opt || p_data->enqueue ) ? 0 : PLAYLIST_GO ),
 351                   PLAYLIST_END, -1,
 352                   i_options,
 353                   (char const **)( i_options ? &ppsz_argv[i_opt+1] : NULL ),
 354                   VLC_INPUT_OPTION_TRUSTED,
 355                   true, pl_Unlocked );
 356
 357                 i_opt += i_options;
 358             }
 359
 360             free( ppsz_argv );
 361         }
 362
 363         vlc_object_release( p_playlist );
 364     }
 365
 366     return DefWindowProc( hwnd, uMsg, wParam, lParam );
 367 }
 368
 369 /*****************************************************************************
 370  * system_End: terminate winsock.
 371  *****************************************************************************/
 372 void system_End( libvlc_int_t *p_this )
 373 {
 374     HWND ipcwindow;
 375     if( p_this )
 376     {
 377         free( psz_vlcpath );
 378         psz_vlcpath = NULL;
 379     }
 380
 381     if( ( ipcwindow = FindWindow( 0, L"VLC ipc "VERSION ) ) != 0 )
 382     {
 383         SendMessage( ipcwindow, WM_QUIT, 0, 0 );
 384     }
 385
 386     if (p_helper && p_helper->p_parent == VLC_OBJECT(p_this) )
 387     {
 388         /* FIXME: thread-safety... */
 389         vlc_object_detach (p_helper);
 390         vlc_object_release (p_helper);
 391         p_helper = NULL;
 392     }
 393
 394 #if !defined( UNDER_CE )
 395     timeEndPeriod(5);
 396 #endif
 397
 398     WSACleanup();
 399 }