require 'test_helper'
require 'ostruct'

class LucidVisitor
  def visit_LucidNode(lucid_node)
    lucid_node.elements
  end
end

class LucidNode < LucidTDL::AST::Node
  attr_reader :elements
  
  def initialize(name, elements)
    @name = name
    @elements = elements
  end
end

module LucidTDL
  module AST
    describe Node do
      it "is visitable" do
        lucid_node = LucidNode.new('Lucid Node', ['one', 'two', 'three'])
        visitor = LucidVisitor.new
        
        lucid_node.accept(visitor).must_equal ['one', 'two', 'three']
      end
    end
    
    [Feature, Ability, Responsibility, Scenario, Test, Tag].each do |node|
      describe node do
        it "is a node" do
          node.ancestors.must_include Node
        end
        
        it "has a line" do
          instance = node.new("Name")
          instance.name.must_equal 'Name'
          instance.must_respond_to :line
        end
      end
    end
    
    describe Feature do
      it "is Enumerable" do
        tags = ['-one', '-two']
        background = ['one', 'two']
        elements = ['+one', '+two']
        
        instance = Feature.new("Test Feature", elements, tags, background)
        instance.tags.each.to_a.must_equal ['-one', '-two']
        instance.background.each.to_a.must_equal ['one', 'two']
        instance.each.to_a.must_equal ['+one', '+two']
      end
    end
    
    describe Scenario do
      before do
        @steps = [
          OpenStruct.new(line: 4),
          OpenStruct.new(line: 5),
        ]
      end
      
      it "is Enumerable" do
        instance = Scenario.new("Name", @steps)
        instance.each.to_a.must_equal @steps
      end
      
      it "has tags" do
        tags  = ['selenium', 'wip']
        
        instance = Scenario.new("Name", @steps, tags)
        instance.tags.must_equal tags
      end
    end
    
    describe Background do
      before do
        @steps = [
          OpenStruct.new(line: 4),
          OpenStruct.new(line: 5),
        ]
      end
      
      it "is a Node" do
        Background.ancestors.must_include Node
      end
      
      it "is Enumerable" do
        instance = Background.new(@steps)
        instance.each.to_a.must_equal @steps
      end
      
      describe "when there are background steps" do
        it "records line" do
          instance = Background.new(@steps)
          instance.pos("file", 3)
          instance.line.must_equal 3
        end
      end
      
      describe "otherwise" do
        it "does not" do
          instance = Background.new([])
          instance.line.must_equal nil
        end
      end
    end
    
    describe Step do
      it "is a Node" do
        Step.ancestors.must_include Node
      end
      
      it "has a line" do
        instance = Step.new("Name", 'Given')
        instance.pos("file", 2)
        instance.name.must_equal 'Name'
        instance.keyword.must_equal 'Given'
        instance.line.must_equal 2
      end
    end
  end
end