<?php
/**
 * This file is part of FacturaScripts
 * Copyright (C) 2017-2026 Carlos Garcia Gomez <carlos@facturascripts.com>
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU Lesser General Public License as
 * published by the Free Software Foundation, either version 3 of the
 * License, or (at your option) any later version.
 *
 * This program 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 Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public License
 * along with this program. If not, see <http://www.gnu.org/licenses/>.
 */

namespace FacturaScripts\Core\Lib\PDF;

use Exception;
use FacturaScripts\Core\Lib\TaxExceptions;
use FacturaScripts\Core\Model\Base\BusinessDocument;
use FacturaScripts\Core\Template\ExtensionsTrait;
use FacturaScripts\Core\Tools;
use FacturaScripts\Core\Where;
use FacturaScripts\Dinamic\Model\AgenciaTransporte;
use FacturaScripts\Dinamic\Model\AttachedFile;
use FacturaScripts\Dinamic\Model\Cliente;
use FacturaScripts\Dinamic\Model\Contacto;
use FacturaScripts\Dinamic\Model\CuentaBanco;
use FacturaScripts\Dinamic\Model\CuentaBancoCliente;
use FacturaScripts\Dinamic\Model\Divisa;
use FacturaScripts\Dinamic\Model\Empresa;
use FacturaScripts\Dinamic\Model\FacturaCliente;
use FacturaScripts\Dinamic\Model\FormaPago;
use FacturaScripts\Dinamic\Model\FormatoDocumento;
use FacturaScripts\Dinamic\Model\Impuesto;
use FacturaScripts\Dinamic\Model\Pais;
use FacturaScripts\Dinamic\Model\Proveedor;
use FacturaScripts\Dinamic\Model\ReciboCliente;

/**
 * PDF document data.
 *
 * @author Cristo M. Estévez Hernández  <cristom.estevez@gmail.com>
 * @author Carlos García Gómez          <carlos@facturascripts.com>
 */
abstract class PDFDocument extends PDFCore
{
    use ExtensionsTrait;

    const INVOICE_TOTALS_Y = 200;

    /** @var FormatoDocumento */
    protected $format;

    /**
     * Combine address if the parameters don´t empty
     *
     * @param BusinessDocument|Contacto $model
     *
     * @return string
     */
    protected function combineAddress($model): string
    {
        $completeAddress = Tools::fixHtml($model->direccion);
        $completeAddress .= empty($model->apartado) ? '' : ', ' . $this->i18n->trans('box') . ' ' . $model->apartado;
        $completeAddress .= empty($model->codpostal) ? '' : "\n" . $model->codpostal;
        $completeAddress .= empty($model->ciudad) ? '' : ', ' . Tools::fixHtml($model->ciudad);
        $completeAddress .= empty($model->provincia) ? '' : ' (' . Tools::fixHtml($model->provincia) . ')';
        $completeAddress .= empty($model->codpais) ? '' : ', ' . $this->getCountryName($model->codpais);
        return $completeAddress;
    }

    /**
     * Returns the combination of the address.
     * If it is a supplier invoice, it returns the supplier's default address.
     * If it is a customer invoice, return the invoice address
     *
     * @param Cliente|Proveedor $subject
     * @param BusinessDocument|Contacto $model
     *
     * @return string
     */
    protected function getDocAddress($subject, $model): string
    {
        if (isset($model->codproveedor) && empty($model->direccion)) {
            $contacto = $subject->getDefaultAddress();
            return $this->combineAddress($contacto);
        }

        return $this->combineAddress($model);
    }

    /**
     * @param BusinessDocument|ReciboCliente $receipt
     *
     * @return string
     */
    protected function getBankData($receipt): string
    {
        $payMethod = new FormaPago();
        if (false === $payMethod->load($receipt->codpago)) {
            // forma de pago no encontrada
            return '-';
        }

        if (false === $payMethod->imprimir) {
            // no imprimir información bancaria
            return $payMethod->descripcion;
        }

        // Domiciliado. Mostramos la cuenta bancaria del cliente
        $cuentaBcoCli = new CuentaBancoCliente();
        $where = [Where::eq('codcliente', $receipt->codcliente)];
        if ($payMethod->domiciliado && $cuentaBcoCli->loadWhere($where, ['principal' => 'DESC'])) {
            return $payMethod->descripcion . ' : ' . $cuentaBcoCli->getIban(true, true);
        }

        // cuenta bancaria de la empresa
        $cuentaBco = new CuentaBanco();
        if ($payMethod->codcuentabanco && $cuentaBco->load($payMethod->codcuentabanco) && $cuentaBco->iban) {
            return $payMethod->descripcion . ' : ' . $cuentaBco->getIban(true);
        }

        // no hay información bancaria
        return $payMethod->descripcion;
    }

