<?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.
 * 
 * 
 *
 *
 *
 *
 *
 **/

include("GnutecaWebServices.class.php");

class gnuteca3WebServicesLoansWSDL
{

    private $webService;
    private $MIOLO;
    private $busLoan;
    private $busRenew;
    private $busReserve;
    private $busSearchFormat;
    private $busPersonConfig;
    private $busOperationRenew;
    private $busExemplaryControl;

    public function __construct()
    {
        $this->webService = new GWebServices();
        $this->MIOLO = MIOLO::getInstance();

        $this->busLoan = $this->MIOLO->getBusiness('gnuteca3', 'BusLoan');
        $this->busRenew = $this->MIOLO->getBusiness('gnuteca3', 'BusRenew');
        $this->busReserve = $this->MIOLO->getBusiness('gnuteca3', 'BusReserve');
        $this->busSearchFormat = $this->MIOLO->getBusiness('gnuteca3', 'BusSearchFormat');
        $this->busPersonConfig = $this->MIOLO->getBusiness('gnuteca3', 'BusPersonConfig');
        $this->busOperationRenew = $this->MIOLO->getBusiness('gnuteca3', 'BusOperationRenew');
        $this->busExemplaryControl = $this->MIOLO->getBusiness('gnuteca3', 'BusExemplaryControl');
    }

    /**
     * Lista todos os empréstimos abertos de um usuário.
     * @param int $clientId
     * @param string $clientPassword
     * @param int $personId
     */
    public function listOpenLoans(
        $clientId,
        $clientPassword,
        $personId
    ) {
        $retorno = new stdClass();

        // Define acesso ao método e define a classe do Webservice
        $this->webService->__setClient($clientId, $clientPassword);
        $this->webService->setClassName(get_class($this));

        // Verifica se o usuário possui acesso ao WebService
        if (!$this->webService->__checkMethod("listOpenLoans", false)) 
        {
            $retorno->message = $this->webService->__getErrorStr();
            return json_encode($retorno);
        }

        // Busca os empréstimos baseados no (nome do método) da (classe)
        $emprestimosAbertos = $this->busLoan->getLoanOpenByPerson($personId);

        // Define o tipo de renovação
        $this->busOperationRenew->setRenewType(ID_RENEWTYPE_APP);

        foreach ($emprestimosAbertos as $emprestimo) 
        {
            $this->busOperationRenew->checkLoan($emprestimo->loanId, $personId);
            // Mensagem caso o usuário não possa renovar o material
            $canRenew = !$this->busOperationRenew->messagesToString(GMessages::TYPE_ERROR, ' ', true);
            $message = $this->busOperationRenew->messagesToString(GMessages::TYPE_ERROR, ' ', true);
            $this->busOperationRenew->clearMessages();

            $material = $this->busExemplaryControl->getExemplaryControl($emprestimo->itemNumber, true);

            $retorno->openLoans[] = [
                "loanId" => $emprestimo->loanId,
                "itemNumber" => $emprestimo->itemNumber,
                "searchFormat" => $material->controlNumber ? $this->busSearchFormat->getFormatedString($material->controlNumber, ADMINISTRATION_SEARCH_FORMAT_ID) : 'Exemplar excluído',
                "loanDate" => $emprestimo->loanDate,
                "returnForecastDate" => GUtil::extractDateFromTimestamp($emprestimo->returnForecastDate),
                "returnDate" => $emprestimo->returnDate,
                "renewAmount" => $emprestimo->renewalWebAmount,
                "renewWebAmount" => $emprestimo->renewalWebAmount,
                "reserveAmount" => $this->busReserve->getTotalQueueByItemNumber($emprestimo->itemNumber),
                "libraryName" => $emprestimo->libraryName,
                "title" => $material->title,
                "controlNumber" => $material->controlNumber,
                "canRenew" => $canRenew,
                "message" => $message,
                "controlNumber" => $material->controlNumber,
            ];
        }

        return json_encode($retorno);
    }

