Function fetchEff

packages/shared/src/effect.ts:20–55

(
  input: string | URL,
  init?: RequestInit,
)

// Only for use in the browser.
// On the server, use `@effect/platform.HttpClient` instead.
export const fetchEff = (
  input: string | URL,
  init?: RequestInit,
): Micro.Micro<ResponseWithURL, FetchError, FetchContext> =>
  Micro.flatMap(Micro.service(FetchContext), (fetch) => {
    const headers = new Headers(init?.headers ?? []);

    const reqInfo = {
      url: input.toString(),
      method: init?.method,
      body: init?.body,
      headers: Object.fromEntries(headers),
    };

    return Micro.tryPromise({
      try: (signal) => fetch(input, { ...init, headers, signal }),
      catch: (error) =>
        new FetchError({
          error:
            error instanceof Error
              ? {
                  ...error,
                  name: error.name,
                  message: error.message,
                  stack: error.stack,
                }
              : error,
          input: reqInfo,
        }),
    }).pipe(
      // eslint-disable-next-line no-console
      Micro.tapError((e) => Micro.sync(() => console.error(e.input))),
      Micro.map((res) => Object.assign(res, { requestUrl: reqInfo.url })),
      Micro.withTrace("fetch"),
    );
  });

export const parseResponseJson = (
  res: ResponseWithURL,