<?php

namespace LWVendor\PhpOffice\PhpSpreadsheet\Writer\Ods;

use LWVendor\PhpOffice\PhpSpreadsheet\Calculation\Calculation;
use LWVendor\PhpOffice\PhpSpreadsheet\DefinedName;
class Formula
{
    /** @var array */
    private $definedNames = [];
    /**
     * @param DefinedName[] $definedNames
     */
    public function __construct(array $definedNames)
    {
        foreach ($definedNames as $definedName) {
            $this->definedNames[] = $definedName->getName();
        }
    }
    public function convertFormula(string $formula, string $worksheetName = '') : string
    {
        $formula = $this->convertCellReferences($formula, $worksheetName);
        $formula = $this->convertDefinedNames($formula);
        if (\substr($formula, 0, 1) !== '=') {
            $formula = '=' . $formula;
        }
        return 'of:' . $formula;
    }
    private function convertDefinedNames(string $formula) : string
    {
        $splitCount = \preg_match_all('/' . Calculation::CALCULATION_REGEXP_DEFINEDNAME . '/mui', $formula, $splitRanges, \PREG_OFFSET_CAPTURE);
        $lengths = \array_map('strlen', \array_column($splitRanges[0], 0));
        $offsets = \array_column($splitRanges[0], 1);
        $values = \array_column($splitRanges[0], 0);
        while ($splitCount > 0) {
            --$splitCount;
            $length = $lengths[$splitCount];
            $offset = $offsets[$splitCount];
            $value = $values[$splitCount];
            if (\in_array($value, $this->definedNames, \true)) {
                $formula = \substr($formula, 0, $offset) . '$$' . $value . \substr($formula, $offset + $length);
            }
        }
        return $formula;
    }
    private function convertCellReferences(string $formula, string $worksheetName) : string
    {
        $splitCount = \preg_match_all('/' . Calculation::CALCULATION_REGEXP_CELLREF_RELATIVE . '/mui', $formula, $splitRanges, \PREG_OFFSET_CAPTURE);
        $lengths = \array_map('strlen', \array_column($splitRanges[0], 0));
        $offsets = \array_column($splitRanges[0], 1);
        $worksheets = $splitRanges[2];
        $columns = $splitRanges[6];
        $rows = $splitRanges[7];
        // Replace any commas in the formula with semi-colons for Ods
        // If by chance there are commas in worksheet names, then they will be "fixed" again in the loop
        //    because we've already extracted worksheet names with our preg_match_all()
        $formula = \str_replace(',', ';', $formula);
        while ($splitCount > 0) {
            --$splitCount;
            $length = $lengths[$splitCount];
            $offset = $offsets[$splitCount];
            $worksheet = $worksheets[$splitCount][0];
            $column = $columns[$splitCount][0];
            $row = $rows[$splitCount][0];
            $newRange = '';
            if (empty($worksheet)) {
                if ($offset === 0 || $formula[$offset - 1] !== ':') {
                    // We need a worksheet
                    $worksheet = $worksheetName;
                }
            } else {
                $worksheet = \str_replace("''", "'", \trim($worksheet, "'"));
            }
            if (!empty($worksheet)) {
                $newRange = "['" . \str_replace("'", "''", $worksheet) . "'";
            } elseif (\substr($formula, $offset - 1, 1) !== ':') {
                $newRange = '[';
            }
            $newRange .= '.';
            if (!empty($column)) {
                $newRange .= $column;
            }
            if (!empty($row)) {
                $newRange .= $row;
            }
            // close the wrapping [] unless this is the first part of a range
            $newRange .= \substr($formula, $offset + $length, 1) !== ':' ? ']' : '';
            $formula = \substr($formula, 0, $offset) . $newRange . \substr($formula, $offset + $length);
        }
        return $formula;
    }
}