packages/deriver/tests/Unit/Deriver/Evaluator/Execution/Operation/StringJoiningTest.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\Call\Evaluators;
10use Deriver\Deriver\Evaluator\Call\Registrations;
11use Deriver\Deriver\Evaluator\EvaluatorConfig;
12use Deriver\Deriver\Evaluator\Evidence\Frontier;
13use Deriver\Deriver\Evaluator\Execution\Completion\Alternative;
14use Deriver\Deriver\Evaluator\Execution\EvaluatorConfig as ExecutionEvaluatorConfig;
15use Deriver\Deriver\Evaluator\Request\EntryPoint;
16use Deriver\Deriver\Evaluator\Request\QueryScope;
17use Deriver\Deriver\Evaluator\Request\ReturnQuery;
18use Deriver\Deriver\Evaluator\Request\ValueQuery;
19use Deriver\Deriver\Evaluator\TargetProfile;
20use Deriver\Deriver\Evaluator\Term;
21use Deriver\Deriver\Evaluator\TermKind;
22use Deriver\Deriver\Execution\QueryExecution;
23use Deriver\Deriver\Lowerer\Declaration\Index;
24use Deriver\Deriver\MicroEvaluatorConversion;
25use Deriver\Deriver\Parser\Node\File;
26use Deriver\Deriver\Parser\Parser;
27use Deriver\Deriver\Parser\ParserConfig;
28use Deriver\Deriver\Providers\ProviderExpansion;
29use Deriver\Deriver\Resolver\Resolver;
30use Deriver\Deriver\Selection\CallObservations;
31use Deriver\Deriver\SnapshotIdentity;
32use Deriver\Deriver\Sources\Path;
33use Deriver\Deriver\Sources\Source;
34use Deriver\Deriver\Sources\Sources;
35use PHPUnit\Framework\Attributes\CoversNothing;
36use PHPUnit\Framework\Attributes\Small;
37use PHPUnit\Framework\TestCase;
38
39#[CoversNothing]
40#[Small]
41final class StringJoiningTest extends TestCase
42{
43 public function testApplyPreservesStringConversionEffects(): void
44 {
45 $source = '<?php class B{public int $n=0;function __toString(){return (string)++$this->n;}}function target(){$b=new B;return [implode(",",[$b,$b]),$b->n];}';
46 $symbol = 'target';
47 $input = new Sources([new Source('fixture.php', $source)]);
48 $configuration = new DeriverConfig();
49 $contributions = new Contributions();
50 $target = new TargetProfile($configuration->phpVersion, $configuration->integerBits, $configuration->floatPrecision);
51 $providers = new ProviderExpansion($input, array_map(Term::fromNative(...), $configuration->environment), $contributions);
52 $contributions1 = $providers->contributions;
53 $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);
54 $settings = new EvaluatorConfig($target, $providers->environment, $configuration->standardEvaluators, array_map((new MicroEvaluatorConversion())->convert(...), $configuration->evaluators));
55 $identity = new SnapshotIdentity($providers->input, $settings, $evaluators, $providers->manifest);
56 $snapshotId = $identity->id;
57 $input1 = $providers->input;
58 $parser = new Parser(new ParserConfig($target->version));
59 $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));
60 $program = new Index($snapshotId, $trees);
61 $result = (new QueryExecution($program, new ExecutionEvaluatorConfig($target, $providers->environment, $configuration->standardEvaluators), $evaluators, $identity->snapshot(array_map(Frontier::fromDiagnostic(...), $program->diagnostics()))))->derive(new ReturnQuery($symbol));
62 self::assertSame(['1,2', 2], $result->normalOutcomes[0]->values['return']->native());
63 self::assertSame([], $result->frontiers);
64 }
65 public function testJoinConvertsEveryKnownElementInOrder(): void
66 {
67 $source = '<?php function target(){return implode("-",[1,"a",true,null]);}';
68 $symbol = 'target';
69 $input = new Sources([new Source('fixture.php', $source)]);
70 $configuration = new DeriverConfig();
71 $contributions = new Contributions();
72 $target = new TargetProfile($configuration->phpVersion, $configuration->integerBits, $configuration->floatPrecision);
73 $providers = new ProviderExpansion($input, array_map(Term::fromNative(...), $configuration->environment), $contributions);
74 $contributions1 = $providers->contributions;
75 $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);
76 $settings = new EvaluatorConfig($target, $providers->environment, $configuration->standardEvaluators, array_map((new MicroEvaluatorConversion())->convert(...), $configuration->evaluators));
77 $identity = new SnapshotIdentity($providers->input, $settings, $evaluators, $providers->manifest);
78 $snapshotId = $identity->id;
79 $input1 = $providers->input;
80 $parser = new Parser(new ParserConfig($target->version));
81 $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));
82 $program = new Index($snapshotId, $trees);
83 $result = (new QueryExecution($program, new ExecutionEvaluatorConfig($target, $providers->environment, $configuration->standardEvaluators), $evaluators, $identity->snapshot(array_map(Frontier::fromDiagnostic(...), $program->diagnostics()))))->derive(new ReturnQuery($symbol));
84 self::assertSame('1-a-1-', $result->normalOutcomes[0]->values['return']->native());
85 }
86 public function testPartialJoinsTheHeadExactlyForAnEmptySourceAndKeepsItBeforeTheResidualOtherwise(): void
87 {
88 $source = '<?php function target(array $x){return implode(",",["id","name",...$x]);}';
89 $symbol = 'target';
90 $input = new Sources([new Source('fixture.php', $source)]);
91 $configuration = new DeriverConfig();
92 $contributions = new Contributions();
93 $target = new TargetProfile($configuration->phpVersion, $configuration->integerBits, $configuration->floatPrecision);
94 $providers = new ProviderExpansion($input, array_map(Term::fromNative(...), $configuration->environment), $contributions);
95 $contributions1 = $providers->contributions;
96 $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);
97 $settings = new EvaluatorConfig($target, $providers->environment, $configuration->standardEvaluators, array_map((new MicroEvaluatorConversion())->convert(...), $configuration->evaluators));
98 $identity = new SnapshotIdentity($providers->input, $settings, $evaluators, $providers->manifest);
99 $snapshotId = $identity->id;
100 $input1 = $providers->input;
101 $parser = new Parser(new ParserConfig($target->version));
102 $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));
103 $program = new Index($snapshotId, $trees);
104 $result = (new QueryExecution($program, new ExecutionEvaluatorConfig($target, $providers->environment, $configuration->standardEvaluators), $evaluators, $identity->snapshot(array_map(Frontier::fromDiagnostic(...), $program->diagnostics()))))->derive(new ReturnQuery($symbol));
105 $values = array_map(static fn (Alternative $outcome): Term => $outcome->values['return'], $result->normalOutcomes);
106 self::assertCount(2, $values);
107 self::assertSame('id,name', $values[0]->native());
108 self::assertSame(TermKind::Concat, $values[1]->kind);
109 self::assertSame('id,name,', $values[1]->operands[0]->native());
110 self::assertSame(['UNSUPPORTED_EVALUATOR_CASE'], array_column($result->frontiers, 'code'));
111 self::assertSame('implode', $result->frontiers[0]->operation);
112 self::assertTrue($result->exceptionalOutcomes[0]->exception->attributes['uncertain'] ?? false);
113 }
114 public function testPartialRunsHeadConversionsBeforeTheUnknownSource(): void
115 {
116 $source = '<?php class T{function __toString(){throw new LogicException;}} function target(array $x){try{return implode(",",[new T,...$x]);}catch(LogicException $e){return "caught";}}';
117 $symbol = 'target';
118 $input = new Sources([new Source('fixture.php', $source)]);
119 $configuration = new DeriverConfig();
120 $contributions = new Contributions();
121 $target = new TargetProfile($configuration->phpVersion, $configuration->integerBits, $configuration->floatPrecision);
122 $providers = new ProviderExpansion($input, array_map(Term::fromNative(...), $configuration->environment), $contributions);
123 $contributions1 = $providers->contributions;
124 $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);
125 $settings = new EvaluatorConfig($target, $providers->environment, $configuration->standardEvaluators, array_map((new MicroEvaluatorConversion())->convert(...), $configuration->evaluators));
126 $identity = new SnapshotIdentity($providers->input, $settings, $evaluators, $providers->manifest);
127 $snapshotId = $identity->id;
128 $input1 = $providers->input;
129 $parser = new Parser(new ParserConfig($target->version));
130 $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));
131 $program = new Index($snapshotId, $trees);
132 $result = (new QueryExecution($program, new ExecutionEvaluatorConfig($target, $providers->environment, $configuration->standardEvaluators), $evaluators, $identity->snapshot(array_map(Frontier::fromDiagnostic(...), $program->diagnostics()))))->derive(new ReturnQuery($symbol));
133 self::assertSame(['"caught"'], array_values(array_unique(array_map(static fn (Alternative $outcome): string => (string) json_encode($outcome->values['return']->native()), $result->normalOutcomes))));
134 self::assertSame([], $result->frontiers);
135 }
136 public function testPartialRetainsUnknownArrayInputs(): void
137 {
138 $input = new Sources([new Source('fixture.php', '<?php function target(array $x){return implode(",",["id",...$x]);}')]);
139 $configuration = new DeriverConfig();
140 $contributions = new Contributions();
141 $target = new TargetProfile($configuration->phpVersion, $configuration->integerBits, $configuration->floatPrecision);
142 $providers = new ProviderExpansion($input, array_map(Term::fromNative(...), $configuration->environment), $contributions);
143 $contributions1 = $providers->contributions;
144 $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);
145 $settings = new EvaluatorConfig($target, $providers->environment, $configuration->standardEvaluators, array_map((new MicroEvaluatorConversion())->convert(...), $configuration->evaluators));
146 $identity = new SnapshotIdentity($providers->input, $settings, $evaluators, $providers->manifest);
147 $snapshotId = $identity->id;
148 $input1 = $providers->input;
149 $parser = new Parser(new ParserConfig($target->version));
150 $trees = array_map(static fn (Source $source): File => (new Resolver())->resolve($parser->parse(new Source(Path::normalize($source->path), $source->contents, $source->declarationsOnly))), iterator_to_array($input1, false));
151 $program = new Index($snapshotId, $trees);
152 $session = new QueryExecution($program, new ExecutionEvaluatorConfig($target, $providers->environment, $configuration->standardEvaluators), $evaluators, $identity->snapshot(array_map(Frontier::fromDiagnostic(...), $program->diagnostics())));
153 $result = $session->derive(new ReturnQuery('target', scope: QueryScope::fromEntrypoints([new EntryPoint('target', [new Term(TermKind::Parameter, 'x', attributes: ['type' => 'array'])])])));
154 self::assertNotEmpty($result->normalOutcomes);
155 }
156 public function testSuffixKeepsTheEmptyAndNonemptyPrefixAlternatives(): void
157 {
158 $source = 'function target(array $x){sink(implode(",",[...$x,"z"]));}';
159 $input = new Sources([new Source('fixture.php', '<?php function sink($value){} ' . $source)]);
160 $configuration = new DeriverConfig();
161 $contributions = new Contributions();
162 $target = new TargetProfile($configuration->phpVersion, $configuration->integerBits, $configuration->floatPrecision);
163 $providers = new ProviderExpansion($input, array_map(Term::fromNative(...), $configuration->environment), $contributions);
164 $contributions1 = $providers->contributions;
165 $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);
166 $settings = new EvaluatorConfig($target, $providers->environment, $configuration->standardEvaluators, array_map((new MicroEvaluatorConversion())->convert(...), $configuration->evaluators));
167 $identity = new SnapshotIdentity($providers->input, $settings, $evaluators, $providers->manifest);
168 $snapshotId = $identity->id;
169 $input1 = $providers->input;
170 $parser = new Parser(new ParserConfig($target->version));
171 $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));
172 $program = new Index($snapshotId, $trees);
173 $session = new QueryExecution($program, new ExecutionEvaluatorConfig($target, $providers->environment, $configuration->standardEvaluators), $evaluators, $identity->snapshot(array_map(Frontier::fromDiagnostic(...), $program->diagnostics())));
174 $result = $session->derive(new ValueQuery((new CallObservations($session->program, $session->evaluators))->find('sink')[0]->argument(0)));
175 self::assertSame('z', $result->normalOutcomes[0]->values['value']->native());
176 self::assertFalse($result->normalOutcomes[1]->values['value']->isConcrete());
177 }
178}
179