win-ffi 0.3.1 → 0.3.2

data/lib/win-ffi/functions/advapi32/system_info.rb

@@ -1,17 +1,17 @@
-module WinFFI
-  module Advapi32
-    extend LibBase
-
-    ffi_lib 'advapi32'
-
-    #BOOL WINAPI GetCurrentHwProfile( _Out_  LPHW_PROFILE_INFO lpHwProfileInfo )
-    attach_function 'GetCurrentHwProfileA', [:pointer], :bool
-    attach_function 'GetCurrentHwProfileW', [:pointer], :bool
-
-    #BOOL WINAPI GetUserName(
-    #  _Out_    LPTSTR lpBuffer,
-    #  _Inout_  LPDWORD lpnSize )
-    attach_function 'GetUserNameA', [:pointer, :pointer], :bool
-    attach_function 'GetUserNameW', [:pointer, :pointer], :bool
-  end
+module WinFFI
+  module Advapi32
+    extend LibBase
+
+    ffi_lib 'advapi32'
+
+    #BOOL WINAPI GetCurrentHwProfile( _Out_  LPHW_PROFILE_INFO lpHwProfileInfo )
+    attach_function 'GetCurrentHwProfileA', [:pointer], :bool
+    attach_function 'GetCurrentHwProfileW', [:pointer], :bool
+
+    #BOOL WINAPI GetUserName(
+    #  _Out_    LPTSTR lpBuffer,
+    #  _Inout_  LPDWORD lpnSize )
+    attach_function 'GetUserNameA', [:pointer, :pointer], :bool
+    attach_function 'GetUserNameW', [:pointer, :pointer], :bool
+  end
 end

data/lib/win-ffi/functions/comdlg32.rb

@@ -1,7 +1,7 @@
-module WinFFI
-  module Comdlg32
-    extend LibBase
-
-    ffi_lib 'Comdlg32'
-  end
+module WinFFI
+  module Comdlg32
+    extend LibBase
+
+    ffi_lib 'Comdlg32'
+  end
 end

data/lib/win-ffi/functions/comdlg32/error.rb

@@ -1,6 +1,6 @@
-module WinFFI
-  module Comdlg32
-    #DWORD WINAPI CommDlgExtendedError(void)
-    attach_function 'CommDlgExtendedError', [], :dword
-  end
+module WinFFI
+  module Comdlg32
+    #DWORD WINAPI CommDlgExtendedError(void)
+    attach_function 'CommDlgExtendedError', [], :dword
+  end
 end

data/lib/win-ffi/functions/comdlg32/find_replace.rb

@@ -1,9 +1,9 @@
-module WinFFI
-  module Comdlg32
-    #HWND WINAPI FindText( _In_  LPFINDREPLACE lpfr )
-    attach_function 'FindText', :FindTextA, [:pointer], :pointer
-
-    #HWND WINAPI ReplaceText( _Inout_  LPFINDREPLACE lpfr )
-    attach_function 'ReplaceText', :ReplaceTextA, [:pointer], :pointer
-  end
-end
+module WinFFI
+  module Comdlg32
+    #HWND WINAPI FindText( _In_  LPFINDREPLACE lpfr )
+    attach_function 'FindText', :FindTextA, [:pointer], :pointer
+
+    #HWND WINAPI ReplaceText( _Inout_  LPFINDREPLACE lpfr )
+    attach_function 'ReplaceText', :ReplaceTextA, [:pointer], :pointer
+  end
+end

data/lib/win-ffi/functions/msvcrt/handle.rb

@@ -1,13 +1,13 @@
-module WinFFI
-  module Msvcrt
-    ffi_lib 'msvcrt'
-
-    #intptr_t _get_osfhandle( int fd )
-    attach_function '_get_osfhandle', [:int], :long
-
-    #int _open_osfhandle (
-    #  intptr_t osfhandle,
-    #  int flags )
-    attach_function '_open_osfhandle', [:long, :int], :int
-  end
+module WinFFI
+  module Msvcrt
+    ffi_lib 'msvcrt'
+
+    #intptr_t _get_osfhandle( int fd )
+    attach_function '_get_osfhandle', [:int], :long
+
+    #int _open_osfhandle (
+    #  intptr_t osfhandle,
+    #  int flags )
+    attach_function '_open_osfhandle', [:long, :int], :int
+  end
 end

