Chris@1295: # Redmine - project management software
Chris@1295: # Copyright (C) 2006-2012  Jean-Philippe Lang
Chris@1295: #
Chris@1295: # This program is free software; you can redistribute it and/or
Chris@1295: # modify it under the terms of the GNU General Public License
Chris@1295: # as published by the Free Software Foundation; either version 2
Chris@1295: # of the License, or (at your option) any later version.
Chris@1295: #
Chris@1295: # This program is distributed in the hope that it will be useful,
Chris@1295: # but WITHOUT ANY WARRANTY; without even the implied warranty of
Chris@1295: # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
Chris@1295: # GNU General Public License for more details.
Chris@1295: #
Chris@1295: # You should have received a copy of the GNU General Public License
Chris@1295: # along with this program; if not, write to the Free Software
Chris@1295: # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
Chris@1295: 
Chris@1295: require File.expand_path('../../test_helper', __FILE__)
Chris@1295: 
Chris@1295: class AuthSourceLdapTest < ActiveSupport::TestCase
Chris@1295:   include Redmine::I18n
Chris@1295:   fixtures :auth_sources
Chris@1295: 
Chris@1295:   def setup
Chris@1295:   end
Chris@1295: 
Chris@1295:   def test_create
Chris@1295:     a = AuthSourceLdap.new(:name => 'My LDAP', :host => 'ldap.example.net', :port => 389, :base_dn => 'dc=example,dc=net', :attr_login => 'sAMAccountName')
Chris@1295:     assert a.save
Chris@1295:   end
Chris@1295: 
Chris@1295:   def test_should_strip_ldap_attributes
Chris@1295:     a = AuthSourceLdap.new(:name => 'My LDAP', :host => 'ldap.example.net', :port => 389, :base_dn => 'dc=example,dc=net', :attr_login => 'sAMAccountName',
Chris@1295:                            :attr_firstname => 'givenName ')
Chris@1295:     assert a.save
Chris@1295:     assert_equal 'givenName', a.reload.attr_firstname
Chris@1295:   end
Chris@1295: 
Chris@1295:   def test_replace_port_zero_to_389
Chris@1295:     a = AuthSourceLdap.new(
Chris@1295:            :name => 'My LDAP', :host => 'ldap.example.net', :port => 0,
Chris@1295:            :base_dn => 'dc=example,dc=net', :attr_login => 'sAMAccountName',
Chris@1295:            :attr_firstname => 'givenName ')
Chris@1295:     assert a.save
Chris@1295:     assert_equal 389, a.port
Chris@1295:   end
Chris@1295: 
Chris@1295:   def test_filter_should_be_validated
Chris@1295:     set_language_if_valid 'en'
Chris@1295: 
Chris@1295:     a = AuthSourceLdap.new(:name => 'My LDAP', :host => 'ldap.example.net', :port => 389, :attr_login => 'sn')
Chris@1295:     a.filter = "(mail=*@redmine.org"
Chris@1295:     assert !a.valid?
Chris@1295:     assert_include "LDAP filter is invalid", a.errors.full_messages
Chris@1295: 
Chris@1295:     a.filter = "(mail=*@redmine.org)"
Chris@1295:     assert a.valid?
Chris@1295:   end
Chris@1295: 
Chris@1295:   if ldap_configured?
Chris@1295:     context '#authenticate' do
Chris@1295:       setup do
Chris@1295:         @auth = AuthSourceLdap.find(1)
Chris@1295:         @auth.update_attribute :onthefly_register, true
Chris@1295:       end
Chris@1295: 
Chris@1295:       context 'with a valid LDAP user' do
Chris@1295:         should 'return the user attributes' do
Chris@1295:           attributes =  @auth.authenticate('example1','123456')
Chris@1295:           assert attributes.is_a?(Hash), "An hash was not returned"
Chris@1295:           assert_equal 'Example', attributes[:firstname]
Chris@1295:           assert_equal 'One', attributes[:lastname]
Chris@1295:           assert_equal 'example1@redmine.org', attributes[:mail]
Chris@1295:           assert_equal @auth.id, attributes[:auth_source_id]
Chris@1295:           attributes.keys.each do |attribute|
Chris@1295:             assert User.new.respond_to?("#{attribute}="), "Unexpected :#{attribute} attribute returned"
Chris@1295:           end
Chris@1295:         end
Chris@1295:       end
Chris@1295: 
Chris@1295:       context 'with an invalid LDAP user' do
Chris@1295:         should 'return nil' do
Chris@1295:           assert_equal nil, @auth.authenticate('nouser','123456')
Chris@1295:         end
Chris@1295:       end
Chris@1295: 
Chris@1295:       context 'without a login' do
Chris@1295:         should 'return nil' do
Chris@1295:           assert_equal nil, @auth.authenticate('','123456')
Chris@1295:         end
Chris@1295:       end
Chris@1295: 
Chris@1295:       context 'without a password' do
Chris@1295:         should 'return nil' do
Chris@1295:           assert_equal nil, @auth.authenticate('edavis','')
Chris@1295:         end
Chris@1295:       end
Chris@1295: 
Chris@1295:       context 'without filter' do
Chris@1295:         should 'return any user' do
Chris@1295:           assert @auth.authenticate('example1','123456')
Chris@1295:           assert @auth.authenticate('edavis', '123456')
Chris@1295:         end
Chris@1295:       end
Chris@1295: 
Chris@1295:       context 'with filter' do
Chris@1295:         setup do
Chris@1295:           @auth.filter = "(mail=*@redmine.org)"
Chris@1295:         end
Chris@1295: 
Chris@1295:         should 'return user who matches the filter only' do
Chris@1295:           assert @auth.authenticate('example1','123456')
Chris@1295:           assert_nil @auth.authenticate('edavis', '123456')
Chris@1295:         end
Chris@1295:       end
Chris@1295:     end
Chris@1295: 
Chris@1295:     def test_authenticate_should_timeout
Chris@1295:       auth_source = AuthSourceLdap.find(1)
Chris@1295:       auth_source.timeout = 1
Chris@1295:       def auth_source.initialize_ldap_con(*args); sleep(5); end
Chris@1295: 
Chris@1295:       assert_raise AuthSourceTimeoutException do
Chris@1295:         auth_source.authenticate 'example1', '123456'
Chris@1295:       end
Chris@1295:     end
Chris@1295:   else
Chris@1295:     puts '(Test LDAP server not configured)'
Chris@1295:   end
Chris@1295: end