merb-admin 0.4.3

data/spec/models/datamapper/league.rb

@@ -0,0 +1,11 @@
+class League
+  include DataMapper::Resource
+  
+  property :id, Serial
+  property :created_at, DateTime
+  property :updated_at, DateTime
+  property :name, String, :nullable => false, :index => true
+  
+  has n, :divisions
+  has n, :teams
+end

data/spec/models/datamapper/player.rb

@@ -0,0 +1,21 @@
+class Player
+  include DataMapper::Resource
+
+  property :id, Serial
+  property :created_at, DateTime
+  property :updated_at, DateTime
+  property :deleted_at, ParanoidDateTime
+  property :team_id, Integer, :nullable => false, :index => true
+  property :name, String, :length => 100, :nullable => false
+  property :number, Integer, :nullable => false
+  property :position, Enum[:pitcher, :catcher, :first, :second, :third, :shortstop, :left, :center, :right]
+  property :sex, Enum[:male, :female]
+  property :batting_average, Float, :default => 0.0, :precision => 4, :scale => 3
+  property :injured, Boolean, :default => false
+  property :born_on, Date
+  property :wake_at, Time
+  property :notes, Text
+
+  belongs_to :team
+  has 1, :draft
+end

data/spec/models/datamapper/team.rb

@@ -0,0 +1,15 @@
+class Team
+  include DataMapper::Resource
+
+  property :id, Serial
+  property :created_at, DateTime
+  property :updated_at, DateTime
+  property :league_id, Integer, :nullable => false, :index => true
+  property :division_id, Integer, :nullable => false, :index => true
+  property :name, String, :nullable => false, :index => true
+  property :colors, Flag[:beige, :black, :blue, :bronze, :brown, :cool, :copper, :cream, :gold, :gray, :green, :khaki, :maroon, :midnight, :navy, :orange, :pink, :purple, :red, :silver, :tan, :turquoise, :violet, :white, :yellow]
+
+  belongs_to :league
+  belongs_to :division
+  has n, :players
+end

data/spec/requests/main_spec.rb

