# encoding: utf-8
module Middleman
  module Presentation
    # A slide
    class NewSlide
      include ComparableSlide

      private

      attr_reader :input, :name, :base_path, :slide_directory_path

      public

      def initialize(input, base_path:)
        @input                = input.split(/:/)
        @name                 = extract_name
        @slide_directory_path = Pathname.new(base_path)
        @base_path            = @slide_directory_path.dirname
      end

      # Return string representation of self
      def to_s
        path.to_s
      end

      def path
        p = []
        p << Pathname.new(group) unless group.blank?
        p << file_name

        # rubocop:disable Style/EachWithObject
        p.reduce(slide_directory_path) do |a, e|
          # rubocop:enable Style/EachWithObject
          a += e

          a
        end
      end

      def group
        @group ||= extract_group
      end

      # Return basename of slide
      def base_name
        File.basename(name).scan(/^([^.]+)(?:\..+)?/).flatten.first
      end

      def file_name
        path = if type? :erb
                 Pathname.new "#{base_name}.html.erb"
               elsif type? :md
                 Pathname.new "#{base_name}.html.md"
               elsif type? :liquid
                 Pathname.new "#{base_name}.html.liquid"
               else
                 Pathname.new("#{base_name}.html#{template.proposed_extname}")
               end

        Pathname.new(path)
      end

      # Is group?
      def group_object?
        false
      end

      # Write slide content to file
      def write(**data)
        FileUtils.mkdir_p path.dirname

        File.open(path, 'wb') do |f|
          f.write(content(**data))
        end
      end

      # Does the slide exist
      def exist?
        path.exist?
      end

      # Generate slide content
      #
      # It either uses previously set content or generates content by using a
      # predefined template
      def content(**data)
        Erubis::Eruby.new(template.content).result(data)
      end

      # Relative path of slide
      def relative_path
        path.relative_path_from(base_path)
      end

      private

      def template
        if type? :erb
          ErbTemplate.new(working_directory: base_path.dirname)
        elsif type? :md
          MarkdownTemplate.new(working_directory: base_path.dirname)
        elsif type? :liquid
          LiquidTemplate.new(working_directory: base_path.dirname)
        else
          CustomTemplate.new(working_directory: base_path.dirname)
        end
      end

      # Check type of slide
      def type?(t)
        type == t
      end

      # Determine type of slide
      def type
        return :erb    if extname? '.erb'
        return :md     if extname? '.md', '.markdown', '.mkd'
        return :liquid if extname? '.l', '.liquid'

        :custom
      end

      # Return file extension
      def extname
        File.extname(name)
      end

      # Check if slide has given extensions
      def extname?(*extensions)
        extensions.any? { |e| extname == e }
      end

      def extract_name
        input.last
      end

      # Extract group from name
      def extract_group
        return nil if input.size < 2 # no group given

        input.first.to_s
      end
    end
  end
end