win 0.3.24 → 0.3.25

data/spec/win/error_spec.rb

@@ -1,112 +1,110 @@
-require File.expand_path(File.dirname(__FILE__) + '/../spec_helper')
+require 'spec_helper'
 require 'win/error'
 require 'win/gui/window'
 
-module WinErrorTest
-  include WinTest
-  include Win::Error
-  include Win::Gui::Window
+include WinTest
+include Win::Error
+include Win::Gui::Window
 
-  def buffer
-    FFI::MemoryPointer.new(:char, 260)
-  end
+def buffer
+  FFI::MemoryPointer.new(:char, 260)
+end
 
-  def sys_flags
-    FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_ARGUMENT_ARRAY
-  end
+def sys_flags
+  FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_ARGUMENT_ARRAY
+end
 
-  describe Win::Error, ' contains a set of pre-defined Windows API functions' do
-    describe "#get_last_error" do
-      spec{ use{ err_code = GetLastError() }}
-      spec{ use{ err_message = get_last_error() }}
+describe Win::Error, ' contains a set of pre-defined Windows API functions' do
+  describe "#get_last_error" do
+    spec { use { err_code = GetLastError() } }
+    spec { use { err_message = get_last_error() } }
 
-      it "original api retrieves the calling thread's last-error code value" do
-        find_window(IMPOSSIBLE, IMPOSSIBLE)
-        GetLastError().should == ERROR_FILE_NOT_FOUND
-        window_text(0)
-        GetLastError().should == ERROR_INVALID_WINDOW_HANDLE
-      end
+    it "original api retrieves the calling thread's last-error code value" do
+      find_window(IMPOSSIBLE, IMPOSSIBLE)
+      GetLastError().should == ERROR_FILE_NOT_FOUND
+      window_text(0)
+      GetLastError().should == ERROR_INVALID_WINDOW_HANDLE
+    end
 
-      it "enhanced api retrieves the message corresponding to last error code" do
-        find_window(IMPOSSIBLE, IMPOSSIBLE)
-        get_last_error.should == "The system cannot find the file specified."
-        window_text(0)
-        get_last_error.should == "Invalid window handle."
-      end
-    end # describe "#get_last_error"
-
-    describe "#format_message" do
-      spec{ use{ num_chars = FormatMessage(sys_flags, source=nil, message_id=0, language_id=0, buffer, buffer.size, :int, 0) }}
-      spec{ use{ message = format_message(sys_flags, source=nil, message_id=0, language_id=0, :int, 0) }}
-
-      it "original api formats a message string - system message" do
-        find_window(IMPOSSIBLE, IMPOSSIBLE)
-        message_id = GetLastError()
-        buf = buffer()
-        num_chars = FormatMessage(sys_flags, nil, message_id, dw_language_id=0, buf, buf.size, :int, 0)
-        buf.get_bytes(0, num_chars).strip.should == "The system cannot find the file specified."
-      end
+    it "enhanced api retrieves the message corresponding to last error code" do
+      find_window(IMPOSSIBLE, IMPOSSIBLE)
+      get_last_error.should == "The system cannot find the file specified."
+      window_text(0)
+      get_last_error.should == "Invalid window handle."
+    end
+  end # describe "#get_last_error"
+
+  describe "#format_message" do
+    spec { use { num_chars = FormatMessage(sys_flags, source=nil, message_id=0, language_id=0, buffer, buffer.size, :int, 0) } }
+    spec { use { message = format_message(sys_flags, source=nil, message_id=0, language_id=0, :int, 0) } }
+
+    it "original api formats a message string - system message" do
+      find_window(IMPOSSIBLE, IMPOSSIBLE)
+      message_id = GetLastError()
+      buf        = buffer()
+      num_chars  = FormatMessage(sys_flags, nil, message_id, dw_language_id=0, buf, buf.size, :int, 0)
+      buf.get_bytes(0, num_chars).strip.should == "The system cannot find the file specified."
+    end
 
