win-ffi 0.3.0

data/lib/win-ffi/functions/user32/hook.rb

@@ -0,0 +1,123 @@
+require 'win-ffi/functions/user32'
+
+require 'win-ffi/enums/user32/window_hook'
+
+require 'win-ffi/structs/user32/msg'
+
+module WinFFI
+  module User32
+    #BOOL WINAPI CallMsgFilter(
+    #  _In_  LPMSG lpMsg,
+    #  _In_  int nCode )
+    attach_function 'CallMsgFilterA', [MSG.ptr, :int], :bool
+    attach_function 'CallMsgFilterW', [MSG.ptr, :int], :bool
+
+    #LRESULT WINAPI CallNextHookEx(
+    #  _In_opt_  HHOOK hhk,
+    #  _In_      int nCode,
+    #  _In_      WPARAM wParam,
+    #  _In_      LPARAM lParam )
+    attach_function 'CallNextHookEx', [:pointer, :int, :wparam, :lparam], :lresult
+
+    #LRESULT CALLBACK CallWndProc(
+    #  _In_  int nCode,
+    #  _In_  WPARAM wParam,
+    #  _In_  LPARAM lParam )
+    CallWndProc = callback :CallWndProc, [:int, :wparma, :lparam], :lresult
+
+    #LRESULT CALLBACK CallWndRetProc(
+    #  _In_  int nCode,
+    #  _In_  WPARAM wParam,
+    #  _In_  LPARAM lParam )
+    CallWndRetProc = callback :CallWndRetProc, [:int, :wparma, :lparam], :lresult
+
+    #LRESULT CALLBACK CBTProc(
+    #  _In_  int nCode,
+    #  _In_  WPARAM wParam,
+    #  _In_  LPARAM lParam )
+    CBTProc = callback :CBTProc, [:int, :wparma, :lparam], :lresult
+
+    #LRESULT CALLBACK DebugProc(
+    #  _In_  int nCode,
+    #  _In_  WPARAM wParam,
+    #  _In_  LPARAM lParam )
+    DebugProc = callback :DebugProc, [:int, :wparma, :lparam], :lresult
+
+    #DWORD CALLBACK ForegroundIdleProc(
+    #  _In_  int code,
+    #  DWORD wParam,
+    #  LONG lParam )
+    ForegroundIdleProc = callback :ForegroundIdleProc, [:int, :wparma, :lparam], :lresult
+
+    #LRESULT CALLBACK GetMsgProc(
+    #  _In_  int code,
+    #  _In_  WPARAM wParam,
+    #  _In_  LPARAM lParam )
+    GetMsgProc = callback :GetMsgProc, [:int, :wparma, :lparam], :lresult
+
+    #LRESULT CALLBACK JournalPlaybackProc(
+    #  _In_  int code,
+    #  WPARAM wParam,
+    #  _In_  LPARAM lParam )
+    JournalPlaybackProc = callback :JournalPlaybackProc, [:int, :wparma, :lparam], :lresult
+
+    #LRESULT CALLBACK JournalRecordProc(
+    #  _In_  int code,
+    #  WPARAM wParam,
+    #  _In_  LPARAM lParam )
+    JournalRecordProc = callback :JournalRecordProc, [:int, :wparma, :lparam], :lresult
+
+    #LRESULT CALLBACK KeyboardProc(
+    #  _In_  int code,
+    #  _In_  WPARAM wParam,
+    #  _In_  LPARAM lParam )
+    KeyboardProc = callback :KeyboardProc, [:int, :wparma, :lparam], :lresult
+
+    #LRESULT CALLBACK LowLevelKeyboardProc(
+    #  _In_  int nCode,
+    #  _In_  WPARAM wParam,
+    #  _In_  LPARAM lParam )
+    LowLevelKeyboardProc = callback :LowLevelKeyboardProc, [:int, :wparma, :lparam], :lresult
+
+    #LRESULT CALLBACK LowLevelMouseProc(
+    #  _In_  int nCode,
+    #  _In_  WPARAM wParam,
+    #  _In_  LPARAM lParam )
+    LowLevelMouseProc = callback :LowLevelMouseProc, [:int, :wparma, :lparam], :lresult
+
+    #LRESULT CALLBACK MessageProc(
+    #  _In_  int code,
+    #  WPARAM wParam,
+    #  _In_  LPARAM lParam )
+    MessageProc = callback :MessageProc, [:int, :wparma, :lparam], :lresult
+
+    #LRESULT CALLBACK MouseProc(
+    #  _In_  int nCode,
+    #  _In_  WPARAM wParam,
+    #  _In_  LPARAM lParam )
+    MouseProc = callback :MouseProc, [:int, :wparma, :lparam], :lresult
+
+    #HHOOK WINAPI SetWindowsHookEx(
+    #  _In_  int idHook,
+    #  _In_  HOOKPROC lpfn,
+    #  _In_  HINSTANCE hMod,
+    #  _In_  DWORD dwThreadId )
+    attach_function 'SetWindowsHookExA', [WindowHook, :pointer, :pointer, :dword], :pointer
+    attach_function 'SetWindowsHookExW', [WindowHook, :pointer, :pointer, :dword], :pointer
+
+    #LRESULT CALLBACK ShellProc(
+    #  _In_  int nCode,
+    #  _In_  WPARAM wParam,
+    #  _In_  LPARAM lParam )
+    ShellProc = callback :ShellProc, [:int, :wparma, :lparam], :lresult
+
+    #LRESULT CALLBACK SysMsgProc(
+    #  _In_  int nCode,
+    #  WPARAM wParam,
+    #  _In_  LPARAM lParam )
+    SysMsgProc = callback :SysMsgProc, [:int, :wparma, :lparam], :lresult
+
+    #BOOL WINAPI UnhookWindowsHookEx( _In_  HHOOK hhk )
+    attach_function 'UnhookWindowsHookEx', [:pointer], :bool
+  end
+end