@@ -0,0 +1,475 @@
+require File.join(File.dirname(__FILE__), '..', 'spec_helper.rb')
+
+given "a player exists" do
+  @player = MerbAdmin::AbstractModel.new("Player").create(:team_id => rand(99999), :number => rand(99), :name => "Player 1", :sex => :male, :position => :pitcher)
+end
+
+given "a draft exists" do
+  @draft = MerbAdmin::AbstractModel.new("Draft").create(:player_id => rand(99999), :team_id => rand(99999), :date => Date.today, :round => rand(50), :pick => rand(30), :overall => rand(1500))
+end
+
+given "two players exist" do
+  @players = []
+  2.times do |i|
+    @players << MerbAdmin::AbstractModel.new("Player").create(:team_id => rand(99999), :number => rand(99), :name => "Player #{i}", :sex => :male, :position => :pitcher)
+  end
+end
+
+given "three teams exist" do
+  @teams = []
+  3.times do |i|
+    @teams << MerbAdmin::AbstractModel.new("Team").create(:league_id => rand(99999), :division_id => rand(99999), :name => "Team #{i}")
+  end
+end
+
+given "a player exists and a draft exists" do
+  @player = MerbAdmin::AbstractModel.new("Player").create(:team_id => rand(99999), :number => rand(99), :name => "Player 1", :sex => :male, :position => :pitcher)
+  @draft = MerbAdmin::AbstractModel.new("Draft").create(:player_id => rand(99999), :team_id => rand(99999), :date => Date.today, :round => rand(50), :pick => rand(30), :overall => rand(1500))
+end
+
+given "a player exists and three teams exist" do
+  @player = MerbAdmin::AbstractModel.new("Player").create(:team_id => rand(99999), :number => rand(99), :name => "Player 1", :sex => :male, :position => :pitcher)
+  @teams = []
+  3.times do |i|
+    @teams << MerbAdmin::AbstractModel.new("Team").create(:league_id => rand(99999), :division_id => rand(99999), :name => "Team #{i}")
+  end
+end
+
+given "a league exists and three teams exist" do
+  @league = League.create(:name => "League 1")
+  @teams = []
+  3.times do |i|
+    @teams << MerbAdmin::AbstractModel.new("Team").create(:league_id => rand(99999), :division_id => rand(99999), :name => "Team #{i}")
+  end
+end
+
+given "twenty players exist" do
+  @players = []
+  20.times do |i|
+    @players << MerbAdmin::AbstractModel.new("Player").create(:team_id => rand(99999), :number => rand(99), :name => "Player #{i}", :sex => :male, :position => :pitcher)
+  end
+end
+
+describe "MerbAdmin" do
+
+  before(:each) do
+    mount_slice
+    MerbAdmin::AbstractModel.new("Division").destroy_all!
+    MerbAdmin::AbstractModel.new("Draft").destroy_all!
+    MerbAdmin::AbstractModel.new("League").destroy_all!
+    MerbAdmin::AbstractModel.new("Player").destroy_all!
+    MerbAdmin::AbstractModel.new("Team").destroy_all!
+  end
+
+  describe "dashboard" do
+    before(:each) do
+      @response = request(url(:admin_dashboard))
+    end
+
+    it "should respond sucessfully" do
+      @response.should be_successful
+    end
+
+    it "should contain \"Site administration\"" do
+      @response.body.should contain("Site administration")
+    end
+  end
+
+  describe "list" do
+    before(:each) do
+      @response = request(url(:admin_list, :model_name => "player"))
+    end
+
+    it "should respond sucessfully" do
+      @response.should be_successful
+    end
+
+    it "should contain \"Select model to edit\"" do
+      @response.body.should contain("Select player to edit")
+    end
+  end
+
+  describe "list with 2 objects", :given => "two players exist" do
+    before(:each) do
+      MerbAdmin[:paginate] = true
+      MerbAdmin[:per_page] = 1
+      @response = request(url(:admin_list, :model_name => "player"))
+    end
+
+    it "should respond sucessfully" do
+      @response.should be_successful
+    end
+
+    it "should contain \"2 results\"" do
+      @response.body.should contain("2 players")
+    end
+  end
+
+  describe "list with 20 objects", :given => "twenty players exist" do
+    before(:each) do
+      MerbAdmin[:paginate] = true
+      MerbAdmin[:per_page] = 1
+      @response = request(url(:admin_list, :model_name => "player"))
+    end
+
+    it "should respond sucessfully" do
+      @response.should be_successful
+    end
+
+    it "should contain \"20 results\"" do
+      @response.body.should contain("20 players")
+    end
+  end
+
+  describe "list with 20 objects, page 8", :given => "twenty players exist" do
+    before(:each) do
+      MerbAdmin[:paginate] = true
+      MerbAdmin[:per_page] = 1
+      @response = request(url(:admin_list, :model_name => "player"), :params => {:page => 8})
+    end
+
+    it "should respond sucessfully" do
+      @response.should be_successful
+    end
+
+    it "should paginate correctly" do
+      @response.body.should contain(/1 2[^0-9]*5 6 7 8 9 10 11[^0-9]*19 20/)
+    end
+  end
+
+  describe "list with 20 objects, page 17", :given => "twenty players exist" do
+    before(:each) do
+      MerbAdmin[:paginate] = true
+      MerbAdmin[:per_page] = 1
+      @response = request(url(:admin_list, :model_name => "player"), :params => {:page => 17})
+    end
+
+    it "should respond sucessfully" do
+      @response.should be_successful
+    end
+
+    it "should paginate correctly" do
+      @response.body.should contain(/1 2[^0-9]*12 13 14 15 16 17 18 19 20/)
+    end
+  end
+
+  describe "list show all", :given => "two players exist" do
+    before(:each) do
+      MerbAdmin[:paginate] = true
+      MerbAdmin[:per_page] = 1
+      @response = request(url(:admin_list, :model_name => "player"), :params => {:all => true})
+    end
+
+    it "should respond sucessfully" do
+      @response.should be_successful
+    end
+  end
+
+  describe "new" do
+    before(:each) do
+      @response = request(url(:admin_new, :model_name => "player"))
+    end
+
+    it "should respond sucessfully" do
+      @response.should be_successful
+    end
+
+    it "should contain \"New model\"" do
+      @response.body.should contain("New player")
+    end
+  end
+
+  describe "new with has-one association", :given => "a draft exists" do
+    before(:each) do
+      @response = request(url(:admin_new, :model_name => "player"))
+    end
+
+    it "should respond sucessfully" do
+      @response.should be_successful
+    end
+  end
+
+  describe "new with has-many association", :given => "three teams exist" do
+    before(:each) do
+      @response = request(url(:admin_new, :model_name => "player"))
+    end
+
+    it "should respond sucessfully" do
+      @response.should be_successful
+    end
+  end
+
+  describe "edit", :given => "a player exists" do
+    before(:each) do
+      @response = request(url(:admin_edit, :model_name => "player", :id => @player.id))
+    end
+
+    it "should respond sucessfully" do
+      @response.should be_successful
+    end
+
+    it "should contain \"Edit model\"" do
+      @response.body.should contain("Edit player")
+    end
+  end
+
+  describe "edit with has-one association", :given => "a player exists and a draft exists" do
+    before(:each) do
+      @response = request(url(:admin_edit, :model_name => "player", :id => @player.id))
+    end
+
+    it "should respond sucessfully" do
+      @response.should be_successful
+    end
+  end
+
+  describe "edit with has-many association", :given => "a player exists and three teams exist" do
+    before(:each) do
+      @response = request(url(:admin_edit, :model_name => "player", :id => @player.id))
+    end
+
+    it "should respond sucessfully" do
+      @response.should be_successful
+    end
+  end
+
+
+  describe "edit with missing object" do
+    before(:each) do
+      @response = request(url(:admin_edit, :model_name => "player", :id => 1))
+    end
+
+    it "should raise NotFound" do
+      @response.status.should == 404
+    end
+  end
+
+  describe "create" do
+    before(:each) do
+      @response = request(url(:admin_create, :model_name => "player"), :method => "post", :params => {:player => {:name => "Jackie Robinson", :number => 42, :team_id => 1, :position => :second, :sex => :male}})
+    end
+
+    it "should redirect to list" do
+      @response.should redirect_to(url(:admin_list, :model_name => "player"))
+    end
+
+    it "should create a new object" do
+      MerbAdmin::AbstractModel.new("Player").first.should_not be_nil
+    end
+  end
+
+  describe "create and edit" do
+    before(:each) do
+      @response = request(url(:admin_create, :model_name => "player"), :method => "post", :params => {:player => {:name => "Jackie Robinson", :number => 42, :team_id => 1, :position => :second, :sex => :male}, :_continue => true})
+    end
+
+    it "should redirect to edit" do
+      @response.should redirect_to(url(:admin_edit, :model_name => "player", :id => MerbAdmin::AbstractModel.new("Player").first.id))
+    end
+
+    it "should create a new object" do
+      MerbAdmin::AbstractModel.new("Player").first.should_not be_nil
+    end
+  end
+
+  describe "create and add another" do
+    before(:each) do
+      @response = request(url(:admin_create, :model_name => "player"), :method => "post", :params => {:player => {:name => "Jackie Robinson", :number => 42, :team_id => 1, :position => :second, :sex => :male}, :_add_another => true})
+    end
+
+    it "should redirect to new" do
+      @response.should redirect_to(url(:admin_new, :model_name => "player"))
+    end
+
+    it "should create a new object" do
+      MerbAdmin::AbstractModel.new("Player").first.should_not be_nil
+    end
+  end
+
+  describe "create with has-one association", :given => "a draft exists" do
+    before(:each) do
+      @response = request(url(:admin_create, :model_name => "player"), :method => "post", :params => {:player => {:name => "Jackie Robinson", :number => 42, :team_id => 1, :position => :second, :sex => :male}, :associations => {:draft => @draft.id}})
+    end
+
+    it "should create a new object" do
+      MerbAdmin::AbstractModel.new("Player").first.should_not be_nil
+    end
+
+    it "should be associated with the correct object" do
+      MerbAdmin::AbstractModel.new("Player").first.draft.should == @draft
+    end
+  end
+
+  describe "create with has-many association", :given => "three teams exist" do
+    before(:each) do
+      @response = request(url(:admin_create, :model_name => "league"), :method => "post", :params => {:league => {:name => "National League"}, :associations => {:teams => [@teams[0].id, @teams[1].id]}})
+    end
+
+    it "should create a new object" do
+      MerbAdmin::AbstractModel.new("League").first.should_not be_nil
+    end
+
+    it "should be associated with the correct objects" do
+      MerbAdmin::AbstractModel.new("League").first.teams.should include(@teams[0])
+      MerbAdmin::AbstractModel.new("League").first.teams.should include(@teams[1])
+    end
+
+    it "should be not associated with an incorrect object" do
+      MerbAdmin::AbstractModel.new("League").first.teams.should_not include(@teams[2])
+    end
+  end
+
+  describe "create with invalid object" do
+    before(:each) do
+      @response = request(url(:admin_create, :model_name => "player"), :method => "post", :params => {:player => {}})
+    end
+
+    it "should contain an error message" do
+      @response.body.should contain("Player failed to be created")
+    end
+  end
+
+  describe "update", :given => "a player exists" do
+    before(:each) do
+      @response = request(url(:admin_update, :model_name => "player", :id => @player.id), :method => "put", :params => {:player => {:name => "Jackie Robinson", :number => 42, :team_id => 1, :sex => :male}})
+    end
+
+    it "should redirect to list" do
+      @response.should redirect_to(url(:admin_list, :model_name => "player"))
+    end
+
+    it "should update an object that already exists" do
+      MerbAdmin::AbstractModel.new("Player").first.name.should eql("Jackie Robinson")
+    end
+  end
+
+  describe "update and edit", :given => "a player exists" do
+    before(:each) do
+      @response = request(url(:admin_update, :model_name => "player", :id => @player.id), :method => "put", :params => {:player => {:name => "Jackie Robinson", :number => 42, :team_id => 1, :sex => :male}, :_continue => true})
+    end
+
+    it "should redirect to edit" do
+      @response.should redirect_to(url(:admin_edit, :model_name => "player", :id => @player.id))
+    end
+
+    it "should update an object that already exists" do
+      MerbAdmin::AbstractModel.new("Player").first.name.should eql("Jackie Robinson")
+    end
+  end
+
+  describe "update and add another", :given => "a player exists" do
+    before(:each) do
+      @response = request(url(:admin_update, :model_name => "player", :id => @player.id), :method => "put", :params => {:player => {:name => "Jackie Robinson", :number => 42, :team_id => 1, :sex => :male}, :_add_another => true})
+    end
+
+    it "should redirect to new" do
+      @response.should redirect_to(url(:admin_new, :model_name => "player"))
+    end
+
+    it "should update an object that already exists" do
+      MerbAdmin::AbstractModel.new("Player").first.name.should eql("Jackie Robinson")
+    end
+  end
+
+  describe "update with has-one association", :given => "a player exists and a draft exists" do
+    before(:each) do
+      @response = request(url(:admin_update, :model_name => "player", :id => @player.id), :method => "put", :params => {:player => {:name => "Jackie Robinson", :number => 42, :team_id => 1, :position => :second, :sex => :male}, :associations => {:draft => @draft.id}})
+    end
+
+    it "should update an object that already exists" do
+      MerbAdmin::AbstractModel.new("Player").first.name.should eql("Jackie Robinson")
+    end
+
+    it "should be associated with the correct object" do
+      MerbAdmin::AbstractModel.new("Player").first.draft.should == @draft
+    end
+  end
+
+  describe "update with has-many association", :given => "a league exists and three teams exist" do
+    before(:each) do
+      @response = request(url(:admin_update, :model_name => "league", :id => @league.id), :method => "put", :params => {:league => {:name => "National League"}, :associations => {:teams => [@teams[0].id, @teams[1].id]}})
+    end
+
+    it "should update an object that already exists" do
+      MerbAdmin::AbstractModel.new("League").first.name.should eql("National League")
+    end
+
+    it "should be associated with the correct objects" do
+      MerbAdmin::AbstractModel.new("League").first.teams.should include(@teams[0])
+      MerbAdmin::AbstractModel.new("League").first.teams.should include(@teams[1])
+    end
+
+    it "should not be associated with an incorrect object" do
+      MerbAdmin::AbstractModel.new("League").first.teams.should_not include(@teams[2])
+    end
+  end
+
+  describe "update with missing object" do
+    before(:each) do
+      @response = request(url(:admin_update, :model_name => "player", :id => 1), :method => "put", :params => {:player => {:name => "Jackie Robinson", :number => 42, :team_id => 1, :sex => :male}})
+    end
+
+    it "should raise NotFound" do
+      @response.status.should == 404
+    end
+  end
+
+  describe "update with invalid object", :given => "a player exists" do
+    before(:each) do
+      @response = request(url(:admin_update, :model_name => "player", :id => @player.id), :method => "put", :params => {:player => {:number => "a"}})
+    end
+
+    it "should contain an error message" do
+      @response.body.should contain("Player failed to be updated")
+    end
+  end
+
+  describe "delete", :given => "a player exists" do
+    before(:each) do
+      @response = request(url(:admin_delete, :model_name => "player", :id => @player.id))
+    end
+
+    it "should respond sucessfully" do
+      @response.should be_successful
+    end
+
+    it "should contain \"Delete model\"" do
+      @response.body.should contain("Delete player")
+    end
+  end
+
+  describe "delete with missing object" do
+    before(:each) do
+      @response = request(url(:admin_delete, :model_name => "player", :id => 1))
+    end
+
+    it "should raise NotFound" do
+      @response.status.should == 404
+    end
+  end
+
+  describe "destroy", :given => "a player exists" do
+    before(:each) do
+      @response = request(url(:admin_destroy, :model_name => "player", :id => @player.id), :method => "delete")
+    end
+
+    it "should redirect to list" do
+      @response.should redirect_to(url(:admin_list, :model_name => "player"))
+    end
+
+    it "should destroy an object" do
+      MerbAdmin::AbstractModel.new("Player").first.should be_nil
+    end
+  end
+
+  describe "destroy with missing object" do
+    before(:each) do
+      @response = request(url(:admin_destroy, :model_name => "player", :id => 1), :method => "delete")
+    end
+
+    it "should raise NotFound" do
+      @response.status.should == 404
+    end
+  end
+
+end

