saulolso-activeadmin 0.2.2

data/spec/unit/application_spec.rb

@@ -0,0 +1,67 @@
+require 'spec_helper'
+require 'fileutils'
+
+describe ActiveAdmin::Application do
+
+  let(:application) do
+    ActiveAdmin::Application.new.tap do |app|
+      # Manually override the load paths becuase RSpec messes these up
+      app.load_paths = [File.expand_path('app/admin', Rails.root)]
+    end
+  end
+
+  it "should have a default load path of ['app/admin']" do
+    application.load_paths.should == [File.expand_path('app/admin', Rails.root)]
+  end
+
+  it "should remove app/admin from the autoload path to remove the possibility of conflicts" do
+    ActiveSupport::Dependencies.autoload_paths.should_not include(File.join(Rails.root, "app/admin"))
+  end
+
+  it "should remove app/admin from the eager load paths (Active Admin deals with loading)" do
+    Rails.application.config.eager_load_paths.should_not include(File.join(Rails.root, "app/admin"))
+  end
+
+  it "should store the site's title" do
+    application.site_title.should == ""
+  end
+
+  it "should set the site title" do
+    application.site_title = "New Title"
+    application.site_title.should == "New Title"
+  end
+
+  it "should have a view factory" do
+    application.view_factory.should be_an_instance_of(ActiveAdmin::ViewFactory)
+  end
+
+  it "should have deprecated admin notes by default" do 
+    application.admin_notes.should be_nil
+  end
+
+  it "should have admin notes in admin namespace by default" do
+    application.allow_comments_in.should == [:admin]
+  end
+
+  it "should have no default current_user_method" do
+    application.current_user_method.should == false
+  end
+
+  it "should have no default authentication method" do
+    application.authentication_method.should == false
+  end
+
+  describe "files in load path" do
+    it "should load files in the first level directory" do
+      application.files_in_load_path.should include(File.expand_path("app/admin/dashboards.rb", Rails.root))
+    end
+
+    it "should load files from subdirectories" do
+      FileUtils.mkdir_p(File.expand_path("app/admin/public", Rails.root))
+      test_file = File.expand_path("app/admin/public/posts.rb", Rails.root)
+      FileUtils.touch(test_file)
+      application.files_in_load_path.should include(test_file)
+    end
+  end
+
+end

data/spec/unit/arbre/html/element_finder_methods_spec.rb

@@ -0,0 +1,54 @@
+require 'spec_helper'
+
+describe Arbre::HTML::Element, "Finder Methods" do
+  include Arbre::HTML
+  let(:assigns){ {} }
+
+  describe "finding elements by tag name" do
+
+    it "should return 0 when no elements exist" do
+      div.get_elements_by_tag_name("li").size.should == 0
+    end
+
+    it "should return a child element" do
+      html = div do
+        ul
+        li
+        ul
+      end
+      elements = html.get_elements_by_tag_name("li")
+      elements.size.should == 1
+      elements[0].should be_instance_of(Arbre::HTML::Li)
+    end
+
+    it "should return multple child elements" do
+      html = div do
+        ul
+        li
+        ul
+        li
+      end
+      elements = html.get_elements_by_tag_name("li")
+      elements.size.should == 2
+      elements[0].should be_instance_of(Arbre::HTML::Li)
+      elements[1].should be_instance_of(Arbre::HTML::Li)
+    end
+
+    it "should return children's child elements" do
+      html = div do
+        ul
+        li do
+          li
+        end
+      end
+      elements = html.get_elements_by_tag_name("li")
+      elements.size.should == 2
+      elements[0].should be_instance_of(Arbre::HTML::Li)
+      elements[1].should be_instance_of(Arbre::HTML::Li)
+      elements[1].parent.should == elements[0]
+    end
+  end
+
+  describe "finding an element by id"
+  describe "finding an element by a class name"
+end

data/spec/unit/arbre/html/element_spec.rb