    /**
     * Gets the name of the country with that code.
     *
     * @param string $code
     *
     * @return string
     */
    protected function getCountryName($code): string
    {
        if (empty($code)) {
            return '';
        }

        $country = new Pais();
        return $country->load($code) ? Tools::fixHtml($country->nombre) : '';
    }

    /**
     * Gets the name of an specify divisa
     *
     * @param string $code
     *
     * @return string
     */
    protected function getDivisaName($code): string
    {
        if (empty($code)) {
            return '';
        }

        $divisa = new Divisa();
        return $divisa->load($code) ? $divisa->descripcion : '';
    }

    protected function getLineHeaders(): array
    {
        return [
            'referencia' => ['type' => 'text', 'title' => $this->i18n->trans('reference') . ' - ' . $this->i18n->trans('description')],
            'cantidad' => ['type' => 'number', 'title' => $this->i18n->trans('quantity')],
            'pvpunitario' => ['type' => 'number', 'title' => $this->i18n->trans('price')],
            'dtopor' => ['type' => 'percentage', 'title' => $this->i18n->trans('dto')],
            'dtopor2' => ['type' => 'percentage', 'title' => $this->i18n->trans('dto-2')],
            'pvptotal' => ['type' => 'number', 'title' => $this->i18n->trans('net')],
            'iva' => ['type' => 'percentage', 'title' => $this->i18n->trans('tax')],
            'recargo' => ['type' => 'percentage', 'title' => $this->i18n->trans('re')],
            'irpf' => ['type' => 'percentage', 'title' => $this->i18n->trans('irpf')]
        ];
    }

    /**
     * @param BusinessDocument $model
     *
     * @return string[]
     */
    protected function getTaxExceptions($model): array
    {
        $allExceptions = TaxExceptions::all();
        $found = [];

        foreach ($model->getLines() as $line) {
            if (!empty($line->excepcioniva) && !isset($found[$line->excepcioniva])) {
                $found[$line->excepcioniva] = isset($allExceptions[$line->excepcioniva])
                    ? $this->i18n->trans($allExceptions[$line->excepcioniva])
                    : $line->excepcioniva;
            }
        }

        return $found;
    }

    /**
     * @param BusinessDocument $model
     */
    protected function getTaxesRows($model)
    {
        $eud = $model->getEUDiscount();

        $subtotals = [];
        foreach ($model->getLines() as $line) {
            if (empty($line->codimpuesto) || empty($line->pvptotal) || $line->suplido) {
                continue;
            }

            $key = $line->codimpuesto . '_' . $line->iva . '_' . $line->recargo;
            if (!isset($subtotals[$key])) {
                $subtotals[$key] = [
                    'tax' => $key,
                    'taxbase' => 0,
                    'taxp' => $line->iva . '%',
                    'taxamount' => 0,
                    'taxsurchargep' => $line->recargo . '%',
                    'taxsurcharge' => 0
                ];

                $impuesto = new Impuesto();
                if (!empty($line->codimpuesto) && $impuesto->load($line->codimpuesto)) {
                    $subtotals[$key]['tax'] = $impuesto->descripcion;
                }
            }

            $subtotals[$key]['taxbase'] += $line->pvptotal * $eud;
            $subtotals[$key]['taxamount'] += $line->pvptotal * $eud * $line->iva / 100;
            $subtotals[$key]['taxsurcharge'] += $line->pvptotal * $eud * $line->recargo / 100;
        }

        // irpf
        foreach ($model->getLines() as $line) {
            if (empty($line->irpf)) {
                continue;
            }

            $key = 'irpf_' . $line->irpf;
            if (!isset($subtotals[$key])) {
                $subtotals[$key] = [
                    'tax' => $this->i18n->trans('irpf') . ' ' . $line->irpf . '%',
                    'taxbase' => 0,
                    'taxp' => $line->irpf . '%',
                    'taxamount' => 0,
                    'taxsurchargep' => 0,
                    'taxsurcharge' => 0
                ];
            }

            $subtotals[$key]['taxbase'] += $line->pvptotal * $eud;
            $subtotals[$key]['taxamount'] -= $line->pvptotal * $eud * $line->irpf / 100;
        }

        // round
        foreach ($subtotals as $key => $value) {
            $subtotals[$key]['taxbase'] = Tools::number($value['taxbase']);
            $subtotals[$key]['taxamount'] = Tools::number($value['taxamount']);
            $subtotals[$key]['taxsurcharge'] = Tools::number($value['taxsurcharge']);
        }

        return $subtotals;
    }

