module CollapsedRoutes
  def collapsed_routes(*names)
    names.map!(&:to_s)
    names.each_with_index do |name, i|
      next if i == 0
      subset = names.first(i + 1)
      collapse subset
    end
  end
  
private

  def backtrack(list)
    back = []
    list.each_with_index do |_, i|
      back << list.first(i + 1).join(".")
    end
    back.reverse.join(", ")
  end

  def collapse(names)
    logger = ActionController::Base.logger
    base = names[-1].singularize
    parent = names[-2].singularize
    series = names.map(&:singularize).join("_")
    reversed = names.reverse.map(&:singularize)
    
    backtrack_base = backtrack reversed
    reversed.shift
    backtrack_parent = backtrack reversed

    %w[path url].each do |path|
      logger.info "Defining route: #{base}_#{path}(#{base} = @#{base})"
      logger.info "Defining route: edit_#{base}_#{path}(#{base} = @#{base})"
      logger.info "Defining route: new_#{base}_#{path}(#{parent} = @#{parent})"
      logger.info "Defining route: #{base.pluralize}_#{path}(#{parent} = @#{parent})"
      
      CollapsedRoutes.module_eval <<-RUBY
        def #{base}_#{path}(#{base} = @#{base})
          #{series}_#{path}(#{backtrack_base})
        end

        def edit_#{base}_#{path}(#{base} = @#{base})
          edit_#{series}_#{path}(#{backtrack_base})
        end

        def new_#{base}_#{path}(#{parent} = @#{parent})
          new_#{series}_#{path}(#{backtrack_parent})
        end

        def #{base.pluralize}_#{path}(#{parent} = @#{parent})
          #{series.pluralize}_#{path}(#{backtrack_parent})
        end
      RUBY
    end
  end
  
  def included(klass)
    klass.extend(self)
  end
  
  extend self
end