, BzzWare AS, Norway
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.
*/
/**********************************************************************
* Functions:
userErrorHandler($errno, $errmsg, $filename, $linenum, $vars)
autoMount ($viewbase) {
automountdetail ($dn) {
showHost ($ldap, $cn) {
showHostGroups ($ldap, $cn) {
userDelGroup ($ldap, $uid, $gid) {
hostAddGroup ($ldap, $cn, $group) {
hostDelGroup ($ldap, $cn, $group) {
changeGroup ($ldap, $gid, $cn, $description, $auth) {
changeHost ($ldap, $cn, $domain, $ipaddress, $macaddress, $sambaHost = false) {
addHost ($ldap, $cn, $domain, $ipaddress, $macaddress) {
addGroup ($ldap, $cn, $description) {
addUser ($ldap, $cn, $template, $username,$profile,$sn)
createUsers ($ldap, $gid, $gname, $template, $prefix, $number, $passrandom,$formatpwd,$pwdgen,$profile,$sn) {
changeUser ($ldap, $uid, $cn,$profile) {
showGroup ($ldap, $gid) {
showUser ($ldap, $uid) {
showUserGroups ($ldap, $uid) {
showResult ($ldap, $type, $text, $searchDisabled) {
userAddForm () {
importLwat () {
importGescen(){ //LLX Added in another happy day
llx_host_add(){
llx_host_del(){
*
**********************************************************************/
error_reporting(0) ;
require_once ("functions.php");
loadConfig () ;
session_start () ;
require('/usr/share/php/smarty/Smarty.class.php') ;
require_once("llx_log.php");
loadLocale () ;
ob_start () ;
$smarty = new Smarty();
$smarty->template_dir = $smarty_templ ;
$smarty->compile_dir = $smarty_compile ;
// user defined error handling function
function userErrorHandler($errno, $errmsg, $filename, $linenum, $vars)
{
global $ldap, $error_log_file, $error_mail_to, $error_show, $ldap_err, $ldap_msg ;
// timestamp for the error entry
$dt = date("Y-m-d H:i:s (T)");
// define an assoc array of error string
// in reality the only entries we should
// consider are E_WARNING, E_NOTICE, E_USER_ERROR,
// E_USER_WARNING and E_USER_NOTICE
$errortype = array (
E_ERROR => 'Error',
E_WARNING => 'Warning',
E_PARSE => 'Parsing Error',
E_NOTICE => 'Notice',
E_CORE_ERROR => 'Core Error',
E_CORE_WARNING => 'Core Warning',
E_COMPILE_ERROR => 'Compile Error',
E_COMPILE_WARNING => 'Compile Warning',
E_USER_ERROR => 'User Error',
E_USER_WARNING => 'User Warning',
E_USER_NOTICE => 'User Notice',
E_STRICT => 'Runtime Notice',
E_RECOVERABLE_ERRROR => 'Catchable Fatal Error'
);
// set of errors for which a var trace will be saved
$user_errors = array(E_USER_ERROR, E_USER_WARNING, E_USER_NOTICE);
$err = "\n";
$err .= "\t" . $dt . " \n";
$err .= "\t" . $errno . " \n";
$err .= "\t" . $errortype[$errno] . " \n";
$err .= "\t" . $errmsg . " \n";
$err .= "\t" . $filename . " \n";
$err .= "\t" . $linenum . " \n";
if (in_array($errno, $user_errors)) {
$err .= "\t" . wddx_serialize_value($vars, "Variables") . " \n";
}
$err .= " \n\n";
if (strpos($errmsg, "ldap_") === 0) {
$ldap_err = ldap_errno ($ldap) ;
switch ($ldap_err) {
case 50:
$ldap_msg = "I'm sorry, but you dont have the propper access to do this" ;
break ;
default:
echo "\n" ;
echo "ldap_err: " . $ldap_err . "\n" ;
echo "err_msg: " . ldap_err2str ($ldap_err) . "\n" ;
echo " \n" ;
break ;
}
}
if ($error_show)
echo "\n" . $err . " \n" ;
// save to the error log, and e-mail me if there is a critical user error
if (!empty($error_log_file))
error_log($err, 3, "/tmp/lliurex-lwat.err");
if ($errno == E_USER_ERROR && !empty($error_mail_to)) {
mail($error_mail_to, "Critical User Error", $err);
}
}
//Para habilitar control de errores
//$old_error_handler = set_error_handler("userErrorHandler");
function autoMount ($viewbase) {
global $smarty, $ldap, $automountbase ;
$filter = "(ou=auto.master)" ;
$want = array ("dn") ;
$result = ldap_search ($ldap, $automountbase, $filter, $want);
$entries = ldap_get_entries ($ldap, $result);
$display=array() ;
$viewdn= $viewbase ;
if (empty ($viewbase))
$viewbase = $entries[0]["dn"] ;
foreach ($entries as $key => $value)
if (is_array ($value))
$display[] = array ('level' => 0, 'base' => htmlspecialchars($value["dn"])) ;
for ($i = 0 ; $i < count($display) ; $i++) {
$level = $display[$i]["level"] ;
$searchbase = $display[$i]["base"] ;
if (isset ($searchbase)) {
$filter = "objectClass=automount" ;
$want = array ("cn", "automountInformation") ;
$result = @ldap_search ($ldap, $searchbase, $filter, $want) ;
if ($result) {
$entries = ldap_get_entries ($ldap, $result);
$add = $i ;
foreach ($entries as $key => $value)
if (is_array ($value)) {
$dn = ldap_explode_dn ($value["dn"],0) ;
array_splice($dn, 0,2) ;
unset ($new) ;
$dn = implode (",", $dn) ;
if ($dn == $searchbase) {
$automountinformation = explode (" ", $value["automountinformation"][0]) ;
if (substr ($automountinformation[0],0,5) == "ldap:")
$new = array ('level' => $level + 1,
'base' => substr($automountinformation[0],5),
'dn' => $value["dn"],
'cn' => $value["cn"][0]) ;
elseif ($automountinformation[0] == "-fstype=autofs")
$new = array ('level' => $level + 1,
'base' => substr($automountinformation[1],5),
'dn' => $value["dn"],
'cn' => $value["cn"][0]) ;
else
$new = array ('level' => $level + 1,
'dn' => $value["dn"],
'cn' => $value["cn"][0]) ;
if ($level == 0 || (is_array ($new) && (strpos($viewbase, $dn) !== false))) {
$add++ ;
array_splice($display, $add, 0, array ($new)) ;
}
}
}
}
}
}
if (!empty($viewdn)) {
$viewarray = ldap_explode_dn (substr($viewdn,0,strpos($viewdn, $automountbase) - 1), 1) ;
$title = _("Automount point ") ;
for ($i = $viewarray[count] ; $i-- > 0 ; )
$title = sprintf ("%s/%s", $title, $viewarray[$i]) ;
} else unset ($title) ;
$smarty->assign ('display', $display) ;
$smarty->assign ('viewbase', $viewbase) ;
$smarty->assign ('dn', $viewdn) ;
$smarty->assign ('title', $title) ;
$smarty->display ('admin_automount_browse.tpl') ;
}
function automountdetail ($dn) {
global $smarty, $ldap, $automountbase ;
$want = array ("cn", "description", "automountinformation") ;
$filter = "objectClass=*" ;
$result = ldap_search ($ldap, $dn, $filter, $want);
$entries = ldap_get_entries ($ldap, $result) ;
$display = ldap_explode_dn (substr($dn,0,strpos($dn, $automountbase) - 1), 1) ;
$displaystr = "" ;
for ($i = $display[count] ; $i-- > 0 ; )
$displaystr = sprintf ("%s/%s", $displaystr, $display[$i]) ;
$automountinformation = explode (" ", substr($entries[0]["automountinformation"][0], 1)) ;
$smarty->assign ('title', sprintf (_("Automount share %s"), $displaystr));
$smarty->assign ('suggest', $entries[0]["cn"][0]);
$smarty->assign ('options', $automountinformation[0]);
$smarty->assign ('export', $automountinformation[1]);
$smarty->assign ('dn', $dn);
$smarty->display ('admin_automount_edit.tpl') ;
}
function showHost ($ldap, $cn) {
global $smarty, $hostbase, $base ;
$filter="cn=" . $cn ;
$want = array ("cn", "associatedDomain", "ipHostNumber", "macAddress", "sambaAcctFlags") ;
$searchbase=$hostbase ;
$result = ldap_search($ldap, $searchbase, $filter, $want);
$entries = ldap_get_entries ($ldap, $result);
$count=$entries["count"] ;
if ($count) {
$cn=htmlspecialchars($entries[0]["cn"][0]);
$domain=htmlspecialchars($entries[0]["associateddomain"][0]);
$ipAddress=htmlspecialchars($entries[0]["iphostnumber"][0]);
$macAddress=htmlspecialchars($entries[0]["macaddress"][0]);
if (strpos($entries[0]["sambaacctflags"][0], 'W') === false )
$sambaHost = "" ;
else
$sambaHost = "checked" ;
$smarty->assign ('cn', $cn) ;
$smarty->assign ('domain', $domain) ;
$smarty->assign ('ipAddress', $ipAddress) ;
$smarty->assign ('macAddress', $macAddress) ;
$smarty->assign ('sambaHost', $sambaHost) ;
$smarty->assign ('memberOf', $memberOf) ;
$smarty->assign ('notMemberOf', $notMemberOf) ;
showHostGroups ($ldap, $cn) ;
$smarty->display('admin_host_show.tpl') ;
}
else
{
printf (_("No matching objects") ."%s '._("Changed password for %s ( %s ) to %s .").'
',$entries[0]['uid'][0],$entries[0]['cn'][0], $newpw );
llxUserSync("passwd", $entries[0]['dn'],$newpw,$userGroup);
}
else
{
$ldaperr = ldap_errno ($ldap) ;
switch ($ldaperr)
{
case 50:
printf (''._("Sorry, you are not allowed to change password for %s (%s)".'
'),$entries[0]['uid'][0], $entries[0]['cn'][0]) ;
break ;
default:
reportLdapError ($ldaperr, "Changing password") ;
}
}
}
$key = lwat_key () ;
$ldap=lwat_ldap ();
if (lwat_login ($ldap, '', '', $key))
$action = readkey ('action') ;
else
$action = 'logout';
switch ($action) {
case "userGenericGroup":
global $llxCreateGroup;
$type='Otro';
$admindn =$_SESSION['usuario'];
$type=get_profile ($ldap,$admindn);
$want = array ('cn','gidnumber') ;
$filter = "(&(objectClass=posixGroup)(!(groupType=private)))" ;
$base=$llxCreateGroup;
$result = ldap_search ($ldap, $base, $filter, $want);
ldap_sort($ldap,$result,"cn"); //ordenamos los resultados
$entries = ldap_get_entries ($ldap, $result);
$users = array () ;
$groupsid = array () ;
$users=$entries;
for($i=0;$iassign ('type',$type) ;
$smarty->assign ('groups',$groups) ;
$smarty->assign ('groupsid',$groupsid) ;
$smarty->display ('llx_generic_groups.tpl') ;
break ;
case "changePasswdGrp":
$group= readKey('gid');
$passwd= readKey('pass');
masiveChgPass($group,$passwd,$ldap);
break;
case "userChangePasswd":
$smarty->assign ('userdn',$_COOKIE['admindn']) ;
$smarty->assign ('username',$_SESSION['usuario']) ;
$smarty->display ('llx_chguserpw.tpl') ;
break ;
case "setpw":
$newpw = readKey('userpw') ;
$oldpw = readKey('oldpw') ;
$chkpw = readKey('chkpw') ;
if (strlen ($newpw) < $minPwLength )
printf (_("Sorry. The password is too short") . "assign ('type',$type) ;
$smarty->assign ('groups',$groups) ;
$smarty->display ('llx_reports_groups.tpl') ;
break ;
case "userDoPromote":
$userToPromote = array () ;
foreach ($_POST as $key => $value)
{
if (strpos($key, 'checked_') === 0 )
{
$userToPromote[] = $value ;
}
}
if (empty ($userToPromote))
{
printf (_("No users to promote")) ;
break ;
}
foreach ($userToPromote as $value )
{
$dn = ldap_explode_dn ($value, 0) ;
$want = array ('uid') ;
$filter = $dn[0] ;
$result = ldap_search ($ldap, $base, $filter, $want);
$entries = ldap_get_entries ($ldap, $result);
$uid=$entries[0]['uid'][0];
$want = array ('uidNumber','uid') ;
$filter = $dn[0] ;
$result = ldap_search ($ldap, $base, $filter, $want);
$entries = ldap_get_entries ($ldap, $result);
$uidnumber=$entries[0]['uidnumber'][0];
$profile=get_profile($ldap,$entries[0]['uid'][0]);
if($profile=="Profesor")
{
$want = array ('gidnumber') ;
$filter = "(&(objectClass=posixGroup)(cn=admins))" ;
$result = ldap_search ($ldap, $base, $filter, $want);
$entries = ldap_get_entries ($ldap, $result);
$gidnumber=$entries[0]['gidnumber'][0];
$want = array ('memberUid') ;
$filter = "(&(objectClass=posixGroup)(gidNumber=" .$gidnumber . "))" ;
$result = ldap_search ($ldap, $base, $filter, $want);
$entries = ldap_get_entries ($ldap, $result);
$administradores = array () ;
$administradores=$entries[0]['memberuid'];
$existe=false;
foreach ($administradores as $key => $value)
{
if (strcmp($value,$uid)==0 )
{
$existe = true ;
}
}
if (!$existe && userAddGroup($ldap, $uid, $gidnumber))
printf(_("The user ".$uid." has been promoted")."'._("Changed password for %s ( %s ) to %s .").'
',$entries[0]['uid'][0],$entries[0]['cn'][0], $newpw );
llxUserSync("passwd", $entries[0]['dn'],$newpw,$userGroup);
}
else
{
$ldaperr = ldap_errno ($ldap) ;
switch ($ldaperr)
{
case 50:
printf (''._("Sorry, you are not allowed to change password for %s (%s)".'
'),$entries[0]['uid'][0], $entries[0]['cn'][0]) ;
break ;
default:
reportLdapError ($ldaperr, "Changing password") ;
}
}
showUser ($ldap, $entries[0]['uid'][0]);
break ;
case "newPassAsk":
$uid=readKey('uid') ;
$userGroup=readKey('userGroup');
// printf ('