mechanize.cr/spec/agent_spec.cr

77 lines
2.3 KiB
Crystal

require "./spec_helper"
describe "Mechanize Agent test" do
it "can fill and submit form" do
agent = Mechanize.new
page = agent.get("http://example.com/form")
form = page.forms[0]
form.field_with("name").value = "foo"
form.field_with("email").value = "bar"
page = agent.submit(form)
page.not_nil!.code.should eq 200
page.not_nil!.body.should eq "success"
end
it "can fill and submit form with submit button" do
agent = Mechanize.new
page = agent.get("http://example.com/form")
form = page.forms[0]
form.field_with("name").value = "foo"
form.field_with("email").value = "bar"
submit_button = form.buttons[0]
page = agent.submit(form, submit_button)
page.not_nil!.code.should eq 200
page.not_nil!.body.should eq "success with button"
end
it "can save history" do
agent = Mechanize.new
agent.get("http://example.com/")
agent.history.size.should eq 1
agent.history.last.title.should eq ""
agent.get("http://example.com/form")
agent.history.size.should eq 2
agent.history.last.title.should eq "page_title"
end
it "can back previous page" do
agent = Mechanize.new
agent.get("http://example.com/")
agent.get("http://example.com/form")
agent.current_page.title.should eq "page_title"
agent.back
agent.current_page.title.should eq ""
end
it "can set maximum number of items allowed in the history" do
agent1 = Mechanize.new
agent1.get("http://example.com/")
agent1.get("http://example.com/form")
agent1.history.size.should eq 2
# set max size
agent2 = Mechanize.new
agent2.max_history = 1
agent2.get("http://example.com/")
agent2.get("http://example.com/form")
agent2.history.size.should eq 1
agent2.history.pop.uri.to_s.should eq "http://example.com/form"
end
it "can download page" do
agent = Mechanize.new
agent.download("http://example.com", "mechanizecr_example.html")
File.exists?("mechanizecr_example.html").should eq true
File.delete("mechanizecr_example.html")
end
it "doesn't add page to history within transact block" do
agent = Mechanize.new
agent.get("http://example.com/")
agent.history.size.should eq 1
agent.transact do
agent.get("http://example.com/")
end
agent.history.size.should eq 1
end
end