fakettp 0.2.4.1 → 0.3.0

data/features/step_definitions/simulator.rb

@@ -0,0 +1,25 @@
+Given /^the simulator is reset$/ do
+  req = Net::HTTP::Post.new '/reset'
+  Net::HTTP.new('fakettp.local').start {|http| http.request(req) }
+end
+
+Given /^we expect (\S*)$/ do |filename|
+  body = File.read(File.dirname(__FILE__) + "/../expectations/#{filename}")
+  req = Net::HTTP::Post.new '/expect', {'Content-Type' => 'text/plain'}
+  req.body = body
+  Net::HTTP.new('fakettp.local').start {|http| http.request(req) }
+end
+
+Then /^verifying the simulator should report success$/ do
+  req = Net::HTTP::Get.new '/verify'
+  resp = Net::HTTP.new('fakettp.local').start {|http| http.request(req) }
+  resp.body.should == "Verify OK\n"
+  resp.class.should == Net::HTTPOK
+end
+
+Then /^verifying the simulator should report a failure, with message "(.*)"$/ do |message|
+  req = Net::HTTP::Get.new '/verify'
+  resp = Net::HTTP.new('fakettp.local').start {|http| http.request(req) }
+  resp.body.should =~ Regexp.new(message, Regexp::MULTILINE)
+  resp.class.should == Net::HTTPInternalServerError
+end

data/features/step_definitions/webrat_steps.rb

@@ -0,0 +1,99 @@
+require File.expand_path(File.join(File.dirname(__FILE__), "..", "support", "paths"))
+
+# Commonly used webrat steps
+# http://github.com/brynary/webrat
+
+When /^I go to (.+)$/ do |page_name|
+  visit path_to(page_name)
+end
+
+When /^I press "(.*)"$/ do |button|
+  click_button(button)
+end
+
+When /^I follow "(.*)"$/ do |link|
+  click_link(link)
+end
+
+When /^I fill in "(.*)" with "(.*)"$/ do |field, value|
+  fill_in(field, :with => value) 
+end
+
+When /^I select "(.*)" from "(.*)"$/ do |value, field|
+  select(value, :from => field) 
+end
+
+# Use this step in conjunction with Rail's datetime_select helper. For example:
+# When I select "December 25, 2008 10:00" as the date and time 
+When /^I select "(.*)" as the date and time$/ do |time|
+  select_datetime(time)
+end
+
+# Use this step when using multiple datetime_select helpers on a page or 
+# you want to specify which datetime to select. Given the following view:
+#   <%= f.label :preferred %><br />
+#   <%= f.datetime_select :preferred %>
+#   <%= f.label :alternative %><br />
+#   <%= f.datetime_select :alternative %>
+# The following steps would fill out the form:
+# When I select "November 23, 2004 11:20" as the "Preferred" data and time
+# And I select "November 25, 2004 10:30" as the "Alternative" data and time
+When /^I select "(.*)" as the "(.*)" date and time$/ do |datetime, datetime_label|
+  select_datetime(datetime, :from => datetime_label)
+end
+
+# Use this step in conjuction with Rail's time_select helper. For example:
+# When I select "2:20PM" as the time
+# Note: Rail's default time helper provides 24-hour time-- not 12 hour time. Webrat
+# will convert the 2:20PM to 14:20 and then select it. 
+When /^I select "(.*)" as the time$/ do |time|
+  select_time(time)
+end
+
+# Use this step when using multiple time_select helpers on a page or you want to
+# specify the name of the time on the form.  For example:
+# When I select "7:30AM" as the "Gym" time
+When /^I select "(.*)" as the "(.*)" time$/ do |time, time_label|
+  select_time(time, :from => time_label)
+end
+
+# Use this step in conjuction with Rail's date_select helper.  For example:
+# When I select "February 20, 1981" as the date
+When /^I select "(.*)" as the date$/ do |date|
+  select_date(date)
+end
+
+# Use this step when using multiple date_select helpers on one page or
+# you want to specify the name of the date on the form. For example:
+# When I select "April 26, 1982" as the "Date of Birth" date
+When /^I select "(.*)" as the "(.*)" date$/ do |date, date_label|
+  select_date(date, :from => date_label)
+end
+
+When /^I check "(.*)"$/ do |field|
+  check(field) 
+end
+
+When /^I uncheck "(.*)"$/ do |field|
+  uncheck(field) 
+end
+
+When /^I choose "(.*)"$/ do |field|
+  choose(field)
+end
+
+When /^I attach the file at "(.*)" to "(.*)" $/ do |path, field|
+  attach_file(field, path)
+end
+
+Then /^I should see "(.*)"$/ do |text|
+  response.body.should =~ /#{text}/m
+end
+
+Then /^I should not see "(.*)"$/ do |text|
+  response.body.should_not =~ /#{text}/m
+end
+
+Then /^the "(.*)" checkbox should be checked$/ do |label|
+  field_labeled(label).should be_checked
+end

