rear 0.2.0

data/test/models/sq.rb

@@ -0,0 +1,58 @@
+connection = Sequel.sqlite
+Sequel::Model.db = connection
+
+connection.create_table :books_genres do |t|
+  t.integer :book_id
+  t.integer :genre_id
+end
+
+connection.create_table :genres do |t|
+  primary_key :id
+  t.string :name
+end
+
+connection.create_table :authors do |t|
+  primary_key :id
+  t.string :name
+end
+
+connection.create_table :books do |t|
+  primary_key :id
+  t.integer :author_id
+  t.string  :name
+  t.text    :about
+  t.string  :cover
+  t.string  :colors
+  t.date    :created_at
+end
+
+connection.create_table :states do |t|
+  primary_key :id
+  t.string :name
+  t.string :code
+end
+
+connection.create_table :cities do |t|
+  primary_key :id
+  t.string :name
+  t.string :state_code
+end
+
+class Author < Sequel::Model
+end
+
+class Genre < Sequel::Model
+end
+
+class Book < Sequel::Model
+  many_to_one :author
+  many_to_many :genres
+end
+
+class State < Sequel::Model
+  one_to_many :cities, key: :state_code, primary_key: :code
+end
+
+class City < Sequel::Model
+  many_to_one :state, key: :state_code, primary_key: :code
+end

data/test/setup.rb

@@ -0,0 +1,4 @@
+require 'fileutils'
+require 'bundler/setup'
+
+Bundler.require

data/test/templates/adhoc/book/editor/name.slim

@@ -0,0 +1 @@
+input.adhoc-given-template value=value

data/test/templates/adhoc/book/editor/string.slim

@@ -0,0 +1 @@
+input.adhoc-default-template value=value

data/test/templates/adhoc/book/pane/name.slim

@@ -0,0 +1 @@
+p.adhoc-given-template = value

data/test/templates/adhoc/book/pane/string.slim

@@ -0,0 +1 @@
+p.adhoc-default-template = value

data/test/templates/shared/shared-templates/editor/string.slim

@@ -0,0 +1 @@
+input.custom-shared-template value=value

data/test/templates/shared/shared-templates/pane/string.slim

@@ -0,0 +1 @@
+p.custom-shared-template = value

data/test/test__assocs.rb