-      it "snake_case api Formats a message string - system message" do
-        find_window(IMPOSSIBLE, IMPOSSIBLE)
-        message = format_message(sys_flags, nil, dw_message_id=GetLastError())
-        message.should == "The system cannot find the file specified."
-      end
-    end # describe format_message
+    it "snake_case api Formats a message string - system message" do
+      find_window(IMPOSSIBLE, IMPOSSIBLE)
+      message = format_message(sys_flags, nil, dw_message_id=GetLastError())
+      message.should == "The system cannot find the file specified."
+    end
+  end # describe format_message
 
-    describe "#set_last_error" do
-      spec{ use{ SetLastError(err_code=0) }}
-      spec{ use{ set_last_error(err_code=0) }}
+  describe "#set_last_error" do
+    spec { use { SetLastError(err_code=0) } }
+    spec { use { set_last_error(err_code=0) } }
+
+    it "original api sets the last-error code for the calling thread." do
+      SetLastError(dw_err_code=0xF000)
+      GetLastError().should == ERROR_USER_DEFINED_BASE
+    end
+
+    it "snake_case api also sets the last-error code for the calling thread." do
+      set_last_error(3000)
+      get_last_error.should == "The specified print monitor is unknown."
+    end
+  end # describe set_last_error
+
+  if os_xp? || os_vista? # This function works only on XP++
+    describe "#set_last_error_ex" do
+      spec { use { SetLastErrorEx(dw_err_code=0, dw_type=0) } }
+      spec { use { set_last_error_ex(dw_err_code=0, dw_type=0) } }
 
       it "original api sets the last-error code for the calling thread." do
-        SetLastError(dw_err_code=0xF000)
+        SetLastErrorEx(dw_err_code=0xF000, dw_type=0)
         GetLastError().should == ERROR_USER_DEFINED_BASE
       end
 
       it "snake_case api also sets the last-error code for the calling thread." do
-        set_last_error(3000)
+        set_last_error_ex(3000, 0)
         get_last_error.should == "The specified print monitor is unknown."
       end
-    end # describe set_last_error
-
-    if os_xp? || os_vista? # This function works only on XP++
-      describe "#set_last_error_ex" do
-        spec{ use{ SetLastErrorEx(dw_err_code=0, dw_type=0) }}
-        spec{ use{ set_last_error_ex(dw_err_code=0, dw_type=0) }}
-
-        it "original api sets the last-error code for the calling thread." do
-          SetLastErrorEx(dw_err_code=0xF000, dw_type=0)
-          GetLastError().should == ERROR_USER_DEFINED_BASE
-        end
-
-        it "snake_case api also sets the last-error code for the calling thread." do
-          set_last_error_ex(3000,0)
-          get_last_error.should == "The specified print monitor is unknown."
-        end
-      end # describe set_last_error_ex
-    end
+    end # describe set_last_error_ex
+  end
 
-    if os_vista? || os_7? # This function works only on Vista++
-      describe "#get_error_mode" do
-        spec{ use{ mode = GetErrorMode() }}
-        spec{ use{ mode = get_error_mode() }}
+  if os_vista? || os_7? # This function works only on Vista++
+    describe "#get_error_mode" do
+      spec { use { mode = GetErrorMode() } }
+      spec { use { mode = get_error_mode() } }
 
-        it "original api retrieves the error mode for the current process." do
-          p mode = GetErrorMode()
-        end
+      it "original api retrieves the error mode for the current process." do
+        p mode = GetErrorMode()
+      end
 
-        it "snake_case api also retrieves the error mode for the current process." do
-          p mode = get_error_mode()
-        end
-      end # describe get_error_mode
-    end
+      it "snake_case api also retrieves the error mode for the current process." do
+        p mode = get_error_mode()
+      end
+    end # describe get_error_mode
+  end
 
-    describe "#set_error_mode" do
-      spec{ use{ success = SetErrorMode(u_mode=0) }}
-      spec{ use{ success = set_error_mode(u_mode=0) }}
+  describe "#set_error_mode" do
+    spec { use { success = SetErrorMode(u_mode=0) } }
+    spec { use { success = set_error_mode(u_mode=0) } }
 