data/lib/win-ffi/functions/user32/icon.rb

@@ -0,0 +1,98 @@
+require 'win-ffi/functions/user32'
+
+require 'win-ffi/enums/lr'
+
+require 'win-ffi/structs/user32/icon_info'
+require 'win-ffi/structs/user32/icon_info_ex'
+
+module WinFFI
+  module User32
+    #HICON WINAPI CopyIcon( _In_  HICON hIcon )
+    attach_function 'CopyIcon', [:hicon], :hicon
+
+    #HICON WINAPI CreateIcon(
+    #  _In_opt_  HINSTANCE hInstance,
+    #  _In_      int nWidth,
+    #  _In_      int nHeight,
+    #  _In_      BYTE cPlanes,
+    #  _In_      BYTE cBitsPixel,
+    #  _In_      const BYTE *lpbANDbits,
+    #  _In_      const BYTE *lpbXORbits )
+    attach_function 'CreateIcon' , [:hinstance, :int, :int, :byte, :byte, :pointer, :pointer], :hicon
+
+    #HICON WINAPI CreateIconFromResource(
+    #  _In_  PBYTE presbits,
+    #  _In_  DWORD dwResSize,
+    #  _In_  BOOL fIcon,
+    #  _In_  DWORD dwVer )
+    attach_function 'CreateIconFromResource', [:pointer, :dword, :bool, :dword], :hicon
+
+    #HICON WINAPI CreateIconFromResourceEx(
+    #  _In_  PBYTE pbIconBits,
+    #  _In_  DWORD cbIconBits,
+    #  _In_  BOOL fIcon,
+    #  _In_  DWORD dwVersion,
+    #  _In_  int cxDesired,
+    #  _In_  int cyDesired,
+    #  _In_  UINT uFlags )
+    attach_function 'CreateIconFromResourceEx', [:pointer, :dword, :bool, :dword, :int, :int, :uint], :hicon
+
+    #HICON WINAPI CreateIconIndirect( _In_  PICONINFO piconinfo )
+    attach_function 'CreateIconIndirect',  [:pointer], :hicon
+
+    #BOOL WINAPI DrawIcon(
+    #  _In_  HDC hDC,
+    #  _In_  int X,
+    #  _In_  int Y,
+    #  _In_  HICON hIcon )
+    attach_function 'DrawIcon', [:hdc, :int, :int, :hicon], :bool
+
+    #BOOL WINAPI DestroyIcon( _In_  HICON hIcon )
+    attach_function 'DestroyIcon', [:hicon], :bool
+
+    #BOOL WINAPI DrawIconEx(
+    #  _In_      HDC hdc,
+    #  _In_      int xLeft,
+    #  _In_      int yTop,
+    #  _In_      HICON hIcon,
+    #  _In_      int cxWidth,
+    #  _In_      int cyWidth,
+    #  _In_      UINT istepIfAniCur,
+    #  _In_opt_  HBRUSH hbrFlickerFreeDraw,
+    #  _In_      UINT diFlags )
+    attach_function 'DrawIconEx', [:hdc, :int, :int, :hicon, :int, :int, :uint, :hbrush, :uint], :bool
+
+    #BOOL WINAPI GetIconInfo(
+    #  _In_   HICON hIcon,
+    #  _Out_  PICONINFO piconinfo )
+    attach_function 'GetIconInfo', [:hicon, ICONINFO.ptr], :bool
+
+    if WindowsVersion >= :vista
+
+      #BOOL WINAPI GetIconInfoEx(
+      #  _In_     HICON hIcon,
+      #  _Inout_  PICONINFOEX piconinfoex )
+      attach_function 'GetIconInfoExA', [:hicon, ICONINFOEX.ptr], :bool
+      attach_function 'GetIconInfoExW', [:hicon, ICONINFOEX.ptr], :bool
+    end
+
+    #HICON LoadIcon(
+    #  __in_opt  HINSTANCE hInstance,
+    #  __in      LPCTSTR   lpIconName)
+    attach_function 'LoadIconA', [:hinstance, :pointer], :hicon
+    attach_function 'LoadIconW', [:hinstance, :pointer], :hicon
+
+    #int WINAPI LookupIconIdFromDirectory(
+    #  _In_  PBYTE presbits,
+    #  _In_  BOOL fIcon )
+    attach_function 'LookupIconIdFromDirectory', [:pointer, :bool], :int
+
+    #int WINAPI LookupIconIdFromDirectoryEx(
+    #  _In_  PBYTE presbits,
+    #  _In_  BOOL fIcon,
+    #  _In_  int cxDesired,
+    #  _In_  int cyDesired,
+    #  _In_  UINT Flags )
+    attach_function 'LookupIconIdFromDirectoryEx', [:pointer, :bool, :int, :int, LR], :int
+  end
+end

