lib/SAMURAI/HTML/Perfil.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
  24 //REQUIRE ONCE GENERALES {{{
  25 require_once 'SAMURAI/DB.php';
  26 require_once 'SAMURAI/Perm.php';
  27 require_once 'SAMURAI/constantes.php';
  28 require_once 'SAMURAI/Perfil.php';
  29 require_once 'SAMURAI/Sistema.php';
  30 require_once 'SAMURAI/Permiso.php';
  31 require_once 'MECON/HTML/Tabla.php';
  32 require_once 'MECON/HTML/QuickForm.php';
  33 require_once 'MECON/HTML/Error.php';
  34 require_once 'MECON/HTML/Image.php';
  35 require_once 'PEAR.php';
  36 // }}}
  37
  38 // Funciones para agregar la seccion SAMURAI_Perfil en los sistemas.
  39 // Con esto se pueden embeber el abm de perfiles como una seccion/subseccion mas
  40 // de un sistema cualquiera.
  41 // Es necesario para que funcione que se haya realizado un session_start()
  42 // antes, por ejemplo en el prepend.
  43
  44     /**
  45      * Funcion que se encarga agregar los componentes necesarios al sistema para que
  46      * se pueda realizar un abm de perfiles.
  47      * Sin los parametros no funciona
  48      *
  49      * @param MECON_Marco &$MARCO      Referencia al objeto MECON_Marco que se este utilizando en la pagina
  50      * @param int          $id_sistema Identificador del sistema en el cual se esta trabajando
  51      *
  52      * @return void
  53      */
  54 //SAMURAI__HTML_Perfil {{{
  55 function SAMURAI_HTML_Perfil(&$MARCO, $id_sistema) {
  56
  57     $_SESSION['samurai']['id_sistema'] = $id_sistema;
  58     $_SESSION['samurai']['login'] = $_SESSION['usuario'];
  59
  60     //INICIALIZO OBJETOS GENERALES {{{
  61     //REALIZO CONEXION
  62     $tmp = new SAMURAI_DB();
  63     $DB  =& $tmp->connect();
  64     //CREAR EL OBJETO SAMURAI_Perm
  65     $SAMURAI_PERM = new SAMURAI_Perm ($_SESSION['usuario'], $id_sistema, $DB);
  66     //}}}
  67
  68
  69     if (@$_POST['samurai_accion'] == 'abm' || @$_GET['samurai_perfiles'] == 'abm') {
  70         $OPCION = 'abm';
  71     }
  72     elseif (@$_POST['samurai_accion'] == 'nuevo' || @$_GET['samurai_perfiles'] == 'nuevo') {
  73         $OPCION = 'nuevo';
  74     }
  75     else {
  76         $OPCION = 'listado';
  77     }
  78
  79     //POSIBLES ACCIONES
  80     // listado -> Listado de los perfiles ya creados en el sistema.
  81     // nuevo   -> Pantalla de seleccion o de ingreso de un nuevo nombre.
  82     // abm     -> Formulario para la carga de la info del perfil.
  83
  84     //LISTADO {{{
  85     if ($OPCION == 'listado') {
  86         //VEO SI PUEDE ACCEDER{{{
  87         $SAMURAI_PERM->chequear(SAMURAI_ALTA_PERFIL,SAMURAI_BAJA_PERFIL,SAMURAI_MODI_PERFIL);
  88         //}}}
  89         //LINKS {{{
  90             $aHref      = '<a href="'.$_SERVER['PHP_SELF'].'?accion=##ACCION##&id_perfil=##NUEVO##&samurai_perfiles=abm">';
  91             $aHrefModif = $aHref.'<img src="/MECON/images/general_modificar.gif" border="0" alt="Modificar Perfil"></a>';
  92             $aHrefElim  = $aHref.'<img src="/MECON/images/general_eliminar.gif"  border="0" alt="Eliminar Perfil" ></a>';
  93         // }}}
  94         //CREO LOS OBJETOS NECESARIOS {{{
  95             $TABLA2  =& new MECON_HTML_Tabla ('cellspacing=0');
  96             $TABLA   =& new MECON_HTML_Tabla ('cellpadding=2');
  97             $TABLA3  =& new MECON_HTML_Tabla ('cellspacing=0');
  98             $SISTEMA =& new SAMURAI_Sistema($DB, $id_sistema);
  99         // }}}
 100         //OBTENGO LA INFORMACION DE LA BASE {{{
 101             $perfiles = SAMURAI_Perfil::getPerfiles($DB, null, $id_sistema);
 102         // }}}
 103         //AGREGO LOS DATOS A LAS TABLAS {{{
 104             $imagen = new MECON_HTML_Image('/MECON/images/vinetas_flecha_doble.gif');
 105             $row    = array ($imagen->toHtml().'&nbsp;<b>SISTEMA: '.$SISTEMA->getNombre().'</b>');
 106             $TABLA3->addRow($row,'align=left');
 107
 108             //Agrego el link a nuevo
 109             if ($SAMURAI_PERM->tiene(SAMURAI_ALTA_PERFIL)) {
 110                 $row   = array ('<a href="'.$_SERVER['PHP_SELF'].'?samurai_perfiles=nuevo"><img src="/MECON/images/general_nuevo.gif" border="0">Ingresar&nbsp;Nuevo&nbsp;Perfil</a>');
 111                 $TABLA2->addRow($row,'align=right');
 112             }
 113
 114             //Genero la cabecera de la tabla
 115             $row   = array ('Id','Descripcion');
 116             if ($SAMURAI_PERM->tiene(SAMURAI_TIPO_PERFIL)) {
 117                 $row[] = 'Tipo';
 118             }
 119             if ($SAMURAI_PERM->tiene(SAMURAI_MODI_PERFIL)) {
 120                 $row[] = 'Modif.';
 121             }
 122             if ($SAMURAI_PERM->tiene(SAMURAI_BAJA_PERFIL)) {
 123                 $row[] = 'Elim.';
 124             }
 125
 126             $TABLA->addRow($row,'cabecera');
 127             foreach ($perfiles as $perfil) {
 128                 $Modif = ereg_replace('##NUEVO##' , $perfil->getId(), $aHrefModif);
 129                 $Elim  = ereg_replace('##NUEVO##' , $perfil->getId(), $aHrefElim );
 130                 $Modif = ereg_replace('##ACCION##', 'm'             , $Modif     );
 131                 $Elim  = ereg_replace('##ACCION##', 'e'             , $Elim      );
 132                 $row = array ($perfil->getId(), $perfil->getDescripcion());
 133
 134                 if ($SAMURAI_PERM->tiene(SAMURAI_TIPO_PERFIL)) {
 135                     $row[] = $perfil->getTipo();
 136                 }
 137                 if ($SAMURAI_PERM->tiene(SAMURAI_MODI_PERFIL)) {
 138                     $row[] = $Modif;
 139                 }
 140                 if ($SAMURAI_PERM->tiene(SAMURAI_BAJA_PERFIL)) {
 141                     $row[] = $Elim;
 142                 }
 143                 $TABLA->addRow($row);
 144             }
 145         // }}}
 146         //AGREGO LA INFO AL MARCO {{{
 147             $MARCO->addBody($TABLA3);
 148             $MARCO->addBody($TABLA2->toHtml(1));
 149             $MARCO->addBody($TABLA);
 150         //}}}
 151     }
 152     //}}}
 153     //NUEVO {{{
 154     elseif ($OPCION == 'nuevo') {
 155         //VEO SI PUEDE ACCEDER{{{
 156         $SAMURAI_PERM->chequear(SAMURAI_ALTA_PERFIL);
 157         //}}}
 158         //CREO LOS OBJETO NECESARIOS {{{
 159             $FORM    =& new MECON_HTML_QuickForm ('samurai_perfiles','post',$_SERVER['PHP_SELF']);
 160             $SISTEMA =& new SAMURAI_Sistema ($DB, $id_sistema);
 161         // }}}
 162         //AGREGO LOS ELEMENTOS DEL FORM {{{
 163             $FORM->addElement ('hidden', 'samurai_accion', 'nuevo');
 164             $FORM->addElement ('header', 'cabecera'   , 'Nuevo Perfil');
 165             $FORM->addElement ('select', 'perfiles'   , 'Perfiles', '', array('size' => '1'));
 166             $FORM->addElement ('text'  , 'filtro'     , 'Filtrar' , array('size' => '50'));
 167             $FORM->addElement ('text'  , 'descripcion', 'Nombre'  , array('size' => '50'));
 168             $group[] = HTML_QuickForm::createElement('submit', 'continuar', 'Continuar');
 169             $group[] = HTML_QuickForm::createElement('submit', 'filtrar'  , 'Filtrar'  );
 170             $group[] = HTML_QuickForm::createElement('submit', 'cancelar' , 'Cancelar', array ('onClick' => 'javascript:window.location =\''.$_SERVER['PHP_SELF'].'\';return false;') );
 171             $FORM->addGroup($group,'botones');
 172         // }}}
 173         //RESTRINJO EL FORMATO DEL NOMBRE DEL PERFIL{{{
 174             $FORM->addRule ('descripcion', 'El nombre del perfil solo puede contener letras y/o numeros.', 'regex','/^[a-zA-Z0-9 ]+$/');
 175         // }}}
 176         // CARGO LA INFORMACION EN EL SELECT DE PERFILES {{{
 177             $botones     = $FORM->getSubmitValue('botones');
 178             $perfiles    =& $FORM->getElement('perfiles');
 179             $descripcion =& $FORM->getElement('descripcion');
 180             if (@$botones['cancelar']) {
 181                 header('Location: '.$_SERVER['PHP_SELF'].'/');
 182             }
 183             if (!isset($botones['filtrar'])) {
 184                 $PERFILES = SAMURAI_Perfil::getArrayPerfiles($DB);
 185             }
 186             elseif (@$botones['filtrar']) {
 187                 $filtro   =& $FORM->getElement('filtro');
 188                 $PERFILES = SAMURAI_Perfil::getArrayPerfiles($DB, $filtro->getValue());
 189             }
 190             $perfiles->addOption('--', '--');
 191             $perfiles->loadArray($PERFILES);
 192         // }}}
 193         // VALIDO EL FORMULARIO {{{
 194             if ($FORM->validate()) {
 195                 if (@$botones['continuar']) { //Ya selecciono un nombre para el perfil
 196                     $res = '';
 197                     $tmp = $perfiles->getSelected();
 198                     if ((!@$descripcion->getvalue() && $tmp['0'] == '--') || ($descripcion->getvalue() && $tmp['0'] != '--')) {
 199                         $res = new PEAR_Error("Debe seleccionar un perfil del combo o ingresar un nombre en la casilla correspondiente.<br>
 200                                                Solo una de las dos opciones.");
 201                         @$descripcion->setValue('');
 202                     }
 203                     elseif ($tmp['0'] != '--') {
 204                         //verificar que el sistema no tenga una asociacion con ese perfil
 205                         if (SAMURAI_Perfil::existeAsociacion($DB, $tmp['0'], $id_sistema)) {
 206                             $res = new PEAR_Error("El sistema ya tiene asociado el perfil seleccionado,
 207                                                    modifique sus permisos desde la seccion perfiles.");
 208                         }
 209                         else {
 210                             header('Location: '.$_SERVER['PHP_SELF'].'?samurai_perfiles=abm&id_perfil='.$tmp['0']);
 211                         }
 212                     }
 213                     elseif ($descripcion->getValue()) {
 214                         //Verificar que no exista un perfil con la misma descripcion
 215                         //Reduzco los blancos
 216                         $temp = $descripcion->getValue();
 217                         $tt = split (' ', $temp);
 218                         $rta = '';
 219                         foreach ($tt as $t) {
 220                             if ($t != '') {
 221                                 $rta.= $t.' ';
 222                             }
 223                         }
 224                         $rta = rtrim($rta);
 225                         //
 226                         if (SAMURAI_Perfil::existePerfil($DB, $rta)) {
 227                             $res = new PEAR_Error("Ya existe un perfil con ese nombre, seleccionelo del combo.<br>
 228                                                    Recuerde que varios espacios se reduciran a uno solo
 229                                                    (Ej: Agregar&nbsp;&nbsp;&nbsp;&nbsp; Usuario -> Agregar Usuario)");
 230                         }
 231                         else {
 232                             $temp = ereg_replace(' ' , '%20', $rta); //Cambio los espacios por %20 para que no chille el netscape
 233                             header('Location: '.$_SERVER['PHP_SELF'].'?samurai_perfiles=abm&desc_perfil='.$temp);
 234                         }
 235                     }
 236                     if (PEAR::isError($res)) {
 237                         $TABLA = new MECON_HTML_Tabla ('cellspacing=0');
 238                         $row = array ('<font color="red"><b>'.$res->getMessage().'</b></font>');
 239                         $TABLA->addRow($row,'align=left');
 240                     }
 241                 }
 242             }
 243         // }}}
 244         //AGREGO LA INFO AL MARCO {{{
 245         //AGREGO LOS DATOS A LAS TABLAS {{{
 246             $TABLA3 = new MECON_HTML_Tabla ('cellspacing=0');
 247             $imagen = new MECON_HTML_Image('/MECON/images/vinetas_flecha_doble.gif');
 248             $row    = array ($imagen->toHtml().'&nbsp;<b>SISTEMA: '.$SISTEMA->getNombre().'</b>');
 249             $TABLA3->addRow($row,'align=left');
 250         //}}}
 251             $MARCO->addBody($TABLA3);
 252             if (isset($TABLA)) {
 253                 $MARCO->addBody($TABLA);
 254             }
 255             $MARCO->addBody($FORM);
 256         //}}}
 257     }
 258     //}}}
 259     //ABM {{{
 260     elseif ($OPCION == 'abm') {
 261         //VEO SI PUEDE ACCEDER{{{
 262         $SAMURAI_PERM->chequear(SAMURAI_ALTA_PERFIL,SAMURAI_BAJA_PERFIL,SAMURAI_MODI_PERFIL);
 263         //}}}
 264         //CREO LOS OBJETO NECESARIOS {{{
 265             if (@$_GET['id_perfil']) {
 266                 $id_perfil = $_GET['id_perfil'];
 267             }
 268             elseif (@$_POST['id_perfil']) {
 269                 $id_perfil = $_POST['id_perfil'];
 270             }
 271             else {
 272                 $id_perfil = null;
 273             }
 274             $FORM    =& new MECON_HTML_QuickForm ('samurai_perfiles','post',$_SERVER['PHP_SELF']);
 275             $SISTEMA =& new SAMURAI_Sistema ($DB, $id_sistema);
 276             $PERFIL  =& new SAMURAI_Perfil ($DB, $id_perfil);
 277
 278             if ($PERFIL->getResponsable()) {
 279                 $responsable = $PERFIL->getResponsable();
 280             }
 281             else {
 282                 $responsable = $_SESSION['usuario'];
 283             }
 284
 285             if (!@$_GET['id_perfil']) {
 286                 if (@$_GET['desc_perfil']) {
 287                     $PERFIL->setDescripcion(@$_GET['desc_perfil']);
 288                 }
 289                 else {
 290                     $PERFIL->setDescripcion(@$_POST['desc_ant']);
 291                 }
 292             }
 293             $descripcion = $PERFIL->getDescripcion();
 294         // }}}
 295         //OBTENGO LOS PERMISOS DEL SISTEMA {{{
 296             $ASOCIACIONES = $SISTEMA->getAsociaciones();
 297             $PERMISOS = array ();
 298             foreach ($ASOCIACIONES as $as) {
 299                 $clave = $as['id'].'##'.$as['obs'];
 300                 $texto = ($as['obs'] != '') ? $as['desc'].' - '.$as['obs']: $as['desc'];
 301                 $PERMISOS[$clave] = $texto;
 302             }
 303         // }}}
 304         //AGREGO LOS ELEMENTOS DEL FORM {{{
 305             if (@$PERMISOS) {
 306                 $FORM->addElement ('hidden', 'samurai_accion', 'abm');
 307                 $FORM->addElement ('header', 'cabecera', 'ABM Perfiles');
 308                 $FORM->addElement ('hidden', 'id_perfil', $id_perfil);
 309                 $FORM->addElement ('hidden', 'desc_ant'   , $descripcion);
 310                 $FORM->addElement ('static', 'desc_perfil', 'Descripcion', $descripcion);
 311                 $FORM->addElement ('select', 'permisos'   , 'Permisos'   , $PERMISOS, array('size' => '5', 'multiple' => 'true'));
 312                 if ($SAMURAI_PERM->tiene(SAMURAI_TIPO_PERFIL)) {
 313                     $FORM->addElement ('select', 'tipo_perfil', 'Tipo Perfil', array('E' => 'Externo', 'I' => 'Interno', 'D' => 'Dios'), array ('size' => '1'));
 314                 }
 315                 $FORM->addElement ('hidden', 'responsable', $responsable);
 316                 $group[] = HTML_QuickForm::createElement('submit', 'aceptar' , 'Grabar');
 317                 $group[] = HTML_QuickForm::createElement('submit', 'cancelar', 'Cancelar', array ('onClick' => 'javascript:window.location=\''.$_SERVER['PHP_SELF'].'\';return false;'));
 318                 $FORM->addGroup($group,'botones');
 319             }
 320             else {
 321                 $ERROR = new MECON_HTML_Error('El sistema no posee permisos asociados.');
 322             }
 323         // }}}
 324         //AGREGO LAS REGLAS DE VALIDACION {{{
 325             $FORM->addRule ('permisos', 'Se debe seleccionar al menos un permiso', 'required');
 326         // }}}
 327         //CARGO LOS DATOS SI YA EXISTEN EN BASE {{{
 328             if (isset($_GET['accion']) && $_GET['accion'] != '') {
 329                 //MODIFICACION
 330                 $id_perfil    =& $FORM->getElement  ('id_perfil'  );
 331                 $desc_perfil  =& $FORM->getElement  ('desc_perfil');
 332                 $permisos     =& $FORM->getElement  ('permisos'   );
 333
 334                 if ($SAMURAI_PERM->tiene(SAMURAI_TIPO_PERFIL)) {
 335                     $tipo_perfil  =& $FORM->getElement  ('tipo_perfil');
 336                 }
 337                 $responsable  =& $FORM->getElement  ('responsable');
 338                 $group        =& $FORM->getElement  ('botones'    );
 339                 $group        =& $group->getElements('aceptar'    );
 340                 $aceptar      =& $group[0];
 341
 342                 $permisos->setSelected($PERFIL->getPermisos());
 343
 344                 if ($SAMURAI_PERM->tiene(SAMURAI_TIPO_PERFIL)) {
 345                     $tipo_perfil->setSelected($PERFIL->getTipo());
 346                 }
 347
 348                 if ($PERFIL->getResponsable() != '') {
 349                     $responsable->setValue($PERFIL->getResponsable());
 350                 }
 351
 352                 //Modifico el valor del boton
 353                 $aceptar->setValue('Modificar');
 354
 355                 //ELIMINACION -> modifico el valor del boton
 356                 if ($_GET['accion'] == 'e') {
 357                     $aceptar->setValue('Eliminar');
 358                     $aceptar->updateAttributes(array ('onClick' => 'javascript:if (confirm(\'¿Esta Seguro?\')) return true;return false;'));
 359                     $FORM->freeze();
 360                 }
 361             }
 362         // }}}
 363         //VALIDO EL FORMULARIO {{{
 364             if ($FORM->validate()) {
 365                 // VEO SI SE CANCELO {{{
 366                 $botones = $FORM->getSubmitValue('botones');
 367                 if (@$botones['cancelar']) {
 368                     header('Location: '.$_SERVER['PHP_SELF']);
 369                 }
 370                 // }}}
 371                 else {
 372                     $samurai_accion =& $FORM->getElement('samurai_accion');
 373                     $samurai_accion->setValue('listado');
 374                     $id_perfil    =& $FORM->getElement  ('id_perfil'  );
 375                     $desc_perfil  =& $FORM->getElement  ('desc_perfil');
 376                     $permisos     =& $FORM->getElement  ('permisos'   );
 377
 378                     if ($SAMURAI_PERM->tiene(SAMURAI_TIPO_PERFIL)) {
 379                         $tipo_perfil  =& $FORM->getElement  ('tipo_perfil');
 380                         $tipo_perfil_tmp  =  $tipo_perfil->getSelected();
 381                     }
 382                     $responsable  =& $FORM->getElement  ('responsable');
 383                     $group        =& $FORM->getElement  ('botones'    );
 384                     $group        =& $group->getElements('aceptar'    );
 385                     $aceptar      =& $group[0];
 386
 387                     $PERFIL->setDescripcion($desc_perfil->_text     );
 388                     $PERFIL->setResponsable($responsable->getValue());
 389                     $PERFIL->setPermisos   ($permisos->getSelected()); //Le asigno al perfil los permisos seleccionados
 390
 391                     if ($SAMURAI_PERM->tiene(SAMURAI_TIPO_PERFIL)) {
 392                         $PERFIL->setTipo($tipo_perfil_tmp['0']);
 393                     }
 394
 395                     //Grabo y verifico si se produjo algun error
 396                     $res = $PERFIL->guardarDatos($aceptar->getValue());
 397
 398                     if (PEAR::isError($res)) {
 399                         $ERROR = new MECON_HTML_Error($res->getMessage());
 400                         if ($aceptar->getValue() == 'Eliminar') {
 401                             $FORM->freeze();
 402                         }
 403                     }
 404                     else {
 405                         $FORM->freeze();
 406                         header('Location: '.$_SERVER ['PHP_SELF'].'/');
 407                         exit;
 408                     }
 409                 }
 410             }
 411         // }}}
 412         //DIBUJO LA PAGINA {{{
 413             $imagen = new MECON_HTML_Image('/MECON/images/vinetas_flecha_doble.gif');
 414             $row    = array ($imagen->toHtml().'&nbsp;<b>SISTEMA: '.$SISTEMA->getNombre().'</b>');
 415             $TABLA3 = new MECON_HTML_Tabla ('cellspacing=0');
 416             $TABLA3->addRow($row,'align=left');
 417
 418             $MARCO->addBody($TABLA3);
 419             if (isset($ERROR)) {
 420                 $MARCO->addBody($ERROR);
 421             }
 422             $MARCO->addBody($FORM);
 423     //}}}
 424     }
 425     //}}}
 426 }
 427 ?>