@@ -0,0 +1,224 @@
+require 'spec_helper'
+require 'active_admin/arbre/element'
+
+describe Arbre::HTML::Element do
+  include Arbre::HTML
+
+  let(:assigns){ {} }
+  let(:element){ Arbre::HTML::Element.new }
+
+  context "when initialized" do
+    it "should have no children" do
+      element.children.should be_empty
+    end
+    it "should have no parent" do
+      element.parent.should be_nil
+    end
+    it "should have no document" do
+      element.document.should be_nil
+    end
+    it "should respond to the HTML builder methods" do
+      element.should respond_to(:span)
+    end
+    it "should have a set of local assigns" do
+      element = Arbre::HTML::Element.new :hello => "World"
+      element.assigns[:hello].should == "World"
+    end
+    it "should have an empty hash with no local assigns" do
+      element.assigns.should == {}
+    end
+  end
+
+  describe "passing in a helper object" do
+    let(:element){ Arbre::HTML::Element.new(nil, action_view) }
+    it "should call methods on the helper object and return TextNode objects" do
+      element.content_tag(:div).should == "<div></div>"
+    end
+
+    it "should raise a NoMethodError if not found" do
+      lambda {
+        element.a_method_that_doesnt_exist
+      }.should raise_error(NoMethodError)
+    end
+  end
+
+  describe "passing in assigns" do
+    let(:assigns){ {:post => Post.new(:title => "Hello")} }
+    it "should be accessible via a method call" do
+      post.should be_an_instance_of(Post)
+    end
+  end
+
+  describe "adding a child" do
+    let(:child){ Arbre::HTML::Element.new }
+    before do
+      element.add_child child
+    end
+
+    it "should add the child to the parent" do
+      element.children.first.should == child
+    end
+
+    it "should set the parent of the child" do
+      child.parent.should == element
+    end
+
+    context "when the child is nil" do
+      let(:child){ nil }
+      it "should not add the child" do
+        element.children.should be_empty
+      end
+    end
+
+    context "when the child is a string" do
+      let(:child){ "Hello World" }
+      it "should add as a TextNode" do
+        element.children.first.should be_instance_of(Arbre::HTML::TextNode)
+        element.children.first.to_html.should == "Hello World"
+      end
+    end
+  end
+
+  describe "setting the content" do
+
+    context "when a string" do
+      before do
+        element.add_child "Hello World"
+        element.content = "Goodbye"
+      end
+      it "should clear the existing children" do
+        element.children.size.should == 1
+      end
+
+      it "should add the string as a child" do
+        element.children.first.to_html.should == "Goodbye"
+      end
+
+      it "should html escape the string" do
+        string = "Goodbye <br />"
+        element.content = string
+        element.content.to_html.should == "Goodbye &lt;br /&gt;"
+      end
+    end
+
+    context "when a tag" do
+      before do
+        element.content = h2("Hello")
+      end
+      it "should set the content tag" do
+        element.children.first.should be_an_instance_of(Arbre::HTML::H2)
+      end
+      it "should set the tags parent" do
+        element.children.first.parent.should == element
+      end
+    end
+
+    context "when an array of tags" do
+      before do
+        element.content = [ul,div]
+      end
+
+      it "should set the content tag" do
+        element.children.first.should be_an_instance_of(Arbre::HTML::Ul)
+      end
+      it "should set the tags parent" do
+        element.children.first.parent.should == element
+      end
+    end
+
+  end
+
+  describe "setting the parent" do
+    let(:parent) do
+      doc = Arbre::HTML::Document.new
+      parent = Arbre::HTML::Element.new
+      doc << parent
+      parent
+    end
+    before { element.parent = parent }
+
+    it "should set the parent" do
+      element.parent.should == parent
+    end
+    it "should set the document to the parent's document" do
+      element.document.should == parent.document
+    end
+  end
+
+  describe "rendering to html" do
+    it "should render the children collection" do
+      element.children.should_receive(:to_html).and_return("content")
+      element.to_html.should == "content"
+    end
+  end
+
+  describe "adding elements together" do
+
+    context "when both elements are tags" do
+      let(:collection){ h1 + h2}
+
+      it "should return an instance of Collection" do
+        collection.should be_an_instance_of(Arbre::HTML::Collection)
+      end
+
+      it "should return the elements in the collection" do
+        collection.size.should == 2
+        collection.first.should be_an_instance_of(Arbre::HTML::H1)
+        collection[1].should be_an_instance_of(Arbre::HTML::H2)
+      end
+    end
+
+    context "when the left is a collection and the right is a tag" do
+      let(:collection){ Arbre::HTML::Collection.new([h1, h2]) + h3}
+
+      it "should return an instance of Collection" do
+        collection.should be_an_instance_of(Arbre::HTML::Collection)
+      end
+
+      it "should return the elements in the collection flattened" do
+        collection.size.should == 3
+        collection[0].should be_an_instance_of(Arbre::HTML::H1)
+        collection[1].should be_an_instance_of(Arbre::HTML::H2)
+        collection[2].should be_an_instance_of(Arbre::HTML::H3)
+      end
+    end
+
+    context "when the right is a collection and the left is a tag" do
+      let(:collection){ h1 + Arbre::HTML::Collection.new([h2,h3]) }
+
+      it "should return an instance of Collection" do
+        collection.should be_an_instance_of(Arbre::HTML::Collection)
+      end
+
+      it "should return the elements in the collection flattened" do
+        collection.size.should == 3
+        collection[0].should be_an_instance_of(Arbre::HTML::H1)
+        collection[1].should be_an_instance_of(Arbre::HTML::H2)
+        collection[2].should be_an_instance_of(Arbre::HTML::H3)
+      end
+    end
+
+    context "when the left is a tag and the right is a string" do
+      let(:collection){ h1 + "Hello World"}
+
+      it "should return an instance of Collection" do
+        collection.should be_an_instance_of(Arbre::HTML::Collection)
+      end
+
+      it "should return the elements in the collection" do
+        collection.size.should == 2
+        collection[0].should be_an_instance_of(Arbre::HTML::H1)
+        collection[1].should be_an_instance_of(Arbre::HTML::TextNode)
+      end
+    end
+
+    context "when the left is a string and the right is a tag" do
+      let(:collection){ "hello World" + h1}
+
+      it "should return a string" do
+        collection.strip.chomp.should == "hello World<h1></h1>"
+      end
+    end
+  end
+
+end

