feat: Cloud CLI for adding projects

docs/docs/cloud/cloud-cli.mdx

@@ -7,8 +7,14 @@ sidebar_position: 5
 
 :::info
 
-<p><strong>Meltano Cloud is currently in Beta.</strong></p>
-<p>While in Beta, functionality is not guaranteed and subject to change. <br /> If you're interested in using Meltano Cloud please join our <a href="https://meltano.com/cloud/">waitlist</a>.</p>
+<p>
+  <strong>Meltano Cloud is currently in Beta.</strong>
+</p>
+<p>
+  While in Beta, functionality is not guaranteed and subject to change. <br />{" "}
+  If you're interested in using Meltano Cloud please join our{" "}
+  <a href="https://meltano.com/cloud/">waitlist</a>.
+</p>
 
 :::
 
@@ -68,8 +74,12 @@ The above example creates a new deployment named `my-dev-deployment` for the Mel
 
 :::info
 
-<p>If your deployment is failing you can try running <a href="/reference/command-line-interface#compile">`meltano compile`</a> to confirm that your configuration files are valid.
-Also double check that you have schedules configured, otherwise the deployment will throw an error.</p>
+<p>
+  If your deployment is failing you can try running{" "}
+  <a href="/reference/command-line-interface#compile">`meltano compile`</a> to
+  confirm that your configuration files are valid. Also double check that you
+  have schedules configured, otherwise the deployment will throw an error.
+</p>
 
 :::
 
