##// END OF EJS Templates
Fixed: reminder mails are not sent when delivery_method is :async_smtp (#5058)....
Fixed: reminder mails are not sent when delivery_method is :async_smtp (#5058). git-svn-id: svn+ssh://rubyforge.org/var/svn/redmine/trunk@9367 e93f8b46-1217-0410-a6f0-8f06a7374b81

File last commit:

r9138:5663ca89facc
r9233:fde9c7315ac6
Show More
auth_source_ldap.rb
165 lines | 5.1 KiB | text/x-ruby | RubyLexer
/ app / models / auth_source_ldap.rb
Toshi MARUYAMA
remove trailing white-spaces from app/models/auth_source_ldap.rb....
r6392 # Redmine - project management software
# Copyright (C) 2006-2011 Jean-Philippe Lang
Jean-Philippe Lang
added svn:eol-style native property on /app files...
r330 #
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# as published by the Free Software Foundation; either version 2
# of the License, or (at your option) any later version.
Toshi MARUYAMA
remove trailing white-spaces from app/models/auth_source_ldap.rb....
r6392 #
Jean-Philippe Lang
added svn:eol-style native property on /app files...
r330 # This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
Toshi MARUYAMA
remove trailing white-spaces from app/models/auth_source_ldap.rb....
r6392 #
Jean-Philippe Lang
added svn:eol-style native property on /app files...
r330 # You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
require 'iconv'
Jean-Philippe Lang
Require net/ldap....
r8787 require 'net/ldap'
Jean-Philippe Lang
LDAP: adds the ability to bind with user's account (#1913)....
r9121 require 'net/ldap/dn'
Jean-Philippe Lang
added svn:eol-style native property on /app files...
r330
Toshi MARUYAMA
remove trailing white-spaces from app/models/auth_source_ldap.rb....
r6392 class AuthSourceLdap < AuthSource
Jean-Philippe Lang
added svn:eol-style native property on /app files...
r330 validates_presence_of :host, :port, :attr_login
Jean-Philippe Lang
Adds support for SCM/LDAP passwords encryption in the database (#7411)....
r4830 validates_length_of :name, :host, :maximum => 60, :allow_nil => true
Jean-Philippe Lang
Adds an optional LDAP filter (#1060)....
r8924 validates_length_of :account, :account_password, :base_dn, :filter, :maximum => 255, :allow_blank => true
Jean-Philippe Lang
Improved on-the-fly account creation. If some attributes are missing (eg. not present in the LDAP) or are invalid, the registration form is displayed so that the user is able to fill or fix these attributes....
r1661 validates_length_of :attr_login, :attr_firstname, :attr_lastname, :attr_mail, :maximum => 30, :allow_nil => true
validates_numericality_of :port, :only_integer => true
Jean-Philippe Lang
Adds an optional LDAP filter (#1060)....
r8924 validate :validate_filter
Toshi MARUYAMA
remove trailing white-spaces from app/models/auth_source_ldap.rb....
r6392
Jean-Philippe Lang
Strip LDAP attribute names before saving (#1890)....
r1892 before_validation :strip_ldap_attributes
Toshi MARUYAMA
remove trailing white-spaces from app/models/auth_source_ldap.rb....
r6392
Jean-Philippe Lang
Fixes error message for LDAP filter (#1060)....
r9138 def self.human_attribute_name(attribute_key_name, *args)
attr_name = attribute_key_name.to_s
if attr_name == "filter"
attr_name = "ldap_filter"
end
super(attr_name, *args)
end
Jean-Philippe Lang
Removed after_initialize methods....
r8168 def initialize(attributes=nil, *args)
super
Jean-Philippe Lang
added svn:eol-style native property on /app files...
r330 self.port = 389 if self.port == 0
end
Toshi MARUYAMA
remove trailing white-spaces from app/models/auth_source_ldap.rb....
r6392
Jean-Philippe Lang
added svn:eol-style native property on /app files...
r330 def authenticate(login, password)
Jean-Philippe Lang
Fixed: LDAP authentication without password may be possible (#714)....
r1155 return nil if login.blank? || password.blank?
Jean-Philippe Lang
LDAP: adds the ability to bind with user's account (#1913)....
r9121 attrs = get_user_dn(login, password)
Toshi MARUYAMA
remove trailing white-spaces from app/models/auth_source_ldap.rb....
r6392
Jean-Philippe Lang
Makes AuthSource.authenticate return a hash instead of an array....
r3378 if attrs && attrs[:dn] && authenticate_dn(attrs[:dn], password)
Eric Davis
Refactor: extract an #authenticate_dn method in AuthSourceLdap...
r3327 logger.debug "Authentication successful for '#{login}'" if logger && logger.debug?
Jean-Philippe Lang
Makes AuthSource.authenticate return a hash instead of an array....
r3378 return attrs.except(:dn)
Eric Davis
Refactor: extract an #authenticate_dn method in AuthSourceLdap...
r3327 end
Jean-Philippe Lang
Friendly response when the LDAP connection fails....
r8791 rescue Net::LDAP::LdapError => e
raise AuthSourceException.new(e.message)
Jean-Philippe Lang
added svn:eol-style native property on /app files...
r330 end
# test the connection to the LDAP
def test_connection
ldap_con = initialize_ldap_con(self.account, self.account_password)
ldap_con.open { }
Jean-Philippe Lang
Fixed that LDAP error is not displayed when testing connection....
r9114 rescue Net::LDAP::LdapError => e
raise "LdapError: " + e.message
Jean-Philippe Lang
added svn:eol-style native property on /app files...
r330 end
Toshi MARUYAMA
remove trailing white-spaces from app/models/auth_source_ldap.rb....
r6392
Jean-Philippe Lang
added svn:eol-style native property on /app files...
r330 def auth_method_name
"LDAP"
end
Toshi MARUYAMA
remove trailing white-spaces from app/models/auth_source_ldap.rb....
r6392
Jean-Philippe Lang
Strip LDAP attribute names before saving (#1890)....
r1892 private
Toshi MARUYAMA
remove trailing white-spaces from app/models/auth_source_ldap.rb....
r6392
Jean-Philippe Lang
Adds an optional LDAP filter (#1060)....
r8924 def ldap_filter
if filter.present?
Net::LDAP::Filter.construct(filter)
end
rescue Net::LDAP::LdapError
nil
end
def validate_filter
if filter.present? && ldap_filter.nil?
errors.add(:filter, :invalid)
end
end
Jean-Philippe Lang
Strip LDAP attribute names before saving (#1890)....
r1892 def strip_ldap_attributes
[:attr_login, :attr_firstname, :attr_lastname, :attr_mail].each do |attr|
write_attribute(attr, read_attribute(attr).strip) unless read_attribute(attr).nil?
end
end
Toshi MARUYAMA
remove trailing white-spaces from app/models/auth_source_ldap.rb....
r6392
Jean-Philippe Lang
added svn:eol-style native property on /app files...
r330 def initialize_ldap_con(ldap_user, ldap_password)
Jean-Philippe Lang
Fixed "LdapError: invalid binding information" when no username/password are set on the LDAP account (#764)....
r1180 options = { :host => self.host,
:port => self.port,
:encryption => (self.tls ? :simple_tls : nil)
}
Jean-Philippe Lang
Fix LDAP authentication (#714, broken by r1194)....
r1185 options.merge!(:auth => { :method => :simple, :username => ldap_user, :password => ldap_password }) unless ldap_user.blank? && ldap_password.blank?
Jean-Philippe Lang
Fixed "LdapError: invalid binding information" when no username/password are set on the LDAP account (#764)....
r1180 Net::LDAP.new options
Jean-Philippe Lang
added svn:eol-style native property on /app files...
r330 end
Eric Davis
Refactor: Extract method from AuthSourceLdap#authenticate...
r3325
def get_user_attributes_from_ldap_entry(entry)
Jean-Philippe Lang
Makes AuthSource.authenticate return a hash instead of an array....
r3378 {
Eric Davis
Refactor: Extract #get_user_dn from AuthSourceLdap....
r3340 :dn => entry.dn,
Eric Davis
Refactor: Extract method from AuthSourceLdap#authenticate...
r3325 :firstname => AuthSourceLdap.get_attr(entry, self.attr_firstname),
:lastname => AuthSourceLdap.get_attr(entry, self.attr_lastname),
:mail => AuthSourceLdap.get_attr(entry, self.attr_mail),
:auth_source_id => self.id
Jean-Philippe Lang
Makes AuthSource.authenticate return a hash instead of an array....
r3378 }
Eric Davis
Refactor: Extract method from AuthSourceLdap#authenticate...
r3325 end
Eric Davis
Refactor: extract an #authenticate_dn method in AuthSourceLdap...
r3327
Eric Davis
Refactor: extract AuthSourceLdap#search_attributes...
r3339 # Return the attributes needed for the LDAP search. It will only
# include the user attributes if on-the-fly registration is enabled
def search_attributes
if onthefly_register?
['dn', self.attr_firstname, self.attr_lastname, self.attr_mail]
else
['dn']
end
end
Eric Davis
Refactor: extract an #authenticate_dn method in AuthSourceLdap...
r3327 # Check if a DN (user record) authenticates with the password
def authenticate_dn(dn, password)
Eric Davis
Refactor: Rewrite authenticate_dn to use an implicit return....
r3336 if dn.present? && password.present?
initialize_ldap_con(dn, password).bind
end
Eric Davis
Refactor: extract an #authenticate_dn method in AuthSourceLdap...
r3327 end
Eric Davis
Refactor: Extract #get_user_dn from AuthSourceLdap....
r3340
# Get the user's dn and any attributes for them, given their login
Jean-Philippe Lang
LDAP: adds the ability to bind with user's account (#1913)....
r9121 def get_user_dn(login, password)
ldap_con = nil
Jean-Philippe Lang
Typo (#1913)....
r9123 if self.account && self.account.include?("$login")
Jean-Philippe Lang
LDAP: adds the ability to bind with user's account (#1913)....
r9121 ldap_con = initialize_ldap_con(self.account.sub("$login", Net::LDAP::DN.escape(login)), password)
else
ldap_con = initialize_ldap_con(self.account, self.account_password)
end
Toshi MARUYAMA
remove trailing white-spaces from app/models/auth_source_ldap.rb....
r6392 login_filter = Net::LDAP::Filter.eq( self.attr_login, login )
object_filter = Net::LDAP::Filter.eq( "objectClass", "*" )
Jean-Philippe Lang
Makes AuthSource.authenticate return a hash instead of an array....
r3378 attrs = {}
Toshi MARUYAMA
remove trailing white-spaces from app/models/auth_source_ldap.rb....
r6392
Jean-Philippe Lang
Adds an optional LDAP filter (#1060)....
r8924 search_filter = object_filter & login_filter
if f = ldap_filter
search_filter = search_filter & f
end
Toshi MARUYAMA
remove trailing white-spaces from app/models/auth_source_ldap.rb....
r6392 ldap_con.search( :base => self.base_dn,
Jean-Philippe Lang
Adds an optional LDAP filter (#1060)....
r8924 :filter => search_filter,
Eric Davis
Refactor: Extract #get_user_dn from AuthSourceLdap....
r3340 :attributes=> search_attributes) do |entry|
if onthefly_register?
attrs = get_user_attributes_from_ldap_entry(entry)
else
Jean-Philippe Lang
Makes AuthSource.authenticate return a hash instead of an array....
r3378 attrs = {:dn => entry.dn}
Eric Davis
Refactor: Extract #get_user_dn from AuthSourceLdap....
r3340 end
Jean-Philippe Lang
Makes AuthSource.authenticate return a hash instead of an array....
r3378 logger.debug "DN found for #{login}: #{attrs[:dn]}" if logger && logger.debug?
Eric Davis
Refactor: Extract #get_user_dn from AuthSourceLdap....
r3340 end
attrs
end
Toshi MARUYAMA
remove trailing white-spaces from app/models/auth_source_ldap.rb....
r6392
Jean-Philippe Lang
added svn:eol-style native property on /app files...
r330 def self.get_attr(entry, attr_name)
Jean-Philippe Lang
Do not request blank LDAP attributes....
r2054 if !attr_name.blank?
entry[attr_name].is_a?(Array) ? entry[attr_name].first : entry[attr_name]
end
Jean-Philippe Lang
0.3 unstable...
r10 end
end