typus 3.0.12 → 3.1.0.rc1

data/test/lib/typus/controller/actions_test.rb

@@ -0,0 +1,141 @@
+require "test_helper"
+
+class ActionsTest < ActiveSupport::TestCase
+
+  include Typus::Controller::Actions
+
+  context "add_resource_action" do
+
+    should "work" do
+      output = add_resource_action("something")
+      assert_equal [["something"]], @resource_actions
+    end
+
+    should "work when no params are set" do
+      add_resource_action()
+      assert @resource_actions.empty?
+    end
+
+  end
+
+  context "prepend_resource_action" do
+
+    should "work without args" do
+      prepend_resource_action()
+      assert @resource_actions.empty?
+    end
+
+    should "work with args" do
+      prepend_resource_action("something")
+      assert_equal [["something"]], @resource_actions
+    end
+
+    should "work prepending an action without args" do
+      add_resource_action("something")
+      prepend_resource_action()
+      assert_equal [["something"]], @resource_actions
+    end
+
+    should "work prepending an action with args" do
+      add_resource_action("something")
+      prepend_resource_action("something_else")
+      assert_equal [["something_else"], ["something"]], @resource_actions
+    end
+
+  end
+
+  context "append_resource_action" do
+
+    should "work without args" do
+      append_resource_action()
+      assert @resource_actions.empty?
+    end
+
+    should "work with args" do
+      append_resource_action("something")
+      assert_equal [["something"]], @resource_actions
+    end
+
+    should "work appending an action without args" do
+      add_resource_action("something")
+      append_resource_action()
+      assert_equal [["something"]], @resource_actions
+    end
+
+    should "work appending an action with args" do
+      add_resource_action("something")
+      append_resource_action("something_else")
+      assert_equal [["something"], ["something_else"]], @resource_actions
+    end
+
+  end
+
+  # FIXME: Cleanup all test after this line.
+
+  context "add_resources_action" do
+
+    should "work" do
+      add_resources_action("something")
+      assert_equal [["something"]], @resources_actions
+    end
+
+    should "work when no params are set" do
+      add_resources_action()
+      assert @resources_actions.empty?
+    end
+
+  end
+
+  context "prepend_resources_action" do
+
+    should "work without args" do
+      prepend_resources_action()
+      assert @resources_actions.empty?
+    end
+
+    should "work with args" do
+      prepend_resources_action("something")
+      assert_equal [["something"]], @resources_actions
+    end
+
+    should "work prepending an action without args" do
+      add_resources_action("something")
+      prepend_resources_action()
+      assert_equal [["something"]], @resources_actions
+    end
+
+    should "work prepending an action with args" do
+      add_resources_action("something")
+      prepend_resources_action("something_else")
+      assert_equal [["something_else"], ["something"]], @resources_actions
+    end
+
+  end
+
+  context "append_resources_action" do
+
+    should "work without args" do
+      append_resources_action()
+      assert @resources_actions.empty?
+    end
+
+    should "work with args" do
+      append_resources_action("something")
+      assert_equal [["something"]], @resources_actions
+    end
+
+    should "work appending an action without args" do
+      add_resources_action("something")
+      append_resources_action()
+      assert_equal [["something"]], @resources_actions
+    end
+
+    should "work appending an action with args" do
+      add_resources_action("something")
+      append_resources_action("something_else")
+      assert_equal [["something"], ["something_else"]], @resources_actions
+    end
+
+  end
+
+end

data/test/lib/typus/controller/associations_test.rb

@@ -0,0 +1,7 @@
+require "test_helper"
+
+class AssociationsTest < ActiveSupport::TestCase
+
+  include Typus::Controller::Associations
+
+end

data/test/lib/typus/controller/autocomplete_test.rb

@@ -0,0 +1,7 @@
+require "test_helper"
+
+class AutocompleteTest < ActiveSupport::TestCase
+
+  include Typus::Controller::Autocomplete
+
+end

data/test/lib/typus/controller/filters_test.rb