data/features/support/env.rb

@@ -0,0 +1,5 @@
+require 'spec/expectations'
+require 'net/http'
+
+FAKETTP_BASE = File.dirname(__FILE__) + '/../../install'
+require 'fakettp'

data/features/support/fakettp.rb

@@ -0,0 +1,2 @@
+require 'fakettp/expectation'
+

data/features/support/paths.rb

@@ -0,0 +1,12 @@
+def path_to(page_name)
+  case page_name
+  
+  when /the homepage/i
+    root_path
+  
+  # Add more page name => path mappings here
+  
+  else
+    raise "Can't find mapping from \"#{page_name}\" to a path."
+  end
+end

data/features/support/xpath.rb

@@ -0,0 +1,10 @@
+require 'rexml/document'
+
+def xml_node_values xml, xpath
+  begin
+    doc = REXML::Document.new(xml).root
+    REXML::XPath.match(doc, xpath).map { |node| (node.respond_to?(:value) ? node.value : node.text) }
+  rescue
+    raise "No #{xpath} found in response body (#{xml})"
+  end
+end

data/features/verification.feature

@@ -0,0 +1,49 @@
+Feature: Verification of expectations
+  Scenario: No expectations and no requests
+    Given the simulator is reset
+    Then verifying the simulator should report success
+
+  Scenario: Satisfied expectation
+    Given the simulator is reset
+    And we expect get_root
+    When we get / on foo.fake.local
+    Then verifying the simulator should report success
+
+  Scenario: Unsatisfied expectation
+    Given the simulator is reset
+    And we expect get_root
+    Then verifying the simulator should report a failure, with message "Expected request not received"
+
+  Scenario: Unexpected request
+    Given the simulator is reset
+    When we get / on foo.fake.local
+    Then verifying the simulator should report a failure, with message "Received unexpected request"
+
+  Scenario: Mismatched expectation
+    Given the simulator is reset
+    And we expect get_root
+    When we get /foo on foo.fake.local
+    Then verifying the simulator should report a failure, with message "Error in GET /: expected: "/",.*got: "/foo""
+
+  Scenario: Two satisfied expectations
+    Given the simulator is reset
+    And we expect get_root
+    And we expect get_foo
+    When we get / on foo.fake.local
+    And we get /foo on foo.fake.local
+    Then verifying the simulator should report success
+
+  Scenario: Two expectations, one satisfied
+    Given the simulator is reset
+    And we expect get_root
+    And we expect get_foo
+    When we get / on foo.fake.local
+    Then verifying the simulator should report a failure, with message "Expected request not received"
+
+  Scenario: Two expectations, with requests received in the wrong order
+    Given the simulator is reset
+    And we expect get_root
+    And we expect get_foo
+    When we get /foo on foo.fake.local
+    And we get / on foo.fake.local
+    Then verifying the simulator should report a failure, with message "Error in GET /: expected: "/",.*got: "/foo".*Error in GET /foo: expected: "/foo",.*got: "/""

data/lib/fakettp/commands/fakettp_command.rb

@@ -6,7 +6,7 @@ module Fakettp
       end
   
       def run
-        command = get_command
+        command = @args[0]
         return usage unless command
         case command
         when 'install' then
@@ -17,37 +17,49 @@ module Fakettp
       end
   
       private
-  
-      def get_command
-        @args[0]
-      end
       
       def install
-        dir = get_dir
-        return usage unless dir
-        if File.exist? dir
-          $stderr.puts "File or directory #{dir} already exists."
+        @directory, @hostname = @args[1..2]
+        return usage unless @directory && @hostname
+        if File.exist? @directory
+          $stderr.puts "File or directory #{@directory} already exists."
           return 1
         end
-        FileUtils.mkdir_p dir + '/tmp/expectations', :mode => 0777
-        FileUtils.mkdir_p dir + '/public'
-        FileUtils.cp File.dirname(__FILE__) + '/../config.ru', dir
-        FileUtils.cp File.dirname(__FILE__) + '/../../../README.html', dir
+        copy_files
+        write_config
+        create_database
         return 0
       end
-      
-      def get_dir
-        @args[1]
-      end
   
+      def copy_files
+        FileUtils.mkdir_p @directory + '/tmp', :mode => 0777
+        FileUtils.mkdir_p @directory + '/public'
+        FileUtils.cp File.dirname(__FILE__) + '/../config.ru', @directory
+        FileUtils.cp File.dirname(__FILE__) + '/../public/fakettp.css', @directory + '/public'
+      end
+
+      def write_config
+        config = {'database' => {'adapter' => 'sqlite3', 'database' => 'fakettp.sqlite3'},
+          'hostname' => @hostname
+        }
+        File.open @directory + '/fakettp.yml', 'w' do |file|
+          file.write config.to_yaml
+        end
+      end
+
+      def create_database
+        system %(ruby -e "FAKETTP_BASE = '#{@directory}';load '#{File.dirname(__FILE__)}/../schema.rb'")
+      end
+
       def usage
         $stderr.puts <<-EOF
 Usage:
 