    /**
     * Generate the body of the page with the model data.
     *
     * @param BusinessDocument $model
     */
    protected function insertBusinessDocBody($model)
    {
        $qrTitle = $this->pipe('qrTitleAfterLines', $model);
        $qrImage = $this->pipe('qrImageAfterLines', $model);
        $qrSubtitle = $this->pipe('qrSubtitleAfterLines', $model);

        $headers = [];
        $tableOptions = [
            'cols' => [],
            'shadeCol' => [0.95, 0.95, 0.95],
            'shadeHeadingCol' => [0.95, 0.95, 0.95],
            'width' => $this->tableWidth
        ];

        // fill headers and options with the line headers information
        foreach ($this->getLineHeaders() as $key => $value) {
            $headers[$key] = $value['title'];
            if (in_array($value['type'], ['number', 'percentage'], true)) {
                $tableOptions['cols'][$key] = ['justification' => 'right'];
            }
        }

        $tableData = [];
        foreach ($model->getlines() as $line) {
            $data = [];
            foreach ($this->getLineHeaders() as $key => $value) {
                if (
                    property_exists($line, 'mostrar_precio') &&
                    $line->mostrar_precio === false &&
                    in_array($key, ['pvpunitario', 'dtopor', 'dtopor2', 'pvptotal', 'iva', 'recargo', 'irpf'], true)
                ) {
                    continue;
                }

                if ($key === 'referencia') {
                    $data[$key] = empty($line->{$key}) ? Tools::fixHtml($line->descripcion) : Tools::fixHtml($line->{$key} . " - " . $line->descripcion);
                } elseif ($key === 'cantidad' && property_exists($line, 'mostrar_cantidad')) {
                    $data[$key] = $line->mostrar_cantidad ? $line->{$key} : '';
                } elseif ($value['type'] === 'percentage') {
                    $data[$key] = Tools::number($line->{$key}) . '%';
                } elseif ($value['type'] === 'number') {
                    $data[$key] = Tools::number($line->{$key});
                } else {
                    $data[$key] = $line->{$key};
                }
            }

            $tableData[] = $data;

            if (property_exists($line, 'salto_pagina') && $line->salto_pagina) {
                $this->removeEmptyCols($tableData, $headers, Tools::number(0));
                $this->pdf->ezTable($tableData, $headers, '', $tableOptions);
                $tableData = [];
                $this->pdf->ezNewPage();
            }
        }

        if (false === empty($tableData)) {
            $this->removeEmptyCols($tableData, $headers, Tools::number(0));
            $this->pdf->ezTable($tableData, $headers, '', $tableOptions);
        }

        // añadir el código QR si existe
        if (!empty($qrImage)) {
            // Añadir margen superior antes del QR
            $this->pdf->y -= 10;

            // Calcular el ancho disponible con margen derecho (usar mismo layout que el header)
            $pageWidth = $this->pdf->ez['pageWidth'] - $this->pdf->ez['leftMargin'] - $this->pdf->ez['rightMargin'];
            $rightBlockWidth = $pageWidth * 0.2; // 20% para el QR (igual que en header)
            $leftBlockWidth = $pageWidth * 0.8;  // 80% espacio libre a la izquierda (igual que en header)

            $this->renderQRimage($qrImage, $qrTitle, $qrSubtitle, $this->pdf->ez['leftMargin'], $this->pdf->y, $leftBlockWidth, $rightBlockWidth);
        }
    }

