windows-pr 0.1.0

data/test/tc_error.rb

@@ -0,0 +1,57 @@
+#####################################################################
+# tc_error.rb
+#
+# Test case for the Windows::Error module.
+#####################################################################
+base = File.basename(Dir.pwd)
+if base == 'test' || base =~ /windows-pr/
+   Dir.chdir '..' if base == 'test'
+   $LOAD_PATH.unshift Dir.pwd + '/lib'
+   Dir.chdir 'test' rescue nil
+end
+
+require "windows/error"
+require "test/unit"
+
+class Foo
+   include Windows::Error
+end
+
+class TC_Windows_Error < Test::Unit::TestCase
+  
+   def setup
+      @foo = Foo.new
+   end
+   
+   def test_numeric_constants
+      assert_equal(0x00000100, Foo::FORMAT_MESSAGE_ALLOCATE_BUFFER)
+      assert_equal(0x00000200, Foo::FORMAT_MESSAGE_IGNORE_INSERTS)
+      assert_equal(0x00000400, Foo::FORMAT_MESSAGE_FROM_STRING)
+      assert_equal(0x00000800, Foo::FORMAT_MESSAGE_FROM_HMODULE)
+      assert_equal(0x00001000, Foo::FORMAT_MESSAGE_FROM_SYSTEM)
+      assert_equal(0x00002000, Foo::FORMAT_MESSAGE_ARGUMENT_ARRAY) 
+      assert_equal(0x000000FF, Foo::FORMAT_MESSAGE_MAX_WIDTH_MASK) 
+      assert_equal(0x0001, Foo::SEM_FAILCRITICALERRORS)
+      assert_equal(0x0004, Foo::SEM_NOALIGNMENTFAULTEXCEPT)
+      assert_equal(0x0002, Foo::SEM_NOGPFAULTERRORBOX)
+      assert_equal(0x8000, Foo::SEM_NOOPENFILEERRORBOX)
+   end
+   
+   def test_method_constants
+      assert_not_nil(Foo::GetLastError)
+      assert_not_nil(Foo::SetLastError)
+      assert_not_nil(Foo::SetLastErrorEx)
+      assert_not_nil(Foo::SetErrorMode)
+      assert_not_nil(Foo::FormatMessage)
+   end
+   
+   def test_get_last_error
+      assert_respond_to(@foo, :get_last_error)
+      assert_nothing_raised{ @foo.get_last_error }
+      assert_kind_of(String, @foo.get_last_error)
+   end
+   
+   def teardown
+      @foo = nil
+   end
+end

data/test/tc_msvcrt_buffer.rb

@@ -0,0 +1,71 @@
+#####################################################################
+# tc_msvcrt_buffer.rb
+#
+# Test case for the Windows::MSVCRT::Buffer module.
+#####################################################################
+base = File.basename(Dir.pwd)
+if base == 'test' || base =~ /windows-pr/
+   Dir.chdir '..' if base == 'test'
+   $LOAD_PATH.unshift Dir.pwd + '/lib'
+   Dir.chdir 'test' rescue nil
+end
+
+require "windows/msvcrt/buffer"
+require "test/unit"
+
+class Foo
+   include Windows::MSVCRT::Buffer
+end
+
+class TC_Windows_MSVCRT_Buffer < Test::Unit::TestCase
+   def setup
+      @foo = Foo.new
+   end
+   
+   def test_method_constants
+      assert_not_nil(Foo::Memcpy)
+      assert_not_nil(Foo::Memccpy)
+      assert_not_nil(Foo::Memchr)
+      assert_not_nil(Foo::Memcmp)
+      assert_not_nil(Foo::Memicmp)
+      assert_not_nil(Foo::Memmove)
+      assert_not_nil(Foo::Memset)
+      assert_not_nil(Foo::Swab)
+   end
+   
+   def test_memcpy
+      assert_respond_to(@foo, :memcpy)
+   end
+   
+   def test_memccpy
+      assert_respond_to(@foo, :memccpy)
+   end
+   
+   def test_memchr
+      assert_respond_to(@foo, :memchr)
+   end
+   
+   def test_memcmp
+      assert_respond_to(@foo, :memcmp)
+   end
+   
+   def test_memicmp
+      assert_respond_to(@foo, :memicmp)
+   end
+   
+   def test_memmove
+      assert_respond_to(@foo, :memmove)
+   end
+   
+   def test_memset
+      assert_respond_to(@foo, :memset)
+   end
+   
+   def test_swab
+      assert_respond_to(@foo, :swab)
+   end
+   
+   def teardown
+      @foo  = nil
+   end
+end

