feat: no domain checks flag

See coop-cloud/organising#281.

cli/internal/common.go

@@ -392,6 +392,15 @@ var NewAppNameFlag = &cli.StringFlag{
 	Destination: &NewAppName,
 }
 
+var NoDomainChecks bool
+var NoDomainChecksFlag = &cli.BoolFlag{
+	Name:        "no-domain-checks",
+	Aliases:     []string{"nd"},
+	Value:       false,
+	Usage:       "Disable app domain sanity checks",
+	Destination: &NoDomainChecks,
+}
+
 // SSHFailMsg is a hopefully helpful SSH failure message
 var SSHFailMsg = `
 Woops, Abra is unable to connect to connect to %s.

cli/internal/deploy.go

@@ -116,14 +116,18 @@ func DeployAction(c *cli.Context) error {
 		logrus.Fatal(err)
 	}
 
-	domainName := app.Env["DOMAIN"]
-	ipv4, err := dns.EnsureIPv4(domainName)
-	if err != nil || ipv4 == "" {
-		logrus.Fatalf("could not find an IP address assigned to %s?", domainName)
-	}
+	if !NoDomainChecks {
+		domainName := app.Env["DOMAIN"]
+		ipv4, err := dns.EnsureIPv4(domainName)
+		if err != nil || ipv4 == "" {
+			logrus.Fatalf("could not find an IP address assigned to %s?", domainName)
+		}
 
-	if _, err = dns.EnsureDomainsResolveSameIPv4(domainName, app.Server); err != nil {
-		logrus.Fatal(err)
+		if _, err = dns.EnsureDomainsResolveSameIPv4(domainName, app.Server); err != nil {
+			logrus.Fatal(err)
+		}
+	} else {
+		logrus.Warn("skipping domain checks as requested")
 	}
 
 	if err := stack.RunDeploy(cl, deployOpts, compose, app.Env["TYPE"]); err != nil {