data/spec/unit/arbre/html/tag_attributes_spec.rb

@@ -0,0 +1,61 @@
+require 'spec_helper'
+
+describe Arbre::HTML::Tag, "Attributes" do
+  include Arbre::HTML
+  let(:assigns){ {} }
+
+  let(:tag){ Arbre::HTML::Tag.new }
+
+  describe "attributes" do
+    before { tag.build :id => "my_id" }
+
+    it "should have an attributes hash" do
+      tag.attributes.should == {:id => "my_id"}
+    end
+
+    it "should render the attributes to html" do
+      tag.to_html.should == <<-HTML
+<tag id="my_id"></tag>
+HTML
+    end
+
+    it "should get an attribute value" do
+      tag.attr(:id).should == "my_id"
+    end
+
+    describe "#has_attribute?" do
+      context "when the attribute exists" do
+        it "should return true" do
+          tag.has_attribute?(:id).should == true
+        end
+      end
+
+      context "when the attribute does not exist" do
+        it "should return false" do
+          tag.has_attribute?(:class).should == false
+        end
+      end
+    end
+
+    it "should remove an attribute" do
+      tag.attributes.should == {:id => "my_id"}
+      tag.remove_attribute(:id).should == "my_id"
+      tag.attributes.should == {}
+    end
+  end
+
+  describe "rendering attributes" do
+    it "should html safe the attribute values" do
+      tag.set_attribute(:class, "\">bad things!")
+      tag.to_html.should == <<-HTML
+<tag class="&quot;&gt;bad things!"></tag>
+HTML
+    end
+    it "should should escape the attribute names" do
+      tag.set_attribute(">bad", "things")
+      tag.to_html.should == <<-HTML
+<tag &gt;bad="things"></tag>
+HTML
+    end
+  end
+end

data/spec/unit/arbre/html/tag_spec.rb

@@ -0,0 +1,63 @@
+require 'spec_helper'
+
+describe Arbre::HTML::Tag do
+  include Arbre::HTML
+  let(:assigns){ {} }
+
+  let(:tag){ Arbre::HTML::Tag.new }
+
+  describe "building a new tag" do
+    before { tag.build "Hello World", :id => "my_id" }
+
+    it "should set the contents to a string" do
+      tag.content.should == "Hello World"
+    end
+
+    it "should set the hash of options to the attributes" do
+      tag.attributes.should == { :id => "my_id" }
+    end
+  end
+
+  describe "creating a tag 'for' an object" do
+    let(:model_name){ mock(:singular => "resource_class")}
+    let(:resource_class){ mock(:model_name => model_name) }
+    let(:resource){ mock(:class => resource_class, :to_key => ['5'])}
+
+    before do
+      tag.build :for => resource
+    end
+    it "should set the id to the type and id" do
+      tag.id.should == "resource_class_5"
+    end
+    it "should add a class name" do
+      tag.class_list.should include("resource_class")
+    end
+  end
+
+  describe "css class names" do
+    it "should add a class" do
+      tag.add_class "hello_world"
+      tag.class_names.should == "hello_world"
+    end
+
+    it "should remove_class" do
+      tag.add_class "hello_world"
+      tag.class_names.should == "hello_world"
+      tag.remove_class "hello_world"
+      tag.class_names.should == ""
+    end
+
+    it "should not add a class if it already exists" do
+      tag.add_class "hello_world"
+      tag.add_class "hello_world"
+      tag.class_names.should == "hello_world"
+    end
+
+    it "should seperate classes with space" do
+      tag.add_class "hello world"
+      tag.class_list.size.should == 2
+    end
+  end
+
+
+end

data/spec/unit/arbre/html_spec.rb

