windows-pr 0.7.4 → 0.8.0

data/CHANGES

@@ -1,3 +1,14 @@
+= 0.8.0 - 20-Jan-2008
+* Added the Windows::COM::Automation module.
+* Moved Windows::NetworkManagement to Windows::Network::Management.
+* Added the Windows::Network::SNMP module.
+* Added a MAXPATH constant to Windows::Limits, which is variable depending
+  on whether or not $KCODE is set to UTF8.
+* Added some macro methods to Windows::Error.
+* Added many more methods to Windows::COM.
+* Fixed the prototype for the SetConsoleCtrlHandler in the Windows::Console
+  module, and added the CTRL_CLOSE_EVENT constant.
+
 = 0.7.4 - 11-Dec-2007
 * Added several more functions to Windows::Window.
 * Added many more constants to the Windows::NetworkManagement module.

data/README

@@ -46,15 +46,15 @@
    for any MSVCRT module.
    
    Source files contain related functions, by topic. For example, the
-   clipboard.rb file contains clip board related functions, such as
+   clipboard.rb file contains clipboard related functions, such as
    CloseClipboard(), as well as constants such as CF_TEXT, CF_BITMAP, etc.
    
 == Wide character functions
 	I decided that the $KCODE handling was a bad idea, so most of the $KCODE
-	handling has been removed.  The only methods that change their behavior
+	handling has been removed. The only methods that change their behavior
 	based on $KCODE are the multi_to_wide and wide_to_multi helper methods
-	in the Windows::Unicode module.  If $KCODE is set to UTF8, then the code
-	point used is CP_UTF8.  Otherwise, CP_ACP is used.
+	in the Windows::Unicode module. If $KCODE is set to UTF8, then the code
+	point used is CP_UTF8. Otherwise, CP_ACP is used.
 	
 	The modules all come with explicit ANSI and Wide (Unicode) functions,
 	when available from MS Windows. By default, a function without an explicit
@@ -62,8 +62,8 @@
 	to use the wide ('W') functions explicitly if you wish.
 	
 == Platform specific functions
-   Not all functions are defined on all platforms.  For example, the
-   AttachConsole() function is only defined on Windows XP and later.  If you
+   Not all functions are defined on all platforms. For example, the
+   AttachConsole() function is only defined on Windows XP and later. If you
    need to conditionally test for its existence, simply use the 'defined?'
    method:
    
@@ -75,9 +75,9 @@
    
 == Where are the tests, dude?
    While I've made some effort to test these functions, there are simply too
-   many for me to effectively test them all.  We're ultimately talking about
+   many for me to effectively test them all. We're ultimately talking about
    hundreds, if not thousands, of functions, and I don't know what all of them
-   actually do.  That being said, I will add tests where and when I can.
+   actually do. That being said, I will add tests where and when I can.
    
    If you find that I've declared the function prototype wrong for a given
    function, please let me know ASAP and I'll fix it.  An example program
@@ -86,27 +86,27 @@
      
 == What's the point?
    I became tired of redefining Windows functions over and over whenever I
-   wanted to use the Win32API package.  I thought it would be very handy to
+   wanted to use the Win32API package. I thought it would be very handy to
    have them predefined for me in a package with convenient wrapper methods
    to boot.
    
    While it's true that Moonwolf has a package on the RAA that includes many
-   of these functions defined already, there are a few issues with it.  First,
-   it puts *every* function and constant in one or two files.  That's a waste
-   of memory, hard to organize & maintain, and impossible to test.  Second,
-   some of his function declarations are wrong.  Third, some of the functions
-   I needed for my own projects are missing.  Fourth, there's no gem.  Lastly,
+   of these functions defined already, there are a few issues with it. First,
+   it puts *every* function and constant in one or two files. That's a waste
+   of memory, hard to organize & maintain, and impossible to test. Second,
+   some of his function declarations are wrong. Third, some of the functions
+   I needed for my own projects are missing. Fourth, there's no gem. Lastly,
    I haven't seen an update in over 6 years, which leads me to believe it is
    no longer maintained.
    
 == Hey, I'm missing function X!
-   I have only defined a small subset of the overall Windows API.  It would
-   take me years to define them *all*.  I defined the ones I needed first,
-   plus some that I thought would be useful to others.  I will continue to
+   I have only defined a small subset of the overall Windows API. It would
+   take me years to define them *all*. I defined the ones I needed first,
+   plus some that I thought would be useful to others. I will continue to
    add functions in my spare time, or (especially) by request.
    
 == Bugs
-   None that I'm aware of.  Please report any bugs on the project page at
+   None that I'm aware of. Please report any bugs on the project page at
    http://www.rubyforge.org/projects/win32utils.
    
    The only real bugs you could find are either bad prototype declarations
@@ -122,14 +122,13 @@
    
    In other cases library functions are not exported by the dll. For example,
    my version of shlwapi.dll does not export the PathIsHTMLFile() function,
-   despite being well past the minimum version for that DLL file.  There is
+   despite being well past the minimum version for that DLL file. There is
    nothing you or I can do about it short of rebuilding the DLL file from
    scratch and/or reporting the issue to Microsoft.
    
 == Supported Platforms
-   I only support the Windows NT family of Windows, and really only Windows
-   2000 and later, though I'll make an effort to support NT 4 if there are
-   any NT 4 related issues and requests to support it.
+   I only support the Windows NT family of Windows, and then only Windows
+   2000 and later.
    
 == License
    Ruby's
@@ -140,7 +139,7 @@
    warranties of merchantability and fitness for a particular purpose.
 
 == Copyright
-   (C) 2006, 2007, Daniel J. Berger
+   (C) 2006-2008, Daniel J. Berger
    All Rights Reserved
    
 == Author

data/doc/conversion_guide.txt

@@ -1,8 +1,9 @@
 = Parameters
-Long:    'N' or 'L'
-Integer: 'I'
-Pointer: 'P'
-Void:    'V'
+Long:     'L'
+Integer:  'I'
+Pointer:  'P'
+Void:     'V'
+Callback: 'K' # win32-api only
 
 = Windows Data Types
 BOOL  		=> 'I'