-  [TODO]
+  fakettp install <directory> <hostname>
+
 EOF
         return 1
       end
     end
   end
-end
+end

data/lib/fakettp/controller.rb

@@ -7,6 +7,12 @@ require 'fakettp/expectation_helper'
 require 'fakettp/simulator'
 require 'fakettp/expectation'
 
+set :views, File.join(File.dirname(__FILE__), 'views')
+
+config_file = File.join(FAKETTP_BASE, 'fakettp.yml')
+config = File.read config_file
+host = YAML.load(config)['hostname']
+
 include Fakettp::ExpectationHelper
 
 post '/expect', :host => 'fakettp.local' do
@@ -30,6 +36,12 @@ get '/verify', :host => 'fakettp.local' do
   end
 end
 
+get '/', :host => 'fakettp.local' do
+  content_type 'text/html'
+  @expectations = Fakettp::Expectation.all
+  erb :index
+end
+
 [:get, :post, :put, :delete, :head].each do |method|
   send method, '/**' do
     begin

data/lib/fakettp/db.rb

@@ -0,0 +1,7 @@
+require 'activerecord'
+
+RAILS_ROOT = FAKETTP_BASE
+
+config = File.read(File.join(FAKETTP_BASE, 'fakettp.yml'))
+db_config = YAML.load(config)['database']
+ActiveRecord::Base.establish_connection db_config

data/lib/fakettp/error.rb

@@ -1,23 +1,11 @@
 module Fakettp
-  class Error
-    ERROR_FILE = File.join FAKETTP_BASE, 'tmp', 'errors'
-    
-    def self.clear_all
-      FileUtils.rm_rf ERROR_FILE
-    end
-    
-    def self.<< message
-      File.open ERROR_FILE, 'a' do |f|
-        f.puts message
-      end
-    end
-    
-    def self.empty?
-      !File.exists? ERROR_FILE
-    end
-    
+  class Error < ActiveRecord::Base
+    belongs_to :expectation
+        
     def self.list
-      empty? ? '' : File.read(ERROR_FILE)
+      errors = Error.all
+      return '' if errors.empty?
+      errors.map {|e| e.message}.join("\n") + "\n"
     end
   end
 end

data/lib/fakettp/expectation.rb

@@ -1,56 +1,40 @@
+require 'fakettp/db'
+
 module Fakettp
-  class Expectation
-    class Error < Exception; end
-    
-    EXPECTATION_DIR = File.join FAKETTP_BASE, 'tmp', 'expectations'
-    
-    def initialize contents
-      @contents = contents
+  class Expectation < ActiveRecord::Base
+    set_table_name :expectations
+    has_many :errors
+    
+    class Error < StandardError
+      attr_reader :line_number
+      def initialize message, line_number = nil
+        @line_number = line_number
+        super(message)
+      end
+    end
+            
+    def render
+      if executed
+        span_class = errors.empty? ? 'pass' : 'fail'
+        %(<span class="#{span_class}">#{contents}</span>)
+      else
+        contents
+      end
     end
     
     def execute binding
-      eval @contents, binding
+      self.executed = true
+      save
+      eval contents, binding
       # TODO: Include context of expectation file
     end
-    
-    def self.clear_all
-      FileUtils.rm_rf Dir.glob(File.join(EXPECTATION_DIR, '*'))
-    end
-    
-    def self.empty?
-      files.empty?
-    end
-    
-    def self.<< expectation
-      File.open next_file_to_create, 'w' do |f|
-        f.write expectation
-      end
+        
+    def self.all_received?
+      !exists? :executed => false
     end
     
     def self.next
-      file = next_file_to_read
-      contents = File.read file
-      FileUtils.rm file
-      Expectation.new contents
-    end
-    
-    private
-    
-    def self.next_file_to_create
-      name = (files.last.to_i + 1).to_s
-      File.join EXPECTATION_DIR, name
-    end
-    
-    def self.next_file_to_read
-      name = files.first
-      raise Error.new('Received unexpected request') unless name
-      File.join EXPECTATION_DIR, name
-    end
-    
-    def self.files
-      (Dir.entries(EXPECTATION_DIR) - ['.', '..']).sort_by {|a| a.to_i}
+      find_by_executed(false)
     end
-  
-    private_class_method :next_file_to_create, :next_file_to_read, :files
   end
 end

data/lib/fakettp/fakettp.yml

@@ -0,0 +1,3 @@
+database:
+  adapter:  sqlite3
+  database: fakettp.sqlite3