An error occurred while loading the file. Please try again.
-
bfb09473
<?php/* This code is part of FusionDirectory (http://www.fusiondirectory.org/) Copyright (C) 2013-2018 FusionDirectory 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 St, Fifth Floor, Boston, MA 02110-1301, USA.*//*! * \brief Class for handling objects and their types * * Allows to list, open, create and delete objects */class objects{ /*! * \brief Get list of object of objectTypes from $types in $ou * * \param array $types the objectTypes to list * \param mixed $attrs The attributes to fetch. * If this is a single value, the resulting associative array will have for each dn the value of this attribute. * If this is an array, the keys must be the wanted attributes, and the values can be either 1, '*' or 'raw' * depending if you want a single value or an array of values. 'raw' means untouched LDAP value and is only useful for dns. * Other values are considered to be 1. * \param string $ou the LDAP branch to search in, base will be used if it is NULL * \param string $filter an additional filter to use in the LDAP search. * \param boolean $checkAcl should ACL be ignored or checked? Defaults to FALSE. * \param string $scope scope, defaults to subtree. When using one, be careful what you put in $ou. * * \return The list of objects as an associative array (keys are dns) */ static function ls ($types, $attrs = NULL, $ou = NULL, $filter = '', $checkAcl = FALSE, $scope = 'subtree') { global $ui, $config; if ($ou === NULL) { $ou = $config->current['BASE']; } if (!is_array($types)) { $types = array($types); } if ($checkAcl) { if (count($types) > 1) { throw new FusionDirectoryException('Cannot evaluate ACL for several types'); } $infos = static::infos(reset($types)); $acl = $infos['aclCategory'].'/'.$infos['mainTab']; } $attrsAcls = array(); if ($attrs === NULL) { $attrs = array(); foreach ($types as $type) { $infos = static::infos($type); if ($infos['mainAttr']) {7172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140
$attrs[] = $infos['mainAttr'];
}
}
$attrs = array_unique($attrs);
if (count($attrs) == 1) {
$attrs = $attrs[0];
}
if (count($attrs) == 0) {
$attrs = array('dn' => 'raw');
}
} elseif ($checkAcl) {
if (is_array($attrs)) {
$search_attrs = array_keys($attrs);
} else {
$search_attrs = array($attrs);
}
foreach ($search_attrs as $search_attr) {
$category = $ui->getAttributeCategory($types[0], $search_attr);
if ($category === FALSE) {
throw new FusionDirectoryException('Could not find ACL for attribute "'.$search_attr.'"');
}
if ($category === TRUE) {
continue;
}
if (strpos($ui->get_permissions($ou, $category, $search_attr), 'r') === FALSE) {
$attrsAcls[$search_attr] = array($category, $search_attr);
}
}
}
if (is_array($attrs)) {
$search_attrs = array_keys($attrs);
} else {
$search_attrs = array($attrs);
}
try {
$ldap = static::search($types, $search_attrs, $ou, $filter, $checkAcl, $scope, FALSE, $partialFilterAcls);
} catch (NonExistingBranchException $e) {
return array();
}
$result = array();
while ($fetched_attrs = $ldap->fetch()) {
$key = $fetched_attrs['dn'];
if ($checkAcl) {
if (strpos($ui->get_permissions($key, $acl), 'r') === FALSE) {
continue;
}
foreach ($partialFilterAcls as $partialFilterAcl) {
if (strpos($ui->get_permissions($key, $partialFilterAcl[0], $partialFilterAcl[1]), 'r') === FALSE) {
continue 2;
}
}
}
if (is_array($attrs)) {
$result[$key] = array();
foreach ($attrs as $attr => $mode) {
if (isset($fetched_attrs[$attr])) {
if (isset($attrsAcls[$attr]) &&
(strpos($ui->get_permissions($key, $attrsAcls[$attr][0], $attrsAcls[$attr][1]), 'r') === FALSE)) {
continue;
}
switch ($mode) {
case '*':
unset($fetched_attrs[$attr]['count']);
case 'raw':
$result[$key][$attr] = $fetched_attrs[$attr];
break;
case 1:
default:
141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210
$result[$key][$attr] = $fetched_attrs[$attr][0];
}
}
}
if (count($result[$key]) === 0) {
unset($result[$key]);
}
} elseif (isset($fetched_attrs[$attrs])) {
if (isset($attrsAcls[$attrs]) &&
(strpos($ui->get_permissions($key, $attrsAcls[$attrs][0], $attrsAcls[$attrs][1]), 'r') === FALSE)) {
continue;
}
$result[$key] = $fetched_attrs[$attrs][0];
}
}
return $result;
}
/*!
* \brief Get count of objects of objectTypes from $types in $ou
*
* \param array $types the objectTypes to list
* \param string $ou the LDAP branch to search in, base will be used if it is NULL
* \param string $filter an additional filter to use in the LDAP search.
* \param boolean $checkAcl Should ACL be checked on the filtered attributes.
*
* \return The number of objects of type $type in $ou
*/
static function count ($types, $ou = NULL, $filter = '', $checkAcl = FALSE)
{
try {
$ldap = static::search($types, array('dn'), $ou, $filter, $checkAcl, 'subtree', FALSE, $partialFilterAcls);
if (!empty($partialFilterAcls)) {
throw new FusionDirectoryException('Not enough rights to use "'.$partialFilterAcls[0][1].'" in filter');
}
} catch (EmptyFilterException $e) {
return 0;
} catch (NonExistingBranchException $e) {
return 0;
}
return $ldap->count();
}
private static function search ($types, $search_attrs, $ou = NULL, $filter = '', $checkAcl = FALSE, $scope = 'subtree', $templateSearch = FALSE, &$partialFilterAcls = array())
{
global $config, $ui;
$partialFilterAcls = array();
if (!is_array($types)) {
$types = array($types);
}
if ($ou === NULL) {
$ou = $config->current['BASE'];
}
$typeFilters = array();
foreach ($types as $type) {
$infos = static::infos($type);
if ($infos['filter'] == '') {
if ($infos['filterRDN'] == '') {
continue;
} else {
$typeFilters[] = $infos['filterRDN'];
}
} elseif ($infos['filterRDN'] == '') {
$typeFilters[] = $infos['filter'];
} else {
211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280
$typeFilters[] = '(&'.$infos['filter'].$infos['filterRDN'].')';
}
}
if (empty($typeFilters)) {
throw new EmptyFilterException();
}
$ldap = $config->get_ldap_link();
if (!$ldap->dn_exists($ou)) {
throw new NonExistingBranchException();
}
if (empty($filter)) {
$filter = '(|'.implode($typeFilters).')';
} else {
if ($checkAcl) {
if (count($types) > 1) {
throw new FusionDirectoryException('Cannot evaluate ACL for several types');
}
$filterObject = ldapFilter::parse($filter);
$filterAttributes = $filterObject->listUsedAttributes();
foreach ($filterAttributes as $acl) {
$category = $ui->getAttributeCategory($types[0], $acl);
if ($category === FALSE) {
throw new FusionDirectoryException('Could not find ACL for attribute "'.$acl.'"');
}
if ($category === TRUE) {
continue;
}
if (strpos($ui->get_permissions($ou, $category, $acl), 'r') === FALSE) {
$partialFilterAcls[] = array($category, $acl);
}
}
}
if (!preg_match('/^\(.*\)$/', $filter)) {
$filter = '('.$filter.')';
}
$filter = '(&'.$filter.'(|'.implode($typeFilters).'))';
}
if ($templateSearch) {
$templateFilterObject = new ldapFilter(
'&',
array(
new ldapFilterLeaf('objectClass', '=', 'fdTemplate'),
fdTemplateFilter(ldapFilter::parse($filter)),
)
);
$filter = "$templateFilterObject";
}
$ldap->cd($ou);
$ldap->search($filter, $search_attrs, $scope);
if (!$ldap->success()) {
throw new LDAPFailureException($ldap->get_error());
}
return $ldap;
}
/*!
* \brief Create the tab object for the given dn
*
* \param string $type the objectType to open
* \param string $dn the dn to open
*
* \return The created tab object
*/
static function open ($dn, $type)
{
$infos = static::infos($type);
$tabClass = $infos['tabClass'];
$tabObject = new $tabClass($type, $dn);
281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350
$tabObject->set_acl_base();
@DEBUG (DEBUG_TRACE, __LINE__, __FUNCTION__, __FILE__, $dn, "Openned as $type object");
return $tabObject;
}
static function link ($dn, $type, $subaction = '', $text = NULL, $icon = TRUE)
{
global $config;
$infos = static::infos($type);
if (!isset($infos['management'])) {
throw new NoManagementClassException('Asked for link for type "'.$type.'" but it does not have a management class');
}
$pInfos = pluglist::pluginInfos($infos['management']);
$index = $pInfos['INDEX'];
$action = 'edit';
if ($subaction != '') {
$action .= '_'.$subaction;
}
$href = "main.php?plug=$index&reset=1&act=listing_$action&dn=".urlencode($dn);
if ($text === NULL) {
$ldap = $config->get_ldap_link();
$ldap->cat($dn, array($infos['nameAttr']));
if ($attrs = $ldap->fetch()) {
if (isset($attrs[$infos['nameAttr']][0])) {
$text = $attrs[$infos['nameAttr']][0];
} else {
$text = $dn;
}
} else {
throw new NonExistingLdapNodeException('Dn '.$dn.' not found in LDAP');
}
} elseif (is_array($text)) {
$text = $text[$infos['nameAttr']][0];
}
if ($icon && isset($infos['icon'])) {
$text = '<img alt="'.$infos['name'].'" title="'.$dn.'" src="'.htmlentities($infos['icon'], ENT_COMPAT, 'UTF-8').'" class="center"/> '.$text;
}
return '<a href="'.$href.'">'.$text.'</a>';
}
static function create ($type)
{
return static::open('new', $type);
}
static function infos ($type)
{
global $config;
if (!isset($config->data['OBJECTS'][strtoupper($type)])) {
throw new NonExistingObjectTypeException('Non-existing type "'.$type.'"');
}
$infos =& $config->data['OBJECTS'][strtoupper($type)];
if (!isset($infos['filterRDN'])) {
if (empty($infos['ou'])) {
$infos['filterRDN'] = '';
} else {
$parts = ldap_explode_dn(preg_replace('/,$/', '', $infos['ou']), 0);
unset($parts['count']);
$dnFilter = array();
foreach ($parts as $part) {
preg_match('/([^=]+)=(.*)$/', $part, $m);
$dnFilter[] = '('.$m[1].':dn:='.$m[2].')';
351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420
}
if (count($dnFilter) > 1) {
$infos['filterRDN'] = '(&'.implode('', $dnFilter).')';
} else {
$infos['filterRDN'] = $dnFilter[0];
}
}
}
return $infos;
}
static function isOfType ($attrs, $type)
{
$filter = static::getFilterObject($type);
return $filter($attrs);
}
/* This method allows to cache parsed filter in filterObject key in objectTypes */
static function getFilterObject ($type)
{
global $config;
if (!isset($config->data['OBJECTS'][strtoupper($type)])) {
throw new NonExistingObjectTypeException('Non-existing type "'.$type.'"');
}
$infos =& $config->data['OBJECTS'][strtoupper($type)];
if (!isset($infos['filterObject'])) {
$infos['filterObject'] = ldapFilter::parse($infos['filter']);
}
return $infos['filterObject'];
}
static function types ()
{
global $config;
return array_keys($config->data['OBJECTS']);
}
/* !\brief This method returns a list of all available templates for the given type
*/
static function getTemplates ($type, $requiredPermissions = 'r', $filter = '')
{
global $config, $ui;
$infos = static::infos($type);
$templates = array();
foreach ($config->departments as $key => $value) {
// Search all templates from the current dn.
try {
$ldap = static::search($type, array('cn'), $infos['ou'].$value, $filter, FALSE, 'subtree', TRUE);
} catch (NonExistingBranchException $e) {
continue;
}
if ($ldap->count() != 0) {
while ($attrs = $ldap->fetch()) {
$dn = $attrs['dn'];
if ($requiredPermissions != '') {
if (!preg_match('/'.$requiredPermissions.'/', $ui->get_permissions($dn, $infos['aclCategory'].'/'.'template'))) {
continue;
}
}
$templates[$dn] = $attrs['cn'][0].' - '.$key;
}
}
}
natcasesort($templates);
421422423424425426427
reset($templates);
return $templates;
}
}
?>