data/lib/win-ffi/functions/user32/input.rb

@@ -0,0 +1,23 @@
+require 'win-ffi/functions/user32'
+
+require 'win-ffi/enums/user32/feedback_type'
+
+module WinFFI
+  module User32
+    #BOOL WINAPI GetWindowFeedbackSetting(
+    #  _In_       HWND hwnd,
+    #  _In_       FEEDBACK_TYPE feedback,
+    #  _In_       DWORD dwFlags,
+    #  _Inout_    UINT32 *pSize,
+    #  _Out_opt_  VOID *config )
+    attach_function 'GetWindowFeedbackSetting', [:hwnd, FEEDBACK_TYPE, :dword, :pointer, :pointer], :bool
+
+    #BOOL WINAPI SetWindowFeedbackSetting(
+    #  _In_      HWND hwnd,
+    #  _In_      FEEDBACK_TYPE feedback,
+    #  _In_      DWORD dwFlags,
+    #  _In_      UINT32 size,
+    #  _In_opt_  const VOID *configuration )
+    attach_function 'SetWindowFeedbackSetting', [:hwnd, FEEDBACK_TYPE, :dword, :uint32, :pointer], :bool
+  end
+end

data/lib/win-ffi/functions/user32/keyboard.rb

@@ -0,0 +1,177 @@
+require 'win-ffi/functions/user32'
+
+require 'win-ffi/enums/user32/keyboard_layout_flags'
+require 'win-ffi/enums/user32/virtual_key_flags'
+require 'win-ffi/enums/user32/keyboard_modifiers'
+require 'win-ffi/enums/user32/map_virtual_key'
+require 'win-ffi/enums/user32/key_event_flags'
+
+require 'win-ffi/structs/user32/last_input_info'
+
+module WinFFI
+  module User32
+    #HKL WINAPI ActivateKeyboardLayout( _In_  HKL hkl, _In_  UINT Flags )
+    attach_function 'ActivateKeyboardLayout', [:hkl, KeyboardLayoutFlags], :hkl
+
+    #BOOL WINAPI BlockInput( _In_  BOOL fBlockIt )
+    attach_function 'BlockInput', [:bool], :bool
+
+    #BOOL WINAPI EnableWindow(
+    #  __in HWND hWnd,
+    #  __in BOOL bEnable)
+    attach_function 'EnableWindow', [:hwnd, :bool], :bool
+
+    #HWND WINAPI GetActiveWindow(void);
+    attach_function 'GetActiveWindow', [], :hwnd
+
+    #SHORT WINAPI GetAsyncKeyState#(_In_  int vKey)
+    attach_function 'GetAsyncKeyState', [VirtualKeyFlags], :short
+
+    #HWND WINAPI GetFocus(void)
+    attach_function 'GetFocus', [], :hwnd
+
+    #UINT WINAPI GetKBCodePage(void)
+    attach_function 'GetKBCodePage', [], :uint
+
+    #HKL WINAPI GetKeyboardLayout( _In_  DWORD idThread )
+    attach_function 'GetKeyboardLayout', [:dword], :hkl
+
+    #int WINAPI GetKeyboardLayoutList(
+    #  _In_   int nBuff,
+    #  _Out_  HKL *lpList )
+    attach_function 'GetKeyboardLayoutList', [:int, :hkl], :int
+
+    #BOOL WINAPI GetKeyboardLayoutName( _Out_  LPTSTR pwszKLID )
+    attach_function 'GetKeyboardLayoutNameA', [:string], :bool
+    attach_function 'GetKeyboardLayoutNameW', [:string], :bool
+
+    #BOOL WINAPI GetKeyboardState( _Out_  PBYTE lpKeyState )
+    attach_function 'GetKeyboardState', [:pointer], :bool
+
+    #int WINAPI GetKeyboardType( _In_  int nTypeFlag )
+    attach_function 'GetKeyboardType', [:int], :int
+
+    #int WINAPI GetKeyNameText(
+    #  _In_   LONG lParam,
+    #  _Out_  LPTSTR lpString,
+    #  _In_   int cchSize )
+    attach_function 'GetKeyNameTextA', [:long, :string, :int], :int
+    attach_function 'GetKeyNameTextW', [:long, :string, :int], :int
+
+    #SHORT WINAPI GetKeyState()_In_  int nVirtKey)
+    attach_function 'GetKeyState', [VirtualKeyFlags], :short
+
+    #BOOL WINAPI GetLastInputInfo( _Out_  PLASTINPUTINFO plii )
+    attach_function 'GetLastInputInfo', [LASTINPUTINFO.ptr], :bool
+
+    #BOOL WINAPI IsWindowEnabled( _In_  HWND hWnd )
+    attach_function 'IsWindowEnabled', [:hwnd], :bool
+
+    #Use SendInput instead
+    #VOID WINAPI keybd_event(
+    #  _In_  BYTE bVk,
+    #  _In_  BYTE bScan,
+    #  _In_  DWORD dwFlags,
+    #  _In_  ULONG_PTR dwExtraInfo )
+    attach_function 'keybd_event', [VirtualKeyFlags, :byte, KeyEventFlags, :ulong], :void
+
+    #HKL WINAPI LoadKeyboardLayout(
+    #  _In_  LPCTSTR pwszKLID,
+    #  _In_  UINT Flags )
+    attach_function 'LoadKeyboardLayoutA', [:string, KeyboardLayoutFlags], :hkl
+    attach_function 'LoadKeyboardLayoutW', [:string, KeyboardLayoutFlags], :hkl
+
+    #UINT WINAPI MapVirtualKey(
+    #  _In_  UINT uCode,
+    #  _In_  UINT uMapType )
+    attach_function 'MapVirtualKeyA', [VirtualKeyFlags, MapVirtualKey], :uint
+    attach_function 'MapVirtualKeyW', [VirtualKeyFlags, MapVirtualKey], :uint
+
+    #UINT WINAPI MapVirtualKeyEx(
+    #  _In_         UINT uCode,
+    #  _In_         UINT uMapType,
+    #  _Inout_opt_  HKL dwhkl )
+    attach_function 'MapVirtualKeyExA', [VirtualKeyFlags, MapVirtualKey, :hkl], :uint
+    attach_function 'MapVirtualKeyExW', [VirtualKeyFlags, MapVirtualKey, :hkl], :uint
+
+    #DWORD WINAPI OemKeyScan( _In_  WORD wOemChar )
+    attach_function 'OemKeyScan', [:word], :dword
+
+    #BOOL WINAPI RegisterHotKey(
+    #  __in_opt  HWND hWnd,
+    #  __in      int  id,
+    #  __in      UINT fsModifiers,
+    #  __in      UINT vk)
+    attach_function 'RegisterHotKey', [:hwnd, :int, KeyboardModifiers, VirtualKeyFlags], :bool
+
+    #TODO
+    #UINT WINAPI SendInput(
+    #  _In_  UINT nInputs,
+    #  _In_  LPINPUT pInputs,
+    #  _In_  int cbSize )
+    attach_function 'SendInput', [:uint, :pointer, :int], :uint
+
+    #HWND WINAPI SetActiveWindow( _In_  HWND hWnd )
+    attach_function 'SetActiveWindow', [:hwnd], :hwnd
+
+    #HWND WINAPI SetFocus( _In_opt_  HWND hWnd )
+    attach_function 'SetFocus', [:hwnd], :hwnd
+
+    #BOOL WINAPI SetKeyboardState( _In_  LPBYTE lpKeyState )
+    attach_function 'SetKeyboardState', [:pointer], :bool
+
+    #int WINAPI ToAscii(
+    #  _In_      UINT uVirtKey,
+    #  _In_      UINT uScanCode,
+    #  _In_opt_  const BYTE *lpKeyState,
+    #  _Out_     LPWORD lpChar,
+    #  _In_      UINT uFlags )
+    attach_function 'ToAscii', [VirtualKeyFlags, :uint, :pointer, :pointer, :uint], :int
+
+    #int WINAPI ToAsciiEx(
+    #  _In_      UINT uVirtKey,
+    #  _In_      UINT uScanCode,
+    #  _In_opt_  const BYTE *lpKeyState,
+    #  _Out_     LPWORD lpChar,
+    #  _In_      UINT uFlags,
+    #  _In_opt_  HKL dwhkl )
+    attach_function 'ToAsciiEx', [VirtualKeyFlags, :uint, :pointer, :pointer, :uint, :hkl], :int
+
+    #int WINAPI ToUnicode(
+    #  _In_      UINT wVirtKey,
+    #  _In_      UINT wScanCode,
+    #  _In_opt_  const BYTE *lpKeyState,
+    #  _Out_     LPWSTR pwszBuff,
+    #  _In_      int cchBuff,
+    #  _In_      UINT wFlags )
+    attach_function 'ToUnicode', [VirtualKeyFlags, :uint, :pointer, :string, :int, :uint], :int
+
+    #int WINAPI ToUnicodeEx(
+    #  _In_      UINT wVirtKey,
+    #  _In_      UINT wScanCode,
+    #  _In_      const BYTE *lpKeyState,
+    #  _Out_     LPWSTR pwszBuff,
+    #  _In_      int cchBuff,
+    #  _In_      UINT wFlags,
+    #  _In_opt_  HKL dwhkl )
+    attach_function 'ToUnicodeEx', [:uint, :uint, :pointer, :string, :int, :uint, :hkl], :int
+
+    #BOOL WINAPI UnloadKeyboardLayout( _In_  HKL hkl )
+    attach_function 'UnloadKeyboardLayout', [:hkl], :bool
+
+    #BOOL WINAPI UnregisterHotKey(
+    #  __in_opt  HWND hWnd,
+    #  __in      int  id)
+    attach_function 'UnregisterHotKey', [:hwnd, :int], :bool
+
+    #SHORT WINAPI VkKeyScan( _In_  TCHAR ch )
+    attach_function 'VkKeyScanA', [:char], :short
+    attach_function 'VkKeyScanW', [:char], :short
+
+    #SHORT WINAPI VkKeyScanEx(
+    #  _In_  TCHAR ch,
+    #  _In_  HKL dwhkl )
+    attach_function 'VkKeyScanExA', [:char, :hkl], :short
+    attach_function 'VkKeyScanExW', [:char, :hkl], :short
+  end
+end

