IOWA 1.0.0

data/external/windows-pr/lib/windows/device_io.rb

@@ -0,0 +1,88 @@
+require 'Win32API'
+
+module Windows
+   module DeviceIO
+      # Device Types
+      FILE_DEVICE_BEEP                = 0x00000001
+      FILE_DEVICE_CD_ROM              = 0x00000002
+      FILE_DEVICE_CD_ROM_FILE_SYSTEM  = 0x00000003
+      FILE_DEVICE_CONTROLLER          = 0x00000004
+      FILE_DEVICE_DATALINK            = 0x00000005
+      FILE_DEVICE_DFS                 = 0x00000006
+      FILE_DEVICE_DISK                = 0x00000007
+      FILE_DEVICE_DISK_FILE_SYSTEM    = 0x00000008
+      FILE_DEVICE_FILE_SYSTEM         = 0x00000009
+      FILE_DEVICE_INPORT_PORT         = 0x0000000a
+      FILE_DEVICE_KEYBOARD            = 0x0000000b
+      FILE_DEVICE_MAILSLOT            = 0x0000000c
+      FILE_DEVICE_MIDI_IN             = 0x0000000d
+      FILE_DEVICE_MIDI_OUT            = 0x0000000e
+      FILE_DEVICE_MOUSE               = 0x0000000f
+      FILE_DEVICE_MULTI_UNC_PROVIDER  = 0x00000010
+      FILE_DEVICE_NAMED_PIPE          = 0x00000011
+      FILE_DEVICE_NETWORK             = 0x00000012
+      FILE_DEVICE_NETWORK_BROWSER     = 0x00000013
+      FILE_DEVICE_NETWORK_FILE_SYSTEM = 0x00000014
+      FILE_DEVICE_NULL                = 0x00000015
+      FILE_DEVICE_PARALLEL_PORT       = 0x00000016
+      FILE_DEVICE_PHYSICAL_NETCARD    = 0x00000017
+      FILE_DEVICE_PRINTER             = 0x00000018
+      FILE_DEVICE_SCANNER             = 0x00000019
+      FILE_DEVICE_SERIAL_MOUSE_PORT   = 0x0000001a
+      FILE_DEVICE_SERIAL_PORT         = 0x0000001b
+      FILE_DEVICE_SCREEN              = 0x0000001c
+      FILE_DEVICE_SOUND               = 0x0000001d
+      FILE_DEVICE_STREAMS             = 0x0000001e
+      FILE_DEVICE_TAPE                = 0x0000001f
+      FILE_DEVICE_TAPE_FILE_SYSTEM    = 0x00000020
+      FILE_DEVICE_TRANSPORT           = 0x00000021
+      FILE_DEVICE_UNKNOWN             = 0x00000022
+      FILE_DEVICE_VIDEO               = 0x00000023
+      FILE_DEVICE_VIRTUAL_DISK        = 0x00000024
+      FILE_DEVICE_WAVE_IN             = 0x00000025
+      FILE_DEVICE_WAVE_OUT            = 0x00000026
+      FILE_DEVICE_8042_PORT           = 0x00000027
+      FILE_DEVICE_NETWORK_REDIRECTOR  = 0x00000028
+      FILE_DEVICE_BATTERY             = 0x00000029
+      FILE_DEVICE_BUS_EXTENDER        = 0x0000002a
+      FILE_DEVICE_MODEM               = 0x0000002b
+      FILE_DEVICE_VDM                 = 0x0000002c
+      FILE_DEVICE_MASS_STORAGE        = 0x0000002d
+      FILE_DEVICE_SMB                 = 0x0000002e
+      FILE_DEVICE_KS                  = 0x0000002f
+      FILE_DEVICE_CHANGER             = 0x00000030
+      FILE_DEVICE_SMARTCARD           = 0x00000031
+      FILE_DEVICE_ACPI                = 0x00000032
+      FILE_DEVICE_DVD                 = 0x00000033
+      FILE_DEVICE_FULLSCREEN_VIDEO    = 0x00000034
+      FILE_DEVICE_DFS_FILE_SYSTEM     = 0x00000035
+      FILE_DEVICE_DFS_VOLUME          = 0x00000036
+      FILE_DEVICE_SERENUM             = 0x00000037
+      FILE_DEVICE_TERMSRV             = 0x00000038
+      FILE_DEVICE_KSEC                = 0x00000039
+      FILE_DEVICE_FIPS                = 0x0000003A
+      FILE_DEVICE_INFINIBAND          = 0x0000003B
+      
+      METHOD_BUFFERED = 0
+      FILE_ANY_ACCESS = 0
+      
+      DeviceIoControl = Win32API.new('kernel32', 'DeviceIoControl', 'LLPLPLPP', 'I')
+      
+      def DeviceIoControl(dev, code, in_buf, in_buf_size, out_buf, out_buf_size, bytes, overlapped)
+         DeviceIoControl.call(dev, code, in_buf, in_buf_size, out_buf, out_buf_size, bytes, overlapped) > 0
+      end
+      
+      # Macros from WinIoCtl.h
+      def CTL_CODE(device, function, method, access)
+         ((device) << 16) | ((access) << 14) | ((function) << 2) | (method)
+      end
+      
+      def FSCTL_SET_COMPRESSION 
+         CTL_CODE(FILE_DEVICE_FILE_SYSTEM, 16, 0, FILE_READ_DATA | FILE_WRITE_DATA)
+      end
+   
+      def FSCTL_SET_SPARSE
+         CTL_CODE(FILE_DEVICE_FILE_SYSTEM, 49, 0, FILE_SPECIAL_ACCESS)
+      end
+   end
+end

