Code

cce8bb427205f70c3a8e004947d9540a065b0cb5
[gosa.git] / plugins / gofon / macro / class_gofonMacro.inc
1 <?php
3 //!  The Phone Macro Class: Handles Macro Contents, and some attributes. 
4 /*!
5      This class handles the basic information about phone macros, like
6      cn base description displayName goFonMacroContent goFonMacroVisible
8      This is not the only Class that manages phone Macros, there ist also the class_goFonMacroParameter.
9 */
10 class macro extends plugin
11 {
12   /*! Macro attributes,  */
13   var $generate_error= "";
14   
15   /*! The name of the Macro in the openldap drirectory */
16   var $cn               = ""; 
17  
18   /*! Display error once */
19   var $error_shown = false; 
21   /*! This ist the variable that contains the description of the macro*/
22   var $description      = "";
24   /*! The base of the macro, is used to save the macro in the correct directory tree */
25   var $base             = "";
27   /*! This is the name of the macro which the enduser will see, instead of the cn */
28   var $displayName      = "";
29     
30   /*! Here is the macro content, the real macroscript */
31   var $goFonMacroContent= "";
32   
33   /*! To allow user to use this macro this var must be true, else false */
34   var $goFonMacroVisible= 0;
36   /*! attribute list for save action */
37   var $attributes     = array("cn","base", "description","displayName","goFonMacroContent","goFonMacroVisible");
39   var $orig_cn = ""; 
40   /*! Objectclasses that this calls handles */
41   var $objectclasses  = array("top", "goFonMacro");
43   var $goFonHomeServers = array(); // Contains all available asterisk database server 
45   var $is_new = FALSE;
47   //! The Konstructor   
48   /*!  Konstructor, load class with  attributes of the given dn*/
49   function macro ($config, $dn= NULL, $parent= NULL)
50   {
51     plugin::plugin ($config, $dn, $parent);
53     /* This is always an account */
54     $this->is_account= TRUE;
56     /* Edit or new one ?*/
57     if ($this->dn == "new"){
58       $this->is_new = TRUE;
59       if(isset($_SESSION['CurrentMainBase'])){
60         $this->base = $_SESSION['CurrentMainBase'];
61       }else{
62         $ui= get_userinfo();
63         $this->base= dn2base($ui->dn);
64       }
65     } else {
66       $this->orig_cn=$this->cn;
67       $this->base= preg_replace ("/^[^,]+,[^,]+,[^,]+,[^,]+,[^,]+,/", "", $this->dn);
68     }
70     /* Check server configurations
71      * Load all server configuration in $this->goFonHomeServers if available
72      */
73     $a_SETUP= array();
74     if(array_key_exists('config',$_SESSION) &&
75        array_key_exists('SERVERS',$_SESSION['config']->data) &&
76        count($_SESSION['config']->data['SERVERS']['FON']) && 
77        array_key_exists('FON',$_SESSION['config']->data['SERVERS'])) {
79       /* Set available server */
80       $this->goFonHomeServers = $_SESSION['config']->data['SERVERS']['FON'];
81   
82       /* Remove default entry, not necessary here */
83       if(isset($this->goFonHomeServers[0])){
84         unset($this->goFonHomeServers[0]);  
85       }
86     }
88     /* Load acl */
89     $ui       = get_userinfo();
90     $acl      = get_permissions ($ui->dn, $ui->subtreeACL);
91     $this->acl= get_module_permission($acl, "goFonMacro", $ui->dn);
92   }
95   /*!  Execute this plugin */
96   function execute()
97   {
98     /* Call parent execute */
99     plugin::execute();
101     /* Variables */
102     $vars       = "";
103     $tmp        = array();
104     $number = 0; 
106     /* Base select dialog */
107     $once = true;
108     foreach($_POST as $name => $value){
109       if(preg_match("/^chooseBase/",$name) && $once){
110         $once = false;
111         $this->dialog = new baseSelectDialog($this->config,$this->allowedBasesToMoveTo());
112         $this->dialog->setCurrentBase($this->base);
113       }
114     }
116     /* Dialog handling */
117     if(is_object($this->dialog)){
118       /* Must be called before save_object */
119       $this->dialog->save_object();
121       if($this->dialog->isClosed()){
122         $this->dialog = false;
123       }elseif($this->dialog->isSelected()){
124         $this->base = $this->dialog->isSelected();
125         $this->dialog= false;
126       }else{
127         return($this->dialog->execute());
128       }
129     }
131     /* Fill templating stuff */
132     $smarty= get_smarty();
133     $smarty->assign("bases", $this->config->idepartments);
135     /* Assign all vars to Smarty */
136     foreach($this->attributes as $ar){
137       $smarty->assign($ar, $this->$ar);
138       $smarty->assign($ar."ACL", chkacl($this->acl,$ar));
139     }
140     /* Checkboxes */
141     $smarty->assign("base_select", $this->base);
142     $smarty->assign("vars", $vars);
144     if($this->goFonMacroVisible){
145       $smarty->assign("goFonMacroVisibleChecked"," checked ");
146     }else{
147       $smarty->assign("goFonMacroVisibleChecked","");
148     }
150     if($this->dn != "new"){
151       $smarty->assign("disable_cn"," disabled ");
152     }else{
153       $smarty->assign("disable_cn","  ");
154     }
156     /* Ensure that macro content is displayed correctly encoded */
157     $smarty->assign("goFonMacroContent",htmlentities(utf8_decode ($this->goFonMacroContent)));
159     /* Show main page */
160     return($smarty->fetch (get_template_path('generic.tpl', TRUE)));
161   }
164   /* This method check if all databases are reachable.  
165    *  Returns with error message or an empty string on success.
166    * 
167    * - Is mysql extension available  
168    * - Is every server reachable 
169    * - Does the database exists/is accessible
170    */
171   function check_database_accessibility()
172   {
173     /* Check if mysql extension is available */
174     if(!is_callable("mysql_pconnect")){
175       return(_("Can't save any changes to asterisk database, there is currently no mysql extension available in your php setup."));
176     }
178     /********************
179      * Check all home server
180      ********************/
181     foreach($this->goFonHomeServers as $goFonHomeServer => $cfg_Current){
182       $r_current    =  @mysql_pconnect($cfg_Current['SERVER'],$cfg_Current['LOGIN'],$cfg_Current['PASSWORD']);
183       if(!$r_current){
184         gosa_log(@mysql_error($r_current));
185         return(sprintf(_("The MySQL home server '%s' isn't reachable as user '%s', check GOsa log for mysql error."),
186               $cfg_Current['SERVER'],$cfg_Current['LOGIN']));
187       }
188       $db_current  =  @mysql_select_db($cfg_Current['DB'],$r_current);
189       if(!$db_current){
190         gosa_log(@mysql_error($r_current));
191         mysql_close($r_current);
192         return( sprintf(_("Can't select database '%s' on home server '%s'."),$cfg_Current['DB'],$cfg_Current['SERVER']));
193       }
194     }
195   }
198   /* Remove current macro from all asterisk server.
199    * First of all check if we have access to all databases. 
200    * - Remove old entries 
201    */ 
202   function remove_from_database($save)
203   {
204     /* Check if all databases are reachable */
205     $str = $this->check_database_accessibility();
206     if($str){
207       return($str);
208     }
210     /* Create query string */
211     $context  = addslashes("macro-".$this->cn);
213     /* Remove current macro from each server available */ 
214     if($save){
215       foreach($this->goFonHomeServers as $dn => $Server){
216         $query      = "DELETE FROM ".$Server['EXT_TABLE']." WHERE context='".$context."';";
217         $r_current  =  @mysql_pconnect($Server['SERVER'],$Server['LOGIN'],$Server['PASSWORD']);
218         $db_current =  @mysql_select_db($Server['DB'],$r_current);
219         $res = @mysql_query($query,$r_current);
220         @DEBUG (DEBUG_MYSQL, __LINE__, __FUNCTION__, __FILE__,$query, "Database query");
221         if(!$res){
222           gosa_log(@mysql_error($r_current));
223           return(sprintf(_("Removing macro from '%s' failed. Check GOsa log for mysql error."),$Server['SERVER']));
224         }
225         @mysql_close($r_current);
226       }
227     }
228   }
230  
231   /* Add current macro to all asterisk server.
232    * First of all check if we have access to all databases. 
233    * - Remove old entries 
234    * - Add new entries 
235    */ 
236   function add_to_database($save)
237   {
238     /* Check if all databases are reachable */
239     $str = $this->check_database_accessibility();
240     if($str){
241       return($str);
242     }
244     /* Remove old entries first. Else we got duplicated entries */
245     $str = $this->remove_from_database($save);
246     if($str){
247       return($str);
248     }
250     /* Create query string */
251     $context      = "macro-".$this->cn;
253     /************
254      * Parse Macro content
255      ************/
256     $sql = 
257       "INSERT INTO %TABLENAME% ".
258       " (context,exten,priority,app,appdata) ".
259       " VALUES ";
260       
261     $a_contentLines = split("\n",$this->goFonMacroContent);
262     foreach($a_contentLines as $i_linenum => $s_linestr){
264       /* Remove the 'exten => ' string in front of the macro content line 
265        *  example line  'exten => s,2,GotoIf(${ARG3}?3:5)'
266        * Remove comments introduced by ;
267        * Skip empty lines 
268        */ 
269       $s_linestr = trim($s_linestr);
270       $s_linestr = preg_replace("/;.*$/","",$s_linestr) ;
271       $s_linestr = preg_replace ("/^.*=\> /","",$s_linestr);
273       if(empty($s_linestr)){
274         continue;
275       }
277       /* A line that passes the check above should look like this 
278        *  s,1,SetLanguage(de)
279        * 3 parts seperated by , 
280        * If there are more or less parts, abort.
281        * The preg_replace exclude parameters from split .. 
282        */
283       $tmp  = split(",", $s_linestr,3);
285       /* Check if there are exactly 2 , */ 
286 #      if(substr_count($s_linestr,",") !=2){
287 #        return(sprintf(_("More than two ',' given in line : '%s'. Remember that parameters are seperated by '|'."),$i_linenum));
288 #      }
289       /* Multiple () are not supproted currently ... */  
290       if(substr_count($s_linestr,"(") >1 ){
291         return(sprintf(_("More than one '(' is currently not supported. Line : '%s'."),$i_linenum));
292       }
293       if(substr_count($s_linestr,")") >1 ){
294         return(sprintf(_("More than one ')' is currently not supported. Line : '%s'."),$i_linenum));
295       }
296       /* Check if there is an application given */
297       if(empty($tmp[1])){
298         return(sprintf(_("There is no application given in line : '%s'."),$i_linenum));
299       } 
300       /* Check if there is an extension given */
301       if(empty($tmp[0])){
302         return(sprintf(_("There is no extension type given in line : '%s'."),$i_linenum));
303       } 
305       /* Create extension entry for current line 
306        *  and add this line to an array that will be inserted 
307        *  to each database.
308        */
309       $exten  = addslashes($tmp[0]);
310       $prio   = addslashes($tmp[1]);
311       $app    = addslashes(preg_replace("/\(.*\).*$/","",$tmp[2]));
312       $para   = addslashes(preg_replace("/^.*\(/","",$tmp[2]));
313       $para   = preg_replace("/\).*$/","",$para);
314       $sql.= " ('".$context."','".$exten."','".$prio."','".$app."','".$para."'),";
315     }
316     
317     /* Remove last , from query string */
318     $sql = preg_replace("/,$/","",$sql);
320     /* Save current changes to the database */
321     if($save){
322     
323       /* Macro are spread to each asterisk server */
324       foreach($this->goFonHomeServers as $dn => $cfg){
325         $r_con  = @mysql_pconnect($cfg['SERVER'],$cfg['LOGIN'],$cfg['PASSWORD']); 
326         $db     = @mysql_select_db($cfg['DB'],$r_con);
327         $query  = preg_replace("/%TABLENAME%/",$cfg['EXT_TABLE'],$sql);
328         $res    = @mysql_query($query,$r_con);
329         @DEBUG (DEBUG_MYSQL, __LINE__, __FUNCTION__, __FILE__,$query, "Database query");
330         if(!$res){
331           gosa_log(@mysql_error($r_con));
332           return(sprintf(_("Insert of new macro failed for server '%s'."),$cfg['SERVER']));
333         }
334         @mysql_close($r_con);
335       }
336     }
337   }
340   /*! Save data to object */
341   function save_object()
342   {
343     if (isset($_POST['displayName'])){
344       plugin::save_object();
346       /* The cn can't be changed if this entry is not new */
347       if(!$this->is_new){
348         $this->cn = $this->orig_cn;
349       }
351       if(isset($_POST['goFonMacroVisible'])) {
352         $this->goFonMacroVisible= 1 ;
353       }else  {
354         $this->goFonMacroVisible= 0 ;
355       }
356     }
357   }
360   /*! Check values */
361   function check()
362   {
363     /* Call common method to give check the hook */
364     $message= plugin::check();
366     if(!count($this->goFonHomeServers)){
367       $message[] = _("There must be at least one server with an asterisk database to save this phone macro.");
368     }
370     /* Check if insert/replace is possible and all servers are available */
371     $str = $this->add_to_database(false);
372     if($str){
373       $message[] = $str;
374     }
376     /* Check if cn is already used  */
377     if(($this->dn=="new")||($this->orig_cn!=$this->cn)){
378       $ldap = $this->config->get_ldap_link();
379       $ldap->search("(&(objectClass=goFonMacro)(cn=".$this->cn."))",array("cn"));
380       if($ldap->count()>0){
381         $message[]=sprintf(_("The given cn '%s' already exists."),$this->cn);
382       }
383     }
384   
385     /* Check if display name is set */
386     if(empty($this->displayName)){
387       $message[] = _("You must specify the 'Display Name' in order to save this macro");
388     }  
389     /* CN is restricted to 20 chars */
390     if(strlen("Makro-".$this->cn)>20 ){
391       $message[]=_("The given cn is too long, to create a Makro entry, maximum 20 chars.");
392     }
393   
394     /* Check permissions */
395     foreach($this->attributes as $attr){
396       if(chkacl($this->acl,"edit")){
397         $str =  sprintf( _("Insufficient permissions, can't change attribute '%s' in goFonMacro"),$attr) ;
398         return(array($str));
399       }
400     }
402     /* If this macro is still in use we should not change the visible for user flag to invisible */
403     if(!$this->goFonMacroVisible){
404       $ldap = $this->config->get_ldap_link();
405       $res = $ldap->search("(&(objectClass=goFonAccount)(objectClass=gosaAccount)(goFonMacro=*))", array("goFonMacro"));
406       while ($val = $ldap->fetch()){
407         if(strstr($val['goFonMacro'][0],$this->dn)){
408           $message[] = _("This macro is still in use. It is necessary to mark this macro as visible for users.");
409           return($message);
410         }
411       }
412     }
414     /* Macro content must be smaller than 100 lines */
415     if(count(split("\n",$this->goFonMacroContent))>100){
416       $message[] = _("Makro length must be lower than 100 lines");
417     }
419     return $message;
420   }
423   /*! Remove makro from all given databases 
424    *   and ldap too.
425    */
426   function remove_from_parent()
427   {
428     $ldap= $this->config->get_ldap_link();
430     /* Skip remove if this macro is still in use */
431     $res = $ldap->search("(&(objectClass=goFonAccount)(objectClass=gosaAccount)(goFonMacro=*))", array("goFonMacro"));
432     while ($val = $ldap->fetch()){ 
433       if(strstr($val['goFonMacro'][0],$this->dn)){ 
434         print_red(_("This macro is still in use. To delete this Macro ensure that nobody has selected it."));
435         return false;
436       }
437     }
439     /* Try to remove from database */
440     if(count($this->goFonHomeServers)){
441       $str = $this->remove_from_database(true);
442       if($str){ 
443         print_red($str);
444         return false;
445       }
446     }else{
447       print_red(_("Could not remove the macro entry from asterisk databases. Please check your asterisk database configurations."));
448       return false;
449     }
451     /* Remove phone macro */ 
452     $ldap->rmDir($this->dn); 
453     show_ldap_error($ldap->get_error(), _("Removing phone macro failed"));
455     /* Delete references to object groups */
456     $ldap->cd ($this->config->current['BASE']);
457     $ldap->search ("(&(objectClass=gosaGroupOfNames)(member=".LDAP::prepare4filter($this->dn)."))", array("cn"));
458     while ($ldap->fetch()){
459       $og= new ogroup($this->config, $ldap->getDN());
460       unset($og->member[$this->dn]);
461       $og->save ();
462       show_ldap_error($ldap->get_error(), _("Removing phone macro reverences failed"));
463     }
464   }
467   /*! Save to LDAP */
468   function save()
469   {
470     plugin::save();
471     unset($this->attrs['base']);
473     /* Try to add entries to databases */
474     $str = $this->add_to_database(true);
475     if($str){
476       print_red($str);
477     }else{
478       /* Write back to ldap */
479       $ldap= $this->config->get_ldap_link();
480       $ldap->cat($this->dn, array('dn'));
481       $a= $ldap->fetch();
483       if (count($a)){
484         $ldap->cd($this->dn);
485         $this->cleanup();
486         $ldap->modify ($this->attrs); 
488         $this->handle_post_events("modify");
489       } else {
490         $ldap->cd($this->config->current['BASE']);
491         $ldap->create_missing_trees(preg_replace('/^[^,]+,/', '', $this->dn));
492         $ldap->cd($this->dn);
493         $ldap->add($this->attrs);
494         $this->handle_post_events("add");
495       }
496       show_ldap_error($ldap->get_error(), _("Saving phone macro failed"));
497     }
498   }
501 // vim:tabstop=2:expandtab:shiftwidth=2:filetype=php:syntax:ruler:
502 ?>