Round 382: Pinecone ext, Weaviate ext, Qdrant ext, Milvus/Chroma ext (20 commands)
ober
8c4af52cdce031d51264c5571c0e6e472c3ad123
--- a/docs/jemacs-vs-emacs.md +++ b/docs/jemacs-vs-emacs.md @@ -4583,6 +4583,31 @@ No remaining Tier 1 gaps. All core editing, completion, and navigation features | ebib-import-file | :orange_circle: | Import file into Ebib | | ebib-push-citation | :orange_circle: | Push Ebib citation to buffer | +### Round 382 — Pinecone ext, Weaviate ext, Qdrant ext, Milvus/Chroma ext + +| Feature | Emacs | jemacs | Status | +|---|---|---|---| +| Pinecone indexes | — | `pinecone-index` | :orange_circle: Scaffolded | +| Pinecone query | — | `pinecone-query` | :orange_circle: Scaffolded | +| Pinecone upsert | — | `pinecone-upsert` | :orange_circle: Scaffolded | +| Pinecone collections | — | `pinecone-collections` | :orange_circle: Scaffolded | +| Weaviate schema | — | `weaviate-schema` | :orange_circle: Scaffolded | +| Weaviate query | — | `weaviate-query` | :orange_circle: Scaffolded | +| Weaviate objects | — | `weaviate-objects` | :orange_circle: Scaffolded | +| Weaviate tenants | — | `weaviate-tenants` | :orange_circle: Scaffolded | +| Qdrant collections | — | `qdrant-collections` | :orange_circle: Scaffolded | +| Qdrant points | — | `qdrant-points` | :orange_circle: Scaffolded | +| Qdrant search | — | `qdrant-search` | :orange_circle: Scaffolded | +| Qdrant snapshots | — | `qdrant-snapshots` | :orange_circle: Scaffolded | +| Milvus collections | — | `milvus-collections` | :orange_circle: Scaffolded | +| Milvus search | — | `milvus-search` | :orange_circle: Scaffolded | +| Milvus insert | — | `milvus-insert` | :orange_circle: Scaffolded | +| Milvus partitions | — | `milvus-partitions` | :orange_circle: Scaffolded | +| Chroma collections | — | `chroma-collections` | :orange_circle: Scaffolded | +| Chroma query | — | `chroma-query` | :orange_circle: Scaffolded | +| Chroma add docs | — | `chroma-add` | :orange_circle: Scaffolded | +| Chroma delete docs | — | `chroma-delete` | :orange_circle: Scaffolded | + ### Round 381 — Upstash ext, Turso ext, Fauna ext, DynamoDB/CosmosDB ext | Feature | Emacs | jemacs | Status | --- a/src/jerboa-emacs/editor-extra-final.ss +++ b/src/jerboa-emacs/editor-extra-final.ss @@ -26964,3 +26964,44 @@ (def (cmd-cosmos-throughput app) (let* ((echo (app-state-echo app))) (echo-message! echo "CosmosDB: showing throughput metrics"))) + +;; Round 382 batch 2 — Qdrant ext, Milvus/Chroma ext +(def (cmd-qdrant-search app) + (let* ((echo (app-state-echo app))) + (echo-message! echo "Qdrant: searching vectors"))) + +(def (cmd-qdrant-snapshots app) + (let* ((echo (app-state-echo app))) + (echo-message! echo "Qdrant: listing snapshots"))) + +(def (cmd-milvus-collections app) + (let* ((echo (app-state-echo app))) + (echo-message! echo "Milvus: listing collections"))) + +(def (cmd-milvus-search app) + (let* ((echo (app-state-echo app))) + (echo-message! echo "Milvus: searching vectors"))) + +(def (cmd-milvus-insert app) + (let* ((echo (app-state-echo app))) + (echo-message! echo "Milvus: inserting vectors"))) + +(def (cmd-milvus-partitions app) + (let* ((echo (app-state-echo app))) + (echo-message! echo "Milvus: listing partitions"))) + +(def (cmd-chroma-collections app) + (let* ((echo (app-state-echo app))) + (echo-message! echo "Chroma: listing collections"))) + +(def (cmd-chroma-query app) + (let* ((echo (app-state-echo app))) + (echo-message! echo "Chroma: querying embeddings"))) + +(def (cmd-chroma-add app) + (let* ((echo (app-state-echo app))) + (echo-message! echo "Chroma: adding documents"))) + +(def (cmd-chroma-delete app) + (let* ((echo (app-state-echo app))) + (echo-message! echo "Chroma: deleting documents"))) --- a/src/jerboa-emacs/editor-extra-modes.ss +++ b/src/jerboa-emacs/editor-extra-modes.ss @@ -27741,3 +27741,46 @@ (def (cmd-fauna-collections app) (let* ((echo (app-state-echo app))) (echo-message! echo "Fauna: listing collections"))) + +;; Round 382 batch 1 — Pinecone ext, Weaviate ext +(def (cmd-pinecone-index app) + (let* ((echo (app-state-echo app))) + (echo-message! echo "Pinecone: listing indexes"))) + +(def (cmd-pinecone-query app) + (let* ((echo (app-state-echo app))) + (echo-message! echo "Pinecone: querying vectors"))) + +(def (cmd-pinecone-upsert app) + (let* ((echo (app-state-echo app))) + (echo-message! echo "Pinecone: upserting vectors"))) + +(def (cmd-pinecone-collections app) + (let* ((echo (app-state-echo app))) + (echo-message! echo "Pinecone: listing collections"))) + +(def (cmd-weaviate-schema app) + (let* ((echo (app-state-echo app))) + (echo-message! echo "Weaviate: showing schema"))) + +(def (cmd-weaviate-query app) + (let* ((echo (app-state-echo app))) + (echo-read-string echo "GraphQL query: " + (lambda (query) + (echo-message! echo (str "Weaviate: querying: " query)))))) + +(def (cmd-weaviate-objects app) + (let* ((echo (app-state-echo app))) + (echo-message! echo "Weaviate: listing objects"))) + +(def (cmd-weaviate-tenants app) + (let* ((echo (app-state-echo app))) + (echo-message! echo "Weaviate: listing tenants"))) + +(def (cmd-qdrant-collections app) + (let* ((echo (app-state-echo app))) + (echo-message! echo "Qdrant: listing collections"))) + +(def (cmd-qdrant-points app) + (let* ((echo (app-state-echo app))) + (echo-message! echo "Qdrant: browsing points"))) --- a/src/jerboa-emacs/editor-extra-regs2.ss +++ b/src/jerboa-emacs/editor-extra-regs2.ss @@ -9486,4 +9486,26 @@ (register-command! 'cosmos-containers cmd-cosmos-containers) (register-command! 'cosmos-queries cmd-cosmos-queries) (register-command! 'cosmos-throughput cmd-cosmos-throughput) + + ;; Round 382 — Pinecone ext, Weaviate ext, Qdrant ext, Milvus/Chroma ext + (register-command! 'pinecone-index cmd-pinecone-index) + (register-command! 'pinecone-query cmd-pinecone-query) + (register-command! 'pinecone-upsert cmd-pinecone-upsert) + (register-command! 'pinecone-collections cmd-pinecone-collections) + (register-command! 'weaviate-schema cmd-weaviate-schema) + (register-command! 'weaviate-query cmd-weaviate-query) + (register-command! 'weaviate-objects cmd-weaviate-objects) + (register-command! 'weaviate-tenants cmd-weaviate-tenants) + (register-command! 'qdrant-collections cmd-qdrant-collections) + (register-command! 'qdrant-points cmd-qdrant-points) + (register-command! 'qdrant-search cmd-qdrant-search) + (register-command! 'qdrant-snapshots cmd-qdrant-snapshots) + (register-command! 'milvus-collections cmd-milvus-collections) + (register-command! 'milvus-search cmd-milvus-search) + (register-command! 'milvus-insert cmd-milvus-insert) + (register-command! 'milvus-partitions cmd-milvus-partitions) + (register-command! 'chroma-collections cmd-chroma-collections) + (register-command! 'chroma-query cmd-chroma-query) + (register-command! 'chroma-add cmd-chroma-add) + (register-command! 'chroma-delete cmd-chroma-delete) )