ballerina-core 1.0.193 → 1.0.194

package/src/forms/domains/dispatched-forms/runner/domains/abstract-renderers/one/coroutines/runner.ts

@@ -2,269 +2,55 @@ import { ValueInfiniteStreamLoader } from "../../../../../../../../value-infinit
 import { ValueInfiniteStreamState } from "../../../../../../../../value-infinite-data-stream/state";
 import {
   OneAbstractRendererForeignMutationsExpected,
-  OneAbstractRendererReadonlyContext,
   OneAbstractRendererState,
 } from "../state";
 import {
-  Debounce,
   SimpleCallback,
   Value,
-  CoTypedFactory,
-  ValueOption,
   Debounced,
-  AsyncState,
-  Synchronize,
-  PredicateValue,
   Unit,
-  Synchronized,
   ValueOrErrors,
   ValueRecord,
-  ValueUnit,
-  DispatchOnChange,
-  replaceWith,
-  id as idUpdater,
-  DispatchDelta,
+  BaseFlags,
+  Sum,
 } from "../../../../../../../../../main";
 import { Map } from "immutable";
+import { Co, DebouncerCo, InitializeCo } from "./builder";
+import { initializeOne } from "./_initializeOne";
+import { initializeStream } from "./_initializeStream";
+import { debouncer } from "./_debouncer";
 