@@ -26,4 +27,5 @@ struct      => 'P'
 struct*     => 'P'
 
 In practice most LPVOID types should be designated as 'L' because this
-usually means the function is looking for an address.
+usually means the function is looking for an address. Check the documentation
+for details.

data/lib/windows/com.rb

@@ -8,6 +8,69 @@ module Windows
       API.auto_method    = true
       API.auto_unicode   = false
 
+      # These constants are from wtypes.h but are only used in a COM context
+      # as far as I know.
+
+      VT_EMPTY	   = 0
+	   VT_NULL	   = 1
+	   VT_I2	      = 2
+	   VT_I4	      = 3
+	   VT_R4	      = 4
+	   VT_R8	      = 5
+	   VT_CY	      = 6
+	   VT_DATE	   = 7
+	   VT_BSTR	   = 8
+	   VT_DISPATCH	= 9
+	   VT_ERROR	   = 10
+	   VT_BOOL	   = 11
+      VT_VARIANT	= 12
+      VT_UNKNOWN	= 13
+      VT_DECIMAL	= 14
+      VT_I1	      = 16
+      VT_UI1	   = 17
+      VT_UI2	   = 18
+      VT_UI4	   = 19
+      VT_I8	      = 20
+      VT_UI8	   = 21
+      VT_INT	   = 22
+      VT_UINT	   = 23
+      VT_VOID	   = 24
+      VT_HRESULT  = 25
+      VT_PTR      = 26
+      VT_SAFEARRAY = 27
+      VT_CARRAY	 = 28
+      VT_USERDEFINED	= 29
+      VT_LPSTR	   = 30
+      VT_LPWSTR	= 31
+      VT_RECORD	= 36
+      VT_INT_PTR	= 37
+      VT_UINT_PTR	= 38
+      VT_FILETIME	= 64
+      VT_BLOB     = 65
+      VT_STREAM	= 66
+      VT_STORAGE	= 67
+      VT_STREAMED_OBJECT  = 68
+      VT_STORED_OBJECT    = 69
+      VT_BLOB_OBJECT	     = 70
+      VT_CF	              = 71
+      VT_CLSID	           = 72
+      VT_VERSIONED_STREAM = 73
+      VT_BSTR_BLOB = 0xfff
+      VT_VECTOR    = 0x1000
+      VT_ARRAY	    = 0x2000
+      VT_BYREF	    = 0x4000
+      VT_RESERVED	 = 0x8000
+      VT_ILLEGAL   = 0xffff
+      VT_ILLEGALMASKED = 0xfff
+      VT_TYPEMASK      = 0xfff
+
+      # These constants are from OAldl.h
+
+      INVOKE_FUNC           = 1
+      INVOKE_PROPERTYGET	 = 2
+      INVOKE_PROPERTYPUT	 = 4
+      INVOKE_PROPERTYPUTREF = 8
+
       API.new('BindMoniker', 'PLPP', 'L', 'ole32')
       API.new('CLSIDFromProgID', 'PP', 'L', 'ole32')
       API.new('CLSIDFromProgIDEx', 'PP', 'L', 'ole32')
@@ -42,7 +105,38 @@ module Windows
       API.new('CoInitialize', 'P', 'L', 'ole32')
       API.new('CoTaskMemFree', 'P', 'V', 'ole32')
       API.new('CoUninitialize', 'V', 'V', 'ole32')
+      API.new('CoUnmarshalHresult', 'PP', 'L', 'ole32')
+      API.new('CoUnmarshalInterface', 'PPP', 'L', 'ole32')
+      API.new('CoWaitForMultipleHandles', 'LLLPP', 'L', 'ole32')
+      API.new('CreateAntiMoniker', 'P', 'L', 'ole32')
+      API.new('CreateAsyncBindCtx', 'LKKP', 'L', 'urlmon')
+      API.new('CreateBindCtx', 'LP', 'L', 'ole32')
+      API.new('CreateClassMoniker', 'PP', 'L', 'ole32')
+      API.new('CreateFileMoniker', 'PP', 'L', 'ole32')
+      API.new('CreateGenericComposite', 'PPP', 'L', 'ole32')
+      API.new('CreateItemMoniker', 'PPP', 'L', 'ole32')
+      API.new('CreateObjrefMoniker', 'PP', 'L', 'ole32')
+      API.new('CreatePointerMoniker', 'PP', 'L', 'ole32')
+      API.new('GetClassFile', 'PP', 'L', 'ole32')
+      API.new('GetRunningObjectTable', 'LP', 'L', 'ole32')
+      API.new('IIDFromString', 'PP', 'L', 'ole32')
+      API.new('IsAccelerator', 'LIPP', 'B', 'ole32')
+      API.new('IsEqualGUID', 'PP', 'B', 'ole32')
+      API.new('MkParseDisplayName', 'PPPP', 'L', 'ole32')
+      API.new('MonikerCommonPrefixWith', 'PPP', 'L', 'ole32')
+      API.new('MonikerRelativePathTo', 'PPPI', 'L', 'ole32')
+      API.new('OleDoAutoConvert', 'PP', 'L', 'ole32')
+      API.new('OleGetAutoConvert', 'PP', 'L', 'ole32')
+      API.new('OleGetIconOfClass', 'PPI', 'L', 'ole32')
+      API.new('OleGetIconOfFile', 'PI', 'L', 'ole32')
+      API.new('OleIconToCursor', 'PL', 'L', 'olepro32')
+      API.new('OleRegGetMiscStatus', 'PLP', 'L', 'ole32')
+      API.new('OleRegGetUserType', 'PLP', 'L', 'ole32')
+      API.new('OleSetAutoConvert', 'PP', 'L', 'ole32')
+      API.new('ProgIDFromCLSID', 'PP', 'L', 'ole32')
+		API.new('StringFromCLSID', 'PP', 'L', 'ole32')
 		API.new('StringFromGUID2', 'PPI', 'I', 'ole32')
+		API.new('StringFromIID', 'PP', 'L', 'ole32')
 
       # Windows Vista
       begin

data/lib/windows/console.rb

