windows-pr 1.2.2 → 1.2.3

data/test/tc_msvcrt_directory.rb

@@ -1,96 +1,96 @@
-#####################################################################
-# tc_msvcrt_directory.rb
-#
-# Test case for the Windows::MSVCRT::File module.
-#####################################################################
-require 'windows/msvcrt/directory'
-require 'fileutils'
-require 'test/unit'
-
-class TC_Windows_MSVCRT_Directory < Test::Unit::TestCase
-  include Windows::MSVCRT::Directory
-
-  def setup
-    @pwd = Dir.pwd
-    @dir = 'delete_me'
-    @buf = 0.chr * 260
-  end
-
-  def test_method_constants
-    assert_not_nil(Chdir)
-    assert_not_nil(Wchdir)
-    assert_not_nil(Chdrive)
-    assert_not_nil(Getcwd)
-    assert_not_nil(Wgetcwd)
-    assert_not_nil(Getdcwd)
-    assert_not_nil(Getdiskfree)
-    assert_not_nil(Getdrive)
-    assert_not_nil(Getdrives)
-    assert_not_nil(Mkdir)
-    assert_not_nil(Wmkdir)
-    assert_not_nil(Rmdir)
-    assert_not_nil(Wrmdir)
-    assert_not_nil(Searchenv)
-    assert_not_nil(Wsearchenv)
-  end
-   
-  def test_chdir
-    assert_nothing_raised{ chdir('..') }
-    assert_equal(File.dirname(@pwd), Dir.pwd)
-  end
-
-  def test_wchdir
-    assert_nothing_raised{ wchdir("C:\\") }
-  end
-
-  def test_chdrive
-    assert(self.respond_to?(:chdrive, true))
-  end
-
-  def test_getcwd
-    assert(self.respond_to?(:getcwd, true))
-  end
-
-  def test_wgetcwd
-    assert(self.respond_to?(:wgetcwd, true))
-  end
-
-  def test_getdcwd
-    assert(self.respond_to?(:getdcwd, true))
-  end
-
-  def test_wgetdcwd
-    assert(self.respond_to?(:wgetdcwd, true))
-  end
-
-  def test_mkdir
-    assert(self.respond_to?(:mkdir, true))
-    assert_nothing_raised{ mkdir(@dir) }
-    assert_equal(true, File.exists?(@dir))
-  end
-
-  def test_rmdir
-    Dir.mkdir(@dir) unless File.exists?(@dir)
-    assert(self.respond_to?(:rmdir, true))
-    assert_nothing_raised{ rmdir(@dir) }
-    assert_equal(false, File.exists?(@dir))
-  end
-
-  def test_searchenv
-    possible = [
-      "c:\\winnt\\system32\\notepad.exe",
-      "c:\\windows\\system32\\notepad.exe",
-      "c:\\windows\\notepad.exe"
-    ]
-    assert(self.respond_to?(:searchenv, true))
-    assert_nothing_raised{ searchenv("notepad.exe", "PATH", @buf) }
-    assert_equal(true, possible.include?(@buf.strip.downcase))
-  end
-
-  def teardown
-    FileUtils.rm_f(@dir) if File.exists?(@dir)
-    @pwd = nil
-    @dir = nil
-    @buf = 0
-  end
-end
+#####################################################################
+# tc_msvcrt_directory.rb
+#
+# Test case for the Windows::MSVCRT::File module.
+#####################################################################
+require 'windows/msvcrt/directory'
+require 'fileutils'
+require 'test/unit'
+
+class TC_Windows_MSVCRT_Directory < Test::Unit::TestCase
+  include Windows::MSVCRT::Directory
+
+  def setup
+    @pwd = Dir.pwd
+    @dir = 'delete_me'
+    @buf = 0.chr * 260
+  end
+
+  def test_method_constants
+    assert_not_nil(Chdir)
+    assert_not_nil(Wchdir)
+    assert_not_nil(Chdrive)
+    assert_not_nil(Getcwd)
+    assert_not_nil(Wgetcwd)
+    assert_not_nil(Getdcwd)
+    assert_not_nil(Getdiskfree)
+    assert_not_nil(Getdrive)
+    assert_not_nil(Getdrives)
+    assert_not_nil(Mkdir)
+    assert_not_nil(Wmkdir)
+    assert_not_nil(Rmdir)
+    assert_not_nil(Wrmdir)
+    assert_not_nil(Searchenv)
+    assert_not_nil(Wsearchenv)
+  end
+   
+  def test_chdir
+    assert_nothing_raised{ chdir('..') }
+    assert_equal(File.dirname(@pwd), Dir.pwd)
+  end
+
+  def test_wchdir
+    assert_nothing_raised{ wchdir("C:\\") }
+  end
+
+  def test_chdrive
+    assert(self.respond_to?(:chdrive, true))
+  end
+
+  def test_getcwd
+    assert(self.respond_to?(:getcwd, true))
+  end
+
+  def test_wgetcwd
+    assert(self.respond_to?(:wgetcwd, true))
+  end
+
+  def test_getdcwd
+    assert(self.respond_to?(:getdcwd, true))
+  end
+
+  def test_wgetdcwd
+    assert(self.respond_to?(:wgetdcwd, true))
+  end
+
+  def test_mkdir
+    assert(self.respond_to?(:mkdir, true))
+    assert_nothing_raised{ mkdir(@dir) }
+    assert_equal(true, File.exists?(@dir))
+  end
+
+  def test_rmdir
+    Dir.mkdir(@dir) unless File.exists?(@dir)
+    assert(self.respond_to?(:rmdir, true))
+    assert_nothing_raised{ rmdir(@dir) }
+    assert_equal(false, File.exists?(@dir))
+  end
+
+  def test_searchenv
+    possible = [
+      "c:\\winnt\\system32\\notepad.exe",
+      "c:\\windows\\system32\\notepad.exe",
+      "c:\\windows\\notepad.exe"
+    ]
+    assert(self.respond_to?(:searchenv, true))
+    assert_nothing_raised{ searchenv("notepad.exe", "PATH", @buf) }
+    assert_equal(true, possible.include?(@buf.strip.downcase))
+  end
+
+  def teardown
+    FileUtils.rm_f(@dir) if File.exists?(@dir)
+    @pwd = nil
+    @dir = nil
+    @buf = 0
+  end
+end

