rtml 1.2.2

data/app_generators/rtml/templates/rtml/test/core/element_test.rb

@@ -0,0 +1,17 @@
+require File.join(File.dirname(__FILE__), "..", "rtml_test_helper")
+
+class ElementTest < Test::Unit::TestCase
+  def setup
+    @element = Rtml::Core::TMLDocument.new
+  end
+
+  def test_element_protects_all_instance_variables
+    arr = (@element.instance_variables - @element.protected_instance_variables)
+    assert(arr.empty?, "Expected empty array, found #{arr.inspect}")
+  end
+
+  def test_element_stores_attributes_properly
+    @element[:test_attribute] = "test value"
+    assert(@element[:test_attribute] == "test value", "Expected 'test value', found #{@element[:test_attribute].inspect}")
+  end
+end

data/app_generators/rtml/templates/rtml/test/core/screen_test.rb

@@ -0,0 +1,91 @@
+require File.join(File.dirname(__FILE__), "..", "rtml_test_helper")
+
+class ScreenTest < Rtml::Debug::RtmlCoreUnitTest
+  def test_remove_screen
+    document.screen :first, :second
+    second = document.screen :second, :third
+    
+    document.remove_screen :first
+    document.remove_screen second
+    
+    assert_nil document.find(:first)
+    assert_nil document.find(:second)
+  end
+  
+  def setup_variants
+    @hyperlink_variants = { document.url_for(:action => 'third') => :hyperlink,
+                            document.url_for(:anchor => 'fourth') => :hyperlink }
+    @default_variant    = :second
+    @other_variants     = { :fifth => 'tmlvar:one == tmlvar:two', 
+                            :sixth => 'tmlvar:three == tmlvar:four',
+                            :seventh => 'on: f1',
+                            :eighth => 'on: 00' }.with_indifferent_access
+    @expected_variants = { @default_variant => :default }
+    @expected_variants.merge! @hyperlink_variants;
+    @expected_variants.merge! @other_variants
+    
+    @scr = (document.screen(:first) do
+      goto :second
+      goto :fifth, :if => 'tmlvar:one == tmlvar:two'
+      goto :sixth, :if => 'tmlvar:three != tmlvar:four'
+      on :f1 => :seventh, '00' => :eighth
+      
+      display do
+        r = ""
+        r.concat link_to("Third", :action => 'third')
+        r.concat link_to("Fourth", :anchor => :fourth)
+        r
+      end
+    end)
+  end
+  
+  def test_all_possible_variants_with_block
+    setup_variants
+    @scr.every_possible_variant { |condition, destination| assert_possible_variant_is_correct(condition, destination) }
+    assert_all_possible_variants_were_found
+    document.remove_screen @scr
+  end
+  
+  def test_all_possible_variants_without_block
+    setup_variants
+    variants = @scr.every_possible_variant
+    variants.each { |destination, condition| assert_possible_variant_is_correct(condition, destination) }
+    assert_all_possible_variants_were_found
+    document.remove_screen @scr
+  end
+  
+  private
+  def assert_possible_variant_is_correct(condition, destination)
+    destination = destination.to_s
+    destination = destination[1..-1] if destination[0] == ?#
+    @hyperlinks ||= []
+    @default ||= nil
+    @others ||= []
+    
+    assert !@expected_variants.keys.select{ |d| d.to_s == destination }.empty?,
+                 "Shouldn't be a variant: #{destination.inspect}, expected one of #{@expected_variants.keys.inspect}"
+    case condition
+      when :hyperlink
+        assert !@hyperlink_variants.keys.select {|i| i.to_s == destination}.empty?,
+                 "Shouldn't be a hyperlink: #{destination.inspect}"
+        @hyperlinks << destination unless @hyperlinks.include? destination
+      when :default
+        assert_nil @default, "Found more than one default: #{@default.inspect} and #{destination.inspect}"
+        @default = destination
+      else # some TML condition
+        assert !@other_variants.keys.select {|i| i == destination}.empty?,
+                 "Shouldn't be a TML condition: #{destination.inspect}"
+        @others << destination unless @others.include? destination
+    end
+    true
+  end
+  
+  def assert_all_possible_variants_were_found
+    assert((@hyperlinks - @hyperlink_variants.keys).empty?,
+          "Hyperlinks not found: #{(@hyperlinks - @hyperlink_variants.keys).join("; ")}")
+    assert_not_nil @default, "Did not find a default"
+    assert((@others - @other_variants.keys).empty?,
+          "TML conditional variants not found: #{(@others - @other_variants.keys).join("; ")}")
+    true
+  end
+end