    /**
     * Inserts the footer of the page with the model data.
     *
     * @param BusinessDocument $model
     */
    protected function insertBusinessDocFooter($model)
    {
        // excepciones de IVA
        $exceptions = $this->getTaxExceptions($model);
        if (!empty($exceptions)) {
            $this->newPage();
            $this->pdf->ezText($this->i18n->trans('tax-exceptions') . "\n", self::FONT_SIZE);
            $this->newLine();
            foreach ($exceptions as $exception) {
                $this->pdf->ezText('- ' . $exception . "\n", self::FONT_SIZE);
            }
        }

        if (!empty($model->observaciones)) {
            $this->newPage();
            $this->pdf->ezText($this->i18n->trans('observations') . "\n", self::FONT_SIZE);
            $this->newLine();
            $this->pdf->ezText(Tools::fixHtml($model->observaciones) . "\n", self::FONT_SIZE);
        }

        $this->newPage();

        // taxes
        $taxHeaders = [
            'tax' => $this->i18n->trans('tax'),
            'taxbase' => $this->i18n->trans('tax-base'),
            'taxp' => $this->i18n->trans('percentage'),
            'taxamount' => $this->i18n->trans('amount'),
            'taxsurchargep' => $this->i18n->trans('re'),
            'taxsurcharge' => $this->i18n->trans('amount')
        ];
        $taxRows = $this->getTaxesRows($model);
        $taxTableOptions = [
            'cols' => [
                'tax' => ['justification' => 'right'],
                'taxbase' => ['justification' => 'right'],
                'taxp' => ['justification' => 'right'],
                'taxamount' => ['justification' => 'right'],
                'taxsurchargep' => ['justification' => 'right'],
                'taxsurcharge' => ['justification' => 'right']
            ],
            'shadeCol' => [0.95, 0.95, 0.95],
            'shadeHeadingCol' => [0.95, 0.95, 0.95],
            'width' => $this->tableWidth
        ];
        if (count($taxRows) > 1) {
            $this->removeEmptyCols($taxRows, $taxHeaders, Tools::number(0));
            $this->pdf->ezTable($taxRows, $taxHeaders, '', $taxTableOptions);
            $this->pdf->ezText("\n");
        } elseif ($this->pdf->ezPageCount < 2 && strlen($this->format->texto ?? '') < 400 && $this->pdf->y > static::INVOICE_TOTALS_Y) {
            $this->pdf->y = static::INVOICE_TOTALS_Y;
        }

        // subtotals
        $headers = [
            'currency' => $this->i18n->trans('currency'),
            'subtotal' => $this->i18n->trans('subtotal'),
            'dto' => $this->i18n->trans('global-dto'),
            'dto-2' => $this->i18n->trans('global-dto-2'),
            'net' => $this->i18n->trans('net'),
            'taxes' => $this->i18n->trans('taxes'),
            'totalSurcharge' => $this->i18n->trans('re'),
            'totalIrpf' => $this->i18n->trans('retention'),
            'totalSupplied' => $this->i18n->trans('supplied-amount'),
            'total' => $this->i18n->trans('total')
        ];
        $rows = [
            [
                'currency' => $this->getDivisaName($model->coddivisa),
                'subtotal' => Tools::number($model->netosindto != $model->neto ? $model->netosindto : 0),
                'dto' => Tools::number($model->dtopor1) . '%',
                'dto-2' => Tools::number($model->dtopor2) . '%',
                'net' => Tools::number($model->neto),
                'taxes' => Tools::number($model->totaliva),
                'totalSurcharge' => Tools::number($model->totalrecargo),
                'totalIrpf' => Tools::number(0 - $model->totalirpf),
                'totalSupplied' => Tools::number($model->totalsuplidos),
                'total' => Tools::number($model->total)
            ]
        ];
        $this->removeEmptyCols($rows, $headers, Tools::number(0));
        $tableOptions = [
            'cols' => [
                'subtotal' => ['justification' => 'right'],
                'dto' => ['justification' => 'right'],
                'dto-2' => ['justification' => 'right'],
                'net' => ['justification' => 'right'],
                'taxes' => ['justification' => 'right'],
                'totalSurcharge' => ['justification' => 'right'],
                'totalIrpf' => ['justification' => 'right'],
                'totalSupplied' => ['justification' => 'right'],
                'total' => ['justification' => 'right']
            ],
            'shadeCol' => [0.95, 0.95, 0.95],
            'shadeHeadingCol' => [0.95, 0.95, 0.95],
            'width' => $this->tableWidth
        ];
        $this->pdf->ezTable($rows, $headers, '', $tableOptions);

        // receipts
        if ($model->modelClassName() === 'FacturaCliente') {
            $this->insertInvoiceReceipts($model);
        } elseif (isset($model->codcliente)) {
            $this->insertInvoicePayMethod($model);
        }

        if (!empty($this->format->texto)) {
            $this->pdf->ezText("\n" . Tools::fixHtml($this->format->texto), self::FONT_SIZE);
        }
    }

