windows-pr 0.8.7 → 0.9.0

data/CHANGES

@@ -1,3 +1,18 @@
+= 0.9.0 - 26-Jul-2008
+* The process of converting prototypes from 'P' to 'S' has begun. This
+  means that this library now requires win32-api 1.2.0 or later.
+* Added the Windows::Window::Message module.
+* Added the Windows::Window::Timer module.
+* Added the Windows::Window::Dialog module.
+* Added many more functions and constants to the Windows::Security module.
+* All ACE related constants have been move from the Windows::File module and
+  are instead defined in the Windows::Security module. Not to worry, though.
+  The Windows::File module now mixes in the Windows::Security module.
+* Added several profile related functions to the Windows::Shell module.
+* Changed the prototype of ConvertSidToStringSid and ConvertStringSidToSid
+  back to 'LP' in the Windows::Security module. I'm not sure why I changed
+  those before. If this causes too much grief I'll change them back.
+
 = 0.8.7 - 23-Jun-2008
 * Wide character fix for the get_last_error helper function. Thanks go to
   Dave Whitley for the spot.

data/MANIFEST

@@ -51,4 +51,12 @@ lib/windows/msvcrt/string.rb
 lib/windows/msvcrt/time.rb
 
 lib/windows/network/management.rb
-lib/windows/network/snmp.rb
+lib/windows/network/snmp.rb
+lib/windows/network/winsock.rb
+
+lib/windows/ntfs/file.rb
+
+lib/windows/window/dialog.rb
+lib/windows/window/message.rb
+lib/windows/window/properties.rb
+lib/windows/window/timer.rb

data/lib/windows/clipboard.rb

@@ -1,5 +1,4 @@
 require 'windows/api'
-include Windows
 
 module Windows
    module Clipboard
@@ -32,6 +31,6 @@ module Windows
       API.new('IsClipboardFormatAvailable', 'I', 'B', 'user32')
       API.new('GetClipboardFormatName', 'IPI', 'I', 'user32')
       API.new('EnumClipboardFormats', 'I', 'I', 'user32')
-      API.new('RegisterClipboardFormat', 'P', 'I', 'user32')
+      API.new('RegisterClipboardFormat', 'S', 'I', 'user32')
    end
 end

data/lib/windows/com/automation.rb