data/test/tc_path.rb

@@ -0,0 +1,97 @@
+#####################################################################
+# tc_path.rb
+#
+# Test case for the Windows::Path module.
+#####################################################################
+base = File.basename(Dir.pwd)
+if base == 'test' || base =~ /windows-pr/
+   Dir.chdir '..' if base == 'test'
+   $LOAD_PATH.unshift Dir.pwd + '/lib'
+   Dir.chdir 'test' rescue nil
+end
+
+require "windows/path"
+require "test/unit"
+
+class Foo
+   include Windows::Path
+end
+
+class TC_Windows_Path < Test::Unit::TestCase
+   def setup
+      @foo  = Foo.new
+      @path = "C:\\"
+   end
+
+   def test_numeric_constants
+      assert_equal(0x0000, Foo::GCT_INVALID)
+      assert_equal(0x0001, Foo::GCT_LFNCHAR)
+      assert_equal(0x0002, Foo::GCT_SHORTCHAR)
+      assert_equal(0x0004, Foo::GCT_WILD)
+      assert_equal(0x0008, Foo::GCT_SEPARATOR)
+   end
+
+   def test_method_constants
+      assert_not_nil(Foo::PathAddBackslash)
+      assert_not_nil(Foo::PathAddExtension)
+      assert_not_nil(Foo::PathAppend)
+      assert_not_nil(Foo::PathBuildRoot)
+      assert_not_nil(Foo::PathCanonicalize)
+      assert_not_nil(Foo::PathCombine)
+      assert_not_nil(Foo::PathCommonPrefix)
+      assert_not_nil(Foo::PathCompactPath)
+      assert_not_nil(Foo::PathCompactPathEx)
+      assert_not_nil(Foo::PathCreateFromUrl)
+      assert_not_nil(Foo::PathFileExists)
+      assert_not_nil(Foo::PathFindExtension)
+      assert_not_nil(Foo::PathFindFileName)
+      assert_not_nil(Foo::PathFindNextComponent)
+      assert_not_nil(Foo::PathFindOnPath)
+      assert_not_nil(Foo::PathFindSuffixArray)
+      assert_not_nil(Foo::PathGetArgs)
+      assert_not_nil(Foo::PathGetCharType)
+      assert_not_nil(Foo::PathGetDriveNumber)
+      assert_not_nil(Foo::PathIsContentType)
+      assert_not_nil(Foo::PathIsDirectory)
+      assert_not_nil(Foo::PathIsDirectoryEmpty)
+      assert_not_nil(Foo::PathIsFileSpec)
+      #assert_not_nil(Foo::PathIsHTMLFile)
+      assert_not_nil(Foo::PathIsLFNFileSpec)
+      assert_not_nil(Foo::PathIsNetworkPath)
+      assert_not_nil(Foo::PathIsPrefix)
+      assert_not_nil(Foo::PathIsRelative)
+      assert_not_nil(Foo::PathIsRoot)
+      assert_not_nil(Foo::PathIsSameRoot)
+      assert_not_nil(Foo::PathIsSystemFolder)
+      assert_not_nil(Foo::PathIsUNC)
+      assert_not_nil(Foo::PathIsUNCServer)
+      assert_not_nil(Foo::PathIsUNCServerShare)
+      assert_not_nil(Foo::PathIsURL)
+      assert_not_nil(Foo::PathMakePretty)
+      assert_not_nil(Foo::PathMakeSystemFolder)
+      assert_not_nil(Foo::PathMatchSpec)
+      assert_not_nil(Foo::PathParseIconLocation)
+      assert_not_nil(Foo::PathQuoteSpaces)
+      assert_not_nil(Foo::PathRelativePathTo)
+      assert_not_nil(Foo::PathRemoveArgs)
+      assert_not_nil(Foo::PathRemoveBackslash)
+      assert_not_nil(Foo::PathRemoveBlanks)
+      assert_not_nil(Foo::PathRemoveExtension)
+      assert_not_nil(Foo::PathRemoveFileSpec)
+      assert_not_nil(Foo::PathRenameExtension)
+      assert_not_nil(Foo::PathSearchAndQualify)
+      assert_not_nil(Foo::PathSetDlgItemPath)
+      assert_not_nil(Foo::PathSkipRoot)
+      assert_not_nil(Foo::PathStripPath)
+      assert_not_nil(Foo::PathStripToRoot)
+      assert_not_nil(Foo::PathUndecorate)
+      assert_not_nil(Foo::PathUnExpandEnvStrings)
+      assert_not_nil(Foo::PathUnmakeSystemFolder)
+      assert_not_nil(Foo::PathUnquoteSpaces)
+   end
+
+   def teardown
+      @foo  = nil
+      @path = nil
+   end
+end

