require File.dirname(__FILE__) + '/../spec_helper'
require 'mspec/runner/mspec'
require 'mspec/commands/mspec-tag'
require 'mspec/runner/actions/tag'
require 'mspec/runner/actions/taglist'
require 'mspec/runner/actions/tagpurge'

describe MSpecTag, ".new" do
  before :each do
    @script = MSpecTag.new
  end

  it "sets config[:ltags] to an empty list" do
    @script.config[:ltags].should == []
  end

  it "sets config[:tagger] to :add" do
    @script.config[:tagger] = :add
  end

  it "sets config[:tag] to 'fails:'" do
    @script.config[:tag] = 'fails:'
  end

  it "sets config[:outcome] to :fail" do
    @script.config[:outcome] = :fail
  end
end

describe MSpecTag, "#options" do
  before :each do
    @stdout, $stdout = $stdout, IOStub.new

    @argv = ["a", "b"]
    @options, @config = new_option
    MSpecOptions.stub!(:new).and_return(@options)

    @script = MSpecTag.new
    @script.stub!(:config).and_return(@config)
  end

  after :each do
    $stdout = @stdout
  end

  it "enables the filter options" do
    @options.should_receive(:filters)
    @script.options @argv
  end

  it "enables the configure option" do
    @options.should_receive(:configure)
    @script.options @argv
  end

  it "provides a custom action (block) to the config option" do
    @script.should_receive(:load).with("cfg.mspec")
    @script.options ["-B", "cfg.mspec", "a"]
  end

  it "enables the name option" do
    @options.should_receive(:name)
    @script.options @argv
  end

  it "enables the dry run option" do
    @options.should_receive(:pretend)
    @script.options @argv
  end

  it "enables the interrupt single specs option" do
    @options.should_receive(:interrupt)
    @script.options @argv
  end

  it "enables the formatter options" do
    @options.should_receive(:formatters)
    @script.options @argv
  end

  it "enables the verbose option" do
    @options.should_receive(:verbose)
    @script.options @argv
  end

  it "enables the version option" do
    @options.should_receive(:version)
    @script.options @argv
  end

  it "enables the help option" do
    @options.should_receive(:help)
    @script.options @argv
  end

  it "exits if there are no files to process" do
    @options.should_receive(:parse).and_return([])
    @script.should_receive(:exit)
    @script.options
    $stdout.should =~ /No files specified/
  end
end

describe MSpecTag, "options" do
  before :each do
    @options, @config = new_option
    MSpecOptions.stub!(:new).and_return(@options)
    @script = MSpecTag.new
    @script.stub!(:config).and_return(@config)
  end

  describe "-N, --add TAG" do
    it "is enabled with #options" do
      @options.stub!(:on)
      @options.should_receive(:on).with("-N", "--add", "TAG", an_instance_of(String))
      @script.options ["file.rb"]
    end

    it "sets the mode to :add and sets the tag to TAG" do
      ["-N", "--add"].each do |opt|
        @config[:tagger] = nil
        @config[:tag] = nil
        @script.options [opt, "taggit", "file.rb"]
        @config[:tagger].should == :add
        @config[:tag].should == "taggit:"
      end
    end
  end

  describe "-R, --del TAG" do
    it "is enabled with #options" do
      @options.stub!(:on)
      @options.should_receive(:on).with("-R", "--del", "TAG",
          an_instance_of(String))
      @script.options ["file.rb"]
    end

    it "it sets the mode to :del, the tag to TAG, and the outcome to :pass" do
      ["-R", "--del"].each do |opt|
        @config[:tagger] = nil
        @config[:tag] = nil
        @config[:outcome] = nil
        @script.options [opt, "taggit", "file.rb"]
        @config[:tagger].should == :del
        @config[:tag].should == "taggit:"
        @config[:outcome].should == :pass
      end
    end
  end

  describe "-Q, --pass" do
    it "is enabled with #options" do
      @options.stub!(:on)
      @options.should_receive(:on).with("-Q", "--pass", an_instance_of(String))
      @script.options ["file.rb"]
    end

    it "sets the outcome to :pass" do
      ["-Q", "--pass"].each do |opt|
        @config[:outcome] = nil
        @script.options [opt, "file.rb"]
        @config[:outcome].should == :pass
      end
    end
  end

  describe "-F, --fail" do
    it "is enabled with #options" do
      @options.stub!(:on)
      @options.should_receive(:on).with("-F", "--fail", an_instance_of(String))
      @script.options ["file.rb"]
    end

    it "sets the outcome to :fail" do
      ["-F", "--fail"].each do |opt|
        @config[:outcome] = nil
        @script.options [opt, "file.rb"]
        @config[:outcome].should == :fail
      end
    end
  end

  describe "-L, --all" do
    it "is enabled with #options" do
      @options.stub!(:on)
      @options.should_receive(:on).with("-L", "--all", an_instance_of(String))
      @script.options ["file.rb"]
    end

    it "sets the outcome to :all" do
      ["-L", "--all"].each do |opt|
        @config[:outcome] = nil
        @script.options [opt, "file.rb"]
        @config[:outcome].should == :all
      end
    end
  end

  describe "--list TAG" do
    it "is enabled with #options" do
      @options.stub!(:on)
      @options.should_receive(:on).with("--list", "TAG", an_instance_of(String))
      @script.options ["file.rb"]
    end

    it "sets the mode to :list" do
      @config[:tagger] = nil
      @script.options ["--list", "TAG", "file.rb"]
      @config[:tagger].should == :list
    end

    it "sets ltags to include TAG" do
      @config[:tag] = nil
      @script.options ["--list", "TAG", "file.rb"]
      @config[:ltags].should == ["TAG"]
    end
  end

  describe "--list-all" do
    it "is enabled with #options" do
      @options.stub!(:on)
      @options.should_receive(:on).with("--list-all", an_instance_of(String))
      @script.options ["file.rb"]
    end

    it "sets the mode to :list_all" do
      @config[:tagger] = nil
      @script.options ["--list-all", "file.rb"]
      @config[:tagger].should == :list_all
    end
  end

  describe "--purge" do
    it "is enabled with #options" do
      @options.stub!(:on)
      @options.should_receive(:on).with("--purge", an_instance_of(String))
      @script.options ["file.rb"]
    end

    it "sets the mode to :purge" do
      @config[:tagger] = nil
      @script.options ["--purge", "file.rb"]
      @config[:tagger].should == :purge
    end
  end
