#--
# =============================================================================
# Copyright (c) 2004, Jamis Buck (jgb3@email.byu.edu)
# All rights reserved.
# 
# Redistribution and use in source and binary forms, with or without
# modification, are permitted provided that the following conditions are met:
# 
#     * Redistributions of source code must retain the above copyright notice,
#       this list of conditions and the following disclaimer.
# 
#     * Redistributions in binary form must reproduce the above copyright
#       notice, this list of conditions and the following disclaimer in the
#       documentation and/or other materials provided with the distribution.
# 
#     * The names of its contributors may not be used to endorse or promote
#       products derived from this software without specific prior written
#       permission.
# 
# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
# =============================================================================
#++

$:.unshift "../lib"

require 'test/unit'
require 'copland/errors'
require 'copland/registry'

class TC_Interceptors < Test::Unit::TestCase

  def setup
    @registry = Copland::Registry.build(
      File.join( File.dirname( __FILE__ ), "services" ),
      :log_device => $stdout )
  end

  def teardown
    @registry.shutdown
  end

  def test_simple
    service = @registry.service( "service-test.Intercepted1" )
    cfg = @registry.configuration_point( "service-test.Messages" )

    assert cfg.empty?
    service.echo "a"
    assert_equal [ "A" ], cfg
  end

  def test_ordering_error
    service = @registry.service( "service-test.InterceptorOrderingError1" )

    assert_raise( Copland::OrderingException ) do
      service.echo "a"
    end

    service = @registry.service( "service-test.InterceptorOrderingError2" )

    assert_raise( Copland::OrderingException ) do
      service.echo "a"
    end
  end

  def test_ordering
    service = @registry.service( "service-test.InterceptorOrdering1" )
    cfg = @registry.configuration_point( "service-test.Messages" )

    assert cfg.empty?
    service.echo "a"
    assert_equal [ "C", "B", "A" ], cfg
  end

end