@@ -0,0 +1,58 @@
+require 'windows/api'
+
+module Windows
+   module COM
+      module Automation
+         API.auto_namespace = 'Windows::COM::Automation'
+         API.auto_constant  = true
+         API.auto_method    = true
+         API.auto_unicode   = false
+
+         API.new('BstrFromVector', 'PP', 'L', 'oleaut32')
+         API.new('CreateErrorInfo', 'P', 'L', 'oleaut32')
+         API.new('CreateTypeLib2', 'PPP', 'L', 'oleaut32')
+         API.new('DispGetIDsOfNames', 'PPLP', 'L', 'oleaut32')
+         API.new('DispGetParam', 'PLLPP', 'L', 'oleaut32')
+         API.new('DispInvoke', 'PPPLPPPP', 'L', 'oleaut32')
+         API.new('GetActiveObject', 'PPP', 'L', 'oleaut32')
+         API.new('LoadRegTypeLib', 'PLLLP', 'L', 'oleaut32')
+         API.new('LoadTypeLib', 'PPP', 'L', 'oleaut32')
+         API.new('LoadTypeLibEx', 'PPP', 'L', 'oleaut32')
+         API.new('RegisterActiveObject', 'PPLP', 'L', 'oleaut32')
+         API.new('RevokeActiveObject', 'LP', 'L', 'oleaut32')       
+         API.new('RegisterTypeLib', 'PPP', 'L', 'oleaut32')
+         API.new('SafeArrayAccessData', 'PP', 'L', 'oleaut32')
+         API.new('SafeArrayAllocData', 'P', 'L', 'oleaut32')
+         API.new('SafeArrayAllocDescriptor', 'LP', 'L', 'oleaut32')
+         API.new('SafeArrayCopy', 'PP', 'L', 'oleaut32')
+         API.new('SafeArrayCopyData', 'PP', 'L', 'oleaut32')
+         API.new('SafeArrayCreate', 'LLP', 'P', 'oleaut32')
+         API.new('SafeArrayCreateVector', 'LLL', 'P', 'oleaut32')
+         API.new('SafeArrayDestroy', 'P', 'L', 'oleaut32')
+         API.new('SafeArrayDestroyData', 'P', 'L', 'oleaut32')
+         API.new('SafeArrayDestroyDescriptor', 'P', 'L', 'oleaut32')
+         API.new('SafeArrayGetDim', 'P', 'L', 'oleaut32')
+         API.new('SafeArrayGetElement', 'PLP', 'L', 'oleaut32')
+         API.new('SafeArrayGetElemsize', 'P', 'L', 'oleaut32')
+         API.new('SafeArrayGetLBound', 'PLP', 'L', 'oleaut32')
+         API.new('SafeArrayGetUBound', 'PLP', 'L', 'oleaut32')
+         API.new('SafeArrayLock', 'P', 'L', 'oleaut32')
+         API.new('SafeArrayPtrOfIndex', 'PPP', 'L', 'oleaut32')
+         API.new('SafeArrayPutElement', 'PPP', 'L', 'oleaut32')
+         API.new('SafeArrayRedim', 'PP', 'L', 'oleaut32')
+         API.new('SafeArrayUnaccessData', 'P', 'L', 'oleaut32')
+         API.new('SafeArrayUnlock', 'P', 'L', 'oleaut32')
+         API.new('SetErrorInfo', 'LP', 'L', 'oleaut32')
+         API.new('SysAllocString', 'P', 'P', 'oleaut32')
+         API.new('SysAllocStringByteLen', 'PI', 'P', 'oleaut32')
+         API.new('SysFreeString', 'P', 'L', 'oleaut32')
+         API.new('SysReAllocString', 'PP', 'L', 'oleaut32')
+         API.new('SysReAllocStringLen', 'PPI', 'P', 'oleaut32')
+         API.new('SysStringByteLen', 'P', 'L', 'oleaut32')
+         API.new('SysStringLen', 'P', 'L', 'oleaut32')
+         API.new('SystemTimeToVariantTime', 'PP', 'I', 'oleaut32')
+         API.new('UnRegisterTypeLib', 'PLLLL', 'I', 'oleaut32')
+         API.new('VectorFromBstr', 'PP', 'L', 'oleaut32')
+      end
+   end
+end

data/lib/windows/com.rb

@@ -1,5 +1,4 @@
 require 'windows/api'
-include Windows
 
 module Windows
    module COM

data/lib/windows/console.rb

@@ -1,5 +1,4 @@
 require 'windows/api'
-include Windows
 
 module Windows
    module Console

data/lib/windows/debug.rb

@@ -1,5 +1,4 @@
 require 'windows/api'
-include Windows
 
 module Windows
    module Debug

data/lib/windows/device_io.rb

@@ -1,5 +1,4 @@
 require 'windows/api'
-include Windows
 
 module Windows
    module DeviceIO

data/lib/windows/error.rb

@@ -10,7 +10,6 @@
 # by the GetLastError() function.
 ############################################################################
 require 'windows/api'
-include Windows
 
 module Windows
    module Error
@@ -241,6 +240,12 @@ module Windows
       ERROR_I24_NO_MONITOR_SUPPORT    = 0x12
       ERROR_I24_INVALID_PARAMETER     = 0x13
 
+      APPLICATION_ERROR_MASK       = 0x20000000
+      ERROR_SEVERITY_SUCCESS       = 0x00000000
+      ERROR_SEVERITY_INFORMATIONAL = 0x40000000
+      ERROR_SEVERITY_WARNING       = 0x80000000
+      ERROR_SEVERITY_ERROR         = 0xc0000000
+
       ALLOWED_FAIL   = 0x0001
       ALLOWED_ABORT  = 0x0002
       ALLOWED_RETRY  = 0x0004
