<?php /* vim: set binary expandtab tabstop=4 shiftwidth=4 textwidth=80:
-------------------------------------------------------------------------------
                             Ministerio de Economía
                                    meconlib
-------------------------------------------------------------------------------
This file is part of meconlib.

meconlib 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.

meconlib 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: Mon Apr 14 16:23:22 2003
Autor:  Martin Marrese <mmarre@mecon.gov.ar>
-------------------------------------------------------------------------------
$Id$
-----------------------------------------------------------------------------*/

require_once 'PEAR.php';
require_once 'MECON/Marco/Copete.php';
require_once 'MECON/Marco/Menu.php';
require_once 'MECON/Marco/MenuPrincipal.php';

//Agregado para el uso de HTML_Page (Uso la version Original de Pear)
require_once 'HTML/Page.php';
require_once 'HTML/Table.php';

//Defino los directorios por default
define ('DIR_IMAGENES', 'images');
define ('DIR_ESTILOS' , 'css'   );
define ('DIR_JS'      , 'js'    );
define ('DIR_WWW'     , 'www'   );
define ('DIR_CACHE'   , '/tmp'  );
//
//Defino las constantes
define ('SCRIPT_DIR_BASE', '/MECON/js/'         );
define ('ESTILO_DIR_BASE', '/MECON/css/'        );
define ('SCRIPT_GENERICO', 'general_script.js'  );
define ('ESTILO_GENERICO', 'general_estilos.css');
//

// +X2C Class 3 :MECON_Marco
/**
 * Clase encargada del manejo del Marco de los sistemas.
 *
 * @package MECON
 * @access public
 */
class MECON_Marco extends HTML_Page {
    /**
     * Array con los datos de configuracion del sistema.
     *
     * @var    array $configuracion
     * @access private
     */
    var $_configuracion;

    /**
     * Mantiene el estado de los espacios
     *
     * @var    bool $espacios
     * @access private
     */
    var $_espacios = true;

    /**
     * Menu vertical para agregar en la pantalla.
     *
     * @var    mixed $menuVertical
     * @access private
     */
    var $_menuVertical = null;

    /**
     * Mantiene el estado de los links en la pagina. (True habilitados, False no)
     *
     * @var    bool $links
     * @access private
     */
    var $_links = true;

    // ~X2C

    // +X2C Operation 26
    /**
     * Constructor. Recibe como parametro el path del archivo de configuracion
     *
     * @param  string $arch_configuracion indicacion de la ubicacion y nombre del archivo de configuracion
     * @param  MECON_Perm $obj_permiso Objeto Permisos
     *
     * @return void
     * @access public
     */
    function MECON_Marco($arch_configuracion, $obj_permiso = null) // ~X2C
    {
        //Creo el objeto pagina
        parent::HTML_Page(array ('doctype'  => 'HTML 4.01 Transitional',
                                 'charset'  => 'iso-8859-1'            ,
                                 'lineend'  => 'unix'                  ,
                                 'language' => 'es'                    ,
                                 'cache'    => 'false'                 ,
                                 'simple'   => 'true'                  ));
        //Obtengo y arreglo la configuracion
        $this->_obtenerConfiguracion($arch_configuracion);
        //Agrego el objeto permiso a la configuracion
        if (@$obj_permiso) {
            $this->_configuracion['obj_permiso'] = $obj_permiso;    
        }
        //Agrego el estilo y el script genericos
        $this->addScript(SCRIPT_DIR_BASE.SCRIPT_GENERICO);
        $this->addStyleSheet(ESTILO_DIR_BASE.ESTILO_GENERICO);
        //Seteo el titulo
        $this->setTitle($this->_configuracion['titulo_sistema']);
    }
    // -X2C

