module Puffer
  module Extensions
    module Mapper
      extend ActiveSupport::Concern

      included do
        alias_method_chain :resource, :puffer
        alias_method_chain :resources, :puffer
      end

      module InstanceMethods

        def resource_with_puffer *resources, &block
          puffer_resource(*Marshal.load(Marshal.dump(resources)), &block) || resource_without_puffer(*resources, &block)
        end

        def resources_with_puffer *resources, &block
          puffer_resources(*Marshal.load(Marshal.dump(resources)), &block) || resources_without_puffer(*resources, &block)
        end

        def puffer_controller controller
          if controller.configuration.group
            puffer = ::Rails.application.routes.puffer
            namespace = @scope[:module]

            unless puffer[namespace]
              @scope[:module] = 'admin'
              root :to => 'dashboard#index'
              @scope[:module] = namespace
            end

            puffer[namespace] ||= ActiveSupport::OrderedHash.new
            puffer[namespace][controller.configuration.group] ||= []
            puffer[namespace][controller.configuration.group] << controller
          end
        end

        def puffer_resource(*resources, &block)
          options = resources.extract_options!

          if apply_common_behavior_for(:resource, resources, options, &block)
            return self
          end

          resource = ActionDispatch::Routing::Mapper::Resources::SingletonResource.new(resources.pop, options)
          controller = "#{[@scope[:module], resource.controller].compact.join("/")}_controller".camelize.constantize rescue nil

          return if controller.nil? || (controller && !controller.puffer?)

          @scope[:ancestors] ||= []
          @scope[:children] ||= []

          puffer_controller controller if @scope[:ancestors] == []

          resource_scope(resource) do
            siblings = @scope[:children].dup
            @scope[:children] = []
            @scope[:ancestors].push resource.singular.to_sym

            yield if block_given?

            @scope[:ancestors].pop
            options = {:plural => false, :ancestors => @scope[:ancestors].dup, :children => @scope[:children].dup}
            siblings.push resource.singular.to_sym
            @scope[:children] = siblings

            collection do
              get  '/event/:fieldset/:field/:event(/:identifer)', options.merge(:action => :event, :as => :event)
              post :create, options
              controller._collections.each do |action|
                opts = action.route.extract_options!.dup
                action.route.push options.reverse_merge(opts)
                send *action.route
              end
            end

            new do
              get :new, options
            end

            member do
              get    :edit, options
              get    :show, options
              put    :update, options
              delete :destroy, options
              controller._members.each do |action|
                opts = action.route.extract_options!.dup
                action.route.push options.reverse_merge(opts)
                send *action.route
              end
            end

          end

          self
        end

        def puffer_resources(*resources, &block)
          options = resources.extract_options!

          if apply_common_behavior_for(:resources, resources, options, &block)
            return self
          end

          resource = ActionDispatch::Routing::Mapper::Resources::Resource.new(resources.pop, options)
          controller = "#{[@scope[:module], resource.controller].compact.join("/")}_controller".camelize.constantize rescue nil

          return if controller.nil? || (controller && !controller.puffer?)

          @scope[:ancestors] ||= []
          @scope[:children] ||= []

          puffer_controller controller if @scope[:ancestors] == []

          resource_scope(resource) do
            siblings = @scope[:children].dup
            @scope[:children] = []
            @scope[:ancestors].push resource.plural.to_sym

            yield if block_given?

            @scope[:ancestors].pop
            options = {:plural => true, :ancestors => @scope[:ancestors].dup, :children => @scope[:children].dup}
            siblings.push resource.plural.to_sym
            @scope[:children] = siblings


            collection do
              get  :index, options
              get  '/event/:fieldset/:field/:event(/:identifer)', options.merge(:action => :event, :as => :event)
              post :create, options
              controller._collections.each do |action|
                opts = action.route.extract_options!.dup
                action.route.push options.reverse_merge(opts)
                send *action.route
              end
            end

            new do
              get :new, options
            end

            member do
              get    :edit, options
              get    :show, options
              put    :update, options
              delete :destroy, options
              controller._members.each do |action|
                opts = action.route.extract_options!.dup
                action.route.push options.reverse_merge(opts)
                send *action.route
              end
            end
          end

          self
        end

      end

    end

    module RouteSet

      def self.included base
        base.class_eval do
          include InstanceMethods

          alias_method_chain :clear!, :puffer
          attr_writer :puffer

          def puffer
            @puffer ||= ActiveSupport::OrderedHash.new
          end
        end
      end

      module InstanceMethods

        def clear_with_puffer!
          self.puffer = ActiveSupport::OrderedHash.new
          clear_without_puffer!
        end

      end

    end

  end
end

ActionDispatch::Routing::RouteSet.send :include, Puffer::Extensions::RouteSet
ActionDispatch::Routing::Mapper.send :include, Puffer::Extensions::Mapper