yellowlab-akephalos 0.2.6

data/lib/akephalos/cucumber.rb

@@ -0,0 +1,6 @@
+require 'capybara/cucumber'
+
+Before('@akephalos') do
+  Capybara.current_driver = :akephalos
+end
+

data/lib/akephalos/htmlunit.rb

@@ -0,0 +1,36 @@
+require "pathname"
+require "java"
+
+dependency_directory = $:.detect { |path| Dir[File.join(path, 'htmlunit/htmlunit-*.jar')].any? }
+
+raise "Could not find htmlunit/htmlunit-VERSION.jar in load path:\n  [ #{$:.join(",\n    ")}\n  ]" unless dependency_directory
+
+Dir[File.join(dependency_directory, "htmlunit/*.jar")].each do |jar|
+  require jar
+end
+
+java.lang.System.setProperty("org.apache.commons.logging.Log", "org.apache.commons.logging.impl.SimpleLog")
+java.lang.System.setProperty("org.apache.commons.logging.simplelog.defaultlog", "fatal")
+java.lang.System.setProperty("org.apache.commons.logging.simplelog.showdatetime", "true")
+
+# Container module for com.gargoylesoftware.htmlunit namespace.
+module HtmlUnit
+  java_import "com.gargoylesoftware.htmlunit.BrowserVersion"
+  java_import "com.gargoylesoftware.htmlunit.History"
+  java_import "com.gargoylesoftware.htmlunit.HttpMethod"
+  java_import 'com.gargoylesoftware.htmlunit.ConfirmHandler'
+  java_import "com.gargoylesoftware.htmlunit.NicelyResynchronizingAjaxController"
+  java_import "com.gargoylesoftware.htmlunit.SilentCssErrorHandler"
+  java_import "com.gargoylesoftware.htmlunit.WebClient"
+  java_import "com.gargoylesoftware.htmlunit.WebResponseData"
+  java_import "com.gargoylesoftware.htmlunit.WebResponseImpl"
+
+  # Container module for com.gargoylesoftware.htmlunit.util namespace.
+  module Util
+    java_import "com.gargoylesoftware.htmlunit.util.NameValuePair"
+    java_import "com.gargoylesoftware.htmlunit.util.WebConnectionWrapper"
+  end
+
+  # Disable history tracking
+  History.field_reader :ignoreNewPages_
+end

data/lib/akephalos/htmlunit/ext/confirm_handler.rb

@@ -0,0 +1,18 @@
+# Reopen com.gargoylesoftware.htmlunit.ConfirmHandler to provide an interface to
+# confirm a dialog and capture its message
+module HtmlUnit
+  module ConfirmHandler
+
+    # Boolean - true for ok, false for cancel
+    attr_accessor :handleConfirmValue
+
+    # last confirmation's message
+    attr_reader   :text
+
+    # handleConfirm will be called by htmlunit on a confirm, so store the message.
+    def handleConfirm(page, message)
+      @text = message
+      return handleConfirmValue.nil? ? true : handleConfirmValue
+    end
+  end
+end

data/lib/akephalos/htmlunit/ext/http_method.rb

@@ -0,0 +1,30 @@
+module HtmlUnit
+  # Reopen HtmlUnit's HttpMethod class to add convenience methods.
+  class HttpMethod
+
+    # Loosely compare HttpMethod with another object, accepting either an
+    # HttpMethod instance or a symbol describing the method. Note that :any is a
+    # special symbol which will always return true.
+    #
+    # @param [HttpMethod] other an HtmlUnit HttpMethod object
+    # @param [Symbol] other a symbolized representation of an http method
+    # @return [true/false]
+    def ===(other)
+      case other
+      when HttpMethod
+        super
+      when :any
+        true
+      when :get
+        self == self.class::GET
+      when :post
+        self == self.class::POST
+      when :put
+        self == self.class::PUT
+      when :delete
+        self == self.class::DELETE
+      end
+    end
+
+  end
+end

data/lib/akephalos/node.rb

