sleipnir-api 0.1.0

data/spec/sleipnir_api/profile_mock_spec.rb

@@ -0,0 +1,128 @@
+require File.join(File.dirname(__FILE__), "../spec_helper.rb")
+
+describe SleipnirAPI::Profile do
+
+  before(:all) do
+    @pnir = SleipnirAPI.connect
+    @profile = @pnir.profile
+    @user_path = @pnir.user_path
+    @api = @pnir.instance_variable_get(:@api)
+  end
+
+  after(:all) do
+    @pnir.instance_variable_set(:@api, @api)
+  end
+
+  before do
+    @mock = mock("Sleipnir.API")
+    @pnir.instance_variable_set(:@api, @mock)
+  end
+
+
+  # get string
+
+  it "#get_string should send GetProfileString" do
+    @mock.should_receive(:GetProfileString).with("section", "key", nil)
+    @profile.get_string("section", "key")
+  end
+
+  it "#get_string(:default) should send GetProfileString" do
+    @mock.should_receive(:GetProfileString).with("section", "key", "default value")
+    @profile.get_string("section", "key", :default => "default value")
+  end
+
+  it "#get_string(:cipher) should send GetProfileStringCipher" do
+    @mock.should_receive(:GetProfileStringCipher).with("section", "key", nil)
+    @profile.get_string("section", "key", :cipher => true)
+  end
+
+  it "#get_string(:cipher, :default) should send GetProfileStringCipher" do
+    @mock.should_receive(:GetProfileStringCipher).with("section", "key", "default value")
+    @profile.get_string("section", "key", :cipher => true, :default => "default value")
+  end
+
+  it "#get_string(:ini) should send GetProfileStringEx" do
+    @mock.should_receive(:UserPath).and_return(@user_path)
+    @mock.should_receive(:GetProfileStringEx).with(
+      "section", "key", nil, File.expand_path("foo.ini", @user_path))
+    @profile.get_string("section", "key", :ini => "foo.ini")
+  end
+
+  it "#get_string(:ini, :default) should send GetProfileStringEx" do
+    @mock.should_receive(:UserPath).and_return(@user_path)
+    @mock.should_receive(:GetProfileStringEx).with(
+      "section", "key", "default value", "c:/foo.ini")
+    @profile.get_string("section", "key", :ini => "c:/foo.ini", :default => "default value")
+  end
+
+
+  # get int
+
+  it "#get_int should send GetProfileInt" do
+    @mock.should_receive(:GetProfileInt).with("section", "key", nil)
+    @profile.get_int("section", "key")
+  end
+
+  it "#get_int(:default) should send GetProfileInt" do
+    @mock.should_receive(:GetProfileInt).with("section", "key", "default value")
+    @profile.get_int("section", "key", :default => "default value")
+  end
+
+  it "#get_int(:cipher) should send GetProfileIntCipher" do
+    @mock.should_receive(:GetProfileIntCipher).with("section", "key", nil)
+    @profile.get_int("section", "key", :cipher => true)
+  end
+
+  it "#get_int(:cipher, :default) should send GetProfileIntCipher" do
+    @mock.should_receive(:GetProfileIntCipher).with("section", "key", 123)
+    @profile.get_int("section", "key", :cipher => true, :default => 123)
+  end
+
+  it "#get_int(:ini) should send GetProfileIntEx" do
+    @mock.should_receive(:UserPath).and_return(@user_path)
+    @mock.should_receive(:GetProfileIntEx).with(
+      "section", "key", nil, File.expand_path("foo.ini", @user_path))
+    @profile.get_int("section", "key", :ini => "foo.ini")
+  end
+
+  it "#get_int(:ini, :default) should send GetProfileIntEx" do
+    @mock.should_receive(:UserPath).and_return(@user_path)
+    @mock.should_receive(:GetProfileIntEx).with(
+      "section", "key", 123, "c:/foo.ini")
+    @profile.get_int("section", "key", :ini => "c:/foo.ini", :default => 123)
+  end
+
+
+
+  # write string
+
+  it "#write_int should send WriteProfileString" do
+    @mock.should_receive(:WriteProfileString).with("section", "key", "data")
+    @profile.write_string("section", "key", "data")
+  end
+
+  it "#write_int(:cipher) should send WriteProfileStringCipher" do
+    @mock.should_receive(:WriteProfileStringCipher).with("section", "key", "data")
+    @profile.write_string("section", "key", "data", :cipher => true)
+  end
+
+  # write int
+
+  it "#write_int should send WriteProfileInt" do
+    @mock.should_receive(:WriteProfileInt).with("section", "key", 123)
+    @profile.write_int("section", "key", 123)
+  end
+
+  it "#write_int(:cipher) should send WriteProfileIntCipher" do
+    @mock.should_receive(:WriteProfileIntCipher).with("section", "key", 123)
+    @profile.write_int("section", "key", 123, :cipher => true)
+  end
+
+
+  # delete
+  it "#delete should send DeleteProfileKey" do
+    @mock.should_receive(:DeleteProfileKey).with("section", "key")
+    @profile.delete("section", "key")
+  end
+
+end