@@ -286,45 +291,45 @@ module Windows
       TC_SIGNAL  = 3
       
       # From WinError.h
-      ERROR_INVALID_FLAGS          = 4100 # 1004L
-      ERROR_NO_UNICODE_TRANSLATION = 4371 
+      ERROR_INVALID_FLAGS          = 0x1004
+      ERROR_NO_UNICODE_TRANSLATION = 0x1113
 
-      E_INVALIDARG  = 2147942487 # 0x80070057L
-      E_NOINTERFACE = 2147500034 # 0x80004002L
-      E_NOTIMPL     = 2147500033 # 0x80004001L
-      E_OUTOFMEMORY = 2147942414 # 0x8007000EL
-      E_UNEXPECTED  = 2147549183 # 0x8000FFFFL
+      E_INVALIDARG  = 0x80070057
+      E_NOINTERFACE = 0x80004002
+      E_NOTIMPL     = 0x80004001
+      E_OUTOFMEMORY = 0x8007000E
+      E_UNEXPECTED  = 0x8000FFFF
 
-      RPC_E_TIMEOUT = 2147549471 # 0x8001011FL
+      RPC_E_TIMEOUT = 0x8001011F
 
-      CO_E_NOT_SUPPORTED = 2147500065 # 0x80004021L
+      CO_E_NOT_SUPPORTED = 0x80004021
 
-      CLASS_E_NOAGGREGATION = 2147746064 # 0x80040110L
+      CLASS_E_NOAGGREGATION = 0x80040110
 
       # Registry errors
-      REGDB_E_CLASSNOTREG = 2147746132 # 0x80040154L
+      REGDB_E_CLASSNOTREG = 0x80040154
 
       # msterr.h
-      SCHED_S_TASK_READY                  = 267008 # 0x00041300L
-      SCHED_S_TASK_RUNNING                = 267009 # 0x00041301L
-      SCHED_S_TASK_DISABLED               = 267010 # 0x00041302L
-      SCHED_S_TASK_HAS_NOT_RUN            = 267011 # 0x00041303L
-      SCHED_S_TASK_HAS_NO_MORE_RUNS       = 267012 # 0x00041304L
-      SCHED_S_TASK_NOT_SCHEDULED          = 267013 # 0x00041305L
-      SCHED_S_TASK_TERMINATED             = 267014 # 0x00041306L
-      SCHED_S_TASK_NO_VALID_TRIGGERS      = 267015 # 0x00041307L
-      SCHED_S_EVENT_TRIGGER               = 267016 # 0x00041308L
-      SCHED_E_TRIGGER_NOT_FOUND           = 267017 # 0x00041309L
-      SCHED_E_TASK_NOT_READY              = 267018 # 0x0004130AL
-      SCHED_E_TASK_NOT_RUNNING            = 267019 # 0x0004130BL
-      SCHED_E_SERVICE_NOT_INSTALLED       = 267020 # 0x0004130CL
-      SCHED_E_CANNOT_OPEN_TASK            = 267021 # 0x0004130DL
-      SCHED_E_INVALID_TASK                = 267022 # 0x0004130EL
-      SCHED_E_ACCOUNT_INFORMATION_NOT_SET = 267023 # 0x0004130FL
-      SCHED_E_ACCOUNT_NAME_NOT_FOUND      = 267024 # 0x00041310L
-      SCHED_E_ACCOUNT_DBASE_CORRUPT       = 267025 # 0x00041311L
-      SCHED_E_NO_SECURITY_SERVICES        = 267026 # 0x00041312L
-      SCHED_E_UNKNOWN_OBJECT_VERSION      = 267027 # 0x00041313L
+      SCHED_S_TASK_READY                  = 0x00041300
+      SCHED_S_TASK_RUNNING                = 0x00041301
+      SCHED_S_TASK_DISABLED               = 0x00041302
+      SCHED_S_TASK_HAS_NOT_RUN            = 0x00041303
+      SCHED_S_TASK_HAS_NO_MORE_RUNS       = 0x00041304
+      SCHED_S_TASK_NOT_SCHEDULED          = 0x00041305
+      SCHED_S_TASK_TERMINATED             = 0x00041306
+      SCHED_S_TASK_NO_VALID_TRIGGERS      = 0x00041307
+      SCHED_S_EVENT_TRIGGER               = 0x00041308
+      SCHED_E_TRIGGER_NOT_FOUND           = 0x00041309
+      SCHED_E_TASK_NOT_READY              = 0x0004130A
+      SCHED_E_TASK_NOT_RUNNING            = 0x0004130B
+      SCHED_E_SERVICE_NOT_INSTALLED       = 0x0004130C
+      SCHED_E_CANNOT_OPEN_TASK            = 0x0004130D
+      SCHED_E_INVALID_TASK                = 0x0004130E
+      SCHED_E_ACCOUNT_INFORMATION_NOT_SET = 0x0004130F
+      SCHED_E_ACCOUNT_NAME_NOT_FOUND      = 0x00041310
+      SCHED_E_ACCOUNT_DBASE_CORRUPT       = 0x00041311
+      SCHED_E_NO_SECURITY_SERVICES        = 0x00041312
+      SCHED_E_UNKNOWN_OBJECT_VERSION      = 0x00041313
 
       # Socket errors
       WSA_INVALID_HANDLE      = 6

