Добавление JSON в массив в базе данных mongo
Я пытаюсь добавить карту JSON в массив в моей базе данных, используя monger
но что-то не так. Я нашел, как сделать это в документации Monger, но $push
а также $addToSet
не работают:
Вот моя функция:
(defn add-vehicle [vehicle]
(let [connect-string (System/getenv "MONGO_CONNECTION")
{:keys [conn db]} (mg/connect-via-uri connect-string)]
(mc/update db "drivers-collection"
{:email (:email vehicle)}
{$addToSet {:cars (:vehicle vehicle)}})))
И вот как я вызываю эту функцию в nREPL
:
(add-vehicle {:email "teste111@hotmail.com"
:vehicle {:model "fusca"
:color "rosa"
:plate "AIO-9807"}})
Есть идеи?
РЕДАКТИРОВАТЬ
Это мой документ в drivers-collection
:
{
"_id": {
"$oid": "57bee61edcba0f2f7559eb56"
},
"email": "teste111@hotmail.com",
"name": "Guilherme Job",
"cars": [],
"customerId": "cus_9O4dhvtuF2926m"
}
Массив моей машины пуст, и я пытаюсь добавить в нее автомобиль.
2 ответа
Убедитесь, что ваш запрос часть monger.collection/update
Вызов содержит правильные критерии. Вы также должны осмотреть WriteResult
возвращается водителем Монго, чтобы увидеть, были ли они успешными или нет.
Я проверил, используя $push
в REPL и все работает правильно. Как видите машина добавлена:
(require '[monger.core :as mg])
(require '[monger.collection :as mc])
(require '[monger.operators :refer :all])
(def conn (mg/connect))
(def db (mg/get-db conn "test-db"))
(def coll "test-collection")
(mc/insert db coll {:email "a@example.com" :name "Guilherme Job" :cars []})
(mc/find-maps db coll)
;; => ({:_id #object[org.bson.types.ObjectId 0x58f153ea "580e826e7e92729ffb000611"], :email "a@example.com", :name "Guilherme Job", :cars []})
(mc/update db coll {:email" "a@example.com"} {$push {:cars" {:name "Ford"}}})
(mc/find-maps db coll)
;; => ({:_id #object[org.bson.types.ObjectId 0x494168cd "580e826e7e92729ffb000611"], :email "a@example.com", :name "Guilherme Job", :cars [{:name "Ford"}]})
Не эксперт по Монго, но вы можете найти это полезным из Поваренной книги Clojure. Также доступны печатные версии, которые я настоятельно рекомендую: http://clojure-cookbook.com/
https://github.com/clojure-cookbook/clojure-cookbook/blob/master/06_databases/6-08_mongo.asciidoc
(require '[monger.core :as mongo]
'[monger.collection :as coll])
(import '[org.bson.types ObjectId])
;; Set the database in the *mongodb-database* var
(mongo/use-db! "mongo-time")
;; Insert one document
(coll/insert "users" {:name "Jeremiah Forthright" :state "TX"})
;; Insert a batch of documents
(coll/insert-batch "users" [{:name "Pete Killibrew" :state "KY"}
{:name "Wendy Perkins" :state "OK"}
{:name "Steel Whitaker" :state "OK"}
{:name "Sarah LaRue" :state "WY"}])
;; Find all documents and return a com.mongodb.DBCursor
(coll/find "users")
;; Find all documents matching a query and return a DBCursor
(coll/find "users" {:state "OK"})
;; Find documents and return them as Clojure maps
(coll/find-maps "users" {:state "OK"})
;; -> ({:_id #<ObjectId 520...>, :state "OK", :name "Wendy Perkins"}
;; {:_id #<ObjectId 520...>, :state "OK", :name "Steel Whitaker"})
;; Find one document and return a com.mongodb.DBObject
(coll/find-one "users" {:name "Pete Killibrew"})
;; Find one document and return it as a Clojure map
(coll/find-one-as-map "users" {:name "Sarah LaRue"})
;; -> {:_id #<ObjectId 520...>, :state "WY", :name "Sarah LaRue"}