--- /dev/null
+Lanzamiento de Procesos:
+ - nohup
+
+Administrador de Procesos:
+ - Deben correr en baja prioridad
+ - Deben poder correr en varios servidores
+ - Scheduler
+ - Parar procesos
+ - Ver estado de los procesos
+ - Log
+
+Tacho Archivos:
+ - Permiso para bajar los archivos
+ - Quota por persona
+ - Borrar archivos
+ - Mail nuevo archivo
// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4 foldmethod=marker:
return array (
- 'titulo_sistema' => '<TITULO SISTEMA>',
+ 'titulo_sistema' => 'YATTA',
//DIRECTORIOS {{{
//Directorios web del sistema, salvo el root, todos son opcionales
//Si no se ponen, o estan vacias se asume lo que dice el comentario al lado de cada una
- 'directorios' => array ( 'root' => '<SISTEMA Ej: /sistemas/samurai>', // obligatorio
+ 'directorios' => array ( 'root' => '/sistemas/YATTA', // obligatorio
'imagenes' => '', // <root>/images --> Opcional
'estilos' => '', // <root>/css --> Opcional
'js' => '', // <root>/js --> Opcional
'secciones' => array (
//SECCION 1 {{{
array (
- 'nombre' => '<Nombre Seccion>',
- 'imagenComun' => '<IMAGEN>',
+ 'nombre' => 'Consultas de Procesos',
+ 'imagenComun' => 'general_procesos.gif',
'imagenMouseOn' => '', // --> Opcional
'imagenSelect' => '', // --> Opcional
- 'link' => '<Link>',
- 'permisos' => array ( <PERMISOS> ),
- 'tipoMenu' => '<Tipo Menu (Vertical, Horizontal, Oculto)>',
- 'hijos' => array (
- array ( 'nombre' => '<Nombre Subseccion',
- 'imagenComun' => '<IMAGEN>',
- 'imagenMouseOn' => '', // --> Opcional
- 'imagenSelect' => '', // --> Opcional
- 'link' => '<Link>',
- 'permisos' => array ( <PERMISOS> ),
- 'subhijos' => array ( <Links Subhijos> ),
- ),
- ),
- ),
- ),//}}}
+ 'link' => 'consultas',
+ 'permisos' => array (YATTA_PERM_ACCESO),
+// 'tipoMenu' => '<Tipo Menu (Vertical, Horizontal, Oculto)>',
+// 'hijos' => array (
+// array ( 'nombre' => '<Nombre Subseccion',
+// 'imagenComun' => '<IMAGEN>',
+// 'imagenMouseOn' => '', // --> Opcional
+// 'imagenSelect' => '', // --> Opcional
+// 'link' => '<Link>',
+// 'permisos' => array ( <PERMISOS> ),
+// 'subhijos' => array ( <Links Subhijos> ),
+// ),
+// ),
+ ), //}}}
+ //SECCION 2 {{{
+ array (
+ 'nombre' => 'Administracion de Archivos',
+ 'imagenComun' => 'general_admin.gif',
+ 'imagenMouseOn' => '', // --> Opcional
+ 'imagenSelect' => '', // --> Opcional
+ 'link' => 'admin',
+ 'permisos' => array (YATTA_PERM_ACCESO),
+// 'tipoMenu' => '<Tipo Menu (Vertical, Horizontal, Oculto)>',
+// 'hijos' => array (
+// array ( 'nombre' => '<Nombre Subseccion',
+// 'imagenComun' => '<IMAGEN>',
+// 'imagenMouseOn' => '', // --> Opcional
+// 'imagenSelect' => '', // --> Opcional
+// 'link' => '<Link>',
+// 'permisos' => array ( <PERMISOS> ),
+// 'subhijos' => array ( <Links Subhijos> ),
+// ),
+// ),
+ ),//}}}
+ ), //}}}
);
?>
--- /dev/null
+<?php
+// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4 foldmethod=marker:
+// +----------------------------------------------------------------------+
+// | Ministerio De Economia |
+// +----------------------------------------------------------------------+
+// | Archivo generado automaticamente por samurai. |
+// | Definicion de constantes para su uso en los sistemas. |
+// +----------------------------------------------------------------------+
+// $Id$
+
+/** @file
+ * Definicion de Constantes del sistema YATTA
+ */
+
+/**
+ * Identificador del Sistema
+ */
+define('YATTA_PERM', 74);
+
+/**
+ * Identificacion del permiso acceso
+ */
+define('YATTA_PERM_ACCESO', 105);
+
+?>
--- /dev/null
+<?php
+// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4 textwidth=80 foldmethod=marker:
+
+//require_once 'MECON/general.php';
+//prepend_include_path('/home/mmarrese/public_html/meconlib/lib/');
+
+require_once 'DB.php';
+require_once 'MECON/Marco.php';
+require_once 'SAMURAI/Perm.php';
+require_once 'constantes.php'; //Archivo de constantes de SAMURAI
+
+session_start();
+
+//Creo una conexion a la base de datos
+$DB =& DB::connect('mysql://intranet:intranet@bal747f/bandas', true);
+if (DB::isError($DB)) {
+ die ($DB->getMessage());
+}
+//Verifico si el usuario esta logueado
+if (!isset($_SESSION['usuario'])) {
+ header('Location: /sistemas/intranet/login?redirect='.$_SERVER['REQUEST_URI']);
+}
+else {
+//Creo el objeto SAMURAI_PERM
+ $SAMURAI_PERM = new SAMURAI_Perm ($_SESSION['usuario'],
+ YATTA_PERM, $DB);
+ $MARCO =& new MECON_Marco ('/var/www/sistemas/YATTA/sistema/conf/Marco.php',
+ $SAMURAI_PERM);
+}
+?>
--- /dev/null
+<?php /* vim: set binary expandtab tabstop=4 shiftwidth=4 textwidth=80 foldmethod=marker:
+-------------------------------------------------------------------------------
+ Ministerio de Economía
+ YATTA!
+-------------------------------------------------------------------------------
+This file is part of YATTA!.
+
+YATTA! is free software; you can redistribute it and/or modify it under
+the terms of the GNU General Public License as published by the Free
+Software Foundation; either version 2 of the License, or (at your option)
+any later version.
+
+YATTA! is distributed in the hope that it will be useful, but WITHOUT
+ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
+FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License; if not,
+write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
+Boston, MA 02111-1307 USA
+-------------------------------------------------------------------------------
+Creado: jue nov 27 18:58:19 ART 2003
+Autor: Martin Marrese <mmarre@mecon.gov.ar>
+-------------------------------------------------------------------------------
+$Id$
+-----------------------------------------------------------------------------*/
+
+//Require Once {{{
+require_once 'HTML/Table.php';
+require_once 'MECON/HTML/Tabla.php';
+require_once 'MECON/HTML/Image.php';
+require_once 'MECON/HTML/Link.php';
+//}}}
+
+//TODO Este path es el del tacho segun el usuario, etc.
+$path = '/var/www/sistemas/YATTA/test/'. $_SESSION['usuario'];
+
+//TODO Definir la cuota en algun lado (Kb)
+$cuota = 2048;
+
+//TODO Agregar class para manejar los colores y fuentes
+
+//Actuar segun la accion, etc {{{
+$accion = @$_REQUEST['accion'];
+$archivo = @$_REQUEST['archivo'];
+if (@$accion && @$archivo) {
+ $archivo2 = $path.'/'.$archivo;
+ switch ($accion) {
+ case 'borrar':
+ system ('rm '.$archivo2);
+ header ('Location:admin');
+ break;
+ }
+}
+//}}}
+
+//Obtengo la Lista de Archivos del Directorio en Cuestion {{{
+if ($dh = @opendir($path)) {
+ $ocupado =0;
+ while (($file = readdir($dh)) !== false) {
+ if ($file != '.' && $file != '..') {
+ $archivos[$file]['ext'] = strtoupper(substr($file, strrpos($file, '.') + 1));
+ $archivos[$file]['nombre'] = $file;
+ $archivos[$file]['tam'] = round((filesize($path.'/'.$file) / 1024),2);
+ $archivos[$file]['porc'] = round((filesize($path.'/'.$file) / 1024) * 100 /
+ $cuota, 2);
+
+ $ocupado += $archivos[$file]['porc'];
+ }
+ }
+ closedir($dh);
+}
+//}}}
+
+//Tabla de Archivos {{{
+$TABLA_2 =& new MECON_HTML_Tabla ();
+$TABLA_2->addRow(array(
+ 'Lista de Archivos Disponibles'
+ ), 'cabecera colspan="6" align="left"');
+$TABLA_2->addRow(array(
+ 'Ext', 'Nombre', 'Tam. Kb', 'Tam. %', 'Bajar', 'Borrar'
+ ), 'Titulo');
+if (@$archivos) {
+ asort($archivos);
+ foreach ($archivos as $arch) {
+ $TABLA_2->addRow(array(
+ new MECON_HTML_Image ('/MECON/images/EXTENSION_'.$arch['ext'].'.gif', $arch['ext']),
+ $arch['nombre'],
+ $arch['tam'].' Kb',
+ $arch['porc'].' %',
+ new MECON_HTML_Link ('admin_accion', new
+ MECON_HTML_Image('/MECON/images/general_download.gif', 'Bajar'),
+ array (
+ 'accion'=>'download',
+ 'archivo'=>$arch['nombre'],
+ ), 'target="_blank"'),
+ new MECON_HTML_Link ('admin', new MECON_HTML_Image
+ ('/MECON/images/general_eliminar.gif', 'Eliminar'),
+ array (
+ 'accion'=>'borrar',
+ 'archivo'=>$arch['nombre'])
+ , 'OnClick="return confirm(\'Esta Seguro Bestia?\')"'))
+ );
+ }
+ $TABLA_2->addRow(array(
+ '*Recuerde que los archivos se borran a los 7 dias
+ de antiguedad'
+ ), 'colspan="6" align="center" class="msg_rojo"');
+}
+else {
+ $TABLA_2->addRow(array('No se encontraron archivos'), 'colspan="6"
+ class="msg_rojo"');
+}
+$TABLA_2->updateColAttributes(0,'width="5%"');
+$TABLA_2->updateColAttributes(2,'width="10%"');
+$TABLA_2->updateColAttributes(3,'width="10%"');
+$TABLA_2->updateColAttributes(4,'width="8%"');
+$TABLA_2->updateColAttributes(5,'width="8%"');
+//}}}
+
+//Tabla de Espacio Disponible {{{
+$TABLA_1 =& new HTML_Table ('width="100%"');
+$TABLA_1->addRow(array(
+ '<b>Espacio Utilizado: </b>',
+ (@$ocupado) ? $ocupado.' %' : '0'.' %'
+ ));
+$TABLA_1->updateColAttributes(0,'width="95%" align="right"');
+$TABLA_1->updateColAttributes(1,'align="center"');
+if (@$ocupado > 80) {
+ $TABLA_1->updateCellAttributes(0,1,'class="msg_rojo"');
+}
+else {
+ $TABLA_1->updateCellAttributes(0,1,'class="msg_negro"');
+}
+$TABLA_1->updateCellAttributes(0,0,'class="msg_negro"');
+//}}}
+
+//Agrego la info al marco y la muestro {{{
+$MARCO->addBody($TABLA_1);
+$MARCO->addBody('<BR>');
+$MARCO->addBody($TABLA_2);
+$MARCO->addStyleSheet('css/YATTA.css');
+$MARCO->display();
+//}}}
+
+?>
--- /dev/null
+<?php /* vim: set binary expandtab tabstop=4 shiftwidth=4 textwidth=80 foldmethod=marker:
+-------------------------------------------------------------------------------
+ Ministerio de Economía
+ YATTA!
+-------------------------------------------------------------------------------
+This file is part of YATTA!.
+
+YATTA! is free software; you can redistribute it and/or modify it under
+the terms of the GNU General Public License as published by the Free
+Software Foundation; either version 2 of the License, or (at your option)
+any later version.
+
+YATTA! is distributed in the hope that it will be useful, but WITHOUT
+ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
+FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License; if not,
+write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
+Boston, MA 02111-1307 USA
+-------------------------------------------------------------------------------
+Creado: jue nov 27 18:58:19 ART 2003
+Autor: Martin Marrese <mmarre@mecon.gov.ar>
+-------------------------------------------------------------------------------
+$Id$
+-----------------------------------------------------------------------------*/
+
+//Require Once {{{
+require_once 'HTML/Table.php';
+require_once 'MECON/HTML/Tabla.php';
+require_once 'MECON/HTML/Image.php';
+require_once 'MECON/HTML/Link.php';
+//}}}
+
+//TODO Este path es el del tacho segun el usuario, etc.
+$path = '/var/www/sistemas/YATTA/test/'. $_SESSION['usuario'];
+
+//Actuar segun la accion, etc {{{
+$accion = @$_REQUEST['accion'];
+$archivo = @$_REQUEST['archivo'];
+if (@$accion && @$archivo) {
+ $archivo2 = $path.'/'.$archivo;
+ switch ($accion) {
+ case 'download':
+ header("Content-Disposition: attachment; filename=".$archivo);
+ header("Pragma: no-cache");
+ header("Expires: 0");
+ header("Content-Type: application");
+ header("Content-Length: ".filesize($archivo2));
+ readfile ($archivo2);
+ break;
+ }
+}
+//}}}
+?>
--- /dev/null
+<?php /* vim: set binary expandtab tabstop=4 shiftwidth=4 textwidth=80 foldmethod=marker:
+-------------------------------------------------------------------------------
+ Ministerio de Economía
+ YATTA!
+-------------------------------------------------------------------------------
+This file is part of YATTA!.
+
+YATTA! is free software; you can redistribute it and/or modify it under
+the terms of the GNU General Public License as published by the Free
+Software Foundation; either version 2 of the License, or (at your option)
+any later version.
+
+YATTA! is distributed in the hope that it will be useful, but WITHOUT
+ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
+FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License; if not,
+write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
+Boston, MA 02111-1307 USA
+-------------------------------------------------------------------------------
+Creado: jue nov 27 18:58:19 ART 2003
+Autor: Martin Marrese <mmarre@mecon.gov.ar>
+-------------------------------------------------------------------------------
+$Id$
+-----------------------------------------------------------------------------*/
+
+//Require Once {{{
+require_once 'MECON/HTML/TablaDB.php';
+require_once 'MECON/HTML/QuickForm.php';
+//}}}
+
+//Creo el formulario de filtro {{{
+$FORM =& new MECON_HTML_QuickForm ('consultas','get','consultas');
+$FORM->renderer->updateAttributes ('width="350"');
+$FORM->addElement('header', 'cabecera', 'Filtrar Procesos');
+$FORM->addElement('text', 'sistema', 'Sistema', array('size'=>'30'));
+$FORM->addElement('text', 'descripcion', 'Descripcion', array('size'=>'30'));
+$FORM->addElement ('mdate', 'fecha', 'Fecha');
+$FORM->addElement('select', 'status', 'Estado', array(' -- '=>' -- ',
+ 'En_Espera' => 'En Espera', 'Procesando' => 'Procesando',
+ 'Finalizado' => 'Finalizado', 'Error' => 'Error', 'Abortado' =>
+ 'Abortado'));
+$group[] = HTML_QuickForm::createElement('submit', 'aceptar' , 'Filtrar');
+$FORM->addGroup($group,'botones');
+//}}}
+
+//Valido el formulario {{{
+if ($FORM->validate()) {
+ //Creo la tabla de resultados {{{
+ $TABLADB = new MECON_HTML_TablaDB ('Usuarios');
+ $TABLADB->addRow(array(
+ 'Listado de Procesos'
+ ), 'cabecera colspan="4" align="left"');
+ $TABLADB->addRow(array(
+ 'Id', 'Sistema', 'Descripcion', 'Fecha', 'Estado'
+ ),'titulo');
+ //}}}
+
+ //FIXME Buscar la info en la base de datos
+
+ //TODO Si status == Error o Abortado agregar un link que abra un popup con
+ //la expicacion del status
+
+ //Obtengo la info segun los filtros {{{
+ $procesos[17]['id_proceso'] = 17;
+ $procesos[17]['sistema'] = 'Protocolizacion';
+ $procesos[17]['descripcion'] = 'Informe Auditoria - Perez Angel';
+ $procesos[17]['status'] = 'En Espera';
+ $procesos[17]['fecha'] = '27/11/03 11:52:33';
+ $procesos[25]['id_proceso'] = 25;
+ $procesos[25]['sistema'] = 'Protocolizacion';
+ $procesos[25]['descripcion'] = 'Informe Auditoria - Lavagna Roberto';
+ $procesos[25]['status'] = 'Procesando';
+ $procesos[25]['fecha'] = '27/11/03 13:25:05';
+ $procesos[111]['id_proceso'] = 111;
+ $procesos[111]['sistema'] = 'Protocolizacion';
+ $procesos[111]['descripcion'] = 'Informe Personal - Lavagna Roberto';
+ $procesos[111]['status'] = 'Finalizado';
+ $procesos[111]['fecha'] = '27/11/03 19:00:52';
+ //}}}
+
+ //Agrego la informacion a la tabla {{{
+ if (@$procesos) {
+ foreach ($procesos as $proceso) {
+ $TABLADB->addRow(array(
+ $proceso['id_proceso'],
+ $proceso['sistema'],
+ $proceso['descripcion'],
+ $proceso['fecha'],
+ $proceso['status'],
+ ));
+ }
+ }
+ else {
+ $TABLADB->addRow(array(
+ 'No se encontraron procesos'
+ ), 'colspan="4"');
+ }
+ $TABLADB->updateColAttributes(0,'width="8%"');
+ $TABLADB->updateColAttributes(1,'width="30%"');
+ $TABLADB->updateColAttributes(2,'width="35%"');
+ $TABLADB->updateColAttributes(4,'width="10%"');
+ //}}}
+}
+//}}}
+
+//Agrego la info al marco y la muestro {{{
+$MARCO->addStyleSheet('css/YATTA.css');
+$MARCO->addBody($FORM);
+if (@$TABLADB) {
+ $MARCO->addBody('<BR>');
+ $MARCO->addBody($TABLADB);
+}
+$MARCO->display();
+//}}}
+
+?>
--- /dev/null
+/* \r
+// $Id$\r
+*/\r
+\r
+.msg_negro { \r
+ color: #000000; \r
+ font-family: arial, Helvetica, sans-serif; \r
+ font-size: 8pt; \r
+ font-style: normal; \r
+ line-height: normal; \r
+ font-weight: normal \r
+}.msg_rojo { \r
+ color: #FF0000; \r
+ font-family: arial, Helvetica, sans-serif; \r
+ font-size: 8pt; \r
+ font-style: normal; \r
+ line-height: normal; \r
+ font-weight: normal \r
+}\r
--- /dev/null
+<?php /* vim: set binary expandtab tabstop=4 shiftwidth=4 textwidth=80:
+-------------------------------------------------------------------------------
+ Ministerio de Economía
+ YATTA!
+-------------------------------------------------------------------------------
+This file is part of YATTA!.
+
+YATTA! is free software; you can redistribute it and/or modify it under
+the terms of the GNU General Public License as published by the Free
+Software Foundation; either version 2 of the License, or (at your option)
+any later version.
+
+YATTA! is distributed in the hope that it will be useful, but WITHOUT
+ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
+FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License; if not,
+write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
+Boston, MA 02111-1307 USA
+-------------------------------------------------------------------------------
+Creado: @@date
+Autor: @@author
+-------------------------------------------------------------------------------
+$Id$
+-----------------------------------------------------------------------------*/
+$MARCO->display();
+?>
projects / mecon / yatta.git / commitdiff