2015-08-16 02:31:54 -04:00
// Copyright 2014 The Gogs Authors. All rights reserved.
2014-04-22 12:55:27 -04:00
// Use of this source code is governed by a MIT-style
// license that can be found in the LICENSE file.
2015-08-16 02:31:54 -04:00
// Package ldap provide functions & structure to query a LDAP ldap directory
2014-04-22 12:55:27 -04:00
// For now, it's mainly tested again an MS Active Directory service, see README.md for more information
package ldap
import (
2015-09-14 15:48:51 -04:00
"crypto/tls"
2014-04-22 12:55:27 -04:00
"fmt"
2015-10-26 21:08:59 -04:00
"strings"
2014-05-02 22:48:14 -04:00
2015-11-26 14:04:58 -05:00
"gopkg.in/ldap.v2"
2016-11-10 11:24:48 -05:00
"code.gitea.io/gitea/modules/log"
2014-04-22 12:55:27 -04:00
)
2016-11-27 01:03:59 -05:00
// SecurityProtocol protocol type
2016-07-07 19:25:09 -04:00
type SecurityProtocol int
// Note: new type must be added at the end of list to maintain compatibility.
const (
2016-11-07 11:38:43 -05:00
SecurityProtocolUnencrypted SecurityProtocol = iota
2016-11-07 15:58:22 -05:00
SecurityProtocolLDAPS
SecurityProtocolStartTLS
2016-07-07 19:25:09 -04:00
)
2016-11-27 01:03:59 -05:00
// Source Basic LDAP authentication service
2015-09-14 15:48:51 -04:00
type Source struct {
2015-12-01 08:49:49 -05:00
Name string // canonical name (ie. corporate.ad)
Host string // LDAP host
Port int // port number
2016-07-07 19:25:09 -04:00
SecurityProtocol SecurityProtocol
2015-12-01 08:49:49 -05:00
SkipVerify bool
BindDN string // DN to bind with
BindPassword string // Bind DN password
UserBase string // Base search path for users
UserDN string // Template for the DN of the user for simple auth
AttributeUsername string // Username attribute
AttributeName string // First name attribute
AttributeSurname string // Surname attribute
AttributeMail string // E-mail attribute
2016-02-16 06:33:16 -05:00
AttributesInBind bool // fetch attributes in bind context (not user)
2015-12-01 08:49:49 -05:00
Filter string // Query filter to validate entry
AdminFilter string // Query filter to check if user is admin
Enabled bool // if this source is disabled
2014-04-22 12:55:27 -04:00
}
2017-05-10 09:10:18 -04:00
// SearchResult : user data
type SearchResult struct {
Username string // Username
Name string // Name
Surname string // Surname
Mail string // E-mail address
IsAdmin bool // if user is administrator
}
2015-10-26 21:08:59 -04:00
func ( ls * Source ) sanitizedUserQuery ( username string ) ( string , bool ) {
// See http://tools.ietf.org/search/rfc4515
badCharacters := "\x00()*\\"
if strings . ContainsAny ( username , badCharacters ) {
log . Debug ( "'%s' contains invalid query characters. Aborting." , username )
return "" , false
}
return fmt . Sprintf ( ls . Filter , username ) , true
}
func ( ls * Source ) sanitizedUserDN ( username string ) ( string , bool ) {
// See http://tools.ietf.org/search/rfc4514: "special characters"
2017-11-13 04:32:16 -05:00
badCharacters := "\x00()*\\,='\"#+;<>"
2015-10-26 21:08:59 -04:00
if strings . ContainsAny ( username , badCharacters ) {
log . Debug ( "'%s' contains invalid DN characters. Aborting." , username )
return "" , false
}
return fmt . Sprintf ( ls . UserDN , username ) , true
}
2016-02-16 05:58:00 -05:00
func ( ls * Source ) findUserDN ( l * ldap . Conn , name string ) ( string , bool ) {
2015-08-12 19:58:27 -04:00
log . Trace ( "Search for LDAP user: %s" , name )
if ls . BindDN != "" && ls . BindPassword != "" {
2016-02-16 05:58:00 -05:00
err := l . Bind ( ls . BindDN , ls . BindPassword )
2015-08-12 19:58:27 -04:00
if err != nil {
2015-08-17 16:03:11 -04:00
log . Debug ( "Failed to bind as BindDN[%s]: %v" , ls . BindDN , err )
2015-08-16 02:31:54 -04:00
return "" , false
2014-04-22 12:55:27 -04:00
}
2015-08-12 19:58:27 -04:00
log . Trace ( "Bound as BindDN %s" , ls . BindDN )
} else {
log . Trace ( "Proceeding with anonymous LDAP search." )
}
// A search for the user.
2015-10-26 21:08:59 -04:00
userFilter , ok := ls . sanitizedUserQuery ( name )
if ! ok {
return "" , false
}
2016-02-16 06:36:40 -05:00
log . Trace ( "Searching for DN using filter %s and base %s" , userFilter , ls . UserBase )
2015-08-12 19:58:27 -04:00
search := ldap . NewSearchRequest (
ls . UserBase , ldap . ScopeWholeSubtree , ldap . NeverDerefAliases , 0 , 0 ,
false , userFilter , [ ] string { } , nil )
// Ensure we found a user
sr , err := l . Search ( search )
if err != nil || len ( sr . Entries ) < 1 {
2015-08-17 16:03:11 -04:00
log . Debug ( "Failed search using filter[%s]: %v" , userFilter , err )
2015-08-16 02:31:54 -04:00
return "" , false
2015-08-12 19:58:27 -04:00
} else if len ( sr . Entries ) > 1 {
log . Debug ( "Filter '%s' returned more than one user." , userFilter )
2015-08-16 02:31:54 -04:00
return "" , false
2014-04-22 12:55:27 -04:00
}
2015-08-12 19:58:27 -04:00
2015-08-16 02:31:54 -04:00
userDN := sr . Entries [ 0 ] . DN
2015-08-12 19:58:27 -04:00
if userDN == "" {
2015-12-06 09:42:23 -05:00
log . Error ( 4 , "LDAP search was successful, but found no DN!" )
2015-08-16 02:31:54 -04:00
return "" , false
2015-08-12 19:58:27 -04:00
}
2015-08-16 02:31:54 -04:00
return userDN , true
2014-04-22 12:55:27 -04:00
}
2016-07-07 19:25:09 -04:00
func dial ( ls * Source ) ( * ldap . Conn , error ) {
log . Trace ( "Dialing LDAP with security protocol (%v) without verifying: %v" , ls . SecurityProtocol , ls . SkipVerify )
tlsCfg := & tls . Config {
ServerName : ls . Host ,
InsecureSkipVerify : ls . SkipVerify ,
}
2016-11-07 15:58:22 -05:00
if ls . SecurityProtocol == SecurityProtocolLDAPS {
2016-07-07 19:25:09 -04:00
return ldap . DialTLS ( "tcp" , fmt . Sprintf ( "%s:%d" , ls . Host , ls . Port ) , tlsCfg )
}
conn , err := ldap . Dial ( "tcp" , fmt . Sprintf ( "%s:%d" , ls . Host , ls . Port ) )
if err != nil {
return nil , fmt . Errorf ( "Dial: %v" , err )
}
2016-11-07 15:58:22 -05:00
if ls . SecurityProtocol == SecurityProtocolStartTLS {
2016-07-07 19:25:09 -04:00
if err = conn . StartTLS ( tlsCfg ) ; err != nil {
conn . Close ( )
return nil , fmt . Errorf ( "StartTLS: %v" , err )
}
}
return conn , nil
}
func bindUser ( l * ldap . Conn , userDN , passwd string ) error {
log . Trace ( "Binding with userDN: %s" , userDN )
err := l . Bind ( userDN , passwd )
if err != nil {
log . Debug ( "LDAP auth. failed for %s, reason: %v" , userDN , err )
return err
}
log . Trace ( "Bound successfully with userDN: %s" , userDN )
return err
}
2017-05-10 09:10:18 -04:00
func checkAdmin ( l * ldap . Conn , ls * Source , userDN string ) bool {
if len ( ls . AdminFilter ) > 0 {
log . Trace ( "Checking admin with filter %s and base %s" , ls . AdminFilter , userDN )
search := ldap . NewSearchRequest (
userDN , ldap . ScopeWholeSubtree , ldap . NeverDerefAliases , 0 , 0 , false , ls . AdminFilter ,
[ ] string { ls . AttributeName } ,
nil )
sr , err := l . Search ( search )
if err != nil {
log . Error ( 4 , "LDAP Admin Search failed unexpectedly! (%v)" , err )
} else if len ( sr . Entries ) < 1 {
log . Error ( 4 , "LDAP Admin Search failed" )
} else {
return true
}
}
return false
}
2016-11-27 01:03:59 -05:00
// SearchEntry : search an LDAP source if an entry (name, passwd) is valid and in the specific filter
2017-05-10 09:10:18 -04:00
func ( ls * Source ) SearchEntry ( name , passwd string , directBind bool ) * SearchResult {
2016-12-11 19:46:51 -05:00
// See https://tools.ietf.org/search/rfc4513#section-5.1.2
if len ( passwd ) == 0 {
log . Debug ( "Auth. failed for %s, password cannot be empty" )
2017-05-10 09:10:18 -04:00
return nil
2016-12-11 19:46:51 -05:00
}
2016-07-07 19:25:09 -04:00
l , err := dial ( ls )
2016-02-16 05:58:00 -05:00
if err != nil {
log . Error ( 4 , "LDAP Connect error, %s:%v" , ls . Host , err )
ls . Enabled = false
2017-05-10 09:10:18 -04:00
return nil
2016-02-16 05:58:00 -05:00
}
defer l . Close ( )
2015-09-04 23:39:23 -04:00
var userDN string
if directBind {
2015-09-16 12:15:14 -04:00
log . Trace ( "LDAP will bind directly via UserDN template: %s" , ls . UserDN )
2015-10-26 21:08:59 -04:00
var ok bool
userDN , ok = ls . sanitizedUserDN ( name )
if ! ok {
2017-05-10 09:10:18 -04:00
return nil
2015-10-26 21:08:59 -04:00
}
2015-09-04 23:39:23 -04:00
} else {
log . Trace ( "LDAP will use BindDN." )
var found bool
2016-02-16 05:58:00 -05:00
userDN , found = ls . findUserDN ( l , name )
2015-09-04 23:39:23 -04:00
if ! found {
2017-05-10 09:10:18 -04:00
return nil
2015-09-04 23:39:23 -04:00
}
2015-08-12 19:58:27 -04:00
}
2016-02-16 06:33:16 -05:00
if directBind || ! ls . AttributesInBind {
// binds user (checking password) before looking-up attributes in user context
err = bindUser ( l , userDN , passwd )
if err != nil {
2017-05-10 09:10:18 -04:00
return nil
2016-02-16 06:33:16 -05:00
}
2014-04-22 12:55:27 -04:00
}
2015-10-26 21:08:59 -04:00
userFilter , ok := ls . sanitizedUserQuery ( name )
if ! ok {
2017-05-10 09:10:18 -04:00
return nil
2015-10-26 21:08:59 -04:00
}
2016-02-16 06:36:40 -05:00
log . Trace ( "Fetching attributes '%v', '%v', '%v', '%v' with filter %s and base %s" , ls . AttributeUsername , ls . AttributeName , ls . AttributeSurname , ls . AttributeMail , userFilter , userDN )
2014-09-07 20:04:47 -04:00
search := ldap . NewSearchRequest (
2015-08-12 19:58:27 -04:00
userDN , ldap . ScopeWholeSubtree , ldap . NeverDerefAliases , 0 , 0 , false , userFilter ,
2016-02-07 12:18:29 -05:00
[ ] string { ls . AttributeUsername , ls . AttributeName , ls . AttributeSurname , ls . AttributeMail } ,
2014-04-22 12:55:27 -04:00
nil )
2015-08-12 19:58:27 -04:00
2014-04-22 12:55:27 -04:00
sr , err := l . Search ( search )
if err != nil {
2015-08-17 16:03:11 -04:00
log . Error ( 4 , "LDAP Search failed unexpectedly! (%v)" , err )
2017-05-10 09:10:18 -04:00
return nil
2015-08-12 19:58:27 -04:00
} else if len ( sr . Entries ) < 1 {
2015-09-04 23:39:23 -04:00
if directBind {
log . Error ( 4 , "User filter inhibited user login." )
} else {
log . Error ( 4 , "LDAP Search failed unexpectedly! (0 entries)" )
}
2017-05-10 09:10:18 -04:00
return nil
2014-04-22 12:55:27 -04:00
}
2015-08-12 19:58:27 -04:00
2016-07-11 19:07:57 -04:00
username := sr . Entries [ 0 ] . GetAttributeValue ( ls . AttributeUsername )
firstname := sr . Entries [ 0 ] . GetAttributeValue ( ls . AttributeName )
surname := sr . Entries [ 0 ] . GetAttributeValue ( ls . AttributeSurname )
mail := sr . Entries [ 0 ] . GetAttributeValue ( ls . AttributeMail )
2017-05-10 09:10:18 -04:00
isAdmin := checkAdmin ( l , ls , userDN )
2015-08-19 00:34:03 -04:00
2017-05-10 09:10:18 -04:00
if ! directBind && ls . AttributesInBind {
// binds user (checking password) after looking-up attributes in BindDN context
err = bindUser ( l , userDN , passwd )
2015-09-01 08:40:11 -04:00
if err != nil {
2017-05-10 09:10:18 -04:00
return nil
2015-09-01 08:40:11 -04:00
}
2015-08-19 00:34:03 -04:00
}
2017-05-10 09:10:18 -04:00
return & SearchResult {
Username : username ,
Name : firstname ,
Surname : surname ,
Mail : mail ,
IsAdmin : isAdmin ,
}
}
// SearchEntries : search an LDAP source for all users matching userFilter
func ( ls * Source ) SearchEntries ( ) [ ] * SearchResult {
l , err := dial ( ls )
if err != nil {
log . Error ( 4 , "LDAP Connect error, %s:%v" , ls . Host , err )
ls . Enabled = false
return nil
}
defer l . Close ( )
if ls . BindDN != "" && ls . BindPassword != "" {
err := l . Bind ( ls . BindDN , ls . BindPassword )
2016-02-16 06:33:16 -05:00
if err != nil {
2017-05-10 09:10:18 -04:00
log . Debug ( "Failed to bind as BindDN[%s]: %v" , ls . BindDN , err )
return nil
}
log . Trace ( "Bound as BindDN %s" , ls . BindDN )
} else {
log . Trace ( "Proceeding with anonymous LDAP search." )
}
userFilter := fmt . Sprintf ( ls . Filter , "*" )
log . Trace ( "Fetching attributes '%v', '%v', '%v', '%v' with filter %s and base %s" , ls . AttributeUsername , ls . AttributeName , ls . AttributeSurname , ls . AttributeMail , userFilter , ls . UserBase )
search := ldap . NewSearchRequest (
ls . UserBase , ldap . ScopeWholeSubtree , ldap . NeverDerefAliases , 0 , 0 , false , userFilter ,
[ ] string { ls . AttributeUsername , ls . AttributeName , ls . AttributeSurname , ls . AttributeMail } ,
nil )
sr , err := l . Search ( search )
if err != nil {
log . Error ( 4 , "LDAP Search failed unexpectedly! (%v)" , err )
return nil
}
result := make ( [ ] * SearchResult , len ( sr . Entries ) )
for i , v := range sr . Entries {
result [ i ] = & SearchResult {
Username : v . GetAttributeValue ( ls . AttributeUsername ) ,
Name : v . GetAttributeValue ( ls . AttributeName ) ,
Surname : v . GetAttributeValue ( ls . AttributeSurname ) ,
Mail : v . GetAttributeValue ( ls . AttributeMail ) ,
IsAdmin : checkAdmin ( l , ls , v . DN ) ,
2016-02-16 06:33:16 -05:00
}
}
2017-05-10 09:10:18 -04:00
return result
2014-04-22 12:55:27 -04:00
}