@@ -0,0 +1,188 @@
+module Akephalos
+
+  # Akephalos::Node wraps HtmlUnit's DOMNode class, providing a simple API for
+  # interacting with an element on the page.
+  class Node
+    # @param [HtmlUnit::DOMNode] node
+    def initialize(node)
+      @nodes = []
+      @_node = node
+    end
+
+    # @return [true, false] whether the element is checked
+    def checked?
+      if @_node.respond_to?(:isChecked)
+        @_node.isChecked
+      else
+        !! self[:checked]
+      end
+    end
+
+    # @return [String] inner text of the node
+    # Returns a textual representation of this element that represents what would
+    # be visible to the user if this page was shown in a web browser.
+    # For example, a single-selection select element would return the currently
+    # selected value as text.
+    # Note: This will cleanup/reduce whitespace
+     def text
+       @_node.asText
+     end
+
+    # Returns the raw text content of this node and its descendants...
+    def text_content
+      @_node.getTextContent
+    end
+
+    # Returns a string representation of the XML document from this element and
+    # all it's children (recursively). The charset used is the current page encoding.
+    def xml
+      @_node.asXml
+    end
+
+    # Return the value of the node's attribute.
+    #
+    # @param [String] name attribute on node
+    # @return [String] the value of the named attribute
+    # @return [nil] when the node does not have the named attribute
+    def [](name)
+      @_node.hasAttribute(name.to_s) ? @_node.getAttribute(name.to_s) : nil
+    end
+
+    # Return the value of a form element. If the element is a select box and
+    # has "multiple" declared as an attribute, then all selected options will
+    # be returned as an array.
+    #
+    # @return [String, Array<String>] the node's value
+    def value
+      case tag_name
+      when "select"
+        if self[:multiple]
+          selected_options.map { |option| option.value }
+        else
+          selected_option = @_node.selected_options.first
+          selected_option ? Node.new(selected_option).value : nil
+        end
+      when "option"
+        self[:value] || text
+      when "textarea"
+        @_node.getText
+      else
+        self[:value]
+      end
+    end
+
+    # Set the value of the form input.
+    #
+    # @param [String] value
+    def value=(value)
+      case tag_name
+      when "textarea"
+        @_node.setText("")
+        type(value)
+      when "input"
+        if file_input?
+          @_node.setValueAttribute(value)
+        else
+          @_node.setValueAttribute("")
+          type(value)
+        end
+      end
+    end
+
+    # Types each character into a text or input field.
+    #
+    # @param [String] value the string to type
+    def type(value)
+      value.each_char do |c|
+        @_node.type(c)
+      end
+    end
+
+    # @return [true, false] whether the node allows multiple-option selection (if the node is a select).
+    def multiple_select?
+      !self[:multiple].nil?
+    end
+
+    # @return [true, false] whether the node is a file input
+    def file_input?
+      tag_name == "input" && @_node.getAttribute("type") == "file"
+    end
+
+
+    # Unselect an option.
+    #
+    # @return [true, false] whether the unselection was successful
+    def unselect
+      @_node.setSelected(false)
+    end
+
+    # Return the option elements for a select box.
+    #
+    # @return [Array<Node>] the options
+    def options
+      @_node.getOptions.map { |node| Node.new(node) }
+    end
+
+    # Return the selected option elements for a select box.
+    #
+    # @return [Array<Node>] the selected options
+    def selected_options
+      @_node.getSelectedOptions.map { |node| Node.new(node) }
+    end
+
+    # Fire a JavaScript event on the current node. Note that you should not
+    # prefix event names with "on", so:
+    #
+    #   link.fire_event('mousedown')
+    #
+    # @param [String] JavaScript event name
+    def fire_event(name)
+      @_node.fireEvent(name)
+    end
+
+    # @return [String] the node's tag name
+    def tag_name
+      @_node.getNodeName
+    end
+
+    # @return [true, false] whether the node is visible to the user accounting
+    # for CSS.
+    def visible?
+      @_node.isDisplayed
+    end
+
+    # @return [true, false] whether the node is selected to the user accounting
+    # for CSS.
+    def selected?
+      if @_node.respond_to?(:isSelected)
+        @_node.isSelected
+      else
+        !! self[:selected]
+      end
+    end
+
+    # Click the node and then wait for any triggered JavaScript callbacks to
+    # fire.
+    def click
+      @_node.click
+      @_node.getPage.getEnclosingWindow.getJobManager.waitForJobs(1000)
+      @_node.getPage.getEnclosingWindow.getJobManager.waitForJobsStartingBefore(1000)
+    end
+
+    # Search for child nodes which match the given XPath selector.
+    #
+    # @param [String] selector an XPath selector
+    # @return [Array<Node>] the matched nodes
+    def find(selector)
+      nodes = @_node.getByXPath(selector).map { |node| Node.new(node) }
+      @nodes << nodes
+      nodes
+    end
+
+    # @return [String] the XPath expression for this node
+    def xpath
+      @_node.getCanonicalXPath
+    end
+  end
+
+end

data/lib/akephalos/page.rb

