Add fail hook support to MAML recipes

Author: antonmedv

src/Import/MamlRecipe.php

@@ -28,6 +28,7 @@
 use function Deployer\before;
 use function Deployer\cd;
 use function Deployer\download;
+use function Deployer\fail;
 use function Deployer\host;
 use function Deployer\localhost;
 use function Deployer\run;
@@ -147,6 +148,9 @@ private function schema(): SchemaType
                     ),
                 ),
             ),
+            'fail' => S::optional(
+                S::map(S::string()),
+            ),
         ]);
     }
 
@@ -200,6 +204,10 @@ public function run(): void
                     $this->after($property);
                     break;
 
+                case 'fail':
+                    $this->fail($property);
+                    break;
+
                 default:
                     $this->throwException("Unknown property $key", $property->key->span);
             }
@@ -443,6 +451,19 @@ protected function after(Property $property): void
         }
     }
 
+    protected function fail(Property $property): void
+    {
+        $object = $property->value;
+        if (!$object instanceof ObjectNode) {
+            $this->throwException('Invalid fail format', $object->span);
+        }
+        foreach ($object->properties as $property) {
+            $key = $property->key->value;
+            $value = Maml::toValue($property->value);
+            fail($key, $value);
+        }
+    }
+
     private function throwException(string $string, Span $span): never
     {
         throw new Exception(Maml::errorSnippet(

tests/src/Import/MamlRecipeTest.php

@@ -724,4 +724,50 @@ public function testTaskWithMultipleConfigProperties(): void
 
         self::assertInstanceOf(\Closure::class, $callbackProp->getValue($task));
     }
+
+    public function testFailHook(): void
+    {
+        $this->runMaml('{
+            tasks: {
+                deploy: [
+                    { run: "echo deploy" }
+                ]
+                rollback: [
+                    { run: "echo rollback" }
+                ]
+            }
+            fail: {
+                deploy: "rollback"
+            }
+        }');
+
+        self::assertEquals('rollback', $this->deployer->fail->get('deploy'));
+    }
+
+    public function testFailHookMultipleTasks(): void
+    {
+        $this->runMaml('{
+            tasks: {
+                deploy: [
+                    { run: "echo deploy" }
+                ]
+                migrate: [
+                    { run: "echo migrate" }
+                ]
+                rollback: [
+                    { run: "echo rollback" }
+                ]
+                unlock: [
+                    { run: "echo unlock" }
+                ]
+            }
+            fail: {
+                deploy: "rollback"
+                migrate: "unlock"
+            }
+        }');
+
+        self::assertEquals('rollback', $this->deployer->fail->get('deploy'));
+        self::assertEquals('unlock', $this->deployer->fail->get('migrate'));
+    }
 }