packages/deriver/tests/Unit/Deriver/Evaluator/Execution/Memory/Slots/SlotReferenceTest.php

1<?php
2
3declare (strict_types=1);
4
5namespace Tests\Unit\Deriver\Evaluator\Execution\Memory\Slots;
6
7use Deriver\Deriver\Contributions;
8use Deriver\Deriver\DeriverConfig;
9use Deriver\Deriver\Evaluator\Call\BoundInstruction;
10use Deriver\Deriver\Evaluator\Call\Evaluators;
11use Deriver\Deriver\Evaluator\Call\Extensions;
12use Deriver\Deriver\Evaluator\Call\Registrations;
13use Deriver\Deriver\Evaluator\Call\State\StateSlot;
14use Deriver\Deriver\Evaluator\Call\StateRegistry;
15use Deriver\Deriver\Evaluator\Domain\Lattice;
16use Deriver\Deriver\Evaluator\EvaluatorConfig;
17use Deriver\Deriver\Evaluator\Evidence\Frontier;
18use Deriver\Deriver\Evaluator\Execution\Call\TypeBinding;
19use Deriver\Deriver\Evaluator\Execution\Call\TypeCheck;
20use Deriver\Deriver\Evaluator\Execution\Completion\Completion;
21use Deriver\Deriver\Evaluator\Execution\Context;
22use Deriver\Deriver\Evaluator\Execution\EvaluatorConfig as ExecutionEvaluatorConfig;
23use Deriver\Deriver\Evaluator\Execution\Memory\Location;
24use Deriver\Deriver\Evaluator\Execution\Memory\Memory;
25use Deriver\Deriver\Evaluator\Execution\Memory\ReferenceConstraint;
26use Deriver\Deriver\Evaluator\Execution\Memory\Slots\SlotReference;
27use Deriver\Deriver\Evaluator\Execution\Memory\Slots\StateStorage;
28use Deriver\Deriver\Evaluator\Execution\State;
29use Deriver\Deriver\Evaluator\Execution\Transfer\ReferenceAssignment;
30use Deriver\Deriver\Evaluator\Request\Budget;
31use Deriver\Deriver\Evaluator\Request\QueryScope;
32use Deriver\Deriver\Evaluator\Request\ReturnQuery;
33use Deriver\Deriver\Evaluator\Scalar\Identity;
34use Deriver\Deriver\Evaluator\Scalar\NumericString;
35use Deriver\Deriver\Evaluator\TargetProfile;
36use Deriver\Deriver\Evaluator\Term;
37use Deriver\Deriver\Execution\QueryExecution;
38use Deriver\Deriver\Lowerer\Declaration\CallableIdentity;
39use Deriver\Deriver\Lowerer\Declaration\CallableSource;
40use Deriver\Deriver\Lowerer\Declaration\Index;
41use Deriver\Deriver\Lowerer\Declaration\Indexer;
42use Deriver\Deriver\Lowerer\Declaration\Traits\Composition;
43use Deriver\Deriver\Lowerer\ExpressionLowering;
44use Deriver\Deriver\Lowerer\Graph\BasicBlock;
45use Deriver\Deriver\Lowerer\Graph\CallableGraph;
46use Deriver\Deriver\Lowerer\Graph\Instruction;
47use Deriver\Deriver\Lowerer\Graph\Terminator;
48use Deriver\Deriver\Lowerer\InstructionEmitter;
49use Deriver\Deriver\Lowerer\Lowerer;
50use Deriver\Deriver\Lowerer\LoweringScope;
51use Deriver\Deriver\Lowerer\StatementLowering;
52use Deriver\Deriver\MicroEvaluatorConversion;
53use Deriver\Deriver\Parser\Node\File;
54use Deriver\Deriver\Parser\Parser;
55use Deriver\Deriver\Parser\ParserConfig;
56use Deriver\Deriver\Parser\TargetSyntax;
57use Deriver\Deriver\Providers\ProviderExpansion;
58use Deriver\Deriver\Resolver\AssignmentPatterns;
59use Deriver\Deriver\Resolver\ClassScope;
60use Deriver\Deriver\Resolver\ExpressionValidation;
61use Deriver\Deriver\Resolver\MagicContext;
62use Deriver\Deriver\Resolver\Resolver;
63use Deriver\Deriver\SnapshotIdentity;
64use Deriver\Deriver\Sources\LineMap;
65use Deriver\Deriver\Sources\Path;
66use Deriver\Deriver\Sources\Source;
67use Deriver\Deriver\Sources\SourceRef;
68use Deriver\Deriver\Sources\Sources;
69use Deriver\Exception\ParserException;
70use Deriver\Exception\ResolutionException;
71use PHPUnit\Framework\Attributes\CoversClass;
72use PHPUnit\Framework\Attributes\Small;
73use PHPUnit\Framework\Attributes\UsesClass;
74use PHPUnit\Framework\TestCase;
75
76/**
77 * @covers \Deriver\Deriver\Evaluator\Execution\Memory\Slots\SlotReference
78 */
79#[UsesClass(Resolver::class)]
80#[UsesClass(ExpressionValidation::class)]
81#[UsesClass(ResolutionException::class)]
82#[UsesClass(ParserConfig::class)]
83#[UsesClass(ParserException::class)]
84#[CoversClass(SlotReference::class)]
85#[UsesClass(BasicBlock::class)]
86#[UsesClass(CallableGraph::class)]
87#[UsesClass(CallableIdentity::class)]
88#[UsesClass(Instruction::class)]
89#[UsesClass(Terminator::class)]
90#[UsesClass(TypeBinding::class)]
91#[UsesClass(TypeCheck::class)]
92#[UsesClass(Completion::class)]
93#[UsesClass(Context::class)]
94#[UsesClass(StateStorage::class)]
95#[UsesClass(State::class)]
96#[UsesClass(ReferenceAssignment::class)]
97#[UsesClass(Location::class)]
98#[UsesClass(Memory::class)]
99#[UsesClass(ReferenceConstraint::class)]
100#[UsesClass(Extensions::class)]
101#[UsesClass(Evaluators::class)]
102#[UsesClass(StateRegistry::class)]
103#[UsesClass(StateSlot::class)]
104#[UsesClass(DeriverConfig::class)]
105#[UsesClass(Sources::class)]
106#[UsesClass(Path::class)]
107#[UsesClass(Source::class)]
108#[UsesClass(TargetProfile::class)]
109#[UsesClass(Budget::class)]
110#[UsesClass(QueryScope::class)]
111#[UsesClass(ReturnQuery::class)]
112#[UsesClass(SourceRef::class)]
113#[UsesClass(Parser::class)]
114#[UsesClass(File::class)]
115#[UsesClass(Lowerer::class)]
116#[UsesClass(ExpressionLowering::class)]
117#[UsesClass(InstructionEmitter::class)]
118#[UsesClass(LoweringScope::class)]
119#[UsesClass(StatementLowering::class)]
120#[UsesClass(CallableSource::class)]
121#[UsesClass(Indexer::class)]
122#[UsesClass(Index::class)]
123#[UsesClass(Composition::class)]
124#[UsesClass(LineMap::class)]
125#[UsesClass(MagicContext::class)]
126#[UsesClass(AssignmentPatterns::class)]
127#[UsesClass(ClassScope::class)]
128#[UsesClass(TargetSyntax::class)]
129#[UsesClass(Identity::class)]
130#[UsesClass(Lattice::class)]
131#[UsesClass(NumericString::class)]
132#[UsesClass(Term::class)]
133#[Small]
134final class SlotReferenceTest extends TestCase
135{
136    public function testApplyRejectsAnIncompatibleSourceBeforeChangingEitherCell(): void
137    {
138        $source = '<?php function target(){return 1;}';
139        $budget = new Budget();
140        $configuration = new DeriverConfig();
141        $contributions = new Contributions(stateSlots: [new StateSlot('example.slot', 'int', Term::constant(1))]);
142        $input = new Sources([new Source('fixture.php', $source)]);
143        $target = new TargetProfile($configuration->phpVersion, $configuration->integerBits, $configuration->floatPrecision);
144        $providers = new ProviderExpansion($input, array_map(Term::fromNative(...), $configuration->environment), $contributions);
145        $contributions1 = $providers->contributions;
146        $evaluators = new Evaluators(new TargetProfile($configuration->phpVersion, $configuration->integerBits, $configuration->floatPrecision), new Registrations($contributions1->evaluators, $contributions1->providers, $contributions1->domains, $contributions1->intrinsics, $contributions1->stateSlots), $configuration->standardEvaluators);
147        $settings = new EvaluatorConfig($target, $providers->environment, $configuration->standardEvaluators, array_map((new MicroEvaluatorConversion())->convert(...), $configuration->evaluators));
148        $identity = new SnapshotIdentity($providers->input, $settings, $evaluators, $providers->manifest);
149        $snapshotId = $identity->id;
150        $input1 = $providers->input;
151        $parser = new Parser(new ParserConfig($target->version));
152        $trees = array_map(static fn (Source $source1): File => (new Resolver())->resolve($parser->parse(new Source(Path::normalize($source1->path), $source1->contents, $source1->declarationsOnly))), iterator_to_array($input1, false));
153        $program1 = new Index($snapshotId, $trees);
154        $execution = new QueryExecution($program1, new ExecutionEvaluatorConfig($target, $providers->environment, $configuration->standardEvaluators), $evaluators, $identity->snapshot(array_map(Frontier::fromDiagnostic(...), $program1->diagnostics())));
155        $snapshotId1 = 'test';
156        $input2 = new Sources([new Source('fixture.php', $source)]);
157        $profile = $execution->configuration->target;
158        $parser1 = new Parser(new ParserConfig($profile->version));
159        $trees1 = array_map(static fn (Source $source2): File => (new Resolver())->resolve($parser1->parse(new Source(Path::normalize($source2->path), $source2->contents, $source2->declarationsOnly))), iterator_to_array($input2, false));
160        $program = new Index($snapshotId1, $trees1);
161        $context = new Context($program, new ReturnQuery('target', budget: $budget), $execution->configuration, $execution->evaluators);
162        $state = new State();
163        $storage = new StateStorage($context);
164        $storage->initialize($state, 'a');
165        $body = $context->program->callable('target');
166        self::assertNotNull($body);
167        $state->addresses['slot'] = new Location('evaluator:a', ['example.slot']);
168        $state->addresses['source'] = $state->local('source');
169        $state->memory->write($state->addresses['source'], Term::constant('bad'));
170        $instruction = new BoundInstruction('alias', 'alias', $body->source, 'result', ['slot', 'source']);
171        $paths = (new SlotReference($context))->apply($body, $instruction, $state);
172        self::assertNotNull($paths);
173        self::assertSame('TypeError', $paths[0]->completion->value?->literal);
174        self::assertSame(1, $state->memory->read($state->addresses['slot'])->native());
175        self::assertSame('bad', $state->memory->read($state->addresses['source'])->native());
176    }
177}
178