module ActionView #:nodoc:
  class ViewLoadPaths < Array #:nodoc:
    def self.type_cast(obj)
      obj.is_a?(String) ? LoadPath.new(obj) : obj
    end

    class LoadPath #:nodoc:
      attr_reader :path, :paths
      delegate :to_s, :to_str, :inspect, :to => :path

      def initialize(path)
        @path = path.freeze
        reload!
      end

      def ==(path)
        to_str == path.to_str
      end

      # Rebuild load path directory cache
      def reload!
        @paths = {}

        files.each do |file|
          @paths[file.path] = file
          @paths[file.path_without_extension] ||= file
        end

        @paths.freeze
      end

      # Tries to find the extension for the template name.
      # If it does not it exist, tries again without the format extension
      #   find_template_file_for_partial_path('users/show') => 'html.erb'
      #   find_template_file_for_partial_path('users/legacy') => 'rhtml'
      def find_template_file_for_partial_path(file)
        @paths[file.path] || @paths[file.path_without_extension] || @paths[file.path_without_format_and_extension]
      end

      private
        # Get all the files and directories in the path
        def files_in_path
          Dir.glob("#{@path}/**/*/**") | Dir.glob("#{@path}/**")
        end

        # Create an array of all the files within the path
        def files
          files_in_path.map do |file|
            TemplateFile.from_full_path(@path, file) unless File.directory?(file)
          end.compact
        end
    end

    def initialize(*args)
      super(*args).map! { |obj| self.class.type_cast(obj) }
    end

    def reload!
      each { |path| path.reload! }
    end

    def <<(obj)
      super(self.class.type_cast(obj))
    end

    def push(*objs)
      delete_paths!(objs)
      super(*objs.map { |obj| self.class.type_cast(obj) })
    end

    def unshift(*objs)
      delete_paths!(objs)
      super(*objs.map { |obj| self.class.type_cast(obj) })
    end

    def template_exists?(file)
      find_load_path_for_path(file) ? true : false
    end

    def find_load_path_for_path(file)
      find { |path| path.paths[file.to_s] }
    end

    def find_template_file_for_path(file)
      file = TemplateFile.from_path(file)
      each do |path|
        if f = path.find_template_file_for_partial_path(file)
          return f
        end
      end
      nil
    end

    private
      def delete_paths!(paths)
        paths.each { |p1| delete_if { |p2| p1.to_s == p2.to_s } }
      end
  end
end