data/lib/win-ffi/functions/ntdll/system_info.rb

@@ -1,14 +1,14 @@
-module WinFFI
-  module Ntdll
-    extend LibBase
-
-    ffi_lib 'Ntdll'
-
-    #NTSTATUS WINAPI NtQuerySystemInformation(
-    #  _In_       SYSTEM_INFORMATION_CLASS SystemInformationClass,
-    #  _Inout_    PVOID SystemInformation,
-    #  _In_       ULONG SystemInformationLength,
-    #  _Out_opt_  PULONG ReturnLength )
-    attach_function 'NtQuerySystemInformation', [:pointer, :pointer, :ulong, :pointer], :int
-  end
+module WinFFI
+  module Ntdll
+    extend LibBase
+
+    ffi_lib 'Ntdll'
+
+    #NTSTATUS WINAPI NtQuerySystemInformation(
+    #  _In_       SYSTEM_INFORMATION_CLASS SystemInformationClass,
+    #  _Inout_    PVOID SystemInformation,
+    #  _In_       ULONG SystemInformationLength,
+    #  _Out_opt_  PULONG ReturnLength )
+    attach_function 'NtQuerySystemInformation', [:pointer, :pointer, :ulong, :pointer], :int
+  end
 end

data/lib/win-ffi/functions/secur32/system_info.rb

@@ -1,30 +1,30 @@
-module WinFII
-  module Secur32
-    extend LibBase
-
-    ffi_lib 'secur32'
-
-    #BOOLEAN WINAPI GetComputerObjectName(
-    #  _In_     EXTENDED_NAME_FORMAT NameFormat,
-    #  _Out_    LPTSTR lpNameBuffer,
-    #  _Inout_  PULONG lpnSize )
-    attach_function 'GetComputerObjectNameA', [ExtendedNameFormat ,:pointer, :pointer], :bool
-    attach_function 'GetComputerObjectNameW', [ExtendedNameFormat ,:pointer, :pointer], :bool
-
-    #BOOLEAN WINAPI GetUserNameEx(
-    #  _In_     EXTENDED_NAME_FORMAT NameFormat,
-    #  _Out_    LPTSTR lpNameBuffer,
-    #  _Inout_  PULONG lpnSize )
-    attach_function 'GetUserNameExA', [ExtendedNameFormat, :pointer, :pointer], :bool
-    attach_function 'GetUserNameExW', [ExtendedNameFormat, :pointer, :pointer], :bool
-
-    #BOOLEAN WINAPI TranslateName(
-    #  _In_     LPCTSTR lpAccountName,
-    #  _In_     EXTENDED_NAME_FORMAT AccountNameFormat,
-    #  _In_     EXTENDED_NAME_FORMAT DesiredNameFormat,
-    #  _Out_    LPTSTR lpTranslatedName,
-    #  _Inout_  PULONG nSize )
-    attach_function 'TranslateNameA', [:string, ExtendedNameFormat, ExtendedNameFormat, :string, :pointer], :bool
-    attach_function 'TranslateNameW', [:string, ExtendedNameFormat, ExtendedNameFormat, :string, :pointer], :bool
-  end
+module WinFII
+  module Secur32
+    extend LibBase
+
+    ffi_lib 'secur32'
+
+    #BOOLEAN WINAPI GetComputerObjectName(
+    #  _In_     EXTENDED_NAME_FORMAT NameFormat,
+    #  _Out_    LPTSTR lpNameBuffer,
+    #  _Inout_  PULONG lpnSize )
+    attach_function 'GetComputerObjectNameA', [ExtendedNameFormat ,:pointer, :pointer], :bool
+    attach_function 'GetComputerObjectNameW', [ExtendedNameFormat ,:pointer, :pointer], :bool
+
+    #BOOLEAN WINAPI GetUserNameEx(
+    #  _In_     EXTENDED_NAME_FORMAT NameFormat,
+    #  _Out_    LPTSTR lpNameBuffer,
+    #  _Inout_  PULONG lpnSize )
+    attach_function 'GetUserNameExA', [ExtendedNameFormat, :pointer, :pointer], :bool
+    attach_function 'GetUserNameExW', [ExtendedNameFormat, :pointer, :pointer], :bool
+
+    #BOOLEAN WINAPI TranslateName(
+    #  _In_     LPCTSTR lpAccountName,
+    #  _In_     EXTENDED_NAME_FORMAT AccountNameFormat,
+    #  _In_     EXTENDED_NAME_FORMAT DesiredNameFormat,
+    #  _Out_    LPTSTR lpTranslatedName,
+    #  _Inout_  PULONG nSize )
+    attach_function 'TranslateNameA', [:string, ExtendedNameFormat, ExtendedNameFormat, :string, :pointer], :bool
+    attach_function 'TranslateNameW', [:string, ExtendedNameFormat, ExtendedNameFormat, :string, :pointer], :bool
+  end
 end

