HttpApiBuilder does not expose payload parse options #8266

import { Console, Effect, Layer, Schema } from "effect"
import { HttpRouter, HttpServer } from "effect/unstable/http"
import {
  HttpApi,
  HttpApiBuilder,
  HttpApiEndpoint,
  HttpApiError,
  HttpApiGroup,
  HttpApiMiddleware,
} from "effect/unstable/httpapi"

const Payload = Schema.Struct({ firstName: Schema.String, lastName: Schema.String })

class Inspect extends HttpApiMiddleware.Service<Inspect>()("Inspect") {}

class Api extends HttpApi.make("api")
  .add(
    HttpApiGroup.make("users").add(
      HttpApiEndpoint.post("create", "/users", { payload: Payload }),
    ),
  )
  .middleware(Inspect) {}

const inspectLayer = Layer.succeed(
  Inspect,
  Inspect.of((effect) =>
    effect.pipe(
      Effect.tapError((error) =>
        HttpApiError.HttpApiSchemaError.is(error)
          ? Console.log(error.cause.message)
          : Effect.void,
      ),
    ),
  ),
)

const server = HttpRouter.toWebHandler(
  HttpApiBuilder.layer(Api).pipe(
    Layer.provide(
      HttpApiBuilder.group(Api, "users", (handlers) =>
        handlers.handle("create", () => Effect.void),
      ),
    ),
    Layer.provide(inspectLayer),
    Layer.provide(HttpServer.layerServices),
  ),
  { disableLogger: true },
)

try {
  await server.handler(
    new Request("http://localhost/users", {
      method: "POST",
      headers: { "content-type": "application/json" },
      body: "{}",
    }),
  )
} finally {
  await server.dispose()
}