@@ -10,6 +10,7 @@ module Windows
 
       CTRL_C_EVENT        = 0
       CTRL_BREAK_EVENT    = 1
+      CTRL_CLOSE_EVENT    = 2
       CTRL_LOGOFF_EVENT   = 5
       CTRL_SHUTDOWN_EVENT = 6
 
@@ -80,7 +81,7 @@ module Windows
       API.new('ScrollConsoleScreenBuffer', 'LPPLP', 'B')
       API.new('SetConsoleActiveScreenBuffer', 'L', 'B')
       API.new('SetConsoleCP', 'L', 'B')
-      API.new('SetConsoleCtrlHandler', 'PI', 'B')
+      API.new('SetConsoleCtrlHandler', 'KI', 'B')
       API.new('SetConsoleCursorInfo', 'LP', 'B')
       API.new('SetConsoleCursorPosition', 'LP', 'B')      
       API.new('SetConsoleMode', 'LL', 'B')

data/lib/windows/error.rb

@@ -339,5 +339,51 @@ module Windows
          FormatMessage.call(flags, 0, err_num, 0, buf, buf.size, 0)
          buf.split(0.chr).first.chomp rescue 'Unknown error'       
       end
+      
+      # Macros from WinError.h
+      
+      def IS_ERROR(status)
+         status >> 31 == 1
+      end
+
+      def MAKE_HRESULT(sev, fac, code)
+         sev << 31 | fac << 16 | code
+      end
+      
+      def MAKE_SCODE(sev, fac, code)
+         sev << 31 | fac << 16 | code
+      end
+      
+      def HRESULT_CODE(hr)
+         hr & 0xFFFF
+      end 
+
+      def HRESULT_FACILITY(hr)
+         (hr >> 16) & 0x1fff
+      end
+
+      def HRESULT_FROM_NT(x)
+         x | 0x10000000 # FACILITY_NT_BIT
+      end
+
+      def HRESULT_FROM_WIN32(x)
+         if x <= 0
+            x
+         else
+            (x & 0x0000FFFF) | (7 << 16) | 0x80000000
+         end
+      end
+
+      def HRESULT_SEVERITY(hr)
+         (hr >> 31) & 0x1
+      end
+
+      def FAILED(status)
+         status < 0
+      end
+
+      def SUCCEEDED(status)
+         status >= 0
+      end
    end
 end

data/lib/windows/limits.rb

@@ -9,5 +9,15 @@ module Windows
       MAXBYTE  = 0xff
       MAXWORD  = 0xffff
       MAXDWORD = 0xffffffff
+      
+      # For wide character functions the actual path limit is actually 32k
+      # for most functions that deal with paths, but in the interests of not
+      # wasting huge chunks of memory on buffers I limit it to 1k, which
+      # should be more than enough in practice.
+      if $KCODE == 'UTF8'
+         MAXPATH = 1024
+      else
+         MAXPATH = 256
+      end
    end
 end 

data/lib/windows/synchronize.rb

@@ -8,11 +8,12 @@ module Windows
       API.auto_method    = true
       API.auto_unicode   = true
 
-      INFINITE       = 0xFFFFFFFF
-      WAIT_OBJECT_0  = 0
-      WAIT_TIMEOUT   = 0x102
-      WAIT_ABANDONED = 128
-      WAIT_FAILED    = 0xFFFFFFFF
+      INFINITE         = 0xFFFFFFFF
+      WAIT_OBJECT_0    = 0
+      WAIT_TIMEOUT     = 0x102
+      WAIT_ABANDONED   = 128
+      WAIT_ABANDONED_0 = WAIT_ABANDONED
+      WAIT_FAILED      = 0xFFFFFFFF
       
       STATUS_WAIT_0           =  0    
       STATUS_ABANDONED_WAIT_0 =  128    

data/lib/windows/window.rb

@@ -27,8 +27,29 @@ module Windows
       SW_FORCEMINIMIZE    = 11
       SW_MAX              = 11
       
+      API.new('EnumWindows', 'KP', 'L', 'user32')
+      API.new('FindWindow', 'PP', 'L', 'user32')
+      API.new('FindWindowEx', 'LLPP', 'L', 'user32')
+      API.new('GetAltTabInfo', 'LIPPI', 'B', 'user32')
+      API.new('GetAncestor', 'LI', 'L', 'user32')
       API.new('GetClientRect', 'LP', 'B', 'user32')
+      API.new('GetDesktopWindow', 'V', 'L', 'user32')
       API.new('GetForegroundWindow', 'V', 'L', 'user32')
+      API.new('GetGUIThreadInfo', 'LP', 'B', 'user32')
+      API.new('GetLastActivePopup', 'L', 'L', 'user32')
+      API.new('GetLayeredWindowAttributes', 'LPBL', 'B', 'user32')
+      API.new('GetParent', 'L', 'L', 'user32')
+      API.new('GetProcessDefaultLayout', 'P', 'B', 'user32')
+      API.new('GetShellWindow', 'V', 'L', 'user32')
+      API.new('GetTitleBarInfo', 'LP', 'B', 'user32')
+      API.new('GetTopWindow', 'L', 'L', 'user32')
+      API.new('GetWindow', 'LI', 'L', 'user32')
+      API.new('GetWindowInfo', 'LP', 'B', 'user32')
+      API.new('GetWindowModuleFileName', 'LLI', 'I', 'user32')
+      API.new('GetWindowPlacement', 'LP', 'B', 'user32')
       API.new('GetWindowRect', 'LP', 'B', 'user32')
+      API.new('GetWindowText', 'LPI', 'I', 'user32')
+      API.new('GetWindowTextLength', 'L', 'I', 'user32')
+      API.new('GetWindowThreadProcessId', 'LP', 'L', 'user32')
    end
 end

data/test/tc_network_management.rb

@@ -3,14 +3,14 @@
 #
 # Test case for the Windows::NetworkManagement module.
 #####################################################################
-require 'windows/network_management'
+require 'windows/network/management'
 require 'test/unit'
 
 class NetworkManagementFoo
-   include Windows::NetworkManagement
+   include Windows::Network::Management
 end
 
