rear 0.2.0

data/test/test__crud.rb

@@ -0,0 +1,81 @@
+
+module RearTest__CRUD
+  class App < E
+    include Rear
+    model Book
+  end
+
+  Spec.new App do
+    orm = RearORM.new(app.model, app.pkey)
+
+    Should 'create new item' do
+      name, about = random_string, random_string
+      post :crud, name: name, about: about
+      is(last_response).ok?
+      id = last_response.body.to_i
+
+      item = orm[id]
+      check(item).instance_of?(app.model)
+      expect(item.id) == id
+      expect(item.name.to_s) == name
+      expect(item.about.to_s) == about
+
+      Then 'update it' do
+        new_name = random_string
+        put :crud, id, name: new_name
+        is(last_response).ok?
+
+        item.reload
+        refute(item.name.to_s) == name
+        check(item.name.to_s) == new_name
+      end
+
+      And 'finally delete it' do
+        delete :crud, id
+        is(last_response).ok?
+        item = app[id]
+        is(item).nil?
+      end
+    end
+
+    Testing 'multiple delete' do
+
+      ids = (1..10).inject([]) {|f,c| post(:crud); f << last_response.body.to_i}
+      expect(ids.size) == 10
+      items = orm.filter(conditions: {app.pkey => ids})
+      expect(items.size) == ids.size
+
+      delete :delete_selected, items: ids.join(' ')
+      is(last_response).ok?
+      items =  orm.filter(conditions: {app.pkey => ids})
+      expect(items.size) == 0
+    end
+
+  end
+
+  class ReadOnlyBook < E
+    include Rear
+    model Book
+    readonly!
+  end
+  Spec.new ReadOnlyBook do
+    book, book_id = new_book
+
+    Should 'Prohibit items creation' do
+      name, about = random_string, random_string
+      post :crud, name: name, about: about
+      is(last_response).readonly_error?
+    end
+
+    Should 'prohibit updates' do
+      put :crud, book_id, name: random_string
+      is(last_response).readonly_error?
+    end
+
+    Should 'prohibit deletion' do
+      delete :crud, book_id
+      is(last_response).readonly_error?
+    end
+
+  end
+end

data/test/test__custom_templates.rb

@@ -0,0 +1,147 @@
+
+module RearTest__CustomTemplates
+
+  class SharedTemplates < E
+    include Rear
+    model Book
+    rear_templates 'templates/shared'
+    ipp 1000
+  end
+  Spec.new self do
+    app E.new {
+      mount SharedTemplates
+      root File.expand_path('..', __FILE__)
+    }
+    map SharedTemplates.base_url
+
+    item, item_id = new_book
+
+    Testing :pane do
+      get
+      is(last_response).ok?
+      expect( extract_elements ).any? {|e|
+        e.children.any? {|c|
+          c.to_s == '<p class="custom-shared-template">%s</p>' % item[:name]
+        }
+      }
+    end
+
+    Testing :editor do
+      get :edit, item_id
+      is(last_response).ok?
+      expect( extract_elements ).any? { |e|
+        e.children.any? {|c| 
+          c.to_s == '<input class="custom-shared-template" value="%s">' % item[:name]
+        }
+      }
+    end
+  end
+
+  class AdhocDefaultTemplate < E
+    include Rear
+    model Book
+    rear_templates 'templates/adhoc'
+    ipp 1000
+  end
+  Spec.new self do
+    app E.new {
+      mount AdhocDefaultTemplate
+      root File.expand_path('..', __FILE__)
+    }
+    map AdhocDefaultTemplate.base_url
+
+    item, item_id = new_book
+
+    Testing :pane do
+      get
+      is(last_response).ok?
+      expect( extract_elements ).any? {|e|
+        e.children.any? {|c|
+          c.to_s == '<p class="adhoc-default-template">%s</p>' % item[:name]
+        }
+      }
+    end
+
+    Testing :editor do
+      get :edit, item_id
+      is(last_response).ok?
+      expect( extract_elements ).any? { |e|
+        e.children.any? {|c| 
+          c.to_s == '<input class="adhoc-default-template" value="%s">' % item[:name]
+        }
+      }
+    end
+  end
+
+  class AdhocGivenTemplate < E
+    include Rear
+    model Book
+    rear_templates 'templates/adhoc'
+    input :name do
+      editor_template :name
+      pane_template   :name
+    end
+    ipp 1000
+  end
+  Spec.new self do
+    app E.new {
+      mount AdhocGivenTemplate
+      root File.expand_path('..', __FILE__)
+    }
+    map AdhocGivenTemplate.base_url
+
+    item, item_id = new_book
+
+    Testing :pane do
+      get
+      is(last_response).ok?
+      expect( extract_elements ).any? {|e|
+        e.children.any? {|c|
+          c.to_s == '<p class="adhoc-given-template">%s</p>' % item[:name]
+        }
+      }
+    end
+
+    Testing :editor do
+      get :edit, item_id
+      is(last_response).ok?
+      expect( extract_elements ).any? { |e|
+        e.children.any? {|c| 
+          c.to_s == '<input class="adhoc-given-template" value="%s">' % item[:name]
+        }
+      }
+    end
+  end
+
+
+  class ProcTemplate < E
+    include Rear
+    model Book
+    input :name do
+      pane_template   { item.name  }
+      editor_template { item.about }
+    end
+  end
+  Spec.new ProcTemplate do
+  
+    item, item_id = new_book()
+
+    Testing :pane do
+      get
+      is(last_response).ok?
+      expect( extract_elements ).any? {|e| 
+        e.children.any? {|c| c.to_s == item[:name]}
+      }
+    end
+
+    Testing :editor do
+      get :edit, item_id
+      is(last_response).ok?
+      expect( extract_elements ).any? do |e|
+        e.children.any? {|c| 
+          c.to_s == item[:about]
+        }
+      end
+    end
+  end
+end