data/test/tc_msvcrt_file.rb

@@ -1,80 +1,80 @@
-#####################################################################
-# tc_msvcrt_file.rb
-#
-# Test case for the Windows::MSVCRT::File module.
-#####################################################################
-require 'windows/msvcrt/file'
-require 'test/unit'
-
-class MFileFoo
-   include Windows::MSVCRT::File
-end
-
-class TC_Windows_MSVCRT_File < Test::Unit::TestCase
-   def setup
-      @foo = MFileFoo.new
-   end
-
-   def test_numeric_constants
-      assert_not_nil(MFileFoo::S_IFMT)
-      assert_not_nil(MFileFoo::S_IFDIR)
-      assert_not_nil(MFileFoo::S_IFCHR)
-      assert_not_nil(MFileFoo::S_IFIFO)
-      assert_not_nil(MFileFoo::S_IFREG)
-      assert_not_nil(MFileFoo::S_IREAD)
-      assert_not_nil(MFileFoo::S_IWRITE)
-      assert_not_nil(MFileFoo::S_IEXEC)
-   end
-   
-   def test_method_constants
-      assert_not_nil(MFileFoo::Chmod)
-      assert_not_nil(MFileFoo::Chsize)
-      assert_not_nil(MFileFoo::Mktemp)
-      assert_not_nil(MFileFoo::Stat)
-      assert_not_nil(MFileFoo::Stat64)
-      assert_not_nil(MFileFoo::Wchmod)
-      assert_not_nil(MFileFoo::Wmktemp)
-      assert_not_nil(MFileFoo::Wstat)
-      assert_not_nil(MFileFoo::Wstat64)
-   end
-   
-   def test_chmod
-      assert_respond_to(@foo, :chmod)
-   end
-
-   def test_chsize
-      assert_respond_to(@foo, :chsize)
-   end
-
-   def test_mktemp
-      assert_respond_to(@foo, :mktemp)
-   end
-
-   def test_stat
-      assert_respond_to(@foo, :stat)
-   end
-
-   def test_stat64
-      assert_respond_to(@foo, :stat64)
-   end
-
-   def test_wchmod
-      assert_respond_to(@foo, :wchmod)
-   end
-
-   def test_wmktemp
-      assert_respond_to(@foo, :wmktemp)
-   end
-
-   def test_wstat
-      assert_respond_to(@foo, :wstat)
-   end
-
-   def test_wstat64
-      assert_respond_to(@foo, :wstat64)
-   end
-   
-   def teardown
-      @foo  = nil
-   end
-end
+#####################################################################
+# tc_msvcrt_file.rb
+#
+# Test case for the Windows::MSVCRT::File module.
+#####################################################################
+require 'windows/msvcrt/file'
+require 'test/unit'
+
+class MFileFoo
+   include Windows::MSVCRT::File
+end
+
+class TC_Windows_MSVCRT_File < Test::Unit::TestCase
+   def setup
+      @foo = MFileFoo.new
+   end
+
+   def test_numeric_constants
+      assert_not_nil(MFileFoo::S_IFMT)
+      assert_not_nil(MFileFoo::S_IFDIR)
+      assert_not_nil(MFileFoo::S_IFCHR)
+      assert_not_nil(MFileFoo::S_IFIFO)
+      assert_not_nil(MFileFoo::S_IFREG)
+      assert_not_nil(MFileFoo::S_IREAD)
+      assert_not_nil(MFileFoo::S_IWRITE)
+      assert_not_nil(MFileFoo::S_IEXEC)
+   end
+   
+   def test_method_constants
+      assert_not_nil(MFileFoo::Chmod)
+      assert_not_nil(MFileFoo::Chsize)
+      assert_not_nil(MFileFoo::Mktemp)
+      assert_not_nil(MFileFoo::Stat)
+      assert_not_nil(MFileFoo::Stat64)
+      assert_not_nil(MFileFoo::Wchmod)
+      assert_not_nil(MFileFoo::Wmktemp)
+      assert_not_nil(MFileFoo::Wstat)
+      assert_not_nil(MFileFoo::Wstat64)
+   end
+   
+   def test_chmod
+      assert_respond_to(@foo, :chmod)
+   end
+
+   def test_chsize
+      assert_respond_to(@foo, :chsize)
+   end
+
+   def test_mktemp
+      assert_respond_to(@foo, :mktemp)
+   end
+
+   def test_stat
+      assert_respond_to(@foo, :stat)
+   end
+
+   def test_stat64
+      assert_respond_to(@foo, :stat64)
+   end
+
+   def test_wchmod
+      assert_respond_to(@foo, :wchmod)
+   end
+
+   def test_wmktemp
+      assert_respond_to(@foo, :wmktemp)
+   end
+
+   def test_wstat
+      assert_respond_to(@foo, :wstat)
+   end
+
+   def test_wstat64
+      assert_respond_to(@foo, :wstat64)
+   end
+   
+   def teardown
+      @foo  = nil
+   end
+end