data/app_generators/rtml/templates/rtml/test/core/tml_document_test.rb

@@ -0,0 +1,53 @@
+require File.join(File.dirname(__FILE__), "..", "rtml_test_helper")
+
+class TMLDocumentTest < Rtml::Debug::RtmlCoreUnitTest
+  def test_includes_work_properly
+    document.includes :stylesheet, "/stylesheets/rtml/pretty.css"
+    document.includes :css, :source => "/stylesheets/rtml/pretty.css"
+    document.includes :source => "/stylesheets/rtml/pretty.css", :type => :stylesheet
+    document.includes :tml, :source => "/tml/error_screens.tml"
+    document.includes :rtml, :source => "/rtml_app_controller/get_terminal_info.rtml"
+
+    document.includes :tml, "/tml/error_screens.tml"
+    document.includes :tml, :source => 'errors/500'
+    document.includes :rtml, :source => 'errors/500'
+    document.includes :action => :errors, :id => 500
+    document.includes :tml, :source => { :action => :errors, :id => 500 }
+    
+    document.includes "/tml/error_screens.tml"
+    document.includes "/tml/error_screens.rtml"
+    document.includes "/stylesheets/rtml/pretty.css"
+  end
+
+  def test_element_protects_all_instance_variables
+    arr = (document.instance_variables - document.protected_instance_variables)
+    assert(arr.empty?, "Expected empty array, found #{arr.inspect}")
+  end
+
+  def test_sets_default_screen
+    document.default_screen :init
+    assert document.default_screen == :init, "Expected :init, found #{document.default_screen}"
+  end
+
+  def test_creates_screen
+    document.screen :test_screen do
+      display "this is a test screen"
+    end
+    assert document.screen_defined?(:test_screen), "Screen :test_screen was not created"
+  end
+
+  def test_aliases_screen
+    document.screen :test_screen do
+      display "this is a test screen"
+    end
+    document.alias_screen :test_screen, :aliased
+    assert document.screen_defined?(:aliased), "Screen :aliased was not created"
+  end
+
+  def test_caches_properly
+    document.cache false
+    assert((not document.cache), "Expected document to deny caching, found #{document.cache}")
+    document.cache true
+    assert document.cache == true, "Expected document to allow caching"
+  end
+end

data/app_generators/rtml/templates/rtml/test/functional/beryl_controller_test.rb

@@ -0,0 +1,13 @@
+require File.join(File.dirname(__FILE__), "..", "rtml_test_helper")
+
+class BerylControllerTest < Rtml::Debug::RtmlControllerTestCase
+  def setup
+    @controller = BerylController.new
+  end
+  
+  def test_get_index_is_valid
+    get :index, :format => :rtml
+    assert_valid_tml
+    assert_all_variables_declared
+  end
+end

data/app_generators/rtml/templates/rtml/test/functional/btmlpa_controller_test.rb

@@ -0,0 +1,13 @@
+require File.join(File.dirname(__FILE__), "..", "rtml_test_helper")
+
+class Rtml::BtmlpaControllerTest < Rtml::Debug::RtmlControllerTestCase
+  def setup
+    @controller = Rtml::Oe::BtmlpaController.new
+  end
+  
+  def test_get_terminal_info_is_valid
+    get :index, :format => :rtml
+    assert_valid_tml
+    assert_all_variables_declared
+  end
+end

data/app_generators/rtml/templates/rtml/test/functional/magcard_demo_controller_test.rb

@@ -0,0 +1,20 @@
+require File.join(File.dirname(__FILE__), "..", "rtml_test_helper")
+
+class MagcardDemoControllerTest < Rtml::Debug::RtmlControllerTestCase
+  def setup
+    @controller = Rtml::MagcardDemoController.new
+  end
+  
+  def test_index_is_valid
+    get :index, :format => :rtml
+    assert_valid_tml
+    assert_all_variables_declared
+  end
+  
+  def test_authorized_is_valid
+    get :authorized, :format => :rtml, :card => { :cardholder_name => "NA" }
+    assert_valid_tml
+    assert_all_variables_declared
+  end
+  
+end

data/app_generators/rtml/templates/rtml/test/functional/rtml_app_controller_test.rb

@@ -0,0 +1,9 @@
+require File.join(File.dirname(__FILE__), "..", "rtml_test_helper")
+
+class Rtml::RtmlAppControllerTest < Rtml::Debug::RtmlControllerTestCase
+  def test_get_terminal_info_is_valid
+    get :get_terminal_info, :format => :rtml
+    assert_valid_tml
+    assert_all_variables_declared
+  end
+end

data/app_generators/rtml/templates/rtml/test/functional/rtml_routing_test.rb

