effect-mongodb 0.0.2 → 0.0.3

package/src/Collection.ts

@@ -1,23 +1,34 @@
 /**
  * @since 0.0.1
  */
-import type * as ParseResult from "@effect/schema/ParseResult"
-import * as Schema from "@effect/schema/Schema"
 import * as Data from "effect/Data"
 import * as Effect from "effect/Effect"
 import * as F from "effect/Function"
 import * as O from "effect/Option"
+import type * as ParseResult from "effect/ParseResult"
+import * as Schema from "effect/Schema"
 import type {
+  AggregateOptions,
   BulkWriteOptions,
   Collection as MongoCollection,
+  CreateIndexesOptions,
+  DeleteOptions,
+  DeleteResult,
   Document,
-  Filter,
   FindOptions as MongoFindOptions,
+  IndexDescription,
   InsertManyResult,
   InsertOneOptions,
-  InsertOneResult
+  InsertOneResult,
+  RenameOptions,
+  ReplaceOptions,
+  UpdateFilter,
+  UpdateOptions,
+  UpdateResult
 } from "mongodb"
+import * as AggregationCursor from "./AggregationCursor.js"
 import * as FindCursor from "./FindCursor.js"
+import type { Filter } from "./internal/filter.js"
 import * as MongoError from "./MongoError.js"
 
 export class Collection<A extends Document, I extends Document = A, R = never> extends Data.TaggedClass("Collection")<{
@@ -31,16 +42,14 @@ export type FindOptions = Omit<MongoFindOptions, "projection">
 export const find: {
   (
     options?: FindOptions
-  ): <A extends Document, I extends Document = A, R = never>(
-    collection: Collection<A, I, R>
-  ) => FindCursor.FindCursor<A, I, R>
-  <A extends Document, I extends Document = A, R = never>(
+  ): <A extends Document, I extends Document, R>(collection: Collection<A, I, R>) => FindCursor.FindCursor<A, I, R>
+  <A extends Document, I extends Document, R>(
     collection: Collection<A, I, R>,
     options?: FindOptions
   ): FindCursor.FindCursor<A, I, R>
 } = F.dual(
   (args) => isCollection(args[0]),
-  <A extends Document, I extends Document = A, R = never>(
+  <A extends Document, I extends Document, R>(
     collection: Collection<A, I, R>,
     options?: FindOptions
   ): FindCursor.FindCursor<A, I, R> =>
@@ -51,26 +60,26 @@ export const find: {
 )
 
 export const findOne: {
-  <A extends Document, I extends Document = A, R = never>(
+  <I extends Document>(
     filter: Filter<I>,
     options?: FindOptions
-  ): (
+  ): <A extends Document, R>(
     collection: Collection<A, I, R>
   ) => Effect.Effect<O.Option<Document>, MongoError.MongoError | ParseResult.ParseError, R>
-  <A extends Document, I extends Document = A, R = never>(
+  <A extends Document, I extends Document, R>(
     collection: Collection<A, I, R>,
     filter: Filter<I>,
     options?: FindOptions
   ): Effect.Effect<O.Option<Document>, MongoError.MongoError | ParseResult.ParseError, R>
 } = F.dual(
   (args) => isCollection(args[0]),
-  <A extends Document, I extends Document = A, R = never>(
+  <A extends Document, I extends Document, R>(
     collection: Collection<A, I, R>,
     filter: Filter<I>,
     options?: FindOptions
   ): Effect.Effect<O.Option<A>, MongoError.MongoError | ParseResult.ParseError, R> =>
     Effect.gen(function*(_) {
-      const value = yield* _(Effect.promise(() => collection.collection.findOne(filter as Filter<Document>, options)))
+      const value = yield* _(Effect.promise(() => collection.collection.findOne(filter, options)))
       if (value !== null) return O.some(yield* _(Schema.decodeUnknown(collection.schema)(value)))
       return O.none()
     }).pipe(
@@ -79,18 +88,18 @@ export const findOne: {
 )
 
 export const insertOne: {
-  <A extends Document, I extends Document = A, R = never>(
+  <A extends Document>(
     doc: A,
     options?: InsertOneOptions
-  ): (
+  ): <I extends Document, R>(
     collection: Collection<A, I, R>
   ) => Effect.Effect<InsertOneResult, MongoError.MongoError | ParseResult.ParseError, R>
-  <A extends Document, I extends Document = A, R = never>(
+  <A extends Document, I extends Document, R>(
     collection: Collection<A, I, R>,
     doc: A,
     options?: InsertOneOptions
   ): Effect.Effect<InsertOneResult, MongoError.MongoError | ParseResult.ParseError, R>
-} = F.dual((args) => isCollection(args[0]), <A extends Document, I extends Document = A, R = never>(
+} = F.dual((args) => isCollection(args[0]), <A extends Document, I extends Document, R>(
   collection: Collection<A, I, R>,
   doc: A,
   options?: InsertOneOptions
@@ -102,18 +111,18 @@ export const insertOne: {
   ))
 
 export const insertMany: {
-  <A extends Document, I extends Document = A, R = never>(
+  <A extends Document>(
     docs: Array<A>,
     options?: BulkWriteOptions
-  ): (
+  ): <I extends Document, R>(
     collection: Collection<A, I, R>
   ) => Effect.Effect<InsertManyResult, MongoError.MongoError | ParseResult.ParseError, R>
-  <A extends Document, I extends Document = A, R = never>(
+  <A extends Document, I extends Document, R>(
     collection: Collection<A, I, R>,
     docs: Array<A>,
     options?: BulkWriteOptions
   ): Effect.Effect<InsertManyResult, MongoError.MongoError | ParseResult.ParseError, R>
-} = F.dual((args) => isCollection(args[0]), <A extends Document, I extends Document = A, R = never>(
+} = F.dual((args) => isCollection(args[0]), <A extends Document, I extends Document, R>(
   collection: Collection<A, I, R>,
   docs: Array<A>,
   options?: BulkWriteOptions
@@ -127,4 +136,197 @@ export const insertMany: {
   )
 })
 
+export const deleteOne: {
+  <I extends Document>(
+    filter: Filter<I>,
+    options?: DeleteOptions
+  ): <A extends Document, R>(
+    collection: Collection<A, I, R>
+  ) => Effect.Effect<DeleteResult, MongoError.MongoError, R>
+  <A extends Document, I extends Document, R>(
+    collection: Collection<A, I, R>,
+    filter: Filter<I>,
+    options?: DeleteOptions
+  ): Effect.Effect<DeleteResult, MongoError.MongoError, R>
+} = F.dual(
+  (args) => isCollection(args[0]),
+  <A extends Document, I extends Document, R>(
+    collection: Collection<A, I, R>,
+    filter: Filter<I>,
+    options?: DeleteOptions
+  ): Effect.Effect<DeleteResult, MongoError.MongoError, R> =>
+    Effect.promise(() => collection.collection.deleteOne(filter, options)).pipe(
+      Effect.catchAllDefect(MongoError.mongoErrorDie<DeleteResult>("deleteOne error"))
+    )
+)
+
+export const deleteMany: {
+  <I extends Document>(
+    filter: Filter<I>,
+    options?: DeleteOptions
+  ): <A extends Document, R>(
+    collection: Collection<A, I, R>
+  ) => Effect.Effect<DeleteResult, MongoError.MongoError, R>
+  <A extends Document, I extends Document, R>(
+    collection: Collection<A, I, R>,
+    filter: Filter<I>,
+    options?: DeleteOptions
+  ): Effect.Effect<DeleteResult, MongoError.MongoError, R>
+} = F.dual(
+  (args) => isCollection(args[0]),
+  <A extends Document, I extends Document, R>(
+    collection: Collection<A, I, R>,
+    filter: Filter<I>,
+    options?: DeleteOptions
+  ): Effect.Effect<DeleteResult, MongoError.MongoError, R> =>
+    Effect.promise(() => collection.collection.deleteMany(filter, options)).pipe(
+      Effect.catchAllDefect(MongoError.mongoErrorDie<DeleteResult>("deleteMany error"))
+    )
+)
+
+export const updateMany: {
+  <I extends Document>(
+    filter: Filter<I>,
+    update: UpdateFilter<I> | Array<Document>,
+    options?: UpdateOptions
+  ): <A extends Document, R>(
+    collection: Collection<A, I, R>
+  ) => Effect.Effect<UpdateResult, MongoError.MongoError, R>
+  <A extends Document, I extends Document, R>(
+    collection: Collection<A, I, R>,
+    filter: Filter<I>,
+    update: UpdateFilter<I> | Array<Document>,
+    options?: UpdateOptions
+  ): Effect.Effect<UpdateResult, MongoError.MongoError, R>
+} = F.dual(
+  (args) => isCollection(args[0]),
+  <A extends Document, I extends Document, R>(
+    collection: Collection<A, I, R>,
+    filter: Filter<I>,
+    update: UpdateFilter<I> | Array<Document>,
+    options?: UpdateOptions
+  ): Effect.Effect<UpdateResult, MongoError.MongoError, R> =>
+    Effect.promise(() =>
+      collection.collection.updateMany(filter, update as UpdateFilter<Document> | Array<Document>, options)
+    ).pipe(
+      Effect.catchAllDefect(MongoError.mongoErrorDie<UpdateResult>("updateMany error"))
+    )
+)
+
+export const replaceOne: {
+  <A extends Document, I extends Document>(
+    filter: Filter<I>,
+    // TODO: should we put WithoutId<A> here like the driver signature?
+    replacement: A,
+    options?: ReplaceOptions
+  ): <R>(
+    collection: Collection<A, I, R>
+  ) => Effect.Effect<UpdateResult | Document, MongoError.MongoError | ParseResult.ParseError, R>
+  <A extends Document, I extends Document, R>(
+    collection: Collection<A, I, R>,
+    filter: Filter<I>,
+    replacement: A,
+    options?: ReplaceOptions
+  ): Effect.Effect<UpdateResult | Document, MongoError.MongoError | ParseResult.ParseError, R>
+} = F.dual(
+  (args) => isCollection(args[0]),
+  <A extends Document, I extends Document, R>(
+    collection: Collection<A, I, R>,
+    filter: Filter<I>,
+    replacement: A,
+    options?: ReplaceOptions
+  ): Effect.Effect<
+    UpdateResult | Document,
+    MongoError.MongoError | ParseResult.ParseError,
+    R
+  > =>
+    F.pipe(
+      // TODO: extract function in Collection
+      Schema.encode(collection.schema)(replacement),
+      Effect.flatMap((replacement) =>
+        Effect.promise(() => collection.collection.replaceOne(filter, replacement, options))
+      ),
+      Effect.catchAllDefect(MongoError.mongoErrorDie<UpdateResult | Document>("replaceOne error"))
+    )
+)
+
+export const rename: {
+  (
+    newName: string,
+    options?: RenameOptions
+  ): <A extends Document, I extends Document, R>(
+    collection: Collection<A, I, R>
+  ) => Effect.Effect<Collection<A, I, R>, MongoError.MongoError, R>
+  <A extends Document, I extends Document, R>(
+    collection: Collection<A, I, R>,
+    newName: string,
+    options?: RenameOptions
+  ): Effect.Effect<Collection<A, I, R>, MongoError.MongoError, R>
+} = F.dual(
+  (args) => isCollection(args[0]),
+  <A extends Document, I extends Document, R>(
+    collection: Collection<A, I, R>,
+    newName: string,
+    options?: RenameOptions
+  ): Effect.Effect<Collection<A, I, R>, MongoError.MongoError, R> =>
+    F.pipe(
+      Effect.promise(() => collection.collection.rename(newName, options)),
+      Effect.map((newCollection) => new Collection<A, I, R>({ collection: newCollection, schema: collection.schema })),
+      Effect.catchAllDefect(MongoError.mongoErrorDie<Collection<A, I, R>>("rename error"))
+    )
+)
+
+export const createIndexes: {
+  (
+    indexSpecs: Array<IndexDescription>,
+    options?: CreateIndexesOptions
+  ): <A extends Document, I extends Document, R>(
+    collection: Collection<A, I, R>
+  ) => Effect.Effect<Array<string>, MongoError.MongoError, R>
+  <A extends Document, I extends Document, R>(
+    collection: Collection<A, I, R>,
+    indexSpecs: Array<IndexDescription>,
+    options?: CreateIndexesOptions
+  ): Effect.Effect<Array<string>, MongoError.MongoError, R>
+} = F.dual(
+  (args) => isCollection(args[0]),
+  <A extends Document, I extends Document, R>(
+    collection: Collection<A, I, R>,
+    indexSpecs: Array<IndexDescription>,
+    options?: CreateIndexesOptions
+  ): Effect.Effect<Array<string>, MongoError.MongoError, R> =>
+    F.pipe(
+      Effect.promise(() => collection.collection.createIndexes(indexSpecs, options)),
+      Effect.catchAllDefect(MongoError.mongoErrorDie<Array<string>>("createIndexes error"))
+    )
+)
+
+export const aggregate: {
+  <B extends Document, BI extends Document, BR>(
+    pipeline: Array<Document>,
+    schema: Schema.Schema<B, BI, BR>,
+    options?: AggregateOptions
+  ): <A extends Document, I extends Document, R>(
+    collection: Collection<A, I, R>
+  ) => AggregationCursor.AggregationCursor<B, BI, BR>
+  <A extends Document, I extends Document, R, B extends Document, BI extends Document, BR>(
+    collection: Collection<A, I, R>,
+    pipeline: Array<Document>,
+    schema: Schema.Schema<B, BI, BR>,
+    options?: AggregateOptions
+  ): AggregationCursor.AggregationCursor<B, BI, BR>
+} = F.dual(
+  (args) => isCollection(args[0]),
+  <A extends Document, I extends Document, R, B extends Document, BI extends Document, BR>(
+    collection: Collection<A, I, R>,
+    pipeline: Array<Document>,
+    schema: Schema.Schema<B, BI, BR>,
+    options?: AggregateOptions
+  ): AggregationCursor.AggregationCursor<B, BI, BR> =>
+    new AggregationCursor.AggregationCursor<B, BI, BR>({
+      cursor: collection.collection.aggregate(pipeline, options),
+      schema
+    })
+)
+
 const isCollection = (x: unknown) => x instanceof Collection

package/src/Db.ts

@@ -1,18 +1,19 @@
 /**
  * @since 0.0.1
  */
-import type * as Schema from "@effect/schema/Schema"
 import type * as Brand from "effect/Brand"
 import * as Context from "effect/Context"
 import * as Effect from "effect/Effect"
 import * as F from "effect/Function"
 import * as Layer from "effect/Layer"
-import type { Document } from "mongodb"
+import type * as Schema from "effect/Schema"
+import type { Document, DropCollectionOptions, ListCollectionsOptions } from "mongodb"
 import { Db } from "mongodb"
 import type * as Collection from "./Collection.js"
 import * as DocumentCollection from "./DocumentCollection.js"
+import * as ListCollectionsCursor from "./ListCollectionsCursor.js"
 import * as MongoClient from "./MongoClient.js"
-import type * as MongoError from "./MongoError.js"
+import * as MongoError from "./MongoError.js"
 
 export const documentCollection: {
   (name: string): (db: Db) => DocumentCollection.DocumentCollection
@@ -44,6 +45,49 @@ export const collection: {
   ): Collection.Collection<A, I, R> => DocumentCollection.typed(documentCollection(db, name), schema)
 )
 
+export const listCollections: {
+  (): (db: Db) => ListCollectionsCursor.ListCollectionsCursor
+  (filter: Document): (db: Db) => ListCollectionsCursor.ListCollectionsCursor
+  (
+    filter: Document,
+    options: Exclude<ListCollectionsOptions, "nameOnly"> & { nameOnly: true }
+  ): (db: Db) => ListCollectionsCursor.NameOnlyListCollectionsCursor
+  (
+    filter: Document,
+    options: Exclude<ListCollectionsOptions, "nameOnly"> & { nameOnly: false }
+  ): (db: Db) => ListCollectionsCursor.FullListCollectionsCursor
+  (db: Db): ListCollectionsCursor.ListCollectionsCursor
+  (db: Db, filter: Document): ListCollectionsCursor.ListCollectionsCursor
+  (
+    db: Db,
+    filter: Document,
+    options: Exclude<ListCollectionsOptions, "nameOnly"> & { nameOnly: true }
+  ): ListCollectionsCursor.NameOnlyListCollectionsCursor
+  (
+    db: Db,
+    filter: Document,
+    options: Exclude<ListCollectionsOptions, "nameOnly"> & { nameOnly: false }
+  ): ListCollectionsCursor.FullListCollectionsCursor
+} = F.dual(
+  (args) => isDb(args[0]),
+  (db: Db, filter?: Document, options?: ListCollectionsOptions): ListCollectionsCursor.ListCollectionsCursor =>
+    new ListCollectionsCursor.ListCollectionsCursor({ cursor: db.listCollections(filter, options) })
+)
+
+export const dropCollection: {
+  (name: string): (db: Db) => Effect.Effect<boolean>
+  (name: string, options: DropCollectionOptions): (db: Db) => Effect.Effect<boolean, MongoError.MongoError>
+  (db: Db, name: string): Effect.Effect<boolean, MongoError.MongoError>
+  (db: Db, name: string, options: DropCollectionOptions): Effect.Effect<boolean, MongoError.MongoError>
+} = F.dual(
+  (args) => isDb(args[0]),
+  (db: Db, name: string, options?: DropCollectionOptions): Effect.Effect<boolean, MongoError.MongoError> =>
+    F.pipe(
+      Effect.promise(() => db.dropCollection(name, options)),
+      Effect.catchAllDefect(MongoError.mongoErrorDie<boolean>("dropCollection error"))
+    )
+)
+
 const isDb = (x: unknown) => x instanceof Db
 
 export type DbService<K extends string> = {

package/src/DocumentAggregationCursor.ts

@@ -0,0 +1,30 @@
+/**
+ * @since 0.0.1
+ */
+import * as Data from "effect/Data"
+import * as Effect from "effect/Effect"
+import * as F from "effect/Function"
+import * as Stream from "effect/Stream"
+import type { AggregationCursor as MongoAggregationCursor } from "mongodb"
+import * as MongoError from "./MongoError.js"
+
+export class DocumentAggregationCursor
+  extends Data.TaggedClass("DocumentAggregationCursor")<{ cursor: MongoAggregationCursor<Document> }>
+{
+}
+
+export const toArray = (
+  cursor: DocumentAggregationCursor
+): Effect.Effect<ReadonlyArray<Document>, MongoError.MongoError> =>
+  F.pipe(
+    Effect.tryPromise({ try: () => cursor.cursor.toArray(), catch: F.identity }),
+    Effect.catchAll(MongoError.mongoErrorDie<ReadonlyArray<Document>>(`${cursor._tag}.toArray error`))
+  )
+
+export const toStream = (
+  cursor: DocumentAggregationCursor
+): Stream.Stream<Document, MongoError.MongoError> =>
+  F.pipe(
+    Stream.fromAsyncIterable(cursor.cursor, F.identity),
+    Stream.catchAll(MongoError.mongoErrorStream<Document>(`${cursor._tag}.toStream error`))
+  )

package/src/DocumentCollection.ts

@@ -1,23 +1,35 @@
 /**
  * @since 0.0.1
  */
-import type * as Schema from "@effect/schema/Schema"
 import * as Data from "effect/Data"
 import * as Effect from "effect/Effect"
 import * as F from "effect/Function"
 import * as O from "effect/Option"
+import type * as Schema from "effect/Schema"
 import type {
+  AggregateOptions,
   BulkWriteOptions,
   Collection as MongoCollection,
+  CreateIndexesOptions,
+  DeleteOptions,
+  DeleteResult,
   Document,
   Filter,
   FindOptions,
+  IndexDescription,
   InsertManyResult,
   InsertOneOptions,
   InsertOneResult,
-  OptionalUnlessRequiredId
+  OptionalUnlessRequiredId,
+  RenameOptions,
+  ReplaceOptions,
+  UpdateFilter,
+  UpdateOptions,
+  UpdateResult,
+  WithoutId
 } from "mongodb"
 import * as Collection from "./Collection.js"
+import * as DocumentAggregationCursor from "./DocumentAggregationCursor.js"
 import * as DocumentFindCursor from "./DocumentFindCursor.js"
 import * as MongoError from "./MongoError.js"
 
@@ -112,6 +124,186 @@ export const insertMany: {
     Effect.catchAllDefect(MongoError.mongoErrorDie<InsertManyResult>("insertMany error"))
   ))
 
+export const deleteOne: {
+  (
+    filter: Filter<Document>,
+    options?: DeleteOptions
+  ): (
+    collection: DocumentCollection
+  ) => Effect.Effect<DeleteResult, MongoError.MongoError>
+  (
+    collection: DocumentCollection,
+    filter: Filter<Document>,
+    options?: DeleteOptions
+  ): Effect.Effect<DeleteResult, MongoError.MongoError>
+} = F.dual(
+  (args) => isDocumentCollection(args[0]),
+  (
+    collection: DocumentCollection,
+    filter: Filter<Document>,
+    options?: DeleteOptions
+  ): Effect.Effect<DeleteResult, MongoError.MongoError> =>
+    F.pipe(
+      Effect.promise(() => collection.collection.deleteOne(filter, options)),
+      Effect.catchAllDefect(MongoError.mongoErrorDie<DeleteResult>("deleteOne error"))
+    )
+)
+
+export const deleteMany: {
+  (
+    filter: Filter<Document>,
+    options?: DeleteOptions
+  ): (
+    collection: DocumentCollection
+  ) => Effect.Effect<DeleteResult, MongoError.MongoError>
+  (
+    collection: DocumentCollection,
+    filter: Filter<Document>,
+    options?: DeleteOptions
+  ): Effect.Effect<DeleteResult, MongoError.MongoError>
+} = F.dual(
+  (args) => isDocumentCollection(args[0]),
+  (
+    collection: DocumentCollection,
+    filter: Filter<Document>,
+    options?: DeleteOptions
+  ): Effect.Effect<DeleteResult, MongoError.MongoError> =>
+    F.pipe(
+      Effect.promise(() => collection.collection.deleteMany(filter, options)),
+      Effect.catchAllDefect(MongoError.mongoErrorDie<DeleteResult>("deleteMany error"))
+    )
+)
+
+export const updateMany: {
+  (
+    filter: Filter<Document>,
+    update: UpdateFilter<Document> | Array<Document>,
+    options?: UpdateOptions
+  ): (
+    collection: DocumentCollection
+  ) => Effect.Effect<UpdateResult, MongoError.MongoError>
+  (
+    collection: DocumentCollection,
+    filter: Filter<Document>,
+    update: UpdateFilter<Document> | Array<Document>,
+    options?: UpdateOptions
+  ): Effect.Effect<UpdateResult, MongoError.MongoError>
+} = F.dual(
+  (args) => isDocumentCollection(args[0]),
+  (
+    collection: DocumentCollection,
+    filter: Filter<Document>,
+    update: UpdateFilter<Document> | Array<Document>,
+    options?: UpdateOptions
+  ): Effect.Effect<UpdateResult, MongoError.MongoError> =>
+    F.pipe(
+      Effect.promise(() => collection.collection.updateMany(filter, update, options)),
+      Effect.catchAllDefect(MongoError.mongoErrorDie<UpdateResult>("updateMany error"))
+    )
+)
+
+export const replaceOne: {
+  (
+    filter: Filter<Document>,
+    replacement: WithoutId<Document>,
+    options?: ReplaceOptions
+  ): (
+    collection: DocumentCollection
+  ) => Effect.Effect<UpdateResult | Document, MongoError.MongoError>
+  (
+    collection: DocumentCollection,
+    filter: Filter<Document>,
+    replacement: WithoutId<Document>,
+    options?: ReplaceOptions
+  ): Effect.Effect<UpdateResult | Document, MongoError.MongoError>
+} = F.dual(
+  (args) => isDocumentCollection(args[0]),
+  (
+    collection: DocumentCollection,
+    filter: Filter<Document>,
+    replacement: WithoutId<Document>,
+    options?: ReplaceOptions
+  ): Effect.Effect<UpdateResult | Document, MongoError.MongoError> =>
+    F.pipe(
+      Effect.promise(() => collection.collection.replaceOne(filter, replacement, options)),
+      Effect.catchAllDefect(MongoError.mongoErrorDie<UpdateResult | Document>("replaceOne error"))
+    )
+)
+
+export const rename: {
+  (
+    newName: string,
+    options?: RenameOptions
+  ): (
+    collection: DocumentCollection
+  ) => Effect.Effect<MongoCollection, MongoError.MongoError>
+  (
+    collection: DocumentCollection,
+    newName: string,
+    options?: RenameOptions
+  ): Effect.Effect<MongoCollection, MongoError.MongoError>
+} = F.dual(
+  (args) => isDocumentCollection(args[0]),
+  (
+    collection: DocumentCollection,
+    newName: string,
+    options?: RenameOptions
+  ): Effect.Effect<MongoCollection, MongoError.MongoError> =>
+    F.pipe(
+      Effect.promise(() => collection.collection.rename(newName, options)),
+      Effect.catchAllDefect(MongoError.mongoErrorDie<MongoCollection>("rename error"))
+    )
+)
+
+export const createIndexes: {
+  (
+    indexSpecs: Array<IndexDescription>,
+    options?: CreateIndexesOptions
+  ): (
+    collection: DocumentCollection
+  ) => Effect.Effect<Array<string>, MongoError.MongoError>
+  (
+    collection: DocumentCollection,
+    indexSpecs: Array<IndexDescription>,
+    options?: CreateIndexesOptions
+  ): Effect.Effect<Array<string>, MongoError.MongoError>
+} = F.dual(
+  (args) => isDocumentCollection(args[0]),
+  (
+    collection: DocumentCollection,
+    indexSpecs: Array<IndexDescription>,
+    options?: CreateIndexesOptions
+  ): Effect.Effect<Array<string>, MongoError.MongoError> =>
+    F.pipe(
+      Effect.promise(() => collection.collection.createIndexes(indexSpecs, options)),
+      Effect.catchAllDefect(MongoError.mongoErrorDie<Array<string>>("createIndexes error"))
+    )
+)
+
+export const aggregate: {
+  (
+    pipeline?: Array<Document>,
+    options?: AggregateOptions
+  ): (
+    collection: DocumentCollection
+  ) => DocumentAggregationCursor.DocumentAggregationCursor
+  (
+    collection: DocumentCollection,
+    pipeline?: Array<Document>,
+    options?: AggregateOptions
+  ): DocumentAggregationCursor.DocumentAggregationCursor
+} = F.dual(
+  (args) => isDocumentCollection(args[0]),
+  (
+    collection: DocumentCollection,
+    pipeline?: Array<Document>,
+    options?: AggregateOptions
+  ): DocumentAggregationCursor.DocumentAggregationCursor =>
+    new DocumentAggregationCursor.DocumentAggregationCursor({
+      cursor: collection.collection.aggregate(pipeline, options)
+    })
+)
+
 export const typed: {
   <A extends Document, I extends Document = A, R = never>(
     schema: Schema.Schema<A, I, R>

package/src/DocumentFindCursor.ts

@@ -1,10 +1,10 @@
 /**
  * @since 0.0.1
  */
-import type * as Schema from "@effect/schema/Schema"
 import * as Data from "effect/Data"
 import * as Effect from "effect/Effect"
 import * as F from "effect/Function"
+import type * as Schema from "effect/Schema"
 import * as Stream from "effect/Stream"
 import type { Document, FindCursor as MongoFindCursor, Sort, SortDirection } from "mongodb"
 import * as FindCursor from "./FindCursor.js"