# encoding: utf-8
require 'helper'

describe T::CLI::Delete do

  before do
    rcfile = RCFile.instance
    rcfile.path = fixture_path + "/.trc"
    @t = T::CLI.new
    @old_stderr = $stderr
    $stderr = StringIO.new
    @old_stdout = $stdout
    $stdout = StringIO.new
  end

  after do
    $stderr = @old_stderr
    $stdout = @old_stdout
  end

  describe "#block" do
    before do
      @t.options = @t.options.merge(:profile => fixture_path + "/.trc")
      stub_delete("/1/blocks/destroy.json").
        with(:query => {:screen_name => "sferik", :include_entities => "false"}).
        to_return(:body => fixture("sferik.json"), :headers => {:content_type => "application/json; charset=utf-8"})
    end
    it "should request the correct resource" do
      @t.delete("block", "sferik")
      a_delete("/1/blocks/destroy.json").
        with(:query => {:screen_name => "sferik", :include_entities => "false"}).
        should have_been_made
    end
    it "should have the correct output" do
      @t.delete("block", "sferik")
      $stdout.string.should =~ /^@testcli unblocked @sferik\.$/
    end
  end

  describe "#dm" do
    before do
      @t.options = @t.options.merge(:profile => fixture_path + "/.trc")
    end
    context "not found" do
      before do
        stub_get("/1/direct_messages/sent.json").
          with(:query => {:count => "1", :include_entities => "false"}).
          to_return(:body => "[]", :headers => {:content_type => "application/json; charset=utf-8"})
      end
      it "should exit" do
        lambda do
          @t.delete("dm")
        end.should raise_error(Thor::Error, "Direct Message not found")
      end
    end
    context "found" do
      before do
        stub_get("/1/direct_messages/sent.json").
          with(:query => {:count => "1", :include_entities => "false"}).
          to_return(:body => fixture("direct_messages.json"), :headers => {:content_type => "application/json; charset=utf-8"})
        stub_delete("/1/direct_messages/destroy/1773478249.json").
          with(:query => {:include_entities => "false"}).
          to_return(:body => fixture("direct_message.json"), :headers => {:content_type => "application/json; charset=utf-8"})
      end
      context ":force => true" do
        before do
          @t.options = @t.options.merge(:force => true)
        end
        it "should request the correct resource" do
          @t.delete("dm")
          a_get("/1/direct_messages/sent.json").
            with(:query => {:count => "1", :include_entities => "false"}).
            should have_been_made
          a_delete("/1/direct_messages/destroy/1773478249.json").
            with(:query => {:include_entities => "false"}).
            should have_been_made
        end
        it "should have the correct output" do
          @t.delete("dm")
          $stdout.string.chomp.should == "@sferik deleted the direct message sent to @pengwynn: \"Creating a fixture for the Twitter gem\""
        end
      end
      context ":force => false" do
        before do
          @t.options = @t.options.merge(:force => false)
        end
        it "should request the correct resource" do
          $stdout.should_receive(:print).with("Are you sure you want to permanently delete the direct message to @hurrycane: \"Sounds good. Meeting Tuesday is fine.\"? ")
          $stdin.should_receive(:gets).and_return("yes")
          @t.delete("dm")
          a_get("/1/direct_messages/sent.json").
            with(:query => {:count => "1", :include_entities => "false"}).
            should have_been_made
          a_delete("/1/direct_messages/destroy/1773478249.json").
            with(:query => {:include_entities => "false"}).
            should have_been_made
        end
        context "yes" do
          it "should have the correct output" do
            $stdout.should_receive(:print).with("Are you sure you want to permanently delete the direct message to @hurrycane: \"Sounds good. Meeting Tuesday is fine.\"? ")
            $stdin.should_receive(:gets).and_return("yes")
            @t.delete("dm")
            $stdout.string.chomp.should == "@sferik deleted the direct message sent to @pengwynn: \"Creating a fixture for the Twitter gem\""
          end
        end
        context "no" do
          it "should have the correct output" do
            $stdout.should_receive(:print).with("Are you sure you want to permanently delete the direct message to @hurrycane: \"Sounds good. Meeting Tuesday is fine.\"? ")
            $stdin.should_receive(:gets).and_return("no")
            @t.delete("dm")
            $stdout.string.chomp.should == ""
          end
        end
      end
    end
  end

  describe "#favorite" do
    before do
      @t.options = @t.options.merge(:profile => fixture_path + "/.trc")
    end
    context "not found" do
      before do
        stub_get("/1/favorites.json").
          with(:query => {:count => "1", :include_entities => "false"}).
          to_return(:body => "[]", :headers => {:content_type => "application/json; charset=utf-8"})
      end
      it "should exit" do
        lambda do
          @t.delete("favorite")
        end.should raise_error(Thor::Error, "Tweet not found")
      end
    end
    context "found" do
      before do
        stub_get("/1/favorites.json").
          with(:query => {:count => "1", :include_entities => "false"}).
          to_return(:body => fixture("favorites.json"), :headers => {:content_type => "application/json; charset=utf-8"})
        stub_delete("/1/favorites/destroy/28439861609.json").
          with(:query => {:include_entities => "false"}).
          to_return(:body => fixture("status.json"), :headers => {:content_type => "application/json; charset=utf-8"})
      end
      context ":force => true" do
        before do
          @t.options = @t.options.merge(:force => true)
        end
        it "should request the correct resource" do
          @t.delete("favorite")
          a_get("/1/favorites.json").
            with(:query => {:count => "1", :include_entities => "false"}).
            should have_been_made
          a_delete("/1/favorites/destroy/28439861609.json").
            with(:query => {:include_entities => "false"}).
            should have_been_made
        end
        it "should have the correct output" do
          @t.delete("favorite")
          $stdout.string.should =~ /^@testcli unfavorited @z's latest status: \"Spilled grilled onions on myself\.  I smell delicious!\"$/
        end
      end
      context ":force => false" do
        before do
          @t.options = @t.options.merge(:force => false)
        end
        it "should request the correct resource" do
          $stdout.should_receive(:print).with("Are you sure you want to delete the favorite of @z's latest status: \"Spilled grilled onions on myself.  I smell delicious!\"? ")
          $stdin.should_receive(:gets).and_return("yes")
          @t.delete("favorite")
          a_get("/1/favorites.json").
            with(:query => {:count => "1", :include_entities => "false"}).
            should have_been_made
          a_delete("/1/favorites/destroy/28439861609.json").
            with(:query => {:include_entities => "false"}).
            should have_been_made
        end
        context "yes" do
          it "should have the correct output" do
            $stdout.should_receive(:print).with("Are you sure you want to delete the favorite of @z's latest status: \"Spilled grilled onions on myself.  I smell delicious!\"? ")
            $stdin.should_receive(:gets).and_return("yes")
            @t.delete("favorite")
            $stdout.string.should =~ /^@testcli unfavorited @z's latest status: \"Spilled grilled onions on myself\.  I smell delicious!\"$/
          end
        end
        context "no" do
          it "should have the correct output" do
            $stdout.should_receive(:print).with("Are you sure you want to delete the favorite of @z's latest status: \"Spilled grilled onions on myself.  I smell delicious!\"? ")
            $stdin.should_receive(:gets).and_return("no")
            @t.delete("favorite")
            $stdout.string.chomp.should == ""
          end
        end
      end
    end
  end

  describe "#list" do
    before do
      @t.options = @t.options.merge(:profile => fixture_path + "/.trc")
      stub_get("/1/account/verify_credentials.json").
        to_return(:body => fixture("sferik.json"), :headers => {:content_type => "application/json; charset=utf-8"})
      stub_delete("/1/lists/destroy.json").
        with(:query => {:owner_screen_name => "sferik", :slug => "presidents"}).
        to_return(:body => fixture("list.json"), :headers => {:content_type => "application/json; charset=utf-8"})
    end
    context ":force => true" do
      before do
        @t.options = @t.options.merge(:force => true)
      end
      it "should request the correct resource" do
        @t.delete("list", "presidents")
        a_get("/1/account/verify_credentials.json").
          should have_been_made
        a_delete("/1/lists/destroy.json").
          with(:query => {:owner_screen_name => "sferik", :slug => "presidents"}).
          should have_been_made
      end
      it "should have the correct output" do
        @t.delete("list", "presidents")
        $stdout.string.chomp.should == "@testcli deleted the list \"presidents\"."
      end
    end
    context ":force => false" do
      before do
        @t.options = @t.options.merge(:force => false)
      end
      it "should request the correct resource" do
        $stdout.should_receive(:print).with("Are you sure you want to permanently delete the list \"presidents\"? ")
        $stdin.should_receive(:gets).and_return("yes")
        @t.delete("list", "presidents")
        a_get("/1/account/verify_credentials.json").
          should have_been_made
        a_delete("/1/lists/destroy.json").
          with(:query => {:owner_screen_name => "sferik", :slug => "presidents"}).
          should have_been_made
      end
      context "yes" do
        it "should have the correct output" do
          $stdout.should_receive(:print).with("Are you sure you want to permanently delete the list \"presidents\"? ")
          $stdin.should_receive(:gets).and_return("yes")
          @t.delete("list", "presidents")
          $stdout.string.chomp.should == "@testcli deleted the list \"presidents\"."
        end
      end
      context "no" do
        it "should have the correct output" do
          $stdout.should_receive(:print).with("Are you sure you want to permanently delete the list \"presidents\"? ")
          $stdin.should_receive(:gets).and_return("no")
          @t.delete("list", "presidents")
          $stdout.string.chomp.should == ""
        end
      end
    end
  end

  describe "#status" do
    before do
      @t.options = @t.options.merge(:profile => fixture_path + "/.trc")
    end
    context "not found" do
      before do
        stub_get("/1/account/verify_credentials.json").
          with(:query => {:include_entities => "false"}).
          to_return(:body => "{}", :headers => {:content_type => "application/json; charset=utf-8"})
      end
      it "should exit" do
        lambda do
          @t.delete("status")
        end.should raise_error(Thor::Error, "Tweet not found")
      end
    end
    context "found" do
      before do
        stub_get("/1/account/verify_credentials.json").
          with(:query => {:include_entities => "false"}).
          to_return(:body => fixture("sferik.json"), :headers => {:content_type => "application/json; charset=utf-8"})
        stub_delete("/1/statuses/destroy/26755176471724032.json").
          with(:query => {:include_entities => "false", :trim_user => "true"}).
          to_return(:body => fixture("status.json"), :headers => {:content_type => "application/json; charset=utf-8"})
      end
      context ":force => true" do
        before do
          @t.options = @t.options.merge(:force => true)
        end
        it "should request the correct resource" do
          @t.delete("status")
          a_get("/1/account/verify_credentials.json").
            with(:query => {:include_entities => "false"}).
            should have_been_made
          a_delete("/1/statuses/destroy/26755176471724032.json").
            with(:query => {:include_entities => "false", :trim_user => "true"}).
            should have_been_made
        end
        it "should have the correct output" do
          @t.delete("status")
          $stdout.string.chomp.should == "@testcli deleted the status: \"@noradio working on implementing #NewTwitter API methods in the twitter gem. Twurl is making it easy. Thank you!\""
        end
      end
      context ":force => false" do
        before do
          @t.options = @t.options.merge(:force => false)
        end
        it "should request the correct resource" do
          $stdout.should_receive(:print).with("Are you sure you want to permanently delete @testcli's latest status: \"RT @tenderlove: [ANN] sqlite3-ruby => sqlite3\"? ")
          $stdin.should_receive(:gets).and_return("yes")
          @t.delete("status")
          a_get("/1/account/verify_credentials.json").
            with(:query => {:include_entities => "false"}).
            should have_been_made
          a_delete("/1/statuses/destroy/26755176471724032.json").
            with(:query => {:include_entities => "false", :trim_user => "true"}).
            should have_been_made
        end
        context "yes" do
          it "should have the correct output" do
            $stdout.should_receive(:print).with("Are you sure you want to permanently delete @testcli's latest status: \"RT @tenderlove: [ANN] sqlite3-ruby => sqlite3\"? ")
            $stdin.should_receive(:gets).and_return("yes")
            @t.delete("status")
            $stdout.string.chomp.should == "@testcli deleted the status: \"@noradio working on implementing #NewTwitter API methods in the twitter gem. Twurl is making it easy. Thank you!\""
          end
        end
        context "no" do
          it "should have the correct output" do
            $stdout.should_receive(:print).with("Are you sure you want to permanently delete @testcli's latest status: \"RT @tenderlove: [ANN] sqlite3-ruby => sqlite3\"? ")
            $stdin.should_receive(:gets).and_return("no")
            @t.delete("status")
            $stdout.string.chomp.should == ""
          end
        end
      end
    end
  end

end