Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
branch: master
Fetching contributors…

Cannot retrieve contributors at this time

66 lines (54 sloc) 2.577 kb
A free competitor to Franz's AllegroGraph by Kevin Raison.
At the moment, this code is in a state of rapid flux. Please don't expect
it to behave consistently from one check-in to another.
The goal is to build a fast, robust, distributed graph database with optional
RDF semantics built-in. The primary query language is Prolog (based on PAIP),
but I have plans to add Javascript and maybe Sparql at a later date.
At the moment, persistence is achieved via transaction logging and replay.
I am also working on a native SBCL memory mapped persistence
library that will give me some variation on linear hash tables.
The code checked-in as of 2012/05/06 works fairly well, but should be
considered alpha quality. In order to get it working, you will need the
following:
SBCL 1.0.42 or higher: http://www.sbcl.org/platform-table.html
cl-skip-list: http://www.cliki.net/cl-skip-list
bordeaux-threads: http://common-lisp.net/project/bordeaux-threads/
hunchentoot: http://weitz.de/hunchentoot/
cl-json: http://common-lisp.net/project/cl-json/
uuid: http://www.dardoria.net/software/uuid.html
ieee-floats: http://common-lisp.net/project/ieee-floats/
parse-number: http://www.cliki.net/PARSE-NUMBER
cffi: http://common-lisp.net/project/cffi/
local-time: http://common-lisp.net/project/local-time/
date-calc: http://common-lisp.net/project/cl-date-calc/
py-configparser: http://common-lisp.net/project/py-configparser/
js: http://github.com/akapav/js
split-sequence: http://www.cliki.net/SPLIT-SEQUENCE
Montezuma
To get you started:
(asdf:oos 'asdf:load-op 'vivace-graph-v2)
(in-package #:vivace-graph-v2)
(create-triple-store :name "test store" :location "/var/tmp/db")
(index-predicate "likes")
(with-graph-transaction (*store*)
(add-triple "Kevin" "is-a" "human")
(add-triple "Joe" "is-a" "human")
(add-triple "Fido" "is-a" "dog")
(add-triple "Kevin" "likes" "Fido")
(add-triple "Kevin" "likes" "Joe")
(add-triple "Joe" "likes" "programming lisp")
(add-triple "Kevin" "likes" "programming lisp")
(add-triple "Kevin" "likes" "programming perl")
(add-triple "Kevin" "likes" "programming c"))
(select (?x ?y) (q- ?x "likes" ?y))
(get-triples-list :search-string "programming")
(get-triples-list :s "Kevin")
(get-triples-list :p "is-a")
(close-triple-store :store *store*)
(open-triple-store :name "test store" :location "/var/tmp/db")
(index-predicate "likes")
(select (?x ?y) (q- ?x "likes" ?y))
(select-flat (?object) (q- "Kevin" "likes" (?object "a" "z")))
(get-triples-list :s "Kevin")
(get-triples-list :p "is-a")
(close-triple-store :store *store*)
Jump to Line
Something went wrong with that request. Please try again.