@@ -0,0 +1,249 @@
+module RearTest__Assocs
+  class Books < E
+    include Rear
+    model Book
+  end
+
+  class Authors < E
+    include Rear
+    model Author
+  end
+
+  class Genres < E
+    include Rear
+    model Genre
+  end
+
+  Spec.new Authors do
+    Books.mount
+
+    book, book_id = new_book()
+    args = [
+      :reverse_assoc,
+      RearTest__Assocs::Books,
+      :belongs_to,
+      :author,
+      book_id
+    ]
+
+    Ensure 'no author attached' do
+      get app.route(*args, :attached)
+      is(last_response).ok?
+      are(extract_elements).empty?
+    end
+
+    author = Author.create(name: rand(2**64).to_s)
+
+    Should 'attach given author' do
+      post app.route(*args, target_item_id: author.id.to_s)
+      is(last_response).ok?
+
+      Ensure 'model updated' do
+        book.reload
+        expect(book.author_id) == author.id
+      end
+
+      Ensure 'frontend reflects updates' do
+        get app.route(*args, :attached)
+        is(last_response).ok?
+        expect { extract_elements.children }.any? do |c|
+          c.text == author.name.to_s
+        end
+      end
+    end
+
+    Should 'detach given author' do
+      delete app.route(*args)
+
+      Ensure 'model updated' do
+        book.reload
+        refute(book.author_id) == author.id
+      end
+
+      Ensure 'frontend reflects updates' do
+        get app.route(*args, :attached)
+        is(last_response).ok?
+        are(extract_elements).empty?
+      end
+    end
+  
+  end
+
+  Spec.new Genres do
+
+    book, book_id = new_book()
+    args = [
+      :reverse_assoc,
+      RearTest__Assocs::Books,
+      :has_many,
+      :genres,
+      book_id
+    ]
+
+    Ensure 'no genres attached' do
+      get app.route(*args, :attached)
+      is(last_response).ok?
+      are(extract_elements).empty?
+    end
+
+    genre = Genre.create(name: rand(2**64).to_s)
+
+    Should 'attach given genre' do
+      post app.route(*args, target_item_id: genre.id.to_s)
+
+      Ensure 'model updated' do
+        book.reload
+        does(book.genres).include? genre
+      end
+
+      Ensure 'frontend reflects updates' do
+        get app.route(*args, :attached)
+        is(last_response).ok?
+        expect { extract_elements.children }.any? do |c|
+          c.text == genre.name.to_s
+        end
+      end
+
+    end
+
+    Should 'detach given genre' do
+      delete app.route(*args, target_item_id: genre.id.to_s)
+
+      Ensure 'model updated' do
+        book.reload
+        refute(book.genres).include? genre
+      end
+
+      Ensure 'frontend reflects updates' do
+        get app.route(*args, :attached)
+        is(last_response).ok?
+        are(extract_elements).empty?
+      end
+    end
+  end
+
+  class CustomKeys
+    class Child < E
+      include Rear
+      model City
+    end
+
+    class Parent < E
+      include Rear
+      model State
+    end
+  end
+
+  Spec.new CustomKeys::Parent do
+    CustomKeys::Child.mount
+
+    state = State.create(name: 'California', code: 'CA')
+    city  = City.create
+    args  = [
+      :reverse_assoc,
+      CustomKeys::Child,
+      :belongs_to,
+      :state,
+      city.id
+    ]
+
+    Should 'set state to CA' do
+      post app.route(*args, target_item_id: state.id.to_s)
+
+      Ensure 'city updated' do
+        city.reload
+        expect(city.state_code) == state.code
+      end
+
+      Ensure 'frontend reflects updates' do
+        get app.route(*args, :attached)
+        is(last_response).ok?
+        expect { extract_elements.children }.any? do |c|
+          c.text == state.name
+        end
+      end
+
+    end
+  end
+
+  Spec.new CustomKeys::Child do
+
+    state  = State.create(name: 'New York', code: 'NY')
+    cities = ['Fulton', 'Niagara Falls'].map {|c| City.create(name: c)}
+    args   = [
+      :reverse_assoc,
+      CustomKeys::Parent,
+      :has_many,
+      :cities,
+      state.id
+    ]
+
+    Should 'attach cities to New York' do
+      cities.each do |city|
+        post app.route(*args, target_item_id: city.id.to_s)
+      end
+
+      Ensure 'cities updated' do
+        cities.each do |city|
+          city.reload
+          is(city.state_code) == state.code
+        end
+      end
+
+      Ensure 'frontend reflects updates' do
+        get app.route(*args, :attached)
+        is(last_response).ok?
+        cities_html = extract_elements.children
+        cities.each do |city|
+          expect(cities_html).any? do |c|
+            c.text == city.name
+          end
+        end
+      end
+    end
+
+  end
+
+  module ReadOnly
+    class Books < E
+      include Rear
+      model Book
+      readonly_assoc :author
+    end
+    class Authors < E
+      include Rear
+      model Author
+    end
+    Spec.new Authors do
+      Books.mount
+
+      book, book_id = new_book()
+      args = [
+        :reverse_assoc,
+        Books,
+        :belongs_to,
+        :author,
+        book_id
+      ]
+
+      Ensure 'no author attached' do
+        get app.route(*args, :attached)
+        is(last_response).ok?
+        are(extract_elements).empty?
+      end
+
+      author = Author.create(name: rand(2**64).to_s)
+
+      Should 'prohibit attaching' do
+        post app.route(*args, target_item_id: author.id.to_s)
+        is(last_response).readonly_error?
+      end
+
+      Should 'prohibit detaching' do
+        delete app.route(*args)
+        is(last_response).readonly_error?
+      end
+    end
+  end
+
+end

data/test/test__columns.rb