data/external/windows-pr/lib/windows/directory.rb

@@ -0,0 +1,80 @@
+require 'windows/unicode'
+
+module Windows
+   module Directory
+      CreateDirectory             = Win32API.new('kernel32', 'CreateDirectory', 'PP', 'I')
+      CreateDirectoryW            = Win32API.new('kernel32', 'CreateDirectoryW', 'PP', 'I')
+      CreateDirectoryEx           = Win32API.new('kernel32', 'CreateDirectoryEx', 'PPP', 'I')
+      CreateDirectoryExW          = Win32API.new('kernel32', 'CreateDirectoryExW', 'PPP', 'I')
+      FindCloseChangeNotification = Win32API.new('kernel32', 'FindCloseChangeNotification', 'L', 'I')
+      FindFirstChangeNotification = Win32API.new('kernel32', 'FindFirstChangeNotification', 'PIL', 'L')
+      FindNextChangeNotification  = Win32API.new('kernel32', 'FindFirstChangeNotification', 'PIL', 'I')
+      GetCurrentDirectory         = Win32API.new('kernel32', 'GetCurrentDirectory', 'LP', 'L')
+      GetCurrentDirectoryW        = Win32API.new('kernel32', 'GetCurrentDirectoryW', 'LP', 'L')
+      ReadDirectoryChangesW       = Win32API.new('kernel32', 'ReadDirectoryChangesW', 'LPLILPPP', 'I')
+      RemoveDirectory             = Win32API.new('kernel32', 'RemoveDirectory', 'P', 'I')
+      RemoveDirectoryW            = Win32API.new('kernel32', 'RemoveDirectoryW', 'P', 'I')
+      SetCurrentDirectory         = Win32API.new('kernel32', 'SetCurrentDirectory', 'P', 'I')
+      SetCurrentDirectoryW        = Win32API.new('kernel32', 'SetCurrentDirectoryW', 'P', 'I')
+
+      def CreateDirectory(path, attributes = 0)
+         CreateDirectory.call(path, attributes) != 0
+      end
+      
+      def CreateDirectoryW(path, attributes)
+         path = multi_to_wide(path) unless IsTextUnicode(path)
+         CreateDirectoryW.call(path, attributes) != 0
+      end
+
+      def CreateDirectoryEx(template, new_dir, attributes)
+         CreateDirectoryEx.call(template, new_dir, attributes) != 0
+      end
+      
+      def CreateDirectoryExW(template, new_dir, attributes)
+         new_dir = multi_to_wide(new_dir) unless IsTextUnicode(new_dir)
+         CreateDirectoryExW.call(template, new_dir, attributes) != 0
+      end
+
+      def FindCloseChangeNotification(handle)
+         FindCloseChangeNotification.call(handle) != 0
+      end
+
+      def FindFirstChangeNotification(path, subtree, filter)
+         FindFirstChangeNotification.call(path, subtree, filter)
+      end
+
+      def FindNextChangeNotification(handle)
+         FindNextChangeNotification.call(handle) != 0
+      end
+
+      def GetCurrentDirectory(buf_len, buf)
+         GetCurrentDirectory.call(buf_len, buf)
+      end
+      
+      def GetCurrentDirectoryW(buf_len, buf)
+         GetCurrentDirectoryW.call(buf_len, buf)
+      end
+
+      def ReadDirectoryChangesW(handle, buf, buf_len, subtree, filter, bytes, overlapped, routine)
+         ReadDirectoryChangesW.call(handle, buf, buf_len, subtree, filter, bytes, overlapped, routine) != 0
+      end
+
+      def RemoveDirectory(path)
+         RemoveDirectory.call(path) != 0
+      end
+      
+      def RemoveDirectoryW(path)
+         path = multi_to_wide(path) unless IsTextUnicode(path)
+         RemoveDirectoryW.call(path) != 0
+      end
+
+      def SetCurrentDirectory(path)
+         SetCurrentDirectory.call(path) != 0
+      end
+      
+      def SetCurrentDirectoryW(path)
+         path = multi_to_wide(path) unless IsTextUnicode(path)
+         SetCurrentDirectoryW.call(path) != 0
+      end
+   end
+end

