@reventlessdev/reventless-seed 1.0.0-alpha.4 → 1.0.0-alpha.5

package/CHANGELOG.md

@@ -3,6 +3,13 @@
 All notable changes to this project will be documented in this file.
 See [Conventional Commits](https://conventionalcommits.org) for commit guidelines.
 
+# 1.0.0-alpha.5 (2026-07-31)
+
+### Bug Fixes
+
+* **seed:** address a deployment's per-store upload endpoints ([45b226e](https://github.com/ReventlessDev/reventless-core/commit/45b226e00604af9fd28b6fb0b75ba7d3414791f2))
+
+
 # 1.0.0-alpha.4 (2026-07-27)
 
 ### Features

package/lib/bs/.compiler.log

@@ -1,2 +1,2 @@
-#Start(1785181007705)
-#Done(1785181012323)
+#Start(1785495045271)
+#Done(1785495045300)

package/lib/bs/.sourcedirs.json

@@ -0,0 +1 @@
+{"cmt_scan":[{"also_scan_build_root":true,"build_root":"lib/bs","scan_dirs":["src","tests"]}],"dirs":["src","tests"],"generated":[],"pkgs":[["@reventlessdev/rescript-jest","/home/runner/work/reventless-core/reventless-core/rescript/jest"]],"version":2}

package/lib/bs/ReventlessSeed.mlmap

@@ -7,3 +7,4 @@ Seed_Random
 Seed_Runner
 Seed_Types
 Seed_Upload
+UploadEndpointResolutionTest

package/lib/bs/compiler-info.json

@@ -2,7 +2,7 @@
   "version": "12.3.0",
   "bsc_path": "/home/runner/work/reventless-core/reventless-core/node_modules/@rescript/linux-x64/bin/bsc.exe",
   "bsc_hash": "75e3a59c95cc953608fd3dd6ea6ed68141bba4414a20a52f114261b8a48385fa",
-  "rescript_config_hash": "ad3a9d479584c1d6e4fe10cd993d9e290f74732e9b0cb3dd5d7429e88b4bba38",
+  "rescript_config_hash": "550cd18b4200d0c4e45b3591d7a21cc8a90b9eb330c7f516684df53c86aeda60",
   "runtime_path": "/home/runner/work/reventless-core/reventless-core/node_modules/@rescript/runtime",
-  "generated_at": "1785181012338"
+  "generated_at": "1785495045302"
 }

package/lib/bs/src/Seed.res

@@ -14,11 +14,13 @@ module Connect = Seed_Connect
 
 exception Failed = Seed_Types.Failed
 
-// A live target a data set seeds against: an authenticated client, the upload
-// endpoint (empty when the deployment serves no uploads), and a label.
+// A live target a data set seeds against: an authenticated client, the
+// deployment's upload endpoints (the legacy single service and the per-store
+// map, either of which may be empty), and a label.
 type connection = Seed_Connect.connection = {
   client: Seed_Client.t,
   uploadEndpoint: string,
+  uploadEndpoints: dict<string>,
   label: string,
 }
 

package/lib/bs/src/Seed_Connect.res

@@ -1,15 +1,25 @@
 // Turns endpoints plus a login function into a ready `connection`.
 //
 // A connection is what a data set seeds against: an authenticated GraphQL
-// client, the upload endpoint (empty when the deployment serves no uploads), and
-// a human label for the target. `make` is provider-agnostic — it prompts for
+// client, the deployment's upload endpoints (empty when it serves no uploads),
+// and a human label for the target. `make` is provider-agnostic — it prompts for
 // credentials, calls the supplied `login` to obtain a bearer, and wires it onto
 // the client via `useToken`. Where the bearer comes from (a local `/login`
 // round-trip, a Cognito id token) is the caller's concern.
 
 open Seed_Types
 