data/test/tc_synchronize.rb

@@ -0,0 +1,43 @@
+##################################################################
+# tc_synchronize.rb
+#
+# Test case for the windows/synchronize package.
+##################################################################
+base = File.basename(Dir.pwd)
+if base == 'test' || base =~ /windows-pr/
+   Dir.chdir '..' if base == 'test'
+   $LOAD_PATH.unshift Dir.pwd + '/lib'
+   Dir.chdir 'test' rescue nil
+end
+
+require "windows/synchronize"
+require "test/unit"
+
+class Foo
+   include Windows
+end
+
+class TC_Windows_Synchronize < Test::Unit::TestCase
+   def setup
+      @handle = (0.chr * 16).unpack('LLLL')
+      @foo    = Foo.new
+   end
+   
+   def test_numeric_constants
+      assert_not_nil(Foo::INFINITE)
+   end
+   
+   def test_method_constants
+      assert_not_nil(Foo::WaitForSingleObject)
+   end
+   
+   def test_wait_for_single_object
+      assert_respond_to(@foo, :wait_for_single_object)
+      assert_nothing_raised{ @foo.wait_for_single_object(@handle[0], 1) }
+   end
+   
+   def teardown
+      @foo = nil
+      @handle = nil
+   end
+end

data/test/ts_all.rb

@@ -0,0 +1,10 @@
+$LOAD_PATH.unshift(Dir.pwd)
+$LOAD_PATH.unshift(Dir.pwd + '/lib')
+$LOAD_PATH.unshift(Dir.pwd + '/lib/windows')
+$LOAD_PATH.unshift(Dir.pwd + '/lib/windows/msvcrt')
+$LOAD_PATH.unshift(Dir.pwd + '/test')
+
+Dir.chdir('test') rescue nil
+
+require 'tc_error'
+require 'tc_msvcrt_buffer'

metadata

@@ -0,0 +1,67 @@
+--- !ruby/object:Gem::Specification 
+rubygems_version: 0.8.11
+specification_version: 1
+name: windows-pr
+version: !ruby/object:Gem::Version 
+  version: 0.1.0
+date: 2006-04-05 00:00:00 -06:00
+summary: Windows functions predefined via Win32API
+require_paths: 
+- lib
+email: djberg96@gmail.com
+homepage: http://www.rubyforge.org/projects/win32utils
+rubyforge_project: 
+description: 
+autorequire: 
+default_executable: 
+bindir: bin
+has_rdoc: true
+required_ruby_version: !ruby/object:Gem::Version::Requirement 
+  requirements: 
+  - - ">"
+    - !ruby/object:Gem::Version 
+      version: 0.0.0
+  version: 
+platform: ruby
+signing_key: 
+cert_chain: 
+authors: 
+- Daniel J. Berger
+files: 
+- doc/conversion_guide.txt
+- lib/windows/clipboard.rb
+- lib/windows/device_io.rb
+- lib/windows/error.rb
+- lib/windows/file.rb
+- lib/windows/handle.rb
+- lib/windows/memory.rb
+- lib/windows/path.rb
+- lib/windows/sound.rb
+- lib/windows/synchronize.rb
+- test/ts_all.rb
+- lib/windows/msvcrt/buffer.rb
+- lib/windows/msvcrt/file.rb
+- test/CVS
+- test/tc_error.rb
+- test/tc_msvcrt_buffer.rb
+- test/tc_path.rb
+- test/tc_synchronize.rb
+- CHANGES
+- CVS
+- MANIFEST
+- README
+test_files: 
+- test/ts_all.rb
+rdoc_options: []
+
+extra_rdoc_files: 
+- README
+- CHANGES
+executables: []
+
+extensions: []
+
+requirements: []
+
+dependencies: []
+