data/test/tc_msvcrt_io.rb

@@ -1,48 +1,48 @@
-#####################################################################
-# tc_msvcrt_io.rb
-#
-# Test case for the Windows::MSVCRT::IO module.
-#####################################################################
-require 'windows/msvcrt/io'
-require 'test/unit'
-
-class MIOFoo
-   include Windows::MSVCRT::IO
-end
-
-class TC_Windows_MSVCRT_IO < Test::Unit::TestCase
-   def setup
-      @foo = MIOFoo.new
-   end
-
-   def test_numeric_constants
-      assert_not_nil(MIOFoo::S_IFMT)
-   end
-   
-   def test_method_constants
-      assert_not_nil(MIOFoo::Clearerr)
-      assert_not_nil(MIOFoo::Close)
-      assert_not_nil(MIOFoo::Fclose)
-      assert_not_nil(MIOFoo::Fileno)
-   end
-   
-   def test_clearerr
-      assert_respond_to(@foo, :clearerr)
-   end
-
-   def test_close
-      assert_respond_to(@foo, :close)
-   end
-
-   def test_fclose
-      assert_respond_to(@foo, :fclose)
-   end
-
-   def test_fileno
-      assert_respond_to(@foo, :fileno)
-   end
-   
-   def teardown
-      @foo  = nil
-   end
-end
+#####################################################################
+# tc_msvcrt_io.rb
+#
+# Test case for the Windows::MSVCRT::IO module.
+#####################################################################
+require 'windows/msvcrt/io'
+require 'test/unit'
+
+class MIOFoo
+   include Windows::MSVCRT::IO
+end
+
+class TC_Windows_MSVCRT_IO < Test::Unit::TestCase
+   def setup
+      @foo = MIOFoo.new
+   end
+
+   def test_numeric_constants
+      assert_not_nil(MIOFoo::S_IFMT)
+   end
+   
+   def test_method_constants
+      assert_not_nil(MIOFoo::Clearerr)
+      assert_not_nil(MIOFoo::Close)
+      assert_not_nil(MIOFoo::Fclose)
+      assert_not_nil(MIOFoo::Fileno)
+   end
+   
+   def test_clearerr
+      assert_respond_to(@foo, :clearerr)
+   end
+
+   def test_close
+      assert_respond_to(@foo, :close)
+   end
+
+   def test_fclose
+      assert_respond_to(@foo, :fclose)
+   end
+
+   def test_fileno
+      assert_respond_to(@foo, :fileno)
+   end
+   
+   def teardown
+      @foo  = nil
+   end
+end