-      it "controls whether the system OR process will handle the specified types of serious errors"
-    end # describe set_error_mode
+    it "controls whether the system OR process will handle the specified types of serious errors"
+  end # describe set_error_mode
 
-  end # describe Win::Error
-end
+end # describe Win::Error

data/spec/win/gui/dialog_spec.rb

@@ -1,67 +1,64 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require 'spec_helper'
 require 'win/gui/input'
 
-module WinGuiDialogTest
+include WinTestApp
+include Win::Gui::Dialog
 
-  include WinTestApp
-  include Win::Gui::Dialog
+describe Win::Gui::Dialog do
 
-  describe Win::Gui::Dialog do
+  describe "#message_box" do
+    spec { pending; use { selected_item = message_box(owner_handle=0, text="Text", caption="Caption", type=0) } }
 
-    describe "#message_box" do
-      spec{ pending; use{ selected_item = message_box(owner_handle=0, text="Text", caption="Caption", type=0) }}
-
-      it "creates, displays, and operates a message box" do
-        pending 'Not possible to test message_box directly, it blocks all related threads :('
-        t = Thread.new do
-          selected_item = message_box(handle=0, text="Text", caption="Caption", type=MB_YESNO | MB_HELP)
-          puts selected_item
-        end
-        t.join
+    it "creates, displays, and operates a message box" do
+      pending 'Not possible to test message_box directly, it blocks all related threads :('
+      t = Thread.new do
+        selected_item = message_box(handle=0, text="Text", caption="Caption", type=MB_YESNO | MB_HELP)
+        puts selected_item
       end
-    end # describe message_box
+      t.join
+    end
+  end # describe message_box
 
 
-    describe '#get_dlg_item' do
-      spec{ use{ control_handle = get_dlg_item(handle = 0, item_id = 1) }}
+  describe '#get_dlg_item' do
+    spec { use { control_handle = get_dlg_item(handle = 0, item_id = 1) } }
 
-      it 'returns handle to an existing controls in a dialog' do
-        test_app_with_dialog(:close) do |app, dialog|
-          get_dlg_item(dialog, item_id=IDYES).should_not == nil
-          get_dlg_item(dialog, item_id=IDNO).should_not == nil
-          get_dlg_item(dialog, item_id=IDCANCEL).should_not == nil
-        end
+    it 'returns handle to an existing controls in a dialog' do
+      test_app_with_dialog(:close) do |app, dialog|
+        get_dlg_item(dialog, item_id=IDYES).should_not == nil
+        get_dlg_item(dialog, item_id=IDNO).should_not == nil
+        get_dlg_item(dialog, item_id=IDCANCEL).should_not == nil
       end
+    end
 
-      it 'returns nil/0 for non-existing controls in a dialog' do
-        test_app_with_dialog(:close) do |app, dialog|
-          get_dlg_item(dialog, item_id=IDOK).should == nil
-          get_dlg_item(dialog, item_id=IDABORT).should == nil
-          GetDlgItem(dialog, item_id=IDRETRY).should == 0
-          GetDlgItem(dialog, item_id=IDCONTINUE).should == 0
-        end
+    it 'returns nil/0 for non-existing controls in a dialog' do
+      test_app_with_dialog(:close) do |app, dialog|
+        get_dlg_item(dialog, item_id=IDOK).should == nil
+        get_dlg_item(dialog, item_id=IDABORT).should == nil
+        GetDlgItem(dialog, item_id=IDRETRY).should == 0
+        GetDlgItem(dialog, item_id=IDCONTINUE).should == 0
       end
+    end
 
-      describe "#get_dlg_ctrl_id" do
-        spec{ use{ control_id = GetDlgCtrlID(control_handle=0) }}
-        spec{ use{ control_id = get_dlg_ctrl_id(control_handle=0) }}
+    describe "#get_dlg_ctrl_id" do
+      spec { use { control_id = GetDlgCtrlID(control_handle=0) } }
+      spec { use { control_id = get_dlg_ctrl_id(control_handle=0) } }
 
