rtml 2.0.3 → 2.0.4

data/spec/lib/rtml/test/variable_scope_spec.rb

@@ -0,0 +1,65 @@
+require 'spec_helper'
+
+describe Rtml::Test::VariableScope do
+  it "should raise if a variable is not defined" do
+    proc { subject[:name] = "Colin" }.should raise_error(Rtml::Errors::VariableError)
+  end
+
+  it "should allow variables to be defined" do
+    subject.declare_variable(:name)
+    subject.variable_names.should include('name')
+  end
+
+  it "should perform TML arithmetic: plus" do
+    subject.declare_variable(:counter, :type => :integer, :value => 1)
+    subject.perform_operation_on(:counter, :lo => '1', :op => 'plus', :ro => '2')
+    subject[:counter].should == 3
+  end
+
+  it "should perform TML arithmetic: minus" do
+    subject.declare_variable(:counter, :type => :integer, :value => 1)
+    subject.perform_operation_on(:counter, :lo => '1', :op => 'minus', :ro => '2')
+    subject[:counter].should == -1
+  end
+
+  it "should perform TML arithmetic: format"
+
+  it "should perform TML arithmetic: item" do
+    subject.declare_variable(:which)
+    subject.perform_operation_on(:which, :lo => 'one;two;three', :op => 'item', :ro => '1')
+    subject[:which].should == 'two'
+  end
+
+  it "should perform TML arithmetic: number" do
+    subject.declare_variable(:which)
+    subject.perform_operation_on(:which, :lo => 'one;two;three', :op => 'number')
+    subject[:which].should == '3'
+  end
+
+  it "should perform TML assignment" do
+    subject.declare_variable(:counter, :type => :integer, :value => 1)
+    subject.find_variable(:counter).perform_operation(:lo => '3')
+    subject[:counter].should == 3
+  end
+
+  it "should assign a dynamic value" do
+    subject.declare_variable(:counter, :type => :integer, :value => 1)
+    subject.declare_variable(:start, :type => :integer, :value => 5)
+    subject[:counter] = "tmlvar:start"
+    subject[:counter].should == 5
+  end
+
+  it "should assign another variable" do
+    # isn't this really the same as assigning a static value? because subject[:start] returns 1...
+    subject.declare_variable(:counter, :type => :integer, :value => 1)
+    subject.declare_variable(:start, :type => :integer, :value => 5)
+    subject[:counter] = subject[:start]
+    subject[:counter].should == 5
+  end
+
+  it "should assign a static value" do
+    subject.declare_variable(:counter, :type => :integer)
+    subject[:counter] = 5
+    subject[:counter].should == 5
+  end
+end

data/spec/lib/rtml/widget_spec.rb

@@ -52,6 +52,7 @@ describe Rtml::Widget do
   it "should not hang if entry point does not exist" do
     # If the test succeeds, the method will be missing. However, if it fails, it'll just hang the app,
     # so dev needs to figure out why the hard way.
+    # Update: Now I'm getting stack level errors, instead of hanging systems, when it fails. Progress.
     lambda { @doc.missing_widget_entry_point }.should raise_error(NoMethodError)
   end
 end

data/spec/lib/rtml/widgets_spec.rb

@@ -4,4 +4,34 @@ describe Rtml::Widgets do
   it "should find Widgets affecting a target" do
     Rtml::Widgets.affecting("document").should_not be_empty
   end
+
+  context "included into a class" do
+    context "with no widgets" do
+      subject { k = Class.new; k.send(:include, Rtml::Widgets); k.new }
+      it "should be able to iterate through widgets, even if there aren't any" do
+        subject.widgets.each { }
+      end
+    end
+
+    context "with widgets" do
+      subject do
+        k = Class.new
+        def k.name; "MyTest"; end
+        k.send(:include, Rtml::Widgets)
+
+        class MyWidget < Rtml::Widget
+          affects "MyTest"
+          entry_point :test_method
+          def test_method; 1; end
+        end
+
+        ### Rtml::Widgets.add_proxies_to_base(k)
+        k.new
+      end
+
+      it "should respond to entry points" do
+        subject.test_method.should == 1
+      end
+    end
+  end
 end