data/spec/sleipnir_api/registry_spec.rb

@@ -0,0 +1,13 @@
+require File.join(File.dirname(__FILE__), "../spec_helper.rb")
+
+describe SleipnirAPI::Registry do
+  it "#clsid should return HKCL\\Sleipnir.API\\CLSID" do
+    SleipnirAPI::Registry.clsid.should match(/\{[0-9a-fA-F-]+\}/)
+  end
+
+  it "#local_server should return sleipnir.exe path" do
+    path = SleipnirAPI::Registry.local_server
+    File.basename(path).downcase.should eql("sleipnir.exe")
+    File.exist?(path).should be_true
+  end
+end

data/spec/sleipnir_api/security_mock_spec.rb

@@ -0,0 +1,82 @@
+require File.join(File.dirname(__FILE__), "../spec_helper.rb")
+
+describe SleipnirAPI::Security do
+
+  before(:all) do
+    @pnir = SleipnirAPI.connect
+    @blank = @pnir.new_tab
+    @security = @blank.security
+    @api = @pnir.instance_variable_get(:@api)
+  end
+
+  after(:all) do
+    @pnir.instance_variable_set(:@api, @api)
+    @blank.close
+  end
+
+  before do
+    @mock = mock("Sleipnir.API")
+    @pnir.instance_variable_set(:@api, @mock)
+  end
+
+
+  it "#enable?(:javascript) should send IsXXXEnabled" do
+    @mock.should_receive(:IsJavaScriptEnabled).with(@blank.id)
+    @security.enable?(:javascript)
+  end
+
+  it "#enable?(:java) should send IsXXXEnabled" do
+    @mock.should_receive(:IsJavaEnabled).with(@blank.id)
+    @security.enable?(:java)
+  end
+
+  it "#enable?(:run_activex) should send IsXXXEnabled" do
+    @mock.should_receive(:IsRunActiveXEnabled).with(@blank.id)
+    @security.enable?(:run_activex)
+  end
+
+  it "#enable?(:download_activex) should send IsXXXEnabled" do
+    @mock.should_receive(:IsDownloadActiveXEnabled).with(@blank.id)
+    @security.enable?(:download_activex)
+  end
+
+  it "#enable?(:picture) should send IsXXXEnabled" do
+    @mock.should_receive(:IsPictureEnabled).with(@blank.id)
+    @security.enable?(:picture)
+  end
+
+  it "#enable?(:sound) should send IsXXXEnabled" do
+    @mock.should_receive(:IsSoundEnabled).with(@blank.id)
+    @security.enable?(:sound)
+  end
+
+  it "#enable?(:video) should send IsXXXEnabled" do
+    @mock.should_receive(:IsVideoEnabled).with(@blank.id)
+    @security.enable?(:video)
+  end
+
+  it "#enable? can take String" do
+    @mock.should_receive(:IsVideoEnabled).with(@blank.id)
+    @security.enable?("video")
+  end
+
+  it "#set_security should send SetSecurity" do
+    @mock.should_receive(:IsJavaScriptEnabled).with(@blank.id)
+    @mock.should_receive(:IsJavaEnabled).with(@blank.id)
+    @mock.should_receive(:IsRunActiveXEnabled).with(@blank.id)
+    @mock.should_receive(:IsDownloadActiveXEnabled).with(@blank.id)
+    @mock.should_receive(:IsPictureEnabled).with(@blank.id)
+    @mock.should_receive(:IsSoundEnabled).with(@blank.id)
+    @mock.should_receive(:IsVideoEnabled).with(@blank.id)
+    @mock.should_receive(:SetSecurity).with(@blank.id, true, false, false, false, false, false, false)
+    @security.set_security(
+      :javascript => true,
+      :java => false,
+      :run_activex => false,
+      :download_activex => false,
+      :picture => false,
+      :sound => false,
+      :video => false)
+  end
+
+end

