Fixed a couple of missing event notifications. Some more debugging
[wine] / 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_event_request req;
64     struct open_event_reply reply;
65     int len = name ? strlen(name) + 1 : 0;
66
67     req.access  = access;
68     req.inherit = inherit;
69     CLIENT_SendRequest( REQ_OPEN_EVENT, -1, 2, &req, sizeof(req), name, len );
70     CLIENT_WaitSimpleReply( &reply, sizeof(reply), NULL );
71     if (reply.handle == -1) return 0; /* must return 0 on failure, not -1 */
72     return (HANDLE)reply.handle;
73 }
74
75
76 /***********************************************************************
77  *           OpenEvent32W    (KERNEL32.537)
78  */
79 HANDLE WINAPI OpenEventW( DWORD access, BOOL inherit, LPCWSTR name )
80 {
81     LPSTR nameA = HEAP_strdupWtoA( GetProcessHeap(), 0, name );
82     HANDLE ret = OpenEventA( access, inherit, nameA );
83     if (nameA) HeapFree( GetProcessHeap(), 0, nameA );
84     return ret;
85 }
86
87
88 /***********************************************************************
89  *           EVENT_Operation
90  *
91  * Execute an event operation (set,reset,pulse).
92  */
93 static BOOL EVENT_Operation( HANDLE handle, enum event_op op )
94 {
95     struct event_op_request req;
96
97     req.handle = handle;
98     req.op     = op;
99     CLIENT_SendRequest( REQ_EVENT_OP, -1, 1, &req, sizeof(req) );
100     return !CLIENT_WaitReply( NULL, NULL, 0 );
101 }
102
103
104 /***********************************************************************
105  *           PulseEvent    (KERNEL32.557)
106  */
107 BOOL WINAPI PulseEvent( HANDLE handle )
108 {
109     return EVENT_Operation( handle, PULSE_EVENT );
110 }
111
112
113 /***********************************************************************
114  *           SetEvent    (KERNEL32.644)
115  */
116 BOOL WINAPI SetEvent( HANDLE handle )
117 {
118     return EVENT_Operation( handle, SET_EVENT );
119 }
120
121
122 /***********************************************************************
123  *           ResetEvent    (KERNEL32.586)
124  */
125 BOOL WINAPI ResetEvent( HANDLE handle )
126 {
127     return EVENT_Operation( handle, RESET_EVENT );
128 }
129
130
131 /***********************************************************************
132  * NOTE: The Win95 VWin32_Event routines given below are really low-level
133  *       routines implemented directly by VWin32. The user-mode libraries
134  *       implement Win32 synchronisation routines on top of these low-level
135  *       primitives. We do it the other way around here :-)
136  */
137
138 /***********************************************************************
139  *       VWin32_EventCreate     (KERNEL.442)
140  */
141 HANDLE WINAPI VWin32_EventCreate(VOID)
142 {
143     HANDLE hEvent = CreateEventA( NULL, FALSE, 0, NULL );
144     return ConvertToGlobalHandle( hEvent );
145 }
146
147 /***********************************************************************
148  *       VWin32_EventDestroy    (KERNEL.443)
149  */
150 VOID WINAPI VWin32_EventDestroy(HANDLE event)
151 {
152     CloseHandle( event );
153 }
154
155 /***********************************************************************
156  *       VWin32_EventWait       (KERNEL.450) 
157  */
158 VOID WINAPI VWin32_EventWait(HANDLE event)
159 {
160     SYSLEVEL_ReleaseWin16Lock();
161     WaitForSingleObject( event, INFINITE );
162     SYSLEVEL_RestoreWin16Lock();
163 }
164
165 /***********************************************************************
166  *       VWin32_EventSet        (KERNEL.451)
167  */
168 VOID WINAPI VWin32_EventSet(HANDLE event)
169 {
170     SetEvent( event );
171 }
172