396 lines · 11.9 KB · TypeScript
RawDownload
import * as Context from "effect/Context";import * as Effect from "effect/Effect";import * as Layer from "effect/Layer";import * as Result from "effect/Result";import * as Schema from "effect/Schema"; import {  TrimmedNonEmptyString,  type SourceControlRepositoryVisibility,  type VcsError,} from "@t3tools/contracts"; import * as VcsProcess from "../vcs/VcsProcess.ts";import {  decodeGitHubPullRequestJson,  decodeGitHubPullRequestListJson,} from "./gitHubPullRequests.ts"; const DEFAULT_TIMEOUT_MS = 30_000; export class GitHubCliError extends Schema.TaggedErrorClass<GitHubCliError>()("GitHubCliError", {  operation: Schema.String,  command: Schema.String,  cwd: Schema.String,  detail: Schema.String,  cause: Schema.optional(Schema.Defect()),}) {  override get message(): string {    return `GitHub CLI failed in ${this.operation}: ${this.detail}`;  }   static fromVcsError(    context: {      readonly operation: "execute";      readonly command: "gh";      readonly cwd: string;    },    error: VcsError | unknown,  ): GitHubCliError {    const lower = errorText(error).toLowerCase();     if (lower.includes("command not found: gh") || lower.includes("enoent")) {      return new GitHubCliError({        ...context,        detail: "GitHub CLI (`gh`) is required but not available on PATH.",        cause: error,      });    }     if (      lower.includes("authentication failed") ||      lower.includes("not logged in") ||      lower.includes("gh auth login") ||      lower.includes("no oauth token")    ) {      return new GitHubCliError({        ...context,        detail: "GitHub CLI is not authenticated. Run `gh auth login` and retry.",        cause: error,      });    }     if (      lower.includes("could not resolve to a pullrequest") ||      lower.includes("repository.pullrequest") ||      lower.includes("no pull requests found for branch") ||      lower.includes("pull request not found")    ) {      return new GitHubCliError({        ...context,        detail: "Pull request not found. Check the PR number or URL and try again.",        cause: error,      });    }     return new GitHubCliError({      ...context,      detail: "GitHub CLI command failed.",      cause: error,    });  }} export interface GitHubPullRequestSummary {  readonly number: number;  readonly title: string;  readonly url: string;  readonly baseRefName: string;  readonly headRefName: string;  readonly state?: "open" | "closed" | "merged";  readonly isCrossRepository?: boolean;  readonly headRepositoryNameWithOwner?: string | null;  readonly headRepositoryOwnerLogin?: string | null;} export interface GitHubRepositoryCloneUrls {  readonly nameWithOwner: string;  readonly url: string;  readonly sshUrl: string;} export class GitHubCli extends Context.Service<  GitHubCli,  {    readonly execute: (input: {      readonly cwd: string;      readonly args: ReadonlyArray<string>;      readonly timeoutMs?: number;    }) => Effect.Effect<VcsProcess.VcsProcessOutput, GitHubCliError>;     readonly listOpenPullRequests: (input: {      readonly cwd: string;      readonly headSelector: string;      readonly limit?: number;    }) => Effect.Effect<ReadonlyArray<GitHubPullRequestSummary>, GitHubCliError>;     readonly getPullRequest: (input: {      readonly cwd: string;      readonly reference: string;    }) => Effect.Effect<GitHubPullRequestSummary, GitHubCliError>;     readonly getRepositoryCloneUrls: (input: {      readonly cwd: string;      readonly repository: string;    }) => Effect.Effect<GitHubRepositoryCloneUrls, GitHubCliError>;     readonly createRepository: (input: {      readonly cwd: string;      readonly repository: string;      readonly visibility: SourceControlRepositoryVisibility;    }) => Effect.Effect<GitHubRepositoryCloneUrls, GitHubCliError>;     readonly createPullRequest: (input: {      readonly cwd: string;      readonly baseBranch: string;      readonly headSelector: string;      readonly title: string;      readonly bodyFile: string;    }) => Effect.Effect<void, GitHubCliError>;     readonly getDefaultBranch: (input: {      readonly cwd: string;    }) => Effect.Effect<string | null, GitHubCliError>;     readonly checkoutPullRequest: (input: {      readonly cwd: string;      readonly reference: string;      readonly force?: boolean;    }) => Effect.Effect<void, GitHubCliError>;  }>()("t3/sourceControl/GitHubCli") {} function errorText(error: VcsError | unknown): string {  if (typeof error === "object" && error !== null) {    const tag = "_tag" in error && typeof error._tag === "string" ? error._tag : "";    const detail = "detail" in error && typeof error.detail === "string" ? error.detail : "";    const message = "message" in error && typeof error.message === "string" ? error.message : "";    return [tag, detail, message].filter(Boolean).join("\n");  }   return String(error);} const RawGitHubRepositoryCloneUrlsSchema = Schema.Struct({  nameWithOwner: TrimmedNonEmptyString,  url: TrimmedNonEmptyString,  sshUrl: TrimmedNonEmptyString,}); function normalizeRepositoryCloneUrls(  raw: Schema.Schema.Type<typeof RawGitHubRepositoryCloneUrlsSchema>,): GitHubRepositoryCloneUrls {  return {    nameWithOwner: raw.nameWithOwner,    url: raw.url,    sshUrl: raw.sshUrl,  };} /** * `gh repo create` prints the canonical URL of the new repository on stdout * (e.g. `https://github.com/owner/repo`). Reading it back here avoids a * follow-up `gh repo view`, which can race GitHub's GraphQL eventual * consistency window and falsely report the just-created repo as missing. */function deriveRepositoryCloneUrlsFromCreateOutput(  stdout: string,  repository: string,): GitHubRepositoryCloneUrls {  const fallbackHost = "github.com";  const match = stdout.match(/https?:\/\/[^\s]+/);  if (match) {    const cleaned = match[0].replace(/\.git$/, "");    try {      const parsed = new URL(cleaned);      const pathname = parsed.pathname.replace(/^\/+|\/+$/g, "");      const segments = pathname.split("/").filter(Boolean);      if (segments.length === 2) {        const nameWithOwner = `${segments[0]}/${segments[1]}`;        return {          nameWithOwner,          url: `${parsed.origin}/${nameWithOwner}`,          sshUrl: `git@${parsed.host}:${nameWithOwner}.git`,        };      }    } catch {      // Fall through to the input-derived defaults below.    }  }  return {    nameWithOwner: repository,    url: `https://${fallbackHost}/${repository}`,    sshUrl: `git@${fallbackHost}:${repository}.git`,  };} function decodeGitHubJson<S extends Schema.Top>(  raw: string,  schema: S,  operation: "listOpenPullRequests" | "getPullRequest" | "getRepositoryCloneUrls",  invalidDetail: string,  cwd: string,): Effect.Effect<S["Type"], GitHubCliError, S["DecodingServices"]> {  return Schema.decodeEffect(Schema.fromJsonString(schema))(raw).pipe(    Effect.mapError(      (error) =>        new GitHubCliError({          operation,          command: "gh",          cwd,          detail: invalidDetail,          cause: error,        }),    ),  );} export const make = Effect.gen(function* () {  const process = yield* VcsProcess.VcsProcess;   const execute: GitHubCli["Service"]["execute"] = (input) =>    process      .run({        operation: "GitHubCli.execute",        command: "gh",        args: input.args,        cwd: input.cwd,        timeoutMs: input.timeoutMs ?? DEFAULT_TIMEOUT_MS,      })      .pipe(        Effect.mapError((error) =>          GitHubCliError.fromVcsError(            { operation: "execute", command: "gh", cwd: input.cwd },            error,          ),        ),      );   return GitHubCli.of({    execute,    listOpenPullRequests: (input) =>      execute({        cwd: input.cwd,        args: [          "pr",          "list",          "--head",          input.headSelector,          "--state",          "open",          "--limit",          String(input.limit ?? 1),          "--json",          "number,title,url,baseRefName,headRefName,state,mergedAt,isCrossRepository,headRepository,headRepositoryOwner",        ],      }).pipe(        Effect.map((result) => result.stdout.trim()),        Effect.flatMap((raw) =>          raw.length === 0            ? Effect.succeed([])            : Effect.sync(() => decodeGitHubPullRequestListJson(raw)).pipe(                Effect.flatMap((decoded) => {                  if (!Result.isSuccess(decoded)) {                    return Effect.fail(                      new GitHubCliError({                        operation: "listOpenPullRequests",                        command: "gh",                        cwd: input.cwd,                        detail: "GitHub CLI returned invalid PR list JSON.",                        cause: decoded.failure,                      }),                    );                  }                   return Effect.succeed(                    decoded.success.map(({ updatedAt: _updatedAt, ...summary }) => summary),                  );                }),              ),        ),      ),    getPullRequest: (input) =>      execute({        cwd: input.cwd,        args: [          "pr",          "view",          input.reference,          "--json",          "number,title,url,baseRefName,headRefName,state,mergedAt,isCrossRepository,headRepository,headRepositoryOwner",        ],      }).pipe(        Effect.map((result) => result.stdout.trim()),        Effect.flatMap((raw) =>          Effect.sync(() => decodeGitHubPullRequestJson(raw)).pipe(            Effect.flatMap((decoded) => {              if (!Result.isSuccess(decoded)) {                return Effect.fail(                  new GitHubCliError({                    operation: "getPullRequest",                    command: "gh",                    cwd: input.cwd,                    detail: "GitHub CLI returned invalid pull request JSON.",                    cause: decoded.failure,                  }),                );              }               return Effect.succeed(                (({ updatedAt: _updatedAt, ...summary }) => summary)(decoded.success),              );            }),          ),        ),      ),    getRepositoryCloneUrls: (input) =>      execute({        cwd: input.cwd,        args: ["repo", "view", input.repository, "--json", "nameWithOwner,url,sshUrl"],      }).pipe(        Effect.map((result) => result.stdout.trim()),        Effect.flatMap((raw) =>          decodeGitHubJson(            raw,            RawGitHubRepositoryCloneUrlsSchema,            "getRepositoryCloneUrls",            "GitHub CLI returned invalid repository JSON.",            input.cwd,          ),        ),        Effect.map(normalizeRepositoryCloneUrls),      ),    createRepository: (input) =>      execute({        cwd: input.cwd,        args: ["repo", "create", input.repository, `--${input.visibility}`],      }).pipe(        Effect.map((result) =>          deriveRepositoryCloneUrlsFromCreateOutput(result.stdout, input.repository),        ),      ),    createPullRequest: (input) =>      execute({        cwd: input.cwd,        args: [          "pr",          "create",          "--base",          input.baseBranch,          "--head",          input.headSelector,          "--title",          input.title,          "--body-file",          input.bodyFile,        ],      }).pipe(Effect.asVoid),    getDefaultBranch: (input) =>      execute({        cwd: input.cwd,        args: ["repo", "view", "--json", "defaultBranchRef", "--jq", ".defaultBranchRef.name"],      }).pipe(        Effect.map((value) => {          const trimmed = value.stdout.trim();          return trimmed.length > 0 ? trimmed : null;        }),      ),    checkoutPullRequest: (input) =>      execute({        cwd: input.cwd,        args: ["pr", "checkout", input.reference, ...(input.force ? ["--force"] : [])],      }).pipe(Effect.asVoid),  });}); export const layer = Layer.effect(GitHubCli, make);