data/lib/win-ffi/functions/user32/keyboard_accelerators.rb

@@ -0,0 +1,37 @@
+require 'win-ffi/functions/user32'
+
+require 'win-ffi/structs/user32/msg'
+
+module WinFFI
+  module User32
+    #int WINAPI CopyAcceleratorTable(
+    #  _In_       HACCEL hAccelSrc,
+    #  _Out_opt_  LPACCEL lpAccelDst,
+    #  _In_       int cAccelEntries )
+    attach_function 'CopyAcceleratorTableA', [:haccel, :pointer, :int], :int
+    attach_function 'CopyAcceleratorTableW', [:haccel, :pointer, :int], :int
+
+    #HACCEL WINAPI CreateAcceleratorTable(
+    #  _In_  LPACCEL lpaccl,
+    #  _In_  int cEntries )
+    attach_function 'CreateAcceleratorTableA', [:haccel, :int], :pointer
+    attach_function 'CreateAcceleratorTableW', [:haccel, :int], :pointer
+
+    #BOOL WINAPI DestroyAcceleratorTable( _In_  HACCEL hAccel )
+    attach_function 'DestroyAcceleratorTable', [:haccel], :bool
+
+    #HACCEL WINAPI LoadAccelerators(
+    #  _In_opt_  HINSTANCE hInstance,
+    #  _In_      LPCTSTR lpTableName )
+    attach_function 'LoadAcceleratorsA', [:hinstance, :string], :haccel
+    attach_function 'LoadAcceleratorsW', [:hinstance, :string], :haccel
+
+    #int WINAPI TranslateAccelerator(
+    #  _In_  HWND hWnd,
+    #  _In_  HACCEL hAccTable,
+    #  _In_  LPMSG lpMsg )
+    attach_function 'TranslateAccelerator', [:hwnd, :haccel, MSG.ptr], :int
+    attach_function 'TranslateAcceleratorA', [:hwnd, :haccel, MSG.ptr], :int
+    attach_function 'TranslateAcceleratorW', [:hwnd, :haccel, MSG.ptr], :int
+  end
+end

