module Cucumber
  module Ast
    class Scenario
      attr_writer :feature
      
      def initialize(comment, tags, line, keyword, name, steps)
        @comment, @tags, @line, @keyword, @name = comment, tags, line, keyword, name
        steps.each {|step| step.scenario = self}
        @steps = steps
      end

      def status
        @steps.map{|step| step.status}
      end

      def tagged_with?(tag_names)
        @tags.among?(tag_names) || @feature.tagged_with?(tag_names, false)
      end

      def matches_scenario_names?(scenario_names)
        scenario_names.detect{|name| @name == name}
      end

      def accept(visitor)
        visitor.visit_comment(@comment)
        visitor.visit_tags(@tags)
        visitor.visit_scenario_name(@keyword, @name, file_line(@line), source_indent(text_length))
        visitor.world(self) do |world|
          previous = :passed
          @steps.each do |step|
            step.previous = previous
            step.world    = world
            visitor.visit_step(step)
            previous = step.status
          end
        end
        @feature.scenario_executed(self) if @feature && !@executed
        @executed = true
      end

      def source_indent(text_length)
        max_line_length - text_length
      end

      def max_line_length
        lengths = (@steps + [self]).map{|e| e.text_length}
        lengths.max
      end

      def text_length
        @keyword.jlength + @name.jlength
      end

      def at_lines?(lines)
        at_header_or_step_lines?(lines)
      end

      def at_header_or_step_lines?(lines)
        lines.empty? || lines.index(@line) || @steps.detect {|step| step.at_lines?(lines)} || @tags.at_lines?(lines)
      end

      def undefined?
        @steps.empty?
      end

      def step_executed(step)
        @feature.step_executed(step) if @feature
      end

      def backtrace_line(name = "#{@keyword} #{@name}", line = @line)
        @feature.backtrace_line(name, line) if @feature
      end

      def file_line(line = @line)
        @feature.file_line(line) if @feature
      end

      def previous_step(step)
        i = @steps.index(step)
        @steps[i-1]
      end

      def to_sexp
        sexp = [:scenario, @line, @keyword, @name]
        comment = @comment.to_sexp
        sexp += [comment] if comment
        tags = @tags.to_sexp
        sexp += tags if tags.any?
        steps = @steps.map{|step| step.to_sexp}
        sexp += steps if steps.any?
        sexp
      end
    end
  end
end