1import * as GCP from "@/GCP";
2import * as Test from "@/Test/Alchemy";
3import * as sasportal from "@distilled.cloud/gcp/sasportal_v1alpha1";
4import { expect } from "alchemy-test";
5import * as Effect from "effect/Effect";
6import * as Schedule from "effect/Schedule";
7import { firstCustomerName, logLevel, runLifecycle } from "./common.ts";
8
9const { test } = Test.make({ providers: GCP.providers() });
10
11const waitUntilGone = (name: string) =>
12 sasportal.getCustomersNodes({ name }).pipe(
13 Effect.as("found" as const),
14 Effect.catchTag("NotFound", () => Effect.succeed("gone" as const)),
15 Effect.repeat({
16 schedule: Schedule.spaced("1 second"),
17 until: (status) => status === "gone",
18 times: 10,
19 }),
20 );
21
22test.provider(
23 "getCustomersNodes on a missing node fails with a typed tag",
24 (stack) =>
25 Effect.gen(function* () {
26 yield* stack.destroy();
27
28 const error = yield* Effect.flip(
29 sasportal.getCustomersNodes({
30 name: "customers/missing/nodes/alchemy-missing",
31 }),
32 );
33 expect(error._tag).toEqual("ServiceDisabled");
34
35 yield* stack.destroy();
36 }).pipe(logLevel),
37 { tags: ["provider:gcp", "provider:gcp:sasportal", "live"], timeout: 90_000 },
38);
39
40test.provider.skipIf(runLifecycle)(
41 "createCustomersNodes without entitlement fails with a typed tag",
42 (stack) =>
43 Effect.gen(function* () {
44 yield* stack.destroy();
45
46 const error = yield* Effect.flip(
47 sasportal.createCustomersNodes({
48 parent: "customers/missing",
49 body: { displayName: "alchemy-sasportal-probe" },
50 }),
51 );
52 expect(error._tag).toEqual("ServiceDisabled");
53
54 yield* stack.destroy();
55 }).pipe(logLevel),
56 { tags: ["provider:gcp", "provider:gcp:sasportal", "live"], timeout: 90_000 },
57);
58
59test.provider.skipIf(!runLifecycle)(
60 "create, update, and delete a customer node",
61 (stack) =>
62 Effect.gen(function* () {
63 yield* stack.destroy();
64
65 const parent = yield* firstCustomerName;
66 expect(parent.length).toBeGreaterThan(0);
67
68 const created = yield* stack.deploy(
69 Effect.gen(function* () {
70 return yield* GCP.SasPortal.CustomersNode("Region", {
71 parent,
72 displayName: "west",
73 });
74 }),
75 );
76
77 expect(created.name.length).toBeGreaterThan(0);
78 expect(created.parent).toEqual(parent);
79 expect(created.displayName).toEqual("west");
80
81 const fetched = yield* sasportal.getCustomersNodes({
82 name: created.name,
83 });
84 expect(fetched.name).toEqual(created.name);
85 expect(fetched.displayName).toContain("[alchemy ");
86
87 const updated = yield* stack.deploy(
88 Effect.gen(function* () {
89 return yield* GCP.SasPortal.CustomersNode("Region", {
90 parent,
91 name: created.name,
92 displayName: "west-2",
93 });
94 }),
95 );
96
97 expect(updated.name).toEqual(created.name);
98 expect(updated.displayName).toEqual("west-2");
99
100 yield* stack.destroy();
101
102 const gone = yield* waitUntilGone(created.name);
103 expect(gone).toEqual("gone");
104 }).pipe(logLevel),
105 { tags: ["provider:gcp", "provider:gcp:sasportal", "live"], timeout: 90_000 },
106);