data/lib/windows/eventlog.rb

@@ -1,5 +1,4 @@
 require 'windows/api'
-include Windows
 
 module Windows
    module EventLog
@@ -22,18 +21,18 @@ module Windows
       
       EVENTLOG_FULL_INFO = 0
 
-      API.new('BackupEventLog', 'LP', 'B', 'advapi32')
-      API.new('ClearEventLog', 'LP', 'B', 'advapi32')
+      API.new('BackupEventLog', 'LS', 'B', 'advapi32')
+      API.new('ClearEventLog', 'LS', 'B', 'advapi32')
       API.new('CloseEventLog', 'L', 'B', 'advapi32')
       API.new('DeregisterEventSource', 'L', 'B', 'advapi32')
       API.new('GetEventLogInformation', 'LLPLP', 'B', 'advapi32')
       API.new('GetNumberOfEventLogRecords', 'LP', 'B', 'advapi32')
       API.new('GetOldestEventLogRecord', 'LP', 'B', 'advapi32')
       API.new('NotifyChangeEventLog', 'LL', 'B', 'advapi32')
-      API.new('OpenBackupEventLog', 'PP', 'L', 'advapi32')
-      API.new('OpenEventLog', 'PP', 'L', 'advapi32')
+      API.new('OpenBackupEventLog', 'SS', 'L', 'advapi32')
+      API.new('OpenEventLog', 'SS', 'L', 'advapi32')
       API.new('ReadEventLog', 'LLLPLPP', 'B', 'advapi32')
-      API.new('RegisterEventSource', 'PP', 'L', 'advapi32')
+      API.new('RegisterEventSource', 'SS', 'L', 'advapi32')
       API.new('ReportEvent', 'LIILPILPP', 'B', 'advapi32')
    end
 end

data/lib/windows/file.rb

@@ -1,9 +1,10 @@
 require 'windows/unicode'
-include Windows
+require 'windows/security'
 
 module Windows
    module File
       include Windows::Unicode
+      include Windows::Security
 
       API.auto_namespace = 'Windows::File'
       API.auto_constant  = true
@@ -15,6 +16,7 @@ module Windows
       FILE_END     = 2      
       
       # File Attributes
+
       FILE_ATTRIBUTE_READONLY      = 0x00000001  
       FILE_ATTRIBUTE_HIDDEN        = 0x00000002  
       FILE_ATTRIBUTE_SYSTEM        = 0x00000004  
@@ -30,52 +32,24 @@ module Windows
       FILE_ATTRIBUTE_NOT_CONTENT_INDEXED = 0x00002000
       
       # File types
