activeadmin-orac 1.0.0.pre4

data/lib/active_admin/engine.rb

@@ -0,0 +1,16 @@
+module ActiveAdmin
+  class Engine < ::Rails::Engine
+    initializer "active_admin.precompile", group: :all do |app|
+      ActiveAdmin.application.stylesheets.each do |path, _|
+        app.config.assets.precompile << path
+      end
+      ActiveAdmin.application.javascripts.each do |path|
+        app.config.assets.precompile << path
+      end
+    end
+
+    initializer 'active_admin.routes' do
+      require 'active_admin/helpers/routes/url_helpers'
+    end
+  end
+end

data/lib/active_admin/error.rb

@@ -0,0 +1,62 @@
+module ActiveAdmin
+  # Exception class to raise when there is an authorized access
+  # exception thrown. The exception has a few goodies that may
+  # be useful for capturing / recognizing security issues.
+  class AccessDenied < StandardError
+    attr_reader :user, :action, :subject
+
+    def initialize(user, action, subject)
+      @user, @action, @subject = user, action, subject
+
+      super()
+    end
+
+    def message
+      I18n.t("active_admin.access_denied.message")
+    end
+  end
+
+  class Error < RuntimeError
+  end
+
+  class ErrorLoading < Error
+    # Locates the most recent file and line from the caught exception's backtrace.
+    def find_cause(folder, backtrace)
+      backtrace.grep(/\/(#{folder}\/.*\.rb):(\d+)/){ [$1, $2] }.first
+    end
+  end
+
+  class DatabaseHitDuringLoad < ErrorLoading
+    def initialize(exception)
+      file, line = find_cause(:app, exception.backtrace)
+
+      super "Your file, #{file} (line #{line}), caused a database error while Active Admin was loading. This " +
+            "is most common when your database is missing or doesn't have the latest migrations applied. To " +
+            "prevent this error, move the code to a place where it will only be run when a page is rendered. " +
+            "One solution can be, to wrap the query in a Proc. " +
+            "Original error message: #{exception.message}"
+    end
+
+    def self.capture
+      yield
+    rescue *database_error_classes => exception
+      raise new exception
+    end
+
+    private
+
+    def self.database_error_classes
+      @classes ||= []
+    end
+  end
+
+  class DependencyError < ErrorLoading
+  end
+
+  class NoMenuError < KeyError
+  end
+
+  class GeneratorError < Error
+  end
+
+end

data/lib/active_admin/event.rb

@@ -0,0 +1,24 @@
+module ActiveAdmin
+
+  class EventDispatcher
+    def subscribe(*event_names, &block)
+      Deprecation.warn "`ActiveAdmin::Event.subscribe` is deprecated, use `ActiveSupport::Notifications.subscribe`"
+      event_names.each do |event|
+        ActiveSupport::Notifications.subscribe event,
+          &wrap_block_for_active_support_notifications(block)
+      end
+    end
+
+    def dispatch(event, *args)
+      Deprecation.warn "`ActiveAdmin::Event.dispatch` is deprecated, use `ActiveSupport::Notifications.publish`"
+      ActiveSupport::Notifications.publish event, *args
+    end
+
+    def wrap_block_for_active_support_notifications block
+      proc { |event, *args| block.call *args }
+    end
+  end
+
+  # ActiveAdmin::Event is set to a dispatcher
+  Event = EventDispatcher.new
+end

data/lib/active_admin/filters.rb

@@ -0,0 +1,9 @@
+require 'active_admin/filters/dsl'
+require 'active_admin/filters/resource_extension'
+require 'active_admin/filters/formtastic_addons'
+require 'active_admin/filters/forms'
+
+# Add our Extensions
+ActiveAdmin::ResourceDSL.send :include, ActiveAdmin::Filters::DSL
+ActiveAdmin::Resource.send    :include, ActiveAdmin::Filters::ResourceExtension
+ActiveAdmin::ViewHelpers.send :include, ActiveAdmin::Filters::ViewHelper

data/lib/active_admin/filters/active.rb

@@ -0,0 +1,30 @@
+require 'active_admin/filters/humanized'
+
+module ActiveAdmin
+  module Filters
+
+    class Active
+      attr_accessor :filters, :scope
+
+      def initialize(resource_class, params)
+        @resource_class = resource_class
+        @params = params.respond_to?(:to_unsafe_h) ? params.to_unsafe_h : params
+        @scope = humanize_scope
+        @filters = build_filters
+      end
+
+      private
+
+      def build_filters
+        filters = @params[:q] || []
+        filters.map{ |param| Humanized.new(param) }
+      end
+
+      def humanize_scope
+        scope = @params['scope']
+        scope ? scope.humanize : "All"
+      end
+    end
+
+  end
+end

data/lib/active_admin/filters/dsl.rb

@@ -0,0 +1,21 @@
+module ActiveAdmin
+  module Filters
+    module DSL
+
+      # For docs, please see ActiveAdmin::Filters::ResourceExtension#add_filter
+      def filter(attribute, options = {})
+        config.add_filter(attribute, options)
+      end
+
+      # For docs, please see ActiveAdmin::Filters::ResourceExtension#remove_filter
+      def remove_filter(*attributes)
+        config.remove_filter(*attributes)
+      end
+
+      # For docs, please see ActiveAdmin::Filters::ResourceExtension#preserve_default_filters!
+      def preserve_default_filters!
+        config.preserve_default_filters!
+      end
+    end
+  end
+end

data/lib/active_admin/filters/forms.rb

@@ -0,0 +1,83 @@
+module ActiveAdmin
+  module Filters
+    # This form builder defines methods to build filter forms such
+    # as the one found in the sidebar of the index page of a standard resource.
+    class FormBuilder < ::ActiveAdmin::FormBuilder
+      include ::ActiveAdmin::Filters::FormtasticAddons
+      self.input_namespaces = [::Object, ::ActiveAdmin::Inputs::Filters, ::ActiveAdmin::Inputs, ::Formtastic::Inputs]
+
+      # TODO: remove input class finders after formtastic 4 (where it will be default)
+      self.input_class_finder = ::Formtastic::InputClassFinder
+
+      def filter(method, options = {})
+        if method.present? && options[:as] ||= default_input_type(method)
+          template.concat input(method, options)
+        end
+      end
+
+      protected
+
+      # Returns the default filter type for a given attribute. If you want
+      # to use a custom search method, you have to specify the type yourself.
+      def default_input_type(method, options = {})
+        if method =~ /_(eq|equals|cont|contains|start|starts_with|end|ends_with)\z/
+          :string
+        elsif klass._ransackers.key?(method.to_s)
+          klass._ransackers[method.to_s].type
+        elsif reflection_for(method) || polymorphic_foreign_type?(method)
+          :select
+        elsif column = column_for(method)
+          case column.type
+          when :date, :datetime
+            :date_range
+          when :string, :text
+            :string
+          when :integer, :float, :decimal
+            :numeric
+          when :boolean
+            :boolean
+          end
+        end
+      end
+    end
+
+
+    # This module is included into the view
+    module ViewHelper
+
+      # Helper method to render a filter form
+      def active_admin_filters_form_for(search, filters, options = {})
+        defaults = { builder: ActiveAdmin::Filters::FormBuilder,
+                     url: collection_path,
+                     html: {class: 'filter_form'} }
+        required = { html: {method: :get},
+                     as: :q }
+        options  = defaults.deep_merge(options).deep_merge(required)
+
+        form_for search, options do |f|
+          filters.each do |attribute, opts|
+            next if opts.key?(:if)     && !call_method_or_proc_on(self, opts[:if])
+            next if opts.key?(:unless) &&  call_method_or_proc_on(self, opts[:unless])
+
+            f.filter attribute, opts.except(:if, :unless)
+          end
+
+          buttons = content_tag :div, class: "buttons" do
+            f.submit(I18n.t('active_admin.filters.buttons.filter')) +
+              link_to(I18n.t('active_admin.filters.buttons.clear'), '#', class: 'clear_filters_btn') +
+              hidden_field_tags_for(params, except: except_hidden_fields)
+          end
+
+          f.template.concat buttons
+        end
+      end
+
+      private
+
+      def except_hidden_fields
+        [:q, :page]
+      end
+    end
+
+  end
+end

data/lib/active_admin/filters/formtastic_addons.rb

@@ -0,0 +1,79 @@
+module ActiveAdmin
+  module Filters
+    module FormtasticAddons
+
+      #
+      # The below are Formtastic method overrides that jump inside of the Ransack
+      # search object to get at the object being searched upon.
+      #
+
+      def humanized_method_name
+        if klass.respond_to?(:human_attribute_name)
+          klass.human_attribute_name(method)
+        else
+          method.to_s.public_send(builder.label_str_method)
+        end
+      end
+
+      def reflection_for(method)
+        klass.reflect_on_association(method) if klass.respond_to? :reflect_on_association
+      end
+
+      def column_for(method)
+        klass.columns_hash[method.to_s] if klass.respond_to? :columns_hash
+      end
+
+      def column
+        column_for method
+      end
+
+      #
+      # The below are custom methods that Formtastic does not provide.
+      #
+
+      # The resource class, unwrapped from Ransack
+      def klass
+        @object.object.klass
+      end
+
+      def polymorphic_foreign_type?(method)
+        klass.reflect_on_all_associations.select{ |r| r.macro == :belongs_to && r.options[:polymorphic] }
+          .map(&:foreign_type).include? method.to_s
+      end
+
+      #
+      # These help figure out whether the given method or association will be recognized by Ransack.
+      #
+
+      def searchable_has_many_through?
+        if reflection && reflection.options[:through]
+          reflection.through_reflection.klass.ransackable_attributes.include? reflection.foreign_key
+        else
+          false
+        end
+      end
+
+      def seems_searchable?
+        has_predicate? || ransacker? || scope?
+      end
+
+      # If the given method has a predicate (like _eq or _lteq), it's pretty
+      # likely we're dealing with a valid search method.
+      def has_predicate?
+        !!Ransack::Predicate.detect_from_string(method.to_s)
+      end
+
+      # Ransack lets you define custom search methods, called ransackers.
+      def ransacker?
+        klass._ransackers.key? method.to_s
+      end
+
+      # Ransack supports exposing selected scopes on your model for advanced searches.
+      def scope?
+        context = Ransack::Context.for klass
+        context.respond_to?(:ransackable_scope?) && context.ransackable_scope?(method.to_s, klass)
+      end
+
+    end
+  end
+end

data/lib/active_admin/filters/humanized.rb

@@ -0,0 +1,68 @@
+module ActiveAdmin
+  module Filters
+
+    class Humanized
+      include ActiveAdmin::ViewHelpers
+
+      def initialize(param)
+        @body = param[0]
+        @value = param[1]
+      end
+
+      def value
+        @value.is_a?(::Array) ? @value.compact.join(', ') : @value
+      end
+
+      def body
+        predicate = ransack_predicate_translation
+
+        if current_predicate.nil?
+          predicate = @body.titleize
+        elsif translation_missing?(predicate)
+          predicate = active_admin_predicate_translation
+        end
+
+        "#{parse_parameter_body} #{predicate}".strip
+      end
+
+      private
+
+      def parse_parameter_body
+        return if current_predicate.nil?
+
+        # Accounting for strings that might contain other predicates. Example:
+        # 'requires_approval' contains the substring 'eq'
+        split_string = "_#{current_predicate}"
+
+        @body.split(split_string)
+          .first
+          .gsub('_', ' ')
+          .strip
+          .titleize
+          .gsub('Id', 'ID')
+      end
+
+      def current_predicate
+        @current_predicate ||= predicates.detect { |p| @body.end_with?("_#{p}") }
+      end
+
+      def predicates
+        Ransack::Predicate.names_by_decreasing_length
+      end
+
+      def ransack_predicate_translation
+        I18n.t("ransack.predicates.#{current_predicate}")
+      end
+
+      def active_admin_predicate_translation
+        translation = I18n.t("active_admin.filters.predicates.#{current_predicate}").downcase
+      end
+
+      def translation_missing?(predicate)
+        predicate.downcase.include?('translation missing')
+      end
+
+    end
+
+  end
+end

data/lib/active_admin/filters/resource_extension.rb

@@ -0,0 +1,194 @@
+require 'active_admin/filters/active'
+
+module ActiveAdmin
+  module Filters
+
+    class Disabled < RuntimeError
+      def initialize
+        super "Can't remove a filter when filters are disabled. Enable filters with 'config.filters = true'"
+      end
+    end
+
+    module ResourceExtension
+
+      def initialize(*)
+        super
+        add_filters_sidebar_section
+        add_search_status_sidebar_section
+      end
+
+      # Returns the filters for this resource. If filters are not enabled,
+      # it will always return an empty hash.
+      #
+      # @return [Hash] Filters that apply for this resource
+      def filters
+        filters_enabled? ? filter_lookup : {}
+      end
+
+      # Setter to enable / disable filters on this resource.
+      #
+      # Set to `nil` to inherit the setting from the namespace
+      def filters=(bool)
+        @filters_enabled = bool
+      end
+
+      # Setter to enable/disable showing current filters on this resource.
+      #
+      # Set to `nil` to inherit the setting from the namespace
+      def current_filters=(bool)
+        @current_filters_enabled = bool
+      end
+
+      # @return [Boolean] If filters are enabled for this resource
+      def filters_enabled?
+        @filters_enabled.nil? ? namespace.filters : @filters_enabled
+      end
+
+      # @return [Boolean] If show current filters are enabled for this resource
+      def current_filters_enabled?
+        @current_filters_enabled.nil? ? namespace.current_filters : @current_filters_enabled
+      end
+
+      def preserve_default_filters!
+        @preserve_default_filters = true
+      end
+
+      def preserve_default_filters?
+        @preserve_default_filters == true
+      end
+
+      # Remove a filter for this resource. If filters are not enabled, this method
+      # will raise a RuntimeError
+      #
+      # @param [Symbol] attributes The attributes to not filter on
+      def remove_filter(*attributes)
+        raise Disabled unless filters_enabled?
+
+        attributes.each { |attribute| (@filters_to_remove ||= []) << attribute.to_sym }
+      end
+
+      # Add a filter for this resource. If filters are not enabled, this method
+      # will raise a RuntimeError
+      #
+      # @param [Symbol] attribute The attribute to filter on
+      # @param [Hash] options The set of options that are passed through to
+      #                       ransack for the field definition.
+      def add_filter(attribute, options = {})
+        raise Disabled unless filters_enabled?
+
+        (@filters ||= {})[attribute.to_sym] = options
+      end
+
+      # Reset the filters to use defaults
+      def reset_filters!
+        @filters = nil
+        @filters_to_remove = nil
+      end
+
+    private
+
+      # Collapses the waveform, if you will, of which filters should be displayed.
+      # Removes filters and adds in default filters as desired.
+      def filter_lookup
+        filters = @filters.try(:dup) || {}
+
+        if filters.empty? || preserve_default_filters?
+          default_filters.each do |f|
+            filters[f] ||= {}
+          end
+        end
+
+        if @filters_to_remove
+          @filters_to_remove.each &filters.method(:delete)
+        end
+
+        filters
+      end
+
+      # @return [Array] The array of default filters for this resource
+      def default_filters
+        result = []
+        result.concat default_association_filters if namespace.include_default_association_filters
+        result.concat default_content_filters
+        result.concat custom_ransack_filters
+        result
+      end
+
+      def custom_ransack_filters
+        if resource_class.respond_to?(:_ransackers)
+          resource_class._ransackers.keys.map(&:to_sym)
+        else
+          []
+        end
+      end
+
+      # Returns a default set of filters for the associations
+      def default_association_filters
+        if resource_class.respond_to?(:reflect_on_all_associations)
+          poly, not_poly = resource_class.reflect_on_all_associations.partition{ |r| r.macro == :belongs_to && r.options[:polymorphic] }
+
+          # remove deeply nested associations
+          not_poly.reject!{ |r| r.chain.length > 2 }
+
+          filters = poly.map(&:foreign_type) + not_poly.map(&:name)
+          filters.map &:to_sym
+        else
+          []
+        end
+      end
+
+      # Returns a default set of filters for the content columns
+      def default_content_filters
+        if resource_class.respond_to? :content_columns
+          resource_class.content_columns.map{ |c| c.name.to_sym }
+        else
+          []
+        end
+      end
+
+      def add_filters_sidebar_section
+        self.sidebar_sections << filters_sidebar_section
+      end
+
+      def filters_sidebar_section
+        ActiveAdmin::SidebarSection.new :filters, only: :index, if: ->{ active_admin_config.filters.any? } do
+          active_admin_filters_form_for assigns[:search], active_admin_config.filters
+        end
+      end
+
+      def add_search_status_sidebar_section
+        if current_filters_enabled?
+          self.sidebar_sections << search_status_section
+        end
+      end
+
+      def search_status_section
+        ActiveAdmin::SidebarSection.new I18n.t("active_admin.search_status.headline"), only: :index, if: -> { params[:q] || params[:scope] } do
+          active = ActiveAdmin::Filters::Active.new(resource_class, params)
+
+          span do
+            h4 I18n.t("active_admin.search_status.current_scope"), style: 'display: inline'
+            b active.scope, style: "display: inline"
+
+            div style: "margin-top: 10px" do
+              h4 I18n.t("active_admin.search_status.current_filters"), style: 'margin-bottom: 10px'
+              ul do
+                if active.filters.blank?
+                  li I18n.t("active_admin.search_status.no_current_filters")
+                else
+                  active.filters.each do |filter|
+                    li do
+                      span filter.body
+                      b filter.value
+                    end
+                  end
+                end
+              end
+            end
+          end
+        end
+      end
+    end
+
+  end
+end