#   Copyright (c) 2010, Diaspora Inc.  This file is
#   licensed under the Affero General Public License version 3 or later.  See
#   the COPYRIGHT file.

require 'spec_helper'

describe Invitation do
  let(:user)   {alice}
  let(:aspect) {user.aspects.first}
  let(:user2)  {eve}
  before do
    user.invites = 20
    user.save
    @email = 'maggie@example.com'
    Devise.mailer.deliveries = []
  end
  describe 'validations' do
    before do
      aspect
      @invitation = Invitation.new(:sender => user, :recipient => user2, :aspect => aspect)
    end
    it 'is valid' do
      @invitation.sender.should == user
      @invitation.recipient.should == user2
      @invitation.aspect.should == aspect
      @invitation.should be_valid
    end
    it 'is from a user' do
      @invitation.sender = nil
      @invitation.should_not be_valid
    end
    it 'is to a user' do
      @invitation.recipient = nil
      @invitation.should_not be_valid
    end
    it 'is into an aspect' do
      @invitation.aspect = nil
      @invitation.should_not be_valid
    end
  end

  it 'has a message' do
    @invitation = Invitation.new(:sender => user, :recipient => user2, :aspect => aspect)
    @invitation.message = "!"
    @invitation.message.should == "!"
  end

  describe '.new_or_existing_user_by_email' do
    let(:inv){Invitation.new_or_existing_user_by_service_and_identifier(@type, @identifier)}
    before do
      @users = []
      8.times do
        @users << Factory.create(:user)
      end
      @user_fb_id = 'abc123'
      @user_fb = Factory.create(:user, :invitation_service => "facebook", :invitation_identifier => @user_fb_id)
    end
    
    it 'returns User.new for a non-existent user for email' do
      @type = "email"
      @identifier = "maggie@example.org"
      inv.invitation_identifier.should == @identifier
      inv.invitation_service.should == 'email'
      inv.persisted?.should be_false
      lambda {
        inv.reload
      }.should raise_error ActiveRecord::RecordNotFound
    end
    
    it 'returns User.new for a non-existent user' do
      @type = "facebook"
      @identifier = "1234892323"
      inv.invitation_identifier.should == @identifier
      inv.invitation_service.should == @type
      inv.persisted?.should be_false
      lambda {
        inv.reload
      }.should raise_error ActiveRecord::RecordNotFound
    end

    context 'returns an existing user' do
      context 'active users' do
        it 'by email' do
          @identifier = @users[3].email
          @type = 'email'
          inv.should == @users[3]
        end

        it 'by service' do
          uid = '123324234'
          @users[0].services << Services::Facebook.create(:provider => 'facebook', :uid => uid)
          @users[0].save

          @type = 'facebook'
          @identifier = uid

          inv.should == @users[0]
        end
      end

      context 'invitated users' do
        it 'by email' do
          @identifier = @users[3].email
          @type = 'email'

          @users[3].invitation_identifier = @identifier
          @users[3].invitation_service = @type
          @users[3].save
          inv.should == @users[3]
        end

        it 'by service' do
          @identifier = @user_fb_id
          @type = 'facebook'
          inv.should == @user_fb
        end
      end
    end
  end

  describe '.invite' do
    it 'creates an invitation' do
      lambda {
        Invitation.invite(:service => 'email', :identifier => @email, :from => user, :into => aspect)
      }.should change(Invitation, :count).by(1)
    end

    it 'associates the invitation with the inviter' do
      lambda {
        Invitation.invite(:service => 'email', :identifier => @email, :from => user, :into => aspect)
      }.should change{user.reload.invitations_from_me.count}.by(1)
    end

    it 'associates the invitation with the invitee' do
      new_user = Invitation.invite(:service => 'email', :identifier => @email, :from => user, :into => aspect)
      new_user.invitations_to_me.count.should == 1
    end

    it 'creates a user' do
      lambda {
        Invitation.invite(:from => user, :service => 'email', :identifier => @email, :into => aspect)
      }.should change(User, :count).by(1)
    end

    it 'returns the new user' do
      new_user = Invitation.invite(:from => user, :service => 'email', :identifier => @email, :into => aspect)
      new_user.is_a?(User).should be_true
      new_user.email.should == @email
    end

    it 'adds the inviter to the invited_user' do
      new_user = Invitation.invite(:from => user, :service => 'email', :identifier => @email, :into => aspect)
      new_user.invitations_to_me.first.sender.should == user
    end

    it 'adds an optional message' do
      message = "How've you been?"
      new_user = Invitation.invite(:from => user, :service => 'email', :identifier => @email, :into => aspect, :message => message)
      new_user.invitations_to_me.first.message.should == message
    end

    it 'sends a contact request to a user with that email into the aspect' do
      user2
      user.should_receive(:send_contact_request_to){ |a, b|
        a.should == user2.person
        b.should == aspect
      }
      Invitation.invite(:from => user, :service => 'email', :identifier => user2.email, :into => aspect)
    end

    it 'decrements the invite count of the from user' do
      message = "How've you been?"
      lambda{
        new_user = Invitation.invite(:from => user, :service => 'email', :identifier => @email, :into => aspect, :message => message)
      }.should change(user, :invites).by(-1)
    end

    it "doesn't decrement counter past zero" do
      user.invites = 0
      user.save!
      message = "How've you been?"
      lambda {
        new_user = Invitation.invite(:from => user, :service => 'email', :identifier => @email, :into => aspect, :message => message)
      }.should_not change(user, :invites)
    end

    context 'invalid email' do
      it 'return a user with errors' do
        new_user = Invitation.invite(:service => 'email', :identifier => "fkjlsdf", :from => user, :into => aspect)
        new_user.should have(1).errors_on(:email)
        new_user.should_not be_persisted
      end
    end
  end

  describe '.create_invitee' do
    context 'with an existing invitee' do
      before do
        @valid_params = {:from => user,
          :service => 'email',
          :identifier => @email,
          :into => aspect,
          :message => @message}
        @invitee = Invitation.create_invitee(:service => 'email', :identifier => @email)
      end
      it 'creates no user' do
        lambda {
          Invitation.create_invitee(@valid_params)
        }.should_not change(User, :count)
      end
      it 'sends mail' do
        lambda {
          Invitation.create_invitee(@valid_params)
        }.should change{Devise.mailer.deliveries.size}.by(1)
      end
      it 'does not set the key' do
        lambda {
          Invitation.create_invitee(@valid_params)
        }.should_not change{@invitee.reload.serialized_private_key}
      end
      it 'does not change the invitation token' do
        pending "until this passes, old invitation emails will be invalidated by new ones"
        lambda {
          Invitation.create_invitee(@valid_params)
        }.should_not change{@invitee.reload.invitation_token}
      end
    end
    context 'with an inviter' do
      before do
        @message = "whatever"
        @valid_params = {:from => user, :service => 'email', :identifier => @email, :into => aspect, :message => @message}
      end

      it 'sends mail' do
        lambda {
          Invitation.create_invitee(@valid_params)
        }.should change{Devise.mailer.deliveries.size}.by(1)
      end

      it 'mails the optional message' do
        new_user = Invitation.create_invitee(@valid_params)
        Devise.mailer.deliveries.first.to_s.include?(@message).should be_true
      end

      it 'has no translation missing' do
        new_user = Invitation.create_invitee(@valid_params)
        Devise.mailer.deliveries.first.body.raw_source.match(/(translation_missing.+)/).should be_nil
      end

      it "doesn't create an invitation if the email is invalid" do
         new_user = Invitation.create_invitee(@valid_params.merge(:identifier => 'fdfdfdfdf'))
         new_user.should_not be_persisted
         new_user.should have(1).error_on(:email)
      end

      it 'does not save a user with an empty string email' do
        @valid_params[:service] = 'facebook'
        @valid_params[:identifier] = '3423423'
        Invitation.create_invitee(@valid_params)
        @valid_params[:identifier] = 'dfadsfdas'
        lambda {
            Invitation.create_invitee(@valid_params)
        }.should_not raise_error
      end
    end

    context 'with no inviter' do
      it 'sends an email that includes the right things' do
        Invitation.create_invitee(:service => 'email', :identifier => @email)
        Devise.mailer.deliveries.first.to_s.include?("Welcome #{@email}").should == true
      end
      it 'creates a user' do
        lambda {
          Invitation.create_invitee(:service => 'email', :identifier => @email)
        }.should change(User, :count).by(1)
      end
      it 'sends email to the invited user' do
        lambda {
          Invitation.create_invitee(:service => 'email', :identifier => @email)
        }.should change{Devise.mailer.deliveries.size}.by(1)
      end
      it 'does not render nonsensical emails' do
        Invitation.create_invitee(:service => 'email', :identifier => @email)
        Devise.mailer.deliveries.first.body.raw_source.match(/have invited you to join/i).should be_false
      end
      it 'creates an invitation' do
        pending "Invitations should be more flexible, allowing custom messages to be passed in without an inviter."
        lambda {
          Invitation.create_invitee(:service => 'email', :identifier => @email)
        }.should change(Invitation, :count).by(1)
      end
    end
  end

  describe '#to_request!' do
    before do
      @new_user = Invitation.invite(:from => user, :service => 'email', :identifier => @email, :into => aspect)
      acceptance_params = {:invitation_token => "abc",
                              :username => "user",
                              :email => @email,
                              :password => "secret",
                              :password_confirmation => "secret",
                              :person => {:profile => {:first_name => "Bob",
                                :last_name  => "Smith"}}}
      @new_user.setup(acceptance_params)
      @new_user.person.save
      @new_user.save
      @invitation = @new_user.invitations_to_me.first
    end
    it 'destroys the invitation' do
      lambda {
        @invitation.to_request!
      }.should change(Invitation, :count).by(-1)
    end
    it 'creates a request, and sends it to the new user' do
      lambda {
        @invitation.to_request!
      }.should change(Request, :count).by(1)
    end
    it 'creates a pending contact for the inviter' do
      lambda {
        @invitation.to_request!
      }.should change(Contact, :count).by(1)
      @invitation.sender.contact_for(@new_user.person).should be_pending
    end
    describe 'return values' do
      before do
        @request = @invitation.to_request!
      end
      it 'returns the sent request' do
        @request.is_a?(Request).should be_true
      end
      it 'sets the receiving user' do
        @request.recipient.should == @new_user.person
      end
      it 'sets the sending user' do
        @request.sender.should == user.person
      end
      it 'sets the aspect' do
        @request.aspect.should == aspect
      end
    end
  end
end