Code

Fixed . and _ problem
[gosa.git] / gosa-core / include / class_gosaSupportDaemon.inc
index a993a3ad3046dba24de7dfdfd26cae8c8bd64bcc..e4772236c32bf787a90ecef02f241493a4e3ce7e 100644 (file)
@@ -136,8 +136,15 @@ class gosaSupportDaemon
 
   public function FAI_get_kernels($release)
   {
-    $xml_msg = "<xml><header>gosa_get_available_kernel</header><source>GOSA</source><target>GOSA</target><release>".$release."</release></xml>";
+    $xml_msg = 
+      "<xml>".
+      "<header>gosa_get_available_kernel</header>".
+      "<source>GOSA</source>".
+      "<target>GOSA</target>".
+      "<release>".$release."</release>".
+      "</xml>";
 
+    $ret = array();
     if($this->connect()){
       $this->o_sock->write($xml_msg);
       $str = trim($this->o_sock->read());
@@ -181,6 +188,7 @@ class gosaSupportDaemon
       "<select>distinct section</select>".
       "<where><clause><phrase><distribution>".$release."</distribution></phrase></clause></where></xml>";
 
+    $ret = array();
     if($this->connect()){
       $this->o_sock->write($xml_msg);
       $str = trim($this->o_sock->read());
@@ -413,25 +421,23 @@ class gosaSupportDaemon
     }
 
     $xml_msg = 
-"<xml>
+      "<xml>
       <header>gosa_query_jobdb</header>
       <target>GOSA</target>
       <source>GOSA</source>
       ".$tags."
 
       <orderby>".$sort."</orderby>";
-if($from != -1 && $to != -1){
-$xml_msg.= "
-      <limit>
-       <from>".$from."</from>
-       <to>".$to."</to>
-      </limit>";
-}
-$xml_msg.= "
+    if($from != -1 && $to != -1){
+      $xml_msg.= "
+        <limit>
+        <from>".$from."</from>
+        <to>".$to."</to>
+        </limit>";
+    }
+    $xml_msg.= "
       </xml>";
 
-    echo htmlentities($xml_msg);
-
     if($this->connect()){
       $this->o_sock->write($xml_msg);
       $str = trim($this->o_sock->read());
@@ -813,13 +819,21 @@ $xml_msg.= "
         }
         if ($xml_elem['type'] == 'complete') {
           $start_level = 1;
-          $php_stmt = '$params';
+          $test2 = &$params;
           while($start_level < $xml_elem['level']) {
-            $php_stmt .= '[$level['.$start_level.']]';
+            $test2 = &$test2[$level[$start_level]];
             $start_level++;
           }
-          $php_stmt .= '[$xml_elem[\'tag\']] = $xml_elem[\'value\'];';
-          @eval($php_stmt);
+          if(!isset($test2[$xml_elem['tag']])){
+            if(isset($xml_elem['value'])){
+              $test2[$xml_elem['tag']] = $xml_elem['value'];
+            }
+          }else{
+            if(!is_array($test2[$xml_elem['tag']])){
+              $test2[$xml_elem['tag']] = array($test2[$xml_elem['tag']]);
+            }
+            $test2[$xml_elem['tag']][] = $xml_elem['value'];
+          }
         }
       }
     }
@@ -936,6 +950,7 @@ $xml_msg.= "
       $tags.
       "</xml>";
 
+    $xml_msg ="<xml><header>gosa_count_jobdb</header><target>GOSA</target><source>GOSA</source></xml>";
     $this->connect();
     if($this->connect()){
       $this->o_sock->write($xml_msg);
@@ -948,7 +963,6 @@ $xml_msg.= "
       }
 
       $entries = $this->xml_to_array($str);
-      print_a($entries);
       if(isset($entries['XML'])){
         return($entries['XML']['COUNT']);
       }
@@ -1067,6 +1081,9 @@ $xml_msg.= "
           if(isset($entries['XML']['ERROR_STRING'])) {
             $this->set_error($entries['XML']['ERROR_STRING']);
             new log("debug","DaemonEvent (IDS) ", "gosaSupportDaemon::_send()", array($data=>$data),"FAILED ".$this->get_error());
+          }elseif(isset($entries['XML']['ERROR'])){
+            $this->set_error($entries['XML']['ERROR']);
+            new log("debug","DaemonEvent (IDS) ", "gosaSupportDaemon::_send()", array($data=>$data),"FAILED ".$this->get_error());
           }else{
             new log("debug","DaemonEvent (IDS) ", "gosaSupportDaemon::_send()", array($data=>$data),"SUCCESS");
           }