@@ -0,0 +1,210 @@
+require 'spec_helper'
+
+describe Arbre::HTML do
+  include Arbre::HTML
+
+  let(:assigns){ {} }
+
+  it "should render a single element" do
+    content = span("Hello World")
+    content.to_html.should == <<-HTML
+<span>Hello World</span>
+HTML
+  end
+
+  it "should render a child element" do
+    content = span do
+      span "Hello World"
+    end
+    content.to_html.should == <<-HTML
+<span>
+  <span>Hello World</span>
+</span>
+HTML
+  end
+
+  it "should render an unordered list" do
+    content = ul do
+      li "First"
+      li "Second"
+      li "Third"
+    end
+    content.to_html.should == <<-HTML
+<ul>
+  <li>First</li>
+  <li>Second</li>
+  <li>Third</li>
+</ul>
+HTML
+  end
+
+  it "should return the correct object" do
+    list_1 = ul
+    list_2 = li
+    list_1.should be_instance_of(Arbre::HTML::Ul)
+    list_2.should be_instance_of(Arbre::HTML::Li)
+  end
+
+  it "should allow local variables inside the tags" do
+    first = "First"
+    second = "Second"
+    content = ul do
+      li first
+      li second
+    end
+    content.to_html.should == <<-EOS
+<ul>
+  <li>First</li>
+  <li>Second</li>
+</ul>
+EOS
+  end
+
+  it "should add children and nested" do
+    content = div do
+      ul
+      li do
+        li
+      end
+    end
+    content.to_html.should == <<-HTML
+<div>
+  <ul></ul>
+  <li>
+    <li></li>
+  </li>
+</div>
+HTML
+  end
+
+  it "should pass the element in to the block if asked for" do
+    content = div do |d|
+      d.ul do
+        li
+      end
+    end
+    content.to_html.should == <<-HTML
+<div>
+  <ul>
+    <li></li>
+  </ul>
+</div>
+HTML
+  end
+
+  it "should move content tags between parents" do
+    content = div do
+      span(ul(li))
+    end
+    content.to_html.should == <<-HTML
+<div>
+  <span>
+    <ul>
+      <li></li>
+    </ul>
+  </span>
+</div>
+HTML
+  end
+
+  it "should add content to the parent if the element is passed into block" do
+    content = div do |d|
+      d.id = "my-tag"
+      ul do
+        li
+      end
+    end
+    content.to_html.should == <<-HTML
+<div id="my-tag">
+  <ul>
+    <li></li>
+  </ul>
+</div>
+HTML
+  end
+
+  it "should have the parent set on it" do
+    item = nil
+    list = ul do
+      li "Hello"
+      item = li "World"
+    end
+    item.parent.should == list
+  end
+
+  it "should set a string content return value with no children" do
+    li do
+      "Hello World"
+    end.to_html.should == <<-HTML
+<li>Hello World</li>
+HTML
+  end
+
+  describe "text nodes" do
+    it "should turn strings into text nodes" do
+      li do
+        "Hello World"
+      end.children.first.should be_instance_of(Arbre::HTML::TextNode)
+    end
+  end
+
+  describe "self-closing nodes" do
+    it "should not self-close script tags" do
+      tag = script :type => 'text/javascript'
+      tag.to_html.should == <<-HTML
+<script type="text/javascript"></script>
+HTML
+    end
+    it "should self-close meta tags" do
+      tag = meta :content => "text/html; charset=utf-8"
+      tag.to_html.should == <<-HTML
+<meta content="text/html; charset=utf-8\"/>
+HTML
+    end
+    it "should self-close link tags" do
+      tag = link :rel => "stylesheet"
+      tag.to_html.should == <<-HTML
+<link rel="stylesheet"/>
+HTML
+    end
+  end
+
+  describe "html safe" do
+    it "should escape the contents" do
+      span("<br />").to_html.should == <<-HTML
+<span>&lt;br /&gt;</span>
+HTML
+    end
+
+    it "should return html safe strings" do
+      span("<br />").to_html.should be_html_safe
+    end
+
+    it "should not escape html passed in" do
+      span(span("<br />")).to_html.should == <<-HTML
+<span>
+  <span>&lt;br /&gt;</span>
+</span>
+HTML
+    end
+
+    it "should escape string contents when passed in block" do
+      span {
+        span {
+          "<br />"
+        }
+      }.to_html.should == <<-HTML
+<span>
+  <span>&lt;br /&gt;</span>
+</span>
+HTML
+    end
+
+    it "should escape the contents of attributes" do
+      span(:class => "<br />").to_html.should == <<-HTML
+<span class="&lt;br /&gt;"></span>
+HTML
+    end
+  end
+
+end