data/spec/models/rtml/document_spec.rb

@@ -2,6 +2,14 @@ require File.join(__FILE__.gsub(/(.*)?\/spec\/.*$/, '\1'), 'spec/spec_helper')
 
 describe Rtml::Document do
   include Webrat::Matchers
+
+  it "should link multiple screens using strings properly" do
+    @doc = Rtml::Document.new
+    @doc.screen :first, "swipe_card_trans_reject"
+    @doc.screen "swipe_card_trans_reject"
+
+    @doc.to_tml.should =~ /next uri="#swipe_card_?[0-9]+/
+  end
   
   context "with one Screen instruction" do
     before :each do

data/spec/models/rtml/dom/screen_element_spec.rb

@@ -8,4 +8,19 @@ describe Rtml::Dom::ScreenElement do
   it "should convert its name to a string after instantiation" do
     @ele.name.should be_a_kind_of(String)
   end
+
+  it "should not prepend ids with slashes in them with a #" do
+    @ele.property('next', "emb://embedded.tml")
+    @ele.to_tml.should_not =~ /\#/
+  end
+
+  it "should not lose # in submit econn" do
+    @ele.build :submit, :tgt => "a/path/to/somewhere", :econn => "#submit_err", :cache => "deny"
+    @ele.to_tml.should =~ /econn="#submit_err"/
+  end
+
+  it "should not prepend # if there is a colon (:)" do
+    @ele.next_screen "tmlvar:something"
+    @ele.to_tml.should =~ /next uri="tmlvar:something"/
+  end
 end

data/spec/models/rtml/instruction_spec.rb

@@ -9,7 +9,7 @@ describe Rtml::Instruction do
         '  display "test"',
       ])
 
-      rtml_document.should resemble(:tml => [:screen, {:screen => :display}])
+      rtml_document.should resemble_tml(:tml => [:screen, {:screen => :display}])
     end
 
     it "should produce a document from instances" do
@@ -21,7 +21,7 @@ describe Rtml::Instruction do
       rtml_document.setup_default_document
 
       instructions.each { |instruction| instruction.follow(rtml_document) }
-      rtml_document.should resemble(:tml => [:screen, {:screen => :display}])
+      rtml_document.should resemble_tml(:tml => [:screen, {:screen => :display}])
     end
   end
 

data/spec/rtml_action_spec.rb

@@ -0,0 +1,25 @@
+require File.join(__FILE__.gsub(/(.*)?\/spec\/.*$/, '\1'), 'spec/spec_helper')
+
+describe "RTML actions", :type => :controller do
+  controller_name :inherited
+
+  it "should copy variables into widgets" do
+    Rtml.action :instance_variables_test, :inherited do
+      @instance_variable = 5
+      screen(:index) { @instance_variable.should == 5 }
+    end
+
+    get :instance_variables_test, :ignore_state => true
+    response.should_not contain_errors
+  end
+
+  it "should copy variables into widgets" do
+    Rtml.action :instance_variables_test, :inherited do
+      @instance_variable = 5
+      screen(:display) { display }
+    end
+
+    get :instance_variables_test, :ignore_state => true
+    response.should contain("value: 5")
+  end
+end

data/spec/spec_helper.rb

@@ -24,7 +24,9 @@ unless $rtml_spec_helper_already_loaded
   end
 
   require 'rtml/test/spec'
-  Spec::Example::ExampleGroupFactory.default(RtmlExampleGroup)
+  require 'ruby-prof'
+  Spec::Example::ExampleGroupFactory.default(Rtml::Test::Spec::RtmlExampleGroup)
+
   # Now... this is redundant for working project tests, but absolutely critical for in-Rails tests.
   # TODO: Don't load it if it's redundant... Need to know whether it's in-rails or not for that, though.
   ActionController::Base.view_paths << File.join(File.dirname(__FILE__), 'support/app/views')
@@ -35,8 +37,36 @@ unless $rtml_spec_helper_already_loaded
   Dir[File.expand_path(File.join(File.dirname(__FILE__),'support/rspec','**','*.rb'))].each {|f| require f }
 
   Spec::Runner.configure do |config|
