effect-orpc 0.1.4 → 0.2.1

package/src/effect-procedure.ts

@@ -1,22 +1,11 @@
 import type { ClientContext } from "@orpc/client";
-import type {
-  AnySchema,
-  InferSchemaInput,
-  InferSchemaOutput,
-  Meta,
-  Route,
-} from "@orpc/contract";
+import type { AnySchema, Meta, Route } from "@orpc/contract";
 import { mergeMeta, mergeRoute } from "@orpc/contract";
 import type {
   AnyMiddleware,
   Context,
   CreateProcedureClientOptions,
   MapInputMiddleware,
-  MergedCurrentContext,
-  MergedInitialContext,
-  Middleware,
-  ProcedureActionableClient,
-  ProcedureClient,
   ProcedureDef,
 } from "@orpc/server";
 import {
@@ -26,16 +15,238 @@ import {
   decorateMiddleware,
   Procedure,
 } from "@orpc/server";
-import type { IntersectPick, MaybeOptionalOptions } from "@orpc/shared";
+import type { MaybeOptionalOptions } from "@orpc/shared";
 
-import type {
-  EffectErrorConstructorMap,
-  EffectErrorMap,
-  MergedEffectErrorMap,
-} from "./tagged-error";
+import { composeSurfaceProxy } from "./extension/compose-surfaces";
+import {
+  createNodeProxy,
+  unhandled,
+  type NodeProxyContext,
+} from "./extension/create-node-proxy";
+import {
+  assertEffectState,
+  attachEffectState,
+  type EffectProxyTarget,
+} from "./extension/state";
+import type { EffectErrorMap, MergedEffectErrorMap } from "./tagged-error";
 import { effectErrorMapToErrorMap } from "./tagged-error";
 import type { EffectErrorMapToErrorMap, EffectProcedureDef } from "./types";
+import type { EffectDecoratedProcedureSurface } from "./types/effect-procedure-surface";
+
+type AnyProcedureLike = Procedure<any, any, any, any, any, any>;
+type AnyEffectProcedure = EffectProcedure<
+  any,
+  any,
+  any,
+  any,
+  any,
+  any,
+  any,
+  any
+>;
+type AnyEffectDecoratedProcedure = EffectDecoratedProcedure<
+  any,
+  any,
+  any,
+  any,
+  any,
+  any,
+  any,
+  any
+>;
+type EffectProcedureTarget<
+  T extends AnyEffectProcedure | AnyEffectDecoratedProcedure =
+    | AnyEffectProcedure
+    | AnyEffectDecoratedProcedure,
+> = T & EffectProxyTarget<AnyProcedureLike>;
+
+const procedureVirtualDescriptors = {
+  "~effect": { enumerable: true },
+  actionable: { enumerable: false },
+  callable: { enumerable: false },
+  errors: { enumerable: false },
+  meta: { enumerable: false },
+  route: { enumerable: false },
+  use: { enumerable: false },
+} as const;
+
+const baseProcedureVirtualKeys = ["~effect"] as const;
+const decoratedProcedureVirtualKeys = [
+  ...baseProcedureVirtualKeys,
+  "errors",
+  "meta",
+  "route",
+  "use",
+  "callable",
+  "actionable",
+] as const;
+
+function getOrCreateVirtualMethod<T>(
+  context: NodeProxyContext<EffectProcedureTarget, AnyProcedureLike>,
+  prop: PropertyKey,
+  factory: () => T,
+): T {
+  const cache = context.methodCache;
+  if (cache.has(prop)) {
+    return cache.get(prop) as T;
+  }
+
+  const value = factory();
+  cache.set(prop, value);
+  return value;
+}
+
+function getEffectProcedureDef(
+  context: NodeProxyContext<EffectProcedureTarget, AnyProcedureLike>,
+): EffectProcedureDef<any, any, any, any, any, any, any, any> {
+  return {
+    ...context.upstream["~orpc"],
+    effectErrorMap: context.state.effectErrorMap,
+    runtime: context.state.runtime,
+  };
+}
 
+function createEffectProcedureProxy<
+  T extends AnyEffectProcedure | AnyEffectDecoratedProcedure,
+>(
+  target: EffectProcedureTarget<T>,
+  decorated: boolean,
+): EffectProcedureTarget<T> {
+  return createNodeProxy<EffectProcedureTarget<T>, AnyProcedureLike>(target, {
+    getVirtual(context, prop, receiver) {
+      if (prop === "~effect") {
+        return getEffectProcedureDef(context);
+      }
+
+      if (!decorated) {
+        return unhandled();
+      }
+
+      const state = context.state;
+
+      switch (prop) {
+        case "errors":
+          return getOrCreateVirtualMethod(context, prop, () => {
+            return <U extends EffectErrorMap>(errors: U) => {
+              const nextEffectErrorMap: MergedEffectErrorMap<
+                typeof state.effectErrorMap,
+                U
+              > = {
+                ...state.effectErrorMap,
+                ...errors,
+              };
+              return new EffectDecoratedProcedure({
+                ...getEffectProcedureDef(context),
+                effectErrorMap: nextEffectErrorMap,
+                errorMap: effectErrorMapToErrorMap(nextEffectErrorMap),
+              });
+            };
+          });
+        case "meta":
+          return getOrCreateVirtualMethod(context, prop, () => {
+            return (meta: Meta) =>
+              new EffectDecoratedProcedure({
+                ...getEffectProcedureDef(context),
+                meta: mergeMeta(getEffectProcedureDef(context).meta, meta),
+              });
+          });
+        case "route":
+          return getOrCreateVirtualMethod(context, prop, () => {
+            return (route: Route) =>
+              new EffectDecoratedProcedure({
+                ...getEffectProcedureDef(context),
+                route: mergeRoute(getEffectProcedureDef(context).route, route),
+              });
+          });
+        case "use":
+          return getOrCreateVirtualMethod(context, prop, () => {
+            return (
+              middleware: AnyMiddleware,
+              mapInput?: MapInputMiddleware<any, any>,
+            ) => {
+              const mapped = mapInput
+                ? decorateMiddleware(middleware).mapInput(mapInput)
+                : middleware;
+
+              return new EffectDecoratedProcedure({
+                ...getEffectProcedureDef(context),
+                middlewares: addMiddleware(
+                  getEffectProcedureDef(context).middlewares,
+                  mapped,
+                ),
+              });
+            };
+          });
+        case "callable":
+          return <TClientContext extends ClientContext>(
+            ...rest: MaybeOptionalOptions<
+              CreateProcedureClientOptions<any, any, any, any, TClientContext>
+            >
+          ) => {
+            const client = createProcedureClient(
+              receiver as AnyProcedureLike,
+              ...rest,
+            );
+            return composeSurfaceProxy(
+              receiver as EffectDecoratedProcedure<
+                any,
+                any,
+                any,
+                any,
+                any,
+                any,
+                any,
+                any
+              >,
+              client,
+            );
+          };
+        case "actionable":
+          return (
+            ...rest: MaybeOptionalOptions<
+              CreateProcedureClientOptions<
+                any,
+                any,
+                any,
+                any,
+                Record<never, never>
+              >
+            >
+          ) => {
+            const client = createProcedureClient(
+              receiver as AnyProcedureLike,
+              ...rest,
+            );
+            const action = createActionableClient(client);
+            return composeSurfaceProxy(
+              receiver as EffectDecoratedProcedure<
+                any,
+                any,
+                any,
+                any,
+                any,
+                any,
+                any,
+                any
+              >,
+              action,
+            );
+          };
+        default:
+          return unhandled();
+      }
+    },
+    virtualDescriptors: procedureVirtualDescriptors,
+    virtualKeys: decorated
+      ? decoratedProcedureVirtualKeys
+      : baseProcedureVirtualKeys,
+  });
+}
+
+/**
+ * Effect-aware base procedure that carries the upstream procedure definition
+ * together with Effect runtime and error metadata.
+ */
 export class EffectProcedure<
   TInitialContext extends Context,
   TCurrentContext extends Context,
@@ -53,9 +264,6 @@ export class EffectProcedure<
   EffectErrorMapToErrorMap<TEffectErrorMap>,
   TMeta
 > {
-  /**
-   * This property holds the defined options and the effect-specific properties.
-   */
   declare "~effect": EffectProcedureDef<
     TInitialContext,
     TCurrentContext,
@@ -66,9 +274,6 @@ export class EffectProcedure<
     TRequirementsProvided,
     TRuntimeError
   >;
-  /**
-   * This property holds the defined options.
-   */
   declare "~orpc": ProcedureDef<
     TInitialContext,
     TCurrentContext,
@@ -89,9 +294,17 @@ export class EffectProcedure<
       TRequirementsProvided,
       TRuntimeError
     >,
+    procedure?: AnyProcedureLike,
   ) {
     super(def);
-    this["~effect"] = def;
+    attachEffectState(this, procedure ?? new Procedure(def), {
+      effectErrorMap: def.effectErrorMap,
+      runtime: def.runtime,
+    });
+
+    if (new.target === EffectProcedure) {
+      return createEffectProcedureProxy(this, false);
+    }
   }
 }
 
