LSattribute :: generateValue() : Fixed bug when generated value is an array.
[ldapsaisie.git] / public_html / includes / class / class.LSattr_html_select_object.php
1 <?php
2 /*******************************************************************************
3  * Copyright (C) 2007 Easter-eggs
4  * http://ldapsaisie.labs.libre-entreprise.org
5  *
6  * Author: See AUTHORS file in top-level directory.
7  *
8  * This program is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU General Public License version 2
10  * as published by the Free Software Foundation.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program; if not, write to the Free Software
19  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
20
21 ******************************************************************************/
22
23 /**
24  * Type d'attribut HTML select_object
25  *
26  * @author Benjamin Renard <brenard@easter-eggs.com>
27  */
28 class LSattr_html_select_object extends LSattr_html{
29
30   /**
31    * Ajoute l'attribut au formualaire passer en paramètre
32    *
33    * @param[in] &$form LSform Le formulaire
34    * @param[in] $idForm L'identifiant du formulaire
35    * @param[in] $data Valeur du champs du formulaire
36    *
37    * @retval LSformElement L'element du formulaire ajouté
38    */
39   function addToForm (&$form,$idForm,$data=NULL) {
40     $this -> config['attrObject'] = $this;
41     $element=$form -> addElement('select_object', $this -> name, $this -> config['label'],$this -> config,$this);
42     if(!$element) {
43       LSerror :: addErrorCode('LSform_06',$this -> name);
44       return;
45     }
46     if ($data) {
47       if (!is_array($data)) {
48         $data=array($data);
49       }
50       $values=$this -> getFormValues($data);
51       if ($values) {
52         $element -> setValue($values);
53       }
54     }
55     $element -> setSelectableObject($this -> config['html_options']['selectable_object']['object_type']);
56     return $element;
57   }
58
59   /**
60    * Effectue les tâches nécéssaires au moment du rafraichissement du formulaire
61    * 
62    * Récupère un array du type array('DNs' => 'displayName') à partir d'une
63    * liste de DNs.
64    * 
65    * @param[in] $data mixed La valeur de l'attribut (liste de DNs)
66    * 
67    * @retval mixed La valeur formatée de l'attribut (array('DNs' => 'displayName'))
68    **/
69   function refreshForm($data,$fromDNs=false) {
70     return $this -> getFormValues($data,$fromDNs);
71   }
72
73   /**
74    * Retourne un tableau des valeurs de l'attribut à partir des valeurs du formulaire
75    *
76    * @param[in] mixed Tableau des valeurs du formulaire
77    * 
78    * @author Benjamin Renard <brenard@easter-eggs.com>
79    *
80    * @retval array  Tableau des valeurs de l'attribut
81    */ 
82   function getValuesFromFormValues($values=NULL) {
83     $retValues = array();
84     if (isset($this -> config['html_options']['selectable_object'])) {
85       $conf=$this -> config['html_options']['selectable_object'];
86       if (!isset($conf['object_type'])) {
87         LSerror :: addErrorCode('LSattr_html_select_object_01',$this -> name);
88         return;
89       }
90       
91       if (!LSsession :: loadLSobject($conf['object_type'])) {
92         return;
93       }
94       
95       if (is_array($values)) {
96         $obj=new $conf['object_type']();
97         foreach($values as $dn => $name) {
98           if ($obj -> loadData($dn)) {
99             if(($conf['value_attribute']=='dn')||($conf['value_attribute']=='%{dn}')) {
100               $val = $dn;
101             }
102             else {
103               $val = $obj -> getValue($conf['value_attribute']);
104               $val = $val[0];
105             }
106             if (empty($val)) {
107               continue;
108             }
109             $retValues[]=$val;
110           }
111         }
112         return $retValues;
113       }
114     }
115     return;
116   }
117
118   /**
119    * Retourne un tableau des objects selectionnés
120    *
121    * @param[in] mixed $values Tableau des valeurs de l'attribut
122    * @param[in] boolean $fromDNs True si les valeurs passées en paramètre sont des DNs
123    * 
124    * @author Benjamin Renard <brenard@easter-eggs.com>
125    *
126    * @retval array Tableau associatif des objects selectionés avec en clé
127    *               le DN et en valeur ce qui sera affiché.
128    */ 
129   function getFormValues($values=NULL,$fromDNs=false) {
130     $retInfos = array();
131     $DNs=array();
132     if (isset($this -> config['html_options']['selectable_object'])) {
133       $conf=$this -> config['html_options']['selectable_object'];
134       if (!isset($conf['object_type'])) {
135         LSerror :: addErrorCode('LSattr_html_select_object_01',$this -> name);
136         return;
137       }
138       
139       if (!LSsession :: loadLSobject($conf['object_type'])) {
140         return;
141       }
142       
143       if (is_array($values)) {
144         if(($conf['value_attribute']=='dn')||($conf['value_attribute']=='%{dn}')||$fromDNs) {
145           $DNs=$values;
146           $obj = new $conf['object_type']();
147           foreach($DNs as $dn) {
148             if($obj -> loadData($dn)) {
149               $retInfos[$dn] = $obj -> getDisplayName($conf['display_name_format']);
150             }
151           }
152         }
153         else {
154           $filters=array();
155           foreach($values as $val) {
156             if (!empty($val)) {
157               $filters[]=Net_LDAP2_Filter::create($conf['value_attribute'],'equals',$val);
158             }
159           }
160           if (!empty($filters)) {
161             $filter=LSldap::combineFilters('or',$filters);
162             if ($filter) {
163               $obj = new $conf['object_type']();
164               $listobj = $obj -> listObjectsName($filter,NULL,array(),$conf['display_name_format']);
165               foreach($listobj as $dn => $name) {
166                 $DNs[]=$dn;
167                 $retInfos[$dn] = $name;
168               }
169             }
170           }
171         }
172       }
173       else {
174         return false;
175       }
176       $_SESSION['LSselect'][$conf['object_type']]=$DNs;
177       return $retInfos;
178     }
179     return false;
180   }
181
182
183   /**
184    * Retourne un tableau des valeurs de l'attribut à partir de la variable session
185    *
186    * @author Benjamin Renard <brenard@easter-eggs.com>
187    *
188    * @retval array Tableau associatif des objects selectionnés avec en clé
189    *               le DN et en valeur ce qui sera affiché.
190    */
191   function getValuesFromSession() {
192     if(is_array($_SESSION['LSselect'][$this -> config['html_options']['selectable_object']['object_type']])) {
193       return $this -> getFormValues($_SESSION['LSselect'][$this -> config['html_options']['selectable_object']['object_type']],true);
194     }
195     return false;
196   }
197
198 }
199
200 /*
201  * Error Codes
202  */
203 LSerror :: defineError('LSattr_html_select_object_01',
204 _("LSattr_html_select_object : LSobject type is undefined (attribute : %{attr}).")
205 );
206
207 ?>