-const Co = <CustomPresentationContext = Unit, ExtraContext = Unit>() =>
-  CoTypedFactory<
-    OneAbstractRendererReadonlyContext<CustomPresentationContext, ExtraContext>,
-    OneAbstractRendererState
-  >();
-
-const DebouncerCo = <CustomPresentationContext = Unit, ExtraContext = Unit>() =>
-  CoTypedFactory<
-    OneAbstractRendererReadonlyContext<
-      CustomPresentationContext,
-      ExtraContext
-    > & {
-      onDebounce: SimpleCallback<void>;
-    },
-    OneAbstractRendererState
-  >();
-
-const DebouncedCo = CoTypedFactory<
-  { onDebounce: SimpleCallback<void> },
-  Value<Map<string, string>>
->();
-
-const intializeOne = <
-  CustomPresentationContext = Unit,
-  ExtraContext = Unit,
->() =>
-  Co<CustomPresentationContext, ExtraContext>()
-    .GetState()
-    .then((current) => {
-      if (current.value == undefined) {
-        return Co<CustomPresentationContext, ExtraContext>().Wait(0);
-      }
-
-      /// When initailising, in both stages, inject the id to the get chunk
-
-      const local = current.bindings.get("local");
-      if (local == undefined) {
-        console.error(
-          `local binding is undefined when intialising one\n... in couroutine for\n...${current.domNodeAncestorPath + "[one]"}`,
-        );
-        return Co<CustomPresentationContext, ExtraContext>().Wait(0);
-      }
-
-      if (!PredicateValue.Operations.IsRecord(local)) {
-        console.error(
-          `local binding is not a record when intialising one\n... in couroutine for\n...${current.domNodeAncestorPath + "[one]"}`,
-        );
-        return Co<CustomPresentationContext, ExtraContext>().Wait(0);
-      }
-
-      if (!local.fields.has("Id")) {
-        console.error(
-          `local binding is missing Id (check casing) when intialising one\n... in couroutine for\n...${current.domNodeAncestorPath + "[one]"}`,
-        );
-        return Co<CustomPresentationContext, ExtraContext>().Wait(0);
-      }
-
-      const id = local.fields.get("Id")!; // safe because of above check;
-      if (!PredicateValue.Operations.IsString(id)) {
-        console.error(
-          `local Id is not a string when intialising one\n... in couroutine for\n...${current.domNodeAncestorPath + "[one]"}`,
-        );
-        return Co<CustomPresentationContext, ExtraContext>().Wait(0);
-      }
-
-      const initializationCompletedCo = Co<
-        CustomPresentationContext,
-        ExtraContext
-      >().SetState(
-        OneAbstractRendererState.Updaters.Core.customFormState.children
-          .initializationStatus(
-            replaceWith<
-              OneAbstractRendererState["customFormState"]["initializationStatus"]
-            >("initialized"),
-          )
-          .thenMany([
-            OneAbstractRendererState.Updaters.Core.customFormState.children.previousRemoteEntityVersionIdentifier(
-              replaceWith(current.remoteEntityVersionIdentifier),
-            ),
-            OneAbstractRendererState.Updaters.Core.customFormState.children.shouldReinitialize(
-              replaceWith(false),
-            ),
-            current.customFormState.initializationStatus == "reinitializing" &&
-            current.customFormState.status == "open"
-              ? OneAbstractRendererState.Updaters.Core.customFormState.children.stream(
-                  ValueInfiniteStreamState.Updaters.Template.loadMore(),
-                )
-              : idUpdater,
-          ]),
-      );
-
-      const hasInitialValue =
-        (PredicateValue.Operations.IsOption(current.value) &&
-          current.value.isSome) ||
-        PredicateValue.Operations.IsUnit(current.value);
-      if (hasInitialValue) {
-        const initialValue =
-          PredicateValue.Operations.IsOption(current.value) &&
-          current.value.isSome &&
-          PredicateValue.Operations.IsRecord(current.value.value)
-            ? current.value.value
-            : PredicateValue.Default.unit();
-
-        return Co<CustomPresentationContext, ExtraContext>().Seq([
-          Co<CustomPresentationContext, ExtraContext>().SetState(
-            OneAbstractRendererState.Updaters.Core.customFormState.children
-              .selectedValue(
-                Synchronized.Updaters.sync(
-                  AsyncState.Updaters.toLoaded(
-                    ValueOrErrors.Default.return(initialValue),
-                  ),
-                ),
-              )
-              .then(
-                OneAbstractRendererState.Updaters.Core.customFormState.children.stream(
-                  replaceWith(
-                    ValueInfiniteStreamState.Default(
-                      100,
-                      current.customFormState.getChunkWithParams(id)(
-                        current.customFormState.streamParams.value,
-                      ),
-                    ),
-                  ),
-                ),
-              ),
-          ),
-          initializationCompletedCo,
-        ]);
-      }
-
-      return Co<CustomPresentationContext, ExtraContext>().Seq([
-        Co<CustomPresentationContext, ExtraContext>().SetState(
-          OneAbstractRendererState.Updaters.Core.customFormState.children.stream(
-            replaceWith(
-              ValueInfiniteStreamState.Default(
-                100,
-                current.customFormState.getChunkWithParams(id)(
-                  current.customFormState.streamParams.value,
-                ),
-              ),
-            ),
-          ),
-        ),
-        Synchronize<ValueUnit, ValueOrErrors<ValueRecord | ValueUnit, string>>(
-          (_) =>
-            current.getApi(id).then((value) => {
-              return current.fromApiParser(value).Then((result) => {
-                return ValueOrErrors.Default.return(result);
-              });
-            }),
-          () => "transient failure",
-          5,
-          150,
-        ).embed(
-          (_) => _.customFormState.selectedValue,
-          (_) =>
-            OneAbstractRendererState.Updaters.Core.customFormState.children.selectedValue(
-              _,
-            ),
-        ),
-        initializationCompletedCo,
-      ]);
-    });
-
-const debouncer = <CustomPresentationContext = Unit, ExtraContext = Unit>() =>
-  DebouncerCo<CustomPresentationContext, ExtraContext>().Repeat(
-    DebouncerCo<CustomPresentationContext, ExtraContext>().Seq([
-      Debounce<
-        Value<Map<string, string>>,
-        { onDebounce: SimpleCallback<void> }
-      >(
-        DebouncedCo.GetState()
-          .then((current) => DebouncedCo.Do(() => current.onDebounce()))
-          //.SetState(SearchNow.Updaters.reloadsRequested(_ => _ + 1))
-          .then((_) => DebouncedCo.Return("success")),
-        250,
-      ).embed(
-        (_) => ({
-          ..._.customFormState.streamParams,
-          onDebounce: _.onDebounce,
-        }),
-        OneAbstractRendererState.Updaters.Core.customFormState.children
-          .streamParams,
-      ),
-      DebouncerCo<CustomPresentationContext, ExtraContext>().Wait(0),
-    ]),
-  );
-
-const reinitialize = <
-  CustomPresentationContext = Unit,
-  ExtraContext = Unit,
->() =>
-  Co<CustomPresentationContext, ExtraContext>()
-    .GetState()
-    .then((_) => {
-      return Co<CustomPresentationContext, ExtraContext>().SetState(
-        OneAbstractRendererState.Updaters.Core.customFormState.children.initializationStatus(
-          replaceWith<
-            OneAbstractRendererState["customFormState"]["initializationStatus"]
-          >("reinitializing"),
-        ),
-      );
-    });
-
-export const reinitializeOneRunner = <
+export const initializeOneRunner = <
   CustomPresentationContext = Unit,
-  Flags = Unit,
+  Flags = BaseFlags,
   ExtraContext = Unit,
 >() =>