data/spec/sleipnir_api/security_spec.rb

@@ -0,0 +1,129 @@
+require File.join(File.dirname(__FILE__), "../spec_helper.rb")
+
+describe SleipnirAPI::Security do
+
+  before(:all) do
+    @pnir = SleipnirAPI.connect
+  end
+
+  before do
+    @blank = @pnir.new_tab
+    @security = @blank.security
+    @security.set_security(
+      :javascript => true,
+      :java => false,
+      :run_activex => true,
+      :download_activex => false,
+      :picture => true,
+      :sound => false,
+      :video => true)
+  end
+
+  after do
+    @blank.close
+  end
+
+
+  it "is Enumerable" do
+    @security.should respond_to(:each)
+    @security.should be_kind_of(Enumerable)
+  end
+
+  it "#each should enumerate all security config" do
+    configs = []
+    @security.each do |e|
+      e.should be_an_instance_of(SleipnirAPI::Security::Config)
+      configs << e
+    end
+
+    configs.size.should == 7
+    configs.should == [
+      @security.javascript,
+      @security.java,
+      @security.run_activex,
+      @security.download_activex,
+      @security.picture,
+      @security.sound,
+      @security.video,
+    ]
+  end
+
+  it "#keys should return all security name." do
+    @security.keys.should == [:javascript, :java, :run_activex, :download_activex, :picture, :sound, :video]
+  end
+
+  it "#get_security should return properly." do
+    @security.get_security.should == {
+      :javascript => true,
+      :java => false,
+      :run_activex => true,
+      :download_activex => false,
+      :picture => true,
+      :sound => false,
+      :video => true,
+    }
+  end
+
+  it "#set_security should update security config" do
+    def @security.select_enable
+      select{|e| e.enable? }.map{|e| e.name }
+    end
+
+    @security.each{|e| e.disable! }
+    @security.select_enable.should be_empty
+
+    @security.update(:javascript => true)
+    @security.select_enable.should == [:javascript]
+
+    @security.update(:java => true, :run_activex => true)
+    @security.select_enable.should == [:javascript, :java, :run_activex]
+
+    @security.update(:picture => true, :sound => true, :video => true)
+    @security.select_enable.should == [:javascript, :java, :run_activex, :picture, :sound, :video]
+
+    @security.update(:javascript => false, :run_activex => false, :download_activex => true)
+    @security.select_enable.should == [:java, :download_activex, :picture, :sound, :video]
+
+  end
+
+  it "#enable? should return properly." do
+    @security.enable?(:javascript).should be_true
+    @security.enable?(:java).should be_false
+    @security.enable?(:run_activex).should be_true
+    @security.enable?(:download_activex).should be_false
+    @security.enable?(:picture).should be_true
+    @security.enable?(:sound).should be_false
+    @security.enable?(:video).should be_true
+  end
+
+  it "#disable? should return properly." do
+    @security.disable?(:javascript).should be_false
+    @security.disable?(:java).should be_true
+    @security.disable?(:run_activex).should be_false
+    @security.disable?(:download_activex).should be_true
+    @security.disable?(:picture).should be_false
+    @security.disable?(:sound).should be_true
+    @security.disable?(:video).should be_false
+  end
+
+  it "#<security> should return Security::Config." do
+    @security.javascript.should be_an_instance_of(SleipnirAPI::Security::Config)
+    @security.java.should be_an_instance_of(SleipnirAPI::Security::Config)
+    @security.run_activex.should be_an_instance_of(SleipnirAPI::Security::Config)
+    @security.download_activex.should be_an_instance_of(SleipnirAPI::Security::Config)
+    @security.picture.should be_an_instance_of(SleipnirAPI::Security::Config)
+    @security.sound.should be_an_instance_of(SleipnirAPI::Security::Config)
+    @security.video.should be_an_instance_of(SleipnirAPI::Security::Config)
+  end
+
+  it "#[:<security>] should return Security::Config." do
+    @security[:javascript].should equal?(@security.javascript)
+    @security[:java].should equal?(@security.java)
+    @security[:run_activex].should equal?(@security.run_activex)
+    @security[:download_activex].should equal?(@security.download_activex)
+    @security[:picture].should equal?(@security.picture)
+    @security[:sound].should equal?(@security.sound)
+    @security[:video].should equal?(@security.video)
+  end
+
+end

