jro_apps/redmine Commit - r1185:482d9a4e82ef

1

# redMine - project management software

1

# redMine - project management software

2

3

#

3

#

4

# This program is free software; you can redistribute it and/or

4

# This program is free software; you can redistribute it and/or

5

# modify it under the terms of the GNU General Public License

5

# modify it under the terms of the GNU General Public License

6

# as published by the Free Software Foundation; either version 2

6

# as published by the Free Software Foundation; either version 2

7

# of the License, or (at your option) any later version.

7

# of the License, or (at your option) any later version.

8

#

8

#

9

# This program is distributed in the hope that it will be useful,

9

# This program is distributed in the hope that it will be useful,

10

# but WITHOUT ANY WARRANTY; without even the implied warranty of

10

# but WITHOUT ANY WARRANTY; without even the implied warranty of

11

# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the

11

# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the

12

# GNU General Public License for more details.

12

# GNU General Public License for more details.

13

#

13

#

14

# You should have received a copy of the GNU General Public License

14

# You should have received a copy of the GNU General Public License

15

# along with this program; if not, write to the Free Software

15

# along with this program; if not, write to the Free Software

16

# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.

16

# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.

17

18

require 'net/ldap'

18

require 'net/ldap'

19

require 'iconv'

19

require 'iconv'

20

21

class AuthSourceLdap < AuthSource

21

class AuthSourceLdap < AuthSource

22

validates_presence_of :host, :port, :attr_login

22

validates_presence_of :host, :port, :attr_login

23

validates_presence_of :attr_firstname, :attr_lastname, :attr_mail, :if => Proc.new { |a| a.onthefly_register? }

23

validates_presence_of :attr_firstname, :attr_lastname, :attr_mail, :if => Proc.new { |a| a.onthefly_register? }

24

25

def after_initialize

25

def after_initialize

26

self.port = 389 if self.port == 0

26

self.port = 389 if self.port == 0

27

end

27

end

28

29

def authenticate(login, password)

29

def authenticate(login, password)

30

return nil if login.blank? || password.blank?

30

return nil if login.blank? || password.blank?

31

attrs = []

31

attrs = []

32

# get user's DN

32

# get user's DN

33

ldap_con = initialize_ldap_con(self.account, self.account_password)

33

ldap_con = initialize_ldap_con(self.account, self.account_password)

34

login_filter = Net::LDAP::Filter.eq( self.attr_login, login )

34

login_filter = Net::LDAP::Filter.eq( self.attr_login, login )

35

object_filter = Net::LDAP::Filter.eq( "objectClass", "*" )

35

object_filter = Net::LDAP::Filter.eq( "objectClass", "*" )

36

dn = String.new

36

dn = String.new

37

ldap_con.search( :base => self.base_dn,

37

ldap_con.search( :base => self.base_dn,

38

:filter => object_filter & login_filter,

38

:filter => object_filter & login_filter,

39

# only ask for the DN if on-the-fly registration is disabled

39

# only ask for the DN if on-the-fly registration is disabled

40

:attributes=> (onthefly_register? ? ['dn', self.attr_firstname, self.attr_lastname, self.attr_mail] : ['dn'])) do |entry|

40

:attributes=> (onthefly_register? ? ['dn', self.attr_firstname, self.attr_lastname, self.attr_mail] : ['dn'])) do |entry|

41

dn = entry.dn

41

dn = entry.dn

42

attrs = [:firstname => AuthSourceLdap.get_attr(entry, self.attr_firstname),

42

attrs = [:firstname => AuthSourceLdap.get_attr(entry, self.attr_firstname),

43

:lastname => AuthSourceLdap.get_attr(entry, self.attr_lastname),

43

:lastname => AuthSourceLdap.get_attr(entry, self.attr_lastname),

44

:mail => AuthSourceLdap.get_attr(entry, self.attr_mail),

44

:mail => AuthSourceLdap.get_attr(entry, self.attr_mail),

45

:auth_source_id => self.id ] if onthefly_register?

45

:auth_source_id => self.id ] if onthefly_register?

46

end

46

end

47

return nil if dn.empty?

47

return nil if dn.empty?

48

logger.debug "DN found for #{login}: #{dn}" if logger && logger.debug?

48

logger.debug "DN found for #{login}: #{dn}" if logger && logger.debug?

49

# authenticate user

49

# authenticate user

50

ldap_con = initialize_ldap_con(dn, password)

50

ldap_con = initialize_ldap_con(dn, password)

51

return nil unless ldap_con.bind

51

return nil unless ldap_con.bind

52

# return user's attributes

52

# return user's attributes

53

logger.debug "Authentication successful for '#{login}'" if logger && logger.debug?

53

logger.debug "Authentication successful for '#{login}'" if logger && logger.debug?

54

attrs

54

attrs

55

rescue Net::LDAP::LdapError => text

55

rescue Net::LDAP::LdapError => text

56

raise "LdapError: " + text

56

raise "LdapError: " + text

57

end

57

end

58

59

