<?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 WebService para o aplicativo de biblioteca.
 *
 *
 *
 *
 *
 * 
 **/

include("GnutecaWebServices.class.php");

class gnuteca3WebServicesAplicativo
{
    private $webService;
    
    /* Instanciar atributos */
    public function __construct() 
    {
        $this->webService = new GWebServices();
    }
    
    /**
     * Webservice para renovacao de emprestimo.
     *
     * @param int $clientId Codigo do cliente SOAP.
     * @param string $clientPassword Senha do cliente SOAP.
     * @param int $personId Codigo do usuario.
     * @param string $itemNumber Numero do tombo do exemplar.
     *
     * @return string
     */
    public function renewLoan($clientId, $clientPassword, $personId, $itemNumber)
    {
        $retorno = new stdClass();
        $retorno->itemNumber = $itemNumber;
        $retorno->return = false;
        $retorno->returnForecastDate = '';
        $retorno->message = '';
        
        // Checa acesso ao método.
        $this->webService->__setClient($clientId, $clientPassword);
        
        // Define classe Werbservice.
        $this->webService->setClassName(get_class($this));
        
        // Verifica se usuário possuí acesso ao WebService.
        if ( !$this->webService->__checkMethod("renewLoan", false) )
        {
            $retorno->message = $this->webService->__getErrorStr();
        }
        else
        {
            $MIOLO = MIOLO::getInstance();
            $busOperationRenew = $MIOLO->getBusiness('gnuteca3', 'BusOperationRenew');

            $busOperationRenew->setRenewType( ID_RENEWTYPE_APP );
            $busLoan = $MIOLO->getBusiness('gnuteca3', 'BusLoan');

            // Obtém empréstimo aberto para do usuário e exemplar.
            $loan = $busLoan->getLoanOpen($itemNumber);

            if ( $loan )
            {
                // Define como data prevista a data atual de devolução.
                $returnForecastDate = explode(' ', $loan->returnForecastDate);
                $retorno->returnForecastDate = $returnForecastDate[0];

                $loanId = $loan->loanId;

                $busOperationRenew->clearMessages();          
                
                // Verifica se é possível renovar. CHECADO manualmente, para verificar se o empréstimo é realmente do usuário.
                $check = $busOperationRenew->checkLoan($loanId, $personId);

                if ( $check )
                {
                    $busOperationRenew->addLoan($loan);

                    $busPersonConfig = $MIOLO->getBusiness('gnuteca3', 'BusPersonConfig');
                    
                    // Define se será enviado recibo de renovação.
                    $sendReceipt = MUtil::getBooleanValue( $busPersonConfig->getValuePersonConfig($personId, 'USER_SEND_RECEIPT_RENEW_WEB') );
                    
                    // Finaliza renovação.
                    $ok = $busOperationRenew->finalize(null, $sendReceipt, false );
                    
                    // Gera e envia recibo.
                    $busOperationRenew->receipt->generate();

                    // Obtém nova data prevista de devolução e define sucesso.
                    if ( $ok )
                    {
                        $retorno->return = true;
                        $loan = $busLoan->getLoanOpen($itemNumber);

                        // Define a nova data prevista de devolução.
                        $returnForecastDate = explode(' ', $loan->returnForecastDate);
                        $retorno->returnForecastDate = $returnForecastDate[0];
                    }
                }
                
                $retorno->message = $busOperationRenew->messagesToString($retorno->return ? GMessages::TYPE_INFORMATION : GMessages::TYPE_ERROR, ' ', true);
            }
            else
            {
                $retorno->message = _M('Empréstimo não localizado.', 'gnuteca3');
            }
        }
        
        return json_encode($retorno);
    }
    