@@ -1179,17 +1196,411 @@ $xml_msg.= "
   }
 
 
-static function ping($target)
-{
-  if (tests::is_mac($target)){
-    /* Get communication object */
-    $d= new gosaSupportDaemon(TRUE,0.5);
-    $answer= $d->_send("<xml><header>gosa_ping</header><source>GOSA</source><target>$target</target></xml>", TRUE);
-    return (count($answer) ? TRUE:FALSE);
+  static function ping($target)
+  {
+    if (tests::is_mac($target)){
+      /* Get communication object */
+      $d= new gosaSupportDaemon(TRUE,0.5);
+      $answer= $d->_send("<xml><header>gosa_ping</header><source>GOSA</source><target>$target</target></xml>", TRUE);
+      return (count($answer) ? TRUE:FALSE);
+    }
+    return (FALSE);
   }
 
-  return (FALSE);
-}
+
+
+  /*! \brief  Returns a list of all configured principals. 
+              (Uses the GOsa support daemon instead of the ldap database.)
+      @return Array  A list containing the names of all configured principals.
+   */
+  public function krb5_list_principals($server)
+  {
+    $res = array();  
+
+    /* Check if the given server is a valid mac address
+     */
+    if(!tests::is_mac($server)){
+      trigger_error("The given server address '".$server."' is invalid, it must be a valid mac address");
+      return($ret);
+    }
+
+    /* Prepare request event 
+     */ 
+    $xml_msg = 
+      "<xml>".
+      "<header>gosa_krb5_list_principals</header>".
+      "<source>GOSA</source>".
+      "<target>".$server."</target>".
+      "</xml>";
+    
+    return($this->_send($xml_msg,TRUE));
+  }
+
+
+  /*! \brief  Returns the configuration settings for a given principal name. 
+              (Uses the GOsa support daemon instead of the ldap database.)
+      @pram   String The name of the requested principal. (e.g. peter@EXAMPLE.DE)
+      @return Array  A list containing the names of all configured principals.
+   */
+  public function krb5_get_principal($server,$name)
+  {
+    $ret = array();
+
+    /* Check if the given name is a valid request value 
+     */
+    if(!is_string($name) || empty($name)){
+      trigger_error("The given principal name is not of type string or it is empty.");
+      return($ret);
+    }
+
+    /* Check if the given server is a valid mac address
+     */
+    if(!tests::is_mac($server)){
+      trigger_error("The given server address '".$server."' is invalid, it must be a valid mac address");
+      return($ret);
+    }
+
+    /* Prepare request event 
+     */ 
+    $xml_msg = 
+      "<xml>".
+      "<header>gosa_krb5_get_principal</header>".
+      "<principal>".$name."</principal>".
+      "<source>GOSA</source>".
+      "<target>GOSA</target>".
+      "</xml>";
+
+    return($this->_send($xml_msg,TRUE));
+  }
+
+
+  /*! \brief  Creates/Updates a given principal with a set of configuration settings.
+              For a list of configurable attributes have a look at 'krb5_get_principal()'.
+              (Uses the GOsa support daemon instead of the ldap database.)
+      @pram   String The name of the principal to update. (e.g. peter@EXAMPLE.DE)
+      @return Boolean   TRUE on success else FALSE. 
+   */
+  public function krb5_set_principal($server,$name,$values)
+  {
+    $ret = FALSE;  
+
+    /* Check if the given name is a valid request value 
+     */
+    if(!is_string($name) || empty($name)){
+      trigger_error("The given principal name is not of type string or it is empty.");
+      return($ret);
+    }
+    if(!is_array($values) || !count($values)){
+      trigger_error("No valid update settings given. The parameter must be of type array and must contain at least one entry");
+      return($ret);
+    }
+
+    /* Check if the given server is a valid mac address
+     */
+    if(!tests::is_mac($server)){
+      trigger_error("The given server address '".$server."' is invalid, it must be a valid mac address");
+      return($ret);
+    }
+
+    $attrs = "";
+    foreach($values as $name => $value){
+      if(empty($name) || is_numeric($name)){
+        trigger_error("Invalid configuration attribute given '".$name."=".$value."'.");
+        return($ret);
+      }
+      $attrs = "<$name>$value</$name>\n";
+    }
+
+    /* Prepare request event 
+     */ 
+    $xml_msg = 
+      "<xml>".
+      "<header>gosa_krb5_set_principal</header>".
+      "<principal>".$name."</principal>".
+      $attrs.
+      "<source>GOSA</source>".
+      "<target>GOSA</target>".
+      "</xml>";
+
+    return($this->_send($xml_msg,TRUE) == TRUE && !$this->is_error());
+  }
+
+
+  /*! \brief  Removes the given principal.
+              (Uses the GOsa support daemon instead of the ldap database.)
+      @pram   String The name of the principal. (e.g. peter@EXAMPLE.DE)
+      @return Boollean   TRUE on success else FALSE
+   */
+  public function krb5_del_principal($server,$name)
+  {
+    $ret = FALSE;  
+
+    /* Check if the given name is a valid request value 
+     */
+    if(!is_string($name) || empty($name)){
+      trigger_error("The given principal name is not of type string or it is empty.");
+      return($ret);
+    }
+
+    /* Check if the given server is a valid mac address
+     */
+    if(!tests::is_mac($server)){
+      trigger_error("The given server address '".$server."' is invalid, it must be a valid mac address");
+      return($ret);
+    }
+
+    /* Prepare request event 
+     */ 
+    $xml_msg = 
+      "<xml>".
+      "<header>gosa_krb5_del_principal</header>".
+      "<principal>".$name."</principal>".
+      "<source>GOSA</source>".
+      "<target>GOSA</target>".
+      "</xml>";
+    
+    return($this->_send($xml_msg,TRUE) == TRUE && !$this->is_error());
+  }
+
+
+  /*! \brief  Returns a list of configured password policies.
+              (Uses the GOsa support daemon instead of the ldap database.)
+      @return Array A list of all configured password policies.
+   */
+  public function krb5_list_policies($server)
+  {
+    $res = array();  
+
+    /* Check if the given server is a valid mac address
+     */
+    if(!tests::is_mac($server)){
+      trigger_error("The given server address '".$server."' is invalid, it must be a valid mac address");
+      return($ret);
+    }
+
+    /* Prepare request event 
+     */ 
+    $xml_msg = 
+      "<xml>".
+      "<header>gosa_krb5_list_policies</header>".
+      "<source>GOSA</source>".
+      "<target>".$server."</target>".
+      "</xml>";
+    
+    $res = $this->_send($xml_msg,TRUE);
+    
+    /* Check if there are results for POLICY 
+     */
+    if(isset($res['XML']['POLICY'])){
+      
+      /* Ensure that we return an array 
+       */
+      $tmp = $res['XML']['POLICY'];
+      if(!is_array($tmp)){
+        $tmp = array($tmp);
+      }
+      return($tmp);
+    }else{
+      return(array());
+    }
+  }
+
+
+  /*! \brief  Returns a list of configured password policies.
+              (Uses the GOsa support daemon instead of the ldap database.)
+      @return Array The policy settings for the given policy name.
+   */
+  public function krb5_get_policy($server,$name)
+  {
+    $res = array();  
+
+    /* Check if the given name is a valid request value 
+     */
+    if(!is_string($name) || empty($name)){
+      trigger_error("The given policy name is not of type string or it is empty.");
+      return($ret);
+    }
+
+    /* Check if the given server is a valid mac address
+     */
+    if(!tests::is_mac($server)){
+      trigger_error("The given server address '".$server."' is invalid, it must be a valid mac address");
+      return($ret);
+    }
+
+    /* Prepare request event 
+     */ 
+    $xml_msg = 
+      "<xml>".
+      "<header>gosa_krb5_get_policy</header>".
+      "<policy>".$name."</policy>".
+      "<source>GOSA</source>".
+      "<target>".$server."</target>".
+      "</xml>";
+
+    /* Possible attributes */
+    $attrs = array("MASK","POLICY","PW_HISTORY_NUM","PW_MAX_LIFE",
+        "PW_MIN_CLASSES","PW_MIN_LENGTH","PW_MIN_LIFE","POLICY_REFCNT");
+
+  
+    $tmp = $this->_send($xml_msg,TRUE);
+    if(isset($tmp['XML'])){
+      foreach($attrs as $attr){
+        if(isset($tmp['XML'][$attr])){
+          $ret[$attr] = $tmp['XML'][$attr];
+        }else{
+          $ret[$attr] = "";
+        }
+      }
+    }
+    return($ret);
+  }
+
+  
+  /*! \brief  Creates a new policy with a given set of configuration settings.
+              For a list of configurable attributes have a look at 'krb5_get_policy()'.
+              (Uses the GOsa support daemon instead of the ldap database.)
+      @pram   String The name of the policy to update.
+      @pram   Array  The attributes to update
+      @return Boolean   TRUE on success else FALSE. 
+   */
+  public function krb5_add_policy($server,$name,$values)
+  {
+    $ret = FALSE;  
+
+    /* Check if the given name is a valid request value 
+     */
+    if(!is_string($name) || empty($name)){
+      trigger_error("The given policy name is not of type string or it is empty.");
+      return($ret);
+    }
+    if(!is_array($values) || !count($values)){
+      trigger_error("No valid policy settings given. The parameter must be of type array and must contain at least one entry");
+      return($ret);
+    }
+
+    /* Check if the given server is a valid mac address
+     */
+    if(!tests::is_mac($server)){
+      trigger_error("The given server address '".$server."' is invalid, it must be a valid mac address");
+      return($ret);
+    }
+
+
+    /* Transform array into <xml>
+     */
+    $attrs = "";
+    foreach($values as $id => $value){
+      if(empty($id) || is_numeric($id)){
+        trigger_error("Invalid policy configuration attribute given '".$id."=".$value."'.");
+        return($ret);
+      }
+      $attrs.= "<$id>$value</$id>\n";
+    }
+
+    /* Prepare request event 
+     */ 
+    $xml_msg = 
+      "<xml>".
+      "<header>gosa_krb5_create_policy</header>".
+      "<policy>".$name."</policy>".
+      $attrs.
+      "<source>GOSA</source>".
+      "<target>".$server."</target>".
+      "</xml>";
+
+    return($this->_send($xml_msg,TRUE) == TRUE && !$this->is_error());
+  }
+
+
+  /*! \brief  Updates a given policy with a set of configuration settings.
+              For a list of configurable attributes have a look at 'krb5_get_policy()'.
+              (Uses the GOsa support daemon instead of the ldap database.)
+      @pram   String The name of the policy to update.
+      @return Boolean   TRUE on success else FALSE. 
+   */
+  public function krb5_set_policy($server,$name,$values)
+  {
+    $ret = FALSE;  
+
+    /* Check if the given name is a valid request value 
+     */
+    if(!is_string($name) || empty($name)){
+      trigger_error("The given policy name is not of type string or it is empty.");
+      return($ret);
+    }
+    if(!is_array($values) || !count($values)){
+      trigger_error("No valid policy settings given. The parameter must be of type array and must contain at least one entry");
+      return($ret);
+    }
+
+    /* Check if the given server is a valid mac address
+     */
+    if(!tests::is_mac($server)){
+      trigger_error("The given server address '".$server."' is invalid, it must be a valid mac address");
+      return($ret);
+    }
+
+    /* Transform array into <xml>
+     */
+    $attrs = "";
+    foreach($values as $id => $value){
+      if(preg_match("/^policy$/i",$id)) continue;
+      if(empty($id) || is_numeric($id)){
+        trigger_error("Invalid policy configuration attribute given '".$id."=".$value."'.");
+        return($ret);
+      }
+      $attrs.= "<$id>$value</$id>\n";
+    }
+
+    /* Prepare request event 
+     */ 
+    $xml_msg = 
+      "<xml>".
+      "<header>gosa_krb5_modify_policy</header>".
+      "<policy>".$name."</policy>".
+      $attrs.
+      "<source>GOSA</source>".
+      "<target>".$server."</target>".
+      "</xml>";
+
+    return($this->_send($xml_msg,TRUE) == TRUE && !$this->is_error());
+  }
+
+  
+  /*! \brief  Removes the given password policy. 
+              (Uses the GOsa support daemon instead of the ldap database.)
+      @return Boolean  TRUE on success else FALSE
+   */
+  public function krb5_del_policy($server,$name)
+  {
+    $ret = FALSE;
+
+    /* Check if the given server is a valid mac address
+     */
+    if(!tests::is_mac($server)){
+      trigger_error("The given server address '".$server."' is invalid, it must be a valid mac address");
+      return($ret);
+    }
+
+    /* Check if the given name is a valid request value 
+     */
+    if(!is_string($name) || empty($name)){
+      trigger_error("The given policy name is not of type string or it is empty.");
+      return($ret);
+    }
+
+    /* Prepare request event 
+     */ 
+    $xml_msg = 
+      "<xml>".
+      "<header>gosa_krb5_del_policy</header>".
+      "<policy>".$name."</policy>".
+      "<source>GOSA</source>".
+      "<target>GOSA</target>".
+      "</xml>";
+    return($this->_send($xml_msg,TRUE) == TRUE && !$this->is_error());
+  }
 
 }