    /**
     * Inserts the header of the page with the model data.
     *
     * @param BusinessDocument $model
     */
    protected function insertBusinessDocHeader($model)
    {
        // obtenemos el QR y el título desde las extensiones
        $qrTitle = $this->pipe('qrTitleHeader', $model);
        $qrImage = $this->pipe('qrImageHeader', $model);
        $qrSubtitle = $this->pipe('qrSubtitleHeader', $model);


        // Definir anchos de los bloques según si existe imagen QR o no
        $pageWidth = $this->pdf->ez['pageWidth'] - $this->pdf->ez['leftMargin'] - $this->pdf->ez['rightMargin'];
        $hasQrImage = !empty($qrImage);

        if ($hasQrImage) {
            // Si hay QR, usar layout de 80% / 20%
            $leftBlockWidth = $pageWidth * 0.8;
            $rightBlockWidth = $pageWidth * 0.2;
        } else {
            // Si no hay QR, usar el 100% del ancho para la tabla
            $leftBlockWidth = $pageWidth;
            $rightBlockWidth = 0;
        }

        $startY = $this->pdf->y;
        $startX = $this->pdf->ez['leftMargin'];

        // --- BLOQUE IZQUIERDO (80%) ---
        $this->pdf->saveState();
        $this->pdf->ezSetY($startY);
        $headerData = [
            'title' => $this->i18n->trans($model->modelClassName() . '-min'),
            'subject' => $this->i18n->trans('customer'),
            'fieldName' => 'nombrecliente'
        ];
        if (isset($model->codproveedor)) {
            $headerData['subject'] = $this->i18n->trans('supplier');
            $headerData['fieldName'] = 'nombre';
        }
        if (!empty($this->format->titulo)) {
            $headerData['title'] = Tools::fixHtml($this->format->titulo);
        }

        // Título alineado a la izquierda y dentro del bloque
        $this->pdf->ezText("\n" . $headerData['title'] . ': ' . $model->codigo, self::FONT_SIZE + 6, [
            'justification' => 'left',
            'left' => $startX - $this->pdf->ez['leftMargin'], // compensar margen
            'width' => $leftBlockWidth
        ]);

        // Línea divisoria solo del 80%
        $lineY = $this->pdf->y;
        $this->pdf->setStrokeColor(0, 0, 0);
        $this->pdf->line($startX, $lineY - 8, $startX + $leftBlockWidth, $lineY - 8);
        $this->pdf->y -= 10;
        $subject = $model->getSubject();
        $tipoIdFiscal = empty($subject->tipoidfiscal) ? $this->i18n->trans('cifnif') : $subject->tipoidfiscal;
        $serie = $model->getSerie();
        $tableData = [
            ['key' => $headerData['subject'], 'value' => Tools::fixHtml($model->{$headerData['fieldName']})],
            ['key' => $this->i18n->trans('date'), 'value' => $model->fecha],
            ['key' => $this->i18n->trans('address'), 'value' => $this->getDocAddress($subject, $model)],
            ['key' => $this->i18n->trans('code'), 'value' => $model->codigo],
            ['key' => $tipoIdFiscal, 'value' => $model->cifnif],
            ['key' => $this->i18n->trans('number'), 'value' => $model->numero],
            ['key' => $this->i18n->trans('serie'), 'value' => $serie->descripcion]
        ];
        if (isset($model->codigorect) && !empty($model->codigorect)) {
            $original = new $model();
            if ($original->loadWhereEq('codigo', $model->codigorect)) {
                $tableData[3] = [
                    'key' => $this->i18n->trans('original'),
                    'value' => $model->codigorect . ', ' . $original->fecha
                ];
            }
        } elseif (property_exists($model, 'numproveedor') && $model->numproveedor) {
            $tableData[3] = ['key' => $this->i18n->trans('numsupplier'), 'value' => $model->numproveedor];
        } elseif (property_exists($model, 'numero2') && $model->numero2) {
            $tableData[3] = ['key' => $this->i18n->trans('number2'), 'value' => $model->numero2];
        } else {
            $tableData[3] = ['key' => $this->i18n->trans('serie'), 'value' => $serie->descripcion];
            unset($tableData[6]);
        }

        // Opciones de la tabla
        $tableWidth = $leftBlockWidth + 5;
        $tableOptions = [
            'width' => $tableWidth,
            'showHeadings' => 0,
            'shaded' => 0,
            'lineCol' => [1, 1, 1],
            'cols' => [],
            'xPos' => $startX + ($tableWidth / 2) - 5, // Posicionar el centro de la tabla para que empiece en el margen izquierdo
        ];
        $this->insertParallelTable($tableData, '', $tableOptions);
        $this->pdf->ezText('');
        $this->pdf->restoreState();

        // --- BLOQUE DERECHO (20%) ---
        $this->renderQRimage($qrImage, $qrTitle, $qrSubtitle, $startX, $startY, $leftBlockWidth, $rightBlockWidth);

        // Si hay dirección de envío, insertarla después
        if (!empty($model->idcontactoenv) && ($model->idcontactoenv != $model->idcontactofact || !empty($model->codtrans))) {
            $this->insertBusinessDocShipping($model);
        }
    }