end

describe MSpecTag, "#run" do
  before :each do
    MSpec.stub!(:process)

    options = mock("MSpecOptions", :null_object => true)
    options.stub!(:parse).and_return(["one", "two"])
    MSpecOptions.stub!(:new).and_return(options)

    @config = { }
    @script = MSpecTag.new
    @script.stub!(:exit)
    @script.stub!(:config).and_return(@config)
    @script.stub!(:files).and_return(["one", "two"])
    @script.options
  end

  it "registers the tags patterns" do
    @config[:tags_patterns] = [/spec/, "tags"]
    MSpec.should_receive(:register_tags_patterns).with([/spec/, "tags"])
    @script.run
  end

  it "registers the files to process" do
    MSpec.should_receive(:register_files).with(["one", "two"])
    @script.run
  end

  it "processes the files" do
    MSpec.should_receive(:process)
    @script.run
  end

  it "exits with the exit code registered with MSpec" do
    MSpec.stub!(:exit_code).and_return(7)
    @script.should_receive(:exit).with(7)
    @script.run
  end
end

describe MSpecTag, "#register" do
  before :each do
    @script = MSpecTag.new
    @config = @script.config
    @config[:tag] = "fake:"
    @config[:atags] = []
    @config[:astrings] = []
    @config[:ltags] = ["fails", "unstable"]

    @script.stub!(:files).and_return([])
    @script.options "fake"

    @t = mock("TagAction")
    @t.stub!(:register)

    @tl = mock("TagListAction")
    @tl.stub!(:register)
  end

  it "creates a TagAction if config[:tagger] is :add" do
    TagAction.should_receive(:new).with(:add, :fail, "fake", nil, [], []).and_return(@t)
    @script.register
  end

  it "creates a TagAction if config[:tagger] is :del" do
    @config[:tagger] = :del
    @config[:outcome] = :pass
    TagAction.should_receive(:new).with(:del, :pass, "fake", nil, [], []).and_return(@t)
    @script.register
  end

  it "calls #register on the TagAction instance" do
    TagAction.should_receive(:new).and_return(@t)
    @t.should_receive(:register)
    @script.register
  end

  it "raises an ArgumentError if no recognized action is given" do
    @config[:tagger] = :totally_whack
    lambda { @script.register }.should raise_error(ArgumentError)
  end

  describe "when config[:tagger] is :list" do
    before :each do
      @config[:tagger] = :list
    end

    it "creates a TagListAction" do
      TagListAction.should_receive(:new).with(@config[:ltags]).and_return(@tl)
      @tl.should_receive(:register)
      @script.register
    end

    it "registers MSpec pretend mode" do
      MSpec.should_receive(:register_mode).with(:pretend)
      @script.register
    end

    it "sets config[:formatter] to false" do
      @script.register
      @config[:formatter].should be_false
    end
  end

  describe "when config[:tagger] is :list_all" do
    before :each do
      @config[:tagger] = :list_all
    end

    it "creates a TagListAction" do
      TagListAction.should_receive(:new).with(nil).and_return(@tl)
      @tl.should_receive(:register)
      @script.register
    end

    it "registers MSpec pretend mode" do
      MSpec.should_receive(:register_mode).with(:pretend)
      @script.register
    end

    it "sets config[:formatter] to false" do
      @script.register
      @config[:formatter].should be_false
    end
  end

  describe "when config[:tagger] is :purge" do
    before :each do
      @config[:tagger] = :purge
    end

    it "creates a TagPurgeAction" do
      TagPurgeAction.should_receive(:new).and_return(@tl)
      @tl.should_receive(:register)
      @script.register
    end

    it "registers MSpec in pretend mode" do
      MSpec.should_receive(:register_mode).with(:pretend)
      @script.register
    end

    it "sets config[:formatter] to false" do
      @script.register
      @config[:formatter].should be_false
    end
  end
end