@effect/platform-browser 4.0.0-beta.99 → 4.0.0-rc.108

package/package.json

@@ -1,14 +1,14 @@
 {
   "name": "@effect/platform-browser",
   "type": "module",
-  "version": "4.0.0-beta.99",
+  "version": "4.0.0-rc.108",
   "license": "MIT",
   "description": "Platform specific implementations for the browser",
   "homepage": "https://effect.website",
   "repository": {
     "type": "git",
     "url": "https://github.com/Effect-TS/effect.git",
-    "directory": "packages/platform-browser"
+    "directory": "packages/platform/browser"
   },
   "bugs": {
     "url": "https://github.com/Effect-TS/effect/issues"
@@ -31,6 +31,7 @@
     ".": "./dist/index.js",
     "./*": "./dist/*.js",
     "./internal/*": null,
+    "./index": null,
     "./*/index": null
   },
   "files": [
@@ -38,29 +39,27 @@
     "dist/**/*.js",
     "dist/**/*.js.map",
     "dist/**/*.d.ts",
-    "dist/**/*.d.ts.map"
+    "dist/**/*.d.ts.map",
+    "AGENTS.md",
+    "CLAUDE.md",
+    "ai-docs/**/*"
   ],
   "publishConfig": {
     "access": "public",
     "provenance": true
   },
   "peerDependencies": {
-    "effect": "^4.0.0-beta.99"
+    "effect": "^4.0.0-rc.108"
   },
   "devDependencies": {
     "fake-indexeddb": "^6.2.5",
     "mock-xmlhttprequest": "^8.4.1",
-    "effect": "^4.0.0-beta.99"
-  },
-  "dependencies": {
-    "multipasta": "^0.2.8"
+    "effect": "^4.0.0-rc.108"
   },
   "scripts": {
     "codegen": "effect-utils codegen",
     "build": "tsc -b tsconfig.json && pnpm babel",
     "babel": "babel dist --plugins annotate-pure-calls --out-dir dist --source-maps",
-    "check": "tsc -b tsconfig.json",
-    "test": "vitest",
-    "coverage": "vitest --coverage"
+    "check": "tsc -b tsconfig.json"
   }
 }

package/src/BrowserCrypto.ts

@@ -22,7 +22,7 @@ import * as PlatformError from "effect/PlatformError"
  * Use to override the browser `Crypto` object used by the platform crypto
  * layer.
  *