-        it "retrieves the identifier of the specified control" do
-          test_app_with_dialog do |app, dialog|
-            control = find_window_ex(dialog, 0, "Button", "&Yes")
-            get_dlg_ctrl_id(control).should == IDYES 
-          end
+      it "retrieves the identifier of the specified control" do
+        test_app_with_dialog do |app, dialog|
+          control = find_window_ex(dialog, 0, "Button", "&Yes")
+          get_dlg_ctrl_id(control).should == IDYES
         end
+      end
 
-        it "returns 0/nil for invalid control (say, if given handle is top level window" do
-          invalid_control = find_window(nil, nil) # Top level, so it must be invalid
-          GetDlgCtrlID(invalid_control).should == 0
-          get_dlg_ctrl_id(invalid_control).should == nil
-        end
+      it "returns 0/nil for invalid control (say, if given handle is top level window" do
+        invalid_control = find_window(nil, nil) # Top level, so it must be invalid
+        GetDlgCtrlID(invalid_control).should == 0
+        get_dlg_ctrl_id(invalid_control).should == nil
+      end
 
-      end # describe get_dlg_ctrl_id
+    end # describe get_dlg_ctrl_id
 
-    end
   end
 end
 

data/spec/win/gui/input_spec.rb

@@ -1,92 +1,88 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+require 'spec_helper'
 require 'win/gui/input'
 
-module WinGuiInputTest
+include WinTestApp
+include Win::Gui::Input
 
-  include WinTestApp
-  include Win::Gui::Input
-
-  # rolling back changes with Ctrl-Z to allow window closing without dialog!
-  def rollback_changes(num_changes)
-    num_changes.times {keystroke(VK_CONTROL, 'Z'.ord)}
-  end
-
-  describe Win::Gui::Input, ' defines a set of API functions related to user input' do
-
-    describe '#keydb_event' do
-      spec{ use{ keybd_event(vkey = 0, bscan = 0, flags = 0, extra_info = 0) }}
-      before(:each){ (@app=launch_test_app)}
-      after(:each) do
-        rollback_changes(3)
-        close_test_app
-      end
-
-      it 'synthesizes a numeric keystrokes, emulating keyboard driver' do
-        text = '123'
-        text.upcase.each_byte do |b| # upcase needed since user32 keybd_event expects upper case chars
-          keybd_event(b.ord, 0, KEYEVENTF_KEYDOWN, 0)
-          sleep KEY_DELAY
-          keybd_event(b.ord, 0, KEYEVENTF_KEYUP, 0)
-          sleep KEY_DELAY
-        end
-        text(@app.textarea).should =~ Regexp.new(text)
-      end
-    end # describe '#keydb_event'
-
-    describe '#mouse_event' do
-      spec { use {mouse_event( flags = MOUSEEVENTF_ABSOLUTE, dx = 0, dy = 0, data=0, extra_info=0 )}}
-
-      it 'emulates mouse clicks' do
-        test_app do |app|
-          # Position cursor at app's "Close Window" control
-          left, top, right, bottom = get_window_rect(app.handle)
-          set_cursor_pos(x=right-5, y=top+5).should be_true
-
-          mouse_event MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0
-          mouse_event MOUSEEVENTF_LEFTUP, 0, 0, 0, 0
-          sleep SLEEP_DELAY
-          window?(app.handle).should == false
-        end
-      end
-
-    end # describe '#mouse_event'
-
-    describe "#get_cursor_pos" do
-      spec{ use{ success = GetCursorPos(lp_point=FFI::MemoryPointer.new(:long, 2)) }}
-      spec{ use{ x, y = get_cursor_pos() }}
-
-      it "original api returns success code and puts cursor's screen coordinates into supplied buffer" do
-        success = GetCursorPos(lp_point=FFI::MemoryPointer.new(:long, 2))
-        success.should_not == 0
-        x, y = lp_point.read_array_of_long(2)
-        x.should be_an Integer
-        x.should be >= 0
-        y.should be_an Integer
-        y.should be >= 0
-      end
+# rolling back changes with Ctrl-Z to allow window closing without dialog!
+def rollback_changes(num_changes)
+  num_changes.times { keystroke(VK_CONTROL, 'Z'.ord) }
+end
 
