<?php

declare(strict_types=1);
/**
 * Calendar App
 *
 * @copyright 2021 Anna Larch <anna.larch@gmx.net>
 *
 * @author Anna Larch <anna.larch@gmx.net>
 * @author Richard Steinmetz <richard@steinmetz.cloud>
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU AFFERO GENERAL PUBLIC LICENSE
 * License as published by the Free Software Foundation; either
 * version 3 of the License, or any later version.
 *
 * This library 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 AFFERO GENERAL PUBLIC LICENSE for more details.
 *
 * You should have received a copy of the GNU Affero General Public
 * License along with this library.  If not, see <http://www.gnu.org/licenses/>.
 *
 */

namespace OCA\Gestion\Service;

use DateTime;
use \FPDF;
use OCA\Gestion\Constants\MultipleFactureTypeConstant;
use OCA\Gestion\Helpers\DateHelpers;
use OCA\Gestion\Helpers\FileExportHelpers;
use OCA\Gestion\Helpers\PriceHelpers;

class InvoicePdfHandler extends FPDF
{

    private $multipleFactureData = [];
    private $factureData = [];
    private $logo = null;
    private $logoPath = "/var/www/html/data/admin/files/.gestion/";
    protected $extgstates = [];
    private $thereIsOrderOrCaseNumber = false;
    private $startingYOfArticlesTable = 100;

    private $endingYOfArticlesTable = 230;

    private $articleTablesHeight = 130;

    public $interLigneHeader = 5;
    function Header()
    {
        if ($this->logo != "nothing") {
            $this->Image($this->logoPath . "logo.png", 2, 10, 75, 25);
            $this->AddWatermark();
        } else {
            $this->Cell(55, 30, '');
        }
    }

    function AddWatermark()
    {
        $this->SetAlpha(0.2);

        $imagePath = $this->logoPath . "filigrane_pdf.png";
        list($originalWidth, $originalHeight) = getimagesize($imagePath);

        // Convertir les dimensions de pixels à mm (1 pixel = 0.264583 mm)  
        // Convertir les dimensions de pixels à mm (1 pixel = 0.264583 mm)  
        $originalWidth = $originalWidth * 0.264583;
        $originalHeight = $originalHeight * 0.264583;

        // Augmenter l'échelle, par exemple, 1.5 pour 150% de la taille d'origine  
        $scale = 1.7;
        $width = $originalWidth * $scale;
        $height = $originalHeight * $scale;
        // Calculer la position pour centrer l'image  
        $x = (210 - $width) / 2 + 15;  // Décalage à droite de 15 mm  
        $y = ((297 - $height) / 2) + 21;  // 297 mm est la hauteur d'une page A4  

        // Ajouter l'image en filigrane  
        $this->Image($imagePath, $x, $y, $width, $height); // Chemin, position x, position y, largeur, hauteur  
        $this->SetAlpha(0.1); // Définir l'opacité  
    }

    function SetAlpha($alpha)
    {
        // Appliquer la transparence au document
        $this->SetFillColor(255, 255, 255, $alpha * 255);
        $this->SetTextColor(0, 0, 0, $alpha * 255);
        $this->SetDrawColor(0, 0, 0, $alpha * 255);
    }


    function Footer()
    {
        $this->SetY(-34);
        $this->SetFont('ComicSans', '', 7);

        $this->MultiCell(0, 4, utf8_decode(html_entity_decode('Tout retard de paiement entraînera de plein droit une pénalité de retard de 3 fois le taux légal ')));
        $this->MultiCell(0, 4, utf8_decode(html_entity_decode('(Loi 2008-776 du 4 août 2008) et une indemnité forfaitaire de 40 EUR pour frais de recouvrement sera appliquée.')));
        $this->Ln(1);
        $this->MultiCell(0, 4, utf8_decode(html_entity_decode('Si les frais de recouvrement sont supérieurs à ce montant forfaitaire, une indemnisation complémentaire')));
        $this->MultiCell(0, 4, utf8_decode(html_entity_decode('sera due sur présentation de justificatifs (articles L.441-3 et L.441-6 du code de commerce).')));

        $this->SetY(-10);
        $this->SetFont('ComicSans', '', 7);
        $this->Cell(0, 10, utf8_decode(html_entity_decode($this->factureData['configuration']->legal_one)), 0, 0, 'C');
    }

