#!/usr/bin/env ruby

BEGIN {

	require 'pathname'

	basedir = Pathname.new( __FILE__ ).dirname.parent.parent

	libdir = basedir + "lib"

	$LOAD_PATH.unshift( libdir ) unless $LOAD_PATH.include?( libdir )

}

begin

	require 'ostruct'

	require 'spec/runner'

	require 'spec/lib/helpers'

	require 'ezmlm/listdaemon'

rescue LoadError

	unless Object.const_defined?( :Gem )

		require 'rubygems'

		retry

	end

	raise

end

describe Ezmlm::ListDaemon do

	include Ezmlm::SpecHelpers

	DEFAULT_ADDRESS = Ezmlm::ListDaemon::DEFAULT_ADDRESS

	DEFAULT_PORT = Ezmlm::ListDaemon::DEFAULT_PORT

	it "can return a struct that contains its default options" do

		opts = Ezmlm::ListDaemon.default_options

		opts.should be_an_instance_of( OpenStruct )

		opts.bind_addr.should == DEFAULT_ADDRESS

		opts.bind_port.should == DEFAULT_PORT

		opts.debugmode.should == false

		opts.helpmode.should == false

	end

	describe "created with defaults" do

		DEFAULT_URL = "druby://%s:%d" % [ DEFAULT_ADDRESS, DEFAULT_PORT ]

		before( :each ) do

			@test_list_dir = Pathname.new( 'lists' )

			@daemon = Ezmlm::ListDaemon.new( @test_list_dir )

		end

		it "can be started and will return a thread" do

			mock_drb_thread = mock( "drb thread" )

			DRb.should_receive( :start_service ).with( DEFAULT_URL, @daemon.service )

			DRb.should_receive( :thread ).and_return( mock_drb_thread )

			@daemon.start.should == mock_drb_thread

		end

	end

	describe "created with an options struct" do

		TEST_ADDRESS = '0.0.0.0'

		TEST_PORT = 17771

		TEST_URL = "druby://%s:%d" % [ TEST_ADDRESS, TEST_PORT ]

		before( :each ) do

			@test_list_dir = Pathname.new( 'lists' )

			@opts = Ezmlm::ListDaemon.default_options

			@opts.bind_addr = TEST_ADDRESS

			@opts.bind_port = TEST_PORT

			@daemon = Ezmlm::ListDaemon.new( @test_list_dir, @opts )

		end

		it "can be started and will return a thread" do

			mock_drb_thread = mock( "drb thread" )

			DRb.should_receive( :start_service ).with( TEST_URL, @daemon.service )

			DRb.should_receive( :thread ).and_return( mock_drb_thread )

			@daemon.start.should == mock_drb_thread

		end

	end

end

describe Ezmlm::ListDaemon::Service do

	before( :each ) do

		@dummydir = 'lists'

		@service = Ezmlm::ListDaemon::Service.new( @dummydir )

	end

	it "can return a list object by name if there is a corresponding listdir" do

		@service.get_list( 'announce' ).should be_an_instance_of( Ezmlm::List )

	end

	it "raises an exception when asked for a list whose name contains invalid characters" do

		lambda {

			@service.get_list( 'glarg beegun' )

		}.should raise_error( ArgumentError )

	end

	it "can iterate over listdirs, yielding each as a Ezmlm::List object" do

		Ezmlm.should_receive( :each_list ).with( Pathname.new(@dummydir) ).and_yield( :a_list )

		@service.each_list {|l| l.should == :a_list }

	end

end

# listservice = DRbObject.new( nil, 'druby://lists.laika.com:23431' )

# announce = listservice.each_list do |list|

# 	last_posts << list.last_post

# end

# announce = listservice.get_list( 'announce' )

# 

# announce.last_post

# 

#