module Alchemy::Custom::Model
  module Admin
    class BaseController < Alchemy::Custom::Model.admin_controller_class

      class_attribute :method_for_show, instance_accessor: false

      before_action :authorize_resource
      before_action :clean_slug, only: [:create, :update]
      before_action :set_language, unless: -> {params[:language_id].nil?}
      before_action :load_object, except: :index

      helper_method :base_class
      helper_method :table_columns
      helper_method :url_namespace

      helper Alchemy::Custom::Model::BaseHelper


      def index
        @query = base_class.ransack(params[:q])
        @objects = @query.result(distinct: true)
        @objects = @objects.accessible_by(current_ability).only_current_language
        @total_objects = @objects
        @objects = @objects.page(params[:page]).
          per(params[:per_page] ||
                (base_class::DEFAULT_PER_PAGE if base_class.const_defined? :DEFAULT_PER_PAGE) ||
                25)
        instance_variable_set "@#{base_class.name.demodulize.underscore.downcase.pluralize}", @objects
      end

      def new

      end

      def edit

      end

      def update
        if @obj.update_attributes(clean_params)
          after_successful_update
        else
          atfer_unsuccessful_update
        end
      end

      def destroy
        if @obj.destroy
          after_successful_destroy
        else
          after_unsuccessful_destroy
        end
      end

      def create
        if @obj.update_attributes(clean_params)
          after_successful_create
        else
          after_unsuccessful_create
        end

      end

      def show
        if @obj.respond_to? self.class.method_for_show
          @objects = @obj.send(self.class.method_for_show.to_sym)
          @objects = @objects.accessible_by(current_ability)
          @total_objects = @objects
          @objects = @objects.page(params[:page]).
              per(params[:per_page] ||
                      (base_class::DEFAULT_PER_PAGE if base_class.const_defined? :DEFAULT_PER_PAGE) ||
                      25)
          instance_variable_set "@#{self.class.method_for_show.to_s.underscore.downcase.pluralize}", @objects
        else
          @objects = base_class.none
        end
      end

      def export_csv

        @query = base_class.ransack(params[:q])
        @objects = @query.result(distinct: true)
        @objects = @objects.accessible_by(current_ability)
        @total_objects = @objects
        @objects = @objects.page(params[:page]).
            per(params[:per_page] ||
                    (base_class::DEFAULT_PER_PAGE if base_class.const_defined? :DEFAULT_PER_PAGE) ||
                    25)


        send_data generate_csv, filename: "export_member.csv", disposition: :attachment, type: "text/csv"

      end

      def export_csv_full
        @objects = base_class.all.accessible_by(current_ability)
        send_data generate_csv, filename: "export_member.csv", disposition: :attachment, type: "text/csv"
      end


      class << self

        class_attribute :parent_model_name, :parent_klass, :parent_find_method

        def belongs_to(model_name, options = {})
          prepend_before_action :load_parent
          const_model_klass = options[:model_klass].to_s.constantize unless options[:model_klass].nil?
          self.parent_model_name = model_name.to_s
          self.parent_klass = const_model_klass || self.parent_model_name.to_s.classify.constantize
          self.parent_find_method = options[:find_by].to_s || "id"
        end
      end


      private

      def table_columns
        base_class.columns.collect(&:name).collect {|c| c.to_sym}.reject do |c|
          [
            :created_at,
            :updated_at,
            :id,
            :language_id,
            :meta_keywords,
            :meta_description,
            :meta_title,
            :robot_follow,
            :robot_index
          ].include? c
        end
      end

      def base_class
        raise '-- Override Method base_class'
      end

      def url_namespace(obj = base_class)
        [:admin, obj]
      end

      def load_object
        if params[:id]
          if base_class.respond_to? :friendly
            @obj = base_class.friendly.find(params[:id])
          else
            @obj = base_class.find(params[:id])
          end
        else
          @obj = base_class.new
        end
        instance_variable_set("@#{base_class.name.demodulize.underscore.downcase.singularize}", @obj)
      end

      def resource_instance_variable
        @obj
      end


      def authorize_resource
        authorize!(action_name.to_sym, @obj || base_class)
      end

      def permitted_attributes
        base_class.attribute_names.collect {|c| c.to_sym}
      end

      def clean_params
        dati = params.required(base_class.name.underscore.gsub('/', '_').to_sym).permit(permitted_attributes)
        ::Rails.logger.info {"Permitted Attributes: #{permitted_attributes.inspect}"}
        ::Rails.logger.info {"Parametri puliti: #{dati.inspect}"}
        dati
      end

      def clean_slug
        slug = params[base_class.name.underscore.gsub('/', '_').to_sym][:slug]
        if slug.blank?
          params[base_class.name.underscore.gsub('/', '_').to_sym].delete(:slug)
        end
      end

      def after_successful_destroy
        redirect_to polymorphic_path(url_namespace), notice: t(:record_succesfully_destroy, model: base_class.model_name.human)
      end

      def after_unsuccessful_destroy
        redirect_to polymorphic_path(url_namespace), error: t(:record_unsuccesfully_destroy, model: base_class.model_name.human)
      end

      def after_successful_update
        redirect_to polymorphic_path(url_namespace), notice: t(:record_succesfully_update, model: base_class.model_name.human)
      end

      def atfer_unsuccessful_update
        render :edit
      end

      def after_successful_create
        redirect_to polymorphic_path(url_namespace), notice: t(:record_succesfully_create, model: base_class.model_name.human)
      end

      def after_unsuccessful_create
        render :new
      end


      def set_language
        set_alchemy_language(params[:language_id])
      end


      def load_parent
        if params["#{parent_model_name_demodulized}_id"]
          unless self.class.parent_model_name.blank?
            @parent = self.class.parent_klass.
              find_by("#{self.class.parent_find_method.to_s}": params["#{parent_model_name_demodulized}_id"])

            instance_variable_set("@#{parent_model_name_demodulized}", @parent)
          end
        end
      end

      def parent_model_name_demodulized
        self.class.parent_model_name.
          classify.demodulize.underscore
      end


      def generate_csv
        header_csv = self.columns_csv.collect {|attr| base_class.human_attribute_name(attr)}

        CSV.generate(headers: true) do |csv|
          csv << header_csv
          @objects.each do |member|
            csv_row = self.columns_csv.collect do |attr|
              render_csv_field member, attr
            end
            csv << csv_row
          end
        end
      end


      protected

      def columns_csv
        table_columns
      end

      def render_csv_field obj, attr
        obj.send attr
      end



    end
  end
end