+
       FILE_TYPE_UNKNOWN = 0x0000
       FILE_TYPE_DISK    = 0x0001
       FILE_TYPE_CHAR    = 0x0002
       FILE_TYPE_PIPE    = 0x0003
       FILE_TYPE_REMOTE  = 0x8000
       
-      # File security and access rights
-      APPLICATION_ERROR_MASK       = 0x20000000
-      ERROR_SEVERITY_SUCCESS       = 0x00000000
-      ERROR_SEVERITY_INFORMATIONAL = 0x40000000
-      ERROR_SEVERITY_WARNING       = 0x80000000
-      ERROR_SEVERITY_ERROR         = 0xc0000000
+      # File compression constants
+
       COMPRESSION_FORMAT_NONE      = 0
       COMPRESSION_FORMAT_DEFAULT   = 1
       COMPRESSION_FORMAT_LZNT1     = 2
       COMPRESSION_ENGINE_STANDARD  = 0
       COMPRESSION_ENGINE_MAXIMUM   = 256
-      ACCESS_ALLOWED_ACE_TYPE      = 0
-      ACCESS_DENIED_ACE_TYPE       = 1
       ANYSIZE_ARRAY                = 1
-      SYSTEM_AUDIT_ACE_TYPE        = 2
-      SYSTEM_ALARM_ACE_TYPE        = 3
-      OBJECT_INHERIT_ACE           = 1
-      CONTAINER_INHERIT_ACE        = 2
-      NO_PROPAGATE_INHERIT_ACE     = 4
-      INHERIT_ONLY_ACE             = 8
-      VALID_INHERIT_FLAGS          = 16
-      SUCCESSFUL_ACCESS_ACE_FLAG   = 64
-      FAILED_ACCESS_ACE_FLAG       = 128
-      DELETE                       = 0x00010000
-      READ_CONTROL                 = 0x20000
-      WRITE_DAC                    = 0x40000
-      WRITE_OWNER                  = 0x80000
-      SYNCHRONIZE                  = 0x100000
-      STANDARD_RIGHTS_REQUIRED     = 0xf0000
-      STANDARD_RIGHTS_READ         = 0x20000
-      STANDARD_RIGHTS_WRITE        = 0x20000
-      STANDARD_RIGHTS_EXECUTE      = 0x20000
-      STANDARD_RIGHTS_ALL          = 0x1f0000
-      SPECIFIC_RIGHTS_ALL          = 0xffff
-      ACCESS_SYSTEM_SECURITY       = 0x1000000
-      MAXIMUM_ALLOWED              = 0x2000000
-      GENERIC_READ                 = 0x80000000
-      GENERIC_WRITE                = 0x40000000
-      GENERIC_EXECUTE              = 0x20000000
-      GENERIC_ALL                  = 0x10000000
+
+      # File security and access rights
+
       FILE_READ_DATA               = 1
       FILE_LIST_DIRECTORY          = 1
       FILE_WRITE_DATA              = 2
@@ -93,7 +67,7 @@ module Windows
       FILE_READ_ATTRIBUTES         = 128
       FILE_WRITE_ATTRIBUTES        = 256
 	
-      FILE_ALL_ACCESS = STANDARD_RIGHTS_REQUIRED | SYNCHRONIZE | 0x1ff
+      FILE_ALL_ACCESS = STANDARD_RIGHTS_REQUIRED | SYNCHRONIZE | 0x1FF
 	
       FILE_GENERIC_READ = 
          STANDARD_RIGHTS_READ |

data/lib/windows/file_mapping.rb

@@ -1,5 +1,4 @@
 require 'windows/api'
-include Windows
 
 module Windows
    module FileMapping     

data/lib/windows/filesystem.rb

@@ -1,5 +1,4 @@
 require 'windows/api'
-include Windows
 
 module Windows
    module FileSystem

data/lib/windows/gdi/bitmap.rb

@@ -1,5 +1,4 @@
 require 'windows/api'
-include Windows
 
 module Windows
    module GDI