@@ -0,0 +1,19 @@
+require File.join(File.dirname(__FILE__), "..", "rtml_test_helper")
+
+class Rtml::RtmlAppControllerTest < Rtml::Debug::RtmlControllerTestCase
+  def test_rtml_format_route
+    opts = { :controller => "beryl", :action => "test", :format => "rtml", :id => '5' }
+    assert_routing "/beryl/test.rtml.5", opts
+
+    opts.delete :id
+    assert_routing "/beryl/test.rtml", opts
+  end
+
+  def test_default_format_route
+    opts = { :controller => "beryl", :action => "test", :id => '5'}
+    assert_routing "/beryl/test/5", opts
+
+    opts.delete :id
+    assert_routing "/beryl/test", opts
+  end
+end

data/app_generators/rtml/templates/rtml/test/functional/tml_controller_params_test.rb

@@ -0,0 +1,20 @@
+require File.join(File.dirname(__FILE__), "..", "rtml_test_helper")
+
+class Rtml::TmlControllerParamsTest < Rtml::Debug::RtmlControllerTestCase
+  def setup
+    @controller = Rtml::TmlAppController.new
+  end
+  
+##### FIXME: Removing this test because I can't remember what it was for. Code doesn't seem to match the method name. If stuff starts breaking, check here! #####
+=begin
+  def test_get_terminal_info_is_valid
+    # FIXME: Find somewhere better to put this test data. Fixtures, perhaps?
+    postdata = '<?xml version="1.0" encoding="ISO-8859-1"?>' + "\n"
+    postdata += '<tmlpost post_id="13104" date="12 11 2009 07:54:42 GMT" itid="51005848" xmlns="http://www.ingenico.co.uk/tml"><postvar name="transaction_type" type="string" value="Credit"/><postvar name="manual_entry" type="integer" value="0"/><postvar name="card.cvv.value" type="string" value=""/><postvar name="card.cvv.reason_skipped" type="string" value=""/><postvar name="approval_code" type="string" value=""/><postvar name="reference_num" type="string" value=""/><postvar name="card.avs.zip" type="string" value=""/><postvar name="card.cardholder_name" type="string" value=" PAYMENTECH TEST CARD     "/><postvar name="card.effective_date" type="date" value=""/><postvar name="card.expiry_date" type="date" value="01 12 2010 00:00:00 GMT"/><postvar name="card.input_type" type="integer" value="1"/><postvar name="card.issue_number" type="integer" value="0"/><postvar name="card.issuer_name" type="string" value="NA"/><postvar name="card.pan" type="string" value="4536055022727704"/><postvar name="card.scheme" type="string" value="VISA"/><postvar name="card.pin" type="string" value=""/><postvar name="card.emv.aac" type="opaque" value=""/><postvar name="card.emv.aid" type="string" value=""/><postvar name="card.emv.aip" type="integer" value="0"/><postvar name="card.emv.app_pan_seq" type="string" value=""/><postvar name="card.emv.arqc" type="opaque" value=""/><postvar name="card.emv.atc" type="integer" value="0"/><postvar name="card.emv.auc" type="integer" value="0"/><postvar name="card.emv.cvmr" type="opaque" value=""/><postvar name="card.emv.iac_default" type="opaque" value=""/><postvar name="card.emv.iac_denial" type="opaque" value=""/><postvar name="card.emv.iac_online" type="opaque" value=""/><postvar name="card.emv.iad" type="opaque" value=""/><postvar name="card.emv.iso_track2" type="opaque" value=""/><postvar name="card.emv.last_attempt" type="integer" value="0"/><postvar name="card.emv.signature" type="integer" value="0"/><postvar name="card.emv.tc" type="opaque" value=""/><postvar name="card.emv.tvr" type="opaque" value=""/><postvar name="card.emv.unumber" type="integer" value="0"/><postvar name="card.pin.length" type="integer" value="0"/><postvar name="card.pin.smid" type="string" value=""/><postvar name="card.pin.array" type="integer" value="0"/><postvar name="card.mag.iso1_track" type="string" value="B4536055022727704^ PAYMENTECH TEST CARD^1012120049065502272772"/><postvar name="card.mag.iso2_track" type="string" value="4536055022727704=10121200490600000002"/><postvar name="card.mag.iso3_track" type="string" value=""/><postvar name="card.mag.service_code" type="string" value="120"/><postvar name="card.parser.type" type="string" value="mag"/><postvar name="card.parser.reject_reason" type="string" value=""/><postvar name="card.parser.verdict" type="string" value="online"/><postvar name="card.parser.cvm" type="string" value=""/><postvar name="card.parser.cvr" type="string" value="failed"/><postvar name="oebr.submit_mode" type="string" value="online"/><postvar name="oebr.time_zone" type="integer" value="0"/><postvar name="payment.trans_type" type="string" value="debit"/><postvar name="payment.amount" type="integer" value="1234"/><postvar name="payment.amount_other" type="integer" value="0"/></tmlpost>'
+    post :index, postdata, :format => :rtml
+    # test that the date fields respond_to? :to_i -- this seems to be a linux-specific issue
+    
+    assert_response :success
+  end
+=end
+end