-class TC_Windows_NetworkManagement < Test::Unit::TestCase
+class TC_Windows_Network_Management < Test::Unit::TestCase
    def setup
       @foo = NetworkManagementFoo.new
    end

data/test/tc_network_snmp.rb

@@ -0,0 +1,31 @@
+#####################################################################
+# tc_network_snmp.rb
+#
+# Test case for the Windows::NetworkSNMP module.
+#####################################################################
+require 'windows/network/snmp'
+require 'test/unit'
+
+class NetworkSNMPFoo
+   include Windows::Network::SNMP
+end
+
+class TC_Windows_Network_SNMP < Test::Unit::TestCase
+   def setup
+      @foo = NetworkSNMPFoo.new
+   end
+
+   def test_numeric_constants
+      assert_equal(0, NetworkSNMPFoo::SNMPAPI_FAILURE)
+      assert_equal(1, NetworkSNMPFoo::SNMPAPI_SUCCESS)
+   end
+   
+   def test_method_constants
+      assert_not_nil(NetworkSNMPFoo::SnmpCleanup)
+      assert_not_nil(NetworkSNMPFoo::SnmpClose)
+   end
+   
+   def teardown
+      @foo = nil
+   end
+end

data/windows-pr.gemspec

@@ -2,7 +2,7 @@ require "rubygems"
 
 spec = Gem::Specification.new do |gem|
    gem.name        = "windows-pr"
-   gem.version     = "0.7.4"
+   gem.version     = "0.8.0"
    gem.author      = "Daniel J. Berger"
    gem.email       = "djberg96@gmail.com"
    gem.homepage    = "http://www.rubyforge.org/projects/win32utils"

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification 
 name: windows-pr
 version: !ruby/object:Gem::Version 
-  version: 0.7.4
+  version: 0.8.0
 platform: ruby
 authors: 
 - Daniel J. Berger
@@ -9,7 +9,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2007-12-11 00:00:00 -07:00
+date: 2008-01-21 00:00:00 -07:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency 
@@ -49,7 +49,6 @@ files:
 - lib/windows/limits.rb
 - lib/windows/memory.rb
 - lib/windows/national.rb
-- lib/windows/network_management.rb
 - lib/windows/nio.rb
 - lib/windows/path.rb
 - lib/windows/pipe.rb
@@ -84,6 +83,7 @@ files:
 - test/tc_msvcrt_buffer.rb
 - test/tc_national.rb
 - test/tc_network_management.rb
+- test/tc_network_snmp.rb
 - test/tc_nio.rb
 - test/tc_path.rb
 - test/tc_pipe.rb
@@ -141,7 +141,7 @@ required_rubygems_version: !ruby/object:Gem::Requirement
 requirements: []
 
 rubyforge_project: 
-rubygems_version: 0.9.5
+rubygems_version: 1.0.1
 signing_key: 
 specification_version: 2
 summary: Windows functions and constants bundled via Win32::API
@@ -164,6 +164,7 @@ test_files:
 - test/tc_msvcrt_buffer.rb
 - test/tc_national.rb
 - test/tc_network_management.rb
+- test/tc_network_snmp.rb
 - test/tc_nio.rb
 - test/tc_path.rb
 - test/tc_pipe.rb

data/lib/windows/network_management.rb

