Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
tree: f126fe33d2
Fetching contributors…

Cannot retrieve contributors at this time

file 58 lines (45 sloc) 2.551 kb
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58
;; @author Antonio Garrote
;; @date 30.06.2010

(ns scrummy-clone.resources.common
  (use [plaza.rdf core schemas]
       [plaza.rdf.vocabularies foaf dublin-core]))


; Namespace for all shared meta data in the application
(defonce scc "http://scrummyclone.com/vocabularies/common/")
(register-rdf-ns :scc scc)


; Classes
(defonce scc:Sprint "http://scrummyclone.com/vocabularies/Sprint")
(defonce scc:Story "http://scrummyclone.com/vocabularies/Story")
(defonce scc:Task "http://scrummyclone.com/vocabularies/Task")

; Properties
(defonce scc:uriId "http://scrummyclone.com/vocabularies/uriId")
(defonce scc:status "http://scrummyclone.com/vocabularies/status")
(defonce scc:priority "http://scrummyclone.com/vocabularies/priority")
(defonce scc:hasSprints "http://scrummyclone.com/vocabularies/hasSprints")
(defonce scc:belongsToProject "http://scrummyclone.com/vocabularies/belongsToProject")
(defonce scc:hasStories "http://scrummyclone.com/vocabularies/hasStories")
(defonce scc:belongsToSprint "http://scrummyclone.com/vocabularies/belongsToSprint")
(defonce scc:hasTasks "http://scrummyclone.com/vocabularies/hasTasks")
(defonce scc:belongsToStory "http://scrummyclone.com/vocabularies/belongsToStory")



; Schemas
(declare-schemas-to-load

 (defonce scc:Project-schema
   (make-rdfs-schema foaf:Project
                     :title {:uri dct:title :range :string}
                     :hasSprints {:uri scc:hasSprints :range scc:Sprint}))

 (defonce scc:Sprint-schema
   (make-rdfs-schema scc:Sprint
                     :created {:uri dct:created :range :date }
                     :hasStories {:uri scc:hasStories :range scc:Story}
                     :belongsToProject {:uri scc:belongsToProject :range foaf:Project}))

  (defonce scc:Story-schema
   (make-rdfs-schema scc:Story
                     :title {:uri dct:title :range :string}
                     :priority {:uri scc:priority :range :int }
                     :hasTasks {:uri scc:hasTasks :range scc:Task}
                     :belongsToSprint {:uri scc:belongsToSprint :range scc:Sprint}))

 (defonce scc:Task-schema
   (make-rdfs-schema scc:Task
                     :title {:uri dct:title :range :string}
                     :status {:uri scc:status :range :string}
                     :asignee {:uri dct:contributor :range :string}
                     :belongsToStory {:uri scc:belongsToStory :range scc:Sprint})))
Something went wrong with that request. Please try again.