data/app_generators/rtml/templates/rtml/test/rtml_test_helper.rb

@@ -0,0 +1,44 @@
+ENV["RAILS_ENV"] = "test"
+require File.expand_path(File.dirname(__FILE__) + "/../../../../config/environment")
+require 'test_help'
+unless $PRINTED_VERSION
+  puts
+  puts
+  puts "Current version of RTML is #{Rtml::VERSION::STRING}"
+  $PRINTED_VERSION = true
+end
+
+class ActiveSupport::TestCase
+  # Transactional fixtures accelerate your tests by wrapping each test method
+  # in a transaction that's rolled back on completion.  This ensures that the
+  # test database remains unchanged so your fixtures don't have to be reloaded
+  # between every test method.  Fewer database queries means faster tests.
+  #
+  # Read Mike Clark's excellent walkthrough at
+  #   http://clarkware.com/cgi/blosxom/2005/10/24#Rails10FastTesting
+  #
+  # Every Active Record database supports transactions except MyISAM tables
+  # in MySQL.  Turn off transactional fixtures in this case; however, if you
+  # don't care one way or the other, switching from MyISAM to InnoDB tables
+  # is recommended.
+  #
+  # The only drawback to using transactional fixtures is when you actually 
+  # need to test transactions.  Since your test is bracketed by a transaction,
+  # any transactions started in your code will be automatically rolled back.
+  self.use_transactional_fixtures = true
+
+  # Instantiated fixtures are slow, but give you @david where otherwise you
+  # would need people(:david).  If you don't want to migrate your existing
+  # test cases which use the @david style and don't mind the speed hit (each
+  # instantiated fixtures translates to a database query per test method),
+  # then set this back to true.
+  self.use_instantiated_fixtures  = false
+
+  # Setup all fixtures in test/fixtures/*.(yml|csv) for all tests in alphabetical order.
+  #
+  # Note: You'll currently still have to declare fixtures explicitly in integration tests
+  # -- they do not yet inherit this setting
+  fixtures :all
+
+  # Add more helper methods to be used by all tests here...
+end

data/app_generators/rtml/templates/rtml/test/validation/predefined_variable_rule_parser_test.rb

@@ -0,0 +1,11 @@
+require File.join(File.dirname(__FILE__), "..", "rtml_test_helper")
+
+class PredefinedVariableRuleParserTest < Test::Unit::TestCase
+  def setup
+    @parser = Rtml::Validation::PredefinedVariableRuleParser.new("predefined_tml_variables")
+  end
+  
+  def test_loads_all_vars_successfully
+    assert @parser.to_a.length > 0 #== 183
+  end
+end

data/app_generators/rtml/templates/rtml/uninstall.rb

@@ -0,0 +1 @@
+# Uninstall hook code here

data/app_generators/rtml/templates/rtml/update.rb

