<?php
/**
 * Copyright 2005-2017 de Solis Soluções Livres Ltda.
 *
 * Este arquivo é parte do programa Gnuteca.
 *
 * O Gnuteca é um software de propriedade da SOLIS, sendo desenvolvido
 * e mantido exclusivamente por esta empresa.
 *
 * A licença de uso está disponível mediante aquisição exclusiva junto à
 * SOLIS. A licença é concedida sem caráter de exclusividade ao licenciado.
 * Os direitos de uso são perpétuos.
 *
 * Embora os códigos fontes sejam fornecidos, o software é de propriedade
 * da SOLIS, não sendo permitido ao adquirente da licença a sua revenda,
 * empréstimo ou cessão (onerosa ou não) à terceiros. Também não é permitido,
 * a qualquer título e tempo, promover no software qualquer tipo de alienação,
 * reprodução, distribuição, divulgação, registro, licenciamento, transferência
 * ou qualquer outro ato que prejudique ou comprometa os direitos de propriedade
 * de software, o nome e a imagem da sua proprietária e do próprio software,
 * além de configurar concorrência à SOLIS.
 *
 * O licenciado, com o acesso ao código fonte do software, terá o direito de
 * promover mudanças no respectivo código. No entanto, nas situações em que ele
 * contar com o suporte oficial prestado pela SOLIS, não poderá promover mudanças
 * no código fonte, sob pena de perda do referido suporte.
 *
 * Para conhecer em detalhes o Termo de Licenciamento do Software Gnuteca
 * leia o arquivo “LICENCA.txt” disponível junto ao código deste software.
 * 
 * 
 * Classe para lidar com servidor Zebra, Z3950
 *
 *
 *
 *
 *
 **/
class GZebra
{
    protected $options;
    
    /**
     * Retorna o conteúdo do arquivo de log
     * 
     * @return GString 
     */
    public function getLog()
    {
        return new GString( file_get_contents( $this->getLogPath() ) );
    }
    
    /**
     * Retorna o caminho do arquivo de log
     */
    public function getLogPath()
    {
        $MIOLO = MIOLO::getInstance();
        $log = $MIOLO->getConf('home.logs');
        return $log.'/zebrasrv.log';
    }
    
    /**
     * Retorna a data da última operação do servidor
     */
    public function getLastLogDate()
    {
        $log = $this->getLog();
        
        //array_filter tira linhas em branco        
        $log = array_filter( $log->explode("\n") ); 
        
        //pega última linha
        $lastLine = $log[ count($log)-1 ];

        //obtem a data formatada
        $date = substr($lastLine,9,5) . '/'. date('Y') .' ' . substr($lastLine,0,8);
        $date = new GDate( $date );
        
        return $date;
    }
    
    public function isRunning()
    {
        $lastDate = $this->getLastLogDate();
        
        return  $lastDate == GDate::now();        
    }
    
    /**
     * Inicia o servidor zebra
     * FIXME não funciona
     * @deprecated
     */
    public function startServer()
    {
        if ( $this->isRunning() )
        {
            return false;            
        }
        
        $result = shell_exec( $this->getServerStartCommand() );
        
        return $result;
    }
    
    /**
     * Retorna o commando de iniciação do servidor
     * 
     * @return string
     */
    public function getServerStartCommand()
    {
        //-D daemon, segundo plano
        //-c arquivo de configuração
        //-l log em arquivo
        //-w define o caminho onde a base de dados ficará guardada
        //& faz o executar persistir
        
        $confPath = BusinessGnuteca3BusFile::getAbsoluteFilePath('zebra','zebra.cfg');
        $host = Z3950_SERVER_URL;
        $databaseFolder = BusinessGnuteca3BusFile::getAbsoluteFilePath('zebra');
        $logPath = $this->getLogPath();
        return "zebrasrv {$host} -D -c '{$confPath}' -l '{$logPath}' -w '{$databaseFolder}'";
    }
    
    /**
     * Remove os arquivos da base de dados do servidor Zebra
     * 
     * @return boolean
     */
    public function deleteDatabase()
    {
        $MIOLO = MIOLO::getInstance();
        $busFile = $MIOLO->getBusiness('gnuteca3','BusFile');
        $busFile->folder= 'zebra';
        $files = $busFile->searchFile(true);
        
        if ( is_array( $files ) )
        {
            foreach ( $files as $line => $file )
            {
                if ( ! ( $file->basename == "zebra.cfg" || $file->basename == "passwordfile") )
                {
                    if ( is_writable( $file->absolute ) )
                    {
                        unlink( $file->absolute );
                    }
                    else
                    {
                        return false;
                    }
                }
            }
        }
        
        return true;
    }
}
?>