    public function InvoicePdfFactory(array $factureData, $logo = null)
    {
        $this->factureData = $factureData;
        $this->logo = $logo;
    }

    public function MutlipleInvoicePdfFactory(array $multipleInvoiceData, $logo = null)
    {
        $this->multipleFactureData = $multipleInvoiceData;
        $this->logo = $logo;
    }

    public function GetMultipleInvoiceFilename($month, $year)
    {
        $filename = "";
        foreach ($this->multipleFactureData as $factureData) {
            $factureType = $factureData["facture_type"];
            if ($factureType == MultipleFactureTypeConstant::CLIENT_FILTER_TYPE) {
                $filename = mb_strtoupper($factureData["client_nom"], 'UTF-8');
            } else {
                $filename = 'GROUPE_' . mb_strtoupper($factureData["group_name"], 'UTF-8');
            }
            $filename .= $month != 0 ? '_' . DateHelpers::GetMonthPlainString($month) : '';
            $filename .= "_" . $year;
            break;
        }
        return $filename;
    }

    public function GetInvoiceFilename()
    {
        $factureNum = $this->factureData['num'];
        $factureNum = str_replace('/', '-', $factureNum);
        $defuntNom = str_replace('&nbsp;', ' ', $this->factureData['defunt_nom']);
        return $factureNum . '_' . mb_strtoupper($defuntNom, 'UTF-8');
    }

    private function DrawInvoiceCompanyInfo()
    {
        $this->SetY(40);
        $this->SetFont('ComicSans', '', 10);
        $this->Cell(0, $this->interLigneHeader, FileExportHelpers::FormatTextForExport($this->factureData['configuration']->entreprise), 0, 1);
        $this->Cell(0, $this->interLigneHeader, FileExportHelpers::FormatTextForExport($this->factureData['configuration_adresse']), 0, 1);
        $this->Cell(0, $this->interLigneHeader, FileExportHelpers::FormatTextForExport($this->factureData['configuration_adresse_city']), 0, 1);
        $this->Cell(0, $this->interLigneHeader, FileExportHelpers::FormatTextForExport('Tél : ') . FileExportHelpers::FormatTextForExport($this->factureData['configuration']->telephone), 0, 1);
        $this->Cell(0, $this->interLigneHeader, 'Mail : ' . $this->factureData['configuration']->mail, 0, 1);
    }
    private function DrawInvoiceClientInfo()
    {
        $this->SetFont('ComicSans', '', 10);
        $clientName = $this->factureData['client_nom'];
        if ($this->factureData["group_name"] != null && $this->factureData["group_name"] != "") {
            $clientName = $this->factureData['group_name'];
        }
        $clientInfoXAxis = 125;

        $clientAddress = $this->factureData['client_real_adress'];
        $maxWidth = $this->GetPageWidth();
        $availableWidhtForClientInfo = $maxWidth - 2 - $clientInfoXAxis;
        $address = FileExportHelpers::FormatTextForExport(trim($clientAddress));
        $addressWidth = $this->GetStringWidth($address);
        $addressWidthGreaterThanMaxWidth = $addressWidth > $availableWidhtForClientInfo;
        $addressIsMoreThanTwoLines = ($addressWidth / $availableWidhtForClientInfo) > 2;
        
        $clientInfoYAxis = $addressIsMoreThanTwoLines ? 35 : 35;// the old is ? 35 : 39 but not working
        $this->SetXY($clientInfoXAxis, $clientInfoYAxis);
        $this->Cell(0, $this->interLigneHeader, FileExportHelpers::FormatTextForExport($clientName));
        $clientInfoYAxis += $this->interLigneHeader;
        $clientAddresses = explode(",", $clientAddress);
          foreach ($clientAddresses as $address) {
            $address = FileExportHelpers::FormatTextForExport(trim($address));
            $addressWidth = $this->GetStringWidth($address);
            $addressWidthGreaterThanMaxWidth = $addressWidth > $availableWidhtForClientInfo;
            $isMultiline = false;
            $this->SetXY($clientInfoXAxis, $clientInfoYAxis);
            if ($addressWidthGreaterThanMaxWidth) {
                $yBefore = $this->GetY();
                $this->MultiCell($availableWidhtForClientInfo, $this->interLigneHeader, $address, 0, 'L');
                $yAfter = $this->GetY();
                $isMultiline = ($yAfter - $yBefore) > $this->interLigneHeader;
                if ($isMultiline) {
                    $this->SetXY($this->GetX(), $yBefore);
                }
            } else {
                $this->Cell($availableWidhtForClientInfo, $this->interLigneHeader, $address);
            }
            if ($isMultiline) {
                $clientInfoYAxis += $this->interLigneHeader;
            }
            $clientInfoYAxis += $this->interLigneHeader;
        }
        $this->SetXY($clientInfoXAxis, $clientInfoYAxis);
        $this->Cell(0, $this->interLigneHeader, trim(FileExportHelpers::FormatTextForExport($this->factureData['client_adress_city'])));
        $clientInfoYAxis += $this->interLigneHeader;
        $this->SetXY($clientInfoXAxis, $clientInfoYAxis);
        $this->Cell(0, $this->interLigneHeader, 'Siret: ' . $this->factureData['siret']);
        $clientInfoYAxis += $this->interLigneHeader;
        $this->SetXY($clientInfoXAxis, $clientInfoYAxis);
        $this->Cell(0, $this->interLigneHeader, FileExportHelpers::FormatTextForExport('Mail : ') . $this->factureData['client_mail']);
    }