data/spec/sleipnir_api/sleipnir_mock_spec.rb

@@ -0,0 +1,70 @@
+require File.join(File.dirname(__FILE__), "../spec_helper.rb")
+
+describe SleipnirAPI::Sleipnir, "(with mock)" do
+
+  before(:all) do
+    @pnir = SleipnirAPI.connect
+    @api = @pnir.instance_variable_get(:@api)
+  end
+
+  after(:all) do
+    @pnir.instance_variable_set(:@api, @api)
+  end
+
+  before do
+    @mock = mock("Sleipnir.API")
+    @pnir.instance_variable_set(:@api, @mock)
+  end
+
+
+  it "#result should send Result" do
+    @mock.should_receive(:Result).with(no_args())
+    @pnir.result
+  end
+
+  it "#app_path should send AppPath" do
+    @mock.should_receive(:AppPath).with(no_args())
+    @pnir.app_path
+  end
+
+  it "#script_path should send ScriptPath" do
+    @mock.should_receive(:ScriptPath).with(no_args())
+    @pnir.script_path
+  end
+
+  it "#resource_path should send ResourcePath" do
+    @mock.should_receive(:ResourcePath).with(no_args())
+    @pnir.resource_path
+  end
+
+  it "#user_path should send UserPath" do
+    @mock.should_receive(:UserPath).with(no_args())
+    @pnir.user_path
+  end
+
+  it "#save_favorite should send SaveFavorite" do
+    @mock.should_receive(:SaveFavorite).with("c:/foo.sfv")
+    @pnir.save_favorite("c:/foo.sfv")
+  end
+
+  it "#save_closed_url should send SaveClosedURL" do
+    @mock.should_receive(:SaveClosedURL).with(no_args())
+    @pnir.save_closed_url
+  end
+
+  it "#reload_closed_url should send ReloadClosedURL" do
+    @mock.should_receive(:ReloadClosedURL).with(no_args())
+    @pnir.reload_closed_url
+  end
+
+  it "#add_search_bar_history should send AddSearchBarHistory" do
+    @mock.should_receive(:AddSearchBarHistory).with(no_args())
+    @pnir.add_search_bar_history
+  end
+
+  it "#exec_command_history should send ExecCommand" do
+    @mock.should_receive(:ExecCommand).with(123)
+    @pnir.exec_command(123)
+  end
+
+end

data/spec/sleipnir_api/sleipnir_spec.rb

