@kitlangton/ghui 0.1.17 → 0.1.19

package/src/domain.ts

@@ -1,10 +1,56 @@
-export type PullRequestState = "open" | "closed" | "merged"
+import { Schema } from "effect"
 
-export type CheckConclusion = "success" | "failure" | "neutral" | "skipped" | "cancelled" | "timed_out"
+export const LoadStatus = Schema.Literals(["loading", "ready", "error"])
+export type LoadStatus = Schema.Schema.Type<typeof LoadStatus>
+
+export const PullRequestState = Schema.Literals(["open", "closed", "merged"])
+export type PullRequestState = Schema.Schema.Type<typeof PullRequestState>
+
+export const PullRequestQueueMode = Schema.Literals(["authored", "review", "assigned", "mentioned"])
+export type PullRequestQueueMode = Schema.Schema.Type<typeof PullRequestQueueMode>
+export const pullRequestQueueModes = PullRequestQueueMode.literals
+
+export const pullRequestQueueLabels = {
+	authored: "authored",
+	review: "review requested",
+	assigned: "assigned",
+	mentioned: "mentioned",
+} as const satisfies Record<PullRequestQueueMode, string>
+
+export const pullRequestQueueSearchQualifier = (mode: PullRequestQueueMode, author: string) => {
+	const qualifiers = {
+		authored: `author:${author}`,
+		review: "review-requested:@me",
+		assigned: "assignee:@me",
+		mentioned: "mentions:@me",
+	} as const satisfies Record<PullRequestQueueMode, string>
+	return qualifiers[mode]
+}
+
+export const CheckConclusion = Schema.Literals(["success", "failure", "neutral", "skipped", "cancelled", "timed_out"])
+export type CheckConclusion = Schema.Schema.Type<typeof CheckConclusion>
+
+export const CheckRunStatus = Schema.Literals(["completed", "in_progress", "queued", "pending"])
+export type CheckRunStatus = Schema.Schema.Type<typeof CheckRunStatus>
+
+export const CheckRollupStatus = Schema.Literals(["passing", "pending", "failing", "none"])
+export type CheckRollupStatus = Schema.Schema.Type<typeof CheckRollupStatus>
+
+export const ReviewStatus = Schema.Literals(["draft", "approved", "changes", "review", "none"])
+export type ReviewStatus = Schema.Schema.Type<typeof ReviewStatus>
+
+export const Mergeable = Schema.Literals(["mergeable", "conflicting", "unknown"])
+export type Mergeable = Schema.Schema.Type<typeof Mergeable>
+
+export const DiffCommentSide = Schema.Literals(["LEFT", "RIGHT"])
+export type DiffCommentSide = Schema.Schema.Type<typeof DiffCommentSide>
+
+export const PullRequestMergeAction = Schema.Literals(["squash", "auto", "admin", "disable-auto"])
+export type PullRequestMergeAction = Schema.Schema.Type<typeof PullRequestMergeAction>
 
 export interface CheckItem {
 	readonly name: string
-	readonly status: "completed" | "in_progress" | "queued" | "pending"
+	readonly status: CheckRunStatus
 	readonly conclusion: CheckConclusion | null
 }
 
@@ -13,8 +59,31 @@ export interface PullRequestLabel {
 	readonly color: string | null
 }
 
+export interface CreatePullRequestCommentInput {
+	readonly repository: string
+	readonly number: number
+	readonly commitId: string
+	readonly path: string
+	readonly line: number
+	readonly side: DiffCommentSide
+	readonly body: string
+}
+
+export interface PullRequestReviewComment {
+	readonly id: string
+	readonly path: string
+	readonly line: number
+	readonly side: DiffCommentSide
+	readonly author: string
+	readonly body: string
+	readonly createdAt: Date | null
+	readonly url: string | null
+}
+
 export interface PullRequestItem {
 	readonly repository: string
+	readonly author: string
+	readonly headRefOid: string
 	readonly number: number
 	readonly title: string
 	readonly body: string
@@ -23,8 +92,8 @@ export interface PullRequestItem {
 	readonly deletions: number
 	readonly changedFiles: number
 	readonly state: PullRequestState
-	readonly reviewStatus: "draft" | "approved" | "changes" | "review" | "none"
-	readonly checkStatus: "passing" | "pending" | "failing" | "none"
+	readonly reviewStatus: ReviewStatus
+	readonly checkStatus: CheckRollupStatus
 	readonly checkSummary: string | null
 	readonly checks: readonly CheckItem[]
 	readonly autoMergeEnabled: boolean
@@ -40,11 +109,9 @@ export interface PullRequestMergeInfo {
 	readonly title: string
 	readonly state: PullRequestState
 	readonly isDraft: boolean
-	readonly mergeable: "mergeable" | "conflicting" | "unknown"
-	readonly reviewStatus: PullRequestItem["reviewStatus"]
-	readonly checkStatus: PullRequestItem["checkStatus"]
+	readonly mergeable: Mergeable
+	readonly reviewStatus: ReviewStatus
+	readonly checkStatus: CheckRollupStatus
 	readonly checkSummary: string | null
 	readonly autoMergeEnabled: boolean
 }
-
-export type PullRequestMergeAction = "squash" | "auto" | "admin" | "disable-auto"

package/src/services/CommandRunner.ts

@@ -28,6 +28,8 @@ const readStream = async (stream: ReadableStream | null | undefined) => {
 export class CommandRunner extends Context.Service<CommandRunner, {
 	readonly run: (command: string, args: readonly string[]) => Effect.Effect<CommandResult, CommandError>
 	readonly runJson: <A>(command: string, args: readonly string[]) => Effect.Effect<A, CommandError | JsonParseError>
+	readonly runSchema: <S extends Schema.Top>(schema: S, command: string, args: readonly string[]) =>
+		Effect.Effect<S["Type"], CommandError | JsonParseError | Schema.SchemaError, S["DecodingServices"]>
 }>()("ghui/CommandRunner") {
 	static readonly layer = Layer.effect(
 		CommandRunner,
@@ -70,7 +72,12 @@ export class CommandRunner extends Context.Service<CommandRunner, {
 				})
 			})
 
-			return CommandRunner.of({ run, runJson })
+			const runSchema = Effect.fn("CommandRunner.runSchema")(function*<S extends Schema.Top>(schema: S, command: string, args: readonly string[]) {
+				const value = yield* runJson<unknown>(command, args)
+				return yield* Schema.decodeUnknownEffect(schema)(value)
+			})
+
+			return CommandRunner.of({ run, runJson, runSchema })
 		}),
 	)
 }