packages/deriver/tests/Unit/Deriver/Evaluator/Execution/Operation/CallablePredicateTest.php

1<?php
2
3declare (strict_types=1);
4
5namespace Tests\Unit\Deriver\Evaluator\Execution\Operation;
6
7use Deriver\Deriver\Contributions;
8use Deriver\Deriver\DeriverConfig;
9use Deriver\Deriver\Evaluator\Builtin\FunctionEvaluator;
10use Deriver\Deriver\Evaluator\Builtin\Library;
11use Deriver\Deriver\Evaluator\Call\BoundInstruction;
12use Deriver\Deriver\Evaluator\Call\Evaluators;
13use Deriver\Deriver\Evaluator\Call\Extensions;
14use Deriver\Deriver\Evaluator\Call\Registrations;
15use Deriver\Deriver\Evaluator\Call\StateRegistry;
16use Deriver\Deriver\Evaluator\Declaration\Parameter;
17use Deriver\Deriver\Evaluator\EvaluatorConfig;
18use Deriver\Deriver\Evaluator\Evidence\Frontier;
19use Deriver\Deriver\Evaluator\Execution\Call\CallableCheck;
20use Deriver\Deriver\Evaluator\Execution\Call\PassedArgument;
21use Deriver\Deriver\Evaluator\Execution\Call\UnknownCall;
22use Deriver\Deriver\Evaluator\Execution\Completion\Completion;
23use Deriver\Deriver\Evaluator\Execution\Completion\CompletionKind;
24use Deriver\Deriver\Evaluator\Execution\Context;
25use Deriver\Deriver\Evaluator\Execution\EvaluatorConfig as ExecutionEvaluatorConfig;
26use Deriver\Deriver\Evaluator\Execution\Havoc;
27use Deriver\Deriver\Evaluator\Execution\Memory\Location;
28use Deriver\Deriver\Evaluator\Execution\Memory\Materialization;
29use Deriver\Deriver\Evaluator\Execution\Memory\Memory;
30use Deriver\Deriver\Evaluator\Execution\Operation\CallablePredicate;
31use Deriver\Deriver\Evaluator\Execution\State;
32use Deriver\Deriver\Evaluator\Request\Budget;
33use Deriver\Deriver\Evaluator\Request\QueryScope;
34use Deriver\Deriver\Evaluator\Request\ReturnQuery;
35use Deriver\Deriver\Evaluator\TargetProfile;
36use Deriver\Deriver\Evaluator\Term;
37use Deriver\Deriver\Evaluator\TermKind;
38use Deriver\Deriver\Execution\QueryExecution;
39use Deriver\Deriver\Lowerer\Declaration\CallableIdentity;
40use Deriver\Deriver\Lowerer\Declaration\CallableSource;
41use Deriver\Deriver\Lowerer\Declaration\Index;
42use Deriver\Deriver\Lowerer\Declaration\Indexer;
43use Deriver\Deriver\Lowerer\Declaration\Traits\Composition;
44use Deriver\Deriver\Lowerer\Graph\Instruction;
45use Deriver\Deriver\MicroEvaluatorConversion;
46use Deriver\Deriver\Parser\Node\File;
47use Deriver\Deriver\Parser\Parser;
48use Deriver\Deriver\Parser\ParserConfig;
49use Deriver\Deriver\Parser\TargetSyntax;
50use Deriver\Deriver\Providers\ProviderExpansion;
51use Deriver\Deriver\Resolver\AssignmentPatterns;
52use Deriver\Deriver\Resolver\ClassScope;
53use Deriver\Deriver\Resolver\ExpressionValidation;
54use Deriver\Deriver\Resolver\MagicContext;
55use Deriver\Deriver\Resolver\Resolver;
56use Deriver\Deriver\SnapshotIdentity;
57use Deriver\Deriver\Sources\LineMap;
58use Deriver\Deriver\Sources\Path;
59use Deriver\Deriver\Sources\Source;
60use Deriver\Deriver\Sources\SourceRef;
61use Deriver\Deriver\Sources\Sources;
62use Deriver\Exception\ParserException;
63use Deriver\Exception\ResolutionException;
64use PHPUnit\Framework\Attributes\CoversClass;
65use PHPUnit\Framework\Attributes\Small;
66use PHPUnit\Framework\Attributes\UsesClass;
67use PHPUnit\Framework\TestCase;
68
69/**
70 * @covers \Deriver\Deriver\Evaluator\Execution\Operation\CallablePredicate
71 */
72#[UsesClass(Resolver::class)]
73#[UsesClass(ExpressionValidation::class)]
74#[UsesClass(ResolutionException::class)]
75#[UsesClass(ParserConfig::class)]
76#[UsesClass(ParserException::class)]
77#[CoversClass(CallablePredicate::class)]
78#[UsesClass(CallableIdentity::class)]
79#[UsesClass(Instruction::class)]
80#[UsesClass(CallableCheck::class)]
81#[UsesClass(PassedArgument::class)]
82#[UsesClass(UnknownCall::class)]
83#[UsesClass(Completion::class)]
84#[UsesClass(Context::class)]
85#[UsesClass(Havoc::class)]
86#[UsesClass(State::class)]
87#[UsesClass(Location::class)]
88#[UsesClass(Materialization::class)]
89#[UsesClass(Memory::class)]
90#[UsesClass(FunctionEvaluator::class)]
91#[UsesClass(Library::class)]
92#[UsesClass(Extensions::class)]
93#[UsesClass(Evaluators::class)]
94#[UsesClass(StateRegistry::class)]
95#[UsesClass(Parameter::class)]
96#[UsesClass(DeriverConfig::class)]
97#[UsesClass(Sources::class)]
98#[UsesClass(Path::class)]
99#[UsesClass(Source::class)]
100#[UsesClass(TargetProfile::class)]
101#[UsesClass(Budget::class)]
102#[UsesClass(QueryScope::class)]
103#[UsesClass(ReturnQuery::class)]
104#[UsesClass(SourceRef::class)]
105#[UsesClass(Frontier::class)]
106#[UsesClass(Parser::class)]
107#[UsesClass(File::class)]
108#[UsesClass(CallableSource::class)]
109#[UsesClass(Indexer::class)]
110#[UsesClass(Index::class)]
111#[UsesClass(Composition::class)]
112#[UsesClass(LineMap::class)]
113#[UsesClass(MagicContext::class)]
114#[UsesClass(AssignmentPatterns::class)]
115#[UsesClass(ClassScope::class)]
116#[UsesClass(TargetSyntax::class)]
117#[UsesClass(Term::class)]
118#[Small]
119final class CallablePredicateTest extends TestCase
120{
121    public function testApplyPreservesKnownPredicatesAndUnknownReferenceOutputs(): void
122    {
123        $source1 = '<?php function target(){return 1;}';
124        $budget = new Budget();
125        $configuration = new DeriverConfig();
126        $contributions = new Contributions();
127        $input = new Sources([new Source('fixture.php', $source1)]);
128        $target = new TargetProfile($configuration->phpVersion, $configuration->integerBits, $configuration->floatPrecision);
129        $providers = new ProviderExpansion($input, array_map(Term::fromNative(...), $configuration->environment), $contributions);
130        $contributions1 = $providers->contributions;
131        $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);
132        $settings = new EvaluatorConfig($target, $providers->environment, $configuration->standardEvaluators, array_map((new MicroEvaluatorConversion())->convert(...), $configuration->evaluators));
133        $identity = new SnapshotIdentity($providers->input, $settings, $evaluators, $providers->manifest);
134        $snapshotId = $identity->id;
135        $input1 = $providers->input;
136        $parser = new Parser(new ParserConfig($target->version));
137        $trees = array_map(static fn (Source $source2): File => (new Resolver())->resolve($parser->parse(new Source(Path::normalize($source2->path), $source2->contents, $source2->declarationsOnly))), iterator_to_array($input1, false));
138        $program1 = new Index($snapshotId, $trees);
139        $execution = new QueryExecution($program1, new ExecutionEvaluatorConfig($target, $providers->environment, $configuration->standardEvaluators), $evaluators, $identity->snapshot(array_map(Frontier::fromDiagnostic(...), $program1->diagnostics())));
140        $snapshotId1 = 'test';
141        $input2 = new Sources([new Source('fixture.php', $source1)]);
142        $profile = $execution->configuration->target;
143        $parser1 = new Parser(new ParserConfig($profile->version));
144        $trees1 = array_map(static fn (Source $source3): File => (new Resolver())->resolve($parser1->parse(new Source(Path::normalize($source3->path), $source3->contents, $source3->declarationsOnly))), iterator_to_array($input2, false));
145        $program = new Index($snapshotId1, $trees1);
146        $context = new Context($program, new ReturnQuery('target', budget: $budget), $execution->configuration, $execution->evaluators);
147        $source = new SourceRef('test', 'fixture.php', 0, 1);
148        $state = new State();
149        $operation = new CallablePredicate($context);
150        $instruction = new BoundInstruction('predicate', 'intrinsic', $source, 'result', name: 'is_callable');
151        self::assertTrue($operation->apply($instruction, $state, [Term::constant('strlen')])[0]->value('result')->native());
152        $state->memory->write($state->local('callable_name'), Term::constant('old'));
153        $paths = $operation->apply($instruction, $state, [Term::constant('strlen'), Term::constant(true), Term::constant('old')]);
154        self::assertSame(TermKind::Opaque, $paths[0]->snapshot()['callable_name']->kind);
155        self::assertSame(CompletionKind::Throw, $paths[1]->completion->kind);
156    }
157}
158