data/lib/win-ffi/functions/user32/mouse.rb

@@ -0,0 +1,60 @@
+require 'win-ffi/functions/user32'
+
+require 'win-ffi/enums/user32/mouse_keys_flags'
+require 'win-ffi/enums/user32/mouse_event_flags'
+
+require 'lib/win-ffi/structs/point'
+require 'win-ffi/structs/user32/mouse_move_point'
+require 'win-ffi/structs/user32/track_mouse_event'
+
+module WinFFI
+  module User32
+
+    #BOOL WINAPI _TrackMouseEvent(
+    #  _Inout_  LPTRACKMOUSEEVENT lpEventTrack )
+    #attach_function '_TrackMouseEvent', [TRACKMOUSEEVENT.ptr], :bool
+
+    #BOOL WINAPI DragDetect(
+    #  _In_  HWND hwnd,
+    #  _In_  POINT pt )
+    attach_function 'DragDetect', [:hwnd, POINT], :bool
+
+    #HWND WINAPI GetCapture(void)
+    attach_function 'GetCapture', [], :hwnd
+
+    #UINT WINAPI GetDoubleClickTime(void)
+    attach_function 'GetDoubleClickTime', [:void], :uint
+
+    #int WINAPI GetMouseMovePointsEx(
+    #  _In_   UINT cbSize,
+    #  _In_   LPMOUSEMOVEPOINT lppt,
+    #  _Out_  LPMOUSEMOVEPOINT lpptBuf,
+    #  _In_   int nBufPoints,
+    #  _In_   DWORD resolution )
+    attach_function 'GetMouseMovePointsEx', [:uint, MOUSEMOVEPOINT.ptr, MOUSEMOVEPOINT.ptr, :int, :dword], :int
+
+    #VOID WINAPI mouse_event(
+    #  _In_  DWORD dwFlags,
+    #  _In_  DWORD dx,
+    #  _In_  DWORD dy,
+    #  _In_  DWORD dwData,
+    #  _In_  ULONG_PTR dwExtraInfo )
+    attach_function 'mouse_event', [MouseEventFlags, :dword, :dword, :dword, :ulong], :void
+
+    #BOOL WINAPI ReleaseCapture(void)
+    attach_function 'ReleaseCapture', [], :bool
+
+    #HWND WINAPI SetCapture( _In_  HWND hWnd )
+    attach_function 'SetCapture', [:hwnd], :hwnd
+
+    #BOOL WINAPI SetDoubleClickTime( _In_  UINT uInterval )
+    attach_function 'SetDoubleClickTime', [:uint], :bool
+
+    #BOOL WINAPI SwapMouseButton( _In_  BOOL fSwap )
+    attach_function 'SwapMouseButton', [:bool], :bool
+
+    #BOOL WINAPI TrackMouseEvent( _Inout_  LPTRACKMOUSEEVENT lpEventTrack )
+    attach_function 'TrackMouseEvent', [TRACKMOUSEEVENT.ptr], :bool
+
+  end
+end