data/test/tc_msvcrt_string.rb

@@ -1,94 +1,94 @@
-#####################################################################
-# tc_msvcrt_string.rb
-#
-# Test case for the Windows::MSVCRT::String module.
-#####################################################################
-require 'windows/msvcrt/string'
-require 'test/unit'
-
-class TC_Windows_MSVCRT_String < Test::Unit::TestCase
-  include Windows::MSVCRT::String
-
-  def setup
-    @buf = 0.chr * 260
-    @str = 'hello'
-  end
-
-  def test_method_constants
-    assert_not_nil(Strcmp)
-    assert_not_nil(Strcpy)
-    assert_not_nil(Strcspn)
-    assert_not_nil(Strlen)
-    assert_not_nil(Strncpy)
-    assert_not_nil(Strrchr)
-    assert_not_nil(Strrev)
-    assert_not_nil(Strtok)
-  end
-
-  def test_strchr
-    assert(self.respond_to?(:strchr, true))
-    assert_equal('llo', strchr('hello', 108))
-    assert_equal(nil, strchr('hello', 120))
-  end
-
-  def test_strchr_with_zero
-    assert_nil(strchr(0, 'l'[0]))
-    assert_nil(strchr('hello', 0))
-  end
-
-  def test_strchr_expected_errors
-    assert_raise(ArgumentError){ strchr }
-    assert_raise(ArgumentError){ strchr('hello') }
-  end
-
-  def test_strcmp
-    assert(self.respond_to?(:strcmp, true))
-    assert_equal(-1, strcmp('alpha', 'beta'))
-    assert_equal(1, strcmp('beta', 'alpha'))
-    assert_equal(0, strcmp('alpha', 'alpha'))
-  end
-
-  def test_strcmp_expected_errors
-    assert_raise(ArgumentError){ strcmp }
-    assert_raise(ArgumentError){ strcmp('alpha') }
-  end
-
-  def test_strcpy
-    assert(self.respond_to?(:strcpy, true))
-    assert_kind_of(Fixnum, strcpy(@buf, ['hello'].pack('p*').unpack('L')[0]))
-    assert_equal('hello', @buf.strip)
-  end
-
-  def test_strcspn
-    assert(self.respond_to?(:strcspn, true))
-    assert_equal(3, strcspn('abcxyz123', '&^(x'))
-    assert_equal(9, strcspn('abcxyz123', '&^(('))
-  end
-
-  def test_strcspn_expected_errors
-    assert_raise(ArgumentError){ strcspn }
-    assert_raise(ArgumentError){ strcspn('alpha') }
-  end
-
-  def test_strlen
-    assert(self.respond_to?(:strlen, true))
-    assert_equal(5, strlen('hello'))
-    assert_equal(0, strlen(''))
-  end
-
-  def test_strlen_expected_errors
-    assert_raise(ArgumentError){ strlen }
-    assert_raise(ArgumentError){ strlen('a', 'b') }
-  end
-
-  def test_strncpy
-    assert(self.respond_to?(:strncpy, true))
-    assert_equal('alp', strncpy(@buf, 'alpha', 3))
-    assert_equal('alp', @buf.strip)
-  end
-
-  def teardown
-    @buf = nil
-    @str = nil
-  end
-end
+#####################################################################
+# tc_msvcrt_string.rb
+#
+# Test case for the Windows::MSVCRT::String module.
+#####################################################################
+require 'windows/msvcrt/string'
+require 'test/unit'
+
+class TC_Windows_MSVCRT_String < Test::Unit::TestCase
+  include Windows::MSVCRT::String
+
+  def setup
+    @buf = 0.chr * 260
+    @str = 'hello'
+  end
+
+  def test_method_constants
+    assert_not_nil(Strcmp)
+    assert_not_nil(Strcpy)
+    assert_not_nil(Strcspn)
+    assert_not_nil(Strlen)
+    assert_not_nil(Strncpy)
+    assert_not_nil(Strrchr)
+    assert_not_nil(Strrev)
+    assert_not_nil(Strtok)
+  end
+
+  def test_strchr
+    assert(self.respond_to?(:strchr, true))
+    assert_equal('llo', strchr('hello', 108))
+    assert_equal(nil, strchr('hello', 120))
+  end
+
+  def test_strchr_with_zero
+    assert_nil(strchr(0, 'l'[0]))
+    assert_nil(strchr('hello', 0))
+  end
+
+  def test_strchr_expected_errors
+    assert_raise(ArgumentError){ strchr }
+    assert_raise(ArgumentError){ strchr('hello') }
+  end
+
+  def test_strcmp
+    assert(self.respond_to?(:strcmp, true))
+    assert_equal(-1, strcmp('alpha', 'beta'))
+    assert_equal(1, strcmp('beta', 'alpha'))
+    assert_equal(0, strcmp('alpha', 'alpha'))
+  end
+
+  def test_strcmp_expected_errors
+    assert_raise(ArgumentError){ strcmp }
+    assert_raise(ArgumentError){ strcmp('alpha') }
+  end
+
+  def test_strcpy
+    assert(self.respond_to?(:strcpy, true))
+    assert_kind_of(Fixnum, strcpy(@buf, ['hello'].pack('p*').unpack('L')[0]))
+    assert_equal('hello', @buf.strip)
+  end
+
+  def test_strcspn
+    assert(self.respond_to?(:strcspn, true))
+    assert_equal(3, strcspn('abcxyz123', '&^(x'))
+    assert_equal(9, strcspn('abcxyz123', '&^(('))
+  end
+
+  def test_strcspn_expected_errors
+    assert_raise(ArgumentError){ strcspn }
+    assert_raise(ArgumentError){ strcspn('alpha') }
+  end
+
+  def test_strlen
+    assert(self.respond_to?(:strlen, true))
+    assert_equal(5, strlen('hello'))
+    assert_equal(0, strlen(''))
+  end
+
+  def test_strlen_expected_errors
+    assert_raise(ArgumentError){ strlen }
+    assert_raise(ArgumentError){ strlen('a', 'b') }
+  end
+
+  def test_strncpy
+    assert(self.respond_to?(:strncpy, true))
+    assert_equal('alp', strncpy(@buf, 'alpha', 3))
+    assert_equal('alp', @buf.strip)
+  end
+
+  def teardown
+    @buf = nil
+    @str = nil
+  end
+end