data/test/test__filters.rb

@@ -0,0 +1,228 @@
+
+module RearTest__Filters
+  NAMES = %w[
+    Arthur Aaron Adler
+    Daniel Dante David
+    Edward Eliot Elvin
+  ]
+  
+  class BasicQuickFilterApp < E
+    include Rear
+    model Book
+
+    quick_filter :cover, :Soft, :Solid
+    quick_filter :colors, 'r' => 'Red Color', 'g' => :Green
+  end
+  Spec.new BasicQuickFilterApp do
+    
+    Testing 'filters provided as arguments' do    
+      %w[Soft Solid].map do |cover|
+        1.upto(rand(10)+1) { app.model.create(:cover => cover) }
+      end
+
+      cover = 'Soft'
+      items = count_books(:cover => cover)
+      expect(items) > 0
+      get quick_filters: {cover: cover}
+      is(last_response).ok?
+      expect(items) == extract_elements('.pane-item').size
+
+      cover = 'Solid'
+      items = count_books(cover: cover)
+      expect(items) > 0
+      get quick_filters: {cover: cover}
+      is(last_response).ok?
+      expect(items) == extract_elements('.pane-item').size
+    end
+
+    Testing 'filters provided as Hash' do
+      %w[r g].map do |color|
+        1.upto(rand(10)+1) { app.model.create(:colors => color) }
+      end
+
+      items = count_books( :colors => 'r')
+      expect(items) > 0
+      get quick_filters: {colors: 'Red Color'}
+      is(last_response).ok?
+      expect(items) == extract_elements('.pane-item').size
+
+      items = count_books( :colors => 'g')
+      expect(items) > 0
+      get quick_filters: {colors: 'Green'}
+      is(last_response).ok?
+      expect(items) == extract_elements('.pane-item').size
+    end
+
+  end
+
+
+  class AdvancedQuickFilterApp < E
+    include Rear
+    model Book
+
+    quick_filter :name, cmp: :like_, 'A' => :StartingwithA, 'Z' => 'Starting with Z'
+    quick_filter :colors, 'r' => :Red, [:like_, :g] => :GreenFirst
+  end
+
+  Spec.new AdvancedQuickFilterApp do
+    query_map = RearConstants::FILTERS__QUERY_MAP.call(app.orm)
+
+    Testing 'cmp passed as global option' do
+      %w[A Z].map do |letter|
+        1.upto(rand(10)+1) { app.model.create(:name => letter + random_string) }
+      end
+
+      query, value = query_map[:like_]
+      items = count_books( [query % :name, value % "A"])
+      expect(items) > 0
+      get quick_filters: {name: 'StartingwithA'}
+      is(last_response).ok?
+      expect(items) == extract_elements('.pane-item').size
+
+      items = count_books([query % :name, value % "Z"])
+      expect(items) > 0
+      get quick_filters: {name: 'Starting with Z'}
+      is(last_response).ok?
+      expect(items) == extract_elements('.pane-item').size
+    end
+
+    Testing 'cmp passed per filter' do
+      a = %w[
+        r 
+        r,g
+        g
+        g,r
+      ]
+      1.upto(50) do
+        app.model.create(:colors => a[rand(a.size)])
+      end
+
+      items = count_books( :colors => 'r')
+      expect(items) > 0
+      get quick_filters: {colors: 'Red'}
+      is(last_response).ok?
+      expect(items) == extract_elements('.pane-item').size
+
+      query, value = query_map[:like_]
+      items = count_books( [query % :colors, value % "g"])
+      expect(items) > 0
+      get quick_filters: {colors: 'GreenFirst'}
+      is(last_response).ok?
+      expect(items) == extract_elements('.pane-item').size
+    end
+  end
+
+  class LikeApp < E
+    include Rear
+    model Book
+    filter :name
+    filter :about, cmp: :unlike
+  end
+
+  Spec.new LikeApp do
+    
+    query_map = RearConstants::FILTERS__QUERY_MAP.call(app.orm)
+
+    (items = %w[abc123 abc456 abc789 foo bar]).each do |val|
+      app.model.create :name => val, :about => val
+    end
+
+    Ensure 'all items displayed without filters' do
+      get
+      is(last_response).ok?
+      elements = extract_elements
+      items.each do |name|
+        expect(elements).any? {|c| c.text == name}
+      end
+    end
+
+    Testing :like do
+      query, value = query_map[:like]
+      items = count_books [query % :name, value % 'abc']
+      expect(items) > 0
+      get filters: {name: {like: 'abc'}}
+      is(last_response).ok?
+      elements = extract_elements('.pane-item')
+      expect(elements.size) == items
+    end
+
+    Testing :unlike do
+      query, value = query_map[:unlike]
+      items = count_books [query % :about, value % 'abc']
+      get filters: {about: {unlike: 'abc'}}
+      is(last_response).ok?
+      elements = extract_elements('.pane-item')
+      expect(elements.size) == items
+    end
+  end
+
+  class EqlApp < E
+    include Rear
+    model Book
+    filter :name, cmp: :eql
+  end
+
+  Spec.new EqlApp do
+
+    1.upto(10) { app.model.create name: random_string }
+    item, item_id = new_book()
+
+    get
+    is(last_response).ok?
+    expect(extract_elements('.pane-item').size) > 1
+
+    get filters: {name: {eql: item.name}}
+    is(last_response).ok?
+    expect(extract_elements('.pane-item').size) == 1
+  
+  end
+
+  class DecorativeFiltersApp < E
+    include Rear
+    model Book
+
+    decorative_filter :letter, :select do
+      ('A'..'Z').to_a
+    end
+    filter :name, :select, cmp: :like do
+      filter?(:letter) ?
+        NAMES.select {|n| n =~ /\A#{filter(:letter)}/} : {}
+    end
+  end
+
+  Spec.new DecorativeFiltersApp do
+
+    selector = '.selectable[name="filters[name][like]"]'
+
+    get :html_filters
+    filters = extract_elements(selector)
+    expect(filters.size) == 1
+    is(filters.first.children.select {|c| c.attr(:value).to_s.size > 0}).empty?
+
+    %w[A D E].each do |letter|
+      get :html_filters, filters: {letter: {decorative: letter}}
+      is(last_response).ok?
+      filters = extract_elements(selector)
+      expect(filters.size) == 1
+      children = filters.first.children.select {|c| c.attr(:value).to_s.size > 0}
+      check(children.map {|c| c.text }.sort) ==
+        NAMES.select {|n| n =~ /\A#{letter}/}.sort
+    end
+  end
+
+  class InheritedType < E
+    include Rear
+    model Book
+    filter :created_at
+  end
+  
+  Spec.new InheritedType do
+    get
+    is(last_response).ok?
+    elements = extract_elements('.search-query')
+    expect(elements.select {|e|
+      e.attr(:name) == 'filters[created_at][eql]'
+    }.size) == 1
+  end
+
+end