releaf-core 0.2.1

data/app/lib/releaf/core/item_orderer.rb

@@ -0,0 +1,102 @@
+module Releaf::Core
+  # Utility class for array items reordering.
+  #
+  # There are 4 possible reordering options: <code>:first, :last, :before and :after</code>.
+  #
+  # All reorder methods are chainable, so:
+  #     Releaf::Core::ItemOrderer.new(:a, :b, :c, :d, :e, :f).reorder(:c, :last).reorder([:a, :b], after: :d).result
+  # will return
+  #     [:d, :a, :b, :e, :f, :c]
+  #
+  # For reordering with <code>`first`</code> and <code>`last`</code> options you must give this option as symbols.
+  # Example:
+  #    Releaf::Core::ItemOrderer.new(:a, :b, :c).reorder(:c, :first)
+  #
+  # For reorderind with <code>`before`</code> and <code>`after`</code> options you must give option together with target value as hash.
+  # Example:
+  #    Releaf::Core::ItemOrderer.new(:a, :b, :c).reorder(:a, after: :b)
+  class ItemOrderer
+
+    attr_accessor :list
+
+    def initialize(*args)
+      self.list = args
+    end
+
+    def result
+      list
+    end
+
+    def to_a
+      result
+    end
+
+    def reorder(values, options)
+      values = [values] unless values.is_a? Array
+      deleted_values = delete(values)
+      index = reorder_index(options)
+
+      values.reverse.each do|value|
+        list.insert(index, deleted_values[value])
+      end
+
+      self
+    end
+
+    def reorder_index(options)
+      if options == :first
+        index = 0
+      elsif options == :last
+        index = list.length
+      elsif options[:after]
+        index = index(options[:after]) + 1
+      elsif options[:before]
+        index = index(options[:before])
+      else
+        raise ArgumentError, "unknown reorder option"
+      end
+    end
+
+    def delete(values)
+      deleted = {}
+
+      values.each do|value|
+        index = index(value)
+        deleted[value] = list[index]
+        list.delete_at(index)
+      end
+
+      deleted
+    end
+
+    def index(value)
+      value = value.to_s
+      list.index do |existing_value|
+        if existing_value.is_a? Hash
+          existing_value.keys.first.to_s == value
+        else
+          existing_value.to_s == value
+        end
+      end
+    end
+
+    # Shortcut for creating new ItemOrderer class, ordering and result retrieving.
+    #
+    #    Releaf::Core::ItemOrderer.reorder([:a, :b, :c, :d, :e, :f], c: :last, [:a, :b] => {after: :d})
+    # is same as
+    #    Releaf::Core::ItemOrderer.new(:a, :b, :c, :d, :e, :f).reorder(:c, :last).reorder([:a, :b], after: :d).result
+    #
+    # @param list [Array] array to reorder
+    # @param options_list [Hash] hash with reorder options
+    # @return [Array] reordered array
+    def self.reorder(list, options_list)
+      orderer = new(*list)
+
+      options_list.each_pair do|values, options|
+        orderer.reorder(values, options)
+      end
+
+      orderer.result
+    end
+  end
+end

data/app/lib/releaf/core/resource_base.rb

@@ -0,0 +1,66 @@
+class Releaf::Core::ResourceBase
+  attr_accessor :resource_class
+
+  def initialize(resource_class)
+    self.resource_class = resource_class
+  end
+
+  def excluded_attributes
+    %w{id created_at updated_at}
+  end
+
+  def localized_attributes?
+    resource_class.translates?
+  end
+
+  def localized_attributes
+    resource_class.translated_attribute_names.collect { |a| a.to_s }
+  end
+
+  def base_attributes
+    resource_class.column_names - excluded_attributes
+  end
+
+  def values(include_associations: true)
+    list = base_attributes
+    list += localized_attributes if localized_attributes?
+    list += associations_attributes if include_associations
+    list
+  end
+
+
+  def associations_attributes
+    associations.collect do |association|
+      {association.name => association_attributes(association)}
+    end
+  end
+
+  def association_attributes(association)
+    self.class.new(association.klass).values - association_excluded_attributes(association)
+  end
+
+  def association_excluded_attributes(association)
+    [association.foreign_key, association.type].compact.map(&:to_s)
+  end
+
+  def associations
+    resource_class.reflect_on_all_associations.collect do |association|
+      association if includable_association?(association)
+    end.compact
+  end
+
+  def includable_association?(association)
+    includable_association_types.include?(association.macro) &&
+      excluded_associations.exclude?(association.name) &&
+      association.class != ActiveRecord::Reflection::ThroughReflection &&
+      resource_class.nested_attributes_options.has_key?(association.name)
+  end
+
+  def includable_association_types
+    [:has_many, :has_one]
+  end
+
+  def excluded_associations
+    [:translations]
+  end
+end