- * @category references
+ * @category services
  * @since 1.0.0
  */
 export const WebCrypto = Context.Reference<Crypto>("@effect/platform-browser/Crypto/WebCrypto", {
@@ -60,7 +60,9 @@ export const layer: Layer.Layer<EffectCrypto.Crypto> = Layer.effect(
     }
     const randomBytes = (size: number): Uint8Array => {
       const bytes = new Uint8Array(size)
-      crypto.getRandomValues(bytes)
+      for (let i = 0; i < bytes.length; i += 65_536) {
+        crypto.getRandomValues(bytes.subarray(i, i + 65_536))
+      }
       return bytes
     }
 

package/src/BrowserHttpClient.ts

@@ -28,8 +28,8 @@ import * as HttpClientError from "effect/unstable/http/HttpClientError"
 import type * as HttpClientRequest from "effect/unstable/http/HttpClientRequest"
 import * as HttpClientResponse from "effect/unstable/http/HttpClientResponse"
 import * as HttpIncomingMessage from "effect/unstable/http/HttpIncomingMessage"
+import * as HeaderParser from "effect/unstable/http/MultipartParser/HeadersParser"
 import * as UrlParams from "effect/unstable/http/UrlParams"
-import * as HeaderParser from "multipasta/HeadersParser"
 
 // =============================================================================
 // Fetch
@@ -39,14 +39,14 @@ export {
   /**
    * Context reference for the `fetch` implementation used by the fetch-based HTTP client.
    *
-   * @category fetch
+   * @category services
    * @since 4.0.0
    */
   Fetch,
   /**
    * Layer that provides an `HttpClient` implementation backed by the configured `Fetch` function.
    *
-   * @category fetch
+   * @category layers
    * @since 4.0.0
    */
   layer as layerFetch,
@@ -58,7 +58,7 @@ export {
    * Use to provide default credentials, cache, redirect, integrity, or other
    * fetch options for browser HTTP requests.
    *
-   * @category fetch
+   * @category services
    * @since 4.0.0
    */
   RequestInit
@@ -87,7 +87,7 @@ export type XHRResponseType = "arraybuffer" | "text"
  * @see {@link XHRResponseType} for the allowed response body modes
  * @see {@link withXHRArrayBuffer} for scoping XHR response handling to `ArrayBuffer`
  *
- * @category references
+ * @category services
  * @since 4.0.0
  */
 export const CurrentXHRResponseType: Context.Reference<XHRResponseType> = Context.Reference(
@@ -98,7 +98,7 @@ export const CurrentXHRResponseType: Context.Reference<XHRResponseType> = Contex
 /**
  * Runs an effect with `CurrentXHRResponseType` set to `"arraybuffer"` so the XHR HTTP client receives response bodies as `ArrayBuffer` values.
  *
- * @category references
+ * @category providing services
  * @since 4.0.0
  */
 export const withXHRArrayBuffer = <A, E, R>(
@@ -399,7 +399,11 @@ class ClientResponseImpl extends IncomingMessageImpl<HttpClientError.HttpClientE
   }
 
   get formData(): Effect.Effect<FormData, HttpClientError.HttpClientError> {
-    return Effect.die("Not implemented")
+    return Effect.flatMap(this.arrayBuffer, (body) =>
+      Effect.tryPromise({
+        try: () => new globalThis.Response(body, { headers: this.headers }).formData(),
+        catch: this.onError
+      }))
   }
 
   override toString(): string {

package/src/BrowserKeyValueStore.ts

@@ -74,8 +74,11 @@ export const layerIndexedDb = (options?: {
 
       return KeyValueStore.make({
         clear: Effect.suspend(() => {
-          const store = getKvsEntriesStore(db, "readwrite")
-          return idbRequest({ method: "clear", message: "Failed to clear backing store" }, () => store.clear())
+          return idbWriteRequest(
+            db,
+            { method: "clear", message: "Failed to clear backing store" },
+            (store) => store.clear()
+          )
         }),
         get: (key: string) =>
           Effect.map(
@@ -103,10 +106,10 @@ export const layerIndexedDb = (options?: {
           ),
         set: (key: string, value: string | Uint8Array) =>
           Effect.asVoid(Effect.suspend(() => {
-            const store = getKvsEntriesStore(db, "readwrite")
-            return idbRequest(
+            return idbWriteRequest(
+              db,
               { method: "set", message: "Failed to set value in backing store", key },
-              () => store.put({ key, value })
+              (store) => store.put({ key, value })
             )
           })),
         size: Effect.suspend(() => {
@@ -118,10 +121,10 @@ export const layerIndexedDb = (options?: {
         }),
         remove: (key: string) =>
           Effect.asVoid(Effect.suspend(() => {
-            const store = getKvsEntriesStore(db, "readwrite")
-            return idbRequest(
+            return idbWriteRequest(
+              db,
               { method: "remove", message: "Failed to remove value from backing store", key },
-              () => store.delete(key)
+              (store) => store.delete(key)
             )
           }))
       })
@@ -171,6 +174,45 @@ const idbRequest = <A>(
       ))
   })
 
+const idbWriteRequest = <A>(
+  db: IDBDatabase,
+  failArgs: { method: string; message: string; key?: string },
+  evaluate: (store: IDBObjectStore) => IDBRequest<A>
+): Effect.Effect<A, KeyValueStore.KeyValueStoreError> =>
+  Effect.callback<A, KeyValueStore.KeyValueStoreError>((resume) => {
+    const transaction = db.transaction(entriesStoreName, "readwrite")
+    const request = evaluate(transaction.objectStore(entriesStoreName))
+    let result: A
+    let done = false
+
+    const fail = (cause: unknown) => {
+      if (done) return
+      done = true
+      resume(Effect.fail(new KeyValueStore.KeyValueStoreError({ ...failArgs, cause })))
+    }
+
+    if (request.readyState === "done") {
+      result = request.result
+    } else {
+      request.onsuccess = () => {
+        result = request.result
+      }
+      request.onerror = () => fail(request.error)
+    }
+
+    transaction.oncomplete = () => {
+      if (done) return
+      done = true
+      resume(Effect.succeed(result!))
+    }
+    transaction.onerror = () => fail(transaction.error)
+    transaction.onabort = () => fail(transaction.error)
+
+    return Effect.sync(() => {
+      if (!done) transaction.abort()
+    })
+  })
+
 const getKvsEntriesStore = (db: IDBDatabase, mode: IDBTransactionMode) => {
   const transaction = db.transaction(entriesStoreName, mode)
   return transaction.objectStore(entriesStoreName)

package/src/BrowserRuntime.ts

@@ -29,7 +29,7 @@ import { makeRunMain, type Teardown } from "effect/Runtime"
  * The `beforeunload` interruption is best-effort. Browser teardown may prevent
  * asynchronous finalizers, network work, timers, or prompts from completing.
  *
- * @category Runtime
+ * @category running
  * @since 4.0.0
  */
 export const runMain: {
@@ -52,7 +52,7 @@ export const runMain: {
    * The `beforeunload` interruption is best-effort. Browser teardown may prevent
    * asynchronous finalizers, network work, timers, or prompts from completing.
    *
-   * @category Runtime
+   * @category running
    * @since 4.0.0
    */
   (
@@ -80,7 +80,7 @@ export const runMain: {
    * The `beforeunload` interruption is best-effort. Browser teardown may prevent
    * asynchronous finalizers, network work, timers, or prompts from completing.
    *
-   * @category Runtime
+   * @category running
    * @since 4.0.0
    */
   <E, A>(

package/src/BrowserStream.ts

@@ -19,7 +19,7 @@ import * as Stream from "effect/Stream"
  * buffer size by passing an object as the second argument with the `bufferSize`
  * field.
  *
- * @category streams
+ * @category constructors
  * @since 4.0.0
  */
 export const fromEventListenerWindow = <K extends keyof WindowEventMap>(
@@ -41,7 +41,7 @@ export const fromEventListenerWindow = <K extends keyof WindowEventMap>(
  * buffer size by passing an object as the second argument with the `bufferSize`
  * field.
  *
- * @category streams
+ * @category constructors
  * @since 4.0.0
  */
 export const fromEventListenerDocument = <K extends keyof DocumentEventMap>(

package/src/BrowserWorkerRunner.ts

@@ -81,6 +81,7 @@ export const make = (self: MessagePort | Window): WorkerRunner.WorkerRunnerPlatf
                 return Deferred.doneUnsafe(closeLatch, Exit.void)
               }
               ports.delete(portId)
+              Queue.offerUnsafe(disconnects, portId)
               Effect.runFork(Scope.close(port[1], Exit.void))
             }
           }
@@ -122,7 +123,7 @@ export const make = (self: MessagePort | Window): WorkerRunner.WorkerRunnerPlatf
             portScope,
             Effect.sync(() => {
               port.removeEventListener("message", onMsg)
-              port.removeEventListener("messageerror", onError)
+              port.removeEventListener("messageerror", onMessageError)
               port.close()
             })
           ))

package/src/Clipboard.ts

@@ -38,7 +38,7 @@ const ErrorTypeId = "~@effect/platform-browser/Clipboard/ClipboardError"
  * MIME type support varies by browser. Failed browser operations are surfaced
  * as `ClipboardError`.
  *
- * @category models
+ * @category services
  * @since 4.0.0
  */
 export interface Clipboard {

package/src/Geolocation.ts

@@ -44,7 +44,7 @@ const ErrorTypeId = "~@effect/platform-browser/Geolocation/GeolocationError"
  * @see {@link GeolocationError} for represented browser geolocation failures
  * @see {@link layer} for the browser-backed service implementation
  *
- * @category models
+ * @category services
  * @since 4.0.0
  */
 export interface Geolocation {

package/src/IndexedDb.ts

@@ -19,7 +19,7 @@ const TypeId = "~@effect/platform-browser/IndexedDb"
 /**
  * Service interface that provides the browser `indexedDB` factory and `IDBKeyRange` constructor.
  *
- * @category models
+ * @category services
  * @since 4.0.0
  */
 export interface IndexedDb {
@@ -40,7 +40,7 @@ export const IndexedDb: Context.Service<IndexedDb, IndexedDb> = Context.Service<
 const IDBFlatKey = Schema.Union([
   Schema.String,
   Schema.Number.check(Schema.makeFilter((input) => !Number.isNaN(input))),
-  Schema.DateValid,
+  Schema.Date,
   Schema.declare(
     (input): input is BufferSource =>
       input instanceof ArrayBuffer ||
@@ -93,7 +93,7 @@ export const make = (impl: Omit<IndexedDb, typeof TypeId>): IndexedDb => Indexed
 /**
  * Layer that provides `IndexedDb` from `window.indexedDB` and `window.IDBKeyRange`, failing with a config error when they are unavailable.
  *
- * @category constructors
+ * @category layers
  * @since 4.0.0
  */
 export const layerWindow: Layer.Layer<IndexedDb> = Layer.effect(

package/src/IndexedDbDatabase.ts

@@ -31,12 +31,6 @@ const SchemaProto = {
   [TypeId]: {
     _A: (_: never) => _
   },
-  ...Effectable.Prototype<IndexedDbSchema<any, any, any>>({
-    label: "IndexedDbSchema",
-    evaluate() {
-      return this.getQueryBuilder
-    }
-  }),
   get getQueryBuilder() {
     const self = this as unknown as IndexedDbSchema<any, any, any>
     return IndexedDbDatabase.useSync(({ database, IDBKeyRange, reactivity }) =>
@@ -48,6 +42,12 @@ const SchemaProto = {
       })
     )
   },
+  ...Effectable.Prototype<IndexedDbSchema<any, any, any>>({
+    label: "IndexedDbSchema",
+    evaluate() {
+      return this.getQueryBuilder
+    }
+  }),
   add<Version extends IndexedDbVersion.AnyWithProps>(
     this: IndexedDbSchema<any, any, any>,
     version: Version,
@@ -126,7 +126,7 @@ export class IndexedDbDatabaseError extends Data.TaggedError(
  * @see {@link IndexedDb.IndexedDb} for the lower-level browser IndexedDB primitives
  * @see {@link make} for creating a schema that provides this service as a layer
  *
- * @category models
+ * @category services
  * @since 4.0.0
  */
 export class IndexedDbDatabase extends Context.Service<
@@ -234,7 +234,7 @@ export interface Transaction<
 /**
  * Extracts the string-literal index names defined by an `IndexedDbTable`.
  *
- * @category models
+ * @category utility types
  * @since 4.0.0
  */
 export type IndexFromTable<Table extends IndexedDbTable.AnyWithProps> = IsStringLiteral<
@@ -245,7 +245,7 @@ export type IndexFromTable<Table extends IndexedDbTable.AnyWithProps> = IsString
 /**
  * Extracts the valid index names for a table name within an IndexedDB version.
  *
- * @category models
+ * @category utility types
  * @since 4.0.0
  */
 export type IndexFromTableName<
@@ -478,6 +478,12 @@ const layer = <DatabaseName extends string>(
             Effect.provideService(IndexedDbQueryBuilder.IndexedDbTransaction, transaction)
           )
           fiber = runForkWith(effect)
+          fiber.addObserver((exit) => {
+            if (exit._tag === "Failure") {
+              transaction.abort()
+              resume(exit)
+            }
+          })
           fiber.currentDispatcher.flush()
         }
 

package/src/IndexedDbQueryBuilder.ts

@@ -136,13 +136,17 @@ export interface IndexedDbQueryBuilder<
     readonly tables: Tables
     readonly mode: Mode
     readonly durability?: IDBTransactionDurability
-  }) => <A, E, R>(effect: Effect.Effect<A, E, R>) => Effect.Effect<A, E, Exclude<R, IndexedDbTransaction>>
+  }) => <A, E, R>(effect: Effect.Effect<A, E, R>) => Effect.Effect<
+    A,
+    E | IndexedDbQueryError,
+    Exclude<R, IndexedDbTransaction>
+  >
 }
 
 /**
  * Valid key-path type for a table schema, using encoded fields whose values are IndexedDB-valid keys.
  *
- * @category models
+ * @category utility types
  * @since 4.0.0
  */
 export type KeyPath<TableSchema extends IndexedDbTable.AnySchemaStruct> =
@@ -152,7 +156,7 @@ export type KeyPath<TableSchema extends IndexedDbTable.AnySchemaStruct> =
 /**
  * Valid numeric key-path type for a table schema, used for auto-increment key paths.
  *
- * @category models
+ * @category utility types
  * @since 4.0.0
  */
 export type KeyPathNumber<TableSchema extends IndexedDbTable.AnySchemaStruct> =
@@ -168,7 +172,7 @@ export declare namespace IndexedDbQuery {
   /**
    * Decoded row type returned by select queries, adding a `key` field when the table does not define a key path.
    *
-   * @category models
+   * @category utility types
    * @since 4.0.0
    */
   export type SelectType<
@@ -181,7 +185,7 @@ export declare namespace IndexedDbQuery {
   /**
    * Input type for insert and upsert operations, adjusted for auto-increment keys and out-of-line keys.
    *
-   * @category models
+   * @category utility types
    * @since 4.0.0
    */
   export type ModifyType<
@@ -215,7 +219,7 @@ export declare namespace IndexedDbQuery {
   /**
    * Value type accepted by `equals` comparisons for a table key path or index.
    *
-   * @category models
+   * @category utility types
    * @since 4.0.0
    */
   export type EqualsType<
@@ -229,7 +233,7 @@ export declare namespace IndexedDbQuery {
   /**
    * Value type accepted by range comparisons for a table key path or index, including partial tuples for compound indexes.
    *
-   * @category models
+   * @category utility types
    * @since 4.0.0
    */
   export type ExtractIndexType<
@@ -248,7 +252,7 @@ export declare namespace IndexedDbQuery {
   /**
    * Mutation input type for insert and upsert operations, including any required key fields.
    *
-   * @category models
+   * @category utility types
    * @since 4.0.0
    */
   export type ModifyWithKey<Table extends IndexedDbTable.AnyWithProps> = ModifyType<Table>
@@ -719,7 +723,7 @@ export declare namespace IndexedDbQuery {
 /**
  * Service tag for the active `IDBTransaction` used to share a transaction across IndexedDB query effects.
  *
- * @category models
+ * @category services
  * @since 4.0.0
  */
 export class IndexedDbTransaction extends Context.Service<IndexedDbTransaction, globalThis.IDBTransaction>()(
@@ -752,6 +756,7 @@ const applyDelete = (query: IndexedDbQuery.Delete<any, never>) =>
       durability: query.delete.from.table.durability
     })
     const objectStore = transaction.objectStore(query.delete.from.table.tableName)
+    const store = query.delete.index === undefined ? objectStore : objectStore.index(query.delete.index)
     const predicate = query.predicate
 
     let keyRange: globalThis.IDBKeyRange | undefined = undefined
@@ -782,8 +787,8 @@ const applyDelete = (query: IndexedDbQuery.Delete<any, never>) =>
 
     let request: globalThis.IDBRequest
 
-    if (query.limitValue !== undefined || predicate) {
-      const cursorRequest = objectStore.openCursor()
+    if (query.delete.index !== undefined || query.limitValue !== undefined || predicate) {
+      const cursorRequest = store.openCursor(keyRange)
       let count = 0
 
       cursorRequest.onerror = () => {
@@ -897,7 +902,7 @@ const applySelect = Effect.fnUntraced(function*(
   const keyPath = query.from.table.keyPath
   const predicate = query.predicate
 
-  const data = predicate || keyPath === undefined || query.offsetValue !== undefined ?
+  const data = predicate || keyPath === undefined || query.offsetValue !== undefined || query.reverseValue ?
     yield* Effect.callback<Array<any>, IndexedDbQueryError>((resume) => {
       const { keyRange, store } = getReadonlyObjectStore(query)
 
@@ -1001,7 +1006,13 @@ const applyFirst = Effect.fnUntraced(function*(
       }
 
       request.onsuccess = () => {
-        resume(Effect.succeed(request.result))
+        if (request.result === undefined) {
+          resume(
+            Effect.fail(new Cause.NoSuchElementError(`No such element in table ${query.select.from.table.tableName}`))
+          )
+        } else {
+          resume(Effect.succeed(request.result))
+        }
       }
     } else {
       const request = store.openCursor()
@@ -1331,7 +1342,6 @@ const FromProto: Omit<
   | "countCache"
   | "deleteCache"
 > = {
-  ...CommonProto,
   select<Index extends IndexedDbDatabase.IndexFromTable<any>>(
     this: IndexedDbQuery.From<any>,
     index?: Index
@@ -1392,7 +1402,8 @@ const FromProto: Omit<
       database: self.database.current,
       table: self.table
     })
-  }
+  },
+  ...CommonProto
 }
 
 const makeFrom = <
@@ -1516,7 +1527,7 @@ const DeleteProto: Omit<
   filter(this: IndexedDbQuery.Delete<any, never>, filter: (value: IndexedDbTable.Encoded<any>) => boolean) {
     const prev = this.predicate
     return makeDelete({
-      delete: this.delete,
+      ...this,
       predicate: prev ? (item) => prev(item) && filter(item) : filter
     })
   },
@@ -1760,18 +1771,22 @@ const SelectProto: Omit<
   }) {
     const limit = this.limitValue
     const chunkSize = Math.min(options?.chunkSize ?? 100, limit ?? Number.MAX_SAFE_INTEGER)
-    const initial = this.limit(chunkSize)
+    const initialOffset = this.offsetValue ?? 0
     return Stream.suspend(() => {
       let total = 0
+      const initial = this.limit(chunkSize)
       return Stream.paginate(initial, (select) =>
         Effect.map(
           applySelect(select as any),
           (data) => {
             total += data.length
-            ;(select as any).offsetValue = total
             const reachedLimit = limit && total >= limit
             const isPartial = data.length < chunkSize
-            return [data, isPartial || reachedLimit ? Option.none() : Option.some(select)] as const
+            const next = makeSelect({
+              ...select,
+              offsetValue: initialOffset + total
+            })
+            return [data, isPartial || reachedLimit ? Option.none() : Option.some(next)] as const
           }
         ))
     })
@@ -1951,7 +1966,6 @@ const QueryBuilderProto: Omit<
   | "IDBTransaction"
   | "reactivity"
 > = {
-  ...CommonProto,
   use(this: IndexedDbQueryBuilder<any>, f: (database: globalThis.IDBDatabase) => any) {
     return Effect.try({
       try: () => f(this.database.current),
@@ -1979,6 +1993,7 @@ const QueryBuilderProto: Omit<
     const self = this as IndexedDbQueryBuilder<any>
     return applyClearAll({ database: self.database.current })
   },
+  ...CommonProto,
   withTransaction(this: IndexedDbQueryBuilder<any>, options: {
     readonly tables: NonEmptyReadonlyArray<any>
     readonly mode: globalThis.IDBTransactionMode
@@ -1987,7 +2002,11 @@ const QueryBuilderProto: Omit<
     return (effect) =>
       Effect.suspend(() => {
         const transaction = this.database.current.transaction(options.tables, options.mode, options)
-        return Effect.provideService(effect, IndexedDbTransaction, transaction)
+        return Effect.provideService(effect, IndexedDbTransaction, transaction).pipe(
+          Effect.onExit((exit) =>
+            exit._tag === "Success" ? awaitTransaction(transaction) : abortTransaction(transaction)
+          )
+        )
       }).pipe(
         // To prevent async gaps between transaction queries
         Effect.provideService(References.PreventSchedulerYield, true)
@@ -1995,6 +2014,30 @@ const QueryBuilderProto: Omit<
   }
 }
 
+const abortTransaction = (transaction: globalThis.IDBTransaction) =>
+  Effect.try({
+    try: () => transaction.abort(),
+    catch: () => undefined
+  }).pipe(Effect.ignore)
+
+const awaitTransaction = (transaction: globalThis.IDBTransaction) =>
+  Effect.callback<void, IndexedDbQueryError>((resume) => {
+    transaction.oncomplete = () => {
+      resume(Effect.void)
+    }
+    transaction.onabort = () => {
+      resume(
+        Effect.fail(
+          new IndexedDbQueryError({
+            reason: "TransactionError",
+            cause: transaction.error
+          })
+        )
+      )
+    }
+    return abortTransaction(transaction)
+  })
+
 /**
  * Creates an `IndexedDbQueryBuilder` from an open database reference, key-range constructor, table map, and reactivity service.
  *