    private function DrawInvoiceCompanyAndClientInfo()
    {
        $this->DrawInvoiceCompanyInfo();
        $this->DrawInvoiceClientInfo();
    }

    private function DrawInvoiceInfoTable()
    {
        $startInvoiceInfoTable = 70;
        $this->setY($startInvoiceInfoTable);

        $factureDatePaiement = $this->factureData['date_paiement'];
        $factureDatePaiement = DateTime::createFromFormat('Y-m-d', $factureDatePaiement);
        $factureDateEcheance = $factureDatePaiement;
        $factureDatePaiement = $factureDatePaiement->format('d-m-Y');
        $factureDateEcheance->modify('last day of next month');
        $factureDateEcheance = $factureDateEcheance->format('d-m-Y');

        $this->SetFont('ComicSans', '', 10);
        $this->Cell(25, 7, 'DATE', 1, 0, 'C');
        $this->Cell(104, 7, 'CLIENT', 1, 0, 'C');
        $this->Cell(39, 7, 'FACTURE', 1, 0, 'C');
        $this->Cell(36, 7, 'ECHEANCE', 1, 1, 'C');


        $this->SetFont('ComicSans', '', 10);
        $this->Cell(25, 7, $factureDatePaiement, 1, 0, 'C');
        $this->Cell(104, 7, utf8_decode(html_entity_decode($this->factureData['client_nom'])), 1, 0, 'C');
        $this->Cell(39, 7, $this->factureData['num'], 1, 0, 'C');
        $this->Cell(36, 7, $factureDateEcheance, 1, 1, 'C');

        $orderNumberIsProvided = (trim($this->factureData['order_number']) !== "" && trim($this->factureData['order_number']) !== "-");
        $caseNumberIsProvided = (trim($this->factureData['case_number']) !== "" && trim($this->factureData['case_number']) !== "-");
        if ($orderNumberIsProvided) {
            $this->thereIsOrderOrCaseNumber = true;
            $this->Ln(2);
            if ($caseNumberIsProvided == false) {
                $this->Ln(3);
            }
            $this->Cell(0, 5, FileExportHelpers::FormatTextForExport("Bon de commande: " . $this->factureData['order_number']), 0, 1, 'C');
        }
        if ($caseNumberIsProvided) {
            $this->thereIsOrderOrCaseNumber = true;
            if ($orderNumberIsProvided == false) {
                $this->Ln(5);
            }
            $this->Cell(0, 5, FileExportHelpers::FormatTextForExport("Numéro de dossier: " . $this->factureData['case_number']), 0, 1, 'C');
        }

        $this->startingYOfArticlesTable = $this->thereIsOrderOrCaseNumber ? $this->startingYOfArticlesTable + 3 : $this->startingYOfArticlesTable - 7;
    }