@@ -0,0 +1,113 @@
+module Akephalos
+
+  # Akephalos::Page wraps HtmlUnit's HtmlPage class, exposing an API for
+  # interacting with a page in the browser.
+  class Page
+    # @param [HtmlUnit::HtmlPage] page
+    def initialize(page)
+      @nodes = []
+      @_page = page
+    end
+
+    # Search for nodes which match the given XPath selector.
+    #
+    # @param [String] selector an XPath selector
+    # @return [Array<Node>] the matched nodes
+    def find(selector)
+      nodes = current_frame.getByXPath(selector).map { |node| Node.new(node) }
+      @nodes << nodes
+      nodes
+    end
+
+    # Return the page's source, including any JavaScript-triggered DOM changes.
+    #
+    # @return [String] the page's modified source
+    def modified_source
+      current_frame.asXml
+    end
+
+    # Return the page's source as returned by the web server.
+    #
+    # @return [String] the page's original source
+    def source
+      current_frame.getWebResponse.getContentAsString
+    end
+
+    # @return [Hash{String => String}] the page's response headers
+    def response_headers
+      headers = current_frame.getWebResponse.getResponseHeaders.map do |header|
+        [header.getName, header.getValue]
+      end
+      Hash[*headers.flatten]
+    end
+
+    # @return [Integer] the response's status code
+    def status_code
+      current_frame.getWebResponse.getStatusCode
+    end
+
+    # Execute the given block in the context of the frame specified.
+    #
+    # @param [String] frame_id the frame's id
+    # @return [true] if the frame is found
+    # @return [nil] if the frame is not found
+    def within_frame(frame_id)
+      return unless @current_frame = find_frame(frame_id)
+      yield
+      true
+    ensure
+      @current_frame = nil
+    end
+
+    # @return [String] the current page's URL.
+    def current_url
+      current_frame.getWebResponse.getRequestSettings.getUrl.toString
+    end
+
+    # Execute JavaScript against the current page, discarding any return value.
+    #
+    # @param [String] script the JavaScript to be executed
+    # @return [nil]
+    def execute_script(script)
+      current_frame.executeJavaScript(script)
+      nil
+    end
+
+    # Execute JavaScript against the current page and return the results.
+    #
+    # @param [String] script the JavaScript to be executed
+    # @return the result of the JavaScript
+    def evaluate_script(script)
+      current_frame.executeJavaScript(script).getJavaScriptResult
+    end
+
+    # Compare this page with an HtmlUnit page.
+    #
+    # @param [HtmlUnit::HtmlPage] other an HtmlUnit page
+    # @return [true, false]
+    def ==(other)
+      @_page == other
+    end
+
+    private
+
+    # Return the current frame. Usually just @_page, except when inside of the
+    # within_frame block.
+    #
+    # @return [HtmlUnit::HtmlPage] the current frame
+    def current_frame
+      @current_frame || @_page
+    end
+
+    # @param [String] id the frame's id
+    # @return [HtmlUnit::HtmlPage] the specified frame
+    # @return [nil] if no frame is found
+    def find_frame(id)
+      frame = @_page.getFrames.find do |frame|
+        frame.getFrameElement.getAttribute("id") == id
+      end
+      frame.getEnclosedPage if frame
+    end
+  end
+
+end

data/lib/akephalos/remote_client.rb

@@ -0,0 +1,92 @@
+require 'socket'
+require 'drb/drb'
+
+# We need to define our own NativeException class for the cases when a native
+# exception is raised by the JRuby DRb server.
+class NativeException < StandardError; end
+
+module Akephalos
+
+  # The +RemoteClient+ class provides an interface to an +Akephalos::Client+
+  # isntance on a remote DRb server.
+  #
+  # == Usage
+  #     client = Akephalos::RemoteClient.new
+  #     client.visit "http://www.oinopa.com"
+  #     client.page.source # => "<!DOCTYPE html PUBLIC..."
+  class RemoteClient
+    # @return [DRbObject] a new instance of Akephalos::Client from the DRb
+    #   server
+    def self.new(options = {})
+      manager.new_client(options)
+    end
+
+    # Starts a remove JRuby DRb server unless already running and returns an
+    # instance of Akephalos::ClientManager.
+    #
+    # @return [DRbObject] an instance of Akephalos::ClientManager
+    def self.manager
+      return @manager if defined?(@manager)
+
+      server_port = start!
+
+      DRb.start_service("druby://127.0.0.1:#{find_available_port}")
+      manager = DRbObject.new_with_uri("druby://127.0.0.1:#{server_port}")
+
+      # We want to share our local configuration with the remote server
+      # process, so we share an undumped version of our configuration. This
+      # lets us continue to make changes locally and have them reflected in the
+      # remote process.
+      manager.configuration = Akephalos.configuration.extend(DRbUndumped)
+
+      @manager = manager
+    end
+
+    # Start a remote server process and return when it is available for use.
+    def self.start!
+      port = find_available_port
+
+      remote_client = IO.popen("ruby #{Akephalos::BIN_DIR + 'akephalos'} #{port}")
+
+      # Set up a monitor thread to detect if the forked server exits
+      # prematurely.
+      server_monitor = Thread.new { Thread.current[:exited] = Process.wait(remote_client.pid) }
+
+      # Wait for the server to be accessible on the socket we specified.
+      until responsive?(port)
+        exit!(1) if server_monitor[:exited]
+        sleep 0.5
+      end
+      server_monitor.kill
+
+      # Ensure that the remote server shuts down gracefully when we are
+      # finished.
+      at_exit { Process.kill(:INT, remote_client.pid) }
+
+      port
+    end
+
+    private
+
+    # @api private
+    # @param [Integer] port the port to check for responsiveness
+    # @return [true, false] whether the port is responsive
+    def self.responsive?(port)
+      socket = TCPSocket.open('127.0.0.1', port)
+      true
+    rescue Errno::ECONNREFUSED
+      false
+    ensure
+      socket.close if socket
+    end
+
+    # @api private
+    # @return [Integer] the next available port
+    def self.find_available_port
+      server = TCPServer.new('127.0.0.1', 0)
+      server.addr[1]
+    ensure
+      server.close if server
+    end
+  end
+end