+    config.include(Rtml::Test::Spec::Matchers)
+
     config.after(:each) do
       Rtml::Document.destroy_all
     end
+    
+    if ENV['PROFILE']
+      config.after(:all) do
+        # code here
+        if $started
+          puts "stop profiler for #{described_class}"
+          $started = nil
+          FileUtils.mkdir_p "profiled_specs"
+          file = "profiled_specs/#{described_class.to_s.underscore}.html"
+          result = RubyProf.stop
+
+          # You can then output the trace in different ways.
+          #  Simply print a overview to stdout
+          printer = RubyProf::GraphHtmlPrinter.new(result)
+          printer.print(file, :min_percent => (ENV['MIN_PERCENT'] || 0.1).to_f)
+        end
+      end
+
+      config.before(:all) do
+        unless $started
+          $started = 1
+          puts "start profiler for #{described_class}"
+          RubyProf.start
+        end
+      end
+    end
   end
 end

data/spec/support/app/controllers/post_tests_controller.rb

@@ -0,0 +1,11 @@
+class PostTestsController < ApplicationController
+  class Created < StandardError; end
+  
+  def new
+    
+  end
+  
+  def create
+    raise Created, "Created."
+  end
+end

data/spec/support/app/views/inherited/instance_variables_test/display.rtml.erb

@@ -0,0 +1 @@
+<h1>value: <%=@instance_variable%></h1>

data/spec/support/config/boot.rb

@@ -0,0 +1 @@
+require File.expand_path("../../rails.rb", __FILE__)

data/spec/support/config/routes.rb

@@ -1,3 +1,4 @@
 ActionController::Routing::Routes.draw do |map|
-  map.connect_rtml :controller => 'rtml', :action => 'index', :format => 'rtml'
-end
+  map.connect_rtml :controller => 'inherited'
+  map.resources :post_tests
+end

data/spec/support/raw_tml/avs.tml

@@ -0,0 +1,27 @@
+<?xml version="1.0" encoding="ISO-8859-1"?>
+<tml cache="allow"         xmlns="http://www.ingenico.co.uk/tml">
+  <head />
+  <!--app_start-->              <screen id="app_start">
+    <next uri="#avs_address" />
+    <display>
+      start here
+    </display>
+  </screen>
+  <!--avs_address-->            <screen id="avs_address">
+    <display>
+      <form>
+        Street Address / PO Box Number:
+        <input type="number" name="avs.address">
+      </form>
+    </display>
+  </screen>
+  <!--app_start_avs_completion--><screen id="app_start_14">
+    <next uri="#done" />
+  </screen>
+  <!--done-->                   <screen id="done" />
+  <!--assert-->                 <screen id="assert">
+    <display>
+      <h1>Assertion Error!</h1>On screen: <getvar name='oebr.prev_screen' />
+    </display>
+  </screen>
+</tml>

data/spec/support/raw_tml/document_level_events.tml

@@ -0,0 +1,18 @@
+<?xml version="1.0" encoding="ISO-8859-1"?>
+<tml xmlns="http://www.ingenico.co.uk/tml" cache="deny">
+  <head>
+    <defaults cancel="#on_cancel" menu="#on_menu" />
+  </head>
+
+  <screen id="init" next="#idle">
+  </screen>
+
+  <screen id="idle" next="#idle">
+    <display>
+      <a href="#enter_amt">Make a Payment</a>
+    </display>
+  </screen>
+
+  <screen id="on_cancel"><display>cancel</display></screen>
+  <screen id="on_menu"><display>menu</display></screen>
+</tml>

data/spec/support/raw_tml/empty_screen.tml

@@ -0,0 +1,15 @@
+<?xml version="1.0" encoding="ISO-8859-1"?>
+<tml cache="allow"         xmlns="http://www.ingenico.co.uk/tml">
+  <head />
+  <vardcl type="integer"       name="card.avs.zip" />
+  <vardcl type="integer"       name="card.avs.address" />
+  <!--app_start-->              <screen id="app_start">
+    <next uri="#app_start_a2" />
+  </screen>
+  <!--app_start_avs_completion--><screen id="app_start_a2" />
+  <!--assert-->                 <screen id="assert">
+    <display>
+      <h1>Assertion Error!</h1>On screen: <getvar name='oebr.prev_screen' />
+    </display>
+  </screen>
+</tml>

