mirror of
https://github.com/YunoHost-Apps/rainloop_ynh.git
synced 2024-09-03 20:16:18 +02:00
150 lines
4 KiB
PHP
150 lines
4 KiB
PHP
<?php
|
|
class YnhLdapAddressbooks implements \RainLoop\Providers\Suggestions\ISuggestions {
|
|
|
|
/**
|
|
* @var \MailSo\Log\Logger
|
|
*/
|
|
private $oLogger = null;
|
|
|
|
/**
|
|
* @param \RainLoop\Model\Account $oAccount
|
|
* @param string $sQuery
|
|
* @param int $iLimit = 20
|
|
*
|
|
* @return array
|
|
*/
|
|
public function Process($oAccount, $sQuery, $iLimit = 20) {
|
|
$sQuery = \trim($sQuery);
|
|
|
|
if (''===$sQuery || !$oAccount) {
|
|
return array ();
|
|
}
|
|
|
|
$aResult = $this->ldapSearch ( $oAccount, $sQuery, $iLimit );
|
|
|
|
$aResult = \RainLoop\Utils::RemoveSuggestionDuplicates($aResult);
|
|
if ($iLimit < \count($aResult)) {
|
|
$aResult = \array_slice($aResult, 0, $iLimit);
|
|
}
|
|
|
|
return $aResult;
|
|
}
|
|
|
|
/**
|
|
*
|
|
* OK search in ldap.
|
|
* match email or displayName...
|
|
*
|
|
* @param \RainLoop\Model\Account $oAccount
|
|
* @param string $sQuery
|
|
*
|
|
* @return array
|
|
*/
|
|
private function ldapSearch($oAccount, $sQuery, $iLimit) {
|
|
$sSearchEscaped = $this->escape($sQuery);
|
|
|
|
$aResult = array();
|
|
$oCon = @\ldap_connect();
|
|
if (! $oCon) {
|
|
$this->oLogger->Write('YnhLdapAddressbooks: Could not connect to LDAP server', \MailSo\Log\Enumerations\Type::ERROR );
|
|
return $aResult;
|
|
}
|
|
|
|
@\ldap_set_option($oCon, LDAP_OPT_PROTOCOL_VERSION, 3 );
|
|
|
|
if (!ldap_bind($oCon)) {
|
|
// bizard... ca renvoie false.... mais ca marche....
|
|
// $this->logLdapError ( $oCon, 'ldap_bind' );
|
|
// $this->Manager()->Actions()->Logger()->Write('YnhLdapAdressbooks: Could not bind to LDAP server', \MailSo\Log\Enumerations\Type::ERROR);
|
|
// return $aResult;
|
|
}
|
|
|
|
$this->oLogger->Write('YnhLdapAddressbooks: connected to LDAP', \MailSo\Log\Enumerations\Type::INFO, 'LDAP' );
|
|
|
|
$sSearchDn='dc=yunohost,dc=org';
|
|
|
|
// on veut chercher parmis mail et nom utilisateur...
|
|
$sFilter = '(&(objectClass=inetOrgPerson)';
|
|
$sFilter .= '(|';
|
|
$sFilter .= '(mail=*' . $sSearchEscaped . '*)';
|
|
$sFilter .= '(displayName=*' . $sSearchEscaped . '*)';
|
|
$sFilter .= '))';
|
|
|
|
$aItems = array ( 'mail', 'displayName');
|
|
|
|
$this->oLogger->Write('YnhLdapAddressbooks: ldap_search : '.$sSearchDn.' / '.$sFilter, \MailSo\Log\Enumerations\Type::INFO, 'LDAP' );
|
|
|
|
$oS = @\ldap_search($oCon, $sSearchDn, $sFilter, $aItems, 0, $iLimit, $iLimit);
|
|
if ($oS) {
|
|
$aEntries = @\ldap_get_entries($oCon, $oS);
|
|
$this->oLogger->Write('YnhLdapAddressbooks: ldap_search => '.var_export($aEntries), \MailSo\Log\Enumerations\Type::INFO, 'LDAP');
|
|
if (is_array($aEntries)) {
|
|
if (isset ( $aEntries ['count'] )) { unset ( $aEntries ['count'] ); }
|
|
|
|
foreach ( $aEntries as $aItem ) {
|
|
if ($aItem) {
|
|
$sEmail = \trim($aItem['mail'] [0] );
|
|
$sName = \trim($aItem['displayname'] [0] );
|
|
|
|
if (!empty($sEmail)) {
|
|
$aResult[] = array($sEmail, $sName);
|
|
}
|
|
}
|
|
}
|
|
} else {
|
|
$this->logLdapError($oCon, 'ldap_get_entries');
|
|
}
|
|
} else {
|
|
$this->logLdapError($oCon, 'ldap_search');
|
|
}
|
|
|
|
return $aResult;
|
|
}
|
|
|
|
/**
|
|
*
|
|
* @param string $sStr
|
|
*
|
|
* @return string
|
|
*/
|
|
private function escape($sStr) {
|
|
$aNewChars = array ();
|
|
$aChars = array ('\\', '*',' (', ')', \chr(0));
|
|
|
|
foreach ( $aChars as $iIndex => $sValue ) {
|
|
$aNewChars [$iIndex] = '\\' . \str_pad ( \dechex ( \ord ( $sValue ) ), 2, '0' );
|
|
}
|
|
return \str_replace($aChars, $aNewChars, $sStr);
|
|
}
|
|
|
|
/**
|
|
*
|
|
* @param mixed $oCon
|
|
* @param string $sCmd
|
|
*
|
|
* @return string
|
|
*/
|
|
private function logLdapError($oCon, $sCmd) {
|
|
if ($this->oLogger) {
|
|
$sError = $oCon ? @\ldap_error($oCon) : '';
|
|
$iErrno = $oCon ? @\ldap_errno($oCon) : 0;
|
|
|
|
$this->oLogger->Write($sCmd.' error: '.$sError.' ('. $iErrno.')', \MailSo\Log\Enumerations\Type::WARNING, 'LDAP' );
|
|
}
|
|
}
|
|
|
|
/**
|
|
*
|
|
* @param \MailSo\Log\Logger $oLogger
|
|
*
|
|
* @return \LdapContactsSuggestions
|
|
*/
|
|
/**
|
|
*
|
|
* @param \MailSo\Log\Logger $oLogger
|
|
*/
|
|
public function SetLogger($oLogger) {
|
|
$this->oLogger = $oLogger instanceof \MailSo\Log\Logger ? $oLogger : null;
|
|
}
|
|
|
|
}
|