<?php

/*
 * This file is part of the Kimai time-tracking app.
 *
 * For the full copyright and license information, please view the LICENSE
 * file that was distributed with this source code.
 */

namespace App\Tests\Twig;

use App\Configuration\LocaleService;
use App\Entity\Timesheet;
use App\Entity\User;
use App\Twig\LocaleFormatExtensions;
use App\Utils\LocaleFormatter;
use PHPUnit\Framework\Attributes\CoversClass;
use PHPUnit\Framework\Attributes\DataProvider;
use PHPUnit\Framework\TestCase;
use Symfony\Component\Intl\Util\IntlTestHelper;
use Twig\TwigFilter;
use Twig\TwigFunction;
use Twig\TwigTest;

#[CoversClass(LocaleFormatExtensions::class)]
#[CoversClass(LocaleFormatter::class)]
class LocaleFormatExtensionsTest extends TestCase
{
    private array $localeEn = ['en' => ['date' => 'Y-m-d', 'duration' => '%h:%m', 'time' => 'h:mm a']];
    private array $localeDe = ['de' => ['date' => 'd.m.Y', 'duration' => '%h:%m', 'time' => 'HH:mm']];
    private array $localeFake = ['XX' => ['date' => 'd.m.Y', 'duration' => '%h - %m - %s Zeit', 'time' => 'HH:mm']];

    private ?string $oldTimezone = null;

    /**
     * This method is called before each test.
     */
    protected function setUp(): void
    {
        $this->oldTimezone = date_default_timezone_get();
        date_default_timezone_set('Europe/Vienna');
    }

    protected function tearDown(): void
    {
        date_default_timezone_set($this->oldTimezone);
        $this->oldTimezone = null;
    }

    /**
     * @param array<string, array{'date': string, 'time': string, 'rtl': bool, 'translation': bool}> $languageSettings
     */
    private function getSut(string $locale, array $languageSettings): LocaleFormatExtensions
    {
        $user = new User();
        $user->setTimezone('Europe/Vienna');

        $sut = new LocaleFormatExtensions(new LocaleService($languageSettings));
        $sut->setLocale($locale);

        return $sut;
    }

    public function testGetFilters(): void
    {
        $filters = [
            'month_name',
            'day_name',
            'date_short',
            'date_time',
            'date_full',
            'date_format',
            'date_weekday',
            'time',
            'duration',
            'chart_duration',
            'chart_money',
            'duration_decimal',
            'money',
            'amount',
            'js_format',
            'pattern',
        ];
        $i = 0;

        $sut = $this->getSut('de', []);
        $twigFilters = $sut->getFilters();
        //self::assertCount(\count($filters), $twigFilters);

        foreach ($twigFilters as $filter) {
            self::assertInstanceOf(TwigFilter::class, $filter);
            self::assertEquals($filters[$i++], $filter->getName());
        }
    }

    public function testGetFunctions(): void
    {
        $functions = ['javascript_configurations', 'create_date', 'month_names', 'locale_format'];
        $i = 0;

        $sut = $this->getSut('de', []);
        $twigFunctions = $sut->getFunctions();
        self::assertCount(\count($functions), $twigFunctions);

        /** @var TwigFunction $filter */
        foreach ($twigFunctions as $filter) {
            self::assertInstanceOf(TwigFunction::class, $filter);
            self::assertEquals($functions[$i++], $filter->getName());
        }
    }

    public function testGetTests(): void
    {
        $tests = ['weekend', 'today'];
        $i = 0;

        $sut = $this->getSut('de', []);
        $twigTests = $sut->getTests();
        self::assertCount(\count($tests), $twigTests);

        /** @var TwigTest $test */
        foreach ($twigTests as $test) {
            self::assertInstanceOf(TwigTest::class, $test);
            self::assertEquals($tests[$i++], $test->getName());
        }
    }

    #[DataProvider('getDateShortData')]
    public function testDateShort(string $locale, \DateTime|string|null $date, string $expected): void
    {
        $sut = $this->getSut($locale, [
            'de' => array_merge(LocaleService::DEFAULT_SETTINGS, ['date' => 'dd.MM.Y']),
            'en' => array_merge(LocaleService::DEFAULT_SETTINGS, ['date' => 'Y-MM-dd']),
            'ru' => array_merge(LocaleService::DEFAULT_SETTINGS, ['date' => 'dd.MM.Y']),
        ]);
        self::assertEquals($expected, $sut->dateShort($date));
    }