    /**
     * 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();
            return json_encode($retorno);
        } 
        
        $this->busOperationRenew->setRenewType(ID_RENEWTYPE_APP);

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

        if ($loan) 
        {
            // Define como data prevista a data atual de devolução.
            $retorno->returnForecastDate = GUtil::extractDateFromTimestamp($loan->returnForecastDate);

            $loanId = $loan->loanId;

            $this->busOperationRenew->clearMessages();

            // Verifica se é possível renovar. CHECADO manualmente, para verificar se o empréstimo é realmente do usuário.
            if ($personId != $loan->personId)
            {
                $retorno->message = 'Empréstimo não pertence ao usuário.';
                $retorno->return = false;
                return json_encode($retorno);
            }

            $check = $this->busOperationRenew->checkLoan($loanId, $personId);

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

                // Define se será enviado recibo de renovação.
                $sendReceipt = MUtil::getBooleanValue($this->busPersonConfig->getValuePersonConfig($personId, 'USER_SEND_RECEIPT_RENEW_WEB'));

                // Finaliza renovação.
                $ok = $this->busOperationRenew->finalize(null, $sendReceipt, false);

                // Gera e envia recibo.
                $this->busOperationRenew->receipt->generate();

                // Obtém nova data prevista de devolução e define sucesso.
                if ($ok) 
                {

                    $retorno->receipt = $this->getLoanReceipt($this->busOperationRenew);

                    $retorno->return = true;
                    $retorno->receiptText = $this->busOperationRenew->receipt->getReceiptsText();

                    $loan = $this->busLoan->getLoanOpen($itemNumber);

                    // Define a nova data prevista de devolução.
                    $retorno->returnForecastDate = GUtil::extractDateFromTimestamp($loan->returnForecastDate);

                    $retorno->renewWebAmount = $loan->renewalWebAmount;
                    $retorno->renewAmount = $loan->renewalAmount;
                }
            }

            $retorno->return = true;
            $retorno->message = $this->busOperationRenew->messagesToString($retorno->return ? GMessages::TYPE_INFORMATION : GMessages::TYPE_ERROR, ' ', true);
            return json_encode($retorno);
        } 

        $retorno->return = false;
        $retorno->message = 'Empréstimo não localizado.';

        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|null JSON com os empréstimos renovados e recibo
     */
    public function renewAllLoan($clientId, $clientPassword, $personId)
    {
        $retorno = new stdClass();

        // Checa acesso ao método.
        $this->webService->__setClient($clientId, $clientPassword);

        // Define classe WebService.
        $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();
            return json_encode($retorno);
        } 

        $this->busOperationRenew->clearMessages();
        $this->busOperationRenew->setRenewType(ID_RENEWTYPE_APP);

        // Obtém empréstimo aberto para do usuário e exemplar.
        $loans = $this->busLoan->getLoanOpenByPerson($personId);

        if (is_array($loans)) 
        {
            foreach ($loans as $loan) 
            {
                // Adiciona o empréstimo.
                $this->busOperationRenew->addLoan($loan);
            }
        }

        // Define se será enviado recibo de renovação.
        $sendReceipt = MUtil::getBooleanValue($this->busPersonConfig->getValuePersonConfig($personId, 'USER_SEND_RECEIPT_RENEW_WEB'));
        $ok = $this->busOperationRenew->finalize(null, $sendReceipt, false);

        // Gera e envia recibo.
        $this->busOperationRenew->receipt->generate();

        // Obtém as mensagens de finalização.
        $messages = $this->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 = $this->busLoan->getLoanOpen($itemNumber);
                $exemplarRetorno->returnForecastDate = GUtil::extractDateFromTimestamp($loan->returnForecastDate);
                $material = $this->busExemplaryControl->getExemplaryControl($itemNumber, true);
                $exemplarRetorno->controlNumber = $material->controlNumber;
                $exemplarRetorno->searchFormat = $exemplarRetorno->controlNumber ?
                    $this->busSearchFormat->getFormatedString($exemplarRetorno->controlNumber, ADMINISTRATION_SEARCH_FORMAT_ID) : 'Exemplar excluído';
                $exemplarRetorno->returnWebAmount = $loan->renewalWebAmount;
                $exemplarRetorno->renewAmount = $loan->renewalAmount;
                $exemplarRetorno->message = $message->message;