data/lib/windows/gdi/device_context.rb

@@ -1,5 +1,4 @@
 require 'windows/api'
-include Windows
 
 module Windows
    module GDI

data/lib/windows/gdi/painting_drawing.rb

@@ -1,5 +1,4 @@
 require 'windows/api'
-include Windows
 
 module Windows
    module GDI

data/lib/windows/handle.rb

@@ -1,5 +1,4 @@
 require 'windows/api'
-include Windows
 
 module Windows
    module Handle

data/lib/windows/library.rb

@@ -1,5 +1,4 @@
 require 'windows/api'
-include Windows
 
 module Windows
    module Library

data/lib/windows/memory.rb

@@ -1,5 +1,4 @@
 require 'windows/api'
-include Windows
 
 module Windows
    module Memory

data/lib/windows/msvcrt/buffer.rb

@@ -1,5 +1,4 @@
 require 'windows/api'
-include Windows
 
 module Windows
    module MSVCRT

data/lib/windows/msvcrt/directory.rb

@@ -1,5 +1,4 @@
 require 'windows/api'
-include Windows
 
 module Windows
    module MSVCRT
@@ -9,8 +8,8 @@ module Windows
          API.auto_constant  = true
          API.auto_unicode   = false 
 
-         API.new('_chdir', 'P', 'I', MSVCRT_DLL)
-         API.new('_wchdir', 'P', 'I', MSVCRT_DLL)
+         API.new('_chdir', 'S', 'I', MSVCRT_DLL)
+         API.new('_wchdir', 'S', 'I', MSVCRT_DLL)
          API.new('_chdrive', 'I', 'I', MSVCRT_DLL)
          API.new('_getcwd', 'PI', 'P', MSVCRT_DLL)
          API.new('_wgetcwd', 'PI', 'P', MSVCRT_DLL)
@@ -19,12 +18,12 @@ module Windows
          API.new('_getdiskfree', 'IP', 'I', MSVCRT_DLL)
          API.new('_getdrive', 'V', 'I', MSVCRT_DLL)
          API.new('_getdrives', 'V', 'L', MSVCRT_DLL)
-         API.new('_mkdir', 'P', 'I', MSVCRT_DLL)
-         API.new('_wmkdir', 'P', 'I', MSVCRT_DLL)
-         API.new('_rmdir', 'P', 'I', MSVCRT_DLL)
-         API.new('_wrmdir', 'P', 'I', MSVCRT_DLL)
-         API.new('_searchenv', 'PPP', 'V', MSVCRT_DLL)
-         API.new('_wsearchenv', 'PPP', 'V', MSVCRT_DLL)
+         API.new('_mkdir', 'S', 'I', MSVCRT_DLL)
+         API.new('_wmkdir', 'S', 'I', MSVCRT_DLL)
+         API.new('_rmdir', 'S', 'I', MSVCRT_DLL)
+         API.new('_wrmdir', 'S', 'I', MSVCRT_DLL)
+         API.new('_searchenv', 'SSP', 'V', MSVCRT_DLL)
+         API.new('_wsearchenv', 'SSP', 'V', MSVCRT_DLL)
       end
    end
 end

data/lib/windows/msvcrt/file.rb

@@ -1,5 +1,4 @@
 require 'windows/api'
-include Windows
 
 module Windows
    module MSVCRT

data/lib/windows/msvcrt/io.rb

@@ -1,5 +1,4 @@
 require 'windows/api'
-include Windows
 
 # This module includes stream I/O, low level I/O, etc.
 module Windows

data/lib/windows/msvcrt/string.rb

@@ -1,5 +1,4 @@
 require 'windows/api'
-include Windows
 
 module Windows
    module MSVCRT

data/lib/windows/msvcrt/time.rb

@@ -1,5 +1,4 @@
 require 'windows/api'
-include Windows
 
 module Windows
    module MSVCRT

data/lib/windows/national.rb

@@ -1,5 +1,4 @@
 require 'windows/api'
-include Windows
 
 module Windows
    module National