    private function DrawArticlesTable()
    {
        $this->startingYOfArticlesTable = $this->startingYOfArticlesTable - 2;
        $this->SetLineWidth(0.2);
        $gapBetweenStartingOfArticlesTableAndColumnName = 8;
        $tableHeight = $this->thereIsOrderOrCaseNumber ? $this->articleTablesHeight : $this->articleTablesHeight + 9;
        $this->Rect(3, $this->startingYOfArticlesTable, 204, $tableHeight, "D");
        // cadre titre des colonnes
        $this->Line(3, $this->startingYOfArticlesTable + $gapBetweenStartingOfArticlesTableAndColumnName, 207, $this->startingYOfArticlesTable + $gapBetweenStartingOfArticlesTableAndColumnName);
        // les traits verticaux colonnes
        $additionalMargRight = 1;
        $endingLine = $this->thereIsOrderOrCaseNumber ? 231 : 230;  // mois +1  pour le groupe 
        $this->Line(27 + $additionalMargRight, $this->startingYOfArticlesTable, 27 + $additionalMargRight, $endingLine);
        $this->Line(142 + $additionalMargRight, $this->startingYOfArticlesTable, 142 + $additionalMargRight, $endingLine);
        $this->Line(164 + $additionalMargRight, $this->startingYOfArticlesTable, 164 + $additionalMargRight, $endingLine);
        $this->Line(182 + $additionalMargRight, $this->startingYOfArticlesTable, 182 + $additionalMargRight, $endingLine);
    }

    private function DrawArticlesTableHeader()
    {
        $additionalMargRight = 1;
        $tvaValue = $this->factureData["configuration"]->tva_default;
        $columnNameY = $this->startingYOfArticlesTable - 1;
        $this->SetFont('ComicSans', '', 10);
        $this->SetXY(12 + $additionalMargRight, $columnNameY);
        $this->Cell(7, 10, "Date", 0, 0, 'C');

        $this->SetXY(30 + $additionalMargRight, $columnNameY);
        $this->Cell(100, 10, "Description", 0, 0, 'C');

        $this->SetXY(143 + $additionalMargRight, $columnNameY);
        $this->Cell(20, 10, "Prix Uni. HT", 0, 0, 'C');

        $this->SetXY(163 + $additionalMargRight, $columnNameY);
        $this->Cell(20, 10, 'TVA ' . $tvaValue . '%', 0, 0, 'C');

        $this->SetXY(185, $columnNameY);
        $this->Cell(20, 10, "Prix Uni. TTC", 0, 0, 'C');
    }

    public function DrawArticlesTableValueAndReturnTotalPrice()
    {
        $this->SetFont('ComicSans', '', 10);
        $devisDate = $this->factureData['devis_date'];
        $devisDate = DateTime::createFromFormat('Y-m-d', $devisDate);
        $devisDate = $devisDate->format('d-m-Y');
        $tvaValue = $this->factureData["configuration"]->tva_default;
        $totalHt = 0;
        $totalTtc = 0;
        $totalTva = 0;
        $products = $this->factureData["products"];
        $yValue = $this->startingYOfArticlesTable + 13;
        $maxDescriptionWidth = 102;
        foreach ($products as $product) {

            $valueHt = $product['produit_price'] * $product['quantite'];
            $valueTtc = PriceHelpers::calculPriceWithVatValue($valueHt, $tvaValue);
            $totalHt += $valueHt;
            $totalTtc += $valueTtc;
            $productDescription = $product["produit_description"];
            $dateValue = "";
            if ($product === end($products)) {
                $dateValue = $devisDate;
                $productDescription .= " de " . FileExportHelpers::GetSexeLabel($this->factureData['defunt_sexe']) . ' ' . $this->factureData["defunt_nom"];
            }
            $tvaAmount = $valueTtc - $valueHt;
            $this->SetXY(5, $yValue);
            $this->Cell(5, 6, $dateValue, 0, 0);

            $this->SetXY(30, $yValue);
            $this->MultiAlignCell($maxDescriptionWidth, 6, utf8_decode(html_entity_decode($productDescription)), 0, '0', );


            $this->SetXY(144, $yValue);
            $this->Cell(20, 6, number_format($valueHt, 2, '.', '') . chr(128), 0, 0, 'C');

            $this->SetXY(165, $yValue);
            $this->Cell(20, 6, number_format($tvaAmount, 2, '.', '') . chr(128), 0, 0, 'C');

            $this->SetXY(182, $yValue);
            $this->Cell(25, 6, number_format($valueTtc, 2, '.', '') . chr(128), 0, 1, 'C');
            $yValue += 12;
            $totalTva += $tvaAmount;
        }

        return [
            "TOTAL HT" => $totalHt,
            "TVA " . $tvaValue . "%" => $totalTva,
            "TOTAL TTC" => $totalTtc
        ];
    }