@@ -110,20 +323,8 @@ export class EffectDecoratedProcedure<
   TMeta extends Meta,
   TRequirementsProvided,
   TRuntimeError,
-> extends EffectProcedure<
-  TInitialContext,
-  TCurrentContext,
-  TInputSchema,
-  TOutputSchema,
-  TEffectErrorMap,
-  TMeta,
-  TRequirementsProvided,
-  TRuntimeError
-> {
-  /**
-   * This property holds the defined options and the effect-specific properties.
-   */
-  declare "~effect": EffectProcedureDef<
+>
+  extends EffectProcedure<
     TInitialContext,
     TCurrentContext,
     TInputSchema,
@@ -132,18 +333,9 @@ export class EffectDecoratedProcedure<
     TMeta,
     TRequirementsProvided,
     TRuntimeError
-  >;
-  declare "~orpc": ProcedureDef<
-    TInitialContext,
-    TCurrentContext,
-    TInputSchema,
-    TOutputSchema,
-    EffectErrorMapToErrorMap<TEffectErrorMap>,
-    TMeta
-  >;
-
-  constructor(
-    def: EffectProcedureDef<
+  >
+  implements
+    EffectDecoratedProcedureSurface<
       TInitialContext,
       TCurrentContext,
       TInputSchema,
@@ -152,50 +344,19 @@ export class EffectDecoratedProcedure<
       TMeta,
       TRequirementsProvided,
       TRuntimeError
-    >,
-  ) {
-    super(def);
-    this["~effect"] = def;
-  }
-
-  /**
-   * Adds type-safe custom errors.
-   * Supports both traditional oRPC error definitions and ORPCTaggedError classes.
-   *
-   * @see {@link https://orpc.dev/docs/error-handling#type%E2%80%90safe-error-handling Type-Safe Error Handling Docs}
-   */
-  errors<U extends EffectErrorMap>(
-    errors: U,
-  ): EffectDecoratedProcedure<
+    >
+{
+  declare errors: EffectDecoratedProcedureSurface<
     TInitialContext,
     TCurrentContext,
     TInputSchema,
     TOutputSchema,
-    MergedEffectErrorMap<TEffectErrorMap, U>,
+    TEffectErrorMap,
     TMeta,
     TRequirementsProvided,
     TRuntimeError
-  > {
-    const newEffectErrorMap: MergedEffectErrorMap<TEffectErrorMap, U> = {
-      ...this["~effect"].effectErrorMap,
-      ...errors,
-    };
-    return new EffectDecoratedProcedure({
-      ...this["~effect"],
-      effectErrorMap: newEffectErrorMap,
-      errorMap: effectErrorMapToErrorMap(newEffectErrorMap),
-    });
-  }
-
-  /**
-   * Sets or updates the metadata.
-   * The provided metadata is spared-merged with any existing metadata.
-   *
-   * @see {@link https://orpc.dev/docs/metadata Metadata Docs}
-   */
-  meta(
-    meta: TMeta,
-  ): EffectDecoratedProcedure<
+  >["errors"];
+  declare meta: EffectDecoratedProcedureSurface<
     TInitialContext,
     TCurrentContext,
     TInputSchema,
@@ -204,24 +365,8 @@ export class EffectDecoratedProcedure<
     TMeta,
     TRequirementsProvided,
     TRuntimeError
-  > {
-    return new EffectDecoratedProcedure({
-      ...this["~effect"],
-      meta: mergeMeta(this["~effect"].meta, meta),
-    });
-  }
-
-  /**
-   * Sets or updates the route definition.
-   * The provided route is spared-merged with any existing route.
-   * This option is typically relevant when integrating with OpenAPI.
-   *
-   * @see {@link https://orpc.dev/docs/openapi/routing OpenAPI Routing Docs}
-   * @see {@link https://orpc.dev/docs/openapi/input-output-structure OpenAPI Input/Output Structure Docs}
-   */
-  route(
-    route: Route,
-  ): EffectDecoratedProcedure<
+  >["meta"];
+  declare route: EffectDecoratedProcedureSurface<
     TInitialContext,
     TCurrentContext,
     TInputSchema,
@@ -230,107 +375,18 @@ export class EffectDecoratedProcedure<
     TMeta,
     TRequirementsProvided,
     TRuntimeError
-  > {
-    return new EffectDecoratedProcedure({
-      ...this["~effect"],
-      route: mergeRoute(this["~effect"].route, route),
-    });
-  }
-
-  /**
-   * Uses a middleware to modify the context or improve the pipeline.
-   *
-   * @info Supports both normal middleware and inline middleware implementations.
-   * @info Pass second argument to map the input.
-   * @note The current context must be satisfy middleware dependent-context
-   * @see {@link https://orpc.dev/docs/middleware Middleware Docs}
-   */
-  use<
-    UOutContext extends IntersectPick<TCurrentContext, UOutContext>,
-    UInContext extends Context = TCurrentContext,
-  >(
-    middleware: Middleware<
-      UInContext | TCurrentContext,
-      UOutContext,
-      InferSchemaOutput<TInputSchema>,
-      InferSchemaInput<TOutputSchema>,
-      EffectErrorConstructorMap<TEffectErrorMap>,
-      TMeta
-    >,
-  ): EffectDecoratedProcedure<
-    MergedInitialContext<TInitialContext, UInContext, TCurrentContext>,
-    MergedCurrentContext<TCurrentContext, UOutContext>,
-    TInputSchema,
-    TOutputSchema,
-    TEffectErrorMap,
-    TMeta,
-    TRequirementsProvided,
-    TRuntimeError
-  >;
-
-  /**
-   * Uses a middleware to modify the context or improve the pipeline.
-   *
-   * @info Supports both normal middleware and inline middleware implementations.
-   * @info Pass second argument to map the input.
-   * @note The current context must be satisfy middleware dependent-context
-   * @see {@link https://orpc.dev/docs/middleware Middleware Docs}
-   */
-  use<
-    UOutContext extends IntersectPick<TCurrentContext, UOutContext>,
-    UInput,
-    UInContext extends Context = TCurrentContext,
-  >(
-    middleware: Middleware<
-      UInContext | TCurrentContext,
-      UOutContext,
-      UInput,
-      InferSchemaInput<TOutputSchema>,
-      EffectErrorConstructorMap<TEffectErrorMap>,
-      TMeta
-    >,
-    mapInput: MapInputMiddleware<InferSchemaOutput<TInputSchema>, UInput>,
-  ): EffectDecoratedProcedure<
-    MergedInitialContext<TInitialContext, UInContext, TCurrentContext>,
-    MergedCurrentContext<TCurrentContext, UOutContext>,
+  >["route"];
+  declare use: EffectDecoratedProcedureSurface<
+    TInitialContext,
+    TCurrentContext,
     TInputSchema,
     TOutputSchema,
     TEffectErrorMap,
     TMeta,
     TRequirementsProvided,
     TRuntimeError
-  >;
-
-  use(
-    middleware: AnyMiddleware,
-    mapInput?: MapInputMiddleware<any, any>,
-  ): EffectDecoratedProcedure<any, any, any, any, any, any, any, any> {
-    const mapped = mapInput
-      ? decorateMiddleware(middleware).mapInput(mapInput)
-      : middleware;
-
-    return new EffectDecoratedProcedure({
-      ...this["~effect"],
-      middlewares: addMiddleware(this["~effect"].middlewares, mapped),
-    });
-  }
-
-  /**
-   * Make this procedure callable (works like a function while still being a procedure).
-   *
-   * @see {@link https://orpc.dev/docs/client/server-side Server-side Client Docs}
-   */
-  callable<TClientContext extends ClientContext>(
-    ...rest: MaybeOptionalOptions<
-      CreateProcedureClientOptions<
-        TInitialContext,
-        TOutputSchema,
-        EffectErrorMapToErrorMap<TEffectErrorMap>,
-        TMeta,
-        TClientContext
-      >
-    >
-  ): EffectDecoratedProcedure<
+  >["use"];
+  declare callable: EffectDecoratedProcedureSurface<
     TInitialContext,
     TCurrentContext,
     TInputSchema,
@@ -339,48 +395,8 @@ export class EffectDecoratedProcedure<
     TMeta,
     TRequirementsProvided,
     TRuntimeError
-  > &
-    ProcedureClient<
-      TClientContext,
-      TInputSchema,
-      TOutputSchema,
-      EffectErrorMapToErrorMap<TEffectErrorMap>
-    > {
-    const client: ProcedureClient<
-      TClientContext,
-      TInputSchema,
-      TOutputSchema,
-      EffectErrorMapToErrorMap<TEffectErrorMap>
-    > = createProcedureClient(this, ...rest);
-
-    return new Proxy(client, {
-      get: (target, key) => {
-        return Reflect.has(this, key)
-          ? Reflect.get(this, key)
-          : Reflect.get(target, key);
-      },
-      has: (target, key) => {
-        return Reflect.has(this, key) || Reflect.has(target, key);
-      },
-    }) as any;
-  }
-
-  /**
-   * Make this procedure compatible with server action.
-   *
-   * @see {@link https://orpc.dev/docs/server-action Server Action Docs}
-   */
-  actionable(
-    ...rest: MaybeOptionalOptions<
-      CreateProcedureClientOptions<
-        TInitialContext,
-        TOutputSchema,
-        EffectErrorMapToErrorMap<TEffectErrorMap>,
-        TMeta,
-        Record<never, never>
-      >
-    >
-  ): EffectDecoratedProcedure<
+  >["callable"];
+  declare actionable: EffectDecoratedProcedureSurface<
     TInitialContext,
     TCurrentContext,
     TInputSchema,
@@ -389,27 +405,22 @@ export class EffectDecoratedProcedure<
     TMeta,
     TRequirementsProvided,
     TRuntimeError
-  > &
-    ProcedureActionableClient<
-      TInputSchema,
-      TOutputSchema,
-      EffectErrorMapToErrorMap<TEffectErrorMap>
-    > {
-    const action: ProcedureActionableClient<
+  >["actionable"];
+  constructor(
+    def: EffectProcedureDef<
+      TInitialContext,
+      TCurrentContext,
       TInputSchema,
       TOutputSchema,
-      EffectErrorMapToErrorMap<TEffectErrorMap>
-    > = createActionableClient(createProcedureClient(this, ...rest));
-
-    return new Proxy(action, {
-      get: (target, key) => {
-        return Reflect.has(this, key)
-          ? Reflect.get(this, key)
-          : Reflect.get(target, key);
-      },
-      has: (target, key) => {
-        return Reflect.has(this, key) || Reflect.has(target, key);
-      },
-    }) as any;
+      TEffectErrorMap,
+      TMeta,
+      TRequirementsProvided,
+      TRuntimeError
+    >,
+    procedure?: AnyProcedureLike,
+  ) {
+    super(def, procedure);
+    assertEffectState<AnyProcedureLike>(this);
+    return createEffectProcedureProxy(this, true);
   }
 }