Form work

This commit is contained in:
Julien Valverdé
2025-04-18 23:52:49 +02:00
parent 1b2b68fbae
commit cb61713cce

View File

@@ -1,41 +1,11 @@
import type { Array, Schema, SchemaAST } from "effect" import type { Array, Schema, SchemaAST } from "effect"
import type * as FormTree from "./FormTree.ts" import type * as Formify from "./Formify.js"
export interface FormField<S extends Schema.Schema.Any> { export interface FormField<S extends Schema.Schema.Any> {
readonly schema: S readonly schema: S
} }
export interface GenericFormField<S extends Schema.Schema.Any> extends FormField<S> {
readonly _tag: "GenericFormField"
readonly value: S["Type"]
}
export interface TupleFormField<
S extends Schema.TupleType<Elements, Rest>,
Elements extends Schema.TupleType.Elements,
Rest extends Schema.TupleType.Rest,
> extends FormField<S> {
readonly _tag: "TupleFormField"
readonly elements: [...{ readonly [K in keyof Elements]: FormTree.FormTree<Elements[K]> }]
}
export interface ArrayFormField<
S extends Schema.Array$<Value>,
Value extends Schema.Schema.Any,
> extends FormField<S> {
readonly _tag: "ArrayFormField"
readonly elements: readonly FormTree.FormTree<Value>[]
}
export interface StructFormField<
S extends Schema.Struct<Fields>,
Fields extends Schema.Struct.Fields,
> extends FormField<S> {
readonly _tag: "StructFormField"
readonly fields: { readonly [K in keyof Fields]: FormTree.FormTree<Fields[K]> }
}
export interface LiteralFormField< export interface LiteralFormField<
S extends Schema.Literal<Literals>, S extends Schema.Literal<Literals>,
Literals extends Array.NonEmptyReadonlyArray<SchemaAST.LiteralValue>, Literals extends Array.NonEmptyReadonlyArray<SchemaAST.LiteralValue>,
@@ -49,7 +19,37 @@ export interface UnionFormField<
Members extends ReadonlyArray<Schema.Schema.All>, Members extends ReadonlyArray<Schema.Schema.All>,
> extends FormField<S> { > extends FormField<S> {
readonly _tag: "UnionFormField" readonly _tag: "UnionFormField"
readonly member: FormTree.FormTree<Members[number]> readonly member: Formify.Formify<Members[number]>
}
export interface TupleFormField<
S extends Schema.TupleType<Elements, Rest>,
Elements extends Schema.TupleType.Elements,
Rest extends Schema.TupleType.Rest,
> extends FormField<S> {
readonly _tag: "TupleFormField"
readonly elements: [...{ readonly [K in keyof Elements]: Formify.Formify<Elements[K]> }]
}
export interface ArrayFormField<
S extends Schema.Array$<Value>,
Value extends Schema.Schema.Any,
> extends FormField<S> {
readonly _tag: "ArrayFormField"
readonly elements: readonly Formify.Formify<Value>[]
}
export interface StructFormField<
S extends Schema.Struct<Fields>,
Fields extends Schema.Struct.Fields,
> extends FormField<S> {
readonly _tag: "StructFormField"
readonly fields: { readonly [K in keyof Fields]: Formify.Formify<Fields[K]> }
}
export interface GenericFormField<S extends Schema.Schema.Any> extends FormField<S> {
readonly _tag: "GenericFormField"
readonly value: S["Type"]
} }