<?php

namespace CuyZ\Valinor\Tests\Functional\Definition\Repository\Cache\Compiler;

use CuyZ\Valinor\Definition\Attributes;
use CuyZ\Valinor\Definition\CombinedAttributes;
use CuyZ\Valinor\Definition\DoctrineAnnotations;
use CuyZ\Valinor\Definition\EmptyAttributes;
use CuyZ\Valinor\Definition\NativeAttributes;
use CuyZ\Valinor\Definition\Repository\Cache\Compiler\AttributesCompiler;
use CuyZ\Valinor\Tests\Fake\Definition\FakeAttributes;
use CuyZ\Valinor\Tests\Fixture\Annotation\AnnotationWithArguments;
use CuyZ\Valinor\Tests\Fixture\Annotation\BasicAnnotation;
use CuyZ\Valinor\Tests\Fixture\Attribute\AttributeWithArguments;
use CuyZ\Valinor\Tests\Fixture\Attribute\BasicAttribute;
use CuyZ\Valinor\Tests\Fixture\Attribute\NestedAttribute;
use CuyZ\Valinor\Tests\Fixture\Object\ObjectWithAttributes;
use CuyZ\Valinor\Tests\Fixture\Object\ObjectWithNestedAttributes;
use Error;
use PHPUnit\Framework\TestCase;
use ReflectionClass;
use ReflectionMethod;
use ReflectionProperty;
use stdClass;

final class AttributesCompilerTest extends TestCase
{
    private AttributesCompiler $attributesCompiler;

    protected function setUp(): void
    {
        $this->attributesCompiler = new AttributesCompiler();
    }

    public function test_compiles_an_empty_attributes_instance_when_no_attributes_are_given(): void
    {
        $attributes = $this->compile(new FakeAttributes());

        self::assertInstanceOf(EmptyAttributes::class, $attributes);
    }

    /**
     * @requires PHP >= 8
     */
    public function test_compiles_native_php_attributes_for_class_with_attributes(): void
    {
        $reflection = new ReflectionClass(ObjectWithAttributes::class);

        $attributes = $this->compile(new NativeAttributes($reflection));

        self::assertCount(2, $attributes);
        self::assertTrue($attributes->has(BasicAttribute::class));
        self::assertTrue($attributes->has(AttributeWithArguments::class));

        /** @var AttributeWithArguments $attribute */
        $attribute = [...$attributes->ofType(AttributeWithArguments::class)][0];

        self::assertSame('foo', $attribute->foo);
        self::assertSame('bar', $attribute->bar);
    }

    /**
     * @requires PHP >= 8
     */
    public function test_compiles_native_php_attributes_for_class_without_attributes(): void
    {
        $reflection = new ReflectionClass(stdClass::class);
        $attributes = $this->compile(new NativeAttributes($reflection));

        self::assertInstanceOf(EmptyAttributes::class, $attributes);
    }

    public function test_compiles_doctrine_annotations_for_class_with_annotations(): void
    {
        $object =
            /**
             * @BasicAnnotation
             * @AnnotationWithArguments(foo="foo")
             */
            new class () { };

        $reflection = new ReflectionClass($object);
        $attributes = $this->compile(new DoctrineAnnotations($reflection));

        self::assertCount(2, $attributes);
        self::assertTrue($attributes->has(BasicAnnotation::class));
        self::assertTrue($attributes->has(AnnotationWithArguments::class));

        /** @var AnnotationWithArguments $attribute */
        $attribute = [...$attributes->ofType(AnnotationWithArguments::class)][0];

        self::assertSame(['foo' => 'foo'], $attribute->value());
    }

    public function test_compiles_doctrine_annotations_for_class_without_annotations(): void
    {
        $reflection = new ReflectionClass(stdClass::class);
        $attributes = $this->compile(new DoctrineAnnotations($reflection));

        self::assertInstanceOf(EmptyAttributes::class, $attributes);
    }

    public function test_compiles_doctrine_annotations_for_property_with_annotations(): void
    {
        $object = new class () {
            /**
             * @BasicAnnotation
             * @AnnotationWithArguments(foo="foo")
             */
            public string $property;
        };

        $reflection = new ReflectionProperty($object, 'property');
        $attributes = $this->compile(new DoctrineAnnotations($reflection));

        self::assertCount(2, $attributes);
        self::assertTrue($attributes->has(BasicAnnotation::class));
        self::assertTrue($attributes->has(AnnotationWithArguments::class));

        /** @var AnnotationWithArguments $attribute */
        $attribute = [...$attributes->ofType(AnnotationWithArguments::class)][0];

        self::assertSame(['foo' => 'foo'], $attribute->value());
    }

    public function test_compiles_doctrine_annotations_for_property_without_annotations(): void
    {
        $object = new class () {
            public string $property;
        };

        $reflection = new ReflectionProperty($object, 'property');
        $attributes = $this->compile(new DoctrineAnnotations($reflection));

        self::assertInstanceOf(EmptyAttributes::class, $attributes);
    }

    public function test_compiles_doctrine_annotations_for_method_with_annotations(): void
    {
        $object = new class () {
            /**
             * @BasicAnnotation
             * @AnnotationWithArguments(foo="foo")
             */
            public function method(): void
            {
            }
        };

        $reflection = new ReflectionMethod($object, 'method');
        $attributes = $this->compile(new DoctrineAnnotations($reflection));

        self::assertCount(2, $attributes);
        self::assertTrue($attributes->has(BasicAnnotation::class));
        self::assertTrue($attributes->has(AnnotationWithArguments::class));

        /** @var AnnotationWithArguments $attribute */
        $attribute = [...$attributes->ofType(AnnotationWithArguments::class)][0];

        self::assertSame(['foo' => 'foo'], $attribute->value());
    }