@@ -0,0 +1,57 @@
+# This file is an update hook. When RTML is run in development mode, during startup,
+# it will request this file from the RTML GitHub repository and eval it. This file
+# will check the remote (github) version of RTML against the installed version, and
+# report to the user if there is an update available. The reason this file is requested
+# from the repository instead of being run offline is so that, in future versions, this
+# file can be updated. One such use might be something like prompting the user for
+# whether or not they want to upgrade, and then performing the upgrade automatically.
+# Another such use might be to prompt the user for whether or not to disable searching
+# for updates completely, without setting any environment flags. (I'm not ready to
+# implement that now, but evaling this file remotely will allow me to implement it
+# at some future date without concern.)
+
+# Updating is a relatively low priority item. If anything unexpected happens -- an error,
+# or RAILS_ROOT isn't defined, or RTML isn't active -- then simply do nothing. The only
+# exception to this is if $VERBOSE is true; in that case, let the user know what's up
+# but don't raise an error.
+module RtmlUpdateCheck
+  class RtmlUpdateFailure < RuntimeError; end
+
+  # don't do this in production, because that'd be a dumb idea.
+  if ENV['RAILS_ENV'] != 'production' and ENV['RTML_UPDATE'] != false
+    begin
+      if defined? RAILS_ROOT
+        REMOTE_VERSION = open("http://github.com/sinisterchipmunk/rtml/raw/master/lib/rtml/version.rb").read
+
+        rx = /MAJOR\s*=\s*(\d+).*MINOR\s*=\s*(\d+).*TINY\s*=\s*(\d+)/m
+        REMOTE_VERSION =~ rx
+        rmaj, rmin, rtin = $~[1].to_i, $~[2].to_i, $~[3].to_i
+        rstr = [rmaj, rmin, rtin].join(".")
+
+        if Rtml::VERSION::STRING < rstr
+          Rails.logger.warn "Note: There is a newer version of RTML available! You can update to #{rstr} by running:"
+          Rails.logger.warn ""
+          Rails.logger.warn "    ruby script/plugin install --force http://github.com/sinisterchipmunk/rtml.git"
+          Rails.logger.warn "    rake rtml:migrate"
+          Rails.logger.warn ""
+          Rails.logger.warn "You can disable this message by adding the following to your config/environment.rb:"
+          Rails.logger.warn "    ENV['RTML_UPDATE'] = false"
+          Rails.logger.warn ""
+          Rails.logger.warn "You are currently using RTML v#{Rtml::VERSION::STRING}"
+        end
+      else raise RtmlUpdateFailure, "RAILS_ROOT not defined"
+      end
+    rescue RtmlUpdateFailure => err
+      # no backtraces
+      Rails.logger.warn "Could not check for RTML updates: #{err.message}"
+    rescue
+      # log backtraces for any other kind of error, because it's probably a real one
+      err = $!
+      Rails.logger.warn "Error occurred while checking for RTML updates: #{err.message}"
+      Rails.logger.warn err.backtrace.join("\n\t")
+    end
+  end
+end
+
+nil
+

data/bin/rtml

@@ -0,0 +1,36 @@
+#!/usr/bin/env ruby
+
+require 'rubygems'
+require 'rubigen'
+
+ext = (RUBY_PLATFORM =~ /(win32|mingw)/) ? '.bat' : ''
+args = ARGV.dup
+
+if %w(-v --version).include? args.first
+  require 'rtml/version'
+  puts "#{File.basename($0)} #{Rtml::VERSION}"
+  exit(0)
+end
+
+result = system "rails#{ext} #{args.join(" ")}"
+if $?.to_i != 0 || result == false
+  puts result || "Internal error executing command: is Rails installed?"
+  exit
+end
+
+require 'rubigen/scripts/generate'
+source = RubiGen::PathSource.new(:application,
+  File.join(File.dirname(__FILE__), "../app_generators"))
+
+RubiGen::Base.reset_sources
+RubiGen::Base.append_sources source
+RubiGen::Scripts::Generate.new.run(ARGV, :generator => 'rtml')
+
+Dir.chdir args.first do
+  result = system("rake#{ext} rails:template LOCATION=./rails_template.rb")
+  if $?.to_i != 0 || result == false
+    puts result || "Internal error executing command: is Rake installed?"
+    exit
+  end
+  File.delete("rails_template.rb")
+end

data/lib/rtml.rb

@@ -0,0 +1,4 @@
+$:.unshift(File.dirname(__FILE__)) unless
+  $:.include?(File.dirname(__FILE__)) || $:.include?(File.expand_path(File.dirname(__FILE__)))
+module Rtml
+end

data/script/console

@@ -0,0 +1,10 @@
+#!/usr/bin/env ruby
+# File: script/console
+irb = RUBY_PLATFORM =~ /(:?mswin|mingw)/ ? 'irb.bat' : 'irb'
+
+libs =  " -r irb/completion"
+# Perhaps use a console_lib to store any extra methods I may want available in the cosole
+# libs << " -r #{File.dirname(__FILE__) + '/../lib/console_lib/console_logger.rb'}"
+libs <<  " -r #{File.dirname(__FILE__) + '/../lib/rtml.rb'}"
+puts "Loading rtml gem"
+exec "#{irb} #{libs} --simple-prompt"

data/script/destroy

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+APP_ROOT = File.expand_path(File.join(File.dirname(__FILE__), '..'))
+
+begin
+  require 'rubigen'
+rescue LoadError
+  require 'rubygems'
+  require 'rubigen'
+end
+require 'rubigen/scripts/destroy'
+
+ARGV.shift if ['--help', '-h'].include?(ARGV[0])
+RubiGen::Base.use_component_sources! [:rubygems, :newgem, :newgem_theme, :test_unit]
+RubiGen::Scripts::Destroy.new.run(ARGV)