@@ -0,0 +1,73 @@
+require "test_helper"
+
+class FiltersTest < ActiveSupport::TestCase
+
+  include Typus::Controller::Filters
+
+  context "add_predefined_filter" do
+
+    should "work without args" do
+      add_predefined_filter()
+      assert @predefined_filters.empty?
+    end
+
+    should "work with args" do
+      add_predefined_filter("something")
+      assert_equal [["something"]], @predefined_filters
+    end
+
+  end
+
+  context "prepend_predefined_filter" do
+
+    should "work without args" do
+      prepend_predefined_filter()
+      assert @predefined_filters.empty?
+    end
+
+    should "work with args" do
+      prepend_predefined_filter("something")
+      assert_equal [["something"]], @predefined_filters
+    end
+
+    should "work prepending an action without args" do
+      add_predefined_filter("something")
+      prepend_predefined_filter()
+      assert_equal [["something"]], @predefined_filters
+    end
+
+    should "work prepending an action with args" do
+      add_predefined_filter("something")
+      prepend_predefined_filter("something_else")
+      assert_equal [["something_else"], ["something"]], @predefined_filters
+    end
+
+  end
+
+  context "append_predefined_filter" do
+
+    should "work without args" do
+      append_predefined_filter()
+      assert @predefined_filters.empty?
+    end
+
+    should "work with args" do
+      append_predefined_filter("something")
+      assert_equal [["something"]], @predefined_filters
+    end
+
+    should "work appending an action without args" do
+      add_predefined_filter("something")
+      append_predefined_filter()
+      assert_equal [["something"]], @predefined_filters
+    end
+
+    should "work appending an action with args" do
+      add_predefined_filter("something")
+      append_predefined_filter("something_else")
+      assert_equal [["something"], ["something_else"]], @predefined_filters
+    end
+
+  end
+
+end

data/test/lib/typus/controller/format_test.rb

@@ -0,0 +1,7 @@
+require "test_helper"
+
+class FormatTest < ActiveSupport::TestCase
+
+  include Typus::Controller::Format
+
+end

data/test/lib/typus/i18n_test.rb

@@ -0,0 +1,13 @@
+require "test_helper"
+
+class I18nTest < ActiveSupport::TestCase
+
+  test "t" do
+    assert_equal "Missing Translation", Typus::I18n.t("Missing Translation")
+  end
+
+  test "default_locale" do
+    assert Typus::I18n.default_locale(:en)
+  end
+
+end

data/test/lib/typus/orm/active_record/class_methods_test.rb