    /**
     * @return array<int, array<int, \DateTime|string|null>>
     */
    public static function getDateShortData(): array
    {
        $timezone = new \DateTimeZone('Europe/Vienna');

        return [
            ['en', new \DateTime('7 January 2010 12:00:00', $timezone), '2010-01-07'],
            ['en', new \DateTime('2016-06-23 12:00:00', $timezone), '2016-06-23'],
            ['de', new \DateTime('1980-12-14 12:00:00', $timezone), '14.12.1980'],
            ['ru', new \DateTime('1980-12-14 12:00:00', $timezone), '14.12.1980'],
            ['ru', '1980-12-14 12:00:00', '14.12.1980'],
            ['ru', null, ''],
            ['ru', '', ''],
        ];
    }

    #[DataProvider('getDateTimeData')]
    public function testDateTime(string $locale, \DateTime|string|null $date, string $expected): void
    {
        $sut = $this->getSut($locale, [
            'de' => array_merge(LocaleService::DEFAULT_SETTINGS, ['date' => 'dd.MM.Y', 'time' => 'HH:mm:s']),
            'en' => array_merge(LocaleService::DEFAULT_SETTINGS, ['date' => 'Y-MM-dd', 'time' => 'h:mm a']),
        ]);
        self::assertEquals($expected, $sut->dateTime($date));
    }

    /**
     * @return array<int, array<int, \DateTime|string|null>>
     * @throws \Exception
     */
    public static function getDateTimeData(): array
    {
        $timezone = new \DateTimeZone('Europe/Vienna');

        return [
            ['en', new \DateTime('7 January 2010 00:01:00', $timezone), '2010-01-07 12:01 AM'],
            ['de', (new \DateTime('1980-12-14', $timezone))->setTime(13, 27, 55), '14.12.1980 13:27:55'],
            ['de', '1980-12-14 13:27:55', '14.12.1980 13:27:55'],
            ['de', null, ''],
            ['de', '', ''],
        ];
    }

    #[DataProvider('getDayNameTestData')]
    public function testDayName(string $locale, string $date, string $expectedName, bool $short): void
    {
        $sut = $this->getSut($locale, []);
        self::assertEquals($expectedName, $sut->dayName(new \DateTime($date), $short));
    }

    /**
     * @return array<int, array<int, string|bool>>
     */
    public static function getDayNameTestData(): array
    {
        return [
            ['de', '2020-07-09 12:00:00', 'Donnerstag', false],
            ['en', '2020-07-09 12:00:00', 'Thursday', false],
            ['de', '2020-07-09 12:00:00', 'Do.', true],
            ['en', '2020-07-09 12:00:00', 'Thu', true],
        ];
    }

    #[DataProvider('getMonthNameTestData')]
    public function testMonthName(string $locale, string $date, string $expectedName, bool $withYear = false): void
    {
        $sut = $this->getSut($locale, []);
        self::assertEquals($expectedName, $sut->monthName(new \DateTime($date), $withYear));
    }

    /**
     * @return array<int, array<int, string|bool>>
     */
    public static function getMonthNameTestData(): array
    {
        return [
            ['de', '2020-07-09 23:59:59', 'Juli', false],
            ['en', '2020-07-09 23:59:59', 'July', false],
            ['de', 'January 2016', 'Januar', false],
            ['en', 'January 2016', 'January', false],
            ['en', '2016-12-23', 'December', false],
            ['ru', '2016-12-23', 'декабрь', false],
            ['de', '2020-07-09 23:59:59', 'Juli 2020', true],
            ['en', '2020-07-09 23:59:59', 'July 2020', true],
            ['de', 'January 2016', 'Januar 2016', true],
            ['en', 'January 2016', 'January 2016', true],
            ['en', '2015-12-23', 'December 2015', true],
            ['ru', '2015-12-23', 'декабрь 2015', true],
        ];
    }

    public function testDateFormat(): void
    {
        $date = new \DateTime('7 January 2010 17:43:21', new \DateTimeZone('Europe/Berlin'));
        $sut = $this->getSut('en', []);
        self::assertEquals('2010-01-07T17:43:21+01:00', $sut->dateFormat($date, 'c'));
        self::assertStringStartsWith('2010-01-07T17:43:21', $sut->dateFormat('7 January 2010 17:43:21', 'c'));
    }

    public function testTime(): void
    {
        $time = new \DateTime('2016-06-23');
        $time->setTime(17, 53, 23);

        $sut = $this->getSut('en', ['en' => array_merge(LocaleService::DEFAULT_SETTINGS, ['time' => 'HH:mm'])]);
        self::assertEquals('17:53', $sut->time($time));
        self::assertEquals('17:53', $sut->time('2016-06-23 17:53'));
    }

