# encoding: utf-8
require 'spec_helper'

describe Ably::Rest::Channel do
  include Ably::Modules::Conversions

  vary_by_protocol do
    let(:default_options) { { key: api_key, environment: environment, protocol: protocol, max_frame_size: max_frame_size, max_message_size: max_message_size, idempotent_rest_publishing: false } }
    let(:client_options)  { default_options }
    let(:client) do
      Ably::Rest::Client.new(client_options)
    end
    let(:max_message_size) { nil }
    let(:max_frame_size) { nil }

    describe '#publish' do
      let(:channel_name) { random_str }
      let(:channel)      { client.channel(channel_name) }
      let(:name)         { 'foo' }
      let(:data)         { 'woop!' }

      context 'with name and data arguments' do
        it 'publishes the message and return true indicating success' do
          expect(channel.publish(name, data)).to eql(true)
          expect(channel.history.items.first.name).to eql(name)
          expect(channel.history.items.first.data).to eql(data)
        end

        context 'and additional attributes' do
          let(:client_id) { random_str }

          it 'publishes the message with the attributes and return true indicating success' do
            expect(channel.publish(name, data, client_id: client_id)).to eql(true)
            expect(channel.history.items.first.client_id).to eql(client_id)
          end
        end
      end

      context 'with a client_id configured in the ClientOptions' do
        let(:client_id)      { random_str }
        let(:client_options) { default_options.merge(client_id: client_id) }

        it 'publishes the message without a client_id' do
          expect(client).to receive(:post).
            with("/channels/#{channel_name}/publish", hash_excluding(client_id: client_id), {}).
            and_return(double('response', status: 201))

          expect(channel.publish(name, data)).to eql(true)
        end

        it 'expects a client_id to be added by the realtime service' do
          channel.publish name, data
          expect(channel.history.items.first.client_id).to eql(client_id)
        end
      end

      context 'with an array of Hash objects with :name and :data attributes' do
        let(:messages) do
          10.times.map do |index|
            { name: index.to_s, data: { "index" => index + 10 } }
          end
        end

        it 'publishes an array of messages in one HTTP request' do
          expect(client.max_message_size).to eq(Ably::Rest::Client::MAX_MESSAGE_SIZE)
          expect(messages.sum(&:size) < Ably::Rest::Client::MAX_MESSAGE_SIZE).to eq(true)

          expect(client).to receive(:post).once.and_call_original
          expect(channel.publish(messages)).to eql(true)
          expect(channel.history.items.map(&:name)).to match_array(messages.map { |message| message[:name] })
          expect(channel.history.items.map(&:data)).to match_array(messages.map { |message| message[:data] })
        end
      end

      context 'with an array of Message objects' do
        context 'when max_message_size and max_frame_size is not set' do
          before do
            expect(client.max_message_size).to eq(Ably::Rest::Client::MAX_MESSAGE_SIZE)
            expect(client.max_frame_size).to eq(Ably::Rest::Client::MAX_FRAME_SIZE)
          end

          context 'and messages size (130 bytes) is smaller than the max_message_size' do
            let(:messages) do
              10.times.map do |index|
                Ably::Models::Message(name: index.to_s, data: { "index" => index + 10 })
              end
            end

            it 'publishes an array of messages in one HTTP request' do
              expect(messages.sum &:size).to eq(130)
              expect(client).to receive(:post).once.and_call_original
              expect(channel.publish(messages)).to eql(true)
              expect(channel.history.items.map(&:name)).to match_array(messages.map(&:name))
              expect(channel.history.items.map(&:data)).to match_array(messages.map(&:data))
            end
          end

          context 'and messages size (177784 bytes) is bigger than the max_message_size' do
            let(:messages) do
              10000.times.map do |index|
                Ably::Models::Message(name: index.to_s, data: { "index" => index + 1 })
              end
            end

            it 'should not publish and raise Ably::Exceptions::MaxMessageSizeExceeded' do
              expect(messages.sum &:size).to eq(177784)
              expect { channel.publish(messages) }.to raise_error(Ably::Exceptions::MaxMessageSizeExceeded)
            end
          end
        end

        context 'when max_message_size is 655 bytes' do
          let(:max_message_size) { 655 }

          before do
            expect(client.max_message_size).to eq(max_message_size)
            expect(client.max_frame_size).to eq(Ably::Rest::Client::MAX_FRAME_SIZE)
          end

          context 'and messages size (130 bytes) is smaller than the max_message_size' do
            let(:messages) do
              10.times.map do |index|
                Ably::Models::Message(name: index.to_s, data: { "index" => index + 10 })
              end
            end

            it 'publishes an array of messages in one HTTP request' do
              expect(messages.sum &:size).to eq(130)
              expect(client).to receive(:post).once.and_call_original
              expect(channel.publish(messages)).to eql(true)
              expect(channel.history.items.map(&:name)).to match_array(messages.map(&:name))
              expect(channel.history.items.map(&:data)).to match_array(messages.map(&:data))
            end
          end

          context 'and messages size (177784 bytes) is bigger than the max_message_size' do
            let(:messages) do
              10000.times.map do |index|
                Ably::Models::Message(name: index.to_s, data: { "index" => index + 1 })
              end
            end

            it 'should not publish and raise Ably::Exceptions::MaxMessageSizeExceeded' do
              expect(messages.sum &:size).to eq(177784)
              expect { channel.publish(messages) }.to raise_error(Ably::Exceptions::MaxMessageSizeExceeded)
            end
          end
        end
      end

      context 'with a Message object' do
        let(:name) { random_str }

        let(:message) do
          Ably::Models::Message(name: name, data: data)
        end

        it 'publishes the message' do
          expect(client).to receive(:post).once.and_call_original
          expect(channel.publish(message)).to eql(true)
          expect(channel.history.items.first.name).to eql(name)
        end
      end

      context 'with a Message object and query params' do
        let(:message) do
          Ably::Models::Message(name: name, data: data)
        end

        it 'should fail to publish the message (RSL1l1)' do
          expect(client).to receive(:post).once.and_call_original
          expect { channel.publish(message, { _forceNack: 'true' }) }.to raise_error(Ably::Exceptions::InvalidRequest, /40099/)
        end
      end

      context 'with Messages and query params' do
        let(:messages) do
          10.times.map do |index|
            { name: index.to_s, data: { "index" => index + 10 } }
          end
        end

        it 'should fail to publish the message (RSL1l1)' do
          expect(client).to receive(:post).once.and_call_original
          expect { channel.publish(messages, { _forceNack: 'true' }) }.to raise_error(Ably::Exceptions::InvalidRequest, /40099/)
        end
      end

      context 'without adequate permissions on the channel' do
        let(:capability)     { { onlyChannel: ['subscribe'] } }
        let(:client_options) { default_options.merge(use_token_auth: true, default_token_params: { capability: capability }) }

        it 'raises a permission error when publishing' do
          expect { channel.publish(name, data) }.to raise_error(Ably::Exceptions::UnauthorizedRequest, /40160/)
        end
      end

      context 'null attributes' do
        context 'when name is null' do
          let(:data) { random_str }

          it 'publishes the message without a name attribute in the payload' do
            expect(client).to receive(:post).with(anything, { "data" => data }, {}).once.and_call_original
            expect(channel.publish(nil, data)).to eql(true)
            expect(channel.history.items.first.name).to be_nil
            expect(channel.history.items.first.data).to eql(data)
          end
        end

        context 'when data is null' do
          let(:name) { random_str }

          it 'publishes the message without a data attribute in the payload' do
            expect(client).to receive(:post).with(anything, { "name" => name }, {}).once.and_call_original
            expect(channel.publish(name)).to eql(true)
            expect(channel.history.items.first.name).to eql(name)
            expect(channel.history.items.first.data).to be_nil
          end
        end

        context 'with neither name or data attributes' do
          let(:name) { random_str }

          it 'publishes the message without any attributes in the payload' do
            expect(client).to receive(:post).with(anything, {}, {}).once.and_call_original
            expect(channel.publish(nil)).to eql(true)
            expect(channel.history.items.first.name).to be_nil
            expect(channel.history.items.first.data).to be_nil
          end
        end
      end

      context 'identified clients' do
        context 'when authenticated with a wildcard client_id' do
          let(:token)            { Ably::Rest::Client.new(default_options).auth.request_token(client_id: '*') }
          let(:client_options)   { default_options.merge(key: nil, token: token) }
          let(:client)           { Ably::Rest::Client.new(client_options) }
          let(:channel)          { client.channels.get(channel_name) }

          context 'with a valid client_id in the message' do
            it 'succeeds' do
              channel.publish([name: 'event', client_id: 'valid'])
                channel.history do |messages|
                  expect(messages.first.client_id).to eql('valid')
                end
            end
          end

          context 'with a wildcard client_id in the message' do
            it 'throws an exception' do
              expect { channel.publish([name: 'event', client_id: '*']) }.to raise_error Ably::Exceptions::IncompatibleClientId
            end
          end

          context 'with an empty client_id in the message' do
            it 'succeeds and publishes without a client_id' do
              channel.publish([name: 'event', client_id: nil])
              channel.history do |messages|
                expect(messages.first.client_id).to eql('valid')
              end
            end
          end
        end

        context 'when authenticated with a Token string with an implicit client_id' do
          let(:token)            { Ably::Rest::Client.new(default_options).auth.request_token(client_id: 'valid').token }
          let(:client_options)   { default_options.merge(key: nil, token: token) }
          let(:client)           { Ably::Rest::Client.new(client_options) }
          let(:channel)          { client.channels.get(channel_name) }

          context 'without having a confirmed identity' do
            context 'with a valid client_id in the message' do
              it 'succeeds' do
                channel.publish([name: 'event', client_id: 'valid'])
                channel.history do |messages|
                  expect(messages.first.client_id).to eql('valid')
                end
              end
            end

            context 'with an invalid client_id in the message' do
              it 'succeeds in the client library but then fails when published to Ably' do
                expect { channel.publish([name: 'event', client_id: 'invalid']) }.to raise_error(Ably::Exceptions::InvalidRequest, /40012/)
              end
            end

            context 'with an empty client_id in the message' do
              it 'succeeds and publishes with an implicit client_id' do
                channel.publish([name: 'event', client_id: nil])
                channel.history do |messages|
                  expect(messages.first.client_id).to eql('valid')
                end
              end
            end
          end
        end

        context 'when authenticated with TokenDetails with a valid client_id' do
          let(:token)            { Ably::Rest::Client.new(default_options).auth.request_token(client_id: 'valid') }
          let(:client_options)   { default_options.merge(key: nil, token: token) }
          let(:client)           { Ably::Rest::Client.new(client_options) }
          let(:channel)          { client.channels.get(channel_name) }

          context 'with a valid client_id in the message' do
            it 'succeeds' do
              channel.publish([name: 'event', client_id: 'valid'])
              channel.history do |messages|
                expect(messages.first.client_id).to eql('valid')
              end
            end
          end

          context 'with a wildcard client_id in the message' do
            it 'throws an exception' do
              expect { channel.publish([name: 'event', client_id: '*']) }.to raise_error Ably::Exceptions::IncompatibleClientId
            end
          end

          context 'with an invalid client_id in the message' do
            it 'throws an exception' do
              expect { channel.publish([name: 'event', client_id: 'invalid']) }.to raise_error Ably::Exceptions::IncompatibleClientId
            end
          end

          context 'with an empty client_id in the message' do
            it 'succeeds and publishes with an implicit client_id' do
              channel.publish([name: 'event', client_id: nil])
              channel.history do |messages|
                expect(messages.first.client_id).to eql('valid')
              end
            end
          end
        end

        context 'when anonymous and no client_id' do
          let(:token)            { Ably::Rest::Client.new(default_options).auth.request_token(client_id: nil) }
          let(:client_options)   { default_options.merge(key: nil, token: token) }
          let(:client)           { Ably::Rest::Client.new(client_options) }
          let(:channel)          { client.channels.get(channel_name) }

          context 'with a client_id in the message' do
            it 'throws an exception' do
              expect { channel.publish([name: 'event', client_id: '*']) }.to raise_error Ably::Exceptions::IncompatibleClientId
            end
          end

          context 'with a wildcard client_id in the message' do
            it 'throws an exception' do
              expect { channel.publish([name: 'event', client_id: '*']) }.to raise_error Ably::Exceptions::IncompatibleClientId
            end
          end

          context 'with an empty client_id in the message' do
            it 'succeeds and publishes with an implicit client_id' do
              channel.publish([name: 'event', client_id: nil])
              channel.history do |messages|
                expect(messages.first.client_id).to be_nil
              end
            end
          end
        end
      end

      context 'with a non ASCII channel name' do
        let(:channel_name) { 'foo:¡€≤`☃' }
        let(:channel_name_encoded) { 'foo%3A%C2%A1%E2%82%AC%E2%89%A4%60%E2%98%83' }
        let(:endpoint) { client.endpoint }
        let(:channel) { client.channels.get(channel_name) }

        context 'stubbed', :webmock do
          let!(:get_stub) {
            stub_request(:post, "#{endpoint}/channels/#{channel_name_encoded}/publish").
              to_return(:body => '{}', :headers => { 'Content-Type' => 'application/json' })
          }

          it 'correctly encodes the channel name' do
            channel.publish('foo')
            expect(get_stub).to have_been_requested
          end
        end
      end

      context 'with a frozen message event name' do
        let(:event_name) { random_str.freeze }

        it 'succeeds and publishes with an implicit client_id' do
          channel.publish([name: event_name])
          channel.publish(event_name)

          if !(RUBY_VERSION.match(/^1\./) || RUBY_VERSION.match(/^2\.[012]/))
            channel.publish(+'foo-bar') # new style freeze, see https://github.com/ably/ably-ruby/issues/132
          else
            channel.publish('foo-bar'.freeze) # new + style not supported until Ruby 2.3
          end

          channel.history do |messages|
            expect(messages.length).to eql(3)
            expect(messages.first.name).to eql(event_name)
            expect(messages[1].name).to eql(event_name)
            expect(messages.last.name).to eql('foo-bar')
          end
        end
      end

      context 'with a frozen payload' do
        let(:payload) { { foo: random_str.freeze }.freeze }

        it 'succeeds and publishes with an implicit client_id' do
          channel.publish([data: payload])
          channel.publish(nil, payload)

          channel.history do |messages|
            expect(messages.length).to eql(2)
            expect(messages.first.data).to eql(payload)
            expect(messages.last.data).to eql(payload)
          end
        end
      end

      context 'message size is exceeded (#TO3l8)' do
        let(:data) { 101.times.map { { data: 'x' * 655 } } }

        it 'should raise Ably::Exceptions::MaxMessageSizeExceeded exception' do
          expect { channel.publish([ data: data ]) }.to \
            raise_error(Ably::Exceptions::MaxMessageSizeExceeded)
        end
      end
    end

    describe '#history' do
      let(:channel) { client.channel("persisted:#{random_str(4)}") }
      let(:expected_history) do
        [
          { :name => 'test1', :data => 'foo' },
          { :name => 'test2', :data => 'bar' },
          { :name => 'test3', :data => 'baz' }
        ]
      end
      let!(:before_published) { client.time }

      before(:each) do
        expected_history.each do |message|
          channel.publish(message[:name], message[:data]) || raise('Unable to publish message')
        end
      end

      it 'returns a PaginatedResult model' do
        expect(channel.history).to be_a(Ably::Models::PaginatedResult)
      end

      it 'returns the current message history for the channel' do
        actual_history_items = channel.history.items

        expect(actual_history_items.size).to eql(3)

        expected_history.each do |message|
          message_name, message_data = message[:name], message[:data]
          matching_message = actual_history_items.find { |message| message.name == message_name && message.data == message_data }
          expect(matching_message).to be_a(Ably::Models::Message)
        end
      end

      context 'message timestamps' do
        specify 'are after the messages were published' do
          channel.history.items.each do |message|
            expect(before_published.to_f).to be < message.timestamp.to_f
          end
        end
      end

      context 'message IDs' do
        it 'is unique' do
          message_ids = channel.history.items.map(&:id).compact
          expect(message_ids.count).to eql(3)
          expect(message_ids.uniq.count).to eql(3)
        end
      end

      it 'returns paged history using the PaginatedResult model' do
        page_1 = channel.history(limit: 1)
        page_2 = page_1.next
        page_3 = page_2.next

        all_items = [page_1.items[0].id, page_2.items[0].id, page_3.items[0].id]
        expect(all_items.uniq).to eql(all_items)

        expect(page_1.items.size).to eql(1)
        expect(page_1).to_not be_last

        # Page 2
        expect(page_2.items.size).to eql(1)
        expect(page_2).to_not be_last

        # Page 3
        expect(page_3.items.size).to eql(1)
        # This test should be deterministic but it's not.
        # Sometimes the backend, to avoid too much work, returns a `next` link that contains empty reults.
        if page_3.next
          expect(page_3.next.items.length).to eql(0)
        else
          expect(page_3).to be_last
        end
      end

      context 'direction' do
        it 'returns paged history backwards by default' do
          items = channel.history.items
          expect(items.first.name).to eql(expected_history.last.fetch(:name))
          expect(items.last.name).to eql(expected_history.first.fetch(:name))
        end

        it 'returns history forward if specified in the options' do
          items = channel.history(direction: :forwards).items
          expect(items.first.name).to eql(expected_history.first.fetch(:name))
          expect(items.last.name).to eql(expected_history.last.fetch(:name))
        end
      end

      context 'limit' do
        before do
          channel.publish 120.times.to_a.map { |i| { name: 'event' } }
        end

        it 'defaults to 100' do
          page = channel.history
          expect(page.items.count).to eql(100)
          next_page = page.next
          expect(next_page.items.count).to be >= 20
          expect(next_page.items.count).to be < 100
        end
      end
    end

    describe '#history option' do
      let(:channel_name) { "persisted:#{random_str(4)}" }
      let(:channel) { client.channel(channel_name) }
      let(:endpoint) do
        client.endpoint
      end
      let(:default_history_options) do
          {
            direction: :backwards,
            limit: 100
          }
        end

      [:start, :end].each do |option|
        describe ":#{option}", :webmock do
          let!(:history_stub) {
            query_params = default_history_options
            .merge(option => milliseconds).map { |k, v| "#{k}=#{v}" }.join('&')
            stub_request(:get, "#{endpoint}/channels/#{URI.encode_www_form_component(channel_name)}/messages?#{query_params}").
              to_return(:body => '{}', :headers => { 'Content-Type' => 'application/json' })
          }

          before do
            channel.history(options)
          end

          context 'with milliseconds since epoch value' do
            let(:milliseconds) { as_since_epoch(Time.now) }
            let(:options) { { option => milliseconds } }

            it 'uses this value in the history request' do
              expect(history_stub).to have_been_requested
            end
          end

          context 'with a Time object value' do
            let(:time) { Time.now }
            let(:milliseconds) { as_since_epoch(time) }
            let(:options) { { option => time } }

            it 'converts the value to milliseconds since epoch in the hisotry request' do
              expect(history_stub).to have_been_requested
            end
          end
        end
      end

      context 'when argument start is after end' do
        let(:subject) { channel.history(start: as_since_epoch(Time.now), end: Time.now - 120) }

        it 'should raise an exception' do
          expect { subject.items }.to raise_error ArgumentError
        end
      end
    end

    context '#presence' do
      let(:channel_name) { "persisted:#{random_str(4)}" }
      let(:channel) { client.channel(channel_name) }

      it 'returns a REST Presence object' do
        expect(channel.presence).to be_a(Ably::Rest::Presence)
      end
    end

    context '#status' do
      let(:channel_name) { "persisted:#{random_str(4)}" }
      let(:channel) { client.channel(channel_name) }
      let(:channel_details) { channel.status }

      it 'should return channel details status (#RSL8, #RSL8a)' do
        expect(channel_details.channel_id).to eq(channel_name)
        expect(channel_details.name).to eq(channel_name)
        expect(channel_details.status).to be_a(Ably::Models::ChannelStatus)
        expect(channel_details.status.is_active).to eq(true)
        expect(channel_details.status.occupancy.metrics.publishers).to eq(0)
        expect(channel_details.status.occupancy.metrics.subscribers).to eq(0)
        expect(channel_details.status.occupancy.metrics.presence_connections).to eq(0)
        expect(channel_details.status.occupancy.metrics.presence_members).to eq(0)
        expect(channel_details.status.occupancy.metrics.presence_subscribers).to eq(0)
      end
    end
  end
end