@@ -0,0 +1,295 @@
+require File.join(File.dirname(__FILE__), "../spec_helper.rb")
+
+describe SleipnirAPI::Sleipnir, "(with blank page)" do
+
+  before(:all) do
+    @pnir = SleipnirAPI.connect
+
+    @xxxx = @pnir.open("about:xxxx", true)
+    @test = @pnir.open("about:test", true)
+    sleep(0.1) while @test.busy?
+    sleep(0.1) while @xxxx.busy?
+  end
+
+  after(:all) do
+    @test.close
+    @xxxx.close
+  end
+
+
+  it "is Enumerable" do
+    @pnir.should respond_to(:each)
+    @pnir.should be_kind_of(Enumerable)
+  end
+
+  it "include Dialog/KeyState" do
+    @pnir.should be_kind_of(SleipnirAPI::Dialog)
+    @pnir.should be_kind_of(SleipnirAPI::KeyState)
+  end
+
+  it "#api should return WIN32OLE" do
+    @pnir.should be_an_instance_of(SleipnirAPI::Sleipnir)
+    @pnir.api.should be_an_instance_of(WIN32OLE)
+  end
+
+  it "#handle, #version should return properly." do
+    @pnir.handle.should be_a_kind_of(Integer)
+    @pnir.version.should be_a_kind_of(Integer)
+  end
+
+  it "#address_bar_string can set/get AddressBar" do
+    saved = @pnir.address_bar_string
+    begin
+      @pnir.address_bar_string = "http://foobar"
+      @pnir.address_bar_string.should eql("http://foobar")
+      @pnir.address_bar_string = "file://c:/barbaz"
+      @pnir.address_bar_string.should eql("file://c:/barbaz")
+    ensure
+      @pnir.address_bar_string = saved
+    end
+  end
+
+  it "#search_bar_string can set/get SearchBar" do
+    saved = @pnir.search_bar_string
+    begin
+      @pnir.search_bar_string = "foobar"
+      @pnir.search_bar_string.should eql("foobar")
+      @pnir.search_bar_string = "barbaz"
+      @pnir.search_bar_string.should eql("barbaz")
+    ensure
+      @pnir.search_bar_string = saved
+    end
+  end
+
+  it "#favorite_file can set/get FaviriteFile" do
+    next if @pnir.v2?
+
+    saved = @pnir.favorite_file
+    begin
+      @pnir.favorite_file = "foobar"
+      @pnir.favorite_file.should eql(@pnir.user_path + "foobar")
+      @pnir.favorite_file = "c:\\barbaz"
+      @pnir.favorite_file.should eql("c:\\barbaz")
+    ensure
+      @pnir.favorite_file = saved
+    end
+  end
+
+  it "#user_agent can set/get UserAgent" do
+    next if @pnir.v2?
+
+    saved = @pnir.user_agent
+    begin
+      @pnir.user_agent = "foobar"
+      @pnir.user_agent.should eql("foobar")
+      @pnir.user_agent = "barbaz"
+      @pnir.user_agent.should eql("barbaz")
+    ensure
+      @pnir.user_agent = saved
+    end
+  end
+
+  it "#app_path should return exe directory" do
+    File.exist?(File.join(@pnir.app_path, "sleipnir.exe")).should be_true
+  end
+
+  it "#script_path should return script directory" do
+    File.exist?(@pnir.script_path).should be_true
+  end
+
+  it "#resource_path should return resouce directory" do
+    File.exist?(@pnir.resource_path).should be_true
+  end
+
+  it "#user_path should return user directory" do
+    File.exist?(@pnir.user_path).should be_true
+  end
+
+
+  it "#new_tab() should create new active blank tab" do
+    t = @pnir.new_tab
+    begin
+      t.should be_an_instance_of(SleipnirAPI::Tab)
+      t.location.href.should eql("about:blank")
+      t.should be_active
+    ensure
+      t.close
+    end
+  end
+
+  it "#new_tab take url argument" do
+    t = @pnir.new_tab("about:new_tab1")
+    begin
+      t.location.href.should eql("about:new_tab1")
+      t.should be_active
+    ensure
+      t.close
+    end
+  end
+
+  it "#new_tab take active flag" do
+    t = @pnir.new_tab("about:new_tab2", false)
+    sleep(0.1) while t.busy?
+    begin
+      t.should_not be_active
+    ensure
+      t.close
+    end
+  end
+
+  it "#open should create new active tab with specified url" do
+    t = @pnir.open("about:open1")
+    begin
+      t.should be_an_instance_of(SleipnirAPI::Tab)
+      t.location.href.should eql("about:open1")
+      t.should be_active
+    ensure
+      t.close
+    end
+  end
+
+
+  it "#open should take active flag" do
+    t = @pnir.open("about:open2", false)
+    sleep(0.1) while t.busy?
+    begin
+      t.should_not be_active
+    ensure
+      t.close
+    end
+  end
+
+  it "#count should return # of documents" do
+    now = @pnir.count
+    new = @pnir.new_tab("about:count", true)
+    begin
+      @pnir.count.should == (now + 1)
+    ensure
+      new.close
+    end
+  end
+
+
+  it "#tab should return SleipnirAPI::Tab" do
+    t = @pnir.tab(@test.index)
+    t.should be_an_instance_of(SleipnirAPI::Tab)
+    t.should == @test
+  end
+
+  it "#tab should return nil if index is out of range" do
+    @pnir.tab(-1).should be_nil
+    @pnir.tab(@test.index + 1).should be_nil
+  end
+
+  it "#tabs should return all tab" do
+    @pnir.tabs.size.should == @pnir.count
+    @pnir.tabs.last.should == @test
+  end
+
+  it "#each should enumerate all tab" do
+    tabs = []
+    @pnir.each do |tab|
+      tab.should be_an_instance_of(SleipnirAPI::Tab)
+      tabs << tab
+    end
+    @pnir.tabs.should == tabs
+  end
+
+  it "#active_index return properly" do
+    @pnir.active_index.should == @test.index
+  end
+
+  it "#active_tab return properly" do
+    @pnir.active_tab.should == @test
+  end
+
+  it "#active_document return properly" do
+    doc = @pnir.active_document
+    doc.should be_an_instance_of(WIN32OLE)
+    doc.location.href.should eql("about:test")
+  end
+
+  it "#document should return WIN32OLE" do
+    doc = @pnir.document(@test.index)
+    doc.should be_an_instance_of(WIN32OLE)
+    doc.ole_obj_help.name.should == "DispHTMLDocument"
+    doc.location.href.should == "about:test"
+  end
+
+  it "#document should return nil if index is out of range" do
+    @pnir.document(-1).should be_nil
+    @pnir.document(@test.index + 1).should be_nil
+  end
+
+  it "#documents should return all documents" do
+    docs = @pnir.documents
+    docs.size.should == @pnir.count
+    docs.last.location.href.should eql("about:test")
+  end
+
+  it "#each_document should enumerate all documents" do
+    docs = []
+    @pnir.each_document do |doc|
+      doc.should be_an_instance_of(WIN32OLE)
+      doc.ole_obj_help.name.should == "DispHTMLDocument"
+      docs << doc
+    end
+    docs.size.should == @pnir.count
+  end
+
+  it "#get_url_tab should return SleipnirAPI::Tab" do
+    t = @pnir.get_url_tab("about:test")
+    t.should == @test
+
+    t = @pnir.get_url_tab("about:no_such_tab_aqwsedrftgyhjuikol")
+    t.should be_nil
+  end
+
+  it "#switch_to_tab(url) should switch active tab" do
+    t = @pnir.open("about:switch_to_tab", false)
+    begin
+      @test.should be_active
+      t2 = @pnir.switch_to_tab("about:switch_to_tab")
+      t2.should == t2
+      t2.should be_active
+      @test.should_not be_active
+    ensure
+      t.close
+    end
+  end
+
+  it "#switch_to_tab(url) should activate 1st tab" do
+    t = @pnir.open("about:switch_to_tab2", true)
+    sleep(0.1) while t.busy?
+    begin
+      t.should be_active
+      @test.should_not be_active
+
+#      test2 = @pnir.switch_to_tab("about:test")
+#      test2.should == @test
+
+#      t.should_not be_active
+#      @test.should be_active
+    ensure
+      t.close
+    end
+  end
+
+  it "#switch_to_tab(SleipnirAPI::Tab) should switch active tab" do
+    t = @pnir.open("about:switch_to_tab3", true)
+    sleep(0.1) while t.busy?
+    begin
+      t.should be_active
+      @test.should_not be_active
+
+#      test2 = @pnir.switch_to_tab(@test)
+#      test2.should == @test
+#
+#      t.should_not be_active
+#      @test.should be_active
+    ensure
+      t.close
+    end
+  end
+
+end