                // Ajeitar dps
                $renewLoans[] = $exemplarRetorno;
            }
        }
        // 
        $retorno->loans = $renewLoans;
        $retorno->receipt = $this->getLoanReceipt($this->busOperationRenew);

        return json_encode($retorno);
    }

    // Obtém o pdf do recibo da renovação
    private function getLoanReceipt($busOperationRenew)
    {
        $itemReceipt = $busOperationRenew->receipt->getItens();
        foreach ($itemReceipt as $person) 
        {
            foreach ($person as $receipt) 
            {
                if (!$receipt->pdf) 
                {
                    $receipt->createPDF();
                }

                $lastReceiptFileName = $receipt->getPdfFileName();
            }
        }

        $filename = baseName($lastReceiptFileName);
        $baseUrl = $this->MIOLO->getAbsoluteURL(null) . 'miolo25/html/file.php?folder=receipt&file=';

        return $filename ? $baseUrl . $filename : false;
    }

    /**
     * Webservice que lista todos os empréstimos, abertos ou fechados, de um usuário.
     * 
     * @param int $clientId Codigo do cliente SOAP.
     * @param string $clientPassword Senha do cliente SOAP.
     * @param int $personId Codigo do usuario.
     * @param int $pageNumber Número da página
     * @param string|null $title Título do material.
     * @param string|null $loanDate Data do empréstimo.
     * @param int|null $statusId ID do status do empréstimo (aberto, fechado, etc).
     * @return string|null JSON com os empréstimos do usuário
     */
    public function listLoans(
        $clientId,
        $clientPassword,
        $personId,
        $title = null,
        $loanDate = null,
        $statusId = null,
        $pageNumber = 1
    ) {
        $retorno = new stdClass();

        // Define acesso ao método e define a classe do Webservice
        $this->webService->__setClient($clientId, $clientPassword);
        $this->webService->setClassName(get_class($this));

        // Verifica se o usuário possui acesso ao WebService
        if (!$this->webService->__checkMethod("listLoans", false)) 
        {
            $retorno->message = $this->webService->__getErrorStr();
            return json_encode($retorno);
        }

        // Busca dos empréstimos
        $listLoanDataObject = (object) [
            "personId" => $personId,
            "titleS" => $title,
            "beginLoanDateS" => $loanDate,
            "status" => $statusId,
        ];
        $this->busLoan->setData($listLoanDataObject);

        // Particiona o retorno da consulta com base no número de registros por página
        $userLoansData = array_chunk($this->busLoan->searchLoan(true, 'loanid DESC'), LISTING_NREGS);

        if (empty($userLoansData) && (isset($title) || isset($loanDate) || isset($statusId))) 
        {
            $retorno->message = "Nenhum empréstimo encontrado";
            return json_encode($retorno);
        }

        // Obtém apenas os registros de uma determinada página
        $loans = [];
        foreach ($userLoansData[$pageNumber - 1] as $loan) 
        {
            $controlNumber = $this->busExemplaryControl->getControlNumber($loan->itemNumber);

            $loans[] = [
                "loanId" => $loan->loanId,
                "itemNumber" => $loan->itemNumber,
                "loanDate" => GUtil::extractDateFromTimestamp($loan->LoanDate),
                "searchFormat" => $controlNumber ? $this->busSearchFormat->getFormatedString($controlNumber, ADMINISTRATION_SEARCH_FORMAT_ID) : 'Exemplar excluído',
                "returnForecastDate" => GUtil::extractDateFromTimestamp($loan->returnForecastDate),
                "returnDate" => GUtil::extractDateFromTimestamp($loan->returnDate),
                "renewsAlreadyDone" => $this->busRenew->getCountRenew($loan->loanId),
                "controlNumber" => $controlNumber,
            ];
        }

        // Dados de retorno
        $retorno->loans = $loans;
        $retorno->numberOfPages = count($userLoansData);

        return json_encode($retorno);
    }

    /**
     * Webservice para obter os detalhes de um empréstimo específico
     * 
     * @param int $clientId Codigo do cliente SOAP.
     * @param string $clientPassword Senha do cliente SOAP.
     * @param int $loanId Codigo do empréstimo.
     *
     * @return string|null JSON com os detalhes do empréstimo e renovações
     */
    public function getLoanDetails($clientId, $clientPassword, $loanId)
    {
        $retorno = new stdClass();

        // Define acesso ao método e define a classe do Webservice
        $this->webService->__setClient($clientId, $clientPassword);
        $this->webService->setClassName(get_class($this));

        // Verifica se o usuário possui acesso ao WebService
        if (!$this->webService->__checkMethod("getLoanDetails", false)) 
        {
            $retorno->message = $this->webService->__getErrorStr();
            return json_encode($retorno);
        }

        // Busca empréstimo e renovações feitas
        $loanDetails = $this->busLoan->getLoan($loanId, true, true);
        $loanRenewDetails = $this->busRenew->getRenewsOfLoan($loanId);

        // Formatação dos dados de retorno
        $retorno->loan = [
            "title" => trim($loanDetails->title),
            "loanDate" => GUtil::extractDateFromTimestamp($loanDetails->loanDate),
            "returnForecastDate" => GUtil::extractDateFromTimestamp($loanDetails->returnForecastDate),
            "returnDate" => GUtil::extractDateFromTimestamp($loanDetails->returnDate),
        ];

        foreach ($loanRenewDetails as $index => $renew) 
        {
            $retorno->renew[] = [
                "renewCount" => $index + 1,
                "returnForecastDate" => GUtil::extractDateFromTimestamp($renew->returnforecastdate),
                "renewDate" => GUtil::extractDateFromTimestamp($renew->renewdate),
                "newReturnForecastDate" => GUtil::extractDateFromTimestamp($renew->newreturnforecastdate),
                "renewType" => $renew->renewType,
            ];
        }

        return json_encode($retorno);
    }
}