    public function testCreateDate(): void
    {
        $user = new User();
        $user->setTimezone('Europe/Berlin');
        $sut = $this->getSut('en', []);
        $date = $sut->createDate('now', $user);
        self::assertEquals('Europe/Berlin', $date->getTimezone()->getName());

        $user->setTimezone('Asia/Dubai');
        $date = $sut->createDate('2019-08-27 16:30:45', $user);
        self::assertEquals('2019-08-27T16:30:45+04:00', $date->format(DATE_ATOM));
        self::assertEquals('Asia/Dubai', $date->getTimezone()->getName());

        $date = $sut->createDate('2019-08-27 16:30:45', null);
        self::assertEquals(date_default_timezone_get(), $date->getTimezone()->getName());
    }

    public function testMoneyWithoutCurrency(): void
    {
        $sut = $this->getSut('en', $this->localeEn);
        self::assertEquals('123.75', $sut->money(123.75));

        $sut = $this->getSut('de', $this->localeEn);
        self::assertEquals('123.234,76', $sut->money(123234.7554, null, true));
        self::assertEquals('123.234,76', $sut->money(123234.7554, null, false));
        self::assertEquals('123.234,76', $sut->money(123234.7554, 'EUR', false));
    }

    #[DataProvider('getMoneyNoCurrencyData')]
    public function testMoneyNoCurrency($result, $amount, $currency, $locale): void
    {
        $sut = $this->getSut($locale, $this->localeEn);
        self::assertEquals($result, $sut->money($amount, $currency, false));
    }

    /**
     * @return array<int, array<int, string|null|int|float>>
     */
    public static function getMoneyNoCurrencyData(): array
    {
        return [
            ['0,00', null, 'EUR', 'de'],
            ['2.345,00', 2345, 'EUR', 'de'],
            ['2,345.00', 2345, 'EUR', 'en'],
            ['2,345.01', 2345.009, 'EUR', 'en'],
            ['2.345,01', 2345.009, 'EUR', 'de'],
            ['13.75', 13.75, 'USD', 'en'],
            ['13,75', 13.75, 'USD', 'de'],
            ['13,75', 13.75, 'RUB', 'de'],
            ['13,75', 13.75, 'JPY', 'de'],
            ["13\u{a0}933,49", 13933.49, 'JPY', 'ru'],
            ['13,75', 13.75, 'CNY', 'de'],
            ['13.933,00', 13933, 'CNY', 'de'],
            ["13\u{a0}933,00", 13933, 'CNY', 'ru'],
            ['13,933.00', 13933, 'CNY', 'en'],
            ['13,933.00', 13933, 'CNY', 'zh_CN'],
            ['1.234.567,89', 1234567.891234567890000, 'USD', 'de'],
        ];
    }

    #[DataProvider('getMoneyData')]
    public function testMoney(string $result, float|int|null $amount, string $currency, string $locale): void
    {
        $sut = $this->getSut($locale, $this->localeEn);
        self::assertEquals($result, $sut->money($amount, $currency));
    }

    /**
     * @return array<int, array<int, null|string|float|int>>
     */
    public static function getMoneyData(): array
    {
        return [
            ["0,00\u{a0}€", null, 'EUR', 'de'],
            ["2.345,00\u{a0}€", 2345, 'EUR', 'de'],
            ['€2,345.00', 2345, 'EUR', 'en'],
            ['€2,345.01', 2345.009, 'EUR', 'en'],
            ["2.345,01\u{a0}€", 2345.009, 'EUR', 'de'],
            ['$13.75', 13.75, 'USD', 'en'],
            ["13,75\u{a0}\$", 13.75, 'USD', 'de'],
            ["13,75\u{a0}RUB", 13.75, 'RUB', 'de'],
            ["14\u{a0}¥", 13.75, 'JPY', 'de'],
            ["13\u{a0}933\u{a0}¥", 13933.49, 'JPY', 'ru'],
            ["13,75\u{a0}CN¥", 13.75, 'CNY', 'de'],
            ["13.933,00\u{a0}CN¥", 13933, 'CNY', 'de'],
            ["13\u{a0}933,00\u{a0}CN¥", 13933, 'CNY', 'ru'],
            ['CN¥13,933.00', 13933, 'CNY', 'en'],
            ["1.234.567,89\u{a0}\$", 1234567.891234567890000, 'USD', 'de'],
        ];
    }

    #[DataProvider('getAmountData')]
    public function testAmount(string $result, null|int|float|string $amount, string $locale): void
    {
        $sut = $this->getSut($locale, $this->localeEn);
        self::assertEquals($result, $sut->amount($amount));
    }