data/spec/spec_helper.rb

@@ -0,0 +1,112 @@
+require 'rubygems'
+require 'merb-core'
+require 'merb-slices'
+require 'merb-helpers'
+require 'merb-assets'
+require 'spec'
+
+# Add merb-admin.rb to the search path
+Merb::Plugins.config[:merb_slices][:auto_register] = true
+Merb::Plugins.config[:merb_slices][:search_path]   = File.join(File.dirname(__FILE__), '..', 'lib', 'merb-admin.rb')
+
+# Require merb-admin.rb explicitly so any dependencies are loaded
+require Merb::Plugins.config[:merb_slices][:search_path]
+
+# Using Merb.root below makes sure that the correct root is set for
+# - testing standalone, without being installed as a gem and no host application
+# - testing from within the host application; its root will be used
+Merb.start_environment(
+  :testing => true,
+  :adapter => 'runner',
+  :environment => ENV['MERB_ENV'] || 'test',
+  :merb_root => Merb.root,
+  :session_store => 'memory'
+)
+
+module Merb
+  module Test
+    module SliceHelper
+
+      # The absolute path to the current slice
+      def current_slice_root
+        @current_slice_root ||= File.expand_path(File.join(File.dirname(__FILE__), '..'))
+      end
+
+      # Whether the specs are being run from a host application or standalone
+      def standalone?
+        Merb.root == ::MerbAdmin.root
+      end
+
+      def setup_orm(orm = nil)
+        orm = set_orm(orm)
+        orm = orm.to_s.downcase.to_sym
+        case orm
+        when :activerecord
+          require 'activerecord'
+          require_models(orm)
+
+          unless ActiveRecord::Base.connected?
+            ActiveRecord::Base.establish_connection(:adapter => 'sqlite3', :database => ':memory:')
+            ActiveRecord::Migration.verbose = false
+            ActiveRecord::Migrator.run(:up, "schema/migrations/", 1)
+            ActiveRecord::Migrator.run(:up, "schema/migrations/", 2)
+            ActiveRecord::Migrator.run(:up, "schema/migrations/", 3)
+            ActiveRecord::Migrator.run(:up, "schema/migrations/", 4)
+            ActiveRecord::Migrator.run(:up, "schema/migrations/", 5)
+          end
+        when :datamapper
+          require 'dm-core'
+          require 'dm-types'
+          require 'dm-aggregates'
+          require 'dm-validations'
+          require_models(orm)
+
+          unless DataMapper::Repository.adapters.key?(:default)
+            DataMapper.setup(:default, 'sqlite3::memory:')
+            DataMapper.auto_migrate!
+          end
+        when :sequel
+          require 'sequel'
+        else
+          raise "MerbAdmin does not support the #{orm} ORM"
+        end
+        Merb.orm = orm
+      end
+
+      private
+
+      def require_models(orm = nil)
+        orm ||= set_orm
+        Dir.glob(File.dirname(__FILE__) / "models" / orm.to_s.downcase / Merb.glob_for(:model)).each do |model_filename|
+          require model_filename
+        end
+      end
+
+      def set_orm(orm = nil)
+        orm || ENV['MERB_ORM'] || (Merb.orm != :none ? Merb.orm : nil) || :datamapper
+      end
+
+    end
+  end
+end
+
+Spec::Runner.configure do |config|
+  config.include(Merb::Test::ViewHelper)
+  config.include(Merb::Test::RouteHelper)
+  config.include(Merb::Test::ControllerHelper)
+  config.include(Merb::Test::SliceHelper)
+  config.before(:each) do
+    setup_orm
+  end
+end
+
+# You can add your own helpers here
+#
+Merb::Test.add_helpers do
+  def mount_slice
+    if standalone?
+      Merb::Router.reset!
+      Merb::Router.prepare{add_slice(:merb_admin, :name_prefix => nil, :path_prefix => "admin", :default_routes => false)}
+    end
+  end
+end