    // +X2C Operation 32
    /**
     * Funcion que se encarga de la obtencion y generacion del array de configuracion. Recibe como parametro el path del archivo de configuracion
     *
     * @param  string $archivo Archivo de configuracion del sistema
     *
     * @return array
     * @access private
     */
    function _obtenerConfiguracion($archivo) // ~X2C
    {
        $this->_configuracion = include $archivo;    
        //Verifico que existan los directorios, si no es asi los reemplazo por los defaults
        if (!@$this->_configuracion['directorios']['root']) {
            trigger_error('Es obligatorio ingresar el directorio root!', E_USER_ERROR); 
        }
        if (!@$this->_configuracion['directorios']['imagenes']){
            $this->_configuracion['directorios']['imagenes'] = $this->_configuracion['directorios']['root'].'/'.DIR_IMAGENES;
        }
        if (!@$this->_configuracion['directorios']['estilos']){
            $this->_configuracion['directorios']['estilos'] = $this->_configuracion['directorios']['root'].'/'.DIR_ESTILOS;
        }
        if (!@$this->_configuracion['directorios']['js']){
            $this->_configuracion['directorios']['js'] = $this->_configuracion['directorios']['root'].'/'.DIR_JS;
        }        
        if (!@$this->_configuracion['directorios']['www']){
            $this->_configuracion['directorios']['www'] = $this->_configuracion['directorios']['root'].'/'.DIR_WWW;
        }        
        if (!@$this->_configuracion['directorios_fs']['cache']){
            $this->_configuracion['directorios_fs']['cache'] = DIR_CACHE;
        }         
    }
    // -X2C


    // +X2C Operation 97
    /**
     * Redefinicion de la funcion que permite agregar objetos o html al body de la pagina
Si es un objeto debe tener un metodo toHtml y opcionalmente puede tener un getCSS.
     *
     * @param  Mixed $body Mixed. Recibe el contenido a agregar como body de la pagina
     *
     * @return void
     * @access public
     */
    function addBody($body) // ~X2C
    {
        if ((is_object($body)) && (method_exists($body, 'getcss'))) {
            $this->addStyleSheet($body->getCSS());
        }
        $this->addBodyContent($body);
    }
    // -X2C

    // +X2C Operation 124
    /**
     * Funcion que permite concatenar lo pasado como parametro al titulo del sistema
     *
     * @param  string $titulo String que se quiere agregar al titulo del sistema
     *
     * @return void
     * @access public
     */
    function addTitle($titulo) // ~X2C
    {
        $this->setTitle($this->_configuracion['titulo_sistema'].' - '.$titulo);
    }
    // -X2C

    // +X2C Operation 207
    /**
     * Setea la variable que define si hay que separar el body del menu
     *
     * @param  bool $espacios Si es verdadero agrega los espacios, sino los elimina
     *
     * @return void
     * @access public
     */
    function setEspacios($espacios = true) // ~X2C
    {
        $this->_espacios = $espacios;
    }
    // -X2C

    // +X2C Operation 214
    /**
     * Agrega un menu vertical a la izquierda en la pantalla.
     *
     * @param  mixed $menuVertical Objeto u Html que representa el menu a mostrar.
     *
     * @return void
     * @access public
     */
    function addMenuVertical($menuVertical) // ~X2C
    {
        if ((is_object($menuVertical)) && (method_exists($menuVertical, 'getcss'))) {
            $this->addStyleSheet($menuVertical->getCSS());
        }
        $this->_menuVertical = $menuVertical;
    }
    // -X2C

    // +X2C Operation 218
    /**
     * Permite habilitar o deshabilitar los links de una pagina (todos)
     *
     * @param  bool $param True habilita los links, False no.
     *
     * @return void
     * @access public
     */
    function habilitarLinks($param = true) // ~X2C
    {
        $this->_links = $param;
    }
    // -X2C

    // +X2C Operation 220
    /**
     * Devuelve el html de la pagina
     *
     * @return string
     * @access public
     */
    function toHTML() // ~X2C
    {
        //Agrego la opcion seleccionada de links a la configuracion 
        $this->_configuracion['links']    = $this->_links;
        //Agrego la opcion seleccionada de espacios a la configuracion 
        $this->_configuracion['espacios'] = $this->_espacios;
        //Creo el menu principal
        $menu = new MECON_Marco_MenuPrincipal ($this->_configuracion);
        //Agrego el contenido de la pagina
        $body = array ( 'body' => $this->_body, 'menuVertical' => $this->_menuVertical);
                                  //Page
        //Agrego el contenido al menu
        $menu->addBody($body);       
        //Agrego el Marco completo a Page
        $this->setBody($menu->toHtml());
        return parent::toHTML();
    }
    // -X2C

} // -X2C Class :MECON_Marco

?>