]> git.llucax.com Git - mecon/samurai.git/blob - lib/SAMURAI/HTML/Usuario.php
Cambios varios para que funcione bien con Netscape (Aunque ya no se si es asi)
[mecon/samurai.git] / lib / SAMURAI / HTML / Usuario.php
1 <?php
2 // vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4 foldmethod=marker textwidth=80:
3 // +----------------------------------------------------------------------+
4 // | PHP Version 4                                                        |
5 // +----------------------------------------------------------------------+
6 // | Copyright (c) 1997-2003 The PHP Group                                |
7 // +----------------------------------------------------------------------+
8 // | This source file is subject to version 2.02 of the PHP license,      |
9 // | that is bundled with this package in the file LICENSE, and is        |
10 // | available at through the world-wide-web at                           |
11 // | http://www.php.net/license/2_02.txt.                                 |
12 // | If you did not receive a copy of the PHP license and are unable to   |
13 // | obtain it through the world-wide-web, please send a note to          |
14 // | license@php.net so we can mail you a copy immediately.               |
15 // +----------------------------------------------------------------------+
16 // | Created: mar ago 26 13:18:26 ART 2003
17 // | Author:  Martin Marrese <mmarre@mecon.gov.ar>
18 // +----------------------------------------------------------------------+
19 //
20 // $Id$
21 //
22
23 //REQUIRE ONCE {{{
24     require_once 'MECON/HTML/QuickForm.php';
25     require_once 'MECON/HTML/Error.php';
26     require_once 'MECON/HTML/Tabla.php';
27     require_once 'MECON/HTML/Image.php';
28     require_once 'SAMURAI/Perm.php';
29     require_once 'SAMURAI/Perfil.php';
30     require_once 'SAMURAI/Usuario.php';
31     require_once 'SAMURAI/Sistema.php';
32     require_once 'SAMURAI/constantes.php';
33 //}}}
34
35 // Funciones para agregar la seccion SAMURAI_Usuario en los sistemas.
36 // Con esto se pueden embeber el abm de usuarios como una seccion/subseccion mas
37 // de un sistema cualquiera.
38
39 /**
40  * Funcion que se encarga agregar los componentes necesarios al sistema para que
41  * se pueda realizar un abm de usuarios.
42  *
43  * @param MECON_Marco &$MARCO      Referencia al objeto MECON_Marco que se este
44  *                                 utilizando en la pagina
45  * @param int          $id_sistema Identificador del sistema en el cual se esta
46  *                                 trabajando
47  *
48  * @return void
49  */
50 //SAMURAI_HTML_Usuario {{{
51 function SAMURAI_HTML_Usuario(&$MARCO, $id_sistema) {
52
53     $_SESSION['samurai']['id_sistema'] = $id_sistema;
54     $_SESSION['samurai']['login'] = $_SESSION['usuario'];
55
56     //INICIALIZO OBJETOS GENERALES {{{
57     //REALIZO CONEXION
58     $tmp = new SAMURAI_DB();
59     $DB  =& $tmp->connect();
60     //CREAR EL OBJETO SAMURAI_Perm
61     $SAMURAI_PERM = new SAMURAI_Perm ($_SESSION['usuario'], $id_sistema, $DB);
62     //}}}
63     //VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{
64     $SAMURAI_PERM->chequear(SAMURAI_ALTA_USUARIO, SAMURAI_BAJA_USUARIO, SAMURAI_MODI_USUARIO);
65     //}}}
66     
67     if (@$_POST['samurai_accion'] == 'abm' || @$_GET['samurai_usuarios'] == 'abm') {
68         $OPCION = 'abm';
69     }
70     else {
71         $OPCION = 'listado';
72     }
73
74     //POSIBLES ACCIONES
75     // listado -> Listado de los usuarios ya creados en el sistema.
76     // abm     -> Formulario para la carga de la info del usuario.
77     //LISTADO {{{
78     if ($OPCION == 'listado') {
79         //LINKS {{{
80             $aHref      = '<a href="'.$_SERVER['PHP_SELF'].'?samurai_usuarios=abm&accion=##ACCION##&login=##NUEVO##">';
81             $aHrefModif = $aHref.'<img src="/MECON/images/general_modificar.gif" border="0" alt="Modificar Usuario"></a>';
82             $aHrefElim  = $aHref.'<img src="/MECON/images/general_eliminar.gif"  border="0" alt="Eliminar Usuario" ></a>';
83         // }}}
84         //CREO LOS OBJETOS NECESARIOS {{{
85             $TABLA2 = new MECON_HTML_Tabla ('cellspacing=0');
86             $TABLA  = new MECON_HTML_Tabla ('cellpadding=2');
87             $TABLA3 = new MECON_HTML_Tabla ('cellspacing=0');
88             $SISTEMA = new SAMURAI_Sistema($DB, $id_sistema);
89         // }}}
90         //OBTENGO LA INFORMACION DE LA BASE {{{
91             $usuarios = SAMURAI_Usuario::getUsuarios($DB, $id_sistema);
92         // }}}
93         //AGREGO LOS DATOS A LAS TABLAS {{{
94             $imagen = new MECON_HTML_Image('/MECON/images/vinetas_flecha_doble.gif');
95             $row    = array ($imagen->toHtml().'&nbsp;<b>SISTEMA: '.$SISTEMA->getNombre().'</b>');
96             $TABLA3->addRow($row,'align=left');    
97
98             //Agrego el link a nuevo
99             if ($SAMURAI_PERM->tiene(SAMURAI_ALTA_USUARIO)) {
100                 $row   = array ($aHref.'<img src="/MECON/images/general_nuevo.gif" border="0">Agregar Nuevo Usuario</a>');
101                 $TABLA2->addRow($row,'align=right');    
102             }
103             //Genero la cabecera de la tabla
104             $row  = array ('Login','Nombre');
105             if ($SAMURAI_PERM->tiene(SAMURAI_MODI_USUARIO)) {
106                 $row[] = 'Modif.';
107             }
108             if ($SAMURAI_PERM->tiene(SAMURAI_BAJA_USUARIO)) {
109                 $row[] = 'Elim.';
110             }
111             $TABLA->addRow($row,'cabecera');
112             foreach ($usuarios as $usuario) {
113                 $Modif = ereg_replace('##NUEVO##' , $usuario->getLogin(), $aHrefModif);
114                 $Elim  = ereg_replace('##NUEVO##' , $usuario->getLogin(), $aHrefElim );
115                 $Modif = ereg_replace('##ACCION##', 'm'                 , $Modif     );
116                 $Elim  = ereg_replace('##ACCION##', 'e'                 , $Elim      );
117                 $row = array ($usuario->getLogin(), $usuario->getNombre());
118                 if ($SAMURAI_PERM->tiene(SAMURAI_MODI_USUARIO)) {
119                     $row[] = $Modif;
120                 }
121                 if ($SAMURAI_PERM->tiene(SAMURAI_BAJA_USUARIO)) {
122                     $row[] = $Elim;
123                 }
124
125                 $TABLA->addRow($row);
126             }
127         // }}}
128         //DIBUJO LA PAGINA {{{
129             $MARCO->addBody($TABLA3);
130             $MARCO->addBody($TABLA2->toHtml(1));
131             $MARCO->addBody($TABLA);
132         // }}}
133     }
134     //}}}
135     //ABM {{{
136     elseif ($OPCION == 'abm') {
137         //CREO LOS OBJETOS NECESARIOS {{{
138             if (@$_GET['login']) {
139                 $login = $_GET['login'];
140                 $validar = 0;
141             }
142             else {
143                 $validar = 1;
144                 $login = null;
145             }
146             $TABLA   = new MECON_HTML_Tabla ('cellspacing=0');
147             $FORM    = new MECON_HTML_QuickForm ('samurai_usuarios','post', $_SERVER['PHP_SELF']);
148             $SISTEMA = new SAMURAI_Sistema($DB, $id_sistema);
149             $USUARIO = new SAMURAI_Usuario($DB, $login);
150         // }}}
151         //OBTENGO LOS DATOS DE LA BASE {{{
152             $tmps = SAMURAI_Perfil::getPerfiles($DB, null, $id_sistema);
153             foreach ($tmps as $tmp) {
154                 $PERFILES[$tmp->getId()] = $tmp->getDescripcion();
155             }
156         //}}}
157         //AGREGO LOS DATOS A LAS TABLAS {{{
158             $imagen = new MECON_HTML_Image('/MECON/images/vinetas_flecha_doble.gif');
159             $row    = array ($imagen->toHtml().'&nbsp;<b>SISTEMA: '.$SISTEMA->getNombre().'</b>');
160             $TABLA->addRow($row,'align=left');    
161         //}}}
162         //AGREGO LOS ELEMENTOS DEL FORM {{{
163             if (@$PERFILES) {
164                 $FORM->addElement ('hidden', 'samurai_accion', 'abm');
165                 $FORM->addElement ('header', 'cabecera'   , 'ABM Usuarios');
166                 if ($login) { //Si esta el login solo permito modificar los perfiles asociados
167                     $FORM->addElement ('static', 'login2', 'Login@Organismo' , $login );
168                     $FORM->addElement ('hidden', 'login' , $login );
169                     $FORM->addElement ('static', 'nombre', 'Nombre', $USUARIO->getNombre());
170                 }
171                 else {
172                     $FORM->addElement ('text'  , 'login' , 'Login@Organismo' , array( 'value' => $login , 'size' => '20'));
173                 }
174                 $FORM->addElement ('select', 'perfiles'   , 'Perfiles', $PERFILES, array('size' => '5', 'multiple' => 'true'));
175                 $FORM->addElement ('hidden', 'responsable', $_SESSION['samurai']['login']);
176                 $group[] = HTML_QuickForm::createElement('submit', 'aceptar' , 'Grabar');
177                 $group[] = HTML_QuickForm::createElement('submit', 'cancelar', 'Cancelar', array ('onClick' => 'javascript:window.location = \''.$_SERVER['PHP_SELF'].'\';return false;'));
178                 $FORM->addGroup($group,'botones');
179             }
180             else {
181                 $ERROR = new MECON_HTML_Error('El sistema no posee perfiles.');
182             }
183         // }}}
184         //AGREO LAS REGLAS DE VALIDACION {{{
185             if (@$PERFILES) {
186                 if (@$validar) {
187                     $FORM->addRule ('login', 'Se debe ingresar el login del usuario', 'required');
188                 }
189                 $FORM->addRule ('perfiles', 'Se debe seleccionar al menos un perfil', 'required');
190             }
191         // }}}
192         //SETEO LOS PERFILES SELECCIONADOS {{{
193             if (isset($_GET['accion']) && $_GET['accion'] != '') {
194                 $perfiles =& $FORM->getElement  ('perfiles');
195                 $group    =& $FORM->getElement  ('botones' );
196                 $group    =& $group->getElements('aceptar' );
197                 $aceptar  =& $group[0];
198                 
199                 $perfiles->setSelected($USUARIO->getPerfiles());
200                 
201                 //Modifico el valor del boton
202                 $aceptar->setValue('Modificar');
203                     
204                 //ELIMINACION -> modifico el valor del boton
205                 if ($_GET['accion'] == 'e') {
206                     $aceptar->updateAttributes(array ('onClick' => 'javascript:if (confirm(\'¿Esta Seguro?\')) return true;return false;'));
207                     $aceptar->setValue('Eliminar');
208                     $FORM->freeze();
209                 }
210             }
211         // }}}
212         //VALIDO EL FORMULARIO {{{
213             if ($FORM->validate()) {
214                 // VEO SI SE CANCELO {{{
215                 $botones = $FORM->getSubmitValue('botones');
216                 if (@$botones['cancelar']) {
217                     header('Location: '.$_SERVER['PHP_SELF'].'/');
218                 }
219                 // }}}
220                 else {
221                     $login2   =& $FORM->getElement  ('login'   ); 
222                     $nombre   =& $FORM->getElement  ('nombre'  );
223                     $perfiles =& $FORM->getElement  ('perfiles');
224                     $group    =& $FORM->getElement  ('botones' );
225                     $group    =& $group->getElements('aceptar' );
226                     $aceptar  =& $group[0];
227                     $res = '';
228
229                     if ($login) {
230                         $login3 = $login2->_text;
231                     }
232                     else {
233                         $login3 = $login2->getValue();
234                     }
235                     $USUARIO->setLogin($login3);
236                     $res  = $USUARIO->verificarLogin();
237                     if ($aceptar->getValue() == 'Grabar') {
238                         $res2 = $USUARIO->verificarAsociacionExistente();
239                     }
240                     if (@PEAR::isError($res)) {
241                         $ERROR = new MECON_HTML_Error($res->getMessage());
242                     }
243                     elseif (@PEAR::isError($res2)) {
244                         $ERROR =new MECON_HTML_Error($res2->getMessage());
245                     }
246                     else {
247                         $USUARIO->setPerfiles($perfiles->getSelected());
248
249                         $res = $USUARIO->guardarDatos($aceptar->getValue());
250
251                         if (PEAR::isError($res)) {
252                             $ERROR = new MECON_HTML_Error($res->getMessage());
253                             if ($aceptar->getValue() == 'Eliminar') {
254                                 $FORM->freeze();
255                             }
256                         }
257                         else {
258 //                            $FORM->removeElement();
259                             $FORM->freeze();
260                             header('Location: '.$_SERVER['PHP_SELF'].'/');
261                         }
262                     }
263                 }
264             }
265         // }}}
266         //DIBUJO LA PAGINA {{{
267             $MARCO->addBody($TABLA);
268             if (isset($ERROR)) {
269                 $MARCO->addBody($ERROR);
270             }
271             $MARCO->addBody($FORM);
272         // }}}
273     }
274     //}}}
275     
276 }
277 //}}}
278 ?>