    /**
     * Inserts the address of delivery with the model data.
     *
     * @param BusinessDocument $model
     */
    protected function insertBusinessDocShipping($model)
    {
        $this->pdf->ezText("\n" . $this->i18n->trans('shipping-address') . "\n", self::FONT_SIZE + 6);
        $this->newLine();

        $contacto = new Contacto();
        if ($contacto->load($model->idcontactoenv)) {
            $name = Tools::fixHtml($contacto->nombre) . ' ' . Tools::fixHtml($contacto->apellidos);
            $carrier = new AgenciaTransporte();
            $carrierName = $carrier->load($model->codtrans) ? $carrier->nombre : '-';
            $tableData = [
                ['key' => $this->i18n->trans('name'), 'value' => $name],
                ['key' => $this->i18n->trans('carrier'), 'value' => $carrierName],
                ['key' => $this->i18n->trans('address'), 'value' => $this->combineAddress($contacto)],
                ['key' => $this->i18n->trans('tracking-code'), 'value' => $model->codigoenv]
            ];

            $tableOptions = [
                'width' => $this->tableWidth,
                'showHeadings' => 0,
                'shaded' => 0,
                'lineCol' => [1, 1, 1],
                'cols' => []
            ];
            $this->insertParallelTable($tableData, '', $tableOptions);
            $this->pdf->ezText('');
        }
    }

    /**
     * Inserts company logo to PDF document or dies with a message to try to solve the problem.
     *
     * @param int $idfile
     */
    protected function insertCompanyLogo($idfile = 0)
    {
        if (!function_exists('imagecreatefromstring')) {
            die('ERROR: function imagecreatefromstring() not found. '
                . ' Do you have installed php-gd package and enabled support to allow us render images? .'
                . 'Note that the package name can differ between operating system or PHP version.');
        }

        $xPos = $this->pdf->ez['leftMargin'];

        $logoFile = new AttachedFile();
        if ($idfile !== 0 && $logoFile->load($idfile) && file_exists($logoFile->path)) {
            $logoSize = $this->calcImageSize($logoFile->path);
            $yPos = $this->pdf->ez['pageHeight'] - $logoSize['height'] - $this->pdf->ez['topMargin'];
            $this->addImageFromAttachedFile($logoFile, $xPos, $yPos, $logoSize['width'], $logoSize['height']);
        } else {
            $logoPath = FS_FOLDER . '/Dinamic/Assets/Images/horizontal-logo.png';
            $logoSize = $this->calcImageSize($logoPath);
            $yPos = $this->pdf->ez['pageHeight'] - $logoSize['height'] - $this->pdf->ez['topMargin'];
            $this->addImageFromFile($logoPath, $xPos, $yPos, $logoSize['width'], $logoSize['height']);
        }

        // add some margin
        $this->pdf->y -= 20;
    }

    /**
     * Insert footer details.
     */
    protected function insertFooter()
    {
        $now = $this->i18n->trans('generated-at', ['%when%' => date('d-m-Y H:i')]);
        $this->pdf->addText($this->tableWidth + self::CONTENT_X, self::FOOTER_Y, self::FONT_SIZE, $now, 0, 'right');
    }

    /**
     * Insert header details.
     *
     * @param int $idempresa
     */
    protected function insertHeader($idempresa = null)
    {
        if ($this->insertedHeader) {
            return;
        }

        $this->insertedHeader = true;
        $code = $idempresa ?? Tools::settings('default', 'idempresa', '');
        $company = new Empresa();
        if (false === $company->load($code)) {
            return;
        }

        $size = mb_strlen($company->nombre) > 20 ? self::FONT_SIZE + 2 : self::FONT_SIZE + 7;
        $this->pdf->ezText(Tools::fixHtml($company->nombre), $size, ['justification' => 'right']);
        $address = $company->direccion;
        $address .= empty($company->codpostal) ? "\n" : "\n" . $company->codpostal . ', ';
        $address .= empty($company->ciudad) ? '' : $company->ciudad;
        $address .= empty($company->provincia) ? '' : ' (' . $company->provincia . ') ' . $this->getCountryName($company->codpais);

        $contactData = [];
        foreach (['telefono1', 'telefono2', 'email', 'web'] as $field) {
            if (!empty($company->{$field})) {
                $contactData[] = $company->{$field};
            }
        }

        $lineText = $company->cifnif . ' - ' . Tools::fixHtml($address) . "\n\n" . implode(' · ', $contactData);
        $this->pdf->ezText($lineText, self::FONT_SIZE, ['justification' => 'right']);

        $idLogo = $this->format->idlogo ?? $company->idlogo;
        $this->insertCompanyLogo($idLogo);
    }

