mono/metadata/w32event-win32.c

   1 /**
   2  * \file
   3  * Runtime support for managed Event on Win32
   4  *
   5  * Author:
   6  *      Ludovic Henry (luhenry@microsoft.com)
   7  *
   8  * Licensed under the MIT license. See LICENSE file in the project root for full license information.
   9  */
  10
  11 #include "w32event.h"
  12
  13 #include <windows.h>
  14 #include <winbase.h>
  15 #include <mono/metadata/handle.h>
  16 #include <mono/utils/mono-error-internals.h>
  17 #include "icall-decl.h"
  18
  19 void
  20 mono_w32event_init (void)
  21 {
  22 }
  23
  24 gpointer
  25 mono_w32event_create (gboolean manual, gboolean initial)
  26 {
  27         return CreateEvent (NULL, manual, initial, NULL);
  28 }
  29
  30 gboolean
  31 mono_w32event_close (gpointer handle)
  32 {
  33         return CloseHandle (handle);
  34 }
  35
  36 void
  37 mono_w32event_set (gpointer handle)
  38 {
  39         SetEvent (handle);
  40 }
  41
  42 void
  43 mono_w32event_reset (gpointer handle)
  44 {
  45         ResetEvent (handle);
  46 }
  47
  48 gpointer
  49 ves_icall_System_Threading_Events_CreateEvent_icall (MonoBoolean manual, MonoBoolean initial,
  50         const gunichar2 *name, gint32 name_length, gint32 *win32error, MonoError *error)
  51 {
  52         gpointer event;
  53
  54         MONO_ENTER_GC_SAFE;
  55         event = CreateEventW (NULL, manual, initial, name);
  56         *win32error = GetLastError ();
  57         MONO_EXIT_GC_SAFE;
  58
  59         return event;
  60 }
  61
  62 gboolean
  63 ves_icall_System_Threading_Events_SetEvent_internal (gpointer handle)
  64 {
  65         return SetEvent (handle);
  66 }
  67
  68 gboolean
  69 ves_icall_System_Threading_Events_ResetEvent_internal (gpointer handle)
  70 {
  71         return ResetEvent (handle);
  72 }
  73
  74 void
  75 ves_icall_System_Threading_Events_CloseEvent_internal (gpointer handle)
  76 {
  77         CloseHandle (handle);
  78 }
  79
  80 gpointer
  81 ves_icall_System_Threading_Events_OpenEvent_icall (const gunichar2 *name, gint32 name_length,
  82         gint32 rights, gint32 *win32error, MonoError *error)
  83 {
  84         gpointer handle;
  85
  86         *win32error = ERROR_SUCCESS;
  87
  88         MONO_ENTER_GC_SAFE;
  89         handle = OpenEventW (rights, FALSE, name);
  90         if (!handle)
  91                 *win32error = GetLastError ();
  92         MONO_EXIT_GC_SAFE;
  93
  94         return handle;
  95 }