scheduler/event.c

   1 /*
   2  * Win32 events
   3  *
   4  * Copyright 1998 Alexandre Julliard
   5  */
   6
   7 #include <assert.h>
   8 #include <string.h>
   9 #include "winerror.h"
  10 #include "heap.h"
  11 #include "syslevel.h"
  12 #include "server/request.h"
  13 #include "server.h"
  14
  15
  16 /***********************************************************************
  17  *           CreateEvent32A    (KERNEL32.156)
  18  */
  19 HANDLE WINAPI CreateEventA( SECURITY_ATTRIBUTES *sa, BOOL manual_reset,
  20                                 BOOL initial_state, LPCSTR name )
  21 {
  22     struct create_event_request req;
  23     struct create_event_reply reply;
  24     int len = name ? strlen(name) + 1 : 0;
  25
  26     req.manual_reset = manual_reset;
  27     req.initial_state = initial_state;
  28     req.inherit = (sa && (sa->nLength>=sizeof(*sa)) && sa->bInheritHandle);
  29     CLIENT_SendRequest( REQ_CREATE_EVENT, -1, 2, &req, sizeof(req), name, len );
  30     SetLastError(0);
  31     CLIENT_WaitSimpleReply( &reply, sizeof(reply), NULL );
  32     if (reply.handle == -1) return 0;
  33     return reply.handle;
  34 }
  35
  36
  37 /***********************************************************************
  38  *           CreateEvent32W    (KERNEL32.157)
  39  */
  40 HANDLE WINAPI CreateEventW( SECURITY_ATTRIBUTES *sa, BOOL manual_reset,
  41                                 BOOL initial_state, LPCWSTR name )
  42 {
  43     LPSTR nameA = HEAP_strdupWtoA( GetProcessHeap(), 0, name );
  44     HANDLE ret = CreateEventA( sa, manual_reset, initial_state, nameA );
  45     if (nameA) HeapFree( GetProcessHeap(), 0, nameA );
  46     return ret;
  47 }
  48
  49 /***********************************************************************
  50  *           WIN16_CreateEvent    (KERNEL.457)
  51  */
  52 HANDLE WINAPI WIN16_CreateEvent( BOOL manual_reset, BOOL initial_state )
  53 {
  54     return CreateEventA( NULL, manual_reset, initial_state, NULL );
  55 }
  56
  57
  58 /***********************************************************************
  59  *           OpenEvent32A    (KERNEL32.536)
  60  */
  61 HANDLE WINAPI OpenEventA( DWORD access, BOOL inherit, LPCSTR name )
  62 {
  63     struct open_named_obj_request req;
  64     struct open_named_obj_reply reply;
  65     int len = name ? strlen(name) + 1 : 0;
  66
  67     req.type    = OPEN_EVENT;
  68     req.access  = access;
  69     req.inherit = inherit;
  70     CLIENT_SendRequest( REQ_OPEN_NAMED_OBJ, -1, 2, &req, sizeof(req), name, len );
  71     CLIENT_WaitSimpleReply( &reply, sizeof(reply), NULL );
  72     if (reply.handle == -1) return 0; /* must return 0 on failure, not -1 */
  73     return (HANDLE)reply.handle;
  74 }
  75
  76
  77 /***********************************************************************
  78  *           OpenEvent32W    (KERNEL32.537)
  79  */
  80 HANDLE WINAPI OpenEventW( DWORD access, BOOL inherit, LPCWSTR name )
  81 {
  82     LPSTR nameA = HEAP_strdupWtoA( GetProcessHeap(), 0, name );
  83     HANDLE ret = OpenEventA( access, inherit, nameA );
  84     if (nameA) HeapFree( GetProcessHeap(), 0, nameA );
  85     return ret;
  86 }
  87
  88
  89 /***********************************************************************
  90  *           EVENT_Operation
  91  *
  92  * Execute an event operation (set,reset,pulse).
  93  */
  94 static BOOL EVENT_Operation( HANDLE handle, enum event_op op )
  95 {
  96     struct event_op_request req;
  97
  98     req.handle = handle;
  99     req.op     = op;
 100     CLIENT_SendRequest( REQ_EVENT_OP, -1, 1, &req, sizeof(req) );
 101     return !CLIENT_WaitReply( NULL, NULL, 0 );
 102 }
 103
 104
 105 /***********************************************************************
 106  *           PulseEvent    (KERNEL32.557)
 107  */
 108 BOOL WINAPI PulseEvent( HANDLE handle )
 109 {
 110     return EVENT_Operation( handle, PULSE_EVENT );
 111 }
 112
 113
 114 /***********************************************************************
 115  *           SetEvent    (KERNEL32.644)
 116  */
 117 BOOL WINAPI SetEvent( HANDLE handle )
 118 {
 119     return EVENT_Operation( handle, SET_EVENT );
 120 }
 121
 122
 123 /***********************************************************************
 124  *           ResetEvent    (KERNEL32.586)
 125  */
 126 BOOL WINAPI ResetEvent( HANDLE handle )
 127 {
 128     return EVENT_Operation( handle, RESET_EVENT );
 129 }
 130
 131
 132 /***********************************************************************
 133  * NOTE: The Win95 VWin32_Event routines given below are really low-level
 134  *       routines implemented directly by VWin32. The user-mode libraries
 135  *       implement Win32 synchronisation routines on top of these low-level
 136  *       primitives. We do it the other way around here :-)
 137  */
 138
 139 /***********************************************************************
 140  *       VWin32_EventCreate     (KERNEL.442)
 141  */
 142 HANDLE WINAPI VWin32_EventCreate(VOID)
 143 {
 144     HANDLE hEvent = CreateEventA( NULL, FALSE, 0, NULL );
 145     return ConvertToGlobalHandle( hEvent );
 146 }
 147
 148 /***********************************************************************
 149  *       VWin32_EventDestroy    (KERNEL.443)
 150  */
 151 VOID WINAPI VWin32_EventDestroy(HANDLE event)
 152 {
 153     CloseHandle( event );
 154 }
 155
 156 /***********************************************************************
 157  *       VWin32_EventWait       (KERNEL.450)
 158  */
 159 VOID WINAPI VWin32_EventWait(HANDLE event)
 160 {
 161     SYSLEVEL_ReleaseWin16Lock();
 162     WaitForSingleObject( event, INFINITE );
 163     SYSLEVEL_RestoreWin16Lock();
 164 }
 165
 166 /***********************************************************************
 167  *       VWin32_EventSet        (KERNEL.451)
 168  */
 169 VOID WINAPI VWin32_EventSet(HANDLE event)
 170 {
 171     SetEvent( event );
 172 }
 173