    /**
     * Webservice para renovacao de todos emprestimos.
     *
     * @param int $clientId Codigo do cliente SOAP.
     * @param string $clientPassword Senha do cliente SOAP.
     * @param int $personId Codigo do usuario.
     *
     * @return string
     */
    public function renewAllLoan($clientId, $clientPassword, $personId)
    {
        $retorno = array();
        
        // Checa acesso ao método.
        $this->webService->__setClient($clientId, $clientPassword);
        
        // Define classe Werbservice.
        $this->webService->setClassName(get_class($this));
        
        // Verifica se usuário possuí acesso ao WebService.
        if ( !$this->webService->__checkMethod("renewAllLoan", false) )
        {
            $retorno->message = $this->webService->__getErrorStr();
        }
        else
        {
            $MIOLO = MIOLO::getInstance();
            $busOperationRenew = $MIOLO->getBusiness('gnuteca3', 'BusOperationRenew');
            $busOperationRenew->clearMessages();  
            
            $busLoan = $MIOLO->getBusiness('gnuteca3', 'BusLoan');
            $busPersonConfig = $MIOLO->getBusiness('gnuteca3', 'BusPersonConfig');
            
            $busOperationRenew->setRenewType( ID_RENEWTYPE_APP );
            
            // Obtém empréstimo aberto para do usuário e exemplar.
            $loans = $busLoan->getLoanOpenByPerson($personId);
            
            if (is_array($loans) )
            {
                foreach ( $loans as $loan )
                {
                    // Adiciona o empréstimo.
                    $busOperationRenew->addLoan($loan);
                }
            }
            
            // Define se será enviado recibo de renovação.
            $sendReceipt = MUtil::getBooleanValue( $busPersonConfig->getValuePersonConfig($personId, 'USER_SEND_RECEIPT_RENEW_WEB') );
                    
            $ok = $busOperationRenew->finalize(null, $sendReceipt, false );
            
            // Gera e envia recibo.
            $busOperationRenew->receipt->generate();
            
            // Obtém as mensagens de finalização.
            $messages = $busOperationRenew->getMessages();
            
            // Percorre as mensagens.
            if (is_array( $messages) )
            {
                foreach ( $messages as $message)
                {
                    $ok = $message->type == GMessages::TYPE_INFORMATION;
                    $itemNumber = $message->itemNumber;
                    
                    $exemplarRetorno = new stdClass();
                    $exemplarRetorno->itemNumber = $itemNumber;
                    $exemplarRetorno->return = $ok;

                    // Define data prevista de devolução.
                    $loan = $busLoan->getLoanOpen($itemNumber);
                    $returnForecastDate = explode(' ', $loan->returnForecastDate);
                    $exemplarRetorno->returnForecastDate = $returnForecastDate[0];
                    
                    $exemplarRetorno->message = $message->message;
                    $retorno[] = $exemplarRetorno;
                }
            }
        }
        
        return json_encode($retorno);
    }
    
    /**
     * Webservice para cancelar reserva.
     *
     * @param int $clientId Codigo do cliente SOAP.
     * @param string $clientPassword Senha do cliente SOAP.
     * @param int $personId Codigo do usuario.
     * @param int $reserveId Codigo da reserva.
     * @param string $validate Quando "t" verifica somente se reserva existe e valor da multa.
     *
     * @return string
     */
    public function cancelReserve($clientId, $clientPassword, $personId, $reserveId, $validate)
    {
        $retorno = new stdClass();
        $retorno->return = FALSE;
        $retorno->message = '';
        $retorno->fine = '0';
        
         // Checa acesso ao método.
        $this->webService->__setClient($clientId, $clientPassword);
        
        // Define classe Werbservice.
        $this->webService->setClassName(get_class($this));
        
        // Verifica se usuário possuí acesso ao WebService.
        if ( !$this->webService->__checkMethod("cancelReserve", false) )
        {
            $retorno->message = $this->webService->__getErrorStr();
        }
        else
        {
            $MIOLO = MIOLO::getInstance();
            $busReserve = $MIOLO->getBusiness('gnuteca3', 'BusReserve');
            $busOperationReserve = $MIOLO->getBusiness('gnuteca3', 'BusOperationReserve');
            
            $reserve = $busReserve->getReserveOpenOfPerson($reserveId, $personId);
            
            if ( $reserve )
            {
                $retorno->fine = $busReserve->calculatesFine($reserveId);
                
                if ( $validate == 'f' )
                {
                    $ok = $busOperationReserve->cancelReserve($reserveId);

                    if ( $ok )
                    {
                        $retorno->return = true;
                        $retorno->message = _M('Reserva cancelada!', 'gnuteca3');
                    }
                    else
                    {
                        $retorno->message = $busOperationReserve->messagesToString($retorno->return ? GMessages::TYPE_INFORMATION : GMessages::TYPE_ERROR, ' ', true);
                    }
                }
            }
            else
            {
                $retorno->message = _M('Reserva não encontrada.', 'gnuteca3');
            }
           
        }
        
        return json_encode($retorno);
    }
    