data/lib/win-ffi/functions/thread.rb

@@ -1,230 +1,230 @@
-module WinFFI
-  module Thread
-    extend LibBase
-
-    SYNCHRONIZE                 = 0x00100000
-    THREAD_ALL_ACCESS           = 0x1F03FF
-    THREAD_DIRECT_IMPERSONATION = 0x0200
-    THREAD_GET_CONTEXT          = 0x0008
-    THREAD_IMPERSONATE          = 0x0100
-    THREAD_QUERY_INFORMATION    = 0x0040
-    THREAD_SET_CONTEXT          = 0x0010
-    THREAD_SET_INFORMATION      = 0x0020
-    THREAD_SET_THREAD_TOKEN     = 0x0080
-    THREAD_SUSPEND_RESUME       = 0x0002
-    THREAD_TERMINATE            = 0x0001
-
-    THREAD_PRIORITY_ABOVE_NORMAL  = 1
-    THREAD_PRIORITY_BELOW_NORMAL  = -1
-    THREAD_PRIORITY_HIGHEST       = 2
-    THREAD_PRIORITY_IDLE          = -15
-    THREAD_PRIORITY_LOWEST        = -2
-    THREAD_PRIORITY_NORMAL        = 0
-    THREAD_PRIORITY_TIME_CRITICAL = 15
-
-    if WindowsVersion >= 7
-
-      ffi_lib 'Avrt'
-
-      #BOOL WINAPI AvRevertMmThreadCharacteristics( _In_  HANDLE AvrtHandle )
-      attach_function 'AvRevertMmThreadCharacteristics', [:handle], :bool
-
-      #BOOL WINAPI AvRtCreateThreadOrderingGroup(
-      #  _Out_     PHANDLE Context,
-      #  _In_      PLARGE_INTEGER Period,
-      #  _Inout_   GUID *ThreadOrderingGuid,
-      #  _In_opt_  PLARGE_INTEGER Timeout )
-      attach_function 'AvRtCreateThreadOrderingGroup', [:pointer, :pointer, :pointer, :pointer], :bool
-
-      #BOOL WINAPI AvRtCreateThreadOrderingGroupEx(
-      #  _Out_     PHANDLE Context,
-      #  _In_      PLARGE_INTEGER Period,
-      #  _Inout_   GUID *ThreadOrderingGuid,
-      #  _In_opt_  PLARGE_INTEGER Timeout,
-      #  _In_      LPCTSTR TaskName )
-      attach_function 'AvRtCreateThreadOrderingGroupExA', [:pointer, :pointer, :pointer, :pointer, :string], :bool
-      attach_function 'AvRtCreateThreadOrderingGroupExW', [:pointer, :pointer, :pointer, :pointer, :string], :bool
-
-      #BOOL WINAPI AvRtDeleteThreadOrderingGroup( _In_  HANDLE Context )
-      attach_function 'AvRtDeleteThreadOrderingGroup', [:handle], :bool
-
-      #BOOL WINAPI AvRtJoinThreadOrderingGroup(
-      #  _Out_  PHANDLE Context,
-      #  _In_   GUID *ThreadOrderingGuid,
-      #  _In_   BOOL Before )
-      attach_function 'AvRtJoinThreadOrderingGroup', [:pointer, :pointer, :bool], :bool
-
-      #BOOL WINAPI AvRtWaitOnThreadOrderingGroup( _In_  HANDLE Context )
-      attach_function 'AvRtWaitOnThreadOrderingGroup', [:handle], :bool
-
-      #HANDLE WINAPI AvSetMmMaxThreadCharacteristics(
-      #  _In_     LPCTSTR FirstTask,
-      #  _In_     LPCTSTR SecondTask,
-      #  _Inout_  LPDWORD TaskIndex )
-      attach_function 'AvSetMmMaxThreadCharacteristicsA', [:string, :string, :pointer], :handle
-      attach_function 'AvSetMmMaxThreadCharacteristicsW', [:string, :string, :pointer], :handle
-
-      #HANDLE WINAPI AvSetMmThreadCharacteristics(
-      #  _In_     LPCTSTR TaskName,
-      #  _Inout_  LPDWORD TaskIndex )
-      attach_function 'AvSetMmThreadCharacteristicsA', [:string, :pointer], :handle
-      attach_function 'AvSetMmThreadCharacteristicsW', [:string, :pointer], :handle
-
-      #BOOL WINAPI AvSetMmThreadPriority(
-      #  _In_  HANDLE AvrtHandle,
-      #  _In_  AVRT_PRIORITY Priority )
-      attach_function 'AvSetMmThreadPriority', [:handle, :int], :bool
-
-    end
-
-    ffi_lib 'kernel32'
-
-    #HANDLE WINAPI CreateRemoteThread(
-    #  _In_   HANDLE hProcess,
-    #  _In_   LPSECURITY_ATTRIBUTES lpThreadAttributes,
-    #  _In_   SIZE_T dwStackSize,
-    #  _In_   LPTHREAD_START_ROUTINE lpStartAddress,
-    #  _In_   LPVOID lpParameter,
-    #  _In_   DWORD dwCreationFlags,
-    #  _Out_  LPDWORD lpThreadId )
-    attach_function 'CreateRemoteThread', [:handle, :pointer, :size_t, :pointer, :pointer, :dword, :pointer], :handle
-
-    #HANDLE WINAPI CreateThread(
-    #  _In_opt_   LPSECURITY_ATTRIBUTES lpThreadAttributes,
-    #  _In_       SIZE_T dwStackSize,
-    #  _In_       LPTHREAD_START_ROUTINE lpStartAddress,
-    #  _In_opt_   LPVOID lpParameter,
-    #  _In_       DWORD dwCreationFlags,
-    #  _Out_opt_  LPDWORD lpThreadId )
-    attach_function 'CreateThread', [:pointer, :size_t, :pointer, :pointer, :dword, :pointer], :handle
-
-    #VOID WINAPI ExitThread( _In_  DWORD dwExitCode )
-    attach_function 'ExitThread', [:dword], :void
-
-    #HANDLE WINAPI GetCurrentThread(void)
-    attach_function 'GetCurrentThread', [], :handle
-
-    #DWORD WINAPI GetCurrentThreadId(void)
-    attach_function 'GetCurrentThreadId', [], :ulong
-
-    #BOOL WINAPI GetExitCodeThread(
-    #  _In_   HANDLE hThread,
-    #  _Out_  LPDWORD lpExitCode )
-    attach_function 'GetExitCodeThread', [:handle, :pointer], :bool
-
-    #int WINAPI GetThreadPriority( _In_  HANDLE hThread )
-    attach_function 'GetThreadPriority', [:handle], :int
-
-    #BOOL WINAPI GetThreadPriorityBoost(
-    #  _In_   HANDLE hThread,
-    #  _Out_  PBOOL pDisablePriorityBoost )
-    attach_function 'GetThreadPriorityBoost', [:pointer, :pointer], :bool
-
-    #BOOL WINAPI GetThreadTimes(
-    #  _In_   HANDLE hThread,
-    #  _Out_  LPFILETIME lpCreationTime,
-    #  _Out_  LPFILETIME lpExitTime,
-    #  _Out_  LPFILETIME lpKernelTime,
-    #  _Out_  LPFILETIME lpUserTime )
-    attach_function 'GetThreadTimes', [:handle, :pointer, :pointer, :pointer, :pointer], :bool
-
-    #HANDLE WINAPI OpenThread(
-    #  _In_  DWORD dwDesiredAccess,
-    #  _In_  BOOL bInheritHandle,
-    #  _In_  DWORD dwThreadId )
-    attach_function 'OpenThread', [:dword, :bool, :dword], :handle
-
-    #DWORD WINAPI ResumeThread( _In_  HANDLE hThread )
-    attach_function 'ResumeThread', [:handle], :dword
-
-    #DWORD_PTR WINAPI SetThreadAffinityMask(
-    #  _In_  HANDLE hThread,
-    #  _In_  DWORD_PTR dwThreadAffinityMask )
-    attach_function 'SetThreadAffinityMask', [:handle, :pointer], :ulong
-
-    #DWORD WINAPI SetThreadIdealProcessor(
-    #  _In_  HANDLE hThread,
-    #  _In_  DWORD dwIdealProcessor )
-    attach_function 'SetThreadIdealProcessor', [:handle, :dword], :dword
-
-    #BOOL WINAPI SetThreadPriority(
-    #  _In_  HANDLE hThread,
-    #  _In_  int nPriority )
-    attach_function 'SetThreadPriority', [:handle, :int], :bool
-
-    #BOOL WINAPI SetThreadPriorityBoost(
-    #  _In_  HANDLE hThread,
-    #  _In_  BOOL DisablePriorityBoost )
-    attach_function 'SetThreadPriorityBoost', [:handle, :bool], :bool
-
-    #VOID WINAPI Sleep( _In_  DWORD dwMilliseconds )
-    attach_function 'Sleep', [:dword], :void
-
-    #DWORD WINAPI SleepEx(
-    #  _In_  DWORD dwMilliseconds,
-    #  _In_  BOOL bAlertable )
-    attach_function 'SleepEx', [:dword, :bool], :dword
-
-    #DWORD WINAPI SuspendThread( _In_  HANDLE hThread )
-    attach_function 'SuspendThread', [:handle], :dword
-
-    #BOOL WINAPI SwitchToThread(void)
-    attach_function 'SwitchToThread', [], :bool
-
-    #BOOL WINAPI TerminateThread(
-    #  _Inout_  HANDLE hThread,
-    #  _In_     DWORD dwExitCode )
-    attach_function 'TerminateThread', [:handle, :dword], :bool
-
-    #DWORD WINAPI TlsAlloc(void)
-    attach_function 'TlsAlloc', [], :dword
-
-    #BOOL WINAPI TlsFree( _In_  DWORD dwTlsIndex )
-    attach_function 'TlsFree', [:dword], :bool
-
-    #LPVOID WINAPI TlsGetValue( _In_  DWORD dwTlsIndex )
-    attach_function 'TlsGetValue', [:dword], :pointer
-
-    #BOOL WINAPI TlsSetValue(
-    #  _In_      DWORD dwTlsIndex,
-    #  _In_opt_  LPVOID lpTlsValue )
-    attach_function 'TlsSetValue', [:dword, :pointer], :bool
-
-    if WindowsVersion >= 7
-
-      #HANDLE CreateRemoteThreadEx(
-      #  _In_       HANDLE hProcess,
-      #  _In_opt_   LPSECURITY_ATTRIBUTES lpThreadAttributes,
-      #  _In_       SIZE_T dwStackSize,
-      #  _In_       LPTHREAD_START_ROUTINE lpStartAddress,
-      #  _In_opt_   LPVOID lpParameter,
-      #  _In_       DWORD dwCreationFlags,
-      #  _In_opt_   LPPROC_THREAD_ATTRIBUTE_LIST lpAttributeList,
-      #  _Out_opt_  LPDWORD lpThreadId )
-      attach_function 'CreateRemoteThreadEx', [:handle, :pointer, :size_t, :pointer, :pointer, :dword, :pointer, :pointer], :bool
-    end
-
-    if WindowsVersion >= :xp
-
-      ffi_lib 'user32'
-
-      #BOOL WINAPI AttachThreadInput(
-      #  _In_  DWORD idAttach,
-      #  _In_  DWORD idAttachTo,
-      #  _In_  BOOL fAttach )
-      attach_function 'AttachThreadInput', [:dword, :dword, :bool], :bool
-
-      if WindowsVersion.sp >= 1
-
-        ffi_lib 'kernel32'
-
-        #BOOL WINAPI GetThreadIOPendingFlag(
-        #  _In_     HANDLE hThread,
-        #  _Inout_  PBOOL lpIOIsPending )
-        attach_function 'GetThreadIOPendingFlag', [:ulong, :pointer], :bool
-
-      end
-
-    end
-  end
+module WinFFI
+  module Thread
+    extend LibBase
+
+    SYNCHRONIZE                 = 0x00100000
+    THREAD_ALL_ACCESS           = 0x1F03FF
+    THREAD_DIRECT_IMPERSONATION = 0x0200
+    THREAD_GET_CONTEXT          = 0x0008
+    THREAD_IMPERSONATE          = 0x0100
+    THREAD_QUERY_INFORMATION    = 0x0040
+    THREAD_SET_CONTEXT          = 0x0010
+    THREAD_SET_INFORMATION      = 0x0020
+    THREAD_SET_THREAD_TOKEN     = 0x0080
+    THREAD_SUSPEND_RESUME       = 0x0002
+    THREAD_TERMINATE            = 0x0001
+
+    THREAD_PRIORITY_ABOVE_NORMAL  = 1
+    THREAD_PRIORITY_BELOW_NORMAL  = -1
+    THREAD_PRIORITY_HIGHEST       = 2
+    THREAD_PRIORITY_IDLE          = -15
+    THREAD_PRIORITY_LOWEST        = -2
+    THREAD_PRIORITY_NORMAL        = 0
+    THREAD_PRIORITY_TIME_CRITICAL = 15
+
+    if WindowsVersion >= 7
+
+      ffi_lib 'Avrt'
+
+      #BOOL WINAPI AvRevertMmThreadCharacteristics( _In_  HANDLE AvrtHandle )
+      attach_function 'AvRevertMmThreadCharacteristics', [:handle], :bool
+
+      #BOOL WINAPI AvRtCreateThreadOrderingGroup(
+      #  _Out_     PHANDLE Context,
+      #  _In_      PLARGE_INTEGER Period,
+      #  _Inout_   GUID *ThreadOrderingGuid,
+      #  _In_opt_  PLARGE_INTEGER Timeout )
+      attach_function 'AvRtCreateThreadOrderingGroup', [:pointer, :pointer, :pointer, :pointer], :bool
+
+      #BOOL WINAPI AvRtCreateThreadOrderingGroupEx(
+      #  _Out_     PHANDLE Context,
+      #  _In_      PLARGE_INTEGER Period,
+      #  _Inout_   GUID *ThreadOrderingGuid,
+      #  _In_opt_  PLARGE_INTEGER Timeout,
+      #  _In_      LPCTSTR TaskName )
+      attach_function 'AvRtCreateThreadOrderingGroupExA', [:pointer, :pointer, :pointer, :pointer, :string], :bool
+      attach_function 'AvRtCreateThreadOrderingGroupExW', [:pointer, :pointer, :pointer, :pointer, :string], :bool
+
+      #BOOL WINAPI AvRtDeleteThreadOrderingGroup( _In_  HANDLE Context )
+      attach_function 'AvRtDeleteThreadOrderingGroup', [:handle], :bool
+
+      #BOOL WINAPI AvRtJoinThreadOrderingGroup(
+      #  _Out_  PHANDLE Context,
+      #  _In_   GUID *ThreadOrderingGuid,
+      #  _In_   BOOL Before )
+      attach_function 'AvRtJoinThreadOrderingGroup', [:pointer, :pointer, :bool], :bool
+
+      #BOOL WINAPI AvRtWaitOnThreadOrderingGroup( _In_  HANDLE Context )
+      attach_function 'AvRtWaitOnThreadOrderingGroup', [:handle], :bool
+
+      #HANDLE WINAPI AvSetMmMaxThreadCharacteristics(
+      #  _In_     LPCTSTR FirstTask,
+      #  _In_     LPCTSTR SecondTask,
+      #  _Inout_  LPDWORD TaskIndex )
+      attach_function 'AvSetMmMaxThreadCharacteristicsA', [:string, :string, :pointer], :handle
+      attach_function 'AvSetMmMaxThreadCharacteristicsW', [:string, :string, :pointer], :handle
+
+      #HANDLE WINAPI AvSetMmThreadCharacteristics(
+      #  _In_     LPCTSTR TaskName,
+      #  _Inout_  LPDWORD TaskIndex )
+      attach_function 'AvSetMmThreadCharacteristicsA', [:string, :pointer], :handle
+      attach_function 'AvSetMmThreadCharacteristicsW', [:string, :pointer], :handle
+
+      #BOOL WINAPI AvSetMmThreadPriority(
+      #  _In_  HANDLE AvrtHandle,
+      #  _In_  AVRT_PRIORITY Priority )
+      attach_function 'AvSetMmThreadPriority', [:handle, :int], :bool
+
+    end
+
+    ffi_lib 'kernel32'
+
+    #HANDLE WINAPI CreateRemoteThread(
+    #  _In_   HANDLE hProcess,
+    #  _In_   LPSECURITY_ATTRIBUTES lpThreadAttributes,
+    #  _In_   SIZE_T dwStackSize,
+    #  _In_   LPTHREAD_START_ROUTINE lpStartAddress,
+    #  _In_   LPVOID lpParameter,
+    #  _In_   DWORD dwCreationFlags,
+    #  _Out_  LPDWORD lpThreadId )
+    attach_function 'CreateRemoteThread', [:handle, :pointer, :size_t, :pointer, :pointer, :dword, :pointer], :handle
+
+    #HANDLE WINAPI CreateThread(
+    #  _In_opt_   LPSECURITY_ATTRIBUTES lpThreadAttributes,
+    #  _In_       SIZE_T dwStackSize,
+    #  _In_       LPTHREAD_START_ROUTINE lpStartAddress,
+    #  _In_opt_   LPVOID lpParameter,
+    #  _In_       DWORD dwCreationFlags,
+    #  _Out_opt_  LPDWORD lpThreadId )
+    attach_function 'CreateThread', [:pointer, :size_t, :pointer, :pointer, :dword, :pointer], :handle
+
+    #VOID WINAPI ExitThread( _In_  DWORD dwExitCode )
+    attach_function 'ExitThread', [:dword], :void
+
+    #HANDLE WINAPI GetCurrentThread(void)
+    attach_function 'GetCurrentThread', [], :handle
+
+    #DWORD WINAPI GetCurrentThreadId(void)
+    attach_function 'GetCurrentThreadId', [], :ulong
+
+    #BOOL WINAPI GetExitCodeThread(
+    #  _In_   HANDLE hThread,
+    #  _Out_  LPDWORD lpExitCode )
+    attach_function 'GetExitCodeThread', [:handle, :pointer], :bool
+
+    #int WINAPI GetThreadPriority( _In_  HANDLE hThread )
+    attach_function 'GetThreadPriority', [:handle], :int
+
+    #BOOL WINAPI GetThreadPriorityBoost(
+    #  _In_   HANDLE hThread,
+    #  _Out_  PBOOL pDisablePriorityBoost )
+    attach_function 'GetThreadPriorityBoost', [:pointer, :pointer], :bool
+
+    #BOOL WINAPI GetThreadTimes(
+    #  _In_   HANDLE hThread,
+    #  _Out_  LPFILETIME lpCreationTime,
+    #  _Out_  LPFILETIME lpExitTime,
+    #  _Out_  LPFILETIME lpKernelTime,
+    #  _Out_  LPFILETIME lpUserTime )
+    attach_function 'GetThreadTimes', [:handle, :pointer, :pointer, :pointer, :pointer], :bool
+
+    #HANDLE WINAPI OpenThread(
+    #  _In_  DWORD dwDesiredAccess,
+    #  _In_  BOOL bInheritHandle,
+    #  _In_  DWORD dwThreadId )
+    attach_function 'OpenThread', [:dword, :bool, :dword], :handle
+
+    #DWORD WINAPI ResumeThread( _In_  HANDLE hThread )
+    attach_function 'ResumeThread', [:handle], :dword
+
+    #DWORD_PTR WINAPI SetThreadAffinityMask(
+    #  _In_  HANDLE hThread,
+    #  _In_  DWORD_PTR dwThreadAffinityMask )
+    attach_function 'SetThreadAffinityMask', [:handle, :pointer], :ulong
+
+    #DWORD WINAPI SetThreadIdealProcessor(
+    #  _In_  HANDLE hThread,
+    #  _In_  DWORD dwIdealProcessor )
+    attach_function 'SetThreadIdealProcessor', [:handle, :dword], :dword
+
+    #BOOL WINAPI SetThreadPriority(
+    #  _In_  HANDLE hThread,
+    #  _In_  int nPriority )
+    attach_function 'SetThreadPriority', [:handle, :int], :bool
+
+    #BOOL WINAPI SetThreadPriorityBoost(
+    #  _In_  HANDLE hThread,
+    #  _In_  BOOL DisablePriorityBoost )
+    attach_function 'SetThreadPriorityBoost', [:handle, :bool], :bool
+
+    #VOID WINAPI Sleep( _In_  DWORD dwMilliseconds )
+    attach_function 'Sleep', [:dword], :void
+
+    #DWORD WINAPI SleepEx(
+    #  _In_  DWORD dwMilliseconds,
+    #  _In_  BOOL bAlertable )
+    attach_function 'SleepEx', [:dword, :bool], :dword
+
+    #DWORD WINAPI SuspendThread( _In_  HANDLE hThread )
+    attach_function 'SuspendThread', [:handle], :dword
+
+    #BOOL WINAPI SwitchToThread(void)
+    attach_function 'SwitchToThread', [], :bool
+
+    #BOOL WINAPI TerminateThread(
+    #  _Inout_  HANDLE hThread,
+    #  _In_     DWORD dwExitCode )
+    attach_function 'TerminateThread', [:handle, :dword], :bool
+
+    #DWORD WINAPI TlsAlloc(void)
+    attach_function 'TlsAlloc', [], :dword
+
+    #BOOL WINAPI TlsFree( _In_  DWORD dwTlsIndex )
+    attach_function 'TlsFree', [:dword], :bool
+
+    #LPVOID WINAPI TlsGetValue( _In_  DWORD dwTlsIndex )
+    attach_function 'TlsGetValue', [:dword], :pointer
+
+    #BOOL WINAPI TlsSetValue(
+    #  _In_      DWORD dwTlsIndex,
+    #  _In_opt_  LPVOID lpTlsValue )
+    attach_function 'TlsSetValue', [:dword, :pointer], :bool
+
+    if WindowsVersion >= 7
+
+      #HANDLE CreateRemoteThreadEx(
+      #  _In_       HANDLE hProcess,
+      #  _In_opt_   LPSECURITY_ATTRIBUTES lpThreadAttributes,
+      #  _In_       SIZE_T dwStackSize,
+      #  _In_       LPTHREAD_START_ROUTINE lpStartAddress,
+      #  _In_opt_   LPVOID lpParameter,
+      #  _In_       DWORD dwCreationFlags,
+      #  _In_opt_   LPPROC_THREAD_ATTRIBUTE_LIST lpAttributeList,
+      #  _Out_opt_  LPDWORD lpThreadId )
+      attach_function 'CreateRemoteThreadEx', [:handle, :pointer, :size_t, :pointer, :pointer, :dword, :pointer, :pointer], :bool
+    end
+
+    if WindowsVersion >= :xp
+
+      ffi_lib 'user32'
+
+      #BOOL WINAPI AttachThreadInput(
+      #  _In_  DWORD idAttach,
+      #  _In_  DWORD idAttachTo,
+      #  _In_  BOOL fAttach )
+      attach_function 'AttachThreadInput', [:dword, :dword, :bool], :bool
+
+      if WindowsVersion.sp >= 1
+
+        ffi_lib 'kernel32'
+
+        #BOOL WINAPI GetThreadIOPendingFlag(
+        #  _In_     HANDLE hThread,
+        #  _Inout_  PBOOL lpIOIsPending )
+        attach_function 'GetThreadIOPendingFlag', [:ulong, :pointer], :bool
+
+      end
+
+    end
+  end
 end