@@ -0,0 +1,269 @@
+
+module RearTest__Columns
+
+  class BasicApp < E
+    include Rear
+    model Book
+  end
+  Spec.new BasicApp do
+
+    item, item_id = new_book()
+
+    Testing :pane do
+      get
+      is(last_response).ok?
+      expect(extract_elements('.pane-item').size) > 0
+
+      elements = extract_elements
+      expect( elements ).any? {|e| e.text == item[:name].to_s }
+      expect( elements ).any? {|e| e.text == item[:about].to_s}
+    end
+
+    Testing :editor do
+      get :edit, item_id
+      is(last_response).ok?
+      elements = extract_elements
+      expect( elements ).any? do |e|
+        e.children.any? {|c| c.name == 'input' && c.attr(:value) == item[:name].to_s }
+      end
+      expect( elements ).any? do |e|
+        e.children.any? {|c| c.name == 'textarea' && c.text == item[:about].to_s }
+      end
+    end
+  end
+
+
+  class SelectType < E
+    include Rear
+    model Book
+    input :cover, :select do
+      options('Solid', 'Soft')
+    end
+  end
+  Spec.new SelectType do
+
+    item, item_id = new_book( :cover => 'Soft')
+
+    Testing :pane do
+      get
+      check( extract_elements ).any? {|e| e.text == 'Soft'}
+    end
+
+    Testing :editor do
+      get :edit, item_id
+      is(last_response).ok?
+      check( extract_elements ).any? { |e|
+        e.children.any? do |c|
+          c.name == 'select' && c.attr(:name) == 'cover' && 
+          c.children.any? {|cc| 
+            cc.attr(:value) == 'Soft' && cc.attr(:selected)
+          }
+        end
+      }
+    end
+  
+  end
+
+
+  class MultiSelectType < E
+    include Rear
+    model Book
+    
+    on_save do
+      params['colors'] = params['colors'].join(',')
+    end
+
+    input :colors, :select, :multiple => true do
+      options 'r' => 'Reg', 'g' => 'Green', 'b' => 'Blue' do
+        item.colors.to_s.split(',')
+      end
+    end
+  end
+  Spec.new MultiSelectType do
+    
+    item, item_id = new_book( :colors => 'r,g')
+
+    Testing :pane do
+
+      get
+      is(last_response).ok?
+      check( extract_elements ).any? {|e| 
+        e.text =~ /Red/ || e.text =~ /Green/
+      }
+    end
+
+    Testing :editor do
+      get :edit, item_id
+      is(last_response).ok?
+      check( extract_elements ).any? { |e|
+        e.children.any? do |c|
+          c.name == 'select' && c.attr(:name) == 'colors[]' &&
+            c.children.any? {|cc| 
+              cc.attr(:value) == 'r' && cc.attr(:selected)
+            } && c.children.any? {|cc|
+              cc.attr(:value) == 'g' && cc.attr(:selected)
+            }
+        end
+      }
+    end
+  end
+
+
+  class CheckboxType < E
+    include Rear
+    model Book
+    
+    on_save do
+      params['colors'] = params['colors'].join(',')
+    end
+
+    input :colors, :checkbox do
+      options 'r' => 'Reg', 'g' => 'Green', 'b' => 'Blue' do
+        item.colors.to_s.split(',')
+      end
+    end
+  end
+  Spec.new CheckboxType do
+    
+    item, item_id = new_book( :colors => 'g,b')
+    Testing :pane do
+      get
+      check( extract_elements ).any? {|e| 
+        e.text =~ /Green/ || e.text =~ /Blue/
+      }
+    end
+
+    Testing :editor do
+
+      get :edit, item_id
+      is(last_response).ok?
+      elements = extract_elements('.editor-checkbox_container')
+      item.colors.split(',').each do |color|
+        check( elements ).any? { |e|
+          e.children.any? { |c|
+            c.name == 'input' && 
+              c.attr(:type)  == 'checkbox' &&
+              c.attr(:name)  == 'colors[]' &&
+              c.attr(:value) == color && c.attr(:checked) 
+          }
+        }
+      end
+    end
+  end
+
+
+  class RadioType < E
+    include Rear
+    model Book
+    input :cover, :radio do
+      options('Solid', 'Soft') { item.cover }
+    end
+  end
+  Spec.new RadioType do
+    
+    item, item_id = new_book( :cover => 'Solid')
+    Testing :pane do
+      get
+      is(last_response).ok?
+      check( extract_elements ).any? {|e| e.text == 'Solid' }
+    end
+
+    Testing :editor do
+      get :edit, item_id
+      is(last_response).ok?
+      elements = extract_elements('.editor-radio_container')
+      {'Solid' => true, 'Soft' => false}.each_pair do |value, status|
+        check( elements ).any? { |e|
+          e.children.any? do |c|
+            c.name == 'input' && 
+              c.attr(:type)  == 'radio' &&
+              c.attr(:name)  == 'cover' &&
+              c.attr(:value) == value   &&
+              (status ? c.attr(:checked) : true)
+          end
+        }
+      end
+    end
+  end
+
+
+  class AttrsApp < E
+    include Rear
+    model Book
+    input :name,  style: 'width: 100%;'
+    input :about, cols: 10
+  end
+  Spec.new AttrsApp do
+    
+    item, item_id = new_book()
+
+    get :edit, item_id
+    is(last_response).ok?
+    elements = extract_elements
+    expect( elements ).any? { |e|
+      e.children.any? {|c| 
+        c.name == 'input' && c.attr(:style) == 'width: 100%;'
+      }
+    }
+    expect( elements ).any? { |e|
+      e.children.any? {|c| c.name == 'textarea' && c.attr(:cols) == '10' }
+    }
+  
+  end
+
+  class DisablerApp < E
+    include Rear
+    model Book
+
+    input :name do
+      pane false
+    end
+
+    input :about do
+      editor false
+    end
+    
+  end
+  Spec.new DisablerApp do
+
+    item, item_id = new_book()
+
+    Testing :pane do
+      get
+      is(last_response).ok?
+      elements = extract_elements
+      Should 'show :about column' do
+        expect( elements ).any? {|e| 
+          e.children.any? {|c| c.to_s =~ /#{item[:about]}/}
+        }
+      end
+      Should 'NOT show :name column' do
+        refute do
+          elements.any? do |e|
+            e.children.any? {|c| c.text == item[:name]}
+          end
+        end == true
+      end
+    end
+
+    Testing :editor do
+      get :edit, item_id
+      is(last_response).ok?
+      elements = extract_elements
+      Should 'show :name column' do
+        expect( elements ).any? { |e| 
+          e.children.any? do |c| 
+            c.name == 'input' && c.attr(:value) == item[:name].to_s
+          end
+        }
+      end
+      Should 'NOT show :about column' do
+        refute do
+          elements.any? do |e|
+            e.children.any? {|c| c.name == 'textarea'}
+          end
+        end == true
+      end
+    end
+  end
+end