data/lib/win-ffi/functions/user32/multiple_display_monitors.rb

@@ -0,0 +1,43 @@
+require 'win-ffi/functions/user32'
+
+require 'win-ffi/structs/rect'
+require 'win-ffi/structs/point'
+
+module WinFFI
+  module User32
+    #BOOL EnumDisplayMonitors(
+    #  _In_  HDC hdc,
+    #  _In_  LPCRECT lprcClip,
+    #  _In_  MONITORENUMPROC lpfnEnum,
+    #  _In_  LPARAM dwData )
+    attach_function 'EnumDisplayMonitors', [:hdc, RECT.ptr, :pointer, :lparam], :bool
+
+    #BOOL GetMonitorInfo(
+    #  _In_   HMONITOR hMonitor,
+    #  _Out_  LPMONITORINFO lpmi)
+    attach_function 'GetMonitorInfoA', [:hmonitor, :pointer], :bool
+    attach_function 'GetMonitorInfoW', [:hmonitor, :pointer], :bool
+
+    #BOOL CALLBACK MonitorEnumProc(
+    #  _In_  HMONITOR hMonitor,
+    #  _In_  HDC hdcMonitor,
+    #  _In_  LPRECT lprcMonitor,
+    #  _In_  LPARAM dwData )
+    callback 'MonitorEnumProc', [:hmonitor, :hdc, RECT.ptr, :lparam], :bool
+
+    #HMONITOR MonitorFromPoint(
+    #  _In_  POINT pt,
+    #  _In_  DWORD dwFlags )
+    attach_function 'MonitorFromPoint', [POINT.ptr, :dword], :hmonitor
+
+    #HMONITOR MonitorFromRect(
+    #  _In_  LPCRECT lprc,
+    #  _In_  DWORD dwFlags )
+    attach_function 'MonitorFromRect', [RECT.ptr, :dword], :hmonitor
+
+    #HMONITOR MonitorFromWindow(
+    #  _In_  HWND hwnd,
+    #  _In_  DWORD dwFlags )
+    attach_function 'MonitorFromWindow', [:hwnd, :dword], :hmonitor
+  end
+end