    public function test_compiles_doctrine_annotations_for_method_without_annotations(): void
    {
        $object = new class () {
            public function method(): void
            {
            }
        };

        $reflection = new ReflectionMethod($object, 'method');
        $attributes = $this->compile(new DoctrineAnnotations($reflection));

        self::assertInstanceOf(EmptyAttributes::class, $attributes);
    }

    /**
     * @requires PHP >= 8
     */
    public function test_compiles_combined_attributes_for_class_without_annotation(): void
    {
        $reflection = new ReflectionClass(stdClass::class);
        $attributes = $this->compile(
            new CombinedAttributes(
                new DoctrineAnnotations($reflection),
                new NativeAttributes($reflection),
            )
        );

        self::assertInstanceOf(EmptyAttributes::class, $attributes);
    }

    /**
     * @requires PHP >= 8
     */
    public function test_compiles_combined_attributes_for_class_with_only_native_attributes(): void
    {
        $attributes = $this->compile(
            new CombinedAttributes(
                new DoctrineAnnotations(new ReflectionClass(stdClass::class)),
                new NativeAttributes(new ReflectionClass(ObjectWithAttributes::class)),
            )
        );

        self::assertCount(2, $attributes);
        self::assertTrue($attributes->has(BasicAttribute::class));
        self::assertTrue($attributes->has(AttributeWithArguments::class));
    }

    /**
     * @requires PHP >= 8
     */
    public function test_compiles_combined_attributes_for_class_with_only_annotations(): void
    {
        $object =
            /**
             * @BasicAnnotation
             * @AnnotationWithArguments(foo="foo")
             */
            new class () { };

        $attributes = $this->compile(
            new CombinedAttributes(
                new DoctrineAnnotations(new ReflectionClass($object))
            )
        );

        self::assertCount(2, $attributes);
        self::assertTrue($attributes->has(BasicAnnotation::class));
        self::assertTrue($attributes->has(AnnotationWithArguments::class));
    }

    /**
     * @requires PHP >= 8
     */
    public function test_compiles_combined_attributes_for_class_with_both_attributes_and_annotations(): void
    {
        $object =
            /**
             * @BasicAnnotation
             * @AnnotationWithArguments(foo="foo")
             */
            new class () { };

        $attributes = $this->compile(
            new CombinedAttributes(
                new DoctrineAnnotations(new ReflectionClass($object)),
                new NativeAttributes(new ReflectionClass(ObjectWithAttributes::class)),
            )
        );

        self::assertCount(4, $attributes);
        self::assertTrue($attributes->has(BasicAttribute::class));
        self::assertTrue($attributes->has(AttributeWithArguments::class));
        self::assertTrue($attributes->has(BasicAnnotation::class));
        self::assertTrue($attributes->has(AnnotationWithArguments::class));
    }

    /**
     * @requires PHP >= 8.1
     */
    public function test_compiles_native_php_attributes_for_class_with_nested_attributes(): void
    {
        $reflection = new ReflectionClass(ObjectWithNestedAttributes::class);

        $attributes = $this->compile(new NativeAttributes($reflection));

        self::assertCount(3, $attributes);
        self::assertTrue($attributes->has(BasicAttribute::class));
        self::assertTrue($attributes->has(AttributeWithArguments::class));
        self::assertTrue($attributes->has(NestedAttribute::class));

        /** @var AttributeWithArguments $attribute */
        $attribute = [...$attributes->ofType(AttributeWithArguments::class)][0];

        self::assertSame('foo', $attribute->foo);
        self::assertSame('bar', $attribute->bar);

        /** @var NestedAttribute $attribute */
        $attribute = [...$attributes->ofType(NestedAttribute::class)][0];

        self::assertCount(2, $attribute->nestedAttributes);
        self::assertInstanceOf(BasicAttribute::class, $attribute->nestedAttributes[0]);
        self::assertInstanceOf(AttributeWithArguments::class, $attribute->nestedAttributes[1]);

        /** @var AttributeWithArguments $nestedAttribute */
        $nestedAttribute = $attribute->nestedAttributes[1];

        self::assertSame('foo', $nestedAttribute->foo);
        self::assertSame('bar', $nestedAttribute->bar);
    }

    /**
     * @requires PHP >= 8.1
     */
    public function test_compiles_native_php_attributes_for_property_with_nested_attributes(): void
    {
        $reflection = new ReflectionClass(ObjectWithNestedAttributes::class);
        $reflection = $reflection->getProperty('property');

        $attributes = $this->compile(new NativeAttributes($reflection));

        self::assertCount(3, $attributes);
        self::assertTrue($attributes->has(BasicAttribute::class));
        self::assertTrue($attributes->has(AttributeWithArguments::class));
        self::assertTrue($attributes->has(NestedAttribute::class));
    }

    /**
     * @requires PHP >= 8.1
     */
    public function test_compiles_native_php_attributes_for_method_with_nested_attributes(): void
    {
        $reflection = new ReflectionClass(ObjectWithNestedAttributes::class);
        $reflection = $reflection->getMethod('method');

        $attributes = $this->compile(new NativeAttributes($reflection));

        self::assertCount(3, $attributes);
        self::assertTrue($attributes->has(BasicAttribute::class));
        self::assertTrue($attributes->has(AttributeWithArguments::class));
        self::assertTrue($attributes->has(NestedAttribute::class));
    }

    private function compile(Attributes $attributes): Attributes
    {
        $code = $this->attributesCompiler->compile($attributes);

        try {
            return eval('return ' . $code . ';');
        } catch (Error $exception) {
            self::fail($exception->getMessage());
        }
    }
}