-  Co<CustomPresentationContext, ExtraContext>().Template<
+  InitializeCo<CustomPresentationContext, ExtraContext>().Template<
     OneAbstractRendererForeignMutationsExpected<Flags>
-  >(reinitialize<CustomPresentationContext, ExtraContext>(), {
+  >(initializeOne<CustomPresentationContext, ExtraContext>(), {
     interval: 15,
     runFilter: (props) =>
-      props.context.customFormState.initializationStatus === "initialized" &&
-      props.context.customFormState.shouldReinitialize &&
-      props.context.remoteEntityVersionIdentifier !==
-        props.context.customFormState.previousRemoteEntityVersionIdentifier,
+      // if the value is some, we already have something to pass to the renderers
+      // -> we don't have to run the initialization coroutine
+      // if the inner value is unit, we are rendering a partial one
+      props.context.value.kind === "option" && !props.context.value.isSome,
   });
 
-export const initializeOneRunner = <
+export const initializeStreamRunner = <
   CustomPresentationContext = Unit,
-  Flags = Unit,
+  Flags = BaseFlags,
   ExtraContext = Unit,
 >() =>
   Co<CustomPresentationContext, ExtraContext>().Template<
     OneAbstractRendererForeignMutationsExpected<Flags>
-  >(intializeOne<CustomPresentationContext, ExtraContext>(), {
+  >(initializeStream<CustomPresentationContext, ExtraContext>(), {
     interval: 15,
-    runFilter: (props) =>
-      props.context.customFormState.initializationStatus ===
-        "not initialized" ||
-      props.context.customFormState.initializationStatus === "reinitializing",
+    runFilter: (props) => props.context.customFormState.stream.kind === "r",
   });
 
 export const oneTableDebouncerRunner = <
   CustomPresentationContext = Unit,
-  Flags = Unit,
+  Flags = BaseFlags,
   ExtraContext = Unit,
 >() =>
   DebouncerCo<CustomPresentationContext, ExtraContext>().Template<
@@ -279,21 +65,28 @@ export const oneTableDebouncerRunner = <
 
 export const oneTableLoaderRunner = <
   CustomPresentationContext = Unit,
-  Flags = Unit,
+  Flags = BaseFlags,
   ExtraContext = Unit,
 >() =>
   Co<CustomPresentationContext, ExtraContext>().Template<
     OneAbstractRendererForeignMutationsExpected<Flags>
   >(
     ValueInfiniteStreamLoader().embed(
-      (_) => _.customFormState.stream,
-      OneAbstractRendererState.Updaters.Core.customFormState.children.stream,
+      (_) =>
+        _.customFormState.stream.kind === "l"
+          ? _.customFormState.stream.value
+          : undefined,
+      (upd) =>
+        OneAbstractRendererState.Updaters.Core.customFormState.children.stream(
+          Sum.Updaters.left(upd),
+        ),
     ),
     {
       interval: 15,
       runFilter: (props) =>
+        props.context.customFormState.stream.kind === "l" &&
         ValueInfiniteStreamState.Operations.shouldCoroutineRun(
-          props.context.customFormState.stream,
+          props.context.customFormState.stream.value,
         ),
     },
   );

package/src/forms/domains/dispatched-forms/runner/domains/abstract-renderers/one/state.ts

@@ -14,7 +14,6 @@ import {
   OneType,
   ValueOrErrors,
   Guid,
-  Synchronized,
   Unit,
   Template,
   ValueRecord,
@@ -23,13 +22,15 @@ import {
   MapRepo,
   BasicFun2,
   Value,
-  replaceWith,
   ValueCallbackWithOptionalFlags,
   VoidCallbackWithOptionalFlags,
   DispatchOnChange,
   CommonAbstractRendererState,
   DispatchDelta,
   CommonAbstractRendererViewOnlyReadonlyContext,
+  BaseFlags,
+  Sum,
+  PredicateValue,
 } from "../../../../../../../../main";
 import { Debounced } from "../../../../../../../debounced/state";
 
@@ -51,20 +52,13 @@ export type OneAbstractRendererState = CommonAbstractRendererState & {
   customFormState: {
     detailsState: RecordAbstractRendererState;
     previewStates: Map<string, RecordAbstractRendererState>;
-    selectedValue: Synchronized<
-      ValueUnit,
-      ValueOrErrors<ValueRecord | ValueUnit, string>
-    >;
     streamParams: Debounced<Value<Map<string, string>>>;
     status: "open" | "closed";
-    stream: ValueInfiniteStreamState;
+    stream: Sum<ValueInfiniteStreamState, "not initialized">;
     getChunkWithParams: BasicFun<
       string,
       BasicFun<Map<string, string>, ValueInfiniteStreamState["getChunk"]>
     >;
-    initializationStatus: "not initialized" | "initialized" | "reinitializing";
-    previousRemoteEntityVersionIdentifier: string;
-    shouldReinitialize: boolean;
   };
 };
 
@@ -79,22 +73,15 @@ export const OneAbstractRendererState = {
     customFormState: {
       detailsState: RecordAbstractRendererState.Default.zero(),
       previewStates: Map(),
-      selectedValue: Synchronized.Default(ValueUnit.Default()),
       streamParams: Debounced.Default(Value.Default(Map())),
       status: "closed",
       getChunkWithParams: getChunk,
-      stream: ValueInfiniteStreamState.Default(10, getChunk("")(Map())), // always overriden during initialisation to inject id
-      initializationStatus: "not initialized",
-      previousRemoteEntityVersionIdentifier: "",
-      shouldReinitialize: false,
+      stream: Sum.Default.right("not initialized"),
     },
   }),
   Updaters: {
     Core: {
       ...simpleUpdaterWithChildren<OneAbstractRendererState>()({
-        ...simpleUpdater<OneAbstractRendererState["customFormState"]>()(
-          "selectedValue",
-        ),
         ...simpleUpdater<OneAbstractRendererState["customFormState"]>()(
           "status",
         ),
@@ -107,15 +94,6 @@ export const OneAbstractRendererState = {
         ...simpleUpdater<OneAbstractRendererState["customFormState"]>()(
           "detailsState",
         ),
-        ...simpleUpdater<OneAbstractRendererState["customFormState"]>()(
-          "previousRemoteEntityVersionIdentifier",
-        ),
-        ...simpleUpdater<OneAbstractRendererState["customFormState"]>()(
-          "shouldReinitialize",
-        ),
-        ...simpleUpdater<OneAbstractRendererState["customFormState"]>()(
-          "initializationStatus",
-        ),
         ...simpleUpdater<OneAbstractRendererState["customFormState"]>()(
           "previewStates",
         ),
@@ -136,16 +114,54 @@ export const OneAbstractRendererState = {
             Value.Updaters.value(MapRepo.Updaters.upsert(key, () => "", _)),
           ),
         ),
-      shouldReinitialize: (_: boolean) =>
-        OneAbstractRendererState.Updaters.Core.customFormState.children.shouldReinitialize(
-          replaceWith(_),
-        ),
+    },
+  },
+  Operations: {
+    GetIdFromContext: <CustomPresentationContext = Unit, ExtraContext = Unit>(
+      ctx: OneAbstractRendererReadonlyContext<
+        CustomPresentationContext,
+        ExtraContext
+      >,
+    ): ValueOrErrors<string, string | undefined> => {
+      if (ctx.value == undefined) {
+        return ValueOrErrors.Default.throwOne(undefined);
+      }
+
+      /// When initailising, in both stages, inject the id to the get chunk
+
+      const local = ctx.bindings.get("local");
+      if (local == undefined) {
+        return ValueOrErrors.Default.throwOne(
+          `local binding is undefined when intialising one`,
+        );
+      }
+
+      if (!PredicateValue.Operations.IsRecord(local)) {
+        return ValueOrErrors.Default.throwOne(
+          `local binding is not a record when intialising one\n... in couroutine for\n...${ctx.domNodeAncestorPath + "[one]"}`,
+        );
+      }
+
+      if (!local.fields.has("Id")) {
+        return ValueOrErrors.Default.throwOne(
+          `local binding is missing Id (check casing) when intialising one\n... in couroutine for\n...${ctx.domNodeAncestorPath + "[one]"}`,
+        );
+      }
+
+      const id = local.fields.get("Id")!; // safe because of above check;
+      if (!PredicateValue.Operations.IsString(id)) {
+        return ValueOrErrors.Default.throwOne(
+          `local Id is not a string when intialising one\n... in couroutine for\n...${ctx.domNodeAncestorPath + "[one]"}`,
+        );
+      }
+
+      return ValueOrErrors.Default.return(id);
     },
   },
 };
 
-export type OneAbstractRendererForeignMutationsExpected<Flags = Unit> = {
-  onChange: DispatchOnChange<ValueOption | ValueUnit, Flags>;
+export type OneAbstractRendererForeignMutationsExpected<Flags = BaseFlags> = {
+  onChange: DispatchOnChange<ValueOption | ValueUnit, BaseFlags>;
   clear?: () => void;
   delete?: (delta: DispatchDelta<Flags>) => void;
   select?: (
@@ -158,81 +174,58 @@ export type OneAbstractRendererForeignMutationsExpected<Flags = Unit> = {
   ) => void;
 };
 
-export type OneAbstractRendererViewForeignMutationsExpected<Flags = Unit> = {
-  onChange: DispatchOnChange<ValueOption | ValueUnit, Flags>;
-  toggleOpen: SimpleCallback<void>;
-  setStreamParam: BasicFun2<string, string, void>;
-  select: ValueCallbackWithOptionalFlags<ValueRecord, Flags>;
-  create: ValueCallbackWithOptionalFlags<ValueRecord, Flags>;
-  delete?: VoidCallbackWithOptionalFlags<Flags>;
-  clear?: SimpleCallback<void>;
-  loadMore: SimpleCallback<void>;
-  reload: SimpleCallback<void>;
-};
+export type OneAbstractRendererViewForeignMutationsExpected<Flags = BaseFlags> =
+  {
+    onChange: DispatchOnChange<ValueOption | ValueUnit, Flags>;
+    toggleOpen: SimpleCallback<void>;
+    setStreamParam: BasicFun2<string, string, void>;
+    select: ValueCallbackWithOptionalFlags<ValueRecord, Flags>;
+    create: ValueCallbackWithOptionalFlags<ValueRecord, Flags>;
+    delete?: VoidCallbackWithOptionalFlags<Flags>;
+    clear?: SimpleCallback<void>;
+    loadMore: SimpleCallback<void>;
+  };
 
 export type OneAbstractRendererView<
   CustomPresentationContext = Unit,
-  Flags = Unit,
+  Flags = BaseFlags,
   ExtraContext = Unit,
 > = View<
-  (
-    | (Omit<
+  OneAbstractRendererReadonlyContext<
+    CustomPresentationContext,
+    ExtraContext
+  > & {
+    hasMoreValues: boolean;
+  } & CommonAbstractRendererViewOnlyReadonlyContext &
+    OneAbstractRendererState,
+  OneAbstractRendererState,
+  OneAbstractRendererViewForeignMutationsExpected<Flags>,
+  {
+    DetailsRenderer?: (
+      flags: Flags | undefined,
+    ) => Template<
+      OneAbstractRendererState &
         OneAbstractRendererReadonlyContext<
           CustomPresentationContext,
           ExtraContext
         >,
-        "value"
-      > & {
-        value: ValueRecord | ValueUnit;
-      } & OneAbstractRendererState & {
-          kind: "initialized";
-          hasMoreValues: boolean;
-        } & CommonAbstractRendererViewOnlyReadonlyContext)
-    | {
-        kind: "uninitialized";
-        domNodeId: string;
-      }
-  ) &
-    OneAbstractRendererState,
-  OneAbstractRendererState,
-  | ({
-      kind: "initialized";
-    } & OneAbstractRendererViewForeignMutationsExpected<Flags>)
-  | {
-      kind: "uninitialized";
-    },
-  | {
-      kind: "initialized";
-      DetailsRenderer: (flags: Flags | undefined) => Template<
-        Omit<
-          OneAbstractRendererReadonlyContext<
-            CustomPresentationContext,
-            ExtraContext
-          >,
-          "value"
-        > & {
-          value: ValueRecord | ValueUnit;
-        } & OneAbstractRendererState,
-        OneAbstractRendererState,
-        OneAbstractRendererViewForeignMutationsExpected<Flags>
-      >;
-      PreviewRenderer?: (value: ValueRecord) => (id: string) => (
-        flags: Flags | undefined,
-      ) => Template<
-        Omit<
-          OneAbstractRendererReadonlyContext<
-            CustomPresentationContext,
-            ExtraContext
-          >,
-          "value"
-        > & {
-          value: ValueRecord | ValueUnit;
-        } & OneAbstractRendererState,
-        OneAbstractRendererState,
-        OneAbstractRendererViewForeignMutationsExpected<Flags>
-      >;
-    }
-  | {
-      kind: "uninitialized";
-    }
+      OneAbstractRendererState,
+      OneAbstractRendererViewForeignMutationsExpected<Flags>
+    >;
+    PreviewRenderer?: (
+      value: ValueRecord,
+    ) => (
+      id: string,
+    ) => (
+      flags: Flags | undefined,
+    ) => Template<
+      OneAbstractRendererState &
+        OneAbstractRendererReadonlyContext<
+          CustomPresentationContext,
+          ExtraContext
+        >,
+      OneAbstractRendererState,
+      OneAbstractRendererViewForeignMutationsExpected<Flags>
+    >;
+  }
 >;