    /**
     * @param FacturaCliente $invoice
     */
    protected function insertInvoicePayMethod($invoice)
    {
        $headers = [
            'method' => $this->i18n->trans('payment-method'),
            'expiration' => $this->i18n->trans('expiration')
        ];

        $expiration = $invoice->finoferta ?? '';
        $rows = [
            ['method' => $this->getBankData($invoice), 'expiration' => $expiration]
        ];

        $tableOptions = [
            'cols' => [
                'method' => ['justification' => 'left'],
                'expiration' => ['justification' => 'right']
            ],
            'shadeCol' => [0.95, 0.95, 0.95],
            'shadeHeadingCol' => [0.95, 0.95, 0.95],
            'width' => $this->tableWidth
        ];
        $this->pdf->ezText("\n");
        $this->pdf->ezTable($rows, $headers, '', $tableOptions);
    }

    /**
     * @param FacturaCliente $invoice
     */
    protected function insertInvoiceReceipts($invoice)
    {
        $receipts = $invoice->getReceipts();
        if (count($receipts) > 0) {
            $headers = [
                'numero' => $this->i18n->trans('receipt'),
                'bank' => $this->i18n->trans('payment-method'),
                'importe' => $this->i18n->trans('amount'),
                'vencimiento' => $this->i18n->trans('expiration')
            ];
            $rows = [];
            foreach ($receipts as $receipt) {
                $payLink = $receipt->url('pay');
                $rows[] = [
                    'numero' => $receipt->numero,
                    'bank' => empty($payLink) ? $this->getBankData($receipt) : '<c:alink:' . $payLink . '>'
                        . $this->i18n->trans('pay') . '</c:alink>',
                    'importe' => Tools::number($receipt->importe),
                    'vencimiento' => $receipt->pagado ? $this->i18n->trans('paid') : $receipt->vencimiento
                ];
            }
            $tableOptions = [
                'cols' => [
                    'numero' => ['justification' => 'center'],
                    'bank' => ['justification' => 'center'],
                    'importe' => ['justification' => 'right'],
                    'vencimiento' => ['justification' => 'right']
                ],
                'shadeCol' => [0.95, 0.95, 0.95],
                'shadeHeadingCol' => [0.95, 0.95, 0.95],
                'width' => $this->tableWidth
            ];
            $this->pdf->ezText("\n");
            $this->pdf->ezTable($rows, $headers, '', $tableOptions);
        }
    }

    protected function renderQRimage(?string $qrImage, ?string $qrTitle, ?string $qrSubtitle, float $startX, float $startY, float $leftBlockWidth, float $rightBlockWidth): void
    {
        if (empty($qrImage)) {
            return;
        }

        // Definir espacio disponible para el QR
        $availableWidth = $rightBlockWidth - 10;

        // Tamaño fijo de 110 puntos, mínimo para que tenga 3x3cm
        $qrSize = 110;

        // Calcular posición para centrar el QR horizontalmente en el espacio disponible
        $qrX = $startX + $leftBlockWidth + 10 + ($availableWidth - $qrSize) / 2; // Centrar el QR
        $qrY = $startY - 10; // Ajuste para alineación superior

        // Detectar si $qrImage es una ruta de archivo o base64
        if (str_starts_with($qrImage, 'data:image/')) {
            // Es una imagen en base64 - crear archivo temporal
            $base64Data = explode(',', $qrImage, 2)[1] ?? $qrImage;
            $imageData = base64_decode($base64Data);

            // Verificar si la decodificación fue exitosa
            if ($imageData === false) {
                return;
            }

            // Determinar el tipo de imagen desde el data URI
            $mimeType = 'image/png'; // por defecto PNG
            if (preg_match('/data:image\/([^;]+)/', $qrImage, $matches)) {
                $mimeType = 'image/' . $matches[1];
            }

            // Crear archivo temporal
            $extension = ($mimeType === 'image/png') ? '.png' : '.jpg';
            $tempFile = tempnam(sys_get_temp_dir(), 'qr_') . $extension;
            if (!file_put_contents($tempFile, $imageData)) {
                return;
            }

            try {
                // Usar la función nativa de Cezpdf para añadir la imagen con dimensiones cuadradas
                if ($mimeType === 'image/png') {
                    $this->pdf->addPngFromFile($tempFile, $qrX, $qrY - $qrSize, $qrSize, $qrSize);
                } else {
                    $this->pdf->addJpegFromFile($tempFile, $qrX, $qrY - $qrSize, $qrSize, $qrSize);
                }
            } catch (Exception $e) {
                return;
            } finally {
                // Limpiar el archivo temporal
                if (file_exists($tempFile)) {
                    unlink($tempFile);
                }
            }
        } elseif (file_exists($qrImage)) {
            // Es una ruta de archivo válida - usar directamente los métodos nativos
            $extension = strtolower(pathinfo($qrImage, PATHINFO_EXTENSION));

            try {
                if ($extension === 'png') {
                    $this->pdf->addPngFromFile($qrImage, $qrX, $qrY - $qrSize, $qrSize, $qrSize);
                } else {
                    $this->pdf->addJpegFromFile($qrImage, $qrX, $qrY - $qrSize, $qrSize, $qrSize);
                }
            } catch (Exception $e) {
                return;
            }
        } else {
            return;
        }

        $this->renderQRtext($qrTitle, $qrX, $qrY, $qrSize);
        $this->renderQRtext($qrSubtitle, $qrX, $qrY, $qrSize, false);
    }