data/lib/win-ffi/functions/user32/multiple_document_interface.rb

@@ -0,0 +1,44 @@
+require 'win-ffi/functions/user32'
+
+require 'win-ffi/structs/user32/msg'
+
+module WinFFI
+  module User32
+    #HWND WINAPI CreateMDIWindow(
+    #  _In_      LPCTSTR lpClassName,
+    #  _In_      LPCTSTR lpWindowName,
+    #  _In_      DWORD dwStyle,
+    #  _In_      int X,
+    #  _In_      int Y,
+    #  _In_      int nWidth,
+    #  _In_      int nHeight,
+    #  _In_opt_  HWND hWndParent,
+    #  _In_opt_  HINSTANCE hInstance,
+    #  _In_      LPARAM lParam )
+    attach_function 'CreateMDIWindowA', [:pointer, :pointer, :dword, :int, :int, :int, :int, :hwnd, :hinstance, :lparam], :hwnd
+    attach_function 'CreateMDIWindowW', [:pointer, :pointer, :dword, :int, :int, :int, :int, :hwnd, :hinstance, :lparam], :hwnd
+
+    #LRESULT WINAPI DefFrameProc(
+    #  _In_  HWND hWnd,
+    #  _In_  HWND hWndMDIClient,
+    #  _In_  UINT uMsg,
+    #  _In_  WPARAM wParam,
+    #  _In_  LPARAM lParam )
+    attach_function 'DefFrameProcA', [:hwnd, :hwnd, :uint, :wparam, :lparam], :lresult
+    attach_function 'DefFrameProcW', [:hwnd, :hwnd, :uint, :wparam, :lparam], :lresult
+
+    #LRESULT WINAPI DefMDIChildProc(
+    #  _In_  HWND hWnd,
+    #  _In_  UINT uMsg,
+    #  _In_  WPARAM wParam,
+    #  _In_  LPARAM lParam )
+    attach_function 'DefMDIChildProcA', [:hwnd, :uint, :wparam, :lparam], :lresult
+    attach_function 'DefMDIChildProcW', [:hwnd, :uint, :wparam, :lparam], :lresult
+
+    #BOOL WINAPI TranslateMDISysAccel(
+    #  _In_  HWND hWndClient,
+    #  _In_  LPMSG lpMsg )
+    attach_function 'TranslateMDISysAccel', [:hwnd, MSG.ptr], :bool
+
+  end
+end