data/app/lib/releaf/core/resource_fields.rb

@@ -0,0 +1,6 @@
+class Releaf::Core::ResourceFields < Releaf::Core::ResourceBase
+
+  def excluded_attributes
+    super + %w(password password_confirmation encrypted_password)
+  end
+end

data/app/lib/releaf/core/resource_params.rb

@@ -0,0 +1,47 @@
+class Releaf::Core::ResourceParams < Releaf::Core::ResourceBase
+
+  def file_attributes
+    resource_class.dragonfly_attachment_classes.collect{|c| "#{c.attribute}_uid" }
+  end
+
+  def file_attribute?(column)
+    file_attributes.include? column
+  end
+
+  def file_attribute_params(column)
+    file_field = column.sub(/_uid$/, "")
+    [file_field, "retained_#{file_field}", "remove_#{file_field}"]
+  end
+
+  def base_attributes
+    super.inject([]) do|list, attribute|
+      if file_attribute?(attribute)
+        list += file_attribute_params(attribute)
+      else
+        list << attribute
+      end
+    end
+  end
+
+  def localized_attributes
+    super.inject([]) do |list, column|
+      list += localized_attribute_params(column)
+    end
+  end
+
+  def localized_attribute_params(column)
+    resource_class.globalize_locales.collect do|locale|
+      "#{column}_#{locale}"
+    end
+  end
+
+  def associations_attributes
+    associations.collect do |association|
+      {"#{association.name}_attributes" => association_attributes(association)}
+    end
+  end
+
+  def association_attributes(association)
+    super + ["id", "_destroy"]
+  end
+end

data/app/lib/releaf/core/resource_table_fields.rb

@@ -0,0 +1,10 @@
+class Releaf::Core::ResourceTableFields < Releaf::Core::ResourceFields
+
+  def excluded_attributes
+    super + table_excluded_attributes
+  end
+
+  def table_excluded_attributes
+    resource_class.column_names.select{|c| c.match(/.*_html$/) }
+  end
+end

data/app/lib/releaf/core/resource_utilities.rb