@@ -0,0 +1,381 @@
+require "test_helper"
+
+class ClassMethodsTest < ActiveSupport::TestCase
+
+  context "model_fields" do
+
+    should "be an ActiveSupport::OrderedHash" do
+      assert TypusUser.model_fields.instance_of?(ActiveSupport::OrderedHash)
+    end
+
+    should "verify TypusUser model_fields" do
+      expected = [[:id, :integer],
+                  [:first_name, :string],
+                  [:last_name, :string],
+                  [:role, :string],
+                  [:email, :string],
+                  [:status, :boolean],
+                  [:token, :string],
+                  [:salt, :string],
+                  [:crypted_password, :string],
+                  [:preferences, :string],
+                  [:created_at, :datetime],
+                  [:updated_at, :datetime]]
+
+      assert_equal expected.map { |i| i.first }, TypusUser.model_fields.keys
+      assert_equal expected.map { |i| i.last }, TypusUser.model_fields.values
+    end
+
+    should "verify Post model_fields" do
+      expected = [[:id, :integer],
+                  [:title, :string],
+                  [:body, :text],
+                  [:status, :string],
+                  [:favorite_comment_id, :integer],
+                  [:published_at, :datetime],
+                  [:typus_user_id, :integer],
+                  [:published, :boolean],
+                  [:created_at, :datetime],
+                  [:updated_at, :datetime]]
+
+      assert_equal expected.map { |i| i.first }, Post.model_fields.keys
+      assert_equal expected.map { |i| i.last }, Post.model_fields.values
+    end
+
+  end
+
+  context "model_relationships" do
+
+    should "be an ActiveSupport::OrderedHash" do
+      assert TypusUser.model_relationships.instance_of?(ActiveSupport::OrderedHash)
+    end
+
+    should "verify Post model_relationships" do
+      expected = [[:comments, :has_many],
+                  [:categories, :has_and_belongs_to_many],
+                  [:user, nil]]
+      expected.each do |key, value|
+        assert_equal value, Post.model_relationships[key]
+      end
+    end
+
+  end
+
+  context "typus_description" do
+
+    should "return the description of a model" do
+      assert_equal "System Users Administration", TypusUser.typus_description
+    end
+
+  end
+
+  context "typus_fields_for" do
+
+    should "accept strings" do
+      assert_equal %w(email role status), TypusUser.typus_fields_for("list").keys
+    end
+
+    should "accept symbols" do
+      assert_equal %w(email role status), TypusUser.typus_fields_for(:list).keys
+    end
+
+    should "return list fields for TypusUser" do
+      expected = [["email", :string],
+                  ["role", :selector],
+                  ["status", :boolean]]
+
+      assert_equal expected.map { |i| i.first }, TypusUser.typus_fields_for(:list).keys
+      assert_equal expected.map { |i| i.last }, TypusUser.typus_fields_for(:list).values
+    end
+
+    should "return form fields for TypusUser" do
+      expected = [["first_name", :string],
+                  ["last_name", :string],
+                  ["role", :selector],
+                  ["email", :string],
+                  ["password", :password],
+                  ["password_confirmation", :password],
+                  ["locale", :selector]]
+
+      assert_equal expected.map { |i| i.first }, TypusUser.typus_fields_for(:new).keys
+      assert_equal expected.map { |i| i.last }, TypusUser.typus_fields_for(:form).values
+    end
+
+    should "return form fields for Asset" do
+      expected = [["caption", :string],
+                  ["dragonfly", :file],
+                  ["dragonfly_required", :file]]
+
+      assert_equal expected.map { |i| i.first }, Asset.typus_fields_for(:special).keys
+      assert_equal expected.map { |i| i.last }, Asset.typus_fields_for(:special).values
+    end
+
+    should "raise a RuntimeError when model does not have configuration" do
+      assert_raises RuntimeError do
+        Class.new(ActiveRecord::Base).typus_fields_for(:form)
+      end
+    end
+
+    should "return relationship fields for TypusUser" do
+      expected = %w(first_name last_name role email locale)
+      assert_equal expected, TypusUser.typus_fields_for(:relationship).keys
+    end
+
+    should "return undefined fields for TypusUser" do
+      expected = %w(first_name last_name role email locale)
+      assert_equal expected, TypusUser.typus_fields_for(:undefined).keys
+    end
+
+    should "return fields for new Asset" do
+      expected = %w(dragonfly dragonfly_required paperclip paperclip_required)
+      assert_equal expected, Asset.typus_fields_for(:new).keys
+    end
+
+    should "return fields for edit Asset" do
+      expected = %w(caption dragonfly dragonfly_required paperclip paperclip_required)
+      assert_equal expected, Asset.typus_fields_for(:edit).keys
+    end
+
+    should "work for transversal fields" do
+      expected = [["email", :string],
+                  ["post", :belongs_to],
+                  ["post_id", :integer],
+                  ["spam", :boolean],
+                  ["post.title", :transversal]]
+
+      assert_equal expected.map { |i| i.first }, Comment.typus_fields_for(:list).keys
+      assert_equal expected.map { |i| i.last }, Comment.typus_fields_for(:list).values
+    end
+
+  end
+
+  context "typus_filters" do
+
+    should "return filters for TypusUser" do
+      expected = [["status", :boolean],
+                  ["role", :string]]
+
+      assert_equal expected.map { |i| i.first }.join(", "), Typus::Configuration.config["TypusUser"]["filters"]
+      assert_equal expected.map { |i| i.first }, TypusUser.typus_filters.keys
+      assert_equal expected.map { |i| i.last }, TypusUser.typus_filters.values
+    end
+
+    should "return filters for Post" do
+      expected = [["published", :boolean],
+                  ["status", :string],
+                  ["created_at", :datetime]]
+
+      assert_equal expected.map { |i| i.first }.join(", "), Typus::Configuration.config["Post"]["filters"]
+      assert_equal expected.map { |i| i.first }, Post.typus_filters.keys
+      assert_equal expected.map { |i| i.last }, Post.typus_filters.values
+    end
+
+  end
+
+  context "typus_actions_on" do
+
+    should "accept strings" do
+      assert_equal %w(cleanup), Post.typus_actions_on("index")
+    end
+
+    should "accept symbols" do
+      assert_equal %w(cleanup), Post.typus_actions_on(:index)
+    end
+
+    should "return actions on list for TypusUser" do
+      assert TypusUser.typus_actions_on(:list).empty?
+    end
+
+    should "return actions on edit for Post" do
+      assert_equal %w(send_as_newsletter preview), Post.typus_actions_on(:edit)
+    end
+
+  end
+
+  context "typus_options_for" do
+
+    should "accept strings" do
+      assert Post.typus_options_for("form_rows").eql?(15)
+    end
+
+    should "accept symbols" do
+      assert Post.typus_options_for(:form_rows).eql?(15)
+    end
+
+    should "return nil when options do not exist" do
+      assert_nil TypusUser.typus_options_for(:unexisting)
+    end
+
+    should "return options for Post" do
+      assert Post.typus_options_for(:form_rows).eql?(15)
+    end
+
+    should "return options for Page" do
+      assert Page.typus_options_for(:form_rows).eql?(25)
+    end
+
+    should "return sortable options as a boolean" do
+      assert Post.typus_options_for(:sortable)
+      assert !Page.typus_options_for(:sortable)
+    end
+
+  end
+
+  context "typus_application" do
+
+    should "return application for Post" do
+      assert_equal "CRUD Extended", Post.typus_application
+    end
+
+    should "return application for View" do
+      assert_equal "Unknown", View.typus_application
+    end
+
+  end
+
+  context "typus_field_options_for" do
+
+    should "verify on models" do
+      assert_equal [:status], Post.typus_field_options_for(:selectors)
+      assert_equal [:permalink], Post.typus_field_options_for(:read_only)
+      assert_equal [:created_at], Post.typus_field_options_for(:auto_generated)
+    end
+
+    should "return empty array for unexisting option" do
+      assert Post.typus_field_options_for(:unexisting).empty?
+    end
+
+  end
+
+  context "typus_boolean" do
+
+    should "accept strings" do
+      expected = [["Active", "true"], ["Inactive", "false"]]
+      assert_equal expected, TypusUser.typus_boolean("status")
+    end
+
+    should "accept symbols" do
+      expected = [["Active", "true"], ["Inactive", "false"]]
+      assert_equal expected, TypusUser.typus_boolean(:status)
+    end
+
+    should "return booleans for Post" do
+      expected = [["True", "true"], ["False", "false"]]
+      assert_equal expected, Post.typus_boolean(:status)
+    end
+
+    should "return booleans for Comment" do
+      expected = [["Yes, it's spam", "true"], ["No, it's not spam", "false"]]
+      assert_equal expected, Comment.typus_boolean(:spam)
+    end
+
+  end
+
+  context "typus_date_format" do
+
+    should "accept strings" do
+      assert_equal :default, Post.typus_date_format("unknown")
+    end
+
+    should "accept symbols" do
+      assert_equal :default, Post.typus_date_format(:unknown)
+    end
+
+    should "return date_format for Post" do
+      assert_equal :default, Post.typus_date_format
+      assert_equal :short, Post.typus_date_format(:created_at)
+    end
+
+  end
+
+  context "typus_template" do
+
+    should "accept strings" do
+      assert_equal "datepicker", Post.typus_template("published_at")
+    end
+
+    should "accept symbols" do
+      assert_equal "datepicker", Post.typus_template(:published_at)
+    end
+
+    should "return nil if template does not exist" do
+      assert_nil Post.typus_template(:created_at)
+    end
+
+  end
+
+  context "typus_defaults_for" do
+
+    should "accept strings" do
+      assert_equal %w(title), Post.typus_defaults_for("search")
+    end
+
+    should "accepts symbols" do
+      assert_equal %w(title), Post.typus_defaults_for(:search)
+    end
+
+    should "return default_for relationships on Post" do
+      assert_equal %w(categories comments views), Post.typus_defaults_for(:relationships)
+    end
+
+  end
+
+  context "typus_search_fields" do
+
+    should "return a hash with the search modifiers" do
+      search = ["=id", "^title", "body"]
+      Post.stubs(:typus_defaults_for).with(:search).returns(search)
+      expected = {"body"=>"@", "title"=>"^", "id"=>"="}
+      assert_equal expected, Post.typus_search_fields
+    end
+
+    should "return and empty hash" do
+      search = []
+      Post.stubs(:typus_defaults_for).with(:search).returns(search)
+      expected = {}
+      assert_equal expected, Post.typus_search_fields
+    end
+
+  end
+
+  context "typus_order_by" do
+
+    should "return defaults_for order_by on Post" do
+      assert_equal "posts.title ASC, posts.created_at DESC", Post.typus_order_by
+      assert_equal %w(title -created_at), Post.typus_defaults_for(:order_by)
+    end
+
+  end
+
+  context "typus_user_id?" do
+
+    should "exist on Post" do
+      assert Post.typus_user_id?
+    end
+
+    should "not exist on TypusUser" do
+      assert !TypusUser.typus_user_id?
+    end
+
+  end
+
+  context "read_model_config" do
+
+    should "return data for existing model" do
+      expected = {"application"=>"CRUD Extended",
+                  "fields"=>{"default"=>"caption, dragonfly, dragonfly_required",
+                             "special"=>"caption, dragonfly, dragonfly_required",
+                             "form"=>"caption, dragonfly, dragonfly_required, paperclip, paperclip_required",
+                             "new"=>"dragonfly, dragonfly_required, paperclip, paperclip_required"}}
+      assert_equal expected, Asset.read_model_config
+    end
+
+    should "raise error when model does not exist on configuration" do
+      assert_raises RuntimeError do
+        Article.read_model_config
+      end
+    end
+
+  end
+
+end