<?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 gnuteca3WebServicesSearchDetails
{

    private $webService;
    private $MIOLO;
    private $busSearchFormat;
    private $busMaterialControl;
    private $portalSearchFormatId;

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

        $this->busSearchFormat = $this->MIOLO->getBusiness('gnuteca3', 'BusSearchFormat');
        $this->busMaterialControl = $this->MIOLO->getBusiness('gnuteca3', 'BusMaterialControl');
        $this->portalSearchFormatId = (int) GUtil::getParameter('gnuteca3', 'PORTAL_SEARCH_FORMAT_ID');
    }

    /**
     * Web service de detalhes do material, exemplar e localização
     * @param int $clientId
     * @param string $clientPassword
     * @param int $controlNumber
     * @return string JSON com os detalhes do material, exemplar e localização
     */
    public function searchDetails($clientId, $clientPassword, $controlNumber, $libraryUnitId = null)
    {
        $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("searchDetails", false))
        {
            $retorno->message = $this->webService->__getErrorStr();
            return json_encode($retorno);
        }

        $retorno->isCollection = $this->busMaterialControl->isCollection($controlNumber);
        $retorno->isFascicle = $this->busMaterialControl->isCollectionFascicle($controlNumber);
        
        // Obtém o número de controle do pai, se aplicável
        $retorno->controlNumberFather = $this->busMaterialControl->getControlNumberFather($controlNumber);
        $retorno->exemplaryDetails = $this->getExemplaryDetails($controlNumber, $libraryUnitId);
        $retorno->locationDetails = $this->getLocationDetails($controlNumber, $retorno->exemplaryDetails);

        return json_encode($retorno);
    }

    /**
     * Web service para listar formatos de pesquisa
     * @param int $clientId
     * @param string $clientPassword
     * @param int $personId
     * @return string JSON com a lista de formatos de pesquisa
     */
    public function listSearchFormat($clientId, $clientPassword, $userLogin)
    {
        $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("listSearchFormat", false))
        {
            $retorno->message = $this->webService->__getErrorStr();
            return json_encode($retorno);
        }

        $busOperatorLibraryUnit = $this->MIOLO->getBusiness("gnuteca3", "BusOperatorLibraryUnit");
        $busPerson = $this->MIOLO->getBusiness("gnuteca3", "BusPerson");
        $personId = $busPerson->getPersonIdByLogin($userLogin);
        $operatorData = $busOperatorLibraryUnit->getOperatorLibraryUnit($userLogin);
        $searchFormatList = $this->busSearchFormat->listSearchFormat(false, !$operatorData->operator, $personId);

        // Monta o objeto
        $retorno->searchFormatList = array_map(function ($searchFormat) {
            return [
                "searchFormatId" => (int) $searchFormat[0],
                "searchFormatDescription" => $searchFormat[0] == $this->portalSearchFormatId ? 'Padrão' : $searchFormat[1],
                "searchFormatIsRestricted" => $searchFormat[2]
            ];
        }, $searchFormatList);

        // Retira o formato de pesquisa padrão
        $retorno->searchFormatList = array_filter(
            $retorno->searchFormatList,
            fn($searchFormat) => $searchFormat['searchFormatId'] != 1
        );

        // Ordena pelo searchFormatId do portal do aluno no início
        usort($retorno->searchFormatList, function ($a, $b) {
            if ($a['searchFormatId'] === $this->portalSearchFormatId) return -1;
            if ($b['searchFormatId'] === $this->portalSearchFormatId) return 1;
            return $a['searchFormatId'] - $b['searchFormatId'];
        });

        return json_encode($retorno);
    }

    /**
     * Web service para obter o conteúdo do formato de pesquisa
     * @param int $clientId
     * @param string $clientPassword
     * @param int $personId
     * @param int $controlNumber
     * @param int $searchFormatId
     * @return string JSON com o conteúdo do formato de pesquisa
     */
    public function getSearchFormatContent($clientId, $clientPassword, $controlNumber, $searchFormatId) 
    {
        $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("getSearchFormatContent", false))
        {
            $retorno->message = $this->webService->__getErrorStr();
            return json_encode($retorno);
        }

        $retorno->searchFormat = $this->busSearchFormat->getFormatedString($controlNumber, $searchFormatId, 'details', false);
        $retorno->searchFormatId = $searchFormatId;
        
        return json_encode($retorno);
    }

    /**
     * Obtém exemplares de determinado número de controle
     * @param int $controlNumber
     * @return array Lista de objetos com detalhes dos exemplares
     */
    private function getExemplaryDetails($controlNumber, $libraryUnitId)
    {
        $this->MIOLO->getClass('gnuteca3', 'controls/GMaterialDetail');
        $busExemplaryControl = $this->MIOLO->getBusiness('gnuteca3', 'BusExemplaryControl');
        $busLoan = $this->MIOLO->getBusiness('gnuteca3', 'BusLoan');
        $busReserve = $this->MIOLO->getBusiness('gnuteca3', 'BusReserve');

        $exemplaries = $busExemplaryControl->getExemplaryOfMaterial($controlNumber, $libraryUnitId, true, true, true);

        $returnExemplaries = array();
        foreach ($exemplaries as $exemplar)
        {
            if (GMaterialDetail::checkDisplayExemplary($exemplar->exemplaryStatusId))
            {
                $exemplaryDataObj = (object) [
                    "itemNumber" => $exemplar->itemNumber,
                    "volume" => $exemplar->volume ? ('v. ' . $exemplar->volume) : '-',
                    "tomo" => $exemplar->tomo ? $exemplar->tomo : '-',
                    "libraryName" => $exemplar->libraryName,
                    "materialType" => $exemplar->materialTypeDescription,
                    "materialPhysicalType" => $exemplar->materialPhysicalTypeDescription,
                    "exemplaryStatus" => $exemplar->exemplaryStatusDescription,
                ];

                // Obtém a quantidade de reservas do material
                $reserves = $busReserve->getReservesOfExemplary(
                    $exemplar->itemNumber,
                    array(ID_RESERVESTATUS_ANSWERED, ID_RESERVESTATUS_REQUESTED, ID_RESERVESTATUS_REPORTED)
                );
                $exemplaryDataObj->reserveCount = is_array($reserves) ? count($reserves) : 0;

                // Obtém a data prevista de devolução caso tenha algum material emprestado
                $exemplaryDataObj->returnForecastDate = $exemplar->exemplaryStatusId == DEFAULT_EXEMPLARY_STATUS_EMPRESTADO ?
                    GDate::construct($busLoan->getReturnForecastDateFromItemNumber($exemplar->itemNumber))->getDate(GDate::MASK_DATE_USER) : '-';

                $returnExemplaries[] = $exemplaryDataObj;
            }
        }

        return $returnExemplaries;
    }

    /**
     * Obtém as localizações de um determinado número de controle
     * @param int $controlNumber
     * @param array $exemplaries Lista de exemplares do material
     * @return stdClass|null Objeto com detalhes da localização ou null se não houver localização
     */
    private function getLocationDetails($controlNumber, $exemplaries)
    {
        $busMaterialLocation = $this->MIOLO->getBusiness('gnuteca3', 'BusMaterialLocation');
        $locations = $busMaterialLocation->getRegras($controlNumber, $exemplaries);

        if (empty($locations))
            return null;

        $location = $locations[0];

        $busFile = $this->MIOLO->getBusiness('gnuteca3', 'BusFile');
        $absolutePath = $busFile->getAbsoluteFilePath('location', $location->materialLocationId . '.');
        $file = $busFile->searchFile(true, $absolutePath);

        // Se não existir imagem, retorna uma imagem padrão
        if (!$file)
        {
            $absolutePath = $busFile->getAbsoluteFilePath('location', 'naoEncontrado.');
            $file = $busFile->searchFile(true, $absolutePath);
        }

        if ($file)
        {
            $fileTmp = new stdClass();
            $fileTmp->mimeContent = $file[0]->mimeContent;
            $fileTmp->mioloLink = $file[0]->mioloLink;
            $fileTmp->absolute = $file[0]->absolute;

            $fileTmp->baseUrl = $this->MIOLO->getAbsoluteURL(null) . 'miolo25/html/file.php?folder=location&file=' . $file[0]->basename;

            $location->image = $fileTmp;
        }

        $returnedLocation = (object) [
            "materialLocationId" => $location->materialLocationId,
            "internalDescription" => $location->internalDescription,
            "description" => $location->description,
            "date" => $location->date,
            "operator" => $location->operator,
            "image" => $location->image,
            "absolutePath" => $location,
        ];

        return $returnedLocation;
    }
}