LDAPAccountManager/lam/lib/ldap.inc

339 lines
8.6 KiB
PHP
Raw Normal View History

<?php
/*
$Id$
This code is part of LDAP Account Manager (http://www.sourceforge.net/projects/lam)
2006-03-03 17:30:35 +00:00
Copyright (C) 2003 - 2006 Roland Gruber
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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
2004-05-31 14:04:00 +00:00
/**
* ldap.inc provides basic functions to connect to the OpenLDAP server.
*
* @package LDAP
* @author Roland Gruber
*/
2003-04-27 16:29:53 +00:00
2004-05-31 14:04:00 +00:00
/** Access to configuration data */
2003-04-23 19:13:55 +00:00
include_once("config.inc");
2005-01-30 15:39:01 +00:00
/** LDAP schema */
include_once("schema.inc");
2004-05-31 14:04:00 +00:00
/**
* Converts a HEX string to a binary value
*
* @param string $value HEX string
* @return binary result binary
*/
function hex2bin($value) {
return pack("H*", $value);
}
2003-08-08 15:35:59 +00:00
2003-10-04 13:26:37 +00:00
2004-05-31 14:04:00 +00:00
/**
* Ldap manages connection to LDAP and includes several helper functions.
*
* @package LDAP
*/
class Ldap{
2004-05-31 14:04:00 +00:00
/** Object of Config to access preferences */
2007-07-08 11:33:31 +00:00
private $conf;
2003-07-30 20:46:07 +00:00
2004-05-31 14:04:00 +00:00
/** Server handle */
2007-07-08 11:33:31 +00:00
private $server;
2007-07-21 08:27:13 +00:00
private $is_connected = false;
2003-07-30 20:46:07 +00:00
2004-05-31 14:04:00 +00:00
/** LDAP username used for bind */
2007-07-08 11:33:31 +00:00
private $username;
2004-05-31 14:04:00 +00:00
/** LDAP password used for bind */
2007-07-08 11:33:31 +00:00
private $password;
2003-07-30 20:46:07 +00:00
2004-05-31 14:04:00 +00:00
/** Random number (changes on every page request) */
2007-07-08 11:33:31 +00:00
private $rand;
2003-10-16 18:49:25 +00:00
2004-05-31 14:04:00 +00:00
/**
* @param object $config an object of class Config
*/
2003-07-30 20:46:07 +00:00
function Ldap($config) {
2003-08-08 15:35:59 +00:00
setlanguage();
2003-07-30 20:46:07 +00:00
if (is_object($config)) $this->conf = $config;
else return false;
2003-10-16 18:49:25 +00:00
mt_srand((double)microtime()*1000000);
$this->rand = mt_rand();
2003-07-30 20:46:07 +00:00
return true;
}
2004-05-31 14:04:00 +00:00
/**
* Connects to the server using the given username and password
*
* @param string $user user name
* @param string $passwd password
* @return mixed if connect succeeds the server handle is returned, else false
*/
2003-07-30 20:46:07 +00:00
function connect($user, $passwd) {
// close any prior connection
@$this->close();
// do not allow anonymous bind
if ((!$user)||($user == "")||(!$passwd)) {
return false;
}
// save password und username encrypted
2004-01-10 11:08:10 +00:00
$this->encrypt_login($user, $passwd);
$this->server = @ldap_connect($this->conf->get_ServerURL());
2003-07-30 20:46:07 +00:00
if ($this->server) {
// use LDAPv3
ldap_set_option($this->server, LDAP_OPT_PROTOCOL_VERSION, 3);
2003-08-16 08:30:05 +00:00
// start TLS if possible
if (function_exists('ldap_start_tls')) {
@ldap_start_tls($this->server);
// connect without TLS if it failed
2004-05-23 08:16:38 +00:00
if (ldap_errno($this->server) != 0) {
@ldap_close($this->server);
$this->server = @ldap_connect($this->conf->get_ServerURL());
ldap_set_option($this->server, LDAP_OPT_PROTOCOL_VERSION, 3);
}
}
2003-07-30 20:46:07 +00:00
$bind = @ldap_bind($this->server, $user, $passwd);
if ($bind) {
2006-02-02 19:56:41 +00:00
$return = ldap_errno($this->server);
2003-12-03 23:03:10 +00:00
// return success number
2006-02-02 19:56:41 +00:00
return $return;
2003-07-30 20:46:07 +00:00
}
2003-12-03 23:03:10 +00:00
// return error number
else return ldap_errno($this->server);
2003-07-30 20:46:07 +00:00
}
2003-12-03 23:03:10 +00:00
else return false;
2003-07-30 20:46:07 +00:00
}
2004-05-31 14:04:00 +00:00
/** Closes connection to server */
2003-07-26 12:37:31 +00:00
function close() {
@ldap_close($this->server);
2003-06-08 18:58:01 +00:00
}
2003-07-26 12:37:31 +00:00
2004-05-31 14:04:00 +00:00
/**
* Returns an array with all organizational units under the given suffix
*
* @param string $suffix search suffix
* @return array DNs of organizational units
*/
function search_units($suffix) {
2003-07-26 12:37:31 +00:00
$ret = array();
$sr = @ldap_search($this->server(), $suffix, "objectClass=organizationalunit", array("DN"));
2003-07-26 12:37:31 +00:00
if ($sr) {
$units = ldap_get_entries($this->server, $sr);
2005-02-22 20:20:47 +00:00
unset($units['count']);
2003-07-26 12:37:31 +00:00
// extract Dns
for ($i = 0; $i < sizeof($units); $i++) {
if ($units[$i]['dn']) $ret[] = $units[$i]['dn'];
}
2003-06-28 09:30:21 +00:00
}
2003-07-26 12:37:31 +00:00
// add root suffix if needed
$found = false;
2003-07-26 12:37:31 +00:00
for ($i = 0; $i < sizeof($ret); $i++) { // search suffix case-intensitive
if (strtolower($suffix) == strtolower($ret[$i])) {
$found = true;
break;
}
}
2003-07-26 12:37:31 +00:00
if (!$found) {
$ret[] = $suffix;
}
usort($ret, array($this,"cmp_array"));
return $ret;
}
2003-07-26 12:37:31 +00:00
2004-05-31 14:04:00 +00:00
/**
* Returns the LDAP connection handle
*
* @return object connection handle
*/
2003-07-26 12:37:31 +00:00
function server() {
2007-07-21 08:27:13 +00:00
if (!$this->is_connected) {
$data = $this->decrypt_login();
$this->connect($data[0], $data[1]);
$this->is_connected = true;
}
2003-07-26 12:37:31 +00:00
return $this->server;
}
2004-05-31 14:04:00 +00:00
/** Closes connection to LDAP server before serialization */
2003-07-26 12:37:31 +00:00
function __sleep() {
$this->close();
// define which attributes to save
2007-11-14 13:07:11 +00:00
return array("conf", "username", "password", "rand");
2003-07-26 12:37:31 +00:00
}
2004-05-31 14:04:00 +00:00
/** Reconnects to LDAP server when deserialized */
2003-07-26 12:37:31 +00:00
function __wakeup() {
2007-07-21 08:27:13 +00:00
$this->is_connected = false;
2003-10-16 18:49:25 +00:00
// change random number
mt_srand($this->rand + (microtime() * 1000000));
$this->rand = mt_rand();
// delete PDF files which are older than 10 min
if (isset($_SESSION['lampath'])) {
$relpath = $_SESSION['lampath'] . 'tmp/';
$time = time();
$dir = @opendir($relpath);
2007-07-08 11:33:31 +00:00
$file = @readdir($dir);
while ($file) {
if ((substr($file, -4) == '.pdf') || (substr($file, -4) == '.jpg')) {
$path = $relpath . $file;
if ($time - filemtime($path) > 600) {
@unlink($path);
}
}
2007-07-08 11:33:31 +00:00
$file = @readdir($dir);
}
@closedir($dir);
}
2003-07-26 12:37:31 +00:00
}
2005-02-27 12:40:06 +00:00
/**
* Calculates a new value for rand
*
* @return int New random value
*/
function new_rand() {
// change random number
mt_srand($this->rand + (microtime() * 1000000));
2005-02-27 12:40:06 +00:00
$r = mt_rand();
$this->rand = $r;
return $r;
}
2004-05-31 14:04:00 +00:00
/**
* Encrypts a string
*
* @param string $data string to encrypt
* @return object encrypted string
*/
2004-01-10 11:08:10 +00:00
function encrypt($data) {
// use MCrypt if available
if (function_exists('mcrypt_create_iv')) {
// MCrypt may have been enabled in a running session
if (!isset($_COOKIE["IV"]) || ($_COOKIE["IV"] == '')) return $data;
2004-01-10 11:08:10 +00:00
// read key and iv from cookie
$iv = base64_decode($_COOKIE["IV"]);
$key = base64_decode($_COOKIE["Key"]);
// encrypt string
return mcrypt_encrypt(MCRYPT_RIJNDAEL_256, $key, base64_encode($data), MCRYPT_MODE_ECB, $iv);
2004-01-10 11:08:10 +00:00
}
// otherwise do not encrypt
2004-01-10 11:08:10 +00:00
else {
return $data;
2004-01-10 11:08:10 +00:00
}
}
2004-05-31 14:04:00 +00:00
/**
* Decrypts a string
*
* @param object $data string to decrypt
* @return string decrypted string
*/
2004-01-10 11:08:10 +00:00
function decrypt($data) {
// use MCrypt if available
if (function_exists('mcrypt_create_iv')) {
// MCrypt may have been enabled in a running session
if (!isset($_COOKIE["IV"]) || ($_COOKIE["IV"] == '')) return $data;
2004-01-10 11:08:10 +00:00
// read key and iv from cookie
$iv = base64_decode($_COOKIE["IV"]);
$key = base64_decode($_COOKIE["Key"]);
// decrypt string
$ret = mcrypt_decrypt(MCRYPT_RIJNDAEL_256, $key, $data, MCRYPT_MODE_ECB, $iv);
$ret = base64_decode(str_replace(chr(00), "", $ret));
2004-01-10 11:08:10 +00:00
return $ret;
}
// otherwise do not decrypt
2004-01-10 11:08:10 +00:00
else {
return $data;
2004-01-10 11:08:10 +00:00
}
}
2004-05-31 14:04:00 +00:00
/**
* Encrypts username and password
*
* @param string $username LDAP user name
* @param string $password LDAP password
*/
2004-01-10 11:08:10 +00:00
function encrypt_login($username, $password) {
2003-07-02 17:58:55 +00:00
// encrypt username and password
2004-01-10 11:08:10 +00:00
$this->username = base64_encode($this->encrypt($username));
$this->password = base64_encode($this->encrypt($password));
2003-07-02 17:58:55 +00:00
}
2004-05-31 14:04:00 +00:00
/**
* Decrypts username and password
*
* @return array array(user name, password)
*/
2004-01-10 11:08:10 +00:00
function decrypt_login() {
2003-07-02 17:58:55 +00:00
// decrypt username and password
2004-01-10 11:08:10 +00:00
$username = $this->decrypt(base64_decode($this->username));
$password = $this->decrypt(base64_decode($this->password));
2003-07-02 17:58:55 +00:00
$ret = array($username, $password);
return $ret;
}
2004-05-31 14:04:00 +00:00
/** Closes connection to LDAP server and deletes encrypted username/password */
2003-07-02 17:58:55 +00:00
function destroy() {
$this->close();
$this->username="xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx";
$this->password="xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx";
}
2004-05-31 14:04:00 +00:00
/**
* Helper function to sort the unit DNs
*
* @param string $a first argument to compare
* @param string $b second argument to compare
* @return integer 0 if equal, 1 if $a is greater, -1 if $b is greater
*/
2003-07-02 17:58:55 +00:00
function cmp_array($a, $b) {
// split DNs
$array_a = explode(",", $a);
$array_b = explode(",", $b);
$len_a = sizeof($array_a);
$len_b = sizeof($array_b);
// check how many parts to compare
$len = min($len_a, $len_b);
// compare from last part on
for ($i = 0; $i < $len; $i++) {
// get parts to compare
$part_a = strtolower($array_a[$len_a - $i - 1]);
$part_b = strtolower($array_b[$len_b - $i - 1]);
// compare parts
if ($part_a == $part_b) { // part is identical
if ($i == ($len - 1)) {
if ($len_a > $len_b) return 1;
elseif ($len_a < $len_b) return -1;
else return 0; // DNs are identical
}
}
elseif ($part_a == max($part_a, $part_b)) return 1;
else return -1;
}
return -1;
2003-07-02 17:58:55 +00:00
}
2003-07-26 12:37:31 +00:00
}
?>