    /**
     * @return array<int, array<int, null|int|string|float>>
     */
    public static function getAmountData(): array
    {
        return [
            ['0', null, 'de'],
            ['2.345,01', 2345.01, 'de'],
            ['2.345', 2345, 'de'],
            ['2,345', 2345, 'en'],
            ['2,345.009', 2345.009, 'en'],
            ['2.345,009', 2345.009, 'de'],
            ['13.75', 13.75, 'en'],
            ['13,75', 13.75, 'de'],
            ['13,75', '13.75', 'de'],
            ["13\u{a0}933,49", 13933.49, 'ru'],
            ['1.234.567,891', 1234567.891234567890000, 'de'],
        ];
    }

    #[DataProvider('getMoneyData62_1')]
    public function testMoney621(string $result, null|int|float $amount, string $currency, string $locale): void
    {
        IntlTestHelper::requireFullIntl($this, '62.1');

        $sut = $this->getSut($locale, $this->localeEn);
        self::assertEquals($result, $sut->money($amount, $currency));
    }

    /**
     * @return array<int, array<int, string|float>>
     */
    public static function getMoneyData62_1(): array
    {
        return [
            ["RUB\u{a0}13.50", 13.50, 'RUB', 'en'],
            ["13,75\u{a0}₽", 13.75, 'RUB', 'ru'],
        ];
    }

    public function testDuration(): void
    {
        $record = $this->getTimesheet(9437);

        $sut = $this->getSut('en', $this->localeEn);
        self::assertEquals('2:37', $sut->duration($record->getDuration()));
        self::assertEquals('2.62', $sut->duration($record->getDuration(), true));

        // test Timesheet object
        self::assertEquals('2:37', $sut->duration($record));
        self::assertEquals('2.62', $sut->duration($record, true));

        // test extended format
        $sut = $this->getSut('XX', $this->localeFake);
        self::assertEquals('2:37', $sut->duration($record->getDuration()));

        // test negative duration
        $sut = $this->getSut('en', $this->localeEn);
        self::assertEquals('0:00', $sut->duration(0));
        self::assertEquals('0:00', $sut->duration(-1));
        self::assertEquals('0:00', $sut->duration(-59));
        self::assertEquals('-0:01', $sut->duration(-60));
        self::assertEquals('-1:36', $sut->duration(-5786));

        // test zero duration
        $sut = $this->getSut('en', $this->localeEn);
        self::assertEquals('0:00', $sut->duration(0));

        $sut = $this->getSut('en', $this->localeEn);

        self::assertEquals('0:00', $sut->duration(null));
        self::assertEquals('0.00', $sut->duration(null, true));
    }

    public function testDurationChart(): void
    {
        $sut = $this->getSut('en', $this->localeEn);
        self::assertEquals(0.34, $sut->durationChart(1234));
        self::assertEquals(3.43, $sut->durationChart(12345));
        self::assertEquals(34.29, $sut->durationChart(123456));
        self::assertEquals(342.94, $sut->durationChart(1234567));
    }

    public function testJavascriptConfigurations(): void
    {
        $expected = [
            'formatDuration' => '%h:%m',
            'formatDate' => 'Y-m-d',
            'defaultColor' => '#d2d6de',
            'twentyFourHours' => false,
            'updateBrowserTitle' => false,
            'timezone' => 'America/Edmonton',
            'locale' => 'en',
            'language' => 'de',
            'user' => [
                'id' => 1,
                'name' => null,
                'admin' => false,
                'superAdmin' => false,
                'roles' => [],
            ],
        ];
        $user = $this->createMock(User::class);
        $user->method('getId')->willReturn(1);
        $user->method('getName')->willReturn('Testing');
        $user->method('getLanguage')->willReturn('de');
        $user->method('isAdmin')->willReturn(false);
        $user->method('isSuperAdmin')->willReturn(false);
        $user->method('getTimezone')->willReturn('America/Edmonton');
        $sut = $this->getSut('en', $this->localeEn);
        self::assertEquals($expected, $sut->getJavascriptConfiguration($user));
    }

    public function testJavascriptConfigurationsForAnonymous(): void
    {
        $expected = [
            'formatDuration' => '%h:%m',
            'formatDate' => 'Y-m-d',
            'defaultColor' => '#d2d6de',
            'twentyFourHours' => false,
            'updateBrowserTitle' => false,
            'timezone' => 'Europe/Vienna',
            'locale' => 'en',
            'language' => 'en',
            'user' => [
                'id' => null,
                'name' => 'anonymous',
                'admin' => false,
                'superAdmin' => false,
                'roles' => [],
            ],
        ];

        $sut = new LocaleFormatExtensions(new LocaleService($this->localeEn));
        $sut->setLocale('en');

        self::assertEquals($expected, $sut->getJavascriptConfiguration());
    }

