programs/plugplay/main.c

   1 /*
   2  * Copyright 2011 Hans Leidekker for CodeWeavers
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2.1 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library; if not, write to the Free Software
  16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  17  */
  18
  19 #define WIN32_LEAN_AND_MEAN
  20
  21 #include <windows.h>
  22 #include <dbt.h>
  23 #include "winsvc.h"
  24 #include "wine/debug.h"
  25 #include "wine/list.h"
  26 #include "plugplay.h"
  27
  28 WINE_DEFAULT_DEBUG_CHANNEL(plugplay);
  29
  30 static WCHAR plugplayW[] = L"PlugPlay";
  31
  32 static SERVICE_STATUS_HANDLE service_handle;
  33 static HANDLE stop_event;
  34
  35 void  __RPC_FAR * __RPC_USER MIDL_user_allocate( SIZE_T len )
  36 {
  37     return malloc( len );
  38 }
  39
  40 void __RPC_USER MIDL_user_free( void __RPC_FAR *ptr )
  41 {
  42     free( ptr );
  43 }
  44
  45 static CRITICAL_SECTION plugplay_cs;
  46 static CRITICAL_SECTION_DEBUG plugplay_cs_debug =
  47 {
  48     0, 0, &plugplay_cs,
  49     { &plugplay_cs_debug.ProcessLocksList, &plugplay_cs_debug.ProcessLocksList },
  50       0, 0, { (DWORD_PTR)(__FILE__ ": plugplay_cs") }
  51 };
  52 static CRITICAL_SECTION plugplay_cs = { &plugplay_cs_debug, -1, 0, 0, 0, 0 };
  53
  54 static struct list listener_list = LIST_INIT(listener_list);
  55
  56 struct listener
  57 {
  58     struct list entry;
  59     struct list events;
  60     CONDITION_VARIABLE cv;
  61 };
  62
  63 struct event
  64 {
  65     struct list entry;
  66     DWORD code;
  67     BYTE *data;
  68     unsigned int size;
  69 };
  70
  71
  72 static void destroy_listener( struct listener *listener )
  73 {
  74     struct event *event, *next;
  75
  76     EnterCriticalSection( &plugplay_cs );
  77     list_remove( &listener->entry );
  78     LeaveCriticalSection( &plugplay_cs );
  79
  80     LIST_FOR_EACH_ENTRY_SAFE(event, next, &listener->events, struct event, entry)
  81     {
  82         MIDL_user_free( event->data );
  83         list_remove( &event->entry );
  84         free( event );
  85     }
  86     free( listener );
  87 }
  88
  89 void __RPC_USER plugplay_rpc_handle_rundown( plugplay_rpc_handle handle )
  90 {
  91     destroy_listener( handle );
  92 }
  93
  94 plugplay_rpc_handle __cdecl plugplay_register_listener(void)
  95 {
  96     struct listener *listener;
  97
  98     if (!(listener = calloc( 1, sizeof(*listener) )))
  99         return NULL;
 100
 101     list_init( &listener->events );
 102     InitializeConditionVariable( &listener->cv );
 103
 104     EnterCriticalSection( &plugplay_cs );
 105     list_add_tail( &listener_list, &listener->entry );
 106     LeaveCriticalSection( &plugplay_cs );
 107
 108     return listener;
 109 }
 110
 111 DWORD __cdecl plugplay_get_event( plugplay_rpc_handle handle, BYTE **data, unsigned int *size )
 112 {
 113     struct listener *listener = handle;
 114     struct event *event;
 115     struct list *entry;
 116     DWORD ret;
 117
 118     EnterCriticalSection( &plugplay_cs );
 119
 120     while (!(entry = list_head( &listener->events )))
 121         SleepConditionVariableCS( &listener->cv, &plugplay_cs, INFINITE );
 122
 123     event = LIST_ENTRY(entry, struct event, entry);
 124     list_remove( &event->entry );
 125
 126     LeaveCriticalSection( &plugplay_cs );
 127
 128     ret = event->code;
 129     *data = event->data;
 130     *size = event->size;
 131     free( event );
 132     return ret;
 133 }
 134
 135 void __cdecl plugplay_unregister_listener( plugplay_rpc_handle handle )
 136 {
 137     destroy_listener( handle );
 138 }
 139
 140 void __cdecl plugplay_send_event( DWORD code, const BYTE *data, unsigned int size )
 141 {
 142     struct listener *listener;
 143     struct event *event;
 144
 145     BroadcastSystemMessageW( 0, NULL, WM_DEVICECHANGE, code, (LPARAM)data );
 146     BroadcastSystemMessageW( 0, NULL, WM_DEVICECHANGE, DBT_DEVNODES_CHANGED, 0 );
 147
 148     EnterCriticalSection( &plugplay_cs );
 149
 150     LIST_FOR_EACH_ENTRY(listener, &listener_list, struct listener, entry)
 151     {
 152         if (!(event = malloc( sizeof(*event) )))
 153             break;
 154
 155         if (!(event->data = malloc( size )))
 156         {
 157             free( event );
 158             break;
 159         }
 160
 161         event->code = code;
 162         memcpy( event->data, data, size );
 163         event->size = size;
 164         list_add_tail( &listener->events, &event->entry );
 165         WakeConditionVariable( &listener->cv );
 166     }
 167
 168     LeaveCriticalSection( &plugplay_cs );
 169 }
 170
 171 static DWORD WINAPI service_handler( DWORD ctrl, DWORD event_type, LPVOID event_data, LPVOID context )
 172 {
 173     SERVICE_STATUS status;
 174
 175     status.dwServiceType             = SERVICE_WIN32;
 176     status.dwControlsAccepted        = SERVICE_ACCEPT_STOP;
 177     status.dwWin32ExitCode           = 0;
 178     status.dwServiceSpecificExitCode = 0;
 179     status.dwCheckPoint              = 0;
 180     status.dwWaitHint                = 0;
 181
 182     switch(ctrl)
 183     {
 184     case SERVICE_CONTROL_STOP:
 185     case SERVICE_CONTROL_SHUTDOWN:
 186         WINE_TRACE( "shutting down\n" );
 187         status.dwCurrentState     = SERVICE_STOP_PENDING;
 188         status.dwControlsAccepted = 0;
 189         SetServiceStatus( service_handle, &status );
 190         SetEvent( stop_event );
 191         return NO_ERROR;
 192     default:
 193         WINE_FIXME( "got service ctrl %x\n", ctrl );
 194         status.dwCurrentState = SERVICE_RUNNING;
 195         SetServiceStatus( service_handle, &status );
 196         return NO_ERROR;
 197     }
 198 }
 199
 200 static void WINAPI ServiceMain( DWORD argc, LPWSTR *argv )
 201 {
 202     unsigned char endpoint[] = "\\pipe\\wine_plugplay";
 203     unsigned char protseq[] = "ncalrpc";
 204     SERVICE_STATUS status;
 205     RPC_STATUS err;
 206
 207     WINE_TRACE( "starting service\n" );
 208
 209     if ((err = RpcServerUseProtseqEpA( protseq, 0, endpoint, NULL )))
 210     {
 211         ERR("RpcServerUseProtseqEp() failed, error %u\n", err);
 212         return;
 213     }
 214     if ((err = RpcServerRegisterIf( plugplay_v0_0_s_ifspec, NULL, NULL )))
 215     {
 216         ERR("RpcServerRegisterIf() failed, error %u\n", err);
 217         return;
 218     }
 219     if ((err = RpcServerListen( 1, RPC_C_LISTEN_MAX_CALLS_DEFAULT, TRUE )))
 220     {
 221         ERR("RpcServerListen() failed, error %u\n", err);
 222         return;
 223     }
 224
 225     stop_event = CreateEventW( NULL, TRUE, FALSE, NULL );
 226
 227     service_handle = RegisterServiceCtrlHandlerExW( plugplayW, service_handler, NULL );
 228     if (!service_handle)
 229         return;
 230
 231     status.dwServiceType             = SERVICE_WIN32;
 232     status.dwCurrentState            = SERVICE_RUNNING;
 233     status.dwControlsAccepted        = SERVICE_ACCEPT_STOP | SERVICE_ACCEPT_SHUTDOWN;
 234     status.dwWin32ExitCode           = 0;
 235     status.dwServiceSpecificExitCode = 0;
 236     status.dwCheckPoint              = 0;
 237     status.dwWaitHint                = 10000;
 238     SetServiceStatus( service_handle, &status );
 239
 240     WaitForSingleObject( stop_event, INFINITE );
 241
 242     RpcMgmtStopServerListening( NULL );
 243     RpcServerUnregisterIf( plugplay_v0_0_s_ifspec, NULL, TRUE );
 244     RpcMgmtWaitServerListen();
 245
 246     status.dwCurrentState     = SERVICE_STOPPED;
 247     status.dwControlsAccepted = 0;
 248     SetServiceStatus( service_handle, &status );
 249     WINE_TRACE( "service stopped\n" );
 250 }
 251
 252 int __cdecl wmain( int argc, WCHAR *argv[] )
 253 {
 254     static const SERVICE_TABLE_ENTRYW service_table[] =
 255     {
 256         { plugplayW, ServiceMain },
 257         { NULL, NULL }
 258     };
 259
 260     StartServiceCtrlDispatcherW( service_table );
 261     return 0;
 262 }