data/spec/support/raw_tml/enter_amount.tml

@@ -0,0 +1,40 @@
+<?xml version="1.0" encoding="ISO-8859-1"?>
+<tml xmlns="http://www.ingenico.co.uk/tml" cache="deny">
+  <head />
+
+  <screen id="init" next="#idle">
+    <setvar name="payment.amount" lo="100" />
+  </screen>
+
+  <screen id="idle" next="#idle">
+    <display>
+      <a href="#enter_amt">Make a Payment</a>
+    </display>
+  </screen>
+
+  <screen id="enter_amt" next="#show_amt">
+    <display>
+      <form>
+        Enter Amount: <input type="number" format="$0*.00" name="payment.amount" />
+      </form>
+    </display>
+  </screen>
+
+  <screen id="show_amt" next="#swipe">
+    <display>
+      Amount Due: <getvar name="payment.amount" format="$0*.00" />
+    </display>
+  </screen>
+
+  <screen id="swipe" next="#risk">
+    <tform>
+      <card parser='mag' parser_params="read_data" />
+    </tform>
+  </screen>
+
+  <screen id="risk" next="#init">
+    <tform>
+      <card parser="mag" parser_params="risk_mgmt" />
+    </tform>
+  </screen>
+</tml>

data/spec/support/raw_tml/foreign_receiver.tml

@@ -0,0 +1,10 @@
+<?xml version="1.0" encoding="ISO-8859-1"?>
+<tml xmlns="http://www.ingenico.co.uk/tml" cache="deny">
+  <head />
+
+  <screen id="main_menu">
+    <display>
+      Main Menu!
+    </display>
+  </screen>
+</tml>

data/spec/support/raw_tml/foreign_reference.tml

@@ -0,0 +1,10 @@
+<?xml version="1.0" encoding="ISO-8859-1"?>
+<tml xmlns="http://www.ingenico.co.uk/tml" cache="deny">
+  <head />
+
+  <screen id="idle" next="#idle" menu="spec/support/raw_tml/foreign_receiver.tml">
+    <display>
+      Hello, World!
+    </display>
+  </screen>
+</tml>

data/spec/support/raw_tml/hello_world.tml

@@ -0,0 +1,13 @@
+<?xml version="1.0" encoding="ISO-8859-1"?>
+<tml xmlns="http://www.ingenico.co.uk/tml" cache="deny">
+  <head />
+
+  <screen id="init" next="#idle">
+  </screen>
+
+  <screen id="idle" next="#idle">
+    <display>
+      Hello, World!
+    </display>
+  </screen>
+</tml>

data/spec/support/raw_tml/loop_x_times.tml

@@ -0,0 +1,39 @@
+<?xml version="1.0" encoding="ISO-8859-1"?>
+<tml xmlns="http://www.ingenico.co.uk/tml" cache="deny">
+  <head />
+
+  <vardcl name="counter" type="integer" />
+  <vardcl name="target" type="integer" />
+
+  <screen id="init" next="#idle">
+    <setvar name="counter" lo="0" />
+    <setvar name="target" lo="5" />
+  </screen>
+
+  <screen id="idle" next="#count">
+    <display>
+      <form>
+        How Many Loops? <input type="number" name="target" />
+      </form>
+    </display>
+  </screen>
+
+  <screen id="count" next="#loop" timeout="1">
+    <setvar name="counter" lo="tmlvar:counter" op="plus" ro="1" />
+    <display>
+      Counter: <getvar name="counter" />
+    </display>
+  </screen>
+
+  <screen id="loop">
+    <next uri="#count">
+      <variant uri="#complete" lo="tmlvar:counter" op="equal" ro="tmlvar:target" />
+    </next>
+  </screen>
+
+  <screen id="complete" next="#init" timeout="3">
+    <display>
+      Done: looped <getvar name="counter" /> times.
+    </display>
+  </screen>
+</tml>