data/external/windows-pr/lib/windows/error.rb

@@ -0,0 +1,313 @@
+############################################################################
+# error.rb
+#
+# Includes all of the error codes in error.h and some from winerror.h.
+#
+# Adds the following convenience methods:
+#
+# get_last_error - Returns a human readable string for the error returned
+# by the GetLastError() function.
+############################################################################
+require 'windows/unicode'
+
+module Windows
+   module Error
+      FORMAT_MESSAGE_ALLOCATE_BUFFER   = 0x00000100
+      FORMAT_MESSAGE_IGNORE_INSERTS    = 0x00000200
+      FORMAT_MESSAGE_FROM_STRING       = 0x00000400
+      FORMAT_MESSAGE_FROM_HMODULE      = 0x00000800
+      FORMAT_MESSAGE_FROM_SYSTEM       = 0x00001000
+      FORMAT_MESSAGE_ARGUMENT_ARRAY    = 0x00002000
+      FORMAT_MESSAGE_MAX_WIDTH_MASK    = 0x000000FF
+         
+      SEM_FAILCRITICALERRORS     = 0x0001
+      SEM_NOALIGNMENTFAULTEXCEPT = 0x0004
+      SEM_NOGPFAULTERRORBOX      = 0x0002
+      SEM_NOOPENFILEERRORBOX     = 0x8000
+      
+      NO_ERROR                  = 0
+      ERROR_SUCCESS             = 0
+      ERROR_INVALID_FUNCTION    = 1
+      ERROR_FILE_NOT_FOUND      = 2
+      ERROR_PATH_NOT_FOUND      = 3
+      ERROR_TOO_MANY_OPEN_FILES = 4
+      ERROR_ACCESS_DENIED       = 5
+      ERROR_INVALID_HANDLE      = 6
+      ERROR_ARENA_TRASHED       = 7
+      ERROR_NOT_ENOUGH_MEMORY   = 8
+      ERROR_INVALID_BLOCK       = 9
+      ERROR_BAD_ENVIRONMENT     = 10
+      ERROR_BAD_FORMAT          = 11
+      ERROR_INVALID_ACCESS      = 12
+      ERROR_INVALID_DATA        = 13
+      ERROR_INVALID_DRIVE       = 15
+      ERROR_CURRENT_DIRECTORY   = 16
+      ERROR_NOT_SAME_DEVICE     = 17
+      ERROR_NO_MORE_FILES       = 18
+      
+      ERROR_WRITE_PROTECT    = 19
+      ERROR_BAD_UNIT         = 20
+      ERROR_NOT_READY        = 21
+      ERROR_BAD_COMMAND      = 22
+      ERROR_CRC              = 23
+      ERROR_BAD_LENGTH       = 24
+      ERROR_SEEK             = 25
+      ERROR_NOT_DOS_DISK     = 26
+      ERROR_SECTOR_NOT_FOUND = 27
+      ERROR_OUT_OF_PAPER     = 28
+      ERROR_WRITE_FAULT      = 29
+      ERROR_READ_FAULT       = 30
+      ERROR_GEN_FAILURE      = 31
+      
+      ERROR_SHARING_VIOLATION       = 32
+      ERROR_LOCK_VIOLATION          = 33
+      ERROR_WRONG_DISK              = 34
+      ERROR_FCB_UNAVAILABLE         = 35
+      ERROR_SHARING_BUFFER_EXCEEDED = 36
+      
+      ERROR_NOT_SUPPORTED = 50
+      
+      ERROR_FILE_EXISTS  = 80
+      ERROR_DUP_FCB      = 81
+      ERROR_CANNOT_MAKE  = 82
+      ERROR_FAIL_I24     = 83
+      
+      ERROR_OUT_OF_STRUCTURES = 84
+      ERROR_ALREADY_ASSIGNED  = 85
+      ERROR_INVALID_PASSWORD  = 86
+      ERROR_INVALID_PARAMETER = 87
+      ERROR_NET_WRITE_FAULT   = 88
+
+      ERROR_NO_PROC_SLOTS = 89  # no process slots available 
+      ERROR_NOT_FROZEN    = 90
+      ERR_TSTOVFL         = 91  # timer service table overflow 
+      ERR_TSTDUP          = 92  # timer service table duplicate 
+      ERROR_NO_ITEMS      = 93  # There were no items to operate upon 
+      ERROR_INTERRUPT     = 95  # interrupted system call 
+
+      ERROR_TOO_MANY_SEMAPHORES       = 100
+      ERROR_EXCL_SEM_ALREADY_OWNED    = 101
+      ERROR_SEM_IS_SET                = 102
+      ERROR_TOO_MANY_SEM_REQUESTS     = 103
+      ERROR_INVALID_AT_INTERRUPT_TIME = 104
+
+      ERROR_SEM_OWNER_DIED = 105 # waitsem found owner died 
+      ERROR_SEM_USER_LIMIT = 106 # too many procs have this sem 
+      ERROR_DISK_CHANGE    = 107 # insert disk b into drive a 
+      ERROR_DRIVE_LOCKED   = 108 # drive locked by another process 
+      ERROR_BROKEN_PIPE    = 109 # write on pipe with no reader 
+
+      ERROR_OPEN_FAILED             = 110 # open/created failed  
+      ERROR_DISK_FULL               = 112 # not enough space 
+      ERROR_NO_MORE_SEARCH_HANDLES  = 113 # can't allocate 
+      ERROR_INVALID_TARGET_HANDLE   = 114 # handle in DOSDUPHANDLE is invalid 
+      ERROR_PROTECTION_VIOLATION    = 115 # bad user virtual address 
+      ERROR_VIOKBD_REQUEST          = 116
+      ERROR_INVALID_CATEGORY        = 117 # category for DEVIOCTL not defined 
+      ERROR_INVALID_VERIFY_SWITCH   = 118 # invalid value 
+      ERROR_BAD_DRIVER_LEVEL        = 119 # DosDevIOCTL not level four
+      ERROR_CALL_NOT_IMPLEMENTED    = 120
+      ERROR_SEM_TIMEOUT             = 121 # timeout from semaphore function
+      ERROR_INSUFFICIENT_BUFFER     = 122
+       
+      ERROR_INVALID_NAME    = 123 # illegal char or malformed file system name 
+      ERROR_INVALID_LEVEL   = 124 # unimplemented level for info retrieval 
+      ERROR_NO_VOLUME_LABEL = 125 # no volume label found
+      ERROR_MOD_NOT_FOUND   = 126 # w_getprocaddr, w_getmodhandle 
+      ERROR_PROC_NOT_FOUND  = 127 # w_getprocaddr 
+
+      ERROR_WAIT_NO_CHILDREN   = 128 # CWait finds to children 
+      ERROR_CHILD_NOT_COMPLETE = 129 # CWait children not dead yet 
+
+      ERROR_DIRECT_ACCESS_HANDLE = 130 # invalid for direct disk access
+      ERROR_NEGATIVE_SEEK        = 131 # tried to seek negative offset
+      ERROR_SEEK_ON_DEVICE       = 132 # tried to seek on device or pipe 
+
+      ERROR_IS_JOIN_TARGET         = 133
+      ERROR_IS_JOINED              = 134
+      ERROR_IS_SUBSTED             = 135
+      ERROR_NOT_JOINED             = 136
+      ERROR_NOT_SUBSTED            = 137
+      ERROR_JOIN_TO_JOIN           = 138
+      ERROR_SUBST_TO_SUBST         = 139
+      ERROR_JOIN_TO_SUBST          = 140
+      ERROR_SUBST_TO_JOIN          = 141
+      ERROR_BUSY_DRIVE             = 142
+      ERROR_SAME_DRIVE             = 143
+      ERROR_DIR_NOT_ROOT           = 144
+      ERROR_DIR_NOT_EMPTY          = 145
+      ERROR_IS_SUBST_PATH          = 146
+      ERROR_IS_JOIN_PATH           = 147
+      ERROR_PATH_BUSY              = 148
+      ERROR_IS_SUBST_TARGET        = 149
+      ERROR_SYSTEM_TRACE           = 150 # system trace error 
+      ERROR_INVALID_EVENT_COUNT    = 151 # DosMuxSemWait errors 
+      ERROR_TOO_MANY_MUXWAITERS    = 152
+      ERROR_INVALID_LIST_FORMAT    = 153
+      ERROR_LABEL_TOO_LONG         = 154
+      ERROR_TOO_MANY_TCBS          = 155
+      ERROR_SIGNAL_REFUSED         = 156
+      ERROR_DISCARDED              = 157
+      ERROR_NOT_LOCKED             = 158
+      ERROR_BAD_THREADID_ADDR      = 159
+      ERROR_BAD_ARGUMENTS          = 160
+      ERROR_BAD_PATHNAME           = 161
+      ERROR_SIGNAL_PENDING         = 162
+      ERROR_UNCERTAIN_MEDIA        = 163
+      ERROR_MAX_THRDS_REACHED      = 164
+      ERROR_MONITORS_NOT_SUPPORTED = 165
+
+      ERROR_INVALID_SEGMENT_NUMBER = 180
+      ERROR_INVALID_CALLGATE       = 181
+      ERROR_INVALID_ORDINAL        = 182
+      ERROR_ALREADY_EXISTS         = 183
+      ERROR_NO_CHILD_PROCESS       = 184
+      ERROR_CHILD_ALIVE_NOWAIT     = 185
+      ERROR_INVALID_FLAG_NUMBER    = 186
+      ERROR_SEM_NOT_FOUND          = 187
+
+      ERROR_INVALID_STARTING_CODESEG  = 188
+      ERROR_INVALID_STACKSEG          = 189
+      ERROR_INVALID_MODULETYPE        = 190
+      ERROR_INVALID_EXE_SIGNATURE     = 191
+      ERROR_EXE_MARKED_INVALID        = 192
+      ERROR_BAD_EXE_FORMAT            = 193
+      ERROR_ITERATED_DATA_EXCEEDS_64k = 194
+      ERROR_INVALID_MINALLOCSIZE      = 195
+      ERROR_DYNLINK_FROM_INVALID_RING = 196
+      ERROR_IOPL_NOT_ENABLED          = 197
+      ERROR_INVALID_SEGDPL            = 198
+      ERROR_AUTODATASEG_EXCEEDS_64k   = 199
+      ERROR_RING2SEG_MUST_BE_MOVABLE  = 200
+      ERROR_RELOC_CHAIN_XEEDS_SEGLIM  = 201
+      ERROR_INFLOOP_IN_RELOC_CHAIN    = 202
+
+      ERROR_ENVVAR_NOT_FOUND        = 203
+      ERROR_NOT_CURRENT_CTRY        = 204
+      ERROR_NO_SIGNAL_SENT          = 205
+      ERROR_FILENAME_EXCED_RANGE    = 206 # if filename > 8.3 
+      ERROR_RING2_STACK_IN_USE      = 207 # for FAPI 
+      ERROR_META_EXPANSION_TOO_LONG = 208 # if "*a" > 8.3 
+
+      ERROR_INVALID_SIGNAL_NUMBER = 209
+      ERROR_THREAD_1_INACTIVE     = 210
+      ERROR_INFO_NOT_AVAIL        = 211 #@@ PTM 5550 
+      ERROR_LOCKED                = 212
+      ERROR_BAD_DYNALINK          = 213 #@@ PTM 5760 
+      ERROR_TOO_MANY_MODULES      = 214
+      ERROR_NESTING_NOT_ALLOWED   = 215
+      ERROR_MORE_DATA             = 234
+ 
+      ERROR_USER_DEFINED_BASE = 0xF000
+
+      ERROR_I24_WRITE_PROTECT         = 0
+      ERROR_I24_BAD_UNIT              = 1
+      ERROR_I24_NOT_READY             = 2
+      ERROR_I24_BAD_COMMAND           = 3
+      ERROR_I24_CRC                   = 4
+      ERROR_I24_BAD_LENGTH            = 5
+      ERROR_I24_SEEK                  = 6
+      ERROR_I24_NOT_DOS_DISK          = 7
+      ERROR_I24_SECTOR_NOT_FOUND      = 8
+      ERROR_I24_OUT_OF_PAPER          = 9
+      ERROR_I24_WRITE_FAULT           = 0x0A
+      ERROR_I24_READ_FAULT            = 0x0B
+      ERROR_I24_GEN_FAILURE           = 0x0C
+      ERROR_I24_DISK_CHANGE           = 0x0D
+      ERROR_I24_WRONG_DISK            = 0x0F
+      ERROR_I24_UNCERTAIN_MEDIA       = 0x10
+      ERROR_I24_CHAR_CALL_INTERRUPTED = 0x11
+      ERROR_I24_NO_MONITOR_SUPPORT    = 0x12
+      ERROR_I24_INVALID_PARAMETER     = 0x13
+
+      ALLOWED_FAIL   = 0x0001
+      ALLOWED_ABORT  = 0x0002
+      ALLOWED_RETRY  = 0x0004
+      ALLOWED_IGNORE = 0x0008
+
+      I24_OPERATION = 0x1
+      I24_AREA      = 0x6
+      I24_CLASS     = 0x80
+
+
+      ERRCLASS_OUTRES  = 1   # Out of Resource 
+      ERRCLASS_TEMPSIT = 2   # Temporary Situation 
+      ERRCLASS_AUTH    = 3   # Permission problem 
+      ERRCLASS_INTRN   = 4   # Internal System Error 
+      ERRCLASS_HRDFAIL = 5   # Hardware Failure 
+      ERRCLASS_SYSFAIL = 6   # System Failure 
+      ERRCLASS_APPERR  = 7   # Application Error 
+      ERRCLASS_NOTFND  = 8   # Not Found 
+      ERRCLASS_BADFMT  = 9   # Bad Format 
+      ERRCLASS_LOCKED  = 10  # Locked 
+      ERRCLASS_MEDIA   = 11  # Media Failure 
+      ERRCLASS_ALREADY = 12  # Collision with Existing Item 
+      ERRCLASS_UNK     = 13  # Unknown/other 
+      ERRCLASS_CANT    = 14
+      ERRCLASS_TIME    = 15
+
+      ERRACT_RETRY  = 1   # Retry 
+      ERRACT_DLYRET = 2   # Delay Retry, retry after pause 
+      ERRACT_USER   = 3   # Ask user to regive info 
+      ERRACT_ABORT  = 4   # abort with clean up 
+      ERRACT_PANIC  = 5   # abort immediately 
+      ERRACT_IGNORE = 6   # ignore 
+      ERRACT_INTRET = 7   # Retry after User Intervention 
+
+      ERRLOC_UNK    = 1   # No appropriate value 
+      ERRLOC_DISK   = 2   # Random Access Mass Storage 
+      ERRLOC_NET    = 3   # Network 
+      ERRLOC_SERDEV = 4   # Serial Device 
+      ERRLOC_MEM    = 5   # Memory 
+ 
+      TC_NORMAL  = 0
+      TC_HARDERR = 1
+      TC_GP_TRAP = 2
+      TC_SIGNAL  = 3
+      
+      # From WinError.h
+      ERROR_INVALID_FLAGS          = 4100 # 1004L
+      ERROR_NO_UNICODE_TRANSLATION = 4371 
+         
+      GetLastError   = Win32API.new('kernel32', 'GetLastError', 'V', 'L')
+      SetLastError   = Win32API.new('kernel32', 'GetLastError', 'L', 'V')
+      SetLastErrorEx = Win32API.new('kernel32', 'GetLastError', 'LL', 'V')
+      SetErrorMode   = Win32API.new('kernel32', 'SetErrorMode', 'I', 'I')
+      FormatMessage  = Win32API.new('kernel32', 'FormatMessage', 'LLLLPLP', 'L')
+      FormatMessageW = Win32API.new('kernel32', 'FormatMessageW', 'LLLLPLP', 'L')
+      
+      def GetLastError
+         GetLastError.call
+      end
+      
+      def SetLastError(error)
+         SetLastError.call(error)
+      end
+      
+      def SetLastErrorEx(error, type=0)
+         SetLastErrorEx.call(error, type)
+      end
+      
+      def SetErrorMode(mode)
+         SetErrorMode.call(mode)
+      end
+      
+      def FormatMessage(flags, src, msg_id, lang_id, buf, size, args)
+         FormatMessage.call(flags, src, msg_id, lang_id, buf, size, args)
+      end
+      
+      def FormatMessageW(flags, src, msg_id, lang_id, buf, size, args)
+         FormatMessageW.call(flags, src, msg_id, lang_id, buf, size, args)
+      end
+      
+      # Convenience method that wraps FormatMessage with some sane defaults and
+      # returns a human readable string.
+      #
+      def get_last_error(err_num = GetLastError.call)
+         buf   = 0.chr * 260
+         flags = FORMAT_MESSAGE_FROM_SYSTEM + FORMAT_MESSAGE_ARGUMENT_ARRAY        
+         FormatMessage.call(flags, 0, err_num, 0, buf, buf.size, 0)      
+         buf.split(0.chr).first.chomp       
+      end
+   end
+end