@@ -0,0 +1,36 @@
+class Releaf::Core::ResourceUtilities
+    # Lists relations for @resource with dependent: :restrict_with_exception
+    #
+    # @return hash of all related objects, who have dependancy :restrict_with_exception
+  def self.restricted_relations(resource)
+    restricted_associations(resource).inject({}) do|relations, association|
+      relations[association.name.to_sym] = {
+        objects: resource.send(association.name),
+        controller: association_controller(association)
+      }
+      relations
+    end
+  end
+
+  def self.restricted_associations(resource)
+    resource.class.reflect_on_all_associations.select do |association|
+      restricted_association?(resource, association)
+    end
+  end
+
+  def self.restricted_association?(resource, association)
+    association.options[:dependent] == :restrict_with_exception && resource.send(association.name).exists?
+  end
+
+  # Attempts to guess associated controllers name
+  #
+  # @return controller name
+  def self.association_controller(association)
+    guessed_name = association.name.to_s.pluralize
+    guessed_name if Releaf.application.config.controllers.values.map { |v| v[:controller] }.grep(/(\/#{guessed_name}$|^#{guessed_name}$)/).present?
+  end
+
+  def self.destroyable?(resource)
+    restricted_associations(resource).empty?
+  end
+end

data/app/lib/releaf/core/responders/access_denied_responder.rb

@@ -0,0 +1,9 @@
+module Releaf::Core::Responders
+  class AccessDeniedResponder < ActionController::Responder
+    include Releaf::Core::Responders::ErrorResponder
+
+    def status_code
+      403
+    end
+  end
+end

data/app/lib/releaf/core/responders/after_save_responder.rb

@@ -0,0 +1,28 @@
+module Releaf::Core::Responders
+  class AfterSaveResponder < ActionController::Responder
+    delegate :render_notification, to: :controller
+
+    def json_resource_errors
+      {errors: Releaf::Core::ErrorFormatter.format_errors(resource)}
+    end
+
+    def to_json
+      if has_errors?
+        display_errors
+      elsif options[:redirect]
+        render json: {url: resource_location}, status: 303
+      else
+        redirect_to resource_location, status: 303
+      end
+    end
+
+    def respond
+      render_notification(!has_errors?) if render_notification?
+      super
+    end
+
+    def render_notification?
+      !(format == :json && has_errors?)
+    end
+  end
+end

data/app/lib/releaf/core/responders/confirm_destroy_responder.rb

@@ -0,0 +1,13 @@
+module Releaf::Core::Responders
+  class ConfirmDestroyResponder < ActionController::Responder
+    delegate :render_notification, to: :controller
+
+    def to_html
+      if options[:destroyable]
+        super
+      else
+        render 'refused_destroy'
+      end
+    end
+  end
+end

data/app/lib/releaf/core/responders/destroy_responder.rb

@@ -0,0 +1,10 @@
+module Releaf::Core::Responders
+  class DestroyResponder < ActionController::Responder
+    delegate :render_notification, to: :controller
+
+    def to_html
+      render_notification(@resource.destroyed?, failure_message_key: 'cant destroy, because relations exists')
+      super
+    end
+  end
+end

data/app/lib/releaf/core/responders/error_responder.rb

@@ -0,0 +1,9 @@
+module Releaf::Core::Responders::ErrorResponder
+  def template
+    self.class.name.split("::").last.gsub(/Responder$/, "").underscore
+  end
+
+  def to_html
+    render "releaf/error_pages/#{template}", status: status_code
+  end
+end

data/app/lib/releaf/core/responders/feature_disabled_responder.rb

@@ -0,0 +1,9 @@
+module Releaf::Core::Responders
+  class FeatureDisabledResponder < ActionController::Responder
+    include Releaf::Core::Responders::ErrorResponder
+
+    def status_code
+      403
+    end
+  end
+end

data/app/lib/releaf/core/responders/page_not_found_responder.rb

@@ -0,0 +1,9 @@
+module Releaf::Core::Responders
+  class PageNotFoundResponder < ActionController::Responder
+    include Releaf::Core::Responders::ErrorResponder
+
+    def status_code
+      404
+    end
+  end
+end

data/app/lib/releaf/core/responders.rb

@@ -0,0 +1,31 @@
+module Releaf::Core::Responders
+
+  def respond_with(resource = nil, options = {}, &block)
+    options[:responder] = active_responder unless options.has_key? :responder
+    super
+  end
+
+  def action_responders
+    {
+      create: Releaf::Core::Responders::AfterSaveResponder,
+      update: Releaf::Core::Responders::AfterSaveResponder,
+      confirm_destroy: Releaf::Core::Responders::ConfirmDestroyResponder,
+      destroy: Releaf::Core::Responders::DestroyResponder,
+      access_denied: Releaf::Core::Responders::AccessDeniedResponder,
+      feature_disabled: Releaf::Core::Responders::FeatureDisabledResponder,
+      page_not_found: Releaf::Core::Responders::PageNotFoundResponder,
+    }
+  end
+
+  # Returns generic view name for given action
+  # @return String
+  def action_responder(_action_name)
+    action_responders[_action_name.to_sym]
+  end
+
+  # Returns generic view name for current action
+  # @return String
+  def active_responder
+    action_responder(action_name)
+  end
+end

data/app/lib/releaf/core/search.rb

@@ -0,0 +1,147 @@
+module Releaf::Core
+  class Search
+    attr_accessor :relation, :fields, :text, :join_index, :searchable_arel_fields
+
+    delegate :base_class, to: :relation
+
+    def self.prepare(relation:, fields:, text:)
+      searcher = new(relation: relation, fields: fields, text: text)
+      searcher.prepare
+      searcher.relation
+    end
+
+    def initialize(relation: , fields:, text:)
+      self.relation = relation.all
+      self.fields = fields
+      self.text = text
+    end
+
+    def prepare
+      self.join_index = 0
+      self.searchable_arel_fields = []
+
+      join_search_tables(base_class)
+      add_search_to_relation
+    end
+
+    private
+
+    def join_search_tables klass, attributes: fields, table: klass.arel_table
+      attributes.each do |attribute|
+        if attribute.is_a? Hash
+          attribute.each_pair do |key, values|
+            reflection = klass.reflect_on_association(key.to_sym)
+            joined_table = join_reflection(reflection, table)
+            join_search_tables(reflection.klass, attributes: values, table: joined_table)
+          end
+        elsif attribute.is_a?(Symbol) || attribute.is_a?(String)
+          self.searchable_arel_fields << table[attribute]
+        else
+          raise 'not implemented'
+        end
+      end
+    end
+
+    def add_search_to_relation
+      text.strip.split(" ").each do |word|
+        query = searchable_arel_fields.map do |field|
+          field.matches(Arel::Nodes::Quoted.new("%#{word}%"))
+        end.inject { |result, query_part| result.or(query_part) }
+
+        self.relation = relation.where(query)
+      end
+    end
+
+    def join_reflection(reflection, table)
+      if reflection.options[:through]
+        join_reflection_with_through(reflection, table)
+      else
+        join_reflection_without_through(reflection, table)
+      end
+    end
+
+    def join_reflection_without_through(reflection, table)
+      klass = reflection.active_record
+      other_class = reflection.klass
+
+      table1 = table || klass.arel_table
+      table2_alias = "#{other_class.arel_table.name}_f#{join_index}"
+      table2 = other_class.arel_table.alias(table2_alias)
+      self.join_index += 1
+
+      foreign_key = reflection.foreign_key.to_sym
+      primary_key = klass.primary_key.to_sym
+
+      join_condition = case reflection.macro
+                       when :has_many
+                         self.relation = relation.uniq
+                         table1[primary_key].eq(table2[foreign_key])
+                       when :has_one
+                         table1[primary_key].eq(table2[foreign_key])
+                       when :belongs_to
+                         table1[foreign_key].eq(table2[primary_key])
+                       else
+                         raise 'not implemented'
+                       end
+
+      if reflection.type
+        polymorphic_type_condition = table2[reflection.type.to_sym].eq(klass.base_class.name)
+        join_condition = join_condition.and(polymorphic_type_condition)
+      end
+
+      if reflection.scope
+        where_scope = extract_where_condtion_from_scope(reflection, table2_alias)
+        join_condition = join_condition.and(where_scope) if where_scope.present?
+      end
+
+      if other_class.ancestors.include?(Globalize::ActiveRecord::Translation)
+        # only search in current locale
+        join_condition = join_condition.and(table2[:locale].eq(I18n.locale.to_s))
+      end
+
+      self.relation = relation.joins(arel_join(table1, table2, join_condition))
+      table2
+    end
+
+    def extract_where_condtion_from_scope(reflection, table_alias)
+      # XXX Hack based on ActiveRecord::Relation#to_sql
+      tmp_relation = build_tmp_relation(reflection, table_alias)
+
+      where_scope = tmp_relation.where_values
+
+      return nil if where_scope.blank?
+
+      connection = tmp_relation.klass.connection
+      visitor    = connection.visitor
+
+      arel  = tmp_relation.arel
+      binds = (arel.bind_values + tmp_relation.bind_values).dup
+      binds.map! { |bv| connection.quote(*bv.reverse) }
+
+      wheres = tmp_relation.arel.ast.cores.first.wheres
+      collect = visitor.accept(wheres, Arel::Collectors::Bind.new)
+      sql = collect.compile(binds)
+      Arel::Nodes::SqlLiteral.new(sql)
+    end
+
+    def build_tmp_relation(reflection, table_alias)
+      # Need to create tmp relation since setting table alias for actual klass
+      # is a bad idea.
+      klass = Class.new(reflection.klass) do
+        self.arel_table.table_alias = table_alias
+      end
+
+      klass.instance_exec(&reflection.scope)
+    end
+
+    def join_reflection_with_through(reflection, table)
+      joined_table = join_reflection_without_through(reflection.through_reflection, table)
+      join_reflection_without_through(reflection.source_reflection, joined_table)
+    end
+
+    def arel_join(table1, table2, join_condition, join_type: Arel::Nodes::OuterJoin)
+      on_condition = table1.create_on(join_condition)
+      table1.create_join(table2, on_condition, join_type)
+    end
+  end
+end