A graph database, for Clojure and ClojureScript.
The latest Alpha version is:
Please see the Wiki for details.
The most recent stable version is:
[org.clojars.quoll/asami "1.2.15"]
Asami is a schemaless database, meaning that data may be inserted with no predefined schema. This flexibility has advantages and disadvantages. It is easier to load and evolve data over time without a schema. However, functionality like upsert and basic integrity checking is not available in the same way as with a graph with a predefined schema.
Asami also follows an Open World Assumption model, in the same way that RDF does. In practice, this has very little effect on the database, beyond what being schemaless provides.
Asami has a query API that looks very similar to a simplified Datomic. More details are available in the Query documentation.
There are several other graph databases available in the Clojure ecosystem, with each having their own focus. Asami is characterized by the following:
Using Asami requires Clojure or ClojureScript.
Asami can be made available to clojure by adding the following to a deps.edn
file:
{
:deps {
org.clojars.quoll/asami {:mvn/version "1.2.15"}
}
}
This makes Asami available to a repl that is launched with the clj
or clojure
commands.
Alternatively, Asami can be added for the Leiningen build tool by adding this to the :dependencies
section of the project.clj
file:
[org.clojars.quoll/asami "1.2.15"]
The Asami API tries to look a little like Datomic.
Once a repl has been configured for Asami, the following can be copy/pasted to test the API:
(require '[asami.core :as d])
;; Create an in-memory database, named dbname
(def db-uri "asami:mem://dbname")
(d/create-database db-uri)
;; Create a connection to the database
(def conn (d/connect db-uri))
;; Data can be loaded into a database either as objects, or "add" statements:
(def first-movies [{:movie/title "Explorers"
:movie/genre "adventure/comedy/family"
:movie/release-year 1985}
{:movie/title "Demolition Man"
:movie/genre "action/sci-fi/thriller"
:movie/release-year 1993}
{:movie/title "Johnny Mnemonic"
:movie/genre "cyber-punk/action"
:movie/release-year 1995}
{:movie/title "Toy Story"
:movie/genre "animation/adventure"
:movie/release-year 1995}])
@(d/transact conn {:tx-data first-movies})
The transact
operation returns an object that can be dereferenced (via clojure.core/deref
or the @
macro) to provide information about the state of the database before and after the transaction. (A future in Clojure, or a delay in ClojureScript). Note that the transaction data can be provided as the :tx-data
in a map object if other parameters are to be provided, or just as a raw sequence without the wrapping map.
For more information about loading data and executing transact
see the Transactions documentation.
With the data loaded, a database value can be retrieved from the database and then queried.
NB: The transact
operation will be executed asynchronously on the JVM. Retrieving a database immediately after executing a transact
will not retrieve the latest database. If the updated database is needed, then perform the deref
operation as shown above, since this will wait until the operation is complete.
(def db (d/db conn))
(d/q '[:find ?movie-title
:where [?m :movie/title ?movie-title]] db)
This returns a sequence of results, with each result being a sequence of the selected vars in the :find
clause (just ?movie-title
in this case):
(["Explorers"]
["Demolition Man"]
["Johnny Mnemonic"]
["Toy Story"])
A more complex query could be to get the title, year and genre for all movies after 1990:
(d/q '[:find ?title ?year ?genre
:where [?m :movie/title ?title]
[?m :movie/release-year ?year]
[?m :movie/genre ?genre]
[(> ?year 1990)]] db)
Entities found in a query can be extracted back out as objects using the entity
function. For instance, the following is a repl session that looks up the movies released in 1995, and then gets the associated entities:
;; find the entity IDs. This variation in the :find clause asks for a list of just the ?m variable
=> (d/q '[:find [?m ...] :where [?m :movie/release-year 1995]] db)
(:tg/node-10327 :tg/node-10326)
;; get a single entity
=> (d/entity db :tg/node-10327)
#:movie{:title "Toy Story",
:genre "animation/adventure",
:release-year 1995}
;; get all the entities from the query
=> (map #(d/entity db %)
(d/q '[:find [?m ...] :where [?m :movie/release-year 1995]] db))
(#:movie{:title "Toy Story",
:genre "animation/adventure",
:release-year 1995}
#:movie{:title "Johnny Mnemonic",
:genre "cyber-punk/action",
:release-year 1995})
See the Query Documentation for more information on querying.
Refer to the Entity Structure documentation to understand how entities are stored and how to construct queries for them.
The Open World Assumption allows each attribute to be multi-arity. In a Closed World database an object may be loaded to replace those attributes that can only appear once. To do the same thing with Asami, annotate the attributes to be replaced with a quote character at the end of the attribute name.
=> (def toy-story (d/q '[:find ?ts . :where [?ts :movie/title "Toy Story"]] db))
=> (d/transact conn [{:db/id toy-story :movie/genre' "animation/adventure/comedy"}])
=> (d/entity (d/db conn) toy-story)
#:movie{:title "Toy Story",
:genre "animation/adventure/comedy",
:release-year 1995}
Addressing nodes by their internal ID can be cumbersome. They can also be addressed by a :db/ident
field if one is provided.
(def tx (d/transact conn [{:db/ident "sense"
:movie/title "Sense and Sensibility"
:movie/genre "drama/romance"
:movie/release-year 1996}]))
;; ask the transaction for the node ID, instead of querying
(def sense (get (:tempids @tx) "sense"))
(d/entity (d/db conn) sense)
This returns the new movie. The :db/ident
attribute does not appear in the entity:
#:movie{:title "Sense and Sensibility", :genre "drama/romance", :release-year 1996}
However, all of the attributes are still present in the graph:
=> (d/q '[:find ?a ?v :in $ ?s :where [?s ?a ?v]] (d/db conn) sense)
([:db/ident "sense"] [:movie/title "Sense and Sensibility"] [:movie/genre "drama/romance"] [:movie/release-year 1996])
The release year of this movie is incorrectly set to the release in the USA, and not the initial release. That can be updated using the :db/ident
field:
=> (d/transact conn [{:db/ident "sense" :movie/release-year' 1995}])
=> (d/entity (d/db conn) sense)
#:movie{:title "Sense and Sensibility", :genre "drama/romance", :release-year 1995}
More details are provided in Entity Updates.
Asami also has some support for graph analytics. These all operate on the graph part of a database value, which can be retrieved with the asami.core/graph
function.
Start by populating a graph with the cast of "The Flintstones". So that we can refer to entities after they have been created, we can provide them with temporary ID values. These are just negative numbers, and can be used elsewhere in the transaction to refer to the same entity. We will also avoid the :tx-data
wrapper in the transaction:
(require '[asami.core :as d])
(require '[asami.analytics :as aa])
(def db-uri "asami:mem://data")
(d/create-database db-uri)
(def conn (d/connect db-uri))
(def data [{:db/id -1 :name "Fred"}
{:db/id -2 :name "Wilma"}
{:db/id -3 :name "Pebbles"}
{:db/id -4 :name "Dino" :species "Dinosaur"}
{:db/id -5 :name "Barney"}
{:db/id -6 :name "Betty"}
{:db/id -7 :name "Bamm-Bamm"}
[:db/add -1 :spouse -2]
[:db/add -2 :spouse -1]
[:db/add -1 :child -3]
[:db/add -2 :child -3]
[:db/add -1 :pet -4]
[:db/add -5 :spouse -6]
[:db/add -6 :spouse -5]
[:db/add -5 :child -7]
[:db/add -6 :child -7]])
(d/transact conn data)
Fred, Wilma, Pebbles, and Dino are all connected in a subgraph. Barney, Betty and Bamm-Bamm are connected in a separate subgraph.
Let's find the subgraph from Fred:
(def db (d/db conn))
(def graph (d/graph db))
(def fred (d/q '[:find ?e . :where [?e :name "Fred"]] db))
(aa/subgraph-from-node graph fred)
This returns the nodes in the graph, but not the scalar values. For instance:
#{:tg/node-10330 :tg/node-10329 :tg/node-10331 :tg/node-10332}
These nodes can be used as the input to a query to get their names:
=> (d/q '[:find [?name ...] :in $ [?n ...] :where [?n :name ?name]]
db
(aa/subgraph-from-node graph fred))
("Fred" "Pebbles" "Dino" "Wilma")
We can also get all the subgraphs:
=> (count (aa/subgraphs graph))
2
;; execute the same query for each subgraph
=> (map (partial d/q '[:find [?name ...] :where [?e :name ?name]])
(aa/subgraphs graph))
(("Fred" "Wilma" "Pebbles" "Dino") ("Barney" "Betty" "Bamm-Bamm"))
Asami supports transitive properties in queries. A property (or attribute) is treated as transitive if it is followed by a +
or a *
character.
(d/q '[:find ?friend-of-a-friend
:where [?person :name "Fred"]
[?person :friend+ ?foaf]
[?foaf :name ?friend-of-a-friend]]
db)
This will find all friends, and friends of friends for Fred.
Asami also implements Loom via the Asami-Loom package. Include the following dependency for your project:
[org.clojars.quoll/asami-loom "0.2.0"]
Graphs can now be analyzed with Loom functions.
If functions are provided to Loom, then they can be used to provide labels for creating a visual graph. The following creates some simple queries to get the labels for edges and nodes:
(require '[asami-loom.index])
(require '[asami-loom.label])
(require '[loom.io])
(defn edge-label [g s d]
(str (d/q '[:find ?e . :in $ ?a ?b :where (or [?a ?e ?b] [?b ?e ?a])] g s d)))
(defn node-label [g n]
(or (d/q '[:find ?name . :where [?n :name ?name]] g n) "-"))
;; create a PDF of the graph
(loom-io/view (graph db) :fmt :pdg :alg :sfpd :edge-label edge-label :node-label node-label)
Copyright © 2016-2021 Cisco
Distributed under the Eclipse Public License either version 1.0 or (at your option) any later version.
Can you improve this documentation? These fine people already did:
Paula Gearon, Jimmy Miller & J.J. ToltonEdit on GitHub
cljdoc is a website building & hosting documentation for Clojure/Script libraries
× close