-type connection = {client: Seed_Client.t, uploadEndpoint: string, label: string}
+// `uploadEndpoint` is the legacy single presign service (and the local dev
+// server's one upload route); `uploadEndpoints` maps the qualified
+// `{plugin}.{store}` of each declared store to its own presign endpoint. Both,
+// because a deployment may publish either or both — see `Seed_Upload.endpointFor`
+// for the resolution between them.
+type connection = {
+  client: Seed_Client.t,
+  uploadEndpoint: string,
+  uploadEndpoints: dict<string>,
+  label: string,
+}
 
 /**
  * Prompts for credentials, calls `login` to mint a bearer, and returns a
@@ -20,23 +30,47 @@ let make = async (
   ~label: string,
   ~endpoint: string,
   ~uploadEndpoint: string,
+  ~uploadEndpoints: dict<string>=Dict.make(),
   ~login: (~username: string, ~password: string) => promise<string>,
   ~localDefaults: bool=false,
 ): connection => {
-  // `SEED_SKIP_UPLOADS` forces the connection to carry no upload endpoint, so a
-  // data set's upload phase no-ops the same way it does when a deployment serves
-  // none. Use it to seed domain data fast, or to skip a broken/absent upload path
-  // without editing the data set. It is the single knob: an empty
-  // `REVENTLESS_UPLOAD_ENDPOINT` env reads as "unset" (falls back to discovery),
-  // so this is the reliable way to disable uploads.
-  let uploadEndpoint = Seed_Prompt.envValue("SEED_SKIP_UPLOADS")->Option.isSome ? "" : uploadEndpoint
+  // `SEED_SKIP_UPLOADS` forces the connection to carry no upload endpoint at
+  // all, so a data set's upload phase no-ops the same way it does when a
+  // deployment serves none. Use it to seed domain data fast, or to skip a
+  // broken/absent upload path without editing the data set. It is the single
+  // knob: an empty `REVENTLESS_UPLOAD_ENDPOINT` env reads as "unset" (falls back
+  // to discovery), so this is the reliable way to disable uploads — which means
+  // it has to clear the per-store map too, or a declared store keeps uploading
+  // through it.
+  let skip = Seed_Prompt.envValue("SEED_SKIP_UPLOADS")->Option.isSome
+  let uploadEndpoint = skip ? "" : uploadEndpoint
+  let uploadEndpoints = skip ? Dict.make() : uploadEndpoints
   let (username, password) = await Seed_Prompt.credentials(~localDefaults)
   let token = await login(~username, ~password)
   let client = Seed_Client.make(~config={endpoint: endpoint})
   client->Seed_Client.useToken(token)
-  {client, uploadEndpoint, label}
+  {client, uploadEndpoint, uploadEndpoints, label}
 }
 
+/**
+ * The endpoint an asset destined for `store` uploads through, or the reason
+ * there is none — the message to report when the upload phase skips.
+ *
+ * `store` is the qualified `{plugin}.{store}` the asset's field declares, e.g.
+ * `"Catalog.productImages"`. Resolution is `Seed_Upload.endpointFor`; naming a
+ * store the deployment does not serve falls back to the legacy single service
+ * rather than to another store's endpoint.
+ */
+let uploadEndpointFor = (c: connection, ~store: string): result<string, string> =>
+  switch Seed_Upload.endpointFor(
+    ~store,
+    ~uploadEndpoint=c.uploadEndpoint,
+    ~uploadEndpoints=c.uploadEndpoints,
+  ) {
+  | Some(endpoint) => Ok(endpoint)
+  | None => Error(Seed_Upload.unresolvedReason(~store, ~uploadEndpoints=c.uploadEndpoints))
+  }
+
 /**
  * A login function backed by an HTTP login endpoint (the local dev
  * `/__inmemory/login` shape: POST `{username, password}` → `{token}`). Reuses
@@ -63,6 +97,10 @@ let envOr = (key: string, fallback: string): string =>
  * A ready `connect` thunk for the local dev platform, with the localhost
  * defaults baked in and overridable per endpoint (arg, then env var, then
  * default). Empty input at the credential prompt falls back to `admin`/`admin`.
+ *
+ * No per-store map: the local dev server serves every store through its one
+ * upload route, so a data set naming a store resolves to that route by the
+ * "declares a store with no matching endpoint" row.
  */
 let local = (~graphql=?, ~upload=?, ~login=?, ()): (unit => promise<connection>) => {
   let endpoint =

package/lib/bs/src/Seed_Connect.res.mjs

@@ -4,10 +4,14 @@ import * as Stdlib_Option from "@rescript/runtime/lib/es6/Stdlib_Option.js";
 import * as Seed_Types$ReventlessSeed from "./Seed_Types.res.mjs";
 import * as Seed_Client$ReventlessSeed from "./Seed_Client.res.mjs";
 import * as Seed_Prompt$ReventlessSeed from "./Seed_Prompt.res.mjs";
+import * as Seed_Upload$ReventlessSeed from "./Seed_Upload.res.mjs";
 
-async function make(label, endpoint, uploadEndpoint, login, localDefaultsOpt) {
+async function make(label, endpoint, uploadEndpoint, uploadEndpointsOpt, login, localDefaultsOpt) {
+  let uploadEndpoints = uploadEndpointsOpt !== undefined ? uploadEndpointsOpt : ({});
   let localDefaults = localDefaultsOpt !== undefined ? localDefaultsOpt : false;
-  let uploadEndpoint$1 = Stdlib_Option.isSome(Seed_Prompt$ReventlessSeed.envValue("SEED_SKIP_UPLOADS")) ? "" : uploadEndpoint;
+  let skip = Stdlib_Option.isSome(Seed_Prompt$ReventlessSeed.envValue("SEED_SKIP_UPLOADS"));
+  let uploadEndpoint$1 = skip ? "" : uploadEndpoint;
+  let uploadEndpoints$1 = skip ? ({}) : uploadEndpoints;
   let match = await Seed_Prompt$ReventlessSeed.credentials(localDefaults);
   let token = await login(match[0], match[1]);
   let client = Seed_Client$ReventlessSeed.make({
@@ -17,10 +21,26 @@ async function make(label, endpoint, uploadEndpoint, login, localDefaultsOpt) {
   return {
     client: client,
     uploadEndpoint: uploadEndpoint$1,
+    uploadEndpoints: uploadEndpoints$1,
     label: label
   };
 }
 
+function uploadEndpointFor(c, store) {
+  let endpoint = Seed_Upload$ReventlessSeed.endpointFor(store, c.uploadEndpoint, c.uploadEndpoints);
+  if (endpoint !== undefined) {
+    return {
+      TAG: "Ok",
+      _0: endpoint
+    };
+  } else {
+    return {
+      TAG: "Error",
+      _0: Seed_Upload$ReventlessSeed.unresolvedReason(store, c.uploadEndpoints)
+    };
+  }
+}
+
 function viaLoginEndpoint(loginEndpoint) {
   return async (username, password) => {
     let client = Seed_Client$ReventlessSeed.make({
@@ -50,11 +70,12 @@ function local(graphql, upload, login, param) {
   let endpoint = Stdlib_Option.getOr(graphql, Stdlib_Option.getOr(Seed_Prompt$ReventlessSeed.envValue("REVENTLESS_GRAPHQL_ENDPOINT"), "http://localhost:4000/graphql"));
   let uploadEndpoint = Stdlib_Option.getOr(upload, Stdlib_Option.getOr(Seed_Prompt$ReventlessSeed.envValue("REVENTLESS_UPLOAD_ENDPOINT"), "http://localhost:4000/__inmemory/upload"));
   let loginEndpoint = Stdlib_Option.getOr(login, Stdlib_Option.getOr(Seed_Prompt$ReventlessSeed.envValue("REVENTLESS_LOGIN_ENDPOINT"), "http://localhost:4000/__inmemory/login"));
-  return () => make("local", endpoint, uploadEndpoint, viaLoginEndpoint(loginEndpoint), true);
+  return () => make("local", endpoint, uploadEndpoint, undefined, viaLoginEndpoint(loginEndpoint), true);
 }
 
 export {
   make,
+  uploadEndpointFor,
   viaLoginEndpoint,
   envOr,
   local,

package/lib/bs/src/Seed_Upload.res

@@ -10,6 +10,11 @@
 // absolute URL against the endpoint's origin: AWS returns an absolute presigned
 // S3 URL (unchanged), while the local route returns a same-origin relative
 // `/{prefix}/{key}` that Node's `fetch` cannot PUT to until it is made absolute.
+//
+// `uploadAsset` is the transport and takes a resolved endpoint. *Which* endpoint
+// an asset uses — a deployment now publishes one per declared store — is
+// `endpointFor` below, kept separate so the decision is testable without a
+// running presign service.
 
 type fetchInit = {method: string, headers: dict<string>, body: string}
 type response
@@ -38,6 +43,60 @@ let asString = (json: JSON.t): option<string> =>
   | _ => None
   }
 
+/**
+ * Which endpoint an asset destined for `store` uploads through:
+ *
+ *   declares a store with a matching endpoint  → that store's endpoint
+ *   declares a store with no matching endpoint → the legacy single service
+ *   declares no store                          → the legacy single service
+ *   neither available                          → `None`
+ *
+ * `store` is the qualified `{plugin}.{store}` the platform keys its per-store
+ * presign endpoints by. The two middle rows are what keep a deployment predating
+ * per-store endpoints — and the local dev server, which serves one upload route
+ * — working unchanged.
+ *
+ * These are the same four rows the AutoUI renderer resolves an upload field by.
+ * Resolving one declaration by two different rules is how an asset lands in
+ * another plugin's bucket with a 2xx and a plausible-looking ref, so a missing
+ * key falls back to the legacy service rather than to some other store.
+ */
+let endpointFor = (
+  ~store: option<string>=?,
+  ~uploadEndpoint: string,
+  ~uploadEndpoints: dict<string>,
+): option<string> => {
+  let legacy = uploadEndpoint == "" ? None : Some(uploadEndpoint)
+  switch store {
+  | Some(s) => uploadEndpoints->Dict.get(s)->Option.orElse(legacy)
+  | None => legacy
+  }
+}
+
+/**
+ * Why `endpointFor` resolved nothing — the message a data set reports when its
+ * upload phase skips.
+ *
+ * "no upload endpoint" states a fact about the *deployment*; when the deployment
+ * publishes endpoints the caller could not match, the fact is about the *client*
+ * and that phrasing sends a reader to the bucket, the presign service and the
+ * IAM policy, all of which are correct. So the three cases are distinguished and
+ * the unmatched one names both the store it wanted and the keys it saw.
+ */
+let unresolvedReason = (~store: option<string>=?, ~uploadEndpoints: dict<string>): string => {
+  let available = uploadEndpoints->Dict.keysToArray
+  switch (Seed_Prompt.envValue("SEED_SKIP_UPLOADS"), store, available) {
+  | (Some(_), _, _) => "SEED_SKIP_UPLOADS is set"
+  | (None, _, []) => "this deployment publishes no upload endpoint"
+  | (None, Some(s), keys) =>
+    `this deployment publishes upload endpoints for ${keys->Array.join(", ")}, none for "${s}"`
+  | (None, None, keys) =>
+    `this deployment publishes only per-store upload endpoints (${keys->Array.join(
+        ", ",
+      )}) and this upload names no store`
+  }
+}
+
 // A `fetch` that reports an unreachable endpoint as `Error` instead of throwing,
 // so the two-step upload can thread failures without exceptions.
 let tryFetch = async (url: string, init: fetchInit): result<response, string> =>

package/lib/bs/src/Seed_Upload.res.mjs

@@ -1,6 +1,7 @@
 // Generated by ReScript, PLEASE EDIT WITH CARE
 
 import * as Stdlib_Option from "@rescript/runtime/lib/es6/Stdlib_Option.js";
+import * as Seed_Prompt$ReventlessSeed from "./Seed_Prompt.res.mjs";
 
 function field(json, key) {
   if (typeof json === "object" && json !== null && !Array.isArray(json)) {
@@ -14,6 +15,31 @@ function asString(json) {
   }
 }
 
+function endpointFor(store, uploadEndpoint, uploadEndpoints) {
+  let legacy = uploadEndpoint === "" ? undefined : uploadEndpoint;
+  if (store !== undefined) {
+    return Stdlib_Option.orElse(uploadEndpoints[store], legacy);
+  } else {
+    return legacy;
+  }
+}
+
+function unresolvedReason(store, uploadEndpoints) {
+  let available = Object.keys(uploadEndpoints);
+  let match = Seed_Prompt$ReventlessSeed.envValue("SEED_SKIP_UPLOADS");
+  if (match !== undefined) {
+    return "SEED_SKIP_UPLOADS is set";
+  } else if (available.length !== 0) {
+    if (store !== undefined) {
+      return `this deployment publishes upload endpoints for ` + available.join(", ") + `, none for "` + store + `"`;
+    } else {
+      return `this deployment publishes only per-store upload endpoints (` + available.join(", ") + `) and this upload names no store`;
+    }
+  } else {
+    return "this deployment publishes no upload endpoint";
+  }
+}
+
 async function tryFetch(url, init) {
   try {
     return {
@@ -112,7 +138,9 @@ async function uploadAsset(uploadEndpoint, bytes, fileName, contentType, authTok
 export {
   field,
   asString,
+  endpointFor,
+  unresolvedReason,
   tryFetch,
   uploadAsset,
 }
-/* No side effect */
+/* Seed_Prompt-ReventlessSeed Not a pure module */

package/lib/bs/tests/UploadEndpointResolutionTest.res

@@ -0,0 +1,101 @@
+// Which endpoint an asset uploads through once a deployment publishes one per
+// declared store, and what a data set is told when none resolves.
+//
+// The four rows are the same ones the AutoUI renderer resolves an upload field
+// by. They are pinned here because the two middle ones are what keep a
+// deployment predating per-store endpoints — and the local dev server, which
+// serves a single upload route — working unchanged, and because the row that
+// falls back to the legacy service must never fall back to *another store*: that
+// uploads into a different plugin's bucket with a 2xx and a plausible ref.
+
+open JestGlobals
+
+@val @scope("process") external processEnv: dict<string> = "env"
+
+// `unresolvedReason` reads the knob, so the ambient environment has to be quiet.
+let clearSkip = () => processEnv->Dict.set("SEED_SKIP_UPLOADS", "")
+
+let perStore = Dict.fromArray([
+  ("Catalog.productImages", "https://catalog.example/"),
+  ("Ordering.invoices", "https://ordering.example/"),
+])
+
+describe("Seed.Upload.endpointFor", () => {
+  testSync("a declared store with a matching endpoint uses that store's endpoint", () =>
+    expect(
+      Seed.Upload.endpointFor(
+        ~store="Catalog.productImages",
+        ~uploadEndpoint="https://legacy.example/",
+        ~uploadEndpoints=perStore,
+      ),
+    )->toEqual(Some("https://catalog.example/"))
+  )
+
+  // Not "https://ordering.example/" — a wrong guess here is a silent
+  // wrong-bucket write.
+  testSync("a declared store with no matching endpoint falls back to the legacy service", () =>
+    expect(
+      Seed.Upload.endpointFor(
+        ~store="Catalog.brochures",
+        ~uploadEndpoint="https://legacy.example/",
+        ~uploadEndpoints=perStore,
+      ),
+    )->toEqual(Some("https://legacy.example/"))
+  )
+
+  testSync("naming no store uses the legacy service", () =>
+    expect(
+      Seed.Upload.endpointFor(~uploadEndpoint="https://legacy.example/", ~uploadEndpoints=perStore),
+    )->toEqual(Some("https://legacy.example/"))
+  )
+
+  testSync("neither available resolves nothing", () =>
+    expect(
+      Seed.Upload.endpointFor(
+        ~store="Catalog.brochures",
+        ~uploadEndpoint="",
+        ~uploadEndpoints=Dict.make(),
+      ),
+    )->toEqual(None)
+  )
+
+  // The local dev server's shape: one upload route, no per-store map, and a data
+  // set that names its store all the same.
+  testSync("a single-route deployment serves a store-naming data set", () =>
+    expect(
+      Seed.Upload.endpointFor(
+        ~store="Catalog.productImages",
+        ~uploadEndpoint="http://localhost:4000/__inmemory/upload",
+        ~uploadEndpoints=Dict.make(),
+      ),
+    )->toEqual(Some("http://localhost:4000/__inmemory/upload"))
+  )
+})
+
+// "no upload endpoint" states a fact about the deployment. When the deployment
+// publishes endpoints the caller could not match, the fact is about the client,
+// and that phrasing sends a reader to the bucket, the presign service and the
+// IAM policy — all of which are correct.
+describe("Seed.Upload.unresolvedReason", () => {
+  beforeEach(clearSkip)
+
+  testSync("no endpoints at all reads as a fact about the deployment", () =>
+    expect(
+      Seed.Upload.unresolvedReason(~store="Catalog.productImages", ~uploadEndpoints=Dict.make()),
+    )->toBe("this deployment publishes no upload endpoint")
+  )
+
+  testSync("an unmatched store names the store and the keys that were available", () => {
+    let msg = Seed.Upload.unresolvedReason(~store="Catalog.brochures", ~uploadEndpoints=perStore)
+    expect(msg)->toContain("Catalog.brochures")
+    expect(msg)->toContain("Catalog.productImages")
+    expect(msg)->toContain("Ordering.invoices")
+  })
+
+  testSync("the knob outranks both, so a skipped run is never read as a broken one", () => {
+    processEnv->Dict.set("SEED_SKIP_UPLOADS", "1")
+    expect(
+      Seed.Upload.unresolvedReason(~store="Catalog.productImages", ~uploadEndpoints=perStore),
+    )->toBe("SEED_SKIP_UPLOADS is set")
+  })
+})

package/lib/bs/tests/UploadEndpointResolutionTest.res.mjs

@@ -0,0 +1,59 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as Seed_Upload$ReventlessSeed from "../src/Seed_Upload.res.mjs";
+
+function clearSkip() {
+  process.env["SEED_SKIP_UPLOADS"] = "";
+}
+
+let perStore = Object.fromEntries([
+  [
+    "Catalog.productImages",
+    "https://catalog.example/"
+  ],
+  [
+    "Ordering.invoices",
+    "https://ordering.example/"
+  ]
+]);
+
+globalThis.describe("Seed.Upload.endpointFor", () => {
+  globalThis.test("a declared store with a matching endpoint uses that store's endpoint", () => {
+    globalThis.expect(Seed_Upload$ReventlessSeed.endpointFor("Catalog.productImages", "https://legacy.example/", perStore)).toEqual("https://catalog.example/");
+  });
+  globalThis.test("a declared store with no matching endpoint falls back to the legacy service", () => {
+    globalThis.expect(Seed_Upload$ReventlessSeed.endpointFor("Catalog.brochures", "https://legacy.example/", perStore)).toEqual("https://legacy.example/");
+  });
+  globalThis.test("naming no store uses the legacy service", () => {
+    globalThis.expect(Seed_Upload$ReventlessSeed.endpointFor(undefined, "https://legacy.example/", perStore)).toEqual("https://legacy.example/");
+  });
+  globalThis.test("neither available resolves nothing", () => {
+    globalThis.expect(Seed_Upload$ReventlessSeed.endpointFor("Catalog.brochures", "", {})).toEqual(undefined);
+  });
+  globalThis.test("a single-route deployment serves a store-naming data set", () => {
+    globalThis.expect(Seed_Upload$ReventlessSeed.endpointFor("Catalog.productImages", "http://localhost:4000/__inmemory/upload", {})).toEqual("http://localhost:4000/__inmemory/upload");
+  });
+});
+
+globalThis.describe("Seed.Upload.unresolvedReason", () => {
+  globalThis.beforeEach(clearSkip);
+  globalThis.test("no endpoints at all reads as a fact about the deployment", () => {
+    globalThis.expect(Seed_Upload$ReventlessSeed.unresolvedReason("Catalog.productImages", {})).toBe("this deployment publishes no upload endpoint");
+  });
+  globalThis.test("an unmatched store names the store and the keys that were available", () => {
+    let msg = Seed_Upload$ReventlessSeed.unresolvedReason("Catalog.brochures", perStore);
+    globalThis.expect(msg).toContain("Catalog.brochures");
+    globalThis.expect(msg).toContain("Catalog.productImages");
+    globalThis.expect(msg).toContain("Ordering.invoices");
+  });
+  globalThis.test("the knob outranks both, so a skipped run is never read as a broken one", () => {
+    process.env["SEED_SKIP_UPLOADS"] = "1";
+    globalThis.expect(Seed_Upload$ReventlessSeed.unresolvedReason("Catalog.productImages", perStore)).toBe("SEED_SKIP_UPLOADS is set");
+  });
+});
+
+export {
+  clearSkip,
+  perStore,
+}
+/* perStore Not a pure module */

package/lib/ocaml/.compiler.log

@@ -1,2 +1,2 @@
-#Start(1785181007705)
-#Done(1785181012323)
+#Start(1785495045271)
+#Done(1785495045300)

package/lib/ocaml/ReventlessSeed.mlmap

@@ -7,3 +7,4 @@ Seed_Random
 Seed_Runner
 Seed_Types
 Seed_Upload
+UploadEndpointResolutionTest

package/lib/ocaml/Seed.res

@@ -14,11 +14,13 @@ module Connect = Seed_Connect
 
 exception Failed = Seed_Types.Failed
 
-// A live target a data set seeds against: an authenticated client, the upload
-// endpoint (empty when the deployment serves no uploads), and a label.
+// A live target a data set seeds against: an authenticated client, the
+// deployment's upload endpoints (the legacy single service and the per-store
+// map, either of which may be empty), and a label.
 type connection = Seed_Connect.connection = {
   client: Seed_Client.t,
   uploadEndpoint: string,
+  uploadEndpoints: dict<string>,
   label: string,
 }