@@ -1,521 +0,0 @@
-require 'windows/api'
-include Windows
-
-# I don't use the Boolean flag for the return types of these methods because
-# they succeed, not fail, if the return value is 0.
-#
-module Windows
-   module NetworkManagement
-      API.auto_namespace = 'Windows::NetworkManagement'
-      API.auto_constant  = true
-      API.auto_method    = false
-      API.auto_unicode   = false
-
-      NERR_Success              = 0
-      NERR_BASE                 = 2100
-      NERR_NetNotStarted        = NERR_BASE + 2
-      NERR_UnknownServer        = NERR_BASE + 3 
-      NERR_ShareMem             = NERR_BASE + 4
-      NERR_NoNetworkResource    = NERR_BASE + 5 
-      NERR_RemoteOnly           = NERR_BASE + 6 
-      NERR_DevNotRedirected     = NERR_BASE + 7 
-      NERR_AlreadyLoggedOn      = NERR_BASE + 100
-      NERR_NotLoggedOn          = NERR_BASE + 101
-      NERR_BadUsername          = NERR_BASE + 102
-      NERR_BadPassword          = NERR_BASE + 103
-      NERR_UnableToAddName_W    = NERR_BASE + 104
-      NERR_UnableToAddName_F    = NERR_BASE + 105
-      NERR_UnableToDelName_W    = NERR_BASE + 106
-      NERR_UnableToDelName_F    = NERR_BASE + 107
-      NERR_LogonsPaused         = NERR_BASE + 109
-      NERR_LogonServerConflict  = NERR_BASE + 110
-      NERR_LogonNoUserPath      = NERR_BASE + 111
-      NERR_LogonScriptError     = NERR_BASE + 112
-      NERR_StandaloneLogon      = NERR_BASE + 114
-      NERR_LogonServerNotFound  = NERR_BASE + 115
-      NERR_LogonDomainExists    = NERR_BASE + 116
-      NERR_NonValidatedLogon    = NERR_BASE + 117
-      NERR_ACFNotFound          = NERR_BASE + 119
-      NERR_GroupNotFound        = NERR_BASE + 120
-      NERR_UserNotFound         = NERR_BASE + 121
-      NERR_ResourceNotFound     = NERR_BASE + 122
-      NERR_GroupExists          = NERR_BASE + 123
-      NERR_UserExists           = NERR_BASE + 124
-      NERR_ResourceExists       = NERR_BASE + 125
-      NERR_NotPrimary           = NERR_BASE + 126
-      NERR_ACFNotLoaded         = NERR_BASE + 127
-      NERR_ACFNoRoom            = NERR_BASE + 128
-      NERR_ACFFileIOFail        = NERR_BASE + 129
-      NERR_ACFTooManyLists      = NERR_BASE + 130
-      NERR_UserLogon            = NERR_BASE + 131
-      NERR_ACFNoParent          = NERR_BASE + 132
-      NERR_CanNotGrowSegment    = NERR_BASE + 133
-      NERR_SpeGroupOp           = NERR_BASE + 134
-      NERR_NotInCache           = NERR_BASE + 135
-      NERR_UserInGroup          = NERR_BASE + 136
-      NERR_UserNotInGroup       = NERR_BASE + 137
-      NERR_AccountUndefined     = NERR_BASE + 138
-      NERR_AccountExpired       = NERR_BASE + 139
-      NERR_InvalidWorkstation   = NERR_BASE + 140
-      NERR_InvalidLogonHours    = NERR_BASE + 141
-      NERR_PasswordExpired      = NERR_BASE + 142
-      NERR_PasswordCantChange   = NERR_BASE + 143
-      NERR_PasswordHistConflict = NERR_BASE + 144
-      NERR_PasswordTooShort     = NERR_BASE + 145
-      NERR_PasswordTooRecent    = NERR_BASE + 146
-      NERR_InvalidDatabase      = NERR_BASE + 147
-      NERR_DatabaseUpToDate     = NERR_BASE + 148
-      NERR_SyncRequired         = NERR_BASE + 149
-      NERR_UseNotFound          = NERR_BASE + 150
-      NERR_BadAsgType           = NERR_BASE + 151
-      NERR_DeviceIsShared       = NERR_BASE + 152
-           
-      MAX_PREFERRED_LENGTH = -1
-
-      # Taken from LMServer.h
-      SV_TYPE_WORKSTATION       = 0x00000001
-      SV_TYPE_SERVER            = 0x00000002
-      SV_TYPE_SQLSERVER         = 0x00000004
-      SV_TYPE_DOMAIN_CTRL       = 0x00000008
-      SV_TYPE_DOMAIN_BAKCTRL    = 0x00000010
-      SV_TYPE_TIME_SOURCE       = 0x00000020
-      SV_TYPE_AFP               = 0x00000040
-      SV_TYPE_NOVELL            = 0x00000080
-      SV_TYPE_DOMAIN_MEMBER     = 0x00000100
-      SV_TYPE_PRINTQ_SERVER     = 0x00000200
-      SV_TYPE_DIALIN_SERVER     = 0x00000400
-      SV_TYPE_XENIX_SERVER      = 0x00000800
-      SV_TYPE_SERVER_UNIX       = SV_TYPE_XENIX_SERVER
-      SV_TYPE_NT                = 0x00001000
-      SV_TYPE_WFW               = 0x00002000
-      SV_TYPE_SERVER_MFPN       = 0x00004000
-      SV_TYPE_SERVER_NT         = 0x00008000
-      SV_TYPE_POTENTIAL_BROWSER = 0x00010000
-      SV_TYPE_BACKUP_BROWSER    = 0x00020000
-      SV_TYPE_MASTER_BROWSER    = 0x00040000
-      SV_TYPE_DOMAIN_MASTER     = 0x00080000
-      SV_TYPE_SERVER_OSF        = 0x00100000
-      SV_TYPE_SERVER_VMS        = 0x00200000
-      SV_TYPE_WINDOWS           = 0x00400000
-      SV_TYPE_DFS               = 0x00800000
-      SV_TYPE_CLUSTER_NT        = 0x01000000
-      SV_TYPE_TERMINALSERVER    = 0x02000000
-      SV_TYPE_CLUSTER_VS_NT     = 0x04000000
-      SV_TYPE_DCE               = 0x10000000
-      SV_TYPE_ALTERNATE_XPORT   = 0x20000000
-      SV_TYPE_LOCAL_LIST_ONLY   = 0x40000000
-      SV_TYPE_DOMAIN_ENUM       = 0x80000000
-      SV_TYPE_ALL               = 0xFFFFFFFF
-
-      API.new('NetAlertRaise', 'PPL', 'L', 'netapi32')
-      API.new('NetAlertRaiseEx', 'PPLP', 'L', 'netapi32')
-      API.new('NetApiBufferAllocate', 'LP', 'L', 'netapi32')
-      API.new('NetApiBufferFree', 'P', 'L', 'netapi32')
-      API.new('NetApiBufferReallocate', 'PLP', 'L', 'netapi32')
-      API.new('NetApiBufferSize', 'PP', 'L', 'netapi32')
-      API.new('NetGetAnyDCName', 'PPP', 'L', 'netapi32')
-      API.new('NetGetDCName', 'PPP', 'L', 'netapi32')
-      API.new('NetGetDisplayInformationIndex', 'PLPP', 'L', 'netapi32')
-      API.new('NetGetJoinableOUs', 'PPPPPP', 'L', 'netapi32')
-      API.new('NetGetJoinInformation', 'PPP', 'L', 'netapi32')
-      API.new('NetGroupAdd', 'PLPP', 'L', 'netapi32')
-      API.new('NetGroupAddUser', 'PPP', 'L', 'netapi32')
-      API.new('NetGroupDel', 'PP', 'L', 'netapi32')
-      API.new('NetGroupDelUser', 'PPP', 'L', 'netapi32')
-      API.new('NetGroupEnum', 'PLPLPPP', 'L', 'netapi32')
-      API.new('NetGroupGetInfo', 'PPLP', 'L', 'netapi32')
-      API.new('NetGroupGetUsers', 'PPLPLPPP', 'L', 'netapi32')
-      API.new('NetGroupSetInfo', 'PPLPP', 'L', 'netapi32')
-      API.new('NetGroupSetUsers', 'PPLPL', 'L', 'netapi32')
-      API.new('NetJoinDomain', 'PPPPPL', 'L', 'netapi32')
-      API.new('NetLocalGroupAdd', 'PLPP', 'L', 'netapi32')
-      API.new('NetLocalGroupAddMembers', 'PPLPL', 'L', 'netapi32')
-      API.new('NetLocalGroupDel', 'PP', 'L', 'netapi32')
-      API.new('NetLocalGroupDelMembers', 'PPLPL', 'L', 'netapi32')
-      API.new('NetLocalGroupEnum', 'PLPLPPP', 'L', 'netapi32')
-      API.new('NetLocalGroupGetInfo', 'PPLP', 'L', 'netapi32')
-      API.new('NetLocalGroupGetMembers', 'PPLPLPPP', 'L', 'netapi32')
-      API.new('NetLocalGroupSetInfo', 'PPLPP', 'L', 'netapi32')
-      API.new('NetLocalGroupSetMembers', 'PPLPP', 'L', 'netapi32')
-      API.new('NetMessageBufferSend', 'PPPPL', 'L', 'netapi32')
-      API.new('NetMessageNameAdd', 'PP', 'L', 'netapi32')
-      API.new('NetMessageNameDel', 'PP', 'L', 'netapi32')
-      API.new('NetMessageNameEnum', 'PLPLPPP', 'L', 'netapi32')
-      API.new('NetMessageNameGetInfo', 'PPLP', 'L', 'netapi32')
-      API.new('NetQueryDisplayInformation', 'PLLLLPP', 'L', 'netapi32')
-      API.new('NetRemoteComputerSupports', 'PLP', 'L', 'netapi32')
-      API.new('NetRemoteTOD', 'PP', 'L', 'netapi32')
-      API.new('NetRenameMachineInDomain', 'PPPPL', 'L', 'netapi32')
-      API.new('NetScheduleJobAdd', 'PPP', 'L', 'netapi32')
-      API.new('NetScheduleJobDel', 'PLL', 'L', 'netapi32')
-      API.new('NetScheduleJobEnum', 'PPLPPP', 'L', 'netapi32')
-      API.new('NetScheduleJobGetInfo', 'PLP', 'L', 'netapi32')
-      API.new('NetServerComputerNameAdd', 'PPP', 'L', 'netapi32')
-      API.new('NetServerComputerNameDel', 'PP', 'L', 'netapi32')
-      API.new('NetServerDiskEnum', 'PLPLPPP', 'L', 'netapi32')
-      API.new('NetServerEnum', 'PLPLPPLPP', 'L', 'netapi32')
-      API.new('NetServerGetInfo', 'PLP', 'L', 'netapi32')
-      API.new('NetServerSetInfo', 'PLPP', 'L', 'netapi32')
-      API.new('NetServerTransportAdd', 'PLP', 'L', 'netapi32')
-      API.new('NetServerTransportAddEx', 'PLP', 'L', 'netapi32')
-      API.new('NetServerTransportDel', 'PLP', 'L', 'netapi32')
-      API.new('NetServerTransportEnum', 'PLPLPPP', 'L', 'netapi32')
-      API.new('NetUnjoinDomain', 'PPPL', 'L', 'netapi32')
-      API.new('NetUseAdd', 'PLPP', 'L', 'netapi32')
-      API.new('NetUseDel', 'PPL', 'L', 'netapi32')
-      API.new('NetUseEnum', 'PLPLPPP', 'L', 'netapi32')
-      API.new('NetUseGetInfo', 'PPLP', 'L', 'netapi32')
-      API.new('NetUserAdd', 'PLPP', 'L', 'netapi32')
-      API.new('NetUserChangePassword', 'PPPP', 'L', 'netapi32')
-      API.new('NetUserDel', 'PP', 'L', 'netapi32')
-      API.new('NetUserEnum', 'PLLPLPPP', 'L', 'netapi32')
-      API.new('NetUserGetGroups', 'PPLPLPP', 'L', 'netapi32')
-      API.new('NetUserGetInfo', 'PPLP', 'L', 'netapi32')
-      API.new('NetUserGetLocalGroups', 'PPLLPLPP', 'L', 'netapi32')
-      API.new('NetUserModalsGet', 'PLP', 'L', 'netapi32')
-      API.new('NetUserModalsSet', 'PLPP', 'L', 'netapi32')
-      API.new('NetUserSetGroups', 'PPLPL', 'L', 'netapi32')
-      API.new('NetUserSetInfo', 'PPLPP', 'L', 'netapi32')
-      API.new('NetValidateName', 'PPPPP', 'L', 'netapi32')
-      API.new('NetWkstaGetInfo', 'PLP', 'L', 'netapi32')
-      API.new('NetWkstaSetInfo', 'PLPP', 'L', 'netapi32')
-      API.new('NetWkstaTransportAdd', 'PLPP', 'L', 'netapi32')
-      API.new('NetWkstaTransportDel', 'PPL', 'L', 'netapi32')
-      API.new('NetWkstaTransportEnum', 'PLPLPPP', 'L', 'netapi32')
-      API.new('NetWkstaUserEnum', 'PLPLPPP', 'L', 'netapi32')
-      API.new('NetWkstaUserGetInfo', 'PLP', 'L', 'netapi32')
-      API.new('NetWkstaUserSetInfo', 'PPLP', 'L', 'netapi32')
-
-      # Windows XP or later.
-      begin 
-         API.new('GetNetScheduleAccountInformation', 'PLP', 'L', 'mstask')
-         API.new('SetNetScheduleAccountInformation', 'PPP', 'L', 'netapi32')
-      rescue Exception
-         # Do nothing.  Not supported on current platform.
-      end
-
-      def NetAlertRaise(name, buf, bufsize)
-         NetAlertRaise.call(name, buf, bufsize) == NERR_Success
-      end
-
-      def NetAlertRaiseEx(name, data, size, service)
-         NetAlertRaiseEx.call(name, data, size, service) == NERR_Success
-      end
-
-      def NetApiBufferAllocate(num_bytes, buf)
-         NetApiBufferAllocate.call(num_bytes, buf) == NERR_Success
-      end
-
-      def NetApiBufferFree(buf)
-         NetApiBufferFree.call(buf) == NERR_Success
-      end
-
-      def NetApiBufferReallocate(old_buf, count, new_buf)
-         NetApiBufferReallocate.call(old_buf, count, new_buf) == NERR_Success
-      end
-
-      def NetApiBufferSize(buf, count)
-         NetApiBufferSize.call(buf, count) == NERR_Success
-      end
-
-      def NetGetAnyDCName(server, domain, buf)
-         NetGetAnyDCName.call(server, domain, buf) == NERR_Success
-      end
-
-      def NetGetDCName(server, domain, buf)
-         NetGetDCName.call(server, domain, buf) == NERR_Success
-      end
-
-      def NetGetDisplayInformationIndex(server, level, prefix, index)
-         NetGetDisplayInformationIndex.call(server, level, prefix, index) == NERR_Success
-      end
-
-      def NetGetJoinableOUs(server, domain, account, password, count, ous)
-         NetGetJoinableOUs.call(server, domain, account, password, count, ous) == NERR_Success
-      end
-
-      def NetGetJoinInformation(server, buf, buf_type)
-         NetGetJoinInformation.call(server, buf, buf_type) == NERR_Success
-      end
-
-      def NetGroupAdd(server, level, buf, err)
-         NetGroupAdd.call(server, level, buf, err).call == NERR_Success
-      end
-
-      def NetGroupAddUser(server, group, user)
-         NetGroupAddUser.call(server, group, user) == NERR_Success
-      end
-
-      def NetGroupDel(server, group)
-         NetGroupDel.call(server, group) == NERR_Success
-      end
-
-      def NetGroupDelUser(server, group, user)
-         NetGroupDelUser.call(server, group, user) == NERR_Success
-      end
-
-      def NetGroupEnum(server, level, buf, max, entries, total_entries, resume)
-         NetGroupEnum.call(server, level, buf, max, entries, total_entries, resume) == NERR_Success
-      end
-
-      def NetGroupGetInfo(server, group, level, buf)
-         NetGroupGetInfo.call(server, group, level, buf) == NERR_Success
-      end
-
-      def NetGroupGetUsers(server, group, level, buf, max, entries, total_entries, resume)
-         NetGroupGetUsers.call(server, group, level, buf, max, entries, total_entries, resume) == NERR_Success
-      end
-
-      def NetGroupSetInfo(server, group, level, buf, err)
-         NetGroupSetInfo.call(server, group, level, buf, err) == NERR_Success
-      end
-
-      def NetGroupSetUsers(server, group, level, buf, total)
-         NetGroupSetUsers.call(server, group, level, buf, total) == NERR_Success
-      end
-
-      def NetJoinDomain(server, domain, account_ou, account, password, opts)
-         NetJoinDomain.call(server, domain, account_ou, account, password, opts) == NERR_Success
-      end
-
-      def NetLocalGroupAdd(server, level, buf, err)
-         NetLocalGroupAdd.call(server, level, buf, err) == NERR_Success
-      end
-
-      def NetLocalGroupAddMembers(server, group, level, buf, total)
-         NetLocalGroupAddMembers.call(server, group, level, buf, total) == NERR_Success
-      end
-
-      def NetLocalGroupDel(server, group)
-         NetLocalGroupDel.call(server, group) == NERR_Success
-      end
-
-      def NetLocalGroupDelMembers(server, group, level, buf, total)
-         NetLocalGroupDelMembers.call(server, group, level, buf, total) == NERR_Success
-      end
-
-      def NetLocalGroupEnum(server, level, buf, max, entries, total_entries, resume)
-         NetLocalGroupEnum.call(server, level, buf, max, entries, total_entries, resume) == NERR_Success
-      end
-
-      def NetLocalGroupGetInfo(server, group, level, buf)
-         NetLocalGroupGetInfo.call(server, group, level, buf) == NERR_Success
-      end
-
-      def NetLocalGroupGetMembers(server, group, level, buf, max, entries, total_entries, resume)
-         NetLocalGroupGetMembers.call(server, group, level, buf, max, entries, total_entries, resume) == NERR_Success
-      end
-
-      def NetLocalGroupSetInfo(server, group, level, buf, err)
-         NetLocalGroupSetInfo.call(server, group, level, buf, err) == NERR_Success
-      end
-
-      def NetLocalGroupSetMembers(server, group, level, buf, total)
-         NetLocalGroupSetMembers.call(server, group, level, buf, total) == NERR_Success
-      end
-
-      def NetMessageBufferSend(server, msg, from, buf, bufsize)
-         NetMessageBufferSend.call(server, msg, from, buf, bufsize) == NERR_Success
-      end
-
-      def NetMessageNameAdd(server, msg)
-         NetMessageNameAdd.call(server, msg) == NERR_Success
-      end
-
-      def NetMessageNameDel(server, msg)
-         NetMessageNameDel.call(server, msg) == NERR_Success
-      end
-
-      def NetMessageNameEnum(server, level, buf, max, entries, total_entries, resume)
-         NetMessageNameEnum.call(server, level, buf, max, entries, total_entries, resume) == NERR_Success
-      end
-
-      def NetMessageNameGetInfo(server, msg, level, buf)
-         NetMessageNameGetInfo.call(server, msg, level, buf) == NERR_Success
-      end
-
-      def NetQueryDisplayInformation(server, level, index, entries, max, count, buf)
-         NetQueryDisplayInformation.call(server, level, index, entries, max, count, buf) == NERR_Success
-      end
-
-      def NetRemoteComputerSupports(server, level, index, entries, max, count, buf)
-         NetRemoteComputerSupports.call(server, level, index, entries, max, count, buf) == NERR_Success
-      end
-
-      def NetRemoteTOD(server, buf)
-         NetRemoteTOD.call(server, buf) == NERR_Success
-      end
-
-      def NetRenameMachineInDomain(server, machine, account, password, options)
-         NetRenameMachineInDomain.call(server, machine, account, password, options) == NERR_Success
-      end
-
-      def NetScheduleJobAdd(server, buf, job)
-         NetScheduleJobAdd.call(server, buf, job) == NERR_Success
-      end
-      
-      def NetScheduleJobDel(server, min, max)
-         NetScheduleJobDel.call(server, min, max) == NERR_Success
-      end
-
-      def NetScheduleJobEnum(server, buf, max, entries, total_entries, resume)
-         NetScheduleJobEnum.call(server, buf, max, entries, total_entries, resume) == NERR_Success
-      end
-
-      def NetScheduleJobGetInfo(server, job, buf)
-         NetScheduleJobGetInfo.call(server, job, buf) == NERR_Success
-      end
-
-      def NetServerComputerNameAdd(server, em_domain, em_server)
-         NetServerComputerNameAdd.call(server, em_domain, em_server) == NERR_Success
-      end
-
-      def NetServerComputerNameDel(server, em_server)
-         NetServerComputerNameDel.call(server, em_server) == NERR_Success
-      end
-
-      def NetServerDiskEnum(server, level, buf, maxlen, entries, total_entries, resume)
-         NetServerDiskEnum.call(server, level, buf, maxlen, entries, total_entries, resume) == NERR_Success
-      end
-
-      def NetServerEnum(server, level, ptr, maxlen, num, total, stype, domain, handle)
-         NetServerEnum.call(server, level, ptr, maxlen, num, total, stype, domain, handle) == NERR_Success
-      end
-
-      def NetServerGetInfo(server, level, buf)
-         NetServerGetInfo.call(server, level, buf) == NERR_Success
-      end
-
-      def NetServerSetInfo(server, level, buf, error)
-         NetServerSetInfo.call(server, level, buf, error) == NERR_Success
-      end
-
-      def NetServerTransportAdd(server, level, buf)
-         NetServerTransportAdd.call(server, level, buf) == NERR_Success
-      end
-
-      def NetServerTransportAddEx(server, level, buf)
-         NetServerTransportAddEx.call(server, level, buf) == NERR_Success
-      end
-
-      def NetServerTransportDel(server, level, buf)
-         NetServerTransportDel.call(server, level, buf) == NERR_Success
-      end
-
-      def NetServerTransportEnum(server, level, buf, maxlen, entries, total_entries, resume)
-         NetServerTransportEnum.call(server, level, buf, maxlen, entries, total_entries, resume) == NERR_Success
-      end
-
-      def NetUnjoinDomain(server, account, password, options)
-         NetUnjoinDomain.call(server, account, password, options) == NERR_Success
-      end
-
-      def NetUseAdd(server, level, buf, error)
-         NetUseAdd.call(server, level, buf, error) == NERR_Success
-      end
-
-      def NetUseDel(server, name, conn)
-         NetUseDel.call(server, name, conn) == NERR_Success
-      end
-
-      def NetUseEnum(server, level, buf, max, entries, total_entries, resume)
-         NetUseEnum.call(server, level, buf, max, entries, total_entries, resume) == NERR_Success
-      end
-
-      def NetUseGetInfo(server, name, level, buf)
-         NetUseGetInfo.call(server, name, level, buf) == NERR_Success
-      end
-
-      def NetUserAdd(server, level, buf, error)
-         NetUserAdd.call(server, level, buf, error) == NERR_Success
-      end
-
-      def NetUserChangePassword(domain, user, old, new)
-         NetUserChangePassword.call(domain, user, old, new) == NERR_Success
-      end
-
-      def NetUserDel(server, user)
-         NetUserDel.call(server, user) == NERR_Success
-      end
-
-      def NetUserEnum(server, level, filter, buf, max, entries, total_entries, resume)
-         NetUserEnum.call(server, level, filter, buf, max, entries, total_entries, resume) == NERR_Success
-      end
-
-      def NetUserGetGroups(server, user, level, buf, max, entries, total_entries)
-         NetUserGetGroups.call(server, user, level, buf, max, entries, total_entries) == NERR_Success
-      end
-
-      def NetUserGetInfo(server, user, level, buf)
-         NetUserGetInfo.call(server, user, level, buf) == NERR_Success
-      end
-
-      def NetUserGetLocalGroups(server, user, level, flags, buf, max, entries, total_entries)
-         NetUserGetLocalGroups.call(server, user, level, flags, buf, max, entries, total_entries) == NERR_Success
-      end
-
-      def NetUserModalsGet(server, level, buf)
-         NetUserModalsGet.call(server, level, buf) == NERR_Success
-      end
-
-      def NetUserModalsSet(server, level, buf, error)
-         NetUserModalsSet.call(server, level, buf, error) == NERR_Success
-      end
-
-      def NetUserSetGroups(server, user, level, buf, num)
-         NetUserSetGroups.call(server, user, level, buf, num) == NERR_Success
-      end
-
-      def NetUserSetInfo(server, user, level, buf, error)
-         NetUserSetInfo.call(server, user, level, buf, error) == NERR_Success
-      end
-
-      def NetValidateName(server, name, account, password, name_type)
-         NetValidateName.call(server, name, account, password, name_type) == NERR_Success
-      end
-
-      def NetWkstaGetInfo(server, level, buf)
-         NetWkstaGetInfo.call(server, level, buf) == NERR_Success
-      end
-
-      def NetWkstaSetInfo(server, level, buf, error)
-         NetWkstaSetInfo.call(server, level, buf, error) == NERR_Success
-      end
-
-      def NetWkstaTransportAdd(server, level, buf, error)
-         NetWkstaTransportAdd.call(server, level, buf, error) == NERR_Success
-      end
-
-      def NetWkstaTransportDel(server, name, cond)
-         NetWkstaTransportDel.call(server, name, cond) == NERR_Success
-      end
-
-      def NetWkstaTransportEnum(server, level, buf, maxlen, entries, total_entries, resume)
-         NetWkstaTransportEnum.call(server, level, buf, maxlen, entries, total_entries, resume) == NERR_Success
-      end
-
-      def NetWkstaUserEnum(server, level, buf, maxlen, entries, total_entries, resume)
-         NetWkstaUserEnum.call(server, level, buf, maxlen, entries, total_entries, resume) == NERR_Success
-      end
-
-      def NetWkstaUserGetInfo(res, level, buf)
-         NetWkstaUserGetInfo.call(res, level, buf) == NERR_Success
-      end
-
-      def NetWkstaUserSetInfo(res, level, buf, error)
-         NetWkstaUserSetInfo.call(res, level, buf, error) == NERR_Success
-      end
-
-      # Windows XP or later
-      begin
-         def GetNetScheduleAccountInformation(server, num_chars, chars)
-            GetNetScheduleAccountInformation.call(server, num_chars, chars) == NERR_Success
-         end
-
-         def SetNetScheduleAccountInformation(server, account, password)
-            SetNetScheduleAccountInformation.call(server, account, password) == NERR_Success
-         end
-      rescue Exception
-      end
-   end
-end