    private function DrawBankAndTotalPriceInfo($totalPriceArray)
    {
        $startOfYAfterMainTable = 236;
        $this->SetY($startOfYAfterMainTable);
        $this->SetFont('ComicSans', '', 8);
        $this->MultiCell(0, 4, utf8_decode(html_entity_decode("Paiement à votre convenance par chèque à l'ordre de " . $this->factureData['configuration']->entreprise)));
        $this->MultiCell(0, 4, utf8_decode(html_entity_decode("en indiquant le numéro de facture, ou par virement :")));

        $this->Ln(1);
        $startOftable = 3;
        $this->SetX($startOftable);
        // Table IBAN
        $this->SetFont('ComicSans', '', 8);
        $ibanWidth = 62;
        $this->Cell($ibanWidth, 6.5, 'IBAN : FR76 1360 6000 1436 5418 1800 038', 1, 1, 'C');
        $this->SetX($startOftable);
        $this->Cell($ibanWidth, 6.5, 'Code SWIFT : AGRI FR PP 836', 1, 1, 'C');

        //TABLE HT
        $tableWidth = 48; // Largeur totale de la 2e table (20+20)
        $marginRight = 3; // Marge par rapport au bord droit
        $pageWidth = 210; // Largeur d'une page A4 en mm (portrait)

        // Position correcte de la 2e table
        $startOfArrayX = $pageWidth - $tableWidth - $marginRight;
        $startOfArrayY = $startOfYAfterMainTable + 0.5;

        $this->SetFont('ComicSans', '', 10);

        foreach ($totalPriceArray as $label => $price) {
            $this->SetXY($startOfArrayX, $startOfArrayY);
            $this->Cell(24, 6.5, $label, 1, 1, 'C');
            $this->SetXY($startOfArrayX + 24, $startOfArrayY);
            $this->Cell(24, 6.5, number_format($price, 2, '.', '') . chr(128), 1, 1, 'C');
            $startOfArrayY += 6.5;
        }
    }

    public function SetMultipleFactureContent()
    {
        foreach ($this->multipleFactureData as $factureData) {
            $this->factureData = $factureData;
            $this->SetFactureContent();
        }
    }

    public function SetFactureContent()
    {
        $this->AddPage();
        $this->SetMargins(3, 0, 3);
        $this->DrawInvoiceCompanyAndClientInfo();
        $this->DrawInvoiceInfoTable();
        $this->DrawArticlesTable();
        $this->DrawArticlesTableHeader();
        $totalPriceValue = $this->DrawArticlesTableValueAndReturnTotalPrice();
        $this->DrawBankAndTotalPriceInfo($totalPriceValue);
    }

    function MultiAlignCell($w, $h, $text, $border = 0, $ln = 0, $align = 'L', $fill = false)
    {
        // Store reset values for (x,y) positions
        $x = $this->GetX() + $w;
        $y = $this->GetY();

        // Make a call to FPDF's MultiCell
        $this->MultiCell($w, $h, $text, $border, $align, $fill);

        // Reset the line position to the right, like in Cell
        if ($ln == 0) {
            $this->SetXY($x, $y);
        }
    }

    function NbLines($w, $txt)
    {
        // Compute the number of lines a MultiCell of width w will take
        if (!isset($this->CurrentFont))
            $this->Error('No font has been set');
        $cw = $this->CurrentFont['cw'];
        if ($w == 0)
            $w = $this->w - $this->rMargin - $this->x;
        $wmax = ($w - 2 * $this->cMargin) * 1000 / $this->FontSize;
        $s = str_replace("\r", '', (string) $txt);
        $nb = strlen($s);
        if ($nb > 0 && $s[$nb - 1] == "\n")
            $nb--;
        $sep = -1;
        $i = 0;
        $j = 0;
        $l = 0;
        $nl = 1;
        while ($i < $nb) {
            $c = $s[$i];
            if ($c == "\n") {
                $i++;
                $sep = -1;
                $j = $i;
                $l = 0;
                $nl++;
                continue;
            }
            if ($c == ' ')
                $sep = $i;
            $l += $cw[$c];
            if ($l > $wmax) {
                if ($sep == -1) {
                    if ($i == $j)
                        $i++;
                } else
                    $i = $sep + 1;
                $sep = -1;
                $j = $i;
                $l = 0;
                $nl++;
            } else
                $i++;
        }
        return $nl;
    }
}