@@ -219,6 +229,14 @@ meltano cloud project list
 ╰───────────┴───────────────────────────────┴──────────────────────────────────────────────────────────╯
 ```
 
+The `create` subcommand creates a new Meltano Cloud project.
+
+```sh
+meltano-cloud project create --name example-project --repo-url https://github.com/meltano/squared.git --root-path "data/"
+⠋ Creating project - this may take several minutes...
+Project 'example-project' created successfully.
+```
+
 When you run the `login` command, if you only have a single project, it will be set as the default project to use for future commands. Otherwise, you will need to run `meltano cloud project use` to specify which Meltano Cloud project the other `meltano cloud` commands should operate on.
 
 When `meltano cloud project use` is not provided any argument, it will list the available projects, and have you select one interactively using the arrow keys. To select a project as the default non-interactively, use the `--name` argument:
@@ -260,7 +278,16 @@ meltano cloud job stop --execution-id 15e1cbbde6b2424f86c04b237291d652
 
 :::info
 
-  <p>At the moment, executions stopped manually will be marked as <i>Failed</i> in the output of <a href="#history"><code>meltano cloud history</code></a>. See <a href="https://github.com/meltano/meltano/issues/7697">#7697</a> for more details.</p>
+{" "}
+<p>
+  At the moment, executions stopped manually will be marked as <i>Failed</i> in
+  the output of{" "}
+  <a href="#history">
+    <code>meltano cloud history</code>
+  </a>
+  . See <a href="https://github.com/meltano/meltano/issues/7697">#7697</a> for
+  more details.
+</p>
 :::
 
 ## `schedule`

src/meltano/cloud/cli/project.py

@@ -6,11 +6,14 @@
 import logging
 import sys
 import typing as t
+from http import HTTPStatus
 
 import click
 import questionary
+from slugify import slugify
+from yaspin import yaspin  # type: ignore
 
-from meltano.cloud.api.client import MeltanoCloudClient
+from meltano.cloud.api.client import MeltanoCloudClient, MeltanoCloudError
 from meltano.cloud.cli.base import (
     LimitedResult,
     get_paginated,
@@ -63,6 +66,25 @@
                 ),
             )
 
+    async def create_project(
+        self,
+        project_name: str,
+        git_repository: str,
+        project_root_path: str | None = None,
+    ):
+        """Use POST to create new Meltano Cloud project."""
+        async with self.authenticated():
+            payload = {"project_name": project_name, "git_repository": git_repository}
+            if project_root_path:
+                payload["project_root_path"] = project_root_path
+            async with self._raw_request(
+                "POST",
+                f"/projects/v1/{self.config.tenant_resource_key}",
+                json=payload,
+            ) as response:
+                response.raise_for_status()
+                return response
+
 
 @click.group("project")
 def project_group() -> None:
@@ -282,3 +304,41 @@
         ),
         fg="green",
     )
+
+
+@project_group.command("create")
+@click.option("--name", type=str, prompt=True)
+@click.option("--repo-url", type=str, prompt=True)
+@click.option("--root-path", type=str, required=False)
+@pass_context
+@run_async
+async def create_project(
+    context: MeltanoCloudCLIContext,
+    name: str,
+    repo_url: str,
+    root_path: str | None = None,
+):
+    """Create a project to your Meltano Cloud."""
+    async with ProjectsCloudClient(config=context.config) as client:
+        try:
+            with yaspin(
+                text="Creating project - this may take several minutes...",
+            ):
+                response = await client.create_project(
+                    project_name=name,
+                    git_repository=repo_url,
+                    project_root_path=root_path,
+                )
+        except MeltanoCloudError as e:
+            if e.response.status == HTTPStatus.CONFLICT:
+                click.secho(
+                    (
+                        f"A project named {name!r} (normalized to "
+                        f"{slugify(name)!r}) already exists."
+                    ),
+                    fg="yellow",
+                )
+            return None
+        click.echo(f"Project {name!r} created successfully.")
+        if response.status == HTTPStatus.NO_CONTENT:
+            return None

tests/meltano/cloud/cli/test_project.py

@@ -17,6 +17,7 @@
 
 if t.TYPE_CHECKING:
     from pytest_httpserver import HTTPServer
+    from requests_mock import Mocker as RequestsMocker
 
     from meltano.cloud.api.config import MeltanoCloudConfig
     from meltano.cloud.api.types import CloudProject
@@ -74,6 +75,21 @@ def projects(self, tenant_resource_key: str) -> list[CloudProject]:
     def path(self, tenant_resource_key: str) -> str:
         return f"/projects/v1/{tenant_resource_key}"
 
+    @pytest.fixture()
+    def prepared_request(self, request: pytest.FixtureRequest):
+        return {
+            "method": request.param["method"],
+            "url": "https://asdf.lambda-url.us-west-2.on.aws.example.com/",
+            "params": {},
+            "headers": {
+                "Content-Type": "application/json",
+                "X-Amz-Date": "20230525T185058Z",
+                "X-Amz-Security-Token": "IQoJb3JpZ2luX2VjEOP/////////wEaCXV==",
+                "Authorization": "AWS4-HMAC-SHA256 Credential=ASI3AV1SM3BH...",
+            },
+            "data": '{"environment_name": "staging", "git_rev": "main"}',
+        }
+
     def test_project_list_table(
         self,
         config: MeltanoCloudConfig,
@@ -391,3 +407,42 @@ def test_project_use_by_name_and_id_error(self, config: MeltanoCloudConfig):
         )
         assert result.exit_code == 2
         assert "The '--name' and '--id' options are mutually exclusive" in result.output
+
+    @pytest.mark.parametrize("prepared_request", ({"method": "POST"},), indirect=True)
+    def test_project_create(
+        self,
+        projects: list[CloudProject],
+        httpserver: HTTPServer,
+        config: MeltanoCloudConfig,
+        prepared_request,
+        requests_mock: RequestsMocker,
+    ):
+        for project in projects[:3]:
+            httpserver.expect_oneshot_request(
+                f"/projects/v1/{project['tenant_resource_key']}",
+                method="POST",
+            ).respond_with_json(prepared_request)
+            requests_mock.post(prepared_request["url"], json=project)  # noqa: S113
+            result = CliRunner().invoke(
+                cli,
+                (
+                    "--config-path",
+                    config.config_path,
+                    "project",
+                    "create",
+                    "--name",
+                    project["project_name"],
+                    "--repo-url",
+                    project["git_repository"],
+                    "--root-path",
+                    project["project_root_path"],
+                ),
+            )
+            assert result.exit_code == 0, result.output
+            assert (
+                "Creating project - this may take several minutes..." in result.output
+            )
+            assert (
+                f"Project {project['project_name']!r} created successfully.\n"
+                in result.output
+            )