src/os2/specific.c

   1 /*****************************************************************************
   2  * specific.c: OS/2 specific features
   3  *****************************************************************************
   4  * Copyright (C) 2010 KO Myung-Hun
   5  *
   6  * This program is free software; you can redistribute it and/or modify it
   7  * under the terms of the GNU Lesser General Public License as published by
   8  * the Free Software Foundation; either version 2.1 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  14  * GNU Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public License
  17  * along with this program; if not, write to the Free Software Foundation,
  18  * Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  19  *****************************************************************************/
  20
  21 #ifdef HAVE_CONFIG_H
  22 # include "config.h"
  23 #endif
  24
  25 #include <vlc_common.h>
  26 #include "../libvlc.h"
  27 #include <vlc_playlist.h>
  28 #include <vlc_input.h>
  29 #include <vlc_interface.h>
  30 #include <vlc_url.h>
  31
  32 #include <fcntl.h>
  33 #include <io.h>
  34
  35 #define VLC_IPC_PIPE "\\PIPE\\VLC\\IPC\\"VERSION
  36
  37 #define IPC_CMD_GO      0x00
  38 #define IPC_CMD_ENQUEUE 0x01
  39 #define IPC_CMD_QUIT    0xFF
  40
  41 extern int _fmode_bin;
  42
  43 static HPIPE hpipeIPC     = NULLHANDLE;
  44 static int   tidIPCFirst  = -1;
  45 static int   tidIPCHelper = -1;
  46
  47 static void IPCHelperThread( void *arg )
  48 {
  49     libvlc_int_t *libvlc = arg;
  50
  51     ULONG  ulCmd;
  52     int    i_argc;
  53     char **ppsz_argv;
  54     size_t i_len;
  55     ULONG  cbActual;
  56     int    i_options;
  57
  58     /* Add files to the playlist */
  59     playlist_t *p_playlist;
  60
  61     do
  62     {
  63         DosConnectNPipe( hpipeIPC );
  64
  65         /* Read command */
  66         DosRead( hpipeIPC, &ulCmd, sizeof( ulCmd ), &cbActual );
  67         if( ulCmd == IPC_CMD_QUIT )
  68             continue;
  69
  70         /* Read a count of arguments */
  71         DosRead( hpipeIPC, &i_argc, sizeof( i_argc ), &cbActual );
  72
  73         ppsz_argv = vlc_alloc( i_argc, sizeof( *ppsz_argv ));
  74
  75         for( int i_opt = 0; i_opt < i_argc; i_opt++ )
  76         {
  77             /* Read a length of argv */
  78             DosRead( hpipeIPC, &i_len, sizeof( i_len ), &cbActual );
  79
  80             ppsz_argv[ i_opt ] = malloc( i_len );
  81
  82             /* Read argv */
  83             DosRead( hpipeIPC, ppsz_argv[ i_opt ], i_len, &cbActual );
  84         }
  85
  86         p_playlist = libvlc_priv(libvlc)->playlist;
  87
  88         for( int i_opt = 0; i_opt < i_argc;)
  89         {
  90             i_options = 0;
  91
  92             /* Count the input options */
  93             while( i_opt + i_options + 1 < i_argc &&
  94                    *ppsz_argv[ i_opt + i_options + 1 ] == ':' )
  95                 i_options++;
  96
  97
  98             if( p_playlist )
  99             {
 100                 playlist_AddExt( p_playlist, ppsz_argv[ i_opt ], NULL,
 101                                  i_opt == 0 && ulCmd != IPC_CMD_ENQUEUE,
 102                                  i_options,
 103                                  ( char const ** )
 104                                      ( i_options ? &ppsz_argv[ i_opt + 1 ] :
 105                                                    NULL ),
 106                                  VLC_INPUT_OPTION_TRUSTED,
 107                                  true );
 108             }
 109
 110             for( ; i_options >= 0; i_options-- )
 111                 free( ppsz_argv[ i_opt++ ]);
 112         }
 113
 114         free( ppsz_argv );
 115     } while( !DosDisConnectNPipe( hpipeIPC ) && ulCmd != IPC_CMD_QUIT );
 116
 117     DosClose( hpipeIPC );
 118     hpipeIPC = NULLHANDLE;
 119
 120     tidIPCFirst  = -1;
 121     tidIPCHelper = -1;
 122 }
 123
 124 void system_Init( void )
 125 {
 126     /* Set the default file-translation mode */
 127     _fmode_bin = 1;
 128     setmode( fileno( stdin ), O_BINARY ); /* Needed for pipes */
 129 }
 130
 131 void system_Configure( libvlc_int_t *p_this, int i_argc, const char *const ppsz_argv[] )
 132 {
 133     if( var_InheritBool( p_this, "high-priority" ) )
 134     {
 135         if( !DosSetPriority( PRTYS_PROCESS, PRTYC_REGULAR, PRTYD_MAXIMUM, 0 ) )
 136         {
 137             msg_Dbg( p_this, "raised process priority" );
 138         }
 139         else
 140         {
 141             msg_Dbg( p_this, "could not raise process priority" );
 142         }
 143     }
 144
 145     if( var_InheritBool( p_this, "one-instance" )
 146         || ( var_InheritBool( p_this, "one-instance-when-started-from-file" )
 147              && var_InheritBool( p_this, "started-from-file" ) ) )
 148     {
 149         HPIPE hpipe;
 150         ULONG ulAction;
 151         ULONG rc;
 152
 153         msg_Info( p_this, "one instance mode ENABLED");
 154
 155         /* Use a named pipe to check if another instance is already running */
 156         for(;;)
 157         {
 158             rc = DosOpen( VLC_IPC_PIPE, &hpipe, &ulAction, 0, 0,
 159                           OPEN_ACTION_OPEN_IF_EXISTS,
 160                           OPEN_ACCESS_READWRITE | OPEN_SHARE_DENYREADWRITE |
 161                           OPEN_FLAGS_FAIL_ON_ERROR,
 162                           NULL );
 163
 164             if( rc == ERROR_PIPE_BUSY )
 165                 DosWaitNPipe( VLC_IPC_PIPE, -1 );
 166             else
 167                 break;
 168         }
 169
 170         if( rc )
 171         {
 172             rc = DosCreateNPipe( VLC_IPC_PIPE,  &hpipeIPC,
 173                                  NP_ACCESS_DUPLEX,
 174                                  NP_WAIT | NP_TYPE_MESSAGE |
 175                                  NP_READMODE_MESSAGE | 0x01,
 176                                  32768, 32768, 0 );
 177             if( rc )
 178             {
 179                 /* Failed to create a named pipe. Just ignore the option and
 180                  * go on as normal. */
 181                 msg_Err( p_this, "one instance mode DISABLED "
 182                          "(a named pipe couldn't be created)" );
 183                 return;
 184             }
 185
 186             /* We are the 1st instance. */
 187
 188             /* Save the tid of the first instance */
 189             tidIPCFirst = _gettid();
 190
 191             /* Run the helper thread */
 192             tidIPCHelper = _beginthread( IPCHelperThread, NULL, 1024 * 1024,
 193                                          p_this );
 194             if( tidIPCHelper == -1 )
 195             {
 196                 msg_Err( p_this, "one instance mode DISABLED "
 197                          "(IPC helper thread couldn't be created)");
 198
 199                 tidIPCFirst = -1;
 200             }
 201         }
 202         else
 203         {
 204             /* Another instance is running */
 205             ULONG ulCmd = var_InheritBool( p_this, "playlist-enqueue") ?
 206                               IPC_CMD_ENQUEUE : IPC_CMD_GO;
 207             ULONG cbActual;
 208
 209             /* Write a command */
 210             DosWrite( hpipe, &ulCmd, sizeof( ulCmd ), &cbActual );
 211
 212             /* We assume that the remaining parameters are filenames
 213              * and their input options */
 214
 215             /* Write a count of arguments */
 216             DosWrite( hpipe, &i_argc, sizeof( i_argc ), &cbActual );
 217
 218             for( int i_opt = 0; i_opt < i_argc; i_opt++ )
 219             {
 220                 /* We need to resolve relative paths in this instance */
 221                 char *mrl;
 222                 if( strstr( ppsz_argv[ i_opt ], "://" ))
 223                     mrl = strdup( ppsz_argv[ i_opt ] );
 224                 else
 225                     mrl = vlc_path2uri( ppsz_argv[ i_opt ], NULL );
 226
 227                 if( !mrl )
 228                     mrl = ( char * )ppsz_argv[ i_opt ];
 229
 230                 size_t i_len = strlen( mrl ) + 1;
 231
 232                 /* Write a length of an argument */
 233                 DosWrite( hpipe, &i_len, sizeof( i_len ), &cbActual );
 234
 235                 /* Write an argument */
 236                 DosWrite( hpipe, mrl, i_len, &cbActual );
 237
 238                 if( mrl != ppsz_argv[ i_opt ])
 239                     free( mrl );
 240             }
 241
 242             /* Close a named pipe of a client side */
 243             DosClose( hpipe );
 244
 245             /* Bye bye */
 246             system_End();
 247             exit( 0 );
 248         }
 249     }
 250 }
 251
 252 /**
 253  * Cleans up after system_Init() and system_Configure().
 254  */
 255 void system_End(void)
 256 {
 257     if( tidIPCFirst == _gettid())
 258     {
 259         HPIPE hpipe;
 260         ULONG ulAction;
 261         ULONG cbActual;
 262         ULONG rc;
 263
 264         do
 265         {
 266             rc = DosOpen( VLC_IPC_PIPE, &hpipe, &ulAction, 0, 0,
 267                           OPEN_ACTION_OPEN_IF_EXISTS,
 268                           OPEN_ACCESS_READWRITE | OPEN_SHARE_DENYREADWRITE |
 269                           OPEN_FLAGS_FAIL_ON_ERROR,
 270                           NULL );
 271
 272             if( rc == ERROR_PIPE_BUSY )
 273                 DosWaitNPipe( VLC_IPC_PIPE, -1 );
 274             else if( rc )
 275                 DosSleep( 1 );
 276         } while( rc );
 277
 278         /* Ask for IPCHelper to quit */
 279         ULONG ulCmd = IPC_CMD_QUIT;
 280         DosWrite( hpipe, &ulCmd, sizeof( ulCmd ), &cbActual );
 281
 282         DosClose( hpipe );
 283
 284         TID tid = tidIPCHelper;
 285         DosWaitThread( &tid, DCWW_WAIT );
 286     }
 287 }
 288