include/functions_setup.inc

   1 <?php
   2
   3 function check_schema_version($description, $version)
   4 {
   5   $desc= preg_replace("/^.* DESC\s+\(*\s*'([^']+)'\s*\)*.*$/", '\\1', $description);
   6
   7   return preg_match("/\(v$version\)/", $desc);
   8 }
   9
  10
  11 function view_schema_check($table)
  12 {
  13   $message="<table summary=\"\" class=\"check\">";
  14
  15   foreach ($table as $key => $values){
  16     $msg = $values['msg'];
  17     $message.= "<tr><td class=\"check\">$msg";
  18
  19     if($values['status']) {
  20       $message.="</td><td style='text-align:center' >
  21         <img src=images/true.png alt='true' /></td></tr>";
  22     } else {
  23       $message.="</td><td style='text-align:center' >
  24         <img src=images/button_cancel.png alt='false' /></td></tr>";
  25     }
  26   }
  27   $message.="</table>";
  28
  29   return $message;
  30 }
  31
  32
  33 function is_schema_readable($server, $admin, $password)
  34 {
  35   $ds= ldap_connect ($server);
  36   if (!$ds) {
  37     return (false);
  38   }
  39   ldap_set_option($ds, LDAP_OPT_PROTOCOL_VERSION, 3);
  40   $r= ldap_bind ($ds, $admin, $password);
  41
  42   /* Get base to look for schema */
  43   $sr  = @ldap_read ($ds, "", "objectClass=*", array("subschemaSubentry"));
  44   $attr= @ldap_get_entries($ds,$sr);
  45   if (!isset($attr[0]['subschemasubentry'][0])){
  46     return (false);
  47   }
  48
  49   $nb= $attr[0]['subschemasubentry'][0];
  50   $objectclasses= array();
  51   $sr= ldap_read ($ds, $nb, "objectClass=*", array("objectclasses"));
  52   $attrs= ldap_get_entries($ds,$sr);
  53   if (!isset($attrs[0])){
  54     return (false);
  55   }
  56   return(true);
  57 }
  58
  59 function schema_check($server, $admin, $password, $aff=0,$CalledByIndexPhP=false)
  60 {
  61   global $config;
  62
  63   $messages= array();
  64   $required_classes= array(
  65       "gosaObject"            => array("version" => "2.4"),
  66       "gosaAccount"           => array("version" => "2.4"),
  67       "gosaLockEntry"         => array("version" => "2.4"),
  68       "gosaCacheEntry"        => array("version" => "2.4"),
  69       "gosaDepartment"        => array("version" => "2.4"),
  70
  71       "goFaxAccount"          => array("version" => "1.0.4", "class" => "gofaxAccount","file" => "gofax.schema"),
  72       "goFaxSBlock"           => array("version" => "1.0.4", "class" => "gofaxAccount","file" => "gofax.schema"),
  73       "goFaxRBlock"           => array("version" => "1.0.4", "class" => "gofaxAccount","file" => "gofax.schema"),
  74
  75       "gosaUserTemplate"      => array("version" => "2.4", "class" => "posixAccount","file" => "nis.schema"),
  76       "gosaMailAccount"       => array("version" => "2.4", "class" => "mailAccount","file" => "gosa+samba3.schema"),
  77       "gosaProxyAccount"      => array("version" => "2.4", "class" => "proxyAccount","file" => "gosa+samba3.schema"),
  78       "gosaApplication"       => array("version" => "2.4", "class" => "appgroup","file" => "gosa.schema"),
  79       "gosaApplicationGroup"  => array("version" => "2.4", "class" => "appgroup","file" => "gosa.schema"),
  80
  81       "GOhard"                => array("version" => "2.4", "class" => "terminals","file" => "goto.schema"),
  82       "gotoTerminal"          => array("version" => "2.0", "class" => "terminals","file" => "goto.schema"),
  83       "goServer"              => array("version" => "2.4","class" => "server","file" => "goserver.schema"),
  84       "goTerminalServer"      => array("version" => "2.4", "class" => "terminals","file" => "goto.schema"),
  85       "goShareServer"           => array("version" => "2.4", "class" => "terminals","file" => "goto.schema"),
  86       "goNtpServer"           => array("version" => "2.4", "class" => "terminals","file" => "goto.schema"),
  87       "goSyslogServer"        => array("version" => "2.4", "class" => "terminals","file" => "goto.schema"),
  88       "goLdapServer"          => array("version" => "2.4"),
  89       "goCupsServer"          => array("version" => "2.4", "class" => array("posixAccount", "terminals"),),
  90       "goImapServer"          => array("version" => "2.4", "class" => array("mailAccount", "mailgroup"),"file" => "gosa+samba3.schema"),
  91       "goKrbServer"           => array("version" => "2.4"),
  92       "goFaxServer"           => array("version" => "2.4", "class" => "gofaxAccount","file" => "gofax.schema"),
  93       );
  94
  95   /* Build LDAP connection */
  96   $ds= ldap_connect ($server);
  97   if (!$ds) {
  98     return (array(array("msg" => _("Can't bind to LDAP. No schema check possible!"), "status" => FALSE)));
  99   }
 100   ldap_set_option($ds, LDAP_OPT_PROTOCOL_VERSION, 3);
 101   $r= ldap_bind ($ds, $admin, $password);
 102
 103   /* Get base to look for schema */
 104   $sr  = @ldap_read ($ds, "", "objectClass=*", array("subschemaSubentry"));
 105   $attr= @ldap_get_entries($ds,$sr);
 106   if (!isset($attr[0]['subschemasubentry'][0])){
 107     return (array(array("msg" => _("Can't get schema information from server. No schema check possible!"), "status" => FALSE)));
 108   }
 109
 110   /* Get list of objectclasses */
 111   $nb= $attr[0]['subschemasubentry'][0];
 112   $objectclasses= array();
 113   $sr= ldap_read ($ds, $nb, "objectClass=*", array("objectclasses"));
 114   $attrs= ldap_get_entries($ds,$sr);
 115   if (!isset($attrs[0])){
 116     return (array(array("msg" => _("Can't get schema information from server. No schema check possible!"), "status" => FALSE)));
 117   }
 118   foreach ($attrs[0]['objectclasses'] as $val){
 119     $name= preg_replace("/^.* NAME\s+\(*\s*'([^']+)'\s*\)*.*$/", '\\1', $val);
 120     if ($name != $val){
 121       $objectclasses[$name]= $val;
 122     }
 123   }
 124   /* Walk through objectclasses and check if they are needed or not */
 125   foreach ($required_classes as $key => $value){
 126     if (isset($value['class'])){
 127       if (!is_array($value['class'])){
 128         $classes= array($value['class']);
 129       } else {
 130         $classes= $value['class'];
 131       }
 132
 133       /* Check if we are using the class that requires */
 134       foreach($classes as $class){
 135         if (!isset($objectclasses[$key])){
 136           $messages[$key]['msg']= sprintf(_("Optional objectclass '%s' required by plugin '%s' is not present in LDAP setup"), $key, $class);
 137           $messages[$key]['status'] = FALSE;
 138         } else {
 139           if (!check_schema_version($objectclasses[$key], $value['version'])){
 140             $messages[$key]['msg']= sprintf(_("Optional objectclass '%s' required by plugin '%s' does not have version %s"), $key, $class, $value['version']);
 141             $messages[$key]['needonstartup'] = TRUE;
 142             $messages[$key]['status'] =FALSE;
 143           }else {
 144             if(!isset($affich2[$class])){
 145               $affich2[$class]['msg']   = sprintf(_("Support for '%s' enabled"), $class)."<td class=\"check\"> ".$value['file']."</td>";
 146               $affich2[$class]['status']= TRUE;
 147             }
 148           }
 149         }
 150
 151       }
 152     } else {
 153       /* Required class */
 154       if (!isset($objectclasses[$key])){
 155         $messages[$key]['msg']= sprintf(_("Required objectclass '%s' is not present in LDAP setup"), $key);
 156         $messages[$key]['status'] = FALSE;
 157       } else {
 158         if (!check_schema_version($objectclasses[$key], $value['version'])){
 159           $messages[$key]['msg']= sprintf(_("Required objectclass '%s' does not have version %s"), $key, $value['version']);
 160           $messages[$key]['status'] = FALSE;
 161           $messages[$key]['needonstartup'] = TRUE;
 162         }
 163
 164       }
 165     }
 166   }
 167
 168   /* Check for correct samba parameters */
 169   if (!isset($objectclasses['sambaSamAccount'])){
 170     $messages['samba3']['msg']= _("SAMBA 3 support disabled, no schema seems to be installed");
 171     $affich['samba3']['msg']= $messages['samba3']['msg']."<td class=\"check\">gosa+samba3.schema</td>";
 172     $messages['samba3']['status']= FALSE;
 173     $affich['samba3']['status']= FALSE;
 174   }else{
 175     $affich['samba3']['msg']= _("SAMBA 3 support enabled")."<td class=\"check\">gosa+samba3.schema</td>";
 176     $affich['samba3']['status']= TRUE;
 177   }
 178
 179   if (!isset($objectclasses['sambaAccount'])){
 180     $messages['samba2']['msg']= _("SAMBA 2 support disabled, no schema seems to be installed");
 181     $affich['samba2']['msg']= $messages['samba2']['msg']."<td class=\"check\">samba.schema</td>";
 182     $messages['samba2']['status']= FALSE;
 183     $affich['samba2']['status']= FALSE;
 184   }else{
 185     $affich['samba2']['msg']= _("SAMBA 2 support enabled")."<td class=\"check\">samba.schema</td>";
 186     $affich['samba2']['status']= TRUE;
 187   }
 188
 189   /* Check pureftp/dns/ */
 190   if (!isset($objectclasses['PureFTPdUser'])){
 191     $messages['pureftp']['msg']= _("Support for pureftp disabled, no schema seems to be installed");
 192     $affich['pureftp']['msg']= $messages['pureftp']['msg']."<td class=\"check\">pureftpd.schema</td>";
 193     $messages['pureftp']['status']= FALSE;
 194     $affich['pureftp']['status']= FALSE;
 195   }else{
 196     $affich['pureftp']['msg']= _("Support for pureftp enabled")."<td class=\"check\">pureftpd.schema</td>";
 197     $affich['pureftp']['status']= TRUE;
 198   }
 199
 200   if (!isset($objectclasses['gosaWebdavAccount'])){
 201     $messages['webdav']['msg']= _("Support for WebDAV disabled, no schema seems to be installed");
 202     $affich['webdav']['msg']= $messages['webdav']['msg']."<td class=\"check\"></td>";
 203     $messages['webdav']['status']= FALSE;
 204     $affich['webdav']['status']= FALSE;
 205   }else{
 206     $affich['webdav']['msg']=_("Support for WebDAV enabled")."<td class=\"check\">gosa+samba3.schema</td>";
 207     $affich['webdav']['status']= TRUE;
 208   }
 209
 210   if (!isset($objectclasses['phpgwAccount'])){
 211     $messages['phpgroupware']['msg']= _("Support for phpgroupware disabled, no schema seems to be installed");
 212     $affich['phpgroupware']['msg']= $messages['phpgroupware']['msg']."<td class=\"check\">phpgwaccount.schema</td>";
 213     $messages['phpgroupware']['status']= FALSE;
 214     $affich['phpgroupware']['status']= FALSE;
 215   }else{
 216     $affich['phpgroupware']['msg']= _("Support for phpgroupware enabled")."<td class=\"check\">phpgwaccount.schema</td>";
 217     $affich['phpgroupware']['status']= TRUE;
 218   }
 219
 220   if (!isset($objectclasses['goFonAccount'])){
 221     $messages['phoneaccount']['msg']= _("Support for gofon disabled, no schema seems to be installed");
 222     $affich['phoneaccount']['msg']= $messages['phoneaccount']['msg']."<td class=\"check\">gofon.schema</td>";
 223     $messages['phoneaccount']['status']= FALSE;
 224     $affich['phoneaccount']['status']= FALSE;
 225   }else{
 226     $affich['phoneaccount']['msg']= _("Support for gofon enabled")."<td class=\"check\">gofon.schema</td>";
 227     $affich['phoneaccount']['status']= true;
 228   }
 229
 230   if (!isset($objectclasses['nagiosContact'])){
 231     $messages['nagioscontact']['msg']= _("Support for nagios disabled, no schema seems to be installed");
 232     $affich['nagioscontact']['msg']= $messages['nagioscontact']['msg']."<td class=\"check\">nagios.schema</td>";
 233     $messages['nagioscontact']['status']= FALSE;
 234     $affich['nagioscontact']['status']= FALSE;
 235   }else{
 236     $affich['nagioscontact']['msg']= _("Support for nagios enabled")."<td class=\"check\">nagios.schema</td>";
 237     $affich['nagioscontact']['status']= true;
 238   }
 239
 240   /* Fix for PHP Fehler "Undefined index: ldapconf"
 241    * Ablaufverfolgung[1]: Funktion schema_check Datei: /home/hickert/gosa/include/functions_setup.inc (Zeile 230)
 242    */
 243   if((isset($_SESSION['ldapconf']['mail_methods']))&&(isset($_SESSION['ldapconf']))){
 244         if(($_SESSION['ldapconf']['mail_methods'][$_SESSION['ldapconf']['mail']] == "kolab")&&(!$CalledByIndexPhP)){
 245           if(!isset($objectclasses['kolabInetOrgPerson']))  {
 246             $messages['kolab']['msg']= _("Support for Kolab disabled, no schema seems to be installed, setting mail-method to cyrus");
 247             $affich['kolab']['msg']=$messages['kolab']['msg']."<td class=\"check\">kolab2.schema</td>";
 248             $tmp= array_flip($_SESSION['ldapconf']['mail_methods']);
 249             $_SESSION['ldapconf']['mail']=$tmp['cyrus'];
 250             $messages['kolab']['status']= FALSE;
 251             $affich['kolab']['status']= FALSE;
 252           }else{
 253             $affich['kolab']['msg']=_("Support for Kolab enabled")."<td class=\"check\">gofon.schema</td>";
 254             $affich['kolab']['status']= TRUE;
 255           }
 256         }
 257   }
 258   if($aff==0){
 259     return ($messages);
 260   } else {
 261     return(array_merge($affich,$affich2));
 262   }
 263 }
 264
 265
 266 function check(&$faults, $message, $description, $test, $required= TRUE)
 267 {
 268   $msg= "<table summary=\"\" class='check'><tr><td class='check' style='font-size:14px;'>$message</td>
 269     <td rowspan=2 style='vertical-align:middle; text-align:center;width:45px;'>";
 270   if ($test){
 271     $msg.= _("OK")."<br>";
 272   } else {
 273     if (!$required){
 274       $msg.="<font color=red>"._("Ignored")."</font><br>";
 275     } else {
 276       $msg.="<font color=red>"._("Failed")."</font><br>";
 277       $faults++;
 278     }
 279   }
 280   $msg.= "</td></tr><tr><td class='check' style='padding-left:20px;".
 281     "background-color:#F0F0F0;'>$description</td></tr></table><br>";
 282
 283   return $msg;
 284 }
 285
 286 function perform_php_checks(&$faults)
 287 {
 288   global $check_globals;
 289
 290   $faults= 0;
 291   $msg= "";
 292
 293   $msg.= "<h1>"._("PHP setup inspection")."</h1>";
 294   $msg.= check (        $faults, _("Checking for PHP version (>=4.1.0)"),
 295       _("PHP must be of version 4.1.0 or above for some functions and known bugs in PHP language."),
 296       version_compare(phpversion(), "4.1.0")>=0);
 297
 298   $msg.= check (        $faults, _("Checking if register_globals is set to 'off'"),
 299       _("register_globals is a PHP mechanism to register all global varibales to be accessible from scripts without changing the scope. This may be a security risk. GOsa will run in both modes."),
 300       $check_globals == 0, FALSE);
 301
 302   $msg.= check (        $faults, _("Checking for ldap module"),
 303       _("This is the main module used by GOsa and therefore really required."),
 304       is_callable('ldap_bind'));
 305
 306   $msg.= check (  $faults, _("Checking for XML functions"),
 307       _("XML functions are required to parse the configuration file."),
 308       is_callable('xml_parser_create'));
 309
 310   $msg.= check (        $faults, _("Checking for gettext support"),
 311       _("Gettext support is required for internationalized GOsa."),
 312       is_callable('bindtextdomain'));
 313
 314   $msg.= check (        $faults, _("Checking for iconv support"),
 315       _("This module is used by GOsa to convert samba munged dial informations and is therefore required."),
 316       is_callable('iconv'));
 317
 318   $msg.= check (        $faults, _("Checking for mhash module"),
 319       _("To use SSHA encryption, you'll need this module. If you are just using crypt or md5 encryption, ignore this message. GOsa will run without it."),
 320       is_callable('mhash'), FALSE);
 321
 322   $msg.= check (        $faults, _("Checking for imap module"),
 323       _("The IMAP module is needed to communicate with the IMAP server. It gets status informations, creates and deletes mail users."),
 324       is_callable('imap_open'));
 325
 326   $msg.= check (        $faults, _("Checking for getacl in imap"),
 327       _("The getacl support is needed for shared folder permissions. The standard IMAP module is not capable of reading acl's. You need a recend PHP version for this feature."),
 328       is_callable('imap_getacl'), FALSE);
 329
 330   $msg.= check (        $faults, _("Checking for mysql module"),
 331       _("MySQL support is needed for reading GOfax reports from databases."),
 332       is_callable('mysql_query'), FALSE);
 333
 334   $msg.= check (        $faults, _("Checking for cups module"),
 335       _("In order to read available printers from IPP protocol instead of printcap files, you've to install the CUPS module."),
 336       is_callable('cups_get_dest_list'), FALSE);
 337
 338   $msg.= check (        $faults, _("Checking for kadm5 module"),
 339       _("Managing users in kerberos requires the kadm5 module which is downloadable via PEAR network."),
 340       is_callable('kadm5_init_with_password'), FALSE);
 341
 342   $msg.= check (  $faults, _("Checking for snmp Module"),
 343       _("Simple Network Management Protocol (SNMP) is required for client monitoring."),
 344       is_callable('snmpget'), FALSE);
 345
 346   return ($msg);
 347 }
 348
 349 function get_link($function_name) {
 350   $result= "<a href='http://de.php.net/manual/en/function.";
 351
 352   /* Replace all underscores with hyphens (phpdoc convention) */
 353   $function_name= str_replace("_", "-", $function_name);
 354
 355   /* Append to base URL */
 356   $result.= $function_name.".php'>$function_name</a>";
 357
 358   return $result;
 359 }
 360
 361 function perform_additional_function_checks(&$faults) {
 362   global $check_globals;
 363
 364   $faults= 0;
 365   $msg= "";
 366   $functions= array();
 367
 368   $functions_list= '../include/functions_list.inc';
 369
 370   /* Make sure that we can read the file */
 371   if(is_readable($functions_list)) {
 372     /* Open filehandle */
 373     $fh= fopen($functions_list,'rb');
 374     if($fh!=null) {
 375       $functions= eval(fread($fh,filesize($functions_list)));
 376     }
 377   }
 378
 379   $msg.= "<h1>"._("PHP detailed function inspection")."</h1>";
 380   /* Only print message, if function is not callable */
 381   foreach($functions as $key => $fn_name) {
 382     if(!is_callable($fn_name)) {
 383       $msg.= check ($faults, sprintf(_("Checking for function %s"), "<b>".get_link($fn_name)."</b>"),
 384         sprintf(_("The function %s is used by GOsa. There is no information if it's optional or required yet."), "<b>".get_link($fn_name)."</b>"),
 385         is_callable($fn_name), false);
 386     }
 387   }
 388   return $msg;
 389 }
 390
 391 function perform_additional_checks(&$faults)
 392 {
 393   $ret = NULL;
 394   /* Programm check */
 395   $msg= "<h1>"._("Checking for some additional programms")."</h1>";
 396
 397   /* Image Magick */
 398   $query= "LC_ALL=C LANG=C convert -help";
 399   $output= shell_exec ($query);
 400   if ($output != ""){
 401     $lines= split ("\n", $output);
 402     $version= preg_replace ("/^Version:.+Magick ([^\s]+).*/", "\\1", $lines[0]);
 403     list($major, $minor)= split("\.", $version);
 404     $msg.= check (      $faults, _("Checking for ImageMagick (>=5.4.0)"),
 405         _("ImageMagick is used to convert user supplied images to fit the suggested size and the unified JPEG format."),
 406         ($major > 5 || ($major == 5 && $minor >= 4)));
 407   } else {
 408     $msg.= check (      $faults, _("Checking imagick module for PHP"),
 409         _("Imagick is used to convert user supplied images to fit the suggested size and the unified JPEG format from PHP script."), function_exists('imagick_blob2image'), TRUE);
 410   }
 411
 412   /* Check for fping */
 413   $query= "LC_ALL=C LANG=C fping -v 2>&1";
 414   $output= shell_exec ($query);
 415   $have_fping= preg_match("/^fping:/", $output);
 416   $msg.= check (        $faults, _("Checking for fping utility"),
 417       _("The fping utility is only used if you've got a thin client based terminal environment running."),
 418       $have_fping, FALSE);
 419
 420   /* Check for smb hash generation tool */
 421   $query= "mkntpwd 2>&1";
 422   $output= shell_exec ($query);
 423   $have_mkntpwd= preg_match("/^Usage: mkntpwd /", $output);
 424   $alt = 0;
 425
 426   if (!$have_mkntpwd){
 427     $query= "LC_ALL=C LANG=C perl -MCrypt::SmbHash -e 'ntlmgen \"PASSWD\", \$lm, \$nt; print \"\${lm}:\${nt}\\n\";' &>/dev/null";
 428     system ($query, $ret);
 429     $alt= ($ret == 0);
 430   }
 431
 432   $msg.= check (        $faults, _("Checking for a way to generate LM/NT password hashes"),
 433       _("In order to use SAMBA 2/3, you've to install some additional packages to generate password hashes."),
 434       ($have_mkntpwd || $alt));
 435
 436   /* seesio.auto_start should be off, in order to without trouble*/
 437   $session_auto_start = ini_get('session.auto_start');
 438   $implicit_flush     = ini_get('implicit_flush');
 439   $max_execution_time = ini_get('max_execution_time');
 440   $memory_limit       = ini_get('memory_limit');
 441   $expose_php         = ini_get('expose_php');
 442   $magic_quotes_gpc   = ini_get('magic_quotes_gpc');
 443   $register_globals   = ini_get('register_globals');
 444
 445   /* auto_register */
 446   $msg.= check (  $faults, _("php.ini check -> session.auto_register"),
 447       _("In Order to use GOsa without any trouble, the session.auto_register option in your php.ini must be set to 'Off'."), (!$session_auto_start['local_value']));
 448
 449   /* implicit_flush */
 450   $msg.= check (  $faults, _("php.ini check -> implicit_flush"),
 451       _("This option influences the Output handling. Turn this Option off, to increase performance."),
 452       !$implicit_flush['local_value'],0,false);
 453
 454   /* max_execution_time */
 455   if($max_execution_time['local_value'] < 30 ){
 456     $max_execution_time['local_value']=false;
 457   }
 458   $msg.= check (  $faults, _("php.ini check -> max_execution_time"),
 459       _("The Execution time should be at least 30 seconds, because some actions may consume more time."),
 460       $max_execution_time['local_value'],0,false);
 461
 462   /* memory_limit */
 463   if($memory_limit['local_value'] < 16 ){
 464     $memory_limit['local_value']=false;
 465   }
 466   $msg.= check (  $faults, _("php.ini check -> memory_limit"),
 467       _("GOsa needs at least 16MB of memory, less will cause unpredictable errors! Increase it for larger setups."),
 468       !$implicit_flush['local_value'],0,false);
 469
 470   /* expose_php */
 471   $msg.= check (  $faults, _("php.ini check -> expose_php"),
 472       _("Increase the server security by setting expose_php to 'off'. PHP won't send any Information about the server you are running in this case."),
 473       !$implicit_flush['local_value'],0,false);
 474
 475   /* magic_quotes_gpc */
 476   $msg.= check (  $faults, _("php.ini check -> magic_quotes_gpc"),
 477       _("Increase your server security by setting magic_quotes_gpc to 'on'. PHP will escape all quotes in strings in this case."),
 478       $magic_quotes_gpc['local_value'],0,false);
 479
 480   return $msg;
 481 }
 482
 483
 484 function parse_contrib_conf()
 485 {
 486
 487   $str                = "";
 488   $used_samba_version = 0;
 489   $query              = "";
 490   $fp                 = false;
 491   $output             = "";
 492   $needridbase_sid    = false;
 493   $pwdhash            = "";
 494   $replacements       = array();
 495   $ldapconf           = $_SESSION['ldapconf']; // The Installation information
 496   $classes            = $_SESSION['classes'];  // Class information needed to define which features are enabled
 497   $possible_plugins   = array();
 498
 499   /* Which samba version do we use? */
 500   if(isset($classes['samba3'])){
 501     $used_samba_version = 2;
 502   } else {
 503     $used_samba_version = 3;
 504   }
 505
 506   /* Look for samba password generation method */
 507   if(file_exists("/usr/lib/gosa/mkntpasswd")){
 508     $pwdhash  = "/usr/lib/gosa/mkntpasswd";
 509   } elseif (preg_match("/^Usage: mkntpwd /", shell_exec ("mkntpwd 2>&1"))){
 510     $pwdhash= "mkntpwd";
 511   } else {
 512     $pwdhash=('perl -MCrypt::SmbHash -e "ntlmgen \"\$ARGV[0]\", \$lm, \$nt; print \"\${lm}:\${nt}\n\";" $1');
 513   }
 514
 515   /* Define which variables will be replaced */
 516   $replacements['{LOCATIONNAME}']  = $ldapconf['location'];
 517   $replacements['{SAMBAVERSION}']  = $used_samba_version;
 518   $replacements['{LDAPBASE}']      = $ldapconf['base'];
 519   $replacements['{LDAPADMIN}']     = $ldapconf['admin'];
 520   $replacements['{DNMODE}']        = $ldapconf['peopledn'];
 521   $replacements['{LDAPHOST}']      = $ldapconf['uri'];
 522   $replacements['{PASSWORD}']      = $ldapconf['password'];
 523   $replacements['{CRYPT}']         = $ldapconf['arr_cryptkeys'][$ldapconf['arr_crypts']];
 524   $replacements['{SID}']         = "";
 525   $replacements['{RIDBASE}']     = "";
 526   if($ldapconf['mail'] != "disabled"){
 527     $replacements['{MAILMETHOD}']    = $ldapconf['mail_methods'][$ldapconf['mail']];
 528   }
 529   $replacements['{SMBHASH}']       = $pwdhash;
 530   $replacements['{GOVERNMENTMODE}']= "false";
 531   $replacements['{kolabAccount}']  = "";
 532   $replacements['{servKolab}']     = "";
 533   $replacements['{errorlvl}']     = $ldapconf['errorlvl'];
 534
 535   /* This array contains all preg_replace syntax to delete all unused plugins
 536      THE kEY MUST BE THE CLASSNAME so we can check it with $ldapconf['classes'] */
 537
 538   $possible_plugins['fonreport'][]   = "'\n.*<plugin.*fonreport+.*\n.*>.*\n'i";
 539   $possible_plugins['phoneaccount'][]= "'\n.*<tab.*phoneAccount.*>.*\n'i";
 540   $possible_plugins['logview'][]     = "'\n.*<plugin.*logview+.*\n.*>.*\n'i";
 541   $possible_plugins['pureftp'][]     = "'\n.*<tab.*pureftp.*>.*\n'i";
 542   $possible_plugins['webdav'][]      = "'\n.*<tab.*webdav.*>.*\n'i";
 543   $possible_plugins['phpgroupware'][]= "'\n.*<tab.*phpgroupware.*>.*\n'i";
 544
 545   /*Header information
 546      Needed to send the generated gosa.conf to the browser */
 547   header("Expires: Mon, 26 Jul 1997 05:00:00 GMT");
 548   header("Last-Modified: ".gmdate("D, d M Y H:i:s")." GMT");
 549   header("Cache-Control: no-cache");
 550   header("Pragma: no-cache");
 551   header("Cache-Control: post-check=0, pre-check=0");
 552   header("Content-type: text/plain");
 553
 554   if (preg_match('/MSIE 5.5/', $_SERVER['HTTP_USER_AGENT']) ||
 555       preg_match('/MSIE 6.0/', $_SERVER['HTTP_USER_AGENT'])){
 556     header('Content-Disposition: filename="gosa.conf"');
 557   } else {
 558     header('Content-Disposition: attachment; filename="gosa.conf"');
 559   }
 560
 561   if(!$fp=fopen(CONFIG_TEMPLATE_DIR."/gosa.conf","r")) {
 562     echo "Can't open file ".CONFIG_TEMPLATE_DIR."/gosa.conf";
 563   } else {
 564     while(!feof($fp)) {
 565       $str.= fread($fp,512);
 566     }
 567
 568     if($ldapconf['mail_methods'][$ldapconf['mail']]=="kolab") {
 569       $replacements['{kolabAccount}']  ="<tab class=\"kolabAccount\" />\n     ";
 570       $replacements['{servKolab}']     ="<tab class=\"servkolab\" name=\"Kolab\" />";
 571     }
 572
 573     if($used_samba_version == 2) {
 574       /* Do nothing for samba 2... */
 575     } else {
 576       /* Create LDAP connection, to check if there's a domain
 577          object defined in the LDAP schema */
 578       $ldap= new LDAP($ldapconf['admin'], $ldapconf['password'], $ldapconf['uri']);
 579
 580       /* Try to find a Samba Domain Objekt */
 581       $ldap->search("(objectClass=sambaDomain)");
 582
 583       /* Something found ??? so we need to define ridbase an SID by ourselfs */
 584       if($ldap->count()< 1) {
 585         $replacements['{SID}']= "sid=\"123412-11\"";
 586         $replacements['{RIDBASE}']= "ridbase=\"1000\"";
 587       }
 588     }
 589
 590     /* Data readed, types replaced, samba version detected and checked if
 591        we need to add SID and RIDBASE. Check if there is an ivbbEntry in
 592        the LDAP tree, in this case we will set the governmentmode to true.
 593        Create LDAP connection, to check if theres a domain Objekt definen
 594        in the LDAP schema. */
 595     if(!isset($ldap)){
 596       $ldap= new LDAP($ldapconf['admin'], $ldapconf['password'], $ldapconf['uri']);
 597     }
 598
 599     /* Try to find a Samba Domain Objekt */
 600     $ldap->search("(objectClass=ivbbEntry)");
 601
 602     /* Something found ??? so we need to define ridbase an SID by ourselfs */
 603     if($ldap->count()> 0) {
 604       $replacements['{GOVERNMENTMODE}']= "true";
 605     }
 606
 607     /* Replace all colleted information with placeholder */
 608     foreach($replacements as $key => $val) {
 609       $str = preg_replace("/".$key."/",$val,$str);
 610     }
 611
 612     if($ldapconf['mail'] == "disabled"){
 613       $str = str_replace("mailMethod=\"{MAILMETHOD}\"","",$str);
 614     }
 615
 616
 617     /* Remove all unused plugins */
 618     foreach($possible_plugins as $key=> $plugin) {
 619       foreach($plugin as $key=>$val) {
 620         if(in_array($plugin,$classes)) {
 621           $str = preg_replace($val,"\n",$str);
 622         }
 623       }
 624     }
 625   }
 626
 627   return ((($str)));
 628 }
 629
 630
 631 /* Show setup_page 1 */
 632 function show_setup_page1($withoutput = true)
 633 {
 634   $faults = array();
 635   $smarty = get_smarty();
 636   $smarty->assign ("content", get_template_path('setup_introduction.tpl'));
 637   $smarty->assign ("tests", perform_php_checks($faults));
 638   $smarty->assign ("detailed_tests", perform_additional_function_checks($faults));
 639
 640   /* This var is true if anything went wrong */
 641   if ($faults){
 642     $smarty->assign("mode", "disabled");
 643   }
 644
 645   /* This line displays the template only if (withoutput is set) */
 646   if($withoutput){
 647     $smarty->display (get_template_path('headers.tpl'));
 648   }
 649
 650   if (isset($_SESSION['errors'])){
 651     $smarty->assign("errors", $_SESSION['errors']);
 652   }
 653
 654   if($withoutput){
 655     $smarty->display (get_template_path('setup.tpl'));
 656   }
 657
 658   return (!$faults);
 659 }
 660
 661
 662 /* Show setup_page 2 */
 663 function show_setup_page2($withoutput = true)
 664 {
 665   $faults = array();
 666   $smarty = get_smarty();
 667   $smarty->assign ("content", get_template_path('setup_step2.tpl'));
 668   $smarty->assign ("tests", perform_additional_checks($faults));
 669
 670   if ($faults) {
 671     $smarty->assign("mode", "disabled");
 672   }
 673   if($withoutput){
 674     $smarty->display (get_template_path('headers.tpl'));
 675   }
 676   if (isset($_SESSION['errors']))  {
 677     $smarty->assign("errors", $_SESSION['errors']);
 678   }
 679   if($withoutput){
 680     $smarty->display (get_template_path('setup.tpl'));
 681   }
 682
 683   return (!$faults);
 684 }
 685
 686
 687 function show_setup_page3($withoutput = true)
 688 {
 689   $ds = NULL;
 690   $smarty = get_smarty();
 691
 692   /* Take the Post oder the Sessioin saved data */
 693   if(isset($_POST['uri'])){
 694     $uri = $_POST['uri'];
 695   } elseif(isset($_SESSION['ldapconf']['uri'])){
 696     $uri = $_SESSION['ldapconf']['uri'];
 697   }
 698
 699   /* If Page called first time, field is empty */
 700   if((!isset($uri))||(empty($uri))){
 701     $uri = "ldap://localhost:389";
 702   }
 703
 704   /* if isset $uri save it to session */
 705   if(isset($uri)) {
 706     $_SESSION['ldapconf']['uri'] = $uri;
 707     $smarty->assign ("uri", validate($uri));
 708   }
 709
 710   /* No error till now */
 711   $fault = false;
 712
 713   /* If we pushed the Button continue */
 714   if(isset($_POST['continue3'])){
 715     if(!isset($uri)) {
 716       $fault = true;
 717
 718       /* Output the Error */
 719       if($withoutput) {
 720         print_red (_("You've to specify an ldap server before continuing!"));
 721         $smarty->assign ("content", get_template_path('setup_step3.tpl'));
 722       }
 723     }
 724   } elseif (!$ds = @ldap_connect (validate($uri))) {
 725     $fault =true;
 726
 727     /* Output the Error */
 728     if($withoutput) {
 729       print_red (_("Can't connect to the specified LDAP server! Please make sure that is reachable for GOsa."));
 730       $smarty->assign ("uri", validate($uri));
 731       $smarty->assign ("content", get_template_path('setup_step3.tpl'));
 732     }
 733   } else {
 734     /* Try to bind the connection */
 735     ldap_set_option($ds, LDAP_OPT_PROTOCOL_VERSION, 3);
 736
 737     /* if we can't bind , print error */
 738     if (!$r  =  @ldap_bind ($ds)) {
 739       $fault = true;
 740
 741       /* Output the Error */
 742       if($withoutput) {
 743         print_red (_("Can't bind to the specified LDAP server! Please make sure that it is reachable for GOsa."));
 744         $smarty->assign ("content", get_template_path('setup_step3.tpl'));
 745         $smarty->assign ("uri", validate($uri));
 746       }
 747     } else {
 748       $fault = false;
 749     }
 750   }
 751
 752   $smarty->assign ("content", get_template_path('setup_step3.tpl'));
 753
 754   /* Load Header */
 755   if($withoutput){
 756     $smarty->display (get_template_path('headers.tpl'));
 757   }
 758
 759   /* Set Errors to Smarty */
 760   if (isset($_SESSION['errors'])) {
 761     $smarty->assign("errors", $_SESSION['errors']);
 762   }
 763
 764   /* Print out Template */
 765   if($withoutput){
 766     $smarty->display (get_template_path('setup.tpl'));
 767   }
 768
 769   return (!$fault);
 770 }
 771
 772
 773 function show_setup_page4($withoutput = true)
 774 {
 775   $smarty= get_smarty();
 776
 777         // ?
 778   if(!isset($_SESSION['ldapconf']['base'])){
 779     $_SESSION['ldapconf']['base']= $base;
 780   }
 781
 782   if(!isset($_SESSION['ldapconf']['base'])){
 783     $_SESSION['ldapconf']['base']= $base;
 784   }
 785   require_once("class_password-methods.inc");
 786
 787   $fault     = false;
 788   $uri       = $_SESSION['ldapconf']['uri'];
 789   $ldapconf  = $_SESSION['ldapconf'];
 790   $arr_crypts= array();
 791   $temp      = "";
 792   $checkvars = array("location", "admin", "password", "peopleou", "base",
 793       "peopledn", "arr_crypts", "mail", "uidbase","errorlvl");
 794
 795   if(!isset($_SESSION['ldapconf']['arr_cryptkeys'])) {
 796     require_once("class_password-methods.inc");
 797     $tmp= passwordMethod::get_available_methods_if_not_loaded();
 798     $_SESSION['ldapconf']['arr_cryptkeys']= $tmp['name'];
 799   }
 800
 801   if(!isset($_SESSION['ldapconf']['mail_methods'])) {
 802     $_SESSION['ldapconf']['mail_methods']=array();
 803     $temp = get_available_mail_classes();
 804     $_SESSION['ldapconf']['mail_methods']= $temp['name'];
 805   }
 806
 807   /* If there are some empty vars in ldapconnect -
 808      these values also represent out default values */
 809   if(!$ds = @ldap_connect (validate($uri))){
 810     $fault = true;
 811     if($withoutput){
 812       print_red (_("Can't connect to the specified LDAP server! Please make sure that is reachable for GOsa."));
 813     }
 814   } elseif(!@ldap_set_option($ds, LDAP_OPT_PROTOCOL_VERSION, 3)){
 815     $fault = true;
 816     if($withoutput){
 817       print_red (_("Can't bind to the specified LDAP server! Please make sure that it is reachable for GOsa."));
 818     }
 819   } elseif(!$r= @ldap_bind ($ds)){
 820     $fault = true;
 821     if($withoutput){
 822       print_red (_("Can't bind to the specified LDAP server! Please make sure that it is reachable for GOsa."));
 823     }
 824   } else {
 825     $sr=   @ldap_search ($ds, "", "objectClass=*", array("namingContexts"));
 826     $attr= @ldap_get_entries($ds,$sr);
 827
 828     if((empty($attr))) {
 829       $base= "dc=example,dc=net";
 830
 831       if($withoutput){
 832         print_red(_("Bind to server successful, but the server seems to be completly empty, please check all informations twice"));
 833       }
 834
 835     } else {
 836       $base= $attr[0]['dn'];
 837     }
 838   }
 839
 840   if(!isset($_SESSION['ldapconf']['base'])){
 841     $_SESSION['ldapconf']['base']= $base;
 842   }
 843   if(!isset($_SESSION['ldapconf']['admin'])){
 844     $_SESSION['ldapconf']['admin']= "cn=ldapadmin,".$base;
 845   }
 846   if(!isset($_SESSION['ldapconf']['peopleou'])){
 847     $_SESSION['ldapconf']['peopleou']= "ou=people";
 848   }
 849   if(!isset($_SESSION['ldapconf']['groupou'])){
 850     $_SESSION['ldapconf']['groupou']= "ou=groups";
 851   }
 852   if(!isset($_SESSION['ldapconf']['peopledn'])){
 853     $_SESSION['ldapconf']['peopledn']= "cn";
 854   }
 855   if(!isset($_SESSION['ldapconf']['password'])){
 856     $_SESSION['ldapconf']['password']= "";
 857   }
 858   if(!isset($_SESSION['ldapconf']['location'])){
 859     $_SESSION['ldapconf']['location']= "Example";
 860   }
 861   if(!isset($_SESSION['ldapconf']['uidbase'])){
 862     $_SESSION['ldapconf']['uidbase']= "1000";
 863   }
 864   if(!isset($_SESSION['ldapconf']['mail'])){
 865     $_SESSION['ldapconf']['mail']= 0;
 866   }
 867   $tmp= array_flip($_SESSION['ldapconf']['arr_cryptkeys']);
 868   if(!isset($_SESSION['ldapconf']['arr_crypts'])){
 869     $_SESSION['ldapconf']['arr_crypts']   = $tmp['md5'];
 870   }
 871
 872   /* check POST data */
 873   if(isset($_POST['check'])) {
 874
 875     /* Check if all needed vars are submitted */
 876     foreach($checkvars as $key) {
 877       if($key == "peopleou"){
 878         continue;
 879       }
 880       if($key == "groupou"){
 881         continue;
 882       }
 883
 884       if((isset($_POST[$key]))&&($_POST[$key]!="")) {
 885         $_SESSION['ldapconf'][$key] = $_POST[$key];
 886       } else {
 887         if($withoutput) {
 888           print_red(sprintf(_("You're missing the required attribute '%s' from this formular. Please complete!"), $key));
 889         }
 890         $fault = true;
 891       }
 892     }
 893   }
 894
 895   /* Transfer base */
 896   if(isset($_POST['base'])){
 897     $_SESSION['ldapconf']['base']= $_POST['base'];
 898   }
 899
 900   $smarty->assign("arr_cryptkeys",$_SESSION['ldapconf']['arr_cryptkeys']);
 901   $smarty->assign("mail_methods", $_SESSION['ldapconf']['mail_methods']);
 902
 903   foreach($_SESSION['ldapconf'] as $key => $val) {
 904     $smarty->assign($key,$val);
 905   }
 906
 907   if(isset($_POST['check'])) {
 908     $ldap= new LDAP($_SESSION['ldapconf']['admin'],
 909         $_SESSION['ldapconf']['password'],
 910         $_SESSION['ldapconf']['uri']);
 911
 912     $m= schema_check($_SESSION['ldapconf']['uri'],
 913         $_SESSION['ldapconf']['admin'],
 914         $_SESSION['ldapconf']['password']);
 915     $_SESSION['classes']= $m;
 916
 917     if(!is_schema_readable($ldapconf['uri'],$ldapconf['admin'],$ldapconf['password'])){
 918       if($withoutput){
 919         print_red(_("Can't read schema informations, GOsa needs to know your schema setup. Please verify that it is readable for GOsa"));
 920       }
 921       $fault=true;
 922     }
 923
 924
 925
 926     if ($ldap->error != "Success") {
 927       if($withoutput) {
 928         print_red(sprintf(_("Can't log into LDAP server. Reason was: %s."), $ldap->get_error()));
 929       }
 930       $fault = true;
 931     }
 932   }
 933
 934   /* Set smarty output */
 935   $smarty->assign ("content", get_template_path('setup_step4.tpl'));
 936   $smarty->assign ("peopledns", array("cn", "uid"));
 937   if($withoutput){
 938     $smarty->display (get_template_path('headers.tpl'));
 939   }
 940   if(isset($_SESSION['errors'])) {
 941     $smarty->assign("errors", $_SESSION['errors']);
 942   }
 943   if($withoutput){
 944     $smarty->display (get_template_path('setup.tpl'));
 945   }
 946   return (!$fault);
 947 }
 948
 949
 950 function show_setup_page5($withoutput=true)
 951 {
 952   /* Get ldapconf */
 953   $ldapconf= $_SESSION['ldapconf'];
 954
 955   /* get smarty */
 956   $smarty = get_smarty();
 957
 958   if(isset($_SESSION['classes'])){
 959     $classes = $_SESSION['classes'];
 960   }
 961
 962   $info= posix_getgrgid(posix_getgid());
 963   $smarty->assign("webgroup", $info['name']);
 964   $smarty->assign("path", CONFIG_DIR);
 965   $message= "<table summary=\"\" class=\"check\">";
 966   $m= schema_check($ldapconf['uri'], $ldapconf['admin'], $ldapconf['password'],1);
 967
 968   if($withoutput) {
 969     $smarty->assign ("schemas", view_schema_check($m));
 970     $smarty->assign ("content", get_template_path('setup_finish.tpl'));
 971   }
 972
 973   /* Output templates... */
 974   if($withoutput){
 975     $smarty->display (get_template_path('headers.tpl'));
 976   }
 977   if (isset($_SESSION['errors'])) {
 978     $smarty->assign("errors", $_SESSION['errors']);
 979   }
 980   if($withoutput){
 981     $smarty->display (get_template_path('setup.tpl'));
 982   }
 983
 984   return(true);
 985 }
 986
 987
 988 function create_user_for_setup($withoutput=true)
 989 {
 990   global $samba;
 991
 992   $ldapconf = $_SESSION['ldapconf'];
 993   $smarty = get_smarty();
 994
 995   $need_to_create_group = false;
 996   $need_to_create_user  = false;
 997
 998   $str_there="";
 999
1000   if(isset($_SESSION['classes'])){
1001     $classes= $_SESSION['classes'];
1002   }
1003
1004   /* Everything runns perfect ...
1005      So we do a last test on this page
1006      is there a user with ACLs :all which will be able to adminsitrate GOsa
1007      We check that, if this user or group is missing we ask for creating them */
1008   $ldap= new LDAP($_SESSION['ldapconf']['admin'],    $_SESSION['ldapconf']['password'],   $_SESSION['ldapconf']['uri']);
1009
1010   /*
1011   Now we are testing for a group, with the rights :all
1012   */
1013
1014   $ldap->cd($ldapconf['base']);
1015   $ldap->search("(&(objectClass=gosaObject)(gosaSubtreeACL=:all))");
1016
1017   $group_cnt  = $ldap->count();
1018   $data       = $ldap->fetch();
1019
1020 //  $str_there  = "Searching for Aminitrative users <br><br>";
1021
1022   /*
1023   We need to create administrative user and group  because theres no group found
1024   */
1025   if($group_cnt < 1) {
1026
1027     /*
1028     Set var to create user
1029     */
1030 //    $str_there  =   "no group found<br>";
1031
1032     $need_to_create_group = true;
1033     $need_to_create_user  = true;
1034
1035
1036     /* Output error */
1037     if(($withoutput)&&(!isset($_POST['new_admin']))){
1038       print_red(_("You're missing an administrative account for GOsa, you'll not be able to administrate anything!"));
1039     }
1040   } else {
1041
1042 //    $str_there = "Group found <br>".$data['dn'];
1043
1044     $need_to_create_group = false;
1045
1046     $ldap->clearResult();
1047
1048     /* We found an Administrative Group, is there a user, too */
1049     if(isset($data['memberUid'][0])) {
1050       $str = "uid=".$data['memberUid']['0'];
1051       $ldap->search("(&(objectClass=gosaAccount)(objectClass=person)(".$str."))");
1052       $data2   = $ldap->fetch();
1053
1054       /* We must create a user */
1055       if (($ldap->count() < 1)||(!isset($data2))) {
1056 //        $str_there.="Missing user";
1057
1058         $need_to_create_user = true;
1059
1060         if(($withoutput)&&(!isset($_POST['new_admin']))){
1061           print_red(_("You're missing an administrative account for GOsa, you'll not be able to administrate anything!"));
1062         }
1063       }else {
1064 //        $str_there.="<br>User found <br>".$data2['dn'];
1065         $need_to_create_user = false;
1066       }
1067     } else {
1068       $need_to_create_user=true;
1069       if(($withoutput)&&(!isset($_POST['new_admin']))){
1070           print_red(_("You're missing an administrative account for GOsa, you'll not be able to administrate anything!"));
1071         }
1072 //      $str_there.="<br>No User found <br>";
1073     }
1074   }
1075
1076   if(!($need_to_create_user&&$need_to_create_group))
1077     return(true);
1078
1079   /* We need to create a new user with group */
1080   if(isset($_POST['new_admin']))
1081   {
1082
1083     /* Adjust password attributes according to the samba version */
1084     if (isset($classes['samba3'])) {
1085       $samba= "2";
1086       $lmPassword = "lmPassword";
1087       $ntPassword = "ntPassword";
1088     } else {
1089       $samba= "3";
1090       $lmPassword = "sambaLMPassword";
1091       $ntPassword = "sambaNtPassword";
1092     }
1093
1094     /* Nothing submitted */
1095     if(((empty($_POST['admin_name']))||(empty($_POST['admin_pass'])))) {
1096       return(true);
1097     }
1098
1099     if($need_to_create_user) {
1100       /* We have the order to create an Admin */
1101       /* Define the user we are going to create */
1102       $dn= "cn=".$_POST['admin_name'].",".$ldapconf['peopleou'].",".$ldapconf['base'];
1103       $arr['objectClass'][0] ="person";
1104       $arr['objectClass'][1] ="organizationalPerson";
1105       $arr['objectClass'][2] ="inetOrgPerson";
1106       $arr['objectClass'][3] ="gosaAccount";
1107       $arr['uid']            = $_POST['admin_name'];
1108       $arr['cn']             = $_POST['admin_name'];
1109       $arr['sn']             = $_POST['admin_name'];
1110       $arr['givenName']      = "GOsa main administrator";
1111       $arr[$lmPassword]      = "10974C6EFC0AEE1917306D272A9441BB";
1112       $arr[$ntPassword]      = "38F3951141D0F71A039CFA9D1EC06378";
1113       $arr['userPassword']   = crypt_single($_POST['admin_pass'],"md5");
1114
1115
1116       if(!$ldap->dn_exists($dn)){
1117         $ldap->cd($dn);
1118         $ldap->create_missing_trees($dn);
1119         $ldap->cd($dn);
1120         $ldap->add($arr);
1121         if($ldap->error!="Success"){
1122           print_red($ldap->error);
1123           print_red("Can't create user, and / or Group, possibly this problem  depends on an empty LDAP server. Check your configuration and try again!");
1124         }
1125       }
1126     }
1127
1128     /* There's already a group for administrator, so we only need to add the user */
1129     if(!$need_to_create_group) {
1130       if(!isset($data['memberUid'])) {
1131         $arrr['memberUid']= $_POST['admin_name'];
1132       } else {
1133         $data['memberUid'][$data['memberUid']['count']]=$_POST['admin_name'];
1134         $arrr['memberUid'] = $data['memberUid'];
1135         unset($arrr['memberUid']['count']);
1136
1137         $tmp = array_reverse($arrr['memberUid']);
1138         foreach($tmp as $tt){
1139           $tmp2[]=$tt;
1140         }
1141         $arrr['memberUid']= $tmp2;
1142 //        $str_there="Group found<br>".$data['dn'];
1143       }
1144
1145       $ldap->cd($data['dn']);
1146       $ldap->modify($arrr);
1147
1148     } else {
1149       $dn                    = "cn=administrators,".$ldapconf['groupou'].",".$ldapconf['base'];
1150       $arrr['objectClass'][0]= "gosaObject";
1151       $arrr['objectClass'][1]= "posixGroup";
1152       $arrr['gosaSubtreeACL']= ":all";
1153       $arrr['cn']            = "administrators";
1154       $arrr['gidNumber']     = "999";
1155       $arrr['memberUid']     = $_POST['admin_name'];
1156
1157       $ldap->cd($dn);
1158       $ldap->create_missing_trees($dn);
1159       $ldap->cd($dn);
1160
1161       $ldap->add($arrr);
1162     }
1163     return(true);
1164   } else {
1165
1166     if((!isset($create_user))||(!($create_user))) {
1167       $smarty->assign ("content", get_template_path('setup_useradmin.tpl'));
1168       $smarty->assign("exists",true);
1169     } else {
1170       $smarty->assign ("content", get_template_path('setup_useradmin.tpl'));
1171       $smarty->assign("exists",false);
1172     }
1173
1174   }
1175
1176   /* Smarty output */
1177   if($withoutput){
1178     $smarty->display (get_template_path('headers.tpl'));
1179   }
1180   if (isset($_SESSION['errors'])) {
1181     $smarty->assign("errors", $_SESSION['errors']);
1182   }
1183   $smarty->assign("str_there",$str_there);
1184   if($withoutput){
1185     $smarty->display (get_template_path('setup.tpl'));
1186   }
1187   return(false);
1188 }
1189
1190
1191 /* Returns the classnames auf the mail classes */
1192 function get_available_mail_classes()
1193 {
1194   $dir = opendir( "../include");
1195   $methods = array();
1196   $suffix = "class_mail-methods-";
1197   $lensuf = strlen($suffix);
1198   $prefix = ".inc";
1199   $lenpre = strlen($prefix);
1200
1201   $i = 0;
1202   while (($file = readdir($dir)) !== false){
1203
1204     if(stristr($file,$suffix)) {
1205       $lenfile = strlen($file);
1206       $methods['name'][$i] = substr($file,$lensuf,($lenfile-$lensuf)-$lenpre);
1207       $methods['file'][$i] = $file;
1208       $methods[$i]['file'] = $file;
1209       $methods[$i]['name'] = substr($file,$lensuf,($lenfile-$lensuf)-$lenpre);
1210       $i++;
1211     }
1212
1213   }
1214
1215   return($methods);
1216 }
1217
1218 // vim:tabstop=2:expandtab:shiftwidth=2:filetype=php:syntax:ruler:
1219 ?>