    /**
     * Webservice para reserva de obra.
     *
     * @param int $clientId Codigo do cliente SOAP.
     * @param string $clientPassword Senha do cliente SOAP.
     * @param int $personId Codigo do usuario.
     * @param int $controlNumber Numero de controle do material.
     * @param int $libraryUnitId Codigo da unidade de biblioteca.
     *
     * @return string
     */
    public function reserveMaterial($clientId, $clientPassword, $personId, $controlNumber, $libraryUnitId)
    {
        $retorno = new stdClass();
        $retorno->return = FALSE;
        $retorno->message = '';
        
         // Checa acesso ao método.
        $this->webService->__setClient($clientId, $clientPassword);
        
        // Define classe Werbservice.
        $this->webService->setClassName(get_class($this));
        
        // Verifica se usuário possuí acesso ao WebService.
        if ( !$this->webService->__checkMethod("reserveMaterial", false) )
        {
            $retorno->message = $this->webService->__getErrorStr();
        }
        else
        {
            $MIOLO = MIOLO::getInstance();
            $MIOLO->uses('classes/controls/GMaterialDetail.class.php', 'gnuteca3');
            $busOperationReserve = $MIOLO->getBusiness('gnuteca3', 'BusOperationReserve');
            $busExemplaryControl = $MIOLO->getBusiness('gnuteca3', 'BusExemplaryControl');
            $busMaterialControl = $MIOLO->getBusiness('gnuteca3', 'BusMaterialControl');
            
            // Verifica se obra é um artigo.
            $isArticle = $busMaterialControl->isColletionArticle($controlNumber);
            
            // Caso seja um artigo de fascículo, obtém o número de controle do fascículo.
            if ( $isArticle )
            {
                $controlNumber = $busMaterialControl->getControlNumberFather($controlNumber);
            }
            
            if ( $busExemplaryControl->verifyExemplaryInInitialStateOfMaterial($controlNumber, $libraryUnitId) )
            {
                $busOperationReserve->setReserveType(ID_RESERVETYPE_APP_IN_INITIAL_STATUS);
            }
            else
            {
                // Define o tipo de reserva.
                $busOperationReserve->setReserveType(ID_RESERVETYPE_APP);
            }
            
            // Define a unidade de biblioteca.
            $busOperationReserve->setLibraryUnit($libraryUnitId);
            
            // Define o usuário.
            $personOk = $busOperationReserve->setPerson($personId);
            
            if ( $personOk )
            {
                // Adiciona material.
                $add = $busOperationReserve->addMaterial($controlNumber, null, true);

                if ( $add )
                {
                    $ok = $busOperationReserve->finalize();  
                    $retorno->return = TRUE;
                }
            }
            
            $retorno->message = $busOperationReserve->messagesToString($retorno->return ? GMessages::TYPE_INFORMATION : GMessages::TYPE_ERROR, ' ', true);
            
        }
        
        return json_encode($retorno);
    }
    
    /**
     * Webservice para reserva de exemplares.
     *
     * @param int $clientId Codigo do cliente SOAP.
     * @param string $clientPassword Senha do cliente SOAP.
     * @param int $personId Codigo do usuario.
     * @param string $exemplars Lista de exemplares.
     * @param int $libraryUnitId Codigo da unidade de biblioteca.
     *
     * @return string
     */
    public function reserveExemplars($clientId, $clientPassword, $personId, $exemplars, $libraryUnitId)
    {
        $retorno = new stdClass();
        $retorno->return = FALSE;
        $retorno->message = '';
        
         // Checa acesso ao método.
        $this->webService->__setClient($clientId, $clientPassword);
        
        // Define classe Werbservice.
        $this->webService->setClassName(get_class($this));
        
        // Verifica se usuário possuí acesso ao WebService.
        if ( !$this->webService->__checkMethod("reserveExemplars", false) )
        {
            $retorno->message = $this->webService->__getErrorStr();
        }
        else
        {
            $MIOLO = MIOLO::getInstance();
            $MIOLO->uses('classes/controls/GMaterialDetail.class.php', 'gnuteca3');
            $busOperationReserve = $MIOLO->getBusiness('gnuteca3', 'BusOperationReserve');
            $busExemplaryControl = $MIOLO->getBusiness('gnuteca3', 'BusExemplaryControl');
            
            $exemplars = str_replace(' ', '', $exemplars);
            $exemplars = explode(',', $exemplars);
            
            // Define o tipo de reserva.
            if ( $busExemplaryControl->verifyExemplaryInInitialStateOfExemplar($exemplars) )
            {
                $busOperationReserve->setReserveType(ID_RESERVETYPE_APP_IN_INITIAL_STATUS);
            }
            else
            {
                $busOperationReserve->setReserveType(ID_RESERVETYPE_APP);
            }
            
            // Define a unidade de biblioteca.
            $busOperationReserve->setLibraryUnit($libraryUnitId);
            
            // Define o usuário.
            $personOk = $busOperationReserve->setPerson($personId);
            
            if ( $personOk )
            {
                if ( is_array($exemplars) )
                {
                    foreach ( $exemplars as $itemNumber )
                    {
                        $busOperationReserve->addItemNumber($itemNumber, true);
                    }
                    
                    $ok = $busOperationReserve->finalize();
                    
                    if ( $ok )
                    {
                        $retorno->return = TRUE;
                    }
                }
            }
            
            $retorno->message = $busOperationReserve->messagesToString($retorno->return ? GMessages::TYPE_INFORMATION : GMessages::TYPE_ERROR, ' ', true);
        }
        
        return json_encode($retorno);
    }
}