    protected function renderQRtext(?string $qrTitle, float $qrX, float $qrY, float $qrSize, bool $title = true): void
    {
        if (empty($qrTitle)) {
            return;
        }

        // Añadir texto del QR si existe
        $textX = $qrX + $qrSize / 2; // Centrar el texto horizontalmente respecto al QR

        // si es título, poner encima del QR, si no, debajo
        if ($title) {
            $textY = $qrY - 3;
        } else {
            $textY = $qrY - $qrSize - 3;
        }

        // Calcular el ancho disponible para el texto (desde el inicio del QR hasta el margen derecho)
        $pageRightMargin = $this->pdf->ez['pageWidth'] - $this->pdf->ez['rightMargin'];
        $availableTextWidth = $pageRightMargin - $qrX;

        // Estimar el ancho del texto
        $textWidth = $this->pdf->getTextWidth(self::FONT_SIZE, $qrTitle);

        if ($textWidth <= $availableTextWidth) {
            // El texto cabe en una línea
            $this->pdf->addText($textX, $textY, self::FONT_SIZE, $qrTitle, 0, 'center');

            // Actualizar posición Y para texto en una línea
            $newY = $textY - self::FONT_SIZE - 10; // Altura del texto + margen
        } else {
            // El texto es demasiado ancho, necesitamos dividirlo en líneas
            $words = explode(' ', $qrTitle);
            $lines = [];
            $currentLine = '';

            // Si no hay espacios en el texto (es una sola "palabra"), dividir por caracteres
            if (count($words) === 1) {
                $text = $qrTitle;
                $currentLine = '';

                foreach (mb_str_split($text) as $char) {
                    $testLine = $currentLine . $char;
                    $testWidth = $this->pdf->getTextWidth(self::FONT_SIZE, $testLine);

                    if ($testWidth <= $availableTextWidth) {
                        $currentLine = $testLine;
                    } else {
                        if (!empty($currentLine)) {
                            $lines[] = $currentLine;
                            $currentLine = $char;
                        } else {
                            // Si un solo carácter no cabe, lo añadimos anyway
                            $lines[] = $char;
                        }
                    }
                }

                // Añadir la última línea si no está vacía
                if (!empty($currentLine)) {
                    $lines[] = $currentLine;
                }
            } else {
                // Hay espacios, dividir por palabras como antes
                foreach ($words as $word) {
                    $testLine = empty($currentLine) ? $word : $currentLine . ' ' . $word;
                    $testWidth = $this->pdf->getTextWidth(self::FONT_SIZE, $testLine);

                    if ($testWidth <= $availableTextWidth) {
                        $currentLine = $testLine;
                    } else {
                        if (!empty($currentLine)) {
                            $lines[] = $currentLine;
                            $currentLine = $word;
                        } else {
                            // La palabra sola es demasiado larga, dividir por caracteres
                            $currentLine = '';
                            foreach (mb_str_split($word) as $char) {
                                $testLine = $currentLine . $char;
                                $testWidth = $this->pdf->getTextWidth(self::FONT_SIZE, $testLine);

                                if ($testWidth <= $availableTextWidth) {
                                    $currentLine = $testLine;
                                } else {
                                    if (!empty($currentLine)) {
                                        $lines[] = $currentLine;
                                        $currentLine = $char;
                                    } else {
                                        $lines[] = $char;
                                    }
                                }
                            }
                        }
                    }
                }

                // Añadir la última línea si no está vacía
                if (!empty($currentLine)) {
                    $lines[] = $currentLine;
                }
            }

            // Renderizar las líneas centradas
            $lineHeight = self::FONT_SIZE + 2; // Espaciado entre líneas
            for ($i = 0; $i < count($lines); $i++) {
                $lineY = $textY - ($i * $lineHeight);
                $this->pdf->addText($textX, $lineY, self::FONT_SIZE, $lines[$i], 0, 'center');
            }

            // Actualizar la posición Y del PDF para evitar solapamiento con contenido posterior
            $totalTextHeight = count($lines) * $lineHeight;
            $newY = $textY - $totalTextHeight - 10; // 10 puntos de margen adicional
        }

        if ($newY < $this->pdf->y) {
            $this->pdf->y = $newY;
        }
    }
}
