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     gosa_log("ACL ".get_class($this)." - ".$this->acl_category." - ".$this->acl_base);
 226
 227     /* This one is empty currently. Fabian - please fill in the docu code */
 228     $_SESSION['current_class_for_help'] = get_class($this);
 229     /* Reset Lock message POST/GET check array, to prevent perg_match errors*/
 230     $_SESSION['LOCK_VARS_TO_USE'] =array();
 231   }
 232
 233   /*! \brief execute plugin
 234      Removes object from parent
 235    */
 236   function remove_from_parent()
 237   {
 238     /* include global link_info */
 239     $ldap= $this->config->get_ldap_link();
 240
 241     /* Get current objectClasses in order to add the required ones */
 242     $ldap->cat($this->dn);
 243     $tmp= $ldap->fetch ();
 244     if (isset($tmp['objectClass'])){
 245       $oc= $tmp['objectClass'];
 246     } else {
 247       $oc= array("count" => 0);
 248     }
 249
 250     /* Remove objectClasses from entry */
 251     $ldap->cd($this->dn);
 252     $this->attrs= array();
 253     $this->attrs['objectClass']= array();
 254     for ($i= 0; $i<$oc["count"]; $i++){
 255       if (!in_array_ics($oc[$i], $this->objectclasses)){
 256         $this->attrs['objectClass'][]= $oc[$i];
 257       }
 258     }
 259
 260     /* Unset attributes from entry */
 261     foreach ($this->attributes as $val){
 262       $this->attrs["$val"]= array();
 263     }
 264
 265     /* Unset account info */
 266     $this->is_account= FALSE;
 267
 268     /* Do not write in plugin base class, this must be done by
 269        children, since there are normally additional attribs,
 270        lists, etc. */
 271     /*
 272        $ldap->modify($this->attrs);
 273      */
 274   }
 275
 276
 277   /* Save data to object */
 278   function save_object()
 279   {
 280     /* Save values to object */
 281     foreach ($this->attributes as $val){
 282       if ($this->acl_is_writeable($val) && isset ($_POST["$val"])){
 283         /* Check for modifications */
 284         if (get_magic_quotes_gpc()) {
 285           $data= stripcslashes($_POST["$val"]);
 286         } else {
 287           $data= $this->$val = $_POST["$val"];
 288         }
 289         if ($this->$val != $data){
 290           $this->is_modified= TRUE;
 291         }
 292
 293         /* Okay, how can I explain this fix ...
 294          * In firefox, disabled option fields aren't selectable ... but in IE you can select these fileds.
 295          * So IE posts these 'unselectable' option, with value = chr(194)
 296          * chr(194) seems to be the &nbsp; in between the ...option>&nbsp;</option.. because there is no value=".." specified in these option fields
 297          * This &nbsp; was added for W3c compliance, but now causes these ... ldap errors ...
 298          * So we set these Fields to ""; a normal empty string, and we can check these values in plugin::check() again ...
 299          */
 300         if(isset($data[0]) && $data[0] == chr(194)) {
 301           $data = "";
 302         }
 303         $this->$val= $data;
 304         //echo "<font color='blue'>".$val."</font><br>";
 305       }else{
 306         //echo "<font color='red'>".$val."</font><br>";
 307       }
 308     }
 309   }
 310
 311
 312   /* Save data to LDAP, depending on is_account we save or delete */
 313   function save()
 314   {
 315     /* include global link_info */
 316     $ldap= $this->config->get_ldap_link();
 317
 318     /* Start with empty array */
 319     $this->attrs= array();
 320
 321     /* Get current objectClasses in order to add the required ones */
 322     $ldap->cat($this->dn);
 323
 324     $tmp= $ldap->fetch ();
 325
 326     if (isset($tmp['objectClass'])){
 327       $oc= $tmp["objectClass"];
 328       $this->is_new= FALSE;
 329     } else {
 330       $oc= array("count" => 0);
 331       $this->is_new= TRUE;
 332     }
 333
 334     /* Load (minimum) attributes, add missing ones */
 335     $this->attrs['objectClass']= $this->objectclasses;
 336     for ($i= 0; $i<$oc["count"]; $i++){
 337       if (!in_array_ics($oc[$i], $this->objectclasses)){
 338         $this->attrs['objectClass'][]= $oc[$i];
 339       }
 340     }
 341
 342     /* Copy standard attributes */
 343     foreach ($this->attributes as $val){
 344       if ($this->$val != ""){
 345         $this->attrs["$val"]= $this->$val;
 346       } elseif (!$this->is_new) {
 347         $this->attrs["$val"]= array();
 348       }
 349     }
 350
 351   }
 352
 353
 354   function cleanup()
 355   {
 356     foreach ($this->attrs as $index => $value){
 357
 358       /* Convert arrays with one element to non arrays, if the saved
 359          attributes are no array, too */
 360       if (is_array($this->attrs[$index]) &&
 361           count ($this->attrs[$index]) == 1 &&
 362           isset($this->saved_attributes[$index]) &&
 363           !is_array($this->saved_attributes[$index])){
 364
 365         $tmp= $this->attrs[$index][0];
 366         $this->attrs[$index]= $tmp;
 367       }
 368
 369       /* Remove emtpy arrays if they do not differ */
 370       if (is_array($this->attrs[$index]) &&
 371           count($this->attrs[$index]) == 0 &&
 372           !isset($this->saved_attributes[$index])){
 373
 374         unset ($this->attrs[$index]);
 375         continue;
 376       }
 377
 378       /* Remove single attributes that do not differ */
 379       if (!is_array($this->attrs[$index]) &&
 380           isset($this->saved_attributes[$index]) &&
 381           !is_array($this->saved_attributes[$index]) &&
 382           $this->attrs[$index] == $this->saved_attributes[$index]){
 383
 384         unset ($this->attrs[$index]);
 385         continue;
 386       }
 387
 388       /* Remove arrays that do not differ */
 389       if (is_array($this->attrs[$index]) &&
 390           isset($this->saved_attributes[$index]) &&
 391           is_array($this->saved_attributes[$index])){
 392
 393         if (!array_differs($this->attrs[$index],$this->saved_attributes[$index])){
 394           unset ($this->attrs[$index]);
 395           continue;
 396         }
 397       }
 398     }
 399   }
 400
 401   /* Check formular input */
 402   function check()
 403   {
 404     $message= array();
 405
 406     /* Skip if we've no config object */
 407     if (!isset($this->config)){
 408       return $message;
 409     }
 410
 411     /* Find hooks entries for this class */
 412     $command= search_config($this->config->data['MENU'], get_class($this), "CHECK");
 413     if ($command == "" && isset($this->config->data['TABS'])){
 414       $command= search_config($this->config->data['TABS'], get_class($this), "CHECK");
 415     }
 416
 417     if ($command != ""){
 418
 419       if (!check_command($command)){
 420         $message[]= sprintf(_("Command '%s', specified as CHECK hook for plugin '%s' doesn't seem to exist."), $command,
 421                             get_class($this));
 422       } else {
 423
 424         /* Generate "ldif" for check hook */
 425         $ldif= "dn: $this->dn\n";
 426
 427         /* ... objectClasses */
 428         foreach ($this->objectclasses as $oc){
 429           $ldif.= "objectClass: $oc\n";
 430         }
 431
 432         /* ... attributes */
 433         foreach ($this->attributes as $attr){
 434           if ($this->$attr == ""){
 435             continue;
 436           }
 437           if (is_array($this->$attr)){
 438             foreach ($this->$attr as $val){
 439               $ldif.= "$attr: $val\n";
 440             }
 441           } else {
 442               $ldif.= "$attr: ".$this->$attr."\n";
 443           }
 444         }
 445
 446         /* Append empty line */
 447         $ldif.= "\n";
 448
 449         /* Feed "ldif" into hook and retrieve result*/
 450         $descriptorspec = array( 0 => array("pipe", "r"), 1 => array("pipe", "w"), 2 => array("pipe", "w"));
 451         $fh= proc_open($command, $descriptorspec, $pipes);
 452         if (is_resource($fh)) {
 453           fwrite ($pipes[0], $ldif);
 454           fclose($pipes[0]);
 455
 456           $result= stream_get_contents($pipes[1]);
 457           if ($result != ""){
 458             $message[]= $result;
 459           }
 460
 461           fclose($pipes[1]);
 462           fclose($pipes[2]);
 463           proc_close($fh);
 464         }
 465       }
 466
 467     }
 468
 469     return ($message);
 470   }
 471
 472   /* Adapt from template, using 'dn' */
 473   function adapt_from_template($dn)
 474   {
 475     /* Include global link_info */
 476     $ldap= $this->config->get_ldap_link();
 477
 478     /* Load requested 'dn' to 'attrs' */
 479     $ldap->cat ($dn);
 480     $this->attrs= $ldap->fetch();
 481
 482     /* Walk through attributes */
 483     foreach ($this->attributes as $val){
 484
 485       if (isset($this->attrs["$val"][0])){
 486
 487         /* If attribute is set, replace dynamic parts:
 488            %sn, %givenName and %uid. Fill these in our local variables. */
 489         $value= $this->attrs["$val"][0];
 490
 491         foreach (array("sn", "givenName", "uid") as $repl){
 492           if (preg_match("/%$repl/i", $value)){
 493             $value= preg_replace ("/%$repl/i", $this->parent->$repl, $value);
 494           }
 495         }
 496         $this->$val= $value;
 497       }
 498     }
 499
 500     /* Is Account? */
 501     $found= TRUE;
 502     foreach ($this->objectclasses as $obj){
 503       if (preg_match('/top/i', $obj)){
 504         continue;
 505       }
 506       if (!in_array_ics ($obj, $this->attrs['objectClass'])){
 507         $found= FALSE;
 508         break;
 509       }
 510     }
 511     if ($found){
 512       $this->is_account= TRUE;
 513     }
 514   }
 515
 516   /* Indicate whether a password change is needed or not */
 517   function password_change_needed()
 518   {
 519     return FALSE;
 520   }
 521
 522
 523   /* Show header message for tab dialogs */
 524   function show_enable_header($button_text, $text, $disabled= FALSE)
 525   {
 526     if (($disabled == TRUE) || (!$this->acl_is_createable())){
 527       $state= "disabled";
 528     } else {
 529       $state= "";
 530     }
 531     $display= "<table summary=\"\" width=\"100%\"><tr>\n<td colspan=2><p><b>$text</b></p>\n";
 532     $display.= "<input type=submit value=\"$button_text\" name=\"modify_state\" ".$state.
 533       "><p class=\"seperator\">&nbsp;</p></td></tr></table>";
 534
 535     return($display);
 536   }
 537
 538
 539   /* Show header message for tab dialogs */
 540   function show_disable_header($button_text, $text, $disabled= FALSE)
 541   {
 542     if (($disabled == TRUE) || !$this->acl_is_removeable()){
 543       $state= "disabled";
 544     } else {
 545       $state= "";
 546     }
 547     $display= "<table summary=\"\" width=\"100%\"><tr>\n<td colspan=2><p><b>$text</b></p>\n";
 548     $display.= "<input type=submit value=\"$button_text\" name=\"modify_state\" ".$state.
 549       "><p class=\"seperator\">&nbsp;</p></td></tr></table>";
 550
 551     return($display);
 552   }
 553
 554
 555   /* Show header message for tab dialogs */
 556   function show_header($button_text, $text, $disabled= FALSE)
 557   {
 558     echo "FIXME: show_header should be replaced by show_disable_header and show_enable_header<br>";
 559     if ($disabled == TRUE){
 560       $state= "disabled";
 561     } else {
 562       $state= "";
 563     }
 564     $display= "<table summary=\"\" width=\"100%\"><tr>\n<td colspan=2><p><b>$text</b></p>\n";
 565     $display.= "<input type=submit value=\"$button_text\" name=\"modify_state\" ".
 566       ($this->acl_is_createable()?'':'disabled')." ".$state.
 567       "><p class=\"seperator\">&nbsp;</p></td></tr></table>";
 568
 569     return($display);
 570   }
 571
 572
 573   function postcreate($add_attrs= array())
 574   {
 575     /* Find postcreate entries for this class */
 576     $command= search_config($this->config->data['MENU'], get_class($this), "POSTCREATE");
 577     if ($command == "" && isset($this->config->data['TABS'])){
 578       $command= search_config($this->config->data['TABS'], get_class($this), "POSTCREATE");
 579     }
 580
 581     if ($command != ""){
 582       /* Walk through attribute list */
 583       foreach ($this->attributes as $attr){
 584         if (!is_array($this->$attr)){
 585           $command= preg_replace("/%$attr/", $this->$attr, $command);
 586         }
 587       }
 588       $command= preg_replace("/%dn/", $this->dn, $command);
 589
 590       /* Additional attributes */
 591       foreach ($add_attrs as $name => $value){
 592         $command= preg_replace("/%$name/", $value, $command);
 593       }
 594
 595       if (check_command($command)){
 596         @DEBUG (DEBUG_SHELL, __LINE__, __FUNCTION__, __FILE__,
 597             $command, "Execute");
 598
 599         exec($command);
 600       } else {
 601         $message= sprintf(_("Command '%s', specified as POSTCREATE for plugin '%s' doesn't seem to exist."), $command, get_class($this));
 602         print_red ($message);
 603       }
 604     }
 605   }
 606
 607   function postmodify($add_attrs= array())
 608   {
 609     /* Find postcreate entries for this class */
 610     $command= search_config($this->config->data['MENU'], get_class($this), "POSTMODIFY");
 611     if ($command == "" && isset($this->config->data['TABS'])){
 612       $command= search_config($this->config->data['TABS'], get_class($this), "POSTMODIFY");
 613     }
 614
 615     if ($command != ""){
 616       /* Walk through attribute list */
 617       foreach ($this->attributes as $attr){
 618         if (!is_array($this->$attr)){
 619           $command= preg_replace("/%$attr/", $this->$attr, $command);
 620         }
 621       }
 622       $command= preg_replace("/%dn/", $this->dn, $command);
 623
 624       /* Additional attributes */
 625       foreach ($add_attrs as $name => $value){
 626         $command= preg_replace("/%$name/", $value, $command);
 627       }
 628
 629       if (check_command($command)){
 630         @DEBUG (DEBUG_SHELL, __LINE__, __FUNCTION__, __FILE__,
 631             $command, "Execute");
 632
 633         exec($command);
 634       } else {
 635         $message= sprintf(_("Command '%s', specified as POSTMODIFY for plugin '%s' doesn't seem to exist."), $command, get_class($this));
 636         print_red ($message);
 637       }
 638     }
 639   }
 640
 641   function postremove($add_attrs= array())
 642   {
 643     /* Find postremove entries for this class */
 644     $command= search_config($this->config->data['MENU'], get_class($this), "POSTREMOVE");
 645     if ($command == "" && isset($this->config->data['TABS'])){
 646       $command= search_config($this->config->data['TABS'], get_class($this), "POSTREMOVE");
 647     }
 648
 649     if ($command != ""){
 650       /* Walk through attribute list */
 651       foreach ($this->attributes as $attr){
 652         if (!is_array($this->$attr)){
 653           $command= preg_replace("/%$attr/", $this->$attr, $command);
 654         }
 655       }
 656       $command= preg_replace("/%dn/", $this->dn, $command);
 657
 658       /* Additional attributes */
 659       foreach ($add_attrs as $name => $value){
 660         $command= preg_replace("/%$name/", $value, $command);
 661       }
 662
 663       if (check_command($command)){
 664         @DEBUG (DEBUG_SHELL, __LINE__, __FUNCTION__, __FILE__,
 665             $command, "Execute");
 666
 667         exec($command);
 668       } else {
 669         $message= sprintf(_("Command '%s', specified as POSTREMOVE for plugin '%s' doesn't seem to exist."), $command, get_class($this));
 670         print_red ($message);
 671       }
 672     }
 673   }
 674
 675   /* Create unique DN */
 676   function create_unique_dn($attribute, $base)
 677   {
 678     $ldap= $this->config->get_ldap_link();
 679     $base= preg_replace("/^,*/", "", $base);
 680
 681     /* Try to use plain entry first */
 682     $dn= "$attribute=".$this->$attribute.",$base";
 683     $ldap->cat ($dn, array('dn'));
 684     if (!$ldap->fetch()){
 685       return ($dn);
 686     }
 687
 688     /* Look for additional attributes */
 689     foreach ($this->attributes as $attr){
 690       if ($attr == $attribute || $this->$attr == ""){
 691         continue;
 692       }
 693
 694       $dn= "$attribute=".$this->$attribute."+$attr=".$this->$attr.",$base";
 695       $ldap->cat ($dn, array('dn'));
 696       if (!$ldap->fetch()){
 697         return ($dn);
 698       }
 699     }
 700
 701     /* None found */
 702     return ("none");
 703   }
 704
 705   function rebind($ldap, $referral)
 706   {
 707     $credentials= LDAP::get_credentials($referral, $this->config->current['REFERRAL']);
 708     if (ldap_bind($ldap, $credentials['ADMIN'], $credentials['PASSWORD'])) {
 709       $this->error = "Success";
 710       $this->hascon=true;
 711       $this->reconnect= true;
 712       return (0);
 713     } else {
 714       $this->error = "Could not bind to " . $credentials['ADMIN'];
 715       return NULL;
 716     }
 717   }
 718
 719   /* This is a workaround function. */
 720   function copy($src_dn, $dst_dn)
 721   {
 722     /* Rename dn in possible object groups */
 723     $ldap= $this->config->get_ldap_link();
 724     $ldap->search('(&(objectClass=gosaGroupOfNames)(member='.@LDAP::fix($src_dn).'))',
 725         array('cn'));
 726     while ($attrs= $ldap->fetch()){
 727       $og= new ogroup($this->config, $ldap->getDN());
 728       unset($og->member[$src_dn]);
 729       $og->member[$dst_dn]= $dst_dn;
 730       $og->save ();
 731     }
 732
 733     $ldap->cat($dst_dn);
 734     $attrs= $ldap->fetch();
 735     if (count($attrs)){
 736       trigger_error("Trying to overwrite ".@LDAP::fix($dst_dn).", which already exists.",
 737           E_USER_WARNING);
 738       return (FALSE);
 739     }
 740
 741     $ldap->cat($src_dn);
 742     $attrs= $ldap->fetch();
 743     if (!count($attrs)){
 744       trigger_error("Trying to move ".@LDAP::fix($src_dn).", which does not seem to exist.",
 745           E_USER_WARNING);
 746       return (FALSE);
 747     }
 748
 749     /* Grummble. This really sucks. PHP ldap doesn't support rdn stuff. */
 750     $ds= ldap_connect($this->config->current['SERVER']);
 751     ldap_set_option($ds, LDAP_OPT_PROTOCOL_VERSION, 3);
 752     if (function_exists("ldap_set_rebind_proc") && isset($this->config->current['REFERRAL'])) {
 753       ldap_set_rebind_proc($ds, array(&$this, "rebind"));
 754     }
 755
 756     $r=ldap_bind($ds,$this->config->current['ADMIN'], $this->config->current['PASSWORD']);
 757     error_reporting (0);
 758     $sr=ldap_read($ds, @LDAP::fix($src_dn), "objectClass=*");
 759
 760     /* Fill data from LDAP */
 761     $new= array();
 762     if ($sr) {
 763       $ei=ldap_first_entry($ds, $sr);
 764       if ($ei) {
 765         foreach($attrs as $attr => $val){
 766           if ($info = ldap_get_values_len($ds, $ei, $attr)){
 767             for ($i= 0; $i<$info['count']; $i++){
 768               if ($info['count'] == 1){
 769                 $new[$attr]= $info[$i];
 770               } else {
 771                 $new[$attr][]= $info[$i];
 772               }
 773             }
 774           }
 775         }
 776       }
 777     }
 778
 779     /* close conncetion */
 780     error_reporting (E_ALL);
 781     ldap_unbind($ds);
 782
 783     /* Adapt naming attribute */
 784     $dst_name= preg_replace("/^([^=]+)=.*$/", "\\1", $dst_dn);
 785     $dst_val = preg_replace("/^[^=]+=([^,+]+).*,.*$/", "\\1", $dst_dn);
 786     $new[$dst_name]= @LDAP::fix($dst_val);
 787
 788     /* Check if this is a department.
 789      * If it is a dep. && there is a , override in his ou
 790      *  change \2C to , again, else this entry can't be saved ...
 791      */
 792     if((isset($new['ou'])) &&( preg_match("/\\,/",$new['ou']))){
 793       $new['ou'] = preg_replace("/\\\\,/",",",$new['ou']);
 794     }
 795
 796     /* Save copy */
 797     $ldap->connect();
 798     $ldap->cd($this->config->current['BASE']);
 799
 800     $ldap->create_missing_trees(preg_replace('/^[^,]+,/', '', $dst_dn));
 801
 802     /* FAIvariable=.../..., cn=..
 803         could not be saved, because the attribute FAIvariable was different to
 804         the dn FAIvariable=..., cn=... */
 805     if(in_array_ics("FAIdebconfInfo",$new['objectClass'])){
 806       $new['FAIvariable'] = $ldap->fix($new['FAIvariable']);
 807     }
 808     $ldap->cd($dst_dn);
 809     $ldap->add($new);
 810
 811     if ($ldap->error != "Success"){
 812       trigger_error("Trying to save $dst_dn failed.",
 813           E_USER_WARNING);
 814       return(FALSE);
 815     }
 816
 817     return (TRUE);
 818   }
 819
 820
 821   function move($src_dn, $dst_dn)
 822   {
 823     /* Copy source to destination */
 824     if (!$this->copy($src_dn, $dst_dn)){
 825       return (FALSE);
 826     }
 827
 828     /* Delete source */
 829     $ldap= $this->config->get_ldap_link();
 830     $ldap->rmdir($src_dn);
 831     if ($ldap->error != "Success"){
 832       trigger_error("Trying to delete $src_dn failed.",
 833           E_USER_WARNING);
 834       return (FALSE);
 835     }
 836
 837     return (TRUE);
 838   }
 839
 840
 841   /* Move/Rename complete trees */
 842   function recursive_move($src_dn, $dst_dn)
 843   {
 844     /* Check if the destination entry exists */
 845     $ldap= $this->config->get_ldap_link();
 846
 847     /* Check if destination exists - abort */
 848     $ldap->cat($dst_dn, array('dn'));
 849     if ($ldap->fetch()){
 850       trigger_error("recursive_move $dst_dn already exists.",
 851           E_USER_WARNING);
 852       return (FALSE);
 853     }
 854
 855     /* Perform a search for all objects to be moved */
 856     $objects= array();
 857     $ldap->cd($src_dn);
 858     $ldap->search("(objectClass=*)", array("dn"));
 859     while($attrs= $ldap->fetch()){
 860       $dn= $attrs['dn'];
 861       $objects[$dn]= strlen($dn);
 862     }
 863
 864     /* Sort objects by indent level */
 865     asort($objects);
 866     reset($objects);
 867
 868     /* Copy objects from small to big indent levels by replacing src_dn by dst_dn */
 869     foreach ($objects as $object => $len){
 870       $src= $object;
 871       $dst= preg_replace("/$src_dn$/", "$dst_dn", $object);
 872       if (!$this->copy($src, $dst)){
 873         return (FALSE);
 874       }
 875     }
 876
 877     /* Remove src_dn */
 878     $ldap->cd($src_dn);
 879     $ldap->recursive_remove();
 880     return (TRUE);
 881   }
 882
 883
 884   function handle_post_events($mode, $add_attrs= array())
 885   {
 886     switch ($mode){
 887       case "add":
 888         $this->postcreate($add_attrs);
 889       break;
 890
 891       case "modify":
 892         $this->postmodify($add_attrs);
 893       break;
 894
 895       case "remove":
 896         $this->postremove($add_attrs);
 897       break;
 898     }
 899   }
 900
 901
 902   function saveCopyDialog(){
 903   }
 904
 905
 906   function getCopyDialog(){
 907     return(array("string"=>"","status"=>""));
 908   }
 909
 910
 911   function PrepareForCopyPaste($source){
 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         $this->$var= $source->$var;
 920       }
 921     }
 922   }
 923
 924
 925   function handle_object_tagging($dn= "", $tag= "", $show= false)
 926   {
 927     //FIXME: How to optimize this? We have at least two
 928     //       LDAP accesses per object. It would be a good
 929     //       idea to have it integrated.
 930
 931     /* No dn? Self-operation... */
 932     if ($dn == ""){
 933       $dn= $this->dn;
 934
 935       /* No tag? Find it yourself... */
 936       if ($tag == ""){
 937         $len= strlen($dn);
 938
 939         @DEBUG (DEBUG_TRACE, __LINE__, __FUNCTION__, __FILE__, "No tag for $dn - looking for one...", "Tagging");
 940         $relevant= array();
 941         foreach ($this->config->adepartments as $key => $ntag){
 942
 943           /* This one is bigger than our dn, its not relevant... */
 944           if ($len <= strlen($key)){
 945             continue;
 946           }
 947
 948           /* This one matches with the latter part. Break and don't fix this entry */
 949           if (preg_match('/(^|,)'.normalizePreg($key).'$/', $dn)){
 950             @DEBUG (DEBUG_TRACE, __LINE__, __FUNCTION__, __FILE__, "DEBUG: Possibly relevant: $key", "Tagging");
 951             $relevant[strlen($key)]= $ntag;
 952             continue;
 953           }
 954
 955         }
 956
 957         /* If we've some relevant tags to set, just get the longest one */
 958         if (count($relevant)){
 959           ksort($relevant);
 960           $tmp= array_keys($relevant);
 961           $idx= end($tmp);
 962           $tag= $relevant[$idx];
 963           $this->gosaUnitTag= $tag;
 964         }
 965       }
 966     }
 967
 968
 969     /* Set tag? */
 970     if ($tag != ""){
 971       /* Set objectclass and attribute */
 972       $ldap= $this->config->get_ldap_link();
 973       $ldap->cat($dn, array('gosaUnitTag', 'objectClass'));
 974       $attrs= $ldap->fetch();
 975       if(isset($attrs['gosaUnitTag'][0]) && $attrs['gosaUnitTag'][0] == $tag){
 976         if ($show) {
 977           echo sprintf(_("Object '%s' is already tagged"), @LDAP::fix($dn))."<br>";
 978           flush();
 979         }
 980         return;
 981       }
 982       if (count($attrs)){
 983         if ($show){
 984           echo sprintf(_("Adding tag (%s) to object '%s'"), $tag, @LDAP::fix($dn))."<br>";
 985           flush();
 986         }
 987         $nattrs= array("gosaUnitTag" => $tag);
 988         $nattrs['objectClass']= array();
 989         for ($i= 0; $i<$attrs['objectClass']['count']; $i++){
 990           $oc= $attrs['objectClass'][$i];
 991           if ($oc != "gosaAdministrativeUnitTag"){
 992             $nattrs['objectClass'][]= $oc;
 993           }
 994         }
 995         $nattrs['objectClass'][]= "gosaAdministrativeUnitTag";
 996         $ldap->cd($dn);
 997         $ldap->modify($nattrs);
 998         show_ldap_error($ldap->get_error(), sprintf(_("Handle object tagging with dn '%s' failed."),$dn));
 999       } else {
1000         @DEBUG (DEBUG_TRACE, __LINE__, __FUNCTION__, __FILE__, "Not tagging ($tag) $dn - seems to have moved away", "Tagging");
1001       }
1002
1003     } else {
1004       /* Remove objectclass and attribute */
1005       $ldap= $this->config->get_ldap_link();
1006       $ldap->cat($dn, array('gosaUnitTag', 'objectClass'));
1007       $attrs= $ldap->fetch();
1008       if (isset($attrs['objectClass']) && !in_array_ics("gosaAdministrativeUnitTag", $attrs['objectClass'])){
1009         @DEBUG (DEBUG_TRACE, __LINE__, __FUNCTION__, __FILE__, "$dn is not tagged", "Tagging");
1010         return;
1011       }
1012       if (count($attrs)){
1013         if ($show){
1014           echo sprintf(_("Removing tag from object '%s'"), @LDAP::fix($dn))."<br>";
1015           flush();
1016         }
1017         $nattrs= array("gosaUnitTag" => array());
1018         $nattrs['objectClass']= array();
1019         for ($i= 0; $i<$attrs['objectClass']['count']; $i++){
1020           $oc= $attrs['objectClass'][$i];
1021           if ($oc != "gosaAdministrativeUnitTag"){
1022             $nattrs['objectClass'][]= $oc;
1023           }
1024         }
1025         $ldap->cd($dn);
1026         $ldap->modify($nattrs);
1027         show_ldap_error($ldap->get_error(), sprintf(_("Handle object tagging with dn '%s' failed."),$dn));
1028       } else {
1029         @DEBUG (DEBUG_TRACE, __LINE__, __FUNCTION__, __FILE__, "Not removing tag ($tag) $dn - seems to have moved away", "Tagging");
1030       }
1031     }
1032
1033   }
1034
1035
1036   /* Add possibility to stop remove process */
1037   function allow_remove()
1038   {
1039     $reason= "";
1040     return $reason;
1041   }
1042
1043
1044   /* Create a snapshot of the current object */
1045   function create_snapshot($type= "snapshot", $description= array())
1046   {
1047
1048     /* Check if snapshot functionality is enabled */
1049     if(!$this->snapshotEnabled()){
1050       return;
1051     }
1052
1053     /* Get configuration from gosa.conf */
1054     $tmp = $this->config->current;
1055
1056     /* Create lokal ldap connection */
1057     $ldap= $this->config->get_ldap_link();
1058     $ldap->cd($this->config->current['BASE']);
1059
1060     /* check if there are special server configurations for snapshots */
1061     if(!isset($tmp['SNAPSHOT_SERVER'])){
1062
1063       /* Source and destination server are both the same, just copy source to dest obj */
1064       $ldap_to      = $ldap;
1065       $snapldapbase = $this->config->current['BASE'];
1066
1067     }else{
1068       $server         = $tmp['SNAPSHOT_SERVER'];
1069       $user           = $tmp['SNAPSHOT_USER'];
1070       $password       = $tmp['SNAPSHOT_PASSWORD'];
1071       $snapldapbase   = $tmp['SNAPSHOT_LDAP_BASE'];
1072
1073       $ldap_to        = new LDAP($user,$password, $server);
1074       $ldap_to -> cd($snapldapbase);
1075       show_ldap_error($ldap->get_error(), sprintf(_("Saving object snapshot with dn '%s' failed."),$snapldapbase));
1076     }
1077
1078     /* check if the dn exists */
1079     if ($ldap->dn_exists($this->dn)){
1080
1081       /* Extract seconds & mysecs, they are used as entry index */
1082       list($usec, $sec)= explode(" ", microtime());
1083
1084       /* Collect some infos */
1085       $base           = $this->config->current['BASE'];
1086       $snap_base      = $tmp['SNAPSHOT_BASE'];
1087       $base_of_object = preg_replace ('/^[^,]+,/i', '', $this->dn);
1088       $new_base       = preg_replace("/".normalizePreg($base)."$/","",$base_of_object).$snap_base;
1089
1090       /* Create object */
1091 #$data             = preg_replace('/^dn:.*\n/', '', $ldap->gen_ldif($this->dn,"(!(objectClass=gosaDepartment))"));
1092       $data             = $ldap->gen_ldif($this->dn,"(&(!(objectClass=gosaDepartment))(!(objectClass=FAIclass)))");
1093       $newName          = preg_replace("/\./", "", $sec."-".$usec);
1094       $target= array();
1095       $target['objectClass']            = array("top", "gosaSnapshotObject");
1096       $target['gosaSnapshotData']       = gzcompress($data, 6);
1097       $target['gosaSnapshotType']       = $type;
1098       $target['gosaSnapshotDN']         = $this->dn;
1099       $target['description']            = $description;
1100       $target['gosaSnapshotTimestamp']  = $newName;
1101
1102       /* Insert the new snapshot
1103          But we have to check first, if the given gosaSnapshotTimestamp
1104          is already used, in this case we should increment this value till there is
1105          an unused value. */
1106       $new_dn                           = "gosaSnapshotTimestamp=".$newName.",".$new_base;
1107       $ldap_to->cat($new_dn);
1108       while($ldap_to->count()){
1109         $ldap_to->cat($new_dn);
1110         $newName = preg_replace("/\./", "", $sec."-".($usec++));
1111         $new_dn                           = "gosaSnapshotTimestamp=".$newName.",".$new_base;
1112         $target['gosaSnapshotTimestamp']  = $newName;
1113       }
1114
1115       /* Inset this new snapshot */
1116       $ldap_to->cd($snapldapbase);
1117       $ldap_to->create_missing_trees($new_base);
1118       $ldap_to->cd($new_dn);
1119       $ldap_to->add($target);
1120
1121       show_ldap_error($ldap->get_error(), sprintf(_("Saving object snapshot with dn '%s' failed."),$new_base));
1122       show_ldap_error($ldap_to->get_error(), sprintf(_("Saving object snapshot with dn '%s' failed."),$new_base));
1123     }
1124   }
1125
1126   function remove_snapshot($dn)
1127   {
1128     $ui       = get_userinfo();
1129     $old_dn   = $this->dn;
1130     $this->dn = $dn;
1131     $ldap = $this->config->get_ldap_link();
1132     $ldap->cd($this->config->current['BASE']);
1133     $ldap->rmdir_recursive($dn);
1134     $this->dn = $old_dn;
1135   }
1136
1137
1138   /* returns true if snapshots are enabled, and false if it is disalbed
1139      There will also be some errors psoted, if the configuration failed */
1140   function snapshotEnabled()
1141   {
1142     $tmp = $this->config->current;
1143     if(isset($tmp['ENABLE_SNAPSHOT'])){
1144       if (preg_match("/^true$/i", $tmp['ENABLE_SNAPSHOT']) || preg_match("/yes/i", $tmp['ENABLE_SNAPSHOT'])){
1145
1146         /* Check if the snapshot_base is defined */
1147         if(!isset($tmp['SNAPSHOT_BASE'])){
1148           print_red(sprintf(_("The snapshot functionality is enabled, but the required variable '%s' is not configured in your gosa.conf."),$missing));
1149           return(FALSE);
1150         }
1151
1152         /* check if there are special server configurations for snapshots */
1153         if(isset($tmp['SNAPSHOT_SERVER'])){
1154
1155           /* check if all required vars are available to create a new ldap connection */
1156           $missing = "";
1157           foreach(array("SNAPSHOT_SERVER","SNAPSHOT_USER","SNAPSHOT_PASSWORD","SNAPSHOT_LDAP_BASE") as $var){
1158             if(!isset($tmp[$var])){
1159               $missing .= $var." ";
1160               print_red(sprintf(_("The snapshot functionality is enabled, but the required variable(s) '%s' is not configured in your gosa.conf."),$missing));
1161               return(FALSE);
1162             }
1163           }
1164         }
1165         return(TRUE);
1166       }
1167     }
1168     return(FALSE);
1169   }
1170
1171
1172   /* Return available snapshots for the given base
1173    */
1174   function Available_SnapsShots($dn,$raw = false)
1175   {
1176     if(!$this->snapshotEnabled()) return(array());
1177
1178     /* Create an additional ldap object which
1179        points to our ldap snapshot server */
1180     $ldap= $this->config->get_ldap_link();
1181     $ldap->cd($this->config->current['BASE']);
1182     $tmp = $this->config->current;
1183
1184     /* check if there are special server configurations for snapshots */
1185     if(isset($tmp['SNAPSHOT_SERVER'])){
1186       $server       = $tmp['SNAPSHOT_SERVER'];
1187       $user         = $tmp['SNAPSHOT_USER'];
1188       $password     = $tmp['SNAPSHOT_PASSWORD'];
1189       $snapldapbase = $tmp['SNAPSHOT_LDAP_BASE'];
1190       $ldap_to      = new LDAP($user,$password, $server);
1191       $ldap_to -> cd ($snapldapbase);
1192       show_ldap_error($ldap->get_error(), sprintf(_("Method get available snapshots with dn '%s' failed."),$this->dn));
1193     }else{
1194       $ldap_to    = $ldap;
1195     }
1196
1197     /* Prepare bases and some other infos */
1198     $base           = $this->config->current['BASE'];
1199     $snap_base      = $tmp['SNAPSHOT_BASE'];
1200     $base_of_object = preg_replace ('/^[^,]+,/i', '', $dn);
1201     $new_base       = preg_replace("/".normalizePreg($base)."$/","",$base_of_object).$snap_base;
1202     $tmp            = array();
1203
1204     /* Fetch all objects with  gosaSnapshotDN=$dn */
1205     $ldap_to->cd($new_base);
1206     $ldap_to->ls("(&(objectClass=gosaSnapshotObject)(gosaSnapshotDN=".$dn."))",$new_base,
1207         array("gosaSnapshotType","gosaSnapshotTimestamp","gosaSnapshotDN","description"));
1208
1209     /* Put results into a list and add description if missing */
1210     while($entry = $ldap_to->fetch()){
1211       if(!isset($entry['description'][0])){
1212         $entry['description'][0]  = "";
1213       }
1214       $tmp[] = $entry;
1215     }
1216
1217     /* Return the raw array, or format the result */
1218     if($raw){
1219       return($tmp);
1220     }else{
1221       $tmp2 = array();
1222       foreach($tmp as $entry){
1223         $tmp2[base64_encode($entry['dn'])] = $entry['description'][0];
1224       }
1225     }
1226     return($tmp2);
1227   }
1228
1229
1230   function getAllDeletedSnapshots($base_of_object,$raw = false)
1231   {
1232     if(!$this->snapshotEnabled()) return(array());
1233
1234     /* Create an additional ldap object which
1235        points to our ldap snapshot server */
1236     $ldap= $this->config->get_ldap_link();
1237     $ldap->cd($this->config->current['BASE']);
1238     $tmp = $this->config->current;
1239
1240     /* check if there are special server configurations for snapshots */
1241     if(isset($tmp['SNAPSHOT_SERVER'])){
1242       $server       = $tmp['SNAPSHOT_SERVER'];
1243       $user         = $tmp['SNAPSHOT_USER'];
1244       $password     = $tmp['SNAPSHOT_PASSWORD'];
1245       $snapldapbase = $tmp['SNAPSHOT_LDAP_BASE'];
1246       $ldap_to      = new LDAP($user,$password, $server);
1247       $ldap_to->cd ($snapldapbase);
1248       show_ldap_error($ldap->get_error(), sprintf(_("Method get deleted snapshots with dn '%s' failed."),$this->dn));
1249     }else{
1250       $ldap_to    = $ldap;
1251     }
1252
1253     /* Prepare bases */
1254     $base           = $this->config->current['BASE'];
1255     $snap_base      = $tmp['SNAPSHOT_BASE'];
1256     $new_base       = preg_replace("/".normalizePreg($base)."$/","",$base_of_object).$snap_base;
1257
1258     /* Fetch all objects and check if they do not exist anymore */
1259     $ui = get_userinfo();
1260     $tmp = array();
1261     $ldap_to->cd($new_base);
1262     $ldap_to->ls("(objectClass=gosaSnapshotObject)",$new_base,array("gosaSnapshotType","gosaSnapshotTimestamp","gosaSnapshotDN","description"));
1263     while($entry = $ldap_to->fetch()){
1264
1265       $chk =  str_replace($new_base,"",$entry['dn']);
1266       if(preg_match("/,ou=/",$chk)) continue;
1267
1268       if(!isset($entry['description'][0])){
1269         $entry['description'][0]  = "";
1270       }
1271       $tmp[] = $entry;
1272     }
1273
1274     /* Check if entry still exists */
1275     foreach($tmp as $key => $entry){
1276       $ldap->cat($entry['gosaSnapshotDN'][0]);
1277       if($ldap->count()){
1278         unset($tmp[$key]);
1279       }
1280     }
1281
1282     /* Format result as requested */
1283     if($raw) {
1284       return($tmp);
1285     }else{
1286       $tmp2 = array();
1287       foreach($tmp as $key => $entry){
1288         $tmp2[base64_encode($entry['dn'])] = $entry['description'][0];
1289       }
1290     }
1291     return($tmp2);
1292   }
1293
1294
1295   /* Restore selected snapshot */
1296   function restore_snapshot($dn)
1297   {
1298     if(!$this->snapshotEnabled()) return(array());
1299
1300     $ldap= $this->config->get_ldap_link();
1301     $ldap->cd($this->config->current['BASE']);
1302     $tmp = $this->config->current;
1303
1304     /* check if there are special server configurations for snapshots */
1305     if(isset($tmp['SNAPSHOT_SERVER'])){
1306       $server       = $tmp['SNAPSHOT_SERVER'];
1307       $user         = $tmp['SNAPSHOT_USER'];
1308       $password     = $tmp['SNAPSHOT_PASSWORD'];
1309       $snapldapbase = $tmp['SNAPSHOT_LDAP_BASE'];
1310       $ldap_to      = new LDAP($user,$password, $server);
1311       $ldap_to->cd ($snapldapbase);
1312       show_ldap_error($ldap->get_error(), sprintf(_("Restore snapshot with dn '%s' failed."),$snapldapbase));
1313     }else{
1314       $ldap_to    = $ldap;
1315     }
1316
1317     /* Get the snapshot */
1318     $ldap_to->cat($dn);
1319     $restoreObject = $ldap_to->fetch();
1320
1321     /* Prepare import string */
1322     $data  = gzuncompress($ldap_to->get_attribute($dn,'gosaSnapshotData'));
1323
1324     /* Import the given data */
1325     $ldap->import_complete_ldif($data,$err,false,false);
1326     show_ldap_error($ldap->get_error(), sprintf(_("Restore snapshot with dn '%s' failed."),$dn));
1327   }
1328
1329
1330   function showSnapshotDialog($base,$baseSuffixe)
1331   {
1332     $once = true;
1333     foreach($_POST as $name => $value){
1334
1335       /* Create a new snapshot, display a dialog */
1336       if(preg_match("/^CreateSnapShotDialog_/",$name) && $once){
1337         $once = false;
1338         $entry = preg_replace("/^CreateSnapShotDialog_/","",$name);
1339         $entry = base64_decode(preg_replace("/_[xy]$/","",$entry));
1340         $this->snapDialog = new SnapShotDialog($this->config,$entry,$this);
1341       }
1342
1343       /* Restore a snapshot, display a dialog with all snapshots of the current object */
1344       if(preg_match("/^RestoreSnapShotDialog_/",$name) && $once){
1345         $once = false;
1346         $entry = preg_replace("/^RestoreSnapShotDialog_/","",$name);
1347         $entry = base64_decode(preg_replace("/_[xy]$/","",$entry));
1348         $this->snapDialog = new SnapShotDialog($this->config,$entry,$this);
1349         $this->snapDialog->display_restore_dialog = true;
1350       }
1351
1352       /* Restore one of the already deleted objects */
1353       if(preg_match("/^RestoreDeletedSnapShot_/",$name) && $once){
1354         $once = false;
1355         $this->snapDialog = new SnapShotDialog($this->config,"",$this);
1356         $this->snapDialog->set_snapshot_bases($baseSuffixe);
1357         $this->snapDialog->display_restore_dialog      = true;
1358         $this->snapDialog->display_all_removed_objects  = true;
1359       }
1360
1361       /* Restore selected snapshot */
1362       if(preg_match("/^RestoreSnapShot_/",$name) && $once){
1363         $once = false;
1364         $entry = preg_replace("/^RestoreSnapShot_/","",$name);
1365         $entry = base64_decode(trim(preg_replace("/_[xy]$/","",$entry)));
1366         if(!empty($entry)){
1367           $this->restore_snapshot($entry);
1368           $this->snapDialog = NULL;
1369         }
1370       }
1371     }
1372
1373     /* Create a new snapshot requested, check
1374        the given attributes and create the snapshot*/
1375     if(isset($_POST['CreateSnapshot'])){
1376       $this->snapDialog->save_object();
1377       $msgs = $this->snapDialog->check();
1378       if(count($msgs)){
1379         foreach($msgs as $msg){
1380           print_red($msg);
1381         }
1382       }else{
1383         $this->dn =  $this->snapDialog->dn;
1384         $this->create_snapshot("snapshot",$this->snapDialog->CurrentDescription);
1385         $this->snapDialog = NULL;
1386       }
1387     }
1388
1389     /* Restore is requested, restore the object with the posted dn .*/
1390     if((isset($_POST['RestoreSnapshot'])) && (isset($_POST['SnapShot']))){
1391     }
1392
1393     if(isset($_POST['CancelSnapshot'])){
1394       $this->snapDialog = NULL;
1395     }
1396
1397     if($this->snapDialog){
1398       $this->snapDialog->save_object();
1399       return($this->snapDialog->execute());
1400     }
1401   }
1402
1403
1404   function plInfo()
1405   {
1406     return array();
1407   }
1408
1409
1410   function set_acl_base($base)
1411   {
1412     $this->acl_base= $base;
1413   }
1414
1415
1416   function set_acl_category($category)
1417   {
1418     $this->acl_category= "$category/";
1419   }
1420
1421
1422   function acl_is_writeable($attribute,$skip_write = FALSE)
1423   {
1424     $ui= get_userinfo();
1425     return preg_match('/w/', $ui->get_permissions($this->acl_base, $this->acl_category.get_class($this), $attribute, $skip_write));
1426   }
1427
1428
1429   function acl_is_readable($attribute)
1430   {
1431     $ui= get_userinfo();
1432     return preg_match('/r/', $ui->get_permissions($this->acl_base, $this->acl_category.get_class($this), $attribute));
1433   }
1434
1435
1436   function acl_is_createable()
1437   {
1438     $ui= get_userinfo();
1439     return preg_match('/c/', $ui->get_permissions($this->acl_base, $this->acl_category.get_class($this), '0'));
1440   }
1441
1442
1443   function acl_is_removeable()
1444   {
1445     $ui= get_userinfo();
1446     return preg_match('/d/', $ui->get_permissions($this->acl_base, $this->acl_category.get_class($this), '0'));
1447   }
1448
1449
1450   function acl_is_moveable()
1451   {
1452     $ui= get_userinfo();
1453     return preg_match('/m/', $ui->get_permissions($this->acl_base, $this->acl_category.get_class($this), '0'));
1454   }
1455
1456
1457   function acl_have_any_permissions()
1458   {
1459   }
1460
1461
1462   function getacl($attribute,$skip_write= FALSE)
1463   {
1464     $ui= get_userinfo();
1465     return  $ui->get_permissions($this->acl_base, $this->acl_category.get_class($this), $attribute,$skip_write);
1466   }
1467
1468   /* Get all allowed bases to move an object to or to create a new object.
1469      Idepartments also contains all base departments which lead to the allowed bases */
1470   function get_allowed_bases($category = "")
1471   {
1472     $ui = get_userinfo();
1473     $deps = array();
1474
1475     /* Set category */
1476     if(empty($category)){
1477       $category = $this->acl_category.get_class($this);
1478     }
1479
1480     /* Is this a new object ? Or just an edited existing object */
1481     if(!$this->initially_was_account && $this->is_account){
1482       $new = true;
1483     }else{
1484       $new = false;
1485     }
1486
1487     /* Add current base */
1488     if(isset($this->base) && isset($this->config->idepartments[$this->base])){
1489       $deps[$this->base] = $this->config->idepartments[$this->base];
1490     }else{
1491       echo "No default base found. ".$this->base."<br> ";
1492     }
1493
1494     $cat_bases = $ui->get_module_departments(preg_replace("/\/.*$/","",$category));
1495     foreach($this->config->idepartments as $dn => $name){
1496
1497       if(!in_array_ics($dn,$cat_bases)){
1498         continue;
1499       }
1500
1501       $acl = $ui->get_permissions($dn,$category);
1502       if($new && preg_match("/c/",$acl)){
1503         $deps[$dn] = $name;
1504       }elseif(!$new && preg_match("/m/",$acl)){
1505         $deps[$dn] = $name;
1506       }
1507     }
1508     return($deps);
1509   }
1510
1511 }
1512 // vim:tabstop=2:expandtab:shiftwidth=2:filetype=php:syntax:ruler:
1513 ?>