-      it "snake_case api returns the cursor's position, in screen coordinates" do
-        x, y = get_cursor_pos()
-        x.should be_an Integer
-        x.should be >= 0
-        y.should be_an Integer
-        y.should be >= 0
+describe Win::Gui::Input, ' defines a set of API functions related to user input' do
+
+  describe '#keydb_event' do
+    spec { use { keybd_event(vkey = 0, bscan = 0, flags = 0, extra_info = 0) } }
+    before(:each) { (@app=launch_test_app) }
+    after(:each) do
+      rollback_changes(3)
+      close_test_app
+    end
+
+    it 'synthesizes a numeric keystrokes, emulating keyboard driver' do
+      text = '123'
+      text.upcase.each_byte do |b| # upcase needed since user32 keybd_event expects upper case chars
+        keybd_event(b.ord, 0, KEYEVENTF_KEYDOWN, 0)
+        sleep KEY_DELAY
+        keybd_event(b.ord, 0, KEYEVENTF_KEYUP, 0)
+        sleep KEY_DELAY
       end
-    end # describe get_cursor_pos
-
-    describe '#set_cursor_pos' do
-      spec { use {success = SetCursorPos(x=0, y=0)}}
-      spec { use {success = set_cursor_pos(x=0, y=0)}}
-
-      it 'sets cursor`s position, in screen coordinates' do
-        SetCursorPos(x=600, y=600).should be_true
-        get_cursor_pos().should == [600, 600]
-        set_cursor_pos(x=0, y=0).should be_true
-        get_cursor_pos().should == [0, 0]
+      text(@app.textarea).should =~ Regexp.new(text)
+    end
+  end # describe '#keydb_event'
+
+  describe '#mouse_event' do
+    spec { use { mouse_event(flags = MOUSEEVENTF_ABSOLUTE, dx = 0, dy = 0, data=0, extra_info=0) } }
+
+    it 'emulates mouse clicks' do
+      test_app do |app|
+        # Position cursor at app's "Close Window" control
+        left, top, right, bottom = get_window_rect(app.handle)
+        set_cursor_pos(x=right-5, y=top+5).should be_true
+
+        mouse_event MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0
+        mouse_event MOUSEEVENTF_LEFTUP, 0, 0, 0, 0
+        sleep SLEEP_DELAY
+        window?(app.handle).should == false
       end
-    end # describe '#set_cursor_pos'
-
-  end # Win::Gui::Input, ' defines a set of API functions related to user input'
-
-end
+    end
+
+  end # describe '#mouse_event'
+
+  describe "#get_cursor_pos" do
+    spec { use { success = GetCursorPos(lp_point=FFI::MemoryPointer.new(:long, 2)) } }
+    spec { use { x, y = get_cursor_pos() } }
+
+    it "original api returns success code and puts cursor's screen coordinates into supplied buffer" do
+      success = GetCursorPos(lp_point=FFI::MemoryPointer.new(:long, 2))
+      success.should_not == 0
+      x, y = lp_point.read_array_of_long(2)
+      x.should be_an Integer
+      x.should be >= 0
+      y.should be_an Integer
+      y.should be >= 0
+    end
+
+    it "snake_case api returns the cursor's position, in screen coordinates" do
+      x, y = get_cursor_pos()
+      x.should be_an Integer
+      x.should be >= 0
+      y.should be_an Integer
+      y.should be >= 0
+    end
+  end # describe get_cursor_pos
+
+  describe '#set_cursor_pos' do
+    spec { use { success = SetCursorPos(x=0, y=0) } }
+    spec { use { success = set_cursor_pos(x=0, y=0) } }
+
+    it 'sets cursor`s position, in screen coordinates' do
+      SetCursorPos(x=600, y=600).should be_true
+      get_cursor_pos().should == [600, 600]
+      set_cursor_pos(x=0, y=0).should be_true
+      get_cursor_pos().should == [0, 0]
+    end
+  end # describe '#set_cursor_pos'
+
+end # Win::Gui::Input, ' defines a set of API functions related to user input'