# test the connection to the LDAP

59

# test the connection to the LDAP

60

def test_connection

60

def test_connection

61

ldap_con = initialize_ldap_con(self.account, self.account_password)

61

ldap_con = initialize_ldap_con(self.account, self.account_password)

62

ldap_con.open { }

62

ldap_con.open { }

63

rescue Net::LDAP::LdapError => text

63

rescue Net::LDAP::LdapError => text

64

raise "LdapError: " + text

64

raise "LdapError: " + text

65

end

65

end

66

67

def auth_method_name

67

def auth_method_name

68

"LDAP"

68

"LDAP"

69

end

69

end

70

71

private

71

private

72

def initialize_ldap_con(ldap_user, ldap_password)

72

def initialize_ldap_con(ldap_user, ldap_password)

73

options = { :host => self.host,

73

options = { :host => self.host,

74

:port => self.port,

74

:port => self.port,

75

:encryption => (self.tls ? :simple_tls : nil)

75

:encryption => (self.tls ? :simple_tls : nil)

76

}

76

}

77

options.merge(:auth => { :method => :simple, :username => ldap_user, :password => ldap_password }) unless ldap_user.blank? && ldap_password.blank?

77

options.merge!(:auth => { :method => :simple, :username => ldap_user, :password => ldap_password }) unless ldap_user.blank? && ldap_password.blank?

78

Net::LDAP.new options

78

Net::LDAP.new options

79

end

79

end

80

81

def self.get_attr(entry, attr_name)

81

def self.get_attr(entry, attr_name)

82

entry[attr_name].is_a?(Array) ? entry[attr_name].first : entry[attr_name]

82

entry[attr_name].is_a?(Array) ? entry[attr_name].first : entry[attr_name]

83

end

83

end

84

end

84

end

	Site-wide shortcuts
/	Use quick search box
g h	Goto home page
g g	Goto my private gists page
g G	Goto my public gists page
g 0-9	Goto bookmarked items from 0-9
n r	New repository page
n g	New gist page

	Repositories
g s	Goto summary page
g c	Goto changelog page
g f	Goto files page
g F	Goto files page with file search activated
g p	Goto pull requests page
g o	Goto repository settings
g O	Goto repository access permissions settings
t s	Toggle sidebar on some pages

             # redMine - project management software
             # Copyright (C) 2006  Jean-Philippe Lang
             #
             # 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.
             #
             # 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.
             #
             # 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 'net/ldap'
             require 'iconv'
             class AuthSourceLdap < AuthSource
               validates_presence_of :host, :port, :attr_login
               validates_presence_of :attr_firstname, :attr_lastname, :attr_mail, :if => Proc.new { |a| a.onthefly_register? }
               def after_initialize
                 self.port = 389 if self.port == 0
               end
               def authenticate(login, password)
                 return nil if login.blank? || password.blank?
                 attrs = []
                 # get user's DN
                 ldap_con = initialize_ldap_con(self.account, self.account_password)
                 login_filter = Net::LDAP::Filter.eq( self.attr_login, login )
                 object_filter = Net::LDAP::Filter.eq( "objectClass", "*" )
                 dn = String.new
                 ldap_con.search( :base => self.base_dn,
                                  :filter => object_filter & login_filter,
                                  # only ask for the DN if on-the-fly registration is disabled
                                  :attributes=> (onthefly_register? ? ['dn', self.attr_firstname, self.attr_lastname, self.attr_mail] : ['dn'])) do |entry|
                   dn = entry.dn
                   attrs = [: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 ] if onthefly_register?
                 end
                 return nil if dn.empty?
                 logger.debug "DN found for #{login}: #{dn}" if logger && logger.debug?
                 # authenticate user
                 ldap_con = initialize_ldap_con(dn, password)
                 return nil unless ldap_con.bind
                 # return user's attributes
                 logger.debug "Authentication successful for '#{login}'" if logger && logger.debug?
                 attrs
               rescue  Net::LDAP::LdapError => text
                 raise "LdapError: " + text
               end
               # test the connection to the LDAP
               def test_connection
                 ldap_con = initialize_ldap_con(self.account, self.account_password)
                 ldap_con.open { }
               rescue  Net::LDAP::LdapError => text
                 raise "LdapError: " + text
               end
               def auth_method_name
                 "LDAP"
               end
             private
               def initialize_ldap_con(ldap_user, ldap_password)
                 options = { :host => self.host,
                             :port => self.port,
                             :encryption => (self.tls ? :simple_tls : nil)
                           }
-                options.merge(:auth => { :method => :simple, :username => ldap_user, :password => ldap_password }) unless ldap_user.blank? && ldap_password.blank?
+                options.merge!(:auth => { :method => :simple, :username => ldap_user, :password => ldap_password }) unless ldap_user.blank? && ldap_password.blank?
                 Net::LDAP.new options
               end
               def self.get_attr(entry, attr_name)
                 entry[attr_name].is_a?(Array) ? entry[attr_name].first : entry[attr_name]
               end
             end