    public function testDurationDecimal(): void
    {
        $record = $this->getTimesheet(9437);

        $sut = $this->getSut('en', $this->localeEn);
        self::assertEquals('2.62', $sut->durationDecimal($record->getDuration()));

        // test Timesheet object
        self::assertEquals('2.62', $sut->durationDecimal($record));

        // test extended format
        $sut = $this->getSut('de', $this->localeDe);
        self::assertEquals('2,62', $sut->durationDecimal($record->getDuration()));

        // test negative duration
        $sut = $this->getSut('en', $this->localeEn);
        self::assertEquals('-0.00', $sut->durationDecimal(-1));

        // test negative duration
        $sut = $this->getSut('en', $this->localeEn);
        self::assertEquals('-0.01', $sut->durationDecimal(-40));
        self::assertEquals('-0.01', $sut->durationDecimal(-50));

        // test negative duration - with rounding issue
        $sut = $this->getSut('en', $this->localeEn);
        self::assertEquals('-0.02', $sut->durationDecimal(-60));

        // test zero duration
        $sut = $this->getSut('en', $this->localeEn);
        self::assertEquals('0.00', $sut->durationDecimal(-0));
        self::assertEquals('0.00', $sut->durationDecimal(0));

        $sut = $this->getSut('en', $this->localeEn);
        self::assertEquals('0.00', $sut->durationDecimal(-0));

        $sut = $this->getSut('en', $this->localeEn);

        self::assertEquals('0.00', $sut->durationDecimal(null));
    }

    private function getTest(LocaleFormatExtensions $sut, string $name): TwigTest
    {
        foreach ($sut->getTests() as $test) {
            if ($test->getName() === $name) {
                return $test;
            }
        }

        throw new \Exception('Unknown twig test: ' . $name);
    }

    public function testIsToday(): void
    {
        $sut = $this->getSut('en', $this->localeEn);
        $test = $this->getTest($sut, 'today');
        self::assertTrue(\call_user_func($test->getCallable(), new \DateTime()));
        self::assertFalse(\call_user_func($test->getCallable(), new \DateTime('-1 day')));
        self::assertFalse(\call_user_func($test->getCallable(), new \DateTime('+1 day')));
        self::assertFalse(\call_user_func($test->getCallable(), new \stdClass()));
        self::assertFalse(\call_user_func($test->getCallable(), null));
    }

    public function testIsWeekend(): void
    {
        $sut = $this->getSut('en', $this->localeEn);
        self::assertFalse($sut->isWeekend(null));
        self::assertFalse($sut->isWeekend('2022-01-01'));

        // default case with default user (saturday and sunday is weekend)
        self::assertFalse($sut->isWeekend(new \DateTime('first monday this month')));
        self::assertFalse($sut->isWeekend(new \DateTime('first tuesday this month')));
        self::assertFalse($sut->isWeekend(new \DateTime('first wednesday this month')));
        self::assertFalse($sut->isWeekend(new \DateTime('first thursday this month')));
        self::assertFalse($sut->isWeekend(new \DateTime('first friday this month')));
        self::assertTrue($sut->isWeekend(new \DateTime('first saturday this month')));
        self::assertTrue($sut->isWeekend(new \DateTime('first sunday this month')));
    }

    protected function getTimesheet($seconds): Timesheet
    {
        $begin = new \DateTime();
        $end = clone $begin;
        $end->setTimestamp($begin->getTimestamp() + $seconds);
        $record = new Timesheet();
        $record->setBegin($begin);
        $record->setEnd($end);
        $record->setDuration($seconds);

        return $record;
    }

    public function testChartMoney(): void
    {
        $sut = $this->getSut('en', $this->localeEn);
        self::assertEquals('-123456.78', $sut->moneyChart(-123456.78));
        self::assertEquals('123456.78', $sut->moneyChart(123456.78));
        self::assertEquals('123456.00', $sut->moneyChart(123456));
        self::assertEquals('456.00', $sut->moneyChart(456));
    }

    public function testChartDuration(): void
    {
        $sut = $this->getSut('en', $this->localeEn);
        self::assertEquals('34.29', $sut->durationChart(123456));
        self::assertEquals('-34.29', $sut->durationChart(-123456));
    }
}