include/class_plugin.inc

   1 <?php
   2 /*
   3    This code is part of GOsa (https://gosa.gonicus.de)
   4    Copyright (C) 2003  Cajus Pollmeier
   5
   6    This program is free software; you can redistribute it and/or modify
   7    it under the terms of the GNU General Public License as published by
   8    the Free Software Foundation; either version 2 of the License, or
   9    (at your option) any later version.
  10
  11    This program is distributed in the hope that it will be useful,
  12    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14    GNU General Public License for more details.
  15
  16    You should have received a copy of the GNU General Public License
  17    along with this program; if not, write to the Free Software
  18    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  */
  20
  21 /*! \brief   The plugin base class
  22   \author  Cajus Pollmeier <pollmeier@gonicus.de>
  23   \version 2.00
  24   \date    24.07.2003
  25
  26   This is the base class for all plugins. It can be used standalone or
  27   can be included by the tabs class. All management should be done
  28   within this class. Extend your plugins from this class.
  29  */
  30
  31 class plugin
  32 {
  33   /*!
  34     \brief Reference to parent object
  35
  36     This variable is used when the plugin is included in tabs
  37     and keeps reference to the tab class. Communication to other
  38     tabs is possible by 'name'. So the 'fax' plugin can ask the
  39     'userinfo' plugin for the fax number.
  40
  41     \sa tab
  42    */
  43   var $parent= NULL;
  44
  45   /*!
  46     \brief Configuration container
  47
  48     Access to global configuration
  49    */
  50   var $config= NULL;
  51
  52   /*!
  53     \brief Mark plugin as account
  54
  55     Defines whether this plugin is defined as an account or not.
  56     This has consequences for the plugin to be saved from tab
  57     mode. If it is set to 'FALSE' the tab will call the delete
  58     function, else the save function. Should be set to 'TRUE' if
  59     the construtor detects a valid LDAP object.
  60
  61     \sa plugin::plugin()
  62    */
  63   var $is_account= FALSE;
  64   var $initially_was_account= FALSE;
  65
  66   /*!
  67     \brief Mark plugin as template
  68
  69     Defines whether we are creating a template or a normal object.
  70     Has conseqences on the way execute() shows the formular and how
  71     save() puts the data to LDAP.
  72
  73     \sa plugin::save() plugin::execute()
  74    */
  75   var $is_template= FALSE;
  76   var $ignore_account= FALSE;
  77   var $is_modified= FALSE;
  78
  79   /*!
  80     \brief Represent temporary LDAP data
  81
  82     This is only used internally.
  83    */
  84   var $attrs= array();
  85
  86   /* Keep set of conflicting plugins */
  87   var $conflicts= array();
  88
  89   /* Save unit tags */
  90   var $gosaUnitTag= "";
  91
  92   /*!
  93     \brief Used standard values
  94
  95     dn
  96    */
  97   var $dn= "";
  98   var $uid= "";
  99   var $sn= "";
 100   var $givenName= "";
 101   var $acl= "*none*";
 102   var $dialog= FALSE;
 103   var $snapDialog = NULL;
 104
 105   /* attribute list for save action */
 106   var $attributes= array();
 107   var $objectclasses= array();
 108   var $is_new= TRUE;
 109   var $saved_attributes= array();
 110
 111   var $acl_base= "";
 112   var $acl_category= "";
 113
 114   /* Plugin identifier */
 115   var $plHeadline= "";
 116   var $plDescription= "";
 117
 118   /*! \brief plugin constructor
 119
 120     If 'dn' is set, the node loads the given 'dn' from LDAP
 121
 122     \param dn Distinguished name to initialize plugin from
 123     \sa plugin()
 124    */
 125   function plugin ($config, $dn= NULL, $parent= NULL)
 126   {
 127     /* Configuration is fine, allways */
 128     $this->config= $config;
 129     $this->dn= $dn;
 130
 131     /* Handle new accounts, don't read information from LDAP */
 132     if ($dn == "new"){
 133       return;
 134     }
 135
 136     /* Save current dn as acl_base */
 137     $this->acl_base= $dn;
 138
 139     /* Get LDAP descriptor */
 140     $ldap= $this->config->get_ldap_link();
 141     if ($dn != NULL){
 142
 143       /* Load data to 'attrs' and save 'dn' */
 144       if ($parent != NULL){
 145         $this->attrs= $parent->attrs;
 146       } else {
 147         $ldap->cat ($dn);
 148         $this->attrs= $ldap->fetch();
 149       }
 150
 151       /* Copy needed attributes */
 152       foreach ($this->attributes as $val){
 153         $found= array_key_ics($val, $this->attrs);
 154         if ($found != ""){
 155           $this->$val= $this->attrs["$found"][0];
 156         }
 157       }
 158
 159       /* gosaUnitTag loading... */
 160       if (isset($this->attrs['gosaUnitTag'][0])){
 161         $this->gosaUnitTag= $this->attrs['gosaUnitTag'][0];
 162       }
 163
 164       /* Set the template flag according to the existence of objectClass
 165          gosaUserTemplate */
 166       if (isset($this->attrs['objectClass'])){
 167         if (in_array ("gosaUserTemplate", $this->attrs['objectClass'])){
 168           $this->is_template= TRUE;
 169           @DEBUG (DEBUG_TRACE, __LINE__, __FUNCTION__, __FILE__,
 170               "found", "Template check");
 171         }
 172       }
 173
 174       /* Is Account? */
 175       error_reporting(0);
 176       $found= TRUE;
 177       foreach ($this->objectclasses as $obj){
 178         if (preg_match('/top/i', $obj)){
 179           continue;
 180         }
 181         if (!isset($this->attrs['objectClass']) || !in_array_ics ($obj, $this->attrs['objectClass'])){
 182           $found= FALSE;
 183           break;
 184         }
 185       }
 186       error_reporting(E_ALL);
 187       if ($found){
 188         $this->is_account= TRUE;
 189         @DEBUG (DEBUG_TRACE, __LINE__, __FUNCTION__, __FILE__,
 190             "found", "Object check");
 191       }
 192
 193       /* Prepare saved attributes */
 194       $this->saved_attributes= $this->attrs;
 195       foreach ($this->saved_attributes as $index => $value){
 196         if (preg_match('/^[0-9]+$/', $index)){
 197           unset($this->saved_attributes[$index]);
 198           continue;
 199         }
 200         if (!in_array($index, $this->attributes) && $index != "objectClass"){
 201           unset($this->saved_attributes[$index]);
 202           continue;
 203         }
 204         if ($this->saved_attributes[$index]["count"] == 1){
 205           $tmp= $this->saved_attributes[$index][0];
 206           unset($this->saved_attributes[$index]);
 207           $this->saved_attributes[$index]= $tmp;
 208           continue;
 209         }
 210
 211         unset($this->saved_attributes["$index"]["count"]);
 212       }
 213     }
 214
 215     /* Save initial account state */
 216     $this->initially_was_account= $this->is_account;
 217   }
 218
 219   /*! \brief execute plugin
 220
 221     Generates the html output for this node
 222    */
 223   function execute()
 224   {
 225     /* This one is empty currently. Fabian - please fill in the docu code */
 226     $_SESSION['current_class_for_help'] = get_class($this);
 227
 228     /* Reset Lock message POST/GET check array, to prevent perg_match errors*/
 229     $_SESSION['LOCK_VARS_TO_USE'] = $_SESSION['LOCK_VARS_USED'] =array();
 230   }
 231
 232   /*! \brief execute plugin
 233      Removes object from parent
 234    */
 235   function remove_from_parent()
 236   {
 237     /* include global link_info */
 238     $ldap= $this->config->get_ldap_link();
 239
 240     /* Get current objectClasses in order to add the required ones */
 241     $ldap->cat($this->dn);
 242     $tmp= $ldap->fetch ();
 243     if (isset($tmp['objectClass'])){
 244       $oc= $tmp['objectClass'];
 245     } else {
 246       $oc= array("count" => 0);
 247     }
 248
 249     /* Remove objectClasses from entry */
 250     $ldap->cd($this->dn);
 251     $this->attrs= array();
 252     $this->attrs['objectClass']= array();
 253     for ($i= 0; $i<$oc["count"]; $i++){
 254       if (!in_array_ics($oc[$i], $this->objectclasses)){
 255         $this->attrs['objectClass'][]= $oc[$i];
 256       }
 257     }
 258
 259     /* Unset attributes from entry */
 260     foreach ($this->attributes as $val){
 261       $this->attrs["$val"]= array();
 262     }
 263
 264     /* Unset account info */
 265     $this->is_account= FALSE;
 266
 267     /* Do not write in plugin base class, this must be done by
 268        children, since there are normally additional attribs,
 269        lists, etc. */
 270     /*
 271        $ldap->modify($this->attrs);
 272      */
 273   }
 274
 275
 276   /* Save data to object */
 277   function save_object()
 278   {
 279     /* Save values to object */
 280     foreach ($this->attributes as $val){
 281       if ($this->acl_is_writeable($val) && isset ($_POST["$val"])){
 282         /* Check for modifications */
 283         if (get_magic_quotes_gpc()) {
 284           $data= stripcslashes($_POST["$val"]);
 285         } else {
 286           $data= $this->$val = $_POST["$val"];
 287         }
 288         if ($this->$val != $data){
 289           $this->is_modified= TRUE;
 290         }
 291
 292         /* Okay, how can I explain this fix ...
 293          * In firefox, disabled option fields aren't selectable ... but in IE you can select these fileds.
 294          * So IE posts these 'unselectable' option, with value = chr(194)
 295          * chr(194) seems to be the &nbsp; in between the ...option>&nbsp;</option.. because there is no value=".." specified in these option fields
 296          * This &nbsp; was added for W3c compliance, but now causes these ... ldap errors ...
 297          * So we set these Fields to ""; a normal empty string, and we can check these values in plugin::check() again ...
 298          */
 299         if(isset($data[0]) && $data[0] == chr(194)) {
 300           $data = "";
 301         }
 302         $this->$val= $data;
 303         //echo "<font color='blue'>".$val."</font><br>";
 304       }else{
 305         //echo "<font color='red'>".$val."</font><br>";
 306       }
 307     }
 308   }
 309
 310
 311   /* Save data to LDAP, depending on is_account we save or delete */
 312   function save()
 313   {
 314     /* include global link_info */
 315     $ldap= $this->config->get_ldap_link();
 316
 317     /* Start with empty array */
 318     $this->attrs= array();
 319
 320     /* Get current objectClasses in order to add the required ones */
 321     $ldap->cat($this->dn);
 322
 323     $tmp= $ldap->fetch ();
 324
 325     if (isset($tmp['objectClass'])){
 326       $oc= $tmp["objectClass"];
 327       $this->is_new= FALSE;
 328     } else {
 329       $oc= array("count" => 0);
 330       $this->is_new= TRUE;
 331     }
 332
 333     /* Load (minimum) attributes, add missing ones */
 334     $this->attrs['objectClass']= $this->objectclasses;
 335     for ($i= 0; $i<$oc["count"]; $i++){
 336       if (!in_array_ics($oc[$i], $this->objectclasses)){
 337         $this->attrs['objectClass'][]= $oc[$i];
 338       }
 339     }
 340
 341     /* Copy standard attributes */
 342     foreach ($this->attributes as $val){
 343       if ($this->$val != ""){
 344         $this->attrs["$val"]= $this->$val;
 345       } elseif (!$this->is_new) {
 346         $this->attrs["$val"]= array();
 347       }
 348     }
 349
 350   }
 351
 352
 353   function cleanup()
 354   {
 355     foreach ($this->attrs as $index => $value){
 356
 357       /* Convert arrays with one element to non arrays, if the saved
 358          attributes are no array, too */
 359       if (is_array($this->attrs[$index]) &&
 360           count ($this->attrs[$index]) == 1 &&
 361           isset($this->saved_attributes[$index]) &&
 362           !is_array($this->saved_attributes[$index])){
 363
 364         $tmp= $this->attrs[$index][0];
 365         $this->attrs[$index]= $tmp;
 366       }
 367
 368       /* Remove emtpy arrays if they do not differ */
 369       if (is_array($this->attrs[$index]) &&
 370           count($this->attrs[$index]) == 0 &&
 371           !isset($this->saved_attributes[$index])){
 372
 373         unset ($this->attrs[$index]);
 374         continue;
 375       }
 376
 377       /* Remove single attributes that do not differ */
 378       if (!is_array($this->attrs[$index]) &&
 379           isset($this->saved_attributes[$index]) &&
 380           !is_array($this->saved_attributes[$index]) &&
 381           $this->attrs[$index] == $this->saved_attributes[$index]){
 382
 383         unset ($this->attrs[$index]);
 384         continue;
 385       }
 386
 387       /* Remove arrays that do not differ */
 388       if (is_array($this->attrs[$index]) &&
 389           isset($this->saved_attributes[$index]) &&
 390           is_array($this->saved_attributes[$index])){
 391
 392         if (!array_differs($this->attrs[$index],$this->saved_attributes[$index])){
 393           unset ($this->attrs[$index]);
 394           continue;
 395         }
 396       }
 397     }
 398   }
 399
 400   /* Check formular input */
 401   function check()
 402   {
 403     $message= array();
 404
 405     /* Skip if we've no config object */
 406     if (!isset($this->config)){
 407       return $message;
 408     }
 409
 410     /* Find hooks entries for this class */
 411     $command= search_config($this->config->data['MENU'], get_class($this), "CHECK");
 412     if ($command == "" && isset($this->config->data['TABS'])){
 413       $command= search_config($this->config->data['TABS'], get_class($this), "CHECK");
 414     }
 415
 416     if ($command != ""){
 417
 418       if (!check_command($command)){
 419         $message[]= sprintf(_("Command '%s', specified as CHECK hook for plugin '%s' doesn't seem to exist."), $command,
 420                             get_class($this));
 421       } else {
 422
 423         /* Generate "ldif" for check hook */
 424         $ldif= "dn: $this->dn\n";
 425
 426         /* ... objectClasses */
 427         foreach ($this->objectclasses as $oc){
 428           $ldif.= "objectClass: $oc\n";
 429         }
 430
 431         /* ... attributes */
 432         foreach ($this->attributes as $attr){
 433           if ($this->$attr == ""){
 434             continue;
 435           }
 436           if (is_array($this->$attr)){
 437             foreach ($this->$attr as $val){
 438               $ldif.= "$attr: $val\n";
 439             }
 440           } else {
 441               $ldif.= "$attr: ".$this->$attr."\n";
 442           }
 443         }
 444
 445         /* Append empty line */
 446         $ldif.= "\n";
 447
 448         /* Feed "ldif" into hook and retrieve result*/
 449         $descriptorspec = array( 0 => array("pipe", "r"), 1 => array("pipe", "w"), 2 => array("pipe", "w"));
 450         $fh= proc_open($command, $descriptorspec, $pipes);
 451         if (is_resource($fh)) {
 452           fwrite ($pipes[0], $ldif);
 453           fclose($pipes[0]);
 454
 455           $result= stream_get_contents($pipes[1]);
 456           if ($result != ""){
 457             $message[]= $result;
 458           }
 459
 460           fclose($pipes[1]);
 461           fclose($pipes[2]);
 462           proc_close($fh);
 463         }
 464       }
 465
 466     }
 467
 468     return ($message);
 469   }
 470
 471   /* Adapt from template, using 'dn' */
 472   function adapt_from_template($dn)
 473   {
 474     /* Include global link_info */
 475     $ldap= $this->config->get_ldap_link();
 476
 477     /* Load requested 'dn' to 'attrs' */
 478     $ldap->cat ($dn);
 479     $this->attrs= $ldap->fetch();
 480
 481     /* Walk through attributes */
 482     foreach ($this->attributes as $val){
 483
 484       if (isset($this->attrs["$val"][0])){
 485
 486         /* If attribute is set, replace dynamic parts:
 487            %sn, %givenName and %uid. Fill these in our local variables. */
 488         $value= $this->attrs["$val"][0];
 489
 490         foreach (array("sn", "givenName", "uid") as $repl){
 491           if (preg_match("/%$repl/i", $value)){
 492             $value= preg_replace ("/%$repl/i", $this->parent->$repl, $value);
 493           }
 494         }
 495         $this->$val= $value;
 496       }
 497     }
 498
 499     /* Is Account? */
 500     $found= TRUE;
 501     foreach ($this->objectclasses as $obj){
 502       if (preg_match('/top/i', $obj)){
 503         continue;
 504       }
 505       if (!in_array_ics ($obj, $this->attrs['objectClass'])){
 506         $found= FALSE;
 507         break;
 508       }
 509     }
 510     if ($found){
 511       $this->is_account= TRUE;
 512     }
 513   }
 514
 515   /* Indicate whether a password change is needed or not */
 516   function password_change_needed()
 517   {
 518     return FALSE;
 519   }
 520
 521
 522   /* Show header message for tab dialogs */
 523   function show_enable_header($button_text, $text, $disabled= FALSE)
 524   {
 525     if (($disabled == TRUE) || (!$this->acl_is_createable())){
 526       $state= "disabled";
 527     } else {
 528       $state= "";
 529     }
 530     $display= "<table summary=\"\" width=\"100%\"><tr>\n<td colspan=2><p><b>$text</b></p>\n";
 531     $display.= "<input type=submit value=\"$button_text\" name=\"modify_state\" ".$state.
 532       "><p class=\"seperator\">&nbsp;</p></td></tr></table>";
 533
 534     return($display);
 535   }
 536
 537
 538   /* Show header message for tab dialogs */
 539   function show_disable_header($button_text, $text, $disabled= FALSE)
 540   {
 541     if (($disabled == TRUE) || !$this->acl_is_removeable()){
 542       $state= "disabled";
 543     } else {
 544       $state= "";
 545     }
 546     $display= "<table summary=\"\" width=\"100%\"><tr>\n<td colspan=2><p><b>$text</b></p>\n";
 547     $display.= "<input type=submit value=\"$button_text\" name=\"modify_state\" ".$state.
 548       "><p class=\"seperator\">&nbsp;</p></td></tr></table>";
 549
 550     return($display);
 551   }
 552
 553
 554   /* Show header message for tab dialogs */
 555   function show_header($button_text, $text, $disabled= FALSE)
 556   {
 557     echo "FIXME: show_header should be replaced by show_disable_header and show_enable_header<br>";
 558     if ($disabled == TRUE){
 559       $state= "disabled";
 560     } else {
 561       $state= "";
 562     }
 563     $display= "<table summary=\"\" width=\"100%\"><tr>\n<td colspan=2><p><b>$text</b></p>\n";
 564     $display.= "<input type=submit value=\"$button_text\" name=\"modify_state\" ".
 565       ($this->acl_is_createable()?'':'disabled')." ".$state.
 566       "><p class=\"seperator\">&nbsp;</p></td></tr></table>";
 567
 568     return($display);
 569   }
 570
 571
 572   function postcreate($add_attrs= array())
 573   {
 574     /* Find postcreate entries for this class */
 575     $command= search_config($this->config->data['MENU'], get_class($this), "POSTCREATE");
 576     if ($command == "" && isset($this->config->data['TABS'])){
 577       $command= search_config($this->config->data['TABS'], get_class($this), "POSTCREATE");
 578     }
 579
 580     if ($command != ""){
 581       /* Walk through attribute list */
 582       foreach ($this->attributes as $attr){
 583         if (!is_array($this->$attr)){
 584           $command= preg_replace("/%$attr/", $this->$attr, $command);
 585         }
 586       }
 587       $command= preg_replace("/%dn/", $this->dn, $command);
 588
 589       /* Additional attributes */
 590       foreach ($add_attrs as $name => $value){
 591         $command= preg_replace("/%$name/", $value, $command);
 592       }
 593
 594       if (check_command($command)){
 595         @DEBUG (DEBUG_SHELL, __LINE__, __FUNCTION__, __FILE__,
 596             $command, "Execute");
 597
 598         exec($command);
 599       } else {
 600         $message= sprintf(_("Command '%s', specified as POSTCREATE for plugin '%s' doesn't seem to exist."), $command, get_class($this));
 601         print_red ($message);
 602       }
 603     }
 604   }
 605
 606   function postmodify($add_attrs= array())
 607   {
 608     /* Find postcreate entries for this class */
 609     $command= search_config($this->config->data['MENU'], get_class($this), "POSTMODIFY");
 610     if ($command == "" && isset($this->config->data['TABS'])){
 611       $command= search_config($this->config->data['TABS'], get_class($this), "POSTMODIFY");
 612     }
 613
 614     if ($command != ""){
 615       /* Walk through attribute list */
 616       foreach ($this->attributes as $attr){
 617         if (!is_array($this->$attr)){
 618           $command= preg_replace("/%$attr/", $this->$attr, $command);
 619         }
 620       }
 621       $command= preg_replace("/%dn/", $this->dn, $command);
 622
 623       /* Additional attributes */
 624       foreach ($add_attrs as $name => $value){
 625         $command= preg_replace("/%$name/", $value, $command);
 626       }
 627
 628       if (check_command($command)){
 629         @DEBUG (DEBUG_SHELL, __LINE__, __FUNCTION__, __FILE__,
 630             $command, "Execute");
 631
 632         exec($command);
 633       } else {
 634         $message= sprintf(_("Command '%s', specified as POSTMODIFY for plugin '%s' doesn't seem to exist."), $command, get_class($this));
 635         print_red ($message);
 636       }
 637     }
 638   }
 639
 640   function postremove($add_attrs= array())
 641   {
 642     /* Find postremove entries for this class */
 643     $command= search_config($this->config->data['MENU'], get_class($this), "POSTREMOVE");
 644     if ($command == "" && isset($this->config->data['TABS'])){
 645       $command= search_config($this->config->data['TABS'], get_class($this), "POSTREMOVE");
 646     }
 647
 648     if ($command != ""){
 649       /* Walk through attribute list */
 650       foreach ($this->attributes as $attr){
 651         if (!is_array($this->$attr)){
 652           $command= preg_replace("/%$attr/", $this->$attr, $command);
 653         }
 654       }
 655       $command= preg_replace("/%dn/", $this->dn, $command);
 656
 657       /* Additional attributes */
 658       foreach ($add_attrs as $name => $value){
 659         $command= preg_replace("/%$name/", $value, $command);
 660       }
 661
 662       if (check_command($command)){
 663         @DEBUG (DEBUG_SHELL, __LINE__, __FUNCTION__, __FILE__,
 664             $command, "Execute");
 665
 666         exec($command);
 667       } else {
 668         $message= sprintf(_("Command '%s', specified as POSTREMOVE for plugin '%s' doesn't seem to exist."), $command, get_class($this));
 669         print_red ($message);
 670       }
 671     }
 672   }
 673
 674   /* Create unique DN */
 675   function create_unique_dn($attribute, $base)
 676   {
 677     $ldap= $this->config->get_ldap_link();
 678     $base= preg_replace("/^,*/", "", $base);
 679
 680     /* Try to use plain entry first */
 681     $dn= "$attribute=".$this->$attribute.",$base";
 682     $ldap->cat ($dn, array('dn'));
 683     if (!$ldap->fetch()){
 684       return ($dn);
 685     }
 686
 687     /* Look for additional attributes */
 688     foreach ($this->attributes as $attr){
 689       if ($attr == $attribute || $this->$attr == ""){
 690         continue;
 691       }
 692
 693       $dn= "$attribute=".$this->$attribute."+$attr=".$this->$attr.",$base";
 694       $ldap->cat ($dn, array('dn'));
 695       if (!$ldap->fetch()){
 696         return ($dn);
 697       }
 698     }
 699
 700     /* None found */
 701     return ("none");
 702   }
 703
 704   function rebind($ldap, $referral)
 705   {
 706     $credentials= LDAP::get_credentials($referral, $this->config->current['REFERRAL']);
 707     if (ldap_bind($ldap, $credentials['ADMIN'], $credentials['PASSWORD'])) {
 708       $this->error = "Success";
 709       $this->hascon=true;
 710       $this->reconnect= true;
 711       return (0);
 712     } else {
 713       $this->error = "Could not bind to " . $credentials['ADMIN'];
 714       return NULL;
 715     }
 716   }
 717
 718   /* This is a workaround function. */
 719   function copy($src_dn, $dst_dn)
 720   {
 721     /* Rename dn in possible object groups */
 722     $ldap= $this->config->get_ldap_link();
 723     $ldap->search('(&(objectClass=gosaGroupOfNames)(member='.@LDAP::fix($src_dn).'))',
 724         array('cn'));
 725     while ($attrs= $ldap->fetch()){
 726       $og= new ogroup($this->config, $ldap->getDN());
 727       unset($og->member[$src_dn]);
 728       $og->member[$dst_dn]= $dst_dn;
 729       $og->save ();
 730     }
 731
 732     $ldap->cat($dst_dn);
 733     $attrs= $ldap->fetch();
 734     if (count($attrs)){
 735       trigger_error("Trying to overwrite ".@LDAP::fix($dst_dn).", which already exists.",
 736           E_USER_WARNING);
 737       return (FALSE);
 738     }
 739
 740     $ldap->cat($src_dn);
 741     $attrs= $ldap->fetch();
 742     if (!count($attrs)){
 743       trigger_error("Trying to move ".@LDAP::fix($src_dn).", which does not seem to exist.",
 744           E_USER_WARNING);
 745       return (FALSE);
 746     }
 747
 748     /* Grummble. This really sucks. PHP ldap doesn't support rdn stuff. */
 749     $ds= ldap_connect($this->config->current['SERVER']);
 750     ldap_set_option($ds, LDAP_OPT_PROTOCOL_VERSION, 3);
 751     if (function_exists("ldap_set_rebind_proc") && isset($this->config->current['REFERRAL'])) {
 752       ldap_set_rebind_proc($ds, array(&$this, "rebind"));
 753     }
 754
 755     $r=ldap_bind($ds,$this->config->current['ADMIN'], $this->config->current['PASSWORD']);
 756     error_reporting (0);
 757     $sr=ldap_read($ds, @LDAP::fix($src_dn), "objectClass=*");
 758
 759     /* Fill data from LDAP */
 760     $new= array();
 761     if ($sr) {
 762       $ei=ldap_first_entry($ds, $sr);
 763       if ($ei) {
 764         foreach($attrs as $attr => $val){
 765           if ($info = ldap_get_values_len($ds, $ei, $attr)){
 766             for ($i= 0; $i<$info['count']; $i++){
 767               if ($info['count'] == 1){
 768                 $new[$attr]= $info[$i];
 769               } else {
 770                 $new[$attr][]= $info[$i];
 771               }
 772             }
 773           }
 774         }
 775       }
 776     }
 777
 778     /* close conncetion */
 779     error_reporting (E_ALL);
 780     ldap_unbind($ds);
 781
 782     /* Adapt naming attribute */
 783     $dst_name= preg_replace("/^([^=]+)=.*$/", "\\1", $dst_dn);
 784     $dst_val = preg_replace("/^[^=]+=([^,+]+).*,.*$/", "\\1", $dst_dn);
 785     $new[$dst_name]= @LDAP::fix($dst_val);
 786
 787     /* Check if this is a department.
 788      * If it is a dep. && there is a , override in his ou
 789      *  change \2C to , again, else this entry can't be saved ...
 790      */
 791     if((isset($new['ou'])) &&( preg_match("/\\,/",$new['ou']))){
 792       $new['ou'] = preg_replace("/\\\\,/",",",$new['ou']);
 793     }
 794
 795     /* Save copy */
 796     $ldap->connect();
 797     $ldap->cd($this->config->current['BASE']);
 798
 799     $ldap->create_missing_trees(preg_replace('/^[^,]+,/', '', $dst_dn));
 800
 801     /* FAIvariable=.../..., cn=..
 802         could not be saved, because the attribute FAIvariable was different to
 803         the dn FAIvariable=..., cn=... */
 804     if(in_array_ics("FAIdebconfInfo",$new['objectClass'])){
 805       $new['FAIvariable'] = $ldap->fix($new['FAIvariable']);
 806     }
 807     $ldap->cd($dst_dn);
 808     $ldap->add($new);
 809
 810     if ($ldap->error != "Success"){
 811       trigger_error("Trying to save $dst_dn failed.",
 812           E_USER_WARNING);
 813       return(FALSE);
 814     }
 815
 816     return (TRUE);
 817   }
 818
 819
 820   function move($src_dn, $dst_dn)
 821   {
 822     /* Copy source to destination */
 823     if (!$this->copy($src_dn, $dst_dn)){
 824       return (FALSE);
 825     }
 826
 827     /* Delete source */
 828     $ldap= $this->config->get_ldap_link();
 829     $ldap->rmdir($src_dn);
 830     if ($ldap->error != "Success"){
 831       trigger_error("Trying to delete $src_dn failed.",
 832           E_USER_WARNING);
 833       return (FALSE);
 834     }
 835
 836     return (TRUE);
 837   }
 838
 839
 840   /* Move/Rename complete trees */
 841   function recursive_move($src_dn, $dst_dn)
 842   {
 843     /* Check if the destination entry exists */
 844     $ldap= $this->config->get_ldap_link();
 845
 846     /* Check if destination exists - abort */
 847     $ldap->cat($dst_dn, array('dn'));
 848     if ($ldap->fetch()){
 849       trigger_error("recursive_move $dst_dn already exists.",
 850           E_USER_WARNING);
 851       return (FALSE);
 852     }
 853
 854     /* Perform a search for all objects to be moved */
 855     $objects= array();
 856     $ldap->cd($src_dn);
 857     $ldap->search("(objectClass=*)", array("dn"));
 858     while($attrs= $ldap->fetch()){
 859       $dn= $attrs['dn'];
 860       $objects[$dn]= strlen($dn);
 861     }
 862
 863     /* Sort objects by indent level */
 864     asort($objects);
 865     reset($objects);
 866
 867     /* Copy objects from small to big indent levels by replacing src_dn by dst_dn */
 868     foreach ($objects as $object => $len){
 869       $src= $object;
 870       $dst= preg_replace("/$src_dn$/", "$dst_dn", $object);
 871       if (!$this->copy($src, $dst)){
 872         return (FALSE);
 873       }
 874     }
 875
 876     /* Remove src_dn */
 877     $ldap->cd($src_dn);
 878     $ldap->recursive_remove();
 879     return (TRUE);
 880   }
 881
 882
 883   function handle_post_events($mode, $add_attrs= array())
 884   {
 885     switch ($mode){
 886       case "add":
 887         $this->postcreate($add_attrs);
 888       break;
 889
 890       case "modify":
 891         $this->postmodify($add_attrs);
 892       break;
 893
 894       case "remove":
 895         $this->postremove($add_attrs);
 896       break;
 897     }
 898   }
 899
 900
 901   function saveCopyDialog(){
 902   }
 903
 904
 905   function getCopyDialog(){
 906     return(array("string"=>"","status"=>""));
 907   }
 908
 909
 910   function PrepareForCopyPaste($source)
 911   {
 912     $todo = $this->attributes;
 913     if(isset($this->CopyPasteVars)){
 914       $todo = array_merge($todo,$this->CopyPasteVars);
 915     }
 916     $todo[] = "is_account";
 917     foreach($todo as $var){
 918       if (isset($source[$var])){
 919         if(isset($source[$var]['count'])){
 920           if($source[$var]['count'] > 1){
 921             $this->$var = array();
 922             $tmp = array();
 923             for($i = 0 ; $i < $source[$var]['count']; $i++){
 924               $tmp = $source[$var][$i];
 925             }
 926             $this->$var = $tmp;
 927           }else{
 928             $this->$var = $source[$var][0];
 929           }
 930         }else{
 931           $this->$var= $source[$var];
 932         }
 933       }
 934     }
 935   }
 936
 937
 938   function handle_object_tagging($dn= "", $tag= "", $show= false)
 939   {
 940     //FIXME: How to optimize this? We have at least two
 941     //       LDAP accesses per object. It would be a good
 942     //       idea to have it integrated.
 943
 944     /* No dn? Self-operation... */
 945     if ($dn == ""){
 946       $dn= $this->dn;
 947
 948       /* No tag? Find it yourself... */
 949       if ($tag == ""){
 950         $len= strlen($dn);
 951
 952         @DEBUG (DEBUG_TRACE, __LINE__, __FUNCTION__, __FILE__, "No tag for $dn - looking for one...", "Tagging");
 953         $relevant= array();
 954         foreach ($this->config->adepartments as $key => $ntag){
 955
 956           /* This one is bigger than our dn, its not relevant... */
 957           if ($len <= strlen($key)){
 958             continue;
 959           }
 960
 961           /* This one matches with the latter part. Break and don't fix this entry */
 962           if (preg_match('/(^|,)'.normalizePreg($key).'$/', $dn)){
 963             @DEBUG (DEBUG_TRACE, __LINE__, __FUNCTION__, __FILE__, "DEBUG: Possibly relevant: $key", "Tagging");
 964             $relevant[strlen($key)]= $ntag;
 965             continue;
 966           }
 967
 968         }
 969
 970         /* If we've some relevant tags to set, just get the longest one */
 971         if (count($relevant)){
 972           ksort($relevant);
 973           $tmp= array_keys($relevant);
 974           $idx= end($tmp);
 975           $tag= $relevant[$idx];
 976           $this->gosaUnitTag= $tag;
 977         }
 978       }
 979     }
 980
 981
 982     /* Set tag? */
 983     if ($tag != ""){
 984       /* Set objectclass and attribute */
 985       $ldap= $this->config->get_ldap_link();
 986       $ldap->cat($dn, array('gosaUnitTag', 'objectClass'));
 987       $attrs= $ldap->fetch();
 988       if(isset($attrs['gosaUnitTag'][0]) && $attrs['gosaUnitTag'][0] == $tag){
 989         if ($show) {
 990           echo sprintf(_("Object '%s' is already tagged"), @LDAP::fix($dn))."<br>";
 991           flush();
 992         }
 993         return;
 994       }
 995       if (count($attrs)){
 996         if ($show){
 997           echo sprintf(_("Adding tag (%s) to object '%s'"), $tag, @LDAP::fix($dn))."<br>";
 998           flush();
 999         }
1000         $nattrs= array("gosaUnitTag" => $tag);
1001         $nattrs['objectClass']= array();
1002         for ($i= 0; $i<$attrs['objectClass']['count']; $i++){
1003           $oc= $attrs['objectClass'][$i];
1004           if ($oc != "gosaAdministrativeUnitTag"){
1005             $nattrs['objectClass'][]= $oc;
1006           }
1007         }
1008         $nattrs['objectClass'][]= "gosaAdministrativeUnitTag";
1009         $ldap->cd($dn);
1010         $ldap->modify($nattrs);
1011         show_ldap_error($ldap->get_error(), sprintf(_("Handle object tagging with dn '%s' failed."),$dn));
1012       } else {
1013         @DEBUG (DEBUG_TRACE, __LINE__, __FUNCTION__, __FILE__, "Not tagging ($tag) $dn - seems to have moved away", "Tagging");
1014       }
1015
1016     } else {
1017       /* Remove objectclass and attribute */
1018       $ldap= $this->config->get_ldap_link();
1019       $ldap->cat($dn, array('gosaUnitTag', 'objectClass'));
1020       $attrs= $ldap->fetch();
1021       if (isset($attrs['objectClass']) && !in_array_ics("gosaAdministrativeUnitTag", $attrs['objectClass'])){
1022         @DEBUG (DEBUG_TRACE, __LINE__, __FUNCTION__, __FILE__, "$dn is not tagged", "Tagging");
1023         return;
1024       }
1025       if (count($attrs)){
1026         if ($show){
1027           echo sprintf(_("Removing tag from object '%s'"), @LDAP::fix($dn))."<br>";
1028           flush();
1029         }
1030         $nattrs= array("gosaUnitTag" => array());
1031         $nattrs['objectClass']= array();
1032         for ($i= 0; $i<$attrs['objectClass']['count']; $i++){
1033           $oc= $attrs['objectClass'][$i];
1034           if ($oc != "gosaAdministrativeUnitTag"){
1035             $nattrs['objectClass'][]= $oc;
1036           }
1037         }
1038         $ldap->cd($dn);
1039         $ldap->modify($nattrs);
1040         show_ldap_error($ldap->get_error(), sprintf(_("Handle object tagging with dn '%s' failed."),$dn));
1041       } else {
1042         @DEBUG (DEBUG_TRACE, __LINE__, __FUNCTION__, __FILE__, "Not removing tag ($tag) $dn - seems to have moved away", "Tagging");
1043       }
1044     }
1045
1046   }
1047
1048
1049   /* Add possibility to stop remove process */
1050   function allow_remove()
1051   {
1052     $reason= "";
1053     return $reason;
1054   }
1055
1056
1057   /* Create a snapshot of the current object */
1058   function create_snapshot($type= "snapshot", $description= array())
1059   {
1060
1061     /* Check if snapshot functionality is enabled */
1062     if(!$this->snapshotEnabled()){
1063       return;
1064     }
1065
1066     /* Get configuration from gosa.conf */
1067     $tmp = $this->config->current;
1068
1069     /* Create lokal ldap connection */
1070     $ldap= $this->config->get_ldap_link();
1071     $ldap->cd($this->config->current['BASE']);
1072
1073     /* check if there are special server configurations for snapshots */
1074     if(!isset($tmp['SNAPSHOT_SERVER'])){
1075
1076       /* Source and destination server are both the same, just copy source to dest obj */
1077       $ldap_to      = $ldap;
1078       $snapldapbase = $this->config->current['BASE'];
1079
1080     }else{
1081       $server         = $tmp['SNAPSHOT_SERVER'];
1082       $user           = $tmp['SNAPSHOT_USER'];
1083       $password       = $tmp['SNAPSHOT_PASSWORD'];
1084       $snapldapbase   = $tmp['SNAPSHOT_LDAP_BASE'];
1085
1086       $ldap_to        = new LDAP($user,$password, $server);
1087       $ldap_to -> cd($snapldapbase);
1088       show_ldap_error($ldap->get_error(), sprintf(_("Saving object snapshot with dn '%s' failed."),$snapldapbase));
1089     }
1090
1091     /* check if the dn exists */
1092     if ($ldap->dn_exists($this->dn)){
1093
1094       /* Extract seconds & mysecs, they are used as entry index */
1095       list($usec, $sec)= explode(" ", microtime());
1096
1097       /* Collect some infos */
1098       $base           = $this->config->current['BASE'];
1099       $snap_base      = $tmp['SNAPSHOT_BASE'];
1100       $base_of_object = preg_replace ('/^[^,]+,/i', '', $this->dn);
1101       $new_base       = preg_replace("/".normalizePreg($base)."$/","",$base_of_object).$snap_base;
1102
1103       /* Create object */
1104 #$data             = preg_replace('/^dn:.*\n/', '', $ldap->gen_ldif($this->dn,"(!(objectClass=gosaDepartment))"));
1105       $data             = $ldap->gen_ldif($this->dn,"(&(!(objectClass=gosaDepartment))(!(objectClass=FAIclass)))");
1106       $newName          = preg_replace("/\./", "", $sec."-".$usec);
1107       $target= array();
1108       $target['objectClass']            = array("top", "gosaSnapshotObject");
1109       $target['gosaSnapshotData']       = gzcompress($data, 6);
1110       $target['gosaSnapshotType']       = $type;
1111       $target['gosaSnapshotDN']         = $this->dn;
1112       $target['description']            = $description;
1113       $target['gosaSnapshotTimestamp']  = $newName;
1114
1115       /* Insert the new snapshot
1116          But we have to check first, if the given gosaSnapshotTimestamp
1117          is already used, in this case we should increment this value till there is
1118          an unused value. */
1119       $new_dn                           = "gosaSnapshotTimestamp=".$newName.",".$new_base;
1120       $ldap_to->cat($new_dn);
1121       while($ldap_to->count()){
1122         $ldap_to->cat($new_dn);
1123         $newName = preg_replace("/\./", "", $sec."-".($usec++));
1124         $new_dn                           = "gosaSnapshotTimestamp=".$newName.",".$new_base;
1125         $target['gosaSnapshotTimestamp']  = $newName;
1126       }
1127
1128       /* Inset this new snapshot */
1129       $ldap_to->cd($snapldapbase);
1130       $ldap_to->create_missing_trees($new_base);
1131       $ldap_to->cd($new_dn);
1132       $ldap_to->add($target);
1133
1134       show_ldap_error($ldap->get_error(), sprintf(_("Saving object snapshot with dn '%s' failed."),$new_base));
1135       show_ldap_error($ldap_to->get_error(), sprintf(_("Saving object snapshot with dn '%s' failed."),$new_base));
1136     }
1137   }
1138
1139   function remove_snapshot($dn)
1140   {
1141     $ui       = get_userinfo();
1142     $old_dn   = $this->dn;
1143     $this->dn = $dn;
1144     $ldap = $this->config->get_ldap_link();
1145     $ldap->cd($this->config->current['BASE']);
1146     $ldap->rmdir_recursive($dn);
1147     $this->dn = $old_dn;
1148   }
1149
1150
1151   /* returns true if snapshots are enabled, and false if it is disalbed
1152      There will also be some errors psoted, if the configuration failed */
1153   function snapshotEnabled()
1154   {
1155     $tmp = $this->config->current;
1156     if(isset($tmp['ENABLE_SNAPSHOT'])){
1157       if (preg_match("/^true$/i", $tmp['ENABLE_SNAPSHOT']) || preg_match("/yes/i", $tmp['ENABLE_SNAPSHOT'])){
1158
1159         /* Check if the snapshot_base is defined */
1160         if(!isset($tmp['SNAPSHOT_BASE'])){
1161           print_red(sprintf(_("The snapshot functionality is enabled, but the required variable '%s' is not configured in your gosa.conf."),$missing));
1162           return(FALSE);
1163         }
1164
1165         /* check if there are special server configurations for snapshots */
1166         if(isset($tmp['SNAPSHOT_SERVER'])){
1167
1168           /* check if all required vars are available to create a new ldap connection */
1169           $missing = "";
1170           foreach(array("SNAPSHOT_SERVER","SNAPSHOT_USER","SNAPSHOT_PASSWORD","SNAPSHOT_LDAP_BASE") as $var){
1171             if(!isset($tmp[$var])){
1172               $missing .= $var." ";
1173               print_red(sprintf(_("The snapshot functionality is enabled, but the required variable(s) '%s' is not configured in your gosa.conf."),$missing));
1174               return(FALSE);
1175             }
1176           }
1177         }
1178         return(TRUE);
1179       }
1180     }
1181     return(FALSE);
1182   }
1183
1184
1185   /* Return available snapshots for the given base
1186    */
1187   function Available_SnapsShots($dn,$raw = false)
1188   {
1189     if(!$this->snapshotEnabled()) return(array());
1190
1191     /* Create an additional ldap object which
1192        points to our ldap snapshot server */
1193     $ldap= $this->config->get_ldap_link();
1194     $ldap->cd($this->config->current['BASE']);
1195     $tmp = $this->config->current;
1196
1197     /* check if there are special server configurations for snapshots */
1198     if(isset($tmp['SNAPSHOT_SERVER'])){
1199       $server       = $tmp['SNAPSHOT_SERVER'];
1200       $user         = $tmp['SNAPSHOT_USER'];
1201       $password     = $tmp['SNAPSHOT_PASSWORD'];
1202       $snapldapbase = $tmp['SNAPSHOT_LDAP_BASE'];
1203       $ldap_to      = new LDAP($user,$password, $server);
1204       $ldap_to -> cd ($snapldapbase);
1205       show_ldap_error($ldap->get_error(), sprintf(_("Method get available snapshots with dn '%s' failed."),$this->dn));
1206     }else{
1207       $ldap_to    = $ldap;
1208     }
1209
1210     /* Prepare bases and some other infos */
1211     $base           = $this->config->current['BASE'];
1212     $snap_base      = $tmp['SNAPSHOT_BASE'];
1213     $base_of_object = preg_replace ('/^[^,]+,/i', '', $dn);
1214     $new_base       = preg_replace("/".normalizePreg($base)."$/","",$base_of_object).$snap_base;
1215     $tmp            = array();
1216
1217     /* Fetch all objects with  gosaSnapshotDN=$dn */
1218     $ldap_to->cd($new_base);
1219     $ldap_to->ls("(&(objectClass=gosaSnapshotObject)(gosaSnapshotDN=".$dn."))",$new_base,
1220         array("gosaSnapshotType","gosaSnapshotTimestamp","gosaSnapshotDN","description"));
1221
1222     /* Put results into a list and add description if missing */
1223     while($entry = $ldap_to->fetch()){
1224       if(!isset($entry['description'][0])){
1225         $entry['description'][0]  = "";
1226       }
1227       $tmp[] = $entry;
1228     }
1229
1230     /* Return the raw array, or format the result */
1231     if($raw){
1232       return($tmp);
1233     }else{
1234       $tmp2 = array();
1235       foreach($tmp as $entry){
1236         $tmp2[base64_encode($entry['dn'])] = $entry['description'][0];
1237       }
1238     }
1239     return($tmp2);
1240   }
1241
1242
1243   function getAllDeletedSnapshots($base_of_object,$raw = false)
1244   {
1245     if(!$this->snapshotEnabled()) return(array());
1246
1247     /* Create an additional ldap object which
1248        points to our ldap snapshot server */
1249     $ldap= $this->config->get_ldap_link();
1250     $ldap->cd($this->config->current['BASE']);
1251     $tmp = $this->config->current;
1252
1253     /* check if there are special server configurations for snapshots */
1254     if(isset($tmp['SNAPSHOT_SERVER'])){
1255       $server       = $tmp['SNAPSHOT_SERVER'];
1256       $user         = $tmp['SNAPSHOT_USER'];
1257       $password     = $tmp['SNAPSHOT_PASSWORD'];
1258       $snapldapbase = $tmp['SNAPSHOT_LDAP_BASE'];
1259       $ldap_to      = new LDAP($user,$password, $server);
1260       $ldap_to->cd ($snapldapbase);
1261       show_ldap_error($ldap->get_error(), sprintf(_("Method get deleted snapshots with dn '%s' failed."),$this->dn));
1262     }else{
1263       $ldap_to    = $ldap;
1264     }
1265
1266     /* Prepare bases */
1267     $base           = $this->config->current['BASE'];
1268     $snap_base      = $tmp['SNAPSHOT_BASE'];
1269     $new_base       = preg_replace("/".normalizePreg($base)."$/","",$base_of_object).$snap_base;
1270
1271     /* Fetch all objects and check if they do not exist anymore */
1272     $ui = get_userinfo();
1273     $tmp = array();
1274     $ldap_to->cd($new_base);
1275     $ldap_to->ls("(objectClass=gosaSnapshotObject)",$new_base,array("gosaSnapshotType","gosaSnapshotTimestamp","gosaSnapshotDN","description"));
1276     while($entry = $ldap_to->fetch()){
1277
1278       $chk =  str_replace($new_base,"",$entry['dn']);
1279       if(preg_match("/,ou=/",$chk)) continue;
1280
1281       if(!isset($entry['description'][0])){
1282         $entry['description'][0]  = "";
1283       }
1284       $tmp[] = $entry;
1285     }
1286
1287     /* Check if entry still exists */
1288     foreach($tmp as $key => $entry){
1289       $ldap->cat($entry['gosaSnapshotDN'][0]);
1290       if($ldap->count()){
1291         unset($tmp[$key]);
1292       }
1293     }
1294
1295     /* Format result as requested */
1296     if($raw) {
1297       return($tmp);
1298     }else{
1299       $tmp2 = array();
1300       foreach($tmp as $key => $entry){
1301         $tmp2[base64_encode($entry['dn'])] = $entry['description'][0];
1302       }
1303     }
1304     return($tmp2);
1305   }
1306
1307
1308   /* Restore selected snapshot */
1309   function restore_snapshot($dn)
1310   {
1311     if(!$this->snapshotEnabled()) return(array());
1312
1313     $ldap= $this->config->get_ldap_link();
1314     $ldap->cd($this->config->current['BASE']);
1315     $tmp = $this->config->current;
1316
1317     /* check if there are special server configurations for snapshots */
1318     if(isset($tmp['SNAPSHOT_SERVER'])){
1319       $server       = $tmp['SNAPSHOT_SERVER'];
1320       $user         = $tmp['SNAPSHOT_USER'];
1321       $password     = $tmp['SNAPSHOT_PASSWORD'];
1322       $snapldapbase = $tmp['SNAPSHOT_LDAP_BASE'];
1323       $ldap_to      = new LDAP($user,$password, $server);
1324       $ldap_to->cd ($snapldapbase);
1325       show_ldap_error($ldap->get_error(), sprintf(_("Restore snapshot with dn '%s' failed."),$snapldapbase));
1326     }else{
1327       $ldap_to    = $ldap;
1328     }
1329
1330     /* Get the snapshot */
1331     $ldap_to->cat($dn);
1332     $restoreObject = $ldap_to->fetch();
1333
1334     /* Prepare import string */
1335     $data  = gzuncompress($ldap_to->get_attribute($dn,'gosaSnapshotData'));
1336
1337     /* Import the given data */
1338     $ldap->import_complete_ldif($data,$err,false,false);
1339     show_ldap_error($ldap->get_error(), sprintf(_("Restore snapshot with dn '%s' failed."),$dn));
1340   }
1341
1342
1343   function showSnapshotDialog($base,$baseSuffixe)
1344   {
1345     $once = true;
1346     foreach($_POST as $name => $value){
1347
1348       /* Create a new snapshot, display a dialog */
1349       if(preg_match("/^CreateSnapShotDialog_/",$name) && $once){
1350         $once = false;
1351         $entry = preg_replace("/^CreateSnapShotDialog_/","",$name);
1352         $entry = base64_decode(preg_replace("/_[xy]$/","",$entry));
1353         $this->snapDialog = new SnapShotDialog($this->config,$entry,$this);
1354       }
1355
1356       /* Restore a snapshot, display a dialog with all snapshots of the current object */
1357       if(preg_match("/^RestoreSnapShotDialog_/",$name) && $once){
1358         $once = false;
1359         $entry = preg_replace("/^RestoreSnapShotDialog_/","",$name);
1360         $entry = base64_decode(preg_replace("/_[xy]$/","",$entry));
1361         $this->snapDialog = new SnapShotDialog($this->config,$entry,$this);
1362         $this->snapDialog->display_restore_dialog = true;
1363       }
1364
1365       /* Restore one of the already deleted objects */
1366       if(preg_match("/^RestoreDeletedSnapShot_/",$name) && $once){
1367         $once = false;
1368         $this->snapDialog = new SnapShotDialog($this->config,"",$this);
1369         $this->snapDialog->set_snapshot_bases($baseSuffixe);
1370         $this->snapDialog->display_restore_dialog      = true;
1371         $this->snapDialog->display_all_removed_objects  = true;
1372       }
1373
1374       /* Restore selected snapshot */
1375       if(preg_match("/^RestoreSnapShot_/",$name) && $once){
1376         $once = false;
1377         $entry = preg_replace("/^RestoreSnapShot_/","",$name);
1378         $entry = base64_decode(trim(preg_replace("/_[xy]$/","",$entry)));
1379         if(!empty($entry)){
1380           $this->restore_snapshot($entry);
1381           $this->snapDialog = NULL;
1382         }
1383       }
1384     }
1385
1386     /* Create a new snapshot requested, check
1387        the given attributes and create the snapshot*/
1388     if(isset($_POST['CreateSnapshot'])){
1389       $this->snapDialog->save_object();
1390       $msgs = $this->snapDialog->check();
1391       if(count($msgs)){
1392         foreach($msgs as $msg){
1393           print_red($msg);
1394         }
1395       }else{
1396         $this->dn =  $this->snapDialog->dn;
1397         $this->create_snapshot("snapshot",$this->snapDialog->CurrentDescription);
1398         $this->snapDialog = NULL;
1399       }
1400     }
1401
1402     /* Restore is requested, restore the object with the posted dn .*/
1403     if((isset($_POST['RestoreSnapshot'])) && (isset($_POST['SnapShot']))){
1404     }
1405
1406     if(isset($_POST['CancelSnapshot'])){
1407       $this->snapDialog = NULL;
1408     }
1409
1410     if($this->snapDialog){
1411       $this->snapDialog->save_object();
1412       return($this->snapDialog->execute());
1413     }
1414   }
1415
1416
1417   function plInfo()
1418   {
1419     return array();
1420   }
1421
1422
1423   function set_acl_base($base)
1424   {
1425     $this->acl_base= $base;
1426   }
1427
1428
1429   function set_acl_category($category)
1430   {
1431     $this->acl_category= "$category/";
1432   }
1433
1434
1435   function acl_is_writeable($attribute,$skip_write = FALSE)
1436   {
1437     $ui= get_userinfo();
1438     return preg_match('/w/', $ui->get_permissions($this->acl_base, $this->acl_category.get_class($this), $attribute, $skip_write));
1439   }
1440
1441
1442   function acl_is_readable($attribute)
1443   {
1444     $ui= get_userinfo();
1445     return preg_match('/r/', $ui->get_permissions($this->acl_base, $this->acl_category.get_class($this), $attribute));
1446   }
1447
1448
1449   function acl_is_createable()
1450   {
1451     $ui= get_userinfo();
1452     return preg_match('/c/', $ui->get_permissions($this->acl_base, $this->acl_category.get_class($this), '0'));
1453   }
1454
1455
1456   function acl_is_removeable()
1457   {
1458     $ui= get_userinfo();
1459     return preg_match('/d/', $ui->get_permissions($this->acl_base, $this->acl_category.get_class($this), '0'));
1460   }
1461
1462
1463   function acl_is_moveable()
1464   {
1465     $ui= get_userinfo();
1466     return preg_match('/m/', $ui->get_permissions($this->acl_base, $this->acl_category.get_class($this), '0'));
1467   }
1468
1469
1470   function acl_have_any_permissions()
1471   {
1472   }
1473
1474
1475   function getacl($attribute,$skip_write= FALSE)
1476   {
1477     $ui= get_userinfo();
1478     return  $ui->get_permissions($this->acl_base, $this->acl_category.get_class($this), $attribute,$skip_write);
1479   }
1480
1481   /* Get all allowed bases to move an object to or to create a new object.
1482      Idepartments also contains all base departments which lead to the allowed bases */
1483   function get_allowed_bases($category = "")
1484   {
1485     $ui = get_userinfo();
1486     $deps = array();
1487
1488     /* Set category */
1489     if(empty($category)){
1490       $category = $this->acl_category.get_class($this);
1491     }
1492
1493     /* Is this a new object ? Or just an edited existing object */
1494     if(!$this->initially_was_account && $this->is_account){
1495       $new = true;
1496     }else{
1497       $new = false;
1498     }
1499
1500     $cat_bases = $ui->get_module_departments(preg_replace("/\/.*$/","",$category));
1501     foreach($this->config->idepartments as $dn => $name){
1502
1503       if(!in_array_ics($dn,$cat_bases)){
1504         continue;
1505       }
1506
1507       $acl = $ui->get_permissions($dn,$category);
1508       if($new && preg_match("/c/",$acl)){
1509         $deps[$dn] = $name;
1510       }elseif(!$new && preg_match("/m/",$acl)){
1511         $deps[$dn] = $name;
1512       }
1513     }
1514
1515     /* Add current base */
1516     if(isset($this->base) && isset($this->config->idepartments[$this->base])){
1517       $deps[$this->base] = $this->config->idepartments[$this->base];
1518     }else{
1519       echo "No default base found. ".$this->base."<br> ";
1520     }
1521
1522     return($deps);
1523   }
1524
1525   /* This function modifies object acls too, if an object is moved.
1526    *  $old_dn   specifies the actually used dn
1527    *  $new_dn   specifies the destiantion dn
1528    */
1529   function update_acls($old_dn,$new_dn,$output_changes = FALSE)
1530   {
1531     global $config;
1532
1533     /* Check if old_dn is empty. This should never happen */
1534     if(empty($old_dn) || empty($new_dn)){
1535       trigger_error("Failed to check acl dependencies, wrong dn given.");
1536       return;
1537     }
1538
1539     /* Update userinfo if necessary */
1540     if($_SESSION['ui']->dn == $old_dn){
1541       $_SESSION['ui']->dn = $new_dn;
1542       new log("view","acl/".get_class($this),$this->dn,array(),"Updated current user dn from '".$old_dn."' to '".$new_dn."'");
1543     }
1544
1545     /* Object was moved, ensure that all acls will be moved too */
1546     if($new_dn != $old_dn && $old_dn != "new"){
1547
1548       /* get_ldap configuration */
1549       $update = array();
1550       $ldap = $config->get_ldap_link();
1551       $ldap->cd ($config->current['BASE']);
1552       $ldap->search("(&(objectClass=gosaAcl)(gosaAclEntry=*))",array("cn","gosaAclEntry"));
1553       while($attrs = $ldap->fetch()){
1554
1555         $acls = array();
1556
1557         /* Walk through acls */
1558         for($i = 0 ; $i <  $attrs['gosaAclEntry']['count'] ; $i ++ ){
1559
1560           /* Reset vars */
1561           $found = false;
1562
1563           /* Get Acl parts */
1564           $acl_parts = split(":",$attrs['gosaAclEntry'][$i]);
1565
1566           /* Get every single member for this acl */
1567           $members = array();
1568           if(preg_match("/,/",$acl_parts[2])){
1569             $members = split(",",$acl_parts[2]);
1570           }else{
1571             $members = array($acl_parts[2]);
1572           }
1573
1574           /* Check if member match current dn */
1575           foreach($members as $key => $member){
1576             $member = base64_decode($member);
1577             if($member == $old_dn){
1578               $found = true;
1579               $members[$key] = base64_encode($new_dn);
1580             }
1581           }
1582
1583           /* Create new member string */
1584           $new_members = "";
1585           foreach($members as $member){
1586             $new_members .= $member.",";
1587           }
1588           $new_members = preg_replace("/,$/","",$new_members);
1589           $acl_parts[2] = $new_members;
1590
1591           /* Reconstruckt acl entry */
1592           $acl_str  ="";
1593           foreach($acl_parts as $t){
1594            $acl_str .= $t.":";
1595           }
1596           $acl_str = preg_replace("/:$/","",$acl_str);
1597        }
1598
1599        /* Acls for this object must be adjusted */
1600        if($found){
1601
1602           if($output_changes){
1603             echo "<font color='green'>".
1604                   _("Changing ACL dn")."&nbsp;:&nbsp;<br>&nbsp;-"._("from")."&nbsp;<b>&nbsp;".
1605                   $old_dn.
1606                   "</b><br>&nbsp;-"._("to")."&nbsp;<b>".
1607                   $new_dn.
1608                   "</b></font><br>";
1609           }
1610           $update[$attrs['dn']] =array();
1611           foreach($acls as $acl){
1612             $update[$attrs['dn']]['gosaAclEntry'][] = $acl;
1613           }
1614         }
1615       }
1616
1617       /* Write updated acls */
1618       foreach($update as $dn => $attrs){
1619         $ldap->cd($dn);
1620         $ldap->modify($attrs);
1621       }
1622     }
1623   }
1624 }
1625 // vim:tabstop=2:expandtab:shiftwidth=2:filetype=php:syntax:ruler:
1626 ?>