Updated to svn tags/tracks-1.6

vendor/plugins/arts/lib/arts.rb

@@ -0,0 +1,133 @@
+module Arts
+  include ActionView::Helpers::PrototypeHelper
+  include ActionView::Helpers::ScriptaculousHelper
+  include ActionView::Helpers::JavaScriptHelper
+    
+  include ActionView::Helpers::UrlHelper
+  include ActionView::Helpers::TagHelper
+    
+  def assert_rjs(action, *args, &block)
+    respond_to?("assert_rjs_#{action}") ?
+      send("assert_rjs_#{action}", *args) :
+      assert_response_contains(create_generator.send(action, *args, &block), 
+         generic_error(action, args))
+  end
+  
+  def assert_no_rjs(action, *args, &block)
+    assert_raises(Test::Unit::AssertionFailedError) { assert_rjs(action, *args, &block) }
+  end
+  
+  def assert_rjs_insert_html(*args)
+    position = args.shift
+    item_id = args.shift
+    
+    content = extract_matchable_content(args)
+    
+    unless content.blank?
+      case content
+        when Regexp
+          assert_match Regexp.new("new Insertion\.#{position.to_s.camelize}(.*#{item_id}.*,.*#{content.source}.*);"),
+                       @response.body
+        when String
+          assert_response_contains("new Insertion.#{position.to_s.camelize}(\"#{item_id}\", #{content});",
+                 "No insert_html call found for \n" +
+                 "     position: '#{position}' id: '#{item_id}' \ncontent: \n" +
+                 "#{content}\n" +
+                 "in response:\n#{@response.body}")
+        else
+          raise "Invalid content type"
+      end
+    else
+      assert_match Regexp.new("new Insertion\.#{position.to_s.camelize}(.*#{item_id}.*,.*?);"), 
+                   @response.body
+    end
+  end
+  
+  def assert_rjs_replace_html(*args)
+    div = args.shift
+    content = extract_matchable_content(args)
+       
+    unless content.blank?
+      case content
+        when Regexp
+          assert_match Regexp.new("Element.update(.*#{div}.*,.*#{content.source}.*);"),
+                       @response.body
+        when String
+          assert_response_contains("Element.update(\"#{div}\", #{content});", 
+                 "No replace_html call found on div: '#{div}' and content: \n#{content}\n" +
+                 "in response:\n#{@response.body}")
+        else
+          raise "Invalid content type"
+      end
+    else
+      assert_match Regexp.new("Element.update(.*#{div}.*,.*?);"), @response.body
+    end
+  end
+  
+  def assert_rjs_replace(*args)
+    div = args.shift
+    content = extract_matchable_content(args)
+    
+    unless content.blank?
+      case content
+        when Regexp
+          assert_match Regexp.new("Element.replace(.*#{div}.*,.*#{content.source}.*);"),
+                       @response.body
+        when String
+          assert_response_contains("Element.replace(\"#{div}\", #{content});", 
+                 "No replace call found on div: '#{div}' and content: \n#{content}\n" +
+                 "in response:\n#{@response.body}")
+        else
+          raise "Invalid content type"
+      end
+    else
+      assert_match Regexp.new("Element.replace(.*#{div}.*,.*?);"), @response.body
+    end
+  end
+  
+  # To deal with [] syntax. I hate JavaScriptProxy so.. SO very much
+  def assert_rjs_page(*args)
+    content = build_method_chain!(args)
+    assert_match Regexp.new(Regexp.escape(content)), @response.body, 
+                 "Content did not include:\n #{content.to_s}"
+  end
+  
+  protected
+  
+  def assert_response_contains(str, message)
+     assert @response.body.to_s.index(str), message
+  end
+  
+  def build_method_chain!(args)
+    content = create_generator.send(:[], args.shift) # start $('some_id')....
+    
+    while !args.empty?
+      if (method = args.shift.to_s) =~ /(.*)=$/
+        content = content.__send__(method, args.shift)
+        break
+      else
+        content = content.__send__(method)
+        content = content.__send__(:function_chain).first if args.empty?
+      end
+    end
+    
+    content
+  end
+  
+  def create_generator
+    block = Proc.new { |*args| yield *args if block_given? } 
+    JavaScriptGenerator.new self, &block
+  end
+  
+  def generic_error(action, args)
+    "#{action} with args [#{args.join(" ")}] does not show up in response:\n#{@response.body}"
+  end
+  
+  def extract_matchable_content(args)
+    if args.size == 1 and args.first.is_a? Regexp
+      return args.first
+    else
+      return create_generator.send(:arguments_for_call, args)
+    end
+  end
+end